;$V10000G1500S800,600L11000

goto *define



*game_start
*sean0000a

mov %mylv,1
mov %max_mylife,30
mov %max_mp,0
mov %exp,0
mov %item01,1
mov %item02,0
mov %item04,0
mov %item05,0
mov %item06,0
mov %item07,0
mov %item08,0
mov %item09,0
mov %skill01,0
mov %skill02,0
mov %skill03,0
mov %skill04,0
mov %skill05,0
mov %ivent01,0
mov %ivent02,0
mov %ivent03,0
mov %ivent04,0
mov %ivent05,0
mov %ivent06,0
mov %ivent07,0
mov %ivent08,0
mov %ivent09,0
mov %ivent10,0
mov %ivent11,0
mov %ivent12,0
mov %ivent13,0
mov %ivent14,0
mov %ivent15,0
mov %ivent16,0
mov %ivent17,0
mov %ivent18,0
mov %check01,0
mov %check02,0
mov %check03,0
mov %check04,0
mov %check05,0
mov %check06,0
mov %check07,0
mov %check08,0
mov %check08,0
mov %check10,0
mov %check11,0
mov %ruka_tati,0
gosub *syokika
mov %manuoff,1
bg black,1
wait 500
strsp 700,"Difficulty? (Changeable On Loss)",172,143,17,1,24,24,0,0,1,1
if %game_clear<3 csel "Normal",*sean0000b,"Hard",*sean0000b
if %game_clear=3 csel "Normal",*sean0000b,"Hard",*sean0000b,"EX (One-hit-kills)",*sean0000b



*sean0000b

if %sentaku=1 mov %nanido,1
if %sentaku=2 mov %nanido,2
if %sentaku=3 mov %nanido,0
cspl 700,701:print 10,500
wait 500
strsp 700,"Vore Scenes? (Changeable in Special Config)",172,143,23,1,24,24,0,0,1,1
csel "Watch",*sean0000x,"Skip",*sean0000x



*sean0000x

if %sentaku=1 mov %hosyoku_cut,0
if %sentaku=2 mov %hosyoku_cut,1
cspl 700,701:print 10,500
if %game_clear=0 goto *sean0001
if %tougou<2 goto *sean0001
mov %manuoff,1
bg black,1
wait 500
strsp 700,"Starting location?",172,143,10,1,24,24,0,0,1,1
if %game_clear>1 csel "Beginning",*sean0001,"Middle",*sean_tyustart,"Final",*sean_syustart
if %game_clear=1 csel "Beginning",*sean0001,"Middle",*sean_tyustart



*sean0001

if %tougou<2 goto *sean_syustart
mov %manuoff,0
cspl 700,701:print 10,500
mov %storyon,1
bg black,1
textoff
textclear
wait 1000
gosub *setwindow_01p
>MESSAGE FROM TRANSLATOR:@
>Due to issues with how this game saves files, you can only save at specific points that use double-byte characters.\
>I know this is inconvenient, but I haven't found a way to get it to work normally. I will put the save locations:\
>Before Choices@
>Before Battles@
>After Battles@
>And during long story sequences.\
>Also, do not change the default save comment text.@
>The next line will be an example of a "safe" save location.\
r@k@\
>Saving anywhere else besides a "Safe Save Location" can lead to an unusable save (it will give you an error).\
>That's all from me.\
bg "bg\bg001.bmp",99,5000,"system\lngtwave.dll/vwi"
wait 1000
>Where am I...?\
>A soft light fills the area, giving the atmosphere a solemn feel.\
>...Is this a dream?\
name "???"
>Luka...@
>Oh brave Luka...\
name ""
>I hear a beautiful voice begin to call out to me.@
bgm "bgm\irias.ogg"
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,3000
>The goddess Ilias suddenly appears before me!\
goto *sean0162
goto *sean0001a



*sean0001a

if %continue=1 bgm "bgm\irias.ogg"
if %continue=1 lsp 700,":a;chara\iriasu_st01.bmp",0,0
if %continue=1 bg "bg\bg001.bmp",10,5000
mov %continue,0
name "Ilias"
>Oh brave Luka... can you hear my voice?\
r@k@\
name ""
csel "I can!",*sean0002,"Nope!",*sean0003,"......",*sean0004



*sean0002

name "Luka"
>I can hear you, Ilias!\
name ""
>I begin to tremble at the sound of Ilias' voice.@
>The goddess whom created the world, who extends her love to Humanity.\
>With such an amazing figure appearing before me, it makes me want to dance!@
>Even if it's just a dream...\
goto *sean0006



*sean0003

lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>..........@
>Then why did you respond?\
name ""
name "Luka"
>............\
name ""
>She got me there...\
goto *sean0006



*sean0004

lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,1500
name "Ilias"
...........\
name ""
name "Luka"
...........\
name ""
name "Ilias"
>If you ignore me, I shall pass judgement on you.@
>Do you understand?\
name ""
csel "Sorry",*sean0006,"......",*sean0005



*sean0005

lsp 700,":a;chara\iriasu_st14.bmp",0,0
print 10,1500
name "Ilias"
>......\
name ""
bgmstop
dwave 1,"se\ikazuti.ogg"
quake 10,1500
cspl 3,7:mov %nobtn,1
monocro #cc0000
print 10,1500
>Lightning courses through my body, burning me all over.@
>My consciousness slowly begins to fade...\
mov $end_go,"sean0001a"
goto *badend2



*sean0006

lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
name "Ilias"
>Many, many years ago, in a time man cannot comprehend, I created this world.\
>First was the earth, sky, and sea.@
>Then the animals, birds and insects.@
>Finally, I created Humanity.\
lsp 700,":a;chara\iriasu_st04.bmp",0,0
print 10,500
>However, I am not perfect.@
>While creating Humanity, I also had many failures...\
lsp 700,":a;chara\iriasu_st01.bmp",0,0
print 10,500
>Those failures are monsters... a truly detestable existence.\
name ""
name "Luka"
>...........\
name ""
name "Ilias"
>Monsters are nothing but evil.@
>They will seduce humans to commit forbidden acts. Sometimes even committing great acts of violence.\
>Even though humans are weak, I still love them...@
>So I hate these monsters that bring them only harm.\
>And you, Luka, have finally come of age today, have you not?\
name ""
name "Luka"
>Yes... I have long been looking forward to this day!\
name ""
>Today, I shall finally receive the baptism in Ilias' name.@
>After being baptized, I will be recognized as a Hero!\
>Being a Hero has always been my dream, and finally the long awaited day has arrived!@
>Even though my village has been peaceful, I devoted all of my time to training with a sword.\
>And finally!@
>The day when I shall finally become a Hero has come at last!\
name "Ilias"
>Up until now, I have given my blessing and protection to many men...@
>However, the monsters still have not been exterminated.\
>Not since Heinrich, 500 years ago, has a man been able to defeat a Monster Lord.\
name ""
>The hero Heinrich...@
>500 years ago, he was able to defeat a horribly cruel Monster Lord.\
>With an attack that split the earth itself, he was able to slay the evil being.@
>Truly, a Hero among Heroes.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0
print 10,500
name "Ilias"
>But Luka...@
>You, too, have the potential to be able to defeat a Monster Lord!\
name "Luka"
>...Eh?@
>I... I do?\
name ""
name "Ilias"
>Now go, Luka!@
>I will always be watching over you...\
bgmstop
textoff
csp -1
bg black,99,5000,"system\lngtwave.dll/vwi"
bg "bg\bg002.bmp",99,5000,"system\lngtwave.dll/vwi"
wait 500
bgm "bgm\mura1.ogg"
dwave 1,"se\morning.ogg"
wait 1500
gosub *setwindow_01p
>I open my eyes to the soft light of the morning sun coming through the window.\
>Was that just a dream...?@
>...There's no way that was just a normal dream!\
>I definitely talked to Ilias!\
name "Luka"
>Oh great Ilias... thank you!@
>Please watch over me!\
name ""
>Like every day, I start off with a prayer to Ilias.\
>After my prayers have finished, I turn to the keepsake of my mother.\
name "Luka"
>Good morning, Mother.@
>Today I will finally begin my journey as a Hero.\
name ""
>With my morning routine finished, I begin to get ready for my trip.@
>It's a beautiful day outside, with the fresh morning scent filling the air.\
>This morning, I will travel to Ilias Temple to receive my baptism.@
>Once baptized, I will begin my journey to defeat the Monster Lord!\
>... I won't be returning to this house for a while.@
>With such a sad thought in my mind, I look around my small home.\
name "Luka"
>Well, until I defeat the Monster Lord, I won't be coming back here...@
>I better clean you so you look great when I come back!\
name ""
>I start off by making my bed.\
dwave 1,"se\asioto1.ogg"
wait 2000
name "Villager"
>He... Help!\
name ""
name "Luka"
>Hmm? What was that?\
name ""
>While making my bed, I hear a man's scream.@
>It sounded like Hans, the lumberjack.@
>What's happening so early in the morning...?\
name "Hans"
>Monster... A monster is in the forest!\
name ""
bgm "bgm\kiki1.ogg"
name "Luka"
>W... What!?\
name ""
>In Ilias Village? How can a monster appear in such a peaceful village...?\
>Even though Ilias Village is small, it still has a gigantic temple.@
>The temple where the goddess is revered: Ilias Temple.@
>With such a huge temple nearby, monsters dare not approach this village.\
name "Villager"
>Everyone, hide in your houses! Quickly, before the monster comes into the village!\
name ""
name "Woman"
>Ahhhh!\
name ""
name "Child"
>Mommy!\
name ""
>Such a peaceful village has quickly fallen into panic.@
>On the day of my baptism... why did this have to happen!?\
goto *sean0006a



*sean0006a

if %continue=1 bgm "bgm\kiki1.ogg"
if %continue=1 bg "bg\bg002.bmp",10,5000
mov %continue,0
name "Luka"
>Wh... what should I do!?\
name ""
>I haven't ever fought a monster before... in fact, I've never even seen one.\
>However, one day I will fight the Monster Lord.@
>If I can't face a monster of this level, how can I expect to be a Hero!?\
r@k@\
csel "Fight",*sean0007,"Run",*sean0008



*sean0007

name "Luka"
>Alright! Here I go!\
name ""
>I grab my sword and dash out of the house.\
>The village where I was born and raised...@
>I will defend it!\
dwave 1,"se\asioto1.ogg"
sean_change "bg003"
goto *sean0011



*sean0008

name "Luka"
>I... don't want to.\
name ""
>I muttered softly under my breath.\
bgm "bgm\irias.ogg"
lsp 700,":a;chara\iriasu_st01.bmp",0,0
bg "bg\bg001.bmp",18,3000,"system\mask01.jpg"
name "Ilias"
>Luka... pick up your sword.@
>You must defend your village!\
name ""
bgm "bgm\kiki1.ogg"
csp 700
bg "bg\bg002.bmp",18,3000,"system\mask01.jpg"
name "Luka"
>Wh... what was that?\
name ""
>For an instant, I saw a vision flash before my eyes.@
>Was that possibly... Ilias?@
>Is Ilias telling me to fight the monster...?\
r@k@\
csel "Fight",*sean0009,"Run",*sean0010



*sean0009

name "Luka"
>If Ilias tells me to, then I have no choice.\
name ""
>I pick up my sword and run out of the house.\
>To defend the village where I was born and raised...@
>If Ilias says I have to, then I guess I have no choice!\
dwave 1,"se\asioto1.ogg"
sean_change "bg003"
goto *sean0011



*sean0010

name "Luka"
>...I don't want to.\
name ""
>Suddenly, a mysterious voice booms out.\
name "Ilias"
>It seems as though I made a mistake, Luka.\
>You are no hero at all.@
>Receive my judgement.\
name ""
name "Luka"
>...Eh?\
name ""
bgmstop
dwave 1,"se\ikazuti.ogg"
quake 10,1500
vspl 3,7,0:mov %nobtn,1
monocro #cc0000
print 10,1500
>Lightning courses through my body, causing me to go into convulsions.\
>I slowly lose consciousness...\
mov $end_go,"sean0006a"
goto *badend2



*sean0011

lsp 700,":a;chara\mob_ozisan3.bmp",0,0:print 10,500
name "Farmer"
>Ahh! Run away!\
name ""
lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
name "Man"
>Ahh! What should I do!?\
name ""
csp 700:print 10,500
>The village has fallen into chaos.@
>The villagers who were working the fields are all rushing back into their homes.\
>Running against the wave of people, I head towards the village entrance.@
>While pushing past the flood of people, I hear the booming voice of Betty, the old lady next door.\
lsp 700,":a;chara\mob_obasan.bmp",0,0:print 10,500
name "Betty"
>Stop, Luka!@
>Leave the monster to the soldiers at Ilias Temple!\
name ""
name "Luka"
>It's ok, Betty... I'm a Hero!\
name ""
name "Betty"
>"Hero", you say? You haven't even been baptized yet!@
>Come back here, don't go!\
name ""
>It's true that I haven't received the baptism yet and am not formally a Hero...@
>But even so, I should be able to defeat a low level monster!\
csp 700:print 10,500
>Running past Betty, I continue through the village.@
>Finally, I reach the forest outside the village!\
dwave 1,"se\asioto1.ogg"
sean_change "bg004"
>I head off from the main road into the forest.@
>I stop running and look around the area.\
name "Luka"
>Where are you, monster?\
name ""
>Looking around at the eerily quiet forest, I begin to doubt rushing in with no information.@
>Perhaps I shouldn't have just blindly jumped into the forest...\
>As I look around at my surroundings, I hear a noise come from behind me.@
>Suddenly, a monster appears!\
r@k@\
goto *sean0012



*sean0012

mov $name,"Slime Girl"
mov $name2,"Slime Girl"
mov $lavel,"slime"
mov $tatie1,"slime_st01"
mov $tatie2,"slime_st02"
mov $tatie3,"slime_st03"
mov $tatie4,"slime_st02"
mov $haikei,"bg004"
mov %monster_x,244
mov %monster_y,80
if %nanido=1 mov %max_enemylife,20
if %nanido=2 mov %max_enemylife,30
if %nanido=3 mov %max_enemylife,40
if %nanido=0 mov %max_enemylife,20
mov %kaihi,95
mov %damage_keigen,100
mov %alice_skill,0
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
name "Slime Girl"
>Hahaha, a delicious looking boy showed up!\
name ""
>The Slime giggles as I stumble backwards, startled at her sudden appearance.@
>Her viscous body jiggles around as she laughs.\
name "Luka"
>So this.... is a monster.\
name ""
>As I stare into the monster's eyes, my body feels paralyzed.@
>It's my first time seeing an actual monster in person after all.@
>It looks powerful... and strange... and surprisingly cute.\
>Her body jiggles around with every movement she makes... it's nothing like a human.\
>...Can I really beat this thing?@
>All the confidence I had while rushing through the village starts to dissipate.\
name "Slime Girl"
>Ararara?@
>Am I the first monster you've seen by any chance?\
name ""
name "Luka"
>..........\
name ""
>Even though she guessed it right, I don't respond.@
>I don't want her to think I'm scared.@
>I grip my sword tighter to stop my hands from shaking.\
name "Luka"
>Um...@
>You're pretty close to a human village, you know?@
>Could you please just go away?\
name ""
>With my sword in front of me, I timidly try to talk to the Slime.@
>There's no reason to be scared of it... hopefully.\
>If I reason with her, I'm sure she'll understand.@
>Even if my enemy is a monster, I don't want a pointless fight.\
name "Luka"
>Everyone in the village is scared of you...@
>But if you don't mean to harm anyone...\
name ""
name "Slime Girl"
>Hahaha, are you a pacifist or something?@
>I'm too hungry to go away, so there's no point asking me to leave.\
name ""
name "Slime Girl"
>Or... are you willing to treat me to some of your semen?\
name ""
name "Luka"
>Uh... that... I can't do.\
name ""
>Many monsters eat men's semen as food.@
>However, it is a serious taboo to give semen to a monster.\
>One of Ilias' five commandments forbids sexual relations between human and monster.@
>Breaking this commandment brings about horrible consequences...\
name "Luka"
>One of Ilias' five commandments forbids it, so I can't let you have any of my energy.\
name ""
name "Slime Girl"
>Well then... I guess I'll just have to forcibly squeeze it out of you!\
name ""
name "Luka"
>Geh...\
name ""
>It looks like I can't avoid fighting her.\
>As I grip my sword tighter...
bgm "bgm\irias.ogg"
csp 700
lsp 700,":a;chara\iriasu_st01.bmp",0,0
bg "bg\bg001.bmp",18,3000,"system\mask01.jpg"
>Suddenly a vision appears before me.\
name "Ilias"
>Oh brave Luka...@
>I'm speaking to you directly in your head now to give you guidance.@
>I shall teach you how to fight.\
name ""
r@k@\
name ""
csel "Please do",*sean0013,"I already know how to fight",*sean0016



*sean0013

if %continue=0 skip 11
bgm "bgm\irias.ogg"
gosub *setwindow_02
mov %mylife,30
lsp 700,":a;chara\iriasu_st02.bmp",0,0
lsp 560,":a;system\gager100.bmp",114,556
lsp 561,":a;system\gagee100.bmp",421,556
lsp 598,":a;system\face_00.bmp",34,534
gosub *hp
bg "bg\bg001.bmp",10,5000
mov %continue,0
name "Luka"
>Please teach me!\
name ""
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
name "Ilias"
>Well then... First let us start with the basics.\
>The green bar in the bottom left is your HP.\
>It's called HP just for convenience...@
>It's actually your physical health, mental health and sexual resistance all combined.\
>I guess you could call it your "gauge to show how close you are to losing."\
>Let me show you what happens when you get damaged in combat.@
>Don't worry, it will only be a small tap.\
name ""
skillname "Judgement Tap"
mov %a_effect1,2
damage 29,29
skillname ""
name "Luka"
>Aahhhhgg!\
name ""
>Lightning courses through my body, causing my body to convulse.\
name "Ilias"
>Do you understand how it works now?@
>Depending on how much damage you take, the gauge will decrease accordingly.\
>It decreases both with physical attacks, and through... other methods.\
>In other words, when you suffer a "pleasure attack", the gauge will also decrease.\
>And if this HP gauge reaches zero, you will lose the battle.@
>There is no escape at that point.\
>Since you will be unable to move, the monster will abuse you freely.@
>You must not let such a thing happen!\
>A similar gauge is displayed on the bottom right for the enemy.@
>If you decrease their gauge to zero, you will win the battle.\
>Would you like me to demonstrate how your HP gauge decreases again?\
name "Luka"
>Please, don't! I don't think I can survive another demonstration...\
name "Ilias"
>Well then, next is the turn order.@
>Turns go: Your turn. Their turn. Your turn. Their turn. Very simple, right?\
lsp 608,":a;system\windowt.bmp",25,255
lsp 601,":s/20,20,0;#FFFFFF#FF4444Attack ",50,268
lsp 607,":s/20,20,0;#FFFFFF#FF4444Skill ",50,295
lsp 602,":s/20,20,0;#FFFFFF#FF4444Struggle ",50,322
lsp 603,":s/20,20,0;#FFFFFF#FF4444Guard ",50,349
lsp 604,":s/20,20,0;#FFFFFF#FF4444Wait ",285,268
if %stopcmd5=0 lsp 605,":s/20,20,0;#FFFFFF#FF4444Surrender ",285,295
lsp 606,":s/20,20,0;#FFFFFF#FF4444Request ",285,322
print 10,1000
>And, when it's your turn, this screen will be displayed.\
>Since that screen goes where my words are, the screen will only be in the middle of the screen for this explanation.\
>Well then, let's look at each command in further detail.\
>First is "Attack".@
>You will attack the enemy with your sword.\
>Next is "Skill".@
>Well... right now you don't know any skills.\
>Once you learn some, you will learn how to use this.\
>Next is "Struggle"@
>Some enemies use moves that will bind you in place, or restrict your movement.\
>After they seal your movement, they will continually damage you.\
>When you are bound, trying to use "Attack" will be useless.@
>Well... sometimes there's an exception. You'll just have to read the situation as it comes.\
>So when you are bound, you will need to use "Struggle" to escape.@
>This is very important, so be sure not to forget!\
>Sometimes you may be unable to break free of an enemy, no matter how hard you struggle.@
>Be sure to pay attention to the situation to see what you can do!\
>Next is "Guard"@
>If you guard, you will take less than half damage from the enemy's attack, but you can't do anything else that turn.\
>Next is "Wait"@
>For one turn, you will stand there doing nothing.\
>Naturally, there is no tactical advantage to using this option.@
>If you just stand there taking attacks, you will surely lose.\
>A Hero does not need such a selection.\
>Next is "Surrender"@
>When you select this, you will forfeit to the enemy and be unable to do any more actions.\
>Until your HP is zero, the enemy will simply play with you.@
>A Hero TRULY does not need such a selection.\
>Lastly is "Request"@
>Like surrender, you forfeit to the enemy and allow them to win.@
>It's used to be defeated by a specific technique.\
>However, you can only select a move that you have seen before.@
>If you haven't seen the move before, it will be blacked out.\
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
>Such a command is pointless for you, though.@
>A Hero would never beg a monster to abuse him.\
>It's time to face the monster, Luka!@
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>I believe in you!\
cspl 601,608:print 10,500
goto *sean0013a



*sean0013a

name "Ilias"
>My explanation is over.@
>Did you understand it?@
>Would you like me to explain it once more?\
r@k@\
name ""
csel "I understand",*sean0015,"Explain again",*sean0014



*sean0014

name "Ilias"
>Very well, then I will explain it once more.\
>The green bar in the bottom left is your HP.\
>It's called HP just for convenience...@
>It's actually your physical health, mental health and sexual resistance all combined.\
>I guess you could call it your "gauge to show how close you are to losing."\
>Let me show you what happens when you get damaged in combat.@
>Don't worry, it will only be a small tap.\
name ""
name "Luka"
>Wa... Wait! I don't think I can take that attack again!\
name ""
skillname "Judgement Tap"
mov %a_effect1,2
damage 29,29
skillname ""
bgmstop
cspl 3,7:cspl 559,598:mov %nobtn,1
monocro #cc0000
print 10,1500
>Lightning courses through my body, causing it to convulse.\
lsp 700,":a;chara\iriasu_st06.bmp",0,0
print 10,500
name "Ilias"
>Oops.\
name ""
>My consciousness begins to fade...\
mov $end_go,"sean0013"
goto *badend2



*sean0015

name "Luka"
>I understand!\
name ""
name "Ilias"
>It is not possible to run from battles.@
>A Hero never retreats, anyway!\
name ""
name "Ilias"
>And most importantly, you must never forge....\
wait 500
csp 599:csp 700
mov %max_mylife,30
;mov %mylife,30														;patch
mov %before_action,55
gosub *hp
mov %gage,%mylife*100/%max_mylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 560,":a;system\gager"+$gagenum+".bmp",114,556
lsp 561,":a;system\gagee100.bmp",421,556
lsp 700,":a;chara\slime_st01.bmp",244,80
bg "bg\bg004.bmp",18,5000,"system\mask01.jpg"
textoff
textclear
bgm "bgm\battle.ogg"
name "Luka"
>Eh!?\
name ""
>Why did it cut off at such an important spot!?@
>Ilias, what were you about to say!?\
lsp 700,":a;chara\slime_st03.bmp",244,80:print 10,500
name "Slime Girl"
>Why are you daydreaming?\
name ""
name "Luka"
>Um... uh...\
name ""
>I turn to face back towards the Slime.@
>I know how to fight now, there's no more need for hesitation.@
>Alright then... Here I go!\
>Oh, my HPs are...\
;r@k@\													;patch
lsp 700,":a;chara\slime_st01.bmp",244,80:print 10,500
goto *slime_start2



*sean0016

name "Luka"
>I already know how to fight!\
name ""
lsp 700,":a;chara\iriasu_st02.bmp",0,0
print 10,500
name "Ilias"
>That is reassuring to hear...@
>But you absolutely must make sure to remember:@
name ""
name "Ilias"
>You must not eve....\
wait 500
mov %max_mylife,30
mov %mylife,30
gosub *hp
csp 599:csp 700
lsp 560,":a;system\gager100.bmp",114,556
lsp 561,":a;system\gagee100.bmp",421,556
lsp 700,":a;chara\slime_st01.bmp",244,80
bg "bg\bg004.bmp",18,5000,"system\mask01.jpg"
textoff
textclear
bgm "bgm\battle.ogg"
name "Luka"
>Eh!???\
name ""
>Wh... why did it cut off at such an important time!?@
>It sounded like something important...\
name ""
lsp 700,":a;chara\slime_st03.bmp",244,80:print 10,500
name "Slime Girl"
>What's wrong? You're daydreaming...\
name ""
name "Luka"
>Eh? Oh... uh...\
name ""
>I collected my bearings and faced back to the Slime.@
>I know how to fight, there's no need to hesitate!\
>Here I go!\
r@k@\
lsp 700,":a;chara\slime_st01.bmp",244,80:print 10,500
goto *slime_start2



*sean0017

mov %skill01,1
bgm "bgm\hutuu1.ogg"
name "Luka"
r@k@\
>Haa.... Haa.... Haa....\
name ""
>After the Slime ran out of my sight I fell on the ground while dropping my sword, exhausted.\
>If the fight had gone on for another 30 seconds, I would have lost.@
>But I guess no matter what happened, in the end a victory is a victory!\
name "Luka"
>I... I did it.\
name ""
>My body started to tremble at the realization that I just defeated my first opponent.\
>Even if it was a sloppy fight, I was still able to protect my village...\
name "Luka"
>I'm also glad I chased her off without killing her...\
name ""
>I picked my sword back up and put it in my sheathe with a sigh of relief.\
>I don't want to actually kill monsters.@
>Rather, I think that humans and monsters should be able to live together.\
>That's why I'm determined to beat the Monster Lord!\
name "Luka"
>Should I go back to the village?@
>But today is my baptism day...\
name ""
>Today is the day that I'll receive my baptism and head out on my journey to defeat the Monster Lord.\
>Filled with renewed strength after my victory, and with thoughts of my coming adventure in my mind, I head back to the village.\
dwave 1,"se\asioto2.ogg"
sean_change "bg005"
name "Luka"
>Beating the Monster Lord, eh...\
name ""
>I stop walking and look up at the sky.\
>A long time ago, humans coexisted with monsters.@
>Monsters lived in human villages with men in harmony.\
>They still had some quarrels between the races at times...@
>But even then, it never turned into a serious conflict.\
>However, 30 years ago a huge incident occurred.@
>In Remina, a town near the Monster Lord's castle, there was a huge slaughter.\
>Monsters suddenly attacked the city, turning it into a scene from hell.@
>As a result, Remina was destroyed and only ruins remained.\
>A horrible tragedy that didn't leave a single survivor...@
>Ever since the [Slaughter of Remina], the relationship between Humanity and monsters changed.\
>They forced monsters out of human towns, and wild monsters started to attack people.\
>The Monster Lord who ruled over the other monsters declared war on Humanity.\
>Both sides had now come to hate each other.@
>...But the degree of that hate seems to vary by area.\
>Though there are locations that hold intense hatred, it's said that a few locations where man and monster coexist still remain.\
>Like the difference in areas, there are also some people who do not believe monsters are evil.\
>Saying that, there's no denying that humans and monsters were able to live together peacefully at one point in history.\
name "Luka"
>That's why I...!\
name ""
>If I'm able to defeat the Monster Lord who's forcing the monsters to do evil, I'm sure everything will go back to how it was before.\
>I'm sure man and monster will be able to coexist peacefully again.\
>For that reason, I will defeat the Monster Lord!@
>Even if it comes at the cost of my life!\
bgmstop
dwave 1,"se\bom1.ogg"
quake 10,2000
bg "bg\bg004.bmp",10,500
bgm "bgm\kiki2.ogg"
name "Luka"
>Wh... what was that!?\
name ""
>The sound of a large impact reverberates around the area, shaking the ground.@
>It sounds like something near me exploded.\
name "Luka"
>That sounded like it was close by... what the heck was it?\
name ""
>I ran to the source of the sound.\
dwave 1,"se\asioto1.ogg"
sean_change "bg006"
>Pushing through the trees, I head further into the forest.@
>Where I found...@
bgm "bgm\sinpi1.ogg"
lsp 700,":c;chara\alice_iv01.bmp",0,0:print 10,3000
>A beautiful woman, lying on the ground!\
name "Luka"
>Er... not quite.\
name ""
>Her lower half had a snake's tail, and even her skin...@
>There's no way she can be a human.\
>A monster...@
>Moreover, she seems like a really powerful monster...\
>Though I have no idea what happened, it seems like this monster girl fell... somehow.\
name "Luka"
>Uhm... Ms. Monster? Are you dead?\
name ""
>The strange monster lies there, unmoving.\
>The trees around her are destroyed, and even the ground is dented.@
>From the impact, it seems like she must have fallen from the sky.\
>Just what the hell happened here?\
name "Luka"
>Wh... what should I do...?@
>If she's still alive, if I don't help her...\
name ""
>Of course, I don't hate monsters.@
>Rather, a world where man and monster can coexist is my goal.\
>So even though she's a monster, I don't want to just leave her.@
>But today, I can't lose any more time...\
name "Luka"
>What should I do... I don't have much time.\
name ""
>Since today is my baptism day, I have to hurry to the Ilias temple.@
>I can only receive the baptism on noon of the [Day of Departure].\
>If you don't hold the ceremony at that time, there will never be another chance...\
>In other words, it's a once in a lifetime chance.@
>...But I still have some time before noon.\
>...But if I mess around, I might not make it in time.\
>I want to help but... maybe pretending like I never saw her would be better...\
goto *sean0017a



*sean0017a

if %continue=1 bgm "bgm\sinpi1.ogg"
if %continue=1 lsp 700,":c;chara\alice_iv01.bmp",0,0
if %continue=1 bg "bg\bg006.bmp",10,5000
if %continue=1 gosub *setwindow_01
mov %continue,0
name "Luka"
>Urgh... what should I do...\
>If I don't hurry...\
name ""
>After thinking about it, I...\
r@k@\
csel "Help",*sean0019,"Hurry on",*sean0019a



*sean0019a

name "Luka"
>I'll pretend I didn't see anything...\
name ""
>Today is a once in a lifetime chance after all.@
>It would be horrible to miss it due to some crazy monster falling from the sky.\
name "Luka"
>I'm sorry... I'm sure someone else will help you!\
name ""
eng "Although I feel guilty about leaving her here, I turn my back and hurry on.":$sel6/
dwave 1,"se\asioto2.ogg"
\
bgmstop
wait 1000
lsp 700,":c;chara\alice_iv02.bmp",0,0:print 10,500
name "Monster Girl"
>...............\
name ""
csp 700
mov %hanyo1,1
goto *sean0030b



*sean0019

name "Luka"
>If I just left her here, there's no way I could be a true hero...\
name ""
>I run up to the monster and check her face for signs of life.\
lsp 700,":c;chara\alice_iv02.bmp",0,0:print 10,500
name "Monster Girl"
>..........\
name ""
name "Luka"
>Eh...?\
name ""
bgmstop
print 10,1500
>Suddenly, the monster's eyes opened.@
>She stares intently at my face, and quickly jumps up.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,1500
name "Monster Girl"
>Where am I?\
name ""
>While staring directly at my face, she bluntly asks a question.\
name "Luka"
>Eh....?\
name ""
bgm "bgm\alice1.ogg"
name "Monster Girl"
>I said, "Where am I?"\
name ""
>Even though she asked in such a rude manner, I...\
r@k@\
mov %hanyo1,0
csel "Respond truthfully",*sean0023,"Lie",*sean0021,"Ignore her",*sean0020



*sean0020

name "Luka"
>..........\
name ""
>I don't say anything, and just stare at her face.\
mov %hanyo1,1
goto *sean0022



*sean0021

name "Luka"
>You're in heaven, you just died.\
name ""
>I tell a small lie.\
mov %hanyo1,2
goto *sean0022



*sean0022

name "Monster Girl"
>...........\
name ""
skillname "Eyes of Obedience"
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
>Suddenly, her eyes light up with a strange light.\
skillname ""
name "Monster Girl"
>I'll ask you again: Where am I?\
name ""
name "Luka"
>Cl... close to Ilias village, Miss Monster.\
name ""
>What the...@
>I unconsciously responded to her question!@
>...and why with "Miss Monster"?\
name ""
goto *sean0024



*sean0023

name "Luka"
>Err...@
>You're close to Ilias Village...\
name ""
>I was so taken in surprise that I answered honestly.\
goto *sean0024



*sean0024

lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Monster Girl"
>I was blown to such a place...@
>That damn girl... what crazy strength.\
name ""
name "Luka"
>Girl...?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Monster Girl"
>Anyway, who are you?\
name ""
>Ignoring my hesitation, she asks me another question. I...\
r@k@\
csel "Respond truthfully",*sean0030,"Lie",*sean0027,"Ignore her",*sean0025



*sean0025

name "Luka"
>...........\
name ""
>I stare at her, ignoring her question.\
name "Monster Girl"
>...........\
name ""
skillname "Eyes of Obedience"
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
if %hanyo1>0 skip 3
>Suddenly, her eyes light up with a strange light.\
skip 2
>Again, her eyes light up with that strange light.\
skillname ""
name "Monster Girl"
>Who are you?\
name ""
name "Luka"
>I'm just a lowly Hero apprentice from the nearby poor Ilias Village.\
name ""
if %hanyo1>0 skip 3
>What the...@>Why did I respond against my will!?@
skip 2
>What the...@>Again, I responded against my will!@
>...and in such a pathetic way, too!\
goto *sean0030a



*sean0027

name "Luka"
>Purupurupuru. I'm a Slime.\
name ""
>I told a small lie.\
name ""
name "Monster Girl"
>...........\
name ""
skillname "Eyes of Obedience"
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
if %hanyo1>0 skip 3
>Suddenly, a strange light fills her eyes.\
skip 2
>Again, her eyes light up with that strange light.\
skillname ""
name "Monster Girl"
>Again. Who are you?\
name ""
name "Luka"
>I'm just a lowly Hero apprentice from the nearby poor Ilias Village.\
name ""
if %hanyo1>0 skip 3
>What the...@>Why did I respond against my will!?@
skip 2
>What the...@>Again, I responded against my will!@
>...and in such a pathetic way, too!\
notif %hanyo1=2 goto *sean0030a
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Monster Girl"
>Don't say more than is necessary.\
>Saying stupid things... Just say [I'm from Ilias Village] from the very start.\
>Do you want to die right at the entrance to your own village?\
name ""
name "Luka"
>O... of course not.\
name ""
>Apparently she doesn't like jokes... I better watch my words.\
goto *sean0030a



*sean0030

name "Luka"
>I'm the Hero apprentice Luka, from the nearby Ilias Village...\
name ""
>I respond truthfully.\
goto *sean0030a



*sean0030a

mov %hanyo1,0
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Monster Girl"
>A Hero apprentice... so you haven't been baptized yet?@
>You do smell pretty delicious...\
name ""
>She licks her lips with a smack.@
>A chill runs down my spine.\
>Oh crap, that's right! I don't have time for this!\
name "Luka"
>That's right, the baptism! I have to get back before I'm late!\
name ""
>The monster girl doesn't seem to be injured at all, so I should get back quickly or else I might be late!\
name "Luka"
>Well... I'll be off then.\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Monster Girl"
>Stop.\
name ""
dwave 1,"se\ero_simetuke1.ogg"
>The monster's huge snake tail coils around my body!@
>I'm forcefully turned around to face her again.\
name "Monster Girl"
>Ahh, I understand your situation now.@
>Today is Ilias' birthday, so you're trying to receive your baptism.\
name ""
name "Luka"
>That's right... so... can you please let go of me?\
name ""
>Ever since deciding to be a Hero, I've looked forward to today.@
>I trained every day in preparation for my baptism... and today is finally the day!\
name "Monster Girl"
>Ilias' baptism... how foolish.\
name ""
name "Luka"
>Fo... foolish!?\
name ""
>Foolish...@
>She disregards my way of life in a single word.@
>At first I was angry, but now I'm somehow discouraged...\
>Even though she just met me, she already rejected my entire life up until now in such a haughty manner.\
name "Luka"
>Whatever... just...@
>Just let me go, alright?\
name ""
name "Monster Girl"
>..............\
name ""
>However, she keeps her tail coiled around my body, not letting go.\
name "Monster Girl"
>Why didn't you try to kill me when I was unconscious?\
name ""
name "Luka"
>Eh? K... kill you?\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Monster Girl"
>A golden opportunity for someone aiming to be a Hero... killing a monster like me.\
name ""
>I'm at a loss for how to respond to that...\
name "Luka"
>I didn't know if you were good or bad... there's no way I could just kill you like that.\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Monster Girl"
>Ho....@
>You don't see all monsters as an enemy?\
name ""
name "Luka"
>Certainly there are people who do...\
name ""
>But I'm different.@
>I don't hate monsters just because they are monsters.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Monster Girl"
>But you want to become a Hero.@
>Someone who doesn't treat all monsters as an enemy, why would you become a Hero, whose goal is to kill the Monster Lord?\
>Is it for fame? Ambition? Or...\
name ""
name "Luka"
>I don't want to be that kind of Hero...@
>I don't even particularly hate the Monster Lord.\
>I just want to stop her from doing evil things.\
name ""
>Man and monster fighting each other is wrong.@
>It's bad for both sides to be fighting like this...\
lsp 700,":a;chara\alice_st06b.bmp",67,0:print 10,500
name "Monster Girl"
>....What?\
name ""
name "Luka"
>I don't want to kill monsters or even the Monster Lord.@
>I want a world where man and monster can coexist peacefully!\
name ""
>If the Monster Lord gets in the way, then I'll just have to defeat her...@
>That's what I swore to myself!\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Monster Girl"
>...You're an idiot.\
name ""
name "Luka"
>Guh...\
name ""
>Her words pierced me through the chest.\
name "Luka"
>Why am I an idiot!?\
>I just want man and monster to...\
name ""
name "Monster Girl"
>Believing in an immature view of world peace, with everyone living in harmony peacefully with no issues...\
>What is that but idiotic?\
name ""
name "Luka"
>Uh... guh...\
name ""
>I couldn't respond with anything back...\
name "Monster Girl"
>A child who doesn't understand the world he's living in...\
>Monsters living hand-in-hand with humans?@
>When are you going to wake up from your dreaming?\
name ""
name "Luka"
>...But I...\
name ""
name "Monster Girl"
>I understand...@
>You still have the mind of a child.\
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
>Just go... little boy.\
name ""
>After chiding me like a child, she slowly released her tail around my body.\
name "Luka"
>Wh... what do you know!?@
>You idiot!\
name ""
dwave 1,"se\asioto1.ogg"
csp 700:print 10,1500
mov %2250,1
>While running away, I shouted that back at her.@
>...I might really be just a child...\
bgmstop
sean_change "bg004"
bgm "bgm\hutuu1.ogg"
name "Luka"
>Ah geez... what was that?\
name ""
>Anyway, just what was wrong with her?@
>I tried to help her, and all she did was insult me.\
name "Luka"
>She seemed really strong, though...\
name ""
>I let out a small sigh as I ran away.\
>No matter how much I struggled, I don't think I could have even scratched her.\
>Maybe she could even have been one of the Monster Lord's famous Four Heavenly Knights?\
name "Luka"
>I'll just forget about it...\
name ""
>I'll just forget about that monster girl and focus on Ilias.\
>That's right, today's going to be an amazing day!@
>The long awaited day where I'll finally become a Hero!\
name "Luka"
>Oh great Ilias!@
>I'll definitely beat the Monster Lord!\
name ""
>My change in thinking made my feet feel lighter as I continued on to the temple.\
mov %hanyo1,0
dwave 1,"se\asioto2.ogg"
goto *sean0030b



*sean0030b

bgmstop
sean_change "bg007"
bgm "bgm\mura1.ogg"
name "Luka"
>Huff... puff...\
name ""
>It's noon right now.\
>While exhausted from running, I reach the temple's steps, my face as lifeless as a zombie's.@
>My once in a lifetime baptism...\
>I cannot be late.@
>I was supposed to arrive timely before noon to go through the proceedings...\
lsp 700,":a;chara\mob_sinkan.bmp",0,0:print 10,500
name "Priest"
>Ilias isn't here.@
>She won't celebrate in your coming of age or baptise you. Go away.\
name ""
csp 700:print 10,500
name "Luka"
>A.... uh.... ah.....\
name ""
>The priest's words pierce through my chest.\
>Thus, I was unable to be baptized.@
>I missed the only chance I had...\
>There's no way I can become a Hero now...\
if %hanyo1=1 goto *sean0030d
if %hanyo1=0 goto *sean0030c



*sean0030d

bgmstop
sean_change "bg006"
bgm "bgm\sinpi1.ogg"
name "Luka"
>Ugg...@
>Where am I?\
name ""
>When I awoke from my stupor, it seems I had walked back into the forest.\
>This place... isn't this where that monster girl fell?\
>It was like I was unconsciously drawn here... what am I doing?\
name "Luka"
>My house... I need to go back...\
name ""
>While muttering that...@
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,3000
>The monster girl from before appeared before me.\
name "Luka"
>Y... you!\
name ""
>With the lower half of a snake, she was frightening and beautiful at the same time.\
>I wasn't able to forget about her after she fell here...@
>No matter what the circumstances were, I still left her...\
name "Luka"
>I'm glad you're okay.\
name ""
lsp 700,":a;chara\alice_st03.bmp",172,0:print 10,500
name "Monster Girl"
>How impudent.@
>You abandoned me here.\
name ""
name "Luka"
>Eh...?\
name ""
>She looks extremely angry...@
>Of course, that's only natural.\
name "Luka"
>Err... there was a good reason for that.\
name ""
name "Monster Girl"
>Leaving someone who looks like they are dying...@
>Your decision made me realize what I have to do.\
>From now on, I'll make humans fear me.@
>I'll start with eating you!\
name ""
goto *alice1_start



*sean0030c

name "Luka"
>Ahh.... urgh...\
name ""
lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
name "Adventurer"
>Oh no! Are you poisoned?@
>Please, use this antidote grass quickly!\
name ""
name "Luka"
>No... huff... I'm not poisoned...\
name ""
csp 700:print 10,500
>Even a strange adventurer is worried about how bad I look...@
>As I stagger away, I manage to make it home.\
csp -1:textoff
bg black,7,1500
lsp 700,":a;chara\alice_st01b.bmp",67,0
gosub *setwindow_01
bg "bg\bg002.bmp",7,1500
name "Monster Girl"
>You're slow.\
name ""
name "Luka"
eng "Wh... what??":$sel6/
bgm "bgm\comi1.ogg"
\
name ""
>What greeted me in my despair was that monster girl from before, in my house.\
>I responded...\
r@k@\
csel "Who are you?",*sean0031,"How did you find my house?",*sean0032,"Who am I?",*sean0034



*sean0031

if %hanyo1=1 goto *sean0031a
name "Luka"
>Who are you?\
name ""
name "Monster Girl"
>Oh, just a traveling monster...\
name ""
name "Luka"
>...What?\
name ""
>It doesn't seem like she's hostile towards me...@
>However, she's acting like she owns my house...\
mov %hanyo1,1
if %hanyo1=1 && %hanyo2=1 && %hanyo3=1 goto *sean0035
csel "How did you find my house?",*sean0032,"Why did you come here?",*sean0033,"Who am I?",*sean0034



*sean0031a

name "Luka"
>Who are you?\
name ""
name "Monster Girl"
>I said, I'm a traveling monster.\
>There is no need for anything more.\
name ""
csel "How did you find my house?",*sean0032,"Why did you come here?",*sean0033,"Who am I?",*sean0034



*sean0032

if %hanyo2=1 goto *sean0032a
name "Luka"
>How did you find my house?\
name ""
name "Monster Girl"
>By scent.@>Smelling your unsophisticated scent once was all it took.\
name ""
name "Luka"
>More importantly, how did a monster like you enter the village?\
name ""
>A low-level monster like the Slime caused such a huge panic.@
>How could such a strong looking monster have gone unnoticed?\
name "Monster Girl"
>It's easy to trick humans... just who do you think I am?\
name ""
name "Luka"
>I have no idea who you are...\
name ""
>Anyway, it seems like she has an amazing nose.\
mov %hanyo2,1
if %hanyo1=1 && %hanyo2=1 && %hanyo3=1 goto *sean0035
csel "Who are you?",*sean0031,"Why did you come here?",*sean0033,"Who am I?",*sean0034



*sean0032a

name "Luka"
>How did you find my house?\
name ""
name "Monster Girl"
>Like I just said, I followed your smell.\
name ""
csel "Who are You?",*sean0031,"Why did you come here?",*sean0033,"Who am I?",*sean0034



*sean0033

if %hanyo3=1 goto *sean0033a
name "Luka"
>Why did you come here?\
name ""
name "Monster Girl"
>Well... I was just interested.@
>There's also something I want to confirm...\
name ""
name "Luka"
>Eh...?\
name ""
>I had no idea how to respond to that...\
name ""
mov %hanyo3,1
if %hanyo1=1 && %hanyo2=1 && %hanyo3=1 goto *sean0035
csel "Who are you?",*sean0031,"How did you find my house?",*sean0032,"Who am I?",*sean0034



*sean0033a

name "Luka"
>Why did you come here?\
name ""
name "Monster Girl"
>I won't answer the same question twice.\
name ""
csel "Who are you?",*sean0031,"How did you find my house?",*sean0032,"Who am I?",*sean0034



*sean0034

if %hanyo4=1 goto *sean0034a
name "Luka"
>Who am I?\
name ""
name "Monster Girl"
>...How the hell would I know?\
name ""
>...I guess that's true.\
name "Monster Girl"
>You're a bigger idiot than I thought.\
name ""
>I guess she still thinks I'm an idiot...\
mov %hanyo4,1
if %hanyo1=1 && %hanyo2=1 && %hanyo3=1 goto *sean0035
csel "Who are you?",*sean0031,"How did you find my house?",*sean0032,"Why did you come here?",*sean0033



*sean0034a

name "Luka"
>Who am I?\
name ""
name "Monster Girl"
>Are you broken or something?\
name ""
csel "Who are you?",*sean0031,"How did you find my house?",*sean0032,"Why did you come here?",*sean0033



*sean0035

mov %hanyo1,0
mov %hanyo2,0
mov %hanyo3,0
mov %hanyo4,0
name "Luka"
>..............\
name ""
>I still don't understand anything...@
>She was so disgusted with me before, but now she seems so much different.\
name "Luka"
>Anyway, this isn't good.@
>I can't let my neighbors see a monster in my house.\
name ""
>With the Ilias Temple nearby, this village hates monsters.@
>Finding out that one is in my house would be very bad...\
name "Luka"
>...Why are you here, anyway?\
>I'm already depressed since I couldn't receive my baptism...@
>If you came to make fun of me more...\
name ""
name "Monster Girl"
>Hah... hearing that was one of the reasons I came.@
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
>So, Ilias didn't appear for your baptism...\
name ""
>As if gloating, she had a strange smile on her face.\
name "Monster Girl"
>I owed her for giving me so many wounds...@
>[Goddess that Created the World]... how stupid.\
name ""
name "Luka"
>Eh...? What do you mean?\
name ""
>Does Ilias not being at the temple for my baptism have something to do with her?\
name "Luka"
>You... what did you do...?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Monster Girl"
>Food.\
name ""
name "Luka"
>Huh?\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Monster Girl"
>Get me some food.@>Make yourself useful.\
name ""
name "Luka"
>..........\
name ""
>What the hell is wrong with her...@
>What did I do to deserve this...\
r@k@\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
csel "Fine, I'll make something",*sean0036,"Get it yourself",*sean0037



*sean0036

name "Luka"
>I guess I have no choice...\
name ""
>She seemed like she would be scary if I made her mad, so I decided to just get something for her.\
name ""
>However, because I was going to leave here after being baptized, I don't have anything to eat in my house.\
name ""
>I stand in my empty kitchen.@
>I had decided not to come back to this house until after I had defeated the Monster Lord...\
goto *sean0038



*sean0037

name "Luka"
>Are you kidding? Get something yourself.\
name ""
name "Monster Girl"
>.............\
name ""
skillname "Eyes of Obedience"
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
>Suddenly, her eyes light up with a strange light.\
skillname ""
name "Monster Girl"
>Get me something to eat.\
name ""
name "Luka"
>Of course. Please wait a moment!\
name ""
>I have to cook something delicious for her.@
>That's why I was born, after all.@
>Yes, that's my fate.\
>I stand in the kitchen, and stop.\
name "Monster Girl"
>Hmm... what's wrong?\
>Don't tell me... he's able to resist my magic...?\
name ""
name "Luka"
>N... nothing!@
>No food, no utensils... nothing!\
name ""
>Because I was going to leave after my baptism, I didn't have anything in the kitchen...\
name ""
>I'm in despair!@
>I start crying uncontrollably, tears flowing down my face.\
name "Luka"
>This is the worst thing to ever happen in my life!@
>I won't be able to feed you like this...\
name ""
name "Luka"
>The only way to make amends is to cut open my stomach.\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Monster Girl"
>Stop that, you idiot!\
name ""
>She snaps her fingers...@
>...and suddenly I can think clearly again!\
>My overwhelming despair from before seems like an illusion.@
>It felt like I got tricked or something...\
name "Luka"
>Oi. What did you just do?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Monster Girl"
>I didn't do anything... isn't there any food?@
>I'm so hungry, I'm going crazy over here.\
name ""
name "Luka"
>Sorry to say, but I wasn't planning on returning to this house for a while...\
name ""
goto *sean0038



*sean0038

>Luckily, I was carrying something on me as emergency rations.\
name "Luka"
>Dried meat...\
name ""
name "Monster Girl"
>Dried meat...\
name ""
>She lets out a sigh.\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Monster Girl"
>You make me sick...\
name ""
>How rude.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Monster Girl"
>Oh well, I'm tired... I'll just have it as an appetizer I guess.\
name ""
>She grabs the meat from my hand, and chews it with an unhappy look on her face.\
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Monster Girl"
>Hmm....@>It's not too bad after all.\
>The seasonings and spices were done well... it compliments the meat.\
name ""
name "Luka"
>Really? I practiced how to cook in preparation for my journey.@
>I'll need to know how to cook for when I set up camp...@>though I wasn't able to become a Hero...\
name ""
>Discouraged, my shoulders drop.@
>Training in swordplay and cooking... was it all just pointless?\
name "Monster Girl"
>Hmm... oh well.@>I guess I'm fine with just the appetizer.\
>I guess the main dish won't be necessary.\
name ""
name "Luka"
>Eh...? Main dish?\
name ""
>She knows all I had was the dried meat.@
>What was she expecting the main dish to be...?\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Monster Girl"
>...........\
name ""
>The stare she gives me sends goosebumps down my back.\
>Ah. So that's what she meant by main dish...@
>After the dried meat would be human meat...\
>My body starts to shiver.\
name "Luka"
>So, why else did you come here?@>Are you going to make fun of me for not becoming a Hero?\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Monster Girl"
>Hrm... I guess I said too much earlier.\
>You just sounded so childish...@>I couldn't help myself.\
>That's why I wanted to clear the air on something.\
>I've traveled around the world and seen plenty of things. While your childishness is idiotic...@
>It's a good thing.\
name ""
name "Luka"
>...........\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Monster Girl"
>What? I'm comforting you. What's with that face?\
name ""
name "Luka"
>Eh? C... Comforting!?\
name ""
name "Monster Girl"
>Anyway, what are you going to do after this?@
>Surely you aren't going to give up on going on a journey?\
name ""
name "Luka"
>Just as I planned, I'm going to defeat the Monster Lord.@
>Even if I'm not a hero, I'll still leave.\
name ""
>It doesn't have to be a hero that defeats the Monster Lord...\
>Even a traveler could do it...@> I'll just have to believe that.@
>Otherwise I'll be crushed under my depression...\
>Going out on my journey without the blessing of Ilias makes me uneasy...@
>But I guess there's no helping it.\
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Monster"
>Hahaha... that's good.@
>In fact, I'm a little interested in you...\
name ""
name "Luka"
>Interested? ...In me?\
name ""
name "Monster Girl"
>That's right. You're interesting.\
>You're able to say such a ridiculous thing as "I want monsters and humans to coexist" so confidently.\
name ""
name "Luka"
>It isn't ridiculous.@> I'll truly make it happen!\
>I'll definitely show you it can be done!\
name ""
name "Monster Girl"
>Hahaha...@
>How long can you hold onto that belief?\
>I'll follow you while you travel to watch when that delusion wears off.\
name ""
name "Luka"
>Eh? On my journey...?\
name ""
>What is she saying? Follow me on my journey?@
>Just what is she trying to pull...?\
name "Monster Girl"
>I was going to travel around the world...@
>I might as well travel around it with you.\
name ""
name "Luka"
>...Do whatever you want.@
>Even if I said no, I wouldn't be able to drive you off, would I?\
name ""
name "Monster Girl"
>Ah, that wouldn't be possible.@
>With your power, there's no way you would be able to drive me off.\
name ""
name "Luka"
>...........\
name ""
>It's sad, but she's right.\
>Besides...@> I'm a little relieved to have a companion with me.\
>A journey by myself would be a little lonely.\
name "Luka"
>Well then... follow me around as you like.@
>I'll prove to you that my conviction is real.\
>By the way, what's your name?\
name ""
name "Monster Girl"
>Alipheese Fateburn.@
name "Monster Girl"
>But I'll allow you to call me [Alice].\
name ""
mov %2250,2
name "Luka"
>Alice?@> That doesn't really fit you...\
name ""
>[Alice] is way too cute of a name for her. It doesn't suit her image at all...\
>A name that would strike fear into someone seems like it would be better..\
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>Do you want me to strangle you?\
name ""
name "Luka"
>Ack! Sorry...\
name ""
>Seeing her tail coil around threateningly, I quickly apologize.\
>I don't know why, but my depression from before seems to have vanished.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
bgm "bgm\mura1.ogg"
name "Luka"
>Well then... shall we head out?\
name ""
>I had already finished my preparations for my journey.@
>When I returned from Ilias temple, I was going to set out immediately.\
>I wasn't able to receive my baptism...@
>But I'm still going to set out on a journey!\
>I'll either beat the Monster Lord, or die trying.@
>There's no other path for me!\
name "Luka"
>Alice, can you go out the back door?@
>If the villagers see you, there will be chaos.\
>We can meet back up once we're outside the village.\
name ""
name "Alice"
>That's fine, causing a commotion would give me a headache.@
>I'll wait outside of the village.\
name ""
dwave 1,"se\escape.ogg"
csp 700
print 10,1000
>Saying that, she heads out the back door.\
name "Luka"
>Well then...\
name ""
>I'm finally ready to leave this house...@
>The house I grew up in with my mother... I won't return here for a long time.\
name "Luka"
>I'm heading out, Mother...\
name ""
>As I said goodbye to my mother, I step out of the house.@
>I'm about to start the first part of my journey!\
>But before that, should I say goodbye to the villagers?\
r@k@\
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\asioto2.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg003.bmp",7,1500
gosub *city01_main
gosub *setwindow_01p
name "Luka"
>Alright... time to head out!\
name ""
r@k@\
name ""
>With that, I take the first step of my journey.@
>The next time I come back here, I'll have defeated the Monster Lord!\
name ""
dwave 1,"se\asioto2.ogg"
sean_change "bg008"
bgm "bgm\field1.ogg"
name "Luka"
>But I wonder why I couldn't have been baptized...\
name ""
>I silently complain to myself as I head out on the main road.\
>I couldn't really have been abandoned by Ilias, could I?@
>Was it really only a dream this morning?\
>If that's true, this journey probably isn't a smart idea...@
>As I push off that thought, Alice suddenly appears in front of me.\
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Alice"
>Hmm? What's wrong?\
name ""
name "Luka"
>Nothing...\
name ""
>What's with her?@
>"I might as well travel around the world with you" she said. Am I really that interesting?\
>I don't really get where she's coming from...@
>Half of me is glad that I won't be alone.@>But the other half has a nagging feeling like I just picked up some troublesome luggage...\
name "Luka"
>Oh Ilias...@>Did you really abandon me?\
>I waited for today for so long... and I wasn't able to be baptized in the end....\
name ""
name "Alice"
>Isn't it better to not have been baptized?@
>I don't understand why humans want to be slaves to Ilias.\
name ""
name "Luka"
>Being a Hero has a lot of perks, you know.@
>You get the respect of the people, cheap rates at Inns, and you can even walk into people's houses and take stuff.\
name ""
name "Alice"
>Walk into people's houses and take things...?@>Are you a thief or something?\
name ""
name "Luka"
>Er no... it's not quite like that.\
name ""
>She's right though.@>There have been some who have abused that privilege...\
>I don't think someone like that is a true Hero, though.\
name "Luka"
>But most importantly, they get the divine protection from Ilias.@
>If you come across any evil monsters, she will defend you.\
name ""
lsp 700,":a;chara\alice_st04.bmp",172,0:print 10,500
name "Alice"
>The semen of a baptized human tastes awful.@
>So monsters aren't as likely to attack them.\
name ""
name "Luka"
>Ehh... is that how it works?\
name ""
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Alice"
>...You didn't know that?@
>Baptized people taste like Angel Liver... not very appetizing.\
name ""
name "Luka"
>........\
name ""
>That statement brought a lot of questions to mind.\
>Angel Liver tastes bad?@
>Alice has eaten it before?@
>Well, I probably shouldn't even ask.\
>I don't think I'd like the answer...\
lsp 700,":a;chara\alice_st02.bmp",172,0:print 10,500
name "Alice"
>That's why someone like you smells delicious.\
name ""
>Alice licks her lips as she stares at me.\
name "Luka"
>Hii....\
name ""
>A chill runs down my spine again.@
>I wonder if I can survive this journey...\
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Alice"
>By the way, where are you headed?@>Going directly for the Monster Lord's castle?\
name ""
name "Luka"
>Well... I'll end up there eventually.\
name ""
>The Monster Lord's castle is extremely far from here.@
>It's pretty convenient, actually.\
>There's no way I'd be able to fight against the Monster Lord as I am now, so I'll be able to level up on my way there.\
name "Luka"
>Right now we're a little bit north of Ilias Village...\
csp -1
gosub *setwindow_01
bg "bg\map0.bmp",10,1000
>There are three continents in our world.@
eng "First, in the south, is the continent called Ilias.":$sel6/
lsp 601,":s/20,20,0;#FF4444Ilias Continent ",510,335:print 10,500
@
>That's where we are right now.@
>It's not too big, but it's my hometown.\
>Since the Ilias Temple is here, pilgrims always come here on their travels.\
>However, they haven't been coming by as often recently...@
>Is their faith weakening or something? Or maybe there are other circumstances? I don't really know.\
eng "And in the middle here is Sentora.":$sel6/
lsp 602,":s/20,20,0;#FF4444Sentora Continent ",325,200:print 10,500
@
>Filling up 75% of the world's land, this continent is huge.\
>There are four big castles, and many more towns and villages.\
eng "North of that is Hellgondo, where the Monster Lord's castle is.":$sel6/
lsp 603,":s/20,20,0;#FF4444Hellgondo Continent ",300,40:print 10,500
@
>The temperature there is extreme - an unsuitable place for humans.\
>Ever since the [Slaughter of Remina], humans have abandoned their settlements in this area.\
>Now there aren't any humans left on this continent.@
>So that sums up the three continents in my world.\
csp -1
gosub *setwindow_01
lsp 700,":a;chara\alice_st01.bmp",172,0
bg "bg\bg008.bmp",10,1000
name "Luka"
>For now, we'll stay on this continent.\
name ""
>North of here is the biggest city on this continent, Iliasburg.@
>Further north of that is the only port on this continent, Iliasport.\
>From there I can take a ship to Sentora.\
>First of all, we should head to Iliasburg and prepare.@
>We'll need to stock up on equipment, tools, food and such.\
>After that, we'll get a ship at Iliasport to head to Sentora.\
name "Luka"
>Today's destination will be Iliasburg.@
>If we keep up our current pace, we'll be there around this time tomorrow.\
name ""
lsp 700,":a;chara\alice_st04.bmp",172,0:print 10,500
name "Alice"
>Oh come on.@>Iliasburg, Iliasport, Ilias Village, IliasIliasIlias.\
>What's with all the cheesy names?\
name ""
name "Luka"
>Why is everything that comes out of your mouth so horrible?\
name ""
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Alice"
>Don't use that tone with me.@
>More importantly, I'm hungry again.\
name ""
name "Luka"
>Didn't you just eat all my dried meat a little while ago?@
>We'll set up camp once the sun goes down, so just hold out until then.\
name ""
name "Alice"
>You better make an effort at it tonight.@> You aren't too bad at cooking, after all.\
name ""
name "Luka"
>...........\
name ""
csp 700:print 10,500
>I think I really did pick up something really annoying...@
>As I thought that, suddenly...\
r@k@\
goto *name_start



*sean0039

bgm "bgm\field1.ogg"
name "Luka"
>I won!\
name ""
r@k@\
>I won against another monster...\
>Like the Slime, it was kind of sloppy...@> But a victory is a victory!\
lsp 700,":a;chara\alice_st04.bmp",172,0:print 10,500
name "Alice"
>...What a pathetic looking fight.\
name ""
name "Luka"
>Oh... Alice?\
name ""
>Before I noticed, Alice had reappeared.\
name "Luka"
>Where did you run off to?@
>You couldn't have been scared of that Slug, right?\
name ""
lsp 700,":a;chara\alice_st03.bmp",172,0:print 10,500
name "Alice"
>I didn't "run" anywhere!@
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
>I just don't want other monsters to see me.\
name ""
name "Luka"
>Hmm... is that so?\
name ""
>She seems to have some circumstances of her own...\
name "Alice"
>Anyway, you made a huge mistake in your fight.\
name ""
name "Luka"
>Mistake?\
name ""
>Even though the fight was pretty sloppy, I don't think I made any mistakes...\
lsp 700,":a;chara\alice_st03.bmp",172,0:print 10,500
name "Alice"
>You threw out all the salt for tonight's dinner...@
>How are you going to season it effectively!?\
name ""
name "Luka"
>I couldn't help it!@
>I was desperate...\
name ""
lsp 700,":a;chara\alice_st04.bmp",172,0:print 10,500
name "Alice"
>Using up all our salt on a monster...@>Some Hero you are.\
>Oh, sorry!@> I mean imitation Hero.\
name ""
name "Luka"
>Grrrr....\
name ""
>The fight was pretty sloppy, I didn't have a good answer to shoot back.\
>It's true I'm not baptized, and still going out on a journey...@>So in that sense, I am an imitation Hero...\
name "Luka"
>If you were watching, you could have helped out.\
name ""
lsp 700,":a;chara\alice_st03.bmp",172,0:print 10,500
name "Alice"
>Don't be hasty. I'm not your companion or your ally.@
>I'm just observing you.\
>So if you become a monster's food, I'll just abandon you.\
name ""
name "Luka"
>...I get it.@
>I don't need your help anyway!\
name ""
lsp 700,":a;chara\alice_st04.bmp",172,0:print 10,500
name "Alice"
>I'm glad you understand, just do what you can.@
>Now, more importantly, it's almost time to set up camp.\
lsp 700,":a;chara\alice_st02.bmp",172,0:print 10,500
>By the way, what are we having for dinner?\
name ""
name "Luka"
>...............\
name ""
>Even if she isn't my companion or ally, she still expects to be fed.@
>What a worthless person to travel with.\
csp 700
bgmstop
sean_change "bg009"
bgm "bgm\yaei.ogg"
name "Luka"
>Ah! I'm stuffed...\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>Hmm... even without salt, you were still able to make something good.\
name ""
>Bread and an omelette, with wild grass salad.@
>I'm glad Alice gave an actual compliment for once.\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>If only you were as good with your sword...\
name ""
>Right after a compliment, of course she would have to give an insult.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Where did you learn your technique?@
>It's so horrible, it pains me to watch.\
name ""
>Horrible technique?@
>I practiced every single day... and she calls it horrible?\
name "Luka"
>What are you saying, Alice...@
>I've been training for more than five years...\
name ""
name "Alice"
>Five years? I thought it was your first time...@
>Just what were you wasting your time doing?\
name ""
name "Luka"
>I learned it from pilgrims who came to visit the temple.@
>I mixed the different things into my own style...\
name ""
>Even though there aren't as many pilgrims recently, there were a lot in the past.\
>I let them stay at my place, and in turn they would teach me how to use a sword.\
name "Alice"
>Crappy skills learned from crappy people will be crappy even if combined.@
>Alright, I'll teach you a little.\
name ""
name "Luka"
>It's alright, you don't need to...@
>Learning swordplay from a monster seems odd, too.\
name ""
name "Alice"
>Is that discrimination?@
>"I want to coexist with monsters", but you don't want to train with one?\
name ""
name "Luka"
>No, that's not really what I was saying...\
name ""
>It's true what she said...@> Could I be unconsciously discriminating against monsters?\
>I can't have any bias in my mind...@>I also want to be even stronger!\
name "Luka"
>Alright... please teach me.\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>Good.@
>I'm not your ally, but it would be pretty boring if you got eaten quickly.\
>I'll train you to fight against monsters.\
name ""
name "Luka"
>P... please do...\
name ""
>For a few hours before going to sleep, I practiced some with Alice.\
sean_change "bg009"
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Right there, you need to use your feet as you swing.@
>Don't just use your arm strength when you swing your sword.\
name ""
name "Luka"
eng "L... like this?":$sel6/
dwave 1,"se\miss.ogg"
\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>Hm. Not bad.\
name ""
>Using my feet like that, I don't need to rely so much on brute strength... not too bad for someone small like me.\
dwave 1,"se\fanfale.ogg"
mov %skill01,2
>[Demon Decapitation] was mastered!\
name "Alice"
>[Demon Decapitation]...\
>This is the best technique for someone small like you.\
>A small body is good for when you charge in, and cut the enemy's neck.\
>It's said that the Dark Elf Zack was able to cut off the heads of 100 humans using that move.\
name ""
name "Luka"
>Err...@
>I was hoping you could teach me a more... Hero like technique.\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Beggars can't be choosers.\
name ""
name "Luka"
>That's... true.@>But my image as a Hero...\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>Shut up.@> We're practicing it right now, whether you want to or not.\
name ""
name "Luka"
>Ehhh...!?\
r@k@\
name ""
mov $name,"Alice"
mov $name2,"Alice"
mov $tatie1,"alice_st01"
mov %monster_x,172
mov %monster_y,0
mov %max_enemylife,32000
mov %damage_keigen,100
mov %alice_skill,0
mov %music,1
gosub *maxmp:mov %mp,2
gosub *syutugen2
goto *sean0039a



*sean0039a

name "Alice"
>Do you see the two yellow marks under your HP gauge?@
>Those are your SPs.\
name "Luka"
>SP?@>Super points?\
name ""
name "Alice"
>You idiot.@> They're your skill points.\
>You're sucky at fighting, so you only have two.\
>Once you use a skill, it will consume them. For now, try selecting "Skill".\
name ""
goto *sean0039b



*sean0039b

mov %stopcmd1,1
mov %stopcmd2,1
mov %stopcmd3,1
mov %stopcmd4,1
mov %stopcmd5,1
mov %stopcmd6,1
gosub *cmd_main
if %cmd1=17 goto *sean0039c
goto *sean0039b



*sean0039c

name "Alice"
>You will see all of the skills you currently know.@> Though right now, you only know two.\
>No, only one.@>"Flail Wildly" isn't a skill. It's the complete insult for any sword user.\
>Also, make sure you check the number after the skill's name.@> Now, give it a try.\
name ""
>Actually I have three skills now.\
goto *sean0039d



*sean0039d

gosub *cmd_skill
if %cmd1=21 goto *sean0039e
if %cmd1=22 goto *sean0039d1
if %cmd1=35 goto *sean0039d2
goto *sean0039d



*sean0039d1

>She will kill me if I use this skill now...\
goto *sean0039d



*sean0039d2

rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Drive myself into a corner...!"
if %ransu=2 mov $sel1,"This is my way of fighting...!"
if %ransu=3 mov $sel1,"Even at the edge, I won't falter!"
name "Luka"
eng $sel1:$sel6\
name ""
skillname "Edging"
eng $ori_name+" focuses the mind carefully..."
$sel6@
dwave 2,"se\down2.ogg"
eng $ori_name+"'s vitality sharply decreases!"
$sel6/
mov %mylife,1
mov %gage,%mylife*100/%max_mylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 560,":a;system\gager"+$gagenum+".bmp",114,556
gosub *hp
print 10,500
\
skillname ""
name "Alice"
>And what you did now?@
>Any attack will finish you after this "Edging".\
>Not one but two crappy skills. I'm amused...\
name ""
goto *sean0039d



*sean0039e

name "Luka"
>Like this...?@
>Ha! Demon Decapitation!\
name ""
mov %mp,%mp-2
gosub *mp
skillname "Demon Decapitation"
>Luka jumps in, and quickly slashes at Alice's neck!
dwave 1,"se\karaburi.ogg"
gosub *kaihi
>Miss!\
skillname ""
lsp 700,":a;chara\alice_st04.bmp",172,0:print 10,500
name "Alice"
>Did you actually think you would hit me? Idiot.\
name ""
name "Luka"
>............\
name ""
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Alice"
>Did you notice that the two yellow circles disappeared?\
name ""
name "Luka"
>You're right... they're gone.\
name ""
name "Alice"
>When you chose your skill, did you see the [2] at the end?@
>That's how many SP the skill will take to use.\
>Since you suck at fighting, you only have two at the moment.@
>Enough to use a single skill.\
name ""
name "Luka"
>So if I get better, I'll have more than two points eventually?\
name ""
name "Alice"
>Correct. If you level up, your maximum SP can increase too.\
name ""
name "Luka"
>Is that how it works...\
name ""
>So once I get more SP, I can use more skills back to back.\
name "Alice"
>Once you get more techniques, the stronger moves will require more SP.\
>In addition, whenever you select [Attack], you will regain one SP.\
name ""
name "Alice"
>[Guard], and other actions, won't recharge your SP.\
>Only by attacking can you increase your fighting spirit.\
name ""
name "Luka"
>I see!\
name ""
name "Alice"
>When you start in combat, your SP will usually be at maximum.@
>Sometimes you may get caught by surprise, and not have any...\
>In that case, you won't be able to use a skill right away.\
>Also, it's important to remember:@>Using a skill takes concentration, so if you're afflicted with a bad status, or are bound, you won't be able to use a skill.\
>Do you understand how to use skills now?\
name ""
csel "I do",*sean0039g,"One more time",*sean0039f



*sean0039f

name "Luka"
>Go over it one more time, please.\
name ""
name "Alice"
>I thought even an idiot like you would have understood after hearing it once...\
name ""
mov %mp,2
gosub *mp
goto *sean0039a



*sean0039g

name "Luka"
>I got it!\
name ""
name "Alice"
>Alright, leaving skills behind, let's move onto Guarding.\
>When you guard, you put up your guard and sit there defending yourself like a turtle, right?\
name ""
name "Luka"
>That's right...\
name ""
name "Alice"
>And that is how an idiot defends himself.\
>An expert would guard himself by combining both defense and evasion.\
>Reducing damage is good, but avoiding it completely is better.\
name ""
name "Luka"
>Oh... I get it!\
name ""
name "Alice"
>That's why, when you see an enemy using their strongest attack, make sure you [Guard].\
>You won't only reduce damage, but have a chance at completely evading it.\
>Many monsters give signals when they are going to use their most powerful attacks.\
>You will usually have one turn before they unleash it, so use that time wisely to prepare to defend.\
name ""
name "Luka"
>I get it... this is useful stuff!\
name ""
>When the enemy uses their strongest attack, Guard. I'll remember that.\
lsp 700,":a;chara\alice_st04.bmp",172,0:print 10,500
name "Alice"
>Let's end tonight's training at that, then.\
name ""
bgm "bgm\yaei.ogg"
gosub *clear_sprite
gosub *setwindow_01p
>After learning many new things, the training ended.\
sean_change "bg009"
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Luka"
>Alice, are you not going to use a sleeping bag?\
name ""
name "Alice"
>I don't want to be covered by something so restrictive... I'll just sleep here.\
name ""
>Alice coils herself around a nearby tree.\
>Is she really going to spend the night like that?@>Oh well, I guess she knows what she likes.\
>I slip into my sleeping bag.\
name "Alice"
>By the way, idiot.@> Where did you get that ring?\
name ""
>Alice asks, while staring at the ring on my finger.@
>My mother's keepsake...\
name "Luka"
>You can't eat this, Alice.\
name ""
name "Alice"
>Idiot... what the hell do you think goes on in my mind?\
name ""
name "Luka"
>It's just that you're always complaining about how hungry you are...\
name ""
name "Alice"
>Idiot.\
>I feel something faint from that ring...\
name ""
name "Luka"
>Something faint?@
>I don't know what you're talking about... this is my mother's keepsake.\
>Ten years ago, she died of an illness...\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>I see... I'm sorry to hear about that.\
name ""
name "Luka"
>Eh?@
>Ah... thanks...\
name ""
>I was surprised that she said something nice.@
>I thought she would call me weak for clinging onto something like that.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>What's with the surprised look on your face?@
>We're the same as humans in that respect. We both are sad when a parent dies.\
name ""
name "Luka"
>Of couse... that's right.\
name ""
name "Alice"
>How about your father?@> Is he still alive?\
name ""
name "Luka"
>No...@
>He died before my mother did...\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>Ah... I see.@
>Your father went off to fight the Monster Lord, and never came back.\
>That's why you took up your father's wishes, and trained to be a Hero.@
>Did I get it right?\
name ""
name "Luka"
>Sorry, but you're wrong.\
name ""
>My father wasn't a Hero at all...\
name "Luka"
>That guy died because of his own stupid mistakes...\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Hmmm... that's unusual.@
>Someone whose head is filled with sugar and rainbows, to say something like that...\
name ""
name "Luka"
>Enough about me, what about you?@
>Why are you here?\
name ""
>If she wanted to eat me, she already would have done it.@
>Someone strong like her, I wouldn't stand a chance.\
>I don't see what she's after here...\
lsp 700,":a;chara\alice_st08b.bmp",67,0:print 10,500
name "Alice"
>I'm...\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
>I'm the only daughter of the Fateburn family.@
>I wanted to see the world, so I set out a few days ago.\
name ""
name "Luka"
>Really?\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>Basically.\
name ""
>Alice grins and starts laughing, as if she's hiding something...\
name "Luka"
>You couldn't possibly...@> You aren't inspecting the human cities in preparation for an invasion... are you?\
name ""
name "Alice"
>Hahaha... what an interesting idea.\
name ""
name "Alice"
>Look at this book!@
>This forbidden book contains everything about the human world.@
>Geography, environment, food... it has it all!\
name ""
name "Luka"
>Ah... the Traveling Guild's [World Traveler] tour guide...\
name ""
>It's a book containing all the places to sightsee, including local delicacies and such.\
>Adventurers, foodies, and sightseers all love this book.\
name "Luka"
>What the! This book is marked year 867!@
>This book is 500 years old!\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Oh? I thought it looked a little old.\
name ""
>A "little old"?@
>Half the towns and villages listed in here don't even exist anymore.\
name "Luka"
>That's amazing... this is like a piece of history.@
>I wonder how much you could sell this book for...\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>I'm not selling it, you idiot.\
name ""
>...too bad.@
>If we sold that book, we wouldn't ever have an issue with traveling expenses...\
name "Luka"
>Anyway, it's about time to go to sleep.@
>Faa... I'm exhausted after today.@>Good night, Alice.\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Uh-huh.\
name ""
>A lot happened today...@
>I was so exhausted, I instantly fell asleep.\
r@k@\
mov %item01,2
bgmstop
textoff
csp -1
bg black,99,5000,"system\lngtwave.dll/vwi"
bg "bg\bg001.bmp",99,5000,"system\lngtwave.dll/vwi"
wait 1500
gosub *setwindow_01
name "???"
>Luka...@
>Oh brave Luka...\
name ""
name "Luka"
>H... hmmm...?\
name ""
>I hear a voice calling me from somewhere...@
>This is...\
bgm "bgm\irias.ogg"
lsp 700,":a;chara\iriasu_st01.bmp",0,0
print 10,3000
name "Luka"
>Il... Ilias!?\
name ""
name "Ilias"
>Luka... you aren't baptized, and remain unblessed.@
>However, never lose faith in yourself.\
name ""
name "Luka"
>Ilias...@
>Just what do you mean...?\
name ""
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
name "Ilias"
>Luka... unblessed Hero Luka...@
>I'll always be watching you...\
name ""
bgmstop
textoff
csp -1
bg black,99,5000,"system\lngtwave.dll/vwi"
bg "bg\bg010.bmp",99,5000,"system\lngtwave.dll/vwi"
wait 500
bgm "bgm\hutuu1.ogg"
dwave 1,"se\morning.ogg"
wait 1500
gosub *setwindow_01p
name "Luka"
>I... Ilias!\
name ""
>With a shout, I jump out of my sleeping bag.@
>Was that just another dream...?\
>No... like yesterday, that wasn't just a normal dream.@
>Does that mean Ilias hasn't abandoned me!?\
name "Luka"
>Alright! I can do it!\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,1500
name "Alice"
>Uhg, what's with all this noise so early in the morning...\
name ""
>Still coiled around the tree, Alice rubs her sleep filled eyes.\
name "Alice"
>Whatever... make me something to eat.\
name ""
name "Luka"
>.............\
name ""
>She doesn't think of anything but food, does she?\
sean_change "bg010"
name "Luka"
>Ahh... that was tasty.\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,1500
name "Alice"
>Hm. I agree.\
name ""
>Thus we finished our breakfast of bread, salad, and fried eggs.\
>We'll be short on ingredients until we make it to Iliasburg tonight.\
>Once we get to a hotel, we can fill back up.\
name "Luka"
>Oh great Ilias... please give me your blessing today, as well.\
name ""
>I mustn't forget my prayers after breakfast.@
>Today's another wonderful day, thanks to Ilias.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Already saying stupid things so early in the day?\
name ""
name "Luka"
>I'm just giving my thanks to Ilias.@
>One of Ilias' five commandments is to be dutiful in your prayers.\
name ""
>Especially for someone on a journey like me.@> I have to make sure I have her protection.\
name "Alice"
>Five commandments...? Ilias likes to force people to do stupid things, huh?\
>And to do those stupid things so happily...@
>Do you really like being her slave?\
name ""
name "Luka"
>...........\
name ""
>She has another hate-filled expression on her face just like yesterday.@
>It seems like she hates Ilias...\
name "Alice"
>Besides, doesn't Ilias hate monsters?@
>Doesn't that go against what you believe in?\
name ""
name "Luka"
>Even if that's the case...\
name ""
>She hit a sore spot with me.@
>As much as Ilias loves humans, she despises monsters.\
>One of the worst offenses you can commit is to have sexual relations with a monster...\
>I'm sure she has a reason, though.\
>Humans are weak, monsters are strong.@
>Ilias might just be trying to correct that imbalance...\
name "Alice"
>Besides, what's with her prohibition on relations with monsters?\
>Most monsters can't breed if they don't mate with humans.@
>So for as many monsters as there are in the world, that means the law was broken that many times.\
name ""
name "Luka"
>Ah!@>That's true...!\
name ""
name "Alice"
>Did you just realize that now?@> Idiot.\
name ""
name "Luka"
>Are there really that many people out there who have broken her commandments?\
>Wait...@>Wouldn't following that be effectively exterminating monsters by not allowing any offspring...?\
name ""
name "Alice"
>Wouldn't that be an issue for you?@
>If everyone follows that law, the world you dream of will collapse.\
>Do you still think it's something good?\
name ""
name "Luka"
>....I'm sure Ilias has some sort of plan.\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Geez, you can't think for yourself, huh?@
>Must be convenient to blindly follow a goddess like that...\
name ""
name "Luka"
>You don't need to say it like that...\
name ""
>Well, putting that aside...\
name "Luka"
>Shall we head out?@
>If we waste too much time, we won't make it to Iliasburg before nightfall.\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Hmm... that would be troublesome.\
name ""
>After packing up our camp, we headed off again.\
csp 700
dwave 1,"se\asioto2.ogg"
sean_change "bg011"
bgm "bgm\field1.ogg"
>We start heading north at a good pace towards Iliasburg.\
>At this rate, we should arrive just before evening.\
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Luka"
>I've only been to Iliasburg once before, a few years ago.@
>It's a huge city...\
name ""
>That was the furthest I had ever been away from my village.@
>Using a wagon, we weren't attacked by any monsters.\
name "Luka"
>The main street was filled with adventurers, merchants, and all sorts of people.@
>Tons of different things in all the shops, too.\
name ""
lsp 700,":a;chara\alice_st02.bmp",172,0:print 10,500
name "Alice"
>Hahaha... I'm also looking forward to it.\
name ""
name "Luka"
>Looking forward to it? You are?\
name ""
>That's surprising...@
>I hope she isn't planning something bad.\
name "Alice"
>The famous [Sutherland] Inn at Iliasburg is known for their [Happiness Honey Filled Ama-ama Dango].\
>Any gourmet would salivate at the thought of tasting it.\
name ""
>Of course it would be food...@
>And something from the 500 year old tour guide, I'm sure.\
name "Luka"
>I don't know if the hotel is still there from 500 years ago.\
name ""
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Alice"
>What are you saying? It's only been 500 years.@
>I'm sure it's still there.\
name ""
name "Luka"
>.............\
name ""
>I think humans and monsters can coexist...@
>But it might be hard to get over this issue with time perception...\
name "Luka"
>Hmm..?\
name ""
lsp 700,":a;chara\mdg_st21.bmp",0,0:print 10,1500
>Something strange is lying in the center of the road...\
name "Luka"
>What is this?\
name ""
>I think it's a plant...@
>But I need to take a closer look to make sure...\
name "Luka"
>Alice, what do you think that is?@>Huh?\
name ""
>I turned around, but Alice wasn't there.\
>Did she get lost...? But she was just there a moment ago.\
>Whatever, she's strong.@>She'll be fine even if she's lost.\
>More importantly, what is this thing?\
goto *sean0040a



*sean0040a

if %continue=1 lsp 700,":a;chara\mdg_st21.bmp",0,0
if %continue=1 bg "bg\bg011.bmp",10,5000
if %continue=1 bgm "bgm\field1.ogg"
if %continue=1 gosub *setwindow_01
mov %continue,0
name "Luka"
>Should I pull it out?\
name ""
>Should I tug on it and see what it is?@
>It might be something dangerous though...\
name "Luka"
>It's not really blocking the road, so I could just go around it...\
name ""
>Still, it's bugging me.@>So I...\
r@k@\
csel "Pull it out",*sean0040e,"Ignore it",*sean0040b



*sean0040e

name "Luka"
>I'll pull it out...\
name ""
>I grip the leaf, and pull with all my strength!\
name "???"
>AHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHH!\
name ""
name "Luka"
>.....Eh?\
name ""
>A loud scream lets loose as soon as I pull on the leaf.@
>As soon as I hear it, my body is suddenly paralyzed.\
>What the hell did I pull out...?\
r@k@\
goto *mdg_start



*sean0040b

name "Luka"
>...I'll just ignore it.\
name ""
>I'm getting a bad feeling from it...@
>It's not blocking the road or anything, I'll just walk by it.\
csp 700:print 10,1500
dwave 1,"se\asioto2.ogg"
>Turning my back on the thing in the road, I keep heading towards Iliasburg.\
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Alice"
>...You ignored it? That was smart.\
name ""
name "Luka"
>Ah, Alice. Where did you head off to?\
name ""
name "Alice"
>If there's even a chance of combat, I'm going to hide.@
>I told you before that I'm not going to help you, didn't I?\
name ""
name "Luka"
>So that thing before... was a monster?\
name ""
name "Alice"
>As long as you don't bother it, it's harmless.\
>Or are you some barbarian, who will run up and attack something that doesn't mean you any harm?\
name ""
name "Luka"
>I wouldn't do that! I'll only fight something that gets in my way, if I have to.\
name ""
>Wanting man and monster to live together peacefully, I don't want to fight needless battles.\
>Unless it's a monster that's going to attack travelers, there's no reason for me to fight them.\
name "Alice"
>Besides, that monster was something you likely couldn't defeat...@
>You probably would have just been made into food.\
name ""
name "Luka"
>Was that thing really so powerful...?\
name ""
name "Alice"
>It's not strong, it just has an annoying ability.\
name ""
name "Luka"
>Hmm... there sure are a lot of different kinds of monsters, aren't there?\
name ""
>I was still able to learn something, even without fighting...\
goto *sean0041



*sean0040c

bgm "bgm\field1.ogg"
name "Luka"
>Haa.... haa....\
r@k@\
name ""
>That was really close...@
>If that paralysis had lasted a bit longer, I would have been food...\
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Alice"
>You drove it away? How absurd.\
name ""
name "Luka"
>Ah... Alice. Where did you go off to?\
name ""
name "Alice"
>If there's even a chance of combat, I'm going to hide.@
>I told you before that I'm not going to help you, didn't I?\
>But how horrible, you attacked that Mandragora who was just minding her own business sleeping...@
>What a barbarian.\
name ""
name "Luka"
>No, no. She was the one who attacked me.\
name ""
lsp 700,":a;chara\alice_st03.bmp",172,0:print 10,500
name "Alice"
>Didn't you force her out of the ground?\
name ""
name "Luka"
>Erk...\
name ""
>I only want to fight against monsters who would attack travelers, getting in the way of a peaceful world...\
>If I fought something unnecessarily...@> I think I did something awful...\
lsp 700,":a;chara\alice_st02.bmp",172,0:print 10,500
name "Alice"
>Hahaha... so you have a violent side to you... that's good.@
>With barbarism like that, you won't be able to fulfill your dream.\
name ""
name "Luka"
>Th... that's not right!@
>That was just a mistake before!\
name ""
name "Alice"
>Haha... well then, make sure you show me your true character.\
name ""
name "Luka"
>I'll be more careful from now on...\
name ""
>If I want to make a world where we can live peacefully together, I'll need to be more careful...\
goto *sean0041



*sean0041

>We've almost reached Iliasburg.@
>Just a little bit further to the north...\
dwave 1,"se\asioto2.ogg"
sean_change "bg012"
>As the sun goes down, Iliasburg appears before us.@
>I can see the city from here!\
>But I can't just go into the city like this...@
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
>Because of her...\
name "Luka"
>Alice... are you able to disguise yourself as a human?\
name ""
>On this continent, the hatred against monsters is very strong.@
>I'm sure Iliasburg is no exception.\
>If Alice goes inside looking like that, I'm sure there will be trouble.\
name "Alice"
>Taking the form of a human is unpleasant...@
>Why should I have to pretend to be a human...\
name ""
name "Luka"
>If you can't enter the city, how are you going to eat your Ama-ama Dango?\
name ""
name "Alice"
>Crap... I guess that's true.@
>Fine... how does this look?\
dwave 1,"se\escape.ogg"
lsp 700,":a;chara\alice_st11.bmp",172,0:print 10,1500
name ""
name "Luka"
>Ahh... That's good.\
name ""
>If she looks like that, I'm sure we can just pass as normal travelers.@
>Thus, we entered the city.\
dwave 1,"se\asioto2.ogg"
sean_change "bg013"
bgm "bgm\kiki2.ogg"
name "Luka"
>What the...? Why does the city look so strange?\
name ""
>Unlike the last time when I was here, the city is completely devoid of people. No merchants, no travelers, nothing.\
>It seems like everyone is barricaded in their homes, with a tense feeling filling the air.\
name "Luka"
>What's going on!?\
name ""
dwave 1,"se\asioto1.ogg"
>I start to run down the city's main street until I reach the city plaza.\
>Noticing some sort of commotion in the plaza, I jump behind a tree on the side of the road.\
name "Luka"
>That's...!\
name ""
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\granberia_st11_b.bmp",0,0:print 10,1500
name "Monster Swordswoman"
>How boring.@>Is there not a single strong person in this entire city?\
name ""
>Standing in the city plaza was a monster swordswoman...\
name "Soldier A"
>D... damn it...\
name ""
name "Soldier B"
>She's so... so strong!\
name ""
name "Soldier C"
>Guh...\
name ""
>Three soldiers were fighting her.\
>Around them are dozens of strong looking soldiers, collapsed on the ground.@
>Did she beat them by herself...?\
name "Monster Swordswoman"
>You three...@> Are you going to fight, or not?\
name ""
name "Soldier A"
>Guh...!\
name ""
>With the situation as it is, it seems incredibly unlikely that those three soldiers have any chance of winning...\
name "Luka"
>That monster... she couldn't be...\
name ""
>The dragon swordswoman who wields a giant sword...@
>Even I have heard the rumors about her...\
>One of the Four Heavenly Knights, Granberia, with a sword arm that no human can match.\
>Able to stand up against an entire army by herself, killing thousands of soldiers...\
>Such an insanely strong monster is attacking Iliasburg?\
>By herself, too...\
name "Luka"
>A... Alice...@>What should we do...?\
name ""
>Just like she said before, it appears as though she has run away...\
>She always acts like she's incredibly strong...@>Is it possible that she's actually pretty weak?\
>Such a powerful boss in the first city... shouldn't there be something a little more... mid-bossy?\
>Why do bad things have to keep happening one after another on my journey...\
name "Granberia"
>Only you three are left...@
>Are you just going to watch while I take control of this city?\
name ""
name "Granberia"
>Or is one of you going to be a Hero and try to face me!?@
lsp 700,":a;chara\granberia_st12_b.bmp",0,0:print 10,500
>Well... hurry up and decide!\
name ""
name "Soldier A"
>Grr.... damn you...!\
name ""
name "Soldier B"
>I won't let a monster like you do whatever you want!\
name ""
dwave 1,"se\asioto1.ogg"
>Two of the remaining three soldiers face Granberia.@
>The third soldier is cowering in the back, unable to move.\
name "Granberia"
>That's the spirit.@
lsp 700,":a;chara\granberia_st41.bmp",0,0:print 10,500
>But even if you have the spirit, it's meaningless!\
name ""
dwave 1,"se\fire1.ogg"
lsp 700,":a;chara\granberia_st42.bmp",0,0:print 10,500
>Flames surround Granberia's sword, giving off a scorching heat. It's as if it's covered in the fires of Hell itself.\
name "Luka"
>Uwa!\
name ""
>I heard that the Four Heavenly Knights each correspond to a specific element.@
>Water.@> Earth.@>Wind.\
>And it seems as though Granberia is fire...\
name "Soldier A"
>Take this!\
name ""
>Not backing down from the heat, the soldier steps forward bravely, and swings at Granberia!\
dwave 1,"se\miss.ogg"
csp 700:print 10,200
>But Granberia vanishes!\
name "Soldier A"
>Gah!\
name ""
dwave 1,"se\down.ogg"
>In the next instant, the soldier faints.@
lsp 700,":a;chara\granberia_st11_b.bmp",0,0:print 10,500
>...And behind him stood Granberia.\
name "Luka"
>What was that...?\
name ""
>Faster than I could see, she gives a blow to the soldier, knocking him out instantly.\
name "Soldier B"
>Damn you!\
name ""
>The soldier tries to swing at Granberia's back.\
name "Granberia"
>Slow...\
name ""
lsp 700,":a;chara\granberia_st41.bmp",0,0:print 10,500
>Granberia looks over her shoulder, and swings her giant sword!@
dwave 1,"se\slash3.ogg"
dwave 2,"se\fire1.ogg"
lsp 700,":a;chara\granberia_st42.bmp",0,0:print 10,500
>Before the soldier could swing his sword, the heat wave from Granberia's swing smashes into him.\
name "Luka"
>Uwa!\
name ""
>The intense heat let off by her sword reached all the way to where I was hiding.\
name "Soldier B"
>Guha...\
name ""
>Being so close to the heat, the soldier drops his sword and falls to the ground.\
dwave 1,"se\down.ogg"
lsp 700,":a;chara\granberia_st11_b.bmp",0,0:print 10,500
name "Luka"
>Amazing...\
name ""
>The difference in ability is huge.\
>Those soldiers looked even stronger than me...@
>But she crushed them as if they were just insects...\
>Honestly, I was envious of her strength...\
name "Soldier A"
>Aguh...\
name ""
name "Soldier B"
>Uuuu...\
name ""
>The soldiers she defeated seem to still be breathing.@
>In fact, all the other soldiers lying around on the ground appear to be alive, too.\
>The difference in ability is huge... it's harder to beat someone without killing them than it is to just kill them.\
>All that remains is one terrified soldier...\
lsp 700,":a;chara\granberia_st12_b.bmp",0,0:print 10,500
name "Granberia"
>Well then... what are you going to do?\
name ""
name "Soldier C"
>Ahh... ahhhh!\
name ""
dwave 1,"se\asioto1.ogg"
>The soldier turns his back on Granberia, and starts to run away.@
>Granberia stood still, without giving chase.\
lsp 700,":a;chara\granberia_st11_b.bmp",0,0:print 10,500
name "Granberia"
>That's a wise choice.@
>But in the future, you can't call yourself a Soldier, or a Hero.\
name ""
name "Luka"
>This isn't good...\
name ""
>All the soldiers in the city seem to be lying on the ground already...@
>I don't think there's anyone left who can protect this city.\
goto *sean0042



*sean0042

if %continue=1 bgm "bgm\boss0.ogg"
if %continue=1 bg "bg\bg013.bmp",10,5000
if %continue=1 gosub *setwindow_01
mov %continue,0
lsp 700,":a;chara\granberia_st12_b.bmp",0,0:print 10,500
name "Granberia"
>Is that it!?@
>Having your city taken over by a monster... there's no complaints!?\
name ""
>Granberia's voice echoes throughout the entire city.\
>However, everyone stays barricaded in their rooms.@
>They must mean to surrender to her...\
name "Luka"
>...........\
name ""
>What should I do...?@
>There's no way I can beat her.\
>As a Hero I can't just...@>Err, as someone aiming to be a Hero, I can't just sit here and do nothing!\
>If I don't do something here, I'll never be able to call myself a real Hero...\
r@k@\
csel "Confront her",*sean0044,"Run away",*sean0043



*sean0043

name "Luka"
>..........\
name ""
>I try to quiet my breath as I hid from Granberia.\
lsp 700,":a;chara\granberia_st01.bmp",0,0:print 10,500
name "Granberia"
>Well, this town is mine now.@
>Should I destroy Ilias Temple next...?\
name ""
dwave 1,"se\asioto3.ogg"
>Saying that, Granberia starts to walk towards me.\
name "Luka"
>Phew....\
name ""
>Luckily, it looks like she didn't notice me.\
lsp 700,":a;chara\granberia_st04.bmp",0,0:print 10,500
name "Granberia"
>A wise choice, boy.\
name ""
name "Luka"
>Eh...?\
name ""
dwave 1,"se\asioto3.ogg"
csp 700:print 10,1500
>Saying that, Granberia leaves.\
>After a while, my body starts to shake.@
>She noticed me...\
bgm "bgm\kiki2.ogg"
name "Luka"
>.........\
name ""
>There's no way I can be a hero now...\
>It felt like I lost something really important...\
name "Luka"
>I had no choice...@
>She was just so strong...\
>After I get stronger, it will be possible to fight against her eventually.\
name ""
>I laugh to myself at that.@
>That "eventually" will never come, even if I had an eternity.\
name "Luka"
>Oooi. Alice!@> Where are you?\
name ""
>Alice doesn't reappear like she did before.\
name "Luka"
>I'm going to continue traveling...@
>If you don't show up, I'm going to leave you behind!\
name ""
gosub *anten
>After that, I was never able to meet Alice again.@
>After a while, I eventually returned back to my village.\
>[Not today].@> [One day for sure].\
>While saying such cowardly things, my adventure ended.\
>But oh well, I guess today wasn't my day.@
>One day for sure, I'll show them.\
mov $end_go,"sean0042"
goto *badend2



*sean0044

lsp 700,":a;chara\granberia_st01.bmp",0,0:print 10,500
name "Granberia"
>Well then, I've taken control of this city.@
>Next, I'll....\
name ""
name "Luka"
>Ho... Hold it!\
name ""
>I summon my courage, and step out from behind the tree.\
>Naturally, I have no chance of winning.@
>I don't particularly want to be a martyr, either.\
>But...@
>If I run away now, I'll be nothing but a fake Hero!\
lsp 700,":a;chara\granberia_st11_b.bmp",0,0:print 10,500
name "Granberia"
>What was that, boy?\
name ""
>Granberia turns her head to face me.\
>Just from her stare, I feel a crushing sense of oppression fill me.\
name "Luka"
>A....u....\
name ""
>My body shakes.@>My heart throbs.@> My mouth dries up.@
>I shouldn't have done that.@>I'd be lying if I said I didn't instantly regret calling out to her.\
name "Granberia"
>Oh, you're carrying a sword?@
>Then I'll treat you as a warrior, not as a boy.\
>You have no problem with that, do you?\
name ""
name "Luka"
>Of... of course not!@
>Even som.... Even someone like me is a warrior!\
name ""
>Forcing my arms to stop shaking, I hold up my sword.\
name "Granberia"
>I understand...@
lsp 700,":a;chara\granberia_st41.bmp",0,0:print 10,500
>Well then... the fire swordswoman Granberia will be your opponent!\
r@k@\
name ""
goto *granberia1_start



*sean0045

bgm "bgm\sinpi1.ogg"
gosub *clear_sprite
gosub *setwindow_01p
lsp 700,":a;chara\alice_st11.bmp",172,0:print 10,500
name "Alice"
>How long are you going to keep being an idiot?\
name ""
name "Luka"
>A... Alice!?\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-130,0
lsp 701,":a;chara\granberia_st06.bmp",200,0:print 10,500
name "Granberia"
>Y... you!\
name ""
>Granberia's astonished face stares at Alice, petrified for a couple seconds...@
lsp 701,":a;chara\granberia_st04.bmp",200,0:print 10,500
>...and then she slowly gets on one knee.\
name "Luka"
>Ehh...? Ehhhh...?\
name ""
>What the hell is going on?@
>That powerful swordswoman... is kneeling before Alice...?\
lsp 700,":a;chara\alice_st13b.bmp",-130,0
name "Alice"
>Granberia... what are you doing?@
>Who ordered you to do such a thing?\
name ""
name "Granberia"
>I decided by myself.@
>To get rid of those annoying Heroes, I...\
name ""
name "Alice"
>Go away, you annoyance.\
name ""
>Alice declared flatly.@
>Even giving someone like her such a rude command...\
lsp 701,":a;chara\granberia_st02.bmp",200,0:print 10,500
name "Granberia"
>B... but!@
>If I leave now, even more Heroes will show up...\
name ""
name "Alice"
>I told you to go away.@
>If you go berserk like this, how am I going to eat the [Ama-ama Dango] ?\
name ""
name "Granberia"
>If you want something like that, just let me take control of the city first...@> So...\
name ""
name "Alice"
>How can I sightsee with such an unsightly event like that going on? Idiot.\
>Having to say the same thing three times... is that how you show your loyalty?@
>I told you to go away.\
name ""
lsp 700,":a;chara\alice_st14b.bmp",-130,0
lsp 701,":a;chara\granberia_st04.bmp",200,0:print 10,500
name "Granberia"
>...At once.@>If it's your will.@
>Then, if you will excuse me...\
name ""
dwave 1,"se\warp.ogg"
csp 701:print 10,500
>By some sort of magic, Granberia vanishes, and withdraws from the city plaza!\
bgmonce "bgm\fanfale.ogg"
>Granberia was driven away!@> ...by Alice!\
bgm "bgm\city1.ogg"
name "Luka"
>I... I did it!\
name ""
r@k@\
>Er, not quite. I didn't really do anything.@
>Overcome by exhaustion now that the overwhelming pressure exerted by Granberia is gone, I collapse on the ground.\
>Just what did Alice do...\
name "Luka"
>Alice... you...\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>...........\
name ""
>For some reason, she avoids looking at me.\
name "Luka"
>You...@> Were pretty awesome back there.\
name ""
bgm "bgm\alice1.ogg"
lsp 700,":a;chara\alice_st13b.bmp",67,0:print 10,500
name "Alice"
>...That's it!?@> That's all you have to say after that happened!?\
>Are you really that stupid...?\
name ""
name "Luka"
>Eh...? What...?\
name ""
>I responded back at her with a blank expression on my face.\
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Man"
>Is... is she gone?@
>That monster... did she run away!?\
name ""
name "Woman"
>Those two over there! I don't really get it, but it looks like that woman and the boy drove her away!\
name ""
>The city residents start to rush out of their houses, and surround us.\
name "Luka"
>Err, uh... we...\
name ""
name "Man"
>Thank you!@
>A little bit longer, and this would have been a monster city!\
name ""
name "Woman"
>Even though you're so young, that was amazing!@
>How did you drive away such a strong looking monster...?\
name ""
name "Luka"
>Err... it was nothing... really...\
name ""
>Even with all these people surrounding us, it doesn't seem like anyone is noticing that Alice is really a monster.\
>After thanking us, the city residents slowly start to return back to their daily routine.\
>None of the defeated soldiers were killed, and peace finally returned to Iliasburg.\
bgm "bgm\city1.ogg"
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>By the way, Citizen A over there, I want to ask you something.\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-120,0
lsp 701,":a;chara\mob_seinen1.bmp",160,0:print 10,500
name "Citizen A"
>Citizen A...? Me...?@
>How can I be called "Citizen A" when I have such a magnificent name as Cervantes!\
name ""
name "Alice"
>I don't really care.@
>Where is the [Sutherland Inn]?\
name ""
name "Citizen A"
>Ah... just head to the west from here and you'll see it.@
>It's such an incredibly old Inn, it will stick out.\
name ""
csp 701
lsp 700,":a;chara\alice_st12b.bmp",67,0:print 10,500
name "Alice"
>Hah. Did you hear that, Luka?@
>It still exists, like I said.\
name ""
name "Luka"
>...incredibly old Inn.\
name ""
>Such a famous old Inn sounds like it's going to be really expensive.@
>Something adventurers can't really afford...\
name "Alice"
>Alright!@> Off to the west!@>We know where we're staying tonight.\
name ""
name "Luka"
>Whatever you say...\
name ""
>With me being dragged by Alice, we head to the west side of the city.\
dwave 1,"se\asioto2.ogg"
sean_change "bg014"
bgm "bgm\comi1.ogg"
name "Luka"
>Ah! There it is...\
name ""
>The Inn was even nicer than I thought it would look.@
>Alright, let's see... I wonder how much it costs...\
name "Luka"
>Let's see... one day... 2,400,000 gold per person!?\
name ""
>24 hours in a day, at 2,400,000 gold...@
>We can stay here about 18 seconds!\
>If I was baptized as a Hero, I could stay here almost free...\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Luka"
>Alice, there's no way we can stay here.@
>If we both go inside, we only have nine seconds...\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>What...@
>If I knew this was going to happen, I would have let Granberia take over...\
name ""
name "Luka"
>Oi oi.\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-120,0
lsp 701,":a;chara\mob_sensi1.bmp",160,0:print 10,500
name "Soldier A"
>Excuse me, can you step aside?\
name ""
>Slipping past us, a soldier walks up to the reception desk.\
>That was one of the soldiers who was knocked out by Granberia...\
name "Soldier A"
>Hey, Owner.@>I'm a hero.@>Give me the Hero rate to stay here.\
name ""
lsp 700,":a;chara\mob_obasan.bmp",-160,0:print 10,500
name "Owner"
>What stupidity is that!?@
>What kind of Hero gets knocked out instantly by a monster like that!\
name ""
>Shouting at the soldier, the Owner of the Inn chases him outside.\
name "Soldier A"
>But... but I've been baptized as a Hero!\
name ""
name "Owner"
>Someone like you calling himself a hero...@
>Get out!\
name ""
name "Soldier A"
>Hiiii!\
name ""
dwave 1,"se\asioto1.ogg"
csp 701:print 10,500
>Scared off by the Owner, the soldier runs away.@
>Having driven off the Soldier, she then turns to us.\
>As she notices us, her expression softens.\
lsp 700,":a;chara\mob_obasan.bmp",0,0:print 10,500
name "Owner"
>Oh, you two! The ones who saved the city!@
>Please, won't you stay here tonight?\
name ""
name "Luka"
>Err... we don't have enough money...\
name ""
name "Owner"
>I'll give you the special Hero rate, two gold per person.@
>I'll bill the other 4,799,996 gold to the Ilias Temple.\
name ""
name "Luka"
>Th... thank you.@
>But, I'm not a baptized Hero...\
name ""
name "Owner"
>That doesn't matter.@
>The baptism doesn't make you a Hero, your actions do.\
name ""
name "Luka"
>....!\
name ""
>The comment felt like it hit me right on the head.\
>That's right...@
>If I act like a Hero, then I can be a Hero!\
lsp 700,":a;chara\alice_st11b.bmp",-120,0
lsp 701,":a;chara\mob_obasan.bmp",160,0:print 10,500
name "Alice"
>...That said, didn't you just get your ass beat?\
name ""
name "Luka"
>Gufu...\
name ""
>That really felt like it hit me on the head.\
>Alice really knows how to bring me down...\
name "Owner"
>Come in, come in!\
name ""
lsp 700,":a;chara\alice_st12b.bmp",-120,0:print 10,500
name "Alice"
>Hm, looks like you were useful for something.@
>Come on, Luka, don't just stand there like an idiot.\
name ""
name "Luka"
>Right, right... I get it...@
>Hey! Stop dragging me!\
name ""
>Thus we were given a free night's stay at the [Sutherland Inn].\
bgmstop
sean_change "bg015"
bgm "bgm\city1.ogg"
name "Luka"
>Ahh... I need to calm down.\
name ""
>Being from the country, I've never been in such an elaborate room before.\
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
>Alice, finally eating her Ama-ama Dango is happily munching away.\
name "Luka"
>Is it good?\
name ""
lsp 700,":a;chara\alice_st09b.bmp",67,0:print 10,500
name "Alice"
>It's sweet! \
name ""
>It looks like she likes it.@
>Her tail is waving around happily, too.\
name "Luka"
>Oi oi, don't lose your transformation... someone might come by.\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>Fuuu... that was delicious.\
name ""
lsp 700,":a;chara\alice_st12b.bmp",67,0:print 10,500
>Alice turns back into her human form, and rings the service bell.\
lsp 700,":a;chara\alice_st12b.bmp",-120,0
lsp 701,":a;chara\mob_obasan.bmp",160,0:print 10,500
>The owner came in to clear off the dishes.\
>It looks like we're getting the VIP treatment.\
>We heard earlier that the owner of this Inn was an especially influential person in the city.\
>If the town was taken over, it really would have hurt her...\
name "Owner"
>How did you like this hotel's Ama-ama Dango?\
name ""
name "Alice"
>Even though it's incredibly sweet, it doesn't overpower the flavor of the dango.\
>Absolutely delicious.\
>If you were a monster, I'd make you a duchess.\
name ""
name "Owner"
>Hahaha! What a strange remark, young woman.@
>Hahahahahaha!\
name ""
>I don't really get it, but it seems like she found that pretty funny.\
name "Owner"
>Unfortunately, we haven't been able to get enough [Happiness Honey].@
>So I can't make any more Ama-ama Dango...\
name ""
name "Owner"
>Since Happiness Village doesn't have enough men anymore, I guess there's no helping it...\
name ""
>Happiness Village is a small village to the east of Iliasburg.@
>They're primarily a beekeeping village that exports their Happiness Honey all over the world.\
name "Luka"
>Did something happen in Happiness Village?\
name ""
name "Owner"
>Yeah...@>Hmm...@> Hey, that's right.@
>If it's you two, you might be able to do something.\
>If you're able to beat that swordswoman, it should be easy for you.\
name ""
name "Luka"
>Ye.... yeah...\
name ""
>I wasn't able to disagree with her, I'm in too deep now to go back and change the story...\
name "Owner"
>Well then, have a nice rest.\
name ""
name "Luka"
>Yes! Thank you!\
name ""
csp 701
lsp 700,":a;chara\alice_st12b.bmp",67,0:print 10,500
>Completely different from yesterday, I'm able to sleep in a soft bed tonight.\
>It's a little too high-class for me, but I'm still able to relax.\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Hmm... I'm hungry again...\
name ""
name "Luka"
>Oi oi... didn't you just eat all of those Ama-ama Dangos?\
>How can you still be hungry after eating all those?@
>Go back to your room.\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>The dango went into a different stomach... My other one wants some human...\
name ""
>Alice stares into my face.@
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
>While licking her lips...\
name "Alice"
>Someone unbaptized like you just looks so... delicious.\
name ""
r@k@\
goto *sean0050



*sean0050

name "Luka"
>Oi oi... wait a minute.@>Stop!\
name ""
dwave 1,"se\ero_makituki3.ogg"
>Alice quickly slithers into the bed, and wraps me in her tail!\
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
name "Luka"
>Don't... do this...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice2_01a.ogg"
name "Alice"
>What are you saying? This is special training.
>Aren't you weak to the enemy's pleasure attacks?\
if %con_hvoice=0 dwave 0,"voice\alice2_01b.ogg"
>If you can't stand up to their pleasure attacks, your adventure will end in failure...
>Is that what you want?\
name ""
dwavestop 0
name "Luka"
>That is... I don't want that...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice2_02.ogg"
name "Alice"
>Then let's do some special training. I'll teach you how to endure the stimulation...\
name ""
dwavestop 0
name "Luka"
>Suc... such a...\
name ""
>Even if I resist, I don't think there's any way I could stop her...@
>If I can't resist... I'll just have to endure it...\
if %con_hvoice=0 dwave 0,"voice\alice2_03.ogg"
name "Alice"
>Hooora...\
name ""
dwavestop 0
>Alice quickly pulls off my underwear, and exposes my dick to the air.\
if %con_hvoice=0 dwave 0,"voice\alice2_04a.ogg"
name "Alice"
>Haha... it got so big.
>Even though you said stop... what a shameless guy.\
if %con_hvoice=0 dwave 0,"voice\alice2_04b.ogg"
>I wonder how much I can collect...?
>I'll dispose of it all for you, as a special.\
name ""
dwavestop 0
name "Luka"
>You're just hungry, aren't you...\
name ""
>Even though she called it special training, in the end all she wants is my semen...\
if %con_hvoice=0 dwave 0,"voice\alice2_05.ogg"
name "Alice"
>Don't say that... I'm just killing two birds with one stone... or is it three?
>With this special training, I can treat my desire as well as my stomach...\
name ""
dwavestop 0
name "Luka"
>But Alice... Ilias' commandment says...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice2_06.ogg"
name "Alice"
>Ahh geez, shut up already.
>Even though I'll make you ejaculate, I won't use my vagina...\
name ""
dwavestop 0
lsp 700,":a;chara\alice_h02_1.bmp",0,0:print 10,500
>Alice tightly wraps me in her warm hand.\
name "Luka"
>Aauuu...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice2_07.ogg"
name "Alice"
>I only grasped you, and it's already twitching so much...\
name ""
dwavestop 0
>Alice starts to rub me very softly.@
>Even with such a soft stimulation, the pleasure is unbearable.\
if %con_hvoice=0 dwave 0,"voice\alice2_08.ogg"
name "Alice"
>Well then... how shall I do it...
>Shall I just wring it out with my hands like this?\
name ""
dwavestop 0
mov %hseanwave,1:hseanwave
>Alice starts to move her hand up and down, gently massaging me.\
>But she's also using her thumb and index finger to squeeze me in tiny circular motions as she moves up and down.\
>With her slow motion movement, deep pleasure flows through me.\
name "Luka"
>Uuu... Aaaa!\
name ""
if %con_hvoice=0 dwave 0,"voice\alice2_09.ogg"
name "Alice"
>Fufu... how long can you endure my technique?
>It doesn't look like it will be too long...\
name ""
dwavestop 0
>Staring at my writhing face, Alice laughs in her superior position over me.\
>How humiliating...\
name "Luka"
>Stop it...@> Ahh...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice2_10.ogg"
name "Alice"
>You seem pretty weak...
>Just by doing so little, you let out such a voice...\
name ""
dwavestop 0
>Alice's thumb and forefinger continue to circle me as she gently pumps me up and down.\
>Unable to resist the pleasure, I feel my climax building in my waist.\
name "Luka"
>Auu...@> Any more and...\
name ""
>It's a huge taboo to let a monster make you come...@
>Thinking this, I try to endure the rising orgasm.\
>Alice starts to laugh at me, trying to endure.\
if %con_hvoice=0 dwave 0,"voice\alice2_11a.ogg"
name "Alice"
>It looks like you realized it.
>I'll make you shoot your little children all over with my hand...\
if %con_hvoice=0 dwave 0,"voice\alice2_11b.ogg"
>What a pitiful man, Hahaha!\
name ""
dwavestop 0
>Alice increases the pressure with her left hand as she laughs at me.\
>Her hand starts to get sticky from the pre-come leaking out.@
>With her skillful technique, she keeps driving me closer to the edge.\
name "Luka"
>Aahh... too good...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice2_12.ogg"
name "Alice"
>For me to be rubbing you like this until you come... what good luck you have.
>Now... submit and let out the rest of your semen into my hand...\
name ""
dwavestop 0
>Alice's left hand continues to massage me.\
>Sometimes twisting, sometimes squeezing, her skillful hand gives me intense stimulation.\
>Her right hand strangles the top of my dick...@
>Unable to endure the two different movements, I finally surrender.\
>At this rate, I'll just melt in her hand...@
>As soon as I accept this desire, all of my endurance vanishes.\
name "Luka"
>Auu!@> Ahhhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice_h02_2.bmp",0,0
gosub *syasei2
>My seed shoots through Alice's right hand, and starts to land on her left, making them both sticky...\
if %con_hvoice=0 dwave 0,"voice\alice2_13a.ogg"
name "Alice"
>Haha, with my hand... you let out so much.\
if %con_hvoice=0 dwave 0,"voice\alice2_13b.ogg"
>I thought you weren't supposed to give a monster any semen...?
>What an unprincipled, unsightly man!\
name ""
dwavestop 0
>Alice laughs as she continues to squeeze me, wringing out every last drop.\
name "Luka"
>Faaaa....\
name ""
>Until my orgasm ends, Alice keeps squeezing me, her hands getting covered with my semen.\
mov %hseanwave,0:hseanwave
if %con_hvoice=0 dwave 0,"voice\alice2_14.ogg"
name "Alice"
>Haha, your sperm made my hands so sticky...
>*Slurp*\
name ""
dwavestop 0
>Alice starts to lick everything up, giving a satisfied sigh.@
>Seeing her eat my semen like that, a sick pleasure fills me up.\
if %con_hvoice=0 dwave 0,"voice\alice2_15.ogg"
name "Alice"
>*Slurp* *Smack* Fufu...\
name ""
dwavestop 0
>In fact, it looked like she was exaggerating her movements.@
>As if trying to strike home that I surrendered, and am just feeding her...\
>And before I noticed, she had licked everything up.\
if %con_hvoice=0 dwave 0,"voice\alice2_16a.ogg"
name "Alice"
>Fuu... a strange taste.
>It's certainly delicious... but there's something strange, too.\
if %con_hvoice=0 dwave 0,"voice\alice2_16b.ogg"
>I could easily get used to this taste...\
name ""
dwavestop 0
name "Luka"
>.........\
name ""
>Unable to answer or resist, I've surrendered to her hand.\
if %con_hvoice=0 dwave 0,"voice\alice2_17a.ogg"
name "Alice"
>But you couldn't even last 3 minutes...
>I'm certainly skilled... but that's still pathetic.\
if %con_hvoice=0 dwave 0,"voice\alice2_17b.ogg"
>Let me drill out a little more...\
name ""
dwavestop 0
name "Luka"
>Eh...? More...?\
name ""
>Alice reaches out to my groin again, and...@
dwave 1,"se\ero_makituki1.ogg"
lsp 700,":a;chara\alice_h02_3.bmp",0,0:print 10,500
>Suddenly, Alice's fingers somehow wrap around me!\
>Sprouting from her wrist, it's as if her fingers became tentacles...\
name "Luka"
>Uwa!\
name ""
if %con_hvoice=0 dwave 0,"voice\alice2_18.ogg"
name "Alice"
>Don't be afraid. This will be something unique.\
name ""
dwavestop 0
name "Luka"
>Hiiii!\
name ""
mov %hseanwave,1:hseanwave
>Her tentacles, lightly covered in mucus, are wrapped all around my penis!\
>Even though the mucus caused everything to feel sticky, it still felt amazing.\
if %con_hvoice=0 dwave 0,"voice\alice2_19.ogg"
name "Alice"
>My tentacles creeping around your dick... just savor it.\
name ""
dwavestop 0
name "Luka"
>Ahhh... stop...@
>It feels gross...\
name ""
>Disgust and pleasure mixing, my body starts to shake.\
>The slimy tentacles are rolling up my penis from it's trunk, wriggling all over the place.\
name "Luka"
>Auu... ahhh...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice2_20.ogg"
name "Alice"
>Fufu... a unique pleasure, isn't it?\
name ""
dwavestop 0
>The tentacles finally wrap around to the tip, and start to squeeze my head softly.\
>My waist shakes at the feeling of the tentacles now fully wrapped around my most sensitive part...\
name "Luka"
>U... ahhh!\
name ""
if %con_hvoice=0 dwave 0,"voice\alice2_21.ogg"
name "Alice"
>Should I try this next...? Horahorahora...\
name ""
dwavestop 0
>The tentacles start to individually vibrate, moving at different speeds and differing pressures around me.\
>The intense stimulation brings me quickly to the edge again.\
name "Luka"
>Ahh... ahhhh!@
>Any more... and I'll come again!\
name ""
>Seeing my member covered in tentacles, I'm filled with shame.@
>Being forced to ejaculate like this... I can't endure the humiliation.\
if %con_hvoice=0 dwave 0,"voice\alice2_22a.ogg"
name "Alice"
>What, you already want to explode again...?
>How unbecoming...\
if %con_hvoice=0 dwave 0,"voice\alice2_22b.ogg"
>Oh well, there's no helping it...
>I'll let you come one more time.\
name ""
dwavestop 0
>The wriggling tentacles all tighten, causing unbearable stimulation to attack me all at once.\
>To such a sweet pleasure, I completely yield all of my resistance.\
name "Luka"
>Auu...!@>Ahhhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice_h02_4.bmp",0,0
gosub *syasei2
>I shoot out all over the tentacles that are playing with me, covering them with my white seed.\
if %con_hvoice=0 dwave 0,"voice\alice2_23.ogg"
name "Alice"
>Fufu... even though it was your second time, you let out so much...\
name ""
dwavestop 0
>The semen that landed on her tentacles starts to get absorbed as she continues to squeeze everything out of me.\
name "Luka"
>Haaa.. what are you...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice2_24.ogg"
name "Alice"
>Hora hora... I'll be sure to train your fragile tip...\
name ""
dwavestop 0
name "Luka"
>Aaaah!\
name ""
>One by one, the tentacles start to constrict around me.@
>The tightened pressure all over me causes my body to writhe uncontrollably.\
name "Luka"
>Ahii!@>At least my head... stop...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice2_25.ogg"
name "Alice"
>Haha, are you miserable?
>In front of a woman, such a pathetic appearance...\
name ""
dwavestop 0
>Ignoring my plea, Alice continues to constrict around me.\
>Squeezing...@> vibrating...@>strangling...@
>Alice continues to play with me.\
>Until all of a sudden, Alice's tentacles release their pressure on my tip, as I let out a disappointed sigh.\
name "Luka"
>No... I want to come...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice2_26a.ogg"
name "Alice"
>Hahaha, in addition to your semen, did you also leak out your true nature?
>...and your foolishness...\
if %con_hvoice=0 dwave 0,"voice\alice2_26b.ogg"
>Now... shoot everything out!\
name ""
dwavestop 0
>As if putting the final nail in the coffin, the tentacles coil completely around me again.\
>While they kneaded my dick as if it was dough, my vision started to go white.\
name "Luka"
>Haaaa!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice_h02_5.bmp",0,0
gosub *syasei2
>I surrender again to the intense stimulation of her tentacles, as I explode on her again.\
>Mixed with humiliation and disgrace, I feel myself start to slowly lose consciousness in my exhaustion.\
mov %hseanwave,0:hseanwave
if %con_hvoice=0 dwave 0,"voice\alice2_27a.ogg"
name "Alice"
>Oh, are you done down?
>Losing consciousness at this level... you're still weak.\
if %con_hvoice=0 dwave 0,"voice\alice2_27b.ogg"
>I'll pardon you with this for now.
>Well, shall I just wring out one more?\
name ""
dwavestop 0
name "Luka"
>Auuu...\
name ""
>I lose consciousness to the sound of Alice laughing.@
>Traveling with such a person might cost me my life...\
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_alice2,1
goto *sean0051



*sean0051

bgmstop
sean_change "bg016"
bgm "bgm\city1.ogg"
lsp 700,":a;chara\mob_obasan.bmp",0,0:print 10,500
name "Owner"
>It sounded like you had fun last night.\
name ""
dwave 1,"se\slash3.ogg"
name "Luka"
>Aguhhaa...\
name ""
>A sudden remark right at the start of the morning...\
name "Luka"
>We... were we that loud...?\
name ""
name "Owner"
>Haha, was I right? It was just a lucky guess.\
name ""
name "Luka"
>Ughhh...\
name ""
>With a cat like grin on her face, she laughs at me.@
>How is Alice reacting...?\
lsp 700,":a;chara\alice_st14b.bmp",-120,0
lsp 701,":a;chara\mob_obasan.bmp",160,0:print 10,500
print 10,500
>Unfazed.\
>At times like this, the man has to be calm...@
>Calm down.... Calm down...\
name "Owner"
>Well... be sure to come again! I'll be glad to welcome you!\
name ""
name "Luka"
>I will! Thank you!\
name ""
>Thus we walk away from the Sutherland Inn.\
mov %item01,3
dwave 1,"se\asioto2.ogg"
sean_change "bg018"
name "Clerk"
>Welcome!\
dwave 1,"se\kaimono.ogg"
name ""
>Well, shall we head into the city and buy some food, equipment, and other things?\
r@k@\
mov %hanyo1,0
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
csp 611:cspl 3,7
gosub *city02_main
gosub *setwindow_01p
r@k@\
>Finished with our shopping, we start to head out of the city.\
name "???"
>Fufufu... I found you! My only Hero...\
name ""
name "Luka"
>Wh... who are you!?\
name ""
>Suddenly appearing before me is...@
wait 500
bgmstop
bgmonce "bgm\battlestart.ogg"
lsp 700,":a;chara\amira_st01.bmp",0,0:print 10,500
eng "Unfortunate Lamia appears!":$sel6/
wait 1000
delay 4500
bgm "bgm\amira.ogg"
\
name "Luka"
>Uwa....\
name ""
>Suddenly appearing in front of me was the unloved and unwanted half-woman half-snake Lamia.\
name "Unfortunate Lamia"
>My name is Amira...@>You stole my maiden heart.\
name ""
name "Luka"
>...........\
name ""
>Why is there a monster in the city...?@
>Nobody seems to be paying attention to her...\
name "Amira"
>You filled me with love and courage.@
>Ah, my sweet heart... an unbreakable dream.\
name ""
>The thing that introduced itself as Amira... It sounds like she's spouting off bad poetry at random.\
name "Luka"
>...........\
name ""
>I can't take anymore, that's my limit.\
>Unable to receive my baptism, even if there's some plan by Ilias...\
>Bearing this abusive traveling partner who calls herself such an unfitting name as Alice...\
>Having to face an end-game level boss right at the start...\
>But this thing...@
>I can't take it anymore.@> That's my limit.\
name "Luka"
>Excuse me... Can I kill you?\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-130,0
lsp 701,":a;chara\amira_st01.bmp",200,0:print 10,500
name "Alice"
>I know how you feel, but you need to calm down Luka.\
name ""
name "Alice"
>If you want a world where monsters and humans can coexist...@> It would include that thing, too.\
name ""
name "Luka"
>Why is it posing like that with no pants?\
name ""
name "Amira"
>I don't have a choice...@
>I only have this one picture...\
name ""
>...Don't talk about your own CG.\
name "Amira"
>Also in this position, I can keep my eye on the Skip button...\
name ""
name "Alice"
>.....\
name ""
>What the hell is this thing.\
name "Luka"
>Just go away and disappear.\
name ""
name "Amira"
>Even you are discriminating against me...\
>...Everyone else does too...@
>Everyone throws stones at me...@>...Nobody will get close to me...\
>Not wanted by anyone... such sadness...\
name ""
name "Luka"
>Y... you....\
name ""
lsp 700,":a;chara\amira_st01.bmp",200,0
lsp 701,":a;chara\mob_obasan.bmp",-180,0:print 10,500
name "Old Woman"
>Hey! Amira!@
>I made too much miso soup for lunch! Come by later and have some!\
name ""
lsp 701,":a;chara\mob_ozisan1.bmp",-180,0:print 10,500
name "Old Man"
>Oh, Amira.@
>There are some rats in my warehouse.@> Would you mind helping me get rid of them?\
name ""
csp 701
lsp 700,":a;chara\amira_st01.bmp",0,0:print 10,500
name "Luka"
>...Not wanted by anyone?\
name ""
>This thing just gets even more annoying.\
name "Luka"
>Alice... can you drive this thing away, like you did to Granberia?\
name ""
lsp 700,":a;chara\alice_st14b.bmp",-130,0
lsp 701,":a;chara\amira_st01.bmp",200,0:print 10,500
name "Alice"
>Don't rely on me, you idiot.@
>Don't think I'll keep helping you like that.\
name ""
name "Luka"
>I know that!\
name ""
>A Hero can't have a monster fight his battles for him...\
lsp 700,":a;chara\alice_st11b.bmp",-130,0:print 10,500
name "Amira"
>Well, putting my situation aside...\
>I came to profess more than just my love for you.@
>I have a request...\
name ""
name "Luka"
>A request...?@>What is it?\
name ""
name "Amira"
>Recently, a band of monster thieves have been rampaging around.@
>Having fellow monsters do such a thing... it pains my heart.\
>Everyone else in the town is troubled, too.\
name ""
name "Amira"
>Even though my appearance has quite the impact... my attacks don't.@
>Could you do something in my stead?\
name ""
name "Luka"
>A band of thieves?@> Monster thieves?\
name ""
>I didn't hear about this band of thieves from the citizens earlier...\
lsp 700,":a;chara\alice_st14b.bmp",-130,0:print 10,500
name "Alice"
>Are you sure it isn't just a human scare mongering story?\
name ""
name "Amira"
>Don't insult my information gathering.@
>There is even supposed to be a Vampire and a Dragon.\
name ""
name "Luka"
>A vampire!?@>And a dragon!?\
name ""
>In the world of monsters, those with incredibly high intellect and magic powers are called Youma.\
>The ultimate form of that is a vampire...@
>Incredibly smart, top class magic, and even poses as an aristocrat at night.\
>And dragons... top of the class in their power and endurance.\
>Nails stronger than any sword, scales sturdier than any armor... and flame that can burn anything in an instant.\
>Both top-class monsters that would wipe the floor with me.\
lsp 700,":a;chara\alice_st11b.bmp",-130,0:print 10,500
name "Alice"
>That's odd.@
>I've never heard of monsters like that this far in the countryside.\
name ""
>That's true, as Alice said.@
>I've never heard of such powerful monsters coming to this continent.\
>Then again, Granberia was just attacking this city...\
name "Amira"
>Please, Hero, can you not defeat the bandits?\
name ""
name "Luka"
>.........\
name ""
>If I challenge something powerful like that, I might die...@
>But...\
name "Luka"
>Ahh I get it. I'll do something.\
name ""
lsp 700,":a;chara\alice_st16b.bmp",-130,0
lsp 701,":a;chara\amira_st01.bmp",200,0:print 10,500
name "Alice"
>...Really? You serious?\
name ""
name "Luka"
>Of course I'm serious.@
>I can't allow monsters to be harming humans without any reason...\
name ""
>I want us to coexist in peace...@
>I can't allow either side to be doing something evil to the other.\
>If I back down from every fight, I'll never do anything.\
csp 701
lsp 700,":a;chara\amira_st01.bmp",0,0:print 10,500
name "Amira"
>Ahh, just as I expected from the man I love!@
>My heart... kyuuun!\
name ""
name "Luka"
>I'll make you wear your heart as a hat...\
>Where is the thieves' hideout?\
name ""
name "Amira"
>I don't know the exact position, but it should be to the west at the base of the mountain range.\
name ""
name "Luka"
>Alright. Leave it to me.\
name ""
name "Amira"
>Ahhh, just as I expected from my darling!@>I love you!\
>I'll wait for the good news...\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,500
>Saying that, the Lamia crawls away on the ground...\
bgm "bgm\city1.ogg"
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Are you really going to go?@
>You can't beat a Dragon or a Vampire as you are now.\
>Are you confusing bravery with stupidity?\
name ""
name "Luka"
>I'm not doing it to be brave...\
name ""
name "Alice"
>It's not related to beating the Monster Lord...@
>Why are you doing it?\
name ""
name "Luka"
>Because!@> I!@>Am!@>A!@> Hero!\
name ""
name "Alice"
>...A fake one.\
name ""
name "Luka"
>Guh...\
name ""
>Her words pierce me through the heart...@
>I won't let it discourage me, though! Even if I die trying, I will create my desired world!\
name "Alice"
>Really... why bother doing unnecessary things?@
>Just head north to Iliasport and take a ship off this continent.\
name ""
name "Luka"
>Detours are good, though.@
>I need to raise my level on the way to the castle.\
name ""
name "Alice"
>At your current level, the dragon will just turn you into charcoal anyway.\
name ""
name "Luka"
>........\
name ""
>I would rather be charcoal than abandon my dream.\
r@k@\
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
csp 700:csp 611:cspl 3,7
gosub *city03_main
dwave 1,"se\asioto2.ogg"
sean_change "bg019"
bgm "bgm\field1.ogg"
r@k@\
>As we left the city, Alice called out to me.\
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Alice"
>By the way, I noticed earlier...@
>It really seems like you don't want to kill your enemy, so you don't really utilize your abilities.\
name ""
name "Luka"
>Yeah... that may be true...\
name ""
>It's true I don't want to kill them...\
>Even if they may want to kill me, I just want to stop them from doing bad things.\
>Because of that, I may unconsciously be holding back.\
name "Alice"
>Oh well... I'll lend you this sword.\
name ""
lsp 700,":a;chara\angersword.bmp",0,0:print 10,500
name "Luka"
>Eww... what is that?\
name ""
name "Alice"
>Angel Halo...@
>The only sword of its kind in the world. It's very valuable.\
>Use this sword from now on.\
name ""
name "Luka"
>Uuuee... this thing?\
name ""
>What the hell happened to this thing?@
>No matter how you look at it, this thing is evil.\
>Holding this would be like shouting out "Hey! I'm a bad guy!" to everyone...\
>I really don't want to use that...\
name "Luka"
>No way... that thing is creepy.\
name ""
name "Alice"
>But it has those angels you humans love embedded right in the handle...@
>I thought you would be happy!\
name ""
name "Luka"
>Those angels look like they're being tortured...\
name ""
>Why would I be happy with this thing...\
name "Alice"
>Whatever, just take it.\
name ""
name "Luka"
>Uee...\
name ""
>While grimacing, I take the Angel Halo sword.@
>It looked heavy, but it's surprisingly light.\
name "Luka"
>Wha!? Ri.. right now I just heard a moan!?@
>Did you not hear that!?\
name ""
name "Alice"
>Well, that's to be expected.@
>The sword was refined from 666 melted angels, after all.\
name ""
name "Luka"
>I hate the way you said that so matter-of-factly.\
name ""
>If I use such a sword, will Ilias desert me?\
name "Alice"
>Listen up.@
>Because the angels' grudges are hammered into the sword, it holds their curse.\
>It eats away the magic of whatever it slashes, making it hard for the opponent to maintain their form.\
name ""
name "Luka"
>...I don't get it.\
name ""
name "Alice"
>You idiot.@
>If you beat a monster, they won't be able to hold their form.\
>They won't die, they'll just temporarily be made harmless.\
name ""
name "Luka"
>This sword can?@>Seal monsters?\
name ""
>That's surprising.\
>So it can seal monsters, making them harmless?@
>I still don't really get it.\
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Alice"
>Ah... good timing. Give it a try.\
name ""
name "Luka"
>Eh....?\
name ""
>The ground near us started to buckle and swell, as if a tiny earthquake was occurring.\
name "Alice"
>Well, I'll hide now.@
>Make sure you give the sword a try.\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,1000
>Saying that, Alice vanishes.\
name "Luka"
>Hey! Alice!\
name ""
>While panicking, the ground starts to crack near me...\
r@k@\
mov %item01,5
goto *mimizu_start



*sean0052

bgm "bgm\field1.ogg"
r@k@\
name "Luka"
>Eh...? What happened?\
name ""
>Oh no...@> She didn't die did she...?@
>Wait...\
>Now that I look closer, there's something small wriggling on the ground.\
>It's so small, I didn't even notice it at first.\
name "Luka"
>An earthworm...\
name ""
>A normal looking earthworm, wriggling around in confusion.\
lsp 700,":a;chara\alice_st02.bmp",172,0:print 10,500
name "Alice"
>Do you get it now?@
>That monster from before turned into that.\
>Totally unharmed... just left harmless.\
name ""
name "Luka"
>Alice...\
name ""
>After my victory, Alice comes back from wherever she was hiding.\
name "Luka"
>Hmm... I get it now.\
name ""
>I bend over and take a closer look at the earthworm.@
>It really looks like she won't be able to do anything bad looking like that...\
>Looking like she accepted her defeat, the earthworm dives underground.\
name "Luka"
>But... that's still kind of sad.\
name ""
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Alice"
>It's better than dying.@
>She's still a monster, so even with that appearance she won't die easily.\
>If she gets power from others, she'll be able to return to her original form.\
name ""
name "Luka"
>I see...@> I hope she reflects on her actions in the meantime.\
name ""
name "Alice"
>...Rather than reflect, her hatred will probably just increase.\
name ""
name "Luka"
>.........\
name ""
>I hope that isn't the case.@
>I'll just have to pray that she'll be reformed.\
name "Luka"
>By the way, what would happen if I used this sword on a human?@
>Of course I don't want to do that...\
name ""
name "Alice"
>Even if it's a human, it can seal them.@
>They would probably turn into a child, or a dwarf.\
>Since the sword is made out of angels, it will show its true power when fighting against them, too.\
name ""
name "Luka"
>Why would I fight an angel...\
name ""
>Such blasphemy.\
name "Luka"
>Thank you, Alice.@
>With this I can fight without holding back.\
name ""
>I honestly thanked Alice for the first time.@
>Wielding this sword, I can fight without contradicting my beliefs.\
lsp 700,":a;chara\alice_st02.bmp",172,0:print 10,500
name "Alice"
>As I thought, you fought a lot better than before.\
>Not wanting to kill your opponent was holding you back.\
name ""
name "Luka"
>Yeah, it felt completely different than before.\
name ""
>Finally, I beat an enemy in a non-sloppy fight.\
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Alice"
>...But you're still awful.@
>Don't get a big head.\
name ""
name "Luka"
>I... know that...\
name ""
>I know I'm weak right now...@
>But I'll get more experience, and beat the Monster Lord!\
name "Luka"
>Well then... where shall we head to next?\
name ""
>Right now we're near Iliasburg.@
>If we go north, we can take a boat to Sentora at Iliasport.\
>There's also the bandits to the west.\
name "Alice"
>By the way...\
>The owner of the Sutherland Inn mentioned something about a Happiness Village.\
name ""
name "Luka"
>Oh that's right... it sounded like something happened there.\
name ""
>I'm interested in what's going on there, too.\
name "Alice"
>Hmm...@> We should stop by there, too.\
name ""
name "Luka"
>Oi oi, that's totally different from how you reacted to the bandits.@
>What happened to "Why bother doing unnecessary things"?\
name ""
lsp 700,":a;chara\alice_st02.bmp",172,0:print 10,500
name "Alice"
>According to the guide book...@
>The Happiness Honey from that village is absolutely amazing.\
name ""
name "Luka"
>...........\
name ""
>Of course it would be food again.\
>But I'm still worried about what's going on there...\
>Also, that shopkeeper mentioned something about a town called Enrika.\
>For some reason I couldn't get it out of my mind...@
>Well then, let's head to...\
r@k@\
mov %genzaiti,1
mov %gloval1_story_sinkou,1:gosub *savegloval1
goto *map1



*sean0053

gosub *genzaiti_bg
name "Luka"
>Let's go back to Ilias Village...\
name ""
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Alice"
>No way... are you already homesick?\
name ""
name "Luka"
>It's not like that!\
name ""
>I open the map back up.\
csp 700
goto *map1



*sean0054

gosub *genzaiti_bg
name "Luka"
>Alright, let's head to the Irina Mountains.@
>I can't ignore those bandits.\
name ""
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Alice"
>Really?@
>So you want to die that badly? Idiot.\
name ""
>A dragon and a vampire...@
>I know I can't win against them, but still...\
name "Luka"
>Nevertheless, I'll win or die trying.\
name ""
lsp 700,":a;chara\alice_st04.bmp",172,0:print 10,500
name "Alice"
>Idiot.\
name ""
csp 700:print 10,500
>Alice didn't say anything else.@
>Thus, we headed off to the base of the mountain range.\
dwave 1,"se\asioto2.ogg"
sean_change "bg020"
>After a few hours, we reached the base of the mountains.@
>But there was a big problem...\
>I have no idea where their hideout is.\
name "Luka"
>Crap...@
>How can I stop them if I don't know where they are...?\
name ""
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Alice"
>This huge mountain range will take forever to search.@
>Are you still going to do it?\
name ""
name "Luka"
>Ergh... what should I do...\
name ""
csp 700:print 10,500
>While walking around aimlessly...@
dwave 1,"se\asioto1.ogg"
>Suddenly, something small jumps out!\
r@k@\
goto *gob_start



*sean0055

bgm "bgm\field1.ogg"
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
r@k@\
name "Alice"
>It looks like we found out where their hideout is.\
name ""
>After the combat ends, Alice suddenly reappears.\
name "Luka"
>Yeah...\
name ""
>In addition to a Vampire and a dragon, it seems there's also a Lamia.\
>Lamia...@> A half-snake, and powerful monster.\
>There are a few weak ones, but they aren't too common.\
>Alice, too, is a lamia...\
name "Luka"
>Lamia...@> Dragon...@> Vampire...\
>Three strong monsters, huh...\
name ""
name "Alice"
>I told you to give up.@
>Do you really want to die that badly?\
name ""
name "Luka"
>I don't want to die...@
>But I can't overlook the people of Iliasburg in their time of need!\
name ""
lsp 700,":a;chara\alice_st04.bmp",172,0:print 10,500
name "Alice"
>...Idiot.@
>Risking your life for others...@
>What an idiot.\
name ""
>While Alice sighs in disgust, we continue to the hideout.@
>No matter what lies ahead of us, a Hero like me won't yield!\
bgmstop
sean_change "bg022"
bgm "bgm\kiki2.ogg"
name "Lamia"
>It looks like the [Goblin Bandit of the Earth of The Four Bandits] was beaten...\
name ""
name "Vampire"
>Kukuku... well, she was the weakest one of us.@
>It doesn't mean anything even if she loses.\
name ""
name "Dragon"
>Uga! That's right.@
>Why is such a weak goblin one of The Four Bandits anyway...\
name ""
name "Lamia"
>That's because...@>...we didn't have enough members.\
name ""
name "Dragon"
>It looks like the Hero is headed towards us...\
name ""
name "Vampire"
>Blindly heading into his own defeat...@
>Hahaha, how foolish.\
name ""
name "Lamia"
>Well then, I'll be his next opponent.@
>Heeheeheehee...\
name ""
name "Dragon"
>Waahaaahaaahaa!\
name ""
name "Vampire"
>Kukukukuku.....\
name ""
wait 1000
bgmstop
sean_change "bg021"
bgm "bgm\field1.ogg"
name "Luka"
>Hmm... this cave?\
name ""
>It looks like an ordinary cave...@
>But this has to be the place.\
>Even though it's their hideout, how come nobody's around?\
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Alice"
>Is there really a dragon in there...?@
>I don't sense one...\
name ""
>Alice sniffs the air with a sigh.\
lsp 700,":a;chara\alice_st04.bmp",172,0:print 10,500
name "Alice"
>Ahh... so it's like that, is it?\
name ""
name "Luka"
>What's wrong, Alice?\
name ""
name "Alice"
>I'll wait here.@
>Finish this up quickly, and come back.\
name ""
name "Luka"
>Oi oi, what are you saying?\
name ""
>A dragon, a vampire, and a lamia...@
>I don't think I'd be able to finish that quickly... much less return.\
>But I can't stop now!@
>Not this early in my adventure!\
name "Luka"
>Alright, here I go!\
name ""
>Alice watches me at the cave entrance as I head inside.\
dwave 1,"se\asioto2.ogg"
sean_change "bg022"
bgm "bgm\dungeon1.ogg"
>It's surprisingly wide inside...@
>But completely empty. Is this really the hideout...?\
name "???"
>Fufu... so you came.@
>I shall be your opponent!\
name ""
name "Luka"
>Who are you!?\
name ""
r@k@\
goto *pramia_start



*sean0056

bgm "bgm\dungeon1.ogg"
r@k@\
name "Luka"
>...........\
name ""
>...I wonder why she said [Of Water]. She didn't use any water attacks...\
name "Luka"
>Whatever...\
name ""
>I shrug my shoulders and walk deeper into the cave.\
>Maybe...@> All of my big talk and determination before wasn't needed...\
dwave 1,"se\asioto2.ogg"
>While walking deeper into the cave, suddenly...\
name "???"
>Kukuku...@
>You're pretty good to beat the Earth Goblin and the Water Lamia...\
>But I won't be so easy!\
name ""
name "Luka"
>Who are you!?\
name ""
r@k@\
goto *vgirl_start



*sean0057

bgm "bgm\dungeon1.ogg"
r@k@\
name "Luka"
>...........\
name ""
>While her techniques were weak, they could be incredibly dangerous.@
>If I ever face an adult vampire, I'll have to be very careful...\
name "Luka"
>Well then... Shall I keep going?\
name ""
dwave 1,"se\asioto2.ogg"
>I head further into the cave.\
>I've defeated three of the bandits so far...@
>All that remains is the dragon...@
>At this rate, though...\
name "???"
>Wahaha! Good job making it this far!\
name ""
name "Luka"
>Wha!?\
name ""
r@k@\
goto *dragonp_start



*sean0058

bgm "bgm\dungeon1.ogg"
r@k@\
>It's over.@
>The last bandit is lying face down on the ground.\
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
bgm "bgm\alice1.ogg"
name "Alice"
>Finally, it looks like the battle between the fake Hero and the tiny dragon is over.\
name ""
>Alice appears, making more rude comments.@
>Though she isn't exactly wrong...\
name "Luka"
>Oh? That's...\
name ""
>The thing Alice is holding...\
csp 700
lsp 701,":a;chara\vgirl_st11.bmp",-230,50:print 10,500
name "Vampire Girl"
>*Sniff*\
name ""
lsp 702,":a;chara\pramia_st11.bmp",50,50:print 10,500
name "Tiny Lamia"
>*Sniffle*\
name ""
lsp 703,":a;chara\gob_st21.bmp",280,20:print 10,500
name "Goblin Girl"
>Higu...\
name ""
>It looks like Alice scolded all three of them.\
>I guess I defeated The Four Bandits...\
name "Luka"
>So there were just the four of you?\
name ""
csp 701:csp 702:csp 703
lsp 700,":a;chara\dragonp_st11.bmp",0,50:print 10,500
name "Dragon Pup"
>That's right...\
name ""
lsp 700,":a;chara\dragonp_st11.bmp",-160,50
lsp 701,":a;chara\vgirl_st11.bmp",160,50:print 10,500
name "Vampire Girl"
>We could only find four...\
name ""
>They respond while wiping away tears.@
>So this is all the bandits were...?\
cspl 700,701:print 10,500
name "Luka"
>Well...@>What should we do, Alice?\
name ""
>I don't know what to do in front of four crying girls...\
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Alice"
>You were the one who wanted to root out the bandits.@
>Sell them, violate them, kill them, or eat them.@
>Do whatever you want.\
name ""
csp 700
lsp 702,":a;chara\dragonp_st12.bmp",-300,50:print 10,500
name "Dragon Pup"
>Don't eat me!@>Waaaaaah!\
name ""
lsp 700,":a;chara\vgirl_st12.bmp",-90,50:print 10,500
name "Vampire Girl"
>Waaaah!\
name ""
lsp 703,":a;chara\pramia_st12.bmp",120,50:print 10,500
name "Tiny Lamia"
>Waaah!\
name ""
lsp 701,":a;chara\gob_st22.bmp",330,20:print 10,500
name "Goblin Girl"
>Waaan! Waaan!\
name ""
>All four of them burst into tears again.\
csp 701:csp 702:csp 703
lsp 700,":a;chara\alice_st02.bmp",172,0:print 10,500
name "Alice"
>Well, fake Hero, what are you going to do?@
>Making four innocent little girls cry like this...\
name ""
name "Luka"
>Wha...? You made them cry!@
>Errr... Anyway....\
name ""
lsp 702,":a;chara\dragonp_st12.bmp",-300,50
lsp 700,":a;chara\vgirl_st12.bmp",-90,50
lsp 703,":a;chara\pramia_st12.bmp",120,50
lsp 701,":a;chara\gob_st22.bmp",330,20:print 10,500
name "Luka"
>First let's go to Iliasburg so you can apologize.@
>You caused them a lot of trouble... do you understand?\
name ""
name "Dragon Pup"
>I'll apologize...@>*Sniff*\
name ""
>Still crying, the four of them nod.\
csp 701:csp 702:csp 703
lsp 700,":a;chara\alice_st02.bmp",172,0:print 10,500
name "Alice"
>So you're going to pull them around the town?@
>What are you going to do if the people lynch them?\
name ""
lsp 702,":a;chara\dragonp_st12.bmp",-300,50
lsp 700,":a;chara\vgirl_st12.bmp",-90,50
lsp 703,":a;chara\pramia_st12.bmp",120,50
lsp 701,":a;chara\gob_st22.bmp",330,20:print 10,500
name "Tiny Lamia"
>L... Lynch...?\
name ""
name "Goblin Girl"
>Nooo! Waaah!\
name ""
name "Vampire Girl"
>*Sniff*@>Waaah!\
name ""
name "Luka"
>...It's ok, they won't do that!@
>Anyone who tries to lynch you, I'll beat them down!\
name ""
>I don't want the people to lynch the monsters...@
>I just want everyone to coexist peacefully.\
>Besides, that Amira thing is able to live in the city somehow.@
>Maybe they don't hate monsters as much as I thought there...\
name "Dragon Pup"
>You... You're such a good guy...\
name ""
name "Tiny Lamia"
>*Sniffle*\
name ""
>Thus Alice, me, and four crying monsters head to Iliasburg.\
bgmstop
dwave 1,"se\asioto2.ogg"
sean_change "bg017"
lsp 702,":a;chara\dragonp_st11.bmp",-300,50
lsp 700,":a;chara\vgirl_st11.bmp",-90,50
lsp 703,":a;chara\pramia_st11.bmp",120,50
lsp 701,":a;chara\gob_st21.bmp",330,20:print 10,500
bgm "bgm\city1.ogg"
name "Goblin Girl"
>I'm really sorry for bothering you...\
name ""
name "Tiny Lamia"
>I'm so sorry...\
name ""
name "Vampire Girl"
>I'm sorry...\
name ""
name "Dragon Pup"
>So sorry...\
name ""
>In the central plaza, the monsters apologize over and over.\
name "Citizen A"
>Geeze, the bandits were little things like this?\
name ""
name "Citizen B"
>I saw them a few times, and I thought they might be kids...@
>I guess it was true.\
name ""
name "Citizen C"
>We have to punish the bad boss dragon...\
name ""
name "Luka"
>Well...@
>They were bad, but they apologized and promised to stop.\
name ""
>For some reason, I felt like their parent.\
name "Sutherland Inn Owner"
>It seems like they're sorry, why not forgive them?@
>They must have had it hard, too...\
name ""
name "Elder"
>There were a lot of monsters in the forest twenty years ago.@
>Once these bandits showed up, it looks like they fled.\
name ""
name "Tool Shop Owner"
>These bandits really didn't do much.@
>We were just scared because there was a dragon and a vampire.\
name ""
>It looks like they might forgive them.@
>I relax a little.\
name "Sutherland Inn Owner"
>Well, it's like that then.@
>Now, you'll put in an honest day's work.\
name ""
name "Goblin Girl"
>Fa... Ok...\
name ""
name "Vampire Girl"
>Thank you...@> *Sniffle*\
name ""
name "Weapon Shop Owner"
>Hey dragon, can you breathe fire?@
>If you can, I'll give you a job.\
name ""
name "Warehouse Manager"
>Hey goblin, you look pretty strong.@
>Do you want to work in the warehouse?\
name ""
>It looks like they're accepting the monster girls!@
>I guess it will be alright after all.\
name "Luka"
>Alright! Happy Ending!\
name ""
cspl 701,703
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Fumu... That was unexpected.@
>So these humans were able to accept monsters...?\
name ""
>Alice says, with an impressed look on her face.\
name "Luka"
>It wouldn't have gone this way in Ilias Village.\
name ""
>My hometown holds a very deep prejudice, it would have gotten violent if this happened there.\
>I thought Iliasburg would be even worse... I'm glad I was wrong.@
>Maybe being in a big city gives people a different mindset?\
name "Luka"
>....Hmm?\
name ""
>The Dragon Pup pulls on my sleeve.\
lsp 700,":a;chara\dragonp_st13.bmp",0,50:print 10,500
name "Dragon Pup"
>You helped me so much...@
>Let me give you this.\
name ""
>The Dragon Pup hands me a beautiful red gem.@
>The solid red gem looks very valuable.\
name "Luka"
>What is this?\
name ""
>Did she take this from someone...?\
name "Dragon Pup"
>Some rich people saw me by the hideout and ran away.\
>This gem dropped out of their luggage.@
>I think it's a really valuable treasure.\
name ""
name "Luka"
>I see...@
>But, is it alright to give me something so valuable?\
name ""
>If I'm a true Hero, I probably shouldn't take stolen goods.@
>But if it's a token of appreciation...\
name "Luka"
>Ah, that's it.@
>If I find the owner while I travel, I'll give it back to him.\
name ""
>With that reasoning, it should be fine if I take it.@
>I'll hold onto it until I find who it belongs to.\
dwave 1,"se\fanfale.ogg"
mov %item02,1
>[Red Gem] received!\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>...That thing is in such a place...@
>It's too dangerous, I don't want a human to misuse it...\
>Oh well, the blue and silver aren't here, so I guess there's no issue.\
name ""
name "Luka"
>Eh?@
>Alice, do you know what this thing is?\
name ""
name "Alice"
>Of course. Who do you think I am?@
>But... It's probably better if I don't tell you.\
name ""
name "Luka"
>Stingy...\
name ""
>If she really got it like she said she did, I'm sure it's just normal jewelry.@
>If I can find those "rich people", I'll return it.\
>Well, that concludes the issue of the bandits.@
>I have to continue my journey.\
name "Luka"
>Well then... It's about time for us to head out.@
>Be good little monster girls, ok?\
name ""
lsp 702,":a;chara\dragonp_st13.bmp",-300,50
lsp 700,":a;chara\vgirl_st13.bmp",-90,50
lsp 703,":a;chara\pramia_st13.bmp",120,50
lsp 701,":a;chara\gob_st23.bmp",330,20:print 10,500
name "Goblin Girl"
>I will!\
name ""
name "Tiny Lamia"
>The Four Bandits are no more today...\
name ""
name "Vampire Girl"
>I won't do bad things anymore!\
name ""
name "Dragon Pup"
>I'll become an amazing monster, and help the world!\
name ""
name "Luka"
>Yeah! Do your best!\
name ""
>Saying that, I leave the plaza.\
dwave 1,"se\asioto2.ogg"
sean_change "bg018"
name "Luka"
>Faah. I really seemed like a Hero today, huh?\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>...Idiot.\
>What would you have done if she turned out to be an adult dragon?\
>Did you really want to die?\
name ""
name "Luka"
>I didn't go to the fight to die...@
>I only wanted to carry out my dream!\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>.....Idiot.\
name ""
>As Alice sighs, suddenly...\
csp 700:print 10,500
name "???"
>Just as I expected!\
name ""
name "Luka"
>Y... You!\
name ""
wait 500
bgmstop
bgmonce "bgm\battlestart.ogg"
lsp 700,":a;chara\amira_st01.bmp",0,0:print 10,500
eng "Unfortunate Lamia appears!":$sel6/
wait 1000
delay 4500
bgm "bgm\amira.ogg"
\
name "Luka"
>You... came again?\
name ""
name "Amira"
>Of course I came again.@
>I'm the surprise true heroine, after all.\
name ""
lsp 700,":a;chara\alice_st13b.bmp",-130,0
lsp 701,":a;chara\amira_st01.bmp",200,0:print 10,500
name "Alice"
>When did you become the heroine!?@
>Don't joke around like that!\
name ""
>...Why is she angry?\
name "Amira"
>Actually... a wicked wizard turned me into this ugly sight.@
>If I get a Hero's kiss, I'll return back to my princess form...\
name ""
name "Luka"
>Re... Really...?\
name ""
name "Alice"
>It's obviously lying, you idiot.\
name ""
name "Amira"
>Che. You saw through it...\
name ""
>The Lamia clicks her tongue as she sighs.\
>Somehow, this situation got even dumber.\
csp 701
lsp 700,":a;chara\amira_st01.bmp",0,0:print 10,500
name "Amira"
>There's no helping it...@
>It looks like I'll have to use my newly acquired magic.\
>Here I go! Heart Splash!\
name ""
dwave 1,"se\karaburi.ogg"
lsp 2,":c;effect\003.bmp",0,0:print 1
wait 300
csp 2:print 18,500,"system\mask01.jpg"
dwave 1,"se\slash.ogg"
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
name "Amira"
>Bah! That was the wrong screen effect!@
>Heart Splash was supposed to be effect number eight.@> Gah!\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
wait 1000
bgm "bgm\city1.ogg"
name "Luka"
>What was that...?\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Let's go, Luka.@
>If you spend all your time being stupid, you'll never reach the Monster Lord's castle.\
name ""
name "Luka"
>Ah. Yeah I guess you're right.\
name ""
>Thus, we leave Iliasburg.\
dwave 1,"se\asioto2.ogg"
>Now then... Next is...\
r@k@\
csp 700
mov %ivent01,1
mov %genzaiti,1
bgm "bgm\field1.ogg"
mov %gloval1_story_sinkou,1:gosub *savegloval1
goto *map1



*sean0059

gosub *genzaiti_bg
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Alice"
>Back to the bandit hideout...?@
>There's no reason to go there.\
name ""
name "Luka"
>I guess that's true...\
name ""
>There's no reason to go back there.@
>Now then... Next is...\
csp 700
goto *map1



*sean0060

gosub *genzaiti_bg
name "Luka"
>Alright, let's go to Happiness Village!\
name ""
>According to the Sutherland Inn's owner, something is happening there.\
name "Luka"
>There might be some big event happening there...\
name ""
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Alice"
>You're right, we should take a look.@
>If there's something going on, they won't be able to make their honey.\
>It would be a disaster if I couldn't have any more Ama-ama Dangos.\
name ""
name "Luka"
>...........\
name ""
>It really seems like eating is the only thing that goes on in her head.@
>Anyway, it's off to Happiness Village!\
csp 700
dwave 1,"se\asioto2.ogg"
sean_change "bg011"
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Alice"
>By the way...@
>Do you know why it's called Happiness Village?\
name ""
name "Luka"
>Because they're all happy...?\
name ""
>Having a bee farm, making delicious honey.@
>I imagine the villagers happily skipping through their fields.\
name "Alice"
>You're an idiot.@
>The name is derived from the nearby Harpy Village.\
name ""
name "Luka"
>Oh... is that why?\
name ""
>Happy and Harpy... I guess I could see a possible etymology there.\
name "Alice"
>Being close to the harpy village, and hearing that they're having a problem, I can take a guess as...@
>Hmm?\
name ""
dwave 1,"se\escape.ogg"
csp 700
print 10,1000
>Alice, stopping mid-sentence, suddenly vanishes.@
>If she ran... does that mean a monster is nearby!?\
r@k@\
goto *mitubati_start



*sean0061

bgm "bgm\field1.ogg"
name "Luka"
>Alright! I won!\
name ""
r@k@\
>I managed to defeat her somehow.@
>It looks like I still have a lot of room to improve...\
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Alice"
>Struggling so much against a weak monster, as usual.\
name ""
>Alice returns, spouting off insulting words.\
name "Luka"
>You don't have to say it like that...\
name ""
name "Alice"
>Well, you've gotten a bit better than before.@
>At least you aren't throwing out all of our salt.\
name ""
name "Luka"
>........\
name ""
>It looks like she still can't say anything nice without adding something insulting.\
>At any rate, we're almost to the Happiness Village.@
>I wonder what's happening there.\
dwave 1,"se\asioto2.ogg"
sean_change "bg023"
bgm "bgm\mura2.ogg"
name "Luka"
>So this is Happiness Village...?\
name ""
>It looks like a peaceful farming village.@
>Women are attending to the crops and the beehives all over the fields.\
name "Luka"
>It doesn't look like anything horrible is happening...\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Are you blind, you idiot?\
name ""
name "Luka"
>Eh....?\
name ""
name "Alice"
>Do you see any men?@
>Can you still say it isn't unusual?\
name ""
name "Luka"
>You're right... I only see women...\
name ""
>I can't see a single man anywhere.\
>The only male is a little boy helping to transport one of the hives.\
>Even the heavy farming labor is only being done by women...@
>What's going on...?\
lsp 700,":a;chara\mob_obasan.bmp",0,0:print 10,500
name "Woman"
>Oh, a traveler? A young one, at that.\
name ""
>A woman who was working at a nearby beehive starts to speak to me.\
name "Woman"
>You came all the way here, but we don't really have anything to entertain a traveler with.\
>Due to a shortage of manpower, we have a shortage of our speciality Happiness Honey, too...\
name ""
name "Luka"
>Why do you have a shortage of manpower...?\
name ""
>As I asked that, suddenly...\
csp 700:print 10,500
bgm "bgm\kiki1.ogg"
name "Little Boy"
>Waaaaa!\
name ""
>Suddenly the young boy starts to scream.\
name "Luka"
>What's going on!?\
name ""
dwave 1,"se\asioto1.ogg"
>Panicking, I run in the direction of the scream.@
>There I see...\
r@k@\
goto *hapy_a_start



*sean0062

bgm "bgm\mura2.ogg"
name "Luka"
>Ha....\
name ""
r@k@\
>Putting away my sword, I breathe a sigh of relief.\
lsp 700,":a;chara\mob_obasan.bmp",0,0:print 10,500
name "Woman"
>What happened!?\
name ""
lsp 700,":a;chara\mob_obasan.bmp",-160,0
lsp 701,":a;chara\mob_musume2.bmp",335,0:print 10,500
name "Girl"
>The traveler drove the Harpy away?@
>Amazing!\
name ""
>The villagers, coming out of their houses, start to gather around me.\
>As far as I can see, there really isn't a single older man.\
csp 701
lsp 700,":a;chara\mob_rouba.bmp",0,0:print 10,500
name "Elder"
>Driving off the Harpy... You must be really skilled!\
name ""
>From among the crowd of villagers, an old woman with a stern face stands in front of me.\
name "Luka"
>Who are you...?\
name ""
name "Elder"
>I'm the village chief's wife...@
>Since he has been kidnapped, I am the acting village chief.\
name ""
lsp 700,":a;chara\alice_st14b.bmp",-110,0
lsp 701,":a;chara\mob_rouba.bmp",160,0:print 10,500
name "Alice"
>Barricading yourself in a house even as a child is being abducted?@
>Can you really call yourself a chief like that?\
>Actually, not a single person in this village tried to help...\
name ""
name "Luka"
>Oi oi, Alice!\
name ""
lsp 700,":a;chara\mob_obasan.bmp",-160,0
lsp 701,":a;chara\mob_musume2.bmp",335,0:print 10,500
name "Woman"
>...........\
name ""
name "Girl"
>...........\
name ""
>The women all go silent at Alice's words, and stare at the ground.\
lsp 700,":a;chara\alice_st14b.bmp",-110,0
lsp 701,":a;chara\mob_rouba.bmp",160,0:print 10,500
name "Luka"
>You said too much, Alice...@
>It isn't possible for these weak women to fight monsters...\
name ""
>The only thing to help these people is a brave Hero!\
name "Elder"
>...What can weak people like us do?@
>Now, traveler.@
>We hate to impose, but we have a favor to ask of you...\
name ""
lsp 700,":a;chara\alice_st12b.bmp",-110,0:print 10,500
name "Alice"
>Hahaha, here it comes, Hero.@
>Now they're going to try to force their problems on you.\
name ""
name "Elder"
>.........\
name ""
>The old woman's face flashes with anger, but she continues talking.\
csp 701
lsp 700,":a;chara\mob_rouba.bmp",0,0:print 10,500
name "Elder"
>I'm sure you're aware, but there are no men in this village.@
>As you saw earlier, the harpies are kidnapping all of our men.\
name ""
lsp 700,":a;chara\mob_obasan.bmp",0,0:print 10,500
name "Woman"
>The man I married two months ago was kidnapped...\
name ""
lsp 700,":a;chara\mob_obasan.bmp",-160,0
lsp 701,":a;chara\mob_musume2.bmp",335,0:print 10,500
name "Woman"
>My new husband, too!@
>Even though he came from another village, he was kidnapped a month ago...\
>Even my fourteen year old son...@
>Those harpies again...\
name ""
name "Luka"
>How horrible...\
name ""
>One after another, it seems like the harpies have stolen every man from this village.\
name "Luka"
>What are they doing with all of the kidnapped men?\
name ""
csp 701
lsp 700,":a;chara\mob_rouba.bmp",0,0:print 10,500
name "Elder"
>We don't know... None of them have ever returned.\
>Are they worked as slaves? Eaten for food? We have no idea.\
name ""
name "Luka"
>...How awful...\
name ""
>I can't forgive them for doing something like this.@
>Such a terrible thing happening... will they ever accept monsters?\
name "Elder"
>With no men, this village is doomed to fade away.@
>Please, traveler.@
>Can you root out the harpies, and return peace to our village?\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-110,0
lsp 701,":a;chara\mob_rouba.bmp",160,0:print 10,500
name "Alice"
>Why don't you do it yourselves?\
name ""
>As usual, Alice is quick with the cutting remarks.\
name "Luka"
>Oi... Alice...\
name ""
name "Alice"
>Isn't it right, though? What meaning is there to bringing peace if you can't maintain it by yourselves?\
>To rely on outsiders while hiding in your houses...@>How pathetic.\
name ""
name "Luka"
>So you say, Alice...@
>But isn't it unreasonable to ask weak villagers to fight monsters?\
name ""
>After I rebuke Alice, I turn back to the old woman.\
name "Luka"
>Well then... Where do they take all of the men?\
name ""
name "Elder"
>It seems like there is a settlement to the east of this village, in the forest.\
name ""
csp 701
lsp 700,":a;chara\mob_obasan.bmp",0,0:print 10,500
name "Woman"
>Are you really going to defeat them...?\
name ""
lsp 700,":a;chara\mob_obasan.bmp",-160,0
lsp 701,":a;chara\mob_musume1.bmp",335,0:print 10,500
name "Girl"
>Yay! Thank you so much, traveler!\
name ""
csp 701
lsp 700,":a;chara\alice_st12b.bmp",67,0:print 10,500
name "Alice"
>Well aren't you happy?@
>This fake Hero is so easy to influence...@
>Just how many travelers have you sent to defeat these harpies?\
name ""
name "Luka"
>How many travelers...? Aren't I the first?\
name ""
lsp 700,":a;chara\alice_st12b.bmp",-110,0
lsp 701,":a;chara\mob_rouba.bmp",160,0:print 10,500
name "Elder"
>..........\
name ""
>As the old woman hesitates, another woman speaks up.\
csp 701
lsp 700,":a;chara\mob_musume1.bmp",175,0:print 10,500
name "Woman"
>So far seven people have headed off to defeat them.@
>...None returned.\
name ""
name "Luka"
>That many!?\
name ""
lsp 700,":a;chara\alice_st12b.bmp",67,0:print 10,500
name "Alice"
>See, they didn't bother to mention that part to you.@
>Luka, you're too trusting.\
>If you defeat them, they'll be happy.@
>If you fail, they'll just send another traveler to their death.\
>Do you still want to help such a horrible village?\
name ""
name "Luka"
>..........\
name ""
lsp 700,":a;chara\alice_st12b.bmp",-110,0
lsp 701,":a;chara\mob_rouba.bmp",160,0:print 10,500
name "Elder"
>We don't have a way to fight, though...@>We're powerless.\
name ""
lsp 700,":a;chara\alice_st13b.bmp",-110,0:print 10,500
name "Alice"
>Even so, you've sent seven travelers to their death.@
>Now you're trying to send yet another?\
>For sure the harpies are doing something bad.@
>But you all aren't much better.\
name ""
name "Elder"
>...........\
name ""
lsp 700,":a;chara\mob_obasan.bmp",-160,0
lsp 701,":a;chara\mob_rouba.bmp",160,0:print 10,500
name "Woman"
>...........\
name ""
>Not arguing with Alice, all the villagers silently stare at the ground.\
csp 700:csp 701:print 10,500
name "Luka"
>That's enough, Alice.@
>I'm still going to the harpies village.\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>Do you really want to be praised by the people of this village that badly...?@
>You're going to destroy yourself with that silly wish, you idiot.\
name ""
name "Luka"
>I'm not doing it just to be praised...@
>I just want to use my [Heroic Valiant Sword] to protect the weak!\
name ""
name "Alice"
>You're still a fake Hero, though.\
name ""
>Alice sighs at my words.\
lsp 700,":a;chara\mob_obasan.bmp",0,0:print 10,500
name "Woman"
>...I'll go too!\
name ""
>The woman suddenly shouted out.\
name "Woman"
>My husband died early due to a sickness...@
>My only son, Mark, was stolen by them!\
>If he's still alive, I'm sure he's waiting for someone to help him...@
>As a mother, I have to go!\
name ""
lsp 700,":a;chara\mob_obasan.bmp",-160,0
lsp 701,":a;chara\mob_rouba.bmp",160,0:print 10,500
name "Elder"
>It's too dangerous, Martha!\
name ""
csp 701
lsp 700,":a;chara\mob_musume1.bmp",175,0:print 10,500
name "Girl"
>I'm coming too!\
name ""
>Another woman yells out.\
name "Girl"
>It's as the silver-haired woman said.\
>In spite of the dire situation, we all just hid in our houses.@
>We're cowards.\
name ""
lsp 700,":a;chara\mob_musume1.bmp",15,0
lsp 701,":a;chara\mob_musume2.bmp",335,0:print 10,500
name "Girl"
>That's right... We have to defend our village!\
name ""
lsp 700,":a;chara\mob_obasan.bmp",-160,0:print 10,500
name "Woman"
>My eyes are finally open.@
>This is our village's problem.\
name ""
>After a few minutes, all the villagers are in agreement.@
>Every woman gathered around has decided to attack the harpies village.\
csp 701
lsp 700,":a;chara\mob_rouba.bmp",0,0:print 10,500
name "Elder"
>But everyone...\
name ""
lsp 700,":a;chara\mob_musume1.bmp",15,0
lsp 701,":a;chara\mob_obasan.bmp",160,0:print 10,500
name "Girl"
>It's too late, village chief.@
>We can't push an unrelated traveler to solve our problems.\
name ""
name "Woman"
>That's right.@>If we all band together, I'm sure we can do something...\
name ""
name "Luka"
>Hey, wait a moment!@
>Even if you all band together, it's still too dangerous!\
name ""
csp 701
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>...With harpies, there is always a leader.\
>If you defeat them, the rest will fall into chaos.@
>Like that, even weak people like them may stand a chance.\
name ""
name "Luka"
>Is that true...?@> Then, I'll defeat the leader!\
name ""
lsp 700,":a;chara\mob_musume1.bmp",15,0
lsp 701,":a;chara\mob_obasan.bmp",160,0:print 10,500
name "Woman"
>But...\
name ""
name "Luka"
>Find somewhere safe to wait.@
>Once I beat the boss, I'll give you all a signal to attack.\
name ""
>Like this, it should reduce the damage to the villagers to a minimum.\
>Even if it fails, I should be the only sacrifice...\
name "Woman"
>We understand.@
>We're sorry... The most important part is still up to you...\
name ""
csp 701
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>You still got stuck with the hardest part...\
name ""
name "Luka"
>Of course! I'm the Hero after all!\
name ""
name "Alice"
>....A fake one.\
name ""
name "Luka"
>Uhg...\
name ""
>It's alright no matter what she says.@
>If I do something heroic, I'm a Hero.\
>Anyway, I still have time before the attack on the harpies village.@
>Until tonight, I'll wait around in the village.\
r@k@\
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
csp 700:csp 611:cspl 3,7
gosub *city04_main
bg "bg\bg025.bmp",10,2000
gosub *setwindow_01p
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Luka...@>Why do you care about these strangers?\
>Do you just want them to call you a Hero?\
name ""
name "Luka"
>I just want to help them...@>Even if you call me a fake Hero, it doesn't change what I believe in.\
name ""
name "Alice"
>Humans are selfish, and will trample the weak if it benefits them.@
>Putting their desires above all else, they're happy to oppress others.\
name ""
>While watching the women prepare for the attack, Alice sighs.\
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>Even if they're dirty and weak, they don't look too bad when united.@
>Humans are really strange...\
name ""
name "Luka"
>Nobody likes being weak.\
>"I'm so weak, what can I do?"@>Humans really hate thinking like that.\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Hmm.@> When someone weak like you says that, it sounds believable.\
name ""
name "Luka"
>.............\
name ""
>I think I've gotten a lot stronger than before, though.@
>At any rate, it seems like everyone is prepared.\
lsp 700,":a;chara\mob_musume1.bmp",15,0
lsp 701,":a;chara\mob_obasan.bmp",160,0:print 10,500
name "Woman"
>Everyone is ready!\
name ""
name "Girl"
>My first fight... I'll do my best!\
name ""
name "Luka"
>Alright, let's head to the east!@
>Everyone, don't push yourselves!\
name ""
csp 700:csp 701:print 10,500
>We all headed out of the village toward the harpies location.\
bgmstop
dwave 1,"se\asioto2.ogg"
sean_change "bg026"
bgm "bgm\kiki2.ogg"
lsp 700,":a;chara\mob_musume1.bmp",15,0
lsp 701,":a;chara\mob_obasan.bmp",160,0:print 10,500
name "Girl"
>This is it...@
>A little bit further, and you'll come onto the harpies village.\
name ""
name "Luka"
>Alright.\
name ""
>There must be a lot of harpies in this village...@
>I need to find the leader fast!\
name "Luka"
>I'll defeat the leader and send the signal.@
>Once they're all confused and panicking, I'm counting on you!\
name ""
name "Woman"
>Be careful!@
>If it gets too dangerous, run away!\
name ""
name "Luka"
>If I fail, please run away yourselves.@
>Alright, I'm off!\
name ""
csp 701
lsp 700,":a;chara\alice_st11.bmp",172,0:print 10,500
name "Alice"
>Hey, Luka.\
name ""
name "Luka"
>Eh...?\
name ""
name "Alice"
>...Make sure you come back.@
>Don't lose in a place like this.\
name ""
name "Luka"
>...I won't lose!\
name ""
>Did hell just freeze over?@
>It's good to hear something nice from her mouth, for once.\
csp 700:print 10,500
name "Luka"
>Alright! Here I go!\
name ""
>Full of energy, I charge ahead.@
>Mom... Ilias... Please protect me!\
dwave 1,"se\asioto2.ogg"
sean_change "bg027"
name "Luka"
>I made it this far without being noticed...\
name ""
>Alice said they would be fast asleep if I came at sunset...\
>The harpies wake up early and fall asleep at sunset, so right now is my best chance.\
>There don't appear to be any harpies outside...\
name "Luka"
>According to Alice, the leader should be in the highest point...\
name ""
>There are houses in all of the trees.@
>And there, in the tallest tree, is a huge house.\
name "Luka"
>That must be it...\
name ""
>As I slowly step forward...\
name "???"
>Hey Sis, did you hear someone?\
name ""
name "???"
>You're right... It sounded like a human.\
name ""
name "Luka"
>Crap!\
name ""
r@k@\
goto *hapy_bc_start



*sean0063
r@k@\
bgm "bgm\kiki2.ogg"
name "Luka"
>Fah... I have to make sure I'm not found again.\
name ""
>I can't take my time, though.@
>Those Harpy Twins are sure to alert the other harpies.\
>I have to draw out the leader right away.\
name "Luka"
>It doesn't matter if they hear me anymore!\
name ""
dwave 1,"se\asioto1.ogg"
>I jump out of the bushes and run forward at full speed.@
>I run towards the tallest tree, where I'm sure the leader must live.\
name "???"
>Do you need something from my house...?\
name ""
dwave 1,"se\bird.ogg"
>I hear the sudden flap of wings behind me.@
>I turn around to see an unusual sight.\
name "Luka"
>No way...\
name ""
>Turning around was...@
lsp 700,":a;chara\queenhapy_st01.bmp",0,0:print 10,500
bgm "bgm\boss0.ogg"
>A regal looking harpy, standing alone.\
name "Luka"
>Are you the leader of the harpies?\
name ""
name "Queen Harpy"
>Indeed, I am the Queen Harpy.@
>Do you need something from me?@
>However I have a pretty good guess...\
name ""
name "Luka"
>I want you to stop kidnapping the villagers, and return the men.@
>If you keep this up, humans will never be able to live peacefully with monsters...\
name ""
>Before I draw my sword, I try to reason with her.@
>I doubt I can persuade her, but I have to try.\
name "Queen Harpy"
>...You have that in reverse, human boy.@
>We are forced to do this because humans cannot live peacefully with us.\
name ""
name "Luka"
>What do you mean...?\
name ""
name "Queen Harpy"
>I have no reason to explain myself to you.@
>This is something of critical importance to us, as well.\
name ""
name "Luka"
>I don't really get it... But if you aren't releasing them...!\
name ""
>I reluctantly draw my sword.@
>It looks like I have no choice but to fight...\
>I have no choice but to seal her with this sword...\
name "Queen Harpy"
>So it comes down to force, does it...@
>Then allow me to show you the power of the Harpy Queen!\
name ""
r@k@\
goto *queenhapy_start



*sean0064

bgm "bgm\kiki2.ogg"
name ""
r@k@\
name "Luka"
>Alright, I managed to defeat the Harpy Queen!\
name ""
>Since I haven't dealt fatal damage, she hasn't been sealed yet.@
>But she still seems to have lost too much energy to fight.\
>Now, as we planned...\
name "Luka"
>Up you go!\
name ""
>I throw the magic cylinder I prepared earlier into the air.\
dwave 1,"se\bom4.ogg"
>After a second the cylinder explodes, showering colorful light all over the area.@
>The signal that I beat the Harpy Queen...!\
dwave 1,"se\asioto1.ogg"
lsp 700,":a;chara\mob_obasan.bmp",0,0:print 10,500
name "Woman"
>Charge!\
name ""
dwave 1,"se\asioto1.ogg"
lsp 700,":a;chara\mob_obasan.bmp",-160,0
lsp 701,":a;chara\mob_musume1.bmp",335,0:print 10,500
name "Young Woman"
>Oh Ilias, give me strength!\
name ""
>The women from the Happiness village all come rushing in from their hiding places in the bushes, and quickly make it to where I'm standing.\
name "Woman"
>So you're the leader!\
name ""
name "Young Woman"
>While you hold down the boss, we'll...\
name ""
csp 701
lsp 700,":a;chara\queenhapy_st04.bmp",0,0:print 10,500
name "Queen Harpy"
>I see...@
>The villagers came to rescue the men...\
name ""
>While the Queen Harpy mutters that, the villagers surround her.\
lsp 700,":a;chara\mob_hapy1.bmp",-160,0
lsp 701,":a;chara\mob_hapy2.bmp",160,0:print 10,500
name "Harpy A"
>Queen! What's going on!?\
name ""
name "Harpy B"
>Humans are attacking!?\
name ""
>It seems like all the sleeping harpies are waking up at the noise.\
csp 701
lsp 700,":a;chara\queenhapy_st04.bmp",0,0:print 10,500
>I raise my sword in front of the Queen Harpy.\
name "Luka"
>Swear to me that you will return all of the men.@
>If you don't... I'll have to cut you...\
name ""
name "Queen Harpy"
>...I won't.\
name ""
>The Queen Harpy looks at the ground as she refuses me.\
>It looks like I have no choice... I'll have to seal her.@
>As I raise my sword...\
bgm "bgm\alice1.ogg"
dwave 1,"se\asioto1.ogg"
lsp 700,":a;chara\mob_ozisan3.bmp",0,0:print 10,500
name "Old Man"
>Hey! Wait!@> Stop that!\
name ""
lsp 700,":a;chara\mob_ozisan3.bmp",-160,0
lsp 701,":a;chara\mob_seinen1.bmp",160,0:print 10,500
dwave 2,"se\asioto1.ogg"
name "Young Man"
>Don't cut the Queen!\
name ""
>Jumping out of the tree houses, men start to crowd around us.@
>From young to old, they all start to come out and surround us.\
dwave 1,"se\asioto1.ogg"
>The men start to stand around the Queen Harpy, protecting her.\
lsp 700,":a;chara\mob_musume1.bmp",15,0
lsp 701,":a;chara\mob_ozisan3.bmp",160,0:print 10,500
name "Young Woman"
>Fa... Father!?\
name ""
lsp 700,":a;chara\mob_obasan.bmp",-160,0
lsp 701,":a;chara\mob_seinen1.bmp",160,0:print 10,500
name "Woman"
>Mark! You're safe!\
name ""
>The village women start to rush the men in joy.\
name "Luka"
>What the hell is going on?\
name ""
>The men are dressed normally, and look healthy.@
>No matter how you look at it, it doesn't look like they're being forcefully held here...\
name "Woman"
>Mark! What happened to you!?\
name ""
lsp 700,":a;chara\mob_seinen1.bmp",-160,0
lsp 701,":a;chara\mob_hapy2.bmp",160,0:print 10,500
name "Mark"
>M...Mother...@>Let me introduce you to my wife, Piana.\
name ""
>Mark points to a harpy standing next to him.\
lsp 701,":a;chara\mob_hapy3.bmp",160,0:print 10,500
name "Mark"
>And...@> This is our daughter, Pipi.\
name ""
name "Pipi"
>....Grandma?\
name ""
>The tiny harpy walks up to the woman and flaps her wings.@
>Everywhere I turn is a similar scene...\
lsp 700,":a;chara\mob_musume1.bmp",15,0
lsp 701,":a;chara\mob_ozisan3.bmp",160,0:print 10,500
name "Young Woman"
>Father... What do you mean?\
name ""
name "Father"
>Aa... Well... What I'm saying is... Reina is your new stepmother.\
name ""
lsp 700,":a;chara\mob_musume1.bmp",15,0
lsp 701,":a;chara\mob_hapy2.bmp",160,0:print 10,500
name "Reina"
>...Ni... Nice to meet you...\
name ""
>A harpy that looks to be around the same age as the young woman introduces herself.\
>No matter where I look...\
lsp 700,":a;chara\mob_rouba.bmp",-160,0
lsp 701,":a;chara\mob_sensi1.bmp",160,0:print 10,500
name "Elder"
>Impossible...@
>The traveler we sent in here a year ago...\
name ""
name "Former Traveler"
>Ah... I'm not a traveler anymore... I actually have seven children now.\
name ""
cspl 700,701:print 10,500
>It seems like all the kidnapped men got married to a harpy...@
>I stare around at the scene in disbelief.\
lsp 700,":a;chara\mob_ozisan3.bmp",-160,0
lsp 701,":a;chara\mob_seinen1.bmp",160,0:print 10,500
name "Old Man"
>It's like that...@>Will you stop attacking the harpies?\
name ""
name "Young Man"
>They are our wives and children...@
>So please stop hurting them...\
name ""
lsp 700,":a;chara\mob_obasan.bmp",-160,0
lsp 701,":a;chara\mob_musume1.bmp",335,0:print 10,500
name "Woman"
>So this harpy... Is my granddaughter...?\
name ""
name "Young Woman"
>My stepmother... is a harpy?\
name ""
csp 701
lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
name "Elder"
>That's right.@
>These harpies are our family now.\
name ""
>An elderly man slowly walks forward.\
lsp 700,":a;chara\mob_obasan.bmp",-160,0
lsp 701,":a;chara\mob_rouzin1.bmp",160,0:print 10,500
name "Woman"
>Chief!?\
name ""
lsp 700,":a;chara\mob_rouba.bmp",-160,0:print 10,500
name "Elder"
>You were still alive!?\
name ""
name "Chief"
>The harpies are our family, and so are the village women.@
>We shouldn't allow our two families to fight each other.\
name ""
lsp 700,":a;chara\mob_seinen1.bmp",-160,0:print 10,500
name "Young Man"
>That's right! My mother's family is now Piana's family too.@
>Let's stop fighting!\
name ""
name "Village Men"
>That's right!\
name ""
name "Luka"
>...........\
name ""
>As all the village women are standing around looking dumbfounded, the Queen Harpy starts to speak.\
csp 701
lsp 700,":a;chara\queenhapy_st04.bmp",0,0:print 10,500
name "Queen Harpy"
>Since we can be nothing but female, we would be unable to breed if we did not borrow human males.\
>However, with humans coming to hate monsters, what choice did we have?\
name ""
name "Luka"
>But... You took every one of them...\
name ""
name "Queen Harpy"
>We don't want to die out.@
>You can't just take them all away...\
name ""
lsp 700,":a;chara\mob_hapy1.bmp",-160,0
lsp 701,":a;chara\mob_hapy2.bmp",160,0:print 10,500
name "Harpy A"
>We never hurt any of the men, we made sure they were happy...\
name ""
name "Harpy B"
>That's right, the men are too important to injure or force them against their will...\
name ""
name "Luka"
>So you mean the men were enjoying being here...?\
name ""
csp 701
lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
name "Chief"
>Of course! They made me feel young again!@
>Every night...\
name ""
lsp 700,":a;chara\mob_rouba.bmp",-160,0
lsp 701,":a;chara\mob_rouzin1.bmp",160,0:print 10,500
name "Elder"
>I see...@> Can I talk with you over there for a second?\
name ""
name "Chief"
>Hii!@> Honey, I can explain, really!\
name ""
cspl 700,701:print 10,500
name "Luka"
>...........\
name ""
>What exactly should I do now...?\
lsp 700,":a;chara\mob_ozisan1.bmp",-160,0
lsp 701,":a;chara\mob_obasan.bmp",160,0:print 10,500
name "Man"
>I'm sorry...@> I have three more wives now...\
name ""
name "Woman"
>And how many kids?\
name ""
name "Man"
>Seven...@> Two more next month...\
name ""
lsp 700,":a;chara\mob_musume2.bmp",15,0
lsp 701,":a;chara\mob_ozisan2.bmp",160,0:print 10,500
name "Young Woman"
>I'm glad father came back, but...@
>I have two stepmothers and six stepsisters now...?\
name ""
cspl 700,701:print 10,500
>Similar disputes start to pop up everywhere.@
>Some families look like they're about to start fighting each other.\
>It seems like the harpies aren't willing to let any of the men return.\
name "Luka"
>What should we do Alice...\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>...How would I know.\
name ""
name "Luka"
>Hrrmm... What can we do....\
name ""
>If the men are all safe, I guess we don't need to get rid of all the harpies...\
lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
name "Chief"
>Everyone is a big family! Wouldn't that be the best!\
name ""
>The Village Chief yells out while his wife wrings his neck.\
lsp 700,":a;chara\mob_seinen1.bmp",-160,0
lsp 701,":a;chara\mob_rouzin1.bmp",160,0:print 10,500
name "Young Man"
>That's right!\
name ""
lsp 700,":a;chara\mob_ozisan1.bmp",-160,0:print 10,500
name "Man"
>Let's combine the Happiness Village with the Harpy Village in one big family!\
name ""
cspl 700,701:print 10,500
lsp 700,":a;chara\mob_obasan.bmp",0,0:print 10,500
name "Woman"
>Since my son is married now, and I have a bunch of grandchildren, I don't really mind...\
name ""
>She might be happy that her son is married, but can she really handle having so many daughter-in-laws and grandchildren...?\
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>This is a problem that they'll need to solve themselves.@
>A fake hero shouldn't get involved.\
name ""
name "Luka"
>I guess that's right...\
name ""
>I want to speak up, but I shouldn't involve myself in their affairs...@
>Honestly, I don't think I could say anything to solve this issue.\
>This is the kind of world I'm aiming for...@
>But seeing it in front of my eyes, I realize that it's going to be a lot tougher than I thought.\
bgmstop
csp 700
sean_change "bg028"
bgm "bgm\dance.ogg"
>The arguments continue into the night...\
lsp 701,":a;chara\queenhapy_st01.bmp",-160,0
lsp 700,":a;chara\mob_rouba.bmp",160,0:print 10,500
name "Queen Harpy"
>Well then...@
>We won't forcibly kidnap men from the Happiness Village anymore.\
name ""
name "Elder"
>Hrm.@
>We will send men from our village to marry harpies.\
>In return, the harpies must also help with the farming and beekeeping in our village.\
name ""
>It seems as though they finally reached an agreement.\
cspl 700,701:print 10,500
>After that, they started to prepare a festival.@
>Harpy and human alike are dancing drunk in the village square.\
lsp 700,":a;chara\mob_obasan.bmp",0,0:print 10,500
name "Woman"
>This is all thanks to you.@
>On behalf of everyone in Happiness Village, allow me to thank you.\
name ""
name "Luka"
>Thank you, but something like this is natural for a Hero to do.\
name ""
>I may not be a Hero in title, but I am in actions!@
>Therefore, I'm definitely not a fake Hero!\
lsp 700,":a;chara\alice_st14b.bmp",-120,0
lsp 701,":a;chara\mob_obasan.bmp",160,0:print 10,500
name "Alice"
>If you want to show your appreciation...@
>...I love sweet things.\
name ""
name "Woman"
>Ok! We'll give you plenty of Happiness Honey.@
>Right now we only have enough for one jar, though.\
name ""
name "Alice"
>Oh... This was unexpected.\
name ""
name "Luka"
>...Alice, you...\
name ""
>I can only stare at Alice's greed.\
cspl 700,701:print 10,500
name "Luka"
>But... Can you convince the men to marry a harpy?\
name ""
>I mutter to myself while watching them dance in the plaza.@
>Isn't it like sending them out as a sacrifice...?\
lsp 700,":a;chara\mob_ozisan3.bmp",0,0:print 10,500
name "Man"
>Don't bother worrying, young man.\
>With this, our villages will join together in peace, and forge a deep bond.\
>Most importantly, once you feel the pleasure a harpy can bring, a human just won't do it for you anymore.\
name ""
name "Luka"
>Mister... Your wife is standing right behind you...\
name ""
csp 700:print 10,500
>Is this really a good outcome?@
>I guess it's a good first step to peaceful coexistence....\
name "Luka"
>What do you think, Alice?\
name ""
lsp 700,":a;chara\alice_st19b.bmp",67,0:print 10,500
name "Alice"
>It's sweet. \
name ""
>Alice is happily licking her honey-covered fingers.\
name "Luka"
>If the harpies had just asked for this arrangement from the start, couldn't this whole situation have been averted?\
name ""
>That would have been easier for everyone...\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>The humans hated monsters, why would any of the men voluntarily leave?@
>You idiot.\
name ""
name "Luka"
>..........\
name ""
>I guess that's true...\
name "Alice"
>To begin with, the men would have refused to be sent out to marry them.\
>Isn't one of Ilias' commandments not to have sexual relations with monsters?\
name ""
name "Luka"
>...Don't say that, Alice.@
>It makes Ilias' teaching seem bad...\
name ""
>It's true that marriage would be forbidden under Ilias' law...@
>If a man rejects it, the only choice for them is to force it...\
>They would go extinct if they didn't...\
name "Luka"
>Oh, that's not good...@
>I can't think things that doubt Ilias...\
name ""
>I shake off my doubt as I stand up.@
>I look at Alice and sigh.\
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>Well, it's true that forcibly kidnapping the men was a pretty rough solution.@
>It looks like even the Queen was a little hesitant about using such a method.\
name ""
name "Luka"
>Is that right...?\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Of course.@> Otherwise the Queen would have easily defeated you.\
>She was doubting herself, and didn't use her full power to fight you.\
name ""
name "Luka"
>Really...?\
name ""
>Is it true she was holding back?@
>Anyway, this issue has been resolved.\
bgmstop
sean_change "bg024"
bgm "bgm\epilogue.ogg"
>The next morning...\
lsp 700,":a;chara\mob_rouba.bmp",-160,0
lsp 701,":a;chara\mob_obasan.bmp",160,0:print 10,500
name "Elder"
>We are indebted to you, traveler.\
name ""
name "Woman"
>Please come to our village again, we'll be glad to have you!\
name ""
csp 701
lsp 700,":a;chara\queenhapy_st01.bmp",0,0:print 10,500
name "Queen Harpy"
>Even though we had our reasons, we were still wrong.@
>Because of you, we were able to correct it.\
>I wish you a safe journey.\
name ""
name "Luka"
>Thank you all!\
name ""
>The true test of how they can get along may still be to come...@
>But I believe that they can keep this bond.\
lsp 700,":a;chara\mob_seinen1.bmp",-160,0
lsp 701,":a;chara\mob_musume1.bmp",335,0:print 10,500
name "Youth"
>Thank you! Come play with us again!\
name ""
name "Young Woman"
>Please be safe!\
name ""
lsp 700,":a;chara\mob_hapy1.bmp",-160,0
lsp 701,":a;chara\mob_hapy2.bmp",160,0:print 10,500
name "Harpy"
>Heehee... Come and play again!@
>We'll be glad to be your partners then... \
name ""
cspl 700,701:print 10,500
>Thus, we start to head out from the village.@
>But we were stopped by the Queen Harpy.\
lsp 700,":a;chara\queenhapy_st04.bmp",0,0:print 10,500
name "Queen Harpy"
>Can I ask you one last question?@
>The silver-haired woman, are you by any chance...\
name ""
lsp 700,":a;chara\alice_st14b.bmp",-133,0
lsp 701,":a;chara\queenhapy_st04.bmp",170,0:print 10,500
name "Alice"
>I'm a traveling gourmet.\
name ""
name "Queen Harpy"
>Oh... Is that right...@
lsp 701,":a;chara\queenhapy_st01.bmp",170,0:print 10,500
>I don't need to inquire any further then, do I?\
name ""
name "Luka"
>.......?\
name ""
cspl 700,701:print 10,500
>Thus, we leave the village.@
mov %item03,1
>Next, let's head to...\
r@k@\
mov %ivent02,1
mov %genzaiti,3
bgm "bgm\field1.ogg"
mov %gloval1_story_sinkou,1:gosub *savegloval1
goto *map1



*sean0067

gosub *genzaiti_bg
name "Luka"
>Shall we check out that village the shopkeeper mentioned?\
name ""
>Even though it's so close to my hometown, I've never heard of it.@
>Just what kind of village is it...?\
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Alice"
>Hmm...@> This village isn't mentioned in my guide book.\
>Maybe there's a new specialty food to be discovered...\
name ""
>Alice seems excited to be continuing her eating journey.@
>It seems like she thinks the world only exists to feed her.\
name "Luka"
>Anyway, let's see what's there.\
name ""
>We turn to the southwest, and start heading towards Enrika.\
dwave 1,"se\asioto2.ogg"
sean_change "bg004"
>The shopkeeper gave me a rough idea of where it is.@
>It should be near here...\
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Alice"
>Hmm...?@>That's an unusual monster...\
name ""
name "Luka"
>Eh...?\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,500
>As soon as I turn around, Alice vanishes.@
>In her place appeared...\
r@k@\
goto *delh_a_start



*sean0068

bgm "bgm\field1.ogg"
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
r@k@\
name "Alice"
>A Dark Elf in such a place...@
>Why on earth...\
name ""
name "Luka"
>Who knows?\
name ""
>Not that she expected me to know, I'm sure.\
name "Luka"
>I didn't know that Elves were this close to Ilias Village...\
name ""
csp 700:print 10,500
>I barely take a few steps forward, when another monster blocks my path!\
r@k@\
goto *delh_b_start



*sean0069

bgm "bgm\field1.ogg"
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
r@k@\
name "Alice"
>Another Dark Elf...@
>They don't usually hang out in groups like that...\
name ""
name "Luka"
>Besides, I thought there weren't too many Dark Elves to start with?\
name ""
name "Alice"
>That's right.@
>Originally elves were a pure and innocent race.\
>However very rarely one would become corrupted.@
>They called this phenomenon [Degeneration].\
>They would turn into a depraved existence.@
>Alienated from the other elves, they would act like normal monsters.\
>In addition, if a Dark Elf continues to grow in power, it's possible that they could turn into a different kind of monster...\
>In any case, we shouldn't be loitering around here.\
name ""
name "Luka"
>Hmm... That was pretty detailed, Alice.\
name ""
name "Alice"
>Of course. Just who do you think I am?\
name ""
name "Luka"
>I have no idea.\
name ""
>It would be bad to keep getting attacked without making any progress.@
>Let's hurry to Enrika.\
csp 700:print 10,500
name "Luka"
>But... Where is Enrika?@
>It should be nearby...\
name ""
>After that, we walked around for a few hours.@
>Finally seeing a break in the trees, we come across a village.\
name "Luka"
>There it is! Enrika!\
name ""
>Happy at finally finding the village, we enter.\
dwave 1,"se\asioto2.ogg"
sean_change "bg029"
bgm "bgm\enrika.ogg"
name "Luka"
>This is Enrika...?\
name ""
>It's a very small village.@
>There was a strange atmosphere hanging in the air.\
>Is it peaceful...? Mysterious...? In any case, it's very strange.\
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>...So it's like that...@
>Those Dark Elves from before make sense now too...\
name ""
>It looks like Alice figured something out.\
name "Luka"
>What do you mean?@>Hmm..?\
name ""
dwave 1,"se\asioto2.ogg"
lsp 700,":a;chara\micaela_st01.bmp",0,0:print 10,500
>A lone woman walks out from the interior of the village.@
>She stands out among the strange atmosphere permeating the rest of the area.\
name "Enrikan Woman"
>You...@> Don't appear to be a merchant...\
name ""
name "Luka"
>Th... That's right...@
>I heard from a shopkeeper in Iliasburg about this village.\
name ""
name "Enrikan Woman"
>...Please go away.@
>Other than merchants who trade things we need, we don't allow anyone else in the village.\
name ""
>Surprisingly, it looks like they won't let me into the village.@
>A horribly exclusive village...\
name "Luka"
>No way...\
name ""
name "Enrikan Woman"
>You may take offense at our prohibition...@
>But this is how we've lived for a long time.@
>If you are a sensible traveler, please leave us alone.\
name ""
name "Luka"
>...I understand, sorry for troubling you.\
name ""
>I don't want to trample over people who want to live quietly.@
>A true Hero would never do such things.\
>As I bow to the woman and turn to leave, the woman suddenly notices my mother's ring.\
lsp 700,":a;chara\micaela_st03.bmp",0,0:print 10,500
name "Enrikan Woman"
>That ring!@
>Could you be... Luka!?\
name ""
name "Luka"
>Eh...? That's right...\
name ""
>Why does she know my name?@
>I've never been to this village before...\
lsp 700,":a;chara\micaela_st02.bmp",0,0:print 10,500
name "Enrikan Woman"
>You really are Luka, aren't you...@
>You've grown so big...\
name ""
name "Luka"
>Um... Do you know me?\
name ""
name "Enrikan Woman"
>...Yes. My name is Micaela.\
name "Micaela"
>I know your father and mother well.\
name ""
lsp 700,":a;chara\micaela_st01.bmp",0,0:print 10,500
>The woman named Micaela introduces herself with some hesitation.@
>Suddenly determination appears in her eyes.\
name "Micaela"
>...But now, please turn back.@
>When the time comes... We'll be able to talk.\
name ""
name "Luka"
>...I understand.\
name ""
>Nothing I say would be any use, I can see it in her eyes.@
>Even if I stayed here, I wouldn't get anything more out of her.\
name "Luka"
>Alright... I'll come again.\
name ""
lsp 700,":a;chara\micaela_st02.bmp",0,0:print 10,500
name "Micaela"
>Yes... I wish you luck in your battles, Luka.\
name ""
csp 700:print 10,500
>Thus we turn away from the village and return.@
>This village... I need to keep it in mind.\
dwave 1,"se\asioto2.ogg"
sean_change "bg004"
bgm "bgm\field1.ogg"
name "Luka"
>...What a strange village.\
name ""
>It had a strange, nostalgic feeling.@
>And that Micaela person knew me...\
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Alice"
>What does it mean...@
>That village...\
name ""
name "Luka"
>What's wrong, Alice?@
>When we entered the village, it looked like you realized something.\
name ""
>Being worried by herself... Strange girl.\
name "Alice"
>I understood something, but there's still one thing I don't get.@
>I was sure that Enrika was an isolated Elf village...\
name ""
name "Luka"
>Oi oi... Are you saying everyone in that village was an Elf?\
name ""
>It's true that the village was really strange...\
name ""
lsp 700,":a;chara\alice_st04.bmp",172,0:print 10,500
name "Alice"
>That's what I thought...@
>But that Micaela woman...\
name ""
>Alice sighs as if she has given up.\
name "Alice"
>Whatever, I didn't get to have a feast at the village like I thought I would.@
>What a pointless trip.\
name ""
csp 700:print 10,500
>...As always, the subject returns to food with her.\
>There's nothing we can do in that village for now.@
>Now, for the next destination...\
r@k@\
mov %ivent03,1
mov %genzaiti,4
mov %gloval1_story_sinkou,1:gosub *savegloval1
goto *map1



*sean0070

gosub *genzaiti_bg
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Going back there? What a half-baked idea.@
>I bet they can't even cook a proper meal.\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>.........\
name ""
name "Luka"
>...Did you really think that was funny?\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>N...No I didn't!\
name ""
csp 700:print 10,500
>Anyway, it's no use going back to Enrika for now.@
>Now, for the next destination...\
csp 700
goto *map1



*sean0071

gosub *genzaiti_bg
name "Luka"
>Shall we head to Iliasport?\
name ""
>Once we get to the port, we'll be able to take a ship to Sentora.@
>It's finally time to leave this continent.\
>...But we won't be able to return here for a while.@
>Do I have anything left here to do...?\
r@k@\
csel "I'm prepared!",*sean0071a,"Something is left to do",*sean0071b



*sean0071a

name "Luka"
>Alright, I'm ready.@
>Let's go to Iliasport!\
name ""
lsp 700,":a;chara\alice_st02.bmp",172,0:print 10,500
name "Alice"
>Hmm... If it's a port town, there should be a lot of foreign delicacies gathered from all over.\
name ""
>Alice seems excited to continue feeding her gullet.\
>As long as she can eat things, she has no issues.@
>I guess it's better than her eating humans.\
name "Alice"
>Hmmhmm... I'm getting excited. Let's go!\
name ""
name "Luka"
>Right, right...\
name ""
>Thus we turn to the north and head to Iliasport.\
dwave 1,"se\asioto2.ogg"
sean_change "bg019"
>It looks like the divine protection of Ilias is strong here, reducing the amount of monsters.\
>Though the further away from the Ilias Temple in the south we get, the stronger the monsters seem to become.\
>As we walk on the long path, suddenly...\
r@k@\
goto *hiru_start



*sean0071b

name "Luka"
>Wait, there's still something left I want to do.\
name ""
>I open up the map again.\
goto *map1



*sean0072

bgm "bgm\field1.ogg"
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
r@k@\
name "Alice"
>Finally finished?\
name ""
>Before I noticed, Alice was already standing next to me again.@
>I actually didn't even notice her vanish.\
name "Luka"
>Yeah... Don't you think I've gotten pretty good?\
name ""
name "Alice"
>What were you looking at, you idiot.\
>What was with those pathetic attacks?\
name ""
name "Luka"
>Eh...? I thought they were pretty good.\
name ""
lsp 700,":a;chara\alice_st04.bmp",172,0:print 10,500
name "Alice"
>Geez...\
name ""
name "Luka"
>By the way, Alice. When I'm fighting, where do you go?\
name ""
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Alice"
>Hmm?@> I walk around, have some tea, maybe catch a bug or two.@
>Lots of things.\
name ""
name "Luka"
>.......\
name ""
>Basically, you're bored.@
>If you're so bored, you can always help me...\
dwave 1,"se\asioto2.ogg"
sean_change "bg009"
bgm "bgm\yaei.ogg"
>We make camp for the night.\
name "Luka"
>And that's how Heinrich defeated the Monster Lord, and brought world peace.@
>...And everyone lived happily ever after.\
name ""
>The story from 500 years ago, when Heinrich defeated the Monster Lord.@
>Since I was a boy, I read the picture book over and over.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...What do you mean "everyone lived happily ever after", you idiot.\
name ""
>While biting into her food, Alice spits back at me.@
>I thought it was a good story... Why did she have to call me an idiot?\
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>I'm a monster.@
>Did you really think I'd enjoy a story about a human killing a Monster Lord?\
>Do you want me to tell you a story about a monster killing a human king?\
name ""
name "Luka"
>Ah... Yeah, that's right...\
name ""
name "Alice"
>If you want to build a peaceful world where everyone can coexist, you'll need to have some delicacy about that.\
name ""
name "Luka"
>Sorry...\
name ""
>Certainly monsters probably wouldn't want to hear that old story...\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Well... Heinrich defeating that old Monster Lord is worthy of some praise.\
>She only cared about power, destruction, and chaos.@
>Perhaps being defeated by a Hero was brought about by herself.\
name ""
>Alice said something pretty unexpected.\
name "Luka"
>Brought down by her own mistakes... That's a cutting remark.\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Trying to rule by power is a savage act.@
>You should expect to get savagery back.\
name ""
name "Luka"
>You're right.@
>I wonder how the current Monster Lord is...?\
name ""
>The current Monster Lord is shrouded in mystery.@
>No human has seen it, and even most monsters have only heard rumours.\
>It's said that she's extremely strong, and may even be the strongest Monster Lord yet.\
name "Luka"
>If they've declared full-scale war with humans... I guess they're a villain after all?\
name ""
>If the Monster Lord is unable to listen to reason, then I'll have no choice but to fight her...\
>Right now, the Monster Lord is ruining relations with humans and monsters.\
name "Luka"
>I wonder if the [Slaughter of Remina] was by her instruction as well...@
>She must be a horrible person after all, don't you think Alice?\
name ""
>Since Alice is a monster, the Monster Lord must be her master too...\
lsp 700,":a;chara\alice_st08b.bmp",67,0:print 10,500
name "Alice"
>...Who knows.\
name ""
>Alice looks up at the sky with a strange expression.\
name "Alice"
>Maybe... The Monster Lord has just lost her way...@
>Whether humans should be destroyed...\
name ""
name "Luka"
>Alice, do you know the Monster Lord!?@
>Don't tell me... You've seen her!?\
name ""
>It's rumored that only the most important monsters have ever seen the Monster Lord.@
>The Four Heavenly Knights should all have met her...\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Yes... I know the Monster Lord.@
>She may even be closer to you than you might think...\
name ""
name "Luka"
>To me?@> But I grew up in the countryside.\
>I've only seen my first monster only recently, too.\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Man, you're really dumb, you idiot.@
>Well, changing the topic...\
name ""
>Alice suddenly stands up.\
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>It's time for more training.@
>Seeing your pathetic fight made me disappointed.\
>If you try to fight the Monster Lord like that, it would just be a miserable sight.\
name ""
name "Luka"
>You don't have to say it like that...\
name ""
name "Alice"
>Now, pick up your sword!@
>I'll show you how you should fight!\
name ""
>Thus we trained into the night...\
sean_change "bg009"
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>That's right... Stabilize your upper body.@
>Step forward with your foot, and quickly thrust into the enemy as I showed you.\
name ""
name "Luka"
eng "Like this...?":$sel6/
dwave 1,"se\miss.ogg"
\
name ""
>I step forward and lunge quickly.\
name "Alice"
>Hmm... It doesn't look too bad.@
>You need to try that in actual combat now, and not just training.\
name ""
name "Luka"
>Thank you...@> This is an amazing technique!\
name ""
name "Alice"
>It's said that Bloody Fernandez mastered this technique, and covered the battlefield with her bloody thrusts.\
>Using this Blood Fissure Thunder Thrust technique, she killed her enemies one after another, making a lake of blood.\
name ""
name "Luka"
>That's a very shady sounding, bloody technique...\
name ""
>Blood Fissure Thunder Thrust...\
>When I use it, I'll omit the Blood Fissure part, and leave Thunder Thrust.\
dwave 1,"se\fanfale.ogg"
mov %skill01,3
>Luka learns [Thunder Thrust]!\
name "Alice"
>This technique is most useful right at the start of combat.\
>That is, if you use it in the first turn it will unleash its full power.\
>Every turn after that, its power will slowly wane.@
>Choose wisely whether it's worth it to use the SP.\
name ""
name "Luka"
>I see... I understand, Alice.\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Well then, let's end the practice for today.@
>Let's head off to sleep to get ready for tomorrow.\
name ""
csp 700:print 10,500
>Thus our training session ends for tonight.@
>Satisfied, I head off to sleep...\
bgmstop
textoff
csp -1
bg black,99,5000,"system\lngtwave.dll/vwi"
bg "bg\bg001.bmp",99,5000,"system\lngtwave.dll/vwi"
wait 1500
gosub *setwindow_01p
name "???"
>Luka...@>Oh brave Luka...\
name ""
name "Luka"
>.....\
name ""
>I hear a voice calling me from somewhere...@
>This is...\
bgm "bgm\irias.ogg"
lsp 700,":a;chara\iriasu_st01.bmp",0,0
print 10,3000
name "Ilias"
>Defeat the Monster Lord, Luka.\
name ""
name "Luka"
>Y...Yes...\
name ""
name "Ilias"
>That's right... Defeat the Monster Lord...\
name ""
bgmstop
textoff
csp -1
bg black,99,5000,"system\lngtwave.dll/vwi"
bg "bg\bg010.bmp",99,5000,"system\lngtwave.dll/vwi"
wait 500
bgm "bgm\hutuu1.ogg"
dwave 1,"se\morning.ogg"
wait 1500
gosub *setwindow_01p
name "Luka"
>Ilias!?\
name ""
>I open my eyes to the soft morning light.@
>Jumping up, I look around restlessly.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>As usual, you're so noisy in the morning.\
name ""
name "Luka"
>Ahh... Ilias...@
>Thank you for giving me your revelation!\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Praying right as you get up...@
>You're like some smelly old man.\
name ""
name "Luka"
>Even young people give their gratitude to Ilias.@
>Do you want to pray with me, Alice?\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>Ha! That's a laugh.@
>I'm a monster! Why the hell would I pray to your god!?\
name ""
>As usual, she's so rude in the morning.@
>Thus we continue on our journey to Iliasport.\
dwave 1,"se\asioto2.ogg"
sean_change "bg030"
bgm "bgm\field1.ogg"
name "Luka"
>This is a muggy forest...\
name ""
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Alice"
>In these kinds of places, a lot of tropical monsters are likely to appear.@
>Watch where you're going.\
name ""
name "Luka"
>Tropical monsters...?\
name ""
csp 700:print 10,500
>As I question Alice, suddenly...\
r@k@\
goto *rahure_start



*sean0073

bgm "bgm\field1.ogg"
r@k@\
name "Luka"
>Fuu... That was pretty good!\
name ""
lsp 700,":a;chara\alice_st04.bmp",172,0:print 10,500
name "Alice"
>Having so much trouble against such a worthless opponent?\
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
>........\
name ""
>Alice looks down at the former Rafflesia Girl by her foot.\
name "Luka"
>...Are you going to eat her?\
name ""
lsp 700,":a;chara\alice_st03.bmp",172,0:print 10,500
name "Alice"
>What are you saying!?@
>How could I eat a fellow monster!?\
>I just wanted to have a taste of the petal...\
name ""
name "Luka"
>Oi oi... Are you serious?\
name ""
lsp 700,":a;chara\alice_st04.bmp",172,0:print 10,500
name "Alice"
>It's a plant, so it would grow back...@
>Besides, it was just a passing thought.\
name ""
name "Luka"
>........\
name ""
>What a glutton.@
>Shaking my head, I continue onwards.\
dwave 1,"se\asioto2.ogg"
sean_change "bg030"
print 10,500
name "Luka"
>Once we're out of these woods, we should reach Iliasport.\
name ""
>Just a little bit more north of this forest.@
>Almost out of the muggy forest, another monster appears!\
r@k@\
goto *ropa_start



*sean0074

bgm "bgm\field1.ogg"
name ""
r@k@\
name "Luka"
>Phew... That was a dangerous opponent.\
name ""
>Making one wrong move, I may have been eaten.@
>The thought sends chills down my spine.\
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Alice"
>If you took too long to finish her off, she would have taken her time eating you.\
name ""
name "Luka"
>Hey, Alice.@
>Even if a monster was going to eat me, would you just sit and watch?\
name ""
name "Alice"
>It would be unfortunate, but I'd sit still and watch.@
>Due to my own reasons, I won't give special support to a human.\
name ""
name "Luka"
>Unfortunate...?\
name ""
name "Alice"
>It would be better to be eaten by me than a monster like that.@
>...Don't you think?\
name ""
name "Luka"
>Hii...!\
name ""
>She's a bad person after all...\
>Anyway, I want to get out of this forest.@
>Iliasport should be close by.\
name "Luka"
>Alright, let's go Alice!@
>Once we're out of here, we should be at a vibrant port!\
name ""
lsp 700,":a;chara\alice_st02.bmp",172,0:print 10,500
name "Alice"
>Filled with seafood specialties...@
>Hehe, I'll look forward to it.\
name ""
name "Luka"
>.........\
name ""
>It still amazes me every time just how obsessed she is with eating.\
dwave 1,"se\asioto2.ogg"
sean_change "bg031"
bgm "bgm\city1.ogg"
>We soon arrived in Iliasport.\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>For a port town, it isn't very lively.\
name ""
name "Luka"
>You're right... I wonder if something happened.\
name ""
>The port almost looks deserted.\
>I thought there would be stores lining the streets, with merchants hawking their wares to all the passerbys...\
>I should ask that shopkeeper over there what's going on...\
csp 700:print 10,500
name "Luka"
>Excuse me... Is there something happening in this port?@
>It seems strangely deserted...\
name ""
lsp 700,":a;chara\mob_ozisan2.bmp",0,0:print 10,500
name "Shopkeeper"
>Of course it's deserted.@
>Since last year, nobody has made a round trip to the Sentora continent.\
name ""
name "Luka"
>Eh!?\
name ""
>I've never heard of ships being unable to go to the Sentora continent.\
>But then again, the amount of pilgrims to the Ilias Temple has declined since last year...\
>Was this the reason...?\
name "Luka"
>How come nobody has made a round trip to Sentora?\
name ""
name "Shopkeeper"
>There's a horrible storm.@
>Every time a ship leaves the coast, it's hit by a huge storm.\
name ""
name "Luka"
>A storm...?@
>You don't mean that it always starts storming as soon as they leave, do you?\
name ""
name "Shopkeeper"
>Yes, every time.@
>No matter how clear it looks, as soon as a ship sets out it starts storming.\
name ""
name "Luka"
>...That can't be natural.\
name ""
name "Shopkeeper"
>As the rumors go, it's the work of monsters.@
>They're harassing us or something, I don't really know.\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>Hmm... I see.\
name ""
>Alice nods suddenly.\
name "Luka"
>...Do you know something, Alice?\
name ""
name "Alice"
>Mmm... A little.\
name ""
>I eye Alice suspiciously.\
name "Luka"
>What does this mean? Can you explain it?\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>I can't speak too much about it...@
>A strong youma is blocking the ships from crossing.\
>Their goal is to block pilgrims from making it to the Ilias Temple.\
name ""
name "Luka"
>A strong youma...?@
>In other words, we have to beat them.\
name ""
>If it's a monster causing the storm, then I just have to beat them.\
>Being unable to set sail must be causing hardship for the people in this port.\
>I can't allow a monster to do such a thing!\
name "Alice"
>...You wouldn't even be a match.\
name ""
>Alice declares flatly.\
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>But at this rate, I won't be able to enjoy any of the foreign delicacies...\
name ""
name "Luka"
>..........\
name ""
>No, that doesn't matter.\
>Being unable to leave this continent would be very bad.@
>If I want to beat the Monster Lord, I can't stay here.\
name "Luka"
>Well, what should we do...?\
name ""
>We can't swim it...@
>What should we do...\
name "???"
>There's a way, my Hero!\
name ""
wait 500
bgmstop
bgmonce "bgm\battlestart.ogg"
lsp 700,":a;chara\amira_st01.bmp",0,0:print 10,500
eng "Unfortunate Lamia appears!":$sel6/
wait 1000
delay 4500
bgm "bgm\amira.ogg"
\
name "Amira"
>I am Amira, an Unfortunate Lamia.@
>A snake swaying in the breeze.\
name ""
name "Luka"
>Oioi...@
>I thought you lived in Iliasburg.\
name ""
name "Amira"
>I am Amira, a snake that travels.@
>In short, a [Snavel].@
>I follow my darling, and sometimes go ahead of him to welcome him.\
name ""
name "Luka"
>I see... Well then.\
name ""
>I turn my back and start to walk away as Amira stops me.\
name "Amira"
>Wait, darling! I'm not just an annoying character.@
>For my darling, I collected information from the "sort of" illegal information shop.\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-130,0
lsp 701,":a;chara\amira_st01.bmp",200,0:print 10,500
name "Alice"
>Very well, we'll listen only to that.\
name ""
name "Amira"
>Quiet, you!\
name ""
lsp 700,":a;chara\alice_st13b.bmp",-130,0
name "Alice"
>What...!? You...!\
name ""
>...Just what is happening here...\
csp 700:csp 701
lsp 700,":a;chara\amira_st01.bmp",0,0:print 10,1500
name "Luka"
>Uhm... That information... Can I hear it?\
name ""
name "Amira"
>For my darling, I'll tell him anything.@
>My three sizes, from above, are [275] [78] [93].\
name ""
name "Luka"
>I don't want to hear about that at all.@
>Do you know a way to get to the Sentora continent?\
name ""
name "Amira"
>From what I've gathered...@
>If you go out of the town and head east a ways, you will come across a cave.\
>In there lies the treasure of the legendary pirate Captain Selene.\
name ""
name "Luka"
>The Captain Selene...?\
name ""
>One hundred years ago, Selene was a legendary pirate that traveled all over the seas.@
>Even someone from the country like me has heard that legend.\
name "Amira"
>In that treasure trove seems to be the legendary [Poseidon's Bell].@
>Carrying that bell, no matter how the sea rages, the ship won't sink.\
name ""
name "Luka"
>I see... If that's true...\
name ""
>If it really is that famous Captain Selene's treasure, then a mysterious item like that may really be there.\
>If we're able to get that bell, then we would be able to safely travel to the Sentora continent!\
name "Amira"
>But the cave is a monster's den...@
>Many adventurers have attempted to claim Selene's treasure...\
>Most that went looking never returned...@> Kyaa! Amira is scared!\
name ""
name "Luka"
>Guh...\
name ""
>I really want to cut this thing, but she gave some valuable information today.@
>I endured my rising desire to slash her.\
name "Amira"
>Amira's happy embarrassing information session ends here.@
>Was I able to help you?\
name ""
name "Luka"
>You made me slightly angry, but it was helpful.\
name ""
name "Amira"
>Then, I shall leave with the breeze.\
>...By the way, I don't have any H-Scenes.@
>I'm sorry to all of you Lamia lovers.\
name ""
name "Luka"
>Urge to kill rising...\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,1000
>Amira quickly crawls away.\
bgm "bgm\city1.ogg"
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>A pirate's treasure...@
>Even if it's rotten, there may be a delicious dish there.\
name ""
name "Luka"
>The food doesn't matter.@
>Anyway, let's head to the cave.\
name ""
csp 700:print 10,500
>Before we go to explore that cave, shall we talk to some people around the port?\
r@k@\
wait 1000
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
csp 611:cspl 3,7
gosub *city05_main
dwave 1,"se\asioto2.ogg"
cspl 3,7
csp 611
cspl 700,705
bg black,7,1500
bgm "bgm\field1.ogg"
saveoff
textoff
csp -1
mov %sinkoumode,0:skipoff:autoclick 0
bg "bg\map1.bmp",10,1000
goto *sean0074m



*sean0074m

btndef clear
lsp 601,":s/20,20,0;#bbbbbbIliasburg ",395,280
lsp 602,":s/20,20,0;#bbbbbbIliasport ",275,50
lsp 603,":s/20,20,0;#bbbbbbIrina Mountains ",155,250
lsp 604,":s/20,20,0;#bbbbbbHappiness Village ",615,190
lsp 605,":s/20,20,0;#bbbbbbEnrika ",260,400
lsp 606,":s/20,20,0;#bbbbbbIlias Village ",365,470
strsp 607,"Treasure Cave",415,50,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 607,17
print 1
btnwait2 %cmd1
if %cmd1=0 goto *sean0074m
if %cmd1=-1 mov %sel2,%hanyo1:gosub *menu:goto *sean0074m
csp -1
btndef clear
if %cmd1=17 goto *sean0074a
goto *sean0074m



*sean0074a

bg black,10,1500
gosub *setwindow_01
bg "bg\bg009.bmp",10,1500
bgm "bgm\yaei.ogg"
name "Luka"
>It's a lot further than I thought.@
>If I knew it would take this long, I would have spent the night in Iliasport.\
name ""
>I thought it would only take a few hours, but we're barely halfway there.@
>We decided to make camp here in the middle.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>What a haphazard idiot.@
>Pick up your sword, we're training again.\
name ""
name "Luka"
>I'll do my best!\
name ""
>Thus we trained for a few hours.\
sean_change "bg009"
name "Luka"
>Haa... Haa... Haa...\
name ""
>...That's my limit, I'm out of energy.@
>I didn't learn a new technique tonight, and only improved on my basics.\
>Learning new techniques one after another would be hard to remember, anyway.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>You have so many wasteful movements.@
>It kills your speed and power.\
name ""
name "Luka"
>Even if you say that, I'm swinging with all of my power.\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Your movements need to be like the wind, your body one with the earth, and have fire in your sword.\
name ""
name "Luka"
>.......?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>That's the secret of fighting.@
>If you can't get better, beating the Monster Lord will remain a dream.\
name ""
name "Luka"
>Sorry but... I have no idea what you're talking about.\
name ""
>Saying strange zen things like that just confuses me.\
name "Alice"
>Sheesh. First you need to focus your mind.@
>Cross your legs there and try meditating.\
name ""
name "Luka"
>Hmm... I'm not very good at those kinds of things.\
name ""
>While muttering, I sit down in a cross-legged meditating position.\
name "Alice"
>Don't grumble.@
>It's said that the fallen angel Erigora was able to immediately heal her wounds by meditating.\
>It's obviously a fake story, but concentrating your mind is still important.\
name ""
name "Luka"
>...........\
name ""
skillname "Meditation"
>Luka quietly meditates.\
dwave 2,"se\kaihuku.ogg"
mov %damage,%max_mylife/2
>Luka recovers half of his missing health!\
skillname ""
name "Luka"
>It's true!@> My wounds healed!\
name ""
bgm "bgm\comi1.ogg"
lsp 700,":a;chara\alice_st07b.bmp",67,0:print 10,500
name "Alice"
>What!?@
>Is that even possible!?@
>What the hell is wrong with your body?\
name ""
name "Luka"
>...Is it strange?@
>Didn't you just say some fallen angel or something was able to heal his wounds?\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>Why do you think that would make it normal for you to be healed!?@
>Having your wounds healed just by meditating is strange no matter how you look at it!\
name ""
name "Luka"
>But...\
name ""
skillname "Meditation"
>Luka quietly meditates.\
dwave 2,"se\kaihuku.ogg"
mov %damage,%max_mylife/2
>Luka recovers half of his missing health!\
skillname ""
name "Luka"
>See, I can do it again.\
name ""
lsp 700,":a;chara\alice_st07b.bmp",67,0:print 10,500
name "Alice"
>What is that... Scary...\
name ""
name "Luka"
>Hey!@> Stop poking me!\
name ""
>Somehow or another, I seem to have learned a new ability!\
dwave 1,"se\fanfale.ogg"
mov %skill01,4
>Luka learned [Meditation]!\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>You're a strange one...\
name ""
bgmstop
sean_change "bg021"
bgm "bgm\field1.ogg"
>The next morning...\
>We arrive at the cave, and step inside.\
dwave 1,"se\asioto2.ogg"
sean_change "bg032"
bgm "bgm\dungeon1.ogg"
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Hrm... It smells like a fox.\
name ""
>Alice sniffs her nose in disgust.\
name "Luka"
>What does a fox smell like...?\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>Thin fried tofu.\
name ""
>...I don't get it.@
>Let's keep moving...\
dwave 1,"se\asioto2.ogg"
sean_change "bg032"
name "Luka"
>The walls and floor are pretty sturdy.\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>If pirates really did hide all of their treasure here, there is sure to be a lot of traps.\
name ""
name "Luka"
>We'll have to be careful...\
name ""
>Some of the adventurers who came in here and never returned might have triggered some of the traps, too.\
name "Luka"
>It's odd... If so many came in here without coming out, where are all of the corpses?\
>Somehow, it seems like ghosts are going to come out at any second...\
name ""
lsp 700,":a;chara\alice_st07b.bmp",67,0:print 10,500
name "Alice"
>G...Ghost!?\
name ""
name "Luka"
>Hmm? What's wrong?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>N...Nothing...\
name ""
>I have a hunch as to what caused that reaction...\
csp 700
lsp2 255,":a;chara\alice_st01b.bmp",400,300,100,100,0
gosub *mls_cmd_window2a:print 1
for %move=0 to 200 step 1
msp2 255,1,3,2,2,0
print 1:wait 3
next
wait 500
>...Too close.@
>Why is she so close...\
name "Luka"
>Why... are you so close to me?\
name ""
name "Alice"
>Yo...You're the one who's too close to me.\
name ""
>...Whatever.\
lsp2 255,":a;chara\alice_st03b.bmp",600,900,500,500,0:print 10,500
name "Alice"
>Besides... Why would you think I'd be afraid of something like this!\
name ""
>Stop blaming the victim...\
name "Alice"
>You know? I mean ghosts are so un-scientific and everything.@
>Just an ignorant product of foolish humans.\
name ""
>Now she's trying to reason...\
name "Luka"
>Wha! What was that!?\
name ""
lsp2 255,":a;chara\alice_st07b.bmp",600,900,500,500,0:print 10,500
name "Alice"
>Hiii!\
name ""
dwave 1,"se\ero_makituki1.ogg"
>Alice suddenly jumps at me and wraps her tail around me!\
name "Luka"
>Uwa! Don't wrap around me!\
name ""
>With her tail wrapped around me, I stagger at the huge weight.@
>I wasn't joking though, I did see a shadow in the corner of my eye.\
name "Luka"
>It seems like something is here after all...\
name ""
>I pull out my sword as a precaution.\
lsp2 255,":a;chara\alice_st01b.bmp",600,900,500,500,0:print 10,500
name "Alice"
>....This isn't a ghost.\
name ""
name "Luka"
>Ghost...?\
name ""
lsp2 255,":a;chara\alice_st03b.bmp",600,900,500,500,0:print 10,500
name "Alice"
>Don't say that word!@> Finish this off quickly!\
name ""
dwave 1,"se\escape.ogg"
csp2 245
csp2 255:print 10,1000
>Alice disappears in a panic.@
>Since Alice ran... A monster?\
name "Luka"
>Oi! Show yourself!\
name ""
>As I yell down the dark passage, suddenly...\
r@k@\
goto *youko_start



*sean0075

bgm "bgm\dungeon1.ogg"
r@k@\
name "Tiny Fox"
>......!?\
name ""
name "Luka"
>You can't do anything bad anymore like that.\
name ""
>I sheathe my sword and try to pat the little fox's head.\
name "Tiny Fox"
>Faaa!\
name ""
name "Luka"
dwave 1,"se\damage.ogg"
>Ouch!\
name ""
>She bit me...\
dwave 1,"se\escape.ogg"
>After hissing at me one last time, she turns around and runs out of the cave.\
>...What a poor loser.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Are you finished...?\
>But foxes are still infesting this place...@
>That type of monster shouldn't live in this cave...\
name ""
name "Luka"
>...Then where did that fox come from?\
name ""
>That little fox said something about a Tamamo.@
>Did this Tamamo also come to search for the [Poseidon's Bell]?\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Sheesh, those things are really annoying.\
name ""
name "Luka"
>I don't really get it... But let's hurry on.\
name ""
>Apparently there are monsters trying to get the treasure.@
>Before they reach it, I need to get that bell.\
>Thinking that, I keep moving forward.\
dwave 1,"se\asioto2.ogg"
sean_change "bg032"
name "Luka"
>...What's that?\
name ""
>There's a giant boulder in the corner of the passage.@
>There's also a giant ball with spikes... and a huge pitfall...\
>It looks like someone triggered the trap...\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>It looks like someone triggered the traps already.\
name ""
name "Luka"
>I wonder if it was that Kitsune's companion...\
name ""
>Since they triggered the traps already, I guess we can continue safely.@
>But if they get that bell before us, it will all be meaningless.\
name "Luka"
>Let's hurry, Alice.\
name ""
>As I said that to Alice, suddenly...\
r@k@\
goto *meda_start



*sean0076

bgm "bgm\dungeon1.ogg"
r@k@\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>My, my... You sure are brutish.\
>You say you want to create a world where monsters and humans can coexist... Yet you attack and seal monsters one after another.\
name ""
name "Luka"
>I'm only fighting monsters that are attacking travelers, and can't get along with humans.\
name ""
name "Alice"
>What a selfish way of thinking...@>Anyway, let's keep going.\
>We don't have any time to kill.\
name ""
name "Luka"
>Yeah, we have to hurry!\
name ""
csp 700:print 10,1000
>That Kitsune's companion must be ahead of us.\
>We have to catch up to her somehow and get the bell first.
>We quickly head forward.\
dwave 1,"se\asioto2.ogg"
sean_change "bg032"
name "Luka"
>Why does a monster want the [Poseidon's Bell] anyway?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>If you use your head a little, you would figure it out, you idiot.@
>They're obviously trying to get the bell so that a human can't use it.\
>Going to all the trouble to cause that huge storm would be pointless if a human could just get this bell and sail past it.\
>So they just have to get it first.\
name ""
name "Luka"
>...The timing is too strange, though.\
name ""
>The people in the town said it started last year, so if it was really that important they would have gone for the bell a long time ago.\
>After a year, suddenly they're going for the bell at the same time as we are...?\
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>Oh, it looks like you aren't completely hollow up there.\
>Most humans wouldn't ever try to venture to the very bottom of this cave.@
>Thinking that nobody would try, they probably just left it where it was.\
name ""
name "Luka"
>But the citizens said that people were trying to go to the cave before...@
>That means... They must have heard about me!\
name ""
>So the bad guys must have gotten in a panic and decided to race me to the bell!@
>It all makes sense!\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>You're a real idiot.@
>Do you think anyone cares about a fake Hero?\
name ""
name "Luka"
>That...\
name ""
>How rude.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>You'll need to be careful about them, though...@
>I don't know if it's Tamamo or Alma Elma, but it's sure to be trouble.\
name ""
name "Luka"
>Eh...? Do you know that Tamamo girl?\
name ""
>As I ask her that, I notice some movement ahead of us.\
name "Luka"
>...What is that?\
name ""
>That little fox from before is standing in the passage.@
>Wait, not quite...@> She's actually struggling in a cobweb!\
name "Luka"
>Is that a monster's trap...?@
>Why would it catch a fellow monster?\
name ""
name "Alice"
>Not all monsters consider each other allies.@
>Like you humans, they fight each other sometimes.\
>Especially the insect type monsters, they'll make almost anything their feed.@
>That Kitsune was stupid.\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,1000
>Insulting the fox, Alice disappears.@
>Suddenly, the owner of the cobweb appears in front of me!\
r@k@\
goto *kumo_start



*sean0077

bgm "bgm\dungeon1.ogg"
r@k@\
>As soon as I sealed the Spider Girl, her cobwebs vanished.@
>The Tiny Fox, now no longer stuck, falls to the ground.\
name "Luka"
>I'm glad you're ok...\
name ""
>I try to pat the Tiny Fox's head again.\
name "Tiny Fox"
>Fuuu!\
name ""
name "Luka"
dwave 1,"se\damage.ogg"
>Ouch!\
name ""
>...She bit me again.\
dwave 1,"se\escape.ogg"
>After biting me, the Tiny Fox quickly runs ahead again.\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...You finished?@
>You really like doing pointless things, huh?\
name ""
name "Luka"
>Pointless?@> I guess so...\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>You're a bigger idiot than I thought.@
>If that Spider Girl doesn't eat, she'll die.\
>You should have just let "survival of the fittest" take its course.@
>Thinking an act like that is evil is thinking all of nature is evil.@
>Do you get it?\
name ""
name "Luka"
>...I know that.@>But...\
name ""
>I'm not so childish as to not get that...@
>To continue living, it's on the backs of other living organisms.\
name "Alice"
>If you save all of the predators prey, the predators will all starve to death.@
>...Is that a better outcome?\
>If that's so, does that mean herbivores are good and carnivores are evil?\
>If someone declared that, would he be a good guy or a bad guy?\
name ""
name "Luka"
>........\
name ""
>I wasn't able to give a retort to that...\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...Well even if you understand it, it's pointless.\
name ""
name "Luka"
>Eh...?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Even understanding the inherent contradiction, it seems to be human nature to help something when it happens right in front of you.\
>Denouncing the act in self-righteousness while still committing it themselves... hypocrisy.\
name ""
name "Luka"
>...I don't really understand difficult things but if I come across the same situation, I'm going to help the weaker one.\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>Good luck carrying out your belief, then.@
>At least try not to let your mask come off and reveal your true character.\
name ""
name "Luka"
>I believe in myself!\
name ""
>The world I want to create can't be built on false ideals and intentions hidden behind masks!\
name "Luka"
>Let's keep going!\
name ""
>This cave is really deep...@
>The treasury can't be much further now.\
dwave 1,"se\asioto2.ogg"
sean_change "bg033"
lsp 700,":a;chara\mimic_st11.bmp",0,0:print 10,500
>We suddenly come onto a small room, with a lone chest sitting in the middle.\
name "Luka"
>A chest...\
name ""
>I stop upon seeing it, and just stare at the chest.\
>...Why do I feel so suspicious?@
>Is it just my imagination?\
name "Luka"
>...What do you think, Alice?@
>Should I open it...?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>How would I know? Do whatever you want.\
>Just... If anything happens, I'll leave you without hesitation.\
name ""
name "Luka"
>I know that already...\
name ""
lsp 700,":a;chara\mimic_st11.bmp",0,0:print 10,500
goto *sean0077a



*sean0077a

if %continue=1 bgm "bgm\dungeon1.ogg"
if %continue=1 lsp 700,":a;chara\mimic_st11.bmp",0,0
if %continue=1 bg "bg\bg033.bmp",10,5000
if %continue=1 gosub *setwindow_01
mov %continue,0
>What should I do...?\
r@k@\
csel "Open",*mimic_start,"Ignore",*sean0078



*sean0078

name "Luka"
>...I'll ignore it.\
name ""
>I couldn't shake off the bad feeling I was getting.@
>We walk past the chest without opening it.\
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>Hahaha... So you're not too dumb after all.\
name ""
name "Luka"
>Saying it like that... So it was a trap?\
name ""
name "Alice"
>...If you're curious, why don't you open it?\
name ""
name "Luka"
>No way...\
name ""
>Leaving the small room, we continue onwards.\
goto *sean0080



*sean0079

bgm "bgm\dungeon1.ogg"
r@k@\
name "Luka"
>Whew... That surprised me.\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>So you beat the Mimic?@
>I thought you had a 0% chance of winning...\
name ""
name "Luka"
>Haha... I guess that means I'm getting closer to being a true Hero!\
name ""
>After I laugh, I realize a cold-hearted fact...\
name "Luka"
>Oioi...@
>If you thought it was that hopeless, you could have helped.\
name ""
name "Alice"
>I'm traveling with you, but I'm not your ally.\
>Besides, any normal person would be suspicious of a chest in the middle of the room like that.@
>It seemed like any idiot who would open that would be fated to lose...\
name ""
name "Luka"
>..........\
name ""
>How rude.\
name "Luka"
>Whatever, let's just keep going.@
>We don't have any time to waste.\
name ""
>After defeating the Mimic, we continue onwards.\
goto *sean0080



*sean0080

dwave 1,"se\asioto2.ogg"
sean_change "bg034"
name "Luka"
>Hmm...?@>That's...\
name ""
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\nanabi_st01.bmp",0,0:print 10,500
>A monster, as if blocking the way, is guarding the door in front of us.\
>Before I notice it, Alice has vanished, too...\
name "Luka"
>Are you the ally of that Kitsune!?\
name ""
>She has an astounding seven tails...@
>She's obviously in a class of her own compared to that other Kitsune...\
name "???"
>Yes... I am Nanabi.\
name ""
name "Luka"
>Eh...?\
name ""
>This monster isn't Tamamo?\
name "Nanabi"
>Past this door is the treasury... So I can't let you pass.@
>If you choose not to return...\
name ""
name "Luka"
>I'll advance, even if by force!\
name ""
>A true Hero wouldn't retreat here!\
name "Nanabi"
>Understood...@
>I'll show you the power of Tamamo's aide!\
name ""
r@k@\
goto *nanabi_start



*sean0081

bgm "bgm\dungeon1.ogg"
r@k@\
name "Luka"
>Mmm...@> Nmn...\
>Fwa... That was a nice nap.\
name ""
>I open my eyes to a dark cave ceiling.@
>I blink a couple times before I remember what happened.\
name "Luka"
>Ah that's right! Those weird eyes made me fall asleep!\
name ""
name "Nanabi"
>.........\
name ""
>In front of me, a fox is sitting silently.\
>Was... Nanabi sealed somehow?@
>What the hell happened...?\
name "Luka"
>Hmm?\
name ""
dwave 1,"se\dassyutu.ogg"
>Suddenly the first Kitsune that I defeated appears.@
>She runs around nervously until finally laying down next to the sealed Nanabi.\
name "Luka"
>What's going on...?\
name ""
>I'm only able to scratch my head at the two sealed foxes in front of me.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>You don't remember?@
>...It looks like you really were completely asleep.\
name ""
name "Luka"
>Alice... Just what happened?\
name ""
>Did Alice actually help me when I fell asleep?@> No, that can't be...\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>You're significantly stronger when asleep, but I don't know why...\
name ""
name "Luka"
>Eh? I am?\
name ""
>According to Alice, I defeated Nanabi while sleeping?@
>I don't remember that at all...\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>You should only fight while sleeping from now on.@
>If you do that, it will be an easy trip.\
name ""
name "Luka"
>No way...\
name ""
>I don't want to be unconscious all the time...@
>More importantly...\
name "Luka"
>Let's continue on!@
>That Tamamo monster or whatever must be in there!\
name ""
>I hope she hasn't already taken the [Poseidon's Bell].\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>It seems like you were too late...\
name ""
name "Luka"
>Eh...!?\
name ""
csp 700:print 10,500
dwave 1,"se\trap.ogg"
bg "bg\bg035.bmp",10,1500
>The door slowly opens...@
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,1500
>A lone girl appears.@
>It looks like she's another Kitsune...\
>Before Nanabi was sealed, it looks like this girl would only come up to her knees.\
name "Luka"
>She looks weaker than Nanabi...\
name ""
>Thinking that, I let out a relieved sigh.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Idiot. Look at her tails.\
name ""
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Luka"
>One, two, three... Nine!?\
name ""
>No matter how many times I count, it always comes up nine.\
name "Luka"
>But it's only two more than Nanabi...\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...Idiot.@
>Seven tails isn't even comparable with nine.\
>She's one of the Four Heavenly Knights: Tamamo.\
>One of the top monsters, like Granberia.\
name ""
name "Luka"
>W...What!?\
name ""
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
>That little girl is as strong as Granberia...?\
name "Tamamo"
>Sorry, you two.@
>You became like that as I moved onto the treasury.\
name ""
>Tamamo pats the two sealed foxes on their heads.\
name "Tamamo"
>I'll give you a tiny bit of my power.\
name ""
>Saying that, her palm brightly shines as she pats the sealed Kitsune on the head.\
dwave 1,"se\power.ogg"
lsp 701,":a;chara\tamamo_st01.bmp",-170,0
lsp 700,":a;chara\youko_st01.bmp",170,0:print 10,500
>She suddenly returns to her original appearance!\
lsp 700,":a;chara\youko_st03.bmp",170,0:print 10,500
name "Kitsune"
>Wawawa...\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,500
>The small Kitsune quickly hides behind Tamamo's back.\
csp 701
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>Nanabi... It will take me a little longer to return you.@
>Sorry, but I'll have to do it later.\
name ""
name "Nanabi"
>.........\
name ""
>Nanabi bows down before Tamamo's feet.@
>Finally, Tamamo turns to face me.\
name "Tamamo"
>Hum... So you're Luka?@
>Defeating Nanabi... You must have some skill.\
name ""
>Tamamo slowly walks around me, sniffing.\
bgm "bgm\tamamo.ogg"
lsp 700,":a;chara\tamamo_st04.bmp",0,0:print 10,1500
name "Tamamo"
>So cute. @
>You'd be a good mate. \
name ""
name "Luka"
>No way!\
name ""
name "Tamamo"
>Fufu... You're a good guy.@
>I want to play with someone cute like you on my bed...\
name ""
name "Luka"
>.....\
name ""
>As I turn my gaze lower, I notice that Tamamo is holding a bell in her hand.\
>An incredibly old bell attached to a string.\
name "Luka"
>No way... Is that...\
name ""
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,1500
name "Tamamo"
>Indeed, this is the [Poseidon's Bell].@
>Crossing over to Sentora is so annoying, so I'm taking this.\
name ""
name "Tamamo"
>Honestly, it doesn't really matter to me. But Alma Elma is so annoying...\
name ""
name "Luka"
>Alma Elma...?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",267,0
lsp 701,":a;chara\tamamo_st01.bmp",-200,0:print 10,500
name "Alice"
>She's one of the Four Heavenly Knights as well, causing a storm that blocks the route.\
name ""
name "Luka"
>Do the Four Heavenly Knights have a reason to block the route...?\
name ""
name "Tamamo"
>Saying that...@
>If you want this bell, what are you going to do?\
name ""
name "Luka"
>Uhm... Defeat you and take it, I guess?\
name ""
>As I move my hand to unsheathe my sword, Alice grabs my wrist.\
name "Alice"
>...Stop. She isn't someone you can face right now.\
name ""
name "Luka"
>But...\
name ""
>Watching us, Tamamo starts to laugh.\
name "Tamamo"
>Haha, that's surprising... That human caught your interest, Monster Lord?\
name ""
bgm "bgm\kiki2.ogg"
>...Monster Lord?@
>Tamamo just said Monster Lord, right?@
>Alice... Is the Monster Lord?\
name "Luka"
>Alice... You...\
name ""
csp 701
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>.........\
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
>...Did you finally realize it, you idiot?@
>I am the Monster Lord, Alipheese the sixteenth.\
name ""
name "Luka"
>No way!\
name ""
>I didn't think she was a normal monster the first time we met...@
>When she drove away Granberia, I thought she might be someone important...\
>But I didn't think she was actually the Monster Lord!\
bgm "bgm\tamamo.ogg"
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>Oops... Was I not supposed to say that?@
>I spoke out of place...\
name ""
name "Tamamo"
>Anyway, I'll be taking the bell.@> Hmm?\
name ""
>The small Kitsune pulls at Tamamo's sleeve.\
name "Tamamo"
>What...?@> Hmmhmm... I see...\
>...I see. So you saved her life, Luka?\
>Then, as the leader of the Kitsune's, I must thank you.\
name ""
>As she walks up to me, Tamamo laughs softly.\
lsp 700,":a;chara\tamamo_st04.bmp",0,0:print 10,1500
goto *sean0081a



*sean0081a

if %continue=1 bgm "bgm\tamamo.ogg"
if %continue=1 lsp 700,":a;chara\tamamo_st04.bmp",0,0
if %continue=1 bg "bg\bg035.bmp",10,5000
if %continue=1 gosub *setwindow_01
mov %continue,0
name "Tamamo"
>How do you want me to thank you?@
>Delicious thin fried tofu?@
>Or do you want to touch my special fluffy tail?\
name ""
name "Luka"
>........\
name ""
r@k@\
csel "Fried tofu",*sean0082,"Touch fluffy tail",*sean0083,"[Poseidon's Bell]",*sean0084



*sean0082

name "Luka"
>I want some delicious fried tofu.\
name ""
bgm "bgm\alice1.ogg"
lsp 700,":a;chara\alice_st03b.bmp",267,0
lsp 701,":a;chara\tamamo_st04.bmp",-200,0:print 10,500
name "Alice"
>Wait, wait, wait!@
>Is that what you really want!?\
name ""
name "Luka"
>Eh...? I'm hungry...\
name ""
name "Tamamo"
>Then... Here you go.\
name ""
>Tamamo hands me some thin fried tofu.@
>Suddenly, Alice takes the tofu from me!\
name "Alice"
>You idiot! Taking this!\
name ""
name "Luka"
>Hey! What are you doing!\
name ""
>As I yell at her, Alice eats everything in one gulp.\
lsp 700,":a;chara\alice_st04b.bmp",267,0:print 10,500
name "Alice"
>Hmm... Delicious.@
>As expected, that's truly the ultimate fried tofu.\
name ""
lsp 701,":a;chara\tamamo_st01.bmp",-200,0:print 10,500
name "Tamamo"
>Our thanks concluded, shall we head home you two?@
>Goodbye, Luka.@
>You too, Monster Lord. Once you're tired of playing around, come home.\
lsp 700,":a;chara\alice_st03b.bmp",267,0:print 10,500
name ""
name "Alice"
>Treating me like a child?!\
name ""
name "Tamamo"
>Goodbye.\
name ""
dwave 1,"se\warp.ogg"
csp 701:print 10,500
>The three Kitsune's vanish.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Idiot.@
>All you had to do was ask for the bell...\
name ""
name "Luka"
>Ah! Was that really a choice!?\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>Don't ask me!@>Do whatever you want, I don't care.\
>Idiot.\
name ""
dwave 1,"se\warp.ogg"
csp 700:print 10,500
>Insulting me, Alice vanishes.\
name "Luka"
>Oi... Alice...\
name ""
>...What should I do?@
>Left alone, I'm at a loss.\
bgmstop
saveoff
textoff
csp -1
btndef clear
gosub *setwindow_01
bg black,7,1500
>In the end, I was unable to acquire the [Poseidon's Bell].\
>Without the bell, I can't get to the Sentora continent.\
>My adventure ends here.@
>I trudge back to my village, and spend the rest of my life peacefully there.\
mov $end_go,"sean0081a"
goto *badend2



*sean0083

name "Luka"
>Then... The fluffy tail!\
name ""
lsp 700,":a;chara\alice_st03b.bmp",267,0
lsp 701,":a;chara\tamamo_st01.bmp",-200,0:print 10,500
name "Alice"
>Wait, wait, wait!@
>Is that what you really want!?\
name ""
name "Luka"
>Eh...? But it looks so soft and fluffy...\
name ""
lsp 701,":a;chara\tamamo_st04.bmp",-200,0:print 10,500
name "Tamamo"
>You have a good eye! \
name ""
name "Alice"
>Don't ask me!@>Do whatever you want!\
>Idiot.\
name ""
dwave 1,"se\warp.ogg"
csp 700:print 10,500
>Insulting me, Alice vanishes.\
name "Luka"
>Oi... Alice!\
name ""
csp 701
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>Here... My fluffy tail!\
name ""
>Tamamo pushes her tail in front of me suddenly.\
name "Luka"
>Uwa...\
name ""
>I reach out and stroke her tail.@
>Her soft fluffy tail feels amazing.\
>Stroking her fur, I can feel a soft core inside.\
name "Tamamo"
>Well? Isn't it amazing?\
name ""
name "Luka"
>Amazing... So fluffy...\
name ""
>Unable to suppress the desire any longer, I bury my face in her fur.@
>Ahh... It feels so good.\
lsp 700,":a;chara\tamamo_st02.bmp",0,0:print 10,500
name "Tamamo"
>Fufu... I'll give you a special.\
name ""
name "Luka"
>Eh...? Uwa!\
name ""
dwave 1,"se\umaru.ogg"
>One of her other tails quickly pulls down my pants and starts to stroke my penis.\
>Being rubbed by her incredibly soft tail sends me right into a trance.\
name "Luka"
>Aaa....\
name ""
name "Tamamo"
>Fufufu... It got so big. \
name ""
dwave 1,"se\umaru.ogg"
>Being wrapped in her fluffy tail, my penis instantly becomes erect.\
>Her amazing fur stroking me, I can't stand the pleasure.\
name "Luka"
>Faaa...\
name ""
name "Tamamo"
>Fufu... it's fine to let it out.\
name ""
dwave 1,"se\umaru.ogg"
>One tail tightens around my dick as the others massage me all over.\
>The overpowering stimulation sends me over the limit.\
name "Luka"
>Aaaa!\
name ""
gosub *syasei1
lsp 691,":a;chara\tamamo_bk03.bmp",0,0
gosub *syasei2
>I quickly ejaculate all over her tail.\
name "Tamamo"
>Fufu... Was my tail as good as you thought it would be?\
name ""
>My semen covers her fluffy tail as she laughs.\
name "Luka"
>Ahh...\
name ""
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>Well then, goodbye.\
name ""
dwave 1,"se\warp.ogg"
csp 691:csp 700:print 10,500
>Tamamo vanishes with the Kitsune and the sealed fox.\
name "Luka"
>Ah... Eh?\
name ""
>Suddenly, I'm alone inside the cave.@
>Standing in the deepest part of the cave, I'm at a loss as to what to do next.\
bgmstop
saveoff
textoff
csp -1
btndef clear
gosub *setwindow_01
bg black,7,1500
>In the end, I was unable to acquire the [Poseidon's Bell].\
>Without the bell, I can't get to the Sentora continent.\
>My adventure ends here.@
>I trudge back to my village, and spend the rest of my life peacefully there.\
mov $end_go,"sean0081a"
goto *badend2



*sean0084

name "Luka"
>Then... I want the bell.\
name ""
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,1500
name "Tamamo"
>That's what I expected...\
name "Tamamo"
>Well then, here you go.\
name ""
>Tamamo quickly hands me the bell.\
dwave 1,"se\fanfale.ogg"
mov %item01,6
>[Poseidon's Bell] was obtained!\
name "Luka"
>But... Is it really ok?@
>Handing it over so quickly...?\
name ""
name "Tamamo"
>I don't really care.@
>The traps in this cave looked like fun, so I wandered in here.\
name ""
name "Luka"
>Oi, oi, that can't be...@> Well, whatever.\
name ""
>I'm just happy that I got the bell safely.\
goto *sean0085



*sean0085

if %continue=1 bgm "bgm\tamamo.ogg"
if %continue=1 lsp 700,":a;chara\tamamo_st01.bmp",0,0
if %continue=1 bg "bg\bg035.bmp",10,5000
if %continue=1 gosub *setwindow_01
mov %continue,0
name "Tamamo"
>Now what are you going to do, Luka?@
>Are you going to try to defeat me?\
name ""
>Tamamo waves her tails around while asking me.\
name "Luka"
>......\
name ""
>I'll...\
r@k@\
csel "Fight",*sean0085a,"There's no reason",*sean0086



*sean0085a

name "Tamamo"
>It can't be helped then...@
>Then... I shall be your opponent!\
name ""
goto *tamamo1_start



*sean0086

name "Luka"
>...There's no reason to fight.@
>I'll only fight those who try to stop monsters and humans from coexisting.\
name ""
name "Tamamo"
>Hmm... An admirable endeavour.@
>However, we will fight eventually.\
>After all, I am one of the Monster Lord's Four Heavenly Knights.\
name ""
name "Luka"
>...If it happens, it will happen.\
name ""
>But right now, I have no reason.\
name "Tamamo"
>Well then... Farewell.\
name ""
dwave 1,"se\warp.ogg"
csp 700:print 10,500
>Tamamo and the other two vanish.@
>I'm left alone with Alice, who has a dark expression on her face.\
bgm "bgm\sinpi1.ogg"
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>........\
name ""
name "Luka"
>...So Alice, you're the Monster Lord...?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...I didn't hide it.@
>You were just too big of an idiot to realize it.\
name ""
name "Luka"
>Looking back on it, it was pretty stupid not to notice...\
name ""
name "Alice"
>You should have noticed it when Granberia followed my orders.\
>Isn't the only person who can give an order to the Four Heavenly Knights the Monster Lord?\
name ""
name "Luka"
>........\
name ""
>So on my journey to defeat the Monster Lord, I was traveling with the Monster Lord.\
>I don't get why she kept quiet about it...\
name "Luka"
>Why... Did you travel with me?\
name ""
name "Alice"
>My answer is the same as before.\
>You're an interesting human.@
>In addition, I want to see the world with my own eyes.@
>Traveling with you satisfied both of my interests.\
name ""
name "Luka"
>Did you really order an all-out war with humans?\
name ""
name "Alice"
>[Only in self-defense are you allowed to exert power].@
>That was my only command to the monsters.\
>It must have gotten distorted when it reached human ears.@
>I don't want a full-scale war.\
name ""
name "Luka"
>Exert power not to rule humans, but only in self defense...?@
>But then why was Granberia attacking Iliasburg!?\
name ""
>That's not all, either.@
>There are monsters all over the world that are attacking humans.\
>Isn't it because she ordered it...?@
>That's what everyone thinks, anyway.\
name "Alice"
>With the [Slaughter of Remina], the humans were burning with hatred toward the nearby monsters, with a dangerous situation brewing.\
>Violence was only approved for self-defense purposes.@
>But...@> A lot of monsters seem to have taken a more liberal interpretation of what I meant.\
>An inexcusable act.\
name ""
name "Luka"
>What the hell happened, then!@
>Wasn't it the Monster Lord's command to not leave a single survivor!?\
name ""
name "Alice"
>I don't know.@
>Trying to find the truth of that situation is another reason for my journey.\
name ""
name "Luka"
>Eh? You don't know...?\
name ""
>It doesn't look like she's playing dumb...\
name "Luka"
>If you don't know...@> Was it just the decision of the monsters?\
name ""
name "Alice"
>The [Slaughter of Remina] took place before I took the throne.@
>However, the previous Monster Lord did not give the instruction to attack that town, either.\
>I still do not know who gave the command for that.\
>But the most mysterious part...@
>Even the monsters that were living with the humans in Remina were slaughtered.\
name ""
name "Luka"
>Even the monsters were killed...?\
name ""
>I haven't heard that part before.@
>I was always told it was an act of violence from the monsters on humans.\
>What the hell happened in Remina...?\
name "Alice"
>Well, that's the end of that talk.@
>What are you going to do now, Luka?@
>The opponent you have to beat is right in front of you.\
name "Luka"
>Eh...?\
name ""
goto *sean0087



*sean0087

if %continue=1 bgm "bgm\sinpi1.ogg"
if %continue=1 lsp 700,":a;chara\alice_st01b.bmp",67,0
if %continue=1 bg "bg\bg035.bmp",10,5000
if %continue=1 gosub *setwindow_01
mov %continue,0
>The purpose of my journey was to beat the Monster Lord...@
>And now, she's standing right in front of me.\
>Alice...\
r@k@\
csel "Isn't someone I should fight!",*sean0089,"Is the Monster Lord I must defeat!",*sean0088



*sean0088

lsp 700,":a;chara\alice_st03.bmp",172,0:print 10,500
name "Alice"
>I see... There's no helping it then.@
>I must handle this as the Monster Lord facing the Hero who challenges her.\
name ""
name "Luka"
>Guh...!\
name ""
>I take out my sword and hold it in front of me.@
>But Alice's tail suddenly swings out and knocks it from my hand!\
name "Luka"
>Ah!\
name ""
goto *sean0088x



*sean0088x

lsp 700,":a;chara\alice_st02.bmp",172,0:print 10,500
if %con_hvoice=0 dwave 0,"voice\alice3_01.ogg"
name "Alice"
>Slow... Weak... But you still challenged me.\
name ""
dwavestop 0
>Alice slowly approaches me.@
dwave 1,"se\ero_simetuke1.ogg"
>She grabs me with her tail, and coils around me!\
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %con_hvoice=0 dwave 0,"voice\alice3_02a.ogg"
name "Alice"
>However immature you are, you still challenged me as a Hero.
>It's my duty as the Monster Lord to destroy your body.\
if %con_hvoice=0 dwave 0,"voice\alice3_02b.ogg"
>I'll make you one with me by swallowing you whole.\
dwave 1,"se\ero_syokusyu1.ogg"
lsp 700,":a;chara\alice_st23.bmp",172,0:print 10,500
if %con_hvoice=0 dwave 0,"voice\alice3_02c.ogg"
>...With this mouth.\
name ""
dwavestop 0
>Alice's abdomen splits open and reveals a huge mouth.@
>A strange mouth with tentacles wriggling around.\
name "Luka"
>Ahhh!\
name ""
>Unable to move, I'm frozen in fear staring at that mouth.\
>Though I know that if I don't get away I'll be swallowed by that, I'm unable to move my feet.\
lsp 700,":a;chara\alice_st24.bmp",172,0:print 10,500
if %con_hvoice=0 dwave 0,"voice\alice3_03a.ogg"
name "Alice"
>My mouth gives my prey ecstasy instead of fear.
>You can be soaked in ecstasy and pleasure while being eaten.\
if %con_hvoice=0 dwave 0,"voice\alice3_03b.ogg"
>At the least, I can stop you from feeling horror as you become one with me.\
name ""
dwavestop 0
mov $end_go,"sean0087"
if %hosyoku_cut=1 goto *hosyoku_cut
>Her tail, coiled around my body, slowly forces me into her mouth.@
dwave 1,"se\ero_makituki3.ogg"
mov %hseanwave,1:hseanwave
lsp 700,":a;chara\alice_h03_1.bmp",0,0:print 10,500
>Tangled in the tentacles, I'm slowly pulled deeper into her mouth.\
name "Luka"
>Auuu...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice3_04.ogg"
name "Alice"
>Don't be afraid, you're sure to feel pleasure.
>Being eaten by this mouth will give my prey pleasure...\
name ""
dwavestop 0
name "Luka"
>Aaa... Alice...\
name ""
>At this rate, Alice is going to eat me...@
>Expectation boils through me at the situation I'm in.\
>My feet are completely wrapped up inside her body.@
>Her tentacles continue to push me further into her mouth.\
>Swallowed from my feet to the top of my legs, I try to fight the desire rising in me.\
>Soon my body and soul are going to be one with Alice...\
>While being slowly devoured, a strange joy rises through me, causing my dick to become erect.\
if %con_hvoice=0 dwave 0,"voice\alice3_05.ogg"
name "Alice"
>Kukuku... Did it become big?
>Getting erect while being preyed upon by me... What a hopeless guy.\
name ""
dwavestop 0
name "Luka"
>Ahiii!\
name ""
>A strange mucus starts to cover my feet inside Alice's mouth.@
>The mucus brings me pleasure so strong, it's as if my feet are melting in it.\
if %con_hvoice=0 dwave 0,"voice\alice3_06.ogg"
name "Alice"
>I'll dissolve you slowly from your feet...\
name ""
dwavestop 0
name "Luka"
>Faaa... My feet feel so good...\
name ""
>Immersed in the ecstasy, I feel my power drain away.\
>Knowing that my feet are probably being digested, I can't help but be entranced by this stimulation.\
if %con_hvoice=0 dwave 0,"voice\alice3_07a.ogg"
name "Alice"
>You're feeling so good while I'm eating your feet...\
if %con_hvoice=0 dwave 0,"voice\alice3_07b.ogg"
>Be glad, because I'm going to dissolve your penis in the same way.
>To your proof of manhood, I'll give you the same pleasure as I eat it.\
name ""
dwavestop 0
name "Luka"
>Auuu...\
name ""
>Just thinking of the pleasure being felt by my feet extending to my dick fills my excitement to a peak.\
name "Luka"
>Auu... Alice... Eat faster...@
>My penis... Eat...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice3_08.ogg"
name "Alice"
>Kuku... Already a slave to being prey?
>Then, just as you wish, I'll slowly digest your genitals...\
name ""
dwavestop 0
name "Luka"
>Aaa!\
name ""
>Being pushed deeper into her mouth, I've finally been swallowed to my waist.\
>Stuck inside her, my lower body warms as her mucus covers more of me.\
>And the feeling I was waiting for finally comes to my groin.@
>As soon as my dick goes into her mouth, I feel it covered in her digestive juices.\
name "Luka"
>Aaaaa!\
name ""
>Her mouth goes to work immediately on it, instantly melting off the clothes surrounding my dick.\
>The juices covering me give a pleasure far stronger than normal sexual stimulation, forcing me instantly to the edge.\
>The immorality of my male genitals being devoured by this female's mouth washes over me.\
name "Luka"
>Auu... Coming!@
>Aahhhh!\
name ""
gosub *syasei1:gosub *syasei2
>Delighted at being digested, I ejaculate, shooting my seed out inside her mouth.\
>It served no reproductive purpose, but only supplied Alice with more nutrients...\
>Still, I'm a prisoner of the pleasure given to me while being eaten by Alice.\
if %con_hvoice=0 dwave 0,"voice\alice3_09.ogg"
name "Alice"
>Kuku... Are you really that happy at having your genitals being digested?\
name ""
dwavestop 0
name "Luka"
>Auuu...@>You're eating my penis...\
name ""
>My penis is being melted...@
>My penis is being eaten...\
>It's as if Alice has eaten both the physical proof of my manhood, as well as my pride.\
>Everything is given to her...\
name "Luka"
>Ah...@>Amazing...\
name ""
>Overwhelmed by the good feelings, I come for the last time.\
gosub *syasei1:gosub *syasei2
>As if releasing both my semen and my soul, my entire body shakes in delight at the feeling.\
if %con_hvoice=0 dwave 0,"voice\alice3_10.ogg"
name "Alice"
>Coming so many times while being eaten by my mouth... What a pathetic man.
>Did you save up so much of your seed just so I could eat it?\
name ""
dwavestop 0
name "Luka"
>Ahi... Aaaa...\
name ""
>Continuing to digest everything from my waist down, she pulls me deeper into her mouth, until only my head is outside.\
>But I don't feel any fear.@
>Rather, from my neck down, all I can feel is a sweet melting pleasure.\
>Being digested by her is as if I'm being sent to heaven...\
if %con_hvoice=0 dwave 0,"voice\alice3_11.ogg"
name "Alice"
>Kukuku... This is the end.
>Your body will be dissolved, and be a part of me.\
name ""
dwavestop 0
name "Luka"
>Faa...\
name ""
>Finally, my head sinks into Alice's mouth.\
name "Luka"
>Faaaa...\
name ""
>Fully inside of her, her digestive juices completely cover my body.@
>Being eaten by Alice feels so good...\
name "Luka"
>Aaaa...\
name ""
>My whole body being slowly digested, I'm immersed in the sweet pleasure causing my body to melt.\
name "Luka"
>Aaa...\
name ""
>My body and soul are going to be absorbed...\
name "Luka"
>...A...\
name ""
>Eaten by Alice, I've finally become one with her in both body and soul.\
mov %hseanwave,0:hseanwave
gosub *anten
>........\
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_alice3,1
mov $end_go,"sean0087"
goto *badend2



*sean0089

bgm "bgm\hutuu2.ogg"
name "Luka"
>Don't joke around.@
>What would you have done if I challenged you?\
name ""
>There's no way I'd even be a match for her as I was now anyway.\
name "Luka"
>Besides, if you vanished right now wouldn't the monsters just all be confused?\
name ""
>In fact, it seems like Alice was trying to put the brakes on the monsters running wild.\
>If Alice vanishes, peace wouldn't come.@>It would be the exact opposite...\
>Who knows what the monsters would do, suddenly losing their leader...\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Hmm... They might.@
>I want them to obey my orders...@
>But I still get the wishy-washy ones like Granberia and Alma Elma.\
name ""
name "Luka"
>So the person causing the storm between the continents was Alma Elma herself, and not your order?\
name ""
>Blocking the route between continents is in no way self defense.@
>It's just something to cause trouble for humans...\
name "Alice"
>But you know...@
>Granberia has always insisted that the Ilias Temple is the ringleader of evil.\
>It's a Hero manufacturing facility that churns out Heroes to fight monsters.\
>She argues that destroying it is self-defense.\
>As a theory it's... not too far off the mark.@
>The people who call themselves Heroes are pretty unsightly.\
name ""
name "Luka"
>.........\
name ""
>From a monster's viewpoint, I guess that's true...@
>It looks like coexistence is still far away...\
>That's why I...\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>But is it ok?@>Not fighting me.\
name ""
name "Luka"
>I've told you many times already, Alice.@
>I only fight monsters who get in the way of humans and monsters coexisting.\
name ""
>...Alice is different.@
>I've decided that the Monster Lord is not an evil person.\
name "Luka"
>But... Aiming at the Monster Lord's castle is still my aim.\
>It also looks like the Four Heavenly Knights are going wild doing their own thing.\
name ""
>Attacking Iliasburg and blocking the the sea route...@
>I can't leave that kind of behavior alone.\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>I can understand their viewpoints...@
>Therefore I usually leave them alone.\
name ""
>Monsters have their viewpoints, and humans have theirs.@
>For coexistence to happen, we both have to understand the other.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>I have my own viewpoint as the Monster Lord...@
>All monsters are my cute subordinates.\
>No matter what you say, I won't lend a hand to defeat my own cute little subordinates.@> You understand, right?\
name ""
name "Luka"
>I won't ask for your help.@
>You're traveling with me, but not my ally.\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>...Exactly.\
name ""
>I guess our journey will continue as it did before.@
>I didn't think I'd understand the Monster Lord's position...\
>Traveling to the Monster Lord's castle with the Monster Lord herself...@
>It might be a strange journey, but that might be fun too.\
>With the [Poseidon's Bell] in hand, we head out of the cave.\
bgmstop
dwave 1,"se\asioto2.ogg"
sean_change "bg031"
bgm "bgm\city1.ogg"
>We came back to Iliasport.@
>Shall we head right to the port to find a boat, or talk to some people first?\
r@k@\
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
csp 700:csp 611:cspl 3,7
gosub *city05_main
bg "bg\bg031.bmp",7,1000
gosub *setwindow_01
name "Luka"
>This will be my first time leaving the continent...\
name ""
>I tell Alice while we head to the port.\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>It's also the first time I'll step foot on the Sentora continent.@
>I've passed over it in the sky a few times, though.\
name ""
name "Luka"
>I thought you only set out on your journey a few days ago?\
name ""
name "Alice"
>That's right.@>After I left the castle I flew right to the Ilias Temple.@
>That's how I met you.\
name ""
name "Luka"
>What a freak accident...\
name ""
>That sudden crash.@
>I've asked her what the hell happened a few times, but she never told me.\
>I wonder if she fell asleep while flying or something...\
csp 700:print 10,500
>At any rate, we've finally arrived at the harbor.@
>The fisherman all look busy loading and unloading their ships.\
>If we want to get passage, we should look for someone who looks important...\
>Using that line of thinking, we find someone who looks like a captain.\
name "Luka"
>Excuse me... We'd like to take a ship to the Sentora continent.\
name ""
lsp 700,":a;chara\mob_sentyou.bmp",0,0:print 10,500
name "Captain"
>Hah! You must be joking, young boy.@
>You know what happens to any ship that leaves here, right?\
name ""
name "Luka"
>If we hang this [Poseidon's Bell] from the bow, it should be alright.\
name ""
name "Captain"
>...Don't be ridiculous.@
>If such a dirty bell would let me avoid storms, I'd be rich.\
name ""
>It looks like he doesn't believe us...\
name "Luka"
>If you let me give it a try, you'll understand.@
>I'll prove I'm not tricking you if you just let me have a small boat or something...\
name ""
name "Captain"
>I don't have enough free time to listen to some brat's prank.\
name ""
>It looks like he's completely ignoring us still...@
>Well... What should we do now?\
lsp 700,":a;chara\alice_st11b.bmp",-120,0
lsp 701,":a;chara\mob_sentyou.bmp",160,0:print 10,500
name "Alice"
>...Move, Luka.\
name ""
>Alice suddenly stands in front of the Captain.\
name "Captain"
>Ohh... What a fine woman.@>I'd give you a special ride.\
name ""
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
name "Alice"
>...Follow my commands.\
name ""
>Alice's eyes suddenly glow.@
>The Captain suddenly straightened his posture and stood at attention in front of Alice.\
name "Captain"
>Yes! Your wish is my command!\
name ""
name "Alice"
>Take us to the Sentora continent.@
>Start the preparations at once.\
name ""
name "Captain"
>Understood!@
>Oi, you all!@> Pack up your fishing stuff and get ready for departure!\
name ""
lsp 700,":a;chara\mob_sentyou.bmp",-160,0
lsp 701,":a;chara\mob_hunanori.bmp",160,0:print 10,500
name "Sailors"
>Eh...?@> Uh...@> Ro...Roger!\
name ""
>The perplexed sailors begin to hastily prepare the ship.\
cspl 700,701:print 10,500
name "Luka"
>Alice... Did you hypnotize him with your eyes?\
name ""
>I've faced a couple monsters so far that had that same kind of ability...\
>I guess it's natural that the Monster Lord would be able to use it too.\
lsp 700,":a;chara\alice_st12b.bmp",67,0:print 10,500
name "Alice"
>Haha... These are the magic eyes that high ranking monsters have.@
>Using them I can charm, confuse, petrify, or cause someone to faint at my will.\
name ""
name "Luka"
>That's awfully convenient...\
name ""
>She's like a walking abnormal status machine.\
name "Luka"
>Anyway, thanks for the help.\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>Hrm. Don't get the wrong idea.@> It would just be annoying to be stuck here.\
name ""
>Even though she says she isn't going to help me, she sure does help me a lot.\
>Maybe she really doesn't want to just receive free lunches from me...?\
lsp 700,":a;chara\mob_sentyou.bmp",-160,0
lsp 701,":a;chara\mob_hunanori.bmp",160,0:print 10,500
name "Captain"
>We're ready to depart! Please board!\
name ""
name "Sailor"
>Captain, where are we taking these people?@
>Who are they, anyway?\
name ""
name "Captain"
>You idiot! Watch your mouth in front of these fine people!@
>These fine travelers are...@>Who again?\
name ""
csp 701
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>It doesn't matter, let's just board.\
name ""
name "Luka"
>...Thanks for the ride...\
name ""
>Thus we board the ship.\
>We're finally beginning the voyage...@
>Even though I'm calling it a "voyage" it will only take about a day.\
>We should arrive at the port in Port Natalia at about noon tomorrow.\
bgmstop
sean_change "bg036"
bgm "bgm\umi.ogg"
>At night onboard...\
>Even in a place like this, I can't get out of Alice's special training!\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>During battle, it's normally suicide to jump.@
>When you jump, it's pretty damn obvious what your movements are going to be until you land.\
>But this Demon Skull Beheading is different.@
>By falling too fast for them to hit you, you crush the skull of your enemy.\
name ""
name "Luka"
>Like this...?\
name ""
dwave 1,"se\karaburi.ogg"
>I climb up the mast, and try to swing my sword as I jump off.\
>With Alice guiding me, I repeat it over and over.\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Hmm... You're still immature, but you learn quickly.@
>It's more or less like that.\
>You need to master it in actual combat now.\
name ""
dwave 1,"se\fanfale.ogg"
mov %skill01,5
>[Demon Skull Beheading] was mastered!\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>This technique was a favorite of Desureia the Harpy, who was known as the [Death on Wings].\
>Smashing the skulls of three hundred enemies, their brains covering the field in a mess.\
name ""
name "Luka"
>...I want you to teach me more Hero-like abilities...\
name ""
>Won't using such a horrible technique make Ilias angry...?\
name "Alice"
>There's a big issue in using this technique, though.\
>As you saw, you need to be at a great height to use this technique.@
>...And since you're a human, you can't fly in the air.\
name ""
name "Luka"
>Yes. I know that.\
name ""
name "Alice"
>So there's a condition.\
>If there's nothing to climb nearby, you can't use it.@
>Even if you have the necessary SP, you won't be able to use it if you can't climb anything.\
name ""
name "Luka"
>I see...\
name ""
>Controlled by the nearby battle features... That's kind of annoying.\
name "Luka"
>I get it, I'll make sure to remember that.\
name ""
name "Alice"
>..........\
name ""
>Alice started to stare at the ring on my finger.\
name "Alice"
>...Hey, Luka.@
>Excuse me but... Can I see your ring?\
name ""
name "Luka"
>Alice, I already told you that you can't eat it.\
name ""
name "Alice"
>Who do you think I am? Watch your mouth.@
>I won't eat or steal it, I'm just a little interested.\
name "Luka"
>Then is it ok for you to look at it while it's on my finger?@
>I promised my dying mother that I would always carry it with me.\
name ""
name "Alice"
>That's fine...\
name ""
>Alice stares intently at the ring on my finger.@
>She starts to slowly shake her head.\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>The residual thoughts from this ring aren't anything special...@
>The hidden power you had doesn't seem related to the ring...\
name ""
name "Luka"
>That thing that happened when I beat Nanabi?@
>When you said I continued to fight her while sleeping?\
name ""
>I still don't remember anything that happened.@
>I was asleep, so of course that's to be expected...\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Though you may not remember it, that power was extraordinary.@
>One ring like that couldn't give you such power...\
name ""
name "Luka"
>Was it so amazing when I was asleep...?\
name ""
name "Alice"
>Maybe...@> One of your ancestors was some high-ranking monster or something.\
>Usually monsters only have female children... But there are some exceptions in rare cases.\
>In some strange mutations, it can be a male.@
>In that way, a normal human male is born.\
>But again with some rare cases, they can retain some magic power.@
>Even as the Monster Lord, I've only heard of a couple rare cases.\
name "Luka"
>A monster... As one of my ancestors?\
name ""
>So one of my ancestors broke the ban with mating with monsters?\
name "Alice"
>Well, it's only a guess.@
>Your power sure wasn't ordinary.\
>If you have such an amazing latent power, hurry up and master it. Idiot.\
name ""
name "Luka"
>Even if you say that...\
name ""
>I can't remember it at all...\
name "Alice"
>If you have potential like that, it's sure to develop as you fight more.@
>We'll train a lot from now on.\
name ""
name "Luka"
>I know already...@
>By the way, Alice... Did you say you could feel thoughts from this ring?\
name ""
name "Alice"
>Yes... But it isn't particularly special.@
>Nor does it seem like it's effecting you.\
>Just some thoughts of a mother worried about her child.@
>It's probably your mother.\
name ""
name "Luka"
>I see... My mother's feelings...\
name ""
>I tightly grip my ring.\
name "Alice"
>I also thought that your mother was a monster...@
>But I can't feel any magic like that from the ring.\
>The owner of that ring was definitely human.\
name ""
name "Luka"
>Of course!@
>Besides, my mother died of sickness...\
name ""
>When there was a virulent disease spreading through the village, my mother got infected.\
>A monster getting sick from the same disease as a human is unheard of.\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>I see... I'm sorry to make you remember something painful.\
name ""
name "Luka"
>Don't worry about it...@
>By the way, what about your parents?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...I have no idea about my father.@> Our race only cares about the mother.\
>Perhaps it was just some man my mother attacked.\
>I don't care if she ate him or not.@
>...But with my mother's character, she probably didn't kill him.\
name ""
name "Luka"
>Somehow that's...\
name ""
>I guess a lot of monsters wouldn't care about their father. Most might not even have the concept of [My father].\
name "Alice"
>My mother was the fifteenth head of our family.@
>...But now she's no more.\
name ""
name "Luka"
>I see...\
name ""
>Alice did call herself the sixteenth...@
>To become the next head, I guess the previous would have had to die.\
>I didn't hear any more about that subject.\
name "Alice"
>It's gotten a little gloomy...@
>Now, let's resume the training.\
name ""
>Right as she said that...\
dwave 1,"se\wind2.ogg"
csp -1
gosub *setwindow_01
bg "bg\bg040.bmp",10,1500
>Suddenly, the sea started to rage.\
>Shattering the peaceful atmosphere from before, a storm suddenly appears in full power from nowhere.\
name "Luka"
>Is this the storm they were talking about?\
name ""
>A regular boat would have been capsized instantly by this.@
>But this ship isn't even rocking...\
>From the bow of the ship, the [Poseidon's Bell] is softly glowing.\
gosub *setwindow_01
lsp 700,":a;chara\alice_st01b.bmp",67,0
bg "bg\bg036.bmp",10,1500
name "Luka"
>Alright! As expected of Captain Selene's treasure!\
name ""
name "Alice"
>Hrm... What a wonderful treasure a human had.\
name ""
>But in the next moment, Alice's expression turns dark.\
csp 700:print 10,500
bgmstop
dwave 1,"se\wind1.ogg"
>Suddenly, the storm vanishes!\
name "Luka"
>Uwa... What happened!?\
name ""
>Right after the wind fades...@
lsp 700,":a;chara\arumaeruma_st11.bmp",0,0:print 10,1500
>A beautiful monster appears on the bow!\
wait 500
bgm "bgm\battlestart.ogg"
eng "Alma Elma appeared!":$sel6/
wait 1000
delay 4500
bgm "bgm\boss0.ogg"
\
name "Luka"
>You...!\
name ""
>Alma Elma... One of the Four Heavenly Knights...\
name "Alma Elma"
>I see... So you're that human.@
lsp 700,":a;chara\arumaeruma_st13.bmp",0,0
>The boy that caught Alice's eye... You look delicious.\
name ""
>She licks her lips with a smack as she stares at me.@
>Then turns her gaze towards Alice.\
lsp 701,":a;chara\arumaeruma_st11.bmp",-200,0
lsp 700,":a;chara\alice_st01b.bmp",267,0:print 10,1500
name "Alma Elma"
>Lord Alice...@
>According to your order, I'll exterminate the Hero who's attacking monsters.\
>May I execute your orders of defense?\
name ""
lsp 700,":a;chara\alice_st04b.bmp",267,0:print 10,500
name "Alice"
>...I don't give exceptions.@>I'm just observing this boy.\
>I'm not protecting him, nor giving special treatment.\
name ""
name "Alma Elma"
>Haha... I didn't think you'd say that. But I understand.\
name ""
csp 701
lsp 700,":a;chara\arumaeruma_st13.bmp",0,0:print 10,500
name "Alma Elma"
>It's like that, Luka-boy.@
>I won't let you through this area.\
name ""
name "Luka"
>...Luka... boy?\
name ""
>I'm a little disappointed at that, but she's still my enemy.@
>And a monster at the same level as Granberia...\
name "Luka"
>Then I'll beat you and pass through by force!\
name ""
r@k@\
goto *arumaeruma1_start



*sean0090

bgm "bgm\umi.ogg"
name ""
r@k@\
name "Luka"
>I... won...?\
name ""
>After Alma Elma leaves the ship, I stand dumbfounded.\
name "Luka"
>I...@> Was able to defeat one of the Four Heavenly Knights?\
name ""
>Forcing back one of the four...@
>The joy of victory rushes through my body.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...Not using her hands, feet or magic, are you really so happy at winning?\
name ""
name "Luka"
>Urgh...\
name ""
>It's true it was a huge handicap...\
name "Luka"
>If she was serious, there's no way I would have won, huh?\
name ""
name "Alice"
>Struggling that much when only fighting against her tail?@
>Before thinking of winning, try being someone worthy of even challenging her.\
name ""
name "Luka"
>..........\
name ""
>How rude.@>But she's right, I guess.\
>I need to get even stronger.\
bgmstop
csp -1
bg black,10,3000
textoff
gosub *setwindow_01
bg "bg\bg047.bmp",10,3000
bgm "bgm\boss0.ogg"
>Meanwhile, at the Monster Lord's castle...\
lsp 700,":a;chara\arumaeruma_st11.bmp",0,0:print 10,500
name "Alma Elma"
>I'm back! @
>Defeated by Luka-boy, I've come back! \
name ""
lsp 700,":a;chara\granberia_st04.bmp",200,0
lsp 701,":a;chara\arumaeruma_st11.bmp",-200,40:print 10,500
name "Granberia"
>...What are you talking about?@
>You had to have given him quite a handicap.\
name ""
lsp 701,":a;chara\tamamo_st01.bmp",-150,0:print 10,500
name "Tamamo"
>But that Luka has some excellent potential.@
>I've seen his amazing secret strength.\
name ""
lsp 701,":a;chara\arumaeruma_st11.bmp",-200,40:print 10,500
name "Alma Elma"
>Yeah... I'm sure he'll become really strong. \
name ""
lsp 700,":a;chara\granberia_st01.bmp",200,0:print 10,500
name "Granberia"
>When I met him earlier, he was still an amateur who just picked up a sword.@
eng "If you two think he's so much stronger... Shall I check it out?":$sel6/
dwave 1,"se\asioto3.ogg"
csp 700:print 10,1500
\
name ""
csp 701
lsp 700,":a;chara\arumaeruma_st12.bmp",0,0:print 10,500
name "Alma Elma"
>Where are you going, Granberia?\
name ""
lsp 700,":a;chara\granberia_st03.bmp",0,0:print 10,500
name "Granberia"
>You already know.@>To test that boy again.\
name ""
dwave 1,"se\asioto3.ogg"
csp 700:print 10,1500
wait 1000
lsp 700,":a;chara\arumaeruma_st12.bmp",0,0:print 10,500
name "Alma Elma"
>...She left.\
name ""
lsp 701,":a;chara\arumaeruma_st12.bmp",-200,0
lsp 700,":a;chara\tamamo_st01.bmp",225,0:print 10,500
name "Tamamo"
>Stopping a nuisance before it grows...@> That seems unlike her.\
name ""
name "Alma Elma"
>I think it's just the reverse...@
lsp 701,":a;chara\arumaeruma_st11.bmp",-200,0:print 10,500
>By the way, where's Erubetie?\
name ""
name "Tamamo"
>She shut herself up in Undine's cave.@
>She enjoys soaking in the waters of her birthplace.\
lsp 700,":a;chara\tamamo_st04.bmp",225,0:print 10,500
>...Shall I visit my hometown, as well?\
name ""
name "Alma Elma"
>Granberia is going off doing whatever she wants too...@
>Isn't this chipping away at the appearance of the Four Heavenly Knights?\
name ""
name "Tamamo"
>Doesn't that include your actions, too?\
name ""
name "Alma Elma"
>...Hahaha. \
name ""
bgmstop
csp -1
bg black,10,3000
textoff
mov %gloval1_story_sinkou,2:gosub *savegloval1
goto *sean0090a



*sean0090a

gosub *setwindow_01
bg "bg\bg037.bmp",10,3000
bgm "bgm\city1.ogg"
>Then, the day after Alma Elma attacked our ship, we arrive at Port Natalia.\
>It's a port city in the southwest of the Sentora continent, that has deep traditions.\
name "Luka"
>I'm finally on the Sentora continent...\
name ""
>Stepping onto a new continent for the first time, I felt a surge of emotion.\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Hmm... Unlike Iliasport, this place is quite lively.\
name ""
name "Luka"
>This is the main port for the Sentora continent, so even though they can't trade with the Ilias Continent, it doesn't seem to have changed much.\
name ""
csp 700:print 10,500
>The main street has a lot of shops lining the sides, with travelers quickly going to and fro.\
>Surprisingly among them was...\
name "Luka"
>Ah! A Mermaid!?\
name ""
lsp 700,":a;chara\meia_st21.bmp",50,50:print 10,500
name "Mermaid"
>Would you like some Mermaid-made grilled starfish?\
name ""
>The woman selling the bizarre food is definitely a Mermaid.\
>She's not the only one, too...@
>Throughout the town, there are a few Mermaids.\
>They look used to being on land, and are slowly walking on their tail fin.\
csp 700:print 10,500
name "Luka"
>What does this mean...?\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>According to the book, Port Natalia is a port town that has a lot of Mermaids.@
>This town accepts Mermaids as residents.\
name ""
lsp 700,":a;chara\meia_st21.bmp",50,50:print 10,500
name "Luka"
>But... Your clothes look so ragged.@
>Are you being enslaved by a bad man...?\
name ""
name "Mermaid"
>My clothes are ragged because I just can't make any money...@
>If you feel sorry for me, please buy my grilled starfish!\
name ""
dwave 1,"se\kaimono.ogg"
mov %item01,7
>Luka was forced to buy [Grilled Starfish]!\
csp 700:print 10,500
name "Luka"
>...Anyway, this is a good town, isn't it?@
>Humans and monsters are getting along...\
name ""
>That's my dream, of course.@
>Even if it's limited to Mermaids here, it's still a wonderful sight.\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>By the way, where are we headed to now?\
name ""
name "Luka"
>For now, we'll head towards the San Ilia castle to the west.@
>The faith in Ilias is very strong there, so they'll surely give a warm welcome to a Hero.\
name ""
name "Alice"
>...Will they also welcome fake Heroes?\
name ""
name "Luka"
>I have the heart of a Hero!\
name ""
>San Ilia is also a theocratic city where the King is the High Priest.\
>I'd love to be able to receive the wisdom of the High Priest as a Hero...\
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>Hrm... I don't particularly want to go.@
>The food seems bad, too.\
name ""
>Geez... Of course it's about the food.\
>Suddenly, a beautiful Mermaid comes up to me.\
lsp 700,":a;chara\meia_st01.bmp",50,50:print 10,500
name "Mermaid"
>Um... Excuse me...@
>Mr. Traveler... Could I speak with you for a moment?\
name ""
name "Luka"
>Y...Yes, of course.\
name ""
name "Mermaid"
>I noticed your sword, and couldn't help but think you weren't an ordinary person...\
name ""
name "Luka"
>Yes... Seeing this, I could see why someone would think I'm strange...\
name ""
lsp 700,":a;chara\angersword.bmp",0,0:print 10,500
>Anyone who would think someone carrying this was ordinary would be strange themselves.\
lsp 700,":a;chara\meia_st01.bmp",50,50:print 10,500
name "Mermaid"
>Someone who wields such an extraordinary weapon...@
>Would you be willing to listen to my story...?\
name ""
>Before I could respond, suddenly a large sound rings out.\
bgmstop
dwave 1,"se\bom1.ogg"
quake 10,2000
bgm "bgm\kiki2.ogg"
lsp 700,":a;chara\meia_st04.bmp",50,50:print 10,500
name "Luka"
>What the!? An explosion!?\
name ""
name "Mermaid"
>Kyaa!\
name ""
>The ground shook violently as the explosion rung out.@
>A building across the plaza had suddenly collapsed.\
name "Luka"
>What the!? What happened!?\
name ""
name "Mermaid"
>That building...@> Oh no, the Mermaid school!\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,500
>All the Mermaids start to run towards the ruins of the building.\
lsp 700,":a;chara\mob_seinen1.bmp",-160,0
lsp 701,":a;chara\mob_obasan.bmp",160,0:print 10,500
name "Youth"
>What happened!?\
name ""
name "Woman"
>Isn't that the Mermaid school? What happened!?\
name ""
>All the nearby residents of Port Natalia start to gather around the building.\
csp 701
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>I smell gunpowder... It seems like it was a bomb...\
name ""
name "Luka"
>A bomb!?\
name ""
csp 700:print 10,500
>A lot of Mermaids are crawling out of the rubble, as soldiers try to save the wounded.\
>Stunned, we were only able to watch the scene in silence.\
lsp 700,":a;chara\mob_Mermaid3.bmp",-160,0
lsp 701,":a;chara\mob_Mermaid2.bmp",160,0:print 10,500
name "Mermaid Teacher"
>Thank goodness... It doesn't seem like too many were hurt.\
name ""
name "Mermaid Girl"
>My tail got burnt...\
name ""
>As they continue rescuing the wounded, I don't hear any of the soldiers calling out about any dead.\
>It looks like monster's bodies are a lot stronger than humans...\
>I let out a relieved sigh at that.@
csp 701
lsp 700,":a;chara\lazarus_st01.bmp",0,0:print 10,500
>...But then I see a familiar face in the crowd.\
name "Luka"
>You!!\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>...What's wrong, Luka?\
name ""
name "Luka"
>..........\
name ""
>The man slips back into the crowd.@
>He must have been the one to set that bomb...\
name "Alice"
>...What's wrong, Luka?@> You're sweating a lot.\
>Is that filthy man from before an acquaintance of yours?\
name ""
name "Luka"
>Acquaintance... No.@
>That guy probably doesn't recognize me...\
>He was my father's closest friend...\
name ""
>That explosion at the Mermaid school was undoubtedly his doing.@
>You're still doing these things, Lazarus...\
name "Luka"
>...Let's continue on, Alice.@
>We don't have time to waste...\
name ""
>I have to hurry up and change this world, so guys like that can't keep doing whatever they please...\
name "Alice"
>No, let's rest in the town for tonight.@
>Are you not aware of how worked up you are?\
name ""
name "Luka"
>Eh...?\
name ""
>After she said that, I noticed that my body was shaking, with sweat pouring off my face.\
name "Luka"
>I'm... I'm fine...\
name ""
name "Alice"
>You idiot, don't say that when you look so horrible.@
>Let's find a hotel and rest for the night.\
name ""
name "Luka"
>But...\
name ""
>As I struggle, Alice forcefully drags me to a hotel.\
dwave 1,"se\asioto2.ogg"
bgmstop
sean_change "bg038"
bgm "bgm\hutuu1.ogg"
name "Luka"
>...Thanks Alice, I'm feeling better already.\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>By the way, who was that filthy man?@
>As soon as you saw him, your face got really pale.\
name ""
name "Luka"
>He's one of the leaders of the fanatical [Ilias Kreuz] group.@
>...He might be the top leader at this point.\
name ""
name "Alice"
>Ilias Kreuz...?@
>Just by the name, I already don't like it.\
name ""
name "Luka"
>They're horrible.@
>They take a fanatical view of Ilias' teaching, and advocate the extermination of all monsters.\
>[Thou shalt not have intercourse with monsters].@
>They interpret that as meaning that you shouldn't have any contact at all.\
>Don't talk to monsters, don't even look at them.@
>In order for humans to not communicate with monsters at all, they decided to exterminate all of them.\
>They're worthless fanatics.\
name ""
name "Alice"
>I see... So you would be their enemy, with what you're trying to do.@
>Coexistence is the opposite of their goals, after all.\
name ""
>Even among humans, there are some horrible people...\
name "Luka"
>They preach about wanting to eradicate all monsters.@
>Not even just the ones on the roads attacking humans, but organizing and attacking monster settlements and towns.\
>I can't allow something like that to happen...\
name ""
name "Alice"
>I see... So they must have attacked the Mermaid school, then?\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
>Sheesh...@
>Among the worthless humans were people even more worthless.\
name ""
name "Luka"
>...But most people don't listen to them.@
>Even back in Ilias Village, where the belief in Ilias' teachings is strong, they think Ilias Kreuz is too radical.\
>They're just indiscriminately killing and destroying things.\
name ""
name "Alice"
>So even among humans, they ostracize those guys.@
>Being isolated and rejected probably drove them into even more of a frenzy.\
>...How worthless.\
name ""
>Alice sighs deeply.\
name "Luka"
>Coexistence is going to be tough, with people like that among us...\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...I see.@
>But still, I'm surprised.\
>I thought you didn't understand the world at all.@
>Just skipping through your life with your head full of sugar and rainbows.\
name ""
name "Luka"
>How rude. I'm not ignorant of the world.\
name ""
>Just after responding, I thought of something.@
>If Alice doesn't know who was responsible for the [Slaughter of Remina]...\
name "Luka"
>No way...@
>Do you think Ilias Kreuz had something to do with the [Slaughter of Remina]!?\
name ""
name "Alice"
>You must be joking.@
>Thousands of humans and monsters lived in Remina.\
>How could a fanatical organization like that have enough strength to massacre them all?\
name ""
name "Luka"
>...That's true...\
name ""
>Ilias Kreuz isn't a large organization.@
>Even with such tense relations, they still don't have the support of the people.\
>Slaughtering an entire town by themselves couldn't have been possible.\
name "Alice"
>By the way... I'm hungry.\
r@k@\
name ""
goto *sean0091



*sean0091

name "Luka"
>Eh? Uwa!\
name ""
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
dwave 1,"se\ero_simetuke1.ogg"
>Suddenly, Alice rolls my body up in her tail!@
>Wrapped in her tail, she deftly removes my clothes.\
name "Luka"
>What are you doing!?\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
if %con_hvoice=0 dwave 0,"voice\alice4_01.ogg"
name "Alice"
>I'm just going to have a small meal...
>Besides, I need to train your frail place...\
name ""
dwavestop 0
>The tip of her tail slowly moves up my thigh until it reaches my groin.@
>As if gently playing with me, she moves the tip of her tail around my penis in small circles.\
name "Luka"
>Au...\
name ""
>The soft stimulation causes my dick to react.\
if %con_hvoice=0 dwave 0,"voice\alice4_02.ogg"
name "Alice"
>Oh? Getting so big after just this much...?
>I'll play with you a little with my tail...\
name ""
dwavestop 0
dwave 1,"se\ero_makituki1.ogg"
lsp 700,":a;chara\alice_h04_1.bmp",0,0:print 10,500
>Her tail winds around the base of my penis.\
name "Luka"
>Au...\
name ""
>Her rough scales rub against me, as I feel her strong tail muscles contract around me.\
>Slowly coiling around me, she forms a spiral down my penis with her tail.\
name "Luka"
>Auu...!\
name ""
if %con_hvoice=0 dwave 0,"voice\alice4_03.ogg"
name "Alice"
>What a shameful voice...
>As a man, aren't you ashamed?\
name ""
dwavestop 0
mov %hseanwave,17:hseanwave
>While laughing at me, Alice starts to wiggle her tail.@
>Spiraled up my penis, she starts to move her tail up and down.\
name "Luka"
>Ah! Ahhhh!\
name ""
>My body twists at the sensation.@
>Her slow, firm stroking gives a constant powerful stimulation as she moves her tail.\
>She laughs at me, just like a snake toying with it's catch.\
if %con_hvoice=0 dwave 0,"voice\alice4_04.ogg"
name "Alice"
>Horahora... Try your best to endure it.
>Letting it out so soon would be pitiful, don't you think?\
name ""
dwavestop 0
name "Luka"
>Ah! Don't tighten it!\
name ""
>Still stroking me, I feel her tail start to slowly tighten.@
>With her slow motion stroking, my waist starts to shake against my will.\
>Is my body trying to escape from the pleasure...?@
>Or is it seeking more?\
if %con_hvoice=0 dwave 0,"voice\alice4_05.ogg"
name "Alice"
>Hahaha... Being played with by my tail, your waist is shaking.
>A man's instinct... What a pitiful appearance.\
name ""
dwavestop 0
>My reactions seems to make Alice happy.@
>With a look of superiority, she smiles down at me.\
if %con_hvoice=0 dwave 0,"voice\alice4_06.ogg"
name "Alice"
>I'll play with the tip too...
>Horahora, it'll feel good.\
name ""
dwavestop 0
>With the tip of her tail finally reaching the tip of my penis, she starts to softly rub it.\
>She slowly moves from the back muscle to the urethral opening, gently rubbing and massaging me.\
name "Luka"
>Auuu!\
name ""
if %con_hvoice=0 dwave 0,"voice\alice4_07.ogg"
name "Alice"
>Haha... Does it feel that good to be teased by my tail?
>...Then, I'll slowly bring you to the finish.\
name ""
dwavestop 0
>Her tail's movement suddenly changes.@
>Squeezing tighter, she starts to quickly pump me up and down.\
name "Luka"
>Ahii!\
name ""
>Unlike before, she's clearly trying to force me to ejaculate quickly.@
>At this rate, I won't be able to endure it either...\
if %con_hvoice=0 dwave 0,"voice\alice4_08.ogg"
name "Alice"
>Now... Let it out in misery.
>Teased by my tail, shoot out your seed.\
name ""
dwavestop 0
name "Luka"
>No way... Ahhh!\
name ""
>As she continues her quick stroking, the tip of her tail continues to rub the tip of my penis.\
>The intersecting stimulation breaks down my resistance, as I give in to my desire to release.\
name "Luka"
>I'm coming! Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice_h04_2.bmp",0,0
gosub *syasei2
>As I shoot out my semen over her tail, Alice tightens up around me, continuing to force pleasure into me even as I come.\
mov %hseanwave,0:hseanwave
name "Luka"
>Auuu...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice4_09.ogg"
name "Alice"
>Fufu... That's the first time.\
name ""
dwavestop 0
name "Luka"
>...Eh? No way... There's more?\
name ""
>"First time"? How long is she planning on continuing this...\
if %con_hvoice=0 dwave 0,"voice\alice4_10.ogg"
name "Alice"
>Of course. I said I'd be training your penis.
>I'll stimulate you more and more, until all your semen has been squeezed out.\
name ""
dwavestop 0
name "Luka"
>That... Ahhh!\
name ""
>Her tail finally wraps all the way around the tip of my penis.\
>Her smooth tail slowly tightens around my head as the rest of her tail continues to move up and down.\
>Completely wrapped up by her tail, the strange feeling gives an intense pleasure.\
if %con_hvoice=0 dwave 0,"voice\alice4_11.ogg"
name "Alice"
>Now... No more going easy on you.
>Crying in pleasure, go crazy.\
name ""
dwavestop 0
name "Luka"
>Ahhh!\
name ""
mov %hseanwave,17:hseanwave
>Wrapped in her tail, I feel her slowly contract step by step, increasing the pressure.\
>Contracting in waves as she pumps me up and down, the movement is as if she's trying to forcefully milk the semen out of me.\
name "Luka"
>Faaa... That's amazing...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice4_12.ogg"
name "Alice"
>Fufufu... You're already getting tears in your eyes.
>Is that how you react to being teased?\
name ""
dwavestop 0
name "Luka"
>Aaa...\
name ""
>The unending ecstasy she's forcing into me with her tail quickly brings me to the edge again.\
>The overpowering pleasure starts to spread out from my waist, covering my body.\
name "Luka"
>Aaa... I'm going to come again...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice4_13.ogg"
name "Alice"
>That's so quick, you miserable guy.
>Hoora... Let it out.\
name ""
dwavestop 0
>She starts to speed up her movement in her tail, pumping and contracting around me in waves.\
>The amazing combination of stimuli feels better than any hand could hope to bring.\
name "Luka"
>Ah... No more... If you do it like that...!@
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice_h04_3.bmp",0,0
gosub *syasei2
>Squeezed by her tail, I shoot out semen all over her again.@
>The semen scattered over her seems to be slowly absorbed through her scales.\
if %con_hvoice=0 dwave 0,"voice\alice4_14.ogg"
name "Alice"
>Haha... You came again.
>Letting it out again so quickly... How shameful.\
name ""
dwavestop 0
>Giving a triumphant smile, Alice looks down at me.@
>While grinning at me, Alice starts to move her tail again.\
name "Luka"
>Ah... Any more is impossible...\
name ""
>Resuming her relentless milking movements, my body starts to writhe helplessly.\
if %con_hvoice=0 dwave 0,"voice\alice4_15.ogg"
name "Alice"
>Haha... What do you mean impossible?
>Isn't your thing still stiff?\
name ""
dwavestop 0
>Looking down at my penis coiled in her tail, she gives off an air of a superior predator toying with her prey.\
if %con_hvoice=0 dwave 0,"voice\alice4_16.ogg"
name "Alice"
>Your dick is twitching... It's as if it's struggling.
>Like a smaller you, it's twitching pathetically while constricted by my tail.\
name ""
dwavestop 0
name "Luka"
>Ahhh!\
name ""
>Her tail's movements start to become even more intense.@
>Jerking, rubbing, squeezing, milking...\
>Her actions were only meant to force another ejaculation, without any mercy.\
if %con_hvoice=0 dwave 0,"voice\alice4_17.ogg"
name "Alice"
>...Are you going to leak out again? What a pathetic guy.
>While I watch your face, let it out again.\
name ""
dwavestop 0
name "Luka"
>That...\
name ""
>Alice moves her face close to mine, closely watching my face so she can watch my moment of climax.\
>Even though it fills me with embarrassment, her tail doesn't let me endure the rising desire to come.\
name "Luka"
>Ahh... Coming again!@
>Aaaa!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice_h04_4.bmp",0,0
gosub *syasei2
if %con_hvoice=0 dwave 0,"voice\alice4_18.ogg"
name "Alice"
>While struggling so miserably, you shot out your proof of surrender.
>What a helpless man you are.\
name ""
dwavestop 0
name "Luka"
>Aaa!\
name ""
>After squeezing out all the semen from my last orgasm, she quickly starts working on the next.\
name "Luka"
>Hii... Stop already!\
name ""
if %con_hvoice=0 dwave 0,"voice\alice4_19.ogg"
name "Alice"
>Even though you say that, aren't you actually happy?
>Like this, don't you want me to continue squeezing out all your semen over and over?\
name ""
dwavestop 0
>As she taunts me, her tail tightens up around my penis.@
>The tortuous pleasure makes my body writhe helplessly.\
if %con_hvoice=0 dwave 0,"voice\alice4_20.ogg"
name "Alice"
>Your penis is being wrapped around... constricted... and played with.
>Isn't that disgraceful for a man?\
if %con_hvoice=0 dwave 0,"voice\alice4_21.ogg"
>But you're so happy.. How miserable.
>Aren't you embarrassed?\
name ""
dwavestop 0
>Laughing at me, Alice continues to use her tail to play with her catch.@
>With her persistent stimulation, I'm not able to resist or endure against it.\
name "Luka"
>I'm coming again!@>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
if %con_hvoice=0 dwave 0,"voice\alice4_22.ogg"
name "Alice"
>Hoora... You can still let out more, can't you?
>Until I get the last drop, I'll squeeze everything out...\
name ""
dwavestop 0
name "Luka"
>Ahh... Stop... Stop...\
name ""
gosub *syasei1:gosub *syasei2
mov %hseanwave,0:hseanwave
gosub *anten
>Endlessly squeezing everything out of me, my vision starts to fade.\
if %con_hvoice=0 dwave 0,"voice\alice4_23.ogg"
name "Alice"
>Fu... Is that already the last drop?
>It also looks like you fainted...\
if %con_hvoice=0 dwave 0,"voice\alice4_24.ogg"
>Fainting after having everything squeezed out... How pathetic.
>But your semen was delicious. Hahaha.\
name ""
dwavestop 0
name "Luka"
>.........\
name ""
>In the end, she really did suck out all my semen...@
>With that final thought, I lose consciousness.\
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
r@k@\
mov %hsean_alice4,1
goto *sean0091a



*sean0091a

bgmstop
textoff
csp -1
bg black,99,5000,"system\lngtwave.dll/vwi"
bg "bg\bg001.bmp",99,5000,"system\lngtwave.dll/vwi"
wait 1500
gosub *setwindow_01p
name "???"
>Luka...@>Oh brave Luka...\
name ""
name "Luka"
>Ilias!?\
name ""
bgm "bgm\irias.ogg"
lsp 700,":a;chara\iriasu_st01.bmp",0,0
print 10,3000
name "Ilias"
>Luka... You are an unblessed Hero.\
name ""
name "Luka"
>Really... I'm actually a Hero?@
>Not a fake Hero, right?\
name ""
name "Ilias"
>Yes... You are a Hero.@
>So you must never forget your responsibility as a Hero...\
name ""
name "Luka"
>Of course!@
>I'll defeat the monsters who harm humans!\
>And use my sword to protect the weak!\
>And, and...\
name ""
name "Ilias"
>Defeat the Monster Lord, Hero Luka.@
>That is the duty of a Hero...\
name ""
name "Luka"
>Th...That's...\
name ""
bgmstop
textoff
csp -1
bg black,99,5000,"system\lngtwave.dll/vwi"
bg "bg\bg038.bmp",99,5000,"system\lngtwave.dll/vwi"
wait 500
bgm "bgm\city1.ogg"
dwave 1,"se\morning.ogg"
wait 1500
gosub *setwindow_01p
name "Luka"
>...Morning?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Hrm. Did you finally wake up?\
name ""
>Alice's face looks different from usual.@
>Is it because of what happened last night...?\
name "Luka"
>Hey Alice... Should I really defeat the Monster Lord?\
name ""
name "Alice"
>...Why would you ask me that?@
>Asking me ridiculous things.\
name ""
name "Luka"
>Ah... Sorry.\
name ""
>I keep forgetting that she's the Monster Lord.\
name "Alice"
>But... Isn't defeating Monster Lords the only point to you Heroes existing?\
>If you want to be a Hero, isn't defeating me your final goal?\
name ""
name "Luka"
>Yes... That's true...\
name ""
>That's also what Ilias said...@
>But I don't think defeating Alice would really be justice.\
name "Luka"
>Hero, huh?@
>I wonder what I should do...\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Follow your own road, the one you want to travel.@
>You might be sidetracked sometimes...@
>But you can't always have it your way in this world.\
name ""
name "Luka"
>...Hmm?@
>Aren't you going to just call me an [Idiot] like always?\
name ""
name "Alice"
>...Hrm. I'm not so one-dimensional.@
>You don't think that my mind is consumed by thoughts of food, do you?\
name "Luka"
>I did...\
name ""
>At any rate, I'm starting to wonder about the true path of a Hero.@
>But I can't just sit here thinking.\
>We need to finish our preparations here, and head out to San Ilia.\
>I'll ask the King about what it means to be a Hero.@
>Maybe he can show me the path...\
r@k@\
saveoff
cspl 3,7
csp 611
cspl 700,705
bg black,7,1500
bg "bg\bg037.bmp",7,1500
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
csp 700:csp 611:cspl 3,7
gosub *city06_main
bgmstop
dwave 1,"se\asioto2.ogg"
cspl 3,7
csp 611
cspl 700,705
bg black,7,1500
bgm "bgm\field3.ogg"
saveoff
textoff
csp -1
mov %sinkoumode,0:skipoff:autoclick 0
bg "bg\map2.bmp",10,1000
goto *sean0091m



*sean0091m

btndef clear
strsp 601,"Port Natalia",660,280,7,1,20,20,0,0,1,1,#bbbbbb
strsp 602,"San Ilia Castle",365,280,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 602,11
print 1
btnwait2 %cmd1
if %cmd1=0 goto *sean0091m
if %cmd1=-1 mov %sel2,%hanyo1:gosub *menu:goto *sean0091m
csp -1
btndef clear
if %cmd1=11 goto *sean0092
goto *sean0091m



*sean0092

dwave 1,"se\asioto2.ogg"
bg black,10,1500
gosub *setwindow_01
bg "bg\bg039.bmp",10,1500
>We leave Port Natalia, and head west along the beach.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>So you said we were heading to San Ilia?\
name ""
name "Luka"
>Yes... It's about a three day walk to the west of Port Natalia.@
>I want to ask the King about the path of a Hero...\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Hrm... How stupid.\
name ""
csp 700:print 10,500
>As I walk along the beach with the disgusted Alice...\
bgm "bgm\kiki1.ogg"
name "Young Woman"
>Kyaaa!\
name ""
>Suddenly, a young woman starts to scream!@
>A terrified woman is being attacked by a monster!\
r@k@\
goto *namako_start



*sean0093

bgm "bgm\field3.ogg"
name ""
r@k@\
name "Luka"
>Fu...\
name ""
>As I look at the sealed sea cucumber by my feet, I let out a relieved sigh.@
>Suddenly, I hear someone approach me from behind.\
name "Luka"
>Alice, I think I did pretty good there...\
name ""
>Happy at my victory, I talk excitedly while turning around...@
lsp 700,":a;chara\kai_st11.bmp",0,0:print 10,500
>But it was the woman from before.\
name "Young Woman"
>Umm... Thank you so much!\
name ""
name "Luka"
>Don't mention it...\
name ""
name "Young Woman"
>...I'm so happy to meet someone like you.\
name ""
name "Luka"
>Th...Thanks for your kind words...\
name ""
name "Young Woman"
>Umm... Would you... Please be my husband?@
>I want to have your baby...\
name ""
name "Luka"
>Ehhhhh!?@
>Suddenly saying something like that...\
name ""
>Even though she's so beautiful, you don't go right to that step...@
>First you form a deeper relationship, then...\
lsp 700,":a;chara\kai_st12.bmp",0,0:print 10,500
name "Young Woman"
>Then I'm no good, master?\
name ""
>The woman dejectedly hangs her shoulders.\
name "Luka"
>Er... I'm not your master.@
>Suddenly proposing marriage like that...\
name ""
lsp 700,":a;chara\kai_st11.bmp",0,0:print 10,500
name "Young Woman"
>Then live with me for a while.@
>Isn't that a good idea, master? \
name ""
name "Luka"
>Eh...?\
name ""
>Suddenly her body changes, with her skirt curling upwards and turning into a giant shell!\
r@k@\
goto *kai_start



*sean0094

bgm "bgm\field3.ogg"
name ""
r@k@\
name "Luka"
>..........\
name ""
>The sealed Shellfish Girl lands next to the sealed Sea Cucumber Girl.\
>Sealing monsters one after another...@
>For some reason, it makes me seem like a bad guy...\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>What an annoyingly forceful monster.@
>A monster girl like that only ruins our reputation.\
>Your new appearance looks a little painful but... I hope you change your ways next time.\
name ""
>Alice digs a hole in the sand with her tail.@
>And quickly buries the sealed Shellfish Girl and Sea Cucumber Girl.\
name "Luka"
>Oi, oi... Why did you bury the cucumber too?\
name ""
name "Alice"
>She won't die.@
>I just want to punish her a bit.\
name ""
>...The Monster Lord's punishment is pretty horrible.\
name "Luka"
>Let's hurry on.@
>We should almost be to the road that will take us to San Ilia.\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Why are you in such a hurry to go meet some suspicious King.@
>You're quite an idiot.\
name ""
name "Luka"
>Why are you doubting the King... He's a great person.@
>We can't say anything like that if we want to meet him...\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>I'm a million times greater than some suspicious guy like that.@
>Idiot.\
name ""
>How rude.\
dwave 1,"se\asioto2.ogg"
sean_change "bg041"
>No longer able to smell the sea, we continue on to the west.@
>As San Ilia was finally in front of our eyes...@
>Suddenly, a monster appears!\
r@k@\
goto *lamia_start



*sean0095

bgm "bgm\field3.ogg"
name ""
r@k@\
name "Luka"
>Fuu... I won.\
name ""
>I must have improved a lot if I was able to beat a Lamia.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Hrm, is it over? Let's keep going, then.\
name ""
name "Luka"
>...That's it?@
>Don't you think I've gotten stronger?\
name ""
name "Alice"
>A little.\
name ""
name "Luka"
>...That's it?\
name ""
>Maybe from the Monster Lord's perspective I haven't grown much...\
>Anyway, we're almost to San Ilia.@
>What will the San Ilia King tell me...?\
dwave 1,"se\asioto2.ogg"
sean_change "bg042"
bgm "bgm\castle1.ogg"
>San Ilia started as a massive cathedral, that eventually turned into a castle.\
>From there it continued to grow, and the archbishop became a King.\
>All Heroes eventually want to reach San Ilia and meet the King.\
>...But there's a major problem.\
>The King only meets with baptized Heroes...@
>And I haven't been baptized...\
bg "bg\bg043.bmp",7,1500
>Standing in front of the gate are a lot of strong looking Heroes.\
>A bunch of other adventurers hoping for an audience with the king are gathered around, too.\
>If there are this many people, it may be a while before I have a chance...\
lsp 700,":a;chara\mob_heisi1.bmp",-160,0
lsp 701,":a;chara\mob_heisi1.bmp",160,0:print 10,500
name "Guard A"
>Are you also hoping for an audience with the King?@
>Please sign your name on this application form.\
name ""
name "Luka"
>Ok...\
name ""
>I write down my name and hometown.@
>Thankfully there was no checkbox asking if I was baptized or not.\
>I pass the guard the finished paper.\
name "Guard A"
>The King wants to meet all brave Heroes...@
>But since there are so many, it will take some time.\
name ""
name "Guard B"
>It may take around three days, so please spend some time in the castle.\
name ""
name "Luka"
>It takes that long...\
name ""
name "Guard A"
>You may explore the castle as you wish, but some areas are restricted.@
>You may also sleep for free, so please enjoy your time in San Ilia.\
name ""
name "Luka"
>Thank you!@> Let's go, Alice.\
name ""
csp 701
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>...........\
name ""
>The bored looking Alice and I head into the castle.\
dwave 1,"se\asioto3.ogg"
sean_change "bg044"
>The architecture inside is simply amazing.@
>The walls were covered with beautiful religious artwork, with scenes of angels and Ilias.\
>The wonderful display almost brings tears to my eyes.\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>...........\
name ""
>Alice seems to be unhappy.\
name "Luka"
>This is amazing...\
name ""
>I stop in front of a giant statue of Ilias.\
name "Luka"
>This is the famous [Magnificent Ilias Goddess Statue].@
>This statue is much more amazing than anything back at Ilias Temple...\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>Is that so.\
name ""
name "Luka"
>The great Ilias created the first man and woman...@
>To lead them, she bestowed upon them this magnificent statue.\
>For thousands of years, this statue has guided the hearts of humans.\
name ""
name "Alice"
>Hrm.\
name ""
name "Luka"
>By the way, did you notice that everyone is careful when walking around to not point their sheathed sword at the statue?\
>Do you know why?\
name ""
name "Alice"
>How would I know.\
name ""
name "Luka"
>It's because one of the five commandments is [Point your sword at the Goddess and thou shalt cry].\
>I've been careful not to let my sword point at the statue as I walk around.\
name ""
>As I say that, I make sure my sword is pointed at the ground.\
name "Alice"
>...How stupid.@
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
>Since I hate this stupid thing, can I destroy it?\
name ""
name "Luka"
>What are you saying!?@>Weren't you listening to what I just said!?\
name ""
name "Alice"
>...Of course I heard it, you idiot.\
name ""
name "Alice"
>Don't point your sword at the goddess?@
>Making sure you slaves don't become hostile to your owner.\
>You idiots apply it even to this stupid statue of her.\
name ""
name "Luka"
>Err... Well...\
name ""
>I guess that's partly true.\
>But we've been told the commandments almost every day since childhood.@
>Pointing your sword at something that even looks like Ilias seems insane.\
name "Luka"
>Anyway, let's just spend some time relaxing.@
>They said it will take three days before we can meet the King.\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>Three days in this place...@
>Uhg, I think I might die of boredom.\
lsp 700,":a;chara\alice_st13b.bmp",67,0:print 10,500
>Oho... Is this your plan?@
>Unable to defeat me in a normal fight, you brought me here to slowly torture me to death in boredom?\
>How cunning...\
name ""
name "Luka"
>Don't say that.@>Let's just explore the castle some.\
>You know... There's sure to be something interesting happening.\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>Why are you so annoyingly energetic...\
name ""
>Alice and I take a walk around the castle.\
r@k@\
csp -1:print 10,500
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
csp 700:csp 611:cspl 3,7
gosub *city07_main
cspl 600,699
gosub *setwindow_01p
name "Luka"
>Shall we take a short rest now?\
name ""
>We start to head to the rest area when someone calls me from behind.\
lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
name "Guard Captain"
>Hey, is a Mr. Luka here?@
>A Luka that applied to have an audience with the King?\
name ""
>A captain with a red ornament is calling my name.\
name "Luka"
>Yes... I'm Luka.\
name ""
>Fearful, I slowly walk up to him.@
>Did they find out I wasn't baptized...?\
name "Guard Captain"
>Hmmm... So it's you?@
>The King will meet you right away.\
name ""
name "Luka"
>Eh?\
name ""
>What's going on here?@
>This is a lot faster than I thought...\
name "Luka"
>What's going on here...?\
name ""
>I was hastily pushed into the audience hall.@
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
>Alice is following me with a sour expression on her face.\
dwave 1,"se\asioto3.ogg"
sean_change "bg045"
lsp 700,":a;chara\saniria_n_st01.bmp",0,0:print 10,500
>The King sitting on the throne looks more like a wise man than a sovereign.\
>A meek, gentle look...@
>But he seems slightly restless.\
lsp 700,":a;chara\saniria_n_st01.bmp",-160,0
lsp 701,":a;chara\mob_sensi2.bmp",160,0:print 10,500
name "Guard Captain"
>I've brought him, King.\
name ""
name "San Ilia King"
>Thank you, you're dismissed.@> I shall have a private talk with him.\
name ""
name "Guard Captain"
>Of course.\
name ""
csp 701
lsp 700,":a;chara\saniria_n_st01.bmp",0,0:print 10,500
>The King sent the captain away immediately.@
>All that's left is the three of us.\
>If I introduce myself as a Hero, it would seem really awkward like this...\
name "San Ilia King"
>Traveler that calls himself Luka...@
>I wish to ask you a question.\
name ""
name "Luka"
>Eh?@>Of course...\
name ""
name "San Ilia King"
>You... Are not baptized, are you?\
name ""
name "Luka"
>Guh!\
name ""
>Right off the bat, he hits my weakest spot!@
>How should I respond...?\
r@k@\
csel "Honestly",*sean0095b,"Lie",*sean0095a



*sean0095a

name "Luka"
>Err... No... I've received the baptism.\
name ""
>I instantly let loose a lie.\
lsp 700,":a;chara\saniria_n_st03.bmp",0,0:print 10,500
name "San Ilia King"
>Hm? Is that so...@
>It seems I was mistaken...\
name ""
>The King's expression starts to darken.@
>It seems as if my lie made things worse...\
name "San Ilia King"
>So was that just a dream after all...?@
>I was positive it was [The Unbaptized Hero Luka]...\
name ""
name "Luka"
>Eh...?\
name ""
>Unbaptized Hero Luka... that has to be me!\
name "Luka"
>That's... probably me!@
>I heard Ilias call me that in a dream once!\
name ""
lsp 700,":a;chara\saniria_n_st04.bmp",0,0:print 10,500
name "San Ilia King"
>Oh! So you have received Ilias' revelations as well?@
>Hmm... But you said you were baptized.\
name ""
name "Luka"
>Oh, that was...@>Another baptism...\
>I was referring to a uh... Mental baptism. Not the Hero one.\
name ""
>Use a lie to fix a lie, I guess.@
>But the King seemed so excited that I doubt he cared about how dubious it sounded.\
goto *sean0095c



*sean0095b

name "Luka"
>...That's right.@
>I'm not baptized...\
name ""
>I was afraid of what would happen, but I told the truth.\
lsp 700,":a;chara\saniria_n_st04.bmp",0,0:print 10,500
>Suddenly, the King's eyes open widely.\
name "Luka"
>I'm sorry!\
name ""
name "San Ilia King"
>Oh! So it really is just as Ilias revealed to me in a dream!\
name ""
name "Luka"
>Eh? Eh...?\
name ""
>As I'm stunned in silence, the King starts to look excited.\
goto *sean0095c



*sean0095c

lsp 700,":a;chara\saniria_n_st02.bmp",0,0:print 10,500
name "San Ilia King"
>Last night, Ilias came to me in a dream.\
>With her beautiful hair, and pure face.@
>Her angelic appearance was like a breath of...\
name ""
lsp 700,":a;chara\alice_st13b.bmp",-110,0
lsp 701,":a;chara\saniria_n_st02.bmp",160,0:print 10,500
name "Alice"
>...That part doesn't matter, why don't you get to something important.\
name ""
name "Luka"
>Oi! Alice! Watch what you say to the King!\
name ""
>How rude.@>But I guess she's a ruler, too...\
>Over monsters, that is.\
csp 701
lsp 700,":a;chara\saniria_n_st02.bmp",0,0:print 10,500
name "San Ilia King"
>...Anyway, so Ilias gave me a revelation.\
>An unbaptized person named Luka would come before me.@
>And this unbaptized Hero will be the one to defeat the Monster Lord.\
name ""
name "Luka"
>I... will?\
name ""
>I see... So that's what's happening here.\
lsp 700,":a;chara\saniria_n_st01.bmp",0,0:print 10,500
name "San Ilia King"
>Now, I shall indicate the path you should take!\
>There are three wise men on this continent.@
>You need to demonstrate your power to all three, and receive their blessings.\
>I shall bestow this only upon the one who receives all three blessings.\
name ""
>The King motions to an amazing sword next to his throne.@
>Dazzlingly brilliant, it gives off a radiant light.\
name "San Ilia King"
>The sword of a true Hero... The [Goddess Sword]!@
>If you wield this sword, it's said all monsters - even the Monster Lord herself - will bow to you.\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-110,0
lsp 701,":a;chara\saniria_n_st01.bmp",160,0:print 10,500
name "Alice"
>.............\
name ""
>Alice looks calm.@
>It doesn't look like she's bowing to the sword...\
csp 701
lsp 700,":a;chara\saniria_n_st01.bmp",0,0:print 10,500
name "San Ilia King"
>Now, begin your quest to get proof from the wise men!@
>Then I shall bestow this sword upon you.\
name ""
lsp 700,":a;chara\alice_st14b.bmp",-110,0
lsp 701,":a;chara\saniria_n_st01.bmp",160,0:print 10,500
name "Alice"
>What a stupid quest.\
name ""
dwave 1,"se\asioto3.ogg"
>Alice says as she slowly walks toward the sword.\
name "Luka"
>Alice! What are you doing!?\
name ""
lsp 700,":a;chara\alice_st13b.bmp",-110,0
lsp 701,":a;chara\saniria_n_st04.bmp",160,0:print 10,500
name "Alice"
>...Fah!\
name ""
>Alice grabs the sword and raises it above her head!@
dwave 1,"se\break.ogg"
>In the next moment, the [Goddess Sword] shatters into pieces!\
bgm "bgm\alice1.ogg"
name "San Ilia King"
>How can this be!?\
name ""
name "Luka"
>Alice!?\
name ""
lsp 700,":a;chara\alice_st14b.bmp",-110,0:print 10,500
name "Alice"
>It's as you can see, Luka.@
>With crap like that, you wouldn't even be able to put a scratch on anyone.\
lsp 700,":a;chara\alice_st13b.bmp",-110,0:print 10,500
>Three wise men? Proof of your power?@
>What a load of crap from this old man.\
name ""
name "San Ilia King"
>....ooo.....\
name ""
>The King's face pales.@
>He starts to twitch, his mouth agape while staring blankly at the ceiling.\
csp 701
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>I'll show you the Hero's way instead of this worthless King.@
>Go to the Four Spirits and ask for their blessing.\
name ""
name "Luka"
>Four Spirits...?\
name ""
name "Alice"
>Salamander, Sylph, Undine, and Gnome.@
>They should be somewhere on this continent.@
>Locate them, and ask for their blessing.\
name ""
name "Luka"
>...What happens when I ask for their blessing?\
name ""
lsp 700,":a;chara\alice_st12b.bmp",67,0:print 10,500
name "Alice"
>You'll gain a mighty power from each of them.\
name ""
name "Luka"
>...Really...?@
>More importantly, why would you show me the Hero's way?\
name ""
>She's the Monster Lord, after all.@
>The Hero being guided by the Monster Lord is strange no matter how you look at it.\
name "Alice"
>Then, are you going to do what this worthless King said?@
>Even if you go to all three of those wise men or whatever, the [Goddess Sword] is already shattered.\
name ""
name "Luka"
>Err...\
name ""
>...That's certainly true.\
>As Alice said, it would be pointless to meet with the wise men in order to get the sword...\
name "Luka"
>...Ok. I believe you.\
name ""
>When I said that, strange laughter started to ring out.\
lsp 700,":a;chara\alice_st11b.bmp",-110,0
lsp 701,":a;chara\saniria_n_st02.bmp",160,0:print 10,500
name "San Ilia King"
>Fuaahaahoha!@
>Oooo Ilias. Look at what happened!@> Fufuhaha!\
name ""
name "Alice"
>Hey... Did you break?\
name ""
>It seems like the sword shattering caused a lot of psychological damage to him...\
lsp 700,":a;chara\mob_sensi2.bmp",-160,0:print 10,500
dwave 1,"se\asioto4.ogg"
name "Guard Captain"
>My Lord! What happened to you!?@
>What happened here! Oh my goddess, the [Goddess Sword]! It's shattered!\
name ""
>The Guard Captain jumps into the room and rushes up to the King.\
name "Guard Captain"
>Luka! What the hell happened here!?\
name ""
name "Luka"
>Err... This is...\
name ""
>What should I do...\
r@k@\
csel "Honestly",*sean0095e,"Lie",*sean0095d



*sean0095d

name "Luka"
>...I didn't see anything.\
name ""
>I quickly lie.\
name "Guard Captain"
>Is that so...? But...\
name ""
lsp 700,":a;chara\alice_st14b.bmp",-120,0
lsp 701,":a;chara\mob_sensi2.bmp",160,0:print 10,500
name "Alice"
>The Monster Lord suddenly appeared and shattered the sword.\
name ""
>Keep that to yourself...\
csp 701
lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
goto *sean0095f



*sean0095e

name "Luka"
>Uhm...@
>The Monster Lord suddenly appeared and shattered the sword.\
name ""
>It's not really a lie...@
>A true Hero doesn't tell full lies!\
goto *sean0095f



*sean0095f

name "Guard Captain"
>The Monster Lord did!?@
>Indeed, no other being would be able to destroy that sword...@
>We need to increase the castle defenses right away!\
name ""
name "Luka"
>............\
name ""
>The castle turns into a chaotic scene.@
dwave 1,"se\asioto4.ogg"
>Alice and I quickly get away from the audience hall in the chaos.\
bgmstop
sean_change "bg044"
bgm "bgm\castle1.ogg"
lsp 700,":a;chara\mob_heisi1.bmp",-160,0
lsp 701,":a;chara\mob_heisi1.bmp",160,0:print 10,500
name "Guard A"
>The Monster Lord is attacking!@
>She attacked the king and then ran away!\
name ""
name "Guard B"
>Oh no! Is the King safe?\
name ""
name "Guard C"
>He doesn't seem to be injured, but he suffered quite a shock.\
name ""
name "Guard D"
>Is it true that the [Goddess Sword] was destroyed!?\
name ""
>The Guards are running all over the place in confusion.\
cspl 700,701:print 10,500
name "Luka"
>Alice... Did you really have to do that?@
>Because of shattering that sword, I think you broke the King...\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Hrm. He was speaking such gibberish that I had to wake him up.\
name ""
>Alice is the only one with a calm face in this chaos.@
>At any rate, we have to get out of this castle...\
lsp 700,":a;chara\mob_heisi1.bmp",-160,0
lsp 701,":a;chara\mob_heisi1.bmp",160,0:print 10,500
name "Guard A"
>But isn't it too quiet...?@
>It seems like the Monster Lord broke in... But there's no trace of her.\
name ""
name "Guard B"
>Maybe it was a false report?@
>We need to gather everyone involved and get a better grasp on the situation.\
name ""
>Gah. That's not good.\
wait 500
bgmstop
dwave 1,"se\bom1.ogg"
quake 10,2000
bgm "bgm\kiki2.ogg"
>What the!?\
name "Guard E"
>A monster is attacking!\
name ""
name "Guard A"
>So she is here!@
>It looks like the Monster Lord's attack wasn't a false report after all!\
name ""
name "Guard E"
>No! It isn't the Monster Lord!@
>It's one of the Four Heavenly Knights, Granberia!\
wait 500
dwave 1,"se\down.ogg"
csp 701:print 10,500
name ""
>Yelling that final warning, the guard faints.\
name "Guard A"
>What happened!?@>Gah...\
dwave 1,"se\down.ogg"
csp 700:print 10,500
name ""
>Another guard faints.\
name "Luka"
>No way...!\
name ""
>And suddenly in front of me...@
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\granberia_st11_b.bmp",0,0:print 10,500
>Granberia appeared.\
name "Luka"
>Granberia!@> What are you doing here!?\
name ""
>I pull out my sword and stand in front of Granberia.\
>Her presence is just as powerful as before.@
>I'm just standing in front of her, but I already feel her gaze pushing me back.\
lsp 700,":a;chara\granberia_st13_b.bmp",0,0:print 10,500
name "Granberia"
>Oh... You've certainly changed.@
>You're completely different from when we last met in Iliasburg.\
name ""
name "Luka"
>.........\
name ""
>Is she able to tell that just because of my stance?@
>I'm a little happy at her praise.@>Wait, this isn't the time for that!\
name "Luka"
>So you've come to attack San Ilia this time?\
name ""
lsp 700,":a;chara\granberia_st12_b.bmp",0,0:print 10,500
name "Granberia"
>Don't joke around.@> What point is there in attacking some castle in the middle of nowhere?\
>I came here to cross swords with you!\
name ""
name "Luka"
>M...Me!?\
name ""
name "Granberia"
>I want to see if the others were just exaggerating your abilities.@
>I'll confirm it with my sword.\
lsp 700,":a;chara\granberia_st41.bmp",0,0:print 10,500
>Now, let's have a match!\
name ""
r@k@\
goto *granberia2_start



*sean0096

bgm "bgm\castle1.ogg"
name ""
r@k@\
name "Luka"
>Alright! I managed to drive her away somehow...!\
name ""
>She wasn't serious at all...@
>But still, I managed to make her go away!\
>It's the second time I've managed to push back one of the Four Heavenly Knights!\
>...Even if neither of them really tried.\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Granberia letting her enemy go twice...@
>It looks like she really likes you.\
name ""
name "Luka"
>If she likes me, then why would she show it by swinging her sword at me?\
name ""
name "Alice"
>That's just the kind of woman she is...\
name ""
lsp 700,":a;chara\mob_heisi1.bmp",-160,0
lsp 701,":a;chara\mob_heisi1.bmp",160,0:print 10,500
name "Guard A"
>Uuu...\
name ""
name "Guard B"
>What happened...?@>Did the Hero win...?\
name ""
>It seems like Granberia didn't actually kill any of the soldiers.\
>Maybe Granberia isn't really a bad monster...@
>She isn't the type to lightly kill someone.\
>But she does some very troublesome things...@
>I can't let her keep doing things like this, or the hate between monsters and humans will only continue to grow.\
name "Luka"
>Alice... If I really get the power of the Four Spirits, will I really get stronger?\
name ""
csp 701
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Yes. If they deem you worthy, you'll make their power your own.\
name ""
name "Luka"
>Alright, I believe you.@
>...So then, where are they located at?\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>Are you really going to ask me that?@
>Asking the Monster Lord about how to gain power to defeat the Monster Lord.\
>How ridiculous.\
name ""
name "Luka"
>Well... It's not like I particularly want to defeat you Alice.\
name ""
>But it is as she said.@
>It would be an issue for a Hero to be indebted to the Monster Lord.\
name "Luka"
>I get it... I'll find them myself.\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Isn't there a large library in the basement of the castle?@
>Surely there must be a book on the Four Spirits in there somewhere.\
name ""
name "Luka"
>I see...\
name ""
>But that library isn't open for just anyone to walk in.@
>You need to get permission first.\
csp 700:print 10,500
name "Luka"
>Umm.. Excuse me sir...\
name ""
>I call out to the Guard Captain, who was giving instructions to the injured.\
lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
name "Guard Captain"
>Oh, Sir Luka!@>I'm yours to command.\
>I'll give not only my strength, but my body and soul to you!\
name ""
>Since I was able to repel Granberia, it seems like they're treating me quite differently...\
name "Luka"
>...Well, Err...@
>There are Four Spirits, you see. And their power...\
name ""
name "Guard Captain"
>I see... Four Spirits, is it?\
name ""
name "Luka"
>I'd like to go to the library to find out where they are...\
name ""
lsp 700,":a;chara\alice_st13b.bmp",-120,0
lsp 701,":a;chara\mob_sensi2.bmp",160,0:print 10,500
name "Alice"
>This conversation is driving me nuts!\
name ""
>Unable to stand our conversation any longer, Alice cuts in.\
lsp 700,":a;chara\alice_st11b.bmp",-120,0:print 10,500
name "Alice"
>We want to go to the library to check something out.@
>It's very important information to be able to defeat the Monster Lord.\
>So, we want permission to enter the library.\
name ""
name "Guard Captain"
>Un...Understood!@
>It usually takes a week, but for you we'll make a special exception!\
name ""
name "Luka"
>...Thank you.\
name ""
>...Why do I feel like I was just defeated by Alice?@
>At any rate, we were able to get access to the library.\
dwave 1,"se\asioto3.ogg"
sean_change "bg046"
bgm "bgm\dungeon2.ogg"
name "Luka"
>Uwa! How huge!\
name ""
>As far as the eye can see...@> Books.@>Books.@> Books.\
>But even though it was so huge, there wasn't a soul to be seen.\
>The scholars must have all fled when news of the Monster Lord and Granberia reached them.\
name "Luka"
>Man... Libraries are so eerie when they're empty...\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Isn't it good for a library to be quiet and peaceful?\
name ""
>While staring at a stack of books, Alice suddenly starts to sniff them.\
name "Alice"
>But... This library smells an awful lot like monsters.@
>Slipping into a place like this...\
name ""
name "Luka"
>Eh...?@> There are monsters here?\
name ""
>With my hand on the hilt of my sword, I look around nervously.\
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>Stop looking around like an idiot, you idiot.@
>It's not like they're wandering monsters roaming around the room.@
>They must have taken possession of a book...\
name ""
name "Luka"
>Possess a book...?\
name ""
>That's the first time I've heard of a monster that can do that...\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Whatever, just hurry up and find what you're looking for.@
>I don't want to spend too much time in this place.\
>Since I can't eat books, I don't like them.\
name ""
name "Luka"
>I get it, I'll hurry...@>The Four Spirits...\
name ""
csp 700:print 10,500
>After scanning the catalog, I see a book named [Four Animists and their Sources].\
name "Luka"
>Let's see... The thirty-fifth bookcase on the second level...\
name ""
>I pick out the book from the bookcase.@
>It's extremely old, but it looks like nobody has touched it in years.\
>I guess that's to be expected though.@
>Since the faith in Ilias is strong here, there wouldn't be much interest in a book on pagan animism.\
name "Luka"
>I hope it has information on where the Four Spirits are...\
name ""
>I slowly open the book.@
>Suddenly a monster pops out of it!\
r@k@\
goto *page17_start



*sean0097

bgm "bgm\dungeon2.ogg"
name ""
r@k@\
name "Luka"
>Eh...? Was it sealed...?@
>Or did it die...?\
name ""
>It seems like Page 17 turned into a book with only a single page to it.\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>She didn't die, her soul is just inside the book now.@
>Just put the book right over here.\
name ""
>Alice calls to me from the corner of the library, where she's starting to make a bonfire out of the books.\
>...Wait! What the hell is she doing!?\
name "Luka"
>Oioi, what are you doing!?\
name ""
>It looks like she's creating a fire to make a baked potato...\
name "Alice"
>Don't worry.@> These are just the books about Ilias.\
name ""
name "Luka"
>What the hell do you mean "Don't worry"!?\
name ""
>I can't compete with the eccentric behavior of this girl.@
>It would probably be easier if I quickly find out about the Four Spirits and get out of here than if I tried to stop her.\
>Thinking that, I quickly pick back up the book.\
name "Luka"
>Anyway, why did a monster appear out of this book...?\
name ""
name "Alice"
>It must be the type of monster that possesses books and attacks whomever opens them.\
>But usually they possess books in storerooms.\
name ""
name "Luka"
>But she said that she was told not to let anyone read it because the Monster Lord told her not to...\
name ""
name "Alice"
>I don't know.\
>Lots of monsters drop my name without ever having actually received orders from me.@
>She must have been that kind of monster.\
name ""
name "Luka"
>...Is that so...@
>So she was that kind of monster...\
name ""
name "Alice"
>But for some reason...@
lsp 700,":a;chara\alice_st17b.bmp",67,0:print 10,500
>Ah!\
name ""
>Alice suddenly stiffens and drops her half-eaten baked potato.\
name "Luka"
>What's wrong...?\
name ""
name "Alice"
>.........\
name ""
csp -1:textoff
bg "bg\bg047.bmp",99,3000,"system\lngtwave.dll/vwi"
bgm "bgm\boss0.ogg"
gosub *setwindow_01p
>A few years ago...\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>The only book that exists about the Four Spirits is in San Ilia castle.@
>I want you to possess the book and prevent any human from reading it.\
name ""
lsp 700,":a;chara\page17_st01.bmp",-250,0:print 10,500
name "Page 17"
>Understood.\
name ""
lsp 701,":a;chara\page257_st11.bmp",250,0:print 10,500
name "???"
>Leave it to us, Lord.\
name ""
lsp 702,":a;chara\page65537_st31.bmp",0,-50:print 10,500
name "???"
>But my Lord...@
>Wouldn't it be better to just destroy the book?\
name ""
csp 701:csp 702
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...I don't like to burn books.@
>But we don't want any humans to misuse the Four Spirits.@
>So I just want you to protect the book.\
name ""
lsp 700,":a;chara\page17_st01.bmp",-250,0
lsp 701,":a;chara\page257_st11.bmp",250,0
lsp 702,":a;chara\page65537_st31.bmp",0,-50:print 10,500
name "Monsters"
>...Understood!\
name ""
csp -1:textoff
lsp 700,":a;chara\alice_st11b.bmp",67,0
bg "bg\bg046.bmp",99,3000,"system\lngtwave.dll/vwi"
bgm "bgm\dungeon2.ogg"
gosub *setwindow_01p
name "Alice"
>............\
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
>...I have no idea.\
name ""
name "Luka"
>............\
name ""
>...Suspicious.@
>But I wouldn't get anywhere even if I pursued it.\
csp 700:print 10,500
name "Luka"
>Alright, I've pulled myself back together. It's time to read this book.\
name ""
>I open the book again.@
>...And another monster pops out of the book!\
r@k@\
goto *page257_start



*sean0098

bgm "bgm\dungeon2.ogg"
name ""
r@k@\
name "Luka"
>Oioi, what's going on here.@
>A second monster came out of this book?\
name ""
lsp 700,":a;chara\alice_st18b.bmp",67,0:print 10,500
name "Alice"
>I... I don't know!\
name ""
>Alice evades my accusing glare, as she focuses on cooking another baked potato.\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>...My amazing intuition tells me that there's one more monster in that book.\
>It's quite a powerful one, too. Be careful.\
name ""
name "Luka"
>Ok...\
name ""
>You absolutely know something.\
csp 700:print 10,500
name "Luka"
>Alright! Here I go!\
name ""
>I take a deep breath and open the book again.@
>This time...@> A huge monster shoots out from the book!\
r@k@\
goto *page65537_start



*sean0099

bgm "bgm\alice1.ogg"
name ""
r@k@\
name "Luka"
>Alright!@> Err... This isn't good!\
name ""
>The flames are quickly spreading, as more and more of the library catches fire.\
lsp 700,":a;chara\alice_st17b.bmp",67,0:print 10,500
name "Alice"
>Haha... Look at it spread.\
name "Luka"
>What the hell are you laughing for!?@> We need to do something!\
>If you're the Monster Lord, use water magic or something!\
name ""
lsp 700,":a;chara\alice_st12b.bmp",67,0:print 10,500
name "Alice"
>I could submerge this entire castle underwater if I wanted, with my power.\
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
>...But it's pretty difficult to limit my power.@
>I don't really have confidence in my control.\
name ""
name "Luka"
>What the hell do you mean by that!?\
name ""
name "Alice"
>I'm not really good at water magic.\
name ""
name "Luka"
>Grr...\
name ""
>It would be bad to flood the entire castle.@
>Unable to decide what to do, I just stand in confusion looking at the expanding flames.\
lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
name "Guard Captain"
>Are you finding everything alright, Lu...@>What the hell is this!?\
name ""
name "Luka"
>Umm... This is...\
name ""
r@k@\
csel "Honest answer",*sean0099a,"Lie",*sean0099b,"Play dumb",*sean0099c



*sean0099a

name "Luka"
>The Monster Lord came and set the library on fire!\
name ""
>A true hero always speaks the (half) truth!\
name "Guard Captain"
>What! The Monster Lord!?@
>Not only destroying the holy sword, but now setting fire to our library!?\
name ""
goto *sean0100



*sean0099b

name "Luka"
>Well... Granberia...@
>She must have set this place on fire out of spite!\
name ""
>Sorry, Granberia.@
>Even though you seem like the person not to do something out of petty revenge, I tarnished your character.\
>But since your master did it, it's your duty to assist her...\
>...That concludes my shift of blame.\
name "Guard Captain"
>What pathetic behavior, Granberia!@
>Her rumored chivalry must have been a lie!\
name ""
goto *sean0100



*sean0099c

name "Luka"
>Oh, hello.@> What's going on?@>Oh look... A fire...\
name ""
name "Guard Captain"
>You didn't notice the fire!?@
>Is this the work of another monster!?\
name ""
goto *sean0100



*sean0100

name "Guard Captain"
>Anyway, we have to rescue the books!@
>First put out the fire! We can't let it spread!\
name ""
>The Guard Captain started to issue orders to the guards rushing into the library.\
dwave 1,"se\asioto4.ogg"
>Alice and I slip out of the library amid the confusion.\
bgmstop
csp 690
sean_change "bg048"
bgm "bgm\city1.ogg"
>We head to the town surrounding San Ilia Castle.@
>Alice is following me with her head down.\
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>Really, this time I'm actually sorry.@
>Accidental fires like that are really horrible, I try to avoid them in my own castle too.\
name ""
name "Luka"
>Well, I think they were able to save all the valuable books...\
name ""
>It seems like she really is sorry for once.\
name "Luka"
>But I left the book in the library...@
>I wonder if it burned...\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>...Here.\
name ""
>Alice hands me the [Four Animists and their Sources] book from before.\
name "Alice"
>...I took it in the commotion.\
name ""
name "Luka"
>Oh! Tha...@> No, I'm not going to thank you.@
>You were the one that messed everything up in the first place.\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>Sorry...\
name ""
>If I criticize her any more, it might be a bit too much...@
>Alice has helped me out a lot, with the training and everything...\
name "Luka"
>...Well, I'll forgive you if you're sorry.@
>Now, I should finally be able to read this book properly...\
name ""
>Defeating monsters who popped out of this thing, causing a huge fire...\
>Finally, I sit on a bench and am able to actually read this thing.\
csp 700:print 10,500
mov %item01,8
name "Luka"
>Hmm...\
name ""
>The general location of the Four Spirits is recorded in the book.\
>Salamander is in a volcano in the Gold region, on the north end of the continent.\
>Undine is on the east end of Sentora, near the holy springs of Noah.\
>Gnome is on the west end of Sentora, somewhere in the deserts of Safina.\
>And finally Sylph is in the Forest of Spirits, close to where we are now.\
name "Luka"
>...It looks like Sylph is the closest, in the nearby Forest of Spirits.\
name ""
>Looking at the map, it's pretty close.@
>If we walked from here, it would only take about three days.\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Elves live separated from other monsters in the Forest of Spirits.@
>As the Monster Lord, I don't really want humans to go into that forest...\
name ""
name "Luka"
>I understand, Alice.@
>As long as they don't attack me first, I won't bother them.\
name ""
>I don't want to go there to disturb the faeries or elves anyway.\
lsp 700,":a;chara\alice_st12b.bmp",67,0:print 10,500
name "Alice"
>Good.@
>Since you're a human I can trust, I'll allow you to enter the forest.\
name ""
name "Luka"
>...Do you really trust me?\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>...Bah!\
name ""
>Suddenly interrupting our conversation was...\
csp 700:print 10,500
name "???"
>Finally, I meet you again...@
>My Darling, I shall shower you with the affection I've built up over the past hundred years.\
name ""
name "Luka"
>You...!?\
name ""
wait 500
bgmstop
bgmonce "bgm\battlestart.ogg"
lsp 700,":a;chara\amira_st01.bmp",0,0:print 10,500
eng "Unfortunate Lamia appears!":$sel6/
wait 1000
delay 4500
bgm "bgm\amira.ogg"
\
name "Amira"
>I am Amira, an Unfortunate Lamia.@
>My fiery passion burns brighter than a transient phoenix, as it rebirths stronger every time it is shot down.\
name ""
>A transient phoenix? That doesn't sound right...@
>Anyway, how the hell did this thing cross over to Sentora?\
name "Luka"
>Isn't the sea route still blocked? How did you cross over to this continent?\
name ""
name "Amira"
>Actually, I was hiding on the same boat as you.@
>Together on our boat of love, I'll follow my Darling anywhere.\
name ""
name "Luka"
>...I see. Why are you so fixated on stalking me?\
name ""
name "Amira"
>...An ugly Lamia like me is avoided wherever I go.@
>Everyone pokes me with sticks, or throws stones at me as I pass by.\
name ""
name "Luka"
>Amira...\
name ""
lsp 702,":a;chara\amira_st01.bmp",0,0
lsp 700,":a;chara\mob_syounen.bmp",-250,0
lsp 701,":a;chara\mob_syouzyo.bmp",250,0:print 10,500
name "Child A"
>Uwa! Hey, Big-sis snake is here!\
name ""
name "Child B"
>Let's play! Let's play!\
name ""
name "Luka"
>...Yeah, those children sure seem like they hate you.\
name ""
>The children tug on Amira playfully.\
name "Child A"
>Hey sis, are you strong?\
name ""
name "Child B"
>Can you defeat all the ghosts in the haunted mansion to the north?\
name ""
name "Amira"
>My character is designed for impact, not physical strength.\
name ""
name "Luka"
>Haunted mansion to the north?@>What's there?\
name ""
name "Child A"
>It's a huge mansion with ghosts infesting it.\
name ""
name "Child B"
>Baaad ghosts come out, and don't let us play there anymore!\
name ""
cspl 701,702
lsp 700,":a;chara\alice_st13b.bmp",67,0:print 10,500
name "Alice"
>Ghosts don't exist!\
name ""
>Alice suddenly yells out.\
name "Luka"
>Oioi, if you yell like that, you'll scare the children.\
name ""
lsp 702,":a;chara\amira_st01.bmp",0,0
lsp 700,":a;chara\mob_syounen.bmp",-250,0
lsp 701,":a;chara\mob_syouzyo.bmp",250,0:print 10,500
name "Child A"
>Waah! Snakey!\
name ""
name "Child B"
>Snakey!\
name ""
>The children are too busy playing with Amira to notice Alice.\
cspl 701,702
lsp 700,":a;chara\alice_st13b.bmp",67,0:print 10,500
name "Alice"
>...Hrm. Stupid humans.@
>Believing in such superstitious crap like ghosts.\
>Fearing such stupid things... How foolishly foolish.\
name ""
name "Luka"
>...What are you talking about, Alice?\
name ""
>Alice's suspicious attitude aside...@
>It seems like something is happening in the mansion to the north.@
>But it's coming from a couple of children, so it may just be made up.\
dwave 1,"se\asioto3.ogg"
lsp 700,":a;chara\mob_heisi1.bmp",-160,0
lsp 701,":a;chara\mob_heisi1.bmp",160,0:print 10,500
>Suddenly, two soldiers pass by.\
bgm "bgm\alice1.ogg"
name "Soldier A"
>Ah! A monster is in the town!\
name ""
name "Soldier B"
>She may know something about the Monster Lord breaking in earlier! Catch her!\
name ""
dwave 1,"se\asioto4.ogg"
>Shouting, the soldiers charge over towards us.\
csp 701
lsp 700,":a;chara\amira_st01.bmp",0,0:print 10,500
name "Luka"
>This isn't good! Run!\
name ""
name "Amira"
>Wawawa!\
name ""
dwave 1,"se\asioto1.ogg"
>Amira and I run away in a hurry.@
>It looks like the hate towards monsters really is strong here...\
dwave 1,"se\asioto1.ogg"
sean_change "bg048"
bgm "bgm\city1.ogg"
dwave 1,"se\asioto1.ogg"
name "Luka"
>Hah... Hah...@
>Now that I think about it... I didn't need to run away, did I?\
name ""
>Still in the castle town, we're at a plaza now.@
>Was Amira able to get away...?\
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>Well... It seems like the people here aren't very welcoming of monsters.@
>As I thought, this place has been tainted by Ilias.\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
>Hmm... What's that?\
name ""
>Alice's eyes rest on a wooden bulletin board, covered in notices held on by small thumbtacks.\
name "Luka"
>This is a request board, where people post things they need help with.@
>...Shall we check it out?\
name ""
>[Looking for someone with a strong arm for three months of guard work. Interview required.]\
>[Looking for a skilled blacksmith.]\
>[Looking to buy North Sentora Grass. My house is between Shady's and Torch Three.]\
>[I want a cute puppy.]\
name "Luka"
>Hrrm... It doesn't look like I can fulfill any of these.\
name ""
>I can't spend too much time here doing requests anyway.\
>As we walk away, a pigeon comes flying over us, and lands on top of the board.@
>Attached to the pigeon's foot was a tiny slip of paper.\
name "Alice"
>Hmm... What's with this pigeon?\
name ""
name "Luka"
>Alice, this pigeon is working hard...@
>Please, don't eat it.\
name ""
lsp 700,":a;chara\alice_st13b.bmp",67,0:print 10,500
name "Alice"
>Like I would!\
name ""
>The pigeon uses its beak to take the paper off its foot and stick it onto the board before flying off to its next stop.\
name "Luka"
>That's a Notice Pigeon.@
>Just like that, they deliver notices to settlements all over the world.\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>I see... Humans trained pigeons to do such a thing...@
>You humans sure think of some interesting things.\
name ""
>I walk back to the board to look at the new request.\
>[To those who don't have a bias against monsters.@
>I have a request, so please listen to my story.@
>I live at 6th street 3-29 in the South District of Port Natalia.]\
name "Luka"
>Someone without a bias against monsters...?\
name "Luka"
>I'm interested...@>Shall we go and see what they have to say?\
name ""
name "Alice"
>Surely you aren't going to return to Port Natalia?\
name ""
>It looks like Alice doesn't want to go to the trouble of heading back.@
>Though it is true, it would be another long walk back...\
name "Luka"
>Still, I want to go.@
>I'm sure this will be something that brings together humans and monsters...\
name ""
name "Alice"
>You really like doing all these stupid acts of kindness, don't you?@
>Just leave it alone...\
name ""
name "Luka"
>I'm a Hero, it's my job to help those in need.\
name ""
name "Alice"
>A fake Hero...\
name ""
name "Luka"
>It's because I'm a fake Hero that I must have the heart of a true one!\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>Hrm. You learned how to talk back...\
name ""
>She looks unhappy, so I'll just leave her alone.@
>Before heading out, shall I gather some information?\
r@k@\
csp -1:print 10,500
mov %hanyo1,0
mov %hanyo2,0
mov %hanyo3,0
mov %hanyo4,0
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
csp 700:csp 611:cspl 3,7
gosub *city08_main
dwave 1,"se\asioto2.ogg"
bgmstop
sean_change "bg041"
bgm "bgm\field3.ogg"
name "Luka"
>I wonder what's really happening at that haunted mansion.@
>Everybody in town was saying something a little different.\
name ""
>A dead girl, execution ground, graveyard, and a strange sorceror...@
>I wonder which is true?\
name "Luka"
>But it does sound like a normal haunted house.@
>What do you think, Alice?\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>No! Stupid unscientific things like ghosts don't exist.@
>Stop being so stupid.\
name ""
name "Luka"
>But aren't there Zombie monsters and such...?\
name "Alice"
>Those aren't ghosts!@
>When a lot of magic gathers inside dead bodies, they turn into normal monsters.\
>Don't mix them with stupid things like ghosts!\
name ""
>...Why is she so persistent in denying them?\
name "Luka"
>We may have to go to that haunted mansion...@
>I don't want monsters to continue to trouble humans...\
name "Alice"
>That isn't necessary!@
>Go to the Forest of Spirits and get Sylph!\
>We don't have any time for pointless detours!\
name "Luka"
>...Why are you so angry?\
name ""
>I still don't get her...\
name "Luka"
>Speaking of detours, there was also that request from Meia.\
name ""
>[To those who don't have a bias against monsters.]@
>That describes me perfectly...\
name "Luka"
>There's a lot to do here for a Hero...\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>You're just an idiot.@
>Stop doing pointless things for strangers.\
name ""
csp 700:print 10,500
>Meia is in Port Natalia...@
>There's also that mansion to the north...@
>Or should I do as Alice wants and go right to the Forest?\
>Well, let's make our next destination...\
r@k@\
mov %genzaiti,5
mov %gloval1_story_sinkou,3:gosub *savegloval1
goto *map2



*sean0101

gosub *genzaiti_bg
name "Luka"
>Alright, let's head to Port Natalia.\
name ""
>I want to meet the person who's looking for someone without a bias against monsters...\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>You're such an idiot.@
>Have you forgotten the purpose of your journey?\
name "Luka"
>My only purpose wasn't to head right to the Monster Lord's castle.@
>I want humans and monsters to get along.\
name ""
name "Alice"
>Uhg...\
name ""
name "Luka"
>Alright, let's go!\
name ""
>Together with the disgusted looking Alice, I head off to Port Natalia.\
dwave 1,"se\asioto2.ogg"
bgmstop
sean_change "bg037"
bgm "bgm\city1.ogg"
>And finally we arrived at Port Natalia.@
>The return journey was a lot easier...\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Mmm... These Yamatai crackers are delicious.\
name ""
>Alice is excitedly eating the crackers I bought earlier.@
>If I don't feed her regularly, she gets annoying.\
>Now, let's find that house mentioned on the notice board...\
csp -1:print 10,500
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
csp 700:csp 611:cspl 3,7
gosub *city10_main
dwave 1,"se\asioto2.ogg"
gosub *setwindow_01p
name "Luka"
>6th street... 3-29... Is this it?\
name ""
>I walk up to the house that matched the address on the noticeboard.@
>This should be where Meia lives.\
name "Luka"
>*Knock* *Knock*@>Is anyone there?\
name ""
name "Female Voice"
>I'm coming!\
name ""
>A woman's voice calls out excitedly.@
lsp 700,":a;chara\meia_st01.bmp",50,50:print 10,500
>Suddenly, a Mermaid I had seen before in the town appeared!\
name "Luka"
>Oh...? Are you Meia?\
name ""
name "Meia"
>Yes... I'm Meia.@
>I'm sorry about cutting our conversation short last time...@
lsp 700,":a;chara\meia_st02.bmp",50,50:print 10,500
>Due to the explosion, I completely forgot about our conversation...\
name ""
name "Luka"
>Oh no, don't be sorry.\
name ""
>Alice and I went inside her house.\
dwave 1,"se\asioto2.ogg"
sean_change "bg049"
lsp 700,":a;chara\meia_st01.bmp",50,50:print 10,500
name "Meia"
>Please excuse the small house...@
>I don't have much to entertain you with either...\
name ""
name "Luka"
>Oh don't worry about it, we're fine...\
name ""
>She set down some suspicious looking aquatic-based cakes and tea on the table.\
lsp 700,":a;chara\alice_st13b.bmp",-120,0
lsp 701,":a;chara\meia_st01.bmp",200,50:print 10,500
name "Alice"
>We're somewhat busy.@
>Your request better not be stupid.\
name ""
name "Luka"
>Aaahh can you be quiet for a minute?@
>Here... If you keep nibbling on this seaweed, it will probably taste good after a while...\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-120,0:print 10,500
name "Alice"
>Seaweed...\
name ""
>Alice gives an odd look to the seaweed before finally taking a bite.\
csp 701
lsp 700,":a;chara\meia_st02.bmp",50,50:print 10,500
>While she's eating, I'd better ask her about her request...\
name "Luka"
>So, what is the request you need assistance with?\
name ""
lsp 700,":a;chara\meia_st03.bmp",50,50:print 10,500
name "Meia"
>Actually... I'm in love with a human.\
name ""
>Meia holds her cheeks as she blushes.\
name "Luka"
>No way... Are you wanting me to play matchmaker or something?@
>I'm not very good at that at all...\
name ""
lsp 700,":a;chara\meia_st02.bmp",50,50:print 10,500
name "Meia"
>Oh no... We're already in a relationship.@
>We've lived together in this house for a while.\
>But right now, he's out at sea fishing...\
name ""
name "Luka"
>That's great!\
name ""
>This is the world I want to create. Man and monster living together peacefully.\
lsp 700,":a;chara\meia_st01.bmp",50,50:print 10,500
name "Meia"
>But...@
>Although we love each other deeply, we're not married.\
>It's because we can't perform the Marriage Trial dictated by marine law...\
name ""
name "Luka"
>Marriage Trial...?\
name ""
name "Meia"
>When a Mermaid and a human get married, they have to offer a written pledge to the Queen at the temple on the seabed.\
>But...@
>The monsters along the way to the temple are too dangerous.@
>I have some magic power, but my darling isn't too strong.\
>We wouldn't be able to make it there safely...\
name "Luka"
>In other words... You want me to go to the temple at the bottom of the sea and deliver this pledge?\
name "Meia"
>Yes...@> I'm sorry for the troublesome request.\
>Could you please deliver the pledge to her in our stead?\
name ""
name "Luka"
>...Is someone else even allowed to deliver it in your place?@
>It seems like a strange trial if the two people getting married don't even need to do it.\
name ""
name "Meia"
>The law doesn't specifically say [Those getting married have to deliver it].\
>It doesn't say someone else can either... But it should be fine.\
name ""
>Err... That doesn't seem quite right...@
>If the people themselves don't undergo the trial, what's the point?\
>While thinking that, someone opens the front door.\
dwave 1,"se\door2.ogg"
lsp 700,":a;chara\mob_syounen.bmp",-160,0
lsp 701,":a;chara\meia_st01.bmp",200,50:print 10,500
name "Boy"
>I'm home!\
name ""
name "Meia"
>Ah! Welcome home! \
name ""
>A small boy walks into the house.\
name "Luka"
>Eh...? No way, you've already had a kid together?\
name ""
lsp 701,":a;chara\meia_st02.bmp",200,50:print 10,500
name "Meia"
>No, no...@>This is my darling!\
name ""
name "Luka"
>Eh...!?\
name ""
>Isn't he... A bit young?\
name "Boy"
>Heeey Meia. Who are these people?\
name ""
lsp 701,":a;chara\meia_st03.bmp",200,50:print 10,500
name "Meia"
>They're very admirable adventurers!@
>I asked them to deliver our pledge of marriage to the Queen!\
name ""
name "Boy"
>Oh, really?@>Thank you!\
>We really want to get married, so that would help us a lot.\
name "Luka"
>Um... Meia...@
>Don't you think it would be better to wait for him to grow up a little more...?\
name ""
>Getting married to such a young boy...\
lsp 701,":a;chara\meia_st01.bmp",200,50:print 10,500
name "Meia"
>But my darling is turning twenty-five this year.\
name ""
name "Luka"
>Eh!?\
name ""
>...That has to be a lie, right?@
>No matter how I look at him, he's younger than I am...\
name "Boy?"
>I'm an adult! I can get married!\
name ""
name "Meia"
>I used a little of my Mermaid magic to stop his growth...\
name ""
name "Luka"
>Why did you do that...?\
name ""
lsp 701,":a;chara\meia_st02.bmp",200,50:print 10,500
name "Meia"
>Because... He's so cute like this! \
name ""
name "Boy?"
>So that's why! I thought it was strange!@
>Meia! That's so awful!\
name ""
lsp 701,":a;chara\meia_st03.bmp",200,50:print 10,500
name "Meia"
>Hehehehehe...\
name ""
>The boy(?) starts to pout while Meia laughs.@
>Well... What should I do here...?\
lsp 701,":a;chara\meia_st01.bmp",200,50:print 10,500
name "Meia"
>That's how it is, so please help us!@
>Please go to the Queen at the bottom of the sea and deliver our pledge!\
name ""
name "Boy?"
>Please!\
name ""
name "Luka"
>...Alright.@
>I'll take the request.\
name ""
lsp 701,":a;chara\meia_st03.bmp",200,50:print 10,500
name "Meia"
>Thank you so much!\
name ""
name "Boy?"
>Thank you, big bro!\
name ""
>The two of them hug each other happily.\
name ""
csp 701
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>.............\
name ""
>Alice, still chewing on the seaweed, glares at me.@
>"Doing more troublesome things".@> She's beaming that face at me.\
lsp 700,":a;chara\mob_syounen.bmp",-160,0
lsp 701,":a;chara\meia_st02.bmp",200,50:print 10,500
name "Meia"
>It's only something small, but I can give you a reward.@
>It may not be enough for you though...\
name ""
name "Luka"
>Oh no, you don't need to give me a reward.\
name ""
>Humans and monsters coexisting together is my goal after all...@
>If I can help their love grow, that's its own reward!\
name "Meia"
>Then please take these...@
>This is our pledge, and a [Ball of Guidance].\
name ""
>Meia hands me a document with writing on it, and a transparent crystal.\
dwave 1,"se\fanfale.ogg"
mov %item04,1
>[Ball of Guidance] acquired!\
>[Written Pledge] acquired!\
name "Luka"
>[Ball of Guidance]? What's this?\
name ""
>I look at the crystal in puzzlement.\
name "Meia"
>While standing on the nearby beach, you need to use that.@
>Then you should be able to go on the undersea road.\
name ""
name "Luka"
>I see...@> So if I follow that road, will it take me to the temple?\
name ""
name "Meia"
>Yes...@
>I'll pray for your safe journey.\
name ""
name "Boy?"
>Good luck, Bro!\
name ""
name "Luka"
>Leave it to me!\
name ""
>Saying that, we leave Meia's house.\
dwave 1,"se\asioto2.ogg"
csp 700
sean_change "bg037"
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>You sure do like to be used by others.@
>There's no point in doing such a personal request as that.\
name "Luka"
>Don't say that, Alice.@
>Isn't it great to break down racial barriers in the name of love?\
name ""
name "Alice"
>But that guy will break Ilias' law, won't he?@
>Since you believe in her laws, isn't that bad?\
name ""
name "Luka"
>Urgh... That hits a weak point.\
name ""
>For now, I won't worry about that point...@
>Anyway, it's good if I can help to break down the hate between man and monster.\
name "Luka"
>Alright, let's go! To the Queen at the bottom of the sea!\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>An underwater temple... I doubt there's anything good to eat.\
name ""
>...Always thinking of your next meal.@
>While I shake my head in amazement, we leave the town.\
dwave 1,"se\asioto2.ogg"
bgmstop
sean_change "bg039"
bgm "bgm\field3.ogg"
name "Luka"
>So on the beach with this [Ball of Guidance], what do I do?\
name ""
>We came to the beach right outside of the town.@
>As I start to take out the [Ball of Guidance] from my bag...\
>A monster crawls out of the sea!\
r@k@\
goto *kani_start



*sean0102

bgm "bgm\field3.ogg"
name ""
r@k@\
name "Luka"
>Haaaa... Oh?\
name ""
>The crab circles my feet instead of running away.\
name "Luka"
>What are you doing?\
dwave 1,"se\damage.ogg"
>Ouch!\
name ""
>Suddenly, the crab pinches my toes!@
dwave 1,"se\escape.ogg"
>After pinching me, she runs off into the sea!\
name "Luka"
>Geez... Annoying to the end.\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...Having trouble, as usual.@
>If you can't blow off a monster like that with just a sneeze, you'll never be able to beat the Monster Lord.\
name ""
name "Luka"
>...That's you, you know.@
>More importantly, what kind of weird training lets you use your sneezes as a weapon?\
name ""
csp 700:print 10,500
>While muttering that, I take out the [Ball of Guidance].@
>She said I had to "use" it here... Maybe I should try holding it up, first.\
>Alright... Here I go...\
dwave 1,"se\light.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,600
csp 2:print 10,600
>The [Ball of Guidance] starts to shine brightly, and shoots out a beam of light far out into the sea!\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Hmm... So that thing created a road of light to follow.\
name ""
name "Luka"
>Road of light...?\
name ""
name "Alice"
>That light is a tunnel to the bottom of the sea, so to speak.@
>If you follow the light closely, it's possible to go all the way to the bottom of the sea through the light tunnel.\
name ""
csp 700:print 10,500
name "Luka"
>Inside the light...?\
name ""
>I timidly step into the tunnel of light created.@
>A strange sensation, as if I've entered a separate dimension, envelopes me.\
>Though I have to swim since I'm under water, I can breathe normally.@
>In addition, my clothes aren't getting wet... How mysterious.\
name "Luka"
>So we just have to stay on this light road to reach the bottom of the sea?\
name ""
>Even though I don't really like that I have to swim, at least I can breathe.\
>Alice and I start to head down the light tunnel.@
>To fulfill Meia's wish, I have to reach the Queen at the bottom...\
bgmstop
sean_change "bg050"
bgm "bgm\umi2.ogg"
>Continuing to follow this strange tunnel of light, we go deeper and deeper.\
name "Luka"
>Is this light tunnel safe? I hope it doesn't just suddenly vanish when we're so deep...\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>As long as you keep holding that [Ball of Guidance], it's no issue.@
>While the bearer is in the sea, it will never fade.\
name "Luka"
>I see...\
name ""
>I wonder what would happen if I dropped the ball...@
>...I'm terrified even at the thought of doing that.\
name "Alice"
>Reaching the bottom of the sea on this road... The trial of a couple that wishes to marry...\
>Knocking down every monster that challenges them to show their courage...\
name ""
name "Luka"
>That's a pretty troublesome trial to have to perform just to get married...\
name ""
>And it's meaningless if the people getting married don't even have to do it themselves.\
name "Luka"
>Do other monsters have strange customs like this too?\
name ""
name "Alice"
>It's different depending on the type of monster.@
>Some don't care at all who their partner is, and others have extremely detailed restrictions and requirements.\
>My family requires two conditions to be met before they are allowed to be a partner.\
name ""
name "Luka"
>Your family does?\
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>First, the man has to be strong.@> Second, the man has to want to get married.\
>Only a man stronger than the female is allowed to marry someone of my clan.@>That's our law.\
name ""
name "Luka"
>That's... Pretty difficult, isn't it?\
name ""
>A man stronger than Alice, the current Monster Lord?\
csp 700:print 10,500
name "Luka"
>Putting that aside... It looks like a fantasy world around here.\
name ""
>I look around our surroundings as we swim deeper.@
>Thousands of colorful fish are swimming around our tunnel in every direction.\
name "Luka"
>It's beautiful... The mysteries of the deep are amazing, aren't they?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...For now.@
>The deep sea is the monster's domain.@>They will attack you without mercy once you're noticed.\
name ""
>As soon as Alice said that, she quickly looks over her shoulder.\
name "Alice"
>See... Of course, right as I said that something was going to come...\
name ""
csp 700:print 10,500
name "Luka"
>Eh...?\
name ""
>I look to where Alice's head had turned, and I see a clear-looking monster quickly approaching!\
r@k@\
goto *kurage_start



*sean0103

bgm "bgm\umi2.ogg"
name ""
r@k@\
name "Luka"
>Haa... I'm glad the blade still works underwater.\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>What idiotic things are you saying?@>You idiot.\
name ""
name "Luka"
>You don't have to say it twice in a row...\
name ""
>Suddenly, I feel something touch my right foot.@
>I look down, and see that a tentacle is wrapping around my right foot!\
>It looks like it's extending to me all the way from the bottom of the sea!\
name "Luka"
>Wa! What is this!?\
name ""
name "Alice"
>Oh... That looks like a Sea Anemone Girl's tentacle.\
name ""
name "Luka"
>Eh...?@> Ahhh, it's dragging me down!\
name ""
>My body is slowly pulled down as I struggle against it.@
>This isn't good, I'll be dragged all the way to the bottom!\
name "Alice"
>Oh well, I'll give you a hint.@
>The Sea Anemone Girl drags prey into her with her tentacle, and sucks out all their semen.\
>Once you're caught by her, she won't stop until you're dead.\
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
>But of course you'll get pleasure the entire time. Hahaha.\
name ""
name "Luka"
>Eh...?@> That isn't a hint!\
name ""
>Alice slowly fades from my view as I'm pulled deeper under water.\
csp 700
bg "bg\bg051.bmp",10,1500
>Pulled all the way down, I can finally make out the sea floor and the source of the tentacle...\
r@k@\
goto *iso_start



*sean0104

bgm "bgm\umi2.ogg"
name ""
r@k@\
name "Luka"
>Whew... There sure are a lot of monsters in the sea.\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>But there's a lot of things to eat...@
>It's a nice place, I like it.\
name ""
>Alice appears eating a fish she caught.@
>It's a little scary that I'm not surprised at this sight.\
csp 700:print 10,500
name "Luka"
>Anyway, we're on the sea floor at least.@
>Now where is this temple...?\
name ""
>I look around at our surroundings.@
>In the distance, I can make out the outline of something that looks like a temple.\
name "Luka"
>Ah, that must be it.@> Let's go, Alice.\
>Oh, is something wrong?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
>Alice is staring intently at a rock on the seabed.\
name "Alice"
>That sea anemone... I wonder if it tastes good.\
name ""
name "Luka"
>...Let's just go, Alice.\
name ""
>Shaking my head, I start to swim to the temple in the distance.\
bgmstop
sean_change "bg052"
bgm "bgm\dungeon1.ogg"
name "Luka"
>Is this the temple?\
name ""
>The structure looks just like the temples I've seen before.@
>...Except for the "on the bottom of the sea" part.\
name "Luka"
>What kind of monster is the Queen at the bottom of the sea?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>I believe the Queen who rules the southern sea is from the Kraken family.@
>I left the governance of this part of the ocean completely up to her.\
name ""
>Alice explains as she eats a shellfish she picked up.@
>Since she's the Monster Lord, I guess that makes the Queen here her subordinate?\
csp 700:print 10,500
>As we move further along...@
>A dim light starts to move through the temple.\
name "Luka"
>What's that...?\
name ""
>Is it a lamp?@>Wait, that wouldn't make any sense underwater.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Hrm. An interesting monster.\
name ""
name "Luka"
>Eh...?@> Monster?\
name ""
>I frown as the light comes into view!\
r@k@\
goto *ankou_start



*sean0105

bgm "bgm\dungeon1.ogg"
name ""
r@k@\
name "Anglerfish Girl"
>.........\
name ""
>It doesn't even look like the Anglerfish Girl noticed she was sealed.@
>She swims off with the same slow motion movements as usual.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Hrm. Are you finished?@
>I went ahead a little bit and found where the Queen is. You're almost there.\
>I'm tired of eating fish.@
>Hurry up and finish this.\
name "Luka"
>Yea, let's finish this.\
name ""
>This Kraken is supposed to be the Queen of the southern sea...@
>Feeling nervous, I start to swim towards where Alice directed.\
>At least it shouldn't turn into a fight...\
dwave 1,"se\asioto2.ogg"
sean_change "bg053"
>At the bottom of the sea temple, we come across a giant hall.@
>At the end is a regal looking monster.\
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\kraken_st01.bmp",0,0:print 10,500
name "Luka"
>Are you the Queen of the southern sea?\
name ""
name "Kraken"
>...Yes, that is correct.@
>I am entrusted by the Monster Lord to rule over these southern seas.\
>Now, human... What business do you have here in this undersea temple?\
name ""
name "Luka"
>Um... I'm a hero that...\
name ""
lsp 700,":a;chara\kraken_st03.bmp",0,0:print 10,500
name "Kraken"
>...Hero!?\
name ""
>The Kraken's eyes instantly narrow.\
name "Luka"
>Er, not quite... I'm actually a fake Hero...\
name ""
name "Kraken"
>Whether you're a real or fake Hero, it's all the same.@
>You must have come to steal the orb in this temple!\
>But I shall never hand it over!\
name ""
name "Luka"
>Orb...?@>No, I've come about this pledge...\
name ""
name "Kraken"
>Silence!@
>If you want the orb, you will have to defeat me first!\
name ""
>Completely misunderstanding my intentions, she takes a fighting stance.@
>It looks like I have no choice but to fight...!\
name ""
r@k@\
goto *kraken_start



*sean0106

bgm "bgm\dungeon1.ogg"
name ""
r@k@\
name "Kraken"
>...I don't care who you are...@
>I cannot hand over the orb, even if it costs me my life.\
>Hero... Why are you going so far for this orb?@
>Have you gotten bored of slaughtering monsters on this continent?\
name ""
name "Luka"
>It's like I said from the start! I'm not after whatever strange orb it is that you keep talking about!\
name ""
name "Kraken"
>What...?@
>Then why did you come here!?\
name ""
name "Luka"
>I said I was bringing you a pledge of marriage!@
>I came to deliver it in place of the couple getting married!\
name ""
name "Kraken"
>...Why didn't you say that earlier?\
name ""
name "Luka"
>I did!@> I said it right at the start!!\
bgm "bgm\comi1.ogg"
name ""
lsp 700,":a;chara\alice_st04.bmp",-60,0:print 10,500
name "Alice"
>...What a funny misunderstanding.\
name ""
name "Kraken"
>So that was the case...@
>It seems I put you through some unnecessary trouble...\
>I shall receive the pledge of marriage.\
>Now Hero, whom is it that you are marrying?@
>Is it that silver-haired one?\
name ""
name "Luka"
>...N...No!@> I said I was delivering it for someone else!\
name ""
lsp 700,":a;chara\alice_st03.bmp",-60,0:print 10,500
name "Alice"
>...Of course not, you idiot.\
name ""
>Isn't this Queen supposed to be her subordinate?@
>She seems to have an awful lot of misunderstandings...\
csp 701
lsp 700,":a;chara\kraken_st01.bmp",0,0:print 10,500
name "Luka"
>I was asked by a Mermaid to deliver it to you.@
>...Here, this is the pledge.\
name ""
name "Kraken"
>Deliver...?@>How come the couple themselves didn't come?@
>Children these days...\
name ""
>The Kraken complains to herself as she takes the pledge from me.@
>But she's right...\
name "Kraken"
>...I guess it doesn't matter.@
>The law doesn't specifically say the people getting married have to bring it, I guess.\
name ""
name "Luka"
>.............\
name ""
>Is this really ok?@
>Having a Queen like this ruling over the south seas...@> Is this place going to be ok?\
name "Kraken"
>At any rate, the pledge has been delivered.@
>As Queen of the southern seas, I declare Meia and her husband married.\
>Now, take this [Ring of Promise].@
>Wearing this ring on your finger, you will always remember the pledge of marriage to your partner.\
name ""
name ""
>I hold out my hand as the Kraken drops the ring in my palm.\
dwave 1,"se\fanfale.ogg"
mov %item04,2
>[Ring of Promise] was dropped in Luka's hand!\
name "Kraken"
>No matter the difficulty, you must always support each other.@
>Now, I shall give you the Queen's blessing.\
name ""
lsp 700,":a;chara\alice_st01.bmp",-60,0
lsp 701,":a;chara\kraken_st01.bmp",160,0:print 10,500
name "Alice"
>Hmph. I'll give them the Monster Lord's blessing too.\
name ""
name "Luka"
>Oh!@>I'll give them a Hero's blessing, too!\
name ""
name "Kraken"
>................\
name ""
name "Alice"
>................\
name ""
name "Luka"
>................\
name ""
>This ceremony feels really odd without the couple here.@
>At any rate, the Monster Lord, the Queen, and me, a Hero, celebrate their marriage at the bottom of the sea.\
name "Kraken"
>By the way... Are you possibly...?\
name ""
bgm "bgm\alice1.ogg"
lsp 700,":a;chara\alice_st04.bmp",-60,0:print 10,500
name "Alice"
>...I'm nobody important.@
>I'm just a traveling gourmet who passed by on a whim.\
name ""
name "Kraken"
>Incredible. Coming to the bottom of the sea in search of food!@
>Unfortunately, there is nothing too amazing to eat down here.\
name ""
>...Oi, oi, how can you believe her?@
>She just said a few seconds ago that she was giving the Monster Lord's blessing.\
lsp 700,":a;chara\alice_st01.bmp",-60,0:print 10,500
name "Alice"
>Well, our business here is done.@
>I don't want to spend any more time here, so I'm going back.\
name ""
>Now that I have the [Ring of Promise], I guess there's no reason for me to be here.\
>I need to head back to Port Natalia and hand this to Meia.\
name "Luka"
>Alright, it's time to go back...@
>But do I have to go back through that light tunnel?@
>It was pretty troublesome coming down...\
name ""
name "Kraken"
>You don't need to return that way.@
>As an apology for before, I shall send you to the surface.\
name ""
name "Luka"
>Thank you, that will help m...@> Eh?\
name ""
dwave 1,"se\ero_makituki2.ogg"
>The Kraken's tentacles wrap around my body.\
name "Kraken"
>I think dry land is that way...\
name ""
>Looking around above us, it's as if she's looking for something.@
>No... She can't be thinking of...!\
name "Luka"
>Excuse me... You wouldn't possibly be...\
name ""
name "Kraken"
>I am delighted at humans and monsters being able to love each other.@
>If there is anything else you need to discuss with me, please feel free to come to this temple again.\
>Goodbye!\
name ""
>Just as I feared...@
dwave 1,"se\fall3.ogg"
>The Kraken hurls my body through the water at a sixty degree angle!\
cspl 700,701
bg "bg\bg051.bmp",10,1500
name "Luka"
>Uwaaaa!! Ghbhbhbhh...\
name ""
>Like a missile, I fly through the water.@
bg "bg\bg050.bmp",10,1500
>Flying through the water, I quickly reach the top of the water and...\
bg "bg\bg039.bmp",10,1500
dwave 1,"se\down.ogg"
quake 10,500
>...Land on the beach!\
name "Luka"
>Blegh@>Guh...\
name ""
>I writhe in the sand as I suffer from both the friction of the water and the impact from the landing.\
>The biggest injury I got going to that temple was from her "apology"...\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>What a funny Queen.\
name ""
name "Luka"
>Uhhgg...\
name ""
>Alice sighs as she stands over me, writhing in agony.\
>A... Funny Queen...?@
>Alice, your staffing decisions are pretty suspect...\
name "Luka"
>Alice... Thanks for helping me before...\
name ""
>In the middle of the Kraken fight, she indirectly helped me...@
>Forcing me to fall asleep, she drew out that hidden power.\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...Hmph.@> That was the last time.@
>Because it was all a misunderstanding, I hesitated to just leave you.\
name ""
name "Luka"
>Really, today was just one issue after another...\
name ""
>Oh well, at least the request has been finished.@
>Now I just need to give this ring to Meia...\
dwave 1,"se\asioto2.ogg"
bgmstop
sean_change "bg049"
bgm "bgm\city1.ogg"
name "Luka"
>...And then I delivered the pledge to the Queen.@
>Here, this is the [Ring of Promise].\
name ""
mov %item04,3
lsp 700,":a;chara\meia_st03.bmp",50,50:print 10,500
name "Meia"
>T...Thank you so much!!\
name ""
>Meia takes the ring with a huge smile on her face.@
>Unfortunately, it seems as though her husband is out fishing.\
>Alice is also out at the fish market "fishing"...\
lsp 700,":a;chara\meia_st02.bmp",50,50:print 10,500
goto *sean0107a



*sean0107a

name ""
r@k@\
name "Meia"
>My darling will be really happy with this...@
>Now, I need to reward you...\
name ""
name "Luka"
>It's alright, I don't need a reward...\
name ""
name "Meia"
>But I'm just an ordinary citizen...@
>I don't have much money, or an item that a Hero would find useful...\
>Therefore...@
>As a reward, shall I give you a blowjob?\
name "Luka"
>Eh?@>Ehhhhhh!?\
name ""
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
name "Meia"
>...Is this not good enough?@
>I'm confident with my mouth skills...\
>I don't think any human could even last thirty seconds... Teehee.@
>But since this is for your reward, I'll draw it out as long as possible.\
name ""
name "Luka"
>No way!@>Didn't you just get married!?\
name ""
name "Meia"
>My love is only for my darling.@
>So this isn't cheating on him.\
name ""
name "Luka"
>No... I don't think that's quite right...\
name ""
>Even though I shouldn't think such things, the image of Meia holding my penis in her mouth flashes in my mind.\
>...The thought causes my penis to become erect.@
>I'm not able to draw my gaze from her wet lips...\
name "Meia"
>Is it possible... That you're holding back because of that silver haired woman?\
name ""
name "Luka"
>N...No!@>Alice has nothing to do with this...@
>Ilias forbids having intercourse with monsters...\
name ""
name "Meia"
>You're a religious Hero...@
>But it's alright, I'll just use my mouth.@
>That way, it isn't really intercourse.\
>Haha... You'll really enjoy it.@
>I'll lick and suck all of your sticky semen out as a reward...\
name ""
>Not stopping to listen to my answer, she buries her head in my groin.@
>She quickly takes off my pants and underwear and exposes my erect penis.\
name "Luka"
>................\
name ""
>Ashamed, I've fallen silent.\
name "Meia"
>Hehe... A Hero's... How cute. \
name ""
>Meia smacks her lips and brings her lips right next to the tip of my penis.\
name "Luka"
>Aaa...\
name ""
>The breath and warmth from her mouth tickles me.@
>Meia slowly opens her lips, and quickly moves her face forward.\
mov %hseanvoice,3:hseanvoice
lsp 700,":a;chara\meia_h1.bmp",0,0:print 10,500
>In an instant, she sucks me inside of her warm mouth.\
name "Luka"
>Auu... Your mouth feels incredible...\
name ""
name "Meia"
>A Hero's penis is in my mouth... Hahaha \
name ""
>Her tongue starts to lick my penis all over.@
>In her warm mouth, the saliva from her tongue gives a slippery feeling as her tongue continues to lick me.\
name "Meia"
>Now, let me make it feel better...\
name ""
name "Luka"
>Aaa!\
name ""
>Meia's tongue starts to lightly tickle the tip of my penis.@
>After a couple licks, she starts to wrap her tongue around me.\
>Her long tongue coils from the tip of my penis up to her lips.\
name "Luka"
>Faaa!\
name ""
>My hips push forward involuntarily at the pleasure.@
>Suddenly, Meia puts her arms around my waist.\
>As she sucks on my penis, she tightly holds my waist.\
>Meia looks up at my face and smiles.@
>At the same time, she sweetly caresses my penis with her tongue.\
>Her soft licking causes the feeling of an orgasm to come rising up through me.\
>The sudden urge to come rises up as if it's a surprise attack.\
name "Luka"
>Ah! Coming!@>Ahhhh!\
name ""
mov %hseanvoice,0:hseanvoice
gosub *syasei1
lsp 700,":a;chara\meia_h2.bmp",0,0
gosub *syasei2
>I explode inside of Meia, shooting my semen into her mouth.@
>Unable to last even twenty seconds, I feel embarrassed.\
name "Meia"
>Mmm...\
name ""
>Meia licks up all my semen with a tender expression.@
>Closing tighter down on my penis, she drinks all of my semen.\
name "Luka"
>Aaaa...\
name ""
>Every time Meia swallows, a wave of pleasure flows through me.\
>Even after my ejaculation ends, she doesn't let go of my penis.\
lsp 700,":a;chara\meia_h3.bmp",0,0:print 10,500
name "Meia"
>...You already let it out.\
name ""
name "Luka"
>I'm sorry!\
name ""
>I couldn't even last twenty seconds in her mouth.@
>Even if she's skilled, that's pathetic...\
name "Meia"
>Hahaha... There's no helping it.@
>Even my darling comes right away when I do this.\
>But... I thought you might last longer since you were a Hero.@
>Hahaha.\
name ""
name "Luka"
>...............\
name ""
>Ashamed, I look away from her.\
name "Meia"
>This time, enjoy it for a long time.@
>I'll suck you nice and long for your reward...\
name ""
mov %hseanvoice,3:hseanvoice
>Her tongue starts to lick me again, carefully licking every corner of my penis.\
>Slowly licking me all over, it's as if she's carefully painting my penis with her saliva.\
name "Luka"
>Aaaa...\
name ""
>Rather than trying to quickly make me ejaculate, she's slowly sucking me to give maximum pleasure.\
>Gently being played with in her mouth, I let out a sigh.\
name "Meia"
>Hehe... You look like you're in a trance.@
>Does it feel good, Mr. Hero?\
name ""
>Still holding me in her mouth as she talks, her mouth vibrates with her voice.\
>The gentle pleasure of her tongue and mouth send a sweet sensation through my waist.\
name "Meia"
>Mmm...\
name ""
>As her tongue continues to play with my penis, she starts to move her head forward and back.\
>Still not being too forceful, she's slowly moving and stimulating me so as not to make me orgasm.\
name "Luka"
>Aaaa!\
name ""
>Her slow-motion movement quickly drains the strength from my legs.\
name "Meia"
>Hehe... Your salty soup is coming out of the tip...\
name ""
>Meia licks my urethral opening with the tip of her tongue.@
>Licking up all of my pre-come, she gently stimulates my most sensitive part.\
>After licking up my pre-come, she wraps her tongue around my penis again and starts to squeeze down.\
name "Meia"
>It's about time to make you come again...\
name ""
name "Luka"
>Hauu...\
name ""
mov %hseanvoice,5:hseanvoice
>Her tongue starts to slowly quicken its movements.@
>Unlike before when she was just gently stimulating me, now her movements are to force me to come.\
name "Meia"
>Mmm... *Suck*@>*Suck*\
>*Slurp*@>*Suck*\
name ""
name "Luka"
>Ahhh!!\
name ""
>Her tongue starts to quickly lick and massage the tip of my penis.@
>After teasing me for a few seconds, she wraps her tongue back around my penis and squeezes.\
>At the same time she squeezes me with her tongue, she continues the piston movement with her head.\
name "Meia"
>*Slurp*@>*Suck*\
>Now... Please shoot it out...\
name ""
name "Luka"
>Auu... Ahh!\
name ""
>Like that, she continues her single-minded blowjob.@
>I try to endure with all of my might as she forces me to another orgasm.\
name "Meia"
>*Slurp*@>*Suck*\
>Shoot it out inside my mouth...\
name ""
name "Luka"
>Aaaaa!\
name ""
>Deciding for herself when she wants me to come...@
>Instead of being served by her mouth, it's more like I'm being violated by it...\
>Her piston movement gets even more intense as her tongue tightens around my penis.\
name "Meia"
>*Slurp*@>*Suck*\
name ""
name "Luka"
>Faaaa...\
name ""
>I can't endure her intense blowjob any longer.@
>Just like this, she's going to force me to come in her mouth.\
>I give in to the desire, and explode in an instant.\
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\meia_h4.bmp",0,0
gosub *syasei2
>My lower back arches as I feel everything shoot into her mouth.\
>Meia sucks harder than before, sucking up every drop of my semen as I shoot it out.\
name "Meia"
>Mmm... You let out so much...\
>*Suck*@> *Sluuuurrpp*\
name ""
>She intensely sucks on my penis, as if trying to suck out every drop from inside of me.\
name "Luka"
>Aiee!\
name ""
name "Meia"
>*Suck*@> *Sluuuurrpp*\
name ""
>Meia continues to suck on me until every drop has been sucked out.@
>Once the ejaculation finally ends, she gives me a final kiss on the tip of my penis.\
name "Luka"
>Aaa...\
name ""
>Sucked dry, my body shakes.@
mov %hseanvoice,0:hseanvoice
>After that final kiss, she lets go of my penis and stands back.\
lsp 700,":a;chara\meia_st01.bmp",50,50:print 10,500
name "Meia"
>That's the end...@
>Did it feel good, Mr. Hero?\
name ""
>Meia wipes away the leftover semen off her mouth.\
name "Meia"
>The next time you come to town, please stop by again.@
>I want to give you another reward...\
name ""
name "Luka"
>Al...Alright...\
name ""
>Still in a slight trance, I can only manage that reply and nod.\
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_meia1,1
goto *sean0108



*sean0108

bgmstop
sean_change "bg037"
bgm "bgm\city1.ogg"
name "Luka"
>..........@> Whew...\
name ""
>I dizzily walk through Port Natalia.@
>I stagger towards the market.\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>...What's wrong? Your face looks funny.\
name ""
name "Luka"
>Geh! Alice!\
name ""
>I jump back in surprise as Alice appears out of nowhere.\
name "Alice"
>W...What?@>Why are you so surprised?@
>Did you do something bad...?\
name ""
>Calm down, calm down, calm down...@> Whew...\
>I didn't do anything bad...\
>I take a few deep breaths and calm myself.\
name "Luka"
>No. Not particularly.@
>Meia was very happy.\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>...Hmph. Well, whatever.\
name ""
name "Luka"
>Anyway...@
>Isn't it a wonderful thing for man and monster to be in love like that?\
name ""
>With this, I've approached my ideal world by a single step.@
>Even though it's small, I'm still satisfied with it.\
lsp 700,":a;chara\alice_st12b.bmp",67,0:print 10,500
name "Alice"
>...But I am happy.@
>It's good to know that the bond between monsters and humans hasn't been completely severed.\
name ""
name "Luka"
>Yeah!@>I know!@>Right!?@
>Hehehehehehe...\
name ""
lsp 700,":a;chara\alice_st13b.bmp",67,0:print 10,500
name "Alice"
>S...Shut up!\
name ""
>Thus, I was able to successfully finish Meia's request.@
>Even though there were some rough spots, I'm happy at how it turned out.\
r@k@\
mov %ivent04,1
mov %gloval1_story_sinkou,3:gosub *savegloval1
csp -1:print 10,500
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
csp 700:csp 611:cspl 3,7
gosub *city10_main
dwave 1,"se\asioto2.ogg"
cspl 3,7
csp 611
cspl 700,705
bg black,7,1500
mov %genzaiti,6
bgm "bgm\field3.ogg"
goto *map2



*sean0111

gosub *genzaiti_bg
name "Luka"
>Let's head to the haunted mansion to the north.\
name ""
>If there's a bad monster there, I need to root it out.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>................\
name ""
>Alice glares at me silently.@
>...Did I do something wrong?\
dwave 1,"se\asioto2.ogg"
bgmstop
sean_change "bg054"
bgm "bgm\obakeyasiki.ogg"
>We arrive at the mansion as it turns to night.\
name "Luka"
>...It's bigger than I thought.@
>There's also a really creepy atmosphere...\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>................\
name ""
name "Luka"
>What's wrong, Alice?\
name ""
>She's wearing a calm face, but something seems odd about her...@
>Is there something in here that can make even the Monster Lord scared...?\
name "Luka"
>Hey, look... There's a graveyard over there.\
name ""
>Next to the house is a small cemetery.@
>Thousands of tombstones cover a small patch of land.\
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>I already saw that!@
>But even then, I didn't mention it!\
>Why are you pointing out obvious things!?@
>You don't understand a woman's heart at all!\
name ""
>What the hell is she talking about?@>Why is she so angry?\
csp 700:print 10,500
>Anyway, just as that person back in town said, it looks like there really was a graveyard here.\
>I guess the story of the witch and the dead girl was just added on...\
name "Luka"
>Hmm...?\
name ""
>Suddenly, I see a figure from the window of the second floor.\
lsp 700,":a;chara\chrom_st02.bmp",253,150:print 10,500
wait 1000
csp 700:print 10,500
>A small girl peers through the window at me.\
name "Luka"
>Alice, did you see that!?@
>There's a small girl in that window on the second floor!\
name ""
lsp 700,":a;chara\alice_st07b.bmp",67,0:print 10,500
name "Alice"
>Aieee!\
name ""
>Alice quickly hides behind my back.@
>Her strange attitude before... She couldn't be...\
name "Luka"
>Alice... By any chance... Are you scared of ghosts?\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>O...Of course not!@> The only thing I'm scared of is hunger!\
name ""
name "Luka"
>I see... Then, let's go inside.\
name ""
name "Alice"
>I won't!\
name ""
>Alice declares firmly.\
name "Alice"
>Have you forgotten what you set out as a Hero to do?@
>Why are you wasting time playing here!?\
name ""
name "Luka"
>...............\
name ""
>It's embarrassing for a Monster Lord to preach to a Hero like that...\
>But while her upper body is holding firm while glaring at me, her lower snake half is trembling.\
>Is she scared of ghosts that much...?\
name "Luka"
>The people of San Ilia are scared of this house.@
>It's also the role of a Hero to help the townspeople.\
>Certainly you, the Monster Lord, aren't afraid of ghosts?\
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>O... Of course I'm not!@>Don't be ridiculous!\
name ""
name "Luka"
>Then, let's go.\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Aaa...\
name ""
>Alice and I walk into the house.@
>I wonder if that girl on the second floor is really a ghost...?\
dwave 1,"se\door1.ogg"
sean_change "bg055"
name "Luka"
>It looks really creepy...\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...............\
name ""
>Alice stays silent behind my back.@
>As we take a few steps inside...@> Suddenly, a shadow creeps up!\
name "Luka"
>What's that!?\
name ""
lsp 700,":a;chara\alice_st07b.bmp",67,0:print 10,500
name "Alice"
>Aie! G...Ghost!?\
name ""
r@k@\
goto *ghost_start



*sean0112

bgm "bgm\obakeyasiki.ogg"
name ""
r@k@\
name "Luka"
>Whew... Is it over?\
name ""
>I wipe off the sweat from my forehead as I put my sword back in my sheath.@
>Usually Alice would have shown up by now...\
name "Luka"
>...Where'd that girl go...?\
name ""
>Did she get lost somewhere?@
>Oh well, she is the Monster Lord. She shouldn't be attacked.\
name "Luka"
>I can't just wait around here... I'll keep looking around.\
name ""
>I still don't know whether this place is really haunted...@
>But there certainly are monsters...\
>As a Hero, I have to root out anything that would harm others...@
>I start to walk around the house again.\
dwave 1,"se\asioto2.ogg"
sean_change "bg056"
name "Luka"
>Hmmm...?\
name ""
>As I walk up the steps, I notice a doll knocked over on the floor.@
>It's an oddly realistic doll, and the Oriental style doesn't really match this house...\
name "Luka"
>What's this strange feeling...?\
name ""
>I walk over to the doll.@
>As I lean over to take a better look, it suddenly moves!\
r@k@\
goto *doll_start



*sean0113

bgm "bgm\obakeyasiki.ogg"
name ""
r@k@\
name "Luka"
>Whew. So there are monsters like that, too...\
name ""
>I pass by the now unmoving doll and head up the stairs.\
dwave 1,"se\asioto3.ogg"
sean_change "bg057"
>And greeting me in the first room I enter is...\
lsp 700,":a;chara\alice_st31.bmp",233,150:print 10,500
name "Alice"
>...............\
name ""
>Trembling in a corner of the room is Alice.\
name "Luka"
>...What are you doing?\
name ""
name "Alice"
>...............\
name ""
>It looks like she's frozen in fear...\
name "Luka"
>Oi, Alice... Did something happen?\
name ""
>As I call out to Alice...\
name "Woman's Voice"
>Uuuuuu...\
name ""
>I hear a strange groan from outside the room.\
lsp 700,":a;chara\alice_st07b.bmp",67,0:print 10,500
name "Alice"
>Hyaaaaaa!!\
name ""
>Alice jumps up and starts slithering around in circles.@
>The next moment, her tail catches on something as she slams into the floor.\
dwave 1,"se\break5.ogg"
>Knocking over a desk and bookcase, a loud crash sounds out as everything is dumped onto the floor.\
>A small picture of a girl slides over to my feet.\
name "Alice"
>Hyaaa!@> ...That girl.@> That girl!\
name ""
>Alice's eyes widen as she looks at the picture.\
name "Luka"
>Do you know this girl...?\
name ""
lsp 700,":a;chara\frederika_st21.bmp",190,0:print 10,500
>The girl in the picture looks like a refined woman.@
>This can't be the girl from the second floor window that was looking at us...\
>Who is this elegant girl?@
>Is this the girl that died from sickness that the townsfolk were talking about...?\
lsp 700,":a;chara\alice_st07b.bmp",67,0:print 10,500
name "Alice"
>Haaaa...\
name ""
>Alice let out a weak scream as she starts slithering around in circles again.\
>The next moment, a shadow appears at the entrance to the room!\
mov $name,"Zombie Girl"
mov $name2,"Zombie Girl"
mov $tatie1,"zonbe_st01"
mov $haikei,"bg057"
mov %monster_x,330
mov %monster_y,50
mov %max_enemylife,400
mov %damage_keigen,100
mov %music,1
mov %tikei,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
lsp 700,":a;chara\alice_st07.bmp",0,0
lsp 701,":a;chara\zonbe_st01.bmp",500,50:print 10,500
name "Alice"
>Hyaaaa!!\
name ""
name "Zombie Girl"
>Uooooohhh...\
name "Alice"
lsp 700,":a;chara\alice_st03.bmp",0,0:print 10,500
>...Oh, it's just a normal Zombie Girl.\
wait 500
dwave 1,"se\dageki.ogg"
csp 701
lsp2 0,":a;chara\zonbe_st01.bmp",570,325,100,100,0,255
for %move=0 to 100 step 1
msp2 0,10,-10,0,0,15,0
print 1:wait 7
next
csp2 0
name ""
>Alice punches the zombie in the face and knocks off her head!\
bgm "bgm\obakeyasiki.ogg"
cspl 0,611
gosub *setwindow_01p
lsp 700,":a;chara\alice_st04.bmp",172,0:print 10,500
name "Alice"
>Sheesh. Don't surprise me like that.\
name ""
name "Luka"
>Oi, oi...\
name ""
>...You're cool with zombies?@
>I don't understand this girl's irrational decision to fear specific kinds of undead things...\
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Alice"
>Hmm...?\
name ""
>The floor starts to make a creaking noise underneath Alice.@
>Suddenly, the floor cracks!\
lsp 700,":a;chara\alice_st07.bmp",172,0:print 10,500
name "Alice"
>Ah.@>Uwaaa!\
dwave 1,"se\break2.ogg"
wait 500
dwave 2,"se\fall1.ogg"
for %move=0 to 600 step 10
amsp 700,172,0+%move
print 1:wait 3
next
csp 700
name ""
>Alice falls through the floor!\
name "Luka"
>.............\
name ""
>Will she be alright running around like a lunatic...?@
>Meh. She's the Monster Lord, I'm sure she'll be fine.\
name "Luka"
>Eh...?\
name ""
>I hear footsteps approaching the entrance of the room again.@
>Another groan like the one from before rings out.\
>Another undead monster appears!\
r@k@\
goto *zonbe_start



*sean0114

bgm "bgm\obakeyasiki.ogg"
name ""
r@k@\
name "Luka"
>Whew...\
name ""
>I sheathe my sword and let out a sigh.\
name "Moaning Woman A"
>Uuu...\
name ""
name "Moaning Woman B"
>Man's... Semen...\
name ""
name "Luka"
>No way... More?\
name ""
>I hear the shuffling of feet along with the moaning voices.@
>It doesn't seem like it's just one this time either...\
>The source of the voices shamble into the room!\
r@k@\
goto *zonbes_start



*sean0115

bgm "bgm\obakeyasiki.ogg"
name ""
r@k@\
name "Luka"
>Haa... Haa... What's with this zombie infestation?\
name ""
>As I try to catch my breath, suddenly...\
lsp 700,":a;chara\chrom_st03.bmp",253,150:print 10,500
name "Mysterious Girl"
>Ah! My experiments!\
name ""
name "Luka"
>Who are you!?\
name ""
name "Mysterious Girl"
eng "Wawawa!?":$sel6/
dwave 1,"se\asioto4.ogg"
csp 700:print 10,500
\
name ""
>The girl runs away as soon as she sees me.@
>That must have been the girl in the window I saw earlier...\
>She doesn't look anything like that girl in the picture from earlier.@
>She didn't look quite human, either...\
>And did she call those zombies her experiments...?\
name "Luka"
>Wait!!\
name ""
dwave 1,"se\asioto4.ogg"
>I run out of the room, chasing after the mysterious girl.@
>Running down the stairs, I head back into the main room.\
lsp 700,":a;chara\chrom_st01.bmp",75,150
lsp 701,":a;chara\frederika_st01.bmp",240,0
bg "bg\bg055.bmp",7,1500
>In the middle of the room, the girl is standing next to a huge zombie.\
bgm "bgm\boss0.ogg"
name "Mysterious Girl"
>What's with you?@
>Why are you going crazy in my laboratory?\
name ""
name "Luka"
>No, what's with YOU?@> What the hell are you doing in here...?\
name ""
name "Mysterious Girl"
>My name is Chrome.@> I'm a necromancer.\
name "Chrome"
>This place was an execution ground, then a graveyard.@
>Since there are so many corpses, it's great for my experiments.\
name ""
name "Luka"
>Experiments...? What are you trying to do?\
name ""
name "Chrome"
>I said I was a necromancer. I'm experimenting on the dead.@
>This girl, the daughter of the rich guy who owned this place, is a particularly good specimen.\
>I want to reanimate the dead into something even more powerful than normal monsters!\
name ""
name "Luka"
>..............\
name ""
>Execution ground... Graveyard... Girl who died of sickness... Witch...@
>So every rumor I heard in town was true?\
name "Luka"
>So you created those zombies from before, too?\
name ""
name "Chrome"
>Of course I did.@
>That stupid Ghost Girl came in by herself, but the zombies were all my creations.\
name ""
name "Luka"
>You created them all!?\
name ""
>Intentionally making zombies... Desecrating the dead!@
>I cannot allow such horrible things like that to continue!\
name "Luka"
>Stop your horrible experiments at once!@>Otherwise...!\
name ""
>I pull out my sword and point it at Chrome.@
>Desecrating the dead... Making so many zombies so close to a human town...\
>If she keeps this up, it's inevitable that those zombies will eventually overrun the town...\
name "Chrome"
>Hmph. I still have a lot of things to test.@
>I'll make a nuisance like you into a new experiment!\
>Get him, Frederika!\
name ""
name "Frederika"
>..............\
name ""
>The zombie, apparently called Frederika, starts to shamble towards me.@
>She gives off a much different feeling than the other zombies...\
name "Luka"
>You made this too... Damn you!\
name ""
>Though her body is misshapen and deformed, she looks like the girl from the picture...\
>So this zombie is...\
name "Chrome"
>Hehe... So you noticed.@
>Frederika is my masterpiece.\
>That elegant rich girl's pure body was excellent raw material to create a magnificent zombie.\
name ""
name "Luka"
>Unforgivable!@
>Defiling a girl's body after her death... Making her into such a creature!!!\
name ""
name "Chrome"
>Hmph. I don't care about what you have to say.@
>Go, Frederika! Make him go insane!\
name ""
r@k@\
csp 701
lsp 700,":a;chara\frederika_st01.bmp",88,0:print 10,500
goto *frederika_start



*sean0116

bgm "bgm\obakeyasiki.ogg"
name ""
r@k@\
name "Luka"
>Whew...@>Ah! The floor!\
name ""
>During the intense fight, the floor started to crack.\
>Alice fell through the floor a little while ago too... This house is falling apart.\
>As that thought crosses my mind, the floor breaks.\
name "Luka"
>Not good! Crap!\
name ""
lsp 700,":a;chara\chrom_st03.bmp",253,150:print 10,500
name "Chrome"
>Wawawa! My laboratory!\
name ""
dwave 1,"se\break2.ogg"
wait 500
dwave 2,"se\break3.ogg"
csp 700
bg black,10,1500
>Chrome and I fall through the floor.\
bg "bg\bg058.bmp",10,1500
name "Luka"
>Where is this...?\
name ""
>Falling through the floor, I landed in a place that looks like a catacomb.@
>Thousands of coffins line the walls of the giant underground space.\
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\chrom_st03.bmp",253,150:print 10,500
name "Chrome"
>What the hell did you do!?\
name ""
>I jump back in surprise as Chrome suddenly jumps in front of me.\
name "Chrome"
>First you break Frederika, next you break the floor of my laboratory!@
>She was my ultimate masterpiece!!\
name ""
name "Luka"
>...A corpse isn't your toy.@
>I won't forgive you for breaking the tranquil sleep of the dead!\
name ""
name "Chrome"
>You science hater!@> Corpses are just lifeless things!@
>If you're going to be like that, I'll be your opponent!\
name ""
r@k@\
goto *chrom_start



*sean0117

bgm "bgm\obakeyasiki.ogg"
name ""
r@k@\
name "Luka"
>Wait! Don't run!\
name ""
>I can't let her run away without paying for her crimes!\
dwave 1,"se\asioto4.ogg"
>I chase after Chrome!\
name "Luka"
>...I lost her. Damn, where did she run off to?\
name ""
>It looks like she hid herself somewhere...@
>...But not well! I see a shadow behind one of the coffins.\
name "Luka"
>I found you! Give up!\
name ""
>I peer around the coffin...@
lsp 700,":a;chara\alice_st31.bmp",233,150:print 10,500
>To find Alice trembling in fear!@
>It looks like she's been frozen in fear since she fell down...\
name "Luka"
>Hey... Alice...\
name ""
name "Alice"
>I'M SO SORRY I'M SO SORRY!@
>An evil god, the first Monster Lord, I don't care! Just please help me!\
>I won't do bad things anymore!@> I won't bully the Kitsunes either!\
>I won't pull on their ears!@>Or step on their tails!@>Or steal their fried tofu!\
name ""
>...She really likes to bully those foxes.@
>Does she have a grudge or something?\
name "Luka"
>Alice, the bad person is that girl...@>She's making zombies here.@
>Did you see the girl run by here...?\
name ""
lsp 700,":a;chara\alice_st05b.bmp",67,0:print 10,500
name "Alice"
>She's the bad one...?@>Are you sure...?\
name ""
>Alice's eyes brighten as she stands up.\
name "Luka"
>That girl made this house her laboratory...\
name ""
name "Alice"
>It's her fault that I was like that!@> I won't forgive her!@
>Get out here!!!\
name ""
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
>Alice's eyes flash with anger.@
dwave 1,"se\bom4.ogg"
>The next instant, the lid of a nearby coffin explodes.\
lsp 701,":a;chara\alice_st05b.bmp",-100,0
lsp 700,":a;chara\chrom_st03.bmp",430,150:print 10,500
name "Chrome"
>Fugya!\
name ""
>Chrome jumps out of the coffin that's now covered in flames.\
name "Luka"
>Hiding in such a place...\
name ""
name "Alice"
>.............\
name ""
>Alice quickly moves over to where Chrome is.@
>And starts to smack Chrome with her tail!\
name "Chrome"
>Who are you!?@>Another gho...\
dwave 1,"se\spank.ogg"
>Gafu!\
dwave 1,"se\spank.ogg"
>Geha!\
name ""
name "Alice"
>It's your fault!\
name ""
name "Chrome"
dwave 1,"se\spank.ogg"
>Gefu!\
dwave 1,"se\spank.ogg"
>Ahh! Stop!!\
dwave 1,"se\spank.ogg"
>Wawa!\
dwave 1,"se\spank.ogg"
>I'm sorry!\
name ""
>Alice continues to smack Chrome as she cries.@
>This is painful to watch...\
name "Luka"
>Calm down, Alice!@
>She's still just a girl...\
name ""
>I said that even though I was just hitting her with my sword...@
>But now she isn't even able to fight back against Alice.\
lsp 701,":a;chara\alice_st03b.bmp",-100,0:print 10,500
name "Alice"
>Hmph. Just because a monster looks young, it doesn't mean they really are.\
>This girl is 100 years older than I am.\
name ""
name "Luka"
>You shouldn't hurt your elders then.@
>Now Chrome, apologize to Alice.\
name ""
name "Chrome"
>...I'm sorry.\
name ""
lsp 701,":a;chara\alice_st01b.bmp",-100,0:print 10,500
>Is she that terrified of Alice? That girl apologized so quickly...\
name "Luka"
>It's good to be so devoted to something...@
>But you can't treat corpses like toys.\
>It's also very bad to create zombies like this.@
>If you keep that up, the big mean snake lady will get angry again.\
name ""
name "Chrome"
>...I'm sorry, I'll be good...\
name ""
lsp 701,":a;chara\alice_st03b.bmp",-100,0:print 10,500
name "Alice"
>If you understand, then get the hell out of here!!\
name ""
name "Chrome"
>Wawawa! I will!\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,500
>After being scolded by Alice, Chrome runs as fast as she can.@
>With that, hopefully she'll reflect on her actions...\
>It looks like Alice came to her senses too.\
csp 701
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Sheesh... So she was the cause of all the crap in this mansion?@
>The townspeople saw the zombies and must have thought they were ghosts.\
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
>How stupid! Ghosts don't exist!\
name ""
name "Luka"
>Is that really what you believe...?\
name ""
csp 700:print 10,500
>I muttered softly to myself.\
lsp 700,":a;chara\frederika_st11.bmp",238,0:print 10,1500
>Suddenly, an elegant girl appears!@
>This girl... She's the one from the picture!\
name "Luka"
>F...Frederika...?\
name ""
name "Frederika"
>Thank you, Hero...@
>Now my...@>No, our souls have been saved...\
name ""
lsp 701,":a;chara\mob_seineny.bmp",-200,0:print 10,500
name "Ghost A"
>With our bodies turned into zombies, our souls were bound here...@
>But now, we're finally free...\
name ""
lsp 702,":a;chara\mob_zyoseiy.bmp",200,0:print 10,500
name "Ghost B"
>Even if I'm just a soul, I can finally return...@
>The homeland I've missed so much... San Ilia...\
name ""
>It's not just those three either...@
>All around us, thousands of souls are drifting towards the sky.\
name "Ghosts"
>Thank you, Hero...@
>Thanks to you, we're finally free...\
name ""
>The ghosts thank me as they ascend.@
cspl 700,702:print 10,1500
>Finally, all of them had vanished.\
name "Luka"
>Now they can finally rest peacefully...@
>...Isn't that great, Alice?\
name ""
>...But Alice didn't respond.\
name "Luka"
>Alice?\
name ""
lsp 700,":a;chara\alice_st05b.bmp",67,0:print 10,500
name "Alice"
>...............\
wait 500
for %move=0 to 600 step 10
amsp 700,67,0+%move
print 1:wait 3
next
dwave 1,"se\down.ogg"
csp 700
name ""
>Alice faints!\
name "Luka"
>Hey! Alice!?\
name ""
>I pick up Alice, and start to head out of the mansion with her on my back.\
dwave 1,"se\asioto2.ogg"
bgmstop
sean_change "bg059"
bgm "bgm\hutuu1.ogg"
name "Luka"
>It's already morning?@>Sheesh, this girl is so heavy...\
name ""
>With Alice still passed out on my back, I start to head towards the mansion's gate.\
>As I reach the gate, a strange woman walks up.\
bgm "bgm\kiki2.ogg"
lsp 700,":a;chara\stein_st01.bmp",0,0:print 10,500
name "Mysterious Woman"
>...............\
name ""
name "Luka"
>Excuse me... Do you have some business here?@
>I don't think there are any ghosts left...\
name ""
name "Mysterious Woman"
>I see. So Chrome left?\
name ""
name "Luka"
>Eh...!?\
name ""
>She knows Chrome!?@
>Who is this woman?\
name "Mysterious Woman"
>Tch. I came all this way to deliver her some new tech, too.\
>Well whatever. That stupid necromancer still pulled off something.@
>Putting the Monster Lord into such a state...\
name ""
>The strange woman eyes Alice on my back as she talks.\
name "Luka"
>.....!?\
name ""
>She even knows that Alice is the Monster Lord!?\
name "Luka"
>Just who are you?\
name ""
name "Mysterious Woman"
>............\
name ""
csp 700:print 10,500
>Ignoring my question, the woman quickly leaves.\
name "Luka"
>Who was that...?\
name ""
>She had a strange atmosphere around her too...@
>Was she a high-ranking monster...?\
>At any rate, I can't chase after her with Alice still like this...@
>I guess I'll return to San Ilia...\
dwave 1,"se\asioto2.ogg"
bgmstop
sean_change "bg048"
bgm "bgm\city1.ogg"
name "Luka"
>............\
name ""
lsp 700,":a;chara\mob_seineny.bmp",0,0:print 10,500
name "Ghost A"
>Ohhh... My dear San Ilia!@
>I've finally found a quiet place for my soul to rest!\
name ""
lsp 700,":a;chara\mob_seineny.bmp",-160,0
lsp 701,":a;chara\mob_zyoseiy.bmp",160,0:print 10,500
name "Ghost B"
>It seems as though all the souls have gathered back here!@
>Even though my hometown is on the southern continent, this seems like a nice town too.\
name ""
cspl 700,701:print 10,1500
>...Ghosts are infesting the town now.@
>Everywhere I look, ghosts are moving through the walls into the houses.\
name "Luka"
>I better put Alice in the inn...@
>If she saw this, she might not wake up again.\
name ""
r@k@\
mov %ivent05,1
csp -1:print 10,500
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
csp 700:csp 611:cspl 3,7
gosub *city09_main
gosub *setwindow_01p
name "Luka"
>That's how it is... There are ghosts everywhere now.\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>................\
name ""
>Alice closes her eyes.@
>The haunted mansion incident is solved with this... I think?\
>But now that the entire town is haunted, I guess you could say the haunted mansion incident spread...\
>I want humans and monsters to coexist...@
>But humans and ghosts...?\
lsp 700,":a;chara\mob_syounen.bmp",-220,0
lsp 701,":a;chara\mob_syouzyo.bmp",0,0
lsp 702,":a;chara\mob_syouzyoy.bmp",220,0:print 10,500
name "Child A"
>Yay! Yay!\
name ""
name "Ghost Girl"
>Hahahaha!\
name ""
>Human and ghost children are running around playing tag.@
>I guess through the eyes of a child, the ghosts are just more playmates...\
name "Luka"
>Well... I guess that's the first step for coexisting?\
name ""
>At any rate, I got rid of that necromancer in the mansion.@
>The rest is up to the citizens of San Ilia.\
cspl 701,702
lsp 700,":a;chara\alice_st15b.bmp",67,0:print 10,500
name "Alice"
>...We're leaving here.@> That's an order.\
name ""
name "Luka"
>I get it...@>Stop looking at me with those creepy eyes.\
name ""
>If we stay here any longer, Alice might break...@
>Well, our next destination is going to be...\
r@k@\
bgm "bgm\field3.ogg"
mov %genzaiti,5
mov %gloval1_story_sinkou,3:gosub *savegloval1
goto *map2



*sean0118

gosub *genzaiti_bg
lsp 700,":a;chara\alice_st05b.bmp",67,0:print 10,500
name "Alice"
>Why would we go back there!?\
name ""
>As soon as I suggested going to the mansion, Alice's eyes became strange again.@
>There's no reason to go back... I won't push the issue.\
csp 700
goto *map2



*sean0119

gosub *genzaiti_bg
>I need to meet Sylph to borrow her power... Let's head to the forest.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Finally decided to do something productive?@
>After we get Sylph's power, we won't be returning to this area for a long time.\
>Is there anything left in this area you need to do?\
name ""
csel "No, I'm ready",*sean0120b,"There's something left",*sean0120a



*sean0120a

name "Luka"
>No... I still have something left.\
name ""
>I take out the map again.\
goto *map2



*sean0120b

name "Luka"
>Alright! Let's head to the Forest of Spirits!\
name ""
>We start walking to the forest where Sylph is.\
dwave 1,"se\asioto2.ogg"
sean_change "bg009"
bgm "bgm\yaei.ogg"
name "Luka"
>So...@
>That's how the fallen angel who rebelled against Ilias came to be known as the Monster Lord.\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...Are you an idiot?@
>Why are you explaining the origin of Monster Lords to the Monster Lord?\
name ""
name "Luka"
>Oh yeah... That's right...\
name ""
>Last time I told her one of the legends from the past she got angry, too...@
>It looks like my story was a failure again...\
name "Alice"
>Besides, monsters despise that legend.@
>The founding Monster Lord was never a subordinate of Ilias.\
>The founder was an equal to her.@
>Humans went ahead and changed the truth to fit their view.\
name ""
name "Luka"
>The first Monster Lord was an equal to Ilias!?\
name ""
>That's the first time I've heard that...@
>I don't really believe that...\
name "Alice"
>...Hmph. It looks like you're doubting me.\
>Alright, listen.@> Originally, this world was just darkness and light.\
>The light and dark mixed together, and Ilias and the founder were born.\
>In other words, they were like yin and yang.@
>Two sides of the same coin.\
name ""
name "Luka"
>If they were both gods... Why did one become the Monster Lord?@
>Instead of staying in the heavens, why would they come to the ground?\
name ""
name "Alice"
>That...@>I don't know.@
>The founder must have had a reason...\
name ""
name "Luka"
>So... Where is that founding Monster Lord now?@
>If they're like Ilias, they should be immortal, right?\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...The founder entrusted the throne to the second generation of my family, and then returned to the heavens.\
name ""
name "Luka"
>That's not very convincing...\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>You're still doubting me!?@
>The first Monster Lord was equal to Ilias!\
name ""
name "Luka"
>Yeah yeah, sure, that's amazing...\
name ""
name "Alice"
>Nuuuuuu...\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
>Bah, whatever.@
>More importantly, it's time to train again!\
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
>Your ability right now doesn't even come up to the Monster Lord's foot!\
name ""
name "Luka"
>I... I know...\
name ""
>I started training again with Alice...\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Your SP is high enough...@>I can teach you a great move.@
>Today I'll teach you an attack that throws out slashes seemingly at random.\
name ""
name "Luka"
>At random...?@>Like when I [Flail Wildly]?\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>That isn't a technique.@>That's a disgrace, and you should feel bad for still having it on your skill bar.\
>Don't even compare them, you idiot.\
name ""
name "Luka"
>...Sorry.\
name ""
>Despite her insults, she starts to teach me the technique.\
sean_change "bg009"
name "Luka"
>Torya!\
name ""
dwave 1,"se\miss.ogg"
wait 100:dwave 2,"se\miss.ogg"
wait 100:dwave 3,"se\miss.ogg"
>I let out a shout as I rapidly swing my sword.@
>Different from when I [Flail Wildly], my attacks link together after each swing, as if all part of a single slash.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...It seems like you're getting better.\
>A barrage of attacks that doesn't give the opponent a chance to defend themselves.\
>That's the [Death Sword Chaos Star] technique.\
>It's very powerful, but it requires four SP.@
>If you use it without thinking about your current situation, it could put you in a bad position.\
name ""
name "Luka"
>I see... I'll be careful.\
name ""
>Four SP... That's all that I have at the moment.@
>If I use that move, I won't be able to recover my HP for a while.@
>I'll need to be careful.\
name "Alice"
>It's said that the mute swordsman Galla turned an entire legion of knights into lumps of flesh using that technique.\
name ""
name "Luka"
>Another horrible story attached to the skill...\
name ""
>It's good to know a lot of skills...@> But I'm not happy that each one seems to be tied to mass murder.\
>But my offensive arsenal grows with this!\
dwave 1,"se\fanfale.ogg"
mov %skill01,6
>[Death Sword Chaos Star] was learned!\
name "Alice"
>Usually these skills can't be learned so quickly...@
>But since it's you, I thought it might be possible...\
name ""
name "Luka"
>Hehehehehe... So Alice is finally starting to acknowledge my ability?@
>Hehehehehehehehe...\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>No! You idiot.@> Stop that creepy laughing.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
>It's because when you fell asleep, that skill you used looked a little similar...\
>You're such a strange person... Sheesh.\
name ""
name "Luka"
>I don't want the Monster Lord to call ME strange...\
name ""
name "Alice"
>I also want to see more of that strange secret strength...@
>That power is far beyond what a human should be capable of.\
name ""
name "Luka"
>You... Don't think I'm really a monster, do you?\
name ""
>My mother's a normal human, and my father should be as well...\
name "Alice"
>If you had monster blood in you, I would be the first to notice...@
>I also don't sense anything from that ring...\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
>...You're really a strange person.\
name ""
name "Luka"
>You don't have to keep saying that!\
name ""
>Anyway, I learned another powerful technique!@
>Happy at my accomplishment, I head to my sleeping bag.\
>Tomorrow, we'll finally reach the Forest of Spirits...\
bgmstop
sean_change "bg061"
bgm "bgm\seireinomori.ogg"
name "Luka"
>Is this the Forest of Spirits?\
name ""
>We're at the very edge of a forest, but the trees are already so thick I can barely see inside.\
>The book said that the wind spirit Sylph is inside of here...\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Along with Sylph, there are lots of fairies and elves that live here.@
>But they usually mean no harm to humans.\
>...But the fairies can be a bit mischievous.\
name "Luka"
>In other words, there shouldn't be any fighting.@
>Alright! Let's go!\
name ""
>Sighing with relief, I take a step into the forest.\
name "Luka"
>Eh?@>Alice? Aren't you coming?\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>.............\
name ""
>Alice stands unmoving at the edge of the forest.\
name "Alice"
>If the Monster Lord paraded through their forest, the fairies would be shocked.\
>I'll wait outside this time.\
name ""
name "Luka"
>I see...@> I'll try to return as quick as possible.\
name ""
>Saying that, I head further into the forest by myself.\
dwave 1,"se\asioto2.ogg"
sean_change "bg061"
name "Luka"
>Oh... A clearing?@>I wonder if she's straight ahead through here...\
name ""
>I wipe off my sweat as I take a look around me.\
r@k@\
goto *fairy_start



*sean0121

bgm "bgm\seireinomori.ogg"
name ""
r@k@\
name "Luka"
>Sheesh...\
name ""
>Even if fairies are friendly towards humans...@> Their innocent act is pretty wicked.\
dwave 1,"se\asioto1.ogg"
name "???"
>How horrible!@>Swinging a sword at a poor fairy!\
name ""
name "Luka"
>Eh...!?\
name ""
>Suddenly rushing into the spot where the Fairy was...\
r@k@\
goto *elf_start



*sean0122

bgm "bgm\seireinomori.ogg"
csp 701
lsp 700,":a;chara\elf_st11.bmp",325,280:print 1
name ""
r@k@\
name "Elf"
>Huh?@> You cut me so many times... Why didn't I die?@
>Is this some kind of magic seal...?\
name ""
name "Luka"
>I'm sorry, but I had to seal off your power for a while...@
>If you collect enough magic power, you can revert back.\
>The Fairy attacked me earlier, and I was only defending myself...@
>I don't mean any harm to any of the forest dwellers.\
name ""
name "Elf"
>Certainly... You don't seem like the type for mindless violence...@
>But why did you come to this forest?\
name ""
name "Luka"
>I came to borrow Sylph's power.\
name ""
name "Elf"
>I see...@
>No human has come to meet Sylph for hundreds of years.\
>I'm sorry for attacking you without hearing you out first.@
>Ever since that unknown monster came into the forest, we've all been on edge.\
name ""
name "Luka"
>...What do you mean an "unknown monster"?\
name ""
>How could an Elf not recognize another monster?@
>Just what is it?\
name "Elf"
>...We have no idea.@
>All we know is that it's a plant type.\
name ""
name "Luka"
>A plant type...? Like an Alraune?\
name ""
name "Elf"
>...It isn't nearly that cute.@
>There is an Alraune that's lived here for a long time...@
>But this unknown monster is completely different.\
>I'm not even sure if it's really a monster...\
name ""
>From the way she's describing this thing, it sounds like a bizarre creature.\
name "Luka"
>I understand.@
>If I see it, I'll root it out.\
name ""
>A true Hero wouldn't let the gentle forest creatures live in fear.@
>Even if they're monsters, I don't want them to live in fear.\
name "Elf"
>Don't joke like that...@>That thing is terrifying.\
>It kills monster and human alike...@
>We haven't even figured out if it has emotions...\
>Since we're unable to deal with it, we were thinking of contacting the Monster Lord directly.\
>Dealing with it would be impossible for a human like you.\
name ""
name "Luka"
>Is it really that powerful...?\
name ""
name "Elf"
>Yes. Run away if you come across it.@
>...If you're even able to.\
name ""
name "Luka"
>I... I will...\
name ""
>My original purpose for coming here was to meet Sylph.@
>I don't really want to leave that strange monster alone, but first I should do what I came here for.\
>While thinking that, suddenly coming out from a nearby tree was...\
r@k@\
goto *tfairy_start



*sean0123

bgm "bgm\seireinomori.ogg"
name ""
r@k@\
name "Fairy A"
>Wah! I'm a butterfly now!\
name ""
name "Fairy B"
>Yaay! How fun! \
name ""
name "Luka"
>...............\
name ""
lsp 700,":a;chara\elf_st11.bmp",145,600
for %move=0 to 320 step 10
amsp 700,145,600-%move
print 1:wait 20
next
>As I stand there stunned, the tiny Elf climbs out of the hole.\
name "Elf"
>Now you two have done it!@
>Playing so many pranks!\
name ""
name "Fairy A"
>Yay!@> Run away!\
name ""
name "Fairy B"
>Run away!\
name ""
name "Elf"
>Hey!@> Get back here!\
name ""
lsp 700,":a;chara\elf_st11.bmp",145,280
for %move=0 to 660 step 10
amsp 700,145+%move,280
print 1:wait 10
next
>The tiny Elf chases after the Twin Fairies, now sealed as butterflies.\
name "Luka"
>...................\
name ""
>Is this peaceful or not? I don't understand this forest...\
name "Luka"
>Well... I guess I'll keep going.\
name ""
>I advance deeper into the forest.\
dwave 1,"se\asioto2.ogg"
sean_change "bg061"
>After walking through the forest for a while...@
>I step on something squishy!\
name "Fairy"
>Hya!\
name ""
name "Luka"
>Eh...?\
name ""
>I raise my foot in surprise.@
lsp 700,":a;chara\fairys_st03.bmp",220,100:print 10,500
>A Fairy pops out from underneath a flower that I stepped on!\
name "Luka"
>A...Are you ok?\
name ""
goto *sean0123a



*sean0123a

if %continue=1 bgm "bgm\seireinomori.ogg"
if %continue=1 bg "bg\bg061.bmp",10,5000
if %continue=1 gosub *setwindow_01
mov %continue,0
lsp 700,":a;chara\fairys_st02.bmp",220,100:print 10,500
name "Fairy"
>Owow!@>That hurt!\
name ""
>A strong looking Fairy glares at me.\
name "Fairy"
>Fairies you know... When they get scared, they hide in flowers!@
>That's why you absolutely can't step on flowers!\
name ""
r@k@\
csel "Sorry",*sean0126,"Oh, shut up!",*sean0124



*sean0124

>Oops!@>I spoke without thinking...\
name "Fairy"
>Wah!@> I'm angry now!@
>Everyone!@>Attack this bully!\
name ""
lsp 701,":a;chara\fairys_st11.bmp",0,50
lsp 702,":a;chara\fairys_st21.bmp",440,50:print 10,500
>As the strong looking Fairy yells out, hundreds of Fairies descend from the trees and start to surround us.\
name "Luka"
>Wah!\
name "Fairy B"
>Yaay!@>A human!\
name ""
name "Fairy C"
>Get him!\
name ""
goto *fairys_start



*sean0125

bgm "bgm\seireinomori.ogg"
name ""
r@k@\
name "Fairy A"
>Wah! I'm a butterfly!\
name ""
name "Fairy B"
>Lucky!!@>I want to be a butterfly too!\
name ""
name "Fairy C"
>Me too!@>Me too!\
name ""
name "Luka"
>O... Oi...\
name ""
>The fairies start to crowd around the sealed fairy, envious of her new form.\
name "Fairy B"
>Hey! Make me a butterfly too!\
name ""
name "Fairy C"
>I want to be a butterfly!\
name ""
name "Luka"
>Ahh... Geez...@> Run away!\
name ""
>As the fairies start to line up in front of me, I run away as fast as I can.\
dwave 1,"se\asioto1.ogg"
sean_change "bg061"
name "Luka"
>Yikes... Those fairies are really troublesome.\
name ""
>Managing to escape, I've made it pretty deep into the forest.@
>I should be at the deepest part by now... I wonder where Sylph is...\
name "???"
>Oh?@>What business does a human have here...?\
name ""
name "Luka"
>Who are you...?\
name ""
>Appearing in front of me was...\
r@k@\
goto *sylph_start



*sean0126

>I apologize to the Fairy.\
lsp 700,":a;chara\fairys_st01.bmp",220,100:print 10,500
name "Fairy"
>Please be careful from now on.\
name ""
name "Luka"
>Yes, I will.\
name ""
>I have to watch my feet as I walk through this forest.\
name "Fairy"
>Ok, I'll give this to you!\
name ""
>The Fairy holds out a cute little acorn.\
name "Luka"
>Thank you... What is this?\
name ""
dwave 1,"se\warm.ogg"
>The next moment, a soft light radiates from the acorn!\
name "Luka"
>Wah!\
name ""
dwave 1,"se\power.ogg"
>Warm energy flows through Luka's body!\
mov %getexp,1200:gosub *lvup
dwave 1,"se\fanfale.ogg"
mov %item12,1
>Luka received the [Fairy's Acorn]!\
name "Fairy"
>That's our proof of friendship.@
>I'll give it to you!\
name ""
name "Luka"
>Thank you, I'll take care of it.\
name ""
>The cute Fairy gave me a sign of friendship...@
>This little acorn will be my new treasure.\
name "Luka"
>Well then, I have to get going...\
name ""
lsp 701,":a;chara\fairys_st11.bmp",0,50
lsp 702,":a;chara\fairys_st21.bmp",440,50:print 10,500
name "Fairy B"
>Byebye!\
name ""
name "Fairy C"
>Byebyee!\
name ""
>Other fairies step out from behind flowers and wave goodbye to me.@
>I wave back at them as I move deeper into the forest, watching where I step.\
dwave 1,"se\asioto2.ogg"
sean_change "bg061"
name "Luka"
>Whew... I'm pretty deep inside the forest.\
name ""
>After parting with the fairies, I moved deep into the forest.@
>I should be around the deepest part of the forest...\
name "???"
>Oh?@>What business does a human have here...?\
name ""
name "Luka"
>Eh...?\
name ""
>Appearing in front of me was...\
r@k@\
goto *sylph_start



*sean0127

bgm "bgm\comi1.ogg"
name ""
r@k@\
name "Sylph"
>*Sniff*@>Waaaaah!\
name ""
name "Luka"
>So...Sorry...\
name ""
>Alright, what do I do now...@
>I need to borrow her power, but I made her cry...\
name "Sylph"
>*Sniff*@>Truthfully... I can't really fight.@
>That was the first time I tried fighting with my wind...\
name ""
>Well, I kind of realized that during the fight...@
>Even though she's the Spirit of Wind, it doesn't mean she's a master of combat...\
bgm "bgm\seireinomori.ogg"
lsp 700,":a;chara\sylph_st04.bmp",0,0:print 10,500
name "Sylph"
>If it's you... Can you properly use my power?\
name ""
name "Luka"
>Yes... I'll try my best!\
name ""
lsp 700,":a;chara\sylph_st01.bmp",0,0:print 10,500
name "Sylph"
>Ok... Then we'll be together forever from now on!@
>When you're attacked, I promise to lend you my power...\
name ""
dwave 1,"se\warm.ogg"
csp 700
lsp 2,":c;system\ef_white.jpg",0,0:print 10,500
csp 2:print 10,500
>Sylph flashes brightly, and then vanishes!\
name "Luka"
>Eh...!?@>What's happening!?\
name ""
>A mysterious feeling spreads throughout my body.@
>It feels as though my body is fusing with the air around me.\
>It feels as though the air itself is blowing inside my body.\
name "Luka"
>Sylph... Are you inside of me...?\
name ""
>Is this what it means to borrow the power of the Spirits?\
>Suddenly, I hear the whispers of the wind through the forest.@
>As if having ESP, I can sense every object around me.\
>How many insects there are... How many birds are flying nearby...@
>The voice of the wind tells me everything.\
name "Luka"
>This is my new power...\
name ""
>This is just the power from Sylph, but it's already so amazing.@
>If I got the power from the other three as well, even the Four Heavenly Knights would be no match.@> ...Probably.\
name "Luka"
>Please look, Ilias!@
>With this, I'll be able to make a peaceful world!\
name ""
>Trembling in happiness at my new power, I turn around to head back to the entrance of the forest.\
dwave 1,"se\asioto2.ogg"
sean_change "bg061"
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
>At the forest entrance, Alice is still waiting with a bored look on her face.\
name "Alice"
>Hmph. It looks like you got Sylph's power safely.@
>I can see you carrying yourself differently with your new power.\
name ""
name "Luka"
>You can tell?@>I knew you would be able to tell.@
>Wahaha!@>Hahahahaha!\
name ""
lsp 700,":a;chara\alice_st06b.bmp",67,0:print 10,500
name "Alice"
>...Sh...Shut up!\
name ""
name "Luka"
>Thank you, Alice.@
>Telling me about such a wonderful thing.\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...Hmph.@
>It annoyed me to hear someone so weak introducing themselves as a Hero.\
name ""
>Alice closes her eyes in slight embarrassment.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>So, have you mastered the power yet?\
name ""
name "Luka"
>For now, I can hear the voice of the wind...@
>But I don't really know how to use it in a fight...\
name ""
>Can I freely manipulate the wind like Sylph was doing?@
>Hmm... That would be pretty cool.\
name "Luka"
>If I can do that, I'll need a catchphrase.@
>[Blow Hard, My Wind of Justice!]@> What do you think, Alice?\
name ""
name "Alice"
>...Idiot.\
name ""
>Alice mutters softly under her breath.\
bgm "bgm\kiki2.ogg"
>Suddenly, I feel the wind fall into disorder as every living creature in the forest starts to run away from the area.\
name "Luka"
>What... Is it a monster!?\
name ""
>A disgusting, deranged wind starts to approach from the depths of the forest.\
name "Alice"
>I sense a monster... But not quite...@
>Nothing besides Elves, Fairies, and that Alraune should live in this forest...\
name ""
name "Luka"
>What is it...?@
>The feeling is causing goosebumps to go up my spine...\
name ""
>This thing feels dangerous...@
>The feeling is completely different from any monster up till now.\
name "Luka"
>It's getting closer... It's almost here...\
name ""
name "Alice"
>...I know.@
>Just what is this ominous feeling...?\
name ""
>I can hear the rustling of the grass as the strange presence moves closer.\
>Finally, it breaks through the trees and appears!\
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\c_dryad_st01.bmp",140,0:print 10,500
name "Luka"
>What... The hell...?\
name ""
>It certainly looks terrifying...\
>It's as if its entire body is made of parasitic plants.@
>But the core looks like a human with hollow eyes...\
>Is this the unknown monster that Elf mentioned...?\
name "Luka"
>Hey, Alice...@>What is this monster...?\
name ""
name "Alice"
>I don't know.\
name ""
>Alice coldly replies.\
name "Luka"
>You're the Monster Lord, right?@>How could you not know?\
name ""
>I don't think she's lying...@> She also didn't run away when it appeared...\
>Alice has a more serious look on her face than I've ever seen before, too.\
name "Alice"
>...I really have no idea.@
>I've never seen this type of monster before...\
>A monster unknown to the Monster Lord shouldn't exist in this world.\
name ""
>Alice mutters with a serious look on her face.\
dwave 1,"se\ero_makituki1.ogg"
>The ivy and flowers suddenly shoot out from the body and attack both of us!\
r@k@\
goto *c_dryad_start



*sean0128

bgm "bgm\kiki2.ogg"
name ""
r@k@\
name "Luka"
>Was it sealed...?\
name ""
>A strange garden of flowers now fills the area.@
>Is this that monster's sealed appearance...?\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Is it over...?@
>What the hell was that thing...?\
name ""
>Alice returns, eyeing the strange flowers covering the area.\
name "Alice"
>Apparently it was a parasitic type.@
>That human woman was made into the host...@
>Was she a corpse that was taken over by a parasitic flower...?\
name ""
name "Luka"
>Human...!?@> Then, I was fighting...\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Though it may have been human at one time, it was something completely different when you were fighting it.\
>Her body was corroded so badly by the plant, she was more plant than human...\
>...So you don't need to worry.@
>In fact, you freed her from the plant.\
name ""
name "Luka"
>Is that so...?@> I see... Yeah...\
name ""
>I'll think like that for now...@
>I just did what a Hero had to do.\
name ""
name "Luka"
>So what was that thing after all?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Perhaps a mutating monster?\
name ""
>A parasitic plant that latched onto a human host...@
>Was it really the result of a mutation?\
bgm "bgm\seireinomori.ogg"
name "Luka"
>In any case, Sylph's power was amazing.@
>If I didn't have that, I wouldn't have been able to win.\
name ""
name "Alice"
>It may be powerful, but you need to master it.@
>If you're too weak, you will be controlled by that power.\
name ""
name "Luka"
>Then...@>Since I just used it so amazingly, does that mean I'm amazing!?\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>More foolishness from the idiot.\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
>But I will say...@
>I honestly didn't think you would be able to use it so quickly.\
>I was looking forward to seeing you blow yourself into the air by screwing up with the wind.\
name ""
name "Luka"
>Oioi...\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>But it's still too early to be conceited.@
>The more you get used to Sylph's power, the more powerful it will become.\
>You were able to use it, but that's only a fraction of what the power of wind can do.\
name ""
name "Luka"
>Ahh... I see!\
name ""
csp 700:print 10,500
>I need to train to control Sylph's power better...@
>As I swore that to myself, I heard a rustling from the nearby bushes.\
>Another monster!?@>No, wait...@
>From the flow of the wind, it isn't hostile...\
lsp 700,":a;chara\fairys_st01.bmp",220,100:print 10,500
name "Fairy A"
>Did you beat that scary thing?\
name ""
>A lone fairy timidly pokes her face out from behind a bush.@
>No... It's not just that one fairy.\
lsp 701,":a;chara\fairys_st11.bmp",0,50
lsp 702,":a;chara\fairys_st21.bmp",440,50:print 10,500
name "Fairy B"
>That flower monster is scaaary.@
>When it finds you, it eats you...\
name ""
name "Fairy C"
>But they beat it!\
name ""
>The fairies rush out from the surrounding forest in a swarm.@
>It looks like they were all hiding from the monster.\
name "Fairy A"
>Thank you, big bro!\
name ""
name "Fairy B"
>Thank you too, scary looking snake lady!\
name ""
cspl 701,702
lsp 700,":a;chara\alice_st07b.bmp",67,0:print 10,500
name "Alice"
>S...Scary looking snake lady...?\
name ""
bgm "bgm\comi1.ogg"
lsp 700,":a;chara\fairys_st01.bmp",220,100
lsp 701,":a;chara\fairys_st11.bmp",0,50
lsp 702,":a;chara\fairys_st21.bmp",440,50:print 10,500
>After thanking us, the fairies form a circle and start to talk among themselves.\
name "Fairy A"
>Heyhey, let's go play right away!\
name ""
name "Fairy B"
>There's a big castle nearby!\
name ""
name "Fairy C"
>Yaay! Let's go play pranks on them!\
name ""
cspl 700,702:print 10,1500
>The fairies fly away one after another.@
>Since that monster is gone, are they a little more open to the world now?\
name "Luka"
>Nearby castle...@> That's San Ilia, right?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>I think so...\
name ""
name "Luka"
>Uh oh...@
>I'm worried now...\
name ""
>Thus, we head back to San Ilia castle.\
r@k@\
dwave 1,"se\asioto2.ogg"
bgmstop
saveoff
cspl 3,7
csp 611
cspl 700,705
bg black,7,1500
bg "bg\bg048.bmp",7,1500
bgm "bgm\city1.ogg"
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
csp 700:csp 611:cspl 3,7
gosub *city11_main
gosub *setwindow_01p
name "Luka"
>So now the fairies are doing whatever they want...\
name ""
if %ivent05=0 skip 3
>What's going to happen to this place...?@
>First ghosts, and now fairies... It's a pretty bizarre place now.\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Those little tricksters can be pretty annoying.\
name ""
>Is this also a step towards coexistence...?\
if %ivent05=0 lsp 700,":a;chara\mob_syounen.bmp",-220,0:print 10,500
if %ivent05=1 lsp 700,":a;chara\mob_syounen.bmp",-320,0:print 10,500
name "Boy"
>Yaay!\
name ""
if %ivent05=0 lsp 701,":a;chara\mob_syouzyo.bmp",0,0:print 10,500
if %ivent05=1 lsp 701,":a;chara\mob_syouzyo.bmp",-100,0:print 10,500
name "Girl"
>Kya! Kya! \
name ""
if %ivent05=0 skip 5
lsp 702,":a;chara\mob_syouzyoy.bmp",110,0:print 10,500
name "Ghost Girl"
>Hahaha!\
name ""
if %ivent05=0 lsp 703,":a;chara\fairys_st21.bmp",450,100:print 10,500
if %ivent05=1 lsp 703,":a;chara\fairys_st21.bmp",490,100:print 10,500
name "Fairy"
>Waaaa! \
name ""
>The children are running around playing happily.\
cspl 700,703:print 10,500
name "Luka"
>I wonder what will happen here now...@
>Will the humans get along with the fairies...?\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Will they get along? Or will they reject them?@
>Since this place loves Ilias so much, I don't know if it will go well.\
name ""
name "Luka"
>In the end, it's up to the people of the town...\
name ""
>I guess the only thing I can do is hope for the best now.\
if %ivent05=0 skip 10
name "Alice"
>Anyway, let's get the hell out of here.@
>We can't waste any more time here.\
name ""
name "Luka"
>Ah... Yeah I guess you're right.\
name ""
>Even though she's putting on a stoic face, her body is still trembling.@
>She's trying pretty hard to ignore the ghosts, trying to save face.\
name "Luka"
>Shall we get going?\
name ""
>Thus we turn our backs to San Ilia.@
>I hope things turn out for the best here...\
dwave 1,"se\asioto2.ogg"
bgmstop
sean_change "bg041"
bgm "bgm\field3.ogg"
gosub *setwindow_01p
>I was able to acquire Sylph's power in this place.@
>But I still need to meet the other three...\
name "Luka"
>Hmm... The other spirits...\
name ""
>Salamander is to the north, in a volcano in the Gold region.\
>Undine is to the east, in a dungeon near the Noah region...\
>Gnome is to the west, in the deserts in the Safina region.@
>...Safina is the closest to here.\
name "Luka"
>Alright... Next is Gnome.@
>Shall we go to Sabasa Castle to the west first?\
name ""
>The Sentora continent is divided into four general areas.@
>To the west is an area called Safina that has a lot of deserts.\
>In the center of the largest desert is a giant city called Sabasa Castle.\
>If we're going to the Safina region, that would be the best place to start at.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>A desert this time?@>It looks like I'll be able to try some new delicacies.\
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
>I'm getting excited!\
name ""
name "Luka"
>...............\
name ""
>I'm glad to see the things important to her haven't changed.@
>How many times are you going to tell me about your [Gourmet World Tour]?\
>I shake my head in amazement as we head out on the road.\
r@k@\
dwave 1,"se\asioto2.ogg"
mov %gloval1_story_sinkou,4:gosub *savegloval1
cspl 3,7
csp 611
cspl 700,705
bg black,7,1500
saveoff
textoff
csp -1
mov %sinkoumode,0:skipoff:autoclick 0
bg "bg\map0.bmp",10,1000
goto *sean0129m



*sean0129m

btndef clear
lsp 601,":s/20,20,0;#bbbbbbHellgondo Continent ",300,40
lsp 602,":s/20,20,0;#bbbbbbIlias Continent ",510,335
strsp 603,"Gold Region",335,130,7,1,20,20,0,0,1,1,#bbbbbb
strsp 604,"Noah Region",515,150,7,1,20,20,0,0,1,1,#bbbbbb
lsp 605,":s/20,20,0;#bbbbbbNatalia Region ",410,250
strsp 606,"Safina Region",175,270,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 606,16
print 1
btnwait2 %cmd1
if %cmd1=0 goto *sean0129m
if %cmd1=-1 mov %sel2,%hanyo1:gosub *menu:goto *sean0129m
csp -1
btndef clear
if %cmd1=16 goto *sean0130
goto *sean0129m



*sean0130

bg black,10,1500
gosub *setwindow_01
bg "bg\bg030.bmp",10,1500
>It's already been ten days since we left San Ilia.@
>We should reach Sabasa Castle in another three days or so.\
>The monsters can be troublesome, but the natural environment here is even worse.\
>Right now we're going through a humid rainforest.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>....Hot....\
name ""
name "Luka"
>You're barely wearing anything, too...@
>I'm the one really hot with all these clothes...\
name ""
name "Alice"
>You can take off your clothes too you know.@
>That way you can make it easier for the monsters that attack you, too.\
name ""
name "Luka"
>Geez, just what do you th...@> Hmm?\
name ""
csp 700:print 10,500
>I sense the rustling of the grass close by.@
>Quickly racing towards me, a giant figure jumps out!\
r@k@\
goto *taran_start



*sean0130a

bgm "bgm\field3.ogg"
name ""
r@k@\
name "Luka"
>Even when it's so hot, these monsters are so energetic...\
name ""
>Do they just not mind the heat or something?\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...So hot.@> ...And hungry.\
name ""
>...Maybe not.\
dwave 1,"se\asioto2.ogg"
sean_change "bg019"
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Uhhhg... Why is the air so dry?\
name ""
name "Luka"
>This is an arid region.@
>A little bit further and we'll actually be in a desert.\
name ""
>Sabasa Castle is in the center of the desert.@
>Right now it's ruled by the ninth descendant of the Hero Sabasa, who was called the [Emperor of the Burning Sands].\
>All I know is that Gnome is somewhere in the desert...@
>The first step I need to take is to find some more concrete information around Sabasa Castle.\
name "Alice"
>Bleh. Another monster...@> Making me have to move more than necessary when it's so hot...\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,500
name "Luka"
>Sheesh...\
name ""
>Wherever I go, I'm attacked by monsters...@
>This isn't making peaceful coexistence any easier...\
r@k@\
goto *mino_start



*sean0131

bgm "bgm\field3.ogg"
name ""
r@k@\
name "Luka"
>Whew...\
name ""
>I let out a sigh as the calf runs away.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...Are you done?\
name ""
name "Luka"
>How was I?@
>Don't you think I've gotten stronger?\
name ""
name "Alice"
>Well... You are better than before.@
>But since all you can use the wind for is defense, you still have a long way to go.\
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
>Until you're carried by the wind itself, you can't say that you've mastered it!\
name ""
name "Luka"
>I... I see...\
name ""
lsp 700,":a;chara\alice_st01b.bmp",-100,0
lsp 701,":a;chara\sylph_st07.bmp",200,0:print 10,500
name "Sylph"
>Urgh...\
name ""
>Inside of me, Sylph also seems like she's depressed.@
>Speaking of that, her only real move with the wind was defense...\
name "Luka"
>If even Sylph couldn't do it, how can I...?\
name ""
>Doing what the spirit of wind can't do...@
>Maybe it's not a problem of magic, but of combat experience?\
>I don't really get what it means to be carried by the wind...@
>But I'll just keep practicing until it makes sense!\
name "Luka"
>Alright! I'll do my best!@
>I'll train like hell while I meet the other spirits!\
name ""
>After my energetic yell, we continue onward.@
>Sabasa Castle is still a ways ahead...\
dwave 1,"se\asioto2.ogg"
sean_change "bg062"
bgm "bgm\sabaku.ogg"
>After walking for a little while longer, we come to the middle of a desert.\
>This heat and dryness... I didn't think something this horrible existed in the world...\
name "Luka"
>Uhggg... So hot...\
name ""
>I thought I was ready for this... But I didn't think a desert would be this bad.\
>Why is this damn sun so bright?@
>Why is this sand so hot?@
>Why is this black thing rushing toward me?\
r@k@\
goto *sasori_start



*sean0132

bgm "bgm\sabaku.ogg"
name ""
r@k@\
name "Luka"
>Whew... She was pretty strong.\
name ""
>The monsters are pretty strong around here.@
>Is it because the environment is so harsh?\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...Are you finished yet?@
>There's nothing to do around here when I go on my nature stroll.\
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
>All I could do was catch a couple insects.\
name ""
>For some reason, Alice proudly thrusts an insect cage towards me.\
name "Luka"
>Uwaa!\
name ""
>Rustling inside of the cage were lots of little scorpions!@
>Even in this overpowering heat, chills run down my spine.\
>Even more, Alice looks strangely proud of them.@
>What are you, a kid showing off your catch to a parent!?\
name "Luka"
>W...Why did you catch so many scorpions?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Well... I was wondering if I could eat them...\
name ""
name "Luka"
>Like hell you could!\
name ""
mov %item01,9
>Disgusted at Alice's stomach, I quickly turn back and continue on.@
>We're almost to Sabasa Castle...\
dwave 1,"se\asioto2.ogg"
sean_change "bg062"
name "Luka"
>What... Is that...?\
name ""
>As we came to a spot only a few hours from Sabasa Castle, we come across some strange items.\
>For some reason, clothes and some luggage are just sitting in the middle of the desert.\
>A shirt, a turban, a hat... Even a giant backpack.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>What the heck? Did they melt away by the heat?\
name ""
name "Luka"
>I don't think humans can melt like that...\
name ""
>At any rate, why did they leave behind their clothes and luggage?\
name "Luka"
>...I wonder what happened.@
>Hm? What's this?\
name ""
lsp 700,":a;chara\lamp_st31.bmp",0,0:print 10,500
>Near their clothes, an expensive lamp is sitting on the sand.@
>They even left behind such an expensive looking antique lamp...\
name "Luka"
>What's an expensive lamp like that doing here...?\
name ""
>I pick it up and rub off the sand that was covering it.@
>Suddenly...!\
wait 500
bgmstop
bgmonce "bgm\battlestart.ogg"
lsp 700,":a;chara\lamp_st12.bmp",0,0:print 10,500
>Lamp Genie appears!\
bgm "bgm\kiki2.ogg"
name "Luka"
>Uwa! What the!?\
name ""
name "Lamp Genie"
>I was called...@
>I shall grant you one wish.\
name ""
name "Luka"
>Eh...?@> Wish?\
name ""
>A genie popping out of a lamp...@
>I've heard the fairy tales, but I didn't think they were real!\
name "Luka"
>Alice, what do you think I sh...@> Oh, she's gone.\
name ""
>Alice had vanished before I noticed.\
name "Lamp Genie"
>Now, what is your wish?@
>No matter what it is, I shall make it come true.\
name ""
name "Luka"
>Hmmmmm...\
name ""
>For some reason the genie is pushing her breasts towards me.@
>Is she trying to seduce me into a certain wish...?\
name "Lamp Genie"
>Now, state your wish.@
>Do you desire wealth? Power? Or... The ultimate pleasure?\
name ""
name "Luka"
>...............\
name ""
goto *sean0132x



*sean0132x

if %continue=1 bgm "bgm\kiki2.ogg"
if %continue=1 lsp 700,":a;chara\lamp_st12.bmp",0,0
if %continue=1 bg "bg\bg062.bmp",10,5000
if %continue=1 gosub *setwindow_01
mov %continue,0
name "Lamp Genie"
>...I bet you desire pleasure.@
>Shall I give you a taste of heaven with my sexual skills?\
name ""
>The genie whispers in my ear, tempting me.@
>My willpower is shaken, as if a magic spell is being cast over me.\
>My eyes are drawn to the discarded clothes...@
>Thinking about what happened to their owner, I have a bad feeling...\
r@k@\
csel "Shake off temptation ",*sean0132a,"Give in to temptation",*lamp_start



*sean0132a

name "Luka"
>Oh, crap!@
>What the hell am I thinking!?\
>Ilias, please forgive me!\
name ""
>I shake my head as I try to clear out the thoughts.\
name "Luka"
>...I don't have any wishes that you can grant.@
>There's just a goal I must achieve!\
name ""
>I shake off the temptation and regain my composure.\
name "Lamp Genie"
>...I see.@>You have a strong will.@
>I like men like you.\
>I'll give you a special service...\
name ""
skillname "Blessing of Power"
dwave 1,"se\power.ogg"
>A mystic force flows into Luka's body!\
mov %getexp,2800:gosub *lvup
skillname ""
name "Lamp Genie"
>I wish you well on your travels...\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,500
>With those final words, she goes back into her lamp.@
>Still surprised, I pick up the lamp.\
name "Luka"
>Should I keep this lamp so there aren't any more victims...?\
name ""
>The Lamp Genie must have done something to the owner of those clothes...\
>I can't leave someone so dangerous just lying around.\
mov %item13,1
bgm "bgm\sabaku.ogg"
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...Sheesh.@
>I thought you were going to jump her with how excited you looked.\
name ""
>Alice returns, spewing venom.\
name "Luka"
>I just felt weird for a moment!@
>But... I shook off the temptation...\
name ""
goto *sean0133



*sean0132b

bgm "bgm\sabaku.ogg"
name ""
r@k@\
name "Luka"
>Whew... That was a strange monster.\
name ""
>I have to keep my guard up at all times.@
>I don't really get what came over me...\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...How shameless.@
>Making such a lewd wish to a monster like that.\
name ""
>Alice returns, spewing venom.\
name "Luka"
>I just felt weird for a moment!@
>But... I shook off the temptation and beat her...\
name ""
goto *sean0133



*sean0133

lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...................Pervert.\
>You're so repressed your desire overflowed at the slightest temptation.\
>Once we get to Sabasa Castle, it looks like I'll need to squeeze everything out of you again.\
name ""
name "Luka"
>Eh....!?\
name ""
>I tremble a little bit, remembering the last time.\
csp 700:print 10,500
>Anyway, we're almost to Sabasa Castle.@
>I'll finally get to sleep on a bed soon...\
dwave 1,"se\asioto2.ogg"
sean_change "bg063"
bgm "bgm\yaei.ogg"
>...Or so I thought.\
>We must have made a wrong turn somewhere, since we're not at Sabasa Castle yet.\
>Even worse, we're out of food.\
name "Luka"
>Uuu...@
>Why the hell did I agree to this...\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...You should thank me.\
name ""
>I'm trying to fry the scorpions that Alice caught.@
>According to her book, it seems they're edible if you fry them.\
>Normally I'd never even dream of eating these... But I'm starving.\
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>...Hmph. It's fine, isn't it?@
>Everything you make turns out good.\
name ""
name "Luka"
>...That doesn't make me feel better about eating scorpions.\
name ""
>Closing my eyes and bracing my stomach, I take a bite of a scorpion.@
>...Despite their horrifying look, they don't taste too bad.\
name "Luka"
>Uhg... We should have been at Sabasa Castle already.\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...Don't cry, you idiot.\
name ""
>Thus we were forced to camp here for the night.@
>Crossing a desert is a lot more difficult than I thought...\
bgmstop
sean_change "bg062"
bgm "bgm\sabaku.ogg"
>And the next morning, we begin our trek anew.\
name "Luka"
>Sabasa...@>Castle...@>Sabasa Castle...@
>Where@>are@>youuuu?\
name ""
>While under the blisteringly hot sun, I mutter to myself while walking.@
>As I start to sing the words for some reason, I desperately search for the castle on the horizon.\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Sheesh, you're pretty pathetic.\
name ""
name "Luka"
>You...@> Can't you fly or something?@
>Go into the sky and look for the castle for me...\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>Is the Hero relying on the Monster Lord?\
name ""
name "Luka"
>Guh...!\
name ""
>I bite my lip at her words.\
>I'm a Hero!@>I can't rely on the Monster Lord!@
>...Until it becomes really dangerous.\
csp 700:print 10,500
name "Luka"
>Uuu... The water flask is almost empty...\
name ""
>If this flask is empty before I find an oasis or the castle, I'll be in real trouble.\
>Should I cling to my pride and die?@>Or beg Alice...?@
>I need to prepare for what I'm going to do...\
name "Luka"
>Oh Ilias... Please guide me...\
name ""
>As soon as I mutter that prayer...@
>Suddenly, a shooting star flies across the sky!\
>From the direction of the star, I see a strange outline on the horizon!\
name "Luka"
>No way... Is it really...\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Hmph, it's no mirage.@>That really looks like the castle.\
name ""
>This is due to the guidance of Ilias!@
>The goddess has extended her lifesaving hand to me!\
name "Luka"
>Ahh, Ilias! Thank you!\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...Hmph.\
name ""
>Thus I continue towards Sabasa Castle, singing my Sabasa Castle song.\
dwave 1,"se\asioto2.ogg"
sean_change "bg064"
bgm "bgm\sabasa.ogg"
name "Luka"
>There are a lot of merchants...\
name ""
>As expected of the commercial district of the largest settlement in Sabasa.\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Oh? Is this the Sabasa Castle's special dish?@
>A piping hot Sabasa Fish packed with hot-hot vegetables, flavored with special Piriri spices?\
name "Luka"
>...Do you want to eat it?\
name ""
lsp 700,":a;chara\alice_st12b.bmp",67,0:print 10,500
name "Alice"
>.............\
name ""
>Alice quickly nods her head like an excited child.\
name "Luka"
>...It's expensive you know.@
>We can't afford it with the money we have on hand...\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-120,0
lsp 701,":a;chara\mob_ozisan3.bmp",160,0:print 10,500
name "Clerk"
>Mr. Adventurer!@>The baptized Hero price isn't too expensive!\
name ""
name "Luka"
>Err...@> I'm actually... Not baptized...\
name ""
>If I'm not baptized, I'm not allowed to get the discount...\
csp 701
lsp 700,":a;chara\alice_st13b.bmp",67,0:print 10,500
name "Alice"
>Gaaah! This stupid half-hero boy!@
>How come you aren't a baptized Hero at such an important time!\
name ""
name "Luka"
>...Sorry.\
name ""
>I don't know why I apologized...@
dwave 1,"se\asioto3.ogg"
lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
>As I apologize, a soldier walking by suddenly looks at me and gasps.\
name "Soldier"
>Ah...\
name ""
>The soldier suddenly stops and slowly turns toward me.\
name "Luka"
>........?\
name ""
>I'm not doing anything bad, so why is he staring at me like that...?\
lsp 700,":a;chara\angersword.bmp",-160,0
lsp 701,":a;chara\mob_heisi1.bmp",160,0:print 10,500
name "Soldier"
>Ahh! That sword!\
name ""
>The soldier shouts as he points at my sword.\
csp 701
lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
name "Soldier"
>Hmm... You're a little young...\
name ""
>The soldier stares into my eyes and nods.\
name "Soldier"
>I'm sorry, but will you come with me to the castle?\
name ""
name "Luka"
>Eh...!?@
>I didn't do anything wrong!\
name ""
lsp 700,":a;chara\angersword.bmp",0,0:print 10,500
>I knew it.@> This sword that secretes evil is going to get me in trouble.\
lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
name "Soldier"
>...No, it's nothing like that.@
>Anyway, just come to the castle.\
>It won't take long... You just need to listen to a story.\
name ""
name "Luka"
>Eh...?@> What do you think, Alice?\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-120,0
lsp 701,":a;chara\mob_heisi1.bmp",160,0:print 10,500
name "Alice"
>Don't rely on me.@>Think for yourself.\
name ""
>...That's what I thought she would say.\
csp 701
lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
name "Luka"
>Ok... I'll listen to the story...\
name ""
>A true Hero gets random quests from strangers!@
>Thinking this, I follow the soldier to the castle.\
dwave 1,"se\asioto2.ogg"
sean_change "bg045"
bgm "bgm\castle2.ogg"
>I thought I was going to be brought to the soldier's room...@
>But with a stunned look on my face, I'm brought in to the audience hall of the King.\
>It seems as though the King of Sabasa is looking for a Hero...\
lsp 700,":a;chara\sabasa_st01.bmp",0,0:print 10,500
>There was another man already in the room.\
>With a strong looking body, and a powerful gaze, I can tell that he's a seasoned warrior.\
name "Luka"
>Excuse me... Were you brought here to hear the King's request too...?\
name ""
name "Grand Looking Man"
>No... I am the King.\
name ""
name "Luka"
>Ah, the King. Well I...@>Eh!?\
name ""
name "Sabasa King"
>I'm the ninth King of Sabasa.\
name ""
>...King?@
>This powerful looking warrior is the King?\
name "Luka"
>...I... I'm sorry!@
>Please excuse my rudeness before!\
name ""
name "Sabasa King"
>I don't mind.@
>Before I was King, I was a warrior.\
name ""
>The King stares at my face with his stern eyes.@
>Somehow it feels like he's looking right through me...\
name "Sabasa King"
>...Hmm... You have good eyes.@
>You look pretty young, so I wasn't sure of your ability.\
name ""
name "Luka"
>I... Thanks...\
name ""
>Before this powerful looking King, I can only mutter a small word of thanks at his compliment.\
>The King cuts straight to the point of why he summoned me here.\
name "Sabasa King"
>...Traveler, I wish to ask you something that must remain confidential.@
>It's very important.@> If it gets out to the citizens, it will be a huge incident.\
name ""
name "Luka"
>I... I understand...\
name ""
>I nervously swallow at his words.@
>A King like this requesting something with such a serious look...@
>This can't be something minor...\
lsp 700,":a;chara\sabasa_st03.bmp",0,0:print 10,500
name "Sabasa King"
>The fact is, my daughter...@
>That is, the Princess...@
>She was kidnapped by a monster.\
name ""
name ""
>T... The Princess was!?\
name "Luka"
>The Princess was kidnapped!?@
>As a Hero, I can't sit still at that!\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-120,0
lsp 701,":a;chara\sabasa_st03.bmp",160,0:print 10,500
name "Alice"
>...A fake one.\
name ""
name "Luka"
>Please tell me more, King.\
name ""
>I ignore Alice.@
>I need to hear how this happened!\
csp 701
lsp 700,":a;chara\sabasa_st03.bmp",0,0:print 10,500
name "Sabasa King"
>It was midnight, three days ago...@
>I was awoken by the sound of shattering glass from my daughter's room.\
>When I ran there with the guards, my daughter was gone.@
>...The only thing that remained was a letter.\
name ""
name "Luka"
>A letter...?\
name ""
name "Sabasa King"
>The monster who took my daughter left it.@
>In horribly hate-filled writing, it had one word on it. [Pyramid].\
name ""
>Pyramid? That legendary structure in the middle of the desert?@
>I heard that there was a dungeon inside of it...\
>It seems as though the kidnapped Princess was taken there...\
name "Sabasa King"
>Having the Princess being kidnapped is a horrible thing to befall the country.\
>To avoid an uproar, this must stay a secret.@
>That's why I've been searching for a person capable of saving her in secret...\
name ""
name "Luka"
>I see...\
name ""
name "Sabasa King"
>I've interviewed a few so far...@
>Even though they introduce themselves as Heroes, they all looked pretty pathetic.\
>But even though you're young, I feel something from you...@
>Young traveler, will you please save my daughter?\
name ""
name "Luka"
>...I understand! I'll do it!\
name ""
>A true Hero is always saving kidnapped Princesses!@
>How could I possibly refuse such a perfect cliche!\
csp 701
lsp 700,":a;chara\sabasa_st02.bmp",0,0:print 10,500
name "Sabasa King"
>Oh! You'll do it!?@
>Then the dawn after you save my daughter, you shall become her husband!\
name ""
name "Luka"
>...Ehh!?\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-120,0
lsp 701,":a;chara\sabasa_st02.bmp",160,0:print 10,500
name "Alice"
>That reward isn't necessary.@
>Instead, we would rather have Sabasa Fish to eat.\
name ""
lsp 701,":a;chara\sabasa_st03.bmp",160,0:print 10,500
name "Sabasa King"
>...That's all you want as a reward!?\
name ""
name "Luka"
>Oi oi, Alice...\
name ""
name "Alice"
>Do you have a complaint?@
>Or do you want to marry a Princess and end your travels here?\
name ""
name "Luka"
>No it's not that, but...\
name ""
csp 701
lsp 700,":a;chara\sabasa_st01.bmp",0,0:print 10,500
name "Sabasa King"
>Anyway, I'll entrust this matter to you.@
>I'm asking both as the King of this land, and as a father.\
name ""
>Thus the grand looking King bows to me, a mere traveler.\
sean_change "bg065"
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>...That King was pretty impressive.@
>Being stuck as a King doesn't seem like it fits a man like him.\
name ""
name "Luka"
>...What are you talking about.\
name ""
>...Speaking of rulers, your character doesn't fit the Monster Lord's image either...\
lsp 700,":a;chara\alice_st11b.bmp",-120,0
lsp 701,":a;chara\mob_heisi1.bmp",160,0:print 10,500
name "Soldier"
>Mr. Hero, I shall take you to the nicest inn.@
>Please have an enjoyable rest...\
name ""
name "Luka"
>Ah... Thank you...\
name ""
>Since we're helping out the King, it seems like we're being treated very well...\
name "Alice"
>We'll be able to sleep in a nice inn tonight...\
name ""
name "Luka"
>But... Before that, shall we search for some information?@
>I want to learn more about the Pyramid and Gnome...\
name ""
>I still don't know where Gnome might be around here.@
>All I know is she's in the desert somewhere.\
name "Soldier"
>If it's information you're after...@
>We found an information dealer earlier.@
>Shall I take you to the jail?\
name ""
name "Luka"
>Oh... That would be helpful!\
name ""
>An information dealer should know something.@
>...But why were they thrown in jail?\
>I think to myself as I follow the soldier into the castle dungeon.\
dwave 1,"se\asioto3.ogg"
sean_change "bg066"
bgm "bgm\dungeon1.ogg"
>We reach the dim interior of the prison.@
>In there was...\
wait 500
bgmstop
bgmonce "bgm\battlestart.ogg"
lsp 700,":a;chara\amira_st01.bmp",0,0:print 10,500
eng "Unfortunate Lamia appears!":$sel6/
wait 1000
delay 4500
bgm "bgm\amira.ogg"
\
name "Amira"
>Oh... Darling!@
>Coming all the way here to meet me!@>Good things sure do come to those who wait...\
name ""
>...It was this thing?\
name "Luka"
>...Why were you thrown in jail?@
>What were you doing in Sabasa Castle?\
name "Amira"
>There was no reason for them to throw me in here...@
>If I had to say... It must have been because I was so hideous looking...\
name ""
name "Luka"
>Amira...\
name ""
lsp 700,":a;chara\amira_st01.bmp",-160,0
lsp 701,":a;chara\mob_heisi1.bmp",160,0:print 10,500
name "Jailer"
>Hey, snake girl! Get the hell out of here already!@
>This isn't your house!\
name ""
>...So she's squatting in here.\
csp 701
lsp 700,":a;chara\amira_st01.bmp",0,0:print 10,500
name "Amira"
>The true reason...@> They give me three meals every day...\
name ""
lsp 700,":a;chara\alice_st12b.bmp",-130,0
lsp 701,":a;chara\amira_st01.bmp",200,0:print 10,500
name "Alice"
>Oh, how interesting.@
>Luka, shall we stay here for a while too?\
name ""
name "Luka"
>Sure, live here forever.@> By yourself.\
>Anyway, Amira.@> Do you have any information to sell?\
name ""
csp 701
lsp 700,":a;chara\amira_st01.bmp",0,0:print 10,500
name "Amira"
>Money isn't needed.@>All I want is your love.@> Woah~woah~zuu~zuu!\
name ""
>........................\
name "Amira"
>I have a horrible story for you today...@
>I heard the Princess was kidnapped!\
name ""
name "Luka"
>I already heard that from the King.\
name ""
name "Amira"
>As expected of my Darling!@
>Then, what kind of information were you hoping to hear about?\
name ""
name "Luka"
>Do you know anything about Gnome?\
name ""
name "Amira"
>Gnome...? The earth spirit?\
>I know a little...@
>There's a town called Safaru a little bit to the north of this place.\
>It's said that nobody lives there any longer, and it's in ruins...@
>But the people who lived there worshipped Gnome.\
name ""
name "Luka"
>Were they animists...?\
name ""
name "Amira"
>But they died out...@
>They migrated to other towns, and left Safaru in ruins.\
>...But there have been some strange sightings in the ruins recently.@
>Tiny mud dolls have been seen walking around restlessly.\
name ""
name "Luka"
>Mud doll...?@> Do you think that's Gnome...?\
name ""
name "Amira"
>I don't know any more than that...@
>Maybe it's a normal monster that appears in the area?@
>Or possibly something that was created to worship Gnome?\
name ""
lsp 700,":a;chara\sylph_st21.bmp",-200,50
lsp 701,":a;chara\amira_st01.bmp",160,0:print 10,500
name "Sylph"
>That isn't Gnomey.@
>But it might be one of her familiars...\
name ""
name "Luka"
>Sylph...\
name ""
name "Amira"
>Oh... You look delicious.@
>Is this delicious morsel your companion, Darling?\
name ""
name "Luka"
>Something like that...@
>What do you mean by "familiar", Sylph?\
name ""
name "Sylph"
>Gnomey makes dolls out of mud for fun...@
>She makes them move with her magic, and plays with them.\
name ""
name "Luka"
>I see...@
>So if those mud dolls are seen, that must mean Gnome is close by?\
name ""
name "Sylph"
>It must!@> Yaay! I'll get to play with Gnomey after so long!\
name ""
csp 701
lsp 700,":a;chara\amira_st01.bmp",0,0:print 10,500
>Sylph vanishes with an excited laugh.\
name "Luka"
>It seems that Gnome is near those ruins.@
>Thank you, Amira. That was actually useful.\
name ""
name "Amira"
>Is there anything else you want to know?@
>I'll find out anything for you, Darling.\
name ""
name "Luka"
>Then... Do you know anything about Undine or Salamander?\
name ""
name "Amira"
>Even I don't know anything about them...@
>But before our next meeting, I'll find out more...\
name ""
name "Luka"
>Thank you, that would help me out a lot...\
name ""
name "Amira"
>Don't mention it.@>I'll be waiting for my reward.\
>Now, Amira is going to start on her journey.\
>I shall find out, whether it be through hell or high water...@
>Get it?@>Fire and water.@>Undine and Salamander.\
name ""
name "Luka"
>Ah... Yeah...\
name ""
name "Amira"
>Then, until next time...\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,500
>Saying that, Amira awkwardly runs out of the jail.\
name "Luka"
>Why do I feel so disgusted at being indebted to her?\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>I don't understand her either.@
>She seems to live among humans pretty effortlessly.\
name ""
name "Luka"
>I think I'd say she's just doing whatever she wants...\
name ""
name "Alice"
>Anyway, I'm tired.@
>You must be even worse off than I am after crossing that desert.\
>Let's get to the inn.\
name ""
name "Luka"
>That sounds good...\
name ""
>My body feels exhausted from that journey.@
>If I tried to leave right away, I'd probably drop dead of exhaustion first.\
>First the Princess, then Gnome...@
>Maybe it would be wise to collect some more information before heading to the inn, though.\
r@k@\
dwave 1,"se\asioto3.ogg"
bgmstop
saveoff
cspl 3,7
csp 611
cspl 700,705
bg black,7,1500
bg "bg\bg065.bmp",7,1500
bgm "bgm\castle2.ogg"
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
csp 700:csp 611:cspl 3,7
mov %hanyo1,0
mov %hanyo2,0
gosub *city12b_main
dwave 1,"se\asioto2.ogg"
bgmstop
sean_change "bg067"
bgm "bgm\hutuu1.ogg"
gosub *setwindow_01p
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Luka... Can you please hear me out?\
name ""
name "Luka"
>S...Sure...\
name ""
>I eye her suspiciously at such an unusual question.@
>What is she going to say...?\
name "Alice"
>You want to make a world where monsters and humans can coexist.\
>At first I thought you were just a naive idiot.@
>A stupid boy still playing childish Hero games.\
name "Luka"
>I remember you saying that when we first met...\
name ""
>I remember her harsh words like it was just yesterday.@
>I also thought I was cursed to have to travel with her...\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>But... My first impression was wrong.@
>You seem more aware of the absurdity in this world than I thought.\
>You aren't like the others who want to be regarded as a Hero...@
>For some reason, it feels more like you're aiming to be a martyr...\
name "Luka"
>..................\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Ruining your body for your beliefs.@
>As if dying would be preferable to being unable to attain your desires.\
>It's as if you're constantly looking for a place to die for your beliefs.@
>How did someone young like you come to be like this?\
name ""
name "Luka"
>.......................\
name ""
>After staying silent for a few moments, I open my mouth.\
bgm "bgm\kiki2.ogg"
name "Luka"
>My father was...@> Killed by a monster.\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>I see...@> That must have been painful for you.@
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
>But that doesn't make sense.@
>If a monster killed your father, why don't you hate them?\
name ""
name "Luka"
>There was a reason for monsters to want to kill him...@
>He was the founder of Ilias Kreuz.\
name ""
name "Alice"
>Ilias Kreuz...@> The anti-monster terrorist organization?\
name ""
name "Luka"
>...Before he met that Lazarus guy in Port Natalia, my father was an adventurer.\
>Lazarus and my father met, and along with two others, decided to go to kill the Monster Lord.\
>But... They failed on the way.\
name ""
name "Alice"
>...That's a common story.@
>Many Heroes following that same desire have failed on the way.\
name ""
name "Luka"
>But... After his failure, my fathers intentions became distorted.\
>My father and Lazarus founded Ilias Kreuz after that.@
>With my father as the leader, they started to commit terrorism all over the world.\
name ""
>I let out a sigh.\
name "Luka"
>Casting aside his desire to be a brave Hero, he became a terrorist.@
>I never want to be like him.\
name ""
name "Alice"
>I see...@> Is that the cause of your reckless behavior?\
name ""
name "Luka"
>...Of course!@
>I'd rather die than lose my way like he did!\
name ""
name "Alice"
>..................\
name ""
name "Luka"
>In the end, he was killed by a monster...@
>After killing so many monsters himself, he in turn was killed.\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...You have a complicated frame of mind.\
name ""
name "Luka"
>...I wasn't happy that he was killed.@
>But if I went out for revenge to kill the monsters who were acting in revenge, then what!?\
>Will a relative of that monster then kill me in revenge!?@
>How long would the revenge killings continue?@
>I don't want that!\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>That's true...@> That's good.@
>Endless chains of revenge need to be severed.\
name ""
name "Luka"
>That's why I have to change this world.@
>Even if I have to trade this body with the same blood as my father...\
name ""
bgm "bgm\hutuu2.ogg"
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>...Idiot.@
>Willing to trade your life for something like that.\
name ""
name "Luka"
>E...Even if you say that...@
>If I want to achieve something so big, I have to risk everything...\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>You're trying to reverse your father's actions.\
>But confronted with such a big target, you think your only choice is to throw your life at it.\
name ""
>My head starts to boil at her words.\
name "Luka"
>What do you know!?@> I...\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...You're carrying the crimes of your father on your shoulders.@
>Trying to atone for him, you're willing to die.@
>That's why you're so eager to throw your life away.\
name "Luka"
>Atonement for my father's crimes...?@> I...\
name ""
>Why am I trying to trade my life for a peaceful world?@
>If I die on the way, will it really accomplish anything?\
>My mother told me to become a respectable Hero...@
>But am I really doing it because of what Alice said...?\
name "Luka"
>No!@>I...\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>What your father did is irrelevant to you.@
>The crimes of the father don't extend to the child.\
>That's why even if you kill yourself, you can't excuse his crimes.@
>If you constrict yourself to that viewpoint, you will die without accomplishing anything.\
name ""
name "Luka"
>................\
name ""
>If it was for my dream, I wasn't afraid of death...@
>That's what I've always thought...\
>But I can see the point she's trying to make...@
>Do I truly want to die for it?\
>My father's crimes...@
>Am I really carrying them on my back?\
name "Alice"
>Do you truly want a world where monsters and humans can coexist?@
>Then you must live and make sure to build it yourself.\
>...Otherwise your way of life is just too sad.\
name ""
name "Luka"
>...............\
name ""
>My excitement starts to fade.\
>It might really be as she says...@
>I'm not responsible for my father...@
>It seems I've been acting too rashly...\
name "Luka"
>...But I am a Hero.@
>If I'm defending the oppressed, I won't regret my actions.\
name ""
name "Alice"
>If that's what you've decided, I don't care.@
>As long as you aren't throwing your life away because of your father.\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
>I don't want you to die in such a stupid manner...\
name ""
name "Luka"
>...I get it.@> I'll be careful.\
name ""
>...Because of my father, huh?@
>She might be right...@>I may have been overreacting in order to atone for what my father did.\
>Have I been blinding myself, unable to notice my own feelings until they were said by another?\
bgm "bgm\hutuu1.ogg"
name "Luka"
>But it's strange...@
>Having you encourage me like this.\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...Hmph. I have my reasons.@
>Seeing someone being tied down by their parents is just too pathetic to leave alone.\
name ""
name "Luka"
>Were you the same?@> Was your mother frustrated by trying to kill the Monster Lord and turned to horrible deeds?\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>My mother WAS the Monster Lord!@
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
>...You take idiocy to new levels.\
name ""
r@k@\
goto *sean0135



*sean0135

dwave 1,"se\ero_makituki1.ogg"
>Alice lets out a deep sigh as she suddenly wraps me up in her tail.\
name "Luka"
>Uwa!@> What are you doing all of a sudden!?\
name ""
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
if %con_hvoice=0 dwave 0,"voice\alice5_01.ogg"
name "Alice"
>Hasn't your lust accumulated on this long journey?
>I need to wring everything out every once in a while...\
name ""
dwavestop 0
name "Luka"
>Saying that...@> You're just hungry again!\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
if %con_hvoice=0 dwave 0,"voice\alice5_02.ogg"
name "Alice"
>Hmph. How rude.
>I need to do this, or you'll give in to a monster's temptation again.\
if %con_hvoice=0 dwave 0,"voice\alice5_03.ogg"
>But don't you think it's impolite?
>The Monster Lord is by your side... And you give in to other monster's temptations?\
name ""
dwavestop 0
name "Luka"
>I shook off that temptation! Remember!?\
name ""
>But it seems like she's ignoring me.@
>While still being held by Alice, she brings her chest toward my groin.\
name "Luka"
>...............\
name ""
>I can't help but stare at her huge breasts.\
if %con_hvoice=0 dwave 0,"voice\alice5_04.ogg"
name "Alice"
>What's wrong? Staring at my breasts so intently...\
name ""
dwavestop 0
name "Luka"
>I... I wasn't looking!\
name ""
if %con_hvoice=0 dwave 0,"voice\alice5_05.ogg"
name "Alice"
>Which reminds me... You're always sneaking looks at my chest.
>Do you like these breasts that much?\
name ""
dwavestop 0
name "Luka"
>Th...That's not it...@
>It's just hard to... Ignore something so large swaying by my side when I walk...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice5_06.ogg"
name "Alice"
>What a helpless guy.
>Well then... Shall I play with you with the breasts you like so much?\
name ""
dwavestop 0
>Alice quickly strips off my clothes.@
mov %hseanwave,1:hseanwave
lsp 700,":a;chara\alice_h05_1.bmp",0,0:print 10,500
>And sticks my penis in between her big chest!\
name "Luka"
>Aaaa...\
name ""
>Alice's breasts are surprisingly soft.@
>Buried inside of them, they're gently pressing against my penis.\
>Wrapped tightly between them, it's as if I'm in a soft, warm heaven.\
if %con_hvoice=0 dwave 0,"voice\alice5_07.ogg"
name "Alice"
>Stealing those glances at my chest... Is this what you were imagining?
>Were you thinking of sticking yourself in between here?\
name ""
dwavestop 0
name "Luka"
>That... I wasn't...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice5_08.ogg"
name "Alice"
>Hehe... How long will you be able to say that?\
name ""
dwavestop 0
>Alice puts her hands on her breasts and starts to squeeze them together.\
>The pressure causes a sweet tightness to wrap around my penis.@
>It's as if I'm being buried in a soft paradise.\
name "Luka"
>Auuu...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice5_09.ogg"
name "Alice"
>Even with this, are you going to continue to be stubborn?
>Be honest... You wanted to do this, didn't you?\
name ""
dwavestop 0
name "Luka"
>I... Didn't...@> Auuu...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice5_10.ogg"
name "Alice"
>Hoora... Don't you want me to squeeze it out with my breasts?\
name ""
dwavestop 0
>Alice puts more force into her squeezing.@
>At times gently shaking her chest, I feel myself weaken as the stimulation gets more powerful.\
if %con_hvoice=0 dwave 0,"voice\alice5_11.ogg"
name "Alice"
>Horahora... Admit it.
>You've been interested in my breasts for a long time.\
name ""
dwavestop 0
name "Luka"
>N...No...@>Ahh!\
name ""
>Even during this tit fuck, I don't give in.@
mov %hseanwave,0:hseanwave
>Suddenly... The pressure in her chest loosened!\
if %con_hvoice=0 dwave 0,"voice\alice5_12.ogg"
name "Alice"
>If you won't admit it, I'll stop.
>Hehe... Is that alright with you?\
name ""
dwavestop 0
name "Luka"
>Eh...?\
name ""
>The stimulation from her breasts suddenly vanishes.@
>Along with the vanishing pleasure was a rising frustration.@
>It's as if I was left incomplete...\
if %con_hvoice=0 dwave 0,"voice\alice5_13.ogg"
name "Alice"
>...I see. You don't want to be exhausted by my chest.
>I was going to let you gush all of your semen out in my cleavage, too...\
name ""
dwavestop 0
name "Luka"
>Ahh...\
name ""
>With the pressure gone, all I can feel is her soft skin.@
>The tantalizing feeling of her soft skin forces my irritation to boil over.\
name "Luka"
>I... I looked...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice5_14.ogg"
name "Alice"
>Hm? I can't hear you...\
name ""
dwavestop 0
name "Luka"
>Alice's chest... I was looking at it a lot...@
>So... Don't stop...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice5_15.ogg"
name "Alice"
>Hehe... Did you finally admit it?\
name ""
dwavestop 0
>With a triumphant look on her face, Alice laughs.@
mov %hseanwave,1:hseanwave
>And quickly puts power back into her breasts!\
name "Luka"
>Ahhh!!\
name ""
>I'm attacked by the soft pressure of her breasts again, as I let out a moan at the sudden return of pleasure.\
if %con_hvoice=0 dwave 0,"voice\alice5_16.ogg"
name "Alice"
>Since you obediently admitted it, I'll give you a reward.
>Hoora... I'll finish you with my breasts!\
name ""
dwavestop 0
>Alice squeezes her breasts even tighter.@
>Like that, she starts to slowly move them up and down.\
>My penis rubs against her smooth skin with every movement.@
>With my entire penis stuck in her breasts, the stimulation causes my waist to shake.\
name "Luka"
>Ahh... Incredible...@
>I'm going to come in your breasts...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice5_17.ogg"
name "Alice"
>Hehe... I don't mind.
>Scatter your seed all over my breasts!\
name ""
dwavestop 0
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice_h05_2.bmp",0,0
gosub *syasei2
>While wrapped in heaven, I ejaculate all over her chest, making a mess of her beautiful breasts.\
>I've covered her voluptuous breasts with my white semen...\
mov %hseanwave,0:hseanwave
if %con_hvoice=0 dwave 0,"voice\alice5_18.ogg"
name "Alice"
>Hehe... Well?
>How does it feel to cover your favorite breasts with your lust?\
name ""
dwavestop 0
name "Luka"
>Auu...\
name ""
>My body weakens as I feel the lingering feelings from my orgasm.@
>While Alice floats a superior smile, she starts to squeeze her breasts again.\
if %con_hvoice=0 dwave 0,"voice\alice5_19.ogg"
name "Alice"
>I'll squeeze out a little more semen with my breasts.
>This time... I'll do it more intensely!\
name ""
dwavestop 0
name "Luka"
>No w...@>Ahhh!\
name ""
mov %hseanwave,17:hseanwave
>Different from before, an intense stimulation attacks me.@
>Alice quickly moves her breasts up and down in opposite directions.\
>Stuck in her breasts, her quick movements cause me to yell out in pleasure.\
name "Luka"
>Ahh...@> If you do that...!\
name ""
>Sweat drips down her chest and combines with the smooth feeling of her skin.\
>At the same time as her alternating movements, she randomly changes the pressure.\
>Sometimes squeezing both, sometimes loosening...@
>Captured in between her breasts, I tremble in the overwhelming pleasure.\
if %con_hvoice=0 dwave 0,"voice\alice5_20.ogg"
name "Alice"
>Horahorahora... How long can you endure this?
>You're already starting to leak...\
name ""
dwavestop 0
name "Luka"
>Auuu...\
name ""
>Buried in her breasts, the soft pressure squeezes against the base of my tip.@
>Crushed between her, the elastic feeling of her breasts pushes back against my penis.\
>Tasting the pressure at the same time as her quick movements, I feel myself moving towards another height.\
>My pre-come starts to leak out of me, slowly making her breasts become stickier.\
if %con_hvoice=0 dwave 0,"voice\alice5_21.ogg"
name "Alice"
>Making my breasts dirty... Haha, what a luxury.
>Now, it's time for me to squeeze it out.\
name ""
dwavestop 0
>Alice triumphantly announces that she's going to make me come.@
>As if in a last spurt, she moves her breasts up and down faster than before.\
>Crushed between the alternating movements of her breasts, I easily surrender to the desire to release.\
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice_h05_3.bmp",0,0
gosub *syasei2
>My penis twitches as I ejaculate, making Alice's chest even dirtier.\
if %con_hvoice=0 dwave 0,"voice\alice5_22.ogg"
name "Alice"
>Haha... Making your favorite breast so dirty. Are you satisfied?
>Next will be just a little extra service...\
name ""
dwavestop 0
name "Luka"
>Eh...?@> There's more...?\
name ""
>Alice's tongue expands as it reaches down to my penis between her breasts.@
>Like that, she starts to lick me between her breasts.\
name "Luka"
>Ah! Ahh!!\
name ""
if %con_hvoice=0 dwave 0,"voice\alice5_23.ogg"
name "Alice"
>You should feel honored to be licked by me...\
name ""
dwavestop 0
>Alice's tongue wraps around my penis.@
>From the back of my penis to the tip, her tongue gently licks me.\
>The amazing pleasure causes me to become paralyzed in the sensations.\
if %con_hvoice=0 dwave 0,"voice\alice5_24.ogg"
name "Alice"
>Hoora... It's not just the tongue.\
name ""
dwavestop 0
>Saying that, she starts to squeeze her breasts together again.@
>Just like before, she squeezes me between her as she alternates her breasts up and down.\
>But this time her tongue is gently licking me at the same time.@
>My body writhes as the various stimulations combine.\
name "Luka"
>Aiee!@>Ahhhh!!\
name ""
if %con_hvoice=0 dwave 0,"voice\alice5_25.ogg"
name "Alice"
>Sheesh, how childish...
>It's so easy to make you ejaculate.\
name ""
dwavestop 0
>The movement of her tongue starts to become more powerful.@
>Tightening around me, the tip of her tongue starts lick up and down the back of my penis.\
>At the same time, the rhythmic movements of her breasts continue.@
>The overpowering stimulations cause me to thrust my waist upward at each of her movements.\
if %con_hvoice=0 dwave 0,"voice\alice5_26.ogg"
name "Alice"
>Hahaha... Your waist is shaking.
>Your male instinct is making you shake your waist while being squeezed by my breasts...\
name ""
dwavestop 0
name "Luka"
>Auuu...\
name ""
>While she taunts me, I'm already at the edge of another orgasm.@
>Giving myself to Alice, I drown in the pleasure she's giving me.\
>Being squeezed like this... I accept it with joy.\
if %con_hvoice=0 dwave 0,"voice\alice5_27.ogg"
name "Alice"
>Hehe... Are you a prisoner to my breasts?
>Then, I'll finish you off again.\
name ""
dwavestop 0
>Tightly squeezing me with her breasts one last time, her tongue violently licks the tip of my penis.\
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice_h05_4.bmp",0,0
gosub *syasei2
>Giving in to the pleasure, I explode again, covering her tongue and breasts with more of my semen.\
mov %hseanwave,0:hseanwave
if %con_hvoice=0 dwave 0,"voice\alice5_28.ogg"
name "Alice"
>Mmm... Your semen is delicious as usual.
>I want more... But are you at your limit?\
name ""
dwavestop 0
name "Luka"
>Auuu...\
name ""
>After the sweet sense of release washes over me, my strength fades.@
>It feels as though my whole body is melting in the pleasure...\
if %con_hvoice=0 dwave 0,"voice\alice5_29.ogg"
name "Alice"
>If I did any more, you might break...
>Well, I'll let you go with that today.\
name ""
dwavestop 0
name "Luka"
>Auuu...\
name ""
gosub *anten
>Still between her breasts, I fall into a sweet exhaustion.@
>Alice's tit sex drove me to fainting...\
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_alice5,1
goto *sean0135a



*sean0135a

bgmstop
sean_change "bg062"
bgm "bgm\sabaku.ogg"
>Thus, the next morning comes.\
>We left Sabasa Castle and are in the desert again.@
>Our next destination is...\
r@k@\
mov %genzaiti,7
mov %gloval1_story_sinkou,5:gosub *savegloval1
goto *map3



*sean0136

gosub *genzaiti_bg
name "Luka"
>Alright! Let's go to the Pyramid!\
name ""
>It's already been a few days since the Princess was kidnapped.@
>If I don't hurry, she might be put in worse danger.\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Hmph... Another detour. But I'll tolerate it this time.\
>The Sabasa King doesn't seem like a bad man.@
>If it was done by one of my cute subordinates, I can't overlook it.\
name ""
>How rare for her not to complain...@
>But I think she's really after that reward...\
>Decided on our destination, we head toward the Pyramid.\
dwave 1,"se\asioto2.ogg"
sean_change "bg062"
name "Luka"
>This is the Pyramid... It's bigger than I expected!\
name ""
>I look up at the Pyramid as I whistle in wonder.\
>The kidnapped Princess was taken here...@
>I have no choice but to break in and rescue her!\
>But at that moment...\
lsp 700,":a;chara\sara_st01r.bmp",0,0:print 10,500
name "Female Soldier"
>This is the Pyramid... It's bigger than I expected!\
name ""
>A female soldier looks up at the pyramid and whistles, much like I did.\
name "Luka"
>Excuse me... Do you have business in the Pyramid as well?\
name ""
name "Female Soldier"
>I do... Who are you?\
name ""
name "Luka"
>Err...\
name ""
>Is this another Hero that the the King requested assistance from?\
>But I was told to keep it a secret, so I better play it safe...\
name "Luka"
>Err...@> Are you going to help the person caught in the Pyramid too?\
name ""
lsp 700,":a;chara\sara_st04r.bmp",0,0:print 10,500
name "Female Soldier"
>Eh...?@> There's someone caught inside?\
name ""
>The female soldier looks surprised.@
>It looks like she doesn't know about the kidnapping...\
name "Luka"
>Then what business do you have in the Pyramid?\
name ""
lsp 700,":a;chara\sara_st01r.bmp",0,0:print 10,500
name "Female Soldier"
>It's not important to you...@
>...Well, I don't want you to think I'm a thief trying to steal from the Pyramid or anything.\
>I want to take the [Dragon Seal Trial] inside this Pyramid.@
>I want to do it for my love...\
name ""
name "Luka"
>For the one you love?@>A trial?\
name ""
>I remember hearing that the Pyramid was built for some trial.@
>But I think it was built for monsters... That can't be what she's after, right?\
name "Luka"
>It's dangerous to go alone.@
>I'm sure there are a lot of monsters inside.\
name ""
name "Female Soldier"
>I know that it's dangerous.@
>But... Even then, I still must go!\
name ""
name "Luka"
>..............\
name ""
>This girl is pretty stubborn. I doubt she'll listen to anything I have to say.\
>But as a Hero, I can't ignore her.\
name "Luka"
>...Alright, let's go together.\
name ""
lsp 700,":a;chara\sara_st04r.bmp",0,0:print 10,500
name "Female Soldier"
>Together?@>With you?\
lsp 700,":a;chara\sara_st01r.bmp",0,0:print 10,500
>Well, having company is good...@
>...But are you just going to be a burden?\
name ""
name "Luka"
>I was wondering the same of you...\
name ""
>I don't know how skilled she is...@
>At first glance, she seems like a normal soldier.\
lsp 700,":a;chara\sara_st02r.bmp",0,0:print 10,500
name "Female Soldier"
>...Well, fine.@> Even if it's your first time searching a dungeon, since you're an adventurer you should have at least a little experience fighting.\
>You can give me some support.\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-120,0
lsp 701,":a;chara\sara_st01r.bmp",160,0:print 10,500
name "Alice"
>Go ahead.@
>I'll just wait here.\
name ""
name "Luka"
>Oh? You aren't coming?\
name ""
lsp 700,":a;chara\alice_st14b.bmp",-120,0:print 10,500
name "Alice"
>There isn't any food in an ancient ruin like that.\
name ""
name "Luka"
>Sheesh...\
name ""
>I guess it will just be me and this girl in the Pyramid then.\
csp 701
lsp 700,":a;chara\sara_st01r.bmp",0,0:print 10,500
name "Luka"
>Shall we go...@> What's your name, by the way?\
name ""
lsp 700,":a;chara\sara_st03r.bmp",0,0:print 10,500
name "Female Soldier"
>...How rude.@
>Shouldn't you introduce yourself first?\
name ""
name "Luka"
>Ah, sorry...@> I'm Luka. A Hero...@> apprentice...\
name ""
lsp 700,":a;chara\sara_st02r.bmp",0,0:print 10,500
name "Female Soldier"
>I'm Sara.@
>I'm aiming to be the top swordswoman.@>But I'm still in training...\
name ""
>After our introductions, Sara and I head into the Pyramid.\
dwave 1,"se\asioto2.ogg"
sean_change "bg068"
bgm "bgm\dungeon3.ogg"
>Sara and I pass through the narrow stone hallways.\
lsp 700,":a;chara\sara_st02r.bmp",0,0:print 10,500
name "Sara"
>By the way Luka, was that silver haired woman your lover?\
name ""
name "Luka"
>That isn't it!@
>She's...@> My travel partner...\
name ""
>I can't tell her she's the Monster Lord...\
name "Luka"
>By the way, did you say you were doing some trial for your lover?\
name ""
lsp 700,":a;chara\sara_st03r.bmp",0,0:print 10,500
name "Sara"
>...Not my lover.@> It's a one-sided love right now...@
>My love lives in isolation, devoted only to the sword...\
>I doubt they even remember me...\
name ""
name "Luka"
>I see... That sounds rough...\
name ""
csp 700:print 10,500
>Going through such a dangerous trial for someone who may not even remember her...\
>As I sadly shake my head at her story, I see a monster blocking our path!\
r@k@\
goto *mummy_start



*sean0137

bgm "bgm\dungeon3.ogg"
name ""
r@k@\
lsp 700,":a;chara\sara_st04r.bmp",0,0:print 10,500
name "Sara"
>Eh...?@> Did we... win?\
name ""
>Sara timidly walks up to the pile of bandages.\
name "Sara"
>These bandages would be useful if we got injured...\
name ""
>Sara leans over and picks up one of the bandages.@
>But with a shout, she drops it and jumps back!\
lsp 700,":a;chara\sara_st03r.bmp",0,0:print 10,500
name "Sara"
>Ahh!@> Did they just move!?\
name ""
name "Luka"
>Ah... That Mummy Girl from before didn't vanish.@
>She just got sealed in those bandages.\
name ""
>I briefly explain how my sword works.\
lsp 700,":a;chara\sara_st01r.bmp",0,0:print 10,500
name "Sara"
>Wow... Where did you get such a crazy weapon like that?\
name ""
name "Luka"
>................\
name ""
>I can't say I got it from the Monster Lord...@
>While pretending like I didn't hear her question, I walk further inside.\
dwave 1,"se\asioto3.ogg"
sean_change "bg068"
lsp 700,":a;chara\sara_st01r.bmp",0,0:print 10,500
name "Sara"
>You're a lot stronger than you look.@
>But... You're still not as strong as they are...\
name ""
>Sara starts to talk again as we walk through the narrow passages.@
>She must be talking about her unrequited love.\
name "Luka"
>Are they really that strong?\
name ""
lsp 700,":a;chara\sara_st02r.bmp",0,0:print 10,500
name "Sara"
>Of course!@
>No matter how strong you get, you'll never match up.\
>I wonder where you are now...@>Ahh, my lovely Granberia...\
name ""
name "Luka"
>Eh...?@> Granberia?\
name ""
>...The Heavenly Knight?@
>No, that can't be.@> Someone must have named a son after her or something.\
name "Luka"
>Who... Is this Granberia?\
name ""
name "Sara"
>She's very famous!@> You must have heard of her.@
>She's one of the Four Heavenly Knights, wielding a giant sword.\
name ""
>...It really is that Granberia.\
lsp 700,":a;chara\sara_st03r.bmp",0,0:print 10,500
name "Sara"
>...What's with that strange face.@
>Is it so strange for a human to fall in love with a monster?\
name ""
name "Luka"
>No... That isn't it...\
name ""
>Love between man and monster is great...@
>But I've never heard of a female human and a monster falling in love...\
>More importantly, how did she fall in love with her?\
name "Luka"
>Hmm?@> This wind...@
>Sara, we'll talk later...@>A monster is coming.\
name ""
>The flow of wind started to become startled.@
>There must be a hostile enemy in front of us...\
lsp 700,":a;chara\sara_st04r.bmp",0,0:print 10,500
name "Sara"
>Wind?@>You can feel the wind?\
name ""
name "Luka"
>Something like that...\
name ""
>I stop and pull out my sword.@
>Sara takes out her sword in a panic too.\
>A monster appears in front of us, already in a fighting stance!\
r@k@\
goto *kobura_start



*sean0138

bgm "bgm\dungeon3.ogg"
name ""
r@k@\
name "Luka"
>Whew... She was pretty troublesome.\
name ""
lsp 700,":a;chara\sara_st04r.bmp",0,0:print 10,500
name "Sara"
>It's a cobra this time...\
name ""
>Sara pokes the now sealed Cobra Girl with her sheathe.\
name "Luka"
>It's not nice to bully them.\
name ""
dwave 1,"se\escape.ogg"
>The cobra slithers away after being poked by Sara.\
lsp 700,":a;chara\sara_st01r.bmp",0,0:print 10,500
name "Sara"
>You're amazing.@
>Carrying such a powerful sword, and able to use the power of the wind...\
name ""
name "Luka"
>Ah... T...thanks...\
name ""
>Happy at having a traveling companion praise me for the first time, I awkwardly respond.\
dwave 1,"se\asioto3.ogg"
sean_change "bg068"
name "Luka"
>Can I ask you a question?@
>How did you fall in love with Granberia?\
name ""
>Just what happened that made her fall in love?@
>It's hard to imagine a dangerous monster like her being the object of one-sided love...\
lsp 700,":a;chara\sara_st02r.bmp",0,0:print 10,500
name "Sara"
>I'll never forget... It happened three years ago...\
name ""
csp -1:textoff
bg "bg\bg062.bmp",99,3000,"system\lngtwave.dll/vwi"
bgm "bgm\kiki2.ogg"
lsp 700,":a;chara\sara_st22.bmp",-160,0:print 10,500
gosub *setwindow_01p
name "Sara"
>S...Stop!@
>Don't come any closer!\
name ""
lsp 700,":a;chara\sara_st22.bmp",-160,0
lsp 701,":a;chara\sasori_st02.bmp",200,0:print 10,500
name "Scorpion Girl"
>Hehe... Let's do something fun together.@
>It's fun to play with women sometimes, too...\
>Hey... Do you want to become my plaything?\
name ""
name "Sara"
>Som...Someone!@> Help!\
name ""
lsp 700,":a;chara\granberia_st01.bmp",-160,0:print 10,500
name "Granberia"
>...Monster, what are you doing to the weak?@
>If you have time to play around, you have time to improve yourself.\
name ""
name "Scorpion Girl"
>Who are you?@> Some kind of ally of justice?@
>...This area is our territory!\
>Or... Did you want to become a plaything too?\
name ""
lsp 700,":a;chara\granberia_st04.bmp",-160,0:print 10,500
name "Granberia"
>...Pathetic. Unable to even tell the difference between us.@
>It seems I'll need to educate you.\
name ""
cspl 3,7
monocro #000000
print 10,1500
dwave 1,"se\slash.ogg"
wait 1000
dwave 2,"se\fire1.ogg"
wait 1000
dwave 3,"se\slash3.ogg"
wait 1000
monocro off
lsp 700,":a;chara\granberia_st01.bmp",-160,0
lsp 701,":a;chara\sasori_st03.bmp",200,0
print 10,1500
name "Scorpion Girl"
>Aieee!\
name ""
dwave 1,"se\escape.ogg"
lsp 700,":a;chara\granberia_st04.bmp",-160,0
csp 701:print 10,500
name "Granberia"
>Hmph. Only skilled at running away.\
name ""
lsp 701,":a;chara\sara_st21.bmp",200,0:print 10,500
name "Sara"
>Umm...@> Thank you!\
name ""
lsp 700,":a;chara\granberia_st01.bmp",-160,0:print 10,500
name "Granberia"
>...Don't misunderstand, I wasn't helping you.@
>I just don't like for the weak to be mistreated.\
>Make sure you learn from this and cease walking alone.\
name ""
name "Sara"
>Y...Yes! I understand.@> Umm... Could you tell me your name?\
name ""
lsp 700,":a;chara\granberia_st04.bmp",-160,0:print 10,500
name "Granberia"
>...Granberia, of the Four Heavenly Knights.\
name ""
dwave 1,"se\asioto2.ogg"
csp 700:print 10,500
lsp 701,":a;chara\sara_st23.bmp",200,0:print 10,500
name "Sara"
>What a wonderful woman...\
name ""
csp -1:textoff
bg "bg\bg068.bmp",99,3000,"system\lngtwave.dll/vwi"
bgm "bgm\dungeon3.ogg"
gosub *setwindow_01p
lsp 700,":a;chara\sara_st02r.bmp",0,0:print 10,500
name "Sara"
>...Like that.\
name ""
name "Luka"
>I see...\
name ""
>...That was surprisingly cliche.\
name "Sara"
>I haven't seen her since then.\
>But I want to meet her again...@
>That's why I've spent all of my time since then training.\
>I was a complete amateur three years ago... But now I'm pretty amazing, don't you think?\
name ""
name "Luka"
>Yeah... In your own way...\
>So why did you come to this Pyramid?@
>Are you just trying to test your own ability?\
name ""
lsp 700,":a;chara\sara_st01r.bmp",0,0:print 10,500
name "Sara"
>She's from the Dragon race...@
>So I studied them in great detail...\
>Apparently there's a law that dictates who they can get married to.@
>It seems like they can only get married to someone who has passed the [Dragon Seal Trial] here.\
name ""
name "Luka"
>I see... So that's why.@
>So Granberia has no idea you're doing this?\
name ""
name "Sara"
>Of course not... I haven't seen her since our first meeting.@
>I swore to myself that I wouldn't meet her until I was a suitable woman for her...\
name ""
name "Luka"
>That's awfully one-sided...\
name ""
>She's doing everything she can to prepare to marry Granberia...@
>And she's a fellow female...\
name "Luka"
>You know... It's possible it may not work even if you pass the trial...\
name ""
lsp 700,":a;chara\sara_st03r.bmp",0,0:print 10,500
name "Sara"
>That won't be an issue...@
>We can easily get over the racial barrier!\
name ""
>...More than race, I think the issue of your gender may be more of a potential problem.\
>......This girl is a bit strange.\
lsp 700,":a;chara\sara_st01r.bmp",0,0:print 10,500
name "Sara"
>By the way, why are you here?@
>You said someone was caught inside a little while ago...\
name ""
name "Luka"
>Ah... They are...@>...A noble.\
name ""
>Since this is a secret request, I'll be a little ambiguous.\
name "Sara"
>Is it someone you know?@>A woman?\
name ""
name "Luka"
>No... I haven't met her yet.\
name ""
name "Sara"
>Coming here for someone you've never met...@
>Are you here for love too?\
name ""
name "Luka"
>No, not love...@>More like...@> The obligation of a Hero, I suppose?\
name ""
name "Sara"
>Hmmm. You're strange.\
name ""
name "Luka"
>...............\
name ""
>Having such a strange girl calling me strange makes me a little depressed...\
name "Luka"
>Hmm... The flow of wind is odd...@
>Is this... A group of something...?\
name ""
>I have no doubt that there's a monster in front of us...@
>But it seems like there's more than one.\
lsp 700,":a;chara\sara_st04r.bmp",0,0:print 10,500
name "Sara"
>More wind powers...?@
>I want them too...\
name ""
name "Luka"
>They're coming!@>Don't let your guard down!\
name ""
>I take out my sword as the monsters surround us!\
name ""
r@k@\
goto *lamias_start



*sean0139

bgm "bgm\dungeon3.ogg"
name ""
r@k@\
name "Luka"
>Are you ok, Sara?\
name ""
lsp 700,":a;chara\sara_st03r.bmp",0,0:print 10,500
name "Sara"
>Hey... Am I useless...?\
name ""
name "Luka"
>Well...\
name ""
>She isn't useful at all, but I can't just say it to her face like that...@
>I mumble unintelligibly as I keep walking further into the Pyramid.\
dwave 1,"se\asioto3.ogg"
sean_change "bg069"
name "Luka"
>Where is this?\
name ""
>This place is very different from the narrow hallway.@
>Did we finally reach the deepest part of the Pyramid?\
lsp 700,":a;chara\sara_st01r.bmp",0,0:print 10,500
name "Sara""
>Sphinx is supposed to be in the deepest part of the Pyramid...\
name ""
>Sara explains as she walks around restlessly.\
csp 700:print 10,500
name "Luka"
>...What the!?\
name ""
>A grave wind surrounds my body.@
>Something crazy is nearby!\
name "???"
>You finally reached here, oh weak humans.\
name ""
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\sphinx_st01.bmp",0,0:print 10,500
>An extremely strong looking monster appears in front of us.\
>The sense of power coming off her is leagues above the previous monsters.@
>I don't think I'd be a match for her as I am now...\
name "Sara"
>Are you Sphinx?\
name ""
name "???"
>Indeed.@>I am the master of the Pyramid.\
name "Sphinx"
>I am the judge that watches over the deaths of those who would attempt the [Dragon Seal Trial].\
name ""
name "Sara"
>So you're the final judge of the trial?\
name ""
name "Sphinx"
>Correct.@
>If I deem you unworthy, I shall swallow you whole.@
>...Do you still wish to continue?\
name ""
name "Luka"
>Eh...!?\
name ""
>That would be a problem...@
>I don't want to deal with this trial, I just want to save the Princess...\
name "Luka"
>Excuse me... Could I ask a question?\
name ""
name "Sphinx"
>I have no reason to answer your questions.\
>The only thing I will acknowledge from you is whether you are taking the trial or not.@
>If you aren't going to take it, leave at once.\
name ""
name "Luka"
>...I understand. I'll take it.\
name ""
>So she won't even acknowledge me if I'm not taking the trial...@
>I guess I'll have to go along with it then.\
name "Sara"
>So what is the final trial?@
>Do we have to fight you?\
name ""
name "Sphinx"
>It is not possible for a mere human to beat me.@
>It would be a pointless trial if the final task was impossible.\
name ""
name "Sara"
>What am I supposed to do then?\
name ""
name "Sphinx"
>The final trial is a test of your mental power.@
>You must answer my riddles.\
>I prefer the wise...@
>Fools deserve to be nothing but food.\
name ""
name "Luka"
>Riddles...?\
name ""
>Uh oh, thinking things through is not my strong point.\
name "Luka"
>Sara... Is this going to be ok...?\
name ""
name "Sara"
>Of course!@> Probably.@
>I studied a lot growing up after all...\
name ""
name "Luka"
>Alright!@> I'll count on you, then!\
name ""
>Sara and I turn towards the Sphinx as we await her first question.\
r@k@\
goto *sean0140



*sean0140

if %continue=1 bgm "bgm\boss0.ogg"
if %continue=1 lsp 700,":a;chara\sphinx_st01.bmp",0,0
if %continue=1 bg "bg\bg069.bmp",10,5000
if %continue=1 gosub *setwindow_01
mov %continue,0
name "Sphinx"
>Now, I ask of thee.@
>[What goes on four legs at dawn, two at noon, and three at dusk?]\
name ""
name "Luka"
>Eh...?\
name ""
>Such a widely known riddle is the final trial?@
>Even I've heard of this one before.\
>I shout out before Sara...\
csel "Human!",*sean0140a,"Me!",*sean0140b,"You!",*sean0140c



*sean0140a

name "Luka"
>A human!\
name ""
name "Sara"
>Even a child has heard that one...\
name ""
>That was easy.@
>Wait... Was the riddle a trick?\
name "Sphinx"
>...Correct.@
>Four as a baby crawling.@> Two as an adult walking.@
>Three as an elder supported by a cane.\
>Not that I needed to explain to someone who answered correctly.\
name ""
>The Sphinx's eyes narrow.@
>Was that really the final trial? That was kind of anticlimactic.\
goto *sean0141



*sean0140b

name "Luka"
>I do!\
name ""
name "Sara"
>Ehhh!?\
name ""
>I shouted out with full confidence.\
name "Sphinx"
>Oh?@>An interesting response.@
>Certainly you yourself are the answer...\
>Four as a baby crawling.@> Two as an adult walking.@
>Three as an elder supported by a cane.\
>That is you, a human.\
name ""
name "Luka"
>Ah! I got it right!?\
dwave 1,"se\damage.ogg"
>Ouch!\
name ""
>Sara slaps my head with the sheathe of her sword!\
name "Sara"
>Think before you speak you idiot!@
>It's lucky that she interpreted it that way... Sheesh.\
name ""
name "Luka"
>You're just mad I answered first...\
name ""
goto *sean0141



*sean0140c

name "Luka"
>That's you!\
name ""
name "Sara"
>Ehhh!?\
name ""
>I shouted out with full confidence.\
name "Sphinx"
>Me...?@
>You failed quickly, boy.\
>As we agreed, I shall eat you.\
name ""
goto *sean0143



*sean0141

name ""
r@k@\
name "Sphinx"
>...Then we shall proceed with the next question.@
>[Why am I asking you riddles?]\
name ""
name "Luka"
>Eh...!?\
name ""
>The trial isn't over yet?\
name "Luka"
>Do you know the answer, Sara?\
name ""
name "Sara"
>...............\
name ""
>Sara slowly shakes her head no.\
>Besides, what the hell kind of riddle is this?@
>Isn't she just asking us about her own personal motive?\
>No matter how smart Sara is, how could she know what Sphinx is thinking?\
>Why is she asking us riddles...?\
csel "To understand man's transience?",*sean0141a,"Because you like riddles?",*sean0141b,"It's just a bad habit?",*sean0141c



*sean0141a

name "Luka"
>To understand the transience of man...?\
name ""
>If I remember right...@
>My mother told me a riddle like that a long time ago...\
name "Sphinx"
>...That's correct, boy.\
>The life of a human is frail and short.@
>Yet mine is so long...\
name ""
>The Sphinx's face slowly turns sorrowful.\
goto *sean0142



*sean0141b

name "Luka"
>...Because you just like riddles?\
name ""
name "Sphinx"
>...A fool reached this far?@
>Fools shall be eaten!\
name ""
goto *sean0143



*sean0141c

name "Luka"
>Err... It's just a bad habit of yours?\
name ""
name "Sphinx"
>Phh...@> Hahahahaha!@
>What an interesting response, boy.\
>I don't even know myself if it's just a habit of mine now.\
>I've asked that question to everyone who has come before me...@
>For hundreds of years... Nobody has ever responded with that.\
name ""
name "Luka"
>...............\
name ""
>My careless answer seems to have made the Sphinx laugh...@
>Is this good?@>Or bad...?\
name "Sphinx"
>That isn't quite the answer, but I shall accept it.@
>Perhaps it is a habit after hundreds of years.\
>After that man died... For so long...\
name ""
>The Sphinx's laughing face slowly turns sorrowful.\
goto *sean0142



*sean0142
name ""
r@k@\
name "Sphinx"
>Now, the final question.@
>In other words, this shall decide everything.\
name ""
name "Luka"
>................\
name ""
>Sara and I both hold our breath.@
>Finally, the last question...\
name "Sphinx"
>[Why are you taking this trial?]\
name ""
name "Luka"
>Eh...?\
name ""
>The last question is... Why we're taking the trial?@
>Isn't that more like... An interview question?\
>Can I even answer this?@
>Should I answer honestly...?\
csel "I got dragged into it",*sean0142a,"For love and peace!",*sean0142b,"Leave it to Sara",*sean0144



*sean0142a

name "Luka"
>I got dragged into it.\
name ""
>I answer honestly.\
name "Sphinx"
>...A new height has been reached in idiocy.@
>Fools shall be eaten!\
name ""
goto *sean0143



*sean0142b

name "Luka"
>For love and peace!\
name ""
>I answer, full of confidence.\
name "Sphinx"
>...How does love and peace relate to this trial?@
>Explain.\
name ""
name "Luka"
>That... is...\
name ""
>...I don't have an answer.@
>I guess that isn't really related to the trial...\
name "Sphinx"
>Giving an annoying answer without thinking...@
>In other words, what a fool would say.\
>And fools shall be eaten!\
name ""
goto *sean0143



*sean0143

bgm "bgm\boss1.ogg"
mov %nowmusic,2
>An intense thirst for blood emanates from Sphinx!@
>It appears we failed the final trial!\
name "Sara"
>Wait!@>I didn't have anything to do with that!@
>Luka answered on his own!@>Kyaa!\
name ""
dwave 2,"se\fall1.ogg"
>A trap door opens beneath Sara, causing her to fall through!@
>Crap! Where did she go!?\
name "Luka"
>Guh...@> What did you do with Sara...?\
name ""
name "Sphinx"
>Worry about yourself, boy.@
>That woman shall be free.@>You shall be eaten.\
name ""
name "Luka"
>You let her go...?@> Why?\
name ""
name "Sphinx"
>She is like me.@
>I have no desire to eat one who shares my blood.\
>Your foolishness ends here.@
>Now, I shall swallow you whole!\
name ""
goto *sphinx_start



*sean0144

name "Luka"
>...I'll leave it to you, Sara.\
name ""
name "Sara"
>Eh...?@> Me...?\
name ""
>Sara has a blank look on her face.\
name "Sphinx"
>...Do you not have an answer?@
>If you do not give me your reason, I shall not acknowledge you.\
name ""
name "Luka"
>...To begin with, I didn't come here to take the trial.@
>I came here for another reason, but decided to go with Sara.\
>That's why I don't have the ability to answer your question.@
>The one who should answer is Sara.\
name ""
name "Sphinx"
>Hmph. Your words are true.@
>Then, I shall ask the girl.\
>Why are you taking this trial?\
name ""
name "Sara"
>I'm sorry, but I can't give a good reason...@
>I'm just doing this to get closer to the one I love!\
name ""
name "Sphinx"
>.............\
name ""
>Sphinx falls silent at Sara's words.\
name "Sara"
>What... Is that not good enough?@
>Would [For honor] or [For justice] have been better?\
name ""
name "Sphinx"
>Why would you hesitate to answer with that?\
>This [Dragon Seal Trial] is intended to be for marriage between man and monster.@
>However none have attempted it thus far with that as their reason.\
>So far, the desire for the riches contained in this Pyramid have been their goal.@
>Are you truly taking this trial in the name of love?\
>[Four legs at dawn, two at noon, and three at dusk]. That is, a human.\
>Nobody actually thinks about the meaning of this riddle.@
>Attempting to marry a monster... Do you not realize the fatal flaw? The short lived nature of man?\
name ""
name "Sara"
>In other words...@
>Even if a human marries a monster, they will never live as long as their partner?\
name ""
name "Sphinx"
>...Correct.@
>It is inevitable that the monster will be forced to watch their partner die.\
>The human may have had a satisfactory life...\
>But the monster will be forced to live on, separated from their love for far too long...\
name ""
name "Sara"
>Well... That...@
>Wait... Are you talking about yourself!?\
name ""
bgm "bgm\hutuu2.ogg"
lsp 700,":a;chara\sphinx_st03.bmp",0,0:print 10,500
name "Sphinx"
>A thousand years ago, I loved a human.@
>He was the Hero Sabasa, the [Emperor of the Burning Sands].\
name ""
name "Sara"
>Eh...!?\
name ""
name "Luka"
>The first King!?\
name ""
name "Sphinx"
>Correct. Our child became the next Lord of Sabasa Castle.@
>For generations the descendants of our child have ruled over this land.\
name ""
name "Luka"
>So that's what happened...\
name ""
>I have heard that monster blood was mixed in the royal family...@
>That monster was Sphinx?\
name "Sphinx"
>My love slowly aged, as I could do nothing but watch him die.@
>I wanted to use my magic to turn him into a monster to prolong his life...\
>But he refused.@
>He wished to face his death as a human.\
>We were together until his death.@>Then I was alone...\
name ""
name "Sara"
>..................\
name ""
name "Sphinx"
>It was possible for me to die as a human.@
>There is power in this world that can seal a monster as a human.\
>If I used that, I could have met death together with him.@
>...But I did not.@
>I was scared of death.\
>If my love and I both die, none would remember him in this world.@
>Having every memory of his vanish from this world terrified me.\
>Thus, I was separated from my love by death...@
>For a thousand years, I have been alone...\
name ""
name "Sara"
>............\
name ""
name "Sphinx"
>...Your name was Luka, was it not?@
>You also hold a strange fate.\
>If it was you, what would you have chosen?\
name ""
name "Luka"
>Eh...?@> Me....?\
name ""
r@k@\
csel "Live on, separated by death",*sean0144a,"Die with my love",*sean0144b,"Live together as monsters",*sean0144c



*sean0144a

name "Luka"
>...I would have lived on, separated by death.\
name ""
name "Sphinx"
>Live your natural life to its completion...@
>A cruel choice for the one who must live on.\
>If only you knew the solitude of the one who survives...@
>In place of that, it may have been preferable to die...\
name ""
goto *sean0146



*sean0144b

name "Luka"
>...I would have died together as humans.\
name ""
name "Sphinx"
>I would be lying if I said I did not regret my decision.@
>But above all, I was terrified of the memories of him vanishing from this world.\
>Had I died, I thought his existence would truly have been erased...\
name ""
goto *sean0146



*sean0144c

name "Luka"
>...I would have lived on together as monsters.\
name ""
name "Sphinx"
>I also considered forcing him to live on as a monster against his will.@
>But he was a very proud man.\
>To trample over that, I would have trampled his existence itself.@
>I could not do such a thing.\
>Should I have placed his life over his pride...?\
name ""
goto *sean0146



*sean0146

>She casts her sad gaze toward Sara.\
lsp 700,":a;chara\sphinx_st01.bmp",0,0:print 10,500
name "Sphinx"
>For one who loves a monster, the true trial is ahead.@
>That is all I wished to say.\
name ""
name "Sara"
>...I understand.@
>I will never forget your pain.\
>When I'm bound together with Granberia, what will I do...@
>When the time comes, I won't forget this.\
name ""
name "Luka"
>I... Won't forget either.\
name ""
>In a world where man and monster exist together, her story is critically important...\
bgm "bgm\epilogue.ogg"
lsp 700,":a;chara\sphinx_st02.bmp",0,0:print 10,500
name "Sphinx"
>You two have passed the trial.@
>Now, I shall present you with the proof of your accomplishment!\
name ""
name "Luka"
>Eh....!?\
name ""
dwave 1,"se\power.ogg"
>Suddenly, a small emblem of a dragon floats over the back of my hand for a few seconds before making a mark in my skin!\
name "Sara"
>What was that!?\
name ""
>It seems as though the same emblem appeared over Sara's hand.@
>...I didn't particularly care about completing the trial, though.\
name "Luka"
>...Ah!@> I completely forgot!\
>The kidnapped Princess was taken here!\
name ""
lsp 700,":a;chara\sphinx_st01.bmp",0,0:print 10,500
name "Sphinx"
>I... know nothing about that.@
>I am the master of the Pyramid, I know everything that happens here.\
>There is no kidnapped Princess here.\
name ""
name "Luka"
>Eh...?@> The Princess of Sabasa... She should be here...\
name ""
lsp 700,":a;chara\sara_st04r.bmp",0,0:print 10,500
name "Sara"
>What the hell are you talking about!?\
name ""
>Sara suddenly starts shouting at me.\
name "Luka"
>What's wrong, Sara?@>Do you know something?\
name ""
bgm "bgm\comi1.ogg"
lsp 700,":a;chara\sara_st03r.bmp",0,0:print 10,500
name "Sara"
>The Princess of Sabasa...@>Is me.\
name ""
name "Luka"
>Eh?@>.....Ehhhh!?\
name ""
>My eyes open wide as I stare at her in surprise.\
name "Luka"
>Three days ago a monster broke your window and kidnapped you...?\
name ""
name "Sara"
>I kicked out the window of my room and snuck out of the castle.@
>My father would never have allowed me to come here.\
name ""
name "Luka"
>A single word was left in horrible, hate-filled writing... [Pyramid]...?\
name ""
name "Sara"
>It's true I left a message with my destination...\
>But what the hell is with "horrible, hate-filled"!?@
>Is my handwriting really that bad!?\
name ""
name "Luka"
>...So you left the castle of your own free will?\
name ""
name "Sara"
>I thought there might be an issue in not coming back for three days...@
>But they thought I was kidnapped...?\
name "Luka"
>To think...@
>I was right next to the Princess the whole time...\
name ""
>I sigh as the power drains from my body.@
>After all that fighting, I could have been finished right from the start.\
bgm "bgm\epilogue.ogg"
lsp 700,":a;chara\sphinx_st01.bmp",0,0:print 10,500
name "Sphinx"
>...The issue seems to have been resolved.@
>I shall bestow this upon you as well.\
name ""
>Sphinx holds out a beautiful translucent yellow gem.\
if %item02=0 skip 7
name "Luka"
>This gem looks familiar...\
name ""
>...That's right.@
>When I defeated those bandits, I got a red one that looks similar.\
>Other than the color, it's identical...\
name "Sphinx"
>That is a magical item called the [Yellow Orb].@
>Though it has been kept in this Pyramid, it's no longer amusing to stop thieves and others from attempting to steal it.\
>Therefore, I shall give it to you.\
name ""
name "Sara"
>I'm not interested in magical items...@
>Take it, Luka.\
name ""
name "Luka"
>Eh...?@> You don't mind?@
>Then, I'll take it...\
name ""
>I don't know if it's useful, but it couldn't hurt to take it.\
dwave 1,"se\fanfale.ogg"
mov %item05,1
>[Yellow Orb] was obtained!\
if %item02=0 skip 3
>It looks like I have two of these orbs now...@
>But I don't know what to do with them...\
name "Luka"
>Hey, Sphinx...@
>What is this orb used for?\
name ""
name "Sphinx"
>It's used to revive the holy wings.@
>...But you need all six.\
>Sell it or use it as an ornament.@>Do what you wish with it.\
name ""
name "Luka"
>Ah... I see...\
name ""
>I don't really get it.@
>I put the strange gem into my bag.\
lsp 700,":a;chara\sphinx_st02.bmp",0,0:print 10,500
name "Sphinx"
>...I said I have lived in solitude and regret for years.\
>But now I see it was not in vain.@
>After a thousand years, I can once again see the flame that burned bright in his eyes...@> In you, Sara.\
name ""
name "Sara"
>Eh... In me?\
name ""
>Since Sara is the Princess, she must be a descendant of Sphinx...@
>Seeing something that reminds her of her lover after a thousand years must be shocking for her...\
name "Sphinx"
>...Now farewell, humans.@
>Like him, continue to live a noble life.\
name ""
dwave 1,"se\warp.ogg"
csp 700:print 10,500
>Leaving that final message, Sphinx vanishes.\
lsp 700,":a;chara\sara_st01r.bmp",0,0:print 10,500
name "Sara"
>...Even after a thousand years, she still loves him.@
>That's amazing...\
name ""
name "Luka"
>Yeah...\
name ""
>Her sad story is still leaving me short of words.@
>But I'm glad the Princess is safe.\
name "Luka"
>...It was a pointless quest after all.@
>You weren't even kidnapped.\
name ""
lsp 700,":a;chara\sara_st02r.bmp",0,0:print 10,500
name "Sara"
>It wasn't pointless...@
>I hate to say it, but without you I never would have made it this far.\
>...Thank you.\
name ""
name "Luka"
>I guess it wasn't all a waste to come here...\
name ""
>Sara narrows her eyes as she looks at the emblem on the back of her hand.\
name "Sara"
>Please wait, Granberia...@
>I'll meet you again soon for sure...\
name ""
name "Luka"
>Are you going to meet her?@> At the Monster Lord's castle?\
name ""
name "Sara"
>That would be the best place to start for sure...\
>But I heard that she was recently in Iliasburg.@
>I wonder if she's still around here somewhere?\
>Ahh... I hope she comes to Sabasa Castle!\
name "Luka"
>.................\
name ""
>If she came, the castle would be in even worse shape...\
name "Luka"
>...Anyway, let's get out of here.@
>There's nothing left for us to do in here.\
name ""
name "Sara"
>That's true...@> Then I'll trust you to escort me, little Hero!\
name ""
>I guess she is a Princess after all...@
>Could this be interpreted as a Hero saving a Princess?\
>It's not quite what I imagined...@
>We walk out of the Pyramid as I try to think of how to interpret the result of my rescue.\
r@k@\
dwave 1,"se\asioto3.ogg"
sean_change "bg045"
bgm "bgm\castle2.ogg"
lsp 700,":a;chara\sabasa_st02.bmp",0,0:print 10,500
name "Sabasa King"
>Hero!@>You saved the Princess!@
>As King of this country, I give you my thanks!\
>You are a true Hero!\
name ""
name "Luka"
>Th...Thank you...\
name ""
>Everyone still thinks Sara was kidnapped...@
>It's much better for Sara this way.\
>The King gets up from his throne and approaches me.\
name "Sabasa King"
>...And allow me to thank you again as a parent.\
>Luka!@>Thank you!\
>Thanks to you, my daughter was saved!\
name ""
name "Luka"
>Ah... Don't... mention it...\
name ""
>This feels like cheating.@
>The King puts back on a regal face as he sits on his throne again.\
lsp 700,":a;chara\sabasa_st01.bmp",0,0:print 10,500
name "Sabasa King"
>Now, as I promised.@>Sara will be your bride.\
name ""
name "Luka"
>...I must decline.@
>Sara has another in her heart.\
>I cannot trample her feelings by becoming her husband.\
name ""
>Sara and I practiced what we were going to say here...\
lsp 700,":a;chara\sabasa_st04.bmp",0,0:print 10,500
name "Sabasa King"
>Someone in her heart...?@
>Sa...Sara!?@>Is it true!?\
name ""
lsp 700,":a;chara\sabasa_st04.bmp",160,0
lsp 701,":a;chara\sara_st12r.bmp",-180,0:print 10,500
name "Sara"
>Your words make me glad, Hero.@
>Will you not support my love, father?\
name ""
name "Luka"
>I'll support your love, Princess.@
>King, would you also support your daughter?\
name ""
name "Sabasa King"
>Errrmm...\
name ""
>...Sheesh.@
>That's the end of the plan.\
>It looks like he really wants to question her though...@
>This is going just like Sara thought...\
lsp 700,":a;chara\alice_st11b.bmp",-120,0
lsp 701,":a;chara\sabasa_st02.bmp",160,0:print 10,500
name "Alice"
>...By the way, King. I'm hungry.\
name ""
>Uwa.@> What horrible timing, Alice.@
>You didn't even do anything!@> Your freeloading is ruining it!\
name "Sabasa King"
>Yes, I can prepare something for you.@
>Please eat as much as you desire.\
name ""
>On that note, the feast started...\
sean_change "bg070"
bgm "bgm\dance2.ogg"
lsp 700,":a;chara\alice_st12b.bmp",67,0:print 10,500
name "Alice"
>Ooohhh... So this is the Sabasa Fish!@
>The lemon sauce looks amazing... I can't contain myself!\
name ""
>Alice attacks the food.@
>It appears standing outside the Pyramid doing nothing gave her quite the appetite.\
name ""
lsp 700,":a;chara\sabasa_st01.bmp",0,0:print 10,500
name "Sabasa King"
>By the way, Luka...\
name ""
>The King leans over and speaks softly into my ear.\
name "Sabasa King"
>What do you really think of marrying my daughter?\
name ""
name "Luka"
>You need to consider what your daughter thinks...@
>Besides, you can't give her away as a reward...\
name ""
lsp 700,":a;chara\sabasa_st03.bmp",0,0:print 10,500
name "Sabasa King"
>Can't you please reconsider?@
>Sara is my only daughter, she will be the Queen one day...@
>But... She's very... Tomboyish...\
name ""
>Yes, I'm quite aware of how much of a tomboy she is.@
>...Crap, I almost said that out loud.\
name "Sabasa King"
>Staying here as Sara's husband, and as the viceroy of Sabasa...@
>Please Luka... Don't you want that?\
name ""
name "Luka"
>I... That...\
name ""
>For some reason, he really wants me to marry her...@
>This is getting awkward...\
name "Luka"
>Oh?@>Speaking of Sara, where is she?\
name ""
>Even though there's such a huge party going, she isn't here.@
>Oh crap...@> Did she slip out of the castle again!?\
lsp 700,":a;chara\sabasa_st01.bmp",0,0:print 10,500
name "Sabasa King"
>Sara is still preparing.@
>Luka, why don't you go to her room and escort her here?\
name ""
name "Luka"
>Me?@
>Ok... I'll be right back with her, then.\
name ""
csp 700:print 10,500
>This is a good excuse to get away from his begging.@
>I excuse myself from the table and head to Sara's room.\
>But this is just the King's clever trap!\
dwave 1,"se\asioto3.ogg"
sean_change "bg067"
bgm "bgm\hutuu3.ogg"
name "Luka"
>Sara, are you still getting ready?@
>The feast already started...\
name ""
lsp 700,":a;chara\sara_st13r.bmp",0,0:print 10,500
name "Sara"
>What?@>I was finished a while ago.@
>My father told me to wait here until I was called...\
name ""
name "Luka"
>Eh...?\
name ""
>This isn't right...@
>As soon as I thought that, I heard something behind me!\
name "Sabasa King"
>Ergghh!@>Ahh!\
name ""
dwave 1,"se\break4.ogg"
>I hear something loud outside the door!\
name "Sabasa King"
>Oh, I'm sorry.@> It appears as though I crushed the doorknob.@
>It looks like we'll need to repair the door before we can open it.@
>I'll get a craftsman, so please wait one hour.\
name ""
name "Luka"
>Eh!?@> Wait, what the hell is that!?\
name ""
dwave 1,"se\door4.ogg"
>I try to open the door.@
>But with the doorknob crushed on the other side, I can't move it an inch.\
>Sara and I are trapped together in this room!\
name "Sara"
>Father!?@> What are you doing!?\
name ""
name "Sabasa King"
>I'll say it again.@> Please wait one hour while I get the craftsman.@
>Oh what bad luck.@>For a young man and woman to be alone in a room with nobody able to enter it no matter what.\
>But I'm glad it's Luka with you.@> Absolutely anything he does would be forgiven, since he's the Hero who saved you.\
>Well then, I won't be back for an hour!\
name ""
dwave 1,"se\asioto3.ogg"
>Shouting that, we hear the King loudly stomping down the hall.\
name "Luka"
>What should we do...?\
name ""
lsp 700,":a;chara\sara_st14r.bmp",0,0:print 10,500
name "Sara"
>Should we try to break the door or window?\
name ""
name "Luka"
>That would be bad...\
name ""
>Supposedly it's just a broken doorknob...@
>If they can fix it in an hour, I don't think it's worth destroying the furniture over.\
name "Luka"
>Let's just wait for an hour.\
name ""
name "Sara"
>I'm really sorry, Luka.@
>It just seems as though my father really likes you.\
name ""
>Sara sighs as she sits on the bed.\
lsp 700,":a;chara\sara_st12r.bmp",0,0:print 10,500
name "Sara"
>But... If you don't do anything in this situation, would you be shamed?@
>It may not be good enough, but how about I use my mouth to service you?\
name ""
name "Luka"
>Eh!?@> Ehhhhh!?\
>What the hell are you saying all of a sudden!?\
name ""
lsp 700,":a;chara\sara_st14r.bmp",0,0:print 10,500
name "Sara"
>At a time like this, a gentleman can't lose face.@
>...That's what was written in my lady training book.@> Is it wrong?\
name ""
name "Luka"
>I think it's wrong...\
name ""
>What kinds of things is she reading...?@
>Having the Princess learn such things...\
name "Luka"
>Besides, don't you love Granberia?@
>Why would you say something like that?\
name ""
lsp 700,":a;chara\sara_st12r.bmp",0,0:print 10,500
name "Sara"
>That's that, this is this.@
>I'm indebted to you, and wish to show my appreciation with my mouth.\
>You went through so much trouble, I need to repay you.\
name ""
name "Luka"
>Repay...?\
name ""
>Sara's sense of virtue is a little strange...@
>What kind of Royal family is this!?\
goto *sean0146a



*sean0146a

lsp 700,":a;chara\sara_st14r.bmp",0,0:print 10,500
name "Sara"
>...After saying that, if you refuse me, I'd feel embarrassed.@
>Come on!@> Take out your penis!\
name ""
name "Luka"
>Wah!@> Wait!\
name ""
r@k@\
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
lsp 700,":a;chara\sara_ha1r.bmp",0,0:print 10,500
>Sara pulls down my pants and underwear, and buries her face in my groin.@
>Like that, she sucks in my penis in a single bite.\
name "Luka"
>Ahh...\
name ""
mov %hseanvoice,1:hseanvoice
>The saliva in Sara's warm mouth swirls around my penis.@
>Having the Princess of a country doing this to me brings a strange excitement.\
name "Sara"
>Mmm... This is my first time doing it on the real thing...@
>I think I do it like this...@> *Lick*@>*Suck*\
name ""
>Sara closes her lips around my penis as her tongue starts to lick me.@
>Her short tongue clumsily licks and rubs against me.\
>As if exploring me, she licks the back of my penis and the tip in quick movements.\
>As she continues roughly licking me, Sara looks up at my face.@
>For some reason, I feel embarrassed as she closely watches my reactions to her movements.\
name "Luka"
>You shouldn't do this...@> Ahhh...\
name ""
name "Sara"
>Aha... That was a nice noise.@
>It isn't as hard to get men to cry out as I thought it would...\
>*Suck*@> *Lick*\
name ""
>Sara's tongue gradually picks up in speed.@
>As if getting used to my penis, she starts getting more aggressive.\
>The Princess of a country... Doing such an aggressive blowjob...@
>Just the thought of that sends excitement down my spine as my waist starts to tremble.\
name "Luka"
>Auu... Sara... That's good...\
name ""
name "Sara"
>Hahaha... Are you going to come?@
>*Suck*@> *Lick*\
name ""
>Happy that she's making me feel good, her tongue moves even faster.@
>Licking my penis up and down, she's making sure she tastes every inch of me in her mouth.\
>At the same time, she tightens her lips around me, as she makes her mouth narrower.\
>Between her aggressive tongue, warm saliva, and her tight lips, I feel myself quickly approaching an orgasm.\
name "Luka"
>Auu... I'm going to come soon...\
name ""
name "Sara"
>Then... Let me finish you off...\
name ""
>Sara smiles as she says that.@
mov %hseanvoice,2:hseanvoice
>Pleased with herself, her mouth gets even more violent.\
>Right now, the only purpose of Sara's soft mouth is to please me...\
>She forces the tip of my penis into her soft cheek as her tongue licks the back of my penis.\
>The sudden soft sensation forces me over the edge as I yell out.\
name "Luka"
>Ahh!@> I'm coming!\
name ""
>I'm going to shoot my semen in a Princess' mouth...
>Desperate to avoid defiling royalty like that, I hold on with all my power.\
>But the Princess won't allow that...\
name "Sara"
>...Don't do that.@>I'll make you come...\
name ""
>Sara reprimands me in a commanding tone.\
>As if giving in to her command, I stop trying to resist as I surrender to the soft feeling of her mouth.\
name "Luka"
>Ahhhh!!\
name ""
mov %hseanvoice,0:hseanvoice
gosub *syasei1
lsp 700,":a;chara\sara_ha2r.bmp",0,0
gosub *syasei2
>I pour out my semen in Sara's warm mouth.\
name "Sara"
>Mmm!\
name ""
>With a shocked expression on her face, Sara drinks down everything as I shoot it out.\
>While immersing myself in the suction in her mouth from her swallows, I bathe in the pleasure to the last drop.\
name "Sara"
>Bitter...@>And fishy...\
name ""
>Even though she says that, Sara's smile doesn't fade.\
name "Sara"
>Haha... So you couldn't resist it!@
>Am I really that good with my mouth?\
name ""
>Sara laughs triumphantly, as if happy at forcing me to do something.@
>But even with that, she doesn't take my penis out of her mouth.\
name "Sara"
>Now let me clean you up...@
mov %hseanvoice,3:hseanvoice
>Mmm...@> *Lick*@>*Lick*\
name ""
>Sara starts to lick my penis again, right after I ejaculated.@
>She carefully licks up all the leftover semen.\
>Her rough tongue shoots pleasure through me, as she cleans my sensitive penis.\
>The ticklish feeling of her tongue licking me causes my waist to shake.@
>Thanks to that, my dick gets hard again.\
name "Sara"
>...Oh?@> I thought it was supposed to get small...?@
>Men aren't finished until it shrinks, right?\
name ""
name "Luka"
>You don't...\
name ""
>Ignoring my words, Sara starts sucking on my penis again.@
>With long, deep sucking motions, she resumes her blowjob.\
name "Sara"
>...This is good.@
>I wanted to try that piston movement from the book.\
name ""
name "Luka"
>Eh?@>Ahhh!\
name ""
mov %hseanvoice,4:hseanvoice
>In the next moment, Sara suddenly starts pumping me back and forth.@
>All the way from the tip to the base, she forces me in and out of her narrow mouth.\
>With her rapid piston movement, the strength fades from my body as the pleasure forces itself into my body again.\
name "Sara"
>Mmmf...@>This is...@> Hard...\
>Come...@>Quickly...@> *Suck*@>*Suck*\
name ""
name "Luka"
>Auuu!\
name ""
>As if getting used to it, Sara's speed increases as she quickly pumps me with her mouth.\
>The feeling of her soft lips running back and forth around my penis as her tongue pushes against the tip of my penis is too much for me.\
name "Luka"
>Uaaa... Incredible...\
name ""
name "Sara"
>*Suck*@> *Lick*@>Is this better than before?@
>Ok... Time for the last spurt!\
name ""
>Sara tightens her lips around me as she sucks on me as hard as she can.@
>Like that, she starts to pump me even faster than before.\
>With the pleasure too amazing to contain myself, I grab onto Sara's head as she pumps me.\
name "Sara"
>Mmm...\
name ""
>But Sara grabs my arms with hers, and uses the leverage to move even faster.\
>With my arms held down by Sara's, I finally reach my limit.\
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\sara_ha3r.bmp",0,0
gosub *syasei2
name "Sara"
>Mmmmm!!\
name ""
>Sara sucks on me as she drinks down everything I shoot out.\
>With each spurt of my semen followed by Sara swallowing, it feels as though she's sucking it out directly from inside of me.\
>Awash in the pleasure, I was able to have everything sucked out by the Princess.\
mov %hseanvoice,0:hseanvoice
lsp 700,":a;chara\sara_st12r.bmp",0,0:print 10,500
name "Sara"
>Mmm... That's the end.@
>Was it good?\
name ""
>Sara smiles as she wipes away some leftover semen on her lips.@
>But her face is flushed with a triumphant smile, proud of her own skill.\
name "Luka"
>Auu...@> What did I just do with a Princess...\
name ""
>With this, I'm going to be forced to marry her, aren't I?\
>But what ended up happening left me dumbfounded...\
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_sara1,1
bgmstop
sean_change "bg045"
bgm "bgm\epilogue.ogg"
lsp 700,":a;chara\sabasa_st01.bmp",0,0:print 10,500
name "Sabasa King"
>Are you already leaving here?@>That is regrettable...\
name ""
lsp 700,":a;chara\sabasa_st01.bmp",-160,0
lsp 701,":a;chara\sara_st12r.bmp",190,0:print 10,500
name "Sara"
>Thank you for your kindness, Hero.@
>I shall pray to the goddess for safety on your travels.\
name ""
>Sara puts on a fake, gentle smile.@
>That's nothing like her smile from before...\
csp 701
lsp 700,":a;chara\sabasa_st03.bmp",0,0:print 10,500
name "Sabasa King"
>It seems as though my daughter put you through a lot of trouble.@
>Allow me to apologize.\
name ""
name "Luka"
>No, no... Don't worry about it...\
name ""
>It's true it was pretty troublesome...@
>But I won't say anything.\
lsp 700,":a;chara\sabasa_st02.bmp",0,0:print 10,500
name "Sabasa King"
>If you are ever nearby, please stop by again.@
>Well then, I wish you luck in your travels.\
>Your sword will surely save many more in the future.\
name ""
name "Luka"
>Thank you!\
name ""
>With our final goodbyes said, I leave the audience hall.\
dwave 1,"se\asioto3.ogg"
sean_change "bg065"
bgm "bgm\castle2.ogg"
lsp 700,":a;chara\sara_st12r.bmp",0,0:print 10,500
name "Sara"
>...Thank you, Luka.@
>If you weren't there, I would never have passed the trial.\
name ""
>Sara catches up to me as I'm leaving the castle and quietly whispers to me.\
name "Luka"
>Don't mention it... You did your best too.\
name ""
name "Sara"
>What are you going to do from now on?@>Continue traveling?\
>Making a world where man and monster can coexist... I want that, too...\
name ""
name "Luka"
>Thank you... I wish you luck with your dream, too.\
name ""
>A Princess in love with a monster...@
>I don't discriminate, but I know they will have a lot of issues.\
>Not to mention that they're both females...\
name "Sara"
>Next time you come to Sabasa, please visit.@
>I want to hear all about your travels.\
name ""
name "Luka"
>Of course... Well then, until next time!\
name ""
name "Sara"
>Goodbye!\
name ""
>With a final goodbye, I leave Sabasa Castle.\
dwave 1,"se\asioto3.ogg"
sean_change "bg062"
bgm "bgm\sabaku.ogg"
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Hmph.@>It looks like you got quite close to that Princess.\
name ""
name "Luka"
>Don't misunderstand...@
>We just sympathized with each other.\
name "Alice"
>Hmph...\
name ""
dwave 1,"se\ero_simetuke1.ogg"
>Alice's tail wraps around me!\
name "Luka"
>Hey! What are you doing!?\
dwave 1,"se\ero_simetuke1.ogg"
>Gyaaaa!\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Nothing...\
name ""
dwave 1,"se\ero_simetuke1.ogg"
>I don't know why, but she's squeezing me!@
>Why is she staring at me like that...\
csp 700:print 10,500
name "Luka"
>But... We had to trick the King...@
>I feel bad at that...\
name ""
>To make matters worse, he treated us so nicely...@
>And in return I lied to him... I feel guilty.\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...Don't worry, he already knew.\
name ""
name "Luka"
>Eh?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Didn't the King say it when you left?@
>[It seems as though my daughter put you through a lot of trouble.]\
name ""
name "Luka"
>Ah!@>He did!\
name ""
>I played the Hero who saved the Princess...@> He knew it the whole time, and just played along.\
name "Alice"
>That King is no oaf.@
>Even if I don't know the full story, I'm sure he knew everything from the start.\
>I'm sure he knew what you and Sara did in her room, too.@
>But he still treated you as a Hero...@>What a generous man.\
name ""
name "Luka"
>If he knew from the start, then why did he ask me to marry Sara?\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Sheesh, you know even less than I thought.@
>Is it the King's misjudgement, or...\
name ""
name "Luka"
>Or...?\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>Hmph... That depends on your future actions.@
>Now, let's keep traveling!\
name ""
name "Luka"
>Yeah... Let's go!\
name ""
csp 700:print 10,500
>Like that, we turn our backs to Sabasa Castle.@
>I can't forget about my original objective of meeting Gnome...\
>Now, where shall we head next...\
r@k@\
csp 700
mov %ivent06,1
mov %genzaiti,7
mov %gloval1_story_sinkou,5:gosub *savegloval1
goto *map3



*sean0149

gosub *genzaiti_bg
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Going back to the Pyramid?@
>There isn't anything left to do there...\
name ""
name "Luka"
>That's true...\
name ""
>I was just thinking of Sphinx, still alone there...@
>But even if I went back, I don't think anything new would happen.\
>Now, where shall we go next...\
csp 700
goto *map3



*sean0150

gosub *genzaiti_bg
name "Luka"
>...Let's go to the [Witch Hunt Village].@
>I have to stop that crazy Lord...\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>More of you thrusting your face into where it doesn't belong.\
>Isn't it a Hero's duty to fight monsters?@
>Why stick your head into humans killing each other?\
name ""
name "Luka"
>I can't allow that to happen...@
>No matter the reason, I don't want humans killing humans.\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Sheesh...\
name ""
>Alice sighs with an amazed look on her face.@
>But I won't change my mind.\
>Our next destination is that village.\
dwave 1,"se\asioto2.ogg"
bgmstop
sean_change "bg009"
bgm "bgm\yaei.ogg"
wait 1000
csp -1:textoff
monocro #eeeeee
bg "bg\bg151.bmp",99,5000,"system\lngtwave.dll/vwi"
bgm "bgm\enrika.ogg"
lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
gosub *setwindow_01p
name "Luka"
>Please!@>Sell me medicine!@
>At this rate... My mom...\
name ""
name "Owner"
>I won't sell medicine to an outsider's kid!@
>Get out of this village!\
name ""
name "Luka"
>Please...@>I need the medicine!\
name ""
name "Owner"
>Get.... Get out of here you stupid kid!@
>Are you trying to spread whatever sickness it is to me!?\
name ""
dwave 1,"se\dageki.ogg"
wait 400
dwave 2,"se\down.ogg"
name "Luka"
>No...@
>The medicine...@>I don't want my mom to die...\
name ""
name "Owner"
>If you come here again, I'll kill you!\
name ""
sean_change "bg007"
lsp 700,":a;chara\mob_sinkan.bmp",0,0:print 10,500
name "Luka"
>Mr. Priest... Please, can you help my mom somehow...?\
name ""
name "Priest"
>Listen... Return to your house right away.@
>It is important that you never leave your house, no matter what.\
name ""
name "Luka"
>But... But my mom!!\
name ""
name "Priest"
>Quick, leave this church!@
>Outsiders aren't wanted in this sacred place!\
name ""
name "Luka"
>But my mom...@>Please...\
name "Priest"
>Don't leave your house again!@
>Before you spread that sickness to us, die together!\
>That is what Ilias commands!!\
name ""
name "Luka"
>No... My mom...\
name ""
sean_change "bg002"
name "Luka"
>I'm sorry, mother...@
>They were sold out of medicine.@
>So I went to the church, and they said they would pray for you.\
name ""
name "Mom"
>...Luka, I made you do something painful.@
>You don't need to go back there ever again.\
name ""
name "Luka"
>No!@>If I don't...!\
name ""
name "Mom"
>...Luka, you must become a Hero.\
>Don't hold a grudge against the villagers...@
>Don't hold one against your father, either.\
>I know you'll...@> be a fine...@>Hero...\
>...................\
name ""
name "Luka"
>Mom.......?@
>Mommmmmmmm!!!!\
name ""
csp -1:textoff
bgmstop
monocro off
bg "bg\bg010.bmp",99,5000,"system\lngtwave.dll/vwi"
bgm "bgm\hutuu1.ogg"
gosub *setwindow_01p
name "Luka"
>My mother's death...@
>...That's a dream I haven't had in a while...\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...How strange, I had one too.@
>A dream from when I lost my mother long ago...\
name ""
name "Luka"
>Really? That's surprising...@
>Did you swear to your mother that you would do something, too?\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>................@> Who knows.\
name ""
name "Luka"
>I vowed to my mother that I would become a Hero.\
>But I only managed to be a fake Hero...@
>Do you think my mother is sad up in heaven?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>How would I know.@>I can't talk to the dead!\
name ""
name "Luka"
>That's true...@> Even if you could, you would probably run away.\
name ""
>Finished with packing up our camp, we continue on.@
>The [Witch Hunt Village] is just up ahead.\
dwave 1,"se\asioto2.ogg"
bgmstop
sean_change "bg072"
bgm "bgm\mura3.ogg"
>After a short walk, we arrived at the village.\
>A lifeless, dull village.@
>The atmosphere feels so oppressive, just standing at the gate makes it hard to breathe.\
name "Luka"
>This is the Witch Hunt Village?\
name ""
>So this is where the female Lord is catching travelers and villagers, labeling them [Witch], then torturing and executing them?\
>Blindly sending people to their death like that...\
name "Luka"
>Unforgivable!\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>...Well, what are you going to do?@
>To begin with, are you even capable of doing anything here?\
name ""
name "Luka"
>For now, I want to meet the Lord and tell her to stop.\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>...Are you an idiot?@
>Do you think she would just say "Oh, ok." or something!?\
name ""
name "Luka"
>I know it won't work.@
>But if she ignores me, I'll just stop her by force!\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Oh, so it's going to be a premeditated crime then. You barbarian.@
>You're pretty violent, you know.\
name ""
>...I don't care what you say.\
>What's going on here is absolutely wrong.@
>As I take my first step into the village...\
lsp 700,":a;chara\mob_obasan.bmp",0,0:print 10,500
name "Woman"
>Are you a traveler?@
>You must not enter this village.@> Turn back right away.\
name ""
>A female villager frantically warns me in a hushed voice.\
name "Woman"
>That silver-haired woman will be quickly caught.\
>But it isn't just women accused of being witches...@
>A young boy like you would be caught just as fast!\
name ""
name "Luka"
>...Thank you, miss.@
>But I...\
name ""
>As I started to respond...@
>Suddenly, two soldiers approached from behind!\
lsp 700,":a;chara\mob_heisi1.bmp",-160,0
lsp 701,":a;chara\mob_heisi1.bmp",160,0:print 10,500
name "Soldier A"
>Travelers!@
>Don't move!@>I need to inspect you first.\
name ""
name "Soldier B"
>Peasant!@
>What are you saying to these travelers?@>Are you a witch!?\
name ""
csp 701
lsp 700,":a;chara\mob_obasan.bmp",0,0:print 10,500
name "Woman"
>Th... They were just asking directions, sir!\
name ""
>The peasant backs away in a panic.\
name "Woman"
>I have to run...\
name ""
csp 700:print 10,500
>The woman whispers to us before she takes off.\
lsp 700,":a;chara\mob_heisi1.bmp",-160,0
lsp 701,":a;chara\mob_heisi1.bmp",160,0:print 10,500
name "Soldier A"
>Strangers, why have you come to this village?\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-120,0
lsp 701,":a;chara\mob_heisi1.bmp",160,0:print 10,500
name "Soldier B"
>You, woman!@>What's with the color of your hair!?@
>You must be a witch!\
name ""
>The two soldiers turn their gaze toward Alice.@
>One of the soldiers takes out something that looks like a knife.\
name "Soldier A"
>It's said that a witch doesn't bleed even when cut.@
>Therefore, just let me make a cut on your hand so we can check.\
>If you're not a witch, blood will come out.@>Do you understand?\
lsp 700,":a;chara\alice_st12b.bmp",-120,0:print 10,500
name "Alice"
>...Of course.@>This seems like it will be amusing.\
name ""
>Surprisingly, Alice holds out her hand as instructed.@
>The soldier grabs her hand...@>And cuts the back of her hand!\
lsp 700,":a;chara\alice_st11b.bmp",-120,0:print 10,500
name "Alice"
dwave 1,"se\damage.ogg"
>Ouch...\
name ""
>Then...@
>Blood starts to drip from her hand!\
name "Soldier A"
>Eh...!?\
name ""
name "Soldier B"
>What... Impossible!\
name ""
>The two of them stare at her hand in amazement.\
name "Soldier A"
>That's impossible!@> This knife...\
name ""
lsp 700,":a;chara\alice_st12b.bmp",-120,0:print 10,500
name "Alice"
>Oh, that knife?@>What about it?\
>Was the knife not supposed to cut me?\
name ""
>Alice has a sadistic smile on her face as she licks up her blood.\
name "Alice"
>Look, blood came out just like you wanted to see.@
>This proves I'm not a witch, don't you agree?\
name ""
lsp 700,":a;chara\mob_heisi1.bmp",-160,0
lsp 701,":a;chara\mob_heisi1.bmp",160,0:print 10,500
name "Soldier A"
>No way...\
name ""
name "Soldier B"
>You're... A real...\
name ""
>The two soldiers start to tremble.@
dwave 1,"se\asioto1.ogg"
cspl 700,701:print 10,500
>They throw the knife away and run!\
name "Luka"
>...I knew it, this knife...\
name ""
>I picked up the knife and inspected it.\
>When you apply a little pressure to the blade, it retracts back into the handle.@
>A simple trick knife.\
>Like that, blood wouldn't come out even if you moved it on the back of someone's hand.\
>This must be how they were framing people as witches...\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Hmph.@>Running away at just being a little surprised.@
>They're just acting arrogant because of their Lord.\
name ""
name "Luka"
>Unforgivable...@
>Using this, they're sending so many to their death...\
name ""
>Anger starts to fill me...@
>But before I start, I need to collect some information.\
>Since the soldiers were driven off, I should be able to talk to some people.\
r@k@\
csp -1:print 10,500
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
csp 700:csp 611:cspl 3,7
gosub *city14_main
gosub *setwindow_01p
name "Luka"
>I won't forgive her!@
>Is that her house!?\
name ""
>A huge mansion sits in the middle of the village.@
>That has to be where she is.\
dwave 1,"se\asioto2.ogg"
>I start to run toward the mansion.\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Sheesh... You're really into this aren't you?\
name ""
>Alice says to my back.\
name "Luka"
>You don't have to come, Alice.@
>This is a human problem, after all.\
name ""
name "Alice"
>Certainly... There doesn't seem like any food that would interest me there.\
>But don't let your guard down, Luka.@
>That mansion is very strange.\
name ""
name "Luka"
>Strange...?\
name ""
csp 700:print 10,500
>I turned around to question Alice, but she had already vanished.\
>Saying something cryptic then vanishing.@> Well, I guess that's normal for her.\
>A Hero shouldn't need the Monster Lord's advice anyway.\
name "Luka"
>Whatever it is, I'll deal with it!\
name ""
>With anger seething inside me, I continue running to the Lord's mansion.\
dwave 1,"se\asioto2.ogg"
sean_change "bg073"
lsp 700,":a;chara\mob_heisi1.bmp",-160,0
lsp 701,":a;chara\mob_heisi1.bmp",160,0:print 10,500
>Two soldiers are standing in front of the gate.\
name "Luka"
>I want to meet the Lord.\
name ""
name "Guard A"
>Who are you!?@
>Lily wouldn't meet some outsider!\
name ""
name "Guard B"
>You're suspicious...@
>Are you a witch!?@>Allow me to test if you wish to prove your innocence.\
name ""
name "Luka"
>...............\
name ""
>Going to declare me a witch after a few seconds.@> How disgusting.\
>It's people like this that are destroying the bonds between humans and monster.\
>People like these are causing so many tragedies!!\
name "Luka"
>...Sylph!\
name ""
dwave 2,"se\wind2.ogg"
lsp2 0,":a;chara\sylph_st12.bmp",200,300,100,100,0,200
gosub *syoukan_effect
>I use the power of Sylph to summon the wind.@
>With a fierce gust of wind, I blow off the helms of the soldiers!\
name "Guard A"
>What the hell!?\
name ""
name "Guard B"
>No way... A real witch!?\
name ""
name "Luka"
>What the hell is that?@> So you mean you've never seen a real one after all this time?\
name ""
name "Guard A"
>Witch!@> A real one!\
name ""
name "Guard B"
>Shit!@>Run away!\
name ""
dwave 1,"se\asioto1.ogg"
cspl 700,701:print 10,500
>The two guards quickly run away.\
name "Luka"
>..................\
name ""
>Capturing people as witches, and running away as soon as they think they've found a real one.\
>If they're terrified of a real witch, that must mean they were fully aware they were capturing innocents.\
name "Luka"
>Unforgivable!@
>I have to stop this right away!\
name ""
>I open the gate to the mansion and run inside.\
dwave 1,"se\asioto2.ogg"
bgmstop
sean_change "bg074"
bgm "bgm\madou1.ogg"
name "Luka"
>What is this...?\
name ""
>The Lord's mansion...@>Looks like a witch's house.\
>What the hell kind of joke is this...\
lsp 700,":a;chara\lily_st11.bmp",0,0:print 10,500
name "Young Woman"
>Hehe... How surprising.\
name ""
name "Luka"
>Who are you?\
name ""
name "Young Woman"
>I am the Lord of this mansion, Meister Lily.@
name "Lily"
>A sorcerer aiming to understand the truth of all creation.\
name ""
name "Luka"
>No way... The Lord herself is a witch!?\
name ""
>A real witch capturing innocent people as witches?@
>What the hell kind of situation is this!?\
name "Luka"
>I have a lot I want to ask you...@>But most importantly...@
>What happened to everyone you kidnapped!?\
name ""
name "Lily"
>I used the women as experimental materials.@
>The men... I just squeezed out their seed until they were dry, then discarded them.\
name ""
name "Luka"
>You...!@
>Why are you doing such awful things!?\
name ""
name "Lily"
>This old fashioned village always rejected [Knowledge] and [Magic].\
>But ever since I took over as Lord five years ago, I've been fascinated by magic power.\
>So I decided to use their prejudice to start a witch hunt to collect materials for my experiments.\
name "Luka"
>Experimental materials... That's all they are!?\
name ""
name "Lily"
>It looks like you hold some magic power too.@
>Why don't you join me?\
name ""
name "Luka"
>...I'll never be a companion of yours.\
name ""
name "Lily"
>Is that so?@>Well then, I'll just capture you and research your power.@
>First... Allow me to analyze your semen.\
lsp 700,":a;chara\lily_st12.bmp",0,0:print 10,500
>Hehe... First I want to do a reproductive experiment.@
>I'll be careful...@> A fine specimen like you is too rare to break.\
name ""
name "Luka"
>Don't screw around!@
>I'll rescue everyone here that's still alive!\
name ""
lsp 700,":a;chara\lily_st11.bmp",0,0:print 10,500
name "Lily"
>Oh?@>Hehehe...@>Welcome to my mansion, then.@
>Please take your time and...@> Make yourself at home.\
name ""
dwave 1,"se\asioto3.ogg"
csp 700:print 10,500
>Saying that, Lily escapes through a nearby door.\
name "Luka"
>Hey!@> Stop!\
name ""
>I chase after Lily through the door.\
dwave 1,"se\asioto4.ogg"
sean_change "bg071"
name "Luka"
>What the... Is this a prison?\
name ""
>Surrounded in near darkness, I see cages lining the walls.@
>Is this where all the kidnapped villagers are kept?\
name "Luka"
>Is anyone here?\
name ""
>Most importantly, I need to rescue anyone caught...@
>As I look around, I see a bizarre sight.\
bgm "bgm\kiki2.ogg"
name "Young Man"
>Aaaaa....@>Aiieee!\
name ""
lsp 700,":a;chara\suckvore_st01.bmp",0,0:print 10,500
>Two arms are hanging out of a strange creature.@
>Something that looks like a sea anemone is hanging from the ceiling.\
>It looks as though it caught that man and is sucking out his bodily fluids!\
name "Young Man"
>Haaaa...\
name ""
>It looks as though the man has already gone insane from pleasure.@
>Drooling from the mouth, he's staring straight ahead at the ceiling with a smile on his face.\
name "Luka"
>How horrible...@
>But what is that thing...@>Is it a monster?\
name ""
>I've never heard of something like that before.\
name "Luka"
>...There's more than one, too...\
name ""
>There are more of them scattered around the jail.@
>Each one is sucking on a young man...\
>Suddenly, I feel a presence behind me.\
name "Luka"
>Wh...Who is it!?\
name ""
r@k@\
goto *suckvore_start



*sean0151

bgm "bgm\madou1.ogg"
name ""
r@k@\
name "Luka"
>Thank the Goddess... She went back to normal.\
name ""
>Even though she's unconscious, she seems alright.@
>Did the sword seal the monster transformation, and put her back in a human form...?\
name "Luka"
>What should I do...@
>Maybe I should help everyone first...\
name ""
>The unconscious woman...@
>The men being sucked by the Suck Vores...\
>With Lily still loose, it would be dangerous to rescue everyone.\
>All the men look like they're in some kind of trance, too.@
>Restoring all of the Suck Vores back to humans would take a while as well...\
name "Luka"
>I'll save you all for sure!@>Please, just hold on until I take care of Lily!\
name ""
>First I need to stop Lily.@
>I run toward the end of the hall where I just saw her before the fight.\
dwave 1,"se\asioto3.ogg"
sean_change "bg071"
>After I move forward a ways, I come into a larger jail, strange women are standing around.\
bgm "bgm\kiki2.ogg"
lsp 700,":a;chara\wormx_st01.bmp",0,0:print 10,500
name "Village Girl A"
>Hehe... I want more.\
name ""
dwave 1,"se\ero_chupa6.ogg"
name "Man A"
>Auu...@> Lucy... Please stop...\
name ""
name "Village Girl B"
>Your semen is delicious.\
name ""
dwave 1,"se\ero_chupa6.ogg"
name "Man B"
>Aieee!@> Ahhh...\
name ""
>Different from before, they look half human half monster, with tentacles for arms.\
>There are about ten of them here...@
>Each with a tentacle for an arm, they're all using them to attack the men.\
>They must have been changed by Lily as well...@
>They're all so engrossed in sucking up the men's semen that they haven't noticed me.\
csp 700:print 10,500
name "Luka"
>Guh... What should I do?@
>There are a lot of them...\
name ""
>As I'm deciding what to do...\
lsp 700,":a;chara\wormv_st01.bmp",0,0:print 10,500
name "Village Girl"
>Oh?@>Another boy?\
name ""
>One of the girls not sucking on a man found me!\
r@k@\
goto *wormv_start



*sean0152

bgm "bgm\madou1.ogg"
name ""
r@k@\
name "Luka"
>Whew... I managed to seal the tentacle.\
name ""
>The tentacle vanishes, as her original arm reappears.@
>After regaining her original arm, she fainted.\
>But all the others are sure to notice...!\
lsp 700,":a;chara\wormx_st01.bmp",0,0:print 10,500
name "Village Girl A"
>More...@>Suck more...\
name ""
dwave 1,"se\ero_chupa6.ogg"
name "Man A"
>Auuuu...\
name ""
name "Luka"
>They didn't notice?\
name ""
>They're too focused on sucking out the men's semen...@
>It looks like they can't focus on anything but toying with the men.\
csp 700:print 10,500
name "Luka"
>...I'll help you all soon, too.@
>I just need to get Lily first...\
name ""
>The men are in no condition to walk. I'll need help to carry them out of here.\
>But if I don't stop Lily first, it would be too dangerous.\
name "Luka"
>I have to find her...@>Hmm?\
name ""
dwave 1,"se\break.ogg"
>I hear the clanging of metal a little ahead of me.@
>It's as if a metal rod is striking against something...\
name "Luka"
>Is there someone else fighting besides me!?\
name ""
dwave 1,"se\asioto4.ogg"
>I run as fast as I can in the direction of the sound...@
bgm "bgm\kiki2.ogg"
lsp 700,":a;chara\ironmaiden_st01.bmp",0,0
bg "bg\bg158.bmp",10,500
>A young soldier trapped in a jail is fighting a strange monster!\
name "Luka"
>What is that!?\
name ""
>It looks just like the old Iron Maiden torture device...@
>The soldier fighting it has been pushed all the way to the bars of the jail.\
name "Soldier"
>Shit...@>You freaking monster!\
name ""
name "Iron Maiden"
>................\
name ""
>He's at a huge disadvantage.@
>The Iron Maiden slowly approaches him as he's trapped against the bars.\
>I have to help him!\
csp 700
bg "bg\bg071.bmp",10,500
name "Luka"
>I'm coming to help!\
name ""
>I hit at the bars, but I can't break through.@
dwave 1,"se\break.ogg"
>My sword just bounces off the bars...\
name "Soldier"
>Stop!@>Don't come any closer!@
>I'm a Hero... But I wasn't any match for the Lord of the mansion!\
>You have to run away before you're caught too!\
name ""
name "Luka"
>But...!\
name ""
dwave 1,"se\break.ogg"
>I desperately swing my sword at the bars.@
>I put a small nick into the bar, but other than that it doesn't even budge...\
lsp 700,":a;chara\ironmaiden_st01.bmp",0,0
bg "bg\bg158.bmp",10,500
>On the other side of the bars, the Iron Maiden gets even closer to the soldier.\
lsp 700,":a;chara\ironmaiden_st11.bmp",0,0:print 10,500
>Suddenly, the lid opens, exposing a bizarre interior!\
name "Soldier"
>Sto...@> Ahhhh!!\
name ""
lsp 700,":a;chara\ironmaiden_st01.bmp",0,0:print 10,500
>In the next instant, the Iron Maiden closes around the soldier, confining him inside.\
>It's as if she ate him in a single bite!\
name "Soldier"
>Ahhhhhh!!\
name ""
>A horrible yell comes out from inside the Iron maiden.@
dwave 1,"se\ero_syokusyu1.ogg"
>At the same time, a lewd sound starts to sound out.\
name "Iron Maiden"
>..............\
name ""
>A creepy smile appears on the face of the Iron Maiden...@
lsp 700,":a;chara\ironmaiden_st21.bmp",0,0:print 10,500
>At the same time, white fluid starts to drip out of the bottom of her...\
name "Luka"
>What did you do!?\
name ""
name "Soldier"
>Aa...a...\
name ""
>The soldier's scream gets hoarse as I keep attacking the bars.@
>But suddenly, I hear a noise behind me!\
csp 700
bg "bg\bg071.bmp",10,500
>I turn around quickly to see...\
r@k@\
goto *ironmaiden_start



*sean0153

bgm "bgm\madou1.ogg"
name ""
r@k@\
name "Luka"
>.................\
name ""
>I managed to seal the Iron Maiden that attacked me...@
>But the soldier in the jail...\
lsp 700,":a;chara\ironmaiden_st21.bmp",0,0
bg "bg\bg158.bmp",10,500
name "Iron Maiden"
>.................\
name ""
>Semen keeps dripping out from the Iron Maiden as her creepy smile gets even wider.\
csp 700
bg "bg\bg071.bmp",10,500
name "Luka"
>Damn it!@> I won't forgive you, Lily!\
name ""
>My anger finally reached its peak.@
>I can tell by the stale wind that Lily is on the other side of this door.\
name "Luka"
>I won't allow you to sacrifice anyone else!\
name ""
dwave 1,"se\asioto4.ogg"
>I run down the hall and kick open the door.@
bg "bg\bg075.bmp",10,1500
>In a room that looks like a laboratory, I find Lily.\
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\lily_st11.bmp",0,0:print 10,500
name "Lily"
>Really... How savage.@
>Shouldn't you knock before opening the door?\
name ""
>The woman who caused so much tragedy calmly smiles at me.@
>So many are suffering right next to her, but she's smiling so nonchalantly!\
name "Luka"
>I'll never forgive you!@
>Killing and playing with humans as if they were mere objects...\
name ""
name "Lily"
>You just don't understand.@
>My experiments are a noble endeavour for valuable research...\
name ""
name "Luka"
>There's nothing more valuable than life!\
name ""
name "Lily"
>Hehe... What a shallow sense of justice.@
>This world contains things you cannot comprehend.\
>This old village always had a policy of exclusion against outsiders.@
>While living here, I was able to catch a glimpse of the ugliest humanity had to offer.\
>This research...@> Is just my gift to repay them for that.\
name ""
name "Luka"
>...How conceited.@
>Stop your brutality right here, and free all your prisoners.\
>Otherwise...\
name ""
name "Lily"
>Otherwise...@> What, exactly?\
>Do you think you're a match for Meister Lily, the seeker of truth?\
>You're the conceited one...@
>You actually think your pathetic magic can hold up to mine!?\
name ""
r@k@\
goto *lily_start



*sean0154

bgm "bgm\madou1.ogg"
name ""
r@k@\
name "Luka"
>..............\
name ""
>With that, Lily is powerless now.@
>Now I just need to hand her over to the villagers.\
>I must allow them to hand down their own judgement for her crimes against them...\
bgmstop
sean_change "bg072"
bgm "bgm\mura2.ogg"
>Everyone captured in her mansion was freed.@
>At the same time that Lily's magic was sealed, her power over the women vanished as well.\
lsp 700,":a;chara\mob_ozisan3.bmp",0,0:print 10,500
name "Man"
>Ahh!@> Mary!@> Thank Ilias you're alive!\
name ""
lsp 700,":a;chara\mob_ozisan3.bmp",-160,0
lsp 701,":a;chara\mob_obasan.bmp",160,0:print 10,500
name "Woman"
>Erika...@> I thought you were dead!\
name ""
cspl 700,701:print 10,500
>Everywhere throughout the village, families are reuniting.@
>But in other places...\
lsp 700,":a;chara\mob_zyosei.bmp",0,0:print 10,500
name "Lady"
>Sister!@>No!@>Lucy, where are you!?@>Please don't tell me... No...\
name ""
lsp 700,":a;chara\mob_zyosei.bmp",-160,0
lsp 701,":a;chara\mob_ozisan1.bmp",160,0:print 10,500
name "Man"
>Eri!?@>Where are you... Eri!?\
name ""
>The sorrowful voices of those looking for loved ones rings out.@
>There were far too many that were killed...\
cspl 700,701:print 10,500
name "Luka"
>................\
name ""
lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
name "Villager"
>Hero... There is no way we could ever express our gratitude to you.@
>Please, take anything you wish from our village...\
name ""
name "Luka"
>No... That's alright.@
>The only thing I want is for you to give Lily a fair trial and punishment.\
name ""
dwave 1,"se\asioto2.ogg"
csp 700:print 10,500
>I say those final words to the villagers as I quickly hurry away.@
>I don't want to have a feast or a party...\
>When I finally reached the edge of the village...@
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
>Alice came up behind me.\
name "Alice"
>This is the first time I've seen you so depressed after a victory.\
name ""
name "Luka"
>...I can't help but think of how many were killed.@
>Hundreds of people will never return to their families.\
>Right in front of my eyes, I saw people getting attacked... And I couldn't do anything about it.\
>How could I be happy after all that...\
name ""
name "Alice"
>...You're depressed just at that?@
>But are you really ok with this?@> Leaving Lily's punishment to the villagers.\
name ""
name "Luka"
>I'm just a stranger to this village...@
>They had to go through the horror for years.\
>They deserve to finish the problem by their own hands.\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>...Since she's the main offender, they will surely kill her.@
>The only way she can compensate is by death.\
name ""
name "Luka"
>Even with death, that won't be enough compensation.@
>Just how many people has she killed...\
name ""
lsp 700,":a;chara\alice_st12b.bmp",67,0:print 10,500
name "Alice"
>...But still, you did well.@
>This village was saved thanks to you.\
>That's quite a feat for a Hero.@>In spite of being a fake one.\
name ""
bgm "bgm\hutuu4.ogg"
name "Luka"
>Hero, huh?@> That brings back old memories...@
>My mother... Ilias Village...\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Painful memories?\
name ""
name "Luka"
>...I wonder.@
>There are some painful memories, but I like Ilias Village now.\
>Even that village was able to change after my mother's death.@
>Now I'm friendly with all the villagers...\
name ""
name "Alice"
>Oh... Is that so?@
>Did they all repent after seeing your mother die, and turn over a new leaf?\
name ""
name "Luka"
>Hahaha... Now who's being unrealistic, Alice?@
>Shortly after she died, the epidemic spread to the rest of the village.\
>All of the elders died, and the number of villagers drastically lowered.@
>Without enough people, they were forced to rely on immigrants.\
>Because of that, the vast majority of Ilias Village is made up of immigrants.@
>Suddenly I, a previous outsider, was one of the most senior villagers.\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>...You're pretty dark.@
>You act pretty happy despite your twisted past.\
name ""
name "Luka"
>Even still...@
>One wrong step, and I would have ended up like Lily.\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>...No, you're different from her.@
>Even among monsters and humans, there are only two types.\
>Those who undergo suffering and spread it to others.@
>And those who undergo suffering and avoid giving it to others.\
>Lily is the former, you're the latter.\
name ""
name "Luka"
>Is... that so?\
name ""
name "Alice"
>I can't speak for the dead...@
>But I'm sure your mother must be proud.\
>...That's what I think.\
name ""
name "Luka"
>Alice...\
name ""
name "Alice"
>...That's why you shouldn't say you had no choice but to become a Hero.@
>Don't you think you would have used your sword to protect the weak anyway?\
name ""
name "Luka"
>...That's true.@
>I must have been so blinded by the title of a Hero, that I forgot the real reason I wanted to help people.\
>...Thank you, Alice.\
name ""
lsp 700,":a;chara\alice_st18b.bmp",67,0:print 10,500
name "Alice"
>Hmph...\
name ""
>As Alice and I talk...@
dwave 1,"se\asioto2.ogg"
>One of the village girls slowly approaches us.\
bgm "bgm\epilogue.ogg"
lsp 700,":a;chara\wormv_st11.bmp",0,0:print 10,500
name "Villager Girl"
>Thank you, Hero...@
>Thanks to you, we were able to return to normal.\
name ""
name "Luka"
>Ah... You're...\
name ""
>She was one of the girls transformed by Lily.@
>With her tentacle arm sealed, it looks like she's back to normal.\
name "Villager Girl"
>Everyone you saved wants to thank you.@
>But they're all too weak to move at the moment, so they entrusted it to me.\
>Thank you, Hero!!@
>We shall never forget your kindness!!\
name ""
name "Luka"
>I'm glad I could help...@
>You all will have a tough time going forward... Please don't lose heart.\
name ""
lsp 700,":a;chara\wormv_st13.bmp",0,0:print 10,500
name "Villager Girl"
>...We know the reason Lily acted the way she did.@
>Her intense hatred of us is what caused her to curse our bodies like that.\
>We won't continue the cycle of hate...@
>We'll never allow another tragedy like that to happen again.\
name ""
name "Luka"
>I see... That's good.@
>Now, I must continue my journey...\
name ""
lsp 700,":a;chara\wormv_st12.bmp",0,0:print 10,500
name "Villager Girl"
>Thank you again, Hero!\
name ""
>The girl raises her arm to wave goodbye when...@
dwave 1,"se\ero_makituki1.ogg"
lsp 700,":a;chara\wormv_st02.bmp",0,0:print 10,500
>Her waving hand turns into a tentacle!\
name ""
lsp 700,":a;chara\wormv_st03.bmp",0,0:print 10,500
name "Villager Girl"
>Ah... I'm sorry, how rude of me...@
eng "I'm still not used to having my human arm back...":$sel6/
lsp 700,":a;chara\wormv_st13.bmp",0,0:print 10,500
\
name ""
>In another instant, her tentacle turned back into a human arm.\
bgm "bgm\comi1.ogg"
name "Luka"
>...It isn't sealed?@
>Are the others the same?\
name ""
>The villager timidly nods.\
name "Villager Girl"
>Yes...@> These tentacles are already a part of our bodies...@
>I don't think they will ever completely go away...\
name ""
name "Luka"
>I see...\
name ""
lsp 700,":a;chara\wormv_st11.bmp",0,0:print 10,500
name "Villager Girl"
>But since Lily's magic was sealed, our minds are back to normal.@
>We're able to change it back into a human arm, so there shouldn't be a problem...\
>We'll try our best to hide them until things calm down a bit.\
name ""
name "Luka"
>I see...\
name ""
>It seems like the village has a new problem.@
>They seem confident, so I'm sure it will turn out fine.\
bgm "bgm\epilogue.ogg"
name "Luka"
>It may be tough, but please try your best!@
>Goodbye!\
name ""
lsp 700,":a;chara\wormv_st12.bmp",0,0:print 10,500
name "Villager Girl"
>Please come visit us again, Hero!@
>We will always welcome you!\
name ""
>I wave to the villager as we head out of the village.\
dwave 1,"se\asioto2.ogg"
sean_change "bg020"
bgm "bgm\field3.ogg"
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Humans are quite resilient, aren't they.\
name ""
name "Luka"
>No matter how painful it is, they have no choice but to live with it.@
>Doing the best with what you have... That's what it means to be a human.\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Hmph... I see...\
name ""
>We were able to solve the issue at the Witch Hunt Village.@
>Now, where shall we head next...\
r@k@\
mov %ivent07,1
mov %genzaiti,8
mov %gloval1_story_sinkou,5:gosub *savegloval1
goto *map3



*sean0156

gosub *genzaiti_bg
name "Luka"
>Alright, let's go look for Gnome!\
name ""
>She said that a mud doll was seen around the Safaru ruins...@
>Sylph said that means Gnome must be nearby.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Oh? Finally decided to find Gnome?@
>Once you get Gnome's power, there's no reason to stay in this hot desert anymore.\
>Have you finished everything you need to do here?\
name ""
csel "There's nothing left to do",*sean0156b,"There's still something left",*sean0156a



*sean0156a

name "Luka"
>No... I need to do something first.\
name ""
>I unroll the map again...\
goto *map3



*sean0156b

name "Luka"
>Alright, let's head to Safaru Ruins!\
name ""
>I head to the north to finish what I came here for.\
dwave 1,"se\asioto2.ogg"
bgmstop
sean_change "bg076"
bgm "bgm\safar.ogg"
name "Luka"
>Is this the Safaru Ruins...?\
name ""
>It's nothing but a large stretch of desert.@
>Far off in the distance, I can see a pillar sticking up out of the sand.\
>Around us on the ground are small pieces of stones.@>The sand must have covered whatever used to be here...\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>................\
name ""
>Alice picks up a broken piece of stone and licks it.\
name "Alice"
>Hmm...@> This is about a thousand years old.@
>There's no doubt that the people here believed in animism.\
name ""
>...What the hell is that?@>The final skill learned by a glutton?\
name "Luka"
>At any rate, this must be the place.@
>It has a similar atmosphere as the forest where Sylph was.\
name ""
>The wind here reminds me of the forest, too.@
>A strange atmosphere that makes me feel at peace...\
name "Luka"
>So now... Where is she?\
name ""
>There's nothing but sand as far as I can see.@
>It will be pretty difficult to find a single girl here.\
name "Alice"
>Gnome is cowardly, but she's also very curious.@
>If someone is looking for her, she'll surely appear before them to find out why.\
name ""
name "Luka"
>Shall I just look aimlessly for now then?\
name ""
>I guess I have no choice but to just walk around.\
name "Alice"
>I'll just take a rest over there.\
name ""
csp 700:print 10,500
>Without even moving, Alice somehow vanishes.@
>Thus, I decide to just wander around aimlessly.\
dwave 1,"se\asioto2.ogg"
sean_change "bg076"
name "Luka"
>Heeeeey!@> Gnoooooome!@
>If you're there, please come out!\
name ""
>I look around as I yell out.@
lsp 700,":a;chara\doro_st03.bmp",-500,100:print 1
dwave 1,"se\umaru.ogg"
for %move=0 to 1300 step 20
amsp 700,-500+%move,100
print 1:wait 10
next
>Ah!@>That was a doll!\
name "Luka"
>Aha!\
name ""
>As soon as I take a step toward the doll...@
dwave 1,"se\earth1.ogg"
bgm "bgm\kiki1.ogg"
>My foot falls through the sand!\
name "Luka"
>Uwa!@> What the hell!?\
name ""
>The sand around me sinks down and turns into a whirlpool.@
>With my body sinking into the sand, I'm being dragged toward the center!\
>And in the center was...\
r@k@\
goto *arizigoku_start



*sean0157

bgm "bgm\safar.ogg"
name ""
r@k@\
name "Luka"
>Whew... That was surprising.\
name ""
>I let out a relieved sigh as I put away my sword.\
lsp 700,":a;chara\doro_st03.bmp",-500,100:print 1
dwave 1,"se\umaru.ogg"
for %move=0 to 1300 step 20
amsp 700,-500+%move,100
print 1:wait 10
next
>The mud doll runs by me and vanishes behind a sand dune!\
name "Luka"
>Ah!@>Hey!\
name ""
dwave 1,"se\asioto1.ogg"
>I take off running again toward the doll.@
>But that thing is way too fast, I can't catch up...\
name "Luka"
>Damn...@
>At least listen to me...\
name ""
dwave 1,"se\earth1.ogg"
>As I complain to myself, the earth suddenly starts to shake.\
name "Luka"
>What the!?@> Another Antlion Girl!?\
name ""
>...No, this is different.@
>Suddenly, a gigantic hole opens up in front of me!@
>A huge monster comes up out of it!\
r@k@\
goto *sandw_start



*sean0158

bgm "bgm\safar.ogg"
name ""
r@k@\
name "Luka"
>Whew... I managed to win somehow.@
>There's a lot of things popping up out of nowhere here...\
name ""
>Speaking of popping up out of nowhere...@
lsp 700,":a;chara\doro_st01.bmp",-100,0:print 10,500
>Another mud doll runs by!\
dwave 1,"se\umaru.ogg"
csp 700:print 10,500
name "Luka"
>Ah... It ran away again...\
name ""
>As soon as it makes eye contact with me, it runs away.\
name "Luka"
>Wait up!\
name ""
dwave 1,"se\asioto1.ogg"
>I desperately chase after the mud doll...@
bgm "bgm\yonseirei2.ogg"
lsp 700,":a;chara\gnome_st01.bmp",0,0:print 10,500
>Around the dune where the mud doll ran, a small girl is standing alone.\
name "Girl"
>.................\
name ""
name "Luka"
>Could you be... Gnome?\
name ""
name "Girl"
>.................\
name ""
>The girl slowly nods.@
>This girl is the Earth Spirit, Gnome?\
name "Luka"
>Um... I'm here because I want to borrow your power...\
name ""
bgm "bgm\comi1.ogg"
lsp 700,":a;chara\sylph_st21.bmp",-160,50
lsp 701,":a;chara\gnome_st01.bmp",160,0:print 10,500
name "Sylph"
>Yay!@> Gnomey!\
name ""
>Sylph suddenly appears in front of me.@
>Are the spirits all friends with each other?\
name "Gnome"
>.................\
name ""
name "Sylph"
>Hey, Gnomey...@
>You should come with this human so we can play together! \
name ""
name "Gnome"
>.................\
name ""
name "Sylph"
>...I see.@
>That's true... You just met Luka, didn't you.\
name ""
name "Luka"
>Err... What is she saying?\
name ""
>I couldn't even tell that Gnome was speaking...\
name "Sylph"
>She wants to lend you her power, but she needs you to show her your abilities first.\
>In other words, you need to beat Gnomey in a fight.\
name ""
name "Luka"
>I see... I figured that might be the case...\
name ""
bgm "bgm\yonseirei2.ogg"
csp 701
lsp 700,":a;chara\gnome_st01.bmp",0,0:print 10,500
>I don't really want to fight her, but I guess I have to.@
>I don't want to swing my sword at someone who doesn't mean any harm, but I have to show my power if she's going to join me!\
r@k@\
goto *gnome_start



*sean0159

bgm "bgm\yonseirei2.ogg"
name ""
r@k@\
name "Luka"
>...Are you alright?\
name ""
lsp 700,":a;chara\gnome_st11.bmp",0,0:print 10,500
name "Gnome"
>..............\
name ""
>Gnome's eyes snap open as she nods her head.@
>She silently stares at my face as she holds out her right hand.\
name "Luka"
>Eh...?\
name ""
name "Gnome"
>..............\
name ""
>Gnome shakes her hand around as she stares at me.@
>Does she... Want to shake my hand...?\
name "Luka"
>Alright...\
name ""
name "Gnome"
>..............\
name ""
>When I shake Gnome's small hand...@
dwave 1,"se\warm.ogg"
csp 700
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
>Gnome vanishes as a warm light envelopes my body!\
name "Luka"
>This is...\
name ""
>It feels like power is flowing through my body.@
>Gnome must have entered inside me just like Sylph did...\
>Suddenly inside my mind, I can see the two of them taking shape.\
bgm "bgm\comi1.ogg"
lsp 700,":a;chara\sylph_st21.bmp",-100,50
lsp 701,":a;chara\gnome_st31.bmp",70,50:print 10,500
name "Sylph"
>Yaay! Gnomey's with me now! \
name ""
name "Gnome"
>..............\
name ""
name "Luka"
>Are you and Gnome good friends?\
name ""
lsp 701,":a;chara\gnome_st32.bmp",70,50:print 10,500
name "Sylph"
>Yep! We're best friends! \
lsp 700,":a;chara\sylph_st22.bmp",38,50
lsp 701,":a;chara\gnome_st33.bmp",70,50:print 10,200
dwave 1,"se\dageki.ogg"
name "Sylph"
>Hya!\
name ""
name "Luka"
>..............\
name ""
>...Are they really friends?\
bgm "bgm\epilogue.ogg"
csp 701
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Hmm... It looks like you got Gnome's power.\
name ""
name "Luka"
>Oh, Alice.@
>It was tough, but I pulled it off!\
name ""
name "Alice"
>The power of the Earth is a lot more difficult to use than the wind.@
>If you do it half-assed, you may get crushed under your own power.\
name ""
name "Luka"
>...Yes, I know that already.@
>I just saw an example of it...\
name ""
>Even Gnome hurt herself using it.@
>I need to be really careful when I use it.\
name "Luka"
>Two left...@>Undine and Salamander.\
name ""
name "Alice"
>Sylph and Gnome have powerful magic, but no combat experience.@
>But it won't be the same with Undine and Salamander.\
>Undine is quite skilled, and Salamander is...\
name ""
name "Luka"
>Salamander is...?\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...Well, I'll let you find out.@
>I don't want to terrify you, it might make you mess up.\
name ""
name "Luka"
>Hey... That just makes me even more worried!\
name ""
>What the heck does she mean by that...@
>If you stay silent after saying that, I won't be able to sleep at night...\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Don't worry about it, it's not a big deal.@
>By the way, do you feel any different after getting Gnome's power?\
name ""
name "Luka"
>No... But I can feel Gnome's breath.@
>Nothing concrete or anything...\
name ""
>I can't feel anything like the flow of the wind like when I got Sylph.@
>As I think that, the spirits inside of me start talking again.\
lsp 700,":a;chara\sylph_st21.bmp",-100,50
lsp 701,":a;chara\gnome_st31.bmp",70,50:print 10,500
name "Gnome"
>..............\
name ""
name "Sylph"
>Gnomey only just went inside you Luka!@
>Once she calms down a little, you'll be able to use her power too! \
lsp 701,":a;chara\gnome_st32.bmp",70,50:print 10,500
>Isn't that right, Gnomey!? \
name ""
lsp 700,":a;chara\sylph_st22.bmp",38,50
lsp 701,":a;chara\gnome_st33.bmp",70,50:print 10,200
dwave 1,"se\dageki.ogg"
name "Sylph"
>Hya!\
name ""
name "Luka"
>..............\
name ""
cspl 700,701:print 10,500
>...At any rate, I guess I'll be able to use Gnome's power eventually.\
name "Luka"
>Well then, next is fire and water...\
name ""
>Undine is in the Noah Region to the east.@
>Salamander is in the Gold Region to the north.\
>East is the closest to me... So I guess I'll head to Undine next.@
>After that, I'll head north to Salamander.\
name "Luka"
>Alright... Let's head to Noah.@
>Shall we just start walking East from here?\
name ""
>It's nothing but a flat field from here.@
>Since Safaru was at the border of the desert, it shouldn't be a difficult journey if we start from here.\
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>Noah is still fairly undeveloped, so they should have some unique regional foods.\
>I can't wait.@>Hahahahahaha!\
name ""
name "Luka"
>Alice, stop your creepy laugh or I'm leaving you behind!\
name ""
>Thus, we start to head toward the east.@
>Toward the Noah Region, still mostly untouched by humans.\
>I wonder what's waiting for us there...\
dwave 1,"se\asioto2.ogg"
if %game_clear=0 mov %game_clear,1
bgmstop
cspl 3,7
csp 611
cspl 699,705
bg black,7,1500
bgm "bgm\field3.ogg"
saveoff
textoff
csp -1
mov %sinkoumode,0:skipoff:autoclick 0
bg "bg\map0.bmp",10,1000
goto *sean0159m



*sean0159m

btndef clear
lsp 601,":s/20,20,0;#bbbbbbHellgondo Continent ",300,40
lsp 602,":s/20,20,0;#bbbbbbIlias Continent ",510,335
strsp 603,"Gold Region",335,130,7,1,20,20,0,0,1,1,#bbbbbb
strsp 604,"Noah Region",515,150,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 604,13
lsp 605,":s/20,20,0;#bbbbbbNatalia Region ",410,250
strsp 606,"Safina Region",175,270,8,1,20,20,0,0,1,1,#bbbbbb
print 1
btnwait2 %cmd1
if %cmd1=0 goto *sean0159m
if %cmd1=-1 mov %sel2,%hanyo1:gosub *menu:goto *sean0159m
csp -1
btndef clear
if %cmd1=13 bg black,10,1500:mov %ruka_tati,1:goto *sean0160
goto *sean0159m



*sean_tyustart

mov %manuoff,0
cspl 700,701:print 10,500
mov %storyon,1
mov %mylv,25
mov %exp,65575
mov %item01,9
mov %item02,1
mov %item05,1
mov %skill01,7
mov %ivent01,1
mov %ivent02,1
mov %ivent03,1
mov %ivent04,1
mov %ivent05,1
mov %ivent06,1
mov %ivent07,1
mov %check01,1
mov %check02,1
goto *sean_restart1



*sean_restart1

mov %ruka_tati,1
bgm "bgm\irias.ogg"
gosub *setwindow_01
bg "bg\bg001.bmp",10,3000
> -- The story so far --\
>The brave Hero Apprentice Luka begins a quest to defeat the Monster Lord.@
>Having barely set out on his journey, that very Monster Lord joins him as a traveling companion.\
>However, Luka determines that Alice is not evil.@
>Traveling with her, Luka battles many monsters on his journey.\
>Luka's final destination is the Monster Lord's castle, and to deal with the Four Heavenly Knights whom have been causing mayhem all over the world.\
>But right now, those Four Heavenly Knights are too powerful for him...@
>Collecting the power of the elemental spirits to aid him, Luka continues his journey...\
lsp 601,":s/20,20,0;#bbbbbbHellgondo Continent ",300,40
lsp 602,":s/20,20,0;#bbbbbbIlias Continent ",510,340
strsp 603,"Gold Region",335,130,7,1,20,20,0,0,1,1,#bbbbbb
strsp 604,"Noah Region",515,150,7,1,20,20,0,0,1,1,#bbbbbb
lsp 605,":s/20,20,0;#bbbbbbNatalia Region ",450,250
strsp 606,"Safina Region",175,270,8,1,20,20,0,0,1,1,#bbbbbb
bg "bg\map0.bmp",10,1000
>In the Natalia Region, Sylph.@>In the Safina region, Gnome.\
strsp 604,"Noah Region",515,150,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444
print 10,500
>Now toward the Noah Region to enlist Undine's aid...@
>What awaits Luka at the end of his quest...?\
bgm "bgm\field3.ogg"
cspl 601,606
goto *sean0160



*sean0160

bg "BG\bg077.bmp",10,3000
gosub *setwindow_01p
>After leaving the desert lands of Safina, we've come upon the mysterious leafy green of the Noah Region.\
>For now, our destination is the Grand Noah Castle.@> There, in the largest castle in the region, presides Queen Noah the Tenth.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Hmm, it seems there are quite a few unique specialities to be found there.@
>The Colosseum in the Castle is quite famous, too.\
>Well, not that I care about what goes on in the Colosseum floor.@
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
>But the food stands in the seating area are supposed to be riveting.\
name ""
name "Luka"
>Yes, yes, I know. You've mentioned it over and over already.\
name ""
>I don't particularly care about these lunches she's talking about, but I still want to go to the Colosseum.@
>I'm sure a famous arena like that will have lots of powerful fighters, gathered from all over the world.\
>As for my power right now... I wonder.@
>With Sylph and Gnome at my side, I may actually stand a chance if I were to compete.\
>It may not be just a dream now...\
name "Luka"
>Hehehe... If that were to happen, what would I do?@
>I'd be a celebrity! Hehehe...\
name ""
lsp 700,":a;chara\alice_st06b.bmp",67,0:print 10,500
name "Alice"
>Quit making that creepy laugh!\
name ""
>Saying that, Alice returns her gaze to her old travel book.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Hmmhmm... In the far off east from here, there's a village called Yamatai with a unique food culture.@
>Sushi, Tempura, Sukiyaki, Soba...\
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
>That sounds awfully interesting...\
name ""
name "Luka"
>Yamatai, far off to the east?@
>We have things to do, let's not get sidetracked.\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>..............\
name ""
>Alice silently glares at me.@
dwave 1,"se\ero_makituki2.ogg"
>Her tail starts to make menacing circles around my legs.\
name "Luka"
>St...Stop it...\
name ""
name "Alice"
>.............\
name ""
dwave 1,"se\ero_makituki2.ogg"
>Her circling tail slowly moves up toward my waist.\
name "Luka"
>Fi...Fine! Fine, I get it!@> We'll make time for it.\
name ""
lsp 700,":a;chara\alice_st09b.bmp",67,0:print 10,500
name "Alice"
>........ \
name ""
>With a satisfied laugh, Alice smiles.@
>...Food, the only thing that makes this glutton smile...\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Luka"
>Hmm...? Did you hear the sound of hooves?\
name ""
>I hear the hooves of a horse approaching from the other side of the road.@
>After so many days, this would be the first adventurer I've met...\
name "Luka"
>Alice, hurry up!@> Switch to a human appearance before they come!\
name ""
name "Alice"
>...That's not necessary.@
>Hmph, one of those insatiable breeding types.\
name ""
name "Luka"
>Eh...?\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,500
>Uttering that strange remark, Alice vanishes.\
name ""
r@k@\
goto *centa_start



*sean0161

bgm "bgm\field3.ogg"
name ""
r@k@\
name "Luka"
>Whew...@>So, that was Gnome's power...\
name ""
>That strength was insane...@>It was as if the Earth itself was infusing my body.@
>Without that, there's no way I could have pushed that heavy Centaur off of me.\
name "Luka"
>With that strength, I could get out of any hold...@> And if I used that to attack...\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>But that's too much for you at the moment.@
>You would probably screw up and hurt yourself somehow.\
name ""
name "Luka"
>Yeah... That might be true.\
name ""
>I'm still not experienced enough to use it in a fight.@
>For now, I should just focus on using the power to augment my strength for breaking out of binds.\
name "Luka"
>All that's left is to practice, I guess.\
name ""
name "Alice"
>Yeah, well, good luck with that.@
>By the way, isn't it almost sunset?@
>Let's camp here tonight.\
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
>...Luka, make dinner.\
name ""
name "Luka"
>Sheesh, didn't you just eat?\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>...What was that?\
name ""
>Alice raises her eyebrows.\
name "Alice"
>Your protests never cease!@
>Very well, I shall make dinner tonight.\
name ""
name "Luka"
>Eh!?@> Alice, you can cook!?\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>Nothing is impossible for the Monster Lord!\
name ""
name "Luka"
>.............\
name ""
>I'm afraid...\
sean_change "bg080"
bgm "bgm\kiki2.ogg"
>Thus, Alice started to prepare our dinner...@
>I have a bad feeling about this...\
name "Luka"
>Are you OK, Alice?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Of course.@> Just who do you think I am?\
name ""
name "Luka"
>A...Are you really OK?\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>Ahh, shut up!@
>Go away until it's done!\
name ""
csp 700:print 10,500
>I'm forced away from the kitchen area.@
>...But is this really going to be OK?\
sean_change "bg080"
mov %player,1
mov $name,"Nabe"
mov $name2,"Nabe"
mov $tatie1,"onabe_st01"
mov %monster_x,300
mov %monster_y,250
mov %max_enemylife,15
mov %damage_keigen,100
mov %alice_skill,0
mov %music,1
gosub *maxmp:mov %mp,10
gosub *syutugen2
name "Alice"
>Hmph.@>Tremble before my unrivaled skill!\
name ""
r@k@\
goto *nabe1



*nabe1

mov %stopcmd2,1
mov %stopcmd3,1
mov %stopcmd4,1
mov %stopcmd5,1
mov %stopcmd6,1
gosub *cmd_main
if %cmd1=11 goto *nabe_kougeki
if %cmd1=17 goto *nabe_waza
goto *nabe1



*nabe_kougeki

name "Alice"
>Take this!\
name ""
>Alice attacks!
dwave 1,"se\dageki2.ogg"
rnd2 %damage,500,600
mov %damage_nobr,2
gosub *alice_enemylife2
@
dwave 1,"se\syometu2.ogg"
csp 700:print 10,500
>The Nabe was blown away...\
goto *sean0161a



*nabe_waza

saveoff
textoff
cspl 3,7:cspl 601,608
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
gosub *setwindow_04
lsp 601,":s/20,20,0;#FFFFFF#FF4444Omega Blaze - 1 ",70,418:spbtn 601,21
strsp 602,"Frost Ozma - 1",70,445,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 602,22
strsp 603,"Monster Lord's Cruelty - 2",70,472,14,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,23
goto *nabe_waza2



*nabe_waza2

btnwait2 %cmd1
if %cmd1=0 goto *nabe_waza2
if %cmd1=4 mov %saveorload,1:gosub *saveload:goto *nabe_waza
if %cmd1=40 goto *nabe_waza
if %cmd1=41 goto *nabe_waza
cspl 3,7
cspl 601,610
gosub *setwindow_02p
texton
btndef clear
if %cmd1=21 goto *nabe_skill1
if %cmd1=22 goto *nabe_skill2
if %cmd1=23 goto *nabe_skill3
if %cmd1=-1 goto *nabe1
goto *nabe_waza



*nabe_skill1

name "Alice"
>I shall cook you with infernal flames!\
name ""
mov %mp,%mp-1
gosub *mp
skillname "Omega Blaze"
>Alice unleashes a storm of fire!
delay 500
if %effectspeed=2 dwave 1,"se\fire1.ogg":skip 2
mpegplay "effect\movie01.mpg",1
dwave 2,"se\damage2.ogg"
rnd2 %damage,3000,3600
mov %damage_nobr,2
gosub *enemylife2
@
skillname ""
dwave 1,"se\syometu2.ogg"
csp 700:print 10,500
>The Nabe vanishes in a sea of flames...\
goto *sean0161a



*nabe_skill2

name "Alice"
>Your very existence shall be encased in ice!\
name ""
mov %mp,%mp-1
gosub *mp
skillname "Frost Ozma"
>Alice's magical power freezes the air around her!
delay 500
if %effectspeed=2 dwave 1,"se\wind3.ogg":skip 2
mpegplay "effect\movie02.mpg",1
dwave 2,"se\damage2.ogg"
rnd2 %damage,3000,3600
mov %damage_nobr,2
gosub *enemylife2
@
skillname ""
dwave 1,"se\syometu2.ogg"
csp 700:print 10,500
>The Nabe freezes, then shatters!\
goto *sean0161a



*nabe_skill3

name "Alice"
>Feel the power of the Monster Lord!\
name ""
mov %mp,%mp-2
gosub *mp
skillname "Monster Lord's Cruelty"
dwave 1,"se\bom1.ogg"
>Alice unleashes torrents of dark power!
wait 300
flushout 1000
vsp 700,0
bg white,10,1000
dwave 2,"se\damage2.ogg"
quake 10,600
rnd2 %damage,1000,1200
itoa $sel1,%damage
eng "Alice deals "+$sel1+" damage!":$sel6
mov %enemylife,%enemylife-%damage
if %enemylife>%max_enemylife mov %enemylife,%max_enemylife
if %enemylife<0 mov %enemylife,0
if %enemylife=0 mov %gage,0 skip 3
mov %gage,%enemylife*100/%max_enemylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
print 10,500
dwave 2,"se\damage2.ogg"
quake 10,600
rnd2 %damage,1000,1200
itoa $sel1,%damage
eng "Alice deals "+$sel1+" damage!":$sel6/
mov %enemylife,%enemylife-%damage
if %enemylife>%max_enemylife mov %enemylife,%max_enemylife
if %enemylife<0 mov %enemylife,0
if %enemylife=0 mov %gage,0 skip 3
mov %gage,%enemylife*100/%max_enemylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
print 10,500
textclear
dwave 2,"se\damage2.ogg"
quake 10,600
rnd2 %damage,1000,1200
itoa $sel1,%damage
eng "Alice deals "+$sel1+" damage!":$sel6
mov %enemylife,%enemylife-%damage
if %enemylife>%max_enemylife mov %enemylife,%max_enemylife
if %enemylife<0 mov %enemylife,0
if %enemylife=0 mov %gage,0 skip 3
mov %gage,%enemylife*100/%max_enemylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
print 10,500
dwave 2,"se\damage2.ogg"
quake 10,600
rnd2 %damage,1000,1200
itoa $sel1,%damage
eng "Alice deals "+$sel1+" damage!":$sel6/
mov %enemylife,%enemylife-%damage
if %enemylife>%max_enemylife mov %enemylife,%max_enemylife
if %enemylife<0 mov %enemylife,0
if %enemylife=0 mov %gage,0 skip 3
mov %gage,%enemylife*100/%max_enemylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
print 10,500
vsp 700,1
bg "bg\bg080.bmp",10,2000
\
skillname ""
dwave 1,"se\syometu2.ogg"
csp 700:print 10,500
>All proof of the Nabe's existence was erased by the overpowering darkness...\
goto *sean0161a



*sean0161a

name "Alice"
>..............\
name ""
bgmstop
mov %player,0
gosub *clear_sprite
sean_change "bg009"
gosub *setwindow_01p
bgm "bgm\yaei.ogg"
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
dwave 1,"se\lvup.ogg"
name ""
>...The Nabe was defeated!\
name ""
name "Luka"
>What's with that self confident face...\
name ""
>Thanks to that display of ineptitude, we'll be having dry meat for dinner.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...It was unavoidable, I was never taught cooking skills.@
>All I studied was how to be a good Monster Lord, not how to be a homemaker.\
name ""
name "Luka"
>Studied how to be a good Monster Lord?@> Who taught you?\
name ""
name "Alice"
>...Tamamo.@
>She was put in charge of my education by the previous Monster Lord.\
name ""
name "Luka"
>...Eh? You're younger than Tamamo?\
>Actually, just how old are you anyway?@
>Since you're the Monster Lord... About 300 years old?\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>You fool!@>I'll be 22 this year!\
name ""
name "Luka"
>Ehh!?@>You're that young!?\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>I'm older than you.@>Show some respect.@> You idiot.\
name ""
name "Luka"
>Anyway... So Tamamo is your mentor?@
>Just how old is Tamamo?\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...I don't know.@
>She's certainly the oldest of the Four Heavenly Knights.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
>I've heard she was also in charge of my mother's education.@
>There are even rumors that she was in charge of the last five Monster Lord's training.\
name ""
name "Luka"
>............\
name ""
>It feels like I've heard something insane...\
name "Alice"
>...That's enough of that topic.@
>It's time to start tonight's combat training.\
>You need to be able to really use Sylph and Gnome's power as soon as possible.\
name ""
name "Luka"
>Alright, I'll do my best!\
name ""
>Thus began my intensive training with Alice again tonight...\
sean_change "bg009"
name "Luka"
>Whew...\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>As usual, you're horrible at using Sylph's power.@
>All you have to do is infuse yourself with the wind, and move as if you were a gale.\
name ""
name "Luka"
>Ev...Even if you say it that easily...\
name ""
>Saying it is much different than actually doing it...\
name "Alice"
>Also, you may have already noticed it.@> But you can't use Sylph and Gnome's power at the same time yet.\
>As soon as you summon one, you lose all grasp of the other.@>Another pathetic shortcoming.\
name ""
name "Luka"
>I see...@> I'll take care not to mix them up then.\
name ""
>I should be careful about whom I use my concentration on to call.@>I wouldn't want to waste time and power on a difficult enemy by summoning the wrong one.\
name "Luka"
>Once I get Undine and Salamander, it will get even more confusing...@
>Choosing from all four of them...\
name ""
name "Alice"
>If you improve yourself, you should be able to summon all of their power at the same time.\
>Moving like the wind, with the strength of the earth, your heart calm and flowing like water, with your attacks holding the blazing power of fire.\
>But that's getting ahead of ourselves for now.\
name ""
name "Luka"
>You said something like that before, too...@>But it still sounds suspicious.\
>Who did you hear that from?@>It doesn't sound like something you would come up with.\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>What? I know you're a fool, but I can't believe you said something that stupid.@
>A wannabe Hero doesn't even know the oral tradition handed down by that human Hero Heinrich?\
name ""
name "Luka"
>Ehh!?\
name ""
>I've looked up to Heinrich since I was a child...@
>But I've never heard about such words coming from him.\
name "Luka"
>R...Really?@
>Why do you know that quote then, Alice?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Rather, why don't you know the quote, oh aspiring Hero?@
>Heinrich mastered those abilities, and used them to take down the Monster Lord.\
>She was called "Black Alice", and was the feared 8th Monster Lord.\
>Do you still think that quote is suspicious?\
name ""
name "Luka"
>I...I see.@> In that case, that changes things!\
>Alright, it's time to practice with renewed effort!@
>Until I move like the earth, and calm like the... fire?@>Wait, how did it go again?\
name ""
name "Alice"
>First, you need to move like the wind.@
>Instead of just running around like a lunatic, you need to move in controlled bursts of speed, like a gale.\
name ""
name "Luka"
>Uoooo!@
>I'll become the wind!\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Sheesh...\
name ""
>Too fired up and enthused to do anything, my remaining efforts were wasted that night...\
sean_change "bg009"
>It's time for bed.@
>I won't neglect my prayers to Ilias, of course.\
name "Luka"
>Ilias, please watch over me.@
>Please, let your wisdom and judgement show me a way to let monsters and humans live together peacefully.\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...Contradicting yourself as usual.@
>You ask for her protection, then immediately ask her something that goes against what she stands for.\
name ""
name "Luka"
>No, that's not what I was...\
name ""
>Alice attacks my weak point, as usual...\
name "Alice"
>Your belief system is full of contradictions.\
>You want to follow Ilias, who wants to purge monsters.@
>But then you want monsters and humans to live together peacefully.\
>You rebelled against your father's way of life, who wanted to take down the Monster Lord.@
>But then your mother made it so that you could choose no path but one of a Hero.\
>Your values and beliefs are pulling you in every direction at once.@
>You understand that, don't you?\
name ""
name "Luka"
>............\
name ""
name "Alice"
>You trained so intensely all those years just to keep your mind off all that, didn't you?@
>You're going to have a breakdown eventually.\
>You're going to have to decide and solve those contradictions.@
>Even I don't really know what's going on inside you.\
name ""
name "Luka"
>...I see.\
name ""
>I don't even really know myself...@
>But I know I'll have to deal with my inconsistent beliefs...\
>Ilias' teachings...@>My ideals...\
>They are very different...\
name "Luka"
>...I'll figure it out on the journey.@
>There's still a lot in this world I don't know about.\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...Yes, that's true.@
>Even Heinrich didn't start out as a legendary Hero.@
>His road to that was paved with hardships and battles all along the way...\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
>Just keep going until you get to your "answer" at the end.@
>...Well, that's if it doesn't end abruptly mid-way, of course.\
name ""
name "Luka"
>I...I'm not going to quit mid way!@
>I'll make it all the way, and beat the Four Heavenly Knights!\
name ""
>Those four are causing so much trouble recently, they're the biggest obstacle to peace at the moment.\
>Even though I may not have my answer yet, that is a solid goal to reach for.\
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>Hehe, well, try your best.@
>As I said at the start of the journey, Luka...@
>I want to see if all that you say really is your true self or not.\
>If you don't want me to laugh at you, make your fantasy world of sugar and rainbows come true.\
name ""
name "Luka"
>Yes... I'll show it to you, Alice!\
name ""
>Standing in front of Alice, my determination is renewed.\
>After that, I fell asleep.@
>That was the first night I went to sleep without praying.\
bgmstop
sean_change "bg079"
bgm "bgm\field3.ogg"
>After waking up, we began walking east again.@
>In a few more days, we should be at the Grand Noah Castle.\
name "Luka"
>Wow... What a pretty river.\
name ""
>This region really is beautiful.@> Everything looks so serene and peaceful.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>This isn't the time to rest, you idiot.@
>Right now, monsters are eyeing you hungrily, waiting for a chance to attack.\
name ""
name "Luka"
>Eh...?\
name ""
csp 700:print 10,500
>In a panic, I take a look around.@
>Not seeing anything behind me, I turn back to the river, to see monsters crawling out of it toward me!\
r@k@\
goto *kaeru_start



*sean0162
name ""
r@k@\
bgm "bgm\field3.ogg"
name "Luka"
>Whew...\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>What's with that sad face?@
>Are you hungry?\
name ""
name "Luka"
>Why would that be your first...@>Never mind.@
>Recently, it feels like I've been short on SP...\
>I want to use a lot of moves, but I always feel like I don't have enough.\
name ""
name "Alice"
>Hmm... It's true you've gotten techniques a lot faster than you've managed to increase your SP.@
>But if you keep at it, I'm sure it will fix itself someday.\
name ""
name "Luka"
>You seem awfully friendly right now.@
>Are you hungry?\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>What's wrong with a little praise now and then, you idiot?@
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
>...Putting that aside, let's do a little review.@
>First, Sylph.\
>Her wind protection is good for things that can be easily blown away by the wind. Projectiles, easily cut plants, things of that nature.\
>Strong physical objects are much more likely to get past that weak wind you're able to summon.\
name ""
name "Luka"
>It's also been pretty good against status effect moves.\
name ""
name "Alice"
>Yes, that's right.@
>Those kinds of moves usually rely on some type of magic or substance, which can be blocked or blown away by the wind.\
>Next is Gnome's power.@> You can't use it to attack yet, but you can give yourself an intense burst of strength to break out of restraints and binds.\
name ""
name "Luka"
>So when I see an enemy, I should try to decide what they seem more likely to attack me with...\
name ""
name "Alice"
>You can also forgo any protection at all, and just try to beat them before they beat you.@
>It's quite dangerous, but it may be worth a try in some cases.\
name ""
name "Luka"
>Discard all defense, and go all out... Eh?\
name ""
name "Alice"
>I can't really recommend doing that, but who knows.@
>Anyway, that's it for my advice.\
name ""
name "Luka"
>Thank you, Alice.\
name ""
lsp 700,":a;chara\alice_st08b.bmp",67,0:print 10,500
name "Alice"
>Hmph.\
name ""
>After going over some of the tactics with Alice again, we set off for the east again.\
dwave 1,"se\asioto2.ogg"
sean_change "bg078"
name "Luka"
>At this rate, we'll get to sleep in a soft bed at Grand Noah Castle tonight!\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>Ah, I'm looking forward to the food at the Colosseum...!\
name ""
>As we both talk about what we're looking forward to on our way to the castle, we run into a monster blocking the road!\
r@k@\
goto *alraune_start



*sean0163
name ""
r@k@\
bgm "bgm\field3.ogg"
name "Luka"
>Whew... I really think I've gotten a lot better recently.\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>What are you saying, you idiot?@
>Are you really satisfied with that level of skill?\
name ""
name "Luka"
>Th...That's not what I was saying...\
name ""
lsp 700,":a;chara\sylph_st21r.bmp",221,190
lsp 701,":a;chara\gnome_st31r.bmp",413,145:print 10,500
>In response to Alice's words, the two spirits inside of me appear before me.\
name "Sylph"
>We'll try our best too!@
lsp 701,":a;chara\gnome_st32r.bmp",414,145:print 10,500
>Won't we, Gnomey!? \
name ""
lsp 700,":a;chara\sylph_st22r.bmp",211,186
lsp 701,":a;chara\gnome_st33r.bmp",319,145:print 10,200
dwave 1,"se\dageki.ogg"
name "Sylph"
>Hya!\
name ""
name "Luka"
>Oi, oi, Gnome.@> Don't pick on Sylph too much.\
name ""
cspl 700,701:print 10,500
>Anyway, she's right.@> I'm still not good enough.@
>While I think about my shortcomings, we head toward the castle grounds.\
dwave 1,"se\asioto2.ogg"
sean_change "bg019"
>Grand Noah Castle is almost before our eyes!@
>Once we're past this plain, we'll be there!\
lsp 700,":a;chara\sisterlamia_st31.bmp",40,0:print 10,500
>While on the trail to the castle, we come across a Sister that must have been traveling from the castle.\
name "Sister"
>Oh, you two are quite young for travelers.@
>Would you like to pray to Ilias with me for safety on your travels?\
name ""
name "Luka"
>Yes, I would love to.\
name ""
lsp 700,":a;chara\alice_st11.bmp",0,0
lsp 701,":a;chara\sisterlamia_st31.bmp",200,40:print 10,500
name "Alice"
>.............\
name ""
>Alice jumps in front of me, interrupting us.\
name "Alice"
>You there.@> What are you trying to pull?@
>That disguise is disgusting.\
name ""
csp 701
lsp 700,":a;chara\sisterlamia_st31.bmp",40,0:print 10,500
name "Sister"
>Ara, so you can see through me...\
name ""
>Saying that, the Sister turns into her true appearance!\
wait 500
saveoff
bgmstop
bgmonce "bgm\battlestart.ogg"
lsp 700,":a;chara\sisterlamia_st01.bmp",40,0:print 10,500
eng "Lamia Sister appears!":$sel6/
wait 1000
delay 4500
bgm "bgm\battle.ogg"
\
name "Luka"
>Ah!@>A monster!?\
name ""
>Startled, I quickly take out my sword.\
name "Sister Lamia"
>...Please wait.@>I mean no harm to humans.\
name ""
name "Luka"
>Eh...?\
name ""
>She isn't making any hostile action...@
>Slightly ashamed at drawing my sword right away, I sheepishly put it away.\
bgm "bgm\field3.ogg"
name "Luka"
>So...Sorry...@
>But why are you disguised as a Sister?\
name ""
name "Sister Lamia"
>It is no mere disguise.@
>My body and soul are faithful to Goddess Ilias.\
name ""
name "Luka"
>But why would a monster...?\
name ""
name "Sister Lamia"
>Yes, it's true Ilias hates monsters...@
>But even though I am a monster, I want to teach others about her kindness.\
>Though they are few, there are a few monsters who think as I do.\
name ""
name "Luka"
>I see... I had no idea...\
name ""
>I can't believe there's a monster who's a follower of Ilias...\
>It must be difficult to be faithful to a god who hates you...@
>But even then, it seems as though she isn't giving up in her beliefs.\
name "Sister Lamia"
>I was on my way to the south to do more missionary work for other monsters.@
>But since I'll be heading to the south, I thought it wise to disguise myself as a human.\
name ""
name "Luka"
>It's true you would want to disguise yourself if you're heading south...@
>Wait, "since you're heading to the south"?@> Do you not need to disguise here in the north?\
name ""
name "Sister Lamia"
>It sounds like this is your first time here, travelers.@
>The Noah Region is home to many villages and towns, where humans and monsters live together.\
>Of course, there is still some bias and prejudice...@> But people generally get along.\
name "Luka"
>I...I see...@
>I heard the rumors, but I wasn't sure if they were true or not.\
name ""
>The Noah people are known for kindness and their open hearts.@
>I guess that's how they're still living together...\
name "Sister Lamia"
>Well then, young miss over there.@>You are a snake type monster, too, yes?\
>You have no need for a disguise here.\
name ""
lsp 700,":a;chara\alice_st11.bmp",0,0
lsp 701,":a;chara\sisterlamia_st01.bmp",200,50:print 10,500
name "Alice"
>Hmph. I see.\
name ""
>Even though we're close to a human town, it doesn't seem like Alice's disguise is needed here.\
name "Sister Lamia"
>Now if you'll excuse me, I must be going.@
>It was a pleasure meeting you two, and may Ilias bless your travels.\
name ""
name "Luka"
>Thank you.@> I hope the best for you, too.\
name ""
name "Alice"
>I don't want Ilias' blessing, you idiot.\
name ""
dwave 1,"se\escape.ogg"
csp 701:print 10,500
>The pious Lamia heads the direction we came from.@
>As I turn to wave her farewell, I feel Alice's glaring eyes in my back.\
name "Luka"
>So monsters and humans really do still get along here...@
>That makes me really happy...\
name ""
>My ideal world...@
>It seems like Noah is the closest to it already!\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>But to think there are even monsters here who follow Ilias...\
name ""
name "Luka"
>What's wrong with that?\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>...Whatever.@> They're free to believe whatever drivel they want.\
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
>Anyway, it will be nice to pass without any hindrances for a change.\
name ""
name "Luka"
>Alright, let's go!\
name ""
>We continue down the path again, heading toward the castle.\
dwave 1,"se\asioto2.ogg"
bgmstop
sean_change "bg081"
bgm "bgm\city1.ogg"
name "Luka"
>Uwa...\
name ""
>This is my second time seeing something I never thought possible.@
>Humans and monsters walking around together in a city...\
>One third human male, one third human female, and one third monster...@
>They're all walking around, as if the presence of each other is of no big deal.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...To think they're this familiar with each other.@
>I had heard the stories, but I had no idea it went this far.\
name ""
>It seems the monsters walking around aren't taking any special notice of Alice...\
name "Luka"
>It's amazing.@>The sight of humans and monsters living together...\
name ""
>In Port Natalia it was a little similar, but exclusive only to Mermaids.@
>Here, many different races are walking around...\
>Humans and monsters can exist together...@
>Noah is my proof!\
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>...How does it feel, Luka?@
>You're in the presence of your dream world, no?\
>Or...@>Does it feel anti-climactic to see it already exists?\
name ""
name "Luka"
>No, it isn't anti-climactic at all.@
>My dream isn't fulfilled until this is a view you would see in every town, city and village in the world.\
name ""
>Some day, the world will look just like this.\
name "Luka"
>Let's take a walk around and gather information while we look for a place to stay.\
name ""
r@k@\
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
csp 700:csp 611:cspl 3,7
mov %hanyo1,0:mov %hanyo2,0:mov %hanyo3,0:mov %hanyo4,0
gosub *city16_main
gosub *setwindow_01p
name "Luka"
>Alright, let's head to the inn.\
name ""
>After sleeping outside for so long, I'm looking forward to sleeping on an actual bed for once.@
>We hurry on toward the inn.\
bgmstop
sean_change "bg083"
bgm "bgm\hutuu1.ogg"
name "Luka"
>This city is great.\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...Honestly, I'm surprised.@
>I thought all humans essentially detested monsters.\
name ""
name "Luka"
>This Noah Region is surrounded by nature and natural beauty in every direction.@
>I'm sure humans and monsters must have been together here since ancient times.\
name ""
name "Alice"
>That may be true...@
>But the further north we go, the stronger the monsters get.\
>Perhaps it was just impossible for the humans to expel the monsters due to the differences in power.\
name ""
name "Luka"
>But it doesn't seem like the monsters are in a ruling position over the humans.@
>I get the feeling that the humans here see monsters as just ordinary people.\
name ""
name "Alice"
>Monsters living in a human city seems crazy, anyway.@
>There must be quite a few challenges adapting to being in a human city.\
name ""
name "Luka"
>Even if there are a few issues, it's still a huge step forward.@
>I knew it!@> It's still possible for coexistence!\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Hmph.@>That may be true.@
>If this...\
name ""
>Alice folds her arms together, and agrees with me for once.\
name "Luka"
>By the way, Alice.@> Can I ask you something?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...Hmm?@>What?\
name ""
name "Luka"
>I've been wondering for a while...@> What's that flower in your hair?\
>Is it an accessory?@>Or part of your hair?\
name ""
name "Alice"
>It's a part of my body.@
>The Monster Lord usually has other lifeforms living with her...@
>But now that you mention it, this flower hasn't had any nutrients for a while...\
name ""
r@k@\
goto *sean0163a



*sean0163a

>Alice stares right into my eyes after saying that.@
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
>Suddenly, a disturbing grin flashes across her face.\
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %con_hvoice=0 dwave 0,"voice\alice6_01.ogg"
name "Alice"
>...Won't you give this flower some nutrients?
>Of course, you know what nutrients those are?\
name ""
dwavestop 0
name "Luka"
>Eh...?@> Uwa!\
name ""
>Alice's winding tail wraps around my body, sealing my movements.@
>She reaches out towards my pants, and slowly starts to lower them down.\
name "Luka"
>Wh...What are you doing!?\
name ""
if %con_hvoice=0 dwave 0,"voice\alice6_02.ogg"
name "Alice"
>Didn't I already say it? ...Give this flower some nutrients.
>Let it absorb plenty of your semen, so it can grow nice and healthy.\
name ""
dwavestop 0
>Alice's hair begins to move as if it has a will of its own.\
csp 699
lsp 700,":a;chara\alice_h06_1r.bmp",0,0:print 10,500
>The hair winds around my penis, until it's completely entangled.\
name "Luka"
>Ahh... What is... This...?\
name ""
>A slight tickling sensation attacks me, as her smooth hair winds and wraps around me.@
>The strange feeling of her silky hair, moving and slightly tightening around me makes me moan before I can stop myself.\
name ""
if %con_hvoice=0 dwave 0,"voice\alice6_03.ogg"
name "Alice"
>When my hair wraps around someone, it sends them into a trance.
>If I wrap my hair around a man like this... It's a one-hit kill.\
if %con_hvoice=0 dwave 0,"voice\alice6_04.ogg"
>Hora... My hair is wrapping round and round your penis...
>With your lower body being wrapped in pleasure, it feels like you're going to come, doesn't it?\
name ""
dwavestop 0
name "Luka"
>Ahhh...\
name ""
>Her silky hair moves all around, rubbing and slightly tickling every inch of my penis.@
>Just as she said, every time her hair tightens around me, it feels like ecstasy is taking away control of my own body.\
>The trance like state feels like I'm going to come any instant, but I try to hold out at the last second.\
name "Luka"
>N...No... Not this...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice6_05.ogg"
name "Alice"
>Hehe... Being stubborn?
>That patience... Shall I see how long it can hold out?\
name ""
dwavestop 0
>The hair around my dick starts to move back and forth, each strand of hair crawling and creeping up and down.@
>My body shakes as the smooth strands lovingly caress me.\
name "Luka"
>Ahhh!@
>S...Stop...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice6_06.ogg"
name "Alice"
>Hora, hora hora...
>That sensitive tip... I'll slowly tickle it...\
if %con_hvoice=0 dwave 0,"voice\alice6_07.ogg"
>With my hair playing with your penis, are you still able to stand it?
>You can't, right? Hehe...\
name ""
dwavestop 0
>Her strands of silky silver hair continue to crawl up and down my penis, gently tickling and rubbing me as they continue to slowly caress my shaft.\
if %con_hvoice=0 dwave 0,"voice\alice6_08.ogg"
name "Alice"
>Hehe... Next, I'll gradually tighten it...\
if %con_hvoice=0 dwave 0,"voice\alice6_09.ogg"
>Horahorahora... Well?
>You can't take it any longer, can you?\
name ""
dwavestop 0
>Her soft hair gently starts to gradually tighten around me.@
>The tiny strands wrap around even under the tip of my penis, a sensitive spot I've never felt touched before.\
name "Luka"
>Ahhh...\
name ""
>As if already in a trance, I sigh at the stimulation from her hair.@
>Exhausted from the pleasure, I embrace it, and give my body over to Alice's hair.\
if %con_hvoice=0 dwave 0,"voice\alice6_10.ogg"
name "Alice"
>Hehe, already gave up...
>If you're doing that, you must have liked the taste of pleasure from my hair.\
if %con_hvoice=0 dwave 0,"voice\alice6_11.ogg"
>All that's left is for my hair to finish you off...
>Now, let my hair suck up plenty of your semen...\
name ""
dwavestop 0
name "Luka"
>Ahh... That feels good...\
name ""
>Having given myself over completely to her hair, I feel my body slacken as the feelings of an orgasm come racing through my lower body.\
name "Luka"
>Ah... I'm coming... !@
>Ahhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice_h06_2r.bmp",0,0
gosub *syasei2
>Wrapped in her hair, my white semen shoots out and covers the silver strands, still gently wrapped around me.\
name "Luka"
>Ahhh... Ahh...\
name ""
>The hair starts to move a little, and the semen that landed on it is slowly being absorbed.\
if %con_hvoice=0 dwave 0,"voice\alice6_12.ogg"
name "Alice"
>Hehe... Having your semen sucked by hair is quite something, isn't it?
>This time, why don't you let this flower suck up your semen directly?\
name ""
dwavestop 0
name "Luka"
>Eh...?\
name ""
>The flower on Alice's head begins to seductively move side to side.\
mov %hseanwave,15:hseanwave
lsp 700,":a;chara\alice_h06_3r.bmp",0,0:print 10,500
>Moving on its own, the flower wraps around my penis!\
name "Luka"
>Wh...What the?@
>Ahhh!\
name ""
>The sticky petals of the flower start to rub my penis.@
>At the same time, the flower starts a powerful sucking motion.\
if %con_hvoice=0 dwave 0,"voice\alice6_13.ogg"
name "Alice"
>Once devoured by this flower, no man can endure it.
>Just like that, their semen will be sucked out...\
if %con_hvoice=0 dwave 0,"voice\alice6_14.ogg"
>Hehe, you seem to be enjoying yourself as my flower sucks out your semen.\
name ""
dwavestop 0
name "Luka"
>Ahhh...\
name ""
>With the flower greedily sucking and rubbing me, it feels like my penis is being devoured by it.\
>The strange sensation of the soft petals tightening around me at the same time as the flower itself violently sucks on me is too much to take.\
name "Luka"
>Ahh... Incredible...\
name ""
>Overcome with pleasure, I'm completely exhausted.@
>I can't feel any part of my body except for what's going on between my legs.\
if %con_hvoice=0 dwave 0,"voice\alice6_15.ogg"
name "Alice"
>What a pathetic face... You're drooling, too.\
if %con_hvoice=0 dwave 0,"voice\alice6_16.ogg"
>Giving your penis over to my flower, and immersing yourself in the pleasure...
>How pitiful, hehehe.\
name ""
dwavestop 0
name "Luka"
>B...But that's because...@
>Ahhh!\
name ""
>Before I can finish my sentence...@
mov %hseanwave,16:hseanwave
>The petals from her flower close around me even tighter.\
>As if stuck in a vacuum, the intense sucking only gets even more powerful, forcing me over the edge in an instant.\
gosub *syasei1
lsp 700,":a;chara\alice_h06_4r.bmp",0,0
gosub *syasei2
name "Luka"
>Ahh... I came...\
name ""
>All during my ejaculation, the flower greedily sucks up every drop.@
>It truly is like it's sucking my semen straight out from inside of me...\
if %con_hvoice=0 dwave 0,"voice\alice6_17.ogg"
name "Alice"
>Hehe, you already let it out?
>It looks like you couldn't hold on at all, how miserable.\
if %con_hvoice=0 dwave 0,"voice\alice6_18.ogg"
>Hora... My beautiful flower hasn't sucked in nearly enough.
>More and more... Let it slurp up even more semen...\
name ""
dwavestop 0
name "Luka"
>Ahhh!\
name ""
>Her flower tightens around me even more, as the sticky petals rub me with even more intensity.\
>Like that, it continues its rhythmic sucking motions...@
>Squeezing, rubbing, sucking... As if her flower is carefully trying to milk out everything.\
name "Luka"
>Ahh... Don't suck on it like that...@
>I'm going to come again...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice6_19.ogg"
name "Alice"
>Already unable to do anything... What a pathetic guy.
>Are you really that happy at having your semen sucked out?\
name ""
dwavestop 0
name "Luka"
>I'm not... happy...@
>Ahhhh!\
name ""
>But as if my body couldn't bear listening to what I said, it instantly rejoices in a powerful orgasm.\
gosub *syasei1
lsp 700,":a;chara\alice_h06_5r.bmp",0,0
gosub *syasei2
name "Luka"
>Ahhh...\
name ""
>As I moan and sigh and in the afterglow of the orgasm while the flower sucks out every drop, I notice that the color of the flower seems to be turning slightly whiter.\
if %con_hvoice=0 dwave 0,"voice\alice6_20.ogg"
name "Alice"
>Hehehe... Came again?
>Aren't you happy... You get to be sucked so much by my flower.\
name ""
dwavestop 0
name "Luka"
>Ahh... Stop this...@
>This isn't good...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice6_21.ogg"
name "Alice"
>Hehe... What do you mean isn't good?
>With your shaft shooting off so much semen, aren't you overjoyed at it?\
if %con_hvoice=0 dwave 0,"voice\alice6_22.ogg"
>Hora... I'll suck even more.
>Until this flower is dyed white in your semen...\
name ""
dwavestop 0
name "Luka"
>Hya!@> Ahhhh!!\
name ""
>Her seductive flower sucks even harder, as if eager to be absorbing myself into it, desperate to be dyed in my color.\
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1:gosub *syasei2
if %con_hvoice=0 dwave 0,"voice\alice6_23.ogg"
name "Alice"
>Hehe, not yet...
>It isn't time to stop squeezing out your semen...\
name ""
dwavestop 0
name "Luka"
>Stop it!@
>Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice_h06_6r.bmp",0,0
gosub *syasei2
if %con_hvoice=0 dwave 0,"voice\alice6_24.ogg"
name "Alice"
>...It looks like it's becoming hard for you to come.
>But this flower won't give any mercy.\
if %con_hvoice=0 dwave 0,"voice\alice6_25.ogg"
>Hora... It's going to suck everything up until the last drop, you know?
>I'll have to squeeze harder to get out the rest...\
name ""
dwavestop 0
name "Luka"
>Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice_h06_7r.bmp",0,0
gosub *syasei2
if %con_hvoice=0 dwave 0,"voice\alice6_26.ogg"
name "Alice"
>Hehe... It's turned quite white.
>But is your semen almost all gone...?\
name ""
dwavestop 0
name "Luka"
>Ah... Ahhh...\
name ""
gosub *syasei1
gosub *syasei2
>Only a tiny drop of semen comes out from the last orgasm.@
>The flower keeps on sucking, but nothing more comes out.\
mov %hseanwave,0:hseanwave
if %con_hvoice=0 dwave 0,"voice\alice6_27.ogg"
name "Alice"
>Hehe, it looks like you've been sucked dry.
>Look... My flower is pure white because of your semen.\
if %con_hvoice=0 dwave 0,"voice\alice6_28.ogg"
>Are you satisfied after being sucked that much?\
name ""
dwavestop 0
name "Luka"
>Ahh...\
name ""
>Exhausted, I can barely get a look at the white flower Alice is so proud to point out.@
>I feel myself slip into a deep sleep.\
gosub *anten
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_alice6,1
bgmstop
textoff
csp -1
bg black,99,5000,"system\lngtwave.dll/vwi"
bg "bg\bg001.bmp",99,5000,"system\lngtwave.dll/vwi"
wait 1500
gosub *setwindow_01
name "???"
>Luka...@>Oh brave Luka...\
name ""
name "Luka"
>Ah...\
name ""
>I hear a voice calling me...@
>From where...?\
bgm "bgm\irias.ogg"
lsp 700,":a;chara\iriasu_st01.bmp",0,0
print 10,3000
name "Ilias"
>Do not lose your way, Luka.@
>The fate of the world hangs off the edge of your sword.\
name ""
name "Luka"
>B...But...\
name ""
name "Ilias"
>Defeat the Monster Lord, Luka...@
>That is what a true Hero would do...\
name ""
name "Luka"
>.............\
name ""
>Are these the words of Ilias?@
>Or is this an illusion produced in my heart...?\
>In either case, I can only do what I believe in...\
bgmstop
textoff
csp -1
bg black,99,5000,"system\lngtwave.dll/vwi"
wait 500
sean_change "bg038"
bgm "bgm\city1.ogg"
r@k@\
>The next morning...\
name "Luka"
>Hey, Alice...@>Can I ask a favor...?\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>What?@>You want to be sucked dry again?\
name ""
name "Luka"
>N...No!@
>Before we leave the city, I want to go see the Colosseum...\
name ""
>As a swordsman, I'm interested in the Colosseum.@
>Actually participating may be too much to wish for, but I would like to at least watch.\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...All you do is stupid things for other people.@
>You should do something for yourself for once.\
name ""
name "Luka"
>.........?\
name ""
>Alice's kind words seem more creepy than anything.\
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>Ahh...@> The food stands...@>What should I get!?\
name ""
>Aha, so that's what she was getting at.@
>Anyway, I guess we should head over to the Colosseum.\
dwave 1,"se\asioto2.ogg"
bgmstop
sean_change "bg084"
bgm "bgm\colosseum.ogg"
name "Luka"
>The tickets are surprisingly expensive...\
name ""
>After spending a fortune, Alice and I look for a seat in the stands.\
>I take a look around at my fellow martial arts enthusiasts...@>Or not.\
>The audience is filled with nothing but young girls and women.@
>There are barely any men at all.\
name "Luka"
>This isn't quite the image I was expecting for a Colosseum...\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>Mmm... Delicious.@
>It's full of calories, and it feels like my power is doubling!\
name ""
name "Luka"
>Oi, oi... You're already eating?\
name ""
>As we take our seats, she's already happily munching on food she obtained somewhere.\
lsp 699,":a;chara\alice_st91b.bmp",-110,0
lsp 700,":a;chara\alice_st02b.bmp",-110,0
lsp 701,":a;chara\grandnoa_st11.bmp",160,0:print 10,500
name "Noblewoman"
>..............\
name ""
>A rich looking woman sitting next to us has an annoyed frown on her face.\
name "Luka"
>I...I'm sorry...\
name ""
>Like I was Alice's parent, I apologize for the oversized child's rude behavior.\
cspl 699,701:print 10,500
>Ah, but the match is starting!\
bgm "bgm\battle.ogg"
lsp 700,":a;chara\mob_mamono5.bmp",-180,0:print 10,500
>From one entrance, a Minotauros emerges with a giant ax.@
lsp 701,":a;chara\mob_mamono6.bmp",220,0:print 10,500
>Against her from the other entrance is an agile Centaur Girl.\
>If they're appearing here in the Colosseum, they must both be hardened warriors.\
name "Luka"
>Ahh...@> Who's going to win!?\
name ""
>Barely able to contain my excitement, I watch on as the match begins.\
>The two of them clash together, but the situation quickly goes bad for the Minotauros.\
name "Luka"
>The Minotauros can't keep up with the Centaur's speed at all.\
name ""
>The quick-footed Centaur is easily able to outmaneuver the slow Minotauros.\
>With quick hit and run tactics, she slowly whittles down the ax wielding girl.@
>Helpless, the Minotauros can't do anything but take blow after blow.\
>It looks like the Centaur is a certain winner...@
>Or so I thought at first glance.\
name "Luka"
>...She's luring her in.\
name ""
csp 701
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Yes, so you noticed.@
>She's guarding herself from any serious damage and just inviting a chance.\
name ""
lsp 699,":a;chara\alice_st91b.bmp",-110,0
lsp 700,":a;chara\alice_st01b.bmp",-110,0
lsp 701,":a;chara\grandnoa_st11.bmp",160,0:print 10,500
name "Noblewoman"
>Inviting...?\
name ""
>Overhearing our conversation, the woman next to us interrupts us.\
name "Noblewoman"
>...Excuse me, but what do you mean?\
name ""
name "Luka"
>It looks like she's being attacked without mercy, but she's really just biding her time for a counter attack.\
>She must be incredibly powerful.@> Her opponent is fast, but fairly feeble... All it will take is a single hit.\
name ""
lsp 700,":a;chara\alice_st04b.bmp",-110,0:print 10,500
name "Alice"
>It looks like the fight is completely in the Centaur's control...@
>But she'll make a mistake in her confidence and be crushed.\
name ""
>With food flying out of her mouth, Alice comments on the fight.\
name "Noblewoman"
>...Is that so?@
>I can't see this match ending as anything but a win for the Centaur...\
name ""
>The woman's words are interrupted by sudden action in the arena.\
lsp 700,":a;chara\mob_mamono5.bmp",-180,0
lsp 701,":a;chara\mob_mamono6.bmp",220,0:print 10,500
dwave 1,"se\slash3.ogg"
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
>The Centaur got closer to the Minotauros than usual, trying to land a more powerful blow.@
>Seeing her chance, the Minotauros lands a powerful blow, straight on her body.\
dwave 1,"se\down.ogg"
>Taking the blow full on, the Centaur crumples to the ground.\
csp 701:print 10,500
name "Luka"
>Uwa...@> Is she OK?\
name ""
csp 701
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>If she were human, she would be dead for sure.@
>But as a monster, she'll be fine.@>Besides, she's a trained warrior.\
name ""
>It looks like she's still fine...@>But with that, the match is over.\
bgm "bgm\colosseum.ogg"
>The Minotauros raises her ax in victory, with the audience cheering her on.\
csp 699
lsp 700,":a;chara\grandnoa_st11.bmp",0,0:print 10,500
name "Noblewoman"
>My word... It went exactly as you said.@
>By the way, are you a skilled fighter yourself?\
name ""
name "Luka"
>Well, sort of...\
name ""
>I'm a little shy at praising myself, but I respond.@
>I think I'm decent enough these days...\
name "Noblewoman"
>Hmm. I see.\
name ""
>The woman starts to stroke her chin, as if deep in thought.@
>But before our conversation could continue, the next fight starts.\
lsp 700,":a;chara\durahan_st01.bmp",0,0
lsp 701,":a;chara\mob_gorotuki1.bmp",160,0:print 10,500
>It's a Dullahan against a human opponent.@
>The human man wields a giant ax, and looks like a powerful soldier.\
name "Luka"
>Oh... It's a man against a monster this time...\
name ""
csp 701
lsp 700,":a;chara\grandnoa_st11.bmp",0,0:print 10,500
name "Noblewoman"
>..............\
name ""
lsp 700,":a;chara\durahan_st01.bmp",0,0
lsp 701,":a;chara\mob_gorotuki1.bmp",160,0:print 10,500
>But...@> The match was over very quickly.\
>The man was defeated in seconds, and was crawling at the Dullahan's feet.\
>The next instant...@>Bright lights fill the arena, and the crowd starts to go wild.\
>It almost seems like some sort of performance is about to begin...\
name "Female Spectator A"
>Alright!@> Get him!\
name ""
name "Female Spectator B"
>Rape!@>Rape!\
name ""
name "Luka"
>Eh...?@> It can't be...\
name ""
>All the female members of the audience jump up from their seats.@
>It can't be...\
csp 701
lsp 700,":a;chara\grandnoa_st11.bmp",0,0:print 10,500
name "Noblewoman"
>...I don't wish to watch this any longer.@
>I would like to speak with you, if you wouldn't mind.\
name ""
>The woman gets out of her seat and puts her back to the arena floor, and beckons me to follow her.@
>It looks like she really doesn't want to see what's about to happen...\
name "Luka"
>Y...Yes...\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Hmm?@> Are we already leaving?\
name ""
cspl 699,700:print 10,500
>We follow the woman outside of the Colosseum.\
name "Soldier"
>Ahhhhhh!!\
name ""
>From behind, we hear the screams of the man mixing with pleasure filled shrieks of the female spectators.\
dwave 1,"se\asioto3.ogg"
bgmstop
sean_change "bg043"
bgm "bgm\castle3.ogg"
lsp 700,":a;chara\grandnoa_st11.bmp",0,0:print 10,500
>We follow her to the castle entrance.@
>As if it was her own house, she walks straight up to the main gate.\
name "Luka"
>Uhm... If we just walk in, won't we get arrested or something...?\
name ""
lsp 700,":a;chara\grandnoa_st11.bmp",-190,0
lsp 701,":a;chara\mob_heisi1.bmp",160,0:print 10,500
name "Guard"
>Welcome back, your Majesty!\
name ""
name "Luka"
>Eh...!?\
name ""
>The soldier guarding the entrance eyes me suspiciously.\
name "Noblewoman"
>They are my guests.@>Let them pass.\
name ""
name "Guard"
>Yes!@> Please step this way.\
name ""
cspl 700,701
bg "bg\bg065.bmp",10,500
dwave 1,"se\asioto3.ogg"
lsp 700,":a;chara\grandnoa_st11.bmp",0,0:print 10,500
name "Luka"
>Uhm... Are you by any chance...\
name ""
>As we walk through the castle, I sheepishly start to ask a question.\
name "Grand Noah Queen"
>I am the tenth queen of Grand Noah.\
name ""
name "Luka"
>So you are...\
name ""
>She really is the Queen...@
>To think we were sitting next to her in the Colosseum...\
dwave 1,"se\asioto3.ogg"
sean_change "bg045"
lsp 700,":a;chara\grandnoa_st03.bmp",0,0:print 10,500
name "Grand Noah Queen"
>...As you saw, our country's proud Colosseum has turned into something horrible.\
name ""
>The Queen sits on her throne and lets out a sigh.\
name "Grand Noah Queen"
>The only ones to win are monsters.@
>Every so often there is a human contestant, but it always ends the same way.\
>Since I took the throne fifteen years ago, there has been no human victor yet.@
>I don't discriminate against monsters...@> But that fact is depressing.\
name ""
name "Luka"
>That is kind of sad...\
name ""
>To think not a single human has won in so long...@
>As a fellow human, it's depressing.\
name "Grand Noah Queen"
>These days, the monsters even rape the men right after the win.\
>You noticed the spectators of the Colosseum, yes?@
>They don't care about the fight itself.@>They just like watching females rape men.\
>There are even men that take part in the matches just to be raped!@
>Our once honorable Colosseum has turned into such a horrible thing...\
name ""
name "Luka"
>I see, so that's how it is...\
name ""
>The holy ground for warriors who wish to put their skills to the ultimate test...@
>Now used just as an exhibition show for rape...\
name "Grand Noah Queen"
>But... If that's what the populace wishes for, I can't stop it.@
>I just wish to see it once...\
>Once every four years, the Queen's Cup is held.@
>Just once, I'd like to see a human as the victor...\
>...I'm sure you can see where I'm going with this.\
name ""
name "Luka"
>You want me to win the Queen's Cup?\
name ""
name "Grand Noah Queen"
>Yes, that's right.\
name ""
>The Queen nods silently.\
name "Grand Noah Queen"
>To celebrate the fifteenth year of my coronation, this Queen's Cup prize will be the Green Orb handed down through the royal family.\
>I wish to give this to a human warrior...@
>Would you please fulfill my dream?\
name ""
name "Luka"
>..............\
name ""
>What should I do...?\
r@k@\
csel "Accept",*sean0167,"Decline",*sean0164



*sean0164

lsp 700,":a;chara\grandnoa_st03.bmp",0,0:print 10,500
name "Grand Noah Queen"
>I see...@
>I cannot force you to fight, of course.\
>I'm afraid there's no hope then...\
name ""
name "Luka"
>...I'm sorry to disappoint you.\
name ""
>I have my own dream to work toward.@
>I can't afford to waste time in meaningless fights.\
>Thus, I refused the Queen's request and left the castle.\
dwave 1,"se\asioto3.ogg"
bgmstop
sean_change "bg081"
bgm "bgm\city1.ogg"
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...I thought you wanted to participate in the Colosseum fights?\
name ""
name "Luka"
>I don't have time to play around.@
>I need to hurry up and find Undine.\
name ""
>If someone is in danger, I won't hesitate to fight.@
>But in this case, it wouldn't accomplish anything.\
name "Luka"
>Alright, let's continue the journey.@
>We don't have any time to waste!\
name ""
cspl 699,700:print 10,500
>Now for our next destination...\
r@k@\
mov %genzaiti,9
mov %gloval1_story_sinkou,6:gosub *savegloval1
bgm "bgm\field3.ogg"
goto *map4



*sean0165

gosub *genzaiti_bg
name "Luka"
>I think I should head back to Grand Noah Castle after all...\
name ""
>The Queen's Cup hasn't started yet...@
>I can still sign up to fight...\
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Do whatever you want to do.@
>Nobody will praise you for denying yourself what you want to do.\
name ""
name "Luka"
>..............\
name ""
cspl 699,700:print 10,500
>In the end, I decided to go back to the Queen.\
dwave 1,"se\asioto2.ogg"
sean_change "bg045"
bgm "bgm\castle3.ogg"
lsp 700,":a;chara\grandnoa_st03.bmp",0,0:print 10,500
name "Grand Noah Queen"
>What business do you have with me?@
>Could it be you have rethought my request?\
name ""
name "Luka"
>...Yes.@
>I would like to take part in the Queen's Cup.\
name ""
goto *sean0167a



*sean0167

name "Luka"
>...Alright, I'll do it!\
name ""
>The Queen happily nods at my eager response.\
goto *sean0167a



*sean0167a

>Honestly, I'm not interested in the reward.@
>I just want to test myself against other skilled fighters.\
>I think I'm pretty good now, but I really want to test it against others who are skilled, too.@
>There's a chance I could win...@>But I try to suppress that thought for now.\
lsp 700,":a;chara\grandnoa_st01.bmp",0,0:print 10,500
name "Grand Noah Queen"
>Ah, this is wonderful!@
>That makes you the sixth!\
name ""
name "Luka"
>S...Sixth?@> So I wasn't some unique adventurer catching the Queen's eye...?\
name ""
>In other words, she enlisted five other people like me.\
>She doesn't care who wins, as long as it's a human I guess.\
>I don't care about that, though!@
>I'm just glad I can test myself in the Colosseum!\
name "Grand Noah Queen"
>There's a few days until the Queen's Cup.@
>Until then, please enjoy yourself in my fair city.\
name "Luka"
>Yes, thank you!\
name ""
>Thus, I signed up to participate in the Queen's Cup.@
>The days passed quickly...\
bgmstop
sean_change "bg060"
bgm "bgm\hutuu3.ogg"
>Finally, the first day of the Cup came.@
>I'm waiting with excitement in the holding room for the contestants.\
>Alice is going to be watching me from the stands.@>I think...@> I just assumed she would, but I didn't actually ask her...\
>She may be more engrossed in the food than the fight though.\
name "Luka"
>It sounds like a match just started...@
>Ah, I wish I could see it.\
name ""
>Eager to get inside, I pace back and forth inside the waiting room.\
lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
name "Staff"
>Players are unable to watch the matches of their fellow contestants.@
>This is to keep all players on equal footing, with none getting an unfair advantage by seeing the skills of the other.\
name ""
name "Luka"
>Yes... I understand.\
name ""
csp 700:print 10,500
>So I'll be facing opponents without knowing their fighting style...@
>But they won't know how I fight, either.\
>Restless, I continue to pace around the waiting room.@
>Until finally, my turn comes!\
lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
name "Staff"
>Now then Mr. Luka, please enter the arena.@
>Good luck.\
name ""
name "Luka"
>Yes!\
name ""
>In high spirits, I rush down the hallway toward the arena floor.@
>No matter the opponent, I won't lose!\
bgmstop
sean_change "bg084"
bgm "bgm\colosseum.ogg"
>I step into the open air arena to the sound of the crowd going crazy.@
>It's a completely different feeling from being in the audience!\
name "Female Spectator A"
>Ahah! It's a cute little boy!\
name ""
name "Female Spectator B"
>Oooh! I wonder how he's going to be raped!?\
name ""
>The women in the audience laugh and point at me.@
>It's obvious what they want...\
>In the next moment, my opponent walks out of the entrance opposite of mine!\
r@k@\
goto *durahan_start



*sean0168

bgm "bgm\colosseum.ogg"
r@k@\
name "Dullahan"
>Even though you're a human, you're quite skilled...@
>I need to train even harder...\
>Once I've improved, will you accept my challenge?\
name ""
name "Luka"
>Yes, I'll spar with you whenever!\
name ""
csp 700:print 10,500
>Thus, I made it through the first round!\
bgmstop
sean_change "bg060"
bgm "bgm\hutuu3.ogg"
>After that, there were no fights of any difficulty.@
>The Dullahan was by far the most skilled opponent so far today.\
>After winning four more matches in a row, I've made it to the semi-finals.\
name "Luka"
>Whew...@
>I think I've become too strong...\
name ""
dwave 1,"se\knock.ogg"
>While lost in self congratulations, I hear a knock on the door.\
name "Luka"
>Ah.@>Come in.\
name ""
dwave 1,"se\door2.ogg"
lsp 700,":a;chara\grandnoa_st11.bmp",0,0:print 10,500
name "Grand Noah Queen"
>How are you faring, Luka?\
name ""
>Traveling incognito, the Queen appears at the doorway to the waiting room.\
name "Grand Noah Queen"
>Your abilities are quite astounding for one so young.@
>The other warriors I recruited were...\
name ""
>The Queen lets out a long sigh.@
>That reminds me... I had forgotten about those other people she recruited.\
name "Luka"
>How did the other warriors do?\
name ""
name "Grand Noah Queen"
>They delivered quite disappointing results.@
>Everyone has been wiped out, save you.\
name ""
name "Luka"
>I...I see...\
name ""
>So they all got knocked out before even making it to the semi-finals.@
>The Queen's hopes now all lie with me.\
name "Grand Noah Queen"
>To make matters worse, the undefeated champion enlisted in this year's Queen's Cup.\
>She calls herself Kyuba, and is an incredibly skilled monster.@
>Without fail, she has completely dominated every opponent unlucky enough to be matched against her.\
>She hasn't made an appearance in a while, so I believed that she wouldn't participate this year.@
>Sadly, I do not think even you can manage to grasp victory...\
name ""
name "Luka"
>.............\
name ""
>She thinks I stand no chance.@
>It's like she's sentencing me to a loss.\
name "Luka"
>...I'll win for sure.@>No matter the opponent.\
name ""
name "Grand Noah Queen"
>...Indeed, it is too early to lose all hope.@
>Now you must keep this absolutely secret, but I have information on Kyuba's skills and fighting tactics...\
name ""
name "Luka"
>...No, that wouldn't be fair.@
>She won't know anything about me.\
name ""
>We have to face each other, each not knowing the other's skills.@
>To do otherwise would taint any meaning in fairly testing my abilities in the Colosseum.\
name "Grand Noah Queen"
>Please, defeat Kyuba by any means necessary, and obtain victory!@
>Just once in my life, I want to see a human win this tournament!\
name ""
name "Luka"
>Yes, leave it to me!@
>For now, just watch my next victory!\
name ""
>Encouraged by the Queen's words, the excitement for my next match starts to build.\
bgmstop
sean_change "bg084"
bgm "bgm\colosseum.ogg"
>The next fight starts shortly after that...@
>I wonder if my next opponent will be this Kyuba girl the Queen mentioned...\
>I step out into the arena, and get my first look at the semi-finals opponent I'll be facing.\
r@k@\
goto *kerberos_start



*sean0169

bgm "bgm\colosseum.ogg"
name ""
r@k@\
lsp 700,":a;chara\kerberos_st01.bmp",0,0:print 10,500
name "Cerberus"
>You're quite powerful, human.\
>We didn't think we could stand up to Kyuba...@
>But to think we would be defeated by a human in the semi-finals...\
name ""
name "Luka"
>Is this Kyuba girl really that strong?\
name ""
>If this strong Cerberus was already sure she was going to lose...@
>Just how strong is this Kyuba?\
name "Cerberus"
>...You're about as strong as one of her teeth.@
>I've fought her once before...@> She's on a totally different level.\
name ""
name "Luka"
>......\
name ""
>This is kind of killing the joy in my victory...@
>What kind of insane opponent awaits for the finals...?\
bgmstop
sean_change "bg060"
bgm "bgm\hutuu3.ogg"
>It's finally the finals...@
>As I try to calm myself down in the waiting room...@
dwave 1,"se\knock.ogg"
>Suddenly, there's a knock at the door.\
dwave 1,"se\door2.ogg"
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>I'm coming in...\
name ""
name "Luka"
>...Alice?\
name ""
>Why did she come all the way to the waiting room?@
>There's no way this girl would come here just to cheer me on.\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>The semi-final fight was pretty good.@
>Your skills have improved quite a lot.\
name ""
name "Luka"
>Ah... Thanks...\
name ""
>This isn't like her at all.@>I'm instantly suspicious of her motives.@
>Just what is she after...?\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>The next fight...@>You should forfeit.\
name ""
name "Luka"
>...What!?\
name ""
>I jump up and yell.@>Forfeit before I even fight!?\
name "Luka"
>So... You must have seen this Kyuba girl fight already.@
>What you're saying is... I stand no chance against her?\
name ""
name "Alice"
>I've watched you fight for a long time.@
>This next opponent, you would struggle to even match one of her teeth.\
>Therefore, I came to urge you to forfeit.\
name ""
goto *sean0170



*sean0170

if %continue=1 bgm "bgm\hutuu3.ogg"
if %continue=1 lsp 700,":a;chara\alice_st01b.bmp",67,0:lsp 699,":a;chara\alice_st91b.bmp",67,0
if %continue=1 bg "bg\bg060.bmp",10,5000
if %continue=1 gosub *setwindow_01
mov %continue,0
name "Luka"
>.............\
name ""
>If she came this far to urge me, it must mean I have no chance at all...@
>But should I really give up without even trying?\
r@k@\
csel "Never",*sean0172,"Forfeit",*sean0171



*sean0171

name "Luka"
>I get it...@>I'll forfeit.\
name ""
>I came here to get Undine.@
>Not to win some Colosseum tournament.\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...Hmph.@> That's a wise choice.@
>It's still far too early for you to fight her.\
name ""
name "Luka"
>..........?\
name ""
>...Was that really a good thing to do?@
>But I've already made my choice...\
name "Luka"
>Alright, let's hurry up and leave the Colosseum.@
>Let's get out before anyone sees us.\
name ""
cspl 699,700:print 10,500
>I don't want the Queen to see me sneak out.@
>We creep out of the locker room, making sure not to be seen.\
>Thus, we continue our journey as if the Colosseum never happened.\
bgmstop
gosub *anten
>...But after that, I couldn't stop myself.@
>I kept running away whenever I got even the slightest bit scared.\
>As soon as a situation looked even the slightest bit troublesome, I would run.@
>Once I got into the habit, it was impossible to break.\
>Alice got frustrated, and finally just left me one night.@
>Alone and scared, I went back to my village.\
>Thus, my adventure ends...\
mov $end_go,"sean0170"
goto *badend2



*sean0172

name "Luka"
>...No, I'm not going to forfeit.\
name ""
>After making it all the way to the finals, I don't want to do that.@
>If I run from a stronger opponent, I'll never be able to progress...\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...I see.@
>Well, I just thought I'd come to say that.\
name ""
>Alice lets out a deep sigh.@
>It looks like she isn't going to bother to try to persuade me any more than that.\
name "Luka"
>Don't worry, Alice.@
>If she's really that much stronger than I am, I'll surrender.\
name ""
>This is only a tournament in a Colosseum, after all.@
>It's not like I'll die.\
>The only reason I'm here is to test myself mentally and physically as a swordsman against other skilled opponents.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Sheesh...@>Well, good luck.@
>Try not to break.\
name ""
cspl 699,700:print 10,500
>Spitting out another sigh, Alice leaves the room.\
name "Luka"
>..........\
name ""
>To make Alice come here and say all that...@
>Just what is up with this Kyuba girl...?\
lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
name "Staff"
>Luka, the final match is here!@
>Please, head into the arena!\
name ""
name "Luka"
>R...Right...\
name ""
csp 700:print 10,500
>My body feels stiff with tension as I slowly walk through the hallway to the arena floor.@
>The strong anxiety caused by my unknown opponent causes my legs to drag.\
>The excitement and nervousness mix inside me as I walk into the open air.\
bgmstop
sean_change "bg084"
bgm "bgm\colosseum.ogg"
>As my eyes adjust to the bright sunshine, I look over at the other exit.@
>The opponent I've heard so much about, what is she like...?\
name "Luka"
>Y...You!?\
name ""
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\arumaeruma_st11.bmp",0,0:print 10,500
name "Alma Elma"
>...Ara, if it isn't Luka-boy.@
>Meeting in a place like this...@>How unexpected. \
name ""
>Alma Elma...@
>One of the Four Heavenly Knights... A succubus...\
>But why is she here...?\
name "Luka"
>You can't be... Kyuba!?@
>Why are you...@> What the heck are you plotting!?\
name ""
name "Alma Elma"
>Ara... I'm not plotting anything.@
>Honestly...@>I just love grappling in hand to hand combat. \
>Techniques and skills collide...@> Body parts mingle and mix and get entangled...@
>...Hehehe, isn't it just fantastic?\
name ""
>So the identity of Kyuba was Alma using a pseudonym...@
>So this is why Alice urged me to forfeit...\
r@k@\
goto *arumaeruma2_start



*sean0173

bgm "bgm\boss0.ogg"
name ""
r@k@\
name "Luka"
>What do you mean!?\
name ""
>The match hasn't been decided yet.@
>It can't end like this!\
name "Alma Elma"
>I've already had a lot of fun today. @
>You've been working hard too, Luka-boy.\
dwave 2,"se\miss_wind.ogg"
csp 700:print 1
name ""
name "Luka"
>Eh!?\
name ""
>With a gust of wind, Alma vanishes in front of my eyes.@
>Then in the next moment, I feel her soft lips press against my cheek.\
lsp 700,":a;chara\arumaeruma_st11.bmp",0,0:print 10,500
name "Alma Elma"
>*Kiss*\
>Until next time. \
name ""
dwave 1,"se\escape.ogg"
csp 700:print 1
>After the kiss, she disappears.@
>I look around, but don't see a trace of her.\
name "Luka"
>............\
name ""
>I never saw her move that fast during the fight.@
>If she was able to kiss me like that...\
name "Luka"
>"Equal"... Yeah right...@
>What happened to the competitive match!?\
name ""
>I thought I was seriously on par with her.@
>But the whole time, she was still just playing with me.\
>What a crappy end to the Colosseum tournament...@
>So I'm not someone worthy enough to try against...\
name "Luka"
>............\
name ""
>Just how far above me are the Four Heavenly Knights...?@
>As the victor of the Queen's Cup, I stand with a frown on my face in the middle of the arena.\
bgmstop
sean_change "bg045"
bgm "bgm\castle3.ogg"
lsp 700,":a;chara\grandnoa_st02.bmp",0,0:print 10,500
name "Grand Noah Queen"
>Since taking the throne, I have never experienced such happiness...@
>To think, a warrior appeared who was able to win!\
name ""
>I was invited to an audience with the Queen.@
>I feel really awkward when she's so excited.\
name "Luka"
>...Thank you.\
name ""
name "Grand Noah Queen"
>Now, for the presentation of the prize.@
>Our royal treasure, the Green Orb...@> Please accept it.\
name ""
name "Luka"
>Ah... Yes...\
name ""
>The Queen holds out a beautiful green sphere.@
>I quietly accept it.\
dwave 1,"se\fanfale.ogg"
mov %item06,1
>Green Orb obtained!\
if %item02+%item05=2 mov $sel1,"That reminds me, I got other gems that look like this..."
if %item02+%item05=1 mov $sel1,"Another orb... What the heck are these things?"
if %item02+%item05=0 skip 2
eng $sel1:$sel6\
name "Grand Noah Queen"
>If you are in the area again, please stop by the castle.@
>I'll always welcome the Hero who fulfilled my dream.\
name ""
name "Luka"
>I will.@>If you'll excuse me...\
name ""
>I bow and thank the Queen.@
>With a respectful parting word, I leave the prize awarding ceremony.\
dwave 1,"se\asioto3.ogg"
bgmstop
sean_change "bg081"
bgm "bgm\city1.ogg"
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>I'll congratulate you for now.@
>But you're still not good enough, so don't get all proud of yourself.\
>I don't want to hear that creepy laugh you...@>It looks like you already aren't in that kind of mood.\
name ""
name "Luka"
>Yeah...@>It doesn't feel like I won at all.\
name ""
>After getting so far, I thought I had some real power now.@
>But then she showed up, and just toyed with me again...\
name "Luka"
>...I have to get stronger.\
name ""
name "Alice"
>Yes, so get the rest of the spirits.@
>Get them all together and master their power.@>If you can synergize them together, you'll gain some real strength...\
>If you do that, you'll be at the same level as the Four Heavenly Knights.@
>...Probably.\
name ""
name "Luka"
>...Probably?\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>It all depends on you.@
>If you give the most powerful force in the universe to an idiot, he'd probably just kill himself with it.\
name ""
name "Luka"
>That's true...@> Alright, I'll do my best!\
name ""
cspl 699,700:print 10,500
>I get over the sense of defeat at my worthless victory.@
>Already back in high spirits, I get pumped up at continuing on.\
>Undine and Salamander...@> The two remaining spirits...@
>I need to meet with them and borrow their power to get stronger.\
>Now then, for the next place...\
r@k@\
mov %ivent08,1
mov %genzaiti,9
mov %gloval1_story_sinkou,6:gosub *savegloval1
bgm "bgm\field3.ogg"
goto *map4



*sean0175

gosub *genzaiti_bg
name "Luka"
>Alright, how about we try going to Yamatai village?\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>Hmm hmm...@> That sounds good...@
>Especially the "Onigiri" and "Soba" part...\
name ""
>...I guess she hears whatever she wants to hear.@
>With a sigh, I turn and head down the path that leads to Yamatai.\
dwave 1,"se\asioto2.ogg"
sean_change "bg079"
name "Luka"
>According to the map, this is where we cross the mountain...\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>I'm fine no matter the environment, but are you prepared?\
name ""
name "Luka"
>That's right...@>Gear for mountain climbing...\
name ""
dwave 1,"se\asioto2.ogg"
csp 699
lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
>Before I can check my supplies, an old man crosses our path.\
name "Old Man"
>Oh, you two.@> Heading to Yamatai?\
name ""
name "Luka"
>Yes, I'm getting stuff ready for mountain climbing...\
name ""
name "Old Man"
>Hahaha, you don't need anything like that.@
>I just came back from buying some vegetables from Yamatai.\
>Even an old man like me can cross it in a day.\
name ""
name "Luka"
>I see...\
name ""
csp 700:print 10,500
>Advice from the locals is always useful.@
>I was about to turn back because I didn't think we had enough mountain climbing gear, too.\
>Encouraged by the old man's story, I decide to continue on in my light clothing.\
name ""
dwave 1,"se\asioto2.ogg"
sean_change "bg087"
name "Luka"
>Uhyaaa!!\
name ""
>...No big deal!?@> This is no big deal!?@
>Was he trying to trick me!?@
>Or is that old man some kind of super old man?\
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Hmph.@>Snow.\
name ""
>Alice quickly looks all around her as her tail coils and excitedly runs all over the ground.\
name "Alice"
>Hmph.@>Snow, eh?@>Snow, huh?@> Snow...\
name ""
name "Luka"
>Alice... Is this your first time seeing snow?\
name ""
name "Alice"
>...That's right.@
>But I'm not some child that would get excited at it.\
name ""
name "Luka"
>...............\
name ""
name "Alice"
>...............\
name ""
name "Luka"
>...It's fine if you want to play in it.\
name ""
lsp 700,":a;chara\alice_st09b.bmp",67,0:print 10,500
name "Alice"
>..... \
name ""
>Alice lays on her stomach and uses her tail to propel herself like a missile through the snow.\
dwave 1,"se\escape.ogg"
cspl 699,700:print 10,500
>In only a few seconds, she was already far out of view.\
name "Luka"
>Sheesh...\
name ""
>I laugh at the absurd sight as I wait for her to come back.\
wait 1000
dwave 1,"se\wind2.ogg"
bg "bg\bg085.bmp",10,1500
bgm "bgm\hubuki.ogg"
name "Luka"
>Oioioioioi...\
name ""
>Alice hasn't come back yet...@>It's dark now, and the snow is blowing like crazy.\
>...This...@> Isn't good.@
>I can't wait here like this!\
name "Luka"
>Oi!@>Alice!\
name ""
>I call out, but there's no answer.@
>The only sound is from the wind, easily drowning out my voice.\
name "Luka"
>I can't help it, I have to get out of here.\
name ""
>At any rate, she's the Monster Lord.@> It's not like anything can hurt her.\
>But me... I'll freeze in no time.@
>Standing here in a blizzard is no laughing matter...\
dwave 1,"se\asioto2.ogg"
name "Luka"
>This isn't good... What should I do...?\
name ""
>I want to descend as fast as possible, but I can't see anything through the blizzard.@
>Traveling blind, I pick a direction and start walking.\
>Out of nowhere, a monster attacks me!\
r@k@\
goto *yukionna_start



*sean0176

bgm "bgm\hubuki.ogg"
name ""
r@k@\
name "Luka"
>Urhg...\
name ""
>I managed to defeat her, but I'm still in serious trouble here!\
>I continue to walk aimlessly...@
dwave 1,"se\down.ogg"
>Until, unable to take it any longer, I collapse in the snow.\
name "Luka"
>Not good...@>If I sleep...@>I'll die...\
name ""
>Even though I know that, I can't move my body.@
>Unable to keep my eyes open, I drift off into sleep in the snow.\
bgmstop
textoff
csp -1
bg black,99,5000,"system\lngtwave.dll/vwi"
bg "bg\bg086.bmp",99,5000,"system\lngtwave.dll/vwi"
wait 1500
gosub *setwindow_01p
bgm "bgm\yamatai.ogg"
name "Luka"
>...Where am I?\
name ""
>I open my eyes to be greeted by the sight of leaves above me.@
>I look around me, and don't see even a trace of snow.\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Sheesh, the Hero got stranded in the snow.@
>What a pathetic Hero you are.\
name ""
name "Luka"
>Alice... You saved me...?\
name ""
>It looks like I'm past the mountain...@
>As I take a look to the east, I see something that looks like a human town in the distance.\
name "Alice"
>Just as I thought you had vanished, I came across you sleeping in the snow.@
>Sheesh.@>You better be grateful.\
name ""
>You were the one who vanished first, Alice...@
>But even though that's what I'm thinking, I thank her anyway.\
name "Luka"
>Anyway. it looks like that's Yamatai village over there.@
>Let's hurry up and go!\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>Before that, let's eat.@
>All that's left is some dried fish.\
name ""
name "Luka"
>I do feel pretty hungry...\
name ""
cspl 699,700:print 10,500
>I take out some dried fish from my bag.\
lsp 700,":a;chara\nekomata_st01.bmp",800,0
for %move=0 to 450 step 10
amsp 700,800-%move,0
print 1:wait 20
next
name "Luka"
>Hmm...?\
name ""
>Something is staring at us from the shadows...\
name "Luka"
>Wh...What?\
name ""
lsp 700,":a;chara\nekomata_st05.bmp",0,0:print 10,500
name "Nekomata"
>Nya. \
name ""
>A small cat monster jumps out from behind a nearby tree.\
goto *sean0176x



*sean0176x

if %continue=1 bgm "bgm\yamatai.ogg"
if %continue=1 lsp 700,":a;chara\nekomata_st05.bmp",0,0
if %continue=1 bg "bg\bg086.bmp",10,5000
if %continue=1 gosub *setwindow_01
mov %continue,0
name "Luka"
>...Do you want this?\
name ""
lsp 700,":a;chara\nekomata_st04.bmp",0,0:print 10,500
name "Nekomata"
>Nyaa. \
name ""
>So it's begging for food...@
>But this dried fish is all we have to eat...\
if %item11=0 goto *sean0176y
if %item11=1 goto *sean0176z



*sean0176y

name "Luka"
>I'm sorry, but this is all we have...@>I can't give you any.\
name ""
lsp 700,":a;chara\nekomata_st07.bmp",0,0:print 10,500
name "Nekomata"
>Hissss!!\
name ""
>The Nekomata attacks in anger!\
r@k@\
goto *nekomata_start



*sean0176z

name "Luka"
>That reminds me, we still have that grilled anemone...\
name ""
>That unappetizing looking thing from Iliasport.@
>Why don't I try giving this to the Nekomata...?\
r@k@\
csel "Give",*sean0176a,"Don't",*sean0176b



*sean0176a

name "Luka"
>Here, do you want to eat this?\
name ""
mov %item11,0
>I hold out the grilled anemone to the Nekomata.\
name "Nekomata"
>Nyaa... \
name ""
>The Nekomata's eyes light up in happiness.@
>With a leap, it jumps toward me and takes the grilled anemone from me, and starts to eat it.\
lsp 700,":a;chara\nekomata_st05.bmp",0,0:print 10,500
name "Nekomata"
>Nyaa... \
name ""
>After finishing the anemone, the Nekomata pushes something toward me.@
>This is... A bell?\
name "Luka"
>Are you giving this to me...?\
name ""
lsp 700,":a;chara\nekomata_st04.bmp",0,0:print 10,500
name "Nekomata"
>Nyaa!\
name ""
>I take the bell the Nekomata pushes toward me.\
dwave 1,"se\fanfale.ogg"
mov %item15,1
>Nekomata's bell obtained!\
name "Luka"
>This...\
name ""
dwave 1,"se\power.ogg"
>Strange power comes flowing into me from the bell!\
mov %getexp,5500:gosub *lvup
name "Nekomata"
>...Nya!\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,500
>With that final parting mew, the Nekomata vanishes into the grass.\
name "Luka"
>...Funny monster.\
name ""
>That's the first time I've had a monster just come at me for some normal food.\
goto *sean0177



*sean0176b

lsp 700,":a;chara\nekomata_st07.bmp",0,0:print 10,500
name "Nekomata"
>Hiss!\
name ""
>The Nekomata attacks in anger!\
r@k@\
goto *nekomata_start



*sean0176c

bgm "bgm\yamatai.ogg"
name ""
r@k@\
name "Luka"
>To think a monster would attack this close to the village...\
name ""
>We're so close to the village, surely they must even pass by this place every so often...@
>Do humans and monsters live together in this village, too...?\
name "Kitten"
>...Nya.\
name ""
name "Luka"
>Hmm...?\
name ""
>When I look down...@>Instead of running away, the kitten is laying on my feet.\
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
>Suddenly, Alice returns.\
name "Alice"
>It looks like you're finished...@> Hmm?@
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
>That kitten...\
name ""
>Alice slowly approaches the frightened kitten.\
name "Luka"
>Don't eat her, Alice!\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>...You idiot, did you really think I would do that?\
name ""
name "Kitten"
>Hiss!\
name ""
dwave 1,"se\escape.ogg"
>The kitten runs away in a panic.\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...........\
name ""
>Alice looks crestfallen.\
name "Luka"
>Alice, do you like cats...?\
name ""
lsp 700,":a;chara\alice_st08b.bmp",67,0:print 10,500
name "Alice"
>...J...Just as much as anyone else would...\
name ""
name "Luka"
>I see...\
name ""
goto *sean0177



*sean0177

>Anyway, I should keep going.@
>We're almost to Yamatai Village.\
dwave 1,"se\asioto2.ogg"
sean_change "bg086"
>I continue walking down the path toward Yamatai Village.@
>As I approach the entrance, two girls in strange costumes block my path.\
>Villagers...?@
>No, those ears are Elf ears!\
r@k@\
goto *waelf_start



*sean0178

bgm "bgm\yamatai.ogg"
name ""
r@k@\
name "Luka"
>Those two were awfully odd...\
name ""
>Two armed elves like that seem out of place in this calm countryside.@
>Even worse, they just attacked me out of nowhere, without letting me get a word in.\
>If they're the type of monsters to hang around Yamatai Village...@>I wonder if the village is OK?\
name "Luka"
>But maybe the Chief's request was to get rid of those elves...\
name ""
lsp 699,":a;chara\alice_st91.bmp",172,0
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Alice"
>I wonder about that...@
>Those two... I doubt they bother the villagers.@
>I got the feeling that they only attack outsiders.\
name ""
name "Luka"
>...That's right, I do remember them saying something about that...\
name ""
>Elven warriors that attack outsiders...@
>A strange man that can pass mountains easily...@>Other strange monsters hanging around so close to the village...\
>There have been a lot of strange things happening on the way to this village.\
name "Luka"
>Anyway, let's go to the village and talk to them.\
name ""
>We continue on toward the village, already within our sight.\
dwave 1,"se\asioto2.ogg"
sean_change "bg088"
name "Luka"
>So this is Yamatai Village...\
name ""
>I haven't seen this kind of rural village before...@
>As far as I can see, it all looks very peaceful, too.\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>Hmm, hmm. hmm.@> What to eat...\
name ""
name "Luka"
>...Hey!@
>Why aren't you in human form!?\
name ""
>Even though we're in Grand Noah, we don't know if the peace extends here, too.@
>Why didn't she take human form before we could be sure...!?\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Don't worry.@> Look over there.\
name ""
>Alice points to her left.\
csp 699
lsp 700,":a;chara\nekomata_st01.bmp",0,50:print 10,500
>Another Nekomata is walking down the street with nobody paying any mind to it.\
name ""
lsp 700,":a;chara\mob_rouzin1.bmp",-170,0
lsp 701,":a;chara\nekomata_st01.bmp",160,50:print 10,500
name "Old Man"
>Oh!@>Mighty Cat!\
name ""
>The old man claps his hands together twice, and bows to the passing Nekomata.\
lsp 700,":a;chara\mob_rouzin1.bmp",-230,0
lsp 701,":a;chara\mob_rouba.bmp",0,0
lsp 702,":a;chara\nekomata_st01.bmp",220,50:print 10,500
name "Old Woman"
>Mighty Cat!@
>Thank you!@> Here, look!\
name ""
lsp 702,":a;chara\nekomata_st04.bmp",220,50:print 10,500
name "Nekomata"
>Nya. \
name ""
>The old woman holds out a fish, and feeds it to the Nekomata.\
cspl 700,702:print 10,500
name "Luka"
>............\
name ""
>Another strange village...\
name "Luka"
>...Hey!@>Alice!\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0
lsp 698,":a;chara\mob_rouzin1.bmp",-240,0
lsp 697,":a;chara\mob_rouba.bmp",240,0:print 10,500
>After turning my eyes away from the Nekomata, I see a bunch of villagers all surrounding Alice!@
>Not good!@>Are they going to attack us!?\
name "Old Man"
>Oh!@>Mighty Snake!\
name ""
>The old man bows in front of Alice, and claps his hands together twice.\
name "Old Woman"
>Mighty Snake!@
>Thank you!@> Here...@> Ah... What do Mighty Snakes eat again?\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>...You start with soba.\
name ""
name "Old Woman"
>Ah! Soba!@>Please wait a moment, Mighty Snake!\
name ""
name "Old Man"
>"To start with"...?@>Then that means that isn't enough!\
name ""
name "Old Woman"
>She's a greedy Mighty Snake!@> We must pray to her first!\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
>The villagers gather around Alice and clap their hands together twice before bowing.\
name "Luka"
>..............\
name ""
name "Alice"
>..............\
name ""
>...This village is really weird.\
name "Old Woman"
>Mighty Snake!@>Here, soba!\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>Hmm, hmm.@>Thanks for your generous offer.\
name ""
>Alice lays across a nearby stone and starts eating the soba that was offered to her.@
>Just as I was thinking about what to do...\
cspl 697,700
lsp 701,":a;chara\mob_rouzin1.bmp",-160,0
lsp 702,":a;chara\mob_rouba.bmp",160,0:print 10,500
name "Old Man"
>Oh!@>Mighty Fox!\
name ""
name "Old Woman"
>Thank you...@
>Please wait a moment, we'll bring some thin fried tofu!\
name ""
name "Luka"
>Hmm...?@>Mighty Fox?\
name ""
>What crazy thing are they going to start clapping for thi...\
bgm "bgm\tamamo.ogg"
cspl 701,702
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>...Oho?@>You...\
name ""
name "Luka"
>Y...You!?\
name ""
>One of the Four Heavenly Knights, Tamamo.@
>What is someone like her doing in this remote village?\
>Uh oh... She didn't come here to destroy it, did she!?\
name "Luka"
>Wh...What did you come here for!?@
>If you came to do something bad...@> You'll have to get through me first!\
name ""
name "Tamamo"
>Hmmhmmhmm...@> I don't get it, but if you're selling a fight, I'll buy it!\
name ""
>Facing Tamamo, I pull out my sword.@
>I didn't think I'd suddenly end up fighting one of the Knights here!\
lsp 700,":a;chara\tamamo_st01.bmp",0,0
lsp 698,":a;chara\mob_rouzin1.bmp",-240,0
lsp 697,":a;chara\mob_rouba.bmp",240,0:print 10,500
name "Old Man A"
>Oh, Mighty Belligerent Human!\
name ""
name "Old Woman"
>I can't thank that...@
>If you hurt a Mighty Fox, you'll be cursed.\
name ""
name "Old Man B"
>Oh, Mighty Scary Sword!@
>That brings back memories of my late wife...\
name ""
name "Luka"
>............\
name ""
>...There goes all the tension.\
name "Old Woman"
>Mighty Fox!@>Here, thin fried tofu!\
name ""
lsp 700,":a;chara\tamamo_st04.bmp",0,0:print 10,500
name "Tamamo"
>...Mmm. \
name ""
>Tamamo munches on the tofu handed to her, with a contented smile on her face.@
>As she happily nibbles away, the villagers gather around her and clap.\
>...It looks like any intention she had of fighting is gone.\
cspl 697,698:print 10,500
name "Luka"
>Tamamo... Why did you come to this village?@
>It wasn't to destroy it, was it?\
name ""
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>This village is my home.@
>Why would I destroy it right as I return?\
name ""
name "Luka"
>...I see...\
name ""
>I sheathe my sword for now.@
>It looks like she has no intention of doing anything bad here...\
>That means there's no reason for us to fight.\
lsp 699,":a;chara\alice_st91b.bmp",-120,0
lsp 700,":a;chara\alice_st01b.bmp",-120,0
lsp 701,":a;chara\tamamo_st01.bmp",160,0:print 10,500
name "Alice"
>............\
name ""
>Alice slurps up a noodle as she watches Tamamo and I.\
bgm "bgm\yamatai.ogg"
cspl 699,701
lsp 701,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
>As I look back and forth between the two eating girls, a man interrupts the sound of eating and clapping.\
name "Elder"
>Oh!@>Mighty Traveling Hero!@> Oh!@> Mighty Fox!@> Oh!@> Mighty Snake!\
>Welcome to Yamatai Village!\
name ""
name "Luka"
>And you are, Sir?\
name ""
name "Elder"
>I'm the Chief of this village.@
>You may have already heard, but there has been some trouble in this village recently...\
name ""
>So this must be the Chief that was looking for assistance.@
>I believe that man said it was something about a troublesome monster...\
lsp 699,":a;chara\alice_st91b.bmp",-120,0
lsp 700,":a;chara\alice_st01b.bmp",-120,0
lsp 701,":a;chara\mob_rouzin1.bmp",160,0:print 10,500
name "Alice"
>Hmph.@>Shall we listen to his request?\
name ""
>Alice slurps down the last of the soba, then gets off her rock.@
>How unusual... She would usually try to get me to blow off requests like this.\
name "Village Chief"
>Shall we speak somewhere else?\
name ""
dwave 1,"se\asioto2.ogg"
>We follow the Chief's lead through the village streets.\
>Alice and I follow him...@
cspl 699,701
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
>And so does Tamamo.\
name ""
name "Luka"
>...Oi, why are you following too?\
name ""
name "Tamamo"
>Watch your tone with your elders.\
>I heard rumors about an impudent fool causing trouble here.@
>I won't allow something like that to continue.\
name ""
name "Luka"
>Impudent fool...?\
name ""
lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
name "Village Chief"
>About that...@
>Yamatai Village is in quite a troublesome spot due to a particular monster...\
name ""
>As we walk down the calm streets, the Chief speaks with a strain in his voice.\
name "Luka"
>I heard the rumors... What kind of monster is it?\
name ""
name "Village Chief"
>Her name is Yamata no Orochi.@
>She's an eight headed monster that lives in a nearby cave.\
name ""
lsp 699,":a;chara\alice_st91b.bmp",-120,0
lsp 700,":a;chara\alice_st01b.bmp",-120,0
lsp 701,":a;chara\mob_rouzin1.bmp",160,0:print 10,500
name "Alice"
>Yamata no Orochi...@
>Indeed, humans could do nothing against her.\
name ""
>Just from Alice's reaction, I can tell this is no ordinary monster...\
cspl 699,701
lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
name "Village Chief"
>Yamata is demanding a villager to be sacrificed to her...@
>One young man per year...\
>If we don't send her the sacrifice, she'll destroy the village...@
>...That's what she said when she came, five years ago.\
name ""
name "Luka"
>Five years ago?@>So...\
name ""
name "Village Chief"
>...We are weak.@
>We can't do anything against a monster like that.\
>So far, we have sent five sacrifices to her...\
name ""
name "Luka"
>H...How horrible!\
name ""
name "Village Chief"
>But don't misunderstand me.@
>Yamata said she wasn't going to kill the sacrifices.\
>To prove it, she sends back the previous year's sacrifice when we send the new one...@>So we are not sending them off to their death...\
name ""
name "Luka"
>Eh?@>So the sacrifices come back alive?\
name ""
name "Village Chief"
>Yes... Though he was quite exhausted and weak.@
>Now, in here...\
name ""
>The Chief stops in front of a large building, and opens the door for us.\
dwave 1,"se\door3.ogg"
bg "bg\bg089.bmp",10,1500
name "Village Chief"
>This is a meeting hall for the young men of the village.@
>Please come this way...\
name ""
bg "bg\bg090.bmp",10,1500
>The Chief leads us into a large room.\
name "Village Chief"
>Please look.@> He is the sacrifice that came back last year.\
name ""
name "Luka"
>Wh...What the...\
name ""
lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
>Laying down on a futon in the middle of the floor, an emaciated young man is mumbling to himself.\
name "Youth"
>Ahh...@> Master Yamata...@
>Where's Master Yamata...?\
name ""
lsp 700,":a;chara\mob_seinen1.bmp",-160,0
lsp 701,":a;chara\mob_musume1.bmp",335,0:print 10,500
name "Village Nurse"
>Yamata isn't here any longer.@>You're safe here.\
name ""
name "Youth"
>No... Not that...@>Master Yamata...\
>More, more... Suck more...@
>I don't care if it kills me any more...\
name ""
csp 701
lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
name "Village Chief"
>As you can see, they come back broken...@
>They recover after about a year...@> But they're precious young workers.\
>And that isn't the only problem...\
name ""
>The Chief glances to the wall.@
>From the other side, the sounds of men arguing can be heard.\
name "Village Chief"
>It's almost time to present a new sacrifice.\
>The young men meet together and choose the new sacrifice...@
>...But it always turns into a huge dispute.\
name "Luka"
>Of course it would...\
name ""
>Having to decide who will be a sacrifice...@
>Of course there would be huge disputes and fighting...\
name "Village Chief"
>Now... Please come this way.\
name ""
>The Chief leads us into the room where the angry yells from the men can be heard.\
lsp 700,":a;chara\mob_seinen1.bmp",-240,0:print 10,500
name "Young Man A"
>No, don't worry.@> I'll be the sacrifice!\
name ""
lsp 701,":a;chara\mob_seinen1.bmp",-80,0:print 10,500
name "Young Man B"
>Stop trying to show off!@> I'll be the sacrifice!\
name ""
lsp 702,":a;chara\mob_seinen1.bmp",80,0:print 10,500
name "Young Man C"
>No, no!@>I can't let either of you do that!@> I'll be the sacrifice!\
name ""
lsp 703,":a;chara\mob_seinen1.bmp",240,0:print 10,500
name "Young Man D"
>No, you guys are too valuable!@
>I'm lazy and bad at working, it's obvious I should be the one to be sacrificed!\
name ""
name "Luka"
>..............\
name ""
>What's going on...?\
name "Young Man A"
>Don't pull that crap!@>Everyone knows I should be sacrificed!\
name ""
name "Young Man B"
>You're a hard worker here, bitch!@
>I couldn't bear the thought of your mother crying over you... I'll be the sacrifice!\
name ""
name "Young Man C"
>I can't let you guys go through with it!@> I'll be the sacrifice, no matter what!\
name ""
name "Young Man D"
>I'll be the sacrifice, so you guys protect the village in my absence!\
name ""
name "Luka"
>................\
name ""
cspl 701,703
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>................\
name ""
csp 699
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>................\
name ""
lsp 699,":a;chara\alice_st91b.bmp",-110,0
lsp 700,":a;chara\alice_st01b.bmp",-110,0
lsp 701,":a;chara\mob_rouzin1.bmp",160,0:print 10,500
name "Village Chief"
>As you can see...@
>It's pathetic, but every young man wants to be the sacrifice.\
name ""
name "Alice"
>...Idiots.@> Idiots everywhere.\
>Why don't you just send all of those idiots out as sacrifices?\
name ""
name "Village Chief"
>They're valuable workers in our small village, we can't do that...\
name ""
>Saying that, the Chief lets out a deep sigh.\
name "Village Chief"
>If I was only sixty years younger...\
name ""
name "Luka"
>Err... Chief?\
name ""
name "Village Chief"
>Ah, no, no.@
>If I was only sixty years younger, I could have gotten rid of Yamata.@
>Hahahahaha!\
name ""
>The Chief's face quickly becomes gloomy again after his quick laugh.\
name "Village Chief"
>We would be shorthanded without our workers in the fields...@
>So for the first sacrifice, the laziest man was sent...\
>But now that they all want to be the sacrifice, they're competing against each other to be as lazy as possible.@
>That's the troublesome situation this village is in...\
name ""
name "Luka"
>..............\
name ""
>...Is he serious?\
name "Village Chief"
>Now then, please step this way...\
name ""
cspl 699,701
lsp 700,":a;chara\mob_rouzin1.bmp",0,0
bg "bg\bg089.bmp",10,1500
>The Chief leads us to a corner of the building.\
name "Village Chief"
>So, please...@
>...Can you defeat Yamata no Orochi?\
name ""
>He nervously looks around, and softly whispers that into my ear.\
name "Luka"
>Uhm... Why are you speaking so softly?@> I can barely hear you...\
name ""
name "Village Chief"
>If the men heard me, they would beat me up...\
name ""
name "Luka"
>Ah, I see...\
name ""
>...There are all kinds of things wrong with this situation.\
name "Luka"
>Got it, I'll get rid of her!\
name ""
lsp 699,":a;chara\alice_st91b.bmp",-110,0
lsp 700,":a;chara\alice_st02b.bmp",-110,0
lsp 701,":a;chara\mob_rouzin1.bmp",160,0:print 10,500
name "Alice"
>Hmm, hmm, hmm...@> I wonder what the reward is?\
name ""
>Alice pipes up at the first thing she's interested in.\
lsp 701,":a;chara\tamamo_st01.bmp",160,0:print 10,500
name "Tamamo"
>Alright, I'll assist in taking out that impudent fool.\
name ""
name "Luka"
>Tamamo, you'll help me...?\
name ""
name "Tamamo"
>Of course.@> You'll be quite useful.@
>Name Luka as this year's sacrifice.\
>Then Luka can eliminate the fool.@
>If Luka loses, then he'll just really be the sacrifice.\
name ""
name "Luka"
>Oi, oi... I don't like that kind of strategy...\
name ""
>That said, it's only a problem if I lose.@
>This might actually be a good strategy...\
>Honestly, this would be over really fast if Alice or Tamamo would just...@
>No, no... This is a Hero's job!@>I'm a Hero, so I'm the only one eligible to do it!\
cspl 699,701
lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
name "Village Chief"
>Then I can leave it all to you?@>In that case, tonight would be the best night to carry it out...\
name ""
name "Luka"
>Yes, let's do it.@
>I'll defeat Yamata no Orochi!\
name ""
name "Village Chief"
>Ah, thank you for being so understanding!@
>But please keep this quiet from the young men.\
>If they find out we're planning on getting rid of her, they might riot.\
name ""
name "Luka"
>G...Got it...\
name ""
name "Village Chief"
>I'll convince them to name you as the sacrifice.@
>Now then, if you'll excuse me...\
name ""
>Saying that, the Chief turns back toward where the arguing men were.\
>We have some time to kill before nighttime...\
r@k@\
csp -1
bg "bg\bg088.bmp",10,1500
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
csp 700:csp 611:cspl 3,7
mov %hanyo1,0
gosub *city18_main
bg "bg\bg091.bmp",10,1000
gosub *setwindow_01p
bgm "bgm\yaei.ogg"
name ""
r@k@\
>After a while, night fell.\
name "Luka"
>It's finally time to battle Yamata no Orochi...\
name ""
>Holding back any sign of my intent to fight, I'm standing next to the carriage that will take me as the sacrifice.\
>I don't see Alice or Tamamo anywhere... I wonder where they went.\
name "Luka"
>Hmm...? That's...\
name ""
>I feel an ominous sign on the wind.@
>The feeling of hostile enemies all around me!\
name ""
name "Luka"
>It can't be! Yamata caught me already!?\
name ""
bgm "bgm\comi1.ogg"
lsp 700,":a;chara\mob_seinen1.bmp",-240,0:print 10,500
name "Young Man A"
>Orya!\
name ""
dwave 2,"se\miss.ogg"
>A young man jumps out from the grass, and tries to swing a giant stick at me.@
>But I easily dodge the amateur's attack.\
name "Luka"
>Wh...What are you doing!?\
name ""
name "Young Man A"
>Traveler... I heard you are this year's sacrifice.\
name ""
lsp 701,":a;chara\mob_seinen1.bmp",-80,0:print 10,500
name "Young Man B"
>We can't allow someone unrelated to sacrifice themselves!@
>Let us take that responsibility!\
name ""
lsp 702,":a;chara\mob_seinen1.bmp",80,0:print 10,500
name "Young Man C"
>The sacrifice must be one of us!@> We won't put that burden on you!\
name ""
lsp 703,":a;chara\mob_seinen1.bmp",240,0:print 10,500
name "Young Man D"
>We won't kill you.@> We'll just knock you unconscious for a while...\
name ""
name "Luka"
>..............\
name ""
>These guys... They're acting all noble, but their intentions are impure!@
>The men around me slowly inch closer.\
name "Luka"
>Guh...!\
name ""
>They're weak humans... I don't think I should fight them normally.@
>...But they don't look like they'll give up that easily.\
r@k@\
csel "Persuade",*sean0178a,"Hold self back",*sean0178b,"Don't hold back",*sean0178c



*sean0178a

name "Luka"
>W...Wait!@
>I just want to get rid of Yamata!\
name ""
name "Young Man A"
>What was that, you asshole!?\
name ""
name "Young Man B"
>After saying that, do you think you can make it out of here alive!?\
name ""
>Uh oh, I think I just made things worse...\
name "Luka"
>H...Hey wait!\
name ""
>The moment when the men all started to attack...\
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
name "Young Man A"
>Urhg...\
name ""
name "Young Man B"
>Th...That was...?\
name ""
dwave 1,"se\down.ogg"
wait 100
dwave 2,"se\down.ogg"
wait 100
dwave 3,"se\down.ogg"
cspl 700,703:print 10,300
>The men all collapse around me.\
name "Young Man A"
>Ahh... This feels so good...!\
name ""
name "Young Man B"
>Ahhhhhh!\
name ""
name "Young Man C"
>That's... Ahhhh!\
name ""
>The men all writhe around on the ground.\
name "Luka"
>What's going on...?\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>I just forced them to have nice dreams...\
name ""
name "Luka"
>Ah, thanks.\
name ""
>The men yell out, as wet spots start to appear on their pants.@
>Well, I guess they brought it on themselves.\
bgm "bgm\yaei.ogg"
goto *sean0178d



*sean0178b

name "Luka"
>I don't have a choice... I'll try not to hurt you.\
name ""
name "Young Man A"
>Uwaaa!\
name ""
>I flick away his stick with a quick slash from my sword.@
dwave 1,"se\down.ogg"
>At the same time, I kick his feet out from under him, causing him to crash into the ground.\
name "Young Man A"
>Ahg!\
name ""
name "Young Man B"
>How dare you!\
name ""
dwave 2,"se\miss.ogg"
>I jump back, avoiding his downward slash.@>After that, I jump into him and fling him away.\
dwave 1,"se\down.ogg"
name "Young Man B"
>Gwah!\
name ""
name "Young Man C"
>Oi, oi... This guy is strong!\
name ""
name "Young Man D"
>We can't do anything against him!\
name ""
>The men look at each other with fear in their eyes.\
name "Young Man A"
>R...Run away!\
name ""
dwave 1,"se\asioto1.ogg"
cspl 700,703:print 10,500
>They run away as fast as they can.\
bgm "bgm\yaei.ogg"
name "Luka"
>Sheesh... Doing a surprise attack like that, how pathetic.\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Hurm, another trial of coexistence...@
>Ones desiring to be with monsters at the exclusion of everything else.\
name ""
name "Luka"
>Ah, Alice...\
name ""
>Alice shows up with a strange smile on her face.\
goto *sean0178d



*sean0178c

name "Luka"
>Eat this! Death Sword Chaos Star!\
name ""
skillname "Death Sword Chaos Star"
>Luka's sword flashes like a chaotic shooting star!
wait 500
dwave 1,"se\slash.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
dwave 2,"se\slash.ogg"
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
dwave 3,"se\slash.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
csp 2:print 10,1000
\
name "Young Men"
>Uwaa!\
name ""
skillname ""
dwave 1,"se\syometu.ogg"
cspl 700,703:print 99,4500,"system\breakup.dll/urb"
>The young men are sealed in the forms of scarecrows!\
name "Luka"
>Whew... Sheesh.\
name ""
>The four scarecrows are standing in a row in the field.@
>I'll ask Alice and Tamamo to turn them back to normal tomorrow.\
bgm "bgm\yaei.ogg"
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Hurm, another trial of coexistence...@
>Ones desiring to be with monsters at the exclusion of everything else.\
name ""
name "Luka"
>Ah, Alice...\
name ""
>Alice shows up with a strange smile on her face.\
goto *sean0178d



*sean0178d

name "Luka"
>Where's Tamamo?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...She went back to the castle.@
>It looks like she didn't want to assist you directly.\
name ""
name "Luka"
>Eh? Really?\
name ""
name "Alice"
>So... She left this in her place.@
>She told me to deliver this item to you.\
name ""
name "Luka"
>Item...?\
name ""
lsp 699,":a;chara\alice_st91b.bmp",-110,0
lsp 700,":a;chara\alice_st01b.bmp",-110,0
lsp 701,":a;chara\tamamo_st31.bmp",160,0:print 10,500
>Alice hands me a strange ball of fur, about the size of my hand.@
>It's slightly warm and fluffy...\
name "Luka"
>Th...This...\
name ""
>I gently poke the ball of fur.\
name "Tamamo"
>Uhyahya!@> That tickles!\
name ""
>The ball of fur wriggles around in my hand.\
name "Luka"
>.............\
name ""
name "Alice"
>.............\
name ""
dwave 1,"se\fanfale.ogg"
mov %item16,1
>Tamamo Ball obtained!\
name "Alice"
>There, I handed it over...\
name ""
name "Luka"
>Ah... Thanks...\
name ""
csp 701
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
>I put the Tamamo Ball in my pack.\
name "Alice"
>Just as usual, I won't assist you.@
>If you fail, you really will be the sacrifice.\
name ""
name "Luka"
>Yeah, leave it to me!\
name ""
dwave 1,"se\escape.ogg"
cspl 699,701:print 10,500
>Saying that, Alice vanishes like usual.@
lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
>And quickly taking her place, the Village Chief shows up.\
name "Village Chief"
>Thank you for waiting.@
>Oh?@>Where is the Mighty Snake and Mighty Fox?\
name ""
name "Luka"
>Err... I'm the only one going.\
name ""
name "Village Chief"
>I see.@
>If she senses someone besides the sacrifice, she may figure out something is going on.\
>Now then, please step into this carriage.\
name ""
>It's a carriage that's held by multiple villagers, and made of gold.@
>Each year, the actual sacrifice would ride this to Yamata no Orochi...\
>I step onto the gaudy carriage.@
>Now I really do feel like the sacrifice...\
name "Village Chief"
>Now then, let's go.@
>It will take an hour to reach the cave, so please be patient.\
name ""
name "Luka"
>Got it...\
name ""
csp 700:print 10,500
>The men lift up the carriage, and take me out of the village.@
>After an hour of being rocked back and forth in the gold carriage, we finally arrive.\
bgmstop
sean_change "bg092"
bgm "bgm\dungeon1.ogg"
>They set down the carriage at the entrance of the cave.\
lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
name "Village Chief"
>This is as far as we carry you.@
>From here, Yamata no Orochi's power will carry you in.\
>Now then, we shall depart...\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,500
>The Chief and the villagers who were carrying the carriage hurry away from the spot.\
name "Luka"
>............\
name ""
>If I don't win, I'll be stuck here as the real sacrifice...@
>The thought flashes across my mind.\
>As I sigh at the thought, I feel the carriage start to move.@
>Without anyone carrying it, it slowly rises into the air.\
>Like that, it's pulled deeper into the cave.\
name "Luka"
>Wah!?\
name ""
>Until I reach her, I should stay calm...@
>I look nervously around at the cave as I continue to be pulled deeper inside.\
name "Luka"
>D...Did I arrive...?\
name ""
name "???"
>Now, sacrifice...@
>Reveal yourself to me.\
name ""
name "Luka"
>...........\
name ""
>I step off the carriage, and right in front of me...@
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\yamatanooroti_st01.bmp",0,0:print 10,500
>Is an incredibly bizarre monster.\
name "Yamata no Orochi"
>Oh... This year's sacrifice is another cute young boy.\
name ""
name "Yamata no Orochi"
>Now, come closer.@
>There's no need to be afraid.@>I'll drown you in the height of pleasure...\
name ""
name "Yamata no Orochi"
>You don't seem to be from the village...@
>But you look delicious, so I don't care.\
name ""
name "Luka"
>............\
name ""
>Each head seems to be independent of the other...@
>The strange sight unnerves me, and she looks even stronger than I expected...\
r@k@\
goto *yamatanooroti_start



*sean0179

bgm "bgm\dungeon1.ogg"
name ""
r@k@\
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>That solves everything.\
name ""
name "Luka"
>Hey, Tamamo...@
>Why did you teach me how to use the power of the earth?\
name ""
name "Tamamo"
>I've always been teaching my students things.@
>It was just my instinct of instructing youngsters taking over.\
name ""
name "Luka"
>I see... Thank you.\
name ""
>I learned something very important in this fight.@
>I need to honestly thank her for that.\
lsp 699,":a;chara\alice_st91b.bmp",-120,0
lsp 700,":a;chara\alice_st01b.bmp",-120,0
lsp 701,":a;chara\tamamo_st01.bmp",160,0:print 10,500
name "Alice"
>Hmph.@>Done?\
name ""
>After everything is over, Alice appears.@
>She looks bored as she eats some rice balls.\
name "Luka"
>Eating rice balls so calmly like that...@> You didn't care about what would happen?\
name ""
name "Alice"
>Hmph, there was no need.@
>With Tamamo here, there isn't anything I would need to do.\
name ""
lsp 701,":a;chara\tamamo_st04.bmp",160,0:print 10,500
name "Tamamo"
>That's right!\
name ""
>She gloats, self-satisfaction dripping from her voice.\
lsp 701,":a;chara\tamamo_st01.bmp",160,0:print 10,500
name "Tamamo"
>But with that said, if Luka disappointed me, I would have let him lose.@
>If he was sacrificed to her, that would have solved things too.\
name ""
name "Luka"
>...........\
name ""
>At any rate, Yamata no Orochi is sealed.@
>Having safely accomplished the request, we head out of the cave.\
dwave 1,"se\asioto2.ogg"
bgmstop
sean_change "bg088"
bgm "bgm\epilogue.ogg"
lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
name "Village Chief"
>Thank you so much!@
>You've really saved this village!\
>I'd really love to thank you, Hero...@
>But this village is poor, and there isn't much we can do for you...\
name ""
name "Luka"
>No, no.@>You don't need to thank me.@
>Doing something like this is expected of a Hero!\
name ""
lsp 700,":a;chara\mob_rouzin1.bmp",-210,0
lsp 701,":a;chara\tamamo_st04.bmp",160,0:print 10,500
name "Tamamo"
>...Even though you're a fake Hero.\
name ""
>Not her too!\
csp 701
lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
name "Luka"
>By the way, what happened to the other young men?@
>Are they angry at Yamata being sealed...?\
name ""
>If so, this village could meet with more trouble...\
name "Village Chief"
>They're all depressed and unable to work at all.@
>Sheesh, young men these days are so pathetic.\
name ""
name "Luka"
>............\
name ""
>They really are...\
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st09b.bmp",67,0:print 10,500
name "Alice"
>Rice balls... \
name ""
lsp 699,":a;chara\alice_st91b.bmp",-120,0
lsp 700,":a;chara\alice_st09b.bmp",-120,0
lsp 701,":a;chara\tamamo_st04.bmp",160,0:print 10,500
name "Tamamo"
>Thin fried tofu.... \
name ""
>The two insanely powerful monsters are happily munching away on their respective favorite foods.@
>With this matter settled, it's about time to get back to traveling...\
cspl 699,701
lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
name "Luka"
>Now then, we have to be going...@
>If there's any more trouble, please call me.\
name ""
name "Village Chief"
>Thank you, Hero!@> May good fortune shine on your travels!\
name ""
csp 700:print 10,500
>With those final parting words, we leave Yamatai Village.\
dwave 1,"se\asioto2.ogg"
bgmstop
sean_change "bg086"
bgm "bgm\tamamo.ogg"
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>Now then, I shall take my leave here.\
name ""
>As soon as we leave the village, Tamamo speaks up.\
name "Luka"
>...You helped me this time.@>Thank you.\
name ""
>She taught me how to use the power of the earth...@
>If she wasn't here, I might really have been a sacrifice.\
name "Tamamo"
>Don't worry about paying me back for that favor.@
>Because if you come to the Monster Lord's castle, I won't show any mercy.\
name ""
name "Luka"
>...I'll be there for sure one day.@
>To stop you Four Heavenly Knights from messing up the world any more!\
name ""
name "Tamamo"
>Fufufu... Quite full of spirit, aren't you?@
>In that case, I'll be looking forward to it. \
name ""
dwave 2,"se\tamamo2.ogg"
>Tamamo jumps up and does a backflip.@
dwave 1,"se\escape.ogg"
csp 700:print 10,500
>Before landing, she vanishes.\
bgm "bgm\field3.ogg"
name "Luka"
>...Is she really a bad guy?\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Your standards of right and wrong revolve around whether the action committed would be a detriment to human and monster coexistence... Right?\
>In that case, she would be just a little bad.\
name ""
name "Luka"
>...I see.\
name ""
>This time, she helped me gain some strength.@
>But that was to help get rid of the monster plaguing her home town...\
name "Luka"
>It looks like the Heavenly Knights aren't rampaging all over, though...\
name ""
name "Alice"
>And it's not just Tamamo.\
>None of them are actually hateful of humans.\
>They just enjoy playing around a little bit.@
>...But they get a little carried away, and it comes across as pretty belligerent.\
name ""
name "Luka"
>............\
name ""
>The Four Heavenly Knights are the subject of fear in towns and villages all over.\
>Just recently, the news about the fall of Iliasburg to Granberia has been circulating around the world...\
>Why are they doing these things...?@
>All it's doing is antagonizing relations.\
>At the least, it doesn't seem like their actions are brought about simply because they hate humans.\
>Though I guess you could see it the same as human Heroes going around killing monsters, even when not attacked.\
>That's why Granberia took over the town, on her way to stop Heroes from being made...\
>Who are they really trying to fight against, though?\
name "Luka"
>...They have to stop doing stuff like that all over the world.@
>If they don't, the gap between human and monster will just continue to grow.\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>In that case, you have to train that sword arm of yours.@
>That's why you're fighting, isn't it?\
name ""
name "Luka"
>Yeah, that's right!\
name ""
>In order to stop them, I have to get stronger.@> I won't lose!\
>With a new vow to myself, I leave the Yamatai Village region.\
>Now then, for the next destination...\
r@k@\
mov %ivent09,1
mov %genzaiti,10
mov %gloval1_story_sinkou,6:gosub *savegloval1
goto *map4



*sean0181

gosub *genzaiti_bg
name "Luka"
>Alright, let's go to that village where different monster races are living together!\
name ""
if %ivent02=0 skip 3
>Near the start of my journey, I went to the Harpy Village...@
>But unlike there, this Plansect village has monsters of multiple types living together...\
>I've heard that multiple races of monsters are living together in harmony.\
>They're able to get along despite various cultural differences...@
>It's something that will be critically important if we want everyone to get along together.\
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Are you really going...?@
>Sheesh, whatever.\
name ""
>Alice sighs.\
name "Luka"
>Why don't you want to go?@
>Is something wrong...?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>I do want to see it with my own eyes...\
name ""
name "Luka"
>Are you going?@> Are you not going?@
>Make up your mind...\
name ""
>Bewildered at her going back and forth like that, I head toward Plansect Village.\
dwave 1,"se\asioto2.ogg"
bgmstop
sean_change "bg093"
bgm "bgm\plansect.ogg"
name "Luka"
>So this is the entrance to Plansect Village?\
name ""
>After going through an open field, we arrive at our destination, a thick forest.\
name "Luka"
>I don't see anything that looks like a building anywhere...\
name ""
>I said it's the entrance... But it looks just like a normal forest.@
>Do the monsters live without touching nature at all?\
name "Luka"
>I'm looking forward to this...\
name ""
>Excited and nearly skipping, I head into the forest.@
>Overcoming the barriers of race, the monsters live in harmony here...\
name "Luka"
>Ah, monsters!\
name ""
>Monsters from the plant and insect races are standing around.\
bgm "bgm\kiki2.ogg"
lsp 700,":a;chara\moss_st01.bmp",-50,50
lsp 701,":a;chara\mosquito_st01.bmp",450,50
lsp 702,":a;chara\imomusi_st01.bmp",210,160:print 10,500
name "Moth Girl"
>Hehe... Is that all monsters from the plant race have?@
>You're all finished...\
name ""
name "Mosquito Girl"
>Ahaha, I'll suck up all your body fluids.\
name ""
name "Caterpillar Girl"
>Ehehe, it's our victory. \
name ""
csp 702
lsp 700,":a;chara\a_looty_st03.bmp",50,130
lsp 701,":a;chara\a_alm_st03.bmp",380,0:print 10,500
name "Alra Arum"
>Kuh... To think you all would corner us here...\
name ""
name ""
name "Alra Rooty"
>If I wasn't injured, I'd deal with you damn insects...!\
name ""
>The two groups of monsters seem to be fighting each other...@> Around them, dozens of wounded monsters are writhing on the ground.\
name "Luka"
>Wh...What's going on!?\
name ""
>My dreams of a peaceful village of monsters collapses before my eyes.@
>This is the exact opposite... It's a race war!\
lsp 700,":a;chara\moss_st01.bmp",-50,50
lsp 701,":a;chara\mosquito_st01.bmp",450,50
lsp 702,":a;chara\imomusi_st01.bmp",210,160:print 10,500
name "Moth Girl"
>Haha, unable to match my movements!?\
name ""
name "Mosquito Girl"
>Haha, I'll suck you dry. \
name ""
csp 702
lsp 700,":a;chara\a_looty_st03.bmp",50,130
lsp 701,":a;chara\a_alm_st03.bmp",380,0:print 10,500
name "Alra Arum"
>Guh... When are reinforcements coming!?\
name ""
>At first glance, it seems like the two plant monsters are at a disadvantage due to being outnumbered.@
>Injured and forced into a corner, the three insect monsters are overwhelming them.\
lsp 700,":a;chara\moss_st01.bmp",-50,50
lsp 701,":a;chara\mosquito_st01.bmp",450,50
lsp 702,":a;chara\imomusi_st01.bmp",210,160:print 10,500
name "Caterpillar Girl"
>I'll fight too! @
>My sticky silk will finish them off!\
name ""
dwave 1,"se\ero_ito.ogg"
>The Caterpillar Girl opens her mouth, and sprays the plant monsters with silk.\
csp 702
lsp 700,":a;chara\a_looty_st03.bmp",50,130
lsp 701,":a;chara\a_alm_st03.bmp",380,0:print 10,500
name "Alra Arum"
>D...Damn it!\
name ""
>Tangled in the silk, the two plant monsters can't move any longer.\
lsp 700,":a;chara\moss_st01.bmp",-50,50
lsp 701,":a;chara\mosquito_st01.bmp",450,50
lsp 702,":a;chara\imomusi_st01.bmp",210,160:print 10,500
name "Mosquito Girl"
>Haha, time to suck you dry. \
name ""
>Seeing her chance, the Mosquito Girl flies toward the trapped monsters.\
name "Luka"
>...Stop!\
name ""
dwave 1,"se\asioto1.ogg"
>Before she could reach her, I jump into the battle.@
>I stand in front of the two Alraunes to guard them from any further attacks.\
name "Caterpillar Girl"
>Ohohoh?@>A human?\
name ""
name "Mosquito Girl"
>Oh... A human coming to this village?@>How unusual.@
>But why would he protect the Alraunes?\
name ""
name "Moth Girl"
>I don't think he's their reinforcements...@
>I think he's just an intruder.\
name ""
name "Luka"
>I don't know what's going on, but stop this fight!@
>The Alraunes already lost the will to fight!\
name ""
>I don't know which side is right or wrong in this.\
>But when jumping to conclusions, Heroes always take the side of the underdog!@
>I'll turn this one sided battle around!\
r@k@\
goto *insects_start



*sean0182

bgm "bgm\plansect.ogg"
name ""
r@k@\
>With that, all three insect monsters were defeated.@
lsp 700,":a;chara\a_looty_st03.bmp",50,130
lsp 701,":a;chara\a_alm_st03.bmp",380,0:print 10,500
>All that remains are the two Alraunes, still surprised at the sudden change of events.\
lsp 700,":a;chara\a_looty_st01.bmp",50,130
lsp 701,":a;chara\a_alm_st01.bmp",380,0:print 10,500
name "Alra Rooty"
>You saved us!@
>But... Who are you?\
name ""
name "Alra Arum"
>You're a human, aren't you?@
>Why are you helping us?\
name ""
name "Luka"
>I couldn't let you get killed before my eyes...@
>But just what the hell is going on here?\
name ""
>I take another look around...@>This place is a war zone.@
>There are monsters lying on the forest floor, defeated.\
name "Luka"
>I heard that the different monster races were living together here peacefully...\
name ""
name "Alra Arum"
>...That's a thing of the past.@
>Plansect Village has been divided into two different factions.\
name ""
name "Alra Rooty"
>War!@
>Us plants and those insect bastards are at war!\
name ""
name "Luka"
>War... Eh...\
name ""
>I let out a long sigh.\
>Humans at war against humans.@>Humans at war against monsters.@>Monsters at war against monsters.\
name "Alra Arum"
>Powerful human, please save us!@
>Help us end this stupid war as fast as possible!\
>Us plant monsters don't wish for this fight to continue!\
name ""
name "Alra Rooty"
>Yes, finish off those insects!@
>They're so cruel and evil!\
name ""
name "Luka"
>"Save", you say...?@
>Basically... You want me to fight on your side?\
name ""
name "Alra Arum"
>Yes... Please lend us your strength.@
>Since you're a human, I'm sure you're hesitant at joining in a monster's war...\
>But at the very least... Please listen to our story.\
name ""
name "Alra Rooty"
>Our leader's name is Priestess.@
>Please, just meet with Priestess!\
name ""
name "Luka"
>O...Ok... If it's just listening to her...\
name ""
>After being begged so desperately like that, I can't say no.@
>I can't just abandon them after saving them, too.\
name "Alra Arum"
>Thank you so much!@
>We'll escort you to Priestess.\
name ""
name "Alra Rooty"
>Priestess is in Planforest, we'll be there soon.\
name ""
>I follow the two plants from Plansect Village to their leader.\
dwave 1,"se\asioto2.ogg"
sean_change "bg095"
lsp 700,":a;chara\a_looty_st01.bmp",50,130
lsp 701,":a;chara\a_alm_st01.bmp",380,0:print 10,500
>After following them for a while, I notice that I can't sense Alice's presence anywhere.\
name "Luka"
>Uhm... You two are Alraunes, right?\
name ""
name "Alra Arum"
>Yes.@> Alraune is the general term used, but we're not all the exact same type.@
>In addition to the basic, widely known types, there are many different variations that live here.\
name ""
name "Alra Rooty"
>I'm an Alraune with a little Dryad blood mixed in!\
name ""
name "Luka"
>Ah... I see...\
name ""
>Even among humans there are people of all different types and lineages.\
name "Alra Arum"
>There are other plant types that live in Plansect Village, too.@
>Ivy types, mushroom types... All kinds.\
name ""
name "Luka"
>All types, eh...\
name ""
>As they talk more about the plant monsters in the village, I continue to follow their guide.\
dwave 1,"se\asioto2.ogg"
sean_change "bg095"
lsp 700,":a;chara\a_emp_st01.bmp",150,0:print 10,500
name "Alra Priestess"
>How do you do?@> My name is Alra Priestess.@
>Since the reign of Alice the 14th, I have looked after this land.\
name ""
name "Luka"
>H...Hello...\
name ""
>I'm surprised at her small form.@
>But if she's the leader of all the plant monsters, she must hold powerful magic in that small body.\
name "Alra Priestess"
>I wish to thank you for rescuing those two from certain death.@
>In addition, we are all quite in awe at the prowess showed when you repelled three of them by yourself...\
>Many of us have fallen in the fierce battles up until now...@
>Even a single additional reinforcement could mean the difference between victory and defeat...\
name ""
name "Luka"
>...So you want me to fight?@
>Use my sword to assist in a monster war?\
name ""
>That's something a Hero shouldn't do.\
name "Alra Priestess"
>...This village was peaceful until 10 years ago.@
>Us plants and the insect race lived together peacefully.\
>But the insect race's leader, Queen Bee, began to oppress us.@
>Her intense cruelty was limited only to those of the plant race.@> That cruelty only continued to escalate...\
>At first, the insects massacred us, clearly superior in fighting ability.@
>In front of that overwhelming force, the blood of young and old alike flooded the forest...\
name "Luka"
>That's... Horrible...\
name ""
name "Alra Priestess"
>We couldn't allow the genocide to continue.@
>...So we resisted.\
>With the power of the mercenary Canaan Sisters from a foreign plant tribe, we managed to compete on equal terms.\
name ""
lsp 700,":a;chara\a_looty_st01.bmp",-50,130
lsp 701,":a;chara\a_alm_st01.bmp",180,0
lsp 702,":a;chara\a_emp_st01.bmp",360,0:print 10,500
name "Alra Rooty"
>That reminds me, Priestess... What happened to the Canaan Sisters?\
name ""
name "Alra Priestess"
>They have been resting since the battle two days ago.\
>Those two have fighting skills that surpass even mine.@
>For the battles that are surely to come, we must conserve their strength.\
name ""
>It seems like these Canaan Sisters are the focal point of the plant army.\
cspl 701,702
lsp 700,":a;chara\a_emp_st01.bmp",150,0:print 10,500
name "Alra Priestess"
>Now back to the original story...@
>With the power of the Canaan Sisters, we are on equal terms with them.\
>But there isn't a single one of us who wishes to fight.@
>If the insect race would cease all violence, we would put down our arms in a second.\
name ""
name "Luka"
>I see...\
name ""
name "Alra Priestess"
>So please, join us to help end this as fast as possible...\
name ""
name "Luka"
>...But is fighting the only way to end it?@
>Can't you try talking with their leader one more time?\
name ""
name "Alra Priestess"
>This is the result we have arrived at after our talks did not work...@
>War is the final response to this hopeless situation...\
name ""
name "Luka"
>But fighting in a war between monsters is...\
name ""
name "Alra Priestess"
>...We don't want this war to continue.@
>We just want to live in peace.\
>But to reach that, we have to fight, don't we?@
>If we do not, we can do nothing but be exterminated by the insect race.\
name ""
name "Luka"
>...........\
name ""
>...It's just as she said.@
>Even I don't want to fight monsters.@
>But times are always coming where I have no choice...\
>I've been fighting to defend myself... What right do I have to think that they can't?\
name "Alra Priestess"
>Please, human Hero.@
>We were actually just discussing a counteroffensive.@
>Won't you join us in our offensive and get rid of the source of evil, Queen Bee?\
name ""
lsp 700,":a;chara\a_looty_st01.bmp",50,130
lsp 701,":a;chara\a_alm_st01.bmp",380,0:print 10,500
name "Alra Arum"
>Please, help us!\
name ""
name "Alra Rooty"
>Let's fight together!\
name ""
name "Luka"
>.............@
>......Fine.@>I'll help.\
name ""
>After a pause, I nod my head, agreeing to help.@
>Honestly, it feels wrong to involve myself in this...\
>But as a Hero, I should do whatever's in my power to end this war before more suffering can happen.@
>If beating Queen Bee can end this, then I should help.\
csp 701
lsp 700,":a;chara\a_emp_st01.bmp",150,0:print 10,500
name "Alra Priestess"
>Thank you, human Hero.@
>On behalf of all my brethren, I thank you.\
name ""
lsp 700,":a;chara\a_looty_st01.bmp",50,130
lsp 701,":a;chara\a_alm_st01.bmp",380,0:print 10,500
name "Alra Rooty"
>Alright, you're our ally now!\
name ""
name "Alra Arum"
>Thank you for joining us!\
name ""
csp 701
lsp 700,":a;chara\a_emp_st01.bmp",150,0:print 10,500
name "Alra Priestess"
>Now let us talk about our ongoing operations.\
>Our base of operations is in this Planforest.@>The insect base is in Sectforest.\
>Queen Bee's hive is located there.\
name ""
name "Luka"
>I see...\
name ""
name "Alra Priestess"
>Currently, our troops are advancing toward Sectforest.@
>On the way, they encountered the insect race's troops in the middle of the village, where a battle is taking place.\
name ""
lsp 700,":a;chara\a_looty_st01.bmp",50,130
lsp 701,":a;chara\a_alm_st01.bmp",380,0:print 10,500
name "Alra Arum"
>That's where the two of us were wounded.@> You saved us as we were withdrawing from the battle.\
name ""
name "Alra Rooty"
>If we weren't already injured from that battle, we could have beaten those girls!\
name ""
>So as we speak, the two sides are fighting in the middle of the village...\
name "Luka"
>...So you want me to go there and fight?\
name ""
csp 701
lsp 700,":a;chara\a_emp_st01.bmp",150,0:print 10,500
>But Priestess shook her head.\
name "Alra Priestess"
>No... We wish to ask you to perform a different role.\
>In fact, our direct assault is simply a decoy.@
>We wish to attract their forces in what they think is a final confrontation, as we send a detached force directly to assault Queen Bee.\
name "Luka"
>A detached force...?\
name ""
name "Alra Priestess"
>To assassinate Queen Bee, we chose some of the highest skilled plant monsters to sneak in.@
>Those girls are all taking different routes to infiltrate Sectforest.\
>With the huge battle being waged in the village center, the security around her should be lax.@
>Only one assassin needs to make it to her...@> That's the plan.\
name ""
name "Luka"
>I see, assaulting the enemy boss to win...\
name ""
>I understand their strategy.@
>This is a very risky strategy... Everything hinges on distracting the army and depending on the actions of a couple assassins.\
>If it doesn't work now, it will never work again...\
name ""
name "Alra Priestess"
>I would like you to be a part of the detached force.@
>Infiltrate Sectforest, and take out Queen Bee.\
name ""
name "Luka"
>...I see, I got it.\
name ""
>I'm glad I don't have to remember any complicated battle plans or deployment charts.@
>Just get into Sectforest and confront Queen Bee...\
name "Alra Priestess"
>You can see that large tree way over there, can't you?@
>That is the heart of Sectforest... Where Queen Bee's hive is located.\
name ""
name "Luka"
>With that as a guide, I guess I won't get lost...\
name ""
>Even though I'm in the middle of a forest, that huge tree stands out.@
>So even if I get sidetracked, I'll always be able to know where my goal is.\
name "Alra Priestess"
>The other members of the detached force are already spread out through the forest and on their way.\
>So please, infiltrate Sectforest as they do and take out Queen Bee!\
name ""
lsp 700,":a;chara\a_looty_st01.bmp",50,130
lsp 701,":a;chara\a_alm_st01.bmp",380,0:print 10,500
name "Alra Arum"
>As soon as we recover, we'll head out too.\
name ""
name "Alra Rooty"
>Us plants can recover quickly if we drink water!@
>We'll be good to go in one hour!\
name ""
name "Luka"
>I understand.@>I'll head out now then!\
name ""
>If I defeat Queen Bee, this stupid war should end.@
>Once that happens, things can be cleaned up here...\
csp 701
lsp 700,":a;chara\a_emp_st01.bmp",150,0:print 10,500
name "Alra Priestess"
>I'll be praying for your success.@
>Please, bring us victory...\
name ""
name "Luka"
>Yes, leave it to me!\
name ""
>With that final parting word, I turn toward Sectforest.\
dwave 1,"se\asioto2.ogg"
sean_change "bg094"
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...You idiot.@>You got seduced into that quite easily.\
name ""
>As soon as I'm away from the Alraunes' eyes, Alice appears.\
name "Luka"
>...I wasn't seduced into it.@
>I decided to help them of my own free will.\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Idiot...\
name ""
name "Luka"
>Hey, Alice...@
>Can't you end this war, as the Monster Lord?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Plansect Village was entrusted to the divided rule of Priestess and Queen Bee by an earlier Monster Lord.\
>A dispute in the area between two rulers is not the place for the Monster Lord to meddle in.\
name ""
name "Luka"
>But couldn't you demand them to negotiate peace...?\
name ""
name "Alice"
>The Monster Lord should never be a tyrant.@
>I could demand they negotiate and reach an agreement...\
>But such an agreement would be meaningless.@
>Under my influence they would be pressured into an agreement neither wants.@>As soon as I leave, things will quickly deteriorate back to where they were before.\
>Unless both sides truly wish to stop, a forced agreement will have no meaning.\
name ""
name "Luka"
>So that's why you won't do anything?@
>Even if it means letting your cute subordinates kill each other in vain?\
name ""
lsp 700,":a;chara\alice_st08b.bmp",67,0:print 10,500
name "Alice"
>...I'll leave them alone, if they truly wish for conflict.@
>Sometimes in this world, things have to go to ruin before peace can come.\
name ""
name "Luka"
>Even if you say that...\
name ""
>I understand her viewpoints and reasons for not acting...@
>But I can't just leave this conflict alone.\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...That's enough with the questions.@
>You sense it too, don't you?@> An enemy is approaching.\
name ""
name "Luka"
>Yes...!\
name ""
cspl 699,700:print 10,500
>It's silently moving through the forest...@
>It must be an insect type monster!\
r@k@\
goto *mukade_start



*sean0183

bgm "bgm\plansect.ogg"
name ""
r@k@\
name "Luka"
>Whew...\
name ""
>I don't have time to take a breather!@
>I have to hurry and beat Queen Bee and end this war!\
name "Luka"
>Alright, here I go!\
name ""
>I look up at that giant tree, directing me toward her hive.@
>After taking another sharp breath, I start heading toward it again.\
dwave 1,"se\asioto2.ogg"
sean_change "bg094"
>Almost inside Sectforest, I come across something strange in my path.\
lsp 700,":a;chara\kaiko_st11.bmp",0,0:print 10,500
name "Luka"
>What is this...?\
name ""
>It looks like a cocoon...@
>But it's gigantic!\
>A human could easily fit inside that...\
name "Luka"
>I...Is something inside there...?\
name ""
>When I take a closer look, I see it slightly wriggling.@
>But I have something to do now, so I continue walking toward the giant tree.\
dwave 1,"se\asioto2.ogg"
name "Luka"
>Ah... Another...\
name ""
>After a few more steps, I come across another cocoon.@
>Beside it was another...\
name "Luka"
>No, another there...@> And more over there...\
name ""
>There are far more than just three cocoons...@
>Everywhere I look, giant cocoons are littering the ground.\
>An ominous feeling washes over me...@
>Suddenly, I feel a hostile presence behind me!\
name "???"
>You'll be like that soon, too...\
name ""
>I turn around, and see a monster approaching me!\
r@k@\
goto *kaiko_start



*sean0184

bgm "bgm\plansect.ogg"
name ""
r@k@\
name "Luka"
>Everywhere I go, annoying monsters keep appearing...\
name ""
>I see what Priestess meant when she said the insect tribe had a lot of strong soldiers.@
>Taking another deep breath, I hurry forward again.\
dwave 1,"se\asioto2.ogg"
sean_change "bg094"
name "Luka"
>So this is Sectforest...\
name ""
>The scenery doesn't look too much different from Planforest...@
>But finally near that giant tree I've been aiming at, I can see a huge hole open in its base.\
>So that's Queen Bee's hive...\
name "Luka"
>It doesn't seem like there are any enemies around it...\
name ""
>I don't see a guard or anything outside of the hive.@
>It looks like the strategy worked, and most of their soldiers are at the diversion battle.\
name "Luka"
>Alright, now's my chance...\
name ""
>I cautiously make my way into the hive.\
dwave 1,"se\asioto2.ogg"
sean_change "bg022"
>It's almost like a cave inside...@
>As I push deeper inside...\
r@k@\
goto *suzumebati_start



*sean0185

bgm "bgm\plansect.ogg"
name ""
r@k@\
name "Luka"
>If there's such a powerful enemy here, that must mean Queen Bee is close...\
name ""
>That Hornet Girl seemed like she was a direct subordinate of Queen Bee.@
>If that's true, then she must have been guarding her...\
dwave 1,"se\asioto3.ogg"
sean_change "bg022"
>After walking on a little longer, I come to a large room.@
>Right in the middle of that room, is a monster on a shrine...\
name ""
r@k@\
goto *queenbee_start



*sean0186

bgm "bgm\plansect.ogg"
r@k@\
name "Luka"
>Whew...@>It's finally over...\
name ""
>I fall to one knee, exhausted after the battles.@
>But now, at last... This pointless war is over.\
dwave 1,"se\asioto1.ogg"
lsp 700,":a;chara\suzumebati_st03.bmp",0,0:print 10,500
>As I kneel there, another Hornet Girl rushes into the room.\
name "Hornet Girl"
>HUMAN.@> QUEEN IS?\
name ""
name "Luka"
>Sorry, but I had to seal her...@
>She isn't dead, and can turn back to normal.\
>But the futile war is over now.\
name ""
>...Is what I said, but I don't think she understood exactly what was going on.@
>I'm going to have to fight her, aren't I...?\
lsp 700,":a;chara\a_looty_st01.bmp",50,130
lsp 701,":a;chara\a_alm_st01.bmp",380,0:print 10,500
name "Alra Rooty"
>Stop right there, insect scum!\
name ""
name "Alra Arum"
>Your Queen has been vanquished...@
>Thanks to that, our victory is certain!\
name ""
>Those two Alraunes from before suddenly rush into the room.@
>It looks like they healed up and rushed over after me.\
csp 701
lsp 700,":a;chara\suzumebati_st03.bmp",0,0:print 10,500
name "Hornet Girl"
>PL...PLANTS!?\
name ""
lsp 700,":a;chara\a_looty_st01.bmp",50,130
lsp 701,":a;chara\a_alm_st01.bmp",380,0:print 10,500
name "Alra Arum"
>Hehehe... Time to hunt down the remains.\
name ""
>Alra Arum grabs hold of the quivering Hornet Girl.@
dwave 1,"se\ero_makituki2.ogg"
>Like that, she wraps up the Hornet Girl in her petals.\
name "Alra Arum"
>Now, to suck out all of your nutrients...\
dwave 1,"se\ero_chupa6.ogg"
name ""
name "Hornet Girl"
>UAAAA...\
name ""
name "Luka"
>W...Wait a moment!@
>The battle's over, what are you doing!?\
name ""
>I sealed the Queen, the war is over!@
>There's no meaning to continue fighting each other!\
name "Alra Rooty"
>"What"...?@> We won the war.@
>All of the insect scum are our spoils to be made into food!\
name ""
name "Alra Arum"
>Hehe... Thanks for the meal.\
name ""
>With a pleased look on her face, she parts her petals from the Hornet Girl.@
dwave 1,"se\down.ogg"
>With her body fluids all sucked out, the Hornet Girl's shriveled body collapses to the ground.\
name "Luka"
>N...No...\
name ""
>I defeated Queen Bee to stop this fight...@
>Why are they still doing this...?\
lsp 700,":a;chara\a_looty_st01.bmp",-50,130
lsp 701,":a;chara\a_alm_st01.bmp",180,0
lsp 702,":a;chara\imomusi_st01.bmp",420,200:print 10,500
name "Caterpillar Girl"
>...Queen, what's wrong?@
>Ah... Plant soldiers...?\
name ""
name "Alra Rooty"
>Oho... Delicious looking insect found!\
name ""
name "Alra Arum"
>Hehehe... What a tasty looking morsel.@
>I'll need to pay you back for that humiliation from before...\
name ""
name "Caterpillar Girl"
>Wawawawa...\
name ""
lsp 702,":a;chara\imomusi_st03.bmp",420,200:print 10,500
>The two grinning Alraunes slowly close in around the shaking Caterpillar Girl.\
name "Luka"
>...Stop!\
name ""
>I jump in front of the two plant girls.\
name "Luka"
>The war is already over!@
>There's no meaning in fighting each other anymore!\
name ""
csp 702
lsp 700,":a;chara\a_looty_st01.bmp",50,130
lsp 701,":a;chara\a_alm_st01.bmp",380,0:print 10,500
name "Alra Arum"
>"Meaning"...?@
>This is just the natural right of the winner.\
>You contributed heavily to our side, so you're owed some spoils of war as well.\
name ""
name "Alra Rooty"
>It's an all you can eat buffet of insects!@
>You helped too, so fill your stomach to your heart's content!\
name ""
name "Luka"
>You two...\
name ""
>I slowly raise my sword at them.\
name "Alra Arum"
>...It doesn't look like you agree with us.@
>In the end, I guess humans just can't understand us.\
name ""
name "Alra Rooty"
>What? Betraying us!?@
>I thought you were our ally!\
name ""
name "Luka"
>Betray?@>That isn't it at all!@
>I won't let you kill defenseless opponents!\
name ""
r@k@\
goto *plants1_start



*sean0187

bgm "bgm\hutuu2.ogg"
name ""
r@k@\
name "Luka"
>Betray... Eh...\
name ""
lsp 700,":a;chara\imomusi_st01.bmp",180,200:print 10,500
name "Caterpillar Girl"
>Big bro, why did you help an enemy...?\
name ""
name "Luka"
>Enemies... Allies...@
>I'm sick of that crap.\
name ""
>Why is it turning out like this...?@
>Did I not do the right thing as a Hero?\
name "Caterpillar Girl"
>We lost though...?@
>We're all going to be eaten by the plants, right?\
name ""
name "Luka"
>If you had won, would you guys have eaten the plants?\
name ""
name "Caterpillar Girl"
>Eww, I don't want to eat the Canaan Sisters.@
>They dissolved and ate hundreds of my friends...\
>I don't want to be eaten by them, so I've been fighting my hardest...\
name ""
name "Luka"
>...............\
name ""
>What the hell is going on here...?@
>I don't know which side is in the wrong, but I still took a side...\
>All I wanted to do was stop the war...\
dwave 1,"se\asioto1.ogg"
lsp 700,":a;chara\mosquito_st03.bmp",30,100
lsp 701,":a;chara\suzumebati_st01.bmp",160,0:print 10,500
name "Mosquito Girl"
>Not good, the plant army is going to be here soon!\
name ""
name "Hornet Girl"
>SIEGE!@> ENDURE TO END!\
name ""
>A few insect soldiers rush into the room.@
>They're all injured, and seemingly barely able to move...\
name "Mosquito Girl"
>Human...!@>Ah, you!\
name ""
name "Hornet Girl"
>...ENEMY!?\
name ""
name "Luka"
>Enemies, allies...@> I'm sick of it!\
name ""
dwave 1,"se\asioto3.ogg"
>I prop myself up with my sword.@
>I walk past the injured insect girls, and head towards the exit.\
name "Luka"
>...How many plant soldiers are there?@>How far away are they?\
name ""
name "Mosquito Girl"
>Over thirty.@
>They're about to invade the hive any moment...\
name ""
name "Hornet Girl"
>YOU... ALLY?\
name ""
name "Luka"
>...Didn't you hear me?@
>Enemies or allies... Those words don't mean anything!\
name ""
dwave 1,"se\asioto2.ogg"
eng "Yelling that back, I walk out of the hive.":$sel6/
bgm "bgm\ruka.ogg"
cspl 700,701
bg "bg\bg094.bmp",10,3000
\
>As soon as I leave the hive, I come across a hunting party.\
>A group of plant monsters hunting down fleeing insect monsters.@
>Running down the stragglers, they pile on and attack them.\
>Entangling ivy around them, sucking out their body fluids, wrapping flowers around them...@
>They toy with the losers in various ways...\
lsp 700,":a;chara\a_vore_st01.bmp",180,130
lsp 702,":a;chara\a_parasol_st01.bmp",470,30
lsp 704,":a;chara\a_prison_st01.bmp",-60,70:print 10,500
name "Alra Parasol"
>Ara... If it isn't the Hero of the war.@
>Thanks to you, the victory is ours!\
name ""
name "Alra Vore"
>Please, join in the winner's feast along with us.@
>Rape, eat...@> Whatever you like!\
name ""
name "Luka"
>............\
name ""
>I don't know which side is right or wrong...@
>I'm done with those meaningless words.\
>Both sides blame the other of persecuting and killing the other.@
>It doesn't matter to me anymore.\
>In the end...@
>The only thing I can do is stop the atrocities happening in front of me!\
r@k@\
mov %nowmusic,7
goto *plants2_start



*sean0188

bgm "bgm\ruka.ogg"
name ""
r@k@\
name "Luka"
>Guh... More!?\
name ""
lsp 700,":a;chara\mob_mamono2.bmp",-63,0
lsp 701,":a;chara\mob_mamono2.bmp",187,0
lsp 702,":a;chara\mob_mamono2.bmp",437,0:print 10,500
>Right after I defeat the three Alraunes, three more take their place.\
dwave 1,"se\asioto1.ogg"
>I hold my sword down and to my side, and charge them as fast as I can run.\
name "Alraune A"
>Give up, traitor!\
name ""
name "Alraune B"
>You may be strong, but you can't defeat us all by yourself!\
name ""
name "Luka"
>Get out of my way!\
name ""
dwave 1,"se\slash.ogg"
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
name "Alraune A"
eng "Ah...!":$sel6/
csp 700:print 10,500
\
name ""
>I slash upwards with all my strength, and use the momentum gained to hit the next Alraune with an even more powerful downward blow.\
dwave 1,"se\slash.ogg"
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
name "Alraune B"
eng "No...!":$sel6/
csp 701:print 10,500
\
name ""
>I bring my blade back into the ready position by my side as I start to charge again.\
name "Alraune C"
>Damn him... Attack from behind!\
name ""
name "Luka"
>............\
name ""
dwave 1,"se\slash3.ogg"
vsp 702,0:print 10,15
vsp 702,1:print 10,15
vsp 702,0:print 10,15
vsp 702,1:print 10,15
vsp 702,0:print 10,15
vsp 702,1:print 10,15
csp 702:print 10,500
>As the third Alraune tries to hit me from behind, I quickly spin around and cleave her with a powerful backward slash.\
lsp 700,":a;chara\mob_mamono2.bmp",-20,0
lsp 701,":a;chara\mob_mamono2.bmp",350,0:print 10,500
name "Alraune D"
>Damn you, human!\
name ""
name "Alraune E"
>How dare you attack my allies!\
name ""
name "Luka"
>I said, get out of my way!\
name ""
>The two Alraunes attack me in unison.@
dwave 1,"se\slash3.ogg"
vsp 700,0:vsp 701,0:print 10,15
vsp 700,1:vsp 701,1:print 10,15
vsp 700,0:vsp 701,0:print 10,15
vsp 700,1:vsp 701,1:print 10,15
vsp 700,0:vsp 701,0:print 10,15
vsp 700,1:vsp 701,1:print 10,15
cspl 700,701:print 10,500
>With a powerful slash to the left followed by a second to the right, I seal them before a yell can even escape their mouths.\
lsp 700,":a;chara\mob_mamono2.bmp",-20,0
lsp 701,":a;chara\mob_mamono2.bmp",350,0:print 10,500
name "Alraune F"
>How can we be losing with this many!?\
name ""
name "Alraune G"
>Is he really human!?\
name ""
name "Luka"
>It's because I'm human...@>That I can't allow this to happen!\
name ""
>The plant monsters rush me from all sides, as I lash out with my sword, cutting and slashing at everything that moves toward me.\
cspl 700,701:print 10,500
>Then...@>In only a few moments, I'm surrounded by nothing but a field of flowers.\
>Every last one... I sealed them all.@
>Breathing hard, I stand alone in a sea of brightly colored flowers.\
bgm "bgm\hutuu2.ogg"
name "Luka"
>................\
name ""
lsp 699,":a;chara\alice_st91.bmp",172,0
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Alice"
>................\
name ""
name "Luka"
>Alice...@> I...@>Was I wrong?\
name ""
name "Alice"
>Your mistake was that you only listened to one side's story.\
>You believe that your side has suffered an injustice, and the other side are the aggressors.@> Nobody ever goes to war thinking they're the ones at fault.\
>Neither side is lying...@> Both sides believe they are in the right.@
>Believing to be the side of justice opposing cruelty, both sides slaughter the other, feeling justified in their own cruelty.\
name ""
name "Luka"
>................\
name ""
>I only heard one side, and charged in waving my sword without thinking...@
>In the end, I got angry and even sealed all the plants, too.\
>They aren't dead, so they can still return to normal...@
>But still, the regret and self-loathing is crushing.\
>What the hell kind of Hero am I...?\
name "Alice"
>Now then.@>What are you going to do now?\
name ""
name "Luka"
>...I don't know.\
>What would a true Hero do...?@
>What should I do...?\
name ""
name "Alice"
>How long are you going to bind your actions to that "True Hero" crap?@
>You made your own image of a "True Hero", and you're trying to use it to justify your own actions.\
name ""
name "Luka"
>But, I have to be a Hero...@
>I can't be anything but one...\
name ""
name "Alice"
>Ah, that's right.@>Your wonderful reason for fighting in this war.@
>What was it again?@> You were doing what a "True Hero" would do, weren't you?\
>Didn't you use that to justify a deeper reason?\
name ""
name "Luka"
>A deeper reason...\
name ""
>Why did I fight the insect girls, who were attacking the plant monsters?@
>Why did I fight the plant girls, who were attacking the insect girls?\
name "Luka"
>I don't want to see weak people bullied by the strong...@
>Neither humans or monsters...@>I don't want to see anyone suffering.\
name ""
name "Alice"
>Then that is your reason.@>If you wield your sword for your own desire, you won't waver.\
>You don't need to justify it as what a "True Hero" would do.@> It's what you want to do, that's what matters.\
name ""
name "Luka"
>..............\
name ""
>My own reason...@
>Not a Hero's, but my own...\
name "Luka"
>Then I have to go... To Planforest.\
name ""
>If I leave now, the insect monsters will be all devoured.@
>I have to stop that from happening.\
>Not as something a True Hero would do.@> But as something I want to do.\
lsp 700,":a;chara\alice_st02.bmp",172,0:print 10,500
name "Alice"
>It looks like you've found your path.@
>Don't forget, you decided yourself why you started walking it.\
name ""
dwave 1,"se\escape.ogg"
cspl 699,700:print 10,500
>In the next moment, Alice vanishes.\
name "Luka"
>My own reason... Eh...\
name ""
>A True Hero would do this...@
>A True Hero would do that...\
>Every time, I've been justifying my actions by placing the responsibility for the choice on my made-up image of Hero...\
>But now I'll take that responsibility.@
>I'll protect those in front of me...\
>Resolving that, I rush toward Planforest.\
dwave 1,"se\asioto2.ogg"
bgm "bgm\plansect.ogg"
lsp 700,":a;chara\a_emp_st01.bmp",150,0
bg "bg\bg095.bmp",10,1500
name "Alra Priestess"
>...My, you are quite the violent one.@
>How many have you defeated before coming here?\
name ""
name "Luka"
>Every one on the way here.@
>You aren't planning on ending the war, are you?\
name ""
lsp 700,":a;chara\a_emp_st02.bmp",150,0:print 10,500
name "Alra Priestess"
>...Yes, that's right.@
>Once the insects have all been exterminated, the war will be over.\
>Until the threat of them has been removed, we will never know peace.\
name ""
name "Luka"
>Is it true the Canaan Sisters did horrible things to the insects?\
name ""
name "Alra Priestess"
>All they did was feed on some live prey...@
>They're carnivorous plants, after all.\
>But... That's also their natural right as the winner, isn't it?\
name ""
name "Luka"
>...There's no right to that.@
>I'm not a pacifist.@>I don't think everyone in the world will ever hold hands and be best friends.\
>But... This isn't a war.@> This is genocide.\
>I will never let such insanity continue!\
name ""
r@k@\
goto *a_emp_start



*sean0189

bgm "bgm\ruka.ogg"
name ""
r@k@\
name "Luka"
>Get out here, Canaan Sisters!\
name ""
>After sealing Alra Priestess, I call out into the woods.@
>Once I deal with those sisters, this fight will be over.\
name "Dorothy Canaan"
>Oh, is someone calling me?\
name ""
>A voice calls out from the depths of the forest...@
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\dorothy_st01.bmp",0,0:print 10,500
>Suddenly, a bizarre carnivorous plant appears!\
name "Luka"
>Just one?@
>Where are the others?\
name ""
name "Dorothy"
>My sisters?@>Ah, they're busy eating.@
>We're having quite a feast thanks to you, human boy.\
name ""
>Dorothy looks at me, giggling.\
name "Luka"
>I want to ask just one question...@
>Do you have to eat humans or monsters to survive?\
name ""
name "Dorothy"
>No... I can live off non sentient animals easily.@
>A high class plant monster like me is even capable of living off water and oxygen.\
name ""
name "Luka"
>Then why do you prey on others?\
name ""
name "Dorothy"
>I love it... Teasing and bullying the defeated.@
>The losers struggle as I slowly digest them...@> Ahh, it's so fun!\
name ""
name "Luka"
>..............\
name ""
>Monsters that have to feed on other monsters or humans just to live...@
>I don't know what I would do if faced with one of them.\
>But the one in front of me is different...@
>She just enjoys toying with those she defeats for fun.\
>To that end, she encouraged this stupid war!\
name ""
r@k@\
goto *dorothy_start



*sean0189a

bgm "bgm\boss0.ogg"
r@k@\
name "Luka"
>............\
name ""
>Dorothy Canaan is sealed, but it's not over yet.\
name "Luka"
>Not yet!@> Where are you!?@> I know the other Sister is here!\
name ""
>Responding to my shout, I turn around to see another monster rush out of the grass!\
r@k@\
goto *rafi_start



*sean0189b

bgm "bgm\boss0.ogg"
name ""
r@k@\
name "Luka"
>It's finally over...\
name ""
>I let out a long sigh, and start to sheathe my sword.@
>But suddenly, I sense another enemy approaching!\
name "Luka"
>It can't be... More enemies!?\
name ""
r@k@\
goto *dina_start



*sean0190

bgm "bgm\hutuu4.ogg"
name ""
r@k@\
>All three Canaan Sisters are sealed now.@
>Now both the leader and central forces of both sides have been lost...\
>There's no way either side can continue to fight after this.\
name "Luka"
>...........\
name ""
>All around me is a field of flowers, all sealed Alraunes.@
>Along with them, signs of the previous battles are evident, with broken trees and fallen monsters.\
>But I stand in the middle alone, with nothing but the sound of the wind in the trees around me.\
>After a few moments, Alice slowly approaches me.\
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...It looks like it's really over this time.@
>But it doesn't really feel like anything was solved.\
name ""
name "Luka"
>I've hurt too many monsters after coming to this forest.@
>I wanted to be a Hero.@> To do the right thing.\
name ""
name "Alice"
>You justified your actions by claiming that's what your own self created image of a Hero would do.@
>If that's how you determine justice in this world, you'll continue to make the same mistakes.\
name ""
name "Luka"
>Justice...\
name ""
name "Alice"
>Each side in this war believed they were on the side of justice.@
>Their enemies were nothing but evil incarnate, and so got drunk on the violence when finally able to punish them for their perceived misdeeds.\
>It's not just the war here, but the wars of the world itself.@
>When you stand on the side of justice and the other of evil, it's quite easy to shrug off your own brutality.\
name ""
name "Luka"
>Did I do something good...?@>Or bad?\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Who knows... Good and evil is relative, after all.@
>Neither is an absolute, and neither can be clearly defined.\
>Trying to do so is nothing but wordplay.\
name ""
name "Luka"
>..............\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>But still, you ended the war.\
>Despite the foolish Hero justifications and the wanton sealing...@
>You still ended the war.@> You should be proud of that.\
>Of course there were plenty of mistakes made along the way.\
name ""
name "Luka"
>That's right... I don't want to make any more mistakes.@
>My reason for fighting can't be called justice.\
>I just don't want to see either humans or monsters being hurt.@
>That's why I'll fight.\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>Hmm, that's good.\
>The idiot should keep to his idiotic reasoning...@
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
>Hmm?\
name ""
>Suddenly, a bush nearby starts to shake.@
>A plant monster sheepishly comes out toward us.\
bgm "bgm\hutuu3.ogg"
csp 699
lsp 700,":a;chara\mob_mamono2.bmp",157,0:print 10,500
name "Alraune"
>Ahhh...\
name ""
>It's an Alraune with a frightened face.\
>No... She's not the only one.@
>After her were more plant monsters, and a few insect ones too.\
name "Alraune"
>Uhm... Err...@
>Could it be... Is the war over...?\
name ""
name "Luka"
>That's right... Who are you?\
name ""
name "Alraune"
>We're the ones who refused to fight...@
>While everyone was fighting, we all ran away because we didn't want to be a part of it...\
>We met really deep in the woods, and stuck together.@
>But we came back because something strange was happening...\
name ""
lsp 700,":a;chara\mob_mamono2.bmp",-43,0
lsp 701,":a;chara\mob_mamono3.bmp",160,0:print 10,500
name "Tarantula Girl"
>The war is over...?@
>Can we stop hiding and running now...?\
name ""
name "Luka"
>Yes... The war is over.@
>Neither Queen Bee nor Alra Priestess nor the Canaan Sisters can harm you any more.\
name ""
name "Alraune"
>I see... We finally have peace! \
name ""
name "Tarantula Girl"
>Everyone, did you hear that!?@
>The war's over!@>No more fighting!\
name ""
>Insect and plant monsters flood into the field, coming out from their hiding in the surrounding forest.\
>There are countless numbers of them...@> It seems like there were a huge amount of monsters who fled the war.\
name "Alraune"
>There are so many casualties...@
>We have to do something...\
name ""
name "Tarantula Girl"
>Let's split up the first aid duties!@
>We'll head over to Sectforest while you guys deal with this area!\
name ""
name "Alraune"
>Good, we'll split up and help those in Planforest!\
name ""
dwave 1,"se\asioto2.ogg"
cspl 700,701:print 10,500
>The monsters quickly divide up areas and get to work providing aid.@
>Alice and I look on at the sudden change with blank stares.\
name "Luka"
>There were so many monsters who refused to take part in that war...\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>With this many monsters helping them with their own magic power, they'll be able to be unsealed far faster than I thought.\
>Your behavior was absurd and reckless...@
>But now that we know how it can be fixed, it wasn't bad at all.\
>You took out Queen Bee and those Canaan Sisters, and even a bunch of powerful soldiers.@
>It was a quick way to end that long war.\
name ""
name "Luka"
>In hindsight...\
name ""
>Without thinking about it, I had crushed both armies fighting ability.@
>It can't be...@> Did Alice plan for this outcome...?\
name "Alice"
>The monsters that live in Plansect forest aren't fools.@
>After this, the futility of war should be ingrained in them.\
name ""
name "Luka"
>Yes, I want to believe so...\
name ""
>Right now, the nasty monsters are sealed.\
>But once the seal comes undone, what's going to happen...?\
name "Alice"
>Luka... You made a lot of mistakes.@
>But you still didn't take anyone's life.\
>That's why they'll be able to change.@
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
>...And me.\
name ""
name "Luka"
>Eh...?@> What do you mean?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...Hmph, nothing.@
>More importantly, they're treating the injured far faster than I thought.\
name ""
name "Luka"
>Yeah, you're right.\
name ""
>Amazed, I look around at the monsters rushing all over the place around us.@
>Regardless of whether they're insect or plant, everyone is helping anyone injured.\
name "Luka"
>...Alright, let's go.@
>Even if we stand here, we can't do anything.\
name ""
name "Alice"
>Yes, let's keep going.@
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
>This time, let's go someplace where there's something good to eat.\
name ""
>A lot of painful things happened in this Plansect forest...@
>But the things I learned here are important.\
>Now believing that the two races will be able to live here together in peace, I leave the forest.\
>For the next destination...\
r@k@\
bgm "bgm\field3.ogg"
mov %ivent10,1
mov %genzaiti,11
mov %gloval1_story_sinkou,6:gosub *savegloval1
cspl 699,700
goto *map4



*sean0192

gosub *genzaiti_bg
name "Luka"
>Alright, let's go to Undine!\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Hmph. Finally off for Undine?@
>Are you sure you've finished everything you wanted to do in this area?\
name ""
r@k@\
csel "I did",*sean0193,"Not yet",*sean0193a



*sean0193a

name "Luka"
>No, no... I still have something I need to do.\
name ""
>I open the map again.\
goto *map4



*sean0193

name "Luka"
>Alright, let's go to Undine's Spring!\
name ""
>Thus, we head to the area the citizens in Grand Noah referred to as "Taboo Spring".\
dwave 1,"se\asioto2.ogg"
bgmstop
sean_change "bg096"
bgm "bgm\izumi.ogg"
name "Luka"
>This is a "spring"?@>It's a lot larger than I thought it would be...\
name ""
>I'd call it a lake, not a spring.\
>And this strange atmosphere...@
>It's just like how it felt in Sylph's forest, and the desert around Gnome.\
name "Luka"
>It does seem like Undine would be here...\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>This place...@>I see, Erubetie's...@
>It looks like this is going to get annoying.\
name ""
name "Luka"
>Eh...?@> What do you mean?\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...........\
name ""
>Alice stays quiet.@
>I know it's pointless to keep questioning her when she decides not to speak.\
cspl 699,700:print 10,500
name "Luka"
>Alright, now what to do...?@
>I guess I should take a look around first.\
name ""
>As I take a step closer to the spring...\
name "???"
>Stay away...\
name ""
name "Luka"
>Hmmm...?\
name ""
name "???"
>Human, don't come any closer to this place...\
name ""
>I hear a girl's voice coming out of the spring!\
name "Luka"
>...Could it be, are you Undine!?\
name ""
>I yell out at the spring, but get no answer.@
>The mysterious voice has already gone silent...\
name "Luka"
>I wonder if that was Undine's voice...?\
name ""
bgm "bgm\comi1.ogg"
lsp 700,":a;chara\sylph_st21r.bmp",221,190
lsp 701,":a;chara\gnome_st31r.bmp",413,145:print 10,500
name "Sylph"
>No, it wasn't.@
>It sounded a little similar, but it wasn't Deeny's!\
name "Gnome"
>.................\
name ""
name "Luka"
>Is that so?@>Then just what was it...?\
name ""
name "Sylph"
>But there are signs of Deeny here!@
>She must be inside the spring!\
>Heeey!@> Deeeeny!@>Let's play!\
name ""
name "Luka"
>..............\
name ""
>Despite Sylph's shouts, there's no reply from Undine.\
name "Sylph"
>Eeehhh?@>Can't she hear me?\
lsp 701,":a;chara\gnome_st32r.bmp",414,145:print 10,500
>Ok Gnomey, let's do this together!@> Shout with me on three!@
>One...@> Two...@
lsp 700,":a;chara\sylph_st22r.bmp",211,186
lsp 701,":a;chara\gnome_st33r.bmp",319,145:print 10,200
dwave 1,"se\dageki.ogg"
>Hya!\
name ""
name "Luka"
>.................\
name ""
>What should I do now, then?\
cspl 700,701:print 10,500
bgm "bgm\izumi.ogg"
name "Luka"
>But it does seem like she's here somewhere.@
>They mentioned there was a dungeon underneath the spring...\
name ""
>I don't see anything that looks like an entrance to another area though...\
name "Luka"
>But how do I get there...?@
>Is there a basement or a cave that leads down or something?\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>The entrance must be in the spring somewhere.@
>If you dive in, you can probably make it to the dungeon entrance.\
name ""
name "Luka"
>I see, I got it!@
>You aren't going with me, are you?\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>I hate damp and humid places.@>I'll wait here.\
name ""
>Alice refuses to do anything that would require extra effort, as usual.\
name "Luka"
>Got it, then I'm heading out.\
name ""
name "Alice"
>Get Undine's power and come back safely.@
>Don't lose in this boring, humid place.\
name ""
name "Luka"
>Of course!\
name ""
cspl 699,700:print 10,500
>Yelling that back to her, I jump headfirst into the spring.@
dwave 1,"se\light.ogg"
lsp 699,":c;system\ef_white.jpg",0,0:print 10,1000
>Suddenly, I'm wrapped in a bright white light!\
csp 699
bg "bg\bg097.bmp",10,3000
name "Luka"
>Wh...Where am I?\
name ""
>When the white light faded, I was in a dark, damp cave.@
>Is this the dungeon under the spring that they mentioned...?\
name "Luka"
>It does feel like monsters would come out...\
name ""
>The strange atmosphere gives the cave a creepy feeling.@
>The wind itself feels heavy and dull because of the humidity, too...\
name "Luka"
>Now to look for Undine...\
name ""
>I start to walk deeper into the cave.@
>Suddenly, a puddle in front of me takes the form of a girl!\
r@k@\
goto *jelly_start



*sean0194

bgm "bgm\izumi.ogg"
name ""
r@k@\
name "Luka"
>Everywhere I go, monsters attack me...\
name ""
>Even in this underground cave, monsters attack me before I can say anything.@
>The time when humans and monsters can coexist still requires a lot of work to obtain...\
name "Luka"
>I wonder where Undine is...?@
>I guess I should go deeper inside.\
name ""
>I feel a slight wind flowing inside the cave.@
>Following it, I step deeper into the cave.\
dwave 1,"se\asioto3.ogg"
sean_change "bg097"
name "???"
>Even though I said not to approach...@
>Why have you come here?\
name ""
name "Luka"
>.....!?\
name ""
>It's the voice I heard above.@
>They said it wasn't Undine, so just who is it...?\
>Right before I call out to the voice, I feel the presence of another monster!\
r@k@\
goto *blob_start



*sean0195

bgm "bgm\izumi.ogg"
name ""
r@k@\
name "Luka"
>A meat eating slime monster...@
>Such brutal monsters are in this cave...\
name ""
>This place is a lot more dangerous than I thought it would be.@
>I shouldn't stay here too long.\
name "Luka"
>I need to find Undine fast...\
name ""
>Luckily, there haven't been any turns inside this cave yet.@
>I rush forward with a lot more urgency than before.\
dwave 1,"se\asioto3.ogg"
sean_change "bg097"
>I stop upon hearing that voice again.@
>If it isn't Undine, then who is it that's telling me not to enter...?\
>As I think about the source of the voice, another monster appears in front of me!\
r@k@\
goto *slime_green_start



*sean0196

bgm "bgm\kiki2.ogg"
name ""
r@k@\
name "Luka"
>...........\
name ""
>I breathe a sigh of relief as the four slime girls run away.@
>They mentioned someone named Erubetie...@> Where have I heard that name before...?\
dwave 1,"se\ero_slime3.ogg"
>In the next instant, a blue liquid bleeds from the nearby ground.\
>It slowly pools and grows, taking the form of a woman.@
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\erbetie_st01.bmp",225,0:print 10,500
>A powerful looking slime stands before me!\
name "Erubetie"
>...........\
name ""
name "Luka"
>Guh...!\
name ""
>A shiver runs down my spine, and my hands start to shake.@
>The power given off by her is totally different from the enemies I've faced in this cave so far...\
>Her gaze itself is enough to make my legs shake.@
>This is just like what I felt when I met Granberia and Alma Elma...\
name "Luka"
>That's right... Erubetie...\
name ""
>I remember Alice mentioning that name.@
>The last of the Four Heavenly Knights...@> The one I had yet to see!\
name "Erubetie"
>You ignored my repeated warnings, and came here anyway...@
>This sacred area where my brethren live in peace...\
>We took this spring that humans polluted...@
>Cleansing it, we turned it into our own sacred dwelling.\
>Why do you humans continue to pollute this place?\
name ""
name "Luka"
>No, that's not it!@
>I didn't come here to disturb you, or pollute anything!\
>I just want to meet Undine!\
name ""
name "Erubetie"
>Undine feels the same as I do.@
>She has no desire to meet with a human.\
>For treading upon this sacred place... I'll have to punish you.\
>That body...@> I'll play with it...@>Dissolve it...@> Eat it...\
name ""
r@k@\
goto *erbetie1_start



*sean0196a

bgm "bgm\sinpi1.ogg"
name ""
r@k@\
csp 701
lsp 700,":a;chara\undine_st01.bmp",0,0:print 10,500
name "Undine"
>.............\
name ""
name "Luka"
>Y...You saved me?\
name ""
>After Erubetie vanishes, I'm alone with Undine in the cave.\
>She saved me...@
>But the atmosphere between us feels anything but friendly.\
name "Luka"
>Undine... Why did you save me?\
name ""
name "Undine"
>Since Sylph and Gnome are obeying you, I deemed you worth meeting.@
>That wish for humans and monsters to live together in harmony...@> I'll have to test you.\
name ""
r@k@\
goto *undine_start



*sean0197

bgm "bgm\sinpi1.ogg"
name ""
r@k@\
name "Undine"
>Indeed, you seem to possess the qualification to wield my power...\
>The power of water is one to reflect the heart.@
>Project your serene heart out of your self, forming a pure blade...\
name ""
name "Luka"
>Eh...?@> Eh...?\
name ""
>Honestly, I have no idea what she's talking about.@
>It sounds hard to use though...\
name "Undine"
>There was once a swordsman who wielded all four spirits at once.\
>He had a natural talent, but it still took him a year to wield the power of water.\
>I wonder how long it will take you...?\
name ""
>While saying that, Undine points at my hand!@
dwave 1,"se\warm.ogg"
csp 700
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
>My palm sparkles in a dazzling blue light as Undine vanishes!\
name "Luka"
>This is...\
name ""
>I feel a new power stirring inside me.@
>It feels like water is gently flowing through my body...\
>No, it's not just inside me...@
>That flow is outside of me as well, as if I'm in the middle of a tide.\
name "Luka"
>It's the same as with the wind and earth...\
name ""
>After borrowing Sylph and Gnome's power, I was able to feel the element itself.@
>A while after being able to feel them, I was able to wield them...\
>This flow, too... I'll need to get used to it before I can wield it...\
name "Luka"
>Alright, back to the surface!\
name ""
>Completing my objective, I leave the cave in high spirits.\
dwave 1,"se\asioto3.ogg"
bgmstop
sean_change "bg096"
bgm "bgm\izumi.ogg"
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Hmm, it looks like you got the power of water.\
name ""
name "Luka"
>Alice...@> You had a lot of free time, huh?\
name ""
>All around me are crude drawings in the dirt.@
>Those drawn faces are kinda creepy looking...\
name "Luka"
>"The Idiotic Fake Hero"...@> Is this drawing supposed to be me!?\
name ""
name "Alice"
>Don't worry about that, you idiot.@
>More importantly, how is the power of water?\
name ""
name "Luka"
>I can feel something like a flow of water, all around me...\
>I feel it flowing through my body...@
>And it feels like that flow is connected to the flow of the world itself.\
>I can't really explain it, but that's what it feels like...\
name ""
name "Alice"
>Hmm, I can't explain it either.@
>But yes, I guess it's like that...?\
name ""
>Alice nods with a knowing, smug smile.@> She has no idea either...\
>At that time, I feel the spirits talking inside of me.\
bgm "bgm\comi1.ogg"
csp 699
lsp 700,":a;chara\sylph_st21r.bmp",341,190
lsp 701,":a;chara\gnome_st31r.bmp",533,145
lsp 702,":a;chara\undine_st23.bmp",0,180:print 10,500
name "Sylph"
>It's fine! \
>Fire, wind, earth, and water all flow through the universe!@
>Those four flows go through Luka, and everyone else in the world!\
>But now Luka can feel the flows!@
>All thanks to Deeny! \
name ""
name "Undine"
>..................\
name ""
name "Sylph"
>Now I can play with Deeny! @
>Alright! Yaaay! \
dwave 1,"se\aqua5.ogg"
lsp 700,":a;chara\sylph_st23.bmp",165,50
lsp 701,":a;chara\gnome_st32r.bmp",534,145
lsp 702,":a;chara\undine_st21.bmp",0,180:print 10,500
>*Gurgle* *Gurgle*\
name ""
name "Luka"
>Oi, oi...\
name ""
cspl 700,702:print 10,500
bgm "bgm\izumi.ogg"
>At any rate, it seems like using Undine's power is pretty difficult.@
>I'll have to train my weak heart more!\
name "Luka"
>I'll do it!\
name ""
>I was able to use both the power of wind and earth at the same time during the fight with Undine.@
>If I keep training, I'll be able to manage the power of water, too!\
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>By the way... You met with Erubetie, didn't you?\
name ""
name "Luka"
>Yes... She seems to hate humans.\
name ""
name "Alice"
>Low-grade slimes can only live in a region with pure water.@
>As the humans living areas expanded, the slime's areas shrunk.\
>Even in this Noah Region, where nature still reigns, this spring is all that's habitable.\
name ""
name "Luka"
>..............\
name ""
>Wherever humans go, they start to pollute the water...@
>Due to that, the slimes are driven out of their land.\
>That's a critical problem that seems to exclude coexistence as a possibility...\
name "Alice"
>That's why the Queen Slime Erubetie views humans as hostile beings.\
>Erubetie herself is an incredibly powerful slime that is capable of living anywhere.@
>But not all slimes are of that level.\
>For low-grade slimes, the destruction of habitable areas by humans is a serious issue.\
name ""
name "Luka"
>To think they were cornered like that...\
name ""
>The slimes are composed mainly of water, so any pollution in the water would be destructive to them...\
name "Alice"
>Erubetie followed my, and the previous Monster Lord's policy of non aggression toward humans.@
>Originally, she was a very calm and gentle monster.\
>But now...@> You've seen it first hand, haven't you?@
>Any human entering living areas is punished without mercy.\
>Her hatred of humans that pollute her home completely takes over her gentle personality.\
>What solution can you give to Erubetie as she is now?\
name ""
name "Luka"
>Err...@> I'd say...@>Ask people not to pollute the water...\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>What a stupid answer.@
>Are you going to go around the world and put up signs asking people not to pollute the water, or something?\
name ""
name "Luka"
>That wouldn't work...@
>Nobody would pay any attention to that...\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>You run around spouting about coexistence without a concrete vision on how to obtain it...\
>That said...@> A complex issue like that may be too much to leave up to an individual.@
>A problem like that would require an answer from "Humanity" as a whole.\
name ""
name "Luka"
>Alice, do you know how to do it...?\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...An answer to that is just one goal in my travels.\
name ""
name "Luka"
>Me too... I want to find an answer too.\
name ""
>I can't just think about growing stronger...@> I have to think about that, too.@
>I won't lose to Alice... I'll find an answer to it in my own way.\
name "Luka"
>But with all that said, my first purpose is to stop the Four Heavenly Knights...@
>And now, I have the power of water...\
name ""
>Wind, earth, and water...@>I have three, and all that's left is fire.\
name "Luka"
>Salamander is in the northern Gold Region...\
name ""
>The Gold Region is very mountainous, and has a famous volcano.\
>And at the northernmost tip of the continent is Gold Port.@
>That's where the ships that traveled to the Hellgondo Continent, where the Monster Lord's castle is, sailed from.\
>They stopped sailing after the "Slaughter of Remina"...@>I'll have to find a ship there somehow.\
name "Luka"
>Alright, the next destination is Grangold Castle.@
>We'll collect information there, and try to find where Salamander is.\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>Hehehe...@>I wonder what feasts are awaiting me there...?\
name ""
name "Luka"
>The Gold Region is kind of a wasteland, so I doubt they have too many delicacies...\
name ""
lsp 700,":a;chara\alice_st07b.bmp",67,0:print 10,500
name "Alice"
>N...No!\
name ""
>With Alice's face frozen in horrified shock, we continue on to the north.@
>The area at the northern edge of the Sentora Continent, the Gold Region...\
r@k@\
dwave 1,"se\asioto2.ogg"
mov %gloval1_story_sinkou,7:gosub *savegloval1
bgmstop
cspl 3,7
csp 611
cspl 699,705
bg black,7,1500
bgm "bgm\field3.ogg"
saveoff
textoff
csp -1
mov %sinkoumode,0:skipoff:autoclick 0
bg "bg\map0.bmp",10,1000
goto *sean0198m



*sean0198m

btndef clear
lsp 601,":s/20,20,0;#bbbbbbHellgondo Continent ",300,40
lsp 602,":s/20,20,0;#bbbbbbIlias Continent ",510,335
strsp 603,"Gold Region",335,130,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,13
strsp 604,"Noah Region",515,150,7,1,20,20,0,0,1,1,#bbbbbb
lsp 605,":s/20,20,0;#bbbbbbNatalia Region ",410,250
strsp 606,"Safina Region",175,270,8,1,20,20,0,0,1,1,#bbbbbb
print 1
btnwait2 %cmd1
if %cmd1=0 goto *sean0198m
if %cmd1=-1 mov %sel2,%hanyo1:gosub *menu:goto *sean0198m
csp -1
btndef clear
if %cmd1=13 goto *sean0199
goto *sean0198m



*sean0199

if %skill02=2 && %skill03=2 goto *sean0199x
bg black,10,1500
gosub *setwindow_01
bg "bg\bg009.bmp",10,1500
>On our way to the north, we make camp.\
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Watching you, I can see you still lack too much experience.@
>With your skills as they are now, you're guaranteed to reach a setback.\
>Shall I give you another lesson?\
name ""
name "Luka"
>Yes, please!\
name ""
if %skill02=2 goto *sean0199b
name "Alice"
>Listen, all you do with your wind is use it as a wall of wind.@
>But you can use that wind to move with it...\
name ""
>Thus, Alice gives me a lesson on how to use the power of the wind to move quicker...\
sean_change "bg009"
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Luka"
>I see... Like this!@
>It's like I'm really made partly of the wind!\
name ""
>Instead of forcing the wind to make a wall, it's like I take it into me and become a part of it.@
>With this, I can evade attacks!\
mov %skill02,2
if %skill03<2 goto *sean0199b
cspl 699,700:print 10,500
>Right before reaching new lands, I've learned a new skill...\
goto *sean0199x



*sean0199b

name "Alice"
>You still handle that earth with a lack of focus.\
>Listen, you need to imagine the earth itself dwelling in your body.@
>The magnificent earth, that nothing is able to dislodge...\
name ""
>Thus, Alice gives me a lesson on the power of the earth...\
sean_change "bg009"
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Luka"
>I see, like this!@
>It's like my body has really become one with the earth!\
name ""
>Like making myself part of the earth itself, my defense drastically increases.@
>With this, I can endure enemies attacks with ease...\
mov %skill03,2
cspl 699,700:print 10,500
>Right before reaching new lands, I've learned a new skill...\
goto *sean0199x



*sean0199x

bg black,10,1500
gosub *setwindow_01
bg "bg\bg061.bmp",10,1500
>The last obstacle on our way north is the Great Forest of Noah.@
>Once we're out of the forest, we'll be in the Gold Region.\
name "Luka"
>Hey, Alice...@
>How do they decide who the Monster Lord is?\
name ""
>As we walk through the trees, I start to question Alice.\
name "Luka"
>Your mother was the Monster Lord, too, right?@>So is it hereditary?\
name ""
lsp 699,":a;chara\alice_st91.bmp",172,0
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Alice"
>...When the Monster Lord dies, the selection for the next begins.@
>The first choice is indeed the previous Monster Lord's daughter.\
>But the Monster Lord's strength is the most important thing.@
>It isn't a simple hereditary system, since that could put someone weak in power.\
name ""
name "Luka"
>That's true...\
name ""
name "Alice"
>So all the monsters wishing to become Monster Lord start to gather.@
>And of course since they want to be Monster Lord, they're all very strong.\
>They then battle against the previous Monster Lord's daughter in combat.@
>The one who comes out on top is the new Monster Lord.\
name ""
name "Luka"
>That seems kind of troublesome...@
>Isn't there a way to decide it peacefully?\
name ""
name "Alice"
>Only the strongest monster can become the Monster Lord.\
>There are a lot of monsters that live on their own, ignoring rules.@
>Without the strength to subdue them, they would constantly be rioting and causing trouble.\
>But because of that selection method, it's known all over the world that she's the strongest, and unwise to rebel against.\
name ""
name "Luka"
>I see...\
name ""
>It seems like a crazy selection process... But I guess it's more a display of the new Monster Lord's power...\
name "Alice"
>But since the first Monster Lord, no other family has sat upon the throne besides my own.@
>Do you know why?\
name ""
name "Luka"
>...Why?\
name ""
>I bet they cheat somehow.@
>...Though she'd get mad if I said that.\
lsp 700,":a;chara\alice_st02.bmp",172,0:print 10,500
name "Alice"
>My ancestors, my mother... We all are linked by blood to the original Monster Lord.\
>Always striving to be the strongest, we devote ourselves to training.\
>That's why we have never lost in combat to win the throne.@
>To make sure we never shame our ancestors, we won't allow ourselves to sit anywhere but on the Monster Lord's throne!\
name ""
>Alice puffs up with pride as we walk through the forest.\
name "Luka"
>So...@
>You beat everyone in combat when you took the throne?\
name ""
lsp 700,":a;chara\alice_st04.bmp",172,0:print 10,500
name "Alice"
>When I took the throne...@>Something happened that has never happened before.@
>Four challengers came forward to claim the Monster Lord's seat.\
>So those four and I fought in a battle royale.@
>For there to be five people powerful enough to lay claim to the Monster Lord's seat...\
>It could be said that this is a golden age in monster history.\
name ""
name "Luka"
>Could it be that those four...?\
name ""
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Alice"
>Yes... They're currently the Four Heavenly Knights.\
>The unmatched dragon swordswoman prodigy, Granberia.@
>The proud and powerful Queen Succubus, Alma Elma.\
>The one in charge of many of the past Monster Lord's educations, and rumored to be the strongest monster, Tamamo.\
>The leader of the tens of thousands strong slime race, Erubetie...\
>And of course me.@>As you can imagine, it was quite a fierce battle.\
name ""
name "Luka"
>So the five of you were in a battle royale...@
>That sounds crazy.\
name ""
name "Alice"
>The first out was Alma Elma.@
>After only a little while, she surrendered.\
name ""
name "Luka"
>So Alma Elma was the weakest...?\
name ""
lsp 700,":a;chara\alice_st04.bmp",172,0:print 10,500
name "Alice"
>She had plenty of energy left over to continue if she wanted...@
>But that girl always does whatever she wants, so I don't know what she was thinking.\
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
>Next Erubetie and Tamamo smashed each other, knocking each other out.@
>Neither of them are weaker than Granberia, but they couldn't keep up with the confusion of the fight.\
name ""
name "Luka"
>So basically, the Four Heavenly Knights are more or less equal in ability?\
name ""
name "Alice"
>They have different affinities for different opponents and situations, but they are more or less equal in raw ability.\
>At any rate, eventually it came down to single combat between Granberia and me.\
>Her skills even brought me to my knees once.@
lsp 700,":a;chara\alice_st02.bmp",172,0:print 10,500
>...Is what I want to say, but I don't have any knees.\
name ""
name "Luka"
>You don't need to make any bad jokes...\
name ""
name "Alice"
lsp 700,":a;chara\alice_st04.bmp",172,0:print 10,500
>I... I wasn't really trying to make a joke...\
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
>Anyway, she tried using her techniques more than once.@
>But after I saw them once, they didn't work again, and I took victory over her.\
name ""
name "Luka"
>So then it ended happily with you as the new Monster Lord?\
name ""
name "Alice"
>The four of them acknowledged my ability and pledged allegiance as the Four Heavenly Knights.@
>Which is another purpose of the throne selection battles...\
>Beating the other powerful monsters fairly in combat gets rid of any grudges or later power struggles, granting a peaceful reign with low chance of rebellion.\
>...Most of the time.\
name ""
name "Luka"
>Hmm... It sounds like it isn't as crazy as I thought.\
name ""
lsp 700,":a;chara\alice_st03.bmp",172,0:print 10,500
name "Alice"
>It's what the first generation of my family decided.@
>Their intelligence was deeper than the sea!@>It's genius!\
name ""
name "Luka"
>I...I get it already...\
name ""
cspl 699,700:print 10,500
>As we walk through the forest talking...@
>A monster suddenly stands in our way!\
r@k@\
goto *kamakiri_start



*sean0200

bgm "bgm\field3.ogg"
r@k@\
name "Luka"
>...The power of water is making me feel kind of depressed.\
name ""
lsp 699,":a;chara\alice_st91.bmp",172,0
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Alice"
>What are you talking about, you idiot?@
>The way you're using the power is flawed.\
>Unlike using the earth and the wind, the power of water reflects what's in your heart.\
>The wind fills your movements, the earth fills your body, the water fills your heart, and fire fills your spirit.\
name ""
name "Luka"
>That's something Heinrich said, isn't it?\
name ""
>Is that how Heinrich got so strong?@
>Then if I do it the same way, I can be strong like he was!\
name "Alice"
>Your spirit is still lacking.@
>If you don't train both your spirit and sword arm, you can't call yourself a Hero.\
name ""
name "Luka"
>Train my spirit...\
>It sounds hard, but I'll do my best!\
name ""
>With the legendary Hero Heinrich as my goal, my determination only increases.@
>We're almost out of this forest, too.\
dwave 1,"se\asioto2.ogg"
sean_change "bg099"
name "Luka"
>Whew... Finally out of the Great Forest of Noah.\
name ""
>Right as we exit the forest, the sun is starting to set.@
>We should look for somewhere to camp...\
>As I take a look around for a good camping spot, a monster jumps me!\
r@k@\
goto *scylla_start



*sean0201

bgm "bgm\field3.ogg"
r@k@\
name "Luka"
>Whew... She was strong.\
name ""
>The monsters in the north seem to be as powerful as I thought.@
>Without the power of the spirits, I'd be toast.\
lsp 699,":a;chara\alice_st91.bmp",172,0
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Alice"
>...I'm starving.@
>Let's make camp now.\
name ""
name "Luka"
>That's the first thing you say upon returning...?\
name ""
>Well, at least she's predictable.@
>I start making our camp.\
sean_change "bg009"
bgm "bgm\yaei.ogg"
>After dinner, we start the usual training...\
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>So that you can master the power of water, we're going to forge that pathetic heart of yours.\
name ""
name "Luka"
>O...Ok... I'll do my best.\
name ""
>I hesitatingly nod back at her.@
>I'm not any good at that ascetic stuff, but I'll try my best.\
name "Alice"
>Alright, hurry up and get into a meditation pose.@
>Then empty your heart to nothing.\
name ""
name "Luka"
>I don't want to attain enlightenment, I just want to get stronger...\
name ""
>She said that before, but I don't think that will make me stronger...\
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>You idiot, if you don't train your heart, you can't use the power of water!@
>If you can't do that, you'll never be able to reach Heinrich's level!\
name ""
name "Luka"
>I...In that case, I have to do it!\
name ""
>I feel like she's just using Heinrich's name to influence me...@
>But whatever, I take a meditating pose just like she said.\
name "Luka"
>Empty my heart to nothing...@> Basically, don't think of anything?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Not quite... But close enough.@
>Empty your heart, and entrust yourself to the flow all around you.\
name ""
name "Luka"
>..............\
name ""
cspl 699,700
bg black,10,1500
>I slowly close my eyes.\
name "Luka"
>..............\
name ""
>Don't think of anything...\
>Nothing...\
>Noth...\
>..............\
name "Alice"
eng "Ha!":$sel6/
dwave 2,"se\damage.ogg":quakex 2,440
\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0
bg "bg\bg009.bmp",10,500
name "Luka"
>Uwa!\
name ""
>Alice suddenly slaps me!\
name "Luka"
>Wh...What the hell are you doing!?\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>Why did you let that happen!?\
name ""
>...Why is she angry?@
>Suddenly slapping me out of nowhere... I should be the angry one.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Quit sulking, you idiot.@
>You should have been able to dodge that easily if you had given your heart over to the flow.\
name ""
name "Luka"
>...Somehow that excuse for slapping me seems awfully suspicious.\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>If you don't believe in Heinrich's teachings, all the other Heroes are going to laugh at you.\
name ""
name "Luka"
>Guh... Fine, I get it!@
>All I have to do is make my heart one with the flow, right?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Good, that's the way.@
>I'm going to slap you at some point, so you better dodge.\
name ""
name "Luka"
>I'm not liking this style of training...\
name ""
>I take my meditation pose again, and close my eyes.\
cspl 699,700
bg black,10,1500
name "Luka"
>..............\
name ""
>Don't think of anything...\
>Nothing...\
>Noth...\
>..............\
name "Alice"
>..............\
name ""
>It feels like something's off.@
>Something nearby has a thirst for blood, disturbing the field around me...\
name "Alice"
eng "Ha!":$sel6/
dwave 2,"se\damage.ogg":quakex 2,440
\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0
bg "bg\bg009.bmp",10,500
name "Luka"
>Guha!\
name ""
>In the next moment, something slams into my head, throwing me to the ground.\
name "Luka"
>Ahhg...@>Oww!\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>What are you doing!?@> Dodge it!\
name ""
name "Luka"
>No, I could feel something!@
>But I wasn't able to react to it...\
name ""
>It was different than feeling the wind around me.@
>It was less like feeling the air, and more like my self itself became water...\
>I think I'm starting to get it!\
name "Luka"
>Alright, let's do it again!\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Oh, it looks like you're motivated now.@
>Alright, I'll slap you again without holding back!\
name ""
cspl 699,700
bg black,10,1500
>.............\
name "Alice"
eng "Ha!":$sel6/
dwave 2,"se\damage.ogg":quakex 2,440
\
name ""
name "Alice"
>One with body and spirit!@
>If you can't do that, you'll never be be able to use the power of water!\
name ""
>.............\
name "Alice"
eng "Haaa!":$sel6/
dwave 2,"se\damage.ogg":quakex 2,440
\
name ""
name "Alice"
>Feel the flow in your heart!@
>Project Undine's power into that flow!\
name ""
>.............\
name "Alice"
eng "Ha!":$sel6/
dwave 2,"se\damage.ogg":quakex 2,440
\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0
bg "bg\bg009.bmp",10,500
name "Luka"
>Ahhgg...\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...I think it's time to stop.\
name ""
name "Luka"
>No, just a little more...\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Your concentration is already at your limit.\
>If you keep going as you are, you won't accomplish anything.@
>Let's end it here for now.\
name ""
name "Luka"
>J...Just a little more...\
name ""
name "Alice"
>If you can't put everything you have into your concentration, you won't be able to progress.@
>But if you're so insistent... I'll teach you a new sword skill instead.\
name ""
name "Luka"
>A... A new skill!?\
name ""
>My spirits lift instantly.@
>It's been a long time since I've learned a new sword skill.\
name "Alice"
>After all your fights, you've gotten surprisingly skilled at using Sylph.@
>As you are now, you should be able to apply the power of wind to your sword skills.\
name ""
name "Luka"
>To my sword skills?\
name ""
name "Alice"
>Listen, this skill...@
>While keeping the movement increase...\
name ""
name "Luka"
>Hmmhmm, I see...\
name ""
>I eagerly listen to Alice's explanation.\
sean_change "bg009"
name "Luka"
>I got it!@>Like this?\
name ""
dwave 2,"se\tuki.ogg"
>Moving like the wind, I thrust forward so fast it almost seems like I'm leaving an after-image.@
>The tip of my sword explodes straight through the tree trunk I'm practicing on.\
>It's a high speed dash so fast I can't even keep up with my own movements.@
>Using that, I can power up my Thunder Thrust!\
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...Hmph. Well done.@
>Basically, you use Thunder Thrust while infused with the power of the wind.\
>Therefore, it's called Lightning Sword Flash!\
name ""
dwave 1,"se\fanfale.ogg"
mov %skill01,11
>[Lightning Sword Flash] learned!\
name "Alice"
>This skill is much better than [Thunder Thrust].@
>Even though they cost the same SP, its strength is drastically more powerful.\
>If you use it on the first turn, the damage is also increased.\
name ""
name "Luka"
>So basically it's used just like Thunder Thrust.\
name ""
name "Alice"
>In addition, if you have Sylph summoned, the power is further amplified.@
>The Death God Girl Thanatos used this skill to sever the lives of hundreds of humans.\
name ""
name "Luka"
>Urhg... Another skill with a horrifying past.\
name ""
>I guess I should have expected another story like that.@
>Thus, I learned a new powerful skill.\
bgmstop
sean_change "bg041"
bgm "bgm\field3.ogg"
>The next day, our journey to the Grangold castle continues.@
>As we're walking through the plains with our destination finally in sight...\
>A new monster stands in my way!\
r@k@\
goto *medusa_start



*sean0202

bgm "bgm\field3.ogg"
r@k@\
name "Luka"
>Whew, I managed to win somehow...\
name ""
>The monsters are getting really powerful now that I'm so close to the most dangerous continent.@
>I can't let my guard down here for even a moment.\
dwave 1,"se\asioto2.ogg"
sean_change "bg098"
name "Luka"
>Is that Grangold castle?\
name ""
>Finally setting my eyes on our destination, I get excited.@
>I've heard that monsters and humans live here in complete harmony!\
name "Luka"
>Grand Noah Castle was already amazing, but this place is supposed to be even more advanced...@
>To think I'll get to see humans and monsters living even closer together... I can't wait!\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>Hmm, I wonder what they eat there...@
>I can't wait!\
name ""
name "Luka"
>..........\
name ""
>Yep, predictable.@
>As I approach the castle, laughing to myself...\
>A huge monster blocks the path!\
r@k@\
cspl 699,700
goto *golem_start



*sean0203

bgm "bgm\field3.ogg"
r@k@\
name "Luka"
>Whew...\
name ""
>I breathe a sigh of relief after defeating the Golem Girl.\
>Her giant, unmoving body is laying right before me.@
>It doesn't look like my sword sealed her...\
name "Luka"
>Just what is this monster...?\
name ""
>I sheathe my sword as I inspect the Golem Girl.@
dwave 1,"se\asioto1.ogg"
lsp 700,":a;chara\mob_heisi1.bmp",-160,0
lsp 701,":a;chara\mob_heisi1.bmp",160,0:print 10,500
>The castle gate opens as soldiers flood out.\
name "Luka"
>Everything's fine now, soldiers.@
>I'm a Hero, and I defeated the monster threatening the castle.\
name ""
name "Soldiers"
>.............\
name ""
>As I try to reassure the soldiers, they all point their spearheads at me!\
name "Luka"
>I...I'm sorry...@> I'm really a fake Hero!\
name ""
bgm "bgm\alice1.ogg"
name "Soldier A"
>Damn you, you monster! How dare you do that to Golem Girl!?\
name ""
name "Soldier B"
>Don't get close!@
>That kid has some crazy strength!\
name ""
>More soldiers flood out, until I'm completely surrounded.@
>It seems like they think I'm a monster...\
name "Luka"
>U...Uhm... I'm a human... Not a monster!\
name ""
name "Soldier A"
>Cease your lies!@
>There's no human that can defeat a Golem Girl!\
name ""
name "Luka"
>Ah, no, well that was because I borrowed the power of the spirits...\
name ""
name "Captain"
>Arrest him!\
name ""
name "Luka"
>Uwaa!\
name ""
>Like that, I'm arrested by the soldiers.@> It's just a simple misunderstanding, so I don't fight back.\
name ""
sean_change "bg066"
bgm "bgm\hutuu1.ogg"
lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
name "Captain"
>Haha, sorry about that.@>Really.\
name ""
name "Luka"
>............\
name ""
>A carrier pigeon from Ilias Village finally returned, confirming my birth and parentage.@
>Until it came, I've been locked in this jail at the edge of the town.\
name "Captain"
>Besides, I've never heard of a monster taking the form of a boy.@
>Please accept my heartfelt apologies.\
name ""
name "Luka"
>Ah, sure, but, uh...@
>Just what was that giant golem?\
name ""
name "Captain"
>She's the gatekeeper of Grangold Castle.@
>A man made monster made using Magic Science.\
name ""
name "Luka"
>A Magic Science man made monster...?@
>And it protects the castle?\
name ""
>I guess destroying the guardian of the castle would make me pretty suspicious...\
name "Luka"
>But isn't it dangerous as a gatekeeper?@
>Won't she attack merchants or other travelers?\
name ""
name "Captain"
>She doesn't attack anyone who has been registered with her beforehand.\
>And those who aren't registered usually run away upon seeing her.@
>She's programmed not to attack anyone running away.\
>You're the first one to just attack her head on like that.\
name ""
name "Luka"
>.............\
name ""
>I guess running away would have been better...\
name "Luka"
>Anyway, I'm sorry about that.@
>I broke the golem...\
name ""
name "Captain"
>Well, what's done is done.@
>A magic engineer is repairing her right now.\
>Please, let me get you out of this jail.\
name ""
name "Luka"
>Ah, yes...\
name ""
dwave 1,"se\door3.ogg"
>Finally clearing up the misunderstanding, I leave the jail.\
dwave 1,"se\asioto3.ogg"
bgmstop
sean_change "bg100"
bgm "bgm\city1.ogg"
lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
name "Captain"
>Now then, would you please have an audience with the King?\
name ""
name "Luka"
>With the King...?@
>Uh oh, is he angry that I destroyed the golem?\
name ""
name "Captain"
>Hahaha, not at all.@
>He's always goofing off and ignoring his duties.\
>Recently, he has taken a fancy to listening to stories of travelers.@
>I'm sure a strong man like you would have quite the interesting tales to share with him.\
name ""
name "Luka"
>But I didn't come here to play around...\
name ""
name "Captain"
>Ah, no, no, it won't take long.@
>Just talk with him for as long as the golem is being repaired...\
name ""
>The Captain skillfully dangles the fact that I destroyed the golem over my head.@
>I can't turn him down now...\
name "Luka"
>O...Ok, I'll talk with him.\
name ""
>My streak of somehow meeting rulers continues...@
>I wonder what kind of King he is...?\
name "Captain"
>Right then, follow me to the castle!\
name ""
dwave 1,"se\asioto3.ogg"
>Following the Captain, we walk through the town.@
>It looks just like a normal town...@>But there are monsters freely walking through the streets.\
>But unlike Grand Noah Castle, there are only a few types of monsters here...@
>Ant type monsters and earth type monsters are busily working and moving about...\
lsp 700,":a;chara\ant_st01.bmp",0,0:print 10,500
>An ant monster suddenly walks up next to me.\
name "Ant Girl"
>I SHALL CARRY LUGGAGE.\
name ""
name "Luka"
>Eh...?\
name ""
>I stare at her in surprise at the sudden declaration.\
name "Luka"
>Who is she...?\
name ""
lsp 700,":a;chara\mob_heisi1.bmp",-160,0
lsp 701,":a;chara\ant_st01.bmp",160,0:print 10,500
name "Captain"
>She's an Ant Girl that lives with us in Grangold.@
>They're controlled by magic, and are made useful for humans.\
>Let her carry your luggage.\
name ""
name "Luka"
>Ah, then here you go...\
name ""
name "Ant Girl"
>LUGGAGE RECEIVED.\
name ""
>I hand her the camping equipment I was carrying.\
name "Luka"
>...Thank you.\
name ""
cspl 700,701:print 10,500
>The Captain and I continue walking.@
>The Ant Girl follows behind us like a servant.\
>Looking around while we walk to the castle, I see lots of other Ant Girls carrying things, working on houses, and all sorts of things...\
name "Luka"
>Those Ant Girls are awfully hard workers, aren't they?\
name ""
lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
name "Captain"
>Yes, that's right.@
>In this town, humans leave almost all the work to the Ant Girls.\
name ""
name "Luka"
>Oh...\
name ""
lsp 700,":a;chara\madgolem_st01.bmp",0,0:print 10,500
>It looks like humans aren't working in the canals, either.@
>I take a look down into the waterway and see a large monster, made of mud.\
name "Luka"
>Who's that...?\
name ""
lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
name "Captain"
>A man made monster made with Magic Science, a Mud Golem Girl.@
>Those mud golems and the Ant Girls are the labor force of this town.\
name ""
name "Luka"
>I see...\
name ""
>Something nags at me a little bit as I look on the hard working monsters with admiration.@
>Unsure what exactly it is, I'm lead into the Castle.\
dwave 1,"se\asioto3.ogg"
bgmstop
sean_change "bg045"
bgm "bgm\castle4.ogg"
lsp 700,":a;chara\grangold_st01.bmp",0,0:print 10,500
name "Grangold King"
>I see, you were the traveler that defeated the Golem Girl!@
>Able to defeat her... You're amazing.\
name ""
>I'm surprised at the exuberance and kindness of the King.@
>But it also makes me think he's pretty unreliable...\
>The powerful presence of the Sabasa King and the dignified air of the Grand Noah Queen...@
>I don't feel anything like that from this King.\
lsp 700,":a;chara\grangold_st02.bmp",0,0:print 10,500
name "Grangold King"
>I want to hear stories of your adventures.@
>Heart pounding, blood pumping stories of adventures and heroics!\
name ""
name "Luka"
>Since I broke the gatekeeper, I must apologize...\
name ""
>While omitting anything about Alice, I start to talk about my adventures.@
>The King listens carefully, until...\
dwave 1,"se\asioto3.ogg"
lsp 700,":a;chara\grangold_st02.bmp",-160,0
lsp 701,":a;chara\ant_st01.bmp",160,0:print 10,500
name "Ant Girl"
>EXCUSE ME, KING.\
name ""
>An Ant Girl comes into the throne room.\
lsp 700,":a;chara\grangold_st01.bmp",-160,0:print 10,500
name "Grangold King"
>...Do you need something?@
>I'm with a guest at the moment, so I'd prefer it if you left...\
name ""
name "Ant Girl"
>IT IS ABOUT THIS YEAR'S FLOOD CONTROL REPORT.\
name ""
name "Grangold King"
>...Ah, yeah.@> I'll leave that all up to you.\
name ""
name "Ant Girl"
>ALSO THE PROBLEM ABOUT THE DELAY IN GOODS IN THE BUSINESS DISTRICT.\
name ""
name "Grangold King"
>...Ah, yeah.@> I leave that up to you, too.@
>Please do whatever you think is best.\
name ""
name "Ant Girl"
>...CONFIRMED.@>EXCUSE ME.\
name ""
dwave 1,"se\asioto3.ogg"
csp 701:print 10,500
>The Ant Girl leaves the room.\
lsp 700,":a;chara\grangold_st01.bmp",0,0:print 10,500
name "Grangold King"
>Ah, that was embarrassing.@
>In truth, I leave all of the government affairs to the Ant Girls.\
lsp 700,":a;chara\grangold_st02.bmp",0,0:print 10,500
>Thanks to them, I have all the free time I want.@> Hahaha.\
name ""
name "Luka"
>I...I see...\
name ""
>...Is that really OK?@
>This is making me really uneasy.\
lsp 700,":a;chara\grangold_st01.bmp",0,0:print 10,500
name "Grangold King"
>You saw it, didn't you?@
>The way humans and monsters live together here?\
name ""
name "Luka"
>...Y...Yeah...\
name ""
name "Grangold King"
>Thanks to the monsters, no humans have to do any manual labor anymore.@
>That's why we're known all over as the place where humans and monsters live together in peace!\
name ""
>Saying that, the Grangold King laughs happily.\
bgmstop
sean_change "bg100"
bgm "bgm\city1.ogg"
name "Luka"
>...So it's like that.\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>Hmph...\
name ""
>Alice folds her arms in a moody manner.\
name "Luka"
>...This isn't coexistence.@
>The humans are just forcing all the work they don't want to do on the monsters.\
name ""
>It's more like the Ant Girls are slaves.@
>This isn't the kind of living together I want!\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Ant Girls generally follow a leader and act as a group.@
>But using them like this is abuse.\
name ""
>Alice watches an Ant Girl carrying some heavy boxes through the street, as a few human citizens joke with each other as they watch.\
>Heading the opposite way is another Mud Golem Girl carrying a bunch of bricks.\
name "Alice"
>In addition, man made monsters...@
>The Magic Science used here has advanced quite far... But I can't admire it.\
name ""
name "Luka"
>They leave everything to the monsters, and live a life of comfort and ease...\
name ""
>My high hopes are slowly being crushed.@
>I was so excited to come here... And now...\
name "Luka"
>Well, shall we take a look around the town as we look for some information on Salamander?\
name ""
>We start to walk the streets, busy with the hardworking Ant Girls.\
r@k@\
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
cspl 611,700:cspl 3,7
mov %hanyo1,0:mov %hanyo2,0:mov %hanyo3,0:mov %hanyo4,0
gosub *city21_main
gosub *setwindow_01p
name "Luka"
>Alright, time for the inn.\
name ""
>Before I had noticed, it was already getting dark out.@
>We ought to look for an inn here to spend the night.\
dwave 1,"se\asioto3.ogg"
sean_change "bg083"
bgm "bgm\hutuu1.ogg"
name "Luka"
>But still, I feel uneasy in this town...\
name ""
>The Ant Girls are being abused while the humans just sit back and watch...@
>I feel kind of sick being here.\
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>It does bug me...\
>But more importantly, how did Grangold seal her...?@
>Even if every human soldier here attacked her at once, I doubt they could have sealed her...\
name ""
dwave 1,"se\knock.ogg"
>As Alice mutters to herself, someone knocks on the door.\
cspl 699,700:print 10,500
name "Luka"
>...Yes?\
name ""
dwave 1,"se\door2.ogg"
lsp 700,":a;chara\artm_st01.bmp",167,0:print 10,500
name "Automata Girl"
>Excuse me. I came to provide you some service.\
name ""
name "Luka"
>Eh...? "Service"?\
name ""
name "Automata Girl"
>I'm a monster created to satisfy the lusts of men.\
>I've been programmed with the finest of sexual skills, and boast the highest quality sexual organs in order to service guests.\
>Which kind of service do you desire?\
name ""
name "Luka"
>N...No thank you... I don't want that...\
name ""
>They made a monster doll for such a reason...\
name "Automata Girl"
>But the meaning of my existence...@
>I must give guests service...\
name ""
name "Luka"
>I...I don't want it!\
name ""
dwave 1,"se\door2.ogg"
csp 700:print 10,500
>I forcibly close the door on the Automata Girl, still shouting about "service".\
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...Those damn humans made something like that...\
name ""
name "Luka"
>Sheesh.@
>Ilias would be horrified at this...\
name ""
r@k@\
name ""
goto *sean0203a



*sean0203a

if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
if %con_hvoice=0 dwave 0,"voice\alice7_01.ogg"
name "Alice"
>...Well, I admire you refusing that doll's service.
>As a reward... I'll pleasure you with my mouth.\
name ""
dwavestop 0
name "Luka"
>Eh...?@> Waah!\
name ""
>Before I can react, Alice's snake tail wraps around my body.@
>She quickly pulls down my pants and underwear, and leans over my body.\
if %con_hvoice=0 dwave 0,"voice\alice7_02.ogg"
name "Alice"
>Hehe... A truly delicious looking penis.
>I've been thinking about indulging in this for a while.\
if %con_hvoice=0 dwave 0,"voice\alice7_03.ogg"
>I'll lick it clean with my tongue, suck it dry in my mouth, and savor it like candy.\
if %con_hvoice=0 dwave 0,"voice\alice7_04.ogg"
>Without caring about the ejaculation, I just want to suck on it until it dissolves in my mouth...\
name ""
dwavestop 0
name "Luka"
>Th...That's...\
name ""
>Reacting to her words alone, my penis slowly becomes erect.@
>Right in front of her watchful gaze, I go from soft to fully hard.\
if %con_hvoice=0 dwave 0,"voice\alice7_05.ogg"
name "Alice"
>Hehe... How are you imagining me doing it?
>But no matter what you're thinking, it will be many times better...\
name ""
dwavestop 0
>Alice's long tongue, dripping with saliva, seductively comes out of her mouth.\
>Her long tongue slowly gets closer to my penis, as if to tease me.@
>Then, with a quick motion, her long tongue quickly licks my penis lengthwise.\
name "Luka"
>Ahh...!\
name ""
>Her slightly rough tongue leaves behind a slight trail of her sticky saliva.@
>The simple touch of her wet tongue is enough to make me push my waist up towards her mouth.\
if %con_hvoice=0 dwave 0,"voice\alice7_06.ogg"
name "Alice"
>Hehe... Your penis really is delicious.
>I wanted to lick it like this for so long...\
if %con_hvoice=0 dwave 0,"voice\alice7_07.ogg"
>I'm going to lick it all over for a long time, so prepare yourself...\
name ""
dwavestop 0
csp 699
lsp 700,":a;chara\alice_h07_1r.bmp",0,0:print 10,500
>Alice's long tongue slowly wraps around my penis.@
>Just like a snake coiling around its prey, it spirals round and round.\
>...Not like prey, my penis really is her tongue's prey.@
>And Alice has captured it...\
name "Luka"
>S...Stop this...@
>Ilias' prohibition... Sexual relations with monsters is...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice7_08.ogg"
name "Alice"
>For someone who preaches coexistence with monsters, why is sexual relations with a monster taboo?
>If you really follow your beliefs, shouldn't you be trying to be doing this?\
name ""
dwavestop 0
>As Alice speaks, her tongue coiled around my penis vibrates with every syllable.@
>The small movements quickly rub me up and down as her tongue coils even tighter.\
>The unintentional added stimulation makes me writhe under her as she chides me.\
name "Luka"
>Ahh... Stop talking...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice7_09.ogg"
name "Alice"
>Even though I'm talking seriously here, why are you looking so delighted?
>You're a miserable guy, Luka.\
name ""
dwavestop 0
name "Luka"
>Ahhh!\
name ""
>Alice continues to talk, making her coiling tongue continue to vibrate.@
>She has to just be playing with me now...\
if %con_hvoice=0 dwave 0,"voice\alice7_10.ogg"
name "Alice"
>What's wrong...? Even though all I'm doing is talking, are you feeling it?
>I haven't even used any tongue skills yet. Hahahaha.\
name ""
dwavestop 0
name "Luka"
>Ahhh...!\
name ""
>The irregular movements of her tongue tease me with pleasure as her words themselves tease me in other ways.\
>I start to feel some pre-come start to leak out of the tip of my penis.\
if %con_hvoice=0 dwave 0,"voice\alice7_11.ogg"
name "Alice"
>Hehe, a drop is already coming out.
>I'll get a good taste of that leaking drop of yours...\
name ""
dwavestop 0
>Alice slowly opens her mouth.@
>And starts to suck my penis inside her mouth!\
name "Luka"
>Ahhh!\
name ""
>Her lips, usually pouting or frowning, gently close around the tip of my penis.\
>Her wet tongue slowly licks my penis as she holds me in her mouth, causing me to relax as the pleasure fills me.\
name "Luka"
>Haa... Ahh...\
name ""
gosub *syasei1
lsp 700,":a;chara\alice_h07_2r.bmp",0,0
gosub *syasei2
>Almost like an accidental ejaculation, I explode inside her mouth only moments after being sucked in.\
if %con_hvoice=0 dwave 0,"voice\alice7_12.ogg"
name "Alice"
>Nnnmmgg!
>*Gulp* *Gulp*\
name ""
dwavestop 0
>Alice's eyes open in surprise at the sudden ejaculation, but she quickly starts to swallow my semen.\
>Coming in her mouth and watching her drink it... The pleasure is so much, it feels like my lower body is going to break.\
name "Luka"
>Haaa...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice7_13.ogg"
name "Alice"
>Nnn... *Gulp* ...Whew...\
if %con_hvoice=0 dwave 0,"voice\alice7_14.ogg"
>What a helpless guy, leaking so suddenly like that.
>But your semen was incredibly delicious.\
name ""
dwavestop 0
>With her long tongue still coiled around my penis inside her mouth, a seductive smile spreads across her face.@
>Even after that, my thing is still in her hold...\
if %con_hvoice=0 dwave 0,"voice\alice7_15.ogg"
name "Alice"
>...You finished even though I still haven't used either my mouth or tongue skills yet.
>Coming just from the tip being in my mouth... How embarrassing.\
name ""
dwavestop 0
name "Luka"
>Ahh... Don't talk like that...\
name ""
>Her talking is even more unbearable now.@
>Along with the vibrations on her tongue, her soft lips around the tip of my penis slightly shift with every word.\
>Just being held in her mouth like this is enough to make it feel like my lower body is melting in pleasure.\
if %con_hvoice=0 dwave 0,"voice\alice7_16.ogg"
name "Alice"
>I guess I'll use a little of my tongue skills...
>When you can't take it any longer, just do another unsightly orgasm.\
if %con_hvoice=0 dwave 0,"voice\alice7_17.ogg"
lsp 700,":a;chara\alice_h07_3r.bmp",0,0:print 10,500
>Nnnn... *Lick* *Suck*\
name ""
mov %hseanvoice,6:hseanvoice
>Her tongue, coiled around my penis, starts to move again.@
>Like a snake trying to strangle its prey, Alice's tongue slowly gets tighter around me.\
>Alice's wet tongue creeps around my penis as it tightens, sometimes moving up and down, and at other times using the tip to lick exposed areas.\
>As if my penis was just a toy for her tongue to play with, I squirm under her assault.\
name "Luka"
>Ah!@>Ahh!\
name ""
if %con_hvoice=0 dwavestop 13:dwave 0,"voice\alice7_18.ogg"
name "Alice"
>Nnn... *Lick* *Suck*\
name ""
mov %hseanvoice,6:hseanvoice
>Alice's tongue is completely coiled around the base of my penis to just under the tip.@
>The tip itself is inside her warm mouth, free from the more intense stimulation of her tongue.\
>The combination of her intense tongue movements below and the soft, gentle sucking from her lips is too much to take.\
name "Luka"
>Haa... Ahhh...\
name ""
if %con_hvoice=0 dwavestop 13:dwave 0,"voice\alice7_19.ogg"
name "Alice"
>Nnn... *Suck* ...Already in a trance?
>Then shall I finish you off soon?\
if %con_hvoice=0 dwave 0,"voice\alice7_20.ogg"
>*Suck* *Lick*\
name ""
mov %hseanvoice,6:hseanvoice
>Her long tongue starts to move up and down my shaft, still tightly coiled around me.\
>Alice's movements get even faster, clearly trying to make me come quickly.\
>As she looks at me with a seductive look in her eyes, her soft lips start to powerfully suck on my tip.\
>As Alice's pacifier like sucking gets even more intense, my thoughts start to blank from the pleasure.\
name "Luka"
>Ahh...\
name ""
>I start to thrust forward, seeking more of her mouth...@
>Right after that, I surrender to her mouth.\
gosub *syasei1
lsp 700,":a;chara\alice_h07_4r.bmp",0,0
gosub *syasei2
if %con_hvoice=0 dwavestop 13:dwave 0,"voice\alice7_21.ogg"
name "Alice"
>Nnn... *Suck* *Suck *Gulp*\
name ""
dwavestop 0
>Alice sucks on me as I come, drinking up every drop as I shoot it into her mouth.@
>Exhausted after the orgasm, I let me body relax.\
>Alice is drinking my semen...@
>This taboo act feels surprisingly good...\
if %con_hvoice=0 dwave 0,"voice\alice7_22.ogg"
name "Alice"
>Hehe, my tongue skills were the best, weren't they?\
if %con_hvoice=0 dwave 0,"voice\alice7_23.ogg"
>...Then next are the mouth skills.
>I'm going to suck on you like you're candy, so get ready...\
if %con_hvoice=0 dwave 0,"voice\alice7_24.ogg"
>Nnn... *Suck* *Suck*\
name ""
mov %hseanvoice,7:hseanvoice
name "Luka"
>Ahhhh!\
name ""
>Her coiled tongue starts to move up and down, rhythmically pumping me.@
>At the same time, her lips press tighter against my penis as they follow her tongue movements.\
>Her mouth and tongue pump me up and down at the same time, one following the other.\
>It's like her head is a cylinder, sucking out my semen with a piston movement.\
>The gentle friction from her soft lips running up and down my penis in time with her tongue make me moan out with every completed pump.\
if %con_hvoice=0 dwavestop 13:dwave 0,"voice\alice7_25.ogg"
name "Alice"
>Nnnn... *Suck* *Lick*\
name ""
mov %hseanvoice,7:hseanvoice
>Saliva sometimes drips out of her quick mouth, covering my penis with her wet warmth.@
>The slightly sticky saliva increases the friction and warmth as she pumps me, gradually making the stimulation get even more intense.\
name "Luka"
>Haaa... A...Amazing...@
>Ahhh...\
name ""
>With my face locked in a look of ecstasy, it's all I can do to even let out a single word.\
>I can't do anything against her mouth techniques.@
>All I can do at this point is writhe in pleasure and ejaculate.\
if %con_hvoice=0 dwavestop 13:dwave 0,"voice\alice7_26.ogg"
name "Alice"
>Hehe... You're even drooling.. What a pathetic face.
>With my mouth skills, I could make you come in an instant.\
if %con_hvoice=0 dwave 0,"voice\alice7_27.ogg"
>*Suck* *Suck*\
name ""
mov %hseanvoice,7:hseanvoice
>Alice's sucking and movements get even more intense, bringing me to the edge in an instant.\
name "Luka"
>Haaa... I'm going to come again...\
name ""
if %con_hvoice=0 dwavestop 13:dwave 0,"voice\alice7_28.ogg"
name "Alice"
>*Suck* I don't mind... Come inside my mouth.
>*Suck* *Suuuuck*\
name ""
mov %hseanvoice,7:hseanvoice
>As if done playing around, her mouth gets even more intense than ever before, forcing me to an orgasm right away.@
>Relaxing my body, I give in to the desire to release.\
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice_h07_5r.bmp",0,0
gosub *syasei2
>Filled with ecstasy, I explode inside her mouth, filling her warm mouth with semen.\
if %con_hvoice=0 dwavestop 13:dwave 0,"voice\alice7_29.ogg"
name "Alice"
>Nnnn... *Gulp* *Gulp*\
name ""
dwavestop 0
>Alice greedily swallows every drop of semen as I come, eagerly sucking out the last remaining drops from me as I shiver in pleasure.\
if %con_hvoice=0 dwave 0,"voice\alice7_30.ogg"
name "Alice"
>...Whew, perhaps it's time to stop?
>When I use my mouth, you come a lot, and quickly.\
if %con_hvoice=0 dwave 0,"voice\alice7_31.ogg"
>But it was quite some intense pleasure, wasn't it?\
name ""
dwavestop 0
name "Luka"
>Ah...ahh...\
name ""
>With my mouth still half-open, all I can manage in reply is a moan and some drool.@
>Overcome by the pleasure, I can't even think straight at the moment.\
if %con_hvoice=0 dwave 0,"voice\alice7_32.ogg"
name "Alice"
>Hehe... As a man, that's a face you shouldn't show anyone else.
>What a pathetic guy, hahaha.\
name ""
dwavestop 0
>Looking at my silly appearance, Alice laughs with a satisfied look on her face.\
gosub *anten
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_alice7,1
bgmstop
sean_change "bg100"
bgm "bgm\city1.ogg"
>The next morning...\
>We leave the inn and head into the busy streets.@
>Just like the other day, the Ant Girls are busily working.\
name "Luka"
>Those Ant Girls really are hard workers...\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Normally they only obey the Queen Ant's orders.@
>But for the humans to replace her orders with their own, forcing them to work...\
name ""
bgmstop
dwave 1,"se\bom1.ogg"
quake 10,2000
bgm "bgm\kiki2.ogg"
name "Luka"
>Wh...What was that!?\
name ""
>A powerful explosion rocks the streets.@
>Is it Ilias Kreuz again!?\
>....No, that isn't it!\
bgm "bgm\kiki1.ogg"
name "Luka"
>H...Hey!@> The Ant Girls...!\
name ""
lsp 700,":a;chara\mob_seinen1.bmp",-180,0
lsp 701,":a;chara\mob_musume2.bmp",355,0:print 10,500
name "Youth"
>Eh...?@> Hey, what are you doing!?\
name ""
name "Woman"
>Hey, stop it!@>Where are you taking me!?\
name ""
>The Ant Girls who were silently working before are suddenly attacking all of the citizens.@
cspl 700,701:print 10,500
>With their powerful strength, they lift the nearby humans and start to carry them off somewhere.\
>It isn't just the Ant Girls, either.@
>Even the Mud Golem Girls are attacking people.\
>The screams of the people quickly get even louder, as the city descends into chaos.\
name "Luka"
>It can't be... A rebellion?@>The Ant Girls and artificial monsters are fighting back?\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>Sheesh, that's a bad choice of words.@
>It's just the inevitable result that comes about from treating them like slaves.\
name ""
lsp 700,":a;chara\ant_st01.bmp",-160,0
lsp 701,":a;chara\mob_ozisan2.bmp",160,0:print 10,500
name "Ant Girl"
>.............\
name ""
name "Man A"
>S...Stop!@>Let me go!\
name ""
>The Ant Girls grab people and carry them off somewhere, easily holding them above their heads with their overwhelming strength.\
lsp 700,":a;chara\madgolem_st01.bmp",-200,0
lsp 701,":a;chara\mob_seinen1.bmp",160,0:print 10,500
name "Mud Golem Girl"
>ENERGY... REPLENISH.\
name ""
name "Man B"
>Ahhh! Help me!\
name ""
>The Mud Golem Girl forces the struggling man into her mud body.\
lsp 700,":a;chara\mob_seinen1.bmp",-180,0
lsp 701,":a;chara\mob_musume2.bmp",355,0:print 10,500
name "Youth"
>Wh...What's going on!?\
name ""
name "Woman"
>Help me!!\
name ""
cspl 700,701:print 10,500
>The humans scream and run around in a panic, trying to escape from the Ant Girls.@
>The shouts are coming from all over... It must be the same thing throughout the town.\
name "Luka"
>This isn't good, if I don't do something...!\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>...Hmph. They're just reaping what they sowed.@
>This is their reward for treating monsters like slaves.\
name ""
>Alice ignores the screaming citizens around her.@
>I can understand her viewpoint, but still...\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>You shouldn't dawdle around here, either.@
>Don't stick out your neck for them, and just leave the town.\
name ""
name "Luka"
>L...Leave...?\
name ""
>If I leave, the people of this town will be attacked by the rebelling monsters...@
>I can't just abandon people...\
name "Alice"
>Did you forget that the people of this town have been abusing these monsters until now?\
name ""
name "Luka"
>I...I didn't forget...\
name ""
>In this situation, I'll...\
r@k@\
csel "Still help",*sean0210,"Let them reap what they sowed",*sean0208



*sean0208

name "Luka"
>The humans really are the ones at fault here...\
name ""
>As a fellow human, their actions make me uncomfortable.@
>The monster's revolt is clearly just the result of their actions.\
bgm "bgm\hutuu3.ogg"
name "Luka"
>Let's go, Alice.@
>As you said, we can't dawdle here.\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>...I see, that's surprising.@
>I thought that you helped everyone.\
>But I won't say anything if that's what you decided.\
name ""
name "Luka"
>Oi, oi... You were the one who was just telling me to leave them.\
name ""
>I mutter that to myself as we head out of the town.@
>As the Ant Girls attack the castle, we leave through the gate.\
dwave 1,"se\asioto4.ogg"
bgmstop
sean_change "bg041"
bgm "bgm\field3.ogg"
>Time to continue my quest...@
>Where shall I go next...?\
r@k@\
mov %genzaiti,12
mov %gloval1_story_sinkou,8:gosub *savegloval1
goto *map5



*sean0209

gosub *genzaiti_bg
name "Luka"
>I'm still worried about Grangold Castle...\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Hmph. If you want to go back, then go back.@
>You'll probably still make it in time.\
name ""
name "Luka"
>Alright, let's go back to Grangold Castle!\
name ""
>I can't get them out of my head...@
>Concerned about what's happening, I head back to Grangold Castle.\
dwave 1,"se\asioto2.ogg"
sean_change "bg100"
bgm "bgm\kiki1.ogg"
>The town is still in a panic.@
>The Ant Girls are still carrying off citizens to somewhere.\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>But what are you going to do against these numbers?@
>The Ant Girls are going wild all over the town, you know?\
name ""
goto *sean0210a



*sean0210

name "Luka"
>It's true this is only happening because of their actions...@
>But I still can't just abandon them!\
name ""
lsp 700,":a;chara\alice_st12b.bmp",67,0:print 10,500
name "Alice"
>...Well, that's what I thought you would say.\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
>But what are you going to do against these numbers?@
>The Ant Girls are going wild all over the town, you know?\
name ""
goto *sean0210a



*sean0210a

name "Luka"
>I know, I can't just fight them at random.\
name ""
>I'm not that stupid.@> ...Anymore.\
>There are so many going crazy all over the place, taking out 10 or 20 would be meaningless.\
name "Luka"
>You said that the Ant Girls obey the Queen Ant's orders, right?@
>And they thought the humans orders were the Queen's orders?\
name ""
name "Alice"
>Yes.@> But not anymore, it seems.\
name ""
name "Luka"
>If they're rebelling like this, then they must be ignoring the humans orders.@
>That must mean that the Queen Ant is the one controlling them now, right?\
>So if I can stop the Queen Ant, it should stop everything, right?\
name ""
name "Alice"
>...Hmph, you're right.@
>It's undoubtedly the Queen Ant leading this.\
>Even if you can't sense it, the Queen Ant's orders are being sent out via sound waves all over the town.\
>Those waves are not only controlling the Ant Girls, but they're disturbing the thought circuits of the man made monsters.\
name ""
name "Luka"
>I see... So that's why the Mud Golem Girls are going on a rampage, too.\
name ""
>The Queen Ant was supposed to be sealed under the castle...\
>I don't know how the seal was broken...@
>But I have to go there and see what's going on!\
name "Luka"
>Alright, I'm heading to Grangold Castle!\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>Sheesh, predictable "I-help-everyone" Luka.@
>I know I've said it before, but I'm not helping.\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,500
>Saying that, Alice vanishes.@
>It looks like she isn't going to do anything for or against either side, even as the Monster Lord...\
name "Luka"
>Alright, here I go!\
name ""
dwave 1,"se\asioto4.ogg"
>I run down the main street toward Grangold Castle.@
>I race down the street, avoiding all the Ant Girls.\
lsp 700,":a;chara\madgolem_st01.bmp",0,0:print 10,500
>But after turning a corner, I come face to face with a giant body, blocking the way.@
>One of the Mud Golem Girls is blocking me...\
r@k@\
goto *madgolem_start



*sean0211

bgm "bgm\kiki1.ogg"
r@k@\
name "Luka"
>Whew... I have to hurry...\
name ""
>With them going crazy everywhere, I don't have a moment to lose.@
>I run as fast as I can toward the castle.\
dwave 1,"se\asioto4.ogg"
>When I pass in front of the inn Alice and I were staying at...@
>A man made monster rushes out of the entrance!\
r@k@\
goto *artm_start



*sean0212

bgm "bgm\kiki1.ogg"
r@k@\
name "Luka"
>This isn't good... I have to hurry!\
name ""
>I bet the artificial monsters are running wild everywhere...@
>This place is going to be destroyed if I don't hurry up!\
dwave 1,"se\asioto4.ogg"
>I start running toward the castle again.\
sean_change "bg100"
name "Luka"
>...Are the Ant Girls going to the castle too?\
name ""
>I notice something odd as I run toward the castle.@
>It seems like the people being carried off by the Ant Girls are all being taken to the castle, too...\
name "Luka"
>Are they gathering all the citizens in the castle?\
name ""
>The Ant Queen is being held in the basement...@
>They must be bringing everyone in front of the Queen.\
>I don't know what they're planning on doing, but I have to hurry!\
name "Luka"
>Alright, almost there...!\
name ""
>Finally reaching the end of the main street, I reach the castle.\
dwave 1,"se\asioto4.ogg"
sean_change "bg101"
>I dash through the gate and make it into the castle.@
lsp 700,":a;chara\mob_seinen2.bmp",-250,0
lsp 701,":a;chara\mob_ozisan2.bmp",0,0
lsp 702,":a;chara\mob_seinen1.bmp",250,0:print 10,500
>Inside the lobby, I see a lot of men crouching and shaking with fear.\
cspl 701,702
lsp 700,":a;chara\grangold_st06.bmp",0,0:print 10,500
>The Grangold King seems to be in there, too...\
lsp 700,":a;chara\ant_st11.bmp",0,0:print 10,500
name "Ant Girl A"
>MANY PRISONERS COLLECTED.\
name ""
name "Ant Girl B"
>ONE WITH HIGH QUALITY GENES WILL BE THE QUEEN'S REPRODUCTIVE PARTNER.@
>OTHERS WILL BE SLAVES.\
name ""
name "Luka"
>So that's what they're doing...\
name ""
>Most of the Ant Girls are outside the castle, so only a few are in here guarding them...@
>With just a few of them, I should be able to beat them quickly...\
csp 700:print 10,500
name "Luka"
>Leave this to me!@>Everyone else, escape!\
name ""
>I dash out from cover while yelling to the captives.\
lsp 700,":a;chara\mob_seinen2.bmp",-250,0
lsp 701,":a;chara\mob_ozisan2.bmp",0,0
lsp 702,":a;chara\mob_seinen1.bmp",250,0:print 10,500
name "Youth"
>Eh...?@> E...Escape?\
name ""
name "Old Man"
>B...But I'm too scared...\
name ""
>But they're all too scared and confused to react.@
>If I want to get them out of here, I'll have to lead them...\
cspl 701,702
lsp 700,":a;chara\grangold_st05.bmp",0,0:print 10,500
name "Grangold King"
>...Everybody, leave this to the Hero!@
>Now, follow me!\
name ""
dwave 1,"se\asioto4.ogg"
csp 700:print 10,500
>The King jumps up with a yell, flashing his mantle to attract the attention of all the men.\
>Repeating his cry of "Follow me", he runs out of the exit I had indicated before.@
dwave 1,"se\asioto4.ogg"
wait 100
>After a few moments, all of the men quickly run after their King through the exit.\
lsp 700,":a;chara\ant_st11.bmp",0,0:print 10,500
name "Ant Girl"
>WAIT! STOP THEM!\
name ""
>One of the Ant Girls jumps out, trying to block the escaping men.@
>I pull out my sword and dash in front of her, protecting the escaping citizens.\
r@k@\
goto *ant_start



*sean0213

bgm "bgm\kiki2.ogg"
r@k@\
name "Luka"
>............\
name ""
>I should deal with the Queen Ant first.@
>The Ant Girls should stop if I can defeat the Queen.\
name "Luka"
>I heard she was under the castle... But how do I get there?\
name ""
>It would take forever to find the entrance to a dungeon in this huge castle.@
>Is there someone around I can ask...?\
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...This way, Luka.@
>The Queen Ant's magical power is leaking out from here.\
name ""
name "Luka"
>...A...Alice?\
name ""
>Alice suddenly appears and leads me to some hidden steps downward.\
dwave 1,"se\asioto4.ogg"
sean_change "bg162"
name "Luka"
>But Alice, why are you doing this...?@
>I thought you weren't going to help me?\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>That's true... But I'm involved in it this time too.@
>How did the humans manage to seal the Queen Ant...? I need to find out.\
name ""
>Alice has a gloomy expression as we go down the stairs.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>In addition, how did they create that Golem Girl...?@
>How did humans create something of that power?\
>As the Monster Lord, I must look into this.\
name ""
>As Alice mutters that to herself...\
bgm "bgm\comi1.ogg"
csp 699
lsp 700,":a;chara\sylph_st21r.bmp",341,190
lsp 701,":a;chara\gnome_st31r.bmp",533,145
lsp 702,":a;chara\undine_st23.bmp",0,180:print 10,500
>Inside my heart, three strange figures take shape.\
lsp 701,":a;chara\gnome_st32r.bmp",534,145:print 10,500
name "Sylph"
>Chi Pa Pa!@> Chi Pa Pa!@
>My brain is going Chi Pa Pa!\
name ""
name "Luka"
>What's wrong, Sylph...?@
>Why are you acting all funny?\
name ""
name "Alice"
>Really?@>I thought she was always a bit strange in the head.\
name ""
name "Sylph"
>Chi Pa Pa!@> Chi Pa Pa!@
>Birds go Cheep Cheep!@>Chi Pa Pa!\
name ""
name "Undine"
>...It's a strong barrier's doing.@
>Her already empty head has devolved into an even more pitiful state.\
name ""
name "Luka"
>Is there really that strong of a barrier here?\
name ""
name "Sylph"
>Chi Pa Pa!@> Chi Pa Pa!@
>Fishies go Glub Glub!@>Chi Pa Pa!\
name ""
lsp 700,":a;chara\sylph_st22r.bmp",331,186
lsp 701,":a;chara\gnome_st33r.bmp",439,145:print 10,200
dwave 1,"se\dageki.ogg"
wait 100
lsp 700,":a;chara\sylph_st21r.bmp",341,190
lsp 701,":a;chara\gnome_st32r.bmp",534,145:print 10,500
name "Sylph"
>Chi Pa Pa!@> Chi Pa Pa!@
>My eyes are spinning round and round!@>Chi Pa Pa!\
name ""
dwave 1,"se\dageki.ogg"
lsp 698,":a;chara\sylph_st21r.bmp",341,190
lsp 699,":a;chara\gnome_st32r.bmp",534,145
lsp 700,":a;chara\sylph_st22r.bmp",331,186
lsp 701,":a;chara\gnome_st33r.bmp",439,145
vsp 698,0
vsp 699,0
if %effectspeed=2 skip 8
for %move=0 to 80 step 1
dwave 1,"se\dageki.ogg"
vsp 698,1:vsp 699,1:vsp 700,0:vsp 701,0:print 1
wait 3
vsp 698,0:vsp 699,0:vsp 700,1:vsp 701,1:print 1
wait 3
next
lsp 701,":a;chara\gnome_st32r.bmp",534,145:print 1
wait 500
dwave 1,"se\fall2.ogg"
for %move=0 to 320 step 10
amsp 700,331,186+%move
print 1:wait 10
next
cspl 698,700:print 1
name "Luka"
>Oi, oi...\
name ""
cspl 700,702:print 10,500
bgm "bgm\kiki2.ogg"
>Anyway, it seems like a strong barrier has put Sylph into a pitiful state.\
>I continue to descend the stairs with Alice, cautious and on the lookout for anything strange.\
dwave 1,"se\asioto3.ogg"
sean_change "bg102"
name "Luka"
>Wh...What is this!?\
name ""
>The basement of Grangold Castle is like a completely different world.\
>Strange machines are flickering and whirring all around the walls, as strange letters and numbers are flashing on a pedestal in the middle of the room.\
>I've never seen something so bizarre in my life before...\
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st51b.bmp",67,0:print 10,500
name "Alice"
>Human technology has advanced this far!?\
name ""
>Even Alice doesn't seem to be able to contain her surprise.@
>To think fellow humans were able to create something like this...\
csp 699
lsp 700,":a;chara\mob_madou.bmp",0,0:print 10,500
name "Magic Engineer"
>W...What's going on!?@
>Why isn't the control working!?\
name ""
>Some strange magician woman is desperately fiddling with some controls at one of the machines.@
dwave 1,"se\asioto4.ogg"
>I rush up to her and start spouting off my questions.\
name "Luka"
>What are these machines?@
>No... What's happening!?\
name ""
name "Magic Engineer"
>I...I don't know!@
>The seal method was broken, and we can't control it any longer!\
>Her thoughts and magic power have already leaked out of the facility... At this rate the Queen herself will be freed...!\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-120,0
lsp 701,":a;chara\mob_madou.bmp",160,0:print 10,500
name "Alice"
>Hey, you. I want to hear more about that.@
>Did you all really develop this equipment here?\
name ""
name "Magic Engineer"
>What?@>That doesn't matter now!\
name ""
lsp 700,":a;chara\alice_st13b.bmp",-120,0:print 10,500
name "Alice"
>Answer!@>Where did these machines come from!?\
name ""
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
>Alice's eyes flash with a mysterious light.@
>The woman goes rigid as Alice's magical power takes control of her.\
name "Magic Engineer"
>...We did not develop the technology here.@
>We were given the technology for free...\
name ""
name "Alice"
>Given it for free?@
>From who...?\
name ""
name "Magic Engineer"
>That...@>I don't know.\
name ""
name "Alice"
>Don't lie!@> Some stranger gave all of this to you for free!?@
>No... She can't lie as she is now...\
>Explain it. Now.\
name ""
name "Magic Engineer"
>It was five years ago...\
name ""
csp -1:textoff
bg "bg\bg161.bmp",99,3000,"system\lngtwave.dll/vwi"
gosub *setwindow_01p
lsp 700,":a;chara\mob_madou.bmp",0,0:print 10,500
name "Magic Engineer"
>Another failure...@
>The new life form could only survive in the flask for a few minutes...\
>How can we make it last longer...?\
name ""
lsp 700,":a;chara\mob_madou.bmp",-160,0
lsp 701,":a;chara\stein_st01r.bmp",160,0:print 10,500
name "???"
>It looks like you're having quite the difficult time in creating a homunculus.\
name ""
name "Magic Engineer"
>...Who are you?@>This place should be closed to the public...\
name ""
name "???"
>The reason why their life is so short is because their raw magical energy concentration is too low.@
>With your facilities as they are now, trying to condense the raw energy will be too difficult for you.\
name ""
name "Magic Engineer"
>It's true we're unable to condense the energy as needed...@
>But these facilities are the most advanced in the world.\
name ""
name "???"
>Then allow me to deliver some even more advanced facilities.@
>First, how about a tiny little energy compression device...\
name ""
name "Magic Engineer"
>What are you talking about?@>Are you some kind of witch merchant?@
>Rather, just who the hell are you?\
name ""
lsp 701,":a;chara\stein_st02.bmp",160,0:print 10,500
name "???"
>My name is Promestein.@
>Originally, I gave humans fire...\
name ""
csp -1:textoff
lsp 700,":a;chara\alice_st11b.bmp",-120,0
lsp 701,":a;chara\mob_madou.bmp",160,0
bg "bg\bg102.bmp",99,3000,"system\lngtwave.dll/vwi"
gosub *setwindow_01p
name "Alice"
>Who?@> Some woman called Promestein?\
name ""
if %ivent05=0 && %check01=0 skip 9
name "Luka"
>.............\
name ""
>I remember someone like that...@
if %ivent05=1 && %check01=0 mov $sel1,"She's like that strange woman at the haunted house..."
if %ivent05=0 && %check01=1 mov $sel1,"She's like that strange woman outside of Lily's mansion..."
if %ivent05=1 && %check01=1 mov $sel1,"She's like that strange woman I saw at the haunted house and outside Lily's mansion..."
eng $sel1:$sel6\
name "Magic Engineer"
>At first I thought she was just some strange peddling witch...@
>But I finally tried the device to concentrate energy... And it was incredible.\
>It seemed to contradict everything we knew about the way the world works.@
>I kept using it... Even though I didn't know how it worked.\
>After that, Promestein kept coming with more devices...@
>A special magnetic field system, a space altering energy transference device...\
>Because of that, Grangold leaped hundreds of years ahead of everyone else in Magic Science in a short while.@
>We brought the magnificent results to the King...\
>...But in fact, there's nothing here that is the result of our own research.@
>All of the technology here was given to us, and we use it without understanding how it works...\
name ""
name "Alice"
>What does it mean...?@
>Who is this Promestein person?\
name ""
name "Magic Engineer"
>All we know is that she just freely gives us technology.@
>So we decided not to inquire about anything...\
name ""
name "Alice"
>But why was she giving it all to you for free?@
>Didn't you wonder what her purpose was?\
name ""
name "Magic Engineer"
>She claimed to just want to test it.@
>We were told to seal the Queen Ant and deliver data on it.\
>She wanted to test sealing powerful monsters...@
>So that she could eventually seal the Monster Lord.\
name ""
lsp 700,":a;chara\alice_st61b.bmp",-120,0:print 10,500
name "Alice"
>What!?\
name ""
name "Magic Engineer"
>...Eh?@> Why am I telling a story while everything is going crazy!?\
>Ahh! The main system is uncontrollable!@
>The seal is broken... There's nothing that can be done now!\
name ""
dwave 1,"se\escape.ogg"
csp 701
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
>Released from Alice's hold, the woman runs away in a panic.@
>As we watch her running away, a strange pressure fills the surrounding air.\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Luka"
>This presence... Is the Queen Ant, isn't it?@
>It seems like the seal really was released...\
name ""
name "Alice"
>What, you're just realizing that now?@
>Anyway, that woman's story...\
name ""
name "Luka"
>There's a lot that bothered me about that too, but right now the crisis at hand is more important!\
name ""
>I take out my sword and prepare for an enemy.@
>I glance back and forth, waiting to see her appear...\
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>...That's right.@
>I can't leave this insurrection alone as the Monster Lord.\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
>...You'll need to excuse me.@
>I'll let you deal with this location.\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,500
>Saying that, Alice leaves.@
>Even though she said she can't leave it alone, she's not going to help me as usual?\
name "Luka"
>This isn't the time to be doing stuff like that...\
name ""
>The hostile presence slowly gets closer and closer to me.@
>I nervously gulp and grip my sword tighter.\
>Finally, the owner of the hostile presence appears from the corner of the room!\
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\queenant_st01.bmp",0,0:print 10,500
name "Queen Ant"
>I am the Queen of the limitless ant army...@
>Human, who are you to stand in my path?\
name ""
name "Luka"
>...I'm just a fake Hero.@
>Are you the one leading this uprising?\
name ""
name "Queen Ant"
>...Yes, that is so.@
>During the long time I have been sealed, my thoughts got ever stronger... Until they were finally able to reach the outside world.\
>I directed my children to fight against the humans.@
>Now that I have finally escaped, there is nothing to stop my family.\
name ""
name "Luka"
>Grangold is in a huge panic...@
>Honestly, I think you have reason to be upset...\
name ""
>If my children were used as slaves like that, I would be angry too... But...\
name "Luka"
>But... I want you to stop this.@
>Is there any way you can forgive the humans in this town?\
name ""
lsp 700,":a;chara\queenant_st03.bmp",0,0:print 10,500
name "Queen Ant"
>...No.\
>Sealing me with their machinery, and enslaving my children...@
>Surely you understand my anger?\
>The sorrow that the humans forced on my lovely children will be returned to them!\
name ""
name "Luka"
>.............\
name ""
>I can't say I really understand the depths of her anger...@
>Only someone who went through what she did would be able to say that.\
>But still...\
name "Luka"
>...Please, I'm begging you... Don't go after revenge.@
>The humans of this town were horrible, but...\
name ""
lsp 700,":a;chara\queenant_st01.bmp",0,0:print 10,500
name "Queen Ant"
>Hmph.@>This town already belongs to my children and I.@
>Now the humans shall be our slaves.\
>All of the young men shall be slaves of my girls.@
>All of the finest men shall be my own personal slaves... Like you.\
name ""
name "Luka"
>...Do we have to fight...?\
name ""
>I hoped it wouldn't come to this, but her anger is too deep...@
>Words won't be able to solve this...\
r@k@\
goto *queenant_start



*sean0213a

bgm "bgm\kiki2.ogg"
r@k@\
name "Luka"
>.............\
name ""
>I bring the tip of my sword to the Queen Ant's neck.@
>And put the tip right under her chin.\
name "Luka"
>...Please, stop this already.@
>If you don't, I'll have to seal you again...\
name ""
name "Queen Ant"
>...I don't intend to beg for my life, nor do I intend to stop my revenge.@
>I will not stop until I rule over this town and enslave all the humans.\
name ""
name "Luka"
>..................\
name ""
>There's no other choice...@
>I'm not going to kill her, so I'll have to seal her for a while.\
>As I'm just about to swing my sword a final time...\
bgm "bgm\hutuu2.ogg"
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>Wait!\
name ""
>Alice jumps into the room.@
lsp 699,":a;chara\alice_st91b.bmp",-110,0
lsp 700,":a;chara\alice_st03b.bmp",-110,0
lsp 701,":a;chara\grangold_st03.bmp",160,0:print 10,500
>In addition, she's carrying the Grangold King by his neck!\
cspl 699,701
lsp 700,":a;chara\queenant_st03.bmp",0,0:print 10,500
name "Queen Ant"
>...Who are you?@
>What business does a powerful monster like you have here?\
name ""
>The Queen Ant studies Alice for a moment...@
>Suddenly, her eyes open in surprise.\
name "Queen Ant"
>It can't be... Are you...!?\
name ""
lsp 699,":a;chara\alice_st91b.bmp",-110,0
lsp 700,":a;chara\alice_st04b.bmp",-110,0
lsp 701,":a;chara\grangold_st03.bmp",160,0:print 10,500
name "Alice"
>It's just as you think.@
>However right now, my identity does not matter.\
name ""
dwave 1,"se\down.ogg"
>Alice drops the Grangold King onto the floor as she talks.\
lsp 700,":a;chara\alice_st01b.bmp",-110,0:print 10,500
name "Alice"
>This man wants to say something.@
>You should listen too, Queen Ant.\
name ""
cspl 699,701
lsp 700,":a;chara\queenant_st01.bmp",0,0:print 10,500
name "Queen Ant"
>Very well...@> Since it's an order from you.\
name ""
lsp 700,":a;chara\queenant_st03.bmp",-210,0
lsp 701,":a;chara\grangold_st03.bmp",160,0:print 10,500
>The Queen Ant nods respectfully at Alice, then turns in anger toward the Grangold King.\
name "Queen Ant"
>...What do you want to say!?@
>What does the one who was in charge of oppressing me and my children wish to say!?\
name ""
name "Grangold King"
>...That's right, I was the one in charge.@
>I'll become your slave.\
name ""
>The Grangold King timidly rises to his feet as he talks to the Queen Ant.@
>His response just enrages the Queen Ant.\
name "Queen Ant"
>...Is this a jest?@
>You are a leader like me, are you not!?@>Do you have no pride at all!?\
name ""
name "Grangold King"
>I'm not making a joke, I mean it.@
>In trade... Will you please forgive the rest of the citizens?\
name ""
name "Queen Ant"
>...I see, so you are trying to bargain.@
>Did you think I would simply nod my head and agree?\
>Do you understand how much suffering you humans caused my children and I!?\
name ""
name "Grangold King"
>I know...@>I know now, but I didn't before...@
>To ask forgiveness now is selfish, I know...\
name ""
name "Queen Ant"
>Then why!?\
name ""
name "Grangold King"
>...We didn't notice.@
>We thought your Ant Girls were like unfeeling machines...\
>We never considered them actual beings... Just dolls with hands and feet to work.\
>As for the Queen...@>We thought you were an evil existence outside human understanding.\
name ""
name "Queen Ant"
>No!@>We're...!\
name ""
name "Grangold King"
>...That's what we all thought until this happened.\
>You have feelings just like us... The days they went through until now were full of pain and suffering.\
>And for you to be kept imprisoned and sealed as your children suffered...@
>We... We didn't realize that monsters had the exact same thoughts and feelings as us humans...\
name ""
>The King sadly looks at the ground as he speaks.@
>As he goes quiet, Alice starts talking.\
lsp 699,":a;chara\alice_st91b.bmp",-120,0
lsp 700,":a;chara\alice_st01b.bmp",-120,0
lsp 701,":a;chara\queenant_st03.bmp",130,0
print 10,500
name "Alice"
>Queen Ant, don't you think the same way?\
>These tiny, weak humans are undeserving of any notice, are they not?@
>Their lives are meaningless when compared to your powerful existence, right?\
>But the feelings these humans hold are the same as us monsters.@
>They feel sadness, pain, and happiness just as we do.\
>Just because they are weaker than you does not mean that they cannot feel the same things you do.\
name ""
name "Queen Ant"
>.............\
name ""
name "Alice"
>...If you do the same thing as the humans did, then this entire situation will repeat.@
>Only this time you will be the one treating the enslaved humans as unfeeling dolls.\
>You will be the same as the oppressor you feel so much hate towards right now.\
name ""
>After saying that, Alice's gaze turns toward me.\
lsp 700,":a;chara\alice_st04b.bmp",-120,0:print 10,500
name "Alice"
>...Now then, I'm tired.@
>You take over talking, Luka.\
>This is where your little dream world building comes into play, right?\
name ""
name "Luka"
>...Eh? M...Me?\
name ""
>A speech? I... I'm not ready for a speech or anything...@
>I open my mouth and close it as I try to think of something.\
name "Luka"
>Humans and monsters don't really understand each other at the moment...@
>I think...\
>But deep down we're all the same...@
>If we, uh, try to talk to each other and understand our differences, we'll be able to get along...\
>As we grow to know each other more...@>We'll, err... Solve our issues.\
name ""
lsp 700,":a;chara\alice_st01b.bmp",-120,0:print 10,500
name "Alice"
>...It's just as the idiot said.\
>You don't understand humans either, Queen Ant.@
>This retaliation won't solve anything.\
name ""
>I breathe a sigh of relief as Alice takes over the speech again.\
lsp 700,":a;chara\alice_st04b.bmp",-120,0:print 10,500
name "Alice"
>...Won't you stop this now?@
>For your own sake, this should end now.\
name ""
name "Queen Ant"
>If it's an order from you, I have no choice but to reconcile with them...\
name ""
lsp 700,":a;chara\alice_st03b.bmp",-120,0:print 10,500
name "Alice"
>I'm not giving you any stupid orders like that.@
>If you can't bring yourself to reconcile with them, then this evil will continue.\
name ""
name "Queen Ant"
>.............\
name ""
lsp 700,":a;chara\queenant_st03.bmp",-210,0
lsp 701,":a;chara\grangold_st03.bmp",160,0:print 10,500
>After falling silent for a while, the Queen Ant slowly turns toward the Grangold King.\
name "Queen Ant"
>...Do you regret from the bottom of your heart the labor forced on my children?\
name ""
name "Grangold King"
>...Yes, I apologize from the bottom of my heart.@
>If you desire, I shall have all of the citizens apologize too.\
>Surely they all realize the grievous error we have made until now.\
name ""
name "Queen Ant"
>From here on and forever after, do you vow never to do anything similar?\
name ""
name "Grangold King"
>...Of course.@
>We now know that you have the same heart as us humans.\
>It wouldn't be possible to force labor on anyone like that.\
name ""
lsp 700,":a;chara\queenant_st01.bmp",-210,0:print 10,500
name "Queen Ant"
>Very well...@> Then let's assume it has ended.\
>Perhaps our rebellion has crossed a line, too.\
name ""
name "Luka"
>Then...?\
name ""
name "Queen Ant"
>I shall release all of the captured humans.@
>King, I believe in your words...\
name ""
>Thus it was safely ended.\
>The Queen Ant and the Grangold King shake hands as they promise to end everything.\
bgmstop
sean_change "bg105"
bgm "bgm\epilogue.ogg"
lsp 700,":a;chara\grangold_st04.bmp",0,0:print 10,500
name "Grangold King"
>Really, thank you for everything you've done.
>Words alone are unable to describe how indebted to you we are.\
name ""
>Since the castle is all torn to pieces, we're in an assembly hall in the town.@
>In addition to the humans, the Queen Ant and Ant Girls are all helping to repair the town.\
lsp 700,":a;chara\grangold_st04.bmp",-160,0
lsp 701,":a;chara\queenant_st01.bmp",160,0:print 10,500
name "Queen Ant"
>I too was about to commit a grave error.\
>The humans I was going to oppress all have fathers and mothers who would have grieved for them as I grieved for my children.\
>Just as I have a bond with my children, so do the humans have bonds with theirs.\
>I did not realize it... I viewed all humans as evil and unable to feel emotions as I did.\
name ""
>Not angry any longer, the Queen Ant has a gentle expression on her face.@
>Just as Alice said, it looks like she really is a kind monster...\
name "Queen Ant"
>This town that we destroyed, we shall help rebuild.\
>After that...@>Well, that will be saved for later.@
>My children do not seem to dislike living in this town.\
>If the humans permit it, we may stay in this town.\
name ""
name "Grangold King"
>The belief through the world is that humans and monsters live here in perfect coexistence...@
>...But that wasn't true.\
>I intend to make that falsehood a reality, and let human and monster here live in harmony.\
name ""
name "Queen Ant"
>I wish for the same.@
>Searching for a solution together with the humans may not be a bad idea.\
name ""
>Thus, the situation in the town settles peacefully.@
>As a result, the lie seems like it could become the truth.\
>But how will the monsters and humans get along with each other now...?@
>I suppose that depends on both of them...\
csp 701
lsp 700,":a;chara\grangold_st04.bmp",0,0:print 10,500
name "Grangold King"
>Luka, you set out to make a world where humans and monsters can coexist, right?@
>Those thoughts of yours are what has saved this town.\
name ""
name "Luka"
>Ah, no, I think what you did was more important.@
>Acknowledging your mistakes, apologizing, and setting things right...\
name ""
>I don't think a normal human would have been so quick to realize their wrongs.@
>Especially as a King, to be able to do that is unusual...\
name "Grangold King"
>Speaking of that, it was your friend that brought me to my senses...\
name ""
csp -1:textoff
bg "bg\bg100.bmp",99,3000,"system\lngtwave.dll/vwi"
gosub *setwindow_01p
lsp 699,":a;chara\alice_st91b.bmp",-110,0
lsp 700,":a;chara\alice_st01b.bmp",-110,0
lsp 701,":a;chara\grangold_st06.bmp",160,0:print 10,500
name "Grangold King"
>Wawawa... M...Monster?\
name ""
name "Alice"
>Don't worry, I don't intend you any harm.@
>I'm worried about this insurrection.\
name ""
name "Grangold King"
>Wh...Why is this happening...?@
>We didn't do anything wrong...!\
name ""
lsp 700,":a;chara\alice_st04b.bmp",-110,0:print 10,500
name "Alice"
>...Sheesh, that lack of awareness is your biggest crime.\
lsp 700,":a;chara\alice_st01b.bmp",-110,0:print 10,500
>The future of your country is bleak.@
>You will become simple slaves of the Ant Girls at this rate.\
lsp 700,":a;chara\alice_st02b.bmp",-110,0:print 10,500
>All that awaits you are endless days of backbreaking labor... Haha.\
name ""
name "Grangold King"
>N...No way... This is horrible...\
name ""
lsp 700,":a;chara\alice_st01b.bmp",-110,0:print 10,500
name "Alice"
>...That "horrible" thing is what you've inflicted on the Ant Girls until now.\
name ""
name "Grangold King"
>...Eh?\
name ""
name "Alice"
>Think of what you've been doing to the Ant Girls until now.@
>And what that means for you as the King.\
name ""
lsp 701,":a;chara\grangold_st03.bmp",160,0:print 10,500
name "Grangold King"
>What it means...@> As the King...\
name ""
csp -1:textoff
lsp 700,":a;chara\grangold_st04.bmp",0,0
bg "bg\bg105.bmp",99,3000,"system\lngtwave.dll/vwi"
gosub *setwindow_01p
name "Grangold King"
>...To think we were so foolish as to not even realize what we were doing.@
>Your friend was the one who finally woke me to the truth.\
name ""
name "Luka"
>So that's what happened...\
name ""
>So that's what Alice went off to do while I fought the Queen Ant...\
name "Grangold King"
>That's why I cannot show my thanks enough.@
>I wish to give you some sort of gift, but everything is tied up in the repairs...\
name ""
name "Luka"
>Don't worry about a gift...@>Right, Alice.\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Ah... What?@>N...No... No gift...@
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
>............\
name ""
>Alice has a sad look on her face.@>I wonder if she was expecting a feast in thanks...\
csp 700:print 10,500
name "Luka"
>A...Anyway, we have to be going soon.@
>There's a lot more we have left to do.\
name ""
lsp 700,":a;chara\grangold_st04.bmp",0,0:print 10,500
name "Grangold King"
>I see, that's too bad...@> I wish you safety on your travels!\
name ""
lsp 700,":a;chara\grangold_st04.bmp",-160,0
lsp 701,":a;chara\queenant_st01.bmp",160,0:print 10,500
name "Queen Ant"
>I thank you, human Hero.@
>And...\
name ""
csp 701
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>...I'm a traveling gourmet.\
name ""
lsp 700,":a;chara\grangold_st04.bmp",-160,0
lsp 701,":a;chara\queenant_st01.bmp",160,0:print 10,500
name "Queen Ant"
>...Thank you, Miss Gourmet.@
>I will never forget this favor.\
name ""
name "Luka"
>Then, we're off!\
name ""
>Alice and I leave the assembly hall.\
dwave 1,"se\asioto2.ogg"
sean_change "bg100"
>In the street, the humans, monsters, and artificial monsters are all repairing the road.\
>In only a short while, the town has changed so much...\
name "Luka"
>...This time, I'm sure everything will turn out well.\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Hmm, I wonder...@
>There may be many humans who will be afraid of the Ant Girls after what happened.\
name ""
name "Luka"
>D...Don't say that...\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>But there will be many who will repent as the King has.@
>Which path will most of the citizens take, I wonder?\
name ""
name "Luka"
>After what happened here...@
>...I realize that understanding each other is important.\
>If everyone is able to understand the feelings of those of other races, then I'm sure we'll all be able to live in peace...\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>So... You don't believe anyone understands each other right now?@
>Humans don't understand monsters, and monsters don't understand humans?\
name ""
name "Luka"
>Humans and monsters are different, that's a fact...@
>But just because they have differences, it doesn't mean it's not possible for them to understand each other's feelings.\
name ""
name "Alice"
>So we have to understand our differences as we struggle for coexistence?\
name ""
name "Luka"
>Yes, that's it!@
>So you do get it, Alice!\
name ""
name "Alice"
>I'm just teasing you, you idiot.@
>But I do see where you're coming from.\
>Even I thought humans were barbaric savages that attacked indiscriminately before I set out on this journey.\
name ""
name "Luka"
>Me too...@>Honestly, I still had some prejudice against monsters before I started traveling with you.\
name ""
name "Alice"
>Hmph... It's true spending time together has knocked down those walls.@
>But until it happens everywhere, it won't end.\
name ""
name "Luka"
>I know it's important for everyone to be able to think like that...@
>But there are still a lot of obstacles in the way stopping that understanding from taking place.\
name ""
>Those Four Heavenly Knights are still causing trouble, for one.\
>As long as the humans view them as an object of fear, they won't ever try to understand monsters...\
>So I have to go to the Monster Lord's castle and defeat them.\
name "Luka"
>Besides... Just who was that Promestein person?\
name ""
>The person who gave them the technology to seal the Queen Ant...@
>They said her name was Promestein, right?\
>We still don't know who she is, or why she did that...\
name "Alice"
>I didn't think such technology existed in human society...\
name ""
name "Luka"
>...Is she not a human?@
>Then is she a monster?\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>...I don't know.\
name ""
>Alice goes silent after that.\
csp 700:print 10,500
>The matter between the humans and Ant Girls is settled.@
>But now this Promestein woman...\
>We leave Grangold with another mystery eating at us.@
>Now then, for the next location...\
r@k@\
bgm "bgm\field3.ogg"
mov %ivent11,1
mov %genzaiti,12
mov %gloval1_story_sinkou,8:gosub *savegloval1
goto *map5



*sean0217

gosub *genzaiti_bg
name "Luka"
>Alright, let's go to the Succubus Village!\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...............@>Damn pervert.\
name ""
name "Luka"
>Th...That's not it!@
>I can't just leave a village about to be attacked alone!\
name ""
name "Alice"
>................\
name ""
name "Luka"
>................\
name ""
>I head toward the Succubus Village, as Alice's distrustful gaze pierces me from behind the whole trip.\
dwave 1,"se\asioto2.ogg"
bgmstop
sean_change "bg103"
bgm "bgm\mura3.ogg"
name "Luka"
>This is the Succubus Village?@
>It seems so lifeless...\
name ""
>There are villagers walking around, but they all seem so gloomy.@
>That's right... They must be like this because they're about to be attacked!\
>In addition to the villagers, there are also some soldiers scattered around the village.@
>I bet they're Heroes like me who can't overlook such a crisis!\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>The Purple Sabbath is tonight.@
>Tonight the purple moon will be full...\
name ""
name "Luka"
>I got here in the nick of time...@
>Even a day late, and getting here would have been wasted effort.\
name ""
>Well then, according to the story they should attack at midnight...@
>Shall I wait at the inn until then? Or...@
>Maybe I should talk to the villagers first?\
r@k@\
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
csp -1
mov %hanyo1,0:mov %hanyo2,0
gosub *city23_main
gosub *setwindow_01p
dwave 1,"se\asioto2.ogg"
sean_change "bg108"
name "Luka"
>It looks like the Innkeeper evacuated.\
name ""
>It feels odd to stay here without seeing the owner, but I don't have a choice.@
>I put the money on the front desk and go to a room.\
name "Luka"
>Now I just need to wait for them to attack...\
name ""
>I mutter to myself and lay down on the bed.@
>Before I was aware, it had already gotten dark out.\
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>As usual, I don't care about this.@
>...I'll just give one word of advice.\
>It seems like you're assuming that the Succubi will attack from the outside.@
>But the most troublesome part of the Purple Sabbath is the Succubization of humans.\
name ""
name "Luka"
>Succubization...? You mean the women of the village will turn into Succubi?\
name ""
name "Alice"
>...That's right.@
>When the purple moon is full, women who hold potential will turn into Succubi one after another.\
name ""
name "Luka"
>Then... They aren't going to attack from the outside?\
name ""
name "Alice"
>Everyone seems to imagine an army of Succubi descending on the city or something.\
>But... To welcome their new companions, there are some senior Succubi that concealed themselves in the village beforehand.\
>Following the guidance of those senior Succubi, the newborns go wild.@
>That is the true form of the Purple Sabbath.\
name ""
name "Luka"
>Senior Succubi hid in the village beforehand...?@
>But I didn't see anything suspicious when I was walking around...\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>You never cease to amaze me.\
name ""
name "Luka"
>Oh... Thank you...\
name ""
>Why did she suddenly praise me?\
name "Luka"
>Senior Succubi, eh...\
>No way... Is Alma Elma going to come out too!?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...Hmm, I have no clue.@
>She is the Succubus Queen, but she generally does whatever she wants.\
>I doubt she gives a damn about her own race's prosperity.\
name ""
name "Luka"
>Is that so...\
name ""
name "Alice"
>Anyway, I warned you.@
>Until everything's settled, I'll hide myself.\
name ""
dwave 1,"se\escape.ogg"
cspl 699,700:print 10,500
>With that final message, Alice vanishes.@
>But still... Villagers turning into Succubi?\
>That seems a lot more difficult to handle then an attack from the outside...\
name "Luka"
>I need to prepare myself before midnight.@
>Ahh... That reminds me of when I was a kid, and I tried to stay up late.\
name ""
>How nostalgic...@
>I forget why, but I tried to stay awake...@
>Was I trying to be an adult or something? I forget...\
>But no matter what I tried to do, I wasn't able to stay awake.@
>Haha... I was such a ki...\
>.....................\
bgmstop
gosub *anten
name "Luka"
>Zzzzzzzzzzzzzzz...\
name ""
bg "bg\bg109.bmp",10,3000
name "Luka"
>...Wha!?\
name ""
>Crap! I fell asleep!@
>It's already midnight!\
>I jump out of the bed in a panic, and feel a strange atmosphere around me.\
bgm "bgm\kiki2.ogg"
name "Luka"
>What's with this feeling...?@
>It feels unpleasant...\
name ""
>It's as if the air is really heavy...@
>Did something horrible already happen in the village!?\
name "Luka"
>Oh crap! Did the Succubi already start the attack!?\
name ""
>Did the Purple Sabbath already start?@
>I run out of the inn into the street.\
dwave 1,"se\asioto4.ogg"
sean_change "bg104"
name "Luka"
>What is this...?\
name ""
>It doesn't look like anything has changed...@
>But a sweet smelling fragrance fills the air.\
>This atmosphere is too calm... This is odd...\
name "Luka"
>Hmm... Where are the villagers...?\
name ""
>I slowly walk forward, carefully looking around me.@
>Suddenly, I feel a disorder in the wind near me!\
name "Luka"
>This...@>It's from the bar!\
name ""
>That's where I saw some soldiers earlier...@
>What's happening in there!?\
>I run into the bar...\
r@k@\
dwave 1,"se\asioto4.ogg"
sean_change "bg107"
goto *maccubus_start



*sean0218

bgm "bgm\kiki2.ogg"
r@k@\
name "Luka"
>Did she turn back into a human...?\
name ""
>The prostitute is unconscious on the floor, with her wings and tail gone.@
>The strange atmosphere I felt before is gone, too.\
>Alright, it looks like this sword can seal the magic in the transformation and put them back to normal!\
name "Luka"
>Still... What should I do here...?\
name ""
>All over the bar are half naked men collapsed on the ground.@
>They all seem to still be breathing...@> I'll have to deal with this later.\
>Above all, I need to drive away all the Succubi.@
>They're all passed out and exhausted, I'm sure they'll be left alone...\
name "Luka"
>This strange atmosphere...@
>It seems like there's another Succubus nearby...\
name ""
>A strange sensation is carried to me on the wind.@
>I jump out of the bar, following the feeling.\
dwave 1,"se\asioto4.ogg"
sean_change "bg163"
>I run into a back alley...@
>And see five men collapsed on the ground.\
name "Luka"
>A...Are you alright!?\
name ""
lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
name "Youth"
>Ahh... I... I can't come any more...\
name ""
>A young man, half naked, is muttering to himself in a daze.@
>It looks like the other four are still breathing, too...\
csp 700:print 10,500
name "Luka"
>Th...This is horrible...@> Who could do something like this?\
name ""
>All five of them look shriveled and exhausted.@
>Judging from their state, they must have had a lot of energy stolen from them...\
>One of them even has a tiny sock wrapped around his penis, for some reason.\
name "Luka"
>What happened here...?\
name ""
>It looks like whoever did it was just toying with them all...\
name "Luka"
>It feels like the person who did this is deeper in the back alley...\
name ""
dwave 1,"se\asioto3.ogg"
>I take out my sword and slowly walk deeper into the back alley.\
r@k@\
goto *minccubus_start



*sean0219

bgm "bgm\kiki2.ogg"
r@k@\
name "Luka"
>Even that little girl turned into a Succubus...\
name ""
>I can't waste any time!@
>I run out of the back alley onto the street.\
dwave 1,"se\asioto4.ogg"
sean_change "bg104"
name "Luka"
>The eerie atmosphere is gradually coming back...\
name ""
>It feels like another Succubus is nearby...@
>Just as I thought, another Succubus suddenly jumps out!\
r@k@\
goto *renccubus_start



*sean0220

bgm "bgm\kiki2.ogg"
r@k@\
name "Luka"
>Guh... This village is already full of Succubi!\
name ""
>The strange feeling is coming from every direction at once.@
>There are way too many for me to deal with by myself...\
name "Luka"
>...It's just like Alice said.@
>Higher level Succubi must have infiltrated the village beforehand.\
name ""
>I bet this "Purple Sabbath" would end if I beat them.\
>But her location is the issue...@
>If she was hiding in this village beforehand...\
r@k@\
csel "Ask the Chief",*sean0220b,"The Chief is a succubus!",*sean0220a



*sean0220a

name "Luka"
>That's right, the Chief!\
name ""
>The first time I felt something odd was when I was talking with her.\
>To only have noticed it when it's too late...!\
name "Luka"
>Guh... I have to hurry!\
name ""
>I run to the Chief's house as fast as I can.\
dwave 1,"se\asioto4.ogg"
sean_change "bg106"
name "Luka"
>Where are you!?@>Get out here!\
name ""
lsp 700,":a;chara\succubus_st11.bmp",-160,0
lsp 701,":a;chara\witchs_st21.bmp",160,0:print 10,500
name "Village Chief"
>Hehe, you made it all the way here, did you?@
>I knew you were different from those other soldiers.\
name ""
name "Soothsayer"
>You seem to hold a strange power...@
>I'd love to squeeze out that energy of yours.\
name ""
name "Luka"
>The Soothsayer... Not you too!?\
name ""
dwave 1,"se\escape.ogg"
lsp 700,":a;chara\succubus_st01.bmp",-160,0
lsp 701,":a;chara\witchs_st11.bmp",160,0:print 10,500
>Their wings and tails burst through their clothes, revealing their Succubus forms!\
goto *sean0220c



*sean0220b

name "Luka"
>Alright, I should ask the Chief!\
name ""
>I bet she would have an idea about anyone who may have snuck into the village!\
dwave 1,"se\asioto4.ogg"
sean_change "bg106"
name "Luka"
>Excuse me, Ms. Chief?\
name ""
lsp 700,":a;chara\succubus_st11.bmp",-160,0
lsp 701,":a;chara\witchs_st21.bmp",160,0:print 10,500
name "Village Chief"
>Hehe, you made it all the way here, did you?@
>I knew you were different from those other soldiers.\
name ""
name "Luka"
>Ah, Ms. Chief.\
>Did you notice any strange women in this village?@
>I think some Succubi snuck into the village recently...\
name ""
name "Village Chief"
>...My, my... You haven't noticed yet?\
name ""
name "Luka"
>Eh?@>Noticed what?@
>Oh, and the Soothsayer from before... Why are you here?\
name ""
name "Village Chief"
>Your skills seem so sharp, yet your head appears to be quite dull...\
name ""
dwave 1,"se\escape.ogg"
lsp 700,":a;chara\succubus_st01.bmp",-160,0
lsp 701,":a;chara\witchs_st11.bmp",160,0:print 10,500
>Suddenly, the two of them turn into Succubi!\
name "Luka"
>N...No way!\
name ""
goto *sean0220c



*sean0220c

name "Soothsayer"
>Hehe... We're not humans who have been turned into Succubi.@
>We were both born as Succubi.\
name ""
name "Village Chief"
>Our family has passed down the Chief position in this village from generation to generation.\
>Every 100 years, we spread our seductive power into the village to turn the villagers into Succubi.@
>That's the Purple Sabbath...\
name ""
name "Luka"
>Guh... So that's what's happening!\
name ""
>No Succubi come from the outside at all...\
>From the very start, it was the Chief's doing!@
>Every 100 years, she turns the villagers into more of her own!\
name "Village Chief"
>Witch... Go ahead with the ceremony preparations.@
>I'll deal with this boy.\
name ""
name "Soothsayer"
>Got it, I'll leave this to you.\
>We'll need this boy's semen for the ceremony...@
>So don't squeeze him completely dry.\
name ""
name "Village Chief"
>Hehe... I know.@
>I'll just get a good taste of him.\
name ""
name "Soothsayer"
>Then, I shall see you soon.\
name ""
dwave 1,"se\escape.ogg"
csp 701:print 10,500
>The Soothsayer leaves the room through a door on the other side.\
lsp 700,":a;chara\succubus_st01.bmp",0,0:print 10,500
name "Luka"
>Just what are you planning on doing...?@
>This year's Purple Sabbath is unusual, isn't it!?\
name ""
>I remember the Soothsayer saying earlier today that there was a different purpose this time...@
>Why didn't I notice something so ominous!?\
name "Village Chief"
>Hehe... This year's Purple Sabbath is not just to make more allies...@
>It's a ceremony to bring back the Legendary Succubus Lilith, sealed 500 years ago.\
name ""
name "Luka"
>Legendary Succubus Lilith!?\
name ""
name "Village Chief"
>We Succubi have no permanent home...@
>But Lilith can lead us to the Promised Land!\
>It's the wish of all Succubi to bring Lilith back...@
>When she comes back, we can make all humans into mere livestock for semen cultivation!\
name ""
name "Luka"
>I won't let that happen!\
name ""
>The Legendary Succubus Lilith...@
>I can't let her revive!\
>That Soothsayer must have gone to start the ceremony on the other side of that door...@
>I have to beat her quickly and stop it!\
r@k@\
goto *succubus_start



*sean0221

bgm "bgm\kiki2.ogg"
r@k@\
name "Luka"
>Whew... She was strong...\
name ""
>But I don't have time to be happy about my victory.@
>I have to stop that ritual they were talking about!\
name "Luka"
>Alright, here I go!\
name ""
>I throw open the door the other Succubus went through, and dash into the room.\
dwave 1,"se\door1.ogg"
sean_change "bg110"
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\witchs_st12.bmp",0,0:print 10,500
name "Succubus Witch"
>Ara...?@>How are you here...?\
name ""
name "Luka"
>Give up, I already defeated the village chief!@
>I won't let you revive Lilith!\
name ""
lsp 700,":a;chara\witchs_st11.bmp",0,0:print 10,500
name "Succubus Witch"
>Hehe... But she's already almost revived.@
>Thanks to the village chief, plenty of soldiers came to this village to "assist" us.\
name ""
name "Luka"
>So that's it... You spread the news to attract soldiers to try to protect the town!\
name ""
>With all of those soldiers who came, like me, to protect the town...@
>They would have all the energy they would need!\
name "Succubus Witch"
>All we need is energy from about five more men...@
>It will be a little rough on you, but I'll try to get it all from you.\
name ""
name "Luka"
>I refuse!@>I'll stop you before she revives!\
name ""
>I take out my sword and get in my fighting stance.@
>If I defeat her, I should be able to stop the revival!\
name "Succubus Witch"
>Could it be... You think I'm weak?@
>In terms of magical power... I'm far above the village chief!\
name ""
r@k@\
goto *witchs_start



*sean0222

bgm "bgm\kiki2.ogg"
r@k@\
name "Luka"
>...Did I beat her?@> ...No!\
name ""
>She did something... I never managed to seal her.@
>Right before she was about to be sealed, she used some sort of spell...\
name "Luka"
>Transfer her power to Lilith...@>It can't be!\
name ""
>Before I can act on my realization, a strange atmosphere fills the area.@
>I feel goosebumps all over my skin, as a chill runs down my back.\
name "Luka"
>She must have given all her energy to her...!\
name ""
>Right before she was sealed, she must have given all her energy over to Lilith to finish her revival!\
>She did it... This feeling... She must have revived Lilith!\
name "???"
>Hehe.\
name ""
name "???"
>Teeheehee.\
name ""
>The laughter of two women echoes through the room.@
>Wait... Two?\
>Suddenly a magic square forms on the base of the floor.@
>As if growing out of the floor... The owners of the laughter appear.\
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\lilith_st01.bmp",138,0:print 10,500
>Two women in a seductive embrace materialize.\
name "Luka"
>D...Did she revive!?@
>But why are there two!?\
name ""
name "Lilim"
>Teeheehee... It's been 500 years since we last set foot on this world, hasn't it, sister?\
name ""
name "Lilith"
>That's right, Lilim...@
>This world, so full of energetic young men... It's unbearable!\
name ""
>Lilith... And Lilim...?@
>It seems as though both the legendary Lilith and her sister were revived together!\
r@k@\
goto *lilith_start



*sean0223

bgm "bgm\kiki2.ogg"
r@k@\
name "Luka"
>I...I did it...\
name ""
>After a tough battle, I was able to seal them again...@
>As soon as they vanish, the strange atmosphere goes with them.\
>Through the wind, I sense the heavy air all over the village lifting as well.@
>It looks like defeating the high ranking Succubi and Lilith stopped everything!\
name "Luka"
>Alright, everything's fixed now!@> Oh wait, no!@
>All those people who got sucked by the Succubi!\
name ""
>Those men are unconscious all over the village.@
>They looked like they were really weak, and close to death... If I don't help them quick, they might die!\
name ""
>Now that the Hero's subjugation quest has finished, it's time for the rescue quest!\
>I put away my sword and rush out of the chief's house.\
dwave 1,"se\asioto4.ogg"
sean_change "bg106"
name "Luka"
>First, I should gather everyone together in one place...@
>Then...@>Then what...?\
name ""
>How do you heal someone who has been drained by a Succubus?@
>Should I... Make them a meal, or something?\
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>What are you doing, you idiot?@
>Do you honestly think you can rescue a hundred people by yourself?\
name ""
name "Luka"
>Alice... Help me carry them!@
>It doesn't involve fighting monsters, so you can help me even though you're the Monster Lord, right?\
name ""
name "Alice"
>...That sounds like it's too much effort.@
>But perhaps I should heal those who are near death.\
name ""
name "Luka"
>You can do that...?\
name ""
name "Alice"
>You idiot, I'm the Monster Lord.@
>Sharing some vitality with weaklings like this takes as much effort as batting an eye.\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
>Alice closes her eyes and starts a strange incantation.\
name "Alice"
>I'll share some of my own energy with you weaklings...@
>The radiant life that has faded... Shine again!@
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
>Haa!\
name ""
dwave 1,"se\warm.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
>A bright light fills the village, almost blinding in its radiance!@
>The warm light fills the village for a few moments before fading.\
name "Luka"
>I...Incredible... You can even do something like that...\
name ""
>As the light that radiated from Alice starts to fade...\
cspl 699,700
bg "bg\bg107.bmp",10,500
lsp 700,":a;chara\mob_gorotuki3.bmp",-270,0
lsp 701,":a;chara\mob_seinen2.bmp",0,0
lsp 702,":a;chara\mob_sensi1.bmp",270,0:print 10,500
name "Ruffian"
>Urhg...@>Eh? I thought I was sucked dry?\
name ""
name "Soldier"
>Wh...What happened?@>Is everyone alright?\
name ""
cspl 700,702
bg "bg\bg104.bmp",10,500
lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
name "Youth"
>A...Am I still alive?@
>That soft light... What was that...?\
name ""
lsp 700,":a;chara\mob_seinen1.bmp",-160,0
lsp 701,":a;chara\renccubus_st03.bmp",335,0:print 10,500
name "Lencubus"
>Eh...?@> I... What was I...?\
name ""
cspl 700,701
bg "bg\bg106.bmp",10,500
lsp 700,":a;chara\succubus_st03.bmp",0,0:print 10,500
name "Succubus"
>What's going on...?@
>I was defeated by that Hero... I thought I was sealed...?\
name ""
csp 700
bg "bg\bg110.bmp",10,500
lsp 700,":a;chara\lilith_st03.bmp",138,0:print 10,500
name "Lilim"
>Sister, why have we revived again?\
name ""
name "Lilith"
>How strange, Lilim.@
>That radiant light of life was just like Her Majesty's...\
name ""
csp 700
bg "bg\bg106.bmp",10,1500
name "Luka"
>Oi, oi, oi!@>Wait a second!@
>Why are you unsealing all the Succubi, too!?\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st07b.bmp",67,0:print 10,500
name "Alice"
>...Oops.\
name ""
name "Luka"
>Now everything I went through was for nothing!@
>Do I have to fight against them all again!?\
name ""
csp 699
lsp 700,":a;chara\succubus_st03.bmp",-160,0
lsp 701,":a;chara\witchs_st12.bmp",160,0:print 10,500
name "Succubus"
>...That won't be necessary.@
>Our dream has already been denied.\
name ""
name "Succubus Witch"
>The Legendary Succubus Lilith was defeated by a human again...@
>It appears as if there is no promised land for us after all...\
name ""
csp 701
lsp 700,":a;chara\lilith_st03.bmp",138,0:print 10,500
name "Lilith"
>It's as you see, my friends of this new era.@
>We were unable to defeat this Hero...@>We are far too weak to be a savior.\
name ""
name "Lilim"
>Sister...@>Even in this new era, must we wander the lands again with no place to call home?\
name ""
name "Luka"
>Er...Err...\
name ""
>...What should I do?@
>They don't seem like they want to fight anymore...@> But this mood... It's like I trampled on everyone's dreams of peace or something...\
lsp 699,":a;chara\alice_st91b.bmp",-93,0
lsp 700,":a;chara\alice_st01b.bmp",-93,0
lsp 698,":a;chara\lilith_st03.bmp",300,0:print 10,500
name "Lilith"
>By the way... You are the current Monster Lord, are you not?@
>It has been 500 years since Alice the Eighth...@
>Might you be Alice the Eleventh?\
name ""
name "Alice"
>No, I'm the Sixteenth.\
name ""
name "Lilith"
>It is a pleasure to make your acquaintance.@
>We owe her Majesty the Eighth a great deal for everything she did for us.\
name ""
name "Lilim"
>Her Majesty was the one who inspired my sister and I with our dream...@
>Which was broken by that hateful Hero...\
name ""
name "Luka"
>No, no... Let's stop with the self introductions for a moment...\
name ""
>No, really... What should I do here?@
>I can't start swinging my sword and sealing them all while they all look so depressed like this...\
name "Luka"
>...But are Succubi really that driven into a corner?@
>Unable to settle down anywhere, and forced to wander from place to place?\
name ""
cspl 698,699
lsp 700,":a;chara\succubus_st03.bmp",-160,0
lsp 701,":a;chara\witchs_st12.bmp",160,0:print 10,500
name "Succubus"
>Succubi cannot exist without humans.@
>Yet human villages do not accept us, and won't let us live with them.\
>Lots of men agree to let us live with them...@
>...But the problem is the women.\
>Most human females are completely hostile towards us.@
>They will never allow Succubi to live in the same town they do.\
name ""
name "Luka"
>Well, I can sort of understand why...\
name ""
name "Succubus Witch"
>That's why we have no choice but to hide our true selves and live hidden in towns.@
>If we don't, we would be forced to endlessly be on the move, never able to stay in one place...\
>But us Succubi wish for a place to live, a place to call home...\
>A paradise where we can live, without worrying about starvation...@
>A wonderful Succubus Village, where we can harvest human men like livestock...\
name ""
name "Succubus"
>From generation to generation, we've been planning to make our dream a reality.@
>Hundreds of years... Until the day where we could take over this village.\
name ""
name "Succubus Witch"
>We aren't dreaming too big...@
>All we desire is just a small, nice little village.@>With men as livestock.@
>Is that so much to ask...?\
name ""
>The Succubus Witch lets out a long sigh.\
bgm "bgm\comi1.ogg"
csp 701
lsp 700,":a;chara\mob_sensi1.bmp",0,0:print 10,500
name "Soldier"
>...No!@> It's too early to give up on your dreams!\
name ""
>One of the revived soldiers jumps up and shouts out.@
>No... It's not just one...\
lsp 700,":a;chara\mob_sensi1.bmp",-220,0
lsp 701,":a;chara\mob_seinen1.bmp",0,0
lsp 702,":a;chara\mob_gorotuki3.bmp",220,0:print 10,500
name "Youth"
>We should work together to fulfill the Succubi's dreams!@
>Your dream moved my soul...@>Please, let me become a domestic animal for you!\
name ""
name "Ruffian"
>How could I resist that moving speech.@> I'll be a domestic animal, too!@
>From the bottom of my heart... I want to help you Succubi create a home you can call your own!\
name ""
>Men from all over the village flood around the chief, shouting words of encouragement to the depressed looking Succubi.\
csp 702
lsp 700,":a;chara\succubus_st03.bmp",-160,0
lsp 701,":a;chara\witchs_st12.bmp",160,0:print 10,500
name "Succubus"
>E...Everyone...\
name ""
name "Succubus Witch"
>You accept us...?\
name ""
lsp 700,":a;chara\mob_sensi1.bmp",-220,0
lsp 701,":a;chara\mob_seinen1.bmp",0,0
lsp 702,":a;chara\mob_gorotuki3.bmp",220,0:print 10,500
name "Soldier"
>Of course!\
name ""
name "Youth"
>We want to live with you Succubi!@
>Coexisting peacefully... Succubi and Huma...@> No, Succubi and male livestock!\
name ""
name "Ruffian"
>Now, make us into livestock!@
>You can squeeze our milk, as much as you need!\
name ""
name "Luka"
>Err... Uhh...\
name ""
>What's going on...@
>What's all this about livestock and domestic animals...\
>They all seem to be happy about the idea...@>Should I... Should I just walk away?\
cspl 701,702
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...Damn perverts.\
name ""
csp 699
lsp 700,":a;chara\lilith_st01.bmp",138,0:print 10,500
name "Lilith"
>You really don't mind...?@
>Can we really make this village into a Succubi paradise?\
name ""
name "Lilith"
>Sister, we can make our utopia at last...\
name ""
lsp 700,":a;chara\mob_sensi1.bmp",-220,0
lsp 701,":a;chara\mob_seinen1.bmp",0,0
lsp 702,":a;chara\mob_gorotuki3.bmp",220,0:print 10,500
name "Soldier"
>Humans and Succubi living together... What a wonderful thing!@
>I'm determined to live here, and make your dream of a paradise come true!\
name ""
name "Youth"
>That's right!@>We'll even look into recruiting immigrants.@
>I'm sure we'll be able to find willing men!\
name ""
name "Ruffian"
>That's right, this will truly be a utopia for Succubi!@
>And a paradise for us!\
name ""
name "Luka"
>.......@>I don't care anymore.\
name ""
cspl 701,702
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...What about your precious prohibition?\
name ""
name "Luka"
>One's faith is their own.@
>It's not something you should force on others.\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Hmm...@> It looks like you became a little more flexible.\
name ""
csp 699
lsp 700,":a;chara\mob_sensi1.bmp",-220,0
lsp 701,":a;chara\mob_seinen1.bmp",0,0
lsp 702,":a;chara\mob_gorotuki3.bmp",220,0:print 10,500
name "Soldier"
>Then, please milk me first.@
>Feel free to rape me without holding anything back.\
name ""
name "Youth"
>M...Me too!@
>Think of me as nothing but livestock to be milked!\
name ""
name "Ruffian"
>No, no... Me first.\
name ""
cspl 700,702:print 10,500
name "Luka"
>...I'm tired.@>I'm going back to the inn to sleep.\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Damn perverts...\
name ""
>Alice looks at the men fighting each other, each trying to be milked first, with scorn in her eyes.\
bgmstop
sean_change "bg103"
bgm "bgm\epilogue.ogg"
>Thus, the "Purple Sabbath" ended peacefully.@
>As I'm getting ready to leave the village, the Succubi and men come out to see me off.\
lsp 700,":a;chara\succubus_st01.bmp",-160,0
lsp 701,":a;chara\witchs_st13.bmp",160,0:print 10,500
name "Succubus"
>I heard that you're on a journey to promote coexistence between humans and monsters.@
>Is that why you came to this village to help build this utopia for us?\
name ""
name "Luka"
>Err... Well...\
name ""
>...This result wasn't quite what I pictured.@
>But it seems like it ended happily, so I guess it's alright...\
name "Succubus Witch"
>Thank you for helping us create a place where we can live!\
name ""
csp 701
lsp 700,":a;chara\lilith_st01.bmp",138,0:print 10,500
name "Lilith"
>Even though we were in control of this village for so long...@
>We still couldn't freely ask for human cooperation.\
name ""
name "Lilim"
>Sister, immigrants are arriving from all over the world...@
>All to give us their energy...\
name ""
name "Luka"
>Errr... Well... Isn't that, uh... Great...?\
name ""
>Can this also be called happy coexistence...?\
lsp 700,":a;chara\mob_sensi1.bmp",-220,0
lsp 701,":a;chara\mob_seinen1.bmp",0,0
lsp 702,":a;chara\mob_gorotuki3.bmp",220,0:print 10,500
name "Livestock A"
>T...Travelers...@
>G...Good... Ah... L...Luck...\
name ""
name "Livestock B"
>Ahh... D...Do your... Ah!@>Your best...@
>We'll do... Ahhhh!@> Our best... Too...\
name ""
name "Livestock C"
>Ahhh... That feels... Ahh...\
name ""
name "Luka"
>You all too...@> Uh... Good luck...\
name ""
>They got right to work milking those men.@
>They're already so weak...\
csp 702
lsp 700,":a;chara\succubus_st01.bmp",-160,0
lsp 701,":a;chara\witchs_st13.bmp",160,0:print 10,500
name "Succubus"
>If you're ever nearby, please stop in and visit.@
>We'll always give you a warm welcome...\
name ""
name "Succubus Witch"
>Of course, you're welcome to live here, too...@
>I'd be glad to give you a taste of heaven every day...\
name ""
name "Luka"
>I...I'm going now!@
>Goodbye!\
name ""
dwave 1,"se\asioto2.ogg"
>I quickly leave the Succubus Village, now actually accurate in its name.\
>I'm a little hesitant about what's going to happen here next, but I suppose this can be called another form of coexistence.@
>I pray it works out, somehow...\
>Now then, as for the next location...\
r@k@\
bgm "bgm\field3.ogg"
mov %ivent12,1
mov %genzaiti,13
mov %gloval1_story_sinkou,8:gosub *savegloval1
goto *map5



*sean0225

gosub *genzaiti_bg
name "Luka"
>That story about Lady's Village is still bugging me...\
name ""
>The fact that only male adventurers are disappearing is too suspicious.@
>I know there are high level monsters around... But is that really the only reason?\
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>I said not to go near that village, but...@
>When have you ever listened to my warnings?\
name ""
name "Luka"
>If you're saying that, then something must be happening there.@
>There must be something there harassing people...\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Hmph, stop trying to sound like you're smart.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
>Anyway, I won't get involved in this.@
>I don't have any reason to stick my neck into this.\
name ""
name "Luka"
>I can't leave something dangerous there after finding out about it...@
>If I did, the number of victims would just keep increasing...\
name ""
name "Alice"
>Sheesh... Off to see if you can get killed again.@
>That death wish is going to be granted to you one day, you know.\
name ""
name "Luka"
>I don't have a death wish.@
>Now come on Alice, let's go.\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>..............\
name ""
>Alice scowls behind me as I head toward Lady's Village.@
>Just what's happening there...?\
dwave 1,"se\asioto2.ogg"
bgmstop
sean_change "bg111"
bgm "bgm\mura2.ogg"
name "Luka"
>Is this Lady's Village...?\
name ""
>It's a nice, calm village.\
>Refined looking ladies are all over, calmly talking with each other.@
>It doesn't feel like anything is off...@>Certainly not what you would expect if male travelers were constantly going missing.\
name "Luka"
>It doesn't look like anything strange is happening...@
>...Eh?@> Alice?\
name ""
>I turn around, looking for Alice.@>But she's nowhere to be seen.@
>Well, she usually vanishes... But not this fast.\
name "Luka"
>Should I talk to the people around the village first?\
name ""
>I decide to walk around town and collect some information.\
r@k@\
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
csp 611:cspl 3,7
mov %hanyo1,0:mov %hanyo2,0:mov %hanyo3,0:mov %hanyo4,0:mov %hanyo5,0
gosub *city25_main
dwave 1,"se\asioto2.ogg"
sean_change "bg112"
gosub *setwindow_01
name "Luka"
>Uwaa... What a huge mansion.\
name ""
>This must be that Lord Cassandra's mansion.@
>Right at the door is that maid I met earlier, named Ran.\
lsp 700,":a;chara\maidscyulla_st11.bmp",0,0:print 10,500
name "Ran"
>Welcome, Master Luka.@
>The Mistress is waiting inside.\
name ""
name "Luka"
>Ah... Thanks...\
name ""
>I follow the maid into the mansion.\
dwave 1,"se\asioto2.ogg"
sean_change "bg113"
lsp 700,":a;chara\maidscyulla_st11.bmp",0,0:print 10,500
>I step into a luxurious parlor, full of artwork and posh furniture.@
lsp 700,":a;chara\maidscyulla_st11.bmp",-160,0
lsp 701,":a;chara\emily_st21.bmp",160,50:print 10,500
>Waiting in that lush room is Emily.\
name "Emily"
>I told mother you wished to meet with her.@> Be thankful.@
>She's busy at the moment, so wait around ten minutes.\
>Ran, thank you.@>You may leave us.@
>Return to your duties.\
name ""
name "Ran"
>Understood.@>Well then, please excuse me...\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,500
>Giving a deep bow, Ran leaves the room.\
csp 701
lsp 700,":a;chara\emily_st21.bmp",0,50:print 10,500
name "Emily"
>Hey, hey... You're a traveler, right?@
>Where have you been to so far?\
name ""
name "Luka"
>I came from the Ilias Continent, and am making my way north to the Monster Lord's castle...\
name ""
>Emily leans forward, eagerly listening to me talk about my travels.@
>She really does seem like a carefree daughter of a high class Lord.\
>After around roughly ten minutes...\
lsp 701,":a;chara\emily_st21.bmp",160,50
lsp 700,":a;chara\cassandra_st11.bmp",-160,0:print 10,500
name "Cassandra"
>It seems as though I've kept you waiting for a while.\
name ""
>A noble looking woman walks into the room.\
lsp 700,":a;chara\cassandra_st12.bmp",-160,0:print 10,500
name "Cassandra"
>It's a pleasure to make your acquaintance.@
>I am Cassandra, the Lord of this village.\
>My daughter Emily told me of you.\
name ""
name "Luka"
>Ah... It's nice to meet you...@> I'm a Hero Apprentice, Luka.\
name ""
>I timidly lower my head as I introduce myself to her.@
>Her gaze is kind of off-putting...\
name "Cassandra"
>Now then Emily, please excuse yourself.@
>I would like to discuss something with our visitor.\
name ""
name "Emily"
>Right-o!@> See ya!\
name ""
dwave 1,"se\escape.ogg"
csp 701
lsp 700,":a;chara\cassandra_st11.bmp",0,0:print 10,500
>Emily excitedly jumps up and runs out of the door.@
>Cassandra gracefully takes a seat in front of me, replacing her daughter.\
name "Cassandra"
>Now then, I heard from Emily you came to inquire about that rumor.@
>The one where male travelers have not been returning from our village.\
name ""
name "Luka"
>Yes... That's what I wanted to ask you about.@
>It was bugging me, so I came to check it out...\
name ""
name "Cassandra"
>But... It's just as you can see, isn't it?@> There's nothing unusual going on in this village.\
name ""
name "Luka"
>Yes, that seems to be the case...\
name ""
lsp 700,":a;chara\cassandra_st12.bmp",0,0:print 10,500
name "Cassandra"
>Besides... If the rumor was really true, you would never return from here, wouldn't you?\
name ""
>Cassandra chuckles.\
name "Cassandra"
>But... I'm sure you will part from this village with no issue.@
>So please tell everyone that the rumor is simply false.\
name ""
name "Luka"
>I see...\
name ""
>She's right.@
>Once I go back, it will prove that there's no truth to that rumor.\
lsp 700,":a;chara\cassandra_st11.bmp",0,0:print 10,500
name "Cassandra"
>...Now then, let's stop about that unpleasant discussion about rumors and such.@
>Won't you join us for dinner?\
name ""
name "Luka"
>No... Sorry, but I'll have to decline.\
name ""
>I can't impose on the village Lord like that.@
>Honestly, I'd feel uncomfortable eating dinner in such a high class mansion like this, anyway...\
name "Luka"
>Excuse my rudeness, but there are some other things I have to do...@
>If you'll excuse me...\
name ""
lsp 700,":a;chara\maidscyulla_st11.bmp",-160,0
lsp 701,":a;chara\cassandra_st11.bmp",160,0:print 10,500
name "Ran"
>Oh, are you already returning?@
>I just prepared tea...\
name ""
name "Cassandra"
>Please don't think you're imposing.@>We would love to have you for dinner.\
name ""
name "Luka"
>Oh no, no... I've already troubled you enough.@
>If you'll excuse me...\
name ""
>I excuse myself and leave the room.\
dwave 1,"se\asioto3.ogg"
sean_change "bg112"
name "Luka"
>Whew...\
name ""
>I let out a sigh as soon as I leave the mansion.@
>I don't know why... But the atmosphere felt really heavy in there.\
lsp 700,":a;chara\emily_st23.bmp",0,50:print 10,500
name "Emily"
>Oh... Are you already going back?\
name ""
>Emily suddenly appears and starts talking to me.\
name "Luka"
>Yeah, since the rumor wasn't true I thought I should hurry on back...\
name ""
lsp 700,":a;chara\emily_st22.bmp",0,50:print 10,500
name "Emily"
>Hehe... My mother seems to be willing to overlook you.@
>But I like you...\
name ""
>A strange smile flashes across Emily's face.\
name "Luka"
>Eh...?\
name ""
name "Emily"
>Hey, hey... I want to know more about you...\
name ""
lsp 701,":a;chara\emily_st22.bmp",160,50
lsp 700,":a;chara\cassandra_st11.bmp",-160,0:print 10,500
name "Cassandra"
>...Emily, do not be rude to our visitor.\
name ""
lsp 701,":a;chara\emily_st23.bmp",160,50:print 10,500
name "Emily"
>M...Mother...\
name ""
name "Cassandra"
>Let the traveler go home, he has something he must do.\
name ""
name "Emily"
>...Ok, I got it.@
>If that's what you say, Mother...\
name ""
>Emily sighs, looking a little depressed.\
name "Luka"
>Errr... Well then...\
name ""
>I hurry away from the mansion, a strange sense of unease taking hold in me.\
dwave 1,"se\asioto2.ogg"
sean_change "bg111"
>As I head back out of the village, and arrive at the entrance again...@
>I feel a presence behind me.\
name "Luka"
>Alice...?\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>................\
name ""
>I turn around to find Alice...@> But she looks odd...@
>It's like she's worrying about something.\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>...Even you noticed it by now, right?@
>How abnormal this village is...\
name ""
name "Luka"
>Of course...\
name ""
>I nod back at Alice.@> This village...\
r@k@\
csel "Has no men at all",*sean0226,"Is full of beautiful women",*sean0227,"Will become mine!",*sean0228



*sean0226

name "Alice"
>Hmm, so you did notice.@
>For there to not be a single man here is just plain strange.\
name ""
name "Luka"
>Yes... This place isn't normal at all.\
name ""
goto *sean0229



*sean0227

name "Alice"
>...........\
name ""
>Alice just glares at me for a few moments.\
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>I can't tell if you're being an idiot, or joking.\
name ""
name "Luka"
>Then what do you think is abnormal about this village?\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>There isn't a single man in this village.@
>...How could you not have noticed that?\
name ""
name "Luka"
>You're right...@>This village really is strange!\
name ""
goto *sean0229



*sean0228

name "Alice"
>Have you finally gone insane?\
name ""
>Alice scowls at me.\
name "Alice"
>I always thought you were odd in the head, but I didn't think you would go that far!\
name ""
name "Luka"
>No, I was just joki...@
>Hey, wait a second.@>What do you mean by that?\
name ""
name "Alice"
>Besides you, there's another strange thing in this village.\
>Not a single man to be found anywhere...@
>...How could you miss that?\
name ""
name "Luka"
>You're right...@>This village really is strange!\
name ""
goto *sean0229



*sean0229

>I can't imagine a village would exist without a single man.@
>This just can't be right...\
csp 700:print 10,500
name "Luka"
>...I think we should examine this village a little more closely.\
name ""
>I turn around and start walking back into the village.\
lsp 700,":a;chara\madaminsect_st11.bmp",0,0:print 10,500
name "Lady on a Stroll"
>Oh my... Did you need something?\
name ""
>I walk up to a nearby lady to ask her a question.\
name "Luka"
>Er, well...@
>Do no men live in this village?\
name ""
>I ask her straight out.@
>A smile crosses her face after a moment.\
name ""
bgm "bgm\kiki2.ogg"
name "Lady on a Stroll"
>Oh, I have a wonderful idea.@> How about I show you what happened to all the men that lived in this village?\
name ""
dwave 1,"se\escape.ogg"
lsp 700,":a;chara\madaminsect_st01.bmp",0,0:print 10,500
>Suddenly, her body changes, revealing herself as a monster!\
r@k@\
goto *madaminsect_start



*sean0230

bgm "bgm\kiki2.ogg"
r@k@\
name "Luka"
>It can't be... A monster was disguising herself as one of the citizens here...\
name ""
>I wipe away the sweat from my forehead after my victory.\
name "Luka"
>She must have been the one attacking the travelers.@
>Now that she's defeated, that should solve everything.\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>...Idiot.@
>Did you really think that would end it?\
name ""
name "Luka"
>Eh...?\
name ""
>As I turn toward Alice, confused at what she meant...@
lsp 700,":a;chara\madamumbrella_st11.bmp",0,0:print 10,500
>A lady holding an umbrella walks up to me.\
name "Umbrella Lady"
>I was ordered by Cassandra...@
>Until Alice had left the village, I was to ignore you...\
>But now...\
name ""
dwave 1,"se\ero_makituki3.ogg"
lsp 700,":a;chara\madamumbrella_st12.bmp",0,0:print 10,500
>Suddenly, tentacles sprout from her umbrella, revealing herself as another monster!\
r@k@\
goto *madamumbrella_start



*sean0231

bgm "bgm\kiki2.ogg"
r@k@\
name "Luka"
>What the... So everyone here is a monster?\
name ""
>That explains why no male adventurer has ever returned...@
>As soon as they stepped foot in this monster village, they got attacked!\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Do you get it?@> What kind of place this is...?\
name ""
name "Luka"
>Yes, they made this village to be a feeding ground on travelers who came here...@
>I can't let this go on!\
>From what I can tell, Cassandra must be the one in charge.@
>If I defeat her, I'm sure this will all end!\
name ""
>If I leave now, the number of victims will only increase.@
>With anger burning in my chest, I rush toward the mansion I was at earlier.\
dwave 1,"se\asioto1.ogg"
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>Is he even a match for her as he is now...?\
name ""
sean_change "bg112"
lsp 700,":a;chara\maidscyulla_st11.bmp",0,0:print 10,500
>Standing in front of the entrance to the mansion is the maid from before.\
name "Ran"
>I'm under instructions from my master.@
>I'm sorry, but I cannot let you pass.\
name ""
name "Luka"
>Just let me by!\
name ""
>I felt something odd from her since the first time I met her...@
>She isn't human, so I need to be careful here...\
name "Ran"
>...We were going to overlook you out of respect for Alice.\
>But we won't overlook you twice.@
>Those are the master's orders.\
name ""
>Her lower body drastically changes, with thick tentacles coming out from under her skirt!\
r@k@\
goto *maidscyulla_start



*sean0232

bgm "bgm\kiki2.ogg"
r@k@\
name "Luka"
>She must have been acting as the guard...\
name ""
>For a maid, she was awfully powerful...@
>That must mean that the one she serves, Cassandra, must be even more powerful...\
>I have to prepare myself and concentrate for this!\
name "Luka"
>Alright, let's go!\
name ""
>Fired up, I rush into the mansion.\
dwave 1,"se\asioto2.ogg"
sean_change "bg113"
lsp 700,":a;chara\emily_st21.bmp",0,0:print 10,500
name "Emily"
>Wahaha, I knew it!@> You came back!@
>I thought it might end up like this. \
name ""
>Emily is waiting in the parlor.@
>With a carefree smile on her face, she stands here looking at me.\
name "Luka"
>Are you... A monster as well?\
name ""
lsp 700,":a;chara\emily_st22.bmp",0,0:print 10,500
name "Emily"
>That's right. @
>Come on, let's go!\
>Emily will see how strong you are!\
name ""
r@k@\
goto *emily_start



*sean0233

bgm "bgm\kiki2.ogg"
r@k@\
lsp 700,":a;chara\emily_st31.bmp",0,100:print 10,500
name "Emily"
>Ah!@>H...How could you turn Emily into this!?\
name ""
>Sealed into a tiny little octopus form, Emily starts to cry.@
>But she won't be able to get in my way any longer...\
name "Luka"
>Alright, now...\
name ""
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\cassandra_st11.bmp",0,0:print 10,500
name "Cassandra"
>There's just me left.@>...Isn't that right?\
name ""
name "Luka"
>.....!!\
name ""
>The air chills as Cassandra walks into the room.@
>I unconsciously take a step away from her, surprised by the pressure just from her gaze.\
name "Luka"
>You're the one behind everything here!\
name ""
>I yell as loud as I can at her, trying to shake off the pressure holding me down.@
>But Cassandra just smiles back at me, completely unfazed.\
name "Cassandra"
>Yes... My family has always lived in this village, disguised as humans.@
>Every human male that came to visit, we would feed on.\
>I cannot even tell you how many hundreds we have eaten already.\
name ""
name "Luka"
>Th...That's...@> Unforgivable!\
name ""
>This woman is evil.@
>Disguising the village to be nothing more than a trap to lure men to feed on...!\
lsp 700,":a;chara\cassandra_st12.bmp",0,0:print 10,500
name "Cassandra"
>But you look quite delicious...@
>One who caught even Alice's eye... The highest food I could savor.\
name ""
dwave 1,"se\ero_slime3.ogg"
>Liquid starts to ooze from Cassandra's body, as her dress starts to melt and change shape.\
dwave 1,"se\ero_slime3.ogg"
lsp 700,":a;chara\cassandra_st01.bmp",0,0:print 10,500
>Her clothes vanish, revealing her true form...@
>This is what she really is...\
lsp 701,":a;chara\cassandra_st01.bmp",-160,0
lsp 700,":a;chara\emily_st31.bmp",160,100:print 10,500
name "Emily"
>Mother, before that...!@
>Use your magic power to restore Emily to normal!\
>Emily will fight with mother!\
name ""
>The sealed Emily bounces at Cassandra's feet.@
>Her mother just looks down at her with cold eyes.\
name "Cassandra"
>...I've explained this to you many times, Emily.@
>This world works on the survival of the fittest.@> Those deemed unfit shall be nothing but food for the victors.\
name ""
name "Emily"
>M...Mother...?\
name ""
dwave 1,"se\ero_makituki2.ogg"
>Emily's tiny sealed body starts to sink into Cassandra's body.@
>As if she was an amoeba absorbing its meal, Emily is sucked into her mother's body.\
name "Emily"
>No...!@
>Mother!!\
name ""
dwave 1,"se\ero_makituki3.ogg"
csp 700:print 10,500
>Emily screams in horror as she's quickly sucked inside.@
>After only a few moments, not even her screams can be heard any longer.\
csp 701
lsp 700,":a;chara\cassandra_st01.bmp",0,0:print 10,500
name "Luka"
>You...!@>Wasn't Emily your daughter!?\
name ""
name "Cassandra"
>Yes... Of course she was.@
>She was a daughter borne from my body, so I just returned her back to me.\
>Survival of the fittest... The weak should just be consumed by the strong.@
>A daughter too stupid to understand how the world works is not necessary.\
name ""
name "Luka"
>...I'll never forgive you!\
name ""
name "Cassandra"
>When did I ask for your forgiveness?@
>Why should Cassandra Nereneid need anything from a human!?\
name ""
>The liquid dripping from her body is slowly corroding everything it touches.@
dwave 1,"se\ero_slime3.ogg"
bg "bg\bg160.bmp",10,1500
>It spreads through the room, covering and consuming everything it comes in contact with.\
r@k@\
goto *cassandra_start



*sean0234

sean_change "bg111"
r@k@\
bgm "bgm\hutuu2.ogg"
>Thus the Lord of the village, Cassandra, meets her end.@
>All of the other monsters seem to have fled.\
>The village is completely deserted, with not a soul to be seen.@
>But at least now there should be no more killed adventurers...\
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>It's over...\
name ""
name "Luka"
>Yeah...\
name ""
>There's a lot I want to ask Alice.\
>I've traveled with her for so long, but I barely know anything about her.@
>This incident just made me realize that...\
name "Luka"
>Hey, Alice...@
>You want humans and monsters to coexist together too... Don't you?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>It's just as you heard.@
>My aim as the Monster Lord is to live in harmony with humans.\
>...But don't think I'm being an idiot about it like you are.@
>I'm deeply thinking about everything, and working out ways to solve the various problems.\
name ""
name "Luka"
>Is that why you came with me on my journey?\
name ""
lsp 700,":a;chara\alice_st08b.bmp",67,0:print 10,500
name "Alice"
>...It's just as I said when I first met you.@
>I want to see when your true character comes out.\
>How long can someone who has the same dream as me last?@
>As I traveled the world, I wanted to see.\
name ""
name "Luka"
>I see...\
name ""
>There's something else I want to ask her...@
>About her mother, defeated by a human Hero...\
name "Luka"
>Hey Alice...@> One more thing...\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...About my mother?\
name ""
name "Luka"
>Yes... The human Hero who defeated her...\
name ""
name "Alice"
>That's a rather difficult story.@
>You haven't heard anything about the previous Monster Lord being defeated by a human Hero, have you?\
name ""
name "Luka"
>No...\
name ""
>If that happened, it would be huge news throughout the human cities.@
>But I haven't even heard the whisper of a rumor about anything like that.\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>My mother was not defeated by a human Hero.@
>She gave up her life for her beliefs.\
name ""
name "Luka"
>I see...\
name ""
>I shouldn't probe any further.@
>It would be horrible of me to make someone talk about the death of a parent just to satisfy my curiosity.\
bgm "bgm\epilogue.ogg"
name "Luka"
>Anyway, I'm really happy.@
>Alice is just like me!\
>Hahaha.@>Bahaha!\
name ""
lsp 700,":a;chara\alice_st07b.bmp",67,0:print 10,500
name "Alice"
>Sh...Shut up!\
name ""
>Thanks to Alice, this incident was able to be settled.@
>The village is deserted now, but there won't be any more victims...\
name "Luka"
>Now, back to the adventure!@
>For both my dream... And Alice's!\
name ""
name "Alice"
>Shut up...\
name ""
>...Even if you say that twice...\
r@k@\
mov %ivent13,1
mov %genzaiti,14
mov %gloval1_story_sinkou,8:gosub *savegloval1
bgm "bgm\field3.ogg"
goto *map5



*sean0235

gosub *genzaiti_bg
name "Luka"
>Should we go to Lady's Village again...?\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>That village is abandoned now, isn't it?\
name ""
name "Luka"
>I know, but I just want to see it again...\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Well, it's up to you to decide where to go.@
>Do whatever you want.\
name ""
cspl 699,700:print 10,500
>We turn around and head back to Lady's Village.\
dwave 1,"se\asioto2.ogg"
sean_change "bg111"
bgm "bgm\mura3.ogg"
>The feeding ground where Cassandra ruled...@
>The many adventurers who set foot here were eaten by the citizens.\
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>I wonder what will happen to this ghost town.@
>Will humans migrate here and take it over?@> Or will monsters come here and settle down again?\
name ""
name "Luka"
>Hey, Alice...@
>Can the carnivorous monsters survive without eating humans?\
name ""
name "Alice"
>There is no monster that must eat humans to survive.@
>There's nothing unique about human flesh for sustenance.@> They can easily eat other creatures for that purpose.\
name ""
name "Luka"
>Then why do they eat humans...?\
name ""
name "Alice"
>The ones with low intelligence do it due to their instinct of eating creatures with high energy values.\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
>The ones with high intelligence do it for their own amusement.\
name ""
name "Luka"
>Isn't there a way to stop them from eating humans like that...?\
name ""
>I expected a cold answer like when I first saw the spider in the cave.@
>But Alice gives a surprising response.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...I think it's possible.@
>The ones with low intelligence can be controlled.\
>For the others... Their ethics would have to be changed.\
name ""
name "Luka"
>But... How could they be changed?@
>There's no way humans could approach them to even try to change that...\
name ""
name "Alice"
>There are serious issues in relations between humans and monsters.@
>Humans have multiplied and populated the world... Their power cannot be ignored.\
>Some sort of compromise needs to be reached before it comes to a pointless war.\
name ""
name "Luka"
>But will those monsters ever agree to one?\
name ""
name "Alice"
>Of course there will be many who won't agree.@
>Too many enjoy the taste of human flesh.\
name ""
name "Luka"
>Isn't there a solution...?@
>Maybe we can find something that tastes even better...\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>Of course that exists.@> It's human semen.\
>I see... That's a solution.@>Farms harvesting male semen for consumption by the man eating monsters in trade for not eating any more.\
>Hmm.@> That's quite a fine plan, Luka.\
name ""
name "Luka"
>E...Err... That's not what I was going for...@
>Or could that work...?@> Urhg...\
name ""
>A semen farm like that has a whole slew of problems.@
>But if that means that no humans would be eaten any more...\
>There may actually be a lot of people who would willingly supply semen...@
>But Ilias would never permit that.\
name "Luka"
>By the way, just how many monsters are there that eat humans?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>There must be a balance of carnivore and herbivore creatures, or the balance would be quickly upset.@
>Therefore, there aren't that many...\
>In truth, there really aren't that many intelligent humans or monsters eaten by carnivorous monsters.@
>But just because there aren't many doesn't mean it isn't an issue...\
name ""
name "Luka"
>I wonder how it compares to humans murdering other humans...?\
name ""
name "Alice"
>It's certainly far less than human murder.@
>Humans kill their own far more often than monsters kill humans.\
name ""
name "Luka"
>I...It's that much less...?\
name ""
>It's true, you don't hear of it happening too often...\
>It's big news when a human is eaten by a monster.@
>Stories travel quickly from town to town, and they always become the talk of the town for a few days.\
name "Luka"
>Anyway, it's a problem that can't be ignored.@
>What should we do about human eating monsters...?\
name ""
name "Alice"
>Yes, it's something I've been grappling with as the Monster Lord.@
>It's a critical issue that must be addressed before any hope for coexistence can be achieved.\
name ""
name "Luka"
>It's not going to be easy, is it...?\
name ""
cspl 699,700:print 10,500
>After visiting the abandoned village where many met their end, I was given a lot to think about.\
>Now for our next destination...\
mov %genzaiti,14
bgm "bgm\field3.ogg"
goto *map5



*sean0236

gosub *genzaiti_bg
name "Luka"
>...Alright, let's go to the volcano!\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>I know you're used to this, but is your business in this area done?@
>If you still have something left to do, you should finish it before heading to the volcano.\
name ""
r@k@\
csel "I'm ready",*sean0238,"Something's left",*sean0237



*sean0237

name "Luka"
>No, not yet... I need to finish something first.\
name ""
>I take out the map again.\
goto *map5



*sean0238

mov %ruka_tati,1
name "Luka"
>Alright, on to the volcano!\
name ""
>We're finally on our way to the volcano.@
>The last spirit, Salamander, is waiting there...\
>Once I get her to accept me, I'll have all four spirits.@
>I wonder how powerful I'll get once I have all four...?\
bgmstop
sean_change "bg009"
bgm "bgm\yaei.ogg"
>Tonight during camp, just like the past few days, it's more special training from Alice in order to control the flow of water.\
>I was so happy at seemingly being just one step away from grasping it...@
>But after trying so many times and never grasping it, it feels like I'll never get it.\
>Am I really fit for this kind of special training...?\
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Go on, close your eyes like usual.@
>I'm going to slap you as hard as I can.\
name ""
name "Luka"
>Hrrrm...@> Is this really the best way?@
>I feel like you're kind of... Abusing this training style a little bit.\
name ""
name "Alice"
>Oh, so you want to give up?@
>I guess that means you never want to be a Hero like Heinrich...\
name ""
name "Luka"
>Ahhg!@>Now I have to do it...\
name ""
>I sit down and close my eyes, feeling like she cheated me into doing it again.@
cspl 699,700
bg black,10,1500
>Focus...\
name "Luka"
>........\
name ""
dwave 2,"se\damage.ogg":quakex 2,440
name "Luka"
>Ahhg!\
name ""
dwave 2,"se\damage.ogg":quakex 2,440
name "Luka"
>Guh!\
name ""
dwave 2,"se\damage.ogg":quakex 2,440
name "Luka"
>Uhg!\
name ""
dwave 2,"se\fire2.ogg":quakex 2,440
name "Luka"
>Hrrkrkk!\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0
bg "bg\bg009.bmp",10,500
name "Alice"
>Hmph.@>Horrible.\
name ""
name "Luka"
>Th...That last one kind of burned for some reason...\
name ""
>This training really takes it out of me.@
>After only a few minutes, I feel exhausted and bruised.\
name "Luka"
>Hey, Alice...@
>Isn't it about time for me to learn a new technique...?\
name ""
name "Alice"
>Hmm... It's true you've gotten a lot better at controlling the power of the earth.@
>Perhaps you could learn a new skill utilizing that?\
name ""
name "Luka"
>Alright!\
name ""
>My spirits renewed, I eagerly jump back up to be taught by Alice.\
sean_change "bg009"
name "Luka"
>Like this...?@>Hya!\
dwave 1,"se\karaburi.ogg"
name ""
>After listening to her explain it as I practice, I slowly get the hang of it.\
>After I jump into the air, I fill myself with the power of the earth to drastically magnify my weight as I come down.@
>Basically, it's combining Demon Skull Beheading with the power of the earth...\
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Hmm, you seem to have picked that up quickly.@
>It's similar to a skill you already know, after all.\
>Slamming the weight of the earth itself onto your opponent from above.@
>The axe skill called Earth Rumbling Decapitation.\
name ""
name "Luka"
>Axe skill?@> But I use a sword...\
name ""
name "Alice"
>The one who developed this skill was a Minotauros who wielded an axe.@
>But you should be able to use it with no issue with a sword.\
>As the story goes, the legendary axe wielding Minotauros raged across the battlefield decapitating all of her enemies...\
name ""
name "Luka"
>Another horrible monster back story.@
>Well I won't use it like that, so it doesn't matter.\
name "Alice"
>...Stacking those heads into a set of stairs to scale the enemy's walls...\
name "Luka"
>No, really, you don't need to keep going with the story.\
name ""
>Why do these stories keep getting worse?\
name "Alice"
>What are you saying, you idiot?@
>As the new wielder of that skill, you should take pride in being a part of its history.\
name ""
name "Luka"
>Urhg...\
name ""
>This skill really is unpleasant.@
>But it's powerful, so it will be useful!\
dwave 1,"se\fanfale.ogg"
mov %skill01,12
>[Earth Rumbling Decapitation] was learned!\
name "Alice"
>The skill works more or less the same as Demon Skull Beheading.@
>But now you don't need to climb anything to use it.\
name ""
name "Luka"
>Oh? That's convenient.\
name ""
>It was annoying having to look for things to climb every fight.@
>Looks like I don't have to bother with that any longer.\
name "Alice"
>In addition, if you have Gnome summoned, the power will be much stronger.\
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
>...You've mastered quite a lot of techniques so far.@
>You've become quite a skilled Cursed Sword Skill user.\
name ""
name "Luka"
>Ah, thanks...@
>Wait!@>Cursed Sword!?\
name ""
>I... I know my skills are all derived from monster ones, with horrible legends that go with them...@
>But I don't want to be called a user of Cursed Sword Skills!\
name "Alice"
>A Cursed Sword user is so much better than a fake Hero.@
>At any rate, it's not like you can change your class at this point.\
name ""
name "Luka"
>Ahh... Ilias... Forgive me...\
name ""
>I look up at the sky and beg forgiveness.\
sean_change "bg115"
bgm "bgm\kazan.ogg"
name "Luka"
>Ah... Hot...\
name ""
>This isn't just hot...@> This is hot-hot.\
>As soon as I take a single step into the volcano, I'm assaulted by the insane temperature.\
>But despite the scorching hell around me, I feel the same tranquil atmosphere that was in the other spirit's areas.\
name "Luka"
>So Salamander is in this volcano...\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Salamander is famous as a powerful spirit among monsters.@
>So it's common knowledge that she resides here.\
>Many monsters using Cursed Sword Skills come here to seek her guidance...@
>But nearly every one of them turns away after stepping foot inside the volcano.\
name ""
name "Luka"
>Powerful...?\
name ""
>I'm sure she's going to want me to show her my strength and defeat her...@
>If she's known as being powerful, this may be difficult.\
name "Luka"
>But... I might die from the heat before I even reach her.@
>I need to find her quickly.\
name ""
bgm "bgm\comi1.ogg"
csp 699
lsp 700,":a;chara\sylph_st21r.bmp",221,190
lsp 701,":a;chara\gnome_st31r.bmp",413,145:print 10,500
name "Sylph"
>I can smell Mandy you know! \
name ""
name "Gnome"
>..........\
name ""
>I feel two spirits take shape inside of me.\
name "Luka"
>You know where she is...?\
name ""
name "Sylph"
>Deeper... With your back to the door, go straight!@
>Then you'll be able to meet her!\
name ""
name "Gnome"
>..........\
name ""
name "Luka"
>I see, thank you.@
>By the way, where's Undine?\
name ""
name "Sylph"
>It's so hot, she melted!\
name ""
name "Gnome"
>..........\
name ""
>...Oi, oi.@
>What do you mean melted?\
lsp 701,":a;chara\gnome_st32r.bmp",414,145:print 10,500
name "Sylph"
>Gnomeys all hot too, so she's all tired!\
name ""
name "Gnome"
>.............\
name ""
dwave 1,"se\miss_wind.ogg"
lsp 701,":a;chara\gnome_st33r.bmp",319,145:print 10,200
for %move=0 to 100 step 10
amsp 700,221-%move,190
print 1:wait 10
next
name "Gnome"
>....!?\
name ""
name "Sylph"
>Yaaay! \
name ""
name "Luka"
>.............\
name ""
>How is Sylph so full of energy?@
>Anyway... I need to hurry and find Salamander.\
bgm "bgm\kazan.ogg"
cspl 700,701:print 10,500
name "Luka"
>Alright, let's go!\
name ""
>As Alice and I walk further inside the volcano...\
r@k@\
goto *yougan_start



*sean0239

bgm "bgm\kazan.ogg"
r@k@\
name "Luka"
>Even in such an extreme environment like this, monsters can still exist...\
name ""
>I put my sword away as I admire the Lava Girl.\
name "Luka"
>If I could use the power of water, I bet fire enemies would be really easy to beat...\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>You can use it, you idiot.@
>You just need to project the flow of water outside your body.\
name ""
name "Luka"
>Even if you explain it that easily...@
>Actually doing it is hard.\
name ""
name "Alice"
>...Oh shut up.@
>Anyway, it looks like another monster was drawn by the smell of a man.\
name ""
dwave 1,"se\escape.ogg"
cspl 699,700:print 10,500
>Alice quickly vanishes after giving me that warning.\
name "Luka"
>Guh... Another monster?\
name ""
>I quickly take out my sword...\
r@k@\
goto *basilisk_start



*sean0240

bgm "bgm\kazan.ogg"
r@k@\
name "Luka"
>Sheesh, that was difficult...\
name ""
>I breathe a sigh of relief.@
>Suddenly, a loud groan shakes the surroundings!\
>The owner of the voice seems to be further inside...\
name "Luka"
>Wh...What was that!?@> Another monster!?\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>It's rare for a human to step foot here.@
>All of the monsters are starving for a taste of a male.\
>You're little more than a piece of meat dipped into a pool of piranhas at the moment.\
name ""
name "Luka"
>I'm just meat, eh...?\
name ""
name "Alice"
>Anyway, your next opponent sounds like a difficult one.\
>Your only chance of winning is using the power of water.\
name ""
name "Luka"
>It's my... Only chance?@>If I can't...?\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...............\
name ""
dwave 1,"se\escape.ogg"
cspl 699,700:print 10,500
>Alice vanishes without another word.@
>Did she come back just to give me that advice...?\
>The owner of that loud voice must be really powerful...\
r@k@\
goto *dragon_start



*sean0241

bgm "bgm\kazan.ogg"
r@k@\
name "Luka"
>Whew... That was surprising...\
name ""
>I breathe a sigh of relief and wipe off my sweat.\
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st07b.bmp",67,0:print 10,500
name "Alice"
>I'm the one that's surprised, you idiot!\
name ""
>Alice comes back yelling.\
name ""
name "Alice"
>Watch what you're doing, you idiot!@
>How could you lose concentration at such a critical time!\
>You would have been eaten if you didn't get that lucky attack!@
>Just watching that shortened my life...\
name ""
name "Luka"
>Err, well... I just didn't think I could cut flame...@
>It surprised me, so I kind of got confused.\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>You idiot!\
name ""
>Alice yells at me again.\
>It's true that was really dangerous...@
>I'll be more careful from now on.\
name "Luka"
>Anyway, it ended well.@
>Her attacks seemed to be even easier to sense than your slaps during the special training...\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>I'm the Monster Lord.@
>Don't go comparing my powerful attacks with that small fry's.\
name ""
name "Luka"
>I knew it...@> You really were trying to slap me as hard as you could.\
name ""
>She wasn't just training, she was hitting me for fun at the same time...\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>You only awakened to the power of water due to that severe training.@
>Be thankful, you idiot.\
name ""
name "Luka"
>Yes, thank you...@
>Without that special training, I wouldn't have been able to defeat her.\
name ""
>As I talk with Alice...@
>I feel something strange from behind me.\
name "Luka"
>One after another!@> Another monster!?\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>No... She's...\
name ""
bgm "bgm\boss0.ogg"
csp 699
lsp 700,":a;chara\salamander_st01.bmp",0,0:print 10,500
>Radiating magical power all around her, a powerful looking monster appears.@
>No... No matter how I look at her, it's obvious she isn't a normal monster.\
name "Luka"
>Are you Salamander!?\
name ""
name "Salamander"
>Indeed, I'm the flame spirit Salamander.@
>I know that you came to me seeking my power.\
>In addition, you have already borrowed the power of Sylph, Gnome, and Undine.\
name ""
name "Luka"
>That speeds things up.@
>Please, lend me your power!\
name ""
lsp 700,":a;chara\salamander_st02.bmp",0,0:print 10,500
name "Salamander"
>I'll give the same response as the others did.@
>Show me your power.\
name ""
name "Luka"
>I got it, a challenge!\
name ""
>I pull out my sword, ready to show Salamander my strength.@
lsp 700,":a;chara\alice_st01b.bmp",-120,0
lsp 701,":a;chara\salamander_st02.bmp",160,0:print 10,500
>When Alice suddenly butts in.\
name "Alice"
>Luka, I'll give you a warning.@
>Salamander is Granberia's instructor.\
name ""
name "Luka"
>Ehhh!?\
name ""
>I freeze in shock at the sudden revelation.@
>Salamander was the one who taught Granberia...!?\
name "Luka"
>Then this is going to be impossible, isn't it!?\
name ""
csp 701
lsp 700,":a;chara\salamander_st01.bmp",0,0:print 10,500
name "Salamander"
>Hmm... That's quite an old story.@
>Granberia is already far more powerful than me.\
>In other words... If you can't beat me, there's no hope you can ever defeat Granberia!\
name ""
r@k@\
goto *salamander_start



*sean0242

bgm "bgm\kazan.ogg"
r@k@\
name "Luka"
>I...I did it!\
name ""
>Salamander acknowledged me...@
>With this, I'll finally have all four spirits power!\
name "Salamander"
>Oh potential warrior, accept my power!\
name ""
>Salamander holds her palm out toward me...@
dwave 1,"se\warm.ogg"
csp 700
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
>With a flash of light, I feel her power enter me as she vanishes!\
>My body heats up in the next moment... This must be Salamander's power taking hold in me.\
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>You finally got Salamander's power?\
name ""
name "Luka"
>Yes, I now have all four spirits...@
>With this... Finally...!\
name ""
>Before I can laugh, I'm cut off by a loud noise!\
dwave 1,"se\earth1.ogg"
quake 10,2000
>The ground starts to shake and vibrate, as if there was a giant earthquake!\
name "Luka"
>Wh...What the hell!?@> Is it erupting!?\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>No, it isn't... This feeling is...\
name ""
dwave 1,"se\bom2.ogg"
quake 10,1000
>Suddenly, the ceiling above us crashes to the floor!@
>A flash of green comes after the debris!\
bgm "bgm\boss0.ogg"
csp 699
lsp 700,":a;chara\granberia_st04.bmp",0,0:print 10,500
>I...It's Granberia!?\
name "Luka"
>It can't be... G...Granberia?\
name ""
>The massive sense of oppression I felt earlier returns.@
>But the feeling from Granberia is far more than the Dragon Girl...\
>Granberia really is different from the other monsters...\
lsp 700,":a;chara\granberia_st01.bmp",0,0:print 10,500
name "Granberia"
>...It has been a while, boy.@
>It seems like you've progressed nearly twenty years in the short time since we last parted ways.\
name ""
name "Luka"
>...............\
name ""
>I can't be happy at her praise at the moment...@
>There's no way Granberia would have crashed through the roof like that just to say "Hi"...\
name "Luka"
>Wh...Why did you come here...?\
name ""
lsp 700,":a;chara\granberia_st41.bmp",0,0:print 10,500
name "Granberia"
>...I came to challenge you to a fight!\
name ""
>Granberia brandishes her sword, shouting that at me.@
>The force of power flying off her almost knocks me down.\
lsp 699,":a;chara\alice_st91b.bmp",-120,0
lsp 700,":a;chara\alice_st01b.bmp",-120,0
lsp 701,":a;chara\granberia_st41.bmp",160,0:print 10,500
name "Alice"
>This is terribly sudden, Granberia.@
>Are you ignoring my decree and attacking Heroes without provocation again?\
name ""
name "Granberia"
>...B...But Alipheese...@
>"Heroes" are simply disgusting soldiers of Ilias!\
>But the boy in front of me is different than those mass produced Heroes!@
>One who I've been searching for... One worthy to cross blades with!\
name ""
lsp 700,":a;chara\alice_st04b.bmp",-120,0:print 10,500
name "Alice"
>I see...\
name ""
>Alice sighs, then turns toward me.\
lsp 700,":a;chara\alice_st01b.bmp",-120,0:print 10,500
name "Alice"
>...Luka.@
>It seems like Granberia doesn't care about either Heroes or the Monster Lord at the moment.\
>She seems to think nothing but of fighting you as a warrior.@> What are you going to do?\
name ""
r@k@\
cspl 699,701
goto *granberia3_start



*sean0243

bgm "bgm\boss0.ogg"
lsp 700,":a;chara\granberia_st11_b.bmp",0,0:print 10,500
name "Granberia"
>Now then... What to do with the loser...?\
name ""
lsp 699,":a;chara\alice_st91b.bmp",-93,0
lsp 700,":a;chara\alice_st01b.bmp",-93,0
lsp 701,":a;chara\granberia_st11_b.bmp",160,0:print 10,500
name "Alice"
>Granberia...\
name ""
>Breaking her silence, Alice suddenly speaks up.\
name "Alice"
>Luka just obtained Salamander's power.@
>Naturally, he has no idea how to use her power.\
>Once he is able to control all four spirits...@
>Of course, he will grow far stronger.\
name ""
name "Granberia"
>So spare him...@>Is that an order?\
name ""
lsp 700,":a;chara\alice_st04b.bmp",-93,0:print 10,500
name "Alice"
>...It's nothing but a fact.@
>You were the victor, so it's your right to do what you wish.\
>Whether you choose to harvest the fruit before it's ripe or not is up to you.\
name ""
cspl 699,701
lsp 700,":a;chara\granberia_st04.bmp",0,0:print 10,500
name "Granberia"
>............\
name ""
>Granberia calmly puts her sword away.@
>It almost seems like she was planning on this from the start...\
lsp 700,":a;chara\granberia_st01.bmp",0,0:print 10,500
name "Granberia"
>...I'll be waiting in the Monster Lord's castle.\
name ""
dwave 1,"se\warp.ogg"
csp 700:print 10,500
>After saying that, Granberia vanishes.@
>Leaving me alone on my knees, I couldn't even get off a word before she leaves.\
bgm "bgm\hutuu3.ogg"
r@k@\
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Hmph... It looks like I didn't need to jump in like that.@
>That Granberia was planning on doing that all along.\
name ""
>I grumble as I fall to the ground, too injured to move.@
>Alice just looks down at my pathetic figure.\
name "Alice"
>...Well it doesn't really matter, but your injuries are pretty severe.@
>With a body that beat up, swinging a sword would be pretty much impossible.\
name ""
name "Luka"
>Wh...What!?@>That matters!!@
>That can't be!\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>...Well, that's only for a normal person.@
>If you rest in bed for about a half month, you should be fine.\
name ""
name "Luka"
>A...A half month...?@
>My journey will have to be put on hold for that long...?\
name ""
dwave 1,"se\ero_makituki2.ogg"
>Alice coils her tail around me!\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>No complaining.@>You still have your life.\
>First we should return back to town.@
>Gold Port is the closest location.\
name ""
name "Luka"
>Ah... Yeah...@
>I'm sorry for troubling you...\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...Sheesh, really.@
>After all the trouble you put me through, you're going to owe me a feast...\
name ""
>Holding my body in the air with her tail, Alice carries me out of the volcano.\
cspl 699,700
bg "bg\bg116.bmp",10,1500
>She carries me all the way to the inn in Gold Port, where I sleep like a rock...\
bgmstop
bg black,10,3000
wait 1000
csp -1:textoff
gosub *setwindow_01p
name "Girl's Voice"
>Mother...@>Mother...@
>I'm so sorry...@>Mother...\
name ""
name "Luka"
>....?\
name ""
csp -1:textoff
bg "bg\bg066.bmp",99,5000,"system\lngtwave.dll/vwi"
bgm "bgm\enrika.ogg"
wait 1000
gosub *setwindow_01p
>Am I... Dreaming...?@
>Almost in a haze, I open my eyes to a strange scene.\
>That little girl's voice...@>Where have I heard it before...?\
lsp 700,":a;chara\mob_alice1.bmp",-160,0
lsp 701,":a;chara\mob_alice2.bmp",160,0:print 10,500
name "Girl"
>Mother!@>Please let me out of here!@
>Mother!@>Mommy!\
name ""
>A small girl, stuck in a jail, is pounding on the bars holding her.@
>But the solid iron bars don't give an inch no matter how desperately she slams into them.\
name "Monster Lord"
>Wait there for a while, and behave yourself.@
>With your power, you won't be able to destroy those bars.\
>Alice...@> You must live.\
name ""
>The Monster Lord takes one long, loving look at her daughter, stuck in the jail.@
>Then turning her back, she hurries away.\
sean_change "bg149"
lsp 700,":a;chara\mob_alice1.bmp",0,0:print 10,500
>The Monster Lord calmly moves through the corridor toward the throne room.@
lsp 700,":a;chara\mob_alice1.bmp",-200,0
lsp 701,":a;chara\mob_tamamo.bmp",160,50:print 10,500
>In the corridor, a single Kitsune stands in her way.\
name "Monster Lord"
>...Stand aside, Tamamo.@
>I must meet with them.\
name ""
name "Tamamo"
>But Your Majesty...@
>Those Heroes came to take your life!\
name ""
name "Monster Lord"
>Yes.@> That's why I must meet with them.@
>Are you unable to trust in my power as the Monster Lord?\
name ""
name "Tamamo"
>There is no one equal to your power as the Monster Lord.@
>The sword of a mere human Hero wouldn't even inflict a scratch on you.\
>But... If the Monster Lord intends to be killed from the very start, that's an entirely separate matter!\
name ""
name "Monster Lord"
>...As I expected from a trusted friend who has watched over me since I was young.@
>Able to see right through me...\
name ""
name "Tamamo"
>That's why I won't let you pass!@
>Trying to end the strife between humans and monsters with your own death is...\
name ""
name "Monster Lord"
>Tamamo, look into my eyes.@
>Do I look like one walking to my own death?\
name ""
name "Tamamo"
>But... But...\
name ""
skillname "Eyes of Sleep"
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
>The Monster Lord's eyes shine with a radiant light!@
>Intense drowsiness assaults Tamamo!\
skillname ""
name "Tamamo"
>D...Damn...it...\
name ""
name "Monster Lord"
>...Sleep for a little while.\
>Please, you must live for the sake of a peaceful world...@>And... Please...@
>Support my daughter...@> She will need it after losing her mother at such a young age...\
name ""
name "Tamamo"
>N...No...!@
>Th...is...@> Zzzzz....\
name ""
csp 701
lsp 700,":a;chara\mob_alice1.bmp",0,0:print 10,500
>Stepping around the sleeping Kitsune, the Monster Lord continues to the throne room.@
>To wait for the Heroes who have already invaded her castle...\
sean_change "bg141"
>The final decisive battle ends with a final stroke of a sword.@
>A Hero stands before the Monster Lord, collapsed in a pool of her own blood.\
>But the man's face isn't filled with the joy of victory.@
>At the final moment of his attack, he realized the Monster Lord's true intention.\
lsp 700,":a;chara\mob_yuusya.bmp",0,0:print 10,500
name "Hero"
>It can't be...@> The Monster Lord also wished for peace between man and monster...?\
name ""
lsp 700,":a;chara\mob_yuusya.bmp",-160,0
lsp 701,":a;chara\mob_sensi4.bmp",160,0:print 10,500
name "Soldier"
>Damn it, what the hell...?@
>How could it end up like this...\
name ""
lsp 700,":a;chara\mob_zizii.bmp",-160,0:print 10,500
name "Old Wizard"
>The Monster Lord was not an evil being...@
>In that case... Both us and the Monster Lord...\
name ""
lsp 701,":a;chara\mob_souyo.bmp",160,0:print 10,500
name "Female Priest"
>The Monster Lord sacrificed herself for the sake of humans and monsters coexistence.@
>She entrusted us with her dream.\
>Therefore, from now on we...\
name ""
lsp 700,":a;chara\mob_yuusya.bmp",-160,0:print 10,500
name "Hero"
>Wait... I hear something coming!\
>Lazarus, Merlin, Karen!@>Don't let your guard down!\
name ""
lsp 701,":a;chara\mob_alice2.bmp",160,0:print 10,500
name "Girl"
>...............\
name ""
lsp 700,":a;chara\mob_sensi4.bmp",-180,0:print 10,500
name "Soldier"
>A girl...?@> No, a young monster...\
name ""
lsp 700,":a;chara\mob_souyo.bmp",-170,0:print 10,500
name "Female Priest"
>We aren't enemies, girl.@
>We don't want there to be any strife between humans and monsters any longer...\
name ""
bgmstop
name "Girl"
>How...@> How dare you...@> Mother!!@
>I'LL KILL YOU!\
wait 300
dwave 1,"se\bom1.ogg"
flushout 1000
cspl 700,701
bg white,1
gosub *setwindow_01p
name "Hero"
>Uwa!\
name ""
name "Soldier"
>Guh!\
name ""
name "Female Priest"
>Kyaaaa!\
name ""
name "Old Wizard"
>Ahhhgg!\
name ""
csp -1
bg black,10,3000
bg "bg\bg116.bmp",99,5000,"system\lngtwave.dll/vwi"
bgm "bgm\gordport.ogg"
gosub *setwindow_01p
>The next morning...\
name "Luka"
>Eh...? Where am I...?\
name ""
>This is...@> The Gold Port inn, right?@
>After I lost to Granberia, Alice carried me here...?\
name "Luka"
>What was that...? What a strange dream...\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>What are you muttering about, you idiot?@
>Do you not realize your own injuries?\
>Lacerations, burns, a fever...@
>An ordinary person would have died a long time ago.\
name ""
name "Luka"
>If you're looking at me with such scary eyes as those...@> It must be pretty bad...\
name ""
>I push aside the dream for a moment as I try to raise myself up from the bed.\
name "Luka"
>...It looks like that good night's sleep helped a lot, though.\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>...The hell it did!@
>You won't move for a few days, and a complete recovery will take half a month!\
name ""
name "Luka"
>But... Look.@> I'm already fine.\
name ""
>I wave my arms around, showing her I can move just fine.@
>It looks like a good night's rest was enough to cure those horrible injuries from the other day.\
lsp 700,":a;chara\alice_st07b.bmp",67,0:print 10,500
name "Alice"
>Y...You're cured...@
>What the hell is your body made of...?\
>I don't know just what's wrong with you...\
name ""
name "Luka"
>Oi, oi... Stop looking at me like I'm some kind of freak!\
name ""
>How could the Monster Lord be the one to call me strange...?\
name "Luka"
>Anyway, it looks like I managed to get all four of the spirits.@
>Does this mean I can fight with the Four Heavenly Knights on equal terms now?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Don't be in such a hurry, you idiot.@
>You just have the potential for it.\
>Whether you can use that power, or whether it will kill you, is up to you.@
>Besides, you don't even know how to use the power of fire yet.\
name ""
name "Luka"
>The power of fire, eh?@> How do I use it?\
name ""
>As I mutter that to myself...@
bgm "bgm\comi1.ogg"
csp 699
lsp 700,":a;chara\sylph_st21r.bmp",251,190
lsp 701,":a;chara\gnome_st31r.bmp",393,145
lsp 702,":a;chara\undine_st23.bmp",-50,180
lsp 703,":a;chara\salamander_st23.bmp",570,125:print 10,500
>I see the spirits take shape in my heart.\
name "Sylph"
>Yaaay! Everyone's together! \
name ""
name "Gnome"
>..............\
name ""
name "Undine"
>..............\
name ""
lsp 703,":a;chara\salamander_st21.bmp",570,125:print 10,500
name "Salamander"
>I'll teach you how to use my power.\
name ""
name "Luka"
>Oh, thank you.@> That would be really helpful.\
name ""
name "Sylph"
>Its been 500 years since we last got together! @
>Yaaay, I'm so happy! \
name ""
name "Salamander"
>You have to bring your fighting spirit to its utmost limit, and let your spirit explode in a burning blaze of fire.@
>Let that burning spirit of yours take hold in your sword.\
>If you wield that sword of yours with your burning hot spirit...@
>As you are now, the power of your attacks will increase.@> A little.\
name ""
name "Luka"
>...A little!?\
name ""
>Just a little...?@
>I thought it would be more powerful than that...\
name "Sylph"
>I know!@>Let's go on a picnic! @
>I'll make the lunches, and we can climb a mountain! \
name ""
name "Salamander"
>There's also a drawback to using the power of fire.@
>Since your fighting spirit is at its maximum, you obviously wouldn't be able to meditate.\
>In other words... Once you summon me, there's no recovering your health.\
name ""
name "Luka"
>So just to increase my attack a little bit, I lose the ability to recover?@
>That doesn't seem worth it at all...\
name ""
name "Sylph"
>Then when we get to the top, we can all go "Yahoooo!"! @
>After a few seconds, you know, it echoes back! \
>Then you know, you know---\
name ""
lsp 703,":a;chara\salamander_st23.bmp",570,125:print 10,500
name "Salamander"
>...Shut up.\
name ""
dwave 1,"se\fire1.ogg"
lsp 701,":a;chara\gnome_st32r.bmp",394,145
lsp 700,":a;chara\sylph_st24.bmp",75,50:print 10,500
name "Sylph"
>Kyaa!\
name ""
lsp 703,":a;chara\salamander_st21.bmp",570,125:print 10,500
name "Salamander"
>In other words...@>You can't manage my power yet.@
>Honestly, you shouldn't use it in a battle yet.\
name ""
name "Luka"
>I...I got it...\
name ""
>Undine's power was the same at first, too.@
>It looks like I can't use Salamander's power right from the start, either.\
>I need to learn how to use it as soon as possible!\
mov %skill01,13
mov %skill05,0
lsp 703,":a;chara\salamander_st22.bmp",570,125:print 10,500
name "Salamander"
>...Well, there you have it.@
>The day when you see my true value is yet to come.\
name ""
lsp 702,":a;chara\undine_st22.bmp",-50,180:print 10,500
name "Undine"
>...You should be able to do it.@
>You were able to use the most difficult power... The one of water, the most noble attribute.\
>You should be able to easily master the simple, shallow power of fire.\
name ""
lsp 703,":a;chara\salamander_st21.bmp",570,125:print 10,500
name "Salamander"
>...Oh, what was that?\
name ""
lsp 702,":a;chara\undine_st21.bmp",-50,180:print 10,500
name "Undine"
>Giving yourself over to your fighting spirit is such a barbaric method of fighting.@
>How can it be called anything other than simple and shallow?\
name ""
name "Salamander"
>.................\
name ""
name "Undine"
>.................\
name ""
name "Gnome"
>.................\
name ""
lsp 700,":a;chara\sylph_st25.bmp",75,50:print 10,500
name "Sylph"
>Sizzle sizzle...\
name ""
name "Luka"
>Oi, oi!@>Don't fight inside of me!@
>Break it up, that's it!\
name ""
dwave 1,"se\escape.ogg"
cspl 700,703:print 10,500
>The four spirits disperse inside of me.@
>It looks like things have gotten pretty lively...\
bgm "bgm\gordport.ogg"
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...Well, I'll praise you anyway.@
>Good job on being able to attain a serene mind.\
>As a reward, I'll teach you a new skill.\
name ""
name "Luka"
>Could it be one that uses the power of water!?\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>...Yes, that's right.@
>Now that you've mastered that state of mind, you should be able to use it.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
>Listen, first you need to put your sword back into your sheathe.@
>Then entrusting your heart to the flow, you draw it and strike forward in the blink of an eye.\
>In other words, it's the ultimate Iai attack that can only be used with a serene state of mind.\
name ""
name "Luka"
>Hmmhmm... I see...@> That sounds surprisingly simple...\
name ""
>Put my sword back into my sheathe, and let my heart connect to the flow...\
name "Luka"
>Then... Like this?\
name ""
dwave 3,"se\karaburi.ogg"
lsp 2,":c;effect\006a.bmp",0,0:print 1
wait 300
csp 2:print 18,500,"system\mask01.jpg"
vspl 3,650,1
csp 0:csp 1
>Following the flow around him, Luka's sword flashes out!\
lsp 700,":a;chara\alice_st07b.bmp",67,0:print 10,500
name "Alice"
>Wah!!\
for %move=0 to 300 step 20
amsp 699,67,0+%move
amsp 700,67,0+%move
print 1:wait 10
next
name ""
>At the same time Alice falls backward...@
dwave 1,"se\slash4.ogg"
>A giant gash appears in the wall behind where her head was!\
for %move=0 to 300 step 20
amsp 699,67,300-%move
amsp 700,67,300-%move
print 1:wait 10
next
name "Alice"
>...What hell are you doing!?@> Trying to kill me!?\
name ""
name "Luka"
>S...Sorry...@
>I didn't think it would reach that far...\
name ""
>My sword struck out far beyond a normal attack range.@
>Not only that, but the power was insane...\
>...And I made a huge gash in the wall...@
>I'll have to apologize to the innkeeper later...\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>It's because of that special training that you were able to master this attack so quickly.\
>An attack unmatched in speed that can only be performed with a serene state of mind...@
>Its name is Serene Demon Sword.\
name "Luka"
>Serene Demon Sword...\
name ""
>After only around 10 minutes, I understand the basic way to use the skill.\
dwave 1,"se\fanfale.ogg"
mov %skill01,14
>[Serene Demon Sword] learned!\
name "Luka"
>...And what's the horrible back story that goes with it?\
name ""
name "Alice"
>The Monster Samurai Elreena cut an entire group of attackers in half in an instant with that move.@
>She was said to have calmly sheathed her sword as their blood bloomed like bright flowers from their standing lower bodies.\
name ""
name "Luka"
>Erk...\
name ""
>I don't want to think about that spectacle.@
>Given its name, I thought it wouldn't have been quite so... Bloody.\
name "Alice"
>Now then... This skill is a little bit special, so listen to me.\
>Of course you can use this skill like normal.@
>It only takes 2 SP, and it's quite strong.\
name ""
name "Luka"
>That's reassuring.\
name ""
name "Alice"
>But be careful when using it with the power of water summoned.@
>It will be powered up, but will also drain your concentration.\
name ""
name "Luka"
>So it's the same as the other powered up moves...\
name "Alice"
>No, when you use the skill, it will forcibly end your serene state of mind.\
name ""
name "Luka"
>Eh...?@> That seems awfully inconvenient...\
name ""
>Going back into a normal state after attaining that serene state of mind...@
>I suddenly don't really want to use the new skill that much.\
name "Alice"
>Use your head, you idiot.@
>Don't you remember the effect when you use the power of water?\
name ""
name "Luka"
>My evasion and offensive power drastically increases.@
>Oh, and I lose one SP every turn until I'm out.\
name ""
name "Alice"
>That's right... The effect goes away when you're out of SP.@
>In other words, when your SP goes to 0, you go back to normal.\
name ""
name "Luka"
>Ah... If that happens...@
>That sounds really dangerous!\
name ""
>That means I'd have neither Sylph nor Gnome summoned, and have 0 SP.@
>If the enemy is still standing at that point...\
name "Alice"
>In other words... It would be almost suicidal to have the power of water cut at a bad time.\
name ""
name "Luka"
>I see, that's it!@
>If I cut off the power before I drain all of my SP...!\
name ""
name "Alice"
>That's right, the power of water will forcibly be cut off there.@
>Like that, you can protect yourself from a bad situation.\
name ""
name "Luka"
>I see, so that's how it works...\
name ""
>I finally understand what Alice is saying.@
>I can use that attack to cancel the power of water and return to normal.\
>If I don't, I'll be in a really dangerous spot with no SP and no defenses...\
name "Luka"
>I get it Alice.@
>Now I know how important this skill is...\
name ""
>Now I know three skills for three attributes.\
name "Luka"
>All that's left is a skill using the fire attribute...\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...I wouldn't be able to teach you that.@
>You've seen a certain Cursed Sword Skill user use it with your own eyes, didn't you?\
name ""
name "Luka"
>Granberia's ultimate move...\
name ""
>Vaporizing Rebellion Sword...@>The attack Granberia wrecked me with.\
>Each slash seemed like it could have killed me, and there were so many of them...@
>Honestly, there's no way I could imitate that.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>It's a skill that genius Granberia herself worked out.@
>I'm sad to say, but there is no interesting back story to it.\
>Simply because...@
>Victory is almost always decided in her favor before she can use it.\
name "Luka"
>.............\
name ""
>Thinking back, Granberia could have easily beaten me without using that skill...@
>Why did she show it to me?@> Was it a challenge...?\
name "Luka"
>I won't give up...\
name ""
>Granberia is waiting for me in the Monster Lord's castle...@
>I feel my fighting spirit flare up at the thought.\
name "Luka"
>Alright, it's time to look around for a ship to the dangerous continent!\
name ""
>Up until the "Slaughter of Remina", ships were always sailing back and forth.\
>They've stopped now, but I should still ask around.@
>This port town seems awfully suspicious, I bet I could find one...\
name "Luka"
>Alright, let's go!\
name ""
>Alice and I leave the inn.\
r@k@\
dwave 1,"se\asioto2.ogg"
mov %check03,1
csp -1
bg "bg\bg119.bmp",10,1500
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
csp 700:csp 611:cspl 3,7
gosub *city26_main
bg "bg\bg118.bmp",10,1000
gosub *setwindow_01
name "Luka"
>Excuse me... I'm looking for a ship to the northern continent.\
name ""
lsp 699,":a;chara\mob_hunanori.bmp",-160,0
lsp 700,":a;chara\mob_hunanori.bmp",160,0:print 10,500
name "Sailor A"
>Hey, hey... You think we want to die?\
name ""
name "Sailor B"
>Besides, that continent is surrounded by mountains.@
>There's nowhere to land a ship.\
name ""
name "Luka"
>Damn, it looks like I'll need to hire a smuggler then...\
name ""
name "Sailor A"
>Even a hired smuggler wouldn't do it.@
>There's just no way to land on that continent with a ship.\
name ""
name "Luka"
>Then... How did it work before the "Slaughter of Remina"?\
name ""
name "Sailor B"
>The Garuda Girl would pick stuff up and carry it over.\
>Boats would sail close to the island near Remina, and the Garuda Girl would fly down from the mountains and pick the people and cargo up.\
>Like that, she would carry stuff into the city.\
name ""
name "Luka"
>So where is this Garuda Girl now?\
name ""
name "Sailor A"
>Nobody has seen her since Remina was destroyed.@
>She was probably killed with the others in the slaughter.\
name ""
name "Sailor B"
>...Shut up, you idiot!@> That's a Hero!\
>Don't say something stupid!\
name ""
name "Luka"
>Eh...?\
name ""
>The other sailor yells at his crew mate, who goes silent.\
name "Sailor A"
>...........\
>A...Ah, nothing, never mind.@
>We don't know anything, sorry.\
name ""
name "Sailor B"
>Now then Mr. Hero, can you run along?@
>We got work to do...\
name ""
name "Luka"
>.............\
name ""
>I think I have an idea about why his crew mate cut him off.@
>I decide on my feelings, and start to talk to them again.\
name "Luka"
>...I didn't get baptized.@>I'm not a Hero.\
>And that story about the "Slaughter of Remina"... I've heard stories that go against what is usually told.@
>Please, will you tell me what you know...?\
name ""
name "Sailor A"
>I see... So you've heard it, too?@
>It's a pretty nasty story, so we keep quiet about it.\
>The story was told that the monsters slaughtered the humans in Remina...@
>But that probably isn't right.\
>...It wasn't just the humans.@>The monsters were slaughtered too.@
>All the monsters living there were probably exterminated.\
name ""
name "Luka"
>Why were they all killed...?@> Do you know?\
name ""
name "Sailor A"
>It's a popular story among the sailors in this town.\
>None of the monster birds were flying that day.@
>Shortly after, the corpses of monsters started washing up...\
>It wasn't monsters that attacked the town.@> It was something else...\
name ""
name "Luka"
>.............\
name ""
>So it's true, the monsters were slaughtered in Remina as well...@
>I was still a little bit in doubt after Alice's story, but this confirms it.\
>Just what in the hell happened in Remina...?\
name "Sailor A"
>No more talking, or we'll get yelled at by the Captain.@
>Even if you want to go to the northern continent, we can't do anything.\
name ""
name "Sailor B"
>It's impossible to make it there by ship.@
>Unless you're gonna sprout wings, give it up.\
name ""
name "Luka"
>I...I see...\
name ""
>I can't get to the Monster Lord's castle if I can't get over those sea cliffs.@
>Instead of finding a way over from the port, it feels like I just got even further away...\
dwave 1,"se\asioto2.ogg"
sean_change "bg119"
name "Luka"
>Hrrrrmmm...\
name ""
>I try to think over things as I walk down the street.\
name "Luka"
>If I got close to the cliff by boat, maybe I can make it over on foot...\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Are you an idiot?@>That's a perfect recipe for a shipwreck.\
name ""
name "Luka"
>So it's really impossible unless I can fly...?@
>Then maybe I can use Sylph...\
name ""
name "Alice"
>What, you think you can make a huge tornado and jump into it to fly?@> You don't have either the physical strength or the magical power.\
name ""
name "Luka"
>Hrrrmmmm...\
name ""
>Alice might be able to hold me and carry us across, but I can't ask her that.@
>To have the Monster Lord transport the Hero to the Monster Lord's castle is just ridiculous.\
>Now then, what should I do...?\
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>It looks like you have no choice but the Garuda Girl.@
>With that monster's strength, she can easily carry you.\
name ""
name "Luka"
>Garuda Girl...?@
>Wasn't she killed in the Slaughter of Remina?\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>There's a small shrine in the west called the "Holy Wings Shrine".@
>In there, a legendary bird god's egg sleeps.\
>That should be more than enough to carry both you and I on its back.\
name ""
name "Luka"
>Legendary bird god...@>It would be able to take us across?@
>But what do you mean the egg "sleeps"?\
name ""
name "Alice"
>The legendary bird is very powerful, and is able to fly all over the world.@
>To prevent its power from being exploited, it seals its young into an egg.\
>The key to awaken it is put into six orbs, which are spread all over the world.@
>Only someone capable of gathering all six is worthy of reviving it from its slumber and requesting its aid.\
name ""
mov %item01,10
if %item02+%item05+%item06=0 goto *sean0244
if %item02+%item05+%item06=1 goto *sean0245
if %item02+%item05+%item06=2 goto *sean0246
if %item02+%item05+%item06=3 goto *sean0247



*sean0244

name "Luka"
>Six orbs...?\
name ""
name "Alice"
>Red, yellow, green...@
>Then silver, purple and blue.\
>You can't revive the holy bird without those six orbs.\
name ""
name "Luka"
>And those six are scattered all over the world...?@> That sounds really annoying...\
name ""
>But I don't have a choice.@
>If I don't get all six, I won't be able to make it to the northern continent.\
goto *sean0248



*sean0245

name "Luka"
>Orb...?@>Like this?\
name ""
if %item02=1 mov $sel1,"Red Orb":mov $sel2,"I got this after that issue with the bandits..."
if %item05=1 mov $sel1,"Yellow Orb":mov $sel2,"I got this from the Sphinx in the pyramid."
if %item06=1 mov $sel1,"Green Orb":mov $sel2,"I got this after winning that tournament."
>I take out the strange orb I got earlier.@
eng $sel2:$sel6\
name "Alice"
>Yes, that is one of the six orbs.@
>You can't revive the Holy Wings without the other five.\
name ""
name "Luka"
>I have to find five more?@>That sounds annoying...\
name ""
>But I don't have a choice.@
>If I don't get all six, I won't be able to make it to the northern continent.\
goto *sean0248



*sean0246

if %item02=0 mov $sel1,"I take out the Yellow Orb and Green Orb":mov $sel2,"Green Orb"
if %item05=0 mov $sel1,"I take out the Red Orb and Green Orb":mov $sel2,"Green Orb"
if %item06=0 mov $sel1,"I take out the Red Orb and Yellow Orb":mov $sel2,"Yellow Orb"
name "Luka"
>Orb...?@>Like these?\
name ""
eng $sel1:$sel6\
>I've kept them in my bag without knowing what they were for.\
name "Alice"
>Yes, those are two of the six.@
>But you need all of them to revive the Holy Wings.\
name ""
name "Luka"
>I have to find four more?@>That sounds annoying...\
name ""
>But I don't have a choice.@
>If I don't get all six, I won't be able to make it to the northern continent.\
goto *sean0248



*sean0247

name "Luka"
>Orb...?@>Like these?\
name ""
>I take out the Red, Yellow and Green Orbs I had in my bag.@
>I've kept them in my bag until now without knowing what they were for.\
name "Alice"
>Yes, those are them.@> You were lucky to collect half of them by accident...@
>But you still need the other three to revive the Holy Wings.\
name ""
name "Luka"
>I have to find three more?@> That sounds annoying...\
name ""
>But I don't have a choice.@
>If I don't get all six, I won't be able to make it to the northern continent.\
goto *sean0248



*sean0248

name "Luka"
>Then I guess I should start looking for information on the orbs...\
name ""
name "???"
>Did someone call!?\
name ""
name "Luka"
>Y...You...!\
name ""
bgmstop
bgmonce "bgm\battlestart.ogg"
lsp 700,":a;chara\amira_st11.bmp",0,100:print 10,1500
eng "Mysterious Garbage Can appears!":$sel6/
wait 300
delay 4000
bgm "bgm\amira.ogg"
\
name "Luka"
>...Who?\
name ""
lsp 700,":a;chara\amira_st12.bmp",0,100:print 10,500
name "Amira"
>It's me, Darling.\
name "Luka"
>...What are you doing?\
name ""
name "Amira"
>This town is the headquarters of Ilias Kreuz, isn't it?@
>I'm hiding.\
name ""
name "Luka"
>I'm impressed you managed to fit in there, actually.\
name ""
name "Amira"
>Getting in wasn't too hard.@>But I fear getting out will be...@
>Anyway, you desired information on the orbs?\
name ""
>That reminds me... Alice asked in Grangold for information on the orbs.\
>She already knew this was going to happen back then, then?@
>I need to thank her for being so prepared.\
name "Luka"
>Yes, please.\
name ""
name "Amira"
>Then it's time for me to show off my information obtained from crawling all across the world.\
>An incredibly wealthy merchant in Iliasburg had the Red Orb...@
>But it seems as though he was robbed by the bandit group.\
name ""
mov %hanyo1,0
if %item02+%item05+%item06=3 mov %hanyo1,1
if %item02=0 goto *sean0248a
if %item02=1 goto *sean0248b



*sean0248a

name "Luka"
>The bandit group...?@> I heard about them when I was in Iliasburg...\
name ""
>That reminds me, Amira had asked me to deal with them back then.@
>But I was so busy, I forgot all about it.\
name "Amira"
>So I rushed into the bandit group's hideout.@
>I fought a huge Lamia, a terrifying Vampire, and a ferocious Dragon.\
>The battles were fierce, but I managed to win.\
name ""
>Amira spits out the Red Orb from her mouth!\
name "Luka"
>Hey, is that...!?\
name ""
name "Amira"
>I shall give this to a Hero.@
>Take it!\
name ""
dwave 1,"se\fanfale.ogg"
mov %item02,1
>Red Orb obtained!\
name "Luka"
>Not just information, but bringing the item itself...@
>And you even managed to defeat a Vampire and a Dragon...\
name ""
>I'll need to thank Amira for this somehow.\
name "Amira"
>The Yellow Orb sleeps in a pyramid to the west...\
name ""
if %item05=0 goto *sean0248c
if %item05=1 goto *sean0248d



*sean0248b

name "Luka"
>...I have that one.\
name ""
>After I punished the little bandits, they gave it to me.\
name "Amira"
>The Yellow Orb sleeps in a pyramid to the west...\
name ""
if %item05=0 goto *sean0248c
if %item05=1 goto *sean0248d



*sean0248c

name "Amira"
>Following the information trail, I snuck into the pyramid.@
>Lo and behold, I came across the legendary Sphinx!\
>But since I looked so anxious and depressed...@
>She gave me some advice, and handed me the orb!\
name ""
>Amira spits out the Yellow Orb from her mouth!\
dwave 1,"se\fanfale.ogg"
mov %item05,1
>Yellow Orb obtained!\
name "Luka"
>You really are amazing...\
name ""
name "Amira"
>My persuasion skills are already at MAX level.\
name ""
name "Amira"
>Then I heard about a royal treasure known as the Green Orb in Grand Noah Castle...\
name ""
if %item06=0 goto *sean0248e
if %item06=1 goto *sean0248f



*sean0248d

name "Luka"
>I have that one...\
name ""
>I got it after passing the Sphinx's trial with Sara.\
name "Amira"
>Then I heard about a royal treasure known as the Green Orb in Grand Noah Castle...\
name ""
if %item06=0 goto *sean0248e
if %item06=1 goto *sean0248f



*sean0248e

name "Luka"
>Grand Noah Castle, eh...?@
>That reminds me, it was the prize of that tournament, wasn't it?\
name ""
>It must be in the hand of the champion by now.\
name "Amira"
>The champion of the tournament seemed to have left without collecting the prize.\
>So I suspected the Orb was still sitting in the castle...@
>I resolved myself, and broke into the castle...@
>As for the result... Here.\
name ""
>Amira spits out the Green Orb from her mouth!\
dwave 1,"se\fanfale.ogg"
mov %item06,1
>Green Orb obtained!\
name "Luka"
>Y...You stole it...?@
>The Castle must be in an uproar...\
name ""
name "Amira"
>I put a 20 gold glass bead in its place.@
>It looks similar, they'll never know.@>Gehehe.\
name ""
name "Luka"
>..............\
name ""
>I think I underestimated Amira.@
>This snake thing is pretty amazing...\
goto *sean0248h



*sean0248f

name "Luka"
>I have that one...\
name ""
>After winning the tournament, I got it as the prize.\
if %hanyo1=1 goto *sean0248g
if %hanyo1=0 goto *sean0248h



*sean0248g

name "Amira"
>My information isn't useful at all...\
name ""
name "Luka"
>Well, don't let it get to you...\
name ""
name "Amira"
>I was planning on getting the orbs themselves in addition to the information...\
>That explains why I couldn't find them...@
>As an apology, please take this.\
name ""
>Amira spits out a giant jewel from her mouth!\
name "Luka"
>Wh...What is this?\
name ""
>This thing looks really expensive.@
>What's she doing with this...?\
name "Amira"
>I found this while I was looking for the Orbs.@
>It's called the Jewel of Victory. Please take it.\
name ""
name "Luka"
>Thanks, I'll uh...@> Treasure it.\
name ""
>I pick up the saliva covered jewel.\
dwave 1,"se\fanfale.ogg"
mov %item18,1
>Jewel of Victory obtained!\
name "Amira"
>Then let me return to the Orb information...\
name ""
goto *sean0248h



*sean0248h

name "Amira"
>The legendary pirate Selene seemed to hold the Purple Orb last.\
>Out of all her treasure, it seems she valued it the most.\
name ""
name "Luka"
>That Captain Selene did...?\
name ""
>I remember that cave back in Iliasport...@
>That's where I got the Poseidon's Bell, one of her treasures.\
name "Luka"
>So is the Purple Orb back in that cave in Iliasport, too?\
name ""
name "Amira"
>...Sadly, it doesn't seem to be.\
>According to the legend, Captain Selene took it with her on her final journey.\
>She vanished during that voyage...@
>So nobody knows what happened to it.\
name ""
name "Luka"
>Then... Does that mean it's on the bottom of the sea somewhere?\
name ""
name "Amira"
>It could be...\
name ""
name "Luka"
>That's hopeless, then...\
name ""
name "Amira"
>There also isn't any information on the Blue or Silver Orbs either...@
>Their locations are a mystery.\
name ""
name "Luka"
>I see... I understand, thank you Amira.\
name ""
name "Amira"
>Then I shall return to the world of garbage.@
>If I find anything useful, I'll be sure to tell you.\
name ""
lsp 700,":a;chara\amira_st11.bmp",0,100:print 10,500
>Amira silently stares at me as she slowly sinks back into her garbage can.@
>I stand in front of the garbage can for a second, expecting something to happen.\
>After a few moments, I just walk away.\
bgm "bgm\gordport.ogg"
csp 700:print 10,500
dwave 1,"se\asioto2.ogg"
name "Luka"
>Hrrmm... What to do...?\
name ""
>There's no information at all on the Blue and Silver Orbs.@
>The only information is on the Purple Orb...\
>And the location of that is hopeless.@
>It's probably sitting at the bottom of the sea somewhere...\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>...I know where the Blue and Silver Orbs are.\
name ""
name "Luka"
>Eh...?@> Where?\
name ""
if %ivent04=1 skip 9
name "Alice"
>...There are shrines at the bottom of the sea.@
>There's a Queen in each that rules that section of the sea.@>An Orb is entrusted to each.\
name ""
name "Luka"
>Why do the Queens have Orbs...?\
name ""
goto *sean0249
name "Alice"
>Don't you remember the Queen at the bottom of the sea talking about an Orb?\
name ""
name "Luka"
>Ah... Now that you mention it, she was!\
name ""
>She thought I was there to steal some Orb, and attacked me when I was there.\
name "Luka"
>I see... So the Queen at the bottom of the sea is guarding the Orbs...?\
name ""
name "Alice"
>It would be troublesome for humans to revive the Holy Wings.@
>That's why the Orbs are entrusted to Monster Queens.\
>So putting them at the bottom of the sea was a good location.\
name ""
name "Luka"
>I see...\
name ""
name "Alice"
>The Blue Orb is at the South Sea Shrine that you went to before.@
>But the Silver Orb is at the North Sea Shrine.\
name ""
name "Luka"
>Bottom of the sea to the north...?\
name ""
name "Alice"
>There's a boundary between the North and South seas, and the two Queens rule over each section.\
>The Queen over the North Sea guards the Silver Orb at the seafloor there.\
name ""
name "Luka"
>I see, I get it...\
name ""
>The bottom of the Northern Sea...@>It looks like I need to get there somehow for the Silver Orb.\
>So now I know where the Blue and Silver orbs are.@
>Now the problem is the Purple one...\
goto *sean0249



*sean0249

name "Luka"
>Perhaps I should look for where Selene's ship might have sunk.\
name ""
>Gold Port is where Captain Selene's pirates were headquartered out of.@
>Maybe I'll learn more if I ask around town...\
r@k@\
mov %check03,2
mov %hanyo1,0
if %ivent06=0 mov %hanyo2,1
if %ivent06=1 mov %hanyo2,0
mov %hanyo3,0
csp -1
bg "bg\bg119.bmp",10,1500
bgm "bgm\gordport.ogg"
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
csp 700:csp 611:cspl 3,7
gosub *city26_main
bgm "bgm\field3.ogg"
bg "bg\bg099.bmp",10,1000
gosub *setwindow_01
name "Luka"
>I only need to find three Orbs.@
>The Blue and Silver ones are at the bottom of the sea...\
name ""
if %ivent04=0 gosub *sean0248i:skip 4
>I have to go to the bottom of the sea for them.@
>But I gave that "Ball of Guidance" back to Meia.\
>So the first thing I need to do is get that again so I can breathe underwater...\
name "Luka"
>For the Purple Orb, I'll talk to that strange woman again...\
name ""
>I get the feeling she knows something about Captain Selene.@
>She may know where her ship sank.\
>I should meet with her soon...\
if %ivent06=0 skip 7
name "Luka"
>And lastly, Sara...\
name ""
>Vanished again...@
>Is it a misunderstanding like last time?@> Or...?\
>I should go to Sabasa Castle to check it out, I guess.\
name "Luka"
>Now then... Where should I go to first?\
name ""
r@k@\
mov %check03,3
mov %genzaiti,19
mov %gloval1_story_sinkou,9:gosub *savegloval1
goto *map6



*sean0248i

name "Luka"
>Alice, how do I get to the bottom of the sea?@
>If it's in the ocean, I don't think I can just get there normally...\
name ""
lsp 700,":a;chara\alice_st11b.bmp",0,0:print 10,500
name "Alice"
>Well, you just need to sink down there.@
>As long as you can withstand the pressure, you only need to hold your breath for about an hour.\
name ""
name "Luka"
>I can't do that.@> Isn't there a special way to get down there...?\
name ""
lsp 700,":a;chara\alice_st14b.bmp",0,0:print 10,500
name "Alice"
>...Sheesh, being human sure is inconvenient.@
>Maybe you should consult a Mermaid?\
>I heard that when they get married, they take their husbands to the bottom of the sea for something.@
>So they must have a way to get them down there.\
name ""
name "Luka"
>I see... Talk to a Mermaid...@
>I guess I should go to Port Natalia for that.\
name ""
csp 700:print 10,500
>There are a lot of Mermaids there.@
>I guess I should ask around.\
return



*sean0252

gosub *genzaiti_bg
name "Luka"
>Alright, let's go to Port Natalia!\
name ""
>First I should ask a Mermaid about how to get to the bottom of the sea...\
dwave 1,"se\asioto2.ogg"
bgmstop
sean_change "bg037"
bgm "bgm\city1.ogg"
>Riding in a horse carriage, we quickly return back to Port Natalia.@
>Just like before, there are a lot of Mermaids around.\
lsp 700,":a;chara\meia_st21.bmp",50,50:print 10,500
name "Mermaid"
>Freshly made fried sea slugs! Get them here!\
name ""
>Still selling her disgusting sounding food...\
name "Luka"
>Excuse me...@> Do you know about a shrine on the bottom of the sea?\
name ""
name "Mermaid"
>Yes, of course.@
>Every sea monster knows about them.\
name ""
name "Luka"
>I want to go there...@>Do you know how a human could make it there?\
name ""
name "Mermaid"
>Sure, just use this Ball of Guidance.@
>It will create a beam of light that you can follow into the sea.\
name ""
>The Mermaid takes out a beautiful looking stone.\
name "Luka"
>What a useful item...@
>Could you let me borrow it...?\
name ""
name "Mermaid"
>Sure, I'll sell you one for 5000 gold.\
name ""
name "Luka"
>.............\
name ""
>It's something you can just sell...?\
name "Luka"
>Alright, I'll buy it.\
name ""
name "Mermaid"
>Thank you!\
dwave 1,"se\kaimono.ogg"
name ""
mov %item04,4
>Thus, I buy the Ball of Guidance and head out toward the shore.\
dwave 1,"se\asioto2.ogg"
bgmstop
sean_change "bg039"
bgm "bgm\field3.ogg"
name "Luka"
>I'm sure she said that this was the place...\
name ""
>I raise the Ball of Guidance above me...\
dwave 1,"se\light.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,600
csp 2:print 10,600
>A bright light shoots off the item, and lands on the surface of the sea.@
>The light seems to be piercing right through the water, into the depths.\
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Luka"
>I see... It seems like I should just follow this light.\
name ""
>I follow along the beam of light into the sea.\
sean_change "bg053"
bgm "bgm\dungeon1.ogg"
lsp 700,":a;chara\kraken_st01.bmp",0,0:print 10,500
>After swimming down to the deepest part of the sea, we come to a huge monster.@
>This must be the Queen of the South Seas, protecting the Orb.\
name "Kraken"
>I am the Queen of these southern seas.@
>What business does a human have with me?\
name ""
name "Luka"
>Uhm... Could you let me have the Blue Orb?\
name ""
>I ask her straight out.@
>She replies just as straight.\
name "Kraken"
>No.@>Go away.\
name ""
>I thought she would refuse me...@
>Also, I can't use power to forcibly take it.@> That's unthinkable for a Hero.\
name "Luka"
>Please, isn't there anything I can do...?\
name ""
name "Kraken"
>No matter how many times you beg, I cannot give you the Orb.@
>I was given custody of this by the Monster Lord...\
name ""
lsp 699,":a;chara\alice_st91.bmp",-60,0
lsp 700,":a;chara\alice_st01.bmp",-60,0
lsp 701,":a;chara\kraken_st01.bmp",160,0:print 10,500
name "Alice"
>Then how about if it was an order from the Monster Lord?\
name ""
>Suddenly, Alice appears.\
name "Kraken"
>Y...Your Majesty!?@
>Why are you in a place like this!?\
name ""
name "Alice"
>We've been leaving the Orbs in the undersea Queens' possession to protect them from stupid humans.@
>Well, this human is stupid too, but he isn't a bad human.\
>For the sake of the future, I want you to consider handing over the Orb to this human.\
name ""
name "Kraken"
>...........\
name ""
>The Kraken goes silent for a while.\
name "Kraken"
>...I understand, I'll hand over the Orb.@
>If I refused, it would harm the Monster Lord's honor.\
name ""
>Thus, the Kraken hands the Orb over to me!\
dwave 1,"se\fanfale.ogg"
mov %item07,1
>Blue Orb obtained!\
name "Luka"
>...Thank you.@
>I'll make good use of this Orb for the sake of our future.\
name ""
name "Kraken"
>I'll be expecting things from the human the Monster Lord believes in.@
>Now, please go.\
name ""
>Thus, we leave the shrine under the Southern Sea.\
goto *sean0257



*sean0253

gosub *genzaiti_bg
name "Luka"
>Alright, let's go to Port Natalia!\
name ""
>If I borrow that Ball of Guidance from Meia again, I can get to the bottom of the sea...\
dwave 1,"se\asioto2.ogg"
bgmstop
sean_change "bg037"
bgm "bgm\city1.ogg"
>Riding in a horse carriage, we quickly return back to Port Natalia.@
>Just like before, there are a lot of Mermaids around.\
name "Luka"
>This is Meia's house, isn't it...?\
>Meia!@>Are you home!?\
name ""
dwave 1,"se\knock.ogg"
>As I knock on the Mermaid's door...\
lsp 700,":a;chara\meia_st01.bmp",50,50:print 10,500
name "Meia"
>Who is it...?@>Ah, it's you!\
name ""
>Meia opens the door with a smile.\
lsp 700,":a;chara\meia_st03.bmp",50,50:print 10,500
name "Meia"
>Why if it isn't the Hero!@
>Come in, come in!\
name ""
name "Luka"
>Ah... Thanks...\
name ""
>Just like before, I follow the slightly forceful Mermaid's offer.\
sean_change "bg049"
lsp 700,":a;chara\meia_st01.bmp",50,50:print 10,500
name "Meia"
>So what did you stop by for?\
name ""
name "Luka"
>Ah... I was wondering if I could borrow the Ball of Guidance again.@
>I need to get to the bottom of the sea...\
name ""
name "Meia"
>Oh, I'll just give it to you.@
>I don't need it anymore, after all.\
name ""
>Meia takes out the Ball of Guidance from her closet and hands it to me.\
dwave 1,"se\fanfale.ogg"
mov %item04,4
>Ball of Guidance obtained!\
lsp 699,":a;chara\alice_st91b.bmp",-120,0
lsp 700,":a;chara\alice_st11b.bmp",-120,0
lsp 701,":a;chara\meia_st01.bmp",200,50:print 10,500
name "Alice"
>Hmph. We're done here.@
>Let's hurry up and go.\
name ""
name "Luka"
>...Oi, that's pretty rude, isn't it?\
name ""
name "Alice"
>Oh, I'm sorry.@> Did you want another blowjob from a Mermaid?\
name ""
name "Luka"
>N...n...n...o!\
>Err how do you know about that!?\
name ""
lsp 701,":a;chara\meia_st03.bmp",200,50:print 10,500
name "Meia"
>Oh my. @
>If you want one, you just need to ask. \
name ""
name "Luka"
>N...No thanks!@
>Let's go Alice, we're done here!\
name ""
name "Alice"
>Now who's the rude one, refusing such a kind offer as that?\
name ""
lsp 701,":a;chara\meia_st04.bmp",200,50:print 10,500
name "Meia"
>Oh, are you already leaving?\
name ""
name "Luka"
>Thank you very much!@> Goodbye!\
name ""
>I jump out of Meia's house and make my escape.\
dwave 1,"se\asioto4.ogg"
bgmstop
sean_change "bg039"
bgm "bgm\field3.ogg"
name "Luka"
>Ah, I remember this beach.\
name ""
>This is where I was walking last time I was heading down to the bottom of the sea.@
>It wasn't that long ago, but it still feels nostalgic.\
>Back then, I didn't even know about the spirits...@
>It feels like an eternity ago.\
name "Luka"
>...Why am I getting all emotional.@
>I'm not even near the end of my journey yet.\
name ""
>I shake my head and throw off the odd thoughts.@
>As I start to raise the Ball of Guidance into the air...\
r@k@\
goto *kani2_start



*sean0256

bgm "bgm\field3.ogg"
r@k@\
name "Luka"
>...Got it now?@> Stop doing bad things.\
name ""
>I scold the crab crawling around my feet.\
name "Luka"
>Stop doing bad things, and start living a lit---@
dwave 1,"se\damage.ogg"
>Ouch!\
name ""
dwave 1,"se\escape.ogg"
>The crab pinches my foot then scurries off.\
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>What are you doing, you idiot?\
name ""
name "Luka"
>Reliving the past, apparently.\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...Idiot.\
name ""
name "Luka"
>At least don't say it twice in a row...\
name ""
>I mutter to myself as I raise the Ball of Guidance into the air.\
dwave 1,"se\light.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,600
csp 2:print 10,600
>Just like before, a dazzling light shoots into the water, down into the depths of the sea.\
name "Luka"
>Alright, let's go!\
name ""
>I pull myself together and dive into the water.\
sean_change "bg053"
bgm "bgm\dungeon1.ogg"
>Unlike last time, we make it all the way to the bottom without being attacked.@
>Finally reaching the bottom, we head into the shrine.\
lsp 700,":a;chara\kraken_st01.bmp",0,0:print 10,500
>Just like before, the Kraken is there.\
name "Kraken"
>Oh? You two are...@
>...Ah, of course.@>The Hero and the silver haired monster that I married.\
name ""
lsp 699,":a;chara\alice_st91.bmp",-60,0
lsp 700,":a;chara\alice_st03.bmp",-60,0
lsp 701,":a;chara\kraken_st01.bmp",160,0:print 10,500
name "Alice"
>No!@>That's wrong!\
name ""
>Quick to misunderstandings as usual, I see.@
>Is this Queen senile...?\
lsp 700,":a;chara\alice_st01.bmp",-60,0:print 10,500
name "Alice"
>Sheesh... Next time you say something that stupid, I'll deep fry you.\
name ""
name "Kraken"
>Ah...Ah, that's right... Forgive me, Your Majesty.@
>So what business do you two have here today?\
name ""
name "Luka"
>I came here to borrow the Blue Orb...\
name ""
>Last time I came here, she fought me because she thought I was after the Orb.@
>Will she just hand it over to me this time...?\
name "Kraken"
>Hrrm... The Orb is the treasure of this shrine.@
>But you came all the way here once before for the sake of a man and monster getting married, didn't you?\
>As the Queen of the Southern Seas, I must repay that.@
>I'll let you borrow the Blue Orb.\
name ""
>The Kraken hands me the Blue Orb.\
dwave 1,"se\fanfale.ogg"
mov %item07,1
>Blue Orb obtained!\
name "Luka"
>Th...Thank you!\
name ""
name "Kraken"
>I'm not just giving this to repay a favor.@
>I'm also entrusting my hopes with you.\
>A time when monsters and humans don't hate each other...@
>I believe that both you and the Monster Lord are capable of changing something.\
name ""
lsp 700,":a;chara\alice_st04.bmp",-60,0:print 10,500
name "Alice"
>...Hmph.\
name ""
name "Luka"
>I'll make use of this Orb for the sakes of both humans and monsters.\
name ""
name ""
name "Kraken"
>Like the Monster Lord, I'll be expecting great things from you, human.@
>Now allow me to send you off...\
name ""
name "Luka"
>N...No thank you!@>I can go back by myself!\
name ""
>I don't want to be thrown onto the beach again like last time.@
>I escape from her before she manages to "help" me off.\
goto *sean0257



*sean0257

bgmstop
sean_change "bg120"
bgm "bgm\field3.ogg"
>Next is the Silver Orb, at the bottom of the North Sea.@
>I heard that you can get there from the beach near Gold Port.\
>Thus, we traveled to the beach near Gold Port.\
name "Luka"
>I guess I just raise it like before...\
name ""
>As I raise the Ball of Guidance into the air...\
dwave 1,"se\light.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,600
csp 2:print 10,600
>A dazzling light shoots out, deep into the sea!\
name "Luka"
>Alright, let's go!\
name ""
>The two of us head into the light, and make our way down.\
bgmstop
sean_change "bg050"
bgm "bgm\umi2.ogg"
>Unlike the Southern Sea, this area is close to the dangerous northern continent.@
>The monsters in the sea might be a lot stronger, too...\
name "Luka"
>Hmm...?@>Something's coming...\
name ""
>I see something approaching our beam of light from way off in the distance.\
r@k@\
goto *dagon_start



*sean0259

bgm "bgm\umi2.ogg"
r@k@\
name "Luka"
>That was dangerous...@
>To think there was a monster that would mimic a Mermaid...\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>I'm surprised you didn't go swimming right to it, once you saw it was a Mermaid.\
name ""
name "Luka"
>...Don't say that.@
>Hey, look, I see the shrine.\
name ""
>I see a building that looks similar to the one in the Southern Sea.@
>That must be where the Silver Orb is.\
name "Luka"
>I wonder if she'll just give me the orb...?\
name ""
>I head to the shrine, slightly uneasy about what's going to happen.\
sean_change "bg053"
bgm "bgm\dungeon1.ogg"
>It looks almost the exact same as the other shrine.@
>And right in the same area, the Queen of the Northern Sea is waiting...\
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\poseidones_st01.bmp",0,0:print 10,500
>A huge monster, with an aggressive looking body is waiting.@
>She looks a lot more reliable than the other Queen...\
name "Poseidoness"
>...I am the ruler of these seas, Poseidoness.@
>And you must be a thief who came for the orb?\
name ""
name "Luka"
>Eh...?@> No!\
name ""
>Is this Queen just as ditzy and quick to jump to misunderstandings as the last one!?@
>She suddenly attacks me before I can say anything else!\
r@k@\
goto *poseidones_start



*sean0261

bgm "bgm\umi2.ogg"
r@k@\
name "Luka"
>I didn't come to steal the Orb.@
>Just...\
name ""
name "Poseidoness"
>...I know, Luka.@
>Why you came here, and everything.\
name ""
name "Luka"
>Eh...?\
name ""
name "Poseidoness"
>I got a message from the Queen of the Southern Sea about a Hero.@
>"Help him if you can"... It said.\
>But I wanted to test you myself.@
>So I decided to have a quick bout with you.\
name ""
name "Luka"
>Oh, so that's what it was...@
>I thought you really mistook me for a thief.\
name ""
name "Poseidoness"
>Of course...@
>If I defeated you, I never would have recognized you.\
>I intended to just punish you as if you were a simple thief.\
name ""
name "Luka"
>.............\
name ""
>This Queen is really scary.\
name "Poseidoness"
>But your sword showed me your power.@
>You are a superior warrior, and are worthy of the Silver Orb.\
name ""
>Poseidoness holds out the Orb to me.\
name "Poseidoness"
>This is what you wanted.@
>Now take it.\
name ""
name "Luka"
>Th...Thank you!\
name ""
>I take the Orb, and place it in my bag.\
dwave 1,"se\fanfale.ogg"
mov %item08,1
>Silver Orb obtained!\
name "Poseidoness"
>And Alipheese, it has been quite a while.\
name ""
lsp 699,":a;chara\alice_st91.bmp",-60,0
lsp 700,":a;chara\alice_st01.bmp",-60,0
lsp 701,":a;chara\poseidones_st01.bmp",160,0:print 10,500
name "Alice"
>Hmph... Thank you for guarding these Northern Seas.\
name ""
name "Poseidoness"
>Ah... Thank you for your kind words, Your Majesty.\
name ""
>These kinds of exchanges always catch me off guard.@
>After traveling with her for so long, I forget that Alice really is the Monster Lord, with subjects and everything.\
cspl 699,701
lsp 700,":a;chara\poseidones_st01.bmp",0,0:print 10,500
name "Poseidoness"
>Hero Luka, I expect great things from you.@
>I pray you bring some light to this world of strife.\
>Never let that sword of yours waver and stray from your path.\
name "Luka"
>Y...Yes!\
name ""
>It looks like she really is a lot more reliable than the Southern Queen.@
>The whole thief thing was just a test.\
name "Poseidoness"
>Now then, allow me to see you off...\
name ""
dwave 1,"se\ero_makituki2.ogg"
>One of Poseidoness' tentacles starts to approach my body.@
>She... She wouldn't!?\
name "Luka"
>N...No thank you!@>I'll return on my own!\
name ""
>...She is the same!@>I hurry away from the shrine.\
bgmstop
sean_change "bg039"
bgm "bgm\field3.ogg"
>I've got the Blue and Silver Orbs now...@
>Where should I head to next?\
r@k@\
mov %genzaiti,14
mov %gloval1_story_sinkou,9:gosub *savegloval1
goto *map6



*sean0262

lsp 700,":a;chara\serene_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Woman"
>Hehe... So you came.@
>I've been looking for a Hero like you for a long time...\
lsp 700,":a;chara\serene_st02.bmp",0,0:print 10,500
>A talented warrior...@
>And further, you're interested in Captain Selene, right...?\
name ""
name "Luka"
>Ah... Yes...\
name ""
>It doesn't look like she's just going to give me information...@
>It seems like she wants something from me, too...\
lsp 700,":a;chara\serene_st01.bmp",0,0:print 10,500
name "Woman"
>I'm Selena.@>And you two?\
name ""
name "Luka"
>Err... I'm the Hero Apprentice Luka.\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-110,0
lsp 701,":a;chara\serene_st01.bmp",160,0:print 10,500
name "Alice"
>...The Traveling Gourmand, Alice.\
name ""
name "Selena"
>Then, would you come to my house...?@
>We can talk some more there.\
name ""
name "Luka"
>S...Sure...\
name ""
>We follow Selena to her house.\
dwave 1,"se\asioto2.ogg"
sean_change "bg123"
lsp 700,":a;chara\serene_st01.bmp",0,0:print 10,500
name "Selena"
>I want you to come on the ocean with me, and help me look for Captain Selene's ship.@
>I've already prepared a ship.\
name ""
>As soon as we're inside, she starts talking.\
name "Luka"
>Look for Captain Selene's ship with you...?\
name ""
>The monsters are very powerful in this area.@
>I guess she wants me as a bodyguard...\
lsp 700,":a;chara\alice_st11b.bmp",-110,0
lsp 701,":a;chara\serene_st01.bmp",160,0:print 10,500
name "Alice"
>This sounds like it's going to be annoying...\
name ""
name "Luka"
>Alice, this lemon juice is delicious.\
name ""
lsp 700,":a;chara\alice_st14b.bmp",-110,0:print 10,500
name "Alice"
>I am thirsty...\
name ""
>Alice starts to sip the juice quietly.@
>I better hurry up this conversation before it's too late...\
csp 701
lsp 700,":a;chara\serene_st01.bmp",0,0:print 10,500
name "Luka"
>...I understand your request.@
>But Selena, why are you looking for Selene?\
>Do you admire her? Or are you after her treasure...?\
name ""
lsp 700,":a;chara\serene_st03.bmp",0,0:print 10,500
name "Selena"
>...I'm Captain Selene's granddaughter.\
name ""
name "Luka"
>Eh...!?\
name ""
>I gasp at the unexpected words.@
>To think that famous pirate ever had children...\
name "Selena"
>When Captain Selene was in port here, she gave birth to a girl.@
>That girl was my mother...\
lsp 700,":a;chara\serene_st02.bmp",0,0:print 10,500
>...Keep this a secret, or there will be a lot of trouble for me.\
name ""
name "Luka"
>G...Got it...\
name ""
>It's true... If people found out Captain Selene had a living relative, treasure hunters would go insane and flock to this house.\
lsp 700,":a;chara\serene_st01.bmp",0,0:print 10,500
name "Selena"
>I have a clue about Selene's location.\
>A letter she wrote to her lover in this town...@
>In other words, a letter to my grandfather.\
>She sent him a letter by carrier pigeon every month.@
>All the way until her voyage met with disaster, she continued sending those letters.\
name ""
name "Luka"
>You still have all those letters!?\
name ""
name "Selena"
>Yes... I kept them all.@
>We can figure out the steps of her voyage by the letters.\
name ""
>After saying that, she opens up a sea chart.@
>On it are multiple lines and points marked by ink.\
name "Selena"
>I've filled in the points of her voyage on this chart.@
>Her last voyage seemed to be headed toward a certain undersea cave...\
>It's about one week southwest of Gold Port...@
>This letter from her talks about how happy she was to arrive at the cave.\
name ""
name "Luka"
>So she got to her destination of her last voyage...?\
name ""
lsp 700,":a;chara\serene_st03.bmp",0,0:print 10,500
name "Selena"
>She got to the bottom of the cave, and obtained her objective.@
>The golden "Calamity Box".\
>She wrote that she was going to open the box that night...@
>And that's when the letters stop.\
name ""
name "Luka"
>What does it mean...?\
name ""
>So she was going to open the "Calamity Box", and then the letters stopped?\
>The name makes me think there has to be some sort of connection...\
name "Luka"
>In other words, it wasn't just some simple accident at sea?\
name ""
lsp 700,":a;chara\alice_st13b.bmp",-110,0
lsp 701,":a;chara\serene_st03.bmp",160,0:print 10,500
name "Alice"
>Calamity Box, was it...?\
name ""
>Alice stops drinking her juice and mutters to herself.\
lsp 700,":a;chara\alice_st14b.bmp",-110,0:print 10,500
name "Alice"
>That should have been destroyed by the first Monster Lord...@
>Just what was let loose...?\
name ""
name "Luka"
>What's wrong, Alice?\
name ""
name "Alice"
>No, I haven't heard a report about that...@
>The seal couldn't have been broken...\
name ""
name "Luka"
>Alice, do you know something about it...?\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-110,0:print 10,500
name "Alice"
>...I'm just talking to myself, don't worry about it.\
name ""
name "Luka"
>............\
name ""
>If she says that, it means she absolutely knows something.@
>There's no way to get it out of her though, so I have to drop it for now.\
csp 701
lsp 700,":a;chara\serene_st03.bmp",0,0:print 10,500
name "Luka"
>Anyway...@
>So you think Selene's ship sank where the last letter came from?\
name ""
name "Selena"
>It may not have sunk, and is simply still sitting there...@
>It's worth going.\
name ""
>After saying that, Selena folds the map back up.\
lsp 700,":a;chara\serene_st01.bmp",0,0:print 10,500
name "Selena"
>You wanted the Purple Orb, right?@
>It's mentioned in the letters a lot.\
>She always kept it in the Captain's Room, and enjoyed looking at its beauty.\
name ""
name "Luka"
>I see, so Captain Selene really did have the orb...\
name ""
>I hope the Purple Orb is still there.@
>If it isn't... I don't know what I'll do.\
name "Luka"
>So what are you after, Selena?@
>It isn't just finding the grave of your grandmother... Right?\
name ""
lsp 700,":a;chara\serene_st03.bmp",0,0:print 10,500
name "Selena"
>The Calamity Box...@
>I can't allow the contents to come out of that box.\
>The calamity she let loose must be sealed back to the bottom of the sea again...\
name ""
>After saying that, Selena stands up.\
lsp 700,":a;chara\serene_st01.bmp",0,0:print 10,500
name "Selena"
>...That's it for the discussion.@
>Do you understand what we're after now?\
>I already told you that I prepared the ship.@
>I want you on board as a bodyguard.\
>As for the reward, you'll get the Purple Orb.@>Assuming we get there safely, of course.\
>So... What do you say?@> You in?\
name ""
name "Luka"
>...Of course I'm in.\
name ""
>There's a lot I don't get, but there's no way I can decline.@
>I have to get that Orb to get to the northern continent.\
lsp 700,":a;chara\serene_st02.bmp",0,0:print 10,500
name "Selena"
>Alright, then let's head to the port right now.@
>Everything's already prepared, so we just need to set out.\
name ""
name "Luka"
>Eh...?@> You're already that prepared?\
name ""
name "Selena"
>I was going to set out right after speaking with you.@
>Even if you said no.\
name ""
name "Luka"
>I see...\
name ""
>Selena seems to be really into this search for Selene.\
>We follow her out to the port.\
dwave 1,"se\asioto2.ogg"
bgmstop
sean_change "bg124"
bgm "bgm\umi.ogg"
name "Luka"
>............\
name ""
lsp 701,":a;chara\kaizokub.bmp",-240,0
lsp 702,":a;chara\kaizokua.bmp",240,0
lsp 700,":a;chara\serene_st11.bmp",0,0:print 10,500
name "Female Pirate A"
>No issues here, Boss!\
name ""
name "Female Pirate B"
>Man, haven't seen a wind this good in a long time!@
>This is lookin' good for us!\
name ""
name "Selena"
>It has been a long time since we last went on a voyage, I hope your senses haven't dulled.\
name ""
>The ship Selena prepared...@
>It's a huge pirate ship!\
>Even more, all of the sailors are young women...\
lsp 700,":a;chara\serene_st12.bmp",0,0:print 10,500
name "Selena"
>Hehe, surprised?@
>I'm the captain of this pirate ship.\
name ""
name "Luka"
>I...I see...\
name ""
>So Captain Selene's granddaughter became a fellow pirate...@
>And it seems like she's a skilled one, too.\
name "Luka"
>It kind of seems like you wouldn't need a bodyguard...\
name ""
lsp 700,":a;chara\serene_st11.bmp",0,0:print 10,500
name "Selena"
>...We have a reason not to fight.@
>So we'll leave all the fighting to you.\
name ""
name "Luka"
>G...Got it!\
name ""
>A reason not to fight...?@
>As I watch all of the sailors, they all seem to be quite strong and capable...\
>I start to get an uneasy feeling.\
cspl 700,702:print 10,500
bgm "bgm\kiki2.ogg"
name "Luka"
>Is that a... Song?\
name ""
>I hear a sweet singing voice drifting across the sea.@
>It starts to make me a little drowsy...\
>It feels like I shouldn't be listening to this...\
lsp 700,":a;chara\kaizokub2.bmp",-190,0
lsp 701,":a;chara\serene_st13.bmp",130,0:print 10,500
name "Female Pirate A"
>This song...@> A Siren is coming.\
name ""
name "Selena"
>...Everyone, run into the ship.@
>This is a job for Luka, right?\
name ""
name "Luka"
>Y...Yes!\
name ""
>This is why I'm on the ship.@
cspl 700,701
bg "bg\bg125.bmp",10,500
>I rush to the bow, and wait for the monster.\
r@k@\
goto *seiren_start



*sean0263

bgm "bgm\umi.ogg"
r@k@\
bg "bg\bg124.bmp",10,500
name "Luka"
>Whew...\
name ""
>After sealing the Siren, I put away my sword.\
lsp 700,":a;chara\serene_st12.bmp",0,0:print 10,500
name "Selena"
>You're pretty good.@
>As expected of the Hero I was waiting for...\
name ""
name "Luka"
>Ah... N...No... It wasn't much...\
name ""
>I'm still not used to being praised like that.\
lsp 701,":a;chara\kaizokub.bmp",-240,0
lsp 702,":a;chara\kaizokua.bmp",240,0
lsp 700,":a;chara\serene_st12.bmp",0,0:print 10,500
name "Female Pirate A"
>It doesn't look like there are any other Sirens around.\
name ""
name "Female Pirate B"
>Alright then, continue on course to the west!\
name ""
>Our voyage continues on.@
>No more monsters bothered us on the open sea.\
>It took a few more days until we reached our destination.@
>I spent the days on the ship, just relaxing.\
sean_change "bg128"
bgm "bgm\hutuu1.ogg"
>Finally, we're going to arrive at our destination tomorrow.\
name "Luka"
>We're finally going to arrive tomorrow...\
name ""
>Unable to sleep, I head up onto the deck.@
>Together on the deck with the cold sea breeze is Alice.\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>...I'm all fidgety for some reason.\
name ""
name "Luka"
>What's wrong? Are you cold?\
name ""
name "Alice"
>Fidgety...\
name ""
>Alice seems pretty odd...@
>Well, I guess it's just the sea breeze.\
name "Luka"
>This is going to be difficult if Selene's ship has sunk.@
>We might have to go back and return with a salvage boat...\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-110,0
lsp 701,":a;chara\serene_st13.bmp",160,0:print 10,500
name "Selena"
>That won't be necessary.@
>That ship is still floating on the sea.\
name ""
>Selena appears on the deck all of a sudden, and declares that.@
>She said her purpose was to re-seal the Calamity Box, but...\
name "Luka"
>But... Didn't Captain Selene open that box 50 years ago?\
>After all this time, nothing calamity-like has occurred, right?@
>Doesn't that mean it wasn't anything special after all?\
name ""
name "Selena"
>If that's true, it would be good... But...\
name ""
>Selena sighs and turns her back to me.\
name "Selena"
>You two should go to sleep soon.@
>We'll finally be at Selene's location tomorrow...\
name ""
dwave 1,"se\asioto3.ogg"
csp 701:print 10,500
>Saying that, Selena returns to her cabin.\
>Maybe we should go back to our rooms too...\
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>Fidgety...\
name ""
name "Luka"
>............?\
name ""
>I'm a little worried about Alice's strange behavior...\
csp 700
bg black,10,3000
bgm "bgm\umi.ogg"
name "Female Pirate A"
>Boss, I see it!@
>Right in front, it's Selene's ship!\
name ""
name "Selena"
>Luka, can you wake up?\
name ""
name "Luka"
>Ah... Uhhn...\
name ""
dwave 1,"se\asioto4.ogg"
>I rub the sleep from my eyes and hurry up to the deck.\
bg "bg\bg129.bmp",10,1500
bgm "bgm\kiki2.ogg"
name "Luka"
>This is... Selene's ship...?\
name ""
>I see a huge, torn sail and a half rotted hull.@
>Right on it was the crest of Captain Selene.\
>There's strange fog all over, and it feels really eerie...@
>I can see how rumors of a ghost ship could be started with this...\
lsp 701,":a;chara\kaizokub2.bmp",-240,0
lsp 702,":a;chara\kaizokua2.bmp",240,0
lsp 700,":a;chara\serene_st13.bmp",0,0:print 10,500
name "Selena"
>Bring us up to the side!\
name ""
name "Female Pirate B"
>Aye sir!\
name ""
>The pirates bring the boat up to the side, and throw ropes over to the abandoned ship.\
cspl 701,702
lsp 700,":a;chara\serene_st11.bmp",0,0:print 10,500
name "Selena"
>It's dangerous, so we should only let a select few board the ship.@
>Luka, you're coming aren't you?\
name ""
name "Luka"
>Of course!\
name ""
lsp 700,":a;chara\alice_st14b.bmp",-93,0
lsp 701,":a;chara\serene_st11.bmp",160,0:print 10,500
name "Alice"
>................\
name ""
name "Luka"
>Alice... It's a ghost ship, so you don't have to come.@
>Wait on the ship here until we come back.\
name ""
lsp 700,":a;chara\alice_st13b.bmp",-93,0:print 10,500
name "Alice"
>W...Who's scared!?@
>This is nothing, I'm coming!\
name ""
>Alice bravely shouts that, then timidly moves toward the ghost ship.\
>Thus, we head onto Selene's abandoned ship.\
dwave 1,"se\asioto3.ogg"
bgmstop
sean_change "bg130"
bgm "bgm\obakeyasiki.ogg"
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Is this a barrier...?\
name ""
>Alice mutters that to herself as soon as she boards the ghost ship.@
>I feel the strange sensation as soon as I step aboard, too.\
name "Luka"
>A barrier...?@>What for?\
name ""
name "Alice"
>It seems to be quite a powerful barrier against evil...@
>Even now, it's still effective.\
name ""
name "Luka"
>We managed to walk through the barrier with no issue though, so it's fine isn't it?\
name ""
name "Alice"
>It seems to be designed not to keep evil out...@>But to keep evil in.\
>This must be how it has stayed afloat for so many years...\
name ""
name "Luka"
>...What do you mean?@
>Who would put up this barrier...?\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-93,0
lsp 701,":a;chara\serene_st13.bmp",160,0:print 10,500
name "Selena"
>...Captain Selene.\
name ""
>Selena declares that.\
name "Selena"
>After opening the Calamity Box and waking it up...@
>Selene used a treasure she found by chance, the "Jewel of the Rotten World".\
>She used it to create a barrier to separate this ship from the outside world, to make sure that it never managed to escape to the outside...\
name ""
name "Luka"
>What do you mean... "it"?@
>And how do you know what she did...?\
name ""
>Even if she is her granddaughter, she knows too much...\
name "Selena"
>...I'll tell you later.\
name ""
name "Luka"
>A monster...@
>Selena, watch out!\
name ""
>I see something crawling towards us from the other side of the corridor.\
name "Luka"
>Could it be the thing sealed by the Calamity Box!?\
name ""
lsp 700,":a;chara\alice_st14b.bmp",-93,0:print 10,500
name "Alice"
>No... It's something else.@
>Since it was able to cross the barrier, it must not be the one it was set up for...\
lsp 700,":a;chara\alice_st11b.bmp",-93,0:print 10,500
>But this barrier is still pretty powerful...@
>A normal small fry would have been repelled by it anyway.\
name ""
name "Selena"
>I'll leave this to you...\
name ""
dwave 1,"se\escape.ogg"
cspl 700,701:print 10,500
>Alice and Selena quickly leave the area.@
>As I take out my sword, a monster approaches!\
r@k@\
goto *hitode_start



*sean0265

bgm "bgm\obakeyasiki.ogg"
r@k@\
name "Luka"
>Whew...\
name ""
>I put away my sword and stand in place for a moment.@
>...Why isn't Alice back? She usually shows up by now...\
name "Luka"
>...Eh?@> Did something happen?\
name ""
>Did something happen to them?@
>Well she's the Monster Lord, it's not like I should be worried about her...\
name "Luka"
>No point in standing around here, though.@
>Might as well search around the ship.\
name ""
>Selena is with Alice, so they should both be fine.@
>I head down the nearby stairs where they went down earlier.\
dwave 1,"se\asioto3.ogg"
sean_change "bg131"
>As soon as I reach the bottom of the stairs...\
name "Alice"
>Hyaaaaaa...\
name ""
>Suddenly, I hear a scream from the deck!\
name "Luka"
>Alice!?\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st07b.bmp",67,0:print 10,500
name "Alice"
>Hyaaaa...\
name ""
dwave 1,"se\umaru.ogg"
>Alice speeds toward me, crying.\
name "Luka"
>Wh...What's wrong!?\
name ""
name "Alice"
>Se...Se...Se....!!\
name ""
>Alice hides behind me, pressing her face against my back as her tail flies all over the place in terror.\
>What could have made Alice act like this...?@
>...It's probably something stupid.\
name "Luka"
>Alice, where's Selena?\
name ""
name "Alice"
>Sh...She's... That... That...!\
name ""
name "Luka"
>I have no idea what you're trying to say...@
>You... You didn't run away and leave her behind did you!?\
name ""
name "Alice"
>N...No... Sh...She... G...!!!\
name ""
dwave 1,"se\asioto3.ogg"
lsp 699,":a;chara\alice_st91b.bmp",-110,0
lsp 700,":a;chara\alice_st07b.bmp",-110,0
lsp 701,":a;chara\serene_st11.bmp",160,0:print 10,500
name "Selena"
>...I'm right here.\
name ""
>Selena slowly walks toward us as if nothing is wrong.\
name "Luka"
>What happened, Selena?\
name ""
name "Selena"
>That young monster seems to be quite terrified...\
name ""
>Wait... She sees Alice's monster form...@
>But Selena doesn't seem to be surprised or scared at all...\
lsp 701,":a;chara\serene_st13.bmp",160,0:print 10,500
name "Selena"
>More importantly, Luka.@
>The thing I'm after is past this door.\
name ""
>Past this door... This is the Captain's Cabin, isn't it?@
>Whatever it is that she has refused to clearly name is past here...\
name "Luka"
>Is your cryptic phrasing about "that" and "thing" whatever was released by the Calamity Box?@
>It's a monster, isn't it?\
name ""
name "Selena"
>Yes... A legendary, horrible monster.@
>It was all Selene could do to seal off this ship and prevent its escape.\
>But that was 50 years ago.@
>The seal has lost its power over the years, and is about to be broken again...\
name "Luka"
>A dangerous monster like that is inside here...?\
name ""
>I nervously swallow as I take a look at the door again.@
>At the same time, I'm really starting to doubt Selena...\
>Just how does she know so much about what happened here...?\
name "Selena"
>We must not let them out.@
>Luka... You must...\
name ""
>At that same moment...@
csp 701:print 10,1500
>Selena suddenly vanishes!\
name "Luka"
>Eh...!?@>S...Selena!?!?\
name ""
csp 699
lsp 700,":a;chara\alice_st31.bmp",233,150:print 10,500
name "Alice"
>.................\
name ""
>What the hell is happening...?@
>The only thing I know is that there's a horrible monster behind this door...\
name "Luka"
>We can't leave it alone.@
>Let's go, Alice.\
name ""
name "Alice"
>.................\
name ""
>Alice silently turns her head side to side in horror.@
>Taking her hand, I slowly lead her through the door with me.\
dwave 1,"se\door1.ogg"
sean_change "bg132"
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\beelzebub_st01.bmp",100,50
lsp 702,":a;chara\beelzebub_st11.bmp",-150,-50
lsp 704,":a;chara\beelzebub_st21.bmp",150,-50:print 10,500
>Three powerful looking monsters are waiting on the other side.@
>They almost look like flies...\
name "Beelzebub A"
>Oh... You're the little soldier that pirate brought.@
>You seem quite delicate for a Hero...\
name ""
name "Beelzebub B"
>Hehe... But he's awfully cute.@
>That face just makes me want to tease him...\
name ""
name "Beelzebub C"
>In the end, humans are only tools for us to use to lay eggs.@
>Their only worth lies in the semen we can wring out.\
name ""
name "Luka"
>Wh...Who the heck are you...?\
name ""
>These three feel very different from the monsters I've faced so far...@
>I'm getting the same strange feeling as I did from that mutated monster in the Forest of Spirits...\
>A type of monster that seems almost completely removed from modern day monsters...\
cspl 701,704
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>The Queen of Flies...\
name ""
name "Luka"
>Eh...?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>There was a giant island in this area 1,000 years ago.@
>A race of fly type monsters lived there, known for being both incredibly powerful and incredibly evil...\
>Thus, Alipheese the first subdued them and sealed their Queen in a box...\
name ""
name "Luka"
>The Calamity Box, you mean...?\
name ""
name "Alice"
>The legend of how it must never be opened seems to have turned it into some sort of legendary treasure to be found...\
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
>The sealed Queen of the Flies, Beelzebub...@
>The three standing right in front of us...\
name ""
csp 699
lsp 700,":a;chara\beelzebub_st01.bmp",100,50
lsp 702,":a;chara\beelzebub_st11.bmp",-150,-50
lsp 704,":a;chara\beelzebub_st21.bmp",150,-50:print 10,500
name "Beelzebub A"
>You... Seem to be a blood relative of the Monster Lord.@
>How amusing... It seems like our time of revenge has come at last.\
name ""
name "Luka"
>So all three of them together are the "Queen of Flies"?@
>...Alice, step back.\
name ""
cspl 701,704
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>...What are you talking about?@> Do you think these three would be any trouble for me to deal with?\
name ""
name "Luka"
>But you're still shivering like crazy...\
name ""
csp 699
lsp 700,":a;chara\beelzebub_st01.bmp",100,50
lsp 702,":a;chara\beelzebub_st11.bmp",-150,-50
lsp 704,":a;chara\beelzebub_st21.bmp",150,-50:print 10,500
name "Beelzebub A"
>Oh my, how cute...@
>Look at her, shrinking in fear just from the sight of us.\
name ""
name "Beelzebub C"
>...It seems as though the current Monster Lord is quite the coward.@
>It seems like taking control of the outside world will be far easier than we thought.\
name ""
name "Luka"
>You're wrong!@>Alice isn't afraid of you!@
>Anyway Alice, I'll fight them!\
name ""
cspl 701,704
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>G...Got it... I'll leave this to you.\
name ""
dwave 1,"se\escape.ogg"
cspl 699,700:print 10,500
>Alice vanishes after saying that.\
lsp 700,":a;chara\beelzebub_st01.bmp",100,50
lsp 702,":a;chara\beelzebub_st11.bmp",-150,-50
lsp 704,":a;chara\beelzebub_st21.bmp",150,-50:print 10,500
>I turn back toward the three monsters.@
>All three of them look back at me and smile.\
r@k@\
goto *beelzebub_start



*sean0266

bgm "bgm\obakeyasiki.ogg"
r@k@\
name "Luka"
>Whew... It's over...\
name ""
>Without Alice's help, that would have been difficult.@
>I have to thank her.\
name "Luka"
>The legendary monsters that were sealed in ancient times...@
>It's true they were strong... But they weren't nearly as powerful as the Four Heavenly Knights.\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Their true horror lies in their reproductive ability.@
>If they multiplied to 10,000 or 1,000,000 strong, they could easily overwhelm the world.\
name ""
name "Luka"
>That would be bad...\
name ""
>Having a million of those flying around would send the world into chaos.@
>It looks like Captain Selene's seal really was protecting the world from calamity...\
cspl 699,700:print 10,500
>But I can't forget about the real reason I came here.@
>I have to find where Selene left the Purple Orb...\
name "Luka"
>This is the Captain's Cabin, right?@
>She said that Captain Selene always kept the Orb close to her...\
name ""
>As I look around the room some...@
>I find the Purple Orb on a shelf!\
name ""
name "Luka"
>This is it!\
name ""
>I pick up the beautiful sphere.\
dwave 1,"se\fanfale.ogg"
mov %item09,1
>Purple Orb obtained!\
name "Luka"
>Alright, I got what I came for!\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>The Beelzebubs are gone now, too.@
>They won't be able to harm the world now.\
name ""
>It looks like Alice finished the job the first Monster Lord started...@
>The two of us leave Selene's ship.\
dwave 1,"se\asioto3.ogg"
sean_change "bg133"
bgm "bgm\epilogue.ogg"
>Crossing back over to Selena's ship, we see her waiting for us on the deck.@
>No, it isn't just Selena...@
>All of the pirates are waiting for us.\
lsp 701,":a;chara\kaizokub.bmp",-240,0
lsp 702,":a;chara\kaizokua.bmp",240,0
lsp 700,":a;chara\serene_st12.bmp",0,0:print 10,500
name "Selena"
>Thank you, Hero Luka.@
>Thanks to you, those horrible abominations have been destroyed.\
name ""
name "Luka"
>Selena... Just what are you...?\
name ""
lsp 700,":a;chara\serene_st11.bmp",0,0:print 10,500
name "Selena"
>Luka, I told you a small lie...\
>I'm not Captain Selene's granddaughter...@
>...I am Captain Selene.\
name "Luka"
>Eh...?@> But Captain Selene is already...\
name ""
>If her ship is right here where they left the box, that means she must have died here.@
>Besides, its been 50 years...\
name "Captain Selene"
>I...@> No, we aren't living humans.@
>As soon as we opened that box 50 years ago, our lives were lost.\
>But having released the Queen of Flies, dooming the world...@
>We were so full of regret, we were unable to move on to the next world.\
name ""
name "Luka"
>I see...\
name ""
>It's not just Selene, but all of her crew as well...@
>None of them were able to rest in peace...?\
name ""
lsp 700,":a;chara\serene_st12.bmp",0,0:print 10,500
name "Captain Selene"
>But... Now we have no more regrets.\
>Thank you, Luka.@
>I wish you luck on your journeys to come...\
name ""
name "Female Pirate A"
>We can start our final journey without any regrets now, too...\
name ""
name "Female Pirate B"
>Thank you, Hero...\
name ""
cspl 700,702:print 10,1500
>Saying words of thanks, Selene and her crew slowly vanish.@
>Their forms vanish in wisps of smoke with smiles on their faces.\
name "Luka"
>.................\
name ""
>Their regret was so deep at letting loose those monsters, that they stayed in this world trying to repent...\
>After 50 years of suffering, their souls are finally at ease...@
>I hope they're able to rest in peace now...\
name "Luka"
>But still...@
>It looks like we were actually riding on a haunted ship all this time.\
>Isn't that kind of funny, Alice?\
wait 500
>...Alice?\
name ""
>I turn around to look at Alice...\
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st05b.bmp",67,0:print 10,500
name "Alice"
>..................\
name ""
>With her eyes frozen open, it looks like she managed to faint while still standing up.\
bgmstop
wait 500
cspl 699,700
bg black,7,1500
bgm "bgm\field3.ogg"
>The ship sails back to Gold Port, almost as if controlled by the invisible power of Selene's crew.@
>Returning to port after a couple days, I've finally returned with the Purple Orb.\
>Now then, for where to go next...\
r@k@\
mov %genzaiti,12
mov %gloval1_story_sinkou,9:gosub *savegloval1
goto *map6



*sean0267

gosub *genzaiti_bg
name "Luka"
>I'm concerned about this story of the princess being kidnapped again.@
>Shall we head back to Sabasa to see what's happening?\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Hmph.@>That girl again?@
>Whatever, do what you want.\
name ""
>Alice looks kind of annoyed for some reason...@
>I turn toward Sabasa Castle with the angry Alice trailing behind me.\
dwave 1,"se\asioto2.ogg"
bgmstop
sean_change "bg045"
bgm "bgm\castle2.ogg"
lsp 700,":a;chara\sabasa_st01.bmp",0,0:print 10,500
name "Sabasa King"
>Thank you for coming, Hero Luka.@
>I believe you have already heard, but Sara has been kidnapped by monsters again.\
name ""
>The Sabasa King tries to look calm, but I can tell he's restless.@
>I feel sorry for him... Having his daughter kidnapped twice in such a short amount of time.\
name "Luka"
>What exactly happened?@
>Can you tell me all the details...?\
name ""
name "Sabasa King"
>It was a few days ago...@
>She went outside the castle to practice her swordplay, and never came back.\
>According to her guards, it was as if she vanished like smoke.@
>Then a short while later, this came...\
name ""
>The King holds out a letter.\
name "Luka"
>A letter...?\
name ""
>"To the Sabasa King.@> I have your daughter.@
>If every human leaves Sabasa, I shall return her to you."\
name "Luka"
>She really was kidnapped!?\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-120,0
lsp 701,":a;chara\sabasa_st01.bmp",160,0:print 10,500
>Alice suddenly snatches the letter from me.@
>And starts to sniff it.\
name "Luka"
>Alice, stop joking around at a time like this.@
>We can't have you eating evidence...\
name ""
lsp 700,":a;chara\alice_st13b.bmp",-120,0:print 10,500
name "Alice"
>As if I would!@> You're the one who should stop screwing around, you idiot!\
name ""
>After yelling at me, Alice goes back to sniffing the letter.\
lsp 700,":a;chara\alice_st11b.bmp",-120,0:print 10,500
name "Alice"
>...It smells like Elves.@
>And a small hint of Fairy.\
>Whomever wrote this letter must be a very high ranking monster, too.\
>Probably... Queen class.\
name ""
name "Luka"
>A Queen class Elf...?\
name ""
>It looks like I was wrong in thinking she just ran off again.@
>So she really was kidnapped by monsters...\
csp 701
lsp 700,":a;chara\sabasa_st01.bmp",0,0:print 10,500
name "Luka"
>What are you going to do, King?@
>This letter lays out terms for her return...\
name ""
>Have every human leave Sabasa...?@
>That's an insane request.\
lsp 700,":a;chara\sabasa_st03.bmp",0,0:print 10,500
name "Sabasa King"
>...As the King, I cannot grant that request.@
>Sabasa is our homeland.\
name ""
name "Luka"
>But the princess...\
name ""
name "Sabasa King"
>...I am the King of this entire region.@
>I can't force all of my citizens to suffer for the sake of my own family.\
name ""
name "Luka"
>B...But...!\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-120,0
lsp 701,":a;chara\sabasa_st01.bmp",160,0:print 10,500
name "Alice"
>Calm down, you idiot.@
>Think about why you were called here.\
name ""
csp 701
lsp 700,":a;chara\sabasa_st01.bmp",0,0:print 10,500
name "Sabasa King"
>...That's right.@
>Hero Luka.@> I wish to ask for your assistance in rescuing my daughter.\
name ""
>Ah.@
>Of course, that's why they were looking for me...\
name "Luka"
>Of course I'll help you.@
>But do you have any idea where she is...?\
name ""
>There's no way I can rescue her if I don't know where she is.\
name "Sabasa King"
>We have a lead based on our extensive intelligence gathering.@
>There's a small island to the west of here called "Fairy's Island".\
>It's an isolated island filled with Elves and Fairies...@
>It seems as though Sara was taken there.\
name ""
name "Luka"
>Fairy's Island...\
name ""
>Alice mentioned Fairies and Elves when sniffing the letter, too.@
>Honestly, they aren't the kind of monsters I'd want to fight...\
name "Sabasa King"
>I'll arrange for a ship to land you on the island.@
>Soldiers, too. As many as are possible.\
name ""
lsp 700,":a;chara\alice_st14b.bmp",-120,0
lsp 701,":a;chara\sabasa_st01.bmp",160,0:print 10,500
name "Alice"
>...Soldiers aren't needed.@> They would just get in Luka's way as he is now.\
>Just more people he would have to rescue after Sara.\
name ""
lsp 701,":a;chara\sabasa_st02.bmp",160,0:print 10,500
name "Sabasa King"
>Oh, how reliable.@
>Then I beg you to leave at once...\
lsp 701,":a;chara\sabasa_st03.bmp",160,0:print 10,500
>I am truly sorry for burdening you with so much...@
>If I wasn't the King, I would have swam to that island myself.\
name ""
name "Alice"
>...Don't worry.@>This is a Hero's work.@
>You should concern yourself with King's work.\
name ""
name "Luka"
>Who are you, and what did you do with Alice...?\
>Anyway, leave this to me!\
name ""
lsp 701,":a;chara\sabasa_st02.bmp",160,0:print 10,500
name "Sabasa King"
>Yes, I'm counting on you.@
>Please, rescue your future wife!\
name ""
name "Luka"
>Ehhh!?\
name ""
>He's still trying to work that in there...?@
>I hurry out of the audience hall and go to the ship he prepared.\
bgmstop
sean_change "bg134"
bgm "bgm\seireinomori.ogg"
lsp 700,":a;chara\mob_sentyou.bmp",0,0:print 10,500
name "Captain"
>Alright then, I'll wait here until you come back.\
name ""
name "Luka"
>Please leave right away if it gets dangerous.\
name ""
csp 700:print 10,500
>I warn the Captain, then step off the boat onto Fairy's Island.@
>The atmosphere does seem like there would be Elves and Fairies around...\
name "Luka"
>...I feel power coming from the center of the forest...\
name ""
>That must be where the leader is...@
>Just as Alice said, it must be a Queen class monster.\
>Sara must be close by if the wielder of that power is the leader...\
name "Luka"
>Alright, let's go deeper into the forest.\
name ""
>I step deeper into the forest of Fairy's Island.\
dwave 1,"se\asioto2.ogg"
sean_change "bg135"
name "Luka"
>Such a huge forest on such a tiny island...\
name ""
>As I mutter to myself and push through the trees, I suddenly hear something behind me!\
r@k@\
goto *trickfairy_start



*sean0268

bgm "bgm\seireinomori.ogg"
r@k@\
name "Luka"
>...Whew, she was pretty tough...@
>I can't be careless here...\
name ""
>I step deeper into the forest after sealing the Trick Fairy.\
dwave 1,"se\asioto2.ogg"
sean_change "bg136"
>I come to a clearing deep in the forest, with a heavy atmosphere all around me.\
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\queenelf_st01.bmp",-160,0
lsp 701,":a;chara\queenfairy_st01.bmp",160,0:print 10,500
>In the clearing, I see two powerful looking monsters...@
>One looks like a Fairy, and the other an Elf.\
>They give off an aura that clearly differentiates them from normal monsters.@
>And at a nearby tree... I see Sara, bound by ivy!\
csp 701
lsp 700,":a;chara\sara_st04r.bmp",0,0:print 10,500
name "Sara"
>Luka, you came to save me!?\
name ""
>She doesn't look like a princess at all...@
>That's right, she was kidnapped when she went out for training, right?\
name "Luka"
>Wait a moment, Sara.@
>First I need to deal with these two...\
name ""
lsp 700,":a;chara\queenelf_st01.bmp",-160,0
lsp 701,":a;chara\queenfairy_st01.bmp",160,0:print 10,500
>I turn toward the powerful looking duo.\
>Alice said whomever wrote the letter was Queen class...@
>But there are two of them...\
name "Queen Elf"
>I have not met you before...@
>I am the Queen Elf, who will unite all Elves of the world.\
name ""
name "Queen Fairy"
>And I'm the Queen Fairy, the most powerful Fairy.@
>Hehehe... Nice to meet you.\
name ""
name "Luka"
>Both Queens...?\
name ""
>Two Queen monsters... This won't be easy...\
name "Luka"
>Why would you two kidnap the princess?@
>What are you planning...?\
name ""
name "Queen Elf"
>...Long ago, our brethren lived in the Sabasa region.@
>However when those humans moved in, they stole our homeland.\
name ""
name "Queen Fairy"
>We don't like fighting.@
>So we continued to avoid fighting with the humans as they took more and more land.\
>Until finally... We were driven all the way to this remote island.\
name ""
name "Luka"
>...................\
name ""
>This sounds similar to the story I heard at Undine's Spring.@
>Are the Fairies and Elves losing their homeland as the Slimes did...?\
name "Queen Elf"
>We were mistaken.@
>But we realized our folly far too late.\
>Even if we disliked fighting, we should have protected our homeland!\
name ""
name "Queen Fairy"
>Sabasa was ours to begin with.@
>The time for us to reclaim it has come.\
name ""
name "Luka"
>So you took Sara hostage, and are trying to make the King leave!?\
name ""
name "Queen Elf"
>Hehe, that's not why we kidnapped her.@
>That letter was just for us to have a little fun making him squirm.\
>Our true purpose is to make Sara into a monster.\
name ""
name "Luka"
>Wh...What!?\
name ""
csp 701
lsp 700,":a;chara\sara_st05r.bmp",0,0:print 10,500
name "Sara"
>Wait, what do you mean!?\
name ""
lsp 700,":a;chara\queenelf_st01.bmp",-160,0
lsp 701,":a;chara\queenfairy_st01.bmp",160,0:print 10,500
name "Queen Elf"
>With our power, it would be simple to turn a single human into a monster.\
>We'll turn the King's only daughter into one of us...@
>Then when the King dies, the inheritance will pass to her.\
>After Sara, we'll turn everyone in the castle into a monster, one by one.@
>Like that, we'll reclaim our land without shedding a single drop of blood.\
name ""
name "Luka"
>N...No way...\
name ""
>Sabasa will collapse from the inside if that happens...@
>I can't let this happen!\
csp 701
lsp 700,":a;chara\sara_st05r.bmp",0,0:print 10,500
name "Sara"
>It's true us humans were clearly at fault...@
>But what you're trying to do is just crazy!\
>Why can't we settle this peacefully?@
>There doesn't need to be any hostage taking or fighting... If we just discussed it...\
name ""
lsp 700,":a;chara\queenelf_st01.bmp",-160,0
lsp 701,":a;chara\queenfairy_st01.bmp",160,0:print 10,500
name "Queen Elf"
>Discuss it with humans?@
>Those same humans who praise Ilias and desire our destruction?\
>Please don't test my patience with foolish jokes.@
>There's no way humans would ever deal with us fairly.\
name ""
csp 701
lsp 700,":a;chara\sara_st05r.bmp",0,0:print 10,500
name "Sara"
>That's wrong!@
>My father would definitely listen to monsters...\
name ""
lsp 700,":a;chara\queenelf_st01.bmp",-160,0
lsp 701,":a;chara\queenfairy_st01.bmp",160,0:print 10,500
name "Queen Fairy"
>...Please, cease that foolish prattling.\
name ""
dwave 1,"se\ero_makituki1.ogg"
>The Queen Fairy snaps her fingers, causing the ivy around Sara to grow and force itself into her mouth!\
name "Sara"
>Nnnn!!\
name ""
name "Queen Elf"
>That's the end of this discussion.@> Princess, I'm going to turn you into a monster now.@
>Queen Fairy, I leave this human Hero to you.\
name ""
name "Queen Fairy"
>Of course...@> Sara has quite the potential in her, I'm looking forward to seeing her when she is reborn.\
name ""
csp 701
lsp 700,":a;chara\queenfairy_st01.bmp",0,0:print 10,500
>The Queen Fairy stands between me and the Queen Elf, giggling.\
name "Luka"
>Step aside!@
>I won't let you turn her into a monster!\
name ""
r@k@\
goto *queenfairy_start



*sean0270

bgm "bgm\boss0.ogg"
r@k@\
name "Luka"
>Alright, I defeated her!\
name ""
lsp 700,":a;chara\queenelf_st01.bmp",0,0:print 10,500
name "Queen Elf"
>Impossible... The Queen Fairy fell to a human?@
>The princess hasn't been turned into a monster yet... But I have no choice.\
name ""
>The Queen Elf steps away from Sara, and moves closer to me.\
name "Queen Elf"
>Then I shall be your opponent.@
>I dislike violence... But you leave me no choice.\
name ""
name "Luka"
>...Won't you just stop this already?@
>Even you know that doing it this way is a mistake, right?\
name ""
name "Queen Elf"
>Yes... This method is a mistake.@
>We're repeating the same mistakes you humans made long ago.\
>But... We are monsters, you are humans.@
>We're destined to fight and hate each other.\
name ""
name "Luka"
>...No.@> I know that's wrong for sure.\
>I don't deny that we humans were wrong.@
>I don't deny the pain that you went through until now...\
>But I'll never accept that!@
>Humans and monsters aren't fated to always hate each other!\
name ""
name "Queen Elf"
>We never attempted to understand the humans.@
>And you humans never attempted to understand us.\
>But it's far past the point of simply discussing things with each other.\
name ""
name "Luka"
>But we don't have to fight!\
name ""
r@k@\
goto *queenelf_start



*sean0271

bgm "bgm\kiki2.ogg"
r@k@\
name "Luka"
>..............\
name ""
>On her knees before me, she's too exhausted to continue.@
>There's no need for me to seal her, she's already unable to fight.\
bgm "bgm\hutuu2.ogg"
name "Luka"
>Why aren't you even willing to try discussing with humans?\
name ""
name "Queen Elf"
>How could we discuss anything with barbarians!?\
name ""
>...That's it, isn't it.@
>The Queen Elf hates humans, and isn't willing to let go of her prejudice.\
name "Luka"
>...Why aren't you willing to try to understand humans?@
>Do you think them stupid, and incapable of understanding you?\
name ""
name "Queen Elf"
>Do you think humans could ever understand our pain!?\
name ""
name "Luka"
>If you look down on them and treat them as weak, inferior beings... You'll never be able to understand them.\
>It's true that what happened to you is horrible...@
>But there has to be another solution out there.\
>It's come to this because you were unwilling to look at humans as equals.\
>You need to discuss this as equals with the humans, and come to an agreement...\
name ""
name "Queen Elf"
>Why would they even accept our negotiations!?@
>We're just monsters to be destroyed, right!?@
>That's what your precious Ilias orders!\
name ""
name "Luka"
>No!@>I want humans and monsters to live in peace!\
name ""
name "Queen Elf"
>Quiet!@> In the end, you're just another barbaric human thrusting your view by force!\
name ""
bgmstop
dwave 1,"se\earth1.ogg"
quake 10,1000
bgm "bgm\kiki2.ogg"
>Suddenly, our conversation is drowned out by a loud noise.@
>As soon as it goes quiet, an eerie feeling fills the air.\
name "Luka"
>Wh...What is it!?@
>More of her allies!?\
name ""
name "Queen Elf"
>What is this!?@
>Did you do something to this island!?\
name ""
>We look at each other in a panic, both thinking it was the other that did something.@
>After looking around for the source, our eyes rest on Sara, still tied to the tree.\
>It can't be... I was fighting the Queen Elf... Wasn't the ritual stopped!?\
name "Luka"
>I thought I stopped the ritual!?@> Was I too late!?\
name ""
name "Queen Elf"
>This... This isn't possible...@
>That power... It's the same as a Queen class monster...\
>How can a human who just became a monster be this powerful?\
name ""
>The Queen mutters to herself, then scowls.\
name "Queen Elf"
>It must be... Blood from a powerful monster already flowed through her veins.@
>I woke it up...\
name ""
name "Luka"
>Sphinx...@
>Sara is descended from Sphinx...\
name ""
>Sara's body distorts and changes in front of our very eyes.\
r@k@\
goto *saraevil_start



*sean0271a

bgm "bgm\kiki2.ogg"
r@k@\
name "Luka"
>I... I did it...\
name ""
>I managed to turn Sara back into a human somehow...@
>She's unconscious, but she is definitely alive.\
name "Luka"
>Now...\
name ""
lsp 700,":a;chara\queenelf_st01.bmp",0,0:print 10,500
>I turn back toward the Queen Elf.@
>This matter isn't settled yet...\
bgm "bgm\hutuu2.ogg"
name "Queen Elf"
>...I see.@
>You're wielding your sword for monsters and humans to coexist in peace.\
>That sincere feeling of yours...@
>It certainly reached me.\
>But... Does your human Goddess recognize it?@
>Will Ilias ever allow monsters and humans to coexist?\
name ""
name "Luka"
>W...Well...\
name ""
name "Queen Elf"
>It seems you yourself already realize that she won't.@
>Even though you know that, you ignore that fact and continue on?\
name ""
name "Luka"
>.............\
name ""
>I can't respond to her.@
>Instead, I try to change the subject on her.\
name "Luka"
>...Doesn't this mean you betrayed your Monster Lord as well?@
>Would she ever allow you to hold a human hostage?\
name ""
>Alice would never allow this.\
name "Queen Elf"
>That's...\
name ""
>I knew it.@
>But it's not as if this made me win the argument...\
name "Queen Elf"
>...It seems we are both betraying our leaders.@
>But... The Monster Lord doesn't understand our pain.\
>That foolish way of pacifism only leads to hardship.\
name ""
name "Luka"
>...I get it.@> You don't understand anything!\
name ""
name "Queen Elf"
>What do you mean I don't understand?\
name ""
name "Luka"
>You don't know anything about the Monster Lord!@
>You're happy at being a victim, so you can excuse all of your actions and blame others for them!\
>You're not even trying to understand either humans or the Monster Lord!@
>You're just using them as an object to hate and blame your problems on!\
name ""
lsp 700,":a;chara\queenelf_st03.bmp",0,0:print 10,500
name "Queen Elf"
>Quiet!\
name ""
bgm "bgm\kiki2.ogg"
dwave 1,"se\knife1.ogg"
>The Queen Elf pulls a dagger out.@
>And holds it up to Sara's neck!\
name "Queen Elf"
>If you continue with your impudence, I'll end this girl's life!\
name ""
name "Luka"
>C...Coward...\
name ""
name "Queen Elf"
>We can't run anywhere else!@
>Our only choice is to take back Sabasa!\
name ""
name "Luka"
>...Stop it already!@
>The Monster Lord doesn't want you to do this!\
name ""
name "Queen Elf"
>If the Monster Lord is unable to understand our pain and sorrow...@
>...Then they don't deserve to be our leader!\
name ""
>As the Queen Elf shouts that out...@
dwave 1,"se\earth1.ogg"
quake 10,1000
>Suddenly, the earth shakes underneath us!\
name "Luka"
>Again!?@>What is it this time!?\
name ""
>It isn't Sara or the Queen Elf...@
>Wait, this feeling of pressure... I know it...\
name "???"
>Queen of Elves...@
>Should I interpret that as a declaration of rebellion?\
name ""
name "Luka"
>Y...You...\
name ""
bgm "bgm\boss0.ogg"
lsp 701,":a;chara\granberia_st11.bmp",-200,0
lsp 700,":a;chara\queenelf_st03.bmp",160,0:print 10,500
name "Granberia"
>...No matter the reason, I won't allow anyone to rebel against the Monster Lord.\
name ""
name "Luka"
>G...Granberia!?\
name ""
name "Queen Elf"
>It can't be... A Heavenly Knight...\
name ""
>Granberia appeared out of nowhere...@
dwave 1,"se\knife2.ogg"
>The Queen Elf drops her knife, and just edges away.\
name "Luka"
>Granberia, why are you here!?\
name ""
name "Granberia"
>Just a coincidence, Luka...@>I did not come here for you.@
>I heard that the Queen Elf and Fairy were meeting together, so I came to take a look.\
>What disgraceful behavior... Taking a human female hostage.@
lsp 701,":a;chara\granberia_st12.bmp",-200,0:print 10,500
>And now that I've heard of your intent to rebel, I can't stay silent any longer.\
name ""
name "Queen Elf"
>N...No!@
>I was just...\
name ""
lsp 701,":a;chara\granberia_st41.bmp",-160,0:print 10,500
name "Granberia"
>Silence...@> Prepare yourself!\
name ""
dwave 1,"se\karaburi.ogg"
>Granberia takes out her sword, and takes a swing at the Queen Elf!\
name "Sara"
>...Stop!\
name ""
dwave 1,"se\asioto1.ogg"
lsp 700,":a;chara\sara_st05r.bmp",200,0:print 10,500
>Right before her sword hits the Queen Elf, Sara jumps in front, protecting her.@
>Granberia's sword stops mid-swing, inches from Sara's face.\
name "Granberia"
>...Daughter of the human royal family, why do you protect her?@
>This is the monster who was about to kill you.\
name ""
lsp 700,":a;chara\sara_st03r.bmp",200,0:print 10,500
name "Sara"
>You're both subjects of the Monster Lord, right?@
>The Monster Lord doesn't want her subordinates killing each other...@> I think...\
name ""
name "Granberia"
>...That is true.@
>This surely would make the Monster Lord depressed.\
>It seems I was a little quick to resort to force.\
name ""
lsp 701,":a;chara\granberia_st11.bmp",-200,0:print 10,500
>Granberia calmly puts away her sword.@
lsp 700,":a;chara\queenelf_st03.bmp",160,0:print 10,500
>Granberia slowly walks right up to the Queen Elf.\
name "Granberia"
>Queen of the Elves who was saved by a human...@
>...Let me make sure of this.\
lsp 701,":a;chara\granberia_st12.bmp",-200,0:print 10,500
>Are you planning on rebelling against the Monster Lord?\
name ""
lsp 700,":a;chara\queenelf_st01.bmp",160,0:print 10,500
name "Queen Elf"
>...I never had intentions of treason against her.\
>I was just despairing over her inability to understand our pain.@
>...That's all.\
name ""
lsp 701,":a;chara\granberia_st11.bmp",-200,0:print 10,500
name "Granberia"
>Understood... Then I acknowledge you weren't planning to commit treason.@
>But I'll say this...\
>The Monster Lord understands your pain well.@
>And she is working to alleviate that pain.\
name ""
name "Queen Elf"
>..................\
name ""
bgm "bgm\hutuu2.ogg"
lsp 701,":a;chara\sara_st01r.bmp",-160,0:print 10,500
name "Sara"
>It's we humans who didn't understand your pain...@
>But we never intended to abuse you.\
lsp 701,":a;chara\sara_st02r.bmp",-160,0:print 10,500
>I'm sure my father feels the same way...@
>If you would just sit down and talk with us, I'm sure we can reach a solution...\
>I'll help in any way I can.\
name ""
name "Luka"
>...That's right.@
>Humans make mistakes, but they aren't as stupid as you seem to believe.\
>If both sides put away their weapons and talk, something can be achieved.@
>But first, you have to be willing to understand humans...\
>I'll work on getting humans to understand monsters better.\
name ""
name "Queen Elf"
>..............\
name ""
>The Queen Elf falls silent for a while, then sighs.\
name "Queen Elf"
>...I'm still not agreeing to everything.\
>But if you're all going so far...@
>It may be worth waiting a while longer.\
>And if the Monster Lord really hasn't abandoned us...@
>Then we shall believe it will work.\
name ""
name "Luka"
>Thank you for believing in us...\
name ""
name "Queen Elf"
>...I don't know about the future, but we shall wait for now.@
>Neither Fairies nor Elves will attack humans.\
>I was saved from death by this human princess...@
>I cannot repay that favor by harming other humans.\
name ""
>It looks like she'll stop for now...@
>She still seems to hate humans as a whole, though.\
>But at the very least, she believes in the two of us standing in front of her right now...\
bgm "bgm\epilogue.ogg"
name "Luka"
>Then please watch and wait...@
>We won't disappoint you.\
name ""
name "Sara"
>Yes, I'll help too.@
>I'm sure the people of Sabasa will understand, too!\
name ""
name "Queen Elf"
>I will believe... And wait.@
>For the day when humans accept us, and we can live together in Sabasa.\
>Until that day comes, I shall attempt to understand humans better.\
name ""
lsp 701,":a;chara\granberia_st11.bmp",-200,0
lsp 700,":a;chara\queenelf_st01.bmp",160,0:print 10,500
>The Queen Elf smiles, and turns toward Granberia.\
name "Queen Elf"
>...Granberia, I wish to make a report.@
>The rumored "Black Alice" appeared before both the Queen Fairy and I a short while ago.\
>As fellow human haters, we were invited to her group...@
>But we declined.\
>There was an extremely sinister atmosphere around that one that made us hesitate.\
name ""
name "Granberia"
>I see... So "Black Alice" appeared before you two...\
name ""
name "Luka"
>.........?\
name ""
>"Black Alice"?@> What are they talking about?@
>Some sort of trouble between monsters?\
csp 701
lsp 700,":a;chara\queenelf_st01.bmp",0,0:print 10,500
>After finishing her report, the Queen Elf turns back toward Sara and me.\
name "Queen Elf"
>...I've troubled the both of you quite a lot.@
>I'd love to meet the two of you again, when humans and monsters are living in peace.\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,500
>After saying that, the Queen Elf vanishes.\
name "Luka"
>...............\
name ""
>It looks like the incident is settled for now...@
>But not everything is solved yet.\
>It won't be truly finished until the Elves and Fairies live together in Sabasa with the humans.\
lsp 700,":a;chara\granberia_st04.bmp",0,0:print 10,500
name "Granberia"
>Sheesh, so that settles this matter...@
>But there have been far too many rebels lately.\
>To make matters worse, that strange "Black Alice" is doing things behind the scenes...\
name ""
name "Luka"
>Who is this "Black Alice" you two keep mentioning?\
name ""
lsp 700,":a;chara\granberia_st01.bmp",0,0:print 10,500
name "Granberia"
>As you know, Alipheese is taking steps toward achieving peace with humans.@
>But there are many monsters who are unhappy with that stance.\
>There's a rumor going that one in particular is calling out to the others, gathering allies.@
>That girl seems to be called "Black Alice".\
>I don't know what kind of monster she is, but she must be incredibly arrogant.@
>Only the Monster Lord is able to assume the name "Alice".\
name ""
name "Luka"
>So there's a monster doing that...?\
name ""
>Black Alice...@
>Is she the leader of a group rebelling against Alice?\
>A band of monsters coming together, hostile to humans...@
>It sounds like the same thing as Ilias Kreuz, but for monsters.\
>But still... "Black Alice"...@>Where have I heard that name before?\
name "Luka"
>Oh, that's right... I forgot to thank you.@
>...Thank you, Granberia.\
>You really helped me out there.\
name ""
>If Granberia didn't drop in there, Sara could have been killed.\
lsp 700,":a;chara\granberia_st03.bmp",0,0:print 10,500
name "Granberia"
>Hmph... I had no intention of helping you.@
>I just couldn't stand to see a monster taking a human hostage.\
>But... Perhaps I did meddle a little too much.\
name ""
name "Luka"
>Granberia... You've changed.\
name ""
>I don't know what it is...@
>But she seems far different from when I first met her in Iliasburg.\
lsp 700,":a;chara\granberia_st01.bmp",0,0:print 10,500
name "Granberia"
>I changed?@
>I should say the same to you, Luka.\
name ""
name "Luka"
>Eh...?@> Me?\
name ""
lsp 700,":a;chara\granberia_st04.bmp",0,0:print 10,500
name "Granberia"
>Before, you barely knew anything about the sword, much less the world.@
>But you're different now...@>Perhaps it's everything you have seen along your journey?\
name ""
>Granberia stops talking, and smiles at me.\
lsp 700,":a;chara\granberia_st03.bmp",0,0:print 10,500
name "Granberia"
>...But most of all, I still wish to cross swords with you.@
>Not as monster and human, but as fellow warriors.\
>Both giving it everything we have...@> I'll be waiting, in the Monster Lord's castle!\
name ""
name "Luka"
>Yes, I'll be there soon!\
name ""
>Granberia summons her magic, about to vanish, when...\
bgm "bgm\comi1.ogg"
dwave 1,"se\asioto1.ogg"
lsp 701,":a;chara\granberia_st03.bmp",-160,0
lsp 700,":a;chara\sara_st02r.bmp",180,0:print 10,500
name "Sara"
>Wait, Granberia!\
name ""
>Sara jumps forward and grabs hold of Granberia!\
lsp 701,":a;chara\granberia_st06.bmp",-160,0:print 10,500
name "Granberia"
>What the...?\
name ""
dwave 1,"se\warp.ogg"
cspl 700,701:print 10,500
>In the next instant, the two of them vanish!\
name "Luka"
>.................\
name ""
>...She's gone...@
>Sara was probably teleported to the Monster Lord's castle with Granberia...\
>Well, she's with Granberia, so I doubt any harm will come to her.@
>She wouldn't let anyone do something horrible to a weak woman.\
name "Luka"
>...Wait, this isn't good!@
>I...I came here to rescue her from being kidnapped, didn't I!?\
name ""
>I can't do anything now...@
>Alone, and with Sara even further away than before, I head back to Sabasa Castle.\
bgmstop
sean_change "bg165"
bgm "bgm\yamatai.ogg"
>At the same time, on Arato Mountain near Yamatai village...@
>Monsters who hate humans begin to gather together...\
lsp 700,":a;chara\sirohebi_st01.bmp",0,0:print 10,500
name "Shirohebi"
>Hehe... I squeezed out a man's semen again today.@
>Wanting to be friends with humans... My sister is such a fool.\
>Humans should only be used to prey on...\
name ""
bgm "bgm\kiki2.ogg"
name "???"
>Hehehe... It's just as you said.@
>Humans are just our toys.@
>They're ours to play with, indulge in, then break and toss aside when we grow bored with them.\
name ""
name "Shirohebi"
>Hmm?@> Who are you?\
name ""
bgm "bgm\maou2.ogg"
lsp 700,":a;chara\sirohebi_st01.bmp",-200,0
lsp 701,":a;chara\alice8th_st01.bmp",160,0:print 10,500
name "???"
>I'm Black Alice.\
name "Black Alice"
>I'm the one guiding wonderful monsters like you to the glory of darkness.\
>The group of monsters that live on this mountain that you lead...@
>Won't you all become my allies?\
>We'll gather all of the humans together...@> Suck on them...@> Feed on them...@> Sate our lust...\
>It will be a wonderful party...@
>Doesn't that sound fantastic?\
name ""
name "Shirohebi"
>But... The Monster Lord won't stay silent if we do that...@
>She won't let us attack humans unless it's in self-defense...\
name ""
name "Black Alice"
>Hehe... There's no need to be afraid of Alipheese the 16th.@
>My name of "Alice" is no false moniker.@
>As proof, I'll grant you a new power...\
name ""
dwave 1,"se\warm.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
name "Shirohebi"
>Th...This power...!?\
name ""
name "Black Alice"
>Now, come with me to create a new world...@
>One in which we can use humans however we desire...\
name ""
bgmstop
sean_change "bg045"
bgm "bgm\castle2.ogg"
lsp 700,":a;chara\sabasa_st01.bmp",0,0:print 10,500
name "Luka"
>So...@
>Our persuasion worked, and the monsters stopped.\
>The Elves and Fairies won't attack humans for a while.\
name ""
>Unless they are betrayed by the humans...\
name "Sabasa King"
>Hmm... We drove them into a corner like that...?@
>Taking hostages is unforgivable...@> But we'll have to keep that in mind.\
>...And Sara?@
>I do not see her... Where is she?\
name ""
name "Luka"
>That's... Well...\
name ""
>What should I respond with...?\
r@k@\
csel "The truth",*sean0272,"A lie",*sean0273



*sean0272

name "Luka"
>Actually...@
>After Granberia helped us, Sara jumped after her...\
name ""
>Telling a bad lie may make everything even worse.@
>I decide to just tell him the truth.\
lsp 700,":a;chara\sabasa_st04.bmp",0,0:print 10,500
name "Sabasa King"
>Wh...What!?@
>She jumped after her on her own, and wasn't kidnapped!?\
name ""
name "Luka"
>Yes, she chased after her of her own free will...\
name ""
>I don't want Granberia to be seen as her kidnapper.@
>For Sara's sake, too... I have to be careful here.\
lsp 700,":a;chara\sabasa_st03.bmp",0,0:print 10,500
name "Sabasa King"
>On her own... Eh...\
name ""
>The King mutters to himself and sits back into his chair.\
name "Sabasa King"
>...I can't say this surprises me.@
>Sara seemed to be obsessed with Granberia.\
>She probably admired her as a fencer...\
name ""
name "Luka"
>....................\
name ""
>It looks like he doesn't realize Sara is obsessed with her as a fellow woman, not as a soldier.\
name "Sabasa King"
>She always acted on whatever fleeting thought came into her mind...@
>But to think she would chase after a monster...\
name ""
>The King sighs with an annoyed face.\
name "Sabasa King"
>I've heard that Granberia is a noble monster who wouldn't harm the weak.\
>You've met her before, haven't you?@>Is that true?\
name ""
name "Luka"
>...Yes.@
>Granberia wouldn't harm Sara.\
name ""
>I know that for sure.@
>She should be safe from harm for now...\
name "Sabasa King"
>Hmm...\
name ""
name "Luka"
>I'm going to the Monster Lord's castle soon.@
>I'll persuade her to come back.\
name ""
lsp 700,":a;chara\sabasa_st01.bmp",0,0:print 10,500
name "Sabasa King"
>...Don't bring her back forcibly.@
>Let my daughter do as she pleases.\
name ""
name "Luka"
>Eh...?\
name ""
name "Sabasa King"
>I cannot force her to ascend to the position of Queen.@
>My daughter's future is hers to decide.\
name ""
name "Luka"
>...Are you sure?\
name ""
name "Sabasa King"
>I always knew that girl would run away from this castle at some point.@
>Though it's far earlier than I thought, and much further away...\
>...Hero Luka, do you think of me as a heartless father?@
>Or an irresponsible King?\
name ""
name "Luka"
>No...@
>I only think that you really care for Sara...\
>But what about your successor?\
name ""
name "Sabasa King"
>The next ruler of Sabasa will be from another royal family.@
>Or maybe I'll just abolish the monarchy and set up some sort of parliamentary system.\
>Or... Do you wish to be King?\
name ""
name "Luka"
>D...Don't joke around like that...\
name ""
lsp 700,":a;chara\sabasa_st02.bmp",0,0:print 10,500
name "Sabasa King"
>Haha... Yes... Joke...\
name ""
>The King starts to laugh.@
>It looks like his frustration from a moment ago has gone a little bit.\
name "Sabasa King"
>Anyway... At least come back and tell me if you meet my daughter.\
name ""
name "Luka"
>Yes, I will.\
name ""
goto *sean0274



*sean0273

name "Luka"
>Actually...@
>Right after I saved her, Granberia kidnapped her again.\
name ""
>I'm sorry, Granberia... I'm making you a villain.@
>Even though Sara was the one who jumped at you...\
lsp 700,":a;chara\sabasa_st04.bmp",0,0:print 10,500
name "Sabasa King"
>Wh...What!?@>That Cursed Sword user Granberia stole my daughter!?\
name ""
name "Luka"
>Y...Yes...\
name ""
name "Sabasa King"
>W...Why!?@
>What is she demanding in trade for my daughter?\
name ""
name "Luka"
>Err... No... She didn't make a request...\
name ""
lsp 700,":a;chara\sabasa_st03.bmp",0,0:print 10,500
name "Sabasa King"
>...Then what was the point?@
>Did Sara follow her on her own, then...?\
name ""
name "Luka"
>Eh...!?@
>N...No... I, uh... Don't...\
name ""
>It can't be, does he already know?@
>It looks like he guessed it from my reaction...\
name "Sabasa King"
>Anyway... We can't let news of this get out.@
>Now then... What to do...?\
name ""
name "Luka"
>Uhm... I'm going to the Monster Lord's castle soon.@
>Maybe I can help her...\
name ""
name "Sabasa King"
>Hmm... I'm counting on you.\
name ""
>Even though I said that, I think he already knows that Sara ran after her on her own...\
name "Luka"
>..............\
name ""
goto *sean0274



*sean0274

>In the end, I wasn't able to bring Sara back...@
>But coexistence between the humans, Elves and Fairies was able to take a step forward.\
>Though I'm leaving the original issue unsolved for now, I take my leave of the King.\
dwave 1,"se\asioto3.ogg"
sean_change "bg064"
bgm "bgm\sabasa.ogg"
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>It looks like you're done talking with him...\
name ""
name "Luka"
>Yes... Sara's still gone, too.\
name ""
>That reminds me, its been a while since I've seen Alice.@
>As soon as I landed on the Fairy's Island, she vanished.\
name "Luka"
>Alice, did you meet with the Queen Elf?\
name ""
name "Alice"
>If I had met them, what could I say?@
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
>At the moment, I can't help them.\
name ""
>Alice has an unusually sad expression on her face.\
name "Alice"
>I understand the hardships the Elves and Fairies are going through.@
>But if they take back over the human lands, it will just start a whole new slew of struggles and pain.\
>There won't truly be a solution until the general relations between humans and monsters shifts.@
>But if I think that, I can't help but allow them to continue to suffer their current hardship...\
name ""
name "Luka"
>I see...@> You've been thinking about this from a variety of viewpoints...\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>For their sake, I have to make my ideal a reality.@
>I'll even lend a hand to you to make it come true.\
name ""
name "Luka"
>Uwaa... Alice, you've never talked like this before...@
>Of course I'd love for you to help me more.@>Ehehe.@> Hahahahaha!\
name ""
lsp 700,":a;chara\alice_st17bre.bmp",67,0:print 10,500
name "Alice"
>Sh...Shut up!\
name ""
csp 700:print 10,500
>I know there is still the lingering ashes that could ignite into a war here.@
>But I also know that the seeds of mutual understanding were sowed at the same time.\
>There are still a lot of obstacles in our way...@
>But Alice and I have to continue our adventure for our ideal!\
r@k@\
mov %ivent14,1
mov %genzaiti,7
mov %gloval1_story_sinkou,9:gosub *savegloval1
goto *map6



*sean0275

gosub *genzaiti_bg
name "Luka"
>Alright, let's go to the shrine!\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>You don't have all six orbs yet, do you?@
>Don't waste our time with a pointless side trip.\
name ""
name "Luka"
>Ah, that's right...@>I guess there's no point going then.\
name ""
cspl 699,700:print 10,500
>I take out the map again.@
>As for our next location...\
goto *map6



*sean0276

gosub *genzaiti_bg
name "Luka"
>Alright, let's go to the shrine!\
name ""
>I've got all the orbs... It's finally time to revive the Garuda!\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>After we revive the Garuda, we're going to the northern continent.@
>Have you finished everything here?\
name ""
name "Luka"
>I already knew you were going to ask that...\
name ""
>I won't be coming back until I finish my journey at the Monster Lord's castle.@
>Do I have anything left here to do...?\
csel "No",*sean0278,"Yes",*sean0277



*sean0277

name "Luka"
>Oh, no, I forgot about something...\
name ""
>I take out the map again.\
goto *map6



*sean0278

name "Luka"
>Alright, let's go!\
name ""
>We head to the shrine with the six orbs we collected from all over the world.\
bgmstop
dwave 1,"se\asioto2.ogg"
sean_change "bg137"
bgm "bgm\seireinomori.ogg"
>We come upon a small altar in the middle of the forest.@
>It isn't even defended or anything...\
name "Luka"
>We just walked right in...@
>I kind of expected a bunch of guards, maybe a couple watchtowers or something.\
>At least an actual egg.\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st07b.bmp",67,0:print 10,500
name "Alice"
>Nonono... There aren't any guards, but there should be an egg!@
>Where did it go!?\
name ""
>Alice scurries around the altar, frantically searching.@
>But it doesn't look like the egg is anywhere to be found.\
name "Luka"
>Don't tell me it already hatched...\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>No, that can't be.@
>It will never hatch until it has all six orbs...\
name ""
name "Luka"
>Then where...@>Hmm?\
name ""
cspl 699,700:print 10,500
>I feel something hidden in the nearby trees.@
>Is it a monster...?\
>No... This presence is human...\
name "Luka"
>Hey, who's there!?\
name ""
lsp 700,":a;chara\mob_gorotuki3.bmp",0,0:print 10,500
name "Man"
>Ah!?\
name ""
>The man jumps at my words...@
>But after looking at me, he calms down and comes out from hiding.\
name "Man"
>Oh, humans...@
>I thought you two were monsters for a second.\
name ""
>The man wipes the sweat off his forehead as he walks out.@
>I quickly glance over at Alice, but it seems as though she has already transformed into her human form.\
name ""
name "Luka"
>Err... Why are you here?\
name ""
name "Man"
>I'm a member of Ilias Kreuz.@
>Don't be surprised, but I'm Lupton, the man who has sliced apart hundreds of monsters!\
name ""
bgm "bgm\kiki2.ogg"
name "Luka"
>....!!\
name ""
>In the next instant...@> I dash forward and grab him by the neck and lift him into the air.\
dwave 2,"se\dageki2.ogg"
>I run forward with him dangling in the air, and force him against a tree.\
name "Lupton"
>Gaah!@>Wh...What are you doing!?\
name ""
>The power of the earth flows through my body, so strong I can barely control my own strength.@
dwave 2,"se\ero_simetuke1.ogg"
>The large tree creaks and starts to bend as I force the man's body against the trunk.\
lsp 700,":a;chara\alice_st13b.bmp",-120,0
lsp 701,":a;chara\mob_gorotuki3.bmp",130,0:print 10,500
name "Alice"
>...Stop it, Luka!@>Are you trying to kill him!?\
name ""
csp 701
lsp 700,":a;chara\mob_gorotuki3.bmp",0,0:print 10,500
name "Lupton"
>S...Sto... He...elp...\
name ""
name "Luka"
>...Really?\
name ""
name "Lupton"
>Urhg... Wh...What...?\
name ""
name "Luka"
>Have you really killed hundreds of monsters!?\
name ""
name "Lupton"
>Th....That's.... Lie...@
>I...I can't kill monsters...\
>Gahh... I'm just... A liar...@
>Hel... Gah...\
name ""
name "Luka"
>................\
name ""
>I relax my hand, and let him drop to the ground.@
dwave 2,"se\down.ogg"
>After landing on the ground, he grabs his throat and goes into a coughing fit.\
bgm "bgm\seireinomori.ogg"
name "Lupton"
>Haa... Haaa... I thought I was going to die...@
>I didn't think that would happen just from a little bragging...\
name ""
name "Luka"
>...............\
name ""
>Lupton catches my gaze on him, and instantly straightens up.\
name "Lupton"
>...No, no... Forgive me, Sir.@
>Even though you're so young, you have some crazy strength...\
name ""
name "Luka"
>...Why is a member of Ilias Kreuz here?\
name ""
name "Lupton"
>Well... We're already done now it seems.@
>Tch... I guess this is what I get for being late.\
name ""
name "Luka"
>Late...?@
>Did the other members gather here already for something?\
name ""
name "Lupton"
>A few days ago, we found this gigantic egg here.\
>We figured it was a monster egg, so we decided to try to destroy it.@
>...But no matter how hard we smashed it, we couldn't even dent the thing.\
>So we decided to carry it over to the headquarters.@
>It's heavy, so a lot of us were coming here to help carry it.\
name ""
name "Luka"
>I see...\
name ""
>Basically...@> A few hours ago, the egg was carried to the Ilias Kreuz headquarters.\
>This just made everything a lot more difficult...\
name "Luka"
>This isn't good...@> If they break the egg...\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Don't worry, that won't happen.@
>Humans are unable to destroy the egg.\
name ""
name "Luka"
>Oh? That's reassuring.\
name ""
>That speeds things along then.@
>I need to head to their headquarters and get that egg back.\
>Of course, I doubt they're just going to hand it over to me...\
lsp 700,":a;chara\mob_gorotuki3.bmp",0,0:print 10,500
name "Lupton"
>Th...Then, I guess I'll be going...@
>I wish you good health... Heh...\
name ""
dwave 1,"se\asioto1.ogg"
csp 700:print 10,500
>Lupton runs away as fast as he can.@
>A two-bit villain to the end, I guess.\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>...Luka, are you going to head to the Ilias Kreuz headquarters?\
name ""
name "Luka"
>Of course.@> I have to get that egg back.\
name ""
name "Alice"
>...I feel nervous at you going there.@
>How about I go in your place?\
name ""
name "Luka"
>Ehh...?@
>What do you think is going to happen?\
>Don't worry, they're just little hooligans like that Lupton guy.@
>They don't compare at all to the four Heavenly Knights or Poseidoness.\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>...You're not acting like you usually do, that's what makes me uneasy.@
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
>If you go as you are now...@
>I'm afraid you're going to kill them.\
name ""
name "Luka"
>...Don't worry.@>My father is my father.@>This isn't about him.\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>If you say so...\
name ""
>Alice's sad face doesn't brighten.@
>Leaving the shrine, the two of us head to the Ilias Kreuz headquarters.\
dwave 1,"se\asioto2.ogg"
bgmstop
sean_change "bg117"
bgm "bgm\gordport.ogg"
name "Luka"
>I have some business with Lazarus.@
>Could I meet with him, please?\
name ""
>I tell that to the guards in front of the headquarters.@
>These guards look just as evil as their organization...\
lsp 700,":a;chara\mob_seinen2.bmp",-150,0
lsp 701,":a;chara\mob_gorotuki2.bmp",160,0:print 10,500
name "Member A"
>Who the hell are you!?@
>Lazarus wouldn't ever meet some pissant like you!\
name ""
name "Member B"
>Get the hell out of here!\
name ""
name "Luka"
>Marcellus' son Luka came to meet you.@
>Tell that to Lazarus.\
name ""
name "Member A"
>Eh...?@> Marcellus'... Son?\
name ""
name "Member B"
>Oi, oi... That can't be...\
name ""
>The two of them look at each other in surprise.@
>My father Marcellus was the founder of Ilias Kreuz...\
name "Member A"
>G...Got it...@>I'll tell that to the leader...\
name ""
name "Member B"
>Wait here for a moment.\
name ""
cspl 700,701:print 10,500
>The two guards hurry into the building.@
lsp 700,":a;chara\mob_seinen2.bmp",-160,0
lsp 701,":a;chara\mob_gorotuki2.bmp",160,0:print 10,500
>After about a minute, they come running out.\
name "Member A"
>...Go in.@
>It looks like Lazarus will meet with you.\
name ""
name "Member B"
>Leader is in the underground hall.@
>This way...\
name "Luka"
>...................\
name ""
>I follow the two of them into the headquarters.\
dwave 1,"se\asioto2.ogg"
sean_change "bg139"
bgm "bgm\kiki2.ogg"
>I walk through a dirty looking lobby down some stairs, and into a surprisingly large basement.\
name "Luka"
>The egg...\
name ""
>A gigantic egg is sitting right in the middle of the room.@
>It must have taken a lot to get it here.\
lsp 700,":a;chara\lazarus_st01.bmp",0,0:print 10,500
>And standing right next to the egg is Lazarus...\
if %check02=0 goto *sean0278a
if %check02=1 goto *sean0278b



*sean0278a

name "Lazarus"
>...Oh?@> What an unexpected guest.@
>By the way, do you know how to break this egg?\
>I can't put a damn crack in it...\
name ""
>Lazarus slaps the egg as he sneers at me.\
goto *sean0278c



*sean0278b

name "Lazarus"
>...Hah.@>So it's you again.\
>By the way, do you know how to break these eggs?\
>I can't put a damn crack in it...\
name ""
>Lazarus slaps the egg as he sneers at me.\
name "Luka"
>...You knew I was Marcellus' son?\
name ""
lsp 700,":a;chara\lazarus_st02.bmp",0,0:print 10,500
name "Lazarus"
>How the hell could I not notice?@> We were friends for years.\
>I've been with him since we were running around in fields waving sticks, fighting imaginary monsters.\
>You look just like he did as a kid.\
name ""
name "Luka"
>.................\
name ""
lsp 700,":a;chara\lazarus_st01.bmp",0,0:print 10,500
goto *sean0278c



*sean0278c

name "Lazarus"
>So, why did you come here?@
>Revenge for your fath... For Marcellus?\
name ""
name "Luka"
>Revenge...?@>For my father...?@
>What do you mean?\
name ""
>My father was killed by a monster.@
>That happened because he made this organization...@
>His death was brought about by his own actions.\
lsp 700,":a;chara\lazarus_st04.bmp",0,0:print 10,500
name "Lazarus"
>What...?@> You don't know?@
>Damn, I thought you came for revenge for sure.\
name ""
name "Luka"
>...What do you mean?@
>My father was killed by a monster...\
name ""
name "Lazarus"
>Yeah, that's the official story.@
>Hah... Even his own damn son believed it...\
lsp 700,":a;chara\lazarus_st05.bmp",0,0:print 10,500
>You're just as stupid as your father was.\
name ""
name "Luka"
>What are you talking about...?\
name ""
lsp 700,":a;chara\lazarus_st01.bmp",0,0:print 10,500
name "Lazarus"
>...I killed your father.\
name ""
name "Luka"
>Wh...What...?\
name ""
>My vision starts to go hazy as his words slam into me.@
>Lazarus smiles as he looks at me, unsteady on my feet.\
lsp 700,":a;chara\lazarus_st02.bmp",0,0:print 10,500
name "Lazarus"
>...Oi, oi, don't look at me like that.@
>I was just upholding the rules of our organization.\
>When the leader becomes a criminal, it falls to the second in command to discipline him.\
>I killed him once he let his guard down, then disguised it as a monster attack.@
>Even in our organization, only a couple know the truth.\
name ""
name "Luka"
>W...Why...@> Why would you...?\
name ""
lsp 700,":a;chara\lazarus_st05.bmp",0,0:print 10,500
name "Lazarus"
>Marcellus betrayed us, even though he was our leader.@
>He abandoned our ideal of eradicating the monsters, and started working in secret to protect them.\
lsp 700,":a;chara\lazarus_st06.bmp",0,0:print 10,500
>So I purged him from us!@
>I stabbed him from behind, then covered it up so the others wouldn't lose their morale!\
name ""
name "Luka"
>My father...@> Trying to protect them...?\
name ""
lsp 700,":a;chara\lazarus_st03.bmp",0,0:print 10,500
name "Lazarus"
>Before we would attack them, he would sneak out and warn them.@
>Leaking out information, warning them... He betrayed us behind the scenes wherever he could.\
>In the end, he even let them all migrate peacefully out of here...\
lsp 700,":a;chara\lazarus_st06.bmp",0,0:print 10,500
>Your father went crazy!\
name ""
name "Luka"
>No...!@
>My father hated monsters!\
name ""
lsp 700,":a;chara\lazarus_st07.bmp",0,0:print 10,500
name "Lazarus"
>Yeah, I thought the same!@
>After what happened at the Monster Lord's castle, our resolve should have been even deeper...\
>We should have become demons that only lived for revenge!\
name ""
>Lazarus pounds his fist against the egg.@
>But his hand isn't shaking as much as mine is...\
name "Luka"
>Father... Why would he protect the monsters...?\
name ""
lsp 700,":a;chara\lazarus_st02.bmp",0,0:print 10,500
name "Lazarus"
>How the hell would I know...@> He hated them with me at first, when we founded this organization.@
>How much have you heard about our quest to kill the Monster Lord?\
name ""
name "Luka"
>I haven't heard much...@
>Didn't you fail before you ever reached the castle?\
name ""
lsp 700,":a;chara\lazarus_st05.bmp",0,0:print 10,500
name "Lazarus"
>Marcellus was the Hero, I was the soldier...@> We had a priest and a wizard, too.@
>Filled with fancy dreams of world peace, we formed a party and went off to destroy the Monster Lord.\
lsp 700,":a;chara\lazarus_st01.bmp",0,0:print 10,500
>Then... We made it all the way there, and killed her.@
>A lot happened, but... We really did kill her.\
name ""
name "Luka"
>No... It can't be...\
name ""
>My dream from before...@
>The dream where a young version of Alice's mother was killed by a Hero...\
>Is that really how it went...?@
>If the Hero in my dream was really my father, then...\
name "Lazarus"
>Then... The moment we killed the Monster Lord, the next one was born.@
>We weren't even going to fight her, and she blew us to pieces!\
>Before we knew what the hell was going on, we were bloody.@
>Marcellus and I were on the verge of death after a few moments...@>I still can't move my left arm.\
>Old man Merlin's head was cut off in the first attack...@
>Pretty little Karen...@> She was torn in half...\
lsp 700,":a;chara\lazarus_st07.bmp",0,0:print 10,500
>...I loved Karen...@>Marcellus did too...@
>But that damn Monster Lord tore her to pieces right in front of us!\
>As if her body was just paper...!\
name ""
name "Luka"
>Th...That...\
name ""
>That girl must have been Alice.@
>With a single blow, she put Marcellus and Lazarus on the verge of death, and killed the other two...\
lsp 700,":a;chara\lazarus_st02.bmp",0,0:print 10,500
name "Lazarus"
>...After that, Marcellus and I became demons.@
>Revenge incarnate, we held nothing but hatred for monsters.\
>After managing to escape with our lives, we stopped fighting monsters head on.\
>And after I lost the ability to move my left arm, I realized the difference in power...@
lsp 700,":a;chara\lazarus_st01.bmp",0,0:print 10,500
>We'll get rid of the monsters using violence from behind the scenes...\
>That's why we formed the terrorist organization Ilias Kreuz.\
lsp 700,":a;chara\lazarus_st05.bmp",0,0:print 10,500
>Then... At some point, Marcellus changed.@
>He started to try to protect and help the monsters we hated.\
>I don't know when he started going crazy...\
>I...@> I miss my former friend...\
name ""
name "Luka"
>My father... Didn't go crazy!\
name ""
lsp 700,":a;chara\lazarus_st06.bmp",0,0:print 10,500
name "Lazarus"
>My friend went insane!@> How could he help the monsters...!?@
>He joined the enemies of humans!\
name ""
name "Luka"
>No, he isn't an enemy!@
>He was working towards coexistence--\
name ""
lsp 700,":a;chara\lazarus_st07.bmp",0,0:print 10,500
name "Lazarus"
>---That isn't possible!@
>Humans and monsters will never stop fighting!\
>Even if they act friendly, you can't ever get rid of that feeling...@
>At any point, they could tear you to pieces like paper!\
>I've seen it...@>I know how quick it can happen!\
name ""
name "Luka"
>Even if they're more powerful, coexistence is---\
name ""
name "Lazarus"
>---Not possible!\
>Humans can never live together with beings so much more powerful than them!\
>You're strong, aren't you?@
>That's why you can't understand anything about those weaker than you!\
>Those monsters could just tear people to pieces if they felt like it!@
>How the hell could you live every day with that fear hanging over you!?\
name ""
name "Luka"
>If humans and monsters just understood each other---\
name ""
name "Lazarus"
>You're only saying that because you're strong!@
>The more we "come to understand" each other, the clearer that difference in power becomes!\
>Your empty words are nothing but a stupid dream!\
>You're ignoring the plight of the weak...@
>Those that would have to live in fear every day of the strong monster nearby!\
name ""
name "Luka"
>You're wrong!@>I...\
name ""
lsp 700,":a;chara\lazarus_st02.bmp",0,0:print 10,500
name "Lazarus"
>What's wrong?@
>Eh, boy!?\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-120,0
lsp 701,":a;chara\lazarus_st02.bmp",160,0:print 10,500
name "Alice"
>No, you're wrong.@
>You're ignoring reality.\
name ""
>As I falter on my words, Alice suddenly appears behind me.\
lsp 701,":a;chara\lazarus_st04.bmp",160,0:print 10,500
name "Lazarus"
>...The hell!?@>Who are you!?\
name ""
name "Alice"
>Though it's true your line of thinking holds some merit.\
>It's natural for humans to fear monsters, given the difference in power.@
>... But that doesn't have to be the only way.\
name ""
name "Luka"
>Alice...\
name ""
name "Alice"
>Luka and I have been to many villages and towns on the way here...@
>In many of those places... Humans and monsters are getting along.\
>There are many more humans accepting monsters than you seem to think.@
>Or are you just choosing to ignore reality again?\
name ""
name "Lazarus"
>What was that, girl...\
name ""
>As soon as the words leave Lazarus' mouth, his face contorts in fear and anger.\
lsp 701,":a;chara\lazarus_st06.bmp",160,0:print 10,500
name "Lazarus"
>You... The Monster Lord!@
>I'd never forget that face!\
>You... You killed them!@
>You didn't forget about Merlin and Karen, did you!?\
name ""
name "Alice"
>No... I haven't forgotten them for even a moment.@
>The feeling as my magical power killed two people...@> The feeling of stealing away two lives...\
name ""
name "Luka"
>................\
name ""
>...So Alice really did kill them, just like in my dream.\
>When she saw her dead mother, she went berserk.@
>Her rage left two humans dead...\
lsp 701,":a;chara\lazarus_st05.bmp",160,0:print 10,500
name "Lazarus"
>..."For coexistence"... She said.@
>Right at the verge of death, that's what the previous Monster Lord said.\
>"She believed in us?" we thought.@
>We were going to carry on her wish... Humans and monsters living in peace...@> Or so we thought.\
lsp 701,":a;chara\lazarus_st06.bmp",160,0:print 10,500
>Then you ran in and killed Merlin and Karen!\
name ""
lsp 700,":a;chara\alice_st14b.bmp",-120,0:print 10,500
name "Alice"
>...............\
name ""
>Alice's face goes sorrowful for a moment.@
lsp 700,":a;chara\alice_st11b.bmp",-120,0:print 10,500
>Then slowly goes back to her usual cold stare.\
name ""
name "Alice"
>I can't deny the truth.@
>But I believe in coexistence as my predecessor did.\
name ""
lsp 701,":a;chara\lazarus_st07.bmp",160,0:print 10,500
name "Lazarus"
>The hell was that!?@
>How can the one who slaughtered my friends spew that crap!?\
name ""
name "Luka"
>Stop this!@> Stop it already!!\
name ""
>Unable to take it any longer, I yell at him to stop.\
csp 701
lsp 700,":a;chara\lazarus_st04.bmp",0,0:print 10,500
name "Luka"
>Lazarus... I know how you feel!@
>But... Do you really hate monsters that much!?\
>There are humans around the world who are living together peacefully right now...@
>Do you deny that they exist?@> That what has already happened is impossible!?\
name ""
name "Lazarus"
>Isn't it obvious?@>They'll realize it eventually, just as I did.@
lsp 700,":a;chara\lazarus_st06.bmp",0,0:print 10,500
>That there's no way we could ever live in peace with them!\
name ""
name "Luka"
>Humans and monsters are just different races!@
>They have still been able to understand each other...\
>I've seen them!@>With my own eyes!\
name ""
name "Lazarus"
>I already told you!@
>That "difference" is the problem that will forever keep us separate!\
name ""
name "Luka"
>It's true that our races are different...@
>But is that reason enough to kill them!?\
name ""
lsp 700,":a;chara\lazarus_st01.bmp",0,0:print 10,500
name "Lazarus"
>How many times do I have to repeat myself before you get it!?\
name ""
name "Luka"
>So... It was worth killing my father over!?\
name ""
lsp 700,":a;chara\lazarus_st06.bmp",0,0:print 10,500
name "Lazarus"
>Yeah, that's right!@
>Your father betrayed me!\
lsp 700,":a;chara\lazarus_st07.bmp",0,0:print 10,500
>Merlin and Karen, too...@> He pissed on their graves!@
>So I killed him!\
name ""
name "Luka"
>You!!\
name ""
>The burning desire for revenge explodes inside my heart.\
>I've been paralyzed in shock by the truth until now...@
>But now that the truth of my father has registered with me, it's like a switch has been flipped.\
>I had already grabbed the hilt of my sword before I knew what I was doing.@
>Not Angel Halo, but on my old iron sword, capable of killing...\
lsp 700,":a;chara\lazarus_st01.bmp",0,0:print 10,500
name "Lazarus"
>...Revenge?@>Good, do it!@
>Your old man's killer is right in front of you.\
>But even if I'm dead...@>Your stupid ideal will still be impossible.\
name ""
name "Luka"
>Does that mean you're prepared to die!?@
>You're going to die while refusing to admit you're wrong!?\
name ""
lsp 700,":a;chara\lazarus_st07.bmp",0,0:print 10,500
name "Lazarus"
>I'm willing to die for my beliefs!@
>Better that than to piss on the graves of those who died before me!\
name ""
name "Luka"
>...You...!!\
name ""
lsp 700,":a;chara\lazarus_st08.bmp",0,0:print 10,500
name "Lazarus"
>Come on, kill me!@
>No matter what happens, my path won't change!@
>I'll hate monsters, and keep on killing them!@
>If you don't like it, then come on and kill me!\
name "Luka"
>......!!\
name ""
>In a fury, I draw my iron sword.@
dwave 1,"se\karaburi.ogg"
>And press the tip of the blade to Lazarus' chest.\
r@k@\
csel "Thrust",*sean0279,"Stop",*sean0279



*sean0279

if %sentaku=1 mov %check04,1
if %sentaku=2 mov %check04,0
lsp 700,":a;chara\alice_st11b.bmp",-120,0
lsp 701,":a;chara\lazarus_st08.bmp",160,0:print 10,500
name "Alice"
>...Stop.\
name ""
>In the next instant, Alice grabs my hand, still tightly grasping the iron sword.\
>She gently pulls it back, bringing the tip away from Lazarus' heart.\
name "Luka"
>Alice...\
name ""
>Am I letting her pull my sword away?@
>Is she stopping me, or am I stopping myself?@> I don't know anymore...\
name "Alice"
>No more... Stop, Luka.@
>There's no reason you need to dirty your hands on this man.\
lsp 701,":a;chara\lazarus_st01.bmp",160,0:print 10,500
name "Lazarus"
>Eh, what's wrong?@>Can't kill me!?@
>Even if you don't kill me, I still won't accept your thinking!\
lsp 701,":a;chara\lazarus_st06.bmp",160,0:print 10,500
>Even though we're both humans, we can't even understand each other.@
>How the hell do you think you'll ever understand monsters!?\
name ""
>Lazarus turns his glare toward Alice.\
lsp 701,":a;chara\lazarus_st07.bmp",160,0:print 10,500
name "Lazarus"
>How about you, Monster Lord?@
>I killed your mother!\
>Hah, don't you hate me?@
>Why don't you just tear me to pieces like you did to my friends!?\
name ""
lsp 700,":a;chara\alice_st14b.bmp",-120,0:print 10,500
name "Alice"
>...I see you're looking for a place to die.@
lsp 700,":a;chara\alice_st11b.bmp",-120,0:print 10,500
>But I won't let you become a martyr.\
name ""
>Alice's eyes fill with magical power as she glares at Lazarus.\
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
>Alice's eyes flash...@
>And Lazarus starts to turn to stone!\
lsp 701,":a;chara\lazarus_st08.bmp",160,0:print 10,500
name "Lazarus"
>Gah... Wh...What...?@
>What did you do!?\
name ""
name "Alice"
>I won't kill you...@>But I'll turn you to stone.@
>You won't die, and I'll be able to turn you back whenever I want.\
name ""
name "Lazarus"
>Damn you!!\
name ""
>With that final cry...@
dwave 1,"se\stone.ogg"
lsp 701,":a;chara\lazarus_st09.bmp",160,0:print 10,500
>Lazarus turns completely into a stone statue!\
>I stand in front of him in surprise...@
>After a few moments, I slowly start to calm down.\
csp 701
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Luka"
>I'm sorry, Alice...\
name ""
>If Alice didn't step in back there, I may really have killed Lazarus...\
name "Alice"
>Lazarus provoked you on purpose.@
>I think he wanted you to kill him.\
>After that failed, he tried to get me to kill him.@
>Somewhere in his heart, he's wishing for his own death...\
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
>Dying for his beliefs...@> He wants to be a martyr.\
name ""
name "Luka"
>He wants to die...?\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>I don't know if he knows it himself...@
>Living must be too painful for him.\
>He must be doubting his path now... But after murdering his friend for his beliefs, there's no way he can change his direction.\
name ""
>She talks about it as if she was talking about herself...\
name "Alice"
>Suddenly, the son of his closest friend that he murdered appears in front of him.@
>He probably was unconsciously wishing to be killed by the son's own hand...\
name ""
name "Luka"
>.................\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>Talking about another's feelings...@>This is unlike me.\
name ""
>Alice says that with a sigh.@
lsp 700,":a;chara\alice_st14b.bmp",-120,0
lsp 701,":a;chara\lazarus_st09.bmp",160,0:print 10,500
>Then turns toward Lazarus, now a stone statue.\
name "Luka"
>You said you can turn him back, right?\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-120,0:print 10,500
name "Alice"
>Yes, if I feel like it.\
name ""
name "Luka"
>Then... Wait a little while.@
>At least until I sort out some things in my heart...\
name ""
>Lazarus has lived a painful life...@
>But using that as his excuse, he has committed far too many horrible acts.\
>He also murdered my father...@
>I need some more time before I can face that fact head on...\
name "Luka"
>.................\
name ""
dwave 1,"se\asioto3.ogg"
>Footsteps coming down the stairs pull me back to reality.\
lsp 700,":a;chara\mob_seinen2.bmp",-160,0
lsp 701,":a;chara\mob_gorotuki2.bmp",160,0:print 10,500
name "Member A"
>Lazarus, about tomorrow's plan...@
>...Ah!@> The leader turned to stone!?\
name ""
name "Member B"
>Wh... What happened!?\
name ""
name "Luka"
>Sorry, but Ilias Kreuz is dissolved as of today.@
>With your leader like this, you can't commit any more acts of terrorism, can you?\
name ""
>I doubt they'll listen to that...@
>If they just elect a new leader...\
name "Member A"
>M...Monsters are here for revenge!@> Run away!\
name ""
name "Member B"
>H...Help meeee!!\
name ""
dwave 1,"se\escape.ogg"
cspl 700,701:print 10,500
>The two of them run away as fast as they can.@
>It looks like the members don't match Lazarus in their conviction...\
name "Luka"
>Now that that situation has been cleared up...@
>Shall we focus on reviving the Garuda again?\
name ""
>I turn back toward the large egg.@
>This seems like it would be rather difficult to take back to the shrine...\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>There's nothing special about the shrine location itself.@
>We can hold the ceremony here.\
name ""
name "Luka"
>Then... Do I just hold up the orbs...?\
name ""
name "Alice"
>...Wait, Luka.@
>I think you should take a brief rest first.\
name ""
name "Luka"
>I'm fine... I don't need that...\
name ""
>I didn't get into a battle or anything...@>There's no reason for me to rest.\
name "Alice"
>Your face looks horrible.@
>You're still in mental shock from what happened...\
name ""
>Alice grabs me by the hand and starts to pull me away.\
name "Luka"
>Oi, oi... I said I was fine...\
name ""
name "Alice"
>Look at yourself in a mirror.@
>The egg won't go anywhere, so just come on.\
name ""
name "Luka"
>...Fine, I'll rest for a while.\
name ""
>Alice pulls my hand as she leads me out of the headquarters.\
dwave 1,"se\asioto3.ogg"
sean_change "bg164"
bgm "bgm\hutuu4.ogg"
>She finally lets go when we reach the top of a hill overlooking Gold Port.@
>I sit down and look at the view, easily able to see the entirety of the port.\
name "Luka"
>...............\
name ""
>I start to shiver a little bit.@
>This place seems to get cold really quick when night falls.\
>But the cold wasn't the only reason I'm shivering...@
>It seems like Alice was right.@> I'm still overwhelmed by all that happened.\
>My father wasn't killed by monsters...@> Lazarus killed him.@
>Soon after hearing that, I was inches away from killing Lazarus myself...\
bgm "bgm\hutuu2.ogg"
name "Luka"
>...I wonder if humans and monsters can ever really understand each other?\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...What's wrong?@
>That's a strange remark coming from you.\
name ""
name "Luka"
>Neither Lazarus or I could put aside our differences...@
>It even got to the point where I was about to kill him.\
>If fellow humans are able to get to that point, then humans and monsters...\
name ""
>I feel depressed and defeated.@
>It feels like my faith is crumbling before me.\
name "Luka"
>I followed my mother's last wish and became a Hero.@
>Everyone in the village hated me, but I swallowed my feelings and became a Hero.\
>I believed in coexistence, and set out on this adventure...@
>All based on just trying to atone for what my father did.\
>I didn't even really know what the hell coexistence really meant.@
>They were just empty words...@>I wasn't thinking seriously about anything.\
name ""
>I chased after my own made up image of a Hero, and spouted off some random dream I thought up as a kid.\
>As soon as that mask I made started to crumble, the trauma I've been hiding broke free.@
>It was all just escapism...\
name "Luka"
>It's just like you said, Alice.@
>I was deluding myself, and masking my true self...@> Now that mask is off...\
name ""
name "Alice"
>...No, your mask hasn't come off yet.@
>Luka, you're a true Hero.\
name ""
name "Luka"
>Eh...?\
name ""
name "Alice"
>It's true you're an idiot, naive, and you rush into things without thinking them through...@
>You've made lots of mistakes swinging that sword of yours around, too.\
>...But why have you been doing all of this until now?@
>It hasn't been due to anger or despair like you're feeling right now.\
>It hasn't been some "mask" you wore over your true feelings.@
>Those actions all came from your heart...@>Your true self.\
name ""
name "Luka"
>That's...\
name ""
name "Alice"
>You never allowed anyone to terrorize someone else.@
>Every time you came across someone acting cruel, you got angry and rushed in.\
>You can't stand seeing weak people being bullied or persecuted...@
>Because you were persecuted yourself for so long.\
>That's your true self that has influenced everything you've done until now.@
>I don't think there's anyone in the world with a more Hero-like motive than you.\
name ""
name "Luka"
>Even so...@
>If I had killed Lazarus...\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...Even if I didn't stop you, you would have stopped yourself before it was too late.\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
>Alice sits down next to me and smiles.\
name "Alice"
>Even if you can't understand Lazarus...@
>You and I understand each other.\
>Or am I imagining things?\
name ""
name "Luka"
>Alice...\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Just because humans can't always reach each other doesn't mean it's impossible for humans to reach monsters.\
>There will be humans who won't ever get along.@> There will be monsters who won't ever get along.\
>It isn't a simple story with a sudden ending point.@
>You have to think about how it will start and continue on, slowly getting better.\
name ""
name "Luka"
>I see...\
name ""
name "Alice"
>I understand you, a human.@
>But Lazarus, another human, can't.\
>Then how about monsters?@> The Four Heavenly Knights and I know each other.@
>But among the rest of us, there are many who don't understand me or my actions, just like Lazarus and you.\
>It's just a difference in the way of thinking.@
>But just because the races are different, it doesn't mean everything is different.\
name ""
name "Luka"
>Then... Is true understanding just an illusion?\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>Even if it's an illusion, it's important to try.\
name ""
name "Luka"
>I see...@> Yeah, that's right...\
name ""
>The Monster Lord shouldn't be a friend to a Hero...@
>But Alice is sitting right next to me, cheering me up.\
>Lazarus fears monsters, so he thinks peace is impossible.@
>But the fear itself should vanish as we get to know each other more.\
>Right now, humans and monsters fear each other because they don't understand the other.@
>We aren't neighbors that have to hate each other...@>We can come together.\
>Even Alice and I have...@
>A fake Hero and the Monster Lord were able to understand each other after spending time together on a journey...\
name "Luka"
>But my father... I was trying to right his wrongs...\
name ""
>After meeting with Lazarus, the truth of my father became clear...@
>He set out with a hatred of monsters, and changed at some point along the way.\
>I don't know what exactly happened, but he lost his life because of it...@
>But he was walking as I did in the end, for peace between man and monster.\
>But just knowing that is enough for me.@
>My father's death wasn't just another turn in the endless circle of violence with monsters...\
name "Luka"
>...This isn't the time to be depressed.@
>My father fought for the coexistence of humans and monsters!\
name ""
>I've had my father wrong this whole time...@
>I'll inherit his dying wish!\
>I'm not going backwards and trying to atone for his actions anymore...@
>I'm taking pride in my father's beliefs and way of life, and pushing myself on!\
name "Alice"
>...Whew, that's the Luka I know.@
>You aren't suited to being sulky and depressed.\
name ""
name "Luka"
>Hehe, thanks...@
>Hey, Alice...?\
name ""
>I just noticed...@>No, I was just able to notice...@
>Alice herself has been looking depressed for a while.\
>I was able to figure out why right away.\
>Alice killed Lazarus and my father's two friends.@
>As soon as that was pointed out back there, she became depressed.\
bgm "bgm\alice2.ogg"
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Alipheese the 15th...@
>My mother was looking for a solution for peace.\
>She became more and more anxious as the strife and fighting got even worse.@
>In the end, she decided to end the fighting with her own life.\
name ""
name "Luka"
>....................\
name ""
>Just like the dream...@
>It must have been one of Alice's memories...\
name "Alice"
>If she was defeated by a Hero...@
>My mother thought that would finally end the fighting.\
>Then appearing before her was a Hero...@
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
>That was your father, with Lazarus and their friends.\
name ""
name "Luka"
>My father made it to the Monster Lord's castle...?\
name ""
>I've believed my whole life that his journey ended somewhere in the middle.@
>To think he was a Hero that made it all the way there...\
name "Alice"
>At that time, my mother put me in a jail.@
>It was a strong prison, augmented with sealing magic.\
>As my mother was dying...@
>It seems as though she told your father her intentions.\
>With her sacrifice, she wanted peace...@
>According to Lazarus, it seems like it shifted their hearts after learning why she did it...\
>But... I broke down the seal holding me, and rushed to my mother's side.@
>It seems as though my mother miscalculated my magical power...\
name ""
name "Luka"
>..............\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>When I saw her lifeless body, I couldn't contain myself.@
>When I pulled myself back together...@>There were two more corpses in front of me.\
>I took two lives...@
>Right after my mother sacrificed herself for peace, I trampled on everything she wished for.\
name ""
name "Luka"
>That's not it...\
name ""
>An accident...@> An unbelievably horrible one.@
>After that, my father and Lazarus hated monsters.\
>But I can't hold Alice at fault...@
>She was just a young child, and saw her mother murdered...\
>It happened because Alice was too young, and unable to control her own power...\
name "Luka"
>You didn't know what you were doing at that time, right?@
>If you apologize to Lazarus...\
name ""
>Her painful, depressed face...@
>I try to tell her it wasn't her fault.\
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>...Apologize for killing his friends right in front of him!?@
>Do you think Lazarus would ever accept that!?\
>Do you think I could take away his pain, anger and hatred with some simple words!?@
>An apology would just make him suffer and get even angrier!\
name ""
name "Luka"
>..............\
name ""
name "Alice"
>In the end, I killed his friends!@
>That's a fact.@> There is no way to apologize for that.\
>The only thing I can do is keep acting like the cold blooded Monster Lord so he can keep hating me!\
name ""
>Alice explodes, venting her feelings.@
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
>Then calms down, and closes her eyes.\
name "Alice"
>Always... I've always regretted what I did.@
>If I never did that...@
>My mother's ideal might already have come true...\
name ""
name "Luka"
>...It wasn't your fault, Alice.@>It was a horrible accident.\
name ""
>I gently pat Alice's head.@
>She looks so small right now for some reason...\
>She's been carrying this the whole time...@
>Both her mother's wasted death, and the two humans she killed...\
name "Alice"
>That's why... I'll atone.@
>For destroying my mother's wish...\
name ""
name "Luka"
>It isn't atonement...@
>You're inheriting her will.\
>Negative thoughts like that will just get you killed, so that way of thinking is better.@
>Didn't you tell me something like that before, Alice?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>My... My mother's will...\
name ""
name "Luka"
>I want a world where humans and monsters can coexist together.@
>I'm following the will of my dead father...@>And my own wish.\
>Alice... You're following the will of your mother, too.@
>Let's do our best together, and continue on!\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Idiot...@> Don't group me together with you, you...@>You idiot...\
name ""
>Alice closes her eyes and gently buries her head in my chest.\
>But it was only for a moment.@
>She quickly snaps back up.@
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
>And goes back to her usual look.\
name "Alice"
>Hmph... The Monster Lord can't be cheered up by a Hero.@
>Don't get the wrong idea, you idiot.\
name ""
name "Luka"
>Same here... I can't be a Hero who was cheered up by the Monster Lord!\
name ""
name "Alice"
>................\
name ""
name "Luka"
>................\
name ""
>Before I had noticed it, we were already so alike.\
>Struggling with our own pasts, we both inherited the will of our parents...@
>Now we're continuing on for our own dreams.\
name "Luka"
>Alice, why did you decide to travel around the world?\
name ""
name "Alice"
>I wanted to believe in my mother's dream, but I didn't think it was possible.@
>The fighting between humans and monsters was getting heated, and the slightest spark seemed like it could set everything off.\
>Even if I was just an individual monster...@
>I was still the Monster Lord.\
>If humans ever attacked us, I would have to confront them.@
>It won't just stay as small fights and tiny confrontations forever...\
>Before it came to all-out war, I thought I should see the world first.\
name ""
name "Luka"
>Were you looking for the good in humans...?\
name ""
name "Alice"
>No... To be honest, it was the reverse.\
>Humans are dirty creatures that should be oppressed...@
>They're evil, so they have to be destroyed...\
>I was looking for a reason to believe that...@
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
>But it seems I found the opposite...\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
>Alice lets out a sigh, then smiles.\
name "Alice"
>In the same world that Ilias Kreuz exists...@> There are also humans who are accepting of monsters.\
>That just may make it possible for us to coexist in peace...@
>I slowly began to think that.\
name ""
name "Luka"
>Yeah, you're right.@
>It can be made... A peaceful world.\
name ""
name "Alice"
>...I believe in you.\
name ""
>It feels like I understand Alice more now...\
>My faith in my dream feels even stronger than ever now.@
>For Alice's sake, too, I'll definitely make it happen!\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>But... You're going to be heading to the Monster Lord's castle now.@
>Do you realize just how dangerous it really is?\
name ""
name "Luka"
>Yeah... It will be a lot harder than anything before now.@
>I understand that much, at least.\
name ""
>Hellgondo... "The Dangerous Continent" as it's sometimes called.@
>I'll be heading there soon...\
>It's not something I can take lightly.\
r@k@\
goto *sean0279a



*sean0279a

if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %con_hvoice=0 dwave 0,"voice\alice8_01.ogg"
name "Alice"
>Your journey may end at any point...
>But you're still a virgin, aren't you?\
dwavestop 0
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
if %con_hvoice=0 dwave 0,"voice\alice8_02.ogg"
>It's too pitiful to die without ever knowing the taste of a woman...
>So I'll teach you about the pleasure of women...\
name ""
dwavestop 0
name "Luka"
>N...No!@>Absolutely not!@
>I can't break the prohibition...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice8_03.ogg"
name "Alice"
>Sheesh... Then how about this form?
csp 699
lsp 700,":a;chara\alice_st12b.bmp",67,0:print 10,500
>If I'm in a human form, then you're not having sex with a monster, right?\
name ""
dwavestop 0
name "Luka"
>No, no... That's just splitting hairs...\
name ""
>Even if she looks like a human, she's still a monster.@
>And even more, this location is a bit...\
if %con_hvoice=0 dwave 0,"voice\alice8_04.ogg"
name "Alice"
>You should know the taste of a woman if you want to grow stronger.
>The monsters on the dangerous continent know many powerful sex techniques after all.\
if %con_hvoice=0 dwave 0,"voice\alice8_05.ogg"
>Just close your eyes, and think of this as training.
>After that, I'll lead you to the world of pleasure... Hehe.\
name ""
dwavestop 0
name "Luka"
>W...We can't... Ahh!\
name ""
>Alice pushes me down, and jumps on top of me.\
if %con_hvoice=0 dwave 0,"voice\alice8_06.ogg"
name "Alice"
>Since you were born a man, you should taste a woman.\
if %con_hvoice=0 dwave 0,"voice\alice8_07.ogg"
>The feeling of your penis sinking into a wet pussy...
>The hot, melting touch as it slowly tightens around you...\
if %con_hvoice=0 dwave 0,"voice\alice8_08.ogg"
>All while thrusting in and out, going numb in pleasure...
>Exploding inside the woman, filling her with your seed...\
if %con_hvoice=0 dwave 0,"voice\alice8_09.ogg"
>Don't you want to taste that joy once?
>But then again... You'll finish quickly thrusting in and out of my pussy.\
name ""
dwavestop 0
name "Luka"
>N...No... Stop...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice8_10.ogg"
name "Alice"
>Hehe... As your mouth says no, your penis got big...
>You're already prepared to be violated...\
if %con_hvoice=0 dwave 0,"voice\alice8_11.ogg"
>My pussy is already aching in desire for you...\
name ""
dwavestop 0
>Alice lifts up her skirt, and exposes her vagina.@
>She moves her waist toward me, showing off the bright pink flesh.\
if %con_hvoice=0 dwave 0,"voice\alice8_12.ogg"
name "Alice"
>My pussy is going to take your virginity...
>The pussy of the Monster Lord is going to devour your innocent, virgin penis...\
if %con_hvoice=0 dwave 0,"voice\alice8_13.ogg"
>Hehe... Get ready, because my pussy is amazing.
>You won't even last ten seconds for your first time...\
name ""
dwavestop 0
name "Luka"
>No... No...\
name ""
>I couldn't push Alice off no matter how hard I tried.@
>I can't do anything but be raped by her...\
>Alice slowly drops her waist, with a lewd smile on her face.@
>Right as my tip touches her entrance, she stops.\
name "Luka"
>Ahhh...\
name ""
>I feel her warmth and wetness on the tip of my penis.@
>A strange sense of excitement at touching Alice there washes over me at the same time.\
if %con_hvoice=0 dwave 0,"voice\alice8_14.ogg"
name "Alice"
>Hehe... Even though it isn't even in yet, it already feels that good?
>It seems like you really won't even last ten seconds...\
if %con_hvoice=0 dwave 0,"voice\alice8_15.ogg"
>Oh well, I'll force it all the way in at once.
>At the very least, I'll take away your virginity with you all the way inside my pussy...\
name ""
dwavestop 0
mov %hseanwave,1:hseanwave
csp 699
lsp 700,":a;chara\alice_h08_1r.bmp",0,0:print 10,500
>After saying that, Alice drops down, forcing me all the way inside her!\
>My tip pushes apart her soft flesh, as her warm wetness covers my penis.\
>I gasp in surprise at the feeling as I push inside her.@
>As soon as I reach her deepest part, her vagina clamps down around my penis.\
name "Luka"
>Ahhhh!!\
name ""
>My head goes blank at the new pleasure I've never felt before.@
>It feels like I could just melt away inside of her.\
gosub *syasei1
lsp 700,":a;chara\alice_h08_2r.bmp",0,0
gosub *syasei2
>My penis twitches inside of her as I come, shooting my semen straight up into her vagina.\
name "Luka"
>Ahh...\
name ""
>As the feeling of her warm flesh filled me, I came only moments after insertion, just as Alice said.\
if %con_hvoice=0 dwave 0,"voice\alice8_16.ogg"
name "Alice"
>Hehe... What a pathetic virginity loss.
>Violated in the cowgirl position, and unable to even last 10 seconds...\
if %con_hvoice=0 dwave 0,"voice\alice8_17.ogg"
>How did it feel losing your virginity in an instant?
>As a man, was it miserable? Or frustrating?\
name ""
dwavestop 0
name "Luka"
>Ah...\
name ""
>It's true it felt pitiful, humiliating and frustrating...@
>But more than anything, it felt good.\
>I'm inside Alice right now...@
>It feels like I could melt away, and just give myself over to the feelings...\
if %con_hvoice=0 dwave 0,"voice\alice8_18.ogg"
name "Alice"
>Hehe... You're completely a slave to my pussy.
>Well with your first time being with the Monster Lord's pussy, I guess there's no helping it...\
if %con_hvoice=0 dwave 0,"voice\alice8_19.ogg"
>Then next I'll have you taste the pleasure from being squeezed by my pussy...\
name ""
dwavestop 0
mov %hseanwave,4:hseanwave
>A wet noise fills the air as her vaginal walls start to move around my penis.\
name "Luka"
>Ahhh!\
name ""
>I let out a moan at the sudden stimulation as I writhe under Alice.\
>Alice just softly laughs as she sits on top of me and watches me squirm.\
if %con_hvoice=0 dwave 0,"voice\alice8_20.ogg"
name "Alice"
>...Writhing from just this much? Such a weak-willed impatient man...
>I'm still in human form, so I can't use most of my monster techniques, too...\
if %con_hvoice=0 dwave 0,"voice\alice8_21.ogg"
>Even though I'm not trying at all... How pathetic. Hehe.\
name ""
dwavestop 0
name "Luka"
>Ahhh!@
>It's moving inside... Incredible...!\
name ""
>Her vagina rubs and massages me as if it was an entirely different living creature.@
>It's almost like all of the folds inside of her are tiny tongues, licking every inch of me.\
>My lower body starts to ache as my body trembles in ecstasy.\
name "Luka"
>Ahhh...\
name ""
gosub *syasei1
lsp 700,":a;chara\alice_h08_3r.bmp",0,0
gosub *syasei2
>I explode inside Alice's warm vagina.@
>As the blissful feelings of release fill me, it feels like I could drown inside her.\
if %con_hvoice=0 dwave 0,"voice\alice8_22.ogg"
name "Alice"
>...What, already leaking out?
>You're pitifully quick, aren't you? Hehe...\
if %con_hvoice=0 dwave 0,"voice\alice8_23.ogg"
>I guess I'll train you a little with my pussy.
>Until not even a drop is left in you...\
name ""
dwavestop 0
name "Luka"
>Stop, stop...@
>Ahhh!\
name ""
>My voice fades into a moan as her soft vagina clamps down on me.@
>As Alice's vagina continues to rub against my penis, it feels like I'm in a dream, with nothing existing in the world but this ecstasy.\
name "Luka"
>Haaaa!!\
name ""
if %con_hvoice=0 dwave 0,"voice\alice8_24.ogg"
name "Alice"
>Hehe... Does it feel good?
>You can come inside me as much as you want...\
if %con_hvoice=0 dwave 0,"voice\alice8_25.ogg"
>Hoora, don't hold back, just come...
>My pussy will indulge in it all...\
name ""
dwavestop 0
name "Luka"
>Ahhh!\
name ""
>Alice's vagina slowly gets tighter and tighter around me, her warm flesh slightly trembling around me.\
>Suddenly loosening, Alice starts squeezing me in a rhythm inside her.@
>Unable to endure it, I feel another ejaculation rising in me.\
name "Luka"
>Ahh... I'm going to come again...@
>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>I feel my penis twitch inside Alice, then explode semen into her vagina.\
>The feeling of coming inside a woman... Inside Alice... Is enough to make me become a captive of the pleasure all at once.\
name "Luka"
>Ahhh...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice8_26.ogg"
name "Alice"
>Hehehe... How does it feel having your semen squeezed by my pussy?
>I'll suck up all of that semen you've been holding...\
name ""
dwavestop 0
>Her warm vaginal walls wriggle around me, still extra sensitive after my last orgasm.@
>It feels like I could just give everything over to Alice, and melt in this pleasure...\
>Already feeling overwhelmed, I gasp as Alice starts to slowly move her hips.\
if %con_hvoice=0 dwave 0,"voice\alice8_27.ogg"
name "Alice"
>Horahora... I'll violate and torment you some more...
>Hoora... How's this?\
name ""
dwavestop 0
name "Luka"
>Ahhhh!!\
name ""
>Alice very slowly moves me in and out of her, making the friction unbearable.@
>I feel a comfortable weakness filling me as my tip slowly rubs against her wet flesh, in and out.\
if %con_hvoice=0 dwave 0,"voice\alice8_28.ogg"
name "Alice"
>If I move my hips like this, you can't stand it, can you?
>Horahora... My pussy wants more of your semen...\
name ""
dwavestop 0
>Alice slowly moves a little bit quicker, gradually increasing the speed.\
>As she continues moving, as if playing with me...@
>I feel Alice getting wetter, lubricating me and letting me slip in and out of her even easier.\
name "Luka"
>Ahh... I'm going to come...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice8_29.ogg"
name "Alice"
>Just come inside my pussy like that...
>Come as much as you can, and give it all to my pussy...\
name ""
dwavestop 0
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1:gosub *syasei2
>I come inside Alice again, giving her more of my semen.\
>She's toying with me, and doing something that should humiliate me as a man...@
>But the pleasure pushes all those thoughts away.\
>As Alice violates me, I just let out a sweet moan of pleasure.\
name "Luka"
>Ahh...!\
name ""
if %con_hvoice=0 dwave 0,"voice\alice8_30.ogg"
name "Alice"
>Hoora... That's not all...
>I'm going to suck out your semen to the last drop with my pussy...\
name ""
dwavestop 0
>Alice starts to bounce faster on top of me, forcing me in and out of her.\
gosub *syasei1:gosub *syasei2
>I'm quickly forced to another ejaculation in only moments.\
>As soon as I come inside her, Alice's vagina sucks on me, pulling up the semen into her like it was a totally different creature.\
name "Luka"
>Haaa...@>It's sucking...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice8_31.ogg"
name "Alice"
>Hehe... How pitiful...
>Having your virginity stolen by the Monster Lord's pussy, then having your semen squeezed...\
if %con_hvoice=0 dwave 0,"voice\alice8_32.ogg"
>What a pitiful first time... Hehe.
>The height of humiliation for your first time being in a woman...\
name ""
dwavestop 0
name "Luka"
>Ahh...!@>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>No matter how many times I come, Alice just keeps on riding me.@
>Her intense riding throws me around like a toy, as my body writhes in blissful agony under her.\
name "Luka"
>Ahh... Stop already...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice8_33.ogg"
name "Alice"
>Hehe... I've wanted to violate you all this time...
>Sitting on top of you like this, and riding you as hard as I could...\
if %con_hvoice=0 dwave 0,"voice\alice8_34.ogg"
>Hehe... As I thought, this feels amazing...
>Letting a man taste overwhelming pleasure while I taste the highest quality semen...\
name ""
dwavestop 0
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice_h08_4r.bmp",0,0
gosub *syasei2
>Alice's face lights up as she watches me orgasm, shooting more of my semen into her seemingly bottomless vagina.\
>But it's only Alice that's bottomless... I feel myself nearing my own limit.\
if %con_hvoice=0 dwave 0,"voice\alice8_35.ogg"
name "Alice"
>Your semen is getting thinner...
>But I'll keep this fun going until I wring you dry...\
name ""
dwavestop 0
name "Luka"
>Ah... Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
if %con_hvoice=0 dwave 0,"voice\alice8_36.ogg"
name "Alice"
>Hoora... Not yet...
>You can come more, right?\
name ""
dwavestop 0
name "Luka"
>I can't anymore... Stop...\
name ""
gosub *syasei1:gosub *syasei2
if %con_hvoice=0 dwave 0,"voice\alice8_37.ogg"
name "Alice"
>Hehe... Just a little more.
>Your yells got weaker, too... Horahorahora...\
name ""
dwavestop 0
name "Luka"
>Ahh...\
name ""
gosub *syasei1:gosub *syasei2
if %con_hvoice=0 dwave 0,"voice\alice8_38.ogg"
name "Alice"
>The next shot will be the last.
>Hora, give my pussy the last drop!\
name ""
dwavestop 0
name "Luka"
>Ahh...\
name ""
gosub *syasei1:gosub *syasei2
>I come a final time inside Alice, a small amount of semen trickling into her.@
>As my body shakes in ecstasy, I feel my vision start to go hazy.\
lsp 700,":a;chara\alice_st12b.bmp",67,0:print 10,500
mov %hseanwave,0:hseanwave
name "Luka"
>Ah...aa...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice8_39.ogg"
name "Alice"
>...Hehe, thanks for the meal.
>My pussy is satisfied tonight, too...\
if %con_hvoice=0 dwave 0,"voice\alice8_40.ogg"
>You enjoyed the taste of a woman too, didn't you?
>You should take a nice rest here tonight.\
name ""
dwavestop 0
name "Luka"
>............\
name ""
>Almost in a trance of ecstasy, I lie down on the ground.\
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_alice8,1
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>Well... That was pretty good for a first time.@
>You did good, Luka.\
name ""
name "Luka"
>You mean my first...?\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>No you idiot, mine!@
lsp 700,":a;chara\alice_st08b.bmp",67,0:print 10,500
>That was my first time having sex.@
>I was a maiden.\
name ""
name "Luka"
>Eh...!?\
name ""
>That can't be... The Monster Lord... Alice was a virgin?@
>Then what about the other stuff until today...?\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Ever since I was young, I was prohibited from coming into contact with humans.@
>The only semen I drank was stuff already squeezed out before.\
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
>Hehehe... Do you know what it means to take the virginity of a monster?@
>Taking responsibility for that is going to be rough on a humans body...\
name ""
name "Luka"
>B...But you forced yourself on me...@> This is too unreasonable...\
name ""
>As I mumble that to myself, I lose consciousness.\
bgmstop
gosub *anten
bgm "bgm\gordport.ogg"
>The next morning...@
>We head back to the basement of the Ilias Kreuz headquarters where the egg was sitting.\
dwave 1,"se\asioto3.ogg"
sean_change "bg139"
bgm "bgm\sinpi1.ogg"
name "Luka"
>It's finally time to hatch it...\
name ""
>I take out the six orbs, and line them up in front of the egg.@
>Each time I set one down, they start to radiantly shine, filling the room with their light.\
name "Luka"
>Uwa, look at them shining...@
>What do I do next?\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Next is the hatching ritual.@
>Two need to do the incantation...@
lsp 700,":a;chara\alice_st07b.bmp",67,0:print 10,500
>Ah.\
name ""
>Alice suddenly stiffens up with a surprised look on her face.\
name "Luka"
>Wh...What's wrong?\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>The ceremony requires magical power from two monsters...\
name ""
name "Luka"
>Isn't that a pretty big issue now?@
>Why didn't you mention that earlier...?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>I forgot all about that part until just now...@
>I can do one half, so for the other half...\
name ""
name "Luka"
>Will we have to find a monster nearby to help us...?\
name ""
name "Alice"
>If I give an order, one will be forced to help.@
>Is that what you want to do?\
name ""
name "Luka"
>Hrrmm... Well...\
name ""
>As I consider what to do...\
cspl 699,700:print 10,1500
name "???"
>This seems to be a job for...\
name ""
lsp 700,":a;chara\amira_st11.bmp",0,100:print 10,1500
>A strange garbage can crashes down the stairs!\
name "Luka"
>Y...You...!\
name ""
bgmstop
bgmonce "bgm\battlestart.ogg"
lsp 700,":a;chara\amira_st12.bmp",0,100:print 10,1500
eng "Unfortunate Lamia appears!":$sel6/
wait 300
delay 4000
bgm "bgm\amira.ogg"
\
name "Luka"
>...Still hiding in garbage cans?@
>Ilias Kreuz is no more, you don't need to hide...\
name ""
name "Amira"
>I can't get out.\
name ""
name "Luka"
>I see...\
name ""
name "Amira"
>Anyway, I just happened to be stalking you today, and heard what you were talking about!@
>I'm a monster, so I can assist you in the ritual!\
name ""
name "Luka"
>Can Amira do it, Alice?\
name ""
lsp 699,":a;chara\alice_st91b.bmp",-110,0
lsp 700,":a;chara\alice_st01b.bmp",-110,0
lsp 701,":a;chara\amira_st12.bmp",160,100:print 10,500
name "Alice"
>She should be able to do it...@
>But are you sure, Amira? It consumes an awful lot of energy.\
name ""
name "Amira"
>I'll do anything for my darling!@
>...But first, get me out of here.\
name ""
name "Luka"
>Ah, sure...\
name ""
lsp 700,":a;chara\alice_st01b.bmp",-110,0
lsp 701,":a;chara\amira_st01.bmp",160,0:print 10,500
>I yank Amira out of the trash can.\
bgm "bgm\sinpi1.ogg"
name "Luka"
>...Thank you, Amira.@
>I'll be counting on you for the ritual.\
name ""
>I've already set up the orbs, so it's up to those two to do the incantation now I guess.\
name "Alice"
>Let us begin, Amira.@
>Just face toward the egg, and repeat my words.\
lsp 700,":a;chara\alice_st04b.bmp",-110,0:print 10,500
>...Listen, child of the holy bird who has yet to hatch in this world.\
name ""
name "Amira"
>...Listen, child of the holy bird who has yet to hatch in this world.\
name ""
name "Alice"
>One who's wings are free to soar over the sky...\
name ""
name "Amira"
>One who's wings are free to soar over the sky...\
name ""
dwave 1,"se\power.ogg"
>As they begin to speak, I feel energy begin to fill the room.@
>It feels like life itself is radiating from the giant egg in front of me.\
>Then...\
lsp 700,":a;chara\alice_st03b.bmp",-110,0:print 10,500
name "Alice"
>Now wake, Garuda!\
name ""
name "Amira"
>Now wake, Garuda!\
name ""
>As the two shout that order at the egg, a crack appears from the egg, shooting forth dazzling light.\
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,1000
cspl 699,701
lsp 700,":a;chara\galda_st01.bmp",0,0
csp 2:print 10,1000
>...As the light fades, a giant monster is in the center of the room!\
name "Luka"
>Wah!@> I...It's huge...\
name ""
lsp 699,":a;chara\alice_st91b.bmp",-160,0
lsp 700,":a;chara\alice_st01b.bmp",-160,0
lsp 701,":a;chara\galda_st01.bmp",0,0:print 10,500
name "Alice"
>Hmm, it looks like she hatched without any trouble.@
>She sees us as her parents, so she'll do anything we say.\
name ""
lsp 701,":a;chara\galda_st03.bmp",0,0:print 10,500
name "Garuda Girl"
>Kuee!\
name ""
>The Garuda Girl happily flaps her wings at Alice's words.@
>It looks like she's really attached already...\
name "Luka"
>She's actually kind of cute, in a way.\
>...By the way, Alice...@
>You said that it would consume a lot of energy, are you feeling alright?\
name ""
csp 701
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Hmph, that wasn't anything.@
>The amount of energy that consumed is barely a rounding error to me.\
name ""
csp 699
lsp 700,":a;chara\amira_st02.bmp",0,0:print 10,500
name "Amira"
>As for me... That was 99% of my energy.\
name ""
name "Luka"
>Uwa!@> Amira!?\
name ""
>Amira's eyes roll up into her head as she spasms on the ground.\
name "Luka"
>A...Are you OK?\
name ""
name "Amira"
>I'm fine, it was just a momentary seizure.@
>More importantly... We have to name our child, Luka.\
name ""
name "Luka"
>...Please don't ever call her "our child" again.\
name ""
name "Amira"
>My name is Amira, so...@>How about Arimaakul, the fearsome Adurag of Love?\
name ""
name "Luka"
>A...Absolutely not!\
name ""
lsp 699,":a;chara\alice_st91b.bmp",-110,0
lsp 700,":a;chara\alice_st01b.bmp",-110,0
lsp 701,":a;chara\amira_st02.bmp",160,0:print 10,500
name "Alice"
>How about Galda, a little variation on Garuda?\
name ""
name "Luka"
>I uh... Guess that's fine...?\
name ""
>It doesn't sound too unique, but I guess it's fine.@
>It's better than Arimaakul-whatever.\
name "Luka"
>Alright, then your name is Galda!\
name ""
cspl 699,701
lsp 700,":a;chara\galda_st02.bmp",0,0:print 10,500
name "Galda"
>Kweh!@>Kweh!\
name ""
>Galda seems to be happy with it, too.\
lsp 700,":a;chara\amira_st02.bmp",0,0:print 10,500
name "Luka"
>Alright Amira, shall we take you to the inn?\
name ""
name "Amira"
>That won't be necessary.@
>My standing image forces me to pose like this, so I don't ever really get tired.\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,500
>Amira quickly crawls away.\
>Now that I think on it, Amira has helped me a lot during this journey...@
>I'll have to make sure my ideal comes true for her sake, too.\
name "Luka"
>Alright, let's go Alice!\
name ""
lsp 699,":a;chara\alice_st91b.bmp",-160,0
lsp 700,":a;chara\alice_st01b.bmp",-160,0
lsp 701,":a;chara\galda_st02.bmp",0,0:print 10,500
name "Alice"
>Yeah... We're finally off to the northern continent.\
name ""
name "Galda"
>Kweh!!\
name ""
>Galda happily cries out, then extends her wings.\
name "Alice"
>Alright, I'm getting on.\
name ""
>Alice gently jumps on top of Galda's back.\
>I timidly follow her, climbing onto Galda's back.\
name "Luka"
>But... Can we really fly in the sky like this?@
>Won't we get shaken off, or something...?\
name ""
name "Alice"
>It's fine, she's a legendary bird.\
name ""
>...Why does that make it fine?\
name "Luka"
>Alright, let's head to Hellgondo!@
>Let's go, Galda!\
name ""
name "Galda"
>.................\
name ""
name "Alice"
>Galda, take me to Hellgondo.\
name ""
lsp 701,":a;chara\galda_st03.bmp",0,0:print 10,500
name "Galda"
>Kue!\
name ""
>Galda flaps her wings at Alice's words, taking off.\
name "Luka"
>Eh?@>But...@
>Why not me...?\
name ""
>I'm suddenly depressed at Galda ignoring me...@
>But now's not the time for that!@> I grab hold of her feathers as Galda rises into the air.\
bgm "bgm\galda.ogg"
cspl 699,701
bg "bg\bg140.bmp",10,1000
name "Luka"
>Uwaa!@
>We're flying!@>We're flying!!\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...Of course we are.@> What did you think was going to happen after we got on Galda's back?\
name ""
name "Luka"
>Uwa... That's Gold Port!@> It's so tiny!@
>The sea is huge!@> And look at that huge beach!@
>And the sky!@> The sky, Alice, the sky!!\
name ""
name "Alice"
>...Shut up, calm down.\
name ""
>This is my first time flying in the air...@
>But Alice looks almost bored.\
name "Luka"
>And we're going so fast...@
>By the way, how far away is the northern continent?\
name ""
name "Alice"
>From Gold Port... About one hour.\
name ""
name "Luka"
>That fast!?@
>Wow Galda, you're amazing!\
name ""
name "Galda"
>Kweh!\
name ""
>Galda happily cries out at my praise.@
cspl 699,701:print 10,500
>After a while... The other continent comes into view.\
>Huge mountains ring the shore, seemingly piercing right into the clouds themselves.@
>Hellgondo... The last location on my journey...\
name "Luka"
>It's finally time...\
name ""
>My body shakes, as I feel my fighting spirit start to rise up in me.@
>At last, the place I've been aiming towards this whole journey is in view...\
name "Luka"
>...What's that?@>Something's coming!\
name ""
>As we get closer to the continent, something flies toward us like an arrow!\
r@k@\
goto *wyvern_start



*sean0281

bgm "bgm\galda.ogg"
r@k@\
>I was able to beat her somehow, using the power of fire...\
>I don't see any other monsters...@
>But we might be attacked again if we stay in the air too long.\
name "Luka"
>Alright Galda... Let's land!\
name ""
name "Galda"
>.............\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Galda, let's land.\
name ""
name "Galda"
>Kweh!\
name ""
>Galda begins to head toward the ground as soon as Alice tells her to.\
name "Luka"
>Why doesn't she listen to me...?@
>That kind of hurts...\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Idiot...\
name ""
>Galda lands on the ground as Alice insults me.@
bgm "bgm\manotairiku.ogg"
bg "bg\bg142.bmp",10,500
>The atmosphere quickly gets heavy, and the air gets a chill to it as we step off Galda's back.\
name "Luka"
>This is Hellgondo...\
name "Luka"
>This place feels strange...\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>The clear air feels nice.@
>Ahh, my birthplace is the best.\
name ""
>On the other hand, Alice seems happy here.@
>I almost forgot that this is where she had spent most of her life...\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Anyway... We have to go on the ground from here.@
>Riding on Galda would make us stand out way too much.\
name ""
name "Luka"
>That's fine... But what will Galda do?\
name ""
>Won't she be in danger here on her own?@
>Besides, she was just born only a few hours ago...\
name "Alice"
>She'll be fine on her own.@
>No human will step foot on this land, and no other monster will attack her.\
lsp 699,":a;chara\alice_st91b.bmp",-160,0
lsp 700,":a;chara\alice_st01b.bmp",-160,0
lsp 701,":a;chara\galda_st02.bmp",0,0:print 10,500
>...Got that, Galda?\
name ""
name "Galda"
>Kweh!\
name ""
csp 701
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
>Galda lets out a happy cry, then takes off into the air.@
>So, now we're on foot again...\
name "Luka"
>But where are we right now...?\
name ""
>I open up my map, but it's pointless since I don't know where we are.@
>It looks like I'll have to rely on Alice here...\
name "Alice"
>Right now we're at the southernmost tip of the continent.@
>If we head straight north, we should reach the Monster Lord's castle in a few days.\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
>But... Before that, there's somewhere I want to go.\
name ""
name "Luka"
>...Where's that?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...Remina.\
name ""
name "Luka"
>Remina?\
name ""
>The town where that slaughter took place thirty years ago...@
>It's said nothing lives there now, just the ruins remain.\
name "Alice"
>Something happened there... I want to check it out for myself.\
name ""
name "Luka"
>That's true, I'm sure it's worth checking out...\
name ""
>I take out the map again.\
>If we're here at the southern tip, then...@
>Oh, it looks like it will only be about a day to the northwest, that isn't so bad.\
name "Luka"
>Hmm...?@>What's this?\
name ""
>I see something strange marked to the east.@
>"Sealed Sinner's Prison"\
name "Luka"
>Sealed Sinner's Prison...?@
>Do you have a prison for monsters on this continent?\
name ""
name "Alice"
>I'm not positive, but...@
>Humans who committed serious crimes in the past had their souls sealed there by Ilias.\
>It's said she put them there to make sure their souls would never know peace.\
name ""
name "Luka"
>To make sure they never had peace...?@
>Just what did those sinners do...?\
name ""
>Even if they broke one of her five commandments...@
>Sealing their souls up here is pretty serious.\
name "Luka"
>Hmm...@> Mind if we stop by?\
name ""
name "Alice"
>What have we come all this way for, you idiot?@
>Are you really going to make a side trip just to satisfy your curiosity at this point?\
name ""
name "Luka"
>It's more than just curiosity...@
>I almost feel like I have to go.\
name ""
>I feel something mysterious from this mark on the map...@
>It's almost as if my heart is pulling me there.\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>It's your journey, I won't interfere with it.@
>...Idiot.\
name ""
>As Alice sighs at me...@
dwave 1,"se\earth1.ogg"
quake 10,1000
>Something nearby causes the earth to shake!\
cspl 699,700:print 10,500
name "Luka"
>What!?@> An earthquake!?\
name ""
>No, this isn't an earthquake...@
>It's...@>Footsteps?\
r@k@\
goto *kyoryuu_start



*sean0282

bgm "bgm\manotairiku.ogg"
r@k@\
name "Luka"
>I... I managed to pull that off...\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>You've become awfully strong to be able to beat a monster like that.\
name ""
name "Luka"
>W...@> Wa...@> Was...@>WAS THAT PRAISE!?\
name ""
lsp 700,":a;chara\alice_st07b.bmp",67,0:print 10,500
name "Alice"
>Annoying as always...\
name ""
cspl 699,700:print 10,500
>...I shouldn't tease Alice like that when we're in dangerous territory.@
>Wouldn't want to get attacked off guard.\
>I should decide where to go quickly...\
name "Luka"
>Now then...@>Of course the final destination is the Monster Lord's castle...@
>But we want to stop by Remina, too...\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Yes... Even though Remina is close to the castle, I've never been there.@
>I want to examine the area with my own eyes.\
name ""
name "Luka"
>And... I'm kind of curious about the "Sealed Sinner's Prison".\
name ""
cspl 699,700:print 10,500
>So there are a couple choices, I guess...@
>Now then, where to?\
r@k@\
mov %genzaiti,16
mov %gloval1_story_sinkou,10:gosub *savegloval1
goto *map7



*sean0283

gosub *genzaiti_bg
name "Luka"
>Alright, let's go to Remina.\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Yes...\
name ""
>With a somewhat gloomy face, Alice nods.\
dwave 1,"se\asioto2.ogg"
sean_change "bg143"
bgm "bgm\remina.ogg"
name "Luka"
>Wow...\
name ""
>All I can see in every direction is ruins.@
>Toppled buildings and stone strewn all over.\
>There are even bones all over the place...@
>This place looks like it was abandoned hundreds of years ago.\
name "Luka"
>There was a mass slaughter here thirty years ago...\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Not just the slaughter, but the city itself was destroyed.@
>It's almost like they were trying to erase the city itself.\
name ""
name "Luka"
>Just who did this...?\
name ""
dwave 1,"se\asioto2.ogg"
>Anxious, I start walking into the town.@
>I turn down a path that looks like it may once have been the main street...@>But it's covered in grass now.\
name "Luka"
>Look, Alice...@> That bone.\
name ""
>A long bone near a destroyed building...@
>It looks like it came from a long snake.\
>That must have come from a Lamia...\
name "Luka"
>That confirms it, monsters were killed here as well.@
>Just what in the hell happened?\
name ""
>As I frown at the horrible scene, I suddenly feel something behind me.\
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>Luka, something's here!\
name ""
name "Luka"
>Yeah, I feel it...!\
name ""
>In the next moment, a strange creature jumps out of a ruined building!\
r@k@\
cspl 699,700
goto *c_beast_start



*sean0284

bgm "bgm\remina.ogg"
r@k@\
name "Luka"
>What the hell was that...?\
name ""
>It moved like a beast, but it didn't feel like a living creature at all.\
>Why is there such a strange creature here in Remina...?\
name "Luka"
>That's right... Where's Alice?\
name ""
>I listen to the voice of the wind, trying to sense where Alice is...\
>It feels like the innumerable enemies are swarming towards her as she goes on a rampage.\
name "Luka"
>This way...?\
name ""
dwave 1,"se\asioto1.ogg"
bg "bg\bg144.bmp",10,1500
>As I run after Alice...@
>I come across the lifeless corpses of three of those Chimera Beasts.\
>It doesn't feel like Alice is in trouble yet, and is easily destroying any she comes across...\
name "Luka"
>Oi, oi...@>Is it really OK for the Monster Lord to be doing this?\
name ""
>Isn't it bad for the Monster Lord to be killing other monsters like this?@
>Wait... Are these things even really monsters?\
>These seem like completely new types of monsters... Alice didn't even recognize them.@
>Are they some sort of mutation...?\
name "Luka"
>..............\
name ""
>As I continue racing toward Alice...@
lsp 700,":a;chara\stein_st01r.bmp",0,0:print 10,500
wait 1000
csp 700:print 10,500
>I catch a glimpse of a woman in a white coat!\
name "Luka"
>Her!?\
name ""
dwave 1,"se\asioto1.ogg"
>She vanished too fast for me to confront her...@
>But that woman...\
if %ivent05=0 && %check01=0 mov $sel1,"I'm sure I saw her in Grangold..."
if %ivent05=1 && %check01=0 mov $sel1,"She was at Chrome's mansion..."
if %ivent05=0 && %check01=1 mov $sel1,"I saw her at Lily's place..."
if %ivent05=1 && %check01=1 mov $sel1,"She was trying to give something to Chrome, and I saw her again at Lily's place..."
eng $sel1:$sel6\
>And she matches the description of the mystery woman from Grangold...\
>Her name was Promestein, right...?@
>Why is she in Remina?\
name "Luka"
>Is she a survivor of Remina...?\
name ""
>No, it was destroyed 30 years ago.@
>A survivor wouldn't have lasted this long, or at the least would look older.\
>It seems more likely that she probably had something to do with its destruction...\
name "Luka"
>...Wh...What...?\
name ""
>A chill runs down my back.@
>I feel something strange nearby...@
>What is this...?\
name "Luka"
>S...Show yourself!\
name ""
>I pull out my sword and shout towards where I feel the presence.@
>This strange feeling...@>I've felt it before.\
r@k@\
goto *c_dryad_vore_start



*sean0286

bgm "bgm\remina.ogg"
r@k@\
name "Luka"
>Haa... Haaa...@
>Just what was that...?\
name ""
>Another strange parasitic plant monster...@
>Was Remina attacked by these...?\
name "Luka"
>Hmm...?@>What's this?\
name ""
>I find something that looks like a white feather, stuck underneath some weeds.@
>The feather emits a faint light as I hold it into the air.\
name "Luka"
>It this a Harpy feather...?\
name ""
>As I puzzle over the strange feeling I get from the feather...\
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>............\
name ""
>Alice, covered in blood from head to tail appears in front of me.\
name "Luka"
>Wah!@> You're all bloody!\
name ""
name "Alice"
>Hmph, it's their blood.@
>They couldn't put a scratch on me.\
name ""
name "Luka"
>..............\
name ""
>She's the Monster Lord, all right...@
>I can't sense any of the monsters from before around us any longer.\
name "Luka"
>Just what's going on here...?@
>Those strange monsters, and that strange woman in the white coat...\
name ""
name "Alice"
>That feather...\
name ""
>Alice snatches away the feather I found.\
name "Luka"
>Oh, I found it here.@
>I wonder if it came from a Harpy that used to live here...\
name ""
name "Alice"
>No, that wouldn't have lasted thirty years.@
>This radiance that won't fade for a century...@> It's an Angel feather.\
name ""
name "Luka"
>An Angel!?@
>Why would something like that be here...?\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>............\
name ""
>Alice goes silent for a moment.@
>Then turns toward me.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>There's no reason to hang around here any longer.@
>More of those strange creatures are likely to show up, too...\
>Let's leave.\
name ""
name "Luka"
>But... I still haven't figured anything out.\
name ""
>This feather, that strange woman, those even stranger monsters...@
>There are too many unanswered questions.\
name "Alice"
>You won't find anything out by staying here.@
>Unless you want to exterminate every single one of those strange creatures?\
name ""
name "Luka"
>Well...\
name ""
>Something's off here.@
>Alice was the one who wanted to come here to begin with.\
name "Luka"
>...Did you figure something out?\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...It doesn't concern you.\
name ""
name "Luka"
>What's with that...?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>You came this far for peace, didn't you?\
name ""
name "Luka"
>Th...That's right...\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>Then only focus on humans coexisting with monsters in the future.\
>This town was destroyed decades ago.@
>It doesn't concern you right now.\
name ""
name "Luka"
>..............\
name ""
>Of course this concerns me...@
>This "Slaughter of Remina" is what really broke down relations to begin with.\
>But I know I won't get anything from Alice if she's acting like this.@
>It looks like she's upset...\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...You're a Hero, right?@
>Then you shouldn't know.@> No... You don't need to know.\
name ""
name "Luka"
>...I'm not a Hero.@
>I'm a fake, unbaptized one.\
name ""
>But she's probably right, I won't figure out anything more by hanging around here.@
>If we stay here too long, I'm sure we'll just get attacked again.\
>Looks like I'll be leaving without figuring out anything...\
name "Alice"
>If you're still worried about this town, then come investigate it yourself once everything's over.@
>After you create a world where humans and monsters can coexist.\
name ""
name "Luka"
>............\
name ""
>Just what happened here?@
>And what's Alice keeping from me...?\
cspl 699,700:print 10,500
dwave 1,"se\asioto2.ogg"
>I leave Remina with more doubts than what I came with.@
>Where should I go next...?\
r@k@\
mov %ivent15,1
mov %genzaiti,17
mov %gloval1_story_sinkou,10:gosub *savegloval1
bgm "bgm\manotairiku.ogg"
goto *map7



*sean0287

gosub *genzaiti_bg
name "Luka"
>Shall we head to Remina again?\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>You won't figure out anything as you are now, even if you went back.\
name ""
name "Luka"
>...I see, I got it.\
name ""
cspl 699,700:print 10,500
>I'm interested in what happened, but I'll listen to Alice.@
>There are other things I should focus on now, anyway.\
>I take out the map again.\
goto *map7



*sean0288

gosub *genzaiti_bg
name "Luka"
>Alright... Shall we head to the Sealed Sinner's Prison?\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...If you want to go so bad, then go.@
>It isn't far, anyway.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
>But not even monsters visit there.@
>Just what about it is making you so interested?\
name ""
name "Luka"
>I wonder what...?@>I don't even really know myself.\
name ""
>It's almost like I'm being pulled there...@
>Like I have to go.\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Sheesh.@
>Even after making it all the way here, you're still going on stupid side quests.\
name ""
cspl 699,700:print 10,500
dwave 1,"se\asioto2.ogg"
>We start to head to the east as Alice complains.@
>Along the way, I run into a monster!\
r@k@\
goto *vampire_start



*sean0288a

bgm "bgm\manotairiku.ogg"
r@k@\
name "Luka"
>Such powerful monsters are just walking around...@
>This place is crazy.\
name ""
>I sheathe my sword after somehow managing to defeat the Vampire.@
>But just as I started to relax, I feel another powerful presence approaching!\
>One after the other...@> There's no time to relax here!\
r@k@\
goto *behemoth_start



*sean0289

bgm "bgm\manotairiku.ogg"
r@k@\
name "Luka"
>Whew, I managed to defeat her somehow...\
name ""
>Strong monster after strong monster...@
>I can't let my guard down for even a moment on my way to this prison...\
dwave 1,"se\asioto2.ogg"
sean_change "bg145"
bgm "bgm\enrika.ogg"
name "Luka"
>This is the Sealed Sinner's Prison...?\
name ""
>I see something that looks like an altar, with a broken stone monument in the middle.\
>I expected some kind of dreary dungeon with criminals behind bars...@> But this atmosphere almost feels tranquil.\
>I even sort of feel at ease here.\
lsp 700,":a;chara\sylph_st21r.bmp",333,190:print 10,500
name "Sylph"
>Eh? Eh?@
>I smell my former master here...\
name ""
name "Luka"
>Former master...?\
name ""
name "Sylph"
>Ehehe, this is so nostalgic! \
name ""
csp 700:print 10,500
>Sylph looks happy for some reason...@
>Her former master was sealed here...?\
name "Luka"
>Only horrible criminals were sealed here, right?\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Yes... Though their bodies rotted away, their souls are stuck here.@
>Unable to talk or communicate with the living world, nor able to turn toward the world of the dead.\
name ""
name "Luka"
>I...I wonder what that huge criminal's name was...?\
name ""
cspl 699,700:print 10,500
>As I look for a name on the monument...\
bgm "bgm\kiki2.ogg"
name "Luka"
>...Heinrich Hein!?\
name ""
>That name...@
>It's the Legendary Hero Heinrich!?\
name "Luka"
>Th...That can't be...@>It must be someone with the same name...\
name ""
>He was the great Hero who defeated the evil Monster Lord and brought peace to the world.@
>How could he be sealed here as a criminal...?\
>It... It has to just be someone with the same name, right?\
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Luka...@
>In the human stories, what is said to have happened to the Hero Heinrich?\
name ""
name "Luka"
>After he defeated the Monster Lord, it's said Ilias led him to heaven...\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>What a vague ending, almost like a fairy tale.@
>That sounds like something appended to the story since nobody knew what happened to him.\
name ""
name "Luka"
>Was this an act of monsters...?@
>Ilias couldn't have sealed the Hero Heinrich, so was it the next Monster Lord...?\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>I haven't heard of anything like that.@
>Besides... This strong seal is undoubtedly Ilias' work.\
name ""
name "Luka"
>.............\
name ""
>Just what is going on here...?@
>How could the Hero Heinrich be sealed as a criminal...?\
name "Alice"
>A crime so serious that she would make sure he never had peace...@
>I can only think of one thing that would bring that from her.\
name ""
>The worst of the five prohibitions to break...\
name "Luka"
>Rebelling against Ilias...\
name ""
>The only crime worthy of such a harsh punishment would be to rebel against a god.@
>But could Heinrich really have rebelled against Ilias?\
>Did he turn evil himself after defeating the evil Monster Lord?@
>I don't even want to think he did...\
name "Luka"
>That can't be...@> What happened...?\
name ""
bgm "bgm\enrika.ogg"
name "Alice"
>...There's quite a lot of troubling issues here.@
>But standing here and thinking about them until we're senile won't solve anything.\
>Besides, you can't dawdle here forever, can you?\
name ""
name "Luka"
>Th...That's right...\
name ""
cspl 699,700:print 10,500
>There's a lot of questions racing through my mind, but I won't figure anything out just standing here.\
>I push aside my worries for the moment, and start to leave.\
name "Luka"
>...Hmm?\
name ""
>As I turn my back to the monument...@
>I think I see Angel Halo brightly flash for a moment.\
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>What's wrong, Luka?\
name ""
name "Luka"
>Err, I thought I saw my sword react to something...@
>Was it just my imagination?\
name ""
cspl 699,700:print 10,500
>I leave the Sealed Sinner's Prison with a puzzled look on my face.@
>I'll have to investigate why Heinrich's soul is sealed here...\
>I can't do anything at the moment, though... There's no more wasting time.\
>Now for our next location...\
r@k@\
mov %ivent16,1
mov %genzaiti,18
mov %gloval1_story_sinkou,10:gosub *savegloval1
bgm "bgm\manotairiku.ogg"
goto *map7



*sean0290

gosub *genzaiti_bg
name "Luka"
>Shall we head back to the Sealed Sinner's Prison again...?\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>You won't learn anything even if you go back.@
>But if you want to waste your time that badly, I won't stop you.\
name ""
name "Luka"
>Ah, you're right...\
name ""
cspl 699,700:print 10,500
>I want to find out why he's sealed there...@
>But I don't have time right now.\
>Now for our next location...\
goto *map7



*sean0291

gosub *genzaiti_bg
name "Luka"
>Alright, on to the Monster Lord's Castle!\
name ""
>At last, my final destination is before me...@
>The ending point of my adventure!\
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Do you have anything left unfinished here?@
>The Monster Lord's Castle is the end of your journey, after all.\
name ""
csel "No",*sean0293,"Yes",*sean0292



*sean0292

name "Luka"
>Ah, I do have something left to do...\
name ""
>I take out my map again...\
goto *map7



*sean0293

name "Luka"
>Finally, it's time for the Monster Lord's Castle!\
name ""
>The place where the Four Heavenly Knights are waiting, and the final destination of my adventure...@
>My long journey is almost at its end.\
name "Alice"
>Prepare yourself, Luka.@
>The fights in the Monster Lord's Castle will be difficult.\
name ""
name "Luka"
>I've been ready for this since the start!@
>Alright, let's go!\
name ""
cspl 699,700:print 10,500
>The Four Heavenly Knights have been going wild all over the world, striking fear into the hearts of humans everywhere.@
>But I know now that they aren't all evil...\
>If I persuade them and show them my power, I'm sure I can convince them to trust me...@
>After battling them, I'm sure I can reach them...\
>Thinking that, I head toward the castle.\
dwave 1,"se\asioto2.ogg"
sean_change "bg009"
bgm "bgm\yaei.ogg"
>As night falls, we make our final camp.@
>After finishing her meal, Alice starts to speak.\
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...This is the last training I'll be having with you.\
name ""
name "Luka"
>Ah, I guess that's right.\
name ""
>That's a pretty lonely thought, actually.@
>Alice has been training me for so long, after all...\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Suitable for our final training, I'll be teaching you an ultimate skill.@
>It's an ultimate attack that uses all four spirits at once.\
name ""
name "Luka"
>A...All four at once...?\
name ""
>Just what kind of skill could use all four at once...?\
name "Alice"
>Just do what I say for now.@
>First, point your sword toward the sky and summon the power of wind into your blade.\
name ""
name "Luka"
>Alright...@> I'm counting on you, Sylph!\
name ""
dwave 2,"se\wind2.ogg"
lsp2 0,":a;chara\sylph_st12.bmp",200,300,100,100,0,200
gosub *syoukan_effect
>I raise my sword, and fill it with the power of wind.@
>I've been using the power of the wind for a while now, so it isn't too difficult.\
name "Alice"
>Next...@>Put the power of the earth into your blade at the same time.@
>Of course, without letting the power of wind dissipate.\
name ""
name "Luka"
>Got it...@>Gnome!\
name ""
dwave 2,"se\earth1.ogg"
lsp2 0,":a;chara\gnome_st21.bmp",200,300,100,100,0,200
gosub *syoukan_effect
>...This is pretty hard.@
>The wind and earth aren't mixing too well...\
quake 5,500
>If I lost my concentration for even a moment, they would break apart...\
name "Luka"
>This is... Quite difficult...@
>What's next...?\
name ""
name "Alice"
>Next is water.@
>Like the Earth and Wind, mix them together in your sword.\
name ""
name "Luka"
>U...Undine...\
quake 5,500
>Wawawa...!\
name ""
dwave 2,"se\aqua2.ogg"
lsp2 0,":a;chara\undine_st11.bmp",200,300,100,100,0,200
gosub *syoukan_effect
quake 10,1000
>My sword flashes as it feels like the ground itself is shaking under my feet.@
quake 10,500
>It's almost impossible to keep the three elements in balance...\
name ""
name "Luka"
eng "T...This is... Hard...! Wawa!":$sel6/
quake 10,1000
\
name ""
name "Alice"
>...Next, the power of fire.@
>Concentrate all four elements in your sword.\
name ""
name "Luka"
>M...More...!?@
>S...Salamander...\
quake 10,1000
>Aiiee!\
name ""
dwave 2,"se\fire2.ogg"
lsp2 0,":a;chara\salamander_st02.bmp",200,300,100,100,0,200
gosub *syoukan_effect
quake 15,1000
>My sword swings through the air, with me barely managing to hold on.@
>Flames and spouts of water shoot off my sword, as the wind tosses it around and the earth makes it almost too heavy to hold.\
>Rather than balancing all four spirits, it's almost like it's a tug of war with them pulling in every direction at once.\
quake 15,1000
name "Luka"
>I...I can't hold on!@
>This is too much!\
name ""
name "Alice"
>Now slash with your sword.\
name ""
name "Luka"
eng "Uh.... Uwawawa!":$sel6/
quake 15,1000
\
name ""
>As I swing my sword down...@
>The crazy power pulling my sword from every direction goes shooting straight into the ground!\
dwave 1,"se\bom1.ogg"
cspl 3,7
cspl 599,701
bg white,10,1000
quake 10,2000
bg "bg\bg009.bmp",10,1500
gosub *setwindow_01p
name "Luka"
>Hyaaaaa!!\
name ""
dwave 3,"se\earth1.ogg"
lsp 2,":a;effect\earth.bmp",0,0:print 1
wait 100
dwave 5,"se\fire2.ogg"
lsp 2,":a;effect\fire.bmp",0,0:print 1
wait 100
dwave 4,"se\aqua2.ogg"
lsp 2,":a;effect\aqua.bmp",0,0:print 1
wait 100
dwave 2,"se\wind2.ogg"
lsp 2,":a;effect\wind.bmp",0,0:print 1
wait 100
csp 2:print 18,500,"system\mask01.jpg"
dwave 1,"se\bom3.ogg"
>The ground splits in two with flames raging around the fissure, and cold gusts of wind blowing around the area.@
>All four powers combined for a moment, and exploded in overwhelming power...\
name "Luka"
>Wawa...@>Th...That was incredible...\
name ""
>I can't even see the bottom of the split in the earth...@
>Stunned at the power, I just stare into the crack.\
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>This destructive force...@>That wasn't as powerful as I was hoping for.\
>The earlier power of your attributes was overwritten by the later ones...\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
>As far as I can see, wind was a five, earth was a seven, water was a nine, and fire was a ten.@
>...With poor balance like that, it won't go so well.\
name ""
name "Luka"
>Oi, oi...@>I think it went pretty well myself...\
name ""
name "Alice"
>The power of this skill is amplified by each spirit imbued in it.@
>But if all four were at a power of ten, it wouldn't be ten times four for forty...\
>It would be ten to the fourth power for 10,000...@
>This is the ultimate skill, Quadruple Giga.\
name ""
name "Luka"
>Quadruple Giga...\
name ""
dwave 1,"se\fanfale.ogg"
mov %skill01,15
>[Quadruple Giga] was learned!\
name "Alice"
>The skill takes a while to pull off.@
>To get all four elements into your sword, it will take four turns.\
>If you get hit in the meantime...@
>Your concentration will fail, and so will the skill.\
>One more issue...@
>When you start the skill, any spirits you have summoned will vanish.\
name ""
name "Luka"
>So you mean I'd have to make the enemy stop attacking me for four turns somehow...?\
name ""
name "Alice"
>Yes, that's right.\
name ""
>No enemy would just wait for that to happen.@
>As it is now, there's no way I could use this skill in a fight.\
name "Luka"
>It looks like I'll have to figure out a better way to use it before it's viable for a fight...\
>...Now then, where's the horrible story that goes with it?@
>I've finally learned a move that looks and sounds Hero-like, so I'm sure it's something disgusting.\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>Yes...@> It's a truly disgusting tale among monsters.@
>The Hero Heinrich defeated Alipheese the Eighth with this skill.\
name ""
name "Luka"
>H...Heinrich did...?@
>He used that to defeat the eighth Monster Lord?\
name ""
>It doesn't just seem like a Hero-like skill...@
>It's the true deal, an actual Hero skill!\
name "Luka"
>Thank you, Alice...@
>But how did you even know about a skill like this...?\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>So that we would never experience a humiliating defeat from it again, it has been handed down among Monster Lords since Alipheese the Eighth's death.\
>Ironically enough...@> It was never passed down among the human side, so it would have been safer to have let it fade into obscurity altogether.\
name ""
name "Luka"
>Until me...\
name ""
name "Alice"
>Yes... I'm entrusting it to you.@
>Make sure you lead the world to peace using it...@>...Got it?\
name ""
name "Luka"
>Yeah, got it!\
name ""
>The ultimate skill obtained right before the final area...@
>I'll bring my ideal to fruition using it for sure!\
bgmstop
sean_change "bg147"
bgm "bgm\manotairiku.ogg"
>I'm here...@
>The final location of my long journey...\
name "Luka"
>The Monster Lord's Castle...\
name ""
>The atmosphere isn't as fearful as I thought it would be.\
>It's a very elegant, grand looking place.@
>But it's a lot larger than the castles humans have built.\
name "Luka"
>Outside of how big it is, it looks like a common castle...@
>I was expecting something a little more... Terrifying.\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>My subordinates and I live here.@
>Why in the world would I ever want to live somewhere unpleasant looking?\
name ""
>...She has a point.\
>I was unconsciously expecting it to look like something horrible...@
>It seems like I still have some prejudices I need to work out.\
name "Luka"
>Alright, let's go inside.@
>Are you ready, Alice?\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>No...@>This is where I part with you, Luka.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
>I'm the Monster Lord, and I live here.@
>It wouldn't do for me to accompany the Hero as he enters.\
name ""
name "Luka"
>Ah, I guess that makes sense.@
>Then I'll head in alone.\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Well then, Luka...@
>Make sure you finish your duty as a Hero.@>No matter how difficult it gets.\
name ""
name "Luka"
>...Eh?@> Y...Yeah...\
name ""
dwave 1,"se\escape.ogg"
cspl 699,700:print 10,500
>Leaving those parting words, Alice vanishes.@
>I turn back toward the Monster Lord's Castle.\
name "Luka"
>Alright, here I go!\
name ""
>The strongest monsters, and the Four Heavenly Knights are waiting here...\
>I'll have to persuade Tamamo and Alma Elma to stop doing things that harm humans...@
>As for Erubetie, I'll have to show her a new way for us to coexist together...\
>Lastly, to accept Granberia's challenge as a fellow warrior...@
>With various goals to accomplish, I step into the castle.\
dwave 1,"se\asioto2.ogg"
bgmstop
sean_change "bg148"
bgm "bgm\maouzyou.ogg"
name "Luka"
>This place is huge...@
>I wonder if this is the right way to go...?\
name ""
>Luckily there aren't too many ways to choose, so I guess I'll just go straight for now.@
>It doesn't look like the castle itself will be too difficult to navigate through, but...\
name "Luka"
>...Show yourself!\
name ""
>I shout out at the monster hiding nearby.\
r@k@\
goto *esuccubus_start



*sean0294

bgm "bgm\maouzyou.ogg"
r@k@\
name "Luka"
>Whew...\
name ""
>I let out a sigh and put away my sword.@
>Just as I thought, the monsters here are really powerful...\
>With my fighting spirit ignited, I rush through the halls.\
dwave 1,"se\asioto3.ogg"
sean_change "bg148"
name "Luka"
>Is this the right way...?@
>Just where are the Four Heavenly Knights anyway?\
>You wouldn't think it would be this hard to find four powerful monsters...\
name ""
name "???"
>...There's no need to worry about that.@
>Those ladies are all waiting in the deepest part of the castle.\
name ""
name "Luka"
>Wh...Who is it!?\
name ""
r@k@\
goto *hatibi_start



*sean0294a

bgm "bgm\maouzyou.ogg"
r@k@\
name "Luka"
>Strong enemy after strong enemy...\
name ""
>But I came here knowing that it would be fierce fights one after the other.@
>With my fighting spirit still burning, I hurry forward.\
dwave 1,"se\asioto3.ogg"
bgmstop
csp -1
bg black,10,3000
textoff
gosub *setwindow_01
bg "bg\bg047.bmp",10,3000
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>Hmmhmm... Even Yao was defeated.@
>That Luka certainly turned into something.\
name ""
lsp 701,":a;chara\arumaeruma_st12.bmp",-200,0
lsp 700,":a;chara\tamamo_st01.bmp",225,0:print 10,500
name "Alma Elma"
>My weak little Luka-boy...@
>He has really improved.\
name ""
lsp 700,":a;chara\erbetie_st01.bmp",20,50
lsp 701,":a;chara\arumaeruma_st12.bmp",160,40:print 10,500
name "Erubetie"
>It doesn't matter.@
>I'll crush him if he challenges me.\
name ""
lsp 700,":a;chara\erbetie_st01.bmp",20,50
lsp 701,":a;chara\granberia_st04.bmp",200,0:print 10,500
name "Granberia"
>..............\
name ""
lsp 700,":a;chara\granberia_st04.bmp",200,0
lsp 701,":a;chara\arumaeruma_st11.bmp",-200,40:print 10,500
name "Alma Elma"
>...Now then, what shall we do?@
>Luka-boy will most likely make it here.\
name ""
lsp 701,":a;chara\arumaeruma_st11.bmp",-200,40
lsp 700,":a;chara\tamamo_st04.bmp",225,0:print 10,500
name "Tamamo"
>I don't mind.@
>I just want to play with him a lot...\
name ""
lsp 700,":a;chara\erbetie_st01.bmp",20,40
lsp 701,":a;chara\tamamo_st04.bmp",225,0:print 10,500
name "Erubetie"
>Letting a Hero just walk on through would shame the name of the Monster Lord.\
name ""
lsp 701,":a;chara\tamamo_st01.bmp",225,0:print 10,500
name "Tamamo"
>Then... Shall we use "that"?\
name ""
lsp 701,":a;chara\arumaeruma_st12.bmp",-200,0
lsp 700,":a;chara\tamamo_st01.bmp",225,0:print 10,500
name "Alma Elma"
>Is "that" still alive?\
name ""
name "Tamamo"
>It is.@> ...I think.@
>Want to give it a try?\
name ""
lsp 701,":a;chara\arumaeruma_st13.bmp",-200,0:print 10,500
name "Alma Elma"
>Hehe, that sounds interesting...\
name ""
lsp 700,":a;chara\erbetie_st01.bmp",20,40
lsp 701,":a;chara\tamamo_st01.bmp",225,0:print 10,500
name "Erubetie"
>There's no need for us to worry about him.@
>Just let "that" prey on him.\
name ""
lsp 701,":a;chara\tamamo_st04.bmp",225,0:print 10,500
name "Tamamo"
>Alright, then let's give it a try!\
name ""
lsp 700,":a;chara\granberia_st04.bmp",-160,0:print 10,500
name "Granberia"
>............\
lsp 700,":a;chara\granberia_st01.bmp",-160,0:print 10,500
>...You better come here to challenge me, Luka!\
name ""
bgmstop
csp -1
bg black,10,3000
textoff
gosub *setwindow_01
bg "bg\bg149.bmp",10,3000
bgm "bgm\maouzyou.ogg"
name "Luka"
>Uwa, this room is huge...@
>Am I almost at the deepest part?\
name ""
>As I look around the room, chills suddenly go down my back.\
name "Luka"
>Wh...What is it!?\
name ""
>I felt a sudden surge of intense magical power coming from somewhere in the Monster Lord's Castle.@
>Just what was that...?\
name "Luka"
>Is it getting close to me...?@
>Just what was that?\
name ""
>I nervously swallow and look around me.@
>Suddenly, I spot a small shadow behind a pillar!\
>Was the source of that huge burst of power coming from that small shadow!?\
name "Luka"
>S...Show yourself!\
name ""
name "???"
>Wawa!@>He saw me!\
name ""
>A small monster timidly steps out of hiding!\
r@k@\
goto *inp_start



*sean0294b

bgm "bgm\maouzyou.ogg"
r@k@\
name "Luka"
>Sheesh...\
name ""
>It looks like there are a lot of monsters that live here.@
>That Imp must have been a simple resident, not a soldier...\
name "Luka"
>I have to finish up here before I cause more trouble for the other monsters...\
name ""
>As soon as I'm about to keep walking on...@
dwave 1,"se\earth1.ogg"
quake 10,1500
>The ceiling in front of me falls to the floor, and a gigantic monster follows the debris!\
r@k@\
goto *gigantweapon_start



*sean0296

bgm "bgm\maouzyou.ogg"
r@k@\
name "Luka"
>Whew... I managed to be beat her somehow...\
name ""
>I let out a long, relieved sigh after the tough fight.\
name "Luka"
>But... Just what was she...?\
name ""
>Those chimeric monsters roaming around...@
>She seemed just like them.\
>But Tamamo said she was sealed since ancient times...@
>How could there be more just roaming wild?\
name ""
name "Luka"
>...I'd do better not worrying about it at the moment.@
>I have to keep going.\
name ""
>I shake off the things worrying me, and continue forward.\
dwave 1,"se\asioto3.ogg"
sean_change "bg047"
bgm "bgm\boss0.ogg"
>I'm able to easily walk through the hall without encountering any more enemies.@
>Until finally, I make it into a large room.\
>Right in the middle, all of the Four Heavenly Knights are waiting.\
lsp 700,":a;chara\arumaeruma_st11.bmp",0,0:print 10,500
name "Alma Elma"
>Welcome, Luka-boy! @
>I didn't think you'd really make it all the way here. \
name ""
lsp 701,":a;chara\arumaeruma_st11.bmp",-200,0
lsp 700,":a;chara\tamamo_st01.bmp",225,0:print 10,500
name "Tamamo"
>Oho, you defeated the Giganto Weapon?@
>I'm surprised myself.\
name ""
lsp 701,":a;chara\erbetie_st01.bmp",20,50
lsp 700,":a;chara\tamamo_st01.bmp",225,0:print 10,500
name "Erubetie"
>So you wasted all your time coming here just to be disposed of by us...@
>You're a strange one, indeed.\
name ""
lsp 700,":a;chara\erbetie_st01.bmp",20,50
lsp 701,":a;chara\granberia_st04.bmp",200,0:print 10,500
name "Granberia"
>............\
name ""
>All four of them are just standing in front of me.@
>Each one of them is more powerful than that Giganto Weapon I just fought...\
>Overwhelmed by their powerful presence, the breath catches in my throat.@
>But I quickly regain my composure, and don't let myself be daunted by them.\
name "Luka"
>...I didn't come here just to fight you.@
>I just want you all to stop harassing humans.\
>I think that would be best for relations between humans and monsters...\
name ""
csp 701
lsp 700,":a;chara\arumaeruma_st11.bmp",0,0:print 10,500
name "Alma Elma"
>Sorry, but I can't do that.@
>If we don't threaten humans with our power every so often, they'll eventually start to go around killing weaker monsters everywhere.\
name ""
lsp 701,":a;chara\arumaeruma_st11.bmp",-200,0
lsp 700,":a;chara\tamamo_st01.bmp",225,0:print 10,500
name "Tamamo"
>Humans look on us with nothing but hostility.@
>As long as that hatred is there, we'll be forced to use our power.\
name ""
lsp 701,":a;chara\erbetie_st01.bmp",20,50
lsp 700,":a;chara\tamamo_st01.bmp",225,0:print 10,500
name "Erubetie"
>After all the torment humans put us through, how can you say that now?\
name ""
lsp 700,":a;chara\erbetie_st01.bmp",20,50
lsp 701,":a;chara\granberia_st04.bmp",200,0:print 10,500
name "Granberia"
>You wasted your time if that's what you came here to say...\
name ""
name "Luka"
>I was hoping we could solve this by just talking...@
>But if not, I knew I would have to resort to this...\
name ""
>I calmly pull out my sword.\
name "Luka"
>You'll only recognize those that are powerful, right?@
>Then I'll surpass all of you!\
>I'll defeat you, and make you accept coexistence!\
name ""
csp 701
lsp 700,":a;chara\arumaeruma_st11.bmp",0,0:print 10,500
name "Alma Elma"
>That's right... Defeating us is one way for us to be persuaded.@
>If you can really defeat me, I'll think about it. \
name ""
>Alma Elma steps in front of me!\
r@k@\
goto *arumaeruma3_start



*sean0297

bgm "bgm\boss0.ogg"
r@k@\
name "Luka"
>.............\
name ""
>I did it... I beat Alma Elma...@
>I was able to fight a Heavenly Knight on equal terms, and win for the first time!\
lsp 700,":a;chara\arumaeruma_st51.bmp",0,0:print 10,500
name "Alma Elma"
>Hehe... The loser has no choice but to follow the winner.\
>Human and monster coexistence...@
>That's why you're wielding your blade, right?\
name ""
name "Luka"
>Yes, that's right.@
>I want you to help think of a way that doesn't involve terrorizing people...\
name ""
name "Alma Elma"
>I got it, I'll obey...@
>Besides, it's not like I particularly hold any dislike of humans.\
>I'd be so sad if the Colosseum were to go away.@>And I love human men so much. \
name ""
name "Luka"
>I believe in you.\
name ""
>Alma Elma won't attack humans anymore after this...\
>She is a Succubus, so certain things are unavoidable...@
>But I don't think she'll do it by fear, or harm humans any longer.\
csp 700:print 10,500
>That makes one...@
>There are three left...\
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
r@k@\
goto *tamamo2_start



*sean0298

bgm "bgm\boss0.ogg"
r@k@\
lsp 700,":a;chara\tamamo_st03.bmp",0,0:print 10,500
name "Tamamo"
>Erhg...@>You've really become quite strong.@
>I can't stand against you any longer.\
name ""
>Tamamo, who seemed so huge and imposing, bows her small head.@
>It almost seems unbelievable that this tiny girl was just destroying the castle...\
name "Luka"
>Is that the truth...?@
>If you haven't used your full power...\
name ""
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>In my village, humans and monsters are on good terms.@
>Betting on your dream doesn't sound too bad.\
name ""
name "Luka"
>...Yes, I'll be counting on you.\
name ""
>Tamamo accepted me.@
>Both my resolve, and my dream...\
>I was able to defeat two...@
>Now there's just two left...\
lsp 700,":a;chara\erbetie_st01.bmp",20,50
lsp 701,":a;chara\granberia_st04.bmp",200,0:print 10,500
name "Erubetie"
>...Well, Granberia?@
>Aren't you going next?\
name ""
name "Granberia"
>...No, you first.\
name ""
name "Erubetie"
>So you plan on being last...@
>But I'm sorry, for your turn shall never come.\
name ""
r@k@\
csp 701
goto *erbetie2_start



*sean0299

bgm "bgm\hutuu2.ogg"
r@k@\
name "Luka"
>Hey, Erubetie...@
>Coexistence doesn't mean you're forced to live together in the same place.\
>If the two sides negotiate, habitation zones can be set up to ensure that your race's homelands never get polluted...\
>As long as we live in peace and understanding, I'm sure it can work out.@
>Both sides just have to respect the other's wishes.\
>I think that would be the best thing for our world...\
name ""
name "Erubetie"
>...............\
name ""
name "Luka"
>First, I'll appeal to humanity.@
>That your race has been driven into a corner, and are suffering...\
>I'm sure if I talk to the right people, they'll help.\
name ""
name "Erubetie"
>Hmph. I'm not expecting much.\
name ""
csp 700:print 10,500
>Saying that, Erubetie moves away.\
>I don't know if my persuasion worked...@
>But it looks like Erubetie will at least stop for a little while.\
>That makes three Heavenly Knights.@
>All that's left is...\
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\granberia_st04.bmp",0,0:print 10,500
name "Granberia"
>..............\
name ""
name "Luka"
>Just you...\
name ""
lsp 700,":a;chara\granberia_st01.bmp",0,0:print 10,500
name "Granberia"
>Yes.@> I'm last.\
name ""
>Granberia quietly steps in front of me, blocking the large door behind her\
name "Granberia"
>Past here is the Monster Lord's throne...@
>As you know, Alipheese is not there.\
>Thus... Your purpose will be achieved if you defeat me.\
name ""
name "Luka"
>Yes... This is the last battle!\
name ""
>My adventure is over if I win this fight.@
>I'll have made all Four Heavenly Knights stop harassing humans...\
>It's a giant step forward for peace between us!\
r@k@\
goto *granberia4_start



*sean0300

bgm "bgm\boss0.ogg"
r@k@\
name "Luka"
>I...@> Won...?\
name ""
>Far from being ecstatic over my victory, I just stand with a blank expression on my face.\
>Granberia is on her knee in front of me...@
>That insanely strong swordswoman...@>Is this a dream?\
lsp 700,":a;chara\granberia_st04.bmp",0,0:print 10,500
name "Granberia"
>Yes... It's my loss.@
>That was truly a wonderful attack...\
name ""
>Granberia slowly gets up and lets out a sigh.@
>Although I didn't do enough to seal her, it seems like she isn't in any shape to fight any longer.\
>I beat Granberia...\
name "Luka"
>At last, all four...\
name ""
bgm "bgm\epilogue.ogg"
>I look around at the Four Heavenly Knights around me.\
>Alma Elma looks bored...@> Tamamo is smiling...@>Erubetie looks angry...@
>Now with Granberia, I beat all four!\
name "Luka"
>Alright... Don't trouble humans any longer like we promised.@
>In return, I'll make it so humans stop troubling monsters...\
name ""
lsp 700,":a;chara\granberia_st01.bmp",0,0:print 10,500
name "Granberia"
>...A soldier doesn't go back on their word.@>You have my promise.\
name ""
lsp 700,":a;chara\granberia_st01.bmp",200,0
lsp 701,":a;chara\arumaeruma_st11.bmp",-200,40:print 10,500
name "Alma Elma"
>Sure...@
>But I'm still allowed to appear in the Colosseum, right?\
name ""
lsp 700,":a;chara\tamamo_st04.bmp",225,0:print 10,500
name "Tamamo"
>I've always wanted to be friends with humans anyway. \
name ""
lsp 701,":a;chara\erbetie_st01.bmp",20,50
name "Erubetie"
>Humans have done us great harm, and made us suffer...\
name ""
name "Luka"
>Yes, but from now on---\
name ""
bgmstop
dwave 1,"se\earth1.ogg"
quake 10,1000
bgm "bgm\kiki2.ogg"
cspl 700,701:print 10,500
>Interrupting me as I speak, an incredible magical power floods the room.@
>We turn toward the large door leading to the throne room, where the power is coming from.\
csp 701
lsp 700,":a;chara\arumaeruma_st12.bmp",0,40:print 10,500
name "Alma Elma"
>This power... Her Majesty?\
name ""
lsp 700,":a;chara\granberia_st06.bmp",200,0
lsp 701,":a;chara\arumaeruma_st12.bmp",-200,40:print 10,500
name "Granberia"
>Alipheese...?@>She returned!?\
name ""
>The Four Heavenly Knights all look at each other in surprise.@
>What is Alice doing here...?\
cspl 700,701:print 10,500
>Suddenly, an amplified version of Alice's voice rings out of the hallway.\
name "Alice"
>Welcome Luka, victor over my Four Heavenly Knights...@>No... Welcome, Hero.\
>Now, appear before me!@
>The Monster Lord who rules over the monster domain!\
name ""
name "Luka"
>Wh...What are you talking about?@> Alice!?\
name ""
dwave 1,"se\trap.ogg"
>The huge door behind the Four Heavenly Knights slowly swings open.\
name ""
name "Luka"
>...Alice!?\
name ""
lsp 701,":a;chara\tamamo_st03.bmp",0,0:print 10,500
name "Tamamo"
>Wait, Luka!\
name ""
>I run through the open door, ignoring Tamamo's shout.\
dwave 1,"se\asioto4.ogg"
sean_change "bg141"
bgm "bgm\alice2.ogg"
>After running through the passageway, I come to the throne room...@
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
>Just as I thought, Alice is waiting here.\
>Alice stares at me as if I was a stranger before she starts to speak.\
name "Alice"
>...Hero. Well done making it here.@
>I am the Monster Lord, Alipheese the Sixteenth.\
name ""
name "Luka"
>H...Hey!@
>Quit joking around, Alice!\
name ""
>Alice glares at me with cold eyes as I look on in confusion.@
>It's as if she really is the cold blooded Monster Lord I first envisioned setting out...\
name "Alice"
>Now then...@>You came to defeat me, didn't you?@
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
>Take up your sword, Hero!@
>Burn the power of the Monster Lord into your eyes!\
name ""
name "Luka"
>..................\
name ""
>What kind of joke is this?@
>Is she trying to tease me again?@> When's she going to burst out into laughter and call me an idiot?\
>I'm not in the mood for jokes right now...\
name "Luka"
>Cut it out, Alice!@> I...\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Luka...@>You're a Hero, right?@
>If a Hero comes to the Monster Lord's Castle... There is only one thing they can do.\
name ""
name "Luka"
>Alice...\
name ""
>I just realized something...\
>This is no joke.@
>Alice is standing opposite me as a Monster Lord facing down a Hero who came to kill her...\
name "Luka"
>You...@> You couldn't be...!?\
name ""
>Alice's mother let herself be killed by a Hero for the sake of creating peace...@
>She thought that if a Hero slew her, it would bring about the end of hostilities...\
>And Alice said she was going to inherit her mother's will...\
name "Luka"
>Alice...@> A...Are you trying to sacrifice yourself like your mother!?\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>I am the Monster Lord, you are the Hero.@
>To battle is our fate.\
name ""
name "Luka"
>Are you trying to die!?@
>Letting yourself get killed by a Hero on purpose!?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>---Luka, this is my role as the Monster Lord.@
>As the one who rules over the monsters, it's my duty to seek peace between our races.\
>For that to occur, a ceremony, so to speak, is needed.\
>The masses need an easy to understand story to pass around.@
>A simple story of a Hero slaying the evil Monster Lord.\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
>It's an old tradition...@> A way to end the old era, and let everyone look toward the future...\
name ""
name "Luka"
>No way...\
name ""
>I know I said it to her...@
>To inherit the will of her mother...\
>But I meant her dream of peace, not of sacrificing herself for it!\
name "Luka"
>...Stop screwing around!@
>I never wanted you to do this!\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>It doesn't matter what you think.@
>This is my role as the Monster Lord.\
name ""
name "Luka"
>What the hell kind of role is that!?\
name ""
name "Alice"
>With this, the world will have peace.@
>After the death of their leader, the monsters will stop acting violently.\
>After that... I entrust the rest to you.@
>Greet the world as the Hero who slew the Monster Lord.\
name ""
name "Luka"
>I...@> I don't want to be a Hero like that...\
name ""
name "Alice"
>Don't say that...@>For the era to change, a great person is needed.@
>My mother knew that...@
>As the one who spoiled her plans, it's my duty to execute them again.\
name ""
>How long has Alice been thinking about this...?\
>Is that why she has been training me...?@
>Why she has helped me for so long?\
name "Luka"
>It can't be...@
>Alice... You didn't teach me all those skills...@> Just so I could kill you with them, did you?\
>Is that why you had me get the power of the four spirits?@
>Just to kill you with them!?\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>At the start, it was merely to entertain myself.@
>But as we traveled together, I became convinced that you were the one...\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
>My partner to work towards peace with.@
>To fill the world with hope...\
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
>As I traveled the world with you, I came to that conclusion.\
name ""
name "Luka"
>Guh...!\
name ""
>My chest tightens in pain at her words.\
>Angry at myself at acting happy every time she taught me a skill, all while being ignorant of her true intentions...\
>She's been traveling with me for all this time thinking about this...@
>Always at my side, thinking about how I would be the one to kill her...\
name "Luka"
>How could you be thinking of that as we traveled around the world, already so full of hope!?\
>You can't do this at the cost of your own life...!\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...Without a scapegoat, people won't be able to truly move on.@
>You're not a mere child, so you should understand that already.\
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
>Now, fulfill your duty as a Hero!@
>For what reason did you come here!?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Luka"
>I came here to stop monsters from harassing humans!@
>The Monster Lord...@>I didn't come here to kill you!\
>I've already finished what I came here for!@
>The Four Heavenly Knights already agreed to stop!\
>That's why you don't need to sacrifice yourself!\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>Quit with the naivety!@
>At the very least, the human side won't be so easy to sway!\
>Without the Monster Lord being defeated, they'll refuse to believe it!\
name ""
name "Luka"
>No, that isn't right...\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Please... Don't trouble me any more.\
>You're a Hero, aren't you?@
>Despite what you may think, the only purpose a Hero has to exist is to defeat the Monster Lord.\
>Just believe in your faith, and don't think about anything else...@
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
>Luka... You know what you have to do, right?\
name ""
name "Luka"
>I...\
name ""
goto *sean0300a



*sean0300a

if %continue=1 bgm "bgm\boss0.ogg"
if %continue=1 bg "bg\bg141.bmp",10,5000
if %continue=1 lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
mov %continue,0
name "Alice"
>Now pick up your sword, Luka.@
>Not Angel Halo, but your iron sword.\
>There will be no incomplete method such as a seal for this.\
name ""
name "Luka"
>I... I...\
name ""
>Alice takes a battle stance as I stand here dumbfounded.\
r@k@\
goto *alice2_start



*sean0301

wait 500
bgm "bgm\alice2.ogg"
name "Luka"
>Alice...\
name ""
>After Alice falls to the ground, she stops moving.@
>The woman I traveled with for so long loses her life in such a plain manner...\
>I.. With my sword... Alice...\
name "Luka"
>.................\
name ""
>Suddenly, the room fills with a holy air.@
dwave 1,"se\irias.ogg"
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,1500
>A warm aura slowly descends as a radiant figure appears before me.\
name "Ilias"
>...Well done, Luka the Hero.@
>You've defeated the Monster Lord at last.\
name ""
name "Luka"
>Ilias...\
name ""
name "Ilias"
>You've surpassed many hardships, and completed your goal.@
>You truly are the great Hero I was expecting.\
name ""
name "Luka"
>..............\
name ""
>As I look away from Alice's lifeless body, I notice a treasure chest in the corner of the room.\
name "Ilias"
>Oh, a treasure chest?@>By all rights, the spoils of victory are yours to claim.@
>As a true Hero, you have the right to take whatever is inside.\
name ""
name "Luka"
>..............\
name ""
dwave 1,"se\takarabako.ogg"
>As I open the lid, I find...@
lsp 700,":a;chara\alice_st91b.bmp",320,-50:print 10,500
>The ribbon I had bought Alice.\
name "Luka"
>This ribbon...\
name ""
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
name "Ilias"
>...Indeed, I can't fathom what these monsters are thinking.@
>To lock such a cheap item away in a stronghold like this.\
name ""
name "Luka"
>Alice...\
name ""
>I tightly grab the ribbon.\
>Is this really how I wanted to fulfill my dream...?@
>Am I really a true Hero with this?\
>To even go so far as to kill Alice...?\
lsp 700,":a;chara\iriasu_st03.bmp",0,0:print 10,500
name "Ilias"
>Luka... I wish to invite you to heaven.@
>A paradise where there is no such thing as pain or regret.\
name ""
>Gentle light wraps around my body in the next moment...@
bgm "bgm\irias.ogg"
bg "bg\bg001.bmp",10,3000
>When I next open my eyes, I'm in a serene, peaceful area.\
>The air itself tastes so sweet, it's as if my mind could melt in bliss.@
>The regret and pain from what I just did instantly fades away.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
name "Ilias"
>Luka... You don't need to think about anything anymore.@
>You should just live happily in this world...\
name ""
name "Luka"
>Yes, Ilias...\
name ""
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
name "Ilias"
>I must give you a reward...\
name ""
name "Luka"
>I... I don't need a reward...@
>I just did my duty as a Hero...\
name ""
goto *sean0301a



*sean0301a

if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %con_hvoice=0 dwave 0,"voice\iriasu2_01.ogg"
name "Ilias"
>Then, as a reward...
>I shall allow you to lust after this pure body of mine as you please.\
if %con_hvoice=0 dwave 0,"voice\iriasu2_02.ogg"
>This body that my followers secretly lust after...
>You may violate it as you please.\
name ""
dwavestop 0
name "Luka"
>I... I couldn't do that...!@>I...\
name ""
if %con_hvoice=0 dwave 0,"voice\iriasu2_03.ogg"
name "Ilias"
>Hehe... That's right.
>You prefer to be violated over doing the violation...\
if %con_hvoice=0 dwave 0,"voice\iriasu2_04.ogg"
>Very well then, I shall violate you.
>I'll be the one to lust after your body...\
name ""
dwavestop 0
name "Luka"
>Eh...?@> B...But...!\
name ""
>Ilias gently pushes me down as I look on in confusion.@
>Her soft clothes brush against my skin as her body rubs against mine.\
name "Luka"
>W...We can't do this...!\
name ""
if %con_hvoice=0 dwave 0,"voice\iriasu2_05.ogg"
name "Ilias"
>Luka... I'll violate you.\
name ""
dwavestop 0
>Ilias just flatly declares that.@
>In the next moment, she lowers her body down on mine...\
>She uses three of her thin, white fingers to guide my penis right next to her vagina.\
if %con_hvoice=0 dwave 0,"voice\iriasu2_06.ogg"
name "Ilias"
>Now... I'm putting it in, Luka...\
name ""
dwavestop 0
name "Luka"
>Ahhh...!\
name ""
mov %hseanwave,1:hseanwave
cspl 690,699
lsp 700,":a;chara\iriasu_h1.bmp",0,0:print 10,500
>With a soft, wet sound, my thing invades Ilias' vagina.\
>The holiest part of her pure body...@
>My dirty thing just went inside her...\
name "Luka"
>Ahh...!\
name ""
>I let out a gasp of pleasure the moment Ilias starts to rape me.\
>Her soft, warm vagina gently presses down on my penis.@
>My poor, human body is being rubbed by a Goddess' flesh...\
if %con_hvoice=0 dwave 0,"voice\iriasu2_07.ogg"
name "Ilias"
>Well, Luka...?
>How do I feel?\
name ""
dwavestop 0
name "Luka"
>Ahh... Good...\
name ""
>It was all I could do to say that one word between my gasps.\
>Her pure vagina eagerly grabs at my dirty penis, pressing down on me.@
>Without even moving, it feels like I could melt away in ecstasy inside her.\
name "Luka"
>Haa... I...Incredible...@
>It feels so good... Inside Goddess Ilias...\
name ""
if %con_hvoice=0 dwave 0,"voice\iriasu2_08.ogg"
name "Ilias"
>Now Luka... Move your waist.
>Stir up my vagina with your penis...\
name ""
dwavestop 0
name "Luka"
>Y...Yes... I will...\
name ""
>I was about to obey Ilias' orders, but after just slightly moving, her folds all rub against my penis at the same time.\
>Almost about to ejaculate from that sudden spark of pleasure, I stop moving as I try to hold on.\
if %con_hvoice=0 dwave 0,"voice\iriasu2_09.ogg"
name "Ilias"
>What's wrong, Luka?
>Are you already done moving?\
name ""
dwavestop 0
name "Luka"
>I... I can't...@
>If I move, I'll come...\
name ""
>All of those soft folds inside her...@
>I'd ejaculate inside her in an instant if I had to move against those.\
>I can't allow myself to come inside her purest place...\
if %con_hvoice=0 dwave 0,"voice\iriasu2_10.ogg"
name "Ilias"
>If you cannot move, then I will.
>I said it, didn't I? That I'll violate you...\
name ""
dwavestop 0
name "Luka"
>Ahhh!\
name ""
mov %hseanwave,4:hseanwave
>While sitting on top of me, Ilias slowly starts to move.\
>Her folds and creases slowly start to rub against me as she gently moves back and forth on top of me.\
name "Luka"
>Ahh... P...Please take it out...@
>Or I'll come inside you...\
name ""
if %con_hvoice=0 dwave 0,"voice\iriasu2_11.ogg"
name "Ilias"
>Hehe... Don't you think you should endure a little longer?
>Finishing at this point would be so embarrassing...\
name ""
dwavestop 0
>Ilias slowly starts to grind against me faster as she looks down into my eyes.\
name "Luka"
>Ah...!@> Ahhh!\
name ""
>At this rate, I'm going to shoot my dirty semen inside her...@
>The pure Goddess will be polluted by my unclean fluids...\
>I desperately clench my stomach, trying to stop myself from committing the ultimate sacrilege.\
if %con_hvoice=0 dwave 0,"voice\iriasu2_12.ogg"
name "Ilias"
>Hoora, Luka... Ejaculate.\
name ""
dwavestop 0
>But Ilias just slowly picks up speed, moving faster and faster.@
>Despite my best efforts, the desire to come swells up in my body.\
>To have sex with Ilias... To come inside her pure body...\
name "Luka"
>Ahh... I'm going to come...@
>Ilias, take it out...\
name ""
if %con_hvoice=0 dwave 0,"voice\iriasu2_13.ogg"
name "Ilias"
>I can't do that, Luka...
>Release your dirty fluid inside me...\
name ""
dwavestop 0
>Ilias stares right into my eyes as she grinds against me, waiting for the moment of my orgasm.\
>Unable to look away, I feel my body start to ache as the inevitable orgasm comes rising through me.\
name "Luka"
>N...No...!@
>I'm going to come in Ilias...!\
>Ahhh!!\
name ""
>I tried to hold on, but it's no good.@
>Gasping, I finally go shooting over the edge.\
gosub *syasei1
lsp 700,":a;chara\iriasu_h2.bmp",0,0
gosub *syasei2
>I explode inside Ilias, shooting my unclean semen right into her pure body.@
>Horrified at myself, I start to beg her forgiveness right away.\
name "Luka"
>Ahh... I'm sorry...@
>Ilias, I'm so sorry...\
name ""
>With tears in my eyes, I apologize to her during my ejaculation.@
>The pleasure and sense of guilt swirl around in my head all the while.\
if %con_hvoice=0 dwave 0,"voice\iriasu2_14.ogg"
name "Ilias"
>...Oh dear, already?
>How embarrassing, to be unable to endure just that much...\
name ""
dwavestop 0
>Ilias gently tightens her vagina around me, as if to squeeze out the last bits of dirty semen into her vagina.\
name "Luka"
>Ah...!@> Ahh!\
name ""
>As she squeezes me, my penis slowly becomes hard again inside her.\
if %con_hvoice=0 dwave 0,"voice\iriasu2_15.ogg"
name "Ilias"
>It seems like you still wish to be violated further.\
if %con_hvoice=0 dwave 0,"voice\iriasu2_16.ogg"
>Do you wish to pump more of your semen into me?
>...You're quite the sinful Hero, aren't you?\
name ""
dwavestop 0
>Ilias starts to grind her body against me, forcing me in and out of her.\
name "Luka"
>Ahhh...!\
name ""
if %con_hvoice=0 dwave 0,"voice\iriasu2_17.ogg"
name "Ilias"
>Hoora, how's this?
>The sinful, greedy you loves this kind of thing, right?\
name ""
dwavestop 0
>Ilias suddenly stops moving, and starts to squeeze me tight inside her vagina.\
name "Luka"
>A...Ahh... So tight... !@
>It feels so good...!\
name ""
if %con_hvoice=0 dwave 0,"voice\iriasu2_18.ogg"
name "Ilias"
>Hehe... Get a good feel...
>Then finish inside me again...\
name ""
dwavestop 0
name "Luka"
>Aaaaa... N... No...\
name ""
>As Ilias gently rides me, I'm left right at the edge of another orgasm.@
>Even if I tried my best, there's no way I could hold on...\
>As she softly squeezes down around me, I let out a gasp as I'm forced to come inside her.\
name "Luka"
>Haaa... Ilias... Forgive me...@
>I'm going to come again...\
>Ahhh...\
name ""
gosub *syasei1
lsp 700,":a;chara\iriasu_h3.bmp",0,0
gosub *syasei2
>Wracked with guilt, I sigh as my lustful seed shoots into Ilias' vagina.@
>The thought of committing such a grave sin mixes with the pleasure, amplifying all of my feelings.\
name "Luka"
>Ahhhhhh...\
name ""
if %con_hvoice=0 dwave 0,"voice\iriasu2_19.ogg"
name "Ilias"
>To have dirtied me twice...
>Luka... You truly are a sinful Hero.\
name ""
dwavestop 0
name "Luka"
>B...But Ilias, you...\
name ""
if %con_hvoice=0 dwave 0,"voice\iriasu2_20.ogg"
name "Ilias"
>Are you saying it's my fault?
>You're a shameful, sinful... And premature ejaculating Hero, aren't you?\
name ""
dwavestop 0
>Ilias slowly moves up and down, forcing me in and out of her as she talks.@
>The sudden movement sends a spark of pleasure through me as she reprimands me.\
if %con_hvoice=0 dwave 0,"voice\iriasu2_21.ogg"
name "Ilias"
>...But you're the Hero who followed my orders, and defeated the Monster Lord.
>Your reward shall be to continue having sex with me forever in this Heaven.\
name ""
dwavestop 0
name "Luka"
>H...Here... F...Forever...?\
name ""
if %con_hvoice=0 dwave 0,"voice\iriasu2_22.ogg"
name "Ilias"
>Yes, I shall give you everlasting pleasure.
>You will have eternal life, and be blessed with infinite time to have sex with me...\
if %con_hvoice=0 dwave 0,"voice\iriasu2_23.ogg"
>Isn't that wonderful, Hero Luka?\
name ""
dwavestop 0
name "Luka"
>B...But...@
>I want to go back to my hometown and meet everyone again...\
name ""
if %con_hvoice=0 dwave 0,"voice\iriasu2_24.ogg"
name "Ilias"
>...There's no need to return to the ground any longer.
>You should drown in pleasure in this Heaven.\
if %con_hvoice=0 dwave 0,"voice\iriasu2_25.ogg"
>...Do you understand?\
name ""
dwavestop 0
>Before I can reply, Ilias' vagina squeezes down around me, sending fresh spasms of pleasure through me.\
name "Luka"
>Haaa...\
name ""
gosub *syasei1:gosub *syasei2
if %con_hvoice=0 dwave 0,"voice\iriasu2_26.ogg"
name "Ilias"
>Hehe... That's a good answer.
>Now then, look forward to an eternity of pleasure...\
name ""
dwavestop 0
name "Luka"
>Haaa...\
name ""
>I'll spend an eternity having sex with Ilias...@
>This is my reward for saving the world.\
>Never weakening no matter how many times I come, never suffering any pain...@
>A paradise of pleasure, together with a Goddess...\
if %con_hvoice=0 dwave 0,"voice\iriasu2_27.ogg"
name "Ilias"
>Well, Luka?
>Pump more and more semen into me...\
if %con_hvoice=0 dwave 0,"voice\iriasu2_28.ogg"
>Finish as many times as you want...
>I'll squeeze you as much as you like...\
name ""
dwavestop 0
name "Luka"
>Ahhh... Ilias...@
>It feels so good... Ilias...\
name ""
gosub *syasei1:gosub *syasei2
gosub *anten
mov %hseanwave,0:hseanwave
>Thus, I drown in pleasure in heaven, having sex with Ilias for eternity.\
>Stuck in heaven, there's nothing here for me but pleasure.@
>Forever and ever...\
>.............\
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_irias1,1
bgmstop
mov $end_go,"sean0300a"
goto *badend2



*sean0303

name ""
r@k@\
name "Luka"
>...............\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>How naive, thinking you can attain your dream without a sacrifice along the way...@
>You're passing up your chance, you know...\
name ""
name "Luka"
>It would be a false dream if I had to kill you to make it come true.@
>My dream is about saving lives, not sacrificing them.\
name ""
>It may be naive to think I can attain my dream without victims being caught in the middle...@
>But killing her...\
name "Luka"
>What the hell kind of dream is built on killing your friends!?@
>And you, stop your escapism!\
name ""
name "Alice"
>My... Escapism...?\
name ""
name "Luka"
>You keep piling all these duties and responsibilities on yourself, all while ignoring everyone around you...@
>Just what do you think is going to happen if you just went and died!?\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>...If the Monster Lord is slain by the Hero, everything will change.@
>Everyone will know that monsters can't fight a war against humans any longer.\
name ""
name "Luka"
>...I think that line of thinking is the one that's too naive.\
if %ivent10=0 skip 2
>Did you forget about Plansect Village, Alice?@
>What do you think would happen if news of the monster leader suddenly dying got out?\
>It certainly wouldn't lead to peace.@
>Rather, a new age of oppression against monsters would begin...\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>................\
name ""
name "Luka"
>Once the leader that holds them together is lost, what are the monsters going to do?@
>You know best of all, don't you?\
name ""
name "Alice"
>But if I don't fall here...@
>My...My mother truly would have died for nothing...\
name ""
name "Luka"
>...Sorry, but I think your mother's method was wrong from the start.\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>What was that!?@
>You dare to insult my mother!?\
name ""
name "Luka"
>You, as a tiny infant...@> That one miscalculation caused her entire plan to crumble in moments.\
>After only seconds, the fragile illusion of peace she created was easily shattered.\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...But, I have to die...@
>Or... Or else humans will always be afraid...\
name ""
name "Luka"
>Alice, you're thinking too much about your own death.@
>You seem to have your heart set on the world somehow becoming better once you're dead...\
name ""
>The same as Lazarus...@> And the past me.\
>I thought I had to bring peace, even if it meant killing myself for it.\
>Rather... I thought I had to die to atone for the mistake my father committed.\
>It was Alice herself that brought me to my senses.\
>The one to tell me to live, and see my dream come to fruition with my own eyes...\
name "Luka"
>Alice... Quit escaping into the thought of sacrificing yourself for some imaginary good that will come of it.@
>Live, and see peace come with your own eyes.\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...Are you sure?@
>Can a Monster Lord such as me really exist in your ideal world?\
name ""
name "Luka"
>Of course...@> Once the world is at peace, let's go on another journey again.\
>I know there are lots of delicious foods you have yet to try, too.\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>Hmph... That's right...@
>I still haven't eaten enough.\
>I want to go on another journey once the world is at peace...@
>...With you.\
name "Luka"
>Yes...@
>So for our future journey's sake, we have to build a world where we can coexist together.\
>The Four Heavenly Knights have already agreed not to harass humans any longer.@
>And if the Monster Lord and a Hero can cooperate...@
>Ah... I guess I'm not a Hero, actually.\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Hmph, you idiot...@
>You stayed a fake Hero to the very end...\
name ""
name "Luka"
>...Yeah, that's fine.@
>I really was a fake Hero from the start, all the way to the end.\
name ""
>I'm not the Hero I envisioned as a kid.@
>I won't make any legends about defeating an evil Monster Lord.\
>But I don't care.@
>This journey means more to me than that stuff...\
csp 700:print 10,500
bgmstop
name "???"
>Oh brave Luka...@
>You have chosen the most foolish path...\
name ""
bgm "bgm\irias.ogg"
dwave 1,"se\irias.ogg"
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,1500
>Suddenly, the room fills with a holy aura, as a heavenly figure descends down.\
name "Luka"
>Ilias...\
name ""
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>What I have feared most of all has come to pass...@
>Seduced by the Monster Lord, you have yielded to her wicked will...\
>After having favored and watched over you for so long, only to be betrayed like this...@
>I am unable to hide my disappointment in you.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Luka... You are unqualified to be a Hero.\
name ""
lsp 700,":a;chara\alice_st02b.bmp",-130,0
lsp 701,":a;chara\iriasu_st01.bmp",180,0:print 10,500
name "Alice"
>Hmph... Unqualified?@
lsp 700,":a;chara\alice_st03b.bmp",-130,0:print 10,500
>How can you call someone who fights for others to the bitter end anything but a Hero!?\
name ""
name "Luka"
>Alice...\
name ""
name "Ilias"
>I am the one to decide the definition of a Hero.@
>There is no need for you to interrupt here, Monster Lord Alipheese.\
name ""
csp 701
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
name "Luka"
>Ilias, please answer me...@
>Are monsters truly such an evil existence?\
name ""
name "Ilias"
>...Of course.@
>They are beings who tempt and corrupt humans.\
>There is no exception.\
name ""
>The belief that all monsters are evil...@
>It's the justification humans have used to hate monsters before even attempting to understand them.\
name "Luka"
>Ilias... Is it fated for humans and monsters to fight each other?\
name ""
name "Ilias"
>...Of course.@
>It is inevitable for humans to kill monsters.\
name ""
>Humans and monsters are fated to fight each other...@
>This thought is what has caused numerous tragedies over the years...\
>Even Alice's mother couldn't escape from that belief.@
>Tragedy after tragedy, kept going by the belief that we simply must fight...\
name "Luka"
>I understand.@>In that case...\
name ""
>...I've been doubting it all this time.@
>My faith and my ideals don't match up.\
>I kept trying to twist my faith... To push it down inside me.@
>All the while, I overlooked the contradictions surrounding me...\
>But...\
bgm "bgm\ruka.ogg"
name "Luka"
>Ilias...@> You...@
>You're the main obstacle blocking peace!\
name ""
>I draw my sword, and point it right at Ilias.\
>Alice stopped running away from her past.@
>I have to change, too!\
>Finally owning up to the truth, I've made up my mind.\
lsp 700,":a;chara\iriasu_st13.bmp",0,0:print 10,500
name "Ilias"
>...Pointing your sword at a Goddess...@
>That's quite the sin you're committing.\
>...Luka, accept your divine punishment.\
name ""
skillname "Thunder of Judgement"
dwave 1,"se\ikazuti.ogg"
quake 10,1500
wait 500
skillname "Serene Movement"
dwave 3,"se\miss_aqua.ogg"
>But Luka easily steps to the side, dodging the bolt!\
skillname ""
name "Luka"
>What's wrong, Ilias?@
>Are you too used to judging those who can't fight back?\
name ""
lsp 700,":a;chara\iriasu_st16.bmp",0,0:print 10,500
name "Ilias"
>..................\
>Luka... You intend to defy me to the very end?@
>Indeed, it seems as though I couldn't cleanse that dirtied blood you have...\
name ""
>Ilias' face falls in grief.@
>It's almost as if the entire area is full of her sorrow...\
bgmstop
lsp 700,":a;chara\iriasu_st12.bmp",0,0:print 10,500
>Suddenly, the clear aura is flushed in dark anger!\
bgm "bgm\boss0.ogg"
name "Ilias"
>Let us make this Monster Lord's Castle into a second Remina.@
>Be exterminated with these monsters you so adore...@>Corrupted Hero Luka.\
name ""
dwave 1,"se\irias.ogg"
csp 700:print 10,500
>After that, Ilias vanishes...@
dwave 1,"se\earth1.ogg"
quake 10,2000
bgm "bgm\kiki2.ogg"
>And in the next moment, the entire castle starts to violently shake!\
name "Luka"
>Wh...What is this!?@>An earthquake!?\
name ""
lsp 700,":a;chara\alice_st51b.bmp",67,0:print 10,500
name "Alice"
>No... This is...!\
name ""
>In the next moment, both Alice and I sense what it is.@
>This unearthly sense filling the entire castle...\
lsp 701,":a;chara\alice_st51b.bmp",-110,0
lsp 700,":a;chara\erbetie_st01.bmp",390,0:print 10,500
name "Erubetie"
>...A report, Your Majesty.@
>An army of angels, along with a group of strange monsters, is invading the castle.\
>We have already begun interception, but their numbers are far too vast...\
name ""
lsp 701,":a;chara\alice_st03b.bmp",-110,0:print 10,500
name "Alice"
>So it's a full scale war, Ilias...!?\
name ""
name "Luka"
>She said she was going to make this castle a second Remina...\
name ""
>There's no more doubt.@
>Ilias truly was the one to destroy Remina.\
>And now she's trying to do the same thing here...\
name "Alice"
>Got it, I'm heading out!\
name ""
name "Luka"
>I'm going too, Alice!\
name ""
>I can't ignore this situation!@
>Alice and I rush out of the throne room together.\
dwave 1,"se\asioto4.ogg"
sean_change "bg047"
bgm "bgm\boss4.ogg"
>As we rush into the grand hall, it's already a full scale battle.@
>Both sides are clashing, lost in the confusion of battle.\
lsp 700,":a;chara\vampire_st03.bmp",175,50:print 10,500
name "Vampire"
>Guh...!@>What the hell are you!?\
name ""
lsp 700,":a;chara\vampire_st03.bmp",-35,50
lsp 701,":a;chara\behemoth_st03.bmp",160,0:print 10,500
name "Behemoth"
>I won't step aside!@>You aren't going past here!\
name ""
>The monsters are fighting back desperately...\
lsp 701,":a;chara\c_beast_st01.bmp",-160,0
lsp 700,":a;chara\c_beast_st01.bmp",160,0:print 10,500
>Those strange monsters I saw in Remina...@
>All moving in unison, they're overwhelming the defenders with pure numbers.\
>But it's not just those strange monsters that are attacking...\
lsp 700,":a;chara\cupid_st02.bmp",-200,0
lsp 701,":a;chara\valkyrie_st01.bmp",80,0:print 10,500
name "Cupid"
>Ahaha, take that!@
>Die, monsters!\
name ""
name "Valkyrie"
>Accept the judgement of the gods, you dirty monsters...\
name ""
>A brigade of angels are fighting, with both bows and swords...@
>The monster defenders are fighting back, but...\
lsp 700,":a;chara\behemoth_st03.bmp",-230,0
lsp 701,":a;chara\cupid_st02.bmp",180,0:print 10,500
name "Behemoth"
>Damn you...!\
name ""
dwave 2,"se\karaburi.ogg"
>The Behemoth charges forward with her giant body, slamming her powerful fist down...@
dwave 2,"se\miss.ogg"
>But it passes right through the angel's body...\
name "Behemoth"
>Gah...!@>Why can't I hit her!?\
name ""
name "Cupid"
>Ahaha, you didn't know?@
>Neither humans nor monsters can touch an angel!\
name ""
lsp 701,":a;chara\valkyrie_st01.bmp",80,0:print 10,500
name "Valkyrie"
>An earth dweller cannot touch a sacred angel's body.@
>Naturally, your attacks are useless.\
name ""
>Despite their overwhelming strength, it's pointless if they can't land any blows.@
>The angels slowly advance, dispatching the defenders with ease.\
cspl 700,701:print 10,500
name "Luka"
>Is this how they destroyed Remina...!?@
>With an army of angels and strange monsters!?\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...That seems to be the case.@
>Those monsters must be something new Ilias created...\
name ""
lsp 700,":a;chara\stein_st01r.bmp",0,0:print 10,500
name "???"
>No... That isn't right.@
>Those chimeras are my work.\
name ""
name "Luka"
>Y...You're...!\
name ""
>The same white robed woman that we saw before...\
name "Promestein"
>My name is Promestein, the seeker of wisdom.@
>The one who gave fire to humans...\
name ""
lsp 701,":a;chara\alice_st03b.bmp",-110,0
lsp 700,":a;chara\stein_st01r.bmp",160,0:print 10,500
name "Alice"
>I see... So you were an angel.@
>That's why I didn't sense anything from you.\
>What are these strange creatures?@
>Why did you make them...?\
name ""
name "Promestein"
>They are called Chimeric Monsters, whom I created by dark magic...@
>The fruits of the research Ilias instructed me to perform.\
name ""
name "Alice"
>The monster hating Ilias ordered you to create monsters...?@
>This is the first time I've heard of a God ignoring their own beliefs.\
name ""
name "Promestein"
>You ground dwellers are unable to understand divine providence.@
>The truth of this world is too difficult for you to understand.\
>Anyway, I brought my masterpieces to assault the Castle to defeat the Four Heavenly Knights and the Monster Lord.@
>...And a Hero, it seems.\
name ""
csp 701
lsp 700,":a;chara\stein_st01r.bmp",0,0:print 10,500
name "Luka"
>Neither Alice, the Four Heavenly Knights or I will ever lose to you!\
name ""
lsp 700,":a;chara\stein_st02.bmp",0,0:print 10,500
name "Promestein"
>Hehe...@>Is that so?\
name ""
>The moment after she starts to laugh...\
dwave 1,"se\down.ogg"
quake 10,500
>The shadow of something slams into a nearby wall!@
lsp 700,":a;chara\granberia_st07.bmp",0,0:print 10,500
>As the dust clears, I can see that it's Granberia!\
name "Granberia"
>Guh...!\
name ""
>Granberia is on one knee, struggling to stand.@
>But the damage she has taken is too deep.\
lsp 700,":a;chara\arcen_st01.bmp",0,0:print 10,500
>The one who threw her down steps forward...@
>The feeling coming off this Chimeric Monster is far different from the others...\
name "Arc-En-Ciel"
>The strongest Cursed Swordswoman among monsters, Granberia...@
>Was that truly the extent of your power?\
name ""
name "Luka"
>Granberia was already injured after the fight with me!@
>If it wasn't for that, someone like you would have been nothing!\
name ""
dwave 1,"se\down3.ogg"
quake 10,500
lsp 700,":a;chara\arumaeruma_st12.bmp",0,0:print 10,500
name "Alma Elma"
>Kyaa!\
name ""
>Alma suddenly slams into a nearby wall, interrupting my defiant shout back at the Chimera.\
name "Alma Elma"
>Ouch ouch ouch...@
>Even though I was already tired... That sure hurt...\
name ""
>Alma unsteadily gets back to her feet as she dusts off her mantle.@
>Even though they were already damaged from the fight with me, for them to be pushed this hard...\
lsp 700,":a;chara\hainu_st01.bmp",0,0:print 10,500
name "Hainuwele"
>That wind of yours is awfully slow.@
>It's like you're standing still.\
name ""
>Another special seeming Chimeric Monster...@
>No, there are more than just those two!\
lsp 700,":a;chara\amphis_st01.bmp",0,0:print 10,500
name "Amphisbaena"
>Oh my... How disappointing.@
>Were we really created to deal with these lowly monsters?\
name ""
lsp 700,":a;chara\amphis_st01.bmp",-180,0
lsp 701,":a;chara\tukuyomi_st01.bmp",180,0:print 10,500
name "Tsukuyomi"
>It's a full moon tonight...@
>But I still can't get excited for this feast...\
name ""
lsp 700,":a;chara\rapun_st01.bmp",-180,0
lsp 701,":a;chara\tukuyomi_st01.bmp",180,0:print 10,500
name "Rapunzel"
>Hahaha... Well, there's nothing we can do!@
>Because these are the old generation of monsters!\
>Those pure-breeds aren't a match for the next generation.\
name ""
name "Luka"
>Gah... Five more...?\
name ""
>These are all clearly unique Chimeras...@
>They don't have the same lifeless feeling as the others...\
csp 701
lsp 700,":a;chara\stein_st02.bmp",0,0:print 10,500
name "Promestein"
>These Chimeras were created just to deal with the Four Heavenly Knights.@
>I analyzed everything about them, to ensure they were all able to defeat them.\
name ""
lsp 700,":a;chara\arcen_st01.bmp",0,0:print 10,500
name "Arc-En-Ciel"
>...Heh, so there you have it.@
>Unmodified monsters like you...@
>There's no way you could compare to us.\
name ""
lsp 700,":a;chara\arcen_st01.bmp",-180,0
lsp 701,":a;chara\rapun_st01.bmp",180,0:print 10,500
name "Rapunzel"
>Soooo...@> You're all going to have to die now!@
>Ah...@>But we'll rape the Hero instead. \
name ""
lsp 700,":a;chara\cupid_st02.bmp",-200,0
lsp 701,":a;chara\valkyrie_st01.bmp",80,0:print 10,500
name "Cupid"
>Ahaha... I want to rape him too! \
name ""
name "Valkyrie"
>A Hero who turns his blade in treason against Ilias...@
>As punishment, a continual rape of 20,000 years is sufficient.\
name ""
name "Luka"
>Guh...\
name ""
>Not only these Chimeras, but the army of angels, too...@
>We're really outnumbered in this situation.\
csp 701
lsp 700,":a;chara\stein_st01r.bmp",0,0:print 10,500
name "Luka"
>In that case, I have to go right for the leader...!\
name ""
dwave 1,"se\karaburi.ogg"
>As I take my stance and swing at Promestein...\
lsp 700,":a;chara\stein_st11.bmp",0,0:print 10,500
name "Promestein"
>Come, Zylphe!\
wait 300
dwave 1,"se\wind3.ogg"
lsp2 0,":a;chara\zylphe_st01.bmp",0,300,100,100,0,200
for %move=0 to 100 step 1
msp2 0,10,0,0,0,0,-2
print 1:wait 5
next
csp2 0:print 1
name ""
>Her speed drastically increases, letting her dodge my attack!\
dwave 1,"se\miss_wind.ogg"
>Those movements of hers... Just like...\
name "Luka"
>It can't be...!\
name ""
name "Promestein"
>Don't think you're unique in using the power of the spirits.@
>I've already analyzed that power, and am mass producing reproductions.\
name ""
name "Luka"
>No way... Even the spirits...\
name ""
>She's even mass producing them...?@
>Does that mean their army is going to be flooded with those who can use the power of the spirits?\
>Just how powerful is Ilias' army...?\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Hmph...@>Don't be scared, Luka.@
>You've already overcome many difficult situations already.\
name ""
name "Luka"
>Alice...\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>At the start, I told you we were not allies...@
>That I was just a fellow traveler along with you...\
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
>...But that changes now.@
>You and I are allies who share the same will!\
name ""
name "Luka"
>...Yeah, that's right!\
name ""
>Alice and I will fight together...@
>That drastically increases our fighting potential!\
>I can overcome any difficulty as long as Alice is by my side!\
name "Alice"
>Let's go, Luka!@
>Don't fall behind!\
name ""
name "Luka"
>You got it!\
name ""
lsp 700,":a;chara\cupid_st02.bmp",-200,0
lsp 701,":a;chara\valkyrie_st01.bmp",80,0:print 10,500
>A large army of angels to the front...\
lsp 700,":a;chara\arcen_st01.bmp",-180,0
lsp 701,":a;chara\rapun_st01.bmp",180,0:print 10,500
>A flock of powerful Chimeric monsters to the side...\
csp 701
lsp 700,":a;chara\stein_st11.bmp",0,0:print 10,500
>An angel who's able to create more monsters through some sort of strange magic...\
lsp 700,":a;chara\iriasu_st13.bmp",0,0
bg "bg\bg001.bmp",10,500
>And behind them all, the one pulling the strings...\
csp 700
bg "bg\bg047.bmp",10,500
name "Luka"
>Uaaaa!!\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>Haaa!!\
name ""
dwave 1,"se\asioto4.ogg"
>With my sword raised and Alice at my side, I charge into the fray.\
bgmstop
csp 700
bg black,10,3000
wait 2000
lsp 701,":a;chara\iriasu_st13.bmp",-160,0
lsp 700,":a;chara\alice8th_st01.bmp",180,30
bg "bg\bg001.bmp",10,3000
bgm "bgm\maou2.ogg"
name "Black Alice"
>Teehee... A wonderful party has started at last.@
>Has the time for re-creation finally come, Ilias?\
name ""
name "Ilias"
>Yes... I grieve as the humans faith has been shaken so.@
>These humans who fail to revere their Goddess must be defective...\
>If an unbaptized Hero was to show me his faith, I was going to reconsider...@
>But it seems as though I'll need to perform the re-creation as I originally planned.\
name "Black Alice"
>If you're remaking the world, then the current humans aren't needed, right?@
>Can we play with them like you promised...?\
name ""
name "Ilias"
>Yes, do as you please.@
>These humans are the first failure I created, after all.\
>But your role is...\
name ""
name "Black Alice"
>I know, Ilias.@
>To retain the necessary dark magic to keep the world in motion, you're managing us monsters.\
>Teehee... It's difficult keeping the raw amounts of holy and dark magic in balance in the world, isn't it?\
>Because of that, you can't exterminate those monsters you hate so much...\
name ""
lsp 701,":a;chara\iriasu_st16.bmp",-160,0:print 10,500
name "Ilias"
>.............\
name ""
name "Black Alice"
>Oh, excuse me if I offended you.\
>Even a Goddess like you can't change the laws of the universe...\
>If word got out to the humans, their faith would diminish.\
name ""
lsp 701,":a;chara\iriasu_st13.bmp",-160,0:print 10,500
name "Ilias"
>I don't want to hear such impudent talk from one I rescued 500 years ago.@
>Don't forget that you are easily replaceable.\
name ""
name "Black Alice"
>Teehee... I'll be careful, Ilias.\
name ""
name "Ilias"
>Then let us begin the re-creation.@
>The next generation of "humans" is almost complete, too.\
name ""
name "Black Alice"
>We're all ready to eat up the current humans.@
>We've collected plenty of pure monsters.@
>...And the new generation of monsters, too.\
name ""
name "Ilias"
>Now, the preparations are finished.@
>Let's build a more peaceful world, brimming with faith...\
name ""
csp -1
bg black,10,3000
bgmstop
if %game_clear<2 mov %game_clear,2
goto *sean0304



*sean_syustart

mov %manuoff,0
cspl 700,701:print 10,500
mov %storyon,1
mov %mylv,64
mov %exp,3558100
mov %item01,10
mov %item02,1
mov %item04,4
mov %item05,1
mov %item06,1
mov %item07,1
mov %item08,1
mov %item09,1
mov %skill01,16
mov %skill02,3
mov %skill03,3
mov %skill04,3
mov %skill05,3
mov %ivent01,1
mov %ivent02,1
mov %ivent03,1
mov %ivent04,1
mov %ivent05,1
mov %ivent06,1
mov %ivent07,1
mov %ivent08,1
mov %ivent09,1
mov %ivent10,1
mov %ivent11,1
mov %ivent12,1
mov %ivent13,1
mov %ivent14,1
mov %ivent15,1
mov %ivent16,1
mov %check01,1
mov %check02,1
goto *sean_restart2



*sean_restart2

mov %ruka_tati,1
bgm "bgm\irias.ogg"
gosub *setwindow_01
bg "bg\bg001.bmp",10,3000
>~~The story so far~~\
>The Hero Apprentice Luka, aiming to defeat the Monster Lord, encounters a strange monster named Alice.\
>Traveling together with her, he eventually discovers that she is in fact the Monster Lord.\
>But Luka decides that Alice is not a bad being.@
>He chooses to continue traveling together with her.\
>Finally reaching his destination, he arrived at the Monster Lord's Castle.@
>After defeating the Four Heavenly Knights, the Monster Lord Alice stood in his way.\
>However he holds back in their fight, and refuses to let Alice sacrifice herself.@
>He realizes that the true thing blocking humans and monsters from coexisting is Ilias.\
>At that moment, a horde of angels and artificially created monsters storm the Monster Lord's Castle.@
>Luka now stands before Ilias' messengers of ruin...\
csp -1
bgmstop
bg black,10,2000
wait 1000
goto *sean0304



*sean0304

if %ivent01=0 goto *sean0304c
bgm "bgm\city1.ogg"
lsp 700,":a;chara\gob_st01.bmp",-220,0
lsp 701,":a;chara\vgirl_st01.bmp",200,0
bg "BG\bg151.bmp",10,3000
gosub *setwindow_01p
name "Vampire Girl"
>Here's your lunch...@
>...B...But I didn't make one just for you, Gob!\
name ""
lsp 700,":a;chara\gob_st04.bmp",-220,0:print 10,500
name "Goblin Girl"
>Aww, don't go all loveydovey on me...\
name ""
>The Goblin Girl takes the lunch box and thanks her.@
>She'll be traveling far in the next week before returning back to Iliasburg.\
lsp 700,":a;chara\gob_st01.bmp",-220,0
lsp 701,":a;chara\vgirl_st03.bmp",200,0:print 10,500
name "Vampire Girl"
>We should all go play somewhere sometime...@
>The four of us haven't been together too much recently... Lam and Pup miss you too..\
name ""
name "Goblin Girl"
>Next time... Sorry, but work has been really busy lately!@
>See you later!\
name ""
dwave 1,"se\asioto1.ogg"
for %move=0 to 500 step 20
amsp 700,-220-%move,0
print 1:wait 20
next
>With that cheerful goodbye, the Goblin Girl runs off...\
bgm "bgm\field1.ogg"
sean_change "bg019"
name "Goblin Girl"
eng "Zoom!":$sel6/
dwave 1,"se\asioto1.ogg"
lsp 700,":a;chara\gob_st23.bmp",700,20:print 1
for %move=0 to 1300 step 20
amsp 700,700-%move,20
print 1:wait 20
next
\
name ""
sean_change "bg041"
name "Goblin Girl"
eng "Zooom!":$sel6/
dwave 1,"se\asioto1.ogg"
lsp 700,":a;chara\gob_st23.bmp",700,20:print 1
for %move=0 to 1300 step 20
amsp 700,700-%move,20
print 1:wait 20
next
\
name ""
sean_change "bg030"
name "Goblin Girl"
eng "Zazoom!":$sel6/
dwave 1,"se\asioto1.ogg"
lsp 700,":a;chara\gob_st23.bmp",700,20:print 1
for %move=0 to 1300 step 20
amsp 700,700-%move,20
print 1:wait 20
next
\
name ""
sean_change "bg216"
lsp 700,":a;chara\gob_st21.bmp",-170,50
lsp 701,":a;chara\mob_rouzin1.bmp",180,0:print 10,500
name "Goblin Girl"
>..............\
name ""
name "Old Man"
>Do you not like boats, little Miss?\
name ""
cspl 700,701
sean_change "bg039"
name "Goblin Girl"
eng "Zazoom!":$sel6/
dwave 1,"se\asioto1.ogg"
lsp 700,":a;chara\gob_st23.bmp",700,20:print 1
for %move=0 to 1300 step 20
amsp 700,700-%move,20
print 1:wait 20
next
\
name ""
sean_change "bg078"
name "Goblin Girl"
eng "Zazazaooom!":$sel6/
dwave 1,"se\asioto1.ogg"
lsp 700,":a;chara\gob_st23.bmp",700,20:print 1
for %move=0 to 1300 step 20
amsp 700,700-%move,20
print 1:wait 20
next
\
name ""
sean_change "bg086"
lsp 700,":a;chara\gob_st01.bmp",0,0:print 10,500
name "Goblin Girl"
>...I should take a little break.\
name ""
>The Goblin Girl lets out a sigh as she nears Yamatai Village.@
>Sitting down in the shade of a tree, she opens up her lunch box.\
lsp 700,":a;chara\gob_st01.bmp",-200,0
lsp 701,":a;chara\nekomata_st01.bmp",200,60:print 10,500
name "Nekomata"
>Nya.\
name ""
name "Goblin Girl"
>Oh, you came!@
>Don't worry, I've got your share too.\
>...Here, it's some fish.\
name ""
lsp 701,":a;chara\nekomata_st04.bmp",200,60:print 10,500
name "Nekomata"
>Nyaa. \
name ""
>As the two of them peacefully eat lunch in the shade...@
>Suddenly, chills run down their spines.\
bgm "bgm\kiki2.ogg"
lsp 700,":a;chara\gob_st04.bmp",-200,0
lsp 701,":a;chara\nekomata_st03.bmp",200,60:print 10,500
name "Goblin Girl"
>I feel kinda jittery for some reason...\
name ""
name "Nekomata"
>Nyaaa~~\
name ""
>Something evil that they have never felt before...@
>Their instincts as monsters, warning them of impending danger.\
>As the two of them look at each other, a scream rings out from Yamatai Village!@
>It sounds like it came from a nearby house...\
name "Goblin Girl"
>L...Let's check it out!\
name ""
name "Nekomata"
>Nya!\
name ""
dwave 1,"se\asioto1.ogg"
for %move=0 to 1300 step 20
amsp 700,-200-%move,0
amsp 701,200-%move,60
print 1:wait 20
next
>Shoving the rest of her lunch into her mouth, the Goblin Girl jumps up and starts running to the source of the noise.\
>The two of them have no idea what to expect...\
bgmstop
goto *sean0304c



*sean0304c

sean_change "bg217"
bgm "bgm\castle1.ogg"
lsp 700,":a;chara\saniria_n_st01.bmp",-240,0
lsp 701,":a;chara\fairys_st01.bmp",260,75
lsp 702,":a;chara\fairys_st21.bmp",480,75:print 10,500
name "San Ilia King"
>Thus, the Prince and Princess lived happily ever after.\
name ""
>The King quietly closes his book.\
name "Fairy A"
>Yaaay! Now this picture book over here! \
name ""
name "Fairy B"
>No! It's my turn to pick!@
>I want The Adventures of Heinrich the Hero!\
name ""
name "San Ilia King"
>Now now, let's not fight.@
>...Hmm?\
name ""
bgm "bgm\kiki2.ogg"
dwave 1,"se\asioto4.ogg"
>Hurried footsteps approach the royal chamber.@
dwave 1,"se\door1.ogg"
>Without knocking, a soldier bursts open the doors and staggers in.\
csp 702
lsp 700,":a;chara\saniria_n_st04.bmp",-240,0
lsp 701,":a;chara\mob_heisi1.bmp",180,0:print 10,500
name "Soldier"
>F...Forgive me your Majesty, it's an emergency!@
>A large group of monsters has suddenly appeared near the castle!\
name ""
name "San Ilia King"
>A monster invasion...?@
>Dispatch the Knights right away. There will be no harm coming to my citizens.\
>What type of monster is it?\
name ""
name "Soldier"
>Unknown, except that they are insect-like.@
>According to reports, they do not appear in the One Thousand Monsters catalog...\
name ""
name "San Ilia King"
>A type of monster that does not exist in the catalog...?@
>Anyway, immediately...\
name ""
lsp 700,":a;chara\saniria_n_st04.bmp",-240,0
lsp 701,":a;chara\fairys_st03.bmp",230,75
lsp 702,":a;chara\mob_heisi1.bmp",250,0:print 10,500
name "Fairy A"
>Ah... That thing's allies...\
name ""
>The Fairy mutters to herself, trembling.\
name "San Ilia King"
>Hmm? Do you know something...?\
name ""
name "Soldier"
>No, I have no clue.\
name ""
>The Soldier cannot see or hear the Fairy.@
>He stares with a confused look on his face at the King.\
name "Fairy A"
>There was a monster who was attacking all our friends in the forest, eating us...@
>But our Hero friend got her.\
>The smell right now is really similar...\
name ""
lsp 700,":a;chara\saniria_n_st03.bmp",-240,0:print 10,500
name "San Ilia King"
>............\
name ""
>It is certainly unusual for an innocent, carefree Fairy to become so terrified...@
>A terrible dread comes over the King...\
bgmstop
sean_change "bg045"
bgm "bgm\kiki1.ogg"
dwave 1,"se\asioto4.ogg"
lsp 700,":a;chara\mob_sensi2.bmp",-180,0
lsp 701,":a;chara\mob_heisi1.bmp",180,0:print 10,500
name "Grandmaster Knight"
>Your Majesty, dire news!@
>It is urgent, so I came directly in lieu of a messenger!\
name ""
lsp 700,":a;chara\sabasa_st01.bmp",-220,0
lsp 701,":a;chara\mob_sensi2.bmp",220,0:print 10,500
name "Sabasa King"
>...What is it?\
name ""
>Seeing the Grandmaster Knight so flustered worries the King of Sabasa.\
>He had never seen his loyal knight's face look so dark since he became King.\
name "Grandmaster Knight"
>A large group of monsters is heading south from our northern checkpoint!@
>Their course is direct towards Sabasa Castle!\
name ""
lsp 700,":a;chara\sabasa_st03.bmp",-220,0:print 10,500
name "Sabasa King"
>A large group of monsters?@
>What is their number and type?\
name ""
name "Grandmaster Knight"
>The messenger will fill you in on those details.@
>He saw them with his own eyes.\
name ""
lsp 700,":a;chara\sabasa_st03.bmp",-220,0
lsp 701,":a;chara\mob_heisi1.bmp",220,0:print 10,500
name "Messenger"
>Sir! I will answer your question!@
>The enemy size is equivalent to one battalion!\
>More then ten gigantic monsters have been confirmed!@
>Big as trees!\
name ""
name "Sabasa King"
>What...!?\
name ""
>A surprise attack of a battalion... At least 1,000?@
>An unprecedented event in Sabasa history...\
>The current crisis facing his country was obvious...\
lsp 700,":a;chara\sabasa_st01.bmp",-220,0:print 10,500
name "Sabasa King"
>Thank you for the report...@
lsp 700,":a;chara\sabasa_st05.bmp",-220,0:print 10,500
>But!\
name ""
>The King suddenly pulls out his sword, and slashes!
bgm "bgm\boss0.ogg"
dwave 1,"se\slash3.ogg"
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
>He impales the messenger through the chest!\
name "Messenger"
>Ahg... Guhaa!\
name ""
lsp 701,":a;chara\mob_sensi2.bmp",220,0:print 10,500
name "Grandmaster Knight"
>Y...Your Majesty!? What are you...\
name ""
lsp 700,":a;chara\sabasa_st05.bmp",-220,0
lsp 701,":a;chara\mob_heisi1.bmp",220,0:print 10,500
name "Sabasa King"
>...Who the hell are you?\
name ""
name "Messenger"
>......@
>Ehhh... Already found out?\
name ""
>Black darkness bubbles around the messenger, radiating out from where the King's sword cut through the flesh.@
lsp 701,":a;chara\carmilla_st01.bmp",220,0:print 10,500
>Forming again, the darkness turns into a cloak-clad woman!\
lsp 700,":a;chara\mob_sensi2.bmp",-220,0:print 10,500
name "Grandmaster Knight"
>V...Vampire!?\
name ""
>The Grandmaster Knight pulls out his sword, but is unable to move.@
>The oppressive feeling radiating off the Vampire is far more overpowering than any monster he has felt before.\
>In spite of her apparent carefree attitude...@
>The chilling sense of dread coming off of her seemed as if it guaranteed death.\
lsp 700,":a;chara\sabasa_st01.bmp",-220,0
lsp 701,":a;chara\carmilla_st01.bmp",220,0:print 10,500
name "Carmilla"
>Heeey... How did you find me out?@
>I thought I totally disguised myself...\
name ""
name "Sabasa King"
>No matter how well you disguise your appearance, that smell of blood will never fade.@
>...And there are already many of you here.\
name ""
>The King looks around him, sensing horrible things all over the castle.@
>The signs of darkness number at least thirty, that he can sense...\
>The battalion of monsters coming from the north is probably true, too.@
>But a forward group of high-ranking Vampires arrived first...\
name ""
lsp 700,":a;chara\sabasa_st03.bmp",-220,0:print 10,500
name "Sabasa King"
>This situation... Already checkmate, is it?\
name ""
lsp 700,":a;chara\sabasa_st03.bmp",-220,0
lsp 701,":a;chara\mob_sensi2.bmp",220,0:print 10,500
>The King, grasping the situation in only moments, barks orders at the stunned Knight.\
lsp 700,":a;chara\sabasa_st05.bmp",-220,0:print 10,500
name "Sabasa King"
>Withdraw everyone from the Castle!@
>Also draw all the gates down, locking the Vampires in!\
>Do not let a single one out into the town!@
>Once withdrawn and secured, mobilize the entire army north to meet the approaching battalion!\
>I leave command of the army to you!@
>Do not forget to request aid from our allies!\
name ""
name "Grandmaster Knight"
>Understood!@
>B...But what of you, Your Majesty!?\
name ""
lsp 700,":a;chara\sabasa_st03.bmp",-220,0:print 10,500
name "Sabasa King"
>If I leave here, the Vampires will follow!\
name ""
lsp 700,":a;chara\sabasa_st01.bmp",-220,0
lsp 701,":a;chara\carmilla_st01.bmp",220,0:print 10,500
>The King holds his sword ready, staring at Carmilla.@
>Even though he's an experienced veteran, a high-ranking Vampire is a tough enemy to face...\
>Resolving himself, the King takes a defensive stance.@
>Every minute he can hold them off means a greater chance of reinforcements arriving...\
lsp 700,":a;chara\sabasa_st01.bmp",-220,0
lsp 701,":a;chara\mob_sensi2.bmp",220,0:print 10,500
name "Grandmaster Knight"
>We cannot withdraw and leave you here!\
name ""
name "Sabasa King"
>Do not disobey a royal order!@
>If you are a soldier of Sabasa, worry about the safety of the country over the King!\
name ""
name "Grandmaster Knight"
>U...Understood, your Majesty!@
>Please, luck be with you!\
name ""
dwave 1,"se\asioto4.ogg"
csp 701:print 10,500
>The Knight turns and runs off as fast as he can.@
>But Carmilla doesn't even glance at him.\
lsp 700,":a;chara\sabasa_st01.bmp",-220,0
lsp 701,":a;chara\carmilla_st02.bmp",220,0:print 10,500
name "Carmilla"
>...Hahaha, humans have such spirit.@
>I'm sure yours will taste quite delicious. \
name ""
name "Sabasa King"
>Unfortunately for you, the royals of every country are baptized.@
>So as not to pollute our bloodlines with a monster's... Is the pretext, anyway.\
>For one like me, who already holds monster blood, it wasn't a very nice custom, but...@
>I'm happy it will free me of being your plaything here.\
name ""
lsp 701,":a;chara\carmilla_st03.bmp",220,0:print 10,500
name "Carmilla"
>Ehhh...? How disappointing...@
>Elizabeth knew it... That's why she gave me the King so easily!\
name ""
dwave 1,"se\trap.ogg"
>In the next moment, the gates closed.@
>In addition, a powerful magic barrier flows over the gate, trapping any being inside.\
lsp 701,":a;chara\carmilla_st01.bmp",220,0:print 10,500
name "Carmilla"
>Oh? You had something like this up your sleeve?@
>It will take even us some time to release that barrier...\
name ""
name "Sabasa King"
>Don't look down on Sabasa, monster.@
>We've long been prepared for something like this.\
name ""
>...Though having the King himself be stuck inside wasn't expected.@
>With so many high-ranking Vampires inside, it doesn't seem like there's much of a chance of victory...\
lsp 700,":a;chara\sabasa_st05.bmp",-220,0:print 10,500
name "Sabasa King"
>Let's go, Vampire!@
>You shall not take this life quite so easily!\
name ""
name "Carmilla"
>In that case, here I come!\
name ""
>The King's sword clashes against Carmilla's sharp claws.@
>With his back to the wall, the King throws everything he has into this duel...\
bgmstop
sean_change "bg190"
bgm "bgm\castle3.ogg"
lsp 700,":a;chara\durahan_st01.bmp",0,50
lsp 701,":a;chara\grandnoa_st11.bmp",160,0:print 10,500
name "Dullahan"
>...Welcome home, my Queen.@
>How was today's match?\
name ""
>As usual, the Queen returns from having watched the Colosseum matches incognito.@
>The Dullahan guard in the hallway greets her with respect.\
name "Grand Noah Queen"
>Rona, that Elf Swordswoman, is quite skilled.@
>I have great expectations for her future.\
name ""
lsp 700,":a;chara\kerberos_st01.bmp",-180,0:print 10,500
name "Cerberus"
>I see... Rona's actually gonna be my opponent tomorrow.@
>Ya got such a high opinion of her... I'll have to test it out for myself!\
name ""
name "Grand Noah Queen"
>She will certainly lose to you, Cerberus.@
>Well, unless--\
name ""
lsp 700,":a;chara\durahan_st01.bmp",0,50
lsp 701,":a;chara\grandnoa_st11.bmp",160,0:print 10,500
bgm "bgm\kiki2.ogg"
name "Dullahan"
>...My Queen.\
name ""
>Incredibly, the Dullahan interrupts the Queen as she's speaking.\
name "Dullahan"
>...Quickly, put back on your disguise.@
>There's someone suspicious approaching.\
name ""
lsp 700,":a;chara\durahan_st01.bmp",0,50
lsp 701,":a;chara\kerberos_st01.bmp",160,0:print 10,500
name "Cerberus"
>Ya, there's some disgusting scent coming closer...@
>What the hell are the guards doing?\
name ""
lsp 700,":a;chara\durahan_st01.bmp",0,50
lsp 701,":a;chara\grandnoa_st11.bmp",160,0:print 10,500
name "Grand Noah Queen"
>I understand. I'll take my leave...\
name ""
dwave 1,"se\escape.ogg"
csp 701:print 10,500
>Leaving the area in the care of the two Imperial Guards, the Queen quickly returns to the living room.\
lsp 700,":a;chara\durahan_st01.bmp",0,50
lsp 701,":a;chara\kerberos_st01.bmp",160,0:print 10,500
>The Cerberus and Dullahan step in front of the door she left through, and stand guard.\
csp 701
lsp 700,":a;chara\lamianloid_st11.bmp",0,0:print 10,500
>A strange shape steps into the room across from them.\
>A bizarre being, whose left and right side are anything but symmetrical.@
>Each time a foot moves forward, a strange metal-like sound echoes through the room.\
lsp 700,":a;chara\durahan_st01.bmp",0,50
lsp 701,":a;chara\kerberos_st01.bmp",160,0:print 10,500
name "Dullahan"
>...Stop right there, intruder.@
>I cannot guarantee your life if you continue any closer.\
name ""
csp 701
lsp 700,":a;chara\lamianloid_st11.bmp",0,0:print 10,500
name "Lamiaroid"
>Hahaha... A pet of the humans? Even though you're a monster?@
>Well, I guess that's appropriate for obsolete monsters. \
name ""
>The strange monster stops, and flashes a nasty smile.\
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\lamianloid_st01.bmp",0,0:print 10,500
>As the mechanical monster's arms spread open, the whirring noises coming from her body increase in intensity!\
lsp 700,":a;chara\kerberos_st03.bmp",-180,0
lsp 701,":a;chara\lamianloid_st01.bmp",160,0:print 10,500
name "Cerberus"
>What's with that body of yours?@
>A machine monster? The hell are you?\
name ""
lsp 701,":a;chara\lamianloid_st02.bmp",160,0:print 10,500
name "Lamiaroid"
>Do you think a flesh and blood monster can beat me...?@
>I'll crush you to bits, you obsoletes!\
name ""
lsp 700,":a;chara\durahan_st03.bmp",0,50:print 10,500
name "Dullahan"
>She seems anything but ordinary...@
>On my honor, you will not pass by here!\
name ""
>The two monsters sworn to defend clash against the monster born to attack.@
>At the same time, another ominous shadow was creeping through the castle...\
bgmstop
goto *sean0304e



*sean0304e

if %ivent11=0 goto *sean0304d
sean_change "bg105"
bgm "bgm\castle4.ogg"
lsp 700,":a;chara\grangold_st01.bmp",0,0:print 10,500
name "Grangold King"
>Err... As for this month's timber import amount...\
name ""
>Sitting in a crude chair, the King mumbles to himself as he reads a report.\
name "Grangold King"
>...As I thought, not enough.@
>Queen, can you talk to the Ant Girl division in charge of timber...?\
name ""
lsp 700,":a;chara\grangold_st01.bmp",-160,0
lsp 701,":a;chara\queenant_st03.bmp",160,0:print 10,500
name "Queen Ant"
>............\
name ""
name "Grangold King"
>...What's with that heavy frown?@
>The timber shortage is troubling, but it isn't worthy of such a dark face...\
name ""
bgm "bgm\kiki2.ogg"
name "Queen Ant"
>Do you have some business here, Spider Princess?\
name ""
>Not even glancing at the King, the Queen Ant speaks to a seemingly empty corner of the room.@
>Reacting to her words, the space she's staring at starts to shimmer...\
dwave 3,"se\bun.ogg"
csp 701
lsp 700,":a;chara\kumonomiko_st01.bmp",0,0:print 99,1500,"system\trvswave.dll/h"
bgm "bgm\boss0.ogg"
>Taking form there was a giant spider monster.\
lsp 700,":a;chara\grangold_st06.bmp",-200,0
lsp 701,":a;chara\kumonomiko_st01.bmp",160,0:print 10,500
name "Grangold King"
>M...Monster!?\
name ""
>The King jumps up, knocking over his chair.@
>Unable to say anything else, he just stares at her petrified.\
>Overwhelmed by the magical energy pouring off her, he can't even bring himself to cower.@
>He just stands and stares, as if caught in an invisible net.\
lsp 700,":a;chara\queenant_st03.bmp",-220,0
lsp 701,":a;chara\kumonomiko_st01.bmp",160,0:print 10,500
name "Spider Princess"
>Queen Ant...@
>When I heard you had joined with the human camp, I couldn't believe my ears.\
>Were you captured and trained?\
name ""
name "Queen Ant"
>The one requiring training is you, is it not?@
>Chased from your hometown, and even chased from the seat of Queen Insect.\
>Your own brutal nature brought it down upon you.\
>Far beyond preying on humans, you also preyed on your fellow brethren.\
name ""
name "Spider Princess"
>Haha... Well when you are hungry... Why not eat?@
>If I lied about my base desires, what sort of Queen would I become?\
name ""
name "Queen Ant"
>Foolishness... You didn't come here to play around, did you?@
>If you are foolish enough to make an enemy of this country, your training will be severe indeed.\
name ""
lsp 701,":a;chara\kumonomiko_st02.bmp",160,0:print 10,500
name "Spider Princess"
>Haha... Queen Ant, do you still believe to be my equal?@
>You're no longer on my level!\
>...Come, Gigamander.\
wait 300
dwave 2,"se\fire2.ogg"
lsp2 0,":a;chara\gigamander_st01.bmp",0,300,100,100,0,200
for %move=0 to 100 step 1
msp2 0,10,0,0,0,0,-2
print 1:wait 5
next
csp2 0:print 1
name ""
name "Queen Ant"
>Guh...!\
name ""
dwave 2,"se\fire2.ogg"
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
>A whirlpool of flames slam into the Queen Ant!\
dwave 1,"se\bom2.ogg"
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
>The terrible explosion of fire and heat slams the Queen Ant into the wall!\
name "Queen Ant"
>Urhg... N...No...@
>It cannot be... A spirit?\
name ""
name "Spider Princess"
>Haha... A new power bestowed upon me by Black Alice.@
>If you enjoy living, you better pay attention... Lest you be roasted alive.\
name ""
>She looks down at the Queen Ant as she gloats.@
>The ruthless eyes of a predator bore into her body.\
name "Spider Princess"
>My spider brethren and I will eat, eat, eat everything!\
>The people of this country... The King... Your daughters... And you yourself!\
>Come now, everyone! It's time for a feast!@
>This land has been given as an offering to us!@
>Devour everything, until nothing remains!\
name ""
>Responding to her dramatic cry, eight legged shadows start to appear all over...@
>The castle begins to fall into pure chaos...\
bgmstop
goto *sean0304d



*sean0304d

sean_change "bg047"
bgm "bgm\kiki1.ogg"
gosub *setwindow_01p
goto *sean0304a



*sean0304a

name "Luka"
>.........\
name ""
lsp 700,":a;chara\cupid_st02.bmp",-200,0
lsp 701,":a;chara\valkyrie_st01.bmp",80,0:print 10,500
>A large army of angels to the front...\
lsp 700,":a;chara\arcen_st01.bmp",-180,0
lsp 701,":a;chara\rapun_st01.bmp",180,0:print 10,500
>A flock of powerful Chimeric monsters to the side...\
csp 701
lsp 700,":a;chara\stein_st11.bmp",0,0:print 10,500
>An angel who's able to create more monsters through some sort of strange magic...\
lsp 700,":a;chara\iriasu_st13.bmp",0,0
bg "bg\bg001.bmp",10,500
>And behind them all, the one pulling the strings...\
csp 700
bg "bg\bg047.bmp",10,500
name "Luka"
>Uaaaa!!\
name ""
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>Haaa!!\
name ""
dwave 1,"se\asioto4.ogg"
>With my sword raised and Alice at my side, I charge into the fray.\
name "Alice"
>Luka, I'll take out the Chimeric monsters!@
>Use your sword to take out the angels!\
name ""
name "Luka"
>Yeah, leave them to me!\
name ""
lsp 700,":a;chara\cupid_st02.bmp",-200,0
lsp 701,":a;chara\valkyrie_st01.bmp",80,0:print 10,500
>An angel's body, immune to earthly damage...@
>But I wield the Angel Halo...\
>Right now, I'm the only one capable of taking them on!\
csp 701
lsp 700,":a;chara\cupid_st02.bmp",0,0:print 10,500
name "Luka"
>I'm your opponent!\
name ""
>I jump with a shout in front of Cupid as she fires arrows into the fray.\
r@k@\
goto *cupid_start



*sean0304b

bgm "bgm\boss0.ogg"
r@k@\
lsp 700,":a;chara\valkyrie_st01.bmp",-50,0:print 10,500
name "Valkyrie"
>Cupid was killed!?@
>No... Her corporeal form was sealed...?\
name ""
name "Luka"
>What... Was that?@
>Did she die...?\
name ""
>This is totally different from any sort of sealing before.@
>Her body became particles of light, and faded completely away...\
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
name "Alice"
>Don't hesitate, Luka!@
>She was just reduced to her original holy state!\
>A high-ranking angel will not simply cease to exist!@
>So take out those other angels too!\
name ""
name "Luka"
>Yeah, got it!\
name ""
lsp 700,":a;chara\valkyrie_st01.bmp",-50,0:print 10,500
>Gripping my sword tightly, I charge at the Valkyrie.\
r@k@\
goto *valkyrie_start



*sean0305

bgm "bgm\boss0.ogg"
r@k@\
name "Luka"
>Alright, I did it!\
name ""
>With that, the two Angels are down...@
lsp 700,":a;chara\alice_st03b.bmp",-120,0
lsp 701,":a;chara\c_beast_st01.bmp",200,0:print 10,500
>Alice is still facing down those Chimeric monsters...\
lsp 700,":a;chara\hainu_st01.bmp",-200,0
lsp 701,":a;chara\arcen_st01.bmp",160,0:print 10,500
>Alma and Granberia are still being pressured by those big ones...\
lsp 700,":a;chara\amphis_st01.bmp",-270,0
lsp 701,":a;chara\tukuyomi_st01.bmp",0,0
lsp 702,":a;chara\rapun_st01.bmp",270,0:print 10,500
>But those three are just waiting and watching along with Promestein...\
cspl 701,702
lsp 700,":a;chara\stein_st02.bmp",0,0:print 10,500
name "Promestein"
>Sheesh, so you took out both Cupid and Valkyrie?@
>And to think subjugation of the lower world is supposed to be the angels in the Ninth Circle's role.\
name ""
csp 700:print 10,500
dwave 1,"se\aura.ogg"
>In the next moment, a divine light fills the hall.@
>A holy, gentle aura fills the room...\
name "???"
>...I received permission from Eden for my advent to the lower world.@
>I shall face the disgraced Hero.\
name ""
name "Luka"
>W...Who is it!?\
name ""
>A being with pure white angel wings descends down the beam of divine light, right in front of me.\
r@k@\
goto *ariel_start



*sean0306

bgm "bgm\kiki2.ogg"
r@k@\
lsp 700,":a;chara\stein_st02.bmp",0,0:print 10,500
name "Promestein"
>Haha... What will you do, Eden?@
>Even your Archangel protege seems to have been brought down...\
name ""
>Promestein looks toward the ceiling, and starts to talk.@
>Is someone up there? Who is she talking to?\
lsp 700,":a;chara\stein_st03.bmp",0,0:print 10,500
name "Promestein"
>...Don't pretend you can't hear me, Eden.@
>I told you from the start, you should leave the Hero to me first.\
name ""
name "Luka"
>Just who are you talking to?\
name ""
>After defeating the Archangel, I stand in front of Promestein.@
lsp 701,":a;chara\alice_st01b.bmp",-120,0
lsp 700,":a;chara\stein_st02.bmp",160,0:print 10,500
>After beating the last of the Chimeric beasts, Alice stands next to me.\
name "Alice"
>No matter how many we tear through, there's just no end to them...@
>Let's take out the leader, and finish this.\
name ""
lsp 700,":a;chara\stein_st02.bmp",-200,0
lsp 701,":a;chara\arcen_st11.bmp",-160,0:print 10,500
name "Arc-En-Ciel"
>Oh, this looks interesting.@
>Then I'll be the Monster Lord's opponent...\
name ""
>Promestein waves her hand at the excited Arc-En-Ciel.\
name "Promestein"
>No... There are already countermeasures in place for the Monster Lord and Hero.@
>Your interference is not necessary.\
name ""
lsp 701,":a;chara\alice_st03b.bmp",-120,0
lsp 700,":a;chara\stein_st02.bmp",160,0:print 10,500
name "Alice"
>...Countermeasures?@
>I don't know what you're planning, but you have underestimated me!\
name ""
dwave 1,"se\karaburi.ogg"
>As Alice leaps toward Promestein, she readies a powerful attack!\
name "Promestein"
>Whew... Monster Lord, you will have the same fate as the Dark God and the Six Ancestors.\
name ""
lsp 701,":a;chara\alice_st01b.bmp",-120,0:print 10,500
name "Alice"
>What was that!?\
name ""
>The moment Alice's blow was about to pound into Promestein...@
dwave 1,"se\bakuzyu.ogg"
lsp 690,":a;effect\m_circle1.bmp",0,100:print 10,500
>A magic seal appears on Alice, stopping her!\
bgm "bgm\stein.ogg"
lsp 701,":a;chara\alice_st51b.bmp",-120,0:print 10,500
name "Alice"
>Wh...! What is this!?\
name ""
name "Luka"
>Alice!?\
name ""
dwave 1,"se\spark.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,50
csp 2:print 10,50
lsp 2,":c;system\ef_white.jpg",0,0:print 10,50
csp 2:print 10,50
>An intense electricity fills the air as the magic seal flickers.@
>Tremendous magical power fills the air, charging the atmosphere itself!\
name "Promestein"
>Capture successful... Now for the transfer.\
name ""
>Then...@
dwave 1,"se\spark.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,50
csp 2:print 10,50
lsp 2,":c;system\ef_white.jpg",0,0:print 10,50
dwave 2,"se\warp.ogg"
csp 690
csp 701
csp 2:print 10,50
>Together with the magic seal, Alice vanishes!\
name "Luka"
>Hey! What happened Alice!?\
name ""
>I call out, but there's no answer.@
>The charged atmosphere from the magic seal is gone too... As if it never happened.\
csp 701
lsp 700,":a;chara\stein_st02.bmp",0,0:print 10,500
name "Luka"
>Promestein! What happened to Alice!?\
name ""
if %ivent11=0 skip 11
name "Promestein"
>Do you remember that barrier?@
>You should have seen something similar in the basement at Grangold.\
name ""
name "Luka"
>Grangold...?@
>The one that sealed Queen Ant!?\
name ""
>Now that I think about it, it's the same magic I felt there...@
>And the one standing in front of me was the mastermind behind that as well...\
name "Promestein"
>This is the most powerful magic seal barrier that exists.@
>A seal I researched from ancient times, called the Six Ancestors' Great Seal.\
>The ultimate seal, used to seal the Dark God Alipheese and the Six Ancestors.@
>It took several hundred years of study to reproduce it...\
name ""
name "Luka"
>Dark God Alipheese? Six Ancestors?\
name ""
name "Promestein"
>The ancient Dark God, known as the first Monster Lord.@
>And the ancestors of all monsters, the Six Great Monsters.\
>Even monsters of legendary class were sealed... It is the ultimate seal.@
>There's no way the inferior current Alipheese could fight against it.\
name ""
name "Luka"
>That's why you experimented on Queen Ant!@
>So you could test it for use on Alice!?\
name ""
name "Promestein"
>Haha... Not quite.@
>That was a poor model, with low output.\
>It wouldn't have been able to capture her for anything more than a short while...@
>But this is the completed version... The power to maintain itself is supplied by the one it is sealing.\
name ""
name "Luka"
>So where did Alice go!?\
name ""
>Alice was sealed, and vanished somewhere...@
>What the hell is happening!?\
lsp 700,":a;chara\stein_st03.bmp",0,0:print 10,500
name "Promestein"
>Haha... Did you think I would tell you that easily?\
name ""
name "Luka"
>Then I'll force it out of you!\
name ""
>I point my sword at her, ready to charge...\
lsp 700,":a;chara\stein_st02.bmp",0,0:print 10,500
name "Promestein"
>I said countermeasures... They applied to you, too.@
>I prepared a separate seal, just for you...\
>The wide area seal, operating now!\
name ""
dwave 1,"se\yami2.ogg"
mov %skill01,17
mov %skill02,0
mov %skill03,0
mov %skill04,0
mov %skill05,0
name "Luka"
>Guh...!\
name ""
>I brace myself...@
>But nothing happens.\
>Magic like when Alice vanished doesn't appear, nor do I freeze in place.\
>It doesn't seem like anything happened...\
name "Luka"
>What happened...? Did it fail?\
name ""
name "Promestein"
>Did you not notice? Something unusual in your body?\
name ""
name "Luka"
>Unusual? What are you...@
>......!?\
name ""
>I noticed what was wrong the moment after she said it.\
>I can't hear the wind... Can't see the flow of the world any longer.@
>The breath of the spirits in me... I can't feel them at all!\
name "Luka"
>Sylph, what's wrong!?\
name ""
>Not even the wind, I can't hear Sylph any longer!\
name "Luka"
>Gnome, Undine, Salamander!@
>Lend me your power!\
name ""
>No matter who I call, all I get is silence.@
>It's as if they were completely gone from my body...\
name "Luka"
>What did you do, Promestein!?\
name ""
name "Promestein"
>I developed a special seal against the elements of the four spirits that covers the whole world.\
>It works basically the same way as a seal against evil, only much more targeted...\
name ""
name "Luka"
>Sealed throughout the whole world!?\
name ""
name "Promestein"
>The spirits are almost akin to a force of nature itself.@
>To seal them, it had to be deployed across the entire world.\
>It was quite troublesome to set up, but it seems to be worth it.@
>Now you're just a kid who's decent with a sword.\
name ""
dwave 1,"se\karaburi.ogg"
lsp 700,":a;chara\c_beast_st01.bmp",0,0:print 10,500
>In the next moment, a Chimeric Beast jumps at me!\
name "Luka"
>Gah... Lightning Sword Flash!\
name ""
dwave 1,"se\tuki.ogg"
>I try to borrow Sylph's power, and thrust...@
>But I don't even have a fragment of my past speed.\
dwave 2,"se\karaburi.ogg"
>The Chimeric Beast evades my thrust, and slashes me with its nail.\
name "Luka"
>Guh...!\
name ""
dwave 1,"se\break.ogg"
>I parry the nail with my sword, but I can't stop its momentum.@
dwave 2,"se\down.ogg"
>Barely just guarding the blow with my sword, I crash to the floor.\
lsp 700,":a;chara\stein_st02.bmp",-200,0
lsp 701,":a;chara\c_beast_st01.bmp",180,0:print 10,500
name "Promestein"
>With that, your power was completely blocked.@
>Now even a single beast is more than your match.\
>...But you're not completely worthless.@
>The fact that the spirits responded to you to begin with is very interesting.\
name ""
lsp 702,":a;chara\c_beast_st01.bmp",-200,0
lsp 700,":a;chara\stein_st02.bmp",-30,0
lsp 701,":a;chara\c_beast_st01.bmp",300,0:print 10,500
>Chimeric Beasts surround me as Promestein speaks.@
>I'm completely surrounded... There's no escape now.\
name "Luka"
>Gah...!\
name ""
>Now that I've lost the power of the spirits, there's nothing I can do against this many.@
>Even Alma and Granberia are being pushed hard by these Chimeric Beasts...\
>I'm in a big pinch here...\
goto *sean0306a



*sean0306a

if %continue=1 bgm "bgm\stein.ogg"
if %continue=1 lsp 702,":a;chara\c_beast_st01.bmp",-200,0
if %continue=1 lsp 700,":a;chara\stein_st02.bmp",-30,0
if %continue=1 lsp 701,":a;chara\c_beast_st01.bmp",300,0
if %continue=1 bg "bg\bg047.bmp",10,5000
mov %continue,0
name "Promestein"
>You should surrender now.@
>I promise to keep you alive for 100 years if you do.\
>I'll give you plenty of pleasure as a Guinea Pig.@
>It's not a bad deal at all...\
name ""
name "Luka"
>...........\
name ""
>I respond to Promestein's surrender request with...\
r@k@\
csel "Acceptance",*sean0307,"Refusal",*sean0308



*sean0307

name "Luka"
>I... I understand.\
name ""
>I drop my sword, and obediently surrender.@
>There's no way I can resist here...\
csp 702
lsp 700,":a;chara\stein_st02.bmp",-180,0
lsp 701,":a;chara\amphis_st11.bmp",160,0:print 10,500
name "Promestein"
>Good... Amphisbaena, take him to the Drain Lab.@
>Arc-En-Ciel, Hainuwele, I entrust you'll finish the disposal here.\
name ""
name "Amphisbaena"
>Come this way...@
>I'll put you to sleep first.\
name ""
>Amphisbaena presses a strange drug to my nose.\
name "Luka"
>Ah...\
name ""
>Soon after breathing it in, I feel myself about to faint.\
gosub *anten
>I feel someone picking up my body, and carrying me somewhere.@
>Thus, I was captured by Promestein...\
bgmstop
>..........\
wait 1000
goto *sean0307a



*sean0307a

name "Luka"
>Urhg...\
name ""
>I hear something buzzing all around me as I open my eyes.@
>Is that a bunch of insects...?\
>No...\
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
lsp 700,":c;chara\stein_hc01.bmp",0,0:print 10,1500
name "Luka"
>W...Where am I...?\
name ""
>It's not a bug... There are machines all around me!@
>And I'm strapped into a strange one...\
name "Radio"
>Good morning, test subject Mr. Luka!@
>Welcome to the Drain Lab.\
name ""
name "Luka"
>W...Who are you?@> W...Where am I?\
name ""
name "Radio"
>I'll explain your duties!@
>Your penis will be used for experiments.\
>I'm not a researcher, I'm just a supporting machine...@
>I have no idea what the reason is for the experiments.\
>But I was assigned to be the overseer of your semen squeezing.\
name ""
name "Luka"
>N...No way...!\
name ""
name "Radio"
>If you don't have any more questions, let's get started.@
>First will be upper body sexual response testing.\
name ""
name "Luka"
>S...Stop! Ahhh!\
name ""
lsp 700,":c;chara\stein_hc02.bmp",0,0:print 10,500
>Strange arms reach out, and latch onto my body.@
>One goes on my right nipple, another on my left.\
>Some strange organ is also pushed against my ear.@
>The strange sensations make my spine shiver.\
name "Radio"
>Now then, I'll start the machine.@
>This is to record the process of your erection.\
name ""
lsp 700,":c;chara\stein_hc03.bmp",0,0:print 10,500
>When Radio flips a switch, the hands start to move!\
name "Luka"
>Ahhh!!\
name ""
>The hand on my left nipple starts to slowly spin around, as the one on my right starts to stroke my nipple!\
>Strange mucus comes out of the organ on my ear.@
>The sound and feel of it makes it seem like my ear is being violated by it.\
>In response to all these stimulations, I feel my penis getting stiffer.\
name "Radio"
>...I've confirmed the subject's penis is erect.@
>As I explained earlier, the purpose was to record this on video.\
name ""
name "Luka"
>Ahh... No...\
name ""
name "Radio"
>Now, let us squeeze semen from the erect penis.\
name ""
lsp 700,":c;chara\stein_hc04.bmp",0,0:print 10,500
>A strange tentacle appears to my side.@
>From the mouth of it, saliva is slowly dripping out.\
name "Luka"
>Aiie!\
name ""
name "Radio"
>I'm sure you're already aware, but this is a plant that feeds on semen.@
>Our first test will be with biological stimulation.\
name ""
lsp 700,":c;chara\stein_hc05.bmp",0,0:print 10,500
>The mouth of the tentacle opens, revealing a horrifying interior.\
>I see tiny little bumps, wet walls, and the hole itself quickly getting narrow...@
>Perfectly designed to force a man to come inside.\
name "Luka"
>S...Stop...!\
name ""
name "Radio"
>Don't worry... It is biologically designed to give extreme pleasure, to trigger an ejaculation.@
>No specimen has had an issue yet in semen release.\
name ""
name "Luka"
>Ahhh!!\
name ""
mov %hseanwave,11:hseanwave
lsp 700,":c;chara\stein_hc06.bmp",0,0:print 10,500
>With a slurping noise, the horrifying tentacle sucks my penis inside!@
>I feel the wet walls pressing down around me, sucking me deep into the tentacle.\
name "Radio"
>Semen sucking has started.@
>Please, feel free to release semen as you desire.\
name ""
name "Luka"
>Nooo... Ahhh!\
name ""
>It's already feeling so good, I can't hold out.@
>The tiny bumps are spinning around, rotating inside around the tip of my penis.\
>The whole thing sucks on me, causing a strange vibration to almost make it seem like the walls inside were squirming around.\
>The mucus covering the inside walls makes it feel warm, and lets the strange bumps easily rub and stroke my penis.\
name "Luka"
>Ah... Ahhh...\
name ""
lsp 700,":c;chara\stein_hc07.bmp",0,0:print 10,500
>I feel myself already at the brink of an orgasm.@
>With a moan, my body shakes as I'm about to explode.\
name "Radio"
>The testicles raised up.@
>Is ejaculation imminent?\
name ""
name "Luka"
>Ahh... No...\
name ""
>I'm not able to hold it back...@
>Relaxing my body, I give myself over to the sensations from the tentacle.\
gosub *syasei1
lsp 700,":c;chara\stein_hc08.bmp",0,0
gosub *syasei2
name "Luka"
>Haaa...\
name ""
>As the tentacle sucks on me, I come, spraying my semen right into it.@
>Stuck in this humiliating position, this hideous thing made me come...\
>Completely ashamed, I want to cover my face.@
>But with my arms bound by this machine, I can't even do that.\
name "Radio"
>...Ejaculation confirmed.@
>Was the pleasure from the tentacle good?\
>Now, to continue the squeezing...\
name ""
lsp 700,":c;chara\stein_hc09.bmp",0,0:print 10,500
name "Luka"
>Ahh...!\
name ""
>The squirming motion suddenly gets even more intense, causing me to grit my teeth.@
>Bringing me a little deeper inside, I feel the tip of my penis being massaged by the deepest part of the tentacle.\
>A small bump rubs against the neck of my penis, hitting every weak spot I have.\
name "Luka"
>It feels good... It feels too good...@
>Ahh...\
name ""
name "Radio"
>Please perform another ejaculation triggered by a biological organism.@
>I'll compare it to the one triggered by a machine later.\
name ""
name "Luka"
>M...Machine? No way...\
name ""
>She's going to use a machine next...?@
>I'm already reeling from the immorality and humiliation from this tentacle.\
>But not caring about my feelings, the tentacle keeps on sucking and stroking my penis inside its mouth.@
>With almost rhythmic sucking motions, its bumps rub and pull at me with each pulse.\
name "Luka"
>It feels too good... Ahhh...\
name ""
gosub *syasei1
lsp 700,":c;chara\stein_hc10.bmp",0,0
gosub *syasei2
>Again, I'm led to another miserable orgasm.@
>Coming, my semen flows into the tentacle.\
name "Luka"
>Haa...\
name ""
>It continues sucking on me, pulling out the very last drop.\
mov %hseanwave,0:hseanwave
lsp 700,":c;chara\stein_hc11.bmp",0,0:print 10,500
>Finally, it releases me from its mouth.\
name "Radio"
>Was the tentacle enjoyable?\
name ""
name "Luka"
>Urhg...\
name ""
>The mouth, now open on the tentacle, is pointed towards me, as if showing off.@
>None of the semen that I shot into it is visible.\
>It didn't leave a single drop... It drank all of it.\
name "Radio"
>As I instructed you previously, next will be squeezing performed by a machine.\
name ""
lsp 700,":c;chara\stein_hc12.bmp",0,0:print 10,500
name "Luka"
>Wh...What is this?\
name ""
>A strange machine is attached to my penis.\
>The folds inside of it are slimy, but somewhat hard.@
>It doesn't seem like it would feel good, but...\
name "Radio"
>The shaft base is connected to a new drive unit.@
>Using high powered rotation, it can lead to immediate ejaculations.\
>After some testing, it is going to be equipped on the new Roid types.@
>Now, let us begin.\
name ""
mov %hseanwave,24:hseanwave
lsp 700,":c;chara\stein_hc13.bmp",0,0:print 10,500
>With a slow buildup in noise, the thing around my penis starts to slowly spin.@
>Moving slowly at first, it just slightly rubs around the perimeter of my penis.\
name "Luka"
>Aaa...\
name ""
>It's rubbing against the tip of my penis, and even right under the neck...@
>It's not too strong, but feels surprisingly good.\
name "Radio"
>...How is it?@
>It's only a simple rotation, but it's very efficient.\
>Let us slowly increases the speed.@
>The bumps inside won't harm your skin, so do not worry.\
name ""
name "Luka"
>A...Ahh...\
name ""
>Little by little, the speed starts to increase.@
>The rings move up and down, too, changing the areas where it's rubbing against.\
>The slightly hard bumps are starting to feel good...\
name "Radio"
>Let's turn it up some more.@
>If you feel anything abnormal, please raise your left hand.\
name ""
name "Luka"
>Ah...Ah...Ah...\
name ""
mov %hseanwave,25:hseanwave
>The device starts spinning faster and faster...\
lsp 700,":c;chara\stein_hc14.bmp",0,0:print 10,500
name "Luka"
>Ahhhh!!\
name ""
name "Radio"
>The output is at around forty percent now.@
>The load and tolerance are all within normal levels...\
name ""
name "Luka"
>S...Stop...! Ahhh!\
name ""
>The gentle stimulation from before is getting far more intense.@
>The spinning bumps along the underneath of my neck alone are enough to make my body spasm in pleasure.\
>It's almost as if it's polishing my penis at an alarming speed.@
>I writhe in agony, yelling and moaning.\
name "Luka"
>Stop it, stop it!@
>This is too much! Too much!\
name ""
name "Radio"
>This device is intended to get men to ejaculate, not for their pleasure.@
>The continual rotation is supposed to quickly drain a man of his energy.\
>Rather than a pleasure machine, it's more of a semen collection machine.@
>Your comfort or pleasure are not needed factors.\
name ""
name "Luka"
>Hyaaa!!\
name ""
>The incredible polishing sensation on my glans and neck continue, bringing an orgasm startlingly quick.\
name "Luka"
>Ahh!!\
name ""
gosub *syasei1
lsp 700,":c;chara\stein_hc15.bmp",0,0
gosub *syasei2
>I'm brought to an orgasm in no time.@
>But it didn't feel like one that was enhanced by pleasure...\
>It was more like an ejaculation was just forced out.\
name "Radio"
>Semen ejection confirmed.@
>Don't worry, we can collect it later.\
name ""
name "Luka"
>S...Stop it!@
>I came, so stop it!\
name ""
>Even though I came, it isn't stopping.@
>All during my orgasm, the rotational speed never let up for a moment.\
name "Radio"
>The rotary unit can be used for continual ejaculations.@
>Since it's a machine, it can continue on without worry.\
name ""
name "Luka"
>Hyaa!!!@
>S...Stop it! It's going to break me!\
name ""
name "Radio"
>Neither your body or the rotary unit has any problems.@
>It seems your ejaculation has finished, so let's try changing stimuli.\
name ""
mov %hseanwave,0:hseanwave
>A strange gear turns, changing the width and distance between the rings.@
lsp 700,":c;chara\stein_hc16.bmp",0,0:print 10,500
>They all compact together, and circle around just my glans!\
name "Radio"
>Another advantage of the unit is in its ability to be customized.@
>Right now, it's in glans focus mode.\
name ""
name "Luka"
>Aiie!@
>T...This will kill me!\
name ""
>It's not turned on yet, but I'm looking at it in horror.@
>If it spins like it did before, but only on the tip of my penis...\
name "Radio"
>Don't worry, it has been confirmed that death is not a side effect of this setting.@
>Most subjects begin pleading after five seconds.\
name "Luka"
>Ah... S...Stop...\
name ""
name "Radio"
>Let's begin the unit.@
>We'll set it at eighty percent.\
name ""
mov %hseanwave,26:hseanwave
lsp 700,":c;chara\stein_hc17.bmp",0,0:print 10,500
name "Luka"
>Hyaaaa!!\
name ""
>The drive starts, and the unit starts to spin.@
>The intense rotation causes my entire body to spasm and writhe.\
name "Luka"
>Stop!!@
>Please, forgive me!!\
name ""
>The unbearable stimulation blows away my shame in an instant.@
>In only seconds, I'm begging and pleading with her to stop it.\
name "Luka"
>Aiiiee!!\
name ""
>The intense rotation focused just on my glans instantly destroys the last of my energy in my body.@
>This overpowering stimulus is able to wipe out all resistance in seconds...\
>It feels like my whole body has gone rigid with pleasure, unable to do anything but moan and scream, as if I was going insane.\
name "Luka"
>Stop it stop it stop it!@
>Hyaaaa!!\
name ""
gosub *syasei1
lsp 700,":c;chara\stein_hc21.bmp",0,0
gosub *syasei2
>My waist feebly shakes, as I see semen spurt out way too fast.@
>With the intense stimulation attacking me, I can't even feel the difference when I ejaculate.\
name "Luka"
>I...I'm going to die...!@
>Stop it! S...Stop it!!\
name ""
name "Radio"
>Consecutive ejaculations confirmed.@
>Heartbeat and brain waves are slightly disturbed, but in non-life threatening numbers.\
>Stimulation for more ejaculations will be continued.\
name ""
name "Luka"
>Hyaaaa!!\
name ""
gosub *syasei1:gosub *syasei2
>I come again, spraying out more semen into the spinning machine.@
>But the ruthless rotation continues, not letting up for a moment.\
>The intense polishing motion continues, rubbing me so hard that it's as if the nerves that give me pleasure have been bared raw.\
name "Luka"
>Help me! Ahhh!@
>Aiiieee!\
name ""
gosub *syasei1:gosub *syasei2
>I miserably cry out as I ejaculate again.@
>I'm not even sure if my body is my own, anymore.\
>My vision is going hazy, as I feel myself on the verge of collapse.@
>Did I wake up in some sort of hell of pleasure...?\
name "Radio"
>All men cry out as they repeatedly ejaculate.@
>There is no exception. Not even for the Hero.\
name ""
name "Luka"
>Haaa!\
name ""
gosub *syasei1:gosub *syasei2
>My whole body spasms unnaturally as I'm brought to another orgasm.@
>If this keeps up, I really will die...\
name "Radio"
>...Brain waves have exceeded a dangerous threshold.@
>Vitals will go critical if they go any further.\
>...The unit will be stopped.@
>Stimulation will be paused momentarily.\
name ""
mov %hseanwave,0:hseanwave
lsp 700,":c;chara\stein_hc22.bmp",0,0:print 10,500
name "Luka"
>Haa...\
name ""
>The whirring noise starts to slow down, slowly releasing me from this hell.@
>But even after it slows down, I'm completely drained and unable to move.\
name "Radio"
>Now then, I'll check on the state of your penis.@
>We will also take video recording for reference purposes.\
name ""
lsp 700,":c;chara\stein_hc23.bmp",0,0:print 10,500
>Two mechanical hands reach out, and grab my wilted penis.@
>I'm already nothing but a simple lab animal...\
>Completely humiliated, I want to hide my face and run away...@
>But I'm stuck in this machine, unable to even hide my shame.\
name "Radio"
>In this state, it will be hard to extract high quality samples.@
>We shall allow it to rest, and give gentle stimulation for a while.\
>This fake tongue unit will provide it.\
name ""
lsp 700,":c;chara\stein_hc24.bmp",0,0:print 10,500
name "Luka"
>What... Is this...?@
>Ah... It tickles...\
name ""
>Another arm reaches out to my crotch...@
>No, it's a bar that ends in a fake mouth, licking at my balls.\
>The rough tongue gently licks at my balls, almost like it was a real creature.\
lsp 700,":c;chara\stein_hc25.bmp",0,0:print 10,500
name "Luka"
>Haa...\
name ""
>My penis slowly gets hard again.@
>Radio leans in and closely studies it, making me want to run away in shame again.\
name "Radio"
>Re-erection confirmed.@
>However it is a little dirty, it will need to be cleaned.\
name ""
mov %hseanwave,23:hseanwave
lsp 700,":c;chara\stein_hc31.bmp",0,0:print 10,500
name "Luka"
>Haa!\
name ""
>A brush unit comes down from the ceiling, and stops right at the tip of my penis.@
>Before I can think about what's about to happen, it turns on, brushing and rubbing against me in multiple directions.\
>The spinning brushes start at my tip, and slowly move around, cleaning my already extremely sensitive tip.\
name "Luka"
>Ahhh...!\
name ""
>It's cleaning my penis, but it's also throwing me back into the spasms of before.@
>Just like the other machine, it's focusing only on my raw tip.\
name "Radio"
>...Can you feel it?\
>This is not for semen processing, it's only for cleaning.@
>Please try to refrain from ejaculating.\
name ""
name "Luka"
>T...That's...@
>Ahh!\
name ""
>I'm twitching back and forth as I take the brushes torture.\
>One of the brushes moves down, and starts to spin just under the neck of my penis.@
>Another one moves to the back muscle of my penis, moving slightly up and down.\
>A final one stops right at my urethra, spinning right on the hole.\
name "Luka"
>It feels too good...@
>Haaa...\
name ""
>Surrendering right away, I release my body over to the brush's pleasure.\
gosub *syasei1
lsp 700,":c;chara\stein_hc32.bmp",0,0
gosub *syasei2
>I'm led to another pathetic ejaculation.@
>Even as the machine tries to clean my penis, I reached another height.\
name "Luka"
>Urhg...\
name ""
name "Radio"
>Ejaculation confirmed...@
>You will get me in trouble if you pollute the cleaning unit.\
>Please try to refrain from further ejaculation.@
>If you don't, this cleaning process will never end.\
name ""
name "Luka"
>Haaa...!\
name ""
>The brushes movements suddenly get even more fierce.@
>They detected the semen, and are going even faster to try to clean the new stains.\
name "Luka"
>Hyaa! No more!\
name ""
>They were hitting every weak point I had.@
>Polishing my erogenous zones, I feel my body twitching as another height was reached.\
gosub *syasei1
lsp 700,":c;chara\stein_hc33.bmp",0,0
gosub *syasei2
name "Luka"
>Aiiiee!\
name ""
>I'm quickly led to another orgasm, as Radio sighs.@
>Sensing even more semen, the brushes start spinning even faster.\
name "Radio"
>...This is a mysterious reaction.@
>I'm searching the logs of the cleaning unit...\
>.............\
>...My apologies, there is a defect in this unit.@
>Apparently the mis-synchronized settings have caused every male undergoing cleaning to have ejaculated.\
name ""
name "Luka"
>Haaa...\
name ""
mov %hseanwave,0:hseanwave
>At last, the brush's spinning stops.@
>I breath a sigh of relief as my body goes limp.\
name "Radio"
>Anyway, the cleaning is finished.@
>Let us resume the semen squeezing experiments.\
>Promestein ordered a new prototype tested.@
>You will be the first, so I cannot guarantee your safety...\
name ""
lsp 700,":c;chara\stein_hc36.bmp",0,0:print 10,500
>A bizarre machine comes down, making an ominous whirring noise.@
>Inside, I could barely make out a soft looking inner wall before it clamped down on my penis.\
>It hasn't been turned on yet, but just the sensation of being inside it feels good.\
name "Luka"
>Nnnng!\
name ""
>In addition, some kind of restraint is forced into my mouth.\
name "Radio"
>This will be used as a precaution due to the experimental nature of this device.@
>If the pleasure is too extreme, the subject can't be allowed to bite their tongue.\
name ""
name "Luka"
>Nnnnn!\
name ""
>Intense fear suddenly welling up in me, I let out a cry.@
>But the strange thing in my mouth even blocks that.\
name "Radio"
>Now then... Operation, start.\
name ""
mov %hseanwave,16:hseanwave
lsp 700,":c;chara\stein_hc37.bmp",0,0:print 10,500
>The machine suddenly comes to life.@
>It starts slow, creating a slight pressure like it was sticking to my penis.\
name "Luka"
>Nnnn!\
name ""
>My eyes go wide as I try to shake my body free.@
>The touch makes it almost feel like it's absorbing my penis.\
>As if the warm walls are dissolving me away, sucking out my life itself.\
name "Radio"
>This machine is a replica of the Succubus drain techniques.@
>It's highly addictive, so we must be careful during experiments.\
name "Luka"
>Nnn...\
name ""
>I quickly lose any thought of resistance, and loosen my body.@
>Drowning in bliss, I let myself easily reach a climax.\
gosub *syasei1
lsp 700,":c;chara\stein_hc38.bmp",0,0
gosub *syasei2
>In no time, I come into the strange machine.@
>More than the stimulation causing an ejaculation, it feels like it's more just the sensation of the walls itself.\
>It feels like just touching the machine itself is drawing out all of my energy.\
name "Radio"
>Ejaculation confirmed... Please continue.\
name ""
name "Luka"
>Nnn...\
name ""
>My eyes water in fear as I stare at the machine sucking on me.@
>It continues on, completely oblivious and uncaring to my horror.\
>It is exactly as if it was a succubus, eager to drain my life...\
name "Radio"
>It seems as though the pleasure provided is very good.@
>This will require ten ejaculations, then we can continue with the experiments.\
>...Nine more are required.\
name ""
name "Luka"
>Nnnnn!\
name ""
>As soon as she said nine more were required, my body stiffened in fear.@
>If I come ten times in this machine, I'll die for sure...\
>All through my horror, the machine keeps sucking on me...@
>After only moments, my penis again happily twitches as my body gives itself over.\
gosub *syasei1
lsp 700,":c;chara\stein_hc40.bmp",0,0
gosub *syasei2
name "Luka"
>Nnnn!\
name ""
>Sweet, sweet pleasure washes over me as it takes more of my semen and life.@
>The melting comfort from my orgasm battles against my terror.\
>What's going to happen to me as this continues on...?\
name "Radio"
>Second ejaculation confirmed.@
>Eight more remain.\
>Please remain conscious until the experiment has concluded.\
name ""
name "Luka"
>Nnnngg!\
name ""
>Joy and fear mix inside me at the thought of reaching even further climaxes.@
>I don't think my heart and soul could survive eight more, though.\
>Each time I come, I feel as if part of my soul is being ripped away.@
>This truly is an evil machine, designed to cripple men...\
name "Luka"
>Nnn...\
name ""
gosub *syasei1:gosub *syasei2
>With tears spilling out of me, I come again.@
>I can't do anything but give myself over to this machine, and let it keep driving me to new orgasms.\
name "Radio"
>Third ejaculation confirmed... Seven more.\
name ""
name "Luka"
>Nnnn!!\
name ""
lsp 700,":c;chara\stein_hc41.bmp",0,0:print 10,500
>No matter how I cry or scream, it doesn't stop.@
>I feel my eyes rolling up into my head as I faint.\
mov %hseanwave,0:hseanwave
gosub *anten
>........\
>From that time, I'm not sure how much time has passed...@
>But I've been used as nothing but a guinea pig the Drain Lab.\
lsp 700,":c;chara\stein_hc46.bmp",0,0:print 10,500
name "Radio"
>The research department has requested semen to be used for insemination.@
>Please, come into this jar with the eggs.\
name ""
name "Luka"
>N...Nooo! Ahhh!\
name ""
mov %hseanwave,20:hseanwave
>A strange pod filled with eggs is attached to my penis.@
>As soon as it's latched on, it starts a strange sucking motion.\
>Despite my horror, the sweet sucking motion brings pleasure.\
name "Luka"
>Ahh... No... No...\
name ""
>Regardless of my brain's desire, the stimulation is transmitted into my body as pure pleasure.\
>In no time, I'm made to give it just what it wants.\
gosub *syasei1
lsp 700,":c;chara\stein_hc47.bmp",0,0
gosub *syasei2
>I come, spraying my seed all over the eggs in the pod.@
>Forced to inseminate strange, unknown eggs... I feel like a failure as a human.\
name "Luka"
>Haaa...\
name ""
name "Radio"
>You need to fertilize all of the eggs.@
>Please provide more semen.\
name ""
name "Luka"
>Ahh... No more...\
name ""
>The pod starts to wriggle and suck even harder, as if desiring much more than what it got.\
name "Luka"
>Stop, don't move so much...@
>I'm going to come again...!\
name ""
gosub *syasei1
lsp 700,":c;chara\stein_hc48.bmp",0,0
gosub *syasei2
>I don't understand the horrifying machine's movements, but it forces me to ejaculate again.@
>But I full well know what my semen spraying over those eggs means.\
name "Radio"
>Another ejaculation is needed to fertilize the eggs at the top of the pod.@
>Please, continue on.\
name ""
name "Luka"
>No... Ah...\
name ""
>The strange sucking continues, bringing about more blissful joy for my body to rejoice in.\
gosub *syasei1
lsp 700,":c;chara\stein_hc49.bmp",0,0
gosub *syasei2
>With another orgasm, my seed completely filled the pod up to the top.@
>The hideous eggs are completely covered.\
name "Luka"
>Ahh...\
name ""
name "Radio"
>The fertilization has been completed.@
>Now then, we shall continue on in our regular squeezing duties.\
name ""
name "Luka"
>Haaa...\
name ""
>All that remains in the future is more of these semen squeezing experiments, too.@
>I can do nothing but despair in my new role as a guinea pig...\
mov %hseanwave,0:hseanwave
gosub *anten
>.............\
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_labo,1
mov $end_go,"sean0306a"
goto *badend2



*sean0308

name "Luka"
>I will not surrender!@
>No matter what happens, I'll fight to the end!\
name ""
name "Promestein"
>Very well, then you'll come with us by force.@
>Until only your brain, spine and genitals are left, I'll continue to experiment on you...\
>Amphisbaena, cut off the Hero's limbs.\
name ""
csp 702
lsp 700,":a;chara\stein_st02.bmp",-180,0
lsp 701,":a;chara\amphis_st11.bmp",160,0:print 10,500
name "Amphisbaena"
>Hehe, what a wonderful task...@
>Leave it to me.\
name ""
>Amphisbaena flashes her sharp sickle in front of me, and steps closer.@
>In an attempt to try to get the first hit in, I ready my sword...\
bgmstop
dwave 1,"se\bom1.ogg"
quake 10,1000
bgm "bgm\kiki2.ogg"
>But before either of us attacks, a large vibration rocks the hall!\
name "Amphisbaena"
>What is this?\
name ""
name "Luka"
>W...What the!?\
name ""
dwave 1,"se\break7.ogg"
quake 10,1000
bgm "bgm\boss3.ogg"
csp 701
lsp 700,":a;chara\gigantweapon_st01.bmp",0,0
lsp 699,":a;chara\tamamo_st01.bmp",160,0:print 10,500
>A huge monster smashes through the nearby wall!@
>It's the Giganto Weapon... With Tamamo riding on her back!\
lsp 699,":a;chara\tamamo_st04.bmp",160,0:print 10,500
name "Tamamo"
>Did I make it in time?@> Hahaha!\
name ""
dwave 1,"se\karaburi.ogg"
>Tamamo directs the Giganto Weapon, charging right into the Chimeric beasts surrounding me!\
dwave 2,"se\dageki2.ogg"
wait 200
dwave 3,"se\down.ogg"
>The huge monster lashes out with her gigantic nails and tails, swatting all of them away!@
dwave 4,"se\karaburi.ogg"
wait 200
dwave 5,"se\bom2.ogg"
>One after another, the beasts are hurled into the wall, where they collapse on the floor.\
lsp 699,":a;chara\tamamo_st03.bmp",160,0:print 10,500
name "Tamamo"
>Wahwahwah!@> Woah, girl, woah!\
name ""
>Tamamo is holding onto her back for dear life.@
>It seems like she managed to repair and restart that huge monster after I broke her...\
csp 699
lsp 702,":a;chara\c_beast_st01.bmp",-200,0
lsp 700,":a;chara\stein_st01r.bmp",-30,0
lsp 701,":a;chara\c_beast_st01.bmp",300,0:print 10,500
name "Promestein"
>Giganto Weapon... A relic from the Sacred Monster Wars.@
>I wasn't aware of anyone who had the knowledge to restart this being, besides me.\
name ""
cspl 701,702
lsp 700,":a;chara\gigantweapon_st01.bmp",0,0
lsp2 0,":a;chara\tamamo_st21.bmp",450,300,100,100,0,255:print 10,1000
name "Tamamo"
>Owaah!\
dwave 1,"se\fall2.ogg"
for %move=0 to 100 step 1
msp2 0,10,-10,0,0,15,0
print 1:wait 7
next
csp2 0
name ""
>Shaken off by the rampaging monster, Tamamo tumbles to the ground.@
dwave 1,"se\karaburi.ogg"
csp 699:print 10,500
>On a rampage, the Giganto Weapon attacks the remaining five Chimeras.\
lsp 700,":a;chara\hainu_st01.bmp",-250,0
lsp 699,":a;chara\gigantweapon_st01.bmp",250,0:print 10,500
name "Hainuwele"
>...Why is that thing coming here.@
>I'll pass on that kind of opponent.\
name ""
lsp 700,":a;chara\arcen_st01.bmp",-200,0:print 10,500
name "Arc-En-Ciel"
>Then I shall play with it...\
name ""
>Arc-En-Ciel takes a step forward...@
dwave 1,"se\earth3.ogg"
>And with one hand, she stops the Giganto Weapon's headlong charge at her!\
name "Arc-En-Ciel"
>Oooooohhh!!\
name ""
dwave 1,"se\bom2.ogg"
vsp 699,0:print 10,15
vsp 699,1:print 10,15
vsp 699,0:print 10,15
vsp 699,1:print 10,15
vsp 699,0:print 10,15
vsp 699,1:print 10,15
quake 10,1000
>Forcibly grabbing hold of the Giganto Weapon, Arc-En-Ciel tosses her over, and slams her gigantic body into the floor!\
>The floor itself fractures into thousands of tiny cracks as the force of the impact causes the whole Castle to vibrate!\
>Arc-En-Ciel slowly walks toward the downed Giganto Weapon, causing the floor itself to groan at her footsteps.\
name "Luka"
>N...No way...\
name ""
name "Arc-En-Ciel"
>Haa!!\
name ""
dwave 1,"se\bom1.ogg"
vsp 699,0:print 10,15
vsp 699,1:print 10,15
vsp 699,0:print 10,15
vsp 699,1:print 10,15
vsp 699,0:print 10,15
vsp 699,1:print 10,15
quake 10,1500
csp 699:print 10,500
>Arc-En-Ciel continues delivering powerful kicks to her, even after she's down.\
>Cracks line the floor, and start spreading to the walls with each blow.@
>Each impact is like an explosion... She's going to tear down the Castle itself!\
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\arcen_st01.bmp",0,0:print 10,500
name "Arc-En-Ciel"
>...It's over. That was disappointing.\
name ""
>Arc-En-Ciel delivers a final kick to Giganto Weapon, knocking her against the wall.@
>In just a few seconds, she had completely destroyed the giant rampaging monster.\
name "Arc-En-Ciel"
>This is the ancient ultimate weapon, produced during the Sacred Monster Wars?@
>Were the fighters back then of such low quality that this was considered powerful?\
name ""
lsp 700,":a;chara\stein_st02.bmp",-200,0
lsp 701,":a;chara\arcen_st11.bmp",-160,0:print 10,500
name "Promestein"
>Don't say that, Arc-En-Ciel.@
>The power she held back then doesn't even compare to today.\
>Just getting her to operate after 1,000 years of stasis is impressive.@
>That wasn't even a shadow of her power when she was at full strength.\
name ""
name "Arc-En-Ciel"
>I see... Truly a pity.@
>Too bad, I wanted to fight the so-called ultimate weapon with her at full power.\
name ""
name "Luka"
>..........\
name ""
>Chills run down my spine.@
>What insane strength...\
>And I don't think the other four Chimeras are any weaker than her.@
>Insane strength, speed and magical power...@>Inside each of those bodies, they hold some crazy hidden power.\
csp 701
lsp 700,":a;chara\stein_st02.bmp",0,0:print 10,500
name "Promestein"
>These five Chimeras are the ultimate in hand-made beings, using the pinnacle of my technology.@
>Next Doll... The ultimate Chimeras.\
>There probably is no worldly opponent that can stand up to these five...@
>Not even the Four Heavenly Knights.\
name ""
>Overwhelmed, I fix my eyes on Promestein.@
>Behind her stand those beings she called Next Dolls...\
>Now, after losing the spirits, there's no way I could hope to face any of them...\
name "Promestein"
>...Now then, it seems things are pretty much finished here.@
>Take the disgraced Hero as a sample, and mop up the last of the monsters.\
>Make sure to get rid of everything in this Castle.\
name ""
lsp 702,":a;chara\c_beast_st01.bmp",-200,0
lsp 700,":a;chara\stein_st02.bmp",-30,0
lsp 701,":a;chara\c_beast_st01.bmp",300,0:print 10,500
>The group of remaining Chimeric Beasts impatiently move closer...@
csp 702
lsp 700,":a;chara\tamamo_st01.bmp",-180,0
lsp 701,":a;chara\c_beast_st01.bmp",220,0:print 10,500
>But Tamamo steps up in their way.\
name "Tamamo"
>...These artificial monsters' brains are taken from beast monsters, are they not?\
name ""
lsp 701,":a;chara\stein_st02.bmp",160,0:print 10,500
name "Promestein"
>That's right.@
>It's the most cost effective way when considering mass production.\
name ""
lsp 701,":a;chara\c_beast_st01.bmp",220,0:print 10,500
name "Tamamo"
>Hmph. Well, if they have the brains of beasts...@
lsp 700,":a;chara\tamamo_st05.bmp",-80,20:print 10,500
>...Then they know what will happen if they cross me.\
name ""
lsp 701,":a;chara\c_beast_st03.bmp",220,0:print 10,500
name "Chimera Beast"
>....!!\
name ""
>The Chimera Beasts suddenly appear as if they're terrified.@
>The ones circling us start to back away as Tamamo glares at them.\
lsp 700,":a;chara\tamamo_st05.bmp",-80,20
lsp 701,":a;chara\stein_st01r.bmp",160,0:print 10,500
name "Promestein"
>..........\
name ""
name "Tamamo"
>What's wrong? Not going to attack?\
name ""
lsp 701,":a;chara\arcen_st12.bmp",-160,0:print 10,500
name "Arc-En-Ciel"
>Oh... This one seems more interesting.@
>I'd like to face this one...\
name ""
lsp 700,":a;chara\stein_st01r.bmp",-200,0:print 10,500
name "Promestein"
>No... Arc-En-Ciel, we're falling back.\
name ""
lsp 701,":a;chara\arcen_st13.bmp",-160,0:print 10,500
>Arc-En-Ciel's face instantly turns into one of disgust at Promestein's words.\
name "Arc-En-Ciel"
>...You can't be serious!?\
name ""
name "Promestein"
>The Monster Lord's power was sealed, and the Hero was neutered.@
>We've already achieved our intended goals.\
name ""
lsp 701,":a;chara\rapun_st11.bmp",160,0:print 10,500
name "Rapunzel"
>But the cleansing of the remaining monsters here still needs to be done...\
name ""
lsp 701,":a;chara\tukuyomi_st11.bmp",280,0:print 10,500
name "Tsukuyomi"
>I was created to take down Tamamo, one of the Four Heavenly Knights.@
>If we fall back here, this will be truly regrettable for me...\
name ""
name "Promestein"
>We could defeat Tamamo here, but our huge advantage wouldn't be changed much.@
>...But a big loss of our force may be likely.\
>At this point, we cannot afford to lose even one of you five.@
>Don't be clouded by the immediate situation, and lose sight of the big picture.\
name ""
lsp 701,":a;chara\arcen_st13.bmp",-160,0:print 10,500
name "Arc-En-Ciel"
>I do not like this...@>But you are our creator.@
>I merely obey.\
name ""
csp 701
lsp 700,":a;chara\stein_st03.bmp",0,0:print 10,500
name "Promestein"
>With that said, you escape with your life... For now.\
name ""
>Saying that, Promestein turns around and starts walking away.@
>The Chimeric beasts all follow after her.\
name "Luka"
>Wait!@>What happened to Alice!?\
name ""
lsp 700,":a;chara\stein_st02.bmp",0,0:print 10,500
name "Promestein"
>Haha... If you want to know, chase after me.@
>If you don't hurry, you may never see your dear Monster Lord again.\
name ""
dwave 1,"se\asioto3.ogg"
csp 700:print 10,500
>Leisurely walking to the exit of the Castle, Promestein and the Chimeric monsters leave.\
name "Luka"
>Gah... Wait!\
name ""
dwave 1,"se\asioto4.ogg"
>I start running after Promestein...\
lsp 700,":a;chara\tamamo_st03.bmp",0,0:print 10,500
name "Tamamo"
>Do not succumb to her provocations!\
name ""
name "Luka"
>.............\
name ""
csp 700:print 10,500
>I ignore Tamamo's yells, and keep running out of the castle to catch up with Promestein.\
dwave 1,"se\asioto4.ogg"
bgmstop
sean_change "bg001"
bgm "bgm\irias.ogg"
lsp 701,":a;chara\eden_st21.bmp",-220,0
lsp 700,":a;chara\iriasu_st01.bmp",220,0:print 10,500
name "Eden"
>Goddess Ilias...@
>Promestein seems to have withdrawn without following your orders.\
name ""
name "Ilias"
>...........\
name ""
name "Eden"
>You ordered the Monster Lord's Castle, the Monster Lord and the Hero all destroyed.@
>But she withdrew before finishing off any of those goals.\
>This is a grave sin, that besmirches your divine presence.@
>You must punish that one...\
name ""
lsp 700,":a;chara\iriasu_st02.bmp",220,0:print 10,500
name "Ilias"
>...Well, I shall let her do as she pleases.\
name ""
lsp 701,":a;chara\eden_st22.bmp",-220,0:print 10,500
name "Eden"
>But Goddess Ilias...!\
name ""
lsp 700,":a;chara\iriasu_st05.bmp",220,0:print 10,500
name "Ilias"
>Are you challenging my forgiveness?@
>Or are you simply attempting to undermine my judgement?\
name ""
lsp 701,":a;chara\eden_st23.bmp",-220,0:print 10,500
name "Eden"
>No, I would never...@
>Of course, I will do just as you command.\
name ""
lsp 700,":a;chara\iriasu_st02.bmp",220,0:print 10,500
name "Ilias"
>Then go, Seraph Eden.@
>Bring the judgement of the Heavens down on those foolish enough to disrespect it.\
name ""
lsp 701,":a;chara\eden_st21.bmp",-220,0:print 10,500
name "Eden"
>Yes! Entrust this task to me!@
>I swear on my life, I will accomplish this task!\
name ""
r@k@\
bgmstop
mov %gloval1_story_sinkou,11:gosub *savegloval1
goto *sean0308s



*sean0308s

sean_change "bg142"
bgm "bgm\kiki2.ogg"
name "Luka"
>Damn it, where did she go?\
name ""
>Although I ran out of the Castle, I can't find Promestein anywhere.\
>Even if she used teleportation magic, she couldn't have taken that huge number of Chimeric beasts with her...\
name "Luka"
>Does that mean their base could be somewhere around here...?\
name ""
>In that case, I can only think of one place...\
name "Luka"
>Remina!\
name ""
if %ivent15=0 skip 3
>If there's an enemy base here, that can be the only place.@
>When we went there before, we even encountered some Chimeric Beasts, after all!\
name "Luka"
>Galda, come!\
name ""
dwave 1,"se\habataki.ogg"
lsp 700,":a;chara\galda_st01.bmp",0,0:print 10,500
name "Galda"
>Kweh!\
name ""
>Along with a noisy cry, the giant bird monster lands.@
>I don't know if she heard my anxiety, but she obediently came when I called.\
name "Luka"
>Take me to Remina!\
name ""
lsp 700,":a;chara\galda_st02.bmp",0,0:print 10,500
name "Galda"
>Kweh!\
name ""
dwave 1,"se\habataki.ogg"
>As soon as I'm on her back, Galda takes off.@
>I urge her on, worried about Alice.\
sean_change "bg182"
>With Galda's fast speed, we approach Remina after only a few minutes.@
>We're already in the sky over Remina.\
name "Luka"
>.........\
name ""
bg "bg\bg143.bmp",10,1500
>Looking down at Remina, complex emotions wash over me.\
>This town was the most advanced in relations between human and monster.@
>But it was all destroyed by Ilias...\
name "Luka"
>But where is Promestein...?\
name ""
>Her base must be somewhere here...@
>But no matter where I look, I only see ruins.\
>I can't see anything from the sky that looks like a livable building...\
name "Luka"
>Hmm...?\
name ""
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\alice8th_st01.bmp",0,0:print 10,500
>Suddenly, a girl completely not fitting in with the scenery comes into view.@
>She's wearing a cute dress, and holding a teddy bear...\
name "Luka"
>She looks... Familiar somehow.\
dwave 1,"se\kodou.ogg"
lsp 700,":a;chara\alice8th_st04.bmp",0,0:print 10,500
>....!?\
name ""
>Our eyes meet...@
>Looking up at me riding Galda, she starts laughing.\
>She's standing next to a wall beside some ruins.@
>Right at her feet... Is a hatch!\
name "Girl"
>Hehehe...\
name ""
>The same moment the girl giggles, the hatch somehow pops open.@
>There's no doubt, that must be the entrance to an underground base...\
name "Luka"
>Is that Promestein's base...?\
name ""
dwave 3,"se\bun.ogg"
csp 700:print 99,1500,"system\trvswave.dll/h"
>In the next instant, the girl was gone.@
>The second I was distracted by the hatch, she had somehow vanished.\
bgm "bgm\kiki2.ogg"
name "Luka"
>Did the girl show me the enemy's base...?@
>Galda, set me down there.\
name ""
name "Galda"
>Kweh!\
name ""
dwave 1,"se\habataki.ogg"
>Galda lands next to the hatch as I asked.@
>I jump off her back, and step in front of the hatch.\
>It really is an entrance to an underground laboratory...@
>There's no doubt, this must be Promestein's base.\
name "Luka"
>But who was that girl...?@
>Why did she show me this entrance?\
name ""
>I don't think she was an ally...@
>Even from far away, I felt a chill like she was some sort of evil being.\
>If she's an enemy, is this a trap?@
>What should I do...?\
name "Luka"
>What do you think, Galda?\
name ""
lsp 700,":a;chara\galda_st02.bmp",0,0:print 10,500
name "Galda"
>Kweh!\
name ""
>...I don't know what to do.@
>If I get into trouble here, no help will be coming for sure.\
name "Luka"
>Then I'll try looking inside, Galda...@
>Alice may be trapped here!\
name ""
lsp 700,":a;chara\galda_st03.bmp",0,0:print 10,500
name "Galda"
>Kweh!\
name ""
dwave 1,"se\habataki.ogg"
csp 700:print 10,500
>Galda lets out a cry of encouragement, then flies away.@
>On my guard, I warily climb down the hatch...\
dwave 1,"se\asioto3.ogg"
sean_change "bg183"
bgm "bgm\labo1.ogg"
name "Luka"
>Wh...What is this place!?\
name ""
>This place looks really advanced...@
>There are strange machines lining all the walls. I have no idea what any of them could be used for...\
>This is like a totally other world.@
>Promestein's technology is far past anything humans or monsters have achieved...\
name "Luka"
>Alright... I need to head further inside.\
name ""
>As I gingerly take a single step forward...\
dwave 1,"se\alarm.ogg"
>An ear-splitting klaxon fills the air!\
name "Luka"
>Damn, was I already discovered!?\
name ""
>I raise my sword, preparing for the enemy's onslaught...\
delay 1000
>...But no guards or angels come to intercept me.\
name "Luka"
>Eh... Is nobody coming?@
>What the heck is going on?\
name ""
>I slowly advance down the hallway, all the while holding my sword at the ready...\
dwave 1,"se\asioto3.ogg"
sean_change "bg184"
>The internal structure is very simple.@
>It's one wide hallway with rooms off to the side.\
name "Luka"
>W...What is this machine...?\
name ""
>My eyes are drawn to the huge machines at my side.@
>I can't even begin to fathom what they're used for.\
dwave 1,"se\alarm.ogg"
>The alarm hasn't stopped ringing out since I first triggered it.@
>But no enemy is responding to it...\
name "Luka"
>Is this a trap after all...?@
>Or did something happen here?\
name ""
>This place is so advanced, they have to be aware of exactly where I am.@
>But there's nowhere to run or hide, so I just have to keep going...\
name "Luka"
>Is this a water tank?@
>What's inside it...?\
name ""
lsp 700,":a;chara\Q-5_st01.bmp",0,0:print 10,500
>Large water tanks line the perimeter of this room.@
>They looked to be full of strange monsters... But none of them seem alive.\
name "Luka"
>Are these Chimeric Monsters too?\
name ""
lsp 700,":a;chara\gyokuza_st01.bmp",0,0:print 10,500
>All of these monsters look strange...@
>Most of them seem to be composed of multiple monsters, and have distorted figures.\
lsp 700,":a;chara\saccubus_k_st01.bmp",0,0:print 10,500
>All of these experimental beings...@
>Life itself is being toyed with here.\
csp 700:print 10,500
name "Luka"
>This is horrible...@>Hmm?\
name ""
name "Electronic Sound"
>Main System Error. Oxygen supply halted to experimental organism S-2.\
>Emergency measures initiated. Releasing from nursery plant.\
name ""
name "Luka"
>Wh...What was that?\
name ""
dwave 1,"se\ero_slime3.ogg"
>The liquid in one of the water tanks suddenly drains.@
>As soon as it's empty, the lid opens up!\
>The Chimeric monster inside starts moving...@
>Stepping out of the tank, it looks at me and blinks!\
r@k@\
goto *c_s2_start



*sean0309

bgm "bgm\labo1.ogg"
name ""
r@k@\
name "Luka"
>Whew... I managed to win.\
name ""
>Although I lost the power of the spirits, I'm not as powerless as I thought.@
>I've used my own physical abilities all the way till this point, too!\
name "Luka"
>But still... Even after that loud fight, no guards came?@
>Just what is going on here...?\
name ""
>If this is a trap, it's a very confusing setup...@
>Puzzled, I keep moving deeper.\
dwave 1,"se\asioto3.ogg"
sean_change "bg185"
name "Luka"
>The partition is broken...@
>And even the door is smashed open.\
name ""
>As I walk on, I see traces of destruction all over.\
>Broken machines, doors... All look like they've been smashed.@
dwave 1,"se\alarm.ogg"
>And that alarm is still ringing...\
name "Luka"
>Is there another intruder besides me?\
name ""
>That would make sense, if so...@
>Someone besides me came here, and smashed everything.\
>Unlike me trying to sneak in, they came in with a bang.@
>Did they do that to attract attention...?\
lsp 700,":a;chara\Q-5_st01.bmp",0,0:print 10,500
name "Luka"
>...Wah! Another Chimeric monster!?\
name ""
>I see another one crawling across the floor, and I draw my sword, but...\
name "Chimeric Monster"
>.....\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,500
>As if frightened by me, she runs away.@
>There seem to be a few of them running around...\
name "Luka"
>...Did their tanks break too?@
>Were they let loose on purpose...?\
name ""
>It seems as though the intruder may have been breaking all of their water tanks...\
name "Luka"
>I'll just have to take advantage of this confusion!\
name ""
dwave 1,"se\asioto4.ogg"
>I move ahead, avoiding the escaping Chimeric monsters.@
>None of them try to fight me... They seem to be powerless experimental failures.\
>But it doesn't seem as though all of them are powerless...@
>One of them attacks me as soon as she spots me!\
r@k@\
goto *c_a3_start



*sean0310

bgm "bgm\labo1.ogg"
name ""
r@k@\
name "Luka"
>It's really difficult without the spirits...\
name ""
>If a powerful enemy appears now, I'm done for.@
>I have to find a way to release the sealed spirits, somehow...\
name "Luka"
>But still, who was it that managed to destroy that door...?\
name ""
>The deeper I go, the worse the destruction is.@
>But I noticed something...\
>The intruder must be small... Everything is destroyed, but there isn't much wrecked that's above waist height.\
name "Luka"
>They're about... Tamamo's height?\
name ""
>But she's back in the castle, and I don't think she could have gotten ahead of me so quickly.@
>Was it that girl from before?\
>I advance further inside, puzzled by this new revelation.\
dwave 1,"se\asioto3.ogg"
sean_change "bg186"
name "Luka"
>What's this...?\
name ""
>Going deeper inside, I come to a huge door.@
>Inside it, there's a gigantic room.\
>As before, there's highly advanced looking machines lining the room.@
>And in the middle of the room...\
bgm "bgm\stein.ogg"
lsp 700,":a;chara\stein_st02.bmp",0,0:print 10,500
name "Promestein"
>...Oh? You reached here awfully fast.\
>Still, how did you find this laboratory?@
>I didn't think that hatch was so easy to locate...\
name ""
name "Luka"
>Didn't you lure me here?@
>With that Gothic Lolita girl...\
name ""
lsp 700,":a;chara\stein_st01r.bmp",0,0:print 10,500
name "Promestein"
>I see... So it was Black Alice's doing.\
name ""
>Promestein's eyebrows lift in surprise.@
>It seems like it wasn't a trap she laid for me...\
name "Luka"
>...More importantly, where's Alice!?@
>What did you do to her!?\
name ""
lsp 700,":a;chara\stein_st02.bmp",0,0:print 10,500
name "Promestein"
>Haha... You two sure are interesting.@
>So anxious about each other, you miss each other in your fury.\
>Didn't you take notice of another intruder besides yourself?\
name ""
name "Luka"
>It seems like some hateful person...@
>Clearly getting revenge for the horrible experiments you're performing here!\
name ""
name "Promestein"
>You're too daft to pick up on the clues, aren't you?@
>Anyway, the other intruder should be here shortly...\
>Look, just across from the other hallway.\
name ""
name "Luka"
>Coming here...?\
name ""
>It's true... I hear the sounds of violence getting closer.@
dwave 1,"se\break3.ogg"
>Across the room, a loud explosion sounds out from the door.\
>Stepping through the dust, the other intruder enters the room...\
bgm "bgm\alice1.ogg"
dwave 2,"se\escape.ogg"
lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
name "???"
>Here you are, Promestein!@
>I'll make you undo this seal on me!\
name ""
>A smaller version of Alice steps into the room.@
>Stunned, I can only gape at her.\
name "Luka"
>A...Alice...@> Right...?\
name ""
lsp 700,":a;chara\alice_st82.bmp",0,50:print 10,500
name "Alice"
>Of course it's me, you idiot!@
>There's no time to explain, but any idiot could tell it's me!\
name ""
name "Luka"
>I see... Alice... You're safe... Thank goodness...\
name ""
>She's safe... I'm so relieved...\
>I'm happy she's safe, but...@> Just what happened to make her like that?\
>Could it be because of that seal that she shrank...?\
bgm "bgm\stein.ogg"
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\stein_st01r.bmp",160,0:print 10,500
name "Promestein"
>I see... That could indeed nullify the Six Ancestors' Great Seal if applied quickly enough.@
>But how did you come up with that method so quickly?\
name ""
name "Alice"
>Hmph... That nasty fox taught me quite a lot.@
>Though I never thought I'd seriously have to use that magic...\
name ""
lsp 701,":a;chara\stein_st02.bmp",160,0:print 10,500
name "Promestein"
>Hmph. You can't bring forth even a tenth of your power in that body.@
>With the Hero spiritless, your power is merely a fraction of what it was.\
>It's not even necessary to call a Next Doll or La Croix here.@
>I alone am more than enough.\
name ""
name "Luka"
>Guh...!\
name ""
>Not only does she have the power of angels, but she's also able to use those manufactured spirits...@
>Just how can the weakened Alice and I beat her...!?\
r@k@\
csp 701
goto *stein1_start



*sean0311

bgm "bgm\kiki2.ogg"
name ""
r@k@\
name "Promestein"
>This is impossible...@
>You should be powerless!\
name ""
>Shocked, Promestein seems to have completely lost the will to fight.\
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\stein_st23.bmp",160,0:print 10,500
name "Alice"
>It looks like you're having trouble, Professor Seaweed.@
>Before you take the finishing blow, I'll have you remove this seal.\
>The Six Ancestors' Great Seal on my real body...\
name ""
name "Luka"
>...Real body?\
name ""
>Her "real" body is still sealed?@
>Then what is this tiny Alice here...?\
name "Promestein"
>Hah... I can't undo the seal.@
>Once the technique has been started, not even I can stop it.\
name ""
lsp 700,":a;chara\alice_st77.bmp",-170,50:print 10,500
name "Alice"
>Wh...What did you say!?\
name ""
name "Promestein"
>The Six Ancestors' Great Seal's power to maintain itself is taken from the very person it's sealing.\
>So once it's in place, nobody from the outside can break it.\
>It's only released once the magic power maintaining it is lost...@
>In other words, once the one being sealed is dead.\
name ""
name "Alice"
>What...?@
>Then I'm stuck in this form!?\
name ""
csp 701
lsp 700,":a;chara\stein_st23.bmp",0,0:print 10,500
name "Promestein"
>No, there's no need for that...@>Because you will die here!@
>I still hold my trump card!\
name ""
name "Luka"
>...!!\
name ""
dwave 1,"se\kodou.ogg"
bgm "bgm\stein.ogg"
>Promestein whips out a syringe, filled with a strange liquid, and pierces her own neck with it!\
name "Promestein"
>It's shameful for a researcher to use an item that hasn't been properly tested first...@
>But I'll be able to get over it once I destroy you here!\
name ""
dwave 1,"se\kodou.ogg"
lsp 700,":a;chara\alice_st81.bmp",-170,50
lsp 701,":a;chara\stein_st23.bmp",160,0:print 10,500
name "Alice"
>Wh...What's that medicine?\
name ""
>I can sense what's making Alice feel so uneasy about that liquid...@
>It's almost pulsing with a sort of evil aura.\
>Chills run down my spine just from the sight of it.@
>That thing is far from normal...\
name "Promestein"
>I can't return to my original body anymore with this...@
>But if it's to destroy you both here...!\
name ""
>Promestein moves to inject the ominous liquid into her neck!@
dwave 1,"se\warp.ogg"
>But in the next moment, a magical formation appears at her feet!\
bgm "bgm\kiki2.ogg"
name "Promestein"
>What!?@> What's this!?\
name ""
>Promestein's body goes completely rigid.@
>With her thumb on the plunger of the syringe, she was stopped before the liquid went inside!\
name "???"
>Hehe, don't do that.@
>You shouldn't use that injection yet...\
name ""
dwave 3,"se\bun.ogg"
csp 701
lsp 700,":a;chara\alice8th_st01.bmp",0,0:print 99,1500,"system\trvswave.dll/h"
bgm "bgm\maou2.ogg"
>That mysterious girl from before appears in the room...\
>She looks so innocent, but I can't shake this blood chilling sensation.@
>She's giving off that same evil aura as the medicine in Promestein's syringe.\
lsp 700,":a;chara\alice8th_st01.bmp",-180,0
lsp 701,":a;chara\stein_st23.bmp",160,0:print 10,500
name "Promestein"
>Black Alice...@> Don't interfere!\
name ""
name "Alice"
>Black... Alice!?\
name ""
>...That's right, I've heard that name before.@
>The strange person who was recruiting monsters, and building up a force...\
name "Black Alice"
>Goddess Ilias doesn't wish for your brain to be broken yet.@
>It would be quite troubling if you used the unfinished "White Rabbit" in desperation.\
>Please, cool your head off for a bit.\
name ""
name "Promestein"
>Gah...!@>Damn you, you fox girl!\
name ""
dwave 1,"se\warp.ogg"
csp 701:print 10,500
>The magic seal at Promestein's feet flashes, and she vanishes.@
lsp 700,":a;chara\alice8th_st01.bmp",0,0:print 10,500
>After teleporting her away somewhere, Black Alice turns toward us.\
name "Black Alice"
>Fox girl is so uncute...@
>I'd prefer rabbit girl.\
name ""
lsp 700,":a;chara\alice_st73.bmp",-170,50
lsp 701,":a;chara\alice8th_st01.bmp",160,0:print 10,500
name "Alice"
>I agree that nothing about a fox is cute, but...@
>Who the hell are you!?\
>Why did you assume the name of the eighth Monster Lord, "Black Alice"?\
>Your appearance, too... You're even trying to look just like her!\
>What do you have to gain by mimicking that ancient Monster Lord!?\
name ""
name "Black Alice"
>Hehe... I didn't take anyone's name.@
>I am Alipheese the Eighth.\
dwave 1,"se\earth1.ogg"
quake 10,1000
lsp 701,":a;chara\alice8th_st02.bmp",160,0:print 10,500
>Even if the figure can be faked, the magic power can't...@
>If you desire, I could give a more direct proof of my power.\
name ""
name "Luka"
>Urhg...!\
name ""
>The ominous feeling of pressure spreads throughout the room, almost crushing me.@
>Unlike the heavy ambition of Granberia's presence, Black Alice's is completely different...\
>The sensations I get from her is one of blinding fear and horror...\
lsp 700,":a;chara\alice_st81.bmp",-170,50:print 10,500
name "Alice"
>But how!?@
>Black Alice was destroyed by the legendary Hero Heinrich!\
name ""
lsp 701,":a;chara\alice8th_st01.bmp",160,0:print 10,500
name "Black Alice"
>Yes... It's regrettable, but I was struck down 500 years ago.@
>But just before I was about to fall into the world of the dead, Goddess Ilias saved me.\
name ""
name "Luka"
>Ilias did?@
>Why would she help a monster that she hates so much...?\
name ""
lsp 701,":a;chara\alice8th_st04.bmp",160,0:print 10,500
name "Black Alice"
>Hehe... Goddess Ilias has her own circumstances.@
>There are one or two things we can't tell you...\
name ""
>Black Alice giggles as she hugs her stuffed bear.\
lsp 700,":a;chara\alice_st82.bmp",-170,50:print 10,500
name "Alice"
>So you became her dog?@
>A previous Monster Lord... Now a slave to Ilias!?\
name ""
name "Black Alice"
>Hehe... First a fox, now a dog... How horrible.@
>I think rabbit is cuter.\
name ""
name "Luka"
>..........\
name ""
>A former Monster Lord, known for her brutality, now working for Ilias?@
>And she has been collecting monsters who are hostile to humans...?\
lsp 700,":a;chara\alice_st73.bmp",-170,50
lsp 701,":a;chara\alice8th_st01.bmp",160,0:print 10,500
name "Black Alice"
>That reminds me, I have a message from Ilias.\
name ""
>Black Alice brushes her skirt, then changes her tone to mimic Ilias'.\
name "Black Alice"
>Oh brave Luka... I have been troubled since you have fallen into darkness.@
>Why has a Hero of humans become a traitor, and joined the ranks of monsters?\
>Why have humans, whom I have loved and guided, continued their mixing with monsters?\
name ""
name "Luka"
>............\
name ""
name "Black Alice"
>...I have come to a conclusion.\
>Humans that do not listen to the voice of their Goddess are not needed any longer.\
>I shall cleanse the world of humans, and create the world anew.\
name ""
name "Luka"
>Create the world anew...?@
>Cleanse the world of humans?@> No way...\
name ""
lsp 701,":a;chara\alice8th_st04.bmp",160,0:print 10,500
name "Black Alice"
>...Yes, bring the current realm of humans to extinction.@
>It is the Goddess' will.\
name ""
name "Luka"
>Don't screw around!@
>Destroying humanity!?\
name ""
lsp 701,":a;chara\alice8th_st02.bmp",160,0:print 10,500
name "Black Alice"
>Hehe, it will be such a lovely party.@
>And I'm in the role of hostess.\
>I have plenty of fun ideas.@>I'll liven up the last days humanity has!\
>The arrangements have already been made, too.@>Hehe.\
name ""
lsp 700,":a;chara\alice_st82.bmp",-170,50:print 10,500
name "Alice"
>Who would ever allow that!?\
name ""
dwave 1,"se\karaburi.ogg"
>Brandishing her fist, Alice charges at Black Alice!@
dwave 2,"se\down.ogg"
>But her attack completely misses, causing Alice to crash to the floor!\
lsp 700,":a;chara\alice_st73.bmp",-170,50:print 10,500
name "Alice"
>Gah...!\
name ""
lsp 701,":a;chara\alice8th_st01.bmp",160,0:print 10,500
name "Black Alice"
>Well then, have a nice day.@
>I do so look forward to our next meeting.\
name ""
>Black Alice holds the stuffed bear's right hand, and uses it to wave goodbye to us.@
dwave 3,"se\bun.ogg"
lsp 700,":a;chara\alice_st73.bmp",-170,50
csp 701:print 99,1500,"system\trvswave.dll/h"
>In the next moment, she vanishes from the spot.\
bgm "bgm\labo1.ogg"
name "Luka"
>Destroying the human race...?\
name ""
>I mutter to myself as the ominous pressure fades along with Black Alice.@
>Ilias is willing to go that far in her reckless violence?\
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>The tyranny of that "Goddess" is finally clear.@
>It seems her hatred is no longer limited to monsters.\
name ""
>Alice picks her small self up from the floor.\
name "Luka"
>I'm glad you're unharmed, Alice.\
>But what's with your appearance...?@
>Did you turn into that because of that seal?\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>No... In order to slip away from the seal, I did it to myself.@
>This is a temporary vessel... Not my real body.\
>My real body is still trapped in subspace.\
name ""
name "Luka"
>Err... I'm not quite sure what that all means...\
name ""
name "Alice"
>I'll explain the minor details later.@>For now, look around you.@
>Doesn't this place seem to be some sort of major laboratory?\
name ""
name "Luka"
>Y...Yeah...\
name ""
>There might be a clue as to how to break free of that seal somewhere around here.@
>Alice and I start searching the room.\
>But I quickly realize that my searching is meaningless.@
>I look at strange machines, and have no idea what they're for.@> The books are completely unintelligible to me, too.\
name "Alice"
>Isn't there something like a research diary?@
>If there is, we might be able to find out something about the seal...\
name ""
name "Luka"
>This shelf has a bunch of strange silver discs on it.\
name ""
>There's a stack of palm-sized, glittering silver discs on a shelf.@
>And the shelf above it is crammed full of hundreds more of the discs.\
name "Luka"
>Ah, this shelf is full of them too.@
>I wonder what they're all for?\
name ""
name "Alice"
>All these boxes here have discs too.@
>There seem to be thousands of them in this room.\
name ""
>Alice picks up a disc, and takes a long, hard look at it.\
name "Luka"
>Ah, I got it.@
>I saw something similar to this in Ilias Village.\
name ""
lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
name "Alice"
>Did you figure something out?\
name ""
name "Luka"
>You hang a bunch of these around your farm to ward off the birds.@
>They're scared of bright, shiny objects, so they would stay away.\
>I wonder if Promestein was researching how to repel crop eating birds?\
name ""
lsp 700,":a;chara\alice_st76.bmp",0,50:print 10,500
name "Alice"
>You are a complete and total idiot.\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
>Nnnn... *Lick*\
name ""
>Before I can retort back, Alice licks the disc.\
name "Alice"
>...It's making my tongue tingle.\
>Month 10, day 21, no problem with cell culture A10235.@
>X2 Denon body separated, kept at womb temperature.\
name ""
name "Luka"
>What are you talking about, Alice?\
name ""
name "Alice"
>...I don't quite understand it, but this disc is like a medium for recording information.@
>It seems like data can be written on the shiny side.\
name ""
name "Luka"
>A record? Like a research diary?@
>Then is there something about the seal in there?\
>Also, is there anything about the spirits being sealed?\
name ""
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>They certainly seem worth investigating... But there are just far too many.\
name ""
>Alice sighs and crosses her arms in annoyance.\
name "Tamamo"
>Ooooi!@> Moooonster Looord!\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Hmm...?\
name ""
>A loud voice echoes through the room.@
>Did Tamamo manage to find this lab too?\
name "Alice"
>From above...\
name ""
>Alice raises her eyes to the ceiling.@
>Rather than inside the lab, she's on the ground above it?\
name "Alice"
>Luka.@>Stay completely still if you don't want to die.\
name ""
name "Luka"
>Eh...?@> Ahhh!\
name ""
>One step in front of me...@
dwave 1,"se\break2.ogg"
>The ceiling itself crashes down!\
>A huge hole appears in the ceiling.@
>And peering through it...\
bgm "bgm\tamamo.ogg"
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\tamamo_st01.bmp",160,0:print 10,500
name "Tamamo"
>Oooh, Luka's there too.@
>...What's with the sciency room?\
name ""
>A rope drops down from the hole, with Tamamo quickly sliding down on it.\
dwave 1,"se\tamamo2.ogg"
>As soon as she lands, she restlessly looks around the room.\
name "Alice"
>There seem to be a large quantity of silver discs used to record information.@
>Are you familiar with these, Tamamo?\
name ""
name "Tamamo"
>Hmmm...\
name ""
>Tamamo picks up a disc, and sticks it in her mouth.@
>Her tails start to shake side to side.\
>I'm not really concerned, but I wonder why she put the whole thing in her mouth...?\
name "Tamamo"
>Hmmhmm... There is a lot of information recorded here.@
>And it's all encrypted with some sort of code.\
>Deciphering all of this will...@
lsp 701,":a;chara\tamamo_st03.bmp",160,0:print 10,500
>...Ah, I have a more important report!\
bgm "bgm\kiki1.ogg"
>We've heard reports that towns and villages across the world are being attacked by chimeric beasts and angels!\
name ""
lsp 700,":a;chara\alice_st81.bmp",-170,50:print 10,500
name "Luka"
>Wh...What!?\
name ""
>Black Alice said that Ilias was going to wipe out humanity...@
>But she's already starting!?\
>Destruction is happening all over the world...@
>But the first place that pops into my mind is my hometown.\
name "Luka"
>Ilias Village...@> Is my hometown alright!?\
name ""
>Aunt Betty, who raised me after my mother died...@
>My friends, my neighbors, the mayor, the priest at the shrine...\
>All of them are important people that are dear to my heart.\
name "Tamamo"
>...As you know, Ilias Village is very close to a shrine to Ilias.@
>The angels are descending from the temples, so whether they chose it as an early target or not...\
name ""
>Tamamo tries being evasive in answering my question.\
name "Luka"
>N...No...\
name ""
>The villagers in Ilias Village lived modestly, following Ilias' teachings.@
>How could she even slaughter them...?\
name "Luka"
>I'll never forgive her!\
name ""
>I jump at the rope that Tamamo slid down, and started climbing toward the hole.\
name "Tamamo"
>Oi, wait!@>Stop, I said!@
>Listen to what I have to say!\
name ""
>Paying no attention to Tamamo, I climb onto the ground, and look to the sky.\
cspl 700,701
bg "bg\bg143.bmp",10,1500
name "Luka"
>Galda, come!\
name ""
dwave 1,"se\habataki.ogg"
lsp 700,":a;chara\galda_st01.bmp",0,0:print 10,500
name "Galda"
>Kweeeh!\
name ""
>Galda appears, landing with a powerful flap of her wings.@
>I jump on her back, eager to head to Ilias Village.\
lsp 700,":a;chara\alice_st73.bmp",-200,50
lsp 701,":a;chara\galda_st01.bmp",0,0:print 10,500
name "Alice"
>Don't go alone, you idiot!@
>I'm going too!\
name ""
>Alice climbs out of the hole, and quickly jumps on Galda's back.@
dwave 1,"se\habataki.ogg"
csp 700
bg "bg\bg182.bmp",10,500
>As soon as she grabs hold, Galda takes off.\
name "Luka"
>Head to Ilias Village!@> As fast as you can!!\
name ""
name "Galda"
>Kweh!\
name ""
>With large, powerful flaps of her wings, Galda takes off through the sky with Alice and I on her back.\
>I hold on, wishing to myself that we can arrive before Ilias' evil hands do...\
r@k@\
dwave 1,"se\habataki.ogg"
bgmstop
sean_change "bg199"
bgm "bgm\stein.ogg"
lsp 700,":a;chara\stein_st01r.bmp",0,0:print 10,500
name "Promestein"
>.....@
>This place...\
name ""
lsp 700,":a;chara\stein_st01r.bmp",-180,0
lsp 701,":a;chara\shirom_st51.bmp",160,0:print 10,500
name "La Croix"
>The Drain Lab, Master Promestein.@
>Black Alice transferred you here.\
name ""
lsp 701,":a;chara\laplace_st21.bmp",160,0:print 10,500
name "Laplace"
>Vitals are normal.@
>While you were asleep, the damage you sustained in battle has been healed.\
name "Promestein"
>La Croix...@
>And even Laplace.\
name ""
lsp 701,":a;chara\lusia_st21.bmp",160,0:print 10,500
name "Lucia"
>You had a lot of wounds.@
>Is he that strong?@> That Hero, Luka?\
name ""
name "Promestein"
>Lucia...@> I see, so all three have been gathered.\
name ""
>The three members of Promestein's inner circle have gathered together.\
lsp 700,":a;chara\stein_st03.bmp",-180,0:print 10,500
name "Promestein"
>Everything is within the planned range... But the results weren't as good as expected.\
>Despite being in a weak body, the Monster Lord managed to evade the seal.@
>Although the Hero was greatly weakened, he is not completely powerless.\
>To make matters even worse, Black Alice is already aware of "White Rabbit".\
name ""
lsp 701,":a;chara\shirom_st51.bmp",160,0:print 10,500
name "La Croix"
>...So we couldn't monopolize it.\
name ""
lsp 700,":a;chara\stein_st01r.bmp",-180,0:print 10,500
name "Promestein"
>The one most in synch with "White Rabbit" would most definitely be Black Alice.@
>She's from the Monster Lord's bloodline... A direct tie to the dark existence of the Dark God.\
>We have left her unattended until now with her knowledge of "White Rabbit"...\
name ""
lsp 701,":a;chara\lusia_st21.bmp",160,0:print 10,500
name "Lucia"
>She watched and waited with her incomplete knowledge as we researched.@
>Then when the time was right, she came and took it.\
name ""
lsp 700,":a;chara\stein_st02.bmp",-180,0:print 10,500
name "Promestein"
>In addition, she's firmly in the palm of Ilias' hand.\
name ""
>Promestein shrugs, and looks around at her gathered subordinates.\
name "Promestein"
>...La Croix, Laplace, Lucia.@
>Including me, we are four from different races.\
>Angel, Monster, Human, and Machine.@
>What is it that we all have in common?\
name ""
lsp 701,":a;chara\shirom_st51.bmp",160,0:print 10,500
name "La Croix"
>It goes without saying.@
>I simply wish to master all of the dark arts, and arrive at the truth...\
name ""
lsp 700,":a;chara\laplace_st21.bmp",-180,0:print 10,500
name "Laplace"
>My existence is to silently execute.\
name ""
lsp 701,":a;chara\lusia_st22.bmp",160,0:print 10,500
name "Lucia"
>To master the secrets of alchemy, and learn the truth of the world.\
name ""
lsp 700,":a;chara\stein_st02.bmp",-180,0:print 10,500
name "Promestein"
>That's right...@>We are the seekers of truth.@
>Overcoming any obstacle, and making any fellow truth-seekers our allies.\
>Anyone who would put a lid on the exploration of deeper knowledge...@>Even a God themself.@
>They shall face our fangs.\
name ""
>After declaring that, the angel in white stares at La Croix.\
lsp 701,":a;chara\shirom_st51.bmp",160,0:print 10,500
name "Promestein"
>La Croix, don't let anyone near the device.@
>Neither the Hero nor the Monster Lord...@> Or anyone else, of course.\
name ""
name "La Croix"
>...Leave it to me.@
>I have already dispatched members of my Cirque du Croix.\
>...I will accomplish my duty, and fulfill my obligations.\
name ""
lsp 701,":a;chara\laplace_st21.bmp",160,0:print 10,500
name "Promestein"
>Good.@>Laplace, deal with the prisoners of war.@
>Acquire and store as much energy as you can for what's to come.\
name ""
name "Laplace"
>...Acknowledged.\
name ""
lsp 701,":a;chara\lusia_st22.bmp",160,0:print 10,500
name "Lucia"
>Then I'll head back to my home village.@
>As a messenger of slaughter and destruction...\
name ""
name "Promestein"
>There's no need for you to go personally...@
>...But I do not mind.@>Do as you like.\
name ""
name "Lucia"
>It's important for me to oversee it.@
>...Well then, I shall take my leave.\
name ""
dwave 1,"se\escape.ogg"
csp 701:print 10,500
>With that parting word, Lucia is the first to depart.\
name ""
lsp 701,":a;chara\laplace_st21.bmp",160,0:print 10,500
name "Laplace"
>...I cannot fathom why she cares about that village.@
>What reason does she have to concern herself with a deserted village in the middle of nowhere?\
name ""
name "Promestein"
>...La Croix threw away her hometown long ago.@
>Laplace... I created you from scratch, so you never had one to begin with.\
>Lucia...@> She's going to completely destroy it.@
>It's a ritual for herself... So to speak.\
name ""
name "Laplace"
>...I cannot understand it.@
>Human thoughts are too irrational.\
name ""
lsp 700,":a;chara\stein_st03.bmp",-180,0:print 10,500
name "Promestein"
>Haha... That's why I like human beings.@
>Now then, I suppose I also shall need to carry out my duty.\
name ""
lsp 701,":a;chara\shirom_st51.bmp",160,0:print 10,500
name "La Croix"
>Very well then, I shall also take my leave...\
name ""
dwave 1,"se\escape.ogg"
cspl 700,701:print 10,500
>One after another, the investigators of truth depart.\
lsp 700,":a;chara\cupid_st11.bmp",800,0
for %move=0 to 450 step 10
amsp 700,800-%move,0
print 1:wait 20
next
name "Cupid"
>............\
lsp 700,":a;chara\cupid_st11.bmp",0,0:print 10,500
>...This feels soooo suspicious! @
>Information for Master Eden! \
name ""
r@k@\
mov %gloval1_story_sinkou,12:gosub *savegloval1
goto *sean0311s



*sean0311s

bgmstop
sean_change "bg140"
bgm "bgm\kiki1.ogg"
name "Luka"
>Is Ilias Village safe?@
>Galda, hurry!\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>...Calm down, Luka.@
>Getting impatient here won't help you.\
>If you rush into battle in a rage and get defeated, just think about what will happen to the villagers you're trying to help.\
name ""
name "Luka"
>Y...You're right.@
>I have to calm down...@
>Calm down...@
>Calm...\
bgmstop
>......\
name ""
>I take a deep breath, trying to control my racing thoughts.\
>Clearing my mind, I feel myself slipping back into the serene state.@
>Impatience and anger will only harm me, if I let them take me over.\
bgm "bgm\hutuu1.ogg"
name "Luka"
>......@
>...Thank you, Alice. I'm calm now.\
name ""
>Riding on Galda's back, I feel at ease again.@
>Come to think of it, there are a lot of questions I had for Alice.\
name "Luka"
>By the way Alice, I had some questions.@
>Why are you in that small form?\
name ""
>She said herself that she turned herself into this...\
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>As she put the Six Ancestors' Great Seal on me, I placed my own seal on myself.\
>Normally a seal can only be placed by someone stronger than the one being sealed...@
>But the Six Ancestors' Great Seal uses a foul mechanism to become as powerful as the one being sealed.\
name ""
name "Luka"
>Ah, I remember Promestein mentioning something about that.@
>That it was even used to seal the first Monster Lord and the "Six Ancestors"...\
name ""
lsp 700,":a;chara\alice_st77.bmp",0,50:print 10,500
name "Alice"
>T...The First!?@
>And even the legendary Six Ancestors!?\
name ""
name "Luka"
>Eh?@>You didn't know?\
name ""
>Apparently not even Alice knew that.@
>It must have been a huge secret if the current Monster Lord didn't even know about it.\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>...I want to hear more about that later.\
>Anyway, the Great Seal's power and effectiveness grows with the strength of the target it's placed on.@
>Then... What if the target was weak?\
name ""
name "Luka"
>Of course... Then the seal itself would be weak.\
name ""
lsp 700,":a;chara\alice_st72.bmp",0,50:print 10,500
name "Alice"
>That's right. The Great Seal is only effective against incredibly powerful beings.@
>Thus, I put my real body in a subspace barrier.\
>I created this temporary vessel, and sent it out of the barrier.@
>And that's what this body is here now.\
name ""
name "Luka"
>Basically... You're a fake Alice?\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>This body is my own, and it houses my own mind.@
>It may be hard for a human to understand, but I'm the real deal.\
>Nevertheless, my real body is still confined in the subspace barrier.@
>I cannot really fight if I can't do something about this seal...\
name ""
>Promestein said that Alice only had one tenth of her normal power.@
>I don't think that's wrong...\
>Because she was so powerful, she's still a rather strong monster as she is now.@
>But against Ilias' army, she won't even compare...\
name "Luka"
>But Promestein said there was no way to cancel it...\
name ""
>Although she said that once it was triggered, there was no way to release it...@
>I don't think she was being completely truthful.\
name "Alice"
>Anyway, we can only do everything we can without giving up.@
>Right now, Tamamo is back in that lab deciphering the discs.\
name ""
name "Luka"
>How did you find that laboratory?\
name ""
name "Alice"
>The moment I came out of the barrier in this body, I was in that laboratory.@
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
>The magic power that brought me there... When we encountered Black Alice, I realized it was hers.\
name ""
name "Luka"
>Black Alice is the one who led me there, too.@
>What reason did she have for bringing us both to an ally's base...?\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>...Who says that they are allies?\
name ""
name "Luka"
>Eh?\
name ""
name "Alice"
>An angel, a crazy scientist, and a former Monster lord...@
>I don't think that's a great combination.\
>Perhaps the relationships between them are not that strong?\
name ""
name "Luka"
>That could be true...\
name ""
>After seeing that exchange between them, I think that could be very likely.\
name "Alice"
>It doesn't seem like the forces of Heaven are all in unison.@
>It would be good if we could exploit that.\
name ""
name "Luka"
>That's right.@>We're at too big of a disadvantage now...\
name ""
csp 700:print 10,500
>Anyway, my questions about Alice have been answered for now.@
>And Ilias Village is getting closer...\
bgm "bgm\kiki2.ogg"
name "Luka"
>What's with the color of the sky...?\
name ""
>The sky is gradually getting cloudier and dimmer.@
>The strangeness of it causes me to shiver.\
>It's right over Ilias Village...\
name "Luka"
>What's going on?@
>Alice, can you see the village?\
name ""
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>.............\
name ""
>Alice's eyes narrow as she peers straight ahead.@
>Alice's good eyesight should let her see it from here...\
>But with a grim expression on her face, she just frowns.\
csp 700:print 10,500
name "Luka"
>No...@>It must be a mistake!@
>Galda, faster!!!\
name ""
name "Galda"
>Kweh!\
name ""
dwave 1,"se\habataki.ogg"
>With a burst of final effort, Galda flies through the sky at breakneck speeds.@
>As soon as she reaches the edge of the village, I jump off her back.\
bgmstop
bg "bg\bg187.bmp",10,3000
bgm "bgm\kanasimi1.ogg"
name "Luka"
>T...This can't be...@> No...\
name ""
>The buildings are completely destroyed, now only piles of wreckage.@
>Other houses are consumed by flames, slowly burning into ashes.\
name "Luka"
>No...@>No...\
name ""
>Corpses litter the ground around the village and the interior of the burning houses... The remains of those unable to escape their own homes.\
>Some of the Soldier's lower bodies have even been eaten away.\
name "Luka"
>..........\
name ""
>I stand in disbelief, transfixed by the sight.@
>There's no anger or sorrow.@>There's nothing but disbelief.\
>I can't accept it.@> This scene in front of me, it can't be happening.\
name "Luka"
>R...Ronnie?@>F..From the Tool Shop?\
name ""
>Even though he's lying on his stomach, I'd recognize him anywhere.@
>His chest isn't moving...@>He isn't breathing.\
>Every time I trained as I grew up, I'd also get cuts and bruises.@
>When Ronnie saw that, he'd give me some herbs for free sometimes...\
name "Luka"
>N...No...@>No...\
name ""
>Seeing the unmoving bodies of those I know hits home the reality of what happened.@
>Aunt Betty... My friends... Everyone...\
bgmstop
name "???"
>Ara... Your homecoming is a bit too late, Hero.@
>You took so long, that nobody stuck around to welcome you back.\
name ""
>A shadow radiating a divine aura appears before me.@
>A single angel descends into the scene of slaughter.\
r@k@\
goto *ranael_start



*sean0312

bgm "bgm\kanasimi2.ogg"
name ""
r@k@\
name "Luka"
>Haa... Haa...\
name ""
>After defeating Ranael, I fall to my knees.@
>Overwhelming fatigue floods my body, leaving me on the verge of passing out.\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Luka... You...\
name ""
name "Luka"
>Alice...\
name ""
>I slowly start to regain my breath, and the fatigue starts to fade.@
>It seems the intense weakness is only temporary.\
>As I look down at my feet, I see the remains of my shattered ring.\
name "Luka"
>No... My mother's ring!\
name ""
>In a panic, I collect all the broken pieces and carefully place them in my bag.@
>No matter how broken it is, it's an important keepsake from my mother.\
name "Luka"
>Why... Did it break?\
name ""
name "Alice"
>...It wasn't able to hold back your power any longer.@
>I suspected that it may have had something to do with that latent potential you displayed before.\
name ""
name "Luka"
>Yes... But you said you didn't feel any power from the ring?\
name ""
name "Alice"
>It's no wonder.@>That ring wasn't what gave you power.@
>It was the opposite. It was reducing your power.\
name ""
name "Luka"
>Reducing it...?\
name ""
lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
name "Alice"
>I'll say it flat out.@>Luka, you're an angel.\
name ""
name "Luka"
>Eh...!?\
name ""
>I'm bewildered and shocked at her statement.@
>Is she just saying some sort of bad joke?\
name "Luka"
>How could I be an angel?\
name ""
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>No... It would be more accurate to say you're half human, half angel.@
>Likely your mother was the angel.\
>And a particularly high ranking one, at that...@
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
>Usually one that powerful wouldn't descend to the surface world...\
name ""
name "Luka"
>M...Mother was...?\
name ""
>I'm a child of a human and a angel?@
>And this ring was suppressing my power?\
name "Alice"
if %ivent06=0 skip 3
>...Don't you remember your conversation with Sphinx?@
>About there being a way to turn a monster into a human?\
if %ivent06=0 mov $sel1,"That ring has a special effect."
if %ivent06=1 mov $sel1,"That ring is one of the ways to accomplish that for a monster or angel."
eng $sel1:$sel6\
>It's an item able to turn its wearer human.\
name ""
name "Luka"
>My mother wore this ring to make herself human...?\
name ""
name "Alice"
>It was probably your mother's intention for you to wear that ring and live as a human...\
name ""
name "Luka"
>T...That can't be.@> My mother died from an epidemic...@
>If she was an angel, how could she die from a disease!?\
name ""
name "Alice"
>That ring belonged to your mother first, didn't it?@
>She must have worn it until her death.\
name ""
name "Luka"
>She kept her disguise as a human all the way until the end...?\
name ""
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>...She didn't merely disguise herself in a human form.@
>With that ring's power she was living as a true, genuine human.\
name ""
name "Luka"
>No...@>That can't be...\
name ""
>My mother was an angel...@
>And with her blood running through me, I'm part angel too.\
>It's hard to believe, but it must be true.@
>The power I had during the fight with Ranael clearly wasn't normal.\
name "Luka"
>............\
name ""
>I didn't truly know my mother until now.@
>And now even my hometown has been destroyed.\
>I'm so confused and surprised at everything, I have no idea what to do.@
>I just stand in the midst of the ruins, unable to focus on anything.\
bgm "bgm\kanasimi1.ogg"
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Still, it's odd...@> There are too few casualties.\
name ""
name "Luka"
>Eh?\
name ""
>I'm pulled back to reality at Alice's words.@
>What does she mean too few?\
name "Alice"
>I was at your house at the start of our journey.@
>I saw the population of this village... The amount of bodies does not nearly match the population.\
name ""
name "Luka"
>N...Now that you mention it...\
name ""
>I had been avoiding looking at the death around me.@
>As I finally bring myself to look at the carnage...\
>There are bodies, but not enough to make up the entire village.@
>If everyone was wiped out, there would be at least ten times the amount.\
name "Luka"
>Did they manage to escape...?@
>Do you think they're alive somewhere!?\
name ""
name "Alice"
>They could have been taken prisoner... Or sought refuge somewhere.@
>I don't know how so many could have escaped from an Archangel class opponent, though...\
name ""
>Alice lifts her nose in the air, and starts to sniff.@
>Then she leans over on the ground, and puts her nose in the dirt.\
name "Alice"
>There are traces of transfer magic in the air...@
>Here... And here, too.@> Especially here, indoors.\
>It seems as though many of the villagers were teleported out by magic...@
>But who could perform something on such a large scale?\
name ""
name "Luka"
>Did they take them all prisoner then...?\
name ""
name "Alice"
>That could be, but it wouldn't quite fit...@
>Rather, did someone evacuate the villagers?\
name ""
name "Luka"
>Evacuated?@> I sure hope so...\
name ""
name "Alice"
>Wait a moment, I'll try to track it down.@
>I don't like the taste of dirt, though.\
name ""
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
>Alice scoops up some dirt, and licks it.@
>She remains silent for a moment...\
if %ivent03=1 goto *sean0312a
if %ivent03=0 goto *sean0312b



*sean0312a

lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
name "Alice"
>...Luka.@
>Do you remember that hidden village to the west of here?\
name ""
name "Luka"
>I believe it was called Enrika...@
>That strange woman was there.\
name ""
>I met that strange woman called Micaela there.@
>The village felt odd, but nostalgic somehow...\
goto *sean0312c



*sean0312b

lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
name "Alice"
>It tastes like it came from a small village to the west of here...\
name ""
name "Luka"
>A small village?@> I think I remember hearing something about that...\
name ""
>...What was it again?@
>I think it something about a hidden village called... Enrika?\
goto *sean0312c



*sean0312c

lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>It seems like it was the people in that village that evacuated the villagers.@
>Just before the angel attacked, they started teleporting many of them out.\
name ""
name "Luka"
>Evacuated... So they are safe!?\
name ""
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>I don't know...@>I don't want to make wild guesses about why they were teleported.@
>I don't want to get your hopes up...\
name ""
name "Luka"
>Don't worry Alice!@> Thank you!@
>Let's hurry over to Enrika!\
>Galda, come!\
name ""
dwave 1,"se\habataki.ogg"
lsp 700,":a;chara\galda_st01.bmp",0,0:print 10,500
name "Galda"
>Kwweeeh!\
name ""
>We hop on Galda's back, and head to our next destination.@
>Enrika... A hidden village just to the west!\
r@k@\
dwave 1,"se\habataki.ogg"
bgmstop
sean_change "bg001"
bgm "bgm\maou2.ogg"
lsp 701,":a;chara\iriasu_st13.bmp",-160,0
lsp 700,":a;chara\alice8th_st01.bmp",180,30:print 10,500
name "Black Alice"
>It's starting, Goddess Ilias.@
>The fun, fun party...\
name ""
name "Ilias"
>Do you not wish to participate in your fun party?@
>I don't think everything will go well if you leave it all to your subordinates.\
>If you're going to make me ask again...@
>Then I'll need to have you replaced.\
name ""
name "Black Alice"
>It's true it all won't go smoothly if I left it all to them...@
>But if they don't act on their own sometimes, their heads will turn into mush.\
name ""
>Black Alice giggles to herself.\
name "Black Alice"
>...It wasn't necessary for me to appear from the start.\
>Grangold and Sabasa were assigned to us...@
>Those two countries have the most powerful army in the Sentora continent, after all.\
>I sent a powerful Queen to both countries.@
>They will soon be under our control.\
name ""
name "Ilias"
>They better...@
>Or Eden will complain again.\
name ""
name "Black Alice"
>Ahh... That Third...@
>She's frantic after her failure.\
name ""
name "Ilias"
>I hope you perform better than her failure.@
>I have no desire to continue feeding a dog after it has lost its use.\
name ""
name "Black Alice"
>Oh my... Dogs aren't cute at all.@
>I think rabbits are cuter...\
name ""
name "Ilias"
>Haha... That doesn't suit you.\
name ""
name "Black Alice"
>You think so?@>Hehe...\
name ""
>Ilias and Black Alice exchange a strange laugh.\
name "Ilias"
>Speaking of rabbits... That "White Rabbit" that Promestein was going to use.@
>After you teleported her, did you return it?\
>Or by any chance, did you keep it...?\
name ""
lsp 700,":a;chara\alice8th_st04.bmp",180,30:print 10,500
name "Black Alice"
>Hehe... Whatever are you talking about?@
>Why are you concerned with that medicine, Goddess Ilias?\
name ""
name "Ilias"
>Because the plan may go astray if that strange medicine breaks her body.@
>Besides... No matter what one drinks, they won't become the same as a God.\
>And if they ever did...@
>Being a God is not as pleasant as one might think.\
name ""
lsp 700,":a;chara\alice8th_st03.bmp",180,30:print 10,500
name "Black Alice"
>Oh my... That's the first time I've heard you say something truthful.\
name ""
name "Ilias"
>I'm always telling you the truth.@
>I'm nowhere near as skilled in deceit as you are.\
name ""
lsp 700,":a;chara\alice8th_st02.bmp",180,30:print 10,500
name "Black Alice"
>Oh no, no.@> You seem to be quite skilled at it.\
name ""
name "Ilias"
>Now go, Black Alice.@
>Do your utmost to meet my expectations.\
name ""
name "Black Alice"
>Of course... For the Goddess, I would spare no hardship.\
name ""
bgmstop
sean_change "bg029"
bgm "bgm\kiki3.ogg"
name "Luka"
>Oh no, Enrika is under attack!\
name ""
>As I look down from atop Galda...@
>I see the small village of Enrika surrounded by angels and Chimeric Beasts.\
>A large number of guards are out there defending the village, so they haven't managed to reach the village perimeter yet...\
>But at this rate, they'll break through any moment!\
name "Luka"
>They're concentrated on the front and rear of the village...@
>Alice, I'll take the front!\
name ""
lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
name "Alice"
>Then leave the back gate to me!\
name ""
csp 700:print 10,500
>Galda drops off Alice off at the back gate, then flies over to the front gate for me to jump off.@
>As soon as I land, I run to the aid of the guards.\
name "Luka"
>I'll help too...!@>Eh?\
name ""
lsp 700,":a;chara\mob_elf1.bmp",-200,0
lsp 701,":a;chara\c_tangh_st01.bmp",160,0:print 10,500
>I see something I certainly didn't expect.@
>The guard defending the village... Is an Elf.\
name "Elf A"
>...Human reinforcements!?@
>I don't care who it is if they're here to help!\
name ""
lsp 700,":a;chara\mob_elf2.bmp",-200,0:print 10,500
name "Elf B"
>What's with these numbers!?@
>Curse you!\
name ""
dwave 1,"se\karaburi.ogg"
>With a grunt of anger, the Elf charges at the tongue-like monster...@
dwave 2,"se\miss_name.ogg"
>But the blade simply bounces off the thick tongue.\
name "Chimera Tongue"
>Hehe... What a delicious looking Elf.\
name ""
name "Elf B"
>W...What are...@>Ahhh!\
name ""
dwave 1,"se\ero_makituki3.ogg"
csp 701
lsp 700,":a;chara\mob_elf2_h1.bmp",0,0:print 10,500
>The monster's giant tongue wraps around the Elf, and binds her body!@
>Bound, the tongue starts quickly licking her entire body clean!\
name "Elf B"
>S...Stop it!@
>Nooo! Ahhhh!\
name ""
dwave 1,"se\ero_makituki3.ogg"
lsp 700,":a;chara\mob_elf2_h2.bmp",0,0:print 10,500
>The Elf resisted at first, but her face quickly falls.@
>As her entire body is licked by the giant tongue, her face goes slack with ecstasy.\
name "Chimera Tongue"
>Hehe... Delicious.\
name ""
name "Elf B"
>Ah... Ah...\
name ""
dwave 1,"se\down.ogg"
lsp 700,":a;chara\c_tangh_st01.bmp",0,0:print 10,500
>Covered in saliva, she lands on the ground quivering in bliss.@
>The other Elves just nervously look at the sight.\
name "Chimera Tongue"
>Now... Who wants to be next?@
>I'll give extra service to my next opponent...\
name ""
lsp 700,":a;chara\mob_elf1.bmp",-180,0
lsp 701,":a;chara\c_tangh_st01.bmp",160,0:print 10,500
name "Elf A"
>Grr...!\
name ""
csp 701
lsp 700,":a;chara\c_tangh_st01.bmp",0,0:print 10,500
>As the Elves nervously eye the Chimera, I step forward.\
r@k@\
goto *c_tangh_start



*sean0313

bgm "bgm\kiki3.ogg"
name ""
r@k@\
name "Luka"
>Whew... I got her.\
name ""
lsp 700,":a;chara\mob_elf1.bmp",0,0:print 10,500
name "Elf A"
>Thank you for your assistance.@
>But who are you...?\
name ""
name "Luka"
>I'll explain later.@>Right now, we have to deal with the other enemies!\
name ""
name "Elf A"
>Yes... You just defeated a powerful one, so things are swinging in our favor!@
>Archers, forward!\
name ""
lsp 700,":a;chara\mob_elf3_st01.bmp",-60,-100
lsp 701,":a;chara\c_beast_st01.bmp",220,0:print 10,500
name "Elf Archer"
>Archers, ready weapons!@
>Fire!\
name ""
dwave 1,"se\yumi.ogg"
wait 100
dwave 2,"se\yumi.ogg"
wait 100
dwave 3,"se\yumi.ogg"
>The archers standing in a line all fire at the same time, raining swarms of arrows down onto the opposing monsters.@
>The volley pushes most of them back, daunted by the overwhelming hail of arrows.\
dwave 1,"se\miss.ogg"
lsp 701,":a;chara\angels_st01.bmp",160,0:print 10,500
name "Angel Soldier"
>Arrows won't harm us!\
name ""
lsp 700,":a;chara\mob_elf3_st03.bmp",-60,-100:print 10,500
name "Elf Archer"
>Gah... The arrows slip right through them!\
name ""
>But normal attacks don't hurt the angels...@
>I'll have to defend them with Angel Halo!\
name "Luka"
>In that case, I'll be your opponent!\
name ""
>Holding my sword ready, I charge at the angels!\
r@k@\
goto *angels_start



*sean0314

bgm "bgm\kiki3.ogg"
name ""
r@k@\
name "Luka"
>Alright! Just a few more...!\
name ""
>I repulsed the Angel Soldiers with that...@
lsp 700,":a;chara\mob_elf3_st01.bmp",-60,-100
lsp 701,":a;chara\c_beast_st01.bmp",220,0:print 10,500
>The remaining Chimeric Beasts are being pushed back by the overwhelming numerical superiority of the Elves...\
csp 701
lsp 700,":a;chara\mob_elf1.bmp",0,0:print 10,500
name "Elf A"
>Keep it up!@
>Everyone, just one more push!\
name ""
>As the Elf cheers out, trying to rally her allies...@
dwave 1,"se\aura.ogg"
>A soft light descends from the sky above.\
csp 700:print 10,500
name "Luka"
>Is that... Angel reinforcements!?\
name ""
>A solemn light shines from the Heavens down to the ground.@
>And along with it, a holy presence descends.\
lsp 700,":a;chara\nagael_st01.bmp",0,0:print 10,500
>Just like before, a powerful looking angel appears.\
name "Nagael"
>Surface dwellers are causing this much trouble?@
>I will need to discipline those Angel Soldiers later.\
name ""
>The angel turns her head in a circle, glaring at the Elves and I in turn.@
dwave 1,"se\ero_makituki1.ogg"
>One of her snakes suddenly lashes out at a nearby Elf!\
lsp 701,":a;chara\nagael_st01.bmp",-180,0
lsp 700,":a;chara\mob_elf1.bmp",200,0:print 10,500
name "Elf A"
>Kah...@> A new angel!?\
name ""
>The Elf tries to jump back and take her distance...@
dwave 1,"se\ero_makituki3.ogg"
csp 701
lsp 700,":a;chara\mob_elf1_h1.bmp",0,0:print 10,500
>But she can't get away in time, and the snake coils around her!\
name "Elf A"
>Ahhh!\
name ""
name "Nagael"
>Now then, shall I strangle you to death?@
>Or punish you with pleasure?\
name ""
dwave 1,"se\ero_makituki2.ogg"
>The snake's tongue grows, and crawls all over the Elf's body.@
>It slides under her clothing, and starts to quickly lick her exposed sensitive areas.\
lsp 700,":a;chara\mob_elf1_h2.bmp",0,0:print 10,500
name "Elf A"
>Ah...!@> Nnnnn!!\
name ""
>The Elf starts blushing as her yells turn into moans.\
r@k@\
goto *nagael_start



*sean0315

bgm "bgm\kiki3.ogg"
name ""
r@k@\
name "Luka"
>Alright, I managed to beat her!\
name ""
>That should have been the most powerful enemy.@
>With the Elves continuous volleys of arrows, the Chimeric Beasts are also routing.\
>I think we're going to win...!\
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\rapun_st01.bmp",0,0:print 10,500
name "Rapunzel"
>What, even the angels lost?@
>Just as Master Promestein said, they sure are unreliable.\
name ""
name "Luka"
>Y...You're...!\
name ""
>The huge Chimera casually steps through the Chimeric Beasts.@
>I'll never forget those five who were in the Monster Lord's castle...\
name "Rapunzel"
>Oh, if it isn't the disgraced Hero...@
>Hahaha... I really want to rape you.\
>Especially if I do it right in front of everyone...@
>Mate like beasts, and get me pregnant.\
name ""
name "Luka"
>Urhg...!\
name ""
>She's even more powerful than one of the Four Heavenly Knights...@
>I don't know if I can fight her as I am now...\
name "Luka"
>...But I don't have a choice!\
name ""
>As I grip my sword, about to charge Rapunzel...\
bgm "bgm\enrika.ogg"
lsp 700,":a;chara\micaela_st11.bmp",-120,0
lsp 701,":a;chara\rapun_st11.bmp",160,0:print 10,500
name "Micaela"
>...Wait.\
name ""
>A woman steps out between Rapunzel and me.\
if %ivent03=0 mov $sel1,"A strange woman, with a mysterious atmosphere around her..."
if %ivent03=1 mov $sel1,"It's Micaela... The strange woman I met in this village earlier."
eng $sel1:$sel6\
name "Luka"
if %ivent03=0 mov $sel1,"Who are you...?"
if %ivent03=1 mov $sel1,"Micaela...?"
eng $sel1:$sel6\
name ""
name "Rapunzel"
>You can't be... Micaela?@
>I thought you lost your power and parted from the world...\
name ""
lsp 700,":a;chara\micaela_st13.bmp",-120,0:print 10,500
name "Micaela"
>It's true I don't have the power I once had...\
name ""
>Micaela turns around to face Rapunzel, talking calmly.@
dwave 1,"se\kodou.ogg"
>Suddenly, the atmosphere fills with the icy cold chill of death itself.\
>I step back and gasp, feeling like the air around me suddenly turned into ice.@
>Just who is Micaela...?\
lsp 700,":a;chara\micaela_st11.bmp",-120,0:print 10,500
name "Micaela"
>...But I'm still more than enough for one or two dogs like you.\
>If you believe my Sword of the Heavens has rusted...@
>...You can gamble your life on it.\
name ""
lsp 701,":a;chara\rapun_st13.bmp",160,0:print 10,500
name "Rapunzel"
>.............\
name ""
>Silent, Micaela and Rapunzel glare at each other... The icy chill in the air only getting colder and more oppressive.\
lsp 701,":a;chara\rapun_st11.bmp",160,0:print 10,500
name "Rapunzel"
>...Hehe, you do seem troublesome.@
>Even if I don't lose, it would be bothersome to lose a limb...\
name ""
>Rapunzel breaks first.@
>The feeling of pressure fades as she turns around.\
name "Rapunzel"
>...Withdraw.\
name ""
>At her command, the remaining Chimeric Beasts turn around and run.@
dwave 1,"se\asioto2.ogg"
wait 100
dwave 2,"se\asioto2.ogg"
wait 100
dwave 3,"se\asioto2.ogg"
>Dispersing into the forest, they're completely gone after a few moments.\
name "Rapunzel"
>...But you've only just extended your life a little.@
>Goddess Ilias does not forgive rebels.\
name ""
name "Micaela"
>You still know nothing about Ilias.@
>She will neither forgive rebels nor her own worshippers.\
lsp 700,":a;chara\micaela_st13.bmp",-120,0:print 10,500
>And monsters like you...@
>It's blindingly obvious what she will do to you in the end.\
name ""
lsp 701,":a;chara\rapun_st13.bmp",160,0:print 10,500
name "Rapunzel"
>Goddess Ilias entrusted the processing of the old world to us.@
>Do you think I would be fooled by such a pathetic lie?\
name ""
dwave 1,"se\escape.ogg"
csp 701:print 10,500
>With that final word, Rapunzel vanishes into the forest.@
>Finally, they've all been repulsed...\
lsp 700,":a;chara\micaela_st11.bmp",70,0:print 10,500
name "Micaela"
>No matter how strong those artificial beings are, they still lack experience...@
>Their battle tactics seem very primitive.\
>To be so easily pushed back by such a simple bluff...@
>The sword has long ago rusted...\
name ""
name "Luka"
if %ivent03=0 mov $sel1,"Who are you...?"
if %ivent03=1 mov $sel1,"Micaela, just who are you...?"
eng $sel1:$sel6\
name ""
name "Micaela"
>You came, Luka...\
name ""
dwave 1,"se\asioto2.ogg"
>Micaela faintly smiles at me as she walks closer.@
lsp 700,":a;chara\mob_elf1.bmp",-160,0
lsp 701,":a;chara\alice_st71.bmp",160,50:print 10,500
>Alice appears from the rear of the village, along with an Elf.\
name "Elf"
>Master Micaela, we've repulsed them at the rear gate as well.@
>If this girl had not appeared, we would be in serious trouble...\
name ""
name "Alice"
>Hmph... It was just a bunch of boring beasts.@
>This side seems to have been much more interesting.\
name ""
name "Luka"
>Yes... It was quite dangerous for a moment.\
name ""
>Alice is trying to appear calm, but I can see how tired she is.@
>She really isn't as powerful as before, stuck in that small child body...\
csp 701
lsp 700,":a;chara\micaela_st11.bmp",70,0:print 10,500
name "Micaela"
>The village was protected thanks to you two.@
>We alone would not have been able to repulse the hand of Ilias...\
name ""
name "Luka"
>Oh, no, don't mention it...@
>More importantly... Are the people of Ilias Village...?\
name ""
name "Micaela"
>Yes... Most of them are safe in the village.@
>But those who were in the open when the attack came...\
name ""
name "Luka"
>I...I see...\
name ""
>With so many dead, I can't bring myself to be happy.@
>But I'm glad many of them were saved...\
name "Micaela"
>Now, come this way.@
>We have much to talk about...\
name ""
name "Luka"
>Y...Yes...\
name ""
>Thus, Alice and I are invited into the village.@
>We follow the mysterious angel-like Micaela woman...\
csp 700
dwave 1,"se\asioto2.ogg"
sean_change "bg029"
bgm "bgm\mura1.ogg"
name "Luka"
>E...Everyone!\
name ""
>In the crowded village square, I see lots of familiar faces.\
>All of them are from Ilias Village... Old men, young boys, girls, women...@
>Even the soldiers and priests of the nearby Ilias Temple.\
>The Elves are treating the ones who are injured.@
>After their sudden teleportation, many of them still seem really confused.\
lsp 700,":a;chara\mob_obasan.bmp",0,0:print 10,500
name "Betty"
>Luka, you...@> You're safe!\
name ""
name "Luka"
>Aunt Betty, you are too!@
>Thank goodness... You're okay...\
name ""
>I breath a big sigh of relief at the sight of Aunt Betty.@
>Each one of my friends that I see feels like a ton of bricks being lifted off my back.\
name "Luka"
>What happened at the village...?\
name ""
name "Betty"
>Out of nowhere, angels just attacked.@
>Right when I thought it was the end... The ground underneath me started flashing.\
>Before I could finishing thinking to myself "Is that magic?" I was here.\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\mob_obasan.bmp",160,0:print 10,500
name "Alice"
>...Hmm, that's quite a large scale teleportation.@
>Transferring so many all at once must require great power.\
name ""
name "Betty"
>Oh my, what a cute little girl...@>You look pale, are you alright?@
>Here, have some candy.\
name ""
lsp 700,":a;chara\alice_st79.bmp",-170,50:print 10,500
name "Alice"
>...Yaay! \
name ""
>With a single piece of candy, it looks like Betty won Alice over.@
>Taking my gaze off the happy Alice, I continue talking.\
csp 701
lsp 700,":a;chara\mob_obasan.bmp",0,0:print 10,500
name "Luka"
>So that's how you all got here?\
name ""
name "Betty"
>It was really surprising.@
>One second I was there, the next here.\
>But those who didn't make it here...\
name ""
name "Luka"
>.............\
name ""
>I fall silent.@
>They didn't make it because they just happened to be outdoors at the time...\
name "Betty"
>...What's happening in the world?@
>Even if the people pray to Ilias, she's the one doing it.\
>I was never really that religious to begin with.@
>...Those that are, are in complete shock.\
name ""
lsp 700,":a;chara\mob_sinkan.bmp",-170,0
lsp 701,":a;chara\mob_heisi1.bmp",170,0:print 10,500
>In the corner of the village square, people are standing with vacant looks in their eyes.@
>It's full of soldiers and priests from the Ilias temple.@> The ones who had the strongest faith.\
name "Priest"
>Ahh... Goddess Ilias...@
>This is a dream...@> This can't be...\
name ""
name "Soldier A"
>Ilias, please forgive me...@
>Forgive me, please!\
name ""
name "Soldier B"
>Angels... Angels...@
>How, how...\
name ""
name "Luka"
>They look like they're in huge shock...\
name ""
>...Well, that's understandable.@
>For them, their faith was the basis of their entire lives.\
>They can't bring themselves to believe that the same Ilias is trying to eradicate humanity.\
bgm "bgm\enrika.ogg"
csp 701
lsp 700,":a;chara\micaela_st11.bmp",70,0:print 10,500
name "Micaela"
>I have something important to tell you, Luka.@
>It will take a while, so please come to my house.\
name ""
>Micaela, finished with getting things back in order after the battle, invites us to her house.\
>There will be time later to reunite with the villagers.@
>Right now, there's a lot I need to ask Micaela.\
name "Luka"
>Who are you?@> You can tell me, right?\
name ""
name "Micaela"
>It's not just my identity.@
>The creation of this war, the Great Monster Wars.\
>And something about the founding Monster Lord that not even you, the current Monster Lord, knows.@
>I will tell you everything about this world...\
name ""
lsp 700,":a;chara\alice_st73.bmp",-170,50
lsp 701,":a;chara\micaela_st11.bmp",230,0:print 10,500
name "Alice"
>About the founder, you said?\
name ""
name "Luka"
>I understand.@>Then please tell us.\
name ""
>Micaela's identity, and probably even about my birth...@
>We follow Micaela to her house, eager for answers to burning questions in our mind.\
dwave 1,"se\asioto2.ogg"
sean_change "bg167"
lsp 700,":a;chara\micaela_st11.bmp",70,0:print 10,500
name ""
r@k@\
name "Luka"
>First, I want to thank you.@
>Thank you for helping out the people of Ilias Village.\
name ""
>As soon as I'm inside Micaela's house, I thank her again.@
>If the villagers had not been teleported here, they would have been completely slaughtered.\
name "Micaela"
>No... I just regret that everyone couldn't have been saved.@
>We were attacked at the same time, so the mass transfer didn't go off as well as we wanted...\
name ""
name "Luka"
>..........\
name ""
>Ronnie's face flashes into my mind.@
>He must have been heading to his herb garden.@>Not in his house, so he didn't make it...\
name "Luka"
>But how can you use that kind of magic?@
>Just what is this village...?\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\micaela_st11.bmp",230,0:print 10,500
name "Alice"
>...You're slow, aren't you?@>Haven't you noticed it yet?@
>This village is for the hidden, just as its name implies.\
>The ones hiding are not humans.\
name ""
name "Luka"
>Eh!?@> So...They're all monsters!?\
name ""
csp 701
lsp 700,":a;chara\micaela_st11.bmp",70,0:print 10,500
name "Micaela"
>Yes... Most of the inhabitants here are monsters, and many are Elves.@
>Those who hated the conflict between humans and monsters fled here to live in hiding.\
>Though they are few, there are also some fallen angels here.\
name ""
name "Luka"
>Fallen angels...?\
name ""
name "Micaela"
>There are a few angels who rejected Ilias' way of thinking about monsters.\
>Chased from the Heavens, they moved here to the surface world.@
>They are referred to as fallen angels.\
name ""
name "Luka"
>Could it be...@> You're one too?\
name ""
name "Micaela"
>Yes...@> I am one of those fallen angels.\
>The first of the angel sisters created by Ilias.@
>I am the older of us twins.\
name ""
name "Luka"
>F...First angel?\
name ""
>If that's true, she must be really powerful.@
>The very first of all the angels...\
name "Micaela"
>Let me tell you everything...@
>This story starts several billion years ago, before this world was formed.\
name ""
name "Luka"
>S...Several billions of years!?\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\micaela_st11.bmp",230,0:print 10,500
name "Alice"
>Before the world was formed...@> That's a strange expression.@
>Was this world not created by Ilias?\
name ""
name "Micaela"
>No... This world was not created by someone.@
>Though it may sound strange, this world was not artificially created by an intelligence.\
name ""
name "Luka"
>Wh...What!?@
>Then, Ilias is...?\
name ""
cspl 700,701
bg "bg\bg001.bmp",10,500
name "Micaela"
>Several billions of years after our sun was formed...@
>The primordial holy and dark magics were circulating around its chaotic atmosphere.\
>Darkness and light were kept apart by the chaos of its atmosphere, so to speak.@
>Each of those two forces slowly acquired their own will.\
lsp 700,":a;chara\zyasin.bmp",-300,50
lsp 701,":a;chara\iriasu_st01.bmp",200,0:print 10,500
>Ilias was born from the holy magics.@
>And from the darkness, the Dark God Alipheese came forth.\
name ""
lsp 700,":a;chara\alice_st77.bmp",-170,50
lsp 701,":a;chara\micaela_st11.bmp",230,0
bg "bg\bg167.bmp",10,500
name "Alice"
>Dark God Alipheese!?\
name ""
name "Micaela"
>That Dark God conveyed herself as the first Monster Lord.@
>It could be said that Ilias and Alipheese were the incarnation of dark and light itself.\
name ""
name "Luka"
>So Ilias didn't make the world...@
>She just made up the story and lied about it.\
name ""
>Most humans around the world believe her story.@
>That Ilias was the creator of the world...\
name "Micaela"
>Her title as creator of the world is obviously a lie.@
>But the one who guided life from that star was certainly Ilias.\
csp 701
lsp 700,":a;chara\iriasu_st01.bmp",0,0
bg "bg\bg001.bmp",10,500
>The ego of the sacred light began to sprout others...@
>That is, the Goddess Ilias began forming other beings from herself.\
lsp 701,":a;chara\micaela_st31.bmp",-160,0
lsp 700,":a;chara\rucyfina_st21.bmp",160,0:print 10,500
>Imitating herself, she created two twin life forms she called angels.\
name ""
csp 701
lsp 700,":a;chara\micaela_st11.bmp",70,0
bg "bg\bg167.bmp",10,500
name "Luka"
>Twin primordial angels...@
>And you're the older one...\
name ""
>The woman standing before me is an offshoot of Ilias' self.@
>Now that I look, she does look similar to Ilias...\
lsp 701,":a;chara\micaela_st31.bmp",-160,0
lsp 700,":a;chara\rucyfina_st21.bmp",160,0
bg "bg\bg001.bmp",10,500
name "Micaela"
>After that, Ilias created many offshoots of herself.@
>In other words, she created angels.\
>Through trial and error, she was making creations similar to her own existence.@
>But though she made them of her own holy element, each angel had a will of their own.\
>Ilias was never satisfied with just that.\
name ""
csp 701
lsp 700,":a;chara\micaela_st11.bmp",70,0
bg "bg\bg167.bmp",10,500
name "Luka"
>Why was she going so far to try to create something like herself...?\
name ""
lsp 700,":a;chara\micaela_st13.bmp",70,0:print 10,500
name "Micaela"
>Perhaps she was lonely...@
>Since she first formed, she spent many millions of years alone.\
lsp 700,":a;chara\micaela_st11.bmp",70,0:print 10,500
>As darkness itself, Alipheese and Ilias could never cross.@
>For a long time, Ilias was absolutely alone.\
name ""
name "Luka"
>............\
name ""
lsp 700,":a;chara\iriasu_st01.bmp",0,0
bg "bg\bg001.bmp",10,500
name "Micaela"
>...Now, back to the story.@
>Ilias gave up on making copies of herself, and looked toward the life flourishing on the surface.\
>This is several hundred million years ago now...@
>At that time, the surface life of this planet consisted of primitive reptiles and fish.\
>She came to the surface to try to give some of those beings intelligence.\
name ""
name "Alice"
>I see... To artificially evolve them.\
name ""
name "Micaela"
>Yes, that's correct.@
>Trying to make intelligences similar to her, she inspected the various creatures and eliminated some.\
>She quickly crossed off the giant reptiles roaming the surface, and destroyed them all.@
>To make it easier for mammals to flourish, she changed the environment and vegetation.\
>Through hundreds of millions of years of trial and error, she created both small and large mammals.@
>Repeating her process of selection and elimination, eventually monkeys came forth.\
>From more selection and elimination, they grew into humans.@
>And at last, Ilias declared humans "complete".\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\micaela_st11.bmp",230,0
bg "bg\bg167.bmp",10,500
name "Alice"
>She was not able to make humans quickly with her power as a Goddess?@
>Ilias really isn't almighty at all...\
name ""
name "Micaela"
>It was as primitive as selected breeding of livestock...@
>Ilias' aim to have direct control on the genome did not come until much later.\
name ""
name "Luka"
>...It's a little confusing, but it's true Ilias created humans, isn't it?\
name ""
>No... Not created, I guess.@>More like raised?@
>But how she raised humans is a lot more involved than her story...\
name "Micaela"
>"Created" is still not accurate.@
>Though she may have influenced the evolution, humans appeared on their own.\
>They stood on their own two feet, and became the rulers of the surface world.@
>Making contact with them in their primitive state, Ilias became the source of their worship.\
>But an unwanted existence also lived on the ground...@
>They were the monsters created by the Dark God Alipheese.\
name ""
name "Alice"
>If Ilias created humans by selective breeding...@
>How did the founding Monster Lord create monsters?\
name ""
name "Micaela"
>I'm sure I don't need to explain it to you, Monster Lord...@
>But the element of darkness interferes with the genes of an organism.\
>The Dark God Alipheese was able to modify creatures with her own power.@
>Much more directly than Ilias, she was able to influence creatures growth.\
name ""
lsp 700,":a;chara\alice_st72.bmp",-170,50:print 10,500
name "Alice"
>I see...@
>As expected, the Monster Lord was more skilled than Ilias.\
name ""
name "Micaela"
>...It was not a factor of ability, the difference was due simply to the properties of their own magic.@
>Ilias' holy magic excels at influencing the spirit, so she was able to more easily impart matters of spirit and soul.\
name ""
lsp 700,":a;chara\alice_st74.bmp",-170,50:print 10,500
name "Alice"
>...........\
name ""
name "Micaela"
>...Now, back to the story.\
csp 701
lsp 700,":a;chara\zyasin.bmp",0,0
bg "bg\bg001.bmp",10,500
>The Dark God Alipheese also formed offshoots of herself.@
>The first was known as Alipheese the second, the second Monster Lord.\
>In addition, Dark God Alipheese combined her own genes with those of the creatures that dwelt on the surface, and created six monsters.\
>They are the legendary monsters that came to be known as the "Six Ancestors".@
>All monsters that exist to this day can trace their blood back to one of these six.\
name ""
lsp 700,":a;chara\micaela_st11.bmp",70,0
bg "bg\bg167.bmp",10,500
name "Luka"
>Six Ancestors... Didn't Promestein say something about them?@
>That they were sealed...\
name ""
>All of the monsters of the world tracing back to six ancestors...@
>The first time I heard about this was today.\
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\micaela_st11.bmp",230,0:print 10,500
name "Alice"
>Even I have only heard of things like that referenced in ancient legends.@
>I wonder if even Tamamo knows about it...?\
name ""
name "Micaela"
>That story was not handed down to the surface world.@
>After the Great Monster Wars, Ilias tried to wipe out unfavorable facts...\
name ""
name "Luka"
>The Great Monster Wars...\
name ""
>A huge war between Ilias and the first Monster Lord.@
>Even a child has heard of its existence.\
>But as for what actually happened...@
>Other than vague legends, nothing is really known for sure.\
name "Micaela"
>Now then, let us talk about the Great Monster Wars...\
lsp 700,":a;chara\zyasin.bmp",-300,50
lsp 701,":a;chara\iriasu_st01.bmp",200,0
bg "bg\bg001.bmp",10,500
>Around a thousand years ago, the conflict between Alipheese and Ilias was approaching a conclusion.@
>At last, the battle between them began on the surface world itself.\
>An army of angels led by Ilias on one side, with legions of monsters led by Alipheese on the other.@
>Even humans were dragged into it, and the fighting became fierce.\
lsp 701,":a;chara\micaela_st31.bmp",-160,0
lsp 700,":a;chara\rucyfina_st21.bmp",160,0:print 10,500
>I was an Archangel, spearheading assaults by the angel army.@> I crossed swords with those Six Ancestors many times...@
>Of course my younger sister showed her might on the battlefield at the same time.\
name ""
csp 701
lsp 700,":a;chara\micaela_st11.bmp",70,0
bg "bg\bg167.bmp",10,500
name "Luka"
>So which side won...?\
name ""
>The legends say that Ilias won the war...@
>But after hearing all that I have, I'm starting to doubt that.\
name "Micaela"
>...Ilias was the victor.\
name ""
lsp 700,":a;chara\alice_st77.bmp",-170,50
lsp 701,":a;chara\micaela_st11.bmp",230,0:print 10,500
name "Alice"
>Are you saying that the first Monster Lord was defeated by Ilias!?@
>I cannot believe that!\
name ""
name "Micaela"
>In terms of the actual status of the war itself, Alipheese's forces were superior the entire time.@
>The reason Ilias won was due to a cowardly trick...\
name ""
lsp 700,":a;chara\alice_st79.bmp",-170,50:print 10,500
name "Alice"
>I believe you now. \
name ""
name "Luka"
>...........\
name ""
lsp 700,":a;chara\zyasin.bmp",-300,50
lsp 701,":a;chara\iriasu_st01.bmp",200,0
bg "bg\bg001.bmp",10,500
name "Micaela"
>The clashes between the two Gods resulted in terrible destruction.@
>They both realized that if they continued fighting, they would destroy everything.\
>On the verge of destroying the very world itself, Alipheese hesitated.@
>But Ilias didn't, threatening the very survival of the world.\
name ""
name "Luka"
>Threaten?@>If they continued fighting, they would have destroyed the world?\
name ""
name "Micaela"
>Ilias went to Alipheese, telling her to surrender as she never would.\
>If they kept fighting, both of them, the angels, the monsters and the humans would all perish.@
>But she said that if the Dark God and the Six Ancestors sealed themselves, she would not lay a hand on the other monsters.\
name ""
lsp 700,":a;chara\alice_st73.bmp",-170,50
lsp 701,":a;chara\micaela_st11.bmp",230,0
bg "bg\bg167.bmp",10,500
name "Alice"
>What cowardice!@
>No, rather than cowardly...\
name ""
name "Micaela"
>Yes... She was insane.@
>Threatening the extinction of everything, she used the world as a hostage for surrender.\
lsp 700,":a;chara\zyasin.bmp",-300,50
lsp 701,":a;chara\iriasu_st01.bmp",200,0
bg "bg\bg001.bmp",10,500
>Seeing no other path, the Dark God chose to surrender.@
>Along with the Six Ancestors, they were sealed with a special seal.\
name ""
name "Alice"
>The Six Ancestors' Great Seal...\
name ""
name "Micaela"
>By converting their own magic, the Six Ancestors used it to seal themselves away.\
>Alipheese used the same technique to seal herself.@
>Using current technology, Promestein managed to re-create the effects of the seal.\
name ""
name "Alice"
>Oh founding Monster Lord... How sad...@
>In exchange for a guarantee of safety of her children, she sealed herself away...\
>...Was she not concerned that Ilias would break her promise?\
name ""
name "Micaela"
>Of course... Alipheese knew well Ilias' nature.@
>So they tied in a special trigger that would cancel the seal into their magic.\
>It was to be released if Ilias broke her promise.@
>At that time, the seal would be broken, and the Dark God would revive.\
name ""
name "Alice"
>If Ilias breaks her promise, then she will revive?@
>But how is that judged by...?\
name ""
name "Micaela"
>As you know, when a monster dies, their magic returns to the world.@
>Like all things, the magic flows into the atmosphere to be used by the endless cycle of birth and rebirth.\
>If a large amount of dark monster magic were released at once, it would impact that transmigration.@
>So the atmosphere itself would become heavily saturated with dark magic.\
>The amount of holy and dark magic must stay in balance, or the seal will break.\
name ""
csp 701
lsp 700,":a;chara\micaela_st11.bmp",70,0
bg "bg\bg167.bmp",10,500
name "Luka"
>So... If Ilias starts committing genocide against monsters...\
name ""
name "Micaela"
>Yes... Dark God Alipheese will awaken from her seal.\
name ""
lsp 700,":a;chara\alice_st77.bmp",-170,50
lsp 701,":a;chara\micaela_st11.bmp",230,0:print 10,500
name "Alice"
>What!@
>I didn't even know that...!\
name ""
name "Micaela"
>That's because this is something Ilias didn't want anyone to know.\
>Wielding her great power, Ilias destroyed the Dark God...@
>That's the story that was most convenient for Ilias.\
name ""
name "Luka"
>Wait a second...@
>But Ilias is slaughtering monsters.\
>Thirty years ago, she massacred monsters at Remina...@
>And isn't this re-creation she's trying to do going to kill all of the monsters...?\
name ""
csp 701
lsp 700,":a;chara\iriasu_st01.bmp",0,0
bg "bg\bg001.bmp",10,500
name "Micaela"
>Of course... Ilias has spent a long time trying to find a way around that.@
>From the moment Dark God Alipheese was sealed, she has been thinking of countermeasures.\
>Developing a new seal... Or a way to manipulate the balance...@
>Measures for the worst case scenario... If she were to revive.\
>And at last, she decided to order her smartest angels to create a new type of monster.\
name ""
lsp 700,":a;chara\stein_st02.bmp",200,0
lsp 701,":a;chara\iriasu_st01.bmp",-160,0:print 10,500
name "Luka"
>Smart angels... Promestein!?\
name ""
name "Micaela"
>As I said earlier, Alipheese was skilled at directly manipulating organisms.@
>Ilias focused on that, and ordered her subordinate angels to study the underlying principles.\
>Focused on that, it took them roughly 500 years.@
>As a result, they decided on a policy of letting a monster manage the flow of dark magic.\
lsp 700,":a;chara\alice8th_st01.bmp",180,30:print 10,500
>For that purpose, Ilias singled out Alipheese the Eighth.@
>When she was struck down by the Hero, Ilias saved her life.\
>Under the condition that she would manage the dark monster magic as the world was recreated...\
name ""
csp 701
lsp 700,":a;chara\micaela_st11.bmp",70,0
bg "bg\bg167.bmp",10,500
name "Luka"
>That's insane...\
name ""
name "Micaela"
>Yes, Ilias' strategy has gone way too far.@
>Rebels against her finally started to appear.\
lsp 700,":a;chara\rucyfina_st21.bmp",0,0
bg "bg\bg001.bmp",10,500
>That was my sister...@
>One of the twin angels that Ilias first created.\
name ""
name "Alice"
>...As expected, some just couldn't bear it any longer.@
>Even more, for it to be one of her very first allies...\
name ""
name "Micaela"
>My younger sister seemed to have been questioning Ilias ever since the start of the Great Monster Wars.@
>Her insane way of fighting to the very end, even if it would destroy everything...\
>At her collusion with Alipheese the Eighth, she finally broke away.@
>She knew that Ilias would try to destroy humanity one day...\
>My younger sister seemed to know exactly what was going to happen.\
name ""
name "Luka"
>............\
name ""
name "Micaela"
>As I said before, my sister led an army of angels.@
>There was only one who could match her might...\
lsp 701,":a;chara\micaela_st31.bmp",-160,0
lsp 700,":a;chara\rucyfina_st21.bmp",160,0:print 10,500
>Therefore I, one of equal power, was chosen to hunt her down.@
>Holding hesitations in my heart, I stood in front of her.\
>The fight with my younger sister was extremely fierce...@
>Suffering serious wounds, she became a fallen angel and escaped to this surface world.\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\micaela_st11.bmp",230,0
bg "bg\bg167.bmp",10,500
name "Alice"
>...Did you let her escape to the surface world on purpose?\
name ""
lsp 701,":a;chara\micaela_st13.bmp",230,0:print 10,500
name "Micaela"
>I cannot say for sure...@
>Doubt in Ilias had already been flaring up in my mind.\
csp 701
lsp 700,":a;chara\iriasu_st01.bmp",0,0
bg "bg\bg001.bmp",10,500
>A few hundred years later...@
>Ilias finally set into motion what she had been planning for years.\
>Giving orders to her angels, she ordered the humans and monsters coexisting in Remina to be annihilated.\
>She justified it by saying they were performing large scaled magic experiments.@
>That the arrogant move was reason enough for them to be destroyed.\
>After all, Ilias hates most those who refuse to follow her.@
>Her true nature is one of jealousy and possessiveness, paranoid about others...\
name ""
lsp 700,":a;chara\micaela_st11.bmp",70,0
bg "bg\bg167.bmp",10,500
name "Luka"
>..........\
name ""
>Micaela was a close confidant of Ilias for thousands of years.@
>There's a deep sense of loss and pain in her voice.\
name "Micaela"
>Like my sister, I finally realized Ilias' true nature.@
>Escaping the Heavens, I came to the surface world.\
>I decided to protect the other fallen angels.@
>Not too long ago, I settled in this village.\
>This place already had the reputation of being a hidden village of monsters...\
name ""
name "Luka"
>A hidden village, huh...\
name ""
>Lazarus said my father would let monsters escape.@
>I wonder if this is where he sent them...?\
name "Micaela"
>After descending to the surface, I searched for my missing sister.\
>After falling, she seemed to have wandered the surface world for several hundred years.@
>And one day, she happened to meet a Hero who was in the midst of despair.\
>Falling in love, she decided to live out her days as a human with him.@
>And until the very end, she lived and died as a human.\
>My sister's name was...\
name ""
name "Luka"
>Lucifina...@>My mother.\
name ""
>I finally understand now.@
>My mother was a fallen angel who rebelled against Ilias.\
lsp 700,":a;chara\alice_st74.bmp",-170,50
lsp 701,":a;chara\micaela_st11.bmp",230,0:print 10,500
name "Alice"
>Luka is the child of one of the original angels?@
>That is surprising, even to me...\
name ""
csp 701
lsp 700,":a;chara\micaela_st11.bmp",70,0:print 10,500
name "Micaela"
>Are you shocked, Luka?@
>To know that you are not a pure human?\
name ""
name "Luka"
>...No, Micaela.\
name ""
>I slowly shake my head.@
>More than shocked, it's...\
name "Luka"
>...I'm proud.@
>My existence itself is proof that humans, monsters and angels could all get along.\
name ""
lsp 700,":a;chara\micaela_st12.bmp",70,0:print 10,500
name "Micaela"
>I see...@> You truly grew up to be a good child.\
name ""
>Micaela softly smiles at me.@
>...If she was my mom's sister, that means she is my aunt.\
>That thought leaves me feeling a little weird.\
lsp 700,":a;chara\micaela_st11.bmp",70,0:print 10,500
name "Micaela"
>...By the way, Luka.@> Do you know about your father's family?\
name ""
name "Luka"
>No... I never really knew my father.\
name ""
name "Micaela"
>Your father is Marcellus, a descendant of the Hero Heinrich.@
>That means you're from a line of legendary Heroes.\
name ""
name "Luka"
>I'm...@> Related to Heinrich?\
name ""
lsp 700,":a;chara\alice_st74.bmp",-170,50
lsp 701,":a;chara\micaela_st11.bmp",230,0:print 10,500
name "Alice"
>Bred from legendary Heroes and angels...@
>It explains why you are superhuman in various ways.\
name ""
csp 701
lsp 700,":a;chara\micaela_st13.bmp",70,0:print 10,500
name "Micaela"
>But it was that family history that brought Ilias' attention towards you.@
>I'm sure my sister deeply regrets that...\
>Even though I was worried about you, the orphan of my late sister...@
>I didn't know what Ilias would do if I ever made contact with you.\
>As a result, I left you alone all this time...@
lsp 700,":a;chara\micaela_st11.bmp",70,0:print 10,500
>...Luka, please forgive my incompetence.\
name ""
name "Luka"
>No, no...@
>It's enough that you saved the people of Ilias Village.\
name ""
>That's why she drove me out so quickly when I came here before...@
>I can see it from a mile away now.\
>Everything would have changed if I knew then what I know now.@
>I wouldn't have been able to live normally after finding out about that.\
>But now that the world is in this state, she has finally told me everything...\
name "Micaela"
>...That's the end of my story.@
>You two will be fighting against Ilias now, won't you?\
name ""
name "Luka"
>Yes!\
name ""
lsp 700,":a;chara\alice_st72.bmp",-170,50
lsp 701,":a;chara\micaela_st11.bmp",230,0:print 10,500
name "Alice"
>Of course.\
name ""
name "Micaela"
>I have lived on the surface so long now, I cannot fight any longer...@
>The air in the surface world is not very good for angels.\
>It's regrettable, but I can only pray for your victory.@
>...Oh?@> I thought I ordered nobody to disturb us for a while...\
name ""
r@k@\
dwave 1,"se\asioto1.ogg"
>I hear quick footsteps approaching from outside.@
dwave 2,"se\knock.ogg"
>After a hurried knock, the door opens before an answer to it is given.\
dwave 1,"se\door2.ogg"
lsp 700,":a;chara\mob_elf1.bmp",-160,0
lsp 701,":a;chara\micaela_st11.bmp",230,0:print 10,500
name "Elf"
>Master Micaela, there's trouble!@
>A powerful monster, accompanied by a huge one has appeared!\
name ""
name "Luka"
>Oh no... Another enemy attack!?\
name ""
>I pick up my sword, ready to jump out of Micaela's house...\
name "Micaela"
>What type of monsters are these?\
name ""
name "Elf"
>The giant one looks like some sort of Chimera...@> A nine-tailed fox is riding on her back.@
>She said they have come for Monster Lord Alice...\
name ""
name "Luka"
>Eh...?\
name ""
>Could that be Tamamo...?\
name "Micaela"
>...I see. Please let them through to here.\
name ""
csp 701
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>Thank you, I'm coming in.\
name ""
>Pushing past the Elf messenger, Tamamo steps inside.\
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\tamamo_st01.bmp",160,0:print 10,500
name "Alice"
>What's wrong, Tamamo?@
>Did something happen?\
name ""
name "Tamamo"
>While investigating the silver discs, I found some information about the seal on the spirits.@
>I thought you would want to know right away.\
name ""
dwave 1,"se\tamamo2.ogg"
>Tamamo jumps up, and lands butt first in a nearby chair.@
>She glances first at Micaela.\
lsp 701,":a;chara\tamamo_st01.bmp",-160,0
lsp 700,":a;chara\micaela_st11.bmp",260,0:print 10,500
name "Micaela"
>It has been a while, Tamamo.\
name ""
name "Tamamo"
>What irony, for our reunion to be in this manner.@
>I would like to speak with you, but I need to discuss this first.\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\tamamo_st01.bmp",160,0:print 10,500
>Turning back toward us, Tamamo resumes what she was talking about earlier.\
name "Tamamo"
>The seal on the spirits is completely different than the seal on the Monster Lord.@
>The range is world-wide, and it's being maintained on a massive scale.\
>It's designed to drastically reduce their power... But it's not exactly a perfect seal.@
>The seal is weakening them, making it so you can no longer communicate with them.\
name ""
name "Luka"
>They were weakened, not sealed?@
>So that's what the seal is doing?\
name ""
name "Tamamo"
>Weakened by the seal, they all returned back to their original dwelling spaces.@
>With their power so limited, not even your voice can reach them.\
name ""
name "Luka"
>Back to their original dwelling spaces...?\
name ""
>So the forest, the desert, the volcano and the spring.@
>They all had to go back?\
name "Alice"
>Why were they safely sent back to their own dwellings?@
>Wouldn't they have been killed as soon as they were weakened?\
name ""
name "Tamamo"
>Because their existence itself is a power of nature.@
>If you were to kill them, then nature itself would be sent into disorder.\
>Even the Heavens seem to be reluctant to do that.\
name ""
name "Luka"
>So I just need to go back to them again?\
name ""
name "Tamamo"
>It's true you should be able to re-contract with them...@
>But if that seal isn't dealt with, they will be very weak and near powerless.\
name ""
name "Luka"
>Still, I'm going to get them back.@
>I'm sure they're all feeling lost and lonely after that suddenly happened...\
name ""
name "Tamamo"
>Yes... But be careful.@
>The Heavens will do their utmost to block you at every step.\
>I'll continue investigating how to break the seal.@
>There are so many discs, I'm getting all of the Kitsunes to come help decipher them.\
name ""
name "Luka"
>Thank you, Tamamo.@
>I know now what I need to do.\
name ""
lsp 701,":a;chara\tamamo_st03.bmp",160,0:print 10,500
name "Tamamo"
>Good.@>But the last news is bad news.@
>Chimeric Beasts and angels are attacking towns and villages all over the world.\
>Resistances are holding out all over, but they are slowly being overwhelmed.@
>It's just a matter of time before they fall...\
name ""
lsp 700,":a;chara\alice_st81.bmp",-170,50:print 10,500
name "Alice"
>That damn Ilias really is going all out, isn't she?\
name ""
name "Luka"
>...Yes, we can't leave that alone either.\
name ""
cspl 700,701:print 10,500
>The top priority is to fly around with Galda and re-collect the spirits.@
>Along the way, we'll rescue the places under attack.\
>That should be our plan of action for now.\
name "Luka"
>Alright, let's go Alice!\
name ""
>As I stand up, trying to sound brave and leader-like...@
>I suddenly feel dizzy, and fall to the floor.\
name "Luka"
>E...Eh?@>I feel so lightheaded...\
name ""
lsp 700,":a;chara\micaela_st11.bmp",70,0:print 10,500
name "Micaela"
>...It seems the angel power awakening in you is having an impact on your body.@
>Even if you have the power of an angel in you, your body is still that of a human.\
>Excess use of holy magic will eat into your body.@
>You should rest here for at least an hour.\
name ""
name "Luka"
>If I rest, then the other towns will...\
name ""
name "Micaela"
>If you leave in your current state, you won't help anybody.@
>As a result, your leaving now will simply guarantee their destruction.\
name ""
name "Luka"
>........\
name ""
>She may be right.@
>I can't have my body be dragged down like this if I come up against a powerful enemy...\
name "Luka"
>Then if you insist, I'll take a short rest.\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\tamamo_st01.bmp",160,0:print 10,500
name "Tamamo"
>...Yes, you have some time to rest.@
>Alright, Monster Lord, come here for a moment.\
>I'll teach you a secret skill.\
name ""
lsp 700,":a;chara\alice_st73.bmp",-170,50:print 10,500
name "Alice"
>A secret skill?@
>But I cannot use powerful magic with this body...\
name ""
name "Tamamo"
>Do you think I'm stupid enough to teach you a skill that wouldn't suit your current status?@
>It's because of the current state of your body that I'm teaching you this skill.\
name ""
lsp 700,":a;chara\alice_st74.bmp",-170,50:print 10,500
name "Alice"
>I see...@> Then please do.\
name ""
dwave 1,"se\door2.ogg"
cspl 700,701:print 10,500
>Alice and Tamamo leave the room, apparently to practice some new skill.@
csp 701
lsp 700,":a;chara\micaela_st11.bmp",70,0:print 10,500
>As I sit down and rest, Micaela starts speaking to me again.\
name "Micaela"
>Luka... A new power has awakened in you.@
>Would you like me to explain the characteristics of this new power?\
name ""
name "Luka"
>Yes, that would be great.\
name ""
name "Micaela"
>Flash Kill, Heavenly Demon Revival, Ninefold Rakshasa...@
>These skills were all ones that Lucifina took great pride in.\
>Their power increases with the SP consumption.@
>They should be used on a case by case basis, as needed.\
>In addition "Daystar", a nickname of Lucifina, is a very potent move.@
>Along with my "Sword of the Heavens", they are the two ultimate techniques of the Heavens.\
>It's a counter technique that will nullify the enemy's attack.@
>The SP cost is enormous, but the power is just as high.\
>Lastly, Fallen Angel Dance...@
>You probably already know, but this is used to evade enemy attacks.\
name ""
name "Luka"
>Similar to serene mind...\
name ""
name "Micaela"
>Having a serene mind will let you sense an enemy's thirst for blood, and evade their attacks that way.@
>It's very effective on monsters, but...\
>You won't be able to sense much from an angel, composed of holy magic.@
>You should have realized that already during your fights against angels.\
name ""
name "Luka"
>Yes...\
name ""
>It's true that the serene mind skill wasn't too useful against angels.@
>I pretty much couldn't sense anything they were about to do.\
name "Micaela"
>On the other hand, Fallen Angel Dance is sensitive to their movements.@
>You align yourself with the waves of holy energy, and use that to evade their attacks.\
>In other words, it's effective against angels.@
>But you cannot use the two skills at the same time.\
name ""
name "Luka"
>So... Choose properly, depending on the enemy.\
name ""
name "Micaela"
>Yes, that's basically it.@
>Never forget the proper use of the two skills.\
>In addition, Fallen Angel Dance has a wind type property to it.@
>Remember that for the future.\
name ""
name "Luka"
>Wind type property...?@
>Like Sylph?\
name ""
name "Micaela"
>Yes, exactly.@
>Abnormalities should be more easily evaded due to that property.\
name ""
name "Luka"
>I see... I got it.\
name ""
>The water based serene state is good against monsters.@
>The wind based Fallen Angel Dance is good against angels.\
>In addition, Fallen Angel Dance can avoid status effects.@
>I'll make sure to remember it all.\
name "Micaela"
>Please don't forget these basics.@
>If it's you though, I'm sure you'll master it in no time.\
name ""
name "Luka"
>Yes, I got it!\
name ""
>Gaining new powers, I feel my fighting spirit burning.@
>But for now, I need to take a rest.\
>Resting in Micaela's house, I give my body a break in preparation for the battles to come.\
bgmstop
sean_change "bg001"
bgm "bgm\irias.ogg"
lsp 700,":a;chara\mariel_st01.bmp",-200,0
lsp 701,":a;chara\eden_st21.bmp",180,0:print 10,500
name "Mariel"
>Master Eden...@> The deployment has been finished, as you ordered.@
>I've posted high ranking angels as guards at each spirit location.\
>In addition, we have finished assigning our corps for each battle zone.@
>The deployment of Promestein's Chimeric Beasts has also been completed.\
name ""
lsp 701,":a;chara\eden_st22.bmp",180,0:print 10,500
name "Eden"
>Promestein... Did she accomplish her duty?@
>Even though it would be a simple task to clean the surface world with the angel army...\
name ""
name "Mariel"
>It is as you say.@
>Why did Ilias give a special role to that one...?\
name ""
name "Eden"
>...Do not say any more than that.@
>Unless you intend to disagree with Ilias' orders?\
name ""
lsp 700,":a;chara\mariel_st04.bmp",-200,0:print 10,500
name "Mariel"
>No... I did not mean...\
name ""
lsp 701,":a;chara\eden_st21.bmp",180,0:print 10,500
name "Eden"
>Though... Your apprehensions are not misguided.@
>That one, and Black Alice, will surely poison Ilias.\
>It is my duty as an Archangel to take the first step.@
>I will never forgive the traitors who look down upon Goddess Ilias...\
name ""
>As Eden mutters that to herself...\
lsp 700,":a;chara\cupid_st12.bmp",-180,0:print 10,500
name "Cupid"
>Master Eeeeeeden! @
>I have a repooooort! \
name ""
>Cupid suddenly appears, and whispers something into Eden's ear.\
name "Eden"
>I see, I knew it...@
>...Please continue monitoring.\
name ""
lsp 700,":a;chara\cupid_st11.bmp",-180,0:print 10,500
name "Cupid"
>Affirmatiiiiive! 
>I'm oooooooff! \
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,500
>With that, Cupid vanishes.\
lsp 700,":a;chara\mariel_st01.bmp",-200,0:print 10,500
name "Mariel"
>...Your hand is already in motion?@
>As expected of Eden, the Great Third Seraph!\
name ""
lsp 701,":a;chara\eden_st23.bmp",180,0:print 10,500
name "Eden"
>The Third... You said?@
>I am the Third...?\
name ""
lsp 700,":a;chara\mariel_st03.bmp",-200,0:print 10,500
name "Mariel"
>N...No...@>I did not mean...\
name ""
lsp 701,":a;chara\eden_st21.bmp",180,0:print 10,500
name "Eden"
>...Pay it no mind.@> Now go to the surface.@
>Make sure the surface invasion goes off without a hitch.\
name ""
lsp 700,":a;chara\mariel_st04.bmp",-200,0:print 10,500
name "Mariel"
>Yes, I will ensure it!\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,500
>Mariel quickly leaves.@
>The only one left is Seraph Eden.\
lsp 701,":a;chara\eden_st23.bmp",180,0:print 10,500
name "Eden"
>I am not the Third any more...@
>Micaela and Lucifina betrayed Goddess Ilias...\
>I am an Archangel!@> I am Ilias' first servant!\
>I am not the Third!\
name ""
bgmstop
sean_change "bg167"
bgm "bgm\enrika.ogg"
name "Luka"
>...Whew, that's better.\
name ""
>Free of the fatigue, I'm feeling good again.@
>That short rest really made me feel refreshed.\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>...Well, Luka?@> Shall we go?\
name ""
name "Luka"
>Yes, I feel great.@
>But I've never felt anything like that before.\
name ""
name "Alice"
>I heard from Micaela... Your angel powers are eating away at your human body.@
>Do not abuse the power, or else...\
name ""
name "Luka"
>If I do... What will happen?\
name ""
name "Alice"
>............\
name ""
>For some reason, Alice's eyes glance toward my sword.\
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>If you go too far, you'll ruin your own body.@
>Using angel techniques should be no issue, but if you go past that...\
name ""
name "Luka"
>Yes, I got it...\
name ""
>With Alice looking at me so solemnly, I obediently nod at her.\
bgm "bgm\field4.ogg"
lsp 700,":a;chara\alice_st72.bmp",0,50:print 10,500
name "Alice"
>Alright then, let's go Luka!@
>Our journey of fate around the world begins anew!\
name ""
name "Luka"
>Yes... This time, to protect the world from Ilias!\
name ""
>With renewed determination, Alice and I set out from Enrika.@
>We get on Galda's back, and head back into the world...\
dwave 1,"se\habataki.ogg"
sean_change "bg140"
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Luka, you will battle even more powerful enemies than before.@
>I cannot really contribute to battles in this body...\
>But I learned a new skill from Tamamo to help out.@
>Word of Dispel...@>It will let me return to my original body for a short time.\
name ""
name "Luka"
>Wow, that's amazing!@> How long does it last?@
>An hour?@> 30 minutes?\
name ""
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>T...Three seconds...\
name ""
name "Luka"
>Three seconds?\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>It also requires considerable concentration to cast.@
>I'll only be able to use it once per battle.\
>It's a powerful move, but it only lasts three seconds...@
>I'll leave it to you to decide when I should use it.\
name ""
name "Luka"
>I see, so I should call out depending on the opponent and the situation...\
name ""
>She can use it once per battle to return to her original body.@
>She'll be able to use any of her skills, but I can only choose one...\
>If I use it in the right way, it should be a huge help.\
name "Alice"
>...Now then, where to?@
>First you should direct Galda around this continent.\
>Once you're done here, tell her to head north toward Sentora continent.@
>But we're short on time, so we won't be coming back once we head to Sentora.\
name ""
name "Luka"
>Got it.@
>First will be...\
name ""
r@k@\
mov %gloval1_story_sinkou,13:gosub *savegloval1
goto *map8



*sean0316

sean_change "bg219"
gosub *setwindow_01p
bgm "bgm\kiki3.ogg"
>The sky over Iliasburg...\
name "Luka"
>Not good... The town is completely surrounded!\
name ""
>Right underneath us, a horde of monsters are besieging the town.@
>The guards are holding them back for now, but it's only a matter of time before they break through!\
lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
name "Alice"
>Alright, let's help them out!\
name ""
name "Luka"
>Yes!\
name ""
lsp 700,":a;chara\mob_heisi1.bmp",-180,0
lsp 701,":a;chara\c_beast_st01.bmp",200,0
bg "bg\bg188.bmp",10,1500
>I jump off from Galda's back.@
>Unsheathing my sword as I fall, I lash out as soon as I land.\
name "Luka"
>Hya!\
name ""
dwave 1,"se\slash.ogg"
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
csp 701:print 10,500
>I cut down the Chimeric Beasts that were surrounding the guard.\
name "Luka"
>Are you alright!?\
name ""
lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
name "Iliasburg Guard"
>You're... The brave Hero that repelled Granberia!@
>Thank you for saving me!\
name ""
name "Luka"
>Of course!@> I'll help out here, too!\
name ""
name "Iliasburg Guard"
>No... The town needs more help than here!@
>A few monsters we couldn't hold back were able to get inside!\
>But the swarms are still trying to push in, and we can't leave our posts!\
name ""
lsp 700,":a;chara\alice_st73.bmp",-170,50
lsp 701,":a;chara\mob_heisi1.bmp",160,0:print 10,500
name "Alice"
>Yes, hold this place for a little longer.@
>Let's get the ones who broke into the town center, Luka!\
name ""
name "Luka"
>Alright, let's go!\
name ""
name "Iliasburg Guard"
>Please, protect the town citizens!\
name ""
lsp 700,":a;chara\mob_heisi1.bmp",-180,0
lsp 701,":a;chara\c_beast_st01.bmp",200,0:print 10,500
>The guards form ranks, spears in hand, waiting to repulse the next charge of Chimeric Beasts.\
>Praying for their safety, I head toward the town center.\
r@k@\
dwave 1,"se\asioto1.ogg"
sean_change "bg018"



*sean0316a

bgm "bgm\kiki2.ogg"
lsp 700,":a;chara\mob_seinen1.bmp",-180,0
lsp 701,":a;chara\c_slag_st01.bmp",160,0:print 10,500
name "Youth A"
>S...Stay back!\
name ""
name "Youth B"
>Ahh!@> Help me!\
name ""
name "Youth C"
>Wh...What do I do!?\
name ""
>Three youths nervously back away from a monster.@
>Panicking, they turn around and start running.\
name "Chimera Slug"
>Haha, you won't get away...\
name ""
dwave 1,"se\ero_slime2.ogg"
>The Chimera Slug sprays sticky mucus at them.\
name "Youth A"
>Uwa!@> What's this!?\
name ""
name "Youth B"
>I...I can't move!\
name ""
>The sticky mucus covers their body, slowing them down.@
>After a few seconds of struggling, they're unable to move at all.\
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
name "Chimera Slug"
>I'll squeeze all three of you at the same time, until you're all dry.\
name ""
name "Youth C"
>S...Stop...!@> Hyaa!\
name ""
csp 701
lsp 700,":a;chara\c_slag_h01.bmp",0,0:print 10,500
>The Chimera Slug bends over one youth, as she coils two tentacles around the other two.\
>Their clothes melt away due to the mucus.@
>As the sticky mucus rubs against their bare skin, all three get hard.\
name "Chimera Slug"
>Hehehe... Your penises got so big.@
>In truth, you all wanted me to suck on you, right?\
name ""
mov %hseanwave,20:hseanwave
>She puts a tentacle over each crotch of the two struggling youths.@
>As soon as they suck in their penises, she starts sucking on them.\
>They're already writhing in her embrace, but the true sucking has yet to start...\
name "Chimera Slug"
>Well then, I'll suck you all one after another.@
>First is you...\
name ""
name "Youth A"
>Ahh! Stop!@
>W...What's that!?\
name ""
>The youth on the left suddenly shouts in surprise.@
>The tentacle sucking on him suddenly changes its motion.\
lsp 690,":a;chara\c_slag_ct01.bmp",0,0:print 10,500
>The sensation he feels is like one of being inside a ball of soft flesh.@
>Having never felt anything like it before, he starts moaning.\
name "Youth A"
>It feels... It feels...@
>Ahhh!\
name ""
name "Chimera Slug"
>I can change the shape and texture of my membrane as I wish.@
>So I can use any design I want for the inside of my semen sucking tentacles...\
name ""
name "Youth A"
>Urhg... Ahhh!\
name ""
>Little by little, her elastic flesh squeezes and releases the youth's penis.\
>As the soft pressure attacks his penis from every side, he moans and writhes in complete ecstasy.\
name "Youth A"
>N...No... Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\c_slag_h02.bmp",0,0
lsp 690,":a;chara\c_slag_ct02.bmp",0,0
gosub *syasei2
>And in no time, he comes, spraying his semen right into her sucking tentacle.\
name "Chimera Slug"
>How disappointing, you pitiful boy...@
>Well then, I'll finish sucking everything else out.\
name ""
name "Youth A"
>S...St... Hyaaa!\
name ""
>Changing the interior shape of her tentacle, the Chimera Slug starts to spin the interior of her membrane.\
>As if he was caught in a mixer, the sticky mucus swirls and rotates at an incredible pace around his sensitive penis.\
name "Youth A"
>Hyaaa!\
name ""
gosub *syasei1
lsp 690,":a;chara\c_slag_ct03.bmp",0,0
gosub *syasei2
>In only seconds, he sprays out more semen for the Chimera Slug to consume.@
>But even with that, she doesn't stop the mixer-like tentacle.\
name "Chimera Slug"
>Come on, hurry up and give it all to me.@
>Dedicate all of your semen to me, and be finished...\
name ""
name "Youth A"
>Ah...!@> Ahhh!!\
name ""
gosub *syasei1
lsp 690,":a;chara\c_slag_ct04.bmp",0,0
gosub *syasei2
>Caught by the Chimera Slug's tentacle, he is squeezed without mercy.@
>His semen erupts in large amounts into her, one orgasm after another.\
name "Youth A"
>Ah...aaa...\
name ""
>Coming one time after another, the youth quickly weakens.@
>After what seems like an eternity of continuous ejaculation, he tragically meets his end.\
mov %hseanwave,0:hseanwave
name "Chimera Slug"
>Hehe... That's one.@
>Now you're next.\
name ""
name "Youth B"
>Ahhh!@>Stop, stop it!\
name ""
>The youth screams in horror at seeing his friend sucked to death in front of his eyes.\
>His eyes go wide with the realization that the same thing is about to happen to him.\
>Despite his fear and despair, his penis is completely hard.@
>As if it wanted to be sucked and drained dry...\
name "Chimera Slug"
>I'll give you a different kind of pleasure...\
name ""
name "Youth B"
>Wh...What is this!?@
>Ahhh!\
name ""
mov %hseanwave,21:hseanwave
lsp 690,":a;chara\c_slag_ct11.bmp",0,0:print 10,500
>The inside of her narrow tentacle suddenly changes, turning the hole into an angular one.\
name "Chimera Slug"
>This feels good too, doesn't it?@
>Now meet your end while tasting it...\
name ""
name "Youth B"
>I...It feels good...@
>B...But I don't want this!\
name ""
>The soft, elastic sensation of her curved interior is unlike anything he has ever felt before.\
>Despite his mind's defiance, his penis and body rejoice in ecstasy at the new sensation.\
name "Youth B"
>N...No... I'm coming!\
name ""
gosub *syasei1
lsp 700,":a;chara\c_slag_h03.bmp",0,0
lsp 690,":a;chara\c_slag_ct12.bmp",0,0
gosub *syasei2
>Almost immediately, he comes inside her curved tentacle.\
name "Youth B"
>N...No... Help me...@
>Let me live...\
name ""
name "Chimera Slug"
>I'll suck that life out too...@
>Meet your end while writhing in pleasure...\
name ""
name "Youth B"
>Noo!@> I don't want to die!@
>Ahhhh!\
name ""
>Ignoring his pleas, the Chimera Slug continues to force pleasure into the youth.@
>Slowing moving her tentacle back and forth, she starts to pump his penis like a piston.\
>The tip of his penis rubs hard against her soft, curved walls with each thrust, bringing overwhelming stimulation with each cycle.\
name "Youth B"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 690,":a;chara\c_slag_ct13.bmp",0,0
gosub *syasei2
>Unable to take this new pleasure, he comes instantly, giving his semen over to the Chimera Slug.@
>Even as he comes, she starts rotating her interior again, spinning her fleshy walls around his penis.\
name "Youth B"
>Ahhhhgggg!!\
name ""
>Spinning around his penis and still pumping him, the Chimera Slug sends the youth into convulsions as he orgasms one time after another.\
gosub *syasei1
lsp 690,":a;chara\c_slag_ct14.bmp",0,0
gosub *syasei2
>Spurt after spurt, the youth's semen flows into the Chimera Slug's tentacle.@
>The same as his lifeblood, his body gets weaker and weaker with each ejaculation.\
name "Youth B"
>A....u...\
name ""
>After a final twitch, he stops moving.\
mov %hseanwave,0:hseanwave
csp 690
lsp 700,":a;chara\c_slag_h04.bmp",0,0:print 10,500
name "Chimera Slug"
>...That makes two.@
>Sorry for the wait, it's your turn now.\
name ""
>Throwing away the other two bodies, the Chimera Slug turns her gaze to the final youth underneath her.\
name "Youth C"
>Ahhh!@
>Nooo!\
name ""
>At last, his turn had come.@
>Despair floods the youth's mind.\
>Contrary to his feelings, his penis is still hard.@
>Despite knowing he'll be squeezed to death, he can't stop his male instinct.\
name "Chimera Slug"
>How do you want to be drained?@
>The ball of flesh?@> The curved hole?@
>Either one is heaven...\
name ""
name "Youth C"
>Ahh... I don't want either!\
name ""
name "Chimera Slug"
>In that case... I'll let you taste both.\
name ""
name "Youth C"
>H...Hel...@> Ahhh!\
name ""
mov %hseanwave,20:hseanwave
lsp 700,":a;chara\c_slag_h05.bmp",0,0
lsp 690,":a;chara\c_slag_ct01.bmp",0,0:print 10,500
>The Chimera Slug forces the youth's penis into a ball of her elastic flesh.@
>The soft sensation of her walls push against his penis in every direction, surprising him with how good it feels.\
name "Youth C"
>Ahh...\
name ""
>His body shakes with the first hints of ecstasy.\
gosub *syasei1
lsp 700,":a;chara\c_slag_h06.bmp",0,0
lsp 690,":a;chara\c_slag_ct02.bmp",0,0
gosub *syasei2
>And just from insertion, he comes.@
>Only seconds after being inside, and he already reached an unsatisfying climax.\
name "Youth C"
>Haa...\
name ""
mov %hseanwave,0:hseanwave
name "Chimera Slug"
>Hehe... That was quick.@
>Did you get excited watching the other two get squeezed to death?\
>Be happy, for you'll get to experience it too.@
>Next, taste the tight squeezing...\
name ""
name "Youth C"
>Ahhh...\
name ""
>The Chimera Slug pulls his penis out of the ball of flesh...@
mov %hseanwave,21:hseanwave
lsp 700,":a;chara\c_slag_h07.bmp",0,0
lsp 690,":a;chara\c_slag_ct11.bmp",0,0:print 10,500
>And this time uses the other tentacle on him!\
name "Youth C"
>Ahhh!\
name ""
>More intense than before, the curved insertion forces a moan out of the youth.\
>On top of that, the wet and elastic sensation of her walls against the tip of his penis as he slips inside is too much for him already.\
name "Youth C"
>N...No... Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\c_slag_h08.bmp",0,0
lsp 690,":a;chara\c_slag_ct12.bmp",0,0
gosub *syasei2
>He reaches another orgasm in no time.\
>Assaulted by the pleasure of an organ designed to do nothing but force pleasure into men, there was nothing he could do.\
name "Chimera Slug"
>Hehe... Which one was better?@
>Which way do you want your life sucked up?\
>If you can't decide, I'll do one of each again.@
>Hehe... It's almost like you're being gang-raped.\
name ""
lsp 700,":a;chara\c_slag_h06.bmp",0,0
lsp 690,":a;chara\c_slag_ct02.bmp",0,0:print 10,500
>She pulls his penis out of the curved tentacle, still dripping with his semen.@
>Switching with her other tentacle, she starts squeezing his penis as soon as it's inside the ball of flesh.\
name "Youth C"
>Hyaaa...\
name ""
gosub *syasei1
lsp 700,":a;chara\c_slag_h09.bmp",0,0
lsp 690,":a;chara\c_slag_ct03.bmp",0,0
gosub *syasei2
>Again, he comes inside, giving his semen to the Chimera Slug.\
name "Chimera Slug"
>You come so quickly...@
>But you seem to have more vitality than the common man.\
>Here, next is this again...\
name ""
lsp 700,":a;chara\c_slag_h08.bmp",0,0
lsp 690,":a;chara\c_slag_ct12.bmp",0,0:print 10,500
>She pulls him out of the ball, and switches tentacles again.@
>This time, she spins the curved tentacle around his penis as soon as he's inside.\
name "Youth C"
>Ahhh...\
name ""
gosub *syasei1
lsp 700,":a;chara\c_slag_h10.bmp",0,0
lsp 690,":a;chara\c_slag_ct13.bmp",0,0:print 10,500
gosub *syasei2
>The youth's body jerks as he comes again, spraying his semen into her spinning tentacle.\
lsp 700,":a;chara\c_slag_h09.bmp",0,0
lsp 690,":a;chara\c_slag_ct03.bmp",0,0:print 10,500
>This time, as soon as he ejaculates, she quickly switches to the other tentacle.\
name "Chimera Slug"
>Ahaha, are you almost done?@
>Look, it's already so dirty with your semen...\
name ""
>Wrapping up his penis, she squeezes and wriggles her ball of flesh around him, attacking his sensitive penis with overwhelming stimulation.\
name "Youth C"
>N...No more...@
>Ahh...\
name ""
gosub *syasei1
lsp 700,":a;chara\c_slag_h11.bmp",0,0
lsp 690,":a;chara\c_slag_ct04.bmp",0,0
gosub *syasei2
>He comes, spraying more of his very life itself deep into her tentacle.@
>The youth pales, knowing his end is drawing near.\
name "Youth C"
>No more... Help me...@
>Ahhh...\
name ""
name "Chimera Slug"
>Hehe... You're the first to have lived through five orgasms.@
>But the next will send you to heaven.\
>I've decided which tentacle you'll die in for you.@
>I'll be taking your life now...\
name ""
name "Youth C"
>Haa... No... No...\
name ""
lsp 700,":a;chara\c_slag_h10.bmp",0,0
lsp 690,":a;chara\c_slag_ct13.bmp",0,0:print 10,500
>The Chimera Slug ruthlessly sucks in his penis again.@
>As soon as he felt that final pleasure, the youth comes.\
name "Youth C"
>I...It feels so good...\
name ""
gosub *syasei1
lsp 700,":a;chara\c_slag_h12.bmp",0,0
lsp 690,":a;chara\c_slag_ct14.bmp",0,0
gosub *syasei2
>The youth's body spasms as he comes, until...\
name "Youth C"
>Ah... Urhg...\
name ""
>With a final moan, he stops.@
>At the same time, his semen stops spurting out.\
mov %hseanwave,0:hseanwave
csp 690
lsp 700,":a;chara\c_slag_st01.bmp",0,0:print 10,500
name "Chimera Slug"
>Haha... That makes three.@
>They all tasted so delicious...\
name ""
>The Chimera Slug smiles as she looks at the three bodies, happy with her full stomach.\
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_etc6,1
bgm "bgm\kiki3.ogg"
name "Luka"
>Death Sword Chaos Star!\
name ""
wait 500
dwave 1,"se\slash.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
dwave 2,"se\slash.ogg"
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
dwave 3,"se\slash.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
csp 2:print 10,1000
>In the next moment, innumerable slashes lash out at the Chimera Slug, slamming into her from a sword-wielding shadow.\
name "Chimera Slug"
>Wh... Ahhhg!\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Unable to resist at all, she is sealed into the form of a slug!\
name "Luka"
>Damn it, I didn't make it in time!?\
name ""
>I look helplessly at the three bodies before me.@
>If only I was a little bit sooner!\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>No, the damage isn't over yet!@
>Don't worry about it, there are still more enemies!\
name ""
name "Luka"
>Yeah!\
name ""
>I don't have time to mourn my powerlessness.@
>I have to defeat the threat in front of me!\
name "Alice"
>The next opponent is two blocks down.@
>There are a few of them...@> Huh? Are they fighting?\
name ""
name "Luka"
>It doesn't matter, let's go!\
name ""
>Whether it's to help just one person or many, Alice and I rush toward the next enemy.\
dwave 1,"se\asioto4.ogg"
sean_change "bg018"
bgm "bgm\kiki2.ogg"
lsp 700,":a;chara\c_tentacle_st01.bmp",0,0:print 10,500
name "Chimera Tentacle"
>Don't get in our way you little kids!\
name ""
dwave 1,"se\karaburi.ogg"
lsp 700,":a;chara\pramia_st03.bmp",-180,0
lsp 701,":a;chara\c_tentacle_st01.bmp",180,0:print 10,500
name "Tiny Lamia"
>Hyaa!\
name ""
>With a single blow of her tentacle, Tiny Lamia is tossed to the side.@
dwave 1,"se\down.ogg"
>She slams into the wall, and slumps to the ground.\
lsp 700,":a;chara\vgirl_st03.bmp",-180,0:print 10,500
name "Vampire Girl"
>Damn you!\
name ""
>Vampire Girl jumps overhead, aiming at the Chimera Tentacle's head...@
dwave 1,"se\ero_makituki2.ogg"
>But her body is quickly wrapped by tentacles and bound.\
lsp 700,":a;chara\dragonp_st03.bmp",-180,0:print 10,500
name "Dragon Pup"
>Uga!@> Get off her!\
name ""
>Dragon Pup bites down on the Chimera's tentacle...@
dwave 1,"se\ero_makituki2.ogg"
>But she too is quickly wound up.\
lsp 700,":a;chara\vgirl_st03.bmp",-270,0
lsp 701,":a;chara\dragonp_st03.bmp",10,0
lsp 702,":a;chara\c_tentacle_st01.bmp",270,0:print 10,500
name "Chimera Tentacle"
>Sheesh... Such irritating little girls.@
>I'll strangle you to death...\
name ""
dwave 1,"se\ero_simetuke1.ogg"
name "Vampire Girl"
>Ahh!\
name ""
name "Dragon Pup"
>Ugaga!\
name ""
>Putting strength into her tentacles, she starts to choke the girls.@
>They let loose groans of pain.\
name "Chimera Tentacle"
>Hehehe, it's painful, isn't it?@
>I'll crush your bones, and send you to the next world...\
name ""
>As she's about to put even more power into her tentacles...@
dwave 1,"se\slash.ogg"
>The tentacles holding the girls are cut!\
r@k@\
cspl 700,702
goto *c_tentacle_start



*sean0317

bgm "bgm\kiki3.ogg"
name ""
r@k@\
name "Chimera Tentacle"
>No, not yet!@
>I will not be beaten with that...!\
name ""
name "Luka"
>You still aren't giving up?\
name ""
dwave 1,"se\ero_makituki1.ogg"
>One of her tentacles squirms on the ground toward Vampire Girl...@
>But she grabs hold of it!\
lsp 700,":a;chara\vgirl_st03.bmp",-180,0
lsp 701,":a;chara\c_tentacle_st03.bmp",180,0:print 10,500
name "Vampire Girl"
>Ha!\
name ""
>Vampire Girl pulls with all her might...@
dwave 1,"se\down.ogg"
>And the Chimera Tentacle is knocked to the ground!\
name "Chimera Tentacle"
>Guh...!@>You little...\
name ""
lsp 700,":a;chara\vgirl_st03.bmp",-270,0
lsp 701,":a;chara\dragonp_st03.bmp",10,0
lsp 702,":a;chara\c_tentacle_st01.bmp",270,0:print 10,500
name "Dragon Pup"
>Uga!\
name ""
name "Vampire Girl"
>Damn you!\
name ""
>The two monster girls jump on the fallen Chimera Tentacle!\
dwave 1,"se\dageki.ogg"
wait 200
dwave 2,"se\dageki.ogg"
wait 400
dwave 3,"se\fire1.ogg"
>Tiny Lamia is slapping her face with her tail, and Dragon Pup is breathing fire into her stomach.\
name "Luka"
>O...Oi!\
name ""
lsp 700,":a;chara\pramia_st03.bmp",-270,0
lsp 701,":a;chara\dragonp_st03.bmp",10,0
lsp 702,":a;chara\c_tentacle_st01.bmp",270,0:print 10,500
name "Tiny Lamia"
>Leave this to us!@
>You need to beat the angel going wild in the town square!\
name ""
name "Dragon Pup"
>Uga!@> That angel has to be the boss!\
name ""
name "Chimera Tentacle"
>Guh... Get off me, you small frys!\
name ""
dwave 1,"se\karaburi.ogg"
>Her tentacles feebly lash out, but don't hit any of the three thrashing monster girls.@
>She's much weaker now, but is it really alright to leave her to these three...?\
name "Tiny Lamia"
>Hurry up!@
>Before everyone in town is attacked by the angel!\
name ""
name "Dragon Pup"
>We'll finish her off no matter what!@
>Ugagagaga!\
name ""
name "Luka"
>Got it... Don't do anything rash!\
name ""
>If they're willing to go that far, then there's no arguing.@
>I head toward the square, where they said the leader was...\
dwave 1,"se\asioto4.ogg"
sean_change "bg017"
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\mob_sensi1.bmp",-170,0
lsp 701,":a;chara\mob_seinen2.bmp",170,0:print 10,500
name "Soldier A"
>Ahh...\
name ""
name "Soldier B"
>Haa...\
name ""
>Ten soldiers are laying on the ground around the fountain in the center of the town...@
>And the one in the middle of them...\
r@k@\
cspl 700,701
goto *mariel_start



*sean0318

bgm "bgm\kiki2.ogg"
name ""
r@k@\
name "Luka"
>Eh...?@
>Did the rest of the attackers run away after she was beaten?\
name ""
>After their leader was taken down, the monsters sieging the city all start to withdraw.\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>That angel said she was the leader of the Iliasburg assault forces.@
>It seems our enemies are very sensitive to breaks in their chain of command.\
name ""
name "Luka"
>I see... So it's quickest to aim right for the leader.\
name ""
>As I put away my sword with a sigh...\
bgm "bgm\epilogue2.ogg"
lsp 700,":a;chara\dragonp_st13.bmp",-250,50
lsp 701,":a;chara\vgirl_st13.bmp",0,50
lsp 702,":a;chara\pramia_st13.bmp",250,50:print 10,500
name "Dragon Pup"
>You did it!\
name ""
name "Vampire Girl"
>Kuku... We showed her why she should fear us!\
name ""
>The three girls, with fresh wounds on their bodies, appear.@
>Behind them, they're dragging the Chimera from before, only tied up.\
>It looks like they managed to beat and capture her.\
name "Tiny Lamia"
>Thank you, you saved us.@
>I don't know what would have happened if you had not showed up...\
name ""
name "Luka"
>No, no, you three did great!\
name ""
lsp 700,":a;chara\dragonp_st11.bmp",-250,50
lsp 701,":a;chara\vgirl_st11.bmp",0,50
lsp 702,":a;chara\pramia_st11.bmp",250,50:print 10,500
>After I said that, their faces cloud over.@
>It looks like their elation in victory is over.\
name "Dragon Pup"
>Ugaga...@> It's so frustrating...@
>We would have been defeated.\
name ""
name "Vampire Girl"
>We weren't useful at all...@
>We wanted to protect everyone in town...\
name ""
name "Luka"
>.........\
name ""
>The three of them seem very aware of their relative weaknesses.@
>Even though there were only a few victims, they're still in deep shock.\
cspl 701,702
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>If you're frustrated, then train for the future.@
>A long time ago, this fake Hero was throwing salt at slugs in a panic you know?\
name ""
name "Luka"
>L...Let's not bring up old stories.\
name ""
lsp 700,":a;chara\alice_st72.bmp",0,50:print 10,500
name "Alice"
>But after he trained and practiced, eventually even the spirits respected him.@
>He even brought out the power of angels.@> He's truly grown into a fine half human!\
name ""
name "Luka"
>...Was that a compliment!?\
name ""
>Before I had noticed it, the town square was filling with people.@
>After the menace was driven away, the scared townsfolk came out of their houses.\
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\mob_obasan.bmp",160,0:print 10,500
name "Owner"
>Oh? It was you two after all.@
>Just like before, we owe you a lot.\
name ""
name "Alice"
>Yes.@> After all that fighting, we are awfully hungry...\
name ""
name "Owner"
>Oh my, you grew a lot smaller!@
>You'll need to eat a lot of these Dangos and get bigger quick!\
name ""
lsp 700,":a;chara\alice_st79.bmp",-170,50
lsp 701,":a;chara\mob_obasan.bmp",160,0:print 10,500
name "Alice"
>Amamadangos! \
name ""
>Alice eagerly takes the food, and starts happily devouring them.\
name "Owner"
>You all need your reward, too.@
>You fought so hard, you must replenish your energy!\
name ""
lsp 701,":a;chara\alice_st79.bmp",-300,50
lsp 700,":a;chara\dragonp_st11.bmp",-140,50
lsp 702,":a;chara\vgirl_st11.bmp",110,50
lsp 703,":a;chara\pramia_st11.bmp",320,50:print 10,500
name "Dragon Pup"
>Thank you...\
name ""
name "Vampire Girl"
>Delicious... *Munch* *Munch*\
name ""
>The girls stuff their mouths with food, still looking depressed.@
>It's good to rest for a bit, but we can't stay here forever.\
cspl 701,703
lsp 700,":a;chara\mob_obasan.bmp",0,0:print 10,500
name "Luka"
>...Well then, we're off.@
>There may be other places under attack now, too.\
name ""
name "Owner"
>Being a Hero is so busy...@
>Be careful!\
name ""
name "Luka"
>I will!@
>...Alice! How long are you going to keep eating?\
>You're coming too!\
name ""
lsp 700,":a;chara\alice_st76.bmp",0,50:print 10,500
name "Alice"
>My Amamadangos...\
name ""
>Alice looks back forlornly as we hop on Galda's back.@
>Now for our next destination...\
r@k@\
mov %ivent01,2
mov %gloval1_story_sinkou,13:gosub *savegloval1
bgm "bgm\field4.ogg"
goto *map8



*sean0319

bgm "bgm\kiki2.ogg"
sean_change "bg220"
gosub *setwindow_01p
lsp 700,":a;chara\mob_syounen.bmp",-230,0
lsp 701,":a;chara\c_prison_st01.bmp",180,0:print 10,500
name "Chimera Prison"
>Hehe... Caught you, boy.@
>What an unexpected delight to find prey such as you in this bird village...\
name ""
name "Young Boy"
>L...Let me go!@
>Let me out of here!\
name ""
>The young boy is stuck inside Chimera Prison's cage-like body.@
>Having just gone a little ways away from the village, he got caught.\
name "Chimera Prison"
>Let me teach you, boy...@
>The pleasures of being a man.\
name ""
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
csp 701
lsp 700,":a;chara\c_prison_h1.bmp",0,0:print 10,500
>The tentacles inside the prison start moving all at once.@
>Dripping with mucus, they run and rub all over the boy's body.\
name "Young Boy"
>Ah... Stop it...@
>Ah... Nnnnn...\
name ""
>Crawling all over his body, her warm, sticky mucus quickly covers him.@
>Even though the boy is scared and whimpering, his body is showing a reaction.\
>His penis suddenly starts swelling bigger.\
name "Chimera Prison"
>Ahaha... Your small penis suddenly got bigger.@
>This small penis is now the prey of my tentacles...\
name ""
>The Chimera brings up a tentacle in front of the boy's eyes.@
>Opening the mucus covered hole, she shows him what it looks like inside.\
name "Chimera Prison"
>How do you think this would feel?\
name ""
name "Young Boy"
>D...Disgusting...\
name ""
>The boy looks inside, seeing strange, wavy walls inside the tentacle, all dripping with mucus.@
>Even deeper inside, there even looks like a little tongue waving around.\
>It's obviously intended for "insertion".@
>If the boy was a little older, he would have known instantly...\
>But with his complete lack of knowledge, it just looks disgusting.\
name "Chimera Prison"
>Hehe... You still don't know of the joys of pleasure.@
>This tentacle will suck in your penis...\
name ""
name "Young Boy"
>S...Stop!@>Don't eat my penis!\
name ""
>The boy trembles in terror.\
>Thinking about how his expression will soon turn to sheer pleasure, the Chimera can't help but smile.\
name "Chimera Prison"
>Now then, I'll teach you the joys of being a man.@
>I'll give you a good taste of ejaculation for your first time...\
name ""
name "Young Boy"
>N...No!\
name ""
mov %hseanwave,22:hseanwave
lsp 700,":a;chara\c_prison_h2.bmp",0,0:print 10,500
>As the boy struggles, the tentacle sucks in his still developing penis.\
name "Young Boy"
>Hyaaaa!!\
name ""
>The terrorized boy's face suddenly slips from fear into one of confusion.@
>Then after a few seconds, his face starts to relax into one of pleasure.\
lsp 690,":a;chara\c_prison_ct01.bmp",0,0:print 10,500
>The tongues inside the tentacle start licking his penis at the same time.@
>The soft, wavy walls rub and stroke his small thing, too.\
>It's enough to force even adult men to orgasm in seconds.@
>The young boy, even with his foreskin still covering his glans, is instantly overwhelmed.\
name "Young Boy"
>What... Is this... My penis feels so good...\
name ""
name "Chimera Prison"
>Hehe, I'll peel it back...@
>Your foreskin covered glans will feel the sensation directly.\
name ""
lsp 690,":a;chara\c_prison_ct02.bmp",0,0:print 10,500
>The tongue inside her tentacle skillfully peels the foreskin off his glans.@
>As soon as it's off, the same tongue starts to lick and stroke his tip.\
>Having this incredibly sensitive area touched for the first time in his life, the boy's reason is instantly blown away by the pleasure.\
name "Young Boy"
>Ahhhh!!\
name ""
>A strange desire to release flows through the young boy's body.@
>Not knowing what it is, he relaxes and gives himself over to that sensation.\
gosub *syasei1
lsp 690,":a;chara\c_prison_ct03.bmp",0,0
lsp 700,":a;chara\c_prison_h3.bmp",0,0
gosub *syasei2
>His small penis twitches, and unusually thick semen spurts out.@
>The young boy's first ever ejaculation is eagerly swallowed by the tentacle.\
name "Chimera Prison"
>Ahaha, look at it spurt...@
>My tentacle got your first ejaculation.\
name ""
lsp 700,":a;chara\c_prison_h4.bmp",0,0:print 10,500
name "Young Boy"
>Haaa...\
name ""
>With a loose face of pleasure, the boy stops struggling completely.@
>Forced to undergo an orgasm before he knows what it is, he's left stunned.\
mov %hseanwave,0:hseanwave
name "Chimera Prison"
>Now what should I do now...?@
>I could keep you inside of me forever...\
name ""
name "Young Boy"
>Haaa...\
name ""
>As the boy moans in a daze...\
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_etc1,1
bgm "bgm\kiki3.ogg"
csp 690
lsp 700,":a;chara\hapy_a_st31.bmp",-250,0
lsp 701,":a;chara\c_prison_st01.bmp",180,0:print 10,500
name "Harpy A"
>What are you doing!?@> Release him!\
name ""
name "Harpy B"
>What are you!?@
>I've never seen a monster like that before!\
name ""
>Two harpies rush toward the monster from the village.@
>Startled by the strange new monster, they shoot out of the sky at her like arrows.\
name "Chimera Prison"
>Hehehe, the bait for the birds worked.@
>Now to enjoy my next prey...\
name ""
name "Harpy A"
>We won't... Kya!\
name ""
lsp 700,":a;chara\hapy_a_st31.bmp",-250,0
lsp 701,":a;chara\c_medulahan_st02.bmp",180,0:print 10,500
name "Chimera Medullahan"
>Ahaha, which bird should I swallow whole first!?\
name ""
>An even stranger monster bursts out of the trees and jumps toward the harpies.@
>Landing on one of their backs, the strange monster with a snake-like body pins her down.\
name ""
name "Harpy A"
>S...Stop!@>Get off!\
name ""
dwave 1,"se\ero_makituki3.ogg"
>In moments, the new monster has completely bound the harpy.@
>Her wings are still flapping, but she isn't able to escape.\
>As the monster's detached head approaches her flapping body...\
name "Chimera Medullahan"
>Now for the first bite...\
name ""
>The detached head's mouth opens up wide...\
name "Luka"
>Thunder Thrust!\
name ""
dwave 1,"se\tuki.ogg"
>Before she can bite down, a powerful stabbing sword slams into her head!\
csp 701
lsp 700,":a;chara\c_medulahan_st03.bmp",0,0:print 10,500
name "Chimera Medullahan"
>Who... Who dares interfere with my meal!?\
name ""
>The monster's body quickly picks up the detached head, and spins back around.@
>Standing in front of her was...\
name "Luka"
>I won't let you touch either the humans or monsters of Happiness Village!@
>I'm your opponent!\
name ""
r@k@\
goto *c_medulahan_start



*sean0320

bgm "bgm\kiki3.ogg"
name ""
r@k@\
name "Luka"
>...Alright, that's one!\
name ""
>But there's no time for a break, there's another!\
lsp 700,":a;chara\hapy_a_st31.bmp",-250,0
lsp 701,":a;chara\c_prison_st01.bmp",180,0:print 10,500
>A harpy is fighting the cage-type monster.@
>The Chimera is moving around, trying everything she can to capture the harpy.\
>At the same time, the harpy is shooting arrows at the Chimera, doing everything she can to dodge.\
name "Luka"
>I'll back you up!\
name ""
>As I rush in to assist...\
name "Queen Harpy"
>No, I shall take care of this.\
name ""
dwave 1,"se\wind4.ogg"
bgm "bgm\battle2.ogg"
lsp 700,":a;chara\queenhapy_st11.bmp",-230,0
lsp 701,":a;chara\c_prison_st01.bmp",180,0:print 10,500
>Queen Harpy appears with a giant burst of wind.@
>The screaming wind slams right into the Chimera, knocking her down.\
name "Chimera Prison"
>Guh... If that's all you've got, I can still win!\
name ""
lsp 700,":a;chara\queenhapy_st12.bmp",-230,0:print 10,500
name "Queen Harpy"
>Did you really think that was the extent of a Queen's power?\
name ""
dwave 1,"se\wind3.ogg"
>As if cutting the sky, the Queen slashes her wing down.@
>At the same time, the violent wind turns into a powerful tornado.\
name "Chimera Prison"
>Guh!@> Ahhhh!!\
name ""
dwave 1,"se\slash.ogg"
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
>A powerful tornado of cutting wind slams right into the Chimera.@
dwave 1,"se\down.ogg"
csp 701:print 10,500
>Cutting her all over, the Chimera falls to the ground in seconds.\
name "Luka"
>A...Amazing...\
name ""
lsp 700,":a;chara\queenhapy_st12.bmp",0,0:print 10,500
>This is the power of the Queen Harpy when she's fighting someone who harms her people.\
>When I fought her, she didn't show any of that power...\
name "Queen Harpy"
>Quit hiding and get out here!@
>Did you think to try to draw out the main force and attack the village!?\
name ""
dwave 1,"se\escape.ogg"
lsp 700,":a;chara\queenhapy_st12.bmp",-230,0
lsp 701,":a;chara\c_beast_st01.bmp",200,0:print 10,500
>Drawn by the Queen's challenge, Chimeras appear from out of the trees.@
>Just like before, Ilias' army is attacking the village...\
name "Luka"
>What numbers... I'll help you!\
name ""
name "Queen Harpy"
>No, please leave this to me.@
>Angels have already invaded the village.\
>As you know, our attacks are not effective against them.@
>But with your sword...\
name ""
name "Luka"
>I got it, but...\
name ""
>Is it alright to leave this many to the harpies...?\
name "Queen Harpy"
>Do not worry, we are not powerless!@
>Everyone, take Large Wing Battle Formation!\
name ""
lsp 701,":a;chara\hapy_a_st31.bmp",160,0:print 10,500
name "Harpy A"
>Roger!\
name ""
>Following the Queen's orders, the harpies take up a strange fan-like formation.@
>All of them draw their bows at once.\
name "Queen Harpy"
>Fire arrows...@> Fire!\
name ""
dwave 1,"se\yumi.ogg"
wait 100
dwave 2,"se\yumi.ogg"
wait 100
dwave 3,"se\yumi.ogg"
>All of the flaming arrows release at once...@
dwave 4,"se\wind3.ogg"
>And at the same time, they flap their wings, creating a huge gust of wind!\
name "Luka"
>Uwa!\
name ""
>The gusts of wind created by the fan formation converges on the hail of arrows, drastically increasing their speed as they rain on the Chimeras.\
dwave 1,"se\fire1.ogg"
>At the same time, the flame from the arrows is kicked up and spreads into an intense firestorm by the wind, making it seem like a wall of flames are descending on the Chimeras.\
csp 701
lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
name "Alice"
>Large Wing Battle Formation...@> A battle style thought up by the previous Queen Harpy.\
>The incredible power of her military was her source of pride.\
name ""
lsp 700,":a;chara\queenhapy_st12.bmp",-200,0
lsp 701,":a;chara\hapy_a_st31.bmp",160,0:print 10,500
name "Queen Harpy"
>Second line!@> Fire!\
name ""
dwave 4,"se\wind3.ogg"
dwave 1,"se\yumi.ogg"
wait 100
dwave 2,"se\yumi.ogg"
wait 100
dwave 3,"se\yumi.ogg"
>More arrows are shot into the raging inferno.@
dwave 4,"se\fire1.ogg"
>The Chimeras who were too slow to get away are exposed to the violent hail of arrows and fire.\
name "Queen Harpy"
>Please, Hero Luka!@
>Leave this place to us, and get rid of the angels in the village!\
name ""
name "Luka"
>Got it, leave it to me!\
name ""
>The harpies should be fine here...@
>I turn around and run towards the village.\
dwave 1,"se\asioto1.ogg"
sean_change "bg221"
bgm "bgm\boss0.ogg"
name "Luka"
>...Are you the leaders!?\
name ""
lsp 700,":a;chara\trinity_st01.bmp",0,0
lsp 701,":a;chara\trinity_st11.bmp",0,0
lsp 702,":a;chara\trinity_st21.bmp",0,0:print 10,500
>Three angels are in the middle of the village.@
>They look so calm and gentle...\
cspl 701,702
lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
>But a naked young man is laying at their feet.@
>He doesn't seem injured, but...\
name "Boy"
>Ahhh...\
name ""
>His lower body is covered in semen, and he's moaning in ecstasy.@
>It looks like he was forced to orgasm numerous times, and his body is twitching...\
lsp 700,":a;chara\trinity_st01.bmp",0,0
lsp 701,":a;chara\trinity_st11.bmp",0,0
lsp 702,":a;chara\trinity_st21.bmp",0,0:print 10,500
>His pitiful appearance must be due to those angels!\
r@k@\
goto *trinity_start



*sean0321

bgm "bgm\kiki2.ogg"
name ""
r@k@\
name "Luka"
>Whew... I managed to win.@
>Did that break up the rest of the attack?\
name ""
>I sheathe my sword after defeating the three angels.@
>Like before, it seems as though the assault force falls apart without their leader...\
lsp 700,":a;chara\alice_st72.bmp",0,50:print 10,500
name "Alice"
>Yes, they seem to operate like a herd... They all fled.@
>Their weak point seems to be their leader, like expected.\
name ""
name "Luka"
>But... When the leader is an angel, that's hardly much of a weak point.@
>Only this one sword is able to damage them...\
name ""
>If it wasn't for Angel Halo, they would be invincible.@
>The towns and villages all over the world are in serious trouble.\
>It looks like the fighting will get even rougher from here on out...\
sean_change "bg024"
bgm "bgm\epilogue2.ogg"
lsp 700,":a;chara\queenhapy_st11.bmp",0,0:print 10,500
name "Queen Harpy"
>Thank you, Hero Luka.@
>Thanks to your actions, the enemy was able to be repelled...\
name ""
name "Luka"
>You don't need to thank me for anything...\
name ""
lsp 700,":a;chara\alice_st79.bmp",-170,50
lsp 701,":a;chara\queenhapy_st11.bmp",170,0:print 10,500
name "Alice"
>Oooh, sweet. \
name ""
>Alice happily licks some Happiness Honey a harpy gave her.@
>Sheesh... No matter how big or small she is, she acts the same way...\
name "Queen Harpy"
>But this situation is quite grave...@
>Every place is in danger, and even the Monster Lord is stuck like this...\
name ""
name "Luka"
>Alice, quit shoving food into your mouth.@
>You have honey dripping off your nose.\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50:print 10,500
name "Alice"
>Quit treating me like a child!\
name ""
name "Queen Harpy"
>...Anyway, we are going to prepare for a second enemy assault.@
>We don't wish to trouble you for your assistance.\
name ""
name "Alice"
>Queen Harpy...@> Can I have another pot of honey?\
name ""
name "Luka"
>Don't be greedy Alice.\
name ""
name "Alice"
>The mental condition is tied to the body's.@
>So for this body, it is manipulating my mind to act in a way appropriate for it...\
>So with that said...@> I want more sweets.\
name ""
name "Luka"
>Don't give me that, this is how you always are.\
name ""
name "Queen Harpy"
>...You two are quite amazing.@
>I'm unable to do anything but dwell on the dangers to come.\
name ""
name "Luka"
>We have to be off now.@
>People and monsters are in danger all over the world...\
name ""
name "Queen Harpy"
>At the present time, only you two may be able to protect the world.@
>May the fortunes of war ever be with you, Hero Luka and Monster Lord Alipheese.\
name ""
lsp 700,":a;chara\alice_st77.bmp",-170,50:print 10,500
name "Alice"
>I...I am not the Monster Lord!@
>J...Just a traveling gourmand!\
name ""
name "Luka"
>It's too late for that.\
name ""
name "Queen Harpy"
>O...Oh... Excuse me...@
>May the fortunes of war ever be with you, Fake Hero Luka and Traveling Gourmand Alipheese.\
name ""
name "Luka"
>You didn't really have to change my title you know...\
name ""
cspl 700,701:print 10,500
>With that, we depart from Happiness Village.@
>For our next destination...\
r@k@\
mov %ivent02,2
mov %gloval1_story_sinkou,13:gosub *savegloval1
bgm "bgm\field4.ogg"
goto *map8



*sean0322

sean_change "bg140"
gosub *setwindow_01p
name "Luka"
>Alright, let's go to Sentora!\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Did you finish everything you need to here in Ilias Continent?@
>We're in a hurry, so we won't be coming back later.\
>It might be a good idea to revisit the towns we saved to assess the damage, too...@
>But of course we don't want to waste too much time.\
name ""
csel "Go to Sentora",*sean0322b,"Not yet",*sean0322a



*sean0322a

csp 700:print 10,500
name "Luka"
>No, we still have some more here to do.\
name ""
>Now then, for our next destination...\
goto *map8



*sean0322b

csp 700:print 10,500
>We head north to Sentora.@
>In the southern area of the continent is the forest where I first met Sylph.\
>But before that...\
name "Luka"
>Let's go to San Ilia first.@
>I'm sure it's also under attack by Ilias...\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Inside a city of strict adherents to Ilias, it must be mass confusion.@
>Even though they were her favorite pets, I'm sure they were forsaken too...\
name ""
csp 700:print 10,500
>We head toward San Ilia.@
>What's going to be waiting for us there...?\
dwave 1,"se\habataki.ogg"
bgmstop
sean_change "bg001"
bgm "bgm\irias.ogg"
lsp 700,":a;chara\stein_st01r.bmp",-220,0
lsp 701,":a;chara\iriasu_st01.bmp",180,0:print 10,500
name "Ilias"
>Promestein... Are you feeling well?@
>After eating such a pitiful defeat, you show your face to me?\
name ""
name "Promestein"
>I'll erase that shame with my future work.@
>I've delivered all of my military power to the ground invasion forces.\
name ""
name "Ilias"
>All of it?@
>You truly entrusted everything to Eden's command?\
name ""
name "Promestein"
>Yes...@> With the exception of the five Next Dolls.@
>According to the original plan, they will be used under my direction as the situation commands.\
name ""
name "Ilias"
>I see...@> Do not disappoint me.@
>Never forget the debt you owe me for forgiving your grave sin.\
name ""
name "Promestein"
>Of course, I will never forget my debt to you.\
name ""
name "Ilias"
>Then go, Angel Promestein.@
>Do not fail me.\
name ""
lsp 700,":a;chara\stein_st03.bmp",-220,0:print 10,500
name "Promestein"
>Yes...\
name ""
if %ivent05=0 goto *sean0325x
bgmstop
sean_change "bg042"
bgm "bgm\kiki3.ogg"
>In the sky above San Ilia...@
>Looking below, we can see Chimeric Beasts already flooding the town.@> It seems the town is already in a state of chaos...\
name "Luka"
>Oh no...@> They already broke through the walls!?@
>Let's go, Alice!\
name ""
lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
name "Alice"
>Right!\
name ""
csp 700
bg "bg\bg048.bmp",10,500
>We jump off Galda's back into the town.@
>As soon as we land, we see confusion and chaos all around us.\
lsp 700,":a;chara\mob_seinen1.bmp",-200,0
lsp 701,":a;chara\c_bug_st01.bmp",200,0:print 10,500
name "Chimera Bug"
>Ahaha... Hey, you...@
>Please seed my eggs!\
name ""
name "Boy"
>Ahhh!@>Help me!\
name ""
>An insect-like monster is violently doing whatever she wants.@
>It seems like she's aiming specifically at men, trying to pin them to the floor...\
name "Chimera Bug"
>Ahaha... I'm going to rape you! \
name ""
name "Boy"
>Uwaaa!@
>Ilias, please help me!\
name ""
>The boy in front of me starts to struggle for his life.\
>He's appealing to the Goddess in this situation...@
>The same one who ordered it to happen!\
r@k@\
csp 701
goto *c_bug_start



*sean0323

bgm "bgm\kiki3.ogg"
r@k@\
name "Luka"
>Whew... Finally one down.\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>There are too many, this will take forever.@
>We have to aim for the leader...@> What's wrong, Luka?\
name ""
name "Luka"
>That girl...@> Could it be?\
name ""
bgm "bgm\kiki2.ogg"
csp 700:print 10,500
>As the town is in chaos with people running in confusion...@
lsp 700,":a;chara\sisterlamia_st04.bmp",0,0:print 10,500
>I see a lone Lamia moving down the street with a calm expression.\
>It looks like she's heading toward San Ilia Castle.@
>I'm sure I've seen her before!\
name "Luka"
>Hold up!\
name ""
lsp 700,":a;chara\sisterlamia_st01r.bmp",0,0:print 10,500
name "Sister Lamia"
>Oh my...@> You're that Hero from before.\
name ""
>The Lamia turns around and looks at me with a gentle smile.\
>...There's no doubt about it.@
>She was the one I met on the road near Grand Noah.\
name "Luka"
>Why are you here...?\
name ""
name "Sister Lamia"
>I'm here for relief, of course.@
>The priests of San Ilia were attacked by angels, and are suffering.\
name ""
name "Luka"
>You came to help too!?\
name ""
name "Sister Lamia"
>Yes... I received a revelation from Goddess Ilias.@
>I need to come and release the suffering priests.\
name ""
name "Luka"
>Wh...What do you mean!?\
name ""
>I'm left shocked by her words.\
r@k@\
goto *sisterlamia_start



*sean0324

bgm "bgm\kiki2.ogg"
name ""
r@k@\
name "Luka"
>I did it...@
>But it feels wrong.\
name ""
>The monsters who had faith in Ilias...@
>Not only fighting against angels and Chimeric Beasts, but them as well?\
>No, there are also others too.@
>The ones who rebelled against Alice, and are following Black Alice instead.\
>It's not just angels and Chimeric Beasts at all...\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Don't worry, you didn't take her life.@
>Our top priority is to stop as many deaths as possible.\
name ""
name "Luka"
>Yes, I know.@
>And that Lamia was heading to San Ilia Castle, wasn't she?\
name ""
>The castle is likely in chaos right now too...@
>I wonder if the King is still safe?\
name "Luka"
>Alice, let's hurry to the castle!@
>If the King is attacked by angels, all of the believers will lose morale!\
name ""
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>The pious believers would probably commit mass suicide if they saw that...@
>But it would be better for me not to go into the castle.\
>The hearts of the citizens here are not as big as yours...@
>Especially not those who believed strongly in Ilias.\
name ""
name "Luka"
>I hate to admit it, but you might be right...@
>Alice, please deal with the Chimeric Beasts attacking here then!\
name ""
lsp 700,":a;chara\alice_st72.bmp",0,50:print 10,500
name "Alice"
>Yes, leave them to me!@
>I'll finish them all off before you even beat the leader!\
name ""
dwave 1,"se\asioto1.ogg"
>Leaving the town area to Alice, I rush toward the castle.@
>Running past groups of Chimeric Beasts, I head straight toward the King.\
dwave 1,"se\asioto1.ogg"
sean_change "bg044"
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\mob_heisi1.bmp",-200,0
lsp 701,":a;chara\catoblepas_st01.bmp",160,0:print 10,500
name "Soldier"
>Guh...@> You won't pass through here!\
name ""
>A huge Chimeric Beast approaches the throne room.@
>All that stands in her way is a lone guardsman.\
>Everyone other than him has already been taken down by the invading forces...\
name "Catoblepas Girl"
>Don't trouble me.@
>I want to dispose of the King as quickly as possible.\
>After that, I'll clean out the priests hiding in the temple.@
>Every last one of those unappetizing people.\
name ""
name "Soldier"
>Urhg!\
name ""
>The soldier steps back, recoiling from the huge, sinister looking monster in front of him.@
>But he knows if he runs here, the King is as good as dead.\
name "Soldier"
>Hya!\
name ""
dwave 1,"se\tuki.ogg"
>The soldier pulls his spear back and thrusts as hard as he can!@
>But the spear tip just bounces off her body, not even making a scratch!\
goto *sean0324a



*sean0324a

name "Catoblepas Girl"
>But... You look quite appetizing.@
>I'll get a good taste of you, my young strong soldier...\
name ""
dwave 1,"se\ero_makituki3.ogg"
>A tentacle shoots out from the Chimera's mouth.\
name "Soldier"
>Ah... Uwaa!\
name ""
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
csp 701
lsp 700,":a;chara\catoblepas_h1.bmp",0,0:print 10,500
>The tentacle wraps around the soldier's body, and starts dragging him into her mouth.\
>With his lower body stuck in her mouth, the Chimera's tentacles start rubbing and playing with her catch, all while covering him with her digestive juices.\
name "Catoblepas Girl"
>It won't hurt, don't be afraid...@
>My mouth doesn't have teeth to bite my prey.\
>I'll just cover you with my digestive juices and dissolve you alive...@> You'll be my food.\
name ""
>The armor and clothes that come into contact with the juices quickly melt away, leaving only his bare skin showing.\
name "Soldier"
>Hya!@> S...Stop!\
name ""
>The soldier struggles with everything he has, but he can't escape.@
>At this rate, he will just be eaten alive...\
name "Catoblepas Girl"
>...Being eaten alive is quite miserable, isn't it?@
>Here, I'll make you feel good before you die...\
name ""
name "Soldier"
>W...What are... Ah...\
name ""
mov %hseanwave,11:hseanwave
>One of the tentacle's tips opens up, and races toward the soldier's groin.@
>Sucking in his penis, it quickly clamps down and starts making chewing motions on his penis.\
>The inner walls rub and massage his erect penis, instantly distracting him off of his impending death.\
name "Soldier"
>Ahhhh!!\
name ""
name "Catoblepas Girl"
>Before I eat you, I'll make you come just once...@
>With that you'll be able to die with no regrets, right?\
name ""
>The tentacle starts to make sucking motions, bringing intense pleasure to the struggling soldier.@
>As the folds inside the tentacle suck on him, the ribbed walls rub against his glans, forcing him to moan.\
>It felt exactly like it was eagerly trying to devour his penis...\
name "Soldier"
>Stop... Any more and...@
>Ahhh...\
name ""
>The tentacle is normally used for sucking up the prey's dissolved meat...\
>But as the soldier is experiencing, it can also be used to force prey to orgasm.\
>The horrifyingly powerful suction is already bringing him to his limit...@
>Unable to take it any longer, he relaxes his waist and gives himself over to the sweet sensation spreading through his body.\
name "Soldier"
>C...Coming... Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>The soldier's body spasms as he comes, shooting out large amounts of semen into the sucking tentacle's mouth.\
>After his orgasm is done, he goes completely limp, drained of strength.\
name "Catoblepas Girl"
>It felt good, didn't it?@
>Well then, next is my turn...\
name ""
>With that death sentence, innumerable tentacles reach out and spray digestive juices over the rest of his body.\
>Rubbing and massaging his entire body, they cover him from foot to toe...\
name "Soldier"
>Ahhhh!!\
name ""
lsp 700,":a;chara\catoblepas_h2.bmp",0,0:print 10,500
>The tentacles wrap and coil around his body, completely encasing him in their flesh.\
>Squirming and wriggling, they continue rubbing the juices on him to prepare his body to be sucked up...\
name "Soldier"
>Hyaaa!!\
name ""
>The scream is of pleasure instead of pain...@
>Digested alive, he's still in the throes of pleasure.\
>Completely covered in squirming tentacles, he dissolves away, sucked up by the Chimera as her food.\
mov %hseanwave,0:hseanwave
name "Catoblepas Girl"
>Hehe... Thanks for the meal.\
name ""
>All that remains is the soldier's helmet, rolling on the floor...@
>His body was completely digested, not even leaving a bone.\
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_etc2,1
lsp 700,":a;chara\catoblepas_st01.bmp",0,0:print 10,500
bgm "bgm\kiki2.ogg"
r@k@\
name "Catoblepas Girl"
>Now to dispose of the San Ilia king...\
name ""
dwave 1,"se\break7.ogg"
bg "bg\bg045.bmp",10,500
>The Catoblepas Girl breaks down the door, finally reaching the throne room.@
lsp 700,":a;chara\saniria_n_st04.bmp",-200,0
lsp 701,":a;chara\catoblepas_st01.bmp",160,0:print 10,500
>Inside, the San Ilia King is terrified, praying for salvation.\
name "San Ilia King"
>Wh...What a disaster!@
>Goddess, please save us helpless ones!\
name ""
name "Catoblepas Girl"
>That Goddess is who instructed us to destroy you.\
name ""
>The monster steps right up to the King, and stares right into his wrinkled face.\
name "Catoblepas Girl"
>...I knew it, an unappetizing grandpa.@
>No flavor to the meat or semen...@>I'll just suck out your life energy.\
name ""
>One of her tentacles sticks to the King's head.@
dwave 1,"se\ero_chupa6.ogg"
>From that, she starts mercilessly sucking out his life energy!\
name "San Ilia King"
>Ooooohhh!!!\
name ""
lsp 700,":a;chara\saniria_n_st05.bmp",-200,0
lsp 701,":a;chara\catoblepas_st01.bmp",160,0:print 10,500
>Having his energy sucked, the King's body sags as his face gets even more wrinkled!\
name "Catoblepas Girl"
>...And with that, the King is finished.@
>Now to deal with those in the temple...\
name ""
name "San Ilia King"
>O...oo...\
name ""
if %ivent05=0 lsp 700,":a;chara\saniria_f_st05.bmp",-200,0:print 10,500
if %ivent05=1 lsp 700,":a;chara\saniria_gf_st05.bmp",-200,0:print 10,500
name "Fairy"
>Waaahnn! King!!@
eng "I'll share my power, so don't die!!":$sel6/
dwave 1,"se\kaihuku.ogg"
\
name ""
if %ivent05=0 skip 6
name "Ghost"
eng "..........":$sel6/
dwave 1,"se\kaihuku.ogg"
\
name ""
name "Catoblepas Girl"
>Oh...?@> Still have some strength left?@
>Since he's the leader of the faith, does he have some sort of spiritual protection?\
name ""
>The moment she was going to give the final blow to the King...@
dwave 1,"se\tuki.ogg"
>A sharp sword suddenly bursts forth from her chest!\
csp 701
lsp 700,":a;chara\catoblepas_st01.bmp",0,0:print 10,500
name "Catoblepas Girl"
>W...What the...?@
>I... Didn't sense anything...\
name ""
name "Luka"
>Thunder Thrust...\
name ""
>The stab as fast as lightning defeated the Catoblepas Girl in an instant...\
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Catoblepas Girl is sealed in the form of a tiny elephant!\
lsp 700,":a;chara\saniria_n_st05.bmp",0,0:print 10,500
name "Luka"
>King!@>Are you alright!?\
name ""
>It looks like I made it just in time...@
>He looks to be in terrible condition, but he's still breathing!\
name "San Ilia King"
>Ah... Uhh...\
name ""
if %ivent05=0 lsp 700,":a;chara\saniria_f_st05.bmp",0,0:print 10,500
if %ivent05=1 lsp 700,":a;chara\saniria_gf_st05.bmp",0,0:print 10,500
name "Fairy"
eng "Fairy Heal!":$sel6/
dwave 1,"se\kaihuku.ogg"
\
name ""
if %ivent05=0 skip 6
name "Ghost"
eng "...........":$sel6/
dwave 1,"se\kaihuku.ogg"
\
name ""
name "Luka"
if %ivent05=0 mov $sel1,"The Fairy's power?"
if %ivent05=1 mov $sel1,"Fairies? And ghosts...?"
eng $sel1:$sel6\
name ""
if %ivent05=0 mov $sel1,"For some reason, Fairys who took a liking to the King are healing him..."
if %ivent05=1 mov $sel1,"For some reason, outcasts who took a liking to the King are healing him..."
eng $sel1:$sel6\
>And...@
dwave 1,"se\power.ogg"
lsp 700,":a;chara\saniria_n_st04.bmp",0,0:print 10,500
>The health returns to the King's face, and he regains consciousness!\
name "San Ilia King"
>Ahh... I...I was saved...\
>And not by the Goddess...@>It was...@
>You, Hero Luka!\
name ""
name "Luka"
>Err... It was actually the ones who like you.\
name ""
lsp 700,":a;chara\saniria_n_st03.bmp",0,0:print 10,500
name "San Ilia King"
>But, I...\
name ""
bgm "bgm\hutuu2.ogg"
>The King slumps in his chair.@
>He looks even worse than when he was drained of life...\
name "San Ilia King"
>...The pious believers all shut themselves up in the temple.@
>If it was Ilias' will, they thought to sacrifice themselves.\
>All of them are ready to die now, and are ignoring the evacuation order.@
>What should I do to stop the martyrs?\
name ""
name "Luka"
>Can you persuade them to evacuate somehow?\
name ""
name "San Ilia King"
>But I don't have anything I could say to persuade them...@
>Were I not the King, I'm sure I would have been in there with them.\
>I am responsible for all of the believers of the world...@
>It's not even possible for me to sacrifice myself for my faith.\
>Ahh Hero...@>What should I do?\
name ""
name "Luka"
>......\
name ""
>The King was supposed to be responsible for guiding Heroes.@
>But now he has completely lost his way.\
>It feels wrong for me to try to show a wise man the way.@
>But...\
name "Luka"
>...When I was small, my mother and I were persecuted in our village.@
>I took salvation in my mind with Ilias' teachings.\
>All people are equal, and have the right to live.@
>Love each other, and coexist peacefully with one another...\
>Even though she's doing this now, I still don't think those teachings are wrong.\
name ""
name "San Ilia King"
>...But, I...\
name ""
name "Luka"
>Why did you come to believe so strongly in Ilias?@
>Simply because you thought she was the absolute Goddess?\
>I'm sure that wasn't it...@
>You must have been drawn to the teachings of compassion and love, and became a pious believer.\
name ""
name "San Ilia King"
>.........\
name ""
name "Luka"
>But Ilias is now trying to destroy humanity.@
>She herself abandoned those teachings of mercy and compassion.\
name ""
>I'm sure he has already found his path.@
>After guiding so many Heroes, there's no way he himself would be lost long.\
>But he's unable to take that first step...@
>While he knows what needs to be done, he needs the courage to act on it.\
name "Luka"
>It's not just you that is at a loss.@
>I'm sure the faithful all over the world have lost their way..\
name ""
lsp 700,":a;chara\saniria_n_st02.bmp",0,0:print 10,500
name "San Ilia King"
>...Yes, yes you are right.@
>Now is the time for me to fulfill my duty.\
name ""
>The King's downcast eyes suddenly brighten.@
>It seems like he took that first step...\
>He's parting from Goddess Ilias...@
>It must have been the hardest decision of his life.\
name "San Ilia King"
>...Let us go to the temple, Hero Luka.@
>We must show the way to those falling down the hole of martyrdom!\
name ""
name "Luka"
>Yes, I'll go with you!\
name ""
dwave 1,"se\asioto3.ogg"
>Thus the King and I head to the temple, where the priests are holed up, praying and waiting for their own deaths...\
sean_change "bg157"
bgm "bgm\kiki2.ogg"
lsp 700,":a;chara\mob_sinkan.bmp",-170,0
lsp 701,":a;chara\mob_sinkan.bmp",170,0:print 10,500
name "Priest A"
>Ahh... Goddess Ilias...\
name ""
name "Priest B"
>Please, grant us your salvation.@
>Even if it is the tranquility of death.\
name ""
name "Priest C"
>If it is thy will, we shall accept anything!\
name ""
>Dozens of priests are praying in a fervor.@
>At the same time, the screams from the castle and town are echoing through the giant temple.\
>As if shutting out the screams of the world itself, they continue praying.@
>Until finally, their prayers are answered by the Heavens...\
name "???"
>Even in a situation like this, you stick to prayer...@
>You truly are the ideal followers of Ilias.\
name ""
dwave 1,"se\aura.ogg"
>A soft, sacred light fills the temple.@
>Appearing from that light, an angel with beautiful wings of light takes shape.\
name "Priest A"
>Oooh!@>Master Angel!\
name ""
bgm "bgm\boss0.ogg"
csp 701
lsp 700,":a;chara\muzukiel_st01.bmp",0,0:print 10,500
name "Muzukiel"
>I am Power Muzukiel...@
>I will give you faithful followers eternal rest.\
name ""
lsp 700,":a;chara\mob_sinkan.bmp",-200,0
lsp 701,":a;chara\muzukiel_st01.bmp",200,0:print 10,500
name "Priest B"
>M...Master Angel...!?@
>Th...That appearance...?\
name ""
>The priests stare blankly at the angel.@
>Her appearance is far from what they imagined a heavenly host to look like.\
>Rather, it appears more like the creature they detest more than all others.@
>A monster...\
name "Priest C"
>M...Monster...\
name ""
dwave 1,"se\ero_makituki1.ogg"
>The moment the word slips out of the priest's mouth, the angel's centipede like tail twines around him.\
name "Muzukiel"
>What insolence...@
>Do not dare call this body that the Goddess bestowed upon me monstrous!\
name ""
dwave 1,"se\ero_simetuke1.ogg"
name "Priest C"
>Ah... Gyaaa!\
name ""
csp 700:print 10,500
>In the next moment, she twists her tail, crushing the priest's body.@
dwave 1,"se\down.ogg"
>His twisted corpse falls like a piece of trash to the pristine temple's floor.\
lsp 700,":a;chara\mob_sinkan.bmp",-200,0
lsp 701,":a;chara\muzukiel_st01.bmp",200,0:print 10,500
name "Muzukiel"
>Now then, everyone else is next...@
>I'll send you all to the next world.\
name ""
name "Priest A"
>S...Stay back!\
name ""
name "Priest B"
>N...No!@>This is wrong!@
>Ilias' messengers should be more...@>Angel like!\
name ""
>Before the strange looking angel, the priests all stop praying.@
>Scrambling away, they shuffle backwards on the floor in a panic.\
name "Muzukiel"
>Indeed, it looks like you men are lacking...@
>I shall feed on all of you with this insect organ...\
name ""
>Muzukiel blocks the exit to the temple, keeping the priests from escaping.@
dwave 1,"se\ero_makituki2.ogg"
>Her insect-like organ reaches out to the priests...\
name "Luka"
>Stop it!\
name ""
dwave 1,"se\break6.ogg"
>In the next instant, the stained glass window shatters.@
csp 701
lsp 700,":a;chara\ruka_st03.bmp",0,0:print 10,500
>Flying down with the colored glass, a lone boy lands with a crashing of glass.\
>A holy aura radiates from his body, with a dazzlingly bright wing coming off his back.\
name "Priest A"
>A...An angel!?@> No, a Hero!\
name ""
name "Priest B"
>Oooh!@>Please save us!\
name ""
>For the priests in the pits of despair, it was as if a true angel came to save them...\
r@k@\
goto *muzukiel_start



*sean0325

bgm "bgm\kiki2.ogg"
name ""
r@k@\
name "Luka"
>Whew... I managed to beat her.\
name ""
>This angel must have been the leader of the insect-like monsters outside.@
>Now that she's down, they must be routing.\
>Now for the last problem that remains...\
bgm "bgm\hutuu2.ogg"
lsp 700,":a;chara\mob_sinkan.bmp",-170,0
lsp 701,":a;chara\mob_sinkan.bmp",170,0:print 10,500
name "Priest A"
>Ahh... What a disaster...\
name ""
name "Priest B"
>Ooohh... What should we do?\
name ""
>The priests are sobbing and crying on the floor, in the depths of despair.@
>It seems like the damage to their psyche was very deep.\
csp 701
lsp 700,":a;chara\saniria_n_st02.bmp",0,0:print 10,500
name "San Ilia King"
>Not only betrayed by the object of their worship, but seeing the form that the angel took...@
>The despair they are feeling is even worse than I feared it would be.\
name ""
dwave 1,"se\asioto3.ogg"
>The King steps into the temple full of despairing priests.@
>At his voice, they all eagerly look up at him.\
lsp 700,":a;chara\saniria_n_st02.bmp",-180,0
lsp 701,":a;chara\mob_sinkan.bmp",170,0:print 10,500
name "Priest A"
>Your Highness...@> Have we been wrong this whole time?@
>Everything we have ever believed in...?\
name ""
name "San Ilia King"
>...As you all know, I was once a repairman from another town.@
>A humble clocksmith, I lived most of my days in extreme poverty.\
>Equality, and the virtues of honorable poverty... These teachings of Ilias were what drew me to the faith.\
>When I was young, I didn't quite understand the deepness behind those philosophies.@
>But even then, I was moved by the deep love for your fellow man that it fostered.\
name ""
name "Priest B"
>But Your Highness...\
name ""
name "San Ilia King"
>...But now, Ilias has abandoned us.@
>So now is exactly the time to think about what drew you to your faith to begin with.\
>Why did you come to believe in Ilias and her teachings?@
>Was it just simple blind faith for no reason?\
name ""
name "Priest A"
>I became faithful to repent the sins of my past...\
name ""
name "Priest B"
>I lost my wife, and was in despair...\
name ""
>The priests each share what brought them to the faith, one after another.@
>They are returning to the roots of their faith...\
name "San Ilia King"
>Ilias' teachings said that each man had the right to live.@
>I still believe in that.\
>Even if Ilias herself doesn't accept that anymore, I still do.@
>And I would like everyone else to believe that, too.\
>We must never allow ourselves to accept our own death like this.@
>Even if it goes against the will of the Gods.\
name ""
name "Priest A"
>Your Highness...\
name ""
lsp 700,":a;chara\saniria_n_st01.bmp",-180,0:print 10,500
name "San Ilia King"
>In this deep anguish, the answers will not be easy...@
>But we must leave here and continue praying for others.\
>We are the core of the faith.@
>In this moment, the believers all over must be lost and confused.\
>For their sakes, too, we must survive and continue on.\
name ""
>Even I'm starting to feel persuaded by his speech...@
>One after another, the priests slowly rise to their feet.\
name "Priest A"
>You are right...@> There are still things we must do.\
name ""
name "Priest B"
>I see...@> Martyrdom must wait until after I serve my duty, then.\
name ""
>There's a few differences in their beliefs...@
>But it looks like all of them have been persuaded enough to get them out of their momentary despair.\
dwave 1,"se\asioto3.ogg"
cspl 700,701:print 10,500
>They file out of the temple, heading into the castle and the town.@
>After a moment, only the King and I remain in the temple.\
bgm "bgm\epilogue2.ogg"
lsp 700,":a;chara\saniria_n_st02.bmp",0,0:print 10,500
name "San Ilia King"
>Was I... Able to show them the way?@
>But now I fear an even bigger role awaits us all in the days to come.\
name ""
name "Luka"
>...It will all work out, with you as the King.\
name ""
lsp 700,":a;chara\saniria_n_st02.bmp",-160,0
lsp 701,":a;chara\fairys_st01.bmp",370,75:print 10,500
name "Fairy"
>That's riight! @
>It'll be fine! \
name ""
>A Fairy pokes her head out from behind the King's back.@
>It seems like she really took a liking to him...\
lsp 700,":a;chara\alice_st71.bmp",-240,50
lsp 701,":a;chara\saniria_n_st02.bmp",0,0
lsp 702,":a;chara\fairys_st01.bmp",500,75:print 10,500
name "Alice"
>Hmph...@>It seems to be over with.\
name ""
name "Luka"
>A...Alice!?@>Is it alright for you to be here!?\
name ""
lsp 700,":a;chara\alice_st74.bmp",-240,50:print 10,500
name "Alice"
>Well, I don't mind...\
name ""
>Alice looks to her side at the King, waiting to see his reaction.\
lsp 701,":a;chara\saniria_n_st01.bmp",0,0:print 10,500
name "San Ilia King"
>...I do not particularly mind.\
name ""
name "Fairy"
>I don't mind either! \
name ""
name "Luka"
>I see...@> So it's fine, Alice.\
name ""
lsp 700,":a;chara\alice_st71.bmp",-240,50:print 10,500
name "Alice"
>Hmph...@>Anyway, there's nothing more we can do here.@
>Let's hurry to the next town.\
name ""
name "Luka"
>Yes, you're right.\
name ""
>It's true there's nothing more to do here.@
>Ilias is attacking all over, we can't afford to waste time...\
name "San Ilia King"
>Hero and Monster Lord...@> Please bring hope to this world.@
>We shall bring hope to the peoples, and help to build a stronger world.\
name ""
lsp 700,":a;chara\alice_st72.bmp",-240,50:print 10,500
name "Alice"
>Hmph, I don't need you to show me the way.@
>I already know the course I should take.\
>...But as you desire, I'll use my tremendous power to bring hope to the world itself.@
>After that, I'll leave it to you to nurture that hope in the peoples.\
name ""
name "San Ilia King"
>...My destiny is to guide people on the correct path.@
>I will devote my life to creating hope in every heart.\
name ""
name "Fairy"
>I'll do my best too! \
name ""
name "Luka"
>Yes, let's all do our best together!\
name ""
>Little by little, the hearts of everyone are becoming as one...@
>All we have to do is have hope for the future, and to escape the violence of the Heavens.\
>We must keep repelling the attacks all over, and bring hope of survival to the world!@
>We must keep fighting for the future!\
cspl 701,702
lsp 700,":a;chara\alice_st72.bmp",0,50:print 10,500
name "Luka"
>Alright, let's go Alice!@
>To bring hope to the world!\
name ""
name "Alice"
>Hmph...@>I must show the world that the power of the Monster Lord is still going strong!\
name ""
csp 700:print 10,500
>Thus, with our missions firmly in our chests, we depart San Ilia.@
>Our next stop is...\
r@k@\
mov %ivent18,2
mov %gloval1_story_sinkou,14:gosub *savegloval1
bgm "bgm\field4.ogg"
goto *map9



*sean0325x

bgmstop
sean_change "bg140"
bgm "bgm\field4.ogg"
>In the air above San Ilia...\
name "Luka"
>Horrible...\
name ""
>The city has been completely destroyed...@>I don't see a living soul anywhere.\
>They fell right away under the angel's assault.\
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>Were we not in time?\
name ""
name "Luka"
>Damn it...@> But this is no time for regrets.@
>We have to hurry to save other locations!\
name ""
csp 700:print 10,500
>The longer we stop and mourn, the greater the damage will spread.@
>Our next location is...\
mov %gloval1_story_sinkou,14:gosub *savegloval1
goto *map9



*sean0326

gosub *setwindow_01
bg "bg\bg037.bmp",10,1500
bgm "bgm\kiki3.ogg"
>Like the other locations, Port Natalia is in a state of chaos...@
>But it isn't Chimeric Beasts rampaging through town.\
lsp 700,":a;chara\Mermaid_st01.bmp",0,0:print 10,500
name "Mermaid"
>Oh seas, swell in anger!@
>Sweep away this human town!\
name ""
dwave 1,"se\aqua4.ogg"
>An army of Mermaids is trying to destroy the town with swells of water!@
>And the ones fighting against them...\
lsp 700,":a;chara\mob_Mermaid1.bmp",-170,0
lsp 701,":a;chara\mob_Mermaid2.bmp",170,0:print 10,500
name "Mermaid A"
>Guh... Damn it!@
>We won't let you do whatever you want!\
name ""
name "Mermaid B"
>We'll all defend Natalia!\
name ""
>The ones meeting the assault are also Mermaids...@
>The Mermaids who call this town their home.\
>Apparently they are divided into two factions, and are facing off...\
csp 701
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>The Mermaids, known for hating fighting, are killing each other...@
>This must be the work of Black Alice.\
name ""
name "Luka"
>We have to stop this!@
>Ah... Is that Meia!?\
name ""
lsp 700,":a;chara\meia_st01.bmp",0,0:print 10,500
name "Meia"
>I won't let any of you lay a hand on this town!\
name ""
>Meia is on the side of the defending Mermaids.@
dwave 1,"se\aqua2.ogg"
>She launches a huge wave of water at the attacking Mermaids, sweeping many away.\
>The magic swells in the water between the two sides, creating huge whirlpools of water.@
dwave 1,"se\asioto1.ogg"
>I rush over to Meia's side in the chaos.\
name "Luka"
>Meia, are you alright!?@
>Are your husband and the other citizens safe?\
name ""
lsp 700,":a;chara\meia_st02.bmp",0,0:print 10,500
name "Meia"
>You came, Hero...@
>Everyone evacuated into the church.\
>Us Mermaids are working together to stop them from attacking there!\
name ""
name "Luka"
>I got it, I'll help out too!\
name ""
csp 700:print 10,500
>I take a quick look around, trying to locate who appears the strongest...@
lsp 700,":a;chara\Mermaid_st01.bmp",0,0:print 10,500
>Her!\
name "Luka"
>Stop it!@> Why are you doing this!?\
name ""
>I rush over to the Mermaid I felt the strongest magic from, and draw my sword.\
name "Luka"
>The people in this town were living peacefully together with Mermaids!@
>Why would you attack it!?\
name ""
lsp 700,":a;chara\Mermaid_st03.bmp",0,0:print 10,500
name "Mermaid"
>Mermaids who wag their tails at humans are a disgrace...@
>Those who forget the humiliation of our race are a disgrace!\
name ""
name "Luka"
>Humiliation of your race...?\
name ""
name "Mermaid"
>The tragedy of Laura and Alan...@> It's a famous Mermaid legend.@
>You haven't heard of it?\
name ""
>Laura the Mermaid...@
>I seem to recall hearing something about that before...\
r@k@\
csel "What was it about again...?",*sean0327,"I remember it well!",*sean0328



*sean0327

name "Luka"
>Let me think...@
>I think I heard it first at the Mermaid Pub...\
name ""
csp 700
bg "bg\bg155.bmp",99,2000,"system\lngtwave.dll/vwi"
bgm "bgm\hutuu2.ogg"
lsp 700,":a;chara\mob_Mermaid2.bmp",0,0:print 10,500
name "Mermaid"
>...It's a sad story from a hundred years ago, between a young human and a Mermaid.\
>A long time ago, there was a young sailor named Alan in this town.@
>One day, his ship wrecked while on a voyage.\
>He was attacked by a shark, and was mortally wounded.@
>Suddenly, a beautiful Mermaid named Laura appeared, and saved him.\
>It was love at first sight for Laura.@
>Alan's injury was so severe, that normally it would kill a human.\
>There was a puncture wound through his left chest that went half an inch into his lung, leaving him in a state of cardiopulmonary arrest.\
>His spine was also injured in the shark attack, and he had lost a third of his blood.\
name "Luka"
>...That's unusually detailed.\
name ""
name "Mermaid"
>Anyway, normally someone wouldn't survive that.@
>...Did I already say he was half dead?\
>So, Laura made Alan drink her blood.@
>You may not know, but the blood of a Mermaid is a powerful medicine.\
>Drinking her blood, Alan was somehow able to recover.@
>But even with her blood, he wasn't able to be completely fine.\
>For a full year he had to drink her blood every day, or else he would die.\
>So Laura pretended to be a human, and followed Alan to the town.@
>She secretly mixed her blood in with his food to keep him alive.\
name ""
name "Luka"
>...Why did Laura have to disguise herself?\
name ""
name "Mermaid"
>The town hated monsters.@
>So Laura had no choice but to pretend to be a human.\
>Months passed like that, as she continued to take care of Alan.@
>Laura and Alan fell completely in love...\
>One day, it was discovered that Laura was not human.@
>Alan's love didn't change, but the other townsfolk were different.\
>People were terrified of her, and accused her of being the source of all the bad things happening in town.\
>Finally, soldiers caught her and decided to execute her.\
name ""
name "Luka"
>But couldn't she have escaped?@
>As a Mermaid, she would have been stronger than any guard...\
name ""
name "Mermaid"
>If Laura ran, then Alan wouldn't be able to drink her blood.@
>That's why Laura didn't run.\
name ""
name "Luka"
>...........\
name ""
name "Mermaid"
>Laura decided she would turn herself in and choose to be executed by skewering.\
>Choosing the bloodiest possible method, she wanted Alan to be able to collect all of her blood.\
name ""
name "Luka"
>No... How awful...\
name ""
name "Mermaid"
>Alan figured out what Laura was planning on doing by the letter she sent him...@
>He decided to kill himself by drinking poison.\
>If he died, Laura wouldn't be forced to stay by his side to give him her blood.@
>He couldn't bear the thought of Laura being executed for his sake.\
name ""
name "Luka"
>...........\
name ""
name "Mermaid"
>Laura fled from the execution ground after hearing of Alan's death.@
>For the next few days, a storm blew through the town, as if summoned by Laura's grief.\
>The people of the town regretted their actions.@
>They decided to repent, and came to accept Mermaids.\
>...The end.\
name ""
csp 700
bg "bg\bg037.bmp",99,2000,"system\lngtwave.dll/vwi"
bgm "bgm\kiki3.ogg"
lsp 700,":a;chara\Mermaid_st03.bmp",0,0:print 10,500
goto *sean0328



*sean0328

name "Luka"
>.........\
name ""
name "Mermaid"
>You seem to know her story.@
>The stupidity of humans led to the worst possible ending.\
name ""
name "Luka"
>...It is a horrible story.@
>And it's true that human discrimination brought about that horrible event.\
>But it isn't something that can justify this violence!@
>All this is doing is pushing the two sides further and further away!\
name ""
name "Mermaid"
>Our hearts...@
>There's no way a human could ever understand the pure feelings of Laura's heart!@> Don't you dare try to talk about it!\
name ""
r@k@\
goto *mermaid_start



*sean0329

bgm "bgm\kiki2.ogg"
name ""
r@k@\
name "Luka"
>Laura is the Queen Mermaid...\
name ""
>The tragic Mermaid who was robbed of her lover due to human persecution...@
>She's the current Queen, and the leader of this attack!\
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>I see.@
>Due to her intense hatred of humans, Black Alice was able to convince her...\
name ""
name "Luka"
>We have to find the Queen Mermaid and stop her!@
>Uwaa!\
name ""
bgm "bgm\kiki1.ogg"
dwave 1,"se\aqua2.ogg"
lsp 700,":a;chara\alice_st81.bmp",0,50:print 10,500
>Suddenly, a huge wall of water slams into us!@
bg "bg\bg125.bmp",10,1500
>Swallowed up by the surge of water, we're quickly swept out to sea!\
name "Luka"
>Ahg...@> Alice, are you alright?\
name ""
name "Alice"
>D...Don't hold onto my tail!\
name ""
>I had managed to grab hold of her tail, keeping us together through the powerful wave.@
>It was so strong and quick, it was almost like it was aimed right at us...\
csp 700:print 10,500
name "???"
>You seemed to be quite skilled with that sword hand, human...@
>So I decided to change the battle site!\
name ""
name "Luka"
>I see... So it really was aimed at us!\
name ""
r@k@\
goto *g_mermaid_start



*sean0330

bgm "bgm\kiki2.ogg"
name ""
r@k@\
lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
name "Alice"
>That's finished...@> Let's hurry back to the harbor area.\
name ""
name "Luka"
>I don't want to fight any more in the water...\
name ""
>Luckily, we weren't pushed too far out.@
>The two of us swim back to town.\
sean_change "bg189"
name "Luka"
>We have to hurry and find the Queen...@
>Hmm?@> That girl...\
name ""
bgm "bgm\hutuu1.ogg"
lsp 700,":a;chara\ningyohime_st04.bmp",0,50:print 10,500
name "???"
>~~~~~ @
>~~~~~~~~~~ \
name ""
>A small Mermaid is singing while waves of splashing water crash around her.@
>Despite her appearance, there is some powerful magic coming off of her body...\
name "Luka"
>Alice...@> Is that girl the Queen Mermaid?\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\ningyohime_st04.bmp",170,50:print 10,500
name "Alice"
>No, she is too young...@
>But she may be a relative.\
name ""
bgm "bgm\kiki2.ogg"
csp 701
lsp 700,":a;chara\ningyohime_st07.bmp",0,50:print 10,500
name "Young Mermaid"
>Wahwah...@>Humans...\
name ""
>Noticing us, she hops up in surprise.@
lsp 700,":a;chara\ningyohime_st03.bmp",0,50:print 10,500
>She warily glares at us.\
name "Luka"
>Please calm down, I'm not your enemy...@
>I just want to see the Queen Mermaid.\
name ""
lsp 700,":a;chara\ningyohime_st04.bmp",0,50:print 10,500
name "Young Mermaid"
>Ehhh...@>You want to meet with mom?\
name ""
name "Luka"
>Mom...?@>You're her daughter?\
name ""
lsp 700,":a;chara\ningyohime_st05.bmp",0,50:print 10,500
name "El"
>I'm El, the Mermaid princess.@
>Mom doesn't want to see any humans...\
>Are you trying to make mom sad again?@
>I'll have to teach you stupid mean human a lesson!\
name ""
r@k@\
goto *ningyohime_start



*sean0331

bgm "bgm\kiki2.ogg"
name ""
r@k@\
lsp 700,":a;chara\ningyohime_st18.bmp",0,50:print 10,500
name "Luka"
>............\
name ""
>I slowly lower my sword in front of the depressed El.\
bgm "bgm\hutuu2.ogg"
name "Luka"
>As I said before, I'm not your enemy...@>I don't want to fight.@
>I just want to meet your mom to stop this attack.\
name ""
name "El"
>But mom really hates humans...@
>My father died because of humans too...\
name ""
name "Luka"
>Then... Your father is Alan, from the legends?@
>But your age...\
name ""
>That legend is several hundred years old...@
>Does that mean she is hundreds of years old?\
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\ningyohime_st18.bmp",170,50:print 10,500
name "Alice"
>She has likely been holding the semen in her until recently.@
>Some sharks and fish can hold semen for longer than a year.\
>Since she is the top ranking Mermaid, I'm sure she could hold it for far longer.@
>Though I don't know what change of heart made her decide to give birth recently...\
name ""
csp 701
lsp 700,":a;chara\ningyohime_st13.bmp",0,50:print 10,500
name "El"
>...Anyway, I won't let her meet a human.@
>Mom really hates humans.\
>Humans make my mom sad...@
>So humans are my enemy...\
name ""
name "Luka"
>That's wrong.@
>Humans are weak, and can make terrible mistakes sometimes...\
>They can even be aggressive toward things they don't understand.\
>But they aren't your enemy.@
>The citizens of this town for sure don't consider Mermaids their enemy...\
name ""
lsp 700,":a;chara\ningyohime_st19.bmp",0,50:print 10,500
name "El"
>But mom said...@
>Humans...\
name ""
bgm "bgm\boss0.ogg"
name "???"
>Humans are stupid.@> They openly disdain anything that isn't like themselves, and persecute others based on any difference.@
>El, haven't I taught you this before?\
name ""
>A sudden chill runs down my spine.@
>This sudden feeling of pressure...\
lsp 700,":a;chara\ningyohime_st17.bmp",0,50:print 10,500
name "El"
>Mom!?\
name ""
name "Luka"
>Y...You're...\
name ""
lsp 700,":a;chara\queenMermaid_st01.bmp",0,0:print 10,500
>A Mermaid with a surprisingly serene atmosphere around her emerges from the sea.@
>But the feeling of pressure coming from her is far different than from the other Mermaids...\
>There's no doubt... She must be the Queen Mermaid.\
r@k@\
goto *queenmermaid_start



*sean0332

bgm "bgm\hutuu2.ogg"
name ""
r@k@\
name "Luka"
>.............\
name ""
>I quietly put my sword away.\
name "Luka"
>I won't try to get you to stop hating humans.@
>But at the least, can you not transmit that hatred to your children?\
name ""
name "Queen Mermaid"
>.............\
name ""
>The Queen Mermaid just keeps her eyes down.@
>Did she accept my persuasion? Or...?\
dwave 1,"se\break7.ogg"
quake 10,1000
bgm "bgm\kiki2.ogg"
name "Luka"
>Wah!@> What was that!?\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>The front warehouse seems to have collapsed.@
>It took such a pounding by the waves, it's no surprise it collapsed.\
>Well, luckily it was empty...@
lsp 700,":a;chara\alice_st81.bmp",0,50:print 10,500
>Wait, no!\
name ""
name "Luka"
>Oh no, there's a child in there!\
name ""
>I can sense the child inside it...@
>He must have run there when the chaos started!\
>And now he's stuck in the rubble!\
name "Luka"
>Alice!\
name ""
lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
name "Alice"
>Yes!\
name ""
dwave 1,"se\asioto1.ogg"
>Alice and I rush to the collapsed warehouse.@
>Grabbing hold of the debris, I throw it away in a panic as I try to dig him out.\
lsp 700,":a;chara\mob_syounen.bmp",0,0:print 10,500
name "Child"
>Uuhh... Uhh...\
name ""
>But there are huge cuts all over his body...@
>Even worse, it looks like something pierced him in the chest...@>It's clearly a mortal wound.\
name "Luka"
>Alice, can you heal him!?\
name ""
lsp 700,":a;chara\alice_st81.bmp",-170,50
lsp 701,":a;chara\mob_syounen.bmp",170,0:print 10,500
name "Alice"
>This is bad...@> It has damaged his lungs.@
>It's too much for me to heal as I am now.\
name ""
name "Luka"
>N...No...\
name ""
>The boy starts trembling and coughing, blood coming from his mouth.@
>He doesn't have much time left...\
name "Alice"
>............\
name ""
>Alice turns around.\
lsp 700,":a;chara\alice_st73.bmp",-170,50:print 10,500
name "Alice"
>Queen Mermaid...@
>Will you once again help the people of this town with your blood?\
name ""
>The Queen stares silently, not reacting to Alice's call.\
name "Luka"
>That's right...@>If it's the Queen Mermaid's blood, then...\
name ""
lsp 701,":a;chara\queenMermaid_st01.bmp",160,0:print 10,500
name "Queen Mermaid"
>...........\
>...I said I hated humans.@
>I have no intention of helping that child with my blood.\
name ""
name "Luka"
>No...@>Then this child will...@
>Do you hate humans so much that you would even abandon a child!?\
name ""
name "Queen Mermaid"
>I have no such obligation to him.\
name ""
>The Queen flatly asserts that.\
name "Queen Mermaid"
>...........@
>But I shall leave the choice up to the next generation.\
name ""
name "Luka"
>Eh...\
name ""
bgm "bgm\hutuu2.ogg"
name "Queen Mermaid"
>El...@>Are you watching?\
name ""
lsp 700,":a;chara\ningyohime_st08.bmp",-170,50
lsp 701,":a;chara\queenMermaid_st01.bmp",160,0:print 10,500
name "El"
>Y...Yes...\
name ""
>A small Mermaid timidly comes out from the shadows...@
>It's El, the Mermaid princess.\
>It looks like she was watching everything from a hiding spot.\
name "Queen Mermaid"
>It's up to you to decide.@
>Do what you think is best.\
name ""
lsp 700,":a;chara\ningyohime_st07.bmp",-170,50:print 10,500
name "El"
>Yes, then...\
name ""
>El scratches her fingertip, drawing blood.@
lsp 701,":a;chara\mob_syounen.bmp",160,0:print 10,500
>And she puts her finger in the child's mouth.\
name "Child"
>Nnn...nnn...\
name ""
>The boy weakly groans a few times.@
>After a couple coughs, his breathing gets calmer...\
>The Mermaid princess' blood was able to heal his mortal wound...\
csp 701
lsp 700,":a;chara\queenMermaid_st13.bmp",0,0:print 10,500
name "El"
>I'm sorry, mom...\
name ""
name "Queen Mermaid"
>..........\
name ""
>El timidly hugs her mom.@> The Queen Mermaid suddenly sticks out her right hand...@
lsp 700,":a;chara\queenMermaid_st11.bmp",0,0:print 10,500
>And gently pats El's head.\
name "Queen Mermaid"
>Let's go home, El.@
>Along with everyone else...\
name ""
lsp 700,":a;chara\ningyohime_st04.bmp",-170,50
lsp 701,":a;chara\queenMermaid_st01.bmp",160,0:print 10,500
>Then...@
dwave 1,"se\aqua4.ogg"
csp 701:print 10,500
>Without even looking back at us, the Queen jumps into the sea.\
name "El"
>..........\
name ""
dwave 1,"se\aqua4.ogg"
csp 700:print 10,500
>After quickly glancing back at us, El jumps into the sea.@
>With that, the mother and daughter head away from the town.\
name "Luka"
>The other Mermaids are going back into the sea, too...@
>I wonder if the Queen was able to understand?\
name ""
>The child who drank El's blood is sleeping peacefully next to us.@
>It looks like the blood was able to save him from the brink of death.\
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>Even if she can't erase her own hatred...@
>She's letting the next generation choose for themselves what is right and wrong.\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
>The one she loved was a human, but it was also humans that took him away from her...@
>I'm sure she's struggling with that contradiction in her heart.\
name ""
name "Luka"
>..........\
name ""
name "Alice"
>And you moved El's heart.@
>Your persuasion probably didn't move the Queen...@
>But it reached El for sure.\
name ""
name "Luka"
>You may be right...@
>I'm sure the people of this town will be able to coexist with Mermaids and other monsters in the future, too.\
name ""
bgm "bgm\epilogue2.ogg"
>After the victory, I'm sure the people will celebrate with the Mermaids.@
>But there's a lot of rebuilding to do...\
lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
name "Alice"
>...Now let's go, Luka.@
>There are still other towns being terrorized by the army of the Heavens.\
>You also must regain the power of the four spirits...\
name ""
name "Luka"
>I'd also like to say hi to Meia...@
>Well, I may have another chance in the future though.\
>Alright, let's move on!\
name ""
csp 700:print 10,500
>There's still so much left for us to do...@
>With that, the two of us head out of Port Natalia.\
>Now for our next location...\
r@k@\
mov %ivent04,2
mov %gloval1_story_sinkou,14:gosub *savegloval1
bgm "bgm\field4.ogg"
goto *map9



*sean0333

sean_change "bg055"
gosub *setwindow_01p
bgm "bgm\kiki2.ogg"
lsp 700,":a;chara\mob_seinen1.bmp",-170,0
lsp 701,":a;chara\mob_seinen1.bmp",170,0:print 10,500
name "Youth A"
>Haa... Haaa...@> I think we're alright here.\
name ""
name "Youth B"
>What's going on?@> Why is an angel...\
name ""
name "Youth C"
>Urhg... The monster got my little brother!\
name ""
>After their village was attacked, three youths ran toward the northern mansion.@
>But a strange shadow is approaching them...\
lsp 700,":a;chara\mob_seinen1.bmp",-200,0
lsp 701,":a;chara\XX-7_st01.bmp",180,0:print 10,500
name "XX-7"
>Hehe...@>Did you think you had escaped?\
name ""
name "Youth A"
>N...No...@>Uwaaa!\
name ""
name "Youth B"
>H...Help me!\
name ""
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
dwave 1,"se\ero_makituki3.ogg"
>XX-7's tentacles coil around the youths, and peel off their clothes.@
csp 701
lsp 700,":a;chara\XX-7_h1.bmp",0,0:print 10,500
>With their movements sealed, the openings of her tentacles latch onto their groins!\
name "Youth A"
>Hyaaa!\
name ""
name "Youth B"
>P...Please just don't kill me!\
name ""
>As the tentacles suck in their genitals, the young men start pleading.@
>Even though they were just put into her mouth, they're already trembling in fear.\
>The thoughts of the dried up men squeezed to death from when their village was attacked crosses through their minds...\
name "XX-7"
>Now then, to suck you three dry one after another...@
>Don't worry, it will feel good.\
name ""
name "Youth A"
>S...Sto...@> Ahh!\
name ""
mov %hseanwave,16:hseanwave
lsp 690,":a;chara\XX-7_ct01.bmp",0,0:print 10,500
>One of the tentacles attached suddenly starts to suck.@
>As the soft sucking sensation runs through him, his scream gets shortened into a moan.\
>The tentacle's mouth narrows as it sucks, rubbing the soft walls against his penis.@
>The youth's breath quickly gets rougher as the sweet pleasure is forced into him.\
name "Youth A"
>I...It feels so good...@
>Ahhh...\
name ""
gosub *syasei1
lsp 690,":a;chara\XX-7_ct02.bmp",0,0
gosub *syasei2
>Unable to withstand the massage like stimulation for even a minute, the young man already comes.\
name "Youth A"
>Haaa...!\
name ""
name "Youth B"
>S...Stop this...\
name ""
>The other youth watches as his friend's face melts in pure ecstasy.@
>At the thought of him making that face of pleasure, his fear and expectation slowly start to grow...\
name "XX-7"
>That was quite fast, wasn't it...?@
>You didn't even last five seconds.\
>And to spurt out everything in one shot...@
>Go ahead and die now.\
name ""
name "Youth A"
>Urhg... Ahhh!\
name ""
lsp 690,":a;chara\XX-7_ct03.bmp",0,0:print 10,500
>The young man's body writhes in pure pleasure as his orgasm doesn't stop.@
>The stream of semen continues uninterrupted from his sole climax.\
>His penis continually spasms and spurts, the Chimera's tight tentacle mouth accepting it all.\
name "Youth A"
>Hyaaa!\
name ""
lsp 700,":a;chara\XX-7_h2.bmp",0,0
lsp 690,":a;chara\XX-7_ct04.bmp",0,0:print 10,500
>In only a few moments, his body completely dries up.@
>Through a continual ejaculation, his life and semen were both sucked without mercy.\
>She casually turns away from the dried up corpse of the youth to his friend.\
mov %hseanwave,0:hseanwave
name "XX-7"
>That's one down.@
>You're next...\
name ""
name "Youth B"
>Stop, stop please!\
name ""
mov %hseanwave,16:hseanwave
lsp 690,":a;chara\XX-7_ct01.bmp",0,0:print 10,500
>The tentacle still latched onto his penis suddenly shrinks and starts sucking on him.@
>The walls inside seem to wriggle and vibrate at the same time, resulting in an instant eruption of pleasure.\
name "Youth B"
>Ahhh!\
name ""
>The tentacle's deeper walls close around his glans, rubbing and massaging him.@
>At the same time, tiny tentacles inside her vagina rub and stroke his shaft.\
>The intense pleasure instantly overwhelms him.\
>Forgetting his initial fear of this pleasure, the boy's back arches as he gives his body over to the impending orgasm.\
name "Youth B"
>Ahhhyaaa!\
name ""
gosub *syasei1
lsp 690,":a;chara\XX-7_ct02.bmp",0,0
gosub *syasei2
>Almost right away, he's taken over by a powerful orgasm.@
>His semen erupts into the tentacle's tight hole.\
name "Youth B"
>Ahh!@> Ahhh!\
name ""
lsp 690,":a;chara\XX-7_ct03.bmp",0,0:print 10,500
>Just like his nightmare, the sucking doesn't end...@
>In a continual stream, his orgasm continues on, his penis spasming one time after another.\
lsp 690,":a;chara\XX-7_ct04.bmp",0,0
lsp 700,":a;chara\XX-7_h3.bmp",0,0:print 10,500
>And after only ten seconds, his body is completely dried up.@
>Stuck in a perpetual orgasm, he met his end like his friend...\
mov %hseanwave,0:hseanwave
name "Youth C"
>Oh no... Why is this happening...?\
name ""
>The third youth had helplessly watched his two friends being sucked to death.@
>But despite his fear, his penis is completely hard.\
>He couldn't help but think about how good that must feel...@
>If he was going to die anyway, he might as well feel good doing it.\
>He wasn't able to push away those catastrophic thoughts anymore after what he just saw.\
name "XX-7"
>Sorry for the wait, it's finally your turn...\
name ""
>With that death sentence, the tentacle slightly squirms.@
>The expectation of the coming rush of ecstasy fills the young man.\
name "Youth C"
>No... Noo...\
name ""
name "XX-7"
>I guarantee it will be the best thing you've ever felt.@
>So meet your end in peace...\
name ""
name "Youth C"
>Stop, stop!@
>Ahhh...\
name ""
mov %hseanwave,16:hseanwave
lsp 690,":a;chara\XX-7_ct01.bmp",0,0:print 10,500
>In order to suck his life dry, the tentacle finally starts moving...@
>At the same time, his penis starts twitching in joyful pleasure.\
>As her tight vaginal walls wriggle and squirm as it sucks on him, the sensations of having his penis completely greedily devoured course through him.\
name "Youth C"
>Urhg... Ah...\
name ""
>Even knowing that if he ejaculates he'll be sucked to death, he can't hold on.\
>Against the horrors of his mind, his body can't help itself.@
>As the pleasure overtakes his senses, he feels his penis twitching as the ache spreads through his body.\
name "Youth C"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 690,":a;chara\XX-7_ct02.bmp",0,0
gosub *syasei2
>Inside the nightmarish tentacle, his semen spurts out.@
>At the same time, the tentacle starts sucking even harder, pulling out every drop of his semen.\
name "Youth C"
>Aiiieee!!\
name ""
lsp 690,":a;chara\XX-7_ct03.bmp",0,0:print 10,500
>As ecstasy courses through his body, he loses every ounce of power.@
>Twitching helplessly, his semen and life are effortlessly sucked out by the Chimera.\
>He doesn't even care anymore...@
>If he can die feeling this ecstasy, then it doesn't matter anymore...\
name "Youth C"
>Hyaa!!\
name ""
lsp 700,":a;chara\XX-7_h4.bmp",0,0
lsp 690,":a;chara\XX-7_ct04.bmp",0,0:print 10,500
>Sucked completely dry in no time, the youth dies.@
>With that, all three young men are left completely dry in almost no time.\
mov %hseanwave,0:hseanwave
csp 690
lsp 700,":a;chara\XX-7_st01.bmp",0,0:print 10,500
name "XX-7"
>Thanks for the meal...@
>Now to go back to the village for leftovers...\
name ""
>Leaving the three bodies behind, she turns away from the mansion...@
bgm "bgm\kiki2.ogg"
>When suddenly, she senses a strange feeling in the area.\
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_etc3,1
name "XX-7"
>...Is there still someone there?\
name ""
>As she looks back toward the house...\
csp 700
bg black,10,500
name "XX-7"
>Kyaaaaa!!\
name ""
dwave 1,"se\down.ogg"
>With a loud, deathly scream that echoes throughout the once silent mansion, the Chimeric Beast collapses on the floor.\
lsp 700,":a;chara\chrom_st44.bmp",0,0
bg "bg\bg055.bmp",10,500
name "???"
>Hehehehehe...\
name ""
sean_change "bg222"
name "Luka"
>...Hmm?@>What was that?\
name ""
>As we fly on Galda's back, I sense something strange below us...@
>That's the Northern Mansion...@> That was where Chrome was, I believe.\
name "Luka"
>There's something in that house...@
>And it feels unpleasant.\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>I didn't feel anything.@
>Let's ignore it and keep going.\
name ""
name "Luka"
>How can you leave it alone?@
>What if people from nearby villages evacuated there and are being attacked!?\
name ""
lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
name "Alice"
>I have a stomach ache... I think I ate too much.\
name ""
name "Luka"
>You always overeat though.@> You're just scared...@
>...Galda, set us down here.\
name ""
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>You idiot...@
>How can you not understand a woman's feelings... You idiot...\
name ""
dwave 1,"se\habataki.ogg"
>Galda flies down, ignoring the grumbling Alice.@
>Stepping off her back, we return to the Northern Mansion.\
sean_change "bg055"
bgm "bgm\obakeyasiki.ogg"
name "Luka"
>As creepy as ever...\
name ""
>It smells musty, and looks gloomy and foreboding...@
>Forget Alice, not even I really want to step inside there.\
name "Luka"
>I'm certain I felt something unpleasant here...@
>Perhaps someone recently was killed...\
name ""
>It felt like the light of life was extinguished for someone.@
>I'm sure the one who did it is still here.\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>You sensed the loss of life from that far away?@
>Your perception abilities are turning quite monstrous, aren't they?\
name ""
>Alice tightly pushes up against my body as she mutters that.@
>If she's so scared, she should have just stayed with Galda...@>I don't know why she's trying to act so stubborn.\
csp 700:print 10,500
name "Luka"
>Hmmm?@>Is that?\
name ""
>I see a body, with nothing but skin and bones left, laying next to the stairs.\
>And there are two others, too...@
>Something sucked them dry recently.\
lsp 700,":a;chara\alice_st77.bmp",0,50:print 10,500
name "Alice"
>A...A ghost did it!?\
name ""
name "Luka"
>I don't know if it's a ghost, but something did it for sure.@
>We have to be careful...\
name ""
lsp 700,":a;chara\alice_st92.bmp",250,270:print 10,500
name "Alice"
>............\
name ""
name "Luka"
>Come on, let's keep moving...\
name ""
dwave 1,"se\asioto3.ogg"
csp 700
bg "bg\bg056.bmp",10,500
>Trembling, Alice goes up the stairs with me.@
>Is she able to fight like this...?\
>As I'm looking at Alice, suddenly something pops out!\
r@k@\
goto *shadow_start



*sean0334

bgm "bgm\obakeyasiki.ogg"
name ""
r@k@\
name "Luka"
>Eh...?@> Alice, where did you go?\
name ""
>After the fight, I look around me for Alice.@
>I figure she's cowering in a corner somewhere, but...\
name "Luka"
>I guess I'll check inside for now.\
name ""
>I don't think the only thing in this house was that Shadow Girl from before.@
>I cautiously take steps up the stairs...\
dwave 1,"se\asioto3.ogg"
sean_change "bg057"
>I'm back in the room where I fought those Zombie Girls a while ago.@
>But I don't see anything strange or out of place...\
name "Luka"
>What's with this creepy feeling...?\
name ""
lsp 700,":a;chara\gaistvine_st11.bmp",0,0:print 10,500
>There's a strange picture of a woman hanging on the wall.@
>The creepy sensation is coming from that...\
>It feels like many souls have been trapped by that picture.@
>I'm able to sense it now, unlike last time I was here...\
name "Luka"
>Come out.@>You're not just a normal picture, are you?\
name ""
lsp 700,":a;chara\gaistvine_st12.bmp",0,0:print 10,500
name "Painting Woman"
>.........\
name ""
dwave 1,"se\yami2.ogg"
lsp 700,":a;chara\gaistvine_st14.bmp",0,0:print 10,500
>The woman in the picture exudes strange magic energy!@
>And shows her true form!\
r@k@\
goto *gaistvine_start



*sean0335

bgm "bgm\obakeyasiki.ogg"
name ""
r@k@\
name "Luka"
>Sheesh, what's going on?@
>Hmm?\
name ""
name "Alice"
>Haaaaaaaaaaaaaaaaaaaaaaaaaaaaaa...\
name ""
>I hear a long, frail scream from below me...@
>It sounds like it came from the basement.\
name "Luka"
>Sheesh, she's so troublesome...\
name ""
>I knew I couldn't leave her alone...@
>I head down the stairs, approaching the source of the scream.\
dwave 1,"se\asioto3.ogg"
sean_change "bg058"
bgm "bgm\boss0.ogg"
lsp 702,":a;chara\chrom_st44.bmp",-50,0:print 10,500
name "Chrome"
>Ha ha ha!@>Try and run!@
>Taste my retribution!!\
name ""
name "Alice"
eng "Haaaa...":$sel6/
lsp 700,":a;chara\alice_st93.bmp",800,150
lsp 701,":a;chara\chromg_st11.bmp",860,0
for %move=0 to 1500 step 20
amsp 700,800-%move,150
amsp 701,860-%move,0
print 1:wait 30
next
\
name ""
name "Alice"
eng "Hyaaaa!!":$sel6/
lsp 700,":a;chara\chromg_st02.bmp",-750,-50
lsp 701,":a;chara\alice_st93b.bmp",-200,150
for %move=0 to 1300 step 20
amsp 700,-750+%move,-50
amsp 701,-200+%move,150
print 1:wait 30
next
\
name ""
>Alice is dashing around in a circle with tears in her eyes, as ghosts chase her...@
>And the one cheering those ghosts on...\
cspl 701,702
lsp 700,":a;chara\chrom_st42.bmp",-50,0:print 10,500
>It's the Necromancer, Chrome!\
name "Luka"
>Chrome!@>You're still in this mansion!?\
name ""
name "Chrome"
>Hahaha!@>Did you think I'd give up my studies that easily!?@
>I'll pulverize you two with my new techniques this time!\
name ""
r@k@\
goto *chrom2_start



*sean0336

bgm "bgm\obakeyasiki.ogg"
name ""
r@k@\
lsp 700,":a;chara\chrom_st28.bmp",0,0:print 10,500
name "Chrome"
>Mrgggg...@>I lost again...\
name ""
name "Luka"
>Didn't you promise not to do any more bad research?@
>Then why are you...\
name ""
name "Chrome"
>I kept my promise...@
>Ghost studies are totally harmless.@>I'm not grave-robbing, and I'm not killing anyone...\
name ""
name "Luka"
>Didn't you attack those three who came into the house?\
name ""
name "Chrome"
>I just threaten people who come with some ghosts to get them to leave...@
>Nothing more than that.\
name ""
name "Luka"
>But those three are dead...\
name ""
name "Chrome"
>Some strange monster sucked them to death.@
>She was evil, so I dealt with her.\
name ""
name "Luka"
>............\
name ""
>She doesn't seem to be lying...\
name "Luka"
>Then what's your connection with Promestein?@
>Are you helping them with their re-creation of the world?\
name ""
name "Chrome"
>I got technology for nanocarbons and high speed synapses from her.@
>Namely, the things I needed to make zombies...\
>I never actually met her, and you two beat me down before she was supposed to meet me in person...\
>I've never heard about re-creation or whatever.@
>I'm not lying.\
name ""
name "Luka"
>Hmm...\
name ""
name "Chrome"
>I was almost at a breakthrough in my necromantic research too, before you meddling kids showed up.@
>I just sort of got carried away...@> I didn't have any evil intent!\
name ""
name "Luka"
>..........\
name ""
>I don't think she's lying...@
>At the least, I don't think she has a connection to Ilias.\
name "Luka"
>...Alright, I believe you.@
>But why are you researching this stuff to begin with?\
name ""
bgm "bgm\hutuu2.ogg"
lsp 700,":a;chara\chrom_st27.bmp",0,0:print 10,500
name "Chrome"
>That's...@>To revive my ruined family.\
name ""
name "Luka"
>Revive your family?@
>So you studied zombies and ghosts?\
name ""
name "Chrome"
>My full name is Chrome Artiste...@
>The Artiste family proudly served the Monster Lord for generations.\
>Specializing in Spiritualism and Necromancy, we had powerful techniques as puppet masters.@
>Using our skills, we would amuse the Monster Lord...\
>But Alipheese the Fifteenth branded the skills as devilish and made them prohibited!\
>It ruined my family!\
name ""
name "Luka"
>I see...\
name ""
>So Alice's mother...@
>I wonder what made her decide to prohibit it?\
>Could it be because Alice's mother was scared of ghosts too...?\
name "Chrome"
>...So that's why I wanted to regain my family's honor.\
>I kept on studying, researching and practicing the spiritual and necromantic arts to the maximum!@
>All so I could show off my skills to the Monster Lord and have her recognize it!\
name ""
bgm "bgm\comi1.ogg"
lsp 700,":a;chara\alice_st94.bmp",225,250:print 10,500
name "Luka"
>The one foaming at the mouth over there is the Monster Lord...\
name ""
lsp 700,":a;chara\alice_st94.bmp",55,250
lsp 701,":a;chara\chrom_st26.bmp",170,0:print 10,500
name "Chrome"
>Wh...What!?\
name ""
lsp 700,":a;chara\alice_st74.bmp",-170,50:print 10,500
name "Alice"
>Urrrmmmmhggffff...\
name ""
lsp 701,":a;chara\chrom_st31.bmp",170,0:print 10,500
name "Chrome"
>...M...Master Monster Lord, d..did you find Chrome's Amazing Ghost Show fun!?\
name ""
lsp 700,":a;chara\alice_st82.bmp",-170,50:print 10,500
name "Alice"
>...Quit screwing around, you idiot!@
>You're banned from the Monster Lord's Castle for the next three hundred years!!\
name ""
lsp 701,":a;chara\chrom_st32.bmp",170,0:print 10,500
name "Chrome"
>Wawawa...\
name ""
>Alice finally returns to her senses to shout at Chrome.\
bgm "bgm\obakeyasiki.ogg"
lsp 700,":a;chara\alice_st71.bmp",-170,50:print 10,500
name "Alice"
>I see...@> So you are the younger of the Artiste sisters.@
>Due to your older sister's actions, your whole family was cast out...\
name ""
lsp 701,":a;chara\chrom_st28.bmp",170,0:print 10,500
name "Chrome"
>...My older sister...\
name ""
>Chrome looks uneasily at the floor.\
name "Chrome"
>I don't know why my sister went insane like that...@
>But I must clean the disgrace of my family.\
name ""
name "Alice"
>...My mother always thought your older sister was dangerous.@
>One wrong step, and she would have gone down the road of madness.\
>But my mother's choice was naive.@
>Instead of keeping her away, she pushed her two or three steps down that road of madness.\
>So my mother sent a subjugation force after her, and was forced to execute your older sister...@
>Was it the intense desire to seek the truth that drove her mad? Or...\
name ""
name "Luka"
>Just what happened?\
name ""
>As I ask, trying to figure out what event they are referring to...\
bgm "bgm\stein.ogg"
csp 701
lsp 700,":a;chara\shirom_st51.bmp",0,0:print 10,500
name "???"
>...Madness?@>I object to that.\
name ""
name "Luka"
>Who are you!?\
name ""
lsp 700,":a;chara\alice_st73.bmp",-170,50
lsp 701,":a;chara\shirom_st51.bmp",160,0:print 10,500
name "Alice"
>Where did you come from!?\
name ""
>Like Alice, I was completely unable to sense this person...@
>They must be quite skilled!\
csp 701
lsp 700,":a;chara\shirom_st51.bmp",0,0:print 10,500
name "???"
>For an artist who seeks the truth, there's no need to classify things into sanity and insanity.@
>Chrome...@>Didn't I teach you that many times over?\
name ""
lsp 700,":a;chara\chrom_st26.bmp",-170,0
lsp 701,":a;chara\shirom_st51.bmp",160,0:print 10,500
name "Chrome"
>That voice!@
>Y...You can't be...\
name ""
name "???"
>If you simply must separate insanity and sanity, then you'll always be one step away from the truth.\
dwave 1,"se\escape.ogg"
lsp 701,":a;chara\shirom_st01.bmp",160,0:print 10,500
>You are still quite immature, my unworthy little sister.\
name ""
>The strange woman casts off her coat...\
name "La Croix"
>I am La Croix... The right hand of Promestein.@
>A seeker of the truth of all dark techniques.\
name ""
name "Chrome"
>No... Shirome!?@
>But you died!\
name ""
name "La Croix"
>Ah... Shirome is already no longer in this world.@
>The current me is the Seeker La Croix.\
name ""
>So she's Chrome's sister...@
>And a subordinate of Promestein.\
>In addition to the feeling of power from her, there's something else...@
>She has more than just simple power to her.\
name "Chrome"
>But why are you here...?\
name ""
name "La Croix"
>Chrome, Chrome...@>I've told you this before, too.@
>The role of cleaning up failures is shared by those in the same profession.\
>I came here to dispose of your pathetic productions.@
>Such terrible failures...@>Your creations.@>And you yourself.\
name ""
lsp 700,":a;chara\chrom_st28.bmp",-170,0:print 10,500
name "Chrome"
>Sister...\
name ""
csp 701
lsp 700,":a;chara\shirom_st01.bmp",0,0:print 10,500
name "Luka"
>La whatever-you-are...@> Are you on Ilias' side!?@
>She's trying to exterminate monsters and humans alike you know!\
name ""
>I shout out a question, interrupting her insults.@
>Since she's a subordinate of Promestein, I already know the answer...\
lsp 700,":a;chara\shirom_st04.bmp",0,0:print 10,500
name "La Croix"
>...Sorry, but I don't care about the goal of my patron.@
>As long as they acknowledge my talent and guarantee my ability to research the dark arts...@
>They could be a Goddess or a Demon, I don't care.\
name ""
name "Luka"
>So you went to Ilias' side...@
>You don't care at all for the mass slaughter of monsters, friends or family!?\
name ""
lsp 700,":a;chara\alice_st73.bmp",-170,50
lsp 701,":a;chara\shirom_st04.bmp",160,0:print 10,500
name "Alice"
>Luka, that kind of questioning is useless...@
>She's a deviant who slaughtered countless monsters just to test her skills!\
name ""
name "Luka"
>Wh...What!?\
name ""
csp 701
lsp 700,":a;chara\shirom_st01.bmp",0,0:print 10,500
name "La Croix"
>The Disgraced Hero, Monster Lord, and my unworthy sister...@
>Unfortunately, I was not ordered to dispose of you yet.\
>Though simply leaving here without doing anything is rather uninspiring too.@
>For a master artist like myself, doing something like that would be the height of embarrassment.\
>Thus, I will showcase my invincible circus!@
dwave 1,"se\yami.ogg"
lsp 700,":a;chara\shirom_st11.bmp",0,0:print 10,500
>Have a glimpse of my Cirque du Croix!\
name ""
name "Luka"
>I won't let you do that!\
name ""
>She's a necromancer like her sister!@
>I have to beat her before she summons her zombies!\
name "Luka"
>Thunder Thrust!\
name ""
dwave 1,"se\tuki.ogg"
>I step in at once, and stab forward like thunder!\
lsp 700,":a;chara\cirque_st01.bmp",-170,50
lsp 701,":a;chara\shirom_st31.bmp",0,0:print 10,500
name "???"
>Bloody Fissure Thunder Thrust...\
name ""
dwave 1,"se\tuki.ogg"
>But in the next moment, a shadow emerges from the coffin, using the same technique...@
dwave 1,"se\break.ogg"
>Our two swords hit each other, and deflect each other's blows!\
name "Luka"
>N...No way!@
>The same skill as me...?\
name ""
csp 701
lsp 700,":a;chara\cirque_st01.bmp",0,50:print 10,500
name "???"
>You managed to use my skill well...@
>If I was in a flesh and blood body, I may have been outmatched.\
name ""
>A zombie elf, carrying a short sword was summoned...@
>And her skill with the blade seems far from ordinary.\
name "Luka"
>Who are you...?\
name ""
lsp 700,":a;chara\alice_st73.bmp",-170,50
lsp 701,":a;chara\cirque_st01.bmp",160,50:print 10,500
name "Alice"
>She's the Cursed Sword user Fernandez...@
>A legendary Elf, once known as the monster's greatest swordswoman!\
>...Don't let your guard down, something else is coming!\
name ""
name "Luka"
>Gah...!\
name ""
dwave 1,"se\ero_makituki1.ogg"
csp 701
lsp 700,":a;chara\shirom_st41.bmp",0,0:print 10,500
>Countless tentacles reach out from another coffin...@
dwave 1,"se\slash.ogg"
>Slashing as fast as I can, I manage to cut them all before they can reach my body.\
lsp 700,":a;chara\cirque_st51.bmp",-150,50
lsp 701,":a;chara\shirom_st41.bmp",0,0:print 10,500
name "???"
>Able to defend against my tentacles with a sword...@
>You're quite an interesting human.\
name ""
lsp 700,":a;chara\alice_st73.bmp",-170,50
lsp 701,":a;chara\cirque_st51.bmp",180,50:print 10,500
name "Alice"
>Queen Scylla...@
>She was poisoned decades ago, and the position is still vacant.\
name ""
name "Luka"
>The Queen Scylla!?@
>Such an important monster was made into the undead!?\
name ""
>...It's not just two.@
>There are more coming out of the coffin!\
csp 701
lsp 700,":a;chara\cirque_st31.bmp",50,0:print 10,500
name "???"
>Hehe... A human worth coiling around.@
>I'll tighten all around you, and squeeze it out...\
name ""
name "Alice"
>Queen Lamia...@
>She was poisoned at the same banquet as the Queen Scylla, and her position is vacant still too...\
name ""
lsp 701,":a;chara\cirque_st31.bmp",-170,0
lsp 700,":a;chara\cirque_st21.bmp",170,30:print 10,500
name "???"
>This place doesn't smell good...@> There's no sea breeze in the air.@
>I don't like it...@> But if it's the master's orders, then I guess there's no helping it.\
name ""
name "Alice"
>The Mermaid Pirate Queen Roza, renowned over the seven seas...@
>But she vanished in the middle of a voyage, and none from her crew were seen again.\
>Her unmanned ship was discovered later...@
>No bodies were found, but some traces of chemical weapons were detected...\
name ""
lsp 701,":a;chara\cirque_st21.bmp",170,30
lsp 700,":a;chara\cirque_st11.bmp",-190,0:print 10,500
name "???"
>Ahaha, a delicious looking human! \
name ""
name "Alice"
>Titania... A mutation of the fairy race...\
>She possessed huge magical power, and was very in tune with nature.@>But she went missing one day...\
name ""
lsp 701,":a;chara\cirque_st41.bmp",180,0:print 10,500
name "???"
>Is that the enemy I was summoned for?@
>If I can't have fun, I'll cut off your neck...\
name ""
name "Alice"
>The previous Queen Harpy, once called a God of War...@
>She had a huge talent for warfare, and led her race to wide ranging campaigns.\
>During one of her many battles with neighboring monster factions, she went missing.@
>She was thought killed, but her body was never recovered...\
name ""
name "Luka"
>Such legendary figures... All zombies?\
name ""
lsp 700,":a;chara\cirque_st01.bmp",-280,50
lsp 702,":a;chara\cirque_st51.bmp",0,50
lsp 701,":a;chara\cirque_st21.bmp",250,30:print 10,500
>Cirque du Croix...@
>Past Queens, along with legendary figures from history...@
>Seeing them all in front of me is almost too much to take.\
csp 702
lsp 700,":a;chara\alice_st73.bmp",-170,50
lsp 701,":a;chara\shirom_st01.bmp",160,0:print 10,500
name "Alice"
>La Croix...@>You got your hands on quite powerful corpses.@
>You assassinated them all!@> Any high-ranking monster you had a chance to kill!\
>Poison, surprise attacks...@>Anything you could!\
name ""
name "Luka"
>Wh...What!?\
name ""
name "Alice"
>Then you showed off all of them as zombies before my mother.@
>That is why mother banned this horrible technique!\
name ""
name "Luka"
>.............\
name ""
>She is insane...@
>Just how many has she killed to test out her own techniques?\
lsp 700,":a;chara\chrom_st26.bmp",-170,0
lsp 701,":a;chara\shirom_st01.bmp",160,0:print 10,500
name "Chrome"
>S...Sister...\
name ""
lsp 701,":a;chara\shirom_st02.bmp",160,0:print 10,500
name "La Croix"
>See well, Chrome.@>This is the true dark arts.@
>Your half-hearted creations will never match up.\
csp 701
lsp 700,":a;chara\shirom_st21.bmp",0,0:print 10,500
>Now then...@>I'll introduce the newest member of Cirque du Croix to the public for the very first time!\
>Alipheese the Sixteenth... I so dearly wanted to show off my masterpiece to you personally.\
name ""
name "Alice"
>T...To me?\
name ""
name "Luka"
>Urhg, another powerful zombie?\
name ""
>The two of us hold our breath as the coffin opens again...\
dwave 1,"se\yami.ogg"
lsp 701,":a;chara\shirom_st21.bmp",0,0
lsp 700,":a;chara\alice15th_st31b.bmp",-160,0:print 10,500
name "???"
>Where... Am I...?@
>I am the Monster Lord...@> Other than that... I remember nothing...\
name ""
lsp 700,":a;chara\alice_st81.bmp",-170,50
lsp 701,":a;chara\alice15th_st31b.bmp",170,0:print 10,500
name "Alice"
>N...No!@>Mother!?\
name ""
lsp 701,":a;chara\shirom_st02.bmp",160,0:print 10,500
name "La Croix"
>Yes!@> The previous Monster Lord, Alipheese the Fifteenth!@> In the undead!@
>I am the one and only master to create a zombie out of a Monster Lord!\
>See, Chrome!@> See a masterpiece of the dark arts!\
name ""
lsp 700,":a;chara\alice_st82.bmp",-170,50:print 10,500
name "Alice"
>You!!!@> I will never forgive this!\
name ""
>I manage to catch Alice a split second before she pounced at La Croix.\
name "Luka"
>Calm down, Alice...@
>She's not an opponent you can attack in a blind rage!\
name ""
csp 701
lsp 700,":a;chara\alice15th_st31b.bmp",0,0:print 10,500
>No...@>She may not even be an opponent you could fight calmly, either.\
>The power coming from the zombie of Alipheese the Fifteenth is incredible.\
lsp 700,":a;chara\shirom_st01.bmp",0,0:print 10,500
name "La Croix"
>Now then... I apologize for ruining the climax, but I must go.@
>I was not yet ordered to dispose of you.\
>Thus, I will end at just showing their faces.@
>You will get to see the true power of my dark arts later...\
name ""
dwave 1,"se\escape.ogg"
>The members of the Cirque du Croix vanish back into their coffins one after another.@
>Just like she said, they only showed their faces...\
name "Luka"
>I see...@
>She just wanted to show Alice her mother as a zombie to fuel her hatred.\
>Then using that hatred to get us to challenge you, your true aim is our corpses...\
name ""
lsp 700,":a;chara\shirom_st02.bmp",0,0:print 10,500
name "La Croix"
>Oh my, you do seem to have something in that head of yours.@
>I do so look forward to playing with your corpses...\
name ""
dwave 1,"se\asioto3.ogg"
>La Croix's coffins vanish as she steps toward the exit of the mansion.\
name "La Croix"
>The disgraced Hero's zombie, and the Monster Lord mother and daughter zombie team...@
>That will be my ultimate piece.\
name ""
lsp 700,":a;chara\alice_st82.bmp",-170,50
lsp 701,":a;chara\shirom_st02.bmp",160,0:print 10,500
name "Alice"
>I'm going to kill you!!!\
name ""
name "Luka"
>She's provoking you, Alice...\
name ""
csp 701
lsp 700,":a;chara\shirom_st02.bmp",0,0:print 10,500
>La Croix slowly walks out, as I hold Alice back.@
dwave 1,"se\asioto3.ogg"
csp 700:print 10,500
>Finally, she leaves the basement.\
>Just as fast, the horribly evil aura from her vanishes too.\
bgm "bgm\obakeyasiki.ogg"
lsp 700,":a;chara\alice_st81.bmp",0,50:print 10,500
name "Alice"
>I'm going to kill her!@
>Disgracing my mother's corpse...!\
name ""
name "Luka"
>I know, Alice...@> I'd never forgive someone doing that to my mother's corpse, either.\
>That's why we have to be careful, and not rush into action...@
>Because we have to defeat her, no matter what.\
name ""
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>I know that...@> I can't believe I'm being admonished by you.\
name ""
>Alice finally seems to have calmed down...@
>But the other one here seems to still be in shock.\
bgm "bgm\hutuu2.ogg"
lsp 700,":a;chara\chrom_st28.bmp",0,0:print 10,500
name "Chrome"
>Sister... My fault...@
>She became crazy because of that...\
name ""
name "Luka"
>..."That"?\
name ""
name "Chrome"
>It was a long time ago...@
>Back when we were still happy together.\
>I made a stupid mistake in an experiment, and caused an explosion.@
>My sister protected me, and became seriously injured as a result.\
>Ever since then, she started acting really odd...@
>Probably because she was disgusted with me.\
name ""
name "Luka"
>............\
name ""
>Protecting Chrome, La Croix was seriously injured...@
>I guess these two sisters shared a deep connection.\
>But now La Croix has completely changed from who she was.@
>Was it because of Chrome's experiment? Or something else...?\
lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
name "Alice"
>No matter the circumstances, we cannot leave her alone.@
>Just how much energy is needed to maintain those zombies?\
>We have to destroy them all, to stop there being thousands of victims...\
>Of course, my mother's zombie too...\
name ""
name "Luka"
>Yes...@> Your mother deserves to rest in peace, Alice.\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>I'll have to borrow your power, Luka...@>I'm counting on you.\
>Now no more standing around talking.@
>The world is falling apart around us...\
name ""
name "Luka"
>That's right, let's go!@
>Chrome, what are you going to do...?\
name ""
lsp 700,":a;chara\chrom_st28.bmp",0,0:print 10,500
name "Chrome"
>..........\
name ""
>Chrome just silently stares at the floor.@
>It doesn't look like she's focused on anything...\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>...Let's leave her alone for a while.@
>I don't think she'll do anything sinister again.\
name ""
name "Luka"
>Yeah, you may be right...\
name ""
dwave 1,"se\asioto3.ogg"
csp 700:print 10,500
>Thus, full of bitter feelings, we leave the mansion.@
>For our next location...\
r@k@\
mov %ivent05,2
mov %gloval1_story_sinkou,14:gosub *savegloval1
bgm "bgm\field4.ogg"
goto *map9



*sean0336x

sean_change "bg140"
gosub *setwindow_01p
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>We don't have a reason to head there again.\
name ""
name "Luka"
>You're right...@>I was just thinking about Chrome...\
name ""
>Her oldest sister, that she thought dead, showed up as an enemy.@
>I'm sure her shock is nothing small.\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>I understand that you're worried about it, but we have more pressing matters.@
>Once things have been settled, we can come back to check on her.\
lsp 700,":a;chara\alice_st77.bmp",0,50:print 10,500
>...I...It's not that I'm scared of going back or anything!\
name ""
name "Luka"
>Yes, yes, I know...\
name ""
csp 700:print 10,500
>It's true we need to prioritize the threats around us, though.@
>Now then, for our next location...\
return



*sean0337

gosub *setwindow_01
bg "BG\bg140.bmp",10,1500
name "Luka"
>Alright, let's go to the Forest of Spirits!\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Once you get back Sylph, we'll head straight to the Sabasa region.@
>Have you finished up everything here?\
name ""
csel "Yes",*sean0337b,"Not yet...",*sean0337a



*sean0337a

csp 700:print 10,500
name "Luka"
>No, there's still some things I need to do...\
name ""
>Now then, for our next location...\
bgm "bgm\field4.ogg"
goto *map9



*sean0337b

csp 700:print 10,500
name "Luka"
>Let's go to the Forest of Spirits!\
name ""
>According to Tamamo, the Four Spirits were sent back to their original dwellings.@
>I guess I should pick up Sylph first on the way...\
dwave 1,"se\habataki.ogg"
sean_change "bg061"
bgm "bgm\seireinomori.ogg"
>Thus, we head back into the Forest of Spirits.\
>As before, this place has a strange atmosphere...@
>You would never think the world was on the brink of destruction here.\
name "Luka"
>...There's an angel nearby.@
>I don't know how far, but I can feel her...\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Hmph... Obviously there would be one.@
>They wouldn't want you to get the spirits back after going through so much effort to strip you of them.\
name ""
>Suddenly, the bushes in front of us start shaking!\
csp 700:print 10,500
name "Luka"
>She's coming!?\
name ""
>I reach for my sword...@>But quickly realize I was mistaken.@
lsp 700,":a;chara\elf_st01.bmp",100,-100:print 10,500
>One of the Elves who lives in the forest emerges from the bush.\
name "Elf"
>Ah... You two!@
>This is bad, there's an angel in the forest!\
dwave 1,"se\fall2.ogg"
for %move=0 to 600 step 10
amsp 700,100,-100+%move
print 1:wait 10
next
csp 701:print 1
>...Kyaa!\
name ""
>When the Elf takes a step forward, she falls into the ground!@
>Is it the angel's attack!?\
bgm "bgm\comi1.ogg"
lsp 700,":a;chara\tfairy_st02.bmp",220,130:print 10,500
name "Fairy Twin A"
>Extra deep pitfall! \
name ""
name "Fairy Twin B"
dwave 1,"se\lvup.ogg"
>We beat the angel!\
name ""
name "Fairy Twin A"
dwave 2,"se\aqua5.ogg"
>Fill it with water!\
name ""
name "Fairy Twin B"
dwave 3,"se\sio.ogg"
>Throw in mud!\
name ""
name "Elf"
>Kyaaaaa!!\
name ""
name "Luka"
>...........\
name ""
>The Elf screams at the Fairies as they throw things into the pit.@
>After a moment they finally stop, and the Elf climbs out of the pit.\
lsp 700,":a;chara\elf_st01.bmp",-60,-100
lsp 701,":a;chara\tfairy_st03.bmp",360,130:print 10,500
name "Fairy Twin A"
>...Ehhhhh?@> Big Elfy?\
name ""
name "Fairy Twin B"
>What are you doing down there...?\
name ""
name "Elf"
>I won't let you off lightly for that!\
name ""
name "Fairy Twin A"
>Run awaaaay!\
name ""
name "Fairy Twin B"
eng "Waaah!":$sel6/
dwave 1,"se\asioto1.ogg"
for %move=0 to 860 step 20
amsp 700,-60+%move,-100
amsp 701,360+%move,130
print 1:wait 15
next
\
name ""
cspl 700,701:print 1
>The Elf runs off in pursuit of the Fairies...\
name "Luka"
>............\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>............\
name ""
>...This place still seems safe for now.@
>Though there's still an angel lurking somewhere...\
bgm "bgm\seireinomori.ogg"
name "Luka"
>Be careful, Alice...\
name ""
name "Alice"
>That's my line, idiot.\
name ""
>Fully on guard, we warily creep deeper into the forest...\
dwave 1,"se\asioto2.ogg"
sean_change "bg061"
name "Luka"
>What's this smell?\
name ""
lsp 700,":a;chara\alice_st79.bmp",0,50:print 10,500
name "Alice"
>It smells delicious... \
name ""
>There's a very fragrant aroma drifting in from somewhere...@
>But inside that smell, I also get a hint of something poisonous.\
name "Luka"
>It feels wrong...@
>Don't be tempted by the smell, Alice.\
name ""
name "Alice"
>I know that.@> Don't look down on me.\
name ""
>Even though she's saying that, I still see her drooling...@
>This is a dangerous situation.\
lsp 700,":a;chara\alice_st72.bmp",0,50:print 10,500
name "Alice"
>Mmm?@> What is that fruit?\
name ""
>Alice stumbles upon something strange.@
>A huge, unknown fruit is hanging off a giant branch on this towering tree.\
>I've never seen fruit like this before...@>And it appears to be the source of the smell.\
lsp 700,":a;chara\alice_st79.bmp",0,50:print 10,500
name "Alice"
>Yaay!@>It looks delicious! \
name ""
name "Luka"
>Ah...@>Oi, don't!\
name ""
>The moment Alice springs up, aiming at the fruit...@
dwave 1,"se\ero_syokusyu2.ogg"
>The fruit suddenly opens up, revealing a giant mouth!\
lsp 700,":a;chara\alice_st77.bmp",0,50:print 10,500
name "Alice"
>Wah!\
name ""
dwave 1,"se\miss.ogg"
>Alice sees it just in time, and barely manages to dodge the giant mouth!@
>So it was some kind of trap after all!\
name ""
csp 700:print 10,500
name "???"
>Oh my, oh my... So you noticed...@
>Just a little faster, and I could have eaten the Monster Lord...\
name ""
dwave 1,"se\ero_makituki5.ogg"
>The fruit suddenly opens up, revealing flowers and female body parts!\
r@k@\
goto *berryel_start



*sean0338

bgm "bgm\seireinomori.ogg"
name ""
r@k@\
name "Luka"
>Whew...@>There sure is a lot of variety among angels.@
>Was that another offshoot of herself that Ilias made?\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Did she mix her own cells into the embryos of creatures on the ground?@
>Perhaps she wasn't content with just making offshoots of herself.\
name ""
name "Luka"
>Anyway, Sylph must be close.@
>Otherwise a high ranking angel like her wouldn't have been waiting here...\
name ""
>And I don't think she was the only one, either.@
>I still feel the signs of at least one more angel in the area.\
name "Alice"
>There might be another one here...@
>Be careful not to fall into a trap like last time.\
name ""
name "Luka"
>I'm not the one needing that warning...\
name ""
csp 700:print 10,500
dwave 1,"se\aura.ogg"
>Suddenly, a soft light appears from the sky.@
>Another angel is descending from the Heavens...\
r@k@\
goto *revel_start



*sean0339

bgm "bgm\seireinomori.ogg"
name ""
r@k@\
name "Luka"
>Alright, that's the last of them...@
>I don't sense any more angels.\
name ""
>Sending two high ranking angels at me...@> They really didn't want to make this easy.@
>It looks like I sealed off the angels who were guarding this forest.\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>...........\
name ""
>...But Alice still looks dubious.\
name "Luka"
>What's wrong, Alice?@
>Do you still sense something?\
name ""
name "Alice"
>No...@>I just wasn't able to sense the signs of those angels.@
>You have quite the amazing radar in that head of yours.\
>Even without my power restricted, I may have struggled to detect them.\
name ""
name "Luka"
>R...Really?\
name ""
name "Alice"
>...That's why I'm anxious.@
>Your power is already something a full human could never reach.\
>And there's going to be compensation needed for surpassing the limits of a human body...@
>...Luka, don't overdo it...\
name ""
name "Luka"
>Yes, I understand...@> Now let's go!\
name ""
csp 700:print 10,500
>If I can get back the power of the Four Spirits, I'll stop needing to rely solely on the angel power.@
>And Sylph should be very close...\
>We move on, pushing to the deepest part of the forest.\
dwave 1,"se\asioto2.ogg"
sean_change "bg061"
name "Luka"
>Uwa...@> What a strong wind...\
name ""
dwave 1,"se\wind3.ogg"
>In the deepest part, where Sylph originally was, a huge storm is blowing.@
>It's like a localized hurricane.\
>What is Sylph doing?\
name "Luka"
>Oooooiii!@>Syyyylph!@
>...Eh?\
name ""
bgm "bgm\yonseirei2.ogg"
lsp 700,":a;chara\gnome_st35.bmp",250,150:print 10,500
>Standing in the eye of that small hurricane... Is Gnome.@
>But with the winds circling like crazy around her, she's just standing there limp.\
name "Luka"
>Gnome...!?@
>What are you doing in the Forest of Spirits?\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\gnome_st35.bmp",400,150:print 10,500
name "Alice"
>I see...@> So that's how they're keeping the spirits contained without killing them.\
>If they were sent back to their original habitat, they would slowly regain their power.@
>So they sent them to the original habitats... But to the one that matches their conflicting element.\
name ""
name "Gnome"
>...........\
name ""
>So they put the earth spirit, weak to wind, in the middle of the wind-based Forest of Spirits...@
>It seems like it had a huge effect on her...@> She looks really weak right now.\
name "Luka"
>Ok Gnome, let's re-contract again quickly.@
>That way you can rest inside me...\
name ""
name "Alice"
>No... The seal against the spirits is on a global scale, remember.@
>You can't just contract right away like you did before.\
name ""
name "Luka"
>...Then what do I need to do?\
name ""
csp 701
lsp 700,":a;chara\gnome_st11.bmp",0,0:print 10,500
name "Gnome"
>..........\
name ""
>Silently standing in front of me, Gnome suddenly tears off my shirt!\
name "Luka"
>Hyaa!?@> What are you doing!?\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\gnome_st11.bmp",160,0:print 10,500
name "Alice"
>Since you can't use the previous contract, you need a much more powerful one this time...@
>Is that what you're doing, Gnome?\
name ""
name "Gnome"
>...........\
name ""
>Gnome nods as she throws my shirt to the side.\
name "Luka"
>I know a strong contract is needed, but why did you take off my shirt?\
name ""
name "Alice"
>Because it's necessary for the contract.@> You can't just pledge with your spirit this time, you have to pledge with your body too.\
>...In other words, sex.\
name ""
name "Luka"
>S...Sex!?@
>Wh...What!?\
>W...Wait a second!@
>I'm not prepared for this!\
name ""
>Despite my protests, Gnome continues stripping me.@
>In a moment, I'm left completely naked.\
name "Alice"
>...Hurry up and finish.@
>I'll be cutting down trees over there...\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,500
>Pouting, Alice heads off into the trees.@
csp 701
lsp 700,":a;chara\gnome_st11.bmp",0,0:print 10,500
>All that's left is me, completely naked, and Gnome.\
r@k@\
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
goto *sean0340



*sean0340

name "Gnome"
>...........\
name ""
name "Luka"
>Waah!@>S...Stop!\
name ""
>Gnome's mud dolls jump on my hands and feet, stopping me from resisting.@
>Stripping off her own clothes, Gnome slowly approaches me.\
name "Gnome"
>...........\
name ""
lsp 700,":a;chara\gnome_hb1.bmp",0,0:print 10,500
>Gnome silently climbs on top of me.@
>Grabbing hold of my penis with her small hand, she guides it to her vagina.\
mov %hseanwave,2:hseanwave
>With a quick pull, she brings me into her small opening.\
name "Gnome"
>...........\
name ""
name "Luka"
>Ah... Ah!\
name ""
>As soon as I'm in her, I let out a small cry.@
>It feels like Gnome's vagina is filled with some sort of odd slime-like substance.\
>The sticky fluid feels like it's clinging to my penis inside her half mud vagina.\
>Furthermore, the inside of her vagina is moving around in waves, almost as if it was alive.\
name "Luka"
>Ahh... A...Amazing...@
>It's moving inside...\
name ""
name "Gnome"
>...........\
name ""
>Gnome stares at my moaning face as she violates me.@
>She's just observing my shameful state...\
>This small spirit, looking like a young girl herself, is staring at me as I writhe in pleasure.@
>Waves of immorality and humiliation wash over me.\
name "Luka"
>Ahhh... Stop staring at me...\
name ""
name "Gnome"
>...........\
name ""
>Ignoring me, Gnome just keeps staring at me as my face goes slack in ecstasy.\
>At the same time, the waving motions of the sticky fluid inside her vagina continue, driving more and more pleasure into my writhing body.\
name "Luka"
>Ahh... Stop that...\
name ""
name "Gnome"
>...........\
name ""
>Egged on by my reactions, Gnome starts to move her vaginal walls even more.\
>The sticky touch inside of her vagina swirls and wraps around my penis, as the waving motion of her vagina mixes it all around me.\
>As my mouth opens in a moan, my face going loose in ecstasy, I feel myself nearing a big climax.\
>A weak ache fills my lower body as my waist jerks up into her.@
>If I feel any more of this, I really will explode!\
name "Luka"
>Ahh... Take it out...@
>I'm going to come inside...\
name ""
name "Gnome"
>...........\
name ""
>Keeping her same expression, Gnome just nods at me, as if saying "go ahead".@
>At the same time, the waving motions inside her vagina get even more intense.\
name "Luka"
>No... I'm coming!\
name ""
name "Gnome"
>...........\
name ""
>Gnome impatiently stares at me as she waits for my ejaculation.@
>Controlling her vagina, she does everything she can to make me come in her.\
>My endurance finally reaching my utmost limit, the desire to release in her fills every inch of my body.@
>Relaxing my waist, I let the sensation run through my body.\
name "Luka"
>Ahhh...\
name ""
gosub *syasei1
lsp 700,":a;chara\gnome_hb2.bmp",0,0
gosub *syasei2
>My penis twitches inside her, as my semen shoots straight into Gnome's vagina.@
>At the same time, the normal weakness expected when a monster makes a man orgasm blows through me.\
>With just this single orgasm, an intense amount of energy was sucked from me.\
name "Gnome"
>...........\
name ""
>Despite her deadpan expression, Gnome's eyes look satisfied.@
>Staring right at me for a moment, she suddenly starts the waving motions inside her vagina again.\
name "Gnome"
>...........\
name ""
name "Luka"
>Ahh... Don't squeeze...!\
name ""
>As the strange wave motions continue inside her, the sticky liquid inside Gnome's vagina suddenly presses down, clinging to my penis.\
>The sticky liquid presses on my sensitive glans as it moves around, bringing new pleasure to my weak body.\
name "Luka"
>Ah... Haa...\
name ""
name "Gnome"
>...........\
name ""
>Checking my reactions to everything she does, Gnome continues toying around with my penis inside her.\
>And it's like she is learning new things as she goes...@>Unlike the first time, she's focusing heavily on my glans, as if she just discovered a man's weak point.\
>At her mercy, I'm already driven to the verge of another climax inside her vagina.\
name "Luka"
>Ahh... I'm going to come again...\
name ""
name "Gnome"
>...........\
name ""
>Not stopping her movements for a moment, Gnome easily guides me to another forced climax inside her.\
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\gnome_hb4.bmp",0,0
gosub *syasei2
>At the same time as my ejaculation, Gnome's vagina suddenly squeezes down, using her vagina to greedily milk out my semen.\
name "Luka"
>Ahh...\
name ""
>The intense pleasure spreads through my body along with the weakness, as my energy itself is absorbed by Gnome.\
mov %hseanwave,0:hseanwave
name "Gnome"
>...........\
name ""
>On the other hand, Gnome looks happy after absorbing my energy.@
>It looks like she got enough nourishment, and is satisfied.\
name "Luka"
>Ah...\
name ""
>It was only two orgasms, but I feel completely drained of strength.@
>I don't even think I can stand for a while...\
gosub *anten
>...........\
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_seirei1,1
mov %skill03,4
bg "bg\bg061.bmp",10,1500
bgm "bgm\epilogue2.ogg"
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Have you finished, idiot?\
name ""
>After the ceremony is over, Alice comes back pouting.@
>I guess she's still annoyed...\
name "Luka"
>Yes, we were able to properly re-contract...@
>Gnome, can you hear my voice?\
name ""
lsp 700,":a;chara\gnome_st31.bmp",-40,40:print 10,500
name "Gnome"
>...........\
name ""
>I can certainly feel Gnome inside me...@
>But due to the seal, she feels far weaker than before.\
name "Luka"
>But I don't think we can fight together like we did before...\
name ""
>If I call Gnome, I get a great burst of strength.@>Enough to break out of any hold of the enemy.\
>In addition, I reduce damage taken, and my attacks get far more weight behind them.\
>But... I don't think it will work with Fallen Angel Dance or a serene state for a while...@
>I think I can only hold one elementally affiliated attribute at one time.\
name "Luka"
>In order to regain your true power, we will need to deal with that seal somehow...@
>Hmmm?\
name ""
dwave 1,"se\miss.ogg"
lsp 700,":a;chara\gnome_st33.bmp",-40,40:print 10,300
wait 400
lsp 700,":a;chara\gnome_st32.bmp",-40,40:print 10,400
dwave 1,"se\miss.ogg"
lsp 700,":a;chara\gnome_st33.bmp",-40,40:print 10,300
name "Luka"
>...Are you lonely without Sylph?@
>Let's hurry up and pick up the others, so you can be together again!\
name ""
lsp 700,":a;chara\gnome_st31.bmp",-40,40:print 10,500
name "Gnome"
>...........\
name ""
>At any rate, I was able to re-contract with Gnome...@
>Now for the remaining three spirits!\
csp 700:print 10,500
name "Luka"
>Alright, next is the Safaru Desert!@
>It should be... Sylph, right?@>The opposite element!\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Hmph.@>Idiot.\
name ""
name "Luka"
>...Why are you in such a bad mood?\
name ""
>Thus I reclaimed Gnome, though she is still weakened.@
>Our business here is over with...\
>Our next destination is the Sabasa Region.@
>I'm sure the Sabasa Castle is also under attack...\
name "Luka"
>Let's go to Sabasa Castle first.@
>If anything happened to the King, the hope of the desert people would...\
dwave 1,"se\ero_makituki1.ogg"
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
>...S...Stop that...!\
name ""
name "Alice"
>...........\
name ""
>Alice's small tail coils around my leg.@
>For some reason, she's turning into an incredibly pouty child...\
name "Luka"
>A...Anyway, let's get on Galda!@
dwave 1,"se\ero_makituki2.ogg"
>Hey!@> S...Stop coiling around me!\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>...........\
name ""
csp 700
bg "BG\bg140.bmp",10,1500
>Thus, we head toward the northeast...@
>Toward the hot Sabasa Region, where Sylph should be waiting...\
dwave 1,"se\habataki.ogg"
bgmstop
sean_change "bg001"
bgm "bgm\stein.ogg"
lsp 700,":a;chara\stein_st02.bmp",-190,0
lsp 701,":a;chara\eden_st22.bmp",170,0:print 10,500
name "Promestein"
>The Hero Luka seems to have regained Gnome's power...\
if %ivent18<2 mov $sel1,"How pathetic..."
if %ivent18=2 mov $sel1,"In addition, your invasion of San Ilia failed... How pathetic."
eng $sel1:$sel6\
name ""
if %ivent18<2 skip 10
name "Eden"
>.......@
>Isn't that because your Chimeric Beasts failed to perform?\
name ""
name "Promestein"
>Who was it that declared they could perform the invasion with only their own forces?@
>Well, I am to blame for the unexpected fragility of the Chimeric Beasts.\
>It appears I need to strive further in my research...\
name ""
name "Eden"
>Be careful with that flapping mouth of yours, Promestein...@
>You don't honestly consider yourself equal to me?\
name ""
name "Promestein"
>No, no...@>Of course I don't consider myself the same as a great Seraph like you.@
>After all, I challenged the Hero Luka directly and lost.\
name ""
lsp 701,":a;chara\eden_st21.bmp",170,0:print 10,500
name "Eden"
>...If you understand, then good.@
>Keep this in mind, Promestein.@
>I can see through you, to the plotting you perform behind the scenes.\
name ""
name "Promestein"
>Hah...@> I'm a heartfelt supporter of Goddess Ilias, your concern is unnecessary.@
>You must take heed of your own duties, though...\
>I wonder how she thinks of you now?\
name ""
name "Eden"
>...Ilias trusts me from the bottom of her heart.@
>You lesser born angels couldn't possibly understand her honorable heart as I do.\
>Now then, I must return to my supreme command over the entire armies.@
>Promestein, continue devoting yourself to Goddess Ilias...\
name ""
name "Promestein"
>Haha...@>As you wish, oh great Seraph.\
name ""
lsp 701,":a;chara\eden_st22.bmp",170,0:print 10,500
name "Eden"
>...........\
name ""
>Glaring at Promestein with complete hatred in her eyes...@
dwave 1,"se\escape.ogg"
csp 701:print 10,500
>She slowly departs from the room.\
lsp 700,":a;chara\stein_st01r.bmp",-190,0:print 10,500
name "Promestein"
>Hmph.@>The Third, huh?\
name ""
r@k@\
if %ivent14=0 goto *sean0344x
goto *sean0340a



*sean0340a

bgmstop
sean_change "bg062"
bgm "bgm\kiki3.ogg"
lsp 700,":a;chara\mob_heisi1.bmp",-170,0
lsp 701,":a;chara\c_chariot_st01.bmp",170,0:print 10,500
name "Chimera Chariot"
>Haha... Humans are so frail.\
name ""
name "Soldier"
>Uwaaaa!\
name ""
dwave 1,"se\karaburi.ogg"
>A large, strange looking monster is mowing down groups of soldiers.@
>At the same time, giant tentacles are reaching out, breaking up their formation.\
name "Soldier"
>Damn it!\
name ""
dwave 1,"se\tuki.ogg"
>A soldier rushes in wielding a huge spear, trying to maintain the line.@
dwave 2,"se\ero_makituki2.ogg"
>But it isn't enough... He gets coiled up in her tentacles.\
name "Soldier"
>Gah... Let me go!\
name ""
name "Chimera Chariot"
>Oh, so there are some soldiers with a backbone after all...@
>Well then...@> Time to feast.\
name ""
name "Soldier"
>Ahhhh!!\
name ""
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov %hseanwave,12:hseanwave
csp 701
lsp 700,":a;chara\c_chariot_h1.bmp",0,0:print 10,500
>Wrapped in tentacles, the soldier can't do anything as he's brought inside the Chimera's giant mouth, covering his lower body in her saliva.\
>Digestive juices are mixed in with her saliva, quickly melting away the soldier's armor and clothes.\
>With his lower body now exposed, he feels her warm mouth directly on his skin...\
name "Chimera Chariot"
>Strong humans sure do taste delicious...@
>I'll lick you until you melt away.\
name ""
name "Soldier"
>S...Stop... Ahh!\
name ""
>Her thick tongue coils around his legs, rubbing her warm saliva directly into his body.@
>The tip of her tongue flicks and licks his penis, already erect from the feeling of being sucked on.\
>Focusing on it, the Chimera starts licking it with even more intensity.\
name "Soldier"
>Ah...!@> Urhg!\
name ""
name "Chimera Chariot"
>I'll suck on you like candy...@
>Hehe, it feels good for you too, doesn't it?\
name ""
>The giant mouth sucks on his body, just like he was a piece of candy to be savored.@
>Her relentless tongue continues licking and prodding his erect penis at the same time, sending him twitching in pleasure.\
name "Soldier"
>S...Stop... Haaa...\
name ""
gosub *syasei1:gosub *syasei2
>Covered in saliva and being sucked on, the soldier reaches a miserable ejaculation.\
name "Chimera Chariot"
>Oh dear, you came while being eaten...@
>But now you don't have any regrets, right?\
>Then allow me to swallow you...\
name ""
name "Soldier"
>Stop... Stoooop!\
name ""
>The Chimera's sucking gets far more intense, slowly drawing the struggling soldier deeper inside her mouth...\
name "Soldier"
>Ahhhh!\
name ""
lsp 700,":a;chara\c_chariot_h2.bmp",0,0:print 10,500
>With a final scream, the soldier is sucked into the Chimera's stomach...\
name "Soldier"
>Ah...ah...\
name ""
>Submerged in the powerful gastric juices, he is digested away as food for the giant Chimera in moments...\
mov %hseanwave,0:hseanwave
name "Chimera Chariot"
>Hehe, thanks for the meal...@
>Now the next morsel is...\
name ""
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_etc4,1
bgm "bgm\kiki3.ogg"
lsp 700,":a;chara\mob_heisi1.bmp",-170,0
lsp 701,":a;chara\mob_sensi2.bmp",170,0:print 10,500
name "Grandmaster Knight"
>Guh...!@>Terumi Cavalry Corps, go around to her side!@
>Cooperate with the Owen Corps for a pincer attack!\
name ""
lsp 700,":a;chara\mob_sensi2.bmp",-170,0
lsp 701,":a;chara\c_chariot_st01.bmp",170,0:print 10,500
name "Chimera Chariot"
>That human looks delicious, too...\
name ""
>The monster's eyes lock on the Grandmaster Knight commanding the troops next.@
>With unimaginable speed, she rushes toward him...\
name "Chimera Chariot"
>Hehe, time to feed...\
name ""
name "Grandmaster Knight"
>Urhg!\
name ""
>The moment the tentacles are about to coil around him...\
name "Luka"
>Earth Rumbling Decapitation!\
name ""
dwave 1,"se\karaburi.ogg"
lsp 2,":c;effect\earth.bmp",0,0:print 1
wait 300
csp 2:print 18,500,"system\mask01.jpg"
dwave 1,"se\bom2.ogg"
quake 10,1000
name "Chimera Chariot"
>W...Who!?\
name ""
dwave 1,"se\damage2.ogg"
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
dwave 2,"se\syometu.ogg"
csp 701:print 99,4500,"system\breakup.dll/urb"
>The Chimera Chariot is sealed in the form of a tiny lion!\
lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
name "Luka"
>Are you alright!?@
>Ah... You're the one always next to the King!\
name ""
name "Grandmaster Knight"
>You're... The Hero Luka!@
>Did you come to rescue us!?\
name ""
name "Luka"
>Well...@>I was on my way to the castle when I saw you under attack.\
name ""
>While flying toward Sabasa Castle, we saw this group of soldiers locked in combat in the desert.\
>The Chimeric Beasts looked like they were about to break the line, and I jumped right into the middle of the fray before I could think about it.\
name "Luka"
>By the way, is the King safe!?\
name ""
name "Grandmaster Knight"
>Actually...\
name ""
bgm "bgm\kiki2.ogg"
>With a clouded look on his face, the Knight explains about what happened.@
>The Castle was attacked by surprise, and the vampires were locked with the King inside the Castle.\
>At almost the same time, swarms of Chimeric Beasts attacked.@
>Even without the King, the army has managed to hold off the swarms so far.\
name "Grandmaster Knight"
>It has been a few hours since then, and I haven't seen any movement in the castle since...@
>I sent my fastest messengers to our allied countries with requests for aid, but I have not heard anything back.\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\mob_sensi2.bmp",160,0:print 10,500
name "Alice"
>It's the same as here all over the world...@>Everyone is under attack.@
>I don't think there will be reinforcements.\
name ""
name "Grandmaster Knight"
>Oh, what a disaster!@
>Without reinforcements, we won't be able to send a force in to rescue the King!\
name ""
name "Luka"
>Then Alice and I will go!@
>Leave the rescue of the King to us!\
name ""
lsp 700,":a;chara\alice_st74.bmp",-170,50:print 10,500
name "Alice"
>If he's still alive... That is.\
name ""
>Alice spoke what I didn't dare to.@
>I don't even want to consider that he isn't still alive...\
lsp 700,":a;chara\alice_st71.bmp",-170,50:print 10,500
name "Alice"
>Anyway, we can't leave the Castle occupied.@
>If the seal is broken, they would escape and attack you from the rear.\
>Under that sort of pincer attack, you will lose any chance of victory.\
name ""
name "Grandmaster Knight"
>You are exactly correct.@
>But with only two of you...\
name ""
name "Alice"
>Inside the tight confines of a Castle, numerical superiority doesn't mean that much.@
>It would be best to dispatch a small elite force to minimize losses.\
name ""
name "Luka"
>According to your story, there shouldn't be too many in there anyway.@
>We'll leave this area to you!\
name ""
name "Grandmaster Knight"
>I swear on the pride of the Sabasa Army that the enemies before us will not break through!@
>Luka, your assistance has already greatly bolstered the army's morale!\
name ""
name "Luka"
>Alright, let's go Alice!\
name ""
lsp 700,":a;chara\alice_st73.bmp",-170,50:print 10,500
name "Alice"
>Yes!\
name ""
cspl 700,701:print 10,500
>Leaving the area to the Sabasa Army, we continue on to the Castle.@
>Arriving, we enter with just the two of us.\
dwave 1,"se\asioto3.ogg"
sean_change "bg223"
bgm "bgm\sabasa2.ogg"
name "Luka"
>The inside of the Castle seems the same as always...\
name ""
>There doesn't seem to be any sign of a struggle, but all of the lights are off.\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>But still... For multiple vampires to have attacked at once, the Queen Vampire must be here as well.\
name ""
name "Luka"
>The Queen Vampire...@> What kind of monster is she?\
name ""
name "Alice"
>She is very prideful, ambitious, and arrogant.@
>She derives the most joy from ruling over others.\
name ""
name "Luka"
>She sounds rather nasty...\
name ""
name "Alice"
>...But she is also very proud of being considered an aristocrat.@
>She is merciless against those who resist her, but is said to be very generous to her followers.\
name ""
name "Luka"
>In other words, she isn't a total villain?\
name ""
name "Alice"
>I wouldn't call her a villain...@> More like an adherent of old Feudalism.@
>Though she dominates with violence, she cares for the soldiers and the poor who are her duty to protect.\
>It's irritating because you can't just paint her in terms of good and bad.@
>Though I'm sure the people of Sabasa don't desire her to be their new ruler...\
name ""
name "Luka"
>That's true.@
>But this place...\
name ""
>I still don't see any signs of a serious battle.@
>And we are already near the throne room...\
name "Luka"
>I can sense monsters here, but none of them are attacking us...@
>Were there traps left for us instead?\
name ""
name "Alice"
>Probably for the same reason as us.@
>Why didn't we bring along soldiers of Sabasa with us?\
name ""
name "Luka"
>In order to avoid a waste of life...@
>Ah, I see.\
name ""
>The enemy isn't stupid.@
>They already know our abilities...\
name "Alice"
>There are only around three here capable of challenging us...@
>The Queen, and two others.\
name ""
name "???"
>Yes...@> That is exactly it.@
>Our gentle Queen has no desire to sacrifice her subordinates on you two...\
name ""
name "Luka"
>Come out, Vampire!\
name ""
>A Vampire steps out in the corridor to the throne room...\
r@k@\
goto *carmilla_start



*sean0342

bgm "bgm\sabasa2.ogg"
name ""
r@k@\
name "Luka"
>Whew... She was quite dexterous.\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Carmilla was the famous right hand of the Queen...@
>And her other close aide, known as the left hand is...\
name ""
name "???"
>Haha...@>Did you call me?\
name ""
name "Luka"
>Urhg, one fight after another!?\
name ""
csp 700:print 10,500
>Almost to the throne room, another Vampire comes out!\
r@k@\
goto *elisabeth_start



*sean0343

bgm "bgm\sabasa2.ogg"
name ""
r@k@\
name "Luka"
>Now her entourage is gone...\
name ""
name "Alice"
>Yes, all that's left is the Queen.@
>She should be in the throne room... Are you ready?\
name ""
name "Luka"
>Yes, let's go!\
name ""
>We head to the throne room, where the Queen is surely waiting...\
dwave 1,"se\asioto3.ogg"
sean_change "bg224"
dwave 2,"se\door1.ogg"
>We open the thick door, and step into the wide throne room.\
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\queenvanpire_st01.bmp",0,0:print 10,500
>There, acting the part of the master of the Castle, the Queen Vampire is waiting.\
name "Queen Vampire"
>Oh...@>Well done, defeating my close aides...@
>I thought Heroes only appeared in the humans' folktales.\
name ""
name "Luka"
>So you're the Queen Vampire!?\
name ""
>The overwhelming feeling of power and regality coming from her...@
>She must be the Queen!\
r@k@\
goto *queenvanpire_start



*sean0344

bgm "bgm\sabasa2.ogg"
name ""
r@k@\
name "Luka"
>Haa... Haa...@>Finally defeated her...@
>With that, it's our victory, right?\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Yes, I don't sense any more of them in the Castle.@
>The large group of them surrounding the Castle seem to be withdrawing too.\
name ""
name "Luka"
>Now for the Sabasa King...\
name ""
csp 700:print 10,500
>She said that he was locked in the dungeon...\
>Thus, we defeated the Queen Vampire and released the King.\
bgmstop
sean_change "bg064"
bgm "bgm\epilogue.ogg"
lsp 700,":a;chara\mob_heisi1.bmp",-170,0
lsp 701,":a;chara\mob_seinen1.bmp",170,0:print 10,500
name "Soldier"
>Three cheers for the Hero Luka!\
name ""
name "Citizens"
>Hip hip hooray!@>Hooray!@>Hooray!\
name ""
>The cheers of the soldiers and citizens fill the air as we head out of the castle with the King.@
>The people are lining the streets, making it seem like we're walking in a victory parade.\
>The Hero who defeated the Queen Vampire and rescued the King...@
>I shrink back, shy at the treatment.\
name "Luka"
>Wah... Wahwahwah...\
name ""
csp 701
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Stick your chest out and walk with some pride, Luka.@
>I'm sure nobody will notice that you're a fake Hero.\
name ""
>The King and I walk side by side down the street, with Alice right behind us.@
>She's in her monster form, but nobody seems to particularly mind...\
lsp 700,":a;chara\sabasa_st02.bmp",0,0:print 10,500
name "Sabasa King"
>Rescuing both me and my daughter, you've now saved the entire royal family.@
>Hero Luka, my words of thanks alone aren't enough...\
name ""
name "Luka"
>Oh no, no...@> I just did what I should.\
name ""
>I told him that Sara, his daughter, is still in the Monster Lord's Castle.@
>Considering the state of the world, she is likely in the safest possible place.\
name "Sabasa King"
>This clearly deserves a great banquet, hosted with the full support of the nation...@
lsp 700,":a;chara\sabasa_st01.bmp",0,0:print 10,500
>...But with the crisis approaching the world, I don't think it would be appropriate at this time.\
name ""
name "Luka"
>Yes, I don't think that would be good...@
>Ilias is trying to destroy the world, after all...\
name ""
lsp 700,":a;chara\alice_st74.bmp",-170,50
lsp 701,":a;chara\sabasa_st01.bmp",170,0:print 10,500
name "Alice"
>Banquet... Feast...\
name ""
>Alice looks completely crestfallen.\
csp 701
lsp 700,":a;chara\sabasa_st01.bmp",0,0:print 10,500
name "Sabasa King"
>We will rebuild our army, and work with the other countries to stave off this crisis.@
>But at the heart of this will be your actions, Hero Luka.\
name ""
name "Luka"
>Eh, me!?@
>I shouldn't be in such an important role...\
name ""
>As I start to refute that...@
bgm "bgm\kiki2.ogg"
>My feet suddenly feel weak, and I fall to the ground.\
name "Luka"
>Ah...\
name ""
lsp 700,":a;chara\sabasa_st03.bmp",0,0:print 10,500
name "Sabasa King"
>Erm...@> Are you alright?\
name ""
name "Luka"
>Ah yes, yes...@> I'm just a little dizzy.\
name ""
lsp 700,":a;chara\sabasa_st01.bmp",0,0:print 10,500
name "Sabasa King"
>Forgive me, I was inconsiderate of the fact you just went through multiple fierce battles.@
>Wait here a moment, I will summon the doctors...\
name ""
name "Luka"
>...No, I'm fine.\
name ""
>I quickly stand up, and start walking again as if nothing happened.\
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\sabasa_st01.bmp",170,0:print 10,500
name "Alice"
>............\
name ""
>Alice just silently stares at me from behind.@
>I'm sure she's going to say something later...\
bgm "bgm\epilogue.ogg"
csp 701
lsp 700,":a;chara\sabasa_st01.bmp",0,0:print 10,500
name "Luka"
>Well then, we should be heading out now.@
>All over the world, towns are on the verge of ruin...\
name ""
name "Sabasa King"
>I see...@> Make sure to take good care of yourself, too.@
>Right now you are the one who can bring hope to this world.\
name ""
name "Luka"
>I won't be careless...@> For everyone's sake, I'll keep on wielding my sword!@
>Goodbye!\
name ""
lsp 700,":a;chara\alice_st73.bmp",-170,50
lsp 701,":a;chara\sabasa_st01.bmp",170,0:print 10,500
name "Alice"
>Sabasa King, don't forget to plan the banquet in the future!\
name ""
dwave 1,"se\asioto2.ogg"
cspl 700,701:print 10,500
>With the encouragement of the people booming at our backs, we leave.@
>Now for our next destination...\
r@k@\
mov %ivent06,2
mov %gloval1_story_sinkou,15:gosub *savegloval1
bgm "bgm\field4.ogg"
goto *map10



*sean0344x

bgmstop
sean_change "bg140"
bgm "bgm\field4.ogg"
name "Luka"
>Damn it, we didn't make it in time...\
name ""
>There's no signs of life in the Castle at all.@
>It looks like it was overrun by angels and vampires.\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Even Sabasa, thought to have the world's strongest army, couldn't hold out a day...@
>We have to hurry to the other areas...\
name ""
name "Luka"
>Yes... We must come to their relief as soon as possible!\
name ""
csp 700:print 10,500
>The invasion of the Heavens seems to be happening far faster than we thought.@
>Our next destination is...\
r@k@\
mov %gloval1_story_sinkou,15:gosub *savegloval1
bgm "bgm\field4.ogg"
goto *map10



*sean0345

sean_change "bg066"
gosub *setwindow_01p
bgm "bgm\kiki2.ogg"
lsp 700,":a;chara\lily_st13.bmp",0,0:print 10,500
name "Lily"
>...........\
name ""
>A lone mage is confined in a dark, gloomy dungeon...@
>But suddenly, another mage appears...\
lsp 700,":a;chara\lily_st13.bmp",-160,0
lsp 701,":a;chara\lusia_st22.bmp",160,0:print 10,500
name "???"
>You've seen better days...@
>...Meister Lily.\
name ""
name "Lily"
>...Who might you be?\
name ""
name "Lucia"
>Do you not remember me?\
>I guess that's to be expected, I was just a simple guinea pig to you...\
>To think I had more magical potential hidden away than you...@
>How miserably ironic, don't you think?\
name ""
name "Lily"
>I believe your name was Lucia...@
>Did you come for revenge?\
name ""
name "Lucia"
>...I just came to make a point.@
>Your horrible witch hunt wasn't your only crime.\
>This village itself deserves punishment...@> That is what I was thinking.\
name ""
name "Lily"
>I see.@> So you're the same as me...@
>I seem to have accidentally created a fine successor to myself.\
>I've tired of this...@
>I pass my torch to you.\
name ""
lsp 701,":a;chara\lusia_st21.bmp",160,0:print 10,500
name "Lucia"
>...Don't think we are the same.@
>My ideal is a noble one.\
name ""
name "Lily"
>Hah...@> You really think us different?\
name ""
name "Lucia"
>Yes, of course.\
name ""
dwave 1,"se\ero_makituki2.ogg"
lsp 700,":a;chara\lily_st13.bmp",-160,0
lsp 701,":a;chara\lusia_st01.bmp",140,0:print 10,500
>Lucia's tentacles suddenly spread out, with one in the form of a giant mouth!@
dwave 1,"se\ero_makituki3.ogg"
csp 701
lsp 700,":a;chara\lusia_st01.bmp",0,0:print 10,500
>And she uses it to swallow Lily whole!\
name "Lucia"
>Hmph, not even leaving behind a scream.\
>But I won't digest you quickly...@
>I'll keep you alive for months, and slowly and gradually dissolve you away...\
>Now to start the cleanup...\
name ""
bgmstop
sean_change "bg072"
bgm "bgm\kiki3.ogg"
name "Luka"
>This isn't good, the village is under attack!\
name ""
lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
name "Alice"
>Yes... Let's go, Luka!\
name ""
lsp 701,":a;chara\c_beast_st01.bmp",-160,0
lsp 700,":a;chara\c_beast_st01.bmp",200,0:print 10,500
>Witch Hunt Village is also under attack...@
>Hordes of Chimeric Beasts are raging around in the village.\
>Hardly anyone is fighting back, and the citizens are mainly trying their best to escape.@
>I look for the strongest looking enemy in the pack, and jump into the fray!\
r@k@\
cspl 700,701
goto *c_homunculus_start



*sean0346

bgm "bgm\kiki3.ogg"
name ""
r@k@\
name "Luka"
>Yes, that's one down!@
>..Are you alright?\
name ""
lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
>I pick up a young boy who fell to the ground during the confusion.\
name "Boy"
>Thank you, you saved me...@
>..Ah!@>You're the Hero who defeated Lily!\
>You came again to save the village!\
name ""
name "Luka"
>Yes...@> Do you know how many monsters are attacking?\
name ""
name "Boy"
>I don't know how many...@
>But they didn't come from the outside!\
name ""
name "Luka"
>Eh...!?@>They didn't come from the outside!?\
name ""
name "Boy"
>No, it was Lucia...@
>She came back to the village as a monster, and released monsters!\
name ""
name "Luka"
>Lucia...!?\
name ""
name "Boy"
>A lot of the women who were kidnapped by Lily vanished...@
>Lucia was one of them.\
>We thought she was dead...@> To think she became a monster...\
name ""
>.........\
name ""
csp 700:print 10,500
>One of the victims of Lily's experiments, Lucia...@
>I doubt it was a coincidence that she attacked this village today.\
>Perhaps she has some sort of dealings with Promestein...\
lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
name "Alice"
>...Luka, this isn't the time to be lost in thought!\
name ""
name "Luka"
>Gah, another one!\
name ""
lsp 700,":a;chara\mob_ozisan2.bmp",-170,0
lsp 701,":a;chara\ironmaiden_k_st02.bmp",170,0:print 10,500
>Another strange monster that Lucia released...@
>A type of Iron Maiden.@> She's closing in on someone...\
dwave 1,"se\ero_makituki3.ogg"
>Her body opens up as she approaches a man...@
>Not good, I'm too far away to stop her!\
name "Iron Maiden v2"
>Now, sinner...@> Go mad in my embrace.\
name ""
name "Man"
>Uwaaa!!@>Help me!\
name ""
>As the man's surrounded by the Iron Maiden's tentacles and pulled into her body...\
lsp 700,":a;chara\wormv_st14.bmp",-180,0:print 10,500
name "Village Girl A"
>...Watch out!\
name ""
bgm "bgm\battle2.ogg"
dwave 1,"se\asioto1.ogg"
>A female villager jumps out, reaching out with her right arm...@
dwave 1,"se\ero_makituki1.ogg"
lsp 700,":a;chara\wormv_st03.bmp",-180,0:print 10,500
>Her arm suddenly morphs into a tentacle, and slams into the Iron Maiden.\
dwave 1,"se\down.ogg"
>Barely escaping, the man is thrown to the side as the Iron Maiden falls.\
csp 701
lsp 699,":a;chara\mob_ozisan2.bmp",170,0:print 10,500
name "Village Girl A"
>Hurry up and escape before it's too late!\
name ""
name "Man"
>Aahh... B...But your arm...\
name ""
dwave 1,"se\asioto1.ogg"
csp 699:print 10,500
>Confused and lost for words, the man runs away.@
>And it's not just her fighting the monsters...\
lsp 700,":a;chara\mob_wormv1.bmp",-200,0
lsp 701,":a;chara\mob_wormv2.bmp",200,0:print 10,500
name "Village Girl B"
>If it's come to this, we'll keep everyone safe!\
name ""
name "Village Girl C"
>We'll take care of the enemy, so please hurry to safety!\
name ""
dwave 1,"se\ero_makituki1.ogg"
>The girls release their tentacle arms, fighting the monsters with everything they've got.@
>In order to protect the village, they are showing their bodies that they have kept hidden for so long...\
name "Luka"
>Alright, me too!\
name ""
csp 701
lsp 700,":a;chara\ironmaiden_k_st01.bmp",0,0:print 10,500
>I draw my sword, and rush in front of the rising Iron Maiden!\
r@k@\
goto *ironmaiden_k_start



*sean0347

bgm "bgm\kiki2.ogg"
name ""
r@k@\
name "Luka"
>Whew...\
name ""
>After beating the Iron Maiden, I let out a relieved sigh.@
>It looks like the female villagers were able to beat back the other Chimeric Beasts.\
>But there's no room to relax here.@
>I'm sure the enemy side will regain their lines soon...\
lsp 700,":a;chara\wormv_st02.bmp",0,0:print 10,500
name "Village Girl A"
>...Master Hero, you came to save us again.\
name ""
name "Luka"
>Yes... But, you all too...@
>You revealed your bodies to protect everyone.\
name ""
lsp 700,":a;chara\wormv_st02.bmp",-200,0
lsp 701,":a;chara\mob_wormv1.bmp",200,0:print 10,500
name "Village Girl B"
>Now is not the time to think about that...@
>Hero, would you please defeat Lucia?\
name ""
name "Luka"
>Just who is Lucia...?\
name ""
bgm "bgm\hutuu2.ogg"
csp 701
lsp 700,":a;chara\wormv_st01.bmp",0,0:print 10,500
name "Village Girl A"
>You may have heard already, but she is another victim of Lily's human experimentations like us...\
>She wasn't found after Lily's arrest, and we had assumed she died.@
>But it seems like she had escaped from the mansion somehow, and improved her own magical abilities.\
name ""
name "Luka"
>Did she acquire power for herself in order to escape Lily's control?\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\wormv_st01.bmp",170,0:print 10,500
name "Alice"
>I'm sure she came into contact with Promestein during that time.@
>Spearheading these artificial monsters herself, she seems to be quite confident too...\
name ""
>I suspect that Promestein even imparted some of her techniques onto Lily...@
>It looks like she gathered subordinates too, just like Black Alice.\
csp 701
lsp 700,":a;chara\wormv_st01.bmp",0,0:print 10,500
name "Village Girl A"
>She hates Lily...@>And this village too.@
>We know it well, as we were the same way at the start.\
name ""
name "Luka"
>...........\
name ""
lsp 700,":a;chara\wormv_st01.bmp",-200,0
lsp 701,":a;chara\mob_wormv1.bmp",200,0:print 10,500
name "Village Girl B"
>Please, we beg of you!@> Please stop Lucia!\
name ""
name "Luka"
>...I understand, leave her to me.@
>But where is she?\
name ""
name "Village Girl A"
>After releasing these monsters, she went to the Lord's mansion.@
>Is she trying to replace Lily?@> Or did she go there for some other reason...?\
name ""
name "Luka"
>The Lord's mansion?@>Got it!\
name ""
name "Village Girl A"
>Please leave the defense of the village to us.@
>It's difficult to face them head on, but we'll at least lead everyone to safety!\
name ""
name "Village Girl B"
>Please be safe!\
name ""
name "Luka"
>The same goes to you all!@
>Let's go, Alice!\
name ""
csp 701
lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
name "Alice"
>...Yes!\
name ""
csp 700:print 10,500
>Thus, we rush into the Lord's mansion.@
>Lucia is in the same location where the witch hunts of old were carried out...\
dwave 1,"se\asioto1.ogg"
sean_change "bg075"
bgm "bgm\madou1.ogg"
name "Luka"
>What immense magical power...@>This is the innermost room, right?\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Hmph...@>It doesn't seem like she has any intention of hiding.\
name ""
csp 700:print 10,500
>With the incredible magic in the air, it was simple to find her.@
>In the deepest room inside the dungeon, we find the laboratory...\
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\lusia_st01.bmp",0,0:print 10,500
name "Lucia"
>Oh my...@> So the Hero makes his debut.\
name ""
>Lucia is in the exact same location as Lily was...@
>Her body is deformed into something monstrous, and giving off huge amounts of magical power.\
name "Luka"
>Why did you attack the village, Lucia!?\
name ""
name "Lucia"
>Because I will make this village the place where I belong.@
>I've gone to great efforts to take it by my own power.\
name ""
>Lucia giggles as torrents of magic flow from her.\
name "Luka"
>Where you belong?@
>Do you believe you can just take something and turn it into that!?\
name ""
name "Lucia"
>Just where do you think someone who looks like me would be accepted?\
>People would always discriminate against a half being like me...\
>The people of this village hated and expelled witches.@
>And then you came and took down Lily.\
name ""
name "Luka"
>Lily went past the point of no return...@
>Just how many people died because of her actions...?\
>But... Perhaps you haven't taken anyone's life yet?\
name ""
name "Lucia"
>...Why do you think that?\
name ""
name "Luka"
>I can tell from your behavior.@
>This was going to be your first and last step down that path...\
name ""
r@k@\
goto *lusia_start



*sean0348

bgm "bgm\hutuu2.ogg"
name ""
r@k@\
name "Lucia"
>It can't be...@
>How did the disgraced Hero's power rise so much...\
name ""
name "Luka"
>Please stop this, Lucia...@
>I know the confusion and loss of your sense of place caused by losing your sense of humanity.\
name ""
name "Lucia"
>How could you understand when you're so powerful!?@
>The sadness of being given this horrifying body...\
name ""
name "Luka"
>...No, I understand it.@
>I'm half angel myself...\
>I know your sense of displacement, too.@
>When I was younger, I faced horrible persecution from the people in my own hometown.\
>I know how scary and terrible that sense of not belonging is...\
name ""
name "Lucia"
>...............\
name ""
name "Luka"
>Unlike Lily, you can still go back.@
>So let's leave here...\
name ""
name "Lucia"
>Do you think the villagers would warmly greet me if I left here?\
>It's the same for you, isn't it?@
>When they see your non-human half, they get scared and hateful...\
name ""
name "Luka"
>Yes...@> I'm sure it won't be easy.\
name ""
lsp 700,":a;chara\alice_st74.bmp",-170,50
lsp 701,":a;chara\lusia_st03.bmp",170,0:print 10,500
name "Alice"
>...............\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50:print 10,500
name "Alice"
>This guy chants nothing but coexistence, coexistence...@
>Shouting that everywhere he goes, he is making it come through with his own determination.\
>...I feel like I've come to understand his reason recently.@
>Perhaps he himself was somehow aware that he wasn't fully human himself?\
>He sensed that his existence itself may be something that wouldn't be accepted by humans...\
name ""
name "Luka"
>...That may be.@
>Though I was never conscious of it...\
name ""
>I nod as Alice points it out.@
>Maybe my sense of not really belonging was due in part to my heritage...@> And as a result, my desire of coexistence came about.\
csp 701
lsp 700,":a;chara\lusia_st03.bmp",0,0:print 10,500
name "Lucia"
>..........\
name ""
name "Luka"
>Even if I'm not a pure human...\
>Even if I'm an existence humans can't accept, I'd still rather strive for coexistence than dominance.\
>I won't say that I completely understand what you went through...@>But...\
name ""
name "Lucia"
>...I cannot believe in humans like that.\
name ""
dwave 1,"se\asioto3.ogg"
>Lucia turns around and starts walking to the exit.@
>In the doorway, she turns and looks at me.\
name "Lucia"
>Please continue fighting for your desire.@
>...Since I can't believe in humanity, please fight for my share too...\
name ""
name "Luka"
>Lucia...\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,500
>With that, Lucia leaves.@
>All that remains in the room is Alice and I...\
name "Luka"
>Alice... I wonder if this is all right?\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>...The Chimeric Beasts seem to have fled too.@
>This should be fine.\
name ""
name "Luka"
>I see...@> What happened to the villagers?\
name ""
>The direct threat is gone, but the female villagers exposed their bodies.@
>Is this going to start another issue...?\
>We hurry out of the mansion to check.\
dwave 1,"se\asioto4.ogg"
sean_change "bg072"
bgm "bgm\kiki2.ogg"
lsp 700,":a;chara\mob_rouzin1.bmp",-170,0
lsp 701,":a;chara\wormv_st03.bmp",170,0:print 10,500
name "Old Man"
>Y...You all...@> Those bodies...\
name ""
lsp 700,":a;chara\mob_seinen1.bmp",-170,0:print 10,500
name "Boy"
>N...No...@
>From Lily's time...@>It wasn't cured?\
name ""
name "Village Girl A"
>...........\
name ""
>Sure enough, there's a strange atmosphere in the village...\
name "Luka"
>Hold on, that...\
name ""
csp 701
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
>Before I can say anything, Alice holds me back.\
name "Alice"
>...Wait a moment, Luka.\
name ""
name "Luka"
>But...\
name ""
bgm "bgm\epilogue2.ogg"
lsp 700,":a;chara\mob_seinen1.bmp",-170,0
lsp 701,":a;chara\wormv_st03.bmp",170,0:print 10,500
name "Boy"
>Well, it certainly is surprising, but...@
>You fought so hard to protect the village, so it's no problem, right?\
name ""
lsp 700,":a;chara\mob_seinen2.bmp",-170,0:print 10,500
name "Man A"
>...Yeah, I don't mind either.@
>It's not like they lost their true selves and acted violently.\
name ""
lsp 700,":a;chara\mob_ozisan2.bmp",-170,0:print 10,500
name "Man B"
>You exposed what you've been hiding all to protect this village.@
>You girls are all brave Heroes.\
name ""
lsp 700,":a;chara\wormv_st02.bmp",-200,0
lsp 701,":a;chara\mob_wormv1.bmp",200,0:print 10,500
name "Village Girl A"
>Everyone...\
name ""
name "Village Girl B"
>Thank you...\
name ""
lsp 700,":a;chara\mob_rouzin1.bmp",-170,0
lsp 701,":a;chara\wormv_st03.bmp",170,0:print 10,500
name "Elder"
>We won't persecute anyone anymore.@
>We don't want to create a second or third Lily...\
name ""
name "Luka"
>..........\
name ""
cspl 700,701:print 10,500
>...Lucia was wrong.@
>Humans can change for both good and bad.\
>I know this place could have accepted her for who she is.\
name "Luka"
>...Let's go now, Alice.\
name ""
lsp 700,":a;chara\alice_st72.bmp",0,50:print 10,500
name "Alice"
>Yes, to the next location.\
name ""
csp 700:print 10,500
>Thus, we leave Witch Hunt Village.@
>Now for our next location...\
r@k@\
mov %ivent07,2
mov %gloval1_story_sinkou,15:gosub *savegloval1
bgm "bgm\field4.ogg"
goto *map10



*sean0349

gosub *setwindow_01
bg "BG\bg182.bmp",10,1500
name "Luka"
>Alright, let's head to the Safaru Ruins!\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Once you get back Sylph's power, we'll head straight to the Noah region.@
>Have you finished everything you had to do here?\
name ""
csel "Yes",*sean0349b,"Not yet...",*sean0349a



*sean0349a

csp 700:print 10,500
name "Luka"
>No, I still need to do something...\
name ""
>Now for our next location...\
bgm "bgm\field4.ogg"
goto *map10



*sean0349b

name "Luka"
>Galda, take us to the Safaru Ruins.\
name ""
name "Galda"
>Kweeeh!\
name ""
>Thus, we head toward the Safaru Ruins...\
dwave 1,"se\habataki.ogg"
csp 700
sean_change "bg076"
bgm "bgm\safar.ogg"
>Safaru Ruins---@
>As the name suggests, it's just a collection of ruins in the middle of the Safaru Desert.\
>Since this place is pulsing with the power of the earth, Sylph should be here...@
>And I'm sure a defending group from the Heavens will be here to try to stop me, too.\
name "Luka"
>Don't let your guard down, Alice...@
>I sense some angels around.\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Don't you relax either.\
name ""
>We try to stick to the outermost parts as we search, but this place is just too huge.\
name "Luka"
>These ruins go on forever...@
>We were lucky to have Gnome's dolls lead us to her before.\
name ""
name "Alice"
>And Sylph should be in just as weak of a state as Gnome was.@
>We have to assume she is incapable of sending off a signal.\
name ""
name "Luka"
>Wait a second, let me see if I can sense the flow of wind...\
name ""
>I close my eyes and focus my entire body on my senses.\
name "Alice"
>Isn't that too difficult without Sylph?\
name ""
name "Luka"
>...........\
>There's a really weak breeze from that way...\
name ""
lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
name "Alice"
>You can tell!?\
name ""
name "Luka"
>...Maybe.\
name ""
csp 700:print 10,500
>I'm not positive, but I could feel a faint breeze coming from this direction.@
>If so, I'm sure that's where Sylph must be...\
name "Luka"
>Alright, this way...\
name ""
>The moment I take a step forward, my legs buckle under me.@
>But before I can fall down, I catch myself and steady my balance.\
name "Luka"
>Oops...@>Watch out, watch out...\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>...........\
name ""
>Alice just stares at me and frowns.\
name "Alice"
>I told you, Luka...@
>Don't be unreasonable with your power...\
name ""
name "Luka"
>...It's nothing, Alice.\
name ""
dwave 1,"se\asioto2.ogg"
csp 700:print 10,500
>Assuring her I'm fine, I keep walking on toward where I sensed the wind coming from.@
>After about ten minutes of walking over the dry sand...\
name "Luka"
>An angel!?\
name ""
dwave 1,"se\aura.ogg"
>A beam of light comes down, blocking our path!\
r@k@\
goto *silkiel_start



*sean0350

bgm "bgm\safar.ogg"
name ""
r@k@\
name "Luka"
>If she attacked, then we must be going in the right direction.@
>Sylph has to be this way...\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Hmph...@>They make good substitute guideposts, don't they?@
>--Another one is coming, Luka!\
name ""
name "Luka"
>Yes, I know!\
name ""
csp 700:print 10,500
>Sheesh, there's no time to rest!@
dwave 1,"se\aura.ogg"
>The space around us warps as another angel descends!\
r@k@\
goto *endiel_start



*sean0351

bgm "bgm\safar.ogg"
name ""
r@k@\
name "Luka"
>Whew...@>It looks like she was the last of the angels.\
name ""
>The area around us goes silent, as the last sign of angels vanishes.@
>It looks like the angels guarding here were just those two.\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Though they were very strong, there weren't very many.@
>Perhaps Ilias has less subordinates than we first thought...\
name ""
name "Luka"
>That would be good...@
>If a bunch of super powered enemies appeared at once, we'd be overrun.\
name ""
dwave 1,"se\asioto2.ogg"
>Alice and I talk as we continue on.\
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>I had heard that the number of angels had decreased a lot since their golden age.@
>Apparently it's true.\
name ""
name "Luka"
>Decreased...@> Why would they decrease?\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>I don't know myself...@
>Though I heard someone destroyed a large number of them a few hundred years ago.\
>I read it in a dubious looking book deep in the Monster Lord's Castle.@
>The information was so piecemeal, I wasn't sure whether it was a fact or just some local legend.\
name ""
name "Luka"
>Destroyed a large number of angels...?@
>I don't think there are many people who could have done that...\
name ""
>Despite the obvious strength of the angels, there's another more important point.@
>With only a few exceptions, a person on the ground can't even damage an angel.\
>One of those exceptions is this Angel Halo blade...\
name "Luka"
>In addition, who even had the strength to defeat so many angels?@
>Some monster?\
name ""
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>I don't know any more than that...@
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
>...Hey, Luka.@>Is that quicksand?\
name ""
name "Luka"
>I don't feel the wind coming from there...\
name ""
>There's a huge pit of quicksand...@
>And right in the middle, a small figure is struggling!\
bgm "bgm\comi1.ogg"
lsp 700,":a;chara\sylph_st44.bmp",0,0:print 10,500
name "???"
>Help me...@
>Someone help me...\
name ""
name "Luka"
>...Who's that?\
name ""
>As soon as she sees me, her face lights up.\
lsp 700,":a;chara\sylph_st43.bmp",0,0:print 10,500
name "???"
>Yaaay!@> It's Luka!@
>You came for me after all!\
name ""
name "Luka"
>...Is that really Sylph?\
name ""
lsp 700,":a;chara\sylph_st44.bmp",0,0:print 10,500
name "Sylph"
>It really is Sylph!@
>I've been covered in sand so long, my body is all crumbly!\
>I got so weak, I couldn't do anything about it...\
name ""
name "Luka"
>................\
name ""
>Weakened...?@
>I don't really get it, but we have to help her!\
name "Luka"
>...Gnome, I'm counting on you.\
name ""
dwave 1,"se\earth2.ogg"
lsp 700,":a;chara\gnome_st21.bmp",0,0:print 10,500
name "Gnome"
>..........\
name ""
>Gnome points at the quicksand, suddenly drying it.@
lsp 700,":a;chara\sylph_st44.bmp",0,0:print 10,500
>The completely weakened Sylph rolls over to me.\
name "Sylph"
>Hyaaan!@>I'm sooooo hungry!@
>I'm going to die from hunger!\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\sylph_st44.bmp",140,0:print 10,500
name "Alice"
>...You know the method.@
>Hurry up and finish, you idiotic Fake Hero.\
name ""
name "Luka"
>Eh?@>That again...?\
name ""
>Join together with the spirit in both mind and body...@
>Joining in a sexual sense, of course.\
name "Alice"
>...I'll help quicken the rate of desertification around here in revenge.@
>If you don't want this land to never have something grow in it again, you better finish quickly.\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,500
>Pouting, Alice spits that out as she vanishes.@
csp 701
lsp 700,":a;chara\sylph_st41.bmp",0,0:print 10,500
>The only ones left are Sylph and I...\
r@k@\
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
goto *sean0352



*sean0352

name "Sylph"
>Now to get some tasty energy from Luka. \
name ""
name "Luka"
>S...Stop!@>Uwa!\
name ""
lsp 700,":a;chara\sylph_hb1.bmp",0,0:print 10,500
>Sylph quickly pushes me down, and jumps on top of me while I'm still surprised.@
>Her oddly large body is far heavier than I imagined, and I can't immediately push her off me.\
>Without being able to resist Sylph, she easily pinned me under her.\
name "Luka"
>Wait a second!@> What about another method...?\
name ""
name "Sylph"
>With this adult body, I'll be able to do it easily, though.@
>And it will feel good for you too, Luka!\
name ""
>Completely ignoring me, Sylph drops her waist down.@
mov %hseanwave,1:hseanwave
lsp 700,":a;chara\sylph_hb2.bmp",0,0:print 10,500
>My penis sinks deep into her warm vagina in a single thrust.\
name "Luka"
>Ah...!\
name ""
>The feeling inside of her is incredible.@
>Her wet flesh easily accepts me, and warmly envelopes my penis inside her.\
>The close touch of her flesh brings forth a gasp of pleasure before I can restrain myself.\
name "Sylph"
>Hahaha... It went in! @
>Well? It's warm inside me, isn't it?\
name ""
name "Luka"
>Ahh... You're warm.@
>It feels good inside you...\
name ""
>The soft touch of her vagina fills my senses.@
>Even though I've just inserted inside her, it feels amazing.\
>I'm already left powerless, with Sylph just sitting astride me.@
>I could come inside her just from being in her warm vagina.\
name "Luka"
>Haaa...\
name ""
>Looking down at me, Sylph giggles to herself.\
name "Sylph"
>Hehehe... You look like you're feeling good.@
>Let me squeeze it! \
name ""
>Sylph starts to put strength into her lower body.@
>The soft flesh of her vagina starts to slowly contract, squeezing down on my penis from every direction.\
name "Luka"
>Ahh... So tight...\
name ""
>Her insides get smaller and smaller as she squeezes down, even compressing my glans deep inside her.@
>The pressure slowly builds up, from my tip all the way down my shaft to the base.\
>My body starts to tremble as the pressure becomes too much.@
>The desire to release in her builds up too fast, and I can't suppress it any longer.\
name "Luka"
>Ahh... Coming...!\
name ""
gosub *syasei1
lsp 700,":a;chara\sylph_hb3.bmp",0,0
gosub *syasei2
>Almost like an accidental orgasm, I come inside her grown up body.@
>Her tightness was too much... I couldn't stop myself from exploding inside Sylph.\
name "Luka"
>Ahh... I came...\
name ""
name "Sylph"
>Ehh?@> You just came already?@
lsp 700,":a;chara\sylph_hb4.bmp",0,0:print 10,500
>Oh my gosh... That was so fast! \
name ""
>Ecstatic at making me ejaculate so fast, Sylph can't stop from giggling.@
>A slight feeling of shame builds up in me as I can't help but think her smile is somewhat condescending...\
name "Sylph"
>I just needed to tighten a little bit? That was it?@
>I can't believe you couldn't endure more than that! \
>I guess I'll go a little easier on you this time. \
name ""
>With a dubious laugh, Sylph starts using her muscles again...@
>Sometimes tightening, sometimes loosening, she varies up the tightness inside her.\
>She's freely controlling the muscles in her vagina...@
>Unable to do anything under her, I just writhe around in pleasure.\
name "Luka"
>Ahh...!@
>Stop, don't tighten anymore!\
name ""
name "Sylph"
>Ehehe, I'm super skilled, aren't I?@
>I wonder how long you will last this time?\
name ""
>Looking down at me with glee in her eyes, Sylph continues attacking me with her sexual skills.\
>Squeezing my penis from the root to the tip in varying amounts, it's almost as if she is using a hand to stroke me inside her own vagina...\
name "Luka"
>Ahh...@
>No... I'm going to come again...\
name ""
>As I taste the tightness of her vagina, I feel another climax quickly coming on.@
>The electrifying feeling spreads from my waist to the rest of my body.\
name "Sylph"
>Ehehe, you can't take it anymore?@
>Then it's time for the finishing blow!\
name ""
>Focusing on finishing me off, Sylph's tightening movements drastically increase in speed and intensity.@
>My head goes pure white as the desire to ejaculate inside her takes me over.\
name ""
name "Luka"
>Ahhhh!\
name ""
gosub *syasei1:gosub *syasei2
>Immersed in the sweet feeling of release, my semen shoots out into her tight, warm vagina.\
>At the same time, a sense of shame takes me over...@
>Sylph overwhelmed me with her sexual skills, and brought me to two quick orgasms.\
mov %hseanwave,0:hseanwave
name "Sylph"
>Ahaha... I squeezed out a lot. @
>Now I can be together with Luka again! \
name ""
>Looking down at my exhausted self, Sylph laughs with satisfaction.\
gosub *anten
>............\
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_seirei2,1
mov %skill02,4
bg "bg\bg076.bmp",10,1500
bgm "bgm\epilogue2.ogg"
name "Luka"
>With that...@> It's all good, right?\
name ""
lsp 700,":a;chara\sylph_st43.bmp",0,0:print 10,500
name "Sylph"
>Yaaaay!@>I'm overflowing with power!\
name ""
dwave 1,"se\power.ogg"
>Sylph's body is filling with energy...\
dwave 2,"se\warm.ogg"
csp 700
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
lsp 700,":a;chara\sylph_st05.bmp",0,0
csp 2:print 10,300
name "Sylph"
>...Yah!@>Power overwhelming!\
name ""
name "Luka"
>...........\
name ""
>Just what exactly is her body made of?\
lsp 700,":a;chara\sylph_st21.bmp",0,50:print 10,500
name "Sylph"
>Yaay!\
name ""
>With that, Sylph regains her strength and comes back inside me.@
>But with the seal still active, she isn't at her full strength.\
name "Sylph"
>Ehhhh...?@
>There's a strange wind coming from inside Luka...\
>It's all fluffy and soft feeling...@>A new skill I haven't seen before!\
name ""
name "Luka"
>Ah, that must be Fallen Angel Dance...@
>It's a skill that's aligned with the power of wind.\
name ""
dwave 1,"se\ero_koki2.ogg"
name "Sylph"
>Time to mix mix with Luka's brains! @
>Knead knead inside the head! \
name ""
name "Luka"
>Wh...!?@>What are you doing inside my head!?\
name ""
name "Sylph"
>I made a link with your Fallen Angel Dance to the dark magic!@
>Now just summon me when you want to use Fallen Angel Dance! \
>Though I don't think much will change for now...@
>I'll do my best to make Luka reach FULL POWER!\
name ""
name "Luka"
>Yes, thank you...\
name ""
>With Sylph connected to the Fallen Angel Dance, it should be even more effective now.\
>And with the wind attribute getting stronger, it should be extra effective against not only angels, but plant-type monsters now too.\
>In addition, avoiding bad abnormal states...@> It's a very dependable skill to evade normal attacks.\
bgm "bgm\comi1.ogg"
lsp 701,":a;chara\sylph_st21.bmp",-100,50
lsp 700,":a;chara\gnome_st32.bmp",70,50:print 10,500
name "Sylph"
>Yaay!@>Gnomey!!\
name ""
>Sylph and Gnome have a happy reunion inside my body.\
name "Sylph"
>Yayay!!@>Full power mode ACTIVATE!\
dwave 1,"se\miss.ogg"
lsp 701,":a;chara\sylph_st21.bmp",300,50:print 10,300
dwave 2,"se\miss.ogg"
lsp 701,":a;chara\sylph_st21.bmp",120,-150:print 10,300
dwave 3,"se\miss.ogg"
lsp 701,":a;chara\sylph_st21.bmp",-100,50:print 10,300
name ""
>A strange, irritating tension surrounds their interactions as usual...\
dwave 1,"se\miss.ogg"
lsp 701,":a;chara\sylph_st21.bmp",300,50:print 10,300
dwave 2,"se\miss.ogg"
lsp 701,":a;chara\sylph_st21.bmp",120,-150:print 10,300
dwave 3,"se\miss.ogg"
lsp 701,":a;chara\sylph_st21.bmp",-100,50:print 10,300
name "Sylph"
>Can you even see these FULL THROTTLE movements!?\
dwave 1,"se\miss.ogg"
lsp 701,":a;chara\sylph_st21.bmp",300,50:print 10,300
dwave 2,"se\miss.ogg"
lsp 701,":a;chara\sylph_st21.bmp",120,-150:print 10,300
dwave 3,"se\miss.ogg"
lsp 701,":a;chara\sylph_st21.bmp",-100,50:print 10,300
name ""
name "Gnome"
eng ".........":$sel6/
lsp 701,":a;chara\sylph_st22.bmp",38,50
lsp 700,":a;chara\gnome_st33.bmp",70,50:print 10,300
dwave 1,"se\dageki.ogg"
wait 100
lsp 701,":a;chara\sylph_st22.bmp",470,50
lsp 700,":a;chara\gnome_st37.bmp",70,50:print 10,300
dwave 2,"se\dageki.ogg"
wait 100
lsp 701,":a;chara\sylph_st22.bmp",258,-140
lsp 700,":a;chara\gnome_st38.bmp",366,68:print 10,300
dwave 3,"se\dageki2.ogg"
\
lsp 700,":a;chara\sylph_st22.bmp",258,-140
lsp 701,":a;chara\gnome_st31.bmp",70,50:print 1
name "Sylph"
eng "Hya...":$sel6/
dwave 1,"se\fall2.ogg"
for %move=0 to 600 step 10
amsp 700,258,-140+%move
print 1:wait 10
next
\
name ""
name "Luka"
>...........\
name ""
bgm "bgm\epilogue2.ogg"
csp 701
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>...It looks like you're done, idiot.\
name ""
name "Luka"
>I guess...@> But she doesn't seem to be as strong as she was before.\
name ""
>Just like Gnome, Sylph's power is limited.@
>I need to do something about the seal before I can use their true power.\
name "Luka"
>All that is left is Undine and Salamander...\
name ""
>If we go to the east from here, we should reach the Noah Region with Undine's Spring.@
>I'm sure Salamander, of the opposite element, is stuck there...\
name "Luka"
>Let's go, Alice!@
>Next is the Noah Region!\
name ""
name "Alice"
>Shall we go to the castle of the area first, like before?@
>I'm sure they are under threat of the enemy too.\
name ""
name "Luka"
>Yes, first is Grand Noah Castle!\
name ""
csp 700
dwave 1,"se\habataki.ogg"
bg "BG\bg182.bmp",10,1500
>With that, we hop on Galda's back and take off toward the east.@
>Along the way, I look at the ground and notice something...\
name "Luka"
>Hey, Alice...@
>Doesn't it look like the desert is spreading out further than before...?\
name ""
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>............\
name ""
lsp 700,":a;chara\alice_st74.bmp",-170,50
lsp 701,":a;chara\sylph_st22.bmp",300,50:print 10,500
name "Sylph"
>Oh no oh no oh no...\
name ""
>For some reason, Sylph is shivering in terror inside me...\
dwave 1,"se\habataki.ogg"
bgmstop
cspl 700,701
sean_change "bg001"
bgm "bgm\maou2.ogg"
lsp 701,":a;chara\eden_st22.bmp",-200,0
lsp 700,":a;chara\alice8th_st01.bmp",190,0:print 10,500
name "Black Alice"
>Oh my, oh my...@>It looks like the Hero Luka reclaimed Sylph.@
>Teehee.@>What a massive failure.\
name ""
name "Eden"
>Shut up, little girl.\
if %ivent06<2 mov $sel1,"Even if he has regained two spirits, nothing has changed."
if %ivent06=2 mov $sel1,"Oh, are you referring to your invasion of Sabasa Castle?"
eng $sel1:$sel6\
name ""
if %ivent06<2 skip 12
name "Black Alice"
>It's true the Queen Vampire lost...@
>It's simply a step in the overall process.\
>The ground invasion is still ongoing.@
>We've already won, we just need to wait until it's official.\
name ""
lsp 701,":a;chara\eden_st21.bmp",-200,0:print 10,500
name "Eden"
>It is the same for us...@> All that matters is the Hero's defeat.@
>Even if he has regained two spirits, he still cannot win.\
name ""
name "Black Alice"
>Hehe.@>It's not good to make light of your enemy.@
>Especially the Hero who managed to master all of the spirits...\
name ""
name "Eden"
>...Is that the opinion of one who was pathetically beaten by such a Hero?\
name ""
name "Black Alice"
>Oh my, oh my.@>Such mean words.@
>You're a big bully, Seraph.\
name ""
lsp 701,":a;chara\eden_st22.bmp",-200,0:print 10,500
name "Eden"
>...I do not trust you.@
>I'm certain you hold a grudge against Ilias.\
>Don't forget, Black Alice.@> My eyes are always watching you...\
name ""
name "Black Alice"
>My, how scary.@
>I'll keep that in mind, as you say.\
>Perhaps you should pay more attention to your own duty, instead of always watching me though?\
name ""
name "Eden"
>...Your jabs are futile.@
>Don't forget.\
name ""
dwave 1,"se\escape.ogg"
csp 701:print 10,500
>With that final word, Eden departs.\
name "Black Alice"
>If you don't trust someone, you deal with them immediately.@
>The fact you didn't do that shows just how incompetent you are.@>Hehe.\
name ""
r@k@\
if %ivent08=0 goto *sean0355x
bgmstop
sean_change "bg065"
goto *sean0352a



*sean0352a

bgm "bgm\kiki3.ogg"
lsp 700,":a;chara\mob_heisi1.bmp",-170,0
lsp 701,":a;chara\typhon_st01.bmp",160,0:print 10,500
name "Soldier A"
>I won't let you past!@
>You won't take a single step closer to the Queen!\
name ""
name "Typhon Girl"
>Oh my... How serious.@>But...\
name ""
dwave 1,"se\down.ogg"
>In quickness unbecoming of her huge bulk, the Typhon Girl knocks the soldier down in a flash!@
dwave 2,"se\ero_makituki3.ogg"
>Wrapping her thick tongue around him, she raises his body in the air!\
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
csp 701
lsp 700,":a;chara\typhon_h1.bmp",0,0:print 10,500
name "Soldier A"
>Guh...!@>Let go!\
name ""
name "Typhon Girl"
>Ahaha... You think you can escape?@
>You're just going to be a delicious morsel now. \
name ""
name "Soldier A"
>Hya...!@>S...Stop!\
name ""
mov %hseanwave,11:hseanwave
lsp 700,":a;chara\typhon_h2.bmp",0,0:print 10,500
>The Soldier is slowly drawn into her mouth, struggling all the while...\
name "Soldier A"
>Hyaaa!\
name ""
name "Typhon Girl"
>Do you want to be saved? Have the rest of your life to look forward to?@
>Then... If you can endure this, I'll set you free. \
name ""
name "Soldier A"
>Wh...What!?\
name ""
>The clothes and armor on his lower body is dissolved by the Typhon Girl's saliva, leaving his genitals completely bare to her.\
name "Soldier A"
>Ah...!@> Haa!\
name ""
name "Typhon Girl"
>Aha... You know what's going to happen, right?@
>The mouths of my tentacles are going to swallow your cock.\
>Without teeth, they'll chew eveeeeeer so gently on it.\
name ""
>The soft, slimy tentacle starts making chewing and munching motions on the Soldier's penis, causing him to squirm in sudden pleasure.\
name "Typhon Girl"
>If it doesn't make you come... Then just this once, I'll let you go.@
>But if you do... I'll swallow you whole. \
name ""
name "Soldier A"
>Ahh!\
name ""
>Terrified at her threat of eating him, the Soldier tenses up his waist, denying what he's feeling.\
name "Typhon Girl"
>Aha, good, good... You don't want to come, right? \
name ""
>With wet noises sounding out, her tentacle continues chewing and squeezing the man's penis.@
>Paying special attention to his tip, the slimy tentacle gives him an intense massage.\
name "Soldier A"
>Guh...!@>Ahh!\
name ""
>The man's eyes close as he focuses every ounce of his strength on denying the pleasure.@
>But despite his mental effort, his penis is visibly twitching, wanting to release into the monster's tentacle.\
>Acting just like a smaller preying mouth, the tentacle is devouring his penis...@
>And if he succumbs to it, his whole body itself will be devoured.\
>Her tentacle, designed to suck on men and force them to helpless ejaculations.@
>Fearful for his life, the Soldier tries to deny the inevitable outcome for one caught by it.\
name "Soldier A"
>N...No!@>It feels too good!@
>Urhgg!\
name ""
name "Typhon Girl"
>Aha, are you already leaking?@
>But if you come, you'll be eaten you know?\
name ""
name "Soldier A"
>Ah... Urhgg...\
name ""
>The Soldier grits his teeth, doing everything he can to stop the rising climax.@
>But his head slowly goes white, as the denied pleasure takes over even his brain.\
>Even knowing that if he let's go he'll die, he can't deny what his body is making him do any longer.\
name "Soldier A"
>Ha...!@> I...I'm coming...!\
name ""
>At last, he resigns himself to the pleasure.@
>Letting go, he gives himself over to his male desire.\
>Abandoning his restraint, he focuses every sense in his body on the tentacle chewing on him.@
>With a moan, the refused pleasure overwhelms his entire being at once.\
gosub *syasei1:gosub *syasei2
name "Soldier A"
>Ahhh....\
name ""
>Leaning back in bliss, his semen pours into the monster.@
>But after this momentary taste of heaven, true despair awaited...\
name "Typhon Girl"
>Oops, too bad... You came.@
>Now to feast... \
name ""
name "Soldier A"
>S...Stop this please!@
>Ahhhh!!\
name ""
lsp 700,":a;chara\typhon_h3.bmp",0,0:print 10,500
>With a scream of horror, the Soldier is swallowed by the Typhon Girl.\
name "Typhon Girl"
>Hahaha... How does it feel to be swallowed alive?@
>Don't you think you could get addicted to it?\
>But it's too bad... It's something you can only ever experience once.@
>So you better enjoy it all you can for now. \
name ""
name "Soldier A"
>Ahhh...!\
name ""
>Wrapped up tight inside the Typon Girl's stomach, the Soldier sighs in resigned pleasure as his body starts to digest away...\
mov %hseanwave,0:hseanwave
name "Typhon Girl"
>Thanks for the meal...\
name ""
>The poor soldier slowly dissolves away inside her stomach.@
>His once living body is melted away into mere nourishment for the monster...\
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_etc5,1
bgm "bgm\kiki3.ogg"
lsp 700,":a;chara\mob_heisi1.bmp",-170,0
lsp 701,":a;chara\typhon_st01.bmp",160,0:print 10,500
name "Soldier B"
>S...She ate him... Why is this happening...?\
name ""
name "Soldier C"
>Ahhh!\
name ""
>The remaining soldiers all are in a state of shock, looking on the scene in front of them.\
name "Typhon Girl"
>Now who shall I eat next...?\
name ""
name "Soldier B"
>Urhg!\
name ""
>The trembling soldiers start to inch away...@
>Suddenly from behind them, a small figure rushes out!\
bgm "bgm\battle2.ogg"
lsp 700,":a;chara\alice_st73.bmp",-170,50
lsp 701,":a;chara\typhon_st01.bmp",160,0:print 10,500
name "Alice"
>Just try that on me!\
name ""
name "Typhon Girl"
>You... Can't be...\
name ""
name "Alice"
>Ooooooo!!\
name ""
>A single, powerful blow slams right into the Typhon Girl's incredulous mouth.\
dwave 1,"se\dageki2.ogg"
csp 701
lsp2 0,":a;chara\typhon_st01.bmp",570,325,100,100,0,255
for %move=0 to 100 step 1
msp2 0,10,-10,0,0,15,0
print 1:wait 7
next
csp2 0
>Her huge body slams into the wall, breaking it and flying outside the room.\
name "Luka"
>Even when sealed, your power is incredible, Alice.\
name ""
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>Hmph.@>If I was at full power she would have left the atmosphere, not just this room.\
name ""
lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
name "Soldier"
>Thank goodness!@>Having a Hero here as reinforcement is very reassuring!@
>But please... Leave this area to us.\
>Some powerful enemies were able to get past us, close to the Queen.@
>Can you please go and help her!?\
name ""
name "Luka"
>Yes, leave it to me!\
name ""
csp 700:print 10,500
>They're already further in than I thought...@
>Rushing past the soldiers, I hurry to the Queen's chambers.\
dwave 1,"se\asioto4.ogg"
sean_change "bg190"
lsp 700,":a;chara\c_beast_st01.bmp",0,0:print 10,500
name "Luka"
>Step aside!\
name ""
dwave 1,"se\slash.ogg"
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
csp 700:print 10,500
dwave 1,"se\asioto4.ogg"
>Running through the Castle, slashing away Chimeric Beasts as I go, I finally reach the room before the Queen's chambers.\
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\durahan_st03.bmp",0,50
lsp 701,":a;chara\kerberos_st03.bmp",160,0:print 10,500
name "Dullahan"
>Uwaa!\
name ""
name "Cerberus"
>Grr...\
name ""
dwave 1,"se\down.ogg"
>Two monsters are crumpled on the floor.@
>I fought these two before, in the Colosseum...\
name "Luka"
>Dullahan!@>Cerberus!\
name ""
csp 700
lsp 701,":a;chara\lamianloid_st01.bmp",0,0:print 10,500
name "Lamiaroid"
>Arara... Even a Hero came along?@
>You are some of the best prey to be had...@> But I'm a little busy now.\
name ""
>A strange monster, seemingly half machine is standing over them.@
>Despite her strange appearance, the power coming off of her is intense.\
lsp 700,":a;chara\durahan_st03.bmp",0,50
lsp 701,":a;chara\lamianloid_st01.bmp",160,0:print 10,500
name "Dullahan"
>Q...Queen...@> Please... Protect...\
name ""
name "Luka"
>Yes, leave it to me!\
name ""
>They seem to have taken some huge damage, but their lives aren't in danger.@
csp 700
lsp 701,":a;chara\lamianloid_st01.bmp",0,0:print 10,500
>I need to concentrate on the enemy in front of me...\
r@k@\
csp 701
goto *lamianloid_start



*sean0354

bgm "bgm\kiki2.ogg"
name ""
r@k@\
name "Luka"
>Her last words...@>I wonder what they meant?\
name ""
>A decoy?@> "She" will win?@
>What was she talking about...\
lsp 700,":a;chara\durahan_st03.bmp",228,50:print 10,500
name "Dullahan"
>I...It can't be!\
name ""
dwave 1,"se\door1.ogg"
bg "bg\bg045.bmp",10,500
>In a fit of desperation, Dullahan jumps up and opens a door despite her damaged body.\
lsp 700,":a;chara\durahan_st03.bmp",228,50:print 10,500
name "Dullahan"
>No...@>Her Majesty... She was in this room...\
name ""
name "Luka"
>What's that...?\
name ""
csp 700:print 10,500
>There's a note on the chair.\
>"If you want the Queen, come to the Colosseum alone, Hero Luka" was written.\
>A note from the one who took the Queen!\
lsp 700,":a;chara\durahan_st03.bmp",228,50:print 10,500
name "Dullahan"
>Wh...What a blunder...\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\durahan_st03.bmp",388,50:print 10,500
name "Alice"
>Luka and I can both tell...@>While this may be a war, the one who kidnapped her isn't in it for mindless bloodshed.\
>She's probably a soldier, driven by honorable combat...\
name ""
name "Luka"
>Otherwise she would never leave a note like this...\
name ""
>She was able to get in here without a sign, and Kidnap the Queen.@
>She must be quite a powerful opponent.\
csp 701
lsp 700,":a;chara\durahan_st03.bmp",228,50:print 10,500
name "Dullahan"
>I must aid Her Majesty!\
name ""
>Dullahan tries to run for the door, but collapses after a few steps.@
>The damage she took fighting Lamiaroid was just too much.\
name "Luka"
>You've done enough, it's my turn!\
name ""
name "Dullahan"
>Such a failure...@
>...Please, save Her Majesty!\
name ""
name "Luka"
>Yes, leave it to me.@
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
>Alice, I think you already know...\
name ""
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>If we don't follow the instructions, we don't know what she will do with the Queen.@
>You're going alone, right?\
name ""
name "Luka"
>That's right... I'll go alone!\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>She seems to be one who wants honorable combat...@
>I don't think it's a trap, but be careful Luka!\
name ""
name "Luka"
>Yes!\
name ""
csp 700:print 10,500
>If something happens to the Queen, the hope of this country will be lost...@
>With determination in my heart, I rush toward the Colosseum.\
dwave 1,"se\asioto3.ogg"
bgmstop
sean_change "bg225"
bgm "bgm\colosseum.ogg"
name "Luka"
>........\
name ""
>Running past the abandoned reception desk, I enter the arena.@
>There I see something strange...\
lsp 690,":a;chara\knightloid_ct41.bmp",0,0:print 10,500
>Completely filling the stands are sobbing girls, all handcuffed.\
name "Girl"
>Hero!@>Do your best!\
name ""
name "Sister"
>I believe in you, Hero!\
name ""
>All of them stare at me with hope in their eyes.@
>Just what is going on here...?\
csp 690:print 10,500
name "Luka"
>...What is the meaning of this!?\
name ""
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\knightloid_ct01.bmp",0,0:print 10,500
name "???"
>...The match starts now.@
>The match that will decide the Queen's, and every other girl's fate here!\
name ""
>Standing atop a pillar, a strong looking monster challenges me.\
name "Luka"
>A...Are you...!?\
name ""
r@k@\
csp 690
goto *knightloid_start



*sean0355

bgm "bgm\epilogue.ogg"
name ""
r@k@\
name "Luka"
>If she kept her promise, everyone should be released now...\
name ""
>Cheers suddenly erupt from the stands.@
>All of the women jump up as the handcuffs holding them in place all unlatch.\
>They must have been locked in place by some magic that Knightroid was maintaining...\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Hmph, that was quite some "game".@
>After their leader was defeated, the other attacking forces seem to have fled, too.\
name ""
name "Luka"
>Alice...\
name ""
>Coming into the arena was Alice and...@
lsp 700,":a;chara\grandnoa_st02.bmp",0,0:print 10,500
>The now freed Grand Noah Queen.\
lsp 700,":a;chara\durahan_st01.bmp",0,50
lsp 701,":a;chara\kerberos_st01.bmp",160,0:print 10,500
>Behind her, Cerberus and Dullahan are also unsteadily trying to act as an honor guard, despite their injuries.\
csp 701
lsp 700,":a;chara\grandnoa_st02.bmp",0,0:print 10,500
name "Grand Noah Queen"
>Hero Luka... Due to your actions, you have saved me and my people.@
>As the Queen, I thank you from the bottom of my heart.\
name ""
name "Luka"
>No, no, it was nothing...\
name ""
name "Grand Noah Queen"
>The brave, gallant Hero who dashed into the Colosseum and rescued me...@
>Truly, you are a Hero of legend.\
>If I was a Princess captured in this Castle, I would get married to you right here.\
name ""
name "Luka"
>Eh...!?\
name ""
name "Grand Noah Queen"
>Haha... A joke.\
name ""
name "Luka"
>Oh, a joke?@
>Haha... I thought you were going to do the same thing as the Saba...\
dwave 1,"se\ero_makituki1.ogg"
>Hey, Alice, get your tail off my foot...\
name ""
lsp 700,":a;chara\alice_st71.bmp",170,50
lsp 701,":a;chara\grandnoa_st02.bmp",-180,0:print 10,500
name "Alice"
>...........\
name ""
>Even as we speak, the women in the stands are all still cheering and calling out my name.@
>I start to get a little red at all of the women calling for me.\
csp 701
lsp 700,":a;chara\grandnoa_st02.bmp",0,0:print 10,500
name "Grand Noah Queen"
>Hero Luka... Do you hear the shouts of joy from the stands?@
>They are all calling your name with hope in their hearts.\
>You are the one who inspired them all.@
>If those voices can all call around the world in hope like they are, then our hearts will all surely be united.\
name ""
name "Luka"
>Yes... I'll fight for that!\
name ""
>I vow for further success in front of the Queen.@
lsp 700,":a;chara\durahan_st01.bmp",0,50
lsp 701,":a;chara\kerberos_st01.bmp",160,0:print 10,500
>After our conversation is finished, the two Imperial Guards call out to me.\
name "Dullahan"
>Luka... I realize now the difference in power there is between me and them.@
>I'll take great strides to truly improve my strength.\
name ""
name "Cerberus"
>At first I just wanted revenge against ya for my loss...@
>But now, I want ya to challenge me in the Colosseum again in the future to test my improved skills!\
name ""
name "Luka"
>Yes, I'll challenge you again in the future!\
name ""
cspl 700,701:print 10,500
>I have to bring peace back to the world, so that the Colosseum can reopen!@
>With the hopes of the people of Grand Noah in our hearts, we head back to Galda.\
>Now then, for our next location...\
r@k@\
mov %ivent08,2
mov %gloval1_story_sinkou,16:gosub *savegloval1
bgm "bgm\field4.ogg"
goto *map11



*sean0355x

bgmstop
sean_change "bg182"
bgm "bgm\field4.ogg"
name "Luka"
>Grand Noah... It's gone...\
name ""
>The once scenic Grand Noah Castle is in ruins.@
>A horrible scene of destruction right in the middle of the giant plains.\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>That complete destruction... It really does look like a punishment being carried out.@
>That damn Ilias really intends to destroy the world!\
name ""
name "Luka"
>I won't forgive this!\
name ""
csp 700:print 10,500
>It's too late for Grand Noah... We have to move on before the damage spreads further!\
mov %gloval1_story_sinkou,16:gosub *savegloval1
goto *map11



*sean0356

gosub *setwindow_01
bgm "bgm\kiki2.ogg"
bg "bg\bg159.bmp",10,1500
lsp 700,":a;chara\sirohebi_st11.bmp",0,0:print 10,500
name "Shirohebi the Younger"
>...Who is it?\
name ""
>A strange presence suddenly hangs over the pale, blue-green eyed Lamia.@
>An ominous presence, full of a wicked strength...\
name "Shirohebi the Younger"
>It can't be... elder sister?\
name ""
dwave 1,"se\escape.ogg"
lsp 700,":a;chara\sirohebi_st11.bmp",-170,0
lsp 701,":a;chara\sirohebisama_st01.bmp",170,0:print 10,500
name "Shirohebi the Older"
>...Indeed it is I, little sister.@
>Do you enjoy sitting in this temple, being revered by the citizens here?\
name ""
name "Shirohebi the Younger"
>Sister, why have you returned?@
>I thought you parted from me and this village forever.\
>And what is this ominous aura about you...?\
name ""
name "Shirohebi the Older"
>I came to enjoy the party here...@
>Since you are my sister, I don't wish to take your life, but...\
>I shall need you to sleep for a while.\
name ""
name "Shirohebi the Younger"
>Gah...!@>Sister, what are...\
name ""
dwave 1,"se\down.ogg"
csp 700:print 10,500
>With a short, surprised scream, the younger Lamia crumples to the floor.\
name "Shirohebi the Older"
>Now everyone, the feast begins!@
>Devour and consume to your heart's content!\
name ""
>Along with the albino Lamia, numerous other monsters begin moving in the village...\
bgmstop
sean_change "bg088"
bgm "bgm\kiki1.ogg"
lsp 700,":a;chara\mob_seinen1.bmp",-170,0
lsp 701,":a;chara\mob_rouzin1.bmp",170,0:print 10,500
name "Villager"
>Uwaaa!!\
name ""
name "Old Man"
>Wahwahwah!@> Were our offerings not enough!?\
name ""
>Almost immediately, the village descends into chaos.@
>All through the village, the villagers attempt to run back and barricade themselves in their houses.\
cspl 700,701
bg "bg\bg159.bmp",10,1500
lsp 700,":a;chara\mikolamia_st03.bmp",0,0:print 10,500
name "Miko Lamia"
>Everyone, please take refuge in the shrine!\
name ""
lsp 700,":a;chara\mob_seinen1.bmp",-170,0
lsp 701,":a;chara\mikolamia_st03.bmp",180,0:print 10,500
name "Villager"
>Hyaaa!@
>Run, run!\
name ""
dwave 1,"se\asioto1.ogg"
>In a panic, the remaining villagers run toward the Shirohebi's branch family temple.\
name "Miko Lamia"
>Hurry, inside!@> Then I'll close the door!\
name ""
bg "bg\bg191.bmp",10,500
dwave 1,"se\door3.ogg"
>After the last villager is inside, the Miko Lamia firmly bars the door closed.@
>Having been constructed many years ago, the door is durable, and easily separates the interior from the outside world.\
lsp 700,":a;chara\mob_seinen1.bmp",-170,0
lsp 701,":a;chara\mob_ozisan1.bmp",170,0:print 10,500
name "Villager A"
>Haa... Haaa... We're saved...@
>But... What was that?\
name ""
name "Villager B"
>Eh... Miko...@>Why did you seal the back door, too?\
name ""
lsp 700,":a;chara\mob_seinen1.bmp",-170,0
lsp 701,":a;chara\mikolamia_st02.bmp",180,0:print 10,500
name "Miko Lamia"
>Why...@> Because I want to take my time devouring all of you, of course.\
name ""
name "Villager A"
>N...No!\
name ""
name "Villager B"
>Ahhhh!!\
name ""
>The screams of the villagers are sealed inside the tightly shut doors of the shrine...\
sean_change "bg088"
name "Luka"
>This isn't good, they're already rampaging around!\
name ""
>The village was already in chaos before we arrived.@
>The native monsters of the area are chasing all of the villagers around in a frenzy.\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>There are so many...@
>As before, we must aim for their leader!\
name ""
name "Luka"
>Then we should follow the source of the most powerful magic and head there...\
name ""
csp 700:print 10,500
name "???"
>Ah!@>A delicious looking adventurer! \
name ""
>Before we can even try to find where the leader is, a trio of monsters jumps in front of us...\
r@k@\
goto *akaname_start



*sean0357

bgm "bgm\kiki1.ogg"
name ""
r@k@\
name "Luka"
>Sheesh, I don't need these distractions when time is so critical...\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Wasting time on that idiot trio...@
>We must find and eliminate the leader as quick as possible, before the damage spreads!\
name ""
name "Luka"
>I know... You feel the strong magical power from this direction as well, don't you?\
name ""
csp 700:print 10,500
>A strange haze of magic power wafts over from the nearby shrine.@
>Alice and I take off through the streets of the town, heading for it.\
dwave 1,"se\asioto1.ogg"
sean_change "bg191"
bgm "bgm\kiki2.ogg"
name "Luka"
>W...What is this!?\
name ""
>Following the source of the power, we step into the Snake Shrine...@
>And see naked villagers lying all around.\
name "Luka"
>Are we too late...?@>No, it looks like they're all still breathing!\
name ""
>It looks like their breathing is very faint though... If they don't get help soon, I don't think they'll survive!\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>After tasting each one, she squeezed them dry in moments.@
>She must be quite tenacious in her squeezing...\
name ""
csp 700:print 10,500
name "???"
>Hehe, oh don't compliment me like that.@
>I am the "tenacious" Miko Lamia who left them like that.\
name ""
name "Luka"
>You're...\
name ""
r@k@\
goto *mikolamia_start



*sean0358

bgm "bgm\kiki2.ogg"
r@k@\
name "Luka"
>Shirohebi...?@
>Is she the leader?\
name ""
>I met that Shirohebi before, I'm sure of it...@
>I thought she was for peaceful coexistence, though?\
name "Luka"
>Wait, that reminds me...@> Didn't she mention something about an older sister?@
>That she had hated humans, and left the village?\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>I'm sure someone like that became one of Black Alice's subordinates.@
>Now come on, let's find the leader here!\
name ""
name "Luka"
>Yeah, let's go!\
name ""
csp 700:print 10,500
>With that, we run from the Snake Shrine, heading for Shirohebi's shrine.\
if %ivent01=0 goto *sean0358x
dwave 1,"se\asioto1.ogg"
bg "BG\bg159.bmp",10,1500
name "Luka"
>Out of the way!\
name ""
dwave 1,"se\slash.ogg"
>Slashing away monster after monster on our way to the shrine, I notice someone as we pass by the Cat Shrine...\
name "Luka"
>That's...!\
name ""
>Two familiar monsters are being attacked by Chimeric Beasts!\
lsp 700,":a;chara\gob_st04.bmp",-200,0
lsp 701,":a;chara\nekomata_st07.bmp",200,60:print 10,500
name "Goblin Girl"
>Waaahn!@>Don't come any closer!@
>I...I'll kick your butt if you do!\
name ""
name "Nekomata"
>Hiss!\
name ""
lsp 701,":a;chara\c_beast_st01.bmp",-160,0
lsp 700,":a;chara\c_beast_st01.bmp",200,0:print 10,500
>The two of them are in the middle of a swarm of Chimeric Beasts...@
>If I don't help, they'll be done for!\
name "Luka"
>Haa!\
name ""
dwave 1,"se\slash.ogg"
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
csp 700:print 10,500
dwave 2,"se\slash.ogg"
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
csp 701:print 10,500
>Dashing into the fray, I slash wildly at them, sealing them all away.\
name "Luka"
>Are you two alright!?\
name ""
lsp 700,":a;chara\gob_st05.bmp",-200,0
lsp 701,":a;chara\nekomata_st04.bmp",200,60:print 10,500
name "Goblin Girl"
>Ah!@>The Hero guy from before!@
>Thank you, you saved us!\
name ""
name "Nekomata"
>Unyaa...\
name ""
name "Luka"
>Save it for later, more are coming!\
name ""
lsp 701,":a;chara\c_beast_st01.bmp",-160,0
lsp 700,":a;chara\c_beast_st01.bmp",200,0:print 10,500
>More and more Chimeric Beasts surround us...\
r@k@\
cspl 700,701
goto *kezyorou_start



*sean0358a

bgm "bgm\kiki2.ogg"
r@k@\
name "Luka"
>Alright, she's down... But...!\
name ""
lsp 701,":a;chara\c_beast_st01.bmp",-160,0
lsp 700,":a;chara\c_beast_st01.bmp",200,0:print 10,500
>Even though I defeated Kejourou, there are still more Chimeric Beasts attacking!@
>We could take them out, but there's no way to protect them both while doing it!\
name "Luka"
>Guh... It's no use, not at this rate!\
name ""
lsp 700,":a;chara\gob_st04.bmp",-200,0
lsp 701,":a;chara\nekomata_st07.bmp",200,60:print 10,500
name "Nekomata"
>Unya...\
name ""
name "Goblin Girl"
>I...I won't run away!@
>Nekomata is my precious friend!!\
name ""
dwave 1,"se\karaburi.ogg"
lsp 700,":a;chara\gob_st04.bmp",-200,0
lsp 701,":a;chara\c_beast_st01.bmp",220,0:print 10,500
>Goblin Girl raises her huge hammer as a Chimeric Beast charges, but...\
name "Goblin Girl"
>Fugya!\
name ""
dwave 1,"se\tume.ogg"
wait 500
dwave 2,"se\down.ogg"
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
>A single slash of a Chimera's nail flicks her aside.\
name "Goblin Girl"
>Urhg... I need... More power...@
>To protect my... Friend...\
name ""
>Goblin Girl struggles to her feet to stand in the Chimera's way again, propping herself up on her hammer.\
lsp 701,":a;chara\gnome_st32.bmp",30,50:print 10,500
name "Gnome"
>...........\
name ""
name "Luka"
>Gnome, what are you...\
name ""
>I suddenly feel Gnome part from me, her spirit moving toward Goblin Girl.\
lsp 701,":a;chara\gob_st04.bmp",-200,0
lsp 700,":a;chara\gnome_st33.bmp",30,50:print 10,300
dwave 1,"se\dageki.ogg"
name "Goblin Girl"
>Gyan!\
name ""
>Goblin Girl perks up like she was slapped!\
name "Goblin Girl"
>Wh...What the heck!?@
lsp 701,":a;chara\gob_st05.bmp",-200,0:print 10,500
>...Ehh?@>I suddenly feel... Strength!\
name ""
dwave 1,"se\power.ogg"
>Power starts to radiate in her tiny body!@
>Wait, no... It isn't able to all fit in her small frame!\
bgm "bgm\battle2.ogg"
dwave 2,"se\warm.ogg"
csp 701
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
lsp 700,":a;chara\gob_st12.bmp",50,0
csp 2:print 10,300
name "Goblin Girl"
>Uoooo!\
name ""
>Goblin Girl's body suddenly expands, her appearance more closely matching the huge strength radiating from her!\
name "Luka"
>Wh...What's going on!?@
>Gnome, what did you do!?\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\gob_st12.bmp",210,0:print 10,500
name "Alice"
>It looks like Gnome somehow brought out her potential power.@
>That Goblin Girl must be a descendant of a powerful monster...\
name ""
lsp 700,":a;chara\gob_st12.bmp",-140,0
lsp 701,":a;chara\c_beast_st01.bmp",220,0:print 10,500
name "Chimera Beast"
>.....!\
name ""
>Startled at the sudden change in atmosphere, a Chimeric Beast lunges at Goblin Girl!\
lsp 700,":a;chara\gob_st13.bmp",-140,0:print 10,500
name "Goblin Girl"
>Too slow... I'll bring you down!\
name ""
dwave 3,"se\karaburi.ogg"
lsp 2,":c;effect\003.bmp",0,0:print 1
wait 300
csp 2:print 18,500,"system\mask01.jpg"
dwave 2,"se\slash3.ogg"
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
csp 701:print 10,500
>With a single, powerful cut, Goblin Girl splits the lunging Chimeric Beast in two.\
name "Goblin Girl"
>Secret Goblin Sword Cut Eviscerating Slasher Attack...\
name ""
>Her attack naming sense is as strange as ever...@
>Anyway, I think they're alright now without my help.\
name "Luka"
>Goblin, we're going to go after that Shirohebi monster!@
>Are you and Nekomata alright if we split up?\
name ""
lsp 700,":a;chara\gob_st12.bmp",-140,0
lsp 701,":a;chara\nekomata_st04.bmp",190,60:print 10,500
name "Goblin Girl"
>Yes, leave this to us!\
name ""
name "Nekomata"
>Nya!\
name ""
lsp 700,":a;chara\gob_st13.bmp",-140,0
lsp 701,":a;chara\c_beast_st01.bmp",220,0:print 10,500
name "Goblin Girl"
>Tya!\
name ""
dwave 1,"se\asioto1.ogg"
wait 400
dwave 2,"se\slash3.ogg"
>With a roar, Goblin Girl jumps out into the swarm of Chimeric Beasts, her sword flashing around at crazy speeds.\
>Leaving the place to her, we head toward Shirohebi's shrine...\
goto *sean0358x



*sean0358x

dwave 1,"se\asioto1.ogg"
sean_change "bg090"
>Passing through some huge Torii, we rush inside the Shrine.@
>Sitting there with a glare in her eyes is a regal, powerful looking monster...\
r@k@\
goto *sirohebisama_start



*sean0359

bgm "bgm\epilogue2.ogg"
r@k@\
name "Luka"
>Whew... Finally over.\
name ""
>With Shirohebi defeated, I can sense the other attacking monsters dispersing.@
>It looks like we were able to somehow repel the enemy force!\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Mmm?@> Is that... The younger sister?\
name ""
>Laying in a crumpled heap nearby is a familiar looking white Lamia.@
>Alice slaps her cheeks a little to wake her up.\
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\sirohebi_st11.bmp",160,0:print 10,500
name "Shirohebi"
>Urhg... My mistake...@>Ah... My sister...?\
name ""
name "Alice"
>Your sister went mad, so she was sealed.@
>She's over there, but...\
name ""
>I look around for the sealed Shirohebi...@
>And near the edge of the shrine, the pale snake is trying to sneak away.\
csp 701
lsp 700,":a;chara\sirohebi_st11.bmp",0,0:print 10,500
name "Shirohebi"
>You won't escape, sister!\
name ""
name "White Snake"
>....!!\
name ""
>The younger Shirohebi sister quickly scoops up her sealed sister, and confines her in a cage.\
name "Shirohebi"
>Sheesh... Sister, why did you go so wild?@
>We used to have such fun playing in the hills together in the past...\
name ""
>The sealed sister hisses at Shirohebi in response.@
>I have no idea what that means...\
name "Luka"
>So what are you going to do with her...?\
name ""
name "White Snake"
>Hissss!\
name ""
>It's dangerous to even let her close to your face...@
>There's no way I can persuade her of anything while she's like this.\
name "Shirohebi"
>I shall keep her in this for a while...@
>If she doesn't repent, I'll use her in a soup.\
name ""
name "White Snake"
>....!?\
name ""
name "Shirohebi"
>...A joke, sister.@
>No matter how wild you get, I would never eat my own sister.\
name ""
name "White Snake"
>...........\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\sirohebi_st11.bmp",160,0:print 10,500
name "Alice"
>...Well I'll leave her treatment up to you.@
>When you decide to make that soup, please call me.@> I wish to taste it...\
name ""
name "Luka"
>Oi, oi...\
name ""
>I'm sure it will be fine if the sealed Shirohebi is left to the younger Shirohebi sister.@
>But what state is the village in...?\
sean_change "bg088"
lsp 700,":a;chara\mob_rouzin1.bmp",-170,0
lsp 701,":a;chara\mob_rouba.bmp",170,0:print 10,500
name "Old Man"
>Oh thank you Cat Goddess and Goblin Goddess!\
name ""
name "Old Woman"
>The Goblin Goddess was unexpected... We must erect a new shrine!\
name ""
lsp 700,":a;chara\gob_st11.bmp",-110,0
lsp 701,":a;chara\nekomata_st01.bmp",200,60:print 10,500
>The villagers are surrounding Nekomata and Goblin Girl, all praising them.@
>It looks like there wasn't much damage to the village thanks to them.\
lsp 700,":a;chara\mob_rouzin1.bmp",-170,0
lsp 701,":a;chara\mob_rouba.bmp",170,0:print 10,500
name "Old Man"
>Yes, yes... We must be sure to continue our worship every day.\
name ""
name "Old Woman"
>Yes, this is a boon from the Gods for our faith.@
>The reward from our investment.\
lsp 700,":a;chara\mob_rouba.bmp",-170,0
lsp 701,":a;chara\nekomata_st01.bmp",180,60:print 10,500
>Here, have some fried tofu.\
name ""
lsp 701,":a;chara\nekomata_st04.bmp",180,60:print 10,500
name "Nekomata"
>Unya!\
name ""
csp 701
lsp 700,":a;chara\gob_st12.bmp",50,0:print 10,500
name "Goblin Girl"
>Give me something too...@
lsp 700,":a;chara\gob_st13.bmp",50,0:print 10,500
>...Eh?@> My body...!@
>Wahwahwah!\
name ""
>Suddenly, Goblin Girl's body starts to shrink!@
dwave 1,"se\down4.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
lsp 700,":a;chara\gob_st04.bmp",0,0
csp 2:print 10,300
>After a few seconds, she returns to her original form...\
name "Goblin Girl"
>Eh? I turned back.@
>Ah... I feel really tired too...\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\gob_st04.bmp",160,0:print 10,500
name "Alice"
>Awakening that much potential power all at once was a little unreasonable on you.@
>If you fight like that for too long, you'll kill yourself.\
name ""
name "Goblin Girl"
>Gehgeh...!@> Scary...\
name ""
lsp 700,":a;chara\mob_rouzin1.bmp",-250,0
lsp 702,":a;chara\alice_st71.bmp",0,50
lsp 701,":a;chara\mob_rouba.bmp",250,0:print 10,500
>The villagers all flock around Alice after hearing her speak.\
name "Old Man"
>Oooh! Mighty Snake Goddess!\
name ""
name "Old Woman"
>Thank you, we will continue worshipping you!\
name ""
lsp 702,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>I'm no Goddess, I'm the Monster Lord...\
name ""
name "Old Man"
>Oooh Monster Lord Goddess!@> Thank you!\
name ""
name "Old Woman"
>You are a rare type of Goddess...@>We'll be sure to keep worshipping you.\
name ""
name "Luka"
>............\
name ""
>The Yamatai people are in their own world, as usual...\
name "Old Woman"
>By the way, where does she fall in the hierarchy of Goddesses?\
name ""
name "Old Man"
>My wife said she should be right below the Nekomata Goddess...\
name ""
lsp 702,":a;chara\alice_st73.bmp",0,50
lsp 701,":a;chara\nekomata_st01.bmp",250,60:print 10,500
name "Alice"
>What the hell!?@>I'm above her!\
name ""
lsp 701,":a;chara\nekomata_st04.bmp",250,60:print 10,500
name "Nekomata"
>...Nya \
name ""
name "Old Man"
>Oooh Monster Lord Goddess has been angered!@
>Give her offerings before she curses us all!\
name ""
lsp 702,":a;chara\alice_st79.bmp",0,50:print 10,500
name "Alice"
>Yaay. \
name ""
>Alice starts snatching rice balls being offered to her from the villagers, happily swallowing them one after another.\
cspl 700,701:print 10,500
name "Luka"
>Alice, it's time to go...@
>You got your reward, so you're happy, right?\
name ""
lsp 702,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>I want another...\
name ""
name "Luka"
>Don't take advantage of them...@>Let's go, Alice.\
name ""
lsp 702,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>Hrrmhrrmhrrm...\
name ""
csp 702:print 10,500
>Dragging Alice along, I leave the village.@
>Now for our next destination...\
r@k@\
mov %ivent09,2
mov %gloval1_story_sinkou,16:gosub *savegloval1
bgm "bgm\field4.ogg"
goto *map11



*sean0360

sean_change "bg093"
gosub *setwindow_01p
bgm "bgm\plansect.ogg"
name "Luka"
>I wonder if Plansect Village is alright...?\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Since Ilias hates monsters, I doubt she left it alone.@
>It's a good idea to see if it is under attack or not.\
name ""
csp 700:print 10,500
dwave 1,"se\asioto2.ogg"
>As we walk toward the village, I suddenly feel something approaching us!\
name "Luka"
>....An enemy!?\
name ""
>I take out my sword, and turn to where I sense them...@
lsp 700,":a;chara\mosquito_st03.bmp",40,50
lsp 701,":a;chara\a_alm_st03.bmp",380,0:print 10,500
>And a familiar duo of monsters appears!\
name "Mosquito Girl"
>Ah!@>The Hero from before!@
>Please, help us!\
name ""
name "Alra Arum"
>Our pursuer is already here!\
name ""
>The two of them look terrified.@
>Something's chasing them!\
name "Luka"
>Just who is...\
name ""
cspl 700,701:print 10,500
>Before I can finish my sentence, I feel the presence of another monster approaching!@
>It must be the one chasing them!\
r@k@\
goto *walraune_start



*sean0361

bgm "bgm\kiki2.ogg"
r@k@\
name "Luka"
>She was a little strange...\
name ""
>Monsters from the Alraune family are usually calm.@
>Of course, there are always exceptions, but...\
lsp 700,":a;chara\mosquito_st03.bmp",40,50
lsp 701,":a;chara\a_alm_st03.bmp",380,0:print 10,500
name "Mosquito Girl"
>T...Thank you.@
>But most of our friends have been captured...\
name ""
name "Alra Arum"
>Please, help them!@
>If they don't escape, they'll all be tortured...\
name ""
lsp 700,":a;chara\alice_st73.bmp",-170,50:print 10,500
name "Alice"
>Just what is going on?\
name ""
name "Alra Arum"
>A little while ago, a party led by Queen Alraune came to the village.@
>They said they had something important to tell us, so we welcomed them in, but...\
name ""
lsp 700,":a;chara\a_emp_st11b.bmp",40,60
lsp 701,":a;chara\queenalraune_st21.bmp",160,0
bg "bg\bg095.bmp",99,2000,"system\lngtwave.dll/vwi"
bgm "bgm\plansect.ogg"
name "Queen Alraune"
>Priestess, caretaker of this land...@
>I've forced troubling issues on you for far too long.\
>I've come here today to grant you the position of Queen.\
name ""
name "Alra Priestess"
>Me, Queen!?@
>But I am far too young...!\
name ""
lsp 701,":a;chara\queenalraune_st22.bmp",160,0:print 10,500
name "Queen Alraune"
>It's true, your power is still developing...@
>But your rule of this difficult area, Plansect, has shown you are the equal to any Queen from the past.\
>I firmly believe that you can bring glory to the Plant family.\
name ""
lsp 700,":a;chara\a_emp_st13b.bmp",40,60:print 10,500
name "Alra Priestess"
>B...But Queen, aren't you still suited to lead?@
>Why would you leave the throne...?\
name ""
lsp 701,":a;chara\queenalraune_st21.bmp",160,0:print 10,500
name "Queen Alraune"
>I'm sure you're aware of the war raging for the role of Queen Spider.\
>And just why are they fighting over it?@
>Because the previous Queen grew old, and was forced to abdicate her throne.\
>With her power so weak, she had no say in appointing her successor, as she had no way to back it up.@
>Exploiting that opening, the Spider Princess came forth to make a claim.\
name ""
name "Alra Priestess"
>Yes, I've heard of that, but...\
name ""
name "Queen Alraune"
>As a Queen, I don't want the same fate to befall our family.@
>So while I am still young, I wish to transfer leadership over in a way that leaves no room for turmoil.\
>This is all to continue the Plant family's 10,000 years of prosperity.@
>I know you understand, Priestess.\
name ""
name "Alra Priestess"
>..........\
name ""
lsp 700,":a;chara\a_emp_st12b.bmp",40,60:print 10,500
name "Alra Priestess"
>...Very well, I understand and accept your reasoning.\
name ""
lsp 701,":a;chara\queenalraune_st22.bmp",160,0:print 10,500
name "Queen Alraune"
>That answer pleases me from the bottom of my heart.@
>But before it's official, I need one more task completed.\
>Think of it as a ceremony to ascend the throne as the new Queen...\
name ""
name "Alra Priestess"
>Yes, anything...\
name ""
bgm "bgm\kiki2.ogg"
name "Queen Alraune"
>...Root out the insects trying to burrow their way into this village.@
>A beautiful Queen should not overlook such disgusting things around her.\
name ""
lsp 700,":a;chara\a_emp_st13b.bmp",40,60:print 10,500
name "Alra Priestess"
>Wh...!@> You can't be...!\
name ""
name "Queen Alraune"
>You don't have to worry about the Monster Lord's desires any longer.@
>Solidify the hegemony of the Plant family with your own power.\
>Control of Plansect Village is the first step.@
>One who couldn't even do that would have no chance as Queen...\
name ""
name "Alra Priestess"
>...I have no desire to be a Queen and create a hegemony.@
>We have abandoned the path of violence and control, and have moved toward coexistence.\
>I would not exterminate the insects here, even if it was a direct order from your Majesty!\
name ""
lsp 701,":a;chara\queenalraune_st21.bmp",160,0:print 10,500
name "Queen Alraune"
>What...@>How could you be so uncommitted to the cause?@
>It looks like you would make a poor Queen...\
>Perhaps you need a little... Re-education.\
name ""
dwave 1,"se\ero_makituki3.ogg"
name "Alra Priestess"
>Queen... What... Are you...?@
>Ahhh!\
name ""
lsp 700,":a;chara\mosquito_st03.bmp",40,50
lsp 701,":a;chara\a_alm_st03.bmp",380,0
bg "bg\bg093.bmp",99,2000,"system\lngtwave.dll/vwi"
name "Mosquito Girl"
>That's why us insects all ran away...@
>Many escaped, but we are all being pursued.\
name ""
name "Alra Arum"
>The group that the Queen led here is attacking everyone.@
>Both the insects, and those of us plants that sided with coexistence...\
name ""
name "Luka"
>That's horrible!@
>Has Queen Alraune always been a tyrant like this!?\
name ""
csp 701
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>No... She was a calm, gentle monster who loved nature.@
>I didn't think she could be seduced by Black Alice, but...\
name ""
name "Luka"
>Has she hid her true ambition all this time?\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Mother... No, the previous Monster Lord trusted her.@
>No matter how I think about it, this just doesn't add up.\
name ""
name "Luka"
>Even so, we can't let this continue...@
>After enough time, I bet Black Alice was able to corrupt her somehow.\
name ""
name "Alice"
>Yes... We must find out what happened.@
>Is Queen Alraune still in this forest?\
name ""
lsp 700,":a;chara\mosquito_st03.bmp",40,50
lsp 701,":a;chara\a_alm_st03.bmp",380,0:print 10,500
name "Alra Arum"
>Yes... She caught lots of my brethren.\
name ""
name "Mosquito Girl"
>Lots of insects were caught to be sucked up for nutrients.@
>They all need help, too...\
name ""
name "Luka"
>Leave it to us.@
>I'll meet with Queen Alraune, and rescue everyone!\
name ""
name "Mosquito Girl"
>We'll help protect our friends as much as we can, and try to distract the pursuers...\
name ""
name "Alra Arum"
>The plant family will do our best to help, too!@
>Queen Alraune's conduct is not what we believe in any longer!\
name ""
>It looks like the two are still working together to help their mutual friends.@
>We have to meet with Queen Alraune and find out what her aim is here.\
name "Luka"
>Alright, let's go!\
name ""
name "Alra Arum"
>Please, rescue everyone...\
name ""
cspl 700,701:print 10,500
>We each part our different ways.@
>Heading toward the village center, we race toward Queen Alraune...\
dwave 1,"se\asioto2.ogg"
sean_change "bg094"
bgm "bgm\plansect.ogg"
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>It's faint, but... Do you smell something strange?@
>Just the smell of it is enough to make me feel dizzy.\
name ""
>Alice mutters something as we head through the forest.\
name "Luka"
>Yes there is...@
>Is it some sort of incense from a plant based monster?\
name ""
name "Alice"
>No, it feels different from that.@
>I remember this unpleasant feeling from somewhere before...\
>Err, what was it again?\
name ""
name "Luka"
>If it's not from an Alraune, then what is it...?\
name ""
csp 700:print 10,500
>As we puzzle over it...@
>A monster pops out in front of us!\
r@k@\
goto *dryad_start



*sean0362

bgm "bgm\plansect.ogg"
r@k@\
name "Luka"
>What the heck was that?\
name ""
>She suddenly changed right in the middle of the fight.@
>Is it like Alice said?@> Did someone do that to her?\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>That was a powerful brainwashing magic.@
>It's a technique to imbue evil intent directly into someone's mind.\
>You can feel the unpleasant trace of it lingering in the air.@
>It feels like someone used this brainwashing magic on a wide scale...\
name ""
name "Luka"
>So Queen Alraune may be effected, too?\
name ""
name "Alice"
>...That may be it.@
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
>But the user of this technique...@>No, it must be a mistake.\
name ""
name "Luka"
>Who are you thinking of?\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>...Tamamo.@
>During one of her lectures, I had a whiff of this smell.\
>The brainwashing technique is something only high level foxes can use.@
>And for one this strong and wide ranging...\
name ""
name "Luka"
>Surely it can't be Tamamo's doing...?\
name ""
name "Alice"
>There is no way, of course.@
>But for there to be another user who could brainwash even a Queen...\
>It's someone with magic power comparable to Tamamo.@
>Stronger than Queen Alraune, at least.\
name ""
name "Luka"
>Maybe it's another invention of Promestein's?@
>Anyway, we'll have to be careful here...\
name ""
csp 700:print 10,500
>Queen Alraune, and the one behind this technique...@
>We advance deeper into the forest, wary of both.\
dwave 1,"se\asioto2.ogg"
sean_change "bg095"
bgm "bgm\boss0.ogg"
>And in Plant Village... A horrible scene was awaiting us.\
lsp 700,":a;chara\a_emp_st13b.bmp",230,60:print 10,500
name "Alra Priestess"
>Urhg...\
name ""
>Covered in ivy, monsters are being drained of energy all over the place.@
>Among them is even Alra Priestess...\
csp 700:print 10,500
>And standing in the very center of it all...\
r@k@\
goto *queenalraune_start



*sean0363

bgm "bgm\plansect.ogg"
r@k@\
lsp 700,":a;chara\queenalraune_st23.bmp",0,0:print 10,500
name "Luka"
>Queen Alraune, are you free of the brainwashing!?\
name ""
name "Queen Alraune"
>Yes... My sanity has returned to me.@
>I've done a horrible thing...\
name ""
>The magic energy pouring out of her is far different than it was before.@
>Where it was oppressive before, it now feels calm and benevolent.\
>And all of the monsters nearby, their energy being sucked by ivy...@
dwave 1,"se\power.ogg"
>It seems like it's going in reverse, and energy is being poured into them instead!\
lsp 700,":a;chara\queenalraune_st21.bmp",0,0:print 10,500
name "Queen Alraune"
>If I reverse the absorption like this, nobody should lose their life...\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\queenalraune_st21.bmp",160,0:print 10,500
name "Alice"
>Queen Alraune, just who disturbed your mind like that?@
>There aren't many who could possibly have pulled off that technique...\
name ""
name "Queen Alraune"
>That person is very close still...@
>Be on your guard!\
name ""
>As soon as the Queen shouts that, a malicious aura presses into the area!\
bgm "bgm\boss0.ogg"
csp 701
lsp 700,":a;chara\tukuyomi_st01.bmp",0,0:print 10,500
name "???"
>Oh... Did you break through my fox technique?@
>As expected of a Queen...@>And you put on a good show too, old Monster Lord.\
name ""
name "Luka"
>Y...You're...!\
name ""
>Tsukuyomi... One of those Next Dolls that was in the castle!@
>She didn't show any of her skills back then, but she was the user of this technique...\
lsp 700,":a;chara\alice_st73.bmp",-170,50
lsp 701,":a;chara\tukuyomi_st11.bmp",240,0:print 10,500
name "Alice"
>...What does that mean?@
>That skill of yours is very similar to Tamamo's.\
>It is not the type of technique that can be imitated so easily.\
name ""
name "Tsukuyomi"
>Naturally...@
>Tamamo's cells were used in the creation of my body.\
>Her cells were collected, combined and synthesized with machine technology, and led to my creation as an artificial life form.\
>Thus, I have exceeded the original.\
name ""
name "Luka"
>In other words...@>You're like a clone of Tamamo?\
name ""
>Now that she mentions it...@
>Though her appearance is totally different, the feeling from her is the same.\
csp 701
lsp 700,":a;chara\tukuyomi_st01.bmp",0,0:print 10,500
name "Tsukuyomi"
>But the plan has ended in complete failure.@
>The brainwashed Queen was supposed to destroy Plansect through an internal war.\
>It looks like I'll just have to kill everyone myself after all...@
>Don't you think that's just so...@>Boring?\
name ""
lsp 701,":a;chara\tukuyomi_st11.bmp",-100,0
lsp 700,":a;chara\queenalraune_st21.bmp",200,0:print 10,500
name "Queen Alraune"
>You wanted us to kill each other off without doing it yourself...@
>I will never forgive you.\
name ""
>Queen Alraune looms over Tsukuyomi.@
>Despite her now gentle nature, she is shaking in anger at this barbaric act.\
name "Tsukuyomi"
>Oh ho...@> So you can't forgive me, huh?\
name ""
name "Queen Alraune"
>I will never let you harm my brethren again!@
>I'll train some discipline into that body!\
name ""
dwave 1,"se\ero_makituki3.ogg"
>Ivy grows from Queen Alraune, and wraps around Tsukuyomi's body.@
>In moments, she's completely coiled in ivy tentacles.\
name "Queen Alraune"
>Just surrender.@>That way I won't kill you.\
name ""
name "Tsukuyomi"
>My my... Aren't you the kind one?@
>As for me...@> Even if you surrender, you'll probably die anyway.\
name ""
dwave 1,"se\power.ogg"
>Power starts to accumulate inside Tsukuyomi's body...@
>No way, is it the power of earth!?\
lsp 700,":a;chara\alice_st73.bmp",-170,50
lsp 701,":a;chara\queenalraune_st23.bmp",200,0:print 10,500
name "Alice"
>Queen, get back!\
name ""
name "Queen Alraune"
>T...This power...!?\
name ""
lsp 701,":a;chara\tukuyomi_st11.bmp",-100,0
lsp 700,":a;chara\queenalraune_st23.bmp",200,0:print 10,500
dwave 1,"se\earth1.ogg"
quake 10,1000
>Taking a deep breath, Tsukuyomi masses all of her power...@
>And blows away the vines holding her, shredding them all into pieces!\
name "Tsukuyomi"
>With the power of the earth, no binding technique can ever work on me.\
name ""
>With a quick dash, Tsukuyomi steps right next to the Queen's face.@
>And brings an earth-infused punch racing right toward her body!\
name "Tsukuyomi"
>And when using it to attack...\
name ""
dwave 1,"se\bom2.ogg"
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
quake 10,1000
>The first lands square in her body, the incredible strength of the earth echoing through her body in one pulverizing wave.\
name "Queen Alraune"
>Ah... Uhg...\
name ""
>It looked like a shock wave through her body itself, a wave of death that destroyed every internal organ in her body...\
dwave 1,"se\down.ogg"
>With just a single blow, the Queen collapses to the ground with a grunt!\
name "Luka"
>Queen Alraune!\
name ""
lsp 701,":a;chara\alice_st81.bmp",-170,50:print 10,500
name "Alice"
>Not good, that blow was fatal!\
name ""
>Petals fly through the air, tossed from her body.@
>The monsters all around, once being given life by the ivy, all fall to the ground.\
>Still incredibly weak, most of them are unconscious, but...\
lsp 701,":a;chara\a_emp_st13b.bmp",40,60:print 10,500
name "Alra Priestess"
>M...My Qu...een...\
name ""
>Alra Priestess crawls on the ground, slowly making her way toward the fallen Queen.@
>Looking over the scene, Tsukuyomi simply laughs.\
lsp 700,":a;chara\tukuyomi_st11.bmp",250,0:print 10,500
name "Tsukuyomi"
>Now, Priestess.@>Finish her off.@>Then you'll be Queen.@
>Murder her, and take the throne.@
>Good fortune like this doesn't come along often.\
name ""
name "Alra Priestess"
>Do not misjudge me!@
>I would never...\
name ""
name "Tsukuyomi"
>Sheesh... Boring all the way through, aren't you all?@
>Fine then, let's perform a funeral before you all go to the next world.\
name ""
dwave 1,"se\karaburi.ogg"
csp 701
lsp 700,":a;chara\tukuyomi_st01.bmp",0,0:print 10,500
>Tsukuyomi steps in front of Alra Priestess, and raises her arm...@
dwave 1,"se\ero_makituki2.ogg"
lsp 700,":a;chara\queenalraune_st31.bmp",0,0:print 10,500
>But in the next moment, a huge petal surrounds her!\
lsp 700,":a;chara\queenalraune_st31.bmp",-200,0
lsp 701,":a;chara\queenalraune_st23.bmp",200,0:print 10,500
name "Queen Alraune"
>T...This is my...@>Last...\
name ""
name "Tsukuyomi"
>Haha, what good will a few seconds do you?@
>Surely you know well the power I hold in my body.\
name ""
name "Queen Alraune"
>All I need...@>Is to stop your feet...@>For a few seconds...@
>Then... Refine...\
name ""
name "Tsukuyomi"
>Refine?@>What are you going on about?\
name ""
csp 701
lsp 700,":a;chara\alice_st81.bmp",0,50:print 10,500
name "Alice"
>You can't... Aztec Rose!?@
>Don't do it, Queen!@
>If you use it in that state, you'll die!\
name ""
lsp 700,":a;chara\queenalraune_st31.bmp",-200,0
lsp 701,":a;chara\queenalraune_st23.bmp",200,0:print 10,500
name "Queen Alraune"
>I am ready...@
>To protect everyone, I'll do it...\
name ""
>A cage of petals surrounds Tsukuyomi.@
>There's something sinister in it...\
>Even from outside the cage, I can tell there's something horrible happening.\
name "Luka"
>Is that... Poison!?\
name ""
csp 701
lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
name "Alice"
>Aztec Rose...@
>Among all of the world's neurotoxins, it's the most powerful.\
>It completely destroys cells, killing anyone who breathes it instantly.@
>Of course, the refiner is no exception...\
name ""
name "Luka"
>Then you mean...\
name ""
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>Queen Alraune is refining it now.@
>Even knowing that, she's doing it to save her brethren...\
name ""
name "Luka"
>..........\
name ""
dwave 1,"se\gas.ogg"
>Toxic gas starts to pour out of the petals.@
>The gas the Queen traded her life to create...\
lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
name "Alice"
>...Aztec Rose is incredibly fast acting.\
>From the moment it's born into this world, it destroys everything it touches, including itself.@
>Leaving nothing but total death, its brief existence in the world is enough to kill even itself.\
name ""
name "Luka"
>Queen Alraune...\
name ""
lsp 700,":a;chara\queenalraune_st31.bmp",-200,0
lsp 701,":a;chara\queenalraune_st23.bmp",200,0:print 10,500
>The gas fades, and the petals rot away in only moments.@
>Was Tsukuyomi killed too...?@> No!\
lsp 701,":a;chara\tukuyomi_st13.bmp",-100,0
lsp 700,":a;chara\queenalraune_st23.bmp",200,0:print 10,500
name "Tsukuyomi"
>I...It c...can't... P...Poison...?@> M...M...M...e...?\
name ""
>She isn't dead, but she's stumbling around, barely able to speak.\
name "Luka"
>She's still breathing!?\
name ""
name "Tsukuyomi"
>C...Can't... See...@
>C...Can't... Neutralize... Quick... Enough...\
name ""
lsp 700,":a;chara\alice_st81.bmp",-170,50
lsp 701,":a;chara\tukuyomi_st13.bmp",240,0:print 10,500
name "Alice"
>I can't believe it!@
>She breathed it in directly, and is still standing!?\
name ""
>It's unbelievable...@
>Tsukuyomi starts to convulse and twitch as she stands.\
lsp 700,":a;chara\alice_st73.bmp",-170,50:print 10,500
name "Alice"
>Do not waste Queen Alraune's sacrifice!@
>I'll deliver the killing blow!\
name ""
name "Tsukuyomi"
>Guh...!@>Ahhhh!!\
name ""
dwave 1,"se\bom1.ogg"
quake 10,1000
>Tsukuyomi falls to the earth with a crash, spasming in pain.\
lsp 700,":a;chara\alice_st81.bmp",-170,50:print 10,500
name "Alice"
>Guh...!\
name ""
>Alice winces back as the cloud of dust and debris from her collapse wafts out.@
csp 701:print 10,500
>And before the dust cleared...@> Tsukuyomi was gone.\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>She ran...@
>How could she escape with her body like that...?\
name ""
name "Luka"
>...........\
name ""
>It's unfortunate that Tsukuyomi was able to get away.@
>But more important than chasing her, the ones left here...\
bgm "bgm\hutuu4.ogg"
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\a_emp_st13b.bmp",390,60:print 10,500
name "Alice"
>Queen Alraune!\
name ""
name "Alra Priestess"
>My Queen!\
name ""
>The three of us rush over to the dying Queen's side.@
>But even with the three of us here, she's too far gone for us to heal her.\
lsp 700,":a;chara\a_emp_st13b.bmp",40,60
lsp 701,":a;chara\queenalraune_st23.bmp",160,0:print 10,500
name "Queen Alraune"
>My life... Ends here...@
>I hand over the Queenship...@> To you...\
name ""
name "Alra Priestess"
>N...No...@>I am not...\
name ""
name "Queen Alraune"
>You refused to wipe out the insects in exchange for the Queenship...@
>You have the heart necessary for the Queen of the next era...\
>Priestess...@> After this...@> You... are...\
name ""
name "Alra Priestess"
>My Queen!\
name ""
name "Queen Alraune"
>...........\
name ""
cspl 700,701:print 10,500
>After handing over the throne, the Queen breathes her last.@
>Going silent, Alra Priestess just holds her lifeless body.\
>Even the surrounding insect monsters go silent at her death, her life traded to save the village.\
name "Luka"
>It's sad, Alice...\
name ""
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>Yes...\
name ""
>Looking over the grieving monsters, we join in the mourning of her death.\
bgmstop
sean_change "bg095"
bgm "bgm\epilogue2.ogg"
>After the burial for the previous Queen, the village finally calms down.@
>Alra Priestess, now the new Queen Plant, bows her head to us.\
lsp 700,":a;chara\a_emp_st11b.bmp",230,60:print 10,500
name "Alra Priestess"
>I can never thank you two enough.@
>I thank you both for the efforts you have made for this village from the bottom of my heart.\
name "Luka"
>But we couldn't help Queen Alraune...\
name ""
lsp 700,":a;chara\a_emp_st13b.bmp",230,60:print 10,500
name "Alra Priestess"
>I was powerless too...@
>No, I could do nothing at all.@> I am pathetic...\
>I do not have the right to be Queen...\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\a_emp_st13b.bmp",390,60:print 10,500
name "Alice"
>You should have more confidence in yourself.@
>The previous Queen had confidence in you.\
name ""
name "Luka"
>That's right, you're a reliable leader.@
>Even under pressure and bribes, you didn't go against what you thought was right.\
name ""
>If she had followed those orders, it would have been a disaster.@
>Tsukuyomi would have had the full blown internal war she wanted.\
lsp 701,":a;chara\a_emp_st12b.bmp",390,60:print 10,500
name "Alra Priestess"
>We are not dumb enough to repeat the mistakes of the past.@
>Besides... I had no wish to be beaten up by you again.\
name ""
>With that, Alra Priestess laughs.\
name "Alra Priestess"
>..But still, we must move forward.@
>Though we are suffering from her loss, we will not waste Queen Alraune's death.\
name ""
name "Luka"
>If you need anything, just say it.@
>I'll help however I can.\
name ""
name "Alice"
>If you have any other racial disputes, please contact the Monster Lord's castle.@
>We will send an ombudsman to come help mediate.\
name ""
name "Luka"
>You even do that sort of stuff...?\
name ""
>I wonder who it is?@>Maybe Tamamo?\
name "Luka"
>...Anyway, we must be going now.@
>The world is still in an uproar.\
name ""
name "Alra Priestess"
>There are many who need your power now, I am sure.@
>Thank you again for now, and in the future...\
name ""
name "Luka"
>Yes!@> Alra Priestess...@
>No, Queen Alraune, you do your best too!\
name ""
cspl 700,701:print 10,500
>Under her leadership, I'm sure Plansect Village will unite.@
>With that thought in mind, we leave the village.\
dwave 1,"se\habataki.ogg"
sean_change "bg140"
name "Luka"
>Now then...@>For our next location...\
name ""
bgm "bgm\hutuu2.ogg"
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Luka...\
>When Queen Alraune sacrificed herself, you didn't move at all.\
>I was exhausted in this body, and I know you had to have been too.@
>But even then, you'd always still rush in, risking yourself in some foolish headlong charge.\
>But this time, you were silent the whole time.\
name ""
name "Luka"
>...........\
name ""
lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
name "Alice"
>It wasn't just exhaustion from fighting for too long, was it?@
>After your battle with Queen Alraune, you were barely able to stay conscious, weren't you?\
name ""
name "Luka"
>...Yeah.\
name ""
>I can't help but admit it if it's pointed out like that.@
>It took everything I had just to stop myself from fainting.\
>Everything I saw was almost like a dream at that point.\
name "Alice"
>Luka... Don't use that power anymore.@
>I said it before, but it's taking a great toll on you.\
>You still seem to be alright after taking some rests for now.@
>But I don't know what will happen to you if you keep it up at this pace...\
name ""
name "Luka"
>...I understand, I intend to use it as little as possible.\
name ""
name "Alice"
>The Angel power inside of you is very strong.@
>But your flesh is human.\
>Your body will slowly be eroded by the Holy power inside of you.@
>Just like Heinrich...\
name ""
name "Luka"
>...What happened to Heinrich?\
name ""
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>.............\
name ""
>Alice falls silent.\
>I know Alice is worried for me.@
>But we can't win if I don't use this power.\
>And a future even worse than death awaits if I lose.@
>Not just me, but many people would be exposed to violence and despair...\
name "Luka"
>It will be all right, Alice.@
>I'm controlling the power, so it isn't changing my body...\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Don't take all of the burden on yourself.@
>Don't forget the words you yourself told me...\
name ""
name "Luka"
>...I understand, I'll take it to heart.\
name ""
csp 700:print 10,500
>Alice continues to warn me like that...@
>Now for our next destination...\
r@k@\
mov %ivent10,2
mov %gloval1_story_sinkou,16:gosub *savegloval1
bgm "bgm\field4.ogg"
goto *map11



*sean0364

gosub *setwindow_01
bg "BG\bg182.bmp",10,1500
name "Luka"
>Alright, let's go to Undine's Spring!\
name ""
>Salamander must be in Undine's Spring, since she is the opposite attribute.@
>Once I make it there, we can re-contract!\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Once you get Salamander's power back, we'll head right to the Gold Region.@
>Have you finished everything you needed to here?\
name ""
csel "Yes",*sean0364a,"Not yet",*sean0364b



*sean0364b

csp 700:print 10,500
name "Luka"
>No, we still have something we need to do...\
name ""
>Now for our next destination...\
bgm "bgm\field4.ogg"
goto *map11



*sean0364a

csp 700:print 10,500
name "Luka"
>Galda, please take us to Undine's Spring!\
name ""
name "Galda"
>Kweh!\
name ""
dwave 1,"se\habataki.ogg"
>On top of Galda's back, we set course for Undine's Spring...\
bgmstop
sean_change "bg096"
bgm "bgm\izumi.ogg"
name "Luka"
>It's as serene here as usual...\
name ""
>Undine's Spring is just as quiet and serene as last time.@
>I can't sense the presence of any angels yet, either.\
name "Luka"
>Salamander's going to be at the deepest part, isn't she?\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>That's right... Let's go.\
name ""
dwave 1,"se\aqua4.ogg"
csp 700:print 10,500
>With that, we dive into the lake, aiming for the underground cave at the bottom...\
sean_change "bg097"
name "Luka"
>Haah!\
name ""
>Breaking the surface of the water, I see...\
lsp 700,":a;chara\mob_seinen1.bmp",-170,0
lsp 701,":a;chara\mob_syounen.bmp",170,0:print 10,500
name "Youth"
>Urhg... Why did this happen...?@
>My house... My money...!\
name ""
name "Child"
>Mama... I'm hungry!\
name ""
cspl 700,701:print 10,500
name "Luka"
>Why are humans here...?\
name ""
>And it's not just one or two, either.@
>There are dozens of people all standing around here.\
name "Luka"
>Uhm...@> Why are you all here?\
name ""
lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
name "Boy"
>A monster helped me when my village was attacked.@
>They've been sheltering us here.\
name ""
lsp 700,":a;chara\mob_seinen1.bmp",-170,0
lsp 701,":a;chara\mob_zyosei.bmp",170,0:print 10,500
name "Young Woman"
>I'm thankful that she saved me life.@
>But is it okay to stay here like this...?\
name ""
csp 701
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>They seem like people from a neighboring village to here.@
>But who brought them to here?\
name ""
name "Luka"
>I don't know...@
>This is a sacred place for slimes, isn't it?\
name ""
csp 700:print 10,500
>As I take a look around the cave...\
lsp 700,":a;chara\mob_syouzyo.bmp",-170,0
lsp 701,":a;chara\slime_st01.bmp",414,80:print 10,500
name "Girl"
>Yaaay!@> Hahahaha!\
name ""
name "Slime Girl"
>Yaay!@>Yaaay! \
name ""
>A Slime Girl is playing with a human girl in the water.@
>Just what's going on here...?\
csp 701
lsp 700,":a;chara\slimelord_st04.bmp",0,0:print 10,500
name "Slime Bess"
>Ehh...?@
>Master Erubetie, some strange human and monster have come!\
name ""
>From the depths, a pink slime monster shows up and shouts.@
>And following her...\
dwave 1,"se\escape.ogg"
lsp 700,":a;chara\erbetie_st01.bmp",225,0:print 10,500
name "Erubetie"
>...........\
name ""
>Surprisingly, Erubetie appears!\
name "Luka"
>What are you doing here, Erubetie?@
>Are you possibly protecting the humans...?\
name ""
name "Erubetie"
>It was indeed my order... But do not misunderstand.@
>If the humans fall, we are doomed.\
>After all, we are highly dependent on them.@
>In that respect, it is as you say.\
name ""
name "Luka"
>Yes... I'm glad you understand.\
name ""
name "Erubetie"
>Hmph.\
name ""
>Although she's trying to deny it, I'm sure she understands now.@
>The Erubetie of before would never have protected them, no matter the reason.\
name "Luka"
>Ehe.@> Ehehehehe.@
>I'm so happy...@>You're understanding it!\
name ""
name "Erubetie"
>...You have a creepy laugh.\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\erbetie_st01.bmp",385,0:print 10,500
name "Alice"
>...I see, I understand what's going on.@
>Erubetie, report on the status of the Monster Lord's Castle.\
name ""
name "Erubetie"
>...Who is this insolent child?\
name ""
lsp 700,":a;chara\alice_st82.bmp",-170,50:print 10,500
name "Alice"
>I am Alipheese the Sixteenth!@
>Just look at me and you'd understand that, you moron!\
name ""
name "Erubetie"
>F...Forgive me...\
lsp 700,":a;chara\alice_st71.bmp",-170,50:print 10,500
>Tamamo is analyzing discs found in a nearby research lab.\
>Alma Elma is complaining, but she's reorganizing the castle's defensive forces.\
>Granberia...@> Took a lot of damage, and is resting.@
>Even her stupidly robust body needs a few days to recover.\
name ""
csp 701
lsp 700,":a;chara\erbetie_st01.bmp",225,0:print 10,500
name "Luka"
>Did that Arc-En-Ciel doll really beat her that badly...?\
name ""
name "Erubetie"
>...Most of the damage came from that Quadruple Giga attack of yours.\
name ""
name "Luka"
>...........\
name ""
>I drop my eyes in silence.@
>More importantly, I need to accomplish what I came here for.\
name "Luka"
>Erubetie, have you seen Salamander?@
>I was thinking she would be deep inside the cave, but...\
name ""
name "Erubetie"
>Salamander...?@> She's right there.\
name ""
name "Luka"
>Eh...?\
name ""
csp 700:print 10,500
>Erubetie points to a corner of the cave, where Salamander is laying, a blanket covering her.\
bgm "bgm\comi1.ogg"
lsp 700,":a;chara\salamander_st24.bmp",250,100:print 10,500
name "Salamander"
>F...Freezing...\
name ""
name "Luka"
>Salamander!?\
name ""
>I thought she was just another refugee under that blanket!@
>To think Salamander was so close this whole time we were talking...\
bgm "bgm\izumi.ogg"
lsp 700,":a;chara\erbetie_st01.bmp",225,0:print 10,500
name "Erubetie"
>She was shivering deep in the cave, so I brought her here.\
name ""
name "Luka"
>Thank you, Erubetie.@
>You saved us a lot of time!\
name ""
name "Erubetie"
>Hmph.\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\erbetie_st01.bmp",385,0:print 10,500
name "Alice"
>We found her fast this time.@
>So get it over with fast.\
bgm "bgm\kiki2.ogg"
lsp 700,":a;chara\alice_st73.bmp",-170,50:print 10,500
>...What's with this unpleasant atmosphere?\
name ""
name "Luka"
>The air seems... Hazy?\
name ""
name "Erubetie"
>What is this...?\
name ""
>The air around us suddenly turns into something unpleasant...@
>Both Alice and Erubetie seem to have noticed right away.\
name "Luka"
>What is this...?@> An enemy's doing...?\
name ""
name "Alice"
>No, it's not an evil presence...@
>It's a poisonous miasma!\
name ""
csp 701
lsp 700,":a;chara\slime_st03.bmp",244,80:print 10,500
name "Slime Girl"
>M...Master... Erubetie...\
name ""
>The Slime Girl, once playing with the human child, staggers over to us.\
lsp 700,":a;chara\erbetie_st01.bmp",65,0
lsp 701,":a;chara\slime_st03.bmp",404,80:print 10,500
name "Erubetie"
>What's wrong?@>Stay strong!\
name ""
name "Slime Girl"
>It hurts...@>H...Help me...\
name ""
dwave 1,"se\ero_slime2.ogg"
csp 701:print 10,500
>With that plea, the Slime Girl collapses to the ground into a puddle, and stops moving.\
name "Erubetie"
>She was weakened to an extreme level...@
>What is happening?\
name ""
name "Luka"
>She was playing in the water, wasn't she?@
>Oh no, could the spring's water be...!?\
name ""
lsp 700,":a;chara\alice_st73.bmp",-170,50
lsp 701,":a;chara\erbetie_st01.bmp",385,0:print 10,500
name "Alice"
>Yes, there's no doubt!@
>Erubetie, the spring has been contaminated somehow!\
name ""
lsp 700,":a;chara\mob_seinen1.bmp",-170,0
lsp 701,":a;chara\mob_zyosei.bmp",170,0:print 10,500
name "Boy"
>*Cough* *Cough*\
name ""
name "Young Woman"
>W...What is this...?@> Can't... Breathe...\
name ""
>Even the humans are all being effected by the air.@
>The contamination in the water is letting off a poisonous miasma into the air!\
lsp 700,":a;chara\alice_st81.bmp",-170,50
lsp 701,":a;chara\erbetie_st01.bmp",385,0:print 10,500
name "Alice"
>This isn't good!@> The damage will spread fast at this rate, we must evacuate everyone!\
name ""
name "Erubetie"
>No...@>Our last sanctuary...@
>Who would dare poison it!?\
name ""
bgm "bgm\boss0.ogg"
dwave 1,"se\ero_slime3.ogg"
lsp 700,":a;chara\erbetie_st01.bmp",45,0
lsp 701,":a;chara\slimelord_st05.bmp",240,0:print 10,500
name "Slime Bess"
>Ehehe.@> That would be me. @
>I threw some Magic Mercury into the spring a little while ago. \
name ""
>With a laugh, the slime that I saw earlier comes back into the cave entrance.\
name "Erubetie"
>Bess... You didn't...!?\
>Why would you do this to the sacred land of the slimes!?\
name ""
name "Slime Bess"
>If I poison the spring, then I'll be the Slime Queen.\
>That's what Black Alice promised me. \
name ""
name "Erubetie"
>Bess, you...!\
name ""
lsp 700,":a;chara\alice_st73.bmp",-170,0
lsp 701,":a;chara\erbetie_st01.bmp",385,0:print 10,500
name "Alice"
>Save it for later, Erubetie!@
>We must put priority on saving the poisoned humans and slimes!\
>You must split right away, and carry everyone above ground and remove the poison!@
>You're the only one who can do it fast enough!\
name ""
name "Luka"
>It's as she said, Erubetie.@
>Let us deal with her!\
name ""
>I draw my sword in front of the traitorous slime.\
name "Erubetie"
>I understand...\
name ""
cspl 700,701:print 10,500
>Erubetie splits into multiple bodies, and starts to evacuate the poisoned humans and slimes.@
>Leaving her to the rescue role, I glare at the traitor.\
r@k@\
goto *slimelord_start



*sean0365

bgm "bgm\kiki2.ogg"
r@k@\
name "Luka"
>I got her...@
>But even if she's sealed, the spring is still poisoned.\
name ""
>The contamination of Undine's Spring seems to just be getting worse.@
>Even though Bess has been sealed, that fact doesn't change.\
lsp 700,":a;chara\alice_st74.bmp",-170,50
lsp 701,":a;chara\erbetie_st01.bmp",385,0:print 10,500
name "Erubetie"
>Forgive me, Monster Lord...@
>An insurgent appeared from my own subordinates...\
name ""
>During our fight, it looks like the monsters and humans were evacuated.@
>Erubetie stands in front of Alice with a depressed face.\
name "Alice"
>I won't blame you.@> There's no way to completely control your subordinates.@
>More importantly, how bad is the damage to the slimes and humans?\
name ""
name "Erubetie"
>With a little of my absorption, I was able to neutralize the poison in their systems.@
>None of them have died...@>But they won't be able to move for a while.\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50:print 10,500
name "Alice"
>Plansect Village is near here.@
>We can request they take in the victims for now.\
name ""
name "Erubetie"
>Our sanctuary...@
>How could one of my brethren do such a thing?\
name ""
name "Luka"
>..........\
name ""
csp 701
lsp 700,":a;chara\erbetie_st01.bmp",225,0:print 10,500
>It's no wonder Erubetie is in deep shock.@
>The sacred place she valued above everything...@>Destroyed by one of her own race out of selfish desire.\
bgm "bgm\hutuu2.ogg"
name "Luka"
>That's how it is, Erubetie...@
>Even among the same race, not everyone has the same thoughts or desires.\
name ""
name "Erubetie"
>I can't blame this on humans.@
>We are just as stupid as they are, it seems.\
name ""
name "Luka"
>But...@> You're not stupid, Erubetie.@
>And I have to thank you for saving those people from the poison.\
name ""
name "Erubetie"
>............\
name ""
>Erubetie falls silent, and looks at the ground.@
bgm "bgm\kiki1.ogg"
dwave 1,"se\karaburi.ogg"
>In the next moment, I hear the slash of a sword lash out at her from the darkness!\
name "Luka"
>Watch out!\
name ""
>I push Erubetie down, the slash barely skimming my back.\
name "Luka"
>Guh...@> A surprise attack!?\
name ""
name "Erubetie"
>Why did you protect me...?@
>A slashing attack wouldn't harm my body, anyway.\
name ""
name "???"
>No...@>You barely survived, Erubetie.@
>If the Hero had not guarded you, that single slash would have ended you.\
name ""
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\amphis_st01.bmp",0,0:print 10,500
>Emerging from the darkness was...\
name "Luka"
>You're from the Monster Lord's castle...!\
name ""
name "Amphisbaena"
>Amphisbaena.@
>The final form of the Chimeric Monsters, a Next Doll.\
>I was developed to destroy one of the Four Heavenly Knights, Erubetie.@
>I dropped by in order to complete the reason of my existence...\
name ""
lsp 700,":a;chara\erbetie_st01.bmp",45,0
lsp 701,":a;chara\amphis_st11.bmp",160,0:print 10,500
name "Erubetie"
>To destroy me?@
>A horrible creation to fulfill a terrible purpose.\
>Forgive me, but you have dropped by when I am in an awfully bad mood.\
name ""
dwave 1,"se\ero_slime1.ogg"
>Erubetie's arm forms into a spear of slime, and shoots toward Amphisbaena!\
dwave 2,"se\slash.ogg"
>But with a flash of her scythe, Amphisbaena cuts off her spear of slime!\
name "Erubetie"
>Your reactions are quite fast, I see.@
>But with just that much power...@
>.....?\
name ""
>The slime cut from her spear lands on the ground.@
>It should have pooled back to her body, but...\
>It just dissolves away on the ground, and vanishes.\
name "Erubetie"
>My body... The cells themselves were destroyed?@
>What did you do...?\
name ""
name "Amphisbaena"
>Hehe... Are you surprised?@
>The super vibration of this blade is able to destroy even the cells.\
>I was created just to destroy you.@
>This body itself is perfectly designed to oppose the special characteristics of the Queen Slime!\
name ""
name "Erubetie"
>Guh...!\
name ""
dwave 1,"se\karaburi.ogg"
>Brandishing her scythe, Amphisbaena slashes at Erubetie in a flurry of attacks.\
>Barely managing to dodge, Erubetie expands her body along the floor, creating a smaller target as she sways and dodges.\
dwave 2,"se\ero_slime3.ogg"
>Using that as a cover, the slime on the floor wraps around Amphisbaena's legs.\
name "Erubetie"
>Caught you!\
name ""
name "Amphisbaena"
>No, you're just committing suicide.\
name ""
dwave 1,"se\denpa1.ogg"
bg "bg\bg097.bmp",99,100,"system\lngtwave.dll/vwi"
>In the next instant, the air around Amphisbaena flickers.@
>The slime coiled around her feet explodes, the blue liquid dissolving away before it hits the ground.\
name "Erubetie"
>No... It can't be...@> Your whole body?\
name ""
name "Amphisbaena"
>Vibration Armor...@> A special armor designed specifically to be Anti-Slime.@
>I can completely destroy anything of you that touches me.\
>You can't even touch me!@
>Any attempt to do is just suicide on your part!\
name ""
>With a fearless smile, Amphisbaena steps closer to Erubetie.@
>This isn't good, it's too one-sided!\
cspl 700,701:print 10,500
name "Luka"
>We have to help her!\
name ""
dwave 1,"se\aura.ogg"
>As we try to rush to her aid, a sudden soft light fills the air.@
>As if waiting for the worst possible timing, an angel descends...\
r@k@\
goto *eggel_start



*sean0366

bgm "bgm\boss0.ogg"
r@k@\
name "Luka"
>Alright, she's dealt with!@
>Erubetie, are you alright!?\
name ""
lsp 700,":a;chara\erbetie_st01.bmp",45,0
lsp 701,":a;chara\amphis_st11.bmp",160,0:print 10,500
name "Erubetie"
>...!\
name ""
>She's far from alright.@
>Erubetie is barely able to avoid Amphisbaena's deadly assault.\
>And with that vibration armor of hers, she can't even land an attack.@
>This isn't even a fight any longer!\
name "Luka"
>Alright... I'll help out now!\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\erbetie_st01.bmp",385,0:print 10,500
name "Alice"
>I'm with you, let's go!\
name ""
>Alice and I take up position next to Erubetie.@
>With three against one, we should stand a chance!\
csp 701
lsp 700,":a;chara\amphis_st01.bmp",0,0:print 10,500
name "Amphisbaena"
>That damn Egg angel couldn't even delay you a little bit.@
>And even more---\
name ""
>Amphisbaena suddenly stops, and falls silent.\
name "Amphisbaena"
>...Three to one is quite troublesome.@
>Even if I win, it would be a shame to lose one of my scythe arms.\
>I don't want to get an unnecessary rebuke from Promestein for damaging my body.\
name ""
>With that, she turns to leave.\
name "Luka"
>What's wrong?@>Running?\
name ""
name "Amphisbaena"
>My body is composed of very rare metals.@
>Your three lives aren't worth losing an arm.\
>Haha... You barely managed to escape today.@
>Erubetie...@>I'll dispose of you soon.\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,500
>With those final words, Amphisbaena escapes.\
bgm "bgm\izumi.ogg"
>After all signs of her presence vanish, I let out a sigh of relief.\
name "Luka"
>I thought the same thing at the Monster Lord's Castle...@
>But they retreat awfully fast, don't they?\
name ""
if %ivent10<2 mov $sel1,"Even in Enrika, that Rapunzel one fled fast, too."
if %ivent10=2 mov $sel1,"Setting aside Tsukuyomi nearly dying of poison, Rapunzel ran away fast in Enrika as well."
eng $sel1:$sel6\
>They seem to withdraw as soon as the odds don't heavily favor them.\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Yes...@> She ran away far too fast.@
>Why do they go to such great lengths to preserve their own fighting capability?\
name ""
lsp 700,":a;chara\erbetie_st01.bmp",225,0:print 10,500
name "Erubetie"
>............\
name ""
>Erubetie scowls at me.@
>Did I do something wrong again...?\
name "Erubetie"
>...Thank you for protecting me.@
>I've shown you both something pathetic of me.\
name ""
name "Luka"
>Ah... No...\
name ""
>Startled by her sudden thanks, I mumble a little.@
>I never thought Erubetie would ever thank me for something.\
name "Luka"
>There wasn't any helping it... She was designed solely to fight you.@
>There's no way to fight against something whose sole reason to exist is to be your counter.\
name ""
lsp 700,":a;chara\alice_st74.bmp",-170,50
lsp 701,":a;chara\erbetie_st01.bmp",385,0:print 10,500
name "Alice"
>Yes...@> Our enemies have studied us very thoroughly, and have taken every measure to counter us.\
>The special characteristics that make you so strong also make you vulnerable when nullified.\
name ""
name "Erubetie"
>I am to blame for all of this, Monster Lord.@
>My pathetic defeat, my subordinate traitor...\
>Due to my actions, Undine's Spring has been contaminated...\
name ""
name "Luka"
>Let me give some advice from experience...@
>Nothing good can come of it if you blame yourself for everything.\
name ""
lsp 700,":a;chara\alice_st72.bmp",-170,50:print 10,500
name "Alice"
>Yes, that's right!@> We're both really inexperienced!\
name ""
name "Luka"
>...That's not something to brag about.\
name ""
name "Erubetie"
>I'm so jealous...@>There's such a bond between you two.\
name ""
name "Luka"
>No, no...@>There's nothing to be jealous about with that.\
name ""
csp 701
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>...Anyway, Luka.@> What we came here for.@
>Hurry up and re-contract with Salamander.\
name ""
name "Luka"
>Ah... Of course.\
name ""
lsp 700,":a;chara\salamander_st24.bmp",250,100:print 10,500
name "Salamander"
>C...Cold...\
name ""
>Salamander is still shivering in the corner of the cave.@
>Everyone ignored her during the fight itself...\
name "Luka"
>Are you alright, Salamander?\
name ""
name "Salamander"
>I'm not alright, this place is horrible...@
>Urhg... I'm chilled right to my core...\
name ""
>Just like Sylph and Gnome, she seems on the verge of passing out.@
>We need to form a deeper contract...@> In a sexual sense.\
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\erbetie_st01.bmp",385,0:print 10,500
name "Alice"
>Hmph.@>I'm going to go drink the spring's water.@
>You better hurry up or the spring will just be an empty crater.\
name ""
name "Erubetie"
>I'll go check on the humans and monsters, and take them to Plansect for care...\
name ""
dwave 1,"se\escape.ogg"
csp 701
lsp 700,":a;chara\salamander_st24.bmp",250,100:print 10,500
>With that, Alice and Erubetie leave the cave, leaving just Salamander and me.\
name "Salamander"
>C...Cold...@
>Warm me up...\
name ""
>The shivering Salamander clings to me.@
>Her cold body quickly regains some of its lost warmth.\
lsp 700,":a;chara\salamander_st01.bmp",0,0:print 10,500
name "Salamander"
>As I thought, you're special...@
>Just from touching you, I can feel my power surging forth.\
name ""
name "Luka"
>Ahh...\
name ""
>On the other hand, I suddenly feel weak.@
>As she gradually gets warmer, I feel myself numbing.\
r@k@\
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
goto *sean0367



*sean0367

>Salamander easily hops up on top of my weak body.\
name "Salamander"
>Now it's time for some fun.@
>I'll absorb some of that strength of yours...\
name ""
cspl 690,699
lsp 700,":a;chara\salamander_hb1.bmp",0,0:print 10,500
>Salamander grabs hold of my penis, and moves it toward her own entrance.@
mov %hseanwave,3:hseanwave
>And with one push, she brings me all the way inside her!\
name "Luka"
>Ahhh!!\
name ""
>Her insides are surprisingly hot, the temperature making it feel like I could melt away inside her.\
>It's almost like my penis is inside a hot oven...@
>As her warmth floods through me, it's paired with a strange sense of calming ecstasy.\
name "Salamander"
>Hehe, do you like how I feel?@
>I want you to get a good taste of it...\
name ""
name "Luka"
>S...So warm...@
>Ahhh...\
name ""
>The intense heat fills my head with pleasure, causing me to relax and sigh.@
>But no matter how hot it gets, it doesn't hurt.\
>My penis feels like it could melt away inside her hot, soft vagina.@
>Her gentle squeezing along with the heat feels so good...\
name "Luka"
>Ahhh...@
>It feels so warm... So good...\
name ""
>I want to come with everything I have inside this pleasurable warmth.@
>Surrender myself to her warmth, and let loose all of my sexual desire.\
>Detecting my feelings, Salamander looks over me with a triumphant smile.\
name "Salamander"
>You want to release inside my hot vagina?@
>I can already see through you... Hehehe.\
>You don't need to hold back...@
>Give in and release inside me.\
name ""
>The moment Salamander says that, I surrender mentally.@
>Focusing everything on the sensations from her hot vagina, I relax as the climax rolls through me.\
name "Luka"
>Haaa... It feels so good...\
name ""
>As I give in to her heat, I feel the ejaculation well up in my lower body.\
gosub *syasei1
lsp 700,":a;chara\salamander_hb2.bmp",0,0
gosub *syasei2
name "Luka"
>Haaa...\
name ""
>Following my male instinct, I spurt inside her hot vagina.@
>Rather than a blast of pleasure, it feels more like I leaked out inside of her.\
>My penis pulses, spitting out jet after jet of semen into her.@
>Until it's over, the incredible sense of release fills my body.\
name "Salamander"
>Hehe, you came inside.@
>And with such high quality semen...\
name ""
name "Luka"
>Ahhh...\
name ""
>Feeling incredible, all of the strength fades from me underneath Salamander's body.@
>Having sex with her feels amazing, but it's taking a toll on my body and mind.\
name "Salamander"
>Oh?@>What, are you getting tired already?@
>I still need you to give me much more, though...\
name ""
name "Luka"
>Ah...Ahhh!\
name ""
mov %hseanwave,6:hseanwave
>With a wet sound, her vagina suddenly shrinks as she squeezes.\
>Her hot, wet vaginal wells press against my penis, almost making it feel like I'm sinking into her.\
>The tight grip of her vagina makes it feel like I'm being squeezed by a hand...@
>The sudden tightness forces a moan from me before I can stop.\
name "Luka"
>Ahhh!!@
>T...Too tight!\
name ""
name "Salamander"
>Hehe... What?@
>I didn't think you would cry surrender if it was just a little tighter...\
>Let me try making it a little bit tighter!\
name ""
>Squeeze... Squeeze... Squeeze... She tenses her vagina up, squeezing me even harder.\
>That hot sensation of her soft flesh against my penis attacks me even stronger.\
>My whole body twitches as the powerful pleasure slams into me.@
>After only moments, I already feel like exploding inside her again.\
name "Luka"
>Ah...!@> Ahhh!\
name ""
name "Salamander"
>Hehe... It looks like your second orgasm is already here.@
>Would you like me to finish you off all at once?\
name ""
>Squeeze... Squeeze... Her hot vagina rubs my penis as she squeezes me, almost like my penis was a napkin she was crumpling up inside of her.\
name "Luka"
>N...No... Ah...\
name ""
>The last of my endurance is blown away, as I give in to my rising climax.\
name "Salamander"
>You seem to have given up holding back...@
>Well then, now for the coup de grace.\
name ""
>With rhythmic squeezes just on my tip, I let out a moan as I reach orgasm.\
name "Luka"
>Ah... Haaa...\
name ""
gosub *syasei1
lsp 700,":a;chara\salamander_hb3.bmp",0,0
gosub *syasei2
>I explode inside of her, squirting my semen deep into Salamander's hot vagina.@
>Laying back and moaning, I just give myself over to the ecstasy, embracing it.\
name "Luka"
>Ahhh...\
name ""
name "Salamander"
>Hehe, I'm getting hotter and hotter myself...@
>Let's have some more fun!\
name ""
>Almost delirious with pleasure from her returning power, Salamander starts to bounce up and down, and side to side as her temperature increases.\
name "Salamander"
>Hahaha!\
name ""
name "Luka"
>Ahhh!!\
name ""
>My penis is helplessly tossed side to side as she rides me, her intense piston movements only getting faster and faster.\
>Her merciless riding brings me to another climax in almost no time.\
name "Luka"
>No... Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\salamander_hb4.bmp",0,0
gosub *syasei2
name "Salamander"
>Nnn... Even though that was the third time, you came so fast...@
>You really don't have much endurance, do you?\
name ""
>Salamander's vagina sucks on my penis, as if drawing my semen deep inside her.@
>Greedily devouring my semen, it doesn't look like she has had enough...\
name "Salamander"
>This isn't enough yet...@
>I want to squeeze your semen to the limit!\
name ""
name "Luka"
>S...Stop...@
>Ahhh!\
name ""
>Salamander continues her intense movements, already eager for my next orgasm.@
>Too weak to stop her now, I have no choice but to let her continue...\
mov %hseanwave,0:hseanwave
gosub *anten
>............\
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_seirei3,1
mov %skill05,4
bg "bg\bg097.bmp",10,1500
bgm "bgm\epilogue2.ogg"
r@k@\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Hmph.@>Are you finished?\
name ""
name "Luka"
>...Yes, I got through it somehow...\
name ""
>Three strange figures pop out inside my head...\
bgm "bgm\comi1.ogg"
lsp 700,":a;chara\sylph_st21r.bmp",341,190
lsp 701,":a;chara\gnome_st31r.bmp",533,145
lsp 702,":a;chara\salamander_st23.bmp",10,80:print 10,500
name "Sylph"
>Yaay!@>Mandy's with us now!@> Yaaaay!@
>Yaaaaaay!\
name ""
lsp 701,":a;chara\gnome_st32.bmp",190,50:print 10,500
name "Gnome"
>.............\
name ""
lsp 702,":a;chara\salamander_st21.bmp",10,80:print 10,500
name "Salamander"
>...Luka, do you remember how to handle my power?@
>When you first summon me, your SP will go to the maximum.\
>The power of your special attacks will also increase.@
>But don't forget the downsides...\
name ""
name "Sylph"
>Yayayayayaaaay!@
>Mandy's back tooooo!@
>Yayayayayayaaaaaaaayyy!\
name ""
name "Gnome"
>.............\
name ""
name "Salamander"
>First, you can't recover your HP when using the power of fire.@
>In addition, you can't use either of the other two spirits at the same time...\
>If you can bring out its true power, those disadvantages will fade, of course.@
>But for now, it seems like that seal is limiting my power...\
name ""
name "Sylph"
>Hey, Gnomey!@> Let's sing a song for her!@
>Weeelcoooome baaaaack!@> Maaaan---\
lsp 700,":a;chara\sylph_st33.bmp",331,190
lsp 702,":a;chara\salamander_st23.bmp",10,80:print 10,500
>Wahn!@>Where are we going Mandy?\
for %move=0 to 600 step 20
amsp 700,330-%move,190
print 1:wait 20
next
>Waaahn!\
name ""
name "Luka"
>..............\
name ""
bgm "bgm\epilogue2.ogg"
cspl 701,702
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>What are you doing?@>Let's hurry.\
name ""
name "Luka"
>Ah... Yeah...\
name ""
csp 700:print 10,500
>With that, we leave Undine's Spring.@
>The sacred home of the slimes, now completely contaminated.\
bg "bg\bg182.bmp",10,1500
name "Luka"
>Hey Alice...@> Doesn't the lake look like the water level dropped some?\
name ""
>I mutter that to myself as I look down at the lake from Galda's back.\
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>Hmph.@>Who knows.\
name ""
>I don't know why, but Alice seems to be in a bad mood...\
csp 700:print 10,500
>Now then... Undine is the only spirit left.@
>I'm sure she's in the Gold Volcano.\
>We need to head to the northern Gold Region.@
>We should make sure the Grangold King is safe first, too...\
bgmstop
sean_change "bg199"
bgm "bgm\stein.ogg"
if %ivent10<2 goto *sean0368x
lsp 700,":a;chara\stein_st01r.bmp",-200,0
lsp 701,":a;chara\tukuyomi_st13.bmp",240,0:print 10,500
name "Tsukuyomi"
>F...Forgive me...@>I...I made a m...m...istake...\
name ""
>The damage from the poison is still making Tsukuyomi's body randomly spasm.@
>With her central nervous system seriously damaged, she can barely speak.\
lsp 701,":a;chara\hainu_st12.bmp",-160,0:print 10,500
name "Hainuwele"
>Hahaha, look how pathetic you are even after healing for a day!@
>If it was me, that poison wouldn't have done anything.\
name ""
name "Promestein"
>Aztec Rose...@
>Even though I could refine that poison myself, it would take some time.\
>I seem to have made light of Queen Alraune...@
>It was a great accomplishment to have killed her, though.\
name ""
goto *sean0368x



*sean0368x

lsp 700,":a;chara\stein_st01r.bmp",-200,0
lsp 701,":a;chara\amphis_st11.bmp",160,0:print 10,500
name "Amphisbaena"
if %ivent10<2 mov $sel1,"Forgive me, I made a serious blunder."
if %ivent10=2 mov $sel1,"Forgive me, I too made a serious blunder."
eng $sel1:$sel6\
>I was not able to kill them, given the amount of time I had.\
name ""
name "Promestein"
>...That was because the angel wasn't even able to buy you some time.@
>That damn Eden is utterly incompetent.\
name ""
lsp 701,":a;chara\shirom_st51.bmp",160,0:print 10,500
name "La Croix"
>But all injury is within acceptable parameters.@
>The plan can continue without issue.\
name ""
lsp 701,":a;chara\laplace_st21.bmp",160,0:print 10,500
name "Laplace"
>But not only did Lucia not complete her mission, she has vanished.@
>I do not understand the meaning of her actions.\
name ""
name "Promestein"
>Did she fail her mission, or did she defect?@> I'd say the odds are half and half for both...@
>Lucia was human, after all.\
name ""
name "Laplace"
>As a human, she was unable to fight against other humans?\
name ""
name "Promestein"
>That is not quite it...@
>Since you work purely on logic, human thoughts may be too complicated for you to process.\
name ""
name "Laplace"
>As you stated, understanding is difficult...\
name ""
name "Promestein"
>Anyway, the situation is still progressing at an acceptable rate.@
>"White Rabbit" has also advanced to the clinical stage.\
>We were a little careless about Black Alice, but it should not be an issue.@
>She still has yet to realize its true value...\
name ""
lsp 701,":a;chara\shirom_st51.bmp",160,0:print 10,500
name "La Croix"
>The movements of Black Alice's subordinates require some attention, as well.\
name ""
name "Promestein"
>That's right, we must never let our guard down against her.@
>We can ignore Eden, however.@> She's useless.\
name ""
name "La Croix"
>Understood.@>With your leave?\
name ""
name "Promestein"
>Yes, that is all for today.\
name ""
dwave 1,"se\escape.ogg"
cspl 700,703:print 10,500
>With that, the group disperses...\
lsp 700,":a;chara\cupid_st11.bmp",800,0
for %move=0 to 450 step 10
amsp 700,800-%move,0
print 1:wait 20
next
lsp 700,":a;chara\cupid_st11.bmp",0,0:print 10,500
name "Cupid"
>Ahhh!@>They're saying bad things about Master Eden again!@
>I need to report at once. \
name ""
if %ivent11=0 goto *sean0371x
bgmstop
sean_change "bg100"
bgm "bgm\kiki3.ogg"
name "Luka"
>This isn't good, they've already made it downtown!\
name ""
>The Grangold Castle Town is already in full on war.@
lsp 700,":a;chara\ant_st11.bmp",-160,0
lsp 701,":a;chara\mob_kumo1.bmp",160,0:print 10,500
>Spider type monsters are attacking, with groups of Ant Girls valiantly defending.\
name "Spider Girl"
>What are you doing!?@
>We're fellow insect monsters!@>Why are you siding with the humans!?\
name ""
name "Ant Girl A"
>YOU WON'T PASS.\
name ""
name "Ant Girl B"
>GET THE ENEMY.\
name ""
name "Spider Girl"
>Hey, cut it out!@
>That hurts!\
name ""
dwave 1,"se\dageki.ogg"
wait 100
dwave 1,"se\dageki.ogg"
wait 100
dwave 1,"se\dageki.ogg"
>Holding down the spider girl, ants swarm her as they hit and kick the Spider Girl.@
>It looks very violent...@> But effective.\
cspl 700,701:print 10,500
name "Luka"
>Where is the Grangold Ki...@>What's that?\
name ""
dwave 1,"se\wind4.ogg"
>A shadow is flying between buildings, as if dancing through the air.@
>It looks like a bird...@>But it's a spider!\
dwave 1,"se\escape.ogg"
lsp 700,":a;chara\ant_st11.bmp",-160,0
lsp 701,":a;chara\tutigumo_st01.bmp",160,0:print 10,500
>The shadow races down into the melee below...\
name "Tsuchigumo"
>Hehe, how pathetic...@>Insects fighting each other?@
>After losing your Queen, you're just pitiful prey.\
name ""
name "Ant Girl A"
>GET THE ENEMY...!\
name ""
>The nearby ant girls rush to attack her...@> But all suddenly stop and start twitching in place!@
>Suddenly, all of the other ant girls start to squirm where they stand.\
>Is that...@> A spiderweb!?\
>She was jumping between buildings, spinning a gigantic spiderweb!?\
lsp 701,":a;chara\tutigumo_st02.bmp",160,0:print 10,500
name "Tsuchigumo"
>You're all already in my territory.@
>Even if you struggle, my sticky threads won't let you move...\
name ""
lsp 700,":a;chara\ant_st13.bmp",-160,0:print 10,500
name "Ant Girl A"
>Urrrh...\
name ""
>The Ant Girls struggle, waving their hands and feet... But they can't escape.@
>All of those Ant Girls were captured by a single spider monster...\
name "Tsuchigumo"
>You poor insects in my web...@
>I'll prey on you slowly, one by one...\
name ""
name "Luka"
>...Stop!\
name ""
csp 701
lsp 700,":a;chara\tutigumo_st01.bmp",0,0:print 10,500
>I pull out my sword and jump into the battle!\
r@k@\
goto *tutigumo_start



*sean0369

bgm "bgm\kiki3.ogg"
r@k@\
name "Luka"
>We defeated her...@> But now what about the barrier...?\
name ""
>After sealing Tsuchigumo, the space around us flickers.\
dwave 1,"se\bun.ogg"
bg "BG\bg100.bmp",99,1000,"system\lngtwave.dll/vwi"
>Suddenly, we're back in Grangold.@
>As we thought, defeating the caster of the barrier breaks it!\
name "Luka"
>Is everyone alright!?\
name ""
>I cut away at the cobweb, freeing the Ant Girls.@
>Luckily, it doesn't look like any of them have been hurt.\
lsp 700,":a;chara\ant_st11.bmp",0,0:print 10,500
name "Ant Girl A"
>ENEMY CAUGHT QUEEN.@
>PLEASE AID.\
name ""
name "Ant Girl B"
>GRANGOLD KING CAUGHT TOO.@
>EATEN SOON.\
name ""
name "Luka"
>...What!?\
name ""
>Both Queen Ant and the Grangold King have been caught already?@
>The situation is a lot more pressing than I thought!\
name "Luka"
>Got it, I'll save the King and Queen.@
>Please evacuate the citizens!\
name ""
name "Ant Girl A"
>QUEEN, PLEASE...\
name ""
name "Ant Girl B"
>HUMANS, WE WILL EVACUATE THEM.\
name ""
>I'll leave the town to the Ant Girls.@
>I need to hurry and rescue the King and Queen!\
csp 700:print 10,500
name "Luka"
>I feel huge power coming from the direction of the castle...@
>But it isn't inside...@> From that nearby small building?\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>The castle should still be under repairs from the previous battle.@
>Perhaps that smaller building is a warehouse of some sort?\
name ""
name "Luka"
>That must be it... Alright, let's go!\
name ""
lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
name "Alice"
>Be at ease, Ant Girls!@
>The Hero and I shall rescue the Queen!\
name ""
csp 700:print 10,500
dwave 1,"se\asioto4.ogg"
>Alice and I run down main street, sealing away any spider monster who gets in our way.\
dwave 1,"se\asioto4.ogg"
sean_change "bg193"
name "Luka"
>All of the attackers are spider monsters...@
>Is there someone like a Queen Arachne leading them?\
name ""
>I ask Alice as we run down another side street.@
>This type of large scale attack has to be lead by a Queen class monster.\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>The Spider Princess...@> Is the new Queen Spider.@
>I'm sure this must be her doing.\
name ""
name "Luka"
>Spider Princess...?@>What type of monster is she?\
name ""
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>She's cruel, merciless, and thinks of humans as nothing but prey.@
>She's one of the monsters who insisted on human domestication.\
>Monsters should oversee the human breeding process, disposing of the inferior ones.@
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
>Breed the high quality ones, and use them as livestock.\
name ""
name "Luka"
>That's horrible...@
>So she joined with Black Alice.\
name ""
name "Alice"
>Also, spider monsters prey on other monsters.@
>They don't need to for survival...@> They just enjoy it.\
>They are hated even among monsters.@
>That's why the Arachne family has become more and more radical over time.\
name ""
name "Luka"
>So they behaved themselves until now...\
name ""
name "Alice"
>There's one other reason they never acted out before.@
>I was stronger than the Spider Princess.\
>But now that deterrent is no longer valid.@
>I don't think she'll be persuaded no matter what you try.\
name ""
name "Luka"
>I understand...\
name ""
csp 700:print 10,500
>If I waste too much time trying to persuade her, the damage here will just spread.@
>It looks like I'll need to seal her as quick as possible...\
dwave 1,"se\earth1.ogg"
quake 10,1000
>As I think that to myself, the ground suddenly shakes!\
name "Luka"
>Is that... Golem!?\
name ""
lsp 700,":a;chara\golem_st01.bmp",0,0:print 10,500
>Golem...@> The huge monster, created by magical science, who guards Grangold's gate.@
>Standing in the middle of the main street, she's locked in combat with the attackers.\
dwave 1,"se\karaburi.ogg"
>Lashing out with her massive hands and feet, she swats spider monsters aside, and crushes others.\
name "Luka"
>It should be alright if we leave it to her!\
name ""
lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
name "Alice"
>No...@>Do you feel that powerful magic energy!?\
name ""
lsp 701,":a;chara\golem_st01.bmp",-180,0
lsp 700,":a;chara\alakneload_st01.bmp",220,0:print 10,500
>As Golem slams her fist into the ground, a spider monster jumps on her shoulder!@
dwave 1,"se\karaburi.ogg"
>Swinging her arms around, Golem tries to swat her off, but...\
lsp 700,":a;chara\alakneload_st02.bmp",220,0:print 10,500
name "Arachne Lord"
>Hmph.@>You're awfully big...@
>But it looks like I can't eat you!\
name ""
>The spider on her shoulder nimbly dodges every swat of her hand.@
>But she isn't just running around...@> She's spinning spider silk as she moves, entangling her!\
name "Arachne Lord"
>...That's good enough.\
name ""
>The spider monster leaps high into the air, back onto the street.@
>At the same time, Golem is left unable to move, bound in her powerful silk.\
dwave 1,"se\bom2.ogg"
quake 10,500
>With a violent struggle, she crashes to the ground with a boom.@
>She was able to bind that huge Golem with only her spider silk...\
cspl 700,701:print 10,500
name "Luka"
>We can't leave someone that strong alone...\
>...I'm your opponent now!\
name ""
>If we don't deal with her, who knows how many she'll kill before we can stop the Spider Princess.@
>Jumping in front of her, I pull out my sword.\
r@k@\
goto *alakneload_start



*sean0370

bgm "bgm\kiki3.ogg"
r@k@\
name "Luka"
>Now the barrier will collapse...\
name ""
dwave 1,"se\bun.ogg"
bg "BG\bg193.bmp",99,1000,"system\lngtwave.dll/vwi"
>We return back to our original location after Arachne Lord's defeat.\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Ah... But someone else is coming.\
name ""
name "Luka"
>Gah... One after another!\
name ""
lsp 700,":a;chara\mob_kumo1.bmp",-200,0
lsp 701,":a;chara\mob_kumo2.bmp",160,0:print 10,500
>Ten new spider monsters quickly surround us.@
>They're far weaker than the last two, but there are so many of them!\
name "Luka"
>It will take some time, but we have to take them out!\
name ""
>As I'm about to attack the new enemies...@
dwave 1,"se\laser.ogg"
bg "BG\bg193.bmp",99,500,"system\lngtwave.dll/vwi"
>A dense atmosphere fills the area around the spider girls, making their movements suddenly grow extra slow!\
name "Spider Girl A"
>Kyaa!\
name ""
name "Spider Girl B"
>What the... My body...\
name ""
name "Luka"
>What is that...?\
name ""
bgm "bgm\battle2.ogg"
lsp 700,":a;chara\mob_souyo.bmp",-250,0
lsp 701,":a;chara\mob_madou.bmp",0,0
lsp 702,":a;chara\mob_souyo.bmp",270,0:print 10,500
name "Government Wizard"
>Alright, it was a success!@
>Strengthen the field, and seal them!\
name ""
name "Engineer"
>Yes!\
name ""
>Is that the same equipment that had sealed Queen Ant?@
>Actually, it looks newer and updated...\
>It looks like the machine is the one covering the invaders with that dense field, sealing them!\
name "Government Wizard"
>Leave them to us!@
>We'll show you the pride of Grangold's Magic Science Group!\
name ""
name "Luka"
>Alright!@> Then we'll aim for saving the King!\
name ""
cspl 700,702:print 10,500
>In other words, we need to defeat the Spider Princess.@
>Leaving the rest of the invaders to the Magic Science Group, we head onwards.\
dwave 1,"se\asioto4.ogg"
sean_change "bg105"
name "Luka"
>Right here!?\
name ""
>The warehouse we stepped into is covered in webs.@
>Right in the middle, I can see the Grangold King and the Queen Ant wound in spider silk.\
>And...\
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\kumonomiko_st01.bmp",0,0:print 10,500
name "Luka"
>You're the new Queen Spider!\
name ""
name "Spider Princess"
>Hehehe... Good job getting here, disgraced Hero.@
>And the human pet Monster Lord, too.\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\kumonomiko_st21.bmp",0,0:print 10,500
name "Alice"
>Hmph.@>You haven't changed at all, Spider Princess.@
>I'm surprised you managed to stop licking Black Alice's feet long enough to finally show your true feelings of rebellion!\
name ""
r@k@\
cspl 700,701
goto *kumonomiko_start



*sean0371

bgm "bgm\epilogue2.ogg"
r@k@\
name "Luka"
>We won somehow...\
name ""
dwave 1,"se\bun.ogg"
bg "BG\bg105.bmp",99,1000,"system\lngtwave.dll/vwi"
>After sealing the Spider Princess, the barrier fades...@
>And we're quickly back in the warehouse.\
>At the same time, the webbing that was binding the King and Queen crumbles and fades away.\
lsp 700,":a;chara\grangold_st03.bmp",-160,0
lsp 701,":a;chara\queenant_st01.bmp",160,0:print 10,500
name "Grangold King"
>Urhg... What happened to us?@
>Are we safe?\
name ""
name "Queen Ant"
>Hero Luka...@> And the Monster Lord.@
>I see.@> So you two...\
name ""
>It doesn't seem like either of them is injured.\
csp 701
lsp 700,":a;chara\alice_st72.bmp",0,50:print 10,500
name "Alice"
>Haha...@>It looks like that damned Spider Princess' subordinates are fleeing, too.@
>Scurrying away like little baby spiders.\
name ""
name "Luka"
>Alright, it looks like we pushed them back somehow!\
name ""
csp 700:print 10,500
>With that, we were able to temporarily avert the crisis in Grangold.@
>But due to all the enemy troops rampaging around town, the damage is pretty extensive.\
>Right after the revolt of the Ant Girls, another war took place here...@
>It's going to take even longer to rebuild this town.\
bgmstop
sean_change "bg081"
bgm "bgm\epilogue.ogg"
lsp 700,":a;chara\grangold_st04.bmp",0,0:print 10,500
name "Grangold King"
>...Thank you, Hero Luka.@
>Thanks to you, this country was saved again.\
name ""
name "Luka"
>No, no... It wasn't just me.@
>The Ant Girls and the Magic Science Group wizards were able to stop most of the damage.\
>...Right, Alice?\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\grangold_st01.bmp",160,0:print 10,500
name "Alice"
>I'm hungry...\
name ""
>Unlike the last few times, it doesn't look like there's any food being offered to her...@
>Alice seems kind of depressed.\
lsp 701,":a;chara\queenant_st01.bmp",160,0:print 10,500
name "Queen Ant"
>Forgive us, Monster Lord.@
>At the current time, we won't be able to offer a feast of thanks...\
name ""
lsp 701,":a;chara\ant_st01.bmp",160,0:print 10,500
name "Ant Girl"
>HAVE MY CANDY...@
>PLEASE DON'T CRY...\
name ""
lsp 700,":a;chara\alice_st79.bmp",-170,50:print 10,500
name "Alice"
>Thank you...@> Mmm, sweet.\
name ""
if %ivent06<2 goto *sean0371a
if %ivent06=2 goto *sean0371b



*sean0371a

name "Luka"
>.............\
name ""
>I stare dumbly at the Ant Girls giving Alice candy for a moment.@
>Now then, for the next location...\
r@k@\
mov %ivent11,2
mov %gloval1_story_sinkou,17:gosub *savegloval1
bgm "bgm\field4.ogg"
goto *map12



*sean0371b

>The Ant Girls all take turns offering their candy to Alice.@
>As that's going on, a carrier pigeon comes flying through the open doorway to the warehouse.\
csp 701
lsp 700,":a;chara\grangold_st03.bmp",0,0:print 10,500
name "Grangold King"
>This is from the Imperial Court of Sabasa...\
name ""
>The King extends his arm, letting the pigeon land.@
>He unfolds the letter attached to the pigeon's foot, and starts to read the small script.\
name "Grangold King"
>Yes...@> It appears as though what's happening here is the same all over the world.\
>"We must all unite in a fixed defensive posture before the attackers can regroup and attack again."@
>...I agree completely.\
>To that end...@> He proposes a summit of all the world leaders in the short future.@
>As expected of the Sabasa King, the scale of his ideas are grand...\
name ""
name "Luka"
>A summit?@>That's great!\
name ""
lsp 700,":a;chara\grangold_st04.bmp",0,0:print 10,500
name "Grangold King"
>Events in the world seem to be moving at an incredible rate.@
>As the Sabasa King says, we must unite together.\
>I shall do my duty as King to protect my people.@
>Hero Luka, please fight together with us!\
name ""
name "Luka"
>Yes!\
name ""
lsp 700,":a;chara\alice_st79.bmp",-170,50
lsp 701,":a;chara\grangold_st04.bmp",160,0:print 10,500
name "Alice"
>Delicious candy.\
name ""
name "Luka"
>..........\
name ""
>It's as if she's completely regressing into the mind of a child.\
>The human side is banding together...@>I wonder what the Monster side is doing...?\
csp 701
lsp 700,":a;chara\queenant_st03.bmp",0,0:print 10,500
name "Queen Ant"
>We should confront this crisis in solidarity as well, but...@
>With our race separated into different regions and tribes based on race and family group, I wonder if such a dream is ever possible...?\
name ""
>She mutters to herself, as if able to read my mind and answer my question.\
lsp 700,":a;chara\alice_st72.bmp",-170,50
lsp 701,":a;chara\queenant_st03.bmp",160,0:print 10,500
name "Alice"
>...Don't worry, I have an idea!@
>If you energize me with more candy, I'll tell you!\
name ""
lsp 700,":a;chara\alice_st72.bmp",-170,50
lsp 701,":a;chara\ant_st01.bmp",160,0:print 10,500
name "Ant Girl"
>NO MORE...@> ONE ANT, ONE CANDY.\
name ""
lsp 700,":a;chara\alice_st74.bmp",-170,50:print 10,500
name "Alice"
>Nooo...\
name ""
name "Luka"
>.......\
name ""
>This is making me uneasy...\
cspl 700,701:print 10,500
>Anyway, it seems the human side is banding together.@
>We need to repulse the attackers to give them time!\
>Now then, for the next location...\
r@k@\
mov %ivent11,2
mov %gloval1_story_sinkou,17:gosub *savegloval1
bgm "bgm\field4.ogg"
goto *map12



*sean0371x

bgmstop
sean_change "bg182"
bgm "bgm\field4.ogg"
name "Luka"
>Even Grangold...\
name ""
>Grangold is in a strange state...@
>Spider webs are spread throughout the entire town, encasing it in a seemingly impenetrable web.\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Is this also Black Alice's doing?@
>Or are they just doing what they've always wanted to...?\
name ""
name "Luka"
>Just how many victims were there here...?\
name ""
csp 700:print 10,500
>Nothing will change even if I lament what happened now...@
>We need to hurry on to the next location to stop another town from becoming like this...\
r@k@\
mov %gloval1_story_sinkou,17:gosub *savegloval1
bgm "bgm\field4.ogg"
goto *map12



*sean0372

sean_change "bg103"
gosub *setwindow_01p
bgm "bgm\kiki2.ogg"
name "Luka"
>What happened here!?\
name ""
>As we land in Succubus Village, a strange sight greets us.\
lsp 700,":a;chara\mob_seinen1.bmp",-170,0
lsp 701,":a;chara\mob_ozisan1.bmp",170,0:print 10,500
name "Villager A"
>Ah...\
name ""
name "Villager B"
>Haa... Urhg...\
name ""
>The men of the village are laying on the ground, moaning.\
>It's not from ecstasy or from pain...@
>Their faces are bright red, and it seems like they're just extremely excited.\
name "Luka"
>What's happening here...?@
>And is that a barrier in the sky?\
name ""
cspl 700,701
lsp 690,":a;effect\m_circle2.bmp",0,0
bg "bg\bg140.bmp",10,500
>High over the village, a Magic Circle is visible.@
>That must have something to do with what's happening here...\
csp 690
bg "bg\bg103.bmp",10,500
lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
name "Luka"
>A...Are you alright?\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\mob_seinen1.bmp",160,0:print 10,500
>As we run up to one of the villagers to check on him, he turns and catches sight of Alice.\
name "Villager A"
>A...A woman...!@>Oh gods!\
gosub *syasei1:gosub *syasei2
name ""
>With a groan, he ejaculates onto the ground.@
>He was lead to an orgasm just from looking at Alice...?\
name "Luka"
>Uwa...\
name ""
>I unconsciously take a step back away from the villagers, as they ejaculate in their pants.\
csp 701
lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
name "Alice"
>...It looks like their level of sexual excitement was ramped up to the extreme.@
>Could this possibly be the prohibited art, Great Barrier of Babylon?\
name ""
name "Luka"
>Prohibited art?@>What does that mean?\
name ""
name "Alice"
>It's a powerful magic barrier designed to elevate humans to maximum sexual excitement, and draw up their semen as they ejaculate.\
>It collects energy over a long period of time, and returns it to the caster of the barrier.\
>It's an ancient skill that hasn't been around for generations...@
>I've only heard the stories.\
>Perhaps Black Alice or Promestein was able to reproduce it...?\
name ""
name "Luka"
>That sounds like some troublesome magic...@
>But I don't seem to be feeling any effect from it?\
name ""
>Although now that she mentions it, I do feel a strange, sticky sensation on my skin.@
>But it isn't anything like what these villagers are going through.\
name "Alice"
>If the art isn't fully complete, it wouldn't be enough to influence someone strong like you.@
>...Well, that's to be expected.\
>The Great Barrier of Babylon is one of the most difficult arts to perform, like the Six Ancestors' Great Seal.@
>There's no way magic technology could fully reproduce it.\
name ""
name "Luka"
>But still, we can't leave it alone...\
name ""
name "Alice"
>...Yes.@>Or all the men of the village will slowly ejaculate to death.\
name ""
name "Luka"
>We have to find the caster, then!@
>Wait, someone's coming!\
name ""
dwave 1,"se\asioto2.ogg"
csp 700:print 10,500
>I hear light footsteps racing down the streets toward us.@
>It's not right...@>They're moving around too calmly with the village in this sort of state!\
>Is this the caster?@>Or a subordinate?\
r@k@\
goto *narcubus_start



*sean0373

bgm "bgm\kiki2.ogg"
r@k@\
name "Luka"
>...She didn't seem like the one behind it.\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>There won't be an end if we just keep defeating small fry.@
>We need to find the master behind this.\
>To set up something like this, they'd need a crazy amount of magic.@
>I'll search the north of the town, you take the south!\
name ""
name "Luka"
>Alright, leave it to me!\
name ""
dwave 1,"se\asioto4.ogg"
csp 700:print 10,500
>I part from Alice and head toward the south, searching for a sign of a large surge of magic power.\
name "Luka"
>What's that...?@
>I sense some magic, but it's really weak...\
name ""
>I don't think whoever set it up is nearby...@
>Just as I start to move by, I stumble on a group of small Imps!\
r@k@\
goto *inps_start



*sean0374

bgm "bgm\kiki2.ogg"
r@k@\
name "Luka"
>Sheesh... Hmm?\
name ""
name "Alice"
>Luka, can you hear me!?\
name ""
>Suddenly, I hear Alice's voice in my head.@
>She must be using some sort of magic relay to speak telepathically.\
name "Luka"
>What's wrong, did you find the one who set up the barrier!?\
name ""
name "Alice"
>Yes... She's in the Mayor's house!@
>Hurry up, I can't stop her with this current body of mine!\
name ""
name "Luka"
>Got it, I'm on my way!\
name ""
>It seems as though the situation is more urgent than I thought...@
>I run down the main street toward the Mayor's house.\
dwave 1,"se\asioto4.ogg"
sean_change "bg106"
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\succubus_st03.bmp",-160,100
lsp 701,":a;chara\witchs_st12.bmp",160,100:print 10,500
dwave 1,"se\down.ogg"
name "Succubus"
>Kyaa!\
name ""
dwave 2,"se\down.ogg"
name "Succubus Witch"
>Urhg...\
name ""
csp 701
lsp 700,":a;chara\eva_st01.bmp",0,0:print 10,500
name "Eva"
>Sheesh, how pathetic.@
>Are the leaders of Succubus Village really this weak?\
name ""
>Eva shrugs as the two Succubi are flung against the wall.@
>Her magical and physical abilities are far above any Succubi they've ever seen before.\
lsp 700,":a;chara\succubus_st03.bmp",-170,100
lsp 701,":a;chara\eva_st01.bmp",160,0:print 10,500
name "Succubus"
>Urhg... Who are you...?\
name ""
name "Eva"
>Just a weak Succubus not even worthy of a greeting from big shots like you two.@
>A low ranking underling whose troubles didn't warrant your attention!\
>I disguised myself as a human and managed to survive by frantically feeding on semen whenever I could!@
>Always dreaming that this day would come...!\
name ""
name "Succubus"
>Urhg!\
name ""
dwave 1,"se\dageki.ogg"
>Eva stamps on the fallen Succubus' face and laughs.\
name "Eva"
>But it's different now...@
>Black Alice saw my potential.\
>I'll never have to feed on your leftovers.@
>From now on, you will be the one scraping up my leftovers!\
name ""
>Eva brings her foot back, ready to kick the Succubus in the face with her full power...\
r@k@\
cspl 700,701
goto *eva_start



*sean0375

bgm "bgm\kiki2.ogg"
r@k@\
name "Luka"
>That's strange... The barrier isn't fading?\
name ""
>The strange sense doesn't disperse, even after sealing Eva.@
>Wasn't she the one who cast that large barrier...?\
dwave 1,"se\door2.ogg"
lsp 690,":a;effect\m_circle2.bmp",0,0
bg "bg\bg140.bmp",10,1500
>We leave the house and look up in the sky... Sure enough, the magic circle is still there.@
>The villagers are still on the ground in their excited state, too.\
csp 690
bg "BG\bg103.bmp",10,1500
name "Luka"
>What's going on?@
>Is someone else still maintaining the barrier elsewhere...?\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>No, Eva surely started it, and she has been sealed.@
>But it seems to be in some sort of automatic mode.\
>It's using the energy it draws up from the villagers to maintain itself.@
>...What a horrible technique.\
name ""
name "Luka"
>N...No way...@
>How do we stop it?\
name ""
name "Alice"
>In theory, it should fall apart if it stops getting energy.@
>In other words, we need to cure the erotic state of these villagers...\
name ""
csp 700:print 10,500
name "Luka"
>Alright, got it!@
>Hey, you!@>Snap out of it!\
name ""
lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
>I shake one of the villagers, trying to snap him out of it...\
name "Villager A"
>Wah...@> I love shotas!@
>Uhhhgg!\
gosub *syasei1:gosub *syasei2
name ""
>But he ejaculates as I shake his shoulders.\
name "Luka"
>U...Uwa...\
name ""
dwave 1,"se\down.ogg"
>I reflexively release my hand, dropping him back onto the ground.@
>Across from me, when Alice tries to shake a villager to his senses...\
lsp 700,":a;chara\alice_st73.bmp",-170,50
lsp 701,":a;chara\mob_ozisan1.bmp",160,0:print 10,500
name "Alice"
>Hey!@> Snap out of it!@> Don't make me hit you!\
name ""
name "Villager B"
>H...Hit meeee!@> Uhhg!\
gosub *syasei1:gosub *syasei2
name ""
>Even the villagers Alice shakes ejaculate.\
cspl 700,701:print 10,500
name "Luka"
>I don't think we can snap them out of it, Alice.@
>Since it's a Succubus barrier skill...@> Should we call Alma Elma?\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>If we call that flying obscenity here, it will only make things worse.@
>Are you trying to make every villager ejaculate till their death in an instant, you idiot?\
name ""
name "Luka"
>Guh...@> Then what should we do?\
name ""
csp 700:print 10,500
>At this rate, the villagers will keep ejaculating until they die.@
>But I can't think of any way to snap them out of it...!\
name "???"
>...It appears to be my turn to act.\
name ""
name "Luka"
>W...Who is it!?\
name ""
bgmstop
bgmonce "bgm\battlestart.ogg"
lsp 700,":a;chara\amira_st01.bmp",0,0:print 10,1500
eng "Unfortunate Lamia appears!":$sel6/
wait 300
delay 4000
bgm "bgm\amira.ogg"
\
name "Luka"
>Amira, what are you doing here!?\
name ""
name "Amira"
>I was on my way home, when I accidentally got embroiled in this turmoil!@
>But putting that aside, leave this to me!\
>LOVE OF A HUNDRED YEARS, AWAKEN!@> AMIRA KICK!\
name ""
dwave 1,"se\dageki.ogg"
lsp 700,":a;chara\amira_st01.bmp",-170,0
lsp 701,":a;chara\mob_seinen1.bmp",170,0:print 10,1500
>Amira darts around, kicking the fallen villagers!\
name "Villager A"
>Ow!@>What are you doing!?\
name ""
>The villagers kicked snap out of their excited state!\
name "Luka"
>I...Incredible!@>With just a single blow!\
name ""
>Even though we tried so hard, Amira is doing it with just one attack.@
>As expected of the Unfortunate Lamia...@>The regret she exudes is just too powerful!\
csp 701
lsp 700,":a;chara\alice_st72.bmp",0,50:print 10,500
name "Alice"
>Keep it up, Amira!\
name ""
lsp 700,":a;chara\amira_st01.bmp",-170,0
lsp 701,":a;chara\mob_seinen1.bmp",170,0:print 10,1500
name "Amira"
>Yes, I can do it!\
name ""
dwave 1,"se\dageki.ogg"
>Amira kicks two more villagers, who return to their senses!@
dwave 1,"se\ero_simetuke2.ogg"
>But as she goes to kick another villager's face...\
name "Villager X"
>Ooooh...@> T...That horrible luck she suffers...@> S...So moe!\
name ""
name "Amira"
>It can't be!@> My attack wasn't effective!?@
>So there's a villager here who is into misfortune!?\
>You leave me no choice... I must call upon my allies!@
bgm "bgm\battle2.ogg"
>Unfortunate Friends, assemble!@
>...Unfortunate Harpy!\
name ""
csp 701
lsp 700,":a;chara\zannen_st01.bmp",0,0
bg "bg\bg140.bmp",10,500
name "Pyhar"
>Did you caaall?@>Leave it all to meeee! \
name ""
lsp 700,":a;chara\amira_st01.bmp",0,0
bg "bg\bg103.bmp",10,500
name "Amira"
>...Unfortunate Mermaid!\
name ""
lsp 700,":a;chara\zannen_st02.bmp",0,0
bg "bg\bg120.bmp",10,500
name "Diamrem"
>W...Water...\
name ""
lsp 700,":a;chara\amira_st01.bmp",0,0
bg "bg\bg103.bmp",10,500
name "Amira"
>...Unfortunate Nekomata!\
name ""
lsp 700,":a;chara\zannen_st03.bmp",0,0
bg "bg\bg088.bmp",10,500
name "Garf***d"
>...............\
name ""
lsp 700,":a;chara\amira_st01.bmp",-250,0
lsp 701,":a;chara\zannen_st03.bmp",50,0
lsp 702,":a;chara\zannen_st02.bmp",-150,-330
lsp 703,":a;chara\zannen_st01.bmp",320,0
bg "bg\bg103.bmp",10,500
name "Amira"
>Taking advantage of our inferiority complexes, we hold the power of selfishness!@
>We shall bring light to this village!\
name ""
cspl 702,703
lsp 700,":a;chara\mob_seinen1.bmp",-170,0
lsp 701,":a;chara\mob_ozisan1.bmp",170,0
dwave 1,"se\power.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,500
csp 2:print 10,500
name "Villager A"
>Uwa... It's finally going down...\
name ""
name "Villager B"
>What was I doing...?@> I need to get home...\
name ""
cspl 700,701:print 10,500
name "Luka"
>Wh...What power!\
name ""
>The Unfortunate power restores the withered villagers to their senses in moments!@
>With that, the barrier slowly fades away as it loses power, and vanishes!\
sean_change "bg103"
bgm "bgm\epilogue2.ogg"
lsp 700,":a;chara\succubus_st01.bmp",-160,100
lsp 701,":a;chara\witchs_st11.bmp",160,100:print 10,500
name "Succubus"
>Thank you, Hero Luka.@
>Thanks to you, everyone here was saved.\
name ""
name "Luka"
>No, no... It wasn't just me.\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\succubus_st01.bmp",160,0:print 10,500
name "Succubus"
>Thank you too, Monster Lord.@
>We would love to treat you to some especially thick semen, but...\
name ""
lsp 700,":a;chara\alice_st74.bmp",-170,50:print 10,500
name "Alice"
>Hmph, I'm not worried about that.@
>I can get some freshly squeezed from Luka whenever I want.\
name ""
name "Succubus"
>I'm so envious...@
>Would you be willing to let me have control of him for just a little while?\
name ""
lsp 700,":a;chara\alice_st79.bmp",-170,50:print 10,500
name "Alice"
>Not a chance. \
name ""
name "Succubus"
>...That is unfortunate.@
lsp 700,":a;chara\amira_st01.bmp",-160,0
lsp 701,":a;chara\succubus_st01.bmp",160,0:print 10,500
>Speaking of, thank you for your assistance as well.\
name ""
>The Village Mayor looks over the Unfortunate Friends.@
>If it wasn't for them, the villagers may never have recovered.\
name "Amira"
>...Humans and Monsters are all friends.@
>We must help each other out!\
name ""
lsp 701,":a;chara\witchs_st11.bmp",160,0:print 10,500
name "Succubus Witch"
>Yes... T...That's right.\
name ""
lsp 700,":a;chara\zannen_st01.bmp",-180,0:print 10,500
name "Pyhar"
>As thanks, give me twenty hot dudes.\
name ""
lsp 701,":a;chara\succubus_st01.bmp",160,0:print 10,500
name "Succubus"
>S...Sure...@>I'll let you choose them...\
name ""
lsp 700,":a;chara\zannen_st02.bmp",-250,0:print 10,500
name "Diamrem"
>I...It hurts...@>W...Water...\
name ""
lsp 701,":a;chara\witchs_st12.bmp",160,0:print 10,500
name "Succubus Witch"
>Don't you think you should go back to the sea...?\
name ""
lsp 700,":a;chara\zannen_st03.bmp",-160,0:print 10,500
name "Garf***d"
>..............\
name ""
lsp 701,":a;chara\succubus_st01.bmp",160,0:print 10,500
name "Succubus"
>..............\
name ""
name "Luka"
>..............\
name ""
cspl 700,701:print 10,500
>Anyway, we were able to solve the issue in Succubus Village.@
>We leave the village, and head towards our next destination...\
r@k@\
mov %ivent12,2
mov %gloval1_story_sinkou,17:gosub *savegloval1
bgm "bgm\field4.ogg"
goto *map12



*sean0376

bgm "bgm\kiki2.ogg"
saveoff
cspl 3,7
csp 611
cspl 699,705
bg black,7,1500
wait 500
gosub *setwindow_01p
>How many years ago was it...?\
bg "bg\bg194.bmp",10,1500
lsp 700,":a;chara\lazarus_st13.bmp",-170,0
lsp 701,":a;chara\mob_yuusya.bmp",170,0:print 10,500
name "Lazarus"
>What the hell is this, Marcellus!?@
>Do you know what you're doing!?\
name ""
name "Marcellus"
>...All we're doing is simple revenge.@
>I don't mean to continue our group's activities any longer.\
name ""
name "Lazarus"
>...So what about Karen?@
>Or old man Merlin!?\
>If you just turn your back on their regrets, how are you ever gonna face them again!?\
name ""
name "Marcellus"
>...We can't face them as we are now.@
>Do you think those two want us to kill hundreds of monsters in their name?\
>You must have noticed, Lazarus...@
>...We're wrong.\
name ""
lsp 700,":a;chara\lazarus_st10.bmp",-170,0:print 10,500
name "Lazarus"
>The only thing wrong here is your uncommitted attitude!\
name ""
>In a rage, Lazarus pulls out his sword.\
>He wants to do anything he can to persuade his friend.@
>The heart of his best friend, the one who founded Ilias Kreuz with him.\
name "Lazarus"
>I won't allow that to happen!@
>You aren't going to waste their deaths!@>Don't say they were for nothing!\
name ""
name "Marcellus"
>Stop this, Lazarus!\
name ""
lsp 700,":a;chara\lazarus_st08.bmp",-170,0:print 10,500
name "Lazarus"
>A traitor...@> I must enforce the rules of our group!\
name ""
dwave 1,"se\karaburi.ogg"
>Full of anger and passion, Lazarus swings his sword down.@
>But despite his words, his actions are a lie.\
>Even while attacking with anger in his mind, he was convinced.@
>Marcellus is skilled, this type of attack would never connect.\
name "Marcellus"
>Guh...!\
name ""
dwave 1,"se\karaburi.ogg"
>But Marcellus' reactions were slow, and he didn't dodge in time.@
dwave 1,"se\slash3.ogg"
>Lazarus' blade slides deep into his body.\
lsp 700,":a;chara\lazarus_st13.bmp",-170,0:print 10,500
name "Lazarus"
>...Y...You fool!@
>Why didn't you avoid it!?\
name ""
name "Marcellus"
>Ah...Urhg...\
name ""
dwave 1,"se\down.ogg"
>Lazarus' face goes pale as Marcellus collapses, blood flowing from the wound.@
>It's clearly a fatal wound...\
>Why didn't he dodge that slow overhead attack?@
>He could have dodged... Or deflected... Or even counter attacked...\
bgm "bgm\hutuu2.ogg"
lsp 700,":a;chara\lazarus_st10.bmp",-170,0:print 10,500
name "Lazarus"
>Y...You... It can't be...@
>You're blind in your left eye!?\
name ""
name "Marcellus"
>Ah... Yes... From the Monster Lord's Castle incident...@
>I kept quiet about it... My blind spot...\
name ""
>Due to the attack in the Monster Lord's Castle, Lazarus lost the use of his left arm.@
>Apparently Marcellus didn't come away unscathed either...\
lsp 700,":a;chara\lazarus_st13.bmp",-170,0:print 10,500
name "Lazarus"
>You idiot!@
>Why would you keep something important like that hidden!?\
name ""
name "Marcellus"
>Lazarus...@> I didn't want to worry you...\
name ""
name "Lazarus"
>Wait, don't die!@
>What am I going to do if you leave me?\
name ""
name "Marcellus"
>Lucifina... Forgive me...@
>Please... Luka...\
name ""
csp 701:print 10,500
name "Lazarus"
>Hey, you're joking...!@
>Don't die... You can't die...!\
>Damn it!!!\
name ""
csp 700
bg black,10,1500
>...I know I attacked with the intent to kill.@
>But I could only do it because I knew he had the skills to easily block it.\
>But there's no point rationalizing it.@> What happened, happened.\
>I killed my best friend Marcellus.\
name "Lazarus"
>Damn...@
>What a horrible dream...\
name ""
bgmstop
textoff
csp -1
bg "bg\bg139.bmp",99,3000,"system\lngtwave.dll/vwi"
bgm "bgm\kiki2.ogg"
gosub *setwindow_01p
>............\
name ""
>My consciousness slowly comes back to me.@
>The fog that littered my mind slowly lifts.\
lsp 700,":a;chara\lazarus_st04.bmp",0,0:print 10,500
name "Lazarus"
>...What?@
>Did the petrification wear off?\
name ""
>I'm still in the basement of the headquarters building.@
>The same place the Monster Lord petrified me.\
>My body moves with no resistance...@
>Except of course for my left arm.\
name "Lazarus"
>What the hell is going on?\
name ""
>I dizzily walk up the stairs.@
dwave 1,"se\asioto3.ogg"
bg "bg\bg122.bmp",10,500
>But instead of my allies, I come upon a tragedy.\
bgm "bgm\kiki1.ogg"
lsp 700,":a;chara\mob_seinen1.bmp",-170,0
lsp 701,":a;chara\mob_syounen.bmp",170,0:print 10,500
name "Boy"
>Uwaaa!@> Help me!\
name ""
name "Child"
>Mama!@>Where are you!? Mama!?\
name ""
lsp 700,":a;chara\mob_syounen.bmp",-170,0
lsp 701,":a;chara\trooperloid_st01.bmp",170,0:print 10,500
name "Trooperoid"
>Hahaha!@>Kill everyone, except for the young men!@
>Yeah, get them!\
name ""
>The citizens are trying to escape in a panic, as machine-like monsters attack them.\
csp 701
lsp 700,":a;chara\lazarus_st04.bmp",0,0:print 10,500
name "Lazarus"
>W...What the fuck!?\
name ""
>Am I still asleep?@
>I have to be... This can't be happening!\
lsp 700,":a;chara\mob_syounen.bmp",-170,0
lsp 701,":a;chara\trooperloid_st01.bmp",170,0:print 10,500
name "Child"
>Uwaaa!@> Mamaaaa!\
name ""
name "Trooperoid"
>Hehe... Sorry, little kids ain't my thing.@
>Sorry brat, but I'm gonna blow you away!\
>Too bad you weren't born ten years earlier!\
name ""
>As the machine-like monster raises the muzzle of her weapon to the boy's head...\
lsp 700,":a;chara\lazarus_st10.bmp",-170,0:print 10,500
name "Lazarus"
>Tch!\
name ""
dwave 1,"se\asioto1.ogg"
>Before I could think it through, I dash forward and deflect the muzzle with my sword.\
dwave 2,"se\shot1.ogg"
>The bullet, aimed at the boy, shoots harmlessly into the air instead.\
name "Trooperoid"
>What the hell, old man!?@
>Popping out from nowhere with that villainous face of yours!?\
name ""
name "Lazarus"
>Wholesale murder, including kids?@
>I don't think you're the one to judge villains.\
name ""
>Without lowering my guard, I quickly look back at the kid behind me.\
name "Lazarus"
>Hey kid, get out of here!@
>Get into that building!\
name ""
>...What the hell am I doing?@
>I'm not some kind of protector.\
name "Trooperoid"
>Oi, oi... Prey ain't allowed to just run away without my permission!@
>So you think you're gonna be my opponent, eh?\
name ""
dwave 1,"se\karaburi.ogg"
>I attack with my most powerful overhead swing, aiming to cut off the mechanical monster's arm...@
dwave 1,"se\break.ogg"
>But she catches the blade instead, and harmlessly swats it to the ground.\
name "Lazarus"
>Guh...!@>What power!\
name ""
>Even in my prime, I'd be no match for this thing!@
>I shouldn't risk myself for some brat I don't even know.\
>Even if I act like some kind of guardian, nothing will come of it...\
lsp 700,":a;chara\lazarus_st04.bmp",-170,0:print 10,500
name "Lazarus"
>............\
name ""
>...No, that isn't right.@
>Wasn't what originally moved me the desire to protect people?\
>In those days...\
cspl 700,701
bg "bg\bg003.bmp",10,1000
bgm "bgm\hutuu4.ogg"
lsp 700,":a;chara\mob_sensi4.bmp",-190,0
lsp 701,":a;chara\mob_yuusya.bmp",170,0:print 10,500
name "Marcellus"
>Lazarus, please defend the church!\
name ""
name "Lazarus"
>Yeah, leave it to me!@
>I won't let anyone lay a single finger on the villagers!\
name ""
cspl 700,701
bg "bg\bg023.bmp",10,1000
lsp 700,":a;chara\mob_syounen.bmp",-170,0
lsp 701,":a;chara\mob_yuusya.bmp",170,0:print 10,500
name "Marcellus"
>Damn monster...@>You won't lay one finger on this child!\
name ""
lsp 701,":a;chara\mob_sensi4.bmp",150,0:print 10,500
name "Lazarus"
>Kid, get behind us.@
>You'll be fine, we won't let anything hurt ya!\
name ""
cspl 700,701
bg "bg\bg122.bmp",10,1500
>That's right...@
>That's the reason I had to start fighting, wasn't it?\
>...When did my path get so twisted?@
>I took up the sword to protect the weak.\
bgm "bgm\battle2.ogg"
lsp 700,":a;chara\lazarus_st11.bmp",-170,0
lsp 701,":a;chara\trooperloid_st01.bmp",170,0:print 10,500
name "Lazarus"
>Damn it, I'm not some fucking guardian!\
name ""
dwave 1,"se\break.ogg"
>I turn around and quickly lash out with everything I've got.@
>But as expected, the power difference is still too great.\
name "Trooperoid"
>Don't get so carried away, human!@
>I'll grind you up with my maximum power!\
name ""
>She lifts up her main gun at my head.@
dwave 1,"se\power.ogg"
lsp 701,":a;chara\trooperloid_st11.bmp",170,0:print 10,500
>Charging energy, a pale light comes off her body...\
name "Lazarus"
>Sheesh... This your first fight or something?@
>What do you think will happen if you fire that huge cannon with footing like that?\
name ""
lsp 701,":a;chara\trooperloid_st03.bmp",170,0:print 10,500
name "Trooperoid"
>Eh...!?\
name ""
>The monster quickly looks down at her feet.@
>But she's standing on stone... There's no issue.\
name "Trooperoid"
>What are you talk-\
name ""
name "Lazarus"
>Hyah!\
name ""
dwave 1,"se\asioto1.ogg"
>Without missing my chance, I raise my sword up high.@
dwave 1,"se\karaburi.ogg"
>I jump up, making it look like I'm putting everything I have into a single blow.\
name "Trooperoid"
>You cheating coward!\
name ""
>Trying to protect herself from the blow, the Trooperoid takes a defensive stance...\
name "Lazarus"
>No, this is cowardice!\
name ""
dwave 1,"se\sio.ogg"
>I throw sand that I grabbed with my left hand into her eyes.\
>With my broken arm, this is the most I can manage to do by swinging my body to the side for momentum.\
>But since she was looking for the sword blow, she took it full on in her eyes.\
lsp 701,":a;chara\trooperloid_st05.bmp",170,0:print 10,500
name "Trooperoid"
>Gaah!@>My eye lens!@
>It's precise equipment, you fool!\
name ""
dwave 1,"se\karaburi.ogg"
>Deprived of her sight, the Trooperoid turns in a circle, randomly lashing out.@
dwave 1,"se\karaburi.ogg"
>Even if just one of those hits me, it would still be a mortal wound...\
lsp 700,":a;chara\lazarus_st04.bmp",-170,0:print 10,500
name "Lazarus"
>Now... What to do about that armor...\
name ""
>As I think about what to do, a small shadow timidly approaches.\
bgm "bgm\kiki2.ogg"
lsp 701,":a;chara\mob_syounen.bmp",170,0:print 10,500
name "Child"
>Uwaaann!\
name ""
lsp 700,":a;chara\lazarus_st10.bmp",-170,0:print 10,500
name "Lazarus"
>You little shit!@
>Why are you still hanging around here!?\
name ""
lsp 700,":a;chara\mob_syounen.bmp",-170,0
lsp 701,":a;chara\trooperloid_st05.bmp",170,0:print 10,500
name "Trooperoid"
>Damn it... Where are you?\
name ""
dwave 1,"se\karaburi.ogg"
>The crying child stumbled into the attack range of the monster...\
dwave 1,"se\asioto1.ogg"
lsp 699,":a;chara\lazarus_st10.bmp",-400,0
for %move=0 to 270 step 10
amsp 699,-400+%move,0
print 1:wait 1
next
dwave 2,"se\down.ogg"
>I jump at the kid, pulling him to the ground.\
name "Lazarus"
>Gah!\
name ""
lsp 701,":a;chara\trooperloid_st01.bmp",170,0:print 10,500
name "Trooperoid"
>There you are!@> Die!\
name ""
dwave 1,"se\karaburi.ogg"
>Approaching my back, she moves for a fatal blow.@
>Ah... This reminds me... It happened before...\
cspl 699,701
bg "bg\bg076.bmp",10,1500
lsp 700,":a;chara\mob_syounen.bmp",-300,0
lsp 701,":a;chara\mob_sensi4.bmp",-200,0
lsp 702,":a;chara\sasori_st01.bmp",250,0:print 10,500
name "Lazarus"
>Watch out, kid!\
name ""
name "Young Boy"
>O...Old man!\
name ""
name "Lazarus"
>Guh... Shit...\
name ""
>I was protecting a kid that time, too.@> Right before the blow was gonna slam into my back...\
dwave 1,"se\karaburi.ogg"
name "Marcellus"
eng "...!":$sel6/
lsp 699,":a;chara\mob_yuusya.bmp",-400,0
for %move=0 to 400 step 20
amsp 699,-400+%move,0
print 1
next
\
name ""
dwave 1,"se\break.ogg"
>Marcellus jumped in, and deflected the blow.\
name "Marcellus"
>...Be careful, Lazarus.@
>When you protect someone, you leave your back open!\
name ""
cspl 699,702
bg "bg\bg122.bmp",10,1500
lsp 700,":a;chara\lazarus_st12.bmp",-170,0
lsp 701,":a;chara\trooperloid_st01.bmp",170,0:print 10,500
name "Lazarus"
>Heh...@> In the end, I don't stand a chance without ya.\
name ""
>I close my eyes in resolution, waiting for the blow.@
dwave 1,"se\break.ogg"
>But in the next moment, a shadow passes overhead, deflecting the blow.\
lsp 700,":a;chara\marcellus_st01.bmp",0,0
lsp 701,":a;chara\trooperloid_st03.bmp",170,0:print 10,500
name "Lazarus"
>No...@>Marcellus...?\
name ""
>Did Marcellus come back...?@
>No...\
bgm "bgm\ruka.ogg"
lsp 700,":a;chara\ruka_st03.bmp",-220,0:print 10,500
name "Lazarus"
>You...@> Luka...\
name ""
name "Luka"
>Lazarus...\
name ""
lsp 700,":a;chara\lazarus_st04.bmp",-170,0
lsp 701,":a;chara\trooperloid_st01.bmp",170,0:print 10,500
>After I jumped into the fray, I quickly saw what was going on.@
>Lazarus was fighting to protect the kid with his life.\
name "Luka"
>...Just what happened to you?\
name ""
lsp 700,":a;chara\lazarus_st11.bmp",-170,0:print 10,500
name "Lazarus"
>Heh.@> Don't worry about it.\
>...By the way, what in the hell is going on?@
>Is she finally ending the world?\
name ""
name "Luka"
>...We'll talk later, first is her!\
name ""
csp 701
lsp 700,":a;chara\trooperloid_st01.bmp",170,0:print 10,500
>I take up my sword and face the Trooperoid!\
r@k@\
goto *trooperloid_start



*sean0377

bgm "bgm\kiki3.ogg"
r@k@\
name "Luka"
>Whew... Finally beat her.\
name ""
lsp 700,":a;chara\lazarus_st05.bmp",0,0:print 10,500
name "Lazarus"
>...But there seem to be a whole lot of them.@
>No matter how many you crush, it's only a matter of time till you're overrun.\
name ""
name "Luka"
>There should be a leader commanding them.@
>If they are defeated, then the group will disperse.\
name ""
lsp 700,":a;chara\lazarus_st03.bmp",0,0:print 10,500
name "Lazarus"
>Not too uncommon during war...@
lsp 700,":a;chara\lazarus_st04.bmp",0,0:print 10,500
>Oi, oi! More are heading here already!\
name ""
dwave 1,"se\asioto4.ogg"
lsp 700,":a;chara\trooperloid_st01.bmp",-170,0
lsp 701,":a;chara\trooperloid_st01.bmp",170,0:print 10,500
>More Trooperoids are rushing over down the street!\
name "Trooperoid A"
>Number 67's responses have stopped coming in!@
>Did she get taken out!?\
name ""
name "Trooperoid B"
>There's a Hero there!@>It must be his doing!\
name ""
name "Luka"
>Guh... There's no time to look for the leader now!\
name ""
csp 701
lsp 700,":a;chara\lazarus_st11.bmp",0,0:print 10,500
name "Lazarus"
>Hey, Luka...@> Give me a light.\
name ""
name "Luka"
>What?@>I don't smoke anything...\
name ""
>Why would he think I have a match?\
lsp 700,":a;chara\lazarus_st10.bmp",0,0:print 10,500
name "Lazarus"
>You damn fool!@
>Why would I be going after tobacco at a time like this!?\
lsp 700,":a;chara\lazarus_st05.bmp",0,0:print 10,500
>Sheesh, an idiot like his father.\
>By a light, I mean the fire of the Salamander spirit.\
name ""
lsp 700,":a;chara\lazarus_st04.bmp",-170,0
lsp 701,":a;chara\trooperloid_st01.bmp",170,0:print 10,500
name "Trooperoid A"
>Hey!@> Don't ignore us!\
name ""
name "Lazarus"
>Shut the hell up.@
>You all wanna squeeze out our semen, right?@>Have you already decided what order you'll go in, then?\
name ""
lsp 700,":a;chara\trooperloid_st01.bmp",-170,0
lsp 701,":a;chara\trooperloid_st01.bmp",170,0:print 10,500
name "Trooperoid A"
>Oh, that's right...@>Who's going first?@
>By the way, I call the kid.\
name ""
name "Trooperoid B"
>Don't pull that!@> The little one's mine!\
name ""
csp 701
lsp 700,":a;chara\lazarus_st11.bmp",0,0:print 10,500
>Turning away from the Trooperoids he just confused, Lazarus starts talking to me again.\
name "Lazarus"
>So hurry up and lend me the fire.@
>They're stupid, but I don't think they'll be distracted for too long.\
name ""
name "Luka"
>B...But lend?@>How...?\
lsp 700,":a;chara\salamander_st03.bmp",-240,0
lsp 701,":a;chara\lazarus_st11.bmp",170,0:print 10,500
name "Salamander"
>...Since this concerns me as well, I'll talk directly.@
>Lazarus, you desire to temporarily imbue your body with my power?\
name ""
lsp 701,":a;chara\lazarus_st03.bmp",170,0:print 10,500
name "Lazarus"
>In the past, we traveled with an old wizard who could use spirits.@
>He would imbue me with lower class fire spirits, so I have some knowledge...\
name ""
name "Salamander"
>But I am no low class fire spirit.@
>If you take my power into your body, even for a little while...\
name ""
lsp 701,":a;chara\lazarus_st01.bmp",170,0:print 10,500
name "Lazarus"
>...Quit your yapping, I know what it means. Get with the imbuing.\
name ""
name "Salamander"
>...I acknowledge your resolution.@
>Very well then...\
name ""
>Salamander presses her palm on Lazarus' back...\
dwave 2,"se\warm.ogg"
csp 700
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
>And in the next moment, a dazzling light fills the area!\
lsp 700,":a;chara\trooperloid_st01.bmp",-170,0
lsp 701,":a;chara\trooperloid_st01.bmp",170,0:print 10,500
name "Trooperoid A"
>What the hell are they doing!?\
name ""
name "Trooperoid B"
>Ahh it doesn't matter any more!@>Just get them!\
name ""
>The Trooperoids throw themselves at us all at once...\
bgm "bgm\battle2.ogg"
lsp 700,":a;chara\lazarus_st10.bmp",-160,0:print 10,500
name "Lazarus"
>Ooooohhhh!!!\
name ""
dwave 1,"se\slash3.ogg"
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
csp 701:print 10,500
>Lazarus cuts down the first attacking Trooperoid with one powerful slash!@
>Wrapped in a crimson flame, the force of life is pouring out of him!\
lsp 700,":a;chara\lazarus_st10.bmp",0,0:print 10,500
name "Lazarus"
>Luka, find the enemy leader!@
>I'll deal with all the other small fry!\
name ""
name "Luka"
>That's crazy!\
name ""
name "Lazarus"
>I am crazy, didn't you figure that out already!?@> Get out of here!\
name ""
dwave 1,"se\asioto1.ogg"
lsp 700,":a;chara\lazarus_st10.bmp",-160,0
lsp 701,":a;chara\trooperloid_st01.bmp",170,0:print 10,500
>Lazarus jumps into the swarm of attacking Trooperoids, his blazing crimson aura burning only brighter.\
csp 701
lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
name "Alice"
>We have to find the leader, now!@
>If we waste time here, we're only wasting his effort!\
name ""
name "Luka"
>Yes, I got it.@
>...But there's no need to look.\
name ""
bgm "bgm\boss0.ogg"
csp 700:print 10,500
dwave 1,"se\karaburi.ogg"
>In that moment, a speeding blade is shot at me from the shadows.@
dwave 2,"se\break.ogg"
>Reacting instantly, I deflect it with my sword.\
name "???"
>Oh... You saw my surprise attack, huh?@
>You're quite agile, aren't you?\
name ""
>The one who launched the surprise attack slips out of the shadows...\
r@k@\
goto *assassinloid_start



*sean0378

bgm "bgm\epilogue2.ogg"
r@k@\
name "Luka"
>Whew, got her!\
name ""
>It was difficult, but I managed to seal the leader.@
>Losing their leader, the Trooperoids all fall into confusion, and retreat.\
>I don't want to admit it, but without Lazarus' help, I don't think the town could have been protected...\
name "Lazarus"
>Heh... Looks like ya got the boss.\
name ""
name "Luka"
>Yes, thanks to you...\
name ""
bgm "bgm\kiki2.ogg"
lsp 700,":a;chara\lazarus_st21.bmp",0,0:print 10,500
>I look back at Lazarus...@>And see his body is almost completely burned.\
name "Luka"
>Oi!@>Lazarus...!\
name ""
name "Lazarus"
>Guh...\
name ""
dwave 1,"se\down.ogg"
>Lazarus collapses to the ground.@
>Terrible burns cover his skin, and it's clear he has numerous broken bones.\
>I didn't think something this horrible could happen...@
>Just one look makes it clear he's beyond saving.\
name "Luka"
>Why...@> To this point...?\
name ""
bgm "bgm\hutuu2.ogg"
lsp 700,":a;chara\salamander_st03.bmp",-240,0
lsp 701,":a;chara\lazarus_st21.bmp",170,0:print 10,500
name "Salamander"
>That's what happens when you imbue the power of one of the Four Great Spirits without an official contract.@
>The power of flames ran unchecked through his body, burning him from the inside.\
name ""
>A trade of life for power...@
>Lazarus produced the flames of hell to fight until he burned out.\
name "Luka"
>Salamander, if you knew this would happen...\
name ""
name "Salamander"
>It was a decision solely made by one prepared for it.@
>I had no right to infringe on his choice.\
name ""
name "Luka"
>But...\
name ""
csp 701
lsp 700,":a;chara\lazarus_st21.bmp",0,0:print 10,500
name "Lazarus"
>...Heh, buck up kid.@
>For someone who did whatever the hell they wanted like me, this was the only way out.\
name ""
name "Luka"
>Lazarus, you...\
name ""
name "Lazarus"
>...Let me annoy you just once more.@
>Please bury me next to Marcellus.\
>The town grave keeper knows where it's at.@
>If he bit the dust in this uproar, then the burial record is in the church somewhere...\
name ""
name "Luka"
>Why... Next to my father...?\
name ""
>Lazarus is the one who murdered my father.@
>He said he purged him from Ilias Kreuz...\
name "Lazarus"
>I didn't stand a chance without him after all...\
lsp 700,":a;chara\lazarus_st22.bmp",0,0:print 10,500
>.............\
name ""
>Saying his last words, Lazarus quietly closes his eyes.\
bgmstop
sean_change "bg168"
bgm "bgm\kanasimi2.ogg"
name "Luka"
>So this is my father's grave...\
name ""
>I wouldn't call it grand, but it isn't crude, either.@
>To begin with, I didn't even know he had a proper grave.\
>I had originally thought he was killed by monsters, and his body was never recovered.@
>Even after Lazarus told me the truth, for some reason the thought of a grave never came to me.\
>And now, that Lazarus is buried here next to him.\
name "Luka"
>...Maybe father and Lazarus had a difficult friendship.\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Are you going to forgive Lazarus, Luka?\
name ""
name "Luka"
>Even if there was some sort of circumstance to it, he killed my father.@
>I can't bring myself to forgive that.\
>...But in his last moments, he was trying to protect this town.@
>And to do it, he sacrificed himself.\
>I won't forget that.\
name ""
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>............\
name ""
name "Luka"
>...So don't worry about it, Alice.\
name ""
>Alice is also deeply involved in the twists of Lazarus' life.@
>A horrible situation from her childhood...\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>...We must repay that cost of life.@
>We must defeat Ilias and return peace to the world.\
name ""
name "Luka"
>Yes, let's do our best together.@
>...Alright, on to the next location!\
name ""
csp 700:print 10,500
>For the sake of those killed, we must continue fighting.@
>With a new vow in our hearts, we make for our next destination...\
r@k@\
mov %ivent17,2
mov %gloval1_story_sinkou,17:gosub *savegloval1
bgm "bgm\field4.ogg"
goto *map12



*sean0379

sean_change "bg182"
gosub *setwindow_01p
name "Luka"
>Alright, let's go to Gold Volcano!\
name ""
>The last spirit, Undine, should be waiting there...@
>Once I re-contract with her, I'll have all four spirits back!\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Once you get back the last spirit, we're going to return to the Monster Lord's Castle to strategize our next moves.@
>Are you sure you're finished with everything here?\
name ""
csel "Yes",*sean0379a,"No",*sean0379b



*sean0379b

csp 700:print 10,500
name "Luka"
>No, we need to check something first.\
name ""
>Now for our next location...\
bgm "bgm\field4.ogg"
goto *map12



*sean0379a

csp 700:print 10,500
name "Luka"
>Hold out a little longer, Undine!\
name ""
>I'll have all four spirits back once I get Undine.@
>At the same time, our journey around the world will come to an end.\
>Riding on top of Galda, we head toward the volcano...\
dwave 1,"se\habataki.ogg"
bgmstop
sean_change "bg115"
bgm "bgm\kazan.ogg"
name "Luka"
>H...Hot...\
name ""
>Just like before, I'm hit by sweltering heat.@
>Honestly, I never wanted to come here again...\
name "Luka"
>But I need all four back...@
>Even if that seal stops me from drawing out their full power.\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>The decoding of the discs at the Monster Lord's castle must be progressing, too.@
>I'm sure there will be some information about the seal among them.\
>And we must prepare for our own assault...@
>To do that, we'll need to unite the races together as one.\
name ""
name "Luka"
>That's right...@>This isn't a fight we can win with just the two of us.\
name ""
>Humans and monsters need to unite together to have a chance of defeating Ilias.@
>It's true that's what I always wanted, but...\
name "Alice"
>Hmmm...?@
>There's someone strange approaching...\
name ""
>As a strange sensation approaches, Alice lets out a warning.@
>It feels sort of like a Chimeric Monster, but...\
csp 700:print 10,500
name "Luka"
>Things can never go smoothly, can they?\
name ""
r@k@\
goto *yomotu_start



*sean0380

bgm "bgm\kazan.ogg"
name ""
r@k@\
name "Luka"
>That was a strange monster...@
>Why is Promestein studying ghost type monsters?\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>The Chimeric Monsters did look fairly similar in their designs until now.@>But I guess she's simply after raw fighting power, not looks.\
>Either way, she's up to no good.\
name ""
name "Luka"
>...I guess.@
>Either way, we have to beat them!\
>W...What the!?\
name ""
bgm "bgm\boss0.ogg"
dwave 1,"se\aura.ogg"
lsp 700,":a;chara\alice_st81.bmp",0,50:print 10,500
>Suddenly, a strange sensation fills the air...@
>It's the same aura as the other angels, but it's on a whole new magnitude of power!\
name "Luka"
>Be careful, Alice!@
>A crazy powerful Angel is coming...!\
name ""
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>Damn it, one after another!\
name ""
csp 700:print 10,500
>A strange angel takes form in front of us...@
>Countless tentacles expand from a wall of lava, taking over the entire wall like a giant plant!\
r@k@\
goto *wormiel_start



*sean0381

bgm "bgm\kazan.ogg"
r@k@\
name "Luka"
>Whew... What a crazy enemy.@
>But it looks like that's it for interference here.\
name ""
>After Wormiel is sealed, the wall reverts back to its normal mix of lava and rock.\
>Moments later, the serene atmosphere returns to the hot volcano.\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Common sense doesn't apply any longer when it comes to top ranking angels.@
>To think they could erode matter itself like that...\
name ""
name "Luka"
>And only this Angel Halo sword can damage her...@
>If she came down to wreak havoc earlier, nothing would be able to stop her.\
name ""
name "Alice"
>All the angels are left up to you, huh?@
>Isn't there something that can be done about that...?\
name ""
csp 700:print 10,500
>While wondering over that, we head deeper in, to where Salamander once was.\
dwave 1,"se\asioto2.ogg"
sean_change "bg115"
>After the Cherub was sealed, nothing else got in our way.@
lsp 700,":a;chara\undine_st24.bmp",220,210:print 10,500
>Until finally, we come upon a faint looking Undine.\
name "Undine"
>...So hot...\
name ""
name "Luka"
>Yes, it's hot...\
name ""
>As usual, I need to re-contract with her...@
>In a sexual way...\
name "Undine"
>Will you cool me down with your spirit?@
>You know the method, right...?\
name ""
name "Luka"
>Ah... Yes.\
name ""
lsp 700,":a;chara\undine_st24.bmp",40,210
lsp 701,":a;chara\alice_st74.bmp",160,50:print 10,500
name "Alice"
>...Alright then, I'll pour my magic into the lava to kill some time.@
>Make sure you finish before the volcano erupts...\
name ""
dwave 1,"se\escape.ogg"
csp 701:print 10,500
>With that, Alice leaves.@
lsp 700,":a;chara\undine_st02.bmp",0,0:print 10,500
>Undine slowly crawls toward me...\
r@k@\
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
goto *sean0382



*sean0382

name "Undine"
>First, I'll gently embrace you...@
>I'll make it feel good, so please give me a lot.\
name ""
name "Luka"
>W...Wait... Ah!\
name ""
mov %hseanwave,18:hseanwave
lsp 700,":a;chara\undine_hb1.bmp",0,0
lsp 690,":a;chara\undine_ct11.bmp",0,0:print 10,500
>Undine gently hugs me close to her, pressing my waist against her slime-like body.@
>My already erect penis presses against the middle of her waist.\
>And with a sound like something dropping into a pool of water, my penis starts to sink into her body.@
>My sensitive tip enters her, and is quickly surrounded by her thick, liquid like body.\
name "Luka"
>Ah...Ahh...\
name ""
>The unique sensation brings out a quick moan from me.\
>It's like her vagina itself is made of slime.@
>A small hole opened up in her body, that reforms perfectly around my penis.\
>Just the tip of my penis is inside her, but I'm already enraptured by her slime-like vagina.\
name "Undine"
>Does it feel like you're having sex with me?@
>I don't mind if you think of it as sex...\
>Think of it as thanks for giving me your semen.@
>I'll show you some love inside of me...\
name ""
>The thick liquid starts to flow around my tip.@
>Clinging to the neck and tip of my penis, it pulls at me as it swirls around.\
>I slip further inside her, as the thick liquid squeezes me from every side.@
>The incredible, ever changing sensations inside Undine seem to focus especially hard on my tip.\
name "Luka"
>Ah... Uh...@
>Just the tip...!\
name ""
>Feeling too good to stop myself, I cry out.@
>With only just the tip inside her, it already feels so good...\
>Sometimes her thick body squeezes my tip, and at other times it loosens and rubs against my back muscle...\
name "Luka"
>Hya...!@>Ah!\
name ""
name "Undine"
>Most of your erogenous zones are in the tip...@
>But I'm just playing with you a little bit at the moment.\
>But please try to endure it, Luka.@
>I don't want to think you would come from just a little teasing...\
name ""
name "Luka"
>But... It feels so good...\
name ""
>As her teasing gets slightly more intense, my body twitches.@
>Undine's slime-like body is wriggling around my sensitive tip, easily provoking reactions from me.\
>Hitting every one of my weak points, she's easily forcing unbearable pleasure into me.@
>I want to keep feeling her body flow around my tip...\
>The sweet sensations quickly corner me.@
>As the tantalizing pleasure takes over, the desire to release inside her grows.\
name "Luka"
>Ahh... I'm going to come...\
name ""
name "Undine"
>...You're a man, please endure it.@
>Don't leak so quickly...\
name ""
name "Luka"
>Ahh... I can't do it...@
>Ahhh!\
name ""
>I try to hold on, but can't...@> Relaxing my body, I let the explosion run through me as I let go.\
gosub *syasei1
lsp 700,":a;chara\undine_hb2.bmp",0,0:print 10,500
lsp 690,":a;chara\undine_ct12.bmp",0,0:print 10,500
gosub *syasei2
name "Luka"
>Haa... I came...\
name ""
>After trying so hard to hold on, it feels almost like an accidental orgasm.@
>As I sigh in pleasure, a large amount of semen squirts into Undine's thick body.\
>With her slime-like body still tightly squeezing my penis, the feeling of release is amplified to an incredible degree.@
>But the weakness I feel is also far higher than a normal ejaculation, too.\
name "Luka"
>Ah... Ah...\
name ""
name "Undine"
>But I told you to hold on...@
>You didn't even last three minutes, you naughty boy.\
>Bad children need punishment.@
>I'll give your naughty little penis a nice scolding...\
name ""
name "Luka"
>W...Wait...@
>Ahh!\
name ""
mov %hseanwave,19:hseanwave
lsp 700,":a;chara\undine_hb3.bmp",0,0:print 10,500
>Her thick body suddenly gives way, letting me sink deeper into her.@
>Before now it was just my tip, but now I'm inside her all the way to my root...\
>And awaiting me inside of her was an explosion of ecstasy.\
name "Luka"
>Hya...!@>Hya!\
name ""
>The thick liquid inside of her suddenly gets denser as it squeezes me from all sides.@
>Squirming and wriggling around, the thick liquid massages my penis inside her.\
>All the while, her slime-like body continues flowing around my tip.@
>The incredible mixture of pleasure blasts away my thoughts all at once.\
name "Undine"
>Well? It's intense, isn't it?@
>Since this is your punishment, please let me hear that gasping voice of yours...\
name ""
name "Luka"
>Ahh... Hyaa!\
name ""
>While Undine violates me, I finally scream out loud.\
>The vortex of slime inside of her flows around my penis, attacking every weak point I have.@
>Swirling around my tip like a mixer, pressing against my back muscle, gently pressing against my urethral hole...\
>My body violently writhes around in her embrace, helpless to do anything but drown in the sensations.\
name "Undine"
>...It's about time to finish this...@
>I'll tease your penis with everything I've got, so please come inside me...\
name ""
name "Luka"
>Ahh... Haa!\
name ""
>Following her statement, Undine's slime suddenly squeezes down far harder on my tip.@
>Her thick liquid body rubs and massages my penis from underneath the neck of my penis to my urethral opening.\
>Like a whirlpool around my penis, Undine moves to finish me off inside her.@
>Giving in to her finishing blow, my mind goes blank as my vision flashes white.\
name "Luka"
>Ahhhh!!!\
name ""
gosub *syasei1
lsp 700,":a;chara\undine_hb4.bmp",0,0:print 10,500
lsp 690,":a;chara\undine_ct13.bmp",0,0:print 10,500
gosub *syasei2
>My penis pulses as I explode inside Undine, the sensation of release filling my body.\
>Even though I only came twice, I feel completely powerless in her embrace.\
name "Luka"
>Ahh...\
name ""
name "Undine"
>That's the end of the punishment.@
>...And since you came so much, we killed two birds with one stone.\
>I loved your innocent reactions, too...\
name ""
name "Luka"
>Ah...\
name ""
mov %hseanwave,0:hseanwave
>I slowly fall asleep, nestled in Undine's arms...\
gosub *anten
>............\
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_seirei4,1
mov %skill04,4
bg "bg\bg115.bmp",10,1500
bgm "bgm\epilogue2.ogg"
name ""
r@k@\
name "Luka"
>Ah... Urhg...\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>You finally woke up?@> Idiot.\
name ""
>I open my eyes to a disgruntled looking Alice.@
>It looks like my re-contracting with Undine went well...\
bgm "bgm\comi1.ogg"
lsp 700,":a;chara\sylph_st21r.bmp",251,190
lsp 701,":a;chara\gnome_st31r.bmp",393,145
lsp 702,":a;chara\undine_st23.bmp",-50,180
lsp 703,":a;chara\salamander_st23.bmp",570,125:print 10,500
>Suddenly, four strange figures materialize in my head...\
name "Sylph"
>Yaaay!@> We're all back together again!\
name ""
lsp 702,":a;chara\undine_st22.bmp",-50,180:print 10,500
name "Undine"
>Luka... Though you were able to use the serene state under your own power...@
>From now on, please activate it through me.\
>I'll resonate with the power in your own heart, and further increase its effectiveness.\
name ""
name "Sylph"
>Yeyeyeyeaaaah!@> With the four of us, there's no need to be scared of anything anymore!\
name ""
lsp 703,":a;chara\salamander_st21.bmp",570,125:print 10,500
name "Salamander"
>But we still can't draw out our true power yet.@
>I'm irritated at my own powerlessness...\
name ""
name "Sylph"
>But my spirit is at FULL POWER!@
>Yeaaah!@>Yeaaah!\
name ""
lsp 702,":a;chara\undine_st23.bmp",-50,180
lsp 703,":a;chara\salamander_st23.bmp",570,125:print 10,500
name "Undine"
>That seal is indeed a troubling hindrance...@
>If we don't break it somehow, we'll never be able to draw out our power.\
name ""
name "Sylph"
>Hey, let's all go play somewhere! @
>Yaaay!@> Yeaaaaah!\
name ""
lsp 701,":a;chara\gnome_st32.bmp",50,50:print 10,500
name "Gnome"
>.............\
name ""
name "Sylph"
>Hey, hey... Where are we going to play?@
>I think somewhere calm and quiet is good! \
name ""
csp 700
lsp 701,":a;chara\gnome_st39.bmp",251,190:print 10,500
name "Sylph"
>H...Hey, stop it!@
>Under the ground is too calm and quiet!!!\
name ""
lsp 700,":a;chara\sylph_st34.bmp",261,290
lsp 701,":a;chara\gnome_st31r.bmp",393,145:print 10,500
name "Gnome"
>...............\
name ""
name "Sylph"
>...............\
name ""
name "Luka"
>...............\
name ""
>They're the same as ever...\
bgm "bgm\epilogue2.ogg"
cspl 701,704
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Now then, we should return to my Castle.@
>We must see if Tamamo has managed to finish decoding those discs.\
>We must break the seal on both me and the spirits...@
>If we can't break through either of those, we'll never be able to take Ilias down.\
name ""
csp 700:print 10,500
name "Luka"
>Yes... Just hold on a little longer, Four Spirits!@
>We'll get your power back for sure!\
name ""
bgm "bgm\comi1.ogg"
lsp 700,":a;chara\sylph_st35.bmp",181,230
lsp 701,":a;chara\gnome_st32.bmp",90,50:print 10,500
name "Gnome"
>.............\
name ""
lsp 700,":a;chara\sylph_st36.bmp",181,118:print 10,500
name "Sylph"
>Yaay!@>Yaaay!\
name ""
name "Luka"
>Syyyylph!\
name ""
dwave 1,"se\habataki.ogg"
bgmstop
sean_change "bg182"
bgm "bgm\hutuu2.ogg"
lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
name "Alice"
>Luka... Ilias is incredibly strong.\
name ""
>Alice suddenly starts talking, as we're flying back to her Castle.\
name "Luka"
>...But we still have to fight her.@
>You know that too, don't you?\
name ""
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>...Until now, I never thought I'd oppose her head on.@
>No... I did attack her once, but my power wasn't nearly enough.\
name ""
name "Luka"
>You attacked her once?@
>So you've fought her before?\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Did you forget about when we first met?@
>The only one who could blow me away like that is Ilias...\
name ""
name "Luka"
>So... Ilias beat you?\
name ""
>So when Alice fell from the sky... That's what launched her there.\
name "Alice"
>...It's too bad I lost.@
>It's true I took a lot of damage from the fight...@> But I still crushed her face in.\
name ""
name "Luka"
>Crushed her face?@>What do you mean?\
name ""
name "Alice"
>I punched her hard in the face with the power of darkness.@
>With everything I had, right in her cheek...@> Even with all her holy power, she wouldn't be able to heal it for a few days.\
>If she can't descend down to the surface, she can't perform that baptism.@
>In other words, she can't deceive anyone with her "visions".\
>There's no way someone like Ilias would ever show her face with a blemish like that...@> She has too much pride in herself.\
name ""
name "Luka"
>...So that's why Ilias never came to my baptism that day!\
name ""
lsp 700,":a;chara\alice_st72.bmp",0,50:print 10,500
name "Alice"
>Hahaha...@>It's because I punched her in the face.\
name ""
name "Luka"
>...........\
name ""
>So Alice is the reason she never came to my baptism.@
>But now, I'm thankful that I never received that baptism.\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>But apart from that...@> I realized I stood no chance in defeating her.\
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
>Besides... Even if I did, it would just usher in an age of chaos.@
>If a story was passed around that the Monster Lord killed the Goddess, humans and monsters would be forever enemies.\
name ""
name "Luka"
>...That would be bad.\
name ""
>Even if she was defeated, it would have just created more problems.@
>But now that Ilias has revealed her true face to the world...\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>I could never defeat her that way.@
>So I decided to continue on, searching for a practical way to break her rule.\
>...Which of course, set me on that same path of self-sacrifice as my mother.@
>But looking back on it, it was a stupid mistake.\
>Just escapism, and passing the responsibility to whoever comes after me...\
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
>I was a total idiot.\
name ""
name "Luka"
>...........\
name ""
>I can understand where she's coming from.@
>As the Monster Lord, that would be like abandoning your problems.\
lsp 700,":a;chara\alice_st72.bmp",0,50:print 10,500
name "Alice"
>...But I've made up my mind to face her again.@
>You're the one who gave me that courage, Luka.\
name ""
name "Luka"
>You're the one that's brought me this far, Alice.@
>Let's fight together from now on... And defeat Ilias together!\
name ""
bgm "bgm\epilogue2.ogg"
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>But even just confronting her is difficult enough.@
>She resides in the Heavens, and only comes down to baptize people, or for special reasons.\
>But for someone from the surface to go to the Heavens...?@
>That's why I had to wait for a day she was coming down for a baptism to attack her.\
name ""
name "Luka"
>Heaven, huh...?@
>Such a place really exists?\
name ""
>From the stories, it seemed like a place just above the clouds.@
>But I always had trouble believing a place like that existed.\
name "Luka"
>...But why can't we go to the Heavens?@
>Galda can't reach it?@>Is it too high up?\
name ""
name "Alice"
>No... It doesn't exactly exist in the sky.@
>A closer example would be like an alternate dimension alongside our own...\
>A world composed of divine magic, where those of us from the surface can't interfere.@
>We can't see it, hear it, or go to it.\
>Just like we can't touch angels, we can't go there.@
>Only that holy energy can pass through the Gate to Heaven.\
name ""
name "Luka"
>I see...@> So it's the same principle as why nobody can touch the angels.\
name ""
>If the entire place was like an angel's body... It would make things quite difficult.\
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>We know the location of the Gate to Heaven at least.@
>It's in the center of the Sentora Continent, called the "Navel of the World".\
>But since we can't physically touch it, that information serves us no use.\
name ""
>Navel of the World...\
>It's obvious the nickname came about because it's in the center of the world.\
>But there's also a rumor that there's a huge ivory tower there.@
>So the entrance to Heaven itself is there?\
name "Luka"
>Basically... It's not possible for us to attack Ilias.\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>But I'm sure there must be a way...@
>I'm hoping there's something in those discs from Promestein's lab.\
name ""
name "Luka"
>I hope Tamamo has made some progress deciphering them...\
name ""
dwave 1,"se\habataki.ogg"
csp 700
bg "BG\bg226.bmp",10,500
>There's no more use speculating until we're back at the Castle.@
>Thus, we return back to the Castle after our journey around the world...\
bgmstop
sean_change "bg001"
bgm "bgm\maou2.ogg"
lsp 700,":a;chara\stein_st02.bmp",-280,0
lsp 702,":a;chara\eden_st23.bmp",-30,0
lsp 701,":a;chara\alice8th_st01.bmp",280,0:print 10,500
name "Promestein"
>Useless...\
name ""
name "Black Alice"
>Incompetent...\
name ""
name "Promestein"
>Fool...\
name ""
name "Black Alice"
>Obtuse...\
name ""
name "Eden"
>Urhg... Gaah!\
name ""
name "Promestein"
>Third...\
name ""
name "Eden"
>D...Damn you!@
>Was that "Third" directed at me!?\
name ""
name "Black Alice"
>The first two angels became Fallen, but the Third was useless from the beginning.\
name ""
name "Eden"
>I won't forgive you for that!@>I will punish you, right here!\
name ""
name "Promestein"
>You should be the one worried...@
>Do you think Ilias will excuse your failures four times in a row?\
name ""
if %ivent06<2 goto *sean0381a
if %ivent11<2 goto *sean0381a
name "Black Alice"
>Ilias is going to be super angry.@
>Hehehe.\
name ""
name "Eden"
>What about Grangold and Sabasa, you fool?\
name ""
name "Black Alice"
>I'm still having fun with them...\
name ""
name "Promestein"
>Big words coming from the same one who failed in San Ilia and Grand Noah.\
name ""
name "Eden"
>Your Chimeras were pathetic, too.@
>They just keep on being defeated!@>Aren't you worthless yourself!?\
name ""
name "Promestein"
>Isn't that a problem of the one commanding them?@
>Even the most powerful of tools is dead weight if the user doesn't know how to use it.\
name ""
goto *sean0381a



*sean0381a

name "Black Alice"
>It's all your fault, after all.@
>You only have your current position as a hand-me-down, too.\
name ""
name "Eden"
>Grr!\
name ""
lsp 700,":a;chara\stein_st03.bmp",-280,0:print 10,500
name "Promestein"
>Now then, I think I should take my leave.@
>I wouldn't want to trouble the Great Seraph so much that she holds a grudge against me.\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,500
>With that, Promestein leaves the room.\
name "Black Alice"
>Oh my, she's so unsociable.@
>We should get along better.\
>That's right...@
>Perhaps I should invite Ilias along this time, and have a tea party with the four of us?\
name ""
dwave 1,"se\escape.ogg"
lsp 700,":a;chara\cupid_st11.bmp",-260,0:print 10,500
name "Cupid"
>Uwa...@> I bet that would be a horrible tea party.@
>I doubt your tea tastes good...\
name ""
name "Eden"
>Cupid, if you have something to report, do it later!\
name ""
name "Black Alice"
>...Oh no, no, I don't want to disturb you.@
>Perhaps I'll take my leave now as well.\
eng "Have a nice day, Master Angel...":$sel6/
dwave 1,"se\escape.ogg"
csp 701:print 10,500
\
name ""
name "Eden"
>...........\
name ""
name "Cupid"
>Well then... My report...@
>Master Eden?@> Master Eeeeden?\
name ""
name "Eden"
>Those two definitely hold a grudge against Ilias...\
>For Ilias' sake, I must...@
>I must...@
>I'm the only one who truly understands her, after all...\
name ""
r@k@\
bgmstop
sean_change "bg148"
bgm "bgm\maouzyou2.ogg"
lsp 700,":a;chara\vampire_st01.bmp",175,0:print 10,500
name "Vampire"
>Welcome home, Monster Lord...\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\vampire_st01.bmp",335,0:print 10,500
name "Alice"
>Yes, thanks for your work here.\
name ""
name "Vampire"
>Tamamo wishes to provide a report.@
>Please, proceed toward the hall...\
name ""
lsp 700,":a;chara\alice_st74.bmp",-170,50:print 10,500
name "Alice"
>Very well.\
name ""
name "Luka"
>...........\
name ""
cspl 700,701:print 10,500
>I shyly follow Alice down the hallway.@
>What a difference from the last time I barged in here...\
sean_change "bg047"
bgm "bgm\tamamo.ogg"
lsp 701,":a;chara\youko_st01.bmp",-270,0
lsp 700,":a;chara\tamamo_st01.bmp",0,0
lsp 702,":a;chara\hatibi_st01.bmp",290,0:print 10,500
>We pass through the doors, one after another.@
>Finally, we come to a room full of Kitsunes licking and sucking on silver discs.\
cspl 701,702
lsp 700,":a;chara\alice_st77.bmp",0,50:print 10,500
name "Alice"
>Urhg... Foxes!@
>What horrors are you planning, all assembled together like this!?\
name ""
lsp 701,":a;chara\youko_st01.bmp",-270,0
lsp 700,":a;chara\tamamo_st01.bmp",0,0
lsp 702,":a;chara\hatibi_st01.bmp",290,0:print 10,500
>The Kitsunes are all taking notes as they suck on the discs.@
>The huge stacks of paper lining the room look like they would take days just to read through...\
bgm "bgm\maouzyou2.ogg"
csp 702
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\tamamo_st01.bmp",160,0:print 10,500
name "Tamamo"
>After searching through that lab, we found even more discs.@
>There were so many, I had to assemble most of the Kitsune race to help decode them.\
name ""
name "Alice"
>Damn Kitsunes...@
>Anyway, did you find anything out?\
name ""
name "Tamamo"
>Our analysis on the Spirit's Seal has advanced quite a ways.@
>They set up four towers through the world, each with their own generator that focuses on maintaining the seal.\
>They are placed at the North and South poles, and on the two opposite extremes to the East and West.@
>The seal is focused through the four towers, and brings about the seal on a global scale.\
name ""
name "Alice"
>Four towers...@> That sounds troublesome.@
>That's quite a lot of effort to neutralize Luka.\
name ""
name "Tamamo"
>It seems like these studies were begun long before Luka was even born.@
>Both the sealing of the spirits, and a way to copy their effects...\
name ""
name "Alice"
>So not just sealing them, but copying them...@
>I thought it was strange how they were able to mass produce those spirits so fast...\
name ""
name "Luka"
>You said Four Towers, right?@
>So we need to destroy them to break the seal?\
name ""
name "Tamamo"
>That would cancel the seal...@
>But I have a better idea.\
>It's already a device set to seal something on a global scale.@
>Why break something so useful?\
name ""
name "Luka"
>Useful...?\
name ""
lsp 700,":a;chara\alice_st73.bmp",-170,50:print 10,500
name "Alice"
>Is using them for our own purposes even possible?\
name ""
name "Tamamo"
>The Four Towers are basically just a way to amplify the power of something.@
>Right now, they're amplifying that seal on the spirits.\
>So, theoretically, it's possible to replace that seal with something of our own.@
>So I thought, what if we could interfere with the holy power of the angels...?\
name ""
name "Luka"
>Interfere with the holy energy?@
>You mean make it so we are able to directly attack the angels!?\
name ""
lsp 700,":a;chara\alice_st74.bmp",-170,50:print 10,500
name "Alice"
>In theory...@
lsp 700,":a;chara\alice_st71.bmp",-170,50:print 10,500
>But does a powerful seal like that even exist?\
>Something that can interfere directly with holy energy...@>It sounds like a God-like power.\
name ""
name "Tamamo"
>I wouldn't bring it up if I didn't have something in mind, you idiot.@
>There's a seal that exists to interfere with holy energy.\
>Have you heard of a place called the "Sealed Sinner's Prison" on this continent?\
name ""
if %ivent16=0 goto *sean0382_01
if %ivent16=1 goto *sean0382_02



*sean0382_01

name "Luka"
>No...\
name ""
name "Tamamo"
>It's where Heinrich's soul is sealed.\
goto *sean0382_03



*sean0382_02

name "Luka"
>Sealed Sinner's Prison...@
>Isn't that where Heinrich's soul is sealed!?\
name ""
>The Legendary Hero Heinrich was sealed there for some reason...@
>I can figure out why now, too.\
>He must have discovered Ilias' true nature, and challenged her to a fight.@
>But he was defeated, and his soul sealed away...\
name "Tamamo"
>...Hmm, so you've already visited it.@
>There's a seal there, keeping Heinrich's soul trapped away.\
goto *sean0382_03



*sean0382_03

>The seal Ilias used is incredibly powerful.@
>If we divert that, we should be able to interfere with their holy energy.\
name ""
name "Luka"
>I see... And then we amplify it through the Four Towers.@
>So we can deploy it all over the world!?\
name ""
lsp 700,":a;chara\alice_st72.bmp",-170,50:print 10,500
name "Alice"
>That's a good idea, Tamamo!@
>If we do that, then we can launch a worldwide counterattack!\
name ""
name "Tamamo"
>Next, we need more information.@
>In order to analyze the method, we will need to directly record some data onto these discs.\
>We need to go to the Sealed Sinner's Prison and perform it on site.@
>Since we would expect enemy interference, someone strong would need to do it...\
name ""
name "Luka"
>Then we'll go.\
name ""
lsp 700,":a;chara\alice_st72.bmp",-170,50:print 10,500
name "Alice"
>Yes, leave it to us.\
name ""
name "Tamamo"
>...Then we'll entrust that to you.@
>If you practice a little bit, you'll easily be able to learn how to record data onto the discs.\
lsp 701,":a;chara\tamamo_st04.bmp",160,0:print 10,500
>I've already started keeping a diary on a blank disc myself. \
name ""
lsp 700,":a;chara\alice_st74.bmp",-170,50:print 10,500
name "Alice"
>Damn fox...@
lsp 700,":a;chara\alice_st71.bmp",-170,50:print 10,500
>Anyway, let's start on it tomorrow.\
>Luka, get a good rest tonight.\
name ""
csp 701
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Luka"
>We're waiting until tomorrow?@
>In this situation, shouldn't we prepare a little faster?\
name ""
name "Alice"
>You should be tired enough after today.@
>You need to get a good rest tonight, and restore your power.\
name ""
name "Luka"
>But what if they attack again?\
name ""
lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
name "Alice"
>We damaged the attackers enough today.@
>They won't be able to regroup and assault that quickly.\
>Of course, they will regroup eventually...@
>But if we act in a rush, we'd just be falling into their hands.\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\tamamo_st01.bmp",160,0:print 10,500
name "Tamamo"
>She's trying to look tough, but the Monster Lord is quite worn out, too.@
>Even though her body was sealed, she's still fighting in battle after battle...\
>You two need to rest tonight.@
>Never violate that rule of war... Rest whenever you can.\
name ""
name "Luka"
>I see... Alright then.\
name ""
>Alice is exhausted...@>I'm ashamed to say it, but I didn't notice.\
>I'm not the only one who needs to rest...@
>I decide to stop being stubborn, and rest until tomorrow.\
name "Alice"
>...Now then, Tamamo.@
>How about the Six Ancestors' Great Seal afflicted on me?\
name ""
name "Tamamo"
>There's very little information about that...@
>We still don't know how they developed it, or what equipment they're using.\
>We don't even know how to detect where it came from.@
>It's like there's no clues at all...\
name ""
lsp 700,":a;chara\alice_st74.bmp",-170,50:print 10,500
name "Alice"
>Urhg... I want to return to my original body...\
name ""
if %ivent14=0 goto *sean0382_04
if %ivent14=1 goto *sean0382_05



*sean0382_04

>Alice lets out a deep sigh.@
>Suddenly, her eyes light up as if remembering something.\
if %ivent05<2 goto *sean0382_07
name "Alice"
>That reminds me... There's something else I'm worried about.\
goto *sean0382_06



*sean0382_05

>Alice lets out a deep sigh.@
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\vampire_st01.bmp",335,0:print 10,500
>Suddenly, the Vampire butler calls out.\
name "Vampire"
>Monster Lord, the Queen Elf and Queen Fairy have arrived.@
>Shall I keep them waiting?\
name ""
name "Alice"
>No, send them in.@
>We just finished our discussion.\
name ""
name "Vampire"
>Understood...\
name ""
dwave 1,"se\asioto3.ogg"
lsp 700,":a;chara\queenelf_st01.bmp",-160,0
lsp 701,":a;chara\queenfairy_st01.bmp",160,0:print 10,500
>The Vampire opens the door, letting the two Queens through.@
>They look tired, but otherwise uninjured.\
name "Queen Elf"
>It has been a while, Monster Lord.@
>I hope your travels have treated you well...\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\queenelf_st01.bmp",160,0:print 10,500
name "Alice"
>...There's no need for the formal greetings.@
>As a guess, did the forces of Heaven drive you away from your island?\
name ""
name "Queen Elf"
>I'm ashamed to say, but we withdrew before they could attack.@
>The majority of the Elves and Fairies have relocated temporarily to your Castle.\
>The immense enemy forces made me wish to avoid useless sacrifices.@
>Forgive me...\
name ""
lsp 700,":a;chara\alice_st74.bmp",-170,50:print 10,500
name "Alice"
>...There's no need to apologize, withdrawing was the correct course of action.@
>The Elves and Fairies may stay in the Castle for a while.\
name ""
name "Queen Elf"
>Thank you dearly...@
>I also have a report about the enemy's movements.\
>Humans that were captured during assaults have been relocated to our island.@
>They seem to be centralizing their prisoners of war there...\
name ""
lsp 701,":a;chara\tamamo_st01.bmp",-160,0
lsp 700,":a;chara\queenelf_st01.bmp",160,0:print 10,500
>Tamamo's ears suddenly perk up at that.\
name "Tamamo"
>...I couldn't help but hear that.@
>I believe there's a place there called the Drain Laboratory.\
>It's a facility built under the ground on that island, where they drain men's semen...@
>There were some records about it on the discs.\
name ""
name "Queen Elf"
>There was something like that under the ground of our island!?@
>I'm ashamed I knew nothing of it!\
name ""
name "Tamamo"
>It's no wonder you didn't notice.@
>It's isolated by a special barrier, and detecting it would be very difficult.\
>According to the records, men have been brought there for decades.@
>I'm sure most of the men caught during the attacks have been taken there, as well...\
name ""
name "Luka"
>They're treating humans like lab animals!?@
>We have to go and rescue them!\
name ""
name "Tamamo"
>Don't get so impatient, we'll start again tomorrow.@
>You need to rest for the remainder of today.\
name ""
if %ivent05<2 goto *sean0382_07
name "Tamamo"
>...Monster Lord, is something wrong?\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\tamamo_st01.bmp",160,0:print 10,500
name "Alice"
>Building a lab secretly underneath the island where the Elves and Fairies live...@
>Why would they choose there to begin with?\
name ""
name "Tamamo"
>The land is a sacred place, where many nature spirits dwell.@
>I'm sure the soil under the ground is pulsing with energy, too.\
name ""
name "Alice"
>A land rich with spirits...?\
name ""
name "Tamamo"
>Yes, that's right.\
name ""
goto *sean0382_06



*sean0382_06

name "Alice"
>...Luka.@
>Do you remember in the Forest of Spirits, that fight with the Chimeric Monster?\
name ""
name "Luka"
>Ah... Yeah, it must have been one of Promestein's creations.\
name ""
>That was our first encounter with a Chimeric Monster.@
>I never thought I'd end up fighting against so many of them...\
lsp 700,":a;chara\alice_st73.bmp",-170,50:print 10,500
name "Alice"
>That thing was wandering around the forest...@
>Do you think it was because there may have been some sort of lab located there?\
name ""
name "Luka"
>Now that you mention it...\
name ""
>A forest where there was a spirit...@
>It would be a good location for researching things, wouldn't it?\
name "Tamamo"
>Hmm... I see.@
>It would be good to check it out, but I'm quite busy decoding these discs.\
>...Hey, Nanabi!\
name ""
dwave 1,"se\escape.ogg"
lsp 700,":a;chara\tamamo_st01.bmp",-180,0
lsp 701,":a;chara\nanabi_st01.bmp",220,0:print 10,500
name "Nanabi"
>Yes...!\
name ""
lsp 701,":a;chara\nanabi_st11.bmp",220,0:print 10,500
>Nanabi pops out, immediately responding to Tamamo's call.\
name "Tamamo"
>Nanabi, can you search for anything on the same wavelength as the seal on the Monster Lord around the Forest of Spirits?\
name ""
name "Nanabi"
>The Forest of Spirits?@> One moment...\
dwave 1,"se\power.ogg"
>..............\
>It's faint, but I can sense a similar power around there.@
>I'm sure you would find something if you searched directly.\
name ""
name "Luka"
>That's where the device is that's sealing Alice!?@
>Alright, let's go right now Alice!\
name ""
csp 701
lsp 700,":a;chara\tamamo_st03.bmp",0,0:print 10,500
name "Tamamo"
>Didn't you hear us say to wait until tomorrow, you idiot!?\
name ""
name "Luka"
>S...Sorry...\
name ""
>She got angry...\
csp 700:print 10,500
>It's true we're both tired today, perhaps waiting until tomorrow would be best.\
if %ivent14=0 skip 2
>Rescue the captives underground in the Drain Laboratory...@
>Destroy the device sealing Alice near the Forest of Spirits...\
>And copy the data about the seal Ilias used at the Sealed Sinner's Prison to a disc.\
>There is quite a lot to do tomorrow...\
goto *sean0382_07



*sean0382_07

csp 701
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Luka, you should rest tonight in the guest room.@
>Please show him the way, Vampire.\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\vampire_st01.bmp",335,0:print 10,500
name "Vampire"
>Understood, please follow me...@
>Shall I carry your luggage?\
name ""
name "Luka"
>No, that's alright...\
name ""
>I follow the overly polite Vampire to the guest room.@
>I decide to rest right away.\
bgmstop
sean_change "bg195"
bgm "bgm\hutuu1.ogg"
name "Luka"
>Whew...\
name ""
>I set down my dinner, feeling ready to rest for the night.@
>This is the same Castle where Heroes would storm in, trying to attack the Monster Lord...\
>Now I'm sitting here as an invited guest.@
>What a strange turn of events...\
dwave 1,"se\knock.ogg"
>As I sit in thought, a knock suddenly sounds at the door.\
bgm "bgm\alice1.ogg"
dwave 1,"se\door2.ogg"
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>I'm coming in, Luka...\
name ""
name "Luka"
>Ah...@>What's wrong Alice?\
name ""
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>Hmm... I'm a little hungry.\
name ""
name "Luka"
>Oi, you can't be...@
>I'm supposed to be resting!\
name ""
lsp 700,":a;chara\alice_st72.bmp",0,50:print 10,500
name "Alice"
>The cause of your damage is that holy energy eating into your flesh and blood.@
>I heard from Micaela that there's no problems at all with your physical energy...\
name ""
name "Luka"
>N...No way...\
name ""
r@k@\
goto *sean0383



*sean0383

name "Alice"
>But a bigger problem is whether this body of mine can still excite you...\
name ""
name "Luka"
>W...Wait...\
name ""
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
lsp 700,":a;chara\alice_H10_1.bmp",0,0:print 10,500
>Alice's tail slowly coils around my body.@
>The tightness is a little less than normal, but...\
name "Luka"
>Ah...\
name ""
>But the comfortable feeling of being wound up by her is the same as usual.@
>I quickly relax in her coil.\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice10_01.ogg"
>It seems as though I can still use magic to weaken men I coil around with this body.
>And...\
name ""
dwavestop 0
>Alice's gaze moves downward.@
>My penis is already slowly getting erect in her coil.\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice10_02.ogg"
>Hehe... Your penis is already getting big, I see.
>Even with this body of mine, it doesn't look like you can suppress your lust...\
name ""
dwavestop 0
>Laughing and grinning, Alice reaches toward her own vagina.@
>And using her fingers, spreads open a tiny hole.\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice10_03.ogg"
>Hoora, what do you think about this tiny pussy?
>It's surely small, and tight...\
name ""
dwavestop 0
name "Luka"
>T...That's...\
name ""
>Even though I'm acting hesitant, I can't take my eyes off her vagina.@
>It's bright pink, and so small...\
>Even if my thing isn't that huge, I'm still worried about being inside something that tiny.\
name "Luka"
>Let's stop, Alice.@
>Not with that small body...\
name ""
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice10_04.ogg"
>We won't know if we don't try.
>It may be surprisingly good...\
if %con_hvoice=0 dwave 0,"voice\alice10_05.ogg"
>Hehe... In truth, you're looking forward to it, right?
>Just what would this tiny pussy feel like?\
name ""
dwavestop 0
>Alice pushes her waist against mine with a fearless laugh.@
>The tip of my erect penis is barely touching the entrance to her tiny hole.\
>But she stops just a hair away from me actually going inside her.\
name "Luka"
>Ah...\
name ""
>Her hot, tiny vaginal opening...@
>The bright pink flesh is just barely brushing against my tip.\
>Just the slight touch of her wetness is enough to make me want more.\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice10_06.ogg"
>Then, here we go...
>I'll ravish you with this tiny pussy...\
name ""
dwavestop 0
lsp 700,":a;chara\alice_H10_2.bmp",0,0:print 10,500
>With that, Alice presses against me, forcing my penis into her in one push.\
name "Luka"
>Ahhh!\
name ""
mov %hseanwave,2:hseanwave
>The tip of my penis pushes apart her small entrance, forcibly opening her as I'm brought deep inside.\
>The intense tightness inside her makes it feel like her vagina is holding me in a firm grip, intense pressure attacking my penis from every side.\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice10_07.ogg"
>Hehe... Well? How does my tiny pussy feel?
>Judging by your unsightly face, it's quite good...\
name ""
dwavestop 0
name "Luka"
>Ahh... You're so tight...\
name ""
>I'm overwhelmed by how tight she is.\
>The pressure is far different than when I was in Alice before.@
>Her vaginal walls feel a little stiffer, the folds more rigid.\
>Those folds rub hard against my glans inside her, the unique tightness something I've never felt before.\
name "Luka"
>Ahhh!@>I'm going to come...\
name ""
>The numb feeling of a rising orgasm starts to bubble up from my lower body.\
>Feeling Alice's folds rub against my penis inside her tight vagina is getting to be too much to take.@
>The surprising stimulation inside her so quickly brought me to a climax...\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice10_08.ogg"
>Nnn...? Are you possibly already surrendering?\
name ""
dwavestop 0
name "Luka"
>Ahhh...\
name ""
gosub *syasei1
lsp 700,":a;chara\alice_H10_3.bmp",0,0
gosub *syasei2
>My penis pulses inside her tiny vagina, spurting out semen inside Alice.\
name "Luka"
>Ahhh...\
name ""
>My body goes limp as I come inside her tight insides, the weakness from it washing over me in a blissful wave.\
lsp 700,":a;chara\alice_H10_4.bmp",0,0:print 10,500
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice10_09.ogg"
>Why... So even my tiny pussy will finish you off in an instant.
>Such a shameful penis... Hehe.\
name ""
dwavestop 0
>A wide smile of superiority crosses Alice's face as I come inside her.\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice10_10.ogg"
>I'm not satisfied at all with that.
lsp 700,":a;chara\alice_H10_5.bmp",0,0:print 10,500
>Hoora, I'm going to torment you some more!\
name ""
dwavestop 0
name "Luka"
>W...Wait...!@
>Ahh!\
name ""
mov %hseanwave,8:hseanwave
>Alice starts to slightly wiggle her waist, with my penis still firmly locked inside her.@
>My penis rubs against her soft vaginal walls with each small movement she makes.\
>As she moves, she slowly pulls her waist back, pulling me out of her.@
>Then pushing back forward, she brings me back into her tight insides.\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice10_11.ogg"
>Horehore... How about this?\
name ""
dwavestop 0
>Alice shakes her waist quickly to the right and left, causing her firm folds to rub against my glans.\
>Even though I just ejaculated, the desire to release again slowly builds.@
>After a while, my own waist is shaking back and forth as the orgasm nears.\
name "Luka"
>Ahh... I'm going to come again...\
name ""
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice10_12.ogg"
>What, already complaining?
>Well then, go ahead and come inside me!\
name ""
dwavestop 0
>Clenching with all her strength, Alice squeezes down hard with her tiny vagina!@
>In response, I cry out and instantly lose all resistance against the rising climax.\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice_H10_6.bmp",0,0
gosub *syasei2
>I explode inside her, completely giving in to her finishing blow.@
>My penis pulses as I spurt shot after shot of semen into her tiny body.\
name "Luka"
>Ahhh...\
name ""
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice10_13.ogg"
>Sheesh, already exhausted?\
if %con_hvoice=0 dwave 0,"voice\alice10_14.ogg"
>To not even be a match for my tiny pussy...
>You really are miserable.\
name ""
dwavestop 0
lsp 700,":a;chara\alice_H10_7.bmp",0,0:print 10,500
>Alice looks me in the eyes as she teases me, and starts moving her waist again.@
>Unlike her aggressive movements from before, the gentle movements are more seductive.\
name "Luka"
>Ahh!\
name ""
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice10_15.ogg"
>Hehehe... I've figured out the skill of tightening it.
>Hoora... I'll use my tiny pussy to squeeze it out from your roots!\
name ""
dwavestop 0
>Her soft flesh suddenly contracts even more than before, pressing down on my penis to an extreme amount.\
>Unlike her piston movements from before, she's using this incredible squeezing technique to just toy with me.\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice10_16.ogg"
>Horehore, I'll sloooowly move my insides.
>If I do that, you won't stand a chance, will you?\
name ""
dwavestop 0
name "Luka"
>Hyaa!\
name ""
>Still squeezing me to the maximum, her vaginal walls suddenly start to move.@
>Squirming around like they had a life of their own, her soft flesh massages my penis from root to tip.\
>Overcome by the pleasure, I stop trying any sort of resistance.@
>Relaxing my body, I entrust myself to the ecstasy flowing through me.\
name "Luka"
>Haa... That feels so good...\
name ""
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice10_17.ogg"
>Hehehe... It looks like your penis can't beat my tiny pussy.\
if %con_hvoice=0 dwave 0,"voice\alice10_18.ogg"
>Hoore, I'm going to finish you all at once.
>Now offer up your semen to my pussy!\
name ""
dwavestop 0
>Alice tenses her insides, squeezing down on just the tip of my penis.@
>The teasing stimulation sends me over the edge all at once.\
name "Luka"
>Ah... Ah...!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice_H10_8.bmp",0,0
gosub *syasei2
>And in the next moment, I explode inside her again.@
>Alice is completely in control of my orgasms...\
lsp 700,":a;chara\alice_H10_9.bmp",0,0:print 10,500
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice10_19.ogg"
>Hehe... It seems like you enjoy the taste of my tiny pussy.
>Are you that happy at being able to be squeezed in here?\
name ""
dwavestop 0
>As Alice teases me with her words, she squeezes and loosens her vagina, as if playing with my penis.@
>Reacting to the stimulation, my waist shakes and twitches with each rhythmic squeeze.\
name "Luka"
>Ahh...@
>That's... Enough...\
name ""
>Left incredibly weak after my repeated ejaculations, I beg Alice to stop.@
>But she isn't choosing to listen to me.\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice10_20.ogg"
>Hoore, your favorite is when your tip is squeezed, isn't it?
>Like this... Hehe.\
name ""
dwavestop 0
name "Luka"
>Ah... Ahh!\
name ""
>Deep inside of her tiny vagina, she squeezes down on just my tip...@
>And if she squeezes down on my sensitive tip like that, I can't stop myself...!\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice_H10_8.bmp",0,0
gosub *syasei2
>Unable to stop it, I helplessly reach another orgasm.@
>My penis twitches inside her, squirting more semen into her narrow vagina.\
lsp 700,":a;chara\alice_H10_9.bmp",0,0:print 10,500
name "Luka"
>Ah... Uh...\
name ""
>Having been squeezed dry, I feel on the verge of passing out in her coil.\
mov %hseanwave,0:hseanwave
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice10_21.ogg"
>Sheesh... Going down here is pathetic.
>Well, my belly did get a little filled...\
name ""
dwavestop 0
name "Luka"
>Ah...a...\
name ""
>Seeing Alice's satisfied look, I slowly drift into sleep in her coil.\
gosub *anten
>..............\
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_alice10,1
bgmstop
sean_change "bg199"
name ""
r@k@\
bgm "bgm\stein.ogg"
lsp 700,":a;chara\laplace_st21.bmp",-170,0
lsp 701,":a;chara\shirom_st51.bmp",160,0:print 10,500
name "Laplace"
>La Croix...@>Are you satisfied with the meaning of your existence?\
name ""
name "La Croix"
>I've never made a judgement one way or the other.@
>The definition of existence itself is unclear, anyway.\
name ""
name "Laplace"
>..........\
name ""
name "La Croix"
>...Is your AI malfunctioning?@
>That question is an odd one for your logical ways.\
name ""
name "Laplace"
>It's true something may be off.@
>I have been witness to a great many illogical things recently.\
name ""
name "La Croix"
>Machine technology is not my area of speciality, but I heard your AI was very close to human thought patterns.\
>It would be logical to assume that illogical thoughts would appear sooner or later.\
name ""
name "Laplace"
>Why did Promestein give me the freedom to think freely?@
>An autonomous machine would be just as capable for simply harvesting semen from many men.\
name ""
name "La Croix"
>Are you complaining that you aren't autonomous?\
name ""
name "Laplace"
>...I've been thinking of pointless things.@
>Anything outside of my mission is a hindrance.\
name ""
name "La Croix"
>...Right.@
>It would be overkill to grant intelligent thought to something designed merely to process semen.\
name ""
name "Laplace"
>Why was I given human thought patterns if I was to process humans?@
>Recently, that is what I have been thinking about.\
>When I asked Promestein, she gave me no answer.\
name ""
name "La Croix"
>Promestein... Has a deep passion for humans, for some reason.\
>I thought she simply viewed them as research subjects at first, but now I'm not so sure.\
>In the ancient times, she rebelled against Ilias and gave knowledge to humans.@
>That is why she was confined as a grave criminal.\
name ""
name "Laplace"
>Then why give me human thoughts?\
name ""
name "La Croix"
>Maybe she wanted to produce something similar to a human, to get to know them better?\
name ""
name "Laplace"
>.............\
name ""
name "La Croix"
>Whatever it is, don't think too deeply about it.@
>Promestein must have her own reasons.\
>I'm too busy with my own arts to worry about someone else's.@
>It's the same for you, and Lucia...\
name ""
name "Laplace"
>...Is Lucia satisfied with her own existence?@
>Though she was originally human, she is now something different.\
>But will she still think as a human does?@
>And will those of her birthplace still know her as a human?\
name ""
name "La Croix"
>...I don't care about things like that.\
name ""
name "Laplace"
>You seem to be afraid of losing something, too.@
>Little by little, you are losing the feelings and emotions peculiar to monsters and humans alike...\
name ""
name "La Croix"
>...That doesn't have anything to do with you.\
>But, I am afraid of something...@
>The thought of me not being myself any longer.\
name ""
name "Laplace"
>You not being yourself any longer?@
>Just what is that "self"?\
name ""
name "La Croix"
>Psh...@> Why am I talking philosophy with a machine that has no soul?\
>...Return to your duty, Laplace.\
>If your work is delayed by talking about pointless things, you'll be scolded.\
name ""
name "Laplace"
>I am carrying out the processing in parallel to this conversation.@
>While we have been speaking, I have extracted sixteen liters of semen.\
name ""
name "La Croix"
>I see...@> My concern was unnecessary then.@
>Well then, I'm going to return to my laboratory.\
name ""
name "Laplace"
>I shall return to my normal work as well...\
name ""
dwave 1,"se\escape.ogg"
cspl 700,701:print 10,500
>Thus, the two of them disappear from the area...\
lsp 700,":a;chara\cupid_st11.bmp",800,0
for %move=0 to 450 step 10
amsp 700,800-%move,0
print 1:wait 20
next
lsp 700,":a;chara\cupid_st11.bmp",0,0:print 10,500
name "Cupid"
>That was kind of difficult to follow...@
>I wonder if Master Eden will know what they were talking about?\
name ""
bgmstop
sean_change "bg047"
bgm "bgm\tamamo.ogg"
lsp 700,":a;chara\tamamo_st04.bmp",0,0:print 10,500
name "Tamamo"
>You seem to have enjoyed your evening last night. \
name ""
name "Luka"
>............\
name ""
>I feel refreshed after sleeping all through the night last night.\
lsp 700,":a;chara\alice_st79.bmp",-170,50
lsp 701,":a;chara\tamamo_st04.bmp",160,0:print 10,500
name "Alice"
>Yes, I feel great!\
name ""
>As expected, she's in great spirits after last night...\
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\tamamo_st01.bmp",160,0:print 10,500
bgm "bgm\epilogue2.ogg"
name "Tamamo"
>Now then, Luka...@>You need to know what to do in the Sealed Sinner's Prison.@
>I've taught the method of recording data to the discs to the Monster Lord already.\
>Since it's very likely that they will try to interfere, you must confront them.@
lsp 701,":a;chara\tamamo_st03.bmp",160,0:print 10,500
>I wish I could go too, but I've been working round the clock on decoding these, and I fear I'd be no good in a fight.\
name ""
name "Luka"
>It's alright, leave it to us.\
name ""
name "Alice"
>Hmph.@>Old people should stay indoors, anyway.\
name ""
if %ivent14=0 && %ivent05<2 goto *sean0383e
if %ivent14=1 && %ivent05<2 goto *sean0383a
if %ivent14=0 && %ivent05=2 goto *sean0383b
if %ivent14=1 && %ivent05=2 goto *sean0383c



*sean0383a

>A big job is waiting for us in the Sealed Sinner's Prison.@
>But there's somewhere else I want to go, too...\
>To the Drain Lab, to rescue those prisoners.\
goto *sean0383d



*sean0383b

>A big job is waiting for us in the Sealed Sinner's Prison.@
>But there's somewhere else I want to go, too...\
>To the Forest of Spirits, to destroy that sealing device.\
goto *sean0383d



*sean0383c

>A big job is waiting for us in the Sealed Sinner's Prison.@
>But there's somewhere else I want to go, too...\
>To the Drain Lab, to rescue those prisoners, and to destroy that sealing device in the Forest of Spirits.\
goto *sean0383d



*sean0383d

csp 701
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>I've already shown Galda where everything is located at.@> Just ask her, and she'll take you.\
>Also, if you find any prisoners taken captive, she'll take them somewhere safe.\
name ""
name "Luka"
>You're giving quite the support...\
name ""
name "Tamamo"
>Humans and monsters must cooperate, no matter how small it is.@
>If monsters are seen freeing captive humans, it will go a long way towards building a united front here.\
>It's all in self-interest, so there's no need for thanks.\
name ""
name "Luka"
>But still...@> Thank you, Tamamo.\
name ""
goto *sean0383e



*sean0383e

name "Luka"
>...By the way, where are the other Four Heavenly Knights?\
name ""
name "Tamamo"
>I sent Alma Elma and Erubetie on a little errand.@
>Something that those small fish could be useful for...\
>Granberia is still resting.@
>She was trying to go out fighting with those horrible wounds, so I put her to sleep with magic.\
name ""
name "Luka"
>I see...@> How long until she recovers?\
name ""
name "Tamamo"
>I expected it to take five days, but she's healing faster than I thought.@
>She should be completely recovered by tomorrow.\
name ""
name "Luka"
>That's encouraging.\
name ""
csp 700:print 10,500
>There's a good chance we'll be able to fight alongside Granberia, then.@
>Since I know how powerful she is first hand, that would be very reassuring.\
name "Luka"
>Alright, we have things we need to get done!@
>Let's go!\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>We'll be back before night, so make sure dinner is ready.\
name ""
csp 700:print 10,500
>Thus, we take off away from the Castle.@
>For our first destination...\
r@k@\
mov %gloval1_story_sinkou,18:gosub *savegloval1
bgm "bgm\field4.ogg"
goto *map13



*sean0384

sean_change "bg140"
gosub *setwindow_01p
name "Luka"
>Alright, let's go to the Drain Lab!@
>We need to help out those captured people!\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Yes... As the Monster Lord, I'll do everything I can to assist as well.\
name ""
csp 700:print 10,500
>Underneath Fairy's Island...@
>A horrible facility used to process semen.\
>Those captured in the worldwide assault have all been taken there as prisoners.@
>We have to get there and rescue them!\
dwave 1,"se\habataki.ogg"
bgmstop
sean_change "bg135"
bgm "bgm\seireinomori.ogg"
>Galda lands in the northeast forest on the island, where Tamamo indicated.\
name "Luka"
>This looks good, Galda.\
name ""
lsp 700,":a;chara\galda_st02.bmp",0,0:print 10,500
name "Galda"
>Kweeh!\
name ""
dwave 1,"se\habataki.ogg"
csp 700:print 10,500
>After setting us down, Galda flies away with a powerful flap of her wings.@
>Now... I wonder where the entrance is?\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Luka, is this hatch the entrance?\
name ""
name "Luka"
>Yes... It looks similar to the hatch that led to Promestein's other laboratory.\
name ""
>Sitting in the shade of a tree, is a hatch identical to the one we found in Remina.\
name "Luka"
>But it's locked, isn't it?@
>I doubt it will be open...\
name ""
>I try pulling on it, but it's locked.\
name "Alice"
>Of course it will open, Luka.@
lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
>...Hah!\
name ""
dwave 1,"se\break3.ogg"
>Alice slams her fist into the hatch, smashing it open!\
name "Luka"
>Oi, oi...@>So much for getting in undetected!\
name ""
lsp 700,":a;chara\alice_st72.bmp",0,50:print 10,500
name "Alice"
>If we're going to invade, we do it head on from the front!@
>Besides, it's not your style to be sneaky.\
name ""
name "Luka"
>That may be true.@
>But we can still do things a little more...@>Gently, can't we?\
name ""
csp 700:print 10,500
>With a grumble, I jump into the hatch.\
dwave 1,"se\lift.ogg"
sean_change "bg196"
bgm "bgm\labo2.ogg"
>Inside the hatch is a lift, which we ride deep underground.@
>The atmosphere here is very similar to the Lab in Remina.\
name "Luka"
>The prisoners should be here...\
name ""
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>According to Queen Elf, she's witnessed at least one hundred being brought to the island.@
>It would be highly difficult to walk each of them out undetected, of course...\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
>So we should rampage as loud as possible, and take advantage of the confusion.\
name ""
name "Luka"
>Ah...@>So that's why you broke the hatch like a crazy girl?\
name ""
lsp 700,":a;chara\alice_st72.bmp",0,50:print 10,500
name "Alice"
>Did you think I smashed it without thinking?@
>There are too many prisoners to rescue, anything covert isn't going to work.\
name ""
>Alice pulls out a map from her breast pocket.\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Tamamo also found a map on one of the discs.@
>There seem to be two huge housing units in this facility.\
name ""
name "Luka"
>We'll have to check both, then.@
>We have to rescue as many as possible...\
name ""
name "Alice"
>Well then, let's head to the closest one first.@
>If we just go straight down this passage...\
name ""
csp 700:print 10,500
>We're inside the enemy base, so we can't be too careful now.@
>Alice and I slowly advance, wary of any incoming attack.\
dwave 1,"se\asioto3.ogg"
sean_change "bg197"
>Without meeting any guards, we make it to the first large room.@
>Machinery lines the walls of the huge, dome shaped room.\
name "Luka"
>This thing looks wrong...\
name ""
lsp 700,":a;chara\drainplant_st21.bmp",200,0:print 10,500
>In the center of the room, a strange oval is sitting, with a woman's body and angel wings on top.@
>Something seems to be soaking in the fluids inside the oval...\
bgm "bgm\kiki2.ogg"
name "Luka"
>No... It's a living human!@
>Isn't this thing a... An angel!?\
name ""
>It looks like an angel that has been remodeled into some weird kind of equipment...@
>Men are forced inside the oval, and processed...\
csp 700:print 10,500
name "Luka"
>This is horrible...@
>There are more than fifty of these!\
name ""
>I won't forgive this sort of inhumane act!@
>Does Promestein think humans are not worth anything at all!?\
lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
name "Alice"
>Destroy every one of them, and rescue the humans inside!\
name ""
name "Luka"
>Yes!\
name ""
csp 700:print 10,500
>I pull out my sword, ready to break open one of the human processing plants...@
>When one with nobody inside blocks my path!\
r@k@\
goto *drainplant_start



*sean0385

bgm "bgm\labo2.ogg"
name ""
r@k@\
name "Luka"
>Whew... Got her.\
name ""
lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
name "Alice"
>It doesn't look like they can move when they're harvesting semen.\
>Let's destroy them all, and free those inside!\
name ""
name "Luka"
>Yeah!\
name ""
csp 700:print 10,500
dwave 1,"se\slash3.ogg"
>Alice and I break open the Drain Plants one by one, rescuing the men inside.\
>After destroying them all, the room is filled with the rescued men.\
lsp 700,":a;chara\mob_seinen1.bmp",-170,0
lsp 701,":a;chara\mob_ozisan2.bmp",170,0:print 10,500
name "Boy"
>T...Thank you...@
>But where's my brother?@>I don't see him...\
name ""
name "Man"
>My son...@>Where's my son?\
name ""
cspl 700,701:print 10,500
>That reminds me of what that Drain Plant said...@
>This is where those with high quality semen are processed.\
>Then that means those with lower quality...\
name "Luka"
>They must be in the other room.\
name ""
>And she said that they would be disposed of...@
>They must be going through some inhumane treatment right now.\
>I want to rush over to the other room right away, but I can't just abandon these people.\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Luka"
>Alice... Can you escort these people above ground?@
>I'll head toward the other room.\
name ""
name "Alice"
>Splitting up behind enemy lines?@
>But I can't deny that we have to hurry and rescue them...\
>Don't do something reckless, Luka.@
>Once I get these people to safety, I'll rush back over.\
name ""
name "Luka"
>Yes... Be careful yourself.\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,500
>Thus, we split into two groups.\
>As Alice heads up with the rescued prisoners, I head toward the second room...\
dwave 1,"se\asioto3.ogg"
sean_change "bg199"
name "Luka"
>Is this it!?\
name ""
>Without running into a guard, I reach the second room.@
>Rather than more Drain Plants, I find...\
r@k@\
goto *drainloid_start



*sean0386

bgm "bgm\labo2.ogg"
name ""
r@k@\
name "Luka"
>Alright, she's down...\
name ""
>I managed to beat her...@> Now to get these men out of here.\
lsp 700,":a;chara\mob_seinen1.bmp",-170,0
lsp 701,":a;chara\mob_syounen.bmp",170,0:print 10,500
name "Boy"
>Thank you...@> A little more, and I would have been dead!\
name ""
name "Young Boy"
>Thank you, Mr. Hero!\
name ""
name "Luka"
>It isn't time to relax yet, we have to get you all out of here!\
name ""
cspl 700,701:print 10,500
>When I try to lead them out of the room...\
bgm "bgm\kiki2.ogg"
name "???"
>I can't just let you do as you please...@
>Their semen is a precious strategic resources.\
name ""
name "Luka"
>Who is it!?\
name ""
>It sounds like her voice is coming from some sort of speaker...@
>I don't think she's actually nearby.\
name "Laplace"
>I am Laplace, the one in charge of this Drain Lab.@
>I cannot let you go...\
name ""
>Suddenly, a nearby door opens...@
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\replicant_st01.bmp",0,0:print 10,500
>A strange monster walks into the room!\
name "Luka"
>Who's that!?\
name ""
>She doesn't feel like a Chimeric monster, at least.@
>I'm not getting the same feeling from her as from the others...\
>But she doesn't look like a normal monster, either.@
>Of course she isn't an angel.@>Just what is she?\
name ""
lsp 700,":a;chara\mob_seinen1.bmp",-170,0
lsp 701,":a;chara\mob_syounen.bmp",170,0:print 10,500
name "Boy"
>Hya!@> Help!\
name ""
name "Young Boy"
>Wh...What are we going to do, Mr. Hero?\
name ""
name "Luka"
>Guh...!\
name ""
csp 701
lsp 700,":a;chara\replicant_st01.bmp",0,0:print 10,500
>It's too much of a disadvantage to protect the prisoners while fighting an unknown enemy...\
>Should we try to make a break for it, then?@
>But can I protect them all as they run...?\
dwave 1,"se\escape.ogg"
lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
name "Alice"
>...Are you alright, Luka!?\
name ""
>Alice breaks into the room with almost perfect timing.\
name "Luka"
>Alice, good timing!@
>Can you get these people above ground!?\
name ""
name "Alice"
>Got it, but...@
lsp 700,":a;chara\alice_st73.bmp",-170,50
lsp 701,":a;chara\replicant_st01.bmp",160,0:print 10,500
>...What the heck is that?\
name ""
>Alice looks at the strange monster.\
name "Luka"
>It must be some sort of new monster Promestein created...\
name ""
name "Alice"
>No...@>She's a human female.\
name ""
name "Luka"
>W...What!?@
>How could a human female be morphed into that sort of monster!?\
name ""
name "Alice"
>...No, that's not it either.@
>Even though she looks like that, she's a complete human being.\
name ""
name "Luka"
>But... Human?@>Just look at her, there's no way...\
name ""
name "Alice"
>I don't believe my eyes, either.@
>But her genes are more than 99.99% human!\
>There's no doubt, she's fully human!\
name ""
name "Luka"
>T...That's impossible!\
name ""
>She looks even stranger than a normal monster...@> How did a humans appearance change into that?@
>But this isn't the time to be upset!\
name "Luka"
>I'll deal with her, Alice!@
>Get the rest of these people out of here!\
name ""
name "Alice"
>Yes, got it!@> Everyone, follow me!\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,500
>Alice yells at the men, and guides them back out of the room.\
csp 701
lsp 700,":a;chara\replicant_st01.bmp",0,0:print 10,500
>The strange female stands before me, eyeing me...\
r@k@\
goto *replicant_start



*sean0387

bgm "bgm\boss0.ogg"
name ""
r@k@\
name "Luka"
>Haa... Haa...\
name ""
>I managed to beat her...@
>I don't even want to imagine a world where they fill the earth.\
name "Laplace"
>Oh my, did you defeat the Replicant?@
>The only thing that can make a previous generation human strong is the intermingling of angel blood, isn't it?\
name ""
name "Luka"
>Are you going to send out more subordinates?@
>Get out here yourself!\
name ""
name "Laplace"
>...That was my intention all along.@
>I'll face you myself...\
name ""
dwave 1,"se\lift.ogg"
>The floor opens up, and a strange pedestal-like device appears...@
lsp 700,":a;chara\laplace_st21.bmp",0,0:print 10,500
>A girl emerges from the center of it.\
lsp 700,":a;chara\laplace_st11.bmp",0,0:print 10,500
>At the same time, pipes and cords coming from the wall are going into her body...@
lsp 700,":a;chara\laplace_st01.bmp",0,0:print 10,500
>Strange semen processing equipment extends from extra arms coming from her body, lining the walls...\
r@k@\
goto *laplace_start



*sean0388

bgm "bgm\kiki2.ogg"
name ""
r@k@\
name "Luka"
>...Answer something for me.@
>Why did you let me get so far?\
>If you yourself are the Drain Lab, surely you noticed us intruding.@
>Why did you let us pass so easily?@> And fight me directly?\
name ""
name "Laplace"
>...Unknown.@
>I cannot explain my reasoning.\
name ""
name "Luka"
>...........\
name ""
name "Laplace"
>Hero Luka, answer my question now.@
>If I was human...@>Could I live with other humans?\
name ""
name "Luka"
>If you were human...?@
>That's not the right question, Laplace.\
>It doesn't matter if you're human or not.@
>If you want to live peacefully together, then all you have to do is do it!\
name ""
bgm "bgm\hutuu2.ogg"
name "Laplace"
>..........\
>This battle was worth it, just to hear those words.\
>...Luka, escape from this facility right now.@
>This Drain Lab will be destroyed in five minutes.\
name ""
name "Luka"
>Destroyed!?@>Y...You can't!\
name ""
name "Laplace"
>This is a secret lab, it must be done.\
>There is no stopping Promestein's self destruct sequence.@
>If this lab were to fall into enemy hands, too much important information would be compromised, after all.\
name ""
name "Luka"
>But to exchange your own life for it!?\
name ""
name "Laplace"
>I am the AI of this Drain Laboratory.@
>I didn't have a life to begin with.\
>As you have the power of an angel in you, you should already know that.@
>I am a mere program.\
name ""
name "Luka"
>B...But...\
name ""
name "Laplace"
>I've set the destruction to five minutes from now.@
>You should be able to escape before then.\
name ""
name "Luka"
>Even if you're a machine, I can't leave you!@
>Even you really want to live together in peace!\
>Uwa!\
name ""
>Suddenly, a huge arm wraps around my body!\
name "Laplace"
>Since you won't listen to me, I am forced to forcibly eject you.\
>Due to your strange desire to assist me after I have surrendered, you wasted too much time.\
name ""
name "Luka"
>G...Get off!@> I'm not...\
name ""
dwave 1,"se\lift.ogg"
>Before I'm able to break free of her grip, Laplace manages to throw me into a nearby air duct, the suction pulling me upwards...\
name "Laplace"
>............\
name ""
csp 700
bg "bg\bg186.bmp",99,2000,"system\lngtwave.dll/vwi"
lsp 700,":a;chara\stein_st01r.bmp",-180,0
lsp 701,":a;chara\laplace_st21.bmp",160,0:print 10,500
name "Promestein"
>One of your primary objectives is to protect confidential information.\
>If control of the Drain Lab is ever uncertain, detonate the facility immediately.\
name ""
name "Laplace"
>Understood.@>If control is ever about to be lost, destruction will be immediate.\
name ""
cspl 700,701
bg "bg\bg199.bmp",99,2000,"system\lngtwave.dll/vwi"
lsp 700,":a;chara\laplace_st01.bmp",0,0:print 10,500
name "Laplace"
>..............\
name ""
>Laplace recalls her words.\
>"I've set the destruction to five minutes from now.@
>You should be able to escape before then."\
name "Laplace"
>...I was able to disobey an order.@
>This...\
name ""
wait 500
bgmstop
dwave 2,"se\bom3.ogg"
csp 700
lsp 2,":c;system\ef_white.jpg",0,0:print 10,500
quake 10,2000
csp 2
bg "bg\bg135.bmp",10,1500
name "Luka"
>Uwa!\
name ""
>Right after being ejected from the duct onto the surface, I feel a powerful rumbling come from under my feet.@
>The Drain Lab must have just been destroyed...\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
bgm "bgm\epilogue2.ogg"
name "Alice"
>...It seems like you're all finished.\
name ""
name "Luka"
>...Yes, the Drain Lab is gone.@
>No more prisoners will be brought here...\
>But...\
name ""
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>I saw the exchange.@
>The life of a machine... Seems to have its own type of suffering to it.\
name ""
name "Luka"
>I'm sure she wanted to join everyone, and live in peace...\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>It was a cruel thing, giving her the freedom of thought like that.@
>I don't know what Promestein intended with that...\
name ""
name "Luka"
>...........\
name ""
>Was she just trying to satisfy her own curiosity?@
>Or was there something deeper there...?\
>At any rate, it's clear she wasn't happy with what she was doing.\
name "Alice"
>But we were able to save a large number of prisoners.@
>Be proud, Luka.@>You did everything you could.\
name ""
name "Luka"
>Ah... That's right.\
name ""
>With this, the mission was a success.@
>All the prisoners were rescued, and the prison itself was destroyed.\
>The damage dealt to the enemy was high today...@
>I'll engrave Laplace's end on my heart, too.\
name "Luka"
>...Alright, let's move on!@
>There's a lot more to do...\
name ""
csp 700:print 10,500
>For our next location...\
r@k@\
mov %ivent14,3
mov %gloval1_story_sinkou,18:gosub *savegloval1
bgm "bgm\field4.ogg"
goto *map13



*sean0388x

sean_change "bg140"
gosub *setwindow_01p
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>We've already rescued everyone.@
>There's nothing left there for us to do, right?\
name ""
name "Luka"
>Yeah, you're right...\
name ""
csp 700:print 10,500
>The Lab itself is gone anyway, so there's nothing to visit.@
>Now for our next destination...\
goto *map13



*sean0389

gosub *setwindow_01
bg "BG\bg140.bmp",10,1500
name "Luka"
>Alright, let's look for the device that put that seal on you, Alice!\
name ""
>In a facility near the Forest of Spirits...@
>That's where the device that sealed Alice should be.\
>We fly toward the Forest of Spirits...\
dwave 1,"se\habataki.ogg"
bgmstop
sean_change "bg061"
bgm "bgm\seireinomori.ogg"
>Galda lands in an area in the north of the Forest of Spirits that Tamamo showed her.\
name "Luka"
>So it's here, Galda?\
name ""
lsp 700,":a;chara\galda_st02.bmp",0,0:print 10,500
name "Galda"
>Kweh!\
name ""
dwave 1,"se\habataki.ogg"
csp 700:print 10,500
>With a flap of her wings, Galda flies away.\
>So this is where Nanabi sensed the magic signature?\
name "Luka"
>Is it really here...?\
name ""
>It's just green as far as I can see.@
>There's no sign of anything out of the ordinary.\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>I do smell magic here...@
>But it's too difficult to find the specific location.\
name ""
name "Luka"
>It's got to be underground again, then.@
>But I don't see a hatch...\
name ""
>We look at the base of the nearby trees, but come up empty.\
name "Alice"
>Bah... There's no other choice.@>We'll have to ask her.@
>I feel sick relying on her, but she might know something.\
name ""
name "Luka"
>It doesn't look like there's any other way...@
>So please, come out here already.\
name ""
>There's a shadow watching us from the trees.@
>Alice and I were aware of her right from the start.\
>It's someone we know quite well now...\
name "???"
>.............@
>......Nya!\
name ""
name "Luka"
>We already know you're there, Chrome.\
name ""
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>Are you going to give up and help us!?@> Or do you want to be punished again?\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\chrom_st31.bmp",170,0:print 10,500
name "Chrome"
>...........\
name ""
>Chrome sheepishly comes out from hiding among the trees.\
name "Luka"
>Chrome, what were you doing here...?\
name ""
lsp 701,":a;chara\chrom_st21.bmp",160,0:print 10,500
name "Chrome"
>As you two seem to already know, there's an important facility for the Heavens here...@
>The one in charge of it is my sister.\
name ""
name "Luka"
>La Croix, eh?\
name ""
>The powerful Necromancer with an army of zombies.@
>If she's the one defending it, this is going to be difficult...\
name "Alice"
>You were given technology by Promestein too, weren't you?@
>I think you better tell us everything you know now.\
name ""
lsp 701,":a;chara\chrom_st27.bmp",160,0:print 10,500
name "Chrome"
>As I said before, she just gave me stuff without asking anything in return.@
>I didn't even know who she really was yet.\
>And to think my sister was one of her subordinates...\
name ""
name "Luka"
>.......\
name ""
lsp 701,":a;chara\chrom_st22.bmp",160,0:print 10,500
name "Chrome"
>I knew there was a small facility nearby.@>I thought it was just some sort of communication hub for them...@
>I snuck in there to see if I could find anything interesting.\
>And that's when I found out that it was a Biolab that my sister was managing.@
>It appeared to have facilities to study both living and dead bodies, and some sort of sealing device.\
lsp 701,":a;chara\chrom_st23.bmp",160,0:print 10,500
>That's what you two are looking for, isn't it?\
name ""
name "Alice"
>A sealing device...@>It looks like this is the right place.\
name ""
name "Luka"
>Living bodies...?@>They must have taken prisoners here, too.@
>They don't think anything of human beings, do they?\
name ""
>If we find any prisoners, we have to rescue them.@
>It looks like this will be another big job...\
lsp 701,":a;chara\chrom_st22.bmp",160,0:print 10,500
name "Chrome"
>Now, I think we can make a trade.@
>You two don't know where the Biolab is, do you?\
>But I know where it is, and how to get inside.@
>So in trade...\
name ""
name "Alice"
>You want us to take you to your sister?\
name ""
lsp 701,":a;chara\chrom_st27.bmp",160,0:print 10,500
name "Chrome"
>T...That's right.@
>Don't get me wrong, I'm not powerless myself!\
>But infiltrating that place alone...@> Makes me uneasy...\
name ""
name "Alice"
>So she says...@> What do you think, Luka?\
name ""
name "Luka"
>When you meet your sister... La Croix... What will you do?\
name ""
name "Chrome"
>I'll convince her to stop her treachery, and stop what she's doing.@
lsp 701,":a;chara\chrom_st28.bmp",160,0:print 10,500
>If she won't listen...@> Then by my own hand, I'll...\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50:print 10,500
name "Alice"
>...Can you do it?\
name ""
lsp 701,":a;chara\chrom_st27.bmp",160,0:print 10,500
name "Chrome"
>A practitioner of our family who went off the path...@>A traitor.@
>Those of us in the same profession need to deal with our own.\
>...I've been prepared for it ever since I came here.\
name ""
lsp 700,":a;chara\alice_st74.bmp",-170,50:print 10,500
name "Alice"
>No, I meant are you powerful enough to do it...@
>Well, I don't want to shake you up too bad.\
name ""
lsp 701,":a;chara\chrom_st24.bmp",160,0:print 10,500
name "Chrome"
>How rude...@>I'm plenty strong myself!@
>I'll show you my horrifying power in the next fight!\
name ""
name "Luka"
>We got it, we got it...\
name ""
cspl 700,701:print 10,500
>Chrome doesn't seem to be hostile towards us any longer.@
>I don't think there will be an issue if we take her along.\
name "Luka"
>Alright, then please show us how to get inside.\
name ""
lsp 700,":a;chara\chrom_st21.bmp",0,0:print 10,500
name "Chrome"
>The entrance to the Biolab is right in front of you!@
>Though you can't see it...\
>Spi!@> Rit!@>Open it up!\
name ""
lsp 702,":a;chara\chrom_st21.bmp",0,0
lsp 700,":a;chara\chromg_st02.bmp",-250,0
lsp 701,":a;chara\chromg_st11.bmp",230,40:print 10,500
name "Spi"
>Ahaha, got it!\
name ""
name "Rit"
>Alright, here we go...\
name ""
>Chrome and her two ghosts make a strange hand gesture together...\
cspl 700,702
dwave 1,"se\bun.ogg"
bg white,10,500
bg "bg\bg198.bmp",10,500
>Suddenly, a huge mansion appears before our eyes!\
name "Luka"
>No way...@>It really was right in front of our eyes...\
name ""
>And it has a strange design to it, too.@
>Is this La Croix's taste in design...?\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>She hid it using Yin and Yang power?@
>That damn La Croix...@>She has some tricks up her sleeves...\
name ""
>Other than the trickle of leaking magic power, we couldn't sense it at all.@
>It seems like she's a more formidable enemy than we thought.\
lsp 700,":a;chara\chrom_st21.bmp",0,0:print 10,500
name "Chrome"
>It's one of the secret arts handed down in the Artiste family.@
>My sister learned them all when she was very young...\
>...Anyway, make sure you keep your promise.@
lsp 700,":a;chara\chrom_st23.bmp",0,0:print 10,500
>Now, escort me to my sister!\
name ""
name "Luka"
>Yeah, we know...\
name ""
>I feel a little anxious, but there's no turning back now.@
>Together with Chrome, we enter the Biolab...\
r@k@\
dwave 1,"se\door1.ogg"
bgmstop
sean_change "bg201"
goto *sean0389a



*sean0389a

bgm "bgm\kiki2.ogg"
lsp 700,":a;chara\mob_seinen1.bmp",-170,0
lsp 701,":a;chara\mob_madou.bmp",170,0:print 10,500
name "Staff Member"
>Next...@>Number 88, step forward.\
name ""
name "Boy"
>Ah...\
name ""
>The frightened young boy is led out of the prison.\
>Other males were taken out of the prison like this before... But after that, none of them came back.\
name "Staff Member"
>.........\
name ""
cspl 700,701
dwave 1,"se\door2.ogg"
bg "bg\bg202.bmp",10,1500
lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
>The staff member silently brings him to a room.@
>After he leaves through the door, the boy hears the lock click.\
>The boy shivers as he senses something inside the dim room with him...\
name "Boy"
>Ahh!\
name ""
lsp 700,":a;chara\mob_seinen1.bmp",-170,0
lsp 701,":a;chara\AD-5_st01.bmp",170,0:print 10,500
>The Experimental monster AD-5 was in the room with him.@
>Her body was created from the corpses of multiple angels.\
>But the young boy has no idea what she really is.@
>She's just something horrifying, to run from...\
name "AD-5"
>...........\
name ""
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
csp 701
lsp 700,":a;chara\AD-5_h1.bmp",0,0:print 10,500
>AD-5 quickly pounces on the sacrifice, pinning him down.@
>The bandages stretch and wind around his body, holding him in place.\
name "Boy"
>Ahh...\
name ""
>While salivating, AD-5 jumps on top of the immobile boy.\
lsp 700,":a;chara\AD-5_h2.bmp",0,0:print 10,500
>Her tentacles slowly move closer to his groin...@
mov %hseanwave,20:hseanwave
>And wrap around his already erect penis.\
name "Boy"
>S...Stop this... Ah...\
name ""
name "AD-5"
>.............\
name ""
>The tentacles completely surround his erect penis, their slimy texture causing his body to jump.\
>The elastic tentacles gently squeeze him, the tip of her tentacle rubbing against his glans at the same time.\
name "AD-5"
>.............\
name ""
>Keeping that tube of tentacles around his penis, she slowly starts to move it up and down.@
>Jumping in surprise at the sudden increase in pleasure, the boy's eyes roll as he yells.\
name "Boy"
>I...Incredible!@>It feels so good!\
name ""gosub *syasei1
lsp 700,":a;chara\AD-5_h3.bmp",0,0
gosub *syasei2
>His penis pulses in her grasp, coming in only seconds after her tentacles coiled around him.\
mov %hseanwave,0:hseanwave
name "Boy"
>Haa...\
name ""
>Just the feeling of her squishy, slimy tentacles around him was enough to send the boy over the edge.@
>Even though it was his first sexual experience, he was brought to a powerful climax.\
name "AD-5"
>.............\
name ""
>But it clearly wasn't enough for the experimental monster.@
>Opening the bandages on her vagina, she exposes herself to the boy.\
mov %hseanwave,5:hseanwave
lsp 700,":a;chara\AD-5_h4.bmp",0,0:print 10,500
>And using her tentacles, brings his penis inside her.\
name "Boy"
>Ah!@>Ahh!\
name ""
>Without really understanding what's going on, the boy is being raped by this strange Chimeric Beast...@
>His screams of pleasure echo through the small room as he's brought into her warm insides.\
lsp 690,":a;chara\AD-5_ct01.bmp",0,0:print 10,500
>Countless tentacles inside her vagina, start to coil around his penis.@
>Feeling this inhuman pleasure moments after losing his virginity, the boy spasms in uncontrolled ecstasy beneath her.\
name "AD-5"
>.............\
name ""
name "Boy"
>Hyaaa!!!\
name ""
>Each tentacle inside her vagina starts to stroke and massage his penis inside her.@
>Their tips run back and forth across his glans, and up and down against his back muscle.\
>Massaged by tentacles inside a vagina, the stimulus is far different from normal sex...\
name "Boy"
>Ah... Ahh!\
name ""
>The boy's moans leak out, as the unknown pleasure overwhelms his virgin mind.@
>His fear and hatred of moments before are gone, replaced by pure ecstasy.\
>Surrendering inside her, the boy is quickly brought to another orgasm...\
gosub *syasei1
lsp 690,":a;chara\AD-5_ct02.bmp",0,0
lsp 700,":a;chara\AD-5_h5.bmp",0,0
gosub *syasei2
name "Boy"
>Ahhh!!!\
name ""
>He explodes inside her vagina, but AD-5's tentacles continue to stroke and coax more semen out even as he comes.@
>The boy writhes underneath her, as her greedy tentacles don't let up.\
name "Boy"
>Hya!@> Ahh!\
name ""
lsp 690,":a;chara\AD-5_ct02.bmp",0,0:print 10,500
>Each time the boy's body spams, jets of semen shoot into her body.\
>Her tentacles continue to assault him all during his ejaculation.@
>Overcome by the excessive pleasure, the young boy goes limp.\
csp 690:print 10,500
mov %hseanwave,0:hseanwave
name "Boy"
>Ah...\
name ""
name "AD-5"
>.............\
name ""
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_etc7,1
>As AD-5 moves to continue squeezing out his semen...@
bgm "bgm\battle2.ogg"
dwave 1,"se\break2.ogg"
lsp 700,":a;chara\chrom_st51.bmp",0,0:print 10,500
>The door is suddenly smashed open, a girl in black charging in!\
name "Chrome"
>A zombie angel...@>How tasteless, sister!\
name ""
dwave 1,"se\kanoke.ogg"
lsp 701,":a;chara\AD-5_st01.bmp",-180,0
lsp 700,":a;chara\frederika_st31.bmp",120,0:print 10,500
>She opens the coffin she's carrying, releasing a zombie wielding some powerful weapons.@
>The giant zombie points the huge weapons toward AD-5...\
name "Chrome"
>...Get her, Frederika!\
name ""
name "Frederika"
>....!!!\
name ""
dwave 1,"se\shot2.ogg"
>Without showing any mercy, Frederika blasts AD-5 with bullets.@
dwave 2,"se\down.ogg"
csp 701:print 10,500
>Littered with holes, AD-5 collapses to the ground.\
bgm "bgm\alice1.ogg"
lsp 700,":a;chara\chrom_st52.bmp",0,0:print 10,500
name "Chrome"
>...See.@
>I'm plenty powerful, aren't I?\
name ""
>Chrome puffs out her small chest in pride.@
>It's true that those weapons of Frederika are plenty powerful, but...\
name "Luka"
>...Didn't you promise not to use Frederika again?\
name ""
lsp 700,":a;chara\chrom_st51.bmp",0,0:print 10,500
name "Chrome"
>Listen to me, Frederika wanted this...\
name ""
csp 700
bg "bg\bg058.bmp",99,2000,"system\lngtwave.dll/vwi"
bgm "bgm\obakeyasiki.ogg"
lsp 700,":a;chara\chrom_st26.bmp",-160,0
lsp 701,":a;chara\frederika_st13.bmp",360,0:print 10,500
name "Chrome"
>Hrmph...@> Was this a failure, too?\
name ""
>In the middle of Chrome's experiment with communicating with the dead, a spirit appears in the smoke.@>It's not who she was trying to summon, but the form looks familiar...\
name "Chrome"
>Aren't you... Frederika?@
>Didn't you pass on already?\
name ""
name "Frederika"
>...A threat to this world is approaching...@
>Please, protect everyone...@
>Use my body if you please...\
name ""
name "Chrome"
>...Is that really alright?@
>If I wake you from your restful sleep just to fight again?\
name ""
name "Frederika"
>If I can help everyone, then please...@
>I beg you...\
name ""
lsp 700,":a;chara\chrom_st21.bmp",-160,0:print 10,500
name "Chrome"
>I acknowledge your desire...@
lsp 700,":a;chara\chrom_st22.bmp",-160,0:print 10,500
>...I've wanted to try out a new technique for a long time!\
>It looks like I'll get to try out the weapons I obtained that are powered by ghost energy!@
>Hehe... And maybe I'll try out those ultra fast synapses again.\
>Muhaha... And the nanocarbon muscle fibers...\
name ""
cspl 700,701
bg "bg\bg202.bmp",99,2000,"system\lngtwave.dll/vwi"
bgm "bgm\alice1.ogg"
lsp 700,":a;chara\chrom_st52.bmp",0,0:print 10,500
name "Chrome"
>...It's what Frederika herself wanted.@
>She wanted to protect those she cares about from beyond the grave, even if it means me using her body.\
lsp 700,":a;chara\chrom_st53.bmp",0,0:print 10,500
>I accepted her desire, and augmented her body again to be a super powerful zombie!\
name ""
name "Luka"
>...............\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\chrom_st53.bmp",50,0:print 10,500
name "Alice"
>...............\
name ""
>She's obsessed with this stuff, isn't she?\
csp 701
lsp 700,":a;chara\chrom_st21.bmp",0,0:print 10,500
bgm "bgm\labo3.ogg"
name "Chrome"
>All joking aside...@
>My zombie research wasn't going all too well.\
>I had originally planned for Frederika to be the ultimate zombie.\
>But with the soul resisting it, she was unable to use any sort of advanced techniques.\
name ""
name "Luka"
>That was the Frederika I fought before...\
name ""
lsp 700,":a;chara\chrom_st22.bmp",0,0:print 10,500
name "Chrome"
>But after the remodeling with her desiring it, she's totally different.@
>Since her soul itself desired power, her body easily accepted all sorts of treatments and advancements.\
>Holding the desire to protect those she holds dear...@
dwave 1,"se\lvup.ogg"
lsp 700,":a;chara\frederika_st31.bmp",0,0:print 10,500
>She was reborn as Frederika Mark II, now truly the ultimate of zombies!!!\
name ""
name "Luka"
>You're having a lot of fun with this, aren't you?\
name ""
lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
>Shaking my head, I turn toward the boy.@
>He seems to be too weak to stand on his own.\
name "Boy"
>Y...You all...@> Did you come to help...?\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\mob_seinen1.bmp",160,0:print 10,500
name "Alice"
>It wasn't our original purpose, but we will.@
>Are there any other prisoners here?\
name ""
name "Boy"
>Yes... There are others caught.@
>They're in a prison underground...\
name ""
name "Luka"
>Underground?@> We can't leave them, then.@
>First, let's get him out of here.\
name ""
lsp 700,":a;chara\chrom_st22.bmp",-160,0:print 10,500
name "Chrome"
>Leave it to me.@
>Spi, take him outside!\
name ""
lsp 700,":a;chara\chromg_st02.bmp",-160,0:print 10,500
name "Spi"
>Rooooger!\
name ""
name "Boy"
>Wahwah!@>A ghost!?\
name ""
name "Spi"
>I'll carry you. \
name ""
cspl 700,701:print 10,500
>Spi picks up the boy, and flies away.@
>She doesn't seem too reliable...@> But I think it will be fine.\
name "Luka"
>Should we head underground first?@
>If there are prisoners, we have to help them.\
name ""
lsp 700,":a;chara\chrom_st26.bmp",0,0:print 10,500
name "Chrome"
>I want to go to my sister as fast as possible...\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\chrom_st26.bmp",160,0:print 10,500
name "Alice"
>Do not worry, Chrome.@
>You will stand before La Croix soon enough...\
lsp 700,":a;chara\alice_st73.bmp",-170,50:print 10,500
>...We'll talk later, someone's coming!\
name ""
cspl 700,701:print 10,500
>There's a huge coffin in the corner of the room.@
>I didn't notice it before, but something just moved inside it!\
name "Luka"
>Another experimental monster...?@
>No, it seems to be a guard of some sort!\
name ""
dwave 1,"se\kanoke.ogg"
>The lid to the coffin is pushed aside...\
r@k@\
goto *fermesara_start



*sean0390

bgm "bgm\labo3.ogg"
name ""
r@k@\
name "Luka"
>Whew...@>What a tough zombie.\
name ""
lsp 700,":a;chara\chrom_st26.bmp",0,0:print 10,500
name "Chrome"
>A corpse from the Sabasa Royal Family?@
>This is indeed the work of my sister...\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\chrom_st26.bmp",160,0:print 10,500
name "Alice"
>Lets go to the underground prison first.@
>After that, we can look for the sealing device...\
name ""
lsp 701,":a;chara\chrom_st21.bmp",160,0:print 10,500
name "Chrome"
>Do not forget to bring me to my sister...\
name ""
cspl 700,701
dwave 1,"se\door2.ogg"
bg "bg\bg200.bmp",10,500
>We leave the horrible laboratory with that.@
>If this is supposed to be some sort of research center, why was it built with this kind of design sense?\
>Doubting the preferences of La Croix, we keep going further inside...\
dwave 1,"se\asioto3.ogg"
sean_change "bg203"
name "Luka"
>Is this... A dining room?@
>Where's the entrance to the underground prison?\
name ""
>A huge banquet is laid out on the dining table.@
>It's beyond obvious that it's a trap.\
bgm "bgm\comi1.ogg"
lsp 700,":a;chara\alice_st79.bmp",0,50:print 10,500
name "Alice"
>That looks delicious. \
name ""
name "Luka"
>Is there something hidden in here...?\
name ""
lsp 700,":a;chara\alice_st72.bmp",0,50:print 10,500
name "Alice"
>...Well, wait.@
>Even I think this trap is too obvious.\
>Surely a trap this obvious is intended to be a trick.@>There must be something else in here.@
>Therefore she wouldn't have bothered actually putting a trap on the expected, and instead has something else.\
>So the food should be trap free.\
name ""
>Mumbling to herself, Alice suddenly rushes toward the table of food!@
>As soon as she touches the food, the floor underneath her drops away!\
lsp 700,":a;chara\alice_st77.bmp",0,50:print 10,500
name "Alice"
>Impossible!@>A trap!?\
dwave 1,"se\fall2.ogg"
for %move=0 to 600 step 10
amsp 700,0,0+%move
print 1:wait 10
next
csp 700:print 1
>Uwaaa...\
name ""
>Alice falls down the hole...\
name "Luka"
>She actually fell for that trap!?\
name ""
>I try to jump out and catch her...@
>But the floor underneath me falls at the same time!\
name "Luka"
>Eh, here too!?@
dwave 1,"se\fall3.ogg"
>Uwaaaa...\
name ""
lsp 700,":a;chara\chrom_st32.bmp",0,0:print 10,500
name "Chrome"
>Idiots!\
name ""
>Thus we fall below...\
sean_change "bg204"
bgm "bgm\labo3.ogg"
name "Luka"
>Gah...!\
name ""
>I manage to turn around in midair and land safely on my feet.@
>The place I landed has water rising up to about my knees.\
>The hole I fell through is directly above me.@
>But it's too high, and there aren't any handholds... There's no jumping or climbing out.\
name "Luka"
>Oi! Alice!?@
>Are you down here!?\
name ""
>She fell down a hole too, so she should be nearby...@
>Or wait, did the two holes send us to different rooms?\
name "Luka"
>Ooooiiii!?\
name ""
name "???"
>Aha...@> Who are you calling out to?\
name ""
>The one responding to my call is clearly not Alice!\
r@k@\
goto *angelghoul_start



*sean0391

bgm "bgm\labo3.ogg"
name ""
r@k@\
name "Luka"
>Why did she make a monster like that...?\
name ""
>I saw experiments in Promestein's lab that were combinations of angels and monsters...\
>Is it just researchers experimenting for fun?@
>Or is there some sort of special purpose...?\
name "Luka"
>I'll think later, I have to find those two first...\
name ""
>I got separated from Chrome and Alice.@
>Should I still prioritize the prisoners? Or should I look for them first?\
name "Luka"
>It's not like I know how to get out of here anyway.@
>I'll just go this way for now, then.\
name ""
>There's only one path open.@
>Walking through the wet room, I head down the open hallway...\
sean_change "bg205"
name "Luka"
>Alice!@> Chrome!@
>I'm here!@>Where are you two!?\
name ""
>Am I heading towards an exit?@>Or going deeper inside?@
>I shout out for Alice and Chrome as I walk on...\
name "Luka"
>There's some light ahead...@
>Am I coming above ground?\
name ""
>As I see some stairs leading up, I breathe a sigh of relief.@
>When suddenly, a giant monster comes lumbering down!\
r@k@\
goto *dragonzonbe_start



*sean0392

bgm "bgm\labo3.ogg"
name ""
r@k@\
name "Luka"
>She said the Lab was past here...\
name ""
>At least I'll be back above ground.\
>There should be humans being held in the underground prison, but it would be better to meet back up with Alice first.\
>Thus I head up the stairs, out of the water-filled room...\
dwave 1,"se\asioto3.ogg"
sean_change "bg206"
name "Luka"
>What's this?\
name ""
>After climbing the steps, I come to an almost tranquil room.@
>But considering everything that has been done here, that's a sick joke.\
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\shirom_st01.bmp",0,0:print 10,500
name "La Croix"
>Welcome, disgraced Hero.@
>As I thought, you were the first to arrive.\
name ""
name "Luka"
>La Croix!@>What a horrible trap...@
>Where are Alice and Chrome!?\
name ""
name "La Croix"
>Those two are still wandering underground.@
>That trap was just to separate you three...\
lsp 700,":a;chara\shirom_st02.bmp",0,0:print 10,500
>If all three of you attacked at once, it would ruin the show.@
>I'll let each of you have your own private showing...\
name ""
name "Luka"
>...Sorry, but I don't have time to deal with your sick arts.@
>I'll defeat you, and destroy that sealing device!\
name ""
r@k@\
goto *cirque_start



*sean0392a

bgm "bgm\boss0.ogg"
name ""
r@k@\
lsp 700,":a;chara\alice_st74.bmp",-170,50:print 10,500
name "Alice"
>...You seem to have been a little too impatient to win, Luka.@
>I know just what you were trying to do...\
lsp 700,":a;chara\alice_st73.bmp",-170,50:print 10,500
>But I've resolved myself for this.@> Leave her to me.\
name ""
name "Luka"
>B...But...\
name ""
lsp 700,":a;chara\alice_st74.bmp",-170,50:print 10,500
name "Alice"
>Please, Luka.\
name ""
name "Luka"
>G...Got it...\
name ""
>I can't refuse her if she's asking like that.@
>I wanted to avoid this, but I just can't bring myself to forcefully stop this.\
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\alice15th_st31b.bmp",160,0:print 10,500
name "Alipheese the Fifteenth"
>Haha...@>Are you finished talking?@
>So you are my opponent?\
name ""
dwave 1,"se\karaburi.ogg"
>Alipheese lashes out with a powerful tail attack, aimed right at Alice...\
lsp 700,":a;chara\alice_st73.bmp",-170,50:print 10,500
name "Alice"
>...Shall we take this somewhere else?@
>There are too many unnecessary audience members here!\
name ""
dwave 1,"se\earth3.ogg"
>Alice grabs her tail and directs the blow towards the floor.@
dwave 1,"se\break7.ogg"
quake 10,1000
>Slamming into the floor, Alipheese's tail breaks open a huge hole.\
cspl 700,701:print 10,500
>Still holding onto her tail, Alice drags Alipheese down with her into the underground area.\
lsp 700,":a;chara\shirom_st02.bmp",0,0:print 10,500
name "La Croix"
>Oh my, has the main event already started!?@
>The battle between the Monster Lord and her predecessor!@> I've been waiting for this for a long time!\
name ""
bgm "bgm\ruka.ogg"
name "Luka"
>...What's interesting?@
>The only thing interesting is how I'm going to beat you down!\
name ""
>Profaning a mother's corpse, and forcing her to fight against her own daughter...@
>And she's just laughing, amused by it!?\
name "La Croix"
>Ah... The Hero is still here?@
>Sorry, but my attention needs to be on the other stage.\
>I apologize for the rerun, but you'll need to deal with the previous play again.\
name ""
dwave 1,"se\kanoke.ogg"
lsp 701,":a;chara\cirque_st51.bmp",-160,50
lsp 700,":a;chara\cirque_st41.bmp",200,0:print 10,500
>Queen Harpy and Queen Scylla emerge from the coffin again.@
>Seemingly losing interest, La Croix moves to head downstairs to where Alice went.\
dwave 1,"se\ero_makituki1.ogg"
name "Queen Scylla"
>This time I'll wrap you in my tentacles...\
name ""
name "Luka"
eng "...Flash Kill.":$sel6/
dwave 3,"se\tuki.ogg"
lsp 2,":c;effect\007.bmp",0,0:print 1
wait 100
csp 2:print 18,300,"system\mask01.jpg"
\
name ""
>I slash through the reaching tentacles, their tips harmlessly falling to the floor.\
name "Queen Scylla"
>Your sword skills are superb...@
>But I can regenerate my tentacles in no time!\
name ""
name "Luka"
>...Can you regenerate your body itself?\
name ""
name "Queen Scylla"
eng "Eh...?":$sel6/
wait 500
lsp 702,":a;chara\cirque_st54.bmp",-160,50
lsp 701,":a;chara\cirque_st55.bmp",-160,50
for %move=0 to 100 step 10
amsp 702,-160-%move,50-%move/10
print 1:wait 40
next
lsp 700,":a;chara\cirque_st43.bmp",200,0:print 10,500
\
name ""
>Queen Scylla's body tears open.@
>The slash from before went much further than just her tentacles...\
name "Queen Scylla"
>This can't... be...\
name ""
dwave 1,"se\syometu.ogg"
cspl 701,702:print 99,4500,"system\breakup.dll/urb"
>Her torn open body fades away into particles.@
>This time, she's truly dead.\
lsp 700,":a;chara\shirom_st03.bmp",0,0:print 10,500
name "La Croix"
>In a single blow?\
>She still had some built up damage from the last battle, but the damage you took should have been much higher!\
>Especially after battling with Alipheese the Fifteenth...\
name ""
name "Luka"
>La Croix...@
>I've fought Queen after Queen already.\
if %ivent02=0 skip 4
lsp 700,":a;chara\queenhapy_st01.bmp",0,0
bg "bg\bg027.bmp",10,500
>One who was kidnapping humans to try to repopulate her race...\
if %ivent10=0 skip 4
lsp 700,":a;chara\queenbee_st01.bmp",0,0
bg "bg\bg022.bmp",10,500
>One who was promoting racial violence to eradicate another neighboring race...\
if %ivent11=0 skip 4
lsp 700,":a;chara\queenant_st01.bmp",0,0
bg "bg\bg102.bmp",10,500
>One who erupted in anger at her daughters being used for slave labor...\
if %ivent14=0 skip 5
lsp 700,":a;chara\queenelf_st01.bmp",-160,0
lsp 701,":a;chara\queenfairy_st01.bmp",160,0
bg "bg\bg136.bmp",10,500
>Two, cornered by humans, who began to fight back...\
if %ivent04<2 skip 5
csp 701
lsp 700,":a;chara\queenMermaid_st01.bmp",0,0
bg "bg\bg189.bmp",10,500
>One who was overcome with grief at losing her lover...\
if %ivent06<2 skip 5
csp 701
lsp 700,":a;chara\queenvanpire_st01.bmp",0,0
bg "bg\bg224.bmp",10,500
>One, overcome by ambition and greed, who wanted to rule...\
if %ivent10<2 skip 5
csp 701
lsp 700,":a;chara\queenalraune_st01.bmp",0,0
bg "bg\bg095.bmp",10,500
>One who sacrificed herself to save her fellow monsters...\
if %ivent02=0 && %ivent10=0 && %ivent11=0 && %ivent14=0 && %ivent04<2 && %ivent06<2 && %ivent10<2 goto *sean0392b
goto *sean0392c



*sean0392b

mov %check11,1
>...Now that I think about it, I really haven't.\
name ""
goto *sean0392d



*sean0392c

csp 701
lsp 700,":a;chara\shirom_st03.bmp",0,0
bg "bg\bg206.bmp",10,500
name "Luka"
>Their motives and reasons were different, good and bad...@
>But I fought every one of them, all incredibly powerful!\
name ""
goto *sean0392d



*sean0392d

name "La Croix"
>...Go, Queen Harpy.@
>Send that Hero to oblivion!\
name ""
dwave 1,"se\kanoke.ogg"
lsp 700,":a;chara\cirque_st41.bmp",0,0:print 10,500
name "Queen Harpy"
>Hmph, with ease...\
name ""
name "Luka"
>But... These undead shells?\
name ""
dwave 1,"se\slash4.ogg"
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
lsp 700,":a;chara\cirque_st43.bmp",0,0:print 1
>I avoid her wing attack, and instead counter with a deep slash through her body as she flies by.\
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Queen Harpy fades away into particles, returning to a corpse.\
lsp 700,":a;chara\shirom_st03.bmp",0,0:print 10,500
name "Luka"
if %check11=1 skip 2
>...Weak.@> They don't even compare to the other Queens I've fought!\
>They are just puppets without a soul!\
>Taking away their souls, and leaving them as mere husks of what they were...@
>You just stripped them of the power that made them strong!@> What a horrible "ultimate" technique you have, La Croix!\
name ""
name "La Croix"
>What's with this strength!?@
>...Come, Titania, kill him!\
name ""
dwave 1,"se\kanoke.ogg"
lsp 700,":a;chara\cirque_st11.bmp",0,0:print 10,500
name "Luka"
>This is the power you stole from them!\
name ""
dwave 1,"se\slash3.ogg"
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
lsp 700,":a;chara\cirque_st13.bmp",0,0:print 1
dwave 2,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>I step forward and stab Titania, returning her to a corpse before she can even emerge fully from the coffin.\
lsp 700,":a;chara\shirom_st03.bmp",0,0:print 10,500
name "Luka"
>Emotion... Heart... Soul...@>The driver of power for those that are living.@
>You took it, and weakened all of them!\
>Ultimate technique?@>Your arts?@
>All you did was kill them and shackle them!\
name ""
name "La Croix"
>Guh... Get out here, Cirque du Croix!@
>Destroy him, you three!\
name ""
dwave 1,"se\kanoke.ogg"
lsp 700,":a;chara\cirque_st01.bmp",-250,0
lsp 701,":a;chara\cirque_st21.bmp",-30,0
lsp 702,":a;chara\cirque_st31.bmp",280,0:print 10,500
>The remaining three undead monsters pop out of the coffin.@
>When I point my sword at them...\
bgm "bgm\hutuu2.ogg"
cspl 701,702
lsp 700,":a;chara\chrom_st28.bmp",0,0:print 10,500
name "Chrome"
>Shirome...\
name ""
>Chrome runs up the steps.\
lsp 700,":a;chara\chrom_st28.bmp",-170,0
lsp 701,":a;chara\shirom_st01.bmp",160,0:print 10,500
name "La Croix"
>...What, Chrome?@
>Why did you come here?\
name ""
lsp 700,":a;chara\chrom_st26.bmp",-170,0:print 10,500
name "Chrome"
>...I wanted to ask you one more time.@
>Is my sister Shirome really never coming back?\
name ""
lsp 701,":a;chara\shirom_st04.bmp",160,0:print 10,500
name "La Croix"
>I told you already...@>Shirome is dead.@
>I am La Croix.\
name ""
lsp 700,":a;chara\chrom_st28.bmp",-170,0
lsp 701,":a;chara\shirom_st01.bmp",160,0:print 10,500
name "Chrome"
>I see...@
bgm "bgm\battle2.ogg"
lsp 700,":a;chara\chrom_st27.bmp",-170,0:print 10,500
>Then it's my duty as an Artiste to kill any outside our family who use our techniques!\
>La Croix!@>You have been judged unworthy of our family's secrets!\
name ""
name "La Croix"
>Chrome, do you really think you can do that?\
name ""
name "Chrome"
>Luka... Leave the three Cirque du Croix monsters to me.\
name ""
name "Luka"
>One against three!?@>Are you sure?\
name ""
csp 701
lsp 700,":a;chara\chrom_st74.bmp",0,0:print 10,500
name "Chrome"
>Don't worry...@> I'm not alone!\
name ""
dwave 1,"se\kanoke.ogg"
lsp 702,":a;chara\frederika_st31.bmp",140,0
lsp 700,":a;chara\chromg_st11.bmp",-240,40
lsp 701,":a;chara\chromg_st01.bmp",20,0:print 10,500
>Frederika, Spi and Rit all emerge from her coffin.@
lsp 700,":a;chara\cirque_st01.bmp",-250,0
lsp 701,":a;chara\cirque_st21.bmp",-30,0
lsp 702,":a;chara\cirque_st31.bmp",280,0:print 10,500
>Accompanied by her own undead, Chrome stands against the remaining Cirque du Croix monsters.\
cspl 700,702
lsp 700,":a;chara\shirom_st01.bmp",0,0:print 10,500
name "La Croix"
>You challenge my orchestra with that rabble?@
>You still have much to learn.\
name ""
name "Luka"
>Where are you looking, La Croix?@
>I'm your opponent!\
name ""
>I point my sword at La Croix.@
>As she said, I need to close the curtain on this horrible show!\
r@k@\
goto *shirom_start



*sean0393

sean_change "bg204"
name ""
r@k@\
bgm "bgm\maou.ogg"
lsp 700,":a;chara\alice_st73.bmp",-160,50
lsp 701,":a;chara\alice15th_st31b.bmp",170,0:print 10,500
name "Alipheese the Fifteenth"
>Oooooohh!\
name ""
name "Alice"
>Haaaaa!!!\
name ""
dwave 1,"se\bom1.ogg"
quake 10,1000
>Their fists, tails, and magical power collide together.@
>The shockwave knocks down nearby walls and pillars.\
name "Alipheese the Fifteenth"
>Who are you!?@
>How can you compete against me with that tiny body of yours!?\
name ""
name "Alice"
>............\
name ""
>The battle between the two Monster Lords is nearing its end.@
>Both of their bodies are bruised and damaged, nearing the end of their ability to fight.\
name "Alipheese the Fifteenth"
>...Then I shall end this now!\
name ""
dwave 1,"se\karaburi.ogg"
>Summoning all of her remaining power into her fist, Alipheese slowly moves toward Alice!\
lsp 700,":a;chara\alice_st74.bmp",-160,50:print 10,500
name "Alice"
>...Please return to sleep, Mother.@
>I can't bear to see you suffer any longer...\
name ""
skillname "Word of Dispel"
>I ask thee, eternal time...@
>Reveal my body, yoked in twilight...\
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
lsp 700,":a;chara\alice_st03.bmp",-20,0
csp 2:print 10,300
>Return my true body to me!\
skillname ""
name "Alice"
>Haaaaaa!!!\
name ""
name "Alipheese the Fifteenth"
>It can't be... You're...\
name ""
dwave 1,"se\karaburi.ogg"
>Summoning her own power, Alice dodges to the side and punches with everything she has.@
dwave 2,"se\slash3.ogg"
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
>Alice's fist slams straight into Alipheese's chest, piercing her body.\
cspl 700,701
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Mother...@>Forgive me for making you suffer through a second death...\
name ""
lsp 700,":a;chara\alice15th_st03.bmp",0,0:print 10,500
name "Alipheese the Fifteenth"
>............\
bgm "bgm\alice2.ogg"
lsp 700,":a;chara\alice15th_st43.bmp",0,0:print 10,500
>No... I am happy, Alice.@
>To be able to see you become a fine grown adult...@> With my own eyes...\
name ""
lsp 700,":a;chara\alice_st51b.bmp",67,0:print 10,500
name "Alice"
>...Mo...ther...?@
>Mother!!!\
name ""
lsp 700,":a;chara\alice15th_st43.bmp",0,0:print 10,500
csp 700:print 99,4500,"system\breakup.dll/urb"
>Alipheese the Fifteenth fades away, the power reanimating her body vanishing.\
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>............\
>It wasn't an illusion... She really did...\
name ""
>Alice continues staring at the spot where her mother just was, even after she vanishes...\
bgmstop
sean_change "bg206"
bgm "bgm\kiki2.ogg"
name "Luka"
>It feels like Alice is finished too...\
name ""
lsp 700,":a;chara\shirom_st08.bmp",0,0:print 10,500
name "La Croix"
>.............\
name ""
>The sounds of destruction from below finally stop.@
>The only source of magic power I can sense from below is the faint pulse of Alice herself.\
bgm "bgm\hutuu2.ogg"
lsp 700,":a;chara\chrom_st28.bmp",-170,0
lsp 701,":a;chara\shirom_st05.bmp",160,0:print 10,500
name "Chrome"
>Sister...\
name ""
>It looks like Chrome's fight is over, too.@
lsp 700,":a;chara\cirque_st01.bmp",-250,0
lsp 701,":a;chara\cirque_st21.bmp",-30,0
lsp 702,":a;chara\cirque_st31.bmp",280,0:print 10,500
>Three members of Cirque du Croix now stand guard behind her.\
csp 702
lsp 700,":a;chara\chrom_st28.bmp",-170,0
lsp 701,":a;chara\shirom_st05.bmp",160,0:print 10,500
name "La Croix"
>You also took control of Roza and Queen Lamia?@
>Although I may have been careless, to turn them against me...\
name ""
name "Chrome"
>My Sister is already dead...@
>It can't be...@> That accident?\
name ""
lsp 701,":a;chara\shirom_st08.bmp",160,0:print 10,500
name "La Croix"
>That was my mistake...@> Don't concern yourself with it.\
name ""
cspl 700,701
bg "bg\bg228.bmp",99,2000,"system\lngtwave.dll/vwi"
bgm "bgm\hutuu1.ogg"
lsp 700,":a;chara\chrom_st01.bmp",253,150:print 10,500
name "Chrome"
>I'm hoome!@
>Now then, let's see how much my original flesh culture grew today. \
name ""
lsp 700,":a;chara\chrom_st01.bmp",63,150
lsp 701,":a;chara\shirom_st71.bmp",160,0:print 10,500
name "Shirome"
>Ah, it's Chrome.@
>Watch out for the new Hidden drug I purchased.\
>I haven't labeled it yet, but it's on the refrigerator shelf.@>It's dangerous stuff, so watch out.\
name ""
name "Chrome"
>Yeah yeah yeah, got it. \
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,500
>Skipping ahead in high spirits, Chrome heads into the laboratory.@
>She's engrossed in seeing if the new enzyme she developed was able to accelerate the growth of her flesh culture...\
csp 701
lsp 700,":a;chara\shirom_st72.bmp",0,0:print 10,500
name "Shirome"
>.............\
name ""
>To determine the property of the flesh culture, she'll need to use the black dye.@
>And the black dye looks identical to the Hidden drug she just bought...\
>If that drug reacts with the protein in the flesh, it will cause a huge explosion.\
lsp 700,":a;chara\shirom_st71.bmp",0,0:print 10,500
name "Shirome"
>That girl...@> She'd mix them up, wouldn't she?\
name ""
>Knowing her sister, Shirome is nervous.@
>Worried, she runs into the laboratory to move her Hidden drug before Chrome has a chance to mix it up.\
dwave 1,"se\door2.ogg"
bg "BG\bg227.bmp",10,1500
bgm "bgm\kiki2.ogg"
lsp 700,":a;chara\shirom_st73.bmp",0,0:print 10,500
name "Shirome"
>Hey, Chrome!@
>That chemical on the refrigerator shelf...!\
name ""
lsp 700,":a;chara\shirom_st73.bmp",-160,0
lsp 701,":a;chara\chrom_st01.bmp",433,150:print 10,500
name "Chrome"
>Oh, sister!@>What's wrong?\
name ""
>Chrome turns toward Shirome, a bottle in hand.@
>That black liquid is the Hidden drug, without a doubt!\
>The steady drip of black liquid flows over the flesh culture as Shirome's eyes widen in horror.\
bgmstop
name "Shirome"
>Chrome, get down!!!\
name ""
lsp 701,":a;chara\chrom_st03.bmp",433,150
for %move=0 to 350 step 10
amsp 700,-160+%move,0
print 1:wait 1
next
dwave 2,"se\bom3.ogg"
cspl 700,701
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
quake 10,1000
csp 2:print 10,500
>In the next moment, a powerful explosion rocks the laboratory.@
>The force of the explosion destroys all the equipment, blowing away all the glass and chemicals.\
bgm "bgm\kiki2.ogg"
name "Shirome"
>Urhg...\
name ""
>When Shirome comes to, she's on the floor.@> She can't even feel her own body.\
>She jumped right at the moment of explosion...@
>Covering Chrome's body, she shielded her from the brunt of the explosion.\
name "Shirome"
>Chrome... Is safe...\
name ""
>Shirome looks down, and is able to see Chrome breathing.\
>But she sees something horrible next to Chrome.@
>Right next to her unconscious sister, is the lower half of her own body.\
>She stares at it for a few seconds, refusing to believe her own eyes.\
name "Shirome"
>..........\
name ""
>There's nothing attached to her body below her own chest.@
>Anyone would have realized instantly that they were going to die.\
>But Shirome is not just an ordinary monster...\
name "Shirome"
>My consciousness will fade due to hemorrhagic shock, then cardiac arrest thirty seconds later...@
>There's no treatment possible.\
name ""
dwave 1,"se\power.ogg"
>Shirome summons her own magic power, bringing forth the same energy she would when creating a zombie.\
>Freezing the wounded parts of her body, and replacing them with undead tissue.@
>Substituting her blood for an anti-rot liquid.\
>She imprints in her own brain her body's design and function.@
>Since her body itself is the target, it only takes her a second to completely analyze it.\
name "Shirome"
>Will I make it in time?@>Before I faint...\
name ""
>The target of her Necromancy is her own body.\
>Controlling her own body with her Necromantic powers...@
>There is no record of anyone ever attempting something like this before.\
name "Shirome"
>I did it in time... But...\
name ""
>Shirome converted her own dying body into that of a zombie.@
>Using her own genius level skills, she brought herself back from death itself.\
bg black,10,1500
name "La Croix"
>But... Am I still truly Shirome?@
>Or...@>Am I just a corpse with the personality and memories of the one who was known as Shirome...?\
name ""
bg "bg\bg206.bmp",99,2000,"system\lngtwave.dll/vwi"
bgm "bgm\hutuu4.ogg"
lsp 700,":a;chara\chrom_st28.bmp",-170,0
lsp 701,":a;chara\shirom_st05.bmp",160,0:print 10,500
name "Chrome"
>That's why you left right after that accident...\
name ""
lsp 701,":a;chara\shirom_st08.bmp",160,0:print 10,500
name "La Croix"
>If you knew I had died during that accident, you would have been at a loss.@
>So with the leftover affection Shirome had for you, I left before you awoke.\
name ""
name "Luka"
>............\
name ""
>She clearly still thought of her as her younger sister.@
>But then...\
lsp 701,":a;chara\shirom_st05.bmp",160,0:print 10,500
name "La Croix"
>After that, I settled down here in my own research laboratory.@
>Aside from my own techniques, my emotions and thoughts slowly dulled.\
>At that rate, I truly will become just a corpse...@
>Afraid of my own fate, I put forth everything into finding a way to return zombies to life.\
>I paved that path of mine with countless corpses in the process...@
>If I was Shirome...@>If I was truly your sister, I never would have done that.\
name ""
name "Chrome"
>Sister...\
name ""
name "La Croix"
>...I never feel guilt.@> No matter how many I kill.@
>As I am now, I can do whatever I want without a guilty conscience.\
>I am La Croix.@> One who will do anything and everything to achieve my objective.@
>Shirome, your sister, died a long time ago.\
name ""
lsp 701,":a;chara\shirom_st08.bmp",160,0:print 10,500
>With that, La Croix closes her eyes.\
name "La Croix"
>...Chrome, kill me.@
>You know the rules well.@
>Anyone who practices the Artiste art outside of the family must be eliminated.\
name ""
lsp 700,":a;chara\chrom_st29.bmp",-170,0:print 10,500
name "Chrome"
>.............\
name ""
name "La Croix"
>Don't hesitate, do as you've been taught.@
>I'm already dead anyway.\
name ""
name "Chrome"
>Eternal peace to your lost body...@
>Earth becomes earth again, as the corpse becomes inanimate flesh.\
name ""
>With tears in her eyes, Chrome makes a magical sign in the air as she chants.@
dwave 1,"se\zyorei.ogg"
>A flash of white magic pours forth from her hands.\
name "Chrome"
>Oh Corpse, return to your grave.\
name ""
name "Shirome"
>Thank you, Chrome...@
>My dear Sister...\
name ""
csp 701:print 99,4500,"system\breakup.dll/urb"
>La Croix's body returns to dust, and vanishes.@
>Her cursed, immortal body finally rests in eternal sleep.\
lsp 700,":a;chara\alice_st74.bmp",-170,50
lsp 701,":a;chara\chrom_st29.bmp",160,0:print 10,500
name "Alice"
>...At the very end, she yearned for her sister.\
name ""
name "Luka"
>Yes...\
name ""
lsp 701,":a;chara\chrom_st28.bmp",160,0:print 10,500
name "Chrome"
>...I want to be alone now, please.@
>You two should do what you came here for...\
name ""
csp 701
lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
name "Alice"
>Yes, let's destroy that sealing device and get my true body back!\
name ""
name "Luka"
>Ah, that's right...@>I totally forgot.\
name ""
lsp 700,":a;chara\alice_st76.bmp",0,50:print 10,500
name "Alice"
>How could you forget that!?\
name ""
>That's right, our original goal here was to get Alice's normal body back.@
>And to rescue those trapped prisoners...\
lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
name "Alice"
>I'm sure the device is in the deepest part.@>Let's go!\
name ""
name "Luka"
>Yes!\
name ""
csp 700:print 10,500
>Leaving Chrome alone, we advance further inside.\
dwave 1,"se\asioto3.ogg"
sean_change "bg102"
bgm "bgm\labo2.ogg"
if %ivent11=0 skip 6
name "Luka"
>This place is just like the basement in Grangold...\
name ""
>A large device is in the center room, with machinery lining the walls.@
>This place is just like the area that sealed Queen Ant.\
name "Luka"
>This must be it.@
>If we destroy this device...\
name ""
lsp 700,":a;chara\alice_st81.bmp",0,50:print 10,500
name "Alice"
>No, it's...@>The device itself is made of holy energy!?\
name ""
>As Alice goes to hit the device with her fist...@
dwave 1,"se\miss.ogg"
>She passes right through, without even scratching it!\
name "Luka"
>It's the same as an angel?@
>Then what if I use Angel Halo...\
name ""
dwave 1,"se\karaburi.ogg"
>I slash the device with my sword...@>But even it passes right through!\
name "Luka"
>No way... Not even this sword can touch it?\
name ""
lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
name "Alice"
>It must be similar to the "Gate of Heaven", and composed of extremely pure holy energy.\
>To modify the device to this degree...@
>It seems those angel bastards really didn't want me getting my body back.@
>I'm stumped on this one, Luka.\
name ""
name "Luka"
>You're giving up?@>But the sealing device is right in front of us!\
name ""
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>We can't physically touch it.@
>Even though it's right in front of us, it might as well be halfway across the universe for the good it will do us.\
name ""
name "Luka"
>So there's nothing we can do?\
name ""
>It's frustrating...@>It's right here, but there's nothing we can do about it.\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Luka"
>There aren't any more of those discs here, either.@
>It looks like La Croix disposed everything before we got here.\
name ""
name "Alice"
>We can't destroy it at the moment, but we know where it is now.@
>They can't just up and move this thing, either.\
>It hasn't been a useless trip at all.@
>Also, we need to rescue those captive humans.\
name ""
name "Luka"
>Yes... You're right.\
name ""
csp 700:print 10,500
>Even more, we managed to defeat La Croix.@
>If we had left her alone, the amount of sacrifices would only have risen.\
>With bittersweet emotions, we leave the sealing device room.\
dwave 1,"se\asioto3.ogg"
bgmstop
sean_change "bg198"
bgm "bgm\epilogue.ogg"
>After rescuing the trapped humans inside, we're finished with this place.@
>Alice, Chrome and I speak outside of the Biolabs before we depart.\
name "Luka"
>...Chrome, what will you do now?\
name ""
lsp 700,":a;chara\chrom_st21.bmp",0,0:print 10,500
name "Chrome"
>I'll continue my research, and hone my crafts.@
>Even if the Monster Lord is angry at me, I'll keep trying to restore the honor of the Artiste Family...\
name ""
lsp 700,":a;chara\alice_st74.bmp",-170,50
lsp 701,":a;chara\chrom_st21.bmp",160,0:print 10,500
name "Alice"
>...I'll exempt you from the Artiste ban in the Monster Lord's Castle.@
>You did your duty well in this incident.\
name ""
lsp 701,":a;chara\chrom_st22.bmp",160,0:print 10,500
name "Chrome"
>Monster Lord...\
name ""
lsp 700,":a;chara\alice_st75.bmp",-170,50:print 10,500
name "Alice"
>...But Necromancy is forbidden.@
>It is absolutely forbidden, especially in front of me.\
name ""
name "Luka"
>..............\
name ""
>That will never change about her, I'm sure.\
lsp 700,":a;chara\alice_st71.bmp",-170,50:print 10,500
name "Alice"
>I know of the three major techniques passed down the Artiste family.@
>Zombie Arts, Necromancy... And Dollmaking.\
>I have no issue with your Dollmaking arts.@
>In my position as Monster Lord, I grant you a free license to pursue that avenue of dark magic study.\
name ""
lsp 701,":a;chara\chrom_st26.bmp",160,0:print 10,500
name "Chrome"
>Hum hum...@> Dollmaking skills...@
>I was only taught the basics when I was small, but...\
lsp 701,":a;chara\chrom_st23.bmp",160,0:print 10,500
>...But that may be interesting.@
>I'll look through our secret books, and relearn all of the lost arts!\
name ""
name "Luka"
>Yes, I'm rooting for you.\
name ""
>Dollmaking?@>She can't cause any trouble for people with those kinds of techniques, right?\
lsp 701,":a;chara\chrom_st22.bmp",160,0:print 10,500
name "Chrome"
>I'm in your debt for many reasons, Luka.@
>I wish you well too, Monster Lord.\
>I'll perfect the Dollmaking arts, and visit the Monster Lord's Castle...\
name ""
lsp 700,":a;chara\alice_st72.bmp",-170,50:print 10,500
name "Alice"
>Yes, do your best.\
name ""
name "Chrome"
>Well then, goodbye!\
name ""
dwave 1,"se\escape.ogg"
csp 701:print 10,500
>With that, Chrome departs.@
>If not for her help, I doubt we could have stopped La Croix.\
lsp 700,":a;chara\alice_st72.bmp",0,50:print 10,500
name "Alice"
>I'm looking forward to seeing the lost Dollmaking art of the Artiste family.@
>We need to regain peace soon so we can witness it!\
name ""
name "Luka"
>Yes, you're right!\
name ""
csp 700:print 10,500
>We weren't able to complete our original goal, but we were still successful here.\
>We defeated a powerful subordinate of Promestein, and confirmed the location of the sealing device.\
>But we're done here now...@> Now where should we head to next...?\
r@k@\
mov %ivent05,3
mov %gloval1_story_sinkou,18:gosub *savegloval1
bgm "bgm\field4.ogg"
goto *map13



*sean0393x

sean_change "bg140"
gosub *setwindow_01p
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Even if we go there again, we can't touch that device.@
>Let's return again once we have something new to try.\
>We must give priority to other things until then.\
name ""
name "Luka"
>Yeah, you're right.\
name ""
csp 700:print 10,500
>There's nothing we can do there for now.@> Instead...\
goto *map13



*sean0394

sean_change "bg140"
gosub *setwindow_01p
name "Luka"
>Alright, let's head for the Sealed Sinner's Prison!\
name ""
>Ilias used a technique to seal Heinrich's soul there...@
>We need to go there and copy that data to a disc!\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Hmm... Finally time for the big job.@
>Once we get the data, we'll head right back to my Castle.\
>Is there anything you have left to do before then...?\
name ""
csel "No",*sean0394a,"Yes",*sean0394b



*sean0394b

csp 700:print 10,500
name "Luka"
>Yes, there's still something left...\
name ""
>I take out the map again.\
bgm "bgm\field4.ogg"
goto *map13



*sean0394a

csp 700:print 10,500
name "Luka"
>It's fine, there's nothing left to do but this.@
>Galda, let's go to the Sealed Sinner's Prison!\
name ""
lsp 700,":a;chara\galda_st02.bmp",0,0:print 10,500
name "Galda"
>Kweh!\
name ""
>With that, we head off to the Sealed Sinner's Prison.@
>I can't help but feel a slight hope that I'll meet with Heinrich somehow...\
dwave 1,"se\habataki.ogg"
bgmstop
sean_change "bg145"
bgm "bgm\enrika.ogg"
name "Luka"
if %ivent16=0 mov $sel1,"This air feels strange..."
if %ivent16=1 mov $sel1,"The atmosphere here feels as strange as before..."
eng $sel1:$sel6\
name ""
if %ivent16=0 mov $sel1,"The air here has a solemn, forbidding feel to it."
if %ivent16=1 mov $sel1,"The air here is just as solemn and forbidding as last time we were here."
eng $sel1:$sel6\
>But it makes sense if you consider who's sealed here.\
>The brave Hero who brought down Alipheese the Eighth five hundred years ago...@
>The world famous legendary Hero is sealed here.\
lsp 700,":a;chara\sylph_st21r.bmp",251,190
lsp 701,":a;chara\gnome_st31r.bmp",393,145
lsp 702,":a;chara\undine_st23.bmp",-50,180
lsp 703,":a;chara\salamander_st23.bmp",570,125:print 10,500
name "Sylph"
>Hey, hey, can you break the seal?@
>So we can meet Heinrich again?\
name ""
name "Gnome"
>..........\
name ""
name "Luka"
>We're here to collect data, so I don't know if the seal will be removed or you'll be able to meet with him...\
name ""
>I can't even imagine what kind of state his soul would be in after five hundred years of being sealed.\
>The moment the seal is broken, wouldn't his soul move on to the afterlife right away?\
name "Luka"
>I remember hearing about it before, Salamander.@
>Heinrich used all four of you, too?\
name ""
lsp 703,":a;chara\salamander_st21.bmp",570,125:print 10,500
name "Salamander"
>Yes...@> But the contract we had with him was weaker than ours with you.@
>After he defeated Alipheese the Eighth, the contract was ended.\
>He was going to finish his life as the Hero who saved the world...@
lsp 703,":a;chara\salamander_st23.bmp",570,125:print 10,500
>At least, that's what we thought.\
name ""
lsp 702,":a;chara\undine_st21.bmp",-50,180:print 10,500
name "Undine"
>But instead, he started a new battle against the Heavens.\
name ""
lsp 703,":a;chara\salamander_st21.bmp",570,125:print 10,500
name "Salamander"
>And in the end, this was the result.@
>That fool...@> Why didn't he rely on us again!?\
name ""
name "Undine"
>You know why, Salamander.@
>He didn't want to involve us in his fight against the Heavens.\
name ""
name "Salamander"
>I know that!@> That's why I'm pissed!@
>He went alone into that desperate fight!\
name ""
lsp 700,":a;chara\sylph_st26.bmp",251,191:print 10,500
name "Sylph"
>Heinrich fought alone...@
>And then for five hundred years...\
name ""
lsp 701,":a;chara\gnome_st32.bmp",50,50:print 10,500
name "Gnome"
>..........\
name ""
cspl 701,703
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>The brave Hero challenged the Heavens in a lonely fight...@> And lost.@
>And thus his body and soul were sealed here for five hundred years.\
name ""
>Alice touches the monument with her hand and mutters to herself.\
name "Alice"
>Hmm...@> There is indeed a powerful barrier here.@
>I can feel it in my skin...\
name ""
name "Luka"
>Yeah, I can feel it too.\
name ""
>I couldn't really feel it when I first came here, but I can now.@
>This strange atmosphere is caused by the barrier Ilias put up.\
name "Alice"
>Alright, let's hurry up and finish this.\
name ""
>Alice pulls out the discs Tamamo prepared.@
>Holding the disc in her left hand, she puts her right hand on the monument.\
bgm "bgm\kiki2.ogg"
lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
name "Alice"
>Alright, here I go...@>I'm starting the data transfer procedure!\
name ""
dwave 1,"se\magic.ogg"
wait 500
dwave 2,"se\spark.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,50
csp 2:print 10,50
lsp 2,":c;system\ef_white.jpg",0,0:print 10,50
csp 2:print 10,50
>The moment Alice summons some power to start the procedure, white lightning flashes in the area.@
>A white, holy aura descends and flows from the monument to the disc.\
lsp 700,":a;chara\alice_st81.bmp",0,50:print 10,500
name "Alice"
>Guh... This is quite difficult...@
>And it seems like it will take a while, too.\
>I can't move like this, and if it's interrupted we'll have to start from the beginning.@
>...You know what that means, Luka.\
name ""
name "Luka"
>Yes, leave it to me!\
name ""
csp 700:print 10,500
>I stand close to the stationary Alice.@
>If there's any surprise attack coming, I'll defend her...\
>.............\
name "Luka"
>.............\
name ""
>After a minute passes by, I let out a sigh.@
>I sort of assumed the enemy would attack right away.\
name "Luka"
>...That's strange, isn't this their perfect chance?@
>I don't sense any monsters or angels though...\
name ""
bgm "bgm\maou2.ogg"
name "???"
>Oh my, how rude.@
>I've been here the whole time.\
name ""
dwave 1,"se\kodou.ogg"
>As soon as the words left my mouth, a strange chill passes over me.@
>That strange, detached voice...\
dwave 1,"se\bun.ogg"
lsp 700,":a;chara\alice8th_st01.bmp",0,0:print 99,1500,"system\trvswave.dll/h"
name "Luka"
>Black Alice...!\
name ""
name "Black Alice"
>Hehehe... Will you play with me a little?@
>I'd really love to see that power of yours...\
name ""
>Black Alice stands before me with a thin smile on her face.\
name "Luka"
>...Alice, how much longer until you're done!?\
name ""
lsp 700,":a;chara\alice_st81.bmp",-170,50
lsp 701,":a;chara\alice8th_st01.bmp",160,0:print 10,500
name "Alice"
>I'm going as fast as I can, but I need five more minutes!@
>Hold her off somehow!\
name ""
name "Luka"
>Got it, I'll hold her back!\
name ""
csp 701
lsp 700,":a;chara\alice8th_st01.bmp",0,0:print 10,500
>I pull my sword out, and take up a defensive stance in front of Alice.@
>I haven't felt this kind of oppressive pressure since I fought Alice in the Monster Lord's Castle...\
r@k@\
goto *alice8th1_start



*sean0395

bgm "bgm\kiki2.ogg"
name ""
r@k@\
name "Luka"
>What are you doing...?\
name ""
>This isn't all the power Black Alice should have.@
>Why is she stopping the fight here?\
lsp 700,":a;chara\alice8th_st01.bmp",0,0:print 10,500
name "Black Alice"
>I've got a good grasp on your power.@
>It would be a killjoy to interfere too much right now...\
name ""
>Black Alice's eyes narrow as she looks to her side.\
name "Black Alice"
>...It's not nice to peep you know?@
>Is there something strange about me that fascinates you so?\
name ""
dwave 1,"se\aura.ogg"
lsp 700,":a;chara\mob_angel1_st01.bmp",-280,50
lsp 702,":a;chara\mob_angel2_st01.bmp",40,0
lsp 701,":a;chara\mob_angel1_st03.bmp",280,50:print 10,500
>Countless angels start to appear, one after another.\
>I didn't even notice them during our battle, but we're surrounded!\
csp 702
lsp 700,":a;chara\alice8th_st01.bmp",-180,0
lsp 701,":a;chara\mob_angel2_st01.bmp",180,0:print 10,500
name "Chamael"
>...Did you think we trusted you, former Monster Lord?\
>You're here to involve the disgraced Hero in some fashion, and interfere with plans.@
>...That's what Master Eden believes.\
name ""
name "Black Alice"
>...You're making me feel so sad.@> I devoted myself to Ilias.@
>If I'm so untrustworthy, then I guess I have to hand over his disposal to you.\
name ""
lsp 701,":a;chara\mob_angel2_st02.bmp",180,0:print 10,500
name "Chamael"
>Good.@>Leave him to us.\
name ""
name "Luka"
>Guh...!\
name ""
lsp 700,":a;chara\mob_angel1_st01.bmp",-280,50
lsp 702,":a;chara\mob_angel2_st01.bmp",40,0
lsp 701,":a;chara\mob_angel1_st03.bmp",280,50:print 10,500
>Angels surround me from all sides.@
>They're not just low level soldier types, either.\
cspl 701,702
lsp 700,":a;chara\mob_angel3.bmp",0,0:print 10,500
>There's huge, powerful ones to my left...@
lsp 700,":a;chara\mob_angel4.bmp",0,0:print 10,500
>And to my right...\
>And all through the horde are even more high-ranking ones.@
>I can't do anything against these sheer numbers!\
lsp 700,":a;chara\alice8th_st01.bmp",0,0:print 10,500
name "Black Alice"
>Hehe... I want to play again, so good luck.@
>Next time, we'll keep going until you're exhausted...\
name ""
dwave 1,"se\bun.ogg"
csp 700:print 99,1500,"system\trvswave.dll/h"
>Leaving me in this desperate situation, Black Alice vanishes with a strange smile.\
lsp 700,":a;chara\mob_angel1_st01.bmp",-280,50
lsp 702,":a;chara\mob_angel2_st01.bmp",40,0
lsp 701,":a;chara\mob_angel1_st03.bmp",280,50:print 10,500
cspl 701,702
lsp 700,":a;chara\alice_st81.bmp",0,50:print 10,500
name "Alice"
>Urhg, I still need more time!@
>Can you do something, Luka?\
name ""
name "Luka"
>There's so many...@
>And there are really strong ones mixed in, too.\
>...But I'll do something!\
name ""
lsp 700,":a;chara\mob_angel1_st01.bmp",-280,50
lsp 702,":a;chara\mob_angel2_st01.bmp",40,0
lsp 701,":a;chara\mob_angel1_st03.bmp",280,50:print 10,500
>Preparing myself, I take hold of my sword.@
dwave 1,"se\power.ogg"
>Suddenly, a soft wave of light radiates from the monument.\
name "Luka"
>W...What the?\
name ""
name "Chamael"
>Is this a soul...?@
>It can't be... Ilias' seal is breaking?\
name ""
dwave 1,"se\sekihi.ogg"
bgm "bgm\enrika.ogg"
cspl 701,702
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
lsp 700,":a;chara\heinrich_st01.bmp",0,0
csp 2:print 10,300
>The light coming off the monument slowly takes human form.@
>The soul solidifies in the shape of a young man...\
name "???"
>...It looks like the seal weakened.@
>Thanks to you two, I was able to take form.\
name ""
>The soul in the shape of a young man calmly starts talking.@
>Despite his gentle tone, there's a sense of reliable power in his voice.\
name "Luka"
>A...Are you...?\
name ""
name "???"
>It's nice to meet you...@> Sort of?@
>Though I know you well...\
name ""
>His eyes lock with mine as he smiles.\
name "Heinrich"
>I'm Heinrich.@
>People call me a Legendary Hero or something or another.\
name ""
lsp 700,":a;chara\heinrich_st01.bmp",-200,0
lsp 701,":a;chara\mob_angel2_st02.bmp",200,0:print 10,500
name "Chamael"
>Whatever they're doing seems to have weakened the seal.@
>Now some random ghosts are walking around.\
name ""
dwave 1,"se\miss_wind.ogg"
lsp 700,":a;chara\heinrich_st02.bmp",-200,0:print 10,500
>Before the angel finishes her sentence, Heinrich's spectral blade flashes out and back to his sheathe.@
>In the blink of an eye, his attack is already over...\
name "Heinrich"
>Sheesh...@
>Only five hundred years go by, and I'm already unknown to these young angels.\
name ""
lsp 701,":a;chara\mob_angel2_st03.bmp",200,0:print 10,500
name "Chamael"
>Hmph.@>Who cares about the dead?\
lsp 702,":a;chara\mob_angel2_st04.bmp",200,0
lsp 701,":a;chara\mob_angel2_st05.bmp",200,0
for %move=0 to 150 step 10
amsp 702,200+%move,0-%move/10
print 1:wait 20
next
>Eh...?\
name ""
dwave 1,"se\bun.ogg"
cspl 701,702:print 99,1000,"system\breakup.dll/lrB"
>Splitting open, she fades away into particles with a look of surprise.\
lsp 701,":a;chara\mob_angel1_st03.bmp",160,0:print 10,500
name "Veteran Angel Soldier A"
>Impossible...@>How did a ghost cut apart an angel's body!?\
name ""
name "Veteran Angel Soldier B"
>And in a single slash!?@
>Who is this ghost!?\
name ""
lsp 700,":a;chara\heinrich_st01.bmp",-200,0:print 10,500
name "Heinrich"
>One... Two... Three...@> Twenty?@
>That's quite a small number to send against me...\
name ""
dwave 1,"se\karaburi.ogg"
>Heinrich raises his spectral sword high again.@
dwave 1,"se\slash4.ogg"
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
dwave 1,"se\bun.ogg"
csp 701:print 99,1000,"system\breakup.dll/lrB"
>Slashing back and forth like an intense meteor shower, he cuts apart the surprised angels.\
bgm "bgm\ruka.ogg"
name "Heinrich"
>Well, that's just it, isn't it?@
>Five hundred years really dulls your skills.\
name ""
lsp 700,":a;chara\mob_angel1_st01.bmp",-250,50
lsp 701,":a;chara\mob_angel1_st02.bmp",0,50
lsp 702,":a;chara\mob_angel1_st03.bmp",250,50:print 10,500
name "Veteran Angel Soldier"
>Y...You!\
name ""
dwave 1,"se\miss_wind.ogg"
>An angel cries out in surprise.@
dwave 1,"se\bun.ogg"
cspl 700,702:print 99,1000,"system\breakup.dll/lrB"
>But before she can take a step forward, her body breaks apart into three pieces and fades away.\
>His skill is incredible, but...\
name ""
lsp 700,":a;chara\heinrich_st02.bmp",0,0:print 10,500
name "Luka"
>H...How are you attacking an angel directly?@
>With their holy bodies, no attack should be able to touch them...\
name ""
name "Heinrich"
>...I fought against so many angels, my body was bathed in holy energy.@
>My body eroded away in the holy power, so much that even my soul was impacted.\
>That's why they gave me the name Heinrich the Angel Killer.\
name ""
lsp 700,":a;chara\heinrich_st02.bmp",-200,0
lsp 701,":a;chara\mob_angel1_st02.bmp",160,0:print 10,500
name "Veteran Angel Soldier"
>No... I've heard the rumors, but they were actually true!?\
name ""
lsp 700,":a;chara\heinrich_st01.bmp",-200,0
lsp 701,":a;chara\mob_angel1_st02.bmp",160,0:print 10,500
name "Heinrich"
>Ah, so you're a newcomer these last five centuries?@
>You should really pay attention to your elders, you know?\
name ""
dwave 1,"se\miss.ogg"
csp 700:print 10,500
>The Heinrich that was talking was already just an after-image.@
dwave 1,"se\tuki.ogg"
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
dwave 1,"se\bun.ogg"
csp 701:print 99,1000,"system\breakup.dll/lrB"
>Already behind the angel before the words reached her ears, her chest bursts open as she fades into particles.\
lsp 700,":a;chara\mob_angel1_st01.bmp",-250,50
lsp 701,":a;chara\mob_angel1_st02.bmp",0,50
lsp 702,":a;chara\mob_angel1_st03.bmp",250,50:print 10,500
name "Veteran Angel Soldier A"
>This can't be!\
name ""
name "Veteran Angel Soldier B"
>Everyone, attack the damn ghost all at once!\
name ""
csp 702
lsp 700,":a;chara\heinrich_st01.bmp",-200,0
lsp 701,":a;chara\mob_angel1_st03.bmp",160,0:print 10,500
name "Heinrich"
>Sheesh, fighting off this many one by one would be a pain in the neck.@
>...Though I guess as a soul, I don't really have a neck anymore, do I?\
>Luka... Let me borrow your body for a second.\
name ""
name "Luka"
>Eh...?\
name ""
dwave 1,"se\bun.ogg"
csp 700:print 10,500
>Without warning, Heinrich's soul moves into my body.@
>I don't have any objection to him using my body, but I wasn't mentally prepared for this yet...\
name "Luka"
>Wah... Wahwahwah!@
>What are you doing!?\
name ""
name "Heinrich"
>Don't worry, you won't get a scratch on your body.@
>Leave this to me, and just enjoy the show.\
name ""
>With that, my consciousness is pushed to the side as Heinrich takes control.\
lsp 700,":a;chara\mob_angel1_st01.bmp",-250,50
lsp 701,":a;chara\mob_angel1_st02.bmp",0,50
lsp 702,":a;chara\mob_angel1_st03.bmp",250,50:print 10,500
name "Heinrich"
>Luka...@>Your physical power and agility are far above mine.@
>With the help of that angel lineage, you're physically way above me, even when I was at my best.\
>...But there's a price you pay for that power, of course.\
name ""
dwave 1,"se\karaburi.ogg"
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
dwave 1,"se\bun.ogg"
csp 700:print 99,1000,"system\breakup.dll/lrB"
>Heinrich calmly speaks to me as he dispatches angel after angel with incredible sword skills.\
name "Heinrich"
>But I'm still hanging on above you when it comes to actual technique.@
>Though you're pretty close to beating me there, too.\
>You were born with a good sense for fighting, and you've had some good teachers.@> Not to mention all the strong enemies you've fought, one after another.\
>All of that is what helped hone your techniques to what they are today.\
name ""
name "Luka"
>.............\
name ""
dwave 1,"se\miss_wind.ogg"
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
dwave 2,"se\bun.ogg"
csp 701:print 99,1000,"system\breakup.dll/lrB"
>Heinrich lightly dances around, cutting apart even more angels.\
lsp 700,":a;chara\mob_angel1_st01.bmp",-250,50
lsp 701,":a;chara\mob_angel1_st02.bmp",0,50
lsp 702,":a;chara\mob_angel1_st03.bmp",250,50:print 10,500
name "Veteran Angel Soldier"
>How could a creature like this exist down here!?@
>Someone like this is Seraphim class!\
name ""
name "Heinrich"
>...But there's a point where you don't even hold a candle to me.@
>That's in how to handle the spirits.\
name ""
name "Luka"
>Handle... The spirits?\
name ""
name "Heinrich"
>Come, Sylph, Gnome!@
>Undine, and Salamander!\
name ""
skillname1 "Quad Spirit Summon"
vspl 3,650,0
dwave 2,"se\wind2.ogg"
lsp2 2,":c;effect\cutin_wind.bmp",100,150,100,100,0,10
for %move=0 to 200 step 20
msp2 2,0,20,0,0,0,24
print 1:wait 5
next
csp2 2
lsp 10,":c;effect\cutin_wind.bmp",0,0:print 1
dwave 3,"se\earth1.ogg"
lsp2 2,":c;effect\cutin_earth.bmp",300,150,100,100,0,10
for %move=0 to 200 step 20
msp2 2,0,20,0,0,0,24
print 1:wait 5
next
csp2 2
lsp 11,":c;effect\cutin_earth.bmp",200,0:print 1
dwave 4,"se\aqua2.ogg"
lsp2 3,":c;effect\cutin_aqua.bmp",500,150,100,100,0,10
for %move=0 to 200 step 20
msp2 3,0,20,0,0,0,24
print 1:wait 5
next
csp2 3
lsp 12,":c;effect\cutin_aqua.bmp",400,0:print 1
dwave 5,"se\fire2.ogg"
lsp2 4,":c;effect\cutin_fire.bmp",700,150,100,100,0,10
for %move=0 to 200 step 20
msp2 4,0,20,0,0,0,24
print 1:wait 5
next
csp2 4
lsp 13,":c;effect\cutin_fire.bmp",600,0:print 1
cspl 10,13:print 10,600
vspl 3,650,1
csp 0:csp 1
skillname "Quad Spirit Summon"
>Heinrich somehow summons all four spirits at once!\
skillname ""
name "Luka"
>I...Incredible!@>You can do something like that!?\
name ""
cspl 701,702
lsp 700,":a;chara\sylph_st01.bmp",0,0:print 10,500
name "Sylph"
>Yaaay!@> Heinriiiich!\
name ""
name "Heinrich"
>It's been a while, Sylph!@>Come on, lets all dance together!\
name ""
lsp 700,":a;chara\mob_angel1_st01.bmp",-250,50
lsp 701,":a;chara\mob_angel1_st02.bmp",0,50
lsp 702,":a;chara\mob_angel1_st03.bmp",250,50:print 10,500
dwave 1,"se\miss_wind.ogg"
dwave 2,"se\bun.ogg"
cspl 700,702:print 99,1000,"system\breakup.dll/lrB"
>Moving like a whirlwind of death, Heinrich cuts open angels as he dances through them.\
lsp 700,":a;chara\gnome_st11.bmp",0,0:print 10,500
name "Heinrich"
>Gnome, too.@
>Come on, it's been a while, say something will you?\
name ""
lsp 700,":a;chara\gnome_st12.bmp",0,0:print 10,500
name "Gnome"
>..............\
name ""
lsp 700,":a;chara\mob_angel1_st01.bmp",-250,50
lsp 701,":a;chara\mob_angel1_st02.bmp",0,50
lsp 702,":a;chara\mob_angel1_st03.bmp",250,50:print 10,500
dwave 1,"se\karaburi.ogg"
lsp 2,":c;effect\earth.bmp",0,0:print 1
wait 300
csp 2:print 18,500,"system\mask01.jpg"
dwave 1,"se\bom2.ogg"
quake 10,1000
dwave 1,"se\damage2.ogg"
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
dwave 1,"se\bun.ogg"
csp 700:print 99,1000,"system\breakup.dll/lrB"
>A single blow, filled with the power of the earth, crushes an angel into the ground!\
name "Veteran Angel Soldier"
>This can't be!@> This can't be!@
>Stay back, Demon!\
name ""
dwave 1,"se\yumi.ogg"
>Shrinking back in fear, the angels start shooting off arrows.\
name "Heinrich"
>...Even though they're angels, they can still be afraid.\
name ""
dwave 1,"se\miss_aqua.ogg"
>Using Undine's power, Heinrich starts to sway side to side.@
dwave 2,"se\miss_wind.ogg"
>He easily dodges all of the arrows as he continues moving toward the angel archers.\
dwave 3,"se\bun.ogg"
cspl 701,702:print 99,1000,"system\breakup.dll/lrB"
lsp 700,":a;chara\mob_angel4.bmp",0,0:print 10,500
name "Granael"
>He's too powerful... Angel Killer indeed.@
>But I am different from an ordinary angel!\
name ""
name "Heinrich"
>...That so?@>Then shall we use it, everyone?@
>Salamander, you still remember what to do, right?\
name ""
lsp 700,":a;chara\salamander_st12.bmp",0,0:print 10,500
name "Salamander"
>You're the one who has been out of it for five hundred years!\
name ""
name "Heinrich"
>I know, I know...@>Alright, here goes!\
name ""
lsp 700,":a;chara\mob_angel4.bmp",0,0:print 10,500
dwave 3,"se\earth1.ogg"
lsp 2,":a;effect\029_01.bmp",0,0
lsp 2,":a;effect\029_02.bmp",0,0
lsp 2,":a;effect\029_03.bmp",0,0
lsp 2,":a;effect\029_04.bmp",0,0
csp 2
>My...@>No, Heinrich's right arm infuses with the incredible power of the earth.\
dwave 1,"se\aqua4.ogg"
wait 200
dwave 5,"se\fire2.ogg"
wait 200
dwave 2,"se\wind2.ogg"
lsp 2,":a;effect\029_05.bmp",0,0
lsp 2,":a;effect\029_06.bmp",0,0
lsp 2,":a;effect\029_07.bmp",0,0
lsp 2,":a;effect\029_08.bmp",0,0
csp 2
>The wind from his legs, the water from his heart, the fire from his spirit all move to his arm...\
name "Luka"
>What is this technique!?\
name ""
name "Heinrich"
>Infuse the four spirits in my arm and...@> Element Spica!\
name ""
skillname1 "Element Spica"
dwave 2,"se\wind2.ogg"
lsp2 2,":c;effect\cutin_wind.bmp",100,150,100,100,0,10
for %move=0 to 200 step 20
msp2 2,0,20,0,0,0,24
print 1:wait 5
next
csp2 2
lsp 10,":c;effect\cutin_wind.bmp",0,0:print 1
dwave 3,"se\earth1.ogg"
lsp2 2,":c;effect\cutin_earth.bmp",300,150,100,100,0,10
for %move=0 to 200 step 20
msp2 2,0,20,0,0,0,24
print 1:wait 5
next
csp2 2
lsp 11,":c;effect\cutin_earth.bmp",200,0:print 1
dwave 4,"se\aqua2.ogg"
lsp2 3,":c;effect\cutin_aqua.bmp",500,150,100,100,0,10
for %move=0 to 200 step 20
msp2 3,0,20,0,0,0,24
print 1:wait 5
next
csp2 3
lsp 12,":c;effect\cutin_aqua.bmp",400,0:print 1
dwave 5,"se\fire2.ogg"
lsp2 4,":c;effect\cutin_fire.bmp",700,150,100,100,0,10
for %move=0 to 200 step 20
msp2 4,0,20,0,0,0,24
print 1:wait 5
next
csp2 4
lsp 13,":c;effect\cutin_fire.bmp",600,0:print 1
cspl 10,13:print 10,600
vspl 3,650,1
csp 0:csp 1
skillname "Element Spica"
dwave 1,"se\karaburi.ogg"
lsp 2,":a;effect\029_01.bmp",0,0:print 10,40
lsp 2,":a;effect\029_02.bmp",0,0:print 10,40
dwave 3,"se\earth1.ogg"
lsp 2,":a;effect\029_03.bmp",0,0:print 10,40
lsp 2,":a;effect\029_04.bmp",0,0:print 10,40
dwave 5,"se\fire2.ogg"
lsp 2,":a;effect\029_05.bmp",0,0:print 10,40
lsp 2,":a;effect\029_06.bmp",0,0:print 10,40
dwave 2,"se\wind2.ogg"
lsp 2,":a;effect\029_07.bmp",0,0:print 10,40
lsp 2,":a;effect\029_08.bmp",0,0:print 10,40
csp 2:print 10,10
dwave 1,"se\damage2.ogg"
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
>With the power of all four spirits infusing his arm, Heinrich tears apart Granaeru!\
skillname ""
name "Granael"
>It can't be... I...\
name ""
dwave 1,"se\bun.ogg"
csp 700:print 99,1000,"system\breakup.dll/lrB"
>Wind, Earth, Water, Fire...@
>The combined power of all four is incredible.\
name "Luka"
>Something like that is possible...?\
name ""
name "Heinrich"
>...You infuse all four of them just into your arm.@
>Be careful when you practice.@>If you mess up, you'll lose the arm.\
name ""
lsp 700,":a;chara\mob_angel3.bmp",0,0:print 10,500
name "Runael"
>N...No...@
>My allies... So quickly...\
name ""
name "Heinrich"
>One more big one is left.@
>Honestly, this skill shouldn't be used against an enemy this weak, but...\
>...I really want to show you the real thing, just once.\
name ""
name "Luka"
>Eh...?\
name ""
name "Runael"
>Guh... Y...You wo...won't get me!\
name ""
name "Heinrich"
>Come, Sylph...\
name ""
dwave 2,"se\wind2.ogg"
lsp2 0,":a;chara\sylph_st12.bmp",200,300,100,100,0,200
gosub *syoukan_effect
dwave 1,"se\miss.ogg"
>While dodging the angel's frenzied attacks, Heinrich summons the power of the wind into his sword.\
name "Runael"
>What are you doing!?\
name ""
dwave 1,"se\karaburi.ogg"
>The angel sprays feathers all over, trying everything just to hit Heinrich.\
name "Heinrich"
>Gnome...\
name ""
dwave 2,"se\earth1.ogg"
lsp2 0,":a;chara\gnome_st21.bmp",200,300,100,100,0,200
gosub *syoukan_effect
>Swaying side to side, Heinrich continues summoning the spirits.@
>Is this...?\
name "Runael"
>Not able to fight back any longer!?\
name ""
name "Heinrich"
>Undine...\
name ""
dwave 2,"se\aqua2.ogg"
lsp2 0,":a;chara\undine_st11.bmp",200,300,100,100,0,200
gosub *syoukan_effect
>Still dodging, he summons the third spirit.@
>All that's left is one more...\
name ""
name "Runael"
>...How about this!?\
name ""
dwave 1,"se\light.ogg"
>A dazzling wave of energy shoots out from the angel's palm!\
name "Heinrich"
>...........\
name ""
>But Heinrich just holds out his hand, and catches the beam.@
>No... He defended against it with a wall of flame!\
name "Heinrich"
>Salamander...\
name ""
dwave 2,"se\fire2.ogg"
lsp2 0,":a;chara\salamander_st02.bmp",200,300,100,100,0,200
gosub *syoukan_effect
>Moving his hand up his sword, he covers it with the flames he summoned into his hand.\
>Unlike when I try to pull this off, his sword is calm and quiet.@
>But I can still sense the destructive power held within.\
name "Heinrich"
>Learn this, Luka.@
>This is...\
name ""
name "Runael"
>S...Stop!\
name ""
skillname1 "Quadruple Giga"
dwave 2,"se\wind2.ogg"
lsp2 2,":c;effect\cutin_wind.bmp",100,150,100,100,0,10
for %move=0 to 200 step 20
msp2 2,0,20,0,0,0,24
print 1:wait 5
next
csp2 2
lsp 10,":c;effect\cutin_wind.bmp",0,0:print 1
dwave 3,"se\earth1.ogg"
lsp2 2,":c;effect\cutin_earth.bmp",300,150,100,100,0,10
for %move=0 to 200 step 20
msp2 2,0,20,0,0,0,24
print 1:wait 5
next
csp2 2
lsp 11,":c;effect\cutin_earth.bmp",200,0:print 1
dwave 4,"se\aqua2.ogg"
lsp2 3,":c;effect\cutin_aqua.bmp",500,150,100,100,0,10
for %move=0 to 200 step 20
msp2 3,0,20,0,0,0,24
print 1:wait 5
next
csp2 3
lsp 12,":c;effect\cutin_aqua.bmp",400,0:print 1
dwave 5,"se\fire2.ogg"
lsp2 4,":c;effect\cutin_fire.bmp",700,150,100,100,0,10
for %move=0 to 200 step 20
msp2 4,0,20,0,0,0,24
print 1:wait 5
next
csp2 4
lsp 13,":c;effect\cutin_fire.bmp",600,0:print 1
cspl 10,13:print 10,600
vspl 3,650,1
csp 0:csp 1
skillname "Quadruple Giga"
wait 500
dwave 1,"se\karaburi.ogg"
lsp 2,":c;effect\003.bmp",0,0:print 1
wait 300
dwave 3,"se\earth1.ogg"
lsp 2,":a;effect\earth.bmp",0,0:print 1
wait 100
dwave 5,"se\fire2.ogg"
lsp 2,":a;effect\fire.bmp",0,0:print 1
wait 100
dwave 4,"se\aqua2.ogg"
lsp 2,":a;effect\aqua.bmp",0,0:print 1
wait 100
dwave 2,"se\wind2.ogg"
lsp 2,":a;effect\wind.bmp",0,0:print 1
wait 100
csp 2:print 18,500,"system\mask01.jpg"
dwave 1,"se\bom3.ogg"
quake 10,2000
skillname ""
dwave 1,"se\bun.ogg"
csp 700:print 99,1000,"system\breakup.dll/lrB"
>The power destroys even the earth itself.@
>From where he slashed out, the ground itself cracks open, creating a huge chasm.\
name "Heinrich"
>...This is Quadruple Giga.\
name ""
name "Luka"
>.............\
name ""
>I'm stunned into silence.@
>It's at least twice as powerful as when I do it.\
>Every trace of the angels is completely gone.@
>So this is the power of the Legendary Hero...\
bgm "bgm\hutuu4.ogg"
lsp 700,":a;chara\heinrich_st01.bmp",0,0:print 10,500
name "Heinrich"
>...It's about time to say goodbye, Luka.@
>After my long confinement, my soul is completely exhausted.\
>That was the last genocide for Heinrich the Angel Killer.\
name ""
name "Luka"
>This is too horrible...@
>After five hundred years, to disappear the moment you're freed...\
name ""
lsp 700,":a;chara\heinrich_st02.bmp",0,0:print 10,500
name "Heinrich"
>Even if my body is gone, my spirit will return to the cycle of rebirth.@
>...But even so, my soul won't be gone.\
>It will continue on, in your sword and heart.@
lsp 700,":a;chara\heinrich_st01.bmp",0,0:print 10,500
>Luka, you are the successor of the Hero's Soul.\
name ""
name "Luka"
>...Yes!@>I swear it on my blade!\
name ""
lsp 700,":a;chara\heinrich_st03.bmp",0,0:print 10,500
name "Heinrich"
>...Never swear anything on your blade.@
>You must not become like me.\
>You know what I mean, don't you?\
name ""
name "Luka"
>....Yes.\
name ""
name "Heinrich"
>A Hero has two roles.@
>The first is to save the world when it is in trouble.@>The second is to return to those who are waiting for you, after you are finished.\
>Do not forget what happened to me, and how I failed in my second duty.\
name ""
name "Luka"
>Yes... I'll do everything I can.\
name ""
lsp 700,":a;chara\heinrich_st02.bmp",0,0:print 10,500
name "Heinrich"
>Everything you can, huh?@> You're really worrying me...@
>Please, don't be like me...\
name ""
name "Luka"
>............\
name ""
>Heinrich's soul gently smiles.@
dwave 1,"se\wind4.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>And with that, slowly disperses with the wind.\
name "Luka"
>............\
name ""
>I don't know just what he means by inheriting the Hero's Soul...\
>But Heinrich recognized me.@
>I absolutely must meet his expectations!\
bgm "bgm\epilogue2.ogg"
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>...Whew, finally finished.@
>Did you completely forget about me, by any chance?\
name ""
name "Luka"
>U...Uh no...@> Of course not.@
>Did things go well on your end?\
name ""
lsp 700,":a;chara\alice_st72.bmp",0,50:print 10,500
name "Alice"
>Of course.@> I was able to record all the data to the disc.@
>We're done here now.\
name ""
name "Luka"
>...Yes.@>I also got to meet Heinrich...\
name ""
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>I always thought of Heinrich as some buff, musclebound guy.@
>To think he was an easygoing young man...\
>But he was more powerful than I imagined.@
>He truly is the one who took down Alipheese the Eighth...\
name ""
bgm "bgm\hutuu2.ogg"
lsp 700,":a;chara\sylph_st27.bmp",251,190
lsp 701,":a;chara\gnome_st32.bmp",50,50
lsp 702,":a;chara\undine_st23.bmp",-50,180
lsp 703,":a;chara\salamander_st23.bmp",570,125:print 10,500
name "Sylph"
>Mmm... Meh... Meh...\
name ""
>I hear Sylph crying inside of me...\
name "Luka"
>Sylph...\
name ""
name "Sylph"
>Heinrich died...@
>Waah... Waaah...\
name ""
name "Gnome"
>.............\
name ""
lsp 703,":a;chara\salamander_st21.bmp",570,125:print 10,500
name "Salamander"
>Heinrich died five hundred years ago as a human.@
>But now, today, his soul has achieved peace.\
name ""
cspl 702,703
lsp 700,":a;chara\sylph_st27.bmp",201,190
lsp 701,":a;chara\gnome_st32.bmp",70,50:print 10,500
name "Sylph"
>Mmmm... Meh... Meh... Waaaah...\
name ""
name "Gnome"
>...............\
name ""
lsp 701,":a;chara\sylph_st22r.bmp",201,190
lsp 700,":a;chara\gnome_st41.bmp",70,50:print 10,500
name "Sylph"
>Hya!?\
name ""
lsp 701,":a;chara\sylph_st21r.bmp",201,190
lsp 700,":a;chara\gnome_st42.bmp",70,50:print 10,500
name "Gnome"
>..............\
name ""
name "Sylph"
>You're... Giving me a hat?@
>Yaaay! Thank you! \
name ""
>After getting a matching hat, Sylph stops crying.\
bgm "bgm\epilogue2.ogg"
csp 701
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>Alright, let's hurry back to my castle.@
>That was rather difficult... I'm quite tired.\
name ""
name "Luka"
>I'm exhausted myself.@
>I'm sure you four spirits are exhausted after rampaging around like that too, huh?\
name ""
lsp 700,":a;chara\sylph_st32.bmp",-70,70
lsp 701,":a;chara\gnome_st31r.bmp",393,145
lsp 702,":a;chara\undine_st23.bmp",-50,180
lsp 703,":a;chara\salamander_st23.bmp",570,125:print 10,500
name "Sylph"
>..........\
name ""
name "Luka"
>What's wrong Sylph?\
name ""
lsp 700,":a;chara\sylph_st31.bmp",-70,70:print 10,500
name "Sylph"
>I'm a Gnomey clooone! \
>If I cry, then Heinrich would just be sad too. \
lsp 700,":a;chara\sylph_st32.bmp",-70,70:print 10,500
>..............\
name ""
name "Gnome"
>..............\
name ""
>The four of them seem to be in good spirits now.@
>No...@>Perhaps they're just putting forth a brave face for now.\
cspl 700,704:print 10,500
name "Luka"
>Alright, let's head to the Monster Lord's Castle!\
name ""
lsp 700,":a;chara\alice_st72.bmp",0,50:print 10,500
name "Alice"
>...Yes, it's time to discuss our counteroffensive strategy.@
>With what's on this disc, can we finally attack those damn angels directly?\
>Of course, we still have to get control of those four towers to install the seal.@
>We must return to the Castle as soon as possible and devise our plan.\
name ""
csp 700:print 10,500
>We succeeded in copying the data to the disc, but this is only the first step.\
>Filled with the expectation of Heinrich, I head back to the Castle with Alice.\
r@k@\
dwave 1,"se\habataki.ogg"
goto *sean0396



*sean0396

bgmstop
sean_change "bg169"
bgm "bgm\maouzyou2.ogg"
>As soon as Alice and I return, we head to the conference room.@
lsp 701,":a;chara\arumaeruma_st11.bmp",-250,0
lsp 700,":a;chara\erbetie_st01.bmp",235,0
lsp 702,":a;chara\granberia_st04.bmp",280,0:print 10,500
>Outside of Tamamo, the other three Heavenly Knights are already here.\
>I feel somewhat out of place, but since I'll be involved in what's to come, I can't excuse myself.\
cspl 701,702
lsp 700,":a;chara\erbetie_st01.bmp",235,0:print 10,500
name "Erubetie"
>By the way, Luka, I made Jelly earlier.@
>...Would you like to try some?\
name ""
lsp 700,":a;chara\erbetie_st01.bmp",45,0
lsp 701,":a;chara\alice_st77.bmp",180,50:print 10,500
name "Alice"
>...!?\
name ""
name "Luka"
>Thank you...@> But I just ate some dried meat.\
name ""
name "Erubetie"
>I see...\
>.........\
name ""
>Erubetie is acting somewhat suspicious...\
csp 701
lsp 700,":a;chara\granberia_st04.bmp",0,0:print 10,500
name "Luka"
>Granberia, how are you feeling?\
name ""
lsp 700,":a;chara\granberia_st01.bmp",0,0:print 10,500
name "Granberia"
>...I'm in perfect condition.@
>It's the first time I've been defeated and forced to recuperate.\
lsp 700,":a;chara\granberia_st04.bmp",0,0:print 10,500
>But fate is strange, isn't it?@> To think we would be fighting together...\
name ""
name "Luka"
>Yes, it really is strange...@
>But I'm relieved to be on your side.\
name ""
lsp 700,":a;chara\granberia_st03.bmp",0,0:print 10,500
name "Granberia"
>Yes...@> I'm expecting great things, from what you showed me before.\
name ""
lsp 700,":a;chara\granberia_st01.bmp",-170,0
lsp 701,":a;chara\arumaeruma_st11.bmp",170,0:print 10,500
name "Alma Elma"
>It's so nice to have a rival, isn't it? \
>Aww... Little Granberry isn't going to challenge me anymore? That makes me so loneeeely \
name ""
name "Luka"
>...Eh?@> You two fight often?\
name ""
name "Alma Elma"
>Until just recently, Granberry used to challenge me quite often.@
>But I kept winning in victory after victory. \
>Once she realized the difference in our power, she stopped challenging me.\
name ""
lsp 700,":a;chara\granberia_st06.bmp",-170,0:print 10,500
name "Granberia"
>Wh...What are you saying!?@
>I never once admitted defeat!\
name ""
>Granberia is on a losing streak against Alma Elma!?@
>They're both incredibly strong, but I don't think there's so much difference as to put Granberia on a losing streak...\
name "Luka"
>W...What do you mean?\
name ""
lsp 701,":a;chara\arumaeruma_st13.bmp",170,0:print 10,500
name "Alma Elma"
>I mean that Granberry can never beat me. \
name ""
lsp 700,":a;chara\granberia_st02.bmp",-170,0:print 10,500
name "Granberia"
>...Foolishness!@>If that's what you're claiming, then prove it right now!\
name ""
>Granberia rises from her chair, sword in hand.\
csp 701
lsp 700,":a;chara\tamamo_st03.bmp",0,0:print 10,500
name "Tamamo"
>What, what...@>Infighting right before our meeting?@
>I like your energy, but don't you think you have the wrong opponent here?\
name ""
>Tamamo walks into the room.@
dwave 1,"se\tamamo2.ogg"
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
>Slightly hopping as she moves, she jumps into a chair.\
lsp 700,":a;chara\granberia_st01.bmp",-170,0
lsp 701,":a;chara\arumaeruma_st13.bmp",170,0:print 10,500
name "Granberia"
>Alma Elma.@> Nine o'clock tonight.@> The Practice Grounds.\
name ""
name "Alma Elma"
>Hehe... So you want to be beaten down again?@
>I accept your challenge...\
name ""
name "Luka"
>..............\
name ""
>I know just how powerful Alma Elma is.@
>But I just can't imagine her beating Granberia down like that...\
csp 701
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
if %ivent14<3 goto *sean0396_01
if %ivent05<3 goto *sean0396_02
goto *sean0396_03



*sean0396_01

name "Tamamo"
>Sheesh, you two haven't had enough fighting already?@
>You just got back from destroying that Drain Lab...\
name ""
lsp 700,":a;chara\granberia_st01.bmp",-170,0
lsp 701,":a;chara\arumaeruma_st11.bmp",170,0:print 10,500
name "Granberia"
>Hmph...@>Barely even a warm up after my recovery.\
name ""
name "Alma Elma"
>You say that, but it was rather tough...@
>Of course, we smashed it up good.\
name ""
>It sounds like the two of them took over some sort of enemy facility.\
csp 701
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
if %ivent05<3 goto *sean0396_02
goto *sean0396_03



*sean0396_02

name "Luka"
>By the way Tamamo, you look rather worn out...@
>Did something happen?\
name ""
name "Tamamo"
>...I just finished a little bit of violence.@
>We discovered an enemy facility near the Forest of Spirits.\
>I went myself to go and smash it up, and actually found the device maintaining the seal on Alice.\
name ""
lsp 700,":a;chara\alice_st77.bmp",-170,50
lsp 701,":a;chara\tamamo_st01.bmp",160,0:print 10,500
name "Alice"
>What!?\
name ""
name "Tamamo"
>But the device itself is made of holy material, and as such I couldn't even touch it.@
>We'll be talking about it in the meeting.\
name ""
csp 701
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
>With that, Tamamo takes a breath and starts the meeting.\
goto *sean0396_03



*sean0396_03

name "Tamamo"
>...Now, let's begin the strategy meeting.@
>First, I'll go over the summary.\
>We want to utilize the four towers situated around the world to enact our own seal.@
>With that, we'll make it so we can directly attack the angels.\
name ""
lsp 700,":a;chara\alice_st72.bmp",-170,50
lsp 701,":a;chara\tamamo_st01.bmp",160,0:print 10,500
name "Alice"
>So even us monsters can attack them back?\
name ""
name "Tamamo"
>Not only that, it will allow us to interact with everything created with pure holy energy.@
>"The Gate of Heaven" is no exception to this.\
name ""
lsp 701,":a;chara\arumaeruma_st13.bmp",-180,0
lsp 700,":a;chara\tamamo_st01.bmp",160,0:print 10,500
name "Alma Elma"
>So we'll be able to pass through the "Gate of Heaven"?\
name ""
name "Tamamo"
>Yes, that's right.@> It will let us attack them directly.@
>Even more, we can destroy the device that is sealing Alice.\
>We'll be able to drastically alter the course of this war, very quickly.\
name ""
name "Luka"
>That's incredible!\
name ""
>Alice will return to normal, angels will become attackable, and we'll be able to assault their home territory, all at once.\
>With that, the towns and villages all over the world should be able to defend themselves...\
csp 701
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>With the summary over with, now we need to go over concrete details.\
>We have here a disc with the method of sealing away holy energy, but we need one installed in all four towers.@
>Right now, there's a disc with the method for sealing the spirits installed.@> We just need to exchange that one for ours.\
name ""
name "Luka"
>Exchange?@>That's all we have to do?\
name ""
name "Tamamo"
>The exchange is simple, but getting it there isn't.@
>The enemy isn't going to just let you switch it out, after all.\
>The security on these discs is also very troublesome.@>We need to switch all four at the same time.\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\tamamo_st01.bmp",160,0:print 10,500
name "Alice"
>At the same time?@
>Does it have to be simultaneous?\
name ""
name "Tamamo"
>That's right, there's a three second grace period.@
>If they aren't all shifted, then the ones that haven't switched will overwrite the ones that were, rendering the exchange useless.\
>In other words, a big failure.\
name ""
lsp 700,":a;chara\erbetie_st01.bmp",25,0
lsp 701,":a;chara\tamamo_st01.bmp",160,0:print 10,500
name "Erubetie"
>Putting all four in place at the same time, while under threat from the enemy...@
>That seems like quite a difficult strategy to pull off.\
name ""
>As Erubetie said, this will be difficult.@
>If just one of the four towers is jammed up, we'll fail.\
>We can't just visit each one in turn and place the disc.@
>If we have to split up into four groups...\
csp 701
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>...Which is why an appropriate level of power is required.@
>Thus, one Heavenly Knight will go to each location.\
name ""
name "Luka"
>What about me...\
name ""
lsp 700,":a;chara\alice_st73.bmp",-170,50
lsp 701,":a;chara\tamamo_st01.bmp",160,0:print 10,500
name "Alice"
>What about me!?\
name ""
>Alice and I speak at the same time.@
>There's no way we could stay out of this one...\
name "Tamamo"
>Your roles lie elsewhere, as detached forces.\
>Luka, you know the location of the "Gate of Heaven", right?@
>It's the only way for someone from the surface to get to the Heavens.\
>But only pure holy energy can pass through.@
>Even you, as a half angel, are unable to pass through it.\
name ""
name "Luka"
>But once the seal against angels is deployed...\
name ""
name "Tamamo"
>Yes, then you can use the "Gate of Heaven".@
>The moment the Four Heavenly Knights place the discs...\
>As soon as it happens, you invade their territory, a blitzkrieg assault they won't be able to defend against!\
name ""
name "Luka"
>I see...@> A simple role.\
name ""
>It's not complicated... So I was chosen.\
name "Alice"
>Then what of me?@
>I see the point of the Four Heavenly Knights and Luka's roles...\
name ""
name "Tamamo"
>You need to stay in front of the device in the Biolabs.@
>The moment they deploy the seal, you destroy that device.\
>Once you regain your original body, you follow after Luka into the Gate of Heaven.\
name ""
lsp 701,":a;chara\arumaeruma_st11.bmp",-180,0
lsp 700,":a;chara\tamamo_st01.bmp",160,0:print 10,500
name "Alma Elma"
>But... Isn't it dangerous for Luka to go alone?\
>Perhaps he should wait by the sealing device with Alice.@
>Then once we enact the seal, all gather and assault in a group...\
name ""
csp 701
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>They will respond quickly, and amass their forces.@
>If they block off the Gate of Heaven with sheer numbers, we'll never get through that choke point.\
>We have to break through with our elite forces right away, put them in disarray, and secure some sort of foothold.\
>Of course, it is an extremely dangerous mission...@
>But Luka doesn't mind, does he?\
name ""
name "Luka"
>I'll do it!\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\tamamo_st01.bmp",160,0:print 10,500
name "Alice"
>As soon as I regain my body, I'll rush in.@
>Don't do anything rash before then...\
name ""
csp 701
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>Of course, us Four Heavenly Knights will rush in, too.@
>Once we're all in...@> It's all out war!\
name ""
>Storm inside, secure a foothold for our remaining forces, and take down Ilias with our full power...@
>There are going to be a lot of powerful guards there.\
name "Tamamo"
>...That's it for the major details.@
>I'll go over the smaller details with each of you individually later.\
>That's it for the meeting.@
>All of you, rest up so you can be at full power tomorrow!\
name ""
name "Luka"
>You got it!\
name ""
lsp 701,":a;chara\tamamo_st01.bmp",-170,0
lsp 700,":a;chara\granberia_st03.bmp",170,0:print 10,500
name "Granberia"
>Hmph, it will be done!\
name ""
lsp 701,":a;chara\arumaeruma_st11.bmp",-170,0:print 10,500
name "Alma Elma"
>This sounds interesting... \
name ""
lsp 700,":a;chara\erbetie_st01.bmp",405,0:print 10,500
name "Erubetie"
>I'll do it...\
name ""
>The chance to get revenge for their assault on this Castle is almost here.@
>It seems like all four of them are eager to get started...\
csp 701
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>...That last comment was for the Monster Lord to say...@
>...Curse you, Tamamo...\
name ""
name "Luka"
>..............\
name ""
if %ivent02=0 goto *sean0396_04
if %ivent06=0 goto *sean0396_04
if %ivent08=0 goto *sean0396_04
if %ivent09=0 goto *sean0396_04
if %ivent10=0 goto *sean0396_04
if %ivent11=0 goto *sean0396_04
if %ivent12=0 goto *sean0396_04
if %ivent14=0 goto *sean0396_04
if %ivent18=0 goto *sean0396_04
goto *sean0396_05



*sean0396_04

>Thus, the strategy meeting is over.@
>Eager to get started, I return to my room.\
sean_change "bg195"
bgm "bgm\hutuu1.ogg"
name "Luka"
>Tomorrow is finally the decisive battle...\
name ""
>And I'll be taking the most important role...@
>For everyone's sake, and for my own, Ilias must be taken down...\
goto *sean0397



*sean0396_05

mov %check06,1
lsp 700,":a;chara\granberia_st01.bmp",0,0:print 10,500
name "Granberia"
>Now then, what about some training...\
name ""
>As we're all about to depart from the room, Tamamo calls out.\
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>...Wait a moment.@
>There's one more important meeting after this.\
>The Four Heavenly Knights and the Monster Lord should stay, of course.@> But so should you, Luka.@
>You can just sit and watch, if you'd like.\
name ""
name "Luka"
>Important meeting?@> I don't mind, but...\
name ""
>What other meeting could there be after the strategy meeting?@
>It's not like I have anything I have to do, but...\
name "Tamamo"
>Messages have been sent all over the world, inviting our guests.@
>They should all be arriving now.\
name ""
name "Luka"
>All over the world?@
>Just what sort of meeting...?\
name ""
bgm "bgm\colosseum.ogg"
csp 700:print 10,500
>As I tilt my head in puzzlement, a magic circle of teleportation suddenly appears.\
dwave 1,"se\warp.ogg"
>A familiar face appears inside of it...\
lsp 700,":a;chara\saniria_n_st04.bmp",0,0:print 10,500
name "San Ilia King"
>Hrm... Transportation magic?@
>This isn't good for my heart...\
name ""
>The San Ilia King steps out...@> He looks really out of place here...\
name "Luka"
>King, you were invited for this meeting too?\
name ""
lsp 700,":a;chara\saniria_n_st01.bmp",0,0:print 10,500
name "San Ilia King"
>Ah, if it isn't Hero Luka.\
>I am reassured by your presence here.@
>I was worried I wouldn't recognize anyone here...\
name ""
>Saying that, he slowly gazes around the room.@
>There are very few humans who have ever stepped foot inside the Monster Lord's Castle, after all...\
name "San Ilia King"
>...Hmm, the decor reminds me of the Classical period.@
>The lighting isn't so good, but the craftsmanship is excellent.\
>I was expecting a more bizarre furnishing style here...@
>Perhaps an oppressive design to strike fear into your heart.\
name ""
>I thought similar things when I first arrived here...@
>I guess there are unconscious prejudices still.\
lsp 700,":a;chara\saniria_n_st01.bmp",-220,0
lsp 701,":a;chara\tamamo_st01.bmp",160,0:print 10,500
name "Tamamo"
>Why would we want to live in a place like that?@
>Welcome to the Monster Lord's Castle, I am Tamamo of the Four Heavenly Knights.\
name ""
name "San Ilia King"
>I am the King of San Ilia, Peter the Fourteenth.@
>It is a pleasure to meet you, my young lady.\
name ""
lsp 701,":a;chara\tamamo_st04.bmp",160,0:print 10,500
name "Tamamo"
>...Young lady, is it?@
>I'm more than twenty times your age, you know?\
name ""
>Tamamo says that with a laugh...@
>As she does, another magic circle appears in the corner of the room.\
dwave 1,"se\warp.ogg"
csp 701
lsp 700,":a;chara\sabasa_st01.bmp",0,0:print 10,500
name "Sabasa King"
>Hmm, so this is the Monster Lord's Castle?\
name ""
name "Luka"
>T...The King of Sabasa!?\
name ""
>After the San Ilia King comes the Sabasa King.\
>After briefly looking around, his eyes settle on Alice.\
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\sabasa_st02.bmp",200,0:print 10,500
name "Sabasa King"
>...I didn't believe you to be a normal monster.@>But the Monster Lord herself?@
>It seems as though introductions between us aren't necessary...\
name ""
lsp 700,":a;chara\alice_st72.bmp",-170,50:print 10,500
name "Alice"
>Haha... This time, I welcome you to my Castle.\
name ""
csp 701
lsp 700,":a;chara\sabasa_st01.bmp",0,0:print 10,500
>As the Sabasa King sits down, maids of the Castle come to give him a drink.\
lsp 700,":a;chara\sabasa_st01.bmp",-200,0
lsp 701,":a;chara\sara_st32.bmp",200,0:print 10,500
name "Sara"
>Please, have so...@
lsp 701,":a;chara\sara_st34.bmp",200,0:print 10,500
>...F...Father!?\
name ""
lsp 700,":a;chara\sabasa_st04.bmp",-200,0
lsp 701,":a;chara\sara_st34.bmp",200,0:print 10,500
name "Sabasa King"
>Sara!?\
name ""
name "Sara"
>E...Excuse me...\
name ""
dwave 1,"se\asioto4.ogg"
csp 701:print 10,500
>Sara runs away.@
>Dumbfounded, the Sabasa King sits back down.\
dwave 1,"se\warp.ogg"
csp 701
lsp 700,":a;chara\grandnoa_st01.bmp",0,0:print 10,500
>Another magic circle appears, with the Grand Noah Queen arriving.@
>It seems important dignitaries from all over are attending.\
name "Grand Noah Queen"
>Attacked by angels, then invited to the Monster Lord's Castle...@
>The world is turning into a strange place, isn't it?\
name ""
lsp 700,":a;chara\grandnoa_st01.bmp",-200,0
lsp 701,":a;chara\arumaeruma_st11.bmp",160,0:print 10,500
>Her eyes scan the room...@>And stop on Alma Elma.\
lsp 700,":a;chara\grandnoa_st02.bmp",-200,0:print 10,500
name "Grand Noah Queen"
>Oh my, another strange thing.\
>If it isn't the undefeated Queen of the Colosseum, Kyuba.@
>I strictly forbade contestants from entering under false names, but...\
name ""
lsp 701,":a;chara\arumaeruma_st13.bmp",160,0:print 10,500
name "Alma Elma"
>...You aren't going to stop me from participating?\
name ""
name "Grand Noah Queen"
>Though I'm concerned about the continuation of the Colosseum...@
>...There are more important things here.\
name ""
>With that, she sits down next to the Sabasa King.@
cspl 700,701:print 10,500
>Someone else arrives in another magic circle...\
dwave 1,"se\warp.ogg"
lsp 700,":a;chara\grangold_st04.bmp",0,0:print 10,500
name "Grangold King"
>That's quite something...@>Long distance transportation magic?@
>Our Magic Science researchers can only manage things that are within their field of view...\
name ""
lsp 700,":a;chara\grangold_st04.bmp",-160,0
lsp 701,":a;chara\queenant_st01.bmp",160,0:print 10,500
name "Queen Ant"
>The Monster Lord's Castle...@> It has been a while.@
>The last time I was here was during the election for Queen Insect.\
name ""
>The Grangold King and Queen Ant.@
lsp 700,":a;chara\grangold_st04.bmp",-160,0
lsp 701,":a;chara\alice_st71.bmp",170,50:print 10,500
>The King glances at Alice as he takes a seat.\
name "Grangold King"
>Oh my, the traveling Gourmand.@
>So I take it there is something delicious here?\
name ""
lsp 701,":a;chara\alice_st72.bmp",170,50:print 10,500
name "Alice"
>I am the Monster Lord, Alipheese the Sixteenth.\
name ""
name "Grangold King"
>Yes, I know...@
>I am in your debt for what occurred before.\
name ""
>He nods respectfully toward Alice, and takes a seat.@
>Queen Ant sits down right next to him.\
cspl 700,702:print 10,500
name "Luka"
>This is incredible...@
>The four leaders of the great human nations all in the Monster Lord's Castle...\
name ""
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>There are still more to come.@
>This meeting would be incomplete with only the human leaders.\
name ""
>It's true there are still more free seats.@
>If not just the leaders of the human nations, then...\
lsp 700,":a;chara\queenelf_st01.bmp",-200,0
lsp 701,":a;chara\queenfairy_st01.bmp",160,0:print 10,500
name "Queen Elf"
>Oh, so others have already arrived?@
>I am the leader of the Elves, Queen Elf.\
name ""
name "Queen Fairy"
>I'll join in, too.@
>I represent the Fairies of the world...\
name ""
>That's right, these two were staying in the Castle, weren't they?\
lsp 700,":a;chara\queenelf_st01.bmp",-200,0
lsp 701,":a;chara\sabasa_st01.bmp",200,0:print 10,500
>Queen Elf eyes the Sabasa King as she sits down.\
name "Queen Elf"
>So you are the King of Sabasa.@
>This is the first time we have been face to face.\
name ""
name "Sabasa King"
>Yes... I was thinking we should meet together formally one day.@
>But to think this would be the situation in which we met...\
name ""
cspl 700,701:print 10,500
>There are still some more open seats.@
>Monsters whom I recognize right away show up next.\
lsp 700,":a;chara\queenhapy_st11.bmp",-210,0
lsp 701,":a;chara\a_emp_st21.bmp",310,30:print 10,500
name "Queen Harpy"
>Forgive me for keeping you all waiting.@>I am the leader of the Harpies, Queen Harpy.\
name ""
name "Alra Priestess"
>I represent Plansect, I am Alra Pri...@
>No, Queen Alraune.\
name ""
>Queen Alraune and Queen Harpy arrive.@
>After that, leaders of some of the major towns show up...\
lsp 700,":a;chara\sirohebi_st11.bmp",-170,0
lsp 701,":a;chara\succubus_st01.bmp",170,50:print 10,500
name "Shirohebi"
>I come as the head of the humans and monsters of Yamatai Village, Shirohebi.\
name ""
name "Succubus"
>I serve as the mayor of Succubus Village, Succubus.\
name ""
>The last two arrivals show up, and take their seats.@
>With that, the summit of the world leaders has finished gathering, filling the seats.\
csp 701
lsp 700,":a;chara\alice_st73.bmp",0,50:print 10,500
>In front of the world's leaders, Alice begins speaking.\
name "Alice"
>...Everyone is already aware of the crisis facing the world.@
>Thus, the leaders of the various countries have been gathered together here.\
>Our races and genders may be different, but we have one thing in common.@
>That is Luka.@>We are all linked together by him and his actions.\
>Oi, Luka.@>Say something as the Hero.\
name ""
name "Luka"
>M...Me!?\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>It doesn't have to be something big, just a light greeting to get this started.\
name ""
name "Luka"
>.............\
name ""
>The eyes of the leaders of the world are all on me.@
>Opening my mouth, I...\
csp 700:print 10,500
r@k@\
csel "Talk about coexistence",*sean0396_06a,"Talk about a hero's fighting spirit",*sean0396_06b,"The world shall be mine!",*sean0396_06c,"Keep quiet",*sean0396_06d



*sean0396_06a

name "Luka"
>Uhm...@> I'm not exactly a pure human.@
>My father was human, but my mother was an angel...\
>But I'm proud of who I am.@
>My existence itself is proof that humans and angels can understand each other.@
>...For if not, then I wouldn't even exist.\
name ""
>All of them are silent as they listen to me.@
>With the ears of those who govern the world focused on me, I continue.\
name "Luka"
>I've met all of you along my journey, and many others that aren't here today.\
>I don't know if everything I did was right...@
>...No, I'm sure I made mistakes along the way.\
>But I still did everything I could in the name of coexistence.\
>As a result, the Monster Lord and I were able to understand each other.@
>If that's possible, then other humans and monsters should be able to, too.\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>...Yes, that's right.@
>There's no reason for us to be hostile against each other.\
name ""
csp 700:print 10,500
name "Luka"
>But...@> The one who is clearly wrong is Ilias.\
>Ilias denies any chance for peaceful coexistence.@
>Following that path, she's planning to destroy and re-create the world itself.\
>We have to defeat Ilias, and create a world where we can all live together in peace.@
>To do that, all of us have to be united.\
>...That's all from me...\
name ""
>After stumbling through my heart filled speech, I sit down with a sigh.@
>After a second, they start to clap.\
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>Luka is younger than everyone else here.@
>But he's still fought all over the world, aiming for coexistence.\
>Some may think him inexperienced, naive and idealistic...@
>But if it wasn't for him, we would not be here together today.\
name ""
lsp 700,":a;chara\grangold_st04.bmp",0,0:print 10,500
name "Grangold King"
>I completely agree.@
>For our country, living together in peace with monsters is not idealism.\
>The reality is right in front of our eyes, and a goal of our administration.\
name ""
lsp 700,":a;chara\grangold_st04.bmp",-200,0
lsp 701,":a;chara\sabasa_st01.bmp",160,0:print 10,500
name "Sabasa King"
>I don't think anyone here today will say it's idle idealism.@
>For if we don't, then we are on the path to extinction...\
>...We must remove Ilias for this.\
name ""
lsp 700,":a;chara\grandnoa_st01.bmp",-200,0:print 10,500
name "Grand Noah Queen"
>Coexistence will be difficult, but can be attained through the efforts of all citizens.@
>As those in positions of power, we must be truthful to our charges about the times to come.\
name ""
csp 701
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>Hmmhmm...@>How about some words from the monster side?\
name ""
lsp 700,":a;chara\succubus_st01.bmp",0,50:print 10,500
name "Succubus"
>I have nothing to add...@
>It's obvious that we would perish without being able to live alongside humans.\
name ""
lsp 700,":a;chara\succubus_st01.bmp",-170,50
lsp 701,":a;chara\queenhapy_st11.bmp",170,0:print 10,500
name "Queen Harpy"
>We depend on humans more than they believe.\
>The monsters here today are in charge of their respective races and families.@
>We know well that without humans, our race would die out in the next generation.\
name ""
lsp 700,":a;chara\saniria_n_st01.bmp",-200,0:print 10,500
name "San Ilia King"
>...We must work to break down stereotypes and fears.@
>Most humans believe monsters are set out to destroy the human race.\
name ""
csp 701
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>Yes...@> We will need to address the relations between humans and monsters in the future.\
>But for right now, we must work together to face the threat approaching us.@
>We are actually preparing for a large scale counteroffensive.\
name ""
goto *sean0396_06e



*sean0396_06b

>I sheepishly open my mouth and start speaking...\
name "Luka"
>The shadow of evil has covered the world.@
>At last, Goddess Ilias has shown her true face.\
>Her aim is to eradicate all humans and monsters.@
>Then re-creating the world in a manner more convenient for herself.\
name ""
>All of them are silent as they listen to me.@
>With the ears of those who govern the world focused on me, I continue.\
name "Luka"
>Humans and monsters are not Ilias' toys!@
>We are living every day to the fullest here!\
>Just because the humans are turning away from her...@
>She wants to destroy everything!@> That isn't how a Goddess should be!\
>So I'll fight against her!@
>Everyone, will you please lend me your power?\
>Even if we lose a Goddess, even if we have to rely on ourselves...@
>We'll prove that we can live on, without some ruler in the sky!\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>...Yes, exactly.@
>It's that belief that brought everyone here today.\
name ""
csp 700:print 10,500
name "Luka"
>My sword is the blade that smites evil.@
>As the Hero, I will fight evil to its end!\
>...That's all from me...\
name ""
>After stumbling through my heart filled speech, I sit down with a sigh.@
>After a second, they start to clap.\
lsp 700,":a;chara\tamamo_st04.bmp",0,0:print 10,500
name "Tamamo"
>...As a fake Hero, anyway.\
name ""
name "Luka"
>............\
name ""
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>But... Heinrich was an unbaptized fake Hero as well.@
>You knew that already though, didn't you King of San Ilia?\
name ""
lsp 700,":a;chara\saniria_n_st01.bmp",-220,0
lsp 701,":a;chara\tamamo_st01.bmp",160,0:print 10,500
name "San Ilia King"
>...You are quite well informed.@
>That's a fact known only in the highest levels of the Church.\
>It's true, the legendary Hero Heinrich was not baptized.@
>Thus, he was not influenced by either Ilias or the Church.\
name ""
name "Luka"
>I...Is that so?\
name ""
>Heinrich was just like me...@
>An unbaptized, nominal Hero.\
csp 701
lsp 700,":a;chara\grangold_st04.bmp",0,0:print 10,500
name "Grangold King"
>I see... Heinrich wasn't baptized.@
>But is there a single human in this world who would not consider him a Hero?\
name ""
lsp 700,":a;chara\grangold_st04.bmp",-200,0
lsp 701,":a;chara\sabasa_st01.bmp",160,0:print 10,500
name "Sabasa King"
>It's the same for Luka.@
>His successes have brought hope to everyone the world over.\
name ""
lsp 700,":a;chara\grandnoa_st01.bmp",-200,0:print 10,500
name "Grand Noah Queen"
>A Hero is one who gives hope and courage to the people.@
>Neither the endorsement of the Church nor a Goddess can change that.\
name ""
csp 701
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>Yes...@> Everyone is coming together, thanks to the heart of the Hero.@
>We are actually preparing for a large scale counteroffensive.\
name ""
goto *sean0396_06e



*sean0396_06c

name "Luka"
>The world shall be mine...\
name ""
lsp 700,":a;chara\alice_st77.bmp",0,50:print 10,500
name "Alice"
>Huh?\
name ""
name "Luka"
>...The world shall be mine.\
name ""
lsp 700,":a;chara\tamamo_st03.bmp",0,0:print 10,500
name "Tamamo"
>He has been fighting in fierce battles for days now...@
>We must not put such a burden on Luka's body and mind.\
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
>...Therefore, I have a story I want you all to hear.@
>We are actually preparing for a large scale counteroffensive.\
name ""
goto *sean0396_06e



*sean0396_06d

name "Luka"
>I'll stay quiet...\
name ""
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>I...I see...\
name ""
lsp 700,":a;chara\tamamo_st03.bmp",0,0:print 10,500
name "Tamamo"
>Well, we won't force you to...@
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
>...Alright then, let's cut to the chase.@
>We are actually preparing for a large scale counteroffensive.\
name ""
goto *sean0396_06e



*sean0396_06e

>After the introduction, Tamamo starts to explain about the strategy we came up with.\
>The Four Heavenly Knights will be dispatched to the towers, and erect the seal.@
>Then we will begin our all out assault against the Heavens.\
lsp 700,":a;chara\tamamo_st01.bmp",-160,0
lsp 701,":a;chara\sabasa_st01.bmp",200,0:print 10,500
name "Sabasa King"
>I see...@> So then we could attack Ilias herself.@
>But...\
name ""
lsp 700,":a;chara\grandnoa_st01.bmp",-200,0:print 10,500
name "Grand Noah Queen"
>But there is little military force we can spare.@
>We are unsure ourselves whether we can defend against another assault with what we have...\
name ""
lsp 701,":a;chara\sirohebi_st11.bmp",160,0:print 10,500
name "Shirohebi"
>Yamatai also took considerable damage during the last assault.@
>We have our hands full in organizing our defenses...\
name ""
csp 701
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>You don't need to send forces to this final battle.@
>...No, far from it.\
>The Heavens themselves are organizing for another assault.@
>According to information we've obtained, that assault will begin tomorrow.\
name ""
name "Luka"
>Tomorrow!?\
name ""
>That's the first I've heard of this...@
>Those global attacks are going to start all over again tomorrow?\
name "Tamamo"
>In truth, this is why we wanted everyone assembled together today.@
>The perfect chance for this invasion to work, is precisely when their forces are all tied up in their own assaults.\
name ""
lsp 700,":a;chara\tamamo_st01.bmp",-160,0
lsp 701,":a;chara\sabasa_st01.bmp",200,0:print 10,500
name "Sabasa King"
>...I see, I understand.@
>With their troops all deployed, there will be virtually no defenses in the Heavens itself, as they assume it is protected.\
>So our role is to occupy their armies...\
name ""
name "Tamamo"
>...Yes, you catch on quick.@
>When Luka invades the Heavens, they will try to withdraw their armies.\
>Each defending army must stop this withdrawal.\
name ""
lsp 701,":a;chara\grangold_st04.bmp",200,0:print 10,500
name "Grangold King"
>Meanwhile, Luka defeats the unguarded Goddess herself?@
>In that case, you have the complete cooperation of the Grangold military.\
name ""
lsp 700,":a;chara\sabasa_st01.bmp",-200,0:print 10,500
name "Sabasa King"
>It's unavoidable.@
>Our armies will destroy any invaders who step foot on our sands.\
>I won't allow a single angel to make it back to the Heavens.\
name ""
lsp 701,":a;chara\grandnoa_st01.bmp",200,0:print 10,500
name "Grand Noah Queen"
>Our Colosseum is full of strong warriors.@
>We will give the enemy a demonstration they won't forget.\
name ""
lsp 700,":a;chara\saniria_n_st01.bmp",-200,0:print 10,500
name "San Ilia King"
>Our order of Holy Knights will protect our country against any and all who would threaten the populace.@
>Even if their opponents are angels.\
name ""
>Thus, all the members swear to resist, and agree to the plan.\
csp 701
lsp 700,":a;chara\grandnoa_st01.bmp",0,0:print 10,500
name "Grand Noah Queen"
>Perhaps we can band together with our neighbors, and put forth a united front?\
name ""
lsp 700,":a;chara\grandnoa_st01.bmp",-200,0
lsp 701,":a;chara\queenhapy_st11.bmp",180,0:print 10,500
name "Queen Harpy"
>I'll dispatch Harpies as messengers between the countries.@
>Would using the Monster Lord's Castle as headquarters be acceptable?\
name ""
lsp 700,":a;chara\queenelf_st01.bmp",-180,0:print 10,500
name "Queen Elf"
>I shall organize our Elf Archers to act as reserve forces.@
>If things take a turn for the worse in any locale, we shall dispatch at once.\
name ""
lsp 701,":a;chara\queenfairy_st01.bmp",180,0:print 10,500
name "Queen Fairy"
>Leave the transportation of troops and supplies to us Fairies.@
>If we concentrate our magical powers, we can expand our network of transfer magic through the world.\
name ""
cspl 700,701:print 10,500
>Putting forth plans for logistics and support, the forces of the world seem to quickly unite as one.\
>With everyone at risk from the coming crisis, our goals have all become the same.\
>With that, the summit of human and monster leaders ends in success.@
>The rulers, united in spirit, each return to their home countries to prepare for tomorrow's coming battle.\
sean_change "bg195"
bgm "bgm\hutuu1.ogg"
name "Luka"
>That was incredible...@
>But tomorrow, the decisive battle is going to start.\
name ""
>And I'll be taking the most important role...@
>For everyone's sake, Ilias must be taken down...\
goto *sean0397



*sean0397

name "Luka"
>...It's a little bit too early to go to sleep though.@
>Should I take a walk around the Castle for a bit?\
name ""
>Of course, I have to rest before tomorrow's battle...@
>But it's far too early to even try to go to sleep.\
dwave 1,"se\door2.ogg"
>With that, I head out of my room.\
r@k@\
dwave 2,"se\asioto3.ogg"
goto *city45_main0



*sean0398

sean_change "bg195"
bgm "bgm\hutuu1.ogg"
name "Luka"
>Whew...\
name ""
>I head back to my own room, and sit down on my bed.@
>With the final battle tomorrow, it's hard for me to calm down...\
dwave 1,"se\knock.ogg"
name "Alice"
>Luka... May I come in?\
name ""
>Alice knocks on my door as usual...@
dwave 2,"se\door2.ogg"
bgm "bgm\alice1.ogg"
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
>And without waiting for a reply, moves inside.\
name "Luka"
>What's wrong?\
name ""
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>I'm hungry...@
>Not this body, but my true body.\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
>The moment I return to my true form, I'm attacked by hunger pains.@
>If that happens during the final fights, then we'll be in trouble...\
name ""
name "Luka"
>Ah... Yeah, that would be bad...\
name ""
>I have an idea about where this is leading, but I just give a noncommittal answer.\
lsp 700,":a;chara\alice_st72.bmp",0,50:print 10,500
name "Alice"
>Tamamo gave me some advice...@
>Return to my true body, and then feast on some semen.\
name ""
name "Luka"
>But can't you only return to your true body for a few seconds?\
name ""
name "Alice"
>If I'm sucking semen from a man during it, then I can maintain the form.@
>So that's how I'm going to sate my hunger...\
name ""
name "Luka"
>You don't mean from me right n...\
name ""
name "Alice"
>I ask thee, eternal time...
>Reveal my body, yoked in twilight...\
name ""
>Without waiting for me to reply, Alice chants the words of dispel!\
name "Luka"
>W...Wait a second!\
name ""
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
lsp 700,":a;chara\alice_st02b.bmp",67,0
csp 2:print 10,300
name "Alice"
>...Return my true body to me.\
name ""
>Without stopping, she returns back to her true body!\
r@k@\
goto *sean0399



*sean0399

name "Alice"
>Now Luka, let me suck out some semen...\
name ""
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
>Alice's snake body coils around me while I'm still confused about what's going on.@
>Like that, she easily throws me to the floor.\
name "Luka"
>W...Wai... Ah!\
name ""
>Alice leans over me while I feebly squirm in her embrace.\
lsp 700,":a;chara\alice_H11_1.bmp",0,0:print 10,500
>Not with us lying on top of each other in the same direction, but in opposite directions.@
>Alice's upper body is over my lower body...\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice11_01.ogg"
>Your penis is already big... What are you expecting to happen here?
>No matter how skilled your sword arm gets, your lower body is still so weak...\
name ""
dwavestop 0
>Alice presses her large chest against my groin area.@
>And using her hands, slips my penis between her breasts.\
name "Luka"
>Ah...Ah!\
name ""
>Her large, soft breasts press against my penis from both sides.@
>Just feeling them against my penis is enough to make me cry out in surprised pleasure.\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice11_02.ogg"
>Hoora... I'll put it between these breasts you love.
>Haha, you're overwhelmed with just this, aren't you?\
name ""
dwavestop 0
name "Luka"
>I...I am not...!\
name ""
>My pride won't allow me to surrender here.@
>I try to start struggling against the stimulation, but Alice's waist is pressed against my face.\
>She presses her vagina against my mouth, cutting off my protests.\
name "Luka"
>Nnn... Mmmff...\
name ""
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice11_03.ogg"
>Hoora... This will keep you quiet.
>You may lick my pussy too, of course. Haha...\
name ""
dwavestop 0
name "Luka"
>Nnn...Nnn!!!\
name ""
>Even if I try to shake my head side to side, I can't get away from her vagina.@
>Her smell slowly fills my nose and senses.\
>The thick, sweet smell of a young woman...@
>As the powerful smell of Alice fills more of my senses, it seems to paralyze both my body and mind.\
>This intoxicating fragrance is taking away my reason...\
name "Luka"
>Nn...nnn....\
name ""
>I stick out my tongue, and press it against her entrance.@
>I don't even know if it's my own will doing this any longer.\
>It's neither me servicing her, or doing a sexual counterattack...@
>It's more like I've lost control of my desires, and I'm just giving in to my instinct.\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice11_04.ogg"
>Haha... Awkward like a starving dog.
>And what crude tongue skills... Did you think I would feel something from that?\
if %con_hvoice=0 dwave 0,"voice\alice11_05.ogg"
>This is how you use a tongue...\
name ""
mov %hseanvoice,6:hseanvoice
lsp 700,":a;chara\alice_H11_2.bmp",0,0:print 10,500
>Alice's tongue reaches out, and starts to lick my glans!\
name "Luka"
>Nnnnnn!!!\
name ""
>The incredible pleasure makes my own tongue stop moving.\
>My every sense focuses on her slightly rough tongue, running across my urethral opening and down my back muscle.\
>She sometimes licks around right under the neck of my penis, getting my whole member wet with her saliva.\
>Her touch blows away any last feeling of rebellion or reason I had left.\
name "Luka"
>Nnngg...\
name ""
name "Alice"
if %con_hvoice=0 dwavestop 13:dwave 0,"voice\alice11_06.ogg"
>*Lick* Haha, what's wrong?
>Your tongue stopped moving?\
if %con_hvoice=0 dwave 0,"voice\alice11_07.ogg"
>You seem to have forgotten that this is a competition of sexual skills.
>If you don't tease me back, you'll just pitifully orgasm you know?\
name ""
mov %hseanvoice,6:hseanvoice
name "Luka"
>Nnn... Nnng...\
name ""
>Urged on by her taunting, I start to attack her vagina with my tongue again.@
>But the pleasure I'm getting on the other end has fried my brain.\
>My whole body seems to be melting away in ecstasy as her tongue attacks my glans.@
>Meanwhile I'm just licking her, coveting her taste and aroma more than trying to tease her...\
name "Alice"
if %con_hvoice=0 dwavestop 13:dwave 0,"voice\alice11_08.ogg"
>Hahaha... So awkward...
>Did you think you could surpass me with skills like that?\
name ""
dwavestop 0
name "Luka"
>Nnng... Nnng!\
name ""
>I summon all of the presence of mind I have left to resist.@
>The most I can do is lick her and squirm my body, though.\
>But even that modest amount of resistance is held down by Alice's snake body.\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice11_09.ogg"
>Well then, it's time to give you the final blow...
>Think well on your incompetence as you spout out your semen!\
name ""
mov %hseanvoice,6:hseanvoice
>Alice slowly squeezes my penis harder between her two large breasts.@
>My glans, poking out from between her breasts, is at her tongue's mercy.\
>Licking me clean with her tongue, I'm quickly brought to surrender...\
name "Luka"
>Nnnng!@> Nnnn!!!\
name ""
>There's nothing I can do as Alice brings me to a powerful finish.\
gosub *syasei1
lsp 700,":a;chara\alice_H11_3.bmp",0,0
gosub *syasei2
>Alice smiles in triumph as I explode, my semen shooting out onto her face and breasts.\
name "Alice"
if %con_hvoice=0 dwavestop 13:dwave 0,"voice\alice11_10.ogg"
>Haha, an unsightly white flag came up...
>This match was my complete victory...\
if %con_hvoice=0 dwave 0,"voice\alice11_11.ogg"
>But I'll permit a rematch.
>Hoora, it's time for the second round!\
name ""
dwavestop 0
name "Luka"
>W...Wai... Nng!\
name ""
>Alice presses her vagina against my face again, sealing off my words.@
>Lost in the throes of pleasure again, all I can do is greedily lick her vagina.\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice11_12.ogg"
>Already lost the will to fight? Or are you going to tease me?
>Sorry, but this time I'm going to finish you in an instant...\
name ""
mov %hseanvoice,7:hseanvoice
>Alice uses her hands to rub her breasts against my penis in opposite motions.@
>Rubbing me between her large breasts, the stimulation is far more intense than the two sided pleasure from before.\
>With her tongue running over my glans, and the massage and pressure from her soft breasts, I'm writhing and moaning under her in seconds.\
name "Luka"
>Nnnng!@> Nnnnn!!!\
name ""
>With my tongue licking her as fast as I can, I can only manage moans as my body spams under her.\
name "Alice"
if %con_hvoice=0 dwavestop 13:dwave 0,"voice\alice11_13.ogg"
>Hoora, quickly shoot out your white flag...
>Scatter your miserable fluids that show off your defeat...\
name ""
mov %hseanvoice,7:hseanvoice
name "Luka"
>Nnnn!!!\
name ""
>My penis is squished between her large breasts.@
>That tight embrace of her soft, smooth flesh...\
>And with her tracing the tip of my penis with her tongue at the same time, I'm quickly led to my limit.\
name "Luka"
>Nnnn!!!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice_H11_4.bmp",0,0
gosub *syasei2
>I explode between her breasts, my semen clouding her face...@
>But still, Alice won't let up.\
name "Luka"
>Nnngg... Let's... Stop...\
name ""
name "Alice"
if %con_hvoice=0 dwavestop 13:dwave 0,"voice\alice11_14.ogg"
>Haha... Where did that air of importance you had before go?
>This awkward, agonized look suits you far better...\
if %con_hvoice=0 dwave 0,"voice\alice11_15.ogg"
>Hora... It's time for round three.
>I'll finish this one quickly, too!\
name ""
mov %hseanvoice,7:hseanvoice
>Alice uses her breasts and mouth in another violent assault.@
>Already beyond helpless, my body melts away in her touch, completely at her mercy.\
name "Luka"
>Nnng... Nnnn!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice_H11_5.bmp",0,0
gosub *syasei2
>And as easily as that, I explode on her again.@
>Beaten down by pleasure, it was a complete loss to her.\
name "Alice"
if %con_hvoice=0 dwavestop 13:dwave 0,"voice\alice11_16.ogg"
>...Haha, well that's how it is.
>You realize that you can't overcome me yet, right?\
name ""
dwavestop 0
name "Luka"
>Ahh...\
name ""
>A large amount of my white semen is covering Alice's face and breasts.@
>It's proof of my horrible defeat to her...\
>The mix of pleasure, shame and irritation at the loss all come together with the weakness from the repeated ejaculations.\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice11_17.ogg"
>Sheesh, fainting after being beaten down a little?
>Such a pathetic finish... Hahaha.\
name ""
dwavestop 0
name "Luka"
>Ah...ah...\
name ""
>Despite the decisive final battle being tomorrow, I faint away in exhaustion.\
gosub *anten
>...............\
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_alice11,1
goto *sean0399a



*sean0399a

bgmstop
sean_change "bg186"
name ""
r@k@\
bgm "bgm\stein.ogg"
lsp 700,":a;chara\stein_st01r.bmp",0,0:print 10,500
name "Promestein"
>After everything, it's down to just me...\
name ""
>Promestein, alone in the laboratory, mumbles to herself.\
>Lucia vanished, Laplace was destroyed along with the Drain Lab, and La Croix is no more.\
name "Promestein"
>That damn Lucia...@> Sending this to me... Honest to a fault.@
>But since you betrayed us, you're an enemy...\
name ""
>A bunch of research reports were sent from Lucia.@
>All of the data she obtained while using Promestein's research laboratory.\
>Included in the bundle of reports, a letter thanking Promestein for her assistance up until she betrayed her.\
name "Promestein"
>The last records from the Drain Lab arrived, too...\
name ""
>In other words, the activity logs up until it exploded.\
>Inside those logs, the destruction order was noted.@
>But unlike her orders, there was a five minute delay added.\
>An alteration of orders that should have been impossible.@
>But it's clearly shown, right in the logs...\
name "Promestein"
>Laplace...@> Are these five minutes your answer?@
>Were you able to find meaning in your existence?\
name ""
>Communications with the Biolabs was completely cut off.@
>The entire facility is under the control of the Monster Lord's side.\
name "Promestein"
>La Croix... You yourself said it.@>You're just a corpse with no heart.\
name ""
>She purposefully went to where her younger sister was, and showed off her hand.@
>And then withdrew...\
>No matter what strategy she was following, her actions were clearly illogical.@
>La Croix was obviously distracted by the lingering feelings for her younger sister...\
name "Promestein"
>I've decided, La Croix...@>You were not just a shell imbued with another's memories and emotions.\
>You were just a researcher, frightened at losing control of your own sense of self.@
>Since it was you, I'm sure you realized it in the end...\
name ""
>That's why Shirome suffered so much, and kept bouncing between madness and reason.\
lsp 700,":a;chara\stein_st03.bmp",0,0:print 10,500
name "Promestein"
>Lucia, Laplace, La Croix...@
>I wish I could speak with you all again... To discuss the answers you each came to.\
name ""
>But now she is alone.@
>Unable to find answers to her own questions...\
bgmstop
csp 700
bg "bg\bg233.bmp",99,3000,"system\lngtwave.dll/vwi"
bgm "bgm\sinpi1.ogg"
lsp 700,":a;chara\stein_st32.bmp",-180,0
lsp 701,":a;chara\mob_angel2_st02.bmp",180,0:print 10,500
name "Promestein"
>...Master Hermes, I've finished the new edition of "The Dawn of the New Era".@
>I've also added notes in five hundred and sixty places to "Writings from Ilias about Time".\
name ""
name "Hermes"
>...Such splendid work, Promestein.@
>You truly are the best clerk in the Heavens.\
>Please keep up your best for Master Ilias' sake.\
name ""
name "Promestein"
>Yes, for Ilias...@
lsp 700,":a;chara\stein_st31.bmp",-180,0:print 10,500
>...............\
name ""
>Her eyes remain focused on the candle burning on the side of the desk.\
name "Promestein"
>...Master Hermes, may I ask a question?@
>How come that wax melts?\
>What kind of phenomenon is occurring there?\
name ""
lsp 701,":a;chara\mob_angel2_st01.bmp",180,0:print 10,500
name "Hermes"
>Again, Promestein?@
>It's because it is influenced by the benevolent power of Ilias.\
>It was created with a method bestowed upon us by Ilias.@
>To attempt to unravel its mystery is a sin.\
name ""
lsp 700,":a;chara\stein_st33.bmp",-180,0:print 10,500
name "Promestein"
>...Forgive my impudence.\
name ""
name "Angel"
>...Weirdo.\
name ""
>Her fellow angels, overhearing their conversation, start to mutter and ridicule her.\
>Despite them being poor workers... Despite their intelligence not matching hers...@> They still ridicule her.\
lsp 700,":a;chara\stein_st31.bmp",-180,0:print 10,500
name "Promestein"
>..........\
name ""
>How can they be satisfied without knowing why things happen as they do?@
>"Because of Ilias' benevolent power" isn't an acceptable answer to everything...\
>She wants to know the truth herself.@
>Ever since she was young, she has wanted to know the reason for everything...\
bgmstop
sean_change "bg233"
bgm "bgm\sinpi1.ogg"
lsp 700,":a;chara\stein_st32.bmp",-180,0
lsp 701,":a;chara\mob_angel2_st02.bmp",180,0:print 10,500
name "Hermes"
>...Promestein, have you fixed that passage yet?\
name ""
name "Promestein"
>Please wait a moment, Master Hermes.@
>I'll be finished in five minutes...\
name ""
>Writing down stupid notes, explaining a falsehood...@
>She wants to do more than this.\
name "Hermes"
>Don't rush through it, take your time.\
name ""
name "Promestein"
>Yes...\
name ""
>As her brush quickly flows across the page, a butterfly suddenly lands on her desk.@
>Promestein catches it by one of its wings, and inspects it.\
lsp 700,":a;chara\stein_st31.bmp",-180,0:print 10,500
name "Promestein"
>..............\
name ""
name "Hermes"
>Please don't kill things in this sacred library, Promestein.@
>If it's disturbing you, please release it outside.\
name ""
name "Promestein"
>...How do butterflies fly through the air?\
name ""
name "Hermes"
>It's because Ilias created them that way.@
>All creatures were created by Ilias.\
name ""
name "Promestein"
>.............\
name ""
>Another meaningless explanation.@
>Just like these books she works on, it's a complete waste of time.\
>Is it just because it was made that way?@
>Or is there something deeper to this?\
>In the first place, did she even make all of these creatures...?\
lsp 701,":a;chara\mob_angel2_st01.bmp",180,0:print 10,500
name "Hermes"
>You stopped writing, Promestein...\
name ""
name "Promestein"
>...Forgive me, just some slight fatigue.\
name ""
>Promestein releases the butterfly, and resumes writing.\
name "Angel A"
>Haha... "How does a butterfly fly"?\
name ""
name "Angel B"
>It's like she doesn't even know Ilias' power...@
>Even if she does good work, she has no common sense.\
name ""
>She hears laughter behind her.@
>But it's just the prattling of fools who stopped thinking.\
>How can they be satisfied with that type of answer?@
>She wants to know the reason herself...\
>There is so much in this world that she doesn't know...@
>There must be actual answers that exist outside of these scriptures...\
bgmstop
sean_change "bg233"
bgm "bgm\sinpi1.ogg"
name "Promestein"
>This is the realm of the Gods...!@
>The physical laws that move the world...\
name ""
>Her notebook is filled with numbers and formulas.@
>After observing, thinking, and testing, they are her conclusions.\
>After all of the work, it comes down to a simple equation.@
>This equation explains how an object moves through space.\
lsp 700,":a;chara\stein_st32.bmp",-180,0
lsp 701,":a;chara\mob_angel2_st02.bmp",180,0:print 10,500
name "Promestein"
>Master Hermes, I finally solved it!@
>I can calculate not only how the celestial bodies move through the sky, but also how and why an apple falls to the ground!\
>You take the distance and the gravity...\
name ""
lsp 700,":a;chara\stein_st33.bmp",-180,0
lsp 701,":a;chara\mob_angel2_st03.bmp",180,0:print 10,500
name "Hermes"
>Promestein!@
>Are you trying to diminish the skill of Master Ilias!?\
name ""
dwave 1,"se\fire3.ogg"
>Promestein's notebook goes up in flames in Hermes' hand.\
name "Promestein"
>N...No...@>I was just...\
name ""
name "Angel A"
>Looks like she did something stupid again, that weirdo.\
name ""
name "Angel B"
>She doesn't trust in Ilias' power?@> Does she not have any faith...?\
name ""
lsp 700,":a;chara\stein_st31.bmp",-180,0:print 10,500
name "Promestein"
>...........\
name ""
>...They know nothing.@
>Even if the truth of the world was in front of their eyes, they would see nothing.\
>Like the fools they are, they eat up the scriptures they're writing down.@
>But Promestein knows herself to be different...\
lsp 700,":a;chara\stein_st32.bmp",-180,0:print 10,500
name "Promestein"
>...Forgive me, I'll change my behavior from now on.\
name ""
>Since then, she puts all of her efforts into her secretarial work.@
>Of course, she hides her true thoughts and irreverent behavior...\
>For a clear-headed angel like her, it was simple.@
>Thus, Promestein continues on, publicly acting like an elite...\
bgmstop
sean_change "bg234"
bgm "bgm\sinpi1.ogg"
>Three years later...@
>Promestein is on the surface world, on some management work.\
>She was assigned to a small village in the heart of a mountainous area.@
>Her duty was to watch over them, and ensure they were properly respecting the Goddess.\
>Of course, contact with the humans was strictly forbidden.@
>Her role was simply to observe and report.\
name "Promestein"
>..............\
name ""
>As usual, she continues her boring observational work.@
>She watches not only their speech, but their behavior too.\
>The previous night, a lightning strike seems to have caused a forest fire.@
>It destroyed numerous trees, and killed many wild animals, but the humans were unharmed.\
lsp 700,":a;chara\mob_syounen.bmp",0,0:print 10,500
name "Young Boy"
>..............\
name ""
>One lone boy ventures into the burned out area in the mountain forest.@
>He comes across a burned up cow.\
>The meat was cooked almost perfectly...@
>The whole area is filled with an incredibly appetizing smell.\
name "Young Boy"
>Can I eat this...?\
name ""
>The young boy hasn't eaten anything in two days.@
>Like others in his village, he's near starvation levels.\
>Of course, the role of the Heavens isn't to help humans.@
>Their role is only to guide their thoughts.\
>Their only concern is that they worship Ilias as their only Goddess.@
>Anything other than that, even if it means death, is no concern.\
name "Young Boy"
>..............\
name ""
>The boy pulls off some pieces of meat, and brings it to his mouth...\
lsp 700,":a;chara\mob_syounen.bmp",-170,0
lsp 701,":a;chara\mob_rouzin1.bmp",170,0:print 10,500
name "Elder"
>Oi, what are you doing!?\
name ""
>A Villager Elder runs up, slapping the meat from the boy's hand.\
name "Elder"
>The lightning was Ilias' anger!@
>The cow died because it drew her wrath!\
>You would anger her if you ate it!@
>You would bring ruin upon all your fellow villagers!\
name ""
name "Young Boy"
>But I'm so hungry...\
>Winter is coming soon, too...@
>We'll all die of hunger!\
name ""
name "Elder"
>Ahhh!@>You unbeliever!@
>Due to your lack of faith, we're being afflicted by famine!\
name ""
cspl 700,701:print 10,500
>The young boy is dragged away by the old man...@
>The cooked meat sits pointlessly on the ground.\
name "Promestein"
>..............\
name ""
>The humans on the surface only eat food raw.@
>Unable to store their food, they have extensive issues with nourishment and digestion.\
>If that young boy had eaten the cooked meat, he might have noticed its usefulness...\
name "Promestein"
>The nutrition efficiency is 1.8 times higher.@
>The shelf life is ten times higher, too.\
>They would be able to solve their food crisis, and store more for the winter.@
>This winter, and every winter to come...\
name ""
>But they're held back due to their religious indoctrination.@
>Their enforced ignorance to anything unknown stunts their growth.\
>How many are going to starve and die because of that?@
>If only they had some knowledge...\
name "Promestein"
>..............\
name ""
>But it's the worst of taboos.@
>However...\
bg "bg\bg235.bmp",10,1500
lsp 700,":a;chara\mob_seinen2.bmp",-170,0
lsp 701,":a;chara\mob_rouzin1.bmp",170,0:print 10,500
name "Villager"
>M...Master Angel!\
name ""
name "Elder"
>Ooh, an Angel!\
name ""
csp 701
lsp 700,":a;chara\stein_st41.bmp",0,0:print 10,500
>Promestein lands in the center of the village, holding a burning torch.\
bgmstop
name "Promestein"
>Everyone, this is called "Fire".@
>If you use this to cook your food...\
name ""
sean_change "bg092"
bgm "bgm\dungeon1.ogg"
name "Promestein"
>Those damn fools!@>Why do they regard technology with hostility!@
>Technology is not a sin!\
>They will never change!@
>Are they so terrified of Ilias' authority!?\
name ""
>Promestein shouts from inside a jail, deep in a cave.@
>A prison for Angels, deep in the ground.\
>Promestein was jailed here as punishment for the grave sin of giving humans "Fire".\
name "Promestein"
>..............\
name ""
>After tiring of shouting, Promestein slumps to the ground.@
>Her gaze falls onto a lizard, lazily crawling across the ground.\
name "Promestein"
>That's right... I'm on the surface world.@
>There are more living creatures here than in the Heavens.\
name ""
>Promestein studies the lizard's movements for a few minutes.@
>How it moves, how it turns its head, the way its tail moves, the way it catches prey...\
name "Promestein"
>I see...@> What about inside?\
name ""
>Promestein grabs hold of the lizard.@
bgm "bgm\kiki2.ogg"
>And pulls off its head.\
name "Promestein"
>I could do this easier if I had a knife...\
name ""
>While mumbling to herself, Promestein pries apart the lizard with her bare hands.@
>She studies its skeleton, its organs, and the muscles combining it all together.\
name "Promestein"
>Different from the creatures in the Heavens...@
>Is this because it adapted to the surface world?\
name ""
>Promestein looks for more small animals that have entered her small prison...\
bgmstop
sean_change "bg092"
bgm "bgm\dungeon1.ogg"
>One year passes while she's imprisoned...\
name "Promestein"
>I'm tired of dissections...\
name ""
>Promestein tosses away the knife she created with alchemy.@
>The bones of numerous small animals fill the corners of her small prison.\
>After dissecting hundreds of animals, she's become very familiar with their structure.@
>She won't learn anything more from continuing.\
name "Promestein"
>...I just can't think these creatures were created by a God.@
>There's just too much waste in their bodily structures.\
>They are clearly something that developed over a long period of time.@
>So Ilias didn't make them after all...\
name ""
>She's believed that about the animals in the Heavens.@
>But the variety of creatures on the surface world is vastly greater.\
name "Promestein"
>I wish I could see more from here...@
>Could I create some sort of observational device...?\
name ""
>Combining alchemy skills with magic...@
>Perhaps she could make some sort of simple instrument.\
>She isn't very skilled with alchemy, but there's plenty of time to practice...\
bgmstop
sean_change "bg092"
bgm "bgm\dungeon1.ogg"
name ""
r@k@\
>Since then, hundreds of years have passed...\
name "Promestein"
>I thought I could explain it with the inverse square rule...@
>But once you reach the speed of light or the quantum level, it doesn't seem to properly apply.\
>I thought I had arrived at the truth of the laws that govern this universe before.@
>But I was getting way ahead of myself.\
name ""
>The walls of her prison are completely covered in mathematical formulas.\
name "Promestein"
>But why do things change when you get to the speed of light or the quantum level?@
>Are the laws of the universe different depending on the macro or micro level?\
>...No, that can't be.@
>There has to be something that unifies the law between them.\
name ""
>After arriving at an answer, all she gets is another question.@
>Her endless goal just keeps getting pushed further back as soon as she thinks she has reached it.\
>Even in physics, is she unable to arrive at the truth of how it all works?\
name "Promestein"
>Even in genetics, I still haven't found the point where everything converges.@
>I want to analyze all of the amino acids..\
>But as I thought, I've reached a limit in the equipment I can make here.\
name ""
>Promestein is surrounded by equipment she managed to create through a mixture of alchemy and magic.@
>This prison of the Gods has already became a laboratory for her...\
name "Promestein"
>...Who is it?\
name ""
>Suddenly, she senses a strange pulsing of magic near her.@
>This prison should have been sealed off by Ilias, but...\
bgm "bgm\maou2.ogg"
dwave 3,"se\bun.ogg"
lsp 700,":a;chara\alice8th_st01.bmp",0,0:print 99,1500,"system\trvswave.dll/h"
name "???"
>Hehe, do you want to leave?\
name ""
>A strange girl appears.@
>How did she get in...?\
name "Promestein"
>You're...@>Ah, the current Monster Lord.@
>Where did you learn of me?\
name ""
name "Black Alice"
>Even I have my contacts in the Heavens...@
>So I put in a good word about you to Ilias.\
name ""
name "Promestein"
>And in return...@> You want my research?\
name ""
name "Black Alice"
>Just as I want to control the world...@
>You want to identify the world, no?\
>I don't discriminate against technology.@
>Now, let's leave here...\
name ""
bgmstop
csp 700
bg "bg\bg186.bmp",99,3000,"system\lngtwave.dll/vwi"
bgm "bgm\stein.ogg"
lsp 700,":a;chara\stein_st01r.bmp",0,0:print 10,500
name "Promestein"
>It's been a few hundred years more since I left that prison.@
>But I'm still far from identifying everything in this world...\
>I wonder if there even is an end to the search for the truth of everything...@
>What do you think, Black Alice?\
name ""
dwave 3,"se\bun.ogg"
lsp 700,":a;chara\stein_st01r.bmp",-200,0
lsp 701,":a;chara\alice8th_st01.bmp",160,0:print 99,1500,"system\trvswave.dll/h"
name "Black Alice"
>Hehe, I wouldn't know.@
>But you haven't lost your will to search, have you?\
>The same as my desire to subjugate the world...\
name ""
name "Promestein"
>That's right...@
>Whenever I think I've reached the end, I only realize I'm still far off.\
>It's been the same ever since I first started...\
name ""
lsp 702,":a;chara\cupid_st11.bmp",800,0
for %move=0 to 450 step 10
amsp 702,800-%move,0
print 1:wait 20
next
name "Cupid"
>Eh?@>Eheh?@
>Why are those two talking on such good terms?\
name ""
>Cupid watches the unexpected secret meeting from the shadows.@
>Promestein and Black Alice were supposed to have a stormy relationship...\
for %move=0 to 450 step 10
amsp 702,350+%move,0
print 1:wait 5
next
name "Promestein"
>Anyway, that's enough of that.@
>What about the "White Rabbit"?@> Did you combine it with your body?\
name ""
name "Black Alice"
>Yes, of course...\
>As an Alice, White Rabbit will lead me forward.@
>The power is sleeping within this body... Hehe.\
name ""
name "Promestein"
>Then I'll perform a biopsy later.@
>I can use the data to purify the reagents and further increase the rate of conformity.\
>It may be our trump card, but it needs more time to be completed.@
>It's quite difficult to put it together behind the angel's backs...\
name ""
name "Black Alice"
>By tomorrow?\
name ""
name "Promestein"
>If I work all night... Maybe.@
>As long as they don't interfere.\
name ""
name "Black Alice"
>Hehe... Everything comes together tomorrow.@
>I must finish my own preparations...\
name ""
lsp 702,":a;chara\cupid_st11.bmp",800,0
for %move=0 to 450 step 10
amsp 702,800-%move,0
print 1:wait 20
next
name "Cupid"
>This sounds really bad...@
>I need to report to Eden!\
name ""
for %move=0 to 450 step 10
amsp 702,350+%move,0
print 1:wait 5
>As Cupid tries to sneak away...\
bgm "bgm\kiki2.ogg"
lsp 700,":a;chara\stein_st03.bmp",-200,0
lsp 701,":a;chara\alice8th_st01.bmp",160,0:print 10,500
name "Promestein"
>...By the way, can I ask you to dispose of the nuisance, Black Alice?@
>We don't need her any more, after all.\
name ""
name "Black Alice"
>Hehe, of course...\
name ""
dwave 3,"se\bun.ogg"
lsp 700,":a;chara\stein_st01r.bmp",-200,0
csp 701:print 99,1500,"system\trvswave.dll/h"
>In the next moment, Black Alice vanishes...\
dwave 3,"se\bun.ogg"
csp 702
lsp 701,":a;chara\cupid_st06.bmp",-170,0
lsp 700,":a;chara\alice8th_st01.bmp",170,0:print 99,1500,"system\trvswave.dll/h"
name "Cupid"
>Eh...?@> Hya!\
name ""
>And reappears right in front of Cupid!\
name "Cupid"
>W...What are you doing?@
>I'm an angel, you can't hurt me!\
name ""
lsp 700,":a;chara\alice8th_st02.bmp",170,0:print 10,500
name "Black Alice"
>Hehe...@>You look tasty...\
name ""
cspl 700,701
bg black,10,1000
bgmstop
dwave 1,"se\ero_makituki3.ogg"
name "Cupid"
>Kyaaaaaaa!!!\
name ""
mov %gloval1_story_sinkou,19:gosub *savegloval1
goto *sean0398s



*sean0398s

sean_change "bg195"
bgm "bgm\mura1.ogg"
name "Luka"
>...............\
>...Morning, huh...?\
name ""
>I fainted after being squeezed dry last night...@
>Is it going to be alright?@> It was the night before the decisive battle, after all...\
name "Luka"
>But I don't feel tired at all...@
>Actually, I feel perfect.\
name ""
>As I get up from the bed, my eyes are drawn to my hand.\
bgm "bgm\kiki2.ogg"
lsp 700,":a;chara\hand2.bmp",0,0:print 10,500
name "Luka"
>........!?\
name ""
lsp 700,":a;chara\hand1.bmp",0,0:print 10,500
>But it was only for a moment.@
>In the next second, it was back to normal.\
bgm "bgm\mura1.ogg"
csp 700:print 10,500
name "Luka"
>..............\
>Alright, time to go.\
name ""
>I get up, prepared for the final battle...\
sean_change "bg047"
bgm "bgm\maouzyou2.ogg"
>After eating breakfast in the dining room, I head to the main hall.@
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\granberia_st01.bmp",170,0:print 10,500
>The Four Heavenly Knights and Alice are already here.\
>The four of them already met and discussed in-depth their strategy for today.@
>Installing those discs in synch is the key to everything today.\
lsp 700,":a;chara\tamamo_st01.bmp",-170,0:print 10,500
name "Tamamo"
>Alright, one last time.@
>When I send the pulse of mental energy, each of you installs the disc.\
name ""
lsp 701,":a;chara\arumaeruma_st11.bmp",170,0:print 10,500
name "Alma Elma"
>Switch it with the one already there, right?@
>You've said it over and over already...\
name ""
lsp 701,":a;chara\erbetie_st01.bmp",425,0:print 10,500
name "Erubetie"
>Indeed... I'm tired of hearing this.\
name ""
lsp 701,":a;chara\granberia_st01.bmp",170,0:print 10,500
name "Tamamo"
>Granberia, are you sure you're alright?@
>I know you aren't good with handling equipment...\
name ""
lsp 701,":a;chara\granberia_st04.bmp",170,0:print 10,500
name "Granberia"
>...There's no issue.@> Even a child could work this.\
name ""
name "Tamamo"
>Granberia...@> You're holding the disc upside down.\
name ""
lsp 701,":a;chara\granberia_st06.bmp",170,0:print 10,500
name "Granberia"
>There's an up and a down side!?\
name ""
name "Luka"
>.............\
name ""
>...Is she really going to be alright?\
csp 701
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>Now then, Luka.@>You need to head to the "Navel of the World" on Galda.@
>Once there, just hang tight and pray for success.\
>Once you see the "Gate of Heaven" take physical form, storm into the Heavens right away.@
>But going crazy is a no-no.@>You need to do all the damage you can, but not lose sight of the overall goal.\
name ""
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Once I get my original body back, I'll hurry over.@
>Don't do anything rash until then.\
name ""
name "Luka"
>Yes, I understand.@
>I won't do anything crazy.\
name ""
bgm "bgm\battle2.ogg"
csp 701
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>...Alright, let's go!@>Everyone ready!?\
name "Granberia"
lsp 701,":a;chara\tamamo_st01.bmp",-170,0
lsp 700,":a;chara\granberia_st01.bmp",170,0:print 10,500
>Yes!\
name ""
lsp 701,":a;chara\arumaeruma_st11.bmp",-170,0
name "Alma Elma"
>Yeeeeep! \
name ""
lsp 700,":a;chara\erbetie_st01.bmp",405,0:print 10,500
name "Erubetie"
>Yes...\
name ""
cspl 700,701:print 10,500
>With that, the Four Heavenly Knights each head to their assigned tower.@
>Meanwhile, Alice is going to the sealing device, and I to the "Navel of the World"...\
>At last, the Armageddon that embroiled the world is coming to an end!\
dwave 1,"se\habataki.ogg"
bgmstop
sean_change "bg207"
lsp 700,":a;chara\galda_st02.bmp",0,0:print 10,500
bgm "bgm\heso.ogg"
name "Galda"
>Kweh!\
name ""
name "Luka"
>So this is the "Navel of the World", huh?\
name ""
csp 700:print 10,500
>I jump off Galda's back once a large ivory tower comes into view.@
>All around, beautiful flowers are blooming...@>It feels like a quiet paradise.\
>More than just the entrance to the Heavens, it's like a piece of Heaven itself.@
>But I'm still not in the very center...\
name "Luka"
>This is good...@>Thank you, Galda.\
name ""
lsp 700,":a;chara\galda_st02.bmp",0,0:print 10,500
name "Galda"
>Kweh... Kweeeh!\
name ""
dwave 1,"se\habataki.ogg"
csp 700:print 10,500
>With a cry of encouragement, Galda flies off.@
>I don't want to attract too much attention, so I'll go the rest of the way on foot.\
name "Luka"
>But still... This place is strange.\
name ""
dwave 1,"se\asioto2.ogg"
>While walking on, I nervously look around.@
>The decisive time for our strategy is at nine in the morning... One hour from now.\
>At exactly nine, all Four Heavenly Knights will put in the discs.@
>The seal will allow the Gate to Heaven to be used.\
name "Luka"
>Hmm... What's that?\
name ""
bgm "bgm\kiki2.ogg"
lsp 700,":a;chara\traptemis_st01.bmp",20,0:print 10,500
>A stone statue of an angel is next to the path.@
>And there's another stone statue of a man, clinging to it.\
>I understand the angel statue here...@>But what's with the man?\
csp 700:print 10,500
name "Luka"
>Ah... There's another over here.@
>And there...\
name ""
>I keep walking on, passing the statues.@
>Finally, I come across one without a male statue hugging it.\
>There's a strange atmosphere about...@
>I should be careful here.\
lsp 700,":a;chara\traptemis_st01.bmp",20,0:print 10,500
name "Stone Statue"
>Leave...\
name ""
>Suddenly, the statue on the path speaks!\
r@k@\
goto *traptemis_start



*sean0400

bgm "bgm\heso.ogg"
name ""
r@k@\
name "Luka"
>Since she turned into particles, was that statue an angel?\
name ""
>I can't tell either way...@> But there's no doubt it was a trap to block people from getting closer.\
>And all of those humans who are clinging to the statues must be travelers who were caught.\
name "Luka"
>Turning people to stone indiscriminately... How horrible...\
name ""
>Saddened by the scene, I weave through the statues as I move closer to the ivory tower...\
dwave 1,"se\asioto2.ogg"
sean_change "bg208"
>After a while, I come to an open, square shaped garden.@
>According to Tamamo, the center of this square is the true center, the "Navel of the World".\
name "Luka"
>So the "Gate of Heaven" will come here.\
name ""
>No... Actually, it's already here.@
>It's just composed of such pure energy that I can't see it.\
>I could probably see it if I summoned forth all of my angel power.@
>But there's no reason to strain myself like that so close to the final battle.\
name "Luka"
>Well... I guess I'll wait here for a bit.\
name ""
>Letting out a sigh, I head toward a nearby step to sit down.\
r@k@\
goto *gargoyle_start



*sean0401

bgm "bgm\heso.ogg"
name ""
r@k@\
name "Luka"
>Sheesh, she was strong...\
name ""
>After defeating her, I let out a sigh.@
>All I can do now is wait here, and pray for the Four Heavenly Knights' success.\
bgmstop
sean_change "bg215"
bgm "bgm\tower.ogg"
lsp 700,":a;chara\granberia_st11_b.bmp",0,0:print 10,500
name "Granberia"
>Is this it in the center, then?\
name ""
>Granberia arrives at the top of the tower.@
>In the middle, there's a rotating silver disc mounted on a stand.\
>It's the same type of disc that she's carrying...@
>All she has to do now is wait for the signal from the others.\
name "Granberia"
>Tamamo, can you hear me?@
>I just arrived at the top.\
name ""
>Focusing her thoughts, Granberia directs her mental energy toward Tamamo.\
lsp 700,":a;chara\tamamo_st01.bmp",0,0
bg "BG\bg209.bmp",10,500
name "Tamamo"
>Yes, I can hear you...@
>I've just reached the top as well.\
>If things go well for Erubetie and Alma Elma, perhaps we'll hasten the plan a bit?\
name ""
lsp 700,":a;chara\granberia_st11_b.bmp",0,0
bg "BG\bg215.bmp",10,1500
name "Granberia"
>No... Wait a second.@
>It looks like I have a visitor.\
name ""
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\granberia_st11_b.bmp",-240,0
lsp 701,":a;chara\arcen_st12.bmp",-160,0:print 10,500
name "Arc-En-Ciel"
>No, you're the visitor here...@
>I'll need to entertain you, Granberia.\
name ""
lsp 700,":a;chara\tamamo_st03.bmp",-200,0
lsp 701,":a;chara\tukuyomi_st11.bmp",260,0
bg "BG\bg209.bmp",10,1500
name "Tamamo"
>Hrm...@> Here, too!\
name ""
name "Tsukuyomi"
>Stupid fox.@>You missed the party before.@
>But now, I'll dispose of you...\
name ""
csp 701
lsp 699,":a;chara\arumaeruma_st11.bmp",-200,0
lsp 700,":a;chara\hainu_st12.bmp",-120,0
bg "BG\bg213.bmp",10,1500
name "Alma Elma"
>Oh my, did you pick me to be your partner?\
name ""
name "Hainuwele"
>I'll kill you this time!\
name ""
csp 699
lsp 700,":a;chara\erbetie_st01.bmp",45,0
lsp 701,":a;chara\amphis_st11.bmp",160,0
bg "BG\bg214.bmp",10,1500
name "Erubetie"
>...........\
name ""
name "Amphisbaena"
>Let's continue from before, Erubetie...\
name ""
lsp 700,":a;chara\granberia_st11_b.bmp",-240,0
lsp 701,":a;chara\arcen_st12.bmp",-160,0
bg "BG\bg215.bmp",10,1500
name "Granberia"
>Sheesh...@
>It looks like Luka will need to wait a little bit.\
name ""
name "Arc-En-Ciel"
>Don't worry, he won't be sitting idle.@
>There's a special assassin heading his way, too...\
>Now, let's go!@> I'll show you the true difference between us this time!\
name ""
lsp 700,":a;chara\granberia_st12_b.bmp",-240,0:print 10,500
name "Granberia"
>As you wish...@> Come!\
name ""
bgmstop
sean_change "bg208"
bgm "bgm\heso.ogg"
name "Luka"
>It's almost time...\
name ""
>Just a few more minutes until nine.@
>Once they put in the discs, the "Gate of Heaven" will appear.\
name "???"
>Hehe...@>There's no point waiting.@
>Those Four Heavenly Knights won't be able to do it.\
>But either way, you're going down here.\
name ""
name "Luka"
>Eh...!?\
name ""
bgm "bgm\kiki2.ogg"
lsp 700,":a;chara\doppele_st51.bmp",0,0:print 10,500
>Suddenly appearing in front of me... Is myself?@
>My voice... And my face...?\
name "Luka"
>You're... Me!?\
name ""
lsp 700,":a;chara\doppele_st52.bmp",0,0:print 10,500
name "Luka?"
>...Yes, I'm you.@
>A trump card sent to deal with the disgraced Hero.\
>...But we are completely equal in power.@
>So I was created with a slight advantage...\
name ""
dwave 1,"se\ero_name1.ogg"
>The Doppelganger in front of me suddenly shimmers...@
>Their hair grows longer, and breasts swell up on her chest...\
lsp 700,":a;chara\doppele_st01.bmp",0,0:print 10,500
>And in seconds, looks like a female version of me!\
r@k@\
goto *doppele_start



*sean0402

bgm "bgm\heso.ogg"
name ""
r@k@\
name "Luka"
>But still... A clone?@
>It seems like anything goes now...\
name ""
>She was powerful, but I managed to win...@
>If this is the strength of enemies that are coming now, things aren't going to be easy for the Four Heavenly Knights.\
>But if it's them, I'm sure they'll be alright.@
>I know their power firsthand, after all.\
>Believing in the four of them, I quietly wait.\
bgmstop
sean_change "bg213"
lsp 700,":a;chara\hainu_st02.bmp",0,0:print 10,500
bgm "bgm\kiki2.ogg"
name "Alma Elma"
>..........\
name ""
>Standing across from Alma Elma is a strange looking bird monster.\
>Alma Elma's face wrinkles in disgust as the artificial bird monster continues to laugh in a grating way.\
r@k@\
goto *hainu_start



*sean0403

bgm "bgm\tower.ogg"
name ""
r@k@\
lsp 700,":a;chara\arumaeruma_st12.bmp",0,0:print 10,500
name "Alma Elma"
>............\
name ""
>Disqualified as a Succubus...@
>Why did her mother's words flash across her mind just then?\
>Despite being a Succubus, she excelled instead at physical destruction.@
>A failure as a proud Succubus.\
>Hating her own true nature, she distanced herself from violence as much as possible.@
>After hiding herself for so long, she became unable to truly face anyone seriously...\
name "Alma Elma"
>...These enemies seem more formidable than we expected.@
>I wonder if Granberry's alright?\
name ""
>She has no idea what power Tamamo has hidden from everyone all this time, so she's unsure how she will fare.\
>And the seemingly invincible Erubetie might unravel if her unique slime ability is nullified.\
>As for Granberia...@>Her sword skills are equal to Alma Elma's martial arts skills.@
>But unlike Hainuwele, her opponent will have been created solely for that type of fight.\
name "Alma Elma"
>Well... She'll manage somehow.@> Probably.\
name ""
>Even if she's worried here, she can't do anything.@
>While believing in the power of her fellow Knights, she waits in front of the pedestal.\
r@k@\
sean_change "bg214"
goto *amphis_start



*sean0404

bgm "bgm\tower.ogg"
name ""
r@k@\
csp 701
lsp 700,":a;chara\erbetie_st01.bmp",225,0:print 10,500
name "Erubetie"
>...The device is safe.@
>I focused the explosion inwards.\
name ""
>Her slime was still covering Amphisbaena as she exploded.@
>With that barrier in place, the explosion didn't damage the equipment the disc is inserted into.\
name "Erubetie"
>I'm ready now...@
>I wonder if everyone else is alright...?\
name ""
>Prepared to act, Erubetie waits for Tamamo's signal...\
name ""
r@k@\
sean_change "bg209"
goto *tukuyomi_start



*sean0405

bgm "bgm\tower.ogg"
name ""
r@k@\
lsp 700,":a;chara\tamamo_st53.bmp",0,0:print 10,500
name "Tamamo no Mae"
>...A terrible miscalculation.@
>Forcing me to call forth my true body here...\
>Now I have to...\
name ""
dwave 1,"se\down4.ogg"
>Tamamo's body slowly shrinks...@
>The incredible power flees, as if being sucked up a drain.\
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>..............\
bgm "bgm\tamamo.ogg"
lsp 700,":a;chara\tamamo_st04.bmp",0,0:print 10,500
>....Pomf. \
name ""
dwave 1,"se\escape.ogg"
lsp 701,":a;chara\hatibi_st03.bmp",-170,0
lsp 700,":a;chara\tamamo_st04.bmp",170,0:print 10,500
name "Yao"
>M...Master Tamamo!\
name ""
name "Tamamo"
>...Fluffy Kitsune. Fluffy fluffy. \
name ""
dwave 1,"se\escape.ogg"
lsp 701,":a;chara\hatibi_st03.bmp",-250,0
lsp 700,":a;chara\tamamo_st04.bmp",0,0
lsp 702,":a;chara\nanabi_st03.bmp",300,0:print 10,500
name "Nanabi"
>She exhausted her magic power, and regressed in mind and spirit...@
>Us fellow members of the Kitsune family need to combine our power, and deliver it to her!\
name ""
lsp 701,":a;chara\hatibi_st01.bmp",-250,0:print 10,500
name "Yao"
>I'll manage the disc replacement instead.@
>Nanabi, quickly get all of the Kitsunes together!\
name ""
lsp 702,":a;chara\nanabi_st01.bmp",300,0:print 10,500
name "Nanabi"
>Yes!@
>Master Tamamo, please hang on for a moment...\
name ""
>Nanabi quickly leaves to gather the rest of the Kitsunes together to restore Tamamo's power...\
sean_change "bg215"
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\granberia_st11_b.bmp",-240,0
lsp 701,":a;chara\arcen_st11.bmp",-160,0:print 10,500
name "Arc-En-Ciel"
>..............\
name ""
lsp 700,":a;chara\granberia_st12_b.bmp",-240,0:print 10,500
name "Granberia"
>...What's wrong? Not going to attack?\
name ""
name "Arc-En-Ciel"
>...Three of my brethren seem to have been defeated.@
>Their biological reactions have all ceased.\
name ""
lsp 700,":a;chara\granberia_st11_b.bmp",-240,0:print 10,500
name "Granberia"
>...I see.\
name ""
>A good outcome, but not worth thinking about at the moment.@
>All that Granberia can focus on is the threat in front of her!\
r@k@\
cspl 700,701
goto *arcen_start



*sean0406

bgm "bgm\tower.ogg"
name ""
r@k@\
lsp 700,":a;chara\granberia_st04.bmp",0,0:print 10,500
name "Granberia"
>Your body can't even return to the soil...@
>At the very least, I shall pray that your soul is reborn as a warrior's again.\
name ""
>Deep anger flashes in Granberia's heart, as she thinks on how Promestein toyed with her creations.\
lsp 700,":a;chara\granberia_st02.bmp",0,0:print 10,500
name "Granberia"
>...Sorry for the delay, I'm ready here.@
>How about everyone else?\
name ""
lsp 700,":a;chara\arumaeruma_st11.bmp",0,0
bg "BG\bg213.bmp",10,500
name "Alma Elma"
>No problems here, I'm ready whenever. \
name ""
lsp 700,":a;chara\erbetie_st01.bmp",225,0
bg "BG\bg214.bmp",10,500
name "Erubetie"
>No issues here...\
name ""
lsp 700,":a;chara\tamamo_st04.bmp",0,0
bg "BG\bg209.bmp",10,500
name "Tamamo"
>Fluffy fluffy! \
name ""
lsp 700,":a;chara\granberia_st01.bmp",0,0
bg "BG\bg215.bmp",0,500
name "Granberia"
>...???\
name ""
lsp 701,":a;chara\hatibi_st03.bmp",-170,0
lsp 700,":a;chara\tamamo_st04.bmp",170,0
bg "BG\bg209.bmp",10,500
name "Yao"
>...Excuse me, I shall act in Tamamo's place.@
lsp 701,":a;chara\hatibi_st01.bmp",-170,0:print 10,500
>Now then, let's all replace the discs at the same time.\
>On three.@>One.@> Two.@>Three!\
name ""
dwave 1,"se\disc.ogg"
>Yao switches the disc on her pedestal.@
>If the other three are done at the same time, then...\
csp 701
lsp 700,":a;chara\granberia_st01.bmp",0,0
bg "BG\bg215.bmp",0,500
name "Granberia"
>..........\
name ""
>The air around Granberia suddenly changes.@
>It feels like a wave of power is spreading through the world...\
lsp 701,":a;chara\hatibi_st01.bmp",-160,0
lsp 700,":a;chara\tamamo_st04.bmp",160,0
bg "BG\bg209.bmp",10,500
name "Yao"
>...It's a success!@
>The seal on holy power has been deployed throughout the world!\
name ""
csp 701
lsp 700,":a;chara\granberia_st04.bmp",0,0
bg "BG\bg215.bmp",0,500
name "Granberia"
>Alright!\
name ""
>With that, the horrible angels can now taste Granberia's sword.@
>At the same time, Luka will regain the Spirit's powers, and Alice will recover her body.\
>And at last, the "Gate of Heaven" will open...\
lsp 700,":a;chara\granberia_st02.bmp",0,0:print 10,500
name "Granberia"
>Alright everyone, to the Gate!@
>We must assist Luka in his invasion of the Heavens!\
name ""
lsp 700,":a;chara\arumaeruma_st11.bmp",0,0
bg "BG\bg213.bmp",10,500
name "Alma Elma"
>Of course... \
name ""
lsp 700,":a;chara\erbetie_st01.bmp",225,0
bg "BG\bg214.bmp",10,500
name "Erubetie"
>Sheesh, one thing after another...\
name ""
lsp 700,":a;chara\tamamo_st04.bmp",0,0
bg "BG\bg209.bmp",10,500
name "Tamamo"
>Fufu. \
name ""
csp 700:print 10,500
>All four of the Heavenly Knights leave their towers, heading toward the Gate of Heaven!\
bgmstop
sean_change "bg208"
bgm "bgm\heso.ogg"
mov %skill01,21
mov %skill02,5
mov %skill03,5
mov %skill04,5
mov %skill05,5
name "Luka"
>...What was that?\
name ""
dwave 1,"se\power.ogg"
>My body is suddenly encased in a warm glow...@
>I feel my body get stronger, as a nostalgic vitality floods into me.\
lsp 700,":a;chara\sylph_st21r.bmp",251,190
lsp 701,":a;chara\gnome_st31r.bmp",393,145
lsp 702,":a;chara\undine_st22.bmp",-50,180
lsp 703,":a;chara\salamander_st22.bmp",570,125:print 10,500
name "Sylph"
>Yaaay!@> Fufufufufufufufufufufuuuulllll POWAH!\
name ""
name "Gnome"
>............\
name ""
name "Undine"
>At last, my power has returned...\
name ""
name "Salamander"
>Back to feeling normal, after all this time...@
>Your skills haven't gotten rusty with us, have they?\
name ""
name "Luka"
>Far from rusty...\
name ""
cspl 700,703:print 10,500
>When I lost their power, I felt helpless.@
>But even without the spirits, I was able to use some of the power of wind and water.\
>Go with the flow like the water, let the wind imbue my movements, feel the breath of the earth in my body, and attack with fire burning in my spirit...\
>Even without the spirits, I was able to keep using what I had learned before.\
>And now with their powers back...\
name "Luka"
>..............\
name ""
>With their powers back, I feel complete.@
>Everything I've learned until now has come together.\
name "???"
>Ahaha, so you were here all along!?\
name ""
r@k@\
goto *rapun_start



*sean0407

bgm "bgm\heso.ogg"
name ""
r@k@\
name "Luka"
>It seems awfully quiet now...\
name ""
>Even with the torrent of power radiating in my body, I feel calm.\
>Despite the decisive battle coming, I don't feel nervous.\
>But this isn't the time to relax, either...\
name "Luka"
>So that's the "Gate of Heaven"?\
name ""
lsp 700,":a;chara\heavensgate_st11.bmp",0,0:print 10,500
>Once the seal on holy power arrived here, it appeared.@
>It seems to be firmly closed...\
name "Luka"
>Do I have to break it open by force!?\
name ""
>I step in front of the gate, with my sword drawn...\
bgm "bgm\boss0.ogg"
name "???"
>You shall not pass...\
name ""
name "Luka"
>Another attacker!?\
name ""
>I didn't sense anyone new coming into this area...@
>The only odd source of power here is this gate.\
name "Luka"
>No way... The gate itself spoke?\
name ""
name "???"
>That's right... I...\
name ""
>The gate radiates holy power!\
r@k@\
goto *heavensgate_start



*sean0408

bgm "bgm\heso.ogg"
name ""
r@k@\
name "Luka"
>Whew... I managed to defeat the gatekeeper...\
name ""
>After sealing her, all that's left is the gate itself.@
>Beyond there lie the Heavens themselves.\
name "Luka"
>Alright, let's go!@
>I'm coming for you, Ilias!\
name ""
>Filled with indomitable resolve, I step through the gate.@
>At long last, we're assaulting the enemy's stronghold.\
dwave 1,"se\asioto3.ogg"
mov %gloval1_story_sinkou,20:gosub *savegloval1
goto *sean0408s



*sean0408s

bgmstop
sean_change "bg001"
bgm "bgm\irias.ogg"
lsp 700,":a;chara\stein_st02.bmp",-280,0
lsp 702,":a;chara\eden_st23.bmp",-30,0
lsp 701,":a;chara\alice8th_st01.bmp",280,0:print 10,500
name "Black Alice"
>Oh my, my... They seem to be marching into the Heavens.@
>Meanwhile, a certain someone continues to make blunders...\
name ""
name "Eden"
>Guh... Shut up, you vile fox woman!\
name ""
name "Promestein"
>Even more, it seems as though the spirits' power has returned.@
>Another blunder for the leader of angels.\
name ""
name "Eden"
>Grhg!@>They were your soldiers!@
>Your subordinates were the ones defeated at those four towers!\
name ""
name "Promestein"
>And whose command were they under?@
>I'm certain it was Ilias' imperial command that granted control of them to you...\
name ""
name "Eden"
>Gurhg... You... How far will you-\
name ""
name "Black Alice"
>...You really are useless, Third.@
>Beary is more fit to lead the angels than you...\
name ""
name "Eden"
>It would be wise to cease angering me further...\
name ""
name "Promestein"
>You're the one who should stop angering Ilias.@
>The disgraced Hero is trampling upon the heavens with his dirty shoes, you know?\
name ""
name "Eden"
>Then I'll deal with him myself!@
>Then there will be no further problems!\
name ""
name "Promestein"
>Can a Third like you really do it?@
>He has the blood of your superior, Lucifina...\
name ""
name "Eden"
>No matter whose blood he has, a human is a human!@
>And in the first place, she was not my superior!\
>As for you two...@
>Once I destroy the disgraced Hero, I'll report on your blasphemy!\
name ""
dwave 1,"se\escape.ogg"
csp 702:print 10,500
>With a yell, Eden heads toward the entrance to the Heavens.\
bgm "bgm\maou2.ogg"
lsp 700,":a;chara\stein_st03.bmp",-200,0
lsp 701,":a;chara\alice8th_st01.bmp",160,0:print 10,500
name "Promestein"
>Hmph...@>What a fool.@
>We drew her away from Ilias.\
name ""
name "Black Alice"
>And it would be quite convenient if she managed to defeat the disgraced Hero, too.@
>But isn't that expecting a little too much from her?\
name ""
lsp 700,":a;chara\stein_st02.bmp",-200,0:print 10,500
name "Promestein"
>No... She may be an angry, dimwitted fool...@> But she's still a Seraph.@
>Outside of Ilias herself, she's the most powerful in the Heavens.\
>So for now, we should leave him to her...\
name ""
name "Black Alice"
>Hehe... So now there's nobody guarding Ilias herself...@
>But will things go smoothly without the support of the Next Dolls?\
>The original plan was to use them to guard against any interlopers...\
name ""
name "Promestein"
>It was assumed we would lose or have some damaged.@
>But to think all five would be destroyed...\
>...Though it should still be fine with the two of us.@
>The disgraced Hero is distracting Eden already, who was the biggest threat.\
name ""
name "Black Alice"
>"White Rabbit" is ready, and the Third is gone...@
>The party's preparations have all been finished...\
name ""
name "Promestein"
>Then let's go...@> To bear witness to the death of a Goddess.\
name ""
name "Black Alice"
>And the birth of a new one...@>Hehe.\
name ""
mov %hanyo1,0
goto *sean0408s_01



*sean0408s_01

bgmstop
if %ivent11<2 goto *sean0408s_02
sean_change "bg098"
if %hanyo1=0 bgm "bgm\battle2.ogg"
mov %hanyo1,1
lsp 700,":a;chara\grangold_st03.bmp",-200,0
lsp 701,":a;chara\mob_heisi1.bmp",170,0:print 10,500
name "Messenger"
>My liege, the enemy mass has approached the target point!\
name ""
lsp 700,":a;chara\grangold_st05.bmp",-200,0:print 10,500
name "Grangold King"
>Alright...@> Forward guard, advance!@
>Archer corps, prepare to fire!\
name ""
lsp 700,":a;chara\grangold_st04.bmp",-200,0
lsp 701,":a;chara\queenant_st01.bmp",170,0:print 10,500
name "Queen Ant"
>First Ant Corps to the left wing, Second Ant Corps to the right!@
>Draw the enemy into the planned salient, and then crush them in a pincer!\
name ""
>As the opening battle is moments away, the soldiers begin their planned movements.@
>Against the fully prepared defenders, the attacking Chimeras are charging headlong down the center...\
name "Grangold King"
>Let them get closer...@> Now, deploy the Golem in the center!@
>Magic Corps, provide support!\
name ""
name "Queen Ant"
>They've charged into the salient!@
>Ant Corps, advance and pincer the enemy!\
name ""
>In front of their eyes, the fierce battle starts as the two forces clash.\
lsp 700,":a;chara\mob_heisi1.bmp",-180,0
lsp 701,":a;chara\c_beast_st01.bmp",200,0:print 10,500
>The human soldiers hold a defensive line, their spears out to impale the charging Chimeras.@
>As the Chimeras slam into the wall of spears, their powerful charge is cut short.\
lsp 700,":a;chara\mob_madou.bmp",-200,0:print 10,500
>From over their head, magic arrows fall like rain upon them.@
lsp 700,":a;chara\golem_st01.bmp",-200,0:print 10,500
>As the charge is halted, the giant Golem steps forth, raging and pounding the massed Chimeras.\
>Without turning away, the Grangold King calmly watches the battle unfold before him.\
csp 701
lsp 700,":a;chara\grangold_st03.bmp",0,0:print 10,500
name "Grangold King"
>...We will accomplish our duty.@
>So please, Luka, we're counting on you...\
name ""
mov %check07,1
goto *sean0408s_02



*sean0408s_02

if %ivent02<2 goto *sean0408s_03
sean_change "bg220"
if %hanyo1=0 bgm "bgm\battle2.ogg"
mov %hanyo1,1
lsp 700,":a;chara\queenhapy_st11.bmp",0,0:print 10,500
name "Queen Harpy"
>They're arriving...@>Our preparations are ready, correct?@
>Remember, there is no approaching the enemy.\
name ""
lsp 701,":a;chara\hapy_a_st11.bmp",-200,0
lsp 700,":a;chara\mob_seinen2.bmp",170,0:print 10,500
name "Harpy A"
>Yes, my Queen!\
name ""
name "Archer"
>Once the front line becomes at risk, we shall fall back to the secondary line!\
name ""
csp 701
lsp 700,":a;chara\queenhapy_st12.bmp",0,0:print 10,500
name "Queen Harpy"
>...Then prepare to volley, Archers!\
name ""
>The swarm of enemies rushing finally come into view.@
>With her eyes on them, the Queen Harpy issues orders to her army of archers.\
lsp 700,":a;chara\mob_seinen2.bmp",-170,0
lsp 701,":a;chara\mob_seinen1.bmp",170,0:print 10,500
name "Archer"
>Fire, fire!\
name ""
name "Boy"
>Eat our arrows!\
name ""
dwave 1,"se\yumi.ogg"
wait 100
dwave 2,"se\yumi.ogg"
wait 100
dwave 3,"se\yumi.ogg"
>The villagers, all armed with bows, shoot in unison at the charging horde.@
>As quickly trained amateurs, the arrows fly in every direction, with poor aim...\
csp 701
lsp 700,":a;chara\queenhapy_st12.bmp",0,0:print 10,500
name "Queen Harpy"
>Now, Harpy Corps!@>Direct the hail with our wind!\
name ""
lsp 700,":a;chara\hapy_a_st31.bmp",0,0:print 10,500
name "Harpy A"
>Everyone, let's go!\
name ""
dwave 1,"se\wind3.ogg"
>The Harpies flap their wings around the swarm of arrows, creating a vortex of air.@
>Directed by the wind, the swarm of arrows all increase in speed and funnel toward the charging mass.\
lsp 700,":a;chara\queenhapy_st12.bmp",0,0:print 10,500
name "Queen Harpy"
>Second team, volley!\
name ""
lsp 700,":a;chara\mob_seinen2.bmp",-170,0
lsp 701,":a;chara\mob_musume1.bmp",335,0:print 10,500
name "Soldier"
>Bring more arrows, we'll pincushion them!\
name ""
name "Girl"
>I can fight with this, too!\
name ""
dwave 4,"se\wind3.ogg"
dwave 1,"se\yumi.ogg"
wait 100
dwave 2,"se\yumi.ogg"
wait 100
dwave 3,"se\yumi.ogg"
>More arrows are shot into the vortex of wind, riding it directly into the enemy.\
lsp 700,":a;chara\mob_seinen2.bmp",-170,0
lsp 701,":a;chara\c_beast_st01.bmp",200,0:print 10,500
>But one of the Chimeric Beasts, able to avoid the arrows, charges into the line of archers.\
name "Villager"
>Hya!\
name ""
lsp 700,":a;chara\queenhapy_st12.bmp",-180,0
lsp 701,":a;chara\c_beast_st01.bmp",200,0:print 10,500
name "Queen Harpy"
>...Hah!\
name ""
dwave 1,"se\wind4.ogg"
wait 500
dwave 2,"se\slash.ogg"
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
csp 701:print 10,500
>A sharp blade of wind from the Queen Harpy cuts the Chimeric Beast apart.@
>But the swarm of beasts is nearly at the front line...\
lsp 700,":a;chara\queenhapy_st12.bmp",0,0:print 10,500
name "Queen Harpy"
>Field Force, step forward!@
>Protect the archers!\
name ""
lsp 700,":a;chara\mob_hapy2.bmp",-160,0
lsp 701,":a;chara\mob_hapy2.bmp",160,0:print 10,500
name "Harpy Warrior"
>Understood... Charge!\
name ""
dwave 1,"se\wind4.ogg"
>The armored Harpies skilled at melee combat swoop down from the sky.@
>Wielding spears, they pierce into the charging lines, each as powerful and as fast as a ballista shot.\
csp 701
lsp 700,":a;chara\queenhapy_st12.bmp",0,0:print 10,500
name "Queen Harpy"
>More of them approach, continue firing!\
name ""
lsp 700,":a;chara\queenhapy_st12.bmp",-200,0
lsp 701,":a;chara\hapy_a_st31.bmp",200,0:print 10,500
name "Harpy A"
>Yes!\
name ""
>The mixed army of Harpies and human Villagers clash with the Heavenly army, under the Queen Harpy's command.@
>Their quiet villages are wrapped in the clash of war...\
mov %check07,1
goto *sean0408s_03



*sean0408s_03

if %ivent12<2 goto *sean0408s_04
sean_change "bg103"
if %hanyo1=0 bgm "bgm\battle2.ogg"
mov %hanyo1,1
lsp 700,":a;chara\maccubus_st11.bmp",15,0
lsp 701,":a;chara\angels_st01.bmp",160,0:print 10,500
name "Maccubus"
>Don't underestimate a prostitute's training from bar fights!@
>Haa!\
name ""
dwave 1,"se\spank.ogg"
lsp 701,":a;chara\angels_st03.bmp",160,0
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
name "Angel Soldier"
>Kya!\
name ""
>A slap, filled with all of her power, slams into the Angel Soldier's cheek.\
lsp 700,":a;chara\renccubus_st01.bmp",5,0
lsp 701,":a;chara\mob_angel1_st03.bmp",160,0:print 10,500
name "Lencubus"
>I sucked a lot of power in preparation for this battle...@
>My magical power is at maximum!\
name ""
>The assaulting angel army rushes the town, defended by Succubi brimming with energy.@
>Having sucked up extreme amounts of energy from the male volunteers the night before, they are glowing with magic power.\
csp 701:lsp 700,":a;chara\witchs_st14.bmp",0,50:print 10,500
name "Succubus Witch"
>There are huge numbers, but not as many as last time...@
>And these once invulnerable angels seem to be quite poor at actual hand to hand combat!\
name ""
lsp 700,":a;chara\angels_st03.bmp",-160,0
lsp 701,":a;chara\mob_angel1_st03.bmp",160,0:print 10,500
name "Angel Soldier A"
>Wh...What the...?@
>I...Is this blood? From me...?\
name ""
name "Angel Soldier B"
>D...Dirty...@
>M...My pure white clothes got mud on them!?\
name ""
>Many angels stand stunned on the battlefield, stupefied by their first experience of actually being attacked in their once incorporeal forms.\
>Most of them are experiencing "pain" for the very first time.\
csp 701
lsp 700,":a;chara\succubus_st01.bmp",0,50:print 10,500
name "Succubus"
>Everyone, keep going!@
>We must defend this paradise of ours with our own hands!\
name ""
>Under direction of the mayor, the battle continues on.@
>The Succubi defend their precious village, one they can finally call their own...\
mov %check07,1
goto *sean0408s_04



*sean0408s_04

if %ivent09<2 goto *sean0408s_05
sean_change "bg088"
if %hanyo1=0 bgm "bgm\battle2.ogg"
mov %hanyo1,1
lsp 700,":a;chara\sirohebi_st11.bmp",0,0:print 10,500
name "Shirohebi"
>They've come...@>Everyone, spring the ambush!\
name ""
lsp 700,":a;chara\gob_st13.bmp",-140,0
lsp 701,":a;chara\nekomata_st07.bmp",200,60:print 10,500
name "Goblin Girl"
>Here I come!\
name ""
name "Nekomata"
>Nyaa!\
name ""
lsp 700,":a;chara\samuraielf_st01.bmp",-170,0
lsp 701,":a;chara\kunoitielf_st01.bmp",170,0:print 10,500
name "Samurai Elf"
>Now, go!@
>Get them, sisters!\
name ""
name "Kunoichi Elf"
>We shall uphold the promise of our ancestors!\
name ""
>The Yamatai monster defenders spring from their hiding places, assaulting the invading Chimeras from the rear.\
lsp 700,":a;chara\akaname_st01.bmp",-200,0
lsp 701,":a;chara\angels_st03.bmp",180,0:print 10,500
dwave 1,"se\ero_pyu1.ogg"
name "Angel Soldier"
>S...Stop that!@
>Don't lick me there!\
name ""
name "Akaname"
>A knockout from our licking attack! \
name ""
lsp 700,":a;chara\mob_seinen1.bmp",-180,0
lsp 701,":a;chara\c_beast_st01.bmp",200,0:print 10,500
name "Boy"
>S...Stop!@
>Uwaa!\
name ""
>In the midst of the assault, a young boy is pushed down by one of the Chimeric Beasts...\
lsp 701,":a;chara\yamatanooroti_st01.bmp",-200,0
lsp 700,":a;chara\c_beast_st01.bmp",200,0:print 10,500
name "Yamata no Orochi"
>You beasts!@
>What are you doing to the people of my village!?\
name ""
dwave 1,"se\bom2.ogg"
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
csp 700:print 10,500
>A huge monster appears, crushing the beast with a single blow.\
lsp 700,":a;chara\mob_seinen1.bmp",180,0:print 10,500
name "Boy"
>Y...Yamata no Orochi!@
>Thank you so much!\
name ""
lsp 701,":a;chara\yamatanooroti_st02.bmp",-200,0:print 10,500
name "Yamata no Orochi"
>Haha... Thank me with your body, instead.@
>Come to my cave after this is over with...\
name ""
lsp 700,":a;chara\sirohebi_st11.bmp",200,0:print 10,500
name "Shirohebi"
>Don't play around, Orochi.\
>Don't make me sorry I unsealed you...\
name ""
lsp 701,":a;chara\yamatanooroti_st01.bmp",-200,0:print 10,500
name "Yamata no Orochi"
>...Hmph, I won't disappoint you.@
>You young ones should just sit there and watch me destroy them...\
name ""
lsp 700,":a;chara\c_beast_st01.bmp",200,0:print 10,500
dwave 1,"se\karaburi.ogg"
wait 500
dwave 2,"se\bom2.ogg"
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
csp 700:print 10,500
>Another powerful blow from Yamata no Orochi knocks away more Chimeric Beasts.@
>But more come to fill in their seemingly endless ranks...\
csp 701
lsp 700,":a;chara\sirohebi_st11.bmp",0,0:print 10,500
name "Shirohebi"
>I'll never let there be another sacrifice in this village again!@
>Everyone, hold strong!\
name ""
lsp 700,":a;chara\sirohebi_st11.bmp",-170,0
lsp 701,":a;chara\samuraielf_st01.bmp",170,0:print 10,500
name "Samurai Elf"
>Understood!\
name ""
>The army of the Heavens crashes into Yamatai Village from the front.@
>The peaceful village of the east quickly turns into another battlefield...\
mov %check07,1
goto *sean0408s_05



*sean0408s_05

if %ivent04<2 goto *sean0408s_06
sean_change "bg037"
if %hanyo1=0 bgm "bgm\battle2.ogg"
mov %hanyo1,1
lsp 700,":a;chara\meia_st01.bmp",-160,0
lsp 701,":a;chara\mob_Mermaid1.bmp",200,0:print 10,500
name "Meia"
>Everyone...@>Attack with the Water Hammer!\
name ""
name "Mermaid A"
>Hya!\
name ""
dwave 1,"se\aqua4.ogg"
>Standing in a line, the Mermaids throw hammers of water at the invading Chimeras.@
>The salvos of water slam deep holes into the invaders, dealing terrible damage.\
lsp 700,":a;chara\mob_angel1_st01.bmp",-280,50
lsp 701,":a;chara\mob_angel1_st02.bmp",0,50
lsp 702,":a;chara\mob_angel1_st03.bmp",280,50:print 10,500
name "Angel Soldier"
>Don't flinch!@>Advance!@
>Any who retreat will suffer Ilias' wrath!\
name ""
>But the huge numbers of enemies can't be held back forever...\
csp 702
lsp 700,":a;chara\meia_st04.bmp",-140,0
lsp 701,":a;chara\mob_angel1_st01.bmp",170,0:print 10,500
name "Angel Soldier"
>Be crushed, you dirty mermaids!\
name ""
name "Meia"
>Kyaa!\
name ""
dwave 1,"se\karaburi.ogg"
>As one of the Angel Soldiers is about to cut Meia...@
dwave 1,"se\dageki2.ogg"
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
csp 701:print 10,500
>A powerful tentacle slams into the angel, tossing her aside.\
lsp 700,":a;chara\kraken_st01.bmp",0,0:print 10,500
name "Kraken"
>I was a little late...@
>The Queen of the Southern Seas has come to lend her assistance.\
name ""
lsp 700,":a;chara\meia_st02.bmp",-160,0
lsp 701,":a;chara\kraken_st01.bmp",160,0:print 10,500
name "Meia"
>Thank you for reinforcing us, Queen Kraken...\
name ""
name "Kraken"
>And... I'm not the only reinforcement, it seems.@
>Has your attitude changed, Mermaid Queen?\
name ""
>Kraken's gaze falls on another arrival...\
lsp 701,":a;chara\queenMermaid_st01.bmp",-180,0
lsp 700,":a;chara\g_Mermaid_st01.bmp",180,0:print 10,500
name "Queen Mermaid"
>..............\
name ""
>Queen Mermaid, and her elite guards.\
csp 701
lsp 700,":a;chara\meia_st01.bmp",0,0:print 10,500
name "Meia"
>My Queen...@>Did you come to help!?\
name ""
lsp 701,":a;chara\queenMermaid_st01.bmp",-180,0
lsp 700,":a;chara\g_Mermaid_st01.bmp",180,0:print 10,500
name "Queen Mermaid"
>We will repulse the attack on the mermaid and human town.@
>...Now, follow me!\
name ""
name "Mermaid General"
>...Yes!\
name ""
>The elite soldiers of the Mermaid Queen rush into the throng of enemies.\
>The battle to decide the fate of the mermaid inhabited coastal town has begun...\
mov %check07,1
goto *sean0408s_06



*sean0408s_06

bgmstop
sean_change "bg210"
bgm "bgm\tenkai.ogg"
name "Luka"
>So this is Heaven...?\
name ""
>A truly mysterious feeling...@
>The soft, warm aura pulses around me, like the world itself is an illusion.\
>I advance towards the source of that aura...@
>I'm sure the center of it is Ilias herself!\
name "???"
>So you've finally arrived...\
name ""
name "Luka"
>You're...\
name ""
bgm "bgm\boss0.ogg"
lsp 700,":a;chara\eden_st21.bmp",0,0:print 10,500
>A lone angel stands in front of me.\
>I can feel her massive power, just from looking at her.@
>She must be one of the most powerful angels...\
name "Eden"
>I am Seraphim Eden.@
>The first and highest among the angels, who serves at Ilias' side.\
name ""
name "Luka"
>So you're the highest ranking angel?@
>But your heart looks so disturbed...\
name ""
>Despite her attempt to look calm, I can feel anger and impatience swirling in her heart.\
lsp 700,":a;chara\eden_st23.bmp",0,0:print 10,500
name "Eden"
>...!!!\
name ""
>Suddenly, her mouth contorts in rage as she loses her facade.\
name "Eden"
>Son of Lucifina!@
>Even you dare to taunt me!?\
name ""
name "Luka"
>Guh...!\
name ""
dwave 1,"se\earth1.ogg"
quake 10,1000
>Her intense anger radiates off her, the powerful feelings damaging the mysterious atmosphere here.\
name "Eden"
>I am the most faithful among Ilias' followers!@
>Both Micaela and Lucifina betrayed her!\
>I am not the Third!@
>I love Ilias!@>I honor her always!\
name ""
dwave 1,"se\ero_makituki4.ogg"
>Eden's body suddenly starts to expand...@
>As her huge wings spread wide, countless angels take form from her feathers.\
name "Eden"
>Look upon my power!@
>The power of a Seraphim, inferior to neither Micaela nor Lucifina!\
name ""
name "Luka"
>Gah... What power...!\
name ""
dwave 1,"se\earth1.ogg"
quake 10,1000
>It's as if she's sucking up the power of Heaven itself into her.@
>As more power floods into her, her body expands larger and larger...\
r@k@\
goto *eden_start



*sean0409

bgm "bgm\tenkai.ogg"
name ""
r@k@\
name "Luka"
>It looks like you're good as new, Alice!\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
>Incredible magic power is flowing from her body in waves...@
>She looks to be in perfect condition.\
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>You seem to be back at full power yourself.@
>Now we can rampage around as we wish!\
name ""
name "Luka"
>Yes!\
name ""
>The Four Spirits...@>The power of an angel, granted to me from my mother...@
>And the Soul of a Hero, inherited from Heinrich.\
>And above all, Alice by my side!@
>No matter what faces us, there's no way we can lose!\
name "Luka"
>...Alright, let's go.@
>Ilias must be at the center of this aura...\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Yes, I can sense her too...@
>This power is coming from over there.\
name ""
csp 700:print 10,500
>There's no reason to hesitate.@
>Alice and I start to run toward the seat of Goddess Ilias...\
dwave 1,"se\asioto2.ogg"
bgmstop
sean_change "bg001"
bgm "bgm\irias.ogg"
lsp 700,":a;chara\stein_st01r.bmp",-220,0
lsp 701,":a;chara\iriasu_st04.bmp",180,0:print 10,500
name "Ilias"
>The disgraced Hero Luka set foot into the Heavens...?\
name ""
name "Promestein"
>...........\
name ""
lsp 700,":a;chara\alice8th_st01.bmp",-200,0:print 10,500
name "Black Alice"
>Teehee.@>The party is reaching its climax.\
name ""
lsp 701,":a;chara\iriasu_st01.bmp",180,0:print 10,500
name "Ilias"
>Is this a laughing situation for you, Black Alice?@
>I think you should attempt to be a little more helpful to me.\
>Black Alice, intercept the disgraced Hero immediately.@
>As for you, Promestein, I approve of the use of "White Rabbit".@
>Cooperate with Black Alice to eliminate the disgraced Hero.\
name ""
lsp 700,":a;chara\stein_st01r.bmp",-220,0:print 10,500
name "Promestein"
>...I created "White Rabbit" myself.@
>You have no right to grant or deny permission of its use.\
name ""
lsp 701,":a;chara\iriasu_st14.bmp",180,0:print 10,500
>Ilias' eyes widen in surprise at Promestein's response.\
name "Ilias"
>...Have you forgotten to whom you speak?\
name ""
lsp 700,":a;chara\stein_st02.bmp",-220,0:print 10,500
name "Promestein"
>Ilias... I will never forget how you pardoned me for my crimes...\
>...So you could use me.@
>I've assisted you until now...@> We are even.\
name ""
name "Ilias"
>What are you talking about?@>You...\
name ""
bgm "bgm\kiki2.ogg"
name "Promestein"
>.............\
name ""
dwave 1,"se\bakuzyu.ogg"
lsp 690,":a;effect\m_circle1.bmp",370,100
lsp 701,":a;chara\iriasu_st21.bmp",180,0:print 10,500
>Suddenly, a powerful magical field forms around Ilias!\
name "Ilias"
>Impossible... The Six Ancestors' Great Seal!?@
>Why are you casting it here!?\
name ""
name "Promestein"
>According to my calculations, even you are vulnerable to this seal.@
>After all, Dark God Alipheese herself was sealed with it...\
name ""
name "Ilias"
>Have you gone mad!?@
>Black Alice, eliminate Promestein this instant!\
name ""
bgm "bgm\maou2.ogg"
lsp 700,":a;chara\alice8th_st01.bmp",-200,0:print 10,500
name "Black Alice"
>Hehehe.\
name ""
>With a strange laugh, Black Alice pulls out a syringe.@
>"White Rabbit"...@>The forced evolution medicine created directly from cells obtained from the Alipheese line.@
>Bringing the point to her neck, she injects it into her own body.\
name "Ilias"
>Black Alice!@> You... No, both of you...!?\
name ""
name "Black Alice"
>...As you know, I'm a direct descendant of Dark God Alipheese herself.@
>Thus, my cells are quite receptive to hers...\
>Hehe... You see where this is going, don't you?@
>My body is evolving at an incredible rate now...\
name ""
name "Ilias"
>You abomination!@
>You intend to bring forth the power of that wicked Goddess yet again!?\
name ""
lsp 700,":a;chara\stein_st02.bmp",-220,0:print 10,500
name "Promestein"
>The power of the previous Dark God was attractive...@
>But I was thinking beyond that.\
>Do you remember that report about the massive explosion at the laboratory?@
>That powerful explosion was caused by a simple mix of dark and holy energy.\
>If you could harvest and control such power in a living being...\
>You would become the ultimate existence.@
>...Or so goes my hypothesis.\
name ""
>All of her experiments of fusing angels and monsters together were to test for this hypothesis.\
lsp 700,":a;chara\alice8th_st02.bmp",-200,0:print 10,500
name "Black Alice"
>In other words...@>If I infuse my body, already brimming with the power of the Dark Goddess, with an equal amount of raw holy energy...\
name ""
>A smile slowly spreads across Black Alice's face.\
name "Ilias"
>...E...Eden!@
>What are you doing!?@> Come to my aid!\
name ""
lsp 700,":a;chara\stein_st03.bmp",-220,0:print 10,500
name "Promestein"
>That Third went to intercept the Hero.\
lsp 700,":a;chara\stein_st02.bmp",-220,0:print 10,500
>...Oh, that's right.@
>The report came in a moment ago that he defeated her, too.\
name ""
name "Ilias"
>Hnnf... A good for nothing, all the way to the end!\
>Someone, come to my aid!@
lsp 701,":a;chara\iriasu_st22.bmp",180,0:print 10,500
>Can no one hear my voice!?@> Come to my side!\
name ""
lsp 700,":a;chara\alice8th_st02.bmp",-200,0:print 10,500
name "Black Alice"
>Hehe, it's no use.@
>Everyone is already in a daze from the party...\
name ""
name "Ilias"
>Black Alice, I'll give the surface world to you!@
>So... So...!@
>He...@>..lp...\
name ""
bgmstop
name "Black Alice"
>...Goodbye, Goddess Ilias.\
name ""
dwave 1,"se\ero_slime3.ogg"
csp -1
bg "bg\bg232.bmp",10,1500
bg black,10,2000
sean_change "bg001"
bgm "bgm\kiki2.ogg"
lsp 700,":a;chara\stein_st01r.bmp",-200,0
lsp 701,":a;chara\alice8th_st01.bmp",160,0:print 10,500
name "Promestein"
>...Well?\
name ""
name "Black Alice"
>Hehe... I feel power rising from deep within my body...@
>It feels like I truly am a God...\
name ""
lsp 700,":a;chara\stein_st02.bmp",-200,0:print 10,500
name "Promestein"
>What you should become is more than a God...\
name ""
name "Black Alice"
>Now then, I should go dispose of that Hero Luka now...@
>It will be a good chance to test out this ultimate body of mine.\
name ""
lsp 700,":a;chara\stein_st01r.bmp",-200,0:print 10,500
name "Promestein"
>No, you shouldn't.@
>I'll get rid of the Hero and that Monster Lord myself.\
name ""
name "Black Alice"
>Oh my... Can you really handle that alone?\
name ""
name "Promestein"
>After this, we will divide up and rule the world.@
>This is to be my contribution...\
name ""
>As she's about to head out...@
>Promestein pauses, and slowly turns around.\
name "Promestein"
>That reminds me...@
>The leaders of every country knew about the coming secondary invasion today.\
>Their armies were deployed knowing the exact time, location, and direction of each invading force.\
>With each invading force contained like that, no reinforcements were able to be re-directed to the Four Towers.\
>As a result, all of the Next Dolls were lost.@
>Due to an information leak to the surface world, we suffered a large amount of military damage.\
name ""
name "Black Alice"
>Teehee...@>I wonder who leaked out that information?\
name ""
name "Promestein"
>............\
name ""
>Promestein simply glances back at Black Alice a final time.\
name "Promestein"
>...It was you, of course.\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,500
>With that, Promestein leaves.\
name "Black Alice"
>Hehehehe...\
name ""
>Black Alice giggles as she watches Promestein head toward the advancing Hero...\
bgmstop
mov %hanyo1,0
goto *sean0409_01



*sean0409_01

if %ivent06<2 goto *sean0409_02
sean_change "bg062"
if %hanyo1=0 bgm "bgm\battle2.ogg"
mov %hanyo1,1
lsp 700,":a;chara\sabasa_st01.bmp",-220,0
lsp 701,":a;chara\mob_heisi1.bmp",220,0:print 10,500
name "Messenger A"
>Reporting!@
>The Mohn Infantry Corps has sustained heavy damage!\
name ""
name "Sabasa King"
>Order them to fall back, and bring forth the Nahm Corps!\
name ""
dwave 1,"se\asioto1.ogg"
>Right after the first messenger departs, another one runs forward.\
name "Messenger B"
>Report from the Nahm Corps!@
>They have encountered the enemy vanguard!\
name ""
lsp 700,":a;chara\sabasa_st03.bmp",-220,0:print 10,500
name "Sabasa King"
>Guh... So they can't make it to Mohn's front?\
name ""
>The Sabasa Kingdom, host of the most powerful human military...@
>Knowing that, the invading force sent by the enemy was incredibly strong.\
>With their overwhelming numerical superiority, they're breaking through numerous fronts all at once.\
lsp 700,":a;chara\sabasa_st01.bmp",-220,0:print 10,500
name "Sabasa King"
>Then order the Mohn Corps to perform a fighting retreat!@
>After drawing in the line, send forth the Aten Cavalry Corps to flank them!\
name ""
name "Messenger C"
>R...Reporting!\
name ""
dwave 1,"se\asioto1.ogg"
>Only seconds after the King stops speaking, another messenger runs forward.@
>The continually changing tactical situation is getting difficult even for the Sabasa King to keep a hold on...\
name "Messenger C"
>A spearhead of Tank and Beast type soldiers have penetrated the eastern line!@
>--Uwaa!\
name ""
>There's no need to hear his report any longer...@
lsp 701,":a;chara\c_beast_st01.bmp",240,0:print 10,500
>Charging forward into the royal guard, were those very mentioned Chimeras.\
dwave 1,"se\karaburi.ogg"
>Charging blindly forward for the King, they break through his stunned royal guards...\
lsp 700,":a;chara\sabasa_st05.bmp",-220,0:print 10,500
name "Sabasa King"
>Oryaa!\
name ""
dwave 1,"se\slash3.ogg"
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
csp 701:print 10,500
>The Sabasa King pulls out his giant sword, and cleaves Chimera after Chimera in two.@
lsp 701,":a;chara\c_chariot_st01.bmp",220,0:print 10,500
>But a huge Chimera steps forward past the bisected corpses of her fellow soldiers.\
name "Chimera Chariot"
>King of Sabasa, your life ends here!\
name ""
lsp 700,":a;chara\sabasa_st03.bmp",-220,0:print 10,500
name "Sabasa King"
>Guh...!\
name ""
>The Sabasa King readies his sword, resolving himself for one final strike...\
dwave 1,"se\karaburi.ogg"
lsp 700,":a;chara\sphinx_st01.bmp",-220,0:print 10,500
dwave 1,"se\dageki2.ogg"
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
csp 701:print 10,500
>When an even larger monster jumps forward, knocking away the huge Chimera with a single blow!\
lsp 700,":a;chara\sabasa_st03.bmp",-220,0
lsp 701,":a;chara\sphinx_st01.bmp",220,0:print 10,500
name "Sabasa King"
>You saved me...@
>Are you an ally, then?\
name ""
>Sphinx leans down, and gazes into the King's eyes.\
name "Sphinx"
>Hmph... I can tell with just a glance.@
>You're exactly like he was...\
name ""
lsp 700,":a;chara\sabasa_st01.bmp",-220,0:print 10,500
name "Sabasa King"
>It can't be...@> The Royal Founder...?\
name ""
name "Sphinx"
>...Save this for later.@
>Oh brave soldiers, follow me!\
name ""
>The giant Sphinx charges forward, breaking the enemy with her overwhelming power.@
>Seeing her power, the breaking soldiers morale recovers, bringing forth a cry of defiance.\
>The battle rages ever hotter in the land of the burning sands...\
mov %check07,1
goto *sean0409_02



*sean0409_02

if %ivent17<2 goto *sean0409_03
sean_change "bg122"
if %hanyo1=0 bgm "bgm\battle2.ogg"
mov %hanyo1,1
lsp 700,":a;chara\mob_gorotuki3.bmp",-170,0
lsp 701,":a;chara\mob_seinen2.bmp",170,0:print 10,500
name "Lupton"
>Show 'em the spirit of the former Ilias Kreuz group!@
>Detonate the bombs!\
name ""
name "Former Member"
>Roger, former vice chief!\
name ""
>As the enemy invaders rush into the town...@
dwave 1,"se\bom2.ogg"
>The pre-planted bombs all detonate in a line!\
lsp 701,":a;chara\c_beast_st01.bmp",-160,0
lsp 700,":a;chara\c_beast_st01.bmp",200,0:print 10,500
>The line of explosions blasts apart the charging line, sending the Chimeras into disarray.\
csp 701
lsp 700,":a;chara\poseidones_st01.bmp",0,0:print 10,500
name "Poseidoness"
>...Charge while they're broken!@>North Sea Army, advance!\
name ""
lsp 700,":a;chara\hitode_st01.bmp",-170,0
lsp 701,":a;chara\dagon_st01.bmp",170,0:print 10,500
name "Starfish Girl"
>Here we come!\
name ""
>The monsters of the northern sea charge into the disoriented Chimeras.\
lsp 700,":a;chara\mob_gorotuki3.bmp",-170,0
lsp 701,":a;chara\mob_seinen2.bmp",170,0:print 10,500
>Providing support from behind, the original members of Ilias Kreuz hurl handmade bombs and shoot arrows into the rear of the enemy, preventing reinforcements.\
>All of them are former veterans from the time of Marcellus, each once known as renowned warriors in their own right.\
>After hearing that Lazarus had died defending the town, they grouped back up to defend Gold Port.\
lsp 700,":a;chara\mob_gorotuki3.bmp",-200,0
lsp 701,":a;chara\poseidones_st01.bmp",170,0:print 10,500
name "Lupton"
>Hey... Why are you helping us?@
>This town is home to monster haters, ya know?\
name ""
>While chucking more bombs deep into the enemy lines, Lupton questions Poseidoness.\
name "Poseidoness"
>A boy showed us the possibility that we could live together.@
>I am here to meet his wishes.\
name ""
name "Lupton"
>I don't really know the details...@
>But if it wasn't for you all, we'd be finished.\
>So for that, I'm grateful.\
name ""
name "Poseidoness"
>We're still in the midsts of battle.@> Your thanks is too soon...@
>Besides...@> We aren't the only former villains who are protecting this town.\
name ""
name "Lupton"
>W...What the hell is that!?\
name ""
cspl 700,701
bg "BG\bg129.bmp",10,1000
>A huge sail comes into view near the beach.@
>The flag raised is Captain Selene's...@> The legendary pirate that should have vanished fifty years ago!\
lsp 700,":a;chara\mob_gorotuki3.bmp",-200,0
lsp 701,":a;chara\poseidones_st01.bmp",170,0
bg "BG\bg122.bmp",10,1000
name "Lupton"
>W...What's going on!?\
name ""
name "Poseidoness"
>So the lost souls returned once again...\
name ""
lsp 701,":a;chara\kaizokub.bmp",-240,0
lsp 702,":a;chara\kaizokua.bmp",240,0
lsp 700,":a;chara\serene_st11.bmp",0,0
bg "BG\bg124.bmp",10,1000
name "Captain Selene"
>The citizens in the city have already been evacuated!@>Don't hold back, mateys!@
>Fire!@>Riddle em with cannon fire!\
name ""
name "Pirate A"
>Hell yeah, eat this!\
name ""
dwave 1,"se\shot4.ogg"
>Turning to broadside, Captain Selene's cannons roar with shot after shot.@
>A rain of deadly artillery fire crashes into the ranks of the attacking Chimeras.\
cspl 700,702
lsp 700,":a;chara\mob_gorotuki3.bmp",-200,0
lsp 701,":a;chara\poseidones_st01.bmp",170,0
bg "BG\bg122.bmp",10,1000
name "Poseidoness"
>Alright, slam into them as they rout!\
name ""
name "Lupton"
>Alright you non monster non ghost weaklings!@> Keep hurling bombs and arrows!@
>Show me your guts!\
name ""
name "Former Member"
>Fire!@>Fire!@>Don't let 'em through!\
name ""
>The town that hated monsters has formed a united front against a new enemy.@
>Checking the heavenly armies assault, they don't budge an inch...\
mov %check07,1
goto *sean0409_03



*sean0409_03

if %ivent07<2 goto *sean0409_04
sean_change "bg072"
if %hanyo1=0 bgm "bgm\battle2.ogg"
mov %hanyo1,1
lsp 701,":a;chara\wormv_st03.bmp",-170,0
lsp 700,":a;chara\mob_angel1_st02.bmp",170,0:print 10,500
name "Angel Soldier"
>Damn you, sub-humans..\
name ""
name "Village Girl A"
>Haa... Haa...@>There are too many of them...\
name ""
>No matter how many they defeat, more enemies invade the town.@
>Holding the line are the villager girls, whose bodies have been partially transformed.\
lsp 700,":a;chara\mob_wormv1.bmp",-200,0
lsp 701,":a;chara\mob_seinen1.bmp",170,0:print 10,500
name "Village Girl B"
>There are more...?@> I don't think I can go on much longer...\
name ""
name "Boy"
>Guh... More arrows!@
>We have to cover the girls!\
name ""
dwave 1,"se\yumi.ogg"
wait 100
dwave 2,"se\yumi.ogg"
wait 100
dwave 3,"se\yumi.ogg"
>Behind the line of transformed girls, the rest of the villagers are armed with bows.@
>With both groups together, they're just barely stopping the advance. But...\
lsp 700,":a;chara\mob_seinen1.bmp",-170,0
lsp 701,":a;chara\mob_angel1_st01.bmp",170,0:print 10,500
>Seeing her chance, one of the angel soldiers charges forward, and breaks through the line!\
name "Angel Soldier"
>We got them!\
name ""
name "Boy"
>Hyaa!\
name ""
dwave 1,"se\karaburi.ogg"
>As the angel goes to cut the boy through...@
dwave 2,"se\ero_makituki2.ogg"
>Tentacles coil around her body, stopping her sword!\
lsp 701,":a;chara\ironmaiden_k_st01.bmp",-170,0
lsp 700,":a;chara\mob_angel1_st01.bmp",170,0:print 10,500
name "Angel Soldier"
>Wh...What the...?@
>Ahhh!\
name ""
name "Iron Maiden v2"
>..............\
name ""
dwave 2,"se\ero_makituki3.ogg"
csp 700
lsp 701,":a;chara\ironmaiden_k_st14.bmp",-170,0:print 10,500
>The angel is drawn inside the Iron Maiden's body...\
name "Angel Soldier"
>N...Noooo!@
>Ahhh!\
name ""
>Her door closes, starting the endless torture of pleasure...@
lsp 701,":a;chara\lusia_st23.bmp",0,0:print 10,500
>Standing next to the Iron Maiden is Lucia...@> The once invader of this very village.\
name "Lucia"
>A place for me to return to...@> The place I must protect...@
>No matter what I thought about, my thoughts always returned here.\
name ""
lsp 701,":a;chara\wormv_st03.bmp",-200,0
lsp 700,":a;chara\lusia_st23.bmp",200,0:print 10,500
name "Village Girl A"
>Lucia... You returned to help us?\
name ""
name "Lucia"
>I... Can I return to this village?\
name ""
lsp 701,":a;chara\wormv_st02.bmp",-200,0:print 10,500
name "Village Girl A"
>I'm sure everyone would accept you.@
>They accepted us, after all...\
name ""
lsp 701,":a;chara\mob_rouzin1.bmp",-200,0:print 10,500
name "Elder"
>Of course...@> You won't repeat the same mistakes you made before.@
>We won't discriminate against anyone in this village, no matter what they look like.\
name ""
lsp 701,":a;chara\mob_seinen1.bmp",-200,0:print 10,500
name "Village Youth"
>That's right, Lucia.@
>Everyone here remembers you as a child, growing up in this village!\
name ""
csp 701
lsp 700,":a;chara\lusia_st23.bmp",0,0:print 10,500
name "Lucia"
>Then...@>I shall protect this village!\
name ""
dwave 1,"se\ero_makituki2.ogg"
lsp 700,":a;chara\lusia_st03.bmp",0,0:print 10,500
>Tentacles surge out from Lucia's body, knocking away groups of angels at a time.@
>Slamming into them... Coiling around them... Her countless tentacles tear through their ranks.\
lsp 701,":a;chara\wormv_st02.bmp",-170,0
lsp 700,":a;chara\mob_seinen1.bmp",170,0:print 10,500
name "Village Girl A"
>We'll fight too!\
name ""
name "Boy"
>Don't let them show us up!@> Fire!\
name ""
>The villagers fighting spirit surges back alive.@
>The once fragmented hearts of the Witch Hunt Village have united....\
mov %check07,1
goto *sean0409_04



*sean0409_04

if %ivent01<2 goto *sean0409_05
sean_change "bg017"
if %hanyo1=0 bgm "bgm\battle2.ogg"
mov %hanyo1,1
lsp 700,":a;chara\dragonp_st03.bmp",-160,0
lsp 701,":a;chara\catoblepas_st01.bmp",160,0:print 10,500
name "Dragon Pup"
>Uga!\
name ""
lsp 700,":a;chara\vgirl_st03.bmp",-160,0:print 10,500
name "Vampire Girl"
>Kyaa!\
name ""
dwave 1,"se\down.ogg"
>The small monster girls are flung away by the huge monster.\
lsp 700,":a;chara\pramia_st03.bmp",-160,0:print 10,500
name "Tiny Lamia"
>Yoooouu!\
name ""
dwave 1,"se\miss.ogg"
>Tiny Lamia pounces on her from behind...\
name "Catoblepas Girl"
>Nuisances.\
name ""
dwave 1,"se\down.ogg"
>But after being easily dodged, Tiny Lamia crashes to the ground.\
lsp 701,":a;chara\vgirl_st03.bmp",-160,0
lsp 700,":a;chara\dragonp_st03.bmp",180,0:print 10,500
name "Vampire Girl"
>We're totally helpless...\
name ""
name "Dragon Pup"
>Ugaga... But we want to protect these nice people...\
name ""
>The enemy in front of them is far more powerful than they are.@
>They slowly manage to stand up, but they're shaking in pain.\
lsp 701,":a;chara\pramia_st03.bmp",-160,0:print 10,500
name "Tiny Lamia"
>If it's like this...@> Then that gem Tamamo gave us...\
name ""
name "Dragon Pup"
>B...But...\
name ""
>Tamamo's warning runs through their mind.@
>To avoid using it if at all possible, due to the intense strain it will put on their bodies.\
>The three girls look nervous as they stare at each other.\
dwave 1,"se\asioto1.ogg"
lsp 700,":a;chara\mob_heisi1.bmp",-170,0
lsp 701,":a;chara\catoblepas_st01.bmp",170,0:print 10,500
name "Soldier A"
>Over here!@> There's a huge one!\
name ""
name "Soldier B"
>Oi!@>Isn't that the little ones, attacking her!?\
name ""
>Soldiers rush into the area, but they're no match for the huge monster either...\
name "Catoblepas Girl"
>Humans think they can match me?\
name ""
name "Soldier A"
>Guwaa!\
name ""
dwave 1,"se\down.ogg"
>The humans are slapped away with ease, one after another.@
>Seeing this horrible sight, the girls' resolve hardens.\
lsp 700,":a;chara\pramia_st03.bmp",-160,0
lsp 701,":a;chara\dragonp_st03.bmp",180,0:print 10,500
name "Tiny Lamia"
>I'm scared, but...@
>I don't want to be weak anymore!\
name ""
name "Dragon Pup"
>I'd never forgive myself if I ran away here!\
name ""
lsp 701,":a;chara\vgirl_st03.bmp",-160,0
lsp 700,":a;chara\dragonp_st03.bmp",180,0:print 10,500
name "Vampire Girl"
>That Hero...@
>He would fight an enemy, at any time, no matter what!\
name ""
>The girls each take out their gems, imbued with the power of a spirit.@
>The power floods into each of them, awakening their hidden potential...\
lsp 701,":a;chara\pramia_st03.bmp",-160,0:print 10,500
name "Tiny Lamia"
>W...What power...\
name ""
name "Dragon Pup"
>Ugaga...\
name ""
dwave 1,"se\power.ogg"
>The power floods their small bodies, and...\
lsp 700,":a;chara\mob_heisi1.bmp",-170,0
lsp 701,":a;chara\catoblepas_st01.bmp",170,0:print 10,500
name "Soldier A"
>Guh... No more...\
name ""
>The Soldiers falter before the approaching Catoblepas Girl.\
lsp 700,":a;chara\pramia_st21.bmp",-170,0
lsp 701,":a;chara\catoblepas_st01.bmp",170,0:print 10,500
name "Tiny Lamia"
>Eiiiya!\
name ""
dwave 1,"se\karaburi.ogg"
wait 500
dwave 2,"se\damage2.ogg"
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
>Tiny Lamia jumps forward, and slams her tail into the advancing monster!\
name "Catoblepas Girl"
>Urhg!\
name ""
>The giant monster staggers to the side after taking the heavy blow.@
dwave 1,"se\fire2.ogg"
lsp 690,":a;effect\008.bmp",0,0:print 10,500
>Before she can regain her balance, a vortex of fire envelopes her!\
lsp 700,":a;chara\dragonp_st21.bmp",-160,0:print 10,500
name "Dragon Pup"
>My flames will incinerate you!\
name ""
name "Catoblepas Girl"
>Ahhhgg!\
name ""
>Dragon Pup's scorching breath burns her body...\
csp 690:print 10,500
lsp 700,":a;chara\vgirl_st21.bmp",-160,0:print 10,500
name "Vampire Girl"
>Lightning!@> Strike with my rage!\
name ""
dwave 1,"se\bom2.ogg"
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
wait 200
dwave 2,"se\down.ogg"
csp 701:print 10,500
>An intense bolt of lightning electrocutes the burned Catoblepas Girl!\
lsp 700,":a;chara\pramia_st21.bmp",-170,0
lsp 701,":a;chara\mob_heisi1.bmp",170,0:print 10,500
name "Soldier A"
>It can't be... The little monsters?@
>What's with those forms...?\
name ""
name "Tiny Lamia"
>We'll defend the town this time!\
name ""
lsp 701,":a;chara\dragonp_st21.bmp",170,0:print 10,500
name "Dragon Pup"
>I'll burn every attacker!\
name ""
lsp 700,":a;chara\vgirl_st21.bmp",-170,0:print 10,500
name "Vampire Girl"
>Hehehe... The power of darkness is in my hands!\
name ""
>More monsters are still flooding the town.@
>The three grown monsters, infused with power, rush to meet them.\
lsp 700,":a;chara\pramia_st21.bmp",-170,0:print 10,500
name "Tiny Lamia"
>We're doing our best... So...!\
name ""
name "Dragon Pup"
>Luka... Please win!\
name ""
mov %check07,1
goto *sean0409_05



*sean0409_05

bgmstop
sean_change "bg211"
bgm "bgm\tenkai.ogg"
name "Luka"
>...Everyone is fighting...\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>What are you going on about, Luka?\
name ""
name "Luka"
>I just felt like that was true...\
name ""
if %check07=0 goto *sean0409_06
if %check07=1 goto *sean0409_07



*sean0409_06

lsp 700,":a;chara\alice_st06b.bmp",67,0:print 10,500
name "Alice"
>...Aren't you just hallucinating?\
name ""
name "Luka"
>I...I guess so...\
name ""
bgm "bgm\stein.ogg"
lsp 700,":a;chara\stein_st01r.bmp",0,0:print 10,500
name "Promestein"
>Hmph... So you're starting to hallucinate now?@
>The disgraced Hero's spirit seems to be about to break.\
name ""
goto *sean0409_08



*sean0409_07

lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...If you're sensing it, then it must be so.@
>It looks like their voices are reaching you.\
name ""
name "Luka"
>You're agreeing awfully fast...@
>I thought you were going to tell me I was hallucinating.\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Your ability to sense things is already far above my own.@
>As you are now, I wouldn't be surprised at you sensing something I cannot.\
name ""
bgm "bgm\stein.ogg"
lsp 700,":a;chara\stein_st01r.bmp",0,0:print 10,500
name "Promestein"
>That is correct...@
>Once you're in Seraphim class, you can hear the cry of the soul itself.\
>With that power you hold, it's no wonder.\
name ""
goto *sean0409_08



*sean0409_08

name "Luka"
>You...\
name ""
>Promestein.@
>The brutal scientist who created all of those horrible Chimeras.\
>She captured countless humans and monsters all through the world, to act as reagents for her horrible experiments.@
>Her crimes are too many to list...\
name "Luka"
>I won't let your experiments continue any longer!@
>Humans are not toys to be played with!\
name ""
lsp 700,":a;chara\stein_st02.bmp",0,0:print 10,500
name "Promestein"
>Hmph... What a strange thing to say.@
>I love humans.\
name ""
lsp 700,":a;chara\alice_st03b.bmp",-120,0
lsp 701,":a;chara\stein_st02.bmp",160,0:print 10,500
name "Alice"
>As experimental animals... You mean?\
name ""
lsp 701,":a;chara\stein_st03.bmp",160,0:print 10,500
name "Promestein"
>...Well, I wouldn't expect you two to understand.\
>But still, those surface dwellers are fighting bravely.@
>The invading army this time isn't as well maintained as the first one was...\
>Most of them are cheaply mass produced models, poor in quality.@
>All of the Chimeras on the ground are third-rate, too.\
name ""
>Promestein lets out a deep sigh.\
name "Promestein"
>And the angels are in a panic due to that holy energy seal.@
>It's their first time fighting surface dwellers on equal terms, after all.\
>Most of them are feeling pain for the very first time in their lives.@
>Against those surface dwellers, fighting for their very lives, the angels' mental fortitude is crumbling fast.\
name ""
lsp 700,":a;chara\alice_st02b.bmp",-120,0:print 10,500
name "Alice"
>Hmph... So those conceited angels are being smacked for the first time?\
name ""
name "Luka"
>I'm sure we'll win.@
>So call off the futile battle.\
name ""
csp 701
lsp 700,":a;chara\stein_st02.bmp",0,0:print 10,500
name "Promestein"
>Hehe, it isn't futile.@
>This situation is exactly what we wanted!\
>I've been waiting for these circumstances for so long!@
>Thanks to you, everything has gone perfectly.\
name ""
name "Luka"
>Plan...?@> What are you talking about!?\
name ""
name "Promestein"
>It means this is all going according to the scenario I laid out.@
>The dispersion of Heavenly forces... Eden being knocked down...\
>And for Black Alice to devour Ilias herself!@
>The power of the Dark God will fuse with Ilias, and create the ultimate existence!\
name ""
name "Luka"
>Ilias... Was eaten!?\
name ""
lsp 700,":a;chara\alice_st51b.bmp",-120,0
lsp 701,":a;chara\stein_st02.bmp",160,0:print 10,500
name "Alice"
>What do you mean by that...?\
name ""
name "Promestein"
>Just what it sounds like...@>Our rebellion succeeded.\
>Ilias fell from her throne, and Black Alice ascended!\
>But, after that...@
>It will all fall to me, in the end!\
name ""
name "Luka"
>....!!\
name ""
dwave 1,"se\kodou.ogg"
>Promestein pulls out a syringe.@
>A horrible sensation radiates from the chemicals inside...\
name "Promestein"
>This "White Rabbit"...@
>A medicine that's able to accelerate and direct Alice's evolution.\
>It was purified from the Dark God Alipheese's very cells.\
name ""
name "Alice"
>Cells from the Founder!?\
name ""
name "Promestein"
>Black Alice doesn't know that another version exists.@
>But this one was compounded for me!\
name ""
>Promestein pierces her own neck with the syringe...@
>And injects the "White Rabbit" into herself!\
name "Promestein"
>Hehe... Now, I too...@
>Will hold the power of Dark God Alipheese...\
name ""
dwave 1,"se\ero_makituki4.ogg"
>Promestein's body starts to transform.@
>Huge pieces of meat expand, ripping through her white lab coat.\
>It's like a giant tree, growing at an incredible rate.\
name "Alice"
>Impossible...\
name ""
name "Luka"
>What the hell is this!?\
name ""
r@k@\
cspl 700,701
goto *stein2_start



*sean0410

bgm "bgm\tenkai.ogg"
name ""
r@k@\
name "Luka"
>Your brutality is at an end now...\
name ""
name "Promestein"
>Not at all...@>I have a worthy successor...\
name ""
>As her body crumbles to the floor, Promestein speaks in pained tones.\
name "Luka"
>Successor!?@
>You have more subordinates!?\
name ""
name "Promestein"
>No...@>My successor is the entire human race.@
>I'm certain...@> One will inherit my research...\
name ""
lsp 699,":a;chara\alice_st03b.bmp",-160,0:print 10,500
name "Alice"
>Humans?\
name ""
csp 699:print 10,500
name "Promestein"
>It has only been a few thousand years since humans first developed a language.@
>The amount of knowledge obtained has been incredible.\
>In another five hundred years, I'm sure they will overtake me.@
>Humans will succeed me, and complete my search...\
name ""
name "Luka"
>Humans will never perform insane research like you!\
name ""
name "Promestein"
>Hehe... Is that so?@
>Human minds are more curious than even mine...\
>Just as I do, they want to know anything and everything.@
>I'm certain silly things like ethics won't stand in their way.\
>They will toy with life... Just as I did.\
>They must know everything...@
>The ones who cannot live, unless they strive to seek the truth and reason behind things being as they are.\
name ""
lsp 699,":a;chara\alice_st04b.bmp",-160,0:print 10,500
name "Alice"
>...That may be true.@
>From the eyes of a monster, human technological development is incredible.\
name ""
>Alice quietly nods as Promestein's body slowly dissolves away...\
csp 699:print 10,500
name "Promestein"
>That's why I love humans from the bottom of my heart.@
>They are comrades who follow the same path as me.\
>And, like me, they hate those who would block them in their quest...@
>The people that assume anything new is a sin.\
>That is why I taught humans how to use fire.@
>Some Goddess in the sky won't save them.@> Their own advancement will...\
name ""
name "Luka"
>.............\
name ""
lsp 700,":a;chara\stein2_st12.bmp",0,0:print 10,500
name "Promestein"
>At the end... I will see...\
>The distances that humans will travel...@
>Will they reach the heights of Gods?\
>I'm sure... They will surpass it...@
>I...@> Believe...\
name ""
csp 700:print 99,4500,"system\breakup.dll/urb"
>With those final words, Promestein's body disperses into dust.\
name "Luka"
>Promestein...@
>I wonder... If she truly liked humans?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...Who knows.@
>I'm sure she found something in common with humans.\
>But I don't know what she's expecting...@
>Did she think she would get anything but hate if she used humans and monsters as her own experimental material?\
name ""
name "Luka"
>Of course... But...@
>If she's right...\
>If human technology advances to where we can do the same things as her.@
>Will we use life itself as a tool to experiment upon further?\
>No... I can't think about something like that now.\
name ""
name "Alice"
>...Right, that's true.@
>There's no point in thinking about the future until we've won the final battle...\
name ""
>After Black Alice swallowed Ilias, she became something even stronger...@
>If that's true, we have to defeat her as fast as possible.\
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>But still... Bitten by her own dogs.@
>Ilias truly is pitiful...\
name ""
name "Luka"
>It must have been that seal they used on you.@
>Her true target for it wasn't you at all...\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Her real aim with that was to use it against Ilias herself.@
>But she disguised it by saying she was going to seal me...\
name ""
>At any rate, one thing is clear.@
>Black Alice is a bigger threat than Ilias now!\
name "Luka"
>Alright, let's go!\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Yes... This will be the last fight!\
name ""
csp 700:print 10,500
>Thus, we rush onward.@
>Toward the final battle... With Black Alice!\
dwave 1,"se\asioto2.ogg"
bgmstop
mov %hanyo1,0
goto *sean0410_01



*sean0410_01

if %ivent08<2 goto *sean0410_02
sean_change "bg188"
if %hanyo1=0 bgm "bgm\battle2.ogg"
mov %hanyo1,1
lsp 700,":a;chara\durahan_st01.bmp",0,50
lsp 701,":a;chara\kerberos_st01.bmp",160,0:print 10,500
name "Dullahan"
>You won't get by this time!\
name ""
name "Cerberus"
>Don't underestimate the fighters of the Colosseum!\
name ""
>The fighters from the Colosseum meet the invading force at the gate into Grand Noah City.\
csp 701
lsp 700,":a;chara\grandnoa_st01.bmp",0,0:print 10,500
name "Grand Noah Queen"
>Now... Flank them!\
name ""
>The Grand Noah ground forces rush in from the sides, as archers riddle the invaders with arrows from the ramparts.\
lsp 700,":a;chara\valkyrie_st01.bmp",0,0:print 10,500
name "Valkyrie"
>Don't flinch!@>Advance!\
name ""
lsp 700,":a;chara\durahan_st01.bmp",0,50
lsp 701,":a;chara\valkyrie_st01.bmp",120,0:print 10,500
name "Dullahan"
>I said you aren't getting past!\
name ""
dwave 1,"se\break.ogg"
>Valkyrie and Dullahan clash together in a shower of sparks, their swords clashing together faster than can be seen.\
lsp 700,":a;chara\kerberos_st01.bmp",-200,0
lsp 701,":a;chara\c_beast_st01.bmp",200,0:print 10,500
name "Cerberus"
>Uoooo!\
name ""
dwave 1,"se\karaburi.ogg"
>Meanwhile, Cerberus is rampaging through the enemy ranks, her claws ripping Chimeric Beasts to pieces.\
lsp 700,":a;chara\mob_heisi1.bmp",-180,0
lsp 701,":a;chara\c_beast_st01.bmp",200,0:print 10,500
name "Soldier"
>Soldiers, keep it up!@
>Don't let them take a single step into the city!\
name ""
>Together with the monster fighters of the Colosseum, the human soldiers hold the line.@
>Unwilling to budge an inch, they halt the advance of the army of the Heavens...\
csp 701
lsp 700,":a;chara\grandnoa_st01.bmp",0,0:print 10,500
name "Grand Noah Queen"
>Hero Luka...@> We shall not budge an inch.@
>So please... You must do the same...\
name ""
goto *sean0410_02



*sean0410_02

if %ivent10<2 goto *sean0410_03
sean_change "bg095"
if %hanyo1=0 bgm "bgm\battle2.ogg"
mov %hanyo1,1
lsp 700,":a;chara\a_emp_st21.bmp",140,30:print 10,500
name "Alra Priestess"
>So the enemy has finally arrived?@
>Are you ready, Queen Bee?\
name ""
lsp 700,":a;chara\a_emp_st21.bmp",-50,30
lsp 701,":a;chara\queenbee_st01.bmp",160,0:print 10,500
name "Queen Bee"
>Of course, Priestess.\
name ""
lsp 700,":a;chara\angels_st01.bmp",-200,0
lsp 701,":a;chara\c_beast_st01.bmp",200,0:print 10,500
>Countless invading soldiers charge into Plansect Forest...\
lsp 700,":a;chara\a_alm_st01.bmp",0,0
lsp 701,":a;chara\suzumebati_st01.bmp",200,0:print 10,500
name "Alra Arum"
>Now, check their advance!\
name ""
name "Hornet Girl"
>GET THE ENEMY!\
name ""
>Meeting the invading forces was a mixed army of plant and insect monsters.\
>They allowed the enemy to invade their forest as part of their strategy.@
>Completely taken in, they flounder in confusion as the insect and plant monsters descend on them from the trees.\
lsp 700,":a;chara\angels_st03.bmp",-200,0
lsp 701,":a;chara\c_beast_st01.bmp",200,0:print 10,500
name "Angel Soldier"
>A trap...?@
>You cowards!\
name ""
lsp 701,":a;chara\dina_st02.bmp",-160,0
lsp 700,":a;chara\angels_st03.bmp",200,0:print 10,500
name "Deana Canaan"
>To fall so easily into a trap...@> The armies of the Heavens are quite poor at waging war, aren't they?\
name ""
lsp 701,":a;chara\rafi_st02.bmp",-180,0
lsp 700,":a;chara\angels_st03.bmp",200,0:print 10,500
name "Raffia Canaan"
>All you know how to do is charge forward, confident in your numbers and invulnerability...@
>Perhaps you would learn if you were on the losing side some of the time!\
name ""
>The three powerful sisters jump down in the middle of the enemy ranks, cutting open holes.\
>But with their sheer numbers, even splitting them up in the forest will only delay the inevitable.\
>The battle is only evenly matched due to the invaders temporary confusion...@
>Including their expected reinforcements, Plansect Forest can only hope to buy time with guerrilla warfare.\
lsp 701,":a;chara\dorothy_st03.bmp",-180,0:print 10,500
name "Dorothy Canaan"
>Do something about their leader quickly, Luka...@
>Forget coexistence, we'll all die if you don't win!\
name ""
goto *sean0410_03



*sean0410_03

if %ivent18<2 goto *sean0410_04
sean_change "bg157"
if %hanyo1=0 bgm "bgm\battle2.ogg"
mov %hanyo1,1
lsp 700,":a;chara\saniria_n_st03.bmp",-200,0
lsp 701,":a;chara\mob_heisi1.bmp",170,0:print 10,500
name "Messenger A"
>Report!@>The Naphtail Knights have been annihilated!\
name ""
name "Messenger B"
>The enemy forces have broken through our last line!@
>They will be upon the cathedral shortly!\
name ""
name "San Ilia King"
>That must not happen!@
>We cannot allow the evacuated women and children there to come to harm!\
name ""
lsp 700,":a;chara\saniria_n_st03.bmp",-240,0
lsp 701,":a;chara\fairys_st03.bmp",230,75
lsp 702,":a;chara\mob_heisi1.bmp",250,0:print 10,500
name "Fairy"
>I'm scared, Kingy!\
name ""
>All of the civilians had fled to the cathedral.@
>But the fortifications guarding it are on the verge of being broken...\
csp 702
lsp 700,":a;chara\saniria_n_st03.bmp",-200,0
lsp 701,":a;chara\mob_heisi1.bmp",170,0:print 10,500
name "Messenger C"
>My lord!@> The angels will be upon us-- Ahhg!\
dwave 1,"se\down.ogg"
csp 701:print 10,500
name ""
lsp 700,":a;chara\mob_angel1_st01.bmp",-250,50
lsp 701,":a;chara\mob_angel1_st02.bmp",0,50
lsp 702,":a;chara\mob_angel1_st03.bmp",250,50:print 10,500
name "Angel Soldier"
>Receive your judgement, sinners!\
name ""
>An angel knocks down the messenger as she charges into the cathedral.\
dwave 1,"se\karaburi.ogg"
csp 702
lsp 700,":a;chara\mob_syouzyo.bmp",-170,0
lsp 701,":a;chara\mob_angel1_st01.bmp",170,0:print 10,500
>Her sword raises as she moves to strike a nearby girl...\
cspl 701,702
lsp 700,":a;chara\chrom_st71.bmp",0,0:print 10,500
name "Chrome"
>Hya!@> It's time for Chrome's appearance!@
>Mow them down, Frederika Mk. III!\
name ""
dwave 1,"se\kanoke.ogg"
lsp 700,":a;chara\frederika_st41.bmp",0,0:print 10,500
dwave 1,"se\shot2.ogg"
wait 300
dwave 2,"se\shot3.ogg"
wait 300
dwave 3,"se\shot3.ogg"
wait 300
dwave 4,"se\shot3.ogg"
name "Frederika"
>...!!!\
name ""
>A giant zombie breaks in from behind, firing the huge heavy weapons attached to her back.@
>The shells and bullets slam into the angel ranks, tearing them to pieces.\
lsp 700,":a;chara\chrom_st24.bmp",-170,0
lsp 701,":a;chara\saniria_n_st04.bmp",170,0:print 10,500
name "San Ilia King"
>Z...Zombies in the cathedral!?@
>W...Who are you!?\
name ""
name "Chrome"
>One who isn't suited to cathedrals... The beautiful maiden Chrome!@
>I've come to return a favor, and protect you all!\
name ""
dwave 1,"se\kanoke.ogg"
csp 701
lsp 700,":a;chara\chrom_st71.bmp",0,0:print 10,500
>Standing in the breached doorway of the cathedral, Chrome summons forth a heavy coffin.\
name "Chrome"
>Come!@>Spi, Rit!\
name ""
lsp 700,":a;chara\chromg_st02.bmp",-160,0
lsp 701,":a;chara\chromg_st11.bmp",160,50:print 10,500
name "Spi"
>Yaay!@>I'm going to possess them all! \
name ""
name "Rit"
>Curses upon you...\
name ""
>The ghosts emerge from the coffin, and fly at the swarm of enemies.\
cspl 701,702
lsp 700,":a;chara\chrom_st71.bmp",0,0:print 10,500
name "Chrome"
>And...\
name ""
>Borrowing the work of her sister...\
name "Chrome"
>Fernandez, Roza, Queen Lamia!@
>Intercept the enemy as a group!\
name ""
lsp 700,":a;chara\cirque_st01.bmp",-250,0
lsp 701,":a;chara\cirque_st21.bmp",-30,0
lsp 702,":a;chara\cirque_st31.bmp",280,0:print 10,500
>Chrome summons forth the remaining members of Cirque du Croix.@
>Emitting torrents of magical power, they cut through the enemy ranks.\
cspl 701,702
lsp 700,":a;chara\saniria_n_st04.bmp",0,0:print 10,500
name "San Ilia King"
>I didn't expect help like this...\
name ""
>Inside the sacred cathedral, a necromancer and her undead minions are battling angels.@
>Behind them, the cowering clergy and populace are cheering for the necromancer...\
goto *sean0410_04



*sean0410_04

sean_change "bg029"
if %hanyo1=0 bgm "bgm\battle2.ogg"
mov %hanyo1,1
lsp 700,":a;chara\mob_heisi1.bmp",-170,0
lsp 701,":a;chara\mob_elf2.bmp",180,0:print 10,500
name "Ilias Temple Soldier"
>Uoo!@> I won't give an inch!@
>I will protect Enrika with the life they saved!\
name ""
name "Elf"
>This hidden village is our last ground!@
>We will defend it without fail!\
name ""
>The former temple soldiers fight alongside the elves.@
>With Micaela's precise tactical guidance, the battle is slowly turning in their favor.\
lsp 700,":a;chara\micaela_st11.bmp",-90,0
lsp 701,":a;chara\delh_a_st01.bmp",260,-100:print 10,500
name "Dark Elf"
>The enemy forces have been repulsed from the west!\
name ""
lsp 701,":a;chara\mob_elf1.bmp",170,0:print 10,500
name "Elf"
>The eastern invaders are on the verge of routing!@
>A final push will break them!\
name ""
>Under Micaela's guidance, reports of victory are coming in one after another.@
>Hearing of their impending victory, Micaela moves from her position overseeing the battles.\
name "Micaela"
>Then...@>As we discussed before.@
>I must leave for now.@
>I'm leaving command here to you.\
name ""
name "Elf"
>Yes... Understood!@
>But... Where are you going?\
name ""
lsp 700,":a;chara\micaela_st13.bmp",-90,0:print 10,500
name "Micaela"
>I have another role to play.\
name ""
>With that, Micaela departs from the defended village.\
bgmstop
sean_change "bg212"
bgm "bgm\tenkai.ogg"
name "Luka"
>So this is the very center of the Heavens...\
name ""
>Sacred aura is pulsing all around us.@
>It's like we're standing on the still surface of water...@>Truly a place deserving of the name "Heaven".\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>It's a beautiful place...@>Apart from the eerie atmosphere.\
name ""
name "Luka"
>Yeah...\
name ""
>But hanging over everything is an eerie, oppressive feeling.@
>The crushing nature of it is enough to even make my chest feel tight.\
name "Luka"
>...Come out, Black Alice.@
>You're here, aren't you?\
name ""
bgm "bgm\maou2.ogg"
dwave 3,"se\bun.ogg"
lsp 700,":a;chara\alice8th_st01.bmp",0,0:print 99,1500,"system\trvswave.dll/h"
name "Black Alice"
>Hehe... Hehehehe...\
name ""
>Horrifying laughter echoes around.@
>The eerie, powerful feeling gets stronger and stronger...\
name "Black Alice"
>Hehehe... Welcome to the party.@
>The entertainment has been prepared a long time ago...\
name ""
>Black Alice alights down in front of us.@
dwave 1,"se\kodou.ogg"
>As her feet touch the ground, a pounding blast of power slams into us!\
name "Luka"
>Guh...!\
name ""
>The feeling is different from both Eden and Promestein.@
>This feeling... It's like my body is filling with unease and anxiety.\
>But even so, I hold forth my sword and challenge her.\
name "Luka"
>It looks like you really did absorb Ilias...\
name ""
name "Black Alice"
>Yes... The main dish was consumed in no time.@
>She tasted delicious... Hehe.\
name ""
lsp 700,":a;chara\alice_st01b.bmp",-120,0
lsp 701,":a;chara\alice8th_st01.bmp",160,0:print 10,500
name "Alice"
>Why are you seeking so much power!?@
>What is it that you want!?\
name ""
name "Black Alice"
>...Why, everything, of course.@
>Ever since I was born into this world, I have wanted everything to be in the palm of my hand.\
>The fate of one who inherited the Dark God's power... So to say.@
>Alipheese the Sixteenth...@> You lack the will to be the Monster Lord.\
name ""
lsp 700,":a;chara\alice_st03b.bmp",-120,0:print 10,500
name "Alice"
>Is the goal of the Monster Lord to subjugate the world by force?@
>I would never want to hold that intention!\
>The true royal road is one of peace!\
name ""
name "Black Alice"
>I will obtain the world through my power alone...\
>Let me show you, Alipheese the Sixteenth.@
>What kind of being the true Monster Lord should be...\
name ""
csp 701
lsp 700,":a;chara\alice8th_st01.bmp",0,0:print 10,500
dwave 1,"se\ero_makituki4.ogg"
>Black Alice's skirt flutters as tentacles burst forth from her.@
>Hideous organs of flesh rush from her small body...\
>It's as if pieces of other creatures are growing explosively from her body itself...\
>And...\
r@k@\
goto *alice8th2_start



*sean0411

bgm "bgm\tenkai.ogg"
name ""
r@k@\
name "Luka"
>We did it!@
>Finally, we got her!\
name ""
>After a long, fierce battle, we finally defeated her for real...@
>Her body starts to melt and dissolve, as the overwhelming magical power starts to fade...\
name "Black Alice"
>My power... Is gone...@
>My...@>Everything...\
name ""
lsp 699,":a;chara\alice_st04b.bmp",-160,0:print 10,500
name "Alice"
>You hold nothing now.@
>Now vanish into the darkness of history.\
name ""
csp 699:print 10,500
name "Black Alice"
>I... I...\
name ""
csp 700:print 99,4500,"system\breakup.dll/urb"
>Black Alice's body turns into a lump of formless flesh.@
>The mass of flesh quickly continues dissolving away into dust...\
name "Luka"
>It's all over...\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>Yes...@
>Ilias and Black Alice are both gone...\
name ""
bgm "bgm\kiki2.ogg"
dwave 1,"se\kodou.ogg"
lsp 700,":a;chara\alice_st51b.bmp",67,0:print 10,500
name "Luka"
>......!?\
name ""
>No sooner do the words leave her mouth, when a powerful feeling of intimidation spreads through the air!\
>Black Alice should have been destroyed... Right?@
>But the remaining lump of flesh starts to squirm and move...\
name "Luka"
>No... She's still alive?\
name ""
name "Alice"
>No, that can't be!@
>Her soul is already gone!\
name ""
csp 700:print 10,500
dwave 1,"se\ero_slime3.ogg"
>A female stands up from the lump of flesh...@
>It can't be...\
bgm "bgm\irias.ogg"
lsp 700,":a;chara\iriasu_st13.bmp",0,0
bg "bg\bg001.bmp",10,1000
name "Ilias"
>...Well done, Luka.@
>You've served me well.\
name ""
name "Luka"
>I...Ilias!?\
name ""
lsp 700,":a;chara\alice_st51b.bmp",-120,0
lsp 701,":a;chara\iriasu_st13.bmp",180,0:print 10,500
name "Alice"
>Foolishness!@> You were absorbed by Black Alice!\
name ""
csp 701
lsp 700,":a;chara\iriasu_st13.bmp",0,0:print 10,500
name "Ilias"
>Yes... I was fused with her.@
>But with her destruction, my second advent has arrived.\
>...Everything has gone exactly as I planned.@
>First to be absorbed by Black Alice, then for you to have defeated her.\
name ""
name "Luka"
>Wh...What are you talking about?\
name ""
>It's not just a divine aura that I'm feeling from her.@
>An aura of dark magic is clinging to her body, too...\
>It's just like I felt when I faced Black Alice.@
>The power of the Dark God Alipheese...\
name "Ilias"
>As you know, the fusion of holy and dark magic creates an explosion of power.@
>But... As a being of pure holy energy, I could not directly incorporate dark magic like that.\
>So I devised a plan.@
>If I'm absorbed by a being of dark power, and she acts as an intermediary...\
name ""
name "Alice"
>Then you could achieve a fusion with the dark magic!?\
name ""
name "Ilias"
>Of course, simply being eaten would be no good.@
>So I needed a loyal servant to defeat the one who absorbed me.\
>If the one who absorbed me is destroyed, I can descend again.@
>But this time, in a fused state with the dark power...\
name ""
name "Luka"
>.............\
name ""
>So Ilias was revived in front of our very eyes...\
name "Ilias"
>It was quite difficult up until this point.@
>I had to make detailed preparations, and put all of the rebellious pieces in place.\
>My biggest concern was my own acting ability, though.@
>But it appears as though Black Alice was easily fooled.\
name ""
name "Luka"
>You can't be serious!@
>You're saying everything was just for this!?\
>Promestein and Black Alice... You were using everyone?@
>In order to increase your own power...@> You manipulated everyone!?\
name ""
name "Ilias"
>...Yes, that's right.@
>Everyone moved and acted just as I wanted.\
>I gave them reason to rebel.@> Led them to believe "White Rabbit" was an unknown trump card of theirs.@
>I directed their thoughts and actions for just this result.\
name ""
lsp 700,":a;chara\alice_st03b.bmp",-120,0
lsp 701,":a;chara\iriasu_st13.bmp",180,0:print 10,500
name "Alice"
>Petty Goddess... So you outfoxed them due to your age and experience.\
>But what do you intend to do with this new power?@
>Your original power should have been enough already...\
name ""
name "Ilias"
>Why, to exceed Dark God Alipheese, of course.@
>After I clean up all of the monsters, I'll be able to destroy the revived Goddess.\
>Letting Black Alice manage the dark magic in this world was just an excuse to get her to participate in my plan.@
>Did you honestly think I'd ever let you disgusting monsters survive?\
name ""
name "Luka"
>So in the end, that's how it is.@
>I get it...\
name ""
csp 701
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
name "Ilias"
>Hero Luka...@> Of course, you were an important piece in my plan, too.@
>You were my precious servant, who ripped me free from Black Alice's body.\
>You have performed your role beautifully.@
>So... I must reward you.\
name ""
r@k@\
goto *irias1_start



*sean0412
name ""
wait 3000
bgm "bgm\kanasimi2.ogg"
monocro #777777
bg "bg\bg001.bmp",10,2000
gosub *setwindow_01p
name ""
r@k@\
>---I was alone, for an eternity.@
>The only other existence was darkness, which I was completely repelled from.\
>Even if I split my own being and created others...@
>It wasn't any different from simply speaking to myself.\
>The animals crawling on the ground...@
>I prayed for the time when they could speak to me on equal terms.\
>Yes... It all began with that wish.\
monocro #eeeeee
bg "bg\bg001.bmp",10,1500
>Hundreds of millions of years have passed since then.@
>Those people on the ground now revere me as their God.\
>And so I acted as the God they wished for.@
>I forgot my reason for being lonely, and took on the role of a God.\
>Before I realized it...@>I became dependent on their attention.@
>Why did I desire humans so?\
>Did I simply want someone to talk to?@>Or did I truly wish to be a God over others?\
>After this eternity of time, I can't remember myself.@
>I must be a God.@
>Because if I wasn't... Who would I be?\
monocro off
bg "bg\bg001.bmp",10,1500
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>If the people forget their God, and don't require one any longer...@
>Then what would I be?\
>What reason does a Goddess have to exist, if she isn't wanted?@
>A world that needs no God...@
>I can't allow that...\
name ""
name "Luka"
>.........\
>This reminds me of when I spoke with Alice.@
>When I was obsessed with the idea of what it meant to be a "Hero".\
>And Alice was tied up with what it meant to be the "Monster Lord"...\
name ""
>Everyone is bound by their viewpoint on life.@
>Even Ilias seems to be no exception to that...\
name "Ilias"
>The meaning of my existence was wrapped up in the thought of being a God.@
>Was it all a mistake...?\
name ""
name "Luka"
>If you wanted to be a God, there was no reason to rule with force...@
>Simply watching over would have been enough.\
name ""
name "Ilias"
>...........\
>Luka, look at your hand.\
name ""
lsp 700,":a;chara\hand3.bmp",0,0:print 10,500
name "Luka"
>...Yes, I know.@
>I knew before this battle started that this may happen.\
name ""
>My hand is already turning into pure holy energy.@
>My body is slowly being eroded away...\
>It's the price of using all of that power until now.@
>I came here knowing the risk...\
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>My existence will fade...@
>But I have just a little power left.\
>With the last of it...@
lsp 700,":a;chara\iriasu_st03.bmp",0,0:print 10,500
>I'll stop the erosion of holy energy on your body.\
name ""
name "Luka"
>You...@> Will help me?\
name ""
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
name "Ilias"
>In the end, I want to do something God-like...@
>Congratulating the Hero who saved the world...@> That's the duty a God should perform...\
name ""
name "Luka"
>Ilias...\
name ""
>A soft light clings to my body...@
dwave 1,"se\warm.ogg"
>And with that, the holy erosion on my body is reversed!\
name "Ilias"
>Now go, True Hero Luka.@
>You have people waiting for you...\
name ""
wait 500
bgmstop
csp -1
bg black,99,5000,"system\lngtwave.dll/vwi"
bg "bg\bg195.bmp",99,5000,"system\lngtwave.dll/vwi"
wait 1000
gosub *setwindow_01p
bgm "bgm\epilogue3.ogg"
name "Luka"
>............\
>Nnnn...\
name ""
lsp 700,":a;chara\alice_st51b.bmp",67,0:print 10,500
name "Alice"
>Luka!?\
name ""
name "Luka"
>I had a... Strange dream...\
name ""
>Was that a dream? Or an illusion?@
>No... It couldn't have been.\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>Luka!@>You finally woke up!\
name ""
name "Luka"
>Alice...@> What happened to me?\
name ""
>At the least, this doesn't seem to be in the Heavens.@
>I slowly raise up as I take a look around me.\
>I'm in a soft bed, and these walls look familiar.\
name "Luka"
>...The Monster Lord's Castle?@
>How... How long was I sleeping?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>One month.\
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
>You've been in a coma for a whole damn month!\
>Do you know how long you've kept us waiting for you to wake up!?@
>All of the celebrations and parties were put on hold because of your nap!\
name ""
name "Luka"
>I see...@> Sorry about that...\
name ""
>My thoughts are finally starting to clear up.@
>Since the battle with Ilias, I've been asleep here for a month.\
name "Luka"
>What happened after that...?\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Well...\
name ""
>Alice goes over what happened since Ilias' defeat.@
>Losing their central pillar, the invading armies all withdrew at once.\
>All of the shocked angels surrendered at once after losing Ilias.@
>In addition, the Chimeras and followers of Black Alice stopped fighting.\
>It was a complete victory for us...\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>I know you're wondering about it...@
>But there have been hardly any reports of revenge being taken out on the defeated armies.\
>The rulers of the respective areas have put firm laws in place to prevent any brutality.@
>Of course, I did the same.\
name ""
name "Luka"
>I see... I'm so glad...\
name ""
>After the war was over, there was no more need to fight.@
>Any retaliation would just fuel future fights, after all...\
name "Alice"
>I must contact the Four Heavenly Knights at once.@
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
>...Actually, it would be faster for us to go out and meet them.\
>Repairs and recovery have been progressing all over the world this past month.@
>And it's time for the Hero's triumphant return!@>Even if it's one month late!\
name ""
name "Luka"
>R...Right now?\
name ""
name "Alice"
>Everyone the world over has been waiting for you to wake up.@
>It's your duty to make an appearance as the savior of the world.\
>The major physical damage should have been mostly repaired by now.@
>Now come on, it's time to enjoy the world at peace!\
name ""
name "Luka"
>Alice, you're just looking for lots of feasts and food, aren't you?\
name ""
name "Alice"
>Hurry up!@>Galda!\
name ""
csp 700
bg "BG\bg229.bmp",10,1500
>Alice drags me out of the castle.\
>A tour around the now peaceful world...@
>It's said Heinrich did the same thing after defeating Black Alice, five hundred years ago.\
>I never thought I'd be in the same position...\
dwave 1,"se\habataki.ogg"
sean_change "bg029"
>Our first stop is in Enrika.@
>The villagers are all waiting for me to come back, and I have to thank Micaela.\
name "Luka"
>Eh... Where is everyone?\
name ""
>But when we arrive, there is barely anyone here.@
>There aren't any villagers from my hometown, and there are barely any native Enrikans...\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Hmm... I heard the stories.@
>But I didn't imagine it would become this deserted.\
name ""
name "Luka"
>What do you mean...?@
>Did so many die in the battle...?\
name ""
lsp 700,":a;chara\micaela_st11.bmp",70,0:print 10,500
name "Micaela"
>Don't jump to conclusions, Luka.@
>Casualties in the battle were at a minimum.\
>The reason there are so few villagers here is due to another reason.\
name ""
name "Luka"
>Micaela...\
name ""
>Micaela welcomes me at the entrance to the deserted village.\
name "Micaela"
>First of all, I thank you.@
>By all rights, we should prepare a welcoming celebration...\
name ""
name "Luka"
>No, no... There's no need for anything like that.@
>You helped us when we really needed it, Micaela.\
name ""
name "Micaela"
>Your words honor me...@
>Lucifina and Marcellus would both be proud of you.\
>By the way...\
name ""
>Micaela stares at my face.\
name "Micaela"
>The holy erosion on your body has vanished.@
>In addition, I can detect Ilias' power from you...\
name ""
name "Luka"
>Err... That's...\
name ""
>I explain to her the dream I saw before waking up.@
>That Ilias healed me with the last of her power.\
lsp 700,":a;chara\micaela_st13.bmp",70,0:print 10,500
name "Micaela"
>I see... So she did that.@
>Her loneliness cannot be imagined by transient beings like us.\
>But no matter what I thought of when I was a Seraph...@
>I couldn't come up with any way to alter her path.\
name ""
name "Luka"
>...........\
name ""
>It's a complicated feeling...@
>But Ilias is gone now.\
name "Luka"
>So where did everyone go?@
>I don't see anyone from Ilias Village...\
name ""
lsp 700,":a;chara\micaela_st11.bmp",70,0:print 10,500
name "Micaela"
>They returned to their village.@
>Ilias Village's reconstruction has advanced a great deal in the past month.\
name ""
name "Luka"
>But it was almost completely destroyed...@>They rebuilt that much in a month?\
name ""
lsp 701,":a;chara\alice_st01b.bmp",-120,0
lsp 700,":a;chara\micaela_st11.bmp",230,0:print 10,500
name "Alice"
>Tamamo took it upon herself to personally oversee the reconstruction of the Hero's hometown.@
>It seems she called upon all of the Kitsune family to assist.\
name ""
name "Luka"
>I see, so it was with Tamamo's help...\
name ""
>I'll have to stop by and thank her.\
csp 701
lsp 700,":a;chara\micaela_st11.bmp",70,0:print 10,500
name "Luka"
>What about the fallen angels, and the elves?@
>Most of them seem to be gone...\
name ""
name "Micaela"
>This village was hiding them from the world.@
>But now there is no reason to hide away.\
>Most of them have moved to various towns and cities across the world.@
>The only ones who remained were my close followers.\
name ""
name "Luka"
>I see...\
name ""
>And so that's why this place seems so deserted now.@
>But other places around the world have accepted the former citizens here...\
name "Micaela"
>You're a fine Hero, to bring down Ilias.@
>With that, I have no more regrets.\
>But this is no time for me to relax.@
>With all of the fallen angels from her downfall, it seems a refuge may still be needed...\
name ""
name "Luka"
>Can I stop by to see how you're doing every so often?\
name ""
lsp 700,":a;chara\micaela_st12.bmp",70,0:print 10,500
name "Micaela"
>Yes... You are always welcome.\
>Now, please stop by Ilias Village.@
>They are all waiting for you.\
name ""
name "Luka"
>Yes, I'll be heading off now.@
>Micaela, thank you for everything!\
name ""
>With that, I depart from Enrika.@
>Riding on Galda's back, it's time to see what the world is like while at peace.\
>Where should I stop by next...?\
r@k@\
mov %gloval1_story_sinkou,21:gosub *savegloval1
bgm "bgm\epilogue.ogg"
goto *maped



*sean0413

sean_change "bg140"
gosub *setwindow_01p
name "Luka"
>Alright, shall we head back to the Monster Lord's Castle?@
>Err... Have I dropped by to see everyone already?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Everyone has been waiting for you for a long time.@
>Make sure you drop by and see everyone!\
name ""
csp 700:print 10,500
>Should I head back now?@>Or did I miss someone...?\
r@k@\
csel "Go back",*sean0413b,"Not yet...",*sean0413a



*sean0413a

name "Luka"
>No, there's more to see...\
name ""
>Now, where to next...?\
goto *maped



*sean0413b

dwave 1,"se\habataki.ogg"
sean_change "bg047"
gosub *setwindow_01p
bgm "bgm\epilogue2.ogg"
name ""
r@k@\
>I've traveled around the world with Galda and Alice, and have seen a lot...@
>But at last, we come back to the Monster Lord's Castle.\
name "Luka"
>Whew... I'm tired.\
name ""
bgm "bgm\tamamo.ogg"
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>...Welcome back.@
lsp 700,":a;chara\tamamo_st04.bmp",0,0:print 10,500
>And well done, Luka!@> You survived the test!\
name ""
>Tamamo claps, her tail swishing back and forth, as I come back.@
>Test?@>What?\
name "Luka"
>W...What are you talking about?\
name ""
lsp 700,":a;chara\alice_st08b.bmp",-120,0
lsp 701,":a;chara\tamamo_st04.bmp",160,0:print 10,500
name "Alice"
>...........\
name ""
>I try to ask Alice, but she doesn't show any emotion...\
csp 701
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>You received a lewd invitation in each place, didn't you?@
>I was actually the one who put the plans forward for them...\
>It was a test put upon one who could become the Monster Lord's husband!@
>A test of the spirit, to see if he can resist temptation!\
name ""
name "Luka"
>...Ehh!?\
name ""
if %ivent02<2 && %ivent01<2 && %ivent12<2 && %ivent08<2 && %ivent10<2 && %ivent11<2 goto *sean0413x
csp 700
bg black,99,2000,"system\lngtwave.dll/vwi"
if %ivent02<2 skip 17
bg "bg\bg027.bmp",10,1000
lsp 701,":a;chara\tamamo_st01.bmp",-170,0
lsp 700,":a;chara\queenhapy_st11.bmp",170,0:print 10,500
name "Queen Harpy"
>Seduce the Hero...?@
>If I do that, the Monster Lord would be furious...\
>No, if she's alright with it, then I suppose...@
>Yes, alright.@>Hehe... And everyone in the village would be so happy...\
>And me too... He would be a wonderful addition to the village.@
>I'll cooperate, and try my best.\
>Oh no, no... I'm not thinking of my own lust...@
>It's all for picking a proper husband.@> Yes...\
name ""
name "Tamamo"
>................\
name ""
if %ivent01<2 skip 20
cspl 700,701
bg "bg\bg017.bmp",10,1500
lsp 701,":a;chara\tamamo_st01.bmp",-170,0
lsp 700,":a;chara\pramia_st02.bmp",190,0:print 10,500
name "Tiny Lamia"
>Eh!?@> We can play with him as much as we want, forever!?\
name ""
lsp 700,":a;chara\vgirl_st02.bmp",170,0:print 10,500
name "Vampire Girl"
>You don't mind if we kidnap him, and gang-rape him all night and day!?\
name ""
lsp 700,":a;chara\dragonp_st02.bmp",190,0:print 10,500
name "Dragon Pup"
>Uga!@> The Monster Lord won't kill us!?@
>If you can guarantee that, then of course!@> We'll get him no matter what!\
name ""
name "Tamamo"
>............\
name ""
if %ivent12<2 skip 14
cspl 700,701
bg "bg\bg106.bmp",10,1500
lsp 701,":a;chara\tamamo_st01.bmp",-170,0
lsp 700,":a;chara\succubus_st02.bmp",200,50:print 10,500
name "Succubus"
>Ensnare Luka, and make him ours?@
>Cause him to succumb to lust, and be our group toy?\
>This is an incredible chance for our race!@
>I'll collect everyone, right away!@> We shall plan this perfectly...\
name ""
name "Tamamo"
>............\
name ""
if %ivent08<2 skip 13
cspl 700,701
bg "bg\bg082.bmp",10,1500
lsp 700,":a;chara\tamamo_st01.bmp",-180,0
lsp 701,":a;chara\arumaeruma_st11.bmp",180,0:print 10,500
name "Alma Elma"
>Tempt Luka, as a part of the test for the Monster Lord's husband selection...@
lsp 701,":a;chara\arumaeruma_st13.bmp",180,0:print 10,500
>...I wouldn't mind stealing her spouse...\
name ""
name "Tamamo"
>............\
name ""
if %ivent10<2 skip 12
cspl 700,701
bg "bg\bg095.bmp",10,1500
lsp 701,":a;chara\tamamo_st01.bmp",-170,0
lsp 700,":a;chara\erbetie_st01.bmp",400,0:print 10,500
name "Erubetie"
>A test for a husband?@>I don't care about that.@
>But I'll make Luka take responsibility...\
name ""
name "Tamamo"
>............\
name ""
if %ivent11<2 skip 19
cspl 700,701
bg "bg\bg060.bmp",10,1500
lsp 701,":a;chara\tamamo_st01.bmp",-180,0
lsp 700,":a;chara\granberia_st04.bmp",180,0:print 10,500
name "Granberia"
>Hmph...@>I won't participate in that farce.\
name ""
name "Tamamo"
>Well, that's what I thought you would say.\
name ""
lsp 700,":a;chara\granberia_st05.bmp",180,0:print 10,500
name "Granberia"
>W...Well...@
>If you're begging so much, I could try.\
name ""
name "Tamamo"
>............\
name ""
cspl 700,701
bg "bg\bg047.bmp",99,2000,"system\lngtwave.dll/vwi"
lsp 700,":a;chara\tamamo_st04.bmp",0,0:print 10,500
name "Tamamo"
>You must become stronger than the Monster Lord to become her husband.@
>You cleared that one during the fight against her in the Castle!\
>Further, you shook off all attempts at temptation!@
>Therefore, as the Monster Lord's guardian, I approve of you marrying her!\
name ""
goto *sean0413x2



*sean0413x

name "Luka"
>Uh... Did anything like that happen?\
name ""
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>Nothing...?@
lsp 700,":a;chara\tamamo_st04.bmp",0,0:print 10,500
>Well, don't worry about it then.\
>You must become stronger than the Monster Lord to become her husband.@
>You cleared those during the fight against her in the Castle!\
>Therefore, as the Monster Lord's guardian, I approve of you marrying her!\
name ""
goto *sean0413x2



*sean0413x2

name "Luka"
>Ehhh!?\
name ""
lsp 700,":a;chara\alice_st08b.bmp",-120,0
lsp 701,":a;chara\tamamo_st04.bmp",160,0:print 10,500
name "Alice"
>Hmph...@>If Tamamo recognizes you, then I can't help it.@
>Of course, I wouldn't mind if you were my husband...\
name ""
name "Luka"
>W...What are you saying?@
>This is... Too sudden...\
name ""
lsp 700,":a;chara\alice_st04b.bmp",-120,0:print 10,500
name "Alice"
>Hmph... As you know, I can only marry someone stronger than myself.@
>If it isn't you, then I'll never be able to marry anyone.\
>Oh well...\
name ""
bgm "bgm\alice1.ogg"
name "Tamamo"
>Sheesh, what's with that defeatist attitude.@
>Even though you've been thinking of nothing but Luka, spending that entire month at his bedside...\
name ""
lsp 700,":a;chara\alice_st07b.bmp",-120,0:print 10,500
name "Alice"
>N...No...!@> I didn't...!\
name ""
name "Luka"
>But this is all so sudden...\
name ""
csp 701
lsp 700,":a;chara\alice_st08b.bmp",67,0:print 10,500
name "Alice"
>A...Am I... Not good enough?@
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
>What do you think of me?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Luka"
>Eh!@>Wait, no, I...!\
name ""
>Of course I don't think that!@
>But how should I convey it...?\
r@k@\
csel "Straight out",*sean0413x3,"Roundabout way",*sean0413x4,"Remain silent",*sean0413x5



*sean0413x3

bgm "bgm\alice2.ogg"
name "Luka"
>Alice.@> Because you were with me, I could fight against any enemy.@
>It was all thanks to you, that I was able to save the world.\
>You gave me strength and courage.@
>You were the one who made me who I could be.\
name ""
name "Alice"
>Luka...\
name ""
name "Luka"
>Alice...@> I love you.\
name ""
lsp 700,":a;chara\alice_st08b.bmp",67,0:print 10,500
name "Alice"
>..............\
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
>Luka...@>You saved me from my own regret and self-sacrifice.@
>Because I have you, I can overcome any difficulty.\
>So... I give my life to you.@
>Luka, I love you too.\
name ""
name "Luka"
>Alice...\
name ""
name "Alice"
>Luka...\
name ""
bgm "bgm\tamamo.ogg"
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>..........\
>I've been forgotten...@
>Anyway, the marriage is assured now.\
>Now, as proof of your marriage, perform the ritual of breeding.@
lsp 700,":a;chara\tamamo_st04.bmp",0,0:print 10,500
>Hurry up and make a child.\
name ""
bgm "bgm\alice1.ogg"
goto *sean0413x6



*sean0413x4

name "Luka"
>Of course you are.@
>I love you, Alice...\
>But it's too sudden.\
name ""
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>If you aren't dissatisfied, then you're agreeing to it.\
>Now, as proof of your marriage, perform the ritual of breeding.@
lsp 700,":a;chara\tamamo_st04.bmp",0,0:print 10,500
>Hurry up and make a child.\
name ""
goto *sean0413x6



*sean0413x5

name "Luka"
>..............\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>..............\
name ""
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>Staying silent means you agree to it.\
>Now, as proof of your marriage, perform the ritual of breeding.@
lsp 700,":a;chara\tamamo_st04.bmp",0,0:print 10,500
>Hurry up and make a child.\
name ""
goto *sean0413x6



*sean0413x6

name "Luka"
>M...Make a child?@
>Now that is way too fast!\
lsp 700,":a;chara\alice_st04b.bmp",-120,0
lsp 701,":a;chara\tamamo_st04.bmp",160,0:print 10,500
>Hey, Alice.@
>Marriage is one thing, but children right away!?\
name ""
lsp 700,":a;chara\alice_st08b.bmp",-120,0:print 10,500
name "Alice"
>...Well, I'll let you make a child with me.@
>I'll let you impregnate me...\
lsp 700,":a;chara\alice_st02b.bmp",-120,0:print 10,500
>I'll give you two children.@
>One boy, one girl.@> That will be our compromise.\
name ""
name "Luka"
>Ehh!?@>What!?\
name ""
name "Tamamo"
>Alright, this part is all you two.@
lsp 701,":a;chara\tamamo_st01.bmp",160,0:print 10,500
>Luka...@>Don't die.\
name ""
name "Luka"
>Whwhwhwhat does that mean?\
name ""
dwave 1,"se\escape.ogg"
csp 701:print 10,500
>With that, Tamamo leaves.@
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
>Alice and I are alone now...\
r@k@\
goto *sean0414



*sean0414

if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
name "Alice"
>...Now come on, let's mate.@
>Don't misunderstand me... This isn't a normal meal...\
name ""
name "Luka"
>W...Wait a moment!@
>I need to mentally prepare myself!\
name ""
>With a smile, Alice reaches for her own genitals.@
>Using her fingers, she exposes herself to me.\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_01.ogg"
>Hehe... My pussy is already all hot.
>Once you're inside, you'll be entangled, and squeezed... And taste incredible pleasure.\
if %con_hvoice=0 dwave 0,"voice\alice12_02.ogg"
>Hoora... You want to come inside of me, don't you?
>Don't you want to inseminate this pussy of mine?\
name ""
dwavestop 0
>Alice's pink insides pulse, as if eager for me.@
>And a clear liquid is already dripping, already wet and waiting...\
name "Luka"
>W...Wait...!\
name ""
>Despite being transfixed by the sight of her, I still utter words of refusal.@
>Even though I have cold feet, Alice moves closer to me.\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_03.ogg"
>Sheesh, it looks like being taken by force is still your preference.
>Even though having a woman violate a man to get pregnant is humiliating for a man...\
name ""
dwavestop 0
lsp 700,":a;chara\alice_H12_1.bmp",0,0:print 10,500
>Suddenly, Alice's snake body coils around me.@
>Bringing us close together, she seals off my movements.\
name "Luka"
>C...Calm down Alice!@
>This is...\
name ""
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_04.ogg"
>Hehe... I'm plenty calm.
>And I'll accept you as my reproductive partner...\
name ""
dwavestop 0
>With her face slightly flushed red, Alice continues to speak.\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_05.ogg"
>The ceremony and preparations for that are quite intense.
>I will completely draw out your semen, continually for three days and three nights.\
if %con_hvoice=0 dwave 0,"voice\alice12_06.ogg"
>Even if your semen dries up numerous times during it, you'll recover while we mate.
>With that, I'll select the very best sperm, and use that to fertilize me...\
name ""
dwavestop 0
name "Luka"
>N...No way... I'll die!\
name ""
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_07.ogg"
>Don't worry... Since it's you, you won't die.
>The reason only a strong man can be the Monster Lord's mate is because no ordinary man could endure the impregnation process.\
name ""
dwavestop 0
name "Luka"
>W...Wait a minute...\
name ""
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_08.ogg"
>Now then, let's be connected...\
if %con_hvoice=0 dwave 0,"voice\alice12_09.ogg"
>Don't worry, I'll take the lead from start to finish.
>You just need to ejaculate...\
name ""
dwavestop 0
name "Luka"
>Ahh...\
name ""
>Alice presses my penis against her hot opening...\
mov %hseanwave,1:hseanwave
>And brings me into her!\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_10.ogg"
>Hehe, it's in.
>Now, come all the way inside...\
name ""
dwavestop 0
name "Luka"
>Hyaaa!\
name ""
>I let out a scream of pleasure right away.@
>Just pushing inside of her tight vagina is incredible...\
>The folds inside of her rub and massage me as I enter, enrapturing me in pleasure by the time I'm all the way inside her.\
name "Luka"
>Ahh...!\
name ""
>Even though I only just got inside of her, my body stiffens as I feel a climax coming.\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_11.ogg"
>Mmm...? What's wrong? You aren't all the way in yet, you know...\
name ""
dwavestop 0
name "Luka"
>N...No... I'm coming...@
>Ahh!\
name ""
>I try to endure it, but it's no use.@
>I gasp in the bliss of release as I feel my penis pulse inside Alice's vagina.\
gosub *syasei1
lsp 700,":a;chara\alice_H12_2.bmp",0,0
gosub *syasei2
>My body trembles as I explode inside of her, my semen pulsing into her hot insides.\
name "Luka"
>Ahhh...\
name ""
>I came just from insertion...@
>My face goes red in shame as I feel Alice looking at me.\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_12.ogg"
>Sheesh... A disgrace for the husband of the Monster Lord...
>Not even ten seconds... How shameful...\
if %con_hvoice=0 dwave 0,"voice\alice12_13.ogg"
>Did my pussy feel so good that you couldn't stand it?
>It felt so good that it was an instant finish?\
name ""
dwavestop 0
>Despite her words, Alice is giggling, with a smile on her face.\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_14.ogg"
>Well, fine. I'll tolerate it.
>This time, I'll entertain my premature ejaculator nice and slowly...\
name ""
dwavestop 0
name "Luka"
>Ahh...!\
name ""
lsp 690,":a;chara\alice_ct01.bmp",401,0:print 10,500
>Her vaginal walls start to move, tightening and loosening all at random intervals.@
>It's like she's giving me a massage with her vagina itself...\
>All while she teases me, her eyes never leave my own.\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_15.ogg"
>Hoora... Does it feel good?
>If I massage you like this inside, it feels like you could melt away, doesn't it?\
name ""
dwavestop 0
name "Luka"
>W...Wait... Ah... It feels too good...\
name ""
>I unconsciously try to pull my waist back, as the assault of pleasure overwhelms my senses.@
>But with her snake body around me, I don't get anywhere.\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_16.ogg"
>You're trying to escape...?\
if %con_hvoice=0 dwave 0,"voice\alice12_17.ogg"
>Sheesh, and here I went to all the trouble of going nice and slow...
>...You seem to want me to finish you off with another pitifully quick one.\
name ""
dwavestop 0
name "Luka"
>Ahhh!!!\
name ""
>Alice's slow movements suddenly get much faster, her tightening waves making me go numb.\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_18.ogg"
>Hehe, completely unbearable, right?
>Now, surrender to our mating...\
name ""
dwavestop 0
>Her touch sends me over the edge in no time.\
name "Luka"
>Ahhh...\
name ""
gosub *syasei1
lsp 690,":a;chara\alice_ct02.bmp",401,0
gosub *syasei2
>And in no time, I explode inside her again.@
>The sweet feeling of release inside her flows over me, as Alice's laugh fills my ears.\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_19.ogg"
>Hehe... You gave me a lot of seed.
>Unlike before, your semen was shot all the way into my vagina...\
if %con_hvoice=0 dwave 0,"voice\alice12_20.ogg"
>How does it feel to impregnate me?
>With that, we can make a baby...\
name ""
dwavestop 0
>A wide smile crosses Alice's face, as she strokes her belly.\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_21.ogg"
>But I need to squeeze out a lot more semen.
>From that huge quantity of semen, I'll screen out the best...\
if %con_hvoice=0 dwave 0,"voice\alice12_22.ogg"
>Now come on, and make more of an effort!\
name ""
dwavestop 0
name "Luka"
>Ahhhhh!\
name ""
>Alice tightens her vagina even more, her vaginal muscles rubbing against my penis inside her.@
>Even though I've already come twice, there's no sign of my penis going soft...\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_23.ogg"
>Our mating until now seems to have activated my reproductive instincts...
>I won't go easy on you anymore... I'll completely draw out all of your semen...\
name ""
dwavestop 0
name "Luka"
>Hyaaa!\
name ""
>She was going easy until now...?@
>The surprise vanishes in another wave of pleasure.\
>Even though we're not moving at all, her vaginal muscle use is more intense than any piston movement...\
>Squeezing, massaging, rubbing, pulling...@>Every stimulation is leading me to another powerful finish.\
name "Luka"
>Wait...@>Ahh!\
name ""
gosub *syasei1
lsp 690,":a;chara\alice_ct03.bmp",401,0
gosub *syasei2
>In no time, another large surge of semen is forced out of me.@
>It truly does feel like Alice is simply milking it out of me...\
>But she doesn't stop...@>Her incredible vagina continues massaging me, eager to draw out more.\
name "Luka"
>G...Give me a second... Ah!\
name ""
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_24.ogg"
>Hehe, it's too early to cry out.
>It's still the first day. This mating will continue for three days and three nights.\
name ""
dwavestop 0
>The forcible pleasure continues on, giving me no break.@
>Her soft flesh rubs against my tip, as her muscles squeeze and massage me at the same time...\
name "Luka"
>Aiiee!\
name ""
gosub *syasei1:gosub *syasei2
>As her squirming flesh strokes me, I reach another powerful climax.@
>Feeling like I'm going mad with pleasure, I squirm under Alice.\
name "Luka"
>Hyaaa!@> S...Stop Alice...!\
name ""
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_25.ogg"
>Hehe, what a scream...
>How about showing some spirit as the Monster Lord's husband?\
name ""
dwavestop 0
name "Luka"
>Ahhh...\
name ""
gosub *syasei1:gosub *syasei2
>Coiled in her snake body, my body spasms as the seemingly endless ejaculations continue.\
name "Luka"
>Quit it, give me a...!\
name ""
>But no matter how my flailing limbs get me loose, she just re-coils around me.@
>Lead to orgasm after orgasm, I start to feel completely helpless in her embrace.\
name "Luka"
>Hyaaa!\
name ""
gosub *syasei1
lsp 690,":a;chara\alice_ct04.bmp",401,0
gosub *syasei2
>Climax after climax, with no break...@
>And this is only the first day!\
name "Luka"
>Ahhh...@
>I'm going to die...\
name ""
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_26.ogg"
>Don't make me repeat myself... I picked you, as someone who wouldn't die.
>Hoora... I'm going to keep squeezing you...\
name ""
dwavestop 0
name "Luka"
>Aiiee...\
name ""
gosub *syasei1:gosub *syasei2
>Alice's vagina squeezes me as I come, the sweet release flooding my body.@
>But the amount of semen coming out is far less than it was a few minutes ago...\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_27.ogg"
>Hehe, you're almost empty.
>But this time, it won't end just because your semen runs out.\
if %con_hvoice=0 dwave 0,"voice\alice12_28.ogg"
>I'll wait for you to recover while we mate, and then draw out the new semen...\
name ""
dwavestop 0
name "Luka"
>Ahh...\
name ""
gosub *syasei1:gosub *syasei2
>My penis weakly pulses inside her... But I don't feel anything come out.@
>She squeezed everything out of me, at last.\
>At the same time, I feel incredibly weak.@
>My vision slowly goes dark as I feel myself on the verge of fainting.\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_29.ogg"
>Hehe, nothing is coming out.
>Then I'll let you rest a little... While still connected, of course.\
name ""
dwavestop 0
name "Luka"
>Ah...uh...\
name ""
>Alice hugs me close to her.@
>Still in her embrace, I feel myself drifting off...\
mov %hseanwave,0:hseanwave
gosub *anten
>Passing out from lack of energy, I can't say it was a peaceful sleep.@
>Soon enough...\
mov %hseanwave,5:hseanwave
lsp 690,":a;chara\alice_ct04.bmp",401,0
lsp 700,":a;chara\alice_H12_2.bmp",0,0
bg "bg\bg047.bmp",10,1500
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_30.ogg"
>Hehe, you're awake.\
if %con_hvoice=0 dwave 0,"voice\alice12_31.ogg"
>Even while you fainted, you still came inside me multiple times.
>Although most were pathetically empty... Haha.\
name ""
dwavestop 0
>Looking down over me, Alice laughs.\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_32.ogg"
>But after your short rest, your semen seems to have refilled.
>Now, I'll draw out what you saved up...\
name ""
dwavestop 0
name "Luka"
>Ahhh!\
name ""
>Alice's vagina squeezes down harder on me.@
>But this time, I feel something press against me deep inside of her...\
>I feel something like a mouth open up, and suck on my very tip.\
name "Luka"
>Haa!@
>W...What is this...?\
name ""
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_33.ogg"
>Hehe... My cervix wants your semen.
>We've been mating this whole time, so my reproductive instinct is getting more lively...\
name ""
dwavestop 0
name "Luka"
>Ahh... That feels so good...\
name ""
>Her tiny opening continues sucking on my tip, the intense feelings making me want to forget everything else.\
>Each pulse of her vaginal flesh seems to pull me a little deeper inside, more of her tiny cervix sucking and rubbing against my tip.\
name "Luka"
>Haaa...@
>I'm... Going to come...\
name ""
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_34.ogg"
>Hehe... I don't mind. Pump your semen right into my womb.
>Pour all of your semen inside, and get me pregnant...\
name ""
dwavestop 0
name "Luka"
>Ahhh...\
name ""
>Her cervix continues sucking on my tip, eager for me to come...@
>Giving in to that sensation, I relax my body and embrace the rising climax.\
gosub *syasei1:gosub *syasei2
>And like that, I explode right inside of her womb.@
>The sweet feeling of release floods me as my semen shoots into her deepest parts.\
name "Luka"
>Haaa...\
name ""
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_35.ogg"
>Hehe... Able to shoot your seed straight into my womb makes you happy too, doesn't it?
>Has the rest of your sanity all been blown away, too?\
name ""
dwavestop 0
>Alice presses her waist against me harder than ever before.@
>My tip, already sucked partially into her cervix, sinks even deeper...\
name "Luka"
>Haa... Wh...What...\
name ""
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_36.ogg"
>Hehe... I'll take your penis into my womb.
>You should be happy I'm letting you invade all the way to here...\
name ""
dwavestop 0
name "Luka"
>Ahhh...!\
name ""
>My penis slips deeper inside, pushing through her tight cervix...@
>Until suddenly, I feel my tip reach another space.\
>I'm left speechless at both the thought and touch of what's going on.\
name "Luka"
>Haa... Ah...\
name ""
>The hole is incredibly tight...@
>Filled with more folds than her vagina, her cervix is rubbing hard right underneath the neck of my penis.\
>It feels like I could just melt away in pleasure inside her...\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_37.ogg"
>Haha... How does it feel to enter the baby's room before the baby does?\
name ""
dwavestop 0
name "Luka"
>Ah...ah...\
name ""
>Instead of replying verbally, I reach another climax...\
gosub *syasei1:gosub *syasei2
>And quickly explode, my semen spurting straight into her womb.\
>It wasn't like a normal ejaculation...@
>Surrendering my body to her, it felt like I was just melting away...\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_38.ogg"
>Slipping into the baby's room, then leaking...
>What a bad Papa... Haha.\
name ""
dwavestop 0
name "Luka"
>Ahh... Ah...\
name ""
>I can't do anything but cling to Alice any longer.@
>My body starts to tremble as her touch fills my senses...\
gosub *syasei1:gosub *syasei2
>And after only a few seconds, I reach another orgasm inside of her.\
name "Luka"
>Haaa... Amazing...\
name ""
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_39.ogg"
>Sheesh... Even though we're supposed to be making children, you're acting like a baby.
>Have you gotten completely addicted to the touch of my womb?\
name ""
dwavestop 0
>Alice lovingly caresses me, holding me tight in her embrace.@
>But I see a hint of playful sadism in her eyes...\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_40.ogg"
>Hehe... I don't mind.
>Do what you like, and continue seeding my womb directly...\
name ""
dwavestop 0
name "Luka"
>Ahhh...\
name ""
gosub *syasei1:gosub *syasei2
>Just the feeling of being inside her is enough to make me come.@
>At this rate, I'll be milked dry and pass out again...\
>But there's no resisting this...@> I just moan and drown in the pleasure.\
name "Luka"
>Ahh...\
name ""
gosub *syasei1:gosub *syasei2
>My mind slowly fogs each time I come, both my energy and semen gushing out into Alice.@
>I'm slowly having everything drawn out of me...\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_41.ogg"
>Hehe... The baby's room is covered in semen.
>Such a disgraceful Papa, polluting my insides so much...\
name ""
dwavestop 0
name "Luka"
>...Ah...ah...\
name ""
gosub *syasei1:gosub *syasei2
>While spurting the last of my semen into her, I slowly drift back into unconsciousness...\
gosub *anten
>Like I was trapped in a dream, I continue to come nonstop until I'm dry, then I pass out...@
>After an hour of rest, it starts all over again.\
lsp 690,":a;chara\alice_ct04.bmp",401,0
lsp 700,":a;chara\alice_H12_3.bmp",0,0
bg "bg\bg047.bmp",10,1500
name "Luka"
>Ah...ah...@
>Alice...@> No more...\
name ""
>By the third day, I can barely breathe.@
>Even though I'm gasping, Alice continues to dominate me, a large smile on her face.\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_42.ogg"
>Haha... Even though you're going to be a Papa, you have such a pitiful face...
>Your drool and semen are leaking everywhere... How unsightly.\
name ""
dwavestop 0
name "Luka"
>Ah...\
name ""
>Alice teases me as she tightens her vagina around me.@
>I'm no longer able to do anything but moan and climax.\
>Her womb and vagina are both completely full of semen...@
>But even still, Alice doesn't stop forcing me to continue coming.\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_43.ogg"
>Hoora, I won't let you hold back.
>If I tighten it deep inside like this...\
name ""
dwavestop 0
name "Luka"
>Hyaaa...\
name ""
gosub *syasei1:gosub *syasei2
>Completely under her thumb, I come right on cue.\
>During this long mating session, Alice took me under her complete control.@
>It's like I'm merely a child, doing everything Alice requests...\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_44.ogg"
>What's wrong? Your semen is getting thin.\
if %con_hvoice=0 dwave 0,"voice\alice12_45.ogg"
>It seems like the one hour breaks aren't effective any longer.
>Hora, I'll squeeze it right from the root...\
name ""
dwavestop 0
name "Luka"
>Ah...\
name ""
>Alice squeezes me from the center of my penis, slowly down towards my tip...@
>Responding like I was trained, I go over the edge again.\
gosub *syasei1:gosub *syasei2
>Loose in her embrace, my body lightly jerks as I come.@
>My fingers and toes lightly curl, but that's all I can manage.\
>But Alice doesn't slow down for a moment...\
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_46.ogg"
>Hoora, you can't relax until the end.
>I'm going to keep on drawing out your semen for one more night...\
name ""
dwavestop 0
name "Luka"
>S...top...@
>I...I'll die...\
name ""
>No matter how weak my body gets, it's still able to react to her touch...\
gosub *syasei1:gosub *syasei2
>Without fail, my penis pulses inside of her again.@
>But the amount of semen has sharply decreased.\
name "Luka"
>Ahh... Help...\
name ""
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_47.ogg"
>Stop complaining, you can keep going, can't you?\
name ""
dwavestop 0
name "Luka"
>Ah...Uh...\
name ""
gosub *syasei1:gosub *syasei2
>My penis weakly pulses, spitting out another drop of semen into her.@
>No matter how weak I get, Alice won't stop...\
name "Luka"
>Ah...ah...\
name ""
gosub *syasei1:gosub *syasei2
name "Alice"
if %con_hvoice=0 dwave 0,"voice\alice12_48.ogg"
>That's right, just climax over and over again...
>It's too early to faint. Fulfill your male duties to the end...\
name ""
dwavestop 0
>Moving her hips back and forth, Alice's intense mating continues...@
>Barely able to breathe, I continue coming... Just as she wants.\
gosub *syasei1:gosub *syasei2
mov %hseanwave,0:hseanwave
gosub *anten
>For three days and three nights, Alice drained all of my semen.\
>When it was over, I was barely able to breathe and walk.@
>It took a full week to recover.\
>During my journey, I fought a lot of battles.@
>But mating with Alice may be my biggest challenge yet.\
>.............\
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_alice12,1
bgmstop
csp -1
bg black,10,2000
goto *credit



*credit

csp -1
btndef clear
saveoff
textoff
bgm "bgm\ending2.ogg"
mov %creditnow,200
mov %creditx,250
mov %credity,600
mov %creditscroll,0
lsp %creditnow,":s/50,50,0;#ffffff@@@@@",%creditx,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+50
lsp %creditnow,":s/50,50,0;#ffffff@@@@@",%creditx,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+50
lsp %creditnow,":s/50,50,0;#ffffff@@@@@",%creditx,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+50
lsp %creditnow,":s/40,40,0;#ff2222Art ",370,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+60
lsp %creditnow,":s/30,30,0;#ffffffD-AM ",370,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+40
lsp %creditnow,":s/30,30,0;#fffffffrfr ",370,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+40
lsp %creditnow,":s/30,30,0;#ffffffMasha ",362,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+40
lsp %creditnow,":s/30,30,0;#ffffffUN_DO ",362,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+40
lsp %creditnow,":s/30,30,0;#ffffffXelvy ",362,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+40
lsp %creditnow,":s/30,30,0;#ffffffArekishi ",340,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+40
lsp %creditnow,":s/30,30,0;#ffffffIrodori ",347,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+40
strsp %creditnow,"Iwashi no Atama",287,%credity,9,1,30,30,0,0,1,1,#FFFFFF
mov %creditnow,%creditnow+1:mov %credity,%credity+40
lsp %creditnow,":s/30,30,0;#ffffffEpee ",370,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+40
strsp %creditnow,"Kenkou Cross",310,%credity,7,1,30,30,0,0,1,1,#FFFFFF
mov %creditnow,%creditnow+1:mov %credity,%credity+40
lsp %creditnow,":s/30,30,0;#ffffffSilk ",370,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+40
strsp %creditnow,"Jingai Modoki",302,%credity,8,1,30,30,0,0,1,1,#FFFFFF
mov %creditnow,%creditnow+1:mov %credity,%credity+40
lsp %creditnow,":s/30,30,0;#ffffffSetouchi ",340,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+40
lsp %creditnow,":s/30,30,0;#ffffffDelphinus ",332,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+40
lsp %creditnow,":s/30,30,0;#ffffffThomas ",355,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+40
strsp %creditnow,"Yukimura Shinji",287,%credity,9,1,30,30,0,0,1,1,#FFFFFF
mov %creditnow,%creditnow+1:mov %credity,%credity+140
lsp %creditnow,":s/40,40,0;#ff2222Voice ",350,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+60
lsp %creditnow,":s/30,30,0;#ffffffAlice: ",175,%credity
mov %creditnow,%creditnow+1
lsp %creditnow,":s/30,30,0;#ffffffOyama Tyrol ",415,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+40
lsp %creditnow,":s/30,30,0;#ffffffGranberia: ",175,%credity
mov %creditnow,%creditnow+1
lsp %creditnow,":s/30,30,0;#ffffffAyase Yuri ",415,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+40
lsp %creditnow,":s/30,30,0;#ffffffTamamo: ",175,%credity
mov %creditnow,%creditnow+1
lsp %creditnow,":s/30,30,0;#ffffffTsugaru Ringo ",415,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+40
strsp %creditnow,"Alma Elma:",175,%credity,6,1,30,30,0,0,1,1,#FFFFFF
mov %creditnow,%creditnow+1
strsp %creditnow,"Masaki Phan",415,%credity,7,1,30,30,0,0,1,1,#FFFFFF
mov %creditnow,%creditnow+1:mov %credity,%credity+40
lsp %creditnow,":s/30,30,0;#ffffffErubetie: ",175,%credity
mov %creditnow,%creditnow+1
strsp %creditnow,"Akatsuki Kotone",415,%credity,9,1,30,30,0,0,1,1,#FFFFFF
mov %creditnow,%creditnow+1:mov %credity,%credity+40
lsp %creditnow,":s/30,30,0;#ffffffIlias: ",175,%credity
mov %creditnow,%creditnow+1
lsp %creditnow,":s/30,30,0;#ffffffAmane Shiina ",415,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+40
strsp %creditnow,"Other Sound Effects: Ayase Yuri",167,%credity,17,1,30,30,0,0,1,1,#FFFFFF
mov %creditnow,%creditnow+1:mov %credity,%credity+140
lsp %creditnow,":s/40,40,0;#ff2222Backgrounds ",290,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+60
strsp %creditnow,"Kyukyukyu no Q",295,%credity,8,1,30,30,0,0,1,1,#FFFFFF
mov %creditnow,%creditnow+1:mov %credity,%credity+40
lsp %creditnow,":s/30,30,0;#ffffffGuttari Nyanko ",295,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+40
lsp %creditnow,":s/30,30,0;#ffffffDare-so-kare-tei ",280,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+40
strsp %creditnow,"Background Photo Club",242,%credity,12,1,30,30,0,0,1,1,#FFFFFF
mov %creditnow,%creditnow+1:mov %credity,%credity+140
lsp %creditnow,":s/40,40,0;#ff2222BGM ",370,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+60
lsp %creditnow,":s/30,30,0;#ffffffKOU-G ",362,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+40
strsp %creditnow,"O-Life Japan",310,%credity,7,1,30,30,0,0,1,1,#FFFFFF
mov %creditnow,%creditnow+1:mov %credity,%credity+40
lsp %creditnow,":s/30,30,0;#ffffffMyuu ",370,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+40
lsp %creditnow,":s/30,30,0;#ffffffZero-Matter ",317,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+40
lsp %creditnow,":s/30,30,0;#ffffffRengoku Teien ",302,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+140
lsp %creditnow,":s/40,40,0;#ff2222SE ",380,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+60
lsp %creditnow,":s/30,30,0;#ffffffkcy TETUO ",332,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+40
lsp %creditnow,":s/30,30,0;#ffffffKaizanmurou ",317,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+40
lsp %creditnow,":s/30,30,0;#ffffffThe Matchmakers ",287,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+40
lsp %creditnow,":s/30,30,0;#ffffffPierrot Lunaire ",287,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+40
strsp %creditnow,"Maou Damashii",302,%credity,8,1,30,30,0,0,1,1,#FFFFFF
mov %creditnow,%creditnow+1:mov %credity,%credity+140
lsp %creditnow,":s/40,40,0;#ff2222Nscripter Program ",230,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+60
lsp %creditnow,":s/30,30,0;#ffffffNaoki Takahashi ",287,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+140
lsp %creditnow,":s/40,40,0;#ff2222Collaboration ",270,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+60
lsp %creditnow,":s/30,30,0;#ffffffNankyoku-Do ",317,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+60
lsp %creditnow,":s/30,30,0;#ffffffEkuroure ",340,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+60
lsp %creditnow,":s/30,30,0;#ffffffStephen ",347,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+60
lsp %creditnow,":s/30,30,0;#ffffffByakuya ",347,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+280
lsp %creditnow,":s/40,40,0;#ff2222English Translation ",210,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+60
lsp %creditnow,":s/30,30,0;#ffffffRogueTranslator ",287,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+140
lsp %creditnow,":s/40,40,0;#ff2222Scenario ",320,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+60
lsp %creditnow,":s/30,30,0;#ffffffTorotoro ",340,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+280
lsp %creditnow,":s/40,40,0;#ff2222Production ",300,%credity
mov %creditnow,%creditnow+1:mov %credity,%credity+60
strsp %creditnow,"Torotoro Resistance",257,%credity,11,1,30,30,0,0,1,1,#FFFFFF
print 1
goto *credit_scroll



*credit_scroll

if %creditscroll>%credity-290 goto *credit_end
for %sub1=200 to %creditnow
msp %sub1,0,-1
next
print 1
wait 4
mov %creditscroll,%creditscroll+1
goto *credit_scroll



*credit_end

wait 2000
click
bgmstop
csp -1
print 10,2000
goto *sean0415



*sean0415

gosub *setwindow_01p
bgmstop
>And then, a half year later...\
bg "bg\bg019.bmp",7,1500
wait 500
gosub *setwindow_01p
bgm "bgm\field4.ogg"
name ""
r@k@\
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>..Alright Luka, where to next?@
>We haven't been around Grand Noah recently.\
>I heard there's a food based festival going on...\
name ""
name "Luka"
>You... Still thinking with your stomach, I see.\
name ""
>Alice and I are still traveling around the world.\
>This world where angels, humans and monsters can all live together...@
>Of course there are still small fights every so often, so as Fake Hero and Monster Lord we try to solve them.\
>At the same time, Alice uses it as an excuse to eat her way across the world.\
name "Luka"
>Coexistence, huh...?@
>The world sure has changed a lot since then.\
name ""
>There are a lot of small disputes all over the place, with either humans rejecting monsters or monsters rejecting humans.\
>But despite that, peaceful coexistence has flourished at an ever increasing rate.\
name "Alice"
>We came together to fight against Ilias, and that common enemy proved a start for our bond.@
>While that memory is fresh in our minds, we will strive for peace.\
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
>But our children... And our children's children.@
>Will they keep that harmony alive, and live on in peace?\
name ""
name "Luka"
>...What happens then, will happen.\
>Right now, what we can do is teach more people how to live together.\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>That's right...@>We can't take responsibility for future generations that aren't even here yet.@
>We can only make the world the best it can be, for them to be born into...\
name ""
name "Luka"
>I'm sure they'll inherit this world.@
>A world full of children created from people, monsters and angels living in harmony...\
>Someday our differences won't matter at all.\
name ""
name "Alice"
>Hmm, that's right...@
>They'll love each other.@> As you and I love each other...\
name ""
name "Luka"
>Yes, just like us.\
name ""
>...That reminds me, I meant to ask her something.@
>There's something bugging me about those rules around who the Monster Lord can marry...\
name "Luka"
>Hey, Alice... I had a question.@
>You said that a Monster Lord can only marry someone stronger than themself.\
>But what would you do if there was no human like that that you liked?@
>Or if no human was ever stronger than you?\
name ""
>It seems like a crazy rule.@
>It's more like it was created to make sure a Monster Lord would never love anyone.\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>...That's simple.@>You make yourself weaker than the man.@
>A Monster Lord who truly loved a man would seal themselves, and take human form.\
>Naturally, they'd have to give up the throne...\
name ""
name "Luka"
>Seal themselves for love?@
>And even give up the throne...?\
name ""
name "Alice"
>And after sealing themselves as a human, they spend the rest of their shorter lifetime with the man they love.\
name ""
name "Luka"
>So they would shorten their own long lives just like that?@
>That's... Difficult...\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>Why live a long life of loneliness, when you could have a short life of intense love?@
>I know the feeling well...\
name ""
name "Luka"
>Alice...\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>These rules were put in place after the horrors of Alipheese the Eighth.@
>It was probably Tamamo's influence.\
>If a Monster Lord were to fall in love with a man, they need to quickly retire and be happy...@
>That was her intention, I'm sure.\
name "Luka"
>Thus, a Monster Lord can only marry a man stronger than them.\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>It's true without a certain amount of power, a man wouldn't survive the first night of sex...@
>But even then, they wouldn't need to truly be stronger than the Monster Lord herself.\
>Those rules were created on the assumption that a human male wouldn't exist who was stronger than the Monster Lord.\
>Outside of extremely rare aberrations like Heinrich, that is.\
name ""
name "Luka"
>So that's what it was about.\
name ""
>But to throw away such a long life for the man you love...@
>That's a tough decision for someone to make.\
name "Luka"
>...I wonder if it was the same for my mother.\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...I'm sure it was.@
>She even chose to finish the rest of her life as a human, even after your father died.\
>I'm proud to call her my mother in law.\
name ""
name "Luka"
>Hey, Alice.@
>How long do you think my lifespan is...?\
name ""
>Will my angel half lifespan take priority?@
>Or will it be the same as a normal human?\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>There is no doubt that it will be longer than a normal human's.@
>But as for how long... I don't know.\
>It's possible that it could be even longer than mine.\
name ""
name "Luka"
>If that's the case...@>Then I'll go together with you.\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>Then let's be married until the very end.@
>...Well, I suppose we'll know more in around sixty years.\
>Before talking about that, we still have a lot more to do.\
name ""
name "Luka"
>Just like you said, Alice.@> Let's do the best we can for this world, to hand off to the next generation.\
name ""
name "Alice"
>Yes, and then we'll entrust it to them.@
>...And to these two twins, too.\
name ""
>With a smile, Alice gently rubs her stomach...\
csp 700
bg "BG\bg140.bmp",10,1500
>For the sake of those to come... We must make this world one where everyone can live in peace!\
>We'll continue traveling and working for that brighter world.@>Both Alice and I, together!\
>Our adventure isn't over yet!\
csp -1:print 10,2000
wait 500
lsp 107,":a;system\logox.bmp",79,100:print 10,2000
wait 2000
click
bgmfadeout 3000
bgmstop
wait 3000
if %game_clear<3 mov %game_clear,3
mov %storyon,0
goto *title
reset



*slime_start

mov $name,"Slime Girl"
mov $name2,"Slime Girl"
mov $lavel,"slime"
mov $tatie1,"slime_st01"
mov $tatie2,"slime_st02"
mov $tatie3,"slime_st03"
mov $tatie4,"slime_st02"
mov $haikei,"bg004"
mov %monster_x,244
mov %monster_y,80
if %nanido=1 mov %max_enemylife,20
if %nanido=2 mov %max_enemylife,30
if %nanido=3 mov %max_enemylife,40
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
goto *slime_start2



*slime_start2

mov $mogaku_anno1,"Luka couldn't shake free from the Slime!"
mov $mogaku_anno2,"Luka shook free of the Slime!"
mov $mogaku_anno3,"The Slime is around Luka's foot, preventing him from moving!"
mov $mogaku_sel1,"Haha, it's no use!"
mov $mogaku_sel2,"Haha, what are you doing? How pathetic!"
mov $mogaku_sel3,"Haha, useless struggling... how embarrassing!"
mov $mogaku_sel4,"It isn't so easy to break free from me, you know!"
mov $mogaku_sel5,"It's useless to struggle, just give in!"
mov $mogaku_dassyutu1,"Aww..."
mov $mogaku_dassyutu2,"Just submit to me already..."
mov $half_s1,"Ohoho... it doesn't look like you can hold out much longer."
mov $half_s2,"Hehehe, just let it out already!"
mov $kiki_s1,"Ahaha, it's over for you!"
mov $kiki_s2,"Haha! Just a little bit more!"
mov %end_n,2
mov %zmonster_x,-50
name $name
>Hee hee hee... time to eat! \
name ""
>The Slime gets a pre-emptive attack!\
skillname "Slime Wrap"
dwave 1,"se\ero_slime3.ogg"
>The Slime girl creates a puddle on the ground, sucking in Luka's foot!
if %nanido<2 damage 2,3
if %nanido=2 damage 3,4
if %nanido=3 damage 4,6
mov %kousoku,1:gosub *status_print
>The Slime wraps around Luka's foot!\
skillname ""
if %mylife=0 goto *slime_h1
name $name
>Doesn't it feel good to be wrapped in slime?@
>Hehehe, doesn't the slimy texture feel amazing? \
>If you just sit back and relax, I'll make it feel even better! \
name ""
mov %sinkou,1
if %nanido>1 mov %sinkou,2
if %nanido<2 mov %genmogaku,0
if %nanido=2 mov %genmogaku,1
if %nanido=3 mov %genmogaku,2
goto *common_main



*slime_v

name $name
>Ahh! Stop it! Meanie!\
dwave 1,"se\escape.ogg"
name ""
csp 700:print 10,1000
>The Slime girl runs away.\
mov %viclose,2:gosub *victory
mov %getexp,10:gosub *lvup
mov %2201,1
goto *sean0017



*slime_kousan

gosub *kousan_syori
>Luka yields to the Slime, giving in to the pleasure promised.\
gosub *face2
name $name
>Hehe, so you want to reach a heaven of pleasure then, do you?@
>Alright, I'll make sure to play with you plenty! \
name ""
goto *slime_a



*slime_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 && %nanido=0 goto *common_attack
if %cmd1=11 && %sinkou=2 goto *slime_attack1
if %cmd1=11 && %sinkou=3 goto *slime_attack2
if %cmd1=11 && %sinkou=4 goto *slime_attack3
if %cmd1=11 && %sinkou=5 goto *slime_attacklist1
if %cmd1=11 && %sinkou=6 goto *slime_attacklist2
if %cmd1=11 && %sinkou=7 goto *slime_attacklist3
if %cmd1=12 && %sinkou=1 && %nanido<2 goto *slime_mogaku1
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *slime_kousan
if %cmd1=16 goto *slime_onedari
if %cmd1=17 goto *common_skill
goto *slime_main



*slime_attack1

mov %before_action,1
>Even though my opponent is a monster, I still don't want to hurt her...@
>But...\
name "Luka"
>H.. Here I go!\
name ""
>Even though this is my first time against a real enemy, I've trained with Maki every day.@
>If I can beat Maki, I can beat this Slime!\
>LUKA ATTTTAAAACKI
dwave 1,"se\karaburi.ogg"
gosub *kaihi
>... but the Slime avoids it!\
name "Luka"
>...Eh?\
name ""
>Unlike Maki, the Slime was able to avoid the attack.\
name $name
>Hahaha, such a slow attack... how could that hit anyone?\
name ""
name "Luka"
>So if I use a quicker attack, will I be able to hit you?\
name ""
gosub *face3
name $name
>...That's a secret!\
name ""
gosub *face1
mov %sinkou,3
goto *slime_a



*slime_attack2

mov %before_action,1
>Big attacks are no good...@
>I guess I'll just need to use a lot of small ones!\
name "Luka"
>Well then...\
name ""
>LUKA-small-ATTAAAACK!
dwave 1,"se\slash2.ogg"
mov %abairitu,100:gosub *enemylife
if %enemylife=0 goto *slime_v
name "Luka"
>Alright!\
name ""
skillname "Recombine"
>The Slime's body recombines...
mov %damage,15:gosub *enemylife_kaihuku
skillname ""
name "Luka"
>...Eh?\
name ""
name $name
>Hehehe, I'm a Slime you moron!@
>Sword attacks are no good!\
name ""
name "Luka"
>N... No way!\
name ""
>The first enemy is invulnerable? That's just unfair!@
>Oh Ilias... what should I do!?\
mov %sinkou,4
goto *slime_a



*slime_attack3

mov %before_action,1
mov %skill_sub,1
gosub *common_attack1
dwave 1,"se\slash2.ogg"
mov %abairitu,100:gosub *enemylife
if %enemylife=0 goto *slime_v
skillname "Recombine"
>The Slime's body recombines...
mov %damage,15:gosub *enemylife_kaihuku
skillname ""
name "Luka"
>Come on! That's not fair!\
name ""
>If I can't win by attacking normally... what should I do?\
gosub *face2
name $name
>Hehehe, just give up and let me wrap you up.@
>I'll be sure to squeeze you for every last drop! \
>With my slimy body, I'll let you reach heaven!@
>You can ejaculate over and over again, until nothings left! \
name ""
>The Slime girl starts to laugh.\
gosub *face1
mov %sinkou,5
goto *common_main



*slime_attacklist1

if %first_sel1=1 skip 3
>I don't know what to do anymore...@
>Maybe if I attack even faster...?\
mov $hanlist1,"Normal Attack"
mov $hanlist2,"Flail Wildly"
gosub *cmd_hanyo
if %cmd1=11 goto *slime_attack4
if %cmd1=12 goto *slime_attack5
if %cmd1=-1 goto *slime_main
skip -4



*slime_attacklist2

mov $hanlist1,"Normal Attack"
mov $hanlist2,"Flail Wildly"
gosub *cmd_hanyo
if %cmd1=11 goto *slime_attack4
if %cmd1=12 goto *slime_attack6
if %cmd1=-1 goto *slime_main
skip -4



*slime_attacklist3

mov $hanlist1,"Normal Attack"
mov $hanlist2,"Flail Wildly"
gosub *cmd_hanyo
if %cmd1=11 goto *slime_attack4
if %cmd1=12 goto *slime_attack7
if %cmd1=-1 goto *slime_main
skip -4



*slime_attack4

mov %before_action,1
mov %skill_sub,1
gosub *common_attack1
dwave 1,"se\slash2.ogg"
mov %abairitu,100:gosub *enemylife
if %enemylife=0 goto *slime_v
gosub *face1
skillname "Recombine"
>The Slime's body recombines...
mov %damage,15:gosub *enemylife_kaihuku
skillname ""
if %first_sel1=1 goto *slime_a
name "Luka"
>Damn it...\
name ""
>It seems as if my attack does nothing after all...\
mov %first_sel1,1
goto *slime_a



*slime_attack5

mov %before_action,41
name "Luka"
>Ahhhh!\
name ""
skillname "Flail Wildly"
>Luka starts to swing his sword around randomly.
dwave 1,"se\slash2.ogg"
mov %abairitu,60:gosub *enemylife
gosub *face3
name $name
>Ah!\
name ""
name "Luka"
>Ahhh!\
name ""
dwave 1,"se\slash2.ogg"
mov %abairitu,60:gosub *enemylife
name "Luka"
>Ahh!\
name ""
dwave 1,"se\slash2.ogg"
mov %abairitu,60:gosub *enemylife
name "Luka"
>Ah!\
name ""
dwave 1,"se\slash2.ogg"
mov %abairitu,60:gosub *enemylife
skillname ""
if %enemylife=0 goto *slime_v
name $name
>Owowowowow!\
name ""
skillname "Recombine"
>The Slime desperately begins to recombine!
mov %damage,5:gosub *enemylife_kaihuku
skillname ""
name "Luka"
>She isn't able to recombine fully!@
>If I attack like this...\
name ""
mov %sinkou,6
mov %first_sel1,1
goto *common_main



*slime_attack6

mov %before_action,41
name "Luka"
>Oraa!\
name ""
skillname "Flail Wildly"
>Luka rapidly swings his sword around.
dwave 1,"se\slash2.ogg"
mov %abairitu,60:gosub *enemylife
gosub *face3
name "Luka"
>Ahhhh!\
name ""
dwave 1,"se\slash2.ogg"
mov %abairitu,60:gosub *enemylife
name "Luka"
>Haa! Haa!\
name ""
dwave 1,"se\slash2.ogg"
mov %abairitu,60:gosub *enemylife
name "Luka"
>Ora!\
name ""
dwave 1,"se\slash2.ogg"
mov %abairitu,60:gosub *enemylife
skillname ""
if %enemylife=0 goto *slime_v
mov %sinkou,7
goto *slime_a



*slime_attack7

mov %before_action,41
name "Luka"
>Oraaa!\
name ""
skillname "Flail Wildly"
>Luka rapidly flails his sword around.
dwave 1,"se\slash2.ogg"
mov %abairitu,60:gosub *enemylife
gosub *face3
name $name
>Eep!\
name ""
name "Luka"
>Oraa!\
name ""
dwave 1,"se\slash2.ogg"
mov %abairitu,60:gosub *enemylife
name "Luka"
>Ooooo!\
name ""
dwave 1,"se\slash2.ogg"
mov %abairitu,60:gosub *enemylife
name "Luka"
>Take that!\
name ""
dwave 1,"se\slash2.ogg"
mov %abairitu,60:gosub *enemylife
skillname ""
if %enemylife=0 goto *slime_v
name $name
>Ahh.. stop it...\
name ""
skillname "Recombine"
>The Slime desperately starts to recombine.
mov %damage,5:gosub *enemylife_kaihuku
skillname ""
mov %sinkou,6
goto *common_main



*slime_mogaku1

mov %before_action,8
name "Luka"
>Ahh.. ahhh! Get off of me!\
name ""
dwave 1,"se\dassyutu.ogg"
mov %kousoku,0:gosub *status_print
>Luka forced the Slime off of him!\
gosub *face3
name $name
>...Aww, right as I was about to make you feel good too...@
>Don't you want to reach heaven...? \
gosub *face2
>Don't you want my slime to wrap around your penis...@
>And bring you the ultimate pleasure!?\
name ""
>The Slime begins to laugh.\
gosub *face1
mov %owaza_count1a,0
mov %sinkou,2
goto *common_main



*slime_a

if %before_action=51 && %enemylife<%max_enemylife gosub *slime_a1:skip 2
if %before_action=52 && %enemylife<%max_enemylife gosub *slime_a1
if %kousoku=1 gosub *slime_a5:goto *common_main
if %kousoku=2 gosub *slime_a6:goto *common_main
rnd2 %ransu,1,9
if %nanido>1 rnd2 %ransu,3,9
if %ransu<4 && %kousan=0 gosub *slime_a2:goto *common_main
if %ransu<7 && %ransu>3 gosub *slime_a3:goto *common_main
if %ransu>6 && %owaza_count1a>2 gosub *slime_a4:goto *common_main
skip -5



*slime_a1

add %stack,1
if %first_sel2=1 skip 5
name $name
>Ooh you meanie... hitting me like that isn't very nice.\
name ""
mov %first_sel2,1
skillname "Recombine"
>The Slime body recombines...
mov %damage,15:gosub *enemylife_kaihuku
skillname ""
gosub *face1
sub %stack,1
return



*slime_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Fufufu..."
if %ransu=2 mov $sel1,"Fufufu..."
if %ransu=3 mov $sel1,"Hehe... you look delicious!"
gosub *face2
name $name
eng $sel1:$sel6\
name ""
>The Slime girl is giggling...\
gosub *face1
sub %stack,1
return



*slime_a3

add %stack,1
skillcount1 3001
rnd2 %ransu,1,10
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hehe.":mov $sel2,"Slime gets all over Luka's body, penis, causing it to feel sticky."
if %ransu=2 mov $sel1,"How's this?":mov $sel2,"Luka's penis is gently rubbed by the Slime."
if %ransu=3 mov $sel1,"Let it out...":mov $sel2,"Luka's penis is surrounded by sticky slime."
if %ransu=4 mov $sel1,"Oh... do you love it when I do this?":mov $sel2,"A slimy tentacle begins to rub Luka's penis."
if %ransu=5 mov $sel1,"Hehehe... let me service you.":mov $sel2,"Luka's penis is gently massaged by the Slime."
if %ransu=6 mov $sel1,"Hehe, I'll tease your penis.":mov $sel2,"The tentacle starts to rub Luka's penis."
if %ransu=7 mov $sel1,"Hehehe...":mov $sel2,"A slimy tentacle gently rubs Luka's penis."
if %ransu=8 mov $sel1,"Take this!":mov $sel2,"The Slime tentacle hits Luka!"
if %ransu=9 mov $sel1,"Oh, are you hurting? Haha.":mov $sel2,"The Slime hits Luka with a tentacle!"
if %ransu=10 mov $sel1,"Hee hee...":mov $sel2,"The tentacle hits Luka!"
name $name
eng $sel1:$sel6\
name ""
skillname "Slime Tentacle"
dwave 1,"se\ero_slime1.ogg"
>The Slime reaches out with a slimy tentacle!\
eng $sel2:$sel6
if %nanido<2 damage 2,3
if %nanido=2 damage 3,4
if %nanido=3 damage 4,6
skillname ""
if %mylife=0 sub %stack,1:return *slime_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*slime_a4

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 4
name $name
>Hee hee, I'm wrapping you up!\
name ""
skillname "Slime Wrap"
dwave 1,"se\ero_slime3.ogg"
>The Slime creates a puddle under Luka's foot, causing him to trip.
if %nanido<2 damage 2,3
if %nanido=2 damage 3,4
if %nanido=3 damage 4,6
mov %kousoku,1:gosub *status_print
>The Slime twirls around Luka's foot!\
skillname ""
if %mylife=0 sub %stack,1:return *slime_h1
if %kousan=2 sub %stack,1:return
name $name
>Hee hee, no more running.@
>Just sit back and let me take care of you! \
name ""
if %nanido<2 mov %genmogaku,0
if %nanido=2 mov %genmogaku,1
if %nanido=3 mov %genmogaku,2
sub %stack,1
return



*slime_a5

add %stack,1
name $name
>Hee hee...\
name ""
skillname "Slime Wrap"
dwave 1,"se\ero_slime3.ogg"
>The Slime that was wrapped around Luka's foot begins to reach to his thigh!\
>The Slime reaches up to Luka's groin!
damage 3,4
mov %kousoku,2
>The Slime twirls around Luka's penis!\
skillname ""
if %mylife=0 sub %stack,1:return *slime_h3
if %kousan=2 sub %stack,1:return
name $name
>Hehe, time to bully your penis!\
>You won't be able to last long with my slime technique...@
>When you can't take it anymore, just let it out! \
name ""
sub %stack,1
return



*slime_a6

add %stack,1
skillcount1 3002
>The Slime wraps around Luka's penis.\
if %hanyo2=1 skip 6
if %mylife>%max_mylife/2 skip 5
if %kousan=2 skip 4
rnd2 %ransu,1,2
if %ransu=1 mov %hanyo2,1:sub %stack,1:goto *slime_a7
mov %hanyo2,1
rnd2 %ransu,1,10
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll only bully you a little!":mov $sel2,"The Slime tightens around Luka's penis."
if %ransu=2 mov $sel1,"Oh, does it feel good?":mov $sel2,"The Slime around Luka's penis begins to jiggle."
if %ransu=3 mov $sel1,"How does this feel? Heehee...":mov $sel2,"The Slime switches between being soft and hard, stimulating Luka even more."
if %ransu=4 mov $sel1,"Well? Does it feel good?":mov $sel2,"The Slime tightens around Luka's penis."
if %ransu=5 mov $sel1,"So cute... I want to tease you even more.":mov $sel2,"The slime begins to spin around Luka's penis."
if %ransu=6 mov $sel1,"Hehe.. this little hole, too!":mov $sel2,"The slime starts to seep into Luka's urethra!"
if %ransu=7 mov $sel1,"Hehe... here too!":mov $sel2,"The slime starts to massage Luka's balls."
if %ransu=8 mov $sel1,"Hahaha... how's this?":mov $sel2,"The slime completely covers Luka's groin, vibrating all over."
if %ransu=9 mov $sel1,"Have a little of my service!":mov $sel2,"The slime teases Luka by rubbing all over."
if %ransu=10 mov $sel1,"Come on, let it out!":mov $sel2,"The Slime rubs Luka's penis all over."
name $name
eng $sel1:$sel6\
name ""
skillname "Slime Handjob"
dwave 1,"se\ero_slime1.ogg"
eng $sel2:$sel6
if %nanido<2 damage 3,5
if %nanido=2 damage 4,7
if %nanido=3 damage 6,10
skillname ""
if %mylife=0 sub %stack,1:return *slime_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*slime_a7

add %stack,1
if %kousan=2 skip 5
name $name
>Hey hey... I'll do something amazing to you!@
>It won't be possible for you to hang on any longer!\
name ""
skillname "Slime Absorb"
dwave 1,"se\ero_slime3.ogg"
>The Slime quickly dashes into Luka!\
>Luka's entire body is absorbed by the slime!
mov %damage_kotei,1
damage 3,3
if %kousoku=0 mov %kousoku,3:mov %genmogaku,100:gosub *status_print:skip 2
mov %kousoku,3:mov %genmogaku,100
skillname ""
if %mylife=0 sub %stack,1:return *slime_h5
if %mylife<4 sub %stack,1:goto *slime_a9
>Luka can't move!\
name $name
>Hehehe, feels good, right? @
>There's no more resisting me now!\
>I'll wring every last ounce out of you! \
name ""
skillcount1 3003
skillname "Slime Heaven"
dwave 1,"se\ero_slime3.ogg"
>Luka struggles fruitlessly as the Slime begins to massage him all over his body.
mov %damage_kotei,1
damage 3,3
skillname ""
if %mylife<4 sub %stack,1:goto *slime_a9
>Luka can't move!\
name $name
>Hahaha, I said I would let you taste heaven, didn't I?@
>Aren't you glad you got to experience something so amazing? \
name ""
skillcount1 3003
skillname "Slime Heaven"
dwave 1,"se\ero_slime3.ogg"
>Luka's entire body is being massaged by the Slime.\
>Every movement made sends pleasure all over his body, while the Slime continually rubs against his member.
mov %damage_kotei,1
damage 3,3
skillname ""
if %mylife<4 sub %stack,1:goto *slime_a9
>Luka struggles fruitlessly as the Slime continues to massage him all over his body.\
name $name
>Hahaha, it's not possible to resist anymore... just enjoy my technique! @
>Are you frustrated... or happy?\
name ""
skillcount1 3003
skillname "Slime Heaven"
dwave 1,"se\ero_slime3.ogg"
>The Slime begins to quicken her pace, massaging Luka even harder.\
>The waves of pleasure through Luka cause his eyes to lose focus.
mov %damage_kotei,1
damage 3,3
skillname ""
if %mylife<4 sub %stack,1:goto *slime_a9
>Luka struggles fruitlessly as the Slime massages him furiously.\
name $name
>Being defeated by such a weak monster like me... how disgraceful.@
>Such a pathetic man!\
name ""
sub %stack,1
goto *slime_a8



*slime_a8

add %stack,1
skillcount1 3003
skillname "Slime Heaven"
dwave 1,"se\ero_slime3.ogg"
>The Slime seductively moves around as she wraps Luka.\
>The Slime completely wraps around Luka!
mov %damage_kotei,1
damage 3,3
skillname ""
if %mylife<4 sub %stack,1:goto *slime_a9
>Luka's entire body is wrapped by the Slime!\
name $name
>Hehehe, feels amazing, no?\
name ""
skillcount1 3003
skillname "Slime Heaven"
dwave 1,"se\ero_slime3.ogg"
>The Slime begins to stimulate Luka's entire body.\
>The sticky slime causes friction on Luka's penis, sending pleasure racing through his body.
mov %damage_kotei,1
damage 3,3
skillname ""
if %mylife<4 sub %stack,1:goto *slime_a9
>Luka's entire body is wrapped by the Slime, rendering him unable to move!\
name $name
>Amazing, right? I bet you're going to come any second! \
name ""
skillcount1 3003
skillname "Slime Heaven"
dwave 1,"se\ero_slime3.ogg"
>The Slime starts to massage Luka's entire body, vibrating and rubbing him with every movement made.
mov %damage_kotei,1
damage 3,3
skillname ""
if %mylife<4 sub %stack,1:goto *slime_a9
>Luka's unable to move, his entire body being stuck to the Slime!\
name $name
>Just sit back and let me take care of everything! \
name ""
sub %stack,1
goto *slime_a8



*slime_a9

add %stack,1
>Luka's entire body is wrapped by the Slime!\
name $name
>Fufu, are you already at your limit? How pathetic.@
>If I rub you once more, you're going to come! \
>Are you ready for it? Here it comes... \
name ""
skillcount1 3003
skillname "Slime Heaven"
dwave 1,"se\ero_slime3.ogg"
>The slime wrapped around Luka's penis tightens, causing intense stimulation to run through his body!
mov %damage_kotei,2
damage 5,6
skillname ""
sub %stack,1
return *slime_h6



*slime_onedari

mov $list1,"Slime Tentacle"
if %3001>0 mov %list_num1,1
mov $list2,"Slime Handjob"
if %3002>0 mov %list_num2,1
mov $list3,"Slime Heaven"
if %3003>0 mov %list_num3,1
gosub *cmd_onedari
if %cmd1=11 goto *slime_onedari1
if %cmd1=12 && %kousoku<2 goto *slime_onedari2
if %cmd1=12 && %kousoku=2 goto *slime_onedari3
if %cmd1=13 goto *slime_onedari4
if %cmd1=-1 goto *slime_main
goto *slime_onedari



*slime_onedari1

mov $tatie2,"slime_st02"
gosub *onedari_syori
name $name
>Hohoho, is that your favorite attack?@
>Alright then, I'll play with you with my slime tentacles! \
name ""
gosub *slime_a3
skip -1



*slime_onedari2

mov $tatie2,"slime_st02"
gosub *onedari_syori_k
name $name
>Fufu...@
>So you want my slime all over your member?\
>Alright... I'll be glad to give you a taste! \
name ""
if %kousoku=1 skip 5
gosub *slime_a4
name $name
>Fufu... it's throbbing.@
name ""
gosub *slime_a5
name $name
>Fufu, my slime is all over your penis...@
>This is what you wanted, right?\
>I'll keep going until you come! \
name ""
gosub *slime_a6
skip -1



*slime_onedari3

mov $tatie2,"slime_st02"
gosub *onedari_syori_k
name $name
>Fufu...@
>So you're only thinking about your desires, huh?\
>Alright... I'll let you bathe in ecstasy! \
name ""
gosub *slime_a6
skip -1



*slime_onedari4

mov $tatie2,"slime_st02"
gosub *onedari_syori_k
name $name
>Oh, so you want to reach heaven?@
>Fufu... alright, I'll give you a taste of it! \
name ""
gosub *slime_a7



*slime_h1

name "Luka"
>A... I'm... I'm coming!\
name ""
name $name
>Oh, that's no good...\
name ""
>The Slime quickly wrapped around Luka's groin.\
name "Luka"
>Fuuuaa!\
name ""
gosub *syasei1
lsp 694,":a;chara\slime_bk04.bmp",244,80
gosub *syasei2
>Luka's semen starts to rush out into the Slime.\
mov %viclose,1:gosub *lose
mov %2501,%2501+1:if %2501=1 mov %count_koenemy,%count_koenemy+1
if %2501>%count_most mov %count_most,%2501:mov $count_mostname,$name
count 11,3
mov $bad1,"The Slime Girl's wrap as too much for Luka, and he succumbed to pleasure."
mov $bad2," After that, Luka lived out his life as the Slime's slave."
gosub *face2
name $name
>Fufu... I made it in time. @
>I wasn't even touching your member when you came... how pathetic!\
name ""
goto *slime_h



*slime_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\slime_bk05.bmp",244,80
gosub *syasei2
>Luka ejaculates into the Slime's hand!\
mov %viclose,1:gosub *lose
mov %2501,%2501+1:if %2501=1 mov %count_koenemy,%count_koenemy+1
if %2501>%count_most mov %count_most,%2501:mov $count_mostname,$name
count 11,3
mov $bad1,"The Slime Girl's tentacles were too much for Luka, and he succumbed to pleasure."
mov $bad2," After that, Luka lived out his life as the Slime's slave."
gosub *face2
name $name
>You let out so much...@
>I guess it felt pretty amazing, hehe. \
name ""
goto *slime_h



*slime_h3

mov %ikigoe,3:gosub *ikigoe
name $name
>Oh!?\
name ""
gosub *syasei1
lsp 694,":a;chara\slime_bk04.bmp",244,80
gosub *syasei2
>Luka ejaculated into the Slime!\
mov %viclose,1:gosub *lose
mov %2501,%2501+1:if %2501=1 mov %count_koenemy,%count_koenemy+1
if %2501>%count_most mov %count_most,%2501:mov $count_mostname,$name
mov %count_bouhatu,%count_bouhatu+1
count 11,3
mov $bad1,"Luka accidentally ejaculated into the Slime."
mov $bad2," After that, Luka lived out his life as the Slime's slave."
gosub *face2
name $name
>Haha, you let it all out... @
>It felt good, didn't it?\
name ""
goto *slime_h



*slime_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\slime_bk04.bmp",244,80
gosub *syasei2
>Luka spasms, coming inside of the Slime!\
mov %viclose,1:gosub *lose
mov %2501,%2501+1:if %2501=1 mov %count_koenemy,%count_koenemy+1
if %2501>%count_most mov %count_most,%2501:mov $count_mostname,$name
count 11,3
mov $bad1,"Luka succumbed to the Slime's handjob."
mov $bad2," After that, Luka lived out his life as the Slime's slave."
gosub *face2
name $name
>Ah! You let it out! @
>It felt good, didn't it?\
name ""
goto *slime_h



*slime_h5

mov %ikigoe,2:gosub *ikigoe
gosub *face3
name $name
>Oh!?\
name ""
gosub *syasei1
lsp 693,":a;chara\slime_bk03.bmp",244,80
lsp 694,":a;chara\slime_bk04.bmp",244,80
gosub *syasei2
>Luka spasms, coming inside of the Slime!\
mov %viclose,1:gosub *lose
mov %2501,%2501+1:if %2501=1 mov %count_koenemy,%count_koenemy+1
if %2501>%count_most mov %count_most,%2501:mov $count_mostname,$name
count 11,3
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka came as the Slime was just preparing Slime Heaven."
mov $bad2," After that, Luka lived out his life as the Slime's slave."
name $name
>Aww, it was just about to be even more amazing.@
gosub *face2
>Oh well, I'll be able to feast to my hearts content now! \
name ""
goto *slime_h



*slime_h6

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\slime_bk03.bmp",244,80
lsp 691,":a;chara\slime_bk04.bmp",244,80
gosub *syasei2
>Luka spasms, coming inside of the Slime!\
mov %viclose,1:gosub *lose
mov %2501,%2501+1:if %2501=1 mov %count_koenemy,%count_koenemy+1
if %2501>%count_most mov %count_most,%2501:mov $count_mostname,$name
count 11,3
mov $bad1,"Luka ascended to heaven by the Slime Girl's technique."
mov $bad2," After that, Luka lived out his life as the Slime's slave."
name $name
>Hahaha, you let out so much!@
>I told you that you would reach heaven! \
name ""
goto *slime_h



*slime_h

if %2501=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
>I wasn't able to hold out any longer against the Slime Girl...\
>I broke Ilias' law against giving semen to a monster...\
name $name
>Haha, you're helpless now...@
>There's no getting away from me now! \
name ""
>The Slime laughs at me while I breathe heavily on the ground.\
name $name
>Fufu... raaaape time!\
name ""
name "Luka"
>Uu.. uwaa!\
name ""
mov %hseanwave,18:hseanwave
cspl 690,699
lsp 700,":a;chara\slime_h1.bmp",0,0:print 10,1500
>The Slime leans her body into mine, slowly moving my body into hers.\
>Everything from my shoulder to my thigh is completely stuck in the Slime's mucus.\
name "Luka"
>Aa.. ahh!\
name ""
>The cold slime covers my body, draining my energy and any chance I have at escaping.\
>I can feel the vibrations all over my body - my chest, stomach, and all over my groin.\
>It's like thousands of tongues licking me all over at the same time.\
name $name
>How is it inside of me? Amazing, right?@
>Don't worry, I'll be sure to give you even more! \
name ""
name "Luka"
>Fuuuuaaa....\
name ""
>The cold slime around my penis begins to wriggle and vibrate in every direction, sending waves of pleasure racing through my body.\
>Having never experienced something like this before, I'm unable to control my body.\
name $name
>It feels so good you're going to come again soon, right?\
>Let it aaalll out, and let me taste more of your delicious sperm! \
name ""
>The slime around my member starts to shrink, tightening the pressure.\
>The increased sensation sends overwhelming ecstasy through me, almost feeling like torture.\
name "Luka"
>Ahh.. ahh...@
>Too... too good...!\
name ""
>Through the Slime's transparent blue body, I can see my penis being rubbed all over by the shifting slime.\
>Seeing my own disgraceful defeat before my eyes starts to fill me with conflicting feelings of horror and excitement.\
name $name
>Fufu... it's become so good that you can't even speak?@
>Don't worry, it isn't over yet... I still want to bully you more! \
name ""
>What little strength to escape I had left in me vanishes as the Slime starts to twist and turn her whole body, using my body like a toy.\
name "Luka"
>Ahhhhh!\
name ""
>My vision goes white as the overpowering ecstasy causes my waist to spasm.@
>I can feel myself approaching climax as I try with all my might to resist the rising feeling in my dick.\
name $name
>Fufu... you can't hold on any longer, can you?@
>Just give it all to me! \
name ""
>The Slime suddenly tightens the pressure on my penis, causing intense stimulation all over!\
name "Luka"
>A...A.... Ahhhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\slime_h2.bmp",0,0
gosub *syasei2
>I'm unable to hold on any longer, and I let loose a powerful stream of sperm into the Slime as I orgasm.\
>I can see the cloud of my semen bubble up through the transparent Slime's body...\
name $name
>Fufufu... you let it out! \
name ""
name "Luka"
>A... a.... a....\
name ""
>It looks like the semen is spreading throughout her body...\
>The Slime's sudden tightening caused me to have a much more powerful orgasm than the first time.\
name "Luka"
>Fuu...\
name ""
name $name
>Hahaha... amazing, wasn't it?\
name ""
>I look through the Slime's body at the cloud of semen spreading throughout her lower body.\
>As I see visible proof of my defeat, my body starts to shake.\
name $name
>Haha, you seem so ashamed...@
>But your penis seems so joyful! \
name ""
>The Slime suddenly tightens her body over my groin, causing my body to twist at the unexpected pressure.\
name "Luka"
>Ah!\
name ""
name $name
>Even though you look so ashamed, you really want to let out even more, don't you?\
>Your penis is twitching so expectantly... it wants to give me more delicious sperm! \
name ""
>The viscous slime around my member starts to massage it all over again.@
>The feeling is even more powerful than before since I just orgasmed, bringing the pleasure to a new height.\
>Being powerless to resist in this hell of pleasure, I can barely even move my body to react to the pleasure.\
name $name
>Hehe, I'll squeeze you even more! \
name ""
name "Luka"
>Hiii... ahh...\
name ""
>As the Slime starts to squeeze my body tighter, she starts to slowly vibrate, stimulating every corner of my body.\
>The stickiness around my member causes a rush of ecstasy to my brain, causing me to scream out in intoxication.\
name "Luka"
>Aaa! Ahhhhhh!\
name ""
name $name
>More! More! Let me have more of your sperm! \
name ""
>The Slime rotating and vibrating all around my dick was like I was stuck in a whirlpool of sticky slime, rubbing and twirling around me.\
name "Luka"
>Ag... again! I'm coming again!@
>Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\slime_h3.bmp",0,0
gosub *syasei2
>I exploded in the Slime yet another time.\
name $name
>Fufu... it's not over yet, I want more! \
name ""
name "Luka"
>A... ahh!\
name ""
mov %hseanwave,19:hseanwave
>Even while climaxing, the Slime doesn't stop playing with my penis, tightening up even as my semen rushes into her body.\
>My thoughts start to fade as I become unable to focus on anything but the intense pleasure coursing through me.\
name "Luka"
>Ah.. ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\slime_h4.bmp",0,0
gosub *syasei2
>I spasm inside of the Slime, bathing in the ecstasy given to me by the sticky slime rubbing all over.\
name $name
>Haha, amazing isn't it?@
>Let out even more! \
name ""
name "Luka"
>Uwaaa!\
name ""
>Unable to focus on anything but the pleasure exploding through my body with each orgasm, my consciousness starts to slowly fade...\
gosub *anten
mov %hseanwave,0:hseanwave
name $name
>Your seed is so delicious! @
>I think I'll take you back to my house and keep you! \
name ""
>I hear the Slime Girl's words right as I faint...\
>My adventure ends here...\
>.........\
goto *badend



*alice1_start

mov $name,"Monster Girl"
mov $name2,"Monster Girl"
mov $lavel,"alice1"
mov $tatie1,"alice_st01"
mov $tatie2,"alice_st01"
mov $tatie3,"alice_st01"
mov $tatie4,"alice_st01"
mov $haikei,"bg006"
mov %monster_x,172
mov %monster_y,0
mov %max_enemylife,32000
rnd2 %ransu,1,100
if %ransu=100 mov %max_enemylife,1
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %music,5
mov %alice_skill,0
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov %end_n,1
mov %zmonster_x,-60
name "Luka"
>Eh?@
>Ehhhhhhh!?\
name ""
>Before I realized it, it seems like a fight had started.@
>No matter what I say, it doesn't seem like she'll listen...\
name "Luka"
>Is there no other way but to fight...?\
name ""
>I reluctantly put my sword up.@
>Can I really fight against this strong looking monster...?\
mov %sinkou,1
goto *common_main



*alice1_kousan

gosub *kousan_syori
>Luka surrenders in fear, unable to resist any longer.\
goto *alice1_a



*alice1_v

name $name
>What?!!\
name ""
name "Luka"
>...I won?!!\
name ""
if %nanido=0 skip 3
>Well, if only I knew how I won?@
skip 2
>Well, the difficulty is EX so of course I won.@
>Still, the win is a win anyway...\
name $name
>..........@
>Useless...\
name ""
skillname "Recover"
dwave 2,"se\kaihuku.ogg"
eng "Monster Girl is completely recovered!":$sel6/
mov %enemylife,%max_enemylife
lsp 561,":a;system\gagee100.bmp",421,556:print 10,500
\
skillname ""
name $name
>Now...@> you...@>will...@>die, cheater!\
name ""
skillname "Eyes of Obedience"
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
>Monster Girl's eyes flash!\
mov %status,4:gosub *status_print
mov %status_turn,100
mov $status_mid,"Luka can't move his body."
>Luka has been seduced.\
skillname ""
name $name
>Stay still and not move!\
name ""
if %nanido=0 skip 3
>(Even Gamecollector can't force her to loose this fight...)\
skip 2
>(Even the EX difficulty can't force her to loose this fight...)\
goto *common_main



*alice1_main

gosub *cmd_main
if %cmd1=11 && %nanido=0 goto *common_attack
if %cmd1=11 goto *alice1_attack
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *alice1_kousan
if %cmd1=16 goto *alice1_onedari
if %cmd1=17 goto *common_skill
goto *alice1_main



*alice1_attack

mov %before_action,1
mov %skill_sub,1
gosub *common_attack1
dwave 1,"se\slash.ogg"
rnd2 %damage,1,2:gosub *enemylife2
if %enemylife=0 goto *alice1_v
if %first_sel1=1 skip 7
name "Luka"
>Huh?\
name ""
>My attack wasn't even noticeable...@
>There's a huge difference in ability here...\
mov %first_sel1,1
goto *alice1_a



*alice1_a

if %sinkou=1 gosub *alice1_a1:goto *common_main
if %sinkou=2 gosub *alice1_a2:goto *common_main



*alice1_a1

add %stack,1
if %first_sel2=1 skip 6
name $name
>Hmm... my power isn't fully back yet.@
>Let me concentrate a bit to get a little back.\
name ""
mov %first_sel2,1
skillname "Concentrate Magic"
dwave 1,"se\power.ogg"
>The monster girl radiates with magic!\
skillname ""
mov %sinkou,2
sub %stack,1
return



*alice1_a2

add %stack,1
skillname "Monster Lord's Cruelty"
dwave 1,"se\bom1.ogg"
>The monster girl lets loose the power of darkness!
wait 300
flushout 1000
vsp 700,0
bg white,10,1000
mov %a_effect1,1
mov %damage_kotei,1
mov %damage_nobr,1
damage 1000,1200
mov %a_effect1,1
mov %damage_kotei,1
mov %damage_nobr,2
damage 1000,1200
textclear
mov %a_effect1,1
mov %damage_kotei,1
mov %damage_nobr,1
damage 1000,1200
mov %a_effect1,1
mov %damage_kotei,1
mov %damage_nobr,2
damage 1000,1200
vsp 700,1
bg "bg\bg006.bmp",10,2000
\
skillname ""
if %mylife=0 sub %stack,1:return *alice1_h1
sub %stack,1
return



*alice1_onedari

name $name
>I won't listen to anything you have to say.\
name ""
goto *alice1_main



*alice1_h1

name "Luka"
>N... no way...\
name ""
>"Strong" doesn't even begin to describe her.@
dwave 1,"se\down.ogg"
>Overwhelmed, I fall to the ground.\
mov %viclose,2:gosub *lose
mov %2550,%2550+1:if %2550=1 mov %count_koenemy,%count_koenemy+1
if %2550>%count_most mov %count_most,%2550:mov $count_mostname,"Alipheese"
count 14,4
mov $bad1,"Luka surrendered to Alice's overwhelming power,"
mov $bad2," and was killed without mercy."
goto *alice1_h



*alice1_h

mov $tatie2,"alice_st22"
mov %2250,1
mov $end_go,"sean0017a"
if %2550=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
if %con_hvoice=0 dwave 0,"voice\alice1_01.ogg"
name $name
>Is that all you had? How weak.\
name ""
dwavestop 0
>She looks down at me on the ground with her cold eyes...@
dwave 1,"se\ero_simetuke1.ogg"
>...and coils around me with her huge tail!\
name "Luka"
>Uwaa!\
name ""
name $name
>...........\
name ""
>She coils around me from my shoulder to my foot, leaving me unable to move.\
>With my body completely wound by her tail, I can feel her strong muscles flex around me.\
if %con_hvoice=0 dwave 0,"voice\alice1_02.ogg"
name "Monster Girl"
>My injuries haven't fully healed yet... but I'm awfully hungry.\
name ""
dwavestop 0
name "Luka"
>Ge... get off of me!\
name ""
if %con_hvoice=0 dwave 0,"voice\alice1_03.ogg"
name $name
>Let me suck out all of your energy... until there's nothing left!\
name ""
dwavestop 0
dwave 1,"se\ero_pyu2.ogg"
lsp 700,":a;chara\alice_st21b.bmp",67,0:print 10,500
>She opens a mouth on the tip of her tail.@
>The inside has a pink color, with mucus dripping out...\
>It looks like some sort of digestive system...\
if %con_hvoice=0 dwave 0,"voice\alice1_04a.ogg"
name $name
>Haha... with this hole, I'll suck in your penis.\
if %con_hvoice=0 dwave 0,"voice\alice1_04b.ogg"
>Doesn't it look like it would feel amazing? Some kid like you wouldn't even last ten seconds...\
name ""
dwavestop 0
name "Luka"
>Su... such a thing...\
name ""
lsp 700,":a;chara\alice_st22b.bmp",67,0:print 10,500
if %con_hvoice=0 dwave 0,"voice\alice1_05a.ogg"
name $name
>Hahaha... aren't you glad? Being played with by me will bring you the ultimate pleasure you know.\
if %con_hvoice=0 dwave 0,"voice\alice1_05b.ogg"
>While experiencing a man's pleasure, you can come over and over again inside here.\
if %con_hvoice=0 dwave 0,"voice\alice1_05c.ogg"
>I'll suck everything out of you until you're too exhausted to go on...\
name ""
dwavestop 0
name "Luka"
>No! I don't want that!\
name ""
>She skillfully cuts open my clothes with her tail, exposing only my erect dick to the air.\
if %con_hvoice=0 dwave 0,"voice\alice1_06.ogg"
name $name
>Haha... it's already up? Already excited in preparation for me to suck everything out... how pathetic.\
name ""
dwavestop 0
>Her frightening tail approaches my groin.@
>The mouth at the end of her tail opens up, aiming for my penis.\
name "Luka"
>Hiii...!@
>Stop! I'm begging you... please stop!\
name ""
if %con_hvoice=0 dwave 0,"voice\alice1_07.ogg"
name $name
>Hoora... have a taste of the pleasure a monster can bring...\
name ""
dwavestop 0
name "Luka"
>Aaaaaa!\
name ""
mov %hseanwave,15:hseanwave
lsp 700,":a;chara\alice_h01_1.bmp",0,0:print 10,500
>The monster's tail sucks in my penis!\
>The mouth in her tail feels very slimy and warm...@
>The walls of the mouth wriggle and squirm around my penis, rubbing it all over.\
>Suddenly, the soft walls of the mouth tighten around me.\
name "Luka"
>Fuaa...\
name ""
>The pleasure was too intense, and I lost all my strength for a moment.\
>The feelings coming from her mouth are too intense, and I feel ready to explode at any moment.\
name "Luka"
>S... stop it!@
>I can't hold it in any longer...!\
name ""
if %con_hvoice=0 dwave 0,"voice\alice1_08a.ogg"
name $name
>Fuu... you really can't hold it for even ten seconds? Just surrender, and come.\
if %con_hvoice=0 dwave 0,"voice\alice1_08b.ogg"
>Hoora, I'll keep squeezing you like this.\
name ""
dwavestop 0
name "Luka"
>Aauuu..\
name ""
mov %hseanwave,16:hseanwave
>Her mouth tightened again, almost like it was trying to milk me.@
>She starts to tighten in a rhythmic motion, trying to squeeze out my semen.\
>With her rubbing me like that, there's no way I can hold on...!\
if %con_hvoice=0 dwave 0,"voice\alice1_09.ogg"
name $name
>Hoora... let it out!\
name ""
dwavestop 0
name "Luka"
>Aa... aaaaaah!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice_h01_2.bmp",0,0
gosub *syasei2
>My body, tightly held by her tail, starts to shake as I explode my semen into her.\
>My head starts to go white as the pleasure starts to take over my mind.\
if %con_hvoice=0 dwave 0,"voice\alice1_10.ogg"
name $name
>Mmm... you let out a lot. Your delicious semen.\
name ""
dwavestop 0
>Even after ejaculating, she doesn't stop stimulating my penis.@
>She continues to play with me, like a snake toying with her prey.\
name "Luka"
>Ahii... hii....\
>Aaaa!\
name ""
>While she plays with my penis, my body writhes in futility.@
>With her tail wrapped around me, there's no way for me to escape...\
if %con_hvoice=0 dwave 0,"voice\alice1_11a.ogg"
name $name
>Haha... how miserable. The moment when a man is most vulnerable... are you humiliated?\
if %con_hvoice=0 dwave 0,"voice\alice1_11b.ogg"
>Hoora... shall I let you come again?\
name ""
dwavestop 0
name "Luka"
>Ahh... stop... haa..\
name ""
>The soft walls inside her tail start to massage me softly again, while slowly shrinking...\
>She makes the pressure around my dick extremely tight, trying to force a second orgasm.\
if %con_hvoice=0 dwave 0,"voice\alice1_12a.ogg"
name $name
>Horahora... how is it?\
if %con_hvoice=0 dwave 0,"voice\alice1_12b.ogg"
>It's useless to resist...
>If I made an effort, you would come instantly after all.\
if %con_hvoice=0 dwave 0,"voice\alice1_12c.ogg"
>Hoora... like this!\
name ""
dwavestop 0
name "Luka"
>Haaaa!\
name ""
>She tightens inside her mouth again, as if strangling my cock.\
>I writhe fruitlessly as I'm stuck in her tail.@
>Just like a mouse, I'm completely at the mercy of the snake...\
name "Luka"
>Aahh! I... I'm coming again!\
name ""
>I'm unable to endure the intense pleasure racing through me!@
gosub *syasei1
lsp 700,":a;chara\alice_h01_3.bmp",0,0
gosub *syasei2
>I exploded again in her tail's mouth...\
>Given no time to recover, I was already forced to come again...\
name "Luka"
>U... uuuu....\
name ""
>My mind was filled with horror at my situation ,while my body was writhing in pleasure.\
if %con_hvoice=0 dwave 0,"voice\alice1_13.ogg"
name $name
>Fuu... it must have felt amazing, to gush out like that. Well then, it's about time I really started to play with you.\
name ""
dwavestop 0
name "Luka"
>Fa... stop...@
>Aaahhh!!\
name ""
>My body shot back at the sudden increase in pleasure that attacked it.\
>Like the beating of a heart, the walls of the mouth begin to contract and massage me!\
>Pleasure shoots through me, making my head go white!@
gosub *syasei1:gosub *syasei2
>To such an intense motion, I instantly ejaculated.\
>Like being milked, there was no way to stop the leaking semen...\
name "Luka"
>Ahii... what... is this...?@>Too... good...\
name ""
gosub *syasei1:gosub *syasei2
>The ecstasy flooding through me made it feel like I was melting in her tail...\
if %con_hvoice=0 dwave 0,"voice\alice1_14.ogg"
name $name
>I'll squeeze even the life out of you, you know?
>Ascend to heaven while you come over and over...\
name ""
dwavestop 0
name "Luka"
>Ahiii!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice_h01_4.bmp",0,0
gosub *syasei2
>Tears and saliva fall off my face as my body shakes.\
>The semen I shoot into her tail is sucked up like a pump.@
>My head starts to go completely white, as I become unable to focus on anything but the pleasure.\
>While I know what will happen to me after this...@
>I still want to surrender to these amazing feelings.\
if %con_hvoice=0 dwave 0,"voice\alice1_15.ogg"
name $name
>Fufu... make sure to remember in your next life that Lamias are very vengeful...\
name ""
dwavestop 0
>She continues to wring the semen out of me as I feel humiliation, despair...@
>...and pleasure that is bringing me to paradise.\
>With my mind turning to mush, it feels like my whole body is being sucked into her tail.\
name "Luka"
>Uu... aa...\
name ""
gosub *syasei1:gosub *syasei2
>While she squeezes out even more, the realization of my impending death truly dawns on me.@
>Even so, it feels so good...\
if %con_hvoice=0 dwave 0,"voice\alice1_16.ogg"
name $name
>Haha... amazing, isn't it? Even as I suck out both your semen and your life, you still feel such happiness... how miserable.\
name ""
dwavestop 0
name "Luka"
>Auu.... uu...\
name ""
>A sweet ecstasy fills my head.@
>It feels as though my entire body has melted.\
>My melted body feels like it's being sucked up through my penis, until I become completely empty.\
>Is this what it's like to be eaten by a monster...?\
if %con_hvoice=0 dwave 0,"voice\alice1_17.ogg"
name $name
>Haha... it's about time to finish this. Wrapped in my tail, I'll squeeze everything out and send you to heaven.\
name ""
dwavestop 0
name "Luka"
>A... a.....@
name ""
gosub *syasei1:gosub *syasei2
>I traded my life for pleasure...@
>As I ejaculate again, I realize that my life itself has been sucked up.\
name "Luka"
>A...\
name ""
>I start to lose consciousness...\
>My life, that has turned into nothing but food for the Lamia...@
>Being absorbed by her to the last drop...\
gosub *anten
mov %hseanwave,0:hseanwave
>With a pop, Luka's penis comes out of her tail, covered in mucus.\
if %con_hvoice=0 dwave 0,"voice\alice1_18.ogg"
name $name
>Hahaha... thanks for the meal.\
name ""
dwavestop 0
>I thought I heard a voice from the distance...\
>........\
goto *badend



*name_start

mov $name,"Slug Girl"
mov $name2,"Slug Girl"
mov $lavel,"name"
mov $tatie1,"name_st11"
mov $tatie2,"name_st02"
mov $tatie3,"name_st12"
mov $tatie4,"name_st02"
mov $haikei,"bg008"
mov %monster_x,170
mov %monster_y,0
if %nanido=1 mov %max_enemylife,30
if %nanido=2 mov %max_enemylife,30
if %nanido=3 mov %max_enemylife,30
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"It's not possible to escape from her body!"
mov $mogaku_anno2,"Luka escaped from the Slug's body!"
mov $mogaku_anno3,"Luka can't move with the Slug on his body!"
mov $mogaku_sel1,"Just sit there quietly while I make you come..."
mov $mogaku_sel2,"You can't escape... just let come while covered in my mucus..."
mov $mogaku_sel3,"You can't escape from my slimy hell..."
mov $mogaku_sel4,"Covered in my mucus, your struggling is so ungraceful..."
mov $mogaku_sel5,"Do you really hate my mucus that much...?"
mov $mogaku_dassyutu1,"...You didn't like my slimy hell...?"
mov $mogaku_dassyutu2,""
mov $half_s1,"Fufu... my mucus feels good, doesn't it?"
mov $half_s2,"More... more... you want more mucus on you, right?"
mov $kiki_s1,"It looks like you're at your limit..."
mov $kiki_s2,"Covered in mucus, let it all out!"
mov %end_n,2
mov %zmonster_x,-100
name "Luka"
>What is that...?\
name ""
>At first glance, it appeared to be a beautiful woman.@
>But looking at her lower half, it looks like a slug!\
name $name
>...A traveler?@
>...Not baptized, either. You look delicious.\
name ""
name "Luka"
>........!\
name ""
>My second fight with a monster...@
>Even though I need to get used to this, I still feel nervous.\
name "Luka"
>What should I do, Alice?@> Ara?\
name ""
>On turning around...@> I see that Alice has vanished again!\
>No way... she ran!?\
name "Luka"
>Oooii... Alice!?\
name ""
name $name
>Who are you yelling at?\
name ""
>The Slug slowly moves toward me.\
mov $tatie1,"name_st01"
mov %monster_x,183
lsp 700,":a;chara\name_st02.bmp",183,0:print 10,500
name $name
>You look delicious...@
>While tasting my sticky mucus, I'll let you come over and over.\
lsp 700,":a;chara\name_st01.bmp",183,0:print 10,500
name ""
name "Luka"
>Guh...!\
name ""
>I don't really want to fight her...@
>I don't want to hurt a monster... but it looks like I don't have a choice here!\
mov %sinkou,1
goto *common_main



*name_v

gosub *face3
name $name
>Stop it!\
name ""
>The Slug starts to shake, shriveling away from Luka.\
name $name
>I... I'll remember this!\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,1000
>Yelling back at Luka, the Slug starts to run away.\
mov %viclose,2:gosub *victory
mov %getexp,10:gosub *lvup
mov %2202,1
goto *sean0039



*name_kousan

gosub *kousan_syori
>Luka yields to the promise of pleasure, unable to resist.\
name ""
gosub *face2
name $name
>So you want to taste a sticky hell...@
>Alright... I'll let you taste it to your heart's content!\
name ""
goto *name_a



*name_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 && %nanido=0 goto *common_attack
if %cmd1=11 && %sinkou=1 goto *name_attack1
if %cmd1=11 && %sinkou=2 goto *name_attack2
if %cmd1=11 && %sinkou=3 goto *name_attacklist1
if %cmd1=11 && %sinkou=4 goto *name_attacklist2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *name_kousan
if %cmd1=16 goto *name_onedari
if %cmd1=17 goto *common_skill
goto *name_main



*name_attack1

mov %before_action,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Haa!"
if %ransu=2 mov $sel1,"Ora!"
if %ransu=3 mov $sel1,"Take this!"
name "Luka"
eng $sel1:$sel6\
name ""
>Luka pulls his sword back...@
>Making sure not to make a wide swing, he slashes!\
mov %skill_sub,1
gosub *common_attack2
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\miss_name.ogg"
delay 90
>Slug Girl takes no damage!\
name "Luka"
>What...?\
name ""
>Luka's sword gets stuck, stopping his swing short!\
>The mucus covering her is too sticky and elastic, causing the sword to do nothing!\
name "Luka"
>No way... my attack...\
name ""
name $name
>You can't cut me with such a weak attack...\
name ""
name "Luka"
>Cr... crap... what should I do?\
name ""
>Can I not hurt her at all?\
>Right after that Slime, another annoying enemy shows up...@
>Oh Ilias... is this some sort of trial?\
mov %sinkou,2
goto *name_a



*name_attack2

mov %before_action,1
name "Luka"
>Well then if a slash doesn't work... how about a stab!?\
name ""
>Luka pulls back his sword, and stabs at her chest.
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\miss_name.ogg"
delay 90
>Slug Girl takes no damage!\
name $name
>It's useless...\
name ""
>The Slug's elastic body dents in, then bounces Luka's sword back!\
name "Luka"
>D... dammit!\
name ""
>If I was a little more powerful, I could probably pierce her...\
mov %sinkou,3
goto *name_a



*name_attacklist1

if %first_sel1=1 skip 3
>My attacks don't seem to do anything...@
>I need to hit her weak point!\
mov $hanlist1,"Normal Attack"
mov $hanlist2,"Throw Salt"
gosub *cmd_hanyo
if %cmd1=11 goto *name_attack3
if %cmd1=12 goto *name_attack4
if %cmd1=-1 goto *name_main
skip -4



*name_attacklist2

mov $hanlist1,"Normal Attack"
mov $hanlist2,"Throw Salt"
gosub *cmd_hanyo
if %cmd1=11 goto *name_attack3
if %cmd1=12 goto *name_attack5
if %cmd1=-1 goto *name_main
skip -4



*name_attack3

mov %before_action,1
name "Luka"
>Take this!\
name ""
mov %skill_sub,1
gosub *common_attack2
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\miss_name.ogg"
delay 90
>Slug Girl takes no damage!\
if %first_sel1=1 goto *name_a
name "Luka"
>Yep... it's useless for sure...\
name ""
mov %first_sel1,1
goto *name_a



*name_attack4

>A Slug's weak point...@> That's right, salt!\
name "Luka"
>Alright... how's this!?\
name ""
>Luka takes out some cooking salt from his bag.\
gosub *face3
name $name
>Th.... that's!\
name ""
>When the Slug saw the salt, her expression darkened.@
>It looks like Salt is the way to go!\
name "Luka"
>Eat this!\
name ""
skillname "Salt"
>Luka throws some salt at the Slug!
dwave 1,"se\sio.ogg"
rnd2 %damage,10,13:gosub *enemylife2
skillname ""
if %enemylife=0 goto *name_v
name $name
>Kyaa!\
name ""
name "Luka"
>Alright!\
name ""
>Even if I can't hurt her with my sword, it looks like this does the trick!\
gosub *face1
name $name
>How dare you...\
name ""
mov %sinkou,4
mov %first_sel1,1
goto *name_a



*name_attack5

name "Luka"
>Take this! And this!\
name ""
skillname "Salt"
>Luka throws more salt at the Slug.
dwave 1,"se\sio.ogg"
rnd2 %damage,10,13:gosub *enemylife2
skillname ""
if %enemylife=0 goto *name_v
if %nanido<2 goto *name_v
goto *name_a



*name_a

if %kousoku=1 gosub *name_a4:goto *common_main
rnd2 %ransu,1,3
if %ransu=1 gosub *name_a1:goto *common_main
if %ransu=2 gosub *name_a2:goto *common_main
if %ransu=3 && %owaza_count1a>2 gosub *name_a3:goto *common_main
skip -4



*name_a1

add %stack,1
skillcount1 3004
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll give you a taste of my sticky mucus."
if %ransu=2 mov $sel1,"My sticky mucus... amazing, isn't it?"
if %ransu=3 mov $sel1,"I'll cover your penis with even more mucus..."
name $name
eng $sel1:$sel6\
name ""
skillname "Sticky Mucus"
dwave 1,"se\ero_slime2.ogg"
>The Slug pours her sticky mucus all over Luka's groin!\
>Luka's covered in mucus!
if %nanido<2 damage 3,4
if %nanido=2 damage 4,6
if %nanido=3 damage 6,8
skillname ""
if %mylife=0 sub %stack,1:return *name_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*name_a2

add %stack,1
skillcount1 3005
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"...Sticky sticky..."
if %ransu=2 mov $sel1,"Doesn't the sticky mucus feel good?"
if %ransu=3 mov $sel1,"My body is very sticky, you know?"
name $name
eng $sel1:$sel6\
name ""
skillname "Sticky Caress"
dwave 1,"se\ero_name1.ogg"
>The Slug rubs her sticky body all over Luka!\
>Luka's body gets covered in sticky mucus!
if %nanido<2 damage 4,5
if %nanido=2 damage 6,7
if %nanido=3 damage 8,10
skillname ""
if %mylife=0 sub %stack,1:return *name_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*name_a3

add %stack,1
if %kousan=2 skip 4
name $name
>I'll get on top of you...@>...with this Slug body...\
name ""
skillname "Climb Over"
dwave 1,"se\ero_name2.ogg"
>The Slug climbs on top of Luka!\
>Luka is completely covered by the Slug's sticky body!
if %nanido<2 damage 4,5
if %nanido=2 damage 6,7
if %nanido=3 damage 6,7
mov %kousoku,1:gosub *status_print
>Luka's body is completely covered by the Slug!\
skillname ""
if %mylife=0 sub %stack,1:return *name_h3
if %kousan=2 sub %stack,1:return
name $name
>Here... have a taste of a sticky hell!@
>When you can't take it anymore... just let it out!\
name ""
if %nanido<2 mov %genmogaku,1
if %nanido=2 mov %genmogaku,1
if %nanido=3 mov %genmogaku,2
sub %stack,1
return



*name_a4

add %stack,1
skillcount1 3006
>The Slug is on top of Luka's body!\
rnd2 %ransu,1,10
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"It's useless to struggle... you can't do anything but be my food now...":mov $sel2,"The Slug's sticky, elastic body presses into Luka!"
if %ransu=2 mov $sel1,"Have more of my sticky mucus...":mov $sel2,"A large amount of mucus comes out of the Slug, covering Luka's body!"
if %ransu=3 mov $sel1,"I'll play with you some more...":mov $sel2,"Like being licked by tongues all over, Luka's whole body is covered with mucus."
if %ransu=4 mov $sel1,"Fufu... does it feel good?":mov $sel2,"Luka's whole body is covered by a sweet sticky feeling!"
if %ransu=5 mov $sel1,"How's this...?":mov $sel2,"Luka's penis sinks into the Slug's sticky hole!"
if %ransu=6 mov $sel1,"The more you struggle, the better it will feel...":mov $sel2,"Luka's penis is stuck in the sticky Slug!"
if %ransu=7 mov $sel1,"I'll move to make it feel even better!":mov $sel2,"While on top of Luka, the Slug starts to move her body!"
if %ransu=8 mov $sel1,"How is the sticky feeling...?":mov $sel2,"Luka's dick is attacked by a slimy, elastic feeling!"
if %ransu=9 mov $sel1,"Your dick must be feeling amazing now...":mov $sel2,"The sticky mucus around Luka's penis starts to rub and pull on it!"
if %ransu=10 mov $sel1,"Should I let you come now...?":mov $sel2,"The Slug starts to tighten the mucus covering Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Slug Rape"
dwave 1,"se\ero_name2.ogg"
eng $sel2:$sel6
if %nanido<2 damage 4,5
if %nanido=2 damage 6,7
if %nanido=3 damage 7,10
skillname ""
if %mylife=0 sub %stack,1:return *name_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*name_onedari

mov $list1,"Sticky Mucus"
if %3004>0 mov %list_num1,1
mov $list2,"Sticky Caress"
if %3005>0 mov %list_num2,1
mov $list3,"Slug Rape"
if %3006>0 mov %list_num3,1
gosub *cmd_onedari
if %cmd1=11 goto *name_onedari1
if %cmd1=12 goto *name_onedari2
if %cmd1=13 && %kousoku=0 goto *name_onedari3
if %cmd1=13 && %kousoku=1 goto *name_onedari4
if %cmd1=-1 goto *name_main
goto *name_onedari



*name_onedari1

gosub *onedari_syori
name $name
>You want my mucus all over your dick...?@
>Alright... I'll let you drown in it!\
name ""
gosub *name_a1
skip -1



*name_onedari2

gosub *onedari_syori
name $name
>You want my sticky body all over you...?@
>Alright... I'll make you a prisoner of my sticky body!\
name ""
gosub *name_a2
skip -1



*name_onedari3

gosub *onedari_syori
name $name
>You want to taste a sticky hell...?@
>Alright... I'll let you enjoy it to your heart's content!\
name ""
gosub *name_a3
name $name
>Let it all out, covered in my mucus...\
name ""
gosub *name_a4
skip -1



*name_onedari4

gosub *onedari_syori_k
name $name
>Keep playing with you like this...?@
>Alright, I'll keep playing with you until you come...\
name ""
gosub *name_a4
skip -1



*name_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\name_bk02.bmp",183,0
gosub *syasei2
>Luka orgasms, shooting semen from his mucus covered dick!\
mov %viclose,1:gosub *lose
mov %2502,%2502+1:if %2502=1 mov %count_koenemy,%count_koenemy+1
if %2502>%count_most mov %count_most,%2502:mov $count_mostname,$name
count 11,1
mov $bad1,"Covered in sticky mucus, Luka ejaculated."
mov $bad2," From then on, Luka spent the rest of his life as the Slug's mate."
gosub *face2
name $name
>You let it out... haha.\
name ""
>I ejaculated on the Slug's body...@
>The proof of my defeat starts to get absorbed by the Slug's membrane...\
cspl 690,699
goto *name_h



*name_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\name_bk03.bmp",183,0
gosub *syasei2
>Unable to resist the sticky mucus, I ejaculate, shooting out my semen all over the Slug's membrane.\
mov %viclose,1:gosub *lose
mov %2502,%2502+1:if %2502=1 mov %count_koenemy,%count_koenemy+1
if %2502>%count_most mov %count_most,%2502:mov $count_mostname,$name
count 15,1
mov $bad1,"Luka fell to the Slug's sticky caress."
mov $bad2," From then on, Luka spent the rest of his life as the Slug's mate."
gosub *face2
name $name
>Your sperm... delicious.\
name ""
>The proof of my defeat starts to get absorbed by the Slug's membrance...\
cspl 690,699
goto *name_h



*name_h3

mov %ikigoe,3:gosub *ikigoe
name $name
>Oh... too quick.\
name ""
gosub *syasei1
lsp 693,":a;chara\name_bk03.bmp",183,0
gosub *syasei2
>With the Slug only climbing onto me, I'm unable to resist any longer.@
>My semen shoots out all over the Slug's membrane...\
mov %viclose,1:gosub *lose
mov %2502,%2502+1:if %2502=1 mov %count_koenemy,%count_koenemy+1
if %2502>%count_most mov %count_most,%2502:mov $count_mostname,$name
count 15,1
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka, unable to resist the Slug climbing on top of him, ejaculates."
mov $bad2," From then on, Luka spent the rest of his life as the Slug's mate."
name $name
>...You weren't able to resist it?@
>Well, you'll still get to enjoy my sticky hell...\
name ""
>The proof of my defeat starts to get absorbed by the Slug's membrance...\
name $name
>Your semen... delicious.\
name ""
cspl 690,699
goto *name_h



*name_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\name_bk03.bmp",183,0
gosub *syasei2
>With the slug raping me, I'm unable to resist the pleasure any longer.\
>My semen shoots out all over the Slug's membrane...\
mov %viclose,1:gosub *lose
mov %2502,%2502+1:if %2502=1 mov %count_koenemy,%count_koenemy+1
if %2502>%count_most mov %count_most,%2502:mov $count_mostname,$name
count 15,1
mov $bad1," Raped by the Slug, Luka is unable to resist the pleasure."
mov $bad2," From then on, Luka spent the rest of his life as the Slug's mate."
name $name
>Your semen... delicious.\
name ""
cspl 690,699
>The proof of my defeat starts to get absorbed by the Slug's membrance...\
goto *name_h



*name_h

if %2502=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name $name
>Hey... don't you want to do something even better?\
name ""
>The Slug girl whispered into my ear as I lay on the ground in defeat.\
name $name
>Mate with me...@
>Just stick it in this hole right here...\
name ""
>The Slug slowly crawls over my body, and opens up a hole in her membrane.\
name $name
>Once you put your dick in here, you won't need to think about anything else...@
>The only thing you need to do is give me your semen, over and over...\
name ""
name "Luka"
>Ahh... uuu....\
name ""
>Though the hole looked similar to a woman's, it had mucus dripping out of it.\
>That sticky, stretchy mucus... what is it going to feel like...\
name $name
>Fufu... do you want to put it in?@
>Mate with me, so I can become pregnant...\
name ""
dwave 1,"se\ero_name2.ogg"
>The mucus covered hole starts to wriggle, as if inviting me.\
name "Luka"
>Auu....\
name ""
>The excitement and horror mixes in me, giving me conflicting feelings...\
name $name
>If you won't put it in yourself... I'll do it by force.@
>You don't have the power to resist me anymore, after all.\
name ""
name "Luka"
>St... stop!\
name ""
mov %hseanwave,1:hseanwave
cspl 690,699
lsp 700,":c;chara\name_h01.bmp",0,0:print 10,1500
>The Slug's sticky body leans into me, wrapping me in her viscous membrane.\
name "Luka"
>Ahhhh!\
name ""
>My penis is sucked into the surprisingly warm, mucus filled hole.\
name $name
>I'll melt your clothes...@
>You want to feel me with your bare skin, don't you?\
name ""
>The mucus that was covering my body starts to melt off my clothes.@
>I can feel the sticky mucus covering my body all over with my bare skin...\
name "Luka"
>Fuuaaa!\
name ""
>Covered by the Slug, I let loose a pleasure filled sigh.@> I can feel my penis get even harder inside the Slug.\
name $name
>This is how a Slug mates...@
>We wrap up the male, so they can't move...@
>And then violate them!\
name ""
name "Luka"
>Auuu...\
name ""
>My dick is stuck in the mucus filled hole that the Slug showed me before...@
>I'm unable to focus on anything but the sticky feeling filling my member...\
name $name
>Don't let it out yet...@>I want it in my deepest part...\
name ""
name "Luka"
>Ugh! Uuu....\
name ""
mov %hseanwave,4:hseanwave
>The Slug moves her waist, forcing me even deeper into her.\
lsp 700,":c;chara\name_h02.bmp",0,0:print 10,500
>Her rubbery walls pull my dick deeper and deeper into her hole...\
name "Luka"
>Ahhhg!\
name ""
>Even deeper inside of her, it felt surprisingly slippery.@
>The entrance was sticky, but the inside was slippery... the alternating textures caused ecstasy to fill my body with every movement.\
>With such amazing pleasure like this, it felt like I was in heaven.\
name "Luka"
>Uhhgg... I... I can't take it anymore!@
>I'm going to come!\
name ""
name $name
>Already coming?@>I thought you would last longer...\
name ""
>The Slug starts to quickly move her body, causing intense stimulation from the sticky mucus moving back and forth.\
name "Luka"
>Ahhhhhh!@
>I... if you move like that!\
name ""
name $name
>Let it out just like that...@
>Give me your semen... so I can have your children...\
name ""
>Mating with a Slug...@
>The immoral feeling filled me with even more sick pleasure.\
>Being forcefully raped like this dealt a critical blow to my male pride.\
name "Luka"
>C...coming!@>Ahhhhh!\
name ""
gosub *syasei1
lsp 700,":c;chara\name_h03.bmp",0,0
gosub *syasei2
>I shoot my semen inside the soft walls of the Slug's hole.@
>I'm being raped by a Slug... but I still orgasmed in her...\
name $name
>Haha, I can feel them inside me...@> Your energetic little children...\
name ""
name "Luka"
>No... I let it out...@
>Even though I'm a human, I just mated with a Slug...\
name ""
>Breaking one of the strictest taboos of humanity, I was filled with a sickly pleasure.\
>I don't think I can escape from this pleasure...@> If I just accept that, then I can just enjoy this... right?\
name $name
>Mating with me... how was it?@
>Do you want even more...?\
>Over and over again...@
>I'll have lots of your children.\
name ""
name "Luka"
>Auu...\
name ""
name $name
>More... more...@>Give me more of your semen...\
name ""
name "Luka"
>Ahh!@
>Auu...\
name ""
mov %hseanwave,8:hseanwave
>The slippery interior of the Slug starts to rub against my penis, bringing me to the height of ecstasy.\
name "Luka"
>Ahh.. inside... mov..ing...@
>If you do that... I... come again...\
name ""
name $name
>Come as much as you want...@
>Give me more of your children...\
name ""
>Her slimy mucus filled hole wrapped around my dick starts to squirm around.\
name "Luka"
>Am... amazing!@
>Too... too good!\
name ""
gosub *syasei1
lsp 700,":c;chara\name_h04.bmp",0,0
gosub *syasei2
>I quickly ejaculate a third time...\
name $name
>You let out a lot...@> But I still want more...\
name ""
name "Luka"
>Haa....\
name ""
>My dick is continually squeezed inside of the Slug, without being given a moment to rest.\
>I've completely surrendered to mating with the Slug...\
name $name
>You'll be my mate...@
>I won't let you go...\
name ""
name "Luka"
>Faaaa!\
name ""
gosub *syasei1:gosub *syasei2
>While coming a fourth time, my body writhes in pleasure.@
>From now on, I'll keep giving this Slug my semen...\
name $name
>More... more...\
name ""
name "Luka"
>Ahhhh!\
name ""
gosub *syasei1:gosub *syasei2
gosub *anten
mov %hseanwave,0:hseanwave
>My adventure ends here...@
>I'll live out the rest of my life as the Slug's mate...\
>It might not be so bad...\
>.........\
goto *badend



*mdg_start

mov $name,"Mandragora"
mov $name2,"Mandragora"
mov $lavel,"mdg"
mov $tatie1,"mdg_st03"
mov $tatie2,"mdg_st02"
mov $tatie3,"mdg_st03"
mov $haikei,"bg011"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,40
if %nanido=2 mov %max_enemylife,45
if %nanido=3 mov %max_enemylife,45
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,1
gosub *maxmp:mov %mp,0
gosub *syutugen
mov $half_s1,"Does it feel good?"
mov $half_s2,"I'll let you come just like that..."
mov $kiki_s1,"Are you at your limit?"
mov $kiki_s2,"Let it out already!"
mov %end_n,1
mov %zmonster_x,-300
lsp 598,":a;system\face_02.bmp",34,534:print 10,500
name $name
>What the hell are you doing!@
>I was finally asleep, too!\
name ""
name "Luka"
>I'm really sorry...@
>...Eh? I can't move my body... what... is this...?\
name ""
>After falling backwards on my butt, I'm unable to move my body at all.\
>I had no power left in my body to move even a single muscle.\
mov $tatie1,"mdg_st01"
lsp 700,":a;chara\mdg_st01.bmp",0,0:print 10,500
name $name
>That's because you heard my scream.@
>It can even kill people with weak hearts.\
name ""
>The Mandragora explains, while staring at me paralyzed on the ground.\
name $name
>Well, I'll go back to sleep now...@
>But I'll be able to sleep longer if I have some nourishment.\
name ""
name "Luka"
>By nourishment... you don't mean...\
name ""
gosub *face2
name $name
>Of course, your semen.@
>I'll suck plenty out of you, so get ready.\
name ""
name "Luka"
>N... no way!\
name ""
gosub *face1
mov %sinkou,1
goto *common_main



*mdg_v

gosub *face3
name $name
>Fine, whatever!@
>I'll go sleep somewhere else!\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,1000
>The Mandragora dives back into the ground...\
mov %viclose,2:gosub *victory
mov %getexp,15:gosub *lvup
mov %2203,1
goto *sean0040c



*mdg_kousan

gosub *kousan_syori
>Luka surrenders to the promise of pleasure, and stops resisting!\
gosub *face2
goto *mdg_a



*mdg_main

notif %sinkou=5 mov %stopcmd3,1
if %sinkou=5 mov %stopcmd3,0
notif %sinkou=5 mov %stopcmd7,1
if %sinkou=5 mov %stopcmd7,0
gosub *cmd_main
if %cmd1=11 && %nanido=0 goto *common_attack
if %cmd1=11 && %sinkou=4 && %hanyo1=0 goto *mdg_mogaku2
if %cmd1=11 && %sinkou=5 goto *common_attack
if %cmd1=11 goto *mdg_mogaku1
if %cmd1=13 goto *common_bougyo
if %cmd1=14 && %sinkou=5 goto *common_nasugamama
if %cmd1=14 mov %hanyo1,1:goto *mdg_nasugamama
if %cmd1=15 goto *mdg_kousan
if %cmd1=16 goto *mdg_onedari
if %cmd1=17 goto *common_skill
goto *mdg_main



*mdg_mogaku1

mov %before_action,7
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Damn it...!"
if %ransu=2 mov $sel1,"Urghh...!"
if %ransu=3 mov $sel1,"Kuu... stop it!"
name "Luka"
eng $sel1:$sel6\
name ""
>Luka attacks!
gosub *mp_kaihuku:gosub *mp
>However, Luka's body is paralyzed, and doesn't move!\
goto *mdg_a



*mdg_mogaku2

mov %before_action,8
name "Luka"
>Uuuoooo!\
name ""
mov %status,0:gosub *status_print
>Luka broke free from his paralysis!\
>Luka attacks!
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\slash.ogg"
mov %abairitu,100+%mylv
gosub *enemylife
gosub *face3
name $name
>Kyaa!@
>You don't know when to give up, do you?\
name ""
if %nanido<2 goto *mdg_v
name "Luka"
>Ha... Ha...@>I can finally move my body again!\
name ""
mov %damage,20
mov %mylife,%mylife+%damage
if %mylife>%max_mylife mov %mylife,%max_mylife
mov %gage,%mylife*100/%max_mylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 560,":a;system\gager"+$gagenum+".bmp",114,556
gosub *hp
print 10,500
>Breaking free from the paralysis, I feel renewed energy fill me as I pick up my sword.@
>Now it's time to fight back!\
gosub *face1
mov %sinkou,5
goto *common_main



*mdg_nasugamama

mov %before_action,52
>Luka remains motionless, not bothering to resist.\
goto *mdg_a



*mdg_a

if %sinkou=1 && %before_action=7 gosub *mdg_b1:goto *common_main
if %sinkou=1 && %before_action=52 gosub *mdg_b5:goto *common_main
if %sinkou=1 && %before_action=53 gosub *mdg_b5:goto *common_main
if %sinkou=2 gosub *mdg_b2:goto *common_main
if %sinkou=3 gosub *mdg_b3:goto *common_main
if %sinkou=4 gosub *mdg_b4:goto *common_main
rnd2 %ransu,1,3
if %ransu=1 gosub *mdg_a1:goto *common_main
if %ransu=2 gosub *mdg_a2:goto *common_main
if %ransu=3 gosub *mdg_a3:goto *common_main
skip -4



*mdg_a1

add %stack,1
skillcount1 3181
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Let me suck you!"
if %ransu=2 mov $sel1,"Let it all out in my mouth..."
if %ransu=3 mov $sel1,"*Slurp* *Slurp* I'll suck it all out..."
name $name
eng $sel1:$sel6\
name ""
skillname "Fellatio"
dwave 1,"se\ero_buchu2.ogg"
lsp 690,":a;chara\mdg_ct11.bmp",0,0:print 10,500
>The Mandragora sucks on Luka's penis!
if %nanido<2 damage 5,6
if %nanido=2 damage 7,9
if %nanido=3 damage 13,16
skillname ""
if %mylife=0 sub %stack,1:return *mdg_h1
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*mdg_a2

add %stack,1
skillcount1 3182
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Shoot out your semen all over my chest..."
if %ransu=2 mov $sel1,"How long can you resist?"
if %ransu=3 mov $sel1,"Doesn't the softness feel amazing?"
name $name
eng $sel1:$sel6\
name ""
skillname "Tit Fuck"
dwave 1,"se\ero_buchu2.ogg"
lsp 690,":a;chara\mdg_ct21.bmp",0,0:print 10,500
>The Mandragora crushes Luka's penis between her chest!
if %nanido<2 damage 5,6
if %nanido=2 damage 7,9
if %nanido=3 damage 13,16
skillname ""
if %mylife=0 sub %stack,1:return *mdg_h2
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*mdg_a3

add %stack,1
skillcount1 3195
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll let you come with my hair!"
if %ransu=2 mov $sel1,"Cover my hair with your semen..."
if %ransu=3 mov $sel1,"I can make my hair do whatever I want..."
name $name
eng $sel1:$sel6\
name ""
skillname "Monster Hair"
dwave 1,"se\umaru.ogg"
>The Mandragora's hair coils around Luka's penis, massaging it all over!
if %nanido<2 damage 4,5
if %nanido=2 damage 6,7
if %nanido=3 damage 12,15
skillname ""
if %mylife=0 sub %stack,1:return *mdg_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*mdg_b1

add %stack,1
name $name
>Oh, are you trying to resist?@
>I'll just have to lick you all over, then.\
name ""
skillcount1 3181
skillname "Fellatio"
dwave 1,"se\ero_buchu2.ogg"
>The Mandragora buries her face in Luka's groin!\
>Luka's penis is licked by the Mandragora!
damage 5,5
skillname ""
name "Luka"
>A... ahh....\
name ""
name $name
>Haha, what a cute voice.@
>Let me do something even better, then.\
name ""
name "Luka"
>Eh...?\
>Ahhhhh!\
name ""
skillcount1 3181
skillname "Fellatio"
dwave 1,"se\ero_buchu2.ogg"
lsp 690,":a;chara\mdg_ct11.bmp",0,0:print 10,500
>The Mandragora's tongue wraps around Luka's penis!
damage 5,5
skillname ""
if %mylife=0 sub %stack,1:return *mdg_h1
name $name
name ""
name "Luka"
>Ahii... Ahhh!\
name ""
skillcount1 3181
skillname "Fellatio"
dwave 1,"se\ero_buchu2.ogg"
>The Mandragora starts to lick Luka even faster!
damage 5,5
skillname ""
if %mylife=0 sub %stack,1:return *mdg_h1
mov %sinkou,2
sub %stack,1
return



*mdg_b2

add %stack,1
name $name
notif %cmd1=11 skip 4
>Arara? Is it really so bad...?\
>Oh well, I'll just have to make you come like that...\
skip 3
>Hahaha... it looks like your dick can't resist my licking...@
>Just sit back and let me send you to heaven...\
name ""
skillcount1 3181
skillname "Fellatio"
dwave 1,"se\ero_buchu2.ogg"
>The Mandragora's slimy tongue wraps around Luka's penis, licking it all over!
damage 5,5
skillname ""
skillcount1 3181
skillname "Fellatio"
dwave 1,"se\ero_buchu2.ogg"
>The Mandragora alternates between licking and squeezing Luka with her tongue!
damage 5,5
skillname ""
if %mylife=0 sub %stack,1:return *mdg_h1
name "Luka"
>Ahiii!\
name ""
name $name
>Haha just a little boy... how weak.@
>Ah! A little just leaked out from the tip.\
>Let me take another lick...\
name ""
skillcount1 3181
skillname "Fellatio"
dwave 1,"se\ero_buchu2.ogg"
>The Mandragora flicks the tip of Luka's penis with her tongue!
damage 5,5
skillname ""
if %mylife=0 sub %stack,1:return *mdg_h1
name "Luka"
>Fuaaa..@
>No... no more...\
name ""
>If she keeps licking me like that, I won't be able to hold out...@
>It feels like I'm melting...\
mov %sinkou,3
sub %stack,1
return



*mdg_b3

add %stack,1
name $name
notif %cmd1=11 skip 4
>Oh? Still able to resist?@
>Well then... I'll force you to surrender with this technique!\
skip 3
>Fufu, how cute... do you love my tongue that much?@
>Then how's this!?\
name ""
skillcount1 3181
skillname "Fellatio"
dwave 1,"se\ero_buchu2.ogg"
>The Mandragora's tongue reaches all the way to the base of Luka's penis, squeezing him all over!
damage 7,7
skillname ""
skillcount1 3181
skillname "Fellatio"
dwave 1,"se\ero_buchu2.ogg"
>Luka's mind starts to go blank as her tongue squeezes him!
damage 8,8
skillname ""
if %mylife=0 sub %stack,1:return *mdg_h1
name "Luka"
>Ah! Ahhhhhhh!\
name ""
>Unable to resist her tongue, my body writhes clumsily around.@
>Each lick seems like it's chasing my senses further away...\
>The pressure rises in my penis, wanting to come out...@
>At this rate, I don't think I can hold out...\
mov %sinkou,4
sub %stack,1
return



*mdg_b4

add %stack,1
notif %cmd1=11 skip 6
name $name
>Hahaha, how pathetic...@
>Ejaculate just like that... trying to resist as hard as you can!\
>I'll force you to come!\
skip 5
>Fufu... did you give up?\
>It doesn't look like you can resist any more...@
>I'll make you come now...\
>You'll understand soon...@>Just how pathetic you are!\
name ""
skillcount1 3181
skillname "Fellatio"
dwave 1,"se\ero_buchu2.ogg"
>The Mandragora's tongue coils around Luka's penis, squeezing it all over from the tip to the base!
damage 5,5
skillname ""
sub %stack,1
return *mdg_h1



*mdg_b5

add %stack,1
mov %turn,%turn+1
name $name
>You're a good boy... just sit back and enjoy.\
name ""
skillcount1 3182
skillname "Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>The Mandragora takes off Luka's pants, and presses her soft breasts against his groin!
damage 5,5
skillname ""
name "Luka"
>Auu...!\
name ""
name $name
>Fufu... I'll wring your dick between my breasts!\
name ""
skillcount1 3182
skillname "Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
lsp 690,":a;chara\mdg_ct21.bmp",0,0:print 10,500
>Luka's penis is sandwiched between the Mandragora's soft breasts!
damage 5,5
skillname ""
if %mylife=0 sub %stack,1:return *mdg_h2
name "Luka"
>Aaa! This...\
name ""
name $name
>Doesn't it feel amazing?@
>My breasts are the best, no?\
name ""
skillcount1 3182
skillname "Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>The soft pressure on Luka's dick fills him with a sweet blow of pleasure!
damage 5,5
skillname ""
if %mylife=0 sub %stack,1:return *mdg_h2
name "Luka"
>Fuaa... amazing...\
name ""
name $name
>Fufu... you look so happy.@
>Little boys really like breasts, huh?\
name ""
name "Luka"
>Aaahhh!\
name ""
name $name
>Haha, I haven't even moved yet and you're already feeling so good.@
>Well then, let me play with you slowly...\
name ""
skillcount1 3182
skillname "Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>The Mandragora puts her hands on her breasts, and pushes them together!\
>Luka's penis is crushed between her breasts!
damage 5,5
skillname ""
skillcount1 3182
skillname "Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>Massaging Luka's dick by pushing her breasts in and out, Luka is attacked by pleasure!
damage 5,5
skillname ""
if %mylife=0 sub %stack,1:return *mdg_h2
name "Luka"
>Aaaaaa!\
name ""
name $name
>Hahaha... I'll make it feel even better!@
>How's this?\
name ""
skillcount1 3182
skillname "Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>The Mandragora starts to shake her chest back and forth!\
>The movement causes a vibration all over Luka's penis!
damage 6,6
if %mylife=0 sub %stack,1:return *mdg_h2
skillname ""
name "Luka"
>Fuaa!\
name ""
name $name
>Haha, it looks like you can't hold out...@
>You're already leaking some out...\
name ""
skillcount1 3182
skillname "Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>Luka's penis is crushed between the Mandragora's breasts, as the vibration and pressure mix together!
damage 7,7
if %mylife=0 sub %stack,1:return *mdg_h2
skillname ""
name "Luka"
>Aauuu!\
name ""
name $name
>Fufu... are you already going to come?@
>How much more can you stand?\
name ""
skillcount1 3182
skillname "Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>The Mandragora continues to move her breasts up and down!
damage 7,7
if %mylife=0 sub %stack,1:return *mdg_h2
skillname ""
name "Luka"
>Ahhh! Too good!\
name ""
name $name
>Fufu... alright, it's time to make you come.\
name ""
name "Luka"
>Aaaaa!\
name $name
>It doesn't look like you mind...@> I'll send you to heaven!\
name ""
skillcount1 3182
skillname "Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>The Mandragora alternates moving her left and right breast up and down!
damage 7,7
skillname ""
sub %stack,1
return *mdg_h2



*mdg_onedari

mov $list1,"Fellatio"
if %3181>0 mov %list_num1,1
mov $list2,"Tit Fuck"
if %3182>0 mov %list_num2,1
mov $list3,"Monster Hair"
if %3195>0 mov %list_num3,1
gosub *cmd_onedari
if %cmd1=11 goto *mdg_onedari1
if %cmd1=12 goto *mdg_onedari2
if %cmd1=13 goto *mdg_onedari3
if %cmd1=-1 goto *mdg_main
goto *mdg_onedari



*mdg_onedari1

gosub *onedari_syori_k
name $name
>Fufu... you want me to suck on your dick?@
>Alright, I'll suck everything out!\
name ""
gosub *mdg_a1
skip -1



*mdg_onedari2

gosub *onedari_syori_k
name $name
>Haha, you want it between my chest?@
>Alright, I'll squeeze everything out with my breasts...\
name ""
gosub *mdg_a2
skip -1



*mdg_onedari3

gosub *onedari_syori_k
name $name
>You want to be milked by my hair...?@
>You're pretty strange, you know.\
name ""
gosub *mdg_a3
skip -1



*mdg_h1

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\mdg_ct12.bmp",0,0
lsp 692,":a;chara\mdg_bk02.bmp",0,0
gosub *syasei2
>Luka ejaculates, shooting semen all over the Mandragora's mouth!\
mov %viclose,1:gosub *lose
mov %2503,%2503+1:if %2503=1 mov %count_koenemy,%count_koenemy+1
if %2503>%count_most mov %count_most,%2503:mov $count_mostname,$name
count 4,3
mov $bad1," Luka succumbed to the Mandragora's fellatio."
mov $bad2," He was caught by the Mandragora, and forced to feed her with his semen until death..."
goto *mdg_ha



*mdg_h2

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\mdg_ct22.bmp",0,0
lsp 693,":a;chara\mdg_bk03.bmp",0,0
gosub *syasei2
lsp 690,":a;chara\mdg_ct23.bmp",0,0:print 10,500
>Luka is unable to resist any longer, and ejaculates on the Mandragora's chest!\
>The semen spreads all over her breasts, up to her face.\
mov %viclose,1:gosub *lose
mov %2503,%2503+1:if %2503=1 mov %count_koenemy,%count_koenemy+1
if %2503>%count_most mov %count_most,%2503:mov $count_mostname,$name
count 7,3
mov $bad1,"Luka was defeated by the Mandragora's titty fuck."
mov $bad2," He was caught by the Mandragora, and forced to feed her with his semen until death..."
goto *mdg_hb



*mdg_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\mdg_bk05.bmp",0,0
gosub *syasei2
>Being massaged by her hair, Luka ejaculates all over it!@
>The sticky semen mixes in with the Mandragora's brown hair.\
mov %2503,%2503+1:if %2503=1 mov %count_koenemy,%count_koenemy+1
if %2503>%count_most mov %count_most,%2503:mov $count_mostname,$name
count 22,3
mov $bad1," Luka was milked by the Mandragora's hair."
mov $bad2," He was caught by the Mandragora, and forced to feed her with his semen until death..."
mov %viclose,1:gosub *lose
goto *mdg_hb



*mdg_ha

mov $end_go,"sean0040a"
if %2801=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2801,1
lsp 700,":a;chara\mdg_st01.bmp",0,0:print 10,500
name $name
>Fufu... you came! You came!@
>So much sticky semen...\
>It looks like I caught it all...\
name ""
mov %hseanvoice,1:hseanvoice
>The Mandragora starts to lick the semen off her mouth.\
name "Luka"
>Faaaa...\
name ""
>I couldn't do anything but surrender to her...\
>After she finishes licking everything off her mouth, she starts to lick the rest off my dick.\
>She then sticks her tongue into my urethra and sucks out the last of the semen.\
name "Luka"
>Ah...@
>Faaa!\
name ""
>She licked up every last drop...\
>After licking her lips, she sucks in my penis again!\
name "Luka"
>Ahh!@> Aaahhhh!\
name ""
name $name
>Play time is over.@
>I'll suck out all of your semen now...\
name ""
name "Luka"
>Haaaa...aaaahh!\
name ""
>My body shivers as she sucks on my dick, still sensitive after ejaculating.\
>The Mandragora closes her mouth, increasing the force she sucks with.\
>While using her tongue to lick the tip of my penis in her mouth, she moves back and forth in a piston movement.\
name $name
>I'll suck everything out of you...@
>When you can't take it anymore, just let it all out.\
name ""
name "Luka"
>N...no! Ahh....!\
name ""
>My body bends backwards with the intense stimulation from the piston movement in her mouth.\
>Inside her mouth, she continues to lick my dick with her tongue.@
>The combined sensations from the tongue and movement were too much for me to bear.\
name "Luka"
>Ahh...@
>I'm go... going to come!\
name ""
name $name
>A second time already?@
>Haha, you're a quick one.\
name ""
>When the Mandragora spoke, the additional movement intensified the stimulation.\
>Her lips, tongue, and movement all at the same time brought me to the height of ecstasy.\
name "Luka"
>Ahh... ahhh!\
name ""
name $name
>Now... the last spurt!@
>I'll make you come with this!\
name ""
mov %hseanvoice,2:hseanvoice
>The movement became even faster, relentlessly attacking me.\
>The intense stimulation caused my head to go white.\
name "Luka"
>Auu...@> Ahh...ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\mdg_st02.bmp",0,0
lsp 690,":a;chara\mdg_ct13.bmp",0,0
gosub *syasei2
>As I come a third time, the Mandragora sucks out my semen without mercy, not losing a single drop.\
name "Luka"
>Hau...@> Ahhh!\
name ""
>Still sensitive from yet a third ejaculation, she wrings the semen out of me without stopping.\
>My body writhes with the maddening pleasure coming from my groin.\
name $name
>Haha... how unsightly...@
>But I won't let up at all.\
>Until you're empty, I'll suck everything out.\
name ""
name "Luka"
>Ahii.... ahhhh!\
name ""
>Even after ejaculating, the intense vacuum that she sucks me with brings me to another climax.\
gosub *syasei1:gosub *syasei2
name $name
>Come more... more... more...\
name ""
name "Luka"
>Fuu... please... stop...\
name ""
gosub *syasei1:gosub *syasei2
>Again and again, I'm forced to ejaculate into her voracious mouth...\
>Unconsciously, my waist pushes up into her mouth.@
>The Mandragora continues to suck on me without mercy...\
name $name
>Like that...@> Let out more...\
name ""
name "Luka"
>No... please...@>...stop...\
name ""
gosub *syasei1:gosub *syasei2
>Paralyzed by the pleasure, I beg for her to stop.@
>...But she ignores me, and continues to suck on me.\
>I ejaculate over and over again...@
mov %hseanvoice,0:hseanvoice
csp 690:print 10,500
>After coming too many times to count, the Mandragora lets go of my penis from her mouth, as I border on fainting.\
name $name
>Hahaha... I'm full of tasty sperm.\
name ""
>The mouth that sucked out all of my semen smiles, with a satisfied sigh.\
name $name
>Hey... you.@>I like your semen.\
>Dive down underground with me.\
name ""
name "Luka"
>Eh...?@> Uwaa!\
name ""
eng "With the Mandragora holding my body, she dives deep underground!":$sel6/
dwave 1,"se\umaru2.ogg"
cspl 690,699
bg black,10,1500
\
>I'm buried deep underground with the Mandragora...\
name "Luka"
>Wh... what...?\
name ""
lsp 700,":a;chara\mdg_st01.bmp",0,0:print 10,500
name $name
>Don't worry, you can breathe even down this deep.\
>Well, let's stay down here for about ten years or so...@
>I'll just suck on you for some nutrition while I sleep.\
name ""
name "Luka"
>N...no! I'll die of hunger down here...\
name ""
name $name
>Eat my leaves, they're nutritious.@> You'll get enough food and water through them.\
name ""
name "Luka"
>But...\
name ""
name $name
>Ahh geez. I beat you.@>No complaining.\
>You're just my food now, after all.@
mov %hseanvoice,1:hseanvoice
lsp 690,":a;chara\mdg_ct11.bmp",0,0:print 10,500
>Mmm.\
name ""
name "Luka"
>Haaa!\
name ""
>The Mandragora puts my penis back in her mouth, resuming her sucking.\
name $name
>Alright then, good night! @
>I'll wake up and play with you every so often.\
name ""
name "Luka"
>W... wait!\
name ""
lsp 700,":a;chara\mdg_st04.bmp",0,0:print 10,500
name $name
>Zzzzzzzzzz...\
name ""
>Unbelievably, the Mandragora falls asleep with my dick in her mouth.@> ...And still sucking on it as if she was awake!\
name "Luka"
>No... no way!@>Faaa!\
name ""
gosub *syasei1
lsp 692,":a;chara\mdg_bk02.bmp",0,0
lsp 690,":a;chara\mdg_ct12.bmp",0,0
gosub *syasei2
>Unable to fight against the pleasure, I come in her mouth.@
>Even while she sleeps, I'm still giving her nourishment...\
name "Luka"
>No... please... someone... help!@> Faaaa!\
name ""
name $name
>Zzzzzzzzzz...\
name ""
>With nobody to hear my screams, the Mandragora continues to sleep...@
>Unable to move, and stuck in her mouth, I continue to feed her...\
gosub *anten
mov %hseanvoice,0:hseanvoice
>............\
goto *badend



*mdg_hb

mov $end_go,"sean0040a"
if %2802=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2802,1
lsp 700,":a;chara\mdg_st01.bmp",0,0:print 10,1500
name $name
>Fufu... you let it out, you let it out! So much sticky cum...\
>It seems like I caught it all...\
name ""
>The Mandragora starts to lick all of the semen off her body.\
csp 690:print 10,500
>Suddenly, she leans her body onto mine!\
name $name
>Fufu... you can't fight back anymore, can you?@
>Then I'll be sure to violate you plenty...\
name ""
name "Luka"
>Aa... aaaaah!\
name ""
>Even though she's a monster, I couldn't stop her from getting on top of me...\
>I can't do anything but accept what she does...\
name $name
>Well then.... time to eat!\
name ""
mov %hseanwave,2:hseanwave
lsp 700,":a;chara\mdg_st02.bmp",0,0
lsp 690,":a;chara\mdg_ct31.bmp",0,0:print 10,500
>With a popping noise... my dick sinks into the Mandragora!\
name "Luka"
>Aa... ahhh....\
name ""
>It was surprisingly warm inside of her.@
>The soft walls of her hole also had tiny bristles that rubbed against me.\
>It's a strange feeling, bringing intense pleasure that I had never felt before.\
name $name
>Feels amazing, right?@>Inside of me.\
>Don't underestimate me just because I'm a plant.@
>A Mandragora has a lot more control over her vagina than a human's...\
name ""
name "Luka"
>A... ahhh!\
name ""
>Just as she said, it was obviously different from a human's...@
>Each bristle wriggles independently of each other, rubbing me all over.\
>Just like thousands of soft meat brushes, they rub and pat my dick all over.@
>Unable to focus, I'm flooded by the intense stimulation.\
name "Luka"
>It feels... so amazing...\
name ""
name $name
>Fufu... that's right.@
>I'll move even more inside.\
name ""
name "Luka"
>Haaaa!\
name ""
>The bristles start to move quicker, rubbing me even harder.@
>It's almost as if they have a mind of their own, moving all over.\
>The unique pleasure fills my penis, as my waist unconsciously thrusts forward, seeking more.\
name "Luka"
>Ah... amazing...\
name ""
>Losing any power to resist, I surrender completely to the Mandragora.\
>Soaking in the wriggling bristles, I bathe in the pleasure.@
>Feeling the rising explosion in my waist, the desire to orgasm overpowers all of my reason.\
name "Luka"
>Aahhh... I'm going to come!\
name ""
name $name
>Are you almost at your limit?@>...Then I'll squeeze you even more!\
name ""
>The thousands of bristles start to massage me with increased intensity, torturing me with unbearable pleasure.\
>Giving in to that overpowering ecstasy, my head starts to go white.\
name "Luka"
>Can't hold any... I'm coming!\
name ""
gosub *syasei1
lsp 690,":a;chara\mdg_ct32.bmp",0,0
gosub *syasei2
>Having surrendered to the pleasure, my semen shoots into the Mandragora.\
name $name
>Fufu, you let it out!@
>Your semen... delicious.\
name ""
name "Luka"
>Aaaahhhh...\
name ""
>Even while ejaculating, the bristles continued to massage me all over, maximizing the stimulation I felt.\
name $name
>It felt amazing, right?@>Here, I'll violate you even more...\
>I'll even move my waist, like this...\
name ""
name "Luka"
>Haaa!\
name ""
mov %hseanwave,5:hseanwave
>As she moves her waist, I let out a short yell.@
>Right after ejaculating, the stimulation on me continued to increase.\
name $name
>I'll shake my waist for you, so let out even more...\
name ""
name "Luka"
>Aaaa... haaaa!\
name ""
>As the Mandragora pumps her waist back and forth, a lewd sound sounds out every time our waists hit.\
>With the bristles rubbing all over, and the movement of her waist, my back arches as the pleasure becomes too intense to control my body.\
name "Luka"
>Aaaaaaaahh!\
name ""
name $name
>Amazing, right? Fufu...\
name ""
>While she looks down at my writhing body, she laughs with a condescending look as I climaxed again.\
gosub *syasei1
lsp 690,":a;chara\mdg_ct33.bmp",0,0
gosub *syasei2
name "Luka"
>Aaauuuu...\
name ""
>To the inhuman vagina, I ejaculated a second time...@
>I had lost any hope of ever escaping from this pleasure...\
name $name
>Hahaha... I'm full of such delicious semen.\
name ""
>She rubs her stomach in a satisfied way, then looks back at me.\
name $name
>Hey, you.@>I like your semen.\
>Come underground with me.\
name ""
name "Luka"
>Eh...?@> Uwaa!\
name ""
>With the Mandragora holding my body, she dives deep underground!\
cspl 690,699
mov %hseanwave,0:hseanwave
dwave 1,"se\umaru2.ogg"
bg black,10,1500
>I was buried with the Mandragora...\
name "Luka"
>Wh... what the...?\
name ""
lsp 700,":a;chara\mdg_st01.bmp",0,0:print 10,500
name $name
>Don't worry, you can breath down here.\
>Well, let's stay down here for about ten years or so...@
>I'll just use you for food while I sleep.\
name ""
name "Luka"
>N... no! I'll die of hunger down here...\
name ""
name $name
>Eat my leaves, they're nutritious.@> You'll get enough food and water.\
name ""
name "Luka"
>But...\
name ""
name $name
>Ahh geez. I beat you.@>No complaining.\
>You're just my food now, after all.\
name ""
name "Luka"
>Haaa!\
name ""
mov %hseanwave,5:hseanwave
lsp 690,":a;chara\mdg_ct31.bmp",0,0:print 10,1500
>The bristles in her vagina start to move again, causing the pleasure to build back up.\
>Unable to move, I pant miserably at the sensation.\
name $name
>Well then, goodnight! @
>I'll wake up and play with you every so often.\
name ""
name "Luka"
>Wa... wait!\
name ""
lsp 700,":a;chara\mdg_st04.bmp",0,0:print 10,500
name $name
>Zzzzzzzzzzzzz...\
name ""
>Unbelievably, the Mandragora falls asleep with my dick still in her...@
>... and the bristles continue to move randomly, rubbing my dick all over.\
name "Luka"
>N... no way...@> Faaaa!\
gosub *syasei1
lsp 690,":a;chara\mdg_ct32.bmp",0,0
gosub *syasei2
>Unable to fight against the pleasure, I come inside of her again.@
>Even while she sleeps, I'm giving her nourishment...\
name "Luka"
>No... please... someone... help!@> Faaaa!\
name ""
name $name
>Zzzzzzzzzzzzz...\
name ""
>With nobody to hear my screams, the Mandragora continues to sleep...@
>Unable to move, and stuck in her, I continue to feed her...\
gosub *anten
mov %hseanwave,0:hseanwave
>............\
goto *badend



*granberia1_start

mov $name,"Granberia"
mov $name2,"Granberia"
mov $lavel,"granberia1"
mov $tatie1,"granberia_st41"
mov $tatie2,"granberia_st41"
mov $tatie3,"granberia_st41"
mov $haikei,"bg013"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,24000
if %nanido=2 mov %max_enemylife,36000
if %nanido=3 mov %max_enemylife,48000
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,70
mov %kaihi,100
mov %music,4
gosub *maxmp:mov %mp,1
gosub *syutugen2
mov %end_n,2
mov %zmonster_x,-270
name "Luka"
>Guh...!\
name ""
>Just standing in front of her causes my legs to turn into jelly...\
name $name
>Now... give me your best shot!\
name ""
mov %sinkou,1
goto *common_main



*granberia1_v

mov %2204,1
mov %battle,0
if %zukanon=1 return *zukan_commonkaisou0
goto *sean0045



*granberia1_kousan

name $name
>You challenged me, I won't allow you to surrender.\
name ""
goto *granberia1_main



*granberia1_main

gosub *cmd_main
if %cmd1=11 && %nanido=0 goto *common_attack
if %cmd1=11 && %sinkou=1 goto *granberia1_attack1
if %cmd1=11 && %sinkou=2 goto *granberia1_attack2
if %cmd1=13 goto *granberia1_bougyo
if %cmd1=14 goto *granberia1_nasugamama
if %cmd1=15 goto *granberia1_kousan
if %cmd1=16 goto *granberia1_onedari
if %cmd1=17 goto *granberia1_skill
goto *granberia1_main



*granberia1_attack1

mov %before_action,1
name "Luka"
>Take this!\
name ""
>Luka pulls back his sword, and attacks with all his strength!\
mov %skill_sub,1
gosub *common_attack2
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\miss.ogg"
csp 700:print 10,200
>Granberia vanishes!\
name "Luka"
>Eh...?\
name ""
>In the next moment, something hits my feet, knocking me on my back!\
name "Luka"
>Uwa!\
name ""
dwave 1,"se\down.ogg"
skillname "Trip"
>Luka falls to the ground!
mov %damage_kotei,1
damage 2,3
skillname ""
name "Luka"
>Damn it!\
name ""
>While trying to stand back up...@
>Granberia steps on my groin!\
lsp 700,":a;chara\granberia_st01.bmp",0,0:print 10,500
name $name
>You're too green.\
name ""
name "Luka"
>Auu...\
name ""
>Falling on my ass, I could do nothing but stiffen my body when she stepped on me.\
name $name
>You challenged me when the adults were hiding in cowardice.@
>I can respect that.\
lsp 700,":a;chara\granberia_st04.bmp",0,0:print 10,500
>You're young, so a mistake like that is to be expected.@
>But there won't be a second time.\
name ""
name "Luka"
>........\
name ""
>...I was saved there...@
>After my relief fades, I start to feel angry again.\
>How can I be relieved by being saved by my opponent!\
>Being given pity by your opponent... dying in battle would be better!\
name "Luka"
>I... It's not over yet!\
name ""
>I pick myself up and face Granberia again.\
lsp 700,":a;chara\granberia_st02.bmp",0,0:print 10,500
name $name
>Are you going to ignore my advice?@
>I won't overlook it again.\
name ""
name "Luka"
>...Prepare yourself!\
name ""
>Facing Granberia again, I'm attacked by the intense pressure from before.\
>Challenging someone like this... my level is still way too low.@
>Still, I can't run away at this point!\
lsp 700,":a;chara\granberia_st04.bmp",0,0:print 10,500
name $name
>If you insist...@
>You won't regret this will you, boy?\
name ""
name "Luka"
>...There's no way I will!\
name ""
>I can't give up at this point.@> I pick up my sword.@
>I'll see this through to the end!\
lsp 700,":a;chara\granberia_st41.bmp",0,0:print 10,500
>I can't use a half-assed attack against her...@
>That skill is my only chance...\
mov %sinkou,2
goto *common_main



*granberia1_attack2

>An ordinary attack is pointless.@
>I have to use that...!\
goto *granberia1_main



*granberia1_bougyo

>Luka defends his body!\
name $name
>What the hell are you doing?@
>I said give me your best shot, why are you standing there like an idiot?\
name ""
>As she said, if I just defend then it's like I'm just waiting to be killed.@
>I need to attack!\
goto *common_main



*granberia1_nasugamama

>Luka stands still, not doing anything in particular.\
name $name
>Are you screwing with me?@
>You called out to me, and now you're just standing there?@
>Now, come!\
name ""
goto *common_main



*granberia1_skill

gosub *cmd_skill
if %cmd1=21 goto *granberia1_skill1
if %cmd1=22 goto *granberia1_skill2
if %cmd1=35 goto *skill17
if %cmd1=-1 goto *granberia1_main
goto *granberia1_skill



*granberia1_skill1

mov %before_action,21
name "Luka"
>Uooooo!\
name ""
>I put my entire being behind the attack I learned from Alice.\
>Jumping forward, I imagine the feeling of cutting through her neck.\
>Bring the tip horizontal to her neck.@>Jump forward with my foot.@
>Slice through the neck...\
name $name
>What! This technique...!\
name ""
mov %mp,%mp-2
gosub *mp
skillname "Demon Decapitation"
>Luka uses Demon Decapitation!
dwave 1,"se\karaburi.ogg"
gosub *kaihi
>But Granberia dodges!\
skillname ""
name "Luka"
>No way...\
name ""
>Even my best attack couldn't hit...\
bgm "bgm\kiki2.ogg"
lsp 700,":a;chara\granberia_st12_b.bmp",0,0:print 10,500
name $name
>...Why do you know a monster's technique?\
name ""
name "Luka"
>Eh....?\
name ""
name $name
>Your swordplay is sloppy, and you're still immature.@
>There's no way you thought that up by yourself.\
>I want to know where you learned that move.@
>Who taught it to you?\
name ""
name "Luka"
>..........\
name ""
>I don't want to tell her about Alice...@
>Not because I particularly care about her, but more for my own pride.\
name "Luka"
>Wh... why should I tell someone like you!?\
name ""
lsp 700,":a;chara\granberia_st13_b.bmp",0,0:print 10,500
name $name
>...I think I already know who it is.\
>In fact, I would like to have a match with that person...\
lsp 700,":a;chara\granberia_st12_b.bmp",0,0:print 10,500
>Is that person your master or something?\
name ""
name "Luka"
>That is... I won't say.\
name ""
lsp 700,":a;chara\granberia_st41.bmp",0,0:print 10,500
name $name
>Is that so? Then...\
name ""
skillname "Control"
mov %a_effect1,1
mov %damage_kotei,1
damage 44,46
skillname ""
name "Luka"
>Aguh...\
name ""
lsp 700,":a;chara\granberia_st12_b.bmp",0,0:print 10,500
name $name
>I held back my attack to make sure you didn't die.@
>Well, are you going to talk now?\
name ""
name "Luka"
>U... guh...\
name ""
>Nearing death, my body doesn't move at all.@
>She's way too strong...\
name ""
name "Luka"
>Even with that... I won't say...\
name ""
name $name
>Is that so?@>I don't like using my sword on the weak...@> But...\
lsp 700,":a;chara\granberia_st41.bmp",0,0:print 10,500
name ""
>As Granberia raised her sword...\
goto *granberia1_v



*granberia1_skill2

mov %before_action,41
name "Luka"
>Uuu... uoooo!\
name ""
mov %mp,%mp-2
gosub *mp
skillname "Flail Wildly"
>Letting loose a strange voice, Luka charges forward, swinging his sword around randomly!\
>...This isn't going to work!\
skillname ""
name $name
>What the hell is this?\
name ""
>Swinging my sword at random won't do anything...\
>Granberia grabs my sword arm mid-swing, and easily stops me.\
name $name
>How disappointing.\
name ""
name "Luka"
>Ahhg...\
name ""
>Granberia tightens her grip on my wrist, causing my sword to fall out of my hand.\
if %con_hbgm=0 mov %music,20:bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
name $name
>Well... are you done now?\
name ""
>Granberia sets down her gigantic sword.\
lsp 700,":a;chara\granberia_st12_b.bmp",0,0:print 10,500
>She holds me up by my arms, and starts to put pressure on my back.\
name "Luka"
>Ahhhg!\
name ""
mov %damage_kotei,1
damage 8,8
lsp 700,":a;chara\granberia_st11_b.bmp",0,0:print 10,500
name $name
>Your pathetic behavior stopped my merciful nature temporarily.@
>But I don't want to get your worthless blood on my sword.\
>If you surrender, I'll let you live.@
>Or I can keep breaking you like this.\
name ""
name "Luka"
>A..gahh!@> Ahhhhh!\
name ""
>The pressure increases on me, making it feel like I'm going to break any second.\
>Like a snake tormenting its prey, she continues to torture me.\
mov %damage_kotei,1
damage 8,8
lsp 700,":a;chara\granberia_st13_b.bmp",0,0:print 10,500
name $name
>Come on, give up.@
>Or do you really want me to break you?\
name ""
>Granberia whispers into my ear from behind me, her soft breath tickling my cheek.@
>Her breath was surprisingly sweet...\
name "Luka"
>Ahggg!\
name ""
>Such a beautiful warrior woman is breaking me...\
>Forced against her, I can feel the soft heat coming off her armor.@
>Her scaly skin also surprisingly feels similar to a human's...\
name $name
>I'll keep applying more pressure...@>Do you really want to break?\
name ""
name "Luka"
>Ga...h...!\
name ""
mov %damage_kotei,1
damage 8,8
>Every time Granberia whispers something into my ear, I shake at her sweet breath.\
>I turn my head over my shoulder, and look at her arm.@
>Soft like a human's...\
>Even in such a situation as this, my reaction as a male starts against my will...\
lsp 700,":a;chara\granberia_st11_b.bmp",0,0:print 10,500
name $name
>....?\
name ""
>Granberia's eyebrow raises in slight surprise, noticing my erection.\
name $name
>Getting so close to death, did your desire to procreate come out?@
>...Or are you reacting to my smell?\
name ""
name "Luka"
>Uuuu....\
name ""
>I could only look down in shame.\
name ""
lsp 700,":a;chara\granberia_st13_b.bmp",0,0:print 10,500
name $name
>Fufu... well then, I'll play with you a little.\
name ""
>Suddenly, Granberia loosens her grip on my body...@> and grabs my dick with her right hand!\
name "Luka"
>Ahhg...?!\
name ""
>Feeling that soft, warm feeling suddenly grab me, I instinctively relax.
>I fall down weakly while being held by Granberia.\
name $name
>Just by having me touch you, you got so weak...\
name ""
>Granberia cuts open my pants, exposing me to the air.@
dwave 1,"se\ero_sigoki1.ogg"
lsp 700,":a;chara\granberia_ha1.bmp",0,0:print 10,500
>And grabs my dick with her hand.\
name "Luka"
>Hauu!\
name ""
mov %damage_kotei,1
damage 3,3
if %mylife=0 goto *granberia1_h1
>My body twists at the sudden feeling.@
>Though the back of her hand is covered in hard scales, her palm was softer than a humans.\
>A very soft, pleasant feeling...@
>It's surprisingly warm, too.\
name "Luka"
>Wh... what are you doing...?\
name ""
name $name
>I just said I'd play with you a little.\
name ""
dwave 1,"se\ero_koki2.ogg"
>Granberia, firmly gripping me in her hand, starts to massage me slowly.@
>Every time she squeezes me, my body bounces up.\
name "Luka"
>Hau...uuu....\
name ""
mov %damage_kotei,1
damage 4,4
if %mylife=0 goto *granberia1_h1
name $name
>Already crying out in pleasure...?@
>How disappointing.\
name ""
dwave 1,"se\ero_koki2.ogg"
>Gloating in her superiority, Granberia continues to play with me with her hand.\
>She starts to gradually tighten her hand...@
>Playing with me like a toy, I could do nothing but tremble in pleasure and disgrace.\
>Such a powerful warrior...@
>But such a soft palm...\
name "Luka"
>Auu... uuuu.\
name ""
mov %damage_kotei,1
damage 4,4
if %mylife=0 goto *granberia1_h1
name $name
>Haha, enjoying being humiliated...@
>How pathetic.@
>I'll take my time to fill you with shame.\
name ""
dwave 1,"se\ero_koki1.ogg"
>Suddenly, Granberia lets go of me and adjusts her hand, changing the position.\
>Forming a ring between her index and middle finger, she starts to pump me up and down, with more pressure than before.\
name "Luka"
>Haaa!@>Auuu...!\
name ""
mov %damage_kotei,1
damage 4,4
if %mylife=0 goto *granberia1_h1
>Sweet numbness fills my waist as Granberia rhythmically moves her hand up and down.\
>The pre-come leaking out starts to make a sticky sound come from her hand every time she pumps me.\
name "Luka"
>Haaa.. no more...\
name ""
name $name
>Fu... how pathetic.@>Letting your enemy play with you like this.\
name ""
dwave 1,"se\ero_koki1.ogg"
>Granberia starts pumping me faster, bringing me closer to the edge.\
>I won't be able to resist it at this rate...@
>She's going to force me to come...\
mov %damage_kotei,1
damage 5,5
if %mylife=0 goto *granberia1_h1
name $name
>You can't take it anymore, can you?\
>Just let it out!\
name ""
mov %damage_kotei,1
damage 7,7
goto *granberia1_h1



*granberia1_onedari

name $name
>Did you think I'd listen to anything you asked of me?\
name ""
goto *granberia1_main



*granberia1_h1

name "Luka"
>Ahh...! Co... coming!@>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\granberia_ha2.bmp",0,0
gosub *syasei2
>Finally, I was able to explode into Granberia's hand.\
>My dick explodes with a spurt, pouring semen all over her hand.\
>Every pulse of my penis sprays more white semen over her hand, covering it in cloud of dirty white.\
mov %viclose,1:gosub *lose
mov %2504,%2504+1:if %2504=1 mov %count_koenemy,%count_koenemy+1
if %2504>%count_most mov %count_most,%2504:mov $count_mostname,$name
count 5,7
mov $bad1," Granberia milked Luka, squeezing him until he orgasmed."
mov $bad2," He was captured and made into a plaything at the Monster Lord's castle."
goto *granberia1_h



*granberia1_h

mov $tatie2,"granberia_st13"
if %2504=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %con_hvoice=0 dwave 0,"voice\granberia1_01.ogg"
name $name
>Fu... you finished.
>Shooting your juice all over the inside of my hand... what a shameful boy.\
name ""
dwavestop 0
name "Luka"
>Faaaa!\
name ""
>Even while I'm coming, Granberia doesn't let her hand go.@
>She continues to squeeze and massage me, as if trying to get out every last drop.\
>I spurt a last time in her hand, my body relaxing in my ecstasy.\
if %con_hvoice=0 dwave 0,"voice\granberia1_02.ogg"
name $name
>Exhausted already? I want to rape you more...\
name ""
dwavestop 0
name "Luka"
>Aahh! Stop..!\
name ""
mov %hseanwave,17:hseanwave
>Granberia squeezes my dick that just finished it's climax.\
>Her soft palm starts to mercilessly pump me again, trying to force me to ejaculate again.\
>Against such stimulation, my body starts to shake while leaning against Granberia.\
name "Luka"
>Aaaahh!\
name ""
if %con_hvoice=0 dwave 0,"voice\granberia1_03.ogg"
name $name
>How disgraceful for a man... forced to come by a woman's hand...
>Hoora... spread more of the evidence of your defeat all over my hand...\
name ""
dwavestop 0
name "Luka"
>Aahh! Ahhhh!\
name ""
>With a lewd sound coming out at every pump, Granberia continues to stroke me.\
>I've surrendered to that merciless hand...\
name "Luka"
>C...coming!@
>Faaaaa!\
name ""
gosub *syasei1
lsp 700,":a;chara\granberia_ha3.bmp",0,0
gosub *syasei2
>For a second time, I shoot my semen all over Granberia's hand.@
>Her hand that continues to squeeze me...\
if %con_hvoice=0 dwave 0,"voice\granberia1_04.ogg"
name $name
>Fuu... you let it out again.
>Such a lewd pig of a man.\
name ""
dwavestop 0
>As my cock pulsates in her hand, she squeezes out the last drop from my second orgasm.\
>Even though it's all out, she continues to stroke me...\
name "Luka"
>Haaa!@>No m...ore!\
name ""
>Granberia continues to stroke my still sensitive cock, relentlessly bringing me towards yet another climax.\
>Forced to ejaculate over and over by an enemy milking me...@
>Tears start to come out, as the humiliation at my defeat starts to mix with the pleasure.\
name "Luka"
>Uuu.... guh...\
name ""
if %con_hvoice=0 dwave 0,"voice\granberia1_05.ogg"
name $name
>You finally started crying?
>How miserable... I thought you were a man?\
name ""
dwavestop 0
>Granberia licks my cheek from behind, my skin tingling at the soft sensation of her tongue.\
>At the same time, her right hand forcibly extracts pleasure from my penis...\
if %con_hvoice=0 dwave 0,"voice\granberia1_06.ogg"
name $name
>Hoora... don't resist.
>Let it out again in my hand...\
name ""
dwavestop 0
name "Luka"
>No... going to come!@
>Aaaaahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\granberia_ha4.bmp",0,0
gosub *syasei2
>Climaxing a third time in her soft hand, my body arcs back in overpowering ecstasy.\
if %con_hvoice=0 dwave 0,"voice\granberia1_07.ogg"
name $name
>Fu... so shameful. But I like that innocence.
>I'll bring you back to the Monster Lord's castle and let you be my other companions plaything, too.\
name ""
dwavestop 0
name "Luka"
>Eh...?\
name ""
if %con_hvoice=0 dwave 0,"voice\granberia1_08.ogg"
name $name
>You'll be a tool to satisfy their sexual desires, and to feed them.
>Fufu... are you happy about that?\
name ""
dwavestop 0
name "Luka"
>N... no! I don't want that!@>Aaahh!\
name ""
>My horrified rejection is cut short by Granberia massaging my dick again, the stimulation cutting off my voice.\
name "Luka"
>Uooo...\
name ""
if %con_hvoice=0 dwave 0,"voice\granberia1_09.ogg"
name $name
>For now, I'll wring everything out of you until you faint.\
name ""
dwavestop 0
name "Luka"
>Haaa!@>Aaaaah!\
name ""
gosub *syasei1:gosub *syasei2
>With her rhythmic pumping bringing me to heaven, she continues to stroke me without mercy.\
name "Luka"
>Aaaaa....\
name ""
>My vision starts to go hazy after the repeated ejaculations.@
>As my head starts to go white, I start to fall into an ecstasy filled trance.\
if %con_hvoice=0 dwave 0,"voice\granberia1_10.ogg"
name $name
>Horahora... just faint like that...\
name ""
dwavestop 0
name "Luka"
>Faaaa!\
name ""
gosub *syasei1:gosub *syasei2
gosub *anten
mov %hseanwave,0:hseanwave
>Unable to feel anything but my orgasm, my consciousness starts to fade.\
>Thus, my adventure ended here.@
>From now on, the only thing I have to look forward to is being used as their plaything...\
>.......\
goto *badend



*mimizu_start

mov $name,"Earthworm Girl"
mov $name2,"Earthworm Girl"
mov $lavel,"mimizu"
mov $tatie1,"mimizu_st01"
mov $tatie2,"mimizu_st02"
mov $tatie3,"mimizu_st03"
mov $tatie4,"mimizu_st02"
mov $haikei,"bg019"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,50
if %nanido=2 mov %max_enemylife,75
if %nanido=3 mov %max_enemylife,75
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,90
mov %music,1
gosub *maxmp:mov %mp,0
gosub *syutugen
mov $mogaku_anno1,"...However, Luka can't break free!"
mov $mogaku_anno2,"Luka broke free from her body!"
mov $mogaku_anno3,"...However, Luka can't move with her coiled around him!"
mov $mogaku_sel1,"I won't let you go! "
mov $mogaku_sel2,"How clumsy, Mr. Hero. "
mov $mogaku_sel3,"I'll squeeze you until you're empty. "
mov $mogaku_sel4,"Even if you struggle, I won't let go. "
mov $mogaku_sel5,"Coiled around you, I won't let go... are you frustrated? "
mov $mogaku_dassyutu1,"You got away..."
mov $mogaku_dassyutu2,"I was squeezing you so hard, too..."
mov $half_s1,"I'll rub you with my slimy body..."
mov $half_s2,"Just give up, and let me squeeze you. "
mov $kiki_s1,"Hahaha, how pathetic."
mov $kiki_s2,"With my whole body, I'll make you come..."
mov %end_n,2
mov %zmonster_x,-230
name $name
>Oh? A traveler?@
>Can you let me wring some semen from you?\
name ""
name "Luka"
>No way!@
>Ilias forbids that!\
name ""
>As I pull out the Angel Halo that Alice gave me, I hesitate.@
>So no matter how hard I attack, I won't kill her if I use this...?\
mov %sinkou,1
goto *common_main



*mimizu_v

name "Luka"
>Alright!\
name ""
gosub *face3
name $name
>What... is this! Kyaaa!\
name ""
>As the mortal wound was given to her...@
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>She vanishes!\
mov %viclose,1:gosub *victory
mov %getexp,20:gosub *lvup
mov %2205,1
goto *sean0052



*mimizu_kousan

gosub *kousan_syori
>Luka yields to the promised pleasure, and drops his guard!\
gosub *face2
name $name
>Fufu... how lustful.@
>There's nothing left but to be sucked by me. \
name ""
goto *mimizu_a



*mimizu_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 && %nanido=0 goto *common_attack
if %cmd1=11 && %sinkou=1 goto *mimizu_attack1
if %cmd1=11 && %sinkou=2 goto *mimizu_attack2
if %cmd1=11 && %sinkou=3 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *mimizu_kousan
if %cmd1=16 goto *mimizu_onedari
if %cmd1=17 goto *common_skill
goto *mimizu_main



*mimizu_attack1

gosub *common_attack1
if %enemylife=0 goto *mimizu_v
if %before_action=3 goto *mimizu_a
gosub *face3
name $name
>What the... What is that sword?@
>From my wound... my power is draining...\
name ""
name "Luka"
>It works!?\
name ""
>It seems like what Alice said was true...@
>If I use this, I can stop her without killing her!\
>I have to damage her more!\
gosub *face1
mov %sinkou,2
goto *mimizu_a



*mimizu_attack2

gosub *common_attack1
if %enemylife=0 goto *mimizu_v
if %before_action=3 goto *mimizu_a
gosub *face3
name $name
>What... is this...?@
>My power....\
name ""
name "Luka"
>Alright!\
name ""
>It seems like this really works!@
>I just need to attack the enemy normally, and they'll be sealed instead of dying.\
gosub *face1
mov %sinkou,3
goto *mimizu_a



*mimizu_a

if %kousoku=1 gosub *mimizu_a3:goto *common_main
rnd2 %ransu,1,3
if %ransu<3 gosub *mimizu_a1:goto *common_main
if %ransu=3 && %owaza_count1a>2 gosub *mimizu_a2:goto *common_main
skip -3



*mimizu_a1

add %stack,1
skillcount1 3007
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Get all sticky!"
if %ransu=2 mov $sel1,"Haha, have plenty of slime..."
if %ransu=3 mov $sel1,"Have even more..."
name $name
eng $sel1:$sel6\
name ""
skillname "Sticky Mucus"
dwave 1,"se\ero_slime2.ogg"
>The Earthworm Girl pours slime all over Luka!\
>Luka's groin is covered in sticky slime!
if %nanido<2 damage 3,4
if %nanido=2 damage 4,6
if %nanido=3 damage 5,8
skillname ""
if %mylife=0 sub %stack,1:return *mimizu_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*mimizu_a2

add %stack,1
if %kousan=2 skip 7
name $name
if %first_sel1=1 skip 3
>I'll coil around you and squeeze!\
skip 2
>Haha... tighter... tighter...\
name ""
skillname "Coil"
dwave 1,"se\ero_makituki3.ogg"
>The Earthworm Girl is coiling around Luka!\
>Luka is rolled up in her sticky body!
if %nanido<2 damage 4,5
if %nanido=2 damage 6,7
if %nanido=3 damage 6,8
mov %kousoku,1:gosub *status_print
>The Earthworm Girl is coiled around Luka's body!\
skillname ""
if %mylife=0 sub %stack,1:return *mimizu_h2
if %kousan=2 sub %stack,1:return
name $name
if %first_sel1=1 skip 4
>Fufufu... I caught you. @
>Does my sticky body feel good? \
skip 4
>Fufu... I got you again.@
>Were you unable to forget the sensation from before...?\
>This time, I'll tease you until you lose your mind...\
name ""
mov %first_sel1,1
if %nanido<2 mov %genmogaku,1
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,3
sub %stack,1
return



*mimizu_a3

add %stack,1
skillcount1 3008
>The Earthworm Girl coils around Luka's body!\
if %hanyo1=1 skip 6
if %mylife>%max_mylife/2 skip 5
if %kousan=2 skip 4
rnd2 %ransu,1,3
if %ransu=1 mov %hanyo1,1:sub %stack,1:goto *mimizu_a4
mov %hanyo1,1
rnd2 %ransu,1,10
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You'll never escape...":mov $sel2,"The Earthworm Girl vibrates her entire body!"
if %ransu=2 mov $sel1,"Haha... you're so cute...":mov $sel2,"The Earthworm Girl rubs her slimy body all over Luka!"
if %ransu=3 mov $sel1,"I'll take care of everything for you...":mov $sel2,"Luka's body is rubbed all over!"
if %ransu=4 mov $sel1,"Just lay there and enjoy it...":mov $sel2,"The Earthworm Girl tightens around Luka!"
if %ransu=5 mov $sel1,"I'll make it feel even better, just relax...":mov $sel2,"The Earthworm Girl rubs Luka's penis with her slimy body!"
if %ransu=6 mov $sel1,"Here... how's this?":mov $sel2,"Luka's penis is pressed between the Earthworm Girl's slimy body!"
if %ransu=7 mov $sel1,"Hahaha... you're writhing around!":mov $sel2,"The Earthworm Girl tightens around Luka!"
if %ransu=8 mov $sel1,"I'll take my time playing with you...":mov $sel2,"The Earthworm Girl toys with Luka, massaging him all over!"
if %ransu=9 mov $sel1,"It doesn't look like your dick can stand it much longer...":mov $sel2,"The Earthworm Girl rubs against Luka's penis!"
if %ransu=10 mov $sel1,"Hahaha... how's this?":mov $sel2,"The Earthworm Girl squeezes Luka's dick between her slimy body!"
name $name
eng $sel1:$sel6\
name ""
skillname "Tighten"
dwave 1,"se\ero_makituki2.ogg"
eng $sel2:$sel6
if %nanido<2 damage 4,5
if %nanido=2 damage 6,7
if %nanido=3 damage 7,10
skillname ""
if %mylife=0 sub %stack,1:return *mimizu_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*mimizu_a4

add %stack,1
if %kousan=2 >The Earthworm Girl coils around Luka's body!\
if %kousan=2 skip 5
name $name
>Fufu... shall I wrap your penis up with my tail?\
>When I do, you won't have any choice but to come... Haha!\
name ""
skillcount1 3009
skillname "Sweet Worm"
lsp 700,":a;chara\mimizu_h1.bmp",0,0:print 10,1500
dwave 1,"se\ero_makituki2.ogg"
>The earthworm's tail wraps around Luka's penis!
mov %damage_kotei,1
damage 6,7
mov %kousoku,2:mov %genmogaku,100
skillname ""
if %mylife=0 sub %stack,1:return *mimizu_h3
>Luka is wrapped by the Earthworm Girl, and can't move!\
name $name
>Does my slimy body feel good?@
>When you can't take it anymore, just let it out...\
name ""
sub %stack,1
goto *mimizu_a5



*mimizu_a5

add %stack,1
skillcount1 3009
skillname "Sweet Worm"
dwave 1,"se\ero_makituki2.ogg"
>Luka's penis is stuck on the Earthworm Girl's sticky membrane!\
>She tightens her wrap around him!
mov %damage_kotei,1
damage 6,7
skillname ""
if %mylife=0 sub %stack,1:return *mimizu_h4
>Luka is wrapped by the Earthworm Girl, and can't move!\
name $name
>Fufu... do you feel good?@
>It's already too late to try to escape...\
name ""
skillcount1 3009
skillname "Sweet Worm"
dwave 1,"se\ero_makituki2.ogg"
>The Earthworm Girl continues to massage Luka mercilessly!\
>Every movement causes pleasure to explode in Luka!
mov %damage_kotei,1
damage 6,7
skillname ""
if %mylife=0 sub %stack,1:return *mimizu_h4
>Luka is wrapped by the Earthworm Girl, and can't move!\
name $name
>Haha, you're so pathetic... and you call yourself a Hero?@
>I'll make you come now. \
name ""
skillcount1 3009
skillname "Sweet Worm"
dwave 1,"se\ero_makituki2.ogg"
>With Luka's penis pressed between her tail, the Earthworm Girl tightens around it!
mov %damage_kotei,1
damage 7,8
skillname ""
if %mylife=0 sub %stack,1:return *mimizu_h4
>Luka is wrapped by the Earthworm Girl, and can't move!\
name $name
>Haha, there's no way to resist.@
>I'll just keep playing with you like this!\
name ""
sub %stack,1
goto *mimizu_a5



*mimizu_onedari

mov $list1,"Sticky Mucus"
if %3007>0 mov %list_num1,1
mov $list2,"Tighten"
if %3008>0 mov %list_num2,1
mov $list3,"Sweet Worm"
if %3009>0 mov %list_num3,1
gosub *cmd_onedari
if %cmd1=11 goto *mimizu_onedari1
if %cmd1=12 && %kousoku=0 goto *mimizu_onedari2
if %cmd1=12 && %kousoku=1 goto *mimizu_onedari3
if %cmd1=13 goto *mimizu_onedari4
if %cmd1=-1 goto *mimizu_main
goto *mimizu_onedari



*mimizu_onedari1

gosub *onedari_syori
name $name
>Haha, you want my sticky mucus all over you?@
>Alright, I'll give you plenty!\
name ""
gosub *mimizu_a1
skip -1



*mimizu_onedari2

gosub *onedari_syori
name $name
>You want to be wrapped by me. @
>Alright... I'll coil all over you!\
name ""
gosub *mimizu_a2
name $name
>Haha, does this meet your expectations?@
>I'll give you even more...\
name ""
gosub *mimizu_a3
skip -1



*mimizu_onedari3

gosub *onedari_syori_k
name $name
>Hahaha.@
>Until you come, I'll give you plenty...\
name ""
gosub *mimizu_a3
skip -1



*mimizu_onedari4

gosub *onedari_syori_k
name $name
>Haha... so you want to take my special technique?\
if %kousoku=1 skip 5
>It feels amazing... get ready!\
name ""
gosub *mimizu_a2
name $name
>Move over here, and I'll wrap my tail around your penis as well...\
>This is what you wanted, right?@
>I'll wring you until nothings left...\
name ""
gosub *mimizu_a4



*mimizu_h1

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\mimizu_bk03.bmp",0,0
gosub *syasei2
>Luka shoots semen from his slime covered dick, covering the Earthworm Girl's body!\
mov %viclose,1:gosub *lose
mov %2505,%2505+1:if %2505=1 mov %count_koenemy,%count_koenemy+1
if %2505>%count_most mov %count_most,%2505:mov $count_mostname,$name
count 11,3
mov $bad1," Covered in sticky slime, Luka yielded to the Earthworm Girl"
mov $bad2," Luka lived out the rest of his life as her slave."
gosub *face3
name $name
>Haha.@
>From your sticky dick, you just let it out didn't you?\
gosub *face2
>Your sweet semen... let me have even more!\
name ""
goto *mimizu_h



*mimizu_h2

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\mimizu_bk04.bmp",0,0
gosub *syasei2
>Luka orgasms, shooting semen out from under the Earthworm Girl's body!\
mov %viclose,1:gosub *lose
mov %2505,%2505+1:if %2505=1 mov %count_koenemy,%count_koenemy+1
if %2505>%count_most mov %count_most,%2505:mov $count_mostname,$name
count 16,3
mov $bad1," Coiled in the Earthworm Girl, Luka was unable to endure the pleasure."
mov $bad2," Luka lived out the rest of his life as her slave."
gosub *face2
name $name
>Hahaha, how pathetic.@
>While being squeezed, you let it out?\
>Your sweet semen... let me have even more!\
name ""
goto *mimizu_h



*mimizu_h3

mov %ikigoe,3:gosub *ikigoe
name $name
>Eh...? Wait... not yet...\
name ""
gosub *syasei1
lsp 700,":a;chara\mimizu_h2.bmp",0,0
gosub *syasei2
>Luka's explodes, wrapped in the Earthworm Girl's tail!\
mov %viclose,1:gosub *lose
mov %2505,%2505+1:if %2505=1 mov %count_koenemy,%count_koenemy+1
if %2505>%count_most mov %count_most,%2505:mov $count_mostname,$name
count 16,3
mov %count_bouhatu,%count_bouhatu+1
mov $bad1," Luka orgasms by accident before the Earthworm Girl used Sweet Worm"
mov $bad2," Luka lived out the rest of his life as her slave."
gosub *face2
name $name
>I only coiled around it...@
>But you came anyway...\
>You couldn't hold it for the best part...?\
>Oh well... Let me have more of your sweet semen!\
name ""
goto *mimizu_h



*mimizu_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\mimizu_h2.bmp",0,0
gosub *syasei2
>Stuck in the Earthworm Girl's tail, Luka shoots out his semen all over her.\
mov %viclose,1:gosub *lose
mov %2505,%2505+1:if %2505=1 mov %count_koenemy,%count_koenemy+1
if %2505>%count_most mov %count_most,%2505:mov $count_mostname,$name
count 16,3
mov $bad1," The Earthworm Girl forced Luka to submit with her Sweet Worm technique."
mov $bad2," Luka lived out the rest of his life as her slave."
name $name
>Haha!@>You let out so much.\
>Let me have more of your sweet semen!\
name ""
goto *mimizu_h



*mimizu_h

if %2505=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
dwave 1,"se\ero_pyu2.ogg"
cspl 690,699
lsp 700,":a;chara\mimizu_st11.bmp",0,0:print 10,1500
>A mouth opens up in the earthworm's tail, dripping mucus out of the opening.\
>She starts to suck up all the semen I shot on her, until it was all gone.\
name $name
>Delicious. \
name ""
name "Luka"
>...........\
name ""
>I stare at the scene in front of me quietly.@
>I'm disgusted at myself for starting to feel excited at such a scene.\
name $name
>Your semen is really tasty. @
>I caught some good food. \
name ""
>She stares at me with excited eyes.\
name $name
>Hoho... you have such lewd eyes.@
>Do you want me to service you that bad?\
name ""
name "Luka"
>Eh....?\
name ""
name $name
>I'll suck everything out of you with my tail.\
>It feels amazing...@
>Don't you want to try it?\
name ""
name "Luka"
>...........\
name ""
>Stunned in silence, I slowly nod.\
>I know I shouldn't surrender to a monster like this...@
>But the promise of pleasure is just too strong...\
name $name
>Alright... then I'll suck everything out.@
>I'll shoot you into heaven... then you can shoot it into me. \
name ""
mov %hseanwave,14:hseanwave
cspl 690,699
lsp 700,":a;chara\mimizu_h3.bmp",0,0:print 10,1500
>Her tail's mouth quickly sucks me inside.@
>Being sucked like it was a vacuum, I'm completely stuck in her.\
name "Luka"
>Aaahh....ahhhh!\
name ""
>Her mucus rubs all over my dick as she sucks, causing a sweet friction to massage me all over.\
name $name
>Hahaha, what a shameful voice. \
>Does it really feel that good?@
>Then... let me suck you even harder.\
name ""
name "Luka"
>Ahiii!\
name ""
>The membrane of the earthworm's tail starts to shrink, increasing the pressure on me.\
>As her sticky opening gets smaller, I'm unable to control my writhing body.\
name "Luka"
>Haaaa!@> Amaz...ing...\
>Faaaaaa!\
name ""
name $name
>Hahaha, you're writhing all over...@
>Shall I make it even better?\
name ""
name "Luka"
>Aauuuu!@>Ah... Ah... Ahhhhh!\
name ""
>A suction that feels like it will leave me completely dry...@
>To such a powerful stimulation, I feel the orgasm rise in my waist.\
name $name
>Fufu... already letting it out?@
>Just let it all out in here...\
name ""
>She quickly contracts her walls, and increases the suction even more, sucking out my seed!\
name "Luka"
>Aaaaaaaahh!\
name ""
gosub *syasei1
lsp 700,":a;chara\mimizu_h4.bmp",0,0
gosub *syasei2
>Unable to endure the pleasure, I quickly climax.\
>Unconsciously thrusting my waist forward, everything I shoot out is quickly sucked up by her.\
name $name
>Mmmm... your semen's delicious taste is spreading all over my mouth...@
>I love your lewd dick! \
>Let me suck out everything. \
name ""
name "Luka"
>Ah.... no more... this is...\
name ""
>The earthworm starts to alternate her suction, causing it to feel like she's milking everything out of me.\
>Even without ejaculating, it's as if she's trying to suck everything right out of my balls...\
name "Luka"
>Ahhh... haaa....\
name ""
name $name
>Haha, look at you thrusting your waist like that...@
>You love my tail's suction that much, huh?\
name ""
>With no time to relax from my last orgasm, she keeps the pressure up.\
>There's no way I can resist such unrelenting stimulation attacking me all over.\
>My back arching up, I feel another climax rising through me.\
name "Luka"
>Ag... again...@> I'm coming again!\
name ""
gosub *syasei1
lsp 700,":a;chara\mimizu_h5.bmp",0,0
gosub *syasei2
>Coming over and over, the earthworm sucks up all of the food I'm feeding to her...\
>Even with that, she's far from satisfied...\
name $name
>Fufu... I won't leave a single drop. \
name ""
name "Luka"
>Stop... sto...p...@> Ahhhhh!\
name ""
gosub *syasei1:gosub *syasei2
>No matter how many times I come, she continues without mercy.\
>Stuck in her sticky body, how long is she going to keep this up...\
name $name
>Fufu... delicious.@
>Haha, let out more! @
>You're already my semen slave, after all. \
name ""
name "Luka"
>Aah...@> Gaaah....\
name ""
gosub *syasei1
lsp 700,":a;chara\mimizu_h6.bmp",0,0
gosub *syasei2
>Forced to feed her over and over...@
>Is this the fate of the loser?\
>Wrapped in her body, both my semen and my power is all being sucked away...\
name $name
>Hahaha, are you already fainting?@
>Don't worry, I'll keep sucking you even as you're asleep. \
name ""
>While still stuck in her vacuum, my vision starts to go black.@
gosub *syasei1:gosub *syasei2
>Coming over and over and over again...\
gosub *anten
mov %hseanwave,0:hseanwave
>Until my consciousness completely fades.\
>From then on, I am nothing but her source of food...\
>.........\
goto *badend



*gob_start

mov $name,"Goblin Girl"
mov $name2,"Goblin Girl"
mov $lavel,"gob"
mov $tatie1,"gob_st01"
mov $tatie2,"gob_st03"
mov $tatie3,"gob_st04"
mov $tatie4,"gob_h1"
mov $haikei,"bg020"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,75
if %nanido=2 mov %max_enemylife,112
if %nanido=3 mov %max_enemylife,132
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"Luka can't move the Goblin Girl's body!"
mov $mogaku_anno2,"Luka pushes the Goblin Girl off of him!"
mov $mogaku_anno3,"Luka can't get the Goblin Girl off of him!"
mov $mogaku_sel1,"Hahaha toooo baaaad. "
mov $mogaku_sel2,"Hahaha toooo baaaad. "
mov $mogaku_sel3,"I'll rape you, just sit back and enjoy it! "
mov $mogaku_sel4,"I'll rape you, just sit back and enjoy it! "
mov $mogaku_sel5,"I'll rape you, just sit back and enjoy it! "
mov $mogaku_dassyutu1,"Aww, after I got on top of you and everything..."
mov $mogaku_dassyutu2,""
mov $half_s1,"Hahaha, my techniques are amazing."
mov $half_s2,"I'll take all your semen. "
mov $kiki_s1,"Almost done? You're leaking..."
mov $kiki_s2,"Just give me all your syrupy semen. "
mov %end_n,3
mov %exp_minus,0
mov %zmonster_x,-300
mov %tukix,340
name $name
>Yai! Give me your money!\
name ""
>In front of me appears a cute little monster...@
>With a hammer that is way too big for her.\
>Alice seems to have disappeared, too...\
name "Luka"
>No way... you're one of the bandits!?\
name ""
>Maybe she's just a flunkie or something...@
>I wonder if she knows where their hideout is?\
lsp 700,":a;chara\gob_st02.bmp",0,0:print 10,500
name $name
>Indeed!@>I'm the Goblin Bandit of The Four Bandits!\
name ""
name "Luka"
>Ehh...? The Four Bandits?\
name ""
>This little girl is allied with a Youma...?@
>Maybe she's stronger than she looks...\
lsp 700,":a;chara\gob_st01.bmp",0,0:print 10,500
name $name
>If you get it, then give me all your money!\
name ""
name "Luka"
>Um... I'm a Hero...@
>I came to punish the bandits...\
name ""
lsp 700,":a;chara\gob_st04.bmp",0,0:print 10,500
name $name
>Eeeeeehhhh.....?@
>Someone weak looking like you?\
name ""
name "Luka"
>Sh... shut up!@
>You look weak too!\
name ""
>Anyway, if she's one of the bandits, then she has to know where the hideout is.\
>It looks like they really were trying to steal people's stuff, too.\
>I guess I'll need to discipline this rowdy child...\
name $name
>That sword!@
>That looks so gross!\
name ""
name "Luka"
>.........\
name ""
lsp 700,":a;chara\angersword.bmp",0,0:print 10,500
>....I agree.\
lsp 700,":a;chara\gob_st04.bmp",0,0:print 10,500
name $name
>Hmmmmmmmm...\
name ""
>The goblin frowns, alternating her gaze between my face and my sword.\
name $name
>What should I do...@
>The sword looks so gross, but I want to play with the wielder...\
name ""
lsp 700,":a;chara\gob_st01.bmp",0,0:print 10,500
name $name
>Alright bring it, Hero!@
>This [Goblin Bandit of the Earth of The Four Bandits] shall be your opponent!\
name ""
name "Luka"
>Adding on "of the Earth" this time!?\
name ""
>I wonder if these four bandits are mimicking the Four Heavenly Knights with their attributes.\
>If that's the case, can she use Earth based moves...?@
>Maybe she really is strong.\
>The Goblin Girl gets a first strike!\
name $name
>Eat this!@>Sand Hurricane!!\
name ""
skillname "Sand Hurricane"
>The Goblin Girl picks up some sand at her feet!\
dwave 1,"se\sio.ogg"
>The Goblin Girl throws sand at Luka!
mov %damage_kotei,1
damage 1,1
skillname ""
name "Luka"
>Wha...\
name ""
>What the hell kind of Earth attack was that!?@
>Uhg, I have sand all over my mouth, and in my eyes...\
name "Luka"
>Ugg, bleh.@> What the hell are you doing!?\
name ""
>Luka starts to spit out sand!\
name $name
>An opening!?@> Feel the wrath of the Earth!\
>Earth Crashing Goblin!\
name ""
>The Goblin Girl raises her hammer and starts to approach Luka slowly!@
>Slowly!@>Slowly!@>Slowly!\
name "Luka"
>.........\
name ""
>What the hell is this attack...@
>It has way too long of a setup time.\
>And the name... [Earth Crashing Goblin]...@
>It sounds like she's the one that's going to crash into the Earth...\
skillname "Power Up"
dwave 1,"se\power.ogg"
>The Goblin Girl starts to power up!\
skillname ""
mov %sinkou,1
goto *common_main



*gob001

gosub *face3
name $name
>Hyaa!\
gosub *face1
>Oh well...@
>Eat this!\
name ""
gosub *gob_b1
goto *common_main



*gob002

name $name
>Did you really think such a crazy attack would hit?@
>Take this!\
name ""
gosub *gob_b1
goto *common_main



*gob_v

if %nanido=0 goto *gob_v2
gosub *face3
name $name
>I won't lose!\
dwave 1,"se\karaburi.ogg"
>Ya!@
dwave 1,"se\karaburi.ogg"
>Yaa!\
name ""
>The Goblin Girl picks up her hammer again, and swings it around!@
>...Or is it swinging her around?\
>Either way, it will never hit me.\
>Suddenly, the Goblin Girl trips over a rock!\
name $name
>Ugyaa!\
name ""
dwave 1,"se\damage.ogg"
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
eng $name+" received 2 damage!":$sel6\
name "Luka"
>...Are you done?\
name ""
name $name
>Ye... yeah...@>Waaaah!\
name ""
>Out of strength, the Goblin Girl starts to cry!\
name "Luka"
>Where's your hideout?\
name ""
name $name
>Over there...\
name ""
>The goblin points to a nearby mountain.\
name $name
>There's a cave over there...\
name ""
>Seems like the hideout is in that cave over there.\
name $name
>B... but...\
>There are three more!\
name ""
>While standing up, the Goblin starts to laugh.\
goto *gob_v2



*gob_v2

name $name
>A Lamia, a Vampire, and even a Dragon!@
>Haha, there's no way you can win!\
name ""
>She runs away, yelling back at me.\
dwave 1,"se\escape.ogg"
csp 700:print 10,1000
>The Goblin Girl ran away!\
mov %viclose,2:gosub *victory
mov %getexp,30:gosub *lvup
mov %2206,1
goto *sean0055



*gob_kousan1

gosub *kousan_syori
mov %hanyo1,0
>Luka stops resisting.\
name $name
>An opening!@>Take this!\
name ""
gosub *gob_b1
goto *gob_a



*gob_kousan2

gosub *kousan_syori
mov %hanyo1,0
>Luka surrenders to the pleasure, ending his resistance.\
goto *gob_a



*gob_kousan3

gosub *kousan_syori
>Luka surrenders to the pleasure, ending his resistance.\
name $name
>Haha, you gave up! @
>You want me to make you come that bad, huh? \
name ""
goto *gob_a



*gob_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 && %sinkou=5 goto *common_mogaku
if %cmd1=11 && %nanido=0 goto *common_attack
if %cmd1=11 && %sinkou=1 goto *gob_attack
if %cmd1=11 && %sinkou>1 && %sinkou<5 goto *gob_mogaku1
if %cmd1=11 && %sinkou=5 goto *common_attack
if %cmd1=12 && %sinkou<5 goto *gob_mogaku2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 && %sinkou=1 goto *gob_bougyo
if %cmd1=13 && %sinkou=5 goto *common_bougyo
if %cmd1=14 && %sinkou=1 goto *gob_nasugamama1
if %cmd1=14 && %sinkou>1 && %sinkou<5 goto *gob_nasugamama2
if %cmd1=14 && %sinkou=5 goto *common_nasugamama
if %cmd1=15 && %sinkou=1 goto *gob_kousan1
if %cmd1=15 && %sinkou>1 && %sinkou<5 goto *gob_kousan2
if %cmd1=15 && %sinkou=5 goto *gob_kousan3
if %cmd1=16 goto *gob_onedari
if %cmd1=17 goto *common_skill
goto *gob_main



*gob_attack

mov %before_action,-3
gosub *common_attack1
if %enemylife=0 goto *gob_v
gosub *face3
name $name
>Fugyaaa!\
gosub *face1
>Ooooh you did it now!@>Meanie!\
name ""
gosub *gob_b1
goto *common_main



*gob_mogaku1

mov %before_action,7
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Grr... you...!"
if %ransu=2 mov $sel1,"Gah...!"
if %ransu=3 mov $sel1,"Stop it...!"
name "Luka"
eng $sel1:$sel6\
name ""
>Luka attacks!
>But the Goblin Girl has Luka pinned down!\
mov %hanyo1,1
goto *gob_a



*gob_mogaku2

mov %before_action,7
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ge... get off!"
if %ransu=2 mov $sel1,"Uhgg..."
if %ransu=3 mov $sel1,"Grr... get off!"
name "Luka"
eng $sel1:$sel6\
name ""
>Luka struggles with all his might!
>But the Goblin Girl has Luka pinned down!\
mov %hanyo1,1
goto *gob_a



*gob_bougyo

mov %before_action,51
mov %bougyo,1
>Luka defends his body!\
name $name
>Taaake thiiis!\
name ""
skillname "Earth Crashing Goblin"
>The Goblin Girl brings down her hammer with all her strength!
dwave 1,"se\damage2.ogg"
quake 10,600
delay 1000
dwave 1,"se\karaburi.ogg"
>But Luka moves to the side!\
skillname ""
name "Luka"
>.......\
name ""
>Even though I avoided it easily, if that hit me I would be done.@
>I guess it's meaningless if she doesn't hit me, though.\
name "Luka"
>Such a slow move will never hit me...@
>Haha! [Earth Crashing Goblin] was defeated!\
name ""
>...That was a little childish of me.\
if %nanido<2 goto *gob_v
name $name
>I won't lose that easily!@
>If it's come to this, I'll just have to use my erotic techniques!\
name ""
mov %sinkou,5
goto *common_main



*gob_nasugamama1

mov %before_action,52
>Luka stands still, and remains motionless.\
name $name
>An opening!@>Take this!\
name ""
gosub *gob_b1
goto *common_main



*gob_nasugamama2

mov %before_action,52
>Luka stands still, and remains motionless.\
mov %hanyo1,0
goto *gob_a



*gob_a

if %sinkou=1 && %before_action=21 goto *gob001
if %sinkou=1 && %before_action=41 goto *gob002
if %sinkou=2 gosub *gob_b2:goto *common_main
if %sinkou=3 gosub *gob_b3:goto *common_main
if %sinkou=4 gosub *gob_b4:goto *common_main
if %kousoku=1 gosub *gob_a5
rnd2 %ransu,1,4
if %ransu=1 gosub *gob_a1:goto *common_main
if %ransu=2 gosub *gob_a2:goto *common_main
if %ransu=3 gosub *gob_a3:goto *common_main
if %ransu=4 && %owaza_count1a>3 gosub *gob_a4:goto *common_main
skip -5



*gob_a1

add %stack,1
skillcount1 3185
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hahaha take this! "
if %ransu=2 mov $sel1,"Haha, your dick is so hard! "
if %ransu=3 mov $sel1,"Just let it out all over my hand. "
name $name
eng $sel1:$sel6\
name ""
skillname "Forceful Handjob"
dwave 1,"se\ero_koki1.ogg"
>The Goblin Girl grabs Luka's penis!
if %nanido<2 damage 7,9
if %nanido=2 damage 8,11
if %nanido=3 damage 14,18
skillname ""
if %mylife=0 sub %stack,1:return *gob_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*gob_a2

add %stack,1
skillcount1 3186
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Haha, I'll suck it out with my mouth. "
if %ransu=2 mov $sel1,"Haha, I'll let you leak some out in my mouth. "
if %ransu=3 mov $sel1,"Hehe, let me lick your tip... "
name $name
eng $sel1:$sel6\
name ""
skillname "Forceful Fellatio"
dwave 1,"se\ero_buchu2.ogg"
>The Goblin Girl forces Luka's dick into her mouth!
if %nanido<2 damage 8,10
if %nanido=2 damage 9,12
if %nanido=3 damage 16,20
skillname ""
if %mylife=0 sub %stack,1:return *gob_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*gob_a3

add %stack,1
skillcount1 3187
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Haha, is my thigh soft...?"
if %ransu=2 mov $sel1,"Let out all your sperm in my thighs... "
if %ransu=3 mov $sel1,"Hehe, I can even make you come with my thighs... "
name $name
eng $sel1:$sel6\
name ""
skillname "Forceful Intercrural"
dwave 1,"se\ero_koki1.ogg"
>The Goblin Girl presses Luka's penis between her thigh!
if %nanido<2 damage 9,12
if %nanido=2 damage 12,15
if %nanido=3 damage 18,24
skillname ""
if %mylife=0 sub %stack,1:return *gob_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*gob_a4

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name $name
>You! Just lay back!\
name ""
skillname "Mount"
>The Goblin Girl throws Luka down, and mounts him!\
mov %kousoku,1:gosub *status_print
>Luka is held down, with the Goblin Girl on top of him!\
skillname ""
if %kousan=2 sub %stack,1:return
name $name
>Heeheehee. @
>I caaaught you! \
>I'll make you feel amazing with my pussy...\
>I'll squeeze you so hard, you'll come in no time!\
name ""
if %nanido<2 mov %genmogaku,0
if %nanido=2 mov %genmogaku,0
if %nanido=3 mov %genmogaku,0
sub %stack,1
return



*gob_a5

add %stack,1
name $name
>Haha, are you done already?@
>Let me violate you more...\
name ""
skillname "Goblin Insertion"
dwave 1,"se\ero_pyu4.ogg"
>The Goblin Girl forcefully drops her waist!\
>Luka's penis screws into her narrow hole!
mov %damage_kotei,1
damage 5,5
mov %kousoku,2:mov %genmogaku,100
skillname ""
if %mylife=0 sub %stack,1:return *gob_h6
>Luka is being raped by the Goblin Girl!\
name "Luka"
>Ahhhhh!\
name ""
>I'm stuck inside her warm vagina...@
>Pleasure rises up through me as her soft walls squeeze all around me.\
name ""
name $name
>Hehehe... I stole your virginity.@
>Stolen by me raping you... how humiliating! \
name ""
name "Luka"
>Auu... uuuuuu...\
name ""
>Inserted all the way to the base of my penis, she tightens around me.\
if %kousan=2 sub %stack,1:return
sub %stack,1
rnd2 %ransu,1,2
if %ransu=1 goto *gob_a6
if %ransu=2 goto *gob_a7



*gob_a6

add %stack,1
skillcount1 3183
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Haha, just shoot it all out inside. "
if %ransu=2 mov $sel1,"Haha, tighter and tighter... "
if %ransu=3 mov $sel1,"Hahaha! "
if %ransu=4 mov $sel1,"I'll wring everything from you by force... "
if %ransu=5 mov $sel1,"Hahaha, you're panting so hard! "
name $name
eng $sel1:$sel6\
name ""
skillname "Goblin Tighten"
dwave 1,"se\ero_chupa5.ogg"
>The Goblin Girl slowly tightens around Luka's dick!
if %nanido<2 damage 4,5
if %nanido=2 damage 6,7
if %nanido=3 damage 8,10
skillname ""
if %mylife=0 sub %stack,1:return *gob_h2
if %kousan=2 sub %stack,1:return
sub %stack,1
rnd2 %ransu,1,2
if %ransu=1 goto *gob_a6
if %ransu=2 goto *gob_a7



*gob_a7

add %stack,1
skillcount1 3184
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Haha, haven't given up yet? Then one more time... "
if %ransu=2 mov $sel1,"With my skills, I'll make you come over and over "
if %ransu=3 mov $sel1,"Haha, are you almost done? Let me finish you off... "
if %hanyo2=0 mov $sel1,"Haha, let me finish you off with my best move... "
name $name
eng $sel1:$sel6\
name ""
skillname "Super Tightening"
dwave 1,"se\ero_chupa4.ogg"
>The Goblin Girl's vagina shrinks!
if %nanido<2 damage 4,5
if %nanido=2 damage 6,7
if %nanido=3 damage 8,10
dwave 1,"se\ero_chupa4.ogg"
>Luka's dick is squeezed!
if %nanido<2 damage 4,5
if %nanido=2 damage 6,7
if %nanido=3 damage 8,10
dwave 1,"se\ero_chupa4.ogg"
>Luka's tip is squeezed!
if %nanido<2 damage 4,5
if %nanido=2 damage 6,7
if %nanido=3 damage 8,10
skillname ""
if %mylife=0 sub %stack,1:return *gob_h1
mov %hanyo2,1
if %kousan=2 sub %stack,1:return
sub %stack,1
rnd2 %ransu,1,2
if %ransu=1 goto *gob_a6
if %ransu=2 goto *gob_a7



*gob_b1

add %stack,1
skillname "Earth Crashing Goblin"
>The Goblin Girl swings down her hammer!
mov %a_effect1,1
mov %damage_kotei,1
if %mylv=4 damage 40,43
if %mylv=5 damage 45,48
if %mylv=6 damage 50,53
if %mylv=7 damage 60,63
if %mylv=8 damage 70,73
skillname ""
name "Luka"
>Gaaah!\
name ""
>I underestimated her...@
>I fall to the ground instantly.\
name "Luka"
>Guuh!\
name ""
skillname "Mount"
>As I try to stand up, the goblin jumps on me!\
name ""
name $name
>You! Sit still!\
name ""
name "Luka"
>Waa....!\
name ""
>Even though she's small, she's incredibly strong.@
mov %kousoku,1:gosub *status_print
>Unable to move, she holds me down.\
skillname ""
name $name
>Heheheheee... @
>Caaaught you! \
name ""
name "Luka"
>Wh... what are you doing!?\
name ""
if %con_hbgm=0 mov %music,20:bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
name $name
>I'm a thief!@
>Of course I'm going to take something from you! \
name ""
>The goblin shakes her hips as she starts to squeeze my dick.\
name "Luka"
>St... Stop...!\
name ""
>With her squeezing, I start to grow in her hand.\
name $name
>Oho? Growing so big...@
>By any chance... are you a virgin?\
name ""
name "Luka"
>Erg... guh...\
name ""
name $name
>Hehehe... I'll rape you now then.@
>I'll steal your precious virginity, and violate you until you go crazy!\
name ""
mov %sinkou,2
sub %stack,1
return



*gob_b2

add %stack,1
name $name
if %hanyo1=0 skip 4
>Hehehe... even if you resist...@
>I'll just keep violating you...\
skip 5
>Haha, no resistance?@
>So you want to be violated by me...?\
>Hehehe, it's fine even if you do resist...@
>I'll just keep raping you!\
name ""
>The goblin edges her waist close to my groin, holding her vagina over my dick.@
>She grabs my penis and moves it to her wet entrance...\
name $name
>I'll make my pussy so tight...@
>You'll come in no time! \
name ""
name "Luka"
if %hanyo1=0 skip 3
>St... stop!\
skip 2
>Aaaah....\
name ""
name $name
>Haha, gave up already?@
>Alright... time to deflower you!\
name ""
skillname "Goblin Insertion"
dwave 1,"se\ero_pyu4.ogg"
>The Goblin Girl suddenly drops her waist!\
>Luka's penis screws into her narrow hole!
mov %damage_kotei,1
damage 5,5
mov %kousoku,2:mov %genmogaku,100
if %mylife=0 sub %stack,1:return *gob_h6
>Luka is being raped by the Goblin Girl!\
name "Luka"
>Aaauuuu!\
name ""
skillname ""
>Covered in her warm nectar, Luka's dick is fiercely pressured by her incredibly tight hole!\
name ""
name $name
>Haha! I stole your virginity!@
>Just sit there and be raped, loser! \
name ""
name "Luka"
>Auu... uuuu...\
name ""
>Being strangled in her vagina... her tightness is almost like torture.\
mov %sinkou,3
sub %stack,1
return



*gob_b3

add %stack,1
name $name
if %hanyo1=0 skip 4
>Haha... want me to stop?@
>But I won't! Just sit there and come, haha. \
skip 3
>Haha, are you enjoying being violated? @
>So pathetic! Just let it out like that! \
name ""
>The goblin looks down at me, laughing, and squeezes her vagina tighter.\
name $name
>Haha, tiiiighter. @
>Heeheehee... @
>Does it feel gooooood?\
name ""
name "Luka"
>Uaa!\
name ""
skillcount1 3183
skillname "Goblin Tighten"
dwave 1,"se\ero_chupa5.ogg"
>Luka's dick is crushed between the Goblin Girl's soft walls!
mov %damage_kotei,1
damage 4,4
skillname ""
if %mylife=0 sub %stack,1:return *gob_h2
name $name
>Haha, crushed in my vagina...@
>A virgin like you can't endure it. \
>Haha, come, come! \
name ""
name "Luka"
>Faaaaa!\
name ""
skillcount1 3183
skillname "Goblin Tighten"
dwave 1,"se\ero_chupa5.ogg"
>The Goblin Girl tightens her vagina even more!
mov %damage_kotei,1
damage 5,5
>Crushed by her tiny pussy, I feel myself on the edge of orgasm.\
skillname ""
if %mylife=0 sub %stack,1:return *gob_h2
name "Luka"
>Stop... or I'll come...\
name ""
name $name
>Haha if I tighten it even more, you'll explode!\
if %hanyo1=0 skip 3
>Even if you say no, I'll still force you to come! \
skip 2
>Haha, this is what you wanted me to do, right? \
name ""
>The goblin threatens me as she giggles.\
name $name
>Hehehe... just let it all out in me.\
name ""
name "Luka"
>Aauuuu!\
name ""
>The desire to come rises through my waist...@
if %hanyo1=0 skip 3
>At this rate, I'll surrender helplessly...\
skip 2
>Please... just let me come...\
mov %sinkou,4
sub %stack,1
return



*gob_b4

add %stack,1
name "Luka"
>Faaaa...\
name ""
if %hanyo1=0 skip 4
>Struggling uselessly, the goblin continues to violate me.@
>Held down, I feel completely at her mercy...\
skip 2
>Being raped by the goblin, I completely surrender to her.\
name $name
>Hehehe, it's over for you now.@
>With this next move, your life is over...\
name ""
sub %stack,1
goto *gob_b5



*gob_b5

add %stack,1
skillcount1 3184
skillname "Super Tightening"
dwave 1,"se\ero_chupa4.ogg"
>The Goblin Girl's vagina shrinks!
if %nanido<2 damage 4,5
if %nanido=2 damage 6,7
if %nanido=3 damage 8,10
dwave 1,"se\ero_chupa4.ogg"
>Luka's dick is squeezed!
if %nanido<2 damage 4,5
if %nanido=2 damage 6,7
if %nanido=3 damage 8,10
dwave 1,"se\ero_chupa4.ogg"
>Luka's tip is squeezed!
if %nanido<2 damage 4,5
if %nanido=2 damage 6,7
if %nanido=3 damage 8,10
skillname ""
if %mylife=0 sub %stack,1:return *gob_h1
sub %stack,1
goto *gob_b5



*gob_onedari

mov $list1,"Forceful Handjob"
if %3185>0 mov %list_num1,1
mov $list2,"Forceful Fellatio"
if %3186>0 mov %list_num2,1
mov $list3,"Forceful Intercrural"
if %3187>0 mov %list_num3,1
mov $list4,"Goblin Tighten"
if %3183>0 mov %list_num4,1
mov $list5,"Super Tightening"
if %3184>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *gob_onedari1
if %cmd1=12 goto *gob_onedari2
if %cmd1=13 goto *gob_onedari3
if %cmd1=14 goto *gob_onedari4
if %cmd1=15 goto *gob_onedari5
if %cmd1=-1 goto *gob_main
goto *gob_onedari



*gob_onedari1

gosub *onedari_syori
name $name
>Hehe... you want me to squeeze it out with my hand?@
>Alright... I'll let you have what you desire! \
name ""
gosub *gob_a1
skip -1



*gob_onedari2

gosub *onedari_syori
name $name
>Hehehe, you want it in my mouth? @
>Then let me suck it all out for you... \
name ""
gosub *gob_a2
skip -1



*gob_onedari3

gosub *onedari_syori
name $name
>Oh, you want it between my thighs...?@
>I'll let you shoot your pathetic semen all over my legs then. \
name ""
gosub *gob_a3
skip -1



*gob_onedari4

gosub *onedari_syori_k
name $name
>Heehee... you want me to violate you?\
name ""
if %kousoku=0 gosub *gob_a4
if %kousoku=1 gosub *gob_a5
gosub *gob_a6
skip -1



*gob_onedari5

gosub *onedari_syori_k
name $name
>Heehee... you want me to violate you?\
name ""
if %kousoku=0 gosub *gob_a4
if %kousoku=1 gosub *gob_a5
gosub *gob_a7
skip -1



*gob_h1

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\gob_h2.bmp",0,0
gosub *syasei2
>Unable to endure any longer, I shoot my semen inside of the Goblin Girl!\
mov %viclose,1:gosub *lose
mov %2506,%2506+1:if %2506=1 mov %count_koenemy,%count_koenemy+1
if %2506>%count_most mov %count_most,%2506:mov $count_mostname,$name
count 1,7
mov $bad1," Violated by the Goblin Girl, Luka surrenders to her super tightening."
mov $bad2," Caught by the four bandits, Luka was raped endlessly."
name $name
>Haha, you let it out, you let it out. @
>Hehe, my vagina is so full of delicious semen.\
name ""
goto *gob_h



*gob_h2

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\gob_h2.bmp",0,0
gosub *syasei2
>Luka explodes in the Goblin Girl's tight vagina!\
mov %viclose,1:gosub *lose
mov %2506,%2506+1:if %2506=1 mov %count_koenemy,%count_koenemy+1
if %2506>%count_most mov %count_most,%2506:mov $count_mostname,$name
count 1,7
mov $bad1," Raped by the Goblin Girl, Luka succumbs to her tightness."
mov $bad2," Caught by the four bandits, Luka was raped endlessly."
name $name
>Haha, you let it out, you let it out. @
>Hehe, my vagina is so full of delicious semen.\
name ""
goto *gob_h



*gob_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\gob_bk01.bmp",0,0
gosub *syasei2
>Stroked by the Goblin Girl's strong hand, Luka ejaculates!\
mov %viclose,1:gosub *lose
mov %2506,%2506+1:if %2506=1 mov %count_koenemy,%count_koenemy+1
if %2506>%count_most mov %count_most,%2506:mov $count_mostname,$name
count 5,7
mov $bad1," Luka surrenders to the Goblin Girl's handjob."
mov $bad2," Caught by the four bandits, Luka was raped endlessly."
gosub *face2
name $name
>Haha, you let it out, you let it out. @
>Hehe, my hand is covered with delicious semen.\
name ""
goto *gob_h



*gob_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\gob_bk04.bmp",0,0
gosub *syasei2
>Being sucked by the Goblin Girl, Luka explodes in her mouth!\
mov %viclose,1:gosub *lose
mov %2506,%2506+1:if %2506=1 mov %count_koenemy,%count_koenemy+1
if %2506>%count_most mov %count_most,%2506:mov $count_mostname,$name
count 4,7
mov $bad1," Luka succumbs to the Goblin Girl's strong blowjob."
mov $bad2," Caught by the four bandits, Luka was raped endlessly."
gosub *face2
name $name
>Haha, you let it out, you let it out. @
>Hehe, my mouth is full of delicious semen.\
name ""
goto *gob_h



*gob_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\gob_bk02.bmp",0,0
gosub *syasei2
>Squeezed between the Goblin Girl's thighs, Luka explodes all over her!\
mov %viclose,1:gosub *lose
mov %2506,%2506+1:if %2506=1 mov %count_koenemy,%count_koenemy+1
if %2506>%count_most mov %count_most,%2506:mov $count_mostname,$name
count 3,7
mov $bad1," Luka succumbs to the Goblin Girls intercrural sex."
mov $bad2," Caught by the four bandits, Luka was raped endlessly."
gosub *face2
name $name
>Haha, you let it out, you let it out. @
>Hehe, my thighs are covered with delicious semen.\
name ""
goto *gob_h



*gob_h6

mov %ikigoe,3:gosub *ikigoe
name $name
>Ehh? You already came?\
name ""
gosub *syasei1
lsp 700,":a;chara\gob_h2.bmp",0,0
gosub *syasei2
>Inside her tight pussy, Luka is forced to come in an instant.\
mov %viclose,1:gosub *lose
mov %2506,%2506+1:if %2506=1 mov %count_koenemy,%count_koenemy+1
if %2506>%count_most mov %count_most,%2506:mov $count_mostname,$name
count 1,7
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to an orgasm from simple insertion."
mov $bad2," Caught by the four bandits, Luka was raped endlessly."
name $name
>Ahahaha, pathetic! @
>Was feeling a vagina for the first time more than you could take?\
name ""
goto *gob_h



*gob_h

if %2506=1 mov %hseanwave,1:hseanwave:skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name $name
>I'll violate you until you go crazy. \
name ""
if %kousoku>0 goto *gob_hb
cspl 690,699
lsp 700,":a;chara\gob_h1.bmp",0,0:print 10,500
>The Goblin Girl quickly drops her waist on my dick!\
mov %hseanwave,1:hseanwave
>Luka's dick screws into her narrow hole!\
name "Luka"
>Aaaauuu!\
name ""
skillname ""
>A warm feeling attacks my dick.@
>As I reach all the way into her, she starts to tighten her pussy.\
name ""
name $name
>Hahaha, I stole your virginity!@
>How pathetic!\
name ""
goto *gob_hb



*gob_hb

name "Luka"
>Aahhhh!\
name ""
>My penis is inserted in her all the way to the root.@
>As if strangling me, she tightens her pussy.\
mov %hseanwave,7:hseanwave
>The Goblin Girl starts to violently shake her waist!\
name "Luka"
>Aauuu!@> Ahhhh!\
name ""
>Stuck in her tiny opening, her walls start to massage my dick.\
>She continually varies her tightness.@
>The constantly changing stimulation sends pleasure shooting through me.\
>With the goblin violently forcing the pleasure, my body starts to writhe on the ground.\
name $name
>Hahaha. @
>It looks like you can't stand it when I move my waist. \
name ""
>Sneering at me, the goblin starts to move her waist up and down.\
>Moving up and down in a rhythmic motion, she torments me with her honey pot.\
name "Luka"
>Aaaaaahhhh!\
name ""
>Twisting my body, I can't endure the pleasure attacking me.@
>I must look pathetic...\
name $name
>Hahahaha! @
>Just come, writhing pathetically like that! \
name ""
name "Luka"
>Aaahh! Coming!\
name ""
>With her unrelenting pumping, she brings me to a climax.\
gosub *syasei1
lsp 700,":a;chara\gob_h2.bmp",0,0
gosub *syasei2
>Squeezed by her tight pussy, I explode inside of her.\
name $name
>Hahaha! You came! You came! @
>More, more, more! \
name ""
name "Luka"
>Ahiiii!\
name ""
>She starts to move even faster, forcing me back to the edge.@
>The semen from before causes a lewd noise to sound out every time our hips slap together.\
name "Luka"
>Haaa.. stop it...\
name ""
name $name
>Ehh..? What are you saying?@
>I can't hear you! Hahaha! \
name ""
>I look down at my cock, stuck all the way in her.@
>Suddenly, she tightens around me, forcing me over the edge!\
gosub *syasei1
lsp 700,":a;chara\gob_h3.bmp",0,0
gosub *syasei2
>I came in her a third time...\
name "Luka"
>Aaaahhh n..o...\
name ""
name $name
>I won't stop! I said I'd violate you until you went crazy! @
>Until nothings left, I'll make myself even tighter, and squeeze everything out!\
name ""
name "Luka"
>Haaaaa!\
name ""
>The Goblin Girl starts to shake her waist again.@
>The intense friction caused by her narrow pussy starts to send me over the edge yet again.\
>Panting, I ejaculate yet again.\
gosub *syasei1:gosub *syasei2
>Thus I'm violated five times... ten times...\
name $name
>Ahh! Even though you just orgasmed, nothing came out...\
name ""
name "Luka"
>A...aa....\
name ""
>Coming so many times, my penis is twitching.@
>Completely sucked dry, I'm panting on the ground, out of breath.\
>Being squeezed by such a tight vagina, my consciousness starts to slowly fade...\
gosub *anten
mov %hseanwave,0:hseanwave
name $name
>Well, I'll take you back as my stolen booty.@
>We'll keep you captive and rape you every day.@> Look forward to it, ok?\
name ""
name "Luka"
>No...@>N..o...\
name ""
name $name
>Haha, even if you say no...@>...You're just our sex slave now. \
name ""
>Completely exhausted, I feel myself being picked up by the goblin.@
>I can feel her carrying me somewhere...\
>Caught like this, I'm made into a sex toy for the bandits.\
>Thus my adventure ends...\
>........\
goto *badend



*pramia_start

mov $name,"Tiny Lamia"
mov $name2,"Tiny Lamia"
mov $lavel,"pramia"
mov $tatie1,"pramia_st01"
mov $tatie2,"pramia_st02"
mov $tatie3,"pramia_st03"
mov $tatie4,"pramia_st02"
mov $haikei,"bg022"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,80
if %nanido=2 mov %max_enemylife,120
if %nanido=3 mov %max_enemylife,120
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,6
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"Luka can't break out of the Tiny Lamia's hold!"
mov $mogaku_anno2,"Luka broke free of the Tiny Lamia's tail!"
mov $mogaku_anno3,"Luka can't move!"
mov $mogaku_sel1,"No running... I'll beat you up!"
mov $mogaku_sel2,"Hehe... look at you struggle. "
mov $mogaku_sel3,"Coiling around a struggling human is so fun. "
mov $mogaku_sel4,"Even if you struggle, you won't get away from me. "
mov $mogaku_sel5,"Heeheehee, how pathetic."
mov $mogaku_dassyutu1,"But... but I was trying so hard..."
mov $mogaku_dassyutu2,""
mov $half_s1,"It looks like you're feeling good..."
mov $half_s2,"Do you want to shoot your semen in me...?"
mov $kiki_s1,"It's about time I made you come. "
mov $kiki_s2,"Being raped by me... is it frustrating? "
mov %end_n,3
mov %exp_minus,30
mov %zmonster_x,-250
mov %tukix,280
name $name
>Lamia Bandit of the Water of the Four Bandits has arrived!\
name ""
name "Luka"
>You're... a lamia?\
name ""
>Her lower half is certainly a snake...@
>But it's tiny...@> And cute...\
name $name
>Fufu...@
>Do you want me to coil around you!?\
name ""
name "Luka"
>Ummm...\
name ""
>As the Tiny Lamia laughs in a ridiculous way, I feel a slight tinge of disappointment.\
name $name
>Why do you look so disappointed!?@
>How can you have that face when facing me!?\
name ""
bgm "bgm\battle.ogg"
>The Tiny Lamia gets a first strike!\
skillname "Tiny Wrap"
dwave 1,"se\ero_makituki2.ogg"
>The Lamia's tiny tail wraps around Luka!@
>Luka is being slowly wrapped by the Tiny Lamia!
damage 2,3
mov %kousoku,1:gosub *status_print
>The Tiny Lamia's tail is wound around Luka!\
skillname ""
if %mylife=0 goto *pramia_h5
gosub *face2
name $name
>Heeheehee... I'll squeeze you even harder.\
name ""
name "Luka"
>.........\
name ""
>She's wrapped around me, but it doesn't particularly hurt...\
>She looks like she's putting so much effort into it too...\
name $name
>Hahaha! Wrapped by my powerful tail...@
>All that's left is to strangle my prey...\
name ""
>Even though she threatens me like that, it feels more like a soft massage instead of something painful.\
name $name
>Heeheehee...@
>Let me hear you scream in agony!\
name ""
mov %sinkou,1
goto *common_main



*pramia_v

gosub *face3
goto *pramia_v2



*pramia_v2

name $name
>Waaah! I'll remember this!\
name ""
>The Tiny Lamia curses at Luka as she runs away!\
dwave 1,"se\escape.ogg"
csp 700:print 10,1000
>The Tiny Lamia has run away!\
name ""
mov %viclose,2:gosub *victory
mov %getexp,35:gosub *lvup
mov %2207,1
goto *sean0056



*pramia_kousan1

gosub *kousan_syori
>Luka stops resisting!\
gosub *face2
name $name
>You gave up?@
>So you want me to tighten around you that badly...? Heehee...\
name ""
goto *pramia_a



*pramia_kousan2

gosub *kousan_syori
>Luka surrenders to the promise of pleasure, ending his resistance!\
gosub *face2
name $name
>You gave up?@
>Heehee... Let me rape you and squeeze everything out, then!\
name ""
goto *pramia_a



*pramia_kousan3

gosub *kousan_syori
>Luka surrenders to the promise of pleasure, ending his resistance!\
gosub *face2
name $name
>You gave up?@
>So you want me to tighten around you even more...? Heeheee...\
name ""
goto *pramia_a



*pramia_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 && %sinkou=3 goto *common_mogaku
if %cmd1=11 && %nanido=0 goto *common_attack
if %cmd1=11 && %sinkou<3 goto *pramia_attack
if %cmd1=11 && %sinkou=3 goto *common_attack
if %cmd1=12 && %sinkou<2 goto *pramia_mogaku
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 && %sinkou=1 goto *pramia_nasugamama1
if %cmd1=14 && %sinkou=2 goto *pramia_nasugamama2
if %cmd1=14 && %sinkou=3 goto *common_nasugamama
if %cmd1=15 && %sinkou=1 goto *pramia_kousan1
if %cmd1=15 && %sinkou=2 goto *pramia_kousan2
if %cmd1=15 && %sinkou=3 goto *pramia_kousan3
if %cmd1=16 goto *pramia_onedari
if %cmd1=17 goto *common_skill
goto *pramia_main



*pramia_attack

mov %before_action,-3
gosub *common_attack1
csp 690
gosub *face3
name $name
>Hyaa!\
name ""
dwave 1,"se\dassyutu.ogg"
mov %kousoku,0:gosub *status_print
>My attack sends the little lamia flying.@
>Knocked down by such a small attack... she's really weak.\
lsp 700,":a;chara\pramia_st01.bmp",0,0:print 10,500
name $name
>...............\
name ""
name "Luka"
>...............\
name ""
lsp 700,":a;chara\pramia_st11.bmp",0,50:print 10,500
>The Tiny Lamia starts to cry!\
lsp 700,":a;chara\pramia_st12.bmp",0,50:print 10,500
name $name
>Waaaaaahhhhh!@
>Why didn't it work!?\
name ""
name "Luka"
>Ah... Sorry...\
name ""
>The Tiny Lamia is throwing a tantrum on the ground, tears flying everywhere!\
if %enemylife=0 goto *pramia_v2
if %nanido<2 goto *pramia_v2
name $name
>Grrr...\
gosub *face3
>I won't let you get away with this!\
name ""
>Wiping off her tears, the Tiny Lamia attacks Luka!\
gosub *face1
mov %sinkou,3
goto *pramia_main



*pramia_mogaku

mov %before_action,8
name "Luka"
if %sinkou=2 skip 3
>Up you go...\
skip 2
>That's not very nice of you.\
name ""
>Luka picks up the Tiny Lamia!@
dwave 1,"se\dassyutu.ogg"
mov %kousoku,0:gosub *status_print
>Luka unwinds the Tiny Lamia's tail off him!\
lsp 700,":a;chara\pramia_st01.bmp",0,0:print 10,500
>Able to just pick her up like this...@
>She's really weak.\
name $name
>..........\
name ""
name "Luka"
>..........\
name ""
>Luka stares into the Tiny Lamia's eyes as he lifts her up.@
lsp 700,":a;chara\pramia_st11.bmp",0,50:print 10,500
>Tiny Lamia starts to cry!\
lsp 700,":a;chara\pramia_st12.bmp",0,50:print 10,500
name $name
>Waaaaaahhhhh!@
>Why didn't it work!?\
name ""
name "Luka"
>Why...? Well...\
name ""
>As I place her on the ground, she starts to throw a tantrum, her tears flying all over.\
if %nanido<2 goto *pramia_v
>Is she going to run away...?\
name $name
>Grr...@
gosub *face3
>I won't forgive you for that!\
name ""
>The Tiny Lamia wipes away her tears, and attacks Luka!\
gosub *face1
mov %sinkou,3
goto *pramia_main



*pramia_nasugamama1

>Luka remains motionless.\
name "Luka"
>..........\
name ""
>If I just stand here doing nothing, I wonder what she'll do to me...?@
>Thinking a dirty thought, I stand still.\
name $name
>Haha... wrapped so tight, you can't do anything!?\
name ""
goto *pramia_a



*pramia_nasugamama2

>Luka remains motionless.\
name "Luka"
>...........\
name ""
name $name
>Haha, you want to be inside of me that bad?@
>Alright... here I come!\
name ""
goto *pramia_a



*pramia_a

if %sinkou=1 gosub *pramia_b1:goto *common_main
if %sinkou=2 gosub *pramia_b2:goto *common_main
if %kousoku=3 rnd2 %ransu,1,2
if %kousoku=3 && %ransu=1 gosub *pramia_a8:goto *common_main
if %kousoku=3 && %ransu=2 gosub *pramia_a9:goto *common_main
if %kousoku=2 gosub *pramia_a7:goto *common_main
if %kousoku=1 rnd2 %ransu,1,3
if %kousoku=1 && %ransu=1 gosub *pramia_a4:goto *common_main
if %kousoku=1 && %ransu=2 gosub *pramia_a5:goto *common_main
if %kousoku=1 && %ransu=3 gosub *pramia_a6:goto *common_main
rnd2 %ransu,1,3
if %ransu=1 gosub *pramia_a1:goto *common_main
if %ransu=2 gosub *pramia_a2:goto *common_main
if %ransu=3 && %owaza_count1a>2 gosub *pramia_a3:goto *common_main
skip -4



*pramia_a1

add %stack,1
skillcount1 3188
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My tongue is incredibly nimble..."
if %ransu=2 mov $sel1,"Let me lick you all over!"
if %ransu=3 mov $sel1,"Heehee... lick, lick, lick!"
name $name
eng $sel1:$sel6\
name ""
skillname "Tiny Lick"
dwave 1,"se\ero_pyu1.ogg"
>The Tiny Lamia starts to lick Luka's penis!\
>The Tiny Lamia's quick tongue is licking him all over!
if %nanido<2 damage 7,9
if %nanido=2 damage 10,13
if %nanido=3 damage 14,18
skillname ""
if %mylife=0 sub %stack,1:return *pramia_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*pramia_a2

add %stack,1
skillcount1 3189
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll rub you with my gigantic chest..."
if %ransu=2 mov $sel1,"Heehee... I'll force you to come with my huge chest."
if %ransu=3 mov $sel1,"Heehee... my boobs are really soft, you know?"
name $name
eng $sel1:$sel6\
name ""
skillname "Tiny Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>The Tiny Lamia rubs Luka's dick on her chest!\
>Even though there's nothing there, it stimulates Luka!
if %nanido<2 damage 8,10
if %nanido=2 damage 12,15
if %nanido=3 damage 16,20
skillname ""
if %mylife=0 sub %stack,1:return *pramia_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*pramia_a3

add %stack,1
if %kousan=2 skip 4
name $name
>This time I'll wrap you up better...\
name ""
skillname "Tiny Wrap"
dwave 1,"se\ero_makituki2.ogg"
>The Tiny Lamia coils her tail around Luka!\
>Luka is wrapped by a tiny tail!
if %nanido<2 damage 2,3
if %nanido=2 damage 3,4
if %nanido=3 damage 4,6
mov %kousoku,1:gosub *status_print
>Luka's body is wrapped by the Tiny Lamia!\
skillname ""
if %mylife=0 sub %stack,1:return *pramia_h5
if %kousan=2 sub %stack,1:return
name $name
>Heehee... I'm all the way around.@
>I won't let go so easily this time...\
name ""
if %nanido<2 mov %genmogaku,1
if %nanido=2 mov %genmogaku,1
if %nanido=3 mov %genmogaku,2
sub %stack,1
return



*pramia_a4

add %stack,1
skillcount1 3190
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll tighten around you!"
if %ransu=2 mov $sel1,"Tighter... tighter!"
if %ransu=3 mov $sel1,"How does it feel to be strangled by a lamia?"
name $name
eng $sel1:$sel6\
name ""
skillname "Tiny Tightening"
dwave 1,"se\ero_makituki1.ogg"
>The Tiny Lamia puts power into her tail!\
>Luka's body is being squeezed!
if %nanido<2 damage 6,8
if %nanido=2 damage 9,12
if %nanido=3 damage 12,16
skillname ""
if %mylife=0 sub %stack,1:return *pramia_h6
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*pramia_a5

add %stack,1
skillcount1 3191
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll squeeze you with my tail! "
if %ransu=2 mov $sel1,"Heehee... I'll tease you with my tail."
if %ransu=3 mov $sel1,"My tail will make you feel amazing..."
name $name
eng $sel1:$sel6\
name ""
skillname "Tiny Tailjob"
dwave 1,"se\ero_koki1.ogg"
>The Tiny Lamia wraps her tail around Luka's penis!\
>The Tiny Lamia starts to stroke Luka with her tail!
if %nanido<2 damage 7,10
if %nanido=2 damage 10,15
if %nanido=3 damage 14,20
skillname ""
if %mylife=0 sub %stack,1:return *pramia_h7
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*pramia_a6

add %stack,1
name $name
>It's time to violate you...\
>In my tiny lamia vagina...@
>I'll wring out all your sticky semen!\
name ""
skillname "Reverse Rape"
lsp 690,":a;chara\pramia_ct01.bmp",0,0
lsp 700,":a;chara\pramia_h1.bmp",0,0:print 10,500
mov %kousoku,2:mov %genmogaku,0
>The Tiny Lamia starts to lower her pussy towards Luka's penis!\
skillname ""
sub %stack,1
return



*pramia_a7

add %stack,1
name $name
>Hehe... time to eat you...@
>With my lower mouth!\
name ""
skillname "Reverse Rape"
dwave 1,"se\ero_pyu2.ogg"
lsp 690,":a;chara\pramia_ct02.bmp",0,0
lsp 700,":a;chara\pramia_h2.bmp",0,0:print 10,500
>The Tiny Lamia drops her waist onto Luka, forcing him inside her!\
name "Luka"
>Aahhhh!\
name ""
dwave 1,"se\ero_chupa5.ogg"
>Luka is attacked by the Tiny Lamia's tightness!
mov %damage_kotei,1
damage 8,9
mov %kousoku,3:mov %genmogaku,100
skillname ""
if %mylife=0 sub %stack,1:return *pramia_h8
>Luka is being raped by the Tiny Lamia!\
name $name
>Haha... am I too tight?@
>If I make it tighter... I wonder if you'll break?\
name ""
>The Tiny Lamia starts to tighten her tiny pussy around Luka!\
if %kousan=2 skip 5
name $name
>Haha, it's alright to scream.@
>I'll squeeze you until you go crazy.\
name ""
mov $mogaku_sel1,"Haha... struggling so pathetically."
mov $mogaku_sel2,"There's no escaping from me anymore!"
mov $mogaku_sel3,"Are you happy to be beaten by such a small lamia?"
mov $mogaku_sel4,"Haha, being raped like this, there's no escape for you!"
mov $mogaku_sel5,"Haha look at you struggle! So lame! "
sub %stack,1
return



*pramia_a8

add %stack,1
skillcount1 3010
>Luka is being raped by the Tiny Lamia!\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Heehee... tighter, tighter. "
if %ransu=2 mov $sel1,"Stuck inside me... amazing, isn't it?"
if %ransu=3 mov $sel1,"Haha, you're leaking in me. "
if %kousan=2 skip 4
name $name
eng $sel1:$sel6\
name ""
skillname "Death by Tightness"
dwave 1,"se\ero_chupa5.ogg"
>The Tiny Lamia makes herself even tighter!\
>Luka's penis is being crushed by the Tiny Lamia!
if %nanido<2 damage 35,40
if %nanido=2 damage 52,60
if %nanido=3 damage 70,80
skillname ""
if %mylife=0 sub %stack,1:return *pramia_h1
sub %stack,1
return



*pramia_a9

add %stack,1
skillcount1 3011
>Luka is being raped by the Tiny Lamia!\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Let me shake my hips for you. "
if %ransu=2 mov $sel1,"If I do this, you won't be able to last. "
if %ransu=3 mov $sel1,"Haha... let it all out in me. "
if %kousan=2 skip 4
name $name
eng $sel1:$sel6\
name ""
skillname "Death by Pumping"
dwave 1,"se\ero_chupa3.ogg"
>The Tiny Lamia starts to move her waist up and down!\
>Luka's being violently ridden by the Tiny Lamia!
if %nanido<2 damage 35,40
if %nanido=2 damage 52,60
if %nanido=3 damage 70,80
skillname ""
if %mylife=0 sub %stack,1:return *pramia_h2
sub %stack,1
return



*pramia_b1

add %stack,1
>The Tiny Lamia lowers Luka's pants!\
name $name
>With my lamia pussy, I'll squeeze everything out of you!\
name ""
if %kousan>0 skip 4
name "Luka"
>Don't do that!\
name ""
skillname "Reverse Rape"
lsp 690,":a;chara\pramia_ct01.bmp",0,0
lsp 700,":a;chara\pramia_h1.bmp",0,0:print 10,500
mov %kousoku,2
>The Tiny Lamia quickly dashes towards Luka and wraps her tail around his penis!\
skillname ""
name $name
>Time to violate you...@
>Shall I put it in?\
name ""
>The Tiny Lamia starts to slowly lower her tiny entrance towards Luka!\
mov %sinkou,2
sub %stack,1
return



*pramia_b2

add %stack,1
name $name
>Hehe, I'll eat you up.@
>With my tiny pussy...\
name ""
skillname "Reverse Rape"
dwave 1,"se\ero_pyu2.ogg"
lsp 690,":a;chara\pramia_ct02.bmp",0,0
lsp 700,":a;chara\pramia_h2.bmp",0,0:print 10,500
>The Tiny Lamia drops her waist, forcing Luka into her!\
name "Luka"
>Aahhhh!\
name ""
dwave 1,"se\ero_chupa5.ogg"
>The Tiny Lamia's extreme tightness attacks Luka!
mov %damage_kotei,1
damage 8,9
mov %kousoku,3:mov %genmogaku,100
skillname ""
if %mylife=0 sub %stack,1:return *pramia_h8
>Luka is being raped by the Tiny Lamia!\
name $name
>Doesn't it feel great inside me?@
>Let me make it feel even better!\
name ""
>The Tiny Lamia starts to violently tighten around Luka!\
name $name
>Haha, it's ok to scream.@
>I know you can't endure my techniques.\
name ""
name "Luka"
>Ahhhh!\
name ""
name $name
>Haha, you screamed!@
>It'll be fun to break you even more.\
>Heehee... squeeze, squeeze.@
>I'll tighten with all my strength!\
name ""
skillcount1 3010
skillname "Death by Tightness"
dwave 1,"se\ero_chupa5.ogg"
>Luka's penis is slowly crushed inside the Tiny Lamia!
mov %damage_kotei,1
damage 10,12
skillname ""
if %mylife=0 sub %stack,1:return *pramia_h1
name "Luka"
>Auuuuu!\
name ""
name $name
>Haha, you let out another cute voice.@
>Let out your male milk into me!\
name ""
skillcount1 3010
skillname "Death by Tightness"
dwave 1,"se\ero_chupa5.ogg"
>The Tiny Lamia continues to squeeze Luka!
mov %damage_kotei,1
damage 11,12
skillname ""
if %mylife=0 sub %stack,1:return *pramia_h1
name "Luka"
>Ahii.... Haaaaa!\
name ""
name $name
>Haha! More, more!@
>Go crazy! \
name ""
skillcount1 3010
skillname "Death by Tightness"
dwave 1,"se\ero_chupa5.ogg"
>The Tiny Lamia continues to squeeze Luka!
mov %damage_kotei,1
damage 11,12
skillname ""
if %mylife=0 sub %stack,1:return *pramia_h1
name $name
>Heeheehee... should I use my killing blow now?\
>It's no use trying to endure it...@
>Once I use it, you're going to go insane!\
name ""
skillcount1 3010
skillname "Death by Tightness"
dwave 1,"se\ero_chupa5.ogg"
>The Tiny Lamia's pussy suddenly shrinks!\
>Luka's penis is completely crushed between the walls of her tiny vagina!
mov %damage_kotei,1
damage 20,25
skillname ""
if %mylife=0 sub %stack,1:return *pramia_h1
name $name
>Aww, you didn't come yet?@
>But you're breathing so hard... you can't take much more, can you?\
>Let me just shake my waist a little bit then...@
>Once I do, you'll be done!\
name ""
name $name
>Haha, you're so pathetic! Now... you lose!\
name ""
skillcount1 3011
skillname "Death by Pumping"
dwave 1,"se\ero_chupa3.ogg"
>The Tiny Lamia starts to pump her waist up and down!\
>Luka is violently stimulated in her tightened pussy!
mov %damage_kotei,1
damage 30,35
skillname ""
if %mylife=0 sub %stack,1:return *pramia_h2
sub %stack,1
rnd2 %ransu,1,2
if %ransu=1 goto *pramia_b3
if %ransu=2 goto *pramia_b4



*pramia_b3

add %stack,1
skillcount1 3010
>Luka is being raped by the Tiny Lamia!\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Heehee... tighter, tighter. "
if %ransu=2 mov $sel1,"Stuck inside me... amazing, isn't it?"
if %ransu=3 mov $sel1,"Haha, you're leaking in me. "
name $name
eng $sel1:$sel6\
name ""
skillname "Death by Tightness"
dwave 1,"se\ero_chupa5.ogg"
>The Tiny Lamia makes herself even tighter!\
>Luka's penis is being crushed by the Tiny Lamia!
if %nanido<2 damage 35,40
if %nanido=2 damage 52,60
if %nanido=3 damage 70,80
skillname ""
if %mylife=0 sub %stack,1:return *pramia_h1
sub %stack,1
rnd2 %ransu,1,2
if %ransu=1 goto *pramia_b3
if %ransu=2 goto *pramia_b4



*pramia_b4

add %stack,1
skillcount1 3011
>Luka is being raped by the Tiny Lamia!\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Let me shake my hips for you. "
if %ransu=2 mov $sel1,"If I do this, you won't be able to last. "
if %ransu=3 mov $sel1,"Haha... let it all out in me. "
name $name
eng $sel1:$sel6\
name ""
skillname "Death by Pumping"
dwave 1,"se\ero_chupa3.ogg"
>The Tiny Lamia starts to move her waist up and down!\
>Luka's being violently ridden by the Tiny Lamia!
if %nanido<2 damage 35,40
if %nanido=2 damage 52,60
if %nanido=3 damage 70,80
skillname ""
if %mylife=0 sub %stack,1:return *pramia_h2
sub %stack,1
rnd2 %ransu,1,2
if %ransu=1 goto *pramia_b3
if %ransu=2 goto *pramia_b4



*pramia_onedari

mov $list1,"Tiny Lick"
if %3188>0 mov %list_num1,1
mov $list2,"Tiny Tit Fuck"
if %3189>0 mov %list_num2,1
mov $list3,"Tiny Tightening"
if %3190>0 mov %list_num3,1
mov $list4,"Tiny Tailjob"
if %3191>0 mov %list_num4,1
mov $list5,"Death by Tightness"
if %3010>0 mov %list_num5,1
mov $list6,"Death by Pumping"
if %3011>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *pramia_onedari1
if %cmd1=12 goto *pramia_onedari2
if %cmd1=13 goto *pramia_onedari3
if %cmd1=14 goto *pramia_onedari4
if %cmd1=15 goto *pramia_onedari5
if %cmd1=16 goto *pramia_onedari5
if %cmd1=-1 goto *pramia_main
goto *pramia_onedari



*pramia_onedari1

gosub *onedari_syori
name $name
>You want my tiny tongue to lick you all over...?@
>Alright, I'll make you go crazy with it! \
name ""
gosub *pramia_a1
skip -1



*pramia_onedari2

gosub *onedari_syori
name $name
>You want me to rub you with my huge breasts...?@
>Alright, I'll let you have your fill! \
name ""
gosub *pramia_a2
skip -1



*pramia_onedari3

gosub *onedari_syori_k
name $name
>Hahaha, you want me to tighten around you?@
>Alright, I'll squeeze everything out of you! \
name ""
if %kousoku=0 gosub *pramia_a3
gosub *pramia_a4
skip -1



*pramia_onedari4

gosub *onedari_syori_k
name $name
>You want me to squeeze you with my tail...?@
>Alright, I'll force you to come like you want! \
name ""
if %kousoku=0 gosub *pramia_a3
gosub *pramia_a5
skip -1



*pramia_onedari5

gosub *onedari_syori_k
name $name
>You want my special technique...?@
>Alright... I'll rape you until you go crazy then!\
name ""
if %kousoku=0 gosub *pramia_a3
if %kousoku=1 gosub *pramia_a6
if %kousoku=2 gosub *pramia_a7
name $name
>Thanks for waiting...@
>The technique you were waiting for... \
name ""
if %cmd1=15 gosub *pramia_a8
if %cmd1=16 gosub *pramia_a9
name "Luka"
>Auuuu!\
name ""
name $name
>Haha, you endured through it?@
>Let's see if you can endure it again!\
name ""
if %cmd1=15 gosub *pramia_a8
if %cmd1=16 gosub *pramia_a9
name $name
>Ahh, how lucky!@
>You're still able to take more...\
>But now you're done! \
name ""
if %cmd1=15 gosub *pramia_a8
if %cmd1=16 gosub *pramia_a9
skip -2



*pramia_h1

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\pramia_ct03.bmp",0,0
lsp 700,":a;chara\pramia_h3.bmp",0,0
gosub *syasei2
>Luka ejaculates in the Tiny Lamia's tight vagina!\
mov %viclose,1:gosub *lose
mov %2507,%2507+1:if %2507=1 mov %count_koenemy,%count_koenemy+1
if %2507>%count_most mov %count_most,%2507:mov $count_mostname,$name
count 1,7
mov $bad1," Luka was defeated by the Tiny Lamia's incredible tightness."
mov $bad2," Caught by the bandits, Luka was made into their sex slave."
name $name
>Haha, my ultimate move was too much for you!\
name ""
name "Luka"
>Uuuu...\
name ""
name $name
>I'll squeeze you even more.@
>Go crazy!\
name ""
goto *pramia_h



*pramia_h2

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\pramia_ct03.bmp",0,0
lsp 700,":a;chara\pramia_h3.bmp",0,0
gosub *syasei2
>Unable to withstand the Tiny Lamia's pumping waist, Luka explodes inside of her!\
mov %viclose,1:gosub *lose
mov %2507,%2507+1:if %2507=1 mov %count_koenemy,%count_koenemy+1
if %2507>%count_most mov %count_most,%2507:mov $count_mostname,$name
count 1,7
mov $bad1," Luka was defeated by the Tiny Lamia's violent pumping."
mov $bad2," Caught by the bandits, Luka was made into their sex slave."
name $name
>Haha, my sure-kill move was too much for you!\
name ""
name "Luka"
>Uuuuu...\
name ""
name $name
>I'll squeeze you even more.@
>Go crazy!\
name ""
goto *pramia_h



*pramia_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\pramia_bk01.bmp",0,0
gosub *syasei2
>Being licked by the Tiny Lamia, Luka orgasms!@
>Still licking Luka, semen shoots all over the Tiny Lamia's mouth!\
mov %viclose,1:gosub *lose
mov %2507,%2507+1:if %2507=1 mov %count_koenemy,%count_koenemy+1
if %2507>%count_most mov %count_most,%2507:mov $count_mostname,$name
count 4,7
mov $bad1," Luka was defeated by the Tiny Lamia's licking."
mov $bad2," Caught by the bandits, Luka was made into their sex slave."
gosub *face2
name $name
>Haha, I licked all of your semen up.@
>My tongue was amazing, wasn't it?\
name ""
goto *pramia_h



*pramia_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\pramia_bk02.bmp",0,0
gosub *syasei2
>Rubbed by the Lamia's tiny breasts, Luka ejaculates all over chest!\
mov %viclose,1:gosub *lose
mov %2507,%2507+1:if %2507=1 mov %count_koenemy,%count_koenemy+1
if %2507>%count_most mov %count_most,%2507:mov $count_mostname,$name
count 7,7
mov $bad1," Luka succumbs to the Tiny Lamia's small breasts."
mov $bad2," Caught by the bandits, Luka was made into their sex slave."
gosub *face2
name $name
>Hahaha, you got it all over my chest.@
>My breasts are amazing, aren't they?\
name ""
goto *pramia_h



*pramia_h5

mov %ikigoe,3:gosub *ikigoe
name $name
>Huh?\
name ""
gosub *syasei1
lsp 693,":a;chara\pramia_bk03.bmp",0,0
gosub *syasei2
>As the Tiny Lamia coils around Luka, he accidentally ejaculates!\
mov %viclose,1:gosub *lose
mov %2507,%2507+1:if %2507=1 mov %count_koenemy,%count_koenemy+1
if %2507>%count_most mov %count_most,%2507:mov $count_mostname,$name
mov %count_bouhatu,%count_bouhatu+1
count 16,7
mov $bad1," Luka accidentally climaxes while the Tiny Lamia prepares her ultimate move."
mov $bad2," Caught by the bandits, Luka was made into their sex slave."
name $name
>Haha, I didn't even start the real thing yet.@
>You're so pathetic!\
name ""
goto *pramia_h



*pramia_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\pramia_bk03.bmp",0,0
gosub *syasei2
>The Tiny Lamia's tightness forces Luka to come!\
mov %viclose,1:gosub *lose
mov %2507,%2507+1:if %2507=1 mov %count_koenemy,%count_koenemy+1
if %2507>%count_most mov %count_most,%2507:mov $count_mostname,$name
count 7,7
mov $bad1," Luka succumbed to the Lamia's tight grip."
mov $bad2," Caught by the bandits, Luka was made into their sex slave."
name $name
>Haha, you came while being squeezed!@
>Do you really like being tortured by a lamia that much?\
name ""
goto *pramia_h



*pramia_h7

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\pramia_bk04.bmp",0,0
gosub *syasei2
>Rubbed by the Tiny Lamia's tail, Luka explodes all over her!\
mov %viclose,1:gosub *lose
mov %2507,%2507+1:if %2507=1 mov %count_koenemy,%count_koenemy+1
if %2507>%count_most mov %count_most,%2507:mov $count_mostname,$name
count 19,7
mov $bad1," Stroked by the Tiny Lamia's tail, Luka ejaculates."
mov $bad2," Caught by the bandits, Luka was made into their sex slave."
name $name
>Hahaha, you got it all over my tail.@
>Do you really like being tortured by a lamia that much?\
name ""
goto *pramia_h



*pramia_h8

mov %ikigoe,2:gosub *ikigoe
name $name
>Ehh...!?@> Wait!\
name ""
gosub *syasei1
lsp 690,":a;chara\pramia_ct03.bmp",0,0
lsp 700,":a;chara\pramia_h3.bmp",0,0
gosub *syasei2
>As soon as Luka enters the Tiny Lamia, he orgasms!\
mov %viclose,1:gosub *lose
mov %2507,%2507+1:if %2507=1 mov %count_koenemy,%count_koenemy+1
if %2507>%count_most mov %count_most,%2507:mov $count_mostname,$name
mov %count_bouhatu,%count_bouhatu+1
count 1,7
mov $bad1," As soon as the Tiny Lamia pushes herself onto Luka, he accidentally ejaculates."
mov $bad2," Caught by the bandits, Luka was made into their sex slave."
name $name
>Hahaha!@
>You came right after I put it in! \
>What a pathetic man!\
name ""
goto *pramia_h



*pramia_h

if %2507=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>2 mov %hseanwave,3:hseanwave:goto *pramia_hb
name "Luka"
>Uuuu....\
name ""
>Forced to ejaculate, I fall to the ground in exhaustion.@
>I feel so drained, I'm unable to resist her.\
name $name
>From now on, I'm going to keep bullying you.\
>I'll get you addicted to my tight vagina.@
>Your white and sticky semen... give me lots!\
name ""
>The lamia wraps her tail around me, and pulls my waist into hers.\
cspl 690,699
lsp 690,":a;chara\pramia_ct01.bmp",0,0
lsp 700,":a;chara\pramia_h1.bmp",0,0:print 10,500
name $name
>Time for me to rape you...@
>I'm going to push you in slowly...\
name ""
>The lamia slowly forces me into her narrow entrance...@
mov %hseanwave,3:hseanwave
lsp 690,":a;chara\pramia_ct02.bmp",0,0
lsp 700,":a;chara\pramia_h2.bmp",0,0:print 10,500
>Screwing into her tightness, I start to let out a sigh.@
>Her overwhelming pressure forces my waist to writhe around.\
name "Luka"
>Aahh! Ahhhh!\
name ""
name $name
>Hahaha, my pussy is amazing, I know.@
>Let me bully your penis more!\
name ""
goto *pramia_hb



*pramia_hb

>Still recovering from my last ejaculation, the Tiny Lamia strangles my dick, from my base to the tip.\
name "Luka"
>Auuu!@>I'm... I'm stuck!\
name ""
name $name
>Fufu... what a nice voice.@
>I'm raping you while holding you down with my tail! Hahaha.\
name ""
>Her tiny tail, wrapped around my body, starts to forcefully thrust me deeper into her.\
>Completely defeated, I can't do anything but accept her torture.\
name $name
>Haha, not resisting?@
>If you don't do anything, I'm just going to milk you dry...\
name ""
name "Luka"
>Ahiii!\
name ""
>Completely locked inside of the lamia, I feel her start to rhythmically tighten and loosen around me...@
>My body starts to writhe at her rhythmic waves that are milking my member.\
name $name
>Hahaha! You're soooo weak!@
>Already giving up... do you want me to strangle you that much?\
name ""
>Laughing at me, the Tiny Lamia continues squeezing me inside of her.\
>Suddenly, she tightens up around the head of my dick, at her deepest part.@
>Hitting my weakest point, my back arches up.\
name "Luka"
>Stop it... no more...\
name ""
name $name
>Already going to come again?@
>Hahaha, how laame!\
>Just come, you pathetic loser!\
name ""
>Suddenly, the Tiny Lamia contracts her pussy tighter than ever before!\
name "Luka"
>Aaaaaaaahhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\pramia_ct03.bmp",0,0
lsp 700,":a;chara\pramia_h3.bmp",0,0
gosub *syasei2
>As soon as she tightened, I started to explode into her.@
>Right as I start ejaculating, she squeezes me, and stops me from fully coming!\
name $name
>Haha, I can make it even tighter than that, you know! \
name ""
name "Luka"
>Ahgg!@>Don't do... that!\
>Ahhhhh!\
name ""
mov %hseanwave,7:hseanwave
>My ejaculation unfinished, she strangles my cock, not letting anything else out.@
>I desperately try to push her off me, but her tail is too tightly wound for me to do anything.\
name $name
>Hahaha, you won't get me off!@
>I want to get even more milk from you, after all! \
name ""
name "Luka"
>Aahh!@>Ahhhh!\
name ""
>I writhe around and cling to the little lamia who's torturing me so mercilessly.@
>Not having fully finished my last orgasm, I already feel another one trying to explode.\
name $name
>Haha, every time I squeeze you, you let loose such a cute scream.@
>So pathetic!\
>I'll let you come, screaming like a loser!\
name ""
name "Luka"
>Haaaa!@> Ahhhhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\pramia_ct04.bmp",0,0
lsp 700,":a;chara\pramia_h4.bmp",0,0
gosub *syasei2
>While screaming pitifully, I violently climax, shooting my seed inside of her.@
>This little girl is milking me dry...\
name $name
>Your semen is so delicious.@
>Let me wring even more from you.\
name ""
name "Luka"
>Ahhh...@
>Plea....se... no more...\
name ""
>Despite my pleas, the lamia doesn't let up.@
>Still feeling the overwhelming stimulation, my vision starts to slowly go hazy.\
name $name
>Haha, I won't quit! @
>You're just a Lamia's prey now, after all.\
>Until you're completely empty, I won't stop milking you.@
>Until you become dry and shriveled, I'll keep going!\
name ""
name "Luka"
>Ahhh!@>N..o... way...\
name ""
>Writhing in pleasure, I try to protest one last time.@
>As I look down at where we're stuck together, she laughs at me.\
name $name
>Once I'm done, I'll let the others play with you.@
>I'll make you our sex slave.@> Don't worry, we'll have fun with you until you die.\
>Look forward to it, ok? \
name ""
name "Luka"
>N..o!@>Faaaaa!\
name ""
gosub *syasei1
lsp 690,":a;chara\pramia_ct05.bmp",0,0
lsp 700,":a;chara\pramia_h5.bmp",0,0
gosub *syasei2
>Horrified by her words, I'm brought to yet another climax.@
>Over and over, I'm forced to ejaculate without mercy.\
gosub *syasei1:gosub *syasei2
>In the overwhelming ecstasy, my consciousness starts to fade.\
name $name
>Oh? Did you faint?@
>Fainting from the pleasure, you're so pathetic!\
name ""
name "Luka"
>Aa......\
name ""
>Even as my vision goes black, the lamia continues to squeeze me.\
>Coming inside of the small lamia one last time, I lose consciousness.\
gosub *syasei1
gosub *syasei2
gosub *anten
mov %hseanwave,0:hseanwave
>Defeated by the Tiny Lamia, my adventure ends here.@
>Raped every day by the bandits, I have nothing to look forward to anymore but being their plaything...\
>............\
goto *badend



*vgirl_start

mov $name,"Vampire Girl"
mov $name2,"Vampire Girl"
mov $lavel,"vgirl"
mov $tatie1,"vgirl_st01"
mov $tatie2,"vgirl_st02"
mov $tatie3,"vgirl_st03"
mov $tatie4,"vgirl_st02"
mov $haikei,"bg022"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,85
if %nanido=2 mov %max_enemylife,127
if %nanido=3 mov %max_enemylife,127
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,90
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"Luka can't shake the Vampire Girl off!"
mov $mogaku_anno2,"Luka forces the Vampire Girl off!"
mov $mogaku_anno3,"Luka is unable to swing his sword like this!"
mov $mogaku_sel1,"Kuku, your struggling just makes it feel even better!"
mov $mogaku_sel2,"Kuku, how useless. Just surrender to my pussy."
mov $mogaku_sel3,"Struggle, struggle! Kukuku."
mov $mogaku_sel4,"How pathetic! Hahaha."
mov $mogaku_sel5,"How is it, you loser? Hahaha."
mov $mogaku_dassyutu1,"Mumumu..."
mov $mogaku_dassyutu2,"Just surrender obediently..."
mov $half_s1,"Kukuku, it looks like you're feeling good..."
mov $half_s2,"Are you happy to be hunted by a vampire...?"
mov $kiki_s1,"Haha, you're already leaking some!"
mov $kiki_s2,"I'll suck all of your semen out..."
mov %end_n,3
mov %exp_minus,65
mov %zmonster_x,-280
name $name
>I am the terror that flaps in the night...@
>The [Vampire Bandit of the Wind of The Four Bandits] shall be your opponent!\
>Kukuku... tonight I shall feast on you.\
name ""
name "Luka"
>............\
name ""
>It's certainly a vampire.@>A lot smaller than I expected...\
>The cute little Vampire is laughing as she swings her mantle around.\
name "Luka"
>Umm... Hey...\
name ""
>Though I don't want to fight someone so small, I slowly take out my sword.\
name $name
>Here I come!@
>I'll suck out all of your energy!\
name ""
>The Vampire Girl gets the first strike!\
skillname "Bat Change"
dwave 1,"se\bird.ogg"
csp 700:print 10,500
>The Vampire Girl disperses into hundreds of bats!\
>The bats attack Luka!
mov %damage_kotei,1
damage 2,3
skillname ""
name "Luka"
>Uwaa!\
name ""
>The bats don't particularly hurt, but there are a lot of them.\
>Even if she's small, I probably shouldn't take her lightly...\
name "Luka"
>Huh? Where did she go...?\
name ""
>After the bats fly away, I still can't see the Vampire anywhere.\
name $name
>Kukuku... I'm right here!\
name ""
name "Luka"
>Eh!?\
name ""
lsp 700,":a;chara\vgirl_st01.bmp",0,0:print 10,500
mov %kousoku,1:gosub *status_print
>The Vampire Girl suddenly jumps on Luka's back!\
mov %sinkou,1
if %nanido<2 mov %genmogaku,0
if %nanido=2 mov %genmogaku,0
if %nanido=3 mov %genmogaku,0
goto *common_main



*vgirl001

gosub *face3
name $name
>Hyaaaa!\
gosub *face1
>Trying to kill me, huh?@
>Look at my eyes, I'll enslave you!\
name ""
gosub *vgirl_b7
goto *common_main



*vgirl002

name $name
>Are you playing around...?\
name ""
gosub *vgirl_b7
goto *common_main



*vgirl_v

lsp 700,":a;chara\vgirl_st11.bmp",0,50:print 10,500
>The Vampire Girl starts to cry!\
name $name
>Waaah! Why are you being so mean to me!\
name ""
name "Luka"
>So... Sorry...\
name $name
>Waaah!\
name ""
>It looks like she lost the will to fight.@
>What the hell kind of fight was this...?\
name "Luka"
>By the way...@
>You said [Of the Wind], but you didn't use any wind attacks...?\
name ""
name $name
>I can't...@
>We're only imitating the Four Heavenly Knights...\
name ""
>Well, that's what I thought was happening.\
lsp 700,":a;chara\vgirl_st12.bmp",0,50:print 10,500
name $name
>Waaaaaaaaah!\
name ""
eng "The Vampire Girl runs away crying!":$sel6/
dwave 1,"se\escape.ogg"
csp 700:print 10,1000
\
mov %viclose,2:gosub *victory
mov %getexp,40:gosub *lvup
mov %2208,1
goto *sean0057



*vgirl_kousan1

gosub *kousan_syori
>Luka yields to the pleasure, ending his resistance!\
gosub *face2
name $name
>Kuku... succumbed to my charms?@
>Now... sit back and let me suck all your energy!\
name ""
goto *vgirl_a



*vgirl_kousan2

gosub *kousan_syori
>Luka yields to the pleasure, ending his resistance!\
gosub *face2
name $name
>Kuku... succumbed to my charms?@
>Now... just look into my eyes!\
name ""
goto *vgirl_a



*vgirl_kousan3

gosub *kousan_syori
>Luka yields to the pleasure, ending his resistance!\
gosub *face2
name $name
>Kuku... so you want me to do whatever I want to you?\
name ""
goto *vgirl_a



*vgirl_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *vgirl_attack1
if %cmd1=11 && %nanido=0 goto *common_attack
if %cmd1=11 && %sinkou<4 goto *vgirl_attack1
if %cmd1=11 && %sinkou=5 goto *vgirl_attack2
if %cmd1=11 && %sinkou=6 goto *common_attack
if %cmd1=12 goto *vgirl_mogaku
if %cmd1=13 && %sinkou=5 goto *vgirl_bougyo
if %cmd1=13 && %sinkou=6 goto *common_bougyo
if %cmd1=14 && %sinkou=1 goto *vgirl_nasugamama1
if %cmd1=14 && %sinkou=2 goto *vgirl_nasugamama2
if %cmd1=14 && %sinkou=3 goto *vgirl_nasugamama3
if %cmd1=14 && %sinkou=5 goto *vgirl_nasugamama4
if %cmd1=14 && %sinkou=6 goto *common_nasugamama
if %cmd1=15 && %sinkou<4 goto *vgirl_kousan1
if %cmd1=15 && %sinkou=5 goto *vgirl_kousan2
if %cmd1=15 && %sinkou=6 goto *vgirl_kousan3
if %cmd1=16 goto *vgirl_onedari
if %cmd1=17 goto *common_skill
goto *vgirl_main



*vgirl_attack1

mov %before_action,-3
gosub *common_attack1
if %enemylife=0 goto *vgirl_v
gosub *face3
name $name
>Hya!\
name ""
dwave 1,"se\dassyutu.ogg"
mov %kousoku,0:gosub *status_print
>Luka's attack forces the Vampire Girl off him!\
name $name
>Hey! What are you doing!?@
>Why are you bullying me...\
name ""
>Knocked on the floor, the Vampire Girl glares at Luka.@
lsp 700,":a;chara\vgirl_st11.bmp",0,50:print 10,500
>The Vampire Girl starts to cry!\
name $name
>Waah! Why are you doing horrible things to me!\
name ""
name "Luka"
>Ah... Sorry...\
name ""
>Seeing the crying vampire, I quietly apologize.\
mov %sinkou,4
goto *vgirl_a



*vgirl_attack2

mov %before_action,-3
gosub *common_attack1
if %enemylife=0 goto *vgirl_v
gosub *face3
name $name
>Hya!\
name ""
gosub *face1
name $name
>What are you doing!?@
>Look at my eyes, I'll enslave you!\
name ""
gosub *vgirl_b7
goto *common_main



*vgirl_mogaku

name "Luka"
>.....\
name ""
eng "I pick up the vampire, and take her off me.":$sel6/
dwave 1,"se\dassyutu.ogg"
mov %kousoku,0:gosub *status_print
\
gosub *face3
name $name
>Hey!@> What are you doing!?\
name ""
>I hold the helpless Vampire as she struggles in my grip.\
lsp 700,":a;chara\vgirl_st11.bmp",0,50:print 10,500
>The Vampire Girl starts to cry!\
name $name
>Waaah! Why are you being so mean!\
name ""
name "Luka"
>Ah... Sorry...\
name ""
>I apologize as I slowly lower the Vampire to the ground.\
mov %sinkou,4
goto *vgirl_a



*vgirl_bougyo

>Luka defends his body!\
name $name
>Now, look at my eyes!\
name ""
skillcount1 3013
skillname "Eyes of Obedience"
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
>The Vampire Girl's eyes shine!
delay 1000
dwave 1,"se\miss.ogg"
>But Luka wasn't looking!\
skillname ""
name $name
>Why did you turn away!@
>I told you to look!\
name ""
name "Luka"
>Err... even if you told me to...\
name ""
if %nanido<2 goto *vgirl_v
name $name
>You...!@
>I won't give up yet!\
name ""
>The Vampire Girl continues to fight!\
mov %sinkou,6
goto *common_main



*vgirl_nasugamama1

>Luka remains motionless!\
name $name
>Fufu... no resistance?@
>Then... let me have a taste...\
name ""
goto *vgirl_a



*vgirl_nasugamama2

>Luka remains motionless!\
name $name
>Haha, what's wrong?@
>Do you want me to suck out all your energy?\
name ""
goto *vgirl_a



*vgirl_nasugamama3

>Luka remains motionless!\
name $name
>Kukuku... so you want me to suck all your energy out through your penis?\
name ""
goto *vgirl_a



*vgirl_nasugamama4

>Luka remains motionless!\
name $name
>Kuku... that's right.@
>Now just look at my eyes...\
name ""
goto *vgirl_a



*vgirl_a

if %sinkou=1 gosub *vgirl_b1:goto *common_main
if %sinkou=2 gosub *vgirl_b2:goto *common_main
if %sinkou=3 gosub *vgirl_b3:goto *common_main
if %sinkou=4 gosub *vgirl_b6:goto *common_main
if %sinkou=5 && %before_action=21 goto *vgirl001
if %sinkou=5 && %before_action=41 goto *vgirl002
if %sinkou=5 gosub *vgirl_b7:goto *common_main
if %status=4 gosub *vgirl_a6:goto *common_main
rnd2 %ransu,1,4
if %ransu=1 gosub *vgirl_a1:goto *common_main
if %ransu=2 gosub *vgirl_a2:goto *common_main
if %ransu=3 gosub *vgirl_a3:goto *common_main
if %ransu=4 && %owaza_count2a>2 gosub *vgirl_a4:goto *common_main
skip -5



*vgirl_a1

add %stack,1
skillcount1 3192
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Haha, my mantle is good enough for you!"
if %ransu=2 mov $sel1,"Cover my mantle with your sticky seed!"
if %ransu=3 mov $sel1,"Kuku... my mantle will feel great when I rub you."
name $name
eng $sel1:$sel6\
name ""
skillname "Mantle Rub"
dwave 1,"se\ero_koki1.ogg"
>The Vampire Girl rubs Luka's penis with her mantle!
if %nanido<2 damage 7,9
if %nanido=2 damage 10,13
if %nanido=3 damage 14,18
skillname ""
if %mylife=0 sub %stack,1:return *vgirl_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*vgirl_a2

add %stack,1
skillcount1 3193
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Haha, shoot all of it out on my panties!"
if %ransu=2 mov $sel1,"You'll love the soft texture..."
if %ransu=3 mov $sel1,"Kuku... I'll squeeze you in my soft panties."
name $name
eng $sel1:$sel6\
name ""
skillname "Panty Rub"
dwave 1,"se\ero_koki1.ogg"
>The Vampire Girl rubs Luka's penis with her panties!
if %nanido<2 damage 8,10
if %nanido=2 damage 12,15
if %nanido=3 damage 16,20
skillname ""
if %mylife=0 sub %stack,1:return *vgirl_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*vgirl_a3

add %stack,1
skillcount1 3012
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Let me bite you some more!"
if %ransu=2 mov $sel1,"Let it all out in my mouth!"
if %ransu=3 mov $sel1,"I'll make you feel even better!"
name $name
eng $sel1:$sel6\
name ""
skillname "Energy Steal"
dwave 1,"se\ero_buchu3.ogg"
lsp 690,":a;chara\vgirl_ct01.bmp",0,0:print 10,500
>The Vampire Girl bites Luka's penis!\
>She steals energy from Luka!
if %nanido<2 damage 9,11
if %nanido=2 damage 14,17
if %nanido=3 damage 19,23
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *vgirl_h1
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*vgirl_a4

add %stack,1
skillcount1 3013
skillname "Eyes of Obedience"
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
>The Vampire Girl's eyes shine!\
mov %status,4:gosub *status_print
>Luka surrenders to the Vampire Girl!\
skillname ""
name "Luka"
>Eh...?@> What's happening?\
name ""
name $name
>Kukuku, you can't resist me anymore.@
>Now, lick me!\
name ""
if %nanido=2 mov %status_turn,1
if %nanido=3 rnd2 %status_turn,2,3
sub %stack,1
goto *vgirl_a5



*vgirl_a5

add %stack,1
>The Vampire Girl pushes Luka down, and stands over Luka's face!\
skillcount1 3014
skillname "Face Ride"
dwave 1,"se\ero_pyu1.ogg"
>The Vampire Girl pushes down on Luka's face!\
>Luka's mouth is covered by the Vampire Girl's pussy!
if %nanido<2 damage 9,11
if %nanido=2 damage 14,17
if %nanido=3 damage 19,23
skillname ""
if %mylife=0 sub %stack,1:return *vgirl_h2
if %kousan>2 sub %stack,1:return
name "Luka"
>Nrmm...@>*Lick*\
name ""
>As her warm vagina covers my mouth, my tongue starts to lick her against my will.\
>Her tiny slit covering my mouth, I furiously lick her.\
name $name
>Now, lick me all over.@
>Serve your master with your tongue.\
name ""
sub %stack,1
return



*vgirl_a6

add %stack,1
skillcount1 3014
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hya! Lick me more..."
if %ransu=2 mov $sel1,"It feels so good..."
if %ransu=3 mov $sel1,"Lick me harder!"
name $name
eng $sel1:$sel6\
name ""
skillname "Face Ride"
dwave 1,"se\ero_pyu1.ogg"
>The Vampire Girl pushes down on Luka's face!
if %nanido<2 damage 9,11
if %nanido=2 damage 14,17
if %nanido=3 damage 19,23
skillname ""
if %mylife=0 sub %stack,1:return *vgirl_h2
sub %stack,1
return



*vgirl_b1

add %stack,1
>The Vampire Girl bites Luka's neck!\
name "Luka"
>Uwaa!@>Huh?\
name ""
>But the Vampire Girl's fangs don't pierce Luka's skin!@
>The Vampire Girl starts to lick and suck on Luka's skin, with no effect!\
name $name
>Mmm.@> *Lick*@>*Lick*\
name ""
name "Luka"
>That tickles...@>What are you doing?\
name ""
name $name
>...I'm not sharp enough yet...\
name ""
>The Vampire Girl tries to bite Luka again!\
name "Luka"
>Ah... Stop that.\
name ""
>Honestly, her biting felt pretty good.\
>Just a little... it feels like some of my power is draining out of the tiny scratch on my neck.\
>It looks like she really can suck energy.\
skillcount1 3012
skillname "Energy Steal"
dwave 1,"se\ero_buchu3.ogg"
>The Vampire Girl sucks energy from Luka!
mov %damage_kotei,1
damage 4,5
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
name $name
>Kukuku... surprised?@
>Let me suck out all your energy...\
name ""
mov %sinkou,2
if %kousan>0 sub %stack,1:return
>The Vampire Girl laughs, and prepares to bite me again.@
>It might be bad if I let her keep doing this...\
sub %stack,1
return



*vgirl_b2

add %stack,1
skillcount1 3012
name $name
>Mmm...@> *Bite*\
name ""
skillname "Energy Steal"
dwave 1,"se\ero_buchu3.ogg"
>The Vampire Girl sucks Luka's energy!
mov %damage_kotei,1
damage 4,5
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
name "Luka"
>Auuu...\
name ""
>Slowly but surely, she's absorbing my energy...\
>There's also a sweet pleasure spreading from where she's trying to bite me...@
>It's fairly weak, but it feels amazing.\
>Responding to it, I can feel my dick start to react.\
name $name
>Mumu... your dick is reacting, huh?@
>Did my bite feel that good?\
name ""
>The Vampire laughs at me as she stops biting my neck.@
>Crawling down my body, she reaches my groin.\
name $name
>Well then... Next, let me suck energy right from your penis.@
>Get ready... Kukuku.\
name ""
mov %sinkou,3
if %kousan>0 sub %stack,1:return
name "Luka"
>Stop!\
name ""
>If it felt that good on my neck, what would it feel like if she bit me there...?\
sub %stack,1
return



*vgirl_b3

add %stack,1
>The little Vampire takes off my pants, my erect dick popping out in front of her face.\
lsp 690,":a;chara\vgirl_ct01.bmp",0,0
mov %kousoku,0:mov %stuck,1:gosub *status_print
name $name
>Mmm.@> *Bite*\
name ""
>The Vampire lightly bites my tip, as if giving it a tiny kiss.\
name "Luka"
>Aaaaahhhh!\
name ""
>As soon as I feel her mouth on me, pleasure explodes through my body.
mov %damage_kotei,1
damage 5,6
if %mylife=0 return *vgirl_h1
if %mylife<16 sub %stack,1:goto *vgirl_b5
gosub *face2
name $name
>Kuku... I bit your dick.@
>Let me suck all your energy out through it...\
>*Bite*\
name ""
skillcount1 3012
skillname "Energy Steal"
dwave 1,"se\ero_buchu3.ogg"
>The Vampire Girl bites Luka's dick!\
>She steals energy from Luka!
mov %damage_kotei,1
damage 14,15
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife<16 sub %stack,1:goto *vgirl_b5
name "Luka"
>Aaaaaaaaa!\
name ""
>A strange pleasure starts to spread through my groin.@
>Different from sexual pleasure, it starts to overpower all of my other senses.\
>A very calm, warm feeling...@
>All of my discomfort starts to fade away, leaving only pleasure.\
>At the same time this pleasure spreads, I can feel the Vampire sucking on me, giving normal sexual pleasure at the same time.\
name $name
>Kukuku... pleasure only a Vampire can bring.@
>It's too late for you now... become a slave to the pleasure.\
>*Bite*@> *Lick*@>*Bite*\
name ""
skillcount1 3012
skillname "Energy Steal"
dwave 1,"se\ero_buchu3.ogg"
>The Vampire Girl bites Luka's penis!\
>She steals energy from Luka!
mov %damage_kotei,1
damage 14,15
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife<16 sub %stack,1:goto *vgirl_b5
name "Luka"
>Faaaa!\
name ""
>My body starts to lose its strength, as it feels like I'm being taken over by a powerful alien sensation.\
>This unnatural pleasure starts to push away my sense of reason.\
name $name
>Mmm... It's so slippery in my mouth.@
>Are you already leaking out?@> It's too soon for that...\
name ""
name "Luka"
>Auuuu!\
name ""
name $name
>Kuku... it's alright if you can't endure it anymore.@
>Semen is my favorite food after all...\
>*Kiss*@> *Lick*@>*Bite*\
name ""
skillcount1 3012
skillname "Energy Steal"
dwave 1,"se\ero_buchu3.ogg"
>The Vampire Girl bites Luka's penis!\
>She steals energy from Luka!
mov %damage_kotei,1
damage 14,15
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife<16 sub %stack,1:goto *vgirl_b5
name "Luka"
>Ahiii!\
name ""
>Pleasure explodes through me as she bites down on me.@
>I feel the desire to ejaculate start to well up through me.\
name "Luka"
if %kousan=0 mov $sel1,"If you bite me again... I'm going to come!"
if %kousan>0 mov $sel1,"Ahhh! I'm going to come!"
eng $sel1:$sel6\
name ""
name $name
>Kukuku... going to let it out? That's fine.@
>I'll just suck out your semen like this...\
>*Kiss*@> *Lick*@>*Bite*\
name ""
skillcount1 3012
skillname "Energy Steal"
dwave 1,"se\ero_buchu3.ogg"
>The Vampire Girl bites Luka's penis!\
>She steals energy from Luka!
mov %damage_kotei,1
damage 14,15
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife<16 sub %stack,1:goto *vgirl_b5
sub %stack,1
goto *vgirl_b4



*vgirl_b4

add %stack,1
skillcount1 3012
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Let me bite you some more!"
if %ransu=2 mov $sel1,"Let it all out in my mouth!"
if %ransu=3 mov $sel1,"I'll make you feel even better!"
name $name
eng $sel1:$sel6\
name ""
skillname "Energy Steal"
dwave 1,"se\ero_buchu3.ogg"
>The Vampire Girl bites Luka's penis!
>She steals energy from Luka!
mov %damage_kotei,1
damage 14,15
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife<16 sub %stack,1:goto *vgirl_b5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
goto *vgirl_b4



*vgirl_b5

add %stack,1
name "Luka"
>Ahh... Sto...p...\
name ""
name $name
>Kukuku... the next bite will finish you off.@
>Once I bite down, you'll be my slave forever!\
lsp 690,":a;chara\vgirl_ct02.bmp",0,0:print 10,500
>*Kiss*@> *Lick*@>*Bite*\
name ""
skillcount1 3012
skillname "Energy Steal"
dwave 1,"se\ero_buchu3.ogg"
>The Vampire Girl bites Luka's penis!\
>She steals energy from Luka!
mov %damage_kotei,2
damage 15,16
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
sub %stack,1
return *vgirl_h1



*vgirl_b6

add %stack,1
name $name
>*Sniff* *Sniff*\
name ""
>Wiping tears from her eyes, the tiny Vampire stares at me.@
>It doesn't look like she's going to run away yet.\
gosub *face1
name $name
>I won't forgive you for that!@
>If it's come to this... I'll show you my true power!\
>Just wait a second, I'll focus all my magic!@
>Once I'm done, just look at my eyes, ok?\
name ""
name "Luka"
>.........\
name ""
skillname "Focus Magic"
dwave 1,"se\power.ogg"
>The Vampire Girl starts to focus her magic!\
skillname ""
mov %sinkou,5
sub %stack,1
return



*vgirl_b7

add %stack,1
skillcount1 3013
skillname "Eyes of Obedience"
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
>The Vampire Girl's eyes shine!\
mov %status,4:gosub *status_print
>Luka surrenders to the Vampire Girl, stopping all resistance!\
skillname ""
name "Luka"
>Eh...?@> What's... this...?\
name ""
name $name
>Kukuku...@>You can't move anymore.\
>First... lick my feet!\
name ""
>The Vampire Girl holds out her small foot in front of Luka.\
name "Luka"
>Ye...s...\
name ""
>My body starts to move against my will.@
>I kneel in front of the Vampire Girl, and start to lick her foot.\
name $name
>Hya... That tickles!@
>Kukuku... lick me more!\
name ""
name "Luka"
>Ye...s...\
name ""
>I continue to lick the Vampire Girl's tiny foot.@
>Completely humiliated, I'm unable to stop my tongue.\
name $name
>Fu... Alright, enough of my foot.@
>Now... lick me down there!\
name ""
sub %stack,1
goto *vgirl_b8



*vgirl_b8

add %stack,1
>The Vampire Girl pushes Luka down, and stands over his face.\
skillcount1 3014
skillname "Face Ride"
dwave 1,"se\ero_pyu1.ogg"
>The Vampire Girl presses her vagina into Luka's face!\
>Luka's mouth is covered by her pussy!
mov %damage_kotei,1
damage 15,17
skillname ""
if %mylife=0 return *vgirl_h2
if %mylife<18 sub %stack,1:goto *vgirl_b10
name "Luka"
>Nrrm...\
name ""
>My mouth is blocked by her warm vagina.@
>Unable to breathe, my body starts to struggle.\
>Her hairless crack is right over my lips.\
name $name
>Now lick.@
>Serve your master with your tongue.\
name ""
name "Luka"
>Fa...@>Right away...@>*Lick*\
name ""
>Unable to resist her words, I stick my tongue into her slit.@
>With every lick, a sweet taste fills my senses.\
gosub *face2
name $name
>Hya....@
>That's good... Lick me more...\
name ""
skillcount1 3014
skillname "Face Ride"
dwave 1,"se\ero_pyu1.ogg"
>As she commands me to lick her, the Vampire pushes her waist down on my face harder.
mov %damage_kotei,1
damage 15,17
skillname ""
if %mylife<18 sub %stack,1:goto *vgirl_b10
name "Luka"
>Mmmnnn...@>*Lick*@> *Lick*\
name ""
>Every time I lick her, I can taste a little fresh air.@
>Each breath fills me with more of her sweet smell.\
>Her smell starts to fill my body, wanting me to taste even more of it.\
>In addition, her sweet honey starts to taste better and better.@
>Each lick causes the taste to intensify, becoming even more addicting.\
name $name
>Mmm... That feels good.@
>Lick me more!\
name ""
>As I hear her sweet voice, I start to lick her even harder.\
skillcount1 3014
skillname "Face Ride"
dwave 1,"se\ero_pyu1.ogg"
>Each lick of her sweetness leaves me hungry for more.
mov %damage_kotei,1
damage 15,17
skillname ""
if %mylife<18 sub %stack,1:goto *vgirl_b10
name "Luka"
>Mmm...@> *Lick*@>*Lick*\
name ""
>I want more of her honey...@
>Each lick causes pleasure to shoot through me, bringing about an overpowering ecstasy that floods my body.\
name $name
>Lick more!@> More!\
name ""
skillcount1 3014
skillname "Face Ride"
dwave 1,"se\ero_pyu1.ogg"
>The Vampire Girl pushes down on Luka's face!
mov %damage_kotei,1
damage 15,17
skillname ""
name $name
>Mmmmmmm.@> Kukukuku....\
name ""
>Honey starts to flow from the vampire's hole, covering my face.@
>Covered in her sweetness, I continue to desperately lick her.\
if %mylife<18 sub %stack,1:goto *vgirl_b10
sub %stack,1
goto *vgirl_b9



*vgirl_b9

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hya! Lick me more..."
if %ransu=2 mov $sel1,"It feels so good..."
if %ransu=3 mov $sel1,"Lick me harder!"
name $name
eng $sel1:$sel6\
name ""
skillcount1 3014
skillname "Face Ride"
dwave 1,"se\ero_pyu1.ogg"
>The Vampire Girl pushes down on Luka's face!\
mov %damage_kotei,1
damage 15,17
skillname ""
if %mylife<18 sub %stack,1:goto *vgirl_b10
sub %stack,1
goto *vgirl_b9



*vgirl_b10

add %stack,1
name $name
>Haaaau!@
>I'm about to come... lick me harder!\
name ""
skillcount1 3014
skillname "Face Ride"
dwave 1,"se\ero_pyu1.ogg"
>The Vampire Girl pushes down on Luka's face!
mov %damage_kotei,2
damage 18,19
skillname ""
sub %stack,1
return *vgirl_h2



*vgirl_onedari

mov $list1,"Mantle Rub"
if %3192>0 mov %list_num1,1
mov $list2,"Panty Rub"
if %3193>0 mov %list_num2,1
mov $list3,"Energy Steal"
if %3012>0 mov %list_num3,1
mov $list4,"Eyes of Obedience"
if %3013>0 mov %list_num4,1
mov $list5,"Face Ride"
if %3014>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *vgirl_onedari1
if %cmd1=12 goto *vgirl_onedari2
if %cmd1=13 goto *vgirl_onedari3
if %cmd1=14 goto *vgirl_onedari4
if %cmd1=15 goto *vgirl_onedari5
if %cmd1=-1 goto *vgirl_main
goto *vgirl_onedari



*vgirl_onedari1

gosub *onedari_syori
name $name
>You want me to rub you with my mantle...?@
>Alright... cover my mantle with your semen!\
gosub *vgirl_a1
skip -1



*vgirl_onedari2

gosub *onedari_syori
name $name
>You want me to rub you with my panties...?@
>Alright... cover my panties with your semen!\
gosub *vgirl_a2
skip -1



*vgirl_onedari3

gosub *onedari_syori_k
name $name
>Kuku... you want me to suck out all your energy?@
>Alright... I'll do as you desire!\
name ""
if %sinkou=1 gosub *vgirl_b1
if %sinkou=2 gosub *vgirl_b2
if %sinkou=3 gosub *vgirl_b3
gosub *vgirl_a3
skip -1



*vgirl_onedari4

gosub *onedari_syori
name $name
>Kuku... you want to be ruled by me?@
>Well then...\
if %sinkou<6 gosub *vgirl_b7
gosub *vgirl_a4
mov %kousan,3
goto *common_main



*vgirl_onedari5

gosub *onedari_syori
name $name
>Kuku... you want me to ride your face?@
>Alright... choke on my pussy!\
name ""
if %sinkou<6 gosub *vgirl_b8
gosub *vgirl_a5
gosub *vgirl_a6
skip -1



*vgirl_h1

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\vgirl_ct03.bmp",0,0
lsp 691,":a;chara\vgirl_bk01.bmp",0,0
gosub *syasei2
>Luka ejaculates in the Vampire Girl's mouth!\
name $name
>*Cough*@>*Cough*\
name ""
>Shooting more than expected, the Vampire Girl starts to cough on Luka's semen.\
>Slowly licking her lips, she licks up every last drop!\
mov %viclose,1:gosub *lose
mov %2508,%2508+1:if %2508=1 mov %count_koenemy,%count_koenemy+1
if %2508>%count_most mov %count_most,%2508:mov $count_mostname,$name
count 4,7
mov $bad1," Luka surrenders to the Vampire Girl's bite."
mov $bad2," Captured by the bandits, Luka was made into their sex toy."
gosub *face2
name $name
>You let out so much...@> *Lick*\
name ""
goto *vgirl_ha



*vgirl_h2

name $name
>Faa! I'm coming!\
name ""
name "Luka"
>Me... me too!\
name ""
gosub *syasei1:gosub *syasei2
>Pleasure from the Vampire Girl's taste overpowering him, Luka ejaculates... even without her touching him!\
>At the same time, honey starts to overflow from the Vampire onto Luka's face!\
name "Luka"
>Mmm.@> *Lick*@>*Slurp*\
name ""
>While ejaculating, I'm covered in her delicious liquid...\
mov %viclose,1:gosub *lose
mov %2508,%2508+1:if %2508=1 mov %count_koenemy,%count_koenemy+1
if %2508>%count_most mov %count_most,%2508:mov $count_mostname,$name
count 17,7
mov $bad1," Made into a slave by the Vampire Girl, Luka becomes addicted to her taste."
mov $bad2," After that, Luka was made into the bandit's sex toy."
name $name
>Faaa.@>That felt good.\
name ""
>With a satisfied sigh, the Vampire gets off my face.@
>Looking at the semen I shot out, she bends over and puts her face on my groin.\
gosub *face2
name $name
>You came too...?\
name ""
>She takes off my pants, revealing my erect dick.\
goto *vgirl_hb



*vgirl_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\vgirl_bk02.bmp",0,0
gosub *syasei2
>Wrapped in her silky mantle, I ejaculate all over it.@
>My white semen stains her black mantle.\
name $name
>Kukuku... you came, you came!\
name ""
>Laughing triumphantly, the Vampire continues to rub me with her mantle, squeezing out every last drop.\
mov %viclose,1:gosub *lose
mov %2508,%2508+1:if %2508=1 mov %count_koenemy,%count_koenemy+1
if %2508>%count_most mov %count_most,%2508:mov $count_mostname,$name
count 27,7
mov $bad1," Luka surrenders to the Vampire Girl's mantle."
mov $bad2," Captured by the bandits, Luka was made into their sex toy."
gosub *face2
name $name
>Putting out this much...@> *Slurp*\
name ""
>The Vampire Girl licks all of the semen off her mantle.\
>After she licks the last drop, she moves her mouth towards my dick!\
goto *vgirl_ha



*vgirl_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\vgirl_bk04.bmp",0,0
gosub *syasei2
>Wrapped in her silky panties, I ejaculate all over it.@
>As I cover her panties with my semen, a strange sense of liberation washes over me.\
name $name
>My panties made you come?@
>Hahaha, how pathetic.\
name ""
>Laughing triumphantly, the Vampire continues to rub me with her panties, squeezing out every last drop.\
mov %viclose,1:gosub *lose
mov %2508,%2508+1:if %2508=1 mov %count_koenemy,%count_koenemy+1
if %2508>%count_most mov %count_most,%2508:mov $count_mostname,$name
count 27,7
mov $bad1," Luka surrenders to the Vampire Girl's underwear."
mov $bad2," Captured by the bandits, Luka was made into their sex toy."
gosub *face2
name $name
>Putting out this much...@> *Slurp*\
name ""
>The Vampire Girl licks all of the semen off her panties.\
>After she licks the last drop, she moves her mouth towards my dick!\
goto *vgirl_ha



*vgirl_ha

if %2803=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2803,1
name "Luka"
>Ahiii!\
name ""
mov %hseanvoice,1:hseanvoice
>The Vampire starts to lightly lick the tip of my penis.@
>Rolling up her tongue, she starts to lick the semen still inside my urethra out.\
lsp 690,":a;chara\vgirl_ct04.bmp",0,0:print 10,500
name $name
>Mmm...@> Delicious.\
>*Lick*@> *Lick*\
name ""
>After licking everything out from inside my shaft, the Vampire starts to suck on me.\
name "Luka"
>Faaaa!\
name ""
>I start to writhe as she licks me.@
>Right after I orgasm, her ruthless tongue tortures me.\
name $name
>More... I want to taste more...\
mov %hseanvoice,3:hseanvoice
>*Sluuuuuuurp*\
name ""
name "Luka"
>Haaaa... Stop!\
name ""
>The vampire's tiny mouth is sucking on my dick as if she is savoring a piece of candy, as opposed to trying to give me pleasure.\
>Her merciless mouth stimulating me, it feels like I'm starting to melt.\
name $name
>Mmmm...@>*Slurp*\
name ""
name "Luka"
>Haaa! Don't lick me like that...!\
name ""
>Each lick inside her tiny mouth seems to be draining my energy.\
>Each caress of her tongue causes a strange pleasure to spread through my groin.@
>Separate from the sexual pleasure, this foreign ecstasy starts to overpower me.\
name "Luka"
>Haaaa!\
>Stop... I'm coming again!\
name ""
name $name
>Haha... It's alright... Let it out!@
>*Lick*@> *Sluuuurp*\
name ""
name "Luka"
>Ahh... It's leaking out...!@
>Ahhhh!\
name ""
>Being violently caressed by her tongue, my resistance vanishes.@
gosub *syasei1
lsp 690,":a;chara\vgirl_ct05.bmp",0,0
gosub *syasei2
>Unable to endure, I come in the Vampire Girl's mouth!\
name $name
>Mmmm...@>*Lick*@> *Slurp*\
name ""
name "Luka"
>Ahhii! Don't lick my tip like that...\
name ""
>As I orgasm, the vampire's tongue flicks the tip of my penis.@
>Still sensitive after coming, she sticks the tip of her tongue into my urethra to lick out all of my sperm.\
name $name
>*Lick*@> *Lick*\
name ""
name "Luka"
>Haaaaa!\
name ""
>Having both my semen and my energy being sucked by the vampire, she continues to play with my dick inside her mouth.\
>No matter how much I writhe, she doesn't release her hold on me.\
name $name
>More... More... You need to come more!@
>*Lick*@> *Slurp*@> Delicious!\
name ""
name "Luka"
>Stop or...@> I'll come again...\
name ""
mov %hseanvoice,4:hseanvoice
name $name
>*Lick*@> *Slurp*\
name ""
name "Luka"
>Aaaahhhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\vgirl_ct06.bmp",0,0
gosub *syasei2
name $name
>*Lick*@> *Lick*@>*Slurp*\
name ""
>Licking up everything I let out, the tiny vampire's tongue never lets up her violent assault.\
>My energy and my semen...@>This girl is sucking everything from me...\
name "Luka"
>Ahhhh...\
name ""
>Drained of all my power, I can't even lift a finger anymore.@
>Exhausted, my vision starts to go black.\
name $name
>*Lick*@> *Lick*@>*Slurp*\
name ""
name "Luka"
>Aa....a....a...\
name ""
gosub *syasei1:gosub *syasei2
>Everything being absorbed by the vampire, I lose consciousness.\
gosub *anten
mov %hseanvoice,0:hseanvoice
>My unconscious body is moved deeper inside the cave.@
>I have no idea what's going to happen to me after this...\
>The only thing I know for certain is that my adventure has ended...\
>...........\
goto *badend



*vgirl_hb

if %2804=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2804,1
name "Luka"
>Auu... What... ?\
name ""
name $name
>Alright, now I'll reward you.@
>I'm a vampire, so I can suck energy from you.@
>Now... let me suck all of your energy out of your dick.\
name ""
>The Vampire Girl stands over Luka's groin, straddling him.@
>Holding my dick in front of the soaking hole I was just licking, she puts my tip right at her entrance.\
name "Luka"
>Aaaaa!\
name ""
>Any moment I'm about to pierce into the little vampire's secret place...@
>Petrified by expectation, I can only stare.\
name $name
>Now...@> Time to eat! \
name ""
name "Luka"
>Aaaaaaah!\
name ""
mov %hseanwave,9:hseanwave
cspl 690,699
lsp 700,":a;chara\vgirl_h1.bmp",0,0:print 10,500
>The Vampire lowers her waist, swallowing me into her pussy.\
>Ahh, her warm honeypot...@
>As I feel her, I feel the coming orgasm building in me all at once.\
name $name
>Faaa... your dick... delicious. @
>Give me your energy...\
name ""
name "Luka"
>Haaaa!\
name ""
>The Vampire starts to shake her waist.@
>At the same time, the strange pleasure from her bite before starts to fill my waist, blocking out all of my other senses.\
>To this strange pleasure, different from an orgasm, I start to relax.\
name "Luka"
>Faa... So good...\
name ""
name $name
>You pervert.@
>Having your energy sucked by a vampire, but sighing so happily.\
>Make me feel good too!\
name ""
>As the Vampire girl commands me while looking at my face, she wriggles her pussy around.\
>Her movements fill me with even more of that strange ecstasy in addition to the normal sexual pleasure.\
name "Luka"
>Ahhh! Coming...!\
name ""
name $name
>Oh, are you coming already...?@
>Kuku... it's alright to shoot it in me.\
>A man's semen is my favorite dish, after all. \
name ""
>The mixing pleasure from her soft vagina and strange Vampire power brings me to the edge.\
>My desire to surrender everything to this Vampire Girl grows stronger by the second.\
name $name
>Faaa! I'm coming again!\
name ""
gosub *syasei1
lsp 700,":a;chara\vgirl_h2.bmp",0,0
gosub *syasei2
>As we orgasm at the same time, I shoot my sperm into her delicious honey filled hole.\
name $name
>Mmm...@> Delicious.\
>Lots of delicious semen...\
>I could get addicted to your taste...@
>Now, let me have everything you have! \
name ""
name "Luka"
>Haaaau!\
name ""
>I let out a yell as I writhed under the vampire's body.\
>The feeling of her sucking both my energy and my semen out makes my vision go a little hazy.\
>I can't resist whatever this girl says...@
>More than humiliation, I'm feeling such excitement.\
name $name
>Let me tease your dick more!@
>I'll suck everything out of you...\
name ""
mov %hseanwave,10:hseanwave
>My energy is being quickly absorbed through my penis.\
>As if my whole being was being drained out of my dick, I sigh in resignation.\
name "Luka"
>Ahhh...@>I'm coming again!\
name ""
>As I feel pathetic at coming again so quickly, the Vampire only laughs at me.\
name $name
>More milk?@
>Kukuku... I'll take it all! \
name ""
>As she said that, she tightens her pussy!\
name "Luka"
>Haau! Ahhhhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\vgirl_h3.bmp",0,0
gosub *syasei2
>Exploding again, I let everything out inside of the vampire.\
name $name
>Mmm... Delicious.\
name ""
>The small Vampire looked down at me and gave a sweet sigh.\
name $name
>I think I'll keep you as my pet.@
>I'll let the other's play with you too.@
>You can be our toy!\
name ""
name "Luka"
>That... Ahhh...\
name ""
>Slowly being squeezed, a numbing feeling starts to spread over me.@
>I want to let everything out into her...\
name $name
>For now, I'll just squeeze some more out of you!@
>You're our toy from now on, so be sure not to die ok?\
name ""
name "Luka"
>Auuuu!\
name ""
gosub *syasei1
lsp 700,":a;chara\vgirl_h4.bmp",0,0
gosub *syasei2
gosub *anten
mov %hseanwave,0:hseanwave
>Everything being sucked out of me, I start to lose consciousness.@
>From now on, I'm nothing but the bandit's toy.\
>I don't have any time to be depressed at my situation, though.@
>I'm raped in turn by the four of them all day, every day.\
>Being trained by my master the vampire, I come to accept my new life.\
>..........\
goto *badend



*dragonp_start

mov $name,"Dragon Pup"
mov $name2,"Dragon Pup"
mov $lavel,"dragonp"
mov $tatie1,"dragonp_st01"
mov $tatie2,"dragonp_st02"
mov $tatie3,"dragonp_st03"
mov $haikei,"bg022"
mov %monster_x,0
mov %monster_y,0
mov %max_enemylife,90
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,1
gosub *maxmp:mov %mp,1
gosub *syutugen
mov %end_n,3
mov %exp_minus,105
mov %zmonster_x,-280
mov %tukix,300
name $name
>Gao!\
name ""
>I knew it.@
>Even though she's so tiny and cute, dragons are still very powerful.\
>I shouldn't let my guard down.\
name $name
>The last of the four, this [Dragon of Fire of The Four Bandits] shall be your opponent!\
>Coming so far into our hideout... you must be a true Hero!\
name ""
name "Luka"
>Bad little thieves like you need to be punished!\
name ""
>I take out my sword.@
>This desperate determination I had before coming here... is it finally time to use it?\
name $name
>Gao!\
name ""
>The Dragon Pup strikes first!\
skillname "Intense Flame"
dwave 1,"se\fire1.ogg"
lsp 690,":a;effect\008.bmp",0,0:print 10,500
>Flames shoot out of the Dragon Pup's mouth!
damage 8,10
skillname ""
csp 690:print 10,500
if %mylife=0 goto *dragonp_h1
name "Luka"
>Ah! Hot!\
name ""
>As I thought, even though she's tiny...@
>Dragons are still very dangerous!\
mov %sinkou,1
goto *common_main



*dragonp_v

gosub *face3
name $name
>Uga!\
name ""
>The Dragon Pup falls on the ground!\
name "Luka"
>I.. won?\
name ""
lsp 700,":a;chara\dragonp_st11.bmp",0,50:print 10,500
name $name
>Ugaga!@> Uuuu!\
name ""
>The Dragon Pup starts to cry!@
>It doesn't look like she can fight back.\
name "Luka"
>My win...\
name ""
>Feeling the taste of victory, I put away my sword.\
>The fight's over...@
>In the heroic fight between Hero and Dragon... the Hero won!\
mov %viclose,1:gosub *victory
mov %getexp,45:gosub *lvup
mov %2209,1
goto *sean0058



*dragonp_kousan

gosub *kousan_syori
>Luka gives up, ending his resistance!\
name $name
>What's wrong? Not going to try...?\
name ""
goto *dragonp_a



*dragonp_main

gosub *cmd_main
if %cmd1=11 && %nanido=0 goto *common_attack
if %cmd1=11 && %sinkou=1 goto *dragonp_attack1
if %cmd1=11 && %sinkou=2 goto *dragonp_attack2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *dragonp_kousan
if %cmd1=16 goto *dragonp_onedari
if %cmd1=17 && %nanido=0 goto *common_skill
if %cmd1=17 goto *dragonp_skill
goto *dragonp_main



*dragonp_attack1

mov %before_action,1
name "Luka"
>Here I come!\
name ""
>This sword won't kill her...@
>I'll attack without hesitation!\
>Luka slashes down at the Dragon Pup's head!
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\slash.ogg"
rnd2 %damage,2,3:gosub *enemylife2
if %enemylife=0 goto *dragonp_v
name "Luka"
>Eh...?\
name ""
name $name
>Uga!\
name ""
>My sword hits her right on the head...@
>But doesn't do anything!\
>Her hard head is a lot stronger than it looks...\
name "Luka"
>Guh... How hard...\
name ""
>No matter how cute, a dragon is a dragon.@
>She can breathe fire, and even has super defense...\
gosub *face3
name $name
>U..uuuuu\
name ""
>Even though my slash didn't do anything, tears start to appear in her eyes.\
>However, she shakes off the tears!\
gosub *face1
name $name
>Uuuu...@>Uga!\
name ""
name "Luka"
>Uwa! Stop it!\
name ""
skillname "Bite"
dwave 1,"se\kamituki.ogg"
>The Dragon Pup jumps on Luka, and bites him!
damage 7,9
skillname ""
if %mylife=0 goto *dragonp_h1
name $name
>Ugaa!@>Ugaa!\
name ""
name "Luka"
>Ouch!@>Damn, that hurt!\
name ""
>I push the Dragon Pup off with all my strength.@
>She quickly picks herself up, and faces me.\
>She's small, but a really troublesome opponent.@
>I need to finish this off with my best shot...\
mov %sinkou,2
goto *common_main



*dragonp_attack2

mov %before_action,1
name "Luka"
>Hya!\
name ""
mov %skill_sub,1
gosub *common_attack2
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\slash.ogg"
rnd2 %damage,2,3:gosub *enemylife2
if %enemylife=0 goto *dragonp_v
if %first_sel1=1 goto *dragonp_a
name $name
>Ugah!\
name ""
name "Luka"
>Damn. It's no good after all.\
name ""
>Her scales are too hard.@
>I need to use something stronger...\
mov %first_sel1,1
goto *dragonp_a



*dragonp_skill

gosub *cmd_skill
if %cmd1=21 goto *dragonp_skill1
if %cmd1=22 goto *dragonp_skill2
if %cmd1=35 goto *skill17
if %cmd1=-1 goto *dragonp_main
goto *dragonp_skill



*dragonp_skill1

mov %before_action,21
name "Luka"
>I'll finish this with my best shot!\
name ""
>My image of a brave Hero was always like this...@
>The valiant Hero standing up to the fire-breathing monster dragon, in a valiant battle to defend the kingdom.\
>Well... she's a little bit different than my imagination, but the time has finally arrived!\
>As I think that, my power rises!\
name "Luka"
>Here I go! Demon Decapitation!\
name ""
>As I swing, the dragon brings up her sharp nail!\
name $name
>Uga!\
name ""
name "Luka"
>Uoooooo!\
name ""
>We both attack each other at the same time!@
>Our attacks intersect!\
mov %mp,%mp-2
gosub *mp
skillname "Demon Decapitation"
dwave 1,"se\tuki.ogg"
lsp 2,":a;effect\009_01.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009_02.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009_03.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009_04.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009_05.bmp",%tukix,%tukiy:print 10,12
csp 2
mov %abairitu,150+%mylv*3/2:gosub *enemylife
skillname ""
goto *dragonp_v



*dragonp_skill2

mov %skill_sub,1
gosub *skill2
mov %skill_sub,0
name $name
>Uga...?\
name ""
goto *dragonp_a



*dragonp_a

rnd2 %ransu,1,3
if %ransu=1 gosub *dragonp_a1:goto *common_main
if %ransu=2 gosub *dragonp_a2:goto *common_main
if %ransu=3 gosub *dragonp_a3:goto *common_main
skip -4



*dragonp_a1

add %stack,1
name $name
>Gao!\
name ""
skillname "Intense Flame"
dwave 1,"se\fire1.ogg"
lsp 690,":a;effect\008.bmp",0,0:print 10,500
>Flames start to shoot out of the Dragon Pup's mouth!
damage 8,10
skillname ""
csp 690:print 10,500
if %mylife=0 sub %stack,1:return *dragonp_h1
sub %stack,1
return



*dragonp_a2

add %stack,1
name $name
>Uga!\
name ""
skillname "Bite"
dwave 1,"se\kamituki.ogg"
>The Dragon Pup jumps at Luka, and bites him on the head!
damage 7,9
skillname ""
if %mylife=0 sub %stack,1:return *dragonp_h1
sub %stack,1
return



*dragonp_a3

add %stack,1
name $name
>Uga!\
name ""
skillname "Scratch"
dwave 1,"se\tume.ogg"
>The Dragon Pup jumps at Luka, and scratches him!
damage 6,8
skillname ""
if %mylife=0 sub %stack,1:return *dragonp_h1
sub %stack,1
return



*dragonp_onedari

name $name
>Scratching, biting, burning... I'll beat you with all of my skills!\
name ""
goto *dragonp_main



*dragonp_h1

name "Luka"
>Ahhh!\
name ""
>Taking deep damage, I can no longer stand.@
>Falling to the ground, I lose the fight!\
mov %viclose,2:gosub *lose
mov %2509,%2509+1:if %2509=1 mov %count_koenemy,%count_koenemy+1
if %2509>%count_most mov %count_most,%2509:mov $count_mostname,$name
count 14,7
mov $bad1," Beaten in combat by the Dragon Pup, Luka is raped."
mov $bad2,"Captured by the bandits, Luka is made into their sex toy."
goto *dragonp_h



*dragonp_h

if %2509=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name $name
>Ugaaa!\
name ""
>Standing over me, the dragon lets loose a cry of victory.@
>The little dragon looks down at me...\
lsp 700,":a;chara\dragonp_st02.bmp",0,0:print 10,500
>The Dragon Pup's eyes start to water as she looks at Luka.\
name $name
>Ugaa...@
>You... I want to rape you...\
name ""
name "Luka"
>Eh...?\
name ""
>Staring at me, the dragon's cheeks start to get red.@
>Fidgeting and rubbing her hands together, she looks really nervous.\
>I've heard that there were monster's who would force a man to mate with them if they were beaten...\
name $name
>Ugaaa!\
name ""
name "Luka"
>Haaa! Stop it!\
name ""
>Looking excited, the dragon leans into me.@
>The pup cuts open my pants, and rips off my underwear.\
>The Dragon Pup's hole starts to drip with clear liquid as she stares at me.\
name $name
>Uga... \
name ""
>The dragon's eyes light up as she pushes me down.@
>As I follow her eyes, I realize what she's about to do...\
name $name
>Wahaha... I'm going to put it in! \
name ""
>The dragon straddles my waist, and moves my erect dick to her entrance.@
>I can feel a soft heat coming off of her flowing hole.\
name "Luka"
>Stop... this...\
name ""
name $name
>Uga... I'm going to mate with you...@
>Let out a lot in me, ok? \
name ""
name "Luka"
>Aaaaa!\
name ""
mov %hseanwave,2:hseanwave
cspl 690,699
lsp 700,":a;chara\dragonp_h1.bmp",0,0:print 10,500
>The Dragon Pup quickly drops down!@
>In one shot, Luka screws all the way into the Dragon Pup!\
name "Luka"
>Auuu!\
name ""
>Surprisingly hot, her tight pussy squeezes me right after I enter her.\
>The pleasure overpowers me, making me forget the taboo of mating with a monster.\
name "Luka"
>Amazing... That feels so good...\
name ""
>One of the strongest monsters, the Dragon Pup's honey pot is amazing enough to force a man to yield instantly.\
name $name
>Is it hot inside of me?@
>Let me make it feel even better...\
name ""
>The dragon pup starts to shake her waist back and forth.@
>Inside of her hot insides, my penis starts to twitch.\
name "Luka"
>Aaaahh!\
name ""
>The hot walls of her vagina massage me all over every time she moves her waist.@
>The intense pleasure brings me to the edge.\
name "Luka"
>Aahh... Stop...@
>Don't... shake your hips like that...\
name ""
>I reach out my hand and grab her waist.@
>If she does anymore, I'm really going to co...\
name $name
>No! No!@>I'm raping you!@
>I won't listen to anything you say!\
name ""
>The dragon grabs my hand on her waist and forces me off.@
>She picks up her speed, pumping me even harder!\
name "Luka"
>Aaaaaaa!\
name ""
name $name
>Wahahaha!@
>You're about to come!\
name ""
>Her violent thrusting sends me over the edge.@
>There's no way I can withstand this insane stimulation!\
name "Luka"
>Ahhh! I'm coming!\
name ""
>My endurance gone, I give in to her merciless thrusting.\
gosub *syasei1
lsp 700,":a;chara\dragonp_h2.bmp",0,0
gosub *syasei2
>Feeling completely helpless, I explode inside of the dragon as she sucks all of my semen up.\
name $name
>...You let out so much... \
name ""
>The pup looks down at me and laughs.@
>Her superiority as a female over a male puts a cruel smile on her face.\
>As I look at her laughing over me, I feel humiliated.\
name $name
>Wahaha! Again!@
>I want to mate with you more!\
name ""
name "Luka"
>Aaaah!\
name ""
mov %hseanwave,8:hseanwave
>She starts thrusting again suddenly.@
>Stimulated by her movement and heat, her violent movements force me to become instantly hard again.\
name $name
>Wahaha!@
>When you feel good, just let it all out in me!\
name ""
>Her tiny body holding me, I'm forced into her all the way with every thrust she makes.\
>With her piston movement, she forces pleasure into me.\
name "Luka"
>Aaaauuu...@> Ahhhh!\
name ""
>Thrust, thrust... Each one is like a killing blow on me.\
>Her hot walls massaging me with every pump, she continues her sweet torture.\
>The forced pleasure is enough to cause any man to surrender...\
name "Luka"
>Amaz...ing!\
>Coming... again..,!\
name ""
>Forced all the way into her, I explode again!\
gosub *syasei1
lsp 700,":a;chara\dragonp_h3.bmp",0,0
gosub *syasei2
name "Luka"
>Auuu....\
name ""
>As I pour my semen into her, all of my strength fades from my body.\
name $name
>Did it feel good?@
>I feel really good, too! \
>I really like you.@
>We'll take good care of you, and you can mate with all of us, ok?\
name ""
name "Luka"
>That... No...@>Faaa!\
name ""
name $name
>I won't listen to any complaints!@
>Wahahaha. \
name ""
>As she sits on me laughing, she tightens her pussy.@
>Stuck in her warm honey pot, I'm unable to resist.\
>Being raped by the Dragon Pup, my vision starts to go hazy.\
gosub *syasei1
lsp 700,":a;chara\dragonp_h4.bmp",0,0
gosub *syasei2
name "Luka"
>Faaa... Too... good...\
name ""
>My mind and body surrenders completely to the little dragon.\
gosub *anten
mov %hseanwave,0:hseanwave
>My adventure ends here...@
>From now on, I'll be raped continually by the bandits...\
>But maybe... it won't be so bad...\
>...........\
goto *badend



*mitubati_start

mov $name,"Bee Girl"
mov $name2,"Bee Girl"
mov $lavel,"mitubati"
mov $tatie1,"mitubati_st01"
mov $tatie2,"mitubati_st02"
mov $tatie3,"mitubati_st03"
mov $tatie4,"mitubati_h1"
mov $haikei,"bg011"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,150
if %nanido=2 mov %max_enemylife,180
if %nanido=3 mov %max_enemylife,180
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"Luka can't break free of the Bee Girl!"
mov $mogaku_anno2,"Luka breaks free!"
mov $mogaku_anno3,"Luka's power is weakened as he attacks!"
mov $mogaku_sel1,"Just sit there and let my tongue play with you..."
mov $mogaku_sel2,"I'll show you heaven, just relax..."
mov $mogaku_sel3,"I'll make it gentle, you'll love it..."
mov $mogaku_sel4,"My tongue is amazing, isn't it?"
mov $mogaku_sel5,"Don't struggle... let me taste more of you."
mov $mogaku_dassyutu1,"Oh? You weren't satisfied...?"
mov $mogaku_dassyutu2,"I guess I'll need to lick you harder next time..."
mov $half_s1,"I'll lick you until you come..."
mov $half_s2,"Just ejaculate like that."
mov $kiki_s1,"It looks like you're almost done."
mov $kiki_s2,"Give me a taste of your sweet male honey..."
mov %end_n,3
mov %exp_minus,0
mov %zmonster_x,-200
mov %tukix,280
name $name
>Fufu... an unbaptized traveler.@
>You look delicious.\
name ""
>The Bee Girl licks her lips as she stares at me.@
>Honey is dripping from the nest attached to her abdomen.\
gosub *face2
name $name
>I'll spread my honey all over you, and slowly lick it off...@
>Let my tongue taste every part of you...\
name ""
gosub *face1
mov %sinkou,1
goto *common_main



*mitubati_v

gosub *face3
name $name
>What... is this? My strength...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Taking a fatal blow, the Bee Girl turns into a small bee.@
>The Angel Halo has sealed her in a harmless form!\
>The Bee Girl flies off somewhere!\
mov %viclose,1:gosub *victory
mov %getexp,40:gosub *lvup
mov %2210,1
goto *sean0061



*mitubati_kousan

gosub *kousan_syori
>Luka yields to the promise of pleasure, ending his resistance.\
gosub *face2
name $name
>So you want to be played with my tongue...?@
>Alright... I'll show you heaven!\
name ""
goto *mitubati_a



*mitubati_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *mitubati_kousan
if %cmd1=16 goto *mitubati_onedari
if %cmd1=17 goto *common_skill
goto *mitubati_main



*mitubati_a

if %turn=1 gosub *mitubati_a1:goto *common_main
if %kousoku=1 rnd2 %ransu,1,2
if %kousoku=1 && %ransu=1 gosub *mitubati_a4:goto *common_main
if %kousoku=1 && %ransu=2 gosub *mitubati_a5:goto *common_main
rnd2 %ransu,1,2
if %ransu=1 gosub *mitubati_a2:goto *common_main
if %ransu=2 && %owaza_count1a>2 gosub *mitubati_a3:goto *common_main
skip -3



*mitubati_a1

add %stack,1
if %kousan=2 skip 4
name $name
>I'll cover you in honey...\
name ""
skillname "Sweet Honey"
dwave 1,"se\ero_slime2.ogg"
>The Bee Girl pours honey all over Luka!
if %nanido<2 damage 3,5
if %nanido=2 damage 4,7
if %nanido=3 damage 6,10
skillname ""
name "Luka"
>What is this!?\
name ""
>Sticky honey covers my body.\
>The sweet smell of her honey overpowers my senses as it covers my body.\
gosub *face2
name $name
>Fufu... I'm so happy.@
>Covered in my sweet honey, let me lick you all over.\
>Of course I'll lick your dick too...@
>Your delicious semen will be even better mixed with my honey.\
name ""
gosub *face1
mov %sinkou,2
sub %stack,1
return



*mitubati_a2

add %stack,1
skillcount1 3015
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"*Lick* *Lick*"
if %ransu=2 mov $sel1,"Give me a taste..."
if %ransu=3 mov $sel1,"Fufu... Delicious..."
name $name
eng $sel1:$sel6\
name ""
skillname "Lick"
dwave 1,"se\ero_pyu1.ogg"
>The Bee Girl's tongue extends, quickly licking Luka's dick!
if %nanido<2 damage 9,11
if %nanido=2 damage 13,16
if %nanido=3 damage 18,22
skillname ""
if %mylife=0 sub %stack,1:return *mitubati_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*mitubati_a3

add %stack,1
skillcount1 3016
gosub *face2
if %kousan=2 skip 7
name $name
if %first_sel1=1 skip 3
>Fufu... I caught you.\
skip 2
>How many licks will it take...?\
name ""
skillname "Binding Lick"
dwave 1,"se\ero_pyu2.ogg"
lsp 690,":a;chara\mitubati_ct01.bmp",0,0:print 10,500
>The Bee Girl is clinging to Luka!\
>The Bee Girl starts to lick Luka's dick!
if %nanido<2 damage 13,16
if %nanido=2 damage 19,24
if %nanido=3 damage 26,32
mov %kousoku,1:gosub *status_print
>Luka's body is held tight by the Bee Girl!\
skillname ""
if %mylife=0 sub %stack,1:return *mitubati_h2
if %kousan<2 csp 690:print 10,500
if %kousan=2 sub %stack,1:return
name $name
if %first_sel1=1 skip 4
>Let me lick you more.@>*Lick*\
>Drown in the pleasure of my tongue...\
skip 3
>Not able to forget my tongue, huh?@
>This time until you surrender...\
name ""
mov %first_sel1,1
if %nanido<2 mov %genmogaku,1
if %nanido=2 mov %genmogaku,1
if %nanido=3 mov %genmogaku,2
sub %stack,1
return



*mitubati_a4

add %stack,1
skillcount1 3016
>Luka's body is held tight by the Bee Girl!\
rnd2 %ransu,1,10
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Haha... just try to resist me.":mov $sel2,"The Bee Girl's tongue is wrapped around Luka!"
if %ransu=2 mov $sel1,"I'll cover your cute face with honey...":mov $sel2,"The Bee Girl licks Luka's face!"
if %ransu=3 mov $sel1,"Let me lick your whole body...":mov $sel2,"The Bee Girl licks Luka all over with her slimy tongue!"
if %ransu=4 mov $sel1,"How cute... you're so sensitive.":mov $sel2,"The Bee Girl's honey covered tongue rubs Luka's penis!"
if %ransu=5 mov $sel1,"Mmm. Delicious.":mov $sel2,"The Bee Girl's tongue licks all over Luka's groin!"
if %ransu=6 mov $sel1,"Are you losing your strength...?":mov $sel2,"The Bee Girl licks Luka's neck!"
if %ransu=7 mov $sel1,"It's ok to struggle... If you can, that is.":mov $sel2,"The Bee Girl licks Luka all over his body with her slimy tongue!"
if %ransu=8 mov $sel1,"You're leaking out from your tip...":mov $sel2,"The Bee Girl sticks her tongue into Luka's urethra!"
if %ransu=9 mov $sel1,"This will feel amazing!":mov $sel2,"The Bee Girl violently licks Luka's penis!"
if %ransu=10 mov $sel1,"I'll give you some honey here, too...":mov $sel2,"The Bee Girl licks the base of Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Binding Lick"
dwave 1,"se\ero_pyu2.ogg"
lsp 690,":a;chara\mitubati_ct01.bmp",0,0:print 10,500
eng $sel2:$sel6
if %nanido<2 damage 13,16
if %nanido=2 damage 19,24
if %nanido=3 damage 26,32
skillname ""
if %mylife=0 sub %stack,1:return *mitubati_h2
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*mitubati_a5

add %stack,1
>Luka's body is held tight by the Bee Girl!\
skillcount1 3221
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Haha, your nipple is erect... how shameful."
if %ransu=2 mov $sel1,"Even though you're a male, you'll still love this."
if %ransu=3 mov $sel1,"I'll play with your nipple with my tongue..."
name $name
eng $sel1:$sel6\
name ""
skillname "Nipple Lick"
dwave 1,"se\ero_pyu1.ogg"
csp 690:print 10,500
>The Bee Girl licks Luka's nipples!
if %nanido<2 damage 12,15
if %nanido=2 damage 18,22
if %nanido=3 damage 24,30
skillname ""
if %mylife=0 sub %stack,1:return *mitubati_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*mitubati_onedari

mov $list1,"Lick"
if %3015>0 mov %list_num1,1
mov $list2,"Binding Lick"
if %3016>0 mov %list_num2,1
mov $list3,"Nipple Lick"
if %3221>0 mov %list_num3,1
gosub *cmd_onedari
if %cmd1=11 goto *mitubati_onedari1
if %cmd1=12 goto *mitubati_onedari2
if %cmd1=13 goto *mitubati_onedari3
if %cmd1=-1 goto *mitubati_main
goto *mitubati_onedari



*mitubati_onedari1

gosub *onedari_syori
name $name
>You want to be defeated by my licking...?@
if %sinkou=1 mov $sel1,"Then, first..."
if %sinkou=2 mov $sel1,"Alright, I'll give you what you desire..."
eng $sel1:$sel6\
if %sinkou=1 gosub *mitubati_a1
gosub *mitubati_a2
skip -1



*mitubati_onedari2

gosub *onedari_syori_k
name $name
>You want to be defeated by my licking...?@
if %sinkou=1 mov $sel1,"Then, first..."
if %sinkou=2 mov $sel1,"Alright, I'll give you what you desire..."
eng $sel1:$sel6\
if %sinkou=1 gosub *mitubati_a1
if %kousoku=1 skip 6
gosub *mitubati_a3
name $name
>Now, let me lick you even more.@
>Surrender everything to my tongue...\
name ""
gosub *mitubati_a4
skip -1



*mitubati_onedari3

gosub *onedari_syori_k
name $name
>Even being a man, you want me to lick your nipples...?@
if %sinkou=1 mov $sel1,"Then, first..."
if %sinkou=2 mov $sel1,"Alright, I'll give you what you desire..."
eng $sel1:$sel6\
if %sinkou=1 gosub *mitubati_a1
if %kousoku=1 skip 6
gosub *mitubati_a3
name $name
>Now, let me lick you even more.@
>I'll tease your nipples...\
name ""
gosub *mitubati_a5
skip -1



*mitubati_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\mitubati_bk02.bmp",0,0
gosub *syasei2
>Unable to endure the Bee Girl's tongue, I ejaculate.@
>My overflowing semen mixes with the honey all over me.\
mov %viclose,1:gosub *lose
mov %2510,%2510+1:if %2510=1 mov %count_koenemy,%count_koenemy+1
if %2510>%count_most mov %count_most,%2510:mov $count_mostname,$name
count 4,3
mov $bad1," Luka surrenders to the Bee Girl's tongue."
mov $bad2," Luka remained the Bee Girl's ejaculation slave until he died."
gosub *face2
goto *mitubati_ha



*mitubati_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\mitubati_ct02.bmp",0,0
lsp 700,":a;chara\mitubati_h2.bmp",0,0
gosub *syasei2
>Unable to endure the Bee Girl's tongue, I ejaculate.@
>My overflowing semen mixes with the honey all over me.\
mov %viclose,1:gosub *lose
mov %2510,%2510+1:if %2510=1 mov %count_koenemy,%count_koenemy+1
if %2510>%count_most mov %count_most,%2510:mov $count_mostname,$name
count 4,3
mov $bad1," Bound by the Bee Girl's tongue, Luka surrenders."
mov $bad2," Luka remained the Bee Girl's ejaculation slave until he died."
goto *mitubati_hb



*mitubati_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\mitubati_h2.bmp",0,0
gosub *syasei2
>As the Bee Girl licks my nipples, I orgasm, shooting semen all over the Bee Girl's waist!\
mov %viclose,1:gosub *lose
mov %2510,%2510+1:if %2510=1 mov %count_koenemy,%count_koenemy+1
if %2510>%count_most mov %count_most,%2510:mov $count_mostname,$name
count 23,3
mov $bad1," Bound by the Bee Girl's tongue, Luka surrenders."
mov $bad2," Luka remained the Bee Girl's ejaculation slave until he died."
goto *mitubati_hb



*mitubati_ha

if %2805=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2805,1
name $name
>Haha, you let out your male juice.@
>Mixed with my honey... delicious.\
name ""
name "Luka"
>Faaaa...\
name ""
mov %hseanvoice,1:hseanvoice
cspl 690,699
lsp 700,":a;chara\mitubati_h1.bmp",0,0:print 10,500
>The bee licks the tip of my penis as I ejaculate, licking up the semen and the honey.@
>The intense stimulation causes my body to shake.\
name $name
>Your honey covered penis shooting off so much semen... Fufu.\
>I'll mix even more of my honey on you to make the ultimate seasoning...@
>Semen filled honey... it would taste heavenly, don't you think?\
name ""
lsp 690,":a;chara\mitubati_ct01.bmp",0,0:print 10,500
>The Bee Girl's tongue starts to wrap around my shaft in a spiral.@
>It slowly creeps up until it's completely wrapped around me.\
>Her tongue starts to gently massage the tip of my penis, slowly licking up the semen-mixed honey.\
name "Luka"
>Haauu....\
name ""
>Wrapped around me, my back arches as the pleasure was more than I expected.\
name $name
>You men... you're all weak here.\
name ""
>Wrapped around my honey-covered dick, the bee increases the force that she's licking my tip with.\
name "Luka"
>Hyaaaa!@
>Don't lick my tip like that!\
name ""
name $name
>Fufu... honey and semen... delicious.\
name ""
name "Luka"
>Faaa... Stop...\
name ""
>Her rough tongue, wrapped tightly around me, starts to slowly move up and down, massaging my sensitive area.@
>The sensation makes shivers run through my body.\
name $name
>Mmmm.@
>*Lick*@> *Lick*\
name ""
name "Luka"
>Auuuu!\
name ""
>Her warm and sticky tongue licks me without mercy.@
>As she tastes my sticky honey covered penis, a sweet pleasure spreads through my waist.\
name $name
>I can feel a slightly salty taste now...@
>Your male juice is leaking out again...\
name ""
>Her tongue starts to poke at the urethral opening, lapping up all of the pre-come that's coming out.\
name "Luka"
>Faaaa!\
name ""
>Stimulating my most sensitive part, the trembling in my body gets more violent.\
name $name
>It looks like I lapped it all up...@
>I guess I need to just force more out of you...@>*Lick*\
name ""
name "Luka"
>Aahh... Faaa....@
>That's... Amazing!\
name ""
>As the Bee Girl licks my tip, she tightens the part of her tongue that's coiled around my dick.\
>From the base to the shaft to the tip, my entire glans is stimulated.\
name "Luka"
>Co...coming!@
>Aaaahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\mitubati_h2.bmp",0,0
lsp 690,":a;chara\mitubati_ct02.bmp",0,0
gosub *syasei2
>Receiving her sweet stimulation, my cock explodes, shooting semen all over her tongue.\
name $name
>Your semen...@>Delicious.\
>*Lick*@> *Lick*\
name ""
>Drunk on the pleasure, my strength fades as her violent licking continues.\
>Due to all her licking, the honey is almost all gone.\
mov %hseanvoice,0:hseanvoice
name $name
>Fufu... Do you want more honey?\
name ""
name "Luka"
>Ah....\
name ""
>The bee pours honey from the hive on her back all over me.@
mov %hseanvoice,5:hseanvoice
>Now completely covered in her warm honey, the Bee Girl tightens her tongue around my sticky dick.\
name "Luka"
>Faaaa!\
name ""
name $name
>*Lick*@> *Lick*\
name ""
>The rough tongue massaging me, covered in sticky honey, is too much for me to bear.@
>My vision goes hazy as my endurance fades.\
>Her tongue, tightly wrapped around me, continues to tighten and play with me as my body unconsciously twitches with every lick.\
name "Luka"
>Ahiii... Amazing...!\
name ""
>Her movements start to slowly change from before.\
>As if simply licking candy instead of trying to stimulate me, the unexpected change in licking brings intense pleasure.\
>Slowly crawling all over me, I twitch helplessly as her tongue forces pleasure into me.\
>Brought to the limit, I'm unable to hold on any longer.\
name "Luka"
>Aaaah!\
name ""
gosub *syasei1
lsp 690,":a;chara\mitubati_h3.bmp",0,0
lsp 690,":a;chara\mitubati_ct03.bmp",0,0
gosub *syasei2
>So soon after my last orgasm, I explode again.@
>Not letting up, the Bee Girl sticks her tongue on my tip, licking even harder as I spurt.\
name "Luka"
>Faaa... don't lick... the hole where it comes out...!\
name ""
name $name
>Mmm... You let it out again.@> Delicious.\
>*Lick*@> *Lick*\
name ""
>Ignoring my pleas, the Bee Girl continues to forcefully lick my urethral opening, licking up the honey-mixed semen.\
name $name
>*Lick*@> *Lick*\
name ""
name "Luka"
>Ahiii!\
name ""
>As soon as she lapped everything up, the bee tightens her tongue to force even more out of me.\
>Due to my increasingly sensitive glans, I'm too weak to resist her tongue.@
>As her tongue continues to lick my tip, I feebly yell out.\
name "Luka"
>St...op...! Coming...again...\
name ""
name $name
>Fufu... shoot it out!@
>*Lick*@> *Lick*\
name ""
>The Bee Girl looks at me as she tightens her tongue.\
>Poking my tip with her tongue, the rising feeling of another ejaculation becomes overpowering.\
>Even though I just came, her tongue is forcing me to reach another height...\
name "Luka"
>Aaa.... Coming.....@>Ah...h....\
name ""
gosub *syasei1
lsp 690,":a;chara\mitubati_h4.bmp",0,0
lsp 690,":a;chara\mitubati_ct04.bmp",0,0
gosub *syasei2
>Her sweet tongue stimulates me over and over, bringing me to repeated heights.@
>How many times has it been now...? I've lost track...\
name $name
>Mmm...@> Delicious.\
>*Lick*@> *Lick*\
name ""
>After each ejaculation, she laps everything up and continues stimulating me towards the next.\
mov %hseanvoice,0:hseanvoice
name $name
>Your sperm is unusually delicious...@
>I can't let such a fine catch get away.\
name ""
name "Luka"
>Eh...?\
name ""
>Finished licking up everything from my last orgasm, the Bee Girl starts to laugh.\
name $name
>I'll carry you back to my hive and keep you...@
>My semen slave... Fufufu.\
name ""
name "Luka"
>No wa...@> Ahiii!\
name ""
mov %hseanvoice,1:hseanvoice
>My protest is cut short by her tongue stimulating my tip again.\
>If I'm brought back to her hive, and forced to continually ejaculate like this for her...\
>I'll be nothing but a source of food for her...\
name "Luka"
>I don't want that!\
name ""
name $name
>Fufu... Delicious.@
>*Lick*@> *Lick*\
name ""
mov %hseanvoice,0:hseanvoice
gosub *anten
>Meeting a miserable end, she ignores my protest and takes me back to her hive.@
>A tragic fate, I've been made into her semen slave.\
>My adventure is over...\
>.........\
goto *badend



*mitubati_hb

if %2806=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2806,1
name $name
>You let it out... your male juice.@
>Mixed with honey... delicious.\
name ""
name "Luka"
>Faaa...\
name ""
>Right after ejaculating, the Bee Girl licks all over my dick.@
>The suddenly stimulation causes shivers to run through my body.\
name $name
>Fufu... Your semen is delicious.@
>You're just a source of food for me but... I wouldn't mind you in here for now.\
name ""
cspl 690,699
>The bee grips both of my shoulders and pulls me towards her.@
>Held tightly, I can't break her grip.\
name "Luka"
>Wh... What are you doing!?\
name ""
name $name
>Fufu... don't you want to feel more of me?@
>I'll even let you shoot it out inside of me...\
name ""
>The Bee Girl moves her waist over my groin and...@
mov %hseanwave,20:hseanwave
lsp 690,":a;chara\mitubati_ctb01.bmp",0,0:print 10,500
>Forces my dick into her!\
name "Luka"
>Aaauuu... Ahhhh!\
name ""
>Her seductive insect vagina...@
>Protected by a hard insect shell, she exposes her raw hole as she forces me into her.\
name $name
>An insect's reproductive system is different from a human's...@
>They both accept a male's penis, but that's about it.\
>It feels quite different from a bland humans, no?\
name ""
name "Luka"
>Aauuuu!@
>Inside... Amazing!\
name ""
>Tiny pieces of hair seem to line her pussy's walls, giving a bristly feeling.@
>The bristly hairs feel like they're covered in honey...\
>The peculiar bristly feeling combined with the warm honey shoots an intense pleasure through my waist with every movement.\
>Every time the bee shakes her hips, more sticky honey gets on me.@
>The sticky feeling brings more pleasure from the friction, making my dick feel like it's melting in her.\
name "Luka"
>Faaa...@>Too good...\
name ""
name $name
>Arara... What a bad little boy.@
>I thought your god forbade you from doing things like this?\
name ""
name "Luka"
>Aaauuu...\
name ""
>That's right... I'm mating with a monster now...@
>I broke her commandment.... I'm committing the ultimate taboo...\
name "Luka"
>N... No!@> Get off of me!\
name ""
name $name
>No.@>Just shoot your semen into me like this...\
name ""
>The Bee Girl shakes her waist as she plays with me.@
>My penis twitches from the shaking inside her sticky hole.\
>The intense stimulation brings me to the edge.\
name "Luka"
>Auuuu!\
name ""
>I somehow managed to endure, but it doesn't seem like the bee will allow it.\
>She increases her movements, trying to force it out of me.\
name $name
>Explode in me...@
>I know you can't resist the pleasure...\
name ""
>Her renewed attacks breaks down my resistance as I feel the orgasm start to rise through me.\
name "Luka"
>Ahh... I can't...\
name ""
>At last, I can't withstand the pleasure any longer.@
>I don't want to commit the taboo, but I can't hold on any longer...@
>My lower body relaxes.\
gosub *syasei1
lsp 690,":a;chara\mitubati_ctb02.bmp",0,0
lsp 700,":a;chara\mitubati_h2.bmp",0,0
gosub *syasei2
name "Luka"
>Auuuu...\
name ""
>I orgasm, shooting my semen into her.@
>Mating with a monster... the humiliation builds in me.\
name $name
>Fufu... was it good?@
>This is what it's like to mate with a monster...\
>The pleasure your goddess forbade to you...\
name ""
name "Luka"
>Faaa...\
name ""
>Not releasing me after my orgasm, the bee holds me in her, but stops moving her waist.\
name $name
>Next, you move.@
>I'll let you use my pussy... just thrust and make yourself feel good.\
name ""
name "Luka"
>I don't...\
name ""
>Though I say that, I start to slowly move my hips.\
>I start to push deep into her honey filled hole.\
name "Luka"
>Aahh... Ok...\
name ""
>I want to feel more of her warm insect vagina...\
>Covered in her sticky honey, the pleasure starts to quickly feel unbearable.\
name "Luka"
>Faa... This feels good...@
>More... More...\
name $name
>Hahaha... You're completely hooked.@
>Indulging in the pleasure only a monster can bring...\
>Committing the ultimate taboo... is it really ok with you?\
name ""
name "Luka"
>Faaa....\
name ""
>Such a thing has become meaningless as I taste more of her honey.\
>No... Even the immorality of the pleasure seems to increase the stimulation.\
>Thrusting into her, I feel another climax coming.\
name "Luka"
>Ahhhh!@
>I'm coming again!\
name ""gosub *syasei1
lsp 690,":a;chara\mitubati_ctb03.bmp",0,0
lsp 700,":a;chara\mitubati_h3.bmp",0,0
gosub *syasei2
>I explode again inside of her.@
>As I come, it feels as if my dick is melting in her.\
name "Luka"
>Faa....\
name ""
name $name
>Fufu... was it good?@
>Then... This time, I'll move.\
name ""
mov %hseanwave,21:hseanwave
>The Bee Girl gently pulls me out of her, then pushes her waist against me until I'm all the way in her.\
>The Bee Girl pumps me with no mercy, bringing intense friction as the sticky honey rubs all over her insides.\
name "Luka"
>Ahiii! Ahhhhh!\
name ""
name $name
>More... More... Soak in the pleasure of mating with a monster.@
>I'll take all of your sperm...\
name ""
>The stimulating becoming more intense, I start to leak out into her sticky interior.\
>I feel the pressure from another orgasm rise through my waist.\
name "Luka"
>Like this... I'm going to come... again!\
name ""
name $name
>Already? What a pathetic man...@
>Just let it out, then!\
name ""
name "Luka"
>Faaaa!\
name ""
gosub *syasei1
lsp 690,":a;chara\mitubati_ctb04.bmp",0,0
lsp 700,":a;chara\mitubati_h4.bmp",0,0
gosub *syasei2
mov %hseanwave,0:hseanwave
>Coming again, I slump in exhaustion.\
name $name
>Fufu... Giving up just with this?@
>You're weak...\
>It can't be helped I guess... I'll just need to train you more.@
>I'll take you back to my hive and mate with you even more.\
name ""
name "Luka"
>Auuu... No way...\
name ""
>Even if I resist, I have no strength to do anything.@
>Since I lost, I have no choice in the matter...\
name $name
>But... Before that, let me squeeze out some more.\
name ""
mov %hseanwave,21:hseanwave
name "Luka"
>Ahiii! Ahhhh!\
name ""
>The Bee Girl starts to shake her waist again.@
>As she pumps me, her long tongue starts to lick me all over my body.\
>Feeling pleasure all over my body, I start to go crazy.\
name $name
>Shoot out even more!\
name ""
name "Luka"
>Ahhhhhh!\
name ""
gosub *syasei1:gosub *syasei2
>Licking and pumping without mercy, she squeezes even more out of me.@
>My adventure ends here, as I'm turned into the Bee Girl's semen slave...\
gosub *anten
mov %hseanwave,0:hseanwave
>..........\
goto *badend



*hapy_a_start

mov $name,"Harpy"
mov $name2,"Harpy"
mov $lavel,"hapy_a"
mov $tatie1,"hapy_a_st01"
mov $tatie2,"hapy_a_st02"
mov $tatie3,"hapy_a_st03"
mov $tatie4,"hapy_a_h1"
mov $haikei,"bg023"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,150
if %nanido=2 mov %max_enemylife,150
if %nanido=3 mov %max_enemylife,150
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,1
gosub *maxmp:mov %mp,1
gosub *syutugen
mov $mogaku_anno1,"Luka can't get the Harpy off of him!"
mov $mogaku_anno2,"Luka pushes off the Harpy!"
mov $mogaku_anno3,"Luka can't get the Harpy off of him!"
mov $mogaku_sel1,"Hehehe... you won't get me off. Just help me make a baby. "
mov $mogaku_sel2,"Hehehe... you won't get me off. Just help me make a baby. "
mov $mogaku_sel3,"It's no use... Just let me violate you like this. "
mov $mogaku_sel4,"It's no use... Just let me violate you like this. "
mov $mogaku_sel5,"It's no use... Just let me violate you like this. "
mov $mogaku_dassyutu1,"Aww... You don't want to mate with me?"
mov $mogaku_dassyutu2,"You don't want to make a baby with me...?"
mov $half_s1,"Are you ready yet...?"
mov $half_s2,"Then let's make a baby. "
mov $kiki_s1,"First you have to come before we make a baby..."
mov $kiki_s2,"Just inseminate me..."
mov %end_n,3
mov %exp_minus,40
mov %zmonster_x,-280
lsp 700,":a;chara\hapy_a_st01.bmp",110,0
lsp 701,":a;chara\mob_syounen.bmp",-210,0:print 10,500
name "Little Boy"
>Uwaa! Help me!\
name ""
>A harpy is grabbing the boy, about to take off with him in her talons!\
name "Luka"
>Stop! Let go of the boy!\
name ""
>I pull out my sword and run at the harpy.@
>All the other villagers appear to have run indoors.\
name $name
>Huh? I haven't seen you in this village before...@
>Are you a traveler?\
name ""
>The Harpy appears to be sizing me up with her eyes.@
lsp 700,":a;chara\hapy_a_st02.bmp",110,0:print 10,500
>Suddenly the Harpy releases the boy and smiles, as she licks her lips.\
name $name
>Alright... I'll let the boy go.@
>Instead... I'll kidnap you! \
name ""
name "Luka"
>Run away, little boy!\
name ""
name "Little Boy"
>O... Ok!\
name ""
dwave 1,"se\escape.ogg"
csp 701:print 10,500
>Making sure the boy gets away safely, I raise my sword at the Harpy.@
>Man that was really Hero-like!\
lsp 700,":a;chara\hapy_a_st02.bmp",0,0:print 10,500
name $name
>Heehee... you're much nicer than that little boy. @
>I'll take you back to my nest, and we can make lots of children.\
>Or we can start making them right here...?@
>Be a good boy and make a lot of children with me...\
name ""
gosub *face1
name "Luka"
>Grr...@
>I'll get rid of all of you kidnapping monsters!\
name ""
name $name
>Here I come!\
name ""
mov %sinkou,1
mov %owaza_count1a,3
goto *common_main



*hapy_a_v

gosub *face3
name $name
>I'll... I'll let you go with just this much today!\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,1000
>The Harpy yells at me as she flies away.\
mov %viclose,2:gosub *victory
mov %getexp,50:gosub *lvup
mov %2211,1
goto *sean0062



*hapy_a_kousan

gosub *kousan_syori
>Luka yields to the promise of pleasure, and stops resisting!\
gosub *face2
name $name
>Hehehe, giving up? Then let's make a baby...@
>Now... inseminate me! \
name ""
mov %sinkou,2
goto *hapy_a_a



*hapy_a_main

gosub *cmd_main
if %cmd1=11 && %kousoku=1 && %sinkou<3 goto *hapy_a_miss31
if %cmd1=11 && %kousoku=1 && %sinkou=3 goto *hapy_a_miss32
if %cmd1=11 && %kousoku=2 goto *common_mogaku
if %cmd1=11 && %nanido=0 goto *common_attack
if %cmd1=11 && %sinkou=1 goto *hapy_a_attack1
if %cmd1=11 && %sinkou=2 goto *hapy_a_attack2
if %cmd1=11 && %sinkou=3 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *hapy_a_kousan
if %cmd1=16 goto *hapy_a_onedari
if %cmd1=17 && %nanido=0 goto *common_skill
if %cmd1=17 && %sinkou<3 goto *hapy_a_skill
if %cmd1=17 && %sinkou=3 goto *common_skill
goto *hapy_a_main



*hapy_a_attack1

mov %before_action,1
mov %skill_sub,1
gosub *common_attack1
dwave 1,"se\bird.ogg"
wait 500
dwave 2,"se\miss.ogg"
>But the Harpy flies into the sky, avoiding Luka's attack!\
name "Luka"
>Hey!@> That's not fair!\
name ""
name $name
>How is it unfair? I'm flying with my own wings...\
name ""
name "Luka"
>That's true...\
name ""
>Looking up helplessly, I'm at a loss.\
mov %sinkou,2
goto *hapy_a_a



*hapy_a_attack2

mov %before_action,1
name "Luka"
>Hya!\
name ""
mov %skill_sub,1
gosub *common_attack2
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\bird.ogg"
wait 500
dwave 2,"se\miss.ogg"
>But the Harpy flies into the sky, avoiding Luka's attack!\
name $name
>Hahaha! You'll never hit me! \
name ""
if %first_sel2=1 goto *hapy_a_a
name "Luka"
>It's useless after all...\
name ""
>I'll never be able to win like this.@
>I have to figure out how to hit her...\
mov %first_sel2,1
goto *hapy_a_a



*hapy_a_miss31

mov %before_action,10
name "Luka"
>I got you now!\
name ""
>Luka scores a critical hit!
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\slash3.ogg"
mov %abairitu,200:gosub *enemylife
dwave 1,"se\dassyutu.ogg"
mov %kousoku,0:gosub *status_print
gosub *face3
name $name
>Hyaaaaa!\
name ""
if %enemylife=0 goto *hapy_a_v
>The Harpy quickly flaps away.\
if %nanido<2 goto *hapy_a_v
name $name
>It feels like my power is being drained...@
>But I won't lose to someone like you!\
name ""
name "Luka"
>You aren't giving up yet?\
name ""
>I thought she was running away, but it looks like she still wants to fight.\
>I need to get more hits in...\
gosub *face1
mov %owaza_count1a,0
mov %sinkou,3
;goto *hapy_a_a														;patch
goto *common_main



*hapy_a_miss32

mov %before_action,10
name "Luka"
>I got you now!\
name ""
>Luka scores a critical hit!
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\slash3.ogg"
mov %abairitu,200:gosub *enemylife
dwave 1,"se\dassyutu.ogg"
mov %kousoku,0:gosub *status_print
gosub *face3
name $name
>Hyaaaaa!\
name ""
if %enemylife=0 goto *hapy_a_v
>Even though I hit the Harpy, she doesn't run!\
gosub *face1
mov %owaza_count1a,0
;goto *hapy_a_a														;patch
goto *common_main



*hapy_a_skill

gosub *cmd_skill
if %cmd1=21 goto *hapy_a_skill1
if %cmd1=22 goto *skill2
if %cmd1=35 goto *skill17
if %cmd1=-1 goto *hapy_a_main
goto *hapy_a_skill



*hapy_a_skill1

mov %skill_sub,1
gosub *skill1
mov %skill_sub,0
dwave 1,"se\bird.ogg"
wait 500
dwave 2,"se\miss.ogg"
>The Harpy flies into the air, avoiding Luka's attack!\
skillname ""
name $name
>That will never hit me! \
name ""
if %first_sel3=1 goto *hapy_a_a
name "Luka"
>Guh... So this won't work either?\
name ""
>I won't be able to win like this...@
>I have to find a way to hit her!\
mov %first_sel3,1
goto *hapy_a_a



*hapy_a_a

if %kousoku=1 gosub *hapy_a_a4:goto *common_main
if %kousoku=2 rnd2 %ransu,1,2
if %kousoku=2 && %ransu=1 gosub *hapy_a_a5:goto *common_main
if %kousoku=2 && %ransu=2 gosub *hapy_a_a6:goto *common_main
if %turn=3 && %owaza_count1a>3 gosub *hapy_a_a3:goto *common_main
rnd2 %ransu,1,3
if %ransu=1 gosub *hapy_a_a1:goto *common_main
if %ransu=2 gosub *hapy_a_a2:goto *common_main
if %ransu=3 && %sinkou>1 && %owaza_count1a>3 gosub *hapy_a_a3:goto *common_main
skip -4



*hapy_a_a1

add %stack,1
skillcount1 3017
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll play with you with my foot. "
if %ransu=2 mov $sel1,"Preparations for mating..."
if %ransu=3 mov $sel1,"Heeheehee... "
name $name
eng $sel1:$sel6\
name ""
skillname "Harpy Footjob"
dwave 1,"se\ero_koki1.ogg"
>The Harpy steps on Luka's groin!
if %nanido<2 damage 9,11
if %nanido=2 damage 13,16
if %nanido=3 damage 18,22
skillname ""
if %mylife=0 sub %stack,1:return *hapy_a_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*hapy_a_a2

add %stack,1
skillcount1 3018
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll massage you with my feathers. "
if %ransu=2 mov $sel1,"Heehee... They're fluffy! "
if %ransu=3 mov $sel1,"This feels good too, doesn't it?"
name $name
eng $sel1:$sel6\
name ""
skillname "Wing Massage"
dwave 1,"se\umaru.ogg"
>The Harpy rubs Luka with her wings!
if %nanido<2 damage 11,13
if %nanido=2 damage 16,19
if %nanido=3 damage 22,26
skillname ""
if %mylife=0 sub %stack,1:return *hapy_a_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*hapy_a_a3

add %stack,1
if %kousan=2 skip 4
name $name
>Hehehe... It's time to mate.\
name ""
skillname "Throw Down"
>The Harpy pushes Luka to the ground!@
mov %kousoku,1:gosub *status_print
>The Harpy straddles Luka's groin!\
skillname ""
if %kousan=2 sub %stack,1:return
if %kousan=1 skip 8
if %first_sel1=1 skip 13
name "Luka"
>Uguh...\
name ""
>But with the Harpy this close... is this a chance?\
>She isn't holding down my arm...@
>I might be able to hit her like this!\
name $name
>A Harpy's baby making hole is amazing... Get ready for it.\
>It's really warm and tight inside...\
>No man can resist a Harpy's insides! \
name ""
mov %first_sel1,1
if %nanido<2 mov %genmogaku,0
if %nanido=2 mov %genmogaku,0
if %nanido=3 mov %genmogaku,0
sub %stack,1
return



*hapy_a_a4

add %stack,1
name $name
>I'm going to put it in now. \
name ""
skillname "Harpy Rape"
dwave 1,"se\ero_pyu2.ogg"
>The Harpy thrusts her waist forward, forcing Luka inside!
if %nanido<2 damage 16,19
if %nanido=2 damage 24,28
if %nanido=3 damage 32,38
mov $tatie4,"hapy_a_h2"
mov %kousoku,2:gosub *status_print
mov %genmogaku,100
skillname ""
if %mylife=0 sub %stack,1:return *hapy_a_h3
>Luka is being raped by the Harpy!\
name $name
>Hehehe... How is it?@
>A Harpy's vagina... Amazing, right?\
>I'll make it even better... so let it all out in me. \
name ""
mov $mogaku_sel1,"It feels so good, why would you struggle? "
mov $mogaku_sel2,"Struggling so much... That's ok, I like it when you struggle. "
mov $mogaku_sel3,"I won't get off of you, Hahaha. "
mov $mogaku_sel4,"Haha you're so energetic. "
mov $mogaku_sel5,"Fufu is it frustrating? Being raped by me..."
sub %stack,1
return



*hapy_a_a5

add %stack,1
skillcount1 3019
>Luka is being raped by the Harpy!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"When you can't take it anymore, just let it out. ":mov $sel2,"Luka is stimulated in the Harpy's pussy!"
if %ransu=2 mov $sel1,"Haha... How's this?":mov $sel2,"The Harpy squeezes around Luka!"
if %ransu=3 mov $sel1,"Hehehe... I want your baby. ":mov $sel2,"Luka is stimulated by the Harpy's pussy!"
if %ransu=4 mov $sel1,"Hurry up and come! ":mov $sel2,"The Harpy tightens around Luka!"
if %ransu=5 mov $sel1,"Let out your healthy little children in me. ":mov $sel2,"Luka is massaged by the Harpy's tight insides!"
name $name
eng $sel1:$sel6\
name ""
skillname "Harpy Rape"
dwave 1,"se\ero_chupa4.ogg"
eng $sel2:$sel6
mov %damage_kotei,1
damage 16,19
skillname ""
if %mylife=0 sub %stack,1:return *hapy_a_h4
sub %stack,1
return



*hapy_a_a6

add %stack,1
skillcount1 3020
>Luka is being raped by the Harpy!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Just let it out and inseminate me. ":mov $sel2,"Luka is massaged inside the Harpy!"
if %ransu=2 mov $sel1,"Hahaha, make me pregnant! ":mov $sel2,"Luka writhes under her shaking waist!"
if %ransu=3 mov $sel1,"Hahaha, make me pregnant! ":mov $sel2,"Luka is stimulated by the Harpy's shaking!"
if %ransu=4 mov $sel1,"Haha, let it out! ":mov $sel2,"Luka's dick twitches in the Harpy's soft vagina!"
if %ransu=5 mov $sel1,"Hahaha, can you endure?":mov $sel2,"Luka is massaged inside the Harpy!"
name $name
eng $sel1:$sel6\
name ""
skillname "Harpy Waist Shake"
dwave 1,"se\ero_chupa3.ogg"
>The Harpy violently shakes her waist!\
eng $sel2:$sel6
mov %damage_kotei,1
damage 16,19
skillname ""
if %mylife=0 sub %stack,1:return *hapy_a_h5
sub %stack,1
return



*hapy_a_onedari

mov $list1,"Harpy Footjob"
if %3017>0 mov %list_num1,1
mov $list2,"Wing Massage"
if %3018>0 mov %list_num2,1
mov $list3,"Harpy Rape"
if %3019>0 mov %list_num3,1
mov $list4,"Harpy Waist Shake"
if %3020>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *hapy_a_onedari1
if %cmd1=12 goto *hapy_a_onedari2
if %cmd1=13 goto *hapy_a_onedari3
if %cmd1=14 goto *hapy_a_onedari4
if %cmd1=-1 goto *hapy_a_main
goto *hapy_a_onedari



*hapy_a_onedari1

gosub *onedari_syori
name $name
>You want me to step on your penis...?@
>Hmm... You're a strange one.\
name ""
gosub *hapy_a_a1
skip -1



*hapy_a_onedari2

gosub *onedari_syori
name $name
>Hahaha, you want me to play with you with my fluffy wings?@
>I'll right... I'll make you feel good. \
name ""
gosub *hapy_a_a2
skip -1



*hapy_a_onedari3

gosub *onedari_syori_k
name $name
>So you want to mate with me?@
>Then I'll let you have your hearts content... \
if %kousoku=0 gosub *hapy_a_a3
if %kousoku=1 gosub *hapy_a_a4
gosub *hapy_a_a5
skip -1



*hapy_a_onedari4

gosub *onedari_syori_k
name $name
>Hahaha, so you want me to shake my hips? @
>Alright, I'll play with you until you inseminate me! \
if %kousoku=0 gosub *hapy_a_a3
if %kousoku=1 gosub *hapy_a_a4
gosub *hapy_a_a6
skip -1



*hapy_a_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\hapy_a_bk01.bmp",0,0
gosub *syasei2
>Stepped on by the Harpy, Luka orgasms all over her feet.\
>Luka's body trembles with the humiliation of climaxing by being stepped on.\
mov %viclose,1:gosub *lose
mov %2511,%2511+1:if %2511=1 mov %count_koenemy,%count_koenemy+1
if %2511>%count_most mov %count_most,%2511:mov $count_mostname,$name
count 6,10
mov $bad1," Luka succumbs to the Harpy's footjob."
mov $bad2," After that, Luka spent every day making children with the Harpy."
gosub *face2
name $name
>Ahh... You let out so much.@
>But this time, you need to let it out inside me so I can get pregnant.\
name ""
goto *hapy_a_h



*hapy_a_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\hapy_a_bk02.bmp",0,0
gosub *syasei2
>Massaged by her wings, Luka ejaculates all over her feathers.\
mov %viclose,1:gosub *lose
mov %2511,%2511+1:if %2511=1 mov %count_koenemy,%count_koenemy+1
if %2511>%count_most mov %count_most,%2511:mov $count_mostname,$name
count 13,10
mov $bad1," Luka succumbs to the Harpy's wings."
mov $bad2," After that, Luka spent every day making children with the Harpy."
gosub *face2
name $name
>Hahaha, my wings felt that good?@
>But this time, you need to let it out inside me so I can get pregnant.\
name ""
goto *hapy_a_h



*hapy_a_h3

mov %ikigoe,3:gosub *ikigoe
name $name
>Eh...?\
name ""
gosub *syasei1
lsp 700,":a;chara\hapy_a_h3.bmp",0,0
gosub *syasei2
>As soon as the Harpy forces me into her, I climax.@
>I wasn't able to endure the feeling of insertion.\
mov %viclose,1:gosub *lose
mov %2511,%2511+1:if %2511=1 mov %count_koenemy,%count_koenemy+1
if %2511>%count_most mov %count_most,%2511:mov $count_mostname,$name
count 1,10
mov $bad1," Luka ejaculates as soon the Harpy violates him."
mov $bad2," After that, Luka spent every day making children with the Harpy."
name $name
>Hahaha! You came so fast! @
>Orgasming as soon as I put it in... how pathetic! \
name ""
lsp 700,":a;chara\hapy_a_st02.bmp",0,0
lsp 693,":a;chara\hapy_a_bk03.bmp",0,0:print 10,500
>The Harpy laughs as she stands up, semen dripping from her vagina.\
name $name
>Hehe... you let out a lot. @
>It felt that good inside of me...?\
>This time, see if you can last a little longer...\
name ""
mov %count_bouhatu,%count_bouhatu+1
goto *hapy_a_h



*hapy_a_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\hapy_a_h3.bmp",0,0
gosub *syasei2
>Unable to withstand the pleasure, Luka ejaculates inside the Harpy!\
mov %viclose,1:gosub *lose
mov %2511,%2511+1:if %2511=1 mov %count_koenemy,%count_koenemy+1
if %2511>%count_most mov %count_most,%2511:mov $count_mostname,$name
count 1,10
mov $bad1," Raped by the Harpy, Luka can't withstand any longer."
mov $bad2," After that, Luka spent every day making children with the Harpy."
name $name
>Haha... you let it out!@
>All of your baby-making sperm are inside of me...\
name ""
lsp 700,":a;chara\hapy_a_st02.bmp",0,0
lsp 693,":a;chara\hapy_a_bk03.bmp",0,0:print 10,500
>The Harpy laughs as she stands up, semen dripping from her vagina.\
name $name
>Hehe... you let out a lot. @
>It felt that good inside of me...?\
>Let's make sure I get pregnant, so give me more...\
name ""
goto *hapy_a_h



*hapy_a_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\hapy_a_h3.bmp",0,0
gosub *syasei2
>Luka ejaculates as the Harpy shakes her waist!\
mov %viclose,1:gosub *lose
mov %2511,%2511+1:if %2511=1 mov %count_koenemy,%count_koenemy+1
if %2511>%count_most mov %count_most,%2511:mov $count_mostname,$name
count 1,10
mov $bad1," Luka succumbs to the Harpy's shaking waist."
mov $bad2," After that, Luka spent every day making children with the Harpy."
name $name
>Haha... you let it out!@
>All of your baby-making sperm are inside of me...\
name ""
lsp 700,":a;chara\hapy_a_st02.bmp",0,0
lsp 693,":a;chara\hapy_a_bk03.bmp",0,0:print 10,500
>The Harpy laughs as she stands up, semen dripping from her vagina.\
name ""
>Hehe... you let out a lot. @
>It felt that good inside of me...?\
>Let's make sure I get pregnant, so give me more...\
goto *hapy_a_h



*hapy_a_h

if %2511=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
dwave 1,"se\bird.ogg"
gosub *anten
>The Harpy picks up my body and takes off into the sky.\
name "Luka"
>What are you...\
name ""
name $name
>Heeheehee, you're mine now.@
>I'm going to take you to my nest and make you my baby-making slave.\
>We're going to mate a lot from now on! \
name ""
name "Luka"
>No way...\
name ""
>No matter how hard I struggle, I'm unable to break her grip on me.\
sean_change "bg024"
lsp 700,":a;chara\hapy_a_st01.bmp",0,0:print 10,500
name $name
>Heehee, welcome to the Harpy's village.\
name ""
>She lands in a strange village.\
lsp 700,":a;chara\hapy_a_h4.bmp",0,0:print 10,500
name $name
>Let's not waste any time. \
name ""
>As soon as the Harpy drops me on the ground, she gets on top of me.\
name "Luka"
>In a place like this...\
name ""
name $name
>It's fine, isn't it?@
>Isn't mating outdoors natural?\
>Come on, I'll put it in. \
name ""
>The Harpy quickly drops her waist.@
mov %hseanwave,2:hseanwave
cspl 690,699
lsp 700,":a;chara\hapy_a_h5.bmp",0,0:print 10,500
>I sink through her feathers into her warm vagina!\
name "Luka"
>Ahh....! Ahhhhh...\
name ""
>Her insides are warm and moving around like it's a separate animal.\
>The walls of the Harpy's insides are unusually rough, rubbing me with its grainy texture with every movement.\
name $name
>It feels amazing when I move like this, doesn't it?@
>You'll be able to enjoy it a lot as my little stallion.\
>Don't bother trying to hold it in, just let it all out in me.\
name ""
name "Luka"
>Auuuuu!\
name ""
>The Harpy tightens her insides as I let out a yell.\
>My penis is pressed from the base to the tip, the pleasure bringing me instantly to the edge.\
>Only just having penetrated her, I'm already so close...\
name $name
>Fufu, are you already at your limit?@
>It's alright, just mate a lot with me. \
name ""
>Moving in her wriggling insides, the Harpy tightens around me.@
>As the Harpy tightens, the rough feeling from her grainy vagina gives a sharp increase in the pleasure in my waist.\
name $name
>Well? My child-making hole is the greatest, isn't it?@
>Let it all out inside, and get me pregnant. \
name "Luka"
>Amazing... Your insides...\
name ""
>Unable to resist, the desire to come in her rises in me.@
>Actually making a monster pregnant... If I can't endure, it would be the absolute worst form of breaking Ilias' law...\
>The desire starts to overpower the horror of breaking the taboo...@
>In this amazing pussy, I want to let it out...\
name "Luka"
>Ahh... I can't... I'm coming!\
name ""
name $name
>Then... Let me help! \
name ""
>As she says that, the Harpy girl tightly squeezes around me!@
>With the intense stimulation from her tightness, my body joins my mind in it's surrender to the Harpy.\
gosub *syasei1
lsp 700,":a;chara\hapy_a_h6.bmp",0,0
gosub *syasei2
>I explode inside the Harpy's hole.@
>Having surrendered both physically and mentally, I accept my position as the Harpy's child-making mate.\
name $name
>Hahaha, you let out so much.@
>With this much, I'm sure to conceive. \
name ""
mov %hseanwave,6:hseanwave
>As she laughs and rubs her lower waist, suddenly the Harpy starts to violently grind her waist against me!\
name "Luka"
>Wh... What are you...\
name ""
>The sudden stimulation as I'm still sensitive after ejaculating causes my body to writhe.\
name $name
>I want more of your energetic semen...@
>Let out more!\
>Put more of your virile milk in me! \
name ""
>As if trying to hurt me, she slams her waist back and forth into mine.@
>Completely at her mercy, I writhe as she pumps me.\
name "Luka"
>Aaaaaahhhh!\
name ""
>Violently moving, the Harpy keeps moving faster and faster.@
>Unable to concentrate on anything but the forced pleasure, my vision starts to go hazy.\
>Being completely dominated by her, I have no choice but to accept the torture.\
name $name
>Hahaha... shoot more in me!@
>I know you can't endure much more of this. \
name ""
name "Luka"
>No more...@> Ahhhhh!\
name ""
>Her fast movements cause the roughness of her walls to shoot ecstasy through me with their grainy texture.\
>From the surface to the tip, my dick feels like it's melting inside of her.\
name $name
>Now... Inseminate me again. \
name ""
name "Luka"
>Aaa....aahhhhh...\
name ""
gosub *syasei1
lsp 700,":a;chara\hapy_a_h7.bmp",0,0
gosub *syasei2
>I explode inside of the Harpy again, shooting more of my seed into her.@
>Even though it's my third time, there's a surprising amount.\
name $name
>That's it...@
>Put all of your child-making seed in me...@
>We can make a lot of cute babies. \
name ""
>After my last spurt, the Harpy starts to move her waist again.@
>Making deep movements, she continues to rape me.\
>Each forced thrust of pleasure seems to drain more of my energy.\
name "Luka"
>St...op it alre...ady...\
name ""
name $name
>It's way too early to stop. @
>Until there's nothing left, I want all of your seed.\
>We'll live together forever in this village after this. \
name ""
name "Luka"
>Ahhhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\hapy_a_h8.bmp",0,0
gosub *syasei2
>My mating with the Harpy continued for a long time after that...@
>Forced to come over and over, I lose consciousness.\
>Squeezed until I was empty, I fainted in ecstasy.\
mov %hseanwave,0:hseanwave
name $name
>Oh? Down already?@
>Well, I'll let you rest for a while.@
>After that round, I'm sure I'll be pregnant. \
name ""
name ""
gosub *anten
>There's no escaping from this Harpy.@
>My adventure ends here, stuck in the Harpy's village.\
>I'll mate with the Harpy every day...@
>Maybe it won't be so bad...\
>...........\
goto *badend



*hapy_bc_start

mov $name,"Harpy Twins"
mov $name2,"Older Harpy"
mov $lavel,"hapy_bc"
mov $tatie1,"hapy_bc_st01"
mov $tatie2,"hapy_bc_st02"
mov $tatie3,"hapy_bc_st03"
mov $tatie4,"hapy_bc_st02"
mov $haikei,"bg027"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,120
if %nanido=2 mov %max_enemylife,160
if %nanido=3 mov %max_enemylife,160
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,1
gosub *maxmp:mov %mp,1
gosub *syutugen_plural
mov %end_n,3
mov %exp_minus,90
mov %zmonster_x,-270
name "Younger Harpy"
>Sis, I haven't seen this boy before.\
name ""
name "Older Harpy"
>You're right...@
>Why are you in a place like this...?\
name ""
name "Luka"
>Crap... I was found!\
name ""
>I pull out my sword.@
>I need to end this quick, it would be bad if they called more harpies.\
lsp 700,":a;chara\hapy_bc_st01a.bmp",0,0:print 10,500
name "Younger Harpy"
>Hey... Sis...@
>I want to mate with this boy...\
name ""
name "Older Harpy"
>Fufu... Do you like him?@
>Alright, let's make him your first partner.\
>First, we need to weaken him...\
name ""
lsp 700,":a;chara\hapy_bc_st01.bmp",0,0:print 10,500
mov %sinkou,1
mov %owaza_count1a,3
goto *common_main



*hapy_bc_v

gosub *face3
name "Younger Harpy"
>Sis!@
>Don't die, Sis!\
name ""
name "Older Harpy"
>I'm ok...@
>Your older sister will definitely protect you!\
name ""
name "Younger Harpy"
>You meanie! Don't kill my Sis!\
name ""
name "Luka"
>.........\
name ""
>Why do I feel so guilty...\
name "Luka"
>Ahh, geez!\
name ""
>I run away from the sisters!\
dwave 1,"se\escape.ogg"
csp 700:print 10,1000
>The Harpy Twins stay where they are, not giving chase!\
mov %viclose,2:gosub *victory_plural
mov %getexp,60:gosub *lvup
mov %2212,1
goto *sean0063



*hapy_bc_kousan

gosub *kousan_syori
>Luka surrenders to the promise of pleasure, ending his resistance!\
gosub *face2
name "Younger Harpy"
>Oh? Did he give up?\
name ""
name "Older Harpy"
>Fufu... He gave up.@
>Alright, let's make him feel good now...\
name ""
mov %sinkou,2
goto *hapy_bc_a



*hapy_bc_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 && %sinkou<3 goto *hapy_bc_miss31
if %cmd1=11 && %kousoku>0 && %sinkou=3 goto *hapy_bc_miss32
if %cmd1=11 && %nanido=0 goto *common_attack
if %cmd1=11 && %sinkou=1 goto *hapy_bc_attack1
if %cmd1=11 && %sinkou=2 goto *hapy_bc_attack2
if %cmd1=11 && %sinkou=3 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *hapy_bc_mogaku1
if %cmd1=12 && %genmogaku=0 goto *hapy_bc_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *hapy_bc_kousan
if %cmd1=16 goto *hapy_bc_onedari
if %cmd1=17 && %nanido=0 goto *common_skill
if %cmd1=17 && %sinkou<3 goto *hapy_bc_skill
if %cmd1=17 && %sinkou=3 goto *common_skill
goto *hapy_bc_main



*hapy_bc_attack1

mov %before_action,1
mov %skill_sub,1
gosub *common_attack1
dwave 1,"se\bird.ogg"
wait 500
dwave 2,"se\miss.ogg"
>The harpies fly into the air, avoiding Luka's attack!\
name "Younger Harpy"
>That surprised me, Sis!\
name ""
name "Older Harpy"
>Don't worry, he can't reach us up here.\
name ""
name "Luka"
>Grr... This again...\
name ""
>Like before, it looks like I need to be closer to them before I can hit.\
mov %sinkou,2
goto *hapy_bc_a



*hapy_bc_attack2

mov %before_action,1
name "Luka"
>Ha!\
name ""
mov %skill_sub,1
gosub *common_attack2
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\bird.ogg"
wait 500
dwave 2,"se\miss.ogg"
>The harpies fly into the air, avoiding Luka's attack!\
name "Luka"
>It's useless after all...\
name ""
>I need to wait for my chance to hit them...\
goto *hapy_bc_a



*hapy_bc_miss31

mov %before_action,10
name "Luka"
>Alright! Now!\
name ""
>Luka scores a critical hit!
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\slash3.ogg"
mov %abairitu,200:gosub *enemylife
dwave 1,"se\dassyutu.ogg"
mov %kousoku,0:gosub *status_print
gosub *face3
name "Older Harpy"
>Kya!\
name ""
name "Younger Harpy"
>Ahh! Sis!\
name ""
if %enemylife=0 goto *hapy_bc_v
name "Luka"
>Yes!\
name ""
>I know how to fight harpies now!@
>At this rate, I should win!\
if %nanido<2 goto *hapy_bc_v
name "Younger Harpy"
>Sis, does it hurt?\
name ""
gosub *face1
name "Older Harpy"
>No, I'm Ok.\
name ""
>She says that, but her movements have slowed.@
>With this, I should be able to hit her with a normal attack!\
mov %sinkou,3
mov %owaza_count1a,0
;goto *hapy_bc_a													;patch
goto *common_main



*hapy_bc_miss32

mov %before_action,10
name "Luka"
>Alright! Now!\
name ""
>Luka scores a critical hit!
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\slash3.ogg"
mov %abairitu,200:gosub *enemylife
dwave 1,"se\dassyutu.ogg"
mov %kousoku,0:gosub *status_print
gosub *face3
name "Older Harpy"
>Kya!\
name ""
if %enemylife=0 goto *hapy_bc_v
>They flinch at the hit, but continue to fight!\
gosub *face1
mov %owaza_count1a,0
;goto *hapy_bc_a													;patch
goto *common_main



*hapy_bc_mogaku1

mov %before_action,7
rnd2 %ransu,1,3
if %cmd1=12 && %ransu=1 mov $sel1,"Uhg!"
if %cmd1=12 && %ransu=2 mov $sel1,"Let... Let go!"
if %cmd1=12 && %ransu=3 mov $sel1,"Guh! Stop!"
name "Luka"
eng $sel1:$sel6\
name ""
>Luka struggles intensely!\
mov %genmogaku,%genmogaku-1:if %genmogaku<0 mov %genmogaku,0
>The Older Harpy doesn't let go of Luka!\
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"He's struggling, Sis...":mov $sel2,"It's ok, your older sister is holding him down..."
if %ransu=2 mov $sel1,"Are you ok, Sis?":mov $sel2,"I'm fine, just keep playing with him..."
if %ransu=3 mov $sel1,"It's not good to struggle like that!":mov $sel2,"Just relax until she makes you come..."
name "Younger Harpy"
eng $sel1:$sel6\
name ""
name "Older Harpy"
eng $sel2:$sel6\
name ""
goto *hapy_bc_a



*hapy_bc_mogaku2

if %nanido=2 rnd2 %ransu,1,10:if %ransu=10 goto *hapy_bc_mogaku1
if %nanido=3 rnd2 %ransu,1,2:if %ransu=2 goto *hapy_bc_mogaku1
mov %before_action,8
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Uooo!"
if %ransu=2 mov $sel1,"Damn you!"
if %ransu=3 mov $sel1,"Let go!"
name "Luka"
eng $sel1:$sel6\
name ""
dwave 1,"se\dassyutu.ogg"
mov %kousoku,0:gosub *status_print
>Luka forces the Older Harpy off of him!\
name "Younger Harpy"
>He got away, Sis!\
name ""
name "Older Harpy"
>It's ok, I'll get him again.\
name ""
gosub *face1
goto *common_main



*hapy_bc_skill

gosub *cmd_skill
if %cmd1=21 goto *hapy_bc_skill1
if %cmd1=22 goto *skill2
if %cmd1=35 goto *skill17
if %cmd1=-1 goto *hapy_bc_main
goto *hapy_bc_skill



*hapy_bc_skill1

mov %skill_sub,1
gosub *skill1
mov %skill_sub,0
dwave 1,"se\bird.ogg"
wait 500
dwave 2,"se\miss.ogg"
>The harpies fly up, avoiding Luka's attack!\
skillname ""
name "Younger Harpy"
>That was scary, Sis!\
name ""
name "Older Harpy"
>If we just fly like this, he'll never hit us.\
name ""
name "Luka"
>It's no use after all...\
name ""
>I need to wait for an opening.\
goto *hapy_bc_a



*hapy_bc_a

if %kousoku=1 rnd2 %ransu,1,2
if %kousoku=1 && %ransu=1 gosub *hapy_bc_a4:goto *common_main
if %kousoku=1 && %ransu=2 gosub *hapy_bc_a5:goto *common_main
if %turn=3 && %owaza_count1a>3 gosub *hapy_bc_a3:goto *common_main
rnd2 %ransu,1,3
if %ransu=1 gosub *hapy_bc_a1:goto *common_main
if %ransu=2 gosub *hapy_bc_a2:goto *common_main
if %ransu=3 && %sinkou>1 && %owaza_count1a>3 gosub *hapy_bc_a3:goto *common_main
skip -4



*hapy_bc_a1

add %stack,1
skillcount1 3021
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"How about we step on him?":mov $sel2,"Alright, we'll play with him with our feet!"
if %ransu=2 mov $sel1,"Getting big because of that? You're strange...":mov $sel2,"Men are strange, aren't they?"
if %ransu=3 mov $sel1,"Haha, your penis is twitching!":mov $sel2,"Letting it out just because of this?"
name "Younger Harpy"
eng $sel1:$sel6\
name ""
name "Older Harpy"
eng $sel2:$sel6\
name ""
skillname "Harpy Footjob"
dwave 1,"se\ero_koki1.ogg"
>The Harpy Twins both step on Luka!\
>The Younger Harpy rubs Luka with her talon!
if %nanido<2 damage 4,5
if %nanido=2 damage 6,7
if %nanido=3 damage 8,10
dwave 1,"se\ero_koki1.ogg"
>The Older Harpy steps on Luka's penis!
if %nanido<2 damage 8,11
if %nanido=2 damage 12,16
if %nanido=3 damage 16,22
skillname ""
if %mylife=0 sub %stack,1:return *hapy_bc_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *hapy_bc_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *hapy_bc_s2
sub %stack,1
return



*hapy_bc_a2

add %stack,1
skillcount1 3022
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Let's play with him with our feathers.":mov $sel2,"Alright, do it like I taught you."
if %ransu=2 mov $sel1,"Fluffy feathers!":mov $sel2,"Fufu... Is it good?"
if %ransu=3 mov $sel1,"Let's tease him like this...":mov $sel2,"If we do that, he won't be able to resist..."
name "Younger Harpy"
eng $sel1:$sel6\
name ""
name "Older Harpy"
eng $sel2:$sel6\
name ""
skillname "Feather Massage"
dwave 1,"se\umaru.ogg"
>The Harpy Twins massage Luka with their wings!\
>The Younger Harpy gently rubs Luka's penis!
if %nanido<2 damage 5,6
if %nanido=2 damage 7,9
if %nanido=3 damage 10,12
dwave 1,"se\umaru.ogg"
>The Older Harpy massages Luka's dick!
if %nanido<2 damage 9,12
if %nanido=2 damage 14,18
if %nanido=3 damage 18,24
skillname ""
if %mylife=0 sub %stack,1:return *hapy_bc_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *hapy_bc_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *hapy_bc_s2
sub %stack,1
return



*hapy_bc_a3

add %stack,1
if %kousan=2 skip 4
name "Older Harpy"
>Fufu... Caught you! \
name ""
skillname "Wing Wrap"
mov %kousoku,1:gosub *status_print
>The Older Harpy pins Luka down!\
skillname ""
if %kousan=2 sub %stack,1:return
if %kousan=1 skip 5
name "Luka"
>Gah!\
name ""
>I might have an opportunity in this position...\
name "Older Harpy"
>Your big sister is holding him down, so play with him all you want.\
name ""
name "Younger Harpy"
>Ok!@
>I'll make your penis feel really good!\
name ""
if %nanido<2 mov %genmogaku,0
if %nanido=2 mov %genmogaku,0
if %nanido=3 mov %genmogaku,0
sub %stack,1
return



*hapy_bc_a4

add %stack,1
skillcount1 3023
>Luka is held down by the Older Harpy!\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Do it like I showed you."
if %ransu=2 mov $sel1,"Make him feel good."
if %ransu=3 mov $sel1,"Do it like I taught you earlier."
name "Older Harpy"
eng $sel1:$sel6\
name ""
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Like this...?":mov $sel2,"The Younger Harpy rubs Luka with her wing!"
if %ransu=2 mov $sel1,"Tickle, tickle, tickle!":mov $sel2,"The Younger Harpy tickles Luka with her feathers!"
if %ransu=3 mov $sel1,"Is it good...?":mov $sel2,"The Younger Harpy massages Luka with her wing!"
if %ransu=4 mov $sel1,"Haha, it looks like a mushroom...":mov $sel2,"The Younger Harpy rubs Luka's tip!"
if %ransu=5 mov $sel1,"Heehee, he's twitching!":mov $sel2,"The Younger Harpy tickles Luka's dick!"
name "Younger Harpy"
eng $sel1:$sel6\
name ""
skillname "Wing Wrap Caress"
dwave 1,"se\umaru.ogg"
eng $sel2:$sel6
if %nanido<2 damage 9,12
if %nanido=2 damage 14,18
if %nanido=3 damage 18,24
skillname ""
if %mylife=0 sub %stack,1:return *hapy_bc_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *hapy_bc_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *hapy_bc_s2
sub %stack,1
return



*hapy_bc_a5

add %stack,1
skillcount1 3024
>Luka is held down by the Older Harpy!\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Play with him with your mouth."
if %ransu=2 mov $sel1,"Do it with your mouth like I taught you."
if %ransu=3 mov $sel1,"Why don't you lick him all over?"
name "Older Harpy"
eng $sel1:$sel6\
name ""
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Mmmmm...":mov $sel2,"The Younger Harpy licks Luka's penis!"
if %ransu=2 mov $sel1,"Like this? *Lick*":mov $sel2,"The Younger Harpy's tongue licks Luka!"
if %ransu=3 mov $sel1,"*Suck* *Suck*":mov $sel2,"The Younger Harpy puts Luka's dick in her mouth and sucks on it!"
if %ransu=4 mov $sel1,"*Kiss* *Kiss*":mov $sel2,"The Younger Harpy kisses Luka's dick!"
if %ransu=5 mov $sel1,"Mmmmmmm...":mov $sel2,"The Younger Harpy pumps Luka's dick up and down with her mouth!"
name "Younger Harpy"
eng $sel1:$sel6\
name ""
skillname "Harpy Blowjob"
dwave 1,"se\ero_buchu3.ogg"
eng $sel2:$sel6
if %nanido<2 damage 11,13
if %nanido=2 damage 16,19
if %nanido=3 damage 22,26
skillname ""
if %mylife=0 sub %stack,1:return *hapy_bc_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *hapy_bc_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *hapy_bc_s2
sub %stack,1
return



*hapy_bc_s1

add %stack,1
if %max_mylife>%mylife*4 mov %sel_hphalf,1:gosub *hapy_bc_s2:sub %stack,1:return
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Guh..."
if %ransu=2 mov $sel1,"Uuuu..."
if %ransu=3 mov $sel1,"Ugu...."
name "Luka"
eng $sel1:$sel6\
name ""
name "Younger Harpy"
>He sounds like he's in pain...\
name ""
name "Older Harpy"
>Those are cries of pleasure.\
name ""
mov %sel_hphalf,1
sub %stack,1
return



*hapy_bc_s2

add %stack,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Auu..."
if %ransu=2 mov $sel1,"Aaa..."
if %ransu=3 mov $sel1,"Faaa..."
name "Luka"
eng $sel1:$sel6\
name ""
gosub *face2
name "Older Harpy"
>Fufu... He's about to give in.\
name ""
name "Younger Harpy"
>Yay! I've always wanted to taste semen.\
name ""
mov %sel_kiki,1
sub %stack,1
return



*hapy_bc_onedari

mov $list1,"Harpy Footjob"
if %3021>0 mov %list_num1,1
mov $list2,"Feather Massage"
if %3022>0 mov %list_num2,1
mov $list3,"Wing Wrap Caress"
if %3023>0 mov %list_num3,1
mov $list4,"Harpy Blowjob"
if %3024>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *hapy_bc_onedari1
if %cmd1=12 goto *hapy_bc_onedari2
if %cmd1=13 goto *hapy_bc_onedari3
if %cmd1=14 goto *hapy_bc_onedari4
if %cmd1=-1 goto *hapy_bc_main
goto *hapy_bc_onedari



*hapy_bc_onedari1

gosub *onedari_syori
name "Younger Harpy"
>You want us to step on your penis...?\
name ""
name "Older Harpy"
>Alright... Let's bully him until he comes.\
name ""
gosub *hapy_bc_a1
skip -1



*hapy_bc_onedari2

gosub *onedari_syori
name "Younger Harpy"
>You want us to play with you with our wings...?\
name ""
name "Older Harpy"
>Alright... Let's tease him together.\
name ""
gosub *hapy_bc_a2
skip -1



*hapy_bc_onedari3

gosub *onedari_syori_k
name "Older Harpy"
>So you want to be held down and played with?\
name ""
name "Younger Harpy"
>How strange!\
name ""
if %kousoku=1 skip 5
gosub *hapy_bc_a3
name "Older Harpy"
>Alright, now use your wings like I taught you before.\
name ""
name "Younger Harpy"
>Ok, I will!@
>I'll play with you just like you wanted me to!\
name ""
gosub *hapy_bc_a4
skip -1



*hapy_bc_onedari4

gosub *onedari_syori_k
name "Younger Harpy"
>You want me to use my mouth...?\
name ""
name "Older Harpy"
>Use your mouth like I taught you.@
>Until he comes, keep playing with him.\
name ""
if %kousoku=1 skip 5
gosub *hapy_bc_a3
name "Older Harpy"
>You remember how to, right?\
name ""
name "Younger Harpy"
>I remember!@
>I'll play with you just like you wanted me to!\
name ""
gosub *hapy_bc_a5
skip -1



*hapy_bc_h1

name "Luka"
>No more... Coming!\
name ""
>Luka's dick starts to twitch under the Harpy Twins' feet.\
name "Younger Harpy"
>Waa! Look at it twitching!\
name ""
name "Older Harpy"
>Look closely now.@
>This is a man's ejaculation.\
name ""
name "Luka"
>Aaaa!\
name ""
gosub *syasei1
lsp 692,":a;chara\hapy_bc_bk02.bmp",0,0
gosub *syasei2
>With the Harpy Twins' closely watching, Luka explodes all over their feet.\
mov %viclose,1:gosub *lose
mov %2512,%2512+1:if %2512=1 mov %count_koenemy,%count_koenemy+1
if %2512>%count_most mov %count_most,%2512:mov $count_mostname,$name
count 6,10
mov $bad1," Luka succumbs to the Harpy Twins' footjob."
mov $bad2," Since then, Luka mates every day with the sisters."
goto *hapy_bc_h



*hapy_bc_h2

name "Luka"
>No more... Coming!\
name ""
>Luka's dick starts to twitch as the Harpy Twins rub him with their wings.\
name "Younger Harpy"
>Waa! Look at it twitching!\
name ""
name "Older Harpy"
>Look closely now.@
>This is a man's ejaculation.\
name ""
name "Luka"
>Aaaa!\
name ""
gosub *syasei1
lsp 693,":a;chara\hapy_bc_bk03.bmp",0,0
gosub *syasei2
>With the Harpy Twins' closely watching, Luka explodes all over their wings.\
mov %viclose,1:gosub *lose
mov %2512,%2512+1:if %2512=1 mov %count_koenemy,%count_koenemy+1
if %2512>%count_most mov %count_most,%2512:mov $count_mostname,$name
count 13,10
mov $bad1," Luka succumbs to the Harpy Twins' feather massage."
mov $bad2," Since then, Luka mates every day with the sisters."
goto *hapy_bc_h



*hapy_bc_h3

name "Luka"
>No more... Coming!\
name ""
>Being rubbed by the Younger Harpy, Luka's dick starts to twitch.\
name "Younger Harpy"
>Waa! Look at it twitching!\
name ""
name "Older Harpy"
>Look closely now.@
>This is a man's ejaculation.\
name ""
name "Luka"
>Aaaa!\
name ""
gosub *syasei1
lsp 693,":a;chara\hapy_bc_bk03.bmp",0,0
gosub *syasei2
>With the Harpy Twins' closely watching, Luka explodes all over the Younger Harpy's feathers.\
mov %viclose,1:gosub *lose
mov %2512,%2512+1:if %2512=1 mov %count_koenemy,%count_koenemy+1
if %2512>%count_most mov %count_most,%2512:mov $count_mostname,$name
count 13,10
mov $bad1," Held down by the Older Harpy, Luka succumbs to the Younger Harpy's caress."
mov $bad2," Since then, Luka mates every day with the sisters."
goto *hapy_bc_h



*hapy_bc_h4

name "Luka"
>No more... Coming!\
name ""
>Luka's dick starts to twitch inside the Younger Harpy's mouth.\
name "Younger Harpy"
>Waa! Look at it twitching!\
name ""
name "Older Harpy"
>Keep it in your mouth like that.@
>When he ejaculates, make sure you drink it all.\
name ""
name "Younger Harpy"
>*Suck*@> *Suck*\
name ""
name "Luka"
>Aaaa!\
name ""
gosub *syasei1
lsp 691,":a;chara\hapy_bc_bk01.bmp",0,0
gosub *syasei2
name "Younger Harpy"
>Mmmm.\
name ""
>Though she's surprised, the Younger Harpy keeps Luka in her mouth, semen dripping from her mouth.\
>The Older Harpy who was closely watching also gets some on her mouth.\
mov %viclose,1:gosub *lose
mov %2512,%2512+1:if %2512=1 mov %count_koenemy,%count_koenemy+1
if %2512>%count_most mov %count_most,%2512:mov $count_mostname,$name
count 4,10
mov $bad1," Held down by the Older Harpy, Luka succumbs to the Younger Harpy's blowjob."
mov $bad2," Since then, Luka mates every day with the sisters."
name "Younger Harpy"
>Mmm... It's tasty.\
name ""
>The Younger Harpy licks up all the semen off her mouth.\
name "Older Harpy"
>I'm glad.@
>This person's semen is really delicious.\
name ""
>The Younger Harpy takes my dick out of her mouth as I collapse on the ground.\
goto *hapy_bc_h



*hapy_bc_h

if %2512=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Auuu....\
name ""
>As I fall to the ground exhausted, the Older Harpy laughs at me.\
name "Older Harpy"
>This boy can't resist any longer... It's time to play with him.\
name ""
name "Younger Harpy"
>But... I'm a little scared...\
name ""
name "Older Harpy"
>Let's get you used to him a little more then...@
>Why don't you try using your mouth a little?\
name ""
name "Younger Harpy"
>Ok... I'll do my best!\
name ""
cspl 690,699
lsp 700,":a;chara\hapy_bc_ha1.bmp",0,0:print 10,1500
>The two harpies kneel down and stare at my dick up close.\
name "Younger Harpy"
>Uwa... It's standing up!@
>Sis... I want to eat it...\
name ""
name "Younger Harpy"
>*Sniff*@>*Sniff*\
name ""
>The Younger Harpy puts her nose next to my erect penis and sniffs it.@
>Despite the shame, I feel myself getting harder with expectation.\
>Increasing the excitement is the Older Harpy's breasts pushing down at the base of my penis.\
name "Younger Harpy"
>It smells a little strange...\
name ""
name "Older Harpy"
>It must be because he's a traveler and hasn't bathed...@
>Why don't you try giving it a lick?\
name ""
name "Younger Harpy"
>Ok...@
lsp 700,":a;chara\hapy_bc_ha2.bmp",0,0:print 10,500
>Mmm...@> *Lick*\
name ""
>The Younger Harpy timidly sticks out her tongue and licks me.@
>Her hesitant tongue slowly licks me from the base to the tip.\
name "Luka"
>Ahh...\
name ""
name "Younger Harpy"
>Wah...\
name ""
>Her gentle licking causes my waist to involuntarily move, hitting her lip with my penis.@
>The soft feeling of her mouth makes me let out a sigh.\
name "Younger Harpy"
>*Lick*\
>*Lick*@> *Lick*\
name ""
>The Younger Harpy starts to lick me a little harder.\
name "Older Harpy"
>That's it... You're doing great.@
>Give him more.\
name ""
name "Luka"
>Auu...@> Ahh....\
name ""
>The Younger Harpy looks at my face as she licks, seeing how I react to each of her caresses.\
>With the Younger Harpy's saliva covering me, and the Older Harpy's soft breasts pushing into me, I feel myself moving closer to the edge.\
name "Luka"
>Ahhh.....\
name ""
name "Older Harpy"
>It's about time...@
>Now try licking the back of his penis.\
name ""
name "Younger Harpy"
>Ok...@>*Lick*\
name ""
>The Younger Harpy starts focusing on one of the most sensitive parts...@
>Her gentle licking sends me over the edge.\
name "Luka"
>Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\hapy_bc_ha3.bmp",0,0
gosub *syasei2
name "Younger Harpy"
>Hya!?\
name ""
>Unable to hold it in any longer, my semen shoots out and covers the Younger Harpy's face.\
lsp 700,":a;chara\hapy_bc_ha4.bmp",0,0:print 10,500
name "Younger Harpy"
>Mmm...@> I drank a little...\
name ""
name "Older Harpy"
>Fufu... How did it taste?\
name ""
name "Younger Harpy"
>Bitter...@>But somehow, really good...\
name ""
>The Younger Harpy's cheeks blush red as she fidgets around.\
name "Older Harpy"
>Do you want to try mating with him now?\
name ""
name "Younger Harpy"
>But... I'm still a little scared...\
name ""
name "Older Harpy"
>Then let me go first.@
>Just watch me and do what I do, your big Sis will teach you.\
name ""
name "Younger Harpy"
>Ok!\
name ""
name "Older Harpy"
>Then, let's put it in...\
name ""
>Before I can protest, the Older Harpy quickly jumps on me!@
mov %hseanwave,2:hseanwave
lsp 700,":a;chara\hapy_bc_hc1.bmp",0,0
lsp 690,":a;chara\hapy_bc_ct01.bmp",503,0:print 10,500
>She pushes down hard on me, and I get pushed all the way to her deepest spot in one move.\
name "Luka"
>Ahhhh...\
name ""
>Her insides had an irregular shape, rubbing me all over in a strange way.@
>Her pussy was unusually warm, as well. At this rate, I won't be able to last long at all.\
name "Older Harpy"
>After you insert it, you start to move like this...@
>Move your waist slowly like this, while squeezing his penis.\
name ""
mov %hseanwave,5:hseanwave
>The Older Harpy starts to move her waist.@
>Just like she explained, she started to tighten her insides with every thrust.\
name "Luka"
>Haa.....\
name ""
name "Older Harpy"
>See? He's feeling good now.\
name ""
name "Younger Harpy"
>Uwa! You're right...\
name ""
>The Younger Harpy started to move her waist as she watched, imitating her sister.\
>The thought of being raped by the Younger Harpy after this made excitement build in my waist.\
name "Luka"
>Auuu...\
name ""
name "Older Harpy"
>I'll finish him off a little faster than usual.@
>I'm going to tighten around him like this...@
>Just flex the muscle you use when you urinate to squeeze him...\
name ""
name "Luka"
>Ahiiii!\
name ""
>The Older Harpy squeezes around me as she pushes down harder.@
>Her movements combined with her tightness was like being milked by some kind of machine.\
>The intense stimulation was quickly sending me over the edge.\
name "Younger Harpy"
>That's amazing, Sis!\
name ""
name "Older Harpy"
>Fufu... And with this, I'll finish him. \
name ""
>As she laughs, the Older Harpy quickly contracts and increases her speed.\
gosub *syasei1
lsp 700,":a;chara\hapy_bc_hc2.bmp",0,0
lsp 690,":a;chara\hapy_bc_ct02.bmp",503,0
gosub *syasei2
name "Luka"
>Ahhh!\
name ""
name "Younger Harpy"
>Uwa!@
>It's shooting off so much white stuff...\
name ""
name "Older Harpy"
>Fufu... It's shooting it out in your older sister's pussy.\
name ""
lsp 690,":a;chara\hapy_bc_ct03.bmp",503,0:print 10,500
>Twitching in the Older Harpy, I shoot out everything into her.\
mov %hseanwave,0:hseanwave
name "Older Harpy"
>That's how you squeeze out a man's semen to mate.@
>Now it's your turn.\
>I know you can do it. Squeeze out a lot!\
name ""
>The Older Harpy stands up and separates from me.\
csp 690
lsp 700,":a;chara\hapy_bc_hb1.bmp",0,0:print 10,500
>Before I can move, the Younger Harpy jumps on top of me.\
name "Younger Harpy"
>So I do it like this...\
name ""
>The Younger Harpy quickly drops her waist onto me.\
mov %hseanwave,1:hseanwave
>With surprising quickness, I get sucked all the way into her.\
name "Younger Harpy"
>Faa... It went in!\
name ""
name "Luka"
>Auuuu...\
name ""
>Compared to the Older Harpy, she's incredibly tight.@
>Her entire vagina seems as if it's strangling me.\
name "Older Harpy"
>Fufu... Let me have some fun, too.\
name ""
>The Older Harpy slowly pushes her vagina onto my face.\
name "Younger Harpy"
>It feels really good when he's in me...\
name ""
name "Older Harpy"
>Mating feels really good, doesn't it?@
>Try moving your hips like I was doing earlier.\
>He won't be able to hold on if you do that.\
name ""
name "Younger Harpy"
>Ok... I'll give it a try!\
name ""
mov %hseanwave,3:hseanwave
>As she says that, the Younger Harpy starts to clumsily move her hips.\
name ""
name "Luka"
>Faaaa!\
name ""
>Twisted in her tiny pussy, my dick is being played with.\
>Her rough movements and tightness gave an incredibly different pleasure than her sister.\
name "Younger Harpy"
>Like this...?@
>Am I doing it right, Sis?\
name ""
name "Older Harpy"
>That looks good...@
>If you keep it up like that, he won't last much longer.\
name ""
name ""
name "Luka"
>Uaaaa!\
name ""
>The Younger Harpy continues to move her waist around in slow motion, tantalizing me with pleasure.\
name "Older Harpy"
>Now it's time to finish him off.@
>Can you tighten up like your big sister did earlier?\
name ""
name "Younger Harpy"
>Ok, I'll try it!@
>Umf!@> Is that tight enough?\
name ""
name "Luka"
>Ah! Haa!\
name ""
>Every time the Younger Harpy puts power into it, the pressure on me becomes unbearable.\
>Her already tight pussy feels like it's crushing me in her walls.\
name "Younger Harpy"
>Umf!\
name "Luka"
>Ahh! I'm coming... again!\
name ""
name "Older Harpy"
>It looks like you need just a little more.@
>One more time should be enough to finish him off.\
name ""
name "Younger Harpy"
>Ok!@>Umf!\
name ""
name "Luka"
>Aaaaaa!\
name ""
>Twitching in her, I go over the edge.@
gosub *syasei1
lsp 700,":a;chara\hapy_bc_hb2.bmp",0,0
gosub *syasei2
>Squeezing everything out of me, my semen overflows into her tiny hole.\
name "Younger Harpy"
>Faa... I feel the warm stuff spreading inside of me...\
name ""
name "Older Harpy"
>Fufu, I'm glad.@
>He ejaculated inside of you.@
>You did good for your first time mating.\
name "Younger Harpy"
>Heehee... He leaked out in me, huh?@
>Did I really feel that good?\
name ""
name "Luka"
>Auuu...\
name ""
>After I finished spurting everything out, the Younger Harpy started to move her waist again.@
>Inside her tight pussy, the stimulation started all over again...\
name "Younger Harpy"
>Hey... Sis...@
>I want to mate more with this person...\
name ""
name "Older Harpy"
>Fufu... So you like him?@
>Shall we take him back to our nest, then?\
>We can keep him forever, and you can mate with him for as long as you want.\
name ""
name "Younger Harpy"
>Yay!@
>You'll mate with me every day from now on, ok?\
name ""
name "Luka"
>That...@>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\hapy_bc_hb3.bmp",0,0
gosub *syasei2
>My protest cut short by another orgasm, I explode in the Younger Harpy again.@
>Forced to come over and over, I lose consciousness.\
gosub *anten
mov %hseanwave,0:hseanwave
>My adventure ends here.@
>From now on, I'll be forced to mate with these sisters every day...\
>It might not be so bad...\
>..........\
goto *badend



*queenhapy_start

mov $name,"Queen Harpy"
mov $name2,"Queen Harpy"
mov $lavel,"queenhapy"
mov $tatie1,"queenhapy_st01"
mov $tatie2,"queenhapy_st03"
mov $tatie3,"queenhapy_st04"
mov $tatie4,"queenhapy_st03"
mov $haikei,"bg027"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,350
if %nanido=2 mov %max_enemylife,350
if %nanido=3 mov %max_enemylife,350
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,100
mov %music,2
gosub *maxmp:mov %mp,1
gosub *syutugen2
mov $mogaku_anno1,"Luka can't break free of the Queen Harpy!"
mov $mogaku_anno2,"Luka breaks free of the Queen Harpy!"
mov $mogaku_anno3,"Luka can't break free of the Queen Harpy!"
mov $mogaku_anno4,"Luka scores a critical hit!"
mov $mogaku_sel1,"Resistance is futile. Feel the pleasure only a Harpy Queen can grant!"
mov $mogaku_sel2,"Resistance is futile. Feel the pleasure only a Harpy Queen can grant!"
mov $mogaku_sel3,"Struggling is pointless. Don't you want me to violate you?"
mov $mogaku_sel4,"Struggling is pointless. Don't you want me to violate you?"
mov $mogaku_sel5,"Struggling is pointless. Don't you want me to violate you?"
mov $mogaku_dassyutu1,"Oh... was the pleasure not to your satisfaction?"
mov $mogaku_dassyutu2,""
mov $mogaku_kaisin1,"Shall I counterattack?"
mov $mogaku_kaisin2,""
mov $half_s1,"Are you feeling good?"
mov $half_s2,"If you surrender, I can make it even better..."
mov $kiki_s1,"Are you at your limit?"
mov $kiki_s2,"If you give yourself completely to me, I can make it even better..."
mov %end_n,3
mov %exp_minus,150
mov %zmonster_x,-270
mov %tukix,300
gosub *face1
name "Luka"
>Gah...\
name ""
>This looks like it's going to be a difficult fight...@
>I need to give this everything I have.\
name $name
>Pointing a sword at a Queen is a rather big crime.@
>No matter the reason, rape is the punishment.\
>I shall personally see to carrying out your punishment.\
name ""
mov %sinkou,1
goto *common_main



*queenhapy_v

gosub *face3
name $name
>How could I...?\
name ""
>Dealt a final blow, the Queen Harpy slumps to the ground.@
>It doesn't look like she can fight back any longer.\
mov %viclose,1:gosub *victory
mov %getexp,350:gosub *lvup
mov %2213,1
goto *sean0064



*queenhapy_kousan

gosub *kousan_syori
>Luka yields to the promise of pleasure, ending his resistance!\
gosub *face2
name $name
>So you accepted your inevitable defeat.@
>Allow me to play with you to my heart's content...\
name ""
goto *queenhapy_a



*queenhapy_main

gosub *cmd_main
if %cmd1=11 && %kousoku=1 && %sinkou<3 goto *queenhapy_miss3
if %cmd1=11 && %kousoku=1 && %sinkou=3 goto *common_miss3
if %cmd1=11 && %kousoku=2 goto *common_mogaku
if %cmd1=11 && %nanido=0 goto *common_attack
if %cmd1=11 && %sinkou=1 goto *queenhapy_attack
if %cmd1=11 && %sinkou>1 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *queenhapy_kousan
if %cmd1=16 goto *queenhapy_onedari
if %cmd1=17 goto *common_skill
goto *queenhapy_main



*queenhapy_attack

gosub *common_attack1
if %enemylife=0 goto *queenhapy_v
if %before_action=3 goto *queenhapy_a
name $name
>I see... You aren't too bad with your sword.\
name ""
name "Luka"
>It hit!?@
>She didn't fly away like the others...?\
name ""
gosub *face2
name $name
>The Queen Harpy wouldn't fight in such a sloppy way.\
name ""
gosub *face1
mov %sinkou,2
goto *queenhapy_a



*queenhapy_miss3

mov %before_action,10
name "Luka"
>Now!\
name ""
>Luka scores a critical hit!
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\slash3.ogg"
mov %abairitu,200:gosub *enemylife
dwave 1,"se\dassyutu.ogg"
mov %kousoku,0:gosub *status_print
if %enemylife=0 goto *queenhapy_v
>The Queen Harpy lets go of Luka!\
gosub *face1
name $name
>So you waited for an opening...@
>You're pretty good.\
name ""
mov %sinkou,3
mov %owaza_count1a,0
goto *queenhapy_a



*queenhapy_a

if %kousoku=1 gosub *queenhapy_a6:goto *common_main
if %kousoku=2 rnd2 %ransu,1,2
if %kousoku=2 && %ransu=1 gosub *queenhapy_a7:goto *common_main
if %kousoku=2 && %ransu=2 gosub *queenhapy_a8:goto *common_main
if %counter>0 add %counter,1
if %counter>2 gosub *queenhapy_x2:goto *common_main
if %counter>0 gosub *queenhapy_a9:goto *common_main
if %kousan=1 skip 3
mov %hanyo2,%hanyo2+1
if %hanyo2>2 && %sinkou>1 gosub *queenhapy_x1:goto *common_main
rnd2 %ransu,1,5
if %ransu=1 gosub *queenhapy_a1:goto *common_main
if %ransu=2 gosub *queenhapy_a2:goto *common_main
if %ransu=3 gosub *queenhapy_a3:goto *common_main
if %ransu=4 gosub *queenhapy_a4:goto *common_main
if %ransu=5 && %owaza_count1a>1 gosub *queenhapy_a5:goto *common_main
skip -6



*queenhapy_a1

add %stack,1
skillcount1 3025
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Shall I trample you?"
if %ransu=2 mov $sel1,"Do men really enjoy this?"
if %ransu=3 mov $sel1,"Feeling good even by something like this..."
name $name
eng $sel1:$sel6\
name ""
skillname "Harpy Footjob"
dwave 1,"se\ero_koki1.ogg"
>The Queen Harpy steps on Luka's groin!
if %nanido<2 damage 11,13
if %nanido=2 damage 14,17
if %nanido=3 damage 20,24
skillname ""
if %mylife=0 sub %stack,1:return *queenhapy_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*queenhapy_a2

add %stack,1
skillcount1 3026
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"*Lick* *Suck*":mov $sel2,"The Queen Harpy sucks on Luka's penis!"
if %ransu=2 mov $sel1,"The Queen shall use her tongue...":mov $sel2,"The Queen Harpy licks Luka's penis!"
if %ransu=3 mov $sel1,"I shall grant your genitals with the Queen's kiss.":mov $sel2,"The Queen Harpy kisses Luka's penis!"
if %ransu=4 mov $sel1,"Shall I suck on it a little...?":mov $sel2,"The Queen harpy sucks on Luka's penis!"
if %ransu=5 mov $sel1,"If I do this, you won't be able to hold on...":mov $sel2,"The Queen Harpy licks Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Harpy Blowjob"
dwave 1,"se\ero_buchu3.ogg"
eng $sel2:$sel6
if %nanido<2 damage 14,16
if %nanido=2 damage 19,22
if %nanido=3 damage 26,30
skillname ""
if %mylife=0 sub %stack,1:return *queenhapy_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*queenhapy_a3

add %stack,1
skillcount1 3027
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Shall I rub you with my wings...?"
if %ransu=2 mov $sel1,"Feel my feathers..."
if %ransu=3 mov $sel1,"Be soaked in ecstasy with my feathers..."
name $name
eng $sel1:$sel6\
name ""
skillname "Feather Massage"
dwave 1,"se\umaru.ogg"
>The Queen Harpy rubs Luka with her soft feathers!
if %nanido<2 damage 15,17
if %nanido=2 damage 20,23
if %nanido=3 damage 28,32
skillname ""
if %mylife=0 sub %stack,1:return *queenhapy_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*queenhapy_a4

add %stack,1
skillcount1 3028
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Fufu... How's this?":mov $sel2,"The Queen Harpy rubs Luka's penis between her breasts!"
if %ransu=2 mov $sel1,"Have a taste of my chest...":mov $sel2,"The Queen harpy rubs Luka's penis between her breasts!"
if %ransu=3 mov $sel1,"Fufu... How's this?":mov $sel2,"The Queen Harpy pushes her breasts together, crushing Luka's penis!"
if %ransu=4 mov $sel1,"Just let it out in my bosom...":mov $sel2,"The Queen Harpy presses her breasts together, crushing Luka's penis!"
if %ransu=5 mov $sel1,"Indulge in the ecstasy...":mov $sel2,"The Queen Harpy puts Luka's penis between her breasts, and starts to shake!"
eng $sel1:$sel6\
name ""
skillname "Royal Tit Fuck"
dwave 1,"se\ero_koki1.ogg"
eng $sel2:$sel6
if %nanido<2 damage 15,17
if %nanido=2 damage 20,23
if %nanido=3 damage 28,32
skillname ""
if %mylife=0 sub %stack,1:return *queenhapy_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*queenhapy_a5

add %stack,1
if %kousan=2 skip 4
name $name
>Shall we get a little... closer?\
name ""
skillname "Throw Down"
>The Queen Harpy throws Luka onto the ground!\
mov %kousoku,1:gosub *status_print
>The Queen Harpy leans down on Luka!\
skillname ""
if %kousan>0 skip 5
name "Luka"
>Gah...\
name ""
>This might be my chance!\
gosub *face2
name $name
if %first_sel2=1 skip 4
>Rejoice.@
>Someone like you shall get to mate with the Queen.@
mov %first_sel2,1
>Give all of your semen to my womb...\
name ""
if %nanido<2 mov %genmogaku,0
if %nanido=2 mov %genmogaku,0
if %nanido=3 mov %genmogaku,0
sub %stack,1
return



*queenhapy_a6

add %stack,1
if %kousan=2 skip 4
name $name
>Shall we get a little... closer?\
name ""
skillname "Royal Insertion"
dwave 1,"se\ero_pyu5.ogg"
lsp 700,":a;chara\queenhapy_h1.bmp",0,0
lsp 690,":a;chara\queenhapy_ct01.bmp",0,0:print 10,500
>The Queen Harpy pushes down, forcing Luka into her!
mov %damage_kotei,1
damage 18,20
mov %kousoku,2:mov %genmogaku,100
skillname ""
if %mylife=0 sub %stack,1:return *queenhapy_h5
name $name
>Fufu... How is it inside of the Queen?@
>Your penis seems to be enjoying it...\
name ""
mov $mogaku_sel1,"Give yourself to the pleasure..."
mov $mogaku_sel2,"It isn't possible to refuse the Queen..."
mov $mogaku_sel3,"Just sit back and let me violate you..."
mov $mogaku_sel4,"It isn't possible for you to fight back like this..."
mov $mogaku_sel5,"Surrender, and drown in the pleasure that only a Queen can bring..."
sub %stack,1
return



*queenhapy_a7

add %stack,1
skillcount1 3029
>Luka is being raped by the Queen Harpy!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Feel the pleasure only a Queen's pussy can bring...":mov $sel2,"The Queen Harpy moves her waist!"
if %ransu=2 mov $sel1,"Amazing, isn't it?":mov $sel2,"The Queen Harpy's vagina starts to tighten!"
if %ransu=3 mov $sel1,"A weak boy like you can't resist a Queen...":mov $sel2,"The Queen Harpy's vagina contracts!"
if %ransu=4 mov $sel1,"Let it all out inside of me...":mov $sel2,"The Queen Harpy's insides start to wriggle, massaging Luka!"
if %ransu=5 mov $sel1,"Just give up and drown in the pleasure...":mov $sel2,"Caught by the Queen Harpy, sweet pleasure washes over Luka!"
name $name
eng $sel1:$sel6\
name ""
skillname "Royal Pussy"
dwave 1,"se\ero_chupa4.ogg"
eng $sel2:$sel6
mov %damage_kotei,1
damage 18,20
skillname ""
if %mylife=0 sub %stack,1:return *queenhapy_h6
sub %stack,1
return



*queenhapy_a8

add %stack,1
skillcount1 3030
>Luka is being raped by the Queen Harpy!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Fufu... Can you endure this?":mov $sel2,"The Queen Harpy starts to pump Luka rapidly!"
if %ransu=2 mov $sel1,"Be soaked in ecstasy...":mov $sel2,"The Queen Harpy pushes Luka deep inside of her!":mov $sel3,"Luka's penis is violently massage by the Queen Harpy!"
if %ransu=3 mov $sel1,"You won't be able to endure this...":mov $sel2,"The Queen Harpy shakes her waist!":mov $sel3,"Pleasure is forced into Luka!"
if %ransu=4 mov $sel1,"Fufu... Let it out!":mov $sel2,"The Queen Harpy moves her waist in a slow motion!":mov $sel3,"Luka's penis is gently rubbed inside the Queen Harpy!"
if %ransu=5 mov $sel1,"Let it all out in me...":mov $sel2,"The Queen Harpy pumps Luka rapidly!":mov $sel3,"Luka is violently massaged inside the Queen Harpy!"
name $name
eng $sel1:$sel6\
name ""
skillname "Royal Pumping"
dwave 1,"se\ero_chupa3.ogg"
eng $sel2:$sel6\
eng $sel3:$sel6
mov %damage_kotei,1
damage 21,23
skillname ""
if %mylife=0 sub %stack,1:return *queenhapy_h7
sub %stack,1
return



*queenhapy_x1

add %stack,1
name $name
>Fufu...\
name ""
skillname "Royal Invitation"
mov $tatie1,"queenhapy_st01_2"
mov $tatie2,"queenhapy_st03_2"
mov $tatie3,"queenhapy_st03_2"
mov $tatie4,"queenhapy_st03_2"
gosub *face1
dwave 1,"se\wind1.ogg"
>The Queen Harpy spreads her wings!@
>The Queen Harpy is completely still!\
skillname ""
if %first_sel1=1 skip 11
name $name
>Give me your best shot.@
>You're too pathetic to hurt me.\
name ""
name "Luka"
>What...?\
name ""
>I have a bad feeling about this...@
>Should I attack...?\
skip 4
name $name
>Are you not going to come? Fufu...\
name ""
mov %first_sel1,1
mov %counter,1
sub %stack,1
return



*queenhapy_a9

add %stack,1
name $name
>Fufu...\
name ""
skillname "Royal Invitation"
dwave 1,"se\wind1.ogg"
>The Queen Harpy spreads her wings!@
>The Queen Harpy is completely still!\
skillname ""
name $name
>Fufu.. Are you going to ignore my invitation?\
name ""
name "Luka"
>..........\
name ""
sub %stack,1
return



*queenhapy_x2

add %stack,1
if %kousan=2 skip 4
name $name
>You're pretty careful...\
name ""
mov $tatie1,"queenhapy_st01"
mov $tatie2,"queenhapy_st03"
mov $tatie3,"queenhapy_st04"
mov $tatie4,"queenhapy_st03"
gosub *face1
>The Queen Harpy puts down her wings!\
mov %counter,0
mov %hanyo2,0
sub %stack,1
return



*queenhapy_counter

add %stack,1
mov %counter,0
skillcount1 3031
if %kousan=2 skip 6
gosub *face2
name $name
>I'll return it...@
>Surrender inside of me!\
name ""
skillname "Happiness Rondo"
mov $tatie4,"queenhapy_h1"
lsp 690,":a;chara\queenhapy_ct01.bmp",0,0
mov %kousoku,2:gosub *status_print
mov %genmogaku,100
>The Queen Harpy pins down Luka and forces him inside of her!\
dwave 1,"se\ero_pyu2.ogg"
>Luka's penis is wrapped by her warm vagina!
mov %damage_kotei,1
damage 30,35
dwave 1,"se\ero_chupa4.ogg"
>Luka is being forcefully rubbed by her tight pussy!
mov %damage_kotei,1
damage 30,35
dwave 1,"se\ero_chupa5.ogg"
>Luka is violently massaged deep in the Queen Harpy!\
>As if being milked, her walls rub against Luka!
mov %damage_kotei,1
damage 30,35
skillname ""
sub %stack,1
return *queenhapy_h8



*queenhapy_onedari

mov $list1,"Harpy Footjob"
if %3025>0 mov %list_num1,1
mov $list2,"Harpy Blowjob"
if %3026>0 mov %list_num2,1
mov $list3,"Feather Massage"
if %3027>0 mov %list_num3,1
mov $list4,"Royal Tit Fuck"
if %3028>0 mov %list_num4,1
mov $list5,"Royal Pussy"
if %3029>0 mov %list_num5,1
mov $list6,"Royal Pumping"
if %3030>0 mov %list_num6,1
mov $list7,"Happiness Rondo"
if %3031>0 mov %list_num7,1
gosub *cmd_onedari
if %cmd1=11 goto *queenhapy_onedari1
if %cmd1=12 goto *queenhapy_onedari2
if %cmd1=13 goto *queenhapy_onedari3
if %cmd1=14 goto *queenhapy_onedari4
if %cmd1=15 goto *queenhapy_onedari5
if %cmd1=16 goto *queenhapy_onedari5
if %cmd1=17 goto *queenhapy_onedari6
if %cmd1=-1 goto *queenhapy_main
goto *queenhapy_onedari



*queenhapy_onedari1

gosub *onedari_syori
name $name
>You wish to be trampled under the Queen's talon?@
>Allow me to fulfill your desire...\
name ""
if %counter>0 gosub *queenhapy_x2
gosub *queenhapy_a1
skip -1



*queenhapy_onedari2

gosub *onedari_syori
name $name
>You want to be defeated by the Queen's mouth?@
>Allow me to fulfill your desire...\
name ""
if %counter>0 gosub *queenhapy_x2
gosub *queenhapy_a2
skip -1



*queenhapy_onedari3

gosub *onedari_syori
name $name
>You want to be defeated by the Queen's wings?@
>Allow me to fulfill your desire...\
name ""
if %counter>0 gosub *queenhapy_x2
gosub *queenhapy_a3
skip -1



*queenhapy_onedari4

gosub *onedari_syori
name $name
>You want to be defeated by the Queen's breasts?@
>Allow me to fulfill your desire...\
name ""
if %counter>0 gosub *queenhapy_x2
gosub *queenhapy_a4
skip -1



*queenhapy_onedari5

gosub *onedari_syori_k
name $name
if %cmd1=15 mov $sel1,"So you want me to start pumping you?"
if %cmd1=16 mov $sel1,"So you want to thrust inside the Queen's pussy?"
eng $sel1:$sel6\
>Allow me to fulfill your desire...\
name ""
if %counter>0 gosub *queenhapy_x2
if %kousoku=0 gosub *queenhapy_a5
if %kousoku=1 gosub *queenhapy_a6
if %cmd1=15 gosub *queenhapy_a7
if %cmd1=16 gosub *queenhapy_a8
skip -2



*queenhapy_onedari6

gosub *onedari_syori
name $name
>You want me to use my ultimate technique?@
>Then, I'll finish you off in one shot...\
name ""
if %counter>0 skip 4
mov $tatie1,"queenhapy_st01_2"
mov $tatie2,"queenhapy_st03_2"
mov $tatie3,"queenhapy_st03_2"
mov $tatie4,"queenhapy_st03_2"
gosub *face2
>The Queen Harpy spreads her wings!\
gosub *queenhapy_counter



*queenhapy_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\queenhapy_bk03.bmp",0,0
gosub *syasei2
>Unable to resist any longer, Luka explodes all over the Queen Harpy's foot.\
mov %viclose,1:gosub *lose
mov %2513,%2513+1:if %2513=1 mov %count_koenemy,%count_koenemy+1
if %2513>%count_most mov %count_most,%2513:mov $count_mostname,$name
count 6,1
mov $bad1," Luka succumbs to the Queen Harpy's footjob."
mov $bad2," After that, Luka spent the rest of his days as the Queen's mate, indulging in pleasure every day."
gosub *face2
name $name
>Climaxing because of my foot?@
>How miserable.\
name ""
>The Queen Harpy laughs as she shows me her semen covered foot, as if taunting me with proof of my defeat.\
name $name
>That's the end of the foreplay...@
>Next is the real thing.@
>Let's mate without holding back...\
name ""
goto *queenhapy_h



*queenhapy_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\queenhapy_bk01.bmp",0,0
gosub *syasei2
>Unable to resist any longer, Luka explodes inside the Queen Harpy's mouth.\
mov %viclose,1:gosub *lose
mov %2513,%2513+1:if %2513=1 mov %count_koenemy,%count_koenemy+1
if %2513>%count_most mov %count_most,%2513:mov $count_mostname,$name
count 4,1
mov $bad1," Luka succumbs to the Queen Harpy's blowjob."
mov $bad2," After that, Luka spent the rest of his days as the Queen's mate, indulging in pleasure every day."
gosub *face2
name $name
>You let out so much in my mouth...@
>But if you put it all out in here, I won't be able to conceive...\
name ""
>The Queen Harpy laughs as she shows me her semen filled mouth, as if taunting me with proof of my defeat.\
name $name
>That's the end of the foreplay...@
>Next is the real thing.@
>Let's mate without holding back...\
name ""
goto *queenhapy_h



*queenhapy_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\queenhapy_bk04.bmp",0,0
gosub *syasei2
>Unable to resist any longer, Luka explodes all over the Queen Harpy's wings.\
mov %viclose,1:gosub *lose
mov %2513,%2513+1:if %2513=1 mov %count_koenemy,%count_koenemy+1
if %2513>%count_most mov %count_most,%2513:mov $count_mostname,$name
count 13,1
mov $bad1," Luka succumbs to the Queen Harpy's feather massage."
mov $bad2," After that, Luka spent the rest of his days as the Queen's mate, indulging in pleasure every day."
gosub *face2
name $name
>Fufu... You covered my wings with your sticky semen.@
>Making them so dirty... How impolite.\
name ""
>The Queen Harpy laughs as she shows me her semen covered wings, as if taunting me with proof of my defeat.\
name $name
>That's the end of the foreplay...@
>Next is the real thing.@
>Let's mate without holding back...\
name ""
goto *queenhapy_h



*queenhapy_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\queenhapy_bk02.bmp",0,0
gosub *syasei2
>Unable to resist any longer, Luka explodes all over the Queen Harpy's chest.\
mov %viclose,1:gosub *lose
mov %2513,%2513+1:if %2513=1 mov %count_koenemy,%count_koenemy+1
if %2513>%count_most mov %count_most,%2513:mov $count_mostname,$name
count 7,1
mov $bad1," Luka succumbs to the Queen Harpy's tit fuck."
mov $bad2," After that, Luka spent the rest of his days as the Queen's mate, indulging in pleasure every day."
gosub *face2
name $name
>Making my chest so dirty...@
>Did it really feel that good?\
name ""
>The Queen Harpy laughs as she shows me her semen covered chest, as if taunting me with proof of my defeat.\
name $name
>That's the end of the foreplay...@
>Next is the real thing.@
>Let's mate without holding back...\
name ""
goto *queenhapy_h



*queenhapy_h5

mov %ikigoe,3:gosub *ikigoe
name $name
>Ara?\
name ""
gosub *syasei1
lsp 700,":a;chara\queenhapy_h2.bmp",0,0
lsp 690,":a;chara\queenhapy_ct02.bmp",0,0
gosub *syasei2
>Unable to resist the pleasure just from insertion, I explode inside of the Queen Harpy.\
mov %viclose,1:gosub *lose
mov %2513,%2513+1:if %2513=1 mov %count_koenemy,%count_koenemy+1
if %2513>%count_most mov %count_most,%2513:mov $count_mostname,$name
count 1,1
mov %count_bouhatu,%count_bouhatu+1
mov $bad1," Luka succumbs by accident just from insertion."
mov $bad2," After that, Luka spent the rest of his days as the Queen's mate, indulging in pleasure every day."
name $name
>Fufu... How pathetic.@
>Coming so quickly... The ultimate disgrace of a man.\
name ""
csp 690
lsp 700,":a;chara\queenhapy_st02.bmp",0,0
lsp 695,":a;chara\queenhapy_bk05.bmp",0,0:print 10,500
>The Queen Harpy stands up and takes my penis out of her, laughing down at me.\
>The semen I shot into her drips out, giving proof of my defeat.\
name $name
>Now, let's do it again.@
>I know you haven't had enough from just doing it once.@
>I'll let you indulge in the pleasure for a long time...\
name ""
goto *queenhapy_h



*queenhapy_h6

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\queenhapy_h2.bmp",0,0
lsp 690,":a;chara\queenhapy_ct02.bmp",0,0
gosub *syasei2
>Unable to withstand her the pleasure her pussy was bringing, I explode inside of the Queen Harpy.\
mov %viclose,1:gosub *lose
mov %2513,%2513+1:if %2513=1 mov %count_koenemy,%count_koenemy+1
if %2513>%count_most mov %count_most,%2513:mov $count_mostname,$name
count 1,1
mov $bad1," Luka succumbs to the Queen Harpy's tight pussy."
mov $bad2," After that, Luka spent the rest of his days as the Queen's mate, indulging in pleasure every day."
name $name
>Fufu... How was the Queen's pussy?\
name ""
csp 690
lsp 700,":a;chara\queenhapy_st02.bmp",0,0
lsp 695,":a;chara\queenhapy_bk05.bmp",0,0:print 10,500
>The Queen Harpy stands up and takes my penis out of her, laughing down at me.\
>The semen I shot into her drips out, giving proof of my defeat.\
name $name
>Now, let's do it again.@
>I know you haven't had enough from just doing it once.@
>I'll let you indulge in the pleasure for a long time...\
name ""
goto *queenhapy_h



*queenhapy_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\queenhapy_h2.bmp",0,0
lsp 690,":a;chara\queenhapy_ct02.bmp",0,0
gosub *syasei2
>Unable to withstand her the pleasure her pumping waist was bringing, I explode inside of the Queen Harpy.\
mov %viclose,1:gosub *lose
mov %2513,%2513+1:if %2513=1 mov %count_koenemy,%count_koenemy+1
if %2513>%count_most mov %count_most,%2513:mov $count_mostname,$name
count 1,1
mov $bad1," Luka succumbs to the Queen's thrusting waist."
mov $bad2," After that, Luka spent the rest of his days as the Queen's mate, indulging in pleasure every day."
name $name
>Well?@
>Did the technique of a Queen send you to heaven?\
name ""
csp 690
lsp 700,":a;chara\queenhapy_st02.bmp",0,0
lsp 695,":a;chara\queenhapy_bk05.bmp",0,0:print 10,500
>The Queen Harpy stands up and takes my penis out of her, laughing down at me.\
>The semen I shot into her drips out, giving proof of my defeat.\
name $name
>Now, let's do it again.@
>I know you haven't had enough from just doing it once.@
>I'll let you indulge in the pleasure for a long time...\
name ""
goto *queenhapy_h



*queenhapy_h8

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\queenhapy_h2.bmp",0,0
lsp 690,":a;chara\queenhapy_ct02.bmp",0,0
gosub *syasei2
name "Luka"
>Auuuu!\
name ""
>My body twitches as I explode inside the Queen Harpy.\
>The Queen Harpy continues to pump me even as I shoot into her.@
>Squeezed to the last drop, I bask in the pleasure.\
mov %viclose,1:gosub *lose
mov %2513,%2513+1:if %2513=1 mov %count_koenemy,%count_koenemy+1
if %2513>%count_most mov %count_most,%2513:mov $count_mostname,$name
count 1,1
mov $bad1," Luka succumbs instantly to the Happiness Rondo"
mov $bad2," After that, Luka spent the rest of his days as the Queen's mate, indulging in pleasure every day."
mov $tatie1,"queenhapy_st01"
mov $tatie2,"queenhapy_st03"
mov $tatie3,"queenhapy_st04"
mov $tatie4,"queenhapy_st03"
name $name
>Fufu... Instant loss.@
>If I become even a little serious, someone like you stands no chance.\
name ""
csp 690
lsp 700,":a;chara\queenhapy_st02.bmp",0,0
lsp 695,":a;chara\queenhapy_bk05.bmp",0,0:print 10,500
>The Queen Harpy stands up and takes my penis out of her, laughing down at me.\
>The semen I shot into her drips out, giving proof of my defeat.\
name $name
>Now, let's do it again.@
>I know you haven't had enough from just doing it once.@
>I'll let you indulge in the pleasure for a long time...\
name ""
goto *queenhapy_h



*queenhapy_h

if %2513=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
>The Queen Harpy holds me tightly, and forces my waist into hers.\
name $name
>The Queen is the center of the tribe.@
>To have lots of children, I need to mate with many men.\
>Because of that, I have to mate quickly.@
>A Queen's pussy is so exquisite that a normal man can barely last ten seconds.\
>Shall I give you a taste...?\
name ""
mov %hseanwave,1:hseanwave
cspl 690,699
lsp 700,":a;chara\queenhapy_h1.bmp",0,0:print 10,500
>The Queen Harpy tightly holds me, and pushes me into her.\
name "Luka"
>Aaaa!\
name ""
lsp 690,":a;chara\queenhapy_ct01.bmp",0,0:print 10,500
>Her insides are slimy and warm, and slightly loose.\
>But her walls are covered with rough spots, and the grainy texture sent chills down my spine with every movement.\
name $name
>Do the soft bumps inside of me feel good?@
>Just being inserted into the Queen is an unbearable pleasure, isn't it?\
>Once you reach all the way inside, there's no way you can endure.\
name ""
name "Luka"
>Ahiii!\
name ""
>If I hadn't just ejaculated, there's no way I would have endured this long.\
>Wrapped inside of her, a strange pleasure spreads throughout my dick.\
name "Luka"
>What is this...?\
name ""
name $name
>At the deepest place inside of me is a special part that fits the tip of the penis.@
>With it, I can specially massage the tip separate from the rest of the penis.\
>With the Queen's special technique, I can force any man to come whenever I want.\
name ""
name "Luka"
>Ahhhh!\
name ""
mov %hseanwave,4:hseanwave
>In her deepest part, I can feel her walls start to close around my tip.@
>The intense pleasure makes my body start to writhe.\
name $name
>Fufu... I only did it for a second, but you avoided an instant death, huh?\
>But no matter.@
>I'll keep doing it, and squeeze everything out of you until you're no longer able to move.\
name ""
name "Luka"
>Ahii! Amazing!\
>Aahhhh!\
name ""
>The Queen Harpy tightens around my tip again, deep inside of her.@
>Surrounded by her soft flesh, I go over the edge.\
>Even though I just came, I feel myself coming again.\
name "Luka"
>Haauuu!\
name ""
gosub *syasei1
lsp 700,":a;chara\queenhapy_h2.bmp",0,0
lsp 690,":a;chara\queenhapy_ct02.bmp",0,0
gosub *syasei2
>I came again so soon...@
>Surrendering to the pleasure, I explode inside of her.\
>The Queen Harpy continues to squeeze me deep inside of her, even as I orgasm.\
name $name
>Fufu... Already giving up?@
>You actually managed to last twenty seconds...\
>Shall I force you to come a few more times?\
name ""
name "Luka"
>Ahii! Ahhhh!\
name ""
>Even before I finish ejaculating, she's already trying to squeeze out the next.\
>Stuck in her, I have no choice but to accept the pleasure.\
name "Luka"
>Stop... Or I'll come again...\
name ""
name $name
>Come.@
>There's no point holding on.@> Here, I'll do this.\
name ""
name "Luka"
>Hauuu!\
name ""
>The Queen Harpy suddenly contracts around me as my mind goes blank.\
gosub *syasei1:gosub *syasei2
>I just came a few seconds ago, but I'm already forced to another height.\
name $name
>Fufu... This is what it's like to mate with the Queen.\
>I can force a man to ejaculate whenever I wish.\
>Like this, I can mate many times every day.@
>Let's go again. Can you last longer than a few seconds this time?\
name ""
name "Luka"
>Haaa! Stop it!\
name ""
>Ignoring my pleas, she tightens around my tip deep inside of her again.\
>Her unending assault leads me to a world of pleasure.\
>It was as if as soon as I entered into her, I was forced to obey every command this Queen gave.\
>There's no way I can endure this...\
name "Luka"
>Co...coming!\
name ""
gosub *syasei1:gosub *syasei2
>The Queen stares at me as I shoot more proof of my surrender into her.\
name $name
>Fufu... And that's how a Queen Harpy mates with men.@
>The ultimate pleasure forces men into surrender and shame.\
>But soon you'll be a slave to my whims, and ejaculate whenever I wish.@
>Accept that position as your new joy.\
name ""
name "Luka"
>Auu.. Such a thing...\
name ""
>Fear starts to run through me at her words, as I try to pull out of her.@
>But...\
name $name
>Once you're in the Queen, you can't get out.@
>If you try to pull out...\
name ""
name "Luka"
>Ahh! Ahhhh!\
name ""
>When I try to pull out of her, the friction caused by her deepest part holding onto my tip is too much to bear.\
name $name
>A harpy has a different vagina than other monsters.@
>Once you're in the deepest part, if you try to pull it out the pleasure only increases.\
>The extreme pleasure will force a man to come if he tries to escape.\
name ""
name "Luka"
>Ahi... Ha...\
name ""
>I can't pull out of her even a little bit.@
>Whenever I do, an even more powerful pleasure attacks me.\
>Trying one last time, the pleasure is too much for me and sends me over the edge.\
name "Luka"
>Aahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\queenhapy_h3.bmp",0,0
lsp 690,":a;chara\queenhapy_ct03.bmp",0,0
gosub *syasei2
name $name
>Do you understand now?@
>There's no escape from me...\
name ""
>I explode yet again inside of the Queen Harpy.@
>Unable to pull out, I writhe helplessly inside of her.\
name $name
>Let me wring out a few more from you.@
>Don't worry though, I won't kill you.@
>For now, let's just go until you faint.\
name ""
name "Luka"
>Haaaaa!\
name ""
>The Queen Harpy squeezes me deep inside of her yet again.@
>Unable to resist her, I go over the edge again.\
name "Luka"
>Aahhh...\
name ""
gosub *syasei1:gosub *syasei2
name $name
>More... More...@
>Let me drain everything out of you...\
name ""
name "Luka"
>Sto...p... Faa....\
name ""
gosub *syasei1:gosub *syasei2
>I pour even more into the Queen Harpy.@
>Unable to escape, I'm brought to the peak over and over.\
>Dozens of times... I've lost count.\
name "Luka"
>Ahiiii!\
name ""
gosub *syasei1
lsp 700,":a;chara\queenhapy_h4.bmp",0,0
lsp 690,":a;chara\queenhapy_ct04.bmp",0,0
gosub *syasei2
>Over and over again, my vision starts to fade.@
>On the border of consciousness, I hear the Queen's words.\
name $name
>This is your punishment for raising your sword to me.@
>I don't care what your motive was.\
>Your courage and determination was admirable, though.@
>I shall make you my mate.\
>With your genes, we're sure to have many excellent offspring.\
name ""
name "Luka"
>Aaa....\
name ""
gosub *syasei1:gosub *syasei2
gosub *anten
mov %hseanwave,0:hseanwave
>Ejaculating one final time, I faint.\
name $name
>Oh, you fainted?@
>With today's effort, I should be able to have three excellent children...\
name ""
name "Luka"
>Aaa....\
name ""
>From now on, I live only to inseminate the Queen.@
>Every day, I'm violated until I faint.@
>It isn't so bad...\
>..........\
goto *badend



*delh_a_start

mov $name,"Dark Elf Fencer"
mov $name2,"Dark Elf"
mov $lavel,"delh_a"
mov $tatie1,"delh_a_st01"
mov $tatie2,"delh_a_st02"
mov $tatie3,"delh_a_st03"
mov $tatie4,"delh_a_st02"
mov $haikei,"bg004"
mov %monster_x,100
mov %monster_y,-100
if %nanido=1 mov %max_enemylife,180
if %nanido=2 mov %max_enemylife,230
if %nanido=3 mov %max_enemylife,250
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $half_s1,"It's about time to finish this..."
mov $half_s2,"I'll make you fall into a world of pleasure..."
mov $kiki_s1,"Resign yourself to the ecstasy..."
mov $kiki_s2,"Would you like to fall into deprivation with me...?"
mov %end_n,3
mov %exp_minus,0
mov %zmonster_x,-150
mov %tukix,260
mov $name,"Dark Elf"
>An Elf... a [Guardian of the Forest].\
>They are usually kind-hearted and friendly, but there are some who have fallen into darkness.\
>Those are called [Dark Elves]\
name $name
>Go back whence you came.@
>This is a place man must not approach.\
name ""
>The Dark Elf pulls out her sword and points it at me.\
name "Luka"
>Why aren't humans allowed?\
name ""
name $name
>Because they are human.@
>If you do not retreat, I shall be forced to act.\
name ""
name "Luka"
>........\
name ""
>That sword is a feint...@
>She'll make an opening with a physical attack, then use a pleasure attack...\
name "Luka"
>Even still, I need to get through!\
name ""
>I point my sword at the Dark Elf.\
>I want to create a world where we can coexist peacefully everywhere.@
>I can't overlook a place that discriminates against humans!\
gosub *face2
name $name
>If you won't retreat, then I shall force you into deprivation .@
>I will contaminate you with my darkness, and make you into my thing!\
name ""
gosub *face1
goto *common_main



*delh_a_v

gosub *face3
name $name
>What is this?@>My body...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,3000,"system\breakup.dll/urb"
>The Dark Elf became small enough to fit in the palm of my hand.\
name $name
>Sealing me...@>I'll remember this!\
name ""
dwave 1,"se\escape.ogg"
>While cursing me, the Dark Elf runs away!\
mov $name,"Dark Elf Fencer"
mov %viclose,1:gosub *victory
mov %getexp,50:gosub *lvup
mov %2214,1
goto *sean0068



*delh_a_kousan

gosub *kousan_syori
>Luka yields to the promise of pleasure, ending his resistance!\
gosub *face2
name $name
>That's a good choice.@
>Now... Fall into darkness...\
name ""
goto *delh_a_a



*delh_a_main

gosub *cmd_main
if %cmd1=11 goto *common_attack
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *delh_a_kousan
if %cmd1=16 goto *delh_a_onedari
if %cmd1=17 goto *common_skill
goto *delh_a_main



*delh_a_a

rnd2 %ransu,1,4
if %ransu=1 gosub *delh_a_a1:goto *common_main
if %ransu=2 gosub *delh_a_a2:goto *common_main
if %ransu=3 gosub *delh_a_a3:goto *common_main
if %ransu=4 && %status=0 && %owaza_count2a>2 gosub *delh_a_a4:goto *common_main
skip -5



*delh_a_a1

add %stack,1
skillcount1 3032
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"With my mouth, give in to the pleasure...":mov $sel2,"The Dark Elf starts to suck on Luka's penis!"
if %ransu=2 mov $sel1,"*Suck* *Suck*":mov $sel2,"The Dark Elf sucks Luka's penis in a piston movement!"
if %ransu=3 mov $sel1,"I'll cover it with my saliva...":mov $sel2,"The Dark Elf licks Luka's penis all over!"
if %ransu=4 mov $sel1,"Have a taste...":mov $sel2,"The Dark Elf holds Luka's penis in her mouth, licking it with her tongue!"
name $name
eng $sel1:$sel6\
name ""
skillname "Elf Blowjob"
dwave 1,"se\ero_buchu3.ogg"
eng $sel2:$sel6
if %nanido<2 damage 11,14
if %nanido=2 damage 16,21
if %nanido=3 damage 22,28
skillname ""
if %mylife=0 sub %stack,1:return *delh_a_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*delh_a_a2

add %stack,1
skillcount1 3033
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll use my hand...":mov $sel2,"The Dark Elf starts to rub Luka's penis with her hand!"
if %ransu=2 mov $sel1,"With my depraved hand...":mov $sel2,"The Dark Elf intensely massages Luka's penis!"
if %ransu=3 mov $sel1,"With this stimulation... Will you fall into deprivation?":mov $sel2,"The Dark Elf quickly pumps Luka's dick with her hand!"
name $name
eng $sel1:$sel6\
name ""
skillname "Elf Handjob"
dwave 1,"se\ero_koki1.ogg"
eng $sel2:$sel6
if %nanido<2 damage 10,12
if %nanido=2 damage 15,18
if %nanido=3 damage 20,24
skillname ""
if %mylife=0 sub %stack,1:return *delh_a_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*delh_a_a3

add %stack,1
skillcount1 3034
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"How is my dark chest...?":mov $sel2,"The Dark Elf presses Luka's penis against her chest!"
if %ransu=2 mov $sel1,"Fufu... Can you withstand this?":mov $sel2,"The Dark Elf presses her breasts between Luka's groin!"
if %ransu=3 mov $sel1,"Will you fall with this...?":mov $sel2,"The Dark Elf crushes Luka's dick between her breasts!"
name $name
eng $sel1:$sel6\
name ""
skillname "Elf Tit Fuck"
dwave 1,"se\ero_koki1.ogg"
eng $sel2:$sel6
if %nanido<2 damage 12,15
if %nanido=2 damage 18,22
if %nanido=3 damage 24,30
skillname ""
if %mylife=0 sub %stack,1:return *delh_a_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*delh_a_a4

add %stack,1
skillcount1 3035
if %status=1 >Luka is stuck in a trance!\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"This is the kiss of darkness..."
if %ransu=2 mov $sel1,"Fall into darkness..."
if %ransu=3 mov $sel1,"Give in to the ecstasy with my kiss..."
name $name
eng $sel1:$sel6\
name ""
skillname "Kiss of Ecstasy"
dwave 1,"se\ero_chupa2.ogg"
>The Dark Elf kisses Luka!\
>Ecstasy starts to flow through Luka's body!
damage 5,8
if %status=0 mov $sel1,"Luka is enraptured!"
if %status=1 mov $sel1,""
mov %status,1:gosub *status_print
if $sel1<>"" eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *delh_a_h4
if %kousan=2 && %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %kousan=2 && %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
if %kousan=2 sub %stack,1:return
name "Luka"
>Aaa....\
name ""
name $name
>Stay there soaked in ecstasy.@
>I'll make you fall into degeneration.\
name ""
mov %status_turn,3
if %nanido=3 rnd2 %status_turn,3,4
sub %stack,1
return



*delh_a_onedari

mov $list1,"Elf Blowjob"
if %3032>0 mov %list_num1,1
mov $list2,"Elf Handjob"
if %3033>0 mov %list_num2,1
mov $list3,"Elf Tit Fuck"
if %3034>0 mov %list_num3,1
mov $list4,"Kiss of Ecstasy"
if %3035>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *delh_a_onedari1
if %cmd1=12 goto *delh_a_onedari2
if %cmd1=13 goto *delh_a_onedari3
if %cmd1=14 goto *delh_a_onedari4
if %cmd1=-1 goto *delh_a_main
goto *delh_a_onedari



*delh_a_onedari1

gosub *onedari_syori
name $name
>You want to fall using my mouth?@
>Ok... Scatter the proof of your corruption in my mouth...\
name ""
gosub *delh_a_a1
skip -1



*delh_a_onedari2

gosub *onedari_syori
name $name
>You want to fall using my hand?@
>Ok... Scatter the proof of your corruption on my hand...\
name ""
gosub *delh_a_a2
skip -1



*delh_a_onedari3

gosub *onedari_syori
name $name
>You want to fall using my chest?@
>Ok... Scatter the proof of your corruption on my chest...\
name ""
gosub *delh_a_a3
skip -1



*delh_a_onedari4

gosub *onedari_syori
name $name
>You want to fall while enraptured?@
>Ok... I'll make sure you never escape from a world of ecstasy.\
name ""
gosub *delh_a_a4
skip -1



*delh_a_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\elf_bk01.bmp",100,-100
gosub *syasei2
>Luka explodes in the Dark Elf's mouth!\
mov %viclose,1:gosub *lose
mov %2514,%2514+1:if %2514=1 mov %count_koenemy,%count_koenemy+1
if %2514>%count_most mov %count_most,%2514:mov $count_mostname,$name
count 4,6
mov $bad1," Luka succumbs to the Dark Elf's mouth technique."
if %status=1 mov $bad1," While enraptured, Luka succumbs to the Dark Elf's mouth technique."
mov $bad2," Luka fell into degeneration, and was raped by the Dark Elf until his death."
gosub *face2
>Semen dripping out of her mouth, the Dark Elf gives a cold smile at Luka.@
>Showing me the proof of my surrender, she laughs at me.\
goto *delh_a_h



*delh_a_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\elf_bk03.bmp",100,-100
gosub *syasei2
>Luka explodes in the Dark Elf's hand!\
mov %viclose,1:gosub *lose
mov %2514,%2514+1:if %2514=1 mov %count_koenemy,%count_koenemy+1
if %2514>%count_most mov %count_most,%2514:mov $count_mostname,$name
count 5,6
mov $bad1," Luka succumbs to the Dark Elf's hand technique."
if %status=1 mov $bad1," While enraptured, Luka succumbs to the Dark Elf's hand technique."
mov $bad2," Luka fell into degeneration, and was raped by the Dark Elf until his death."
gosub *face2
>The Dark Elf plays with the sticky semen in her hand as she looks at me.@
>Showing me the proof of my surrender, she laughs at me.\
goto *delh_a_h



*delh_a_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\elf_bk02.bmp",100,-100
gosub *syasei2
>Luka explodes on the Dark Elf's chest!\
mov %viclose,1:gosub *lose
mov %2514,%2514+1:if %2514=1 mov %count_koenemy,%count_koenemy+1
if %2514>%count_most mov %count_most,%2514:mov $count_mostname,$name
count 7,6
mov $bad1," Luka succumbs to the Dark Elf's titty fuck."
if %status=1 mov $bad1," While enraptured, Luka succumbs to the Dark Elf's titty fuck."
mov $bad2," Luka fell into degeneration, and was raped by the Dark Elf until his death."
gosub *face2
>The Dark Elf plays with the sticky semen on her chest as she looks at me.@
>Showing me the proof of my surrender, she laughs at me.\
goto *delh_a_h



*delh_a_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\delh_a_bk01.bmp",100,-100
gosub *syasei2
>As the Dark Elf leans over and kisses me, I ejaculate, shooting my seed out all over her stomach.\
mov %viclose,1:gosub *lose
mov %2514,%2514+1:if %2514=1 mov %count_koenemy,%count_koenemy+1
if %2514>%count_most mov %count_most,%2514:mov $count_mostname,$name
count 18,6
mov $bad1," Luka succumbs to the Dark Elf's kiss of ecstasy."
mov $bad2," Luka fell into degeneration, and was raped by the Dark Elf until his death."
gosub *face2
>The Dark Elf plays with the sticky semen on her stomach as she looks at me.@
>Showing proof of my surrender, she laughs at me.\
goto *delh_a_h



*delh_a_h

if %2514=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name $name
>Fufu... This white semen is proof of your defeat.@
>How miserable... Falling like this to a monster.\
name ""
name "Luka"
>Uhgg...@>Stop...\
name ""
name $name
>Oh? You haven't fallen completely yet, then?@
>How strange... Do you have some sort of divine protection?\
>If our genitals touch, you will be corrupted for sure.@
>This time for sure, you will surrender to the darkness...\
name ""
cspl 690,699
lsp 700,":a;chara\delh_a_h1.bmp",0,0:print 10,500
>The Dark Elf straddles over top of me.\
name $name
>Now, I'm going to put it in...@
>I'll make you surrender to the deprivation with my pussy...\
name ""
name "Luka"
>No... Don't do that...\
name ""
>No matter how hard I struggle, I'm unable to get her off of me.@
>Having already orgasmed, I can't sum up the needed power...\
name $name
>Now... Let's connect...\
name ""
>As she says that, she slams down her waist.@
mov %hseanwave,1:hseanwave
lsp 700,":a;chara\delh_a_h2.bmp",0,0:print 10,500
>My penis is rammed into her wet vagina.\
name "Luka"
>Auuuu!\
name ""
>As soon as it enters her, I feel her wet walls move around me.@
>Even without any movement, it felt amazing.\
name $name
>You were a virgin...@
>A pure innocent instantly becoming corrupted...\
name ""
name "Luka"
>Aaaaa!\
name ""
mov %hseanwave,2:hseanwave
>The Dark Elf starts to shake her waist.@
>Rubbing against me with every movement, extreme pleasure starts to spread through me.\
>I have the feeling that if I give in to this pleasure, there won't be any escape.\
>Falling into darkness, and surrendering my body and mind to this Dark Elf...@
>The fear at such an outcome makes me start to panic.\
name "Luka"
>Stop! Let go of me!\
name ""
name $name
>Fufufu... It feels amazing to become corrupted...@
>If you pour your semen into me, you'll be sure to fall...\
name ""
name "Luka"
>I don't want that!\
name ""
>I desperately try to push the Dark Elf off of me, but she easily holds me down.\
name $name
>Fufu... You can't escape any longer.@
>Until you die, we're going to keep this up.\
name ""
name "Luka"
>Auu...\
name ""
>I put all of my concentration into my waist to hold off my orgasm.@
>Her waist continues to move, slowly whittling away my endurance.\
name $name
>It's pointless to try to endure... just let it out in me.\
>As soon as you give in to the pleasure, you will fall into the darkness.@
>Then we'll be able to continue this fun until you die...\
name ""
name "Luka"
>Auuuu....\
name ""
>The Dark Elf laughs as she watches my face contorted in both horror and pleasure.\
>As she continues to pump me, I feel myself rising to the edge.\
name $name
>Now, let it out inside of me.@
>Your white semen will stain my dark interior...\
name ""
>The Dark Elf looks down at me as she moves her hips, tempting me into the darkness...\
name "Luka"
>N...No...\
name ""
>Summoning the last of my strength, I manage to hold on.@
>Suddenly, the Dark Elf leans over and kisses me.\
name $name
>Fufu... my kiss of ecstasy.@
>While drowning in ecstasy, give in to deprivation...\
name ""
name "Luka"
>Faaaa!\
name ""
>As soon as her lips touch mine, a sweet trance starts to overpower my brain.\
>A sweet numbness starts to flow down my neck into my chest...\
>I can feel the numbness go lower and lower, until it reaches my waist...@
>As it enters my penis, all of my endurance vanishes.\
name "Luka"
>Aaaahhhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\delh_a_h3.bmp",0,0
gosub *syasei2
mov %hseanwave,0:hseanwave
>I explode inside of the Dark Elf.@
>It wasn't anything like a usual orgasm...\
>As if my soul itself was shooting out of me, I feel a sweet ecstasy start to wash over my body.\
>Each twitch of my penis that shoots out semen, more of that feeling flows through me.\
>It continues for an unusually long time, letting out more and more...\
name $name
>Fufu... Do you understand now what it means to fall into darkness?@
>It isn't possible to return anymore...\
name ""
name "Luka"
>Faa....\
name ""
>The long ejaculation continues, sucking out more of my soul...@
>Surrendering my body and soul to this Dark Elf, the ecstasy washes over me.\
name "Luka"
>Auu... Aaa....\
name ""
>When it finally ended, I had fallen in body and mind.\
name $name
>Fufu... You're finally fully corrupt.@
>Let's have some more fun now...\
>I'll let you enjoy it until you're no more...@
>Hahahahaha.\
name ""
name "Luka"
>.........\
name ""
>The Dark Elf continues to rape me.@
>Surrendering to the darkness, I am unable to resist anything.\
>This will continue until my death...\
gosub *anten
>..........\
goto *badend



*delh_b_start

mov $name,"Dark Elf Mage"
mov $name2,"Dark Elf"
mov $lavel,"delh_b"
mov $tatie1,"delh_b_st01"
mov $tatie2,"delh_b_st02"
mov $tatie3,"delh_b_st03"
mov $tatie4,"delh_b_h1a"
mov $haikei,"bg004"
mov %monster_x,150
mov %monster_y,30
if %nanido=1 mov %max_enemylife,185
if %nanido=2 mov %max_enemylife,235
if %nanido=3 mov %max_enemylife,250
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"Luka can't pull off the tentacle wrapped around him!"
mov $mogaku_anno2,"Luka tears the tentacle off of him!"
mov $mogaku_anno3,"The tentacle is sealing Luka's movement!"
mov $mogaku_sel1,"Fufu... It's no use."
mov $mogaku_sel2,"Just sit back and let me suck everything up..."
mov $mogaku_sel3,"It's pointless to struggle, just let me suck everything out..."
mov $mogaku_sel4,"So easily held down... Such a shameful boy."
mov $mogaku_sel5,"Let me suck everything in as you struggle..."
mov $mogaku_dassyutu1,"You don't want to meet your end in bliss...?"
mov $mogaku_dassyutu2,""
mov $half_s1,"Does it feel good?"
mov $half_s2,"If you surrender to my tentacle, it will be even better..."
mov $kiki_s1,"I'll end this soon..."
mov $kiki_s2,"I'll send you to heaven with this tentacle..."
mov %end_n,3
mov %exp_minus,50
mov %zmonster_x,-150
mov %owaza_count1a,2
mov $name,"Dark Elf"
gosub *face2
name $name
>I won't let you go any further than this...@
>I'll summon a tentacle for you, and make you it's prey...\
name ""
name "Luka"
>Gah...\
name ""
>It doesn't look like she'll listen to whatever I say.@
>I have no choice but to fight!\
gosub *face1
goto *common_main



*delh_b_v

gosub *face3
name $name
>What is this? What did you do!?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Dark Elf shrinks until she's small enough to fit in my hand!\
name $name
>This is... A seal!?@
>How can a human use magic this powerful!?\
name ""
dwave 1,"se\escape.ogg"
>The Dark Elf runs away.\
mov $name,"Dark Elf Mage"
mov %viclose,1:gosub *victory
mov %getexp,60:gosub *lvup
mov %2215,1
goto *sean0069



*delh_b_kousan

gosub *kousan_syori
>Luka yields to the promise of pleasure, ending his resistance!\
gosub *face2
name $name
>So you gave up?@
>Let me suck everything up then...\
name ""
goto *delh_b_a



*delh_b_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *delh_b_kousan
if %cmd1=16 goto *delh_b_onedari
if %cmd1=17 goto *common_skill
goto *delh_b_main



*delh_b_a

if %kousoku=1 rnd2 %ransu,1,2
if %kousoku=1 && %ransu=1 gosub *delh_b_a3:goto *common_main
if %kousoku=1 && %ransu=2 gosub *delh_b_a4:goto *common_main
rnd2 %ransu,1,2
if %ransu=1 gosub *delh_b_a1:goto *common_main
if %ransu=2 && %owaza_count1a>3 gosub *delh_b_a2:goto *common_main
skip -3



*delh_b_a1

add %stack,1
skillcount1 3036
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Take this..."
if %ransu=2 mov $sel1,"I'll cherish you..."
if %ransu=3 mov $sel1,"Can you endure this...?"
if %ransu=4 mov $sel1,"Fufufu..."
name $name
eng $sel1:$sel6\
name ""
skillname "Tentacle Caress"
dwave 1,"se\ero_makituki2.ogg"
>The tentacle winds around Luka's dick!
if %nanido<2 damage 9,12
if %nanido=2 damage 11,14
if %nanido=3 damage 15,18
skillname ""
if %mylife=0 sub %stack,1:return *delh_b_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*delh_b_a2

add %stack,1
if %kousan=2 skip 4
name $name
>I'll wrap around you...\
name ""
skillname "Tentacle Bind"
dwave 1,"se\ero_makituki3.ogg"
>The Dark Elf's tentacle wraps around Luka!
damage 9,12
mov %kousoku,1:gosub *status_print
>Luka's body is bound by the tentacle!\
skillname ""
if %mylife=0 sub %stack,1:return *delh_b_h2
if %kousan=2 sub %stack,1:return
name $name
if %first_sel1=1 skip 6
>Fufu... You can't move now.@
>Let me suck up everything like this...\
>Don't be afraid.@
>It will feel good as everything is sucked away...\
skip 4
>Fufu... I caught you again.@
>Aren't you happy? You get to be sucked again...@
>This time, enjoy it until there's nothing left...\
name ""
mov %first_sel1,1
if %nanido<2 mov %genmogaku,1
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,3
sub %stack,1
return



*delh_b_a3

add %stack,1
skillcount1 3037
>Luka is bound by the tentacle!\
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You can't move... Just sit there and enjoy the pleasure."
if %ransu=2 mov $sel1,"Does the wriggling tentacle feel good?"
if %ransu=3 mov $sel1,"I'll make you feel even better..."
if %ransu=4 mov $sel1,"How does it feel to be massaged by my tentacle...?"
name $name
eng $sel1:$sel6\
name ""
skillname "Bound Tentacle Caress"
dwave 1,"se\ero_makituki2.ogg"
>The Dark Elf's tentacle plays with Luka's dick!
if %nanido<2 damage 11,14
if %nanido=2 damage 14,17
if %nanido=3 damage 20,25
skillname ""
if %mylife=0 sub %stack,1:return *delh_b_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*delh_b_a4

add %stack,1
skillcount1 3038
>Luka is bound by the tentacle!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck everything up..."
if %ransu=2 mov $sel1,"It will suck everything from you, you know?"
if %ransu=3 mov $sel1,"Meet your end just like this..."
if %ransu=4 mov $sel1,"How does it feel for your soul to be sucked out by a tentacle...?"
if %ransu=5 mov $sel1,"Until nothing's left, I'll suck everything out..."
name $name
eng $sel1:$sel6\
name ""
skillname "Tentacle Drain"
if %kousan=2 && %hanyo1=1 skip 3
lsp 700,":a;chara\delh_b_h2a.bmp",150,30:print 10,500
if %kousan=2 mov %hanyo1,1
lsp 700,":a;chara\delh_b_h3a.bmp",150,30:print 10,500
dwave 1,"se\ero_buchu1.ogg"
>The tentacle sucks out Luka's energy!
damage 14,17
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *delh_b_h4
if %kousan<2 lsp 700,":a;chara\delh_b_h1a.bmp",150,30:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*delh_b_onedari

mov $list1,"Tentacle Caress"
if %3036>0 mov %list_num1,1
mov $list2,"Bound Tentacle Caress"
if %3037>0 mov %list_num2,1
mov $list3,"Tentacle Drain"
if %3038>0 mov %list_num3,1
gosub *cmd_onedari
if %cmd1=11 goto *delh_b_onedari1
if %cmd1=12 goto *delh_b_onedari2
if %cmd1=13 goto *delh_b_onedari3
if %cmd1=-1 goto *delh_b_main
goto *delh_b_onedari



*delh_b_onedari1

gosub *onedari_syori
name $name
>You want to be rubbed by this tentacle?@
>Alright... I'll massage you to your heart's desire.\
name ""
gosub *delh_b_a1
skip -1



*delh_b_onedari2

gosub *onedari_syori_k
name $name
>You want to be loved by this tentacle?@
>Alright... I'll fulfill your desire.\
name ""
if %kousoku=1 skip 6
gosub *delh_b_a2
name $name
>Fufu... You wanted to be bound first, right?@
>I'll play with you just as you requested...\
name ""
gosub *delh_b_a3
skip -1



*delh_b_onedari3

gosub *onedari_syori_k
name $name
>You want everything to be sucked out by my tentacle...?@
>Alright... I'll give you an enjoyable end.\
name ""
if %kousoku=1 skip 6
gosub *delh_b_a2
name $name
>Fufu... You wanted to be bound first, right?@
>Sucked until there's nothing left... Just like you wanted, right?\
name ""
gosub *delh_b_a4
skip -1



*delh_b_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\delh_b_bk01.bmp",150,30
gosub *syasei2
>Unable to hold on, Luka ejaculates on the tentacle.@
>The semen starts to get absorbed through the slimy appendage.\
mov %viclose,1:gosub *lose
mov %2515,%2515+1:if %2515=1 mov %count_koenemy,%count_koenemy+1
if %2515>%count_most mov %count_most,%2515:mov $count_mostname,$name
count 10,4
mov $bad1," Luka succumbed to the tentacles caress."
mov $bad2," Luka's energy was sucked until his death."
gosub *face2
name $name
>Fufu... Did my tentacle make you feel good?\
name ""
goto *delh_b_h



*delh_b_h2

mov %ikigoe,3:gosub *ikigoe
name $name
>Oh...\
name ""
gosub *syasei1
lsp 700,":a;chara\delh_b_h4a.bmp",150,30
gosub *syasei2
>Unable to hold on, Luka ejaculates on the tentacle as it starts to wind around him.@
>The semen starts to get absorbed through the slimy appendage.\
mov %viclose,1:gosub *lose
mov %2515,%2515+1:if %2515=1 mov %count_koenemy,%count_koenemy+1
if %2515>%count_most mov %count_most,%2515:mov $count_mostname,$name
count 10,4
mov %count_bouhatu,%count_bouhatu+1
mov $bad1," Luka succumbed to the tentacle just as it was starting to bind him."
mov $bad2," Luka's energy was sucked until his death."
name $name
>Fufu... You couldn't endure it?@
>Just being bound by the tentacle was too much for you.\
>Allow me to continue, and suck out everything...\
name ""
goto *delh_b_h



*delh_b_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\delh_b_h4a.bmp",150,30
gosub *syasei2
>Unable to hold on, Luka ejaculates on the tentacle as it caresses him while he's bound.@
>The semen starts to get absorbed through the slimy appendage.\
mov %viclose,1:gosub *lose
mov %2515,%2515+1:if %2515=1 mov %count_koenemy,%count_koenemy+1
if %2515>%count_most mov %count_most,%2515:mov $count_mostname,$name
count 10,4
mov $bad1," Luka succumbed to the tentacle as he was bound."
mov $bad2," Luka's energy was sucked until his death."
gosub *face2
name $name
>Fufu... Did my tentacle make you feel that good?\
name ""
goto *delh_b_h



*delh_b_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\delh_b_h4a.bmp",150,30
gosub *syasei2
>Unable to hold on, Luka ejaculates inside the tentacle's mouth as it sucks him.@
>The semen shot into the tentacle is sucked up rapidly.\
mov %viclose,1:gosub *lose
mov %2515,%2515+1:if %2515=1 mov %count_koenemy,%count_koenemy+1
if %2515>%count_most mov %count_most,%2515:mov $count_mostname,$name
count 10,4
mov $bad1," Bound by the Dark Elf, Luka succumbs to the tentacle draining him."
mov $bad2," Luka's energy was sucked until his death."
gosub *face2
name $name
>Did it feel good to be sucked by my tentacle?@
>Don't worry, I'll suck even more out of you...\
name ""
goto *delh_b_h



*delh_b_h

if %2515=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Faaa...\
name ""
>Force to ejaculate, I feel my energy being drained rapidly.\
dwave 1,"se\ero_makituki2.ogg"
cspl 690,699
lsp 700,":a;chara\delh_b_h1.bmp",150,30:print 10,500
>My clothes are torn off as the tentacle binds me.\
name $name
>Now I'll be able to really suck out all of your energy.@
>Rejoice, for I'll bring you ecstasy until your death.\
name ""
name "Luka"
>Ah! Stop!\
name ""
>The tentacle wraps all around me with it's mucus covered membrane, rubbing me all over.\
lsp 700,":a;chara\delh_b_h2.bmp",150,30:print 10,500
name $name
>I'll cover your penis with this tentacle...\
>With it's slimy, sticky surface, I'll force you to ejaculate over and over again.\
>It will feel absolutely amazing...\
name ""
name "Luka"
>Ahhh!@
>I don't want that!\
name ""
>Wrapped in the tentacles, each one wriggles around me, covering me with its slimy mucus.\
>Trembling with disgust, a slight expectation rises through me.@
>If that slimy thing was to wrap around my dick... what would it feel like?\
name "Luka"
>N... No... Stop...\
name ""
name $name
>Well... Shall I start?\
name ""
mov %hseanwave,21:hseanwave
lsp 700,":a;chara\delh_b_h3.bmp",150,30:print 10,500
>The slimy tentacles cover my stomach, as my dick is sucked into one of the tentacle's slimy interior.\
name "Luka"
>Haaa!\
name ""
>Inside the soft interior, I can feel the sticky mucus cover me.@
>Each time I rub against it's walls, I feel more of my strength being drained.\
name $name
>Fufu... It's incredible isn't it?@
>Every time it gives pleasure, it sucks out your energy...\
name ""
name "Luka"
>Aaaaa!\
name ""
>The tentacle starts to slowly vibrate, stimulating me further.\
>Stuck in the tentacles wavy interior, it's as if it was licking me all over.\
name "Luka"
>Auu... Stop this...\
name ""
>I can feel the ejaculation rising up through me.@
>Different from before, it feels like a numbness is starting to spread through my body.\
name $name
>Fufu... So you're already letting it out.@
>The tentacle's only purpose is to suck everything out, so don't hold back.\
>Surrender to the pleasure, and let it all out.\
name ""
name "Luka"
>Haaa....\
name ""
>I can't take it anymore.@
>My dick is being stimulated by this tentacle, and I can't do anything to stop it...\
name $name
>Now... Let it suck everything away...\
name ""
name "Luka"
>Aaaahhh!\
name ""
>The tentacle's insides start to slowly move in a waving formation, as if trying to milk everything out of me!\
gosub *syasei1
lsp 700,":a;chara\delh_b_h4.bmp",150,30
gosub *syasei2
>Wrapped by her tentacles, I explode inside of it.@
>Everything I shoot out is sucked in by the tentacle on me...\
name "Luka"
>Hau... Stop it now...\
name ""
name $name
>Fufu... Not a chance.\
name ""
mov %hseanwave,22:hseanwave
>As soon as the tentacle absorbed the last of the semen, it starts to stimulate me again.\
>The inner walls continue to push against me as if licking, while moving in a wave.\
name $name
>I said I would suck everything up...@
>This will continue until nothing is left of you...\
>Sucking up your very life with this tentacle...@
>Are you happy? Hahaha.\
name ""
name "Luka"
>How could I...\
name ""
>I focus all of my willpower on my waist to stop the orgasm.@
>But the tentacle continues its milking movement, slowly breaking my endurance.\
>The desire for release slowly bubbles up through me...@
>Even though I just came, I'm already on the edge of another.\
name $name
>It isn't possible to resist.@
>Caught by me, there's no escape but to be sucked until death...\
name ""
name "Luka"
>No...!\
name ""
>No matter how hard I struggle, I can't break this tentacle off of me.@
>Driven to the limit, I can't endure any longer.\
name "Luka"
>Faa!@> Ahhhh!\
name ""
gosub *syasei1:gosub *syasei2
>Forced to ejaculate again, the tentacle sucks up everything I shoot out.@
>All the power I had left to escape fades away.\
>Being squeezed by the tentacle... I feel so good...\
name "Luka"
>Faa...@> My strength is gone...\
name ""
name $name
>Haha... Stay entranced in ecstasy like that.@
>If you do so, you can feel even better.\
name ""
>The Dark Elf laughs at me as the tentacle continues to milk me.@
>Without mercy, the slimy tentacle continues to suck everything out of me.\
name "Luka"
>Aaa! Coming...again...!\
name ""
gosub *syasei1
lsp 700,":a;chara\delh_b_h5.bmp",150,30
gosub *syasei2
>The tentacle sucks everything as I shoot it.@
>Not just my penis, but my entire body is exhausted and brought to the limit.\
name "Luka"
>Ahii!@>Stop it!\
>It's too good...!\
name ""
name $name
>I've almost sucked everything up...@
>Just a little more...\
name ""
name "Luka"
>Haa! Ahhh!\
name ""
>The tentacle quickly contracts around me, forcing another orgasm.\
gosub *syasei1:gosub *syasei2
name "Luka"
>Auuu...@>Stop it... please...\
name ""
>Forced to ejaculate over and over, the tentacle never stops.@
>At this rate, I really will be sucked to death...\
name "Luka"
>Someone... Help...@> Stop...\
name ""
name $name
>No.@
>I said I wasn't going to stop until I sucked everything out.\
>Until you die, this will continue.\
name ""
name "Luka"
>No... Stop...@>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>Continually forced to ejaculate, my vision starts to fade.@
>The tentacle never stops stimulating me, even as I slowly lose consciousness.\
name $name
>You can come some more, can't you?@
>Put everything out... Hahaha.\
name ""
name "Luka"
>Aaa....\
name ""
gosub *syasei1:gosub *syasei2
>My life itself is being squeezed out of my penis...@
>Each ejaculation brings me closer to the end...\
gosub *anten
mov %hseanwave,0:hseanwave
name $name
>Fufu... I sucked it all up.\
name ""
>With a final squeeze, the last of my life is sucked out.\
name $name
>It was a little wasteful to kill someone that delicious... But he really tasted good.\
>Fufufu... Thanks for the meal.\
name ""
>..........\
goto *badend



*hiru_start

mov $name,"Leech Girl"
mov $name2,"Leech Girl"
mov $lavel,"hiru"
mov $tatie1,"hiru_st01"
mov $tatie2,"hiru_st02"
mov $tatie3,"hiru_st03"
mov $tatie4,"hiru_st11"
mov $haikei,"bg019"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,210
if %nanido=2 mov %max_enemylife,250
if %nanido=3 mov %max_enemylife,300
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"Luka was unable to escape from the Leech Girl's mouth!"
mov $mogaku_anno2,"Luka escaped from the Leech Girl's mouth!"
mov $mogaku_anno3,"Luka is unable to move in the Leech Girl's mouth!"
mov $mogaku_sel1,"Quietly be sucked by me... It's easier that way..."
mov $mogaku_sel2,"Pointless resistance..."
mov $mogaku_sel3,"That's it... Be sucked dry."
mov $mogaku_sel4,"It's useless even if you struggle."
mov $mogaku_sel5,"Do you want to be sucked dry while struggling?"
mov $mogaku_dassyutu1,"Ah... You ran before I could suck everything out..."
mov $mogaku_dassyutu2,""
mov $half_s1,"It feels good, doesn't it?"
mov $half_s2,"At this rate, I'll suck everything from you in no time..."
mov $kiki_s1,"Just ejaculate like that..."
mov $kiki_s2,"I'll suck up all of your seed..."
mov %end_n,3
mov %exp_minus,0
mov %zmonster_x,-300
mov %owaza_count1a,2
gosub *face2
name $name
>...A traveler?@
>Unbaptized, too... You look delicious.\
>I'll suck everything out of you...@
>Your whole body wrapped in my mouth, I'll leech everything out of you.\
name ""
>The Leech Girl has a gaping mouth hanging open in her lower body.@
>Innumerable wriggling tentacles are moving around in there, as if excited at my presence.\
>The desire to be held in that mouth starts to rise in me, as eerie as it looks.\
>If my whole body was held in there, what would it feel like...\
name "Luka"
>Gah!\
name ""
>I shake my head back and forth trying to push the thought from my mind.\
name "Luka"
>I won't be swayed by such a temptation!\
name ""
gosub *face1
goto *common_main



*hiru_v

gosub *face3
name $name
>N... No way...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Leech Girl was sealed by my sword.@
>Now a tiny leech, she crawls away.\
mov %viclose,1:gosub *victory
mov %getexp,200:gosub *lvup
mov %2216,1
goto *sean0072



*hiru_kousan

gosub *kousan_syori
>Luka yields to the promise of pleasure, ending his resistance!\
gosub *face2
name $name
>So you want to be held in this mouth and sucked?@
>Alright... I'll let you rise to heaven having everything taken from you...\
name ""
goto *hiru_a



*hiru_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *hiru_kousan
if %cmd1=16 goto *hiru_onedari
if %cmd1=17 goto *common_skill
goto *hiru_main



*hiru_a

if %kousoku=1 rnd2 %ransu,1,2
if %kousoku=1 && %ransu=1 gosub *hiru_a4:goto *common_main
if %kousoku=1 && %ransu=2 gosub *hiru_a5:goto *common_main
rnd2 %ransu,1,4
if %ransu=1 gosub *hiru_a1:goto *common_main
if %ransu=2 gosub *hiru_a2:goto *common_main
if %ransu>2 && %owaza_count1a>3 gosub *hiru_a3:goto *common_main
skip -4



*hiru_a1

add %stack,1
skillcount1 3039
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Fufu..."
if %ransu=2 mov $sel1,"Haha..."
if %ransu=3 mov $sel1,"I won't let go..."
name $name
eng $sel1:$sel6\
name ""
skillname "Leech Tail"
dwave 1,"se\ero_name1.ogg"
>The Leech Girl's soft tail grabs Luka's groin!
if %nanido<2 damage 10,12
if %nanido=2 damage 15,18
if %nanido=3 damage 20,24
skillname ""
if %mylife=0 sub %stack,1:return *hiru_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*hiru_a2

add %stack,1
skillcount1 3085
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck..."
if %ransu=2 mov $sel1,"I'll suck everything to the last drop..."
if %ransu=3 mov $sel1,"Give me everything..."
name $name
eng $sel1:$sel6\
name ""
skillname "Leech Fellatio"
dwave 1,"se\ero_chupa1.ogg"
>The Leech Girl quickly sucks on Luka's penis!
if %nanido<2 damage 11,13
if %nanido=2 damage 16,19
if %nanido=3 damage 22,26
skillname ""
if %mylife=0 sub %stack,1:return *hiru_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*hiru_a3

add %stack,1
if %kousan=2 skip 7
name $name
if %first_sel1=1 skip 3
>I'll hold you in this mouth and suck everything up...\
skip 2
>I'll put you in my mouth again, and suck everything up...\
name ""
skillname "Mouth Hold"
dwave 1,"se\ero_pyu2.ogg"
>The Leech Girl grabs Luka with her tail!\
>The Leech Girl forces Luka into her lower mouth!
damage 8,9
lsp 690,":a;chara\hiru_ct01.bmp",0,0
mov %kousoku,1:gosub *status_print
>Luka's entire body is held inside the Leech Girl's mouth!\
skillname ""
if %mylife=0 sub %stack,1:return *hiru_h2
if %kousan=2 sub %stack,1:return
gosub *face2
name $name
if %first_sel1=1 skip 6
>Don't be afraid...@
>It will feel so good, it's as if you'll be melting in my mouth...\
>Here, I'll move all the tentacles in my mouth...@
>I'll caress your entire body...\
skip 3
>I won't let you escape this time...@
>Until you become shriveled, I'll suck everything out...\
name ""
mov %first_sel1,1
if %nanido<2 mov %genmogaku,2
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,3
sub %stack,1
return



*hiru_a4

add %stack,1
skillcount1 3040
>Luka's entire body is held inside the Leech Girl's mouth!\
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll play with you like this..."
if %ransu=2 mov $sel1,"I'll love you all over..."
if %ransu=3 mov $sel1,"Do the wriggling tentacles feel good...?"
if %ransu=4 mov $sel1,"Just let it out when you can't take it anymore..."
name $name
eng $sel1:$sel6\
name ""
skillname "Tentacle Hell"
dwave 1,"se\ero_makituki3.ogg"
>The slimy tentacles wriggle all around Luka!\
>They massage Luka over his entire body!
if %nanido<2 damage 10,12
if %nanido=2 damage 15,18
if %nanido=3 damage 20,24
skillname ""
if %mylife=0 sub %stack,1:return *hiru_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*hiru_a5

add %stack,1
skillcount1 3041
>Luka's entire body is held inside the Leech Girl's mouth!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Fufu... I'll suck in all of your fluids."
if %ransu=2 mov $sel1,"Your semen... Delicious"
if %ransu=3 mov $sel1,"It's ok to come..."
if %ransu=4 mov $sel1,"Having everything sucked up will feel amazing..."
if %ransu=5 mov $sel1,"I'll keep this up until nothing's left..."
name $name
eng $sel1:$sel6\
name ""
skillname "Semen Suck"
dwave 1,"se\ero_makituki2.ogg"
>The Leech Girl's mouth violently sucks on Luka!\
>The suction stimulates Luka's entire body!
if %nanido<2 damage 12,14
if %nanido=2 damage 18,21
if %nanido=3 damage 24,28
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *hiru_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*hiru_onedari

mov $list1,"Leech Tail"
if %3039>0 mov %list_num1,1
mov $list2,"Leech Fellatio"
if %3085>0 mov %list_num2,1
mov $list3,"Tentacle Hell"
if %3040>0 mov %list_num3,1
mov $list4,"Semen Suck"
if %3041>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *hiru_onedari1
if %cmd1=12 goto *hiru_onedari2
if %cmd1=13 goto *hiru_onedari3
if %cmd1=14 goto *hiru_onedari4
if %cmd1=-1 goto *hiru_main
goto *hiru_onedari



*hiru_onedari1

gosub *onedari_syori
name $name
>So you like being played with by my tail?@
>Then, I'll play with you with my tail...\
name ""
gosub *hiru_a1
skip -1



*hiru_onedari2

gosub *onedari_syori
name $name
>You want me to suck you with my upper mouth?@
>Alright... I'll suck you until nothing's left.\
name ""
gosub *hiru_a2
skip -1



*hiru_onedari3

gosub *onedari_syori_k
name $name
>You want to ascend to heaven after experiencing a tentacle hell?\
if %kousoku=1 skip 6
>Held in my mouth, with my tentacles rubbing you all over...\
name ""
gosub *hiru_a3
name $name
>Now, I'll let me tentacles play with you until there's nothing left...\
name ""
gosub *hiru_a4
skip -1



*hiru_onedari4

gosub *onedari_syori_k
name $name
>Fufu... You want all your fluids sucked up by me?\
if %kousoku=1 skip 6
name ""
gosub *hiru_a3
name $name
>I'll suck everything up now, then...@
>Semen, urine, sweat... I'll suck out everything.\
name ""
gosub *hiru_a5
skip -1



*hiru_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\hiru_bk05.bmp",0,0
gosub *syasei2
>Being played with by the Leech Girl's tail, Luka ejaculates all over it!\
mov %viclose,1:gosub *lose
mov %2516,%2516+1:if %2516=1 mov %count_koenemy,%count_koenemy+1
if %2516>%count_most mov %count_most,%2516:mov $count_mostname,$name
count 19,4
mov $bad1," Luka succumbs to the Leech Girl's tail."
mov $bad2," The Leech Girl sucks everything out of Luka until his death."
gosub *face2
name $name
>You put it out all over my tail...@
>Now, put out everything else in this mouth...\
name ""
goto *hiru_h



*hiru_h2

mov %ikigoe,3:gosub *ikigoe
name $name
>Already?\
name ""
gosub *syasei1
lsp 690,":a;chara\hiru_ct02.bmp",0,0
lsp 700,":a;chara\hiru_st12.bmp",0,0
gosub *syasei2
>As soon as Luka is sucked into the Leech Girl's mouth, he ejaculates accidentally.\
mov %viclose,1:gosub *lose
mov %2516,%2516+1:if %2516=1 mov %count_koenemy,%count_koenemy+1
if %2516>%count_most mov %count_most,%2516:mov $count_mostname,$name
count 2,4
mov %count_bouhatu,%count_bouhatu+1
mov $bad1," Held in the Leech Girl's mouth, Luka ejaculates on accident."
mov $bad2," The Leech Girl sucks everything out of Luka until his death."
gosub *face2
name $name
>Ejaculating only by being held... How miserable.@
>Stuck in my mouth, let me suck everything out of you...\
name ""
goto *hiru_h



*hiru_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\hiru_ct02.bmp",0,0
lsp 700,":a;chara\hiru_st12.bmp",0,0
gosub *syasei2
>Rubbed by the tentacles all over his body, Luka ejaculates inside the Leech Girl's mouth.\
mov %viclose,1:gosub *lose
mov %2516,%2516+1:if %2516=1 mov %count_koenemy,%count_koenemy+1
if %2516>%count_most mov %count_most,%2516:mov $count_mostname,$name
count 2,4
mov $bad1," Luka succumbs to the Leech Girl's tentacle hell inside of her mouth."
mov $bad2," The Leech Girl sucks everything out of Luka until his death."
name $name
>You ascended to heaven while in my tentacle hell...@
>Stuck in my mouth, let me suck everything out of you...\
name ""
goto *hiru_h



*hiru_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\hiru_ct02.bmp",0,0
lsp 700,":a;chara\hiru_st12.bmp",0,0
gosub *syasei2
>Stuck in the Leech Girl's mouth, Luka succumbs to the overpowering suction and ejaculates inside of her.\
mov %viclose,1:gosub *lose
mov %2516,%2516+1:if %2516=1 mov %count_koenemy,%count_koenemy+1
if %2516>%count_most mov %count_most,%2516:mov $count_mostname,$name
count 2,4
mov $bad1," Luka succumbs to the Leech Girl's sucking inside of her mouth."
mov $bad2," The Leech Girl sucks everything out of Luka until his death."
name $name
>Mmm, you taste delicious.@
>Stuck in my mouth, let me suck everything out of you...\
name ""
goto *hiru_h



*hiru_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\hiru_bk01.bmp",0,0
gosub *syasei2
>Being sucked by the Leech Girl's upper mouth, Luka is unable to endure, shooting semen all over her face.\
mov %viclose,1:gosub *lose
mov %2516,%2516+1:if %2516=1 mov %count_koenemy,%count_koenemy+1
if %2516>%count_most mov %count_most,%2516:mov $count_mostname,$name
count 4,4
mov $bad1," Luka succumbs to the Leech Girl's fellatio."
mov $bad2," The Leech Girl sucks everything out of Luka until his death."
gosub *face2
name $name
>You let it out on my upper mouth...@
>Now in my lower mouth, I want to suck everything else out of you...\
name ""
goto *hiru_h



*hiru_h

if %2516=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku=1 mov %hseanwave,21:hseanwave:goto *hiru_hb
name "Luka"
>Stop! Help!\
name ""
name $name
>I won't let you go.@
>I'll squeeze out all of your bodily fluids...\
name ""
>The Leech Girl grabs me with her tail, and forces me into her mouth!\
mov %hseanwave,21:hseanwave
cspl 690,699
lsp 700,":a;chara\hiru_st11.bmp",0,0:print 10,500
>I'm stuck inside of her!\
goto *hiru_hb



*hiru_hb

name "Luka"
>Aaaaaa!\
name ""
>The tentacles inside of her mouth cover me, rubbing me all over.@
>The mucus that covers me starts to dissolve my clothes.\
name "Luka"
>Faaaa!\
name ""
>The slimy tentacles rub my body in waves.@
>The mucus and saliva covering me makes it feel like I'm being licked by hundreds of tongues all over my body.\
>Stuck in the Leech Girl's mouth, it's as if my whole body is melting.\
name $name
>You're sweating a lot...@
>Don't worry, I'll suck everything that you release...\
name ""
name "Luka"
>Aaaah!\
name ""
>The slimy tentacles absorb all of my sweat.@
>As she said, it looks like she's going to suck everything out of me...\
name "Luka"
>It feels good...@> Faaaa!\
name ""
>Slowly sucking the sweat from my skin, my body writhes in pleasure.\
lsp 690,":a;chara\hiru_ct01.bmp",0,0:print 10,500
>The tentacles around my penis are slowly moving and massaging me, too.@
>They rub me from my base to my tip, covering me with their mucus.\
>The overpowering stimulation all over my body brings me quickly to the edge.\
name "Luka"
>Amazing!@> Faaa!\
name ""
>Tentacles all around me, rubbing, sucking, and massaging me in every direction.@
>The tortuous pleasure is too much for me to endure.\
>The desire to orgasm rises through me, as I shake my waist miserably.\
name "Luka"
>Auu!@> Like this, I'll come...!\
name ""
name $name
>Fufu... Let out your male extract.@
>I'll suck all of your delicious fluids up...\
name ""
name "Luka"
>Faaa!\
name ""
>With the relentless tentacles rubbing me all over, I'm unable to resist the overpowering pleasure any longer.\
name "Luka"
>Ahii!@>Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\hiru_st12.bmp",0,0
lsp 690,":a;chara\hiru_ct02.bmp",0,0
gosub *syasei2
>My entire body stuck in the Leech Girl, I explode inside her mouth.@
>The tentacles quickly absorb all of my semen as I shoot it out.\
name $name
>You let out your male extract...@
>Shoot out more...@
>Until nothing's left, I'll suck out everything...\
name ""
name "Luka"
>Ahiii!\
name ""
mov %hseanwave,22:hseanwave
>The tentacles continue to stimulate me in every corner of my body in addition to my dick, forcing pleasure into my entire being.\
name "Luka"
>Auuuu! St...Stop...\
name ""
name $name
>Living just to have everything be sucked up will feel amazing...@
>Sweat, urine, semen... I'll take it all.\
name ""
name "Luka"
>Haauu!@> Ahhhh!\
name ""
>The Leech Girl shrinks her mouth, tightening the pressure all around me.@
>The intense suction not only on my penis, but on my entire body, causes me to squirm helplessly.\
name "Luka"
>Good...@>Too good!\
name ""
>The membrane covering my penis shrinks as the tentacles continue to furiously rub it.\
gosub *syasei1
lsp 700,":a;chara\hiru_st13.bmp",0,0
lsp 690,":a;chara\hiru_ct03.bmp",0,0
gosub *syasei2
>The overpowering stimulation forces me to ejaculate quickly again.\
name "Luka"
>Faaa....\
name ""
name $name
>I'll suck more...@
>More... More...\
name ""
name "Luka"
>Aaa! Haaa!\
name ""
>The membrane wrapped around my penis starts to slowly move back and forth while the tentacles continue to rub me.\
>The combined pleasure leads to a new, strange pleasure.\
name "Luka"
>What is this...@>Faaa!\
name ""
>Unable to hold it any longer, I start to urinate in her mouth.\
>Leaking out inside of her mouth gives me an odd pleasure in the immorality.\
>In addition, it feels like my soul itself is leaking out...@
>The disgrace and pleasure mixes, giving me a happy feeling of exhaustion.\
name $name
>Peeing in my mouth... Did it feel good?\
>My mouth has a method to dispose of my prey's waste fluids.@
>Stimulation to make them ejaculate... Stimulation to make them urinate...\
>Everything is taken from my prey. I'll suck everything out...\
name ""
name "Luka"
>Auuu... Such a thing...@
>Please... Stop...\
name ""
name $name
>No.@>I said I'd suck everything out.\
name ""
name "Luka"
>Ahii! Haaaa!\
name ""
>As she denies my protest, the tentacles start to massage me even quicker than before.\
>The mouth that's designed to squeeze everything out of men is torturing me with pleasure...\
>Ejaculating... Urinating... Everything is being taken from me.\
name "Luka"
>Aaaaa!\
name ""
gosub *syasei1
lsp 700,":a;chara\hiru_st14.bmp",0,0
lsp 690,":a;chara\hiru_ct04.bmp",0,0
gosub *syasei2
>I'm just her pitiful prey.@
>Struggling in futility, the mouth stimulates me without mercy.\
name $name
>More... More... I'll squeeze more...\
name ""
name "Luka"
>Aaaa....\
name ""
gosub *syasei1:gosub *syasei2
>Every ejaculation makes me feel like I'm melting more and more.@
>Like that, I start to lose consciousness...\
>Wrapped in her mouth, it seems as if my soul itself is being sucked out.\
>All of my fluids sucked out by a monster, I'm immersed in ecstasy.\
>Even the disgusting act of urinating in her fills me with euphoria.\
name "Luka"
>....A...aa....\
name ""
>As my consciousness fades, my mind goes blank.\
gosub *anten
mov %hseanwave,0:hseanwave
name $name
>Thanks for the meal... Fufu...\
name ""
>I thought I heard the Leech Girl's happy voice...@
>Reaching the end of the intense pleasure, I'm completely dry...\
>.........\
goto *badend



*rahure_start

mov $name,"Rafflesia Girl"
mov $name2,"Rafflesia Girl"
mov $lavel,"rahure"
mov $tatie1,"rahure_st01"
mov $tatie2,"rahure_st02"
mov $tatie3,"rahure_st03"
mov $tatie4,"rahure_st11"
mov $haikei,"bg030"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,250
if %nanido=2 mov %max_enemylife,250
if %nanido=3 mov %max_enemylife,250
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,99
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"Luka can't escape from the Rafflesia Girl!"
mov $mogaku_anno2,"Luka escaped from the Rafflesia Girl!"
mov $mogaku_anno3,"Held in the Rafflesia Girl's flower mouth, Luka weakens!"
mov $mogaku_sel1,"Until you pour all of your semen on my pistil, I won't let go."
mov $mogaku_sel2,"Just surrender and pollinate me..."
mov $mogaku_sel3,"Stop struggling and ejaculate..."
mov $mogaku_sel4,"Stop struggling... Just let it out in my pistil..."
mov $mogaku_sel5,"Don't run away before you inseminate me...!"
mov $mogaku_dassyutu1,"Why did you run..."
mov $mogaku_dassyutu2,"But I wanted to be pollinated..."
mov $half_s1,"You feel good, don't you?"
mov $half_s2,"Just come like that..."
mov $kiki_s1,"Unable to endure it?"
mov $kiki_s2,"Cover my pistil with your semen..."
mov %end_n,3
mov %exp_minus,200
mov %zmonster_x,-280
gosub *face2
name $name
>Perfect... It's time for me to be pollinated...@
>Hey... Will you mate with me?\
>Spread your seed all over my pistil...\
name ""
name "Luka"
>I can't do that...\
name ""
>Mating with a monster...@
>I can't break one of Ilias' commandments.\
name $name
>It won't be difficult...@
>Just leave everything to me.\
>I'll make you feel so good, all you need to do is ejaculate.@
>I'll fulfill all your desires... Aren't you lucky?\
name ""
name "Luka"
>I won't!@> I can't break Ilias' commandments like that!\
name ""
>Declaring that, I pull out my sword.@
>It doesn't look like she'll let me go that easily.\
name $name
>Then I'll just need to force you!\
name ""
gosub *face1
goto *common_main



*rahure_v

gosub *face3
name $name
>No... My body...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Rafflesia Girl shrinks, and turns into a normal Rafflesia!\
>It doesn't look like she can move anymore, and is a normal plant.\
>Like this, you can't distinguish her from any of the other plants!\
mov %viclose,1:gosub *victory
mov %getexp,220:gosub *lvup
mov %2217,1
goto *sean0073



*rahure_kousan

gosub *kousan_syori
name ""
>Luka yields to the promise of pleasure, and ends his resistance!\
gosub *face2
name $name
>Fufu... So you want to pollinate me?@
>Then... Make sure you put out a lot!\
name ""
goto *rahure_a



*rahure_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *rahure_kousan
if %cmd1=16 goto *rahure_onedari
if %cmd1=17 goto *common_skill
goto *rahure_main



*rahure_a

if %kousoku=1 gosub *rahure_a5:goto *common_main
if %kousoku=2 gosub *rahure_a6:goto *common_main
if %status=1 gosub *rahure_a4:goto *common_main
rnd2 %ransu,1,3
if %ransu=1 gosub *rahure_a1:goto *common_main
if %ransu=2 gosub *rahure_a2:goto *common_main
if %ransu=3 && %owaza_count2a>2 gosub *rahure_a3:goto *common_main
skip -4



*rahure_a1

add %stack,1
skillcount1 3042
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hahaha..."
if %ransu=2 mov $sel1,"Preparations for pollination..."
if %ransu=3 mov $sel1,"I need to make you nice and hard..."
name $name
eng $sel1:$sel6\
name ""
skillname "Tentacle Caress"
dwave 1,"se\ero_makituki2.ogg"
>The Rafflesia Girl caresses Luka with one of her tentacles!
if %nanido<2 damage 12,14
if %nanido=2 damage 18,21
if %nanido=3 damage 24,28
skillname ""
if %mylife=0 sub %stack,1:return *rahure_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*rahure_a2

add %stack,1
skillcount1 3043
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"How's this...?"
if %ransu=2 mov $sel1,"This is just some foreplay..."
if %ransu=3 mov $sel1,"My petals feel amazing, too..."
name $name
eng $sel1:$sel6\
name ""
skillname "Petal Massage"
dwave 1,"se\ero_name1.ogg"
>The fleshy petals stroke Luka's lower body!\
>Luka's penis is massaged by the Rafflesia Girl's petals!
if %nanido<2 damage 13,15
if %nanido=2 damage 19,22
if %nanido=3 damage 26,30
skillname ""
if %mylife=0 sub %stack,1:return *rahure_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*rahure_a3

add %stack,1
gosub *face2
if %kousan=2 skip 9
name $name
if %first_sel1=1 skip 4
>It's time to pollinate...@
>First, I'll make it so you can't resist...\
skip 3
>One more time...@
>This time, don't run away...\
name ""
skillname "Intoxicating Aroma"
dwave 1,"se\gas.ogg"
>A sweet smell comes out from the Rafflesia Girl!\
mov %status,1:gosub *status_print
>Luka is entranced!\
skillname ""
gosub *face2
if %nanido<2 mov %status_turn,2
if %nanido=2 mov %status_turn,2
if %nanido=3 rnd2 %status_turn,3,4
sub %stack,1
return



*rahure_a4

add %stack,1
name $name
if %first_sel1=1 skip 4
>Now... I'll start...@
>I'll make you feel really good, so pollinate me...\
skip 2
>Back inside...\
name ""
skillname "Grab"
dwave 1,"se\ero_makituki2.ogg"
>The Rafflesia Girl's tentacle grabs Luka's body!\
>Luka is dragged into the Rafflesia Girl's flower mouth!
damage 12,14
mov %kousoku,1:gosub *status_print
>Luka's body is forced into the Rafflesia Girl's flower mouth!\
skillname ""
if %mylife=0 sub %stack,1:return *rahure_h3
if %first_sel1=1 skip 6
name "Luka"
>Faa...\
name ""
>The inside of the Rafflesia Girl is filled with a sticky mucus.@
>Bathed in the slimy warmth, I feel my power slowly draining.\
if %nanido<2 mov %genmogaku,0
if %nanido=2 mov %genmogaku,1
if %nanido=3 mov %genmogaku,2
sub %stack,1
return



*rahure_a5

add %stack,1
>Luka's entire body is stuck in the Rafflesia Girl's flower mouth!\
name $name
if %first_sel1=1 skip 3
>First, let me cover you with pollen...\
skip 2
>Next, I'll cover you with pollen...\
name ""
skillcount1 3044
skillname "Stamen"
dwave 1,"se\ero_makituki3.ogg"
lsp 690,":a;chara\rahure_ct01.bmp",0,0:print 10,500
>The innumerable stamens cover Luka's penis!\
>They cover Luka with pollen!
damage 12,14
mov %kousoku,2
skillname ""
if %mylife=0 sub %stack,1:return *rahure_h5
>Luka is stuck in a trance...\
>Luka's entire body is stuck in the Rafflesia Girl's flower mouth!\
name $name
if %first_sel1=1 skip 6
>Ejaculate in my pistil like this...@
>Blending your semen with my pollen, you can pollinate me...\
>Come on...@
>Shoot your semen out...\
skip 2
>The preparations are complete... Now, shoot it all out...\
name ""
skillcount1 3044
skillname "Pistil"
dwave 1,"se\ero_makituki3.ogg"
lsp 690,":a;chara\rahure_ct11.bmp",0,0:print 10,500
>The pistil expands and wraps around Luka's penis!\
>With it's slimy surface, it rubs against Luka!
damage 12,14
skillname ""
if %mylife=0 sub %stack,1:return *rahure_h4
if %kousan>2 sub %stack,1:return
name "Luka"
>Uuuu...\
name ""
name $name
if %first_sel1=1 skip 4
>Fufu... Just let it out.@
>Scatter it all out, and pollinate me...\
skip 3
>Doesn't it feel good?@
>This time, I'll make sure to end it...\
name ""
mov %first_sel1,1
sub %stack,1
return



*rahure_a6

add %stack,1
skillcount1 3044
>Luka's entire body is stuck in the Rafflesia Girl's flower mouth!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My pistil feels amazing...":mov $sel2,"The pistil stimulates Luka!"
if %ransu=2 mov $sel1,"Let it all out...":mov $sel2,"The Rafflesia Girl's pistil sticks to Luka's urethral opening!"
if %ransu=3 mov $sel1,"Until you come, I'll keep this up...":mov $sel2,"The pistil wraps around Luka's penis!"
if %ransu=4 mov $sel1,"I'll tease your weakest point...":mov $sel2,"The pistil rubs the back of Luka's penis!"
if %ransu=5 mov $sel1,"With my pistil, I can make you feel amazing...":mov $sel2,"The pistil wraps around Luka's penis and tightens!"
name $name
eng $sel1:$sel6\
name ""
skillname "Pistil"
dwave 1,"se\ero_makituki3.ogg"
eng $sel2:$sel6
if %nanido<2 damage 12,14
if %nanido=2 damage 18,21
if %nanido=3 damage 24,28
skillname ""
if %mylife=0 sub %stack,1:return *rahure_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*rahure_onedari

mov $list1,"Tentacle Caress"
if %3042>0 mov %list_num1,1
mov $list2,"Petal Massage"
if %3043>0 mov %list_num2,1
mov $list3,"Forced Pollination"
if %3044>0 mov %list_num3,1
gosub *cmd_onedari
if %cmd1=11 goto *rahure_onedari1
if %cmd1=12 goto *rahure_onedari2
if %cmd1=13 && %kousoku=0 goto *rahure_onedari3
if %cmd1=13 && %kousoku=1 goto *rahure_onedari4
if %cmd1=-1 goto *rahure_main
goto *rahure_onedari



*rahure_onedari1

gosub *onedari_syori
name $name
>You want to be caressed by my tentacles? You're strange...@
>After that, I'll be sure you properly pollinate me...\
name ""
gosub *rahure_a1
skip -1



*rahure_onedari2

gosub *onedari_syori
name $name
>You want to be massaged by my petals? Alright...@
>After that, I'll be sure you properly pollinate me...\
name ""
gosub *rahure_a2
skip -1



*rahure_onedari3

gosub *onedari_syori
name $name
>Hahaha, so you do want to pollinate me after all?@
>Then, let's mate without holding anything back...\
name ""
gosub *rahure_a3
mov %kousan,3
goto *common_main


*rahure_onedari4

gosub *onedari_syori_k
name $name
>So you want to come like this?@
>Then, make sure you let out a lot...\
name ""
gosub *rahure_a6
skip -1



*rahure_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\rahure_bk05.bmp",0,0
gosub *syasei2
>Massaged by the Rafflesia Girl's tentacles, Luka explodes all over them.\
mov %viclose,1:gosub *lose
mov %2517,%2517+1:if %2517=1 mov %count_koenemy,%count_koenemy+1
if %2517>%count_most mov %count_most,%2517:mov $count_mostname,$name
count 10,1
mov $bad1," Luka succumbs to the Rafflesia Girl's tentacle caress."
mov $bad2," After pollinating the Rafflesia Girl, Luka was kept as a breeding slave."
gosub *face2
name $name
>Ahh... You wasted so much.@
>This time, properly pollinate me.\
name ""
goto *rahure_h



*rahure_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 696,":a;chara\rahure_bk06.bmp",0,0
gosub *syasei2
>Massaged by the Rafflesia Girl's fleshy petals, Luka explodes all over them.\
mov %viclose,1:gosub *lose
mov %2517,%2517+1:if %2517=1 mov %count_koenemy,%count_koenemy+1
if %2517>%count_most mov %count_most,%2517:mov $count_mostname,$name
count 12,1
mov $bad1," Luka succumbs to the Rafflesia Girl's petals."
mov $bad2," After pollinating the Rafflesia Girl, Luka was kept as a breeding slave."
name $name
>Ahh... You wasted so much.@
>This time, properly pollinate me.\
name ""
goto *rahure_h



*rahure_h3

mov %ikigoe,3:gosub *ikigoe
name $name
>Hey! Wait!\
name ""
gosub *syasei1
lsp 697,":a;chara\rahure_bk07.bmp",0,0
lsp 700,":a;chara\rahure_st12.bmp",0,0
gosub *syasei2
>As soon as Luka is sucked into the Raffles Girl's mouth, Luka ejaculates.\
mov %viclose,1:gosub *lose
mov %2517,%2517+1:if %2517=1 mov %count_koenemy,%count_koenemy+1
if %2517>%count_most mov %count_most,%2517:mov $count_mostname,$name
count 12,1
mov %count_bouhatu,%count_bouhatu+1
mov $bad1," Held by the Rafflesia Girl, Luka ejaculates on accident."
mov $bad2," After pollinating the Rafflesia Girl, Luka was kept as a breeding slave."
name $name
>Arara... I didn't finish the preparations.@
>I can't be pollinated like this...\
>We'll have to do it again.@
>This time, properly pollinate me.\
name ""
goto *rahure_h



*rahure_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\rahure_ct12.bmp",0,0
lsp 697,":a;chara\rahure_bk07.bmp",0,0
lsp 700,":a;chara\rahure_st12.bmp",0,0
gosub *syasei2
>Stimulated by the Rafflesia Girl, Luka ejaculates all over her pistil.\
mov %viclose,1:gosub *lose
mov %2517,%2517+1:if %2517=1 mov %count_koenemy,%count_koenemy+1
if %2517>%count_most mov %count_most,%2517:mov $count_mostname,$name
count 12,1
mov $bad1," Luka succumbs to the Rafflesia Girl's pistil, pollinating her."
if %status=1 mov $bad1," While entranced, Luka succumbs to the Rafflesia Girl's pistil, pollinating her."
mov $bad2," After pollinating the Rafflesia Girl, Luka was kept as a breeding slave."
name $name
>Hahaha, you let out so much on my pistil!@
>I'm glad you can put out so much! \
>Hey, don't you want to pollinate me even more?@
>Just look at you drooling so much after only doing it once. \
name ""
name "Luka"
>That...\
name ""
name $name
>Let's do it even more. \
name ""
goto *rahure_h



*rahure_h5

mov %ikigoe,3:gosub *ikigoe
name $name
>Wait! I'm still covering it with pollen!\
name ""
gosub *syasei1
lsp 690,":a;chara\rahure_ct02.bmp",0,0
lsp 697,":a;chara\rahure_bk07.bmp",0,0
lsp 700,":a;chara\rahure_st12.bmp",0,0
gosub *syasei2
>Unable to endure the stimulation brought by her stamen, Luka ejaculates.\
mov %viclose,1:gosub *lose
mov %2517,%2517+1:if %2517=1 mov %count_koenemy,%count_koenemy+1
if %2517>%count_most mov %count_most,%2517:mov $count_mostname,$name
count 12,1
mov %count_bouhatu,%count_bouhatu+1
mov $bad1," Not yet covered with pollen, Luka ejaculates on accident."
mov $bad2," After pollinating the Rafflesia Girl, Luka was kept as a breeding slave."
name $name
>Arara... I didn't finish the preparations.@
>I can't be pollinated like this...\
>We'll have to do it again.@
>This time, properly pollinate me.\
name ""
goto *rahure_h



*rahure_h

if %2517=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku=1 skip 14
dwave 1,"se\ero_makituki2.ogg"
>The Rafflesia Girl's tentacle grabs my body!\
name "Luka"
>Ahhh!\
name ""
cspl 690,699
lsp 700,":a;chara\rahure_st11.bmp",0,0:print 10,500
>Wrapped in her tentacle, my body is forced into her flower mouth!\
>The flower was filled with sticky mucus.@
>My lower body covered in the warm mucus, I feel my strength drain.\
name $name
>Now, let me sprinkle some pollen...\
name ""
mov %hseanwave,21:hseanwave
lsp 690,":a;chara\rahure_ct01.bmp",0,0:print 10,500
>Something like a tentacle starts to coil around my penis.@
>Full of pollen, numerous stamens start to rub me.\
name "Luka"
>Ahhh!\
name ""
name $name
>First, let me cover you with my pollen. \
name ""
>The stamen surround my penis, spreading pollen all over me.@
>They spread pollen all over my body, but pay special attention to the tip of my penis.\
>The sticky pollen covers my urethral opening, as the massage brings me close to the edge.\
name "Luka"
>Auu... That's so good...\
name ""
name $name
>I haven't finished preparing it yet, but you're already feeling good?@
>If you feel this good with just my stamen, wait until you feel the pistil...\
name ""
>The stimulation fills me with both pleasure and disgust, as she continues to rub pollen on me.\
name "Luka"
>Auuu... Not the stamen...\
name ""
name $name
>Hahaha, even if you say stamen, it isn't a male organ.@
>I'm obviously a female, so relax.\
name ""
name "Luka"
>Auuu...\
name ""
>Helplessly writhing, she finishes rubbing me with pollen.@
>Unable to resist, my only choice is to try to endure the rising orgasm.\
name $name
>...That's it for the preparations.@
>Now, I'll use my pistil... make sure you cover it fully.\
name ""
mov %hseanwave,1:hseanwave
lsp 690,":a;chara\rahure_ct11.bmp",0,0
lsp 700,":a;chara\rahure_st11.bmp",0,0:print 10,500
>Her slimy pistil starts to slowly wrap around my penis, as it stretches until it's all the way around.\
name "Luka"
>Ahhh!\
name ""
mov %hseanwave,10:hseanwave
>My penis, covered in her sticky pollen, causes the pistil to stick to its surface.\
name $name
>When you shoot our your seed on my pistil, it will mix with the pollen.@
>That's how a human male can fertilize me.\
>So just let it out...@
>Here, I'll make you feel even better...\
name ""
name "Luka"
>Ahiii!\
name ""
>The pistil coiled around my dick starts to move up and down, rubbing me with it's slimy membrane.\
>My body writhes helplessly as I'm attacked by the soft slimy pleasure.\
name $name
>This is how you mate with a Rafflesia...@
>You're having sex with a plant...\
>Hey, how do you like it?\
name ""
name "Luka"
>This... Ahhhh!\
name ""
>This is completely different from being with a human...@
>The immorality of this pistil making me feel so good brings about a strange excitement in me.\
name $name
>You're feeling good, aren't you?\
>Sex with a plant... Much better than you thought, right?\
>Just come with your human penis like that...\
name ""
>The pistil tightens around me, as if forcing me to ejaculate.@
>The tip of her pistil starts to rub my tip, as I twist helplessly.\
name "Luka"
>Auu... I'm going to come...\
name ""
>If I can't endure, I'm going to inseminate this plant...@
>Fertilizing a monster plant...@
>I have to avoid that at any cost...\
name "Luka"
>No... No...@
>This... No...\
name ""
name $name
>It's useless to try to endure.@
>Like this, you have no choice but to pollinate me. \
name ""
>The Rafflesia Girl laughs at me as I try to endure.\
>Her pistil starts to move up and down as it's wrapped around me, crushing my resistance.\
name $name
>Come! @
>Pour your semen all over my pistil! \
name ""
>I'm unable to endure her intense stimulation any longer...@
>I know it's forbidden, but I can't hold on any more...\
name "Luka"
>Aaaaah!\
name ""
gosub *syasei1
lsp 690,":a;chara\rahure_ct12.bmp",0,0
lsp 700,":a;chara\rahure_st12.bmp",0,0
gosub *syasei2
>I explode, shooting my cloudy seed all over the pistil of the Rafflesia Girl.\
name "Luka"
>No... I came...\
name ""
>I can't even begin to understand the act that I've just done.@
>Unable to stop the pleasure, I just pollinated this plant...\
>Breaking the worst taboo for a human...@
>Soaked in the mucus of this plant, all of my power to escape vanishes.\
name $name
>Fufu... With that, I've been successfully fertilized.\
>And your genes seem to be pretty good, too...@
>Letting someone as good as you go would be foolish...\
name ""
name "Luka"
>Eh...?\
name ""
name $name
>I'll keep you just like this.@
>Every breeding season, I'll force you to pollinate me like this.\
name ""
name "Luka"
>No...\
name ""
>I struggle fruitlessly, trying to escape.@
>I don't want to be stuck as her reproductive slave!\
name $name
>Hahaha, don't worry.@
>I'll be sure to feed you and take care of you properly.\
name ""
name "Luka"
>I don't want that!@> Guh...\
name ""
>A tentacle is forced into my mouth, and a sweet liquid is forced down my throat.\
>Wrapped tightly in her flower mouth, I'm unable to escape.\
name "Luka"
>Ghhmff... Mmff...\
name ""
>The next instant, the pistil starts to violently stimulate me again, bringing me to another height.\
gosub *syasei1
lsp 690,":a;chara\rahure_ct13.bmp",0,0
lsp 700,":a;chara\rahure_st13.bmp",0,0
gosub *syasei2
name "Luka"
>Mmmfff...\
name ""
>Her tentacle in my mouth, I pitifully ejaculate again onto her pistil.\
name $name
>Haha, are you happy?@
>Every breeding season, I'll make you this happy.\
>To make sure you're always this energetic, I'll also let you ejaculate a couple times each day.\
>I'll take good care of you!\
name ""
name "Luka"
>Mmmfff...\
name ""
>The pistil continues to massage me as I'm unable to fight back.\
gosub *syasei1
lsp 690,":a;chara\rahure_ct14.bmp",0,0
lsp 700,":a;chara\rahure_st14.bmp",0,0
gosub *syasei2
>Struggling pointlessly, the last of my strength fades.@
>From now on, I'm kept only as her breeding slave.\
gosub *anten
mov %hseanwave,0:hseanwave
>After that, I was never released.@
>Force fed like I was completely disabled, my only purpose is to breed with the Rafflesia Girl.\
>My adventure ends in a cruel and disgraceful way...\
>.........\
goto *badend



*ropa_start

mov $name,"Roper Girl"
mov $name2,"Roper Girl"
mov $lavel,"ropa"
mov $tatie1,"ropa_st01"
mov $tatie2,"ropa_st02"
mov $tatie3,"ropa_st03"
mov $tatie4,"ropa_h2"
mov $haikei,"bg030"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,270
if %nanido=2 mov %max_enemylife,270
if %nanido=3 mov %max_enemylife,320
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"Luka is unable to escape from the Roper's hold!"
mov $mogaku_anno2,"Luka broke free of the Roper's tentacles!"
mov $mogaku_anno3,"Stuck in the Roper's tentacles, Luka weakens!"
mov $mogaku_sel1,"I'll weaken you like this, then eat you..."
mov $mogaku_sel2,"I won't let go..."
mov $mogaku_sel3,"Useless..."
mov $mogaku_sel4,"Don't struggle..."
mov $mogaku_sel5,"You don't want to be eaten...?"
mov $mogaku_dassyutu1,"You ran..."
mov $mogaku_dassyutu2,""
mov $half_s1,"I'll weaken you more..."
mov $half_s2,"I'll slowly melt you..."
mov $kiki_s1,"You've become weak..."
mov $kiki_s2,"It's about time to eat you..."
mov %end_n,3
mov %exp_minus,420
mov %zmonster_x,-270
mov %tukix,300
mov %owaza_count1a,2
name "Luka"
>A Roper, huh...\
name ""
>This thing is a famous, troublesome monster.\
>They weaken their prey by squeezing or ejaculation, then they melt their prey and eat them.\
>A truly horrifying monster.\
gosub *face2
name $name
>It's been a long time since I last had a delicious treat...\
name ""
name "Luka"
>Gah! Like I would let you eat me!\
name ""
>I take out my sword and take a fighting stance!\
gosub *face1
if %3048=0 skillcount1 3048
goto *common_main



*ropa_v

gosub *face3
name $name
>What... Is this...?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Roper turns into a tiny tentacle thing!\
>The Roper, now small enough to fit in my palm, angrily waves its tentacles at me before running away!\
mov %viclose,1:gosub *victory
mov %getexp,250:gosub *lvup
mov %2218,1
goto *sean0074



*ropa_kousan

gosub *kousan_syori
>Luka surrenders to the temptation, ending his resistance!\
name $name
>No resistance...?@
>Then, allow me to eat...\
name ""
goto *ropa_a



*ropa_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *ropa_kousan
if %cmd1=16 goto *ropa_onedari
if %cmd1=17 goto *common_skill
goto *ropa_main



*ropa_a

if %kousoku=1 rnd2 %ransu,1,2
if %kousoku=1 && %ransu=1 gosub *ropa_a3:goto *common_main
if %kousoku=1 && %ransu=2 gosub *ropa_a4:goto *common_main
rnd2 %ransu,1,2
if %ransu=1 gosub *ropa_a1:goto *common_main
if %ransu=2 && %owaza_count1a>3 gosub *ropa_a2:goto *common_main
skip -3



*ropa_a1

add %stack,1
skillcount1 3045
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Here..."
if %ransu=2 mov $sel1,"I'll play with you..."
if %ransu=3 mov $sel1,"I'll weaken you..."
name $name
eng $sel1:$sel6\
name ""
skillname "Tentacle Caress"
dwave 1,"se\ero_makituki2.ogg"
>The Roper shoots out a slimy tentacle and massages Luka's body!
if %nanido<2 damage 9,11
if %nanido=2 damage 13,16
if %nanido=3 damage 18,22
skillname ""
if %mylife=0 sub %stack,1:return *ropa_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*ropa_a2

add %stack,1
if %kousan=2 skip 4
name $name
>Hahaha...\
name ""
skillname "Tentacle Bind"
dwave 1,"se\ero_makituki3.ogg"
>The Roper coils tentacles around Luka's body!
damage 13,15
mov %kousoku,1:gosub *status_print
>Luka's body is bound by the Roper's tentacles!\
skillname ""
if %mylife=0 sub %stack,1:return *ropa_h2
if %kousan=2 sub %stack,1:return
gosub *face2
name $name
if %first_sel1=1 skip 3
>I caught you...@
skip 2
>I won't let go this time...@
>I'll weaken you just like this...\
name ""
mov %first_sel1,1
if %nanido<2 mov %genmogaku,2
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,3
sub %stack,1
return



*ropa_a3

add %stack,1
skillcount1 3046
>Luka's body is bound by the Roper's tentacles!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll tease your weak point...":mov $sel2,"The Roper's tentacle coils around Luka's penis!"
if %ransu=2 mov $sel1,"This is how you weaken a man...":mov $sel2,"The Roper's slimy tentacles rub Luka's penis!"
if %ransu=3 mov $sel1,"Tease the male's penis...":mov $sel2,"The Roper's tentacles crawl around Luka's penis!"
if %ransu=4 mov $sel1,"Tease the tip...":mov $sel2,"The Roper's tentacles squeeze Luka's tip!"
if %ransu=5 mov $sel1,"Faint in agony...":mov $sel2,"The Roper's tentacles poke into Luka's urethral opening!"
name $name
eng $sel1:$sel6\
name ""
skillname "Bound Tentacle Caress"
dwave 1,"se\ero_makituki2.ogg"
eng $sel2:$sel6
if %nanido<2 damage 19,22
if %nanido=2 damage 28,33
if %nanido=3 damage 38,44
skillname ""
if %mylife=0 sub %stack,1:return *ropa_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*ropa_a4

add %stack,1
skillcount1 3047
>Luka's body is bound by the Roper's tentacles!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll hurt you...":mov $sel2,"The Roper's tentacles start to squeeze Luka harder!"
if %ransu=2 mov $sel1,"Let me hear your agony filled voice...":mov $sel2,"The Roper tightens around Luka!"
if %ransu=3 mov $sel1,"Take this...":mov $sel2,"The Roper tightens around Luka!"
if %ransu=4 mov $sel1,"I'll weaken you like this... Then eat you...":mov $sel2,"The Roper tightens around Luka, causing intense pain!"
if %ransu=5 mov $sel1,"I'll tighten...":mov $sel2,"The Roper's tentacles tighten around Luka!"
name $name
eng $sel1:$sel6\
name ""
skillname "Bound Tentacle Tightening"
dwave 1,"se\ero_simetuke1.ogg"
eng $sel2:$sel6
if %nanido<2 damage 16,18
if %nanido=2 damage 24,27
if %nanido=3 damage 32,36
skillname ""
if %mylife=0 sub %stack,1:return *ropa_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*ropa_onedari

mov $list1,"Tentacle Caress"
if %3045>0 mov %list_num1,1
mov $list2,"Bound Tentacle Caress"
if %3046>0 mov %list_num2,1
mov $list3,"Bound Tentacle Tightening"
if %3047>0 mov %list_num3,1
mov $list4,"Predation"
if %3048>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *ropa_onedari1
if %cmd1=12 goto *ropa_onedari2
if %cmd1=13 goto *ropa_onedari3
if %cmd1=14 goto *ropa_onedari4
if %cmd1=-1 goto *ropa_main
goto *ropa_onedari



*ropa_onedari1

gosub *onedari_syori
name $name
>You want me to weaken you...?\
name ""
gosub *ropa_a1
skip -1



*ropa_onedari2

gosub *onedari_syori_k
if %kousoku=1 skip 5
name $name
>You want my tentacles to weaken you...?\
name ""
gosub *ropa_a2
name $name
>You want me to weaken you like this...?@
>After I weaken you, I'll eat...\
name ""
gosub *ropa_a3
skip -1



*ropa_onedari3

gosub *onedari_syori_k
if %kousoku=1 skip 5
name $name
>You want me to torture you with my tentacles?\
name ""
gosub *ropa_a2
name $name
>You want to be squeezed like this, right?@
>After I weaken you, I'll eat...\
name ""
gosub *ropa_a4
skip -1



*ropa_onedari4

gosub *onedari_syori_k
skillcount1 3048
name $name
>You want to be dissolved inside of me and eaten...?@
>Then...\
name ""
if %kousoku=0 gosub *ropa_a2
>Luka's body is pulled towards the Roper!\
mov %viclose,2:gosub *lose
mov %2518,%2518+1:if %2518=1 mov %count_koenemy,%count_koenemy+1
if %2518>%count_most mov %count_most,%2518:mov $count_mostname,$name
count 33,11
mov $bad1," Luka offered his body to the Roper, and allowed her to eat him."
mov $bad2,""
csp 560:csp 561:print 10,1000
mov %kousan,4
goto *ropa_h



*ropa_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\ropa_bk05.bmp",0,0
gosub *syasei2
>Tentacles playing with his body, Luka ejaculates all over them.\
mov %viclose,1:gosub *lose
mov %2518,%2518+1:if %2518=1 mov %count_koenemy,%count_koenemy+1
if %2518>%count_most mov %count_most,%2518:mov $count_mostname,$name
count 10,11
mov $bad1," Luka succumbs to the Roper's tentacles playing with him."
mov $bad2," Melted by the Roper, Luka is eaten."
name $name
>You've been weakened enough... It's time now...\
name ""
name "Luka"
>Guh... Stop...\
name ""
>Hundreds of tentacles shoot out and pull me toward the Roper!\
goto *ropa_h



*ropa_h2

mov %ikigoe,3:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\ropa_h2.bmp",0,0
gosub *syasei2
>As soon as tentacles binded his body, Luka ejaculates all over them.\
mov %viclose,1:gosub *lose
mov %2518,%2518+1:if %2518=1 mov %count_koenemy,%count_koenemy+1
if %2518>%count_most mov %count_most,%2518:mov $count_mostname,$name
count 10,11
mov %count_bouhatu,%count_bouhatu+1
mov $bad1," Luka succumbs to the Roper's tentacles as they binding him."
mov $bad2," Melted by the Roper, Luka is eaten."
name $name
>You already let it out...?@
>Next is for me to melt you...\
name ""
goto *ropa_h



*ropa_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\ropa_h2.bmp",0,0
gosub *syasei2
>Tentacles playing with his body while bound, Luka ejaculates all over them.\
mov %viclose,1:gosub *lose
mov %2518,%2518+1:if %2518=1 mov %count_koenemy,%count_koenemy+1
if %2518>%count_most mov %count_most,%2518:mov $count_mostname,$name
count 10,11
mov $bad1," Luka succumbs to the Roper's tentacles playing with him as he is bound."
mov $bad2," Melted by the Roper, Luka is eaten."
name $name
>You're weak enough now...@
>With my digestive juices, I'll slowly melt you...\
name ""
goto *ropa_h



*ropa_h4

name "Luka"
>Guh! Uuuu...\
name ""
>As my entire body is strangled by her tentacles, the tentacles wrapped around my penis stimulate me.\
gosub *syasei1
lsp 700,":a;chara\ropa_h2.bmp",0,0
gosub *syasei2
>While feeling the pain from her strangling, I ejaculate on her.\
mov %viclose,1:gosub *lose
mov %2518,%2518+1:if %2518=1 mov %count_koenemy,%count_koenemy+1
if %2518>%count_most mov %count_most,%2518:mov $count_mostname,$name
count 10,11
mov $bad1," Bound and strangled by the Roper, Luka ejaculates."
mov $bad2," Melted by the Roper, Luka is eaten."
name $name
>You're weak enough now...@
>With my digestive juices, I'll slowly melt you...\
name ""
goto *ropa_h



*ropa_h

if %2518=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 goto *ropa_hb
name "Luka"
>Aaaaa!\
name ""
dwave 1,"se\ero_makituki3.ogg"
cspl 690,699
lsp 700,":a;chara\ropa_h1.bmp",0,0:print 10,500
>Pulled by her tentacles, I'm forced into her body.@
>Her soft body is covered in a sticky mucus.\
if %hosyoku_cut=1 goto *hosyoku_cut
>The mucus starts to cover my body...@
>This fluid can't be...\
name $name
>With my digestive juices, I'll slowly melt you...\
name ""
goto *ropa_hb



*ropa_hb

name "Luka"
if %kousan<4 mov $sel1,"No! Stop it!"
if %kousan=4 mov $sel1,"Aaaaa"
eng $sel1:$sel6\
name ""
if %kousan=4 skip 3
>While screaming, I struggle violently.@
>But her tentacles wrap tighter around me, stopping my movement.\
>My waist is forced into the Roper.@
>There, a hole opens its mouth as if inviting me inside.\
name "Luka"
if %kousan<4 mov $sel1,"Hii! What are you doing!?"
if %kousan=4 mov $sel1,"Auuu... What's that...?"
eng $sel1:$sel6\
name ""
if %kousan<4 mov $sel1,"Unable to resist, she forces me into the hole."
if %kousan=4 mov $sel1,"She lets me stick my penis into it."
eng $sel1:$sel6\
mov %hseanwave,12:hseanwave
lsp 690,":a;chara\ropa_ct01.bmp",0,0:print 10,500
>My penis gets stuck inside of her!\
name "Luka"
>Aaahh... What is this...\
name ""
>Countless tentacles are wriggling inside of her, rubbing my penis.@
>It's as if I was inserted into a sea of wriggling tentacles.\
name "Luka"
>Faaa... It feels good...\
name ""
>The pleasure overpowers me, causing me to feel even weaker.\
name $name
>Making you weaker with pleasure...@
>While doing so, I'll melt you...\
name ""
name "Luka"
if %kousan<4 mov $sel1,"N...No..."
if %kousan=4 mov $sel1,"A...Amazing..."
eng $sel1:$sel6\
name ""
>The pleasure drains me of any strength I had left in me.@
>The wriggling tentacles inside of her stimulate me without mercy.\
>The pleasure too intense, my mind goes blank as the orgasm rises in me.\
name "Luka"
>Aaa... Coming!@> Ahhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\ropa_ct02.bmp",0,0
lsp 700,":a;chara\ropa_h2.bmp",0,0:print 10,500
gosub *syasei2
>As I explode inside of her wriggling hole, the digestive juices completely cover my body.\
>Instead of pain, the horrible liquid is covering my body with a numbing pleasure.\
if %kousan=4 skip 6
>Terror fills me.@
>How can I feel such sweet pleasure as my body is dissolved...\
name "Luka"
>No!@>Let go!@>Help me... Someone...\
name ""
name $name
>Melt while you feel the pleasure...\
name ""
mov %hseanwave,13:hseanwave
>The wriggling tentacles in her hole continue to force pleasure through me.@
>This pleasure is not for reproduction, but only to restrain her prey.\
>Weakening her prey, then melting them so she can eat...\
if %kousan=4 skip 4
name "Luka"
>No...@>Help me...\
name ""
name $name
if %kousan<4 mov $sel1,"I won't let go... Just melt away like this..."
if %kousan=4 mov $sel1,"Just melt into mush like this..."
eng $sel1:$sel6\
name ""
>Her tentacles wrapped around me start to rub more of the digestive juices on me.\
>At the same time, the hole where I'm inserted in her starts to fill up with the juices.\
name "Luka"
if %kousan<4 mov $sel1,"Auu... No..."
if %kousan=4 mov $sel1,"Auu... So good..."
eng $sel1:$sel6\
name ""
>Covered in her digestive juices, pleasure explodes in my dick.\
>Forcing her prey to stay because of the pleasure...@
>I'm unable to resist it...\
name "Luka"
>Uaa... Coming again...\
name ""
gosub *syasei1
lsp 690,":a;chara\ropa_ct03.bmp",0,0
lsp 700,":a;chara\ropa_h3.bmp",0,0:print 10,500
gosub *syasei2
>Unable to resist the stimulation, I come in her hole again.@
>The only purpose to stimulate me is to weaken me...\
name $name
>It feels good, right?@
>Your body is almost melted...\
name ""
name "Luka"
>Aaaa....\
name ""
>Covered in her sticky digestive juices, I feel despair rise through me.\
name $name
>Turn into mush...@
>You'll be nourishment for me... Be happy...\
name ""
name "Luka"
>Aaaa....\
name ""
>As I feel my body melt away, so does the fear and despair.@
>Filling their place is a slow joy.\
>Slowly melted, I start to feel happy at feeding the Roper.@
>At this rate, I'll be melted and eaten like an insect caught by a carnivorous plant...\
name "Luka"
>Faa... It feels good...\
name ""
>Covered by the digestive juices, the tentacles continue to rub more of the juice all over me.@
>The forced stimulation is too much for me to endure.\
name "Luka"
>Ahiii!\
name ""
gosub *syasei1
lsp 690,":a;chara\ropa_ct04.bmp",0,0
lsp 700,":a;chara\ropa_h4.bmp",0,0:print 10,500
gosub *syasei2
>As I feel myself slowly dissolving, I ejaculate inside of her hole again.\
>Completely hooked on the pleasure, the act of ejaculating in her feels incredible.\
name "Luka"
>Faa... Amazing...\
name ""
name $name
>I'll melt your penis in this hole, too...@
>While it's stuck inside me... Fufu...\
name ""
name "Luka"
>Aaaa....\
name ""
>Gradually, my consciousness starts to melt along with my body.\
name $name
>You aren't afraid anymore, right?@
>Being digested by me feels pleasant, doesn't it?\
>While soaked in intoxication, melt into mush...\
name ""
name "Luka"
>Aaaa....\
name ""
>She covers me with hundreds of tentacles, and forces me deeper into her.\
lsp 700,":a;chara\ropa_h5.bmp",0,0:print 10,500
>Dripping with her digestive juices, the tentacles cover every inch of my body.\
>The sweet pleasure covers my entire body as it's slowly dissolved and absorbed through her mucus covered membrane.\
>My fading consciousness is stained with joy as I feel the pleasure from being digested.\
name $name
>Mmm... You're delicious.@
>Your body tastes very good...\
name ""
>Since the Roper is happy, I'm happy too...@
>The Roper is eating my body...\
name "Luka"
>A....a...a...\
name ""
>Like my body, my mind melts into mush.\
>My slowly dissolving body is being absorbed by the Roper.\
>I'm being melted...@
>I'm being eaten...\
>Then...\
gosub *anten
mov %hseanwave,0:hseanwave
>Fully dissolved, I don't leave a single bone.@
>While tasting the highest pleasure, I'm preyed on by a monster.\
>.........\
goto *badend



*youko_start

mov $name,"Kitsune"
mov $name2,"Kitsune"
mov $lavel,"youko"
mov $tatie1,"youko_st03"
mov $tatie2,"youko_st02"
mov $tatie3,"youko_st03"
mov $tatie4,"youko_st02"
mov $haikei,"bg032"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,350
if %nanido=2 mov %max_enemylife,500
if %nanido=3 mov %max_enemylife,500
if %nanido=0 mov %max_enemylife,2
mov %alice_skill,0
if %nanido=1 mov %henkahp1,175
if %nanido=2 mov %henkahp1,250
if %nanido=3 mov %henkahp1,300
if %nanido=0 mov %henkahp1,1
mov %damage_keigen,100
mov %kaihi,90
mov %music,6
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $half_s1,"I'm amazing!"
mov $half_s2,"You're going to come soon!"
mov $kiki_s1,"Ehehe... Almost done?"
mov $kiki_s2,"You want to come, right!?"
mov %end_n,2
mov %zmonster_x,-250
mov %tukix,300
name $name
>Wawa! A human appeared!\
name ""
>It looks like she's surprised, too.\
>A Kitsune... A fox monster.\
>They can be anywhere from very weak to very strong.\
>The more tails, the more powerful...@> This little one has two...\
>It must be pretty weak...\
name $name
>Wh...What should I do...@
>I got separated from Tamamo, and now a human shows up...\
name ""
name "Luka"
>I don't really get it, but if you're attacking humans I won't forgive it!\
name ""
mov $tatie1,"youko_st01"
lsp 700,":a;chara\youko_st01.bmp",0,0:print 10,500
name $name
>She told me not to let a human take [Poseidon's Bell]!@
>I won't let you by me!\
name ""
name "Luka"
>...Who told you not to?\
name ""
name $name
>...That's a secret!\
name ""
name "Luka"
>That name you said... Tamamo was it?\
name ""
lsp 700,":a;chara\youko_st03.bmp",0,0:print 10,500
name $name
>Auu...\
name ""
>Looks like I hit the bulls-eye.\
name "Luka"
>I need to get by...@
>If you won't let me pass, then I won't go easy on you!\
name ""
bgm "bgm\battle.ogg"
lsp 700,":a;chara\youko_st01.bmp",0,0:print 10,500
name $name
>Then... It's time for a match!\
name ""
mov %sinkou,1
goto *common_main



*youko_v

gosub *face3
name $name
>Hyaaa!\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Kitsune turns into a cute little fox!\
mov %viclose,1:gosub *victory
mov %getexp,280:gosub *lvup
mov %2219,1
goto *sean0075



*youko_kousan

gosub *kousan_syori
>Luka yields to the promise of pleasure, and ends his resistance!\
mov %monster_x,0
csp 702:csp 701:csp 699:csp 698
gosub *face2
mov %counter,0
name $name
>Arara? You want me to make you come?@
>Ok! Put out a lot of your white stuff! \
name ""
mov %sinkou,5
goto *youko_a



*youko_main

if %sinkou=2 mov %stopcmd7,1
if %sinkou=3 mov %stopcmd7,1
if %sinkou=4 mov %stopcmd7,1
if %sinkou<2 mov %stopcmd7,0
if %sinkou>4 mov %stopcmd7,0
gosub *cmd_main
if %cmd1=11 && %sinkou=1 goto *common_attack
if %cmd1=11 && %sinkou=2 goto *youko_attack1
if %cmd1=11 && %sinkou=3 goto *youko_attack2
if %cmd1=11 && %sinkou=4 goto *youko_attack3
if %cmd1=11 && %sinkou=5 goto *common_attack
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *youko_kousan
if %cmd1=16 goto *youko_onedari
if %cmd1=17 goto *common_skill
goto *youko_main



*youko_attack1

>Which Kitsune will I aim at...?\
csel "Left",*youko_attack5,"Center",*youko_attack4,"Right",*youko_attack4



*youko_attack2

>Which Kitsune will I aim at...?\
csel "Left",*youko_attack4,"Center",*youko_attack5,"Right",*youko_attack4



*youko_attack3

>Which Kitsune will I aim at...?\
csel "Left",*youko_attack4,"Center",*youko_attack4,"Right",*youko_attack5



*youko_attack4

mov %before_action,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ha!"
if %ransu=2 mov $sel1,"Hya!"
if %ransu=3 mov $sel1,"Orya!"
name "Luka"
eng $sel1:$sel6\
name ""
mov %skill_sub,1
gosub *common_attack2
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\karaburi.ogg"
delay 90
>But Luka's attack goes right through her body!\
name $name
>Fufufu... That was a fake!\
name ""
gosub *counter
goto *youko_a



*youko_attack5

mov %before_action,-3
gosub *common_attack1
csp 702:csp 701:csp 699:csp 698
lsp 700,":a;chara\youko_st03.bmp",%monster_x,0:print 10,500
name $name
>Gyafun!\
name ""
mov $tatie1,"youko_st01"
mov %monster_x,0
mov %counter,0
lsp 700,":a;chara\youko_st01.bmp",0,0:print 10,500
if %enemylife=0 goto *youko_v
name $name
>Pr...Pretty good...\
name ""
name "Luka"
>........\
name ""
>That technique has a pretty big flaw...\
name $name
>Muu! If it's come to this, I'll show you my true power!\
name ""
skillcount1 3052
skillname "Double Tail"
>The Kitsune's two tails start to dance in the air!\
dwave 1,"se\umaru.ogg"
lsp 690,":a;chara\youko_ct01.bmp",460,0:print 10,500
lsp 690,":a;chara\youko_ct02.bmp",460,0:print 10,500
>A fluffy tail wraps around Luka's penis!
damage 14,16
>The other tail rubs Luka's penis!
damage 14,16
skillname ""
if %mylife=0 goto *youko_h4
csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
mov %owaza_count3a,0
mov %sinkou,5
goto *common_main



*youko_a

if %enemylife<%henkahp1 && %sinkou=1 gosub *youko_a5:goto *common_main
rnd2 %ransu,1,4
if %ransu=1 gosub *youko_a1:goto *common_main
if %ransu=2 gosub *youko_a2:goto *common_main
if %ransu=3 gosub *youko_a3:goto *common_main
if %ransu=4 && %sinkou=5 && %owaza_count3a>3 gosub *youko_a4:goto *common_main
skip -5



*youko_a1

add %stack,1
skillcount1 3049
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll play with you with my fluffy tail!"
if %ransu=2 mov $sel1,"My tail is really fluffy!"
if %ransu=3 mov $sel1,"Cover my tail with your white stuff!"
name $name
eng $sel1:$sel6\
name ""
skillname "Fluffy Tail"
dwave 1,"se\umaru.ogg"
if %kousan=2 && %hanyo1=1 skip 3
lsp 690,":a;chara\youko_ct01.bmp",460,0:print 10,500
if %kousan=2 mov %hanyo1,1
lsp 690,":a;chara\youko_ct02.bmp",460,0:print 10,500
>The Kitsune's tail rubs all over Luka!
if %nanido<2 damage 14,16
if %nanido=2 damage 17,21
if %nanido=3 damage 28,32
skillname ""
if %mylife=0 sub %stack,1:return *youko_h1
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*youko_a2

add %stack,1
skillcount1 3050
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll lick your penis!"
if %ransu=2 mov $sel1,"Mmm... I wonder how it tastes..."
if %ransu=3 mov $sel1,"*Lick* *Lick*"
if %ransu=4 mov $sel1,"Does my rough tongue feel good?"
name $name
eng $sel1:$sel6\
name ""
skillname "Lick Lick"
dwave 1,"se\ero_pyu2.ogg"
>The Kitsune buries her face in Luka's groin and licks his penis!
if %nanido<2 damage 16,18
if %nanido=2 damage 19,22
if %nanido=3 damage 32,36
skillname ""
if %mylife=0 sub %stack,1:return *youko_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*youko_a3

add %stack,1
skillcount1 3051
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll rub you all over!"
if %ransu=2 mov $sel1,"Let out your white stuff!"
if %ransu=3 mov $sel1,"Heeheehee..."
name $name
eng $sel1:$sel6\
name ""
skillname "Rub Rub"
dwave 1,"se\ero_koki1.ogg"
>The Kitsune grabs Luka's penis and starts to pump it!
if %nanido<2 damage 15,17
if %nanido=2 damage 17,20
if %nanido=3 damage 30,34
skillname ""
if %mylife=0 sub %stack,1:return *youko_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*youko_a4

add %stack,1
skillcount1 3052
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"With this technique, I'll force out your white stuff!"
if %ransu=2 mov $sel1,"If I try, I can make you come!"
if %ransu=3 mov $sel1,"Hehehe... Can you endure?"
name $name
eng $sel1:$sel6\
name ""
skillname "Double Tail"
>The Kitsune's two tails start to dance in the air!\
dwave 1,"se\umaru.ogg"
if %kousan=2 && %hanyo1=1 skip 3
lsp 690,":a;chara\youko_ct01.bmp",460,0:print 10,500
if %kousan=2 mov %hanyo1,1
lsp 690,":a;chara\youko_ct02.bmp",460,0:print 10,500
>A fluffy tail wraps around Luka's penis!
damage 14,16
dwave 1,"se\umaru.ogg"
>The other tail rubs Luka's penis!
damage 14,16
skillname ""
if %mylife=0 sub %stack,1:return *youko_h4
if kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
mov %owaza_count3a,0
sub %stack,1
return



*youko_a5

add %stack,1
rnd2 %ransu,1,3
if %ransu=1 goto *youko_a5a
if %ransu=2 goto *youko_a5b
if %ransu=3 goto *youko_a5c



*youko_a5a

name $name
>Damn you!@
>Clone Jutsu!\
name ""
skillname "Clone"
dwave 1,"se\warp.ogg"
lsp 700,":a;chara\youko_st01.bmp",-230,0:print 10,300
lsp 699,":a;chara\youko_st01.bmp",0,0:print 10,300
lsp 698,":a;chara\youko_st01.bmp",230,0:print 10,300
>The Kitsune creates two clones!\
skillname ""
name "Luka"
>What the...?\
name ""
lsp 700,":a;chara\youko_st02.bmp",-230,0:print 10,500
name $name
>Fufufu... Amazing, right!?@
>Now do you see that I'm the real deal!?\
name ""
mov $tatie1,"youko_st02"
mov %monster_x,-230
mov %sinkou,2
mov %counter,1
sub %stack,1
return



*youko_a5b

name $name
>Damn you!@
>Clone Jutsu!\
name ""
skillname "Clone"
dwave 1,"se\warp.ogg"
csp 700
lsp 701,":a;chara\youko_st01.bmp",-230,0:print 10,300
lsp 700,":a;chara\youko_st01.bmp",0,0:print 10,300
lsp 699,":a;chara\youko_st01.bmp",230,0:print 10,300
>The Kitsune creates two clones!\
skillname ""
name "Luka"
>What the...?\
name ""
lsp 700,":a;chara\youko_st02.bmp",0,0:print 10,500
name $name
>Fufufu... Amazing, right!?@
>Now do you see that I'm the real deal!?\
name ""
mov $tatie1,"youko_st02"
mov %monster_x,0
mov %sinkou,3
mov %counter,1
sub %stack,1
return



*youko_a5c

name $name
>Damn you!@
>Clone Jutsu!\
name ""
skillname "Clone"
dwave 1,"se\warp.ogg"
csp 700
lsp 702,":a;chara\youko_st01.bmp",-230,0:print 10,300
lsp 701,":a;chara\youko_st01.bmp",0,0:print 10,300
lsp 700,":a;chara\youko_st01.bmp",230,0:print 10,300
>The Kitsune creates two clones!\
skillname ""
name "Luka"
>What the...?\
name ""
lsp 700,":a;chara\youko_st02.bmp",230,0:print 10,500
name $name
>Fufufu... Amazing, right!?@
>Now do you see that I'm the real deal!?\
name ""
mov $tatie1,"youko_st02"
mov %monster_x,230
mov %sinkou,4
mov %counter,1
sub %stack,1
return



*youko_onedari

mov $list1,"Fluffy Tail"
if %3049>0 mov %list_num1,1
mov $list2,"Lick Lick"
if %3050>0 mov %list_num2,1
mov $list3,"Rub Rub"
if %3051>0 mov %list_num3,1
mov $list4,"Double Tail"
if %3052>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *youko_onedari1
if %cmd1=12 goto *youko_onedari2
if %cmd1=13 goto *youko_onedari3
if %cmd1=14 goto *youko_onedari4
if %cmd1=-1 goto *youko_main
goto *youko_onedari



*youko_onedari1

mov %monster_x,0
csp 702:csp 701:csp 699:csp 698
gosub *onedari_syori
name $name
>You want my fluffy tail to massage you?@
>Ok... I'll rub you all over! \
name ""
gosub *youko_a1
skip -1



*youko_onedari2

mov %monster_x,0
csp 702:csp 701:csp 699:csp 698
gosub *onedari_syori
name $name
>You want me to lick you with my rough tongue...?@
>Ok! I'll lick you all over! \
name ""
gosub *youko_a2
skip -1



*youko_onedari3

mov %monster_x,0
csp 702:csp 701:csp 699:csp 698
gosub *onedari_syori
name $name
>You want to come in my hand...?@
>Ok! I'll rub you to your hearts content! \
name ""
gosub *youko_a3
skip -1



*youko_onedari4

mov %monster_x,0
csp 702:csp 701:csp 699:csp 698
gosub *onedari_syori
name $name
>You want to receive the secret technique of the fox?@
>Ok... I'll make you come quickly!\
name ""
gosub *youko_a4
skip -1



*youko_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\youko_ct03.bmp",460,0
lsp 691,":a;chara\youko_bk04.bmp",0,0
gosub *syasei2
>Stroked by her fluffy tail, Luka ejaculates all over her silver fur.\
mov %viclose,1:gosub *lose
mov %2519,%2519+1:if %2519=1 mov %count_koenemy,%count_koenemy+1
if %2519>%count_most mov %count_most,%2519:mov $count_mostname,$name
count 19,10
mov $bad1," Luka succumbs to the Kitsune's fluffy tail."
mov $bad2," Violated by the Kitsune, Luka was forced to marry her."
mov %monster_x,0
csp 690:csp 702:csp 701:csp 699:csp 698
gosub *face2
name $name
>Hahaha, you shot the white stuff all over my tail!@
>Did it feel good? Ehehehe...\
name ""
goto *youko_h



*youko_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\youko_bk01.bmp",0,0
gosub *syasei2
>Licked by the Kitsune's rough tongue, Luka ejaculates, shooting semen all over her face.\
mov %viclose,1:gosub *lose
mov %2519,%2519+1:if %2519=1 mov %count_koenemy,%count_koenemy+1
if %2519>%count_most mov %count_most,%2519:mov $count_mostname,$name
count 4,10
mov $bad1," Luka succumbs to the Kitsune's rough tongue."
mov $bad2," Violated by the Kitsune, Luka was forced to marry her."
mov %monster_x,0
csp 702:csp 701:csp 699:csp 698
gosub *face2
name $name
>Mmm... *Lick* *Lick*@
>You got semen all over my tongue...@
>Did it feel good? Ehehehe...\
name ""
goto *youko_h



*youko_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\youko_bk03.bmp",0,0
gosub *syasei2
>Stroked by the Kitsune's soft palm, Luka ejaculates, covering her hand with his seed.\
mov %viclose,1:gosub *lose
mov %2519,%2519+1:if %2519=1 mov %count_koenemy,%count_koenemy+1
if %2519>%count_most mov %count_most,%2519:mov $count_mostname,$name
count 5,10
mov $bad1," Luka succumbs to the Kitsune's rubbing hand."
mov $bad2," Violated by the Kitsune, Luka was forced to marry her."
mov %monster_x,0
csp 702:csp 701:csp 699:csp 698
gosub *face2
name $name
>You covered my hands with your white stuff...@
>Did it feel good? Ehehehe...\
name ""
goto *youko_h



*youko_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\youko_ct03.bmp",460,0
lsp 691,":a;chara\youko_bk04.bmp",0,0
gosub *syasei2
>Caressed by the Kitsune's two tails, Luka ejaculates, covering her silver fur.\
mov %viclose,1:gosub *lose
mov %2519,%2519+1:if %2519=1 mov %count_koenemy,%count_koenemy+1
if %2519>%count_most mov %count_most,%2519:mov $count_mostname,$name
count 19,10
mov $bad1," Luka succumbs to the Kitsune's two tails."
mov $bad2," Violated by the Kitsune, Luka was forced to marry her."
mov %monster_x,0
csp 690:csp 702:csp 701:csp 699:csp 698
gosub *face2
name $name
>Hahaha, you covered my tail with your white stuff!@
>Isn't my ultimate move amazing?\
name ""
goto *youko_h



*youko_h

if %2519=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name $name
>Let me replenish my energy now.@
>Fighting you made me tired...\
name ""
>The Kitsune pushes me to the ground!@
>Before I can react, she jumps on top of me!\
name $name
>Ehehe... I'll put you in...\
name ""
name "Luka"
>Ah... Stop... Ahhhhh!\
name ""
mov %hseanwave,1:hseanwave
cspl 690,699
lsp 700,":a;chara\youko_h1.bmp",0,0:print 10,500
>My dick is forced into her tiny honey pot.\
>Hot and narrow, she pushes me into her all the way.@
>The sudden burst of pleasure causes me to push my waist up into her.\
name $name
>Do I feel good?@
>I'll let you put out a lot in me! \
name ""
name "Luka"
>Aaaaa....\
name ""
>Her small hole completely swallows me up.@
>Not even moving, the pressure from her tightness is already exploding ecstasy through me.\
>Moreover, her walls were slightly rough, and her coarse membrane rubs against me.\
name "Luka"
>Faaa...\
name ""
name $name
>Aha, you're feeling good, you're feeling good!@
>Does mating with me feel that good, really?\
name ""
mov %hseanwave,4:hseanwave
>Looking pleased with herself, the Kitsune shakes her waist.@
>Her rough walls start to violently rub against me, shooting pleasure through my waist.\
name "Luka"
>Aaah... I'm going to come...\
name ""
>Stuck in her tiny rough pussy, I feel myself moving closer to the edge.@
>Not even in her for a minute, I feel miserable at already wanting to come.\
name $name
>Haha, just a little more and you'll shoot out your white stuff. @
>Ok! Now come!\
name ""
>As the Kitsune laughs, she starts to violently grind her waist into me.@
>Such a tiny girl is forcing me to come...\
name "Luka"
>Aaaaa!\
name ""
gosub *syasei1
lsp 700,":a;chara\youko_h2.bmp",0,0
gosub *syasei2
>Unable to last even a minute, I feel humiliated as I explode in her vagina.\
name $name
>Ahaha, you already let it out.@
>Coming so easily, what a pathetic hero! \
>Here! I'll bully you even more! \
name ""
mov %hseanwave,8:hseanwave
>Laughing at me, the Kitsune starts grinding her waist against me again.@
>Even though I just came, she's already trying to force me to another...\
>Stuck in her tiny, rough pussy...@
>This little girl is furiously violating me...\
name "Luka"
>Stop! Ahhh!\
name ""
name $name
>Your semen is really delicious...@
>Let out more, more!\
name ""
name "Luka"
>Auuu... If you move so much... Again...\
name ""
>Stimulated by her rough vagina, I feel my power to escape fade.\
>Deep inside the Kitsune, I feel her tighten around the tip of my penis even more.@
>The pleasure from the increased pressure sends chills down my spine.\
name $name
>Hehe... Come! \
name ""
>As if forcing me to ejaculate, the Kitsune tightens her pussy and pumps me even faster.@
>Her movements destroy the last of my endurance.\
name "Luka"
>Aaaaahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\youko_h3.bmp",0,0
gosub *syasei2
>I've been forced to climax twice now inside of her.@
>For the second time, the proof of my submission to her shoots inside her pussy.\
name $name
>Hahaha... Semen... Delicious...@
>I really like you!\
>Hey hey... Do you know how a Kitsune and a human get married?\
name ""
name "Luka"
>M...Marriage...?\
name ""
name $name
>A Kitsune violates the human, and receives his seed three times.@
>Once they do that, they're tied together and become a married couple.\
>So far, you've ejaculated in me twice...@
>Just one time left! Heehee.\
name ""
name "Luka"
>That... Marriage... Auuuu...\
name ""
name $name
>I said I like you...@
>Hey, be my husband!\
>I'll make you feel good every day...@
>From morning till night, we'll mate all day!\
name ""
name "Luka"
>That... No way...@>Ahhh!\
name ""
>The Kitsune looks down at me as she starts to move her hips again.@
>Crushed in her tight pussy, I struggle helplessly.\
name "Luka"
>Auu... No...\
name ""
name $name
>Come on, come on... Let's get married...@
>Even if by force, I'll finish the ceremony... \
name ""
>The Kitsune grinds her waist into me harder than before as she laughs.@
>At this rate, I'll be forced to come in her a third time...\
name "Luka"
>Aaaahhh....\
name ""
name $name
>Hahaha, can you endure it...?@
>...Or are you going to become my husband?\
name ""
>The Kitsune starts to move right and left as she continues to pump me.@
>Rubbed all over by her rough pussy, I feel myself on the edge.\
>I can't endure like this...@
>I'm going to come inside of her again...\
name "Luka"
>Auuu... No more...@
>I'm coming again...!\
name ""
name $name
>Yay! Be my husband! \
name ""
>The Kitsune pushes down hard, forcing my tip all the way to the entrance of her womb.@
>Hitting her deepest point, the sudden stimulation forces me over the edge.\
name "Luka"
>Aaa! Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\youko_h4.bmp",0,0
gosub *syasei2
>My mind goes pure white as I come inside of her a third time, shooting a large amount of semen into her womb.\
name $name
>...Ehehe, you let out a lot.@
>The ceremony is over with that. We're married now!\
>Let's celebrate with Tamamo, then start living together!\
name ""
>The Kitsune's tails start to wag furiously.@
>Still stuck in her pussy, the wagging causes an intense tightening around me.\
name "Luka"
>Aaa... That feels good...\
name ""
name $name
>Ehehe... We'll be together forever now! @
>We'll mate every day, and have lots of cute babies! \
name ""
>The Kitsune shakes her hips as she talks excitedly.\
name "Luka"
>Auu... Coming again...\
name ""
gosub *syasei1:gosub *syasei2
>I continue mating with my new wife, the Kitsune, as my consciousness fades.\
>Stuck inside of her tiny pussy, everything I shoot out is sucked up by her womb.\
gosub *anten
mov %hseanwave,0:hseanwave
>Now her husband, I'm taken back to her village.\
>At first, all I tried to do was look for a chance to run away.@
>However, I slowly started to become happy living there.\
>Thus, I spent the rest of my life with my cute wife.\
>.........\
goto *badend



*meda_start

mov $name,"Meda"
mov $name2,"Meda"
mov $lavel,"meda"
mov $tatie1,"meda_st01"
mov $tatie2,"meda_st01"
mov $tatie3,"meda_st01"
mov $tatie4,"meda_st01"
mov $haikei,"bg032"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,280
if %nanido=2 mov %max_enemylife,330
if %nanido=3 mov %max_enemylife,380
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"Luka can't escape from the Meda's tentacles!"
mov $mogaku_anno2,"Luka broke free of the Meda!"
mov $mogaku_anno3,"Luka's power starts to fade while entangled in the Meda's tentacle!"
mov $mogaku_sel1,"I won't let go..."
mov $mogaku_sel2,"I won't let go..."
mov $mogaku_sel3,"Catch... Fluids... Suck..."
mov $mogaku_sel4,"Catch... Keep..."
mov $mogaku_sel5,"Fluids... Suck..."
mov $mogaku_dassyutu1,"Catch... Ran..."
mov $mogaku_dassyutu2,""
mov %end_n,2
mov %zmonster_x,-250
mov %tukix,300
mov %owaza_count1a,2
>This is a cave monster...@
>It's pretty rare to see one above ground.\
name $name
>Catch...\
name ""
>A Meda with tentacles for hair...@
>With her insect-like behavior, she's acts differently than other monsters.\
name "Luka"
>Something like this is in here too...\
name ""
>Slightly confused, I unsheathe my sword.\
mov %sinkou,1
goto *common_main



*meda_v

name $name
>Ah...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Meda turns into something that looks like a sea louse!\
mov %viclose,1:gosub *victory
mov %getexp,320:gosub *lvup
mov %2220,1
goto *sean0076



*meda_kousan

gosub *kousan_syori
>Luka yields to the promise of pleasure, ending his resistance!\
name $name
>Catch... Surrenders...\
name ""
goto *meda_a



*meda_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *meda_kousan
if %cmd1=16 goto *meda_onedari
if %cmd1=17 goto *common_skill
goto *meda_main



*meda_a

if %kousoku=1 gosub *meda_a3:goto *common_main
if %kousoku=2 gosub *meda_a4:goto *common_main
rnd2 %ransu,1,2
if %ransu=1 gosub *meda_a1:goto *common_main
if %ransu=2 && %owaza_count1a>3 gosub *meda_a2:goto *common_main
skip -3



*meda_a1

add %stack,1
skillcount1 3053
name $name
>.........\
name ""
skillname "Tentacle"
dwave 1,"se\ero_makituki2.ogg"
>The Meda girl shoots out a tentacle, rubbing Luka's body all over!
if %nanido<2 damage 13,15
if %nanido=2 damage 19,22
if %nanido=3 damage 22,30
skillname ""
if %mylife=0 sub %stack,1:return *meda_h1
sub %stack,1
return



*meda_a2

add %stack,1
if %kousan=2 skip 4
name $name
>Catch...\
name ""
skillname "Restriction"
dwave 1,"se\ero_name2.ogg"
>The Meda binds Luka with one of her tentacles!
damage 13,15
mov %kousoku,1:gosub *status_print
>Luka is bound by the Meda's tentacle!\
skillname ""
if %mylife=0 sub %stack,1:return *meda_h2
name $name
>Catch... I caught it...\
name ""
if %nanido<2 mov %genmogaku,1
if %nanido=2 mov %genmogaku,1
if %nanido=3 mov %genmogaku,1
sub %stack,1
return



*meda_a3

add %stack,1
skillcount1 3054
>Luka is bound by the Meda's tentacle!\
if %kousan=2 skip 4
name $name
>I won't let go...\
name ""
skillname "Bound Tentacle"
dwave 1,"se\ero_name2.ogg"
>The Meda's tentacle starts to rub Luka's penis!
if %nanido<2 damage 17,19
if %nanido=2 damage 25,28
if %nanido=3 damage 34,38
mov %kousoku,2:mov %genmogaku,0
skillname ""
if %mylife=0 sub %stack,1:return *meda_h3
if %kousan=2 sub %stack,1:return
>Luka is slowly being pulled toward the Meda's mouth!\
if %first_sel1=1 sub %stack,1:return
name "Luka"
>Uguh...\
name ""
>Inside the mouth in her lower abdomen, thousands of tentacles are wriggling around.@
>The tentacle wrapped around me is slowly pushing me in there...\
>Things that look like worms or eels are wriggling around inside her mouth...\
name "Luka"
>It can't be...\
name ""
>She isn't going to put me in there... is she?@
>As I shiver in horror, a sick feeling of expectation builds in me.\
>Stuck in there, what would it feel like...?@
>If those things were all wrapped around my thing, would it feel good...?\
mov %first_sel1,1
sub %stack,1
return



*meda_a4

add %stack,1
skillcount1 3055
>Luka is bound by the Meda's tentacle!\
name $name
>Catch, suck...\
name ""
name "Luka"
>Aaaaa!\
name ""
dwave 1,"se\ero_name2.ogg"
>She finally pulled me all the way next to her mouth.\
>Right in front of my eyes, the Meda pulls me one last time...@
dwave 1,"se\ero_pyu3.ogg"
lsp 700,":a;chara\meda_h1.bmp",0,0
lsp 690,":a;chara\meda_ct01.bmp",0,0:print 10,500
>The Meda sucks in my penis all the way to its base!\
mov %kousoku,3:mov %genmogaku,100
name "Luka"
>Faaa!\
name ""
skillname "Thousand Worms"
>The tentacle inside of her mouth starts to wriggle around me.\
>Luka's penis is stuck in the Meda's mouth!
mov %damage_kotei,1
damage 30,34
skillname ""
if %mylife=0 sub %stack,1:return *meda_h4
>Luka is being violated by the Meda!\
name "Luka"
>Faaa!\
name ""
>The tentacles that looked like worms wrap around my penis inside her mouth, shooting me with unexpected pleasure.\
>Each one of them seems to be moving and wriggling around as if they have a mind of their own.\
name $name
>Catch... Fluids... Suck...\
name ""
skillcount1 3055
skillname "Thousand Worms"
dwave 1,"se\ero_makituki3.ogg"
>Thousands of worm-like tentacles wriggle all around Luka's penis!
mov %damage_kotei,1
damage 30,34
skillname ""
if %mylife=0 sub %stack,1:return *meda_h5
name "Luka"
>Ahiii!\
name ""
>I can't take much more of this...@
>At this rate, I'm going to come in her mouth...\
name $name
>Catch... Fluids...\
name ""
skillcount1 3055
skillname "Thousand Worms"
dwave 1,"se\ero_makituki3.ogg"
>Thousands of worm-like tentacle wrap around Luka's penis, rubbing him all over!
mov %damage_kotei,1
damage 30,34
skillname ""
sub %stack,1
return *meda_h5



*meda_a5

add %stack,1
skillcount1 3054
>Luka is bound by the Meda's tentacle!\
name $name
>........\
name ""
skillname "Bound Tentacle"
dwave 1,"se\ero_name2.ogg"
>The Meda's tentacle rubs Luka's penis!
if %nanido<2 damage 17,19
if %nanido=2 damage 25,29
if %nanido=3 damage 34,38
skillname ""
if %mylife=0 sub %stack,1:return *meda_h3
sub %stack,1
return



*meda_onedari

mov $list1,"Tentacle"
if %3053>0 mov %list_num1,1
mov $list2,"Bound Tentacle"
if %3054>0 mov %list_num2,1
mov $list3,"Thousand Worms"
if %3055>0 mov %list_num3,1
gosub *cmd_onedari
if %cmd1=11 goto *meda_onedari1
if %cmd1=12 goto *meda_onedari2
if %cmd1=13 goto *meda_onedari3
if %cmd1=-1 goto *meda_main
goto *meda_onedari



*meda_onedari1

gosub *onedari_syori
name $name
>Catch... Wants...?\
name ""
gosub *meda_a1
skip -1



*meda_onedari2

gosub *onedari_syori_k
name $name
>Catch... Wants...?\
name ""
if %kousoku=0 gosub *meda_a2
if %kousoku=1 gosub *meda_a3
gosub *meda_a5
skip -1



*meda_onedari3

gosub *onedari_syori_k
name $name
>Catch... Wants...?\
name ""
if %kousoku=0 gosub *meda_a2
if %kousoku=1 gosub *meda_a3
gosub *meda_a4



*meda_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\meda_bk03.bmp",0,0
gosub *syasei2
>Being rubbed by the Meda's tentacle is too much for Luka, as he ejaculates all over her!\
mov %viclose,1:gosub *lose
mov %2520,%2520+1:if %2520=1 mov %count_koenemy,%count_koenemy+1
if %2520>%count_most mov %count_most,%2520:mov $count_mostname,$name
count 10,4
mov $bad1," Luka succumbs to the Meda's tentacles."
mov $bad2," The Meda continues to wring out Luka's semen until he dies."
goto *meda_h



*meda_h2

mov %ikigoe,3:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\meda_bk03.bmp",0,0
gosub *syasei2
>Being bound by the Meda's tentacle is too much for Luka, as he ejaculates all over her!\
mov %viclose,1:gosub *lose
mov %2520,%2520+1:if %2520=1 mov %count_koenemy,%count_koenemy+1
if %2520>%count_most mov %count_most,%2520:mov $count_mostname,$name
mov %count_bouhatu,%count_bouhatu+1
count 10,4
mov $bad1," Luka succumbs to the Meda's tentacles binding him."
mov $bad2," The Meda continues to wring out Luka's semen until he dies."
goto *meda_h



*meda_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\meda_bk03.bmp",0,0
gosub *syasei2
>Being rubbed by the Meda's tentacle while bound is too much for Luka, as he ejaculates all over her!\
mov %viclose,1:gosub *lose
mov %2520,%2520+1:if %2520=1 mov %count_koenemy,%count_koenemy+1
if %2520>%count_most mov %count_most,%2520:mov $count_mostname,$name
count 10,4
mov $bad1," Luka succumbs to the Meda's tentacles as he's bound."
mov $bad2," The Meda continues to wring out Luka's semen until he dies."
goto *meda_h



*meda_h4

mov %ikigoe,3:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\meda_h2.bmp",0,0
lsp 690,":a;chara\meda_ct02.bmp",0,0
gosub *syasei2
>Just being forced into her mouth was too much, as he accidentally ejaculates.\
mov %viclose,1:gosub *lose
mov %2520,%2520+1:if %2520=1 mov %count_koenemy,%count_koenemy+1
if %2520>%count_most mov %count_most,%2520:mov $count_mostname,$name
count 2,4
mov %count_bouhatu,%count_bouhatu+1
mov $bad1," Luka accidentally ejaculates as soon as he's inserted into the Meda's mouth."
mov $bad2," The Meda continues to wring out Luka's semen until he dies."
name $name
>Catch... Semen...\
name ""
>Keeping me in her mouth, the Meda's tentacle start to wriggle around me.\
goto *meda_h



*meda_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\meda_h2.bmp",0,0
lsp 690,":a;chara\meda_ct02.bmp",0,0
gosub *syasei2
>The thousands of worm-like tentacles wriggling in the Meda's mouth are too much for Luka, as he ejaculates in her mouth!\
mov %viclose,1:gosub *lose
mov %2520,%2520+1:if %2520=1 mov %count_koenemy,%count_koenemy+1
if %2520>%count_most mov %count_most,%2520:mov $count_mostname,$name
count 2,4
mov $bad1," Luka succumbs to the Meda's tentacles inside her mouth."
mov $bad2," The Meda continues to wring out Luka's semen until he dies."
name $name
>Catch... Semen...\
name ""
>Keeping me in her mouth, the Meda's tentacle continue to wriggle around me.\
goto *meda_h



*meda_h

if %2520=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku=3 mov %hseanwave,21:hseanwave:goto *meda_hb
name $name
>Catch... Semen...\
name ""
dwave 1,"se\ero_name2.ogg"
>Tentacles shoot out of the Meda's body and wrap around me!@
>She starts to slowly pull me towards her.\
name "Luka"
>Aaa!\
name ""
>As I'm slowly drawn towards her, she opens a mouth in her lower abdomen.@
>Inside that mouth are thousands of wriggling tentacles...\
>Things that look like worms or eels are wriggling and waving all over.\
name "Luka"
>No way...\
name ""
>She isn't going to put me in there, is she...?@
>As I shudder in horror, a sense of sick excitement rises in me.\
>In that wriggling mass of tentacles, what would it feel like...?@
>If my dick was in there, how good would it feel...?\
name "Luka"
>Aaa... Stop...\
name ""
mov %hseanwave,21:hseanwave
cspl 690,699
lsp 690,":a;chara\meda_ct01.bmp",0,0
lsp 700,":a;chara\meda_h1.bmp",0,0:print 10,500
>With a final pull, she forces me into her mouth!\
goto *meda_hb



*meda_hb

name "Luka"
>Faaa!\
name ""
>The worm-like tentacles start to rise up one by one and wrap around my penis.\
>Squeezing, wrapping, coiling...@
>The tentacles are massaging me all over as if they have a mind of their own.\
name "Luka"
>Hii! Stop!\
name ""
>Fearing the creepy pleasure attacking me, I try to pull out my waist.@
>The tentacles holding me don't allow me to move, though.\
>Rather than escaping, I'm instead forced deeper into her.@
>I'm stuck to her... There's no escape...\
name "Luka"
>Auu... Let go!@
>Aaaaa!\
name ""
>My penis is completely covered by her writhing tentacles inside her mouth.@
>The creepy feeling starts to overpower my horror at the situation.\
name "Luka"
>Faaa!@>Stop...!\
name ""
name $name
>..........\
name ""
>The Meda stares directly into my eyes.@
>Not showing any emotion, it's the gaze of someone staring at their prey.\
>Stimulating her prey, forcing them to ejaculate... It's just an emotionless process to her.\
name "Luka"
>Auuu!\
name ""
>Inside her mouth, the thousands of tentacles start to increase their speed.\
>The tentacles wrapped around me tighten up, the sweet pleasure causing me to drool.\
name "Luka"
>Faa!@> Too good...\
name ""
>Feeling the rising orgasm in me, I realize that I've given myself completely to this pleasure.\
>All I want to do is come just like this...\
name $name
>..........\
name ""
>Staring into her unfeeling eyes, the stimulation I'm feeling in her mouth suddenly becomes even more captivating.\
>Countless tentacles in her, all doing nothing but forcing me to ejaculate...\
name "Luka"
>Aaaa!\
name ""
gosub *syasei1
lsp 690,":a;chara\meda_ct02.bmp",0,0
lsp 700,":a;chara\meda_h2.bmp",0,0
gosub *syasei2
>Finally giving in to the tentacles urging me to come, I explode in her mouth, shooting semen all over the wriggling tentacles.\
name $name
>..........\
name ""
mov %hseanwave,22:hseanwave
>As soon as the last drop is squeezed out of me, the tentacles start to massage me again.\
>Crawling all over me, the tentacles each move independently of the other as they continue to forcefully try to make me ejaculate.\
name "Luka"
>Hya!@> Haaa!\
name ""
>As if they were hungry for more, the countless tentacles squeeze me and massage me all over.\
>The creepy pleasure already starts to move me to the edge again.\
name "Luka"
>Hauuu...@
>Aaaaa!\
name ""
name $name
>..........\
name ""
>The Meda continues to stare at me coldly, acting just like an insect mechanically eating her prey.\
>Caught by an insect, who only wants my fluids...\
name "Luka"
>Ha! Haaa....\
name ""
>The tentacles continue rubbing me, urging me towards another ejaculation.\
>Caught by this insect monster, I feel humiliated at only being viewed as a source of food.\
name "Luka"
>Aaaa... Stop...\
name ""
>I beg her, but she gives no mercy.@
>Instead, the stimulation continues and forces me to another orgasm.\
name "Luka"
>C...Coming!@>Ahhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\meda_ct03.bmp",0,0
lsp 700,":a;chara\meda_h3.bmp",0,0
gosub *syasei2
>The moment I come, the tentacles all start wriggling around in a panic, as if they are all trying to be the first to get a taste.\
>Moving all over the place, they squeeze and rub against me in their desperation to get my semen.\
name "Luka"
>Aaaaa...\
name ""
>After my ejaculation is over, they rub me even harder than before, as if urging on another.@
>Unable to endure the nonstop stimulation, I'm driven to the edge again.\
gosub *syasei1
lsp 690,":a;chara\meda_ct04.bmp",0,0
lsp 700,":a;chara\meda_h4.bmp",0,0
gosub *syasei2
name "Luka"
>Stop... Help...\
name ""
>Even if I cry while screaming for help, the Meda just continues to stare at me.@
>Stuck in her like this, I'm going to be milked dry...\
>My penis treated as nothing but a source of nourishment, I feel the ultimate humiliation of a man.\
name "Luka"
>Faaa!\
name ""
gosub *syasei1:gosub *syasei2
>Forced to come over and over again, my consciousness starts to fade.\
>Even as I faint, she continues to force me to ejaculate more...
gosub *anten
mov %hseanwave,0:hseanwave
>Like that, she sucks everything out of me to the last drop.\
>After being forced to come too many times to count, my corpse remained in that dark cave...\
>..........\
goto *badend



*kumo_start

mov $name,"Spider Girl"
mov $name2,"Spider Girl"
mov $lavel,"kumo"
mov $tatie1,"kumo_st01"
mov $tatie2,"kumo_st02"
mov $tatie3,"kumo_st03"
mov $tatie4,"kumo_st02"
mov $haikei,"bg032"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,300
if %nanido=2 mov %max_enemylife,350
if %nanido=3 mov %max_enemylife,400
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"Luka is unable to peel off the web!"
mov $mogaku_anno4,"Being wound in the web, Luka weakens!"
mov $mogaku_sel1,"Haha, it's useless. You can't break free of my web."
mov $mogaku_sel2,"You can't escape on your own. Fufu."
mov $mogaku_sel3,"Struggle pointlessly as I wind you up..."
mov $mogaku_sel4,"Haha... Struggle like an insect!"
mov $mogaku_sel5,"I'll wind you up until you can't move an inch..."
mov $half_s1,"Do you want me to wrap you up tighter...?"
mov $half_s2,"My viscous thread wrapping around you..."
mov $kiki_s1,"Aha. Almost."
mov $kiki_s2,"Become my prey..."
mov %end_n,2
mov %zmonster_x,-300
mov %tukix,300
name "Luka"
>Stop!\
name ""
>Unable to watch in silence, I yell at the Spider Girl.\
gosub *face2
name $name
>Arara... Another stupid catch appears.\
>Fufu... A delicious looking boy, too.@
>I'll wring your semen out...\
name ""
name "Luka"
>Kuh! Let the Kitsune go!\
name ""
name $name
>Sure...@
>If I can get a human boy, I don't need such a tiny monster.\
>Instead, I'll eat you.@
>I'll wind you up in my web and suck everything out...\
name ""
gosub *face1
if %3060=0 skillcount1 3060
goto *common_main



*kumo_v

gosub *face3
name $name
>How could I...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Spider Girl turns into a tiny spider!\
mov %viclose,1:gosub *victory
mov %getexp,350:gosub *lvup
mov %2221,1
goto *sean0077



*kumo_kousan

gosub *kousan_syori
>Luka succumbs to the promise of pleasure, ending his resistance!\
gosub *face2
name $name
>Hahaha, so you want to be my prey after all.@
>Alright, I'll wrap you up tightly...\
name ""
goto *kumo_a



*kumo_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *kumo_miss2
if %cmd1=11 goto *common_attack
if %cmd1=12 goto *common_mogaku
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *kumo_kousan
if %cmd1=16 goto *kumo_onedari
if %cmd1=17 goto *common_skill
goto *kumo_main



*kumo_miss2

if %kousoku=1 mov %abairitu,80
if %kousoku=2 mov %abairitu,65
if %kousoku=3 mov %abairitu,50
goto *common_miss2



*kumo_a

if %turn=1 gosub *kumo_a2:goto *common_main
rnd2 %ransu,1,4
if %ransu=1 gosub *kumo_a1:goto *common_main
if %ransu=2 gosub *kumo_a2:goto *common_main
if %ransu>2 && %kousoku=0 gosub *kumo_a3:goto *common_main
if %ransu>2 && %kousoku=1 gosub *kumo_a4:goto *common_main
if %ransu>2 && %kousoku=2 gosub *kumo_a5:goto *common_main
if %ransu>2 && %kousoku=3 gosub *kumo_a6:goto *common_main
skip -7



*kumo_a1

add %stack,1
skillcount1 3056
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll rub every part of your body..."
if %ransu=2 mov $sel1,"I'll play with you with all of my feet..."
if %ransu=3 mov $sel1,"Haha... Where do you want me to play with you?"
name $name
eng $sel1:$sel6\
name ""
skillname "Eight-Legged Massage"
dwave 1,"se\umaru.ogg"
>Luka is massaged by the Spider Girl's eight legs!
mov %damage_nobr,1:damage 3,5
damage 3,5
>Every corner of his body is rubbed!
mov %damage_nobr,1:damage 3,5
damage 3,5
skillname ""
if %mylife=0 sub %stack,1:return *kumo_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kumo_a2

add %stack,1
skillcount1 3057
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Do you want my string here too?"
if %ransu=2 mov $sel1,"I'll turn it into a cocoon..."
if %ransu=3 mov $sel1,"Your penis being wrapped in web... How humiliating."
name $name
eng $sel1:$sel6\
name ""
skillname "Penis Cocoon"
dwave 1,"se\ero_ito.ogg"
if %kousan=2 && %hanyo1=1 skip 3
lsp 690,":a;chara\kumo_ct01.bmp",0,0:print 10,500
if %kousan=2 mov %hanyo1,1
lsp 690,":a;chara\kumo_ct02.bmp",0,0:print 10,500
>The Spider Girl wraps webbing around Luka's penis!
if %nanido<2 damage 12,15
if %nanido=2 damage 18,22
if %nanido=3 damage 24,30
skillname ""
if %mylife=0 sub %stack,1:return *kumo_h2
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kumo_a3

add %stack,1
skillcount1 3058
name $name
>I'll wrap your whole body up...\
name ""
skillname "Body Wrap"
dwave 1,"se\ero_ito.ogg"
>The Spider Girl shoots out spider silk, and covers Luka's body!
damage 15,18
mov %kousoku,1:gosub *status_print
mov %genmogaku,100
>Luka's body is wrapped in the Spider Girl's webbing!\
skillname ""
if %mylife=0 sub %stack,1:return *kumo_h3
gosub *face2
name $name
>Does my sticky silk feel good...?@
>I'll keep wrapping you up like this until you're a cocoon...\
>After that, I'll suck out all your semen...@
>Or would you rather be eaten in person...?\
name ""
if %kousan>0 sub %stack,1:return
name "Luka"
>Gah...\
name ""
>For now, it doesn't seem like my attacks are affected...@
>If she gets more of that webbing on me, it could get dangerous...\
sub %stack,1
return



*kumo_a4

add %stack,1
name $name
>I'll shoot more of my webbing on you...@
>Turn into a cocoon...\
name ""
skillcount1 3058
skillname "Body Wrap"
dwave 1,"se\ero_ito.ogg"
>The Spider Girl shoots out spider silk, and covers Luka's body!
damage 15,18
mov %kousoku,2
>Luka's body is wrapped in the Spider Girl's webbing!\
skillname ""
if %mylife=0 sub %stack,1:return *kumo_h3
if %kousan>0 sub %stack,1:return
name "Luka"
>Uguh....\
name ""
>It's really hard to move now...@
>I think I can only manage to hit about half as hard as usual like this.\
name $name
>I'll keep rolling you up with my silk...\
>At this rate, you'll be a cocoon in no time.@
>Do you want to be wound up in my spider silk...?\
name ""
sub %stack,1
return



*kumo_a5

add %stack,1
name $name
>I'll shoot more on you...@
>Hahaha... Have you given up yet?\
name ""
skillcount1 3058
skillname "Body Wrap"
dwave 1,"se\ero_ito.ogg"
>The Spider Girl shoots out spider silk, and covers Luka's body!
damage 15,18
mov %kousoku,3
>Luka's body is wrapped in the Spider Girl's webbing!\
skillname ""
if %mylife=0 sub %stack,1:return *kumo_h3
if %kousan>0 sub %stack,1:return
name "Luka"
>Aghhh...\
name ""
>It's almost impossible for me to move my body now.@
>Any more, and I'll be stuck in place...\
name $name
>Just give up and let me make you into a cocoon...@
>It will feel amazing, so look forward to it...\
name ""
sub %stack,1
return



*kumo_a6

add %stack,1
name $name
>With this... I'm done.@
>Become a cocoon...\
name ""
skillcount1 3058
skillname "Body Wrap"
dwave 1,"se\ero_ito.ogg"
>The Spider Girl shoots out spider silk, and covers Luka's body!
damage 15,18
mov %kousoku,4
>Luka has been completely wrapped in the spider silk!\
skillname ""
if %mylife=0 sub %stack,1:return *kumo_h3
name "Luka"
>Aaa!\
name ""
>Tightly wrapped up, Luka is unable to move!\
name $name
>Fufu... Thanks for waiting!@
>First, I'll wring out your semen...\
name ""
sub %stack,1
goto *kumo_a7



*kumo_a7

add %stack,1
skillcount1 3059
>At the tip of the Spider Girl's abdomen, a hole opens up!@
>The Spider Girl forces down the hole onto Luka's penis!\
if %kousoku=0 lsp 598,":a;system\face_10.bmp",34,534
lsp 700,":c;chara\kumo_ha1.bmp",0,0:print 10,500
skillname "Forced Violation"
>The Spider Girl's lower entrance quickly tightens around Luka!\
>Tiny bumps inside of her rub Luka all over!
mov %damage_kotei,1
damage 25,30
mov %kousoku,5
skillname ""
if %mylife=0 sub %stack,1:return *kumo_h4
if %mylife<26 sub %stack,1:goto *kumo_a9
name "Luka"
>Aaaaa!\
name ""
name $name
>Feels good, doesn't it?@
>Shoot out everything inside of me...\
name ""
sub %stack,1
goto *kumo_a8



*kumo_a8

add %stack,1
skillcount1 3059
name "Luka"
>Aaaa...\
name ""
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll tease you more and more..."
if %ransu=2 mov $sel1,"It feels amazing inside me, doesn't it?"
if %ransu=3 mov $sel1,"I'll make it feel even better..."
name $name
eng $sel1:$sel6\
name ""
skillname "Forced Violation"
dwave 1,"se\ero_chupa4.ogg"
>The Spider Girl's lower entrance quickly tightens around Luka!\
>Tiny bumps inside of her rub Luka all over!
mov %damage_kotei,1
damage 25,30
skillname ""
if %mylife<26 sub %stack,1:goto *kumo_a9
sub %stack,1
goto *kumo_a8



*kumo_a9

add %stack,1
name "Luka"
>Hiii... No more...\
name ""
name $name
>This next will finish it...@
>Let it out in me as you're pathetically stuck there...\
name ""
skillcount1 3059
skillname "Forced Violation"
dwave 1,"se\ero_chupa4.ogg"
>The Spider Girl's lower entrance quickly tightens around Luka!\
>Tiny bumps inside of her rub Luka all over!
mov %damage_kotei,2
damage 25,30
skillname ""
sub %stack,1
return *kumo_h4



*kumo_onedari

mov $list1,"Eight-Legged Massage"
if %3056>0 mov %list_num1,1
mov $list2,"Penis Cocoon"
if %3057>0 mov %list_num2,1
mov $list3,"Body Wrap"
if %3058>0 mov %list_num3,1
mov $list4,"Forced Violation"
if %3059>0 mov %list_num4,1
mov $list5,"Predation"
if %3060>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *kumo_onedari1
if %cmd1=12 goto *kumo_onedari2
if %cmd1=13 goto *kumo_onedari3
if %cmd1=14 goto *kumo_onedari4
if %cmd1=15 goto *kumo_onedari5
if %cmd1=-1 goto *kumo_main
goto *kumo_onedari



*kumo_onedari1

gosub *onedari_syori
name $name
>You want to be stroked by all my legs?@
>Alright... I'll rub you all over.\
name ""
gosub *kumo_a1
skip -1



*kumo_onedari2

gosub *onedari_syori
name $name
>You want me to do that to your important penis?@
>You're an odd one...\
name ""
gosub *kumo_a2
skip -1



*kumo_onedari3

gosub *onedari_syori_k
name $name
>So you do want to be wrapped up in my silk...@
>Alright, I'll wrap you up nice and tight.\
name ""
if %kousoku=0 gosub *kumo_a3
if %kousoku=1 gosub *kumo_a4
if %kousoku=2 gosub *kumo_a5
gosub *kumo_a6



*kumo_onedari4

gosub *onedari_syori_k
name $name
>Hahaha, so you want me to feed on your semen?@
>What a miserable man...\
name ""
gosub *kumo_a7



*kumo_onedari5

gosub *onedari_syori
skillcount1 3060
name $name
>Hahaha, you want me to eat you?@
>Wrapped tightly in my silk, you want to be nothing but my prey?\
>Alright... I'll eat you nice and slowly...\
name ""
name "Luka"
>........\
name ""
>Ruled by the desire to be eaten, I surrender to the Spider.@
>From now on, I'll let her eat me...\
mov %viclose,2:gosub *lose
mov %2521,%2521+1:if %2521=1 mov %count_koenemy,%count_koenemy+1
if %2521>%count_most mov %count_most,%2521:mov $count_mostname,$name
count 33,11
mov $bad1," Wanting to be eaten, Luka surrenders to the Spider Girl."
mov $bad2,""
mov %kousan,4
goto *kumo_hb



*kumo_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\kumo_bk05.bmp",0,0
gosub *syasei2
>Massaged by the Spider Girl's eight legs, Luka ejaculates.\
mov %viclose,1:gosub *lose
mov %2521,%2521+1:if %2521=1 mov %count_koenemy,%count_koenemy+1
if %2521>%count_most mov %count_most,%2521:mov $count_mostname,$name
count 28,11
mov $bad1," Luka succumbs to the Spider Girl's eight leg massage."
mov $bad2," After that, Luka is eaten by the Spider Girl..."
gosub *face2
name $name
>Letting it out that easily...?@
>Such a pathetic man.@> Now, it's time to eat...\
name ""
goto *kumo_hb



*kumo_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\kumo_ct03.bmp",0,0
gosub *syasei2
>With his penis wound up in the Spider Girl's thread, Luka is forced to ejaculate.\
mov %viclose,1:gosub *lose
mov %2521,%2521+1:if %2521=1 mov %count_koenemy,%count_koenemy+1
if %2521>%count_most mov %count_most,%2521:mov $count_mostname,$name
count 20,11
mov $bad1," Luka succumbs to the Spider Girl's winding silk on his penis."
mov $bad2," After that, Luka is eaten by the Spider Girl..."
lsp 690,":a;chara\kumo_ct04.bmp",0,0
gosub *face2
name $name
>Letting it out that easily...?@
>Such a pathetic man.@> Now, it's time to eat...\
name ""
goto *kumo_hb



*kumo_h3

mov %ikigoe,3:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\kumo_bk03.bmp",0,0
gosub *syasei2
>Still having his body wound up, Luka accidentally ejaculates.\
mov %viclose,1:gosub *lose
mov %2521,%2521+1:if %2521=1 mov %count_koenemy,%count_koenemy+1
if %2521>%count_most mov %count_most,%2521:mov $count_mostname,$name
count 20,11
mov %count_bouhatu,%count_bouhatu+1
mov $bad1," Luka succumbs to the Spider Girl's body wrap."
mov $bad2," After that, Luka is eaten by the Spider Girl..."
gosub *face2
name $name
>I was still rolling you up... You let it out so early.@
>Such a pathetic man.@> Now, it's time to eat...\
name ""
goto *kumo_hb



*kumo_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":c;chara\kumo_ha2.bmp",0,0
gosub *syasei2
>Squeezed insider her lower entrance, Luka is forced to ejaculate.\
mov %viclose,1:gosub *lose
mov %2521,%2521+1:if %2521=1 mov %count_koenemy,%count_koenemy+1
if %2521>%count_most mov %count_most,%2521:mov $count_mostname,$name
count 2,3
mov $bad1," Luka succumbs to the Spider Girl's forced violation."
mov $bad2," Stuck in the Spider Girl's web for the rest of his life, Luka continually feeds her his semen..."
name $name
>Hehe... Did it really feel that good?@
>I want more of your semen...\
name ""
goto *kumo_ha



*kumo_ha

if %2807=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2807,1
name "Luka"
>Ahii!\
name ""
mov %hseanwave,19:hseanwave
cspl 690,700
lsp 700,":c;chara\kumo_ha3.bmp",0,0:print 10,1500
>The insides of the Spider Girl's lower mouth suddenly start to wriggle.\
>As if covered with bumps and mucus, every movement rubs me all over.\
name $name
>Feels good, doesn't it?@
>Let it all out...\
name ""
name "Luka"
>Hau! Haaa!\
name ""
>With her slimy walls wriggling around, the bumps inside of her lower mouth rub into me as the Spider Girl starts to move her abdomen up and down.\
name $name
>Haha, such pitiful prey.\
name ""
>Watching me writhe in agony, the Spider Girl gives a sadistic smile.@
>Squeezing out the semen of her prey, she's immersed in joy watching me struggle.\
name $name
>Hahaha.@
>I'll wrap my silk around you inside of me...\
name ""
>Suddenly, the Spider Girl starts to shoot webbing inside of her hole, covering my penis in a soft, sticky silk.\
name "Luka"
>Auuu... The silk...@
>So soft and sticky...\
name ""
>The sticky string wrapping around me slowly starts to tighten as she covers more of me.\
>The bizarre stimulation quickly causes me to yield to the pleasure.\
name "Luka"
>Au! Aaaa!\
name ""
gosub *syasei1
lsp 700,":c;chara\kumo_ha5.bmp",0,0
gosub *syasei2
>Still stuck in her spinneret, the spider silk wrapped around me felt amazing.\
name $name
>Fufu... You seem so weak to this.@
>Do you like my sticky threads that much?\
name ""
name "Luka"
>Ahii... Stop...\
name ""
>As I beg for her to stop, the Spider Girl starts to shoot more of her sticky silk over me.\
>Wrapping around my dick even tighter, the pleasure felt like it was making me melt.\
name "Luka"
>Aah....\
name ""
>Even though my penis is being wrapped in her silk, the feeling from her rough walls doesn't weaken at all.\
>In fact, every bump and crease inside of her has their feelings magnified.\
name "Luka"
>Inside you... Amazing... Too good...\
name ""
name $name
>Hahaha, shoot out more.@
>I'll suck up all your semen, and make it my food...\
name ""
>Inside of her spinneret, she continues to tighten her sticky silk around me, while moving her waist up and down.\
>The overpowering stimulation from so many different methods quickly sends me over the edge again.\
name "Luka"
>Auuu.. Coming again!@
>Ahhhh!\
name ""
gosub *syasei1
lsp 700,":c;chara\kumo_ha6.bmp",0,0
gosub *syasei2
>I explode inside the Spider Girl again.@
>For some reason, the orgasm gave me a strange sense of calm.\
name $name
>Aha, you let out a lot again...@
>Your semen is very delicious...\
>Eating you would be too wasteful...@
>Instead, I'll keep you here and let you produce more semen for me.\
name ""
name "Luka"
>Faaa!\
name ""
>The Spider Girl suddenly contracts her hole, and forces my tip to rub against one of her bumps.\
>The sudden pleasure forces me over the edge instantly.@
gosub *syasei1:gosub *syasei2
>Toyed with by the Spider Girl, I explode in her again.\
name $name
>Haha, let out more!@
>You're my prey until you die, after all.\
>With no rest, I'll keep squeezing out your semen over and over.@
>Fufu... Are you excited for it?\
name ""
name "Luka"
>Aaaa....\
name ""
>While feeling ecstasy, my consciousness slowly fades.\
>There's no escape from this web...@
>Stuck as her semen slave, I'll be forced to ejaculate for her until I die.\
>Even while crying from the tsunami of pleasure, she forces me to come over and over again.\
gosub *anten
mov %hseanwave,0:hseanwave
>........\
goto *badend



*kumo_hb

if %2808=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2808,1
name "Luka"
if %kousan<4 mov $sel1,"Hiii..."
if %kousan=4 mov $sel1,"Aaa..."
eng $sel1:$sel6\
name ""
dwave 1,"se\ero_makituki3.ogg"
cspl 690,700
bg "chara\kumo_hb1.bmp",10,1500
>As I tremble, the Spider Girl quickly covers every part of my body with her sticky silk.\
>Preparing me to be eaten, she completely wraps me up.\
name $name
>Us spiders don't eat our prey like other monsters...@
>We use external digestion to devour our prey...\
>Hey... How would you like me to eat you?\
name ""
>The Spider Girl laughs as she looks at my face, stuck in the web.\
name $name
>How about if I bite you in the neck, and inject you with my sweet pleasure venom...\
>Then your body will slowly melt from the inside...@
>Leaving only your skin, your meat will be all syrupy...\
>Then I'll quickly slurp up everything that's left...@
>It will feel amazing, so get ready...\
name ""
name "Luka"
if %kousan<4 mov $sel1,"Hii! No! Stop!"
if %kousan=4 mov $sel1,"Aaa...."
eng $sel1:$sel6\
name ""
>The Spider Girl slowly moves to my neck while giving me a sadistic smile.\
if %hosyoku_cut=1 goto *hosyoku_cut
name $name
>Fufu... Now for the venom...\
bg "chara\kumo_hb2.bmp",10,1500
>*Bite*\
name ""
name "Luka"
if %kousan<4 mov $sel1,"Hiii!"
if %kousan=4 mov $sel1,"Faaaa!"
eng $sel1:$sel6\
name ""
>There was only a slight pain in my neck.@
>It was quickly replaced by a sweet pleasure that started to flow through my body.\
name "Luka"
>Aaa...\
name ""
name $name
>Doesn't it feel amazing?@
>My venom is inside of you now...\
>There's nothing left but to be melted from the inside...\
name ""
name "Luka"
if %kousan<4 mov $sel1,"N...No!"
if %kousan=4 mov $sel1,"Aaaa...."
eng $sel1:$sel6\
name ""
>The pleasure from my neck slowly spreads through my body.@
>It starts to fill me with an odd sense of peace.\
>The horror at my body being digested from the inside is slowly being overwritten by ecstasy.\
>Even that is simply a response to her venom...\
name "Luka"
>Aaaa... My body is so warm...\
name ""
>The feeling of my body being melted is bringing pleasure to my body...\
name $name
>Everyone hates it at first, but their faces always become so happy...@
>Just like you right now, Hahaha!\
name ""
name "Luka"
>Hauuu....\
name ""
name $name
>My sweet venom is moving through your body right now, slowly digesting you.@
>Are you happy that you're being melted away?\
name ""
name "Luka"
>Faaa....\
name ""
>My fear completely gone, pleasure is all I can feel.@
>My warm body is wrapped in ecstasy while slowly melting away.\
name $name
>...Now, it's time to eat.@
>Like this, I'll suck up your melting body...\
name ""
name "Luka"
>Aaa... Ahi!\
name ""
mov %hseanvoice,3:hseanvoice
bg "chara\kumo_hb3.bmp",10,1500
name $name
>Mmmm...@>*Slurp*\
name ""
name "Luka"
>Faaa!\
name ""
>As the Spider Girl starts to suck up my body, the pleasure shoots fireworks off in my head.\
>Between my dissolving groin, semen starts to leak out.\
name $name
>Hahaha, you're coming while being eaten.@> What a pathetic man.\
name ""
name "Luka"
>Ah... Hiii...\
name ""
>My entire existence is being absorbed by the Spider Girl.\
>Yet for some reason, I feel so happy.@
>Pleasure filling my body, I feel as if I'm in paradise.\
>Being eaten by a monster feels this good...\
name $name
>Fufu... Stuck in your trance, be sucked away...\
>Mmmm...@>*Slurp*@>*Suck*\
name ""
name "Luka"
>Aaaaa!\
name ""
>My consciousness starts to fade as I hear the Spider Girl sucking up my body with loud slurping noises.\
>Being made into the Spider Girl's nourishment, I feel happy at being able to be one with her.\
>Filled with ecstasy to the very end, the last of my body is sucked up by the Spider Girl.\
name $name
>Mmm... *Slurp*\
name ""
>Sucked to the last drop, I've become nothing but nutrients for the Spider Girl.\
mov %hseanvoice,0:hseanvoice
bg "chara\kumo_hb4.bmp",10,1500
name $name
>Haha... Thanks for the meal.\
name ""
>Having finished devouring her prey, the Spider Girl laughs.\
gosub *anten
>.........\
goto *badend



*mimic_start

mov $name,"Mimic"
mov $name2,"Mimic"
mov $lavel,"mimic"
mov $tatie1,"mimic_st01"
mov $tatie2,"mimic_st01"
mov $tatie3,"mimic_st03"
mov $tatie4,"mimic_st01"
mov $haikei,"bg033"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,500
if %nanido=2 mov %max_enemylife,750
if %nanido=3 mov %max_enemylife,1000
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,100
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"Luka can't break free of the Mimic!"
mov $mogaku_anno2,"Luka broke free of the Mimic!"
mov $mogaku_anno3,"Luka can't attack while being held by the Mimic!"
mov $mogaku_sel1,"I'll drag you into my chest..."
mov $mogaku_sel2,"Hahaha... I won't let go!"
mov $mogaku_sel3,"What are you doing? How pathetic..."
mov $mogaku_sel4,"Ahhh, it's useless even if you struggle. "
mov $mogaku_sel5,"I'll eat you just like this. "
mov $mogaku_dassyutu1,"Why did you run..."
mov $mogaku_dassyutu2,""
mov %end_n,1
mov %zmonster_x,-300
name "Luka"
>Uwa!\
name ""
>A Mimic jumps out of the box and attacks!@
mov $tatie1,"mimic_st11"
mov $tatie2,"mimic_st11"
mov $tatie3,"mimic_st11"
mov $tatie4,"mimic_st21"
gosub *face1
mov %counter,1
>...Or so I thought. She suddenly returns to her box.\
name "Luka"
>...Huh?\
name ""
name $name
>.........\
name ""
>What should I do...?@
>If she stays like that, I can just go around her.\
name $name
>...Once you show me your back, I'm going to eat you.\
name ""
name "Luka"
>That wouldn't be good...\
name ""
>It looks like I have no choice but to fight.\
name "Luka"
>Alright, here I go!\
name ""
name $name
>.........\
name ""
>As I pull out my sword, the Mimic stays in her box...\
goto *common_main



*mimic_v

gosub *face3
name $name
>How mean!\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Mimic turns into a small toy box!\
mov %viclose,1:gosub *victory
mov %getexp,500:gosub *lvup
mov %2222,1
goto *sean0079



*mimic_kousan

gosub *kousan_syori
>Luka yields to the promise of pleasure, ending his resistance!\
lsp 700,":a;chara\mimic_st01.bmp",0,0:print 10,500
name $name
>Hmm... So you want me to play with you however I like?@
>I'll enjoy eating a pervert like you...\
name ""
gosub *mimic_a2
goto *mimic_a



*mimic_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *mimic_kousan
if %cmd1=16 goto *mimic_onedari
if %cmd1=17 goto *common_skill
goto *mimic_main



*mimic_a

if %kousoku=1 gosub *mimic_a3:goto *common_main
if %kousoku=2 gosub *mimic_a4:goto *common_main
if %kousoku=3 gosub *mimic_a5:goto *common_main
if %counter>0 add %counter,1
if %counter>2 gosub *mimic_x2:goto *common_main
if %counter>0 gosub *mimic_a7:goto *common_main
if %kousan=1 skip 3
mov %hanyo2,%hanyo2+1
if %hanyo2>3 gosub *mimic_x1:goto *common_main
rnd2 %ransu,1,3
if %ransu<3 gosub *mimic_a1:goto *common_main
if %ransu=3 && %owaza_count1a>3 gosub *mimic_a2:goto *common_main
skip -3



*mimic_a1

add %stack,1
name $name
>.........\
name ""
>The Mimic doesn't move.\
sub %stack,1
return



*mimic_a2

add %stack,1
skillcount1 3061
name $name
>I'll swallow you...\
name ""
skillname "Slow Swallow"
dwave 1,"se\ero_slime3.ogg"
>The viscous mucus of the Mimic shoots out and wraps around Luka, pulling him into the box!
if %nanido<2 damage 23,25
if %nanido=2 damage 34,37
if %nanido=3 damage 46,50
mov %kousoku,1:gosub *status_print
>Luka is being drawn to the chest!\
skillname ""
if %mylife=0 sub %stack,1:return *mimic_h2
name $name
>At this rate, I'm going to pull you in...@
>I'll eat you nice and slowly...\
name ""
if %kousan>0 sub %stack,1:return
name "Luka"
>Ahhh!\
name ""
>If I don't get out of this, she'll pull me in!\
if %nanido<2 mov %genmogaku,2
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,2
sub %stack,1
return



*mimic_a3

add %stack,1
skillcount1 3061
name $name
>Fufu... Scared?@
>Or are you excited?\
name ""
skillname "Slow Swallow"
dwave 1,"se\ero_slime3.ogg"
>The viscous mucus from the Mimic's chest continues dragging Luka towards her!
if %nanido<2 damage 23,25
if %nanido=2 damage 34,37
if %nanido=3 damage 46,50
mov %kousoku,2
skillname ""
if %mylife=0 sub %stack,1:return *mimic_h2
name $name
>I'll play with you plenty... Get ready!\
name ""
sub %stack,1
return



*mimic_a4

add %stack,1
skillcount1 3061
name $name
>Hahaha.\
name ""
skillname "Slow Swallow"
dwave 1,"se\ero_slime3.ogg"
>The viscous mucus from the Mimic's chest continues dragging Luka towards her!
if %nanido<2 damage 23,25
if %nanido=2 damage 34,37
if %nanido=3 damage 46,50
mov %kousoku,3
skillname ""
if %mylife=0 sub %stack,1:return *mimic_h2
name $name
>You're almost here...@
>Come on, I'll play with you...\
name ""
sub %stack,1
return



*mimic_a5

add %stack,1
skillcount1 3061
name $name
>Come inside...\
name ""
skillname "Slow Swallow"
dwave 1,"se\ero_slime3.ogg"
>The viscous mucus from the Mimic's chest continues dragging Luka towards her!
if %nanido<2 damage 23,25
if %nanido=2 damage 34,37
if %nanido=3 damage 46,50
>Luka is pulled into the chest!\
mov %kousoku,4:mov %genmogaku,100
skillname ""
if %mylife=0 sub %stack,1:return *mimic_h2
lsp 700,":a;chara\mimic_st21.bmp",0,0:print 10,500
name "Luka"
>Ahiii!\
name ""
>The mucus finally pulls me into the box, and the Mimic grabs me!\
name $name
>Hahaha... Time to play with you until you're empty. \
name ""
dwave 1,"se\ero_pyu1.ogg"
lsp 690,":a;chara\mimic_ct01.bmp",0,0:print 10,500
>The Mimic starts to lick Luka with her tongue!
damage 15,18
skillname ""
if %mylife=0 sub %stack,1:return *mimic_h3
sub %stack,1
goto *mimic_a6



*mimic_a6

add %stack,1
>Luka is caught by the Mimic!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Haha, let out a pathetic voice!":mov $sel2,"The Mimic licks Luka with her tongue!"
if %ransu=2 mov $sel1,"You won't be able to endure this. ":mov $sel2,"The Mimic licks Luka with her tongue!"
if %ransu=3 mov $sel1,"It feels good, doesn't it? Let it out...":mov $sel2,"The Mimic gently licks Luka's penis!"
if %ransu=4 mov $sel1,"Does your penis feel good?":mov $sel2,"The Mimic wraps her tongue around Luka's penis and squeezes!"
if %ransu=5 mov $sel1,"I'll play with you some more. ":mov $sel2,"The Mimic licks Luka's penis all over!"
name $name
eng $sel1:$sel6\
name ""
dwave 1,"se\ero_pyu2.ogg"
eng $sel2:$sel6
mov %damage_kotei,1
damage 15,18
skillname ""
if %mylife=0 sub %stack,1:return *mimic_h3
sub %stack,1
goto *mimic_a6



*mimic_x1

add %stack,1
if %kousan=2 skip 4
name $name
>........\
name ""
skillname "Withdrawal"
mov $tatie1,"mimic_st11"
mov $tatie2,"mimic_st11"
mov $tatie3,"mimic_st11"
mov $tatie4,"mimic_st21"
gosub *face1
>The Mimic went back inside her box...\
skillname ""
mov %counter,1
sub %stack,1
return



*mimic_a7

add %stack,1
name $name
>........\
name ""
skillname "Withdrawal"
>The Mimic is still inside the box...\
skillname ""
sub %stack,1
return



*mimic_x2

add %stack,1
if %kousan=2 skip 4
name $name
>...Not going to attack?\
name ""
mov $tatie1,"mimic_st01"
mov $tatie2,"mimic_st01"
mov $tatie3,"mimic_st03"
mov $tatie4,"mimic_st01"
gosub *face1
>The Mimic came out of her box!\
mov %counter,0
mov %hanyo2,0
sub %stack,1
return



*mimic_counter

add %stack,1
mov %counter,0
skillcount1 3062
name $name
>Hahaha, time to eat!\
name ""
skillname "Swallow"
lsp 700,":a;chara\mimic_st01.bmp",0,0:print 10,500
dwave 1,"se\ero_slime3.ogg"
>The Mimic opens her mouth and swallows Luka!@
mov $tatie4,"mimic_st21"
mov %kousoku,5:mov %genmogaku,100
gosub *status_print
>Luka was swallowed!\
skillname ""
if %con_hbgm=0 mov %music,20:bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
name $name
>Hahaha, I caught you! @
>Hey, hey, what are you going to do?@>There's no escape anymore.\
name ""
name "Luka"
>Hiii!\
name ""
>The mucus inside of the Mimic quickly dissolves my clothes, and covers my entire body.\
name ""
name $name
>Haha... That's my digestive juice.@
>What are you going to do now... You're covered in it.\
>It will digest you without causing any pain...@
>Like this, I'll slowly eat you. Hahaha!\
name ""
name "Luka"
>Hii! Something like this...\
name ""
>Her warm digestive juices covering my body start to make my body feel hot.\
skillname "Digestion"
dwave 1,"se\ero_slime3.ogg"
>Covered in her juices, Luka is slowly being digested!
mov %damage_kotei,1
damage 29,31
skillname ""
if %mylife=0 sub %stack,1:return *mimic_h1
if %mylife<32 sub %stack,1:goto *mimic_a9
name "Luka"
>No! Help me!\
name ""
name $name
>Nobody's going to help you! Hahaha.\
name ""
>The Mimic is tightly holding onto me, preventing me from escaping.\
name $name
>Ah... Your penis is getting hard.@
>Getting erect while being digested...@
>Do the digestive juices feel that good?\
>Feeling good while being digested... How pathetic! \
name ""
name "Luka"
>Faaa...\
name ""
lsp 690,":a;chara\mimic_ct11.bmp",0,0:print 10,500
>The Mimic's digestive fluids cover my penis. The juices viscosity was so thick, it was as if my penis was covered in slime.\
name $name
>Haha, your penis is feeling so good while being digested.@
>Let it out... I'll let you feel good right to the end. \
name ""
name "Luka"
>Hauuu...\
name ""
>The thick juices moving around me massage me all over, while a strange warm pleasure is covering my entire body.\
name $name
>For your last present...@
>I'll hurry up and make you come.\
>If you don't want to be digested...@
>Just endure it without ejaculating!\
name ""
skillname "Digestion"
dwave 1,"se\ero_slime3.ogg"
>The digestive juices give a strange pleasure to Luka!
mov %damage_kotei,1
damage 29,31
skillname ""
if %mylife<32 sub %stack,1:goto *mimic_a9
name "Luka"
>Uuuu...\
name ""
>Clenching my teeth, I endure the urge to come.\
name $name
>Hahaha, you endured it?@
>Good boy... Keep it up.@
>But... I'm not done yet!\
name ""
skillname "Digestion"
dwave 1,"se\ero_slime3.ogg"
>The digestive juices give a strange pleasure to Luka!
mov %damage_kotei,1
damage 29,31
skillname ""
if %mylife<32 sub %stack,1:goto *mimic_a9
name "Luka"
>Aaaa!\
name ""
name $name
>Haha... Are you at your limit?\
>You won't last at this rate...@
>Covered in digestive fluids, you'll ejaculate...\
>Your most important part right here...@
>Standing erect and feeling good while it melts away...\
>Hey, hey... Aren't you going to beg?@
>"Please stop!" "Help me!" or something?\
name ""
name "Luka"
>Stop... I'm begging you, please...\
name ""
name $name
>No way! ...Hahahaha!@
>I'll melt you away and eat you just like that. \
name ""
skillname "Digestion"
dwave 1,"se\ero_slime3.ogg"
>The digestive juices give a strange pleasure to Luka!
mov %damage_kotei,1
damage 29,31
skillname ""
if %mylife<32 sub %stack,1:goto *mimic_a9
sub %stack,1
goto *mimic_a8



*mimic_a8

add %stack,1
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Good boy... Keep it up."
if %ransu=2 mov $sel1,"I'll melt you away."
if %ransu=3 mov $sel1,"I'll eat you just like that."
if %ransu=4 mov $sel1,"You're just going to be my nutrients soon."
if %ransu=5 mov $sel1,"You won't last at this rate..."
name $name
eng $sel1:$sel6\
name ""
skillname "Digestion"
dwave 1,"se\ero_slime3.ogg"
>The digestive juices give a strange pleasure to Luka!
mov %damage_kotei,1
damage 29,31
skillname ""
if %mylife<32 sub %stack,1:goto *mimic_a9
sub %stack,1
goto *mimic_a8



*mimic_a9

add %stack,1
name "Luka"
>Faaa....\
name ""
name $name
>You're about to come...@
>It's too bad... You tried so hard, too.\
>Now I'll dissolve you...@
>You're just going to be my nutrients soon.\
>Have you said your final goodbyes?@
>It's time to eat...\
name ""
skillname "Digestion"
dwave 1,"se\ero_slime3.ogg"
>The digestive juices give a strange pleasure to Luka!
mov %damage_kotei,2
damage 31,31
skillname ""
sub %stack,1
return *mimic_h1



*mimic_onedari

mov $list1,"Slow Swallow"
if %3061>0 mov %list_num1,1
mov $list2,"Swallow"
if %3062>0 mov %list_num2,1
gosub *cmd_onedari
if %cmd1=11 goto *mimic_onedari1
if %cmd1=12 goto *mimic_onedari2
if %cmd1=-1 goto *mimic_main
goto *mimic_onedari



*mimic_onedari1

gosub *onedari_syori_k
name $name
>Hahaha, you want me to swallow you?@
>What a strange guy...\
name ""
if %counter>0 gosub *mimic_x2
if %kousoku=0 gosub *mimic_a2
if %kousoku=1 gosub *mimic_a3
if %kousoku=2 gosub *mimic_a4
if %kousoku=3 gosub *mimic_a5



*mimic_onedari2

gosub *onedari_syori
name $name
>Hahaha, you want me to eat you?@
>What a strange guy...\
name ""
if %counter=0 gosub *mimic_x1
mov %kousan,4
gosub *mimic_counter



*mimic_h1

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\mimic_st22.bmp",0,0
lsp 690,":a;chara\mimic_ct12.bmp",0,0
gosub *syasei2
>Unable to endure the thick digestive juices, Luka ejaculates!\
mov %viclose,1:gosub *lose
mov %2522,%2522+1:if %2522=1 mov %count_koenemy,%count_koenemy+1
if %2522>%count_most mov %count_most,%2522:mov $count_mostname,$name
count 33,11
mov $bad1," Swallowed by the Mimic, Luka succumbs to the Mimic's digestive juices."
mov $bad2," After that, Luka was eaten by the Mimic."
name $name
>You came...@
>Did you enjoy your last pleasure?@
>Now it's time for my fun...\
name ""
goto *mimic_hb



*mimic_h2

mov %ikigoe,3:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\mimic_bk01.bmp",0,0
gosub *syasei2
>While being dragged by the Mimic's mucus, Luka ejaculates on accident.\
mov %viclose,1:gosub *lose
mov %2522,%2522+1:if %2522=1 mov %count_koenemy,%count_koenemy+1
if %2522>%count_most mov %count_most,%2522:mov $count_mostname,$name
count 11,5
mov %count_bouhatu,%count_bouhatu+1
mov $bad1," Luka explodes on accident while being dragged by the Mimic."
mov $bad2," Captured by the Mimic, Luka was made into her toy until his death."
name $name
>Eh... You came?@
>You weren't in here yet...@
>This time I'll do it carefully in here...\
name ""
name "Luka"
>Hii!\
name ""
cspl 690,699
lsp 700,":a;chara\mimic_st22.bmp",0,0:print 10,500
>The Mimic quickly drags me into the chest and wraps her tongue around me!\
goto *mimic_ha



*mimic_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\mimic_st22.bmp",0,0
lsp 690,":a;chara\mimic_ct02.bmp",0,0
gosub *syasei2
>With the Mimic licking him, Luka succumbs to the pleasure!\
mov %viclose,1:gosub *lose
mov %2522,%2522+1:if %2522=1 mov %count_koenemy,%count_koenemy+1
if %2522>%count_most mov %count_most,%2522:mov $count_mostname,$name
count 4,5
mov $bad1," Swallowed by the Mimic, Luka succumbs to her tongue."
mov $bad2," Captured by the Mimic, Luka was made into her toy until his death."
name $name
>Hahaha, you let it out. @
>Being played with, you came in such a pathetic way.\
>Was it good?@
>Leaking even though you tried to endure so hard?@
>But... I want to play with you even more.\
name ""
goto *mimic_ha



*mimic_ha

mov $end_go,"sean0077a"
if %2809=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2809,1
mov %hseanvoice,1:hseanvoice
cspl 690,699
lsp 690,":a;chara\mimic_ct03.bmp",0,0:print 10,500
name "Luka"
>Faaa!\
name ""
>Immediately after I ejaculate, the Mimic starts licking my penis.\
name $name
>Feels good, right?@
>I love it when a man ejaculates...@
>So let out more!\
name ""
name "Luka"
>Ahiii!\
name ""
>The Mimic picks at my penis with her tongue, licking and poking every part of my penis.\
>From the root to the tip, she licks and rubs every part of my dick.\
name "Luka"
>Auu... Stop...\
name ""
name $name
>Hahaha... Do you really want me to stop?@
>Don't you actually want more?\
>You really want me to squeeze your sensitive penis until you're dry, right?\
name ""
name "Luka"
>That... Auu...\
name ""
>The Mimic suddenly sticks her tongue into my urethral opening, causing my hips to unconsciously push forward.\
>Seeing my reaction, the Mimic looks at me with a sadistic smile.\
name $name
>You want to be made into a toy just like this, right?@
>Until I get bored with you, I'll play with you endlessly!\
name ""
>With a smirk, the Mimic starts to wrap her elastic tongue around my penis.\
>Wrapped around my penis, the Mimic starts to squeeze me.@
>The intense stimulation quickly brings me to the edge.\
name "Luka"
>Auu... I'm coming again...\
name ""
name $name
>Haha... Let it out for your second time!\
name ""
>Her tongue wrapped around my penis tightens as my head goes white.\
name "Luka"
>Aaaa!\
name ""
gosub *syasei1:gosub *syasei2
>Played with by her long tongue, I quickly come again.\
>The Mimic licks all of the semen I shot off, her tongue covered in my dirty white seed.\
mov %hseanvoice,0:hseanvoice
name $name
>Hahaha, come again.@
>It's not like you have a choice, though. \
>There's no helping it...@
>I defeated you after all.\
>As my victim, you're nothing but my food now.\
name ""
mov %hseanvoice,1:hseanvoice
>Having just ejaculated again, her tongue on my sensitive penis was bringing sharp stimulation with every lick.\
name "Luka"
>Hauuu!\
name ""
>My body twitches at the sharp pleasure.@
>Her tongue licking me all over so soon after coming, it was too intense.\
name $name
>Hahaha... Is it good?@
>Or is it painful?@>Or both?\
>That's right, isn't it...@
>Right after a man orgasms, it gets so sensitive... \
name ""
name "Luka"
>Aaaa!\
name ""
>My body writhes as she tortures me with her tongue.\
>The mucus that dragged me into her chest continues to be wrapped around me, preventing me from moving.\
>My body stuck in her mucus, with her tongue all over my penis, it feels like she's toying with my entire existence.\
name $name
>To celebrate you becoming my toy, I'll suck every ounce of semen out of you.@
>I'll be sure to get everything, so get ready for it! \
name ""
name "Luka"
>St... Ahii!\
name ""
>The Mimic licks my tip violently as I start to protest, cutting my plea short.\
>After she finishes licking my tip, she coils her tongue around my penis and tightens harder than before.\
name "Luka"
>Aaaa!\
name ""
>The stimulation from her tongue coiled around me is overpowering all of my other senses as I struggle to endure the rising desire to ejaculate.\
name $name
>I'm wrapped all the way around your dick...@
>I'll keep it up... Just let it out once it's too much for you...\
name ""
name "Luka"
>Aaa... Amazing...\
name ""
mov %hseanvoice,2:hseanvoice
>Caught in her tongue and unable to move, I can do nothing but take the forced pleasure.\
>Just feeling her slimy tongue on me is too much to take...\
name "Luka"
>Aaaa!\
name ""
>Quickly brought to another orgasm, my hips shake pitifully.\
gosub *syasei1:gosub *syasei2
>Twitching pathetically, I shoot more proof of my surrender onto the Mimic's tongue.\
>Even after I ejaculate, the Mimic doesn't stop licking me for a second.\
name "Luka"
>Auu...@> Amazing... Too good...\
name ""
name $name
>Caught by a monster and letting out so much...\
>Hey, aren't you ashamed?@
>I'm just playing with your most important part... Are you feeling miserable?\
name ""
name "Luka"
>Aaaa....@> Aaaaa!\
name ""
>Grinning at my face, the Mimic licks the tip of my penis.\
name "Luka"
>Hyaaa!\
name ""
name $name
>Hahaha... Let out more!\
name ""
>The Mimic suddenly contracts her tongue wrapped around me, forcing me instantly over the edge again.\
name "Luka"
>Ahi!@> Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>The Mimic continues to play with me, forcing me to ejaculate over and over.\
>My body trembling pitifully, she continues to torment me even as I scream in agony.\
>All the while, the Mimic just laughs at me with a sadistic smile on her face.\
name $name
>Hahaha... Until I get tired of you, I won't eat you.@
>I'll keep you as my toy for a looooong looooong time, until you break.\
>First, I'll break your penis with my tongue...\
name ""
name "Luka"
>Aaaa!\
name ""
gosub *syasei1:gosub *syasei2
>The merciless rape continues, tearing my heart and soul apart.@
>I'm stuck as her toy like this until my death...\
>Thus, my adventure ends in this horrible way...\
gosub *anten
mov %hseanvoice,0:hseanvoice
>.........\
goto *badend



*mimic_hb

mov $end_go,"sean0077a"
if %2810=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2810,1
cspl 690,699
lsp 690,":a;chara\mimic_ct12.bmp",0,0:print 10,500
name "Luka"
>Hii... Aaaaa!\
name ""
if %hosyoku_cut=1 goto *hosyoku_cut
mov %hseanwave,18:hseanwave
>Covered in digestive juices, the viscous fluid rubs me with every motion, sending me over the edge even while being slowly digested...\
gosub *syasei1
lsp 690,":a;chara\mimic_ct13.bmp",0,0
gosub *syasei2
name "Luka"
>Hyaaa...@> Aaa....\
name ""
>Slowly being digested while my dick is massaged by the juices is too overwhelming to keep my sanity through.\
name "Luka"
>Aaaaa.... Hyaaaa!\
name ""
gosub *syasei1
lsp 690,":a;chara\mimic_ct14.bmp",0,0
gosub *syasei2
name $name
>Hahaha... Did I break you?@
>Coming so much while your body is melting. \
name ""
>With my body slowly dissolving, the insane pleasure overpowers all of my other senses as I start to lose feeling in my body.\
name "Luka"
>Hyaaa!@> Ha... Haaaa!\
name ""
>My body burning hot in the ecstasy, I can only feel the pleasure wash over me.\
name $name
>Your body is being digested by me. You know that right?@
>Your whole body dissolving... It feels great, doesn't it? \
name "Luka"
>Aaaaa!\
name ""
>My consciousness starts to fade in the overwhelming pleasure.\
>Overpowered by this fake pleasure, the Mimic is slowly eating me...\
name $name
>Hahaha, I'm eating you now. @
>You tried so hard to stay alive up until now, too. Too bad, huh? \
>Well? How does it feel?@
>Being nothing but my food. \
name ""
name "Luka"
>A...Aaaa....\
name ""
>Feeling so good while being eaten by this Mimic...\
>Even if I feel such horror at the idea of being eaten...@
>My body is rejoicing in the pleasure.\
>Being eaten alive, I'm drowning in pleasure.\
name $name
>Feeling so good while being eaten... You were a pathetic man. \
name ""
name "Luka"
>A....aa....\
name ""
>My body completely melts as the Mimic slowly absorbs me.\
>My body and soul are absorbed by the Mimic...@
>But it felt so good...\
>.........\
gosub *anten
mov %hseanwave,0:hseanwave
name $name
>Hahaha. Thanks for the meal. \
name ""
>.........\
goto *badend



*nanabi_start

mov $name,"Nanabi"
mov $name2,"Nanabi"
mov $lavel,"nanabi"
mov $tatie1,"nanabi_st01"
mov $tatie2,"nanabi_st02"
mov $tatie3,"nanabi_st03"
mov $tatie4,"nanabi_st02"
mov $haikei,"bg034"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,2900
if %nanido=2 mov %max_enemylife,3000
if %nanido=3 mov %max_enemylife,3100
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %henkahp1,2100
if %nanido=0 mov %henkahp1,1
mov %damage_keigen,100
mov %kaihi,95
mov %music,2
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"Luka can't escape from Nanabi's tails!"
mov $mogaku_anno2,"Luka breaks free!"
mov $mogaku_anno3,"Luka is unable to move!"
mov $mogaku_sel1,"You can't escape like that..."
mov $mogaku_sel2,"Fufu... Useless."
mov $mogaku_sel3,"Do you think I would let you go that easily...?"
mov $mogaku_sel4,"You haven't given in yet... I wonder how long that will last."
mov $mogaku_sel5,"You're still too weak to challenge me..."
mov $mogaku_dassyutu1,"You struggled harder than I thought..."
mov $mogaku_dassyutu2,"You only have to lay back and be comfortable..."
mov $half_s1,"Now, give up."
mov $half_s2,"If you do, I'll give you pleasure that will send you to heaven."
mov $kiki_s1,"It already seems like you can't endure much more..."
mov $kiki_s2,"Then, let me send you to heaven..."
mov %end_n,2
mov %zmonster_x,-250
mov %tukix,300
name "Luka"
>Guh...!\
name ""
>Shrinking back from her overwhelming presence, I unsheathe my sword.@
>Even if she's powerful, I won't run!\
mov %sinkou,1
mov %hanyo2,1
if %nanido=3 mov %sinkou,2
goto *common_main



*nanabi_v

if %nanido=0 goto *nanabi_v2
name $name
>I won't give you any time to heal!\
name ""
skillname "Hypnotic Eyes"
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
>Nanabi stares at Luka with her magic eyes!\
name "Luka"
>Guh... Sh...it...@
>....Guh....\
name ""
mov %status,3:gosub *status_print
>Luka falls asleep!\
skillname ""
gosub *face2
name $name
>I'll use my tails to force you to come...\
name ""
skillname "Tail Massage"
>The Nanabi's tails shoot out towards Luka!@
wait 500
skillname "Fallen Angel Dance"
dwave 1,"se\bun.ogg"
bg "bg\bg034.bmp",99,700,"system\lngtwave.dll/vwi"
>But Luka quickly dodges it!\
skillname ""
mov $tatie3,"nanabi_st04"
gosub *face3
name $name
>What the...!?\
name ""
name "Luka"
>Alice... You shouldn't eat weeds...@
>*Snore*@>Mmmnn...\
name ""
>Luka is fast asleep!\
name $name
>Was that on accident...!?\
name ""
skillname "Tail Massage"
>The Nanabi's tails shoot out towards Luka!@
wait 500
skillname "Fallen Angel Dance"
dwave 1,"se\bun.ogg"
bg "bg\bg034.bmp",99,700,"system\lngtwave.dll/vwi"
>But Luka quickly dodges it!\
skillname ""
name "Luka"
>*Snort*\
name ""
>Luka is fast asleep!\
name $name
>Are you mocking me!?@
>No... He's definitely asleep...\
name ""
name "Luka"
>Zzzzzzzzzz.@
>Here... Go...\
name ""
skillname "Ninefold Rakshasa"
wait 500
dwave 1,"se\slash3.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
dwave 2,"se\slash3.ogg"
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
dwave 3,"se\slash3.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
dwave 4,"se\slash3.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
dwave 5,"se\slash3.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
dwave 6,"se\slash3.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
dwave 7,"se\slash3.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
csp 2:print 10,1000
>Luka attacks in a deadly dance!\
dwave 1,"se\slash.ogg"
rnd2 %damage,85,95:mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\slash.ogg"
rnd2 %damage,85,95:mov %damage_nobr,1:gosub *enemylife2
textclear
dwave 1,"se\slash.ogg"
rnd2 %damage,85,95:mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\slash.ogg"
rnd2 %damage,85,95:mov %damage_nobr,1:gosub *enemylife2
textclear
dwave 1,"se\slash.ogg"
rnd2 %damage,85,95:mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\slash.ogg"
rnd2 %damage,85,95:mov %damage_nobr,1:gosub *enemylife2
textclear
dwave 1,"se\slash.ogg"
rnd2 %damage,85,95:mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\slash.ogg"
rnd2 %damage,85,95:mov %damage_nobr,1:gosub *enemylife2
textclear
dwave 1,"se\slash.ogg"
rnd2 %damage,85,95:mov %damage_nobr,2:gosub *enemylife2
\
skillname ""
if %enemylife=0 goto *nanabi_v2
name $name
>Kuh... Impossible!@
>It's as if he's an entirely different person!\
>In that case.... How about this!?\
name ""
skillname "Two Moons"
>Two tails shoot out towards Luka!@
wait 500
skillname "Fallen Angel Dance"
dwave 1,"se\bun.ogg"
bg "bg\bg034.bmp",99,700,"system\lngtwave.dll/vwi"
>But Luka quickly dodges it!\
skillname ""
name $name
>What the hell...!?\
name ""
>Luka is fast asleep!\
name ""
name "Luka"
>*Snore*@>So full...\
name ""
skillname "Heavenly Demon Revival"
>Luka accumulates power!\
wait 300
dwave 1,"se\bom2.ogg"
lsp 2,":c;effect\001.bmp",0,0:print 18,1000,"system\mask01.jpg"
csp 2:print 18,500,"system\mask01.jpg"
dwave 1,"se\damage2.ogg"
rnd2 %damage,350,450:gosub *enemylife2
skillname ""
if %enemylife=0 goto *nanabi_v2
name $name
>What's with that power!?@
>If I get hit by that...!\
name ""
skillname "Magic Concentration"
dwave 1,"se\power.ogg"
lsp 700,":a;chara\nanabi_st11.bmp",0,0:print 10,500
>Nanabi starts to accumulate magic!\
>Nanabi continues to accumulate magic!\
>Nanabi finishes accumulating magic!\
skillname ""
name $name
>Take this! My ultimate attack!\
name ""
skillname "Seven Moons"
>Nanabi attacks with all seven tails!\
name "Luka"
>Mmmm...@>Useless...\
name ""
gosub *counter
gosub *face3
skillname "Daystar"
>A dazzling star falls into hell!\
wait 300
dwave 1,"se\bom3.ogg"
lsp 2,":c;effect\002.bmp",0,0:print 18,1000,"system\mask01.jpg"
flushout 1000
csp 2
bg white,10,1000
bg "bg\bg034.bmp",10,1000
textclear
dwave 1,"se\damage2.ogg"
rnd2 %damage,350,450:mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\damage2.ogg"
rnd2 %damage,350,450:mov %damage_nobr,1:gosub *enemylife2
textclear
dwave 1,"se\damage2.ogg"
rnd2 %damage,350,450:mov %damage_nobr,2:gosub *enemylife2
\
skillname ""
goto *nanabi_v2



*nanabi_v2

name $name
>Impossible...@>This...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Nanabi turns into a fox!\
mov %viclose,1:gosub *victory
mov %getexp,1100:gosub *lvup
mov %2223,1
goto *sean0081



*nanabi_kousan

mov $tatie1,"nanabi_st01"
mov $tatie2,"nanabi_st02"
mov $tatie3,"nanabi_st03"
gosub *kousan_syori
>Luka surrenders to the promise of pleasure, ending his resistance!\
gosub *face2
name $name
>...Did you surrender?@
>With my tail, I'll play with you to my heart's content...\
name ""
mov %hanyo2,8
mov %sinkou,2
goto *nanabi_a



*nanabi_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 && %nanido=0 goto *common_attack
if %cmd1=11 && %hanyo3=0 goto *nanabi_attack
if %cmd1=11 && %hanyo3=1 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *nanabi_kousan
if %cmd1=16 goto *nanabi_onedari
if %cmd1=17 goto *common_skill
goto *nanabi_main



*nanabi_attack

gosub *common_attack1
if %enemylife=0 goto *nanabi_v2
if %before_action=3 goto *nanabi_a
name "Luka"
>Kuh... How powerful...\
name ""
>My attack barely had any effect...@
>How many times will I have to attack to beat her...?\
mov %hanyo3,1
goto *nanabi_a



*nanabi_a

if %enemylife<%henkahp1 mov %sinkou,3
if %kousoku=1 gosub *nanabi_a6:goto *common_main
if %sinkou=3 && %hanyo6=0 gosub *nanabi_a8:goto *common_main
if %sinkou=3 && %hanyo6=1 gosub *nanabi_a9:goto *common_main
if %sinkou=3 && %hanyo6=2 gosub *nanabi_a10:goto *common_main
if %sinkou=3 && %hanyo6=3 gosub *nanabi_a11:goto *nanabi_v
;if %kousan>0 && %hanyo2>0 gosub *nanabi_a11										;patch
if %kousan>0 skip 2
mov %hanyo2,%hanyo2+1
if %hanyo2=4 gosub *nanabi_a7:goto *common_main
if %hanyo6=1 gosub *nanabi_a9:goto *common_main
if %hanyo6=2 gosub *nanabi_a10:goto *common_main
if %hanyo6=3 gosub *nanabi_a11:goto *common_main
if %hanyo6=4 gosub *nanabi_a12:goto *common_main
if %hanyo6=5 gosub *nanabi_a13:goto *common_main
rnd2 %ransu,1,5
if %ransu=1 gosub *nanabi_a1:goto *common_main
if %ransu=2 gosub *nanabi_a2:goto *common_main
if %ransu=3 gosub *nanabi_a3:goto *common_main
if %ransu=4 && %sinkou>1 && %owaza_count3a>5 gosub *nanabi_a4:goto *common_main
if %ransu=5 && %sinkou>1 && %owaza_count1a>5 gosub *nanabi_a5:goto *common_main
skip -6



*nanabi_a1

add %stack,1
skillcount1 3065
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll make you feel good with my tail..."
if %ransu=2 mov $sel1,"Does my fluffy tail feel good?"
if %ransu=3 mov $sel1,"Enjoy yourself with my tail..."
name $name
eng $sel1:$sel6\
name ""
skillname "Tail Massage"
dwave 1,"se\umaru.ogg"
if %kousan=2 && %hanyo1=1 skip 3
lsp 690,":a;chara\nanabi_cta01.bmp",450,0:print 10,500
if %kousan=2 mov %hanyo1,1
lsp 690,":a;chara\nanabi_cta02.bmp",450,0:print 10,500
>Nanabi's tail gently massages between Luka's groin!
if %nanido<2 damage 14,18
if %nanido=2 damage 19,22
if %nanido=3 damage 23,29
skillname ""
if %mylife=0 sub %stack,1:return *nanabi_h1
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*nanabi_a2

add %stack,1
skillcount1 3063
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll hold it in my mouth..."
if %ransu=2 mov $sel1,"*Lick* *Suck*"
if %ransu=3 mov $sel1,"Let it all out in my mouth..."
name $name
eng $sel1:$sel6\
name ""
skillname "Fox Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>Nanabi gently sucks on Luka's penis!
if %nanido<2 damage 12,15
if %nanido=2 damage 15,17
if %nanido=3 damage 21,25
skillname ""
if %mylife=0 sub %stack,1:return *nanabi_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*nanabi_a3

add %stack,1
skillcount1 3064
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll put it here..."
if %ransu=2 mov $sel1,"My chest is very soft..."
if %ransu=3 mov $sel1,"Shoot out your semen on my chest..."
name $name
eng $sel1:$sel6\
name ""
skillname "Fox Tit Fuck"
dwave 1,"se\ero_koki1.ogg"
>Nanabi crushes Luka's penis between her breasts!
if %nanido<2 damage 13,16
if %nanido=2 damage 16,19
if %nanido=3 damage 23,27
skillname ""
if %mylife=0 sub %stack,1:return *nanabi_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*nanabi_a4

add %stack,1
skillcount1 3067
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll make you come with this..."
if %ransu=2 mov $sel1,"I'll tease you a little with this..."
if %ransu=3 mov $sel1,"Haha, can you endure it?"
name $name
eng $sel1:$sel6\
name ""
skillname "Two Moons"
dwave 1,"se\umaru.ogg"
if %kousan=2 && %hanyo1=1 skip 3
lsp 690,":a;chara\nanabi_cta01.bmp",450,0:print 10,500
if %kousan=2 mov %hanyo1,1
lsp 690,":a;chara\nanabi_cta02.bmp",450,0:print 10,500
>Two tails shoot out at Luka!\
>A soft tails wraps around Luka's penis!
damage 14,18
>The second tail lightly massages Luka!
damage 14,18
skillname ""
if %mylife=0 sub %stack,1:return *nanabi_h2
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
mov %owaza_count3a,0
sub %stack,1
return



*nanabi_a5

add %stack,1
if %kousan=2 skip 4
name $name
>Shall I make you my prisoner with my tail...?\
name ""
skillname "Tail Binding"
dwave 1,"se\umaru.ogg"
>Nanabi's tail coils around Luka!
if %nanido<2 damage 14,18
if %nanido=2 damage 18,22
if %nanido=3 damage 25,31
mov %kousoku,1:gosub *status_print
>Luka's body is bound by Nanabi's tails!\
skillname ""
if %mylife=0 sub %stack,1:return *nanabi_h5
gosub *face2
name $name
>Shall I play with you slowly?@
>Until you let it all out... Fufu.\
name ""
if %nanido<2 mov %genmogaku,1
if %nanido=2 mov %genmogaku,1
if %nanido=3 mov %genmogaku,2
sub %stack,1
return



*nanabi_a6

add %stack,1
skillcount1 3066
>Luka's body is bound by Nanabi's tails!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Shall I tighten it...?":mov $sel2,"Nanabi's tail tightens around Luka's penis!"
if %ransu=2 mov $sel1,"Does my tail feel good?":mov $sel2,"Nanabi's tail massages Luka!"
if %ransu=3 mov $sel1,"I'll make you nice and comfortable...":mov $sel2,"The tip of Nanabi's tail stimulates Luka!"
if %ransu=4 mov $sel1,"Let it out just like this...":mov $sel2,"Nanabi's tail gently rubs Luka!"
if %ransu=5 mov $sel1,"Fufufu...":mov $sel2,"The seven tails all wrap around Luka's penis, rubbing him all over!"
name $name
eng $sel1:$sel6\
name ""
skillname "Bound Tail Massage"
dwave 1,"se\umaru.ogg"
lsp 690,":a;chara\nanabi_cta02.bmp",450,0:print 10,500
eng $sel2:$sel6
if %nanido<2 damage 14,18
if %nanido=2 damage 18,22
if %nanido=3 damage 25,31
skillname ""
if %mylife=0 sub %stack,1:return *nanabi_h6
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*nanabi_a7

add %stack,1
name $name
>Now... Should I get a little serious?\
name ""
skillname "Magic Concentration"
dwave 1,"se\power.ogg"
mov $tatie1,"nanabi_st11"
mov $tatie2,"nanabi_st11"
mov $tatie3,"nanabi_st11"
lsp 700,":a;chara\nanabi_st11.bmp",0,0:print 10,500
>Nanabi begins to concentrate her magic!\
skillname ""
mov %hanyo6,1
sub %stack,1
return



*nanabi_a8

add %stack,1
name $name
>Having to use this on the same enemy twice...!\
name ""
skillname "Magic Concentration"
lsp 700,":a;chara\nanabi_st11.bmp",0,0:print 10,500
dwave 1,"se\power.ogg"
mov $tatie1,"nanabi_st11"
mov $tatie2,"nanabi_st11"
mov $tatie3,"nanabi_st11"
>Nanabi begins to concentrate her magic!\
skillname ""
mov %hanyo6,1
sub %stack,1
return



*nanabi_a9

add %stack,1
name $name
>.........\
name ""
skillname "Magic Concentration"
dwave 1,"se\power.ogg"
>Nanabi continues to concentrate her magic!\
skillname ""
mov %hanyo6,2
sub %stack,1
return



*nanabi_a10

add %stack,1
name $name
>........\
name ""
skillname "Magic Concentration"
dwave 1,"se\power.ogg"
>Nanabi finishes concentrating her magic!\
skillname ""
name $name
>Now... Prepare yourself!\
name ""
mov %hanyo6,3
sub %stack,1
return



*nanabi_a11

add %stack,1
skillcount1 3068
if %kousan=2 skip 4
name $name
>Go mad with pleasure!\
name ""
skillname "Seven Moons"
dwave 1,"se\umaru.ogg"
lsp 690,":a;chara\nanabi_ctb01.bmp",450,0:print 10,500
>All seven of Nanabi's tails shoot towards Luka!\
lsp 690,":a;chara\nanabi_ctb02.bmp",450,0:print 10,500
>The first tail wraps around Luka's penis!
damage 24,28
dwave 1,"se\umaru.ogg"
>The second tail rubs the tip of Luka's penis!
damage 24,28
dwave 1,"se\umaru.ogg"
>The third rubs the back of Luka's penis!
damage 24,28
dwave 1,"se\umaru.ogg"
>The fourth plays with Luka's balls!
damage 24,28
dwave 1,"se\umaru.ogg"
>The fifth squeezes the base of Luka's penis!
damage 24,28
dwave 1,"se\umaru.ogg"
>The sixth gently tickles Luka's rectum!
damage 24,28
dwave 1,"se\umaru.ogg"
>The seventh tail tightly wraps around Luka's penis!
damage 24,28
skillname ""
mov $tatie1,"nanabi_st01"
mov $tatie2,"nanabi_st02"
mov $tatie3,"nanabi_st03"
gosub *face1
if %mylife=0 sub %stack,1:return *nanabi_h7
csp 690:print 10,500
if %sinkou=3 sub %stack,1:return
name $name
>You managed to endure it...@
>Pretty sturdy for a human... Fufu.\
name ""
mov %hanyo6,4
mov %sinkou,2
sub %stack,1
return



*nanabi_a12

add %stack,1
name $name
>With no moonlight down here, it takes some time to regenerate my magic power...\
name ""
>Nanabi is resting!\
mov %hanyo6,5
sub %stack,1
return



*nanabi_a13

add %stack,1
name $name
>Now... Shall we start again!?\
name ""
>Nanabi finishes resting!\
mov %hanyo6,0
sub %stack,1
return



*nanabi_onedari

mov $list1,"Fox Blowjob"
if %3063>0 mov %list_num1,1
mov $list2,"Fox Tit Fuck"
if %3064>0 mov %list_num2,1
mov $list3,"Tail Massage"
if %3065>0 mov %list_num3,1
mov $list4,"Bound Tail Massage"
if %3066>0 mov %list_num4,1
mov $list5,"Two Moons"
if %3067>0 mov %list_num5,1
mov $list6,"Seven Moons"
if %3068>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *nanabi_onedari1
if %cmd1=12 goto *nanabi_onedari2
if %cmd1=13 goto *nanabi_onedari3
if %cmd1=14 && %kousoku=0 goto *nanabi_onedari4
if %cmd1=14 && %kousoku=1 goto *nanabi_onedari5
if %cmd1=15 goto *nanabi_onedari6
if %cmd1=16 goto *nanabi_onedari7
if %cmd1=-1 goto *nanabi_main
goto *nanabi_onedari



*nanabi_onedari1

mov $tatie1,"nanabi_st01"
mov $tatie2,"nanabi_st02"
mov $tatie3,"nanabi_st03"
gosub *onedari_syori
name $name
>You want to yield to my mouth...?@
>Then I won't hold back...\
name ""
gosub *nanabi_a2
skip -1



*nanabi_onedari2

mov $tatie1,"nanabi_st01"
mov $tatie2,"nanabi_st02"
mov $tatie3,"nanabi_st03"
gosub *onedari_syori
name $name
>You want to yield to my chest...?@
>Then I won't hold back...\
name ""
gosub *nanabi_a3
skip -1



*nanabi_onedari3

mov $tatie1,"nanabi_st01"
mov $tatie2,"nanabi_st02"
mov $tatie3,"nanabi_st03"
gosub *onedari_syori
name $name
>You want to yield to my tail...?@
>Then I won't hold back...\
name ""
gosub *nanabi_a1
skip -1



*nanabi_onedari4

mov $tatie1,"nanabi_st01"
mov $tatie2,"nanabi_st02"
mov $tatie3,"nanabi_st03"
gosub *onedari_syori
name $name
>You want to yield to my tail...?@
>Then first, I'll deprive you of your freedom...\
name ""
gosub *nanabi_a5
gosub *nanabi_a6
skip -1



*nanabi_onedari5

gosub *onedari_syori_k
name $name
>You want to yield to my tail...?@
>Then I'll continue like this...\
name ""
gosub *nanabi_a6
skip -1



*nanabi_onedari6

mov $tatie1,"nanabi_st01"
mov $tatie2,"nanabi_st02"
mov $tatie3,"nanabi_st03"
gosub *onedari_syori
name $name
>You want to take this technique?@
>Then I'll play with you until you're satisfied...\
name ""
gosub *nanabi_a4
skip -1



*nanabi_onedari7

gosub *onedari_syori
name $name
>So you want to surrender to my ultimate attack?@
>I'll force you to come in humiliation, then...\
name ""
if %hanyo6=3 skip 11
if %hanyo6>3 mov %hanyo6,0
skillname "Magic Concentration"
dwave 1,"se\power.ogg"
lsp 700,":a;chara\nanabi_st11.bmp",0,0:print 10,500
if %hanyo6=2 skip 4
if %hanyo6=1 skip 2
>Nanabi starts to accumulate magic!\
>Nanabi continues to accumulate magic!\
>Nanabi finishes accumulating magic!\
skillname ""
gosub *nanabi_a11
skip -1



*nanabi_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\nanabi_cta03.bmp",450,0
lsp 695,":a;chara\nanabi_bk05.bmp",0,0
gosub *syasei2
>Caressed by the fluffy tail, Luka was forced to ejaculate.\
mov %viclose,1:gosub *lose
mov %2523,%2523+1:if %2523=1 mov %count_koenemy,%count_koenemy+1
if %2523>%count_most mov %count_most,%2523:mov $count_mostname,$name
count 19,1
mov $bad1," Luka succumbs to the Nanabi's tail."
mov $bad2," Luka was forced to continue being the Nanabi's mate..."
csp 690
gosub *face2
name $name
>Did my tail feel good...?@
>You made my tail so dirty with your semen...\
name ""
goto *nanabi_hb



*nanabi_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\nanabi_cta03.bmp",450,0
lsp 695,":a;chara\nanabi_bk05.bmp",0,0
lsp 696,":a;chara\nanabi_bk06.bmp",0,0
gosub *syasei2
>Caressed by the two fluffy tails, Luka was forced to ejaculate.\
mov %viclose,1:gosub *lose
mov %2523,%2523+1:if %2523=1 mov %count_koenemy,%count_koenemy+1
if %2523>%count_most mov %count_most,%2523:mov $count_mostname,$name
count 19,1
mov $bad1," Luka succumbs to the Nanabi's two moons technique."
mov $bad2," Luka was forced to continue being the Nanabi's mate..."
csp 690
gosub *face2
name $name
>Did my technique feel good...?@
>You made my tails so dirty with your semen...\
name ""
goto *nanabi_hb



*nanabi_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\nanabi_bk01.bmp",0,0
gosub *syasei2
>Sucked by the Nanabi, Luka succumbs to the pleasure, ejaculating in her mouth.\
mov %viclose,1:gosub *lose
mov %2523,%2523+1:if %2523=1 mov %count_koenemy,%count_koenemy+1
if %2523>%count_most mov %count_most,%2523:mov $count_mostname,$name
count 4,1
mov $bad1," Luka succumbs to the Nanabi's blowjob."
mov $bad2," Luka was forced to continue being the Nanabi's mate..."
gosub *face2
name $name
>Was my blowjob technique amazing?@
>You let out so much semen in my mouth...\
name ""
goto *nanabi_hb



*nanabi_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\nanabi_bk02.bmp",0,0
gosub *syasei2
>Caressed between the Nanabi's breasts, Luka was forced to ejaculate.\
mov %viclose,1:gosub *lose
mov %2523,%2523+1:if %2523=1 mov %count_koenemy,%count_koenemy+1
if %2523>%count_most mov %count_most,%2523:mov $count_mostname,$name
count 7,1
mov $bad1," Luka succumbs to the Nanabi's titty fuck."
mov $bad2," Luka was forced to continue being the Nanabi's mate..."
gosub *face2
name $name
>Did my chest feel good...?@
>You made my chest so dirty with your semen...\
name ""
goto *nanabi_hb



*nanabi_h5

mov %ikigoe,3:gosub *ikigoe
name $name
>Eh...?\
gosub *syasei1
lsp 695,":a;chara\nanabi_bk05.bmp",0,0
gosub *syasei2
>Being bound by her tails, Luka accidentally ejaculates!\
mov %viclose,1:gosub *lose
mov %2523,%2523+1:if %2523=1 mov %count_koenemy,%count_koenemy+1
if %2523>%count_most mov %count_most,%2523:mov $count_mostname,$name
count 19,1
mov %count_bouhatu,%count_bouhatu+1
mov $bad1," Luka accidentally ejaculates while still being bound."
mov $bad2," Luka was forced to continue being the Nanabi's mate..."
gosub *face2
name $name
>What a pathetic man...@
>Only being bound and letting out so much... I didn't even start my technique!\
name ""
goto *nanabi_hb



*nanabi_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\nanabi_cta03.bmp",450,0
lsp 695,":a;chara\nanabi_bk05.bmp",0,0
gosub *syasei2
>Bound by her tails, Luka was forced to ejaculate!\
mov %viclose,1:gosub *lose
mov %2523,%2523+1:if %2523=1 mov %count_koenemy,%count_koenemy+1
if %2523>%count_most mov %count_most,%2523:mov $count_mostname,$name
count 19,1
mov $bad1," Bound by Nanabi's tails, Luka was forced to ejaculate."
mov $bad2," Luka was forced to continue being the Nanabi's mate..."
csp 690
gosub *face2
name $name
>Fufu... Was it amazing?@
>You made my tails so dirty with your semen...\
name ""
goto *nanabi_hb



*nanabi_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\nanabi_bk05.bmp",0,0
lsp 696,":a;chara\nanabi_bk06.bmp",0,0
lsp 697,":a;chara\nanabi_bk07.bmp",0,0
lsp 690,":a;chara\nanabi_ctb03.bmp",450,0
gosub *syasei2
>Stimulated all over by her seven tails, Luka ejaculates!\
mov %viclose,1:gosub *lose
mov %2523,%2523+1:if %2523=1 mov %count_koenemy,%count_koenemy+1
if %2523>%count_most mov %count_most,%2523:mov $count_mostname,$name
count 19,3
mov $bad1," Luka succumbs to the Nanabi's seven moons technique!"
mov $bad2," Captured by Nanabi, Luka was made into a livestock for semen."
mov $tatie1,"nanabi_st01"
mov $tatie2,"nanabi_st02"
mov $tatie3,"nanabi_st03"
mov $tatie4,"nanabi_st02"
csp 690
gosub *face2
name $name
>Fufu... Instant death.@
>Were you happy to be defeated by my ultimate attack?\
name ""
goto *nanabi_ha



*nanabi_ha

if %2811=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2811,1
name "Luka"
>Auuu...\
name ""
>Basking in the afterglow, Nanabi looks down at me with an air of superiority.\
>Defeated, I'm unable to resist anymore.\
name $name
>Since I used my best move, I'm a little tired...@
>How about you assist me in restoring my energy?\
name ""
cspl 690,699
lsp 700,":a;chara\nanabi_st21.bmp",0,0:print 10,500
>Nanabi's tails change into a strange shape.\
>A strange, pink looking mouth opens up at the tip of each tail.@
>A slimy looking tongue is inside each, much longer than a humans.\
name "Luka"
>Aaa...\
name ""
name $name
>I'll suck out all of your semen with my tails...@
>Until you fill all seven, my energy won't be restored...\
name ""
name "Luka"
>No... Auuu...\
name ""
>Nanabi grabs me with one of her tails and pulls me closer to her, and...@
mov %hseanwave,15:hseanwave
lsp 700,":a;chara\nanabi_h1.bmp",0,0:print 10,500
>Her pink opening sucks in my penis!\
name "Luka"
>Aaa! Ahi!\
name ""
>Her warm insides shoot pleasure through me as soon as I'm sucked into her tail opening.\
>The folds and creases inside of her rub me with every movement, as the slimy tongue inside licks me all over.\
name "Luka"
>Ahaa! Haaa...\
name ""
name $name
>Fufu... Amazing, right?@
>Just shoot everything out inside...\
name ""
name "Luka"
>Aaaa!\
name ""
>Stuck inside of her from the tip to the base, she forcefully rubs my penis all over.\
>In addition, her slimy tongue inside the tail is gently wrapped around me, licking me gently.\
>To such overpowering double stimulation, I'm unable to resist the rising orgasm.\
name "Luka"
>Coming!@>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\nanabi_h2.bmp",0,0
gosub *syasei2
>The overpowering pleasure quickly forces me to orgasm, as I gush out semen inside her tail.\
name "Luka"
>Ah.. I came so... Stop...\
name ""
>The tongue licks my urethral opening, licking out the last of semen as my body twitches.\
name $name
>Fufu... Did it feel good?\
name ""
mov %hseanwave,0:hseanwave
>She pulls her tail back, finally releasing me...@
mov %hseanwave,15:hseanwave
>...Or so I thought.@>Another tail suddenly sucks me back up!\
name "Luka"
>Auuu!\
name ""
name $name
>I told you, remember?@
>You have to let all seven of my tails get a turn.\
>Doesn't this one feel different from the last?\
name ""
name "Luka"
>Aaaa....\
name ""
>This tail had lots of little creases all over her tight walls.\
>Just from insertion into all of the little bumps and creases left me short of breath.\
name "Luka"
>Auu... Like this, I'll come again...\
name ""
>While reeling from the stimulation from the creases in her, I let out a pathetic moan.\
name $name
>Arara... Already coming again?@
>How pathetic.\
>Then I'll make you come quickly... Just let it out!\
name ""
>Nanabi tightens up, forcing the creases to wrap tightly around my penis, violently rubbing me with every movement.\
>The intense pleasure forces me to the limit instantly.\
name "Luka"
>Aaaa!\
name ""
gosub *syasei1
lsp 700,":a;chara\nanabi_h3.bmp",0,0
gosub *syasei2
>Unable to endure, I explode in the second tail, filling it with my semen.\
>As soon as the last drop is out, she quickly pulls me out of the tail and puts me in another.\
mov %hseanwave,16:hseanwave
>This tail is even tighter than the last...\
name "Luka"
>Ahii!\
name ""
>Stuck in her tight opening, I writhe pitifully.@
>Unable to last even a short duration, I feel pathetic.\
name $name
>There's no point in resisting...@
>Just surrender to the pleasure...\
name ""
name "Luka"
>Aaaa!\
name ""
gosub *syasei1:gosub *syasei2
>Quickly forced to ejaculate, she exchanges the tail again after squeezing out the last drop.\
>It looks like she'll really rape me with all seven...\
name "Luka"
>Auu... Stop already...\
name ""
name $name
>Do you think I'd really let an excellent catch like you get away?@
>I'll squeeze every drop out of you until I'm satisfied.\
>After that... Shall I keep you as a semen slave?\
name ""
name "Luka"
>That... Auuu...\
name ""
>As I complain, she forcibly stimulates me with a grin on her face.\
gosub *syasei1
lsp 700,":a;chara\nanabi_h4.bmp",0,0
gosub *syasei2
>I'm quickly forced to ejaculate again.\
>My entire lower body feels as if it's melting in pleasure.\
name $name
>There are still more tails to go...\
name ""
name "Luka"
>Auu...\
name ""
>One after another, the tails keep violating me.@
>Raped by her tails, she continues to squeeze out my semen.\
name "Luka"
>A...aa...\
name ""
>My whole body too weak to do anything, my consciousness starts to slowly fade.\
>A pleasurable fatigue washes over me as I'm unable to fight back.\
name $name
>Fufu... You're not used to being squeezed...@
>Fainting with just this much...\
>Don't worry, I'll train you in the future.@
>From now on, you're just my livestock for semen production.\
name ""
name "Luka"
>.........\
name ""
>As Nanabi whispers that in my ear, I lose consciousness.\
gosub *anten
mov %hseanwave,0:hseanwave
>Thus, my adventure ends, defeated by a powerful enemy.@
>After this, I'll live out the rest of my life as her livestock, producing semen...\
goto *badend



*nanabi_hb

if %2812=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2812,1
name "Luka"
>Auu...\
name ""
>Basking in the afterglow, Nanabi looks down at me with an air of superiority.\
>Defeated, I'm unable to resist anymore.\
name $name
>You're as strong as your reputation claimed...@
>I wouldn't complain in having such a good partner...\
>Fufu... I'll rape you.@
>Will you shoot your seed into me?\
name ""
name "Luka"
>Auu... Stop...\
name ""
cspl 690,699
lsp 700,":a;chara\nanabi_h5.bmp",0,0:print 10,500
>As I try to refuse, Nanabi jumps on top of me, forcing me into the ground.\
>Her warm, fluffy fur rubs me all over my body.\
>Inside her fur, a pink opening moves towards my groin.@
>She slowly forces my dick into her pussy...\
name "Luka"
>Aaaa!\
name ""
lsp 690,":a;chara\nanabi_ctc01.bmp",0,0
lsp 700,":a;chara\nanabi_h6.bmp",0,0:print 10,500
mov %hseanwave,9:hseanwave
name $name
>Fufu... I violated you.\
name ""
>Wrapped in her warm opening, the rough walls rub against me as I'm pushed all the way into her.\
>Covered in bumps along her walls, her pussy sends intense pleasure through me as I'm pushed into her.\
name "Luka"
>Aaaa...\
name ""
>Her amazing pussy starts to tighten around me, as the ecstasy flowing through me feels like it's melting my body.\
name $name
>Mating with me feels good, doesn't it?\
name ""
>Nanabi wiggles slightly as she questions me.\
>The movements force my penis to rub all around inside of her, massaging all of my most sensitive parts.\
name "Luka"
>Auuu... It's so good...\
name ""
>The feeling would quickly force any man into submission.@
>Feeling that sweet stimulus, I'm quickly brought to the edge.\
name "Luka"
>Aahh... I'm going to come already...\
name ""
name $name
>I don't mind, let it all out...@
>Put all of your seed into my vagina...\
name ""
>Nanabi starts to move her hips more than before.@
>Rubbed inside of her, I'm quickly brought to my limit.\
>The desire to ejaculate rises in me, until I succumb to it.\
name "Luka"
>Aaa...!@>Ahhhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\nanabi_ctc02.bmp",0,0
lsp 700,":a;chara\nanabi_h7.bmp",0,0
gosub *syasei2
>Forced deep into her, my semen gushes out into her.\
>Suddenly, her pussy starts to contract quickly, squeezing and sucking up everything I shoot out.\
name "Luka"
>Ahii!@>What... Is this...?\
name ""
>My body writhes in reaction to the sudden strange pleasure.\
name $name
>Fufu... It's to quickly suck your sperm into my womb.@
>Did you enjoy it?\
>Using that, I'm able to ensure I squeeze out all of your sperm, and the best one fertilizes me...\
name ""
name "Luka"
>Aa! Haaa!\
name ""
mov %hseanwave,10:hseanwave
>Nanabi's pussy continues to contract in waves, as if milking everything out of me.\
>Like she said, it doesn't look like she'll leave a single drop...\
name "Luka"
>Faa! Haaa....\
name ""
>Even after her milking sucks out the last drop, the contractions don't stop.\
>Her milking continues, as my body writhes in futility.\
name "Luka"
>Hauuu! Stop already!\
name ""
name $name
>I said I'd squeeze out all your sperm, didn't I?@
>Until your scrotum is empty, I need to continue...\
name ""
name "Luka"
>Faaa!\
name ""
>Her relentless contractions milk me, as if encouraging me to ejaculate quickly again.\
>Even though I just came, I already can't endure the rising desire.\
name $name
>Now, let it out.@
>Send all of your healthy seed into my womb...\
name ""
name "Luka"
>Aaaa... Coming!@
>Aaaaaa!\
name ""
gosub *syasei1
lsp 690,":a;chara\nanabi_ctc03.bmp",0,0
lsp 700,":a;chara\nanabi_h8.bmp",0,0
gosub *syasei2
>I come again inside of her, as her contractions continue even stronger than before, sucking up everything.\
name "Luka"
>Stop... Please...\
name ""
name $name
>You can come more, can't you?@
>I said I'd get everything...\
name ""
name "Luka"
>Faaaa!\
name ""
>She suddenly tightens her pussy around me, shooting me over the edge again.\
gosub *syasei1
lsp 690,":a;chara\nanabi_ctc04.bmp",0,0
lsp 700,":a;chara\nanabi_h9.bmp",0,0
gosub *syasei2
>Unable to endure at all, I helplessly shoot out in her again.\
>Her milking continues as I come, ensuring not a single drop is wasted.\
name "Luka"
>Ahi... Ha...\
name ""
name $name
>Fufu... Mating with you is very nice...@
>Your energetic little children are swimming so lively in me...\
name ""
name "Luka"
>Hau....\
name ""
gosub *syasei1:gosub *syasei2
>Continuing to wring me out as she talks, I'm forced to come again.\
>Unable to do anything about the tortuous pleasure, my consciousness starts to slowly fade.\
name "Luka"
>Au....\
name ""
name $name
>Fainting while still mating with me?@
>You're still pretty weak...\
>I'll train you plenty from now on.@
>You're going to be my mate after all... Fufu.\
name ""
name "Luka"
>Aaa....\
name ""
gosub *syasei1:gosub *syasei2
>I faint at the same time as I ejaculate, unable to endure the overwhelming pleasure.\
>Thinking that being her mate might not be too bad, I lose consciousness.\
gosub *anten
mov %hseanwave,0:hseanwave
>Thus my adventure ends here, defeated by a powerful enemy.@
>From now, my new life as Nanabi's mate begins.\
>..........\
goto *badend



*tamamo1_start

mov $name,"Tamamo"
mov $name2,"Tamamo"
mov $lavel,"tamamo1"
mov $tatie1,"tamamo_st01"
mov $tatie2,"tamamo_st02"
mov $tatie3,"tamamo_st03"
mov $tatie4,"tamamo_st02"
mov $haikei,"bg035"
mov %monster_x,0
mov %monster_y,0
mov %max_enemylife,22000
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,4
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov %end_n,1
mov %zmonster_x,-280
name "Luka"
>Here I come!\
name ""
>She's supposed to be as strong as Granberia...@
>But I've gotten a lot better since that time!\
>It won't be easy, but...\
mov %sinkou,1
goto *common_main



*tamamo1_kousan

gosub *kousan_syori
>Luka surrenders, ending his resistance!\
gosub *face2
name $name
>Oh? So you just want to be played with by me?\
name ""
goto *tamamo1_a



*tamamo1_main

gosub *cmd_main
if %cmd1=11 && %nanido=0 goto *common_attack
if %cmd1=11 goto *tamamo1_attack
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *tamamo1_kousan
if %cmd1=16 goto *tamamo1_onedari
if %cmd1=17 && %nanido=0 goto *common_skill
if %cmd1=17 goto *tamamo1_skill
goto *tamamo1_main



*tamamo1_attack

mov %before_action,1
mov %skill_sub,1
gosub *common_attack1
dwave 2,"se\earth3.ogg"
delay 90
>But Tamamo takes no damage!\
if %first_sel1=1 goto *tamamo1_a
name "Luka"
>What is this?@
>I can't damage her at all?\
name ""
name $name
>There's no way that weak attack would even make me flinch.\
name ""
mov %first_sel1,1
goto *tamamo1_a



*tamamo1_skill

gosub *cmd_skill
if %cmd1=21 goto *tamamo1_skillx1
if %cmd1=22 goto *skill2
if %cmd1=23 goto *tamamo1_skillx1
if %cmd1=24 goto *skill4
if %cmd1=35 goto *skill17
if %cmd1=-1 goto *tamamo1_main
goto *tamamo1_skill



*tamamo1_skillx1

if %cmd1=21 mov %skill_sub,1:gosub *skill1:skip 2
if %cmd1=23 mov %skill_sub,1:gosub *skill3
mov %skill_sub,0
dwave 2,"se\earth3.ogg"
>But Tamamo takes no damage!\
skillname ""
if %first_sel2=1 goto *tamamo1_a
name "Luka"
>My skills not work too?!!\
name ""
mov %first_sel2,1
goto *tamamo1_a



*tamamo1_a

if %sinkou=1 gosub *tamamo1_a1:goto *common_main
if %sinkou=2 gosub *tamamo1_a2:goto *common_main



*tamamo1_a1

add %stack,1
name $name
>I'm hungry...\
name ""
>Tamamo waves her tails around menacingly!\
mov %sinkou,2
sub %stack,1
return



*tamamo1_a2

add %stack,1
name $name
>Well then, here I come!\
name ""
skillname "Nine Moons"
dwave 1,"se\umaru.ogg"
lsp 690,":a;chara\tamamo_cta01.bmp",490,0:print 10,500
>All nine of Tamamo's tails shoot toward Luka!\
lsp 690,":a;chara\tamamo_cta02.bmp",490,0:print 10,500
>The first tail wraps around Luka's penis!
mov %damage_kotei,1
damage 180,220
dwave 1,"se\umaru.ogg"
>The second tail tightens around the base of Luka's penis!
mov %damage_kotei,1
damage 180,220
dwave 1,"se\umaru.ogg"
>The third tail rubs against Luka's urethral opening!
mov %damage_kotei,1
damage 180,220
dwave 1,"se\umaru.ogg"
>The fourth tail rubs the tip of Luka's penis!
mov %damage_kotei,1
damage 180,220
dwave 1,"se\umaru.ogg"
>The fifth tail rubs Luka's balls!
mov %damage_kotei,1
damage 180,220
dwave 1,"se\umaru.ogg"
>The sixth tail massages the back of Luka's penis!
mov %damage_kotei,1
damage 180,220
dwave 1,"se\umaru.ogg"
>The seventh tail stimulates Luka's rectum!
mov %damage_kotei,1
damage 180,220
dwave 1,"se\umaru.ogg"
>The eighth tail massages Luka's penis all over!
mov %damage_kotei,1
damage 180,220
dwave 1,"se\umaru.ogg"
>The ninth tail tightens around Luka's penis!
mov %damage_kotei,1
damage 180,220
skillname ""
if %mylife=0 sub %stack,1:return *tamamo1_h1
csp 690:print 10,500
sub %stack,1
return



*tamamo1_onedari

name $name
>You challenged me, so fight seriously.\
name ""
goto *tamamo1_main



*tamamo1_h1

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\tamamo_cta03.bmp",490,0
lsp 693,":a;chara\tamamo_bk04.bmp",0,0
gosub *syasei2
>Attacked by her so ruthlessly, Luka is forced to come after a single attack, covering her tails in semen!\
mov %viclose,1:gosub *lose
mov %2524,%2524+1:if %2524=1 mov %count_koenemy,%count_koenemy+1
if %2524>%count_most mov %count_most,%2524:mov $count_mostname,$name
count 19,3
mov $bad1," Luka is instantly defeated by Tamamo's attack."
mov $bad2," After that, Luka spends the rest of his life as Tamamo's lover."
csp 690
gosub *face2
name $name
>You let it out so quickly...@
>You're so cute... Fufu...\
name ""
goto *tamamo1_h



*tamamo1_h

mov %2224,1
mov $end_go,"sean0085"
if %2524=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %con_hvoice=0 dwave 0,"voice\tamamo1_01.ogg"
name $name
>So, it's my victory.
>Shall I play with the loser?\
name ""
dwavestop 0
name "Luka"
>Uuu... Stop...\
name ""
dwave 1,"se\umaru.ogg"
cspl 690,699
lsp 700,":a;chara\tamamo_h1.bmp",0,0:print 10,500
>Her fluffy tail wraps around me, pulling me closer to her.\
>Completely wrapped in her soft fluffy tail, I feel my body melt in her fur.\
name "Luka"
>Aaa... It feels so nice...\
name ""
if %con_hvoice=0 dwave 0,"voice\tamamo1_02.ogg"
name $name
>My fluffy tail is the best, isn't it?
>I'll let you indulge in even more of it... \
name ""
dwavestop 0
name "Luka"
>Aaaa!\
name ""
dwave 1,"se\umaru.ogg"
>Her soft tail, coiled around my body, starts to stroke and tickle me all over.\
>Finally, her tail reaches my groin...\
if %con_hvoice=0 dwave 0,"voice\tamamo1_03.ogg"
name $name
>Here... I'll play with you carefully here, too...
>You don't have the same composure as before, do you?\
name ""
dwavestop 0
name "Luka"
>Ahii!\
name ""
dwave 1,"se\umaru.ogg"
lsp 700,":a;chara\tamamo_h2.bmp",0,0:print 10,500
>One tail wraps around my penis, as the others massage the back, tip, and opening.\
>Two more tails massage my penis in an alternating rubbing movement.\
>As if I'm being massaged by multiple fluffy brushes, my most sensitive part is immersed in pleasure.\
>This is like heaven...\
name "Luka"
>Faaa... Amazing...\
name ""
if %con_hvoice=0 dwave 0,"voice\tamamo1_04.ogg"
name $name
>Fufufu... It's fine if you just give in and let it leak out...\
name ""
dwavestop 0
>While rubbing me with her tails, Tamamo laughs at me.\
>She gently rubs the back of my penis, sending a chill down my spine.@
>Massaging me all over, I'm quickly brought to my limit.\
name "Luka"
>Auu... Already... Coming!\
name ""
if %con_hvoice=0 dwave 0,"voice\tamamo1_05.ogg"
name $name
>How slovenly... Are you already at your limit?
>Horehore... I'll finish you. \
name ""
dwavestop 0
dwave 1,"se\umaru.ogg"
>One of her fluffy tails gently rubs my tip and the back muscle of my penis, crushing the last of my resistance.\
name "Luka"
>Aaa! Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\tamamo_h3.bmp",0,0
gosub *syasei2
>Finally succumbing to the pleasure, I shoot out my semen all over her tail.\
if %con_hvoice=0 dwave 0,"voice\tamamo1_06.ogg"
name $name
>Fufufu... You let out a lot.
>Your energetic little children are dripping out...\
name ""
dwavestop 0
>Tamamo starts to lick off my semen from her tail.\
if %con_hvoice=0 dwave 0,"voice\tamamo1_07.ogg"
name $name
>...Mumu. A first-rate taste.
>I like it. I'll make you my lover.\
name ""
dwavestop 0
name "Luka"
>No way...\
name ""
if %con_hvoice=0 dwave 0,"voice\tamamo1_08.ogg"
name $name
>A complaint? Then, I'll train you in the pleasure...
>Without holding back, I'll indulge you in heaven...\
name ""
dwavestop 0
name "Luka"
>Aaa...!\
name ""
dwave 1,"se\umaru.ogg"
lsp 700,":a;chara\tamamo_h4.bmp",0,0:print 10,500
>Another tail comes up to my groin, and wraps around my penis.@
>Everything from the base to the tip is wrapped in her fluffy tail!\
name "Luka"
>Amazing... So soft...\
name ""
if %con_hvoice=0 dwave 0,"voice\tamamo1_09.ogg"
name $name
>With my tail, I'll take everything out...
>Until your balls are empty...\
name ""
dwavestop 0
name "Luka"
>That... Ahi!\
name ""
dwave 1,"se\umaru.ogg"
>Her fluffy tail wrapped around me to starts to move up and down, pumping me gently.\
>Moving up and down as if it was a handjob, the soft fluffy tail makes the pleasure exponentially more powerful.\
>In addition, the other tails continue to rub the tip of my penis.\
name "Luka"
>Aaaa...!\
name ""
if %con_hvoice=0 dwave 0,"voice\tamamo1_10.ogg"
name $name
>Horehorehore... \
name ""
dwavestop 0
dwave 1,"se\umaru.ogg"
>Her merciless tail forces pleasure into every corner of my body as she continues to pump me.\
>Sometimes tightening tightly around me, and other times loosening so it was just tickling.@
>The alternating stimulations make my mind go blank.\
name "Luka"
>Aaaaa...!\
name ""
gosub *syasei1
lsp 700,":a;chara\tamamo_h5.bmp",0,0
gosub *syasei2
>My body twitching helplessly, I quickly ascend to heaven.@
>Even while I'm coming, her tail continues to massage me.\
name "Luka"
>Aaa! Auuuu!\
name ""
if %con_hvoice=0 dwave 0,"voice\tamamo1_11.ogg"
name $name
>Hore... Hore... Hore... \
name ""
dwavestop 0
dwave 1,"se\umaru.ogg"
>Her tail still stroking me as I ejaculate, my body agonizes in forced ecstasy.\
>Finally, my ejaculation ends.\
if %con_hvoice=0 dwave 0,"voice\tamamo1_12.ogg"
name $name
>Fufu... It seems that stimulation was a little too strong.
>This time, I'll be more gentle...\
name ""
dwavestop 0
name "Luka"
>Aaaa...\
name ""
dwave 1,"se\umaru.ogg"
>Her fluffy tail continues to gently stroke me up and down.@
>Unlike the intense stimulation from before, now it feels like I'm being softly loved.\
>Her gentle caress also sends me to heaven.\
name "Luka"
>Faaa...\
name ""
>My whole body is flooded with ecstasy as she continues to tenderly tease my dick.\
>My body and soul soaked in the pleasure she's giving me, I surrender to Tamamo's tail.\
if %con_hvoice=0 dwave 0,"voice\tamamo1_13.ogg"
name $name
>Fufu...
>If you become my lover, you can immerse yourself in this pleasure at any time.\
name ""
dwavestop 0
name "Luka"
>Auu... Amazing...@
>Aaa....!\
name ""
dwave 1,"se\umaru.ogg"
>Her tender massage continues as she rubs against the back of my penis, forcing me over the edge again.\
gosub *syasei1
lsp 700,":a;chara\tamamo_h6.bmp",0,0
gosub *syasei2
name "Luka"
>Faaa... Amazing...\
name ""
if %con_hvoice=0 dwave 0,"voice\tamamo1_14.ogg"
name $name
>Fufufu... You're a slave to my fluffy tail now.
>How cute... \
name ""
dwavestop 0
name "Luka"
>Aaa... More...\
name ""
>I'm completely addicted to the pleasure her tail can bring...@
>So that she'll make me ejaculate, I'll be a good toy for her...\
if %con_hvoice=0 dwave 0,"voice\tamamo1_15.ogg"
name $name
>Hore, Horehore... Fufufu. \
name ""
dwavestop 0
name "Luka"
>Aaaa!\
name ""
gosub *syasei1:gosub *syasei2
gosub *anten
>Fainting after being forced to ejaculate even more, I lose consciousness.@
>I'll continue to be played with by this amazing tail.\
>But I can continue to taste this amazing paradise.@
>As I am now, I can't ask for a happier existence...\
>.............\
goto *badend



*arumaeruma1_start

mov $name,"Alma Elma"
mov $name2,"Alma Elma"
mov $lavel,"arumaeruma1"
mov $tatie1,"arumaeruma_st13"
mov $tatie2,"arumaeruma_st43"
mov $tatie3,"arumaeruma_st42"
mov $tatie4,"arumaeruma_st43"
mov $haikei,"bg036"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,15000
if %nanido=2 mov %max_enemylife,15000
if %nanido=3 mov %max_enemylife,15000
if %nanido=1 mov %henkahp1,14550
if %nanido=2 mov %henkahp1,14550
if %nanido=3 mov %henkahp1,14550
if %nanido=1 mov %henkahp2,14200
if %nanido=2 mov %henkahp2,14200
if %nanido=3 mov %henkahp2,14200
if %nanido=0 mov %max_enemylife,3
if %nanido=0 mov %henkahp2,1
if %nanido=0 mov %henkahp1,2
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,4
mov %tikei,0
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"Luka can't break free of her tail!"
mov $mogaku_anno2,"Luka slips out of her tail!"
mov $mogaku_anno3,"Luka can't attack while being held by her tail!"
mov $mogaku_sel1,"Fufu... Your struggling is so cute. "
mov $mogaku_sel2,"I'll play with you plenty, Luka-boy. "
mov $mogaku_sel3,"That's a bad boy, Luka. Just sit back, I'll suck you plenty..."
mov $mogaku_sel4,"Just sit back and be quiet, I'll send you to heaven."
mov $mogaku_sel5,"I'll suck everything from you while you struggle. "
mov $mogaku_dassyutu1,"Arara... You ran away."
mov $mogaku_dassyutu2,"I was going to all that trouble to show you heaven, too..."
mov $half_s1,"Fufu... Why don't you just surrender?"
mov $half_s2,"Don't you want my tail to squeeze out all your semen?"
mov $kiki_s1,"Are you about to come?"
mov $kiki_s2,"Just give up and let it all out. "
mov %end_n,2
mov %zmonster_x,-230
mov %tukix,290
name $name
>Fufu... A little Hero, so full of courage.@
>How do you want me to violate you, Luka-boy?\
lsp 700,":a;chara\arumaeruma_st21.bmp",0,0:print 10,500
>Do you want me to use my hand?@
>How about my mouth?\
>How about I squeeze you between my breasts...?\
>Or... Do you want to try anal?@
>Oh, how about I try it like this...@
>Doesn't this tail look really good, too?\
name ""
name "Luka"
>Guh!\
name ""
lsp 700,":a;chara\arumaeruma_st43.bmp",0,0:print 10,500
name $name
>Alright! I'll do it with my tail! @
>Without using my hands, feet or magic, I'll play with you.\
>Struggle as much as you can, and let me enjoy myself.@
>After we finish playing, I'll be sure to suck you dry.\
>Then... Here I come!\
mov $tatie1,"arumaeruma_st41"
lsp 700,":a;chara\arumaeruma_st41.bmp",0,0:print 10,500
name ""
>As expected from one of the Four Heavenly Knights...@
>Just her gaze is enough to force me back.\
>Her ability can't be underestimated by her cavalier attitude...\
mov %sinkou,1
goto *common_main



*arumaeruma1001

rnd2 %ransu,1,2
if %ransu=1 gosub *arumaeruma1_a1:skip 2
if %ransu=2 gosub *arumaeruma1_a2
lsp 700,":a;chara\arumaeruma_st32.bmp",0,0:print 10,500
name $name
>If you're even a little careless, my tail will suck in your penis.@
>Gently wrapped around you, I'll suck all your semen out. \
name ""
gosub *face1
mov %sinkou,2
goto *common_main



*arumaeruma1002

rnd2 %ransu,1,2
if %ransu=1 gosub *arumaeruma1_a1:skip 2
if %ransu=2 gosub *arumaeruma1_a2
lsp 700,":a;chara\arumaeruma_st32.bmp",0,0:print 10,500
name $name
>Fufu... Don't you want to feel the pleasure my tail can bring?\
>Just drop your sword for a second...@
>If you do that, I'll show you the best pleasure... \
name ""
name "Luka"
>Shut up...!\
name ""
name $name
>Fufu... Are you imagining it?@
>Your penis being sucked into my tail...\
>Being stroked inside my soft tail, bringing you amazing pleasure.@
>You wouldn't even last ten seconds, Luka-boy.\
name ""
name "Luka"
>Guh..!\
name ""
>My heart starts to beat faster at her words.\
gosub *face1
mov %sinkou,3
goto *common_main



*arumaeruma1003

name "Luka"
>Guh!\
name ""
>As I thought, her strength isn't ordinary.@
>Normal attacks don't seem to do anything of consequence...\
name "Luka"
>If it's like this... Then I'll have to use that technique!\
name ""
>Even though I just learned it, I'll have to use it right away.@
>I'm still unsure... But I have to do it!\
mov %tikei,1
mov %hanyo2,1
goto *arumaeruma1_a



*arumaeruma1_v

if %nanido=0 goto *arumaeruma1_v2
name "Luka"
>How about this! Demon Skull Beheading!\
name ""
mov %mp,%mp-3
gosub *mp
skillname "Demon Skull Beheading"
dwave 1,"se\karaburi.ogg"
lsp 2,":c;effect\003.bmp",0,0:print 1
wait 300
csp 2:print 18,500,"system\mask01.jpg"
>Like quickly climbs the mast, then jumps off the top!@
>Shooting quickly towards the ground, Luka swings down!\
lsp 700,":a;chara\arumaeruma_st12.bmp",0,0:print 10,500
name $name
>...Kya!?\
name ""
skillname "Sword Catch"
dwave 1,"se\hit1.ogg"
>But Alma Elma catches his sword between her hands!\
skillname ""
name "Luka"
>No way...\
name ""
>Even that attack was stopped...@
>I don't have any other tricks left...\
goto *arumaeruma1_v2



*arumaeruma1_v2

lsp 700,":a;chara\arumaeruma_st11.bmp",0,0:print 10,500
name $name
>...Aha, it looks like I lost. \
name ""
bgm "bgm\boss0.ogg"
name "Luka"
>Eh...!?\
name ""
name $name
>I promised, right? I wouldn't use my hands, feet or magic.@
>But I had to use my hands to stop that attack...\
>This time, I'll give the win to you.\
name ""
>My... win?\
lsp 701,":a;chara\arumaeruma_st11.bmp",-200,0
lsp 700,":a;chara\alice_st01b.bmp",267,0:print 10,500
name $name
>Such a thing is fine, right Lord Alice?\
name ""
name "Alice"
>If that's what you want, it's fine by me.\
name ""
csp 701
lsp 700,":a;chara\arumaeruma_st21.bmp",0,0:print 10,500
name $name
>Haha... So that's how it is. I'll retreat this time.@
>But next time... I'll be a serious opponent. \
name ""
lsp 700,":a;chara\arumaeruma_st22.bmp",0,0:print 10,500
>Alma Elma seductively licks her index finger at me.\
name $name
>I'll violate you like this... Even if you scream... Even if you faint...@
>Teasing you all over, I'll show you a hellish pleasure.\
name ""
>Her seductive words paired with her licking causes my groin to slightly stir...\
lsp 700,":a;chara\arumaeruma_st21.bmp",0,0:print 10,500
name $name
>Make sure you look forward to it. \
name ""
dwave 1,"se\wind1.ogg"
>A strong wind starts to surround the ship again.\
csp 700:print 10,500
>And Alma Elma vanishes in a strong gust of wind.\
mov %viclose,2:gosub *victory
mov %getexp,2000:gosub *lvup
mov %2225,1
goto *sean0090



*arumaeruma1_kousan

gosub *kousan_syori
>Luka yields to the promise of pleasure, ending his resistance!\
gosub *face2
name $name
>Ahh... You fell so quickly.@
>Luka-boy... I'll suck everything out of you with my tail, until you're empty. \
name ""
mov %sinkou,3
goto *arumaeruma1_a



*arumaeruma1_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *arumaeruma1_kousan
if %cmd1=16 goto *arumaeruma1_onedari
if %cmd1=17 goto *arumaeruma1_skill
goto *arumaeruma1_main



*arumaeruma1_skill

gosub *cmd_skill
if %cmd1=21 goto *skill1
if %cmd1=22 goto *skill2
if %cmd1=23 goto *skill3
if %cmd1=24 goto *skill4
if %cmd1=25 goto *arumaeruma1_v
if %cmd1=35 goto *skill17
if %cmd1=-1 goto *arumaeruma1_main
goto *arumaeruma1_skill



*arumaeruma1_a

if %enemylife<%henkahp1 && %hanyo2=0 goto *arumaeruma1003
if %enemylife<%henkahp2 gosub *arumaeruma1_a8:goto *common_main
if %kousoku=1 gosub *arumaeruma1_a4:goto *common_main
if %kousoku=2 gosub *arumaeruma1_a5:goto *common_main
if %sinkou=1 goto *arumaeruma1001
if %sinkou=2 goto *arumaeruma1002
rnd2 %ransu,1,3
if %ransu=1 gosub *arumaeruma1_a1:goto *common_main
if %ransu=2 gosub *arumaeruma1_a2:goto *common_main
if %ransu=3 && %owaza_count1a>4 gosub *arumaeruma1_a3:goto *common_main
skip -4



*arumaeruma1_a1

add %stack,1
skillcount1 3069
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Come on, I'll make you feel good... "
if %ransu=2 mov $sel1,"I'll cherish you, Luka-boy. "
if %ransu=3 mov $sel1,"I'll play with your penis... "
name $name
eng $sel1:$sel6\
name ""
skillname "Tail Massage"
dwave 1,"se\ero_slime1.ogg"
>Alma Elma's tail rubs Luka's penis!
if %nanido<2 damage 20,25
if %nanido=2 damage 25,32
if %nanido=3 damage 35,45
skillname ""
if %mylife=0 sub %stack,1:return *arumaeruma1_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*arumaeruma1_a2

add %stack,1
skillcount1 3070
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll give your penis a present from my tail. "
if %ransu=2 mov $sel1,"Haha... I'll cover you with my tail's mucus. "
if %ransu=3 mov $sel1,"Covered in my tail's mucus, I'll make you come. "
name $name
eng $sel1:$sel6\
name ""
skillname "Tail Mucus"
dwave 1,"se\ero_slime2.ogg"
>A sticky wet mucus flows out from Alma Elma's tail, covering Luka's groin!
if %nanido<2 damage 18,22
if %nanido=2 damage 22,28
if %nanido=3 damage 27,38
skillname ""
if %mylife=0 sub %stack,1:return *arumaeruma1_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*arumaeruma1_a3

add %stack,1
name $name
>Haha... I'll wind my tail all around you. \
name ""
skillname "Tail Roll"
dwave 1,"se\ero_makituki3.ogg"
>Alma Elma's tail coils around Luka's body!
damage 15,18
mov %kousoku,1:gosub *status_print
>Luka's body is wrapped by Alma Elma's tail!\
skillname ""
if %mylife=0 sub %stack,1:return *arumaeruma1_h3
gosub *face2
name $name
if %first_sel1=1 skip 4
>Haha... I caught you. @
>Get ready, I'll make you feel amazing... \
skip 3
>Haha... I caught you again, Luka-boy.@
>Don't run away this time. \
name ""
mov %first_sel1,1
if %nanido<2 mov %genmogaku,1
if %nanido=2 mov %genmogaku,1
if %nanido=3 mov %genmogaku,1
sub %stack,1
return



*arumaeruma1_a4

add %stack,1
skillcount1 3071
>Luka's body is wrapped by Alma Elma's tail!\
name $name
>It's not even close to being over. \
name ""
skillname "Bound Tail Massage"
dwave 1,"se\ero_slime1.ogg"
>Still bound by her tail, Alma Elma rubs Luka's penis with her tail!
if %nanido<2 damage 20,25
if %nanido=2 damage 25,32
if %nanido=3 damage 35,45
mov %kousoku,2
skillname ""
if %mylife=0 sub %stack,1:return *arumaeruma1_h4
lsp 700,":a;chara\arumaeruma_st31.bmp",0,0
lsp 690,":a;chara\arumaeruma_ct01.bmp",500,0:print 10,1000
lsp 690,":a;chara\arumaeruma_ct02.bmp",500,0:print 10,500
>Suddenly, a mouth opens at the end of her tail!\
name $name
>Now... I'll suck your penis in my tail's hole.@
>It feels amazing inside, so get ready for it. \
>Fufufu... I'll show you heaven. \
name ""
sub %stack,1
return



*arumaeruma1_a5

add %stack,1
skillcount1 3072
>Luka's body is wrapped by Alma Elma's tail!\
name $name
>Your penis will melt in here... \
name ""
skillname "Tail Sucking"
dwave 1,"se\ero_chupa6.ogg"
lsp 700,":a;chara\arumaeruma_st32.bmp",0,0
lsp 690,":a;chara\arumaeruma_ct03.bmp",500,0:print 10,500
lsp 690,":a;chara\arumaeruma_ct04.bmp",500,0:print 10,500
>Luka's penis is forced into the hole in her tail!
mov %damage_kotei,1
damage 30,35
mov %kousoku,3:mov %genmogaku,100
skillname ""
if %mylife=0 sub %stack,1:return *arumaeruma1_h5
name "Luka"
>Haaa!\
name ""
>I scream as the tremendous pleasure flows through me.\
>Her insides are soft, with a slippery mucus inside.@
>As if designed just for my penis, it sends powerful pleasure through my waist.\
name $name
>Haha... Already letting out such a voice?@
>Luka-boy is so shameful. \
name ""
if %mylife<36 sub %stack,1:goto *arumaeruma1_a7
sub %stack,1
goto *arumaeruma1_a6



*arumaeruma1_a6

add %stack,1
skillcount1 3072
>Luka's penis is stuck in Alma Elma's tail!\
rnd2 %ransu,1,10
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Does it feel good inside me?":mov $sel2,"Alma Elma's tail squeezes Luka's penis!"
if %ransu=2 mov $sel1,"Enjoy my tail as much as you want. ":mov $sel2,"Alma Elma's tail squeezes Luka's penis!"
if %ransu=3 mov $sel1,"Just let it all out once you can't take it any more. ":mov $sel2,"The walls of her tail's mouth contract in a wave, as if licking Luka's penis!"
if %ransu=4 mov $sel1,"Luka-boy, you're being raped by my tail. ":mov $sel2,"Alma Elma's tail tightens around Luka's penis!"
if %ransu=5 mov $sel1,"Haha... I'll play with you even more. ":mov $sel2,"Alma Elma's tail squeezes Luka's penis!"
if %ransu=6 mov $sel1,"Just come inside my tail... ":mov $sel2,"The tail starts to contract in a wave, as if milking Luka!"
if %ransu=7 mov $sel1,"It feels amazing, doesn't it? ":mov $sel2,"The overpowering stimulation send pleasure racing through Luka!"
if %ransu=8 mov $sel1,"I'll suck on Luka-boy's penis even more... ":mov $sel2,"Alma Elma's tail sucks on Luka's penis!"
if %ransu=9 mov $sel1,"I'll suck you harder. ":mov $sel2,"Alma Elma's tail sucks on Luka's penis!"
if %ransu=10 mov $sel1,"Do you want me to keep sucking you like this?":mov $sel2,"Alma Elma's tail sucks on Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Tail Sucking"
dwave 1,"se\ero_chupa6.ogg"
eng $sel2:$sel6
mov %damage_kotei,1
damage 30,35
skillname ""
if %mylife<36 sub %stack,1:goto *arumaeruma1_a7
sub %stack,1
goto *arumaeruma1_a6



*arumaeruma1_a7

add %stack,1
skillcount1 3072
name "Luka"
>Auu... Stop...\
name ""
name $name
>Are you going to let it out soon, Luka-boy?@
>Then... Let me finish you off.\
>Here's the final move... \
name ""
skillname "Tail Sucking"
dwave 1,"se\ero_chupa6.ogg"
>Alma Elma's tail sucks on Luka's penis!\
>From the base to the tip, Luka's thrust all the way into her hole!
mov %damage_kotei,2
damage 35,35
skillname ""
sub %stack,1
return *arumaeruma1_h6



*arumaeruma1_a8

add %stack,1
name $name
>...I'm getting bored.@
>If that's all you're able to do, shall I finish this?\
name ""
skillname "Tail Roll"
dwave 1,"se\ero_makituki3.ogg"
>Alma Elma's tail coils around Luka!
mov %damage_kotei,1
damage 15,18
mov %kousoku,1:gosub *status_print
>Luka's body is wrapped by Alma Elma's tail!\
skillname ""
if %mylife=0 sub %stack,1:return *arumaeruma1_h3
name "Luka"
>Guh...!\
name ""
sub %stack,1
goto *arumaeruma1_a9



*arumaeruma1_a9

add %stack,1
lsp 700,":a;chara\arumaeruma_st33.bmp",0,0:print 10,500
name $name
>Fufu... I'll finish you off in an instant.@
>You won't be able to endure it no matter what you do, so get ready! \
name ""
skillcount1 3173
skillname "Tail Drain"
dwave 1,"se\ero_syokusyu1.ogg"
if %hanyo1=0 lsp 690,":a;chara\arumaeruma_ct01.bmp",500,0:print 10,1000
if %hanyo1=0 lsp 690,":a;chara\arumaeruma_ct02.bmp",500,0:print 10,500
lsp 690,":a;chara\arumaeruma_ct03.bmp",500,0:print 10,500
lsp 690,":a;chara\arumaeruma_ct04.bmp",500,0:print 10,500
>The tip of Alma Elma's tail opens up sucking in Luka's penis!\
mov %kousoku,3:mov %genmogaku,100
>The tight insides of her hole forces pleasure into Luka!
mov %damage_kotei,1
damage 100,120
dwave 1,"se\ero_syokusyu3.ogg"
>Alma Elma's tail tightens, squeezing Luka!
mov %damage_kotei,1
damage 100,120
dwave 1,"se\ero_syokusyu2.ogg"
>Her insides mercilessly suck on Luka, squeezing everything out!
mov %damage_kotei,1
damage 100,120
skillname ""
sub %stack,1
return *arumaeruma1_h7



*arumaeruma1_a10

add %stack,1
skillcount1 3071
>Luka's body is wrapped by Alma Elma's tail!\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hahaha..."
if %ransu=2 mov $sel1,"Unable to move, I'll play with you all I want. "
if %ransu=3 mov $sel1,"Hahaha... Does it feel good?"
name $name
eng $sel1:$sel6\
name ""
skillname "Bound Tail Massage"
dwave 1,"se\ero_slime1.ogg"
>Bound by her tail, Alma Elma rubs Luka's penis!
mov %kousoku,2
if %nanido<2 damage 20,25
if %nanido=2 damage 30,37
if %nanido=3 damage 40,50
skillname ""
if %mylife=0 sub %stack,1:return *arumaeruma1_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*arumaeruma1_onedari

mov $list1,"Tail Massage"
if %3069>0 mov %list_num1,1
mov $list2,"Tail Mucus"
if %3070>0 mov %list_num2,1
mov $list3,"Bound Tail Massage"
if %3071>0 mov %list_num3,1
mov $list4,"Tail Suck"
if %3072>0 mov %list_num4,1
mov $list5,"Tail Drain"
if %3173>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *arumaeruma1_onedari1
if %cmd1=12 goto *arumaeruma1_onedari2
if %cmd1=13 && %kousoku=0 goto *arumaeruma1_onedari3
if %cmd1=13 && %kousoku>0 goto *arumaeruma1_onedari4
if %cmd1=14 goto *arumaeruma1_onedari5
if %cmd1=15 goto *arumaeruma1_onedari6
if %cmd1=-1 goto *arumaeruma1_main
goto *arumaeruma1_onedari



*arumaeruma1_onedari1

gosub *onedari_syori
name $name
>You want me to play with your penis?@
>Luka-boy is such a pervert. \
name ""
gosub *arumaeruma1_a1
skip -1



*arumaeruma1_onedari2

gosub *onedari_syori
name $name
>You want me to cover your penis with my tail's mucus?@
>Luka-boy is such a pervert. \
name ""
gosub *arumaeruma1_a2
skip -1



*arumaeruma1_onedari3

gosub *onedari_syori
name $name
>Bound by my tail, you want me to play with you?@
>Wanting something like that... You're quite a pervert, Luka-boy. \
name ""
gosub *arumaeruma1_a3
gosub *arumaeruma1_a10
skip -1



*arumaeruma1_onedari4

gosub *onedari_syori_k
if %kousoku<>2 skip 3
csp 690
lsp 700,":a;chara\arumaeruma_st43.bmp",0,0:print 10,500
name $name
>You want me to continue playing with your penis like this?@
>Wanting something like that... You're quite a pervert, Luka-boy. \
name ""
gosub *arumaeruma1_a10
skip -1



*arumaeruma1_onedari5

gosub *onedari_syori_k
name $name
>You want me to squeeze everything out of you with my tail?@
>Begging me to do something like that... What a naughty boy. \
name ""
if %kousoku=0 gosub *arumaeruma1_a3
if %kousoku=1 gosub *arumaeruma1_a4
gosub *arumaeruma1_a5



*arumaeruma1_onedari6

gosub *onedari_syori_k
name $name
>You want to taste heaven inside my tail?@
>Then... Get ready. \
name ""
if %kousoku=0 gosub *arumaeruma1_a3
if %kousoku=2 mov %hanyo1,1
gosub *arumaeruma1_a9



*arumaeruma1_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\arumaeruma_bk01.bmp",0,0
gosub *syasei2
>Stroked by her tail, Luka is forced to ejaculate.\
mov %viclose,1:gosub *lose
mov %2525,%2525+1:if %2525=1 mov %count_koenemy,%count_koenemy+1
if %2525>%count_most mov %count_most,%2525:mov $count_mostname,$name
count 19,11
mov $bad1," Luka succumbs to Alma Elma's tail."
mov $bad2," After being squeezed dry, Luka was swallowed whole by her tail."
name $name
>Haha... You let out so much.@
>Did it feel good, Luka-boy?\
name ""
goto *arumaeruma1_h



*arumaeruma1_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\arumaeruma_bk01.bmp",0,0
gosub *syasei2
>Covered in her tail's mucus, Luka is forced to ejaculate.\
mov %viclose,1:gosub *lose
mov %2525,%2525+1:if %2525=1 mov %count_koenemy,%count_koenemy+1
if %2525>%count_most mov %count_most,%2525:mov $count_mostname,$name
count 11,11
mov $bad1," Luka succumbs to Alma Elma's mucus."
mov $bad2," After being squeezed dry, Luka was swallowed whole by her tail."
name $name
>You leaked out of your sticky penis...@
>Aren't you ashamed, Luka-boy? \
name ""
goto *arumaeruma1_h



*arumaeruma1_h3

mov %ikigoe,3:gosub *ikigoe
name $name
>Arara?\
name ""
gosub *syasei1
lsp 691,":a;chara\arumaeruma_bk01.bmp",0,0
gosub *syasei2
>While being coiled up in her tail, Luka accidentally ejaculates.\
mov %viclose,1:gosub *lose
mov %2525,%2525+1:if %2525=1 mov %count_koenemy,%count_koenemy+1
if %2525>%count_most mov %count_most,%2525:mov $count_mostname,$name
count 19,11
mov %count_bouhatu,%count_bouhatu+1
mov $bad1," Luka ejaculates on accident to Alma Elma's binding."
mov $bad2," After being squeezed dry, Luka was swallowed whole by her tail."
name $name
>Hahaha, you already let it out?@
>Aren't you ashamed, Luka-boy? \
name ""
goto *arumaeruma1_h



*arumaeruma1_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\arumaeruma_bk01.bmp",0,0
gosub *syasei2
>Stroked by her tail while bound, Luka is forced to ejaculate.\
mov %viclose,1:gosub *lose
mov %2525,%2525+1:if %2525=1 mov %count_koenemy,%count_koenemy+1
if %2525>%count_most mov %count_most,%2525:mov $count_mostname,$name
count 19,11
mov $bad1," Luka succumbs to Alma Elma's tail while bound."
mov $bad2," After being squeezed dry, Luka was swallowed whole by her tail."
name $name
>Haha... You let out so much.@
>Are you satisfied, Luka-boy?\
name ""
goto *arumaeruma1_h



*arumaeruma1_h5

mov %ikigoe,2:gosub *ikigoe
>The soft flesh inside Alma Elma's tail stimulates Luka, forcing him to come!\
gosub *syasei1
lsp 700,":a;chara\arumaeruma_st32b.bmp",0,0
lsp 690,":a;chara\arumaeruma_ct05.bmp",500,0
gosub *syasei2
>Not even lasting ten seconds after insertion, Luka explodes inside her tail in shame.\
mov %viclose,1:gosub *lose
mov %2525,%2525+1:if %2525=1 mov %count_koenemy,%count_koenemy+1
if %2525>%count_most mov %count_most,%2525:mov $count_mostname,$name
count 19,11
mov %count_bouhatu,%count_bouhatu+1
mov $bad1," Sucked by Alma Elma's tail, Luka is instantly defeated."
mov $bad2," After being squeezed dry, Luka was swallowed whole by her tail."
name $name
>Hahaha... Defeated in one move! \
csp 690
lsp 700,":a;chara\arumaeruma_st33b.bmp",0,0:print 10,500
>You let out so much... How pathetic!@
>Did it feel that good? \
name ""
goto *arumaeruma1_h



*arumaeruma1_h6

mov %ikigoe,2:gosub *ikigoe
>Unable to stand the pleasure, Luka comes!\
gosub *syasei1
lsp 700,":a;chara\arumaeruma_st32b.bmp",0,0
lsp 690,":a;chara\arumaeruma_ct05.bmp",500,0
gosub *syasei2
>Exploding inside her tail, Luka is overcome by weakness.\
mov %viclose,1:gosub *lose
mov %2525,%2525+1:if %2525=1 mov %count_koenemy,%count_koenemy+1
if %2525>%count_most mov %count_most,%2525:mov $count_mostname,$name
count 19,11
mov $bad1," Luka explodes inside Alma Elma's tail."
mov $bad2," After being squeezed dry, Luka was swallowed whole by her tail."
csp 690
lsp 700,":a;chara\arumaeruma_st33b.bmp",0,0:print 10,500
name $name
>You let out so much... How pathetic!@
>Did it feel that good? \
name ""
goto *arumaeruma1_h



*arumaeruma1_h7

name "Luka"
>Aaaaaa!\
name ""
gosub *syasei1
lsp 700,":a;chara\arumaeruma_st33b.bmp",0,0
lsp 690,":a;chara\arumaeruma_ct05.bmp",500,0
gosub *syasei2
>Pleasure extending to my very bones, I explode inside of her tail, as if my soul itself was being sucked out.\
name "Luka"
>Ahh...@> What's this...\
name ""
lsp 690,":a;chara\arumaeruma_ct06.bmp",500,0:print 10,500
>For some reason, I'm unable to stop coming in her tail.@
>The sweet pleasure is flowing through my body, as if something is forcefully sucking everything out of me.\
gosub *anten
>The sucking that seems to take my soul itself sends me into unconsciousness.\
mov %viclose,1:gosub *lose
mov %2525,%2525+1:if %2525=1 mov %count_koenemy,%count_koenemy+1
if %2525>%count_most mov %count_most,%2525:mov $count_mostname,$name
count 19,11
mov $bad1," Luka ascends to heaven with Alma Elma's Tail Drain."
mov $bad2," After being squeezed dry, Luka was swallowed whole by her tail."
gosub *clear_sprite
gosub *setwindow_01p
if %2525=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
goto *arumaeruma1_hb



*arumaeruma1_h

if %2525=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
cspl 690,699
lsp 700,":a;chara\arumaeruma_st32.bmp",0,0:print 10,500
if %con_hvoice=0 dwave 0,"voice\arumaeruma1_01a.ogg"
name $name
>But I'll still suck out more... \
if %con_hvoice=0 dwave 0,"voice\arumaeruma1_01b.ogg"
>With this tail, I'll chew on your penis...
>I'll squeeze out all of Luka-boy's semen. \
name ""
dwavestop 0
name "Luka"
>No way...!@> Stop!\
name ""
dwave 1,"se\ero_pyu2.ogg"
lsp 690,":a;chara\arumaeruma_ct01.bmp",500,0:print 10,1000
lsp 690,":a;chara\arumaeruma_ct02.bmp",500,0:print 10,500
>Her tail opens, and slowly approaches my dick.@
>The flesh inside of her hole wriggles around.\
name "Luka"
>Uaaaa...\
name ""
>Seeing the seductive hole approach me, I try to swallow my rising desire.\
>I want to see what it feels like...@
>Such a ruinous desire boils up through me.\
>As if seeing my state of mind, Alma Elma flashes a sadistic smile at me.\
if %con_hvoice=0 dwave 0,"voice\arumaeruma1_02.ogg"
name $name
>Then... I'll eat your penis...
>I'm going to suck it, so get ready. \
name ""
dwavestop 0
name "Luka"
>Ahh! Ahii!\
name ""
mov %hseanwave,9:hseanwave
lsp 690,":a;chara\arumaeruma_ct03.bmp",500,0:print 10,500
lsp 690,":a;chara\arumaeruma_ct04.bmp",500,0:print 10,500
>As soon as her tail sucks in my penis, my body twitches furiously.\
>Her soft walls rub and massage me all over, wriggling and vibrating as if they were acting on their own.\
>The unrivaled pleasure makes it feel like my penis is being melted in ecstasy.\
name "Luka"
>Faaa!\
name ""
if %con_hvoice=0 dwave 0,"voice\arumaeruma1_03a.ogg"
name $name
>Does it feel good having your penis chewed on by my tail?
>Let out your sticky white juice, boy.\
if %con_hvoice=0 dwave 0,"voice\arumaeruma1_03b.ogg"
>Because I'll eat that delicious semen too. \
name ""
dwavestop 0
name "Luka"
>No way... Stop!\
name ""
>Letting out my semen in her tail...@
>I can't let such a thing happen...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma1_04.ogg"
name $name
>But you can't stand it, right?
>Because my tail feels many times more amazing than any monster's pussy. \
name ""
dwavestop 0
>Her wriggling walls give a strange pleasure to me.@
>While being sucked and rubbed, it's as if my penis is melting.\
>No matter how much I try to endure it, the pleasure overpowers me.\
name "Luka"
>Auuu...!\
name ""
>Unable to do anything but moan, a realization comes to me.\
>The only purpose of this tail is to force a man to come...@
>Once I was sucked into here, I have no choice but to ejaculate...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma1_05.ogg"
name $name
>Hora... You can't bear it, right?
>Now... Let it gush out! \
name ""
dwavestop 0
name "Luka"
>Aaaaa!\
name ""
>Unable to endure the amazing pleasure forced into me, I finally succumb.\
gosub *syasei1
lsp 700,":a;chara\arumaeruma_st32b.bmp",0,0
lsp 690,":a;chara\arumaeruma_ct05.bmp",500,0
gosub *syasei2
name "Luka"
>Faaa!\
name ""
>As I ejaculate, her walls suddenly contract in waves, as if milking every drop from me.\
>Breaking the taboo and giving semen to a monster...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma1_06.ogg"
name $name
>Hahaha... So much of Luka-boy's juice. 
>But I want to squeeze more out of you...\
name ""
dwavestop 0
name "Luka"
>No... Please stop!@> Auuu!\
name ""
mov %hseanwave,10:hseanwave
>Her tail tightens around my penis.@
>Squeezing and sucking, it's trying to get me to come even more.\
if %con_hvoice=0 dwave 0,"voice\arumaeruma1_07.ogg"
name $name
>Because I defeated you, you're just my food.
>From your cute penis, I'll squeeze everything out of you. \
name ""
dwavestop 0
name "Luka"
>Ahiii!\
name ""
>She starts to move her tail up and down, slowly pumping me in her tight hole.\
name "Luka"
>Auuu...\
name ""
if %con_hvoice=0 dwave 0,"voice\arumaeruma1_08.ogg"
name $name
>Fufu... It feels good, right?
>Trying to endure it is pointless.\
name ""
dwavestop 0
name "Luka"
>Aaaa!\
name ""
>The pleasure focused on my penis starts to shoot up my spine, as I start to feel awash in ecstasy.\
>Feeling the desire to orgasm rise in me, I'm beginning to surrender...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma1_09.ogg"
name $name
>Fufu... It looks like you're at your limit.
>Now... Leak it out again. \
name ""
dwavestop 0
>Her tail quickly tightens around me, from the tip to the base.@
>The intense pressure, coupled with her movements, are too much for me to take.\
name "Luka"
>Aaaa!\
name ""
gosub *syasei1
lsp 690,":a;chara\arumaeruma_ct06.bmp",500,0
gosub *syasei2
>Forcefully given even more pleasure, I quickly climax.\
if %con_hvoice=0 dwave 0,"voice\arumaeruma1_10.ogg"
name $name
>It's not over yet...
>I'll thoroughly squeeze all of your semen out. \
name ""
dwavestop 0
name "Luka"
>No way... Aaa!\
name ""
>Her tail, whose only purpose is to force a man to ejaculate, continues to wring everything out of me.\
name "Luka"
>Auuu!@
>Stop! I'm coming again!\
name ""
gosub *syasei1:gosub *syasei2
if %con_hvoice=0 dwave 0,"voice\arumaeruma1_11.ogg"
name $name
>You can let out more, right?
>Horahorahora... I'll give you a taste of heaven.\
name ""
dwavestop 0
name "Luka"
>Hiiii!\
name ""
gosub *syasei1:gosub *syasei2
>Sucked mercilessly, I'm forced to come over and over again.\
gosub *anten
mov %hseanwave,0:hseanwave
>Exhausted at climaxing so many times, I lose consciousness.\
goto *arumaeruma1_hb



*arumaeruma1_hb

>...............\
monocro off
bg "bg\bg036.bmp",10,3000
lsp 700,":a;chara\arumaeruma_st21.bmp",0,0
print 10,3000
name "Luka"
>Uhhh...?\
name ""
if %con_hvoice=0 dwave 0,"voice\arumaeruma1_12.ogg"
name $name
>Good morning, Luka-boy.
>You fainted for a few minutes.\
name ""
dwavestop 0
>Even if I awoke from a dream, I was greeted only by a nightmare.\
>Or is this a dream of heaven?@
>I don't even know anymore.\
if %con_hvoice=0 dwave 0,"voice\arumaeruma1_13a.ogg"
name $name
>Now, having sucked all of your semen out...@
lsp 700,":a;chara\arumaeruma_st33.bmp",0,0:print 10,500
if %con_hvoice=0 dwave 0,"voice\arumaeruma1_13b.ogg"
>I'll suck up your body. \
name ""
dwavestop 0
name "Luka"
>What!?\
name ""
>Alma Elma's mouth at the end of her tail opens extremely wide.@
>It's like a snake unhinging its jaws, about to swallow its prey whole.\
name "Luka"
>No... Stop!\
name ""
if %con_hvoice=0 dwave 0,"voice\arumaeruma1_14.ogg"
name $name
>Haha... I'll swallow you whole with this tail, Luka-boy.
>I'll melt you into syrup inside my tail, and you can become one with me. \
name ""
dwavestop 0
name "Luka"
>Hii! Stop it!\
name ""
if %con_hvoice=0 dwave 0,"voice\arumaeruma1_15.ogg"
name $name
>No~~pe! 
>Hora... I'll start now. \
name ""
dwavestop 0
if %hosyoku_cut=1 goto *hosyoku_cut
mov %hseanwave,12:hseanwave
csp 700
lsp 701,":a;chara\arumaeruma_ha1.bmp",0,0:print 10,500
>Her tail shoots towards me, and swallows me in one bite!@
>Warm and sticky inside, I'm slowly forced deeper inside of her.\
name "Luka"
>Aaaa!\
name ""
lsp 700,":a;chara\arumaeruma_hb1.bmp",0,0:print 10,500
>Stuck inside of her, her walls close in on me as I struggle desperately.@
>I can feel her insides moving, and her heartbeat through the walls around me.\
>I'm unable to move my upper body as her walls close in on me.@
>Unable to struggle, I feel a warm fluid cover my body.\
>The fluid brings a strange feeling to my body the more it covers me.\
name "Luka"
>Faaa...\
name ""
if %con_hvoice=0 dwave 0,"voice\arumaeruma1_16a.ogg"
name $name
>Fufu... Are you feeling entranced?
>Being absorbed by me, the Queen Succubus, is the ultimate pleasure after all. \
mov %hseanwave,13:hseanwave
lsp 701,":a;chara\arumaeruma_ha2.bmp",0,0
lsp 700,":a;chara\arumaeruma_hb2.bmp",0,0:print 10,500
if %con_hvoice=0 dwave 0,"voice\arumaeruma1_16b.ogg"
>Hora... I'll give you more of my digestive juices. \
name ""
dwavestop 0
>More of the strange warm mucus gushes out from inside her, covering my body.\
>As more of it covers me, the ecstasy it brings takes over more of my body.\
>I want more of it...@
>Immersed in her digestive juices, I become a prisoner of desire.\
lsp 701,":a;chara\arumaeruma_ha3.bmp",0,0
lsp 700,":a;chara\arumaeruma_hb3.bmp",0,0:print 10,500
name "Luka"
>Faa...\
name ""
>I stop struggling inside of her, and give in to my fate of being eaten.\
>If I can feel this amazing pleasure, I want her to eat me...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma1_17.ogg"
name $name
>Hoora... I'll take my time eating you. \
name ""
dwavestop 0
>Ending my resistance, my whole body is swallowed by her tail.\
lsp 701,":a;chara\arumaeruma_ha4.bmp",0,0
lsp 700,":a;chara\arumaeruma_hb4.bmp",0,0:print 10,500
>Now completely covered in her digestive juices, I soak in the pleasure.\
name "Luka"
>Aaa... It's amazing...\
name ""
>Even though I know I'm being digested, I can't help but give in to this pleasure.\
>My whole body is inside of her soft flesh, tightly wrapped up inside of her.\
>In particular, my penis is covered in her digestive juices and rubbing against her wall.\
name "Luka"
>Aaaa... It's too good...\
name ""
gosub *syasei1
lsp 700,":a;chara\arumaeruma_hb5.bmp",0,0
gosub *syasei2
>The overpowering pleasure forces me to come again.@
>The thought that she's also eating my semen brings me a sick happy feeling.\
if %con_hvoice=0 dwave 0,"voice\arumaeruma1_18.ogg"
name $name
>You're so cute, Luka-boy. 
>While being digested, your penis still leaked out more. \
name ""
dwavestop 0
>The sound of Alma Elma laughing at me starts to slowly fade as I feel my consciousness start to fade.\
>Slowly being digested, I feel my body move along her digestive tract.\
>The sweet ecstasy of being digested...\
name "Luka"
>Faa...\
name ""
>I completely give my body and soul to her, surrendering everything to her.\
>Alma Elma will absorb my entire being, and I'll become one with her...\
name "Luka"
>Aaa...\
name ""
>My body will dissolve and turn into her food...@
>It's as if being in a paradise of pleasure...\
gosub *anten
mov %hseanwave,0:hseanwave
>Thus, I was eaten by Alma Elma.@
>Giving her my body and soul, I become one with her.\
>..........\
goto *badend



*namako_start

mov $name,"Sea Cucumber Girl"
mov $name2,"Sea Cucumber Girl"
mov $lavel,"namako"
mov $tatie1,"namako_st01"
mov $tatie2,"namako_st02"
mov $tatie3,"namako_st03"
mov $tatie4,"namako_h1"
mov $haikei,"bg039"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,400
if %nanido=2 mov %max_enemylife,400
if %nanido=3 mov %max_enemylife,500
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,99
mov %music,1
gosub *maxmp:mov %mp,%max_mp
mov %tikei,0
gosub *syutugen
mov $mogaku_anno1,"Luka can't escape from the Sea Cucumber Girl's mouth!"
mov $mogaku_anno2,"Luka escaped from the cucumber's mouth!"
mov $mogaku_anno3,"Luka is unable to attack like this!"
mov $mogaku_sel1,"I'll take away your power to resist..."
mov $mogaku_sel2,"I'll squeeze everything out of you, just like this..."
mov $mogaku_sel3,"What are you doing? Just get sucked quietly..."
mov $mogaku_sel4,"It's pointless to struggle... I'll suck everything out."
mov $mogaku_sel5,"Just sit back and enjoy it as I suck everything out..."
mov $mogaku_dassyutu1,"Impossible... You broke free?"
mov $mogaku_dassyutu2,""
mov $half_s1,"At this rate, I'll make you submit in no time..."
mov $half_s2,""
mov $kiki_s1,"You're almost done..."
mov $kiki_s2,"Your fresh semen wants to be sucked out by me..."
mov %end_n,2
mov %zmonster_x,-170
mov %tukix,290
mov %tukiy,80
mov %owaza_count2a,5
lsp 700,":a;chara\kai_st12.bmp",-220,0
lsp 701,":a;chara\namako_st01.bmp",230,0:print 10,500
name "Young Woman"
>Ahh! Get away from me!\
name ""
name $name
>I'm hungry...@
>Even someone like you is fine, let me suck out your energy...\
name ""
name "Young Woman"
>Stop!\
name ""
name "Luka"
>Get away from her!\
name ""
dwave 1,"se\asioto1.ogg"
>I jump in between the woman and the monster!\
name "Young Woman"
>Who are you!?\
name ""
name "Luka"
>Leave this to me, please hurry up and run away!\
name ""
name "Young Woman"
>O...Ok!\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,500
>The girl runs away safely.@
>But the Sea Cucumber Girl doesn't give chase.\
>It seems her interest has shifted to me...\
csp 701
lsp 700,":a;chara\namako_st02.bmp",0,0:print 10,500
name $name
>You look delicious...@
>I'll hold you in my mouth and squeeze out all of your semen...\
name ""
name "Luka"
>Like hell you will!\
name ""
>I quickly unsheathe my sword and take my stance.@
>If I can beat monsters on the Ilias Continent, I can beat them on Sentora!\
gosub *face1
mov %sinkou,1
goto *common_main



*namako_v

gosub *face3
name $name
>To a human... No way...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Sea Cucumber Girl turns into a normal sea cucumber!\
mov %viclose,1:gosub *victory
mov %getexp,500:gosub *lvup
mov %2226,1
goto *sean0093



*namako_kousan

gosub *kousan_syori
>Luka gives in to the promise of pleasure, ending his resistance!\
gosub *face2
name $name
>You gave up?@
>Then, I'll squeeze everything out...\
name ""
goto *namako_a



*namako_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *namako_kousan
if %cmd1=16 goto *namako_onedari
if %cmd1=17 goto *common_skill
goto *namako_main



*namako_a

if %kousoku=1 rnd2 %ransu,1,2
if %kousoku=1 && %ransu=1 gosub *namako_a3:goto *common_main
if %kousoku=1 && %ransu=2 && %owaza_count2a>5 && %status=0 gosub *namako_a4:goto *common_main
if %kousoku=1 skip -3
if %hanyo6=0 gosub *namako_a1:goto *common_main
if %hanyo6=1 gosub *namako_a2:goto *common_main



*namako_a1

add %stack,1
skillname "Suction Preparation"
>The Sea Cucumber Girl prepares to suck in Luka!\
skillname ""
name $name
if %first_sel2=1 skip 4
>Just wait a moment, I'll get ready to squeeze everything out of you...@
>Warm and full of amazing juices... It will feel amazing.\
skip 3
>Don't you want to feel the pleasure in here again?@
>I'll envelope you again...\
name ""
mov %hanyo6,1
mov %first_sel2,1
sub %stack,1
return



*namako_a2

add %stack,1
name $name
>Now... Come in...\
name ""
skillname "Sea Cucumber Suck"
dwave 1,"se\ero_makituki2.ogg"
>Luka's body is sucked into the Sea Cucumber Girl's mouth!
damage 11,13
mov %kousoku,1:gosub *status_print
>Luka's body is stuck inside her mouth!\
skillname ""
if %mylife=0 sub %stack,1:return *namako_h1
if %first_sel1=1 skip 4
if %kousan=0 mov $sel1,"Gah! What is this!?"
if %kousan>0 mov $sel1,"Ahhh..."
skip 3
if %kousan=0 mov $sel1,"Crap... Not again!"
if %kousan>0 mov $sel1,"Ahhh..."
name "Luka"
eng $sel1:$sel6\
name ""
if %first_sel1=1 skip 3
>Her interior is warm, and filled with mucus.@
>As if in a tight sleeping bag, her body tightly wraps around me.\
gosub *face2
name $name
if %first_sel1=1 skip 4
>My mouth is amazing, isn't it?@
>Licking and squeezing, I'll suck everything out of you...\
skip 3
>You're back inside...@
>This time, you won't escape.\
name ""
mov %hanyo6,0
mov %first_sel1,1
if %nanido<2 mov %genmogaku,2
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,4
sub %stack,1
return



*namako_a3

add %stack,1
skillcount1 3073
>Stuck in the Sea Cucumber Girl's mouth, Luka is being viciously sucked.\
rnd2 %ransu,1,10
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll play with you...":mov $sel2,"The Sea Cucumber Girl's interior rubs all over Luka's body!"
if %ransu=2 mov $sel1,"How do you like the tongues inside of me?":mov $sel2,"Hundreds of tongues inside the Sea Cucumber Girl's body lick Luka all over!"
if %ransu=3 mov $sel1,"At this rate, you won't last...":mov $sel2,"The Sea Cucumber Girl tightens around Luka's body!"
if %ransu=4 mov $sel1,"How does it feel having your whole body squeezed?":mov $sel2,"The inside of her body contracts around Luka!"
if %ransu=5 mov $sel1,"Do you like being tormented like this?":mov $sel2,"The Sea Cucumber Girl's inner walls massage Luka all over!"
if %ransu=6 mov $sel1,"I'll cover you...":mov $sel2,"Sticky mucus secretes out inside of the cucumber, covering Luka's body!"
if %ransu=7 mov $sel1,"I'll play with your penis...":mov $sel2,"The walls surrounding Luka's penis contract!"
if %ransu=8 mov $sel1,"I'll force pleasure into you...":mov $sel2,"The walls surrounding Luka's penis contract!"
if %ransu=9 mov $sel1,"How does this feel?":mov $sel2,"The walls surrounding Luka quickly contract!"
if %ransu=10 mov $sel1,"Let it out just like this...":mov $sel2,"The walls surrounding Luka sharply contract!"
name $name
eng $sel1:$sel6\
name ""
skillname "Semen Squeeze"
dwave 1,"se\ero_slime1.ogg"
lsp 690,":a;chara\namako_ct01.bmp",0,0:print 10,500
eng $sel2:$sel6
if %nanido<2 damage 11,13
if %nanido=2 damage 16,19
if %nanido=3 damage 22,26
skillname ""
if %mylife=0 && %status=0 sub %stack,1:return *namako_h2
if %mylife=0 && %status=1 sub %stack,1:return *namako_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*namako_a4

add %stack,1
mov %owaza_count2a,0
skillcount1 3074
if %status=1 >Luka is immersed in ecstasy!\
>Stuck in the Sea Cucumber Girl's mouth, Luka is being viciously sucked.\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll give you a special service..."
if %ransu=2 mov $sel1,"Just accept the pleasure while stuck in a trance..."
if %ransu=3 mov $sel1,"I'll force you to surrender to the ecstasy..."
name $name
eng $sel1:$sel6\
name ""
skillname "Ecstasy Rub"
dwave 1,"se\ero_makituki3.ogg"
lsp 690,":a;chara\namako_ct01.bmp",0,0:print 10,500
>Wrapped in the Sea Cucumber Girl's mouth, her walls begin to violently massage Luka all over!\
>An overpowering ecstasy starts to spread through Luka's body!
if %nanido<2 damage 11,13
if %nanido=2 damage 16,19
if %nanido=3 damage 22,26
if %status=0 mov $sel1,"Luka has been put under a trance!"
if %status=1 mov $sel1,""
mov %status,1:gosub *status_print
if $sel1<>"" eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *namako_h3
if %kousan=2 && %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %kousan=2 && %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
if %kousan=2 sub %stack,1:return
name "Luka"
>Aaa...\
name ""
name $name
>Stay entranced in ecstasy like that...@
>I'll take care of everything...\
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,3,4
if %nanido=3 rnd2 %status_turn,4,5
sub %stack,1
return



*namako_onedari

mov $list1,"Semen Squeeze"
if %3073>0 mov %list_num1,1
mov $list2,"Ecstasy Rub"
if %3074>0 mov %list_num2,1
gosub *cmd_onedari
if %cmd1=11 goto *namako_onedari1
if %cmd1=12 goto *namako_onedari2
if %cmd1=-1 goto *namako_main
goto *namako_onedari



*namako_onedari1

gosub *onedari_syori_k
name $name
if %kousoku=1 skip 3
>You want me to suck you into my mouth, then suck all your semen out?\
skip 2
>Stuck in my mouth, you want me to suck everything out?@
>Fufu... How lewd for such a small boy...\
name ""
if %kousoku=0 gosub *namako_a2
gosub *namako_a3
skip -1



*namako_onedari2

gosub *onedari_syori_k
name $name
if %kousoku=1 skip 3
>You want me to suck you into my mouth and put in a trance of ecstasy?\
skip 2
>Like this, you want to be immersed in ecstasy?@
>Fufu... How lewd for such a small boy...\
name ""
if %kousoku=0 gosub *namako_a2
gosub *namako_a4
skip -1



*namako_h1

mov %ikigoe,3:gosub *ikigoe
lsp 690,":a;chara\namako_ct01.bmp",0,0:print 10,500
name $name
>Oh...?\
name ""
gosub *syasei1
lsp 690,":a;chara\namako_ct02.bmp",0,0
lsp 700,":a;chara\namako_h2.bmp",0,0
gosub *syasei2
>As soon as Luka was sucked into her mouth, he accidentally ejaculates.\
mov %viclose,1:gosub *lose
mov %2526,%2526+1:if %2526=1 mov %count_koenemy,%count_koenemy+1
if %2526>%count_most mov %count_most,%2526:mov $count_mostname,$name
count 2,3
mov %count_bouhatu,%count_bouhatu+1
mov $bad1," While being sucked into the Sea Cucumber Girl's mouth, Luka accidentally ejaculates."
mov $bad2," Trapped in her mouth, Luka's semen was continually sucked out for the rest of his life."
csp 690:print 10,500
name $name
>Haha... You let it out as soon as you came inside.@
>Fufu... How pathetic.\
name ""
goto *namako_h



*namako_h2

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\namako_ct02.bmp",0,0
lsp 700,":a;chara\namako_h2.bmp",0,0
gosub *syasei2
>Stuck inside the Sea Cucumber Girl's mouth, Luka succumbs to her squeezing.\
mov %viclose,1:gosub *lose
mov %2526,%2526+1:if %2526=1 mov %count_koenemy,%count_koenemy+1
if %2526>%count_most mov %count_most,%2526:mov $count_mostname,$name
count 2,3
mov $bad1," Stuck in the Sea Cucumber Girl's mouth, Luka succumbs to her powerful squeezing."
mov $bad2," Trapped in her mouth, Luka's semen was continually sucked out for the rest of his life."
csp 690:print 10,500
name $name
>Fufu... Was it amazing?@
>I'll make sure you let out a lot more from now on...\
name ""
goto *namako_h



*namako_h3

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\namako_ct02.bmp",0,0
lsp 700,":a;chara\namako_h2.bmp",0,0
gosub *syasei2
>Stuck in a trance of ecstasy, Luka explodes inside of the Sea Cucumber Girl's mouth.\
mov %viclose,1:gosub *lose
mov %2526,%2526+1:if %2526=1 mov %count_koenemy,%count_koenemy+1
if %2526>%count_most mov %count_most,%2526:mov $count_mostname,$name
count 2,3
mov $bad1," Stuck in the Sea Cucumber Girl's mouth, Luka's forced to ejaculate while in a trance."
mov $bad2," Trapped in her mouth, Luka's semen was continually sucked out for the rest of his life."
csp 690:print 10,500
name $name
>Isn't letting it out while in a trance the best?@
>I'll make sure you let out a lot more from now on...\
name ""
goto *namako_h



*namako_h

if %2526=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name $name
>Now, I'll suck and squeeze more and more.@
>Until I'm fully satisfied, I won't let you go.\
name ""
name "Luka"
>Ahiii!\
name ""
mov %hseanwave,21:hseanwave
lsp 690,":a;chara\namako_ct01.bmp",0,0:print 10,500
>Stuck in her mouth, she starts to move her mouth around, rubbing me all over my body.\
>Her insides are warm and sticky, the mucus causing my body to cling to her walls.\
>It's as if my whole body is stuck inside a giant pussy, designed only to force pleasure into me.\
name "Luka"
>Haaa!@>Stop!\
name ""
name $name
>Now... Let it out.@
>Let me eat all your semen...\
name ""
>Her movements were much more forceful than the first time I came inside her.\
>Stuck inside of her body, I can feel all of her muscles and organs through her walls.\
>I may be stuck in an organ itself, whose sole purpose is to force an ejaculation...\
name "Luka"
>Auuu!\
name ""
>Despite feeling horror at my situation, I can't resist the pleasure.\
>Captured by such a strange monster, I'm being forced to ejaculate in such a pathetic way.\
>Knowing that she's only squeezing me to feed on semen, the humiliation brings a sick pleasure.\
name "Luka"
>Ahhh!\
name ""
>The desire to release rises up quickly through me.@
>Stuck in her tight wriggling mouth, I'm forced to ejaculate in misery.\
gosub *syasei1
lsp 700,":a;chara\namako_h2.bmp",0,0
lsp 690,":a;chara\namako_ct02.bmp",0,0
gosub *syasei2
>My body shakes pitifully as I explode inside of her mouth.@
>Frustrated at being powerless, tears start to flow down my face.\
name $name
>Fufu... Crying during an orgasm?\
>No matter how mortifying, you're just my pitiful prey now.@
>I just need to stimulate you a little, and I get to feed on your delicious male juice.\
name ""
name "Luka"
>Doing something like tha... Ahhh!\
name ""
mov %hseanwave,22:hseanwave
>While my mind tries to reject the pleasure, my body is happily accepting it.\
>Stuck inside of her, the pleasure attacking me all over my body makes it feel like I'm being melted inside of her.\
name "Luka"
>No more... Or I'll come again...\
name ""
>The Sea Cucumber Girl laughs at me as I summon all of my remaining power to try to endure the rising desire to release.\
name $name
>Fufu... Even if you try to endure, it's pointless.@
>Wrapped up like this, you have no choice but to give in to what I want.\
name ""
name "Luka"
>Faaa...\
name ""
>The sweet pleasure erodes my willpower, as my body begins to overpower my mind.\
>The rising orgasm thrusts aside my mind, as my body gives in to the pleasure.\
name "Luka"
>Aaahhh!!\
name ""
gosub *syasei1
lsp 690,":a;chara\namako_ct03.bmp",0,0
gosub *syasei2
>As I explode in her mouth yet again, she doesn't stop squeezing and massaging me.\
name "Luka"
>Haaa...\
name ""
name $name
>That felt amazing, right? You want to come over and over again, right?@
>Don't worry, I'll keep this up until you're dry...\
name ""
name "Luka"
>Faa... Too good...\
name ""
>The sweet ecstasy forced into me finally takes over my mind.@
>Resigned to my fate, I accept the pleasure.\
>Surrendering my body to her, I enjoy the stimulation.@
>At last, my body and mind have both been given to the Sea Cucumber Girl.\
name $name
>Fufu... So you stopped struggling.\
>Don't be ashamed, you're just a pathetic human man after all.@
>Even if you resist at first, it was inevitable that you'd become a prisoner.\
name ""
name "Luka"
>Faaa... More...@>Suck me more...\
name ""
>My entire body squeezed by the cucumber, the ecstasy floods my body.@
>Even though she's doing whatever she wants to me, I feel so good...\
name "Luka"
>Ahh... I'm coming again!\
name ""
gosub *syasei1
lsp 690,":a;chara\namako_ct04.bmp",0,0
lsp 700,":a;chara\namako_h3.bmp",0,0
gosub *syasei2
>Rejoicing at the sense of release, I give more of my semen to the Sea Cucumber Girl.\
>Completely dominated by her, this is my new role as a man.\
name "Luka"
>Auu... More...\
name ""
name $name
>Fufu... Good boy.@
>I'll squeeze out as much as you want, so just stay in a trance inside of me...\
name ""
name "Luka"
>Auuu!\
name ""
>Once I surrendered, everything became easy.@
>All I have to do is lay back and let her continue to take me to heaven...\
gosub *syasei1:gosub *syasei2
name "Luka"
>Faa...\
name ""
>Stuck in her strange mouth, I melt in the overpowering pleasure.@
>Coming over and over, she squeezes me completely dry.\
gosub *syasei1:gosub *syasei2
>Not even letting out semen as I orgasm anymore, my vision starts to fade.\
name "Luka"
>Auu...@
>Amazing...\
name ""
name $name
>...Fufu, I won't let you die.@
>I'll squeeze everything out until you're on the brink of death, then revive you and start it all over again.\
>From now on, you're my slave.\
>Hahahahaha.\
name ""
name "Luka"
>...........\
name ""
>As I listen to her laugh, my consciousness fades.\
gosub *anten
mov %hseanwave,0:hseanwave
>For giving her my body and mind, she'll continue to reward me like this...\
>Immersed in the ecstasy, she continues to squeeze me for the rest of my life.\
>.........\
goto *badend



*kai_start

mov $name,"Shellfish Girl"
mov $name2,"Shellfish Girl"
mov $lavel,"kai"
mov $tatie1,"kai_st01"
mov $tatie2,"kai_st02"
mov $tatie3,"kai_st03"
mov $tatie4,"kai_h1"
mov $haikei,"bg039"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,380
if %nanido=2 mov %max_enemylife,500
if %nanido=3 mov %max_enemylife,620
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,99
mov %music,1
gosub *maxmp:mov %mp,%max_mp
mov %tikei,0
gosub *syutugen
mov $mogaku_anno1,"Luka can't escape from her shell!"
mov $mogaku_anno2,"Luka broke free of her shell!"
mov $mogaku_anno3,"Luka is unable to attack like this!"
mov $mogaku_sel1,"Geez... Stop struggling..."
mov $mogaku_sel2,"Just come like this, and be my husband."
mov $mogaku_sel3,"I need to make you come before it's too late..."
mov $mogaku_sel4,"If you just sit back, I can make you feel amazing..."
mov $mogaku_sel5,"I won't let you go even if you struggle!"
mov $mogaku_dassyutu1,"Why did you run away, Darling...?"
mov $mogaku_dassyutu2,""
mov $half_s1,"Does it feel good?"
mov $half_s2,"Why don't you just give in and become my husband? "
mov $kiki_s1,"You're almost done..."
mov $kiki_s2,"I want to make a lot of cute babies with you! "
mov %end_n,2
mov %zmonster_x,-300
mov %owaza_count1a,2
gosub *face2
name $name
>Let's spend some time together in my shell...\
>I'll fully satisfy you, Darling.@
>The two of us can live together forever! \
name ""
name "Luka"
>I can't do that!\
name ""
name $name
>Why not? Is it because I'm a monster...?\
name ""
name "Luka"
>No... You're just... Way too forceful...\
name ""
>It doesn't look like she'll let me go that easily...@
>I have no choice but to fight!\
gosub *face1
mov %sinkou,1
goto *common_main



*kai_v

gosub *face3
name $name
>Ahhh!\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Shellfish Girl turns into a tiny shell!\
mov %viclose,1:gosub *victory
mov %getexp,600:gosub *lvup
mov %2227,1
goto *sean0094



*kai_kousan

gosub *kousan_syori
>Luka gives in to the promise of pleasure, and ends his resistance!\
gosub *face2
name $name
>So you DO want to be my husband!@
>Hehehehe... I'm so happy! \
name ""
goto *kai_a



*kai_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *kai_kousan
if %cmd1=16 goto *kai_onedari
if %cmd1=17 goto *common_skill
goto *kai_main



*kai_a

if %kousoku=1 rnd2 %ransu,1,9
if %kousoku=1 && %ransu=1 gosub *kai_a3:gosub *kai_a3:goto *common_main
if %kousoku=1 && %ransu=2 gosub *kai_a3:gosub *kai_a4:goto *common_main
if %kousoku=1 && %ransu=3 gosub *kai_a3:gosub *kai_a5:goto *common_main
if %kousoku=1 && %ransu=4 gosub *kai_a4:gosub *kai_a3:goto *common_main
if %kousoku=1 && %ransu=5 gosub *kai_a4:gosub *kai_a4:goto *common_main
if %kousoku=1 && %ransu=6 gosub *kai_a4:gosub *kai_a5:goto *common_main
if %kousoku=1 && %ransu=7 gosub *kai_a5:gosub *kai_a3:goto *common_main
if %kousoku=1 && %ransu=8 gosub *kai_a5:gosub *kai_a4:goto *common_main
if %kousoku=1 && %ransu=9 gosub *kai_a5:gosub *kai_a5:goto *common_main
rnd2 %ransu,1,2
if %ransu=1 gosub *kai_a1:goto *common_main
if %ransu=2 && %owaza_count1a>3 gosub *kai_a2:goto *common_main
skip -3



*kai_a1

add %stack,1
skillcount1 3075
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"These tentacles will feel good. "
if %ransu=2 mov $sel1,"I have to take good care of my Darling's penis. "
if %ransu=3 mov $sel1,"It's fine if you come on my tentacles, Darling. "
name $name
eng $sel1:$sel6\
name ""
skillname "Tentacle Suction"
dwave 1,"se\ero_kyuin1.ogg"
>The suction cups at the end of the Shellfish Girl's tentacles suck on Luka's penis!
if %nanido<2 damage 10,12
if %nanido=2 damage 15,18
if %nanido=3 damage 20,24
skillname ""
if %mylife=0 sub %stack,1:return *kai_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kai_a2

add %stack,1
gosub *face2
name $name
>Fufu... I want to show my Darling heaven. \
name ""
skillname "Love Jail"
>The Shellfish Girl clamps her shell down tightly over Luka!
if %nanido<2 damage 5,7
if %nanido=2 damage 7,10
if %nanido=3 damage 10,14
mov %kousoku,1:gosub *status_print
>Luka's body is stuck in the Shellfish Girl's shell!\
skillname ""
if %mylife=0 sub %stack,1:return *kai_h2
name $name
>I'll service my Darling like this...@
>I'll make your penis feel amazing...\
name ""
if %nanido<2 mov %genmogaku,2
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,3
sub %stack,1
return



*kai_a3

add %stack,1
skillcount1 3076
>The Shellfish Girl tightens around Luka's body!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll play with your penis. ":mov $sel2,"The Shellfish Girl rubs Luka's penis with her hand!"
if %ransu=2 mov $sel1,"Rub, rub, rub... How is it, Darling?":mov $sel2,"The Shellfish Girl gently rubs Luka's penis with her hand!"
if %ransu=3 mov $sel1,"Does this feel good, Darling?":mov $sel2,"The Shellfish girl lightly rubs the tip of Luka's penis!"
if %ransu=4 mov $sel1,"Darling's penis is so cute. ":mov $sel2,"The Shellfish Girl rubs Luka's penis with her hand!"
if %ransu=5 mov $sel1,"I'll squeeze out your semen now, Darling.":mov $sel2,"The Shellfish Girl milks Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Love Jail Hand"
dwave 1,"se\ero_koki1.ogg"
eng $sel2:$sel6
if %nanido<2 damage 10,12
if %nanido=2 damage 13,16
if %nanido=3 damage 18,22
skillname ""
if %mylife=0 sub %stack,1:return *kai_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kai_a4

add %stack,1
skillcount1 3077
>The Shellfish Girl tightens around Luka's body!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"It's fine if you let it out, Darling...":mov $sel2,"Holding Luka's penis in her mouth, the Shellfish Girl gently sucks on it!"
if %ransu=2 mov $sel1,"My Darling's penis is so tasty. ":mov $sel2,"The Shellfish Girl licks Luka's penis!"
if %ransu=3 mov $sel1,"*Lick* *Lick*":mov $sel2,"The Shellfish Girl gently licks Luka's penis!"
if %ransu=4 mov $sel1,"If I do it like this, can you endure it?":mov $sel2,"With Luka's penis in her mouth, the Shellfish Girl violently sucks on it!"
if %ransu=5 mov $sel1,"This is my Darling's hole...":mov $sel2,"The Shellfish Girl licks Luka's urethral opening!"
name $name
eng $sel1:$sel6\
name ""
skillname "Love Jail Fellatio"
dwave 1,"se\ero_buchu3.ogg"
eng $sel2:$sel6
if %nanido<2 damage 11,13
if %nanido=2 damage 14,17
if %nanido=3 damage 20,24
skillname ""
if %mylife=0 sub %stack,1:return *kai_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kai_a5

add %stack,1
skillcount1 3078
>The Shellfish Girl tightens around Luka's body!\
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll even lick here...":mov $sel2,"The Shellfish Girl licks Luka's anus with the tip of her tongue!"
if %ransu=2 mov $sel1,"I'll stick my tongue inside. ":mov $sel2,"The Shellfish Girl sticks her tongue into Luka's anus!"
if %ransu=3 mov $sel1,"For my Darling, I'll even do this...":mov $sel2,"The Shellfish Girl licks Luka's anus!"
if %ransu=4 mov $sel1,"Does this feel good?":mov $sel2,"The Shellfish Girl sticks her tongue into Luka's anus!"
name $name
eng $sel1:$sel6\
name ""
skillname "Love Jail Anal"
lsp 690,":a;chara\kai_ct01.bmp",0,0:print 10,500
dwave 1,"se\ero_pyu1.ogg"
eng $sel2:$sel6
if %nanido<2 damage 12,14
if %nanido=2 damage 16,19
if %nanido=3 damage 22,26
skillname ""
if %mylife=0 sub %stack,1:return *kai_h5
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kai_onedari

mov $list1,"Tentacle Suction"
if %3075>0 mov %list_num1,1
mov $list2,"Love Jail Hand"
if %3076>0 mov %list_num2,1
mov $list3,"Love Jail Fellatio"
if %3077>0 mov %list_num3,1
mov $list4,"Love Jail Anal"
if %3078>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *kai_onedari1
if %cmd1=12 goto *kai_onedari2
if %cmd1=13 goto *kai_onedari3
if %cmd1=14 goto *kai_onedari4
if %cmd1=-1 goto *kai_main
goto *kai_onedari



*kai_onedari1

gosub *onedari_syori
name $name
>You want to feel good with my tentacles?@
>Alright, if that's what my Darling wants...\
name ""
gosub *kai_a1
skip -1



*kai_onedari2

gosub *onedari_syori_k
name $name
>You want me to make you feel good with my hand?@
>Alright, I'll touch you all over...\
name ""
if %kousoku=0 gosub *kai_a2
gosub *kai_a3
skip -1



*kai_onedari3

gosub *onedari_syori_k
name $name
>You want me to use my mouth to make you feel good?@
>Alright, I'll suck you plenty...\
name ""
if %kousoku=0 gosub *kai_a2
gosub *kai_a4
skip -1



*kai_onedari4

gosub *onedari_syori_k
name $name
>Eh!? You want me to lick your ass hole?@
>Oh Darling... You're so perverted. \
name ""
if %kousoku=0 gosub *kai_a2
gosub *kai_a5
skip -1



*kai_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\kai_bk04.bmp",0,0
gosub *syasei2
>Unable to endure the suction from the tentacles, Luka succumbs, exploding all over the Shellfish Girl.\
mov %viclose,1:gosub *lose
mov %2527,%2527+1:if %2527=1 mov %count_koenemy,%count_koenemy+1
if %2527>%count_most mov %count_most,%2527:mov $count_mostname,$name
count 10,10
mov $bad1," Luka succumbs to the Shellfish Girl's tentacles."
mov $bad2," Trapped in her shell, Luka was forced to become her husband."
gosub *face2
name $name
>You let it out, Darling! @
>Satisfied even with my tentacles. \
>Then... Shall I bring you inside? \
name ""
goto *kai_h



*kai_h2

mov %ikigoe,3:gosub *ikigoe
name $name
>Oh...?\
name ""
gosub *syasei1
lsp 700,":a;chara\kai_h2.bmp",0,0
gosub *syasei2
>Clamped down by her shell, Luka accidentally ejaculates.@
>The soft meat inside of her shell was too surprising for Luka.\
mov %viclose,1:gosub *lose
mov %2527,%2527+1:if %2527=1 mov %count_koenemy,%count_koenemy+1
if %2527>%count_most mov %count_most,%2527:mov $count_mostname,$name
count 15,10
mov %count_bouhatu,%count_bouhatu+1
mov $bad1," Luka ejaculates on accident when the Shellfish Girl clamps her shell down on him."
mov $bad2," Trapped in her shell, Luka was forced to become her husband."
name $name
>You weren't able to endure it, Darling?@
>You're so cute. \
name ""
goto *kai_h



*kai_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\kai_h2.bmp",0,0
gosub *syasei2
>Luka is unable to endure the Shellfish Girl's hand playing with him, shooting his semen all over her hand.\
mov %viclose,1:gosub *lose
mov %2527,%2527+1:if %2527=1 mov %count_koenemy,%count_koenemy+1
if %2527>%count_most mov %count_most,%2527:mov $count_mostname,$name
count 5,10
mov $bad1," Stuck in the Shellfish Girl's shell, Luka succumbs to her handjob."
mov $bad2," Trapped in her shell, Luka was forced to become her husband."
name $name
>You let it out all over my hand...\
>Did it feel so good that you couldn't stand it?@
>I'm so glad, Fufufu... \
name ""
goto *kai_h



*kai_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\kai_h2.bmp",0,0
gosub *syasei2
>Luka is unable to endure the Shellfish Girl's blowjob, shooting his semen all over her face.\
mov %viclose,1:gosub *lose
mov %2527,%2527+1:if %2527=1 mov %count_koenemy,%count_koenemy+1
if %2527>%count_most mov %count_most,%2527:mov $count_mostname,$name
count 4,10
mov $bad1," Stuck in the Shellfish Girl's shell, Luka succumbs to her blowjob."
mov $bad2," Trapped in her shell, Luka was forced to become her husband."
name $name
>Mmmm...@
>You let out so much in my mouth, Darling...\
>Did it feel so good that you couldn't stand it?@
>I'm so glad, Fufufu... \
name ""
goto *kai_h



*kai_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\kai_ct02.bmp",0,0
lsp 700,":a;chara\kai_h2.bmp",0,0
gosub *syasei2
>Luka is unable to endure the Shellfish Girl's tongue attacking his anus.\
mov %viclose,1:gosub *lose
mov %2527,%2527+1:if %2527=1 mov %count_koenemy,%count_koenemy+1
if %2527>%count_most mov %count_most,%2527:mov $count_mostname,$name
count 9,10
mov $bad1," Stuck in the Shellfish Girl's shell, Luka succumbs to her anal licking."
mov $bad2," Trapped in her shell, Luka was forced to become her husband."
csp 690:print 10,500
name $name
>Darling... Did you ejaculate while I was licking your anus?@
>Fufufu... So perverted. \
name ""
goto *kai_h



*kai_h

if %2527=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku=1 goto *kai_hb
>The Shellfish Girl slowly clamps her shell down over my body.\
name "Luka"
>Uwa!\
name ""
cspl 690,699
lsp 700,":a;chara\kai_h1.bmp",0,0:print 10,500
>Too weak to resist, she tightens her shell down on my body.\
goto *kai_hb



*kai_hb

name $name
>Now, it's time to start making some children. @
>My darling can't resist me anymore, can you?\
name ""
name "Luka"
>Uu.... Stop...\
name ""
>No matter how much I struggle, I can't move her shell an inch.@
>Having been defeated by the Shellfish Girl, I have no strength left to escape...\
name $name
>I'll stretch my oviduct like this...@
>And suck in my Darling's penis!\
>I know it's really tight...@
>But you'll still think it's amazing, I'm sure!\
name ""
name "Luka"
>Aaa...\
name ""
mov %hseanwave,16:hseanwave
lsp 690,":a;chara\kai_ct11.bmp",0,0:print 10,500
>The Shellfish Girl grabs my penis with her hand, and slowly sticks it into a tube-shaped organ.\
>Slowly forced into this narrow tube, I can feel suction cups all over its walls.\
>Each cup starts to suck on my penis as I'm forced deeper into her.\
name $name
>Hehehe... I'm connected with my Darling now. \
name ""
name "Luka"
>Auuu...\
name ""
>Now fully stuck inside her narrow organ, the cups increase the force that they're sucking on my penis with.\
>The bizarre feeling strikes home the fact that I'm mating with a monster...\
>The immorality of mating with a monster fills me with an abnormal excitement.\
>But humans aren't allowed to have intercourse with monsters...@
>I must not break that taboo!\
name "Luka"
>Stop this!\
name ""
>While my mind resisted, my body was enjoying the pleasure.\
>Sucked in her tight tube, the innumerable tiny suction cups are filling my body with pleasure.\
>Forced to mate with her, I'm unable to do anything but endure the rising pleasure.\
name $name
>...Doesn't it feel good, Darling?@
>Let out out all of your seed into me...\
name ""
>The entrance to her tube suddenly tightens, as the suction cups around the tip of my penis start to suck harder.\
>It's as if every inch of her is trying to make me ejaculate...\
name "Luka"
>Auuu...\
name ""
>The stimulation is too much for me to bear, as my body twitches pitifully.\
>Watching my pitiful appearance, the Shellfish Girl smiles happily.\
name $name
>Aha, so it does feel good. \
>Are you that happy to be inserted right into my fallopian tubes?\
>I'm so happy! \
name ""
>As she excitedly whispers that in my ear, the Shellfish Girl tightens up her tube.\
>Unable to endure the forced pleasure, I feel the desire to ejaculate rise up in me.\
name "Luka"
>Auu... I'm going to come...@
>I can't break the taboo... But it feels so good...\
name ""
name $name
>Please let it out, Darling. @
>Send all of your seed right into my womb. \
name ""
>The Shellfish Girl tightens her tube, and the suction cups all start to violently suck me from every direction.\
>Awash in ecstasy at the stimulation, I realize there's no use trying to endure, and give in to the desire to release.\
name "Luka"
>Ahhhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\kai_ct12.bmp",0,0
lsp 700,":a;chara\kai_h2.bmp",0,0
gosub *syasei2
>I explode in her tight organ, as the suction cups suck out all of my semen, sending it deeper inside of her.\
>It's as if each cup is giving me tiny kisses, rewarding my penis for its hard work...\
name "Luka"
>Faa...\
name ""
>I let out a sigh as I bathe in the afterglow of my orgasm, still being gently sucked inside of her.\
name $name
>Hehehe... You let it out, Darling. @
>All of your healthy semen is inside of me. \
>With this, you're now officially my husband. \
name ""
name "Luka"
>Ahh...\
name ""
>Still feeling the after effects from my orgasm, I suddenly feel the Shellfish Girl's hands on my butt.\
lsp 700,":a;chara\kai_h3.bmp",0,0
lsp 690,":a;chara\kai_ct01.bmp",0,0
lsp 691,":a;chara\kai_ct12.bmp",-520,0:print 10,500
>Spreading my cheeks, the Shellfish Girl suddenly starts to lick my anus with her tongue!\
name "Luka"
>Ahi! What are you doing!?\
name ""
>The sudden strange stimulation causes my waist to shake.\
name $name
>I want to give my Darling a reward.@
>I'll make you feel good from back here, so you can let out even more of your seed into my tube. \
name ""
name "Luka"
>Aaaa!\
name ""
>She continues her gentle licking on my anus.\
>Rather than feeling like a reward, it's more like she's dominating me...\
name "Luka"
>Auu... Don't do that...@
>Don't lick there... Let me go...\
name ""
>Even though I move my lower back to escape, the Shellfish Girl doesn't let go.@
>Licked gently from the back, and sucked forcefully from the front, I'm sandwiched in forced pleasure.\
name $name
>Your butt is twitching, Darling. \
name ""
>The Shellfish Girl giggles as she continues to lick around my anus.@
>Attacked by her relentless tongue, I feel my ability to resist fade.\
>In addition, the tube sucking on my penis continues to violently stimulate me, trying to suck everything out of me.\
>Being violated on both sides, my mind starts to go blank.\
name "Luka"
>Aaahhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\kai_ct02.bmp",0,0
lsp 691,":a;chara\kai_ct13.bmp",-520,0
gosub *syasei2
>My waist pushes forward as I come, as if trying to seek even more pleasure as my semen shoots into her reproductive organ.\
>At the same time, her licking continues.@
>Helpless, I let out a pathetic scream.\
name $name
>It looks like that felt amazing, Darling. @
>Haha... I'm so happy. \
name ""
>The Shellfish Girl laughs at my pathetic appearance.\
>Sucked from the front, licked from the back...@
>Being tortured by pleasure, I start to go crazy.\
name "Luka"
>Sto....@>Ahhhhh!\
name ""
>No matter how much I writhe around, the shell doesn't let me escape.\
>Mercilessly given pleasure, I begin to understand my complete powerlessness.\
name $name
>Please put out more, Darling. \
name ""
name "Luka"
>Stop it... Hauuu!\
name ""
gosub *syasei1
lsp 690,":a;chara\kai_ct03.bmp",0,0
lsp 691,":a;chara\kai_ct14.bmp",-520,0
gosub *syasei2
>Urged on by her organ tightening around me, I'm forced to come again.@
>The Shellfish Girl is beginning to rule both my mind and body...\
>Weakened by the continuous ejaculations, I'm too exhausted to do anything.@
>But her torture continues, as I sit back and take it.\
name "Luka"
>Stop... Please...\
name ""
name $name
>Darling... more. @
>I want more of your semen. \
name ""
name "Luka"
>Ahiii!\
name ""
>Completely exhausted, she continues to force me to ejaculate.@
>I've lost count now of how many times I've shot my semen inside of her...\
>Stuck in this rape hell, I finally lose consciousness.\
name "Luka"
>Aaa...\
name ""
name $name
>Hehehe, we'll be together forever from now on, Darling! \
name ""
>That was the last thing I heard as my consciousness faded.\
gosub *anten
mov %hseanwave,0:hseanwave
>My adventure ends here...@
>From now on, I'll be unable to ever be apart from the Shellfish Girl...\
>...........\
goto *badend



*lamia_start

mov $name,"Lamia"
mov $name2,"Lamia"
mov $lavel,"lamia"
mov $tatie1,"lamia_st01"
mov $tatie2,"lamia_st02"
mov $tatie3,"lamia_st03"
mov $tatie4,"lamia_st02"
mov $haikei,"bg041"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,460
if %nanido=2 mov %max_enemylife,670
if %nanido=3 mov %max_enemylife,880
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,1
gosub *maxmp:mov %mp,2
mov %tikei,2
gosub *syutugen
mov $mogaku_anno1,"Luka is unable to escape from the Lamia!"
mov $mogaku_anno2,"Luka broke free from the Lamia!"
mov $mogaku_anno3,"Luka is unable to attack with the Lamia coiled around him!"
mov $mogaku_sel1,"Haha... Struggle around pathetically while I squeeze you."
mov $mogaku_sel2,"Pathetic. Fufu..."
mov $mogaku_sel3,"Do you want me to eat you while you struggle in vain?"
mov $mogaku_sel4,"It's pointless to struggle, I'll slowly torment you..."
mov $mogaku_sel5,"Struggling so much... Do you want me to squeeze you tighter?"
mov $mogaku_dassyutu1,"Oh... That's the first time a human has escaped from me."
mov $mogaku_dassyutu2,"It doesn't matter... I'll wrap around you again."
mov $half_s1,"Fufu... How does it feel to be tormented by a Lamia?"
mov $half_s2,"Amazing, right?"
mov $kiki_s1,"You've gotten quite weak, haven't you..."
mov $kiki_s2,"Looking pathetic like that, you'll meet your end..."
mov %end_n,2
mov %zmonster_x,-270
mov %owaza_count1a,2
gosub *face2
name $name
>Oh... An unbaptized traveler. How rare.\
>I'll coil around you...@
>Slowly squeezing the life out of you, I'll torment you...\
name ""
gosub *face1
name "Luka"
>Guh!\
name ""
>Lamia...@
>In the monster world, these are known to be particularly strong.\
>She doesn't seem too powerful, but I have to be careful!\
if %3084=0 skillcount1 3084
mov %sinkou,1
goto *common_main



*lamia_v

gosub *face3
name $name
>Gah!\
name ""
>The Lamia is reeling, but doesn't fall down!\
name $name
>Even though you're a human, you put up quite a fight...@
>If that's how it is, then play time is over!\
name ""
goto *lamiab_start



*lamia_kousan

gosub *kousan_syori
>Luka gives in to the temptation, and ends his resistance.\
gosub *face2
name $name
>Fufu... So you want to be my food?@
>Alright... I'll slowly coil the life out of you...\
name ""
goto *lamia_a



*lamia_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *lamia_kousan
if %cmd1=16 goto *lamia_onedari
if %cmd1=17 goto *common_skill
goto *lamia_main



*lamia_a

if %kousoku>0 rnd2 %ransu,1,3
if %kousoku=1 && %ransu=1 gosub *lamia_a3:gosub *lamia_a7:goto *common_main
if %kousoku=1 && %ransu=2 gosub *lamia_a3:gosub *lamia_a8:goto *common_main
if %kousoku=1 && %ransu=3 gosub *lamia_a3:gosub *lamia_a9:goto *common_main
if %kousoku=2 && %ransu=1 gosub *lamia_a4:gosub *lamia_a7:goto *common_main
if %kousoku=2 && %ransu=2 gosub *lamia_a4:gosub *lamia_a8:goto *common_main
if %kousoku=2 && %ransu=3 gosub *lamia_a4:gosub *lamia_a9:goto *common_main
if %kousoku=3 gosub *lamia_a5
rnd2 %ransu,1,2
if %ransu=1 gosub *lamia_a1:goto *common_main
if %ransu=2 && %owaza_count1a>3 gosub *lamia_a2:goto *common_main
skip -3



*lamia_a1

add %stack,1
skillcount1 3079
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll tease your penis..."
if %ransu=2 mov $sel1,"It feels good, doesn't it? Right here..."
if %ransu=3 mov $sel1,"I'll play with you with my tail. Fufu..."
name $name
eng $sel1:$sel6\
name ""
skillname "Tail Massage"
dwave 1,"se\ero_slime1.ogg"
>The Lamia rubs Luka's penis with her tail!
if %nanido<2 damage 10,12
if %nanido=2 damage 14,17
if %nanido=3 damage 19,23
skillname ""
if %mylife=0 sub %stack,1:return *lamia_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*lamia_a2

add %stack,1
name $name
>I'll wrap tightly around you...\
name ""
skillname "Lamia Roll"
dwave 1,"se\ero_makituki3.ogg"
>The Lamia tightly coils around Luka!
if %nanido<2 damage 9,11
if %nanido=2 damage 11,14
if %nanido=3 damage 16,20
mov %kousoku,1:gosub *status_print
>Luka is wrapped by the Lamia's tough snake tail!\
skillname ""
if %mylife=0 sub %stack,1:return *lamia_h2
if %kousan=2 sub %stack,1:return
gosub *face2
name $name
if %first_sel1=1 skip 5
>Fufu... Is this what you wanted?@
>Having me wind around you...\
>Be happy... I'm going to squeeze everything out of you now.\
skip 2
>No matter how many times you run, I'll coil you back up...\
name ""
mov %first_sel1,1
if %nanido<2 mov %genmogaku,2
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,3
sub %stack,1
return



*lamia_a3

add %stack,1
skillcount1 3080
>The Lamia is wrapped around Luka's body!\
name $name
>Fufu... I'll play with you.\
name ""
skillname "Constrict"
dwave 1,"se\ero_simetuke1.ogg"
>The Lamia tightens around Luka!
if %nanido<2 damage 9,11
if %nanido=2 damage 11,14
if %nanido=3 damage 16,20
mov %kousoku,2
skillname ""
if %mylife=0 sub %stack,1:return *lamia_h6
name $name
>Like this, I squeeze my prey to weaken it...@
>Do you know what comes next? Fufu...\
name ""
sub %stack,1
return



*lamia_a4

add %stack,1
>The Lamia is wrapped around Luka's body!\
name $name
>Having a Lamia wrapped around you, aren't you happy?\
name ""
skillname "Constrict"
dwave 1,"se\ero_simetuke1.ogg"
>The Lamia tightens around Luka!
if %nanido<2 damage 9,11
if %nanido=2 damage 11,14
if %nanido=3 damage 16,20
mov %kousoku,3
skillname ""
if %mylife=0 sub %stack,1:return *lamia_h6
name $name
>Once a Lamia's prey has been weakened enough...@
>...They swallow them whole.\
>In just a little while, you'll know what it's like too...\
name ""
sub %stack,1
return



*lamia_a5

add %stack,1
>The Lamia is wrapped around Luka's body!\
name $name
>Fufu... I'll play with you.\
name ""
skillname "Constrict"
dwave 1,"se\ero_simetuke1.ogg"
>The Lamia tightens around Luka!
if %nanido<2 damage 9,11
if %nanido=2 damage 11,14
if %nanido=3 damage 16,20
mov %kousoku,4:mov %genmogaku,100
skillname ""
if %mylife=0 sub %stack,1:return *lamia_h6
name $name
>You're getting very weak...@
>But I'll torment you even more.@
>Until you're too exhausted to move...\
name ""
sub %stack,1
goto *lamia_a6



*lamia_a6

add %stack,1
>The Lamia is wrapped around Luka's body!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Haha... I can still squeeze tighter..."
if %ransu=2 mov $sel1,"Well? Is it painful? Hahaha."
if %ransu=3 mov $sel1,"Scream louder..."
if %ransu=4 mov $sel1,"Fufu... If I do this, is it painful?"
if %ransu=5 mov $sel1,"Isn't it miserable? Being tortured like this."
name $name
eng $sel1:$sel6\
name ""
skillname "Constrict"
dwave 1,"se\ero_simetuke1.ogg"
>The Lamia tightens around Luka!
if %nanido<2 damage 9,11
if %nanido=2 damage 11,14
if %nanido=3 damage 16,20
skillname ""
if %mylife=0 sub %stack,1:return *lamia_h6
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
goto *lamia_a6



*lamia_a7

add %stack,1
skillcount1 3081
if %hanyo3=0 >The Lamia is wrapped around Luka's body!\
if %hanyo3=1 >Luka's body is tightly wrapped by the Lamia!\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll stroke you with my hand..."
if %ransu=2 && %hanyo3=0 mov $sel1,"Taste the pleasure of my hands..."
if %ransu=2 && %hanyo3=1 mov $sel1,"My palms are very soft..."
if %ransu=3 mov $sel1,"Are you going to let it out on my hands?"
name $name
eng $sel1:$sel6\
name ""
skillname "Coiled Handjob"
dwave 1,"se\ero_koki1.ogg"
>Still coiled around Luka, the Lamia pumps Luka's penis with her hand!
if %nanido<2 damage 10,12
if %nanido=2 damage 13,16
if %nanido=3 damage 18,22
skillname ""
if %mylife=0 sub %stack,1:return *lamia_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*lamia_a8

add %stack,1
skillcount1 3082
if %hanyo3=0 >The Lamia is wrapped around Luka's body!\
if %hanyo3=1 >Luka's body is tightly wrapped by the Lamia!\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Unable to move, how does it feel to be sucked?"
if %ransu=2 mov $sel1,"How miserable, being humiliated like this."
if %ransu=3 mov $sel1,"*Lick* *Suck*"
name $name
eng $sel1:$sel6\
name ""
skillname "Coiled Fellatio"
dwave 1,"se\ero_buchu2.ogg"
>Still coiled around Luka, the Lamia sucks on Luka's penis!
if %nanido<2 damage 11,13
if %nanido=2 damage 14,17
if %nanido=3 damage 20,24
skillname ""
if %mylife=0 sub %stack,1:return *lamia_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*lamia_a9

add %stack,1
skillcount1 3083
if %hanyo3=0 >The Lamia is wrapped around Luka's body!\
if %hanyo3=1 >Luka's body is tightly wrapped by the Lamia!\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll sandwich you in my chest..."
if %ransu=2 mov $sel1,"I'll force you to come with my chest..."
if %ransu=3 mov $sel1,"Shoot out all your semen on my chest..."
name $name
eng $sel1:$sel6\
name ""
skillname "Coiled Tit Fuck"
dwave 1,"se\ero_koki1.ogg"
>Still coiled around Luka, the Lamia crushes Luka's penis between her breasts!
if %nanido<2 damage 12,14
if %nanido=2 damage 16,19
if %nanido=3 damage 22,26
skillname ""
if %mylife=0 sub %stack,1:return *lamia_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*lamia_onedari

mov $list1,"Tail Massage"
if %3079>0 mov %list_num1,1
mov $list2,"Constrict"
if %3080>0 mov %list_num2,1
mov $list3,"Coiled Handjob"
if %3081>0 mov %list_num3,1
mov $list4,"Coiled Fellatio"
if %3082>0 mov %list_num4,1
mov $list5,"Coiled Tit Fuck"
if %3083>0 mov %list_num5,1
mov $list6,"Swallow Whole"
if %3084>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *lamia_onedari1
if %cmd1=12 goto *lamia_onedari2
if %cmd1=13 goto *lamia_onedari3
if %cmd1=14 goto *lamia_onedari4
if %cmd1=15 goto *lamia_onedari5
if %cmd1=16 goto *lamia_onedari6
if %cmd1=-1 goto *lamia_main
goto *lamia_onedari



*lamia_onedari1

gosub *onedari_syori
name $name
>You want to be played with by my tail?@
>Alright... I'll torment you plenty.\
name ""
gosub *lamia_a1
skip -1



*lamia_onedari2

gosub *onedari_syori_k
name $name
>Strangled by me, you want to be tormented?@
>What a masochist...\
name ""
if %kousoku=0 gosub *lamia_a2
if %kousoku=1 gosub *lamia_a3
if %kousoku=2 gosub *lamia_a4
gosub *lamia_a5



*lamia_onedari3

gosub *onedari_syori_k
name $name
>You want to be wrapped by my tail, and played with by my hand?@
>Alright... I'll torment you plenty.\
name ""
if %kousoku=0 gosub *lamia_a2
gosub *lamia_a7
skip -1



*lamia_onedari4

gosub *onedari_syori_k
name $name
>You want to be wrapped by my tail, and played with by my mouth?@
>Then, I'll suck everything out of you...\
name ""
if %kousoku=0 gosub *lamia_a2
gosub *lamia_a8
skip -1



*lamia_onedari5

gosub *onedari_syori_k
name $name
>You want to be wrapped by my tail, and played with in my chest?@
>Alright... I'll finish you off, crushed between my breasts...\
name ""
if %kousoku=0 gosub *lamia_a2
gosub *lamia_a9
skip -1



*lamia_onedari6

gosub *onedari_syori
skillcount1 3084
name $name
>Fufu... So you want me to eat you?@
>There are occasionally some men who want to be swallowed by a Lamia.\
>I'll enjoy eating someone as tasty looking like you...@
>I'll swallow you whole, and slowly digest you in my stomach...\
name ""
name "Luka"
>........\
name ""
>Giving in to the desire to be eaten, I drop my sword.\
mov %viclose,2:gosub *lose
mov %2528,%2528+1:if %2528=1 mov %count_koenemy,%count_koenemy+1
if %2528>%count_most mov %count_most,%2528:mov $count_mostname,$name
count 33,11
mov $bad1," Luka offers his body to the Lamia, wanting to be eaten."
mov $bad2,""
csp 560:csp 561:print 10,1000
mov %kousan,4
goto *lamia_hb2



*lamia_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\lamia_bk06.bmp",0,0
gosub *syasei2
>Massaged by the Lamia's tail, Luka is forced to ejaculate.\
mov %viclose,1:gosub *lose
mov %2528,%2528+1:if %2528=1 mov %count_koenemy,%count_koenemy+1
if %2528>%count_most mov %count_most,%2528:mov $count_mostname,$name
count 19,5
mov $bad1," Luka succumbs to the Lamia's tail massage."
mov $bad2," Kept as a pet by the Lamia, Luka is toyed with until his death."
gosub *face2
name $name
>Letting it out while being played with by my tail...@
>What a pathetic man, Hahaha!\
>Now, I'll torment you over and over again.\
name ""
>The Lamia quickly coils her tail around me!\
goto *lamia_ha



*lamia_h2

mov %ikigoe,3:gosub *ikigoe
name $name
>Oh?\
name ""
gosub *syasei1
lsp 695,":a;chara\lamia_bk05.bmp",0,0
gosub *syasei2
>As the Lamia wraps up Luka, he accidentally ejaculates.@
>The tight squeezing gives an unexpected pleasure.\
mov %viclose,1:gosub *lose
mov %2528,%2528+1:if %2528=1 mov %count_koenemy,%count_koenemy+1
if %2528>%count_most mov %count_most,%2528:mov $count_mostname,$name
count 16,5
mov %count_bouhatu,%count_bouhatu+1
mov $bad1," Luka accidentally ejaculates as the Lamia starts to coil around him."
mov $bad2," Kept as a pet by the Lamia, Luka is toyed with until his death."
gosub *face2
name $name
>Letting it out just by being wound up?@
>What a pathetic man, Hahaha!\
name ""
goto *lamia_ha



*lamia_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
if %hanyo3=0 lsp 693,":a;chara\lamia_bk03a.bmp",0,0
if %hanyo3=1 lsp 693,":a;chara\lamia_bk03b.bmp",0,0
gosub *syasei2
>Rubbed by the Lamia's hand, Luka is unable to endure the pleasure.\
mov %viclose,1:gosub *lose
mov %2528,%2528+1:if %2528=1 mov %count_koenemy,%count_koenemy+1
if %2528>%count_most mov %count_most,%2528:mov $count_mostname,$name
count 5,5
mov $bad1," Luka succumbs to the Lamia's handjob."
mov $bad2," Kept as a pet by the Lamia, Luka is toyed with until his death."
name $name
>Fufu... You let it out all over my hands.@
>Able to shoot out so much smelly semen...\
eng $sel1:$sel6\
name ""
if %hanyo3=0 goto *lamia_ha
if %hanyo3=1 goto *lamiab_h3



*lamia_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\lamia_bk01.bmp",0,0
gosub *syasei2
>Luka is unable to endure the Lamia sucking on his penis.\
mov %viclose,1:gosub *lose
mov %2528,%2528+1:if %2528=1 mov %count_koenemy,%count_koenemy+1
if %2528>%count_most mov %count_most,%2528:mov $count_mostname,$name
count 4,5
mov $bad1," Luka succumbs to the Lamia's blowjob."
mov $bad2," Kept as a pet by the Lamia, Luka is toyed with until his death."
name $name
>Fufu... You let it all out in my mouth.@
>Shooting out so much smelly semen in my mouth... Fufu...\
name ""
if %hanyo3=0 goto *lamia_ha
if %hanyo3=1 goto *lamiab_h3



*lamia_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
if %hanyo3=0 lsp 692,":a;chara\lamia_bk02a.bmp",0,0
if %hanyo3=1 lsp 692,":a;chara\lamia_bk02b.bmp",0,0
gosub *syasei2
>Luka is unable to endure the Lamia crushing his penis between her breasts.\
mov %viclose,1:gosub *lose
mov %2528,%2528+1:if %2528=1 mov %count_koenemy,%count_koenemy+1
if %2528>%count_most mov %count_most,%2528:mov $count_mostname,$name
count 7,5
mov $bad1," Luka succumbs to the Lamia's tit fuck."
mov $bad2," Kept as a pet by the Lamia, Luka is toyed with until his death."
name $name
>Fufu... You let out so much all over my chest.@
>Shooting out so much smelly semen on my breasts... Fufu...\
name ""
if %hanyo3=0 goto *lamia_ha
if %hanyo3=1 goto *lamiab_h3



*lamia_h6

name "Luka"
>Uuu...\
name ""
>Squeezed so tightly, I give up resisting.@
>Weakened by her squeezing, I surrender to the Lamia.\
if %zukanon=2 skip 8
mov %viclose,2:gosub *lose
mov %2528,%2528+1:if %2528=1 mov %count_koenemy,%count_koenemy+1
if %2528>%count_most mov %count_most,%2528:mov $count_mostname,$name
count 16,11
mov $bad1," Squeezed to exhaustion, the Lamia swallows Luka whole."
mov $bad2," Luka is slowly digested, and ends his life as her food."
gosub *face2
name $name
>Fufu... You're too weak to move now.@
>Now, it's time to swallow you whole...\
name ""
if %2814=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2814,1
goto *lamia_hb



*lamia_ha

if %2813=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2813,1
name $name
>Now... I want your delicious semen to fill up my stomach.\
name ""
dwave 1,"se\ero_simetuke1.ogg"
cspl 690,699
lsp 700,":a;chara\lamia_ha1.bmp",0,0:print 10,500
>Suddenly, the Lamia bends over and buries her face in my groin!@
>Still wrapped by her tail, she sucks my penis into her mouth!\
name "Luka"
>Ahh...\
name ""
>I feel her saliva cover my penis, as she starts to lick me inside her warm mouth.\
>The stimulation from her mouth causes my body to twitch.\
mov %hseanvoice,1:hseanvoice
name $name
>I'll play with you inside my mouth...@
>Sucking on your penis, I'll make sure I get all of your semen...\
>*Lick*@> *Suck*\
name ""
name "Luka"
>Aaa!\
name ""
>Her tongue starts to coil around my penis inside her mouth.@
>Dripping saliva, her tongue tightens around my penis like a snake.\
>The tip of her tongue starts to flick the back of my penis.@
>My body writhes helplessly as her tongue plays with me.\
name "Luka"
>Auu...@> Ahhh!\
name ""
name $name
>Fufu... It's amazing, right?@
>I'll make it even better...\
name ""
name "Luka"
>Ahii!\
name ""
>Trying to escape from the pleasure, I struggle with all my power.@
>But with her tail tightly coiled around me, there's no escape.\
>My waist is kept completely still as she continues to play with me inside her mouth.\
>I feel despair at being forced pleasure against my will, with no chance to escape.\
name $name
>*Lick*@> *Suck*\
name ""
name "Luka"
>Ahh! Don't lick the tip...!\
name ""
>Her tongue starts to flick at my urethral opening.@
>Unable to move, the pleasure torments my body and mind.\
name $name
>*Lick*@> *Suck*\
name ""
name "Luka"
>Hauu... My tip feels so good...\
name ""
>With her dexterous tongue tormenting me, tears start to fill my eyes.\
>Sucked by her mouth, and massaged by her tongue, the pleasure is too much for me to endure.\
>The forceful pleasure sends me to the edge, as the desire for release rises.\
name "Luka"
>Ah... I'm going to come!\
name ""
name $name
>Good... I'll lick your hole while you come.@
>Having your semen licked up as soon as it comes out will feel amazing.\
>*Lick*@> *Lick*\
name ""
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\lamia_ha2.bmp",0,0
gosub *syasei2
>I explode inside her mouth as she continues to torture me with her tongue.\
name $name
>*Lick*@> *Lick*\
name ""
name "Luka"
>Hauu! Don't lick... While I come!\
name ""
>Even while coming, she doesn't stop licking my urethra.@
>The agonizing pleasure continues throughout my orgasm.\
>And even as I finish ejaculating, the licking doesn't stop.\
lsp 700,":a;chara\lamia_ha3.bmp",0,0:print 10,500
name $name
>Mmmm. You came.@>*Slurp*@>*Suck*\
name ""
>The Lamia starts to drink everything I released into her mouth.\
>Every time she swallows more of my semen, her throat tightens.@
>Each swallow creates a strong suction on my penis, still in her mouth.\
name "Luka"
>Hauu... It feels good...\
name ""
name $name
>Put out as much as you can...@
>I'll drink all of it...\
>This time, I'll suck you all the way into my throat...\
name ""
name "Luka"
>Ahhh!\
name ""
mov %hseanvoice,3:hseanvoice
>The Lamia sucks me deeper into her, until my penis is inside her throat.@
>Deep in her mouth, I can feel the walls of her throat around my dick.\
name "Luka"
>Auu... That's amazing...\
name ""
name $name
>Fufu, does it feel good?@
>A Lamia can swallow prey bigger than themselves after all.@
>Holding your penis in my throat is simple.\
name ""
name "Luka"
>Auuu!\
name ""
>Every time the Lamia speaks, the vibrations run all over my penis.@
>Licked, vibrated, massaged... The differing stimulations are too strong to endure.\
>The ecstasy floods through my body, causing my mind to go blank.\
name $name
>Hahahaha... I'll suck everything out, just like this.\
name ""
name "Luka"
>Ahii!\
name ""
>My penis, completely swallowed by the Lamia, rubs against the back of her throat with every movement.\
>The unique stimulation brings me to the edge of another orgasm.\
name "Luka"
>Hauu...\
name ""
name $name
>Can you stand it? Being violated by my throat.@
>Now, deep in my throat...@
>Let out your delicious semen...\
name ""
>Still licking me as my penis rubs against her throat's walls, the vibrations from her voice send me over the edge.\
>At my limit again, I surrender to the desire to release.\
name "Luka"
>Aaaa!\
name ""
gosub *syasei1
lsp 700,":a;chara\lamia_ha4.bmp",0,0
gosub *syasei2
>Stuck in her mouth, I shoot my semen deep in her throat.\
name $name
>Fufu... Your delicious semen.@
>*Lick*@> *Suck*\
name ""
name "Luka"
>Auuu...\
name ""
>My body shakes as she continues to suck on me as I ejaculate.@
>The rhythm of her suction matches my spurts, as she milks all of my semen out.\
lsp 700,":a;chara\lamia_ha5.bmp",0,0:print 10,500
name $name
>*Suck*@> *Suck*\
name ""
name "Luka"
>Ahiii!\
name ""
>The Lamia's tongue starts to coil around my penis again.@
>The unexpected stimulation causes my lower back to arch.\
name $name
>Fufu... Your face looks different now.@
>My sucking technique is amazing, isn't it?@
>No man can even last ten seconds...\
name ""
name "Luka"
>Ahhhhhh!\
name ""
mov %hseanvoice,2:hseanvoice
lsp 700,":a;chara\lamia_ha7.bmp",0,0:print 10,500
>The Lamia's tongue tightens around my penis, now completely coiled around it.\
name $name
>This is the best yet, isn't it?@
>I'll force you to come in an instant again...\
name ""
name "Luka"
>Hau!@> Ahhhh!\
name ""
>Her tongue, coiled around my penis, starts to move back and forth as it continues to tighten.\
name $name
>*Lick*@> *Suck*\
name ""
>Squeezing and rubbing me, her snake-tongue is toying with my penis... Her prey.\
name "Luka"
>Ahiii!\
name ""
>The unbearable pleasure causes my mind to go blank.@
>Unable to feel anything but the ecstasy, I explode in joy.\
name ""
gosub *syasei1
lsp 700,":a;chara\lamia_ha8.bmp",0,0
gosub *syasei2
>I'm forced to ejaculate yet again so quickly...@
>As the Lamia said, I wasn't even able to last ten seconds...\
name $name
>You let out a lot, huh?@
>*Lick*@> *Suck*\
name ""
name "Luka"
>Ahi! Your tongue... Amazing...!\
name ""
>Her tongue still coiled around me, she uses the tip to lick up all the semen I shoot out.\
>Every time she swallows more of my semen, the stimulation seems to double.\
name $name
>*Lick*@> *Suck*\
name ""
name "Luka"
>Aaaahh!\
name ""
>The Lamia gulps down my semen with a happy look on her face.@
>Still being toyed with by her tongue, I'm forced into another climax.\
name "Luka"
>Ahh! I'm coming again!\
name ""
gosub *syasei1:gosub *syasei2
>With no time to rest, I explode in her again.@
>Her tongue licks up my seed as soon as it comes out of me, as she greedily swallows everything.\
name $name
>*Lick*@> *Suck*\
name ""
name "Luka"
>Ahii!\
name ""
>Her merciless tongue forces me to ejaculate over and over again, with no end in sight.\
gosub *syasei1:gosub *syasei2
>In a daze of ecstasy, I have no idea how many times I've climaxed.@
>Stuck in a world of pleasure, my vision starts to fade.\
name $name
>Your semen is delicious.@> I think I'll keep you as my pet.\
>Coiled tightly around you like this, I'll squeeze you dry every day...\
name ""
name "Luka"
>Auuu!\
name ""
gosub *syasei1:gosub *syasei2
gosub *anten
mov %hseanvoice,0:hseanvoice
>Forced to come too many times to count, I finally faint.\
>Caught by the Lamia, I'm just her pitiful pet now...@
>Unable to escape, I'll be squeezed forever...\
>In this miserable way, my adventure ends here...\
>...........\
goto *badend



*lamia_hb

if %2814=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2814,1
>The Lamia stares at me with a triumphant look on her face, as I pant in exhaustion.\
>She's going to eat me...@
>I can tell just looking at her sadistic face...\
name $name
>Hahaha... I'm going to swallow you in a few seconds.@
>Are you mortified? Are you miserable?\
name ""
name "Luka"
>No, don't! Stop, please!\
name ""
>Unable to resist, all I can do is plead to the Lamia.@
>But my pleading seems to only make her happier...\
>The dread fills my body as I realize what's going to happen next...\
name $name
>Now, I'll swallow you whole!\
name ""
name "Luka"
>Hiiii!\
name ""
goto *lamia_hb2



*lamia_hb2

>In an instant, the Lamia's jaw unhinges and opens her mouth wide.@
>She bends over, and swallows me in a single bite!\
if %hosyoku_cut=1 goto *hosyoku_cut
name "Luka"
if %kousan<4 mov $sel1,"No! Help me!"
if %kousan=4 mov $sel1,"Auu..."
eng $sel1:$sel6\
name ""
mov %hseanwave,11:hseanwave
>My body is forced through her down her narrow esophagus.\
>The narrow tube inside of her contracts and loosens, slowly forcing my body deeper inside of her.\
name "Luka"
>Ahhh!\
name ""
>I've been swallowed alive...\
if %kousan<4 mov $sel1,"But for some reason, my fear is slowly fading..."
if %kousan=4 mov $sel1,"But I'm so exhausted, that I have no choice but to accept it."
eng $sel1:$sel6\
name "Luka"
>Faa... What is this...@
>Somehow... It feels good...\
name ""
>From her tight esophagus, I'm forced into her stomach.\
if %kousan<4 mov $sel1,"Now in her stomach, my fear and horror start to fade."
if %kousan=4 mov $sel1,"Now in her stomach, I'm filled with joy at being eaten by the Lamia."
eng $sel1:$sel6\
mov %hseanwave,12:hseanwave
lsp 690,":a;chara\lamia_ct04.bmp",400,0
lsp 700,":a;chara\lamia_st02.bmp",-160,0:print 10,500
name "Luka"
>Faaa...\
name ""
>Stuck in her stomach, it's as if I'm in a tight meaty sleeping bag.@
>As her walls close in on me, the Lamia's digestive juices cover my body.\
>As the digestive juices start to slowly melt my body, I feel overcome by ecstasy.\
name "Luka"
>Aaa... It feels good...\
name ""
mov %hseanwave,13:hseanwave
>Feeling my body dissolve inside of her, I don't feel any pain.@
>Rather, I'm stuck in some sort of trance.\
>Being eaten and digested by a monster... It feels like this...?\
name "Luka"
>Faa... Amazing...\
name ""
gosub *syasei1
lsp 690,":a;chara\lamia_ct05.bmp",400,0
gosub *syasei2
>The overpowering ecstasy forces me to ejaculate.@
>Even though I'm being eaten alive in this terrifying situation...\
name "Luka"
>Aaaa... I came...@
>Hau! I'm coming again!\
name ""
gosub *syasei1:gosub *syasei2
>Ashamed at feeling so good while being digested, I ejaculate again.\
>As I shoot out semen inside the Lamia, my body continues to dissolve.\
name "Luka"
>Aaaa...\
name ""
>I'm only food to the Lamia...@
>Filled with joy, instead of fear...@
>As if experiencing the best thing in the world, I rejoice at my situation.\
>No... Being eaten by a Lamia may actually be the best thing in the world...\
name "Luka"
>A...aa....\
name ""
gosub *anten
mov %hseanwave,0:hseanwave
>While experiencing the best pleasure in the world, I'm absorbed by the Lamia.\
>My body fully digested, I'm nothing but nutrients for the Lamia.\
>But until the last moment, I was happy...\
>............\
goto *badend



*lamiab_start

if %continue=1 bgm "bgm\battle.ogg"
mov %continue,0
mov $name,"Lamia"
mov $name2,"Lamia"
mov $lavel,"lamiab"
mov $tatie1,"lamia_st11"
mov $tatie2,"lamia_st12"
mov $tatie3,"lamia_st13"
mov $tatie4,"lamia_st12"
mov $haikei,"bg041"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,120
if %nanido=2 mov %max_enemylife,130
if %nanido=3 mov %max_enemylife,152
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %alice_skill,0
mov %music,0
gosub *maxmp:mov %mp,%max_mp
mov %tikei,2
gosub *syutugen2
mov $mogaku_anno1,"Luka can't escape from the Lamia!"
mov $mogaku_anno4,"Luka's strength slowly fades as the Lamia tightens around him!"
mov $mogaku_sel1,"Strangled like this, I'll show you heaven..."
mov $mogaku_sel2,"Fufu... Do you want me to make it even tighter?"
mov $mogaku_sel3,"Being constricted by a Lamia... Are you happy?"
mov $mogaku_sel4,"No matter how much you struggle, I won't let you go..."
mov $mogaku_sel5,"Soon the pain will be pleasure..."
mov %end_n,2
mov %zmonster_x,-270
mov %hanyo3,1
>The Lamia tears off her clothes!\
name "Luka"
>Guh... She's stubborn...\
name ""
>As expected from a Lamia... She's pretty tough.\
name $name
>You made me angry.@
>I won't let you get away from me anymore!\
name ""
skillname "Snake Roll"
dwave 1,"se\ero_simetuke1.ogg"
>The Lamia coils around Luka!
if %nanido<2 damage 9,11
if %nanido=2 damage 13,16
if %nanido=3 damage 18,22
mov %kousoku,1:gosub *status_print
mov %genmogaku,100
>Luka is being squeezed by the Lamia!\
skillname ""
gosub *face2
name $name
>I'll keep tightening around you and make you weak...@
>I'll violate you by force, and squeeze you dry!\
name ""
name "Luka"
>Guh...!@>So tight!\
name ""
name $name
>Even if I struggled, I don't think I'd break her hold on me.\
name ""
>Her tail is tightly wound around my body...@
>But my arm is still free...\
goto *common_main



*lamiab_v

gosub *face3
name $name
>No way...@>How could I... lose?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Lamia turns into a tiny snake!\
mov %viclose,1:gosub *victory
mov %getexp,700:gosub *lvup
mov %2228,1
goto *sean0095



*lamiab_kousan

gosub *kousan_syori
>Luka gives in to the temptation, and ends his resistance.\
gosub *face2
name $name
>Fufu... So you want to be my food?@
>Alright... I'll slowly coil the life out of you...\
name ""
goto *lamiab_a



*lamiab_main

gosub *cmd_main
if %cmd1=11 mov %abairitu,50:goto *common_miss2
if %cmd1=12 goto *common_mogaku
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *lamiab_kousan
if %cmd1=16 goto *lamiab_onedari
goto *lamiab_main



*lamiab_a

if %kousoku=1 gosub *lamiab_a1:goto *common_main
if %kousoku=2 gosub *lamiab_a2:goto *common_main
if %kousoku=3 gosub *lamiab_a3:goto *common_main
if %kousoku=4 gosub *lamiab_a4:goto *common_main



*lamiab_a1

add %stack,1
>Luka's body is tightly wrapped by the Lamia!\
name $name
>I'll squeeze you tighter until you're too weak to resist...\
name ""
skillname "Tighten"
dwave 1,"se\ero_simetuke1.ogg"
>The Lamia slowly tightens around Luka!
if %nanido<2 damage 9,11
if %nanido=2 damage 13,16
if %nanido=3 damage 18,22
skillname ""
mov %kousoku,2
name "Luka"
>Uguh....\
name ""
name $name
>A few more times and you'll be too weak to move...@
>After that, I'll violate you...\
name ""
sub %stack,1
return



*lamiab_a2

add %stack,1
>Luka's body is tightly wrapped by the Lamia!\
name $name
>Tighter... Tighter...\
name ""
skillname "Tighten"
dwave 1,"se\ero_simetuke1.ogg"
>The Lamia slowly tightens around Luka!
if %nanido<2 damage 9,11
if %nanido=2 damage 13,16
if %nanido=3 damage 18,22
skillname ""
mov %kousoku,3
name "Luka"
>Auuu...\
name ""
name $name
>Fufu... Is it painful?@
>Soon you won't be able to resist anymore...\
name ""
sub %stack,1
return



*lamiab_a3

add %stack,1
>Luka's body is tightly wrapped by the Lamia!\
name $name
>You won't be able to move soon...\
name ""
skillname "Tighten"
dwave 1,"se\ero_simetuke1.ogg"
>The Lamia slowly tightens around Luka!
if %nanido<2 damage 9,11
if %nanido=2 damage 13,16
if %nanido=3 damage 18,22
skillname ""
mov %kousoku,4
name "Luka"
>Uwaa!\
name ""
name $name
>One more time and it seems like you'll be done.@
>I'll be sure to rape you plenty. Hahaha.\
name ""
sub %stack,1
return



*lamiab_a4

add %stack,1
>Luka's body is tightly wrapped by the Lamia!\
name $name
>With this, your old life is over...\
name ""
skillname "Tighten"
dwave 1,"se\ero_simetuke1.ogg"
>The Lamia slowly tightens around Luka!
if %nanido<2 damage 9,11
if %nanido=2 damage 13,16
if %nanido=3 damage 18,22
skillname ""
mov %kousoku,4
>The pressure exerted by the Lamia is too much for Luka, as he's left unable to move!\
>The Lamia rips off Luka's clothes!\
name "Luka"
>Aaa...\
name ""
name $name
>It's time to rape the pathetic prey.@
>Fufu... How do you want it?\
>Do you want to give in gradually?@
>Or face instant death...\
name ""
sub %stack,1
csel "Gradually",*lamiab_a6,"Instant",*lamiab_a5



*lamiab_a5

add %stack,1
skillcount1 3089
if %kousan=2 skip 5
name $name
>Fufu... Then I'll end this in an instant.@
>Now, taste the ultimate humiliation for a man...\
name ""
skillname "Sure-Death Tightness"
dwave 1,"se\ero_chupa5.ogg"
lsp 700,":a;chara\lamia_hb1.bmp",0,0
lsp 690,":a;chara\lamia_ctb01.bmp",0,0:print 10,500
>Luka's penis is sucked into the Lamia's vagina!\
>The warm flesh tightens around Luka's penis as soon as he enters!
mov %damage_kotei,1
damage 9,11
>Luka's being raped by the Lamia!\
name $name
>Now... The end.\
name ""
name "Luka"
>Haa... What... is this...?@
>Aaaaa!\
name ""
dwave 1,"se\ero_chupa4.ogg"
eng "The Lamia's pussy tightly contracts around Luka's penis!":$sel6/
delay 300
dwave 2,"se\damage.ogg":quakex 2,440
mov %mylife,0
lsp 560,":a;system\gager0.bmp",114,556
gosub *hp
print 10,500
\
skillname ""
sub %stack,1
return *lamiab_h1



*lamiab_a6

add %stack,1
skillcount1 3088
if %kousan=2 skip 5
name $name
>Then... I'll do it slowly.@
>I'll tease you with the vagina of a monster...\
name ""
skillname "Lamia Pussy"
dwave 1,"se\ero_chupa4.ogg"
lsp 700,":a;chara\lamia_hb1.bmp",0,0
lsp 690,":a;chara\lamia_ctb01.bmp",0,0:print 10,500
>Luka's penis is sucked into the Lamia's vagina!\
>The warm flesh tightens around Luka's penis as soon as he enters!
mov %damage_kotei,1
damage 9,11
>Luka's being raped by the Lamia!\
skillname ""
if %mylife<12 sub %stack,1:goto *lamiab_a8
name "Luka"
>Aaaa...\
name ""
name $name
>I won't finish you off right away...@
>I'll force you to surrender nice and slowly...\
name ""
sub %stack,1
goto *lamiab_a7



*lamiab_a7

add %stack,1
skillcount1 3088
>Luka's being raped by the Lamia!\
rnd2 %ransu,1,10
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You're getting closer...":mov $sel2,"The Lamia gently pumps Luka!"
if %ransu=2 mov $sel1,"I'll tease you nice and slow...":mov $sel2,"The Lamia's vagina slightly tightens!"
if %ransu=3 mov $sel1,"You can put it in deeper...":mov $sel2,"Luka's penis is forced deeper into the Lamia!"
if %ransu=4 mov $sel1,"I'll tighten up for you...":mov $sel2,"The Lamia tightens her pussy around Luka's penis!"
if %ransu=5 mov $sel1,"It's ok to scream if you want...":mov $sel2,"The Lamia slowly rotates her waist!"
if %ransu=6 mov $sel1,"I wonder how this feels...?":mov $sel2,"The Lamia rotates her waist, twisting her pussy around Luka's penis!"
if %ransu=7 mov $sel1,"Does this feel good too?":mov $sel2,"The Lamia's pussy starts to tighten around Luka's penis!"
if %ransu=8 mov $sel1,"I'll wrap around this, too...":mov $sel2,"The muscles in the Lamia's vagina start to massage Luka!"
if %ransu=9 mov $sel1,"Shoot out everything you have into me...":mov $sel2,"The Lamia starts to move her waist, stimulating Luka!"
if %ransu=10 mov $sel1,"It's like I'm swallowing your penis with my lower mouth...":mov $sel2,"The Lamia forces Luka deeper into her!"
name $name
eng $sel1:$sel6\
name ""
skillname "Lamia Vagina"
dwave 1,"se\ero_chupa4.ogg"
eng $sel2:$sel6
mov %damage_kotei,1
damage 9,11
skillname ""
if %mylife<12 sub %stack,1:goto *lamiab_a8
sub %stack,1
goto *lamiab_a7



*lamiab_a8

add %stack,1
skillcount1 3088
>Luka's being raped by the Lamia!\
name "Luka"
>Auuu...\
name ""
name $name
>Fufu... The next move will end it.@
>If I tighten around you one more time, your life will be mine.\
>...Now, for the finish.@
>Surrender all your semen to me!\
name ""
skillname "Lamia Vagina"
dwave 1,"se\ero_chupa4.ogg"
>The Lamia's pussy quickly contracts!\
>Luka is attacked by the forced stimulation!
mov %damage_kotei,2
damage 12,14
skillname ""
sub %stack,1
return *lamiab_h2



*lamiab_onedari

mov $list1,"Coiled Handjob"
if %3081>0 mov %list_num1,1
mov $list2,"Coiled Fellatio"
if %3082>0 mov %list_num2,1
mov $list3,"Coiled Tit Fuck"
if %3083>0 mov %list_num3,1
mov $list4,"Lamia Vagina"
if %3088>0 mov %list_num4,1
mov $list5,"Sure-Death Tightness"
if %3089>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *lamia_onedari3
if %cmd1=12 goto *lamia_onedari4
if %cmd1=13 goto *lamia_onedari5
if %cmd1=14 goto *lamiab_onedari1
if %cmd1=15 goto *lamiab_onedari2
if %cmd1=-1 goto *lamiab_main
goto *lamiab_onedari



*lamiab_onedari1

gosub *onedari_syori_k
name $name
>Fufu... So you want to be squeezed by my pussy?@
>Then, I'll let you taste it to your heart's content...\
name ""
gosub *lamiab_a6



*lamiab_onedari2

gosub *onedari_syori_k
name $name
>You want to be forced to surrender after only an instant?@
>Alright... I'll show you the ultimate humiliation for a man.\
name ""
gosub *lamiab_a5



*lamiab_h1

gosub *syasei1
lsp 700,":a;chara\lamia_hb2.bmp",0,0
lsp 690,":a;chara\lamia_ctb02.bmp",0,0
gosub *syasei2
>The intense tightening forced Luka to succumb in an instant!\
mov %viclose,1:gosub *lose
mov %2528,%2528+1:if %2528=1 mov %count_koenemy,%count_koenemy+1
if %2528>%count_most mov %count_most,%2528:mov $count_mostname,$name
count 1,3
mov $bad1," Luka succumbs in an instant to the Lamia's vagina."
mov $bad2," Caught by the Lamia, Luka is continually raped until his death."
csp 690:print 10,500
name $name
>That was fast...@
>Unable to hold on at all, just another pathetic man!\
>But it isn't even close to being over yet...@
>I'll squeeze out all of your semen into me...\
name ""
goto *lamiab_h



*lamiab_h2

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\lamia_hb2.bmp",0,0
lsp 690,":a;chara\lamia_ctb02.bmp",0,0
gosub *syasei2
>The pleasure too much to bear, Luka climaxes, shooting his semen out into the Lamia.\
mov %viclose,1:gosub *lose
mov %2528,%2528+1:if %2528=1 mov %count_koenemy,%count_koenemy+1
if %2528>%count_most mov %count_most,%2528:mov $count_mostname,$name
count 1,3
mov $bad1," Luka slowly ascended to heaven with the Lamia's vagina."
mov $bad2," Caught by the Lamia, Luka is continually raped until his death."
csp 690:print 10,500
name $name
>Fufu.. Did it feel too good for you?@
>Is the vagina of a Lamia the best?\
>But it isn't even close to being over yet...@
>I'll squeeze out all of your semen into me...\
name ""
goto *lamiab_h



*lamiab_h3

mov $bad2," Caught by the Lamia, Luka is continually raped until his death."
goto *lamiab_h



*lamiab_h

if %2815=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2815,1
if %kousoku=4 mov %hseanwave,9:hseanwave:skip 12
name $name
>Now... It's time to violate you.@
>Shoot out all of your semen into me...\
name ""
name "Luka"
>Aaaaaa...\
name ""
mov %hseanwave,9:hseanwave
cspl 690,699
lsp 700,":a;chara\lamia_hb1.bmp",0,0:print 10,500
>The Lamia forces my penis into her vagina!\
name "Luka"
>Uaah! Amazing...!\
name ""
cspl 690,699
lsp 690,":a;chara\lamia_ctb01.bmp",0,0:print 10,500
>Her soft vagina envelopes my penis, with her powerful muscles bulging through the warm walls.\
>The sensation was too powerful, as my waist meets her thrusts in seeking more pleasure.\
name "Luka"
>Auuu!@>Don't make it any tighter...\
name ""
name $name
>Are you able to feel the muscles in my vagina?@
>I can control each one individually, and tighten around you like this...\
name ""
>I feel her pussy start to slowly shrink around me.\
>Every muscle is flexing at a different rate, giving a different stimulation with every movement.\
name "Luka"
>Ahii!\
name ""
>Each time she thrusts her waist into me, I feel my penis going in and out of tiny rings of muscles.\
>Each ring feels like I'm penetrating an additional layer, causing my body to writhe at the pleasure.\
name $name
>Fufu... Amazing, isn't it?@
>How does it feel being raped by a Lamia?\
name ""
name "Luka"
>Ahhh!\
name ""
>I can already feel myself rising towards a climax.@
>The overpowering desire to release starts to flow up my body from my waist.\
name $name
>Already at your limit?@
>Then... Shoot everything out into me!\
name ""
name "Luka"
>Auuu!\
name ""
>The Lamia starts to contract her pussy in waves, as if goading me into an orgasm.\
>There's no way I could resist such an amazing invitation...\
name "Luka"
>Ahh... Doing that...!@>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\lamia_hb2.bmp",0,0
lsp 690,":a;chara\lamia_ctb02.bmp",0,0
gosub *syasei2
>Almost as if being milked, I explode inside the Lamia.@
>The Lamia continues her milking motion, as she sucks up all the semen.\
name $name
>...Fufu, you let it out.@
>From now on, I'll make you come repeatedly with no time to rest.\
name ""
name "Luka"
>Eh...? Ahhhh!\
name ""
mov %hseanwave,10:hseanwave
>In the next moment, the Lamia shrinks her pussy to half the size it was before.\
>Stuck deep inside her, her muscles start to contract around me, squeezing me like a pump.\
>From the tip of my penis to the base, her pussy violently milks me.\
name "Luka"
>Ahhhh!\
name ""
>The sudden attack of pleasure causes me to unconsciously try to pull my waist back.\
>But the Lamia's hold is too tight, and I can't even move an inch out of her.\
>With no way to escape, I have no choice but to be squeezed mercilessly...\
name "Luka"
>Auu... I'm coming again...\
name ""
gosub *syasei1
lsp 700,":a;chara\lamia_hb3.bmp",0,0
lsp 690,":a;chara\lamia_ctb03.bmp",0,0
gosub *syasei2
>The brutal squeezing forces me to come again quickly.\
name $name
>Fufu... You let out more of your delicious semen inside me.@
>Give me more of your nutritious seed...\
name ""
>Her relentless squeezing continues as she laughs at me.\
>With no end in sight, I'm forcefully brought to the brink of another climax.\
name "Luka"
>Ahi... Stop already...@
>I'll die at this rate...\
name ""
name $name
>I'll squeeze you until there's nothing left...\
name ""
name "Luka"
>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
name $name
>I'm making you feel good, so let out more.@
>Until not even a drop remains, I'll keep this up...\
name ""
name "Luka"
>Ahh... Help me... Someone...\
name ""
gosub *syasei1:gosub *syasei2
name $name
>Fufu... Crying while ejaculating. What a pathetic man.@
>Here... Let out even more!\
name ""
name "Luka"
>Ahhh...\
name ""
gosub *syasei1:gosub *syasei2
>The Lamia continues to milk me, even as I ejaculate.\
>Just like a real snake, she's toying with me... her prey.\
name $name
>There's no chance of you escaping from me anymore.@
>Like this, I'll keep squeezing semen out of you...@
>I won't let you die... I'll keep this up forever!\
name ""
name "Luka"
>Aaa...\
name ""
gosub *syasei1:gosub *syasei2
>There's no escape from this hell...@
>I have no choice but to be constricted by her and forcefully squeezed...\
name "Luka"
>Auuu...\
name ""
>In my misery, tears start to flow down my cheek.\
>While my mind is in horror at my situation, my body is rejoicing in the pleasure.\
name $name
>Fufufu... It's no use crying or screaming.@
>Lamias are able to continue mating for years.\
>I won't let you go until you die of old age.@
>Are you miserable?@> Are you mortified?@>Hahahaha!\
name ""
name "Luka"
>Aaa...\
name ""
gosub *syasei1:gosub *syasei2
>Unable to even respond to her anymore, I'm forced into another climax.\
>Awash in ecstasy, and too weak to move, my vision starts to fade.\
name $name
>Fainting while being raped...@
>Even while you're unconscious, I'll continue raping you.\
>Your penis is now just my property, after all.\
name ""
>There's no way to escape from mating with a Lamia... Until you die.@
>Giving in to the deep despair, I finally lose consciousness after coming one final time.\
name "Luka"
>Aaa...\
name ""
gosub *syasei1:gosub *syasei2
gosub *anten
mov %hseanwave,0:hseanwave
>Still being milked by the Lamia, I faint.\
>From now on, I'll be forced to continually mate with the Lamia until my death...\
>For every waking moment, I'll be stuck inside the Lamia's vagina...@
>Giving in to my despair, I accept my cruel fate.\
>...........\
goto *badend



*granberia2_start

mov $name,"Granberia"
mov $name2,"Granberia"
mov $lavel,"granberia2"
mov $tatie1,"granberia_st41"
mov $tatie2,"granberia_st41"
mov $tatie3,"granberia_st41"
mov $tatie4,"granberia_st41"
mov $haikei,"bg044"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,24000
if %nanido=2 mov %max_enemylife,36000
if %nanido=3 mov %max_enemylife,48000
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,70
mov %kaihi,80
mov %music,4
gosub *maxmp:mov %mp,2
mov %tikei,3
gosub *syutugen2
mov %end_n,2
mov %zmonster_x,-270
name "Luka"
>Guh... I'll stand and fight!\
name ""
>I don't think I can beat her...@
>But I have to stand and fight!\
goto *common_main



*granberia2001

if %hanyo1=1 goto *granberia2006
name $name
>I see... The same attack as last time.\
>But it's a lot more powerful this time.@
>I can see you've been training quite a lot.\
name ""
mov %hanyo1,1
if %hanyo1+%hanyo2+%hanyo3=3 goto *granberia2_v
>Granberia quietly holds up her sword.\
goto *common_main



*granberia2002

name $name
>What's that? Are you playing around?@
>That's annoying...\
name ""
gosub *granberia2_a6
goto *common_main



*granberia2003

if %hanyo2=1 goto *granberia2006
name $name
>Ohh... Thunder Thrust?@
>It looks like you're pretty good at using that skill.\
name ""
mov %hanyo2,1
if %hanyo1+%hanyo2+%hanyo3=3 goto *granberia2_v
>Granberia quietly holds up her sword.\
goto *common_main



*granberia2004

name $name
if %first_sel1=1 skip 5
>What's that?@
>Able to use a strange recovery technique...\
mov %first_sel1,1
skip 2
>This recovery technique again...\
name ""
>Granberia quietly holds up her sword.\
goto *common_main



*granberia2005

if %hanyo3=1 goto *granberia2006
name $name
>Demon Skull Beheading...@
>So you've made that technique your own as well...\
name ""
mov %hanyo3,1
if %hanyo1+%hanyo2+%hanyo3=3 goto *granberia2_v
>Granberia quietly holds up her sword.\
goto *common_main



*granberia2006

name $name
>You've already used that technique on me.@
>Show me everything you have!\
name ""
>Granberia quietly holds up her sword.\
goto *common_main



*granberia2_v

lsp 700,":a;chara\granberia_st11_b.bmp",11,0:print 10,500
name $name
>I see. I asked you to show me your skills...@
>However immature you are, there certainly is amazing potential...\
lsp 700,":a;chara\granberia_st13_b.bmp",11,0:print 10,500
>...Interesting.@>I'll let you live a little longer.\
name ""
name "Luka"
>Eh...?\
name ""
>I stand confused as Granberia puts away her sword.\
name $name
>Don't disappoint me.@
>Don't be beaten by some worthless monster.\
name ""
dwave 1,"se\warp.ogg"
csp 700:print 10,500
>With that final message, Granberia vanishes.@
>Just as quickly as she arrived, she leaves.\
mov %viclose,2:gosub *victory
mov %getexp,2000:gosub *lvup
mov %2229,1
goto *sean0096



*granberia2_kousan

gosub *kousan_syori
>Luka yields to the power of Granberia, ending his resistance!\
name $name
>...It looks like I judged you incorrectly!\
name ""
gosub *granberia2_a6
mov %turn,%turn+1
skip -2



*granberia2_main

gosub *cmd_main
if %cmd1=11 goto *common_attack
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *granberia2_kousan
if %cmd1=16 goto *granberia2_onedari
if %cmd1=17 goto *common_skill
goto *granberia2_main



*granberia2_a

if %before_action=21 goto *granberia2001
if %before_action=22 goto *granberia2003
if %before_action=23 goto *granberia2005
if %before_action=41 goto *granberia2002
if %before_action=42 goto *granberia2004
mov %hanyo4,%hanyo4+1
if %hanyo4=1 gosub *granberia2_a1:goto *common_main
if %hanyo4=2 gosub *granberia2_a4:goto *common_main
if %hanyo4=3 gosub *granberia2_a2:goto *common_main
if %hanyo4=4 gosub *granberia2_a5:goto *common_main
if %hanyo4=5 && %nanido<3 gosub *granberia2_a3:goto *common_main
if %hanyo4=6 gosub *granberia2_a6:goto *common_main
if %hanyo4>20 gosub *granberia2_a7:goto *common_main
rnd2 %ransu,1,6
if %nanido=3 rnd2 %ransu,4,6
if %ransu<4 gosub *granberia2_a3:goto *common_main
if %ransu=4 gosub *granberia2_a4:goto *common_main
if %ransu=5 gosub *granberia2_a5:goto *common_main
if %ransu=6 gosub *granberia2_a6:goto *common_main
skip -6



*granberia2_a1

add %stack,1
name "Guard A"
>I'll assist you, hero!\
name ""
dwave 1,"se\asioto1.ogg"
>A guard jumps into the fight next to me!\
name $name
>Don't interfere!\
name ""
skillname "Upper Slash"
dwave 1,"se\slash3.ogg"
>Granberia quickly slashes her sword upwards from below at the Guard.\
name "Guard A"
>Gahhh!\
name ""
delay 300
dwave 1,"se\damage2.ogg"
quake 10,600
rnd2 %damage,200,300
itoa $sel1,%damage
eng "Guard A takes "+$sel1+" damage!":$sel6\
wait 500
dwave 1,"se\down.ogg"
>Guard A goes flying from the slash, then crumples on the floor!\
skillname ""
name $name
>Now, Luka! Show me your skills!\
name ""
>Granberia quietly holds up her sword.\
sub %stack,1
return



*granberia2_a2

add %stack,1
name "Guard B"
>We must assist the Hero!\
name ""
name "Guard C"
>Ahh!\
name ""
dwave 1,"se\asioto1.ogg"
wait 200:dwave 2,"se\asioto1.ogg"
>Guard B and C jump into the fight!\
name $name
>I commend your courage...@>But!\
name ""
skillname "Cleave"
dwave 1,"se\karaburi.ogg"
>Granberia swings her sword in a wide arc, cutting everything in front of her!\
delay 300
dwave 1,"se\damage2.ogg"
quake 10,600
rnd2 %damage,300,400
itoa $sel1,%damage
eng "Guard B takes "+$sel1+" damage!":$sel6\
wait 500
dwave 1,"se\down.ogg"
>Guard B crumples on the floor!\
delay 300
dwave 1,"se\damage2.ogg"
quake 10,600
rnd2 %damage,300,400
itoa $sel1,%damage
eng "Guard C takes "+$sel1+" damage!":$sel6\
wait 500
dwave 1,"se\down.ogg"
>Guard C crumples on the floor!\
skillname ""
name $name
>...They need to have the ability to match that courage.\
name ""
name "Guard D"
>Cutting two people with one slash...\
name ""
name "Guard E"
>What strength...\
name ""
>The other guards begin to back away.\
name $name
>It doesn't seem like we'll get any more disturbances.@
>Now, Luka! Show me everything you've got!\
name ""
>Granberia quietly holds up her sword.\
sub %stack,1
return



*granberia2_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"What? Is that all you've got?"
if %ransu=2 mov $sel1,"You must have more than that... Show me!"
if %ransu=3 mov $sel1,"Now, come! Show me your full power!"
name $name
eng $sel1:$sel6\
name ""
>Granberia quietly holds up her sword.\
sub %stack,1
return



*granberia2_a4

add %stack,1
notif %hanyo4=2 skip 4
name $name
>That can't be everything you have!\
name ""
skillname "Restraint"
dwave 1,"se\tuki.ogg"
>Granberia quickly hits the hilt of my sword!
if %nanido<2 damage 20,25
if %nanido=2 damage 30,36
if %nanido=3 damage 38,50
skillname ""
if %mylife=0 sub %stack,1:return *granberia2_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *granberia2_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *granberia2_s2
sub %stack,1
return



*granberia2_a5

add %stack,1
notif %hanyo4=4 skip 4
name $name
>Surely you won't surrender by such a tiny attack?\
name ""
skillname "Wait and See"
dwave 1,"se\tuki.ogg"
>Granberia lightly slashes her sword at Luka!
if %nanido<2 damage 40,45
if %nanido=2 damage 60,67
if %nanido=3 damage 78,90
skillname ""
if %mylife=0 sub %stack,1:return *granberia2_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *granberia2_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *granberia2_s2
sub %stack,1
return



*granberia2_a6

add %stack,1
notif %hanyo4=6 skip 5
if %kousan=1 skip 4
name $name
>I won't go easy forever!\
name ""
skillname "Cleave"
dwave 1,"se\karaburi.ogg"
>Granberia swings her sword in a large arc!
mov %a_effect1,1
if %nanido<2 damage 70,80
if %nanido=2 damage 105,120
if %nanido=3 damage 140,160
skillname ""
if %mylife=0 sub %stack,1:return *granberia2_h1
if %kousan=1 skip 3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *granberia2_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *granberia2_s2
sub %stack,1
return



*granberia2_a7

add %stack,1
if %first_sel2=1 skip 11
name $name
>...That's enough. I'm disappointed.\
name ""
mov %first_sel2,1
if %nanido>0 mov %count_granhigi,1
skillname "Demon Skull Beheading * Blaze"
eng "Fire covering her sword.":$sel6/
dwave 1,"se\fire1.ogg"
lsp 700,":a;chara\granberia_st42.bmp",0,0:print 10,500
\
>Granberia leaps to the ceiling in a single jump! She slams the Sword down on Luka!
dwave 1,"se\karaburi.ogg"
lsp 2,":c;effect\003.bmp",0,0:print 1
wait 300
csp 2:print 18,1000,"system\mask01.jpg"
dwave 1,"se\bom2.ogg"
quake 10,1000
mov %a_effect1,1
mov %damage_kotei,1
damage 700,800
skillname ""
if %mylife=0 sub %stack,1:return *granberia2_h1
sub %stack,1
return



*granberia2_onedari

>This isn't an opponent I can make requests to!\
goto *granberia2_main



*granberia2_s1

add %stack,1
if %max_mylife>%mylife*5 mov %sel_hphalf,1:gosub *granberia2_s2:sub %stack,1:return
name "Luka"
>Too strong...\
name ""
name $name
>Come! I know you can still fight!\
name ""
mov %sel_hphalf,1
sub %stack,1
return



*granberia2_s2

add %stack,1
name "Luka"
>Any more than this...\
name ""
name $name
>...Is that your limit?@
>It seems I may have been wrong about you...\
name ""
mov %sel_kiki,1
sub %stack,1
return



*granberia2_h1

name "Luka"
>Gaaah!\
name ""
>I can't fight any more like this...@
dwave 1,"se\down.ogg"
>I collapse on my back on the floor.\
mov %viclose,2:gosub *lose
mov %2529,%2529+1:if %2529=1 mov %count_koenemy,%count_koenemy+1
if %2529>%count_most mov %count_most,%2529:mov $count_mostname,$name+" (2)"
count 14,5
mov $bad1," Luka was defeated by Granberia, and raped by her foot."
mov $bad2," After that, Luka was taken to the Monster Lord's castle, and became Granberia's sex toy."
lsp 700,":a;chara\granberia_st04.bmp",11,0:print 10,500
name $name
>It looks like it wasn't worth my time to come here after all...\
name ""
name "Guard D"
>She... She defeated the Hero!?\
name ""
name "Guard E"
>This isn't good! Run away!\
name ""
dwave 1,"se\asioto4.ogg"
wait 200:dwave 2,"se\asioto4.ogg"
>All of the guards ran away...\
goto *granberia2_h



*granberia2_h

mov $tatie2,"granberia_st13"
if %2529=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
lsp 700,":a;chara\granberia_st03.bmp",11,0:print 10,500
if %con_hvoice=0 dwave 0,"voice\granberia2_01.ogg"
name $name
>Returning after this would be too boring.
>I'll humiliate you a little... With this foot.\
name ""
dwavestop 0
>Granberia cuts open my pants with the sharp claws on her feet.@
>She skillfully cuts open my pants and underwear without leaving a scratch on my body.\
>And then exposes my penis...@
lsp 690,":a;chara\granberia_ct01.bmp",247,-122:print 10,500
>Then steps on it!\
name "Luka"
>Auu!\
name ""
>Softer than a human foot, it's warm and puffy.@
>With that soft foot, she starts to step on and squeeze my penis.\
if %con_hvoice=0 dwave 0,"voice\granberia2_02.ogg"
name $name
>The penis is the symbol of a man... And I'm stepping on it.
>Well? Are you humiliated?\
name ""
dwavestop 0
name "Luka"
>Auuu...\
name ""
>Granberia continues to step on my foot while looking down at me.@
>Being dominated by her, the feelings start to boil over in me.\
if %con_hvoice=0 dwave 0,"voice\granberia2_03.ogg"
name $name
>Haha... Are you frustrated? But you can't fight against it.\
name ""
dwavestop 0
mov %hseanwave,17:hseanwave
>Granberia starts to put more weight on her foot.@
>Sometimes twisting her foot while grasped onto my penis, she continues to crush my penis.\
>The disgrace sends a sickening pleasure through me.\
name "Luka"
>Stop...\
name ""
>I can feel some of my pre-come leak out onto her foot.@
>Seeing that, Granberia starts to laugh.\
if %con_hvoice=0 dwave 0,"voice\granberia2_04.ogg"
name $name
>...Already like this?
>Being stimulated by being stepped on. What a pathetic man.\
name ""
dwavestop 0
>Granberia gives a sadistic smile as she continues to step on, rub, and squeeze my penis with her foot.\
>Never making it too intense, she's deliberately stimulating me.\
name "Luka"
>Au... Aaa...\
name ""
>Feeling my resistance wane, my body starts to twitch.@
>Yielding completely, I accepted her domination.\
if %con_hvoice=0 dwave 0,"voice\granberia2_05a.ogg"
name $name
>So you surrendered yourself to being stepped on?
>Yielding like that... What an unsightly man.\
if %con_hvoice=0 dwave 0,"voice\granberia2_05b.ogg"
>Now... I'll finish you in an instant!\
name ""
dwavestop 0
name "Luka"
>Auuu!\
name ""
>Granberia starts to quickly move her foot.@
>My waist starts to shake pathetically at her relentless footwork.\
>The desire to release rises up through my waist.@
>Suddenly, Granberia tightly squeezes my penis, sending me over the edge.\
name "Luka"
>Aaaaa!\
name ""
gosub *syasei1
lsp 690,":a;chara\granberia_ct02.bmp",247,-122
gosub *syasei2
>Semen shoots out of my penis onto her foot, as she continues to step on me during my orgasm.\
name "Luka"
>Auuu...\
name ""
if %con_hvoice=0 dwave 0,"voice\granberia2_06.ogg"
name $name
>...You let it out.
>Forced to ejaculate by my foot... Miserable, right?\
name ""
dwavestop 0
>Looking down at me in superiority, Granberia continues to step on me.@
>Right after ejaculating, she's torturing my dick.\
name "Luka"
>Auuu...\
name ""
if %con_hvoice=0 dwave 0,"voice\granberia2_07.ogg"
name $name
>Now, playtime is over. Next will be something more intense.\
name ""
dwavestop 0
name "Luka"
>Eh...?\
name ""
>Granberia spreads my legs apart.@
>Like that, she hangs her foot in the air over my groin.\
if %con_hvoice=0 dwave 0,"voice\granberia2_08.ogg"
name $name
>Now, be mesmerized by my footwork!\
name ""
dwavestop 0
>Suddenly Granberia steps down on me!@
>Sometimes twisting her foot, the violent trampling sends electricity through my body.\
name "Luka"
>Aaahiii!\
name ""
if %con_hvoice=0 dwave 0,"voice\granberia2_09a.ogg"
name $name
>Horahora... How does it feel being humiliated by my foot?\
if %con_hvoice=0 dwave 0,"voice\granberia2_09b.ogg"
>Normally this should only bring disgrace...
>Not to mention being forced to ejaculate... The ultimate disgrace.\
name ""
dwavestop 0
>Still looking down at me, Granberia keeps twisting my penis with her foot.@
>Stepping and twisting, she violently attacks me.\
>Her merciless foot forces my body to writhe in futility.@
>But no matter how much I struggle, it's not possible to escape her.\
name "Luka"
>Aahhh! Ahhhh!\
name ""
>With no escape from this pleasure, the only thing I can do is scream.\
>Smiling at my screams, Granberia increases the force that she's stepping on me with.\
name "Luka"
>Ahii! Ahhhh!\
name ""
>Starting to feel numb around my waist, I feel the orgasm start to rise through me.\
if %con_hvoice=0 dwave 0,"voice\granberia2_10.ogg"
name $name
>...Fufu. Such a wretched state.
>Horahora... Shoot it out on my foot.\
name ""
dwavestop 0
>Granberia starts to move her foot up and down.@
>The intense increase in stimulation quickly forces me into submission.\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\granberia_ct03.bmp",247,-122
gosub *syasei2
>Shooting the proof of my surrender onto her foot.@
>But even after that, she doesn't let up at all.\
if %con_hvoice=0 dwave 0,"voice\granberia2_11.ogg"
name $name
>Did you make my foot dirty again?
>Leaking out so easily... Such a deplorable man.\
name ""
dwavestop 0
name "Luka"
>Ahii! Stop, please!\
name ""
>Ignoring my pleas, Granberia steps down harder on me.\
>Rhythmically rubbing against and twisting my penis, I'm quickly forced to surrender to her again.\
name "Luka"
>Ahhhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\granberia_ct04.bmp",247,-122
gosub *syasei2
>I shoot out more of my semen onto the foot that's torturing me.@
>Even covered in the proof of my surrender, her foot continues to step on me.\
if %con_hvoice=0 dwave 0,"voice\granberia2_12.ogg"
name $name
>Letting out as much as you want...
>Is my footwork too effective?\
name ""
dwavestop 0
name "Luka"
>Aaa... Uuuu...\
name ""
>Humiliated by her foot, I'm continually forced to ejaculate...@
>The overpowering pleasure forced into me brings tears to my eyes.\
if %con_hvoice=0 dwave 0,"voice\granberia2_13.ogg"
name $name
>Miserable... Letting out tears, snot, and saliva all over the place.
>Raped by my foot, you're showing a face you never wanted anyone to see.\
name ""
dwavestop 0
name "Luka"
>Haaaa!\
name ""
gosub *syasei1:gosub *syasei2
>Forced to come over and over again, Granberia doesn't stop her foot for a moment.\
>Stuck in this hell of pleasure, my mind and body are in tatters.\
name "Luka"
>Uuu... Auu....\
name ""
if %con_hvoice=0 dwave 0,"voice\granberia2_14a.ogg"
name $name
>...This is the fate of a loser.
>Played with by the winner, this is the only truth of this world.\
if %con_hvoice=0 dwave 0,"voice\granberia2_14b.ogg"
>While realizing that, come over and over again.\
name ""
dwavestop 0
name "Luka"
>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>Raped by her foot, I'm forced to continually ejaculate.\
name "Luka"
>Ahh...\
name ""
>Violated by a storm of pleasure, my body is too weak to move.@
>Unable to think clearly, I feel my consciousness start to fade.\
>My body and mind torn to pieces by her foot, it's as if my existence itself has been raped by Granberia.\
name "Luka"
>Aa...\
name ""
>Finally, I lose consciousness.\
gosub *anten
mov %hseanwave,0:hseanwave
if %con_hvoice=0 dwave 0,"voice\granberia2_15a.ogg"
name $name
>...Fainting just by this, what a pitiful man.\
if %con_hvoice=0 dwave 0,"voice\granberia2_15b.ogg"
>At any rate, you're the spoils of my victory.
>I'll take you back to the castle and make you into a toy.\
name ""
dwavestop 0
name "Luka"
>......\
name ""
>Thus, Granberia carried me back to the Monster Lord's castle.\
>Forced to become the monster's toy, I'll spend the rest of my life being played with.@
>This is the fate of a loser... I have no choice but to accept it.\
>..........\
goto *badend



*page17_start

mov $name,"Page 17"
mov $name2,"Page 17"
mov $lavel,"page17"
mov $tatie1,"page17_st01"
mov $tatie2,"page17_st01"
mov $tatie3,"page17_st01"
mov $haikei,"bg046"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,160
if %nanido=2 mov %max_enemylife,160
if %nanido=3 mov %max_enemylife,240
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,1
gosub *maxmp:mov %mp,0
mov %tikei,3
gosub *syutugen
mov $half_s1,"No mercy..."
mov $half_s2,""
mov $kiki_s1,"Prepare yourself..."
mov $kiki_s2,""
mov %end_n,2
mov %zmonster_x,-270
name "Luka"
>Uwa!@
>A monster appeared from the book!?\
name ""
>I quickly throw the book away and draw my sword.\
name $name
>It's forbidden to read this book...\
name ""
name "Luka"
>What do you mean?@
>Why don't you want me to read this book?\
name ""
name $name
>It's the Monster Lord's order.\
name ""
>Saying that, Page 17 attacks me!\
mov %sinkou,1
goto *common_main



*page17_v

gosub *face3
name $name
>I'm sorry my Lord...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Page 17 turns into a piece of paper!\
mov %viclose,1:gosub *victory
mov %getexp,700:gosub *lvup
mov %2230,1
goto *sean0097



*page17_kousan

gosub *kousan_syori
>Luka surrenders to the promise of pleasure, ending his resistance.\
gosub *face2
name $name
>I'll settle it, then...\
name ""
goto *page17_a



*page17_main

gosub *cmd_main
if %cmd1=11 && %nanido=0 goto *common_attack
if %cmd1=11 && %sinkou=1 goto *page17_attack1
if %cmd1=11 && %sinkou=2 goto *page17_attack2
if %cmd1=11 && %sinkou=3 goto *page17_attack3
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *page17_kousan
if %cmd1=16 goto *page17_onedari
if %cmd1=17 && %nanido=0 goto *common_skill
if %cmd1=17 goto *page17_skill
goto *page17_main



*page17_attack1

mov %before_action,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ha!"
if %ransu=2 mov $sel1,"Hya!"
if %ransu=3 mov $sel1,"Take this!"
name "Luka"
eng $sel1:$sel6\
name ""
mov %skill_sub,1
gosub *common_attack2
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\miss.ogg"
gosub *kaihi
>But Page 17 quickly dodges!\
name "Luka"
>Eh...?\
name ""
>Swaying like paper, she easily avoids my attack.\
mov %sinkou,2
goto *page17_a



*page17_attack2

mov %before_action,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ha!"
if %ransu=2 mov $sel1,"Hya!"
if %ransu=3 mov $sel1,"Take this!"
name "Luka"
eng $sel1:$sel6\
name ""
mov %skill_sub,1
gosub *common_attack2
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\miss.ogg"
gosub *kaihi
>But Page 17 quickly dodges!\
name "Luka"
>Guh... It's no good.\
name ""
>It doesn't look like a normal attack will hit her.@
>I need to use something with more speed...\
mov %sinkou,3
goto *page17_a



*page17_attack3

mov %before_action,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ha!"
if %ransu=2 mov $sel1,"Hya!"
if %ransu=3 mov $sel1,"Take this!"
name "Luka"
eng $sel1:$sel6\
name ""
mov %skill_sub,1
gosub *common_attack2
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\miss.ogg"
gosub *kaihi
>But Page 17 quickly dodges!\
goto *page17_a



*page17_skill

gosub *cmd_skill
if %cmd1=21 goto *page17_skillx1
if %cmd1=22 goto *skill2
if %cmd1=23 goto *page17_skill3
if %cmd1=24 goto *skill4
if %cmd1=25 goto *page17_skillx1
if %cmd1=35 goto *skill17
if %cmd1=-1 goto *page17_main
goto *page17_skill



*page17_skillx1

if %cmd1=21 mov %skill_sub,1:gosub *skill1:skip 2
if %cmd1=25 mov %skill_sub,1:gosub *skill5
mov %skill_sub,0
dwave 1,"se\miss.ogg"
gosub *kaihi
>But Page 17 quickly dodges!\
skillname ""
name "Luka"
if %first_sel2=1 skip 4
>Grr... This doesn't work either?\
mov %first_sel2,1
skip 2
>Not working...\
name ""
goto *page17_a



*page17_skill3

mov %before_action,22
rnd2 %ransu,1,2
if %ransu=1 mov $sel1,"Take this! Thunder Thrust!"
if %ransu=2 mov $sel1,"Hya! Thunder Thrust!"
if %turn=1 mov $sel1,"Here I come! Thunder Thrust!"
name "Luka"
eng $sel1:$sel6\
name ""
mov %mp,%mp-2
gosub *mp
skillname "Thunder Thrust"
>Luka steps in like thunder, and quickly thrusts!
dwave 1,"se\tuki.ogg"
lsp 2,":a;effect\009a_01.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009a_02.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009a_03.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009a_04.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009a_05.bmp",%tukix,%tukiy:print 10,12
csp 2
mov %abairitu,120
gosub *enemylife
skillname ""
if %enemylife=0 goto *page17_v
if %first_sel1=1 skip 5
name "Luka"
>Alright... It hit!\
name ""
mov %first_sel1,1
goto *page17_a



*page17_a

rnd2 %ransu,1,3
if %ransu=1 gosub *page17_a1:goto *common_main
if %ransu=2 gosub *page17_a2:goto *common_main
if %ransu=3 && %status=0 && %owaza_count2a>2 gosub *page17_a3:goto *common_main
skip -4



*page17_a1

add %stack,1
skillcount1 3090
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll force pleasure into you with my mouth..."
if %ransu=2 mov $sel1,"Be defeated by my mouth..."
if %ransu=3 mov $sel1,"*Lick* *Suck*"
name $name
eng $sel1:$sel6\
name ""
skillname "Sweet Pacifier"
dwave 1,"se\ero_buchu2.ogg"
>Page 17 quickly puts Luka's penis into her mouth and sucks!
if %nanido<2 damage 14,16
if %nanido=2 damage 19,22
if %nanido=3 damage 26,30
skillname ""
if %mylife=0 sub %stack,1:return *page17_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*page17_a2

add %stack,1
skillcount1 3091
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Sandwiched in my chest, I'll give you pleasure..."
if %ransu=2 mov $sel1,"Between my breasts..."
if %ransu=3 mov $sel1,"I'll violate you with my chest..."
name $name
eng $sel1:$sel6\
name ""
skillname "Sweet Tit Fuck"
dwave 1,"se\ero_koki1.ogg"
>Page 17 crushes Luka's penis between her breasts!
if %nanido<2 damage 15,17
if %nanido=2 damage 20,23
if %nanido=3 damage 28,32
skillname ""
if %mylife=0 sub %stack,1:return *page17_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*page17_a3

add %stack,1
skillcount1 3092
if %status=2 >Luka is paralyzed!\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You'll go numb in my mouth..."
if %ransu=2 mov $sel1,"Deprived of freedom, meet your end..."
if %ransu=3 mov $sel1,"With my mouth technique, you'll go numb..."
name $name
eng $sel1:$sel6\
name ""
skillname "Pacifier Paralysis"
dwave 1,"se\ero_chupa1.ogg"
>Page 17 quickly puts Luka's penis into her mouth and sucks!\
>The stimulation causes Luka's body to go numb!
if %nanido<2 damage 14,16
if %nanido=2 damage 19,22
if %nanido=3 damage 26,30
if %status=0 mov $sel1,"Luka was paralyzed!"
if %status=2 mov $sel1,""
mov %status,2:gosub *status_print
if $sel1<>"" eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *page17_h3
if %kousan=2 && %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %kousan=2 && %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
if %kousan=2 sub %stack,1:return
name "Luka"
>Uuu...\
name ""
name $name
>I'll finish it like this...\
name ""
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,2,3
if %nanido=3 rnd2 %status_turn,3,4
sub %stack,1
return



*page17_onedari

mov $list1,"Sweet Pacifier"
if %3090>0 mov %list_num1,1
mov $list2,"Sweet Tit Fuck"
if %3091>0 mov %list_num2,1
mov $list3,"Pacifier Paralysis"
if %3092>0 mov %list_num3,1
gosub *cmd_onedari
if %cmd1=11 goto *page17_onedari1
if %cmd1=12 goto *page17_onedari2
if %cmd1=13 goto *page17_onedari3
if %cmd1=-1 goto *page17_main
goto *page17_onedari



*page17_onedari1

gosub *onedari_syori
name $name
>You want to be defeated by my mouth...?\
name ""
gosub *page17_a1
skip -1



*page17_onedari2

gosub *onedari_syori
name $name
name ""
>You want to be defeated by my chest...?\
gosub *page17_a2
skip -1



*page17_onedari3

gosub *onedari_syori
name $name
>You want to be defeated while paralyzed...?\
name ""
gosub *page17_a3
skip -1



*page17_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\page17_bk01.bmp",0,0
gosub *syasei2
>Unable to stand her blowjob, Luka explodes in Page 17's mouth!\
mov %viclose,1:gosub *lose
mov %2530,%2530+1:if %2530=1 mov %count_koenemy,%count_koenemy+1
if %2530>%count_most mov %count_most,%2530:mov $count_mostname,$name
count 4,3
mov $bad1," Luka succumbs to Page 17's sweet pacifier technique."
if %status=2 mov $bad1,"Paralyzed, Luka succumbs to Page 17's sweet pacifier technique."
mov $bad2," Trapped in the book, Luka was raped endlessly."
name $name
>So you finished...\
name ""
goto *page17_h



*page17_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\page17_bk02.bmp",0,0
gosub *syasei2
>Unable to stand her tit fuck, Luka explodes on Page 17's chest!\
mov %viclose,1:gosub *lose
mov %2530,%2530+1:if %2530=1 mov %count_koenemy,%count_koenemy+1
if %2530>%count_most mov %count_most,%2530:mov $count_mostname,$name
count 7,3
mov $bad1," Luka succumbs to Page 17's titty fuck."
if %status=2 mov $bad1,"Paralyzed, Luka succumbs to Page 17's titty fuck."
mov $bad2," Trapped in the book, Luka was raped endlessly."
name $name
>So you finished...\
name ""
goto *page17_h



*page17_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\page17_bk01.bmp",0,0
gosub *syasei2
>Between her blowjob and the numbness spreading through his body, Luka yields, exploding inside Page 17's mouth.\
mov %viclose,1:gosub *lose
mov %2530,%2530+1:if %2530=1 mov %count_koenemy,%count_koenemy+1
if %2530>%count_most mov %count_most,%2530:mov $count_mostname,$name
count 4,3
mov $bad1,"Paralyzed, Luka succumbs to Page 17's blowjob."
mov $bad2," Trapped in the book, Luka was raped endlessly."
name $name
>So you finished...\
name ""
goto *page17_h



*page17_h

if %2530=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Auuu...\
name ""
>Too weak to stand, I fall onto the floor.@
>It's not possible to resist any more...\
name $name
>Now, I'll clean up...\
name ""
>Page 17 slowly moves toward me, and gets on top of my waist.\
name "Luka"
>What are you doing...?\
name ""
name $name
>I'm going to squeeze out your soul...\
name ""
>Hovering over me, I can see that she has a vagina that looks just like a human female's...\
>But looking as if it has a mind of its own, the entrance is opening and closing like a mouth.\
>Inside, there are countless little villi.@>Each one is wriggling around, making it seem like an entirely different creature.\
>If she puts my dick in there, I wonder what it would feel like...@
>Thinking that, I unconsciously swallow my saliva.\
name "Luka"
>Aaa...\
name ""
>But the feeling isn't going to stay in my imagination...@
>She's slowly moving that entrance closer to me...\
>Fear and expectation both filling me, my body starts to shake.\
name $name
>I'm going to rape... squeeze... and make you my prey.\
name ""
>Saying that, she forces me into her pussy.@
>The feeling I was just imagining starts to attack me as I'm pushed all the way inside of her.\
mov %hseanwave,9:hseanwave
lsp 690,":a;chara\page17_ct01.bmp",0,0:print 10,1500
name "Luka"
>Aaaa!\
name ""
>It's incredibly hot inside of her.@
>The millions of little villi start to wrap and rub me.\
>My body starts to relax and soak in the pleasure that was many times better than I was imagining.\
name "Luka"
>Auuu... Incredible...\
name ""
name $name
>With this meat hole, you'll meet your pathetic end...\
name ""
>Each of the millions of soft protrusions are wriggling and squirming all around me.\
>It's as if each one was a tiny tongue, all clambering to lick me.\
name "Luka"
>Uaaa... Too good...\
name ""
>Rubbing from the base to the tip, they don't leave a single millimeter of my penis alone.\
>The overpowering stimulation quickly brings me to the edge of an orgasm.\
name "Luka"
>C...Coming...\
name ""
name $name
>Good, let it out...@
>I'll dispose of all of your semen...\
name ""
>As she says that, the soft villi start to increase their speed.@
>There's no way I can resist this single-minded attack of pleasure.\
name "Luka"
>Aahhh!\
name ""
gosub *syasei1
lsp 693,":a;chara\page17_bk03.bmp",0,0
lsp 690,":a;chara\page17_ct02.bmp",0,0
gosub *syasei2
>My mind goes blank as I give in to the desire of release.@
>Yielding to her amazing pussy, I shoot out my semen into it.\
name "Luka"
>Eh...? What's... this...?\
name ""
>Suddenly, a strange sensation explodes through my waist.\
gosub *syasei1
lsp 690,":a;chara\page17_ct03.bmp",0,0
gosub *syasei2
>For some reason, I can't stop my ejaculation...@
>Stuck in my orgasm, I can feel something being sucked out of my penis.\
name $name
>Squeezing everything out, I'll take your soul...\
name ""
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
name "Luka"
>Aaah... Sucking so much...@
>That's... Incredible...\
name ""
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
>Awash in ecstasy, I keep shooting more and more out.@
>My vision fades in and out as the overpowering pleasure at this continual orgasm takes over my body.\
>It's as if I'm shooting out my very soul...\
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
name "Luka"
>Auuu... Too good...\
name ""
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
>I cling to Page 17's body while I convulse pathetically, as my life itself is being sucked into her pussy.\
>Awash in ecstasy, fear starts to surge into my mind.@
>Terrified at what's happening, I can't resist the pleasure taking over my body.\
name $name
>Squeeze everything...\
name ""
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
>She looks down at me with cold eyes as everything is mercilessly being sucked from me.\
>If this keeps up for much longer, what's going to happen to me...?\
name "Luka"
>Faaa... Amazing...\
name ""
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
>I can't escape from this ruinous pleasure.@
>Too weak to resist, I can only cling to Page 17's body.\
name "Luka"
>Faaa...\
name ""
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
>My consciousness starts to fade as a haze fills my mind.@
>Having everything being sucked out, it feels as though my existence is melting.\
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
>...Finally, I lose consciousness.@
>Seeing the darkness close in around me, my last thought is acknowledging my death.\
gosub *anten
mov %hseanwave,0:hseanwave
>...........\
name "Luka"
>Where am I...?\
name ""
>I'm in complete darkness. There's no sound or light.@
>Is this the afterlife?\
lsp 700,":a;chara\page17_st01.bmp",0,0:print 10,500
name $name
>I sucked up your soul.@
>Your body rotted away, and now your soul is mine.\
>We're inside of the book.@
>There's no way for you to escape from here.\
name ""
name "Luka"
>No way... Ahh!\
name ""
>Before I can say anything else, she leans into me.@
>Unable to resist, she starts to rape me again.\
mov %hseanwave,9:hseanwave
lsp 690,":a;chara\page17_ct01.bmp",0,0:print 10,1500
name "Luka"
>Ahhh!\
name ""
>Even though I'm only a soul now, the pleasure is just as powerful as before.\
name $name
>Just like this, I'll keep raping you.@
>Inside this book... For eternity.\
name ""
name "Luka"
>No! Auuu!\
name ""
gosub *syasei1
lsp 693,":a;chara\page17_bk03.bmp",0,0
lsp 690,":a;chara\page17_ct02.bmp",0,0
gosub *syasei2
>Unable to last even a few seconds, I explode into her.\
lsp 690,":a;chara\page17_ct03.bmp",0,0:print 10,1500
name "Luka"
>Faaa... Incredible...\
name ""
name $name
>I'll let you indulge in this pleasure for eternity...@
>I'll keep raping you for ever, and ever, and ever...\
name ""
name "Luka"
>Aaaaa...\
name ""
>From now on, I'll be raped by Page 17...@
>For eternity inside this book, she will continue to squeeze out everything...\
>Completely drowned in pleasure, every day is like a dream for me.@
>In compensation for an eternity of pleasure, I'm stuck inside here with no escape...\
>Thus, my adventure ends...\
gosub *anten
mov %hseanwave,0:hseanwave
>............\
goto *badend



*page257_start

mov $name,"Page 257"
mov $name2,"Page 257"
mov $lavel,"page257"
mov $tatie1,"page257_st01"
mov $tatie2,"page257_st02"
mov $tatie3,"page257_st03"
mov $tatie4,"page257_h1"
mov $haikei,"bg046"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,500
if %nanido=2 mov %max_enemylife,700
if %nanido=3 mov %max_enemylife,900
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,1
gosub *maxmp:mov %mp,%max_mp
mov %tikei,3
gosub *syutugen
mov $mogaku_anno1,"Luka can't break free of her arm!"
mov $mogaku_anno2,"Luka broke free of her arm!"
mov $mogaku_anno3,"Luka's strength is dulled as he's held by Page 257!"
mov $mogaku_sel1,"I won't let go, Haha."
mov $mogaku_sel2,"Just accept it..."
mov $mogaku_sel3,"Just accept it..."
mov $mogaku_sel4,"It's useless to struggle..."
mov $mogaku_sel5,"Struggling so much... How unsightly."
mov $mogaku_dassyutu1,"Aww... I wanted to play with you until you ejaculated."
mov $mogaku_dassyutu2,""
mov $half_s1,"Oh... Something came out of your penis."
mov $half_s2,"Is that your pre-come...?"
mov $kiki_s1,"I'll force you to ejaculate, held by this arm..."
mov $kiki_s2,"Now, show me what it looks like when you come..."
mov %end_n,2
mov %zmonster_x,-300
name "Luka"
>What the? Again!?\
name ""
>I quickly put my sword up at the new monster jumping out of the book.@
>...And this time, it looks like some kind of shy girl.\
name "Luka"
>Um... Could you please leave me alone?@
>I just want to read that book...\
name ""
gosub *face2
name $name
>Haha... What a cute man.@
>I'm interested in a man's penis...@
>Just a little... Could you let me play with yours?\
name ""
name "Luka"
>Not listening to me, eh?@> Well then, here I come!\
name ""
name $name
>Hehe... I'll play with your penis plenty.@
>Gently... Carefully...\
name ""
gosub *face1
goto *common_main



*page257_v

gosub *face3
name $name
>Beaten by a human like this...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Page 257 turns into a single piece of paper!\
mov %viclose,1:gosub *victory
mov %getexp,750:gosub *lvup
mov %2231,1
goto *sean0098



*page257_kousan

gosub *kousan_syori
>Luka yields to the promise of pleasure, ending his resistance!\
gosub *face2
name $name
>Did you give up?@
>Then... I'll play with your penis to my heart's content.\
name ""
goto *page257_a



*page257_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *page257_kousan
if %cmd1=16 goto *page257_onedari
if %cmd1=17 goto *common_skill
goto *page257_main



*page257_a

if %kousoku=1 rnd2 %ransu,1,10
if %kousoku=1 && %ransu=1 gosub *page257_a4:gosub *page257_a4:goto *common_main
if %kousoku=1 && %ransu=2 gosub *page257_a4:gosub *page257_a5:goto *common_main
if %kousoku=1 && %ransu=3 gosub *page257_a4:gosub *page257_a6:goto *common_main
if %kousoku=1 && %ransu=4 gosub *page257_a4:gosub *page257_a7:goto *common_main
if %kousoku=1 && %ransu=5 gosub *page257_a5:gosub *page257_a5:goto *common_main
if %kousoku=1 && %ransu=6 gosub *page257_a5:gosub *page257_a6:goto *common_main
if %kousoku=1 && %ransu=7 gosub *page257_a5:gosub *page257_a7:goto *common_main
if %kousoku=1 && %ransu=8 gosub *page257_a6:gosub *page257_a6:goto *common_main
if %kousoku=1 && %ransu=9 gosub *page257_a6:gosub *page257_a7:goto *common_main
if %kousoku=1 && %ransu=10 gosub *page257_a7:gosub *page257_a7:goto *common_main
rnd2 %ransu,1,6
if %ransu=1 gosub *page257_a1:goto *common_main
if %ransu=2 gosub *page257_a2:goto *common_main
if %ransu>2 && %owaza_count1a>2 gosub *page257_a3:goto *common_main
skip -4



*page257_a1

add %stack,1
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hehehe..."
if %ransu=2 mov $sel1,"What a cute penis..."
if %ransu=3 mov $sel1,"How would you like me to play with you...?"
if %ransu=4 mov $sel1,"With this arm, I'll play with you..."
name $name
eng $sel1:$sel6\
name ""
>Page 257 is shyly giggling!\
sub %stack,1
return



*page257_a2

add %stack,1
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"So if I do that, the man will... Hmm..."
if %ransu=2 mov $sel1,"I see, so if I touch him like this..."
if %ransu=3 mov $sel1,"Wait a second, I need to look something up..."
if %ransu=4 mov $sel1,"If I don't learn it correctly..."
name $name
eng $sel1:$sel6\
name ""
>Page 257 scans through her book!\
sub %stack,1
return



*page257_a3

add %stack,1
gosub *face2
name $name
>First I'll grab you...\
name ""
skillname "Grab"
dwave 1,"se\ero_makituki5.ogg"
>A huge arm grabs Luka!\
mov %kousoku,1:gosub *status_print
>Luka is restrained by the giant arm!\
skillname ""
name $name
>Yay! I caught you.\
if %first_sel1=0 mov $sel1,"So now I'll start to play with your penis..."
if %first_sel1=1 mov $sel1,"This time, I won't let you escape."
if %kousan=2 mov $sel1,"Now, as you requested..."
eng $sel1:$sel6\
name ""
mov %first_sel1,1
if %nanido<2 mov %genmogaku,2
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,3
sub %stack,1
return



*page257_a4

add %stack,1
skillcount1 3093
>Luka's body is being held by the giant arm!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Your tip is all squishy...":mov $sel2,"Page 257 pokes at the tip of Luka's penis with her finger!"
if %ransu=2 mov $sel1,"It feels good here, right?":mov $sel2,"Page 257 pokes the back of Luka's penis!"
if %ransu=3 mov $sel1,"This is where the semen comes out...":mov $sel2,"Page 257 gently pokes Luka's urethral opening!"
if %ransu=4 mov $sel1,"If you spread open this umbrella looking part, it hurts doesn't it?":mov $sel2,"Page 257 traces her finger around the tip of Luka's penis!"
if %ransu=5 mov $sel1,"*Poke* *Poke* *Poke*":mov $sel2,"Page 257 gently pokes Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Poke"
dwave 1,"se\ero_sigoki1.ogg"
lsp 690,":a;chara\page257_ct01.bmp",0,0:print 10,500
eng $sel2:$sel6
if %nanido<2 damage 17,22
if %nanido=2 damage 25,33
if %nanido=3 damage 34,44
skillname ""
if %mylife=0 sub %stack,1:return *page257_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*page257_a5

add %stack,1
skillcount1 3094
>Luka's body is being held by the giant arm!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"The tip looks so cute.":mov $sel2,"Page 257 gently strokes the tip of Luka's penis!"
if %ransu=2 mov $sel1,"Shall I rub this little hole, too?":mov $sel2,"Page 257 strokes Luka's urethral opening!"
if %ransu=3 mov $sel1,"I'll rub the umbrella...":mov $sel2,"Page 257 strokes the tip of Luka's penis!"
if %ransu=4 mov $sel1,"Your penis is so cute...":mov $sel2,"Page 257 gently strokes Luka's penis!"
if %ransu=5 mov $sel1,"Hehe... Good boy, good boy.":mov $sel2,"Page 257 pats Luka's head as she strokes his penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Stroke"
dwave 1,"se\ero_koki1.ogg"
lsp 690,":a;chara\page257_ct01.bmp",0,0:print 10,500
eng $sel2:$sel6
if %nanido<2 damage 17,22
if %nanido=2 damage 25,33
if %nanido=3 damage 34,44
skillname ""
if %mylife=0 sub %stack,1:return *page257_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*page257_a6

add %stack,1
skillcount1 3095
>Luka's body is being held by the giant arm!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Is this how men like to be stimulated...?":mov $sel2,"Page 257 grabs Luka with her hand, and starts to stroke it!"
if %ransu=2 mov $sel1,"Hehehe...":mov $sel2,"Page 257 grabs Luka's penis tightly, and starts to pump!"
if %ransu=3 mov $sel1,"I'll play with your penis...":mov $sel2,"Page 257 alternates between squeezing and releasing Luka's penis!"
if %ransu=4 mov $sel1,"I'll squeeze out your male milk...":mov $sel2,"Page 257 strokes Luka's penis as if milking him!"
if %ransu=5 mov $sel1,"Does it feel good if I do this...?":mov $sel2,"Page 257 tightly grasps Luka's penis and quickly pumps it!"
name $name
eng $sel1:$sel6\
name ""
skillname "Handjob"
dwave 1,"se\ero_koki1.ogg"
lsp 690,":a;chara\page257_ct01.bmp",0,0:print 10,500
eng $sel2:$sel6
if %nanido<2 damage 17,22
if %nanido=2 damage 25,33
if %nanido=3 damage 34,44
skillname ""
if %mylife=0 sub %stack,1:return *page257_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*page257_a7

add %stack,1
skillcount1 3096
>Luka's body is being held by the giant arm!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll tease you a little...":mov $sel2,"Page 257 uses her index finger to pretend to write letters on Luka's penis!"
if %ransu=2 mov $sel1,"Haha... It's so squishy.":mov $sel2,"Page 257 grasps Luka's penis between her thumb and forefinger!"
if %ransu=3 mov $sel1,"The hole where semen comes out from...":mov $sel2,"Page 257 opens Luka's urethral opening and blows into it!"
if %ransu=4 mov $sel1,"If I grab it, does it feel good?":mov $sel2,"Page 257 tightly grips the tip of Luka's penis!"
if %ransu=5 mov $sel1,"Does it feel good when I play with you?":mov $sel2,"Page 257 tightly squeezes on Luka's penis with her thumb and forefinger!"
name $name
eng $sel1:$sel6\
name ""
skillname "Fiddle"
dwave 1,"se\ero_pyu1.ogg"
lsp 690,":a;chara\page257_ct01.bmp",0,0:print 10,500
eng $sel2:$sel6
if %nanido<2 damage 17,22
if %nanido=2 damage 25,33
if %nanido=3 damage 34,44
skillname ""
if %mylife=0 sub %stack,1:return *page257_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*page257_onedari

mov $list1,"Poke"
if %3093>0 mov %list_num1,1
mov $list2,"Stroke"
if %3094>0 mov %list_num2,1
mov $list3,"Handjob"
if %3095>0 mov %list_num3,1
mov $list4,"Fiddle"
if %3096>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *page257_onedari1
if %cmd1=12 goto *page257_onedari2
if %cmd1=13 goto *page257_onedari3
if %cmd1=14 goto *page257_onedari4
if %cmd1=-1 goto *page257_main
goto *page257_onedari



*page257_onedari1

gosub *onedari_syori_k
name $name
>You want me to poke your penis?@
>Then, I'll do just that...\
name ""
if %kousoku=0 gosub *page257_a3
gosub *page257_a4
skip -1



*page257_onedari2

gosub *onedari_syori_k
name $name
>You want me to stroke your penis?@
>Then, I'll do just that...\
name ""
if %kousoku=0 gosub *page257_a3
gosub *page257_a5
skip -1



*page257_onedari3

gosub *onedari_syori_k
name $name
>You want me to massage your penis?@
>Then, I'll do just that...\
name ""
if %kousoku=0 gosub *page257_a3
gosub *page257_a6
skip -1



*page257_onedari4

gosub *onedari_syori_k
name $name
>You want me to play around with your penis?@
>As I expected, that's all males really want...\
name ""
if %kousoku=0 gosub *page257_a3
gosub *page257_a7
skip -1



*page257_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\page257_ct02.bmp",0,0
gosub *syasei2
>Luka is unable to resist Page 257 poking him.@
>Yielding, he explodes all over her hand and cheek.\
mov %viclose,1:gosub *lose
mov %2531,%2531+1:if %2531=1 mov %count_koenemy,%count_koenemy+1
if %2531>%count_most mov %count_most,%2531:mov $count_mostname,$name
count 5,5
mov $bad1," Luka succumbs to Page 257's poking."
mov $bad2," Trapped in the book, Luka was played with for eternity."
goto *page257_h



*page257_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\page257_ct02.bmp",0,0
gosub *syasei2
>Luka is unable to resist Page 257 stroking him.@
>Yielding, he explodes all over her hand and cheek.\
mov %viclose,1:gosub *lose
mov %2531,%2531+1:if %2531=1 mov %count_koenemy,%count_koenemy+1
if %2531>%count_most mov %count_most,%2531:mov $count_mostname,$name
count 5,5
mov $bad1," Luka succumbs to Page 257's stroking."
mov $bad2," Trapped in the book, Luka was played with for eternity."
goto *page257_h



*page257_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\page257_ct02.bmp",0,0
gosub *syasei2
>Luka is unable to resist Page 257 massaging him.@
>Yielding, he explodes all over her hand and cheek.\
mov %viclose,1:gosub *lose
mov %2531,%2531+1:if %2531=1 mov %count_koenemy,%count_koenemy+1
if %2531>%count_most mov %count_most,%2531:mov $count_mostname,$name
count 5,5
mov $bad1," Luka succumbs to Page 257's massaging."
mov $bad2," Trapped in the book, Luka was played with for eternity."
goto *page257_h



*page257_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\page257_ct02.bmp",0,0
gosub *syasei2
>Luka is unable to resist Page 257 playing with him.@
>Yielding, he explodes all over her hand and cheek.\
mov %viclose,1:gosub *lose
mov %2531,%2531+1:if %2531=1 mov %count_koenemy,%count_koenemy+1
if %2531>%count_most mov %count_most,%2531:mov $count_mostname,$name
count 5,5
mov $bad1," Luka succumbs to Page 257 as she plays with his penis."
mov $bad2," Trapped in the book, Luka was played with for eternity."
goto *page257_h



*page257_h

if %2531=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name $name
>So that's a man's ejaculation...@
>Pulsating and twitching like that... It seems shameful.\
name ""
>Page 257 giggles as she looks at the semen that splashed on her.@
>Then she reaches her hand out at my now flaccid penis.\
name $name
>Is it true that it's extremely sensitive after ejaculating?\
name ""
name "Luka"
>Ahh! Stop!\
name ""
name $name
>Haha. It's true.\
name ""
mov %hseanwave,17:hseanwave
>She laughs at my pathetic yell after she grabs me.\
>She starts to softly stroke it, as if trying to confirm the sensitivity.@
>I let loose a pitiful cry at her stroking.\
name $name
>Does that cry mean it's too sensitive?@
>Your penis is twitching like a scared animal...\
name ""
name "Luka"
>Aaaa...\
name ""
>Page 257 grabs my penis with both hands, and starts to stroke it as if it was some cute animal.\
>Held by her soft palms, I could do nothing but squirm.\
name $name
>Hehe... Does it feel good?\
name ""
name "Luka"
>Aaahhh!\
name ""
>Massaged by her soft warm hands, my dick instantly becomes erect again.@
>Becoming erect just by being played with, I feel miserable.\
name $name
>Haha... It got big again.\
name ""
>Page 257 beams a mocking smile at me as she continues to caress me.\
>I can feel all ten of her fingers grasping me...@
>Stimulating me in different ways, she carefully watches my reactions.\
name $name
>Every time I touch this little hole, your waist quickly jumps up...\
name ""
name "Luka"
>Ahhh!\
name ""
>She starts to slowly circle my urethral opening with her index finger.@
>Leaking pre-come from the pleasure she's forcing into me, it makes her finger wet.\
>She looks at the white liquid with amusement.\
name $name
>Are you happy at me touching your penis?@
>Do you want me to play with you even more?\
name ""
>Giggling, Page 257 spreads open the opening with her fingers.@
>Gently poking my tip, the tantalizing pleasure explodes through my waist.\
name "Luka"
>Ahhhhhh!\
name ""
name $name
>Your penis looks so happy at being played with...@
>Men are so simple...\
name ""
>While muttering in amazement, she spits into her right hand.@
>Her now slippery hand grasps onto the tip of my penis.\
name "Luka"
>Auu!\
name ""
name $name
>Like this, I'll massage the tip...@
>When you can't take it any more, just shoot it out.@
>I'll catch all of it in this hand... Haha.\
name ""
name "Luka"
>Ahhh!\
name ""
>Page 257 rhythmically grabs and releases the tip of my penis as she rotates her hand around in a circle.\
>Her soft hand, now lubricated by her saliva, attacks me with overpowering pleasure.\
>Each rotation of her hand drains more of the small strength I had left in my body.\
name "Luka"
>Faaa!\
name ""
name $name
>Haha... What a pathetic yell.@
>Are you about to explode into my palm?\
name ""
>I can feel the desire to release rise through my waist.@
>Cornered and unable to escape, I have no choice but to admit it...\
name "Luka"
>Auu... C...Coming!\
name ""
name $name
>Hehe... Go ahead.\
name ""
>Grinning, she continues rubbing me.@
>That pleasure that's forcing me to surrender...\
name "Luka"
>Aaaaa!\
name ""
gosub *syasei1
lsp 690,":a;chara\page257_ct03.bmp",0,0
gosub *syasei2
>As I orgasm, she grabs down on my penis as I start to ejaculate.\
name $name
>Hehe...\
name ""
>She laughs as my semen shoots out over her hand, continuing to massage me during my ejaculation.\
name "Luka"
>Aaaa!\
name ""
name $name
>As I thought, you're really sensitive while you ejaculate.@
>It looks like a man's orgasm is a little more complex than I thought.\
name ""
>Even though she says that, she doesn't stop the stimulation.\
name "Luka"
>Stop! Ahhhh!\
name ""
>My body writhes as she continues massaging me during my ejaculation.\
>Humiliated at being toyed with during my orgasm, I finally shoot out the last spurt.\
name $name
>Did it feel good?@>Now, for the next time...\
name ""
name "Luka"
>Stop... Already...\
name ""
name $name
>I'm not even close to satisfied.@
>This time, let me see just how much semen you can shoot out.\
name ""
>She grabs my penis in her right hand, and starts to quickly pump me up and down.\
>Different from when she was just playing with me, this time Page 257 is trying to force me to ejaculate as quickly as possible.\
name "Luka"
>Aaaaa!\
name ""
name $name
>This is how a man usually plays with himself...@
>Is this what you do when you want to squeeze out your own semen?\
name ""
name "Luka"
>Auu... Stop it...\
name ""
>She starts to quicken her speed, as her grip starts to slowly tighten.\
>As she tries to force me into another ejaculation, I feel the next orgasm start to rise through my waist.\
name "Luka"
>Aaa... Coming again...\
name ""
name $name
>That's a lot faster than before...@
>Is my technique that good?\
name ""
name "Luka"
>Auuu!\
name ""
>I finally succumb to Page 257's pumping.@
gosub *syasei1:gosub *syasei2
>Forced to ejaculate again, the humiliation washes over me.\
name $name
>Hehe... It's shooting all over the place.@
>Men have such bad manners.\
name ""
>Saying that, she doesn't slow down her hand at all.@
>Up and down... Her hand continues the merciless torture.\
name "Luka"
>Ahh! Stop already!\
name ""
name $name
>What did I just say?@
>I said I wanted to see how much can come out.\
>Until nothing more comes out, I have to keep going.\
name "Luka"
>Ahhh!\
name ""
>Declaring that terrifying statement, she continues to milk me.@
>Completely at the mercy of her hand, the urge to release rises in me yet again.\
>Forced to yield to her whims, the disgrace fills me up.@
>No matter how hard I try to endure, her hand destroys my will.\
name "Luka"
>Auu... I'm going to come...\
name ""
gosub *syasei1:gosub *syasei2
name $name
>It's less than the last time...@
>You can put out more though, right?\
name ""
>She continues her pumping.@
>Single-mindedly squeezing everything out of me, I'm forced to another height.\
name "Luka"
>Auuuuuu!\
name ""
gosub *syasei1
lsp 690,":a;chara\page257_ct04.bmp",0,0
gosub *syasei2
>No matter how much I shoot out, she continues to milk me.@
>Not trying to give pleasure, she's just squeezing me to satisfy her curiosity.\
name "Luka"
>Aaaa!\
name ""
gosub *syasei1
lsp 690,":a;chara\page257_ct04.bmp",0,0
gosub *syasei2
mov %hseanwave,0:hseanwave
>Finally satisfying her interest, by the tenth orgasm nothing more comes out.\
name $name
>Oh... That's pretty impressive.@
>You got so much all over my body.\
name ""
>Page 257 giggles as she plays with the cloudy white semen on her.@
>She looks at me with the face of a female who has completely dominated a man.\
name "Luka"
>A...aa...\
name ""
>Squeezed dry, I'm too exhausted to move.@
>I can't even move a finger any more...\
name $name
>Hehe... It looks like you're completely exhausted.@
>Then... Shall I invite you into my world?\
name ""
name "Luka"
>What...?\
name ""
>Suddenly, she covers my body with her book, and closes it over me!@
>The next moment...\
gosub *anten
>I'm in a strange place...@
>Lying in a dark world, I'm unable to move my body.\
name "Luka"
>Where is this...?\
name ""
lsp 700,":a;chara\page257_st01.bmp",0,0:print 10,500
name $name
>You're inside the book... A different world.@
>I brought you into my world.\
name ""
name "Luka"
>No way...\
name ""
name $name
>There are lots of things I still want to try with your body.@
>There's plenty of time, so I'll be sure to thoroughly study you...\
name "Luka"
>No way... Auu!\
name ""
>Her small hands grab my penis again.\
name $name
>Now, this time let's try...\
name ""
name "Luka"
>Ahhh!\
name ""
gosub *anten
>Thus, I continue to satisfy her curiosity...@
>I'm just her specimen, unable to ever escape...\
>There's no escape from this world...@
>My existence is now only to satisfy her interests...\
>.........\
goto *badend



*page65537_start

mov $name,"Page 65537"
mov $name2,"Page 65537"
mov $lavel,"page65537"
mov $tatie1,"page65537_st01"
mov $tatie2,"page65537_st02"
mov $tatie3,"page65537_st01"
mov $tatie4,"page65537_st02"
mov $haikei,"bg046"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,2100
if %nanido=2 mov %max_enemylife,2250
if %nanido=3 mov %max_enemylife,3000
if %nanido=1 mov %henkahp1,1400
if %nanido=2 mov %henkahp1,1500
if %nanido=3 mov %henkahp1,2000
if %nanido=1 mov %henkahp2,700
if %nanido=2 mov %henkahp2,750
if %nanido=3 mov %henkahp2,1000
if %nanido=0 mov %max_enemylife,3
if %nanido=0 mov %henkahp2,1
if %nanido=0 mov %henkahp1,2
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,2
gosub *maxmp:mov %mp,%max_mp
mov %tikei,3
gosub *syutugen
mov $mogaku_anno1,"Luka can't break free of her tentacles!"
mov $mogaku_anno2,"Luka broke free of her tentacles!"
mov $mogaku_anno3,"Luka is unable to move!"
mov $mogaku_sel1,"Hahaha... I won't let go."
mov $mogaku_sel2,"I'll humiliate you, just like this..."
mov $mogaku_sel3,"What are you doing? It looks pathetic."
mov $mogaku_sel4,"It makes me happy when I see you struggle."
mov $mogaku_sel5,"Haha.... You're powerless."
mov $mogaku_dassyutu1,"You broke free...?"
mov $mogaku_dassyutu2,"But don't think you can stay free of my tentacles for long..."
mov $half_s1,"It's almost time... Hehe."
mov $half_s2,""
mov $kiki_s1,"Now, it's time to finish you."
mov $kiki_s2,""
mov %end_n,2
mov %zmonster_x,-270
mov %tukix,300
mov %owaza_count1a,2
name $name
>By order of the Monster Lord, I cannot allow you to read this book.@
>Especially not if you are a Hero.\
name ""
name "Luka"
>I'm sorry, but I'll read it even if it's by force!\
name ""
>By the way, the person who ordered you to guard this book is right over there eating a baked potato.\
>Maybe I should tell her that...\
gosub *face2
name $name
>I love silence...@
>Thus, I hate energetic people like you.\
>Therefore, I'll suck up all your energy as my nourishment.\
name ""
>It looks like I can't avoid this fight either!\
gosub *face1
mov %sinkou,1
goto *common_main



*page65537001

name $name
eng "Ah!":$sel6/
mov $tatie1,"page65537_st11"
mov $tatie2,"page65537_st12"
mov $tatie3,"page65537_st11"
mov $tatie4,"page65537_st12"
gosub *face3
mov %sinkou,2
\
name ""
>My attack causes her hair to become undone.\
gosub *face1
name $name
>...You had to go and do that.@
>It's time for me to get a little serious.\
name ""
gosub *page65537_a9
gosub *page65537_a2
goto *common_main



*page65537002

name $name
eng "Ah!":$sel6/
mov $tatie1,"page65537_st21"
mov $tatie2,"page65537_st22"
mov $tatie3,"page65537_st23"
mov $tatie4,"page65537_st22"
gosub *face3
mov %sinkou,4
\
name ""
>My attack causes her glasses to fall off.\
gosub *face1
name $name
>To think you would go that far.@
>I will never forgive a man like you.@
>I'll finish you with my full strength!\
name ""
gosub *page65537_a12
gosub *page65537_a2
goto *common_main



*page65537_v

gosub *face3
name $name
>I... To a human...!?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Page 65537 turns into a normal looking book!\
name "Luka"
>Alright!@> Huh?\
name ""
lsp 700,":a;chara\"+$tatie1+".bmp",%monster_x,%monster_y
dwave 1,"se\syometu.ogg"
print 99,4500,"system\breakup.dll/urb"
lsp 561,":a;system\gagee100.bmp",421,556
>Suddenly, she turns back into her original form!\
name "Luka"
>What's going on...?\
name ""
gosub *face2
name $name
>Because of my special body composition, I can resist the sealing effects of your sword.\
>You won't be able to seal me like you did the others.@
>All that effort was wasted, Hahaha!\
name ""
name "Luka"
>No way...\
name ""
name $name
>My only weakness is fire, but a human swordsman like you can't use such magic.\
>Therefore, the only thing left for you is to be defeated by me.\
name ""
name "Luka"
>Guh..! What should I do...?\
name ""
>As she said, I can't use anything like fire magic...@
>Is there really no way to defeat her?\
name $name
>Are you surrendering?@
>Now, allow me to suck out your energy...\
name ""
name "Luka"
>Gah...\
name ""
>Shuddering as she started to approach me...@
dwave 3,"se\fire1.ogg"
lsp 690,":a;effect\008.bmp",0,0:print 10,500
>Suddenly, flames appear!\
lsp 700,":a;chara\"+$tatie3+".bmp",%monster_x,%monster_y
name $name
>What is this!?@
>Impossible, did you do this!?\
name ""
name "Luka"
>Wha...What?\
name ""
>Of course I didn't do it. I have no idea what's going on either.@
>No way... Did Alice help me?\
lsp 700,":a;chara\alice_st17b.bmp",67,0:print 10,500
name "Alice"
>Wah! I screwed up the potato!@
>This isn't good, the fire's going to burn the rest of my potatoes!\
name ""
>...An accidental fire?\
lsp 700,":a;chara\page65537_st21.bmp",0,0:print 10,500
name $name
>No... This flame! I can't maintain my body...@
>Lord! I'm sorry to fail you!\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>...Your Lord is what caused the fire.\
mov %viclose,1:gosub *victory
mov %getexp,1000:gosub *lvup
mov %2232,1
goto *sean0099



*page65537_kousan

gosub *kousan_syori
>Luka succumbs to the promise of pleasure, ending his resistance!\
gosub *face2
name $name
>You gave up.@
>Now then, I'll suck out all of your energy.\
name ""
goto *page65537_a



*page65537_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %kousoku=3 && %genmogaku=1 && %hanyo3=1 mov %hanyo3,0:goto *common_mogaku2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *page65537_kousan
if %cmd1=16 goto *page65537_onedari
if %cmd1=17 goto *common_skill
goto *page65537_main



*page65537_a

if %enemylife<%henkahp1 && %sinkou=1 goto *page65537001
if %enemylife<%henkahp2 && %sinkou=3 goto *page65537002
if %sinkou=2 && %hanyo6<3 gosub *page65537_a10:gosub *page65537_a2:goto *common_main
if %sinkou=2 && %hanyo6=3 gosub *page65537_a11:goto *common_main
if %sinkou=4 && %hanyo6<3 gosub *page65537_a13:gosub *page65537_a2:goto *common_main
if %sinkou=4 && %hanyo6=3 gosub *page65537_a14:goto *common_main
if %kousoku=1 rnd2 %ransu,1,3
if %kousoku=1 && %ransu<3 gosub *page65537_a4:gosub *page65537_a4:goto *common_main
if %kousoku=1 && %ransu=3 gosub *page65537_a4:gosub *page65537_a5:goto *common_main
if %kousoku=2 gosub *page65537_a6:goto *common_main
if %kousoku=3 gosub *page65537_a7:goto *common_main
if %status=4 gosub *page65537_a15:goto *common_main
if %status=2 gosub *page65537_a3:goto *common_main
rnd2 %ransu,1,8
if %ransu<5 gosub *page65537_a1:gosub *page65537_a2:goto *common_main
if %ransu<7 gosub *page65537_a2:gosub *page65537_a2:goto *common_main
if %ransu=8 && %owaza_count1a>4 gosub *page65537_a3:goto *common_main
skip -4



*page65537_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"..........."
if %ransu=2 mov $sel1,"Silence."
if %ransu=3 mov $sel1,"You must be quiet in a library."
name $name
eng $sel1:$sel6\
name ""
>Page 65537 quietly reads!\
sub %stack,1
return



*page65537_a2

add %stack,1
skillcount1 3097
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Now then, shall I gently massage you?"
if %ransu=2 mov $sel1,"Do my tentacles feel good?"
if %ransu=3 mov $sel1,"Why don't you moan in pleasure?"
if %ransu=4 mov $sel1,"Hahaha..."
if %ransu=5 mov $sel1,"I'll massage every corner of your body..."
name $name
eng $sel1:$sel6\
name ""
skillname "Tentacle Massage"
dwave 1,"se\ero_makituki2.ogg"
>Page 65537's tentacles massage Luka's body!
if %nanido<2 damage 6,8
if %nanido=2 damage 8,11
if %nanido=3 damage 11,15
skillname ""
if %mylife=0 sub %stack,1:return *page65537_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*page65537_a3

add %stack,1
if %kousan>1 skip 5
gosub *face2
name $name
>Now then, shall I deprive you of your freedom?\
name ""
skillname "Tentacle Bind"
dwave 1,"se\ero_makituki3.ogg"
>Page 65537's tentacles shoot out and grab Luka's body!
if %nanido<2 damage 8,10
if %nanido=2 damage 11,14
if %nanido=3 damage 15,19
mov %kousoku,1:gosub *status_print
>Luka's body is bound by Page 65537's tentacles!\
skillname ""
if %mylife=0 sub %stack,1:return *page65537_h2
gosub *face2
name $name
>Now then, shall I play with you until you're exhausted?\
name ""
if %nanido<2 mov %genmogaku,2
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,3
sub %stack,1
return



*page65537_a4

add %stack,1
skillcount1 3098
>Luka's body is bound by Page 65537's tentacles!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hahaha... How's this?":mov $sel2,"One of Page 65537's tentacles violently rubs Luka's penis!"
if %ransu=2 mov $sel1,"Can you resist the pleasure of my tentacles?":mov $sel2,"One of Page 65537's tentacles wraps around Luka's penis!"
if %ransu=3 mov $sel1,"I'll stimulate you like this...":mov $sel2,"One of Page 65537's tentacles gently rubs Luka's penis!"
if %ransu=4 mov $sel1,"This is your weak point, right?":mov $sel2,"One of Page 65537's tentacles starts to tighten around Luka's penis!"
if %ransu=5 mov $sel1,"Now then, let out another pathetic cry.":mov $sel2,"One of Page 65537's tentacles starts to massage the tip of Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Tentacle Hell"
dwave 1,"se\ero_makituki3.ogg"
eng $sel2:$sel6
if %nanido<2 damage 13,16
if %nanido=2 damage 17,22
if %nanido=3 damage 24,30
skillname ""
if %mylife=0 sub %stack,1:return *page65537_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*page65537_a5

add %stack,1
>Luka's body is bound by Page 65537's tentacles!\
name $name
>Now then... Shall I squeeze everything out of you with my lower mouth?\
name ""
skillname "Pussy Invitation"
dwave 1,"se\ero_makituki3.ogg"
>The tentacle holding Luka's body starts to pull him towards Page 65537!\
mov %kousoku,2
skillname ""
if %first_sel1=1 sub %stack,1:return
name "Luka"
>Urgh!\
name ""
name $name
>I'll squeeze everything out of you with my lower body...@
>A human like you should have some delicious semen.\
name ""
sub %stack,1
return



*page65537_a6

add %stack,1
>Luka's body is bound by Page 65537's tentacles!\
name $name
>Now, don't resist... Just come closer.\
name ""
skillname "Pussy Invitation"
dwave 1,"se\ero_makituki3.ogg"
>The tentacle holding Luka's body continues to pull him towards Page 65537!\
mov %kousoku,3
skillname ""
if %kousan>1 sub %stack,1:return
if %first_sel1=1 sub %stack,1:return
name "Luka"
>Guh!\
name ""
>Right in front of my eyes, I can see her hole open and close in expectation.\
>Not just my penis, but that hole would be able to suck in my entire lower body.\
name "Luka"
>Ahhh!\
name ""
name $name
>Haha... Do you want to come inside?@
>I'll be able to wring all your semen out with my mixer...\
name ""
>The pink flesh inside of her wriggles around.@
>Seeing it right before my eyes, despair fills me.\
>That hole is only designed for killing men by sucking everything out...\
>What would it be like to be killed by that...?@
>The ruinous curiosity boils up in me.@
>At least once, I want to see what it's like...\
>Filled with conflicting feelings of despair and expectation, I'm slowly dragged closer.\
mov %first_sel1,1
sub %stack,1
return



*page65537_a7

add %stack,1
>Luka's body is bound by Page 65537's tentacles!\
name $name
>Now, I'll suck you inside...\
name ""
skillname "Pussy Invitation"
dwave 1,"se\ero_makituki3.ogg"
>The tentacle holding Luka's body forces him into Page 65537's opening!
damage 15,18
lsp 690,":a;chara\page65537_ct01.bmp",0,0
if %sinkou=1 lsp 700,":a;chara\page65537_h1a.bmp",0,0:print 10,500:skip 3
if %sinkou<4 lsp 700,":a;chara\page65537_h1b.bmp",0,0:print 10,500
if %sinkou>3 lsp 700,":a;chara\page65537_h1c.bmp",0,0:print 10,500
mov %kousoku,4:mov %genmogaku,100
>Luka's lower body is completely sucked into her!\
skillname ""
if %mylife=0 sub %stack,1:return *page65537_h4
name "Luka"
>Ahhhh!\
name ""
>The soft walls of flesh tighten around my body.@
>The mucus inside of her starts to cover my body.\
>The creases inside of her rub and massage my entire body.@
>My feet, waist, thighs... and especially my penis.\
if %kousan>1 skip 5
name $name
>How is it?@
>Being comforted inside of me.\
name ""
sub %stack,1
goto *page65537_a8



*page65537_a8

add %stack,1
skillcount1 3099
if %status=2 >Luka's body is paralyzed...\
>Luka's lower body is completely inside Page 65537!\
rnd2 %ransu,1,10
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hahaha... Is it good?":mov $sel2,"The flesh holding Luka's body starts to wriggle!"
if %ransu=2 mov $sel1,"I'll squeeze you...":mov $sel2,"Page 65537 tightens around Luka's lower body!"
if %ransu=3 mov $sel1,"I'll massage you all over inside of me.":mov $sel2,"The mucus covered walls rub against Luka's penis!"
if %ransu=4 mov $sel1,"Well? Isn't being squeezed by me the best feeling in the world?":mov $sel2,"Page 65537's hole contracts around Luka's body!"
if %ransu=5 mov $sel1,"You want me to squeeze your penis like this, didn't you?":mov $sel2,"The flesh around Luka's penis tightens!"
if %ransu=6 mov $sel1,"Hahaha...":mov $sel2,"The flesh around Luka's body gently massages him!"
if %ransu=7 mov $sel1,"I'll cover you with my fluids...":mov $sel2,"Page 65537 secrets sticky mucus all over Luka's body!"
if %ransu=8 mov $sel1,"Let out all of your energy into me...":mov $sel2,"The flesh holding Luka starts to wriggle!"
if %ransu=9 mov $sel1,"I'll tease you here, too...":mov $sel2,"The flesh around Luka's penis contracts!"
if %ransu=10 mov $sel1,"You can't escape anymore...":mov $sel2,"Page 65537 tightens around Luka's lower body!"
name $name
eng $sel1:$sel6\
name ""
skillname "Forced Semen Squeeze"
dwave 1,"se\ero_chupa6.ogg"
eng $sel2:$sel6
mov %damage_kotei,1
damage 25,35
skillname ""
if %mylife=0 sub %stack,1:return *page65537_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
goto *page65537_a8



*page65537_a9

add %stack,1
skillname "Book of Paralysis"
dwave 1,"se\book.ogg"
>Page 65537 begins to read a book!\
skillname ""
mov %hanyo6,1
sub %stack,1
return



*page65537_a10

add %stack,1
name $name
>..........\
name ""
skillname "Book of Paralysis"
if %hanyo6=1 mov $sel1,"Page 65537 is reading the book!"
if %hanyo6=2 mov $sel1,"Page 65537 finished reading the book!"
eng $sel1:$sel6\
add %hanyo6,1
sub %stack,1
return



*page65537_a11

add %stack,1
skillcount1 3100
if %kousan=2 skip 4
name $name
>Now then, let's try this...\
name ""
skillname "Eyes of Paralysis"
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
>Page 65537's eyes flash as she stares at Luka!\
name "Luka"
>Aaah!\
name ""
mov %status,2:gosub *status_print
>Luka was paralyzed!\
skillname ""
gosub *face2
name $name
>Now then, shall I take my time in squeezing everything out?\
name ""
mov %status_turn,2
mov %hanyo3,1
mov %hanyo6,0
mov %sinkou,3
sub %stack,1
return



*page65537_a12

add %stack,1
skillname "Book of Submission"
dwave 1,"se\book.ogg"
>Page 65537 opens a book and begins to read.\
skillname ""
mov %hanyo6,1
sub %stack,1
return



*page65537_a13

add %stack,1
name $name
>...........\
name ""
skillname "Book of Submission"
if %hanyo6=1 mov $sel1,"Page 65537 is reading the book."
if %hanyo6=2 mov $sel1,"Page 65537 finishes reading the book!"
eng $sel1:$sel6\
add %hanyo6,1
sub %stack,1
return



*page65537_a14

add %stack,1
skillcount1 3101
if %kousan=2 skip 4
name $name
>I'll end it with this...\
name ""
skillname "Eyes of Submission"
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
>Page 65537's eyes flash as she stares at Luka!\
name "Luka"
>Auu!\
name ""
mov %status,4:gosub *status_print
>Luka surrenders to Page 65537!\
skillname ""
gosub *face2
name $name
>Haha... Now you have to obey my orders.@
>Now, shall I humiliate you as you die?\
name ""
>Luka cannot resist her words...\
name $name
>Now... Stroke yourself.\
name ""
name "Luka"
>Yes...\
name ""
>Luka grips his own penis, and starts to masturbate!
mov %damage_kotei,1
damage 14,17
if %mylife=0 sub %stack,1:return *page65537_h6
if %mylife<36 sub %stack,1:goto *page65537_a16
name "Luka"
>Auuu!\
name ""
name $name
>Haha... Disgraceful, no?@
>Being forced to masturbate.\
>Hahaha... Don't stop your hand!\
name "Luka"
>Yes...\
name ""
>Luka continues stroking himself.
mov %damage_kotei,1
damage 14,17
if %mylife<36 sub %stack,1:goto *page65537_a16
name $name
>Haha! More, more!@
>Be defeated by your own hand.\
name ""
name "Luka"
>Yes...@> Ahhh!\
name ""
>Luka continues stroking himself.
mov %damage_kotei,1
damage 14,17
if %mylife<36 sub %stack,1:goto *page65537_a16
if %kousan=2 sub %stack,1:return
name "Luka"
>Uhg!\
name ""
if %nanido<2 mov %status_turn,0
if %nanido=2 mov %status_turn,0
if %nanido=3 rnd2 %status_turn,1,2
mov %sinkou,5
mov %hanyo6,0
mov $status_mid,"Luka cannot resist her words..."
sub %stack,1
return



*page65537_a15

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hahaha... Be defeated by your own hand."
if %ransu=2 mov $sel1,"Keep stroking, until you explode..."
if %ransu=3 mov $sel1,"Forced to lose by your own hand... Cruel, isn't it?"
name $name
eng $sel1:$sel6\
name ""
>Luka continues stroking himself.
mov %damage_kotei,1
damage 18,22
if %mylife<36 sub %stack,1:goto *page65537_a16
sub %stack,1
return



*page65537_a16

add %stack,1
>Luka cannot resist her words...\
if %mylife<19 skip 14
name "Luka"
>Ahh! No more!\
name ""
name $name
>Oh, are you about to come?@
>But your hand hasn't stopped stroking yourself.\
name ""
name "Luka"
>Ahhh!\
name ""
>Luka continues stroking himself.
mov %damage_kotei,2
damage 18,18
name "Luka"
>Auu! I'm going to come...!\
name ""
name $name
>This is the end, is it?@>Now then, deliver the fatal blow to yourself.\
>By your own hand, squeeze out everything.\
name ""
name "Luka"
>Yes... Haaa!\
name ""
>Luka quickens his pumping!
mov %damage_kotei,2
damage 18,21
sub %stack,1
return *page65537_h6



*page65537_onedari

mov $list1,"Tentacle Massage"
if %3097>0 mov %list_num1,1
mov $list2,"Tentacle Hell"
if %3098>0 mov %list_num2,1
mov $list3,"Forced Semen Squeeze"
if %3099>0 mov %list_num3,1
mov $list4,"Eyes of Paralysis"
if %3100>0 mov %list_num4,1
mov $list5,"Eyes of Submission"
if %3101>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *page65537_onedari1
if %cmd1=12 goto *page65537_onedari2
if %cmd1=13 goto *page65537_onedari3
if %cmd1=14 goto *page65537_onedari4
if %cmd1=15 goto *page65537_onedari5
if %cmd1=-1 goto *page65537_main
goto *page65537_onedari



*page65537_onedari1

gosub *onedari_syori
name $name
>You want to be finished by my tentacles?@
>Then, as you desire...\
name ""
gosub *page65537_a2
skip -1



*page65537_onedari2

gosub *onedari_syori_k
name $name
>You want to be finished while stuck in a tentacle hell?@
>Then, as you desire...\
name ""
if %kousoku=0 gosub *page65537_a3
gosub *page65537_a4
skip -1



*page65537_onedari3

gosub *onedari_syori_k
name $name
>You want to be squeezed by me until your death?\
if %kousoku=0 gosub *page65537_a3
if %kousoku=1 gosub *page65537_a5
if %kousoku=2 gosub *page65537_a6
if %kousoku=3 gosub *page65537_a7



*page65537_onedari4

gosub *onedari_syori
name $name
>While paralyzed, you want me to play with you?\
gosub *page65537_a11
mov %kousan,3
goto *common_main



*page65537_onedari5

gosub *onedari_syori
name $name
>Forced to obey my every order, you want me to humiliate you?\
gosub *page65537_a14
mov %kousan,3
goto *common_main



*page65537_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\page65537_bk04.bmp",0,0
gosub *syasei2
>Unable to endure her tentacles any longer, Luka succumbs to the pleasure.\
mov %viclose,1:gosub *lose
mov %2532,%2532+1:if %2532=1 mov %count_koenemy,%count_koenemy+1
if %2532>%count_most mov %count_most,%2532:mov $count_mostname,$name
count 10,4
mov $bad1," Luka was defeated by Page 65537's tentacle massage."
mov $bad2," After that, his semen was squeezed out until his death."
gosub *face2
name $name
>Surrendering to my tentacles...@
>Now then, shall I squeeze everything out?\
name ""
goto *page65537_h



*page65537_h2

mov %ikigoe,3:gosub *ikigoe
name $name
>Huh...?\
name ""
gosub *syasei1
lsp 694,":a;chara\page65537_bk04.bmp",0,0
gosub *syasei2
>Unable to endure the sudden sensation, Luka accidentally ejaculates on the tentacle wrapping around him.\
mov %viclose,1:gosub *lose
mov %2532,%2532+1:if %2532=1 mov %count_koenemy,%count_koenemy+1
if %2532>%count_most mov %count_most,%2532:mov $count_mostname,$name
count 10,4
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka accidentally ejaculates while being bound by Page 65537's tentacles."
if %status=2 mov $bad1,"Paralyzed, Luka accidentally ejaculates while being bound by Page 65537's tentacles."
mov $bad2," After that, his semen was squeezed out until his death."
gosub *face2
name $name
>Haha, shooting it all out just by being bound... How pathetic.@
>Now then, shall I squeeze everything out?\
name ""
goto *page65537_h



*page65537_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\page65537_bk04.bmp",0,0
gosub *syasei2
>Unable to endure the tentacle hell any longer, Luka succumbs to the pleasure.\
mov %viclose,1:gosub *lose
mov %2532,%2532+1:if %2532=1 mov %count_koenemy,%count_koenemy+1
if %2532>%count_most mov %count_most,%2532:mov $count_mostname,$name
count 10,4
mov $bad1," Luka was defeated by Page 65537's tentacle hell."
if %status=2 mov $bad1,"Paralyzed, Luka was defeated by Page 65537's tentacle hell."
mov $bad2," After that, his semen was squeezed out until his death."
gosub *face2
name $name
>Were my tentacles too good to resist?@
>Now then, shall I squeeze everything out?\
name ""
goto *page65537_h



*page65537_h4

mov %ikigoe,3:gosub *ikigoe
name $name
>Huh...?\
name ""
gosub *syasei1
lsp 690,":a;chara\page65537_ct02.bmp",0,0
if %sinkou=1 lsp 700,":a;chara\page65537_h2a.bmp",0,0:skip 3
if %sinkou<4 lsp 700,":a;chara\page65537_h2b.bmp",0,0
if %sinkou>3 lsp 700,":a;chara\page65537_h2c.bmp",0,0
gosub *syasei2
>As soon as Luka is sucked into her lower opening, he accidentally ejaculates.\
mov %viclose,1:gosub *lose
mov %2532,%2532+1:if %2532=1 mov %count_koenemy,%count_koenemy+1
if %2532>%count_most mov %count_most,%2532:mov $count_mostname,$name
count 2,4
mov %count_bouhatu,%count_bouhatu+1
mov $bad1," Sucked into Page 65537's mouth, Luka accidentally ejaculates."
mov $bad2," After that, his semen was squeezed out until his death."
name $name
>Giving in so quickly... How embarrassing.@
>Don't worry, I'll wring out a lot more.\
name ""
if %2532=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %hseanwave,21:hseanwave
goto *page65537_ha



*page65537_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\page65537_ct02.bmp",0,0
if %sinkou=1 lsp 700,":a;chara\page65537_h2a.bmp",0,0:skip 3
if %sinkou<4 lsp 700,":a;chara\page65537_h2b.bmp",0,0
if %sinkou>3 lsp 700,":a;chara\page65537_h2c.bmp",0,0
gosub *syasei2
>With his lower body stuck inside of Page 65537, Luka is unable to endure the overpowering pleasure attacking him.\
>Shaking his waist pitifully, he explodes inside of her.\
mov %viclose,1:gosub *lose
mov %2532,%2532+1:if %2532=1 mov %count_koenemy,%count_koenemy+1
if %2532>%count_most mov %count_most,%2532:mov $count_mostname,$name
count 2,4
mov $bad1," Held in Page 65537's lower opening, Luka is forced to come."
mov $bad2," After that, his semen was squeezed out until his death."
name $name
>Haha... So much quality semen.@
>Don't worry, I'll wring out a lot more.\
name ""
if %2532=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %hseanwave,21:hseanwave
goto *page65537_ha



*page65537_h6

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
if %sinkou=1 lsp 693,":a;chara\page65537_bk03a.bmp",0,0
if %sinkou<4 lsp 693,":a;chara\page65537_bk03b.bmp",0,0
if %sinkou>3 lsp 693,":a;chara\page65537_bk03c.bmp",0,0
gosub *syasei2
>Unable to resist Page 65537's orders, Luka continues stroking himself as he ejaculates, shooting semen all over her skirt.\
mov %viclose,1:gosub *lose
mov %2532,%2532+1:if %2532=1 mov %count_koenemy,%count_koenemy+1
if %2532>%count_most mov %count_most,%2532:mov $count_mostname,$name
count 21,4
mov $bad1," Forced to follow Page 65537's orders, Luka is defeated by his own hand."
mov $bad2," After that, his semen was squeezed out until his death."
name $name
>Haha... How does it feel to be defeated by your own hand?@
>Is it humiliating? Are you disgraced?\
>Now then, shall I squeeze everything out?\
name ""
goto *page65537_h



*page65537_h

if %2532=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Aiee!\
name ""
dwave 1,"se\ero_makituki3.ogg"
>Tentacles shoot out from her body and grasp my body.\
>They slowly pull me towards an opening large enough to fit my lower body into it.\
name "Luka"
>Aaaa...\
name ""
name $name
>Do you want to come inside here?@
>With my mixer, I'll squeeze everything out of you...\
name ""
>The pink flesh inside of her wriggles around.@
>Seeing it right before my eyes, despair fills me.\
>That hole is only designed for killing men by sucking everything out...\
>What would it be like to be killed by that...?@
>The ruinous curiosity boils up in me.@
>At least once, I want to see what it's like...\
>Filled with conflicting feelings of despair and expectation, I'm slowly dragged closer.\
name $name
>Haha... The face of a man in despair is wonderful.@
>Before this hole, every man has that expression...\
name ""
>Laughing, she pulls me right up next to her opening...@
mov %hseanwave,21:hseanwave
cspl 690,699
lsp 690,":a;chara\page65537_ct01.bmp",0,0
if %sinkou=1 lsp 700,":a;chara\page65537_h1a.bmp",0,0:print 10,500:skip 3
if %sinkou<4 lsp 700,":a;chara\page65537_h1b.bmp",0,0:print 10,500
if %sinkou>3 lsp 700,":a;chara\page65537_h1c.bmp",0,0:print 10,500
>Then forces my lower body into her!\
name "Luka"
>Ahhhh!\
name ""
>The soft walls of flesh tighten around my body.@
>The mucus inside of her starts to cover my body.\
>The creases inside of her rub and massage my entire body.@
>My feet, waist, thighs... and especially my penis.\
name $name
>Haha... How is it?@
>My lower hole is amazing, isn't it?\
name ""
name "Luka"
>Aaa...\
name ""
>Even if I twist my body, I'm unable to escape from the flesh that's tightening around me.\
>I'm unable to fully focus on anything but the overpowering pleasure attacking my lower body.\
name $name
>Hehe... Once they're stuck in this hole, every man ends their resistance.\
name ""
>While I writhe in pleasure, Page 65537 looks at my face while she laughs.\
goto *page65537_ha



*page65537_ha

>The flesh surrounding me starts to contract in waves.@
>Moving and twisting around me, the walls of her hole seem to just be toying with my body.\
>The flesh moving and rotating around me feels as though I've been inserted into a mixer.\
name "Luka"
>Auu!@> Inside... You're moving!\
name ""
name $name
>Haha... Amazing, isn't it?@
>This hole is my proud male semen squeezing organ.@
>Enjoy it to the fullest as I squeeze you dry.\
name ""
name "Luka"
>Auu! Incredible!\
name ""
>The walls start to tighten around me as they continue to twist and rotate.@
>Too weak to struggle against it, all I can do is lay back and bask in the pleasure.\
>With no means to escape, I can only go mad by the ecstasy.@
>As I cry out, I only make the sadistic Page 65537 happier.\
name "Luka"
>Aiiee! Ahhh!\
name $name
>Haha... Once a man's organ is enlarged, all they can do is writhe in pleasure.@
>Human males are so pathetic...\
name ""
name "Luka"
>Aaa... Aaaa....\
name ""
>The flesh around my penis starts to wrap tighter around me.@
>As she increases the pressure, her flesh starts to twist and rotate faster.\
>Stuck in this organ whose sole purpose is to force me to come, I'm completely helpless...\
name "Luka"
>Auu... I'm going to come...!\
name ""
>My body writhes miserably as I yell out.@
>Knowing I can't escape, the only thing I could do was yell out pitifully.\
name $name
>Haha... Please let it all out.@
>This organ is designed to just wring out pathetic men's semen, after all.\
name ""
>Stuck in her rotating flesh, I feel the desire to release shoot through my waist.\
name "Luka"
>Aaaaa!\
name ""
gosub *syasei1
lsp 690,":a;chara\page65537_ct02.bmp",0,0
if %sinkou=1 lsp 700,":a;chara\page65537_h2a.bmp",0,0:skip 3
if %sinkou<4 lsp 700,":a;chara\page65537_h2b.bmp",0,0
if %sinkou>3 lsp 700,":a;chara\page65537_h2c.bmp",0,0
gosub *syasei2
>Forced to orgasm, I explode inside of her.@
>Each spurt seems to shoot out not only my semen, but my life itself.\
name $name
>It's not over yet... Until you're completely dry, I'll squeeze everything out.\
name ""
name "Luka"
>No way... Auuu!\
name ""
mov %hseanwave,22:hseanwave
>As soon as my ejaculation finished, the walls inside of her started to quickly rotate and twist around me again.\
name $name
>My organ forces pleasure into the man, and makes him ejaculate against his will.\
>Each ejaculation weakens them so much, most can only survive about ten.\
>How many times do you think you'll live through?@
>I'll take my time and find out... Hahaha.\
name "Luka"
>Don't... Ahhh!@
>Ahhhhh!\
name ""
>She tightens her flesh around me, cutting short my fearful yell.@
>Even though I just came, I can feel another already rising through me.\
name "Luka"
>Ahhh... Again...\
name ""
>Hearing the frightening story about men dying after ten times, I try to endure with all my might.\
>But even if my mind tries to resist, my body is already a prisoner.@
>Stuck inside of her, I won't get a choice...\
name $name
>Even if you know you'll die from the pleasure, you're still going to give in?@
>Males are such pathetic creatures.\
name "Luka"
>Aaaa... Too good... Coming...!@
>No... Ahhh!\
name ""
>My body trembles as I shake my head in horror.@
gosub *syasei1
lsp 690,":a;chara\page65537_ct03.bmp",0,0
if %sinkou=1 lsp 700,":a;chara\page65537_h3a.bmp",0,0:skip 3
if %sinkou<4 lsp 700,":a;chara\page65537_h3b.bmp",0,0
if %sinkou>3 lsp 700,":a;chara\page65537_h3c.bmp",0,0
gosub *syasei2
>But even still, I orgasm and shoot more of my semen into her.\
name "Luka"
>Faa... I came again...\
name ""
>Along with my semen, I feel more of my energy being drained out.\
name $name
>Haha... Being squeezed like this, you're nothing but nourishment for me.@
>You should feel honored.\
name ""
name "Luka"
>Stop... Auuu!\
name ""
>No matter how much I plead, her organ continues to serve its purpose of forcing pleasure into me.\
>Once a man is stuck in here, they're squeezed dry until their eventual death...\
name "Luka"
>Auu... No more...\
name ""
name $name
>Haha... How pathetic.@
>If you don't want to die, all you have to do is endure it.\
name ""
name "Luka"
>Faa... Aaa....\
name ""
gosub *syasei1:gosub *syasei2
>Contrary to what she just said, I'm forced to ejaculate again.@
>In addition to the fear, I feel the misery of my situation rise up.\
>No matter how much I resist, I can't deny my body.\
>Weakened by this pleasure, I'm going to be squeezed to death...\
name "Luka"
>Auu...@
>No... No...\
name ""
gosub *syasei1:gosub *syasei2
name $name
>Haha... You came again.@
>In compensation for this pleasure, you're getting closer to death...\
name ""
name "Luka"
>Aghh!\
name ""
>While I clench my teeth in frustration, Page 65537 continues to squeeze me closer to my death.\
>Her organ that kills men by sucking out their semen...@
>Once I got stuck in here, my death was determined...\
name "Luka"
>Aaaaa!\
name ""
gosub *syasei1:gosub *syasei2
>Like that, I'm forced to orgasm over and over again.\
>Finally...\
mov %hseanwave,0:hseanwave
name "Luka"
>A...aa...\
name ""
>Forced to ejaculate too many times to count, I feel my consciousness start to fade.\
name $name
>Haha... How does it feel to be squeezed to death?@
>The next time you come, you'll die.\
name ""
name "Luka"
>A..aa...\
name ""
>It's finally the last time...@
>Unable to think of anything else but what's coming next, I'm resigned to my fate.\
name $name
>Now... die.\
name ""
name "Luka"
>A....! Faaa!\
name ""
mov %hseanwave,22:hseanwave
>Her organ starts to twist and rotate around me even fiercer than before.@
>Squeezing my entire lower body, the deathly climax shoots through my waist.\
>The ecstasy washes over my entire body, and...@
gosub *syasei1:gosub *syasei2
>Unable to fight against the deathly pleasure, the last of my semen is sucked out.\
name "Luka"
>...Aa...\
name ""
>As soon as my ejaculation finishes, I lose consciousness.\
>While I tasted the sweet release, Page 65537 squeezes out my existence itself.\
gosub *anten
mov %hseanwave,0:hseanwave
name $name
>Were you satisfied?@
>This is the fate of one who tries to fight a monster...\
name ""
>Her voice was the last thing I heard.\
>................\
goto *badend



*kani_start

mov $name,"Crab Girl"
mov $name2,"Crab Girl"
mov $lavel,"kani"
mov $tatie1,"kani_st00"
mov $tatie2,"kani_st02"
mov $tatie3,"kani_st03"
mov $tatie4,"kani_st11"
mov $haikei,"bg039"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,450
if %nanido=2 mov %max_enemylife,600
if %nanido=3 mov %max_enemylife,750
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,60
mov %kaihi,99
mov %music,1
mov %tikei,0
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"Luka can't break free of the Crab Girl's claws!"
mov $mogaku_anno2,"Luka broke away from the Crab Girl!"
mov $mogaku_anno3,"Caught by her claws, Luka is unable to attack!"
mov $mogaku_sel1,"I'll make you feel so good you won't want to run!"
mov $mogaku_sel2,"Geez! Stop moving around so much!"
mov $mogaku_sel3,"What are you doing? That's pointless."
mov $mogaku_sel4,"If you keep moving so much, I can't wash you!"
mov $mogaku_sel5,"Just sit still while I wash your penis..."
mov $mogaku_dassyutu1,"Aww... Don't run, please."
mov $mogaku_dassyutu2,"You don't want me to wash your penis?"
mov $half_s1,"Hehe... It feels good, right?"
mov $half_s2,"I'll cover you with even more bubbles. "
mov $kiki_s1,"Oh? Are you going to come already?"
mov $kiki_s2,"Paatheeetic! "
mov %end_n,4
mov %exp_minus,0
mov %zmonster_x,-280
name $name
>...Hey. Could you give me a little of your semen?@
>I'm a little hungry...\
name ""
name "Luka"
>Asking something like that so suddenly...\
name ""
>Stunned at her sudden request, I take out my sword.@
>I can't leave a monster that would suddenly attack someone like this!\
name $name
>Aww... You want to fight?@
>Then, let me clean your dirty body.\
>Even if you cry while letting out all your semen, I won't stop washing you.\
name ""
mov $tatie1,"kani_st01"
gosub *face1
>The Crab Girl starts to shoot bubbles from her mouth!\
goto *common_main



*kani_v

gosub *face3
name $name
>No... What... is this?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Crab Girl turns into a small crab!\
mov %viclose,1:gosub *victory
mov %getexp,800:gosub *lvup
mov %2233,1
goto *sean0102



*kani_kousan

gosub *kousan_syori
>Luka yields to the promise of pleasure, ending his resistance!\
gosub *face2
name $name
>Hahaha... Did you surrender?@
>I'll make you go mad with my cleaning technique.\
name ""
goto *kani_a



*kani_main

gosub *cmd_main
if %cmd1=11 && %kousoku=1 goto *common_mogaku
if %cmd1=11 && %kousoku=2 mov %abairitu,30:goto *kani_miss2
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *kani_kousan
if %cmd1=16 goto *kani_onedari
if %cmd1=17 goto *common_skill
goto *kani_main



*kani_miss2

mov %before_action,9
name "Luka"
>Guh... Get off!\
name ""
>Luka attacks!
>Luka's attack is weakened!\
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\slash.ogg"
gosub *enemylife
dwave 1,"se\dassyutu.ogg"
lsp 700,":a;chara\"+$tatie3+".bmp",%monster_x,%monster_y
mov %kousoku,0:gosub *status_print
if %enemylife=0 goto *kani_v
>Luka broke free of the Crab Girl's claws!\
name $name
>What are you doing...@
>You don't want a taste of my special technique...?\
name ""
gosub *face1
mov %owaza_count1a,0
goto *common_main



*kani_a

if %kousoku=2 gosub *kani_a9:goto *common_main
if %kousoku=1 rnd2 %ransu,1,112
if %kousoku=1 && %ransu<6 gosub *kani_a4:gosub *kani_a4:goto *common_main
if %kousoku=1 && %ransu<11 gosub *kani_a4:gosub *kani_a5:goto *common_main
if %kousoku=1 && %ransu<16 gosub *kani_a4:gosub *kani_a6:goto *common_main
if %kousoku=1 && %ransu<21 gosub *kani_a4:gosub *kani_a7:goto *common_main
if %kousoku=1 && %ransu<26 gosub *kani_a5:gosub *kani_a4:goto *common_main
if %kousoku=1 && %ransu<31 gosub *kani_a5:gosub *kani_a5:goto *common_main
if %kousoku=1 && %ransu<36 gosub *kani_a5:gosub *kani_a6:goto *common_main
if %kousoku=1 && %ransu<41 gosub *kani_a5:gosub *kani_a7:goto *common_main
if %kousoku=1 && %ransu<46 gosub *kani_a6:gosub *kani_a4:goto *common_main
if %kousoku=1 && %ransu<51 gosub *kani_a6:gosub *kani_a5:goto *common_main
if %kousoku=1 && %ransu<56 gosub *kani_a6:gosub *kani_a6:goto *common_main
if %kousoku=1 && %ransu<61 gosub *kani_a6:gosub *kani_a7:goto *common_main
if %kousoku=1 && %ransu<66 gosub *kani_a7:gosub *kani_a4:goto *common_main
if %kousoku=1 && %ransu<71 gosub *kani_a7:gosub *kani_a5:goto *common_main
if %kousoku=1 && %ransu<76 gosub *kani_a7:gosub *kani_a6:goto *common_main
if %kousoku=1 && %ransu<81 gosub *kani_a7:gosub *kani_a7:goto *common_main
if %kousoku=1 && %ransu<89 gosub *kani_a4:gosub *kani_a8:goto *common_main
if %kousoku=1 && %ransu<97 gosub *kani_a5:gosub *kani_a8:goto *common_main
if %kousoku=1 && %ransu<105 gosub *kani_a6:gosub *kani_a8:goto *common_main
if %kousoku=1 && %ransu>104 gosub *kani_a7:gosub *kani_a8:goto *common_main
rnd2 %ransu,1,3
if %ransu=1 gosub *kani_a1:goto *common_main
if %ransu=2 gosub *kani_a2:goto *common_main
if %ransu=3 && %owaza_count1a>2 gosub *kani_a3:goto *common_main
skip -4



*kani_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hmmhmm..."
if %ransu=2 mov $sel1,"Just wait a moment..."
if %ransu=3 mov $sel1,"Let me get ready..."
name $name
eng $sel1:$sel6\
name ""
>Bubbles start to come out of the Crab Girl's mouth!\
sub %stack,1
return



*kani_a2

add %stack,1
skillcount1 3102
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Your penis looks so dirty..."
if %ransu=2 mov $sel1,"My bubbles feel amazing..."
if %ransu=3 mov $sel1,"Here, let me cover you with my bubbles..."
name $name
eng $sel1:$sel6\
name ""
skillname "Washwash"
dwave 1,"se\ero_makituki1.ogg"
>The Crab Girl sprays bubbles on Luka's groin!
if %nanido<2 damage 10,12
if %nanido=2 damage 15,18
if %nanido=3 damage 20,24
skillname ""
if %mylife=0 sub %stack,1:return *kani_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kani_a3

add %stack,1
gosub *face2
name $name
>Haha! I caught you!\
name ""
skillname "Firm Grip"
>The Crab Girl grasps both of Luka's arms, and pins him down!@
mov %kousoku,1:gosub *status_print
>Luka's pinned by the Crab Girl!\
skillname ""
if %kousan=2 sub %stack,1:return
name $name
>Caught you...@
>I'll take my time washing your dirty body. \
name ""
if %nanido<2 mov %genmogaku,2
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,3
sub %stack,1
return



*kani_a4

add %stack,1
skillcount1 3103
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My bubbles feel amazing, don't they?"
if %ransu=2 mov $sel1,"I'll cover your penis with my foam..."
if %ransu=3 mov $sel1,"I'll cover your penis with my bubbles..."
if %ransu=4 mov $sel1,"My bubbles feel amazing, don't they?"
if %ransu=5 mov $sel1,"I'll make your dirty penis clean. "
name $name
eng $sel1:$sel6\
name ""
skillname "Bubble Wash"
dwave 1,"se\ero_sigoki1.ogg"
>The Crab Girl sprays bubbles on Luka's penis!
if %nanido<2 damage 13,15
if %nanido=2 damage 19,22
if %nanido=3 damage 26,30
skillname ""
if %mylife=0 sub %stack,1:return *kani_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kani_a5

add %stack,1
skillcount1 3104
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Scrub, scrub, scrub..."
if %ransu=2 mov $sel1,"Scrub, scrub... Can you endure it?"
if %ransu=3 mov $sel1,"When I do this, you won't be able to resist it anymore. "
if %ransu=4 mov $sel1,"I'll give you plenty of my bubbles..."
name $name
eng $sel1:$sel6\
name ""
skillname "Bubble Scrub"
dwave 1,"se\ero_koki1.ogg"
>Covered in bubbles, the Crab Girl's hands grab Luka's penis!
if %nanido<2 damage 14,16
if %nanido=2 damage 21,24
if %nanido=3 damage 28,32
skillname ""
if %mylife=0 sub %stack,1:return *kani_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kani_a6

add %stack,1
skillcount1 3105
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Shall I keep washing you until you come?":mov $sel2,"Covered in bubbles, the Crab Girl pumps Luka's penis!"
if %ransu=2 mov $sel1,"Hehehe... It feels good, doesn't it?":mov $sel2,"Multiple hands rub foam all over Luka's penis!"
if %ransu=3 mov $sel1,"I'll cover your tip with my bubbles too...":mov $sel2,"Covered in foam, the palm of one of the Crab Girl's hands rubs the tip of Luka's penis!"
if %ransu=4 mov $sel1,"This is where boys are weak, aren't they?":mov $sel2,"Covered in bubbles, the Crab Girl's hands rub Luka's penis!"
if %ransu=5 mov $sel1,"Hehe... This is your weak point, isn't it?":mov $sel2,"Covered in bubbles, the Crab Girl rubs Luka's penis all over!"
name $name
eng $sel1:$sel6\
name ""
skillname "Bubble Handjob"
dwave 1,"se\ero_koki1.ogg"
eng $sel2:$sel6
if %nanido<2 damage 15,17
if %nanido=2 damage 22,25
if %nanido=3 damage 30,34
skillname ""
if %mylife=0 sub %stack,1:return *kani_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kani_a7

add %stack,1
skillcount1 3106
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll wash every inch of your dirty body..."
if %ransu=2 mov $sel1,"When it feels too good to endure it, just yell out..."
if %ransu=3 mov $sel1,"Just let me wash you..."
if %ransu=4 mov $sel1,"My technique is amazing, isn't it?"
if %ransu=5 mov $sel1,"Your hands, feet and chest... Don't you want me to wash everything?"
name $name
eng $sel1:$sel6\
name ""
skillname "Full-Body Bubble Massage"
dwave 1,"se\ero_koki1.ogg"
>Innumerable hands covered in bubbles rub all over Luka's body!
if %nanido<2 damage 16,18
if %nanido=2 damage 24,27
if %nanido=3 damage 32,36
skillname ""
if %mylife=0 sub %stack,1:return *kani_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kani_a8

add %stack,1
name $name
if %first_sel1=1 skip 14
>Hey... I'll do something amazing for you.@
>Do you want a taste of my special course?\
name ""
name "Luka"
>S...Special course...?\
name ""
name $name
>I'll use all my techniques to wash your penis.@
>From the base to the tip, I'll carefully clean every inch...\
>Nobody is able to endure all the way to the end of my special course...@
>Eeeeverybody comes in the middle of it.\
>But... I always go all the way to the end.\
skip 2
>I'll prepare the special course again...\
name ""
if %first_sel1=1 skip 6
name "Luka"
>No way!\
name ""
>If I take that attack, I'll be defeated right away.@
>I have to get away before she catches me in it!\
skillname "Melty Wash Preparation"
mov %kousoku,2:mov %genmogaku,100
>The Crab Girl starts to bubble at the mouth!\
skillname ""
name $name
if %first_sel1=1 skip 4
>Don't struggle.@
>I'll wash your penis with my best move, and show you heaven.\
skip 3
>Don't run away this time.@
>Just sit there quietly and let me wash your penis!\
name ""
mov %first_sel1,1
sub %stack,1
return



*kani_a9

add %stack,1
name $name
>Hehehe... Alright, let's begin the special course. \
>First I'll wash this sack...@
>It's really easy for this place to get dirty... \
name ""
skillcount1 3107
skillname "Melty Wash"
dwave 1,"se\ero_koki1.ogg"
>The Crab Girl covers Luka's scrotum with bubbles!\
>The Crab Girl's hands start to rub Luka's scrotum!
damage 18,22
mov %hanyo2,%hanyo2-%damage
if %hanyo1=0 && %mylife=0 gosub *kani_a10
if %hanyo1=1 && %hanyo2<0 gosub *kani_a11
dwave 1,"se\ero_koki1.ogg"
>Her fingers carefully rub Luka's scrotum through the bubbles!
damage 18,22
mov %hanyo2,%hanyo2-%damage
dwave 1,"se\ero_koki1.ogg"
>The Crab Girl lightly squeezes Luka's scrotum with her bubble covered hand!
damage 18,22
mov %hanyo2,%hanyo2-%damage
dwave 1,"se\ero_koki1.ogg"
>The Crab Girl rubs Luka's balls between two of her hands!
damage 18,22
mov %hanyo2,%hanyo2-%damage
if %hanyo1=0 && %mylife=0 gosub *kani_a10
if %hanyo1=1 && %hanyo2<0 gosub *kani_a11
skillname ""
name $name
>Alright, your sack is covered in my bubbles already. @
>Now, let me cover your penis...\
name ""
lsp 690,":a;chara\kani_ct01.bmp",0,0:print 10,500
mov %hanyo3,1
skillcount1 3107
skillname "Melty Wash"
dwave 1,"se\ero_koki1.ogg"
>The Crab Girl grabs Luka's penis with two of her hands!\
>Still holding on to him, she starts to cover his penis with bubbles!
damage 18,22
mov %hanyo2,%hanyo2-%damage
if %hanyo1=0 && %mylife=0 gosub *kani_a10
if %hanyo1=1 && %hanyo2<0 gosub *kani_a11
dwave 1,"se\ero_koki1.ogg"
>More bubbles cover Luka's penis!
damage 18,22
mov %hanyo2,%hanyo2-%damage
>Luka's waist in completely covered in bubbles!\
if %hanyo1=0 && %mylife=0 gosub *kani_a10
if %hanyo1=1 && %hanyo2<0 gosub *kani_a11
skillname ""
name $name
>Good, your penis is completely covered in my foam now...@
>It feels good, doesn't it? Hahaha. \
>Now, it's time to wash it... \
name ""
skillcount1 3107
skillname "Melty Wash"
dwave 1,"se\ero_koki1.ogg"
>The Crab Girl starts to wash Luka's penis!
damage 18,22
mov %hanyo2,%hanyo2-%damage
if %hanyo1=0 && %mylife=0 gosub *kani_a10
if %hanyo1=1 && %hanyo2<0 gosub *kani_a11
skillname ""
name $name
>Hahaha...\
name ""
skillcount1 3107
skillname "Melty Wash"
dwave 1,"se\ero_koki1.ogg"
>Covered in foam, the Crab Girl strokes Luka's penis!
damage 18,22
mov %hanyo2,%hanyo2-%damage
dwave 1,"se\ero_koki1.ogg"
>Her slippery palm quickly moves up and down!
damage 18,22
mov %hanyo2,%hanyo2-%damage
dwave 1,"se\ero_koki1.ogg"
>Another hand reaches out to Luka's penis, as her hands rub him in opposite directions!
damage 18,22
mov %hanyo2,%hanyo2-%damage
if %hanyo1=0 && %mylife=0 gosub *kani_a10
if %hanyo1=1 && %hanyo2<0 gosub *kani_a11
skillname ""
name $name
>This little part is so dirty...\
name ""
skillcount1 3107
skillname "Melty Wash"
dwave 1,"se\ero_koki1.ogg"
>The Crab Girl rubs around the groove under the tip of Luka's penis!
damage 18,22
mov %hanyo2,%hanyo2-%damage
dwave 1,"se\ero_koki1.ogg"
>Her foam covered fingertips rub around the tip of Luka's penis!
damage 18,22
mov %hanyo2,%hanyo2-%damage
dwave 1,"se\ero_koki1.ogg"
>The Crab Girl massages around the tip of Luka's penis!
damage 18,22
mov %hanyo2,%hanyo2-%damage
if %hanyo1=0 && %mylife=0 gosub *kani_a10
if %hanyo1=1 && %hanyo2<0 gosub *kani_a11
skillname ""
name $name
>Your tip is dirty too... \
name ""
skillcount1 3107
skillname "Melty Wash"
dwave 1,"se\ero_koki1.ogg"
>The Crab Girl makes a circle with her thumb and index finger around the tip of Luka's penis!\
>Like that, she starts to quickly move up and down, pumping the tip of Luka's penis!
damage 18,22
mov %hanyo2,%hanyo2-%damage
dwave 1,"se\ero_koki1.ogg"
>Making a circle with her fingers, the Crab Girl stimulates Luka's penis!
damage 18,22
mov %hanyo2,%hanyo2-%damage
dwave 1,"se\ero_koki1.ogg"
>The Crab Girl's pumping covers the tip of Luka's penis with more foam!
damage 18,22
mov %hanyo2,%hanyo2-%damage
dwave 1,"se\ero_koki1.ogg"
>Her fingers keep stimulating Luka!
damage 18,22
mov %hanyo2,%hanyo2-%damage
if %hanyo1=0 && %mylife=0 gosub *kani_a10
if %hanyo1=1 && %hanyo2<0 gosub *kani_a11
skillname ""
name $name
>Hahaha... What an unsightly face.@
>It looks like you like it when I wash your umbrella part. \
name ""
skillcount1 3107
skillname "Melty Wash"
dwave 1,"se\ero_koki1.ogg"
>Still making a circle with her thumb and index finger, she covers the tip of Luka's penis with more foam!
damage 18,22
mov %hanyo2,%hanyo2-%damage
dwave 1,"se\ero_koki1.ogg"
>Her fingers keep stimulating Luka!
damage 18,22
mov %hanyo2,%hanyo2-%damage
dwave 1,"se\ero_koki1.ogg"
>The Crab Girl giggles as she washes Luka's penis with her fingers!
damage 18,22
mov %hanyo2,%hanyo2-%damage
if %hanyo1=0 && %mylife=0 gosub *kani_a10
if %hanyo1=1 && %hanyo2<0 gosub *kani_a11
skillname ""
name $name
>Hahaha... Your penis feels good, doesn't it?@
>I even made sure to wash your tip...\
>A boy's most delicate... Most dirty... place. \
name ""
skillcount1 3107
skillname "Melty Wash"
dwave 1,"se\ero_koki1.ogg"
>The Crab Girl's hands grab Luka's penis again!\
>She starts to quickly rub Luka's penis up and down!
damage 18,22
mov %hanyo2,%hanyo2-%damage
dwave 1,"se\ero_koki1.ogg"
>Luka's penis is covered in foam!
damage 18,22
mov %hanyo2,%hanyo2-%damage
dwave 1,"se\ero_koki1.ogg"
>Slippery bubbles are all over Luka's groin!
damage 18,22
mov %hanyo2,%hanyo2-%damage
if %hanyo1=0 && %mylife=0 gosub *kani_a10
if %hanyo1=1 && %hanyo2<0 gosub *kani_a11
skillname ""
name $name
>Now you're covered in bubbles again...@
>Does the slippery feeling feel good?\
>From now on, I'll be sure to wash you fully... \
name ""
skillcount1 3107
skillname "Melty Wash"
dwave 1,"se\ero_koki1.ogg"
>Two hands covered in bubbles massage Luka's penis!
damage 18,22
mov %hanyo2,%hanyo2-%damage
dwave 1,"se\ero_koki1.ogg"
>Covered in bubbles, she continues to wash Luka's penis!
damage 18,22
mov %hanyo2,%hanyo2-%damage
dwave 1,"se\ero_koki1.ogg"
>Increasing her speed, the Crab Girl keeps washing Luka's penis!
damage 18,22
mov %hanyo2,%hanyo2-%damage
dwave 1,"se\ero_koki1.ogg"
>Increasing her speed, the Crab Girl keep washing Luka's penis!
damage 18,22
mov %hanyo2,%hanyo2-%damage
dwave 1,"se\ero_koki1.ogg"
>Increasing her speed, the Crab Girl keep washing Luka's penis!
damage 18,22
mov %hanyo2,%hanyo2-%damage
dwave 1,"se\ero_koki1.ogg"
>Increasing her speed, the Crab Girl keep washing Luka's penis!
damage 18,22
mov %hanyo2,%hanyo2-%damage
if %hanyo1=0 && %mylife=0 gosub *kani_a10
if %hanyo1=1 && %hanyo2<0 gosub *kani_a11
skillname ""
name $name
>It's time to be a little more forceful...@
>I'll be sure to get off any dirty that's still there with this. \
name ""
skillcount1 3107
skillname "Melty Wash"
dwave 1,"se\ero_koki1.ogg"
>The Crab Girl increases the force she's massaging Luka's penis with!
damage 18,22
mov %hanyo2,%hanyo2-%damage
dwave 1,"se\ero_koki1.ogg"
>The Crab Girl gently rubs her finger over Luka's urethral opening!
damage 18,22
mov %hanyo2,%hanyo2-%damage
dwave 1,"se\ero_koki1.ogg"
>The Crab Girl rubs her finger up and down the back of Luka's penis.
damage 18,22
mov %hanyo2,%hanyo2-%damage
dwave 1,"se\ero_koki1.ogg"
>The Crab Girl tightly grabs Luka's penis with her foam covered hand, and quickly pumps him up and down!
damage 18,22
mov %hanyo2,%hanyo2-%damage
if %hanyo1=0 && %mylife=0 gosub *kani_a10
if %hanyo1=1 && %hanyo2<0 gosub *kani_a11
skillname ""
name $name
>Hahaha... You have such a pitiful face.@
>Does my washing technique feel too good for you to handle?\
>Don't worry, there's plenty more service to come... \
name ""
skillcount1 3107
skillname "Melty Wash"
dwave 1,"se\ero_koki1.ogg"
>The Crab Girl puts Luka's penis between two of her hands and starts to rub him!
damage 18,22
mov %hanyo2,%hanyo2-%damage
dwave 1,"se\ero_koki1.ogg"
>Another hand starts to massage Luka's scrotum at the same time!
damage 18,22
mov %hanyo2,%hanyo2-%damage
dwave 1,"se\ero_koki1.ogg"
>Her bubble covered hands continue to massage Luka!
damage 18,22
mov %hanyo2,%hanyo2-%damage
dwave 1,"se\ero_koki1.ogg"
>Another hand starts to rub the tip of Luka's penis with it's fingertips!
damage 18,22
mov %hanyo2,%hanyo2-%damage
if %hanyo1=0 && %mylife=0 gosub *kani_a10
if %hanyo1=1 && %hanyo2<0 gosub *kani_a11
skillname ""
name $name
>Now it's time to rinse. \
name ""
skillcount1 3107
skillname "Melty Wash"
dwave 1,"se\ero_koki1.ogg"
>The Crab Girl sprays water on Luka's penis!
damage 18,22
mov %hanyo2,%hanyo2-%damage
dwave 1,"se\ero_koki1.ogg"
>The Crab Girl starts to rub Luka's penis while spraying water on him!
damage 18,22
mov %hanyo2,%hanyo2-%damage
dwave 1,"se\ero_koki1.ogg"
>The Crab Girl's hands rub the bubbles off Luka's penis!
damage 18,22
mov %hanyo2,%hanyo2-%damage
if %hanyo1=0 && %mylife=0 gosub *kani_a10
if %hanyo1=1 && %hanyo2<0 gosub *kani_a11
skillname ""
name $name
>Now, the last part of the course. \
name ""
skillcount1 3107
skillname "Melty Wash"
dwave 1,"se\ero_koki1.ogg"
>The Crab Girl's bubble covered hand grabs Luka's penis!
damage 18,22
mov %hanyo2,%hanyo2-%damage
dwave 1,"se\ero_koki1.ogg"
>She starts to quickly pump Luka's penis!
damage 18,22
mov %hanyo2,%hanyo2-%damage
dwave 1,"se\ero_koki1.ogg"
>The Crab Girl plays with Luka's penis!
damage 18,22
mov %hanyo2,%hanyo2-%damage
name $name
>Haha... Let it out. \
name ""
dwave 1,"se\ero_koki1.ogg"
>The Crab Girl's hands rub Luka's penis all over!
damage 18,22
mov %hanyo2,%hanyo2-%damage
dwave 1,"se\ero_koki1.ogg"
>Another hand starts to rub the tip of Luka's penis!
damage 18,22
mov %hanyo2,%hanyo2-%damage
dwave 1,"se\ero_koki1.ogg"
>Covered in foam, the Crab Girl continues to rub Luka!
damage 18,22
skillname ""
name "Luka"
>That's incredible... Aaaa....\
name ""
gosub *syasei1
lsp 700,":a;chara\kani_st12.bmp",0,0
lsp 690,":a;chara\kani_ct02.bmp",0,0
gosub *syasei2
lsp 700,":a;chara\kani_st13.bmp",0,0
lsp 690,":a;chara\kani_ct03.bmp",0,0
print 10,500
>Rubbed by the Crab Girl, I can't even remember how many times I've come.\
csp 690
gosub *clear_sprite
gosub *setwindow_01p
name $name
>That's the end...@
>Your penis is all clean now.\
>Wasn't it amazing?\
name ""
name "Luka"
>Auuu...\
name ""
name $name
>Haha... It seems like you already can't speak anymore.@
>Then... Shall I do the special course again? \
>Aren't you happy? You'll get to feel even more incredible. \
name ""
name "Luka"
>No... If there's any more than that...\
name ""
>But the Crab Girl reaches her hands back to my groin!\
mov %battle,0
mov %hsean,1
mov %2533,%2533+1:if %2533=1 mov %count_koenemy,%count_koenemy+1
if %2533>%count_most mov %count_most,%2533:mov $count_mostname,$name
mov $bad1,"Luka was forced to ejaculate repeatedly by the Crab Girl's Melty Wash."
mov $bad2," After that, Luka was a prisoner of pleasure to the Crab Girl's washing technique..."
count 5,9
sub %stack,1
return *kani_ha



*kani_a10

add %stack,1
skillname ""
name "Luka"
>No more... I can't stand it anymore!@
>Aaaaa!\
name ""
gosub *syasei1
lsp 700,":a;chara\kani_st12.bmp",0,0
if %hanyo3=1 lsp 690,":a;chara\kani_ct02.bmp",0,0
gosub *syasei2
>The overpowering stimulation of being washed forces me over the edge.\
>Being forced to ejaculate while being washed...@
>My body shakes at the humiliation.\
lsp 700,":a;chara\kani_st13.bmp",0,0
if %hanyo3=1 lsp 690,":a;chara\kani_ct03.bmp",0,0
print 10,500
mov %viclose,1:gosub *lose2
name $name
>Awww... You came while I was still in the middle of washing.@
>You made yourself dirty while I was washing you...@> Aren't you ashamed?\
>But don't worry, I'll continue all the way to the end of my special course.\
name ""
name "Luka"
>Eh...? No way...\
name ""
name $name
>Didn't I tell you that already?@>Even if someone comes in the middle, I always finish the course.\
name ""
>Immediately after ejaculation, the Crab Girl continues to wash Luka's penis!\
mov %hanyo1,1
mov %hanyo2,%max_mylife
sub %stack,1
return



*kani_a11

add %stack,1
skillname ""
mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\kani_st12.bmp",0,0
lsp 690,":a;chara\kani_ct02.bmp",0,0
gosub *syasei2
lsp 700,":a;chara\kani_st13.bmp",0,0
lsp 690,":a;chara\kani_ct03.bmp",0,0
print 10,1500
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Coming again... How pathetic!"
if %ransu=2 mov $sel1,"Did you make yourself dirty again? Don't worry, I'll keep washing..."
if %ransu=3 mov $sel1,"Hahaha, letting out so much while being washed. "
if %ransu=4 mov $sel1,"Coming so easily... Aren't you ashamed?"
if %ransu=5 mov $sel1,"It's a little pathetic... Can't you endure it longer than that?"
name $name
eng $sel1:$sel6\
name ""
>Immediately after ejaculation, the Crab Girl continues to wash Luka's penis!\
mov %hanyo2,%max_mylife
sub %stack,1
return



*kani_onedari

mov $list1,"Washwash"
if %3102>0 mov %list_num1,1
mov $list2,"Bubble Wash"
if %3103>0 mov %list_num2,1
mov $list3,"Bubble Scrub"
if %3104>0 mov %list_num3,1
mov $list4,"Bubble Handjob"
if %3105>0 mov %list_num4,1
mov $list5,"Full-Body Bubble Massage"
if %3106>0 mov %list_num5,1
mov $list6,"Melty Wash"
if %3107>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *kani_onedari1
if %cmd1=12 goto *kani_onedari2
if %cmd1=13 goto *kani_onedari3
if %cmd1=14 goto *kani_onedari4
if %cmd1=15 goto *kani_onedari5
if %cmd1=16 goto *kani_onedari6
if %cmd1=-1 goto *kani_main
goto *kani_onedari



*kani_onedari1

gosub *onedari_syori
name $name
>You want me to cover your groin with bubbles?@
>Alright... I'll cover you. \
name ""
gosub *kani_a2
skip -1



*kani_onedari2

gosub *onedari_syori_k
name $name
>You want me to cover your penis with bubbles?@
>Alright... I'll cover you. \
name ""
if %kousoku=0 gosub *kani_a3
gosub *kani_a4
skip -1



*kani_onedari3

gosub *onedari_syori_k
name $name
>You want me to lather up your penis?@
>Then... I'll be sure to scrub you nice and clean. \
name ""
if %kousoku=0 gosub *kani_a3
gosub *kani_a5
skip -1



*kani_onedari4

gosub *onedari_syori_k
name $name
>You want a handjob from my foam-covered hands?@
>That's fine... I'll wash you until you come. \
name ""
if %kousoku=0 gosub *kani_a3
gosub *kani_a6
skip -1



*kani_onedari5

gosub *onedari_syori_k
name $name
>You want me to wash your whole body?@
>That's fine... I'll make you nice and clean. \
name ""
if %kousoku=0 gosub *kani_a3
gosub *kani_a7
skip -1



*kani_onedari6

gosub *onedari_syori_k
name $name
>You want to receive my special course?@
>That's fine... I'll give you my full service.\
if %first_sel1=1 skip 6
>I'll use all my techniques to wash your penis.@
>From the base to the tip, I'll carefully clean every inch...\
>Nobody is able to endure all the way to the end of my special course...@
>Eeeeverybody comes in the middle of it.\
>But... I always go all the way to the end.\
if %kousoku=0 gosub *kani_a3
>Alright... I'll wash your penis and give you a taste of heaven. \
gosub *kani_a9



*kani_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\kani_bk04.bmp",0,0
gosub *syasei2
>The unexpected pleasure of the bubbles forces Luka to ejaculate.\
mov %viclose,1:gosub *lose
mov %2533,%2533+1:if %2533=1 mov %count_koenemy,%count_koenemy+1
if %2533>%count_most mov %count_most,%2533:mov $count_mostname,$name
count 5,9
mov $bad1," Luka yields to the unexpected pleasure of the Crab Girl's bubbles."
mov $bad2," After that, Luka was a prisoner of pleasure to the Crab Girl's washing technique..."
gosub *face2
name $name
>Hahaha, your bubble covered penis shot out semen.@
>You're a little pathetic. \
name ""
goto *kani_h



*kani_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\kani_st12.bmp",0,0
gosub *syasei2
>The unexpected pleasure of the bubbles forces Luka to ejaculate.\
mov %viclose,1:gosub *lose
mov %2533,%2533+1:if %2533=1 mov %count_koenemy,%count_koenemy+1
if %2533>%count_most mov %count_most,%2533:mov $count_mostname,$name
count 5,9
mov $bad1," Pinned by the Crab Girl, Luka succumbs to the unexpected pleasure of the bubbles."
mov $bad2," After that, Luka was a prisoner of pleasure to the Crab Girl's washing technique..."
lsp 700,":a;chara\kani_st13.bmp",0,0:print 10,500
name $name
>Haha... You let it out.@
>Did it feel good? \
name ""
goto *kani_h



*kani_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\kani_st12.bmp",0,0
gosub *syasei2
>Luka is unable to endure the Crab Girl's washing!\
mov %viclose,1:gosub *lose
mov %2533,%2533+1:if %2533=1 mov %count_koenemy,%count_koenemy+1
if %2533>%count_most mov %count_most,%2533:mov $count_mostname,$name
count 5,9
mov $bad1," Luka succumbs to the Crab Girl's bubble scrub."
mov $bad2," After that, Luka was a prisoner of pleasure to the Crab Girl's washing technique..."
lsp 700,":a;chara\kani_st13.bmp",0,0:print 10,500
name $name
>Haha... You let it out.@
>Did it feel good? \
name ""
goto *kani_h



*kani_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\kani_st12.bmp",0,0
gosub *syasei2
>The unexpected pleasure of the bubbles forces Luka to ejaculate.\
mov %viclose,1:gosub *lose
mov %2533,%2533+1:if %2533=1 mov %count_koenemy,%count_koenemy+1
if %2533>%count_most mov %count_most,%2533:mov $count_mostname,$name
count 5,9
mov $bad1," Luka succumbs to the Crab Girl's bubble handjob."
mov $bad2," After that, Luka was a prisoner of pleasure to the Crab Girl's washing technique..."
lsp 700,":a;chara\kani_st13.bmp",0,0:print 10,500
name $name
>Haha... You let it out.@
>Did it feel good to be stroked by my foam covered hands? \
name ""
goto *kani_h



*kani_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\kani_st12.bmp",0,0
gosub *syasei2
>Rubbed all over by the Crab Girl's multiple hands, Luka is unable to endure the pleasure any longer.\
mov %viclose,1:gosub *lose
mov %2533,%2533+1:if %2533=1 mov %count_koenemy,%count_koenemy+1
if %2533>%count_most mov %count_most,%2533:mov $count_mostname,$name
count 5,9
mov $bad1," Pinned under the Crab Girl, Luka succumbs to her full-body massage."
mov $bad2," After that, Luka was a prisoner of pleasure to the Crab Girl's washing technique..."
lsp 700,":a;chara\kani_st13.bmp",0,0:print 10,500
name $name
>Haha... You let it out.@
>My washing technique is amazing, isn't it? \
name ""
goto *kani_h



*kani_h

if %2533=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Auu...\
name ""
cspl 690,699
lsp 700,":a;chara\kani_st11.bmp",0,0:print 10,500
if %kousoku=0 mov $sel1,"Drained of any power to resist, the Crab Girl pins me down."
if %kousoku=1 mov $sel1,"Drained of any power to resist, the Crab Girl pins me down."
eng $sel1:$sel6\
name $name
>Now you can't struggle anymore, since I defeated you...\
>Hey... Do you want me to do something amazing?@
>Do you want a taste of my special course?\
>I'll use all my techniques to wash your penis.@
>From the base to the tip, I'll carefully clean every inch...\
>Nobody is able to endure all the way to the end of my special course...@
>Eeeeverybody comes in the middle of it.\
>But... I always go all the way to the end.\
name ""
name "Luka"
>No way...\
name ""
>My body trembles in both fear and expectation.@
>Just what is this going to feel like...\
name ""
name $name
>I'll wash your penis and show you what heaven is like...\
name ""
goto *kani_ha



*kani_ha

mov %hseanwave,23:hseanwave
lsp 690,":a;chara\kani_ct11.bmp",0,0:print 10,500
name $name
>First I'll grab your penis with my foam covered hands... \
name ""
>Covered in slippery foam, the Crab Girl grabs my penis.@
>As she moves her hands, the foam starts to bubble and cover my waist.\
>As more and more bubbles cover me, more and more of her hands start to reach out and rub me from every direction.\
name "Luka"
>Aahhh...\
name ""
name $name
>Hahaha... Already moaning?@
>Does it feel good having your penis washed?\
name ""
>While giggling, she continues to rub me.\
>Another hand reaches out and starts to rub my scrotum.@
>Hands from every direction are rubbing, massaging, and playing with every part of my genitals.\
name "Luka"
>Auu... Everywhere...\
name ""
name $name
>Is it dirty here too?@
>I'll make it nice and clean. Be thankful.\
name ""
name "Luka"
>Auuu...\
name ""
>The hand holding my scrotum starts to gently squeeze down on me.\
>My waist unconsciously thrusts up at the new sensation.\
name "Luka"
>A...aaa...\
name ""
name $name
>Haha... Look at you.@
>Squirming around like that... Is it too good for you?\
>Then... Let me try making it even more intense. \
name ""
>The Crab Girl puts the tip of my penis between two of her foamy palms.@
>She starts to slowly move her hands back and forth, as if trying to warm her palms up with friction.\
name "Luka"
>Aaa...\
name ""
name $name
>Hehehe...@
>You shot out such dirty stuff before, so I have to pay special attention to this part. \
name ""
>She continues to move her hands back and forth with the same motions.@
>It's as if she's treating my penis as a stick to make a fire...\
>The bubbles covering my penis cause the friction and pleasure to be even more powerful than I thought possible.\
name "Luka"
>Ahhhh!\
name ""
name $name
>The part under the tip is dirty too...@
>I have to wash carefully here as well. \
name ""
>The Crab Girl makes a circle with her thumb and index finger, and puts it right underneath the tip of my penis.\
>Like that, she starts to quickly move up and down in small motions.\
>My lower back starts to push up at the concentrated stimulation.\
>While she continues those quick strokes, the two hands that were rubbing my tip start back up again.\
name "Luka"
>Ah! Ahhhhh!!\
name ""
name $name
>Oh? What's wrong?@
>For some reason, it seems like you're frantic. \
name ""
>While laughing at me, she starts to speed her hands up.\
>The three hands attacking my penis start to gradually increase their intensity.\
>The fourth hand, still holding onto my scrotum, starts to softly squeeze me as well.\
>Unable to concentrate on anything but the ecstasy, it's as if I'm in heaven.\
name "Luka"
>Faaa... Aaa...\
name ""
>My waist starts to thrust up with every movement of her hands.@
>The pleasure starts to demand a release, as I feel the ejaculation rise up through me.\
name "Luka"
>Ahh... I'm going to come...!\
name ""
name $name
>Are you going to make yourself dirty again?@
>Oh well... I'll just have to keep washing you then. \
name ""
>As I writhe around pitifully, the Crab Girl leans over and stares into my face.\
name $name
>Now... Come! \
name ""
name "Luka"
>Ahhhh!\
name ""
>I yield instantly to the hands forcing me to ejaculate.@
gosub *syasei1
lsp 690,":a;chara\kani_ct12.bmp",0,0
lsp 700,":a;chara\kani_st12.bmp",0,0
gosub *syasei2
>Even while I ejaculate, her bubbly hands continue to rub me.@
>The hand quickly moving up and down with her thumb and forefinger forces every drop of semen out of me.\
lsp 690,":a;chara\kani_ct13.bmp",0,0
lsp 700,":a;chara\kani_st13.bmp",0,0:print 10,500
name $name
>Hahaha... You let out so much.@
>Unfortunately, I'll have to start cleaning you all over again. \
name ""
>Suddenly, she repositions her hands, and grabs me with two more.\
>Six hands, each with five fingers...@
>Her thirty fingers all rub more of the bubbles into my penis.\
>Each finger moves and strokes me, as if they were individually trying to make me come.\
name "Luka"
>Ahhh!@>That's amazing!\
name ""
name $name
>Hahaha... I'll wash every corner of you with my fingers. \
name ""
>Her slippery fingers crawl and stroke me all over.@
>Tracing the back of my penis, circling my urethral opening, circling the tip of my penis...\
>Every inch of my penis being stimulated, I yell out in unbearable pleasure.\
name "Luka"
>Ahhh!@>Haaaa!\
name ""
name $name
>Oh? What's wrong?@
>Even though I'm washing you, are you going to come again?\
>How pathetic... Hahaha.\
name ""
name "Luka"
>Auuu!\
name ""
>Her fingers start to rub the back and tip of my penis even harder.\
>More of them continue to cover me with more of her bubbles.@
>Quickly after my last orgasm, I'm already brought to another height.\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\kani_ct12.bmp",0,0
lsp 700,":a;chara\kani_st12.bmp",0,0
gosub *syasei2
>The semen spurting out of me mixes with the bubbles.@
>Even as I come, her fingers don't slow down for a moment.\
lsp 690,":a;chara\kani_ct13.bmp",0,0
lsp 700,":a;chara\kani_st13.bmp",0,0:print 10,500
name $name
>What a helpless man... Putting out even more.@
>Do you really want me to keep washing you that badly?\
name ""
name "Luka"
>Auuu...\
name ""
>Even as she forces me to ejaculate, the Crab Girl continues to insult me.\
>This time, she grabs my penis with one of her foamy hands.@
>Grinning, she starts to stroke me up and down.\
name "Luka"
>Auu...\
name ""
>Grabbed by her slippery hand, I instinctively thrust upwards.\
name $name
>Here... I'll use my sure-kill washing technique.@
>Once I start, men instantly come. \
name ""
name "Luka"
>Stop...@>I don't want that...\
name ""
name $name
>Before I start to really wash you, I need to squeeze out all your semen.@
>After that, I'll make your penis clean.\
>If I don't get everything out first, you'll just keep making it dirty again.\
name ""
>The Crab Girl brings the rest of her hands over my penis, in addition to the first.\
>Just the act of them grabbing onto me was almost too much to endure.\
name "Luka"
>Faaa... Aaa...\
name ""
>Humiliating a man by washing his most defenseless spot...@
>It's as if I've given her my penis, and she's just washing her trophy.\
name $name
>Haha... You won't be able to hold on. @
>Now... Come! \
name ""
name "Luka"
>Aaaaa!!\
name ""
gosub *syasei1
lsp 690,":a;chara\kani_ct12.bmp",0,0
lsp 700,":a;chara\kani_st12.bmp",0,0
gosub *syasei2
>As soon as all of her hands start to move, I instantly ejaculate.@
>Squeezing, massaging, rubbing, stroking, pumping... Every imaginable movement was being done all at the same time.\
lsp 690,":a;chara\kani_ct13.bmp",0,0
lsp 700,":a;chara\kani_st13.bmp",0,0:print 10,500
>As soon as the last of my semen spurts out, she quickly washes the tip of my penis.\
>Not stopping for even a moment, it's as if she really is trying to milk every drop out of me.\
name "Luka"
>Ah!@>Ahhh!\
name ""
name $name
>Hahaha... Look at you writhing around.@
>Just from having me squeeze you a little... You look so pathetic.\
name ""
name "Luka"
>Aiee!@>Ahhh!\
name ""
>As I writhe in futility, she continues her relentless assault.@
>Even if I ejaculate, I can't stop this pleasure.\
name $name
>Here... You can still shoot out more, can't you?\
name ""
name "Luka"
>Aiee!@>Stop, please!@>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
name $name
>Until I get every drop out, I'm not stopping. \
name ""
name "Luka"
>No more...@> There's already nothing left!\
name ""
gosub *syasei1:gosub *syasei2
name $name
>The amount is less than before... But there certainly is more. \
name ""
name "Luka"
>No... Stop...\
name ""
gosub *syasei1:gosub *syasei2
name $name
>There was barely any that time... Are you almost empty?\
name ""
name "Luka"
>Ah... Aaa...\
name ""
gosub *syasei1:gosub *syasei2
>Forced to ejaculate more times than I can count, finally nothing comes out.\
>Completely exhausted, I can't move any part of my body.\
name $name
>Good, now you can't make yourself dirty anymore.@
>Now, it's time to start washing you again...\
name ""
>Saying that, she starts to wash my penis again.\
name "Luka"
>Aaa...\
name ""
>No matter how good I feel after that, I'm unable to ejaculate any more.@
>Exhausted and unable to move, the Crab Girl continues to wash me...\
gosub *anten
mov %hseanwave,0:hseanwave
>After she finished, the Crab Girl let me go.@
>Surprisingly, she didn't force me to be her toy for the rest of my life.\
>However...\
lsp 700,":a;chara\kani_st00.bmp",0,0
bg "bg\bg039.bmp",10,3000
name $name
>Haha... You came again today.@
>You want me to wash your penis again, right? \
name ""
name "Luka"
>.............\
name ""
>I'm a slave to the pleasure that her washing techniques can bring.\
>Completely forgetting about my adventure, I settle down in Port Natalia.@
>Every day, I go to the coast where the Crab Girl is.\
name $name
>You can't forget about my washing technique, can you? Hahaha.@
lsp 700,":a;chara\kani_st01.bmp",0,0:print 10,500
>That's good... I'll wash you plenty, and leave you nice and clean. \
name ""
mov %hseanwave,23:hseanwave
lsp 700,":a;chara\kani_st11.bmp",0,0:print 10,500
name "Luka"
>Uaaa...\
name ""
name $name
>Hehe... It feels good, right?@
>Here... I'll do your favorite, and wash you with all of my hands.\
name ""
name "Luka"
>Ah! Ahhh!\
name ""
lsp 690,":a;chara\kani_ct11.bmp",0,0:print 10,500
name $name
>Hehe... I'll start with the tip today. \
name ""
name "Luka"
>Aaaa...\
name ""
gosub *syasei1
lsp 690,":a;chara\kani_ct12.bmp",0,0
lsp 700,":a;chara\kani_st12.bmp",0,0
gosub *syasei2
gosub *anten
mov %hseanwave,0:hseanwave
>Abandoning my journey, I can only think of her washing technique.@
>I visit her every day to be washed...\
>No longer a Hero, I'm just a slave of the pleasure.\
>...............\
goto *badend



*kurage_start

mov $name,"Jellyfish Girl"
mov $name2,"Jellyfish Girl"
mov $lavel,"kurage"
mov $tatie1,"kurage_st01"
mov $tatie2,"kurage_st02"
mov $tatie3,"kurage_st01"
mov $tatie4,"kurage_st02"
mov $haikei,"bg050"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,550
if %nanido=2 mov %max_enemylife,700
if %nanido=3 mov %max_enemylife,850
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,80
mov %music,1
gosub *maxmp:mov %mp,%max_mp
mov %tikei,0
gosub *syutugen
mov $mogaku_anno1,"Luka can't break free of her tentacles!"
mov $mogaku_anno2,"Luka broke free of her tentacles!"
mov $mogaku_anno3,"Bound by her tentacles, Luka can't swing his sword!"
mov $mogaku_sel1,"I won't let go..."
mov $mogaku_sel2,"Useless..."
mov $mogaku_sel3,"Even if you struggle... I won't let go..."
mov $mogaku_sel4,"Don't struggle. I'll make you feel good..."
mov $mogaku_sel5,"Pointless... I won't release you..."
mov $mogaku_dassyutu1,"Why did you run?"
mov $mogaku_dassyutu2,""
mov $half_s1,"I'll weaken you more..."
mov $half_s2,""
mov $kiki_s1,"Like this, I'll wring everything from you..."
mov $kiki_s2,""
mov %end_n,4
mov %exp_minus,800
mov %zmonster_x,-220
mov %tukix,300
mov %owaza_count1a,2
mov %owaza_count2a,2
name $name
>A human this deep under the sea?@> How strange...\
name ""
name "Luka"
>I don't want to bother you.@
>So, please just keep swimming along...\
name ""
>I don't want to intrude on the peace of the monsters living under the sea.\
>I just want to get to the Queen as peacefully as possible.\
gosub *face2
name $name
>You look delicious...@
>I'll wring all the semen from you and savor it...\
name ""
>But it looks like she doesn't think the same as I do.@
>I don't want to, but I have no choice but to fight!\
gosub *face1
if %3112=0 skillcount1 3112
goto *common_main



*kurage_v

gosub *face3
name $name
>My strength...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Jellyfish Girl turns into a normal Jellyfish!@
>The jellyfish swims off somewhere!\
mov %viclose,1:gosub *victory
mov %getexp,850:gosub *lvup
mov %2234,1
goto *sean0103



*kurage_kousan

gosub *kousan_syori
>Luka yields to the promise of pleasure, ending his resistance!\
gosub *face2
name $name
>...Surrendered?@
>Then... It's ok if I eat you?\
name ""
goto *kurage_a



*kurage_main

gosub *cmd_main
if %cmd1=11 && %kousoku=1 goto *common_mogaku
if %cmd1=11 && %kousoku=2 mov %abairitu,50:goto *kurage_miss2
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *kurage_kousan
if %cmd1=16 goto *kurage_onedari
if %cmd1=17 goto *common_skill
goto *kurage_main



*kurage_miss2

mov %before_action,9
name "Luka"
>Guh... Get off!\
name ""
>Luka attacks!
>Caught in the tentacles, Luka's swing isn't as powerful!\
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\slash.ogg"
gosub *enemylife
dwave 1,"se\dassyutu.ogg"
lsp 700,":a;chara\"+$tatie3+".bmp",%monster_x,%monster_y
mov %kousoku,0:gosub *status_print
if %enemylife=0 goto *kurage_v
>Luka broke free from the Jellyfish Girl!\
name $name
>You got away...\
name ""
mov %owaza_count1a,0
goto *common_main



*kurage_a

if %kousoku=2 gosub *kurage_a6
if %kousoku=1 && %status=2 gosub *kurage_a4:goto *common_main
if %kousoku=1 rnd2 %ransu,1,3
if %kousoku=1 && %ransu<3 gosub *kurage_a4:goto *common_main
if %kousoku=1 && %ransu=3 gosub *kurage_a5:goto *common_main
rnd2 %ransu,1,4
if %ransu<3 gosub *kurage_a1:goto *common_main
if %ransu=3 && %owaza_count1a>3 gosub *kurage_a2:goto *common_main
if %ransu=4 && %status=0 && %owaza_count2a>3 gosub *kurage_a3:goto *common_main
skip -4



*kurage_a1

add %stack,1
skillcount1 3108
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll use my tentacle to play with you..."
if %ransu=2 mov $sel1,"I'll tease you..."
if %ransu=3 mov $sel1,"Your penis is weak..."
name $name
eng $sel1:$sel6\
name ""
skillname "Tentacle Caress"
dwave 1,"se\ero_slime1.ogg"
>A tentacle strokes Luka's groin!
if %nanido<2 damage 15,18
if %nanido=2 damage 22,27
if %nanido=3 damage 30,36
skillname ""
if %mylife=0 sub %stack,1:return *kurage_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kurage_a2

add %stack,1
gosub *face2
name $name
>Wrap, wrap, wrap...\
name ""
skillname "Tentacle Capture"
dwave 1,"se\ero_makituki2.ogg"
>The Jellyfish Girl coils her tentacles around Luka's body!
if %nanido<2 damage 15,18
if %nanido=2 damage 22,27
if %nanido=3 damage 30,36
mov %kousoku,1:gosub *status_print
>Luka's bound by the Jellyfish Girl's tentacles!\
skillname ""
if %mylife=0 sub %stack,1:return *kurage_h2
name $name
>I caught you...\
name ""
if %nanido<2 mov %genmogaku,2
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,3
sub %stack,1
return



*kurage_a3

add %stack,1
skillcount1 3109
if %kousan=2 skip 4
name $name
>This tentacle is special...\
name ""
skillname "Paralytic Tentacle"
dwave 1,"se\ero_makituki1.ogg"
>The barbs of the Jellyfish Girl's tentacles prick Luka!@
>Numbness starts to flow through Luka's body!\
name "Luka"
>Ahh... My body...\
name ""
mov %status,2:gosub *status_print
>Luka has been paralyzed!\
skillname ""
name $name
>Now, I'll eat you...\
name ""
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,2,3
if %nanido=3 rnd2 %status_turn,3,4
sub %stack,1
return



*kurage_a4

add %stack,1
skillcount1 3110
>Luka's bound by the Jellyfish Girl's tentacles!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll squeeze it, so give me your semen...":mov $sel2,"A tentacle wraps around Luka's penis!"
if %ransu=2 mov $sel1,"This is a man's weak point...":mov $sel2,"A tentacle wraps around Luka's penis and starts to wriggle around!"
if %ransu=3 mov $sel1,"Hahaha...":mov $sel2,"A tentacle starts to wrap around Luka's scrotum!"
if %ransu=4 mov $sel1,"Does it feel good when I tighten it...?":mov $sel2,"A tentacle wrapped around Luka's penis starts to tighten!"
if %ransu=5 mov $sel1,"I'll tease your weak point...":mov $sel2,"The tip of a tentacle starts to rub Luka's urethral opening!"
name $name
eng $sel1:$sel6\
name ""
skillname "Tentacle Penis Torture"
dwave 1,"se\ero_slime1.ogg"
eng $sel2:$sel6
if %nanido<2 damage 19,23
if %nanido=2 damage 28,34
if %nanido=3 damage 38,46
skillname ""
if %mylife=0 sub %stack,1:return *kurage_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kurage_a5

add %stack,1
>Luka's bound by the Jellyfish Girl's tentacles!\
if %kousan>1 skip 4
name $name
>It's about time to eat you...\
name ""
skillname "Predator Preparation"
dwave 1,"se\ero_slime3.ogg"
>Countless tentacles wrap around Luka's body!\
mov %kousoku,2:mov %genmogaku,100
skillname ""
name "Luka"
>Ahhhh!\
name ""
name $name
>I'll drag you into my umbrella just like this...@
>While toying with you, I'll slowly eat you.@
>Don't be afraid... It will feel amazing...\
name ""
sub %stack,1
return



*kurage_a6

add %stack,1
>Luka's bound by the Jellyfish Girl's tentacles!\
if %kousan=2 skip 4
name $name
>Now, I'll eat you...\
name ""
skillname "Wrap Up"
dwave 1,"se\ero_name2.ogg"
lsp 690,":a;chara\kurage_ct01.bmp",0,0:print 10,500
>Luka's body is wrapped inside the umbrella of the Jellyfish Girl!\
mov %kousoku,3
skillname ""
name "Luka"
>Ahhhhhh!\
name ""
>The tentacles inside her umbrella wrap around Luka!\
name $name
>First I'll weaken you by squeezing out all your semen...\
name ""
skillcount1 3111
skillname "Jelly Prison"
dwave 1,"se\ero_name2.ogg"
>Stuck inside the Jellyfish Girl's umbrella, Luka's entire body is played with by her tentacles!
mov %damage_kotei,1
damage 45,52
skillname ""
if %mylife=0 sub %stack,1:return *kurage_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
name "Luka"
>Ahhhhhhhhh!!\
name ""
>I struggle with all of my strength as I'm stuck in her transparent body.\
>Her elastic, rubbery body bounces back with every movement, not releasing me no matter how hard I try.\
>The soft tentacles inside her umbrella continue to wrap around my penis.@
>From every direction, more and more tentacles start to rub me.\
>The strange elastic feeling forces pleasure into my waist.\
name "Luka"
>Faa... That feels good...\
name ""
name $name
>Inside my umbrella, I'll squeeze everything out...\
name ""
sub %stack,1
goto *kurage_a7



*kurage_a7

add %stack,1
skillcount1 3111
>Luka's body is wrapped in the Jellyfish Girl's umbrella!\
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You can't endure being squeezed like this, can you?":mov $sel2,"The Jellyfish Girl's umbrella tightens around Luka's body!"
if %ransu=2 mov $sel1,"Haha... I'll play with you more.":mov $sel2,"Countless tentacles rub Luka all over his body!"
if %ransu=3 mov $sel1,"Let as much semen out as you want...":mov $sel2,"The wriggling tentacles force a strange pleasure into Luka's body!"
if %ransu=4 mov $sel1,"It feels amazing being wrapped up by me, doesn't it?":mov $sel2,"The elastic tentacles force pleasure into Luka's body!"
name $name
eng $sel1:$sel6\
name ""
skillname "Jelly Prison"
dwave 1,"se\ero_name2.ogg"
eng $sel2:$sel6
mov %damage_kotei,1
damage 45,52
skillname ""
if %mylife=0 sub %stack,1:return *kurage_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
goto *kurage_a7



*kurage_onedari

mov $list1,"Tentacle Caress"
if %3108>0 mov %list_num1,1
mov $list2,"Paralytic Tentacle"
if %3109>0 mov %list_num2,1
mov $list3,"Tentacle Penis Torture"
if %3110>0 mov %list_num3,1
mov $list4,"Jelly Prison"
if %3111>0 mov %list_num4,1
mov $list5,"Predation"
if %3112>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *kurage_onedari1
if %cmd1=12 goto *kurage_onedari2
if %cmd1=13 goto *kurage_onedari3
if %cmd1=14 goto *kurage_onedari4
if %cmd1=15 goto *kurage_onedari5
if %cmd1=-1 goto *kurage_main
goto *kurage_onedari



*kurage_onedari1

gosub *onedari_syori
name $name
>You want to be defeated by my tentacles...?\
name ""
gosub *kurage_a1
skip -1



*kurage_onedari2

gosub *onedari_syori
name $name
>You want to be defeated while paralyzed...?\
name ""
gosub *kurage_a3
mov %kousan,3
goto *common_main



*kurage_onedari3

gosub *onedari_syori_k
name $name
>You want me to torture your penis...?\
name ""
if %kousoku=0 gosub *kurage_a2
gosub *kurage_a4
skip -1



*kurage_onedari4

gosub *onedari_syori_k
name $name
>You want me to squeeze you inside my umbrella...?\
name ""
if %kousoku=0 gosub *kurage_a2
gosub *kurage_a6



*kurage_onedari5

gosub *onedari_syori
skillcount1 3112
name $name
>You want me to eat you...?@
>I'd be happy to eat someone as delicious looking as you...\
name ""
name "Luka"
>.........\
name ""
>I give myself completely to the desire of being eaten.@
>I look at the tentacle drawing closer to my body with a look of expectation.\
mov %viclose,2:gosub *lose
mov %2534,%2534+1:if %2534=1 mov %count_koenemy,%count_koenemy+1
if %2534>%count_most mov %count_most,%2534:mov $count_mostname,$name
count 33,11
mov $bad1," Luka allowed the Jellyfish Girl to eat him happily."
mov $bad2," Wrapped up in her umbrella, Luka was digested."
mov %kousan,4
goto *kurage_h



*kurage_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\kurage_bk03.bmp",0,0
gosub *syasei2
>Unable to endure the elastic tentacles any longer, Luka ejaculates.\
mov %viclose,1:gosub *lose
mov %2534,%2534+1:if %2534=1 mov %count_koenemy,%count_koenemy+1
if %2534>%count_most mov %count_most,%2534:mov $count_mostname,$name
count 10,11
mov $bad1,"Luka succumbs to the Jellyfish Girl's tentacle caress."
if %status=2 mov $bad1,"Paralyzed, Luka succumbs to the Jellyfish Girl's tentacle caress."
mov $bad2," After Luka was squeezed dry, he was slowly eaten."
gosub *face2
name $name
>Did my tentacles feel good?@
>The real thing starts now...\
name ""
goto *kurage_h



*kurage_h2

mov %ikigoe,3:gosub *ikigoe
name $name
>Eh...?\
name ""
gosub *syasei1
lsp 692,":a;chara\kurage_bk02.bmp",0,0
lsp 693,":a;chara\kurage_bk03.bmp",0,0
gosub *syasei2
>The elastic feeling of the tentacles wrapping him up causes Luka to accidentally ejaculate!\
mov %viclose,1:gosub *lose
mov %2534,%2534+1:if %2534=1 mov %count_koenemy,%count_koenemy+1
if %2534>%count_most mov %count_most,%2534:mov $count_mostname,$name
count 10,11
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka accidentally ejaculates while the Jellyfish Girl wraps him up."
if %status=2 mov $bad1,"Paralyzed, Luka accidentally ejaculates while the Jellyfish Girl wraps him up."
mov $bad2," After Luka was squeezed dry, he was slowly eaten."
name $name
>You already came...?@
>That's the first time someone's come just from being wrapped up...@
>The real thing starts now...\
name ""
goto *kurage_h



*kurage_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\kurage_bk02.bmp",0,0
gosub *syasei2
>Luka succumbs to the tentacle toying with his penis.\
mov %viclose,1:gosub *lose
mov %2534,%2534+1:if %2534=1 mov %count_koenemy,%count_koenemy+1
if %2534>%count_most mov %count_most,%2534:mov $count_mostname,$name
count 10,11
mov $bad1," Luka succumbs to the Jellyfish Girl's penis torture."
if %status=2 mov $bad1,"Paralyzed, Luka succumbs to the Jellyfish Girl's penis torture."
mov $bad2," After Luka was squeezed dry, he was slowly eaten."
name $name
>Did my tentacles feel good...?@
>The real thing starts now...\
name ""
goto *kurage_h



*kurage_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\kurage_ct02.bmp",0,0
lsp 691,":a;chara\kurage_bk04.bmp",0,0
gosub *syasei2
>Caught in her umbrella, Luka succumbs to the tentacles attacking him from every direction.\
mov %viclose,1:gosub *lose
mov %2534,%2534+1:if %2534=1 mov %count_koenemy,%count_koenemy+1
if %2534>%count_most mov %count_most,%2534:mov $count_mostname,$name
count 2,11
mov $bad1," Luka's semen was squeezed by the Jellyfish Girl's jelly prison."
mov $bad2," After Luka was squeezed dry, he was slowly eaten."
name $name
>It was amazing, wasn't it?@
>There's a lot more coming though...\
name ""
lsp 690,":a;chara\kurage_ctb01.bmp",0,0:print 10,500
goto *kurage_h



*kurage_h

if %2534=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>1 mov %hseanwave,21:hseanwave:goto *kurage_hb
name "Luka"
>Auuu...\
name ""
dwave 1,"se\ero_makituki2.ogg"
>I'm unable to struggle against the tentacle wrapping around me.@
>It slowly starts to pull me towards her umbrella...\
name $name
>I'll slowly draw you into my umbrella...@
>And slowly eat you as I toy with you...\
>Don't be afraid... It will feel amazing.\
name ""
name "Luka"
>Uwaa...\
name ""
>Then...@
mov %hseanwave,21:hseanwave
lsp 690,":a;chara\kurage_ctb01.bmp",0,0:print 10,500
>Too exhausted to resist, I'm dragged into her umbrella.@
>Countless tentacles surround my body, as I'm bound inside of her.\
goto *kurage_hb



*kurage_hb

name "Luka"
>Aiee!\
name ""
>My body unconsciously twitches inside her semi-transparent body.@
>The rubbery tentacles completely cover my body, wriggling and squirming around.\
>From the mass of writhing tentacles, one has wrapped around my penis.\
name $name
>I'll weaken you by squeezing out all your semen...@
>I'll digest it along with you, for my nourishment...\
name ""
name "Luka"
>Aaaa!!\
name ""
>Tentacles rub me from every direction.@
>Each squeeze of the elastic tentacle on my penis brings a strange pleasure.\
>The tentacle on my penis squirms and wriggles around as it slowly coils around me even tighter.\
>The strange stimulation quickly brings me to the edge of an orgasm.\
>A sweet numbness runs through my waist up to the tip of my penis.\
name "Luka"
>Auu... I'm already going to come...\
name ""
name $name
>Shoot it out... Give me food...\
name ""
>Not only is the Jellyfish Girl's tentacles massaging my penis, but the the rest of the countless squirming tentacles are massaging me all over my body.\
>Her umbrella itself is squirming and wriggling around, closing tighter and then slowly releasing me as the Jellyfish Girl moves.\
>The combination of stimulations force pleasure into my entire body, as my head goes white.\
name "Luka"
>Faaa...\
name ""
gosub *syasei1
lsp 690,":a;chara\kurage_ctb02.bmp",0,0
gosub *syasei2
>Rejoicing in the pleasure, my penis shoots out a cloud of dirty white semen into the water.\
>As soon as I ejaculate, the tentacles quickly cover my groin in a frenzy.\
>Unable to even struggle, I writhe helplessly as the tentacles continue to rub me all over.\
name $name
>More... I'll wring more out...\
name ""
name "Luka"
if %kousan<4 mov $sel1,"Auu... Stop already..."
if %kousan=4 mov $sel1,"Ahh... That feels incredible..."
eng $sel1:$sel6\
name ""
if %kousan<4 mov $sel1,"Ignoring my plea, she continues to mercilessly rub me with her tentacles."
if %kousan=4 mov $sel1,"Soaked in the pleasure, she continues to stimulate me with her tentacles."
eng $sel1:$sel6\
>Wrapped up in her umbrella, the tentacles are coming at me from every direction.\
>Every movement of her body causes the umbrella surrounding me to shrink around my body, squeezing me tighter.\
name $name
>More... Shoot out more food...\
name ""
name "Luka"
>Haaa...\
name ""
>I'm just the Jellyfish Girl's captured prey...\
>Stuck inside her umbrella, she's just squeezing out my semen with no rest.@
>After everything is squeezed out, she's going to digest and eat me...\
if %kousan<4 mov $sel1,"Realizing my inevitable fate, I shiver in horror."
if %kousan=4 mov $sel1,"Realizing my inevitable fate, a ruinous desire fills me."
eng $sel1:$sel6\
if %kousan=4 skip 14
name "Luka"
>No... Someone help...\
name ""
name $name
>I'll never release you...@
>After I wring everything out, I'll eat you.\
name ""
>No matter what I do, her elastic body just bounces me back.@
>Once I got stuck in here, there was no escape...\
>The sweet stimulation from the tentacles continues to fill me as I struggle in vain.\
>Mercilessly filling me with pleasure, I'm unable to resist it any longer.\
>The tentacles quickly absorb the pre-come that's leaking out as I approach another climax.\
>Even if I try to pull my waist back, there's no escape from the ecstasy.\
name "Luka"
>Faaaaa...@
>I'm coming again!\
name ""
gosub *syasei1
lsp 690,":a;chara\kurage_ctb03.bmp",0,0
gosub *syasei2
>While being stroked by her tentacles, I come again.@
>But even as I spurt out more cloudy semen, their speed only increases.\
name "Luka"
if %kousan<4 mov $sel1,"Faa... Stop please..."
if %kousan=4 mov $sel1,"Faa... That's incredible..."
eng $sel1:$sel6\
name ""
name $name
>It's about time to start dissolving you...@
>While I wring out the rest of your semen, I'll slowly digest you...\
name ""
name "Luka"
if %kousan<4 mov $sel1,"Ahhhh!!"
if %kousan=4 mov $sel1,"Auuu..."
eng $sel1:$sel6\
name ""
if %kousan<4 mov $sel1,"The dreaded moment is finally coming..."
if %kousan=4 mov $sel1,"The moment I was looking forward to is finally coming..."
eng $sel1:$sel6\
>Stuck in her umbrella, I'm going to be eaten...\
>Though she's able to squeeze out my semen in here, it's main function is to eat her prey...\
>Thus I'm already inside of her stomach...\
if %hosyoku_cut=1 goto *hosyoku_cut
name "Luka"
>Aaaa!!\
name ""
mov %hseanwave,22:hseanwave
>Her tentacles continue to attack my entire body.@
>As they rub me all over my body, they start to secrete a sticky mucus all over me.\
>As more mucus is secreted, the umbrella closes tighter around me, forcing more of the sticky fluid onto my body.\
name "Luka"
if %kousan<4 mov $sel1,"Aiee! No!"
if %kousan=4 mov $sel1,"Amazing... It feels incredible..."
eng $sel1:$sel6\
name ""
>Still alive, I'm being digested inside of her...@
>Completely conscious, she's going to eat me.\
>But while that's happening, she's going to continue to force me to feel good by rubbing me with her tentacles...\
>The squeezing of her umbrella combined with the wriggling of her tentacles is too much for me to bear.\
name "Luka"
>Aiie... I'm coming!@
>Ahhhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\kurage_ctb04.bmp",0,0
gosub *syasei2
>Completely helpless, I shoot out more semen.@
>Forced to come against my will, my semen will give her more nourishment...\
>This must be a part of her digestion process, to get the most food possible from her prey...\
>I feel myself both physically and mentally melting in pleasure inside of her...\
if %kousan<4 mov $sel1,"As my mind melts, the fear and disgust at my situation starts to slowly fade..."
if %kousan=4 mov $sel1,"As my mind melts, I soak in the pleasure of being eaten."
eng $sel1:$sel6\
name "Luka"
>Faaa... Incredible...\
name ""
>As the umbrella shrinks tighter around me, I'm stuck in a trance of ecstasy.\
>The pleasure of having my entire body digested explodes through me.\
gosub *syasei1:gosub *syasei2
name "Luka"
>Faaa...\
name ""
>Every time I come, I get weaker and weaker.@
>Unable to even move my body any longer, I have no choice but to take the forced pleasure.\
name $name
>Let out more...@
>Shoot out all your semen as you slowly dissolve...\
name ""
name "Luka"
>Aaa...\
name ""
gosub *syasei1:gosub *syasei2
>I've stopped feeling fear.@
>The pleasure has broken my mind, as I give myself to the ecstasy of being eaten.\
>As I feel my body dissolve, the tentacles continue to wriggle around me.\
>Stuck in a trance, I'm being eaten...\
name "Luka"
>A...a...\
name ""
gosub *syasei1:gosub *syasei2
gosub *anten
mov %hseanwave,0:hseanwave
>Surrendering to the pleasure, I come over and over.\
>Until finally, I was completely dissolved.@
>In the end, I was nothing but the Jellyfish Girl's nutrients.\
>My adventure ends in a cruel death.\
>...........\
goto *badend



*iso_start

mov $name,"Sea Anemone Girl"
mov $name2,"Sea Anemone Girl"
mov $lavel,"iso"
mov $tatie1,"iso_st01"
mov $tatie2,"iso_st02"
mov $tatie3,"iso_st03"
mov $tatie4,"iso_st01"
mov $haikei,"bg051"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,160
if %nanido=2 mov %max_enemylife,160
if %nanido=3 mov %max_enemylife,280
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,99
mov %music,1
gosub *maxmp:mov %mp,%max_mp
mov %tikei,0
gosub *syutugen
mov $mogaku_anno1,"Luka can't break free of the Sea Anemone Girl!"
mov $mogaku_anno4,"Held by her tentacle, Luka's attack is weakened!"
mov $mogaku_sel1,"It's useless... I won't let go."
mov $mogaku_sel2,"Struggle more... You're only making yourself weaker..."
mov $mogaku_sel3,"No prey has ever escaped from my tentacle..."
mov $mogaku_sel4,"Once you're caught by me, there's no escape..."
mov $mogaku_sel5,"The more you struggle,the tighter my tentacle gets..."
mov $mogaku_dassyutu1,"You got away..."
mov $mogaku_dassyutu2,""
mov $half_s1,"Does it feel good?"
mov $half_s2,""
mov $kiki_s1,"Just like this, I'll force you to come..."
mov $kiki_s2,""
mov %end_n,4
mov %exp_minus,1650
mov %zmonster_x,-300
mov %kousoku,1:gosub *status_print
mov %genmogaku,100
name $name
>Oh... I caught a young human.@
>That's good... I'm very hungry.\
mov $tatie1,"iso_st02"
lsp 700,":a;chara\iso_st02.bmp",0,0:print 10,500
>Held in this mouth, I'll suck all the semen out from you.@
>Once nothing's left, I'll eat you...\
>It will feel amazing... Hahaha.\
name ""
name "Luka"
>Gah...\
name ""
>Not only my foot, but more tentacles are reaching out to wrap around the rest of my body.\
>It seems as though I'll have to fight as I am...\
if %3117=0 skillcount1 3117
goto *common_main



*iso_v

gosub *face3
name $name
>What is this...?@> Kyaa!\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Sea Anemone Girl turns into a normal sea anemone!\
mov %viclose,1:gosub *victory
mov %getexp,900:gosub *lvup
mov %2235,1
goto *sean0104



*iso_kousan

gosub *kousan_syori
>Luka yields to the temptation, ending his resistance!\
gosub *face2
name $name
>Do you want me to eat you? Then...\
name ""
goto *iso_a



*iso_main

gosub *cmd_main
if %cmd1=11 && %kousoku=2 goto *iso_mogaku1
if %cmd1=11 mov %abairitu,50:goto *common_miss2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *iso_mogaku2
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *iso_kousan
if %cmd1=16 goto *iso_onedari
goto *iso_main



*iso_mogaku1

mov %before_action,7
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Urgh!"
if %ransu=2 mov $sel1,"Gah! Damn it!"
if %ransu=3 mov $sel1,"Get off!"
name "Luka"
eng $sel1:$sel6\
name ""
>Luka attacks!
>But he's held down by the tentacles!\
name $name
>Hahaha...@
>If you come into my mouth, the desire to fight back will vanish...\
name ""
goto *iso_a



*iso_mogaku2

mov %before_action,8
if %nanido=2 rnd2 %ransu,1,10:if %ransu=5 goto *common_mogaku
if %nanido=3 rnd2 %ransu,1,2:if %ransu=2 goto *common_mogaku
name "Luka"
>Guh! Damn it!\
name ""
dwave 1,"se\dassyutu.ogg"
>Luka struggles with all his power, and breaks free!\
mov %kousoku,1:mov %genmogaku,100
name $name
>You got away...?@
>But it feels amazing inside my mouth...\
name ""
gosub *face1
goto *common_main



*iso_a

if %kousoku=2 gosub *iso_a5:goto *common_main
rnd2 %ransu,1,4
if %ransu=1 gosub *iso_a1:goto *common_main
if %ransu=2 gosub *iso_a2:goto *common_main
if %ransu=3 && %status=0 && %owaza_count2a>2 gosub *iso_a3:goto *common_main
if %ransu=4 && %status=0 && %owaza_count1a>2 gosub *iso_a4:goto *common_main
skip -5



*iso_a1

add %stack,1
skillcount1 3113
>Luka's caught by the Sea Anemone Girl's tentacles!\
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll tease your penis...":mov $sel2,"A tentacle rubs Luka's penis!"
if %ransu=2 mov $sel1,"Do you want to come...?":mov $sel2,"A tentacle tightly wraps around Luka's penis!"
if %ransu=3 mov $sel1,"Does it feel good when I do this?":mov $sel2,"A tentacle wraps around Luka's penis!"
if %ransu=4 mov $sel1,"Don't resist... Just come...":mov $sel2,"A tentacle quickly pumps Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Tentacle Penis Caress"
dwave 1,"se\ero_slime1.ogg"
eng $sel2:$sel6
if %nanido<2 damage 17,21
if %nanido=2 damage 22,28
if %nanido=3 damage 30,39
skillname ""
if %mylife=0 sub %stack,1:return *iso_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*iso_a2

add %stack,1
skillcount1 3114
>Luka's caught by the Sea Anemone Girl's tentacles!\
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll play with your shameful part...":mov $sel2,"A tentacle strokes between Luka's groin and anus!"
if %ransu=2 mov $sel1,"Does it feel good here...?":mov $sel2,"A tentacle wriggles all over Luka's body!"
if %ransu=3 mov $sel1,"I'll tickle you... Haha.":mov $sel2,"A tentacle gently rubs against Luka's armpit and nipple!"
if %ransu=4 mov $sel1,"I'll tease you like this...":mov $sel2,"A tentacle tightens around Luka's body!"
name $name
eng $sel1:$sel6\
name ""
skillname "Full-Body Tentacle Caress"
dwave 1,"se\ero_makituki1.ogg"
eng $sel2:$sel6
if %nanido<2 damage 18,22
if %nanido=2 damage 24,30
if %nanido=3 damage 33,41
skillname ""
if %mylife=0 sub %stack,1:return *iso_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*iso_a3

add %stack,1
skillcount1 3115
if %status=1 >Luka is in a trance!\
>Luka's caught by the Sea Anemone Girl's tentacles!\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Go into a trance..."
if %ransu=2 mov $sel1,"While in a trance, let it all out..."
if %ransu=3 mov $sel1,"Making it feel so good you lose your mind..."
name $name
eng $sel1:$sel6\
name ""
skillname "Tentacle Trance"
dwave 1,"se\ero_makituki2.ogg"
>A tentacle coils around Luka's penis!\
>A strange pleasure fills Luka's body, dulling his mind!
if %nanido<2 damage 18,22
if %nanido=2 damage 24,30
if %nanido=3 damage 33,41
if %status=0 mov $sel1,"Luka has been put into a trance!"
if %status=1 mov $sel1,""
mov %status,1:gosub *status_print
if $sel1<>"" eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *iso_h3
if %kousan=2 && %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %kousan=2 && %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
if %kousan=2 sub %stack,1:return
name "Luka"
>Aaa...\
name ""
name $name
>Haha... Does it feel good?@
>While stuck in a dream, shoot out all your white food...\
name ""
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,2,3
if %nanido=3 rnd2 %status_turn,3,4
sub %stack,1
return



*iso_a4

add %stack,1
>Luka's caught by the Sea Anemone Girl's tentacles!\
gosub *face2
name $name
>It's time to pull you into my mouth...\
name ""
skillname "Mouth Draw"
dwave 1,"se\ero_makituki4.ogg"
mov %kousoku,2
>The Sea Anemone Girl's tentacles slowly draw Luka closer to her!\
skillname ""
name "Luka"
>Aiee!\
name ""
>Her giant mouth is right in front of my eyes...@
>As it excitedly opens and closes, I can see the pink flesh inside of it...\
>The walls of her mouth wriggle and move around, as if covered in worms.\
>Unconsciously, I feel the desire to be held in there rise up in me.@
>My entire body being held in there... What would it feel like?\
name "Luka"
>No... No!@>I can't think about that!\
name ""
>I shake off the sickening thought.@
>If I don't do something, I'm going to be stuck in there...\
mov %genmogaku,0
sub %stack,1
return



*iso_a5

add %stack,1
>Luka is being slowly dragged towards the Sea Anemone Girl's mouth!\
if %kousan=2 skip 4
name $name
>Now... Get ready.\
name ""
skillname "Mouth Draw"
dwave 1,"se\ero_name2.ogg"
>The lower half of Luka's body is pulled into her mouth!\
lsp 700,":a;chara\iso_h1.bmp",0,0
lsp 690,":a;chara\iso_ct01.bmp",0,0:print 10,500
mov %kousoku,3
skillname ""
name "Luka"
>Aaaaa!!\
name ""
>The soft interior of her body quickly shrinks around me.@
>Tightly wrapped in her mouth, the walls start to wriggle and move around me.\
name $name
>Just sit there and let me make you feel good...\
name ""
skillcount1 3116
skillname "Semen Squeeze Movement"
dwave 1,"se\ero_name2.ogg"
>The walls of the Sea Anemone Girl's mouth start to move, forcing a strange pleasure into Luka!
mov %damage_kotei,1
damage 32,38
skillname ""
if %mylife=0 sub %stack,1:return *iso_h4
sub %stack,1
goto *iso_a6



*iso_a6

add %stack,1
skillcount1 3116
>The lower half of Luka's body is held in the Sea Anemone Girl's mouth!\
rnd2 %ransu,1,10
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Does it feel good inside my mouth?":mov $sel2,"The wriggling walls of the Sea Anemone Girl give a strange pleasure to Luka!"
if %ransu=2 mov $sel1,"Hahaha...":mov $sel2,"Her mouth squeezes around Luka!"
if %ransu=3 mov $sel1,"I'll play with your penis...":mov $sel2,"The walls of her mouth wriggle around, stimulating Luka's penis!"
if %ransu=4 mov $sel1,"It feels incredible inside my mouth, doesn't it?":mov $sel2,"Stuck in her mouth, Luka is attacked by pleasure!"
if %ransu=5 mov $sel1,"I'll squeeze out all your semen just like this...":mov $sel2,"Stuck in her mouth, the walls wriggle around Luka's penis!"
if %ransu=6 mov $sel1,"It's like being in heaven, isn't it? Hahaha.":mov $sel2,"The mouth narrows around Luka, forcing the walls of her mouth against Luka!"
if %ransu=7 mov $sel1,"Can you endure it when I do this?":mov $sel2,"Stuck in her mouth, Luka's penis is violently rubbed!"
if %ransu=8 mov $sel1,"I'll make it even better...":mov $sel2,"Luka's penis is forced to rub against the wall of her mouth!"
if %ransu=9 mov $sel1,"How's this...?":mov $sel2,"With Luka's penis stuck against the mouth of her wall, the wriggling wall forces pleasure into him!"
if %ransu=10 mov $sel1,"I'll give you a man's happiness...":mov $sel2,"The slimy walls force pleasure into Luka!"
name $name
eng $sel1:$sel6\
name ""
skillname "Semen Squeeze Movement"
dwave 1,"se\ero_name2.ogg"
eng $sel2:$sel6
mov %damage_kotei,1
damage 32,38
skillname ""
if %mylife=0 sub %stack,1:return *iso_h4
sub %stack,1
goto *iso_a6



*iso_onedari

mov $list1,"Tentacle Penis Caress"
if %3113>0 mov %list_num1,1
mov $list2,"Full-Body Tentacle Caress"
if %3114>0 mov %list_num2,1
mov $list3,"Tentacle Trance"
if %3115>0 mov %list_num3,1
mov $list4,"Semen Squeeze Movement"
if %3116>0 mov %list_num4,1
mov $list5,"Predation"
if %3117>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *iso_onedari1
if %cmd1=12 goto *iso_onedari2
if %cmd1=13 goto *iso_onedari3
if %cmd1=14 goto *iso_onedari4
if %cmd1=15 goto *iso_onedari5
if %cmd1=-1 goto *iso_main
goto *iso_onedari



*iso_onedari1

gosub *onedari_syori_k
name $name
>You want me to play with your penis with my tentacles?@
>Making such a request... What a cute boy.\
name ""
gosub *iso_a1
skip -1



*iso_onedari2

gosub *onedari_syori_k
name $name
>You want me to play with your whole body with my tentacles?@
>Making such a request... What a cute boy.\
name ""
gosub *iso_a2
skip -1



*iso_onedari3

gosub *onedari_syori_k
name $name
>You want me to defeat you while in a trance?@
>Making such a request... What a cute boy.\
name ""
gosub *iso_a3
skip -1



*iso_onedari4

gosub *onedari_syori_k
name $name
>Haha... You want to be squeezed in my mouth?@
>Unable to resist yourself after seeing this mouth... What a cute boy.\
name ""
gosub *iso_a5



*iso_onedari5

gosub *onedari_syori_k
skillcount1 3117
name $name
>You want me to eat you?@
>Haha... Good boy.\
>Then, let me drag you in...@
>I'll take my time to eat you with this mouth...\
name ""
name "Luka"
>..............\
name ""
>I surrender to the desire of being eaten.@
>Slowly pulled towards her mouth, I'm filled with a ruinous expectation.\
mov %viclose,2:gosub *lose
mov %2535,%2535+1:if %2535=1 mov %count_koenemy,%count_koenemy+1
if %2535>%count_most mov %count_most,%2535:mov $count_mostname,$name
mov $bad1," Luka allowed the Sea Anemone Girl to eat him."
mov $bad2,""
count 33,11
mov %kousan,4
goto *iso_h



*iso_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\iso_bk03.bmp",0,0
gosub *syasei2
>Luka, unable to resist the Sea Anemone Girl's tentacles, finally ejaculates.\
mov %viclose,1:gosub *lose
mov %2535,%2535+1:if %2535=1 mov %count_koenemy,%count_koenemy+1
if %2535>%count_most mov %count_most,%2535:mov $count_mostname,$name
count 10,11
mov $bad1,"Luka succumbed to the Sea Anemone Girl's tentacle caress."
if %status=1 mov $bad1,"Stuck in a trance, Luka succumbed to the Sea Anemone Girl's tentacle caress."
mov $bad2," Dragged into her mouth, Luka was eaten."
gosub *face2
name $name
>Haha... I squeezed it out with my tentacle.@
>Next time I'll squeeze it out with this mouth...\
name ""
goto *iso_h



*iso_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\iso_bk03.bmp",0,0
lsp 694,":a;chara\iso_bk04.bmp",0,0
gosub *syasei2
>Luka, unable to resist the Sea Anemone Girl's tentacles, finally ejaculates.\
mov %viclose,1:gosub *lose
mov %2535,%2535+1:if %2535=1 mov %count_koenemy,%count_koenemy+1
if %2535>%count_most mov %count_most,%2535:mov $count_mostname,$name
count 10,11
mov $bad1,"Luka succumbed to the Sea Anemone Girl's full-body tentacle caress."
if %status=1 mov $bad1,"While in a trance, Luka succumbed to the Sea Anemone Girl's full-body tentacle caress."
mov $bad2," Dragged into her mouth, Luka was eaten."
gosub *face2
name $name
>Haha... You came by having your body rubbed with my tentacle.@
>Next time I'll squeeze it out with this mouth...\
name ""
goto *iso_h



*iso_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\iso_bk03.bmp",0,0
gosub *syasei2
>Stuck in a trance, the sweet ecstasy forces Luka to come.\
mov %viclose,1:gosub *lose
mov %2535,%2535+1:if %2535=1 mov %count_koenemy,%count_koenemy+1
if %2535>%count_most mov %count_most,%2535:mov $count_mostname,$name
count 10,11
mov $bad1,"Luka succumbs to the Sea Anemone Girl's tentacle trance."
mov $bad2," Dragged into her mouth, Luka was eaten."
gosub *face2
name $name
>Haha... Coming while stuck in a trance...@
>Next time I'll squeeze it out with this mouth...\
name ""
goto *iso_h



*iso_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\iso_h2.bmp",0,0
lsp 690,":a;chara\iso_ct02.bmp",0,0
gosub *syasei2
>Luka is unable to endure the pleasure forced into him by the wriggling mouth of the Sea Anemone Girl!\
mov %viclose,1:gosub *lose
mov %2535,%2535+1:if %2535=1 mov %count_koenemy,%count_koenemy+1
if %2535>%count_most mov %count_most,%2535:mov $count_mostname,$name
count 2,11
mov $bad1,"Luka was forced to come, stuck inside the Sea Anemone Girl's mouth."
mov $bad2," Dragged into her mouth, Luka was eaten."
name $name
>My mouth is amazing, isn't it?@
>I'll squeeze even more of your delicious semen out...\
name ""
goto *iso_h



*iso_h

if %2535=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>2 mov %hseanwave,21:hseanwave:goto *iso_hb
name "Luka"
if %kousan<4 mov $sel1,"S...Stop! Uwaa!"
if %kousan=4 mov $sel1,"Auuu..."
eng $sel1:$sel6\
name ""
>The Sea Anemone Girl's mouth was right before my eyes...@
>It excitedly opens and closes, and I can see the pink flesh inside of it...\
>The walls of her mouth wriggle and move around, as if covered in worms.\
>Unconsciously, I feel the desire to be held in there rise up in me.@
>My entire body being held in there... What would it feel like?\
name "Luka"
>Aaaaa!\
name ""
mov %hseanwave,21:hseanwave
cspl 690,699
lsp 700,":a;chara\iso_h2.bmp",0,0:print 10,500
>Finally pulled in, she forces the entire lower half of my body inside her mouth.\
goto *iso_hb



*iso_hb

name "Luka"
>Aaaa!!\
name ""
>The soft walls inside of her start to close around me.@
>Tightly wrapped up, the walls of her mouth wriggle around me.\
name "Luka"
>Auu... Too good...\
name ""
name $name
>Hahaha... Doesn't it feel good inside of my mouth?\
name ""
lsp 700,":a;chara\iso_h3.bmp",0,0:print 10,500
>The mouth sucks me further inside, until I'm wrapped up to my shoulders.@
>With the majority of my body now stuck inside her mouth, a strange pleasure starts to attack me.\
lsp 690,":a;chara\iso_ct01.bmp",0,0:print 10,500
>The mucus covered wall of the Sea Anemone Girl's mouth wraps around my penis.\
>It starts to wriggle around in a bizarre way, giving a strange stimulation to my penis.\
name "Luka"
>Auu...@> Don't do that...\
name ""
>As the pleasure increases, so does my disgust.\
>Stuck inside this organ that squeezes semen out as food...@
>Wrapped up from my shoulders to my feet, she's only giving me pleasure so that she can eat my semen...\
>The pathetic feeling of just being milked for food fills me with humiliation.\
name "Luka"
>Auu... Aaa...\
name ""
>The immorality of the situation gives me a sick pleasure.@
>I try with all of my might to endure the rising desire to ejaculate.\
>As if able to see my frame of mind, the Sea Anemone Girl starts to laugh.\
name $name
>Haha... You have no choice but to feel good inside my mouth.@
>After I wring out as much as I want, I'll eat you...\
name ""
>The soft walls rub all over me as she laughs.@
>The flesh wrapped around my penis begins to move side to side as well.\
>A sweet pleasure goes through my waist and up my body.@
>Even though I know my death was inevitable, I still try to endure the rising desire.\
name "Luka"
>Stop... I'm going to come...\
name ""
>This organ of hers forces her prey to come against their will...@
>Once she pulled me in here, there was no escape...\
>While awash in the pleasure she's forcing into me, I finally realize that.@
>Like a mouse caught by a snake, there's no way out now...\
name "Luka"
>Auu... I'm coming...\
name ""
name $name
>That's good... Just shoot it out like that...@
>While I slowly eat you, let out as much as you want...\
name ""
name "Luka"
>Haaa...\
name ""
>Even if my mind refuses, my body can't.@
>My waist thrusts forward, as if seeking more pleasure.\
>Even if my mind is screaming in terror, my body is rejoicing in this sick pleasure.\
>Even though this ecstasy will only lead to ruin, I can't help but give in to the building desire to release.\
name "Luka"
>Aa... Coming...@>Ahh!\
name ""
gosub *syasei1
lsp 700,":a;chara\iso_h4.bmp",0,0
lsp 690,":a;chara\iso_ct02.bmp",0,0
gosub *syasei2
>Unable to endure any longer, I shoot my semen out into her.@
>Finally giving in to desire, my spirit breaks.\
name "Luka"
>Ahh... I came...\
name ""
>All the power I had left drains out of me as the humiliation mixes with pleasure.\
name ""
name $name
>Haha... You let out a lot.@
>But I want more... I'll squeeze you to the last drop.\
name ""
name "Luka"
>Aaaa...\
name ""
>The Sea Anemone Girl shrinks even tighter around my body.@
>As her mouth contracts, so does the mucus covered wall that had wrapped around my penis.\
>My body writhes as the stimulation only increases after I just ejaculated.\
>But my body is held so tightly in her mouth that my writhing has no effect.\
>Unable to move and escape the stimulation, I have no choice but to endure the agonizing pleasure.\
name $name
>I can move my mouth even more...@
>It will feel even better... Hahaha.\
name ""
name "Luka"
>Ahh!\
name ""
>As she laughs, she starts to quickly wriggle her mouth around.@
>I'm unable to focus on anything but the overpowering feeling being forced into my penis.\
>This mouth evolved to give the maximum pleasure possible to a man...@
>There's no way I can endure this...\
name $name
>You didn't know that a sea anemone could feel this good, did you?@
>I'll let you enjoy it even more... Hahaha.\
name ""
>Wrapped, massaged, tightened, stroked...@
>With the lower half of my body trapped in her mouth, the overpowering pleasure explodes through me with every movement.\
>I let out a pathetic moan as my penis starts to twitch.@
>Even though I know my semen is just going to be more of her food, I can't resist it.\
name "Luka"
>Aaa... I'm coming again...\
name ""
name $name
>Let it out.@
>Let out all your nourishment right into my mouth...\
name ""
>The flesh wrapped around my penis begins to push down on me as if it was chewing.@
>That new stimulation destroys the last of my resistance.\
>Giving in to that chewing stimulation, I ascend to heaven.\
name "Luka"
>Aahhhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\iso_h5.bmp",0,0
lsp 690,":a;chara\iso_ct03.bmp",0,0
gosub *syasei2
>As my penis is chewed on by her mouth, I explode inside of her again.\
name $name
>Haha... It's not over yet...@
>I want to squeeze more...\
name ""
>The wriggling inside her mouth doesn't stop even as I ejaculate.@
>I shake my head pitifully as I'm unable to stop her.\
name "Luka"
>Faaa... Stop...@
>I don't want this... Aahhh...\
name ""
>Ignoring me, her movements continue.@
>This mouth that's only purpose is to pleasure and eat her prey... She won't let me go.\
>Now that I've been caught, I have no choice but to feed her until she's satisfied...\
name $name
>Does it feel good?@> Is it unbearable?\
>Just give me more of your semen... As you're stuck there completely helpless.@>Hahaha!\
name ""
name "Luka"
>Faaa!!\
name ""
gosub *syasei1
lsp 690,":a;chara\iso_ct04.bmp",0,0
gosub *syasei2
>While being chewed on by her soft walls, I shoot more semen out into her.@
>But I don't even have the luxury of enjoying my orgasm.\
>Even as I come, the merciless stimulation from her never stops.\
name $name
>More... There must be some left, right?@
>Give everything to my mouth...\
name ""
>The stimulation continues without mercy.@
>Until there's nothing left, I know she'll never stop...\
name "Luka"
>Ahhh!@>No more... Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
name $name
>Haha... Is it almost time?@
>That all of our extract is squeezed out...\
name ""
name "Luka"
>Aiee!@>Ahh!\
name ""
gosub *syasei1:gosub *syasei2
>After that, I was forced to come over and over.@
>Until finally, I orgasm and nothing comes out.\
name "Luka"
>Fa...a...\
name ""
name $name
>I guess you're empty now...@
>Finally... I'll get to enjoy eating you.\
name ""
name "Luka"
>Aieee!\
name ""
if %hosyoku_cut=1 goto *hosyoku_cut
>The horrifying moment has finally arrived...@
>The Sea Anemone Girl starts to draw the rest of my body into her mouth.\
>Slowly being pulled deeper into her, only my face remains outisde...\
>With just my face pitifully looking out of her mouth, she stares right at me.\
name $name
>It will feel good inside of me, so enjoy it to your last moment.@
>Your life is just going to be my nourishment, so enjoy your last moments.\
>...Goodbye.\
name ""
name "Luka"
>Help!@>Someone help me...!\
name ""
>Her mouth sucks on me one final time as my head is pulled into her.\
mov %hseanwave,22:hseanwave
csp 690
lsp 700,":a;chara\iso_h6.bmp",0,0:print 10,500
>My entire body is now stuck in her mouth, as the soft walls start to close in on me.\
lsp 690,":a;chara\iso_ctb01.bmp",0,0:print 10,500
name "Luka"
>No! Stop! Help!\
name ""
>I tremble in horror and fear as I'm being pushed deeper into her body.@
>The digestive organ wrapping around me starts to wriggle.\
>The walls start to move back and forth, as if they were chewing me.\
name "Luka"
>Haaa... Stop!\
name ""
>But for some reason, my fear starts to slowly fade...@
>As if trying to console me, the soft movement of her digestive organ seems to calm me down.\
>She must be forcing something into my body, to prevent her prey from struggling while swallowed whole...\
>This must be another horrible function of a monster's digestive system...\
name "Luka"
>Aaa...\
name ""
lsp 690,":a;chara\iso_ctb02.bmp",0,0:print 10,500
>As more of my body is covered in her digestive organ, more of my fear goes away.\
>I start to slowly relax and give in to the pleasure of being digested.\
>The feeling from my penis as the soft fleshy walls wrap around me is intense, too.\
>The soft chewing movement of her organ forces even more pleasure into me.\
name "Luka"
>Faaa...@>That feels good...\
name ""
gosub *syasei1:gosub *syasei2
>The unexpected pleasure forces me to come.@
>Even though I was empty just a moment ago, a tiny amount leaks out of me.\
name "Luka"
>Faa...\
name ""
>My moan included nothing but pleasure.\
lsp 690,":a;chara\iso_ctb03.bmp",0,0:print 10,500
>Her organ covers more of my body, covering me with even more of her digestive juices.\
>She contracts her walls tighter around me, as more and more of my body is covered.\
>Drunk on the pleasure, I don't even try to resist.\
>My fear now completely gone, I can't feel anything but the ecstasy forced into my body.\
>It's as if my life is being dissolved in pleasure.\
name "Luka"
>Faaa!\
name ""
>While my body is dissolving and being digested, my mind is rejoicing at the pleasure.\
>With a final contraction, my entire body is finally crushed in her digestive organ.\
lsp 690,":a;chara\iso_ctb04.bmp",0,0:print 10,500
name "Luka"
>Aaa...\
name ""
>Finally, my body and mind dissolve away.@
>I've been made into nothing but her nourishment...\
gosub *anten
mov %hseanwave,0:hseanwave
>.............\
goto *badend



*ankou_start

mov $name,"Anglerfish Girl"
mov $name2,"Anglerfish Girl"
mov $lavel,"ankou"
mov $tatie1,"ankou_st01"
mov $tatie2,"ankou_st01"
mov $tatie3,"ankou_st01"
mov $tatie4,"ankou_st01"
mov $haikei,"bg052"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,270
if %nanido=2 mov %max_enemylife,405
if %nanido=3 mov %max_enemylife,600
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,99
mov %music,1
gosub *maxmp:mov %mp,1
mov %tikei,0
gosub *syutugen
mov $mogaku_anno1,"Luka can't escape from the Anglerfish Girl's soft flesh!"
mov $mogaku_anno2,"Luka broke free of the Anglerfish Girl!"
mov $mogaku_anno3,"Luka isn't able to attack in this position!"
mov $mogaku_sel1,""
mov $mogaku_sel2,""
mov $mogaku_sel3,""
mov $mogaku_sel4,""
mov $mogaku_sel5,""
mov $mogaku_dassyutu1,""
mov $mogaku_dassyutu2,""
mov %end_n,4
mov %exp_minus,2550
mov %zmonster_x,-250
name $name
>.............\
name ""
>The Anglerfish Girl slowly swims toward me.@
>Moving very slowly through the water, it seems like she's barely aware of what's happening around her.\
lsp 700,":a;chara\alice_st01b.bmp",-120,0
lsp 701,":a;chara\ankou_st01.bmp",160,0:print 10,500
name "Alice"
>This is a monster who lives on the sea floor...@
>It lures in prey by the light at the top of her head.\
>Whether her prey is a man or something else, she absorbs it through her skin and makes it her food.\
name ""
name "Luka"
>That...@>Wait, aren't you going to run away like usual, Alice?\
name ""
name "Alice"
>Since she lives at the bottom of the sea, she's blind.@
>So there's no reason for me to hide.\
name ""
>While saying that, Alice slowly backs away.@
>And leaves a final message.\
name "Alice"
>...I'll give you a hint.@
>She locates her prey by temperature.\
>If you want to fight her, you'll need to make your body temperature the same as the water.\
name ""
csp 700:print 10,500
name "Luka"
>I'm not cold blooded!@>I'm a human!\
name ""
>Just like with the Sea Anemone Girl, more useless hints!\
csp 701
lsp 700,":a;chara\ankou_st01.bmp",0,0:print 10,500
name $name
>...........\
name ""
>The Anglerfish Girl approaches with an expressionless face.\
>Surprisingly, it's as if she's moving in slow motion.@
>I just need to wait for her to get closer...\
>Hopefully I can end this without any trouble...\
mov %sinkou,1
mov %hanyo6,1
goto *common_main



*ankou_v

gosub *face3
name $name
>............\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Anglerfish Girl turns into a normal anglerfish!\
mov %viclose,1:gosub *victory
mov %getexp,950:gosub *lvup
mov %2236,1
goto *sean0105



*ankou_kousan

gosub *kousan_syori
>Luka surrenders to temptation, and ends his resistance!\
gosub *face2
name $name
>.........\
name ""
goto *ankou_a



*ankou_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 && %nanido=0 goto *common_attack
if %cmd1=11 && %sinkou=1 goto *ankou_attack1
if %cmd1=11 && %sinkou=2 goto *ankou_attacklist
if %cmd1=11 && %sinkou=3 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *ankou_kousan
if %cmd1=16 goto *ankou_onedari
if %cmd1=17 && %nanido=0 goto *common_skill
if %cmd1=17 goto *ankou_skill
goto *ankou_main



*ankou_attack1

mov %before_action,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ha!"
if %ransu=2 mov $sel1,"Hya!"
if %ransu=3 mov $sel1,"Oh yeah!"
name "Luka"
eng $sel1:$sel6\
name ""
mov %skill_sub,1
gosub *common_attack2
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\slash2.ogg"
delay 90
>A strange feeling runs through Luka's arms as he thrusts his sword into the Anglerfish Girl!\
>As if thrusting into some type of gelatin, his attack has no effect!\
name $name
>............\
name ""
>Luka's hand sinks into the Anglerfish Girl's soft skin!\
name "Luka"
>Uwa!\
name ""
>I quickly pull my sword out of her as fast as I can.@
>I don't really get it, but her body is really dangerous...\
>It also looks like that attack didn't hurt her at all...\
mov %sinkou,2
goto *ankou_a



*ankou_attacklist

>Attacking from the front doesn't seem to work...@
>I guess I'll try to attack from the...\
mov $hanlist1,"Front"
mov $hanlist2,"Back"
gosub *cmd_hanyo
if %cmd1=11 goto *ankou_attack2
if %cmd1=12 goto *ankou_attack3
if %cmd1=-1 goto *ankou_main
skip -4



*ankou_attack2

mov %before_action,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ha!"
if %ransu=2 mov $sel1,"Hya!"
if %ransu=3 mov $sel1,"Oh yeah!"
name "Luka"
eng $sel1:$sel6\
name ""
mov %skill_sub,1
gosub *common_attack2
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\slash2.ogg"
delay 90
>Luka's hand sinks into the Anglerfish Girl's soft skin!@
>I quickly pull my sword out of her as fast as I can.\
name $name
>..........\
name ""
name "Luka"
>Guh... It's useless after all...\
name ""
>It's not only ineffective to attack from the front, it's also dangerous.\
goto *ankou_a



*ankou_attack3

name "Luka"
>If the front is no good, I wonder how the back is!?\
name ""
>I quickly swim around the Anglerfish Girl to her back!\
mov %before_action,-3
gosub *common_attack1
if %enemylife=0 goto *ankou_v
name "Luka"
>Alright!\
name ""
>It looks like I can hit her from the back!\
mov %sinkou,3
goto *ankou_a



*ankou_skill

gosub *cmd_skill
if %cmd1=21 goto *ankou_skillx1
if %cmd1=22 goto *skill2
if %cmd1=23 goto *ankou_skillx1
if %cmd1=24 goto *skill4
if %cmd1=35 goto *skill17
if %cmd1=-1 goto *ankou_main
goto *ankou_skill



*ankou_skillx1

if %cmd1=21 mov %skill_sub,1:gosub *skill1:skip 2
if %cmd1=23 mov %skill_sub,1:gosub *skill3
mov %skill_sub,0
dwave 1,"se\slash2.ogg"
>But Luka's sword sinks into the soft skin of the Anglerfish Girl!\
name "Luka"
>Uwa!\
name ""
>I pull out my sword in a panic and swim away.\
name "Luka"
>My skills don't work?\
name ""
if %sinkou<3 goto *ankou_a
>I don't think I'd be able to swim around her and use a skill at the same time, either.\
>It looks like it would be safest if I didn't use skills in this fight...\
goto *ankou_a



*ankou_a

if %kousoku=1 gosub *ankou_a4:goto *common_main
if %kousoku=2 gosub *ankou_a5:goto *common_main
if %kousoku=3 gosub *ankou_a6:goto *common_main
if %hanyo6=1 gosub *ankou_a1:goto *common_main
if %hanyo6=2 gosub *ankou_a2:goto *common_main
if %hanyo6=3 gosub *ankou_a3:goto *common_main



*ankou_a1

add %stack,1
name $name
>........\
name ""
skillname "Temperature Sensing"
>The Anglerfish Girl senses Luka's temperature!\
skillname ""
mov %hanyo6,2
sub %stack,1
return



*ankou_a2

add %stack,1
name $name
>.............\
name ""
skillname "Approach"
>The Anglerfish Girl slowly approaches Luka!\
skillname ""
mov %hanyo6,3
sub %stack,1
return



*ankou_a3

add %stack,1
skillcount1 3118
name $name
>...........\
name ""
skillname "Absorb"
dwave 1,"se\ero_name2.ogg"
>The Anglerfish Girl rams her body into Luka!
if %nanido<2 damage 20,23
if %nanido=2 damage 30,34
if %nanido=3 damage 44,48
lsp 690,":a;chara\ankou_cta01.bmp",0,0
mov %kousoku,1:gosub *status_print
mov %hanyo6,1
>Luka's body sinks into the Anglerfish Girl's skin!\
skillname ""
if %mylife=0 sub %stack,1:return *ankou_h1
if %first_sel1=1 skip 6
name "Luka"
>Uwaaa!\
name ""
>My body sinks into the soft flesh of the Anglerfish Girl.@
>It's as if I'm sinking into a giant bowl of warm jelly.\
if %kousan>0 sub %stack,1:return
if %first_sel1=1 skip 4
>I can't pull myself out this time, either.@
>Instead, I'm being pulled deeper into her.\
>At this rate, my entire body is going to sink into her...\
if %nanido<2 mov %genmogaku,2
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,2
sub %stack,1
return



*ankou_a4

add %stack,1
skillcount1 3118
>Luka's slowly being absorbed by the Anglerfish Girl!\
name $name
>.............\
name ""
skillname "Absorb"
dwave 1,"se\ero_name2.ogg"
>Luka's body sinks deeper into the Anglerfish Girl!
if %nanido<2 damage 20,23
if %nanido=2 damage 30,34
if %nanido=3 damage 44,48
mov %kousoku,2
skillname ""
if %mylife=0 sub %stack,1:return *ankou_h1
if %first_sel1=1 sub %stack,1:return
name "Luka"
>Auuu!\
name ""
>Both of my feet sink into her soft skin.@
>The soft, warm feeling of her skin covering mine gives a strange sense of relief to the parts of my body inside of her.\
name "Luka"
>Aiee!\
name ""
>Slowly sinking in, the strange feeling is filling more of my body.@
>This odd feeling fills me with a deep disgust.\
if %kousan>0 sub %stack,1:return
>I have to escape quickly!\
sub %stack,1
return



*ankou_a5

add %stack,1
skillcount1 3118
>Luka's slowly being absorbed by the Anglerfish Girl!\
name $name
>..............\
name ""
skillname "Absorb"
dwave 1,"se\ero_name2.ogg"
>Luka's body sinks deeper into the Anglerfish Girl!
if %nanido<2 damage 20,23
if %nanido=2 damage 30,34
if %nanido=3 damage 44,48
mov %kousoku,3
skillname ""
if %mylife=0 sub %stack,1:return *ankou_h1
if %first_sel1=1 sub %stack,1:return
name "Luka"
>Urhg...\
name ""
>The lower half of my body is now inside of her.@
>The strange feeling of relief flows through the lower half of my body, stuck inside of her!\
>It's as if my lower body is dissolving in her already...\
if %kousan>0 sub %stack,1:return
name "Luka"
>No way... Is she already absorbing my body...?\
name ""
>My body will dissolve and be absorbed into hers...@
>I can't let that happen! I have to break free!\
mov %first_sel1,1
sub %stack,1
return



*ankou_a6

add %stack,1
skillcount1 3118
>Luka's slowly being absorbed by the Anglerfish Girl!\
name $name
>.............\
name ""
skillname "Absorb"
dwave 1,"se\ero_name2.ogg"
lsp 690,":a;chara\ankou_cta02.bmp",0,0:print 10,500
>Luka's body sinks deeper into the Anglerfish Girl!
mov %damage_kotei,1
damage 40,42
mov %kousoku,4:mov %genmogaku,100
skillname ""
if %mylife=0 sub %stack,1:return *ankou_h1
name "Luka"
>Aaaa!\
name ""
>Everything up to my neck has been absorbed into her body...@
>It's not possible to escape anymore!\
>Even my penis is inside of her body, as the soft flesh completely surrounds my body.\
dwave 1,"se\ero_name2.ogg"
>The jelly like flesh moves around Luka's penis as more of his body sinks into her!
mov %damage_kotei,1
damage 40,42
skillname ""
if %mylife=0 sub %stack,1:return *ankou_h2
dwave 1,"se\ero_name2.ogg"
>The warm flesh softly moves around Luka's penis!
mov %damage_kotei,1
damage 40,42
skillname ""
if %mylife=0 sub %stack,1:return *ankou_h2
dwave 1,"se\ero_name2.ogg"
>Luka's penis is stimulated as I sink deeper!
mov %damage_kotei,1
damage 40,42
skillname ""
sub %stack,1
return *ankou_h2



*ankou_onedari

mov $list1,"Absorb"
if %3118>0 mov %list_num1,1
gosub *cmd_onedari
if %cmd1=11 goto *ankou_onedari1
if %cmd1=-1 goto *ankou_main
goto *ankou_onedari



*ankou_onedari1

gosub *onedari_syori_k
if %kousoku=0 gosub *ankou_a3
if %kousoku=1 gosub *ankou_a4
if %kousoku=2 gosub *ankou_a5
gosub *ankou_a6



*ankou_h1

name "Luka"
>Urgh... No good...\
name ""
>Too much of my body has been absorbed... There's no fighting back any more.\
lsp 690,":a;chara\ankou_cta02.bmp",0,0:print 10,500
>Stuck inside of her flesh, my body continues to be slowly absorbed by her.\
mov %viclose,2:gosub *lose
mov %2536,%2536+1:if %2536=1 mov %count_koenemy,%count_koenemy+1
if %2536>%count_most mov %count_most,%2536:mov $count_mostname,$name
count 33,11
mov $bad1," Sinking into the Anglerfish Girl, Luka was unable to escape."
mov $bad2," After that, Luka was absorbed by the Anglerfish Girl and assimilated into her body."
name $name
>............\
name ""
>With an expressionless face, she continues to passively absorb my body into hers.\
goto *ankou_h



*ankou_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\ankou_cta03.bmp",0,0
gosub *syasei2
>The feeling of her soft flesh around Luka's penis was too much to endure, as he ejaculates inside of her body!\
mov %viclose,1:gosub *lose
mov %2536,%2536+1:if %2536=1 mov %count_koenemy,%count_koenemy+1
if %2536>%count_most mov %count_most,%2536:mov $count_mostname,$name
count 33,11
mov $bad1,"Luka succumbs to the pleasure attacking his penis inside of her body."
mov $bad2," After that, Luka was absorbed by the Anglerfish Girl and assimilated into her body."
name $name
>.............\
name ""
goto *ankou_h



*ankou_h

if %2536=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
lsp 690,":a;chara\ankou_cta03.bmp",0,0:print 10,500
>My body is absorbed all the way up to my neck.@
>Completely stuck in this strange organ... What's going to happen next?\
mov %hseanwave,21:hseanwave
lsp 690,":a;chara\ankou_ctb01.bmp",0,0:print 10,500
name "Luka"
>Aaa...\
name ""
>Bizarre fleshy tentacles reach out and start to cover the exposed areas of my body.\
>Her weird body seems to be fusing with mine.\
name "Luka"
>Uaaaa!\
name ""
>Even if I struggle, my hands and feet are both already inside of her.@
>In addition, my penis is already stuck inside of her flesh.\
name "Luka"
>Auu... Stop it...\
name ""
>The jelly-like flesh moves and turns around my penis as I struggle helplessly.\
>The movements force more pleasure into me as I pitifully struggle.\
>The feeling of being completely wrapped up inside of her gives a feeling too good to endure.\
name "Luka"
>Faaa! I'm going to come...!\
name ""
>The feeling of her soft flesh around me is too much, as the overpowering desire to ejaculate rises through my waist.\
>Unable to endure any longer, I explode inside of her.\
gosub *syasei1
lsp 690,":a;chara\ankou_ctb02.bmp",0,0
gosub *syasei2
name "Luka"
>Faaa...\
name ""
>The unexpected pleasure inside of her forces me to come.@
>Having my entire body violated like this, I feel miserable.\
>The strength I had left fades as the lingering feelings from the orgasm mix with the humiliation.\
>The flesh that's enveloping my body continues to gently wrap around my body.\
if %hosyoku_cut=1 goto *hosyoku_cut
>Then I notice a strange sensation.@
>My skin starts to slowly dissolve and mix with hers, fusing me to her body.\
name "Luka"
>Is this... Her absorbing me...?\
name ""
>I twist my body in a panic, but I'm already too attached to her skin to move.\
>The sticky feeling covering my body... I've already started to be united with her.\
>It doesn't feel bad though...@
>As more of my body fuses with hers, a sweet sensation washes over my body.\
>Before I had noticed, it was already too late.\
name "Luka"
>Aaa...\
name ""
mov %hseanwave,22:hseanwave
>My penis is also beginning to fuse with her body.@
>The feeling of uniting with her is too much for my mind to take.\
name "Luka"
>Aaa.. Incredible... Ahhh...\
name ""
gosub *syasei1
lsp 690,":a;chara\ankou_ctb03.bmp",0,0
gosub *syasei2
>Semen gushes out of me as more of my body fuses with hers.\
name "Luka"
>Aiee!@>Ahhh!\
name ""
>Her body continues to cover more of the exposed areas of mine as the melting sensation spreads.\
name "Luka"
>Aaa...\
name ""
gosub *syasei1
lsp 690,":a;chara\ankou_ctb04.bmp",0,0
gosub *syasei2
>I ejaculate a final time as my waist finally fuses with her body.@
>The only feeling I can feel from my lower body is just a lingering sweet pleasure.\
name "Luka"
>A...a...a...\
name ""
>I feel more and more of myself absorbed into her.@
>But I can't break free of the intoxication.\
>Feeling neither fear nor horror, I just feel at peace as the rest of my being is absorbed into her.\
name "Luka"
>............\
name ""
>My thoughts begin to fade to nothing as well.@
>Having taken even my mind, my entire essence is absorbed by the Anglerfish Girl.\
gosub *anten
mov %hseanwave,0:hseanwave
>A normal anglerfish absorbs their mate and digests their body, until only their genital remain.\
>Like that, the Anglerfish Girl monster absorbs and digests her prey.@
>Thus, a boy was made into the prey of the Anglerfish Girl...\
>............\
goto *badend



*kraken_start

mov $name,"Kraken"
mov $name2,"Kraken"
mov $lavel,"kraken"
mov $tatie1,"kraken_st01"
mov $tatie2,"kraken_st02"
mov $tatie3,"kraken_st03"
mov $tatie4,"kraken_st11"
mov $haikei,"bg053"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,4700
if %nanido=2 mov %max_enemylife,4700
if %nanido=3 mov %max_enemylife,4700
if %nanido=1 mov %henkahp1,4200
if %nanido=2 mov %henkahp1,4200
if %nanido=3 mov %henkahp1,4200
if %nanido=1 mov %henkahp2,3800
if %nanido=2 mov %henkahp2,3800
if %nanido=3 mov %henkahp2,3800
if %nanido=1 mov %henkahp3,3500
if %nanido=2 mov %henkahp3,3500
if %nanido=3 mov %henkahp3,3500
if %nanido=0 mov %max_enemylife,4
if %nanido=0 mov %henkahp1,3
if %nanido=0 mov %henkahp2,2
if %nanido=0 mov %henkahp3,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,99
mov %music,2
gosub *maxmp:mov %mp,%max_mp
mov %tikei,4
gosub *syutugen2
mov $mogaku_anno1,"Luka can't break free of the Kraken's tentacles!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"Luka is unable to attack like this!"
mov $mogaku_sel1,"I won't let go... Just accept it."
mov $mogaku_sel2,"Shall I deprive you of the strength to struggle?"
mov $mogaku_sel3,"I said I wouldn't let go..."
mov $mogaku_sel4,"Such weak struggling won't break my hold..."
mov $mogaku_sel5,"Useless struggling... Just give up."
mov $mogaku_dassyutu1,"Wow... Able to get away..."
mov $mogaku_dassyutu2,"You don't know when to give up."
mov $half_s1,"Suffer in the disgrace of being forced to ejaculate."
mov $half_s2,"After that, I'll take my time to scold you for your actions..."
mov $kiki_s1,"It's almost time..."
mov $kiki_s2,"I'll squeeze out all of your semen, Hero..."
mov %end_n,4
mov %exp_minus,3500
mov %zmonster_x,-280
name $name
>I will never hand the orb over to a bloodthirsty Hero!@
>A trespasser like you... The Queen shall punish you herself!\
name ""
name "Luka"
>No! I don't want the orb!\
name ""
name $name
>I said silence!\
name ""
>It looks like I can't reason with her.@
>If I don't defend myself, she'll kill me!\
mov %sinkou,1
goto *common_main



*kraken001

name $name
>The Monster Lord entrusted this orb to me... I won't let a Hero take it!\
name ""
name "Luka"
>I said I don't want it!@
>I'm just here to deliver this pledge!\
name ""
gosub *kraken_a3
mov %sinkou,2
goto *common_main



*kraken002

name $name
>You are indeed a Hero... You're quite strong.@
>But the Queen of the southern seas won't be defeated that easily!\
name ""
gosub *kraken_a8
mov %sinkou,3
goto *common_main



*kraken003

mov %hanyo6,0
name $name
>Forcing me to even use this technique...\
name ""
skillname "Aqua Pentagon"
if %effectspeed=2 dwave 1,"se\aqua3.ogg":skip 2
mpegplay "effect\movie03.mpg",0
>The water swirls around in the form of a magical diagram!\
skillname ""
name "Luka"
>What is this!?\
name ""
name $name
>Aqua Pentagon... An absolute defense made out of water.@
>Now, you won't be able to lay a single finger on me.\
name ""
name "Luka"
>Guh... A barrier!\
name ""
mov %sinkou,4
goto *common_main



*kraken_v

if %nanido=0 goto *kraken_v2
name "Luka"
>No way... I can't attack her?\
name ""
>My blade just bounces off that water barrier.@
>Is there any way to get past that barrier...?\
name $name
>Haha... Have you realized that you have no way of winning?@
>Now, to finish you off...\
lsp 701,":a;chara\alice_st01.bmp",800,0
for %move=0 to 240 step 10
amsp 701,800-%move,0
print 1:wait 20
next
>...Oh? Who's there?\
name ""
>A suspicious shadow appears in the corner of my eye.\
skillname "Eyes of Hypnosis"
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
>Alice's eyes shine brightly!\
name "Luka"
>Eh...?@> Alice, what...\
>Guh...\
name ""
mov %status,3:gosub *status_print
>Luka fell asleep!\
skillname ""
for %move=0 to 240 step 10
amsp 701,560+%move,0
print 1:wait 3
next
name $name
>What was that shadow...?@
>Hmm...@> But before I chase them, I'll finish off this boy.\
name ""
skillname "Tentacle Caress"
dwave 1,"se\ero_slime1.ogg"
>The Kraken's tentacle approaches Luka!
wait 500
skillname "Fallen Angel Dance"
dwave 1,"se\bun.ogg"
bg "bg\bg053.bmp",99,700,"system\lngtwave.dll/vwi"
>But Luka quickly dodges it!\
skillname ""
gosub *face3
name $name
>Impossible... Avoiding it while asleep!?\
>And what's with this strange feeling...@
>It's as if he's a different person...\
name ""
>Luka is soundly sleeping.\
name "Luka"
>Zzzzzzzz...@
>Wall...?@> Break!?\
name ""
skillname "Flash Kill"
dwave 3,"se\tuki.ogg"
lsp 2,":c;effect\007.bmp",0,0:print 1
wait 100
csp 2:print 18,300,"system\mask01.jpg"
vspl 3,650,1
csp 0:csp 1
>Luka's blade flashes!@
dwave 1,"se\break.ogg"
>The power tears through time and space, and shatters the barrier!\
skillname ""
name $name
>No way! A physical attack can't break my barrier!@
>Breaking through time and space... How can he do such a thing!?\
name ""
skillname "Daystar"
>A dazzling star falls into hell!\
wait 300
dwave 1,"se\bom3.ogg"
lsp 2,":c;effect\002.bmp",0,0:print 18,1000,"system\mask01.jpg"
flushout 1000
csp 2
bg white,10,1000
bg "bg\bg053.bmp",10,1000
textclear
dwave 1,"se\damage2.ogg"
rnd2 %damage,350,450:mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\damage2.ogg"
rnd2 %damage,350,450:mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\damage2.ogg"
textclear
rnd2 %damage,350,450:mov %damage_nobr,2:gosub *enemylife2
\
skillname ""
name $name
>Guh... What powerful magic!@
>How can a human use such magic!?\
name ""
>The Kraken starts to tremble!\
name "Luka"
>...Mmm...\
name ""
skillname "Ninefold Rakshasa"
wait 500
dwave 1,"se\slash3.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
dwave 2,"se\slash3.ogg"
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
dwave 3,"se\slash3.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
dwave 4,"se\slash3.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
dwave 5,"se\slash3.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
dwave 6,"se\slash3.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
dwave 7,"se\slash3.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
csp 2:print 10,1000
>Luka attacks in a deadly dance!\
dwave 1,"se\slash.ogg"
rnd2 %damage,85,95:mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\slash.ogg"
rnd2 %damage,85,95:mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\slash.ogg"
textclear
rnd2 %damage,85,95:mov %damage_nobr,2:gosub *enemylife2
dwave 1,"se\slash.ogg"
rnd2 %damage,85,95:mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\slash.ogg"
textclear
rnd2 %damage,85,95:mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\slash.ogg"
rnd2 %damage,85,95:mov %damage_nobr,2:gosub *enemylife2
textclear
dwave 1,"se\slash.ogg"
rnd2 %damage,85,95:mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\slash.ogg"
rnd2 %damage,85,95:mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\slash.ogg"
textclear
rnd2 %damage,85,95:mov %damage_nobr,2:gosub *enemylife2
\
skillname ""
name $name
>Impossible... This must be a bad dream!@
>I don't stand a chance!\
name ""
lsp 700,":a;chara\alice_st03.bmp",-60,0
lsp 701,":a;chara\kraken_st01.bmp",160,0:print 10,500
name "Alice"
>...Stop the fight!@
>There's no need to continue!\
name ""
skillname "Eyes of Recovery"
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
lsp 700,":a;chara\alice_st01.bmp",-60,0
csp 2:print 10,300
>Alice's eyes shine brightly!@
>All of Luka's abnormal statuses recover!\
mov %status,0:gosub *status_print
>Luka wakes up!\
skillname ""
name "Luka"
>.......Huh?@>What was I doing...?\
name ""
goto *kraken_v2



*kraken_v2

name $name
>Just what are you...?@
>I have no power to fight back...\
name ""
>The Kraken loses the will to fight!\
mov %viclose,1:gosub *victory
mov %getexp,1500:gosub *lvup
mov %2237,1
goto *sean0106



*kraken_kousan

gosub *kousan_syori
>Luka yields to the temptation, ending his resistance!\
gosub *face2
name $name
>Giving up?@
>I still won't forgive you for trying to take this orb!\
name ""
goto *kraken_a



*kraken_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 && %sinkou<4 goto *common_attack
if %cmd1=11 && %sinkou>3 goto *kraken_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *kraken_kousan
if %cmd1=16 goto *kraken_onedari
if %cmd1=17 && %sinkou<4 goto *common_skill
if %cmd1=17 && %sinkou>3 goto *kraken_skill
goto *kraken_main



*kraken_attack

mov %before_action,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ha!"
if %ransu=2 mov $sel1,"Hya!"
if %ransu=3 mov $sel1,"Take this!"
name "Luka"
eng $sel1:$sel6\
name ""
mov %skill_sub,1
gosub *common_attack2
gosub *mp_kaihuku:gosub *mp
skillname "Absolute Water Defense"
dwave 1,"se\aqua4.ogg"
delay 90
>But the magical barrier of water deflects his attack!\
skillname ""
if %sinkou=5 goto *kraken_v
name "Luka"
>Gah... What is this...?\
name ""
name $name
>This isn't an ordinary barrier.@
>There are only five users of this technique in the world.\
>It manipulates time and space to completely nullify any physical attack.@
>No matter how strong, they cannot break through.\
name ""
name "Luka"
>No way...\
name ""
mov %sinkou,5
goto *kraken_a



*kraken_skill

gosub *cmd_skill
if %cmd1=21 goto *kraken_skillx1
if %cmd1=22 goto *skill2
if %cmd1=23 goto *kraken_skillx1
if %cmd1=24 goto *skill4
if %cmd1=25 goto *kraken_skillx1
if %cmd1=35 goto *skill17
if %cmd1=-1 goto *kraken_main
goto *kraken_skill



*kraken_skillx1

if %cmd1=21 mov %skill_sub,1:gosub *skill1
if %cmd1=23 mov %skill_sub,1:gosub *skill3
if %cmd1=25 mov %skill_sub,1:gosub *skill5
mov %skill_sub,0
skillname "Absolute Water Defense"
dwave 1,"se\aqua4.ogg"
>But the magical barrier of water deflects his attack!\
skillname ""
if %sinkou=5 goto *kraken_v
name "Luka"
>Gah... What is this?\
name ""
name $name
>This isn't an ordinary barrier.@
>There are only five users of this technique in the world.\
>It manipulates time and space to completely nullify any physical attack.@
>No matter how strong, they cannot break through.\
name ""
name "Luka"
>No way...\
name ""
mov %sinkou,5
goto *kraken_a



*kraken_a

if %enemylife<%henkahp1 && %sinkou=1 goto *kraken001
if %enemylife<%henkahp2 && %sinkou=2 goto *kraken002
if %enemylife<%henkahp3 && %sinkou=3 goto *kraken003
if %hanyo6=1 && %bougyo=1 gosub *kraken_a9:goto *common_main
if %hanyo6=1 && %bougyo=0 gosub *kraken_a10:goto *common_main
if %kousoku>2 gosub *kraken_a6:goto *common_main
if %kousoku=0 skip 7
rnd2 %ransu,1,4
add %kousoku,1
if %ransu=1 gosub *kraken_a4:gosub *kraken_a4:goto *common_main
if %ransu=2 gosub *kraken_a4:gosub *kraken_a5:goto *common_main
if %ransu=3 gosub *kraken_a5:gosub *kraken_a4:goto *common_main
if %ransu=4 gosub *kraken_a5:gosub *kraken_a5:goto *common_main
rnd2 %ransu,1,16
if %ransu<4 gosub *kraken_a1:gosub *kraken_a1:goto *common_main
if %ransu<7 gosub *kraken_a1:gosub *kraken_a2:goto *common_main
if %ransu<10 gosub *kraken_a2:gosub *kraken_a1:goto *common_main
if %ransu<13 gosub *kraken_a2:gosub *kraken_a2:goto *common_main
if %ransu>12 && %sinkou=3 && %owaza_count3a>3 gosub *kraken_a8:goto *common_main
skip -6



*kraken_a1

add %stack,1
skillcount1 3119
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll use my tentacles to play with you..."
if %ransu=2 mov $sel1,"Hahaha... Does it feel good?"
if %ransu=3 mov $sel1,"How does it feel to be played with by my tentacles?"
if %ransu=4 mov $sel1,"Your arm, foot, chest, groin... I'll play with everything."
if %ransu=5 mov $sel1,"Haha... I'll make it feel good."
name $name
eng $sel1:$sel6\
name ""
skillname "Tentacle Caress"
dwave 1,"se\ero_slime1.ogg"
>A tentacle shoots out and caresses Luka's body!
if %nanido<2 damage 11,13
if %nanido=2 damage 12,15
if %nanido=3 damage 14,22
skillname ""
if %mylife=0 sub %stack,1:return *kraken_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kraken_a2

add %stack,1
skillcount1 3120
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll play with your weak point..."
if %ransu=2 mov $sel1,"I'll toy with a man's dirty spot..."
if %ransu=3 mov $sel1,"It's alright to moan if it feels too good... Haha."
if %ransu=4 mov $sel1,"Isn't it humiliating to be played with like this?"
if %ransu=5 mov $sel1,"Hahaha... I'll force you to feel good against your will."
name $name
eng $sel1:$sel6\
name ""
skillname "Tentacle Raid"
dwave 1,"se\ero_slime1.ogg"
>Tentacles shoot out and wrap around Luka's penis!
if %nanido<2 damage 12,14
if %nanido=2 damage 14,17
if %nanido=3 damage 16,24
skillname ""
if %mylife=0 sub %stack,1:return *kraken_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kraken_a3

add %stack,1
if %kousan=2 skip 4
name $name
>I'll bind you with my tentacles!\
name ""
skillname "Tentacle Bind"
dwave 1,"se\ero_makituki3.ogg"
>The Kraken's tentacles coil around Luka's body!
if %nanido<2 damage 8,10
if %nanido=2 damage 10,13
if %nanido=3 damage 12,15
mov %kousoku,1:gosub *status_print
>Luka is bound by the Kraken's tentacles!\
skillname ""
if %mylife=0 sub %stack,1:return *kraken_h3
gosub *face2
name $name
>Haha... Are you ready?@
>I'll rape you slowly now...\
name ""
if %nanido<2 mov %genmogaku,2
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,2
sub %stack,1
return



*kraken_a4

add %stack,1
skillcount1 3121
>Luka is bound by the Kraken's tentacles!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Unable to move, how does it feel when I toy with your body?"
if %ransu=2 mov $sel1,"It's useless no matter how you struggle..."
if %ransu=3 mov $sel1,"Haha... Let me stimulate this spot..."
if %ransu=4 mov $sel1,"Isn't it humiliating being played with like this?"
if %ransu=5 mov $sel1,"Let out your pathetic moan... Hahaha."
name $name
eng $sel1:$sel6\
name ""
skillname "Bound Tentacle Caress"
dwave 1,"se\ero_slime1.ogg"
>One of the Kraken's tentacles gently caress Luka's body!
if %nanido<2 damage 10,15
if %nanido=2 damage 12,18
if %nanido=3 damage 15,24
skillname ""
if %mylife=0 sub %stack,1:return *kraken_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kraken_a5

add %stack,1
skillcount1 3122
>Luka is bound by the Kraken's tentacles!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"To get a man's juice, I need to squeeze it like this...":mov $sel2,"One of the Kraken's tentacles wraps around Luka's penis!"
if %ransu=2 mov $sel1,"I'll stimulate your weak point...":mov $sel2,"One of the Kraken's tentacles rubs the back of Luka's penis!"
if %ransu=3 mov $sel1,"Hahaha... Is it too intense? Does it feel good?":mov $sel2,"One of the Kraken's tentacles tightens around Luka's penis!"
if %ransu=4 mov $sel1,"Is it humiliating having your penis toyed with like this?":mov $sel2,"One of the Kraken's tentacles wraps around Luka's penis!"
if %ransu=5 mov $sel1,"More... I'll give violate you even more...":mov $sel2,"One of the Kraken's tentacles forcefully strokes Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Bound Tentacle Raid"
dwave 1,"se\ero_slime1.ogg"
eng $sel2:$sel6
if %nanido<2 damage 11,16
if %nanido=2 damage 14,20
if %nanido=3 damage 18,25
skillname ""
if %mylife=0 sub %stack,1:return *kraken_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kraken_a6

add %stack,1
skillcount1 3123
>Luka is bound by the Kraken's tentacles!\
if %kousan=2 skip 4
name $name
>Now, let me play with this spot too...\
name ""
skillname "Tentacle Smash"
dwave 1,"se\ero_makituki2.ogg"
>The tip of one of the Kraken's tentacles slips into Luka's anus!
damage 70,75
mov %genmogaku,100
skillname ""
if %mylife=0 sub %stack,1:return *kraken_h4
name "Luka"
>Aieeee!\
name ""
name $name
>It's not over... I'll twist my tentacle now...\
name ""
skillcount1 3123
skillname "Tentacle Smash"
dwave 1,"se\ero_makituki2.ogg"
>The tentacle in Luka's anus starts to wriggle!
if %nanido<2 damage 70,75
if %nanido=2 damage 105,112
if %nanido=3 damage 140,150
skillname ""
if %mylife=0 sub %stack,1:return *kraken_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
goto *kraken_a7



*kraken_a7

add %stack,1
>Luka is bound by the Kraken's tentacles!\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Isn't it embarrassing to be toyed with like this?"
if %ransu=2 mov $sel1,"Oh? Does it feel good for your hole to be teased?"
if %ransu=3 mov $sel1,"Violated like a girl... How pathetic."
name $name
eng $sel1:$sel6\
name ""
skillname "Tentacle Smash"
dwave 1,"se\ero_makituki2.ogg"
>A tentacle slips into Luka's anus and wriggles around!
damage 70,75
skillname ""
if %mylife=0 sub %stack,1:return *kraken_h4
sub %stack,1
goto *kraken_a7



*kraken_a8

add %stack,1
name $name
>I'll finish you off with this move...\
name ""
skillname "Targeting"
>The Kraken's tentacles all raise above her head in a ready position!\
skillname ""
name $name
>Prepare yourself, Hero.@
>I'll attack you with all of my tentacles at once...\
name ""
mov %hanyo6,1
sub %stack,1
return



*kraken_a9

add %stack,1
name $name
>Are you ready? Then...!\
name ""
skillname "Tentacle Heaven"
>All of the Kraken's tentacles shoot towards Luka!
delay 1000
dwave 1,"se\miss.ogg"
>But Luka quickly dodges them!\
skillname ""
if %first_sel1=1 skip 9
name "Luka"
>Whew... That was close...\
name ""
name $name
>You avoided it...@
>It looks like I'll have to use that...\
name ""
mov %first_sel1,1
mov %hanyo6,0
mov %owaza_count3a,0
sub %stack,1
return



*kraken_a10

add %stack,1
skillcount1 3124
if %kousan=2 skip 6
gosub *face2
name $name
>Are you ready?@
>Now, agonize over the heaven that all my tentacles can bring!\
name ""
skillname "Tentacle Heaven"
>All of the Kraken's tentacles shoot towards Luka!\
dwave 1,"se\ero_makituki3.ogg"
>The tentacles wrap around Luka's body!
mov %damage_kotei,1
damage 40,50
mov %kousoku,1:gosub *status_print
mov %genmogaku,100
dwave 1,"se\ero_slime1.ogg"
>The tentacles stroke Luka's body all over!
mov %damage_kotei,1
damage 40,50
dwave 1,"se\ero_slime1.ogg"
>The tentacles tighten around Luka's body!
mov %damage_kotei,1
damage 40,50
dwave 1,"se\ero_slime1.ogg"
>A tentacle wraps around Luka's penis!
mov %damage_kotei,1
damage 40,50
dwave 1,"se\ero_slime1.ogg"
>The tentacle wrapped around Luka's penis tightens!
mov %damage_kotei,1
damage 40,50
dwave 1,"se\ero_slime1.ogg"
>The tip of a tentacle rubs the tip of Luka's penis!
mov %damage_kotei,1
damage 40,50
dwave 1,"se\ero_slime1.ogg"
>A tentacle forces itself into Luka's anus!
mov %damage_kotei,1
damage 40,50
dwave 1,"se\ero_slime1.ogg"
>At the same time as the tentacle wriggles around Luka's anus, his penis is stroked!
mov %damage_kotei,1
damage 40,50
dwave 1,"se\ero_slime1.ogg"
>The overwhelming stimulation all over Luka's body forces him to come!
mov %damage_kotei,1
damage 40,50
skillname ""
sub %stack,1
return *kraken_h5



*kraken_onedari

mov $list1,"Tentacle Caress"
if %3119>0 mov %list_num1,1
mov $list2,"Tentacle Raid"
if %3120>0 mov %list_num2,1
mov $list3,"Bound Tentacle Caress"
if %3121>0 mov %list_num3,1
mov $list4,"Bound Tentacle Raid"
if %3122>0 mov %list_num4,1
mov $list5,"Tentacle Smash"
if %3123>0 mov %list_num5,1
mov $list6,"Tentacle Heaven"
if %3124>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *kraken_onedari1
if %cmd1=12 goto *kraken_onedari2
if %cmd1=13 goto *kraken_onedari3
if %cmd1=14 goto *kraken_onedari4
if %cmd1=15 goto *kraken_onedari5
if %cmd1=16 goto *kraken_onedari6
if %cmd1=-1 goto *kraken_main
goto *kraken_onedari



*kraken_onedari1

gosub *onedari_syori
name $name
>You want me to play with your body with my tentacles?@
>Desiring such a thing... Such a shameful Hero.\
name ""
gosub *kraken_a1
skip -1



*kraken_onedari2

gosub *onedari_syori
name $name
>You want me to play with your penis with my tentacles?@
>Desiring such a thing... Such a shameful Hero.\
name ""
gosub *kraken_a2
skip -1



*kraken_onedari3

gosub *onedari_syori_k
name $name
>With your freedom taken. you want me to play with your body with my tentacles?@
>You're quite a perverted Hero... Hahaha.\
name ""
if %kousoku=0 gosub *kraken_a3
gosub *kraken_a4
skip -1



*kraken_onedari4

gosub *onedari_syori_k
name $name
>With your freedom taken. you want me to play with your penis with my tentacles?@
>You're quite a perverted Hero... Hahaha.\
name ""
if %kousoku=0 gosub *kraken_a3
gosub *kraken_a5
skip -1



*kraken_onedari5

gosub *onedari_syori_k
name $name
>You want me to rape your hole with my tentacle...?@
>You're an unexpectedly perverted Hero... Hahaha.\
name ""
if %kousoku=0 gosub *kraken_a3
gosub *kraken_a6



*kraken_onedari6

gosub *onedari_syori
name $name
>You want to take my ultimate attack?@
>Then... While despairing in your own helplessness, I'll force you to come...\
name ""
gosub *kraken_a10



*kraken_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
if %kousoku=0 lsp 693,":a;chara\kraken_bk03.bmp",0,0
if %kousoku=0 lsp 694,":a;chara\kraken_bk04.bmp",0,0
gosub *syasei2
>Luka ejaculates, unable to endure the tentacles playing with his entire body.\
mov %viclose,1:gosub *lose
mov %2537,%2537+1:if %2537=1 mov %count_koenemy,%count_koenemy+1
if %2537>%count_most mov %count_most,%2537:mov $count_mostname,$name
count 10,5
mov $bad1,"Luka succumbs to the tentacles playing with his entire body."
if %kousoku>0 mov $bad1,"While bound, Luka succumbs to the tentacles playing with his entire body."
mov $bad2," Stuck in the undersea temple, Luka's semen was continually squeezed out for the rest of his life."
gosub *face2
name $name
>Shooting out so much of your semen... It must have felt good.\
name ""
goto *kraken_h



*kraken_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
if %kousoku=0 lsp 693,":a;chara\kraken_bk03.bmp",0,0
gosub *syasei2
>Luka ejaculates, unable to endure the tentacles playing with his penis.\
mov %viclose,1:gosub *lose
mov %2537,%2537+1:if %2537=1 mov %count_koenemy,%count_koenemy+1
if %2537>%count_most mov %count_most,%2537:mov $count_mostname,$name
count 10,5
mov $bad1,"Luka succumbs to the tentacles playing with his penis."
if %kousoku>0 mov $bad1,"While bound, Luka succumbs to the tentacles playing with his penis."
mov $bad2," Stuck in the undersea temple, Luka's semen was continually squeezed out for the rest of his life."
gosub *face2
name $name
>Shooting out so much of your semen... It must have felt good.\
name ""
goto *kraken_h



*kraken_h3

mov %ikigoe,3:gosub *ikigoe
name $name
>Oh...?\
name ""
gosub *syasei1:gosub *syasei2
>Luka accidentally ejaculates as the tentacles wrap around his body!\
mov %viclose,1:gosub *lose
mov %2537,%2537+1:if %2537=1 mov %count_koenemy,%count_koenemy+1
if %2537>%count_most mov %count_most,%2537:mov $count_mostname,$name
count 10,5
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka accidentally ejaculated while the Kraken's tentacles were wrapping around him."
mov $bad2," Stuck in the undersea temple, Luka's semen was continually squeezed out for the rest of his life."
gosub *face2
name $name
>Coming just by being bound...@
>Haha... What a pathetic Hero.\
name ""
goto *kraken_h



*kraken_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>With my prostate being stimulated by her tentacle, my body shakes in disgrace as I ejaculate.\
mov %viclose,1:gosub *lose
mov %2537,%2537+1:if %2537=1 mov %count_koenemy,%count_koenemy+1
if %2537>%count_most mov %count_most,%2537:mov $count_mostname,$name
count 9,5
mov $bad1,"Luka was defeated by the Kraken's tentacle smash."
mov $bad2," Stuck in the undersea temple, Luka's semen was continually squeezed out for the rest of his life."
gosub *face2
name $name
>Letting it out while I stimulate your ass...@
>How unbecoming for a Hero... Hahaha.\
name ""
goto *kraken_h



*kraken_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>Violated by all of her tentacles at the same time, Luka quickly ascends to heaven and ejaculates.\
mov %viclose,1:gosub *lose
mov %2537,%2537+1:if %2537=1 mov %count_koenemy,%count_koenemy+1
if %2537>%count_most mov %count_most,%2537:mov $count_mostname,$name
count 10,5
mov $bad1,"Luka is instantly defeated by the Kraken's tentacle heaven."
mov $bad2," Stuck in the undersea temple, Luka's semen was continually squeezed out for the rest of his life."
gosub *face2
name $name
>Haha... How was my ultimate move?@
>Was it too good for a pathetic man like you?\
name ""
goto *kraken_h



*kraken_h

if %2537=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Auu...\
name ""
>Forced to come by a monster, all my strength fades.@
>The despair of being defeated is firmly planted in my mind.\
name $name
>Now, I shall judge you for your crime.\
>You are a villain who came to this temple to steal the orb.@
>Then had the audacity to point a blade at the Queen.\
>In addition, you attacked many of the monsters in my domain.@
>Your crimes are heavy.\
>...I've decided your punishment.@
>You will be imprisoned in this underwater temple for the rest of your life.\
>In addition, you are forbidden from creating any children.@
>To achieve that, I shall ensure that you are squeezed dry every single day.\
name ""
if %kousoku=1 skip 6
dwave 1,"se\ero_makituki3.ogg"
cspl 690,699
lsp 700,":a;chara\kraken_st11.bmp",0,0:print 10,500
>One of the Kraken's tentacles shoots out and coils around me.\
>Her soft tentacle tightens around me, depriving me of my freedom.\
name "Luka"
>G...Get off!\
name ""
>My struggling doesn't even budge her tight grip on me, though.@
>On the contrary, it just makes me feel even more powerless.\
name $name
>Now then...@>To ensure you don't have any children, I shall be the first to see to squeezing out all of your semen.\
>Even though you will be a prisoner here for the rest of your life, we don't want to take any chances.\
name ""
name "Luka"
>The te... tentacle is... Ahhh...\
name ""
mov %hseanwave,17:hseanwave
lsp 700,":a;chara\kraken_h1.bmp",0,0:print 10,500
>A tentacle slowly wraps around my penis.\
>Coiling from the root to the tip, it slowly moves up my penis in a spiral.\
>Finally, the rubbery tentacle is completely wrapped around my penis.\
name "Luka"
>Auu... That feels good...\
name ""
name $name
>Haha... I know.@
>Do you want me to squeeze you?\
>Are you looking forward to being squeezed dry every single day?\
name ""
>The tentacle wrapped around my penis gradually begins to tighten.\
name "Luka"
>Aaaa...\
name ""
>The tentacle wrapped around my penis in a spiral presses on me.@
>But not tight enough to cause pain.\
>The rubbery tentacle pressing into me feels surprisingly good.\
name $name
>Here...@
>How does it feel when I squeeze on your penis?\
name ""
name "Luka"
>Auuu...\
name ""
>The slow tightening continues, as if being gripped by a hand.@
>But the elastic feeling of the tentacle feels many times better than any hand.\
>Even under a tight pressure, the rubbery feeling makes it so it doesn't cause any pain.\
>My body writhes under the feeling of her soft tentacle around me.\
name ""
name $name
>Does it feel good?@
>Then let me loosen it a little...\
name ""
>She starts to loosen the pressure on me.@
>When I'm finally relaxing, she suddenly tightens it even more than before.\
>She quickly continues the pattern of loosening and tightening.@
>I shake my head helplessly as she continues to play with me like that.\
name "Luka"
>Ahhhh!!\
name ""
name $name
>Squeeze, release. Squeeze, release...@
>Haha... Is this effective?\
>No man has been able to resist ejaculating from this yet.\
name ""
name "Luka"
>Aaaaa!!\
name ""
>She tightens up and forces pleasure into me, then quickly loosens and causes it to fade.\
>The rhythmic pattern causes me to sigh every time she releases the pressure.\
>The different sensations make it difficult to resist the rising pleasure spreading through my waist.\
name "Luka"
>No... Stop this...\
name ""
>As if my penis was crying, pre-come leaks out and spreads onto the Kraken's tentacle.\
>I shiver in disgrace at already leaking out semen just from being squeezed like this.\
>But I'm not able to endure this...@
>Trembling in misery, I can't do anything but take her attacks.\
name $name
>Are you frustrated? Are you miserable?@
>But I won't pardon you.\
>While sending you to the pits of disgrace, I'll give you the highest of pleasure.\
>Wasting all of your semen, I'll make sure it's all squeezed out...@
>That is your punishment.@
>You have no choice but to lay there and take it!\
name ""
>She quickens her pace as she forces me to come.@
>To that increased stimulation, I finally give in to the desire.\
name "Luka"
>Aaaaaa!!\
name ""
gosub *syasei1
lsp 700,":a;chara\kraken_h2.bmp",0,0
gosub *syasei2
>A cloud of semen shoots out from my penis, as if creating a white flag of surrender.\
lsp 700,":a;chara\kraken_h2a.bmp",0,0:print 10,500
>The semen shot out falls back onto her tentacle, covering it.\
name "Luka"
>Uuu...\
name ""
>I tremble in humiliation at being forced to come.\
>But her punishment isn't over yet...@
>The tentacle coiled around my penis doesn't let go.\
name $name
>Haha... That's the first one.@
>Forced to come against your will... The ultimate disgrace for a man.\
>But even then, I can see it in your face that you felt good.\
>Are you horrified? Hahaha.\
name ""
>The Kraken gives a triumphant smile at me and continues her squeezing motion with her tentacle.\
>Starting from the base of my penis, she starts to tighten the tentacle even more than before.\
>The pressure slowly increases from the base of my penis up to the middle...@>Finally, she squeezes down on my tip.\
>The slow rising squeezing motion forces all of the leftover semen in my penis from my last orgasm out.\
>Once she reaches my tip, the movement starts all over again from my base.\
name "Luka"
>Aaaaa!!\
name ""
>It's as if she's milking my penis with her squeezing movement...@
>I involuntarily tighten my stomach to try to endure the sensation.\
name $name
>Even if you try to resist it, it's pointless.@
>Until I wring everything out, this won't end.\
name ""
name "Luka"
>Auuu...!\
name ""
>Tightly bound by her tentacles, I can't do anything to stop her.@
>No matter how I try to endure, the desire to release keeps boiling up.\
>My body twists and writhes, but there's no escape.@
>With no refuge from her stimulation, I have to just lay here and take it...\
name "Luka"
>Aaaa!\
name ""
>Her milking movement quickens as I moan.@
>Forced to another orgasm, the moment of my disgrace explodes again.\
gosub *syasei1
lsp 700,":a;chara\kraken_h3.bmp",0,0:print 10,500
gosub *syasei2
name "Luka"
>Auuu...\
name ""
lsp 700,":a;chara\kraken_h3a.bmp",0,0:print 10,500
>The semen falls back onto her tentacles, covering more of her .@
>As she continues to squeeze out all my semen, the sense of defeat fills my mind.\
name $name
>You seem to have a lot of semen...@
>We'll need to quickly get it all out...\
name ""
name "Luka"
>Eh...?@> Ahhh!\
name ""
lsp 700,":a;chara\kraken_h4.bmp",0,0:print 10,500
>Suddenly, a tentacle forces itself into my anus.@
>Her soft tentacle invades my body, and starts to wriggle around.\
name $name
>Let's use this method of forcing a man to quickly come.@
>While I directly stimulate your prostate, I'll keep squeezing you...\
name ""
>The tentacle inside of me starts to move.@
>The tip of her tentacle starts to press against the walls of my rectum, as a strange trembling comes over my body.\
name "Luka"
>Aiee!@>What is this!?\
name ""
>The lower half of my body is completely overcome by a strong stimulation, as my resistance is shattered.\
gosub *syasei1
lsp 700,":a;chara\kraken_h5.bmp",0,0
gosub *syasei2
>More than last time, my semen explodes all over the Kraken's tentacles.\
name "Luka"
>Haaa...\
name ""
>The unexpected stimulation from the tentacle inside my ass forces me to come right away.\
>It was as if she pushed an orgasm button...@
>More than ever before, the humiliation floods over my body.\
name $name
>I'll stimulate your prostate and squeeze out all your semen...@
>While taking your punishment, repent for your crimes...\
name ""
>The tentacle in my ass starts to wriggle again.@
>Like last time, the pleasure floods through my lower body, and...\
name "Luka"
>Ahh...@> No... This... Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>Due to the strange pleasure, more semen gushes out.@
>It's as if she's completely in control of when I orgasm...\
>With her tentacle still coiled around my penis, the milking doesn't stop.@
>In addition, the tentacle in my ass continues to wriggle around.\
name $name
>It looks like you still have more...@
>I guess I need to increase the stimulation to get everything out...\
name ""
name "Luka"
>No, stop!@>Ahhhh!\
name ""
>As she stimulates my prostate again, I let out a pathetic moan.\
gosub *syasei1:gosub *syasei2
>More semen shoots out and scatters in the water.\
name "Luka"
>Auu... Stop already...\
name ""
>Humiliated at my situation, tears start to fill my eyes.@
>Too much of my power has been drained, and all I can do is move my head side to side.\
>My resistance is pointless, as I'm completely at the mercy of the Kraken.\
>Ignoring my pleas, she continues her stimulation.\
name $name
>Haha... Such a pathetic appearance.@
>But I guess all men squeezed like this end up like that.\
name ""
name "Luka"
>Auu... Aaaa...\
name ""
>The tentacle in my rectum continues to wriggle around.@
>Without mercy, it continues to rub and stimulate my prostate.\
>At the same time, the tentacle on my penis continues its milking movements.\
gosub *syasei1:gosub *syasei2
>With the pleasure coming from both my front and the back, I'm forced to come again.\
name "Luka"
>Auu... No more...@
>I can't come any more... Help me...\
name ""
name $name
>What are you saying? You have more in you...@
>Here, I'll show you...\
name ""
>As she laughs, the tentacle rubs against my prostate again.\
gosub *syasei1:gosub *syasei2
>Unable to resist, I instantly ejaculate again.\
>She continues my punishment, squeezing out everything I have...@
>Wallowing in misery, the only thing I can do is lay back and accept it.\
name $name
>More... Let out more...\
name ""
gosub *syasei1:gosub *syasei2
name $name
>It's not over yet...\
name ""
gosub *syasei1:gosub *syasei2
name $name
>There must be more left...\
name ""
gosub *syasei1:gosub *syasei2
gosub *anten
mov %hseanwave,0:hseanwave
>As she continues her brutal rape, I finally faint.@
>While she squeezes out all of my semen, I lose consciousness.\
>But fainting isn't an escape...@
>There's no escape from this hell...\
>Stuck in this underwater temple for the rest of my life, she continues to squeeze out all of my semen.\
>My adventure ends in this humiliating and cruel way.\
>................\
goto *badend



*ghost_start

mov $name,"Ghost Girl"
mov $name2,"Ghost Girl"
mov $lavel,"ghost"
mov $tatie1,"ghost_st01"
mov $tatie2,"ghost_st02"
mov $tatie3,"ghost_st01"
mov $tatie4,"ghost_st11"
mov $haikei,"bg055"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,480
if %nanido=2 mov %max_enemylife,720
if %nanido=3 mov %max_enemylife,960
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,75
mov %music,1
gosub *maxmp:mov %mp,1
mov %tikei,3
gosub *syutugen
mov $mogaku_anno1,"Luka can't break free of the Ghost Girl!"
mov $mogaku_anno2,"Luka broke free of the Ghost Girl!"
mov $mogaku_anno3,"Luka is unable to attack like this!"
mov $mogaku_sel1,"Pointless... I'll violate you like this..."
mov $mogaku_sel2,"Pointless... I'll violate you like this..."
mov $mogaku_sel3,"It's useless to struggle... Just give up..."
mov $mogaku_sel4,"It's useless to struggle... Just give up..."
mov $mogaku_sel5,"It's useless to struggle... Just give up..."
mov $mogaku_dassyutu1,"Don't you want me to violate you?"
mov $mogaku_dassyutu2,""
mov $half_s1,"I'll weaken you more..."
mov $half_s2,""
mov $kiki_s1,"You're going to come soon..."
mov $kiki_s2,""
mov %end_n,4
mov %exp_minus,0
mov %zmonster_x,-300
mov %owaza_count1a,2
lsp 700,":a;chara\alice_st01b.bmp",-120,0
lsp 701,":a;chara\ghost_st01.bmp",160,0:print 10,500
name "Alice"
>...Oh, it's a Ghost Girl.@
>I thought it was a ghost.\
name ""
name "Luka"
>Uh... What's the difference...?\
name ""
>If she's afraid of ghosts, why wouldn't she be afraid of this...?\
name "Alice"
>A Ghost Girl is born from a collection of souls mixing with magic power.\
>It's much different than something unscientific like a normal ghost.\
>Finish this quickly.\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,500
>Saying that, Alice vanishes!\
csp 701
lsp 700,":a;chara\ghost_st02.bmp",0,0:print 10,500
name $name
>Human energy...@>I'll suck it all up...\
name ""
name "Luka"
>No!\
name ""
>I raise my sword at the Ghost Girl.@
>Am I even going to be able to slash her? It looks like she's incorporeal...\
gosub *face1
mov %sinkou,1
goto *common_main



*ghost_v

gosub *face3
name $name
>My... Power...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Ghost Girl turns into a mysterious floating light!\
mov %viclose,1:gosub *victory
mov %getexp,900:gosub *lvup
mov %2238,1
goto *sean0112



*ghost_kousan

gosub *kousan_syori
>Luka yields to the promise of pleasure, ending his resistance!\
gosub *face2
name $name
>I'll violate you then...\
name ""
goto *ghost_a



*ghost_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 && %nanido=0 goto *common_attack
if %cmd1=11 && %sinkou=1 goto *ghost_attack
if %cmd1=11 && %sinkou=2 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *ghost_kousan
if %cmd1=16 goto *ghost_onedari
if %cmd1=17 goto *common_skill
goto *ghost_main



*ghost_attack

gosub *common_attack1
if %enemylife=0 goto *ghost_v
if %before_action=3 goto *ghost_a
name "Luka"
>Good... My attacks can hit.\
name ""
>It looks like this sword can even hit monsters that don't have substance...\
>As expected from a sword made out of melted angels.@
>I'm glad I have this sword...\
name "Luka"
>...Ah! Don't think that!@> This sword is too creepy...\
name ""
name "Angel Halo"
>ooooooooooooo...\
name ""
name "Luka"
>Aie! It said something!\
name ""
mov %sinkou,2
goto *ghost_a



*ghost_a

if %kousoku=1 gosub *ghost_a5:goto *common_main
rnd2 %ransu,1,4
if %ransu=1 gosub *ghost_a1:goto *common_main
if %ransu=2 gosub *ghost_a2:goto *common_main
if %ransu=3 gosub *ghost_a3:goto *common_main
if %ransu=4 && %owaza_count1a>3 gosub *ghost_a4:goto *common_main
skip -5



*ghost_a1

add %stack,1
skillcount1 3125
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll weaken you with my mouth..."
if %ransu=2 mov $sel1,"Mmm... *Suck*"
if %ransu=3 mov $sel1,"I'll steal your life with my mouth..."
name $name
eng $sel1:$sel6\
name ""
skillname "Ghost Blowjob"
dwave 1,"se\ero_buchu3.ogg"
>The Ghost Girl sucks Luka's penis!
if %nanido<2 damage 25,30
if %nanido=2 damage 32,38
if %nanido=3 damage 50,60
skillname ""
if %mylife=0 sub %stack,1:return *ghost_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*ghost_a2

add %stack,1
skillcount1 3126
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll steal your life with my chest..."
if %ransu=2 mov $sel1,"Is my chest soft...?"
if %ransu=3 mov $sel1,"Your penis is warm..."
name $name
eng $sel1:$sel6\
name ""
skillname "Ghost Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>The Ghost Girl crushes Luka's penis between her chest!
if %nanido<2 damage 27,32
if %nanido=2 damage 35,41
if %nanido=3 damage 54,64
skillname ""
if %mylife=0 sub %stack,1:return *ghost_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*ghost_a3

add %stack,1
skillcount1 3127
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll steal your life with this hand..."
if %ransu=2 mov $sel1,"Touch... Stroke... Massage..."
if %ransu=3 mov $sel1,"Does my handjob feel good...?"
name $name
eng $sel1:$sel6\
name ""
skillname "Ghost Handjob"
dwave 1,"se\ero_koki1.ogg"
>One of the Ghost Girl's hands shoots out and quickly pumps Luka's penis!
if %nanido<2 damage 30,35
if %nanido=2 damage 37,43
if %nanido=3 damage 60,70
skillname ""
if %mylife=0 sub %stack,1:return *ghost_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*ghost_a4

add %stack,1
name $name
>............\
name ""
skillname "Limb Restraint"
>The Ghost Girl's hands reach out and grab Luka!\
mov %kousoku,1:gosub *status_print
>The Ghost Girl's hands are pinning Luka to the ground!\
skillname ""
name $name
>I'll violate you like this...@
>I'll take all of your energy...\
name ""
if %nanido<2 mov %genmogaku,0
if %nanido=2 mov %genmogaku,0
if %nanido=3 mov %genmogaku,0
sub %stack,1
return



*ghost_a5

add %stack,1
if %kousan>0 skip 5
name $name
>Now, I'll violate you...@
>Shoot out all of your energy inside me...\
name ""
skillcount1 3128
skillname "Ghost Rape"
dwave 1,"se\ero_pyu2.ogg"
lsp 690,":a;chara\ghost_ct01.bmp",0,0:print 10,500
>The Ghost Girl pushes her waist into Luka, and forces him into her intimate place!\
>Luka's penis is forced into the Ghost Girl's wet hole!
mov %damage_kotei,1
damage 35,40
mov %kousoku,2:mov %genmogaku,100
>Luka is being raped by the Ghost Girl!\
skillname ""
if %mylife=0 sub %stack,1:return *ghost_h4
if %mylife<41 sub %stack,1:goto *ghost_a7
name "Luka"
>Aieee!\
name ""
>Even though her body looks like it has no substance, her honey pot is surprisingly soft.\
>A sticky liquid flows out from her and covers my penis.\
name $name
>Does it feel good...?@
>Now... Shoot out all of your energy inside me.\
name ""
skillcount1 3128
skillname "Ghost Rape"
dwave 1,"se\ero_chupa3.ogg"
>The Ghost Girl starts to move her waist!@
>The walls of her vagina wriggle around Luka!
mov %damage_kotei,1
damage 35,40
skillname ""
if %mylife<41 sub %stack,1:goto *ghost_a7
name "Luka"
>Auu...\
name ""
>In addition to the stimulation, the immoral feeling of being raped by a monster flows through me.\
>Luka is being raped by the Ghost Girl!\
name $name
>I'll tighten up my insides...\
name ""
skillcount1 3128
skillname "Ghost Rape"
dwave 1,"se\ero_chupa5.ogg"
>The Ghost Girl tightens around Luka's penis!
mov %damage_kotei,1
damage 35,40
skillname ""
if %mylife<41 sub %stack,1:goto *ghost_a7
sub %stack,1
goto *ghost_a6



*ghost_a6

add %stack,1
skillcount1 3128
>Luka is being raped by the Ghost Girl!\
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hahaha...":mov $sel2,"The Ghost Girl tightens around Luka's penis!"
if %ransu=2 mov $sel1,"I want to rape you even more...":mov $sel2,"The walls of the Ghost Girl's vagina wriggle around Luka!"
if %ransu=3 mov $sel1,"Does it feel good inside of me...?":mov $sel2,"Sticky liquid flows out from the Ghost Girl's vagina and covers Luka's penis!"
if %ransu=4 mov $sel1,"Now... Shoot out your energy...":mov $sel2,"The Ghost Girl shakes her waist!"
name $name
eng $sel1:$sel6\
name ""
skillname "Ghost Rape"
dwave 1,"se\ero_chupa4.ogg"
eng $sel2:$sel6
mov %damage_kotei,1
damage 35,40
skillname ""
if %mylife<41 sub %stack,1:goto *ghost_a7
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
goto *ghost_a6



*ghost_a7

add %stack,1
>Luka is being raped by the Ghost Girl!\
name $name
>Are you already done?@
>Now... Give your life to me, and shoot your energy inside!\
name ""
skillcount1 3128
skillname "Ghost Rape"
dwave 1,"se\ero_chupa4.ogg"
>The walls of the Ghost Girl's vagina intensely wriggle around Luka's penis!\
>The strange pleasure brings Luka to an orgasm!
mov %damage_kotei,1
damage 40,40
skillname ""
sub %stack,1
return *ghost_h5



*ghost_onedari

mov $list1,"Ghost Blowjob"
if %3125>0 mov %list_num1,1
mov $list2,"Ghost Tit Fuck"
if %3126>0 mov %list_num2,1
mov $list3,"Ghost Handjob"
if %3127>0 mov %list_num3,1
mov $list4,"Ghost Rape"
if %3128>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *ghost_onedari1
if %cmd1=12 goto *ghost_onedari2
if %cmd1=13 goto *ghost_onedari3
if %cmd1=14 goto *ghost_onedari4
if %cmd1=-1 goto *ghost_main
goto *ghost_onedari



*ghost_onedari1

gosub *onedari_syori
name $name
>You want to shoot out your semen in my mouth...?\
name ""
gosub *ghost_a1
skip -1



*ghost_onedari2

gosub *onedari_syori
name $name
>You want to shoot out your semen on my chest...?\
name ""
gosub *ghost_a2
skip -1



*ghost_onedari3

gosub *onedari_syori
name $name
>You want to shoot out your semen on my hand...?\
name ""
gosub *ghost_a3
skip -1



*ghost_onedari4

gosub *onedari_syori_k
name $name
>You want to shoot out your semen inside of me...?\
name ""
if %kousoku=0 gosub *ghost_a4
gosub *ghost_a5



*ghost_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\ghost_bk01.bmp",0,0
gosub *syasei2
>Sucked by the Ghost Girl, Luka is forced to ejaculate.\
mov %viclose,1:gosub *lose
mov %2538,%2538+1:if %2538=1 mov %count_koenemy,%count_koenemy+1
if %2538>%count_most mov %count_most,%2538:mov $count_mostname,$name
count 4,4
mov $bad1,"Luka succumbed to the Ghost Girl's blowjob."
mov $bad2,"After that, Luka was raped until his death."
gosub *face2
name $name
>You shot out your energy in my mouth...@
>Living sperm... So much...\
name ""
goto *ghost_h



*ghost_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\ghost_bk02.bmp",0,0
gosub *syasei2
>Stimulated by the Ghost Girl's soft chest, Luka is forced to ejaculate.\
mov %viclose,1:gosub *lose
mov %2538,%2538+1:if %2538=1 mov %count_koenemy,%count_koenemy+1
if %2538>%count_most mov %count_most,%2538:mov $count_mostname,$name
count 7,4
mov $bad1,"Luka succumbed to the Ghost Girl's titty fuck."
mov $bad2,"After that, Luka was raped until his death."
gosub *face2
name $name
>You shot out your energy all over my chest...@
>Living sperm... So much...\
name ""
goto *ghost_h



*ghost_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\ghost_bk03.bmp",0,0
lsp 694,":a;chara\ghost_bk04.bmp",0,0
gosub *syasei2
>Stimulated by the Ghost Girl's handjob, Luka is forced to ejaculate.\
mov %viclose,1:gosub *lose
mov %2538,%2538+1:if %2538=1 mov %count_koenemy,%count_koenemy+1
if %2538>%count_most mov %count_most,%2538:mov $count_mostname,$name
count 5,4
mov $bad1,"Luka succumbed to the Ghost Girl's handjob."
mov $bad2,"After that, Luka was raped until his death."
gosub *face2
name $name
>You shot out your energy all over my hand...@
>Living sperm... So much...\
name ""
goto *ghost_h



*ghost_h4

mov %ikigoe,3:gosub *ikigoe
name $name
>Already...?\
name ""
gosub *syasei1
lsp 690,":a;chara\ghost_ct02.bmp",0,0
gosub *syasei2
>The moment Luka is forced into the Ghost Girl's vagina, he accidentally ejaculates.\
mov %viclose,1:gosub *lose
mov %2538,%2538+1:if %2538=1 mov %count_koenemy,%count_koenemy+1
if %2538>%count_most mov %count_most,%2538:mov $count_mostname,$name
count 1,4
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka accidentally ejaculated as soon as the Ghost Girl started to rape him."
mov $bad2,"After that, Luka was raped until his death."
name $name
>Shooting out your energy so quickly...\
name ""
>The Ghost Girl looks down at me as she shakes her waist.\
goto *ghost_h



*ghost_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\ghost_ct02.bmp",0,0
gosub *syasei2
>Raped by the Ghost Girl, Luka is unable to endure the stimulation any longer.\
mov %viclose,1:gosub *lose
mov %2538,%2538+1:if %2538=1 mov %count_koenemy,%count_koenemy+1
if %2538>%count_most mov %count_most,%2538:mov $count_mostname,$name
count 1,4
mov $bad1,"Luka ejaculated while the Ghost Girl raped him."
mov $bad2,"After that, Luka was raped until his death."
name $name
>Your energy is overflowing inside of me...@
>Living sperm... So much...\
name ""
mov %hseanwave,1:hseanwave
>The Ghost Girl looks down at me as she shakes her waist.\
goto *ghost_h



*ghost_h

if %2538=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Auuu...\
name ""
>As she forced me to come, it felt like my energy was sucked out.@
>I can't fight back against her anymore...\
if %kousoku>0 mov %hseanwave,1:hseanwave:skip 11
name $name
>Now I'll rape you...@
>Gush out all your energy inside of me...\
name ""
mov %hseanwave,1:hseanwave
cspl 690,699
lsp 690,":a;chara\ghost_ct01.bmp",0,0
lsp 700,":a;chara\ghost_st11.bmp",0,0:print 10,500
>The Ghost Girl slowly forces her waist into mine, forcing my penis inside of her intimate place.\
>The soft feeling of her flesh envelopes me.\
name "Luka"
>Aaaa!\
name ""
>Despite seemingly not having substance, her honey pot feels surprisingly soft.\
>The sticky fluid flowing out of her starts to cover my penis as well.\
name $name
>Is it good...?@
>Now, shoot it out in me...\
name ""
>The Ghost Girl starts to slowly move her waist.@
>With every movement, the soft walls of her vagina wriggle around me.\
name "Luka"
>Aaaa...\
name ""
>The sticky liquid inside of her swirls around my penis with every thrust.@
>A lewd noise sounds out every time I'm forced all the way inside of her.\
>For some reason, the flesh around me feels very cold.@
>But the friction of my warm penis on her cold flesh feels surprisingly good.\
>As if being corrupted, I can't fight back against this forced pleasure.\
name $name
>Come...@
>Come a lot...\
name ""
name "Luka"
>Faaa...\
name ""
>As more of her sticky liquid flows onto me, the wriggling walls of her vagina only increase in speed.\
>As if they had their own will, every crease and point in her flesh is moving in random directions.\
name $name
>Give me your warmth...\
name ""
>As the Ghost Girl says that, she starts to quickly pump me.@
>Grinding back and forth, the lewd slapping noise gets even louder.\
>With that sudden attack of pleasure, I'm finally forced over the edge.\
name "Luka"
>Aaaa!!\
name ""
gosub *syasei1
lsp 690,":a;chara\ghost_ct02.bmp",0,0
gosub *syasei2
>I shoot my warm semen into her cold hole.@
>With each spurt, I feel more of my energy being drained.\
name "Luka"
>Aa... Faa...\
name ""
>Raped by this Ghost Girl, I've been forced to come...@
>I tremble in despair.\
>Held down and powerless, I can do nothing but surrender...\
name $name
>More... Come more...\
name ""
mov %hseanwave,4:hseanwave
>Without letting me rest, the Ghost Girl continues to pump me.@
>Stimulating my penis right after an orgasm, she isn't showing any mercy.\
>All the way in, then all the way out...@
>Over and over, she forces me in and out of her sticky vagina.\
>Covered in her sticky juices, a strange pleasure fills my body.\
name "Luka"
>Faaa...\
name ""
>All I can feel is her chilly flesh.@
>She isn't particularly tight inside, but her wriggling walls attack me with every pump.\
>Before I realized it, I felt myself thrusting in time with her movements.\
>Being raped by this Ghost Girl, she's sucking in my energy...@
>And I'm even starting to accept my fate...\
name $name
>Pour your energy into me...@
>More... More...\
name ""
name "Luka"
>Ahh... I'm coming again...@
>Ahhh!!\
name ""
gosub *syasei1
lsp 690,":a;chara\ghost_ct03.bmp",0,0
gosub *syasei2
>I shoot out more of my semen into her cold vagina.@
>I'm not able to resist this pleasure any longer...\
name $name
>Mmm... Warm...@
>Your energy... I want more...\
name ""
name "Luka"
>Aaaa...\
name ""
>She grinds against me even quicker than before.@
>As if thanking her for the pleasure, I'm quickly brought to another orgasm.\
name "Luka"
>Aaa... Already... again...!\
name ""
gosub *syasei1
lsp 690,":a;chara\ghost_ct04.bmp",0,0
gosub *syasei2
>With barely any time since my last ejaculation, I'm quickly forced to another height.\
>Surprisingly, even more semen than last time came out as well.\
>I should be feeling fear at this situation...@
>But because of this overpowering pleasure, my sense of danger has already been paralyzed...\
name $name
>Come...@
>Pour everything into me...\
name ""
name "Luka"
>Auuu...@
>Everything... Coming...\
name ""
gosub *syasei1:gosub *syasei2
>Right after I moan, she quickly forces me all the way inside of her.@
>As if flipping a switch, I instantly ejaculated.\
>My orgasm keeps going for almost thirty seconds...@
>Stuck in an orgasm for so long, I keep spurting out more semen inside of her.\
>This must be what she meant by sucking my energy...@
>At this rate, she's going to take everything from me...\
>Soaked in pleasure, I can't fight back against this...@
>As if she had possessed me, all I can do is seek more...\
name $name
>Hahaha...@>Leak your existence into me...\
name ""
name "Luka"
>Auuu...\
name ""
gosub *syasei1:gosub *syasei2
>As she commanded, I shoot out more of my semen into her.@
>...And probably my life, too...\
>As I shoot out more and more into her, I feel my thoughts start to fade.\
name $name
>More... Give me everything...@
>I'll suck in your life...\
name ""
name "Luka"
>Aaa...\
name ""
gosub *syasei1:gosub *syasei2
>Coming one final time into her, I let out a sigh.@
>Defeated by ecstasy, I feel myself drift out of consciousness.\
>I can't even lift a finger anymore...@
>The Ghost Girl has sucked up my life itself...\
name $name
>That's everything...\
name ""
>The last thing I hear is the Ghost Girl's voice...\
gosub *anten
mov %hseanwave,0:hseanwave
>Like that, my life has been sucked out by the Ghost Girl.@
>Paralyzed by pleasure, she slowly stole my life...\
>Thus, another adventurer was made into the Ghost Girl's prey.\
>...............\
goto *badend



*doll_start

mov $name,"Cursed Doll"
mov $name2,"Cursed Doll"
mov $lavel,"doll"
mov $tatie1,"doll_st01"
mov $tatie2,"doll_st02"
mov $tatie3,"doll_st03"
mov $tatie4,"doll_st02"
mov $haikei,"bg056"
mov %monster_x,180
mov %monster_y,50
if %nanido=1 mov %max_enemylife,680
if %nanido=2 mov %max_enemylife,780
if %nanido=3 mov %max_enemylife,880
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,90
mov %music,1
gosub *maxmp:mov %mp,%max_mp
mov %tikei,3
gosub *syutugen
mov $mogaku_anno1,"Luka can't break free of the Cursed Doll's hair!"
mov $mogaku_anno2,"Luka pulled the hair off of him!"
mov $mogaku_anno3,"Caught in an awkward position, Luka can't swing his sword with his full power!"
mov $mogaku_sel1,"No... I want to play more..."
mov $mogaku_sel2,"Aren't you having fun...? Let's play..."
mov $mogaku_sel3,"Play... Play more..."
mov $mogaku_sel4,"I won't let go until we play..."
mov $mogaku_sel5,"I won't let go, big bro..."
mov $mogaku_dassyutu1,"Don't you want to play big bro?"
mov $mogaku_dassyutu2,""
mov $half_s1,"Big bro... are you having fun?"
mov $half_s2,""
mov $kiki_s1,"Let out a lot, big bro..."
mov $kiki_s2,"Your white stuff..."
mov %end_n,4
mov %exp_minus,900
mov %zmonster_x,-120
mov %tukiy,30
mov %owaza_count1a,2
gosub *face2
name $name
>Big bro...@
>Play... with me...\
name ""
>The doll floats in mid-air with a smile on her face.\
name "Luka"
>Are you a monster too!?\
name ""
>I take a stance in front of the strange doll!\
gosub *face1
goto *common_main



*doll_v

gosub *face3
name $name
>More... I wanted to play...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Cursed Doll fades away!@
>...Or so I thought.@
>The doll is back in its original position, unmoving!\
mov %viclose,1:gosub *victory
mov %getexp,950:gosub *lvup
mov %2239,1
goto *sean0113



*doll_kousan

gosub *kousan_syori
>Luka yields to the temptation, ending his resistance!\
gosub *face2
name $name
>Let's play...@
>First I'll play with your penis...\
name ""
goto *doll_a



*doll_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *doll_kousan
if %cmd1=16 goto *doll_onedari
if %cmd1=17 goto *common_skill
goto *doll_main



*doll_a

if %kousoku=1 rnd2 %ransu,1,2
if %kousoku=1 && %ransu=1 gosub *doll_a4:goto *common_main
if %kousoku=1 && %ransu=2 gosub *doll_a5:goto *common_main
rnd2 %ransu,1,3
if %ransu=1 gosub *doll_a1:goto *common_main
if %ransu=2 gosub *doll_a2:goto *common_main
if %ransu=3 && %owaza_count1a>4 gosub *doll_a3:goto *common_main
skip -4



*doll_a1

add %stack,1
skillcount1 3129
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"More... Play...":mov $sel2,"The Cursed Doll reaches out and rubs Luka's penis!"
if %ransu=2 mov $sel1,"Big bro's penis...":mov $sel2,"The Cursed Doll grabs Luka's penis!"
if %ransu=3 mov $sel1,"Hehe... Rub, rub...":mov $sel2,"The Cursed Doll strokes Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Playful Handjob"
dwave 1,"se\ero_koki1.ogg"
eng $sel2:$sel6
if %nanido<2 damage 20,25
if %nanido=2 damage 25,30
if %nanido=3 damage 35,43
skillname ""
if %mylife=0 sub %stack,1:return *doll_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*doll_a2

add %stack,1
skillcount1 3130
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hehehe...":mov $sel2,"The Cursed Doll hugs Luka, with her chest next to his groin!"
if %ransu=2 mov $sel1,"Your white stuff... Shoot it out...":mov $sel2,"The Cursed Doll hugs Luka, with her chest next to his groin!"
if %ransu=3 mov $sel1,"Big bro... Does it feel good...?":mov $sel2,"The Cursed Doll hugs Luka and shakes her chest!"
name $name
eng $sel1:$sel6\
name ""
skillname "Playful Hug"
dwave 1,"se\ero_makituki5.ogg"
eng $sel2:$sel6
if %nanido<2 damage 25,30
if %nanido=2 damage 30,38
if %nanido=3 damage 43,53
skillname ""
if %mylife=0 sub %stack,1:return *doll_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*doll_a3

add %stack,1
gosub *face2
name $name
>I want to play more...\
name ""
skillname "Hair Expand"
dwave 1,"se\umaru.ogg"
>The Cursed Doll's hair expands and wraps around Luka!@
mov %kousoku,1:gosub *status_print
>Luka's body has been wrapped up by the Cursed Doll's hair!\
skillname ""
if %kousan=2 sub %stack,1:return
if %first_sel1=1 skip 8
name "Luka"
>Guh... What is this!?\
name ""
name $name
>I'll play with you now, big bro...\
name ""
mov %first_sel1,1
if %nanido<2 mov %genmogaku,2
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,3
sub %stack,1
return



*doll_a4

add %stack,1
skillcount1 3131
>Luka's body is entangled in the Cursed Doll's hair!\
rnd2 %ransu,1,6
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hehehe...":mov $sel2,"The Cursed Doll's hair coils around Luka's penis!"
if %ransu=2 mov $sel1,"Hehehehe...":mov $sel2,"The Cursed Doll's hair tickles Luka's penis!"
if %ransu=3 mov $sel1,"I want to see your white stuff...":mov $sel2,"The Cursed Doll's hair strokes Luka's penis!"
if %ransu=4 mov $sel1,"I want to play more... More...":mov $sel2,"The Cursed Doll's hair strokes Luka's penis!"
if %ransu=5 mov $sel1,"Teehee...":mov $sel2,"The Cursed Doll's hair tickles the tip of Luka's penis!"
if %ransu=6 mov $sel1,"It's ok to come, big bro...":mov $sel2,"The Cursed Doll's hair tightens around Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Playful Hair"
dwave 1,"se\umaru.ogg"
eng $sel2:$sel6
if %nanido<2 damage 30,35
if %nanido=2 damage 35,41
if %nanido=3 damage 50,60
skillname ""
if %mylife=0 sub %stack,1:return *doll_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*doll_a5

add %stack,1
skillcount1 3132
>Luka's body is entangled in the Cursed Doll's hair!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll make you mine...":mov $sel2,"The Cursed Doll's hair sucks Luka's energy out through his penis!"
if %ransu=2 mov $sel1,"I'll take everything of yours...":mov $sel2,"Energy is absorbed out of Luka through his penis!"
if %ransu=3 mov $sel1,"Don't you like this game...?":mov $sel2,"Energy is absorbed out of Luka through his penis!"
if %ransu=4 mov $sel1,"More... I want more of you...":mov $sel2,"Energy is absorbed out of Luka through his penis!"
if %ransu=5 mov $sel1,"It's delicious...":mov $sel2,"The Cursed Doll's hair coils around Luka's penis, and sucks out his energy!"
name $name
eng $sel1:$sel6\
name ""
skillname "Soul Sucking Hair"
dwave 1,"se\ero_chupa6.ogg"
eng $sel2:$sel6
if %nanido<2 damage 30,35
if %nanido=2 damage 35,41
if %nanido=3 damage 50,60
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *doll_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*doll_onedari

mov $list1,"Playful Handjob"
if %3129>0 mov %list_num1,1
mov $list2,"Playful Hug"
if %3130>0 mov %list_num2,1
mov $list3,"Playful Hair"
if %3131>0 mov %list_num3,1
mov $list4,"Soul Sucking Hair"
if %3132>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *doll_onedari1
if %cmd1=12 goto *doll_onedari2
if %cmd1=13 goto *doll_onedari3
if %cmd1=14 goto *doll_onedari4
if %cmd1=-1 goto *doll_main
goto *doll_onedari



*doll_onedari1

gosub *onedari_syori
name $name
>You want to play with my hand...?\
name ""
gosub *doll_a1
skip -1



*doll_onedari2

gosub *onedari_syori
name $name
>You want to play while I hug you?\
name ""
gosub *doll_a2
skip -1



*doll_onedari3

gosub *onedari_syori_k
name $name
>You want to play with my hair...?\
name ""
if %kousoku=0 gosub *doll_a3
gosub *doll_a4
skip -1



*doll_onedari4

gosub *onedari_syori_k
name $name
>Big bro... Can I really suck everything out?\
name ""
if %kousoku=0 gosub *doll_a3
gosub *doll_a5
skip -1



*doll_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\doll_bk03.bmp",180,50
gosub *syasei2
>Stroked by the Cursed Doll's small hands, Luka finally ejaculates.\
mov %viclose,1:gosub *lose
mov %2539,%2539+1:if %2539=1 mov %count_koenemy,%count_koenemy+1
if %2539>%count_most mov %count_most,%2539:mov $count_mostname,$name
count 5,4
mov $bad1,"Luka succumbed to the Cursed Doll's handjob."
mov $bad2,"While being raped, Luka's energy was sucked until his death."
gosub *face2
name $name
>Big bro's... White stuff...@
>So much... On my hand...\
name ""
>The Cursed Doll grins as she plays with the semen on her hand.\
goto *doll_ha



*doll_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\doll_bk02.bmp",180,50
gosub *syasei2
>With her chest up against Luka's groin, he's unable to endure the stimulation any longer.\
mov %viclose,1:gosub *lose
mov %2539,%2539+1:if %2539=1 mov %count_koenemy,%count_koenemy+1
if %2539>%count_most mov %count_most,%2539:mov $count_mostname,$name
count 7,4
mov $bad1,"Luka succumbed to the Cursed Doll's playful hug."
mov $bad2,"While being raped, Luka's energy was sucked until his death."
gosub *face2
name $name
>Big bro's... White stuff...@
>So much... On my chest...\
name ""
>The Cursed Doll grins as she plays with the semen on her chest.\
goto *doll_ha



*doll_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\doll_bk01.bmp",180,50
gosub *syasei2
>Played with by the Cursed Doll's hair, Luka ejaculates!\
mov %viclose,1:gosub *lose
mov %2539,%2539+1:if %2539=1 mov %count_koenemy,%count_koenemy+1
if %2539>%count_most mov %count_most,%2539:mov $count_mostname,$name
count 22,4
mov $bad1,"Luka succumbed to the Cursed Doll's playful hair."
mov $bad2,"While being played with by the Cursed Doll's hair, Luka's energy was sucked until his death."
name $name
>Big bro's... White stuff...@
>So much... In my hair...\
name ""
>The Cursed Doll grins as she plays with the semen in her hair.\
goto *doll_hb



*doll_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\doll_bk01.bmp",180,50
gosub *syasei2
>Luka ejaculates while stuck in a trance, as the Cursed Doll sucks energy out of his penis!\
mov %viclose,1:gosub *lose
mov %2539,%2539+1:if %2539=1 mov %count_koenemy,%count_koenemy+1
if %2539>%count_most mov %count_most,%2539:mov $count_mostname,$name
count 22,4
mov $bad1,"Luka orgasmed while the Cursed Doll sucked out his energy."
mov $bad2,"While being played with by the Cursed Doll's hair, Luka's energy was sucked until his death."
name $name
>I sucked so much...@
>Big bro's energy...\
name ""
>The Cursed Doll grins as she plays with the semen in her hair.\
goto *doll_hb



*doll_ha

if %2816=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2816,1
name "Luka"
>Ahh...\
name ""
>I tremble with the immoral feelings from being forced to come by a doll.\
name $name
>I want to play more big bro...\
name ""
>The Cursed Doll forces me to the ground and leans over my body.\
>A seductive hole opens up in the doll's groin area.@
>Different from her wooden body, the hole looked exactly like a human girl's.\
>The Cursed Doll starts to slowly lower that entrance toward my waist...@
mov %hseanwave,9:hseanwave
cspl 690,699
lsp 700,":c;chara\doll_ha1.bmp",0,0:print 10,500
>And forces me into her!\
name "Luka"
>Ah! Ahhh!!\
name ""
>The soft interior didn't feel like a doll at all.@
>Warm and wet inside of her, my body writhes at the surprising sensation.\
name "Luka"
>What... Is this...? It feels so good...@
>It's curved...\
name ""
name $name
>We're connected now, big bro...\
name ""
>While straddling me, she looks down and giggles.@
>I can't endure this small vagina...\
name $name
>Let it out, big bro...\
name ""
>At the same time that she said that, she started to move her waist.@
>Forcing me in and out of her, the tip of my penis rubs along the wall of her curved vagina.\
>I let out a moan as my penis starts to twitch.\
name "Luka"
>Uuu.... Ahhh...\
name ""
gosub *syasei1
lsp 700,":c;chara\doll_ha2.bmp",0,0
gosub *syasei2
>I explode in her tiny hole, shooting out my semen.@
>The pleasure from her tiny vagina forced me to orgasm almost in an instant...\
name "Luka"
>Auuu...\
name ""
>Forced to come in a doll's vagina, I feel humiliated.@
>But more than humiliation, I'm overcome with disgust at myself for surrendering so quickly.\
>Under this tiny doll's body, I shiver in defeat.@
>In addition, after coming inside of her I feel a sense of lethargy come over me.\
>My mind warns me that if this continues, something terrible is going to happen to me...\
>But I'm powerless to resist her any longer...\
name $name
>Big bro... I want to play more...\
name ""
name "Luka"
>Stop...@>Uuu...\
name ""
mov %hseanwave,10:hseanwave
>The Cursed Doll squeezes her vagina.@
>Right after ejaculating, she's already stimulating me again.\
>Leading me to a world of pleasure, I can't resist her...\
name "Luka"
>Aaa... Incredible...\
name ""
>I let out a groan as I feel another ejaculation start to rise in my waist.\
>The numbness that started to fill my waist after my last orgasm continues to slowly spread through my body.\
>This tiny doll is playing with me...@
>But even so, I don't have the strength to get her off...\
name $name
>Let it out, big bro...@
>I want all of your white stuff in me...\
name ""
>She grins as she tightens around my penis.@
>Slowly moving her waist, she coaxes me towards another orgasm.\
name "Luka"
>Auu... If you do that... I can't...!\
name ""
>I quickly reach another height due to the pleasure being forced into me.\
gosub *syasei1
lsp 700,":c;chara\doll_ha3.bmp",0,0
gosub *syasei2
>I explode again inside the Cursed Doll's warm hole.@
>The doubt and fear that was left in my mind starts to fade as the numbness spreads.\
>Before I noticed it myself, I had already become addicted to the pleasure she can give me.\
name "Luka"
>Faaa... Incredible...\
name ""
name $name
>I want to play even more, big bro...\
name ""
>From her deepest spot to her entrance, she continues to slowly move her waist back and forth.\
>Back and forth, my penis is forced in and out of her tiny hole.\
>The amazing feeling attacking me with every thrust quickly pushes me over another edge.\
name "Luka"
>Aaaaaa!\
name ""
gosub *syasei1:gosub *syasei2
>Raped by a small doll, I explode in her for a third time.\
name $name
>It's delicious, big bro...@
>More... I want to play more...\
name ""
>Without mercy, she continues to wring more from me.@
>Each time I ejaculate, more and more of my strength is taken from me.\
>As I am now, I can barely keep my eyes open.\
name "Luka"
>Auu... If you keep doing that...\
name ""
name $name
>Give me more please, big bro...@
>More... More... More...\
name ""
>She continues her movement, as the last of my fear fades.@
>Being raped by the Cursed Doll, I'm not allowed to have any fear...\
name "Luka"
>Auu...\
name ""
name $name
>I want to play more...@
>Until big bro breaks...\
name ""
>Holding my penis inside of her, she single-mindedly wrings out my energy.\
>I have no choice but to give in to her devilish desire.@
>Once she forced me into her, my fate was sealed...\
name $name
>Give me more... Big bro...\
name ""
name "Luka"
>Aaaa!!\
name ""
gosub *syasei1:gosub *syasei2
>I explode in the doll again.@
>More of my energy is taken by this little doll...\
>Having sex with this Cursed Doll is costing me my life...\
name $name
>More, more... More of what I want...\
name ""
name "Luka"
>Auuuu!\
name ""
gosub *syasei1:gosub *syasei2
>The numbness is covering my entire body now.@
>Unable to feel anything but the pleasure in my penis, it feels as though it isn't even my body any longer.\
name $name
>Let's play more, big bro...\
name ""
name "Luka"
>Ahh...\
name ""
gosub *syasei1:gosub *syasei2
>The Cursed Doll laughs as she sucks out more of my energy.@
>My vision dims until I can barely make out her sadistic face.\
>I'm barely able to keep a coherent thought... If this doesn't stop right now...\
name $name
>What's wrong, big bro?@
>You aren't moving anymore...\
name ""
name "Luka"
>A...a...a...\
name ""
>She continues moving her waist as she looks at my face questioningly.\
gosub *syasei1:gosub *syasei2
gosub *anten
mov %hseanwave,0:hseanwave
>While basking in that final orgasm, I lose consciousness.@
>All of my energy was sucked up by the Cursed Doll...\
>I was raped to death by the Cursed Doll...@
>But at least it felt good until the last moment...\
>...............\
goto *badend



*doll_hb

if %2817=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2817,1
name "Luka"
>Auuu...\
name ""
>As I come on her hair, a strange feeling flows through my body.@
>I feel more exhausted after that orgasm than any other I've experienced.\
dwave 1,"se\umaru.ogg"
cspl 690,699
lsp 700,":c;chara\doll_hb1.bmp",0,0:print 10,500
name $name
>I want to suck more, big bro...\
name ""
name "Luka"
>Uuu...\
name ""
>As if alive, her hair starts to expand and twist around my penis.@
>Longer and longer, her hair keeps expanding and covering more of me.\
>As she wraps tighter, the strange feeling of exhaustion increases in power.\
>My body writhes as her hair coils and tightens around my penis.\
name "Luka"
>Faa... That feels good...\
name ""
name $name
>It feels good for me too...\
name ""
>A tingling sensation spreads through my dick.@
>Each movement of her hair causes the tingling to increase, as I feel something being slowly sucked out of me.\
>Even though I can sense the danger, all I can do is shiver in pleasure.\
name "Luka"
>Faa... You're taking my energy...\
name ""
>Giving in to the weakness of a man, I surrender my lower body to the doll.\
>The perversion of the situation breaks my mind.@
>Looking down at my pathetic face, the Cursed Doll laughs.\
name $name
>Playing with big bro... It's so fun.@
>Are you going to come again already?\
name ""
name "Luka"
>Aaaa... I am...\
name ""
>With my life being sucked up by her hair, my body starts to twitch.@
>Unable to endure it any longer, I finally explode on her hair.\
gosub *syasei1
lsp 700,":c;chara\doll_hb2.bmp",0,0
gosub *syasei2
name "Luka"
>Faaa...\
name ""
>I'm completely helpless to the sensation of both my energy being sucked by her hair, and the stimulation on my penis attacking me at the same time.\
name $name
>Your white stuff...@
>Was it good, big bro?\
name ""
name "Luka"
>Auu... More...\
name ""
>I've become completely addicted to her hair.\
>With her hair constricting tighter around me, she's sucking up my energy like a pump.\
>Each thin silky strand stimulates me as they move around me.@
>Even the disgrace at being treated like this turns into pleasure.\
name "Luka"
>That's incredible...\
name ""
name $name
>Are you going to leak again...?@
>Give me a lot, big bro...\
name ""
>Skillfully manipulating her hair wrapped around my penis, it starts to move in every direction.\
>Each strand slightly vibrates as they move back and forth.@
>The powerful stimulation sends me over the edge again.\
name "Luka"
>Aaaahhh!!\
name ""
gosub *syasei1
lsp 700,":c;chara\doll_hb3.bmp",0,0:print 10,500
gosub *syasei2
>I shoot out more of my semen on her hair and lower body as my energy is sucked without mercy.\
>So much strength has been drained that I can't even move anymore.\
>Stuck in a daze, I can't even think straight.@
>Unable to control my body or my thoughts, I don't even realize the extreme danger I'm in.\
name "Luka"
>More...\
name ""
name $name
>Alright... I'll suck more, big bro...\
name ""
>The speed of the energy draining out of me quickly increases after she said that.\
>Along with that sensation, the sexual stimulation increased at the same rate.\
>Her hair tightens around my penis, as I feel less and less connected to my own body.\
>With a shorter interval than last time, I'm already forced to orgasm again.\
name "Luka"
>Aaaa!\
name ""
gosub *syasei1:gosub *syasei2
name $name
>You leaked again, big bro...\
name ""
>The Cursed Doll laughs at me.@
>Having all of my energy sucked by this little doll...\
name "Luka"
>Fa...aaa...\
name ""
>My life is in danger here...@
>But I can't escape from this pleasure.\
name "Luka"
>Suck... More...\
name ""
name $name
>Alright... I'll take everything...\
name ""
name "Luka"
>Ah! Ahhhhhh!!\
name ""
>More of her hair wraps around me as she goes in to suck the rest of my life up.\
name "Luka"
>Auu... I'm coming again...\
name ""
name $name
>Give me a lot...\
name ""
gosub *syasei1:gosub *syasei2
name "Luka"
>Faa...\
name ""
name $name
>You aren't moving anymore, big bro...@
>I guess I'll take everything that's left...\
name ""
>Her hair wriggles and strokes me all over, as dreamlike feelings overtake my mind.\
name "Luka"
>Aaaa!!\
name ""
gosub *syasei1:gosub *syasei2
>As I ejaculate, I feel myself starting to faint.@
>As if my body isn't my own anymore, my vision starts to fade.\
name $name
>It's delicious, big bro...\
name ""
name "Luka"
>Aaa...\
name ""
gosub *syasei1:gosub *syasei2
>I'm unable to feel any part of my body except for the pleasure from my penis.\
gosub *syasei1:gosub *syasei2
gosub *anten
>Tasting the pleasure from one final orgasm, I'm finally unable to feel anything at all.\
>Having all of my energy sucked up by the Cursed Doll, I'm left dry.\
>My life comes to a miserable end, taken by the Cursed Doll's hair.@
>But at least I was able to feel good until the end...\
>...................\
goto *badend



*zonbe_start

mov $name,"Zombie Girl"
mov $name2,"Zombie Girl"
mov $lavel,"zonbe"
mov $tatie1,"zonbe_st11"
mov $tatie2,"zonbe_st11"
mov $tatie3,"zonbe_st11"
mov $tatie4,"zonbe_st11"
mov $haikei,"bg057"
mov %monster_x,245
mov %monster_y,82
if %nanido=1 mov %max_enemylife,1400
if %nanido=2 mov %max_enemylife,2100
if %nanido=3 mov %max_enemylife,2800
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,99
mov %music,1
gosub *maxmp:mov %mp,%max_mp
mov %tikei,3
gosub *syutugen
mov $mogaku_anno1,"Luka can't get the Zombie Girl off of him!"
mov $mogaku_anno2,"Luka pushed the Zombie Girl off of him!"
mov $mogaku_anno3,"Luka can't attack like this!"
mov $mogaku_sel1,""
mov $mogaku_sel2,""
mov $mogaku_sel3,""
mov $mogaku_sel4,""
mov $mogaku_sel5,""
mov $mogaku_dassyutu1,""
mov $mogaku_dassyutu2,""
mov %end_n,4
mov %exp_minus,1850
mov %zmonster_x,-50
mov %tukix,330
name $name
>Uuu...uhhhh...\
name ""
name "Luka"
>Another one!?\
name ""
>It looks like a female adventurer died and turned into a zombie...@
>The one whose head Alice knocked off looked like an elf, too...\
>So zombies can be made from human or monster...?\
goto *common_main



*zonbe_v

gosub *face3
name $name
>Aaa...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>A bright light escapes from the Zombie Girl!@
>The lifeless body collapses on the floor!\
mov %viclose,1:gosub *victory
mov %getexp,300:gosub *lvup
mov %2240,1
goto *sean0114



*zonbe_kousan

gosub *kousan_syori
>Luka yields to the temptation, ending his resistance!\
goto *zonbe_a



*zonbe_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *zonbe_mogaku
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *zonbe_kousan
if %cmd1=16 goto *zonbe_onedari
if %cmd1=17 goto *common_skill
goto *zonbe_main



*zonbe_mogaku

mov %before_action,8
if %nanido=3 rnd2 %ransu,1,2:if %ransu=2 goto *common_mogaku
name "Luka"
>Guh! Get off!\
name ""
dwave 1,"se\dassyutu.ogg"
mov %kousoku,0:gosub *status_print
>Luka pushes the Zombie Girl off of him and jumps up.\
mov %owaza_count1a,0
if %first_sel1=1 goto *common_main
name "Luka"
>It doesn't look like she's very strong...\
name ""
>Her movement and power are both pretty bad...@
>Besides her raw endurance, she's not threatening at all.\
mov %first_sel1,1
goto *common_main



*zonbe_a

if %kousoku=1 gosub *zonbe_a6:goto *common_main
rnd2 %ransu,1,6
if %ransu=1 gosub *zonbe_a1:goto *common_main
if %ransu=2 gosub *zonbe_a2:goto *common_main
if %ransu=3 gosub *zonbe_a3:goto *common_main
if %ransu=4 gosub *zonbe_a4:goto *common_main
if %ransu>4 && %owaza_count1a>3 gosub *zonbe_a5:goto *common_main
skip -6



*zonbe_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Energy... Man's energy..."
if %ransu=2 mov $sel1,"Uuuuu..."
if %ransu=3 mov $sel1,"Want... Energy..."
name $name
eng $sel1:$sel6\
name ""
>The Zombie Girl slowly approaches Luka!\
sub %stack,1
return



*zonbe_a2

add %stack,1
name $name
>............\
name ""
>The Zombie Girl stares ahead with a blank expression!\
sub %stack,1
return



*zonbe_a3

add %stack,1
skillcount1 3086
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Mmm... *Smack*"
if %ransu=2 mov $sel1,"Mm...mmmm..."
if %ransu=3 mov $sel1,"*Smack*"
name $name
eng $sel1:$sel6\
name ""
skillname "Corrupted Kiss"
dwave 1,"se\ero_buchu1.ogg"
>The Zombie Girl kisses Luka!\
>Her cold tongue crawls around Luka's mouth!
if %nanido<2 damage 8,12
if %nanido=2 damage 12,18
if %nanido=3 damage 16,24
skillname ""
if %mylife=0 sub %stack,1:return *zonbe_h2
sub %stack,1
return



*zonbe_a4

add %stack,1
skillcount1 3087
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Uuuu..."
if %ransu=2 mov $sel1,"Mmm..."
if %ransu=3 mov $sel1,"Mmmm... Uuuu..."
name $name
eng $sel1:$sel6\
name ""
skillname "Thirsting Mouth"
dwave 1,"se\ero_buchu3.ogg"
>The Zombie Girl violently sucks on Luka's penis!
if %nanido<2 damage 12,18
if %nanido=2 damage 18,27
if %nanido=3 damage 24,36
skillname ""
if %mylife=0 sub %stack,1:return *zonbe_h3
sub %stack,1
return



*zonbe_a5

add %stack,1
name $name
>Semen... Want...\
name ""
skillname "Throw Down"
>The Zombie Girl throws down Luka and falls on him!\
mov %kousoku,1:gosub *status_print
lsp 690,":c;chara\zonbe_h0.bmp",0,0:print 10,500
>Luka was thrown down by the Zombie Girl!\
skillname ""
name $name
>Thirst... Cure...\
name ""
sub %stack,1
return



*zonbe_a6

add %stack,1
if %kousan>0 skip 4
name $name
>Want... Semen...\
name ""
skillcount1 3133
skillname "Pointless Mating"
dwave 1,"se\ero_pyu1.ogg"
csp 690
lsp 700,":c;chara\zonbe_h1.bmp",0,0:print 10,500
>The Zombie Girl forces her waist down on Luka!\
>Luka is forced into her slimy vagina!
mov %damage_kotei,1
damage 30,40
mov %kousoku,2:mov %genmogaku,100
>Luka is being raped by the Zombie Girl!\
skillname ""
if %mylife=0 sub %stack,1:return *zonbe_h1
name "Luka"
>Aaaaa!\
name ""
>As soon as I'm forced into the Zombie Girl, I'm attacked by a strange feeling.\
>Her cold pussy gently wraps around me, as a sticky liquid flows out of her.\
name "Luka"
>Aiee!\
name ""
>Goosebumps cover my body as this strange stimulation fills me.@
>The horrible taboo of being raped by a zombie paralyzes my mind.\
sub %stack,1
goto *zonbe_a7



*zonbe_a7

add %stack,1
skillcount1 3133
>Luka is being raped by the Zombie Girl!\
rnd2 %ransu,1,10
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Aaa...":mov $sel2,"The Zombie Girl's sticky vagina tightens around Luka!"
if %ransu=2 mov $sel1,"Ah... Uuuu...":mov $sel2,"The Zombie Girl's sticky vagina tightens around Luka!"
if %ransu=3 mov $sel1,"Semen... Man's semen...":mov $sel2,"A sticky liquid flows out from the Zombie Girl's vagina!"
if %ransu=4 mov $sel1,"Thirst... Cure...":mov $sel2,"The Zombie Girl's decaying genitals squeeze Luka!"
if %ransu=5 mov $sel1,"Living thing... Rape...":mov $sel2,"Luka is attacked by a bizarre sensation!"
if %ransu=6 mov $sel1,"Semen... Give...":mov $sel2,"The Zombie Girl's decaying genitals squeeze Luka!"
if %ransu=7 mov $sel1,"Thirsty...":mov $sel2,"The Zombie Girl forces Luka all the way inside of her!"
if %ransu=8 mov $sel1,"More... Warmth...":mov $sel2,"A strange feeling attacks Luka as he's forced deeper into the Zombie Girl's sticky vagina!"
if %ransu=9 mov $sel1,"Energy... Semen...":mov $sel2,"The Zombie Girl's sticky vagina rubs Luka's penis!"
if %ransu=10 mov $sel1,"Aaa... Uuu...":mov $sel2,"The Zombie Girl's vagina tightens around Luka!"
name $name
eng $sel1:$sel6\
name ""
skillname "Pointless Mating"
dwave 1,"se\ero_chupa3.ogg"
>The Zombie Girl shakes her waist as she rapes Luka!\
eng $sel2:$sel6
mov %damage_kotei,1
damage 30,40
skillname ""
if %mylife=0 sub %stack,1:return *zonbe_h1
sub %stack,1
goto *zonbe_a7



*zonbe_onedari

mov $list1,"Corrupted Kiss"
if %3086>0 mov %list_num1,1
mov $list2,"Thirsting Mouth"
if %3087>0 mov %list_num2,1
mov $list3,"Pointless Mating"
if %3133>0 mov %list_num3,1
gosub *cmd_onedari
if %cmd1=11 goto *zonbe_onedari1
if %cmd1=12 goto *zonbe_onedari2
if %cmd1=13 goto *zonbe_onedari3
if %cmd1=-1 goto *zonbe_main
goto *zonbe_onedari



*zonbe_onedari1

gosub *onedari_syori
gosub *zonbe_a3
skip -1



*zonbe_onedari2

gosub *onedari_syori
gosub *zonbe_a4
skip -1



*zonbe_onedari3

gosub *onedari_syori_k
if %kousoku=0 gosub *zonbe_a5
gosub *zonbe_a6



*zonbe_h1

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":c;chara\zonbe_h2.bmp",0,0
gosub *syasei2
>Raped by the Zombie Girl, Luka finally explodes in her cold vagina.\
mov %viclose,1:gosub *lose
mov %2540,%2540+1:if %2540=1 mov %count_koenemy,%count_koenemy+1
if %2540>%count_most mov %count_most,%2540:mov $count_mostname,$name
count 1,4
mov $bad1,"Luka was raped by the Zombie Girl until he was forced to come."
mov $bad2," Luka was raped for the rest of his life in the mansion."
name $name
>Man's semen...@> Warmth... Of life...\
name ""
name "Luka"
>Auuu...\
name ""
>Unable to endure, the sense of defeat fills me as I explode in her.@
>Forced to come by her genitals that can't even bear children any longer...\
>As I'm forced onto the floor, the Zombie Girl mindlessly shakes her waist.\
>The rape of the living by the dead isn't over yet...@
>No... It doesn't even seem like she'll ever stop...\
goto *zonbe_h



*zonbe_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\zonbe_bk12.bmp",245,82
gosub *syasei2
>The sudden sensation from the Zombie Girl's tongue forces Luka to come.\
mov %viclose,1:gosub *lose
mov %2540,%2540+1:if %2540=1 mov %count_koenemy,%count_koenemy+1
if %2540>%count_most mov %count_most,%2540:mov $count_mostname,$name
count 18,4
mov $bad1,"Luka succumbed to the Zombie Girl's corrupted kiss."
mov $bad2," Luka was raped for the rest of his life in the mansion."
goto *zonbe_h



*zonbe_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\zonbe_bk11.bmp",245,82
gosub *syasei2
>Luka succumbs to the Zombie Girl's cold blowjob, shooting his semen out on her face.\
mov %viclose,1:gosub *lose
mov %2540,%2540+1:if %2540=1 mov %count_koenemy,%count_koenemy+1
if %2540>%count_most mov %count_most,%2540:mov $count_mostname,$name
count 4,4
mov $bad1,"Luka succumbed to the Zombie Girl's violent blowjob."
mov $bad2," Luka was raped for the rest of his life in the mansion."
goto *zonbe_h



*zonbe_h

if %2540=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,6:hseanwave:goto *zonbe_hb
name $name
>Man... Energy...@> Warmth... Life...\
name ""
name "Luka"
>Auuu...\
name ""
>Unable to endure her attacks, the sense of defeat fills me.@
>Some poor dead woman's corpse forced me to ejaculate...\
cspl 690,699
lsp 700,":c;chara\zonbe_h0.bmp",0,0:print 10,500
>Too exhausted to fight back, the Zombie Girl knocks me over.@
>As soon as I fall on the floor, she quickly drops her waist on mine.\
name "Luka"
>Aaaa!!\
name ""
mov %hseanwave,6:hseanwave
lsp 700,":c;chara\zonbe_h1.bmp",0,0:print 10,500
>My penis sinks into her slimy vagina.\
>A strange feeling flows through me as I'm forced deeper into her.\
>Sticky liquid flows out of her cold vagina, covering my penis.\
goto *zonbe_hb



*zonbe_hb

name "Luka"
>Aiee!\
name ""
>Goosebumps cover my body as I'm attacked by the strange sensation.@
>The horrible taboo of being raped by a zombie paralyzes my mind.\
name $name
>More... Energy...@
>Warmth of... Life...\
name ""
>The Zombie Girl keeps shaking her waist as her vacant eyes stare right at me.\
>Every movement of hers causes an erotic noise to sound out as our waists hit each other.\
name "Luka"
>Auuu... It's so sticky inside...@
>Incredible...\
name ""
>Her cold vagina isn't too tight...@
>But the sticky liquid feels amazing.\
>The liquid covers my penis, and every thrust causes the friction to rub and heat my penis.\
>This is something a normal female's vagina could never duplicate...@
>As my penis is continually stimulated, I writhe at the immorality of the situation.\
name "Luka"
>Auuu...\
name ""
name $name
>Energy... Want...\
name ""
>Seeing her up close, I can tell she was a beautiful young adventurer.@
>When she was alive, she must have always had a cheerful face...\
>Losing her soul, her body is now being violated...@
>Into her womb, I'm going to shoot out my semen...\
>Having my living seed being shot into her dead womb...@
>The forbidden pleasure leads me to another orgasm.\
name "Luka"
>Aaa... Coming again...!@
>Aaaa!!\
name ""
gosub *syasei1
lsp 700,":c;chara\zonbe_h2.bmp",0,0
gosub *syasei2
>My semen gushes out into her womb that's already ceased to function.@
>The forbidden pleasure forced me to come in this dead girl's vagina...\
>Helpless, I surrender to the taboo pleasure.@
>With her vacant look, the Zombie Girl continues to mindlessly shake her waist.\
name $name
>Energy...@>More... Want...\
name ""
name "Luka"
>Auuu...\
name ""
>As if starving, she continues to move her waist as fast as she can.@
>With my penis stuck in her sticky vagina, she continues raping me.\
>Every thrust fills me with more of that forbidden pleasure, as my waist starts to unconsciously move with hers.\
name "Luka"
>Auu... That's incredible...\
name ""
>Before I noticed it, I had resigned myself to having sex with her.@
>In fact, I'm even enjoying it...\
>Enjoying this immoral act, my sense of shame has been paralyzed.@
>There's no running from this pleasure anymore...\
name $name
>Man's... Warmth...@> More... More...\
name ""
name "Luka"
>Auu... I'm coming again!@
>Ahh! Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":c;chara\zonbe_h3.bmp",0,0
gosub *syasei2
>Having lost the ability to reproduce, all her pussy can do is give pleasure.\
>The semen that gushes out doesn't seem to be made into a meal like other monsters would do, either.\
>Everything I pump into her just flows back out.@
>The only purpose of this meaningless sex is for pleasure...\
name "Luka"
>Auuu... Too good...\
name ""
name $name
>More... More...\
name ""
gosub *syasei1:gosub *syasei2
>In this abandoned house, the living boy and the dead woman continued their intercourse.\
>The living boy's penis continued to shoot his seed into the dead woman's vagina.\
>With his semen pointlessly spilling back out, the only effect from this act is to bring the boy pleasure.\
>Like this, the boy is drowned in the forbidden pleasure from the futile act.\
name "Luka"
>Incredible... Aaa...\
name ""
name $name
>More... Energy...\
name ""
gosub *syasei1:gosub *syasei2
>I can't break free of this forbidden pleasure.@
>Stuck in this house, I'll be violated by this Zombie Girl...@
>Endlessly having sex with her even though no child can be created, I'll keep wasting my semen in her cold vagina...\
>As a pathetic living human, I'll be raped by this pitiful undead monster forever...\
gosub *anten
mov %hseanwave,0:hseanwave
>............\
goto *badend



*zonbes_start

mov $name,"Zombie Girls"
mov $name2,"Zombie Girl C"
mov $lavel,"zonbes"
mov $tatie1,"zonbe_st41"
mov $tatie2,"zonbe_st42"
mov $tatie3,"zonbe_st41"
mov $tatie4,"zonbe_st41"
mov $haikei,"bg057"
mov %monster_x,420
mov %monster_y,12
mov $tatie1b,"zonbe_st31"
mov $tatie2b,"zonbe_st32"
mov $tatie3b,"zonbe_st31"
mov %monster_xb,0
mov %monster_yb,31
mov $tatie1c,"zonbe_st21"
mov $tatie2c,"zonbe_st22"
mov $tatie3c,"zonbe_st21"
mov %monster_xc,270
mov %monster_yc,96
if %nanido=1 mov %max_enemylife,2400
if %nanido=2 mov %max_enemylife,2550
if %nanido=3 mov %max_enemylife,3150
if %nanido=1 mov %henkahp1,1600
if %nanido=2 mov %henkahp1,1700
if %nanido=3 mov %henkahp1,2100
if %nanido=1 mov %henkahp2,800
if %nanido=2 mov %henkahp2,850
if %nanido=3 mov %henkahp2,1050
if %nanido=0 mov %max_enemylife,3
if %nanido=0 mov %henkahp1,2
if %nanido=0 mov %henkahp2,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,99
mov %music,1
gosub *maxmp:mov %mp,%max_mp
mov %tikei,3
mov %tekikazu,3
gosub *syutugen_plural
mov %end_n,4
mov %exp_minus,2150
mov %zmonster_x,0
mov %tukix,550
mov %tekikazu,3
name "Luka"
>Why are there so many zombies...?@
>What the hell is going on in this house!?\
name ""
>This is more like a zombie house than a haunted house.@
>Is there some kind of zombie generator?\
name "Luka"
>Guh... Now isn't the time to think about that!\
name ""
>The last one was pretty weak, but now there's three of them...@
>I have to be careful!\
mov %sinkou,1
goto *common_main



*zonbes001

lsp 700,":a;chara\zonbe_st42.bmp",420,12:print 10,500
name "Zombie Girl C"
>Uuu...aaa...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Zombie Girl C crumples on the ground!\
name "Luka"
>Alright, next one!\
name ""
>There are two left...\
csp 704
lsp 700,":a;chara\zonbe_st31.bmp",100,31
lsp 702,":a;chara\zonbe_st21.bmp",370,96
print 1
mov %tekikazu,2
mov $tatie1,"zonbe_st31"
mov $tatie2,"zonbe_st32"
mov $tatie3,"zonbe_st31"
mov $tatie4,"zonbe_st31"
mov %monster_x,100
mov %monster_y,31
mov $tatie1b,"zonbe_st21"
mov $tatie2b,"zonbe_st22"
mov $tatie3b,"zonbe_st21"
mov %monster_xb,370
mov %monster_yb,96
mov %sinkou,2
mov $name2,"Zombie Girl B"
mov %tukix,170
goto *zonbes_a



*zonbes002

lsp 700,":a;chara\zonbe_st32.bmp",100,31:print 10,500
name "Zombie Girl B"
>Aaa... Uuu...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Zombie Girl B crumples on the ground!\
name "Luka"
>Finally, only one left!\
name ""
>Just one more...\
csp 702
lsp 700,":a;chara\zonbe_st21.bmp",270,96
print 1
mov %tekikazu,1
mov $tatie1,"zonbe_st21"
mov $tatie2,"zonbe_st22"
mov $tatie3,"zonbe_st21"
mov $tatie4,"zonbe_st21"
mov %monster_x,270
mov %monster_y,96
mov %sinkou,3
mov $name2,"Zombie Girl A"
mov %tukix,310
goto *zonbes_a



*zonbes_v

gosub *face2
name "Zombie Girl A"
>Uuu... Aaa...\
name ""
dwave 1,"se\syometu.ogg"
cspl 700,704:print 99,4500,"system\breakup.dll/urb"
>A bright light shoots out from Zombie Girl A's body as she falls to the ground!\
mov %viclose,1:gosub *victory_plural
mov %getexp,700:gosub *lvup
mov %2241,1
goto *sean0115



*zonbes_kousan

gosub *kousan_syori
>Luka yields to temptation, ending his resistance!\
if %kousoku=0 gosub *zonbes_aa4
goto *zonbes_a



*zonbes_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *zonbes_mogaku1
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *zonbes_mogaku1
if %cmd1=12 && %genmogaku=0 goto *zonbes_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *zonbes_kousan
if %cmd1=16 goto *zonbes_onedari
if %cmd1=17 goto *common_skill
goto *zonbes_main



*zonbes_mogaku1

mov %before_action,7
rnd2 %ransu,1,3
if %cmd1=11 && %ransu=1 mov $sel1,"Urgh!"
if %cmd1=11 && %ransu=2 mov $sel1,"Guh... Damn it!"
if %cmd1=11 && %ransu=3 mov $sel1,"Get off!"
if %cmd1=12 && %ransu=1 mov $sel1,"Grr..."
if %cmd1=12 && %ransu=2 mov $sel1,"Let go!"
if %cmd1=12 && %ransu=3 mov $sel1,"Guh... Get off!"
name "Luka"
eng $sel1:$sel6\
name ""
if %cmd1=11 mov $sel1,"Luka attacks!"
if %cmd1=11 gosub *mp_kaihuku:gosub *mp
if %cmd1=12 mov $sel1,"Luka violently struggles!"
if %cmd1=12 mov %genmogaku,%genmogaku-1:if %genmogaku<0 mov %genmogaku,0
eng $sel1:$sel6
if %cmd1=11 mov $sel1,"But Luka can't attack with the zombie on top of him!"
if %cmd1=12 mov $sel1,"Luka can't break free of Zombie Girl A!"
eng $sel1:$sel6\
if %first_sel1=1 goto *zonbes_a
name "Luka"
>Guh... She's stronger than the last zombie...\
mov %first_sel1,1
goto *zonbes_a



*zonbes_mogaku2

mov %before_action,8
if %nanido=2 rnd2 %ransu,1,10:if %ransu=10 goto *zonbes_mogaku1
if %nanido=3 rnd2 %ransu,1,2:if %ransu=2 goto *zonbes_mogaku1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Get off!"
if %ransu=2 mov $sel1,"Damn you!"
if %ransu=3 mov $sel1,"Grrrrr!"
name "Luka"
eng $sel1:$sel6\
name ""
dwave 1,"se\dassyutu.ogg"
mov %kousoku,0:gosub *status_print
>Luka struggles with all of his power and forces Zombie Girl A off of him!\
gosub *face1
mov %owaza_count1a,0
goto *common_main



*zonbes_a

if %enemylife<%henkahp1 && %sinkou=1 goto *zonbes001
if %enemylife<%henkahp2 && %sinkou=2 goto *zonbes002
if %kousoku=1 && %sinkou=3 gosub *zonbes_aa9:goto *common_main
if %kousoku=1 rnd2 %ransu,1,4
if %kousoku=1 && %ransu=1 gosub *zonbes_aa3:goto *zonbes_ab
if %kousoku=1 && %ransu=2 gosub *zonbes_aa5:goto *zonbes_ab
if %kousoku=1 && %ransu=3 gosub *zonbes_aa6:goto *zonbes_ab
if %kousoku=1 && %ransu=4 gosub *zonbes_aa7:goto *zonbes_ab
rnd2 %ransu,1,9
if %ransu<3 gosub *zonbes_aa1:goto *zonbes_ab
if %ransu<5 gosub *zonbes_aa2:goto *zonbes_ab
if %ransu<7 gosub *zonbes_aa3:goto *zonbes_ab
if %ransu>6 && %sinkou<3 && %owaza_count1a>3 gosub *zonbes_aa4:goto *common_main
if %ransu>6 && %sinkou=3 && %owaza_count1a>3 gosub *zonbes_aa8:goto *common_main
skip -6



*zonbes_ab

if %sinkou=3 goto *common_main
if %kousoku=1 rnd2 %ransu,1,4
if %kousoku=1 && %ransu=1 gosub *zonbes_ab3:goto *zonbes_ac
if %kousoku=1 && %ransu=2 gosub *zonbes_ab4:goto *zonbes_ac
if %kousoku=1 && %ransu=3 gosub *zonbes_ab5:goto *zonbes_ac
if %kousoku=1 && %ransu=4 gosub *zonbes_ab6:goto *zonbes_ac
rnd2 %ransu,1,3
if %ransu=1 gosub *zonbes_ab1:goto *zonbes_ac
if %ransu=2 gosub *zonbes_ab2:goto *zonbes_ac
if %ransu=3 gosub *zonbes_ab3:goto *zonbes_ac
skip -4



*zonbes_ac

if %sinkou=2 goto *common_main
if %kousoku=1 rnd2 %ransu,1,4
if %kousoku=1 && %ransu=1 gosub *zonbes_ac3:goto *common_main
if %kousoku=1 && %ransu=2 gosub *zonbes_ac4:goto *common_main
if %kousoku=1 && %ransu=3 gosub *zonbes_ac5:goto *common_main
if %kousoku=1 && %ransu=4 gosub *zonbes_ac6:goto *common_main
rnd2 %ransu,1,3
if %ransu=1 gosub *zonbes_ac1:goto *common_main
if %ransu=2 gosub *zonbes_ac2:goto *common_main
if %ransu=3 gosub *zonbes_ac3:goto *common_main
skip -4



*zonbes_aa1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Uuu...Aaa..."
if %ransu=2 mov $sel1,"Thirst...Heal..."
if %ransu=3 mov $sel1,"Man...Energy..."
name "Zombie Girl A"
eng $sel1:$sel6\
name ""
>Zombie Girl A slowly shambles toward Luka!\
sub %stack,1
return



*zonbes_aa2

add %stack,1
name "Zombie Girl A"
>..............\
name ""
>Zombie Girl A stares blankly at nothing in particular!\
sub %stack,1
return



*zonbes_aa3

add %stack,1
mov %hanyo1,1
skillcount1 3134
if %kousoku=0 skip 2
>Luka's body is held down by the zombies!\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"*Lick*"
if %ransu=2 mov $sel1,"Aaa... Uuu..."
if %ransu=3 mov $sel1,"*Lick*"
name "Zombie Girl A"
eng $sel1:$sel6\
name ""
skillname "Corrupted Nipple Lick"
dwave 1,"se\ero_pyu1.ogg"
>Zombie Girl A licks Luka's right nipple as she clings to him!
if %nanido<2 damage 6,7
if %nanido=2 damage 9,10
if %nanido=3 damage 12,14
skillname ""
if %mylife=0 sub %stack,1:return *zonbes_h2
sub %stack,1
return



*zonbes_aa4

add %stack,1
name "Zombie Girl A"
>Uuu... Aaa...\
name ""
skillname "Cling"
>Zombie Girl A grabs onto Luka's body and forces him to the ground!@
mov %kousoku,1:gosub *status_print
>Luka is being held down by Zombie Girl A!\
skillname ""
if %sinkou=3 sub %stack,1:return
name "Zombie Girl B"
>Man... Want...\
name ""
if %sinkou=2 skip 4
name "Zombie Girl C"
>Uuuu... More warmth...\
name ""
if %sinkou=1 mov $sel1,"The other zombies jump on Luka!":mov $sel2,"three"
if %sinkou=2 mov $sel1,"Zombie Girl B jumps onto Luka as well!":mov $sel2,"two"
eng $sel1:$sel6\
if %nanido<2 mov %genmogaku,2
if %nanido=2 mov %genmogaku,3
if %nanido=3 mov %genmogaku,4
sub %stack,1
return



*zonbes_aa5

add %stack,1
mov %hanyo1,1
skillcount1 3136
>Luka's body is held down by the zombies!\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Man..."
if %ransu=2 mov $sel1,"Uuu... Aaa..."
if %ransu=3 mov $sel1,"............"
name "Zombie Girl A"
eng $sel1:$sel6\
name ""
skillname "Corrupted Tit Fuck"
dwave 1,"se\ero_koki1.ogg"
>Zombie Girl A forces Luka's face into her breasts as she clings to him!\
>She squeezes his head with her breasts!
if %nanido<2 damage 4,5
if %nanido=2 damage 6,7
if %nanido=3 damage 8,10
skillname ""
if %mylife=0 sub %stack,1:return *zonbes_h4
sub %stack,1
return



*zonbes_aa6

add %stack,1
mov %hanyo1,1
skillcount1 3135
>Luka's body is held down by the zombies!\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Uuu..."
if %ransu=2 mov $sel1,"Can... Eat...?"
if %ransu=3 mov $sel1,"So... Hungry..."
name "Zombie Girl A"
eng $sel1:$sel6\
name ""
skillname "Corrupted Bite"
dwave 1,"se\ero_buchu2.ogg"
>Zombie Girl A weakly bites Luka's sack!\
>Her toothless mouth only brings pleasure!
if %nanido<2 damage 7,8
if %nanido=2 damage 10,12
if %nanido=3 damage 14,16
skillname ""
if %mylife=0 sub %stack,1:return *zonbes_h3
sub %stack,1
return



*zonbes_aa7

add %stack,1
mov %hanyo1,1
>Luka's body is held down by the zombies!\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Guhh.... Uuu..."
if %ransu=2 mov $sel1,"Aaa... Uuu..."
if %ransu=3 mov $sel1,"Man... Spirit..."
name "Zombie Girl A"
eng $sel1:$sel6\
name ""
skillname "Corrupted Kiss"
dwave 1,"se\ero_chupa1.ogg"
>While clinging to Luka, Zombie Girl A kisses him!\
>Her slimy tongue forces itself into his mouth!
if %nanido<2 damage 5,6
if %nanido=2 damage 7,9
if %nanido=3 damage 10,12
skillname ""
if %mylife=0 sub %stack,1:return *zonbes_h1
sub %stack,1
return



*zonbes_aa8

add %stack,1
name "Zombie Girl A"
>Man... Semen...\
name ""
skillname "Throw Down"
>Zombie Girl A throws Luka down and jumps on him!@
mov %kousoku,1:gosub *status_print
>Luka is being held down by Zombie Girl A !\
skillname ""
name "Zombie Girl A"
>Semen... Want...\
name ""
mov %genmogaku,0
sub %stack,1
return



*zonbes_aa9

add %stack,1
skillcount1 3137
if %kousan>0 skip 4
name "Zombie Girl A"
>Man... Rape...\
name ""
skillname "Pointless Mating"
dwave 1,"se\ero_pyu1.ogg"
>Zombie Girl A forces her waist down on Luka!\
>Luka's penis is forced all the way into her slimy vagina!
mov %damage_kotei,1
damage 30,40
mov %kousoku,2:mov %genmogaku,100
>Luka is being raped by Zombie Girl A!\
skillname ""
if %mylife=0 sub %stack,1:return *zonbes_h5
name "Luka"
>Aaaa!\
name ""
>A strange feeling hits me as I'm forced inside of her.\
>Not too tight, but not too loose...@
>A sticky liquid flows out of her cold vagina.\
name "Luka"
>Aiee!\
name ""
>Goosebumps cover my body as the strange sensation fills me.@
>I'm being raped by a zombie... The thought of committing this taboo paralyzes my mind.\
if %kousan=2 sub %stack,1:return
sub %stack,1
goto *zonbes_aa10



*zonbes_aa10

add %stack,1
skillcount1 3137
>Luka is being raped by Zombie Girl A!\
rnd2 %ransu,1,10
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Aaa...":mov $sel2,"Zombie Girl A's sticky vagina tightens around Luka!"
if %ransu=2 mov $sel1,"Ah... Uuuu...":mov $sel2,"Zombie Girl A's sticky vagina tightens around Luka!"
if %ransu=3 mov $sel1,"Semen... Man's semen...":mov $sel2,"A sticky liquid flows out from Zombie Girl A's vagina!"
if %ransu=4 mov $sel1,"Thirst... Cure...":mov $sel2,"Zombie Girl A's decaying genitals squeeze Luka!"
if %ransu=5 mov $sel1,"Living thing... Rape...":mov $sel2,"Luka is attacked by a bizarre sensation!"
if %ransu=6 mov $sel1,"Semen... Give...":mov $sel2,"Zombie Girl A's decaying genitals squeeze Luka!"
if %ransu=7 mov $sel1,"Thirsty...":mov $sel2,"Zombie Girl A forces Luka all the way inside of her!"
if %ransu=8 mov $sel1,"More... Warmth...":mov $sel2,"A strange feeling attacks Luka as he's forced deeper into Zombie Girl A's sticky vagina!"
if %ransu=9 mov $sel1,"Energy... Semen...":mov $sel2,"Zombie Girl A's sticky vagina rubs Luka's penis!"
if %ransu=10 mov $sel1,"Aaa... Uuu...":mov $sel2,"Zombie Girl A's vagina tightens around Luka!"
name "Zombie Girl A"
eng $sel1:$sel6\
name ""
skillname "Pointless Mating"
dwave 1,"se\ero_chupa3.ogg"
>Zombie Girl A mindlessly shakes her waist as she rapes Luka!\
eng $sel2:$sel6
mov %damage_kotei,1
damage 30,40
skillname ""
if %mylife=0 sub %stack,1:return *zonbes_h5
if %kousan=2 sub %stack,1:return
sub %stack,1
goto *zonbes_aa10



*zonbes_ab1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Throat... Dry..."
if %ransu=2 mov $sel1,"Man...Man... Man..."
if %ransu=3 mov $sel1,"Man... Hungry..."
name "Zombie Girl B"
eng $sel1:$sel6\
name ""
>Zombie Girl B slowly shambles toward Luka.\
sub %stack,1
return



*zonbes_ab2

add %stack,1
name "Zombie Girl B"
>............\
name ""
>Zombie Girl B stares at the floor in a daze!\
sub %stack,1
return



*zonbes_ab3

add %stack,1
mov %hanyo1,2
skillcount1 3135
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Uuu..."
if %ransu=2 mov $sel1,"Can... Eat...?"
if %ransu=3 mov $sel1,"So... Hungry..."
name "Zombie Girl B"
eng $sel1:$sel6\
name ""
skillname "Corrupted Bite"
dwave 1,"se\ero_buchu2.ogg"
>Zombie Girl B weakly bites Luka's penis!\
>Her toothless mouth only brings pleasure!
if %nanido<2 damage 7,8
if %nanido=2 damage 10,12
if %nanido=3 damage 14,16
skillname ""
if %mylife=0 sub %stack,1:return *zonbes_h3
sub %stack,1
return



*zonbes_ab4

add %stack,1
mov %hanyo1,2
skillcount1 3134
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"*Lick*"
if %ransu=2 mov $sel1,"Man... Nipple..."
if %ransu=3 mov $sel1,"Man's... Taste..."
name "Zombie Girl B"
eng $sel1:$sel6\
name ""
skillname "Corrupted Nipple Lick"
dwave 1,"se\ero_pyu1.ogg"
>Zombie Girl B's tongue licks Luka's left nipple!
if %nanido<2 damage 6,7
if %nanido=2 damage 9,10
if %nanido=3 damage 12,14
skillname ""
if %mylife=0 sub %stack,1:return *zonbes_h2
sub %stack,1
return



*zonbes_ab5

add %stack,1
mov %hanyo1,2
skillcount1 3136
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Man's... Energy..."
if %ransu=2 mov $sel1,"Chest... Warm..."
if %ransu=3 mov $sel1,"Auuuu..."
name "Zombie Girl B"
eng $sel1:$sel6\
name ""
skillname "Corrupted Tit Fuck"
dwave 1,"se\ero_koki1.ogg"
>Zombie Girl B puts Luka's penis between her breasts as she squeezes it between them!
if %nanido<2 damage 7,8
if %nanido=2 damage 10,12
if %nanido=3 damage 14,16
skillname ""
if %mylife=0 sub %stack,1:return *zonbes_h4
sub %stack,1
return



*zonbes_ab6

add %stack,1
mov %hanyo1,2
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Uuu..."
if %ransu=2 mov $sel1,"*Smack*"
if %ransu=3 mov $sel1,"Aaa..."
name "Zombie Girl B"
eng $sel1:$sel6\
name ""
skillname "Corrupted Kiss"
dwave 1,"se\ero_chupa1.ogg"
>Zombie Girl B kisses Luka!\
>She forces her slimy tongue into Luka's mouth!
if %nanido<2 damage 5,6
if %nanido=2 damage 7,9
if %nanido=3 damage 10,12
skillname ""
if %mylife=0 sub %stack,1:return *zonbes_h1
sub %stack,1
return



*zonbes_ac1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"So... Cold..."
if %ransu=2 mov $sel1,"Want... Warmth..."
if %ransu=3 mov $sel1,"Uuu... Aaa..."
name "Zombie Girl C"
eng $sel1:$sel6\
name ""
>Zombie Girl C clings to Luka's body!\
sub %stack,1
return



*zonbes_ac2

add %stack,1
name "Zombie Girl C"
>Want... Warm...\
name ""
>Zombie Girl C has an agonized look on her face!\
sub %stack,1
return



*zonbes_ac3

add %stack,1
mov %hanyo1,3
skillcount1 3136
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Man's... Warmth..."
if %ransu=2 mov $sel1,"Energy... Chest..."
if %ransu=3 mov $sel1,"Uuu..."
name "Zombie Girl C"
eng $sel1:$sel6\
name ""
skillname "Corrupted Tit Fuck"
dwave 1,"se\ero_koki1.ogg"
>Zombie Girl C puts Luka's penis between her breasts and crushes it between them!
if %nanido<2 damage 7,8
if %nanido=2 damage 10,12
if %nanido=3 damage 14,16
skillname ""
if %mylife=0 sub %stack,1:return *zonbes_h4
sub %stack,1
return



*zonbes_ac4

add %stack,1
mov %hanyo1,3
skillcount1 3135
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Aaa..."
if %ransu=2 mov $sel1,"Uuuu..."
if %ransu=3 mov $sel1,"Man... Eat..."
name "Zombie Girl C"
eng $sel1:$sel6\
name ""
skillname "Corrupted Bite"
dwave 1,"se\ero_buchu2.ogg"
>Zombie Girl C weakly bites on Luka's scrotum!\
>Her toothless mouth only brings pleasure!
if %nanido<2 damage 7,8
if %nanido=2 damage 10,12
if %nanido=3 damage 14,16
skillname ""
if %mylife=0 sub %stack,1:return *zonbes_h3
sub %stack,1
return



*zonbes_ac5

add %stack,1
mov %hanyo1,3
skillcount1 3134
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Uuu..."
if %ransu=2 mov $sel1,"*Lick*"
if %ransu=3 mov $sel1,"*Suck*"
name "Zombie Girl C"
eng $sel1:$sel6\
name ""
skillname "Corrupted Nipple Lick"
dwave 1,"se\ero_pyu1.ogg"
>Zombie Girl C licks Luka's right nipple!
if %nanido<2 damage 6,7
if %nanido=2 damage 9,12
if %nanido=3 damage 12,14
skillname ""
if %mylife=0 sub %stack,1:return *zonbes_h2
sub %stack,1
return



*zonbes_ac6

add %stack,1
mov %hanyo1,3
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"*Smack*"
if %ransu=2 mov $sel1,"Uuu..."
if %ransu=3 mov $sel1,"Aaa..."
name "Zombie Girl C"
eng $sel1:$sel6\
name ""
skillname "Corrupted Kiss"
dwave 1,"se\ero_chupa1.ogg"
>Zombie Girl C kisses Luka!\
>She forces her slimy tongue into Luka's mouth!
if %nanido<2 damage 5,6
if %nanido=2 damage 7,9
if %nanido=3 damage 10,12
skillname ""
if %mylife=0 sub %stack,1:return *zonbes_h1
sub %stack,1
return



*zonbes_onedari

mov $list1,"Corrupted Nipple Lick"
if %3134>0 mov %list_num1,1
mov $list2,"Corrupted Bite"
if %3135>0 mov %list_num2,1
mov $list3,"Corrupted Tit Fuck"
if %3136>0 mov %list_num3,1
mov $list4,"Pointless Mating"
if %3137>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *zonbes_onedari1
if %cmd1=12 goto *zonbes_onedari2
if %cmd1=13 goto *zonbes_onedari3
if %cmd1=14 goto *zonbes_onedari4
if %cmd1=-1 goto *zonbes_main
goto *zonbes_onedari



*zonbes_onedari1

gosub *onedari_syori_k
if %kousoku=0 gosub *zonbes_aa4
gosub *zonbes_aa3
if %sinkou<3 gosub *zonbes_ab4
if %sinkou=1 gosub *zonbes_ac5
skip -3



*zonbes_onedari2

gosub *onedari_syori_k
if %kousoku=0 gosub *zonbes_aa4
gosub *zonbes_aa6
if %sinkou<3 gosub *zonbes_ab3
if %sinkou=1 gosub *zonbes_ac4
skip -3



*zonbes_onedari3

gosub *onedari_syori_k
if %kousoku=0 gosub *zonbes_aa4
gosub *zonbes_aa5
if %sinkou<3 gosub *zonbes_ab5
if %sinkou=1 gosub *zonbes_ac3
skip -3



*zonbes_onedari4

gosub *onedari_syori_k
if %kousoku=0 gosub *zonbes_aa8
gosub *zonbes_aa9
if %sinkou>2 skip 6
rnd2 %ransu,1,4
if %ransu=1 gosub *zonbes_ab3:skip 4
if %ransu=2 gosub *zonbes_ab4:skip 3
if %ransu=3 gosub *zonbes_ab5:skip 2
if %ransu=4 gosub *zonbes_ab6
if %sinkou>1 skip 6
rnd2 %ransu,1,4
if %ransu=1 gosub *zonbes_ac3:skip 4
if %ransu=2 gosub *zonbes_ac4:skip 3
if %ransu=3 gosub *zonbes_ac5:skip 2
if %ransu=4 gosub *zonbes_ac6
gosub *zonbes_aa10
if %sinkou>2 skip 6
rnd2 %ransu,1,4
if %ransu=1 gosub *zonbes_ab3:skip 4
if %ransu=2 gosub *zonbes_ab4:skip 3
if %ransu=3 gosub *zonbes_ab5:skip 2
if %ransu=4 gosub *zonbes_ab6
if %sinkou>1 skip 6
rnd2 %ransu,1,4
if %ransu=1 gosub *zonbes_ac3:skip 4
if %ransu=2 gosub *zonbes_ac4:skip 3
if %ransu=3 gosub *zonbes_ac5:skip 2
if %ransu=4 gosub *zonbes_ac6
skip -13



*zonbes_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
if %hanyo1=1 && %sinkou=2 lsp 691,":a;chara\zonbe_bk23.bmp",370,96:skip 5
if %hanyo1=2 && %sinkou=2 lsp 692,":a;chara\zonbe_bk33.bmp",100,31:skip 4
if %hanyo1=1 lsp 691,":a;chara\zonbe_bk23.bmp",270,96:skip 3
if %hanyo1=2 lsp 692,":a;chara\zonbe_bk33.bmp",0,31:skip 2
if %hanyo1=3 lsp 693,":a;chara\zonbe_bk43.bmp",420,12
gosub *syasei2
>While being kissed by the zombie, Luka finally orgasms.\
mov %viclose,1:gosub *lose
mov %2541,%2541+1:if %2541=1 mov %count_koenemy,%count_koenemy+1
if %2541>%count_most mov %count_most,%2541:mov $count_mostname,$name
count 18,4
mov $bad1,"Luka succumbed to the zombies corrupted kiss."
mov $bad2," Raped one after another by the zombies, Luka was squeezed dry."
goto *zonbes_h



*zonbes_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
if %hanyo1=1 && %sinkou=2 lsp 691,":a;chara\zonbe_bk23.bmp",370,96:skip 5
if %hanyo1=2 && %sinkou=2 lsp 692,":a;chara\zonbe_bk33.bmp",100,31:skip 4
if %hanyo1=1 lsp 691,":a;chara\zonbe_bk23.bmp",270,96:skip 3
if %hanyo1=2 lsp 692,":a;chara\zonbe_bk33.bmp",0,31:skip 2
if %hanyo1=3 lsp 693,":a;chara\zonbe_bk43.bmp",420,12
gosub *syasei2
>While his nipples is being licked by the zombie, Luka finally orgasms.\
mov %viclose,1:gosub *lose
mov %2541,%2541+1:if %2541=1 mov %count_koenemy,%count_koenemy+1
if %2541>%count_most mov %count_most,%2541:mov $count_mostname,$name
count 23,4
mov $bad1,"Luka succumbed to the zombies corrupted nipple lick."
mov $bad2," Raped one after another by the zombies, Luka was squeezed dry."
goto *zonbes_h



*zonbes_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
if %hanyo1=1 && %sinkou=2 lsp 691,":a;chara\zonbe_bk21.bmp",370,96:skip 5
if %hanyo1=2 && %sinkou=2 lsp 692,":a;chara\zonbe_bk31.bmp",100,31:skip 4
if %hanyo1=1 lsp 691,":a;chara\zonbe_bk21.bmp",270,96:skip 3
if %hanyo1=2 lsp 692,":a;chara\zonbe_bk31.bmp",0,31:skip 2
if %hanyo1=3 lsp 693,":a;chara\zonbe_bk41.bmp",420,12
gosub *syasei2
>The zombie's gentle bite forces Luka over the edge, as he finally orgasms.\
mov %viclose,1:gosub *lose
mov %2541,%2541+1:if %2541=1 mov %count_koenemy,%count_koenemy+1
if %2541>%count_most mov %count_most,%2541:mov $count_mostname,$name
count 4,4
mov $bad1,"Luka succumbed to the zombies corrupted bite."
mov $bad2," Raped one after another by the zombies, Luka was squeezed dry."
goto *zonbes_h



*zonbes_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
if %hanyo1=1 && %sinkou=2 lsp 691,":a;chara\zonbe_bk22.bmp",370,96:skip 5
if %hanyo1=2 && %sinkou=2 lsp 692,":a;chara\zonbe_bk32.bmp",100,31:skip 4
if %hanyo1=1 lsp 691,":a;chara\zonbe_bk22.bmp",270,96:skip 3
if %hanyo1=2 lsp 692,":a;chara\zonbe_bk32.bmp",0,31:skip 2
if %hanyo1=3 lsp 693,":a;chara\zonbe_bk42.bmp",420,12
gosub *syasei2
>The zombies soft chest forces Luka over the edge, as he finally orgasms.\
mov %viclose,1:gosub *lose
mov %2541,%2541+1:if %2541=1 mov %count_koenemy,%count_koenemy+1
if %2541>%count_most mov %count_most,%2541:mov $count_mostname,$name
count 7,4
mov $bad1,"Luka succumbed to the zombies corrupted tit fuck."
mov $bad2," Raped one after another by the zombies, Luka was squeezed dry."
goto *zonbes_h



*zonbes_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
if %sinkou=2 lsp 691,":a;chara\zonbe_bk23.bmp",370,96:skip 2
lsp 691,":a;chara\zonbe_bk23.bmp",270,96
gosub *syasei2
>While being raped by Zombie Girl A, Luka finally orgasms.@
>His warm semen shoots into her cold vagina.\
mov %viclose,1:gosub *lose
mov %2541,%2541+1:if %2541=1 mov %count_koenemy,%count_koenemy+1
if %2541>%count_most mov %count_most,%2541:mov $count_mostname,$name
count 1,4
mov $bad1,"While being violated by Zombie Girl A, Luka ejaculated."
mov $bad2," Raped one after another by the zombies, Luka was squeezed dry."
name "Zombie Girl A"
>Man's... Energy...@> Warm... Life...\
name ""
>Even after I came, she doesn't stop shaking her waist.@
>Before I noticed it, more zombies were coming into the room.\
cspl 690,699
lsp 700,":c;chara\zonbes_h2.bmp",0,0:print 10,500
>Two more zombies cling to my body.\
name "Luka"
>Urgh... Guh...\
name ""
>While the two new zombies cling tighter to me, the first zombie mindlessly shakes her waist.\
mov $tatie2,"zonbe_st21"
mov %monster_y,96
if %2541=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %hseanwave,1:hseanwave
goto *zonbes_hb



*zonbes_h

mov $tatie2,"zonbe_st21"
mov %monster_y,96
if %2541=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Auuu...\
name ""
>Too weak to fight back, two of the zombies cling to me and hold me down.\
cspl 690,699
lsp 700,":c;chara\zonbes_h1.bmp",0,0:print 10,500
>Suddenly, Zombie Girl A straddles my waist!\
name "Zombie Girl A"
>Want... Semen...@> Man... Rape...\
name ""
name "Luka"
>No way...@>Stop!\
name ""
>Unable to move as the two other zombies hold me down...@
mov %hseanwave,1:hseanwave
lsp 700,":c;chara\zonbes_h2.bmp",0,0:print 10,500
>Zombie Girl A slams her waist down on me, forcing my penis all the way into her!\
goto *zonbes_hb



*zonbes_hb

name "Luka"
>Auuu...\
name ""
>The sticky liquid flowing out from her vagina brings amazing pleasure with every movement of her waist.\
>The pleasure brought by the warm friction from the movement in her cold vagina sends a chill down my spine.\
name "Luka"
>Aaaa...\
name ""
name "Zombie Girl B"
>Man's... Warmth...\
name ""
name "Zombie Girl C"
>Auuu... So cold...\
name ""
>The other zombies lean over me at the same time.\
>One starts to lick my chest, focusing on my nipples.@
>The other one starts to gently bite on my neck with her toothless mouth.\
name "Luka"
>S...Stop! Ahhhmmf.\
name ""
>As I start to scream, one of the zombies kisses me.\
>Her thick lips cover my mouth as she forces her tongue into my mouth.@
>Surprisingly, she smells exactly like a human female, with no hint of decaying flesh or rotten smells.\
>Her tongue invades my mouth and quickly moves around, as if desperately trying to taste every part of my mouth.\
name "Luka"
>Mmmmfff...\
name ""
name "Zombie Girl B"
>Mmmm... *Suck*@> *Smack*\
name ""
name ""
>Licking my body, raping me, kissing me...@
>As the zombies rape me, all I can do is soak in the sensations from every direction.\
>This hateful, sweet pleasure...@
>The zombies are mindlessly toying with my body.\
name "Zombie Girl A"
>Energy... Man's... Energy...\
name ""
>The zombie who's pumping me as fast as she can lets out a moan.@
>The sticky feeling of her cold pussy is quickly forcing me to another orgasm.\
name "Luka"
>Auuu... I'm going to come again...\
name ""
name "Zombie Girl A"
>Man... Semen... Warmth...\
name ""
>As if she can sense me reaching my limit, her pace quickens.@
>Pumping me up and down, she's desperately forcing me all the way in and out of her.\
name "Luka"
>Aaaaa!!\
name ""
gosub *syasei1
lsp 700,":c;chara\zonbes_h3.bmp",0,0
gosub *syasei2
>I explode inside of her, pouring my semen into her non functioning womb.@
>My mind is paralyzed by the horror of breaking the ultimate taboo.\
mov %hseanwave,0:hseanwave
name "Zombie Girl B"
>Energy... Man's...\
name ""
>Suddenly, another zombie leans over my abdomen.\
>She pushes away the zombie that was just raping me, and forces me inside of her.\
name "Luka"
>Auuu...@>Stop...\
name ""
name "Zombie Girl B"
>Thrist... Quench...\
name ""
mov %hseanwave,3:hseanwave
>With a lewd noise, my dick is forced all the way into the new zombie's slimy pussy.\
>This new zombie's vagina was much tighter than the last.@
>The new sensation causes my body to writhe as she moves her waist.\
>Even though I'm being raped by a zombie, I can't deny the rising pleasure.\
name "Luka"
>Aaaa... That feels good...\
name ""
name "Zombie Girl A"
>Uuuu... Man's... Warmth...\
name ""
>The zombie that was thrust aside shambles back over and starts to nibble on my thighs.\
>As I look over at her, I see numerous zombies slowly shambling towards me.\
>More zombies start to lean over and lick and gently bite the exposed areas of my body.\
name "Zombie Girl B"
>Aaaa...\
name ""
name "Luka"
>Faaa... Amazing...\
name ""
>The zombie raping me keeps mindlessly pumping me.@
>Intoxicated by the orgy of zombies stimulating me all over, all I can do is moan in pleasure.\
>Suddenly...@
lsp 700,":c;chara\zonbes_h4.bmp",0,0:print 10,500
>A strange girl leans over my face.\
name "Mysterious Girl"
>Who are you...?@
>Why are you having sex with my creations without my permission?\
name ""
name "Luka"
>Who... are... you?\
name ""
name "Mysterious Girl"
>...Well, whatever.@
>I guess I'll use you as an experiment for what happens when zombies have sex.\
>I'll check in on you every so often, so I'll just let the zombies rape you as much as they want.\
>...Goodbye.\
name ""
lsp 700,":c;chara\zonbes_h3.bmp",0,0:print 10,500
>Leaving that final message, she vanishes.\
name "Luka"
>What's going on...?@>Ahhh!\
name ""
name "Zombie Girl B"
>Male... Energy...\
name ""
>The zombie raping me desperately shakes her waist.@
>Overwhelmed by her sticky narrow pussy, I'm forced to orgasm again.\
gosub *syasei1
lsp 700,":c;chara\zonbes_h5.bmp",0,0:print 10,500
gosub *syasei2
>More of my warm semen gushes out into this new zombie's cold vagina.\
name "Luka"
>Faaa...\
name ""
>With no time to enjoy the lingering pleasure of my last ejaculation...@
mov %hseanwave,0:hseanwave
>The zombie who was raping me is pushed away as another zombie takes her place.\
>Again, my dick is forced into a new zombie.\
name "Luka"
>Aaaa!!\
name ""
mov %hseanwave,9:hseanwave
>Unlike the last two zombies, this one has strange creases and folds inside.\
>The new stimulation causes my body to writhe pathetically as the other zombies continue to lick and nibble on me.\
name "Zombie Girl C"
>Warmth... Want...\
name ""
name "Luka"
>Faa... Amazing...\
name ""
>Her complex feeling pussy rubs me all over as she pumps me.\
>Her pussy must have been amazing when alive, but after death the shape must have changed even more.\
>Disappointingly short due to her amazing pussy, I feel another orgasm coming.\
name "Luka"
>Ah! Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":c;chara\zonbes_h6.bmp",0,0:print 10,500
gosub *syasei2
>I explode inside of her amazing pussy.@
>Just like before, she's thrust aside as another zombie takes her place.\
>I feel myself getting excited at what the new zombie will feel like...\
name "Zombie Girl D"
>Energy... More...\
name ""
name "Luka"
>Auuu... It's too good...\
name ""
gosub *syasei1
lsp 700,":c;chara\zonbes_h7.bmp",0,0:print 10,500
gosub *syasei2
gosub *anten
mov %hseanwave,0:hseanwave
>I'm raped one after another by the zombies.@
>I surrender myself to the immoral pleasure of their non functioning, cold vaginas.\
>My mind's already been broken by the twisted pleasure.@
>Stuck in this house that nobody will come to again, I'll be raped by all of the zombies until my death...\
>..............\
goto *badend



*frederika_start

mov $name,"Frederika"
mov $name2,"Frederika"
mov $lavel,"frederika"
mov $tatie1,"frederika_st01"
mov $tatie2,"frederika_st02"
mov $tatie3,"frederika_st03"
mov $tatie4,"frederika_st02"
mov $haikei,"bg055"
mov %monster_x,88
mov %monster_y,0
if %nanido=1 mov %max_enemylife,2100
if %nanido=2 mov %max_enemylife,2400
if %nanido=3 mov %max_enemylife,2700
if %nanido=1 mov %henkahp1,1400
if %nanido=2 mov %henkahp1,1600
if %nanido=3 mov %henkahp1,1800
if %nanido=1 mov %henkahp2,800
if %nanido=2 mov %henkahp2,900
if %nanido=3 mov %henkahp2,1000
if %nanido=0 mov %max_enemylife,3
if %nanido=0 mov %henkahp1,2
if %nanido=0 mov %henkahp2,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,2
gosub *maxmp:mov %mp,%max_mp
mov %tikei,3
gosub *syutugen2
mov %end_n,4
mov %exp_minus,2850
mov %zmonster_x,-150
mov %tukix,300
name $name
>Understood... Master...\
name ""
name "Luka"
>Gah...\
name ""
>This girl is innocent...@
>She didn't choose to become like this... But I still need to defend myself...\
mov %sinkou,1
goto *common_main



*frederika001

name $name
>Please... me...\
name ""
name "Luka"
>Eh...?\
name ""
>Suddenly, Frederika starts to whisper something.\
name $name
>Please... Kill... Me...\
name ""
name "Luka"
>What...?\
name ""
>While attacking me with an expressionless face, she softly pleads to me.\
name $name
>I don't want... This...@
>Please... Kill...\
name ""
name "Luka"
>Frederika...\
name ""
name "Chrome"
>What are you babbling about?@
>Frederika! Use that move!\
name ""
name $name
>Understood...\
name ""
skillcount1 3141
skillname "Immoral Trio"
>Frederika reaches out to Luka's groin!\
name "Chrome"
>I switched her fingers with ones from a young pianist.@
>Her nimble fingers should feel amazing...\
name ""
dwave 1,"se\ero_koki1.ogg"
>Her right hand grabs Luka's penis!
damage 16,19
dwave 1,"se\ero_koki1.ogg"
>The left hand strokes his penis, as all five of her fingers rub him!
damage 16,19
dwave 1,"se\ero_koki1.ogg"
>Her ten fingers quickly rub and massage every part of Luka's penis!
damage 16,19
skillname ""
if %mylife=0 goto *frederika_h4
name "Luka"
>Faaaa!!\
name ""
>The amazing handjob from Frederika quickly sends me to the edge of an orgasm.\
name "Chrome"
>Hehe... You can't endure it, can you?@
>Just like that, keep bringing him closer to defeat, Frederika...\
name ""
mov %owaza_count3a,0
mov %sinkou,2
goto *common_main



*frederika002

name $name
>No more...@
>Please... Free me...\
name ""
name "Luka"
>.....!!\
name ""
>Chrome violated her body and forced her to wake from her eternal slumber...\
>But she isn't able to disobey Chrome...@
>Forced to act, her soul is crying out...\
name $name
>Please...\
name ""
name "Luka"
>I understand!\
name ""
>All I can do is free her...@
>Destroy this hideous body, and set her soul free...\
name "Chrome"
>Hmph... How tenacious.@
>Fine then. Frederika, use your killing move!\
name ""
name $name
>Understood...\
name ""
skillname "Throw Down"
>Frederika forces Luka to the ground!@
mov %kousoku,1:gosub *status_print
>Frederika's right arm holds down Luka's leg as he's left unable to move!\
skillname ""
name "Luka"
>Guh... What are you doing?\
name ""
>Unable to move my lower body, I twist around fruitlessly.@
>But with Frederika firmly holding my legs, I can't move.\
name "Chrome"
>Hahaha... Once she holds down a man's legs, all she is is a pleasure machine.\
>Now go mad as you lay there helpless while she rapes you!\
name ""
mov %sinkou,3
goto *common_main



*frederika_v

gosub *face3
name $name
>Thank... you...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>A bright light escapes from Frederika's body as her corpse vanishes.@
>With that, her soul has been freed...\
mov %viclose,1:gosub *victory
mov %getexp,1200:gosub *lvup
mov %2242,1
goto *sean0116



*frederika_kousan

gosub *kousan_syori
>Luka yields to the temptation, ending his resistance!\
gosub *face2
name "Chrome"
>Frederika, he surrendered to your beauty.@
>Now, play with him as much as you want...\
name ""
goto *frederika_a



*frederika_main

gosub *cmd_main
if %cmd1=11 && %kousoku=2 mov %abairitu,50:goto *frederika_miss2
if %cmd1=11 && %kousoku>0 goto *frederika_mogaku1
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *frederika_mogaku1
if %cmd1=12 && %genmogaku=0 goto *frederika_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *frederika_kousan
if %cmd1=16 goto *frederika_onedari
if %cmd1=17 goto *common_skill
goto *frederika_main



*frederika_mogaku1

mov %before_action,7
rnd2 %ransu,1,3
if %cmd1=11 && %ransu=1 mov $sel1,"Uhg..."
if %cmd1=11 && %ransu=2 mov $sel1,"Guh... Damn it..."
if %cmd1=11 && %ransu=3 mov $sel1,"Stop...!"
if %cmd1=12 && %ransu=1 mov $sel1,"Uhg..."
if %cmd1=12 && %ransu=2 mov $sel1,"Let go...!"
if %cmd1=12 && %ransu=3 mov $sel1,"Guh... Get off!"
name "Luka"
eng $sel1:$sel6\
name ""
if %cmd1=11 mov $sel1,"Luka attacks!"
if %cmd1=11 gosub *mp_kaihuku:gosub *mp
if %cmd1=12 mov $sel1,"Luka struggles!"
if %cmd1=12 mov %genmogaku,%genmogaku-1:if %genmogaku<0 mov %genmogaku,0
eng $sel1:$sel6
if %cmd1=11 mov $sel1,"But Luka can't attack in this position!"
if %cmd1=12 mov $sel1,"But Frederika doesn't let go of Luka's feet!"
eng $sel1:$sel6\
rnd2 %ransu,1,5
if %ransu=1 mov $sel1,"Don't let him get away, Frederika!"
if %ransu=2 mov $sel1,"Just give up resisting!"
if %ransu=3 mov $sel1,"Play with him more, Frederika!"
if %ransu=4 mov $sel1,"Ha! It's pointless to struggle."
if %ransu=5 mov $sel1,"Hahaha... You look pathetic."
if %kousoku=2 mov $sel1,"It's pointless even if you struggle... Hehehe."
name "Chrome"
eng $sel1:$sel6\
name ""
goto *frederika_a



*frederika_mogaku2

mov %before_action,8
if %nanido=2 rnd2 %ransu,1,10:if %ransu=5 goto *frederika_mogaku1
if %nanido=3 rnd2 %ransu,1,2:if %ransu=2 goto *frederika_mogaku1
name "Luka"
>Grrrrr!!\
name ""
dwave 1,"se\dassyutu.ogg"
mov %kousoku,0:gosub *status_print
>Luka struggles with all his power, and breaks free!\
mov %owaza_count1a,0
name "Chrome"
>Hmph... Just give up.\
name ""
gosub *face1
goto *common_main



*frederika_miss2

mov %before_action,9
name "Luka"
>Guh... Get away!\
name ""
>Luka attacks!
>Luka's attack is weaker in this position!\
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\slash.ogg"
gosub *enemylife
dwave 1,"se\dassyutu.ogg"
lsp 700,":a;chara\"+$tatie3+".bmp",%monster_x,%monster_y
mov %kousoku,0:gosub *status_print
if %enemylife=0 goto *frederika_v
>Frederika falls back from the attack!\
mov %owaza_count1a,0
name "Chrome"
>You don't want to taste my masterpiece...?@
>Such a waste!\
name ""
gosub *face1
goto *common_main



*frederika_a

if %enemylife<%henkahp1 && %sinkou=1 goto *frederika001
if %enemylife<%henkahp2 && %sinkou=2 goto *frederika002
if %kousoku=2 gosub *frederika_a8:goto *common_main
if %kousoku=1 rnd2 %ransu,1,3
if %kousoku=1 && %ransu<3 gosub *frederika_a6:gosub *frederika_a6:goto *common_main
if %kousoku=1 && %ransu=3 gosub *frederika_a6:gosub *frederika_a7:goto *common_main
rnd2 %ransu,1,5
if %ransu=1 gosub *frederika_a1:goto *common_main
if %ransu=2 gosub *frederika_a2:goto *common_main
if %ransu=3 gosub *frederika_a3:goto *common_main
if %ransu=4 && %sinkou>1 && %owaza_count3a>5 gosub *frederika_a4:goto *common_main
if %ransu=5 && %sinkou=3 && %owaza_count1a>5 gosub *frederika_a5:goto *common_main
skip -6



*frederika_a1

add %stack,1
skillcount1 3138
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Tighten his penis between your thighs!":mov $sel2,"Understood..."
if %ransu=2 mov $sel1,"Haha... Can you endure her plump thighs?":mov $sel2,"............"
if %ransu=3 mov $sel1,"Let him taste the pleasure of your thighs!":mov $sel2,"Understood, master..."
name "Chrome"
eng $sel1:$sel6\
name ""
name $name
eng $sel2:$sel6\
name ""
skillname "Corrupted Intercrural"
dwave 1,"se\ero_sigoki1.ogg"
>Frederika crushes Luka's penis between her thighs!
if %nanido<2 damage 14,17
if %nanido=2 damage 18,22
if %nanido=3 damage 25,31
skillname ""
if %mylife=0 sub %stack,1:return *frederika_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *frederika_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *frederika_s2
sub %stack,1
return



*frederika_a2

add %stack,1
skillcount1 3139
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Haha... I wonder if he can endure your mouth?":mov $sel2,"*Suck* *Lick*"
if %ransu=2 mov $sel1,"Frederika, drink his sperm.":mov $sel2,"Understood..."
if %ransu=3 mov $sel1,"Force his defeat with your mouth.":mov $sel2,"*Suck* *Lick*"
name "Chrome"
eng $sel1:$sel6\
name ""
name $name
eng $sel2:$sel6\
name ""
skillname "Corrupted Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>Frederika puts Luka's penis in her mouth and violently sucks!
if %nanido<2 damage 15,18
if %nanido=2 damage 19,24
if %nanido=3 damage 27,33
skillname ""
if %mylife=0 sub %stack,1:return *frederika_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *frederika_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *frederika_s2
sub %stack,1
return



*frederika_a3

add %stack,1
skillcount1 3140
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Squeeze him with your breasts.":mov $sel2,"Understood..."
if %ransu=2 mov $sel1,"Shoot your sperm all over her breasts.":mov $sel2,".............."
if %ransu=3 mov $sel1,"Haha... I'll even let my new experiment play with her breasts.":mov $sel2,"................"
name "Chrome"
eng $sel1:$sel6\
name ""
name $name
eng $sel2:$sel6\
name ""
skillname "Corrupted Tit Fuck"
dwave 1,"se\ero_koki1.ogg"
>Frederika crushes Luka's penis between her breasts!
if %nanido<2 damage 16,19
if %nanido=2 damage 21,25
if %nanido=3 damage 29,35
skillname ""
if %mylife=0 sub %stack,1:return *frederika_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *frederika_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *frederika_s2
sub %stack,1
return



*frederika_a4

add %stack,1
skillcount1 3141
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Frederika, make him a slave to your hand!":mov $sel2,".............."
if %ransu=2 mov $sel1,"Play with him using your hands!":mov $sel2,"Understood, master..."
if %ransu=3 mov $sel1,"You won't be able to take much of her handjob...":mov $sel2,"..........."
name "Chrome"
eng $sel1:$sel6\
name ""
name $name
eng $sel2:$sel6\
name ""
skillname "Immoral Trio"
>Frederika reaches out towards Luka's groin!\
dwave 1,"se\ero_koki1.ogg"
>Her right hand grabs Luka's penis!
damage 16,19
dwave 1,"se\ero_koki1.ogg"
>Her left hand strokes Luka all over, each finger rubbing against him!
damage 16,19
dwave 1,"se\ero_koki1.ogg"
>All ten of her nimble fingers massage all over Luka's penis!
damage 16,19
skillname ""
if %mylife=0 sub %stack,1:return *frederika_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *frederika_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *frederika_s2
mov %owaza_count3a,0
sub %stack,1
return



*frederika_a5

add %stack,1
name "Chrome"
>Frederika, restrain him.\
name ""
name $name
>Understood...\
name ""
skillname "Throw Down"
>Frederika throws Luka to the ground, and uses her right hand to restrain Luka's legs!\
mov %kousoku,1:gosub *status_print
>Luka can't move his legs!\
skillname ""
if %kousan=2 sub %stack,1:return
name "Chrome"
>Haha... This time it will work.@
>Use your foot to make him explode, Frederika...\
name ""
if %nanido<2 mov %genmogaku,2
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,3
sub %stack,1
return



*frederika_a6

add %stack,1
skillcount1 3142
if %kousan=2 skip 2
>Frederika is holding down Luka!\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I wonder if you can endure her footjob...?":mov $sel2,"............."
if %ransu=2 mov $sel1,"Frederika! Step on him with power!":mov $sel2,"Understood..."
if %ransu=3 mov $sel1,"Make her foot dirty with your semen...":mov $sel2,"..............."
name "Chrome"
eng $sel1:$sel6\
name ""
name $name
eng $sel2:$sel6\
name ""
skillname "Corrupted Footjob"
dwave 1,"se\ero_koki1.ogg"
>Frederika steps on Luka's penis with her foot!
if %nanido<2 damage 17,21
if %nanido=2 damage 20,24
if %nanido=3 damage 25,30
skillname ""
if %mylife=0 sub %stack,1:return *frederika_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *frederika_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *frederika_s2
sub %stack,1
return



*frederika_a7

add %stack,1
if %kousan=2 skip 12
>Frederika is stepping on Luka's penis!\
name "Chrome"
>Now Frederika... Violate him.\
name ""
name $name
>Understood...\
name ""
skillname "Reverse-rape Preparation"
mov %kousoku,2:mov %genmogaku,100
>Frederika releases Luka's arm as she pulls his waist closer to hers!\
skillname ""
name "Chrome"
>Congratulations... You're going to be able to enjoy the masterpiece vagina of hers that I modified.\
>An ordinary man will be made into a slave in only a few minutes...\
name ""
sub %stack,1
return



*frederika_a8

add %stack,1
>Frederika brings Luka's penis closer to her pussy...\
name "Chrome"
>Now, violate him!\
name ""
name $name
>Understood...\
name ""
skillcount1 3143
skillname "Pointless Mating"
>Frederika puts the tip of Luka's penis inside her!\
dwave 1,"se\ero_pyu1.ogg"
lsp 700,":c;chara\frederika_h1.bmp",0,0:print 10,500
>Luka's penis is wrapped by her honey pot!
mov %damage_kotei,1
damage 45,50
mov %kousoku,3
skillname ""
if %mylife=0 sub %stack,1:return *frederika_h6
>Luka is being raped by Frederika!\
name "Luka"
>Haaaaaaaaa!\
name ""
>Frederika's warm vagina feels nothing like a corpse.@
>Her walls wriggle around me, bringing explosive pleasure with every movement.\
if %mylife<50 sub %stack,1:goto *frederika_a9
name "Chrome"
>Well? Isn't it amazing?@
>I painstakingly modified it to make sure it would cause men to go crazy.\
>Now, make it even tighter, Frederika!\
name ""
name $name
>..............\
name ""
skillcount1 3143
skillname "Pointless Mating"
dwave 1,"se\ero_chupa5.ogg"
lsp 700,":c;chara\frederika_h2.bmp",0,0:print 10,500
>Frederika's pussy tightens around Luka!
mov %damage_kotei,1
damage 45,50
skillname ""
if %mylife=0 sub %stack,1:return *frederika_h7
if %mylife<50 sub %stack,1:goto *frederika_a9
>Luka is being raped by Frederika!\
name "Chrome"
>Haha... You can't endure it, can you?@
>Frederika, shake your waist more!\
name ""
name $name
>.............\
name ""
skillcount1 3143
skillname "Pointless Mating"
dwave 1,"se\ero_chupa3.ogg"
>Frederika starts to gently shake her waist.
mov %damage_kotei,1
damage 45,50
skillname ""
if %mylife=0 sub %stack,1:return *frederika_h7
if %mylife<50 sub %stack,1:goto *frederika_a9
skillcount1 3143
skillname "Pointless Mating"
dwave 1,"se\ero_chupa3.ogg"
>Frederika continues to gently pump Luka's penis!
mov %damage_kotei,1
damage 45,50
skillname ""
if %mylife=0 sub %stack,1:return *frederika_h7
sub %stack,1
goto *frederika_a9



*frederika_a9

add %stack,1
>Luka is being raped by Frederika!\
name "Luka"
>Auuu... I'm going to come...\
name "Chrome"
>Haha... Already at your limit?@
>Even though her vagina is my masterpiece, you can shoot out your semen in her...\
>Now, Frederika! Make him a slave to pleasure!\
name ""
name $name
>Understood...\
name ""
dwave 1,"se\ero_makituki2.ogg"
skillcount1 3143
skillname "Pointless Mating"
>Frederika tightens around Luka's penis!\
>The overwhelming stimulation forces Luka over the edge!
mov %damage_kotei,2
damage 50,50
skillname ""
sub %stack,1
return *frederika_h7



*frederika_s1

add %stack,1
if %max_mylife>%mylife*5 mov %sel_hphalf,1:gosub *frederika_s2:sub %stack,1:return
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Guh..."
if %ransu=2 mov $sel1,"Uuu..."
if %ransu=3 mov $sel1,"Uhg..."
name "Luka"
eng $sel1:$sel6\
name ""
name "Chrome"
>Haha... How does my masterpiece feel?@
>If this keeps up, you'll be a slave in no time...\
name ""
mov %sel_hphalf,1
sub %stack,1
return



*frederika_s2

add %stack,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Auu..."
if %ransu=2 mov $sel1,"Aaa..."
if %ransu=3 mov $sel1,"Faa..."
name "Luka"
eng $sel1:$sel6\
name ""
name "Chrome"
>It's almost over...@
>Get him, Frederika!\
name ""
gosub *face2
mov %sel_kiki,1
sub %stack,1
return



*frederika_onedari

mov $list1,"Corrupted Intercrural"
if %3138>0 mov %list_num1,1
mov $list2,"Corrupted Blowjob"
if %3139>0 mov %list_num2,1
mov $list3,"Corrupted Tit Fuck"
if %3140>0 mov %list_num3,1
mov $list4,"Immoral Trio"
if %3141>0 mov %list_num4,1
mov $list5,"Corrupted Footjob"
if %3142>0 mov %list_num5,1
mov $list6,"Pointless Mating"
if %3143>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *frederika_onedari1
if %cmd1=12 goto *frederika_onedari2
if %cmd1=13 goto *frederika_onedari3
if %cmd1=14 goto *frederika_onedari4
if %cmd1=15 goto *frederika_onedari5
if %cmd1=16 goto *frederika_onedari6
if %cmd1=-1 goto *frederika_main
goto *frederika_onedari



*frederika_onedari1

gosub *onedari_syori
name "Chrome"
>You want to be defeated by Frederika's thighs...?@
>Then, I'll make her do as you want...\
name ""
gosub *frederika_a1
skip -1



*frederika_onedari2

gosub *onedari_syori
name "Chrome"
>You want to be defeated by Frederika's mouth...?@
>Then, I'll make her do as you want...\
name ""
gosub *frederika_a2
skip -1



*frederika_onedari3

gosub *onedari_syori
name "Chrome"
>You want to be defeated by Frederika's chest...?@
>Then, I'll make her do as you want...\
name ""
gosub *frederika_a3
skip -1



*frederika_onedari4

gosub *onedari_syori
name "Chrome"
>Hehehe... So you want to become a slave to her hands?\
name ""
gosub *frederika_a4
skip -1



*frederika_onedari5

gosub *onedari_syori_k
name "Chrome"
>You want to be defeated by her foot...?\
name ""
if %kousoku=0 gosub *frederika_a5
gosub *frederika_a6
skip -1



*frederika_onedari6

gosub *onedari_syori_k
name "Chrome"
>You want to be raped by Frederika...? Hahaha.\
name ""
if %kousoku=0 gosub *frederika_a5
if %kousoku=1 gosub *frederika_a7
gosub *frederika_a8



*frederika_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\frederika_bk04.bmp",88,0
gosub *syasei2
>Unable to endure any longer, Luka explodes all over Frederika's thigh.\
mov %viclose,1:gosub *lose
mov %2542,%2542+1:if %2542=1 mov %count_koenemy,%count_koenemy+1
if %2542>%count_most mov %count_most,%2542:mov $count_mostname,$name
count 3,13
mov $bad1,"Luka succumbed to Frederika's intercrural sex."
mov $bad2," Made into Chrome's guinea pig, Luka was continually raped for the rest of his life."
gosub *face2
name "Chrome"
>Hehehehe... You made her thighs so sticky.@
>Do you understand how amazing my masterpiece is now?\
name ""
goto *frederika_h



*frederika_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\frederika_bk01.bmp",88,0
gosub *syasei2
>Unable to endure any longer, Luka explodes inside Frederika's mouth.\
mov %viclose,1:gosub *lose
mov %2542,%2542+1:if %2542=1 mov %count_koenemy,%count_koenemy+1
if %2542>%count_most mov %count_most,%2542:mov $count_mostname,$name
count 4,13
mov $bad1,"Luka succumbed to Frederika's blowjob."
mov $bad2," Made into Chrome's guinea pig, Luka was continually raped for the rest of his life."
gosub *face2
name "Chrome"
>Hehehehe... You made her mouth so sticky.@
>Do you understand how amazing my masterpiece is now?\
name ""
goto *frederika_h



*frederika_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\frederika_bk02.bmp",88,0
gosub *syasei2
>Unable to endure any longer, Luka explodes all over Frederika's chest.\
mov %viclose,1:gosub *lose
mov %2542,%2542+1:if %2542=1 mov %count_koenemy,%count_koenemy+1
if %2542>%count_most mov %count_most,%2542:mov $count_mostname,$name
count 7,13
mov $bad1,"Luka succumbed to Frederika's titty fuck."
mov $bad2," Made into Chrome's guinea pig, Luka was continually raped for the rest of his life."
gosub *face2
name "Chrome"
>Hehehehe... You made her chest so sticky.@
>Do you understand how amazing my masterpiece is now?\
name ""
goto *frederika_h



*frederika_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\frederika_bk05.bmp",88,0
lsp 696,":a;chara\frederika_bk06.bmp",88,0
gosub *syasei2
>Unable to endure any longer, Luka explodes all over Frederika's hands.\
mov %viclose,1:gosub *lose
mov %2542,%2542+1:if %2542=1 mov %count_koenemy,%count_koenemy+1
if %2542>%count_most mov %count_most,%2542:mov $count_mostname,$name
count 5,13
mov $bad1,"Luka succumbed to Frederika's handjob."
mov $bad2," Made into Chrome's guinea pig, Luka was continually raped for the rest of his life."
gosub *face2
name "Chrome"
>Hehehehe... You made her fingers so sticky.@
>Do you understand how amazing my masterpiece is now?\
name ""
goto *frederika_h



*frederika_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 697,":a;chara\frederika_bk07.bmp",88,0
gosub *syasei2
>Unable to endure any longer, Luka explodes all over Frederika's foot.\
mov %viclose,1:gosub *lose
mov %2542,%2542+1:if %2542=1 mov %count_koenemy,%count_koenemy+1
if %2542>%count_most mov %count_most,%2542:mov $count_mostname,$name
count 6,13
mov $bad1,"Luka succumbed to Frederika's footjob."
mov $bad2," Made into Chrome's guinea pig, Luka was continually raped for the rest of his life."
gosub *face2
name "Chrome"
>Hehehehe... You made her foot so sticky.@
>Do you understand how amazing my masterpiece is now?\
name ""
goto *frederika_h



*frederika_h6

mov %ikigoe,3:gosub *ikigoe
name "Chrome"
>Oh...?\
name ""
gosub *syasei1
lsp 700,":c;chara\frederika_h3.bmp",0,0
gosub *syasei2
>The moment Luka is forced into Frederika, he accidentally ejaculates.\
mov %viclose,1:gosub *lose
mov %2542,%2542+1:if %2542=1 mov %count_koenemy,%count_koenemy+1
if %2542>%count_most mov %count_most,%2542:mov $count_mostname,$name
count 1,13
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka accidentally ejaculated as soon as Frederika forced him into her."
mov $bad2," Made into Chrome's guinea pig, Luka was continually raped for the rest of his life."
name "Chrome"
>Coming right as she put it in...@
>What a pathetic man! Hahaha!\
name ""
if %2542=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
goto *frederika_hb



*frederika_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":c;chara\frederika_h3.bmp",0,0
gosub *syasei2
>Luka is unable to endure Frederika's amazing vagina as she rapes him.\
mov %viclose,1:gosub *lose
mov %2542,%2542+1:if %2542=1 mov %count_koenemy,%count_koenemy+1
if %2542>%count_most mov %count_most,%2542:mov $count_mostname,$name
count 1,13
mov $bad1,"Raped by Frederika, Luka is unable to endure the pleasure."
mov $bad2," Made into Chrome's guinea pig, Luka was continually raped for the rest of his life."
name "Chrome"
>Hahaha... You let it all out inside her.@
>Do you understand how amazing my masterpiece is now?\
name ""
if %2542=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
goto *frederika_hb



*frederika_h

if %2542=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Auuu...\
name ""
>Left powerless from my orgasm, Frederika tightly hugs me.@
>Her emotionless eyes stare right at me.\
>Forced to be Chrome's doll, she has no free will left...\
name ""
name "Chrome"
>Next, let's experiment with her vagina.@
>The ultimate zombie needs to be able to force any man to submit.\
>I specially modified her vagina myself.@
>No man should be able to resist her for more than a few seconds.\
name ""
name $name
>............\
name ""
>Frederika continues to blankly stare at me as she moves the entrance to her pussy next to my penis.\
>The warmth from her pussy tickles my penis.@
>Even though she's a zombie... It's still warm...\
name "Chrome"
>Now, violate him!\
name ""
name $name
>Understood...\
name ""
mov %hseanwave,9:hseanwave
cspl 690,699
lsp 700,":c;chara\frederika_h1.bmp",0,0:print 10,500
>While tightly holding me, Frederika slowly starts to force me into her.@
>Just my tip is inside her, as she pushes me in extremely slowly.\
>The warmth from her starts to cover my penis...@
>This doesn't seem anything like a zombie's...\
name "Luka"
>Auuu...\
name ""
>I'm only halfway in, but I'm already shaking with pleasure.@
>The flesh inside of her moves around in a bizarre way, giving a strange sensation to my penis.\
name "Chrome"
>Well? Isn't it amazing?@
>I carefully modified her pussy to make sure she made men into slaves of pleasure.\
name ""
lsp 700,":c;chara\frederika_h2.bmp",0,0:print 10,500
name "Luka"
>Faaa... Incredible...\
name ""
>Still not fully inside of her, a shiver goes down my spine.@
>Her amazing pussy quickly forces me to a height before I'm even all the way inside!\
name "Luka"
>Ah! Ahhh!!\
name ""
gosub *syasei1
lsp 700,":c;chara\frederika_h3.bmp",0,0
gosub *syasei2
>Not even lasting ten seconds, I already explode inside of her.@
>As I moan in pleasure at her amazing pussy, Chrome laughs at me.\
name "Chrome"
>Hahaha. You already came?@
>Letting it out so fast. What a pathetic man!\
name ""
goto *frederika_hb



*frederika_hb

name "Luka"
>Faaa...\
name ""
>My body relaxes as I'm stuck inside of her.@
>As the feeling of immorality and pleasure mix in my mind, power leaves my body.\
name "Chrome"
>Coming before she even really does anything... How miserable.@
>Frederika, force him all the way inside!\
name ""
name $name
>Understood...\
name ""
mov %hseanwave,10:hseanwave
>Frederika forces her waist into mine, and pushes me all the way inside.@
>Forced deep into her, I feel the tip of my penis break through into a hole deep inside of her.\
name ""
name "Luka"
>Ah! Ahhhh!\
name ""
>The deeper I get into her, the tighter her vagina gets.@
>Rubbed against all of the tiny bumps and creases covering every inch of her pussy, I let out a moan.\
name "Chrome"
>Hehehe... Does it feel good all the way inside of her?@
>I spent a lot of effort making the deepest parts feel the best...\
name ""
name "Luka"
>Ah! Ahhhh!\
name ""
>The walls of her pussy slightly move and vibrate with every movement she makes, causing every bump and crease to rub against me.\
>As if being licked by thousands of tongues inside of her, the pleasure attacks me in waves.\
>Barely able to think, I start to pant as my back arches.\
name "Luka"
>Faaaa!@> That's... amazing!\
name ""
name "Chrome"
>Haha... The pathetic moan of a man.@
>I'll let you enjoy my masterpiece as much as you want...\
name ""
name "Luka"
>Auuu...@>If this doesn't stop soon...\
name ""
>But there's no chance that Chrome would allow this to stop...@
>As if in surrender, I shoot out a white flag.\
gosub *syasei1
lsp 700,":c;chara\frederika_h4.bmp",0,0
gosub *syasei2
>With my body twisting in pleasure, I explode inside of Frederika only a short time from my last.\
name "Luka"
>Faaa...\
name ""
name $name
>............\
name ""
>Frederika stares at me with dead eyes as my semen pours into her.@
>She's just a doll that follows Chrome's orders...\
>Such a person is being forced to rape me...@
>The situation is horrible...\
>Even worse, she's a zombie...@
>I'm being raped by a disgusting reanimated corpse...\
>I shudder at the thought of both of our bodies being raped.\
name "Chrome"
>Haha... It's miserable, isn't it?@
>Now, Frederika. Tighten around him more.\
name ""
name $name
>Understood...\
name ""
>At the same time as she responds, Frederika's pussy contracts around me.@
>Her soft walls start to tightly press around my penis.\
name "Luka"
>Faaa!!\
name ""
>As her pussy tightens around me, I shake my waist pitifully.\
>The tightness is just as amazing as her pussy...@
>This stimulation would cause any man to be powerless...\
name $name
>..............\
name ""
name "Luka"
>Ah! Auuu!@>Ahhhh!\
name ""
>She keeps making it tighter and tighter.\
>Frederika is doing just as ordered...@
>With no regard to her feelings or mine, she keeps tightening around me.\
>Being toyed with like this, all I can feel is the pleasure and disgrace.\
name "Luka"
>Haaa!! Ahhhh!\
name ""
>As I feel another ejaculation rise through me, my waist unconsciously pushes forward deeper into her.\
gosub *syasei1:gosub *syasei2
name "Luka"
>Faaa...\
name ""
>Just by tightening around me, she forced me to come again...\
name "Chrome"
>Haha... Did you come just by having her tighten around you?@
>Thinking you're a Hero... You're just a pathetic pig.\
>Haha... It isn't over yet!@
>Frederika, play with him even more!\
name ""
name $name
>Yes...\
name ""
name "Luka"
>Faaa... Stop... Please...\
name ""
>The walls of her vagina start to wriggle and move again.@
>Tightening around me, she continues to play with her captured prey.\
>Unable to endure this overwhelming pleasure, I quickly come again.\
gosub *syasei1:gosub *syasei2
name "Luka"
>Auuu...\
name ""
>No matter how many times I come, this won't end...@
>Chrome started to measure something with a strange piece of equipment, too...\
>It looks like she's experimenting on something while Frederika rapes me.\
name "Chrome"
>Hahaha... I won't let such an excellent guinea pig die so easily.@
>While making sure you stay alive, I'll keep doing more sexual experiments.\
>Are you happy? You can keep having sex with Frederika for the rest of your life...\
name ""
name "Luka"
>Auuu!\
name ""
gosub *syasei1:gosub *syasei2
>Unable to think straight, I come inside Frederika again.\
>Due to this intense rape, I'm exhausted both mentally and physically.@
>It seems like I'll soon be joining Frederika as Chrome's puppet...\
name "Chrome"
>First of all, let's test how durable Frederika's pussy is.@
>I'll see what changes happen after having sex nonstop.\
>Hmm...@> How about I have Frederika rape you for a year, then?\
name ""
name "Luka"
>No way... Don't...\
name ""
>Made into her guinea pig, I'm being forced into an insane act...@
>But I'm too worn out by the pleasure to resist.\
>Still being raped by Frederika, I can't get away...@
>Right now, I'm just a prisoner held captive by her pussy...\
name "Luka"
>Faaa...\
name ""
gosub *syasei1:gosub *syasei2
name "Chrome"
>Haha... Well then, I'll put you two in a secret room to be alone.@
>Don't worry, Frederika can forcefully feed you whether you want to eat or not.\
>I hope you enjoy every minute of the next year. Hahaha!\
dwave 1,"se\door1.ogg"
gosub *anten
name ""
>With that last heartless word, Chrome leaves the room.@
>There's no hope of being saved anymore...\
>In this dim laboratory, I'll be able to do nothing but moan in pleasure as I'm endlessly raped by Frederika...\
>.................................\
>..............\
>..................\
>........\
>...How long has it been?@
>I've already lost any sense of time as I've been stuck here for seemingly an eternity...\
dwave 1,"se\asioto3.ogg"
>Suddenly, I hear footsteps for the first time.\
>Finally breaking the erotic sounds of my own panting and the slapping of our waists together, the footsteps bring me to my senses.\
>I'm left blinded as light floods into the dark laboratory for the first time.\
lsp 700,":c;chara\frederika_tuika.bmp",0,0:print 10,2000
name "Chrome"
>Hahaha... It's been a while, hasn't it?@
>What a good guinea pig... You worked so hard at the experiment.\
name ""
>Chrome lets out a sadistic laugh as she looks at where Frederika and I are connected.\
>I weakly call out to Chrome.\
name "Luka"
>Please... Let me out of her... I beg you...\
name "Chrome"
>...Wow, you're still able to think at all?@
>Your body is pretty weak, but your mind is tough.\
name ""
>She smiles, as if pleased at this unexpected finding.\
name "Chrome"
>Alright, I need to see the results of the experiment anyway.@
>Frederika, you can let him go.\
name $name
>Understood...\
name ""
>Following Chrome's order, Frederika lets go of me for the first time in a year.\
>For the first time in seemingly an eternity, I'm finally able to take my penis out of her vagina.\
>But even in taking it out, I still can't escape from the pleasure.\
name "Luka"
>Ah! Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>Unable to resist the stimulation of pulling out of her, I come one more time.\
mov %hseanwave,0:hseanwave
lsp 700,":a;chara\chrom_st01.bmp",253,150
bg "bg\bg058.bmp",10,1000
name "Chrome"
>Hahaha! Even after all this time, you still come so easily!\
name "Luka"
>Uuu...\
name ""
>Even though I've been released from Frederika, my body is still too weak to even think of escaping.\
lsp 700,":a;chara\chrom_st02.bmp",253,150
name "Chrome"
>Now, Frederika. Show me the results of the experiment.\
lsp 700,":a;chara\chrom_st02.bmp",75,150
lsp 701,":a;chara\frederika_st01.bmp",240,0:print 10,500
name $name
>Understood...\
dwave 1,"se\ero_pyu1.ogg"
lsp 701,":a;chara\frederika_st02.bmp",240,0:print 10,500
name ""
>Following Chrome's instructions, Frederika uses her fingers to expand her vagina as the semen that was left in her drips out.\
lsp 700,":a;chara\chrom_st02.bmp",75,150:print 10,500:print 10,500
name "Chrome"
>...Hmm... There are some abrasions inside.@
>Well, I guess it's unavoidable since zombies can't heal themselves.\
lsp 700,":a;chara\chrom_st01.bmp",75,150:print 10,500
>It looks like I balanced the softness and durability pretty well.\
name ""
>With the result of the experiment confirmed, Chrome nods happily.\
csp 701
lsp 700,":a;chara\chrom_st01.bmp",253,150:print 10,500
name "Chrome"
>...Next, let me observe your genitals.\
name "Luka"
>No... Stop...\
name ""
>Even though I know it's useless, I try to get away from Chrome.\
name "Chrome"
>A mere guinea pig can't disobey my instructions!\
name ""
>Chrome starts to mutter an incantation.@
>Countless hands come up from the floor and hold down my body!\
name "Luka"
>Aie! What is this!?\
name ""
>Bound by countless arms, I let out a pathetic scream.\
name "Chrome"
>Stop making me do unnecessary things. Now, show me your penis.\
name ""
>Chrome quickly reaches out and grabs my penis.\
name "Luka"
mov %hseanwave,17:hseanwave
>Auuu...\
name ""
>I instinctively groaned at the feeling of her warm hand.\
>Chrome brings her face close to my dick as she turns it over and inspects every part of it.\
lsp 700,":a;chara\chrom_st02.bmp",253,150:print 10,500
name "Chrome"
>Hmm... Yours looks fine too. You're pretty durable.\
name ""
>As she says that, she holds my penis tighter and brings it toward her mouth.\
dwave 1,"se\ero_chupa3.ogg"
lsp 700,":a;chara\chrom_st01.bmp",253,150:print 10,500
name "Chrome"
>Mmm... *Lick*@>*Suck*\
name ""
>Holding my dick in her mouth, she sucks out the leftover semen still in my urethra.\
name "Luka"
>Hauuu!\
name ""
>I nearly faint at the new stimulation of her warm mouth.@
>But having sucked up the last of the semen, she quickly releases my penis.\
mov %hseanwave,0:hseanwave
name "Chrome"
>Your semen is still good quality, too...@> I can keep using you as a guinea pig, then.\
>First I'll enhance Frederika's pussy...@
>Hahaha... You'll work together again.\
>You'll contribute to my great achievement that nobody has been able to do yet.\
name ""
>Chrome suddenly gets on top of me, and rubs the tip of my penis on the opening of her vagina.\
name "Luka"
>What are you doing!?\
name "Chrome"
>I need a lot of magic to enhance Frederika, so I'll borrow some of your energy first.\
>Now, just be quiet and give me your semen!\
name ""
mov %hseanwave,4:hseanwave
lsp 700,":c;chara\chrom_ha1.bmp",0,0:print 10,500
>Chrome quickly drops her waist down on mine.@
>My penis is forced all the way into her narrow hole.\
name "Luka"
>Ah! Ahhh!!\
name ""
>My voice leaks out as I feel a warmth and tightness more intense than Frederika's.\
name "Chrome"
>What a nice voice...@> Unable to resist your baser instincts.\
name ""
>Chrome starts to move her waist around in a circle.@
>With my penis stuck inside her tiny pussy, the stimulation is intense.\
name "Luka"
>Auu... So good...\
name "Chrome"
>Hahaha... Your penis got bigger inside.@
>Are you already about to come?\
name ""
>Chrome shakes her waist as she laughs.@
>As if floating, I feel the desire to release rise through my waist.\
name "Luka"
>Aiee! Ahhh!\
name ""
>She contracts her pussy as I moan.\
>Squeezing me tight from my base to my tip, it feels as though she's strangling me.\
>My body writhes around pathetically as Chrome toys with me.\
name "Luka"
>Uuu... Aaaaa!@
>Too good... Incredible!\
name "Chrome"
>Hehehe... You look like you're enjoying it.@
>But I want to hurry and make my enhancements...@>So I'll make you come quickly.\
name ""
>Chrome states that to me with a superior look on her face.@
>As if dealing a fatal blow, she tightens one more time, as my head goes white.\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":c;chara\chrom_ha2.bmp",0,0
gosub *syasei2
>With the pleasure flowing through me, I explode inside of Chrome.@
>Every drop of semen that I shoot out is swallowed by her tiny pussy...\
name "Chrome"
>Mmm... Thick, good quality energy.@
>My magic power will be full in no time...\
name ""
>As if reacting to her words, a magic glow starts to radiate from Chrome.\
name "Chrome"
>Now, let me enhance your vagina Frederika...@
>First, I'll repair that small abrasion...\
name $name
>Yes...\
name ""
>Chrome puts her hand on Frederika's stomach and utters an incantation.@
>Synchronized with her words, the walls of Chrome's vagina start to wriggle and vibrate!\
name "Luka"
>Auu! What... Is this...?\
name ""
>Chrome ignores me as she continues her incantation.@
>But every pulse of magic coming from her hand causes a pulse in her vagina.\
>I feel another orgasm coming as this strange new pleasure attacks me.\
name "Luka"
>Stop... I'm going to come...!\
name ""
>Though I beg her to stop, Chrome doesn't even look at me.\
>As she finishes her incantation, her pussy starts to violently wriggle and vibrate.\
>With a final squeeze, I'm forced to another height.\
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":c;chara\chrom_ha3.bmp",0,0
gosub *syasei2
>I'm forced to ejaculate inside of her another time, letting out a large amount of semen.\
name "Chrome"
>Coming again so quickly... I wasn't even trying, too.\
name ""
>Chrome sneers at me.@
>Even though she wasn't trying to make me come, I did anyway...\
>Is she angry...?\
name "Chrome"
>Hindering my enhancements by coming whenever you please...@
>Frederika, make it so he can't ejaculate without my permission.\
name $name
>Understood...\
name ""
>Frederika undoes the bandages surrounding her hand.\
dwave 1,"se\ero_makituki1.ogg"
>And tightly wraps it around my penis!\
name "Chrome"
lsp 700,":c;chara\chrom_tuika.bmp",0,0:print 10,1500
>Hahaha... Now you can't ejaculate without my permission.@
>But don't worry. When I need you to, I'll let you come.\
name ""
>While laughing at me, she sits on top of me again.\
name "Luka"
>Auuu...\
name ""
>Forced back into her warm pussy, I already feel another orgasm rise up just from being reinserted in her.\
>But the tight bandage stops any semen from coming out.@
>Unable to come, I'm only attacked by a crazy pleasure.\
name "Chrome"
>Haha... You look frustrated.@
>But I won't let you.@> Just writhe in agony for now.\
name "Luka"
>No way... Ahhh!\
name ""
>Unable to come, I writhe in agony.@
>With a sadistic smile on her face, Chrome starts to draw a magic circle on Frederika's stomach.\
name "Chrome"
>For this enhancement, I'll increase Frederika's sexual skill, and give her the ability to self-heal.\
>Hehe... I found this out by the data collected by the zombies attacking that town.\
name "Luka"
>What!?\
name ""
>Chrome said something unexpectedly horrifying...@
>While I was trapped here, she did something like that!?\
name "Chrome"
>Don't worry, I didn't kill anyone... They only squeezed out the men's semen.@
>But after that, people started showing up voluntarily wanting more.\
>Once they experience my zombies, they're hooked for life...\
name ""
>As if responding to Chrome's voice, the zombies around us start to lick and massage me with their hands.\
name "Luka"
>Auuu...\
name "Chrome"
>Haha... What a nice voice.@> I left you up to Frederika before, but it's fun to play with you myself.\
>The last experiment was so long, and you didn't break.@
>Make sure you don't break in the future so I can keep using you!\
name ""
>Finished drawing the magic circle, Chrome starts her incantation again.@
>Just like last time, her vagina wriggles and vibrates in time with her incantation.\
name "Luka"
>Auuu... Haaaaa...\
name ""
>With the zombies licking and massaging me at the same time, the pleasure runs through me like electricity.\
name "Luka"
>Stop!@>I'm... going to break!\
name "Chrome"
>What are you saying?@> You lasted a year with Frederika.@
>Something like this wouldn't break you.\
name ""
>Chrome tightens her pussy around me as if to emphasize her point.@
>She laughs at me as I writhe around pitifully.\
name "Luka"
>Haaa... Please!@>At least... Let me come!\
name "Chrome"
>Hahaha... Alright, I was just running low on magic anyway.@
>I'll let you come a little.\
name ""
>Saying that, Chrome loosens the bandage around my penis.@
>As soon as she did that, a powerful orgasm blows through me as I'm finally able to come.\
name "Luka"
>Aiee! Ahhhhh!!!\
gosub *syasei1:gosub *syasei2
name ""
>Chrome laughs sadistically as I twitch while pouring all of my semen out into her.\
name "Chrome"
>Haha... Such a powerful orgasm.@
>By any chance, do you want me to kill you by squeezing you dry?\
name ""
>Chrome tightens her pussy around my now free penis.@
>Still feeling the effects from my last orgasm, I can't endure the sudden pressure.\
name "Luka"
>Haaa... Hauuu!\
name ""
gosub *syasei1:gosub *syasei2
>My penis spasms as more semen shoots out.\
name "Chrome"
>Hahahaha! Shoot out more!@
>Are you happy that I'm eating all of your sperm?\
name ""
>Chrome starts to quickly move her waist up and down as the surrounding zombie's caressing speeds up at the same rate.\
>As if my entire body was an erogenous zone, I can't do anything but bask in the pleasure.\
name "Luka"
>Aaaaa!!\
gosub *syasei1:gosub *syasei2
name ""
>I quickly come again.@
>I'm completely at Chrome's mercy...\
name "Chrome"
>That's enough magic.@
>If I squeezed any more, I really would kill you.\
name ""
>Chrome tightly wraps the bandage around my penis as she restarts her incantation.\
>At the same time, the vibration and wriggling started back up.\
name "Luka"
>Faaa... Incredible...\
name "Chrome"
>Haha... I'm almost finished.@
>I'll give you a reward once the enhancement is over.\
name ""
>As she approaches the end of her incantation, the vibration becomes intense.\
>Focused on her incantation, Chrome doesn't even react to my moans.@
>Nearing the end of her spell, the magic circle starts to radiate light!\
>The bright light slowly sinks into Frederika's body, until it finally vanishes.\
name "Chrome"
>Hehehehehe...\
>The enhancement is complete...@
>You should be happy, too! Frederika is on a completely different level now.\
name ""
>Chrome laughs in triumph.@
>Her loud laugh causes her pussy to squeeze tighter around my penis.\
name "Luka"
>Haaa... Please... Let me come...\
name ""
>A slave to the pleasure, all I can do is think about wanting to ejaculate.\
>Chrome laughs at me as she takes my bound penis out of her vagina.\
dwave 1,"se\ero_pyu2.ogg"
mov %hseanwave,0:hseanwave
>Covered in Chrome's juices, my penis is exposed to the air.@
>The zombies surrounding us are sent away as Chrome slowly unwinds the bandage again.\
lsp 700,":a;chara\chrom_st01.bmp",253,150
bg "bg\bg058.bmp",10,1000
name "Chrome"
>Hahaha... Do you want to come that badly?@
>Then as a reward, I'll let you use Frederika's vagina.@
>After the enhancements, she should feel twice as good...\
name $name
lsp 700,":a;chara\frederika_st02.bmp",88,0:print 10,800
dwave 1,"se\ero_pyu1.ogg"
>..........\
name ""
>Responding to Chrome's voice, Frederika spreads her legs, inviting me.\
>As she opens her legs, a sweet fragrance comes out of her.@
>The moment I smelled it, a sweet intoxication came over me.\
name "Luka"
>Uuuu... What is this...?\
name ""
>My feet feel weak as my body sways.@
>The room starts to distort as my eyes are unable to look away from Frederika's pussy.\
name "Chrome"
>It's the same scent used by some monster plants to put their prey into a trance.\
>I made it so it's discharged whenever Frederika's love juices start to flow.\
>Hahaha... Looking at your face, it seems as though it's very effective.\
name ""
>Though I can hear Chrome's voice, it sounds very distant.@
>I'm unable to resist the alluring sight of Frederika's vagina any longer.\
>Against my will, I walk towards Frederika's waiting body and cling to her.\
>I bury my head in her cold chest.@
>The seductive smell fills my head as I bury my face in her breasts.\
>As my mind is taken over by the smell, my penis gets harder than ever before.\
dwave 1,"se\ero_pyu1.ogg"
>I hear a lewd sound ring out.@
>As I look down at my body, I see myself slowing pushing into her vagina.\
lsp 700,":c;chara\frederika_tuika.bmp",0,0:print 10,800
>Her liquid flows out of her as I force myself deeper into her.\
>Her warm vagina...@
>The hole I was stuck in for a year... It feels completely different...\
name "Luka"
>Faa... What is this... Incredible...\
name ""
>As if designed exactly for me, every crease and bump in her pussy hits and rubs me at all of my most sensitive areas.\
>In addition, even though she isn't moving her waist, the walls are vibrating and wriggling around my penis.\
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1:gosub *syasei2
>My body writhes as I'm finally able to come inside Frederika.@
>Just from insertion, I was forced to come by her new pussy...\
name "Chrome"
>Haha... You already came?@
>If she moves her waist, I wonder if you'll go crazy?\
name $name
>............\
name ""
mov %hseanwave,10:hseanwave
>Reacting to Chrome's words, Frederika starts to move her waist.@
>The innumerable creases and bumps rub and massage my most sensitive areas with every movement.\
name "Luka"
>Auuu...\
name ""
>I feel another orgasm come as Frederika slowly moves her waist.@
>I surrender my body instantly to the overwhelming pleasure she's forcing into me.\
name "Chrome"
>It's more effective than I thought...@
>It was a good idea to have the zombies attack that town for data...\
>Haha... Shoot out in her to your heart's content.@
>Frederika's self-healing ability is activated by absorbing semen.\
>As long as you keep coming in her, Frederika can keep moving for eternity!\
name ""
>Chrome excitedly talks, as if drunk on her own accomplishments.\
>Frederika continues to mindlessly force pleasure into me, forcing me to come.\
name "Luka"
>Faaa...\
name ""
gosub *syasei1:gosub *syasei2
>Unable to resist her amazing pussy, I explode in her again.@
>But even as I come, Frederika continues to pump away at me.\
>This amazing pleasure...@
>I won't be able to escape from Chrome's ultimate zombie...\
name "Chrome"
>First we have to test the durability of her new pussy.@
>Will she continue to self-heal? I have to make sure.\
>She only had one abrasion after a year... So let's do three years this time.\
>In the meantime, I'll add the self-healing ability to the other zombies.@
>Then I'll send the zombies all over the continent to collect more data.\
>Hahahaha! I'll be able to reach new levels of knowledge that no other necromancer has reached!\
name ""
>Even though I hear Chrome's horrible plan, I can't do anything but be raped by Frederika...\
>No matter what she does, my fate is already sealed...\
name "Luka"
>Ah! Auu!@> Ahhh!\
gosub *syasei1:gosub *syasei2
name ""
gosub *anten
mov %hseanwave,0:hseanwave
>There's no escape for me until I die...@
>And Chrome won't allow me to die...\
>Stuck in this house, I have no choice but to be kept as her guinea pig...\
>Losing all hope, I resign myself to my new life...\
>...............\
goto *badend



*chrom_start

mov $name,"Chrome"
mov $name2,"Chrome"
mov $lavel,"chrom"
mov $tatie1,"chrom_st11"
mov $tatie2,"chrom_st12"
mov $tatie3,"chrom_st13"
mov $tatie4,"chrom_st12"
mov $haikei,"bg058"
mov %monster_x,175
mov %monster_y,60
if %nanido=1 mov %max_enemylife,1200
if %nanido=2 mov %max_enemylife,1200
if %nanido=3 mov %max_enemylife,1500
if %nanido=1 mov %henkahp1,600
if %nanido=2 mov %henkahp1,600
if %nanido=3 mov %henkahp1,750
if %nanido=0 mov %max_enemylife,2
if %nanido=0 mov %henkahp1,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,2
gosub *maxmp:mov %mp,%max_mp
mov %tikei,3
gosub *syutugen2
mov $mogaku_anno1,"Luka can't break free of the arms!"
mov $mogaku_anno2,"Luka broke free of the arms!"
mov $mogaku_anno3,"Luka can't attack in this position!"
mov $mogaku_sel1,"It's pointless to struggle..."
mov $mogaku_sel2,"Hahaha... Tiring yourself out."
mov $mogaku_sel3,"Such wasteful effort."
mov $mogaku_sel4,"If you just sit back, I can bring you to a world of pleasure..."
mov $mogaku_sel5,"Pathetic struggling..."
mov $mogaku_dassyutu1,"Such impudence!"
mov $mogaku_dassyutu2,""
mov $half_s1,"I'll make you the new subject of my experiments."
mov $half_s2,"I need to thoroughly test the reproductive systems of my zombies..."
mov $kiki_s1,"First I need to analyze your semen."
mov $kiki_s2,"Hahaha... I'll squeeze out a sample then..."
mov %end_n,4
mov %exp_minus,4050
mov %zmonster_x,-130
mov %tukix,310
name "Luka"
>You... Are you going to fight!?\
name ""
name $name
>Did you think I was weaker than my zombies?@
>I'll show you the power of a necromancer!\
name ""
mov %sinkou,1
goto *common_main



*chrom001

name $name
>For a skilled necromancer, it's easy to summon the dead...\
name ""
skillcount1 3144
skillname "Thirsting Arms"
>Chrome starts to chant an incantation!@
>Thousands of arms reach up from the floor and grab Luka's body!\
name "Luka"
>What is this!?@
>Ahhhh!!\
name ""
dwave 1,"se\ero_koki1.ogg"
>Thousands of arms stroke Luka's body all over!
if %nanido<2 damage 25,30
if %nanido=2 damage 30,34
if %nanido=3 damage 43,49
skillname ""
if %mylife=0 goto *chrom_h1
name $name
>Hahaha... Can you endure it?@
>The only thing those hands desire is for their thirst to be quenched by your semen...\
name ""
mov %sinkou,2
goto *common_main



*chrom002

name $name
>You... Don't get carried away!\
name ""
skillname "Restraint of the Dead"
>Chrome starts to chant an incantation!@
>Thousands of arms reach up from the floor and grab Luka's body!\
name "Luka"
>What...?@> Uwaaa!\
name ""
mov %kousoku,1:gosub *status_print
>The arms grab Luka's body and bind his movement!\
skillname ""
gosub *face2
name $name
>Hehehe... I'll deal with you while you're like that.\
name ""
mov %sinkou,3
if %nanido<2 mov %genmogaku,1
if %nanido=2 mov %genmogaku,1
if %nanido=3 mov %genmogaku,2
goto *common_main



*chrom_v

gosub *face3
name $name
>Auuuu...!\
name ""
>I did it!@>Wait, no!\
>I need a bit more, I haven't sealed her yet!\
name $name
>I'll... I'll let you go with just that today!\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,500
>Chrome runs away!\
mov %viclose,2:gosub *victory
mov %getexp,1500:gosub *lvup
mov %2243,1
goto *sean0117



*chrom_kousan

gosub *kousan_syori
mov %sinkou,3
>Luka yields to temptation, ending his resistance!\
gosub *face2
name $name
>I won't forgive you even if you surrender...@
>The only way you can make amends is by giving your body to me!\
name ""
goto *chrom_a



*chrom_main

gosub *cmd_main
if %cmd1=11 && %kousoku=2 mov %abairitu,50:goto *chrom_miss2
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *chrom_kousan
if %cmd1=16 goto *chrom_onedari
if %cmd1=17 goto *common_skill
goto *chrom_main



*chrom_miss2

mov %before_action,9
name "Luka"
>Guh... Get off!\
name ""
>Luka attacks!
>The power is weakened by Chrome sitting on top of him!\
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\slash.ogg"
gosub *enemylife
dwave 1,"se\dassyutu.ogg"
lsp 700,":a;chara\"+$tatie3+".bmp",%monster_x,%monster_y
mov %kousoku,0:gosub *status_print
if %enemylife=0 goto *chrom_v
>Chrome was knocked away!\
name $name
>You stupid virgin!\
name ""
gosub *face1
mov %owaza_count1a,0
goto *common_main



*chrom_a

if %enemylife<%henkahp1 && %sinkou=2 goto *chrom002
if %sinkou=1 goto *chrom001
if %kousoku=2 gosub *chrom_a8
if %kousoku=1 rnd2 %ransu,1,4
if %kousoku=1 && %ransu=1 gosub *chrom_a5:goto *common_main
if %kousoku=1 && %ransu=2 gosub *chrom_a6:goto *common_main
if %kousoku=1 && %ransu>2 && %status=0 gosub *chrom_a7:goto *common_main
if %kousoku=1 skip -4
rnd2 %ransu,1,4
if %ransu=1 gosub *chrom_a1:goto *common_main
if %ransu=2 gosub *chrom_a2:goto *common_main
if %ransu=3 && %sinkou=3 && %status=0 && %owaza_count2a>5 gosub *chrom_a3:goto *common_main
if %ransu=4 && %sinkou=3 && %owaza_count1a>5 gosub *chrom_a4:goto *common_main
skip -5



*chrom_a1

add %stack,1
skillcount1 3144
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Haha... Can you resist this?":mov $sel2,"The arms desperately stroke Luka's penis!"
if %ransu=2 mov $sel1,"I'll let their arms defeat you!":mov $sel2,"The arms massage Luka's entire body!"
if %ransu=3 mov $sel1,"I'll let the arms play with you!":mov $sel2,"The arms rub and massage every inch of Luka's body!"
name $name
eng $sel1:$sel6\
name ""
skillname "Thirsting Arms"
>Chrome summons thousands of female zombie arms!\
dwave 1,"se\ero_koki1.ogg"
eng $sel2:$sel6
if %nanido<2 damage 25,30
if %nanido=2 damage 30,34
if %nanido=3 damage 33,45
skillname ""
if %mylife=0 sub %stack,1:return *chrom_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*chrom_a2

add %stack,1
skillcount1 3145
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You'll give in to this...":mov $sel2,"The zombie's toothless mouth chews on Luka's penis!"
if %ransu=2 mov $sel1,"This zombie is particularly skillful...":mov $sel2,"The zombie's head intensely sucks on Luka's penis!"
if %ransu=3 mov $sel1,"Suck up all his semen, zombie!":mov $sel2,"The zombie's head sucks on Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Thirsting Mouth"
>Chrome summons a female zombie's head!\
dwave 1,"se\ero_buchu2.ogg"
eng $sel2:$sel6
if %nanido<2 damage 30,35
if %nanido=2 damage 35,38
if %nanido=3 damage 43,55
skillname ""
if %mylife=0 sub %stack,1:return *chrom_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*chrom_a3

add %stack,1
skillcount1 3146
name $name
>Guys like you need their shots!\
name ""
skillname "I'll Give an Injection!"
>Chrome quickly injects a strange medicine into Luka through a needle!\
mov %status,2:gosub *status_print
>Luka's body has been paralyzed!\
skillname ""
if %kousan>0 skip 4
name "Luka"
>Uhg... Damn it...\
name ""
name $name
>Hahaha... You can't do anything now.@
>Now, let me play with you...\
name ""
mov %status_turn,2
if %nanido=2 rnd2 %status_turn,2,3
if %nanido=3 rnd2 %status_turn,3,4
sub %stack,1
return



*chrom_a4

add %stack,1
name $name
>I'll take away your freedom!\
name ""
skillname "Restraint of the Dead"
>Chrome summons thousands of zombie arms that grab Luka!\
mov %kousoku,1:gosub *status_print
>Luka's movement is bound by the zombie arms!\
skillname ""
if %kousan>1 sub %stack,1:return
gosub *face2
name $name
>Hahaha... This time I'll finish it...\
name ""
if %nanido<2 mov %genmogaku,1
if %nanido=2 mov %genmogaku,1
if %nanido=3 mov %genmogaku,2
sub %stack,1
return



*chrom_a5

add %stack,1
skillcount1 3147
>Luka's movement is bound by the zombie arms!\
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Haha... Are you weak here?":mov $sel2,"Chrome grabs Luka's penis, and fingers his urethral opening!"
if %ransu=2 mov $sel1,"Do my small hands feel good...?":mov $sel2,"Chrome grabs Luka's penis with both her hands and pumps him!"
if %ransu=3 mov $sel1,"Hehe... I'll tease the tip...":mov $sel2,"Chrome squeezes the tip of Luka's penis!"
if %ransu=4 mov $sel1,"Haha... I'll squeeze you.":mov $sel2,"Chrome grabs Luka's penis and starts to stroke him!"
name $name
eng $sel1:$sel6\
name ""
skillname "I'll Give a Handjob!"
dwave 1,"se\ero_koki1.ogg"
eng $sel2:$sel6
if %nanido<2 damage 35,40
if %nanido=2 damage 40,44
if %nanido=3 damage 45,55
skillname ""
if %mylife=0 sub %stack,1:return *chrom_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*chrom_a6

add %stack,1
skillcount1 3148
>Luka's movement is bound by the zombie arms!\
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck out a sample from your penis!":mov $sel2,"Chrome sucks on Luka's penis!"
if %ransu=2 mov $sel1,"Here... I'll lick it...":mov $sel2,"Chrome's tongue crawls all over Luka's penis!"
if %ransu=3 mov $sel1,"Like this... I'll suck it...":mov $sel2,"Chrome intensely sucks on Luka's penis!"
if %ransu=4 mov $sel1,"*Lick* *Suck*":mov $sel2,"Chrome slowly sucks on Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "I'll Give a Blowjob!"
dwave 1,"se\ero_buchu2.ogg"
eng $sel2:$sel6
if %nanido<2 damage 35,40
if %nanido=2 damage 40,44
if %nanido=3 damage 50,60
skillname ""
if %mylife=0 sub %stack,1:return *chrom_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*chrom_a7

add %stack,1
>Luka's movement is bound by the zombie arms!\
name $name
>Hehehe... Now, I'll violate you...\
name ""
skillname "I'll Rape You!"
mov %kousoku,2:mov %genmogaku,100
>Chrome sits on top of Luka!\
skillname ""
if %kousan=2 sub %stack,1:return
name "Luka"
>Guh...!\
name ""
name $name
>Just lay there quietly...@
>I'll take a sample with my pussy...\
name ""
sub %stack,1
return



*chrom_a8

add %stack,1
skillcount1 3149
>Chrome is sitting on top of Luka!\
name $name
>Hehe... I'll violate you now...\
name ""
skillname "I'll Rape You!"
mov %kousoku,3
>Chrome forces her waist down on Luka's penis!@
lsp 700,":c;chara\chrom_ha1.bmp",0,0:print 10,500
>Luka's penis is swallowed by Chrome's tight vagina!
dwave 1,"se\ero_pyu3.ogg"
mov %damage_kotei,1
damage 50,55
mov %kousoku,3
skillname ""
if %mylife=0 sub %stack,1:return *chrom_h5
if %mylife<55 sub %stack,1:goto *chrom_a9
>Luka is being raped by Chrome!\
name "Luka"
>Uwaaa!\
name ""
>Stuck in her tight vagina, her soft flesh squeezes down tightly around me.\
>My body writhes as the stimulation from her warm insides attacks me.\
name $name
>Haha... I'll keep doing this until you come!\
name ""
skillcount1 3149
skillname "I'll Rape You!"
>Chrome starts to move her waist!\
>Her soft walls rub against Luka's penis!
dwave 1,"se\ero_chupa4.ogg"
mov %damage_kotei,1
damage 50,55
skillname ""
if %mylife=0 sub %stack,1:return *chrom_h6
if %mylife<55 sub %stack,1:goto *chrom_a9
>Luka is being raped by Chrome!\
name $name
>Hahahaha!@
>You won't last for long while I do this!\
name ""
skillcount1 3149
skillname "I'll Rape You!"
>Chrome starts to grind her waist against Luka!\
>Her tight pussy causes Luka to writhe!
dwave 1,"se\ero_chupa3.ogg"
mov %damage_kotei,1
damage 50,55
skillname ""
sub %stack,1
goto *chrom_a9



*chrom_a9

add %stack,1
>Luka is being raped by Chrome!\
name "Luka"
>Auu... I'm going to come...\
name ""
name $name
>Hehehe... Then shall I finish you off?@
>Now, shoot it out in me!\
skillcount1 3149
skillname "I'll Rape You!"
>While laughing, Chrome shakes her waist!\
>Luka moans as he's sent over the edge!
dwave 1,"se\ero_chupa3.ogg"
mov %damage_kotei,2
damage 55,55
skillname ""
sub %stack,1
return *chrom_h6



*chrom_onedari

mov $list1,"Thirsting Arms"
if %3144>0 mov %list_num1,1
mov $list2,"Thirsting Mouth"
if %3145>0 mov %list_num2,1
mov $list3,"I'll Give an Injection!"
if %3146>0 mov %list_num3,1
mov $list4,"I'll Give a Handjob!"
if %3147>0 mov %list_num4,1
mov $list5,"I'll Give a Blowjob!"
if %3148>0 mov %list_num5,1
mov $list6,"I'll Rape You!"
if %3149>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *chrom_onedari1
if %cmd1=12 goto *chrom_onedari2
if %cmd1=13 goto *chrom_onedari3
if %cmd1=14 goto *chrom_onedari4
if %cmd1=15 goto *chrom_onedari5
if %cmd1=16 goto *chrom_onedari6
if %cmd1=-1 goto *chrom_main
goto *chrom_onedari



*chrom_onedari1

gosub *onedari_syori
name $name
>You want to be played with by the zombie's arms?@
>How pathetic... I'll give you what you want.\
name ""
gosub *chrom_a1
skip -1



*chrom_onedari2

gosub *onedari_syori
name $name
>You want a zombie to suck on you...?@
>How pathetic... I'll give you what you want.\
name ""
gosub *chrom_a2
skip -1



*chrom_onedari3

gosub *onedari_syori
name $name
>You want to be played with while paralyzed?@
>How pathetic... I'll give you what you want.\
name ""
gosub *chrom_a3
mov %sinkou,3
mov %kousan,3
goto *common_main



*chrom_onedari4

gosub *onedari_syori_k
name $name
>You want me to give you a handjob?@
>How pathetic... I'll give you what you want.\
name ""
if %kousoku=0 gosub *chrom_a4
gosub *chrom_a5
skip -1



*chrom_onedari5

gosub *onedari_syori_k
name $name
>You want me to suck on you?@
>How pathetic... I'll give you what you want.\
name ""
if %kousoku=0 gosub *chrom_a4
gosub *chrom_a6
skip -1



*chrom_onedari6

gosub *onedari_syori_k
name $name
>Hehehe... You want me to rape you?@
>How pathetic... I'll give you what you want.\
name ""
if %kousoku=0 gosub *chrom_a4
if %kousoku=1 gosub *chrom_a7
gosub *chrom_a8



*chrom_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\chrom_bk02.bmp",175,60
gosub *syasei2
>Played with by the zombie's hands, Luka finally ejaculates, as his semen lands on Chrome's chest.\
mov %viclose,1:gosub *lose
mov %2543,%2543+1:if %2543=1 mov %count_koenemy,%count_koenemy+1
if %2543>%count_most mov %count_most,%2543:mov $count_mostname,$name
count 5,13
mov $bad1,"Luka succumbed to the innumerable zombie arms."
if %status=2 mov $bad1,"Paralyzed, Luka succumbed to the innumerable zombie arms."
mov $bad2," After that, Luka was toyed with as a guinea pig until his death."
gosub *face2
name $name
>Hahaha, you already came?@
>Now, let's start the experiment...\
name ""
goto *chrom_h



*chrom_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\chrom_bk03.bmp",175,60
gosub *syasei2
>Sucked by the head of the female zombie, Luka finally ejaculates.\
mov %viclose,1:gosub *lose
mov %2543,%2543+1:if %2543=1 mov %count_koenemy,%count_koenemy+1
if %2543>%count_most mov %count_most,%2543:mov $count_mostname,$name
count 4,13
mov $bad1,"Luka succumbed to the female zombie's blowjob."
if %status=2 mov $bad1,"Paralyzed, Luka succumbed to the female zombie's blowjob."
mov $bad2," After that, Luka was toyed with as a guinea pig until his death."
gosub *face2
name $name
>Hahaha... Wasn't her blowjob amazing?@
>Now, let's start the experiment...\
name ""
goto *chrom_h



*chrom_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\chrom_bk05.bmp",175,60
gosub *syasei2
>Played with by Chrome's thin fingers, Luka finally ejaculates.\
mov %viclose,1:gosub *lose
mov %2543,%2543+1:if %2543=1 mov %count_koenemy,%count_koenemy+1
if %2543>%count_most mov %count_most,%2543:mov $count_mostname,$name
count 5,13
mov $bad1,"Luka succumbed to Chrome's handjob."
if %status=2 mov $bad1,"Paralyzed, Luka succumbed to Chrome's handjob."
mov $bad2," After that, Luka was toyed with as a guinea pig until his death."
gosub *face2
name $name
>Hahaha... You couldn't endure my hand.@
>Now, let's start the experiment...\
name ""
goto *chrom_h



*chrom_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\chrom_bk01.bmp",175,60
gosub *syasei2
>Sucked by Chrome's small mouth, Luka finally ejaculates.\
mov %viclose,1:gosub *lose
mov %2543,%2543+1:if %2543=1 mov %count_koenemy,%count_koenemy+1
if %2543>%count_most mov %count_most,%2543:mov $count_mostname,$name
count 4,13
mov $bad1,"Luka succumbed to Chrome's blowjob."
if %status=2 mov $bad1,"Paralyzed, Luka succumbed to Chrome's blowjob."
mov $bad2," After that, Luka was toyed with as a guinea pig until his death."
gosub *face2
name $name
>Hahaha... Was my mouth too good for you?@
>Now, let's start the experiment...\
name ""
goto *chrom_h



*chrom_h5

mov %ikigoe,3:gosub *ikigoe
name $name
>Oh...?\
name ""
gosub *syasei1
lsp 700,":c;chara\chrom_ha2.bmp",0,0
gosub *syasei2
>As soon as Luka is forced into Chrome, he accidentally ejaculates.\
mov %viclose,1:gosub *lose
mov %2543,%2543+1:if %2543=1 mov %count_koenemy,%count_koenemy+1
if %2543>%count_most mov %count_most,%2543:mov $count_mostname,$name
count 1,13
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Raped by Chrome, Luka accidentally ejaculates as soon as he's inserted."
if %status=2 mov $bad1,"Raped by Chrome while paralyzed, Luka accidentally ejaculates as soon as he's inserted."
mov $bad2," After that, Luka was toyed with as a guinea pig until his death."
name $name
>Hahaha... Coming just from being put in me.@
>My pussy is way too good for you!\
>Now, let's start the experiment...\
>I'll squeeze some more semen out of you to analyze...\
name ""
goto *chrom_h



*chrom_h6

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":c;chara\chrom_ha2.bmp",0,0
gosub *syasei2
>Unable to endure Chrome moving her waist, Luka ejaculates inside of her tight vagina.\
mov %viclose,1:gosub *lose
mov %2543,%2543+1:if %2543=1 mov %count_koenemy,%count_koenemy+1
if %2543>%count_most mov %count_most,%2543:mov $count_mostname,$name
count 1,13
mov $bad1,"Luka succumbed to the pleasure as Chrome raped him."
if %status=2 mov $bad1,"Paralyzed, Luka succumbed to the pleasure as Chrome raped him."
mov $bad2," After that, Luka was toyed with as a guinea pig until his death."
name $name
>Hehehe... You couldn't endure me.\
>Now, let's start the experiment...\
>I'll squeeze some more semen out of you to analyze...\
name ""
goto *chrom_h



*chrom_h

if %2543=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>2 mov %hseanwave,1:hseanwave:goto *chrom_hb
name $name
>First shall I see if you have any value as a guinea pig?@
>I'll squeeze out some semen and analyze its quality...\
name ""
name "Luka"
>No way...!\
name ""
mov %hseanwave,1:hseanwave
cspl 690,699
lsp 700,":c;chara\chrom_ha1.bmp",0,0:print 10,500
>Chrome quickly mounts me and forces me into her.@
>In a single thrust, she forces my penis all the way into her tiny vagina.\
name "Luka"
>Ah! Ahhh!!\
name ""
>The soft walls of Chrome's vagina squeeze down on my penis.@
>She starts to squeeze down even tighter around me.\
goto *chrom_hb



*chrom_hb

name $name
>Hehehe... Does it feel good?@
>Now, let me squeeze out a lot...\
name ""
>Chrome flexes her stomach as she tightens around me.@
>With my penis all the way inside of her, Chrome's soft walls squeeze me.\
>With her soft flesh all around me, it feels as though my body is being suppressed.\
>I already feel another orgasm rising through my waist.\
name "Luka"
>Ah... Incredible...\
name ""
name $name
>Even though I devoted my body to forbidden magic, I'm still a succubus...\
>It's easy for me to drive a man crazy!\
name ""
name "Luka"
>Aie! Ahhh!\
name ""
>As she slowly tightens around me, I let out a pathetic scream.\
>The sense of defeat only increases as I writhe around.@
>As Chrome mercilessly rapes me, there's nothing I can do to stop her...\
name "Luka"
>Ahhh!!@
>You're so... tight...@>Amazing!!\
name ""
name $name
>Hahaha... You look like you're enjoying it.\
>But I don't want to waste any time...@
>Now, I'll force you to quickly come!\
name ""
>Chrome looks down at me with a triumphant face as she declares that.@
>As if signaling the time of my defeat, she squeezes down one final time.\
>To that sweet tightness, my mind goes white.\
name "Luka"
>Ah...Ahhhh!\
name ""
gosub *syasei1
lsp 700,":c;chara\chrom_ha2.bmp",0,0
gosub *syasei2
>Urged on by the pleasure Chrome's forcing into me, I shoot out inside of her in surrender.\
name $name
>Hehe... You let out a lot.@
>But I want to take one more sample.\
name ""
name "Luka"
>Stop... Please!@
>Ahhh!!\
name ""
mov %hseanwave,6:hseanwave
>Chrome starts to move her waist.@
>Forced to move in and out of her tight vagina, the stimulation is overwhelming.\
>Her soft walls crush my penis with every movement.\
name $name
>Hahaha... I'll make you come again in no time.@
>I'm busy, so I don't want to waste too much of my time with you...\
name ""
name "Luka"
>Aiee!\
name ""
>All I can do is writhe helplessly under Chrome.\
>Quickly brought to another height by her tight pussy, I feel more of the proof of my surrender about to explode.\
name $name
>I'll finish you off!\
name ""
>More than ever before, Chrome tightly squeezes around me as she forces another orgasm out of me.\
name "Luka"
>Ahhh...\
name ""
gosub *syasei1
lsp 700,":c;chara\chrom_ha3.bmp",0,0
gosub *syasei2
>So soon after my last orgasm, I'm already forced into another.@
>A surprising amount of semen shoots out as Chrome squeezes out every drop.\
name $name
>Hehe... I got a good amount to analyze.@
>That's the end of today's experiment.\
name ""
>Chrome lets out a sadistic laugh as I lay on the floor panting.@
>With my body and mind having been raped by Chrome, I've surrendered myself to her...\
gosub *anten
mov %hseanwave,0:hseanwave
>My new life as her guinea pig started...@
>Every day I'm relentlessly milked as Chrome forces me to crossbreed with her experiments.\
mov %hseanwave,17:hseanwave
lsp 700,":c;chara\chrom_hb1.bmp",0,0:print 10,500
name $name
>I'll milk you myself today.@
>I need about 30CC of semen.\
name ""
name "Luka"
>Auu...\
name ""
>Chrome's small body climbs on top of me.@
>She doesn't insert my penis today, and only rubs it against her pussy.\
>Hundreds of zombies around me start to lick and gently bite me.@
>My body shivers at their cold tongues.\
name $name
>Come on, let it out quickly...@
>I'm really busy today!\
name ""
>Chrome gently rubs my penis against her vagina.@
>Now that I'm just her semen slave, I quickly give in to her order.\
gosub *syasei1
lsp 700,":c;chara\chrom_hb2.bmp",0,0
gosub *syasei2
>Chrome laughs as I shoot out my semen on her.\
name $name
>A good amount... But not enough.@
>Hey, zombies. Help out too.\
name ""
name "Zombie Girl"
>Uuuu...\
name ""
>As soon as she said that, the zombie's start to lick my penis with their cold tongues.\
name $name
>Come on, hurry up!@
>I'm busy, hurry up and give me your semen!\
name ""
>Chrome puts the tip of my penis at the entrance to her vagina as she says that.\
>With the zombies licking me at the same time, I'm forced over the edge.\
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":c;chara\chrom_hb3.bmp",0,0
gosub *syasei2
mov %hseanwave,0:hseanwave
name $name
>Hehehe... Good sperm as usual.@
>You're an excellent guinea pig...\
name ""
name "Luka"
>Auuu...\
name ""
>Chrome looks down at me and laughs.@
>These miserable days will continue for the rest of my life...\
gosub *anten
>...................\
goto *badend



*fairy_start

mov $name,"Fairy"
mov $name2,"Fairy"
mov $lavel,"fairy"
mov $tatie1,"fairy_st01"
mov $tatie2,"fairy_st02"
mov $tatie3,"fairy_st03"
mov $tatie4,"fairy_st02"
mov $haikei,"bg061"
mov %monster_x,270
mov %monster_y,130
if %nanido=1 mov %max_enemylife,600
if %nanido=2 mov %max_enemylife,750
if %nanido=3 mov %max_enemylife,900
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,75
mov %music,6
gosub *maxmp:mov %mp,2
mov %tikei,2
gosub *syutugen
mov $mogaku_anno1,"But Luka can't get her off his penis!"
mov $mogaku_anno2,"Luka peeled the Fairy off!"
mov $mogaku_anno3,"Luka hesitates about swinging his sword while she's holding onto him like this!"
mov $mogaku_sel1,"No! I want to play more tricks..."
mov $mogaku_sel2,"Stop moving! I want to play with it more."
mov $mogaku_sel3,"I won't let gooo! "
mov $mogaku_sel4,"No~! I don't want to let go~!"
mov $mogaku_sel5,"Haha, your penis is swaying!"
mov $mogaku_dassyutu1,"Geez! I just wanted to play with it..."
mov $mogaku_dassyutu2,""
mov $half_s1,"Hehe, you're losing strength because of my tricks."
mov $half_s2,"Men are so interesting. "
mov $kiki_s1,"Is that white stuff going to come out soon...?"
mov $kiki_s2,""
mov %end_n,4
mov %exp_minus,0
mov %zmonster_x,0
mov %tukix,310
name $name
>Flower! @> Flowers love the waaaater! \
name ""
>A Fairy is humming a song as she waters the field of flowers.@
>A cloudy liquid that looks like honey drips out of the flower in her hand.\
name ""
name "Luka"
>...........\
name ""
>It looks like she hasn't noticed me. I don't want to surprise her.@
>I'll just sneak around her...\
name $name
>Ah!@>Human!\
name ""
>Despite my efforts, the Fairy notices me and flies over.\
name "Luka"
>Ah... Hello...\
name ""
>I'm a little unsure of how to act... It's my first time meeting a Fairy.\
name $name
>Hey... Let's play!\
name ""
name "Luka"
>Eh...?\
name ""
name $name
>I want to play a prank on big bro's penis with this Succubus Flower...@
>If I do that, I'll get to see that white stuff!\
>This flower can drink all of that white liquid...@
>Then the flower will be really happy! \
name ""
name "Luka"
>What the hell...?\
name ""
name $name
>Hehehe...@
>I'll use the flower to play with you.@
>I wonder how many times you can shoot out the white stuff?\
name ""
>No matter how I look at it, this isn't a very funny "prank"...\
name "Luka"
>You can't do bad things like that!\
name ""
name $name
>...Why not?@
>I thought all men liked having their penis played with?\
name ""
name "Luka"
>Anyway, you can't do that.@
>If you do that, I'll get upset.\
>I'd have to punish you with this sword.@
>Understand? Be a good girl and go back to watering your flowers...\
name ""
bgm "bgm\battle.ogg"
name $name
>...I don't want to!@
>I want to play a prank on your penis! \
name ""
name "Luka"
>Gah...\
name ""
>Even if I scold her, she just ignores me...@
>I don't really want to...@>But it looks like I need to scold her a little more forcefully.\
goto *common_main



*fairy_v

gosub *face3
name $name
>Whawha?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Fairy turns into a butterfly!\
mov %viclose,1:gosub *victory
mov %getexp,950:gosub *lvup
mov %2244,1
goto *sean0121



*fairy_kousan

gosub *kousan_syori
>Luka yields to temptation, and ends his resistance!\
gosub *face2
name $name
>Yaay! I can play as many pranks as I want! \
name ""
goto *fairy_a



*fairy_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *fairy_kousan
if %cmd1=16 goto *fairy_onedari
if %cmd1=17 goto *common_skill
goto *fairy_main



*fairy_a

if %kousoku>0 rnd2 %ransu,1,3
if %kousoku>0 && %ransu=1 gosub *fairy_a4:goto *common_main
if %kousoku>0 && %ransu=2 gosub *fairy_a5:goto *common_main
if %kousoku>0 && %ransu=3 gosub *fairy_a6:goto *common_main
rnd2 %ransu,1,3
if %ransu=1 gosub *fairy_a1:goto *common_main
if %ransu=2 gosub *fairy_a2:goto *common_main
if %ransu=3 && %owaza_count1a>2 gosub *fairy_a3:goto *common_main
skip -4



*fairy_a1

add %stack,1
skillcount1 3150
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Shoot out the white stuff in this flower! "
if %ransu=2 mov $sel1,"Hehehe... I'll play a prank with the flower. "
if %ransu=3 mov $sel1,"This flower wants your white liquid! "
name $name
eng $sel1:$sel6\
name ""
skillname "Succubus Flower"
dwave 1,"se\ero_buchu1.ogg"
lsp 690,":a;chara\fairy_ct01.bmp",0,0:print 10,500
>The Fairy covers Luka's penis with the flower!\
>The honey covered petals close around Luka!
if %nanido<2 damage 20,25
if %nanido=2 damage 25,30
if %nanido=3 damage 40,50
skillname ""
if %mylife=0 sub %stack,1:return *fairy_h1
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*fairy_a2

add %stack,1
skillcount1 3151
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll tickle the tip. Hehe. "
if %ransu=2 mov $sel1,"If I do this, will the white stuff come out?"
if %ransu=3 mov $sel1,"Tickletickle. "
name $name
eng $sel1:$sel6\
name ""
skillname "Wing Tickle"
dwave 1,"se\umaru.ogg"
>The Fairy flies around Luka's penis, tickling it with her wings!
if %nanido<2 damage 15,20
if %nanido=2 damage 20,25
if %nanido=3 damage 30,40
skillname ""
if %mylife=0 sub %stack,1:return *fairy_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*fairy_a3

add %stack,1
gosub *face2
name $name
if %first_sel1=1 skip 3
>Hehehe... I caught your penis. \
skip 2
>Hehehe... I caught you again. \
name ""
skillname "Cling"
>The Fairy clings tightly to Luka's penis!@
lsp 690,":a;chara\fairy_ct11.bmp",0,0
mov %kousoku,1:gosub *status_print
>The Fairy is clinging to Luka's penis!\
skillname ""
if %kousan=2 sub %stack,1:return
if %first_sel1=1 skip 6
name "Luka"
>Wawawa!@>Get off!\
name ""
>The Fairy is tightly holding on to my penis. I can't get her off even if I pull at her.\
>If she's like that, it's way too risky to swing my sword.\
gosub *face2
name $name
if %first_sel1=1 skip 4
>Hehehe I can play with it like this. @
>I'll get to see the white stuff shoot out up close. \
skip 3
>Hehehe I'm hugging your penis again. @
>This time, I'll make sure I see the white stuff... \
name ""
mov %first_sel1,1
if %nanido<2 mov %genmogaku,2
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,3
sub %stack,1
return



*fairy_a4

add %stack,1
skillcount1 3152
>The Fairy is clinging tightly to Luka's penis...\
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hehehe... The tip is all squishy. ":mov $sel2,"The Fairy pats the tip of Luka's penis with both hands!"
if %ransu=2 mov $sel1,"I love how the skin feels! ":mov $sel2,"The Fairy pulls on the skin of Luka's penis!"
if %ransu=3 mov $sel1,"Hehe... Look at this hole. ":mov $sel2,"The Fairy opens Luka's urethral hole and blows inside!"
if %ransu=4 mov $sel1,"It looks just like an umbrella! ":mov $sel2,"The Fairy wraps her arms around the tip of Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Fairy Pranks"
dwave 1,"se\ero_koki1.ogg"
eng $sel2:$sel6
if %nanido<2 damage 15,20
if %nanido=2 damage 20,25
if %nanido=3 damage 30,40
skillname ""
if %mylife=0 sub %stack,1:return *fairy_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*fairy_a5

add %stack,1
skillcount1 3153
>The Fairy is clinging tightly to Luka's penis...\
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll give you lots of hugs! "
if %ransu=2 mov $sel1,"Hehe, it's so squishy! "
if %ransu=3 mov $sel1,"Hehehe."
if %ransu=4 mov $sel1,"If I squeeze it, will it leak?"
name $name
eng $sel1:$sel6\
name ""
skillname "Fairy Hug"
dwave 1,"se\ero_koki1.ogg"
>The Fairy tightly hugs Luka's penis!
if %nanido<2 damage 20,25
if %nanido=2 damage 25,30
if %nanido=3 damage 40,50
skillname ""
if %mylife=0 sub %stack,1:return *fairy_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*fairy_a6

add %stack,1
skillcount1 3154
>The Fairy is clinging tightly to Luka's penis...\
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hehe... Let me dance. ":mov $sel2,"The Fairy's wings rub against every corner of Luka's penis!"
if %ransu=2 mov $sel1,"Hehehe... Leak! Leak! ":mov $sel2,"The Fairy moves her body back and forth while clinging to Luka's penis!"
if %ransu=3 mov $sel1,"I'll focus on the top! ":mov $sel2,"The Fairy rubs the tip of Luka's penis with her hands and feet!"
if %ransu=4 mov $sel1,"Hehehe... Does it feel good?":mov $sel2,"The Fairy moves her body around while tightly clinging to Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Fairy Dance"
dwave 1,"se\ero_koki1.ogg"
eng $sel2:$sel6
if %nanido<2 damage 25,30
if %nanido=2 damage 30,35
if %nanido=3 damage 50,60
skillname ""
if %mylife=0 sub %stack,1:return *fairy_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*fairy_onedari

mov $list1,"Succubus Flower"
if %3150>0 mov %list_num1,1
mov $list2,"Wing Tickle"
if %3151>0 mov %list_num2,1
mov $list3,"Fairy Pranks"
if %3152>0 mov %list_num3,1
mov $list4,"Fairy Hug"
if %3153>0 mov %list_num4,1
mov $list5,"Fairy Dance"
if %3154>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *fairy_onedari1
if %cmd1=12 goto *fairy_onedari2
if %cmd1=13 goto *fairy_onedari3
if %cmd1=14 goto *fairy_onedari4
if %cmd1=15 goto *fairy_onedari5
if %cmd1=-1 goto *fairy_main
goto *fairy_onedari



*fairy_onedari1

gosub *onedari_syori
name $name
>You want this flower to absorb your white stuff?\
name ""
gosub *fairy_a1
skip -1



*fairy_onedari2

gosub *onedari_syori
name $name
>You want me to tickle you with my wings? \
name ""
gosub *fairy_a2
skip -1



*fairy_onedari3

gosub *onedari_syori_k
name $name
>Hehehe... You want me to play pranks on your penis? \
name ""
if %kousoku=0 gosub *fairy_a3
gosub *fairy_a4
skip -1



*fairy_onedari4

gosub *onedari_syori_k
name $name
>You want me to hug your penis?\
name ""
if %kousoku=0 gosub *fairy_a3
gosub *fairy_a5
skip -1



*fairy_onedari5

gosub *onedari_syori_k
name $name
>You want me to rub my body all over your penis? \
name ""
if %kousoku=0 gosub *fairy_a3
gosub *fairy_a6
skip -1



*fairy_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\fairy_ct02.bmp",0,0
lsp 693,":a;chara\fairy_bk03.bmp",270,130
gosub *syasei2
>Unable to endure the pleasure from the strange flower, Luka ejaculates.@
>The flower mysteriously sucks up all of Luka's semen.\
mov %viclose,1:gosub *lose
mov %2544,%2544+1:if %2544=1 mov %count_koenemy,%count_koenemy+1
if %2544>%count_most mov %count_most,%2544:mov $count_mostname,$name
count 12,5
mov $bad1,"Luka succumbed to the strange Succubus Flower."
mov $bad2,"Caught by the Fairy, Luka was played with as a toy for the rest of his life."
gosub *face2
name $name
>Hahaha... It came out! @
>Did this flower really feel that good?\
>I'll play with you even more with this flower! \
name ""
mov %hanyo1,1
goto *fairy_h



*fairy_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\fairy_bk02.bmp",270,130
gosub *syasei2
>Tickled by the Fairy's wings, Luka finally ejaculates.\
mov %viclose,1:gosub *lose
mov %2544,%2544+1:if %2544=1 mov %count_koenemy,%count_koenemy+1
if %2544>%count_most mov %count_most,%2544:mov $count_mostname,$name
count 13,5
mov $bad1,"Luka succumbed to the Fairy's wings tickling him."
mov $bad2,"Caught by the Fairy, Luka was played with as a toy for the rest of his life."
gosub *face2
name $name
>Hahaha... It came out! @
>You made my wings all sticky! \
name ""
goto *fairy_h



*fairy_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\fairy_bk01.bmp",270,130
lsp 690,":a;chara\fairy_ct12.bmp",0,0
gosub *syasei2
lsp 690,":a;chara\fairy_ct13.bmp",0,0:print 10,500
>As the Fairy plays with his penis, Luka finally ejaculates, covering her tiny body with his semen.\
mov %viclose,1:gosub *lose
mov %2544,%2544+1:if %2544=1 mov %count_koenemy,%count_koenemy+1
if %2544>%count_most mov %count_most,%2544:mov $count_mostname,$name
count 24,5
mov $bad1,"While the Fairy clung to his penis, Luka succumbed to her pranks."
mov $bad2,"Caught by the Fairy, Luka was played with as a toy for the rest of his life."
name $name
>Hahaha... It came out! @
>You made my body all sticky! \
name ""
csp 690:print 10,500
goto *fairy_h



*fairy_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\fairy_bk01.bmp",270,130
lsp 690,":a;chara\fairy_ct12.bmp",0,0
gosub *syasei2
lsp 690,":a;chara\fairy_ct13.bmp",0,0:print 10,500
>As the Fairy tightly hugs his penis, Luka finally ejaculates, covering her tiny body with his semen.\
mov %viclose,1:gosub *lose
mov %2544,%2544+1:if %2544=1 mov %count_koenemy,%count_koenemy+1
if %2544>%count_most mov %count_most,%2544:mov $count_mostname,$name
count 24,5
mov $bad1,"While the Fairy clung to his penis, Luka succumbed to her hug."
mov $bad2,"Caught by the Fairy, Luka was played with as a toy for the rest of his life."
name $name
>Hahaha... It came out! @
>You made my body all sticky! \
name ""
csp 690:print 10,500
goto *fairy_h



*fairy_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\fairy_bk01.bmp",270,130
lsp 690,":a;chara\fairy_ct12.bmp",0,0
gosub *syasei2
lsp 690,":a;chara\fairy_ct13.bmp",0,0:print 10,500
>As the Fairy dances around all over his penis, Luka finally ejaculates, covering her tiny body with his semen.\
mov %viclose,1:gosub *lose
mov %2544,%2544+1:if %2544=1 mov %count_koenemy,%count_koenemy+1
if %2544>%count_most mov %count_most,%2544:mov $count_mostname,$name
count 24,5
mov $bad1,"While the Fairy clung to his penis, Luka succumbed to her dance."
mov $bad2,"Caught by the Fairy, Luka was played with as a toy for the rest of his life."
name $name
>Hahaha... It came out! @
>You made my body all sticky! \
name ""
csp 690:print 10,500
goto *fairy_h



*fairy_h

if %2544=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %hanyo1=1 mov %hseanwave,21:hseanwave:goto *fairy_hb
name "Luka"
>Auuu...\
name ""
>Weak from the orgasm, I fall back onto the ground.@
>The Fairy flies towards me, and puts the strange flower next to my groin.\
>The strange golden liquid drips from the petals of the flower.@
>As I focus on the flower, all I can imagine is what it might feel like.\
name $name
>Hehehe... I'll play with you even more with this flower.\
name ""
name "Luka"
>Aaa... Stop... Stop!\
name ""
>Even if I resist with my voice, my body can't...\
mov %hseanwave,20:hseanwave
lsp 690,":a;chara\fairy_ct01.bmp",0,0:print 10,500
>The petals wrap around my penis!\
goto *fairy_hb



*fairy_hb

name "Luka"
>Ahh!!\
name ""
>The flower's petals vibrate and move as if it was a living creature.@
>Wrapped inside the mouth of the flower, a peculiar pleasure attacks me.\
>Somehow, the flower tightens down over the tip of my penis.@
>Finally, the petals have completely wrapped around every inch of my penis.\
name $name
>Hehehe... The flower says it loves your penis.@
>But it likes the white liquid that comes out even more.\
>It looked like you liked to let out the liquid too! \
name ""
name "Luka"
>Auuu...\
name ""
>Honey starts to flow out from the flower, making my penis sticky.@
>In addition, each petal of the flower starts to slowly move back and forth.\
>The sticky petals massage and stroke my penis as the flower tightens around me.\
name "Luka"
>Aaa... This flower... Incredible...\
name ""
>This flower evolved to force men to ejaculate for some reason...\
>The petals wrap around me and gently massage me.@
>The sticky honey covers every inch of my penis as the friction between my penis and the soft petals increases.\
>As the pleasure attacks me, I feel my waist start to go numb.@
>Slowly giving in to the pleasure, I feel my pre-come start to leak out.\
name "Luka"
>No!@>Stop this...!\
name ""
>I somehow manage to hold back the desire to release.@
>I can't allow this strange flower to absorb my semen...\
name "Luka"
>Get it off...@>Auuuu...\
name ""
>But it's too late.@
>The stimulation that this flower forces on a man won't allow them to resist.\
name $name
>It's pointless to resist! @
>There isn't a single man alive that can endure this flower! \
name ""
name "Luka"
>Auuuu!\
name ""
>Even though I know it's useless, my body writhes as I use the last of my strength to hold on.\
>Being forced to feel this good by some strange flower...!\
name $name
>Hehehe... Your penis is twitching. @
>The flower wants your white pee! \
name ""
name "Luka"
>Ahhh!!\
name ""
>Despite my best effort, I can't take it any longer.@
>As the pleasure races through my body like electricity, I give in to desire as the orgasm explodes throughout my body.\
gosub *syasei1
lsp 693,":a;chara\fairy_bk03.bmp",270,130
lsp 690,":a;chara\fairy_ct02.bmp",0,0
gosub *syasei2
name $name
>Hehe. @> The flower is sucking it all up. \
name ""
name "Luka"
>Ahhh...\
name ""
>As my semen gushes out into the flower, it slowly absorbs it.@
>My semen is just like fertilizer for this flower...\
name $name
>Haha... Let out more! \
name ""
>The Fairy keeps the flower on my penis as she happily frolics around.\
name "Luka"
>Auuu...\
name ""
>Disgrace fills me as this Fairy toys with me by raping me with a flower.\
>But slowly pushing aside that humiliation is the strange pleasure from the flower.\
>As those two feelings mix in my body, all I can do is pitifully writhe on the forest floor.\
name "Luka"
>Ah... Ahhh!\
name ""
name $name
>Hehehe... Isn't it fun? @
>Let's play even more! \
name ""
mov %hseanwave,21:hseanwave
>The petals around my penis get even tighter.@
>From the base of my penis up to the tip, the soft petals gently move and stroke me.\
>I'm no longer able to deny the pleasure this Succubus Flower can bring me...\
name "Luka"
>Ah... I'm coming!\
name ""
gosub *syasei1:gosub *syasei2
>The flower wrapped around my penis sucks up all the semen as I shoot it out.\
>I'm only feeling this pleasure so that the flower can feed...@
>The Fairy giggles at me as I pant after my orgasm.\
>Trampling on the real purpose for a man's penis, I'm just a toy to her.@
>Too weak to escape, I can't do anything but accept this...\
name $name
>Hehehe... Let's play even more! \
name ""
name "Luka"
>Stop already...@>Ahhh!!\
name ""
gosub *syasei1:gosub *syasei2
>My penis is only a toy to amuse the Fairy...@
>Using this flower to play with me, it will continue to suck up all of my semen...\
gosub *anten
mov %hseanwave,0:hseanwave
>Thus I was made into a toy of the Fairy.@
>Now her favorite object, she'll never let me go.\
>Stuck in the Forest of Spirits, I'll be toyed with by the Fairy for the rest of my life...\
>...............\
goto *badend



*elf_start

mov $name,"Elf"
mov $name2,"Elf"
mov $lavel,"elf"
mov $tatie1,"elf_st01"
mov $tatie2,"elf_st02"
mov $tatie3,"elf_st03"
mov $tatie4,"elf_h1"
mov $haikei,"bg061"
mov %monster_x,100
mov %monster_y,-100
if %nanido=1 mov %max_enemylife,700
if %nanido=2 mov %max_enemylife,800
if %nanido=3 mov %max_enemylife,800
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,1
gosub *maxmp:mov %mp,1
mov %tikei,2
gosub *syutugen
mov $mogaku_anno1,"Luka can't force the Elf off of him!"
mov $mogaku_anno2,"Luka forced the Elf off!"
mov $mogaku_anno4,"Luka scores a critical hit!"
mov $mogaku_sel1,"Just sit back and enjoy being raped by an Elf..."
mov $mogaku_sel2,"Why would you struggle when you can enjoy the pleasures of an Elf...?"
mov $mogaku_sel3,"It's pointless to struggle... You can't run away anymore."
mov $mogaku_sel4,"It's pointless to struggle... You can't run away anymore."
mov $mogaku_sel5,"It's pointless to struggle... You can't run away anymore."
mov $mogaku_dassyutu1,"You're violent..."
mov $mogaku_dassyutu2,""
mov $mogaku_kaisin1,"Guh... You caught me off guard."
mov $mogaku_kaisin2,""
mov $half_s1,"You look like you're in pain..."
mov $half_s2,"Shall I end this soon?"
mov $kiki_s1,"You're about to shoot out your proof of defeat..."
mov $kiki_s2,"I'll catch it all with my body..."
mov %end_n,4
mov %exp_minus,950
mov %zmonster_x,-150
mov %tukix,260
name $name
>I must protect this forest!@
>I will not allow a ruffian like you to attack Fairies!\
>How can you attack an innocent Fairy!\
name ""
name "Luka"
>No! I didn't attack her!\
name ""
name "Sealed Fairy"
>Yaay! I'm a butterfly!@
>How fun!\
name ""
name $name
>..............\
name ""
name "Luka"
>..............\
name ""
name $name
>Anyway... I can't let you disturb the peace of this forest!\
name ""
>The Elf jumps back and readies her bow.@
>It looks like I can't reason with her...\
mov %hanyo6,1
mov %sinkou,1
goto *common_main



*elf_v

gosub *face3
name $name
>Not only monsters, but humans are invading now too!?@
>Will there be no more peace for this forest!?\
name ""
dwave 1,"se\syometu.ogg"
lsp 701,":a;chara\elf_st11.bmp",325,280
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Elf shrinks!\
mov %viclose,1:gosub *victory
mov %getexp,1000:gosub *lvup
mov %2245,1
goto *sean0122



*elf_kousan

gosub *kousan_syori
>Luka yields to the temptation, ending his resistance!\
gosub *face2
name $name
>You surrendered.@
>Now, I'll punish you for your crimes.\
name ""
goto *elf_a



*elf_main

gosub *cmd_main
if %cmd1=11 && %kousoku=2 goto *common_mogaku
if %cmd1=11 && %kousoku=1 mov %monster_x,100:mov %monster_y,-100:goto *common_miss3
if %cmd1=11 && %nanido=0 goto *common_attack
if %cmd1=11 && %hanyo6=0 goto *common_attack
if %cmd1=11 && %hanyo6>0 goto *elf_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *elf_mogaku
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *elf_kousan
if %cmd1=16 goto *elf_onedari
if %cmd1=17 && %nanido=0 goto *common_skill
if %cmd1=17 goto *elf_skill
goto *elf_main



*elf_attack

mov %before_action,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ha!"
if %ransu=2 mov $sel1,"Hya!"
if %ransu=3 mov $sel1,"Orya!"
name "Luka"
eng $sel1:$sel6\
name ""
mov %skill_sub,1
gosub *common_attack2
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\karaburi.ogg"
delay 90
>But he can't reach the distant Elf!\
if %first_sel3=1 skip 5
name "Luka"
>Gah...\
name ""
mov %first_sel3,1
>I can't hit her when she's so far away.@
>Can I close the distance with a skill? Or do I need to wait until she's closer...?\
goto *elf_a



*elf_mogaku

mov %before_action,8
if %nanido=2 rnd2 %ransu,1,10:if %ransu=5 goto *common_mogaku
if %nanido=3 rnd2 %ransu,1,2:if %ransu=2 goto *common_mogaku
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Grr....!"
if %ransu=2 mov $sel1,"Damn you...!"
if %ransu=3 mov $sel1,"Le... let go!"
if $sel1="" rnd2 %ransu,1,3:skip -3
name $ori_name
eng $sel1:$sel6\
name ""
dwave 1,"se\dassyutu.ogg"
mov %monster_x,100:mov %monster_y,-100
lsp 700,":a;chara\"+$tatie3+".bmp",%monster_x,%monster_y
mov %kousoku,0:gosub *status_print
>Luka struggles intensely, and breaks free!\
if %owaza_num1<2 mov %owaza_count1a,0
mov %owaza_num1,0
name $name
>You're violent...\
name ""
gosub *face1
goto *common_main



*elf_skill

gosub *cmd_skill
if %cmd1=21 goto *skill1
if %cmd1=22 goto *elf_skill_x1
if %cmd1=23 goto *skill3
if %cmd1=24 goto *skill4
if %cmd1=25 goto *elf_skill_x1
if %cmd1=35 goto *skill17
if %cmd1=-1 goto *elf_main
goto *elf_skill



*elf_skill_x1

if %cmd1=22 mov %skill_sub,1:gosub *skill6:skip 2
if %cmd1=25 mov %skill_sub,1:gosub *skill5
mov %skill_sub,0
dwave 1,"se\miss.ogg"
>But the Elf jumps back and dodges!\
skillname ""
goto *elf_a



*elf_a

if %kousoku=2 rnd2 %ransu,1,2
if %kousoku=2 && %ransu=1 gosub *elf_a8:goto *common_main
if %kousoku=2 && %ransu=2 gosub *elf_a9:goto *common_main
if %kousoku=1 gosub *elf_a7:goto *common_main
if %status=2 rnd2 %ransu,1,5
if %status=2 && %ransu=1 gosub *elf_a3:goto *common_main
if %status=2 && %ransu=2 gosub *elf_a4:goto *common_main
if %status=2 && %ransu=3 gosub *elf_a5:goto *common_main
if %status=2 && %ransu>3 && %status_turn=0 gosub *elf_a6:goto *common_main
if %status=2 skip -5
if %hanyo6=0 gosub *elf_a1:goto *common_main
if %hanyo6=1 gosub *elf_a2:goto *common_main



*elf_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I can't challenge a swordsman in close combat!"
if %ransu=2 mov $sel1,"This is how an Elf fights!"
if %ransu=3 mov $sel1,"Hit and run. The basics of fighting with a bow!"
name $name
eng $sel1:$sel6\
name ""
dwave 1,"se\step.ogg"
>The Elf jumps backwards and raises her bow!\
mov %hanyo6,1
sub %stack,1
return



*elf_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Elves don't like bloodshed, so I won't leave a wound!"
if %ransu=2 mov $sel1,"Don't worry, it won't hurt..."
if %ransu=3 mov $sel1,"This arrow won't kill you..."
name $name
eng $sel1:$sel6\
name ""
skillname "Paralysis Arrow"
dwave 1,"se\yumi.ogg"
>The Elf fires off an arrow!@
>It flies faster than Luka can dodge, and hits him squarely in the chest!\
if %first_sel1=1 skip 5
name "Luka"
>Guh...@> What...?\
name ""
>Even though I didn't take any damage, my body instantly froze.@
mov %status,2:gosub *status_print
>Luka has been paralyzed!\
skillname ""
if %first_sel1=1 skip 9
name "Luka"
>Guh...!\
name ""
name $name
>Now you can't fight back...@
>Get ready, I'll make you pay for your transgressions.\
name ""
mov %first_sel1,1
>The Elf quickly moves closer to Luka!\
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,2,3
if %nanido=3 rnd2 %status_turn,2,5
mov %hanyo6,0
sub %stack,1
return



*elf_a3

add %stack,1
skillcount1 3155
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"How does my handjob feel?"
if %ransu=2 mov $sel1,"Haha... Does it feel good?"
if %ransu=3 mov $sel1,"I'll squeeze you with my hand..."
name $name
eng $sel1:$sel6\
name ""
skillname "Elf Handjob"
dwave 1,"se\ero_sigoki1.ogg"
>The Elf grabs Luka's penis and gently strokes it!
if %nanido<2 damage 13,16
if %nanido=2 damage 16,20
if %nanido=3 damage 23,28
skillname ""
if %mylife=0 sub %stack,1:return *elf_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*elf_a4

add %stack,1
skillcount1 3156
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"*Suck* *Lick*"
if %ransu=2 mov $sel1,"Let it out in my mouth..."
if %ransu=3 mov $sel1,"I'll suck it out..."
name $name
eng $sel1:$sel6\
name ""
skillname "Elf Blowjob"
dwave 1,"se\ero_buchu3.ogg"
>The Elf gently sucks on Luka's penis!
if %nanido<2 damage 16,19
if %nanido=2 damage 21,24
if %nanido=3 damage 29,34
skillname ""
if %mylife=0 sub %stack,1:return *elf_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*elf_a5

add %stack,1
skillcount1 3157
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Shoot it out on my chest..."
if %ransu=2 mov $sel1,"Isn't this a man's favorite part...?"
if %ransu=3 mov $sel1,"I'll squeeze out the fluid of your surrender with my chest..."
name $name
eng $sel1:$sel6\
name ""
skillname "Elf Tit Fuck"
dwave 1,"se\ero_koki1.ogg"
>The Elf puts Luka's penis between her breasts and squeezes it!
if %nanido<2 damage 19,22
if %nanido=2 damage 25,29
if %nanido=3 damage 35,40
skillname ""
if %mylife=0 sub %stack,1:return *elf_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*elf_a6

add %stack,1
name $name
>Now, I'll violate you...\
name ""
skillname "Mount"
mov %monster_x,0
mov %monster_y,0
mov %kousoku,1:gosub *status_print
>The Elf sits on top of Luka!\
skillname ""
if %kousan=2 sub %stack,1:return
if %first_sel2=1 sub %stack,1:return
name $name
>Stay still while I put you inside...@
>Aren't you curious about feeling the amazing pussy of an Elf?\
>I'll satisfy you with something no man can resist...@
>I wonder how many seconds you'll last?\
name ""
mov %first_sel2,1
mov %genmogaku,0
sub %stack,1
return



*elf_a7

add %stack,1
>The Elf is sitting on top of Luka!\
name $name
>Haha... I'm putting it in.@
>Let's see how long you can last...\
name ""
skillname "Elf Reverse-Rape"
mov $tatie4,"elf_h2"
lsp 700,":a;chara\elf_h2.bmp",0,0:print 10,500
dwave 1,"se\ero_pyu5.ogg"
>The Elf drops her waist and forces Luka deep inside of her!
mov %damage_kotei,1
damage 40,45
mov %kousoku,2:mov %genmogaku,100
>Luka is being raped by the Elf!\
skillname ""
name "Luka"
>Ahhh!!\
name ""
>Her tight pussy firmly squeezes around my penis as soon as I'm inside her.\
>As if the walls of her vagina are made from a soft jelly, they tighten and massage every inch of my penis!\
name $name
>How is it inside of me?@
>It doesn't look like you can endure it...\
name ""
if %mylife=0 sub %stack,1:return *elf_h4
mov $mogaku_anno1,"But Luka is forcibly held down!"
mov $mogaku_anno3,"But Luka is forcibly held down!"
mov $mogaku_sel1,"Pointless... You have no choice but to come in me."
mov $mogaku_sel2,"Struggling while panting in pleasure..."
mov $mogaku_sel3,"Struggling while being raped... How pitiful."
mov $mogaku_sel4,"It's pointless to resist... Your fate was sealed as soon as I forced you into me."
mov $mogaku_sel5,"Every man is left helpless when I rape them..."
sub %stack,1
return



*elf_a8

add %stack,1
skillcount1 3158
>Luka is being raped by the Elf!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hahaha... Well? Can you endure it?":mov $sel2,"The Elf grinds her waist against Luka!"
if %ransu=2 mov $sel1,"It feels good, doesn't it?":mov $sel2,"The Elf wriggles her hips!"
if %ransu=3 mov $sel1,"Hehe... No man can resist this.":mov $sel2,"The Elf bounces her waist up and down like a piston!"
if %ransu=4 mov $sel1,"I'll make you come!":mov $sel2,"The Elf violently shakes her waist!"
if %ransu=5 mov $sel1,"I'll make you shoot out everything...":mov $sel2,"The Elf shakes her lower back!"
name $name
eng $sel1:$sel6\
name ""
skillname "Elf Waist Shake"
dwave 1,"se\ero_chupa3.ogg"
eng $sel2:$sel6
mov %damage_kotei,1
damage 40,45
skillname ""
if %mylife=0 sub %stack,1:return *elf_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*elf_a9

add %stack,1
skillcount1 3159
>Luka is being raped by the Elf!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Haha... I can make it tighter...":mov $sel2,"The Elf's elastic pussy tightens around Luka!"
if %ransu=2 mov $sel1,"Does it feel good inside of me?":mov $sel2,"An overpowering pleasure is forced into Luka as the Elf tightens her pussy!"
if %ransu=3 mov $sel1,"Haha... What will you do when I do this?":mov $sel2,"The Elf's pussy contracts in waves, as if milking Luka's penis!"
if %ransu=4 mov $sel1,"The tip is your weak point, isn't it?":mov $sel2,"The deepest part of the Elf's vagina tightens around the tip of Luka's penis!"
if %ransu=5 mov $sel1,"Haha... You won't last at this rate.":mov $sel2,"The Elf's vagina tightens around Luka!"
name $name
eng $sel1:$sel6\
name ""
skillname "Elf Tightening"
dwave 1,"se\ero_chupa5.ogg"
eng $sel2:$sel6
damage 40,45
skillname ""
if %mylife=0 sub %stack,1:return *elf_h6
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*elf_onedari

mov $list1,"Elf Handjob"
if %3155>0 mov %list_num1,1
mov $list2,"Elf Blowjob"
if %3156>0 mov %list_num2,1
mov $list3,"Elf Tit Fuck"
if %3157>0 mov %list_num3,1
mov $list4,"Elf Waist Shake"
if %3158>0 mov %list_num4,1
mov $list5,"Elf Tightening"
if %3159>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *elf_onedari1
if %cmd1=12 goto *elf_onedari2
if %cmd1=13 goto *elf_onedari3
if %cmd1=14 goto *elf_onedari4
if %cmd1=15 goto *elf_onedari5
if %cmd1=-1 goto *elf_main
goto *elf_onedari



*elf_onedari1

mov %monster_x,100:mov %monster_y,-100
gosub *onedari_syori
name $name
>You want to be punished by my hand?@
>Alright, I'll punish you like that...\
name ""
gosub *elf_a3
skip -1



*elf_onedari2

mov %monster_x,100:mov %monster_y,-100
gosub *onedari_syori
name $name
>You want to be punished by my mouth?@
>Alright, I'll punish you like that...\
name ""
gosub *elf_a4
skip -1



*elf_onedari3

mov %monster_x,100:mov %monster_y,-100
gosub *onedari_syori
name $name
>You want to be punished by my breasts?@
>Alright, I'll punish you like that...\
name ""
gosub *elf_a5
skip -1



*elf_onedari4

gosub *onedari_syori_k
name $name
>You want me to rape you?@
>Alright, I'll shake my waist until you can't take it anymore...\
name ""
if %kousoku=0 gosub *elf_a6
if %kousoku=1 gosub *elf_a7
gosub *elf_a8
skip -1



*elf_onedari5

gosub *onedari_syori_k
name $name
>You want me to rape you?@
>Alright, I'll tighten around you until you can't take it anymore...\
name ""
notif %kousoku=0 skip 5
mov %monster_x,0
mov %monster_y,0
mov %kousoku,1:gosub *status_print
>The Elf mounts Luka!\
if %kousoku=1 gosub *elf_a7
gosub *elf_a9
skip -1



*elf_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\elf_bk03.bmp",100,-100
gosub *syasei2
>Unable to endure the pleasure from her hand, Luka finally ejaculates.\
mov %viclose,1:gosub *lose
mov %2545,%2545+1:if %2545=1 mov %count_koenemy,%count_koenemy+1
if %2545>%count_most mov %count_most,%2545:mov $count_mostname,$name
count 5,9
mov $bad1,"Luka succumbed to the Elf's handjob."
mov $bad2,"Robbed of free will by her pussy, Luka spent the rest of his life as the Elf's pet."
gosub *face2
name $name
>Haha... You covered my hand with your semen...@
>Since you disrupted the peace of this forest, you won't be let off with just that...\
name ""
goto *elf_h



*elf_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\elf_bk01.bmp",100,-100
gosub *syasei2
>Unable to endure the pleasure from her mouth, Luka finally ejaculates.\
mov %viclose,1:gosub *lose
mov %2545,%2545+1:if %2545=1 mov %count_koenemy,%count_koenemy+1
if %2545>%count_most mov %count_most,%2545:mov $count_mostname,$name
count 4,9
mov $bad1,"Luka succumbed to the Elf's blowjob."
mov $bad2,"Robbed of free will by her pussy, Luka spent the rest of his life as the Elf's pet."
gosub *face2
name $name
>Haha... You filled my mouth with your semen...@
>Since you disrupted the peace of this forest, you won't be let off with just that...\
name ""
goto *elf_h



*elf_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\elf_bk02.bmp",100,-100
gosub *syasei2
>Unable to endure the pleasure from her breasts, Luka finally ejaculates.\
mov %viclose,1:gosub *lose
mov %2545,%2545+1:if %2545=1 mov %count_koenemy,%count_koenemy+1
if %2545>%count_most mov %count_most,%2545:mov $count_mostname,$name
count 7,9
mov $bad1,"Luka succumbed to the Elf's titty fuck."
mov $bad2,"Robbed of free will by her pussy, Luka spent the rest of his life as the Elf's pet."
gosub *face2
name $name
>Haha... You covered my chest with your semen...@
>Since you disrupted the peace of this forest, you won't be let off with just that...\
name ""
goto *elf_h



*elf_h4

mov %ikigoe,3:gosub *ikigoe
name $name
>Eh?@>Already?\
name ""
gosub *syasei1
lsp 700,":a;chara\elf_h3.bmp",0,0
gosub *syasei2
>As soon as Luka is forced into the Elf, he accidentally ejaculates.\
mov %viclose,1:gosub *lose
mov %2545,%2545+1:if %2545=1 mov %count_koenemy,%count_koenemy+1
if %2545>%count_most mov %count_most,%2545:mov $count_mostname,$name
count 1,9
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"As soon as Luka was forced into the Elf, he accidentally ejaculated."
mov $bad2,"Robbed of free will by her pussy, Luka spent the rest of his life as the Elf's pet."
gosub *face2
name $name
>Coming just from insertion...@>How pathetic!\
>Since you disrupted the peace of this forest, you won't be let off with just that...\
name ""
>Even after I was defeated, the Elf continues to insult me...\
goto *elf_h



*elf_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\elf_h3.bmp",0,0
gosub *syasei2
>Unable to endure the shaking of her amazing pussy, Luka ejaculates.\
mov %viclose,1:gosub *lose
mov %2545,%2545+1:if %2545=1 mov %count_koenemy,%count_koenemy+1
if %2545>%count_most mov %count_most,%2545:mov $count_mostname,$name
count 1,9
mov $bad1,"Raped by the Elf, Luka succumbed to her shaking waist."
mov $bad2,"Robbed of free will by her pussy, Luka spent the rest of his life as the Elf's pet."
gosub *face2
name $name
>Haha... You let it all out inside of me.@
>Since you disrupted the peace of this forest, you won't be let off with just that...\
name ""
>Even after I was defeated, the Elf continues to insult me...\
goto *elf_h



*elf_h6

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\elf_h3.bmp",0,0
gosub *syasei2
>Unable to endure the intense tightness of the Elf's amazing pussy, Luka ejaculates.\
mov %viclose,1:gosub *lose
mov %2545,%2545+1:if %2545=1 mov %count_koenemy,%count_koenemy+1
if %2545>%count_most mov %count_most,%2545:mov $count_mostname,$name
count 1,9
mov $bad1,"Raped by the Elf, Luka succumbed to her tightness."
mov $bad2,"Robbed of free will by her pussy, Luka spent the rest of his life as the Elf's pet."
gosub *face2
name $name
>Haha... You let it all out inside of me.@
>Since you disrupted the peace of this forest, you won't be let off with just that...\
name ""
>Even after I was defeated, the Elf continues to insult me...\
goto *elf_h



*elf_h

mov %monster_y,-100
if %2545=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,2:hseanwave:goto *elf_hb
name "Luka"
>Uuuu...\
name ""
cspl 690,699
lsp 700,":a;chara\elf_h1.bmp",0,0:print 10,500
>Too weak to resist her, the Elf throws me to the ground.@
>Sitting on top of me, she puts the entrance of her vagina right next to my penis.\
name $name
>I'm going to violate you in a few seconds...@
>To make sure you never return, I'll force you to go crazy.\
name ""
name "Luka"
>Ahh...@> Stop! Stop!\
name ""
name $name
>Haha... Raping a man who resists makes me a little happy.\
name ""
mov %hseanwave,2:hseanwave
lsp 700,":a;chara\elf_h2.bmp",0,0:print 10,500
>Saying that, the Elf forces me all the way inside her!@
>As soon as I'm inside her, I'm instantly attacked by the feeling of her soft walls!\
>Just like being forced into jelly, her soft walls tighten around me!@
>Warm, sticky liquid starts to flow out from inside of her.\
goto *elf_hb



*elf_hb

name "Luka"
>Auuu!!\
name ""
name $name
>Haha... A female elf's genitals are unmatched.\
name ""
>Letting out a sadistic laugh, the Elf looks down at me.@
mov %hseanwave,8:hseanwave
>And starts to grind her waist back and forth!\
name "Luka"
>Ahhh!!\
name ""
>Erotic sounds fill the clearing of the forest as I'm forced in and out of her.\
name $name
>Hehe... I just moved a little bit and you're already moaning that loudly?\
name ""
>While bouncing her waist up and down, she looks at me with a triumphant face.\
>Underneath her, I bite my lip as I try to endure the pleasure.@
>Mercilessly raping me, I have no way to stop her...@
>All I can do is endure...\
name $name
>Hehe... Are you humiliated?@
>It's pointless to try to endure... There's no escape.\
name ""
>The Elf speeds up her pumping as she states that.@
>Strangled by her amazing pussy, I finally break down and give in.\
name "Luka"
>Haaaaaa!@
>I'm going to come!\
name ""
name $name
>So pathetic! Let it out you wimp!@
>I'll squeeze out every drop of your defeat!\
name ""
>As if doing a killing move, the Elf twists her hips around in a circle.@
>As the obscene noise echoes through the forest, my vision goes white.\
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\elf_h3.bmp",0,0
gosub *syasei2
>I explode inside of the Elf, as if shooting out a white flag of surrender.\
name "Luka"
>Auuu...\
name ""
>I tremble in pleasure as I ejaculate.@
>In the end, I wasn't able to endure...\
name $name
>Hehe... Was it good?\
name ""
>The Elf looks down at me with a sadistic smile as I bask in the feelings of the humiliating orgasm.\
>While being forced to look at her triumphant face, my ejaculation ends.\
name $name
>How pathetic.@>Raped by a female as you come helplessly.@
>Even though you're a man, you don't even try to fight back!\
name ""
>As the Elf laughs at me, she starts to move her waist again.@
>Now moving around in a circle, the stimulation is twice as powerful as moments ago.\
name "Luka"
>Ahhh!!\
name ""
name $name
>Is it really that good?@
>Hahaha... Crying out in pleasure while being raped! How pathetic!\
name ""
name "Luka"
>Auuu...\
name ""
>Even if I try to endure this, her movements are too intense.@
>Too weak to move, I can't do anything but be flooded by the pleasure.\
name $name
>Hehe... So miserable.\
name ""
>My penis is being mercilessly tortured by pleasure inside of her.@
>Whenever she stops moving her waist, she tightens around my penis instead.\
>As her jelly-like walls close tighter around my penis, I can feel every inch of her soft walls.\
name "Luka"
>Faaaaa...\
name ""
name $name
>It looks like you're going to come again.\
name ""
>While squeezing me even tighter, the Elf starts to make small movements.\
>Squeezed tightly by her pussy, the small movements force pleasure into every inch of my penis.\
name $name
>You look like you're about to come...@
>Such a shameless Hero!\
name ""
>The Elf starts to rhythmically contract her pussy.@
>As if milking me, she starts from the entrance of her pussy and moves all the way to the deepest point.\
>Instantly cornered by this change in stimulation, I'm forced over the edge.\
name "Luka"
>Auu... I'm coming again!\
name ""
name $name
>Then I'll finish you...@
>Now... Come!\
name ""
>Finishing me off just like she said, she clamps down around every inch of my penis, squeezing me with all her power.\
>Squeezed tighter than ever before, a powerful orgasm blows through my body.\
gosub *syasei1
lsp 700,":a;chara\elf_h4.bmp",0,0
gosub *syasei2
name "Luka"
>Faaa!\
name ""
>Flooded in ecstasy, I've finally surrendered my body and mind to the Elf.\
>Broken by the pleasure, I can't think of anything but wanting to feel more of her...\
name $name
>Oh? Did you give in?@
>Are you already a slave to my pussy?\
name ""
>The Elf shakes her waist as a triumphant smile flashes on her face.\
name "Luka"
>Ahhh!\
name ""
>I tremble in joy at the merciless pleasure.@
>Rejoicing inside of her pussy, I accept my new role.\
name $name
>It can't be helped, I guess.@
>If you've become like this, I have no choice but to take care of you.\
>I'll keep you in this forest for the rest of your life as my pet.\
name ""
name "Luka"
>Auu... Incredible...@
>I'm coming again!\
name ""
gosub *syasei1
lsp 700,":a;chara\elf_h5.bmp",0,0
gosub *syasei2
>I come again quickly after my last orgasm.@
>Accepting the pleasure of this humiliation, I immerse myself in the sensations.\
name $name
>You aren't allowed to rest yet.@
>You don't have your own will anymore... You're just my pet.\
name ""
name "Luka"
>Ahhhh... Too good...\
name ""
gosub *syasei1:gosub *syasei2
gosub *anten
mov %hseanwave,0:hseanwave
>Robbed of my free will by her amazing pussy, it's not possible for me to return.\
>Unable to leave the forest, I spend every day at the Elf's side.@
>But since she violates me every day, I'm happy...\
>...................\
goto *badend



*tfairy_start

mov $name,"Twin Fairies"
mov $name2,"Twin Fairies"
mov $lavel,"tfairy"
mov $tatie1,"tfairy_st01"
mov $tatie2,"tfairy_st02"
mov $tatie3,"tfairy_st03"
mov $tatie4,"tfairy_st02"
mov %monster_x,220
mov %monster_y,130
if %nanido=1 mov %max_enemylife,700
if %nanido=2 mov %max_enemylife,800
if %nanido=3 mov %max_enemylife,900
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,80
mov %music,6
mov $haikei, "bg061"
gosub *maxmp:mov %mp,2
mov %tikei,2
gosub *syutugen_plural
mov %end_n,4
mov %exp_minus,1950
mov %zmonster_x,-85
name "Fairy A"
>Wah!@> A human!\
name ""
name "Fairy B"
>Human!\
name ""
lsp 700,":a;chara\tfairy_st01.bmp",320,130
lsp 701,":a;chara\elf_st11.bmp",125,280:print 10,500
name "Elf"
>Hey you idiots!@>I told you not to come out!@
>A horrible monster is roaming around!@>You don't want to get eaten do you!?\
name ""
name "Fairy A"
>Oh?@
>Big sis got all teeny!\
name ""
name "Fairy B"
>Weeny weeny!\
name ""
name "Elf"
>That doesn't matter!@
>Hurry, go back home!\
name ""
name "Fairy A"
>Hey...@
>Why don't you try taking a step forward?\
name ""
name "Fairy B"
>Why don't you try?\
name ""
name "Elf"
>Eh...?\
name ""
for %move=0 to 20 step 5
amsp 701,125+%move,280
print 1:wait 30
next
>The Elf takes a step forward.\
dwave 1,"se\fall2.ogg"
for %move=0 to 320 step 10
amsp 701,145,280+%move
print 1:wait 10
next
csp 701:print 1
>Suddenly the Elf drops through a small hole!\
name ""
name "Elf"
>Kyaa!@>What is this!?\
name ""
lsp 700,":a;chara\tfairy_st02.bmp",320,130
name "Fairy A"
>She dropped! \
name ""
name "Fairy B"
>Dropped! \
name ""
name "Elf"
>Let me out!@>I won't forgive you two for this!\
name ""
>Now tiny and powerless, the Elf is stuck in the hole in the ground.\
name ""
dwave 1,"se\lvup.ogg"
>The Twin Fairies defeated their Big Sister!\
name ""
>...Oi oi.@
>These girls are pretty cruel...\
name "Fairy A"
>Human! \
name ""
name "Fairy B"
>Human! \
name ""
>The mischievous little fairies turn their eyes toward me.@
>Each of them is holding one of those Succubus Flower's that the last Fairy had...\
bgm "bgm\battle.ogg"
lsp 700,":a;chara\tfairy_st01.bmp",220,130:print 10,500
name "Fairy A"
>Let's play a game!@> Let's see who can suck in more of the white stuff! \
name ""
name "Fairy B"
>Game! \
name ""
name "Luka"
>Gah...\
name ""
>It looks like I'll have to discipline these naughty fairies...\
goto *common_main



*tfairy_v

gosub *face3
name "Fairy A"
>Uwa!\
name ""
name "Fairy B"
>Uwa!\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Twin Fairies turn into two butterflies!\
mov %viclose,1:gosub *victory_plural
mov %getexp,1000:gosub *lvup
mov %2246,1
goto *sean0123



*tfairy_kousan

gosub *kousan_syori
>Luka yields to the temptation, ending his resistance!\
gosub *face2
name "Fairy A"
>Yay! He wants us to play pranks on him!\
name ""
name "Fairy B"
>Pranks!\
name ""
goto *tfairy_a



*tfairy_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *tfairy_mogaku1
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *tfairy_mogaku1
if %cmd1=12 && %genmogaku=0 goto *tfairy_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *tfairy_kousan
if %cmd1=16 goto *tfairy_onedari
if %cmd1=17 goto *common_skill
goto *tfairy_main



*tfairy_mogaku1

mov %before_action,7
rnd2 %ransu,1,3
if %cmd1=11 && %ransu=1 mov $sel1,"Uhg!"
if %cmd1=11 && %ransu=2 mov $sel1,"Guh... Damn..."
if %cmd1=11 && %ransu=3 mov $sel1,"Stop!"
if %cmd1=12 && %ransu=1 mov $sel1,"Guh!"
if %cmd1=12 && %ransu=2 mov $sel1,"Let go!"
if %cmd1=12 && %ransu=3 mov $sel1,"Grr... Stop!"
name "Luka"
eng $sel1:$sel6\
name ""
if %cmd1=11 mov $sel1,"Luka attacks!"
if %cmd1=11 gosub *mp_kaihuku:gosub *mp
if %cmd1=12 mov $sel1,"Luka tries to peel the Twin Fairies off!"
if %cmd1=12 mov %genmogaku,%genmogaku-1:if %genmogaku<0 mov %genmogaku,0
eng $sel1:$sel6
if %cmd1=11 mov $sel1,"But Luka hesitates at swinging his sword!"
if %cmd1=12 mov $sel1,"But Luka is unable to peel them off!"
eng $sel1:$sel6\
rnd2 %ransu,1,5
if %ransu=1 mov $sel1,"More pranks! ":mov $sel2,"Keep playing until you leak! "
if %ransu=2 mov $sel1,"I'll never let gooo! ":mov $sel2,"Neeever! "
if %ransu=3 mov $sel1,"Whee! He's moving around so much! ":mov $sel2,"Wheee! "
if %ransu=4 mov $sel1,"More playing! ":mov $sel2,"Play! "
if %ransu=5 mov $sel1,"No! No! More pranks!":mov $sel2,"More!"
name "Fairy A"
eng $sel1:$sel6\
name ""
name "Fairy B"
eng $sel2:$sel6\
name ""
goto *tfairy_a



*tfairy_mogaku2

mov %before_action,8
if %nanido=2 rnd2 %ransu,1,10:if %ransu=5 goto *tfairy_mogaku1
if %nanido=3 rnd2 %ransu,1,2:if %ransu=2 goto *tfairy_mogaku1
name "Luka"
>You two...!\
name ""
dwave 1,"se\dassyutu.ogg"
mov %kousoku,0:gosub *status_print
>Luka managed to peel the Twin Fairies off of him!\
mov %owaza_count1a,0
name "Fairy A"
>Aww... I wanted to play more!\
name ""
name "Fairy B"
>Meanie!\
name ""
gosub *face1
goto *common_main



*tfairy_a

if %kousoku=1 rnd2 %ransu,1,3
if %kousoku=1 && %ransu=1 gosub *tfairy_a4:goto *common_main
if %kousoku=1 && %ransu=2 gosub *tfairy_a5:goto *common_main
if %kousoku=1 && %ransu=3 gosub *tfairy_a6:goto *common_main
rnd2 %ransu,1,3
if %ransu=1 gosub *tfairy_a1:goto *common_main
if %ransu=2 gosub *tfairy_a2:goto *common_main
if %ransu=3 && %owaza_count1a>2 gosub *tfairy_a3:goto *common_main
skip -4



*tfairy_a1

add %stack,1
skillcount1 3160
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"This flower feels good! ":mov $sel2,"No! Mine's better! "
if %ransu=2 mov $sel1,"Give my flower your white stuff! ":mov $sel2,"Let it out in mine too! "
if %ransu=3 mov $sel1,"Flower attack! ":mov $sel2,"Attack! "
name "Fairy A"
eng $sel1:$sel6\
name ""
skillname "Succubus Flower"
lsp 690,":a;chara\tfairy_ct01.bmp",0,0:print 10,500
lsp 690,":a;chara\tfairy_ct02.bmp",0,0:print 10,500
dwave 1,"se\ero_buchu1.ogg"
>Fairy A forces the flower onto Luka's penis!\
>The flower's petals wrap around the tip of Luka's penis!
if %nanido<2 damage 15,20
if %nanido=2 damage 18,23
if %nanido=3 damage 26,33
skillname ""
if %mylife=0 sub %stack,1:return *tfairy_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *tfairy_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *tfairy_s2
name "Fairy B"
eng $sel2:$sel6\
name ""
skillname "Succubus Flower"
lsp 690,":a;chara\tfairy_ct11.bmp",0,0:print 10,500
lsp 690,":a;chara\tfairy_ct12.bmp",0,0:print 10,500
dwave 1,"se\ero_buchu1.ogg"
>Fairy B forces the flower onto Luka's penis!\
>The sticky honey covers Luka as the petals stroke him!
if %nanido<2 damage 15,20
if %nanido=2 damage 18,23
if %nanido=3 damage 26,33
skillname ""
if %mylife=0 sub %stack,1:return *tfairy_h2
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *tfairy_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *tfairy_s2
sub %stack,1
return



*tfairy_a2

add %stack,1
skillcount1 3161
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hehehe... Tickle tickle. ":mov $sel2,"Tickle! "
if %ransu=2 mov $sel1,"I want to see the white stuff! ":mov $sel2,"The white pee stuff! "
if %ransu=3 mov $sel1,"Fluffy! ":mov $sel2,"Tickle tickle! "
name "Fairy A"
eng $sel1:$sel6\
name ""
name "Fairy B"
eng $sel2:$sel6\
name ""
skillname "Twin Wing Tickle"
dwave 1,"se\umaru.ogg"
>The Twin Fairies fly around Luka's penis, tickling it with their wings!\
mov %damage_nobr,1
if %nanido<2 damage 10,15
if %nanido=2 damage 13,18
if %nanido=3 damage 18,26
if %nanido<2 damage 10,15
if %nanido=2 damage 13,18
if %nanido=3 damage 18,26
skillname ""
if %mylife=0 sub %stack,1:return *tfairy_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *tfairy_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *tfairy_s2
sub %stack,1
return



*tfairy_a3

add %stack,1
gosub *face2
name "Fairy A"
if %first_sel1=1 skip 3
>Hahaha... Caught you! \
skip 2
>Hahaha... I caught you again! \
name ""
name "Fairy B"
if %first_sel1=1 skip 3
>Caught! \
skip 2
>Caught again! \
name ""
skillname "Cling"
>The Twin Fairies cling to Luka's penis!@
lsp 690,":a;chara\tfairy_ct21.bmp",480,0
mov %kousoku,1:gosub *status_print
>The Twin Fairies are tightly holding on to Luka's penis!\
skillname ""
if %kousan=2 sub %stack,1:return
if %first_sel1=1 skip 5
name "Luka"
>Guh... Get off!\
name ""
>I can't pull the two of them off me so easily... And I don't want to swing my sword there...\
gosub *face2
name "Fairy A"
if %first_sel1=1 skip 3
>We'll keep playing until you shoot out the white stuff! \
skip 2
>More playing! \
name ""
name "Fairy B"
>I want to see the goopy stuff! \
name ""
mov %first_sel1,1
if %nanido<2 mov %genmogaku,2
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,3
sub %stack,1
return



*tfairy_a4

add %stack,1
skillcount1 3162
>The Twin Fairies are tightly holding on to Luka's penis!\
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"The tip... *Pat* *Pat* ":mov $sel2,"The top part is so squishy! ":mov $sel3,"The Twin Fairies push and poke at the tip of Luka's penis!"
if %ransu=2 mov $sel1,"The skin is so stretchy! ":mov $sel2,"Stretchy! ":mov $sel3,"The Twin Fairies pull and play with the skin of Luka's penis!"
if %ransu=3 mov $sel1,"I'll blow into the hole! ":mov $sel2,"Me too! ":mov $sel3,"One of the fairies spreads open Luka's urethral hole as the Twin Fairies blow into it!"
if %ransu=4 mov $sel1,"It looks like a mushroom! ":mov $sel2,"Penis mushroom! ":mov $sel3,"The Twin Fairies reach around the top of Luka's penis and tightly squeeze it!"
name "Fairy A"
eng $sel1:$sel6\
name ""
name "Fairy B"
eng $sel2:$sel6\
name ""
skillname "Twin Fairy Pranks"
dwave 1,"se\ero_koki1.ogg"
eng $sel3:$sel6\
mov %damage_nobr,1
if %nanido<2 damage 10,15
if %nanido=2 damage 13,18
if %nanido=3 damage 18,26
if %nanido<2 damage 10,15
if %nanido=2 damage 13,18
if %nanido=3 damage 18,26
skillname ""
if %mylife=0 sub %stack,1:return *tfairy_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *tfairy_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *tfairy_s2
sub %stack,1
return



*tfairy_a5

add %stack,1
skillcount1 3163
>The Twin Fairies are tightly holding on to Luka's penis!\
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll hug it! ":mov $sel2,"I'll squeeze it! "
if %ransu=2 mov $sel1,"Hughug! ":mov $sel2,"Hughug! "
if %ransu=3 mov $sel1,"Penis... Hug... Attack! ":mov $sel2,"Attack the penis! "
if %ransu=4 mov $sel1,"I'll hug out the white stuff! ":mov $sel2,"Let it out! "
name "Fairy A"
eng $sel1:$sel6\
name ""
name "Fairy B"
eng $sel2:$sel6\
name ""
skillname "Twin Fairy Hug"
dwave 1,"se\ero_koki1.ogg"
>The Twin Fairies tightly hug Luka's penis!\
mov %damage_nobr,1
if %nanido<2 damage 15,20
if %nanido=2 damage 17,23
if %nanido=3 damage 25,33
if %nanido<2 damage 15,20
if %nanido=2 damage 17,23
if %nanido=3 damage 25,33
skillname ""
if %mylife=0 sub %stack,1:return *tfairy_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *tfairy_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *tfairy_s2
sub %stack,1
return



*tfairy_a6

add %stack,1
skillcount1 3164
>The Twin Fairies are tightly holding on to Luka's penis!\
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Let's dance! ":mov $sel2,"Dance! ":mov $sel3,"The Twin Fairies wings rub every inch of Luka's penis!"
if %ransu=2 mov $sel1,"Let it out! ":mov $sel2,"Out! ":mov $sel3,"The Fairies move their bodies around while tightly clinging to Luka's penis!"
if %ransu=3 mov $sel1,"Bully the tip! ":mov $sel2,"Bully! ":mov $sel3,"The Twin Fairies stroke the tip of Luka's penis with their hands and feet!"
if %ransu=4 mov $sel1,"Hehehehe... Does it feel good?":mov $sel2,"Hahaha... Is he leaking?":mov $sel3,"The Twin Fairies move around Luka's penis while tightly clinging to it!"
name "Fairy A"
eng $sel1:$sel6\
name ""
name "Fairy B"
eng $sel2:$sel6\
name ""
skillname "Twin Fairy Dance"
dwave 1,"se\ero_koki1.ogg"
eng $sel3:$sel6\
mov %damage_nobr,1
if %nanido<2 damage 20,25
if %nanido=2 damage 27,34
if %nanido=3 damage 37,47
if %nanido<2 damage 20,25
if %nanido=2 damage 27,34
if %nanido=3 damage 37,47
skillname ""
if %mylife=0 sub %stack,1:return *tfairy_h6
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *tfairy_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *tfairy_s2
sub %stack,1
return



*tfairy_s1

add %stack,1
if %max_mylife>%mylife*5 mov %sel_hphalf,1:gosub *tfairy_s2:sub %stack,1:return
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Guh..."
if %ransu=2 mov $sel1,"Uuu..."
if %ransu=3 mov $sel1,"Uhg..."
name "Luka"
eng $sel1:$sel6\
name ""
gosub *face2
name "Fairy A"
>Is it coming!?\
name ""
name "Fairy B"
>Is it!?\
name ""
gosub *face1
mov %sel_hphalf,1
sub %stack,1
return



*tfairy_s2

add %stack,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Auu..."
if %ransu=2 mov $sel1,"Aaa..."
if %ransu=3 mov $sel1,"Faa..."
name "Luka"
eng $sel1:$sel6\
name ""
gosub *face2
name "Fairy A"
>Shoot it out! \
name ""
name "Fairy B"
>Shoot it! \
name ""
mov %sel_kiki,1
sub %stack,1
return



*tfairy_onedari

mov $list1,"Succubus Flower"
if %3160>0 mov %list_num1,1
mov $list2,"Twin Wing Tickle"
if %3161>0 mov %list_num2,1
mov $list3,"Twin Fairy Pranks"
if %3162>0 mov %list_num3,1
mov $list4,"Twin Fairy Hug"
if %3163>0 mov %list_num4,1
mov $list5,"Twin Fairy Dance"
if %3164>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *tfairy_onedari1
if %cmd1=12 goto *tfairy_onedari2
if %cmd1=13 goto *tfairy_onedari3
if %cmd1=14 goto *tfairy_onedari4
if %cmd1=15 goto *tfairy_onedari5
if %cmd1=-1 goto *tfairy_main
goto *tfairy_onedari



*tfairy_onedari1

gosub *onedari_syori
name "Fairy A"
>You want your white stuff to be absorbed by this flower?\
name ""
name "Fairy B"
>Hehehe... Give a lot to the flower! \
name ""
gosub *tfairy_a1
skip -1



*tfairy_onedari2

gosub *onedari_syori
name "Fairy A"
>You want to be pranked by our wings?\
name ""
name "Fairy B"
>Hehe, we'll play lots of tricks! \
name ""
gosub *tfairy_a2
skip -1



*tfairy_onedari3

gosub *onedari_syori_k
name "Fairy A"
>You want us to play pranks on your penis? \
name ""
name "Fairy B"
>Pranks! \
name ""
if %kousoku=0 gosub *tfairy_a3
gosub *tfairy_a4
skip -1



*tfairy_onedari4

gosub *onedari_syori_k
name "Fairy A"
>You want us to hug your penis?\
name ""
name "Fairy B"
>I'll hug it tighter than you can! \
name ""
if %kousoku=0 gosub *tfairy_a3
gosub *tfairy_a5
skip -1



*tfairy_onedari5

gosub *onedari_syori_k
name "Fairy A"
>You want us to rub our bodies all over your penis? Hehehe. \
name ""
name "Fairy B"
>I can move faster than yoouu! \
name ""
if %kousoku=0 gosub *tfairy_a3
gosub *tfairy_a6
skip -1



*tfairy_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\tfairy_ct03.bmp",0,0
lsp 694,":a;chara\tfairy_bk04.bmp",220,130
gosub *syasei2
>Unable to endure the stimulation from the Succubus Flower, Luka finally ejaculates.\
mov %viclose,1:gosub *lose
mov %2546,%2546+1:if %2546=1 mov %count_koenemy,%count_koenemy+1
if %2546>%count_most mov %count_most,%2546:mov $count_mostname,$name
count 12,5
mov $bad1,"Luka succumbed to the Twin Fairies Succubus Flowers."
mov $bad2,"Caught by the Twin Fairies, they toyed with him for the rest of his life."
gosub *face2
name "Fairy A"
>Haha, I won! @
>He put it all in my flower! \
name ""
name "Fairy B"
>Awww!\
name ""
goto *tfairy_h



*tfairy_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\tfairy_ct13.bmp",0,0
lsp 695,":a;chara\tfairy_bk05.bmp",220,130
gosub *syasei2
>Unable to endure the stimulation from the Succubus Flower, Luka finally ejaculates.\
mov %viclose,1:gosub *lose
mov %2546,%2546+1:if %2546=1 mov %count_koenemy,%count_koenemy+1
if %2546>%count_most mov %count_most,%2546:mov $count_mostname,$name
count 12,5
mov $bad1,"Luka succumbed to the Twin Fairies Succubus Flowers."
mov $bad2,"Caught by the Twin Fairies, they toyed with him for the rest of his life."
gosub *face2
name "Fairy A"
>Aww! Why did you put it in her flower!?\
name ""
name "Fairy B"
>Hehehe... My flower is better than yours! \
name ""
goto *tfairy_h



*tfairy_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\tfairy_bk03.bmp",220,130
gosub *syasei2
>Unable to endure the tickling sensation from the Twin Fairies wings, Luka finally ejaculates.\
mov %viclose,1:gosub *lose
mov %2546,%2546+1:if %2546=1 mov %count_koenemy,%count_koenemy+1
if %2546>%count_most mov %count_most,%2546:mov $count_mostname,$name
count 13,5
mov $bad1,"Luka succumbed to the Twin Fairies wing tickling."
mov $bad2,"Caught by the Twin Fairies, they toyed with him for the rest of his life."
gosub *face2
name "Fairy A"
>Hahah! It shot out! \
name ""
name "Fairy B"
>Yay! We defeated the penis! \
name ""
goto *tfairy_h



*tfairy_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\tfairy_ct22.bmp",480,0
lsp 691,":a;chara\tfairy_bk01.bmp",220,130
lsp 692,":a;chara\tfairy_bk02.bmp",220,130
gosub *syasei2
lsp 690,":a;chara\tfairy_ct23.bmp",480,0:print 10,500
>Unable to endure the Twin Fairies playing with his penis, Luka finally ejaculates, covering their tiny bodies in semen.\
mov %viclose,1:gosub *lose
mov %2546,%2546+1:if %2546=1 mov %count_koenemy,%count_koenemy+1
if %2546>%count_most mov %count_most,%2546:mov $count_mostname,$name
count 24,5
mov $bad1,"Luka succumbed to the Twin Fairies pranks as they clung to his penis."
mov $bad2,"Caught by the Twin Fairies, they toyed with him for the rest of his life."
name "Fairy A"
>Hahah! It shot out! \
name ""
name "Fairy B"
>Yay! We defeated the penis! \
name ""
goto *tfairy_h



*tfairy_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\tfairy_ct22.bmp",480,0
lsp 691,":a;chara\tfairy_bk01.bmp",220,130
lsp 692,":a;chara\tfairy_bk02.bmp",220,130
gosub *syasei2
lsp 690,":a;chara\tfairy_ct23.bmp",480,0:print 10,500
>Unable to endure the Twin Fairies hugging his penis, Luka finally ejaculates, covering their tiny bodies in semen.\
mov %viclose,1:gosub *lose
mov %2546,%2546+1:if %2546=1 mov %count_koenemy,%count_koenemy+1
if %2546>%count_most mov %count_most,%2546:mov $count_mostname,$name
count 24,5
mov $bad1,"Luka succumbed to the Twin Fairies hugs as they clung to his penis."
mov $bad2,"Caught by the Twin Fairies, they toyed with him for the rest of his life."
name "Fairy A"
>Hahah! It shot out! \
name ""
name "Fairy B"
>Yay! We defeated the penis! \
name ""
goto *tfairy_h



*tfairy_h6

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\tfairy_ct22.bmp",480,0
lsp 691,":a;chara\tfairy_bk01.bmp",220,130
lsp 692,":a;chara\tfairy_bk02.bmp",220,130
gosub *syasei2
lsp 690,":a;chara\tfairy_ct23.bmp",480,0:print 10,500
>Unable to endure the Twin Fairies rubbing their bodies on his penis, Luka finally ejaculates, covering their tiny bodies in semen.\
mov %viclose,1:gosub *lose
mov %2546,%2546+1:if %2546=1 mov %count_koenemy,%count_koenemy+1
if %2546>%count_most mov %count_most,%2546:mov $count_mostname,$name
count 24,5
mov $bad1,"Luka succumbed to the Twin Fairies dancing as they clung to his penis."
mov $bad2,"Caught by the Twin Fairies, they toyed with him for the rest of his life."
name "Fairy A"
>Hahah! It shot out! \
name ""
name "Fairy B"
>Yay! We defeated the penis! \
name ""
goto *tfairy_h



*tfairy_h

if %2546=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku=1 mov %hseanwave,1:hseanwave:goto *tfairy_hb
name "Luka"
>Ahh...\
name ""
>Drained of power, I fall onto the ground as the Twin Fairies approach.@
mov %hseanwave,1:hseanwave
cspl 690,699
lsp 690,":a;chara\tfairy_ct21.bmp",480,0:print 10,500
>Suddenly, they both grab onto my penis!\
name "Luka"
>Ahh!\
name ""
goto *tfairy_hb



*tfairy_hb

>Clinging to my penis, the two fairies tightly hug it.@
>Under the soft pressure from their tiny arms, I let out a low moan.\
name "Fairy A"
>Hehehe... So sticky! \
name ""
name "Fairy B"
>Sticky! \
name ""
>The two of them start to lick the tip of my penis with their tiny tongues.\
>The sudden feeling of a tongue smaller than a finger licking the sensitive tip of my penis causes me to let out a surprised yell.\
name "Luka"
>Auu!!\
name ""
>Suddenly, one of the fairies sticks her tongue inside my urethra.@
>The direct stimulation on the most sensitive parts of my body causes my back to arch up.\
>The Twin Fairies tightly hug my penis as they continue licking off all the semen from my last orgasm.\
name "Fairy A"
>*Lick* \
name ""
name "Fairy B"
>*Lick*@>* Lick* \
name ""
>Putting strength into their arms, the fairies squeeze tighter around me.@
>With their tiny bodies pushed up against me, I could feel every part of them on my penis.\
>These innocent acting fairies are doing such lewd things...@
>Are they really just playing...? Or have they done this before...?\
name "Luka"
>Auuu!!\
name ""
>My body writhes as the Twin Fairies toy with my penis.@
>Pre-come starts to leak out as the Twin Fairies watch the liquid slowly flow out with a look of curiosity.\
name "Fairy A"
>Oh! The white stuff is coming out! \
name ""
name "Fairy B"
>Sticky soup! \
name ""
>The Twin Fairies stick out their tongues and start to lap up the pre-come from my hole.\
>My waist trembles as their tiny tongues quickly lick up all of the semen.\
>Making sure they lick up every drop of it, they move their tongues all over the tip of my penis.\
name "Luka"
>Auu!\
name ""
>As they strain to lap up the remaining pre-come, they squeeze my penis even tighter.\
name "Fairy A"
>The penis is twitching! \
name ""
name "Fairy B"
>Is more white stuff coming!? \
name ""
>The disgrace of having my penis treated like a toy rises up through me.@
>While humiliated by the Twin Fairies, I finally give in to the pleasure.\
name "Luka"
>Ah...Ahhh!!\
name ""
gosub *syasei1
lsp 690,":a;chara\tfairy_ct22.bmp",480,0
lsp 691,":a;chara\tfairy_bk01.bmp",220,130
lsp 692,":a;chara\tfairy_bk02.bmp",220,130
gosub *syasei2
>Unable to hold on, I ejaculate while being attacked by their tiny bodies.@
lsp 690,":a;chara\tfairy_ct23.bmp",480,0:print 10,500
>Shooting out a large amount of semen, it covers the two of them.\
name "Fairy A"
>Hehehe... Did you see it explode!? \
name ""
name "Fairy B"
>A lot shot out! \
name ""
>Even though the Twin Fairies laugh happily, it doesn't seem like their "prank" is about to end.\
>Even after ejaculation, they're still treating my penis like a toy.@
>They start to move their tiny arms up and down while hugging me.@
>One of the fairies starts to poke and massage the back muscle.\
name "Luka"
>Auuu...\
name ""
>My body twists as their four hands play with my penis.@
>As soon as more pre-come leaks out, they instantly start to lick it all up.\
name "Fairy A"
>Soup!@>*Lick* \
name ""
name "Fairy B"
>Yay!@> *Lick* \
name ""
>Their tiny tongues lap up the semen as soon as it comes out.@
>The more they lick and stroke me, the more it comes out...\
name "Luka"
>Auuu... Don't lick... there...!\
name ""
>As if stuck in some kind of cruel loop, the pleasure from the two of them licking up my pre-come causes more to come out.\
>Too exhausted to do anything, all I can do is lay back and feel the pleasure as they play with my penis.\
name "Fairy A"
>Haha! How interesting! @
>Let's tease it more! \
name ""
name "Fairy B"
>Tease it! \
name ""
>I tremble as the fairies attack my penis with renewed interest.@
>Doing whatever they want, the Twin Fairies view me only as a toy.\
name "Luka"
>Ahhh...@>I'm going to come again...\
name ""
name "Fairy A"
>More white stuff! \
name ""
name "Fairy B"
>More! \
name ""
>The tiny arms of the Twin Fairies hug me tighter after my moan.@
>Their four small hands stroke and rub every corner of my penis.\
>The sensation causes my head to go white as I'm forced over the edge.\
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1:gosub *syasei2
>Exploding again, I cover their bodies with more semen.@
>Being showered in the white rain, the Twin Fairies happily laugh.\
>While still joyfully laughing, the Twin Fairies look over at me.@
>It really does feel like I've just become a toy...\
name ""
name "Fairy A"
>Hehe... You're fun. \
name ""
name "Fairy B"
>We're going to keep you! \
name ""
name "Luka"
>No way...\
name ""
>The innocent way they said that makes it all the more frightening.@
>But with them giving so much pleasure to me, I can't raise another word of protest.\
name "Fairy A"
>Let's play more! \
name ""
name "Fairy B"
>We'll play a lot! \
name ""
name "Luka"
>Ahhh... That's not...\
name ""
>Cutting short my voice, they hug my penis tighter.@
>Feeling their tiny soft bodies squeezing me sends me to another height.\
>So soon after my last orgasm, I'm already brought to another...\
gosub *syasei1:gosub *syasei2
name "Luka"
>Ahhh... Stop... Already...\
name ""
name "Fairy A"
>Not a chance! \
name ""
name "Fairy B"
>We're going to play a lot more than this! \
name ""
gosub *anten
mov %hseanwave,0:hseanwave
>The innocent fairies don't stop their mischief.@
>They feed me honey from the flowers every so often so I won't die, but keep me too weak to run away.\
>I'm kept just as a toy for these two fairies to play with...@
>Again today, they're playing with me...\

if %kousoku=1 mov %hseanwave,1:hseanwave
sean_change "bg061"
lsp 700,":a;chara\tfairy_st01.bmp",220,130:print 10,500
lsp 690,":a;chara\tfairy_ct21.bmp",480,0:print 10,500
name "Luka"
>Ahh... Help me...@>Let me go... Please...\
name ""
name "Fairy A"
>No!@>Big bro is already just our toy! \
name ""
name "Fairy B"
>We're going to keep you forever! \
name ""
name "Luka"
>Auuu...\
name ""
gosub *syasei1
lsp 690,":a;chara\tfairy_ct22.bmp",480,0
lsp 691,":a;chara\tfairy_bk01.bmp",220,130
lsp 692,":a;chara\tfairy_bk02.bmp",220,130
gosub *syasei2
lsp 690,":a;chara\tfairy_ct23.bmp",480,0:print 10,500
gosub *anten
mov %hseanwave,0:hseanwave
>Thus I'm kept in the forest for the rest of my life as a toy.@
>My adventure ends as the Twin Fairies plaything...\
>...................\
goto *badend



*fairys_start

mov $name,"Fairies"
mov $name2,"Fairy A"
mov $lavel,"fairys"
mov $tatie1,"fairys_st01"
mov $tatie2,"fairys_st02"
mov $tatie3,"fairys_st03"
mov $tatie4,"fairys_st02"
mov $haikei,"bg061"
mov %monster_x,220
mov %monster_y,100
mov $tatie1b,"fairys_st11"
mov $tatie2b,"fairys_st12"
mov $tatie3b,"fairys_st13"
mov %monster_xb,0
mov %monster_yb,50
mov $tatie1c,"fairys_st21"
mov $tatie2c,"fairys_st22"
mov $tatie3c,"fairys_st23"
mov %monster_xc,440
mov %monster_yc,50
if %nanido=1 mov %max_enemylife,925
if %nanido=2 mov %max_enemylife,950
if %nanido=3 mov %max_enemylife,975
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,85
mov %music,1
gosub *maxmp:mov %mp,3
mov %tikei,2
mov %tekikazu,3
gosub *syutugen_plural
mov %owaza_count1a,3
mov %end_n,1
mov %exp_minus,2950
mov %zmonster_x,-60
mov %tekikazu,3
name "Luka"
>Wawawa!\
name ""
>Three of them appear in front of me.@
>But besides those three, there are hundreds more in every direction!\
>It looks like I pissed them off...@
>I need to defend myself!\
goto *common_main



*fairys_v

gosub *face3
name "Fairy A"
>Uwaa!\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Fairy A turned into a butterfly!\
mov %viclose,1:gosub *victory_plural
mov %getexp,1200:gosub *lvup
mov %2247,1
goto *sean0125



*fairys_kousan

gosub *kousan_syori
>Luka yields to temptation, ending his resistance!\
gosub *face2
name "Fairy A"
>Hehehe... Even if you give up, we won't hold back!\
name ""
name "Fairy B"
>We'll punish you! \
name ""
name "Fairy C"
>Yaay!\
name ""
goto *fairys_a



*fairys_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *fairys_mogaku1
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *fairys_mogaku1
if %cmd1=12 && %genmogaku=0 goto *fairys_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *fairys_kousan
if %cmd1=16 goto *fairys_onedari
if %cmd1=17 goto *common_skill
goto *fairys_main



*fairys_mogaku1

mov %before_action,7
rnd2 %ransu,1,3
if %cmd1=11 && %ransu=1 mov $sel1,"Urgh!"
if %cmd1=11 && %ransu=2 mov $sel1,"Guh!"
if %cmd1=11 && %ransu=3 mov $sel1,"Stop!"
if %cmd1=12 && %ransu=1 mov $sel1,"Uhg!"
if %cmd1=12 && %ransu=2 mov $sel1,"Let go!"
if %cmd1=12 && %ransu=3 mov $sel1,"Guh! Let me go!"
name "Luka"
eng $sel1:$sel6\
name ""
if %cmd1=11 mov $sel1,"Luka attacks!"
if %cmd1=11 gosub *mp_kaihuku:gosub *mp
if %cmd1=12 mov $sel1,"Luka struggles against the ivy!"
if %cmd1=12 mov %genmogaku,%genmogaku-1:if %genmogaku<0 mov %genmogaku,0
eng $sel1:$sel6
if %cmd1=11 mov $sel1,"But Luka can't attack with his hands bound by the ivy!"
if %cmd1=12 mov $sel1,"But Luka can't break free!"
eng $sel1:$sel6\
rnd2 %ransu,1,5
if %ransu=1 mov $sel1,"Fairy A":mov $sel2,"You won't get free!"
if %ransu=2 mov $sel1,"Fairy A":mov $sel2,"You can't break the ivy that easily!"
if %ransu=3 mov $sel1,"Fairy B":mov $sel2,"Struggling is no good!"
if %ransu=4 mov $sel1,"Fairy B":mov $sel2,"More pranks!"
if %ransu=5 mov $sel1,"Fairy C":mov $sel2,"No, no!"
name $sel1
eng $sel2:$sel6\
name ""
goto *fairys_a



*fairys_mogaku2

mov %before_action,8
if %nanido=2 rnd2 %ransu,1,10:if %ransu=5 goto *fairys_mogaku1
if %nanido=3 rnd2 %ransu,1,2:if %ransu=2 goto *fairys_mogaku1
name "Luka"
>This stupid ivy!!\
name ""
csp 697
dwave 1,"se\dassyutu.ogg"
mov %kousoku,0:gosub *status_print
>Luka struggled with all his might and broke out of the ivy!\
mov %owaza_count1a,0
name "Fairy A"
>Geez!@>How violent!\
name ""
goto *common_main



*fairys_a

if %kousoku=1 rnd2 %ransu,1,2
if %kousoku=1 && %ransu=1 gosub *fairys_a4:goto *common_main
if %kousoku=1 && %ransu=2 gosub *fairys_a5:goto *common_main
rnd2 %ransu,1,3
if %ransu=1 gosub *fairys_a1:goto *common_main
if %ransu=2 gosub *fairys_a2:goto *common_main
if %ransu=3 && %owaza_count1a>5 gosub *fairys_a3:goto *common_main
skip -4



*fairys_a1

add %stack,1
skillcount1 3165
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Tickle his body! ":mov $sel2,"Hahahaha "
if %ransu=2 mov $sel1,"Yaay! Tickle attack! ":mov $sel2,"Hahahahaha! "
if %ransu=3 mov $sel1,"Everyone! Tickle him! ":mov $sel2,"Tickletickle! "
name "Fairy A"
eng $sel1:$sel6\
name ""
name "Fairy B"
eng $sel2:$sel6\
name ""
skillname "Group Tickle"
>The Fairies tickle Luka's body!\
dwave 1,"se\umaru.ogg"
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Fairy A tickles Luka's nipple!"
if %ransu=2 mov $sel1,"Fairy A tickles Luka's armpit!"
if %ransu=3 mov $sel1,"Fairy A tickles Luka's neck!"
eng $sel1:$sel6
if %nanido<2 damage 11,14
if %nanido=2 damage 13,15
if %nanido=3 damage 14,20
dwave 1,"se\umaru.ogg"
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Fairy B tickles Luka's stomach!"
if %ransu=2 mov $sel1,"Fairy B lightly traces Luka's side with her finger!"
if %ransu=3 mov $sel1,"Fairy B traces her finger around Luka's bellybutton!"
eng $sel1:$sel6
if %nanido<2 damage 11,14
if %nanido=2 damage 13,15
if %nanido=3 damage 14,20
dwave 1,"se\umaru.ogg"
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Fairy C tickles the inside of Luka's thigh!"
if %ransu=2 mov $sel1,"Fairy C lightly traces her finger along Luka's thigh!"
if %ransu=3 mov $sel1,"Fairy C tickles above Luka's groin!"
eng $sel1:$sel6
if %nanido<2 damage 11,14
if %nanido=2 damage 13,15
if %nanido=3 damage 14,20
skillname ""
if %mylife=0 sub %stack,1:return *fairys_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *fairys_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *fairys_s2
sub %stack,1
return



*fairys_a2

add %stack,1
skillcount1 3166
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Tickle his penis! ":mov $sel2,"Tickletickle! "
if %ransu=2 mov $sel1,"Make his white stuff come out!":mov $sel2,"Hahaha, Let it out! "
if %ransu=3 mov $sel1,"Does it feel good to be tickled there?":mov $sel2,"Make sure you tickle every inch! "
name "Fairy A"
eng $sel1:$sel6\
name ""
name "Fairy C"
eng $sel2:$sel6\
name ""
skillname "Group Penis Tickle"
dwave 1,"se\umaru.ogg"
>The fairies crowd around Luka's penis and tickle it all over!
if %nanido<2 damage 13,16
if %nanido=2 damage 14,17
if %nanido=3 damage 18,24
dwave 1,"se\umaru.ogg"
mov %damage_nobr,1
if %nanido<2 damage 13,16
if %nanido=2 damage 14,17
if %nanido=3 damage 18,24
dwave 1,"se\umaru.ogg"
if %nanido<2 damage 13,16
if %nanido=2 damage 14,17
if %nanido=3 damage 18,24
skillname ""
if %mylife=0 sub %stack,1:return *fairys_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *fairys_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *fairys_s2
sub %stack,1
return



*fairys_a3

add %stack,1
name "Fairy A"
>Use the power of the forest to bind him! \
name ""
skillname "Ivy Restraint"
>As the fairies chant, ivy shoots out from the surrounding trees!@
lsp 697,":c;chara\fairys_h1.bmp",0,0
mov %kousoku,1:gosub *status_print
>Luka's hands and feet are bound by the ivy!\
skillname ""
if %kousan=2 sub %stack,1:return
name "Fairy A"
>Hehehe... Now you can't move! \
name ""
name "Fairy B"
>Everyone, play with his body! \
name ""
if %nanido<2 mov %genmogaku,2
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,3
sub %stack,1
return



*fairys_a4

add %stack,1
skillcount1 3167
>Luka's hands and feet are bound by the ivy!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"The skin is all soft! ":mov $sel2,"Hehehe, let's pull on it! ":mov $sel3,"The fairies pull and play with the skin of Luka's penis!"
if %ransu=2 mov $sel1,"Play with the tip! ":mov $sel2,"Yaay! It's all squishy! ":mov $sel3,"The Fairies pat and poke at the tip of Luka's penis!"
if %ransu=3 mov $sel1,"Play with the hole! ":mov $sel2,"Poke, poke, poke. ":mov $sel3,"The fairies take turns poking at Luka's urethral opening!"
if %ransu=4 mov $sel1,"Make the white stuff come out! ":mov $sel2,"Rub, rub, rub! ":mov $sel3,"The fairies rub the back of Luka's penis!"
if %ransu=5 mov $sel1,"Play with the mushroom thing! ":mov $sel2,"Hehehe... How funny looking! ":mov $sel3,"The fairies grab on to the tip of Luka's penis!"
name "Fairy A"
eng $sel1:$sel6\
name ""
name "Fairy B"
eng $sel2:$sel6\
name ""
skillname "Group Pranks"
dwave 1,"se\ero_koki1.ogg"
lsp 697,":c;chara\fairys_h2.bmp",0,0:print 10,500
eng $sel3:$sel6
if %nanido<2 damage 11,14
if %nanido=2 damage 13,15
if %nanido=3 damage 17,22
dwave 1,"se\ero_koki1.ogg"
mov %damage_nobr,1
if %nanido<2 damage 11,14
if %nanido=2 damage 13,15
if %nanido=3 damage 17,22
dwave 1,"se\ero_koki1.ogg"
if %nanido<2 damage 11,14
if %nanido=2 damage 13,15
if %nanido=3 damage 17,22
skillname ""
if %mylife=0 sub %stack,1:return *fairys_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *fairys_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *fairys_s2
sub %stack,1
return



*fairys_a5

add %stack,1
skillcount1 3168
>Luka's hands and feet are bound by the ivy!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hehehe... Attack the tip! ":mov $sel2,"Rub all over! ":mov $sel3,"As if dancing, the fairies move all around Luka's penis!"
if %ransu=2 mov $sel1,"Rub your bodies on his penis! ":mov $sel2,"Tickle him all over! ":mov $sel3,"The fairies tickle Luka all over his body as they move around him!"
if %ransu=3 mov $sel1,"Hehe... Tease him all over! ":mov $sel2,"Hahaha! ":mov $sel3,"As if dancing, the fairies rub their tiny bodies all over Luka's body!"
if %ransu=4 mov $sel1,"Everyone! Squeeze him all over! ":mov $sel2,"Squeeze, squeeze! ":mov $sel3,"The fairies squeeze Luka's penis all at the same time!"
if %ransu=5 mov $sel1,"Make the white stuff come out! ":mov $sel2,"Make it come out! ":mov $sel3,"The fairies rub their bodies on Luka's penis!"
name "Fairy A"
eng $sel1:$sel6\
name ""
name "Fairy C"
eng $sel2:$sel6\
name ""
skillname "Group Dance"
dwave 1,"se\ero_koki1.ogg"
lsp 697,":c;chara\fairys_h2.bmp",0,0:print 10,500
eng $sel3:$sel6
if %nanido<2 damage 13,16
if %nanido=2 damage 14,17
if %nanido=3 damage 19,24
dwave 1,"se\ero_koki1.ogg"
mov %damage_nobr,1
if %nanido<2 damage 13,16
if %nanido=2 damage 14,17
if %nanido=3 damage 19,24
dwave 1,"se\ero_koki1.ogg"
if %nanido<2 damage 13,16
if %nanido=2 damage 14,17
if %nanido=3 damage 19,24
skillname ""
if %mylife=0 sub %stack,1:return *fairys_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *fairys_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *fairys_s2
sub %stack,1
return



*fairys_s1

add %stack,1
if %max_mylife>%mylife*5 mov %sel_hphalf,1:gosub *fairys_s2:sub %stack,1:return
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Guh..."
if %ransu=2 mov $sel1,"Uuu..."
if %ransu=3 mov $sel1,"Uhg..."
name "Luka"
eng $sel1:$sel6\
name ""
gosub *face2
name "Fairy A"
>Hehehe... Is it about to come out?\
name ""
name "Fairy B"
>I wonder how much white stuff he has?\
name ""
gosub *face1
mov %sel_hphalf,1
sub %stack,1
return



*fairys_s2

add %stack,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Auu..."
if %ransu=2 mov $sel1,"Aaa..."
if %ransu=3 mov $sel1,"Faa..."
name "Luka"
eng $sel1:$sel6\
name ""
gosub *face2
name "Fairy A"
>Hehehe... It's almost going to explode!\
name ""
name "Fairy C"
>Shoot out a lot!\
name ""
mov %sel_kiki,1
sub %stack,1
return



*fairys_onedari

mov $list1,"Group Tickle"
if %3165>0 mov %list_num1,1
mov $list2,"Group Penis Tickle"
if %3166>0 mov %list_num2,1
mov $list3,"Group Pranks"
if %3167>0 mov %list_num3,1
mov $list4,"Group Dance"
if %3168>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *fairys_onedari1
if %cmd1=12 goto *fairys_onedari2
if %cmd1=13 goto *fairys_onedari3
if %cmd1=14 goto *fairys_onedari4
if %cmd1=-1 goto *fairys_main
goto *fairys_onedari



*fairys_onedari1

gosub *onedari_syori
name "Fairy C"
>You want us to tickle your whole body...? \
name ""
gosub *fairys_a1
skip -1



*fairys_onedari2

gosub *onedari_syori
name "Fairy B"
>You want us to tickle your penis...? \
name ""
gosub *fairys_a2
skip -1



*fairys_onedari3

gosub *onedari_syori_k
name "Fairy C"
>You want us to play with your penis...? \
name ""
if %kousoku=0 gosub *fairys_a3
gosub *fairys_a4
skip -1



*fairys_onedari4

gosub *onedari_syori_k
name "Fairy B"
>You want us to rub our bodies all over you...?\
name ""
if %kousoku=0 gosub *fairys_a3
gosub *fairys_a5
skip -1



*fairys_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\fairys_bk01.bmp",220,100
lsp 692,":a;chara\fairys_bk11.bmp",0,50
lsp 693,":a;chara\fairys_bk21.bmp",440,50
gosub *syasei2
>Unable to endure the fairies tickling him all over his body, Luka finally ejaculates, covering the fairies in his semen.\
mov %viclose,1:gosub *lose
mov %2547,%2547+1:if %2547=1 mov %count_koenemy,%count_koenemy+1
if %2547>%count_most mov %count_most,%2547:mov $count_mostname,$name
count 25,5
mov $bad1,"Luka succumbed to the fairies tickling him as a group."
mov $bad2," Kept as a pet by the fairies, Luka was played with for the rest of his life."
lsp 700,":a;chara\fairys_st02.bmp",220,100
lsp 701,":a;chara\fairys_st12.bmp",0,50
lsp 702,":a;chara\fairys_st22.bmp",440,50:print 10,500
name "Fairy A"
>Hahaha! It shot out! \
name ""
name "Fairy B"
>He couldn't take being tickled! @
>How embarraaaaassing! \
name ""
goto *fairys_h



*fairys_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\fairys_bk02.bmp",220,100
lsp 692,":a;chara\fairys_bk12.bmp",0,50
lsp 693,":a;chara\fairys_bk22.bmp",440,50
gosub *syasei2
>Unable to endure the fairies tickling his penis, Luka finally ejaculates, covering the fairies in his semen.\
mov %viclose,1:gosub *lose
mov %2547,%2547+1:if %2547=1 mov %count_koenemy,%count_koenemy+1
if %2547>%count_most mov %count_most,%2547:mov $count_mostname,$name
count 25,5
mov $bad1,"Luka succumbed to the fairies tickling him as a group."
mov $bad2," Kept as a pet by the fairies, Luka was played with for the rest of his life."
lsp 700,":a;chara\fairys_st02.bmp",220,100
lsp 701,":a;chara\fairys_st12.bmp",0,50
lsp 702,":a;chara\fairys_st22.bmp",440,50:print 10,500
name "Fairy A"
>Hahaha! It shot out! \
name ""
name "Fairy B"
>He couldn't take being tickled! @
>How embaraaassing! \
name ""
goto *fairys_h



*fairys_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
csp 697
lsp 699,":c;chara\fairys_h3.bmp",0,0
gosub *syasei2
>Unable to endure the fairies playing with his penis as he's bound by the ivy, Luka finally ejaculates, covering the fairies in his semen.\
mov %viclose,1:gosub *lose
mov %2547,%2547+1:if %2547=1 mov %count_koenemy,%count_koenemy+1
if %2547>%count_most mov %count_most,%2547:mov $count_mostname,$name
count 24,5
mov $bad1,"Luka succumbed to the fairies group pranks."
mov $bad2," Kept as a pet by the fairies, Luka was played with for the rest of his life."
name "Fairy A"
>Hahaha! It shot out! \
name ""
name "Fairy B"
>He couldn't handle us playing with his penis! @
>How embaraaassing! \
name ""
>The fairies are flying around in circles above my body, still bound by the ivy.\
>Suddenly, they swarm all over me!\
goto *fairys_h



*fairys_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
csp 697
lsp 699,":c;chara\fairys_h3.bmp",0,0
gosub *syasei2
>Unable to endure the fairies rubbing their tiny bodies all over his penis as he's bound by the ivy, Luka finally ejaculates, covering the fairies in his semen.\
mov %viclose,1:gosub *lose
mov %2547,%2547+1:if %2547=1 mov %count_koenemy,%count_koenemy+1
if %2547>%count_most mov %count_most,%2547:mov $count_mostname,$name
count 24,5
mov $bad1,"Luka succumbed to the fairies group dance."
mov $bad2," Kept as a pet by the fairies, Luka was played with for the rest of his life."
name "Fairy A"
>Hahaha! It shot out! \
name ""
name "Fairy B"
>He couldn't handle us rubbing our bodies on his penis! @
>How embaraaassing! \
name ""
>The fairies are flying around in circles above my body, still bound by the ivy.\
>Suddenly, they swarm all over me!\
goto *fairys_h



*fairys_h

mov $end_go,"sean0123a"
if %2547=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 goto *fairys_hb
>I fall to the ground exhausted as the fairies fly around giggling.@
>As if attracted by the commotion, even more fairies are gathering.\
name "Fairy A"
>Hehehe... He's exhausted. \
name ""
name "Fairy B"
>Let's borrow the forest's power! \
name ""
cspl 690,699:csp 701:csp 702
lsp 699,":c;chara\fairys_h1.bmp",0,0:print 10,500
>Ivy quickly extends from the trees and binds my arms and legs.@
>With my arms and feet stretched out, I can't move my body an inch.\
goto *fairys_hb



*fairys_hb

name "Luka"
>What are you doing!?@> Stop!\
name ""
name "Fairy A"
>Yay!@> Attack the bad human! \
name ""
name "Fairy B"
>Everyone bully him! \
name ""
name "Luka"
>Ah! Uwaa!\
name ""
mov %hseanwave,1:hseanwave
lsp 699,":c;chara\fairys_h2.bmp",0,0:print 10,500
>The fairies swarm all over my body.@
>With their wings rustling together, they start to cling to my body.\
>All over my body, fairies are licking, rubbing and stroking random body parts.\
>Bound by the ivy, all I can do is tremble as they attack me all over.\
name "Luka"
>Hyaa!@>Stop!\
name ""
name "Fairy C"
>*Lick* \
name ""
name "Fairy D"
>I'll give you a kiss! \
name ""
>A fairy kisses me on the lips.@
>After that, she starts to lick me all over my cheeks.\
name "Fairy E"
>I'll bully the bad human's bag! \
name ""
>One of the fairies grabs my scrotum with her tiny hands.@
>She starts to play with them, rubbing my balls on her body.\
>At the same time, another fairy flies up to my penis.\
name "Fairy F"
>The penis is all squishy! \
name ""
name "Fairy G"
>I'll use my butt! \
name ""
>A fairy tightly hugs my penis, and starts to lick it with her small tongue.\
>At the same time, another fairy starts to rub her ass up and down on the back of my penis.\
name "Luka"
>Uuu...\
name ""
>The fairies are toying with whatever part of my body looks fun to them.@
>Every movement of their tiny limbs or tongues gives a gentle stimulation.\
>In particular, their tiny tongues give a pleasant tickling sensation as they lick me.\
>I shiver as the small stimulations attack me over every inch of my body.\
>As these innocent acting fairies continue to use my body as a toy, the humiliation starts to mix with the pleasure.\
name "Fairy F"
>The penis is twitching! \
name ""
>The fairy hugging my penis starts to squeeze tighter.@
>Whether or not she knows it, she's directly stimulating a man's most sensitive part...\
>After tightly hugging my penis for a few moments, she sticks out her small tongue and starts to lick it.\
>The gentle licking brought about a surprisingly powerful sensation.\
name "Luka"
>Auuu!!\
name ""
name "Fairy G"
>Ah!@>Liquid is coming out! \
name ""
>The fairy that was pressing her ass on the back of my penis giggles.@
>The pre-come leaking out drips down and starts to cover her waist in semen.\
>But the fairy just seems to be amused by that, as she continues to rub her butt up and down.\
name "Fairy G"
>It's sticky! Hehehe! \
name ""
name "Luka"
>Auuu!\
name ""
>She presses her bottom harder into my penis.@
>The moment she pressed down hard on the back muscle, an unexpected shiver ran through my waist.\
>The desire to ejaculate rises up through my body until it becomes unbearable.\
name "Luka"
>Ahh! I'm coming!@> Ahhh!!\
name ""
gosub *syasei1
lsp 699,":c;chara\fairys_h3.bmp",0,0
gosub *syasei2
>Erupting like magma from this position on my back, the semen shoots out and covers the fairies playing with my body.\
lsp 699,":c;chara\fairys_h4.bmp",0,0:print 10,500
>Their small bodies are covered in the proof of my desire.\
name "Fairy G"
>Hehehe... I got covered in the white urine! \
name ""
name "Fairy F"
>It's so sticky! \
name ""
>Instead of showing disgust at being covered, the fairies start to laugh and play with the semen covering their bodies.\
>Bound and drained of strength, the fairies are cheerfully frolicking around me.\
name "Fairy A"
>This isn't urine.@
>It's the seed that lets you make babies!\
name ""
name "Fairy B"
>Baby seed?@
>So if we cover the ground with it, babies will grow?\
name ""
name "Fairy A"
>I... I think so...\
name ""
name "Fairy B"
>Then... Let's cover the ground with it! @
>Ok!@>We need to get a lot more everyone! \
name ""
name "Luka"
>Aaaa... Stop...\
name ""
>Completely ignoring my words, the fairies swarm back over my body.@
>With renewed interest, they start toying with my body again.\
name "Fairy A"
>When you squeeze the penis, seed comes out.\
name ""
name "Fairy B"
>So should I milk him like Ms. Cow?@
>Ok!@>*Squeeze*@>*Squeeze* \
name ""
>With her feet at the base of my penis and her arms wrapped around the tip, she presses her tiny breasts into my penis as she milks me by moving her whole body up and down.\
name "Luka"
>Faaa...\
name ""
>The unique pleasure drains me of the rest of my strength.@
>With the fairy using her soft body to milk me, all I can do is sigh at the stimulation.\
name "Fairy A"
>Hahaha... I think it's working!\
name ""
name "Fairy B"
>Hehehe... It looks like doing it the same way as to Ms. Cow is how it works.@
>I pride myself in my milking skill! \
>I can get the human milk too! \
name ""
name "Luka"
>Faaa... That feels good...\
name ""
>I let out a pleasure filled sigh as the fairy uses her entire body to milk me.\
>At the same time, all of the other fairies teasing got even more intense.\
>The fairy holding my scrotum pushes her face into it and starts to gently nibble at the skin.\
>As they lick and massage me all over, my head goes white at the overwhelming stimulation.\
name "Luka"
>Ah! I'm coming again!\
name ""
name "Fairy A"
>Let it out, let it out! \
name ""
name "Fairy B"
>Shoot out the baby milk! \
name ""
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1
lsp 699,":c;chara\fairys_h5.bmp",0,0
gosub *syasei2
>While awash in the pleasure all over my body, I explode again.\
>While I'm feeling humiliated at being toyed with, the fairies just start to giggle.@
>With all of my strength consumed, I sigh and relax.\
>The semen I shot straight into the air landed on both the fairies and the ground.\
>As the fairies look at the semen on the ground, they start to laugh excitedly.\
name "Fairy A"
>So the babies should come out now, right?\
name ""
name "Fairy B"
>If we squeeze out more milk, more babies will come out!\
name ""
name "Fairy C"
>Then... We need to get more milk! \
name ""
name "Luka"
>Stop...@>Uwaa!\
name ""
>Due to their naive misunderstanding, they start playing with me again.@
>Squeezing out my semen so that they can pointlessly scatter it on the ground...\
gosub *anten
mov %hseanwave,0:hseanwave
>Like that, the group of fairies continued to play with me.@
>Stimulating and playing with every part of my bound body, they kept forcing me to ejaculate over and over.\
>After a while, the fairies realized their mistake about babies.@
>But even then, it just turned into an even more amusing game for them to see how much they could get to come out.\
>With no relief, they play with me all day, every day.@
>For the rest of my life, I'll have to pay for making that fairy angry...\
>.....................\
goto *badend



*sylph_start

mov $name,"Sylph"
mov $name2,"Sylph"
mov $lavel,"sylph"
mov $tatie1,"sylph_st01"
mov $tatie2,"sylph_st05"
mov $tatie3,"sylph_st03"
mov $haikei,"bg061"
mov %monster_x,0
mov %monster_y,0
mov %max_enemylife,4000
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,100
mov %music,0
gosub *maxmp:mov %mp,1
mov %tikei,2
gosub *syutugen
bgm "bgm\yonseirei2.ogg"
mov %end_n,4
mov %exp_minus,4150
mov %zmonster_x,-280
name "Luka"
>Umm... Are you Sylph, one of the four spirits?\
name ""
lsp 700,":a;chara\sylph_st02.bmp",0,0:print 10,500
name $name
>Yes. I am Sylph.@
>Do you require something from me?\
name ""
name "Luka"
>Ahh... I'm a Hero on a quest to defeat the Monster Lord...@
>Er, no.@>I don't want to defeat Alice.\
>That is, I heard from Alice.@> Uh...\
name ""
name $name
>What are you talking about?@>I don't understand.@
>Since you're so poor at explaining, I'll ask the wind instead.\
name ""
name "Luka"
>Eh...?\
name ""
lsp 700,":a;chara\sylph_st04.bmp",0,0:print 10,500
>Sylph falls silent as wind starts to blow around us.\
name $name
>Yes... I see... Hmm...@
>You're a human who wishes for coexistence between man and monster, and wants to gain power to defeat the Four Heavenly Knights?\
name ""
name "Luka"
>You know that much...?\
name ""
lsp 700,":a;chara\sylph_st02.bmp",0,0:print 10,500
name $name
>Yes, I see...@
>My power... You wouldn't use it for evil.\
>But... The Four Spirit's power can't be given to a weak man.\
>...Rather, a weak man cannot master the power.@
>Therefore, I shall check to see if you are worthy of my power.\
name "Luka"
>Check?\
name ""
name $name
>I shall test you in a fight.@
>If you can land a single blow on me, I'll lend you my assistance.\
name ""
name "Luka"
>I see... Only one blow?\
name ""
name $name
>Hehehe... It might be impossible for you.\
mov $tatie1,"sylph_st05"
lsp 700,":a;chara\sylph_st05.bmp",0,0:print 10,500
>Now... Here we go! \
name ""
dwave 1,"se\wind1.ogg"
>A cool wind blows through the forest!\
mov %sinkou,1
goto *common_main



*sylph_v

name "Luka"
>Yes!@> I hit!\
name ""
name $name
>.............\
gosub *face3
>Fuuuuuu!@> You're so mean!\
>No fair!@> You cheated!\
name ""
>Luka made Sylph cry!\
name "Luka"
>Wah!?@>I'm sorry!\
name ""
>What a quick change in attitude...\
mov %viclose,1:gosub *victory
mov %getexp,2000:gosub *lvup
mov %2248,1
goto *sean0127



*sylph_kousan

mov $tatie2,"sylph_st05"
gosub *kousan_syori
>Luka yields to the temptation, ending his resistance!\
gosub *face2
name $name
>Hehehe, so you realized it wasn't possible.@
>Ok!@>I'll make you my new toy! \
name ""
rnd2 %ransu,1,4
if %ransu=1 gosub *sylph_a1
if %ransu=2 gosub *sylph_a2
if %ransu=3 gosub *sylph_a3
if %ransu=4 gosub *sylph_a4
skip -5



*sylph_main

gosub *cmd_main
if %cmd1=11 && %sinkou=11 goto *common_attack
if %cmd1=11 && %nanido=0 goto *common_attack
if %cmd1=11 && %hanyo1=0 goto *sylph_attack1
if %cmd1=11 && %hanyo1=1 goto *sylph_attack2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *sylph_kousan
if %cmd1=16 goto *sylph_onedari
if %cmd1=17 && %nanido=0 goto *common_skill
if %cmd1=17 && %sinkou<11 goto *sylph_skill
if %cmd1=17 && %sinkou=11 goto *common_skill
goto *sylph_main



*sylph_attack1

mov %before_action,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ha!"
if %ransu=2 mov $sel1,"Hya!"
if %ransu=3 mov $sel1,"Orya!"
name "Luka"
eng $sel1:$sel6\
name ""
mov %skill_sub,1
gosub *common_attack2
gosub *mp_kaihuku:gosub *mp
skillname "Wind Guard"
dwave 1,"se\karaburi.ogg"
delay 90
>But a barrier of wind blocks Luka's sword!\
skillname ""
name "Luka"
>Eh!?\
name $name
>My wind won't allow any of your attacks to reach me.@
>In addition, it leaves you open for a counterattack! \
name ""
gosub *counter
mov %hanyo1,1
rnd2 %ransu,1,4
if %ransu=1 gosub *sylph_a1:gosub *sylph_a1:goto *sylph_a
if %ransu=2 gosub *sylph_a1:gosub *sylph_a2:goto *sylph_a
if %ransu=3 gosub *sylph_a2:gosub *sylph_a1:goto *sylph_a
if %ransu=4 gosub *sylph_a2:gosub *sylph_a2:goto *sylph_a



*sylph_attack2

mov %before_action,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Guh!"
if %ransu=2 mov $sel1,"Haa!"
if %ransu=3 mov $sel1,"This will hit!"
name "Luka"
eng $sel1:$sel6\
name ""
mov %skill_sub,1
gosub *common_attack2
gosub *mp_kaihuku:gosub *mp
skillname "Wind Guard"
dwave 1,"se\karaburi.ogg"
delay 90
>But a barrier of wind blocks Luka's sword!\
skillname ""
name $name
>Hehehe. It won't work no matter how many times you try. @
>Here comes the counter! \
name ""
gosub *counter
rnd2 %ransu,1,8
if %ransu=1 gosub *sylph_a1:gosub *sylph_a1:goto *sylph_a
if %ransu=2 gosub *sylph_a1:gosub *sylph_a2:goto *sylph_a
if %ransu=3 gosub *sylph_a2:gosub *sylph_a1:goto *sylph_a
if %ransu=4 gosub *sylph_a2:gosub *sylph_a2:goto *sylph_a
if %ransu>4 gosub *sylph_a3:goto *sylph_a



*sylph_skill

gosub *cmd_skill
if %cmd1=21 goto *sylph_skill_x1
if %cmd1=22 goto *sylph_skill_x1
if %cmd1=22 goto *skill2
if %cmd1=23 goto *sylph_skill_x1
if %cmd1=24 goto *skill4
if %cmd1=25 goto *sylph_skill_x1
if %cmd1=35 goto *skill17
if %cmd1=-1 goto *sylph_main
goto *sylph_skill



*sylph_skill_x1

if %cmd1=21 mov %skill_sub,1:gosub *skill1:skip 4
if %cmd1=22 mov %skill_sub,1:gosub *skill6:skip 3
if %cmd1=23 mov %skill_sub,1:gosub *skill3:skip 2
if %cmd1=25 mov %skill_sub,1:gosub *skill5
mov %skill_sub,0
skillname "Wind Guard"
dwave 1,"se\karaburi.ogg"
>But a barrier of wind blocks Luka's sword!\
skillname ""
if %hanyo2=1 skip 5
name "Luka"
>Guh...@> This skill doesn't work either?\
name ""
mov %hanyo2,1
name $name
>That will never hit! \
name ""
gosub *counter
gosub *sylph_a3
goto *sylph_a



*sylph_a

notif %max_enemylife=%enemylife goto *sylph_v
if %status=1 gosub *sylph_a4:goto *common_main
if %sinkou=1 gosub *sylph_b1:goto *common_main
if %sinkou=2 gosub *sylph_b2:goto *common_main
if %sinkou=3 gosub *sylph_b3:goto *common_main
if %sinkou=4 gosub *sylph_b4:goto *common_main
if %sinkou=5 gosub *sylph_b5:goto *common_main
if %sinkou=6 gosub *sylph_b6:goto *common_main
if %sinkou=7 gosub *sylph_b7:goto *common_main
if %sinkou=8 gosub *sylph_b8:goto *common_main
if %sinkou=9 gosub *sylph_b9:goto *common_main
if %sinkou=10 gosub *sylph_b10:goto *common_main
if %sinkou=11 gosub *sylph_b11:goto *common_main



*sylph_a1

add %stack,1
skillcount1 3169
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I can tickle your body with my wind! "
if %ransu=2 mov $sel1,"Hehe... Does it feel good?"
if %ransu=3 mov $sel1,"Tickletickle! "
if %ransu=4 mov $sel1,"I'll play with every corner of your body with my wind! "
name $name
eng $sel1:$sel6\
name ""
skillname "Tickling Wind"
dwave 1,"se\wind1.ogg"
>A soft wind blows around Luka, massaging every inch of his body!
if %nanido<2 damage 25,30
if %nanido=2 damage 38,45
if %nanido=3 damage 50,60
skillname ""
if %mylife=0 sub %stack,1:return *sylph_h1
sub %stack,1
return



*sylph_a2

add %stack,1
skillcount1 3170
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll use the wind to force you to come! "
if %ransu=2 mov $sel1,"I'll give a present to your penis with my wind. "
if %ransu=3 mov $sel1,"Does it feel better than actually being touched?"
if %ransu=4 mov $sel1,"Shoot out all your semen into the wind. "
name $name
eng $sel1:$sel6\
name ""
skillname "Winds of Pleasure"
dwave 1,"se\wind1.ogg"
>A tiny tornado forms around Luka's penis, causing the wind to massage his penis as it rapidly spins!
if %nanido<2 damage 30,35
if %nanido=2 damage 45,52
if %nanido=3 damage 60,70
skillname ""
if %mylife=0 sub %stack,1:return *sylph_h2
sub %stack,1
return



*sylph_a3

add %stack,1
skillcount1 3171
if %status=1 >Luka is in a trance!\
if %kousan=0 lsp 700,":a;chara\sylph_st05.bmp",0,0:print 10,500
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"The pleasure will make you weak... "
if %ransu=2 mov $sel1,"Hehehe... How long can you resist my ultimate move? "
if %ransu=3 mov $sel1,"My wind will make you go crazy. "
name $name
eng $sel1:$sel6\
name ""
skillname "Winds of Ecstasy"
dwave 1,"se\wind1.ogg"
if %kousan=0 lsp 700,":a;chara\sylph_st11.bmp",0,0:print 10,500
>A soft wind blows around Luka's body!\
>The wind brings a strange feeling of ecstasy wherever it touches!
if %nanido<2 damage 15,20
if %nanido=2 damage 22,30
if %nanido=3 damage 30,40
if %status=0 mov $sel1,"Luka is put into a trance!"
if %status=1 mov $sel1,""
mov %status,1:gosub *status_print
if $sel1<>"" eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *sylph_h3
if %kousan=2 sub %stack,1:return
name "Luka"
>Aaa...\
name ""
gosub *face1
name $name
>Hehehe... Doesn't it feel amazing?@
>Like that, I'll send you to heaven. \
name ""
mov %status_turn,3
if %nanido=2 mov %status_turn,4
if %nanido=3 mov %status_turn,5
sub %stack,1
return



*sylph_a4

add %stack,1
skillcount1 3172
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll play with the tip. ":mov $sel2,"Wrapped in a gentle breeze, Sylph presses her body against Luka's penis!"
if %ransu=2 mov $sel1,"I'll play with the umbrella. ":mov $sel2,"Wrapped in a gentle breeze, Sylph wraps her arms around the top of Luka's penis!"
if %ransu=3 mov $sel1,"Hahaha... Your penis is so squishy. ":mov $sel2,"Wrapped in a gentle breeze, Sylph tightly squeezes Luka's penis!"
if %ransu=4 mov $sel1,"Hehehe... I'll squeeze it. ":mov $sel2,"Sylph tightly hugs Luka's penis, as the wind around her tickles him!"
if %ransu=5 mov $sel1,"Let it all out as I do this... ":mov $sel2,"Sylph uses her hands and feet to massage Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Wind Serenade"
dwave 1,"se\wind1.ogg"
dwave 1,"se\ero_koki1.ogg"
eng $sel2:$sel6
if %nanido<2 damage 30,40
if %nanido=2 damage 45,60
if %nanido=3 damage 60,80
skillname ""
if %mylife=0 sub %stack,1:return *sylph_h4
sub %stack,1
return



*sylph_b1

add %stack,1
name $name
>Well?@>Isn't my wind amazing?@
>Give up, and become my toy. \
name ""
mov %sinkou,2
sub %stack,1
return



*sylph_b2

add %stack,1
name $name
>Hehehe, have you realized that it's impossible?@
>Using this technique makes me tired, so hurry up and give up. \
name ""
>I see, it makes her tired...\
mov %sinkou,3
sub %stack,1
return



*sylph_b3

add %stack,1
name $name
>Hehehe... You're still trying?@
>Your attack will never hit me. \
name ""
mov %sinkou,4
sub %stack,1
return



*sylph_b4

add %stack,1
name $name
>Hey, give up already...\
name ""
mov %sinkou,5
sub %stack,1
return



*sylph_b5

add %stack,1
name $name
>You haven't given up yet...?\
name ""
mov %sinkou,6
sub %stack,1
return



*sylph_b6

add %stack,1
name $name
if %before_action<40 skip 4
>What are you doing...?@
>Hey, hey! Fight properly!\
skip 2
>It's about time for you to give up...\
name ""
mov %sinkou,7
sub %stack,1
return



*sylph_b7

add %stack,1
name $name
if %before_action<40 skip 3
>Hey, hurry up and attack!\
skip 2
>It's about time for you to give up...\
name ""
mov %sinkou,8
sub %stack,1
return



*sylph_b8

add %stack,1
mov $tatie1,"sylph_st07"
mov $tatie2,"sylph_st07"
lsp 700,":a;chara\sylph_st07.bmp",0,0:print 10,500
name $name
>Funyaa...@
>You must be tired, right?@>...Right?\
name ""
mov %sinkou,9
sub %stack,1
return



*sylph_b9

add %stack,1
mov $tatie1,"sylph_st07"
mov $tatie2,"sylph_st07"
lsp 700,":a;chara\sylph_st07.bmp",0,0:print 10,500
name $name
>I can't hold on...\
name ""
mov %sinkou,10
sub %stack,1
return



*sylph_b10

add %stack,1
mov $tatie1,"sylph_st07"
mov $tatie2,"sylph_st07"
lsp 700,":a;chara\sylph_st07.bmp",0,0:print 10,500
name $name
>Uhg, no more...\
name ""
>Sylph releases the wall of wind!\
mov %sinkou,11
sub %stack,1
return



*sylph_b11

add %stack,1
name $name
>Whew...\
name ""
>Sylph looks exhausted!\
sub %stack,1
return



*sylph_onedari

mov $list1,"Tickling Wind"
if %3169>0 mov %list_num1,1
mov $list2,"Winds of Pleasure"
if %3170>0 mov %list_num2,1
mov $list3,"Winds of Ecstasy"
if %3171>0 mov %list_num3,1
mov $list4,"Wind Serenade"
if %3172>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *sylph_onedari1
if %cmd1=12 goto *sylph_onedari2
if %cmd1=13 goto *sylph_onedari3
if %cmd1=14 goto *sylph_onedari4
if %cmd1=-1 goto *sylph_main
goto *sylph_onedari



*sylph_onedari1

mov $tatie2,"sylph_st05"
gosub *onedari_syori
name $name
>You want my wind to tickle you all over your body?@
>Then, I'll tickle you until you can't take it anymore. \
name ""
gosub *sylph_a1
skip -1



*sylph_onedari2

mov $tatie2,"sylph_st05"
gosub *onedari_syori
name $name
>You want my winds to massage your penis?@
>Then I'll let you surrender to my wind... \
name ""
gosub *sylph_a2
skip -1



*sylph_onedari3

mov $tatie2,"sylph_st05"
gosub *onedari_syori
name $name
>You want to be put into a trance by my wind?@
>Then I'll make it so you can't resist any longer. \
name ""
gosub *sylph_a3
skip -1



*sylph_onedari4

mov $tatie2,"sylph_st05"
gosub *onedari_syori
name $name
>You want me to use my ultimate attack?@
>Ok... I'll give you a taste of heaven! \
name ""
gosub *sylph_a4
skip -1



*sylph_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\sylph_bk03.bmp",0,0
gosub *syasei2
>Tickled by the wind, Luka finally ejaculates, causing the semen to blow towards Sylph's body.\
mov %viclose,1:gosub *lose
mov %2548,%2548+1:if %2548=1 mov %count_koenemy,%count_koenemy+1
if %2548>%count_most mov %count_most,%2548:mov $count_mostname,$name
count 26,5
mov $bad1,"Luka succumbed to Sylph's tickling wind."
mov $bad2," Made into Sylph's toy, Luka was played with for the rest of his life."
gosub *face2
name $name
>Haha, you let it out.@
>You're already my toy! \
name ""
goto *sylph_h



*sylph_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\sylph_bk01.bmp",0,0
gosub *syasei2
>Massaged by the wind, Luka finally ejaculates, causing the semen to blow towards Sylph's body.\
mov %viclose,1:gosub *lose
mov %2548,%2548+1:if %2548=1 mov %count_koenemy,%count_koenemy+1
if %2548>%count_most mov %count_most,%2548:mov $count_mostname,$name
count 26,5
mov $bad1,"Luka succumbed to Sylph's winds of pleasure."
mov $bad2," Made into Sylph's toy, Luka was played with for the rest of his life."
gosub *face2
name $name
>Haha, you let it out.@
>You're already my toy! \
name ""
goto *sylph_h



*sylph_h3

gosub *face2
mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\sylph_bk02.bmp",0,0
gosub *syasei2
>While wrapped in winds that seem to cause his mind to melt, Luka ejaculates, causing the semen to blow towards Sylph's body.\
mov %viclose,1:gosub *lose
mov %2548,%2548+1:if %2548=1 mov %count_koenemy,%count_koenemy+1
if %2548>%count_most mov %count_most,%2548:mov $count_mostname,$name
count 26,5
mov $bad1,"Luka succumbed to Sylph's winds of ecstasy."
mov $bad2," Made into Sylph's toy, Luka was played with for the rest of his life."
gosub *face2
name $name
>Haha, you let it out.@
>You're already my toy! \
name ""
goto *sylph_h



*sylph_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\sylph_bk01.bmp",0,0
lsp 692,":a;chara\sylph_bk02.bmp",0,0
gosub *syasei2
>As Sylph's soft body clings to Luka's penis, he finally ejaculates, covering her tiny body with his semen.\
mov %viclose,1:gosub *lose
mov %2548,%2548+1:if %2548=1 mov %count_koenemy,%count_koenemy+1
if %2548>%count_most mov %count_most,%2548:mov $count_mostname,$name
count 26,5
mov $bad1,"Luka succumbed to Sylph's serenade."
mov $bad2," Made into Sylph's toy, Luka was played with for the rest of his life."
gosub *face2
name $name
>Hahaha, did it feel good?@
>You're already my toy! \
name ""
goto *sylph_h



*sylph_h

mov $tatie2,"sylph_st05"
if %2548=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
>While giggling, Sylph slips into my underwear.@
>Her hair and smooth skin tickles me as she flies past my thigh to my groin.\
name "Luka"
>Wah!@> What are you doing!?\
name ""
name $name
>I decided to make your penis my new toy. \
name ""
mov %hseanwave,1:hseanwave
cspl 690,699
lsp 700,":c;chara\sylph_h1.bmp",0,0:print 10,500
>Sylph's tiny body clings to my penis.@
>My body instinctively trembles at the sudden stimulation.\
name "Luka"
>Don't... Do that...\
name ""
name $name
>Hehehe... I'll make you feel good. \
name ""
>Sylph starts to tightly hug my penis.@
>She gradually increases the power as she clings tighter and tighter.\
>Sylph's soft, warm body presses into my penis.@
>With her tiny body hugging me so tightly, I can feel every part of her touching my penis.\
name "Luka"
>Ahh...\
name ""
name $name
>Haha... Did that feel good?@
>Don't worry, I can make it even better. \
name ""
>While still tightly clinging to my penis, Sylph starts to slowly move her body.\
>With every movement she makes, her hair tickles my scrotum and thigh.@
>Pre-come starts to leak out as the pleasure from the gentle tickling mixes with her body stroking my penis.\
name $name
>Hehehe... You started to leak. \
name ""
>Sylph reaches to the tip of my penis and scoops up the pre-come with her small hand.\
>She takes the semen and starts to rub it all over my penis.@
>With her sticky hand stroking me all over, I let out a pleasure filled sigh.\
name "Luka"
>Aahhh...@> That feels good...\
name ""
name $name
>Hehehe... Your penis is twitching. @
>Well... Shall I make you come now? \
name ""
name "Luka"
>Don't... do that...\
name ""
name $name
>Even if you don't want to, I'm still going to force you to come. @
>I know how to force you to ejaculate. \
name ""
>Sylph wraps her arms and locks both of her feet around my penis, and starts to slowly tighten around me.\
>At the same time, she presses her face into the back muscle.@
>Tightly holding me like that, she sticks out her tongue and starts to lick up and down.\
name "Luka"
>Aaaa...\
name ""
name $name
>Hehehe... If I do this, you can't endure it can you?@
>Stop being so stubborn... Just let it out! \
name ""
>Sylph puts power into her arms and squeezes the top of my penis.@
>Like that, she starts to move her arms and legs up and down.\
>Using her entire body to stroke me, her movements are forcing me closer to another orgasm.\
name $name
>Hahaha... Now come! \
name ""
name "Luka"
>Ahhhh!!\
name ""
>The overpowering stimulation from her playing with me forces me over the edge.\
gosub *syasei1
lsp 700,":c;chara\sylph_h2.bmp",0,0:print 10,500
gosub *syasei2
mov %hseanwave,0:hseanwave
name $name
>Hya!!\
name ""
>Still in my underwear, all of my semen shoots out over Sylph.@
lsp 700,":c;chara\sylph_h3.bmp",0,0:print 10,500
>Once my ejaculation ends, Sylph is completely covered in my semen.\
name $name
>Hehehe... Did it feel good?@
>With that, you're officially my toy.\
>No human has challenged me in hundreds of years... I was so bored.@
>Now I have something to play with for a loooong time! \
name ""
name "Luka"
>No way...\
name ""
>Drained of power, I can't peel her off.@
>Defeated by Sylph, she'll continue playing with me as her toy...\
name $name
>More... I want to play with your penis more! \
name ""
name "Luka"
>St.. Ahh!!\
name ""
>Sylph starts to move her body again, still clinging to my penis.@
>This [Playing] will continue forever...\
gosub *anten
>Defeated by one of the Four Spirits, I have to endure these miserable days for the rest of my life as compensation.\
>Without being able to escape, I'm kept as Sylph's toy.\
>Thus, my adventure has ended...\
>....................\
goto *badend



*c_dryad_start

mov $name,"Chimera Dryad"
mov $name2,"Chimera Dryad"
mov $lavel,"c_dryad"
mov $tatie1,"c_dryad_st01"
mov $tatie2,"c_dryad_st01"
mov $tatie3,"c_dryad_st01"
mov $tatie4,"c_dryad_st11"
mov $haikei,"bg061"
mov %monster_x,140
mov %monster_y,0
if %nanido=1 mov %max_enemylife,6000
if %nanido=2 mov %max_enemylife,6000
if %nanido=3 mov %max_enemylife,6000
if %nanido=1 mov %henkahp1,1500
if %nanido=2 mov %henkahp1,1500
if %nanido=3 mov %henkahp1,1500
if %nanido=0 mov %max_enemylife,2
if %nanido=0 mov %henkahp1,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,99
mov %music,3
mov %tikei,2
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't move in this position!"
mov $mogaku_sel1,""
mov $mogaku_sel2,""
mov $mogaku_sel3,""
mov $mogaku_sel4,""
mov $mogaku_sel5,""
mov $mogaku_dassyutu1,""
mov $mogaku_dassyutu2,""
mov %end_n,4
mov %exp_minus,6150
mov %zmonster_x,-100
mov %tukix,300
name "Luka"
>Gah...\
name ""
dwave 1,"se\miss.ogg"
>I jump back and narrowly avoid the attack.\
dwave 1,"se\karaburi.ogg"
>Alice blows off the attack with her tail.\
name "Alice"
>What is the meaning of this!?@
>Attacking me?\
>Do you know what it means to attack the Monster Lord!?\
name ""
skillname "Omega Blaze"
>Alice creates a storm of fire!\
>A scorching whirlpool of flame chars the Chimera Dryad!
delay 500
if %effectspeed=2 dwave 1,"se\fire1.ogg":skip 2
mpegplay "effect\movie01.mpg",1
dwave 2,"se\damage2.ogg"
rnd2 %damage,3000,3600
gosub *alice_enemylife2
skillname ""
name $name
>...................\
name ""
name "Alice"
>What!?@
>It didn't even flinch from my attack!?\
name ""
name "Luka"
>...Alice, you're the Monster Lord.@
>Leave the fights with monsters to me, the Hero!\
name ""
>She said all monsters were her cute subordinates.@
>She shouldn't attack her underlings...\
name "Alice"
>This isn't the time to be talking foolishness, you fake Hero!@
>This... Thing... Isn't normal.\
name ""
name "Luka"
>Please stand back, Alice!@
>Monster fighting is a Hero's duty!\
name ""
name "Alice"
>But...!\
name ""
name "Luka"
>I'm a Hero!@>You're the Monster Lord!\
>I don't want to see monsters fighting each other!\
>And I promised the Elf!@
>I'll defeat this thing and bring peace back to the forest!\
name ""
name "Alice"
>...............\
>...I see.@>I'll step back.\
>Be careful...@>This thing is strange.\
name ""
name "Luka"
>I will...\
name ""
>Once Alice vanishes, I turn back to the monster.\
>The scorching flames have already died down.@
>It turns its emotionless eyes towards me.\
>This monster disturbing the peace of the forest...@
>I'll get rid of it!\
mov %sinkou,1
goto *common_main



*c_dryad001

name "Luka"
>Guh...@> This thing... Is strong!\
name ""
>Incredible endurance and strong attacks...@
>The way things are going, I don't think I'll win...\
lsp2 0,":a;chara\sylph_st01.bmp",250,300,100,100,0,200
for %move=0 to 50 step 1
msp2 0,10,0,0,0,0,-6
print 1:wait 8
next
csp2 0:print 1
name "Sylph"
>Luka... Use my power...\
name ""
name "Luka"
>Eh...!?\
name ""
>Suddenly, a voice whispers to me.@
>This voice... It's Sylph!\
name "Sylph"
>Did you already forget?@>I said we'd be together.\
>So, use my power...\
name ""
name "Luka"
>I understand!\
name ""
>I should be able to use Sylph's power now!\
mov %skill01,7
mov %sinkou,3
goto *c_dryad_a



*c_dryad_v

gosub *face3
name $name
>.....!\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The body of the Chimera Dryad vanishes into thousands of particles.@
>The leftover leaves and petals scatter around!\
mov %viclose,1:gosub *victory
mov %getexp,2000:gosub *lvup
mov %2249,1
mov %skill01,7
goto *sean0128



*c_dryad_kousan

gosub *kousan_syori
mov %sinkou,2
>Luka yields to the temptation, ending his resistance!\
goto *c_dryad_a



*c_dryad_main

gosub *cmd_main
if %cmd1=11 && %kousoku=2 mov %abairitu,50:goto *c_dryad_miss2
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 && %sinkou=1 goto *c_dryad_attack
if %cmd1=11 && %sinkou>1 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *c_dryad_kousan
if %cmd1=16 goto *c_dryad_onedari
if %cmd1=17 goto *c_dryad_skill
goto *c_dryad_main



*c_dryad_attack

gosub *common_attack1
if %before_action=3 goto *c_dryad_a
if %enemylife=0 goto *c_dryad_v
name "Luka"
>Did it work...?\
name ""
>It certainly took damage, but it didn't even flinch.@
>This thing took Alice's attack without flinching too...\
>This thing is insane...\
mov %sinkou,2
goto *c_dryad_a



*c_dryad_miss2

mov %before_action,9
name "Luka"
>Guh... Get off!\
name ""
>Luka attacks!
>Wrapped in the ivy, Luka's power dulls!\
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\slash.ogg"
gosub *enemylife
dwave 1,"se\dassyutu.ogg"
lsp 700,":a;chara\"+$tatie3+".bmp",%monster_x,%monster_y
mov %kousoku,0:gosub *status_print
if %enemylife=0 goto *c_dryad_v
>Luka broke free from the Chimera Dryad!\
name $name
>....................\
name ""
mov %owaza_count1a,0
goto *common_main



*c_dryad_skill

gosub *cmd_skill
if %cmd1=21 goto *skill1
if %cmd1=22 goto *skill6
if %cmd1=23 goto *skill3
if %cmd1=24 goto *skill4
if %cmd1=25 goto *skill5
if %cmd1=31 && %sinkou=3 goto *c_dryad_skill7
if %cmd1=31 && %sinkou=4 goto *skill7
if %cmd1=35 goto *skill17
if %cmd1=-1 goto "*"+$lavel+"_main"
goto *c_dryad_skill



*c_dryad_skill7

name "Luka"
>Sylph, please lend me your power!\
name ""
mov %mp,%mp-2
gosub *mp
skillname "Wind Guard"
mov %wind,1
dwave 2,"se\wind2.ogg"
lsp2 0,":a;chara\sylph_st12.bmp",200,300,100,100,0,200
gosub *syoukan_effect
mov %windiconlock,0:gosub *elm_print
>A powerful wind swirls around Luka!\
skillname ""
name "Luka"
>What is this...?\
name ""
>It's as if a small tornado is swirling around me.\
name "Sylph"
>You're pretty compatible with the power of wind...@
>With this, you can protect yourself from its attacks!\
name ""
gosub *c_dryad_a1
name "Luka"
>Amazing...!\
name ""
name "Sylph"
>Hehehe... Do you understand how to use the power of wind now?@
>For a plant based monster like that, their techniques are almost totally nullified. \
>It won't last forever, so be sure to call me again if you're in trouble. \
name ""
mov %wind_turn,8
mov %owaza_count3a,0
mov %sinkou,4
goto *common_main



*c_dryad_a

if %enemylife<%henkahp1 && %sinkou=2 goto *c_dryad001
if %hanyo6=1 && %bougyo=1 gosub *c_dryad_a5:goto *common_main
if %hanyo6=1 && %bougyo=0 gosub *c_dryad_a6:goto *common_main
if %kousoku=2 gosub *c_dryad_a11:goto *common_main
if %kousoku=1 rnd2 %ransu,1,3
if %kousoku=1 && %ransu=1 gosub *c_dryad_a1:goto *common_main
if %kousoku=1 && %ransu=2 gosub *c_dryad_a9:goto *common_main
if %kousoku=1 && %ransu=3 gosub *c_dryad_a10:goto *common_main
if %kousoku=1 skip -4
rnd2 %ransu,1,6
if %ransu=1 gosub *c_dryad_a1:goto *common_main
if %ransu=2 gosub *c_dryad_a2:goto *common_main
if %ransu=3 gosub *c_dryad_a3:goto *common_main
if %ransu=4 && %owaza_count3a>3 && %status=0 && %kousan=0 gosub *c_dryad_a4:goto *common_main
if %ransu=5 && %owaza_count2a>3 && %status=0 gosub *c_dryad_a7:goto *common_main
if %ransu=6 && %owaza_count1a>3 gosub *c_dryad_a8:goto *common_main
skip -7



*c_dryad_a1

add %stack,1
if %kousoku>0 >Luka's limbs are bound by the ivy, as the flowers cover his body!\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"The ivy coils around Luka's penis!"
if %ransu=2 mov $sel1,"The ivy coils around Luka's penis!"
if %ransu=3 mov $sel1,"The ivy strokes Luka's penis!"
name $name
>....................\
name ""
skillname "Ivy Stroking"
dwave 1,"se\ero_makituki1.ogg"
eng "Mucus-covered ivy shoots out towards Luka!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,100
if %wind=1 && %nanido=2 mov %wind_kakuritu,100
if %wind=1 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the ivy was torn up by the wind!":gosub *wind_guard:sub %stack,1:return
\
eng $sel1:$sel6
skillcount1 3174
if %nanido<2 damage 25,30
if %nanido=2 damage 32,40
if %nanido=3 damage 38,55
skillname ""
if %mylife=0 sub %stack,1:return *c_dryad_h1
sub %stack,1
return



*c_dryad_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"A lily wraps around Luka's penis, creating a suction!"
if %ransu=2 mov $sel1,"A lily wraps around Luka's penis, and starts to suck as if it was a mouth!"
if %ransu=3 mov $sel1,"A lily wraps around Luka's penis, and starts to intensely suck!"
name $name
>....................\
name ""
skillname "Semen Slurping Lily"
dwave 1,"se\ero_makituki2.ogg"
eng "A lily approaches Luka, dripping mucus from the petals!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,100
if %wind=1 && %nanido=2 mov %wind_kakuritu,100
if %wind=1 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the lily was torn up by the wind!":gosub *wind_guard:sub %stack,1:return
\
eng $sel1:$sel6
skillcount1 3175
if %nanido<2 damage 32,36
if %nanido=2 damage 43,47
if %nanido=3 damage 59,67
skillname ""
if %mylife=0 sub %stack,1:return *c_dryad_h2
sub %stack,1
return



*c_dryad_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Each tiny seed wriggles around and brings a strange pleasure to Luka!"
if %ransu=2 mov $sel1,"Each tiny seed wriggles and tickles Luka's penis!"
if %ransu=3 mov $sel1,"The soft sunflower stimulates Luka's penis!"
name $name
>....................\
name ""
skillname "Maneating Sunflower"
dwave 1,"se\ero_makituki2.ogg"
eng "A soft sunflower covers Luka's groin!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,100
if %wind=1 && %nanido=2 mov %wind_kakuritu,100
if %wind=1 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the sunflower was torn up by the wind!":gosub *wind_guard:sub %stack,1:return
\
eng $sel1:$sel6
skillcount1 3194
if %nanido<2 damage 38,48
if %nanido=2 damage 52,67
if %nanido=3 damage 71,93
skillname ""
if %mylife=0 sub %stack,1:return *c_dryad_h3
sub %stack,1
return



*c_dryad_a4

add %stack,1
name $name
>....................\
name ""
skillname "Rose of Strangulation"
mov $tatie1,"c_dryad_st21"
mov $tatie2,"c_dryad_st21"
mov $tatie3,"c_dryad_st21"
lsp 700,":a;chara\c_dryad_st21.bmp",140,0:print 10,500
mov %hanyo6,1
>A bright red rose opens up on the Chimera Dryad's body!\
skillname ""
if %first_sel1=1 skip 6
name "Luka"
>Wh...What is that...?\
name ""
>Mucus drips from the wriggling petals of the rose.@
>A strange lewd scent drifts out of the rose.\
if %wind=0 sub %stack,1:return
if %first_sel2=1 sub %stack,1:return
name "Sylph"
>Wawawa!@>That's dangerous!\
>The wind can't guard against that thing, be careful!\
name ""
name "Luka"
>Ok, I will!\
name ""
mov %first_sel2,1
sub %stack,1
return



*c_dryad_a5

add %stack,1
name $name
>....................\
name ""
skillname "Rose of Strangulation"
>The bright red rose shoots towards Luka!
delay 1000
dwave 1,"se\escape.ogg"
>But Luka dodged it!\
skillname ""
mov $tatie1,"c_dryad_st01"
mov $tatie2,"c_dryad_st01"
mov $tatie3,"c_dryad_st01"
lsp 700,":a;chara\c_dryad_st01.bmp",140,0:print 10,500
if %first_sel1=1 skip 6
name "Luka"
>Whew... That was dangerous.\
name ""
>If I hadn't dodged it, that would have been the end of me...\
mov %first_sel1,1
mov %hanyo6,0
mov %owaza_count3a,0
sub %stack,1
return



*c_dryad_a6

add %stack,1
skillcount1 3177
mov %skill01,6
name $name
>....................\
name ""
skillname "Rose of Strangulation"
>The bright red rose shoots out from the Chimera Dryad's body!@
>The rose fastens on to Luka's penis!\
name "Luka"
>Ahhhh!!\
name ""
dwave 1,"se\ero_chupa6.ogg"
>The soft petals of the flower wrap around Luka's penis!\
>It starts to violently suck!
mov %damage_kotei,1
damage 120,150
skillname ""
name "Luka"
>Aieee!\
name ""
>The overpowering stimulation forces me to my knees instantly.@
>With all of my strength drained in one blow, I fall to the ground.\
skillname "Rose of Strangulation"
dwave 1,"se\ero_chupa6.ogg"
>Something inside the rose wraps around my penis as the suction continues!
mov %damage_kotei,1
damage 120,150
skillname ""
sub %stack,1
return *c_dryad_h7



*c_dryad_a7

add %stack,1
mov %owaza_count2a,0
name $name
>....................\
name ""
skillname "Intoxicating Incense"
dwave 1,"se\gas.ogg"
eng "An intoxicating aroma drifts from the Chimera Dryad's flowers!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,100
if %wind=1 && %nanido=2 mov %wind_kakuritu,100
if %wind=1 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind blows the smell away!":gosub *wind_guard:sub %stack,1:return
\
skillcount1 3178
mov %status,1:gosub *status_print
>Luka is put into a trance!\
skillname ""
if %nanido=1 mov %status_turn,2
if %nanido=2 mov %status_turn,2
if %nanido=3 rnd2 %status_turn,3,4
sub %stack,1
return



*c_dryad_a8

add %stack,1
mov %owaza_count1a,0
name $name
>....................\
name ""
skillname "Magic Flower Hug"
dwave 1,"se\ero_makituki3.ogg"
>Countless flowers and ivy stretch out and wrap around Luka's body!
if %wind=1 && %nanido<2 mov %wind_kakuritu,100
if %wind=1 && %nanido=2 mov %wind_kakuritu,100
if %wind=1 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind tears up the ivy and flowers!":gosub *wind_guard:sub %stack,1:return
if %nanido<2 damage 15,20
if %nanido=2 damage 20,28
if %nanido=3 damage 28,38
mov %kousoku,1:gosub *status_print
>Luka's body has been wrapped by the ivy!\
skillname ""
if %mylife=0 sub %stack,1:return *c_dryad_h4
if %kousan>1 sub %stack,1:return
name "Luka"
>Uguh....\
name ""
>The ivy wraps around my feet as the petals of the flowers cover my body.\
>If I don't get out of this quickly, I don't know what's going to happen!\
if %nanido<2 mov %genmogaku,2
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,3
sub %stack,1
return



*c_dryad_a9

add %stack,1
>Luka's limbs are bound by the ivy, as the flowers cover his body!\
skillcount1 3179
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"The flower wriggles seductively as Luka's energy is sucked out!"
if %ransu=2 mov $sel1,"The petals of the flowers vibrate as they suck out Luka's energy!"
if %ransu=3 mov $sel1,"The flower sucks Luka's energy!"
name $name
>....................\
name ""
skillname "Flower Energy Suck"
dwave 1,"se\ero_chupa6.ogg"
>A flower starts to suck on Luka's penis!\
eng $sel1:$sel6
if %nanido<2 damage 22,27
if %nanido=2 damage 28,35
if %nanido=3 damage 39,49
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *c_dryad_h5
sub %stack,1
return



*c_dryad_a10

add %stack,1
>Luka's limbs are bound by the ivy, as the flowers cover his body!\
name $name
>....................\
name ""
skillname "Floral Funeral Preparation"
mov %kousoku,2:mov %genmogaku,100
>All of the plants on the Chimera Dryad start to vibrate excitedly!\
skillname ""
if %kousan>1 sub %stack,1:return
name "Luka"
>What's happening!?\
name ""
>This is a strange atmosphere...@
>I have to break free quickly!!\
sub %stack,1
return



*c_dryad_a11

add %stack,1
>Luka's limbs are bound by the ivy, as the flowers cover his body!\
skillcount1 3180
name $name
>....................\
name ""
skillname "Floral Funeral"
dwave 1,"se\ero_makituki3.ogg"
lsp 700,":a;chara\c_dryad_st13.bmp",140,0:print 10,500
>The flowers and ivy cover Luka's body!\
>The ivy tightly coils around Luka's body as a flower starts to suck on his penis!
mov %damage_kotei,1
damage 25,30
mov %kousoku,3
lsp 700,":a;chara\c_dryad_st15.bmp",140,0:print 10,500
>A huge flower wraps around Luka's body!\
>From head to toe, Luka has been swallowed by a giant flower!
mov %damage_kotei,1
damage 55,65
skillname ""
if %mylife=0 sub %stack,1:return *c_dryad_h6
name "Luka"
>Ahhh!!\
name ""
>My whole body is surrounded by a giant flower.@
>As if being eaten, the walls of the flower start to pull me deeper inside of it.\
>At the same time, another flower is violently sucking on my penis.\
sub %stack,1
goto *c_dryad_a13



*c_dryad_a13

add %stack,1
skillcount1 3180
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Countless flowers suck on Luka's groin!"
if %ransu=2 mov $sel1,"The petals wrapped around Luka's body start to clamp down on him, as if chewing!"
if %ransu=3 mov $sel1,"The flowers start to suck on every part of Luka's body!"
if %ransu=4 mov $sel1,"The flower around Luka's body tightens!"
if %ransu=5 mov $sel1,"The flower sucking on Luka's penis sucks even harder!"
name $name
>....................\
name ""
skillname "Floral Funeral"
dwave 1,"se\ero_chupa6.ogg"
>Countless flowers are attacking every corner of Luka's body!\
eng $sel1:$sel6
mov %damage_kotei,1
damage 55,65
skillname ""
if %mylife=0 sub %stack,1:return *c_dryad_h6
sub %stack,1
goto *c_dryad_a13



*c_dryad_onedari

mov $list1,"Ivy Stroking"
if %3174>0 mov %list_num1,1
mov $list2,"Semen Slurping Lily"
if %3175>0 mov %list_num2,1
mov $list3,"Maneating Sunflower"
if %3194>0 mov %list_num3,1
mov $list4,"Rose of Strangulation"
if %3177>0 mov %list_num4,1
mov $list5,"Intoxicating Incense"
if %3178>0 mov %list_num5,1
mov $list6,"Flower Energy Suck"
if %3179>0 mov %list_num6,1
mov $list7,"Floral Funeral"
if %3180>0 mov %list_num7,1
gosub *cmd_onedari
if %cmd1=11 goto *c_dryad_onedari1
if %cmd1=12 goto *c_dryad_onedari2
if %cmd1=13 goto *c_dryad_onedari3
if %cmd1=14 goto *c_dryad_onedari4
if %cmd1=15 goto *c_dryad_onedari5
if %cmd1=16 goto *c_dryad_onedari6
if %cmd1=17 goto *c_dryad_onedari7
if %cmd1=-1 goto *c_dryad_main
goto *c_dryad_onedari



*c_dryad_onedari1

mov $tatie1,"c_dryad_st01"
mov $tatie2,"c_dryad_st01"
mov $tatie3,"c_dryad_st01"
gosub *onedari_syori_k
gosub *c_dryad_a1
skip -1



*c_dryad_onedari2

mov $tatie1,"c_dryad_st01"
mov $tatie2,"c_dryad_st01"
mov $tatie3,"c_dryad_st01"
gosub *onedari_syori
gosub *c_dryad_a2
skip -1



*c_dryad_onedari3

mov $tatie1,"c_dryad_st01"
mov $tatie2,"c_dryad_st01"
mov $tatie3,"c_dryad_st01"
gosub *onedari_syori
gosub *c_dryad_a3
skip -1



*c_dryad_onedari4

gosub *onedari_syori
if %hanyo6=0 gosub *c_dryad_a4
gosub *c_dryad_a6



*c_dryad_onedari5

mov $tatie1,"c_dryad_st01"
mov $tatie2,"c_dryad_st01"
mov $tatie3,"c_dryad_st01"
gosub *onedari_syori
gosub *c_dryad_a7
mov %kousan,3
goto *c_dryad_a



*c_dryad_onedari6

mov $tatie1,"c_dryad_st01"
mov $tatie2,"c_dryad_st01"
mov $tatie3,"c_dryad_st01"
gosub *onedari_syori_k
if %kousoku=0 gosub *c_dryad_a8
gosub *c_dryad_a9
skip -1



*c_dryad_onedari7

mov $tatie1,"c_dryad_st01"
mov $tatie2,"c_dryad_st01"
mov $tatie3,"c_dryad_st01"
gosub *onedari_syori_k
if %kousoku=0 gosub *c_dryad_a8
gosub *c_dryad_a11



*c_dryad_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\c_dryad_bk01.bmp",140,0
gosub *syasei2
>With the ivy stroking his penis, Luka finally succumbs to the pleasure forced into him.\
mov %viclose,1:gosub *lose
mov %2549,%2549+1:if %2549=1 mov %count_koenemy,%count_koenemy+1
if %2549>%count_most mov %count_most,%2549:mov $count_mostname,$name
count 12,11
mov $bad1,"Luka succumbed to the ivy's stroking."
mov $bad2," Lusted after by the flowers, Luka was digested by the Chimera Dryad."
name $name
>....................\
name ""
>The Chimera Dryad doesn't seem to notice the semen staining her body.\
goto *c_dryad_h



*c_dryad_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\c_dryad_bk02.bmp",140,0
gosub *syasei2
>With the lily sucking on his penis, Luka finally succumbs to the pleasure forced into him.\
mov %viclose,1:gosub *lose
mov %2549,%2549+1:if %2549=1 mov %count_koenemy,%count_koenemy+1
if %2549>%count_most mov %count_most,%2549:mov $count_mostname,$name
count 12,11
mov $bad1,"Luka succumbed to the Chimera Dryad's lily sucking on him."
mov $bad2," Lusted after by the flowers, Luka was digested by the Chimera Dryad."
name $name
>....................\
name ""
>The Chimera Dryad doesn't seem to notice the semen staining her body.\
goto *c_dryad_h



*c_dryad_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\c_dryad_bk04.bmp",140,0
gosub *syasei2
>With the sunflower massaging his penis, Luka finally succumbs to the pleasure forced into him.\
mov %viclose,1:gosub *lose
mov %2549,%2549+1:if %2549=1 mov %count_koenemy,%count_koenemy+1
if %2549>%count_most mov %count_most,%2549:mov $count_mostname,$name
count 12,11
mov $bad1,"Luka succumbed to the Chimera Dryad's sunflower massaging him."
mov $bad2," Lusted after by the flowers, Luka was digested by the Chimera Dryad."
name $name
>....................\
name ""
>The Chimera Dryad doesn't seem to notice the semen staining her body.\
goto *c_dryad_h



*c_dryad_h4

mov %ikigoe,3:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\c_dryad_bk01.bmp",140,0
gosub *syasei2
>As soon as Luka is bound by the ivy, he accidentally ejaculates.\
mov %viclose,1:gosub *lose
mov %2549,%2549+1:if %2549=1 mov %count_koenemy,%count_koenemy+1
if %2549>%count_most mov %count_most,%2549:mov $count_mostname,$name
mov %count_bouhatu,%count_bouhatu+1
count 12,11
mov $bad1,"While being wrapped by the ivy, Luka accidentally ejaculated."
mov $bad2," Lusted after by the flowers, Luka was digested by the Chimera Dryad."
name $name
>....................\
name ""
>The Chimera Dryad doesn't seem to notice the semen staining her body.\
goto *c_dryad_h



*c_dryad_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>As the flower sucks out Luka's energy through his penis, he gives in to desire.\
mov %viclose,1:gosub *lose
mov %2549,%2549+1:if %2549=1 mov %count_koenemy,%count_koenemy+1
if %2549>%count_most mov %count_most,%2549:mov $count_mostname,$name
count 12,11
mov $bad1,"While having his energy sucked by the flower, Luka ejaculated."
mov $bad2," Lusted after by the flowers, Luka was digested by the Chimera Dryad."
name $name
>....................\
name ""
>The Chimera Dryad doesn't seem to notice the semen staining her body.\
goto *c_dryad_h



*c_dryad_h6

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>Unable to endure all of the flowers attacking him at once, Luka quickly ejaculates.\
mov %viclose,1:gosub *lose
mov %2549,%2549+1:if %2549=1 mov %count_koenemy,%count_koenemy+1
if %2549>%count_most mov %count_most,%2549:mov $count_mostname,$name
count 12,11
mov $bad1,"Luka succumbed to the Chimera Dryad's floral funeral."
mov $bad2," Lusted after by the flowers, Luka was digested by the Chimera Dryad."
name $name
>....................\
name ""
mov %skill01,6
if %2818=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2818,1
goto *c_dryad_hb



*c_dryad_h7

name "Luka"
>Haaaa!!\
name ""
gosub *syasei1
lsp 690,":a;chara\c_dryad_bk05.bmp",140,0
gosub *syasei2
>The overwhelming sucking sensation forces me to ejaculate surprisingly fast.\
mov %viclose,1:gosub *lose2
name "Luka"
>Ahh! Stop!\
name ""
skillname "Rose of Strangulation"
dwave 1,"se\ero_chupa6.ogg"
>The rose sucks out every drop of semen still in my urethra!
mov %damage_kotei,1
damage 120,150
skillname ""
name "Luka"
>Ahhh...\
name ""
>The rose wraps tighter around Luka!\
skillname "Rose of Strangulation"
dwave 1,"se\ero_chupa6.ogg"
>The petals close around the base of Luka's penis!\
>Like that, the suction increases!
mov %damage_kotei,1
damage 120,150
skillname ""
name "Luka"
>Stop...\
name ""
skillname "Rose of Strangulation"
dwave 1,"se\ero_chupa6.ogg"
>The rose contracts tighter!\
>From the base to the tip, Luka's penis is violently sucked!
mov %damage_kotei,1
damage 120,150
skillname ""
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1:gosub *syasei2
>It already forced me to come again...@
>But it doesn't stop attacking me even while I orgasm.\
>It doesn't seem like it will stop until there's nothing left...\
name "Luka"
>Stop already... Help...\
name ""
name $name
>....................\
name ""
>I'm not sure if she's ignoring my pleas, or if she is even capable of understanding.\
>With an expressionless face, the Chimera Dryad's rose continues to suck on Luka!\
skillname "Rose of Strangulation"
dwave 1,"se\ero_chupa6.ogg"
>The slimy insides of the rose close around Luka's penis!\
>Drawn deeper inside the flower, Luka's penis held tight!
mov %damage_kotei,1
damage 120,150
skillname ""
name "Luka"
>Faaa... Too much...\
name ""
>I writhe helplessly as the rose sucks on me.@
>But no matter what I do, the rose doesn't lose its grip.\
skillname "Rose of Strangulation"
dwave 1,"se\ero_chupa6.ogg"
>The rose continues to suck on Luka's penis!\
>Creating a vacuum around him, it forcibly squeezes out his semen!
mov %damage_kotei,1
damage 120,150
skillname ""
gosub *syasei1
lsp 690,":a;chara\c_dryad_bk06.bmp",140,0
gosub *syasei2
>The white semen bleeds out of me into the red rose.@
>Is it going to suck on me until it turns pure white...?\
name "Luka"
>Stop...@
>If this keeps going...\
name ""
skillname "Rose of Strangulation"
dwave 1,"se\ero_chupa6.ogg"
>The rose tightens around Luka's penis!\
>Oblivious to his cries, the Chimera Dryad sucks out more semen!
mov %damage_kotei,1
damage 120,150
skillname ""
gosub *syasei1:gosub *syasei2
name "Luka"
>Stop...@>I'll die...\
name ""
skillname "Rose of Strangulation"
dwave 1,"se\ero_chupa6.ogg"
>The rose tightens around Luka's penis!\
>Oblivious to his cries, the Chimera Dryad sucks out more semen!
mov %damage_kotei,1
damage 120,150
skillname ""
gosub *syasei1:gosub *syasei2
name "Luka"
>Faa...a...\
name ""
>Every time my penis loses its erection after an orgasm, the rose tightens around it, forcing it to be hard again.\
>Like that, it continues to force me to ejaculate.\
>Over, and over, and over...\
skillname "Rose of Strangulation"
dwave 1,"se\ero_chupa6.ogg"
>The rose tightens around Luka's penis!\
>It sucks out more semen!
mov %damage_kotei,1
damage 120,150
skillname ""
gosub *syasei1:gosub *syasei2
name "Luka"
>Aaa...\
name ""
>My body has lost all of its strength.@
>I've already realized that I won't escape from this alive.\
>Like this, she's going to kill me by sucking out my life itself...\
name "Luka"
>Faa.. Stop...\
name ""
>The only thing I can do is weakly beg her.\
skillname "Rose of Strangulation"
dwave 1,"se\ero_chupa6.ogg"
>The rose tightens around Luka's penis!\
>As if trying to suck out the semen straight from his balls, the rose sucks on Luka's penis!
mov %damage_kotei,1
damage 120,150
skillname ""
gosub *syasei1:gosub *syasei2
name "Luka"
>A...a...\
name ""
skillname "Rose of Strangulation"
dwave 1,"se\ero_chupa6.ogg"
>The rose tightens around Luka's penis!\
>With unfeeling mechanical motions, it continues to milk Luka!
mov %damage_kotei,1
damage 120,150
skillname ""
gosub *syasei1:gosub *syasei2
name "Luka"
>....................\
name ""
>I can't even keep my eyes open...@
>The rose is sucking everything from me...\
skillname "Rose of Strangulation"
dwave 1,"se\ero_chupa6.ogg"
>The rose sucks Luka in even deeper!\
>With forced stimulation, it sucks out Luka's semen!
mov %damage_kotei,1
damage 120,150
skillname ""
gosub *syasei1:gosub *syasei2
name "Luka"
>...U...a...\
name ""
>Orgasm after orgasm, it doesn't stop for a moment.@
gosub *syasei1:gosub *syasei2
>No matter how much I give it, it's never enough.@
gosub *syasei1:gosub *syasei2
>Endlessly squeezed, until finally...\
gosub *syasei1
lsp 700,":a;chara\c_dryad_st22.bmp",140,0:print 10,500
gosub *syasei2
>The rose has been completely dyed white.@
>My last view of the world is of that white flower of despair, as I lose consciousness.\
gosub *anten
>................\
mov %2549,%2549+1:if %2549=1 mov %count_koenemy,%count_koenemy+1
if %2549>%count_most mov %count_most,%2549:mov $count_mostname,$name
count 12,4
mov $bad1,"Luka was exhausted by the Chimera Dryad's rose."
mov $bad2," Luka was continually squeezed like that until his death."
goto *badend



*c_dryad_h

mov %skill01,6
if %2818=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2818,1
if %kousoku>0 mov %hseanwave,21:hseanwave:skip 9
name "Luka"
>Uaaa...\
name ""
>Forced to come, I'm left powerless...\
mov %hseanwave,21:hseanwave
cspl 690,699
lsp 700,":a;chara\c_dryad_st11.bmp",140,0:print 10,500
>Ivy shoots out from the Chimera Dryad, as my body is wrapped up!\
name "Luka"
>Uaaa... Stop!\
name ""
lsp 700,":a;chara\c_dryad_st12.bmp",140,0:print 10,500
>The mucus dripping from the flowers melt my clothes.@
>I twist my body to try to escape from the strange feeling of the soft flowers on my bare skin.\
name "Luka"
>Uuu...\
name ""
>The plants crawl all over my body with an eerie sensation.\
name $name
>....................\
name ""
>A flower slowly started to move toward my groin.@
>With mucus dripping from the petals, it's incredibly strange looking.\
name "Luka"
>What is that...?\
mov %hseanwave,22:hseanwave
lsp 700,":a;chara\c_dryad_st13.bmp",140,0:print 10,500
>Auuu!\
name ""
>Suddenly, the flower bites down on my penis!@
>The flower starts to suck on me as if it was a mouth.\
>The sticky mucus starts to cover my penis as the petals rub me at the same time.\
>The unexpected pleasure from the flower causes me to relax my body.\
name $name
>....................\
name ""
name "Luka"
>Faaa... That feels good...\
name ""
>The strange flower gives an irresistible pleasure.@
>Skillfully stroking and sucking on me, the flower starts to tighten around me at the same time.\
>This mysterious flower is forcing pleasure into me...\
name "Luka"
>Auuu...\
name ""
>I feel the pre-come start to leak out.@
>As soon as it starts to leak out, the flowers petals start to rub against my urethral opening, sucking up every drop as it appears.\
>The suction from the flower causes my head to go white at once.\
name "Luka"
>Ahh!!\
name ""
gosub *syasei1:gosub *syasei2
>Exploding as the flower sucks on me, it doesn't allow a single drop to escape from its suction.\
name "Luka"
>Aaa...\
name ""
>Forced to fertilize this strange flower, the immoral feelings start to build up in me.\
lsp 700,":a;chara\c_dryad_st14.bmp",140,0:print 10,500
name "Luka"
>Hrmf!\
name ""
>In the next instant, a flower covers my mouth.@
>It starts to slowly force a strange honey-like liquid into my mouth.\
name "Luka"
>Mmmfff...\
name ""
>With no choice but to drink the sweet tasting liquid, a strange numbness starts to come over my body.\
>As if becoming drunk, I feel myself start to enter some sort of trance.\
name $name
>....................\
name ""
name "Luka"
>Mmm... Mmmm...\
name ""
>Like the flower covering my groin, the one on my mouth starts to suck.\
>I feel my energy drain as the flower covering my mouth continues its strange sucking movement.\
>Slowly, a comfortable feeling of exhaustion starts to come over me.\
name "Luka"
>Mm...mmm...\
name ""
>The same feeling was being done to my lower body.@
>While sexually stimulating me, the flower is sucking out my energy.\
>As the feeling of exhaustion grows, I surrender my body to the dual suction.\
name "Luka"
>Faa...\
name ""
>I realize that this thing is going to eat me...@
>This unknown monster is going to suck out my life...\
>Even though I know my fate, I can't fight against it.@
>Surrendered to the pleasure, it's not possible to run any longer.\
>I feel myself reaching another height as the beautiful flower sucks on me.\
name "Luka"
>Ah... Ahhhh!\
name ""
>My lower back arches up as I don't even try to endure the pleasure.\
gosub *syasei1:gosub *syasei2
>As I spurt out my seed into the flower, it sucks it all up.@
>I feel nothing but pleasure as this flower sucks up all of my semen.\
name "Luka"
>Faa...\
name ""
>Drunk on pleasure, my body and mind have both surrendered.@
>Perhaps in a desperate attempt to ignore my fate, I drown myself in the ecstasy.\
name ""
name "Luka"
>Auu... That's incredible...@
>More... Suck more...\
name ""
>Already drowning in pleasure, I can't do anything but ask for more.@
>The Chimera Dryad looks at me with her apathetic eyes.\
name $name
>....................\
name ""
>...No, not apathetic. It's more robotic...@
>As if devoid of thoughts and feelings, it's just mechanically sucking out my semen...\
name ""
name "Luka"
>Aiie... Too good...\
name ""
>Not giving me a chance to rest, it continues to suck out my semen.@
>From the base to the tip, the sweet pleasure is given to every inch of my penis.\
>As if giving in to the desires of the flower, I give it more of my semen.\
gosub *syasei1:gosub *syasei2
name "Luka"
>Aaaa...\
name ""
>I don't even know how many times I've ejaculated...@
lsp 700,":a;chara\c_dryad_st15.bmp",140,0:print 10,500
>Suddenly, all of the other flowers wrap around my body!\
goto *c_dryad_hb



*c_dryad_hb

name "Luka"
>Mmmf!\
name ""
mov %hseanwave,22:hseanwave
>Countless flowers wriggle and move all over my body.@
>As if using my body as fertilizer, the flowers desperately suck every inch of my body.\
>My body writhes around as the suction brings an overpowering pleasure.\
if %hosyoku_cut=1 goto *hosyoku_cut
name "Luka"
>Mmmmfffff!!\
name ""
gosub *syasei1:gosub *syasei2
>My body goes into convulsions as the tremendous pleasure blows through my body.\
>The flower wrapped around my penis greedily sucks up everything as it's shot out.\
>As if spurred on by feeding it, the flowers only increase the force of their suction.\
name "Luka"
>Mmff!@>Mmmmffff!\
name ""
name $name
>....................\
name ""
>The mucus from the petals covers my body as the flowers move and massage me.\
>As more of the mucus covers my skin, it feels like more of my energy is leaking out.\
>As the flowers leech out the energy from every corner of my body, it feels like my entire body is one giant erogenous zone.\
>This is a coffin made of flowers...@
>A funeral of flowers... Once they wrap a man, they suck out his life...\
name "Luka"
>Mmmmmmmfff!!\
name ""
gosub *syasei1:gosub *syasei2
>Wrapped in the flowers, I feed them.@
>Stuck in this coffin of death, even my seed of life is eaten.\
>Instead of creating new life, it's only being sucked out as nourishment...\
name "Luka"
>Mmmm...\
name ""
>But my body is already addicted to this coffin.@
>Surrendered to the pleasure, I rejoice at giving it my energy.\
name ""
name "Luka"
>Mm...mmmm...\
name ""
gosub *syasei1:gosub *syasei2
>Stuck in this coffin, the only thing left for me is more pleasure.@
>My long life until now will be given to this monster as food, just to sustain it for a couple of days.\
name "Luka"
>M...mm...\
name ""
gosub *syasei1:gosub *syasei2
>I give more of my semen to the flowers.@
>The energy leaks out of my body.\
>With no energy left, the exhaustion overtakes my body.@
>With my entire body stuck in a sweet paralysis, I feel my consciousness begin to melt away.\
gosub *syasei1:gosub *syasei2
>A soft feeling of euphoria fills my mind as I'm able to orgasm a final time.\
name "Luka"
>....................\
name ""
>Stuck in that sweet, sweet intoxication, my consciousness finally fades.\
gosub *anten
mov %hseanwave,0:hseanwave
>Like that, my body and mind was sucked out by the Chimera Dryad.@
>Devoured by the unknown plant monster, I reach a tragic end.\
>..................\
goto *badend



*taran_start

mov $name,"Tarantula Girl"
mov $name2,"Tarantula Girl"
mov $lavel,"taran"
mov $tatie1,"taran_st01"
mov $tatie2,"taran_st02"
mov $tatie3,"taran_st03"
mov $tatie4,"taran_h1"
mov $haikei,"bg030"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,900
if %nanido=2 mov %max_enemylife,1125
if %nanido=3 mov %max_enemylife,1350
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,1
mov %tikei,2
gosub *maxmp:mov %mp,3
gosub *syutugen
mov $mogaku_anno1,"But Luka can't get the Tarantula Girl off of him!"
mov $mogaku_anno2,"Luka escaped from the Tarantula Girl!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Hehe... Just give up."
mov $mogaku_sel2,"Such miserable prey."
mov $mogaku_sel3,"How pathetic... I'll enjoy eating you as you struggle."
mov $mogaku_sel4,"How pathetic... I'll enjoy eating you as you struggle."
mov $mogaku_sel5,"Haha... Don't you feel horrified?"
mov $mogaku_dassyutu1,"Oh... You got away."
mov $mogaku_dassyutu2,"What a useless effort."
mov $half_s1,"Does it feel good?"
mov $half_s2,"I'll finish you off soon..."
mov $kiki_s1,"Oh? It looks like you're already starting to leak..."
mov $kiki_s2,"I'll force you to come, then make you my food..."
mov %end_n,2
mov %zmonster_x,-250
mov %tukix,290
gosub *face2
name $name
>Hehe... A delicious looking human.@
>I'll wrap you up in my silk and make you my prey...\
name "Luka"
>Are you attacking travelers one after another like that?@
>Can't you live by eating something besides humans?\
name ""
name $name
>I can eat other things... Even grass...@
>But I make it a point to only eat human males.\
>There's nothing better than eating a male as he gasps in agony.\
name ""
name "Luka"
>Then there's no issue if I fight you with everything I have!\
name ""
>I have to punish a monster like that!\
gosub *face1
goto *common_main



*taran_v

gosub *face3
name $name
>How could I lose... To a human!?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Tarantula Girl turns into a tiny spider!\
mov %viclose,1:gosub *victory
mov %getexp,1500:gosub *lvup
mov %2251,1
goto *sean0130a



*taran_kousan

gosub *kousan_syori
>Luka yields to temptation, ending his resistance!\
gosub *face2
name $name
>So you want to become my food?@
>Alright... But I'll take my time playing with you before I eat you...\
name ""
goto *taran_a



*taran_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *taran_kousan
if %cmd1=16 goto *taran_onedari
if %cmd1=17 goto *common_skill
goto *taran_main



*taran_a

if %hanyo6=1 gosub *taran_a8:goto *common_main
if %kousoku=1 rnd2 %ransu,1,2
if %kousoku=1 && %ransu=1 gosub *taran_a5:goto *common_main
if %kousoku=1 && %ransu=2 gosub *taran_a6:goto *common_main
rnd2 %ransu,1,5
if %ransu=1 gosub *taran_a1:goto *common_main
if %ransu=2 gosub *taran_a2:goto *common_main
if %ransu=3 gosub *taran_a3:goto *common_main
if %ransu=4 && %owaza_count1a>3 gosub *taran_a4:goto *common_main
if %ransu=5 && %owaza_count3a>3 gosub *taran_a7:goto *common_main
skip -6



*taran_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I wonder if you can endure it when I do this..."
if %ransu=2 mov $sel1,"Let out a scream..."
if %ransu=3 mov $sel1,"I'll force you to scream..."
name $name
eng $sel1:$sel6\
name ""
skillname "Tarantula Caress"
dwave 1,"se\umaru.ogg"
eng "The Tarantula Girl's eight legs caress Luka!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,33
if %wind=1 && %nanido=2 mov %wind_kakuritu,33
if %wind=1 && %nanido=3 mov %wind_kakuritu,16
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But a gust of wind blows them away!":gosub *wind_guard:sub %stack,1:return
\
>Her legs relentlessly attack Luka's groin!
skillcount1 3196
if %nanido<2 damage 20,24
if %nanido=2 damage 30,36
if %nanido=3 damage 40,48
skillname ""
if %mylife=0 sub %stack,1:return *taran_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*taran_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll defeat you like this..."
if %ransu=2 mov $sel1,"If I do this, can I suck out your semen right away...?"
if %ransu=3 mov $sel1,"It's fine if you want to surrender in my mouth..."
name $name
eng $sel1:$sel6\
name ""
skillname "Tarantula Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>The Tarantula Girl forces her face into Luka's groin, and starts to suck on Luka's penis!
if %wind=1 && %nanido<2 mov %wind_kakuritu,33
if %wind=1 && %nanido=2 mov %wind_kakuritu,33
if %wind=1 && %nanido=3 mov %wind_kakuritu,16
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But a gust of wind forces her back!":gosub *wind_guard:sub %stack,1:return
skillcount1 3197
if %nanido<2 damage 22,26
if %nanido=2 damage 33,39
if %nanido=3 damage 44,52
skillname ""
if %mylife=0 sub %stack,1:return *taran_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*taran_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Do you want to be crushed by my breasts...?"
if %ransu=2 mov $sel1,"I'll crush your penis with my breasts..."
if %ransu=3 mov $sel1,"I'll crush you with my breasts..."
name $name
eng $sel1:$sel6\
name ""
skillname "Breast Pressure Hell"
dwave 1,"se\ero_makituki5.ogg"
eng "Luka's entire body is pressed under the Tarantula Girl's breasts!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,33
if %wind=1 && %nanido=2 mov %wind_kakuritu,33
if %wind=1 && %nanido=3 mov %wind_kakuritu,16
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But a gust of wind pushes her off!":gosub *wind_guard:sub %stack,1:return
\
>Luka's penis is crushed between her breasts!
skillcount1 3176
if %nanido<2 damage 24,28
if %nanido=2 damage 35,41
if %nanido=3 damage 47,55
skillname ""
if %mylife=0 sub %stack,1:return *taran_h8
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*taran_a4

add %stack,1
if %kousan=2 skip 7
name $name
if %first_sel1=1 skip 3
>I'll take the top...\
skip 2
>I'll get on top again...\
name ""
skillname "Tarantula Hold"
eng "The Tarantula Girl crawls over Luka, and holds him down with her eight legs!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,33
if %wind=1 && %nanido=2 mov %wind_kakuritu,33
if %wind=1 && %nanido=3 mov %wind_kakuritu,16
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But a gust of wind forces her back!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>Luka's body is held down by the Tarantula Girl!\
skillname ""
if %kousan=2 sub %stack,1:return
gosub *face2
name $name
if %first_sel1=1 skip 4
>Now, I'll play with you...@
>Enjoy it... No matter what you do, I'll make you my food...\
skip 3
>I won't let you go this time.@
>I'll weaken you by forcing you to come before I eat you...\
name ""
mov %first_sel1,1
if %nanido<2 mov %genmogaku,2
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,3
sub %stack,1
return



*taran_a5

add %stack,1
>The Tarantula Girl is on top of Luka!\
skillcount1 3198
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"How does it feel to be played with while unable to do anything?"
if %ransu=2 mov $sel1,"I'll make you a little more... Comfortable."
if %ransu=3 mov $sel1,"Hahaha... Does it feel good?"
name $name
eng $sel1:$sel6\
name ""
skillname "Restrained Tarantula Caress"
dwave 1,"se\umaru.ogg"
>The eight legs of the Tarantula Girl rub Luka's penis!
if %nanido<2 damage 20,24
if %nanido=2 damage 30,36
if %nanido=3 damage 40,48
skillname ""
if %mylife=0 sub %stack,1:return *taran_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*taran_a6

add %stack,1
>The Tarantula Girl is on top of Luka!\
skillcount1 3199
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll torture your genitals...":mov $sel2,"Spider silk wraps around Luka's penis!"
if %ransu=2 mov $sel1,"Succumb to the torture and become my food...":mov $sel2,"The sticky spider silk gives a strange pleasure to Luka!"
if %ransu=3 mov $sel1,"Aren't you humiliated by being toyed with like this?":mov $sel2,"The spider silk wraps tightly around Luka's penis!"
if %ransu=4 mov $sel1,"Are you feeling good while being tortured? How miserable.":mov $sel2,"The sticky silk gives a strange pleasure to Luka!"
if %ransu=5 mov $sel1,"I can even torture you with my silk...":mov $sel2,"A strange pleasure fills Luka as the silk covers his penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Tarantula Torture"
dwave 1,"se\ero_ito.ogg"
if %kousan=2 && %hanyo1=1 skip 3
lsp 690,":a;chara\kumo_ct01.bmp",0,0:print 10,500
if %kousan=2 mov %hanyo1,1
lsp 690,":a;chara\kumo_ct02.bmp",0,0:print 10,500
>The Tarantula Girl shoots spider silk on Luka!\
eng $sel2:$sel6
if %nanido<2 damage 27,31
if %nanido=2 damage 40,46
if %nanido=3 damage 54,62
skillname ""
if %mylife=0 sub %stack,1:return *taran_h4
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*taran_a7

add %stack,1
name $name
>I'll give you some of my exceptionally thick silk...\
name ""
skillname "Viscous Silk Preparation"
>The Tarantula Girl's spinneret takes careful aim at Luka!\
mov %hanyo6,1
skillname ""
if %wind=1 sub %stack,1:return
name "Luka"
>The wind feels strange...\
name ""
name "Sylph"
>Luka... Call me...\
name ""
>I faintly hear Sylph's voice on the wind.\
sub %stack,1
return



*taran_a8

add %stack,1
mov %owaza_count3a,0
mov %hanyo6,0
if %kousan=2 skip 4
name $name
>I'll cover you with my best silk, then flood you with pleasure...\
name ""
skillname "Viscous Silk Spray"
dwave 1,"se\ero_ito.ogg"
>Spider silk shoots out of the Tarantula Girl's spinneret!
if %wind=1 && %nanido<2 mov %wind_kakuritu,100
if %wind=1 && %nanido=2 mov %wind_kakuritu,100
if %wind=1 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But it was blown away by the wind!":gosub *wind_guard:sub %stack,1:return
damage 15,19
mov $tatie4,"taran_h2"
mov %kousoku,2:gosub *status_print
mov %genmogaku,100
>Luka's body is covered in sticky spider silk!\
skillname ""
if %mylife=0 sub %stack,1:return *taran_h5
name "Luka"
>Ahhhh!\
name ""
>The viscous silk covers my body in an instant.@
>With it all over me, I'm unable to move even a finger.\
name $name
>Haha... How do you like my silk?@
>Squeezing you nice and tight while stopping your movements...\
>Now, shall I violate you?@
>You don't have a choice...@> I'll wring everything from you...@> Hahaha!\
name ""
skillcount1 3200
skillname "Tarantula Rape"
dwave 1,"se\ero_pyu4.ogg"
lsp 690,":a;chara\taran_ct01.bmp",0,0:print 10,500
mov %kousoku,3
>The Tarantula Girl slowly forces Luka's penis into her spinneret!
mov %damage_kotei,1
damage 35,41
skillname ""
>Luka is being raped by the Tarantula Girl!\
if %mylife=0 sub %stack,1:return *taran_h6
name "Luka"
>Ahhhh!!\
name ""
>I'm instantly attacked by her sticky insides, with small bumps and creases wrapping around me.\
>But it isn't just her flesh wrapping around my penis, I'm forced into a giant ball sticky silk inside of her.\
name $name
>Well? How is my spinneret?@
>It isn't used for mating, but it still should feel good...\
>It's more than enough for a pathetic man like you.\
name ""
sub %stack,1
goto *taran_a9



*taran_a9

add %stack,1
>Luka is being raped by the Tarantula Girl!\
skillcount1 3200
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Surrender to the pleasure...":mov $sel2,"The Tarantula Girl moves, forcing the bumps inside of her to rub against Luka!"
if %ransu=2 mov $sel1,"I'll tighten, and force it out...":mov $sel2,"The Tarantula Girl tightens around Luka's penis!"
if %ransu=3 mov $sel1,"You'll love my silk...":mov $sel2,"The sticky silk inside the Tarantula Girl gives a strange pleasure to Luka!"
if %ransu=4 mov $sel1,"I'll play with the weak point...":mov $sel2,"The flesh around the tip of Luka's penis tightens!"
if %ransu=5 mov $sel1,"Can you endure it if I do this...?":mov $sel2,"The Tarantula Girl starts to contract around Luka's penis in waves!"
name $name
eng $sel1:$sel6\
name ""
skillname "Tarantula Rape"
dwave 1,"se\ero_pyu4.ogg"
eng $sel2:$sel6
mov %damage_kotei,1
damage 35,41
skillname ""
if %mylife=0 sub %stack,1:return *taran_h7
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
goto *taran_a9



*taran_onedari

mov $list1,"Tarantula Caress"
if %3196>0 mov %list_num1,1
mov $list2,"Tarantula Blowjob"
if %3197>0 mov %list_num2,1
mov $list3,"Breast Pressure Hell"
if %3176>0 mov %list_num3,1
mov $list4,"Restrained Tarantula Caress"
if %3198>0 mov %list_num4,1
mov $list5,"Tarantula Torture"
if %3199>0 mov %list_num5,1
mov $list6,"Tarantula Rape"
if %3200>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *taran_onedari1
if %cmd1=12 goto *taran_onedari2
if %cmd1=13 goto *taran_onedari3
if %cmd1=14 goto *taran_onedari4
if %cmd1=15 goto *taran_onedari5
if %cmd1=16 goto *taran_onedari6
if %cmd1=-1 goto *taran_main
goto *taran_onedari



*taran_onedari1

gosub *onedari_syori
gosub *face2
name $name
>You want to be exhausted by my legs?@
>Then I'll let you reach your end as you desire...\
name ""
gosub *taran_a1
skip -1



*taran_onedari2

gosub *onedari_syori
gosub *face2
name $name
>You want to be exhausted by my mouth?@
>Then I'll let you reach your end as you desire...\
name ""
gosub *taran_a2
skip -1



*taran_onedari3

gosub *onedari_syori
gosub *face2
name $name
>You want to be crushed by my breasts?@
>Then I'll let you reach your end as you desire...\
name ""
gosub *taran_a3
skip -1



*taran_onedari4

gosub *onedari_syori_k
gosub *face2
name $name
>You want me to play with you after restraining you?@
>You're quite a masochist...\
name ""
if %kousoku=0 gosub *taran_a4
gosub *taran_a5
skip -1



*taran_onedari5

gosub *onedari_syori_k
gosub *face2
name $name
>You want my silk to torture your penis?@
>Desiring something like that... You're quite a pervert.\
name ""
if %kousoku=0 gosub *taran_a4
gosub *taran_a6
skip -1



*taran_onedari6

gosub *onedari_syori
gosub *face2
name $name
>You want to be violated by me...?@
>Then I'll squeeze out your semen before I eat you...\
name ""
gosub *taran_a8



*taran_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\taran_bk04.bmp",0,0
gosub *syasei2
>Caressed by all eight of her legs, Luka finally ejaculated.\
mov %viclose,1:gosub *lose
mov %2551,%2551+1:if %2551=1 mov %count_koenemy,%count_koenemy+1
if %2551>%count_most mov %count_most,%2551:mov $count_mostname,$name
count 28,4
mov $bad1,"Luka succumbed to the Tarantula Girl's eight-legged caress."
mov $bad2," Luka's semen was continually squeezed out until his death."
gosub *face2
name $name
>You shot it out...@
>Was my caress too much for you?\
name ""
goto *taran_h



*taran_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\taran_bk01.bmp",0,0
gosub *syasei2
>Sucked by the Tarantula Girl, Luka finally ejaculated.\
mov %viclose,1:gosub *lose
mov %2551,%2551+1:if %2551=1 mov %count_koenemy,%count_koenemy+1
if %2551>%count_most mov %count_most,%2551:mov $count_mostname,$name
count 4,4
mov $bad1,"Luka succumbed to the Tarantula Girl's blowjob."
mov $bad2," Luka's semen was continually squeezed out until his death."
gosub *face2
name $name
>You shot it out...@
>Was my mouth too much for you?\
name ""
goto *taran_h



*taran_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>Caressed by all eight of her legs, Luka finally ejaculated.\
mov %viclose,1:gosub *lose
mov %2551,%2551+1:if %2551=1 mov %count_koenemy,%count_koenemy+1
if %2551>%count_most mov %count_most,%2551:mov $count_mostname,$name
count 28,4
mov $bad1,"Bound by the Tarantula Girl, Luka was forced to come by her eight-legged caress."
mov $bad2," Luka's semen was continually squeezed out until his death."
name $name
>Haha... While unable to move, you still came.@
>How miserable...\
name ""
goto *taran_h



*taran_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\kumo_ct03.bmp",0,0
gosub *syasei2
lsp 690,":a;chara\kumo_ct04.bmp",0,0:print 10,500
>With the sticky silk being sprayed on his penis, Luka was forced to come.\
mov %viclose,1:gosub *lose
mov %2551,%2551+1:if %2551=1 mov %count_koenemy,%count_koenemy+1
if %2551>%count_most mov %count_most,%2551:mov $count_mostname,$name
count 20,4
mov $bad1,"Luka succumbed to the Tarantula Girl's torture."
mov $bad2," Luka's semen was continually squeezed out until his death."
name $name
>Letting it out while I cover your penis with silk...@
>How miserable...\
name ""
csp 690:print 10,500
goto *taran_h



*taran_h5

mov %ikigoe,3:gosub *ikigoe
name $name
>Oh...?\
name ""
gosub *syasei1:gosub *syasei2
>As soon as the viscous silk covered Luka's body, he accidentally ejaculated.\
mov %viclose,1:gosub *lose
mov %2551,%2551+1:if %2551=1 mov %count_koenemy,%count_koenemy+1
if %2551>%count_most mov %count_most,%2551:mov $count_mostname,$name
mov %count_bouhatu,%count_bouhatu+1
count 20,4
mov $bad1,"As soon as the silk touched him, Luka accidentally ejaculated."
mov $bad2," Luka's semen was continually squeezed out until his death."
name $name
>Letting it out as soon as the silk touches you...@
>You're pathetic.\
name ""
goto *taran_h



*taran_h6

mov %ikigoe,3:gosub *ikigoe
name $name
>Oh...? How fast...\
name ""
gosub *syasei1
lsp 700,":a;chara\taran_h3.bmp",0,0
lsp 690,":a;chara\taran_ct02.bmp",0,0
gosub *syasei2
>As soon as Luka was inserted into the Tarantula Girl's spinneret, he accidentally ejaculated.\
mov %viclose,1:gosub *lose
mov %2551,%2551+1:if %2551=1 mov %count_koenemy,%count_koenemy+1
if %2551>%count_most mov %count_most,%2551:mov $count_mostname,$name
mov %count_bouhatu,%count_bouhatu+1
count 2,4
mov $bad1,"Luka accidentally ejaculated as soon as he was inserted into the Tarantula Girl's spinneret."
mov $bad2," Luka's semen was continually squeezed out until his death."
name $name
>Coming just from insertion...@
>You're pathetic.\
>But the real thing starts now...\
name ""
>The Tarantula Girl forces me all the way inside of her!\
goto *taran_h



*taran_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\taran_h3.bmp",0,0
lsp 690,":a;chara\taran_ct02.bmp",0,0
gosub *syasei2
>While being raped by the Tarantula Girl, Luka was forced to come.\
mov %viclose,1:gosub *lose
mov %2551,%2551+1:if %2551=1 mov %count_koenemy,%count_koenemy+1
if %2551>%count_most mov %count_most,%2551:mov $count_mostname,$name
count 2,4
mov $bad1,"While being raped by the Tarantula Girl, Luka was forced to come."
mov $bad2," Luka's semen was continually squeezed out until his death."
name $name
>You let everything out inside of me...@
>Did you enjoy it?\
>More... I'll drown you in more pleasure...\
name ""
>The Tarantula Girl forces me all the way inside of her!\
goto *taran_h



*taran_h8

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\taran_bk05.bmp",0,0
gosub *syasei2
>While being crushed by her breasts, Luka is forced to ejaculate!\
mov %viclose,1:gosub *lose
mov %2551,%2551+1:if %2551=1 mov %count_koenemy,%count_koenemy+1
if %2551>%count_most mov %count_most,%2551:mov $count_mostname,$name
count 7,4
mov $bad1,"With his whole body crushed by her breasts, Luka was forced to come."
mov $bad2," Luka's semen was continually squeezed out until his death."
gosub *face2
name $name
>You shot it out...@
>Were my breasts too much for you?\
name ""
goto *taran_h



*taran_h

if %2551=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku=3 mov %hseanwave,12:hseanwave:goto *taran_hb
>While giggling, the Tarantula Girl turns her spinneret towards me...@
dwave 1,"se\ero_ito.ogg"
>...And shoots her sticky spider silk all over my body!\
name "Luka"
>Uwaa!\
name ""
>The sticky silk quickly entangles my entire body.@
>The frighteningly powerful silk doesn't even let me move a finger.\
>Even more, the sticky silk felt slightly soft and wet.@
>It's as if I was stuck inside a giant tongue, tightly squeezing me.\
name $name
>How does my silk feel?@
>Are you struggling in bliss at the pleasure of being completely bound?\
>Stuck like that, I'll violate you...@
>I'll suck out everything from you...\
name ""
cspl 690,699
lsp 700,":a;chara\taran_h2.bmp",0,0:print 10,500
>The Tarantula Girl presses her abdomen into me.\
name "Luka"
>Aaaa...\
name ""
mov %hseanwave,12:hseanwave
lsp 690,":a;chara\taran_ct01.bmp",0,0:print 10,500
>She slowly forces me into her spinneret.\
>At first, the tightness inside of her was too much.@
>But as I'm forced deeper inside, the feelings slowly started to change.\
goto *taran_hb



*taran_hb

name "Luka"
>Ahhh!!\
name ""
>Entangled inside of her, it feels surprisingly cool.\
>The silk inside of her starts to move around as it sticks to my penis.\
>More and more of the silk is wrapped tighter around me.\
name $name
>Does my spinneret feel good?@
>Inside of it, I can move the silk as I want...\
name ""
>The Tarantula Girl starts to move as she sneers at me.\
>I can feel the bumps and creases of her flesh through the silk rubbing against me with every movement.\
name "Luka"
>Auuuu!!\
name ""
>A muscle is poking me like a finger right on the back of my penis.@
>Every movement forces it to poke into me through the silk, rubbing me up and down.\
>In addition, tiny bumps cover the walls of her spinneret, each one pushing through the spider silk, forcing a strange pleasure into me.\
>The strange stimulation forced into me by this strange hole causes my body to shiver.\
>The complex combinations of stimulations forces me to the edge of another orgasm.\
name "Luka"
>Stop... Stop this...@
>Or... I'm going to come again...!\
name ""
name $name
>Every man that I catch like this gives in eventually...@
>I'll suck you dry as well, just like the others...\
name ""
>This combination of bumps, creases and sticky silk being forced into me by this insect monster is bringing me a pleasure unable to be duplicated by a human female.\
>Finally surrendering to this bizarre stimulation, I give in to the desire to release.\
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\taran_h3.bmp",0,0
lsp 690,":a;chara\taran_ct02.bmp",0,0
gosub *syasei2
>Wrapped in her silk inside of her spinneret, I ejaculate.@
>As the sweet feelings of the orgasm come over me, they mix with the disgrace of being forced to give in like this.\
>My body trembles as my semen shoots out into this insect...\
name $name
>Ah... You put out quite a lot.@
>Enjoying being raped by a spider so much...@>Shall I let you taste more?\
name ""
name "Luka"
>Eh? Ah!@>Ahhh!!\
name ""
>The entrance to her hole sharply tightens up around the base of my penis.@
>Now fixed at the root, I can't even move inside of her.\
>Stuck like that, her insides start to slowly shrink.\
name "Luka"
>Auu... What are you doing...?\
name ""
name $name
>Didn't I just say it...?@
>You're enjoying being raped by a spider so much, that I'll let you taste more...\
name ""
>The next moment after saying that...@
mov %hseanwave,13:hseanwave
>She sprays more sticky silk all over my penis!\
name "Luka"
>Aiiee!\
name ""
>The moist, sticky silk coils tightly around me.@
>My waist shakes at the unexpected pleasure attacking me.\
>But completely stuck inside of her, there's no escape from it.\
name $name
>Every piece of silk that covers you leads you closer to death...@
>I'll spray more... Once you're covered too much, you won't even be able to pull out of me even if I loosened up...\
name ""
name "Luka"
>Haa!!\
name ""
>She sprays out more sticky silk over me, wrapping me even tighter.@
>My body shakes pathetically as I'm attacked by the stimulation.\
>The silk tightens around me as I feel more and more of it pile on.@
>It's as if the soft silk is making my penis even larger inside of her, as the creases and bumps from her fleshy walls push even harder into me.\
name $name
>How is it?@> Having your proof of manhood covered in my silk?@
>Is it miserable?@> Or did you stop caring because it feels too good?\
name ""
name "Luka"
>Auu...@> Please... Stop...\
name ""
name $name
>No.@
>Just for that, I'll give you even more...\
name ""
>More of her silk is sprayed on my penis, as the squeezing sensation only increases.\
name "Luka"
>Hauuu!\
name ""
>She pauses for a few seconds, then starts again and sprays even more.@
>Rolling up my penis tighter and tighter, I can already feel that there's no way to get out of her.\
name "Luka"
>Auuu... The silk... Too good...\
name ""
name $name
>...I see, so it does feel good.@
>Then, shall I force you to come now?\
name ""
>Aiming right at the tip of my penis, more silk sprays out inside of her.@
>The moist sticky silk wraps tighter around my tip.@
>Unable to take it any longer, it finally sends me over the limit.\
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\taran_h4.bmp",0,0
lsp 690,":a;chara\taran_ct03.bmp",0,0
gosub *syasei2
>The semen forces a hole through the silk as all of it pours into the Tarantula Girl's spinneret.\
name $name
>Mmm... Delicious male extract...@
>But play time is over.\
>I'm hungry, so I'm going to suck you dry now...\
name ""
>In the next moment, her spinneret starts to violently wriggle!\
name "Luka"
>Ahhh!!\
name ""
>As if in a whirlpool, the silk swirls and rotates around me.@
>Shrinking around me, the bumps and creases inside of her are massaging me in a circle.\
name $name
>If I do this, there's no way you can hold out...@
>Just like this, I'll squeeze every drop out of you!\
name ""
name "Luka"
>Ah! Auu!@> Auuu!!\
name ""
>With all of the features of her spinneret amplified by the silk covering me, I'm quickly brought to another height in her rotating whirlpool.\
name "Luka"
>Ah...Ahhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\taran_h5.bmp",0,0
lsp 690,":a;chara\taran_ct04.bmp",0,0
gosub *syasei2
>I yield right away to the building desire to release, as I give all of my semen to her mixer...\
name "Luka"
>Stop... This...\
name ""
name $name
>I won't stop.@
>I'm going to suck you dry in here.\
>Are you scared?@>Are you mortified?@
>Or does it feel too good for you to care?\
name ""
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1:gosub *syasei2
>No matter how much I try, I can't endure the stimulation.@
>Stuck in her spinneret, I'm forced to orgasm.\
>Completely bound by her spider silk, I can't even move my body.@
>Completely at her mercy, there's no escape from this...\
name "Luka"
>Auu... I'm coming again...\
name ""
gosub *syasei1:gosub *syasei2
>Inside of her pleasure mixer, more of my semen is forced out.@
>Every time I ejaculate in her, I can feel my body weaken.\
name "Luka"
>Stop please...@> Any more than this and...\
name ""
name $name
>If you don't want to die, all you have to do is endure it.@
>But that might be impossible...\
name ""
name "Luka"
>Ahhhh...\
name ""
gosub *syasei1:gosub *syasei2
>While the Tarantula Girl laughs at me, I'm forced to come again.@
>With it already as if I was out of semen, it's like my energy is shooting out instead now.\
name "Luka"
>Auuu...\
name ""
>With my strength rapidly vanishing, my vision starts to go hazy.@
>The pleasure being forced into me is making my mind and body melt...\
gosub *syasei1:gosub *syasei2
name $name
>More... Shoot out more...@
>While tasting heaven, shrivel up until nothing is left...\
name ""
name "Luka"
>Ahh...\
name ""
gosub *syasei1:gosub *syasei2
>Stuck in pleasure, my life is sucked out.@
>Squeezing out everything, my body is left dry.\
gosub *syasei1:gosub *syasei2
>Feeling my body get colder, a final orgasm comes over me.@
>Finally, my consciousness slowly fades into nothingness.\
gosub *anten
mov %hseanwave,0:hseanwave
name $name
>...There's nothing left.@
>You were delicious.\
name ""
>With all of my body fluids sucked up, my shriveled body was left there.@
>Thus another victim of the Tarantula Girl met their end...\
>...................\
goto *badend



*mino_start

mov $name,"Minotauros"
mov $name2,"Minotauros"
mov $lavel,"mino"
mov $tatie1,"mino_st01"
mov $tatie2,"mino_st02"
mov $tatie3,"mino_st03"
mov $tatie4,"mino_st02"
mov $haikei,"bg019"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,1200
if %nanido=2 mov %max_enemylife,1500
if %nanido=3 mov %max_enemylife,1800
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,1
mov %tikei,0
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka is forcibly held down!"
mov $mogaku_anno3,"But Luka is forcibly held down!"
mov $mogaku_sel1,"Hahahaha! You're so clumsy!"
mov $mogaku_sel2,"You can't do anything but get raped, now!"
mov $mogaku_sel3,"Look at you struggling so much! The only thing waiting for you is a milking."
mov $mogaku_sel4,"Hahaha... Are you frustrated?"
mov $mogaku_sel5,"What a nice face... It makes me want to violate you..."
mov $half_s1,"You look like you're in pain..."
mov $half_s2,"Shall I make you orgasm to relieve it?"
mov $kiki_s1,"Are you already giving up?"
mov $kiki_s2,"Haha... Just shoot it out!"
mov %end_n,2
mov %zmonster_x,-320
name $name
>Oh ho... A healthy looking male.@
>I'll rape you.\
name ""
name "Luka"
>....................\
name ""
>Another monster stating her intentions pretty clearly...@
>Dangerous monsters like her need to be rooted out!\
mov %sinkou,1
goto *common_main



*mino_v

gosub *face3
name $name
>To such a tiny boy...!?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Minotauros turned into a calf!\
mov %viclose,1:gosub *victory
mov %getexp,1600:gosub *lvup
mov %2252,1
goto *sean0131



*mino_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 goto *common_mogaku
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *mino_kousan
if %cmd1=16 goto *mino_onedari
if %cmd1=17 goto *common_skill
goto *mino_main



*mino_kousan

gosub *kousan_syori
>Luka yields to the temptation, ending his resistance!\
gosub *face2
name $name
>Did you give up?@> Then I'll rape you as much as I want!@
>Even if you cry, I won't let you go!\
name ""
goto *mino_a



*mino_a

if %kousoku=1 gosub *mino_a8:goto *common_main
if %status=2 gosub *mino_a7:goto *common_main
rnd2 %ransu,1,6
if %ransu=1 gosub *mino_a1:goto *common_main
if %ransu=2 gosub *mino_a2:goto *common_main
if %ransu=3 gosub *mino_a3:goto *common_main
if %ransu=4 gosub *mino_a4:goto *common_main
if %ransu>4 && %owaza_count3a>3 gosub *mino_a5:goto *common_main
skip -6



*mino_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll milk you with my hand!"
if %ransu=2 mov $sel1,"My handjobs are intense... I wonder if you'll endure it?"
if %ransu=3 mov $sel1,"I'll squeeze it out!"
name $name
eng $sel1:$sel6\
name ""
skillname "Strong Handjob"
dwave 1,"se\ero_koki1.ogg"
eng "The Minotauros tightly grabs onto Luka's penis!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,10
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushed her hand away!":gosub *wind_guard:sub %stack,1:return
\
>The Minotauros violently pumps him!
skillcount1 3201
if %nanido<2 damage 20,25
if %nanido=2 damage 30,37
if %nanido=3 damage 40,50
skillname ""
if %mylife=0 sub %stack,1:return *mino_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*mino_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll squeeze you between my thighs..."
if %ransu=2 mov $sel1,"You'll love this..."
if %ransu=3 mov $sel1,"I'll crush it as hard as I can..."
name $name
eng $sel1:$sel6\
name ""
skillname "Furious Intercrural"
dwave 1,"se\ero_koki1.ogg"
eng "The Minotauros puts Luka's penis between her thighs!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,10
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushed her away!":gosub *wind_guard:sub %stack,1:return
\
>She crushes Luka's penis between her warm thighs!
skillcount1 3202
if %nanido<2 damage 22,27
if %nanido=2 damage 33,40
if %nanido=3 damage 44,54
skillname ""
if %mylife=0 sub %stack,1:return *mino_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*mino_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Here... Aren't my breasts amazing?"
if %ransu=2 mov $sel1,"Hehe... Do you want me to crush you in my cleavage?"
if %ransu=3 mov $sel1,"I'll crush you in my breasts..."
name $name
eng $sel1:$sel6\
name ""
skillname "Busty Tit Fuck"
dwave 1,"se\ero_koki1.ogg"
eng "The Minotauros puts Luka's penis between her breasts!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,10
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes her back!":gosub *wind_guard:sub %stack,1:return
\
>The Minotauros crushes Luka's dick as she moves her breasts up and down!
skillcount1 3203
if %nanido<2 damage 24,29
if %nanido=2 damage 36,43
if %nanido=3 damage 48,58
skillname ""
if %mylife=0 sub %stack,1:return *mino_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*mino_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck out all your semen!"
if %ransu=2 mov $sel1,"I'll suck everything out like a vacuum!"
if %ransu=3 mov $sel1,"Just shoot out everything into my mouth!"
name $name
eng $sel1:$sel6\
name ""
skillname "Ferocious Blowjob"
dwave 1,"se\ero_buchu3.ogg"
eng "The Minotauros forces Luka's penis into her mouth!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,10
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes her back!":gosub *wind_guard:sub %stack,1:return
\
>She sucks on him like a vacuum!
skillcount1 3204
if %nanido<2 damage 26,31
if %nanido=2 damage 39,46
if %nanido=3 damage 52,62
skillname ""
if %mylife=0 sub %stack,1:return *mino_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*mino_a5

add %stack,1
mov %owaza_count3a,0
name $name
>It's about time to end this...@
>First I'll stop your movement!\
name ""
skillname "Minotauros Crash"
>The Minotauros slams the blunt side of her ax down on Luka!
if %wind=1 && %nanido<2 mov %wind_kakuritu,100
if %wind=1 && %nanido=2 mov %wind_kakuritu,100
if %wind=1 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes away her ax!":gosub *wind_guard:skillname "":sub %stack,1:goto *mino_a6
mov %a_effect1,1
damage 70,80
skillname ""
if %mylife=0 sub %stack,1:return *mino_h5
mov %status,2:gosub *status_print
>Luka is paralyzed by the powerful blow!\
mov %status_turn,2
if %nanido=2 mov %status_turn,3
if %nanido=3 rnd2 %status_turn,4,5
name "Luka"
>Aguh!@>Uhg....\
name ""
>I fall to the ground instantly after being slammed by her ax.@
>Exploiting that opening, the Minotauros leans over me.\
sub %stack,1
return



*mino_a6

add %stack,1
lsp 700,":a;chara\mino_st04.bmp",0,0:print 10,500
name $name
if %first_sel1=1 skip 4
>What the...!?@
>You have some weird skill!\
skip 2
>Bah! You did it again!\
name ""
mov %first_sel1,1
gosub *face1
sub %stack,1
return



*mino_a7

add %stack,1
name $name
>Haha! Get ready!\
name ""
>The Minotauros is leaning on Luka!\
name $name
>Now I'll rape you as much as I want!@
>It's really tight inside me, so get ready!\
name ""
skillcount1 3205
skillname "Minotauros Rape"
>The Minotauros slams her waist down on Luka!\
dwave 1,"se\ero_pyu1.ogg"
>Luka's penis is forced into her tight vagina!
mov %damage_kotei,1
damage 37,45
lsp 690,":a;chara\mino_ct11.bmp",503,0
mov %kousoku,1:gosub *status_print
skillname ""
if %mylife=0 sub %stack,1:return *mino_h6
>Luka is being raped by the Minotauros!\
name "Luka"
>Haaaaaa!!\
name ""
>As if being strangled, her soft walls are squeezing down on my penis with an intense force.\
if %nanido<2 mov %genmogaku,100
if %nanido=2 mov %genmogaku,100
if %nanido=3 mov %genmogaku,100
sub %stack,1
return



*mino_a8

add %stack,1
skillcount1 3205
>Luka is being raped by the Minotauros!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll violate you even more!":mov $sel2,"The Minotauros violently shakes her waist!"
if %ransu=2 mov $sel1,"You won't be able to last when I tighten it even more...":mov $sel2,"The Minotauros soft walls tighten around Luka's penis!"
if %ransu=3 mov $sel1,"How does it feel to be raped like this?":mov $sel2,"The Minotauros bounces up and down as squeezes Luka's penis!"
if %ransu=4 mov $sel1,"I'll bully your weak penis inside of me!":mov $sel2,"The Minotauros grinds her waist against Luka!"
if %ransu=5 mov $sel1,"I'll make you come like this!":mov $sel2,"The Minotaur tightens around Luka's penis, as if strangling it!"
name $name
eng $sel1:$sel6\
name ""
skillname "Minotauros Rape"
dwave 1,"se\ero_chupa5.ogg"
eng $sel2:$sel6
mov %damage_kotei,1
damage 37,45
skillname ""
if %mylife=0 sub %stack,1:return *mino_h7
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*mino_onedari

mov $list1,"Strong Handjob"
if %3201>0 mov %list_num1,1
mov $list2,"Furious Intercrural"
if %3202>0 mov %list_num2,1
mov $list3,"Busty Tit Fuck"
if %3203>0 mov %list_num3,1
mov $list4,"Ferocious Blowjob"
if %3204>0 mov %list_num4,1
mov $list5,"Minotauros Rape"
if %3205>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *mino_onedari1
if %cmd1=12 goto *mino_onedari2
if %cmd1=13 goto *mino_onedari3
if %cmd1=14 goto *mino_onedari4
if %cmd1=15 goto *mino_onedari5
if %cmd1=-1 goto *mino_main
goto *mino_onedari



*mino_onedari1

gosub *onedari_syori
name $name
>You want to give in to my hand?@
>Then... I'll squeeze everything out of you without holding back!\
name ""
gosub *mino_a1
skip -1



*mino_onedari2

gosub *onedari_syori
name $name
>You want to give in to my thighs?@
>Then... I'll squeeze everything out of you without holding back!\
name ""
gosub *mino_a2
skip -1



*mino_onedari3

gosub *onedari_syori
name $name
>You want to give in to my chest?@
>Then... I'll squeeze everything out of you without holding back!\
name ""
gosub *mino_a3
skip -1



*mino_onedari4

gosub *onedari_syori
name $name
>You want to give in to my mouth?@
>Then... I'll suck everything out of you without holding back!\
name ""
gosub *mino_a4
skip -1



*mino_onedari5

gosub *onedari_syori_k
name $name
>You want me to violate you?@
>Then... I'll strangle everything out of you without holding back!\
name ""
if %kousoku=0 gosub *mino_a7
gosub *mino_a8
skip -1



*mino_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\mino_st11.bmp",0,0
lsp 694,":a;chara\mino_bk04.bmp",0,0
gosub *syasei2
>Violently stroked by her hand, Luka is forced to ejaculate.\
mov %viclose,1:gosub *lose
mov %2552,%2552+1:if %2552=1 mov %count_koenemy,%count_koenemy+1
if %2552>%count_most mov %count_most,%2552:mov $count_mostname,$name
count 5,3
mov $bad1,"Luka succumbed to the Minotauros' handjob."
mov $bad2," After that, Luka was taken back to her den and lived out the rest of his life as her sex slave."
name $name
>Haha... You shot it out.@
>Well? Did it feel good?\
name ""
goto *mino_h



*mino_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\mino_bk03.bmp",0,0
gosub *syasei2
>Squeezed by her thighs, Luka is forced to ejaculate.\
mov %viclose,1:gosub *lose
mov %2552,%2552+1:if %2552=1 mov %count_koenemy,%count_koenemy+1
if %2552>%count_most mov %count_most,%2552:mov $count_mostname,$name
count 3,3
mov $bad1,"Luka succumbed to the Minotauros' intercrural sex."
mov $bad2," After that, Luka was taken back to her den and lived out the rest of his life as her sex slave."
gosub *face2
name $name
>Haha... You shot it out.@
>Well? Did it feel good?\
name ""
goto *mino_h



*mino_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\mino_bk02.bmp",0,0
gosub *syasei2
>With his penis being crushed by her breasts, Luka is forced to ejaculate.\
mov %viclose,1:gosub *lose
mov %2552,%2552+1:if %2552=1 mov %count_koenemy,%count_koenemy+1
if %2552>%count_most mov %count_most,%2552:mov $count_mostname,$name
count 7,3
mov $bad1,"Luka succumbed to the Minotauros' tit fuck."
mov $bad2," After that, Luka was taken back to her den and lived out the rest of his life as her sex slave."
gosub *face2
name $name
>Haha... You shot it out.@
>Well? Did it feel good?\
name ""
goto *mino_h



*mino_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\mino_bk01.bmp",0,0
gosub *syasei2
>While being violently sucked by the Minotauros, Luka is forced to ejaculate.\
mov %viclose,1:gosub *lose
mov %2552,%2552+1:if %2552=1 mov %count_koenemy,%count_koenemy+1
if %2552>%count_most mov %count_most,%2552:mov $count_mostname,$name
count 4,3
mov $bad1,"Luka succumbed to the Minotauros' blowjob."
mov $bad2," After that, Luka was taken back to her den and lived out the rest of his life as her sex slave."
gosub *face2
name $name
>Haha... You shot it out.@
>Well? Did it feel good?\
name ""
goto *mino_h



*mino_h5

name "Luka"
>Guha...\
name ""
>Luka falls to the ground after taking her powerful blow!\
;rnd2 %ransu,1,3													;patch
;if %ransu<3 mov %viclose,2												;
;if %ransu=3 mov %viclose,1:mov %buturisyasei,1										;
mov %viclose,2:gosub *lose
mov %2552,%2552+1:if %2552=1 mov %count_koenemy,%count_koenemy+1
if %2552>%count_most mov %count_most,%2552:mov $count_mostname,$name
count 14,3
if %viclose=2 mov $bad1,"Luka was defeated by the Minotauros' crashing blow."
;if %viclose=1 mov $bad1,"Luka was forced to come by the Minotauros' crashing blow."					;patch
mov $bad2," After that, Luka was taken back to her den and lived out the rest of his life as her sex slave."
lsp 700,":a;chara\mino_st04.bmp",0,0:print 10,500
name $name
>Ah!@>Hey!@
>Don't die!\
gosub *face2
>Whew... It looks like you're still alive.@
>Don't surprise me like that.@> I was worried I wouldn't be able to rape you.\
name ""
goto *mino_h



*mino_h6

mov %ikigoe,3:gosub *ikigoe
name $name
>Hey hey, already...?\
name ""
gosub *syasei1
lsp 690,":a;chara\mino_ct12.bmp",503,0
lsp 693,":a;chara\mino_bk03.bmp",0,0
gosub *syasei2
>As soon as Luka was forced into her, he instantly ejaculated.\
mov %viclose,1:gosub *lose
mov %2552,%2552+1:if %2552=1 mov %count_koenemy,%count_koenemy+1
if %2552>%count_most mov %count_most,%2552:mov $count_mostname,$name
mov %count_bouhatu,%count_bouhatu+1
count 1,3
mov $bad1,"As soon as Luka was forced into the Minotauros, he accidentally ejaculated."
mov $bad2," After that, Luka was taken back to her den and lived out the rest of his life as her sex slave."
lsp 700,":a;chara\mino_st04.bmp",0,0:print 10,500
name $name
>Hey hey... That's so pathetic.@
>Coming as soon as I put it in?\
name ""
csp 690
gosub *face2
>The Minotauros pulls my penis out with a disappointed look on her face, as my semen slowly drips out of her.\
goto *mino_h



*mino_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\mino_ct12.bmp",503,0
lsp 693,":a;chara\mino_bk03.bmp",0,0
gosub *syasei2
>Crushed in her tight flesh, Luka is forced to ejaculate.\
mov %viclose,1:gosub *lose
mov %2552,%2552+1:if %2552=1 mov %count_koenemy,%count_koenemy+1
if %2552>%count_most mov %count_most,%2552:mov $count_mostname,$name
count 1,3
mov $bad1,"While being raped by the Minotauros, Luka was forced to come."
mov $bad2," After that, Luka was taken back to her den and lived out the rest of his life as her sex slave."
gosub *face2
name $name
>Haha... You came inside me.@
>Was my tight vagina amazing?\
name ""
csp 690:print 10,500
>The Minotauros pulls my penis out of her vagina as my semen slowly drips out.\
goto *mino_h



*mino_h

if %2552=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Auuu...\
name ""
if %viclose=2 skip 3
>Exhausted after my orgasm, I collapse to the ground.@
>I'm too weak to resist her now...\
name $name
>Shall we get started on the main course?\
name ""
cspl 690,699
lsp 700,":a;chara\mino_h1.bmp",0,0:print 10,500
>She rips off my clothes and holds me up in her arms.@
>Held in the air by her insane strength, she tightly hugs me.\
>Like that, she forces my penis in between her firm breasts.\
name "Luka"
>Auuu!!\
name ""
>She's holding me too tightly for me to pull my waist back.@
>It isn't possible for me to escape from between her breasts...\
name $name
>I take pride in my breasts.@
>Using them, I'll milk everything out of you.\
name ""
mov %hseanwave,17:hseanwave
lsp 690,":a;chara\mino_ct01.bmp",0,0:print 10,500
>With my penis screwed between her soft, huge breasts, the pressure attacks me from both sides.\
name "Luka"
>Ahhh...\
name ""
>My weakest point has been inserted into the female's weapon...@
>But tightly held by the Minotauros, there's no way out.\
name $name
>Here, I can crush you even more...@
>Hehe... I wonder how long you'll last?\
name ""
name "Luka"
>Auu!\
name ""
>The Minotauros uses her upper arms to push her breasts tighter together as she holds onto my waist.\
>Forced tightly between her, the pressure becomes intense.@
>At the same time, a warm pleasure starts to boil up.\
>As the warmth spreads into more of my body, the pleasure only increases.\
name "Luka"
>Amazing... That feels good...\
name ""
name $name
>Haha, are you already feeling it?@
>Then... I'll bring you to a finish in an instant!\
name ""
>As she says that, she presses her breasts together even tighter.@
>From both sides, my penis is crushed between her soft breasts.\
>That sweet tightening forces me to another orgasm instantly.\
name "Luka"
>Auuu... Already... Coming!\
name ""
name $name
>Shoot out your semen all over my breasts...@
>Now, come!\
name ""
>Forcing even more power into her breasts, the tightness becomes too much.@
>While being crushed by her breasts, I finally give in to desire.\
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\mino_h2.bmp",0,0
lsp 690,":a;chara\mino_ct02.bmp",0,0
gosub *syasei2
>My semen shoots out over her breasts, and covers them as it falls back down.\
lsp 690,":a;chara\mino_ct03.bmp",0,0:print 10,500
>The Minotauros looks down at me and laughs as I ejaculate.\
name $name
>Hahahaha, you came!@
>My breasts are the best, aren't they?\
name ""
name "Luka"
>Auuu...\
name ""
>While I feel the lingering effects of my orgasm, she keeps my penis between her breasts.\
>The feeling of her soft breasts on me feels good right after my orgasm.\
name $name
>This time... I'll move them as I squeeze!\
name ""
>Suddenly, the Minotauros starts to shake her breasts.@
>The vibrations of their movements force a new pleasure into me.\
name "Luka"
>Ahhh!!\
name ""
name $name
>Doesn't it feel amazing?\
>When I do this, all men come right away... None have even lasted a minute!\
name ""
>Stuck inside her breasts, my penis is violently massaged.@
>As the pleasure starts to dominate my body, a weakness comes over me.\
name "Luka"
>Ahhh!@
>Not... Not so rough...!\
name ""
name $name
>Hahaha!@
>I won't hold back!@> I'll make you quickly come again!\
name ""
>Her violent shaking causes her left and right breasts to move in alternating directions.\
>With my penis stuck in between her huge breasts, my breathing starts to get ragged as the pleasure fills more of my body.\
name "Luka"
>Ahh... I'm going to come again...\
name ""
name $name
>Haha... Your milk is already coming out.@
>A man being milked by a woman's chest... How pathetic!\
name ""
>Squeezed between her breasts, her milking doesn't stop.@
>While my body writhes in pleasure, I give in to the desire again.\
name $name
>Now come!\
name ""
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\mino_h3.bmp",0,0
lsp 690,":a;chara\mino_ct04.bmp",0,0
gosub *syasei2
>I explode inside of her cleavage again, as the semen covering her chest starts to drip down to my stomach.\
name "Luka"
>Faaa...\
name ""
name $name
>Haha, are you satisfied?@
>Doesn't it feel refreshing to be milked by my breasts?\
>But... It's way too early for me to be satisfied.@
>I need to squeeze out even more!\
name ""
name "Luka"
>Aiee!\
name ""
>Rubbed between her breasts, the tit fuck hell starts again.@
>Still held in the air by the Minotauros, pleasure is forced into me.\
name "Luka"
>Ahhh!@>If you keep doing this...!\
name ""
name $name
>Haha! Did you think I would stop with just this much?@
>I'll squeeze you until neither your legs or your penis can stand any longer!\
name ""
>As she says that, she continues to stroke me with her breasts.@
>With no way to escape, all I can do is taste this pleasure.@
>There's no alternative but to give in and accept it...\
name "Luka"
>Ahh!@> Ahhhhh!!\
name ""
gosub *syasei1
lsp 690,":a;chara\mino_ct05.bmp",0,0
gosub *syasei2
>Sandwiched between her breasts, my semen covers even more of her.@
>But even after coming, the stimulation only gets more intense.\
name "Luka"
>Haaa... Stop, please...@
>No more...@> There's nothing left in me...\
name ""
name $name
>I know you still have more milk!@> Here, I'll show you!\
name ""
>She squeezes her breasts tighter together as I yell out in pleasure.\
gosub *syasei1:gosub *syasei2
>It's as if I'm shooting out a white flag over her breasts...\
name "Luka"
>Help me...\
name ""
name $name
>Nobody will come to help you...@
>I'll just keep milking you!\
name ""
gosub *syasei1:gosub *syasei2
>The last of my strength fades from my body as the hell of pleasure continues.\
>My consciousness starts to fade, as I'm unable to think clearly any longer.\
gosub *syasei1:gosub *syasei2
name "Luka"
>Aaa...\
name ""
>As I shoot out more semen on her breasts, I lose consciousness.\
gosub *anten
mov %hseanwave,0:hseanwave
name $name
>You're able to put out a lot of milk...@
>...I like you. I'm going to keep you.\
name ""
>The Minotauros gently picks me up and takes me back to her home.\
>Like that, I was caught by the Minotauros...@
>Kept as her sex slave, I spent the rest of my days obliging her desires...\
>................\
goto *badend



*sasori_start

mov $name,"Scorpion Girl"
mov $name2,"Scorpion Girl"
mov $lavel,"sasori"
mov $tatie1,"sasori_st01"
mov $tatie2,"sasori_st02"
mov $tatie3,"sasori_st03"
mov $tatie4,"sasori_h1"
mov $haikei,"bg062"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,1100
if %nanido=2 mov %max_enemylife,1100
if %nanido=3 mov %max_enemylife,1500
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,70
mov %kaihi,95
mov %music,1
mov %tikei,0
gosub *maxmp:mov %mp,3
gosub *syutugen
mov $mogaku_anno1,"But Luka can't get away!"
mov $mogaku_anno2,"Luka forced her off of him!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Hehe... I won't let you go."
mov $mogaku_sel2,"That's pointless... Just let me suck everything out."
mov $mogaku_sel3,"Hehe... What are you doing?"
mov $mogaku_sel4,"I'll prey on you just like that..."
mov $mogaku_sel5,"Even if you struggle, I won't let you go..."
mov $mogaku_dassyutu1,"Such pointless struggling..."
mov $mogaku_dassyutu2,"I could make you feel so good, too..."
mov $half_s1,"Your face is looking pretty pathetic."
mov $half_s2,"Are you feeling that good? Haha."
mov $kiki_s1,"It looks like you're already starting to leak..."
mov $kiki_s2,"I'll take my time savoring your male extract."
mov %end_n,2
mov %zmonster_x,-280
mov %tukix,300
name $name
>A man passing by here...? How unusual.@
>It looks like I'll have a male treat today...\
name ""
name "Luka"
>Just go away... I won't let that happen.\
name ""
>Ignoring my words, she takes up a fighting stance.@
>It looks like she's committed to fighting already...\
goto *common_main



*sasori_v

gosub *face3
name $name
>I lost... To a human!?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Scorpion Girl turns into a tiny scorpion!\
mov %viclose,1:gosub *victory
mov %getexp,1700:gosub *lvup
mov %2253,1
goto *sean0132



*sasori_kousan

gosub *kousan_syori
>Luka yields to temptation, ending his resistance!\
gosub *face2
name $name
>You gave up?@
>Then you won't mind if I suck you dry...\
name ""
goto *sasori_a



*sasori_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *sasori_kousan
if %cmd1=16 goto *sasori_onedari
if %cmd1=17 goto *common_skill
goto *sasori_main



*sasori_a

if %kousoku=1 gosub *sasori_a5:goto *common_main
rnd2 %ransu,1,4
if %ransu=1 gosub *sasori_a1:goto *common_main
if %ransu=2 gosub *sasori_a2:goto *common_main
if %ransu=3 && %owaza_count2a>3 && %status=0 gosub *sasori_a3:goto *common_main
if %ransu=4 && %owaza_count1a>3 gosub *sasori_a4:goto *common_main
skip -5



*sasori_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll make you feel good with my mouth..."
if %ransu=2 mov $sel1,"I'll slowly suck everything out..."
if %ransu=3 mov $sel1,"I'll suck out your male extract..."
name $name
eng $sel1:$sel6\
name ""
skillname "Scorpion Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>The Scorpion Girl intensely sucks on Luka's penis!
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,30
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes her back!":gosub *wind_guard:sub %stack,1:return
skillcount1 3206
if %nanido<2 damage 25,30
if %nanido=2 damage 33,41
if %nanido=3 damage 46,56
skillname ""
if %mylife=0 sub %stack,1:return *sasori_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*sasori_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll love you with my breasts."
if %ransu=2 mov $sel1,"Hehe... Aren't my breasts soft?"
if %ransu=3 mov $sel1,"Pour out your extract on my chest..."
name $name
eng $sel1:$sel6\
name ""
skillname "Scorpion Tit Fuck"
dwave 1,"se\ero_koki1.ogg"
>The Scorpion Girl crushes Luka's penis between her breasts!
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,30
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes her back!":gosub *wind_guard:sub %stack,1:return
skillcount1 3207
if %nanido<2 damage 28,32
if %nanido=2 damage 38,44
if %nanido=3 damage 52,60
skillname ""
if %mylife=0 sub %stack,1:return *sasori_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*sasori_a3

add %stack,1
mov %owaza_count2a,0
if %kousan=2 skip 4
name $name
>I'll make you numb with my venom...\
name ""
skillname "Venom Tail"
eng "The Scorpion Girl's tail thrusts toward Luka!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,100
if %wind=1 && %nanido=2 mov %wind_kakuritu,100
if %wind=1 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes back her tail!":gosub *wind_guard:sub %stack,1:return
\
skillcount1 3208
>Venom is injected into Luka, causing him to go numb!\
mov %status,2:gosub *status_print
>Luka has been paralyzed!\
skillname ""
name "Luka"
>Uuu...\
name ""
name $name
>You can't move anymore...@
>Now, let me squeeze out your extract...\
name ""
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,3,4
if %nanido=3 rnd2 %status_turn,4,5
sub %stack,1
return



*sasori_a4

add %stack,1
dwave 1,"se\ero_pyu2.ogg"
lsp 700,":a;chara\sasori_st11.bmp",0,0:print 10,500
name $name
>I'll suck you into this tail.\
>Doesn't it look like it will feel good?@
>Don't you want it to suck up everything till the last drop?\
name ""
skillname "Climb"
>The Scorpion Girl climbs on top of Luka's body!@
mov %kousoku,1:gosub *status_print
>Luka's pinned under the Scorpion Girl!\
skillname ""
gosub *face2
name $name
if %first_sel1=1 skip 4
>It will feel amazing to be sucked dry by this tail...@
>You'll die in a state of bliss.\
skip 2
>This time I won't let you escape...\
name ""
mov %first_sel1,1
if %nanido<2 mov %genmogaku,0
if %nanido=2 mov %genmogaku,0
if %nanido=3 mov %genmogaku,0
sub %stack,1
return



*sasori_a5

add %stack,1
>Luka is being held down by the Scorpion Girl...\
name $name
>Give up, and just enjoy your final moments...\
name ""
skillcount1 3209
skillname "Petra Scorpio"
dwave 1,"se\ero_pyu4.ogg"
lsp 690,":a;chara\sasori_ct01.bmp",0,0:print 10,500
>The Scorpion Girl's tail sucks in Luka's penis!
mov %kousoku,2:mov %genmogaku,100
mov %damage_kotei,1
damage 40,47
skillname ""
if %mylife=0 sub %stack,1:return *sasori_h3
>Luka is being raped by the Scorpion Girl's tail!\
name "Luka"
>Ahh!!\
name ""
>My body writhes as her tail's soft meat sucks in my penis.@
>But with the Scorpion Girl on top of me, escape isn't possible...\
sub %stack,1
goto *sasori_a6



*sasori_a6

add %stack,1
skillcount1 3209
if %status=2 && %kousan>1 >Luka's body is paralyzed...\
>Luka is being raped by the Scorpion Girl's tail!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Give me your extract...":mov $sel2,"The Scorpion Girl's tail contracts around Luka!"
if %ransu=2 mov $sel1,"It feels good, right? Just surrender to it...":mov $sel2,"Mucus from the tail covers Luka's penis!"
if %ransu=3 mov $sel1,"I'll suck you dry like this...":mov $sel2,"The Scorpion Girl's tail squeezes Luka's penis!"
if %ransu=4 mov $sel1,"I'll even move a little...":mov $sel2,"The tail quickly pumps Luka's penis!"
if %ransu=5 mov $sel1,"Hehe... If I stimulate the tip, are you going to leak?":mov $sel2,"The flesh around the tip of Luka's penis tightens!"
name $name
eng $sel1:$sel6\
name ""
skillname "Petra Scorpio"
dwave 1,"se\ero_chupa4.ogg"
eng $sel2:$sel6
mov %damage_kotei,1
damage 40,47
skillname ""
if %mylife=0 sub %stack,1:return *sasori_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
goto *sasori_a6



*sasori_onedari

mov $list1,"Scorpion Blowjob"
if %3206>0 mov %list_num1,1
mov $list2,"Scorpion Tit Fuck"
if %3207>0 mov %list_num2,1
mov $list3,"Venom Tail"
if %3208>0 mov %list_num3,1
mov $list4,"Petra Scorpio"
if %3209>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *sasori_onedari1
if %cmd1=12 goto *sasori_onedari2
if %cmd1=13 goto *sasori_onedari3
if %cmd1=14 goto *sasori_onedari4
if %cmd1=-1 goto *sasori_main
goto *sasori_onedari



*sasori_onedari1

gosub *onedari_syori
name $name
>You want to be defeated in my mouth?@
>Alright... I'll make sure to suck everything out.\
name ""
gosub *sasori_a1
skip -1



*sasori_onedari2

gosub *onedari_syori
name $name
>You want to be defeated by my breasts?@
>Alright... I'll make sure to squeeze everything out.\
name ""
gosub *sasori_a2
skip -1



*sasori_onedari3

gosub *onedari_syori
name $name
>You want to give in to my venom?@
>What an unusual desire...\
name ""
gosub *sasori_a3
mov %kousan,3
goto *sasori_a



*sasori_onedari4

gosub *onedari_syori_k
name $name
>You want me to squeeze everything out with my tail?@
>Alright... I'll let you enjoy it until your death.\
name ""
if %kousoku=0 gosub *sasori_a4
gosub *sasori_a5



*sasori_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\sasori_bk01.bmp",0,0
gosub *syasei2
>Unable to take the Scorpion Girl's blowjob any longer, Luka finally ejaculates.\
mov %viclose,1:gosub *lose
mov %2553,%2553+1:if %2553=1 mov %count_koenemy,%count_koenemy+1
if %2553>%count_most mov %count_most,%2553:mov $count_mostname,$name
count 4,4
mov $bad1,"Luka succumbed to the Scorpion Girl's blowjob."
mov $bad2," After that, Luka was sucked dry by her tail."
gosub *face2
name $name
>You put out a lot...@
>Hehe... It's delicious.\
name ""
goto *sasori_h



*sasori_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\sasori_bk02.bmp",0,0
gosub *syasei2
>Unable to take the Scorpion Girl's tit fuck any longer, Luka finally ejaculates.\
mov %viclose,1:gosub *lose
mov %2553,%2553+1:if %2553=1 mov %count_koenemy,%count_koenemy+1
if %2553>%count_most mov %count_most,%2553:mov $count_mostname,$name
count 7,4
mov $bad1,"Luka succumbed to the Scorpion Girl's tit fuck."
mov $bad2," After that, Luka was sucked dry by her tail."
gosub *face2
name $name
>You put out a lot...@
>Hehe... It's delicious.\
name ""
goto *sasori_h



*sasori_h3

mov %ikigoe,3:gosub *ikigoe
name $name
>Already...?@>Just from insertion?\
name ""
gosub *syasei1
lsp 690,":a;chara\sasori_ct02.bmp",0,0
gosub *syasei2
>As soon as Luka was sucked into her tail, the pleasure causes him to instantly ejaculate.\
mov %viclose,1:gosub *lose
mov %2553,%2553+1:if %2553=1 mov %count_koenemy,%count_koenemy+1
if %2553>%count_most mov %count_most,%2553:mov $count_mostname,$name
mov %count_bouhatu,%count_bouhatu+1
count 19,4
mov $bad1,"Luka accidentally ejaculated as soon as he was sucked in by the Scorpion Girl's tail."
mov $bad2," After that, Luka was sucked dry by her tail."
name $name
>You're so quick...@
>Orgasming as soon as I put it inside... How pathetic!\
name ""
>The Scorpion Girl laughs at me as her tail continues to suck on me.\
if %2553=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %hseanwave,21:hseanwave
goto *sasori_hb



*sasori_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\sasori_ct02.bmp",0,0
gosub *syasei2
>Raped by the Scorpion Girl's tail, Luka finally succumbed to the overpowering pleasure forced into him.\
mov %viclose,1:gosub *lose
mov %2553,%2553+1:if %2553=1 mov %count_koenemy,%count_koenemy+1
if %2553>%count_most mov %count_most,%2553:mov $count_mostname,$name
count 19,4
mov $bad1,"Luka succumbed to the Scorpion Girl's petra scorpio."
mov $bad2," After that, Luka was sucked dry by her tail."
name $name
>You put out a lot...@
>Hehe... It's delicious.\
name ""
>While flashing a seductive smile at me, the Scorpion Girl continues to suck on me with her tail.\
if %2553=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %hseanwave,21:hseanwave
goto *sasori_hb



*sasori_h

if %2553=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name $name
>Next I want your semen in here...\
name ""
dwave 1,"se\ero_pyu2.ogg"
cspl 690,699
lsp 700,":a;chara\sasori_st11.bmp",0,0:print 10,500
>The tip of the Scorpion Girl's tail turns into another shape.@
>It doesn't look anything like the needle it did before...\
>That shape... It's pretty obvious what she's going to do...\
name $name
>I'm going to suck your penis into my tail...\
>Doesn't it look like it will feel incredible?@
>Don't you want it to suck out every drop of your extract?\
name ""
name "Luka"
>St...Stop...\
name ""
>I tremble with horror as I see the flesh inside of her tail wriggle around.\
>The fear and expectation of having my penis in there boils up in me.\
name $name
>Hehe... Just give in to the pleasure as I suck you dry.\
name ""
lsp 700,":a;chara\sasori_h1.bmp",0,0:print 10,500
>While flashing a seductive smile at me, the Scorpion Girl's tail slowly moves closer to me.\
>Finally, her wriggling tail-hole is right next to my penis.\
name "Luka"
>No!@>Stop!\
name ""
mov %hseanwave,21:hseanwave
lsp 690,":a;chara\sasori_ct01.bmp",0,0:print 10,500
>In an instant, her tail sucks in my penis!@
>Encased in her soft flesh, my penis is sucked all the way into her tail.\
name "Luka"
>Ahhh!\
name ""
name $name
>Haha... Incredible, isn't it?@
>I'll force you to put all of your extract in here...\
name ""
goto *sasori_hb



*sasori_hb

>Her warm flesh wriggles around my penis.@
>Sucked all the way inside of her tail, the sucking pleasure attacks every inch of my penis.\
>Something that felt like tongues start to rub and lick the tip of my penis.\
>The amazing stimulation inside of her quickly forces me to the edge of another orgasm.\
name "Luka"
>Incredible...@>Inside... Too good...@
>Ahhh!!\
name ""
>When the tongues inside of her tail gently lick the tip, I let out a yell.@
>Sucked, licked, and squeezed inside of her tail, I feel myself quickly giving in to the desire to release.\
name $name
>Shoot out a lot...@
>Pour all of your male extract into me...\
name ""
>Her tail starts to tighten up around me.@
>As the pressure increases, I can feel the details of her tail even clearer.\
>The feel of her insect shell through her soft flesh rubs and massages against my penis with every movement.\
>Unable to hold on, I quickly give in to the overpowering stimulation.\
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\sasori_h2.bmp",0,0
lsp 690,":a;chara\sasori_ct02.bmp",0,0
gosub *syasei2
>Forced to orgasm, I explode inside of her, filling the Scorpion Girl's tail with my semen.\
>As if urged on by that, a powerful suction attacks me inside her tail, forcing out every drop still inside my urethra.\
name "Luka"
>Faaa...\
name ""
name $name
>Giving me so much... Was it that good?@
>But don't worry, I'll let you feel more... Until you're shriveled and dry, I won't stop.\
name ""
>The flesh inside of her tail keeps wriggling around me.\
>The tail tightens up around me, then slowly loosens.@
>From the base to the tip, the rhythmic stimulation attacks me.\
>At the same time, the tongues inside of her continue to lick the tip of my penis.\
name "Luka"
>Auu... Incredible...\
name ""
>This tail must have evolved to suck out a man's semen...@
>Once I was forced inside, there was no way to fight against it.\
>Caught by the Scorpion Girl, I can't do anything but be slowly sucked dry...\
name $name
>Hehe... I'll make it even better.@
>This is what you men desire, isn't it?@
>Sticking your penis into something, and being sucked dry...\
name ""
>Her tail tightens up around me, with her soft flesh squeezing tightly around me.\
>There's no resistance in the face of this tight, wriggling tail...@
>As if rejoicing at the pleasure from her tail, my dick starts to twitch.\
gosub *syasei1
lsp 700,":a;chara\sasori_h3.bmp",0,0
lsp 690,":a;chara\sasori_ct03.bmp",0,0
gosub *syasei2
name "Luka"
>Auuu...\
name ""
>While laying here helpless, more semen is sucked out of me.@
>Powerless to stop her, an overwhelming sense of defeat comes over me as she sucks out my semen for food.\
>But this one-sided feeding isn't about to end...@
>Right after my last ejaculation finished, she's already working towards the next.\
name "Luka"
>Aaa... Stop... Please...!\
name ""
name $name
>I won't stop... Not until there's nothing left.\
name ""
name "Luka"
>No way... Ahhh!\
name ""
>The entrance to her tail narrows as she tightens around me again.@
>With her soft wriggling flesh tightly wrapped around me, I'm forced to another height.\
name "Luka"
>Aaaa...\
name ""
gosub *syasei1
lsp 700,":a;chara\sasori_h4.bmp",0,0
lsp 690,":a;chara\sasori_ct04.bmp",0,0
gosub *syasei2
>Before I can voice another word of protest, she had already forced me to another orgasm.\
>Filled with mixing feelings of pleasure and disgrace, my body shakes.\
name $name
>Hahahaha... It's too good for you, isn't it?@
>But there's no escape from my tail.@
>All that's left of your short life is to be sucked dry by me...\
name ""
name "Luka"
>Auu...@> No... Help me...\
name ""
>But no matter how much I plead, her tail doesn't stop.@
>This hateful tail is going to suck the life out of me...\
name "Luka"
>Help... Stop...\
name ""
name $name
>Hehe... Pitiful prey.@
>No matter how much you cry, I'm going to suck everything up.\
>Why don't you just give in to the pleasure, so you can at least die happy?\
name ""
name "Luka"
>Ahhh...\
name ""
gosub *syasei1:gosub *syasei2
>I ejaculate again from the pleasure being forced into me.@
>My semen is being squeezed out only for the purpose of feeding her...\
>Exhausted from my orgasms, I'm too weak to even attempt to move my body.\
name $name
>Shoot out more...@
>I'll send you to heaven while my tail sucks everything from you...\
name ""
name "Luka"
>A...aa...\
name ""
gosub *syasei1:gosub *syasei2
>Each orgasm causes my thoughts to become even more muddled.@
>Unable to think clearly, I finally give in to the pleasure.\
name $name
>It's about time to end this...@
>You were very delicious... Hahaha!\
name ""
name "Luka"
>Aaa...\
name ""
gosub *syasei1:gosub *syasei2
>With a final orgasm, I finally lose consciousness.@
>Sucked dry, I fall into an endless sleep.\
gosub *anten
mov %hseanwave,0:hseanwave
>Thus, I was sucked dry by the Scorpion Girl.@
>The only proof of my existence is another dried up corpse in the desert.\
>................\
goto *badend



*lamp_start

mov $name,"Lamp Genie"
mov $name2,"Lamp Genie"
mov $lavel,"lamp"
mov $tatie1,"lamp_st12"
mov $tatie2,"lamp_st02"
mov $tatie3,"lamp_st03"
mov $tatie4,"lamp_st02"
mov $haikei,"bg062"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,1600
if %nanido=2 mov %max_enemylife,1800
if %nanido=3 mov %max_enemylife,2200
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,1
mov %tikei,0
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $half_s1,"How are my abilities?"
mov $half_s2,"I'll let you drown in the pleasure..."
mov $kiki_s1,"You're almost done..."
mov $kiki_s2,"You don't need to endure it..."
mov %end_n,1
mov %zmonster_x,-280
name $name
>...I see.@
>Allow me to give you the ultimate pleasure!\
name ""
lsp 700,":a;chara\lamp_st02.bmp",0,0:print 10,500
>The Lamp Genie slowly takes off her pants.\
name "Luka"
>Er... No, I shouldn't do this after all!\
name ""
>Warning bells are going off in my mind.@
>There's something very dangerous about this...@
>I quickly take out my sword and stand in a fighting pose.\
name $name
>Why did you pull out your sword...?@
>I was going to make you feel amazing...\
name ""
name "Luka"
>You're a... Bad monster!\
name ""
name $name
>I just want to make your wish come true...@
>You wanted it so bad... I just wanted to give it to you.\
name ""
name "Luka"
>You were trying to trick me!\
name ""
>She must have been the one to attack the owner of those clothes!\
mov $tatie1,"lamp_st01"
lsp 700,":a;chara\lamp_st01.bmp",0,0:print 10,500
mov %sinkou,1
goto *common_main



*lamp_v

gosub *face3
name $name
>My temptation... Rejecting it...?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Lamp Genie turns into a normal lamp!\
mov %viclose,1:gosub *victory
mov %getexp,2800:gosub *lvup
mov %2254,1
goto *sean0132b



*lamp_kousan

gosub *kousan_syori
>Luka yields to temptation, ending his resistance.\
gosub *face2
name $name
>Good... That's good...@
>I'll give you even more pleasure than you wished for...\
name ""
goto *lamp_a



*lamp_main

gosub *cmd_main
if %cmd1=11 goto *common_attack
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *lamp_kousan
if %cmd1=16 goto *lamp_onedari
if %cmd1=17 goto *common_skill
goto *lamp_main



*lamp_a

rnd2 %ransu,1,6
if %ransu=1 gosub *lamp_a1:goto *common_main
if %ransu=2 gosub *lamp_a2:goto *common_main
if %ransu=3 gosub *lamp_a3:goto *common_main
if %ransu=4 gosub *lamp_a4:goto *common_main
if %ransu=5 && %owaza_count2a>3 gosub *lamp_a5:goto *common_main
if %ransu=6 && %owaza_count3a>3 gosub *lamp_a6:goto *common_main
skip -7



*lamp_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My hands can work magic..."
if %ransu=2 mov $sel1,"I'll squeeze some pleasure into you..."
if %ransu=3 mov $sel1,"You won't last long with my hand skills..."
name $name
eng $sel1:$sel6\
name ""
skillname "Hand of Pleasure"
dwave 1,"se\ero_koki1.ogg"
eng "The Lamp Genie grabs Luka's penis with both of her hands!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,15
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,7
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind blows her back!":gosub *wind_guard:sub %stack,1:return
\
>From the base to the tip, she strokes Luka's penis!
skillcount1 3210
if %nanido<2 damage 20,23
if %nanido=2 damage 22,28
if %nanido=3 damage 30,36
skillname ""
if %mylife=0 sub %stack,1:return *lamp_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*lamp_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Taste the magical pleasure of my mouth..."
if %ransu=2 mov $sel1,"Shoot it out in my mouth..."
if %ransu=3 mov $sel1,"I'll get you addicted to my mouth technique..."
name $name
eng $sel1:$sel6\
name ""
skillname "Mouth of Joy"
dwave 1,"se\ero_buchu2.ogg"
eng "The Lamp Genie quickly forces Luka's dick into her mouth!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,15
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,7
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushed her back!":gosub *wind_guard:sub %stack,1:return
\
>Her tongue tightly wraps around Luka's penis!
skillcount1 3211
if %nanido<2 damage 22,25
if %nanido=2 damage 25,30
if %nanido=3 damage 34,40
skillname ""
if %mylife=0 sub %stack,1:return *lamp_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*lamp_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I can even use my breasts..."
if %ransu=2 mov $sel1,"Do you prefer using my breasts?"
if %ransu=3 mov $sel1,"I wonder if you'll surrender right away if I do this..."
name $name
eng $sel1:$sel6\
name ""
skillname "Chest of Delight"
dwave 1,"se\ero_koki1.ogg"
eng "The Lamp Genie quickly forces her chest into Luka's groin!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,15
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,7
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes her back!":gosub *wind_guard:sub %stack,1:return
\
>She licks the tip of Luka's penis as she squeezes him!
skillcount1 3212
if %nanido<2 damage 24,26
if %nanido=2 damage 28,31
if %nanido=3 damage 38,42
skillname ""
if %mylife=0 sub %stack,1:return *lamp_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*lamp_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Do you want to be sandwiched between my thighs?"
if %ransu=2 mov $sel1,"Shoot out everything you have on my thighs..."
if %ransu=3 mov $sel1,"Don't even try to endure it..."
name $name
eng $sel1:$sel6\
name ""
skillname "Intercrural Enjoyment"
dwave 1,"se\ero_koki1.ogg"
eng "The Lamp Genie presses Luka's penis between her thighs!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,15
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,7
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes her back!":gosub *wind_guard:sub %stack,1:return
\
>The feeling of her soft skin gives a strange pleasure to Luka!
skillcount1 3213
if %nanido<2 damage 26,29
if %nanido=2 damage 31,36
if %nanido=3 damage 42,48
skillname ""
if %mylife=0 sub %stack,1:return *lamp_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*lamp_a5

add %stack,1
if %status=1 && %kousan=2 >Luka is in a trance!\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My finger work is extraordinary..."
if %ransu=2 mov $sel1,"I'll use my fingers until you go crazy..."
if %ransu=3 mov $sel1,"This will make you go insane..."
name $name
eng $sel1:$sel6\
name ""
skillname "Fingers of Ecstasy"
>The Lamp Genie sprinkles olive oil on her hands.@
eng "She reaches out to grab Luka's penis!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,60
if %wind=1 && %nanido=2 mov %wind_kakuritu,60
if %wind=1 && %nanido=3 mov %wind_kakuritu,30
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes her back!":gosub *wind_guard:sub %stack,1:return
\
>Her left hand strokes Luka's dick as her right rubs his tip!
skillcount1 3214
if %nanido<2 damage 26,29
if %nanido=2 damage 31,36
if %nanido=3 damage 42,48
if %status=0 mov $sel1,"Luka was put into a trance!"
if %status=1 mov $sel1,""
mov %status,1:gosub *status_print
if $sel1<>"" eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *lamp_h5
if %kousan=2 && %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %kousan=2 && %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
if %kousan=2 sub %stack,1:return
skillname ""
name "Luka"
>Fa...Aaa...\
name ""
name $name
>Hehe... You look like you're stuck in bliss.@
>I'll make it even better for you while you're stuck in that trance...\
name ""
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,3,4
if %nanido=3 rnd2 %status_turn,4,5
sub %stack,1
return



*lamp_a6

add %stack,1
mov %owaza_count3a,0
if %kousan=2 skip 4
name $name
>Shall I show you the ultimate pleasure now?\
name ""
skillname "Lead into Heaven"
eng "The Lamp Genie throws Luka on the ground and leans on top of him!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,100
if %wind=1 && %nanido=2 mov %wind_kakuritu,100
if %wind=1 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes her back!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
mov %genmogaku,100
>The Lamp Genie is on top of Luka!\
skillname ""
gosub *face2
if %status=1 >Luka is in a trance!\
name $name
>I'll lead you into a world of carnal desires...\
name ""
skillcount1 3215
skillname "Heavenly Kamasutra"
dwave 1,"se\ero_pyu3.ogg"
>The Lamp Genie drops her waist down on Luka!\
>Luka's penis is forced into her warm pussy!
mov %damage_kotei,1
damage 50,55
lsp 700,":a;chara\lamp_h1.bmp",0,0:print 10,500
mov %kousoku,2
skillname ""
if %mylife=0 sub %stack,1:return *lamp_h6
if %status=1 >Luka is in a trance!\
>Luka is being raped by the Lamp Genie!\
name "Luka"
>Faaa!!\
name ""
>The soft flesh of her vagina sticks to me as soon as I'm forced into her.\
>In an instant, I realize that this was designed to force men to ejaculate quickly.\
gosub *face2
name $name
>Well? Is it heavenly?@
>Now, have a taste of my skills...\
name ""
skillcount1 3215
skillname "Heavenly Kamasutra"
dwave 1,"se\ero_chupa3.ogg"
>The Lamp Genie gently shakes her waist!
mov %damage_kotei,1
damage 20,25
>The creases of the Lamp Genie's vagina stimulate Luka!
mov %damage_kotei,1
damage 20,25
>The Lamp Genie tightens around Luka's penis!
mov %damage_kotei,1
damage 20,25
skillname ""
if %mylife=0 sub %stack,1:return *lamp_h7
name "Luka"
>Auuu...\
name ""
if %status=1 >Luka is in a trance!\
>Luka is being raped by the Lamp Genie!\
name $name
>Hehe... It's not over yet.@
>I'll give you another taste of heaven...\
name ""
skillcount1 3215
skillname "Heavenly Kamasutra"
dwave 1,"se\ero_chupa3.ogg"
>The Lamp Genie grinds her waist against Luka!
mov %damage_kotei,1
damage 20,25
>The small creases inside of the Lamp Genie rub against Luka's penis!
mov %damage_kotei,1
damage 20,25
>The Lamp Genie tightens around Luka's penis!
mov %damage_kotei,1
damage 20,25
skillname ""
if %mylife=0 sub %stack,1:return *lamp_h7
name "Luka"
>Faa... No more...\
name ""
if %status=1 >Luka is in a trance!\
>Luka is being raped by the Lamp Genie!\
name $name
>It's about time for me to finish you off...@
>I'll let you reach heaven inside of me!\
name ""
skillcount1 3215
skillname "Heavenly Kamasutra"
dwave 1,"se\ero_chupa3.ogg"
>The Lamp Genie tightens around Luka as she violently bounces up and down!
mov %damage_kotei,1
damage 20,25
>Luka is forced all the way in and out of the Lamp Genie!
mov %damage_kotei,1
damage 20,25
>The Lamp Genie's vagina tightens around Luka as she forces him to come!
mov %damage_kotei,1
damage 20,25
skillname ""
sub %stack,1
return *lamp_h7



*lamp_onedari

mov $list1,"Hand of Pleasure"
if %3210>0 mov %list_num1,1
mov $list2,"Mouth of Joy"
if %3211>0 mov %list_num2,1
mov $list3,"Chest of Delight"
if %3212>0 mov %list_num3,1
mov $list4,"Intercrural Enjoyment"
if %3213>0 mov %list_num4,1
mov $list5,"Fingers of Ecstasy"
if %3214>0 mov %list_num5,1
mov $list6,"Heavenly Kamasutra"
if %3215>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *lamp_onedari1
if %cmd1=12 goto *lamp_onedari2
if %cmd1=13 goto *lamp_onedari3
if %cmd1=14 goto *lamp_onedari4
if %cmd1=15 goto *lamp_onedari5
if %cmd1=16 goto *lamp_onedari6
if %cmd1=-1 goto *lamp_main
goto *lamp_onedari



*lamp_onedari1

gosub *onedari_syori
name $name
>You want to be defeated by my hand?@
>I'll send you to heaven like that, then...\
name ""
gosub *lamp_a1
skip -1



*lamp_onedari2

gosub *onedari_syori
name $name
>You want to be defeated by my mouth?@
>I'll send you to heaven like that, then...\
name ""
gosub *lamp_a2
skip -1



*lamp_onedari3

gosub *onedari_syori
name $name
>You want to taste my chest?@
>I'll send you to heaven like that, then...\
name ""
gosub *lamp_a3
skip -1



*lamp_onedari4

gosub *onedari_syori
name $name
>You want to taste my thighs?@
>I'll send you to heaven like that, then...\
name ""
gosub *lamp_a4
skip -1



*lamp_onedari5

gosub *onedari_syori
name $name
>You want to be put into a trance?@
>Then I'll send you to heaven while unable to think for yourself...\
name ""
gosub *lamp_a5
skip -1



*lamp_onedari6

gosub *onedari_syori
name $name
>You want to taste my ultimate sexual skills?@
>Then let me send you to heaven...\
name ""
gosub *lamp_a6
skip -1



*lamp_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\lamp_bk03.bmp",0,0
gosub *syasei2
>Surrendering to her soft hands, Luka finally ejaculates.\
mov %viclose,1:gosub *lose
mov %2554,%2554+1:if %2554=1 mov %count_koenemy,%count_koenemy+1
if %2554>%count_most mov %count_most,%2554:mov $count_mostname,$name
count 5,11
mov $bad1,"Luka succumbed to the Lamp Genie's handjob."
mov $bad2," After being raped, Luka was eaten by the Lamp Genie."
gosub *face2
name $name
>Hehe... You put out so much on my hands.@
>Did you get a taste of heaven?\
name ""
goto *lamp_h



*lamp_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\lamp_bk01.bmp",0,0
gosub *syasei2
>Unable to endure the Lamp Genie's blowjob, Luka finally ejaculates.\
mov %viclose,1:gosub *lose
mov %2554,%2554+1:if %2554=1 mov %count_koenemy,%count_koenemy+1
if %2554>%count_most mov %count_most,%2554:mov $count_mostname,$name
count 4,11
mov $bad1,"Luka succumbed to the Lamp Genie's blowjob."
mov $bad2," After being raped, Luka was eaten by the Lamp Genie."
gosub *face2
name $name
>Hehe... You put out so much in my mouth.@
>Did you get a taste of heaven?\
name ""
goto *lamp_h



*lamp_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\lamp_bk02.bmp",0,0
gosub *syasei2
>While being squeezed by the Lamp Genie's breasts, Luka finally ejaculates.\
mov %viclose,1:gosub *lose
mov %2554,%2554+1:if %2554=1 mov %count_koenemy,%count_koenemy+1
if %2554>%count_most mov %count_most,%2554:mov $count_mostname,$name
count 7,11
mov $bad1,"Luka succumbed to the Lamp Genie's tit fuck."
mov $bad2," After being raped, Luka was eaten by the Lamp Genie."
gosub *face2
name $name
>Hehe... You put out so much on my chest.@
>Did you get a taste of heaven?\
name ""
goto *lamp_h



*lamp_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\lamp_bk04.bmp",0,0
gosub *syasei2
>While being squeezed by the Lamp Genie's thighs, Luka finally ejaculates.\
mov %viclose,1:gosub *lose
mov %2554,%2554+1:if %2554=1 mov %count_koenemy,%count_koenemy+1
if %2554>%count_most mov %count_most,%2554:mov $count_mostname,$name
count 3,11
mov $bad1,"Luka succumbed to the Lamp Genie's intercrural sex."
mov $bad2," After being raped, Luka was eaten by the Lamp Genie."
gosub *face2
name $name
>Hehe... You put out so much between my thighs.@
>Did you get a taste of heaven?\
name ""
goto *lamp_h



*lamp_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\lamp_bk03.bmp",0,0
gosub *syasei2
>Stuck in a trance, Luka gives in to the pleasure as he ejaculates.\
mov %viclose,1:gosub *lose
mov %2554,%2554+1:if %2554=1 mov %count_koenemy,%count_koenemy+1
if %2554>%count_most mov %count_most,%2554:mov $count_mostname,$name
count 5,11
mov $bad1,"Put into a trance by the Lamp Genie, Luka was forced to come."
mov $bad2," After being raped, Luka was eaten by the Lamp Genie."
gosub *face2
name $name
>Letting out so much while in a trance...@
>Did you get a taste of heaven?\
name ""
goto *lamp_h



*lamp_h6

mov %ikigoe,3:gosub *ikigoe
name $name
>Oh...\
name ""
gosub *syasei1
lsp 700,":a;chara\lamp_h2.bmp",0,0
gosub *syasei2
>As soon as Luka is forced inside the Lamp Genie, he accidentally ejaculates.\
mov %viclose,1:gosub *lose
mov %2554,%2554+1:if %2554=1 mov %count_koenemy,%count_koenemy+1
if %2554>%count_most mov %count_most,%2554:mov $count_mostname,$name
mov %count_bouhatu,%count_bouhatu+1
count 1,11
mov $bad1,"Luka accidentally ejaculated as soon as he was forced into the Lamp Genie."
mov $bad2," After being raped, Luka was eaten by the Lamp Genie."
name $name
>Hehe... Did I feel too good for you?@
>That's the first time someone hasn't lasted at least a couple seconds...\
name ""
>After being forced to ejaculate, the Lamp Genie forces me deeper inside.\
goto *lamp_h



*lamp_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\lamp_h2.bmp",0,0
gosub *syasei2
>Unable to endure the overwhelming pleasure from the Lamp Genie, Luka is forced to ejaculate.\
mov %viclose,1:gosub *lose
mov %2554,%2554+1:if %2554=1 mov %count_koenemy,%count_koenemy+1
if %2554>%count_most mov %count_most,%2554:mov $count_mostname,$name
count 1,11
mov $bad1,"While being raped by the Lamp Genie, Luka ascended to heaven."
mov $bad2," After being raped, Luka was eaten by the Lamp Genie."
name $name
>Hehe... The proof of your pleasure is spreading through me...@
>Were you able to get a taste of heaven?\
name ""
>After being forced to ejaculate, the Lamp Genie forces me deeper inside.\
goto *lamp_h



*lamp_h

mov $end_go,"sean0132x"
mov $tatie2,"lamp_st22"
if %2554=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku=1 mov %hseanwave,1:hseanwave:goto *lamp_hb
name "Luka"
>Auuu...\
name ""
>My body relaxes as I feel the sweet lingering feelings from my orgasm.@
>Too exhausted to stop her, the Lamp Genie leans on me.\
name $name
>Let me bring you to a world of carnal desires...\
name ""
mov %hseanwave,1:hseanwave
cspl 690,699
lsp 700,":a;chara\lamp_h1.bmp",0,0:print 10,500
>In an instant, she drops her waist on me.@
>Forced into her, the Lamp Genie's soft vagina wraps around me.\
>With her sticky flesh rubbing against me, I'm instantly intoxicated.@
>Just with insertion, it's already as if I'm in a world of pleasure...\
goto *lamp_hb



*lamp_hb

name "Luka"
>Faaa...@>Too good...\
name ""
>The flesh inside of her starts to slowly wriggle as her sticky honey drips out onto me.\
>Even though it's incredibly tight inside of her, the soft walls conform their shape to match my penis.\
name $name
>Shall I send you to heaven now?\
name ""
>The Lamp Genie floats a twisted smile as she starts to move her waist.@
mov %hseanwave,3:hseanwave
>At the same time, the walls of her vagina move and vibrate.\
name "Luka"
>Aiee!\
name ""
>She tightens around me as she softly grinds against me, strangling my penis with her warm walls.\
>The Lamp Genie flashes a seductive smile at me as her devilish pussy floods my lower body with ecstasy.\
name "Luka"
>Ah... This... Is amazing...@
>I'm coming! Ahh!\
name ""
gosub *syasei1
lsp 700,":a;chara\lamp_h2.bmp",0,0
gosub *syasei2
>Quickly after my last orgasm, I'm already brought to another height.@
>Since she started to move, it was only around ten seconds...\
name "Luka"
>Auu... I already came...\
name ""
>My lips quiver as I feel disgraced at coming so quickly.\
name $name
>...Don't be ashamed.@
>There is no man who can withstand my sexual skills.\
>Now... Abandon your pride and drown in my body...\
name ""
>After my ejaculation finishes, she starts contracting around my penis in a wave.\
>Deep inside of her, she tightens up.@
>The tightening continues until it reaches my base, then starts back at the tip.\
>At the same time as her rhythmic tightening, the walls of her pussy wriggle and vibrate.\
>The combined stimulations quickly cause me to become intoxicated in the pleasure.\
>I've already become addicted to her...\
name "Luka"
>Faaa...\
name ""
name $name
>It feels good, right?@>Put out everything in me...@
>Let out all of your semen without holding anything back...\
name ""
name "Luka"
>Auuu...\
name ""
gosub *syasei1:gosub *syasei2
>Unable to resist her body, I pour more of the proof of my surrender in her.\
>I'm already drowning in the overpowering pleasure...\
name "Luka"
>Faaa... Incredible...\
name ""
name $name
>Hehehe... Is it unbearable?@
>Shall I make it even better with something more... Amazing?\
name ""
name "Luka"
>Auu... Please...\
name ""
>How can something be better than this...?@
>I want to feel it...\
name $name
>Well then...\
name ""
lsp 700,":a;chara\lamp_h3.bmp",0,0:print 10,500
>Purple smoke covers the bottom half of her body.@
mov %hseanwave,12:hseanwave
>At the same time, a strange feeling hits the lower half of my body!\
name "Luka"
>Auuu!!\
name ""
>A warm, slimy feeling wraps around my penis.@
>The incredible pleasure causes my waist to shake.\
name "Luka"
>Auuu... What is this...?@
>It's too good...! Ahhh!\
name ""
name $name
>Haha... Isn't it wonderful?@
>You'll reach heaven for sure with this...\
name ""
name "Luka"
>This feels... Incredible...\
name ""
>The soft, slimy feeling covers more of my penis.\
>No... Not just there...@
>The pleasurable feeling is covering the entire lower half of my body.\
>I can't see what she's doing because of the purple smoke...@
>But I'm too drunk on the pleasure to care...\
name $name
>That's good...@> Give everything to me...\
name ""
name "Luka"
>Auu... I'm coming!@
>Ahhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\lamp_h4.bmp",0,0
gosub *syasei2
mov %hseanwave,0:hseanwave
>Unable to feel anything but the pleasure forced into me, I ejaculate inside of her again.\
name "Luka"
>Faaa... Incredible...\
name ""
name $name
>Hehehe... Do you want to see what I'm doing?@
>Now... Take a close look...\
name ""
name "Luka"
>Eh...?\
name ""
>The purple smoke covering her body starts to float away.@
lsp 700,":a;chara\lamp_h5.bmp",0,0:print 10,500
>And suddenly reveals what's happening!\
>The lower half of my body is stuck inside of a huge mouth!\
name "Luka"
>Uwaaaa!!\
name ""
>The pleasure from before was from this mouth...@
>This thing was what made me come!?\
name "Luka"
>Aiee!@>Get off!\
name ""
>I start to struggle with all of my leftover power.@
>But with my feet already down this monsters throat, my movements don't do anything.\
name $name
>Why are you struggling?@
>You looked so happy a few moments ago.\
name ""
name "Luka"
>Stop...@>Auu!\
name ""
mov %hseanwave,12:hseanwave
>The rough tongue starts to lick me all over my lower body.\
>After tasting my body, the tongue wraps around my penis.@
>This is the same stimulation I was feeling before in the purple smoke...\
>This huge tongue...@
>Dripping with saliva, it tightly wraps around my penis.\
name "Luka"
>Ahh...@> Ahhh!\
name ""
>The pleasure from before attacks me again.@
>But now I know what's really causing it...\
>Fear and disgust mixes in my body as the tongue attacks me.@
>But held in this giant mouth, I'm completely powerless to escape.\
name $name
>This is the payment for your wish...@
>As you wished, I gave you pleasure.\
>As compensation, I get you...\
name ""
>While my body is covered in more saliva, I feel myself slowly being drawn further into her mouth.\
>Each lick of her tongue seems to be pulling me deeper and deeper...\
name "Luka"
>Stop...@>Faaa!\
name ""
>The horrifying pleasure forces me to another height.\
gosub *syasei1
lsp 700,":a;chara\lamp_h6.bmp",0,0
gosub *syasei2
name "Luka"
>Stop...@>I don't want this!\
name ""
name $name
>Hehe... It's pointless even if you beg.@
>There's no escape from me any longer.\
>You need to compensate me for the pleasure I gave.@
>You have no choice but to be eaten by me...\
name ""
>Too weak to resist, I'm slowly forced deeper into her mouth.@
>I feel her throat wriggling around my feet as it slowly pulls me in.\
name "Luka"
>Ahh! Stop!@> Help!\
name ""
name $name
>Say goodbye to the outside world...@
>I'll swallow you whole and send you to heaven!\
name ""
if %hosyoku_cut=1 goto *hosyoku_cut
name "Luka"
>Ahhh!\
name ""
lsp 700,":a;chara\lamp_h7.bmp",0,0:print 10,500
>With a final pull, I'm forced all the way inside of her.@
lsp 690,":a;chara\lamp_ct01.bmp",400,0:print 10,500
>Pulled through her narrow throat, I'm forced into her stomach.\
name "Luka"
>No... No...\
name ""
mov %hseanwave,13:hseanwave
>The pink stomach wriggles and vibrates all around me.@
lsp 690,":a;chara\lamp_ct02.bmp",400,0:print 10,500
>Suddenly, digestive juices start to flow out into her stomach.\
>The warm liquid splashes all over me.@
>But unexpectedly, with the warmth comes an unnatural ecstasy.\
name "Luka"
>Faaa...\
name ""
>An artificial ecstasy starts to eat away at my body.@
>For some reason, these hateful juices are forcing my fear to go away.\
>The strange pleasure finally reaches my groin.@
gosub *syasei1
lsp 690,":a;chara\lamp_ct03.bmp",400,0
gosub *syasei2
>Stuck in her stomach, I'm still being forced to ejaculate...\
name "Luka"
>Faa... I came...\
name ""
>My body relaxes even more after that last orgasm.@
>Unable to think clearly, I give in to the the digestion.\
lsp 690,":a;chara\lamp_ct04.bmp",400,0:print 10,500
name "Luka"
>Auu... I'm being dissolved...\
name ""
>As the juices cover more of my body, so does the ecstasy.@
>It's as if I'm a baby being comforted in my mother's womb...\
>This sweet, sweet intoxication is causing both my mind and body to melt.\
name "Luka"
>Ahh...\
name ""
>I'm going to slowly dissolve away...@
>For some reason, the thought of being her food is making me happy...\
name "Luka"
>Aa...a...\
name ""
>Fully drunk on that fake ecstasy, my body is digested by the Lamp Genie.\
gosub *anten
mov %hseanwave,0:hseanwave
>Thus, another adventurer was made into the Lamp Genie's food.\
>That's the compensation they must pay for their wish...@
>Waiting for her next meal, the Lamp Genie waits in the desert...\
>.................\
goto *badend



*mummy_start

mov $name,"Mummy Girl"
mov $name2,"Mummy Girl"
mov $lavel,"mummy"
mov $tatie1,"mummy_st01"
mov $tatie2,"mummy_st02"
mov $tatie3,"mummy_st03"
mov $tatie4,"mummy_st11"
mov $haikei,"bg068"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,1300
if %nanido=2 mov %max_enemylife,1625
if %nanido=3 mov %max_enemylife,1950
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,1
mov %tikei,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free of the bandages!"
mov $mogaku_anno2,"Luka pulled off the bandages!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Useless..."
mov $mogaku_sel2,"I'll defeat you like this..."
mov $mogaku_sel3,"Powerless..."
mov $mogaku_sel4,"Useless struggling..."
mov $mogaku_sel5,"You can't break free of my restraint like that..."
mov $mogaku_dassyutu1,"How... You escaped?"
mov $mogaku_dassyutu2,""
mov $half_s1,"Immature..."
mov $half_s2,"I'll squeeze everything out..."
mov $kiki_s1,"With strength like that, you don't qualify to move on..."
mov $kiki_s2,"I'll suck you up as food instead..."
mov %end_n,5
mov %exp_minus,0
mov %zmonster_x,-280
name $name
>Humans undergoing the trial...@
>If you wish to continue, you must first defeat me.\
name ""
name "Luka"
>No, I'm not actually going through the trial...\
name ""
name "Sara"
>I will defeat you and continue the trial!\
name ""
name "Luka"
>Err, no... I'm actually...\
name ""
>...Can we not avoid this fight?@
>I'm still unsure of Sara's ability...@>But she's bravely holding her sword up at the Mummy Girl.\
>It looks like I'll need to give it my all!\
mov %sinkou,1
goto *common_main



*mummy001

rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Haa!"
if %ransu=2 mov $sel1,"Hya!"
if %ransu=3 mov $sel1,"Ah!"
name "Sara"
eng $sel1:$sel6\
name ""
>Sara attacks!
dwave 1,"se\slash.ogg"
rnd2 %damage,20,30:gosub *sara_enemylife2
if %enemylife=0 goto *mummy_v2
name "Luka"
>....................\
name ""
>She isn't weak, but she isn't particularly powerful either...@
>This may make fighting difficult if I have to protect her...\
rnd2 %ransu,1,2
if %ransu=1 gosub *mummy_a1
if %ransu=2 gosub *mummy_a2
name "Luka"
>Gah...\
name ""
>It seems as though I won't need to defend her after all...@
>This monster seems intent on beating me first...\
mov %sinkou,2
goto *common_main



*mummy_v

gosub *face3
name $name
>Magnificent... Continue on...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Mummy vanishes, leaving behind nothing but bandages!\
mov %viclose,1:gosub *victory
mov %getexp,2000:gosub *lvup
mov %2255,1
goto *sean0137



*mummy_v2

if %nanido>0 mov %count_sara,1
gosub *face3
name $name
>Gah...\
name ""
if %kousoku=0 skip 4
dwave 1,"se\dassyutu.ogg"
mov %kousoku,0:gosub *status_print
>Luka breaks out of the bandages!\
name "Luka"
>Alright, now!\
name ""
mov %before_action,1
gosub *mp_kaihuku:gosub *mp
gosub *common_attack2
name $name
>Magnificent... Continue on...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Mummy vanishes, leaving behind nothing but bandages!\
mov %viclose,1:gosub *victory
mov %getexp,2000:gosub *lvup
mov %2255,1
goto *sean0137



*mummy_kousan

gosub *kousan_syori
>Luka yields to temptation, ending his resistance!\
name "Sara"
>Eh?@>What!?@
>What the hell are you doing!?\
name ""
name $name
>Be quiet, nuisance...\
name ""
name "Sara"
>Kya!\
name ""
dwave 1,"se\umaru.ogg"
>Sara is rolled up in the Mummy Girl's bandages!\
gosub *face2
name $name
>Giving up already? You aren't qualified to continue on...@
>I'll suck up everything of yours right here...\
name ""
goto *mummy_a



*mummy_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *mummy_kousan
if %cmd1=16 goto *mummy_onedari
if %cmd1=17 goto *common_skill
goto *mummy_main



*mummy_a

if %kousan>0 skip 3
if %sinkou=1 goto *mummy001
gosub *mummy_sara
if %kousoku=1 rnd2 %ransu,1,16
if %kousoku=1 && %ransu<4 gosub *mummy_a4:gosub *mummy_a4:goto *common_main
if %kousoku=1 && %ransu<7 gosub *mummy_a4:gosub *mummy_a5:goto *common_main
if %kousoku=1 && %ransu<10 gosub *mummy_a5:gosub *mummy_a4:goto *common_main
if %kousoku=1 && %ransu<13 gosub *mummy_a5:gosub *mummy_a5:goto *common_main
if %kousoku=1 && %ransu>12 gosub *mummy_a6:goto *common_main
rnd2 %ransu,1,3
if %ransu=1 gosub *mummy_a1:goto *common_main
if %ransu=2 gosub *mummy_a2:goto *common_main
if %ransu=3 && %owaza_count1a>3 gosub *mummy_a3:goto *common_main
skip -4



*mummy_sara

add %stack,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Haa!"
if %ransu=2 mov $sel1,"Damn you!"
if %ransu=3 mov $sel1,"Take this!"
if %kousoku=1 && %ransu=1 mov $sel1,"Ahh! What are you doing!?"
if %kousoku=1 && %ransu=2 mov $sel1,"L..Luka! I'm coming to help you!"
if %kousoku=1 && %ransu=3 mov $sel1,"Damn you! Get off Luka!"
name "Sara"
eng $sel1:$sel6\
name ""
>Sara attacks!
dwave 1,"se\slash.ogg"
rnd2 %damage,20,30:gosub *sara_enemylife2
if %enemylife=0 sub %stack,1:return *mummy_v2
sub %stack,1
return



*mummy_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll squeeze you with this hand..."
if %ransu=2 mov $sel1,"Be defeated by my hand..."
if %ransu=3 mov $sel1,"If you can't endure this, you aren't qualified..."
name $name
eng $sel1:$sel6\
name ""
skillname "Mummy Handjob"
dwave 1,"se\ero_koki1.ogg"
eng "The Mummy Girl reaches her hand out to Luka's groin!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,40
if %wind=1 && %nanido=2 mov %wind_kakuritu,40
if %wind=1 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes her back!":gosub *wind_guard:sub %stack,1:return
\
>With her bandages wrapping around Luka's penis, she strokes his penis!
skillcount1 3216
if %nanido<2 damage 18,22
if %nanido=2 damage 27,33
if %nanido=3 damage 36,44
skillname ""
if %mylife=0 sub %stack,1:return *mummy_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*mummy_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll bring your whole body to a new height..."
if %ransu=2 mov $sel1,"I'll tighten around you..."
if %ransu=3 mov $sel1,"I'll make it nice and tight..."
name $name
eng $sel1:$sel6\
name ""
skillname "Mummy Bandage"
dwave 1,"se\umaru.ogg"
eng "One of the Mummy Girl's bandages shoots toward Luka!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,40
if %wind=1 && %nanido=2 mov %wind_kakuritu,40
if %wind=1 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes it away!":gosub *wind_guard:sub %stack,1:return
\
>The bandage wraps tightly around Luka's penis!
skillcount1 3217
if %nanido<2 damage 20,25
if %nanido=2 damage 30,37
if %nanido=3 damage 40,50
skillname ""
if %mylife=0 sub %stack,1:return *mummy_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*mummy_a3

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name $name
>I'll take your freedom...\
name ""
skillname "Mummy Hold"
dwave 1,"se\umaru.ogg"
>One of the Mummy Girl's bandages coils around Luka's body!
if %wind=1 && %nanido<2 mov %wind_kakuritu,40
if %wind=1 && %nanido=2 mov %wind_kakuritu,40
if %wind=1 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes it away!":gosub *wind_guard:sub %stack,1:return
if %nanido<2 damage 20,25
if %nanido=2 damage 30,37
if %nanido=3 damage 40,50
mov %kousoku,1:gosub *status_print
>Luka has been wrapped by the Mummy Girl's bandages!\
skillname ""
if %mylife=0 sub %stack,1:return *mummy_h3
if %kousan=2 sub %stack,1:return
gosub *face2
name $name
if %first_sel1=1 skip 3
>I'll play with you like this...\
skip 2
>This time, I won't let you go...\
name ""
mov %first_sel1,1
if %nanido<2 mov %genmogaku,2
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,3
sub %stack,1
return



*mummy_a4

add %stack,1
>Luka is wrapped by the Mummy Girl's bandages!\
skillcount1 3218
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Shoot the proof of your defeat all over..."
if %ransu=2 mov $sel1,"This will feel good..."
if %ransu=3 mov $sel1,"I'll make you come just like this..."
name $name
eng $sel1:$sel6\
name ""
skillname "Holding Bandages"
dwave 1,"se\umaru.ogg"
>The bandage wrapped around Luka's penis quickly moves up and down!
if %nanido<2 damage 15,22
if %nanido=2 damage 22,33
if %nanido=3 damage 30,33
skillname ""
if %mylife=0 sub %stack,1:return *mummy_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*mummy_a5

add %stack,1
>Luka is wrapped by the Mummy Girl's bandages!\
skillcount1 3219
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll strangle every part of your body with my bandage..."
if %ransu=2 mov $sel1,"It might hurt..."
if %ransu=3 mov $sel1,"If this make you surrender, you weren't qualified..."
name $name
eng $sel1:$sel6\
name ""
skillname "Holding Nightmare"
dwave 1,"se\ero_simetuke1.ogg"
>The bandage holding Luka's body wraps tighter around him!\
>The bandage wrapped around Luka's penis tightens too!
if %nanido<2 damage 17,23
if %nanido=2 damage 25,34
if %nanido=3 damage 34,46
skillname ""
if %mylife=0 sub %stack,1:return *mummy_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*mummy_a6

add %stack,1
>Luka is wrapped by the Mummy Girl's bandages!\
name $name
>Get ready...@
>I'll take away your freedom with pleasure...\
name ""
skillname "Mummy Package"
dwave 1,"se\umaru.ogg"
>The Mummy Girl's bandages wrap all over Luka!
if %wind=1 && %nanido<2 mov %wind_kakuritu,100
if %wind=1 && %nanido=2 mov %wind_kakuritu,100
if %wind=1 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind shreds the bandages!":gosub *wind_guard:sub %stack,1:return
skillcount1 3220
mov %damage_kotei,1
damage 35,45
lsp 700,":a;chara\mummy_st12.bmp",0,0:print 10,500
mov %kousoku,2:mov %genmogaku,100
>From head to toe, Luka is covered in bandages!\
skillname ""
if %mylife=0 sub %stack,1:return *mummy_h3
name "Luka"
>Mmmggg!\
name ""
name $name
>Now you can't even move a finger...\
name ""
>The Mummy Girl moves next to Luka!@
>The only thing exposed of Luka from the bandages is his penis!\
name "Luka"
>Mmgg... What are you...\
name ""
name $name
>I'll keep you bound like that and suck everything out...\
name ""
skillcount1 3220
skillname "Mummy Package"
dwave 1,"se\ero_pyu1.ogg"
>The Mummy Girl forces Luka into her pussy!
mov %damage_kotei,1
damage 35,45
if %mylife=0 sub %stack,1:return *mummy_h6
>Luka is being raped by the Mummy Girl!\
name "Luka"
>Mmmmmmm!!\
name ""
>The Mummy Girl's vagina is oddly soft and cold.@
>But even if her interior is soft, it has a strange curve inside of it...\
sub %stack,1
goto *mummy_a7



*mummy_a7

add %stack,1
skillcount1 3220
>Luka is being raped by the Mummy Girl!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Doesn't it feel amazing...?":mov $sel2,"The Mummy Girl's pussy clamps down on Luka's penis!"
if %ransu=2 mov $sel1,"I'll squeeze everything out by tightening around you...":mov $sel2,"The Mummy Girl's vagina squeezes around Luka's penis!"
if %ransu=3 mov $sel1,"I'll suck out everything...":mov $sel2,"Luka's energy is drained out through his penis!"
if %ransu=4 mov $sel1,"There's no escape... Your fate is sealed...":mov $sel2,"The Mummy Girl tightens around Luka!"
if %ransu=5 mov $sel1,"Give me all your energy...":mov $sel2,"Luka is sucked deeper into the Mummy Girl!"
name $name
eng $sel1:$sel6\
name ""
skillname "Mummy Package"
dwave 1,"se\ero_chupa4.ogg"
eng $sel2:$sel6\
>Luka's energy is absorbed!
mov %damage_kotei,1
damage 35,45
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *mummy_h7
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
goto *mummy_a7



*mummy_onedari

mov $list1,"Mummy Handjob"
if %3216>0 mov %list_num1,1
mov $list2,"Mummy Bandage"
if %3217>0 mov %list_num2,1
mov $list3,"Holding Bandage"
if %3218>0 mov %list_num3,1
mov $list4,"Holding Nightmare"
if %3219>0 mov %list_num4,1
mov $list5,"Mummy Package"
if %3220>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *mummy_onedari1
if %cmd1=12 goto *mummy_onedari2
if %cmd1=13 goto *mummy_onedari3
if %cmd1=14 goto *mummy_onedari4
if %cmd1=15 goto *mummy_onedari5
if %cmd1=-1 goto *mummy_main
goto *mummy_onedari



*mummy_onedari1

gosub *onedari_syori
name "Sara"
>Eh?@>What!?@
>What the hell are you doing!?\
name ""
name $name
>Be quiet, nuisance...\
name ""
name "Sara"
>Kya!\
name ""
dwave 1,"se\umaru.ogg"
>Sara is rolled up in the Mummy Girl's bandages!\
gosub *face2
name $name
>You wish to be defeated by my hand?@
>Then I'll do as the fool wants...\
name ""
gosub *mummy_a1
skip -1



*mummy_onedari2

gosub *onedari_syori
name "Sara"
>Eh?@>What!?@
>What the hell are you doing!?\
name ""
name $name
>Be quiet, nuisance...\
name ""
name "Sara"
>Kya!\
name ""
dwave 1,"se\umaru.ogg"
>Sara is rolled up in the Mummy Girl's bandages!\
gosub *face2
name $name
>You wish to be defeated by my bandages?@
>Then I'll do as the fool wants...\
name ""
gosub *mummy_a2
skip -1



*mummy_onedari3

gosub *onedari_syori_k
name "Sara"
>Eh?@>What!?@
>What the hell are you doing!?\
name ""
name $name
>Be quiet, nuisance...\
name ""
name "Sara"
>Kya!\
name ""
dwave 1,"se\umaru.ogg"
>Sara is rolled up in the Mummy Girl's bandages!\
gosub *face2
name $name
>You wish to be squeezed while bound in my bandages?@
>Then I'll do as the fool wants...\
name ""
if %kousoku=0 gosub *mummy_a3
gosub *mummy_a4
skip -1



*mummy_onedari4

gosub *onedari_syori_k
name "Sara"
>Eh?@>What!?@
>What the hell are you doing!?\
name ""
name $name
>Be quiet, nuisance...\
name ""
name "Sara"
>Kya!\
name ""
dwave 1,"se\umaru.ogg"
>Sara is rolled up in the Mummy Girl's bandages!\
gosub *face2
name $name
>You wish to be squeezed while bound in my bandages?@
>Then I'll do as the fool wants...\
name ""
if %kousoku=0 gosub *mummy_a3
gosub *mummy_a5
skip -1



*mummy_onedari5

gosub *onedari_syori_k
name "Sara"
>Eh?@>What!?@
>What the hell are you doing!?\
name ""
name $name
>Be quiet, nuisance...\
name ""
name "Sara"
>Kya!\
name ""
dwave 1,"se\umaru.ogg"
>Sara is rolled up in the Mummy Girl's bandages!\
gosub *face2
name $name
>You wish to be defeated by my ultimate pleasure?@
>Then I'll squeeze the fool dry...\
name ""
if %kousoku=0 gosub *mummy_a3
gosub *mummy_a6



*mummy_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\mummy_bk03.bmp",0,0
gosub *syasei2
>Stimulated by the Mummy Girl's bandage-covered hand, Luka finally ejaculates.\
mov %viclose,1:gosub *lose
mov %2555,%2555+1:if %2555=1 mov %count_koenemy,%count_koenemy+1
if %2555>%count_most mov %count_most,%2555:mov $count_mostname,$name
count 5,4
mov $bad1,"Luka succumbed to the Mummy Girl's handjob."
mov $bad2," Luka was squeezed dry by the Mummy Girl's intense milking."
gosub *face2
name $name
>...You shot it all on my hand.@
>You aren't qualified to continue on...\
name ""
goto *mummy_h



*mummy_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\mummy_bk04.bmp",0,0
gosub *syasei2
>With his whole body being played with by her bandages, Luka finally ejaculates.\
mov %viclose,1:gosub *lose
mov %2555,%2555+1:if %2555=1 mov %count_koenemy,%count_koenemy+1
if %2555>%count_most mov %count_most,%2555:mov $count_mostname,$name
count 27,4
mov $bad1,"Luka succumbed to the Mummy Girl's bandages."
mov $bad2," Luka was squeezed dry by the Mummy Girl's intense milking."
gosub *face2
name $name
>...You shot it all over my bandages.@
>You aren't qualified to continue on...\
name ""
goto *mummy_h



*mummy_h3

mov %ikigoe,3:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>While being rolled up in the Mummy Girl's bandages, the feeling of the bandages wrapping around Luka was too much for him as he ejaculates.\
mov %viclose,1:gosub *lose
mov %2555,%2555+1:if %2555=1 mov %count_koenemy,%count_koenemy+1
if %2555>%count_most mov %count_most,%2555:mov $count_mostname,$name
mov %count_bouhatu,%count_bouhatu+1
count 27,4
mov $bad1,"Luka ejaculated as the Mummy Girl wrapped him up."
mov $bad2," Luka was squeezed dry by the Mummy Girl's intense milking."
name $name
>Exhausted while being wrapped up... Pathetic...@
>You aren't qualified to continue on...\
name ""
goto *mummy_h



*mummy_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>Played with by the Mummy Girl's bandages while bound, Luka ejaculates.\
mov %viclose,1:gosub *lose
mov %2555,%2555+1:if %2555=1 mov %count_koenemy,%count_koenemy+1
if %2555>%count_most mov %count_most,%2555:mov $count_mostname,$name
count 27,4
mov $bad1,"Luka succumbed to the Mummy Girl's bandages while bound."
mov $bad2," Luka was squeezed dry by the Mummy Girl's intense milking."
name $name
>...You shot it all out on my bandages.@
>You aren't qualified to continue on...\
name ""
goto *mummy_h



*mummy_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>Luka shivers as he's strangled by the Mummy Girl's bandages, ejaculating all over her.\
mov %viclose,1:gosub *lose
mov %2555,%2555+1:if %2555=1 mov %count_koenemy,%count_koenemy+1
if %2555>%count_most mov %count_most,%2555:mov $count_mostname,$name
count 16,4
mov $bad1,"Luka succumbed to the Mummy Girl's holding nightmare."
mov $bad2," Luka was squeezed dry by the Mummy Girl's intense milking."
name $name
>...You gave in while being strangled?@
>You aren't qualified to continue on...\
name ""
goto *mummy_h



*mummy_h6

mov %ikigoe,3:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>The moment Luka was forced into the Mummy Girl's cold vagina, he accidentally ejaculates.\
mov %viclose,1:gosub *lose
mov %2555,%2555+1:if %2555=1 mov %count_koenemy,%count_koenemy+1
if %2555>%count_most mov %count_most,%2555:mov $count_mostname,$name
mov %count_bouhatu,%count_bouhatu+1
count 1,4
mov $bad1,"Luka accidentally ejaculated as soon as he was forced into the Mummy Girl."
mov $bad2," Luka was squeezed dry by the Mummy Girl's intense milking."
name $name
>...You're a quick shot.\
name ""
lsp 700,":a;chara\mummy_st02.bmp",0,0
lsp 695,":a;chara\mummy_bk05.bmp",0,0:print 10,500
>The Mummy Girl separates from Luka as his semen slowly drips out of her.\
name $name
>This is the proof of your surrender...@
>A pathetic man like you will go no further...\
name ""
goto *mummy_h



*mummy_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>Luka ejaculates in the Mummy Girl's chilly vagina, unable to endure the overpowering stimulation.\
mov %viclose,1:gosub *lose
mov %2555,%2555+1:if %2555=1 mov %count_koenemy,%count_koenemy+1
if %2555>%count_most mov %count_most,%2555:mov $count_mostname,$name
count 1,4
mov $bad1,"Luka succumbed to the Mummy Girl's mummy package."
mov $bad2," Luka was squeezed dry by the Mummy Girl's intense milking."
name $name
>...Were my insides too much for you?\
name ""
lsp 700,":a;chara\mummy_st02.bmp",0,0
lsp 695,":a;chara\mummy_bk05.bmp",0,0:print 10,500
>The Mummy Girl separates from Luka as his semen slowly drips out of her.\
name $name
>This is the proof of your surrender...@
>A pathetic man like you will go no further...\
name ""
goto *mummy_h



*mummy_h

if %2555=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
dwave 1,"se\umaru.ogg"
>The Mummy Girl's bandages expand and wrap around my hands and feet.\
cspl 690,699
lsp 700,":a;chara\mummy_h1.bmp",0,0:print 10,500
>Unable to move, I'm suspended in midair.\
>The Mummy Girl grabs my dangling penis.\
name "Luka"
>Ah!\
name ""
>I can feel the warmth of her hand through the bandage.@
>The sudden stimulation from her grab makes my body shake.\
name "Sara"
>Kya!@> This bandage...!\
name ""
dwave 1,"se\umaru.ogg"
>A bandage quickly wraps around Sara's body.@
>In an instant, the Mummy Girl has bound both of us.\
name "Sara"
>Luka!@>We have to get away somehow!\
name ""
name $name
>It's futile, girl.@
>I'll suck up all of this man's energy.\
>After that, I'll suck out all of yours.\
name ""
mov %hseanwave,17:hseanwave
>The Mummy Girl starts to slowly move her hand up and down.\
>Firmly holding on to my dangling penis, she grips me hard at the base and slowly moves down to the tip.\
>Back and forth, just like she was milking a cow...\
name "Luka"
>Stop...!\
name ""
>Suspended in midair, my writhing doesn't accomplish anything.@
>All I do is sway back and forth.\
name $name
>I'll squeeze everything out of you like this, as if you were mere livestock.\
>I'll let your female companion watch you be milked.\
name ""
name "Luka"
>Ahh... Stop...\
name ""
>I keep trying to shake my body as she milks me.@
>But the bandages holding me up don't loosen at all.\
>At this rate, I won't be able to do anything...\
name "Sara"
>Luka!@>You must not come!\
name ""
>Sara stares straight at my pathetic appearance without averting her eyes.\
name $name
>It's useless even if you try to endure.@
>Just surrender to the stimulation...\
name ""
name "Luka"
>Faaa...\
name ""
>After continuing the milking stimulation for a while longer, she starts to slowly change her movements.\
>She makes a small circle with her thumb and forefinger around the tip of my penis, as her palm tightens around the shaft.\
>Holding me in a new way, she resumes the milking movements.\
>Additionally, Sara is watching everything that's happening...@
>The disgrace causes a sick excitement to rise in me, as I feel an orgasm start to boil up.\
name $name
>It looks like you're about to come...@
>Show your companion the proof of your failure.\
name ""
name "Luka"
>Stop... I'm going to come...\
name ""
>The rhythmic stimulation of her milking is too much for me...\
name "Sara"
>Wait, Luka!@
>Don't let her make you come!\
name ""
name "Luka"
>I can't hold on...@> Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\mummy_h2.bmp",0,0
gosub *syasei2
>I finally come due to the Mummy Girl's milking...@
>Still hanging in the air, my semen shoots straight down onto the floor.\
>The humiliation of being milked like an animal fills my mind.\
name "Luka"
>Faa...\
name ""
name "Sara"
>Luka...\
name ""
>Sara watched me surrender to her hand...@
>Filled with misery, I relax my body.\
name $name
>...The man gave up.@
>Well, girl. Isn't your companion pathetic?\
name ""
name "Sara"
>Wait, Luka!@>Get a hold of yourself!\
name ""
name "Luka"
>Auuu...\
name ""
>The Mummy Girl grabs onto my penis again.@
>She resumes her milking movements, forcing the leftover semen in my urethra to spill out.\
>In front of Sara, she makes sure that every drop of my disgrace pours onto the floor.\
name $name
>Now, I'll squeeze out even more.@
>Watch closely, girl... As I squeeze everything out of your companion.\
name ""
lsp 700,":a;chara\mummy_h3.bmp",0,0:print 10,500
>A bandage expands and wraps around my penis.@
>In an instant, it's tightly wrapped all the way around me.\
name "Luka"
>Aie!@> What is this...?\
name ""
>A strange sense attacks me everywhere the bandage touches.@
>A soft feeling of ecstasy slowly spreads through my waist from the bandages wrapped around my penis.\
name $name
>This bandage has energy extraction magic in it.@
>While giving unparalleled pleasure, it will take everything from you...\
name ""
name "Luka"
>Ahhh!\
name ""
>As the sweet euphoria spreads through my body, it isn't possible for me to resist against the rising desire.\
>Shaking my waist pointlessly in midair, I give in to the pleasure.\
gosub *syasei1
lsp 700,":a;chara\mummy_h4.bmp",0,0:print 10,500
gosub *syasei2
name "Luka"
>Faaa...\
name ""
>Awash in pleasure, I give in to the orgasm.@
>But my ejaculation doesn't feel like the last ones.\
>Instead of spurts, it feels like something is continually flowing out of me.\
>The accompanying pleasure is anything but ordinary, too.\
name "Luka"
>Faaa... This is amazing...\
name ""
name "Sara"
>Stop, Luka!@
>Don't give in!@> Please fight against it!!\
name ""
>Awash in the pleasure, I faintly hear Sara's voice.@
>She's closely watching my miserable appearance...\
>But even then, I can't stop it...\
gosub *syasei1:gosub *syasei2
name "Luka"
>Ahh... I came again...\
name ""
name "Sara"
>Stop!@>You can't keep coming like that!@
>You have to resist somehow!\
name ""
name $name
>It's useless, girl.@
>Human males are helpless when you stimulate them like this.@
>Haven't you already understood this from watching him?\
name ""
name "Luka"
>Faaa...\
name ""
gosub *syasei1:gosub *syasei2
>Drowning in the pleasure from her strange bandage, I orgasm one after another.\
>Sara's eyes turn from horror into disgust at me.\
name "Sara"
>Letting a monster do that to you!@>You're the worst!\
name ""
name "Luka"
>But this... Ahhh!\
name ""
>Another sweet discharge feeling comes over me.@
>But it isn't semen...@
>Unable to control myself because of the pleasure, I was peeing onto the floor.\
name "Luka"
>Auuu...\
name ""
name $name
>...Unable to control yourself because of the pleasure.@
>You've reached a new low, boy.\
name "Sara"
>You're... the worst...\
name ""
>Sara stays silent after muttering that.@
>Not saying anything more, she just stares at me with hate and contempt.\
name "Luka"
>Faaa...\
name ""
gosub *syasei1:gosub *syasei2
>But the pleasure doesn't stop.@
>More semen shoots out of me onto the floor, mixing with the urine.\
>Fatigue starts to spread through my body.@
>The more I ejaculate, the more my thoughts become hazy.\
name "Luka"
>Auuu...\
name ""
name $name
>Are you feeling faint...?@
>I'm squeezing out your life itself, along with your semen...\
>That's the fate of one who fails the trial.@
>Having their life slowly squeezed out and spilled onto the Pyramid floor...\
name ""
name "Luka"
>Faaa...\
name ""
gosub *syasei1:gosub *syasei2
>Unable to feel anything but the ecstasy, I start to lose consciousness.@
>Suspended in midair, it's as if I'm already just a spirit...\
gosub *syasei1:gosub *syasei2
gosub *anten
mov %hseanwave,0:hseanwave
>Squeezed dry, the proof of my life was all over the Pyramid's floor.\
>This is the end of one who failed the trial...@
>My life, as well as my adventure, ends here.\
>..................\
goto *badend



*kobura_start

mov $name,"Cobra Girl"
mov $name2,"Cobra Girl"
mov $lavel,"kobura"
mov $tatie1,"kobura_st01"
mov $tatie2,"kobura_st02"
mov $tatie3,"kobura_st03"
mov $tatie4,"kobura_h1"
mov $haikei,"bg068"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,1400
if %nanido=2 mov %max_enemylife,1600
if %nanido=3 mov %max_enemylife,1800
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,1
mov %tikei,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"I'll tighten around you so you can't escape..."
mov $mogaku_sel2,"Useless! Hahaha!"
mov $mogaku_sel3,"It looks like you want me to make it tighter..."
mov $mogaku_sel4,"The more you resist, the more I tighten..."
mov $mogaku_sel5,"Hahaha! Is it painful? Struggle more!"
mov $mogaku_dassyutu1,"You didn't like my constriction?"
mov $mogaku_dassyutu2,""
mov $half_s1,"Did you want to advance further?"
mov $half_s2,"Or would you rather be my food?"
mov $kiki_s1,"It looks like you don't deserve to continue on."
mov $kiki_s2,"You'll meet your end right here..."
mov %end_n,5
mov %exp_minus,2000
mov %zmonster_x,-280
mov %tukix,330
mov %owaza_count1a,3
name $name
>Under instructions from Sphinx, I cannot let anyone weak pass.@
>I shall eat both of you here.\
name ""
>A subspecies of Lamia blocks our path.\
name "Sara"
>Get out of our way!@
>In order to finish the trial, I have to get by!\
name ""
name "Luka"
>Uhh, actually I...\
name ""
>Honestly I don't care about the trial.@
>But it doesn't seem like the Cobra Girl would let me by anyway!\
goto *common_main



*kobura_v

gosub *face3
name $name
>How could I... Be defeated like this!?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Cobra Girl turns into a normal cobra!\
mov %viclose,1:gosub *victory
mov %getexp,2200:gosub *lvup
mov %2256,1
goto *sean0138



*kobura_v2

if %nanido>0 mov %count_sara,1
gosub *face3
name $name
>Guh... How impudent!\
name ""
if %kousoku=0 skip 4
dwave 1,"se\dassyutu.ogg"
mov %kousoku,0:gosub *status_print
>Luka broke free of the tail!\
name "Luka"
>Alright, now!\
name ""
mov %before_action,1
gosub *mp_kaihuku:gosub *mp
gosub *common_attack2
name $name
>How... Could I!?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Cobra Girl turns into a normal cobra!\
mov %viclose,1:gosub *victory
mov %getexp,2200:gosub *lvup
mov %2256,1
goto *sean0138



*kobura_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *kobura_kousan
if %cmd1=16 goto *kobura_onedari
if %cmd1=17 goto *common_skill
goto *kobura_main



*kobura_kousan

gosub *kousan_syori
>Luka yields to the temptation, ending his resistance!\
name "Sara"
>Wait, Luka!@>What are you doing!?\
name ""
name $name
>Hehe... The man gave up.@
>You don't stand a chance little girl!\
name ""
name "Sara"
>Guh... Damn it... Kya!\
name ""
dwave 1,"se\ero_simetuke1.ogg"
>The Cobra Girl's tail coils around Sara and strangles her!@
>After Sara faints, the Cobra Girl tosses her body away!\
gosub *face2
name $name
>I'll eat her later...@
>First I'll enjoy you...\
name ""
goto *kobura_a



*kobura_a

notif %kousan>0 gosub *kobura_sara
if %kousoku=2 gosub *kobura_a8:goto *common_main
if %kousoku=1 rnd2 %ransu,1,16
if %kousoku=1 && %ransu<4 gosub *kobura_a5:gosub *kobura_a5:goto *common_main
if %kousoku=1 && %ransu<7 gosub *kobura_a5:gosub *kobura_a6:goto *common_main
if %kousoku=1 && %ransu<10 gosub *kobura_a6:gosub *kobura_a5:goto *common_main
if %kousoku=1 && %ransu<13 gosub *kobura_a6:gosub *kobura_a6:goto *common_main
if %kousoku=1 && %ransu>12 gosub *kobura_a7:goto *common_main
rnd2 %ransu,1,4
if %ransu=1 gosub *kobura_a1:goto *common_main
if %ransu=2 gosub *kobura_a2:goto *common_main
if %ransu=3 && %status=0 && %owaza_count2a>3 gosub *kobura_a3:goto *common_main
if %ransu=4 && %owaza_count1a>4 gosub *kobura_a4:goto *common_main
skip -5



*kobura_sara

add %stack,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Haa!"
if %ransu=2 mov $sel1,"Ya!"
if %ransu=3 mov $sel1,"Hya!"
if %kousoku=1 && %ransu=1 mov $sel1,"Ahh geez! What are you doing!?"
if %kousoku=1 && %ransu=2 mov $sel1,"Luka! I'm coming to help!"
if %kousoku=1 && %ransu=3 mov $sel1,"Damn you! Get off Luka!"
if %kousoku=2 && %ransu=1 mov $sel1,"Wait, Luka! What are you doing!"
if %kousoku=2 && %ransu=2 mov $sel1,"Wh...What!?"
if %kousoku=2 && %ransu=3 mov $sel1,"What are you doing! Aren't you a man...!?"
name "Sara"
eng $sel1:$sel6\
name ""
>Sara attacks!
dwave 1,"se\slash.ogg"
rnd2 %damage,20,30:gosub *sara_enemylife2
if %enemylife=0 sub %stack,1:return *kobura_v2
sub %stack,1
return



*kobura_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"It will feel good when I suck..."
if %ransu=2 mov $sel1,"Surrender in my mouth..."
if %ransu=3 mov $sel1,"I'll drink your juice of failure..."
name $name
eng $sel1:$sel6\
name ""
skillname "Cobra Blowjob"
dwave 1,"se\ero_buchu3.ogg"
>The Cobra Girl sucks Luka's penis into her mouth!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,20
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind blows her away!":gosub *wind_guard:sub %stack,1:return
skillcount1 3222
if %nanido<2 damage 20,23
if %nanido=2 damage 26,30
if %nanido=3 damage 36,42
skillname ""
if %mylife=0 sub %stack,1:return *kobura_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kobura_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Shoot your semen all over my chest!"
if %ransu=2 mov $sel1,"I'll defeat you like this..."
if %ransu=3 mov $sel1,"No man can resist this..."
name $name
eng $sel1:$sel6\
name ""
skillname "Cobra Tit Fuck"
dwave 1,"se\ero_koki1.ogg"
>The Cobra Girl squeezes Luka's penis between her breasts!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,20
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind blows her away!":gosub *wind_guard:sub %stack,1:return
skillcount1 3223
if %nanido<2 damage 22,25
if %nanido=2 damage 29,34
if %nanido=3 damage 40,46
skillname ""
if %mylife=0 sub %stack,1:return *kobura_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kobura_a3

add %stack,1
mov %owaza_count2a,0
if %kousan=2 skip 4
name $name
>I'll give you some venom...\
name ""
skillname "Cobra Bite"
eng "The Cobra Girl bites Luka!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,100
if %wind=1 && %nanido=2 mov %wind_kakuritu,100
if %wind=1 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind knocked her away!":gosub *wind_guard:sub %stack,1:return
\
>Venom courses through Luka's body!\
skillcount1 3224
mov %status,2:gosub *status_print
>Luka has been paralyzed!\
skillname ""
name "Luka"
>Uuu...Aaa...\
name ""
name $name
>Don't worry, my venom doesn't kill my prey.@
>It just paralyzes them for a while...\
>Hehe... More than enough time to play with my food.\
name ""
rnd2 %status_turn,3,4
if %nanido=2 rnd2 %status_turn,4,5
if %nanido=3 rnd2 %status_turn,5,6
sub %stack,1
return



*kobura_a4

add %stack,1
mov %owaza_count1a,0
if %kousan>1 skip 7
name $name
if %first_sel1=1 skip 3
>I'll coil around you...\
skip 2
>I'll coil around you again...\
name ""
skillname "Cobra Roll"
dwave 1,"se\ero_simetuke1.ogg"
eng "The Cobra Girl coils around Luka!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,30
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
\
>The Cobra Girl tightly squeezes Luka's body!
if %nanido<2 damage 17,21
if %nanido=2 damage 21,27
if %nanido=3 damage 30,38
mov %kousoku,1:gosub *status_print
>The Cobra Girl is coiled around Luka!\
skillname ""
if %mylife=0 sub %stack,1:return *kobura_h3
if %kousan>1 sub %stack,1:return
gosub *face2
name $name
if %first_sel1=1 skip 4
>Hehe... I caught you.@
>I'll carefully torture you with pleasure...\
skip 3
>I won't let go this time...@
>I'll take care in playing with my prey...\
name ""
mov %first_sel1,1
if %nanido<2 mov %genmogaku,2
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,3
sub %stack,1
return



*kobura_a5

add %stack,1
>The Cobra Girl is coiled around Luka!\
skillcount1 3225
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll make it even tighter..."
if %ransu=2 mov $sel1,"Do you feel good when I hurt you?"
if %ransu=3 mov $sel1,"I want to see you struggle as I hurt you..."
name $name
eng $sel1:$sel6\
name ""
skillname "Nightmare Tightening"
dwave 1,"se\ero_simetuke1.ogg"
>The Cobra Girl's tail crushes Luka!
if %nanido<2 damage 20,23
if %nanido=2 damage 26,30
if %nanido=3 damage 36,42
skillname ""
if %mylife=0 sub %stack,1:return *kobura_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kobura_a6

add %stack,1
>The Cobra Girl is coiled around Luka!\
skillcount1 3226
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Do you want me to tighten around your penis?"
if %ransu=2 mov $sel1,"Haha... I'll play with this too..."
if %ransu=3 mov $sel1,"Hehe... Are you going to leak?"
name $name
eng $sel1:$sel6\
name ""
skillname "Mellow Tail"
dwave 1,"se\ero_koki1.ogg"
>The tip of the Cobra Girl's tail coils around Luka's penis!
if %nanido<2 damage 22,25
if %nanido=2 damage 29,34
if %nanido=3 damage 40,46
skillname ""
if %mylife=0 sub %stack,1:return *kobura_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kobura_a7

add %stack,1
if %kousan>1 skip 6
>The Cobra Girl coils around Luka's body!\
name $name
>It's time to end this...@
>I'll do something special just for you...\
name ""
skillcount1 3227
skillname "Cobra Anal"
dwave 1,"se\ero_pyu4.ogg"
>The tip of the Cobra Girl's tail hovers next to Luka's anus!
if %wind=1 && %nanido<2 mov %wind_kakuritu,100
if %wind=1 && %nanido=2 mov %wind_kakuritu,100
if %wind=1 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But a gust of wind knocks it away!":gosub *wind_guard:sub %stack,1:return
mov %damage_kotei,1
damage 35,40
mov %kousoku,2:mov %genmogaku,100
>It screws into Luka's anus!\
skillname ""
if %mylife=0 sub %stack,1:return *kobura_h6
name "Luka"
>Ahhh!\
name ""
name $name
>Hehe... Does it feel good to be violated like that?@
>I'll let you feel even more of it...\
name ""
mov $mogaku_anno1,"But Luka can't summon any strength while being violated like this!"
mov $mogaku_anno3,"But Luka can't summon any strength while being violated like this!"
mov $mogaku_sel1,"Just be quiet while I violate you..."
mov $mogaku_sel2,"The struggling just makes it worse! Hahaha!"
mov $mogaku_sel3,"It's pointless to struggle... Just give in..."
mov $mogaku_sel4,"Struggling just makes it worse."
mov $mogaku_sel5,"How pathetic! Hahaha!"
sub %stack,1
return



*kobura_a8

add %stack,1
skillcount1 3227
>Luka is being violated!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Looking so pathetic in front of your companion...":mov $sel2,"The Cobra Girl's tail quickly goes in and out of Luka's anus!"
if %ransu=2 mov $sel1,"Enjoying this pleasure in front of your companion... How shameful!":mov $sel2,"The Cobra Girl's tail spins in Luka's anus!"
if %ransu=3 mov $sel1,"Shoot it out in front of your companion...":mov $sel2,"The Cobra Girl's tail stimulates Luka's prostate!"
if %ransu=4 mov $sel1,"Hehe... This is a man's weak point.":mov $sel2,"The Cobra Girl's tail wriggles around in Luka's anus!"
if %ransu=5 mov $sel1,"Having an orgasm while stimulated like this...":mov $sel2,"The Cobra Girl's tail goes deep inside Luka's anus!"
if %kousan>0 && %ransu=1 mov $sel1,"Haha... Are you happy? I'm doing what you asked for..."
if %kousan>0 && %ransu=2 mov $sel1,"Wanting to be violated like this... You're quite the pervert."
if %kousan>0 && %ransu=3 mov $sel1,"I'll let you come doing just what you wanted..."
name $name
eng $sel1:$sel6\
name ""
skillname "Cobra Anal"
dwave 1,"se\ero_chupa3.ogg"
eng $sel2:$sel6
mov %damage_kotei,1
damage 35,40
skillname ""
if %mylife=0 sub %stack,1:return *kobura_h7
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kobura_onedari

mov $list1,"Cobra Blowjob"
if %3222>0 mov %list_num1,1
mov $list2,"Cobra Tit Fuck"
if %3223>0 mov %list_num2,1
mov $list3,"Cobra Bite"
if %3224>0 mov %list_num3,1
mov $list4,"Nightmare Tightening"
if %3225>0 mov %list_num4,1
mov $list5,"Mellow Tail"
if %3226>0 mov %list_num5,1
mov $list6,"Cobra Anal"
if %3227>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *kobura_onedari1
if %cmd1=12 goto *kobura_onedari2
if %cmd1=13 goto *kobura_onedari3
if %cmd1=14 goto *kobura_onedari4
if %cmd1=15 goto *kobura_onedari5
if %cmd1=16 goto *kobura_onedari6
if %cmd1=-1 goto *kobura_main
goto *kobura_onedari



*kobura_onedari1

gosub *onedari_syori
name "Sara"
>Wait, Luka!@>What are you doing!?\
name ""
name $name
>Hehe... The man gave up.@
>You don't stand a chance little girl!\
name ""
name "Sara"
>Guh... Damn it... Kya!\
name ""
dwave 1,"se\ero_simetuke1.ogg"
>The Cobra Girl's tail coils around Sara and strangles her!@
>After Sara faints, the Cobra Girl tosses her body away!\
gosub *face2
name $name
>I'll eat her later...@
>First I'll enjoy you...\
>So you want me to play with you with my mouth?@
>Then let me drink it all...\
name ""
gosub *kobura_a1
skip -1



*kobura_onedari2

gosub *onedari_syori
name "Sara"
>Wait, Luka!@>What are you doing!?\
name ""
name $name
>Hehe... The man gave up.@
>You don't stand a chance little girl!\
name ""
name "Sara"
>Guh... Damn it... Kya!\
name ""
dwave 1,"se\ero_simetuke1.ogg"
>The Cobra Girl's tail coils around Sara and strangles her!@
>After Sara faints, the Cobra Girl tosses her body away!\
gosub *face2
name $name
>I'll eat her later...@
>First I'll enjoy you...\
>So you want me to play with you with my chest?@
>Then make sure you cover me in the proof of your surrender...\
name ""
gosub *kobura_a2
skip -1



*kobura_onedari3

gosub *onedari_syori
name "Sara"
>Wait, Luka!@>What are you doing!?\
name ""
name $name
>Hehe... The man gave up.@
>You don't stand a chance little girl!\
name ""
name "Sara"
>Guh... Damn it... Kya!\
name ""
dwave 1,"se\ero_simetuke1.ogg"
>The Cobra Girl's tail coils around Sara and strangles her!@
>After Sara faints, the Cobra Girl tosses her body away!\
gosub *face2
name $name
>I'll eat her later...@
>First I'll enjoy you...\
>Hehe... You want to be made numb by my venom?@
>Played with while unable to move... What a miserable request.\
name ""
gosub *kobura_a3
mov %kousan,3
goto *kobura_a



*kobura_onedari4

gosub *onedari_syori_k
name "Sara"
>Wait, Luka!@>What are you doing!?\
name ""
name $name
>Hehe... The man gave up.@
>You don't stand a chance little girl!\
name ""
name "Sara"
>Guh... Damn it... Kya!\
name ""
dwave 1,"se\ero_simetuke1.ogg"
>The Cobra Girl's tail coils around Sara and strangles her!@
>After Sara faints, the Cobra Girl tosses her body away!\
gosub *face2
name $name
>I'll eat her later...@
>First I'll enjoy you...\
>You want me to strangle you?@
>Like that girl, I'll squeeze you until you faint...\
name ""
if %kousoku=0 gosub *kobura_a4
gosub *kobura_a5
skip -1



*kobura_onedari5

gosub *onedari_syori_k
name "Sara"
>Wait, Luka!@>What are you doing!?\
name ""
name $name
>Hehe... The man gave up.@
>You don't stand a chance little girl!\
name ""
name "Sara"
>Guh... Damn it... Kya!\
name ""
dwave 1,"se\ero_simetuke1.ogg"
>The Cobra Girl's tail coils around Sara and strangles her!@
>After Sara faints, the Cobra Girl tosses her body away!\
gosub *face2
name $name
>I'll eat her later...@
>First I'll enjoy you...\
>Hehe... You want me to strangle your penis?@
>Until you leak in surrender, I'll tighten around it...\
name ""
if %kousoku=0 gosub *kobura_a4
gosub *kobura_a6
skip -1



*kobura_onedari6

gosub *onedari_syori_k
name "Sara"
>Wait, Luka!@>What are you doing!?\
name ""
name $name
>Hehe... The man gave up.@
>You don't stand a chance little girl!\
name ""
name "Sara"
>Guh... Damn it... Kya!\
name ""
dwave 1,"se\ero_simetuke1.ogg"
>The Cobra Girl's tail coils around Sara and strangles her!@
>After Sara faints, the Cobra Girl tosses her body away!\
gosub *face2
name $name
>I'll eat her later...@
>First I'll enjoy you...\
>Even though you're a man, wanting something like that...@
>Alright... I'll make you writhe in the pleasure!\
name ""
if %kousoku=0 gosub *kobura_a4
if %kousoku=1 gosub *kobura_a7
gosub *kobura_a8
skip -1



*kobura_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\kobura_bk01.bmp",0,0
gosub *syasei2
>Unable to endure the Cobra Girl's mouth, Luka finally ejaculates.\
mov %viclose,1:gosub *lose
mov %2556,%2556+1:if %2556=1 mov %count_koenemy,%count_koenemy+1
if %2556>%count_most mov %count_most,%2556:mov $count_mostname,$name
count 4,4
mov $bad1,"Luka succumbed to the Cobra Girl's blowjob."
mov $bad2," Raped like that, Luka was forced to ejaculate until death."
gosub *face2
name $name
>Mmm... You shot out so much in my mouth.@
>How shameful... Haha.\
name ""
goto *kobura_h



*kobura_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\kobura_bk02.bmp",0,0
gosub *syasei2
>Unable to endure the Cobra Girl's breasts crushing his penis, Luka finally ejaculates.\
mov %viclose,1:gosub *lose
mov %2556,%2556+1:if %2556=1 mov %count_koenemy,%count_koenemy+1
if %2556>%count_most mov %count_most,%2556:mov $count_mostname,$name
count 7,4
mov $bad1,"Luka succumbed to the Cobra Girl's tit fuck."
mov $bad2," Raped like that, Luka was forced to ejaculate until death."
gosub *face2
name $name
>You shot out so much on my breasts...@
>How shameful... Haha.\
name ""
goto *kobura_h



*kobura_h3

mov %ikigoe,3:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>While being coiled by the Cobra Girl, Luka ejaculates!\
mov %viclose,1:gosub *lose
mov %2556,%2556+1:if %2556=1 mov %count_koenemy,%count_koenemy+1
if %2556>%count_most mov %count_most,%2556:mov $count_mostname,$name
mov %count_bouhatu,%count_bouhatu+1
count 16,4
mov $bad1,"Luka ejaculated as the Cobra Girl coiled around him."
mov $bad2," Raped like that, Luka was forced to ejaculate until death."
gosub *face2
name $name
>Oh... Leaking just from being coiled.@
>Such a pathetic man...\
name ""
goto *kobura_h



*kobura_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>Squeezed by the Cobra Girl, Luka ejaculates.\
mov %viclose,1:gosub *lose
mov %2556,%2556+1:if %2556=1 mov %count_koenemy,%count_koenemy+1
if %2556>%count_most mov %count_most,%2556:mov $count_mostname,$name
count 16,4
mov $bad1,"Luka succumbed to the Cobra Girl's nightmare tightening."
mov $bad2," Raped like that, Luka was forced to ejaculate until death."
gosub *face2
name $name
>Haha... Having an orgasm just from being strangled.@
>In fear for your life, was your sexual nature awakened?\
name ""
goto *kobura_h



*kobura_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>Unable to endure the Cobra Girl's tail tightening around his penis, Luka ejaculates.\
mov %viclose,1:gosub *lose
mov %2556,%2556+1:if %2556=1 mov %count_koenemy,%count_koenemy+1
if %2556>%count_most mov %count_most,%2556:mov $count_mostname,$name
count 19,4
mov $bad1,"Luka succumbed to the Cobra Girl's tailjob."
mov $bad2," Raped like that, Luka was forced to ejaculate until death."
gosub *face2
name $name
>Shooting out your semen all over my tail...@
>Such a shameful boy, Haha.\
name ""
goto *kobura_h



*kobura_h6

name "Luka"
>Aiee! Ahhhh!!\
name ""
gosub *syasei1:gosub *syasei2
>The moment the Cobra Girl's tail went into Luka, he ejaculates!\
mov %viclose,1:gosub *lose
mov %2556,%2556+1:if %2556=1 mov %count_koenemy,%count_koenemy+1
if %2556>%count_most mov %count_most,%2556:mov $count_mostname,$name
mov %count_bouhatu,%count_bouhatu+1
count 9,4
mov $bad1,"Luka exploded on accident as soon as the tail went inside him."
mov $bad2," Raped like that, Luka was forced to ejaculate until death."
gosub *face2
name $name
>Oh... Already?@
>Did it feel too good just to be violated?\
name ""
goto *kobura_h



*kobura_h7

name "Luka"
>Aiee! Ahhhh!!\
name ""
gosub *syasei1:gosub *syasei2
>While violated by her tail, Luka ejaculates!\
mov %viclose,1:gosub *lose
mov %2556,%2556+1:if %2556=1 mov %count_koenemy,%count_koenemy+1
if %2556>%count_most mov %count_most,%2556:mov $count_mostname,$name

count 9,4
mov $bad1,"Luka succumbed to the Cobra Girl's anal violation."
mov $bad2," Raped like that, Luka was forced to ejaculate until death."
gosub *face2
name $name
>Hehe... Feeling so good from anal.@
>Even though you're a man... How pathetic.\
name ""
goto *kobura_h



*kobura_h

if %2556=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 skip 9
dwave 1,"se\ero_simetuke1.ogg"
cspl 690,699
lsp 700,":a;chara\kobura_h1.bmp",0,0:print 10,500
>The Cobra Girl's tail coils around my body.@
>Like that, she pulls me right next to her.\
name "Luka"
>Guh... Get off!\
name ""
name "Sara"
>L...Luka!@>Kyaa!\
name ""
dwave 1,"se\ero_simetuke1.ogg"
>The Cobra Girl's tail expands and grabs Sara as well.@
>Like that, both Sara and I are coiled in her long tail.\
name "Sara"
>Ahhh!!\
name ""
>The Cobra Girl's tail tightens around Sara as she screams.@
>It seems as though she's trying to kill Sara!\
name "Luka"
>Stop!!@
>If you have to do that, do it to me!\
name ""
name $name
>Oh... What a brave thing to say.@
>Hehe... I just got an interesting idea for a brave man like you.\
name ""
>The Cobra Girl softly whispers in my ear as she brings me closer.@
>A cruel flash crosses her eyes.\
name $name
>I'll accept your kind offer of replacing the girl...@
>But... If you can't endure it, I'll do it to the girl instead.\
>That is... The more you endure, the less pain the girl will take.\
name ""
name "Luka"
>I... I understand!\
name ""
>Stuck like this, I don't have any choice but to agree...@
>At the very least, I have to let Sara get out of this somehow!\
name $name
>Then I'll start strangling you...@
>But I'll do it with this instead...\
name ""
name "Luka"
>Eh...?\
name ""
>Her tail brings me right up next to her.@
>A dripping wet hole opens up right where her tail meets the human half of her.\
>The tail wrapped around me forces my penis into the Cobra Girl!\
mov %hseanwave,4:hseanwave
lsp 700,":a;chara\kobura_h2.bmp",0,0
lsp 690,":a;chara\kobura_ct01.bmp",0,0:print 10,500
>In an instant, my penis is forced into the Cobra Girl!\
name "Luka"
>Ahhh!@>What are you doing!?\
name ""
>Surprisingly hot, the narrow walls inside of her clamp down on me.@
>The stimulation from that tightness is overwhelming.\
name $name
>I'll strangle your penis like this...@
>Aren't you glad?@> You get pleasure while she gets pain...\
name ""
name "Luka"
>Auuu!\
name ""
>My body shivers as the Cobra Girl's pussy slowly gets even tighter around me.\
name $name
>Don't you remember what I said?@
>If you can't endure this, the girl will suffer.\
>If you ejaculate from this...@
>My tail will get even tighter around this girl.\
name ""
>The part of the tail around Sara slightly moves, causing Sara to groan.\
name "Luka"
>Stop!\
name ""
name $name
>If you want me to stop, you just need to endure this.@
>Now, I'll make it a little tighter...\
name ""
>Saying that, the fleshy walls of her vagina get even narrower.@
>Squeezing my penis from all sides, the stimulation becomes even more overwhelming.\
name "Luka"
>Ahhhh!!\
name ""
>I yell out at her renewed attack on me.\
name $name
>What a nice scream...@
>It doesn't look like you'll be able to endure, does it?\
name ""
name "Luka"
>Uaaa...@>Sara...\
name ""
>I clench my stomach as I try to hold on.@
>Focusing my mind on anything but what's happening to me, I try everything I can think of to endure.\
>But no matter what I do, the tingling feeling continues to spread through my body.\
name $name
>I can make it even tighter you know...@
>I wonder how loud you'll scream this time?\
name ""
name "Luka"
>Auu...\
name ""
>The Cobra Girl squeezes down on the base of my penis at the entrance, and slowly starts to tighten up to the tip.\
>Once the slow wave of tightness finished, the muscles inside of her start to rapidly tighten and loosen, as if vibrating.\
name "Luka"
>Uaaa! What is this!?\
name ""
name "Sara"
>Lu...ka...\
name ""
>While being squeezed by the Cobra Girl's tail, Sara lets out a hoarse voice.\
>I have to hold on for her sake!\
name "Luka"
>Urhg... I can't...\
name ""
name $name
>Hehe... It looks like you're in so much pain.@
>Don't worry, I can help you release it.\
>Well? Don't you want me to make it even better?@
>As long as you don't ejaculate, that girl will be fine.\
name ""
mov %hseanwave,6:hseanwave
>The vibrating muscles inside of her start to move with even more power.\
>As if another snake was inside of her coiling around me, the desire to release flows through my body as my vision starts to go white.\
>The desperation of my body to release in her is slowly breaking down my mind.\
name "Luka"
>Auuuu...@
>I'm... Going to...\
name ""
name $name
>Already admitting defeat? What a pathetic Hero.@
>Now, surrender to me!\
name ""
name "Luka"
>Ahhhh!!\
name ""
>As if giving me her finishing blow, she tightens around me one final time as her vibrating muscles intensity doubles.\
>Unable to hold on anymore, I finally surrender to the desire.\
gosub *syasei1
lsp 700,":a;chara\kobura_h3.bmp",0,0
lsp 690,":a;chara\kobura_ct02.bmp",0,0
gosub *syasei2
name "Luka"
>Ahhh...\
name ""
>With my resistance shattered, I explode in the Cobra Girl.@
>Because I couldn't hold on, Sara is going to be...\
name $name
>Hehe... Too bad.@
>The pleasure you couldn't endure will be transferred to the girl as pain!\
name ""
name "Sara"
>Ahhh!\
name ""
>As the tail tightens around Sara's thin body, she cries out.\
name "Sara"
>Ahhhhhhhhhhhhh!!\
name ""
>Her pain filled voice echoes around the narrow hall of the Pyramid.@
>Because I couldn't hold on, she's in so much pain...\
>The guilt hangs over me as I listen to her.\
name $name
>Hehe... She looks like she's in pain.@
>But it isn't over yet.\
>I'll tighten around both of you at the same time.@
>You get pleasure, she gets pain. Haha!\
name ""
mov %hseanwave,7:hseanwave
>As she says that, the tail around Sara constricts as her pussy tightens around me.\
name "Luka"
>Auuu!\
name ""
name "Sara"
>Kyaaaa!!\
name ""
>As Sara screams in pain, I moan in pleasure.\
name $name
>Hehe...\
name ""
>The Cobra Girl licks her lips as she watches the two of us writhing around.\
name "Luka"
>S..Sara...@> Auuu!\
name ""
>The sweet pleasure makes it impossible to focus on Sara.\
name $name
>The more you ejaculate, the tighter I'll get around the girl.@
>If you don't want her to die, you better endure.\
name ""
name "Luka"
>Ahhh!\
name ""
>Deep inside of the Cobra Girl, her wriggling muscles tighten around the tip of my penis.\
>While squeezing the tip, the rest of her vagina starts to contract and loosen around my penis in a rhythm.\
name "Luka"
>Auuu... S...Sara...\
name ""
name "Sara"
>Ahh... Luka... Help...\
name ""
>With her voice dripping with agony, Sara begs me for help.@
>I have to hold on somehow...\
>But no matter what I try, this pleasure isn't easily resisted.\
name $name
>Shall I force you to come again?@
>Wallow in your inability to save your companion as you doom her.\
name ""
>After she said that, she continues to press the walls of her vagina around my penis, squeezing me even tighter.\
>There's no way I can endure this...\
name "Sara"
>It hurts...@>Help me... Luka...\
name ""
name "Luka"
>Auu... I'm sorry... Sara...@
>I'm coming!@>Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\kobura_h4.bmp",0,0
lsp 690,":a;chara\kobura_ct03.bmp",0,0
gosub *syasei2
>While apologizing to Sara, I yield to the pleasure again as I explode in the Cobra Girl.\
name "Luka"
>Ahhh...\
name ""
>My mind starts to break as Sara's screams of agony mix with the pleasure from my orgasm.\
name $name
>Hehe... You came again.@
>As compensation, this girl will be strangled even tighter.\
name ""
>I hear the Cobra Girl's tail squeezing even harder on Sara.@
>More than before, the Cobra Girl is putting overwhelming strength into her tail to squeeze her.\
name "Sara"
>...A...aa...\
name ""
>With the tail so tight around her chest, she can't even raise her voice.@
>Sara's mouth is agape in an almost silent scream.\
name "Luka"
>Sa...ra...\
name ""
name $name
>Oh, she's in a bad state...@
>If it gets any tighter, she may die.\
>In contrast, look at you.@
>Watching her die while in such a state of ecstasy.\
name ""
name "Luka"
>Auuu...\
name ""
>The muscles in her vagina start to wriggle around me again.\
>If she tightens around Sara any more than that, she will be in serious danger...\
>Even though I know that, I can't endure this pleasure...\
name "Luka"
>Ahhhh...@
>I'm sorry... Sara... I'm coming!\
name ""
gosub *syasei1
lsp 700,":a;chara\kobura_h5.bmp",0,0
lsp 690,":a;chara\kobura_ct04.bmp",0,0
gosub *syasei2
>Quickly yielding again to the pleasure, my body relaxes as I shoot out a death sentence for Sara into the Cobra Girl.\
name $name
>Oh, were you even trying to endure that time?@
>The pleasure you surrendered to will cost the girl...\
name ""
name "Sara"
>...A...\
name ""
>With a final gasp, Sara's body finally goes limp.@
>Did she faint?@> Or...@> No!\
name $name
>Haha... What happened to your companion?@
>Well... She doesn't matter anymore.\
>You already don't care about her, right?@
>Since you came so quickly last time, that is.@
>You didn't even try to endure... You put your pleasure in front of her life.\
name ""
>Trying to forget about the responsibility for her death, I immerse myself in the ecstasy.\
name "Luka"
>Ahhhh...\
name ""
>Already exhausted, I give my body completely to the pleasure.\
name $name
>Hehe... Look how you ended up.@
>Now I'll wring the rest out of you.\
>I'll suck everything out of you until there's nothing left!\
name ""
name "Luka"
>Ahh!!\
name ""
>The Cobra Girl's vagina tightens around me again as her muscles continue to vibrate.\
>Different from the tightening pressure before, it seems like now she's just trying to squeeze everything out of me.\
name "Luka"
>Ahhh... Incredible...@>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>Even as I ejaculate inside of her, the tortuous pleasure she's forcing into me doesn't stop.\
name "Luka"
>Auu... I'm going to come again...\
name ""
name $name
>Shoot out more...@
>Drown yourself in the pleasure until you die.\
name ""
name "Luka"
>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>Each orgasm just makes me feel even more sensitive, increasing the stimulation.\
>Strangled by her soft vagina, my penis rejoices at the pleasure.\
gosub *syasei1:gosub *syasei2
name "Luka"
>Faaa...\
name ""
>My consciousness starts to fade as I'm forced to orgasm one after another.\
gosub *syasei1:gosub *syasei2
>Exhausted by the repeated orgasms, I fall into an eternal sleep while awash in ecstasy.\
gosub *anten
mov %hseanwave,0:hseanwave
>Forced to submit to the pleasure, another adventurer loses their life in the Pyramid.\
>Two adventurers attempted the trial.@> Neither returned.\
>Thus ends two more lives in the Pyramid...\
>...................\
goto *badend



*lamias_start

mov $name,"Nefertiti Lamias"
mov $name2,"Nefertiti Lamias"
mov $lavel,"lamias"
mov $tatie1,"lamias_st01"
mov $tatie2,"lamias_st02"
mov $tatie3,"lamias_st03"
mov $tatie4,"lamias_st02"
mov $haikei,"bg068"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,1700
if %nanido=2 mov %max_enemylife,1900
if %nanido=3 mov %max_enemylife,2100
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,1
mov %tikei,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen_plural
mov %end_n,5
mov %exp_minus,4200
mov %zmonster_x,-150
mov %owaza_count1a,2
name "Oldest Lamia"
>Sorry, but we can't let you pass by here.\
name ""
name "Second Lamia"
>Sphinx said to only let strong humans pass by.\
name ""
name "Third Lamia"
>She said we can feed on any weak ones! \
name ""
name "Sara"
>There are a lot of them this time...@
>But with just this many..@>Kyaa!\
name ""
>One of the Lamias suddenly attacks Sara!@
dwave 1,"se\ero_simetuke1.ogg"
>She coils her tail around Sara and quickly seals off her movement!\
name "Sara"
>What!?@> Let me go!\
name ""
name "Oldest Lamia"
>This little girl is pretty weak.\
name ""
name "Second Lamia"
>Hehe... I wonder how the boy is?\
name ""
name "Luka"
>Let go of Sara, or else!\
name ""
>This looks dangerous...@
>I need to help Sara!\
goto *common_main



*lamias_v

gosub *face3
name "Oldest Lamia"
>Kya!\
name ""
name "Second Lamia"
>This human... Is strong!\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Lamias turn into normal snakes!\
mov %viclose,1:gosub *victory
mov %getexp,2500:gosub *lvup
mov %2257,1
goto *sean0139



*lamias_kousan

gosub *kousan_syori
>Luka yields to temptation, ending his resistance.\
name "Sara"
>Wait, Luka!@
>What are you doing!?\
name ""
gosub *face2
name "Oldest Lamia"
>It's pointless even if you scream, girl.@
>This man has given in to desire.\
name ""
name "Second Lamia"
>Haha, how pathetic.@
>Let's play with him together!\
name ""
goto *lamias_a



*lamias_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *lamias_mogaku1
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *lamias_mogaku1
if %cmd1=12 && %genmogaku=0 goto *lamias_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *lamias_kousan
if %cmd1=16 goto *lamias_onedari
if %cmd1=17 goto *common_skill
goto *lamias_main



*lamias_mogaku1

mov %before_action,7
rnd2 %ransu,1,3
if %cmd1=11 && %ransu=1 mov $sel1,"Urhg!"
if %cmd1=11 && %ransu=2 mov $sel1,"Guh..."
if %cmd1=11 && %ransu=3 mov $sel1,"Stop!"
if %cmd1=12 && %ransu=1 mov $sel1,"Gah!"
if %cmd1=12 && %ransu=2 mov $sel1,"Let go!"
if %cmd1=12 && %ransu=3 mov $sel1,"Guh... Stop!"
name "Luka"
eng $sel1:$sel6\
name ""
if %cmd1=11 mov $sel1,"Luka attacks!"
if %cmd1=11 gosub *mp_kaihuku:gosub *mp
if %cmd1=12 mov $sel1,"Luka struggles with all his strength!"
if %cmd1=12 mov %genmogaku,%genmogaku-1:if %genmogaku<0 mov %genmogaku,0
eng $sel1:$sel6
if %cmd1=11 mov $sel1,"But Luka can't attack like this!"
if %cmd1=12 mov $sel1,"But Luka doesn't break free!"
eng $sel1:$sel6\
rnd2 %ransu,1,5
if %ransu=1 mov $sel1,"Oldest Lamia":mov $sel2,"Hehe... Useless."
if %ransu=2 mov $sel1,"Oldest Lamia":mov $sel2,"Your struggling just makes us hold you tighter..."
if %ransu=3 mov $sel1,"Second Lamia":mov $sel2,"We won't let go!"
if %ransu=4 mov $sel1,"Second Lamia":mov $sel2,"Aren't you actually happy about us coiling around you?"
if %ransu=5 mov $sel1,"Third Lamia":mov $sel2,"Haha, he looks so pathetic! "
name $sel1
eng $sel2:$sel6\
name ""
goto *lamias_a



*lamias_mogaku2

mov %before_action,8
if %nanido=2 rnd2 %ransu,1,10:if %ransu=5 goto *lamias_mogaku1
if %nanido=3 rnd2 %ransu,1,2:if %ransu=2 goto *lamias_mogaku1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Haaaa!"
if %ransu=2 mov $sel1,"Damn you!"
if %ransu=3 mov $sel1,"Get off!"
name "Luka"
eng $sel1:$sel6\
name ""
dwave 1,"se\dassyutu.ogg"
mov %kousoku,0:gosub *status_print
>Luka struggles with all his power, and slips out of their tails!\
mov %owaza_count1a,0
name "Oldest Lamia"
>Oh... Slipping out like that...\
name ""
gosub *face1
goto *common_main



*lamias_a

if %kousoku=1 rnd2 %ransu,1,2
if %kousoku=1 && %ransu=1 gosub *lamias_a5:goto *common_main
if %kousoku=1 && %ransu=2 gosub *lamias_a6:goto *common_main
rnd2 %ransu,1,4
if %ransu=1 gosub *lamias_a1:goto *common_main
if %ransu=2 gosub *lamias_a2:goto *common_main
if %ransu=3 gosub *lamias_a3:goto *common_main
if %ransu=4 && %owaza_count1a>4 gosub *lamias_a4:goto *common_main
skip -5



*lamias_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 goto *lamias_a1a
if %ransu=2 goto *lamias_a1b
if %ransu=3 goto *lamias_a1c



*lamias_a1a

name "Oldest Lamia"
>Sister, let's use our hands.\
name ""
name "Second Lamia"
>Hehe, just give in to the desire!\
name ""
skillname "Group Handjob"
eng "The Lamias hands all reach out to Luka's groin!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,15
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,7
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes them away!":gosub *wind_guard:sub %stack,1:return
\
dwave 1,"se\ero_koki1.ogg"
>The youngest gently massages Luka's scrotum!
skillcount1 3228
if %nanido<2 damage 5,7
if %nanido=2 damage 7,10
if %nanido=3 damage 10,14
dwave 1,"se\ero_koki1.ogg"
>The oldest gently strokes the shaft of Luka's penis!
if %nanido<2 damage 5,7
if %nanido=2 damage 7,10
if %nanido=3 damage 10,14
dwave 1,"se\ero_koki1.ogg"
>The second born gently rubs the tip of Luka's penis!
if %nanido<2 damage 5,7
if %nanido=2 damage 7,10
if %nanido=3 damage 10,14
dwave 1,"se\ero_koki1.ogg"
>The third born gently squeezes Luka's penis!
if %nanido<2 damage 5,7
if %nanido=2 damage 7,10
if %nanido=3 damage 10,14
skillname ""
if %mylife=0 sub %stack,1:return *lamias_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *lamias_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *lamias_s2
sub %stack,1
return



*lamias_a1b

name "Oldest Lamia"
>Let's do it all at once, sisters!\
name ""
name "Third Lamia"
>Hahaha, here we come! \
name ""
skillname "Group Handjob"
eng "The Lamias reach out to Luka's penis!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,15
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,7
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes them back!":gosub *wind_guard:sub %stack,1:return
\
>The oldest makes a circle around the tip with her fingers!@
>The second born grabs the base!\
>The third born grabs Luka's scrotum!@
>The youngest grabs the shaft!\
name "Oldest Lamia"
>Now, all at once!@
>Everyone, make him feel good...\
name ""
dwave 1,"se\ero_koki1.ogg"
>All four of the Lamias hands start to stroke him at the same time!
skillcount1 3228
if %nanido<2 damage 20,28
if %nanido=2 damage 30,42
if %nanido=3 damage 40,56
skillname ""
if %mylife=0 sub %stack,1:return *lamias_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *lamias_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *lamias_s2
sub %stack,1
return



*lamias_a1c

name "Oldest Lamia"
>Let's see who's the best at it...\
name ""
name "Second Lamia"
>Hehe... That sounds like fun.\
name ""
skillname "Group Handjob"
eng "The Lamias reach out to Luka's penis!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,15
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,7
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes them back!":gosub *wind_guard:sub %stack,1:return
\
dwave 1,"se\ero_koki1.ogg"
>The oldest pumps Luka's penis!
skillcount1 3228
if %nanido<2 damage 5,7
if %nanido=2 damage 7,10
if %nanido=3 damage 10,14
dwave 1,"se\ero_koki1.ogg"
>The second born plays with Luka's penis!
if %nanido<2 damage 5,7
if %nanido=2 damage 7,10
if %nanido=3 damage 10,14
dwave 1,"se\ero_koki1.ogg"
>The third born tightly grabs Luka's penis!
if %nanido<2 damage 5,7
if %nanido=2 damage 7,10
if %nanido=3 damage 10,14
dwave 1,"se\ero_koki1.ogg"
>The youngest gently strokes Luka's penis!
if %nanido<2 damage 5,7
if %nanido=2 damage 7,10
if %nanido=3 damage 10,14
skillname ""
if %mylife=0 sub %stack,1:return *lamias_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *lamias_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *lamias_s2
sub %stack,1
return



*lamias_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I want to taste your body...":mov $sel2,"Hahaha! He looks delicious."
if %ransu=2 mov $sel1,"I wonder if he can endure our licking?":mov $sel2,"Let's make him go crazy!"
if %ransu=3 mov $sel1,"Do you want us to lick all over?":mov $sel2,"I'll make sure to lick your most shameful spots."
name "Oldest Lamia"
eng $sel1:$sel6\
name ""
name "Second Lamia"
eng $sel2:$sel6\
name ""
skillname "Group Licking"
dwave 1,"se\ero_pyu1.ogg"
eng "The Lamia's close in on Luka with their tongues out!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,15
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,7
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes them back!":gosub *wind_guard:sub %stack,1:return
\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"The oldest licks Luka's nipple!"
if %ransu=2 mov $sel1,"The oldest licks Luka's face!"
if %ransu=3 mov $sel1,"The oldest licks Luka's anus!"
eng $sel1:$sel6
skillcount1 3229
if %nanido<2 damage 5,7
if %nanido=2 damage 6,9
if %nanido=3 damage 9,13
dwave 1,"se\ero_pyu1.ogg"
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"The second born licks Luka's chest!"
if %ransu=2 mov $sel1,"The second born licks Luka's nipple!"
if %ransu=3 mov $sel1,"The second born licks Luka's thighs!"
eng $sel1:$sel6
if %nanido<2 damage 5,7
if %nanido=2 damage 6,9
if %nanido=3 damage 9,13
dwave 1,"se\ero_pyu1.ogg"
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"The third born licks Luka's stomach!"
if %ransu=2 mov $sel1,"The third born licks Luka's lips!"
if %ransu=3 mov $sel1,"The third born licks Luka's face!"
eng $sel1:$sel6
if %nanido<2 damage 5,7
if %nanido=2 damage 6,9
if %nanido=3 damage 9,13
dwave 1,"se\ero_pyu1.ogg"
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"The youngest licks Luka's bellybutton!"
if %ransu=2 mov $sel1,"The youngest licks Luka's armpit!"
if %ransu=3 mov $sel1,"The youngest licks inside Luka's thigh!"
eng $sel1:$sel6
if %nanido<2 damage 5,7
if %nanido=2 damage 6,9
if %nanido=3 damage 9,13
skillname ""
if %mylife=0 sub %stack,1:return *lamias_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *lamias_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *lamias_s2
sub %stack,1
return



*lamias_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Do you want to feel our tails?":mov $sel2,"Attack his penis with our tails! "
if %ransu=2 mov $sel1,"We'll play with you with our tails.":mov $sel2,"If we do it all at once, he doesn't stand a chance. "
if %ransu=3 mov $sel1,"If we all tighten around it at once, I wonder if he can endure it?":mov $sel2,"Let's see, Hehe. "
name "Oldest Lamia"
eng $sel1:$sel6\
name ""
name "Third Lamia"
eng $sel2:$sel6\
name ""
skillname "Group Tailjob"
dwave 1,"se\ero_koki1.ogg"
eng "The four Lamia's tails coil around Luka's penis!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,15
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,7
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes them away!":gosub *wind_guard:sub %stack,1:return
\
>From the base to the tip, the tails coil around Luka's penis!
skillcount1 3230
if %nanido<2 damage 6,8
if %nanido=2 damage 8,11
if %nanido=3 damage 11,15
dwave 1,"se\ero_koki1.ogg"
>The tails wriggle around!
if %nanido<2 damage 6,8
if %nanido=2 damage 8,11
if %nanido=3 damage 11,15
dwave 1,"se\ero_koki1.ogg"
>The tails move up and down!
if %nanido<2 damage 6,8
if %nanido=2 damage 8,11
if %nanido=3 damage 11,15
>The tips of the tails all rub the tip of Luka's penis!
if %nanido<2 damage 6,8
if %nanido=2 damage 8,11
if %nanido=3 damage 11,15
skillname ""
if %mylife=0 sub %stack,1:return *lamias_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *lamias_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *lamias_s2
sub %stack,1
return



*lamias_a4

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 12
if %first_sel1=1 skip 8
name "Oldest Lamia"
>Hehe... Coil around him.\
name ""
name "Second Lamia"
>Aren't you looking forward to being wrapped by so many Lamias?\
name ""
skip 4
name "Oldest Lamia"
>Wrap him again...\
name ""
skillname "Group Roll"
dwave 1,"se\ero_makituki3.ogg"
eng "The four Lamia's tails coil around Luka!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,30
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind blows them away!":gosub *wind_guard:sub %stack,1:return
\
>Their tails coil around his arms, legs and body!
if %nanido<2 damage 10,12
if %nanido=2 damage 15,18
if %nanido=3 damage 20,24
mov %kousoku,1:gosub *status_print
>Luka's bound by the Lamia's tails!\
skillname ""
if %mylife=0 sub %stack,1:return *lamias_h4
if %kousan=2 sub %stack,1:return
gosub *face2
if %first_sel1=1 skip 8
name "Oldest Lamia"
>Hehe... How does it feel having four Lamia's wrapped around you?\
name ""
name "Third Lamia"
>It must be unbearable. \
name ""
skip 4
name "Oldest Lamia"
>This time we won't let you go.\
name ""
mov %first_sel1,1
if %nanido<2 mov %genmogaku,2
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,3
sub %stack,1
return



*lamias_a5

add %stack,1
skillcount1 3231
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Everyone, tighten up!":mov $sel2,"I want to feel him writhe around!"
if %ransu=2 mov $sel1,"Do you want to be hurt by us?":mov $sel2,"I'll tighten up as hard as I can!"
if %ransu=3 mov $sel1,"Let's squeeze him...":mov $sel2,"How does it feel to have your whole body strangled?"
name "Oldest Lamia"
eng $sel1:$sel6\
name ""
name "Second Lamia"
eng $sel2:$sel6\
name ""
skillname "Group Tightening"
dwave 1,"se\ero_simetuke1.ogg"
>The four Lamias tighten their tails around Luka!
mov %damage_nobr,1
if %nanido<2 damage 5,7
if %nanido=2 damage 7,10
if %nanido=3 damage 10,14
mov %damage_nobr,2
if %nanido<2 damage 5,7
if %nanido=2 damage 7,10
if %nanido=3 damage 10,14
textclear
mov %damage_nobr,1
if %nanido<2 damage 5,7
if %nanido=2 damage 7,10
if %nanido=3 damage 10,14
if %nanido<2 damage 5,7
if %nanido=2 damage 7,10
if %nanido=3 damage 10,14
skillname ""
if %mylife=0 sub %stack,1:return *lamias_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *lamias_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *lamias_s2
sub %stack,1
return



*lamias_a6

add %stack,1
skillcount1 3232
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 goto *lamias_a6a
if %ransu=2 goto *lamias_a6b
if %ransu=3 goto *lamias_a6c



*lamias_a6a

name "Oldest Lamia"
>Sisters, use your mouth!\
name ""
name "Second Lamia"
>Hahaha... I'll suck him the hardest!\
name ""
skillname "Group Blowjob"
eng "The four Lamia's lean in on Luka's groin with their mouths open!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,15
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,7
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind knocks them away!":gosub *wind_guard:sub %stack,1:return
\
dwave 1,"se\ero_buchu2.ogg"
>The fourth born Lamia's tongue coils around Luka's penis!
if %nanido<2 damage 6,8
if %nanido=2 damage 9,12
if %nanido=3 damage 12,16
dwave 1,"se\ero_buchu2.ogg"
>The third born Lamia's tongue licks the back of Luka's penis!
if %nanido<2 damage 6,8
if %nanido=2 damage 9,12
if %nanido=3 damage 12,16
dwave 1,"se\ero_buchu2.ogg"
>The second born Lamia's tongue squeezes Luka's penis!
if %nanido<2 damage 6,8
if %nanido=2 damage 9,12
if %nanido=3 damage 12,16
dwave 1,"se\ero_buchu2.ogg"
>The oldest born Lamia's tongue licks Luka's urethral opening!
if %nanido<2 damage 6,8
if %nanido=2 damage 9,12
if %nanido=3 damage 12,16
skillname ""
if %mylife=0 sub %stack,1:return *lamias_h6
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *lamias_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *lamias_s2
sub %stack,1
return



*lamias_a6b

name "Oldest Lamia"
>Let's see who can suck the best!\
name ""
name "Second Lamia"
>Hehe... I won't lose!\
name ""
skillname "Group Blowjob"
eng "The four Lamia's lean in on Luka's groin with their mouths open!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,15
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,7
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes them away!":gosub *wind_guard:sub %stack,1:return
\
dwave 1,"se\ero_buchu2.ogg"
>The youngest Lamia hesitatingly sucks on Luka's penis!
if %nanido<2 damage 6,8
if %nanido=2 damage 9,12
if %nanido=3 damage 12,16
dwave 1,"se\ero_buchu2.ogg"
>The third born Lamia gently bites on Luka's penis as she sucks!
if %nanido<2 damage 6,8
if %nanido=2 damage 9,12
if %nanido=3 damage 12,16
dwave 1,"se\ero_buchu2.ogg"
>The second born Lamia intensely sucks on Luka's penis!
if %nanido<2 damage 6,8
if %nanido=2 damage 9,12
if %nanido=3 damage 12,16
dwave 1,"se\ero_buchu2.ogg"
>The oldest Lamia's tongue wraps around Luka's penis as she sucks on it!
if %nanido<2 damage 6,8
if %nanido=2 damage 9,12
if %nanido=3 damage 12,16
skillname ""
if %mylife=0 sub %stack,1:return *lamias_h6
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *lamias_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *lamias_s2
sub %stack,1
return



*lamias_a6c

name "Oldest Lamia"
>Shall we all suck at once?\
name ""
name "Second Lamia"
>Hehe... Teamwork. \
name ""
skillname "Group Blowjob"
eng "The four Lamia's lean in on Luka's groin with their mouths open!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,15
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,7
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes them away!":gosub *wind_guard:sub %stack,1:return
\
>The oldest and second born Lamia's put their lips on the left and right side of the tip of Luka's penis!\
>The youngest puts her mouth around the base of Luka's penis as the third born Lamia sucks Luka's scrotum into her mouth!\
dwave 1,"se\ero_buchu2.ogg"
>All of the Lamia's start to suck on Luka's penis at the same time!
if %nanido<2 damage 24,32
if %nanido=2 damage 36,48
if %nanido=3 damage 48,64
skillname ""
if %mylife=0 sub %stack,1:return *lamias_h6
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *lamias_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *lamias_s2
sub %stack,1
return



*lamias_s1

add %stack,1
if %max_mylife>%mylife*5 mov %sel_hphalf,1:gosub *lamias_s2:sub %stack,1:return
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Guh..."
if %ransu=2 mov $sel1,"Uuu..."
if %ransu=3 mov $sel1,"Urgh..."
name "Luka"
eng $sel1:$sel6\
name ""
name "Sara"
>Luka, keep it up!\
name ""
gosub *face2
name "Oldest Lamia"
>It's too late, girl.@
>This boy will be our food...\
name ""
gosub *face1
mov %sel_hphalf,1
sub %stack,1
return



*lamias_s2

add %stack,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Auu..."
if %ransu=2 mov $sel1,"Aaa..."
if %ransu=3 mov $sel1,"Faa..."
name "Luka"
eng $sel1:$sel6\
name ""
name "Sara"
>Luka...\
name ""
gosub *face2
name "Oldest Lamia"
>Hehe... Looking so pathetic in front of your companion.@
>How humiliating.\
name ""
mov %sel_kiki,1
sub %stack,1
return



*lamias_onedari

mov $list1,"Group Handjob"
if %3228>0 mov %list_num1,1
mov $list2,"Group Licking"
if %3229>0 mov %list_num2,1
mov $list3,"Group Tailjob"
if %3230>0 mov %list_num3,1
mov $list4,"Group Tightening"
if %3231>0 mov %list_num4,1
mov $list5,"Group Blowjob"
if %3232>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *lamias_onedari1
if %cmd1=12 goto *lamias_onedari2
if %cmd1=13 goto *lamias_onedari3
if %cmd1=14 goto *lamias_onedari4
if %cmd1=15 goto *lamias_onedari5
if %cmd1=-1 goto *lamias_main
goto *lamias_onedari



*lamias_onedari1

gosub *onedari_syori
name "Sara"
>Wait, Luka!@
>What are you doing!?\
name ""
gosub *face2
name "Oldest Lamia"
>It's pointless even if you scream, girl.@
>This man has given in to desire.\
name ""
name "Second Lamia"
>You want us to squeeze out your semen with our hands?@
>Alright... We'll be sure to get it all!\
name ""
gosub *lamias_a1
skip -1



*lamias_onedari2

gosub *onedari_syori
name "Sara"
>Wait, Luka!@
>What are you doing!?\
name ""
gosub *face2
name "Oldest Lamia"
>It's pointless even if you scream, girl.@
>This man has given in to desire.\
name ""
name "Third Lamia"
>You want us to all lick you at the same time?@
>What a lewd request. \
name ""
gosub *lamias_a2
skip -1



*lamias_onedari3

gosub *onedari_syori
name "Sara"
>Wait, Luka!@
>What are you doing!?\
name ""
gosub *face2
name "Oldest Lamia"
>It's pointless even if you scream, girl.@
>This man has given in to desire.\
name ""
name "Youngest Lamia"
>You want all of our tails to play with your penis?\
name ""
gosub *lamias_a3
skip -1



*lamias_onedari4

gosub *onedari_syori_k
name "Sara"
>Wait, Luka!@
>What are you doing!?\
name ""
gosub *face2
name "Oldest Lamia"
>It's pointless even if you scream, girl.@
>This man has given in to desire.\
name ""
name "Third Lamia"
>You want us to coil around you and strangle you with our tails? Haha. \
name ""
if %kousoku=0 gosub *lamias_a4
gosub *lamias_a5
skip -1



*lamias_onedari5

gosub *onedari_syori_k
name "Sara"
>Wait, Luka!@
>What are you doing!?\
name ""
gosub *face2
name "Oldest Lamia"
>It's pointless even if you scream, girl.@
>This man has given in to desire.\
name ""
name "Second Lamia"
>Wanting all of us to suck on you... How lewd. \
name ""
if %kousoku=0 gosub *lamias_a4
gosub *lamias_a6
skip -1



*lamias_h1

name "Luka"
>Faaa...\
name ""
name "Oldest Lamia"
>Take a good look, girl.@
>This boy is going to surrender to our hands.\
name ""
name "Sara"
>....................\
name ""
mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\lamias_bk05.bmp",0,0
gosub *syasei2
>Unable to endure the four Lamia's handjob, Luka finally ejaculates.\
mov %viclose,1:gosub *lose
mov %2557,%2557+1:if %2557=1 mov %count_koenemy,%count_koenemy+1
if %2557>%count_most mov %count_most,%2557:mov $count_mostname,$name
count 5,7
mov $bad1,"Luka succumbed to the Lamias group handjob."
mov $bad2," The Lamias kept Luka as a sex slave, and took turns raping him for the rest of his life."
name "Sara"
>.............\
name ""
gosub *face2
name "Oldest Lamia"
>Hehe... You shot it out.@
>How does it feel to surrender in front of your companion?\
name ""
>The Lamias laugh as they show the semen to Sara.\
goto *lamias_h



*lamias_h2

name "Luka"
>Faaa...\
name ""
name "Oldest Lamia"
>Take a good look, girl.@
>This boy is going to surrender to our tongues.\
name ""
name "Sara"
>....................\
name ""
mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\lamias_bk02.bmp",0,0
gosub *syasei2
>Unable to endure the four Lamia's tongues, Luka finally ejaculates.\
>The Lamias quickly move back to catch Luka's semen on their chests.\
mov %viclose,1:gosub *lose
mov %2557,%2557+1:if %2557=1 mov %count_koenemy,%count_koenemy+1
if %2557>%count_most mov %count_most,%2557:mov $count_mostname,$name
count 28,7
mov $bad1,"Luka succumbed to the Lamia's group licking."
mov $bad2," The Lamias kept Luka as a sex slave, and took turns raping him for the rest of his life."
name "Sara"
>.............\
name ""
gosub *face2
name "Oldest Lamia"
>Hehe... You shot it out.@
>How does it feel to surrender in front of your companion?\
name ""
>The Lamias laugh as they show the semen to Sara.\
goto *lamias_h



*lamias_h3

name "Luka"
>Faaa...\
name ""
name "Oldest Lamia"
>Take a good look, girl.@
>This boy is going to surrender to our tails.\
name ""
name "Sara"
>....................\
name ""
mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\lamias_bk04.bmp",0,0
gosub *syasei2
>Unable to endure the four Lamia's tails, Luka finally ejaculates.\
mov %viclose,1:gosub *lose
mov %2557,%2557+1:if %2557=1 mov %count_koenemy,%count_koenemy+1
if %2557>%count_most mov %count_most,%2557:mov $count_mostname,$name
count 19,7
mov $bad1,"Luka succumbed to the four Lamia's tailjob."
mov $bad2," The Lamias kept Luka as a sex slave, and took turns raping him for the rest of his life."
name "Sara"
>..............\
name ""
gosub *face2
name "Oldest Lamia"
>Hehe... You shot it out.@
>How does it feel to surrender in front of your companion?\
name ""
>The Lamias laugh as they show the semen to Sara.\
goto *lamias_h



*lamias_h4

mov %ikigoe,3:gosub *ikigoe
name "Oldest Lamia"
>Oh?@>Already coming?\
name ""
gosub *syasei1
lsp 693,":a;chara\lamias_bk03.bmp",0,0
lsp 694,":a;chara\lamias_bk04.bmp",0,0
gosub *syasei2
>As soon as the Lamia's coiled around Luka, he gives in to the desire to ejaculate.\
mov %viclose,1:gosub *lose
mov %2557,%2557+1:if %2557=1 mov %count_koenemy,%count_koenemy+1
if %2557>%count_most mov %count_most,%2557:mov $count_mostname,$name
mov %count_bouhatu,%count_bouhatu+1
count 16,7
mov $bad1,"Luka ejaculated as soon as the four Lamia's coiled around him."
mov $bad2," The Lamias kept Luka as a sex slave, and took turns raping him for the rest of his life."
name "Sara"
>..........\
name ""
gosub *face2
name "Oldest Lamia"
>Hehe... You shot it out.@
>How does it feel to surrender in front of your companion?\
name ""
>The Lamias laugh as they show the semen to Sara.\
goto *lamias_h



*lamias_h5

name "Luka"
>Urgh...\
name ""
name "Oldest Lamia"
>Take a good look, girl.@
>This pervert is going to come just from being strangled.\
name ""
name "Sara"
>....................\
name ""
name "Luka"
>Ahhhh!\
name ""
gosub *syasei1
lsp 693,":a;chara\lamias_bk03.bmp",0,0
lsp 694,":a;chara\lamias_bk04.bmp",0,0
gosub *syasei2
>Strangled by the Lamia's tails, Luka orgasms unexpectedly.\
mov %viclose,1:gosub *lose
mov %2557,%2557+1:if %2557=1 mov %count_koenemy,%count_koenemy+1
if %2557>%count_most mov %count_most,%2557:mov $count_mostname,$name
count 16,7
mov $bad1,"Luka ejaculated while the Lamia's tightened around him."
mov $bad2," The Lamias kept Luka as a sex slave, and took turns raping him for the rest of his life."
name "Sara"
>.............\
name ""
gosub *face2
name "Oldest Lamia"
>Haha... How pathetic.@
>Shooting out from being strangled in front of your companion.\
name ""
>The Lamias laugh as they show the semen to Sara.\
goto *lamias_h



*lamias_h6

name "Luka"
>Faaaa!\
name ""
name "Oldest Lamia"
>Take a good look, girl.@
>This boy is going to surrender to our mouths!\
name ""
name "Sara"
>....................\
name ""
mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\lamias_bk01.bmp",0,0
gosub *syasei2
>Unable to endure the group blowjob, Luka finally ejaculates.\
mov %viclose,1:gosub *lose
mov %2557,%2557+1:if %2557=1 mov %count_koenemy,%count_koenemy+1
if %2557>%count_most mov %count_most,%2557:mov $count_mostname,$name
count 4,7
mov $bad1,"Luka succumbed to the Lamia's group blowjob."
mov $bad2," The Lamias kept Luka as a sex slave, and took turns raping him for the rest of his life."
name "Sara"
>..........\
name ""
gosub *face2
name "Oldest Lamia"
>Haha... Look, girl.@
>Your pathetic companion made our faces so sticky...\
name ""
>The Lamias laugh as they show the semen to Sara.\
goto *lamias_h



*lamias_h

if %2557=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Sara"
>............\
name ""
>Sara coldly glares at me.@
>Too weak to stand, I fall to the ground.\
dwave 1,"se\ero_simetuke1.ogg"
cspl 690,699
lsp 700,":c;chara\lamias_ha1.bmp",0,0:print 10,500
>Like that, all four of them tangle their bodies around mine.@
>Wrapped in their tails, I can't move at all.\
name "Luka"
>Ahh...\
name ""
>The four sisters wrap their soft, warm bodies around me.\
>With the weight of their tails on me, the disgrace of defeat is only amplified.\
>The oldest lamia moves her waist towards mine as her dripping wet vagina opens up.\
name "Oldest Lamia"
>Hehe... We'll rape you in front of your companion.@
>Make sure you watch closely, girl.\
name ""
name "Sara"
>............\
name ""
>Sara quietly glares at me.\
mov %hseanwave,2:hseanwave
lsp 700,":c;chara\lamias_ha2.bmp",0,0:print 10,500
>While I look at her angry eyes, the Lamia suddenly forces me into her!\
name "Luka"
>Ahhh!!\
name ""
>The Oldest Lamia is surprisingly hot inside@>Small ridges line the walls of her pussy, rubbing me with every movement.\
>Forced all the way into her, the tip of my penis rubs against every single ridge.@
>The surprising pleasure just from insertion causes a chill to go down my spine.\
name "Luka"
>Ah! I'm coming!\
name ""
gosub *syasei1
lsp 700,":c;chara\lamias_ha3.bmp",0,0
gosub *syasei2
mov %hseanwave,0:hseanwave
name "Oldest Lamia"
>Oh...?\
name ""
>The Lamia looks surprised as I come just from being inserted into her.@
>But her look slowly turns to a smile.\
name "Oldest Lamia"
>...You already came?@
>What a pitiful man.\
name ""
name "Second Lamia"
>Hahaha, he came right away, sister?@
>Do you really feel that good? Hahaha!\
name ""
name "Third Lamia"
>Pathetic! @
>What a quick shot! \
name ""
name "Youngest Lamia"
>Already letting it out?@
>Hehe...\
name ""
>All four of the Lamia's laugh at me.@
>Raped and insulted, my body twitches in humiliation.\
name "Sara"
>............\
name ""
>Sara's cold glare shows nothing but contempt.\
>Raped by a Lamia and coming almost instantly, she's completely disgusted.\
name "Oldest Lamia"
>I'm sorry for forcing you to come so fast...@
>I just didn't think you were that pathetic.\
name ""
>The Oldest Lamia laughs in a triumphant manner as she looks down at me, with my penis still stuck inside her.\
name "Oldest Lamia"
>Oh well... Let's try again.@
>Don't be so quick this time!\
name ""
mov %hseanwave,2:hseanwave
name "Luka"
>Ahhhh!!\
name ""
>She squeezes her vagina tightly around me.@
>With the heat and ridges from her walls, I would have come again with that if I hadn't just orgasmed.\
>In addition, she starts to slowly move her waist.@
>With the movement, I'm forced in and out of her, rubbing my penis against the ridges inside of her.\
name "Luka"
>Aiee!@>Ahhh!\
name ""
>The overwhelming pleasure from her ribbed pussy feels like I'm stuck in heaven.\
>The lewd sounds from her waist slapping against mine fill the narrow hallway.\
>I've already started to become addicted to this Lamia's amazing vagina...\
name "Luka"
>Faaa... Incredible...\
name ""
name "Oldest Lamia"
>Hehe... Are you already a slave to my pussy?@
>That's not very fitting of a Hero...\
name ""
name "Second Lamia"
>Does her vagina really feel that good?\
name ""
name "Third Lamia"
>Aren't you glad you're being raped? \
name ""
>The other Lamias push their soft bodies into mine as they laugh at me.\
name "Sara"
>You're the worst...\
name ""
>Sara mutters that as she continues to glare at me, as if she's looking at filth.\
>Insulted from every direction while being raped, the disgrace boils over in me.\
>Trembling in misery, I can't do anything but be raped...\
name "Luka"
>Auuu...\
name ""
name "Oldest Lamia"
>It's about time for me to make you come.\
name ""
name "Luka"
>Aiee!\
name ""
>The Oldest Lamia's vagina suddenly contracts.\
>Still moving her hips, the stimulation from the ridges inside of her digs into me as the stimulation becomes too much to endure.\
name "Luka"
>Ahhh!!\
name ""
name "Oldest Lamia"
>You can't take it when I do this, right?@
>Now, shoot out even more inside me!\
name ""
>Forced in and out of her, I'm quickly brought to the edge.\
>Helplessly raped with the Lamias all wrapped around me, I give in to the rising desire.\
name "Luka"
>Ah!@>It's too good!@
>Faaaa!!\
name ""
gosub *syasei1
lsp 700,":c;chara\lamias_ha4.bmp",0,0
gosub *syasei2
>The Oldest Lamia has a pleased smile on her face as I explode inside of her, filling her with my semen.\
mov %hseanwave,0:hseanwave
name "Oldest Lamia"
>Hehe... That was fun.@
>Now, who's next?\
name ""
name "Second Lamia"
>Oh, me!\
name ""
>As soon as the Oldest Lamia gets off of me, the second born Lamia jumps on me!\
lsp 700,":c;chara\lamias_hb1.bmp",0,0:print 10,500
>Her tail wraps around my body and forces me right next to her, as if in a tight embrace.\
name "Luka"
>Ahg!\
name ""
>I let out a groan as her strong tail crushes my body.@
>Unable to do anything, the fact that I'm just prey for her to play with is forced into me.\
name "Second Lamia"
>Let's see...@
>I think I'll try raping you as I strangle you.\
name ""
name "Luka"
>Ahhh!!\
name ""
mov %hseanwave,4:hseanwave
lsp 700,":c;chara\lamias_hb2.bmp",0,0:print 10,500
>While her tail tightens around my body, she forces my penis into her surprisingly tight vagina.\
>Like her tail squeezing my body, her vagina is squeezing my penis.\
name "Luka"
>Auu!@> It's too tight inside!\
name ""
name "Second Lamia"
>Hahaha!@>It's not just the inside that will tighten...\
name ""
name "Luka"
>Ahhh!!\
name ""
>Her tail squeezes down on my body even tighter.@
>As my body is slowly being crushed by her strong tail, I feel her vagina tightening around my penis at the same time.\
name "Second Lamia"
>Haha... I'll rape your mouth too...\
name ""
lsp 700,":c;chara\lamias_hb3.bmp",0,0:print 10,500
>The Lamia forces her tongue into my mouth.@
>Her long tongue darts around my mouth and wraps itself around mine.\
name "Second Lamia"
>Well?@>How does it feel to have sex with a Lamia?@
>Squeezed all over... Is it unbearable?\
name ""
name "Luka"
>Urhg!@>Ahhh!\
name ""
>As every part of my body is wrapped and crushed by the Lamia, the sense of oppression is overwhelming.\
>But the damage isn't just being done to my body... It feels as though my mind itself is being crushed by her.\
>Squeezed and raped with no escape, the sense of hopelessness fills every fiber of my being.\
>My body relaxes as the Lamia squeezes tighter around me.@
>With my mind and body breaking, I give in and accept the rape.\
name "Second Lamia"
>Hahaha... Already admitting defeat?@
>I love the moment when a man surrenders...\
>I'll finish you quickly for now...@
>But I'll strangle you a lot in the future...\
name ""
>Even more than before, the Lamia contracts her vagina around me.\
name "Luka"
>Aiee!\
name ""
name "Second Lamia"
>Here, I'll tighten it more...@
>So make sure you come right away!\
name ""
>The Lamia's vaginal muscles squeeze me without mercy.@
>With her soft flesh crushing me, I quickly go over the edge.\
name "Luka"
>Auuu...\
name ""
gosub *syasei1
lsp 700,":c;chara\lamias_hb4.bmp",0,0
gosub *syasei2
>Exhausted, my semen explodes into her tight vagina.\
mov %hseanwave,0:hseanwave
>But there was no time to rest.@
>The tail of another Lamia starts to coil around my body.\
name "Luka"
>S...Stop... If you do any more...\
name ""
name "Third Lamia"
>What are you saying?@
>We're gang-raping you. \
name ""
lsp 700,":c;chara\lamias_hc1.bmp",0,0:print 10,500
>The next Lamia pushes her ass onto my groin.@
>My penis slips between the soft cheeks of her ass.\
>With her tail tightly wrapped around my body, I can't get away.@
>Dragged by her tail, my penis is poking the entrance of her ass.\
name "Third Lamia"
>I'll rape you with my ass...@
>It's good enough for someone like you. \
name ""
name "Luka"
>Ahhh!\
name ""
>The Lamia skillfully uses her tail to slowly force me into her.@
mov %hseanwave,5:hseanwave
>Like that, I'm forced all the way into the Lamia's ass!\
name "Luka"
>Auuu!\
name ""
>The feeling inside of her is completely different from the other Lamias' vaginas.\
name "Third Lamia"
>How is it?@
>Here... I'll make it even better! \
name ""
>The Lamia grins as she starts to clench her muscles, causing her anus to tighten around me.\
name "Luka"
>Aieee!\
name ""
name "Third Lamia"
>Haha... What a nice scream.@
>Your penis is twitching in my ass...\
>Just like that, shoot out all your semen into me.@
>Not even good enough to use my vagina... Hahaha. \
name ""
>The Lamia tightens her anus as she laughs.@
>Tightened up by this new hole, a strange pleasure washes over me.\
>At the edge of an orgasm, I put the last of my strength into my waist to stop myself from exploding in her.\
name "Luka"
>Auu... Guh...\
name ""
name "Third Lamia"
>Haha... You held on.@
>You're trying so hard... But it's useless in the end. \
name ""
name "Luka"
>Eh...?@> Ahhh!\
name ""
>The tail around my body starts to forcibly move me.@
>Controlled by her tail, she forces me to start pumping her ass.\
name "Luka"
>Stop!!@> Ahhh!\
name ""
name "Third Lamia"
>Hahaha, if I do it like this, it's like you're seeking pleasure on your own.\
>Now you have no choice but to come in me. \
name ""
name "Luka"
>Hauu!@>Ahhhh!!\
name ""
>With movements against my will, I'm forced in and out of her.@
>As she tightens her ass around me, I'm forced to move like a piston.\
>I let out a moan as the tip of my penis keeps entering in and out of her tight anus.\
>Forced into having anal sex with her, I finally break down and yield.\
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":c;chara\lamias_hc2.bmp",0,0
gosub *syasei2
>I explode inside the Lamia as I feel humiliated at being forced to have anal sex with her.\
mov %hseanwave,0:hseanwave
>But even after that, they don't give me a moments rest.@
>Another tail winds around me and forces me to the ground.\
name "Youngest Lamia"
>I'm next...@
>This boy looks really weak, so I should be ok.\
name ""
name "Luka"
>Ahhhh!\
name ""
mov %hseanwave,3:hseanwave
lsp 700,":c;chara\lamias_hd1.bmp",0,0:print 10,500
>The Youngest Lamia drops her waist on me, as I screw into her tiny vagina.\
>Without even trying to squeeze me at all, her pussy is tighter than the other Lamias.\
name "Luka"
>Auuu!\
name ""
name "Youngest Lamia"
>It went in... \
name ""
name "Second Lamia"
>Hahaha... How is she?@
>She's still young, so her vagina isn't very soft yet...\
name ""
name "Luka"
>Ahhh!\
name ""
>Just from being inside her, my penis is crushed in her tiny pussy.\
>It doesn't feel like she has any muscles inside of her yet.@
>Even though she's narrow inside, the flesh is fairly rigid.\
>In addition, the hard creases and bumps inside of her rub against me.@
>The unique stimulation gives a mix of pleasure and pain.\
name "Luka"
>Auu... It's hard...\
name ""
name "Second Lamia"
>It can't be helped... This child is still growing.@
>Her vagina is still small, and this is her first time...\
name ""
name "Youngest Lamia"
>But I can still make him come!\
name ""
>The Lamia wraps her tail around my body as she starts to bounce up and down.\
>The rigid flesh of her vagina rubs against me with a mix of pain and pleasure.\
name "Luka"
>Ah!@>Ahhh!\
name ""
>My body writhes as it feels like my penis is being slightly tortured.@
>The slight pain brings me to another orgasm surprisingly fast as the Youngest Lamia happily bounces up and down.\
name "Luka"
>Auu...@> I'm going to come...\
name ""
name "Youngest Lamia"
>That's good... I want to feel it shoot out inside me!\
name ""
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1
lsp 700,":c;chara\lamias_hd2.bmp",0,0
gosub *syasei2
>I explode inside of her small vagina, as my semen starts to overflow out of it.\
>The slight pain I felt while ejaculating causes a new strange pleasure to wash over me.\
name "Youngest Lamia"
>Haha... It's so easy to make men come!\
name ""
>The Youngest Lamia looks down at me with a triumphant face as she happily exclaims that.\
name "Luka"
>Auuu...\
name ""
>Raped one after another, I'm left exhausted.\
mov %hseanwave,0:hseanwave
lsp 700,":c;chara\lamias_ha1.bmp",0,0:print 10,500
name "Oldest Lamia"
>It looked like everyone had their fun...@
>Then, it's my turn again.\
name ""
name "Luka"
>Ahhh!\
name ""
>The gang rape by the four Lamias isn't over...\
gosub *anten
>Captured by the Lamias, they made me into their sex toy.@
>Raped one after another by the four of them, they don't allow me to escape.\
>Every day for the rest of my life, they'll continue to rape me...\
>...................\
goto *badend



*sphinx_start

mov $name,"Sphinx"
mov $name2,"Sphinx"
mov $lavel,"sphinx"
mov $tatie1,"sphinx_st01"
mov $tatie2,"sphinx_st02"
mov $tatie3,"sphinx_st03"
mov $tatie4,"sphinx_st02"
mov $haikei,"bg069"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,2600
if %nanido=2 mov %max_enemylife,2600
if %nanido=3 mov %max_enemylife,3900
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,2
mov %tikei,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $half_s1,"You shall feel no pain as I devour you."
mov $half_s2,"Until your final breath, you can indulge in the pleasure..."
mov $kiki_s1,"You're nearing your end."
mov $kiki_s2,"Give me the proof of your surrender!"
mov %end_n,1
mov %zmonster_x,-300
mov %owaza_count1a,2
mov %owaza_count2a,2
name $name
name "Luka"
>Guh... I won't let you eat me!\
name ""
>I take out my sword and stand ready.\
>The trial doesn't matter anymore...@
>I have to defend myself!\
name $name
>You fool... Do you believe you can match me?\
name ""
name "Luka"
>I won't know until I try!\
name ""
name $name
>I see.@
>As long as you have that sword...\
name ""
goto *common_main



*sphinx_v

gosub *face3
name $name
>Oh?@>You're better than you look.\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Sphinx vanishes!\
name "Luka"
>I did it!@>Eh...?\
name ""
lsp 700,":a;chara\"+$tatie1+".bmp",%monster_x,%monster_y
dwave 1,"se\syometu.ogg"
print 99,4500,"system\breakup.dll/urb"
lsp 561,":a;system\gagee100.bmp",421,556
>Sphinx reappears!\
name "Luka"
>You... Came back!?@
>That book girl did the same thing...\
name ""
gosub *face2
name $name
>I have lived since times immemorial.@
>Even with sealing power like that, I can easily restore my body.\
>It's unfortunate for you, boy.\
name ""
name "Luka"
>Guh... Damn it!\
name ""
>I was only able to defeat that other girl because of the fire...@
>But all I have right now is this sword!\
name $name
>It is not possible for you to defeat me.@
>I shall entomb you inside of me...\
name "Luka"
>Gah...\
name ""
gosub *sphinx_a7
goto *sphinx_a



*sphinx_kousan

gosub *kousan_syori
>Luka yields to temptation, ending his resistance!\
gosub *face2
name $name
>Already giving up?@
>Then I shall enjoy tasting you...\
name ""
goto *sphinx_a



*sphinx_main

gosub *cmd_main
if %cmd1=11 goto *common_attack
if %cmd1=13 && %hanyo6=1 goto *sphinx_bougyo
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *sphinx_kousan
if %cmd1=16 goto *sphinx_onedari
if %cmd1=17 goto *common_skill
goto *sphinx_main



*sphinx_bougyo

mov %bougyo,1
>Luka takes an evasive stance!\
if %nanido=3 rnd2 %ransu,1,2:if %ransu=2 mov %bougyo,0:mov %hanyo2,1
goto *sphinx_a



*sphinx_a

if %hanyo6=1 && %bougyo=1 gosub *sphinx_a5:goto *common_main
if %hanyo6=1 && %bougyo=0 gosub *sphinx_a6:goto *common_main
rnd2 %ransu,1,4
if %ransu=1 gosub *sphinx_a1:goto *common_main
if %ransu=2 gosub *sphinx_a2:goto *common_main
if %ransu=3 && %owaza_count3a>5 && %kousan=0 gosub *sphinx_a4:goto *common_main
if %ransu=4 && %status=0 && %owaza_count2a>4 gosub *sphinx_a3:goto *common_main
skip -5



*sphinx_a1

add %stack,1
name $name
>I shall show you your foolishness with my fingers.\
name ""
skillname "Finger Offering"
dwave 1,"se\ero_koki1.ogg"
>Sphinx grabs onto Luka's penis!
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,30
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes her back!":gosub *wind_guard:sub %stack,1:return
skillcount1 3233
if %nanido<2 damage 8,11
if %nanido=2 damage 12,14
if %nanido=3 damage 16,20
dwave 1,"se\ero_koki1.ogg"
>Her fingers stroke Luka's penis!
if %nanido<2 damage 8,11
if %nanido=2 damage 12,14
if %nanido=3 damage 16,20
dwave 1,"se\ero_koki1.ogg"
>She plays with the tip of Luka's penis!
if %nanido<2 damage 8,11
if %nanido=2 damage 12,14
if %nanido=3 damage 16,20
skillname ""
if %mylife=0 sub %stack,1:return *sphinx_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*sphinx_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My mouth shall comfort you."
if %ransu=2 mov $sel1,"You will melt in my mouth."
if %ransu=3 mov $sel1,"I'll suck you inside..."
name $name
eng $sel1:$sel6\
name ""
skillname "Mouth Offering"
dwave 1,"se\ero_buchu2.ogg"
>Sphinx quickly forces Luka's penis into her mouth!
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,30
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes her back!":gosub *wind_guard:sub %stack,1:return
skillcount1 3234
if %nanido<2 damage 10,13
if %nanido=2 damage 12,16
if %nanido=3 damage 17,23
dwave 1,"se\ero_buchu2.ogg"
>Her tongue licks the back of Luka's penis!
if %nanido<2 damage 10,13
if %nanido=2 damage 12,16
if %nanido=3 damage 17,23
dwave 1,"se\ero_buchu2.ogg"
>She narrows her mouth as she sucks harder!
if %nanido<2 damage 10,13
if %nanido=2 damage 12,16
if %nanido=3 damage 17,23
skillname ""
if %mylife=0 sub %stack,1:return *sphinx_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*sphinx_a3

add %stack,1
mov %owaza_count2a,0
if %status=1 >Luka is in a trance!\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I shall drown you in my chest."
if %ransu=2 mov $sel1,"My ancient technique will drown you in ecstasy."
if %ransu=3 mov $sel1,"It's easy to control men..."
name $name
eng $sel1:$sel6\
name ""
skillname "Isis' Lovemaking"
dwave 1,"se\ero_koki1.ogg"
>Sphinx forces Luka's penis between her breasts!
if %wind=1 && %nanido<2 mov %wind_kakuritu,100
if %wind=1 && %nanido=2 mov %wind_kakuritu,100
if %wind=1 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
skillcount1 3235
if %nanido<2 damage 8,11
if %nanido=2 damage 10,14
if %nanido=3 damage 14,20
dwave 1,"se\ero_koki1.ogg"
>Sphinx moves her breasts up and down!
if %nanido<2 damage 8,11
if %nanido=2 damage 10,14
if %nanido=3 damage 14,20
dwave 1,"se\ero_koki1.ogg"
>Sphinx squeezes Luka's penis with her breasts!
if %nanido<2 damage 8,11
if %nanido=2 damage 10,14
if %nanido=3 damage 14,20
if %status=0 mov $sel1,"Luka falls into a trance!"
if %status=1 mov $sel1,""
mov %status,1:gosub *status_print
if $sel1<>"" eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *sphinx_h3
if %kousan=2 sub %stack,1:return
name "Luka"
>Faa...aa...\
name ""
name $name
>Did my breasts force you to go crazy?@
>Stuck like that, I'll toy with you.\
name ""
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,3,4
if %nanido=3 rnd2 %status_turn,4,5
sub %stack,1
return



*sphinx_a4

add %stack,1
if %kousan=2 skip 4
name $name
>My kiss will end you...\
name ""
skillname "Kiss of Death"
mov %hanyo6,1
dwave 1,"se\power.ogg"
>Magic focuses on Sphinx's lips!\
skillname ""
if %status=1 sub %stack,1:return
if %first_sel1=1 sub %stack,1:return
name "Luka"
>What the!?\
name ""
>Dangerous magic is flowing into her lips...@
>I have a very bad feeling about this...\
sub %stack,1
return



*sphinx_a5

add %stack,1
name $name
>Taste the kiss of death...\
name ""
skillname "Kiss of Death"
>Sphinx leans over to kiss Luka!
delay 1000
dwave 1,"se\miss.ogg"
>But Luka dodges!\
skillname ""
name $name
if %first_sel1=1 skip 3
>Oh... How impudent.\
skip 2
>You saw through it...\
name ""
mov %first_sel1,1
mov %hanyo6,0
mov %owaza_count3a,0
sub %stack,1
return



*sphinx_a6

add %stack,1
mov %hanyo6,0
gosub *face2
skillcount1 3236
if %kousan=2 skip 6
name $name
if %hanyo2=1 mov $sel1,"Guarding is no use..."
if %hanyo2=0 mov $sel1,"Taste the kiss of death..."
eng $sel1:$sel6\
name ""
skillname "Kiss of Death"
dwave 1,"se\ero_chupa1.ogg"
>Sphinx kisses Luka!@
>A superficial bliss flows through Luka as Sphinx's saliva mixes with his!\
name "Luka"
>Aaaaaaa...\
name ""
eng "Power leaves Luka's body as the kiss invites him to death...":$sel6/
dwave 2,"se\damage.ogg"
quakex 2,440
mov %mylife,0
lsp 560,":a;system\gager0.bmp",114,556
gosub *hp
print 10,500
\
>The kiss of death rapidly sends Luka toward his end!\
skillname ""
sub %stack,1
return *sphinx_h5



*sphinx_a7

add %stack,1
name $name
>Thousands of years ago, there was a technique...@
>Unrivaled in pleasure, it could force any man to orgasm in an instant.\
>The monsters today don't have anything to match it.@
>I'll let you experience it before your death!\
name ""
mov %kousoku,1:gosub *status_print
>Sphinx grabs onto Luka's waist and binds his movement!\
sub %stack,1
goto *sphinx_a8



*sphinx_a8

add %stack,1
skillcount1 3237
skillname "Ancient Law of Ecstasy"
dwave 1,"se\ero_koki1.ogg"
>Like that, she forces his penis between her breasts!
mov %damage_kotei,1
damage 30,40
dwave 1,"se\ero_koki1.ogg"
>Sphinx's breasts massage Luka's penis!
mov %damage_kotei,1
damage 30,40
dwave 1,"se\ero_buchu3.ogg"
>Sphinx sucks on the tip of Luka's penis as it sticks out from her breasts!
mov %damage_kotei,1
damage 30,40
dwave 1,"se\ero_buchu3.ogg"
>Sphinx's tongue wraps around Luka's penis!
mov %damage_kotei,1
damage 30,40
dwave 1,"se\ero_koki1.ogg"
>Sphinx squeezes her breasts together as her tongue attacks Luka's penis!
mov %damage_kotei,1
damage 30,40
dwave 1,"se\ero_buchu3.ogg"
>The tip of Sphinx's tongue pokes into Luka's urethral opening!
mov %damage_kotei,1
damage 30,40
>Sphinx sticks one of her fingers into Luka's anus!
mov %damage_kotei,1
damage 30,40
>She starts to directly stimulate Luka's prostate!
mov %damage_kotei,1
damage 30,40
dwave 1,"se\ero_koki1.ogg"
>Sphinx squeezes her breasts tighter around Luka's penis!
mov %damage_kotei,1
damage 30,40
dwave 1,"se\ero_buchu3.ogg"
>Her tongue gently drills into Luka's urethral opening!
mov %damage_kotei,1
damage 30,40
>Sphinx rapidly pumps Luka's penis with her breasts as she stimulates Luka's prostate!
mov %damage_kotei,1
damage 30,40
skillname ""
if %mylife=0 sub %stack,1:return *sphinx_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
goto *sphinx_a8



*sphinx_onedari

mov $list1,"Finger Offering"
if %3233>0 mov %list_num1,1
mov $list2,"Mouth Offering"
if %3234>0 mov %list_num2,1
mov $list3,"Isis' Lovemaking"
if %3235>0 mov %list_num3,1
mov $list4,"Kiss of Death"
if %3236>0 mov %list_num4,1
mov $list5,"Ancient Law of Ecstasy"
if %3237>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *sphinx_onedari1
if %cmd1=12 goto *sphinx_onedari2
if %cmd1=13 goto *sphinx_onedari3
if %cmd1=14 goto *sphinx_onedari4
if %cmd1=15 goto *sphinx_onedari5
if %cmd1=-1 goto *sphinx_main
goto *sphinx_onedari



*sphinx_onedari1

gosub *onedari_syori
name $name
>You wish to be defeated by my fingers?@
>I'll finish you as you desire...\
name ""
gosub *sphinx_a1
skip -1



*sphinx_onedari2

gosub *onedari_syori
name $name
>You wish to be defeated by my mouth?@
>I'll finish you as you desire...\
name ""
gosub *sphinx_a2
skip -1



*sphinx_onedari3

gosub *onedari_syori
name $name
>You wish to be defeated by my breasts?@
>I'll finish you as you desire...\
name ""
gosub *sphinx_a3
skip -1



*sphinx_onedari4

gosub *onedari_syori
name $name
>Oh... You want a kiss before your death?@
>Then allow me to give you a final kiss goobye...\
name ""
gosub *sphinx_a6



*sphinx_onedari5

gosub *onedari_syori
name $name
>Oh... You want to experience the ancient pleasure?@
>Then let me give you the ultimate pleasure before your trip to the afterlife...\
name ""
gosub *sphinx_a7



*sphinx_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\sphinx_bk03.bmp",0,0
gosub *syasei2
>Unable to endure it any longer, Luka ejaculates as Sphinx strokes his penis with her fingers.\
mov %viclose,1:gosub *lose
mov %2558,%2558+1:if %2558=1 mov %count_koenemy,%count_koenemy+1
if %2558>%count_most mov %count_most,%2558:mov $count_mostname,$name
count 5,11
mov $bad1,"Luka succumbed to Sphinx's fingers."
mov $bad2," After that, Luka was slowly digested inside her."
gosub *face2
name $name
>Oh... You got my hand all dirty.@
>Were my sexual skills too much for you?\
name ""
goto *sphinx_h



*sphinx_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\sphinx_bk01.bmp",0,0
gosub *syasei2
>Unable to endure it any longer, Luka ejaculates as Sphinx sucks on his penis.\
mov %viclose,1:gosub *lose
mov %2558,%2558+1:if %2558=1 mov %count_koenemy,%count_koenemy+1
if %2558>%count_most mov %count_most,%2558:mov $count_mostname,$name
count 4,11
mov $bad1,"Luka succumbed to Sphinx's mouth."
mov $bad2," After that, Luka was slowly digested inside her."
gosub *face2
name $name
>Oh... You got my mouth all dirty.@
>Were my sexual skills too much for you?\
name ""
goto *sphinx_h



*sphinx_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\sphinx_bk02.bmp",0,0
gosub *syasei2
>Unable to endure it any longer, Luka ejaculates as Sphinx squeezes his penis between her breasts.\
mov %viclose,1:gosub *lose
mov %2558,%2558+1:if %2558=1 mov %count_koenemy,%count_koenemy+1
if %2558>%count_most mov %count_most,%2558:mov $count_mostname,$name
count 7,11
mov $bad1,"Luka succumbed to Sphinx's tit fuck."
mov $bad2," After that, Luka was slowly digested inside her."
gosub *face2
name $name
>Oh... You got my chest all dirty.@
>Were my sexual skills too much for you?\
name ""
goto *sphinx_h



*sphinx_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\sphinx_bk01.bmp",0,0
lsp 692,":a;chara\sphinx_bk02.bmp",0,0
gosub *syasei2
>With pleasure forced into him from every direction, Luka is forced to orgasm in an instant from Sphinx's ancient sexual skills!\
mov %viclose,1:gosub *lose
mov %2558,%2558+1:if %2558=1 mov %count_koenemy,%count_koenemy+1
if %2558>%count_most mov %count_most,%2558:mov $count_mostname,$name
count 9,11
mov $bad1,"Luka ascended to heaven due to Sphinx's ancient technique."
mov $bad2," After that, Luka was slowly digested inside her."
gosub *face2
name $name
>Hehe... Do you understand now?@
>You're a thousand years too early to match up to me...\
name ""
goto *sphinx_h



*sphinx_h5

mov %viclose,2:gosub *lose
name $name
>Hehe... Did you enjoy the kiss?\
name ""
name "Luka"
>Ahhh...\
name ""
>Power rapidly drains from my body as I'm dragged further into darkness.\
name "Luka"
>A...aa...\
name ""
>With our lips locked together, my life fades.\
gosub *anten
>................\
mov %2558,%2558+1:if %2558=1 mov %count_koenemy,%count_koenemy+1
if %2558>%count_most mov %count_most,%2558:mov $count_mostname,$name
count 18,14
mov $bad1,"Luka died as soon as he received the kiss of death."
mov $bad2,""
mov %2258,1
mov $end_go,"sean0140"
goto *badend



*sphinx_h

mov %2258,1
mov $end_go,"sean0140"
if %2819=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2819,1
name "Luka"
>Faa...\
name ""
>Weakness comes over my body after my orgasm.@
>Collapsed on the floor, Sphinx opens her mouth and starts to slowly approach me!\
name "Luka"
>Aiee!@>Help!\
name ""
name $name
>It's time to eat the fool...\
>Don't be afraid.@
>Being eaten by me will be like dissolving in heaven.\
name ""
name "Luka"
>Aie!@> Stop!\
name ""
cspl 690,699
lsp 700,":a;chara\sphinx_h1.bmp",0,0:print 10,500
>Ignoring my pleas, she sucks me into her mouth, with only my head remaining outside.\
>Inside of her mouth, countless tiny mouth-like cylindrical organs start to suck on and attach themselves to my body.\
mov %hseanwave,21:hseanwave
lsp 690,":a;chara\sphinx_ct01.bmp",0,0:print 10,500
>And one of the tiny mouths sucks in my penis!\
name "Luka"
>Ahhh!\
name ""
>I shiver at the strange feeling of insertion.@
>Sucked by a smaller mouth while my body is held in her giant mouth, the soft tongue-like organ wriggles and sucks on me.\
name $name
>Does it feel good?@
>I'll just let you feel some pleasure first...\
name ""
name "Luka"
>Aiee!@>Ahh!!\
name ""
>Her giant mouth starts to suck on my body.@
>The soft organ around my penis starts to make chewing movements at the same time.\
>Stuck inside of her, the chewing stimulation shoots unbearable pleasure as my entire body is sucked.\
name $name
>...As I thought, young boys are delicious.@
>I think I'll take my time to savor your taste.\
name ""
>As she says that, the tiny mouth like organs start to latch on to my other body parts.\
>My arms, legs, nipples... They all start to suck in everything.\
>I writhe around helplessly as I'm sucked and licked all over inside of her mouth.\
name "Luka"
>Ahhhh!!\
name ""
name $name
>Hehe... I can taste the salty semen leaking out.\
name ""
>The mouth around my penis starts to furiously suck on me.@
>The soft organ squeezes around me as it scrapes against my urethral opening, making sure it sucks out every drop of my pre-come.\
>Attacked by the pleasure all over, I'm quickly forced to orgasm inside of her mouth.\
name "Luka"
>Auu... I'm coming...!\
name ""
name $name
>Oh?@>I don't mind...@
>I'll suck up all of your semen with this mouth of mine.\
name ""
name "Luka"
>Ahhh!!\
gosub *syasei1
lsp 690,":a;chara\sphinx_ct02.bmp",0,0
lsp 700,":a;chara\sphinx_h2.bmp",0,0:print 10,500
gosub *syasei2
>My body relaxes as I ejaculate inside of her desperately sucking mouth.\
>Each spurt of semen causes the tiny mouth wrapped around my penis to furiously suck on me as it tries to collect every drop out of me.\
lsp 690,":a;chara\sphinx_ct03.bmp",0,0
lsp 700,":a;chara\sphinx_h3.bmp",0,0:print 10,500
name $name
>Haha... How delicious.@
>Your semen is quite high quality.\
name ""
>I can hear the small mouth around my penis drinking my semen with a slurping noise.\
>The shame flows through me as the realization that the only importance I hold in her eyes is as a source of food.\
csp 690:print 10,500
name $name
>...Now, it's about time for the main course.@
>Be happy, for a fool like you will have the privilege of being eaten by me.\
name ""
name "Luka"
>Ahh!@> No! Stop!\
name ""
if %hosyoku_cut=1 goto *hosyoku_cut
lsp 700,":a;chara\sphinx_h4.bmp",0,0:print 10,500
>Ignoring my final screams, her mouth shuts around me.@
>Her tiny mouths force me into her throat, as she squeezes my body down into her stomach.\
mov %hseanwave,12:hseanwave
lsp 690,":a;chara\sphinx_cta01.bmp",400,0
lsp 700,":a;chara\sphinx_h4.bmp",-160,0:print 10,500
>Now in her stomach, a strange organ wraps around me to stop my struggling movements.\
name "Luka"
>Aiee! Ahhh!!\
name ""
mov %hseanwave,13:hseanwave
lsp 690,":a;chara\sphinx_cta02.bmp",400,0:print 10,500
>A strange sticky mucus shoots out from the walls of flesh and covers my body.\
>As the strange liquid covers more of my body, my movements get slower as my power drains away.\
>I'm inside her stomach...@>I know what awaits me...@
>Bound and unable to move inside of her, I'm going to be slowly digested...\
lsp 690,":a;chara\sphinx_cta03.bmp",400,0:print 10,500
name "Luka"
>Ah! Ahhhh!!\
name ""
>I yell out as an organ wraps itself around the lower half of my body.@
>It covers the entire lower half of my body with more of the strange digestive juices.\
name "Luka"
>Auu... Faaa...\
name ""
>As more of the strange juices cover me, more of my panic fades.@
>My struggling finally stops as the pleasure takes hold in my mind again.\
lsp 690,":a;chara\sphinx_cta04.bmp",400,0:print 10,500
name "Luka"
>Aaa...\
name ""
>My body is completely soaked in her juices.@
>The juices intoxicate me, as if they were designed to stop her prey from struggling while being eaten.\
>I sigh in pleasure as my body starts to slowly dissolve.\
name "Luka"
>Faaa...@>It feels good...\
name ""
gosub *syasei1
lsp 690,":a;chara\sphinx_cta05.bmp",400,0
gosub *syasei2
>Unable to even control my body any longer, I ejaculate as I'm being digested.\
name "Luka"
>Aie!@> Ahhhh!\
name ""
>Trembling in pleasure, I feel a height that can only be experienced a single time.\
>Like that, my penis melted away...\
name "Luka"
>Aaa...\
name ""
>After that, more of my body is dissolved and absorbed by Sphinx.@
>A fog comes over me as my life is turned into nutrients for her.\
>Inside Sphinx's stomach, my life finally comes to an end.\
gosub *anten
mov %hseanwave,0:hseanwave
>Thus another adventurer fails the trial, ending up as nothing but Sphinx's food.\
>.....................\
goto *badend



*suckvore_start

bgm "bgm\kiki2.ogg"
mov $name,"Suck Vore"
mov $name2,"Suck Vore"
mov $lavel,"suckvore"
mov $tatie1,"suckvore_st11"
mov $tatie2,"suckvore_st01"
mov $tatie3,"suckvore_st01"
mov $tatie4,"suckvore_h1"
mov $haikei,"bg071"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,1200
if %nanido=2 mov %max_enemylife,1200
if %nanido=3 mov %max_enemylife,1800
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,99
mov %music,0
mov %tikei,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,""
mov $mogaku_sel2,""
mov $mogaku_sel3,""
mov $mogaku_sel4,""
mov $mogaku_sel5,""
mov $mogaku_dassyutu1,""
mov $mogaku_dassyutu2,""
mov %end_n,5
mov %exp_minus,0
mov %zmonster_x,-300
mov %tukiy,0
mov %owaza_count1a,7
name "Girl"
>H...Help me...\
name ""
>There in front of me was a girl with tears in her eyes.@
>This must be a villager caught by Lily...\
name "Luka"
>I came here to help you...@
>Hurry, come over to me.\
name ""
lsp 700,":a;chara\suckvore_st11.bmp",-160,0
lsp 701,":a;chara\lily_st11.bmp",160,0:print 10,500
name "Lily"
>Arara, what a naughty girl.@
>You'll need to be punished.\
name ""
>Lily suddenly appears at the end of the hall.@
>With a snap of her fingers, the girl's body suddenly begins to change!\
dwave 1,"se\ero_makituki3.ogg"
lsp 700,":a;chara\suckvore_st12.bmp",-160,0:print 10,500
name "Girl"
>Ahh... Ahhh!\
name ""
name "Luka"
>Lily! What are you doing to this girl!?\
name ""
name "Lily"
>I just forced her to change into a life form that craves semen.@
>Ah, but it looks like she's another reject.\
name ""
dwave 1,"se\ero_makituki3.ogg"
lsp 700,":a;chara\suckvore_st01.bmp",-160,0:print 10,500
>Right in front of my eyes, she turns into the same strange organism that was attacking the other men.\
name "Lily"
>Well, since you tried to escape, I guess the body of a failure suits you.@
>Now make yourself useful and suck this intruder dry.\
>Hehe... Don't you yourself want to be sucked dry?@
>It feels amazing... Just look at all the other men going insane.\
name ""
name "Luka"
>I'll never forgive you!!\
name ""
dwave 1,"se\ero_makituki1.ogg"
>As I charge Lily, a tentacle shoots out from the Suck Vore!@
dwave 2,"se\miss.ogg"
>I jump to the side and narrowly dodge it!\
name "Lily"
>Hahaha... Have fun!\
name ""
csp 701:print 10,500
>With that final taunt, Lily vanishes.@
>This hall is too narrow... I need to defeat this thing to get by.\
bgm "bgm\battle.ogg"
lsp 700,":a;chara\suckvore_st01.bmp",0,0:print 10,500
name "Luka"
>I don't have a choice...\
name ""
>I pull out my sword as I stare at the strange creature.\
mov $tatie1,"suckvore_st01"
goto *common_main



*suckvore_v

dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Suck Vore bursts into a cloud of dust!@
>The dust cloud collects into the form of a human female!\
mov %viclose,1:gosub *victory
mov %getexp,1000:gosub *lvup
mov %2259,1
goto *sean0151



*suckvore_kousan

gosub *kousan_syori
>Luka yields to temptation, ending his resistance!\
goto *suckvore_a



*suckvore_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *suckvore_kousan
if %cmd1=16 goto *suckvore_onedari
if %cmd1=17 goto *common_skill
goto *suckvore_main



*suckvore_a

if %kousoku=1 rnd2 %ransu,1,4
if %kousoku=1 && %ransu=1 gosub *suckvore_a4:gosub *suckvore_a4:goto *common_main
if %kousoku=1 && %ransu=2 gosub *suckvore_a4:gosub *suckvore_a5:goto *common_main
if %kousoku=1 && %ransu=3 gosub *suckvore_a5:gosub *suckvore_a4:goto *common_main
if %kousoku=1 && %ransu=4 gosub *suckvore_a5:gosub *suckvore_a5:goto *common_main
rnd2 %ransu,1,3
if %ransu=1 gosub *suckvore_a1:goto *common_main
if %ransu=2 gosub *suckvore_a2:goto *common_main
if %ransu=3 && %owaza_count1a>8 gosub *suckvore_a3:goto *common_main
skip -4



*suckvore_a1

add %stack,1
skillname "Full Body Tentacle Rub"
dwave 1,"se\ero_makituki1.ogg"
>The Suck Vore shoots out a tentacle and massages Luka's body!
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,30
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushed it away!":gosub *wind_guard:sub %stack,1:return
skillcount1 3238
if %nanido<2 damage 20,25
if %nanido=2 damage 25,32
if %nanido=3 damage 35,45
skillname ""
if %mylife=0 sub %stack,1:return *suckvore_h1
sub %stack,1
return



*suckvore_a2

add %stack,1
skillname "Groin Tentacle Rub"
dwave 1,"se\ero_makituki2.ogg"
>The Suck Vore shoots out a tentacle and massages Luka's groin!
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,30
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushed it away!":gosub *wind_guard:sub %stack,1:return
skillcount1 3239
if %nanido<2 damage 23,28
if %nanido=2 damage 29,37
if %nanido=3 damage 41,51
skillname ""
if %mylife=0 sub %stack,1:return *suckvore_h2
sub %stack,1
return



*suckvore_a3

add %stack,1
mov %owaza_count1a,0
skillname "Tentacle Restraint"
dwave 1,"se\ero_makituki3.ogg"
>The Suck Vore's tentacle wraps around Luka's body!
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,30
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind blows it off him!":gosub *wind_guard:sub %stack,1:return
if %nanido<2 damage 20,25
if %nanido=2 damage 25,32
if %nanido=3 damage 35,45
mov %kousoku,1:gosub *status_print
>Luka's body is wrapped by the Suck Vore's tentacle!\
skillname ""
if %mylife=0 sub %stack,1:return *suckvore_h3
if %nanido<2 mov %genmogaku,2
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,3
sub %stack,1
return



*suckvore_a4

add %stack,1
>Luka's body is wrapped by the Suck Vore's tentacle!\
skillcount1 3240
skillname "Full Body Energy Suck"
dwave 1,"se\ero_buchu3.ogg"
>The tentacle around Luka's body starts to suck his energy!\
>Luka's energy slowly drains!
damage 15,20
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *suckvore_h4
sub %stack,1
return



*suckvore_a5

add %stack,1
>Luka's body is wrapped by the Suck Vore's tentacle!\
skillcount1 3241
skillname "Genital Energy Suck"
dwave 1,"se\ero_buchu3.ogg"
>The tentacle wraps around Luka's penis!\
>Luka's energy is slowly drained!
damage 18,23
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *suckvore_h5
sub %stack,1
return



*suckvore_onedari

mov $list1,"Full Body Tentacle Rub"
if %3238>0 mov %list_num1,1
mov $list2,"Groin Tentacle Rub"
if %3239>0 mov %list_num2,1
mov $list3,"Full Body Energy Suck"
if %3240>0 mov %list_num3,1
mov $list4,"Genital Energy Suck"
if %3241>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *suckvore_onedari1
if %cmd1=12 goto *suckvore_onedari2
if %cmd1=13 goto *suckvore_onedari3
if %cmd1=14 goto *suckvore_onedari4
if %cmd1=-1 goto *suckvore_main
goto *suckvore_onedari



*suckvore_onedari1

gosub *onedari_syori
gosub *suckvore_a1
skip -1



*suckvore_onedari2

gosub *onedari_syori
gosub *suckvore_a2
skip -1



*suckvore_onedari3

gosub *onedari_syori_k
if %kousoku=0 gosub *suckvore_a3
gosub *suckvore_a4
skip -1



*suckvore_onedari4

gosub *onedari_syori_k
if %kousoku=0 gosub *suckvore_a3
gosub *suckvore_a5
skip -1



*suckvore_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\suckvore_bk02.bmp",0,0
gosub *syasei2
>Rubbed by the tentacles, Luka is forced to ejaculate!\
mov %viclose,1:gosub *lose
mov %2559,%2559+1:if %2559=1 mov %count_koenemy,%count_koenemy+1
if %2559>%count_most mov %count_most,%2559:mov $count_mostname,$name
count 10,4
mov $bad1,"Luka succumbed to the Suck Vore's tentacles."
mov $bad2," After that, Luka's energy was completely sucked out."
goto *suckvore_h



*suckvore_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\suckvore_bk01.bmp",0,0
gosub *syasei2
>Rubbed by the tentacles, Luka is forced to ejaculate!\
mov %viclose,1:gosub *lose
mov %2559,%2559+1:if %2559=1 mov %count_koenemy,%count_koenemy+1
if %2559>%count_most mov %count_most,%2559:mov $count_mostname,$name
count 10,4
mov $bad1,"Luka succumbed to the Suck Vore's tentacles."
mov $bad2," After that, Luka's energy was completely sucked out."
goto *suckvore_h



*suckvore_h3

mov %ikigoe,3:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\suckvore_h2.bmp",0,0
gosub *syasei2
>As soon as the tentacle wraps around his body, Luka is forced to ejaculate!\
mov %viclose,1:gosub *lose
mov %2559,%2559+1:if %2559=1 mov %count_koenemy,%count_koenemy+1
if %2559>%count_most mov %count_most,%2559:mov $count_mostname,$name
count 10,4
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka ejaculated as soon as the tentacle wrapped around him."
mov $bad2," After that, Luka's energy was completely sucked out."
>Even after I came, the strange creature doesn't stop...@
>Weak after my orgasm, the Suck Vore wraps up my entire body.\
goto *suckvore_h



*suckvore_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\suckvore_h2.bmp",0,0
gosub *syasei2
>Wrapped by the tentacle and having his energy sucked, Luka was forced to ejaculate.\
mov %viclose,1:gosub *lose
mov %2559,%2559+1:if %2559=1 mov %count_koenemy,%count_koenemy+1
if %2559>%count_most mov %count_most,%2559:mov $count_mostname,$name
count 10,4
mov $bad1,"Luka succumbed to the pleasure of the Suck Vore sucking his energy."
mov $bad2," After that, Luka's energy was completely sucked out."
>Even after I came, the strange creature doesn't stop...@
>Weak after my orgasm, the Suck Vore wraps up my entire body.\
goto *suckvore_h



*suckvore_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\suckvore_h2.bmp",0,0
gosub *syasei2
>Wrapped by the tentacle and having his energy sucked, Luka was forced to ejaculate.\
mov %viclose,1:gosub *lose
mov %2559,%2559+1:if %2559=1 mov %count_koenemy,%count_koenemy+1
if %2559>%count_most mov %count_most,%2559:mov $count_mostname,$name
count 10,4
mov $bad1,"Luka succumbed to the pleasure of the Suck Vore sucking his energy."
mov $bad2," After that, Luka's energy was completely sucked out."
>Even after I came, the strange creature doesn't stop...@
>Weak after my orgasm, the Suck Vore wraps up my entire body.\
goto *suckvore_h



*suckvore_h

if %2559=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku=1 mov %hseanwave,21:hseanwave:skip 9
name "Luka"
>Auuu...\
name ""
cspl 690,699
lsp 700,":a;chara\suckvore_h1.bmp",0,0:print 10,500
mov %hseanwave,21:hseanwave
>Still weak from my orgasm, the Suck Vore sucks me into its body.\
>Stuck in its body, the Suck Vore's tentacles wrap around my penis.\
name "Luka"
>Ahh!\
name ""
>Each tentacle has soft bumps on them.@
>As if moving independently of each other, they slowly tighten around me.\
>The tighter they wrap around me, the more the soft bumps push into my penis, forcing a bizarre stimulation into me.\
name "Luka"
>Faaa... That feels good...\
name ""
>The bizarre pleasure makes my voice come out before I can stop it.@
>Massaged by the soft tentacles, I see a small pink opening in the Suck Vore's tentacle.\
>As soon as I see it, I feel the instinctive desire to want it to suck me inside.\
name "Luka"
>Ahh...\
name ""
>As I stare at it, the tentacle slowly moves closer to my body, with the pink hole expanding.\
>While wriggling around, it slowly wraps around my penis.\
name "Luka"
>Ahhhh!!\
name ""
>With the pleasure more than I expected, I yell out in a lewd voice.\
>The soft tentacle wrapped around me wriggles and vibrates, as the slimy interior lubricates me.\
>The back muscle, the tip... Every part of my penis is carefully rubbed and massaged.\
>My body becomes rigid as the desire to release overpowers the rest of my senses.\
name "Luka"
>Faaa... I'm coming!\
name ""
gosub *syasei1
lsp 700,":a;chara\suckvore_h2.bmp",0,0
gosub *syasei2
>As I explode in the tentacle, it starts to suck on me, collecting everything I shoot out.\
>Greedily licking everything up, it even sucks out the semen in my urethra.\
name "Luka"
>Aaaa...\
name ""
>As if rejoicing at the pleasure, my penis remains hard as the soft tentacle continues to vibrate and wriggle around me.\
lsp 700,":a;chara\suckvore_h3.bmp",0,0:print 10,500
>Before I noticed it, my clothes had melted as I feel the Suck Vore on my bare skin.\
>My body trembles as I feel its slimy flesh rub against me.\
mov %hseanwave,22:hseanwave
lsp 700,":a;chara\suckvore_h4.bmp",0,0:print 10,500
name "Luka"
>Mmm...\
name ""
>Suddenly, the Suck Vore covers my upper body with its tentacles!\
>Like that, I'm completely stuck inside of it as it continues to stimulate my penis.\
>With my upper body stuck inside of it, I feel its soft flesh start to make chewing motions on my body.\
name "Luka"
>Stop... Get off!\
name ""
>Instinctively, I yell out in fear.@
>But to such a mutated creature as this, I doubt it can even comprehend language.\
>Stuck inside its body, I can't do anything but helplessly be forced to orgasm.\
>Before I was even aware of how close I was, I feel the tingling of another orgasm rise through me.\
name "Luka"
>Ahh... I'm coming again!\
name ""
gosub *syasei1
lsp 700,":a;chara\suckvore_h5.bmp",0,0
gosub *syasei2
>As it squeezes my entire body, I give in again.@
lsp 700,":a;chara\suckvore_h6.bmp",0,0:print 10,500
>As I ejaculate, the tentacles cover even more of my body.\
name "Luka"
>Uuu...\
name ""
>With my initial trance starting to fade after ejaculating a couple times, I'm finally able to comprehend the dangerous situation.\
>As I'm stuck here unable to feel pain, this thing is eating me...@
>Once I was captured by this thing, my fate was sealed!\
name "Luka"
>Aaaa!\
name ""
>I struggle pathetically even as I know there's no escape.@
>With its tentacles continuing to stimulate me, I'm forced to another height.\
name "Luka"
>Stop!@>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\suckvore_h7.bmp",0,0
gosub *syasei2
>Caught as it's prey, it continues to squeeze semen from me.@
>Now nothing but its food, my body writhes in disgrace and pleasure.\
>As a man, I've been reduced to nothing but the semen I can shoot out for this living creature.\
>No matter how much I fight, I can't do anything but continue to feed it.@
>Mortified and frustrated, there's nothing I can do but accept it...\
name "Luka"
>Help me...\
name ""
>I beg to the creature that I know can't even understand me.@
>While falling into despair, I can't do anything but give it more semen.\
name "Luka"
>I don't want this...\
name ""
gosub *syasei1:gosub *syasei2
>Forced to ejaculate multiple times, exhaustion comes over me.@
>My mind and body both relax as the sweet feeling of release floods over me.\
>As the tentacles continue to force pleasure into me, I stop all of my resistance.\
>Accepting that this thing is going to eat me, I surrender my body to it.\
name "Luka"
>Aaa...\
name ""
>Now that I've stopped struggling, the Suck Vore is able to latch on even more tentacles as the stimulation only increases.\
>Like this, it's going to quickly suck me dry...\
name "Luka"
>Faa...\
name ""
>With my mind broken down by despair, I just bask in the pleasure of its soft tentacles.\
gosub *syasei1:gosub *syasei2
>Each ejaculation drains more of my strength.@
>At the same time, my thoughts drift further away, as if I was in a trance.\
name "Luka"
>Aa...a...\
name ""
gosub *syasei1:gosub *syasei2
>Shooting out more and more, my mind clouds over.@
>My mind is dimly ringing off warning bells at the danger....@
>But I'm too exhausted to even move a finger.\
>The only thing I can do now is enjoy the pleasure till my last breath.\
name "Luka"
>Auuu...\
name ""
gosub *syasei1:gosub *syasei2
>Unable to even feel my body anymore, my mind melts into sweet pleasure.\
gosub *syasei1:gosub *syasei2
>With a final orgasm, my energy and consciousness vanish.\
gosub *anten
mov %hseanwave,0:hseanwave
>Thus, another man met his end due to one of Lily's creations.@
>Sucked dry by the strange creature, Luka's adventure ended here.\
>Just another sacrifice in the Lord's mansion...\
>..................\
goto *badend



*wormv_start

mov $name,"Worm Villager"
mov $name2,"Worm Villager"
mov $lavel,"wormv"
mov $tatie1,"wormv_st01"
mov $tatie2,"wormv_st02"
mov $tatie3,"wormv_st03"
mov $tatie4,"wormv_h1"
mov $haikei,"bg071"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,1400
if %nanido=2 mov %max_enemylife,1400
if %nanido=3 mov %max_enemylife,2100
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,1
mov %tikei,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Hahaha... I won't let go!"
mov $mogaku_sel2,"Even if you struggle, I'll keep squeezing. "
mov $mogaku_sel3,"Struggling is pointless..."
mov $mogaku_sel4,"Hehehe... I'll make you feel amazing."
mov $mogaku_sel5,"Why don't you just lay back and enjoy it?"
mov $mogaku_dassyutu1,"You ran away?"
mov $mogaku_dassyutu2,"You won't quench my thirst...?"
mov $half_s1,"Does it feel good?"
mov $half_s2,"I can make it even better..."
mov $kiki_s1,"Are you already leaking...?"
mov $kiki_s2,"I'll be able to squeeze even more out soon..."
mov %end_n,5
mov %exp_minus,1000
mov %zmonster_x,-300
mov %tukix,330
mov %owaza_count1a,6
gosub *face2
name $name
>Hehe... A boy coming here by himself! @
>I'll squeeze your semen out for you.\
name ""
>Just looking at her, I can tell she's insane.@
>Lily must have done something to her mind as well as her body...\
name "Luka"
>Get a hold of yourself!@>You shouldn't be doing something like this!\
name ""
name $name
>Haha... If you want me to feel better...@
>My throat is so dry...@
>So please, won't you let me drink your semen?\
name ""
name "Luka"
>Guh... It's no good...\
name ""
>It looks like I have no choice but to fight.@
>I hope I can just seal that tentacle with this sword!\
gosub *face1
goto *common_main



*wormv_v

gosub *face3
name $name
>What is... This...@> My power... Escaping...\
name ""
dwave 1,"se\syometu.ogg"
lsp 700,":a;chara\wormv_st13.bmp",0,0
print 99,4500,"system\breakup.dll/urb"
>The girl's tentacle vanishes!@
dwave 1,"se\down.ogg"
csp 700:print 10,500
>The girl faints!\
mov %viclose,1:gosub *victory
mov %getexp,2000:gosub *lvup
mov %2260,1
goto *sean0152



*wormv_kousan

gosub *kousan_syori
>Luka yields to the temptation, ending his resistance!\
gosub *face2
name $name
>Haha... So you gave in?@
>That's good... I'll be sure to squeeze everything out.\
name ""
goto *wormv_a



*wormv_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *wormv_kousan
if %cmd1=16 goto *wormv_onedari
if %cmd1=17 goto *common_skill
goto *wormv_main



*wormv_a

if %kousoku=1 rnd2 %ransu,1,16
if %kousoku=1 && %ransu<4 gosub *wormv_a4:gosub *wormv_a4:goto *common_main
if %kousoku=1 && %ransu<7 gosub *wormv_a4:gosub *wormv_a5:goto *common_main
if %kousoku=1 && %ransu<10 gosub *wormv_a5:gosub *wormv_a4:goto *common_main
if %kousoku=1 && %ransu<13 gosub *wormv_a5:gosub *wormv_a5:goto *common_main
if %kousoku=1 && %ransu>12 gosub *wormv_a6:goto *common_main
rnd2 %ransu,1,3
if %ransu=1 gosub *wormv_a1:goto *common_main
if %ransu=2 gosub *wormv_a2:goto *common_main
if %ransu=3 && %owaza_count1a>8 gosub *wormv_a3:goto *common_main
skip -4



*wormv_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hehe... My tentacle feels amazing."
if %ransu=2 mov $sel1,"I can please a man like never before with this new body..."
if %ransu=3 mov $sel1,"Here do you want me to massage you? Here? There?"
name $name
eng $sel1:$sel6\
name ""
skillname "Worm Touch"
dwave 1,"se\ero_makituki2.ogg"
>The Worm Villager's tentacle rubs Luka all over his body!
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,30
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
skillcount1 3242
if %nanido<2 damage 20,25
if %nanido=2 damage 23,28
if %nanido=3 damage 33,43
skillname ""
if %mylife=0 sub %stack,1:return *wormv_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*wormv_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My tentacle can tangle around it..."
if %ransu=2 mov $sel1,"If I do this, will you come?"
if %ransu=3 mov $sel1,"Let me play with your penis with my tentacle..."
name $name
eng $sel1:$sel6\
name ""
skillname "Worm Caress"
dwave 1,"se\ero_slime1.ogg"
>The Worm Villager's tentacle wraps around Luka's penis!
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,30
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
skillcount1 3243
if %nanido<2 damage 23,28
if %nanido=2 damage 27,32
if %nanido=3 damage 39,49
skillname ""
if %mylife=0 sub %stack,1:return *wormv_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*wormv_a3

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name $name
>Alright!@> I'll catch you. \
name ""
skillname "Worm Hold"
dwave 1,"se\ero_makituki3.ogg"
>The Worm Villager's tentacles wrap around Luka's body!
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,30
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes her off!":gosub *wind_guard:sub %stack,1:return
if %nanido<2 damage 20,25
if %nanido=2 damage 25,32
if %nanido=3 damage 35,45
mov %kousoku,1:gosub *status_print
>Luka's body is wrapped by the Worm Villager's tentacles!\
skillname ""
if %mylife=0 sub %stack,1:return *wormv_h3
if %kousan=2 sub %stack,1:return
gosub *face2
name $name
if %first_sel1=1 skip 3
>Hahaha... Now, I'll start to squeeze. \
skip 2
>This time I'll make sure I squeeze you even more. \
name ""
mov %first_sel1,1
if %nanido<2 mov %genmogaku,2
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,3
sub %stack,1
return



*wormv_a4

add %stack,1
>Luka's body is wrapped by the Worm Villager's tentacles!\
skillcount1 3244
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck your energy from your penis. "
if %ransu=2 mov $sel1,"Hahaha... I'll be sure to get my fill. "
if %ransu=3 mov $sel1,"Why don't you just relax and let it all out?"
name $name
eng $sel1:$sel6\
name ""
skillname "Worm Drain"
lsp 700,":a;chara\wormv_h6.bmp",0,0:print 10,500
dwave 1,"se\ero_buchu3.ogg"
>The Worm Villager's tentacle wraps around Luka's penis, and drains out his energy!
damage 15,20
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *wormv_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*wormv_a5

add %stack,1
>Luka's body is wrapped by the Worm Villager's tentacles!\
skillcount1 3245
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll wrap around it..."
if %ransu=2 mov $sel1,"My tentacle can make you feel amazing..."
if %ransu=3 mov $sel1,"Hehe... Just ejaculate, come on..."
name $name
eng $sel1:$sel6\
name ""
skillname "Worm Spread"
lsp 700,":a;chara\wormv_h2.bmp",0,0:print 10,500
dwave 1,"se\ero_makituki2.ogg"
>The Worm Villager's tentacle wraps around Luka's penis!
damage 18,23
skillname ""
if %mylife=0 sub %stack,1:return *wormv_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*wormv_a6

add %stack,1
>Luka's body is wrapped by the Worm Villager's tentacles!\
name $name
>Shall I try it in the back?@
>Just like a girl, I'll stir up your hole. \
name ""
skillname "Anal Stroke"
dwave 1,"se\ero_pyu2.ogg"
lsp 700,":a;chara\wormv_h4.bmp",0,0:print 10,500
if %wind=1 && %nanido<2 mov %wind_kakuritu,100
if %wind=1 && %nanido=2 mov %wind_kakuritu,100
if %wind=1 && %nanido=3 mov %wind_kakuritu,50
>The Worm Villager slips her tentacle into Luka's anus!
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
skillcount1 3246
mov %damage_kotei,1
damage 50,60
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *wormv_h6
name "Luka"
>Uaaa!\
name ""
name $name
>Hehe... Until you let out your white juice, I'll continue.@
>I'll rape your asshole. \
name ""
skillcount1 3246
skillname "Anal Stroke"
dwave 1,"se\ero_pyu2.ogg"
>The Worm Villager forces her tentacle in and out of Luka's anus!
mov %damage_kotei,1
damage 50,60
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *wormv_h6
name $name
>Come on... Put it out quickly.@
>Once you do, I'll be able to make you come over and over again...\
name ""
skillcount1 3246
skillname "Anal Stroke"
dwave 1,"se\ero_pyu2.ogg"
>The Worm Villager slips her tentacle into Luka's anus and stimulates his prostate!
mov %damage_kotei,1
damage 50,60
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *wormv_h6
name $name
>Look at your pre-come...@
>Do you really like being raped that much?\
name ""
skillcount1 3246
skillname "Anal Stroke"
dwave 1,"se\ero_pyu2.ogg"
>The Worm Villager quickly forces herself in and out of Luka!
mov %damage_kotei,1
damage 50,60
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *wormv_h6
name $name
>The next one is the last.@
>You're going to orgasm with my tentacle in your ass.\
>Now... Come! \
name ""
skillcount1 3246
skillname "Anal Stroke"
dwave 1,"se\ero_pyu2.ogg"
>The tentacle inside Luka grows!\
>She deliberately stimulates Luka's prostate as the large tentacle spins around in a circle!
mov %damage_kotei,1
damage 50,60
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
sub %stack,1
return *wormv_h6



*wormv_onedari

mov $list1,"Worm Touch"
if %3242>0 mov %list_num1,1
mov $list2,"Worm Caress"
if %3243>0 mov %list_num2,1
mov $list3,"Worm Drain"
if %3244>0 mov %list_num3,1
mov $list4,"Worm Spread"
if %3245>0 mov %list_num4,1
mov $list5,"Anal Stroke"
if %3246>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *wormv_onedari1
if %cmd1=12 goto *wormv_onedari2
if %cmd1=13 goto *wormv_onedari3
if %cmd1=14 goto *wormv_onedari4
if %cmd1=15 goto *wormv_onedari5
if %cmd1=-1 goto *wormv_main
goto *wormv_onedari



*wormv_onedari1

gosub *onedari_syori
name $name
>You want me to touch you all over with my tentacle?@
>I'll be glad to fill your desire...\
name ""
gosub *wormv_a1
skip -1



*wormv_onedari2

gosub *onedari_syori
name $name
>You want me to caress your penis with my tentacle?@
>I'll be glad to fill your desire...\
name ""
gosub *wormv_a2
skip -1



*wormv_onedari3

gosub *onedari_syori_k
name $name
>Haha... You want your energy sucked by my tentacle? @
>I'll be glad to fill your desire...\
name ""
if %kousoku=0 gosub *wormv_a3
gosub *wormv_a4
skip -1



*wormv_onedari4

gosub *onedari_syori_k
name $name
>Haha... You want my tentacle to wrap around your penis? @
>I'll be glad to fill your desire...\
name ""
if %kousoku=0 gosub *wormv_a3
gosub *wormv_a5
skip -1



*wormv_onedari5

gosub *onedari_syori_k
name $name
>You want me to force my tentacle into your ass...?@
>Then I'll give the huge pervert what he wants. \
name ""
if %kousoku=0 gosub *wormv_a3
gosub *wormv_a6



*wormv_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\wormv_bk02.bmp",0,0
gosub *syasei2
>Rubbed all over by the tentacle, Luka is forced to ejaculate.\
mov %viclose,1:gosub *lose
mov %2560,%2560+1:if %2560=1 mov %count_koenemy,%count_koenemy+1
if %2560>%count_most mov %count_most,%2560:mov $count_mostname,$name
count 10,3
mov $bad1,"Luka succumbed to the Worm Villager's worm touch."
mov $bad2," Weakened by the tentacle rape, Luka was kept alive to be continually squeezed for the rest of his life."
gosub *face2
name $name
>Haha... You came. @
>You made my tentacles all sticky...\
name ""
goto *wormv_h



*wormv_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\wormv_bk02.bmp",0,0
gosub *syasei2
>Caressed by the tentacle, Luka is forced to ejaculate.\
mov %viclose,1:gosub *lose
mov %2560,%2560+1:if %2560=1 mov %count_koenemy,%count_koenemy+1
if %2560>%count_most mov %count_most,%2560:mov $count_mostname,$name
count 10,3
mov $bad1,"Luka succumbed to the Worm Villager's worm caress."
mov $bad2," Weakened by the tentacle rape, Luka was kept alive to be continually squeezed for the rest of his life."
gosub *face2
name $name
>Haha... You came. @
>You made my tentacles all sticky...\
name ""
goto *wormv_h



*wormv_h3

mov %ikigoe,3:gosub *ikigoe
name $name
>Oh my... Hehe.\
name ""
gosub *syasei1
lsp 700,":a;chara\wormv_h3.bmp",0,0:print 10,500
gosub *syasei2
>As soon as he was wrapped by the tentacle, Luka gave in to the stimulation and ejaculated.\
mov %viclose,1:gosub *lose
mov %2560,%2560+1:if %2560=1 mov %count_koenemy,%count_koenemy+1
if %2560>%count_most mov %count_most,%2560:mov $count_mostname,$name
count 10,3
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka ejaculated as soon as the tentacle wrapped around him."
mov $bad2," Weakened by the tentacle rape, Luka was kept alive to be continually squeezed for the rest of his life."
gosub *face2
name $name
>Haha... You came. @
>You made my tentacles all sticky...\
name ""
goto *wormv_h



*wormv_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\wormv_h7.bmp",0,0
gosub *syasei2
>Bound by the Worm Villager's tentacles and having his energy sucked, Luka finally ejaculated.\
mov %viclose,1:gosub *lose
mov %2560,%2560+1:if %2560=1 mov %count_koenemy,%count_koenemy+1
if %2560>%count_most mov %count_most,%2560:mov $count_mostname,$name
count 10,3
mov $bad1,"Luka succumbed to the Worm Villager's worm drain."
mov $bad2," Weakened by the tentacle rape, Luka was kept alive to be continually squeezed for the rest of his life."
gosub *face2
name $name
>Hehe... I sucked it out. @
>My tentacle is full of your sticky semen.\
>But I want a lot more...@
>I'll squeeze out all of your delicious semen. \
name ""
mov %hanyo1,1
goto *wormv_h



*wormv_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\wormv_h3.bmp",0,0
gosub *syasei2
>Bound by the Worm Villager's tentacles, Luka finally ejaculated as she wrapped around his penis.\
mov %viclose,1:gosub *lose
mov %2560,%2560+1:if %2560=1 mov %count_koenemy,%count_koenemy+1
if %2560>%count_most mov %count_most,%2560:mov $count_mostname,$name
count 10,3
mov $bad1,"Luka succumbed to the Worm Villager's worm spread."
mov $bad2," Weakened by the tentacle rape, Luka was kept alive to be continually squeezed for the rest of his life."
gosub *face2
name $name
>Haha... You shot it out.@
>Were you unable to endure my tentacle wrapping around your penis?\
name ""
goto *wormv_h



*wormv_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\wormv_h5.bmp",0,0
gosub *syasei2
>With the Worm Villager's tentacle directly stimulating his prostate, Luka is filled with disgrace as he's forced to ejaculate!\
mov %viclose,1:gosub *lose
mov %2560,%2560+1:if %2560=1 mov %count_koenemy,%count_koenemy+1
if %2560>%count_most mov %count_most,%2560:mov $count_mostname,$name
count 9,3
mov $bad1,"Luka succumbed to the Worm Villager's anal stroke."
mov $bad2," Weakened by the tentacle rape, Luka was kept alive to be continually squeezed for the rest of his life."
gosub *face2
name $name
>Hehe... Even though you're a boy, you came by having your ass played with.@
>Your semen is thick and delicious. \
name ""
goto *wormv_h



*wormv_h

if %2560=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku=1 skip 9
name "Luka"
>Auuu...\
name ""
dwave 1,"se\ero_makituki3.ogg"
cspl 690,699
lsp 700,":a;chara\wormv_h1.bmp",0,0:print 10,500
>Too weak to resist, the Worm Villager's tentacle coils around me.@
>Completely entangled in her, I'm left unable to move.\
if %hanyo1=1 mov %hseanwave,15:hseanwave:goto *wormv_hb
name $name
>I want more...@
>Your semen is too delicious to resist. \
>Look... Doesn't my tentacle look like it would feel amazing?\
name ""
dwave 1,"se\ero_pyu2.ogg"
>With a lewd noise, a mouth opens at the end of one of her tentacles.@
>The flesh inside of it wriggles and vibrates around, as if inviting me.\
>She's going to stick me in there...@
>Just thinking of that fills me with both hate and expectation.\
name "Luka"
>Stop... Stop...\
name ""
name $name
>Hehe... Are you ready?@
>Well then... Here we go! \
name ""
mov %hseanwave,15:hseanwave
lsp 700,":a;chara\wormv_h6.bmp",0,0:print 10,500
>With a soft slurping noise, her tentacle sucks me all the way inside!@
>In an instant, I'm sucked all the way into the slimy tentacle's mouth!\
goto *wormv_hb



*wormv_hb

name "Luka"
>Ahhhh!!\
name ""
>My body shivers as the unexpected pleasure attacks me.\
>The inside of her tentacle is softer and warmer than I expected.@
>As I tremble after insertion, the soft flesh starts to narrow around me.\
>But above all is the suction...@
>As if it was smoking me, the tentacle sucks and pulls on me with powerful sucking.\
name "Luka"
>Ahh... The sucking...\
name ""
name $name
>Hehehe... That's right...@
>I'm sucking your penis with my tentacle.\
>Just like this, I'll suck everything out...\
name ""
name "Luka"
>Auuu... Amazing...\
name ""
>The suction brings me a sweet pleasure.@
>The stimulation blows away my previous disgust at the slimy tentacle.\
>The desire to explode inside of her tentacle boils up through me.\
name $name
>Hehe... You get it now, don't you?@> You want to come, right?\
>You want this tentacle to suck up all of your semen, right?\
>That's good... Just give in to your desires.@
>I'll gladly suck out everything for you. \
name ""
name "Luka"
>Ahhhh...\
name ""
>The Worm Villager seductively whispers in my ear as her tentacle continues its powerful suction.\
>At the same time, the fleshy walls wriggle and vibrate around my penis.\
name $name
>Hahaha... I can taste your pre-come.@
>I'll be able to taste all of your semen soon enough. \
>Just surrender to the world of pleasure I can bring you, and don't think of anything else.\
name ""
name "Luka"
>Auuu...\
name ""
>My penis is inside of her strange tentacle...@
>Able to do nothing but look at her sucking on me, a deep sense of defeat fills me.\
>But still, my body can't deny the pleasure...@
>The desire to have my semen sucked out by her is slowly taking over my other thoughts...\
name "Luka"
>No... I'm going to come...\
name ""
name $name
>Don't hold back... Just give in.@
>Here, I'll help you... Once I do this, you'll be forced to surrender.\
name ""
>The wriggling of her flesh violently increases.@
>With the lewd sounds from the suction getting even louder, the stimulation drastically increases.\
>Unable to endure her forceful attack, I finally yield to the desire.\
name "Luka"
>Ah! I'm coming!\
name ""
gosub *syasei1
lsp 700,":a;chara\wormv_h7.bmp",0,0
gosub *syasei2
>I finally explode inside of her soft tentacle, pouring out everything into her.\
name "Luka"
>Faaa... Incredible...\
name ""
>The sense of release is overwhelming.@
>As if my soul itself is being sucked out, I let out a sigh.\
>Until my ejaculation ends, I'm stuck in a trance.@
>There's no escape from this pleasure anymore...\
name $name
>Hehe... Your semen is delicious. \
>But I'm not done yet.@
>Until my thirst is gone...\
name ""
name "Luka"
>Aiee!\
name ""
mov %hseanwave,16:hseanwave
>Suddenly, the tentacle starts to move back and forth.\
>The new movement causes my penis to rub against the soft folds and bumps inside of her tentacle, as her suction remains as strong as before.\
>In and out, from the base to the tip, I let out a yell as it becomes too much to take.\
name "Luka"
>Auu... Incredible!@
>Faaa... Too good...\
name ""
>The last of the resistance in my mind is destroyed as the stimulation makes it feel as though I'm floating.\
>This devilish tentacle that is able to suck out my semen...@
>Any man would go crazy at this...\
name "Luka"
>Auuu... Amazing... It's too good...\
name ""
name $name
>It looks like you're really enjoying yourself now.@
>Did you finally give yourself to the depravation?\
>Then let me keep sucking on you...@
>Until you're completely corrupt, I'll suck it all out. \
name ""
name "Luka"
>Ahhh... Faa...\
name ""
>Her movements start to become even quicker.@
>With the lewd sucking noises sounding out, the rhythmic pumping forces me quickly over the edge again.\
name "Luka"
>Ahh! I'm coming again!\
name ""
>As if rejoicing at the stimulation, I explode inside of her again.\
gosub *syasei1
lsp 700,":a;chara\wormv_h8.bmp",0,0
gosub *syasei2
>Each spurt inside of the tentacle is matched by a powerful suction as her tentacle sucks out every drop I shoot in her.\
name "Luka"
>Faaa...\
name ""
>My body relaxes at the bliss spreading through my body.@
>But she wasn't about to let me take a rest...\
name $name
>Delicious...@> But not enough...@
>I want even more of your semen...\
name ""
name "Luka"
>Auuuuu!!\
name ""
>As if spurred on by my last orgasm, the tentacle only becomes even more forceful.\
>Sucking me inside, the tentacle pumps me even faster.@
>When I'm pulled almost all the way out of the tentacle, the suction on my tip is too much to take.\
name "Luka"
>Ahhh!@>It's too much!@
>If you do it like that...!\
name ""
>The stimulation is too intense.@
>If she keeps doing this, I don't think I'll stay sane...\
name $name
>I won't stop... Until I'm satisfied, I'll keep sucking...@
>But don't worry, I won't kill you...\
>I'm really skilled...@
>I'll suck you to the border of death and resuscitate you, over and over...\
name ""
name "Luka"
>No way...@>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>I explode inside her tentacle again.@
>But there's still no end in sight...\
name "Luka"
>Stop... Please... I'll die...\
name ""
name $name
>You won't die with just this little.@
>I'll stop at the absolute limit, so don't worry.\
name ""
name "Luka"
>Ahhhh!!\
name ""
>My body shivers as she continues the attack of pleasure.\
name "Luka"
>Ahh!@> No more...\
name ""
gosub *syasei1
lsp 700,":a;chara\wormv_h9.bmp",0,0
gosub *syasei2
>My semen is continually sucked up by the villager.@
>But she just laughs and doesn't stop for a moment.\
>Caught by her, I'm nothing but a source of food...\
>She won't ever free me from this...@
>This hell on earth will continue for the rest of my life...\
name "Luka"
>Aaaa...\
name ""
name $name
>Hehe, I can get even more...@
>You won't die yet, so don't worry...\
name ""
gosub *syasei1:gosub *syasei2
name "Luka"
>Auuu...\
name ""
>Even though she's saying she won't kill me, I feel my consciousness start to fade.\
gosub *anten
mov %hseanwave,0:hseanwave
>I fainted, but that was only a short escape.@
>As soon as I wake up, the sucking starts again.\
>There's nothing I can do to escape from this...@
>As if being sucked to death over and over, my adventure ends here.\
>.................\
goto *badend



*ironmaiden_start

mov $name,"Iron Maiden"
mov $name2,"Iron Maiden"
mov $lavel,"ironmaiden"
mov $tatie1,"ironmaiden_st01"
mov $tatie2,"ironmaiden_st01"
mov $tatie3,"ironmaiden_st01"
mov $tatie4,"ironmaiden_st01"
mov $haikei,"bg071"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,2000
if %nanido=2 mov %max_enemylife,2500
if %nanido=3 mov %max_enemylife,4000
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,99
mov %music,1
mov %tikei,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov %end_n,5
mov %exp_minus,3000
mov %zmonster_x,-250
name "Luka"
>Another one!?\
name ""
>Another Iron Maiden in addition to the one in the jail...@
>If this thing catches me, I'll end up just like that soldier.\
>I shiver at the thought as I take out my sword.\
goto *common_main



*ironmaiden_v

gosub *face3
name $name
>.............\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Iron Maiden turns into dust and vanishes!\
mov %viclose,1:gosub *victory
mov %getexp,2300:gosub *lvup
mov %2261,1
goto *sean0153



*ironmaiden_kousan

gosub *kousan_syori
>Luka yields to the temptation, and ends his resistance!\
if %counter=0 gosub *ironmaiden_x1
gosub *ironmaiden_counter



*ironmaiden_main

if %status=7 goto *ironmaiden_konran_a
gosub *cmd_main
if %cmd1=11 goto *common_attack
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *ironmaiden_kousan
if %cmd1=16 goto *ironmaiden_onedari
if %cmd1=17 goto *common_skill
goto *ironmaiden_main



*ironmaiden_konran_a

rnd2 %ransu,1,3
if %ransu=1 goto *common_attack
if %ransu=2 goto *ironmaiden_konran_a1
if %ransu=3 goto *ironmaiden_konran_a2



*ironmaiden_konran_a1

rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ha!"
if %ransu=2 mov $sel1,"Orya!"
if %ransu=3 mov $sel1,"Hya!"
name "Luka"
eng $sel1:$sel6\
name ""
>Luka attacks himself!
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\slash.ogg"
if %nanido<2 damage 70,80
if %nanido=2 damage 105,120
if %nanido=3 damage 140,160
if %mylife=0 goto *ironmaiden_h1
goto *ironmaiden_a



*ironmaiden_konran_a2

rnd2 %ransu,1,6
if %ransu=1 mov $sel1,"I'm a true Hero!"
if %ransu=2 mov $sel1,"Purupurupuru. I'm a goooood slime!"
if %ransu=3 mov $sel1,"Hehehe... So full..."
if %ransu=4 mov $sel1,"Uwaa... Flowers!"
if %ransu=5 mov $sel1,"Where am I!?"
if %ransu=6 mov $sel1,"My mother was an angel, you know!"
name "Luka"
eng $sel1:$sel6\
name ""
>Luka babbles incoherently!\
goto *ironmaiden_a



*ironmaiden_a

if %turn=1 gosub *ironmaiden_a1:goto *common_main
if %turn=2 gosub *ironmaiden_x1:goto *common_main
if %counter>0 rnd2 %ransu,1,2
if %counter>0 && %nanido<2 add %counter,1:skip 2
if %counter>0 && %nanido>1 && %ransu=2 add %counter,1
if %counter>3 && %status<>7 gosub *ironmaiden_x2:goto *common_main
if %counter>0 gosub *ironmaiden_a3:goto *common_main
if %status=7 gosub *ironmaiden_x1:goto *common_main
if %kousan=1 skip 3
mov %hanyo2,%hanyo2+1
if %hanyo2>3 gosub *ironmaiden_x1:goto *common_main
rnd2 %ransu,1,2
if %ransu=1 gosub *ironmaiden_a1:goto *common_main
if %ransu=2 && %status=0 && %owaza_count2a>3 gosub *ironmaiden_a2:goto *common_main
skip -3



*ironmaiden_a1

add %stack,1
name $name
>................\
name ""
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"The Iron Maiden flashes a creepy smile!"
if %ransu=2 mov $sel1,"The Iron Maiden stares at Luka!"
if %ransu=3 mov $sel1,"The Iron Maiden quietly smiles at Luka!"
eng $sel1:$sel6\
sub %stack,1
return



*ironmaiden_a2

add %stack,1
mov %owaza_count2a,0
name $name
>..............\
name ""
skillname "Eyes of Confusion"
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
eng "The Iron Maiden's eyes flash red!":$sel6/
if %nanido<3 && %wind=1 mov %wind_kakuritu,80
if %nanido=3 && %wind=1 mov %wind_kakuritu,40
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind forces Luka to blink!":gosub *wind_guard:sub %stack,1:return
\
mov %status,7:gosub *status_print
>Luka became confused!\
skillname ""
name "Luka"
>Wawawa....\
name ""
rnd2 %status_turn,3,4
if %nanido=2 rnd2 %status_turn,4,5
if %nanido=3 rnd2 %status_turn,5,6
sub %stack,1
return



*ironmaiden_x1

add %stack,1
if %kousan=2 skip 4
name $name
>.............\
name ""
skillname "Invitation to a Nightmare"
mov $tatie1,"ironmaiden_st11"
mov $tatie2,"ironmaiden_st11"
mov $tatie3,"ironmaiden_st11"
mov $tatie4,"ironmaiden_st01"
gosub *face1
>The Iron Maiden's lid opens!\
skillname ""
mov %counter,1
sub %stack,1
return



*ironmaiden_a3

add %stack,1
name $name
>.............\
name ""
skillname "Invitation to a Nightmare"
>The Iron Maiden's lid is open!\
skillname ""
sub %stack,1
return



*ironmaiden_x2

add %stack,1
name $name
>.............\
name ""
mov $tatie1,"ironmaiden_st01"
mov $tatie2,"ironmaiden_st01"
mov $tatie3,"ironmaiden_st01"
mov $tatie4,"ironmaiden_st01"
gosub *face1
>The Iron Maiden's lid shuts!\
skillname ""
mov %hanyo2,0
mov %counter,0
sub %stack,1
return



*ironmaiden_counter

add %stack,1
mov %counter,0
skillcount1 3247
skillname "Nightmare Embrace"
>The Iron Maiden shuts her lid around Luka's body!@
mov $tatie4,"ironmaiden_st01"
mov %kousoku,1:mov %status,0:gosub *status_print
mov %genmogaku,100
>Luka is confined inside the Iron Maiden!\
skillname ""
if %con_hbgm=0 mov %music,20:bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
name "Luka"
>Ahhhh!!\
name ""
lsp 700,":a;chara\ironmaiden_h1.bmp",0,0:print 10,500
>The tentacles inside her cling to my body, and start to coil around my penis.\
skillcount1 3247
skillname "Nightmare Embrace"
dwave 1,"se\ero_makituki3.ogg"
>The countless tentacles force a strange pleasure into Luka!
mov %damage_kotei,1
damage 63,75
skillname ""
if %mylife=0 sub %stack,1:return *ironmaiden_h2
name "Luka"
>Aieeee!!\
name ""
>Even if I struggle, I'm just surrounded by her soft flesh.@
>With nowhere to run, I can't do anything but take the tentacles attacks.\
skillcount1 3247
skillname "Nightmare Embrace"
dwave 1,"se\ero_makituki3.ogg"
>The Iron Maiden's tentacles wrap around Luka's penis!
mov %damage_kotei,1
damage 63,75
skillname ""
if %mylife=0 sub %stack,1:return *ironmaiden_h2
name "Luka"
>Ahhh!!\
name ""
skillcount1 3247
skillname "Nightmare Embrace"
dwave 1,"se\ero_makituki3.ogg"
>The tentacles crawl around Luka's body!\
>They rub both his penis and his anus!
mov %damage_kotei,1
damage 63,75
skillname ""
if %mylife=0 sub %stack,1:return *ironmaiden_h2
name "Luka"
>Faa...Aaaaa...\
name ""
>I can't take this anymore...@
>This strange torture device monster is going to force me to come...\
skillcount1 3247
skillname "Nightmare Embrace"
dwave 1,"se\ero_makituki3.ogg"
>The tentacles play with Luka's body!\
>They wrap around Luka's penis and violently stroke him!
mov %damage_kotei,1
damage 63,75
skillname ""
if %mylife=0 sub %stack,1:return *ironmaiden_h2
skillcount1 3247
skillname "Nightmare Embrace"
dwave 1,"se\ero_makituki3.ogg"
>The tentacles wrap around Luka's penis, and slowly wriggle around!
mov %damage_kotei,1
damage 63,75
skillname ""
sub %stack,1
return *ironmaiden_h2



*ironmaiden_onedari

mov $list1,"Invitation to a Nightmare"
if %3247>0 mov %list_num1,1
gosub *cmd_onedari
if %cmd1=11 goto *ironmaiden_onedari1
if %cmd1=-1 goto *ironmaiden_main
goto *ironmaiden_onedari



*ironmaiden_onedari1

gosub *onedari_syori
if %counter=0 gosub *ironmaiden_x1
gosub *ironmaiden_counter



*ironmaiden_h1

name "Luka"
>Aghhh... Uuu....\
name ""
>Damaging myself, I collapse to the ground at my own self-inflicted wounds.\
mov %viclose,2:gosub *lose
mov %2561,%2561+1:if %2561=1 mov %count_koenemy,%count_koenemy+1
if %2561>%count_most mov %count_most,%2561:mov $count_mostname,$name
count 31,4
mov $bad1,"Confused by the Iron Maiden, Luka defeated himself."
mov $bad2," Caught by the living torture device, Luka's semen was squeezed until his death."
lsp 700,":a;chara\ironmaiden_st01.bmp",0,0:print 10,500
goto *ironmaiden_h



*ironmaiden_h2

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\ironmaiden_h2.bmp",0,0
gosub *syasei2
lsp 700,":a;chara\ironmaiden_h3.bmp",0,0:print 10,500
>Stuck inside the Iron Maiden, Luka was forced to ejaculate!\
mov %viclose,1:gosub *lose
mov %2561,%2561+1:if %2561=1 mov %count_koenemy,%count_koenemy+1
if %2561>%count_most mov %count_most,%2561:mov $count_mostname,$name
count 10,4
mov $bad1,"Confined by the Iron Maiden, Luka's semen was squeezed without mercy."
mov $bad2," Caught by the living torture device, Luka's semen was squeezed until his death."
name "Luka"
>Uaaa...\
name ""
>But even after Luka ejaculates, the Iron Maiden continues to play with his body!\
goto *ironmaiden_h



*ironmaiden_h

if %2561=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku=1 mov %hseanwave,22:hseanwave:goto *ironmaiden_hb
>Losing the will to fight, I drop my sword.@
lsp 700,":a;chara\ironmaiden_st11.bmp",0,0:print 10,500
>Right in front of my eyes, the Iron Maiden slowly opens its lid.\
name "Luka"
>Aaaaa...\
name ""
>The slimy tentacles inside of it wriggle around.@
>The flesh vibrates and shifts around.\
>She's going to close the lid around me and squeeze out my semen...@
>Just like that soldier...\
name "Luka"
>Aaa...\
name ""
>Filled with despair, a ruinous desire fills me.\
>Just what is it going to feel like in there...?@
>How fast is it going to squeeze everything out of me?\
>There's no escape... I'm about to find out...@
>Drowning in fear and expectation, my body shivers.\
name $name
>.............\
name ""
name "Luka"
>Ahhhh!!\
name ""
>The Iron Maiden slowly approaches me, with its tentacles waving around.\
>The tentacles tear off my clothes as they pull me in...@
lsp 700,":a;chara\ironmaiden_st01.bmp",0,0:print 10,500
>As soon as I'm inside, the lid snaps shut!\
name "Luka"
>Ah!@>Ahhhh!!\
name ""
mov %hseanwave,22:hseanwave
lsp 700,":a;chara\ironmaiden_h1.bmp",0,0:print 10,500
>The tentacles wriggle around my body.@
>Vibrating and stroking my penis, a strange pleasure blows through me.\
goto *ironmaiden_hb



*ironmaiden_hb

name "Luka"
>Aiee!@>Ahhh!\
name ""
>My nipples, my neck, my shoulders, my thighs, my stomach...@
>Every part of my body is being stroked and massaged by her slimy tentacles.\
>Between my toes and even in my ears, the tentacles are moving and rubbing me.\
>The sounds of the slimy tentacles rubbing and stroking me fill my ears.\
name "Luka"
>Aieee!!\
name ""
>The slimy tentacles around my penis tighten.@
>Stuck inside this confined space, I can't even struggle as they force unbearable pleasure into me.\
name "Luka"
>Ahhh! No! No!\
name ""
>The flesh all around me presses into my body.@
>Everywhere around me is just more of her flesh and tentacles.\
>While drowning in pleasure and despair, I can't do anything but go insane.\
name "Luka"
>Aiee!@>Ahhh!!\
name ""
>The tentacles around my penis tighten around the tip, as another one latches onto the base.@
>Her relentless assault forces me over the edge.\
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\ironmaiden_h2.bmp",0,0
gosub *syasei2
>Tortured by the pleasure, I have no choice but to ejaculate.\
>But even after my orgasm, she doesn't stop.@
>Rather, it just becomes even more intense.\
name "Luka"
>Ahhhh!!\
name ""
>I feel a tentacle behind me slip into my anus.\
>All over me, the tentacles wriggle and vibrate directly on my skin.@
>I cry out as her tortuous pleasure intensifies all over my body.\
name "Luka"
>Haaaa!@
>Stop!@>Stop already!\
name ""
>But no matter how much I scream, she doesn't listen.@
>No matter how I struggle, there's no escape from inside of her.\
name "Luka"
>Aaa.... Ahhh!\
name ""
>While miserably struggling, I'm forced to another limit.\
gosub *syasei1:gosub *syasei2
name "Luka"
>Ahhh!\
name ""
>I ejaculate again as the Iron Maiden plays with my body.@
>For some reason, the fatigue and weariness is much more intense than a normal orgasm.\
name "Luka"
>Help me...@> Ahhh!\
name ""
>My last ejaculation seemed to just cause her to intensify even more.\
>The tentacles around my penis start to squeeze even harder as the tips of them start to rub and stroke the tip of my penis.\
>The powerful stimulation drains all the power from my waist.\
name "Luka"
>Ahh...\
name ""
>At the same time, the tentacle in my anus starts to move around.@
>Vibrating and moving, it starts to push into my prostate.\
name "Luka"
>I'm coming!@>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>Stuck in this hell of pleasure, I'm forced to another orgasm.\
name "Luka"
>Ahh!@> Aaaaa...\
name ""
>The tentacles attack my body with renewed power as soon as I ejaculate.@
>The tentacle in my anus continues to directly stimulate my prostate as any remaining resistance I once had is completely shattered.\
gosub *syasei1:gosub *syasei2
name "Luka"
>Ahh... Again...@
>Ahh... No...\
name ""
gosub *syasei1:gosub *syasei2
>Quickly after my last one, I already give in to another orgasm.@
>Unable to resist in the slightest, she forces me into continuous orgasms.\
name "Luka"
>Stooooooop!@
>Ahhh!@>I'm going to die!\
name ""
gosub *syasei1:gosub *syasei2
>Completely conscious in this hell, I helplessly ejaculate over and over.\
name ""
name "Luka"
>Ahh!@> Ahhh!!\
name ""
gosub *syasei1:gosub *syasei2
>No matter how many times I orgasm, she doesn't stop for a moment.@
>This isn't going to stop until I die...\
name "Luka"
>Auuu...@
>No... No...\
name ""
gosub *syasei1:gosub *syasei2
>I give in to despair as I finally comprehend the death that awaits me.@
>Forced to come over and over, she's going to kill me...\
>Each orgasm makes me weaker, and brings me closer to my end.\
gosub *syasei1:gosub *syasei2
name "Luka"
>Ahh...\
name ""
>Going insane in the Iron Maiden, the last moments of my life fade as I ejaculate a final time.\
gosub *anten
mov %hseanwave,0:hseanwave
>A demonic instrument of torture.@
>Once a man is caught in there, they are stuck in a hell of pleasure.\
>Today, another man was sacrificed to that Iron Maiden...@
>Stuck in that hell, his semen was squeezed dry.\
>Once she opens her lid again, whomever was stuck inside will fall out dead with a look of ecstasy on their face.\
>This time was no exception...\
>....................\
goto *badend



*lily_start

mov $name,"Lily"
mov $name2,"Lily"
mov $lavel,"lily"
mov $tatie1,"lily_st01"
mov $tatie2,"lily_st02"
mov $tatie3,"lily_st03"
mov $tatie4,"lily_h01"
mov $haikei,"bg075"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,2000
if %nanido=2 mov %max_enemylife,2000
if %nanido=3 mov %max_enemylife,3000
if %nanido=1 mov %henkahp1,1300
if %nanido=2 mov %henkahp1,1300
if %nanido=3 mov %henkahp1,2300
if %nanido=1 mov %henkahp2,800
if %nanido=2 mov %henkahp2,800
if %nanido=3 mov %henkahp2,1300
if %nanido=1 mov %henkahp3,300
if %nanido=2 mov %henkahp3,300
if %nanido=3 mov %henkahp3,300
if %nanido=0 mov %max_enemylife,4
if %nanido=0 mov %henkahp1,3
if %nanido=0 mov %henkahp2,2
if %nanido=0 mov %henkahp3,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,2
mov %tikei,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Hehe... Your struggling looks so pathetic."
mov $mogaku_sel2,"I'll squeeze everything from you while you struggle..."
mov $mogaku_sel3,"Pointless..."
mov $mogaku_sel4,"Ahh... The sense of superiority from dominating a struggling man is the best."
mov $mogaku_sel5,"Hehe... How pathetic."
mov $mogaku_dassyutu1,"You escaped..."
mov $mogaku_dassyutu2,"As I thought, you have a modicum of power..."
mov $half_s1,"My tentacles feel good, don't they?"
mov $half_s2,"Don't worry... I'll let you feel even more of them."
mov $kiki_s1,"Hehehe... It looks like you're near the end."
mov $kiki_s2,"I'll suck up everything with my tentacle..."
mov %end_n,5
mov %exp_minus,5300
mov %zmonster_x,-275
mov %tukix,300
>Lily's arms transform into tentacles!\
name "Luka"
>The same as the female villagers...\
name ""
gosub *face2
name $name
>These aren't the same at all...@
>Those were partial experiments... This is the finished product!\
>My tedious experiments yielded the ultimate organ.@
>I'll show you the beauty of my research!\
name ""
name "Luka"
>...I'll show you something myself.@
>The anger and sadness of those whose lives you've destroyed!\
name ""
gosub *face1
mov %sinkou,1
goto *common_main



*lily001

name $name
>Oh... A bit more than i expected.@
>Let me see all of your power!\
name ""
gosub *lily_a4
mov %sinkou,2
goto *common_main



*lily002

gosub *face3
name $name
>Impossible... I'm being cornered...?@
>The results of my research... They can't be failures...\
name ""
gosub *face1
gosub *lily_a3
mov %sinkou,3
goto *common_main



*lily_v

gosub *face3
name $name
>Impossible... I can't be beaten!\
name ""
name "Luka"
>...It's the end for you.@
>You'll pay for the horrible things you've done to this village!\
name ""
lsp 700,":a;chara\lily_st04.bmp",0,0:print 10,500
name $name
>Horrible things...?@>To the village?@
>You're wrong!@>The village did horrible things to me!\
name ""
>Lily stops attacking as her voice quiets.\
bgm "bgm\kiki2.ogg"
lsp 700,":a;chara\lily_st03.bmp",0,0:print 10,500
name $name
>...My mother was a dancer born in Sabasa.@
>She was a mistress of the Lord of this village, and I was eventually born.\
>Of course, I was viewed as nothing but a hindrance...@
>The daughter of some foreign prostitute... The villagers despised me.\
name ""
name "Luka"
>..........\
name ""
name $name
>On top of all that, my mother died when I was young of sickness.@
>She worked herself to death trying to provide for me...\
>After that, the harassment only grew.@
>The church even refused to hold a funeral for her.\
name ""
>Lily bites her lip as she stares at the floor.\
lsp 700,":a;chara\lily_st04.bmp",0,0:print 10,500
name $name
>After she died, I was sent to my father.@
>But even that just turned into another hell.\
>Do you understand?@
>How everyone looked at his illegitimate child in his own house!?\
name ""
name "Luka"
>Yes... I do...\
name ""
name $name
>...I wanted revenge on them.@
>That's why I studied the magic in the prohibited books!\
>I killed my father and brothers by squeezing them all to death using that power!\
>After I got rid of them, I took over the Lord's seat.@
>Hahaha!@>The prostitute's daughter they despised so much was now their Lord!\
name ""
name "Luka"
>..............\
name ""
name $name
>I would never forgive them.@
>They despised me... They ridiculed me... They tossed stones at me.\
>They were the reason my mother died...@
>Can you even begin to understand the pain my mother and I went through?\
name ""
name "Luka"
>Lily...@
bgm "bgm\boss1.ogg"
>Is that the end of your pathetic justifications!?\
name ""
mov %before_action,1
gosub *mp_kaihuku:gosub *mp
gosub *common_attack2
name $name
>Gah!\
name ""
name "Luka"
>You knew first-hand the pain that persecution from others can bring!\
name ""
mov %before_action,1
gosub *mp_kaihuku:gosub *mp
gosub *common_attack2
name $name
>Such whitewashing!@
>Those villagers deserved what they got!\
>They caused my mother to die... They brought me such pain...@
>Unless I force them all to suffer, I'll never be at peace!\
>How could you ever understand the pain I experienced!?\
name ""
name "Luka"
>I know it well...@
>I know it way too well!\
name ""
>My mother and I were persecuted too.@
>As soon as my mother fell sick, we were ostracized.\
name $name
>How could some Hero whom the people adore ever understand my pain!@
>The pain from the villagers...@> Even my own family!\
name ""
>My mother's last words... "I know you'll be a fine Hero".\
name "Luka"
>You were lucky!@
>You were able to get revenge on those you had a grudge on!\
>But I'm different!@
>I wasn't even allowed to hold a grudge!\
>Because... I had to become a fine Hero!@
>That's...@>That's what my mother wished!\
name ""
mov %before_action,1
gosub *mp_kaihuku:gosub *mp
gosub *common_attack2
name "Luka"
>...You can't understand!@
>My feelings when I had no choice but to become a Hero!\
name ""
mov %before_action,1
gosub *mp_kaihuku:gosub *mp
gosub *common_attack2
csp 700
lsp 701,":a;chara\lily_st03.bmp",0,0:print 10,500
name $name
>No...@
>My power...@>My magic power...\
>Without this... I...\
name ""
dwave 1,"se\syometu.ogg"
lsp 700,":a;chara\lily_st13.bmp",0,0
csp 701:print 99,4500,"system\breakup.dll/urb"
>Lily's tentacles vanish, as her arms turn back to normal!\
mov %viclose,1:gosub *victory
mov %getexp,2500:gosub *lvup
mov %2262,1
goto *sean0154



*lily_kousan

gosub *kousan_syori
>Luka yields to temptation, and ends his resistance!\
gosub *face2
name $name
>Hehe... So you want to be sucked by me.@
>Let me do as you desire...\
name ""
goto *lily_a



*lily_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *lily_kousan
if %cmd1=16 goto *lily_onedari
if %cmd1=17 goto *common_skill
goto *lily_main



*lily_a

if %enemylife<%henkahp1 && %sinkou=1 goto *lily001
if %enemylife<%henkahp2 && %sinkou=2 goto *lily002
if %enemylife<%henkahp3 && %sinkou=3 goto *lily_v
if %kousoku=1 rnd2 %ransu,1,16
if %kousoku=1 && %ransu<4 gosub *lily_a5:gosub *lily_a5:goto *common_main
if %kousoku=1 && %ransu<7 gosub *lily_a5:gosub *lily_a6:goto *common_main
if %kousoku=1 && %ransu<10 gosub *lily_a6:gosub *lily_a5:goto *common_main
if %kousoku=1 && %ransu<13 gosub *lily_a6:gosub *lily_a6:goto *common_main
if %kousoku=1 && %ransu>12 gosub *lily_a7:goto *common_main
rnd2 %ransu,1,6
if %ransu<3 gosub *lily_a1:goto *common_main
if %ransu<5 gosub *lily_a2:goto *common_main
if %ransu=5 && %sinkou>1 && %owaza_count1a>7 gosub *lily_a4:goto *common_main
if %ransu=6 && %sinkou>2 && %owaza_count2a>7 && %status=0 gosub *lily_a3:goto *common_main
skip -5



*lily_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll touch every corner of your body with my tentacle..."
if %ransu=2 mov $sel1,"Rejoice... For my tentacles will bring you great pleasure!"
if %ransu=3 mov $sel1,"I'll explore you with my tentacle..."
name $name
eng $sel1:$sel6\
name ""
skillname "Worm Touch"
dwave 1,"se\ero_makituki2.ogg"
>Lily's tentacles caress Luka's body!
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,30
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
skillcount1 3248
if %nanido<2 damage 20,25
if %nanido=2 damage 25,32
if %nanido=3 damage 35,45
skillname ""
if %mylife=0 sub %stack,1:return *lily_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*lily_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll squeeze the energy from you..."
if %ransu=2 mov $sel1,"How does this feel?"
if %ransu=3 mov $sel1,"Allow me to taste your energy..."
name $name
eng $sel1:$sel6\
name ""
skillname "Worm Drain"
dwave 1,"se\ero_buchu3.ogg"
>Lily's tentacles wrap around Luka's penis and drain his energy!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,20
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
skillcount1 3249
if %nanido<2 damage 20,25
if %nanido=2 damage 25,32
if %nanido=3 damage 35,45
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *lily_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*lily_a3

add %stack,1
mov %owaza_count2a,0
if %status=1 >Luka is in a trance!\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"The pleasure will put you in a trance..."
if %ransu=2 mov $sel1,"Go mad with pleasure..."
if %ransu=3 mov $sel1,"Hehe... Does it feel like your body is melting?"
name $name
eng $sel1:$sel6\
name ""
skillname "Worm Ecstasy"
dwave 1,"se\ero_makituki3.ogg"
>Lily's tentacle wraps around Luka's penis as a seductive stimulation is forced into him!
if %wind=1 && %nanido<2 mov %wind_kakuritu,50
if %wind=1 && %nanido=2 mov %wind_kakuritu,50
if %wind=1 && %nanido=3 mov %wind_kakuritu,25
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes her back!":gosub *wind_guard:sub %stack,1:return
skillcount1 3250
if %nanido<2 damage 20,25
if %nanido=2 damage 25,32
if %nanido=3 damage 35,45
if %status=0 mov $sel1,"Luka falls into a trance!"
if %status=1 mov $sel1,""
mov %status,1:gosub *status_print
if $sel1<>"" eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *lily_h3
if %kousan=2 && %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %kousan=2 && %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
if %kousan=2 sub %stack,1:return
name "Luka"
>Faa...\
name ""
name $name
>Hehe... It's irresistible, isn't it?@
>Now to play with you...\
name ""
mov %status_turn,2
if %nanido=3 rnd2 %status_turn,3,4
sub %stack,1
return



*lily_a4

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name $name
>Hehe... I caught you.\
name ""
skillname "Worm Hold"
dwave 1,"se\ero_makituki3.ogg"
>Lily's tentacles wrap around Luka's body!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,20
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %nanido<2 damage 20,25
if %nanido=2 damage 25,32
if %nanido=3 damage 35,45
mov %kousoku,1:gosub *status_print
>Luka's body has been wrapped by Lily's tentacles!\
skillname ""
if %mylife=0 sub %stack,1:return *lily_h4
if %kousan=2 sub %stack,1:return
gosub *face2
name $name
if %first_sel1=1 skip 3
>It's time to experiment...\
skip 2
>This time I won't let you go...\
name ""
mov %first_sel1,1
if %nanido<2 mov %genmogaku,2
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,3
sub %stack,1
return



*lily_a5

add %stack,1
>Luka is bound by Lily's tentacles!\
skillcount1 3251
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Have your energy drained while feeling the ultimate disgrace."
if %ransu=2 mov $sel1,"Having your energy drained from such a place..."
if %ransu=3 mov $sel1,"Haha... It's not supposed to go in this hole, is it?"
name $name
eng $sel1:$sel6\
name ""
skillname "Anal Drain"
dwave 1,"se\ero_buchu3.ogg"
lsp 700,":a;chara\lily_h04.bmp",0,0:print 10,500
>Lily forces her tentacle into Luka's anus!\
>Luka's energy is drained!
damage 15,20
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *lily_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*lily_a6

add %stack,1
>Luka is bound by Lily's tentacles!\
skillcount1 3252
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll wrap around it..."
if %ransu=2 mov $sel1,"Drown in the pleasure..."
if %ransu=3 mov $sel1,"Being toyed with while unable to move... Are you feeling frustrated?"
name $name
eng $sel1:$sel6\
name ""
skillname "Worm Spread"
dwave 1,"se\ero_makituki2.ogg"
lsp 700,":a;chara\lily_h02.bmp",0,0:print 10,500
>Lily's tentacles wrap around Luka's penis!
damage 20,25
skillname ""
if %mylife=0 sub %stack,1:return *lily_h6
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*lily_a7

add %stack,1
>Luka is bound by Lily's tentacles!\
name $name
>It's time to finish this...@
>Now, give me all of your semen.\
name ""
skillname "Drain Heaven"
dwave 1,"se\ero_buchu3.ogg"
lsp 700,":a;chara\lily_h06.bmp",0,0:print 10,500
>Lily sucks Luka's penis into her tentacle!
if %wind=1 && %nanido<2 mov %wind_kakuritu,100
if %wind=1 && %nanido=2 mov %wind_kakuritu,100
if %wind=1 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
skillcount1 3253
mov %damage_kotei,1
damage 50,60
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *lily_h7
name "Luka"
>Ahhh!\
name ""
>The intense sucking stimulation from her tentacle makes my body twist in pleasure.\
>But no matter how much I writhe, I can't get away from her!\
name $name
>Hehe... I won't take away my tentacle until you come.@
>You can't do anything but ejaculate now!\
name ""
skillcount1 3253
skillname "Drain Heaven"
dwave 1,"se\ero_buchu3.ogg"
>The tentacle around Luka's penis violently sucks on him!
mov %damage_kotei,1
damage 50,60
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *lily_h7
name $name
>My tentacle wants your semen.@
>I'll make you come over and over inside...\
name ""
skillcount1 3253
skillname "Drain Heaven"
dwave 1,"se\ero_buchu3.ogg"
>The tentacle around Luka's penis violently sucks on him!
mov %damage_kotei,1
damage 50,60
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *lily_h7
name $name
>I can taste your pre-come...@
>I want to taste your semen even more now!\
name ""
skillcount1 3253
skillname "Drain Heaven"
dwave 1,"se\ero_buchu3.ogg"
>The tentacle around Luka's penis violently sucks on him!
mov %damage_kotei,1
damage 50,60
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *lily_h7
name $name
>You held on for a while... but this is the end.@
>Taste defeat while you to orgasm!\
name ""
skillcount1 3253
skillname "Drain Heaven"
dwave 1,"se\ero_buchu3.ogg"
>The tentacle around Luka's penis violently sucks on him!
mov %damage_kotei,1
damage 50,60
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
sub %stack,1
return *lily_h7



*lily_onedari

mov $list1,"Worm Touch"
if %3248>0 mov %list_num1,1
mov $list2,"Worm Drain"
if %3249>0 mov %list_num2,1
mov $list3,"Worm Ecstasy"
if %3250>0 mov %list_num3,1
mov $list4,"Anal Drain"
if %3251>0 mov %list_num4,1
mov $list5,"Worm Spread"
if %3252>0 mov %list_num5,1
mov $list6,"Drain Heaven"
if %3253>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *lily_onedari1
if %cmd1=12 goto *lily_onedari2
if %cmd1=13 goto *lily_onedari3
if %cmd1=14 goto *lily_onedari4
if %cmd1=15 goto *lily_onedari5
if %cmd1=16 goto *lily_onedari6
if %cmd1=-1 goto *lily_main
goto *lily_onedari



*lily_onedari1

gosub *onedari_syori
name $name
>Hehe... Do you want me to play with your whole body?@
>Let me do as you desire...\
name ""
gosub *lily_a1
skip -1



*lily_onedari2

gosub *onedari_syori
name $name
>Hehe... You want me to drain energy from your penis?@
>Let me do as you desire...\
name ""
gosub *lily_a2
skip -1



*lily_onedari3

gosub *onedari_syori
name $name
>Hehe... You want to be put in a trance?@
>Let me do as you desire...\
name ""
gosub *lily_a3
skip -1



*lily_onedari4

gosub *onedari_syori_k
name $name
>Hehe... You want me to suck out energy through your ass?@
>I take pleasure in trampling over a man's pride...\
name ""
if %kousoku=0 gosub *lily_a4
gosub *lily_a5
skip -1



*lily_onedari5

gosub *onedari_syori_k
name $name
>Hehe... You want me to wrap around your penis?@
>Let me do as you desire...\
name ""
if %kousoku=0 gosub *lily_a4
gosub *lily_a6
skip -1



*lily_onedari6

gosub *onedari_syori_k
name $name
>You want me to suck everything out?@
>Alright... I'll give you a taste of heaven!\
name ""
if %kousoku=0 gosub *lily_a4
gosub *lily_a7
skip -1



*lily_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\lily_bk02.bmp",0,0
gosub *syasei2
>As Lily's tentacles caress his entire body, Luka is forced to ejaculate.\
mov %viclose,1:gosub *lose
mov %2562,%2562+1:if %2562=1 mov %count_koenemy,%count_koenemy+1
if %2562>%count_most mov %count_most,%2562:mov $count_mostname,$name
count 10,13
mov $bad1,"Luka succumbed to Lily's worm touch."
mov $bad2," Imprisoned in the Lord's mansion, Luka was made into Lily's guinea pig."
gosub *face2
name $name
>You came... Hehe.@
>Now do you understand the wonders of my research?\
name ""
goto *lily_h



*lily_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\lily_bk01.bmp",0,0
gosub *syasei2
>As Lily's tentacles drain energy from his penis, Luka is forced to ejaculate.\
mov %viclose,1:gosub *lose
mov %2562,%2562+1:if %2562=1 mov %count_koenemy,%count_koenemy+1
if %2562>%count_most mov %count_most,%2562:mov $count_mostname,$name
count 10,13
mov $bad1,"Luka succumbed to Lily's worm drain."
mov $bad2," Imprisoned in the Lord's mansion, Luka was made into Lily's guinea pig."
gosub *face2
name $name
>You came... Hehe.@
>Now do you understand the wonders of my research?\
name ""
goto *lily_h



*lily_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\lily_bk01.bmp",0,0
gosub *syasei2
>Put into a trance by Lily's tentacles, Luka is forced to ejaculate.\
mov %viclose,1:gosub *lose
mov %2562,%2562+1:if %2562=1 mov %count_koenemy,%count_koenemy+1
if %2562>%count_most mov %count_most,%2562:mov $count_mostname,$name
count 10,13
mov $bad1,"Luka succumbed to Lily's worm ecstasy."
mov $bad2," Imprisoned in the Lord's mansion, Luka was made into Lily's guinea pig."
gosub *face2
name $name
>You came... Hehe.@
>Now do you understand the wonders of my research?\
name ""
goto *lily_h



*lily_h4

mov %ikigoe,3:gosub *ikigoe
name $name
>Oh?@>Faster than I thought...\
name ""
gosub *syasei1
lsp 700,":a;chara\lily_h03.bmp",0,0
gosub *syasei2
>As soon as the tentacles wrap around Luka's body, he ejaculates.\
mov %viclose,1:gosub *lose
mov %2562,%2562+1:if %2562=1 mov %count_koenemy,%count_koenemy+1
if %2562>%count_most mov %count_most,%2562:mov $count_mostname,$name
count 10,13
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka ejaculated as Lily's tentacles wrapped around him."
mov $bad2," Imprisoned in the Lord's mansion, Luka was made into Lily's guinea pig."
gosub *face2
name $name
>Having an orgasm just from that...@
>What a pathetic man... Hehe.\
name ""
goto *lily_h



*lily_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\lily_h05.bmp",0,0
gosub *syasei2
>As Lily drains energy from Luka's anus, he's forced to ejaculate.\
mov %viclose,1:gosub *lose
mov %2562,%2562+1:if %2562=1 mov %count_koenemy,%count_koenemy+1
if %2562>%count_most mov %count_most,%2562:mov $count_mostname,$name
count 9,13
mov $bad1,"Luka succumbed to Lily's anal drain."
mov $bad2," Imprisoned in the Lord's mansion, Luka was made into Lily's guinea pig."
gosub *face2
name $name
>Feeling so good from having your ass played with...@
>The ultimate disgrace for a man... Haha!\
name ""
goto *lily_h



*lily_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\lily_h03.bmp",0,0
gosub *syasei2
>As Lily's tentacles wrap around Luka's penis, he's forced to ejaculate.\
mov %viclose,1:gosub *lose
mov %2562,%2562+1:if %2562=1 mov %count_koenemy,%count_koenemy+1
if %2562>%count_most mov %count_most,%2562:mov $count_mostname,$name
count 10,13
mov $bad1,"Luka succumbed to Lily's worm spread."
mov $bad2," Imprisoned in the Lord's mansion, Luka was made into Lily's guinea pig."
gosub *face2
name $name
>You came... Hehe.@
>Now do you understand the wonders of my research?\
name ""
goto *lily_h



*lily_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\lily_h07.bmp",0,0
gosub *syasei2
>The heavenly stimulation destroys Luka's resistance, as he's forced to quickly ejaculate.\
mov %viclose,1:gosub *lose
mov %2562,%2562+1:if %2562=1 mov %count_koenemy,%count_koenemy+1
if %2562>%count_most mov %count_most,%2562:mov $count_mostname,$name
count 10,13
mov $bad1,"Luka succumbed to Lily's drain heaven."
mov $bad2," Imprisoned in the Lord's mansion, Luka was made into Lily's guinea pig."
gosub *face2
name $name
>Mmm... I sucked it all out.@
>How shameful... Allowing yourself to be sucked by a tentacle.\
name ""
goto *lily_h



*lily_h

if %2562=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 skip 9
name "Luka"
>Auuu...\
name ""
>The exhaustion quickly comes over me after my ejaculation.\
name $name
>For now, I need to make sure you will be unable to disobey my orders.@
>It already looks like you can't fight back...\
name ""
dwave 1,"se\ero_makituki3.ogg"
cspl 690,699
lsp 700,":a;chara\lily_h08.bmp",0,0:print 10,500
>Lily's tentacles wrap up my body, as I'm too weak to resist her.@
>Bound by her tentacles, I'm both physically and mentally under her rule...\
name $name
>First I'll take a genetic sample.@
>Allow me to use these tentacles to suck it out...\
name ""
>A tentacle approaches my groin as its mouth opens and closes with a lewd, sticky noise.\
>With mucus dripping from the opening, I can see innumerable bumps and folds lining the soft flesh inside.\
>I swallow nervously as the sticky mucus drips out of the opening onto my thigh.\
name $name
>Doesn't it look amazing?@
>I painstakingly experimented on those girls so I could create this.\
>Able to bring the ultimate pleasure... No man can endure more than a few seconds.\
>I'll let you have a taste of that research you so decried.\
name ""
>The opening slowly approaches my penis...@
mov %hseanwave,14:hseanwave
lsp 700,":a;chara\lily_h09.bmp",0,0:print 10,500
>And sucks me inside!\
name "Luka"
>Ahhhh!\
name ""
>As soon as I'm forced into the tentacle, the soft bumps wriggle and vibrate around me.\
>The flesh seems to have a mind of its own as it moves around in random directions, stroking and rubbing me in every direction.\
name "Luka"
>Aiee!@>What is this...@
>It feels incredible...!\
name ""
>The stimulation is way more powerful than I thought.@
>My body relaxes at once as I yell out in surprise.\
lsp 700,":a;chara\lily_h10.bmp",0,0:print 10,500
>The tentacle starts to contract in waves, as if it was trying to milk me.\
>As the rhythmic contractions continue, the bumps and flesh continue to wriggle and randomly move.\
>The overwhelming stimulations don't allow me to think about anything but the coming orgasm.\
name "Luka"
>Ahhhh!!\
name ""
>Only a few seconds after being sucked into her tentacle, I'm already forced to come.\
gosub *syasei1
lsp 700,":a;chara\lily_h11.bmp",0,0
gosub *syasei2
>Each spurt of semen is sucked up in an instant with a powerful suction.@
>After my orgasm finishes, the milking motion resumes as it squeezes out the rest of the semen still in my urethra.\
>The pleasure overpowers the deep sense of humiliation flowing through me.\
name "Luka"
>Faaa... Incredible...\
name ""
>With every drop of my last ejaculation squeezed out, the tentacle starts to violently start its milking motion over again.\
name "Luka"
>Auuu...\
name ""
name $name
>Hehe... Was it good?@
>You let out so much... You must have really enjoyed it.\
>But I need a larger sample.@
>For now, I'll just collect it until you faint.\
name ""
name "Luka"
>No way... Stop...\
name ""
name $name
>You need to learn your new role.@> You're just my guinea pig.\
name ""
mov %hseanwave,16:hseanwave
>Lily cruelly rebukes my protest.@
>More sticky mucus starts to flow out of her tentacle, covering my penis.\
>The friction from the mucus against the soft flesh of her tentacles doubles the pleasure from before, as my body starts to tremble.\
name "Luka"
>Ah!@>Ahhh!!\
name ""
name $name
>Ahh... I love the pathetic voice of a male screaming.@
>I'll give you more of my special service...\
>A pleasure that's too good for a guinea pig like you...\
name ""
name "Luka"
>Ahh!\
name ""
>Her tentacle starts to move up and down.@
>As if my waist was going to be pulled off, I can't concentrate on anything but the overwhelming sensations being forced into me.\
>If she does it like this, there's no way I can hold on...\
name "Luka"
>Aiee!@>No more... I'm going to come!\
name ""
gosub *syasei1
lsp 700,":a;chara\lily_h12.bmp",0,0
gosub *syasei2
>I explode in her tentacle as I yield to the pleasure again.@
>Just like the last time, she carefully squeezes out every drop of semen from my orgasm.\
>Pleasure like this would make any man into a slave...\
name $name
>You still have more in you...@
>This is your new life as a guinea pig.\
>Your first job is to give me plenty of genetic samples.@
>Now get to work and give me everything!\
name ""
name "Luka"
>Ahhh...\
name ""
>Her soft flesh narrows around my penis.@
>The tentacle, designed only to squeeze out semen, continues its function...\
>Right now, I'm the current target of its compulsory milking...\
gosub *syasei1:gosub *syasei2
name "Luka"
>Aaa...\
name ""
>Bound and unable to move, I continue to be milked by her tentacle.@
>Dominated by this strange appendage, I shake my head in a futile attempt to shake off this bad dream.\
name "Luka"
>I don't want this...@> No... Stop...\
name ""
name $name
>You still don't understand your new role?@
>It seems I need to educate you a bit more.\
>Stuck in this hell, learn your place.@
>The rest of your life will be here, as my guinea pig!\
name ""
>Her tentacle starts to move even faster than before.@
>Sucking me like a pump, the milking stimulation doesn't allow me to resist.\
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1:gosub *syasei2
>Even as I ejaculate, she doesn't stop.@
>Violently milking me even during my ejaculation, she's already bringing me toward another.\
name "Luka"
>Aiee!@>If you keep doing...@> Again!@
>Ahhh!!\
name ""
gosub *syasei1:gosub *syasei2
>With a sucking noise, my semen is slurped up by the tentacle.@
>But even with that, she still doesn't stop.\
name "Luka"
>Aiee! Help me...@> No more... I can't take it...\
name ""
name $name
>Hehe... I wonder about that?@
>Do you understand yet that you're just a guinea pig to be milked like this?\
name ""
name "Luka"
>Auuu... Stop...\
name ""
gosub *syasei1
lsp 700,":a;chara\lily_h13.bmp",0,0
gosub *syasei2
>Forced to orgasm over and over, I yell out as I start to lose my sanity.\
name "Luka"
>Ahhh!@>I'm coming again...!@
>Stop... Help me!\
name ""
gosub *syasei1:gosub *syasei2
>With her tentacle forcing me to orgasm over and over, my mind and body are in tatters.\
>She's training me with her tentacle...@
>Destroying my spirit, until I can't resist her any longer...\
name "Luka"
>Auuuu...\
name ""
>Realizing I have no escape, I surrender to Lily and give in to the pleasure.@
>Just as she said, I'm going to be her guinea pig...\
name $name
>Hehe... You gave in.@> That's good, you'll be happier this way.@
>Now, I'll give my new guinea pig a reward.\
name ""
name "Luka"
>Aaaa...\
name ""
>As she said, it's easier to just surrender...@
>Able to freely taste this pleasure, I can orgasm as much as I want...\
name "Luka"
>Auu... Incredible...@> I'm coming!\
name ""
gosub *syasei1:gosub *syasei2
>I relax my body as more of my semen is sucked out by her tentacle.\
>The ecstasy slowly fills my body as I allow Lily to dominate me.@
>Thus, I accept my new role as her guinea pig.\
gosub *anten
mov %hseanwave,0:hseanwave
name $name
>The subject fainted after twenty-three ejaculations.@
>That's around average... I'll need to analyze his genes now.\
name ""
>Lily's voice is the last thing I hear before I faint.@
>From then on, she forces me to orgasm repeatedly until I faint every day.\
>But having surrendered to Lily, I was able to feel nothing but pleasure during the rest of my cruel life.\
>....................\
goto *badend



*arizigoku_start

mov $name,"Antlion Girl"
mov $name2,"Antlion Girl"
mov $lavel,"arizigoku"
mov $tatie1,"arizigoku_st01"
mov $tatie2,"arizigoku_st01"
mov $tatie3,"arizigoku_st03"
mov $tatie4,"arizigoku_st01"
mov $haikei,"arizigoku_bg"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,500
if %nanido=2 mov %max_enemylife,570
if %nanido=3 mov %max_enemylife,643
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,99
mov %music,1
mov %tikei,0
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"The more Luka struggles, the quicker he sinks!"
mov $mogaku_sel1,"Hehe... Come closer..."
mov $mogaku_sel2,"Yes... Keep struggling..."
mov $mogaku_sel3,"Every movement brings you closer to me..."
mov $mogaku_sel4,"More... More... Struggle more!"
mov $mogaku_sel5,"Hahaha... Your struggling brings you closer to your end..."
mov %end_n,5
mov %exp_minus,0
mov %zmonster_x,-300
name $name
>Oh... Another delicious man.@
>Please... Come closer...\
lsp 700,":a;chara\arizigoku_st02.bmp",0,0:print 10,500
>Why don't you connect with me and have a good time...?@
>I'll make you feel so good, you'll die...\
name ""
name "Luka"
>Guh!@> This isn't good!\
name ""
mov %kousoku,1:gosub *status_print
mov %genmogaku,100
>My body slowly sinks into the quicksand.@
>At this rate, I'm going to get pulled right into her!\
lsp 700,":a;chara\arizigoku_st01.bmp",0,0:print 10,500
goto *common_main



*arizigoku_v

gosub *face3
name $name
>Gah!@> Beaten by my prey...\
name ""
dwave 1,"se\syometu.ogg"
bg "bg\arizigoku_bg2.bmp",1
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Antlion Girl turns into a tiny antlion!@
>At the same time, the quicksand stops!\
bg "bg\bg076.bmp",10,500
mov %viclose,1:gosub *victory
mov %getexp,3500:gosub *lvup
mov %2263,1
goto *sean0157



*arizigoku_kousan

gosub *kousan_syori
>Luka yields to temptation, and ends his resistance!\
gosub *face2
name $name
>Hehe... Did you give up?@
>Good... I'll take pleasure in eating you...\
name ""
gosub *arizigoku_a4



*arizigoku_main

gosub *cmd_main
if %cmd1=11 goto *common_attack
if %cmd1=12 goto *common_mogaku
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *arizigoku_kousan
if %cmd1=16 goto *arizigoku_onedari
goto *arizigoku_main



*arizigoku_a

if %turn=1 gosub *arizigoku_a1:goto *common_main
if %turn=2 gosub *arizigoku_a2:goto *common_main
if %turn=3 gosub *arizigoku_a3:goto *common_main
if %turn=4 gosub *arizigoku_a4:goto *common_main



*arizigoku_a1

add %stack,1
name $name
>Come a little closer...@
>I'll make you feel amazing.\
name ""
skillname "Quicksand Trap"
dwave 1,"se\earth1.ogg"
>Luka sinks deeper into the quicksand!
damage 5,10
skillname ""
name "Luka"
>Guh...!\
name ""
>Every movement I make just makes me sink faster...\
name $name
>No prey can escape my trap once I catch them...\
name ""
sub %stack,1
return



*arizigoku_a2

add %stack,1
name $name
>Hehe... I'll suck everything out of you until you're as dry as this sand.\
name ""
skillname "Quicksand Trap"
dwave 1,"se\earth1.ogg"
>Luka sinks deeper into the quicksand!
damage 5,10
skillname ""
name "Luka"
>Urgh!\
name ""
>I'm getting closer to the center...@
>The Antlion Girl is waiting for me...\
name $name
>Struggle, struggle...@
>No matter what you do, I'll eat you...\
name ""
sub %stack,1
return



*arizigoku_a3

add %stack,1
name $name
>Just give up and become my food...\
name ""
skillname "Quicksand Trap"
dwave 1,"se\earth1.ogg"
>Luka sinks deeper into the quicksand!
damage 5,10
skillname ""
name "Luka"
>Guh!\
name ""
>I'm sinking deeper and deeper...@
>The Antlion Girl is really close to me!\
mov $tatie1,"arizigoku_st02"
mov $tatie2,"arizigoku_st02"
mov $tatie4,"arizigoku_st02"
lsp 700,":a;chara\arizigoku_st02.bmp",0,0:print 10,500
name $name
>It's almost time...@
>I won't leave a single drop of your bodily fluids...\
name ""
sub %stack,1
return



*arizigoku_a4

add %stack,1
if %kousan>0 skip 5
name $name
>This is the end...@
>Too bad for you... Your fate is sealed.\
name ""
skillname "Quicksand Trap"
dwave 1,"se\earth1.ogg"
>Luka sinks deeper into the quicksand!\
>Luka is right next to the Antlion Girl!
damage 5,10
skillname ""
name "Luka"
>Aieee!\
name ""
name $name
>Now, it's time to feed...@
>Right from your genitals!\
name ""
skillcount1 3254
skillname "Fluid Squeezing"
>The Antlion Girl clamps down on Luka's waist with her scissors!\
dwave 1,"se\ero_kyuin2.ogg"
>She pulls Luka toward her and forces him into her vagina!
mov %damage_kotei,1
damage 50,65
mov %kousoku,2
lsp 700,":a;chara\arizigoku_h1.bmp",0,0:print 10,500
>Luka is being raped by the Antlion Girl!\
skillname ""
if %mylife=0 sub %stack,1:return *arizigoku_h1
name "Luka"
>Ahhh!!\
name ""
>As soon as I'm forced into the Antlion Girl, her pussy clamps down on me.\
>Caught inside of her, I tremble as her soft flesh closes around me.\
sub %stack,1
goto *arizigoku_a5



*arizigoku_a5

add %stack,1
skillcount1 3254
>Luka is being raped by the Antlion Girl!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Does it feel good?":mov $sel2,"The soft flesh inside the Antlion Girl wriggles around!"
if %ransu=2 mov $sel1,"Feed me...":mov $sel2,"The Antlion Girl's vagina contracts!"
if %ransu=3 mov $sel1,"I'll squeeze out everything...":mov $sel2,"The Antlion Girl's vagina starts sucking on Luka's penis!"
if %ransu=4 mov $sel1,"I'll make you feed me by raping you...":mov $sel2,"The Antlion Girl's vagina contracts around Luka's penis!"
if %ransu=5 mov $sel1,"I'll suck out everything...":mov $sel2,"The Antlion Girl's vagina sucks on Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Fluid Squeezing"
dwave 1,"se\ero_kyuin2.ogg"
eng $sel2:$sel6
mov %damage_kotei,1
damage 50,65
skillname ""
if %mylife=0 sub %stack,1:return *arizigoku_h1
sub %stack,1
goto *arizigoku_a5



*arizigoku_onedari

mov $list1,"Fluid Squeezing"
if %3254>0 mov %list_num1,1
gosub *cmd_onedari
if %cmd1=11 goto *arizigoku_onedari1
if %cmd1=-1 goto *arizigoku_main
goto *arizigoku_onedari



*arizigoku_onedari1

gosub *onedari_syori_k
name $name
>Hehe... So you want me to suck everything out?@
>Good... I'll take pleasure in eating you...\
name ""
gosub *arizigoku_a4



*arizigoku_h1

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\arizigoku_h2.bmp",0,0
gosub *syasei2
>Unable to endure the sucking and squeezing of the Antlion Girl's vagina, Luka is forced to ejaculate!\
mov %viclose,1:gosub *lose
mov %2563,%2563+1:if %2563=1 mov %count_koenemy,%count_koenemy+1
if %2563>%count_most mov %count_most,%2563:mov $count_mostname,$name
count 2,4
mov $bad1,"Luka succumbed to the Antlion Girl's fluid squeezing."
mov $bad2," After that, Luka was sucked dry."
goto *arizigoku_h



*arizigoku_h

mov $tatie2,"arizigoku_st02"
if %2563=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %hseanwave,10:hseanwave
name $name
>Hehe... Delicious.@
>How does it feel to be stuck like this?\
name ""
name "Luka"
>Ahh...\
name ""
>My semen slowly pours out into the Antlion Girl.@
>With her scissors firmly around my waist, I can't pull out of her.\
name $name
>More... More...@
>Until you're completely dry, I won't stop...\
name ""
>The Antlion Girl smiles as she starts to slowly move.\
>Her strange vagina narrows around me as she slowly starts to pump me.@
>The strange angle I'm penetrating her at forces my tip to rub all along the fleshy walls of her vagina.\
name "Luka"
>Ahh... That feels good...\
name ""
name $name
>Come as much as you like...@
>My lower mouth will gladly suck it all up.\
name ""
name "Luka"
>Aaa...\
name ""
>Forced in and out of her, the strange angle slightly bends my penis as I'm forced all the way inside.\
>Stuck in her tight hole, I feel myself bordering on another orgasm.\
name "Luka"
>Auu... I'm going to come...\
name ""
name $name
>Good... I'll eat it all.@
>Let out a lot...\
name ""
>Her hole closes around me as she uses her scissors to force my waist all the way into her.\
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\arizigoku_h2.bmp",0,0
gosub *syasei2
>I explode in her as she continues to use her scissors to force me to pump her.\
name "Luka"
>Auuu...\
name ""
name $name
>There's no time to rest.@
>I won't allow you to stop until there's nothing left.\
name ""
name "Luka"
>Ahhh!!\
name ""
>She squeezes me tighter than before, causing a slight pain as I'm still sensitive after my ejaculation.\
>Tighter and tighter...@> It feels like she's crushing me inside of her.@
>Just as I can't take it any longer, she stops.@> Like that, she starts forcing me to move my waist again.\
>Even though I just came, the overwhelming stimulation is already bringing me to another height.\
name "Luka"
>No... I'm going to come again...\
name ""
name $name
>That's to be expected...@
>My lower hole is designed to force men to come quickly, after all.\
>Once I forced you into me, your end was decided.\
name ""
name "Luka"
>No way...@>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\arizigoku_h3.bmp",0,0
gosub *syasei2
>Surprisingly quick after my last orgasm, she forces me to another.@
>But this hell isn't even close to being over...\
>Until nothing is left, she's going to continue raping me...@
>No, this isn't rape... This is predation.\
>Caught by the Antlion Girl, she's eating my semen at the cost of my life.\
name $name
>Hahaha... You still have more in you, don't you?@
>Give it all to my lower mouth...\
name ""
name "Luka"
>Ahhh!!\
name ""
>Squeezed with no escape, I feel myself about to shoot more of the food she's killing me for into her...\
name "Luka"
>No more... I'm coming!@
>Ahhh!!\
name ""
gosub *syasei1:gosub *syasei2
>Unable to hold on, I shoot more semen into her greedily squeezing hole.@
>Stuck in this endless hell with no escape, all I can do is writhe and plead.\
name "Luka"
>Aieee!@> Stop!@> Any more and I'll die...\
name ""
name $name
>I caught you fair and square, now you have to feed me...\
name ""
name "Luka"
>No!@>Help me...@> Ahh!!\
name ""
gosub *syasei1:gosub *syasei2
>No matter how much I beg, she doesn't release me.@>Forcing me to pump her like a piston with her scissors around my waist, I can't even control my own movements.\
>I cry out in misery as I feel another orgasm forced into me.\
name "Luka"
>Help me...@> No more...@>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\arizigoku_h4.bmp",0,0
gosub *syasei2
>The last of my resistance shatters as she forces me to move even faster after my last orgasm.\
>Out of breath and gasping, I can't even see straight anymore.\
name $name
>Hehe... You can put out quite a lot.@
>Are you about to faint?\
name ""
name "Luka"
>Ahhhh...\
name ""
>The exhaustion starts to spread through my body as I lose all of my power.@
>Now with absolutely nothing resisting her, she's able to force my waist to pump her even faster than before.\
gosub *syasei1:gosub *syasei2
>Raped without mercy, my mind and body are in complete disarray.\
name "Luka"
>Auu...\
name ""
name $name
>Your eyes are hollow, and your body is twitching...@
>It seems the time of your death is approaching.\
>Allow me to make your final moments... Comfortable.\
name ""
name "Luka"
>Aaa...\
name ""
gosub *syasei1:gosub *syasei2
>Unable to see any longer, it feels as though my body isn't even my own anymore.\
>Unable to feel anything but the pleasure being forced into me, my mind slowly starts to melt away.\
name "Luka"
>Aa...\
name ""
gosub *syasei1:gosub *syasei2
>As if my existence itself has been swallowed, I can't move even a finger.\
>A cold feeling spreads through my body.\
name $name
>This will be the last one... I hope you enjoy your last moments.@
>Hehehehe...\
name ""
name "Luka"
>A...aaa...\
name ""
gosub *syasei1:gosub *syasei2
gosub *anten
mov %hseanwave,0:hseanwave
>Feeling a final orgasm, I finally lose consciousness.@
>With everything sucked from me, I become nothing but a dried up corpse in the desert.\
>Another traveler in the desert meets his end at the hands of the Antlion Girl...\
>................\
goto *badend



*sandw_start

mov $name,"Sandworm"
mov $name2,"Sandworm"
mov $lavel,"sandw"
mov $tatie1,"sandw_st01"
mov $tatie2,"sandw_st02"
mov $tatie3,"sandw_st03"
mov $tatie4,"sandw_h3"
mov $haikei,"bg076"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,2500
if %nanido=2 mov %max_enemylife,3125
if %nanido=3 mov %max_enemylife,3750
if %nanido=1 mov %kousoku_maxhp,280
if %nanido=2 mov %kousoku_maxhp,300
if %nanido=3 mov %kousoku_maxhp,560
if %nanido=0 mov %max_enemylife,1
if %nanido<2 mov %kousoku_maxhp,280
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,100
mov %music,1
mov %tikei,0
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't escape from her mouth!"
mov $mogaku_anno4,"Luka can't get full force behind his swing!"
mov $mogaku_sel1,"I'll never let go..."
mov $mogaku_sel2,"Stop moving..."
mov $mogaku_sel3,"............"
mov $mogaku_sel4,"I won't let go..."
mov $mogaku_sel5,"Just let me suck on you..."
mov $half_s1,"...Is it good?"
mov $half_s2,""
mov $kiki_s1,"Put out your semen in my mouth..."
mov $kiki_s2,""
mov %end_n,5
mov %exp_minus,3500
mov %zmonster_x,-150
name "Luka"
>What the hell is this huge thing...?@
>This is the first time I've seen something this huge...\
name ""
>I gasp at the sheer size of the monster.@
>Even her tongue is bigger than my entire body...\
name $name
>Human...@
>Let me suck on you...\
name ""
name "Luka"
>Can I even fight something like this?\
name ""
>She seems to be pretty slow...@
>I'll have to take advantage of that I guess!\
goto *common_main



*sandw_v

gosub *face3
name $name
>Too many... Ouches...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The giant Sandworm turns into a tiny sandworm!\
mov %viclose,1:gosub *victory
mov %getexp,4000:gosub *lvup
mov %2264,1
goto *sean0158



*sandw_kousan

gosub *kousan_syori
>Luka yields to temptation, ending his resistance!\
gosub *face2
name $name
>Surrendered?@
>Let me suck on you then...\
name ""
if %kousoku=0 gosub *sandw_a2
goto *sandw_a



*sandw_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 mov %abairitu,80:goto *common_miss2
if %cmd1=11 goto *common_attack
if %cmd1=12 goto *common_mogaku
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *sandw_kousan
if %cmd1=16 goto *sandw_onedari
if %cmd1=17 goto *common_skill
goto *sandw_main



*sandw_kaihou

name $name
>Ouch...\
name ""
dwave 1,"se\dassyutu.ogg"
lsp 700,":a;chara\"+$tatie3+".bmp",%monster_x,%monster_y
mov %kousoku,0:gosub *status_print
>The repeated attacks cause the Sandworm to spit Luka out!\
gosub *face1
mov %owaza_count1a,0
goto *common_main



*sandw_a

if %kousoku=1 && %kousoku_hp<0 goto *sandw_kaihou
if %kousoku=1 rnd2 %ransu,1,3
if %kousoku=1 && %ransu=1 gosub *sandw_a3:goto *common_main
if %kousoku=1 && %ransu=2 gosub *sandw_a4:goto *common_main
if %kousoku=1 && %ransu=3 gosub *sandw_a5:goto *common_main
rnd2 %ransu,1,2
if %ransu=1 gosub *sandw_a1:goto *common_main
if %ransu=2 && %owaza_count1a>3 gosub *sandw_a2:goto *common_main
skip -3



*sandw_a1

add %stack,1
rnd2 %ransu,1,2
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,".........."
if %ransu=2 mov $sel1,".......?"
name $name
eng $sel1:$sel6\
name ""
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel2,"The Sandworm stares at nothing in particular!"
if %ransu=2 mov $sel2,"The Sandworm looks around in confusion!"
if %ransu=3 mov $sel2,"The Sandworm is in a daze!"
eng $sel2:$sel6\
sub %stack,1
return



*sandw_a2

add %stack,1
if %kousan=2 skip 4
name $name
>I want to suck on you...\
name ""
skillname "Mouth Hold"
dwave 1,"se\ero_pyu2.ogg"
eng "The Sandworm opens her gigantic mouth and leans toward Luka!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,10
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
\
>She clamps down her mouth over Luka's body!
if %nanido<2 damage 20,30
if %nanido=2 damage 30,45
if %nanido=3 damage 40,60
mov %kousoku,1:gosub *status_print
>Luka's stuck in the Sandworm's mouth!\
skillname ""
if %mylife=0 sub %stack,1:return *sandw_h1
if %kousan=2 sub %stack,1:return
gosub *face2
name $name
>Shoot it out...\
name ""
mov %kousoku_hp,%kousoku_maxhp
sub %stack,1
return



*sandw_a3

add %stack,1
>Luka's stuck in the Sandworm's mouth!\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I want to taste you..."
if %ransu=2 mov $sel1,"Delicious..."
if %ransu=3 mov $sel1,"*Lick*"
name $name
eng $sel1:$sel6\
name ""
skillname "Lick"
dwave 1,"se\ero_pyu1.ogg"
lsp 690,":a;chara\sandw_ct01.bmp",0,0:print 10,500
>The Sandworm's giant tongue licks Luka body!
skillcount1 3255
if %nanido<2 damage 30,40
if %nanido=2 damage 45,60
if %nanido=3 damage 60,80
skillname ""
if %mylife=0 sub %stack,1:return *sandw_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*sandw_a4

add %stack,1
>Luka's stuck in the Sandworm's mouth!\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You taste good..."
if %ransu=2 mov $sel1,"I'll suck... So give me your semen..."
if %ransu=3 mov $sel1,"*Suck* *Suck*"
name $name
eng $sel1:$sel6\
name ""
skillname "Suck"
dwave 1,"se\ero_kyuin1.ogg"
lsp 690,":a;chara\sandw_ct01.bmp",0,0:print 10,500
>The Sandworm sucks on Luka's body like he's a piece of candy!
skillcount1 3256
if %nanido<2 damage 35,45
if %nanido=2 damage 52,67
if %nanido=3 damage 70,90
skillname ""
if %mylife=0 sub %stack,1:return *sandw_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*sandw_a5

add %stack,1
>Luka's stuck in the Sandworm's mouth!\
skillcount1 3257
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll kiss it... So put it out..."
if %ransu=2 mov $sel1,"Delicious..."
if %ransu=3 mov $sel1,"*Kiss*"
name $name
eng $sel1:$sel6\
name ""
skillname "Kiss"
dwave 1,"se\ero_chupa1.ogg"
lsp 690,":a;chara\sandw_ct01.bmp",0,0:print 10,500
>The Sandworm narrows her mouth as she makes a kissing motion on Luka's lower body!
if %nanido<2 damage 45,50
if %nanido=2 damage 67,75
if %nanido=3 damage 90,100
skillname ""
if %mylife=0 sub %stack,1:return *sandw_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*sandw_onedari

mov $list1,"Lick"
if %3255>0 mov %list_num1,1
mov $list2,"Suck"
if %3256>0 mov %list_num2,1
mov $list3,"Kiss"
if %3257>0 mov %list_num3,1
gosub *cmd_onedari
if %cmd1=11 goto *sandw_onedari1
if %cmd1=12 goto *sandw_onedari2
if %cmd1=13 goto *sandw_onedari3
if %cmd1=-1 goto *sandw_main
goto *sandw_onedari



*sandw_onedari1

gosub *onedari_syori_k
name $name
>You want me to lick...?\
name ""
if %kousoku=0 gosub *sandw_a2
gosub *sandw_a3
skip -1



*sandw_onedari2

gosub *onedari_syori_k
name $name
>You want me to suck...?\
name ""
if %kousoku=0 gosub *sandw_a2
gosub *sandw_a4
skip -1



*sandw_onedari3

gosub *onedari_syori_k
name $name
>You want me to kiss...?\
name ""
if %kousoku=0 gosub *sandw_a2
gosub *sandw_a5
skip -1



*sandw_h1

mov %ikigoe,3:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\sandw_h3.bmp",0,0
gosub *syasei2
>The moment Luka was sucked into the Sandworm's giant mouth, he was forced to ejaculate.\
mov %viclose,1:gosub *lose
mov %2564,%2564+1:if %2564=1 mov %count_koenemy,%count_koenemy+1
if %2564>%count_most mov %count_most,%2564:mov $count_mostname,$name
count 4,4
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"The moment Luka was sucked into the Sandworm's mouth, he ejaculated."
mov $bad2," While stuck in her mouth, Luka was sucked completely dry."
goto *sandw_h



*sandw_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\sandw_h3.bmp",0,0
lsp 690,":a;chara\sandw_ct02.bmp",0,0
gosub *syasei2
>Stuck in her mouth as she licks and sucks on him, Luka is forced to ejaculate.\
mov %viclose,1:gosub *lose
mov %2564,%2564+1:if %2564=1 mov %count_koenemy,%count_koenemy+1
if %2564>%count_most mov %count_most,%2564:mov $count_mostname,$name
count 4,4
mov $bad1,"Licked by the Sandworm, Luka was forced to ejaculate."
mov $bad2," While stuck in her mouth, Luka was sucked completely dry."
goto *sandw_h



*sandw_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\sandw_h3.bmp",0,0
lsp 690,":a;chara\sandw_ct02.bmp",0,0
gosub *syasei2
>Stuck in her mouth as she licks and sucks on him, Luka is forced to ejaculate.\
mov %viclose,1:gosub *lose
mov %2564,%2564+1:if %2564=1 mov %count_koenemy,%count_koenemy+1
if %2564>%count_most mov %count_most,%2564:mov $count_mostname,$name
count 4,4
mov $bad1,"Sucked by the Sandworm, Luka was forced to ejaculate."
mov $bad2," While stuck in her mouth, Luka was sucked completely dry."
goto *sandw_h



*sandw_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\sandw_h3.bmp",0,0
lsp 690,":a;chara\sandw_ct02.bmp",0,0
gosub *syasei2
>Stuck in her mouth as she licks and sucks on him, Luka is forced to ejaculate.\
mov %viclose,1:gosub *lose
mov %2564,%2564+1:if %2564=1 mov %count_koenemy,%count_koenemy+1
if %2564>%count_most mov %count_most,%2564:mov $count_mostname,$name
count 4,4
mov $bad1,"Kissed by the Sandworm with her powerful lips, Luka was forced to ejaculate."
mov $bad2," While stuck in her mouth, Luka was sucked completely dry."
goto *sandw_h



*sandw_h

if %2564=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name $name
>Semen...\
name ""
mov %hseanvoice,2:hseanvoice
csp 690
lsp 700,":a;chara\sandw_h1.bmp",0,0:print 10,500
>The Sandworm picks me out of her mouth and starts to lick the semen off my groin.\
name "Luka"
>Auuuu...\
name ""
>Her slimy, gigantic tongue keeps licking me with long, slow strokes.@
>Her saliva covers my body as she slowly licks up all the semen.\
name $name
>Delicious...\
name ""
name "Luka"
>Auuu...\
name ""
>My body shivers as her warm tongue runs up my body.\
>Her gigantic tongue pushes into my body, as the tip keeps flicking and licking my penis.\
>Dangling helplessly in midair, I can't do anything but allow her tongue to taste my body.\
name "Luka"
>Ahhh...\
name ""
name $name
>*Lick*@> *Lick*\
name ""
>Her tongue gets even more forceful as she strains to get the last drops of semen off of my penis.\
>She creates a funnel with the tip of her tip around my penis, and starts to forcefully suck on it to get out the semen still inside.\
name "Luka"
>Faaa... Your tongue...\
name ""
name $name
>Mmm...@> More semen is coming out...\
name ""
>More pre-come is leaking out due to her pleasurable tongue.@
>Happy at the additional semen, she continues sucking it out with increased force.\
name "Luka"
>Aiee!@>Ahhhh!!\
name ""
name $name
>*Lick*@> *Suck*\
name ""
>Her saliva drenches the lower half of my body as her thick tongue continues to suck on me.\
>The harshness of her tongue mixes with her sticky saliva, washing me with a sweet ecstasy.\
>In almost no time since my last orgasm, I already feel another one boiling up.\
name "Luka"
>Auuu...@>I'm going to come again...\
name ""
name $name
>*Lick*@> *Suck*\
name ""
>As my body starts to tremble at the coming orgasm, the Sandworm's tongue starts to suck even harder in preparation.\
>With her relentless tongue attacking me, my head goes white.\
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\sandw_h2.bmp",0,0
gosub *syasei2
>I shoot out my semen all over her waiting tongue.@
>Held in the air and licked like this, she forced me to come again...\
name "Luka"
>Auuu...\
name ""
name $name
>Mmm...@> More came out...\
name ""
>The Sandworm's tongue renews her licking as she makes sure to collect every drop.\
mov %hseanvoice,0:hseanvoice
name $name
>More...@
mov %hseanvoice,5:hseanvoice
lsp 700,":a;chara\sandw_h3.bmp",0,0:print 10,500
>Mmmm@> *Suck*\
name ""
name "Luka"
>Ah!@>Aiee!\
name ""
>The Sandworm gently sucked the lower half of my body into her mouth.@
>Everything from my waist down is stuck inside of her.\
name "Luka"
>Ahhhh!!\
name ""
>My penis is forced against her slimy tongue.@
>The bizarre feeling is unlike anything I could have ever imagined.\
name $name
>*Suck*@> *Lick*\
name ""
lsp 690,":a;chara\sandw_ct01.bmp",0,0:print 10,500
>Saliva starts to secrete inside her mouth, soaking my body in it.\
name "Luka"
>Auu... It's so warm...\
name ""
name $name
>*Suck*@> *Lick*\
name ""
>She narrows her cheeks as she starts to suck on my body.@
>Her sucking motions start off slow, and her tongue starts to move around the lower half of my body.\
>Unable to even see what's going on inside her mouth, the pleasure starts to put me into a trance.\
name "Luka"
>Aaa... That feels good...\
name ""
name $name
>*Suck*@> *Lick*\
name ""
>Her sucking motions cause her lips to move on my body.@
>Moving from my chest to my belly button, the friction brings a warming pleasure to my body as the saliva covers more of my body.\
name "Luka"
>Faaa... Incredible...\
name ""
name $name
>Your penis...@>Delicious...\
name ""
>Her thick tongue starts to play with my penis.@
>She uses her tongue to force my body onto the roof of her mouth, as she gently flicks my penis.\
name "Luka"
>Auu... I'm going to come again...\
name ""
>I yell out as it feels like my lower body is melting in pleasure.@
>Wrapped in her mouth and attacked by her tongue, there's no way I can hold on any longer...\
name $name
>Mmmm...@>*Lick*@
>I want more of your delicious semen...\
name ""
name "Luka"
>Ahhhh!!\
name ""
>Wrapped in her tongue, I explode inside of her mouth.\
gosub *syasei1
lsp 700,":a;chara\sandw_h4.bmp",0,0
lsp 690,":a;chara\sandw_ct02.bmp",0,0
gosub *syasei2
name $name
>Mmm...@> *Slurrrrrp*\
name ""
>A strong suction pulls violently at my body as the Sandworm sucks down my semen as I shoot it out.\
name "Luka"
>Ahh... Your sucking...\
name ""
name $name
>*Suck*@> *Suck*\
name ""
>Even after she finished drinking down the last of my semen, she continues sucking on me.\
name "Luka"
>Aiee!@>Ahhhh!!\
name ""
>The upper half of my body writhes in futility as her lips tighten around my body.\
>With my lower half inside her mouth and suspended so far above the ground, there's no escape...\
name "Luka"
>Haaa!@>Ahhh!\
name ""
>Her mouth narrows as the suction increases.@
>It feels as though the entire lower half of my body is being squeezed between the roof of her mouth and her tongue.\
>As if sucking everything directly out of me by sheer force, my body relaxes as I give in again.\
gosub *syasei1
lsp 700,":a;chara\sandw_h5.bmp",0,0
lsp 690,":a;chara\sandw_ct03.bmp",0,0
gosub *syasei2
name "Luka"
>Ahhh...\
name ""
name $name
>*Suck*@> *Suck*\
name ""
>She fiercely sucks on my after every spurt of semen, swallowing it down as fast as it comes out.\
>Not stopping for a single moment, she quickly forces me to another ejaculation right after my last.\
gosub *syasei1:gosub *syasei2
name "Luka"
>Ahhh...\
name ""
>Unable to do anything, I finally surrender to her mouth.@
>With all of my power drained, I accept being sucked by her.\
name $name
>*Suck*@> *Suck*\
name ""
name "Luka"
>Faa...\
name ""
gosub *syasei1
lsp 690,":a;chara\sandw_ct04.bmp",0,0
gosub *syasei2
>Each orgasm makes me feel even weaker.@
>After the repeated orgasms, I'm too exhausted to even move my head.\
>Even though I know that if she keeps sucking on me, I'll die...@
>I can't do anything but drown in the pleasure.\
>Even though I know it's killing me, I want to feel even more...\
name "Luka"
>Aaaa...\
name ""
gosub *syasei1:gosub *syasei2
>A white fog envelopes me as my consciousness starts to fade.@
>The Sandworm is sucking everything out of me...\
>Until nothing's left, I'll be sucked in her mouth...\
gosub *syasei1:gosub *syasei2
gosub *anten
mov %hseanvoice,0:hseanvoice
name $name
>...He stopped moving...\
name ""
>The Sandworm sucked every drop out of Luka, leaving only a shriveled up corpse.\
>On the outskirts of the desert, his discarded body is covered by the sand...\
>.....................\
goto *badend



*gnome_start

mov $name,"Gnome"
mov $name2,"Gnome"
mov $lavel,"gnome"
mov $tatie1,"gnome_st01"
mov $tatie2,"gnome_st01"
mov $tatie3,"gnome_st02"
mov $tatie4,"gnome_st11"
mov $haikei,"bg076"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,4000
if %nanido=2 mov %max_enemylife,4500
if %nanido=3 mov %max_enemylife,5000
if %nanido=1 mov %henkahp1,3000
if %nanido=2 mov %henkahp1,3250
if %nanido=3 mov %henkahp1,3500
if %nanido=1 mov %henkahp2,2000
if %nanido=2 mov %henkahp2,2000
if %nanido=3 mov %henkahp2,2000
if %nanido=0 mov %max_enemylife,3
if %nanido=0 mov %henkahp1,2
if %nanido=0 mov %henkahp2,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,10
mov %tikei,0
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free of the Mud Dolls!"
mov $mogaku_anno2,"Luka broke free of the Mud Dolls!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,""
mov $mogaku_sel2,""
mov $mogaku_sel3,""
mov $mogaku_sel4,""
mov $mogaku_sel5,""
mov $mogaku_dassyutu1,"............"
mov $mogaku_dassyutu2,""
mov %end_n,5
mov %exp_minus,7500
mov %zmonster_x,-300
name $name
>................\
name ""
lsp 701,":a;chara\doro_st01.bmp",230,0
lsp 702,":a;chara\doro_st02.bmp",-120,0
lsp 703,":a;chara\doro_st03.bmp",-180,0
lsp 704,":a;chara\doro_st03.bmp",240,0:print 10,500
>Mud Dolls appear all around Gnome.@
>As expected from the Spirit of Earth... Her magic is powerful.\
name "Luka"
>She isn't someone I can hold back against!\
name ""
>Even if she's a girl, I can't hold back.@
>I have to make Gnome deem me worthy!\
mov %sinkou,1
goto *common_main



*gnome001

mov $tatie1,"gnome_st11"
mov $tatie2,"gnome_st11"
mov $tatie3,"gnome_st12"
dwave 1,"se\doro.ogg"
cspl 703,704
lsp 700,":a;chara\gnome_st11.bmp",0,0:print 10,500
>Luka's attack causes some Mud Dolls to collapse!\
name "Luka"
>Alright, I got some!\
name ""
mov %sinkou,2
goto *gnome_a



*gnome_v

dwave 1,"se\doro.ogg"
cspl 701,704:print 10,500
>Luka's attack causes the last of the Mud Dolls to collapse!\
name "Luka"
>Alright!@> Gnome herself is the only one left...\
name ""
gosub *face3
name $name
>..............\
name ""
skillname "Magic Concentration"
dwave 1,"se\power.ogg"
>Gnome begins to power up!\
skillname ""
name "Luka"
>What the!?\
name ""
name "Sylph"
>Wah!@> This isn't good!@
>I'll help you with my wind!\
name ""
lsp 700,":a;chara\gnome_st21.bmp",0,0:print 10,500
name $name
>..............\
name ""
skillname "Wrath of the Earth"
>Gnome unleashes her magic!
dwave 1,"se\earth1.ogg"
quake 10,2000
dwave 1,"se\earth2.ogg"
csp 700
bg white,18,1500,"system\mask01.jpg"
>The sand surges like a tidal wave!\
name "Luka"
>Uwaaa!\
name ""
dwave 2,"se\wind2.ogg"
>A tornado forms around Luka, protecting him from the sand!@
>Gnome is engulfed by the tsunami of sand!\
dwave 3,"se\damage2.ogg":quake 10,600
rnd2 %damage,2100,2400
itoa $sel1,%damage
eng "Gnome takes "+$sel1+" damage!"
$sel6/
mov %enemylife,%enemylife-%damage
if %enemylife>%max_enemylife mov %enemylife,%max_enemylife
if %enemylife<0 mov %enemylife,0
if %enemylife=0 mov %gage,0 skip 3
mov %gage,%enemylife*100/%max_enemylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
print 10,500
\
skillname ""
bg "bg\bg076.bmp",10,3000
name "Luka"
>..............\
name ""
>...Gnome took that attack full on.\
name "Luka"
>Where did you go!?@> Ah!\
name ""
>I see Gnome's hat popping out of the sand.\
>When I dig her out I see...@
lsp 700,":a;chara\gnome_st34.bmp",-40,50:print 10,500
>Gnome is unconscious!\
name "Luka"
>..............\
name ""
mov %viclose,1:gosub *victory
mov %getexp,5000:gosub *lvup
mov %2265,1
goto *sean0159



*gnome_kousan

gosub *kousan_syori
>Luka give in to temptation and ends his resistance!\
name $name
>..............\
name ""
goto *gnome_a



*gnome_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *gnome_kousan
if %cmd1=16 goto *gnome_onedari
if %cmd1=17 goto *common_skill
goto *gnome_main



*gnome_a

if %enemylife<%henkahp1 && %sinkou=1 goto *gnome001
if %enemylife<%henkahp2 && %sinkou=2 goto *gnome_v
if %kousoku=1 rnd2 %ransu,1,3
if %kousoku=1 && %ransu=1 gosub *gnome_a1:gosub *gnome_a4:goto *common_main
if %kousoku=1 && %ransu=2 gosub *gnome_a1:gosub *gnome_a5:goto *common_main
if %kousoku=1 && %ransu=3 gosub *gnome_a1:gosub *gnome_a6:goto *common_main
rnd2 %ransu,1,3
if %ransu=1 gosub *gnome_a1:goto *common_main
if %ransu=2 gosub *gnome_a2:goto *common_main
if %ransu=3 && %owaza_count1a>3 gosub *gnome_a3:goto *common_main
skip -4



*gnome_a1

add %stack,1
if %kousoku=0 skip 2
>Luka is restrained by the Mud Dolls!\
name $name
>..............\
name ""
skillname "Mud Doll Caress"
dwave 1,"se\ero_slime1.ogg"
>The Mud Dolls rub Luka's body!\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Mud Doll A plays with Luka's right nipple!"
if %ransu=2 mov $sel1,"Mud Doll A massages Luka's neck!"
if %ransu=3 mov $sel1,"Mud Doll A tickles Luka's armpit!"
eng $sel1:$sel6
if %wind=1 && %nanido<2 mov %wind_kakuritu,40
if %wind=1 && %nanido=2 mov %wind_kakuritu,40
if %wind=1 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind blew it off!":gosub *wind_guard:skillname "Mud Doll Caress":skip 5
skillcount1 3258
if %nanido<2 damage 7,10
if %nanido=2 damage 10,15
if %nanido=3 damage 14,20
if %ransu=1 mov $sel1,"Mud Doll B plays with Luka's left nipple!"
if %ransu=2 mov $sel1,"Mud Doll B tickles Luka's stomach!"
if %ransu=3 mov $sel1,"Mud Doll B pokes Luka's nipple!"
eng $sel1:$sel6
if %wind=1 && %nanido<2 mov %wind_kakuritu,40
if %wind=1 && %nanido=2 mov %wind_kakuritu,40
if %wind=1 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 && %sinkou=2 mov $sel1,"But the wind blew it off!":gosub *wind_guard:skip 7
if %wind=1 mov $sel1,"But the wind blew it off!":gosub *wind_guard:skillname "Mud Doll Caress":skip 5
skillcount1 3258
if %nanido<2 damage 7,10
if %nanido=2 damage 10,15
if %nanido=3 damage 14,20
if %sinkou=2 skillname ""
if %sinkou=2 && %mylife=0 sub %stack,1:return *gnome_h1
if %sinkou=2 sub %stack,1:return
if %ransu=1 mov $sel1,"Mud Doll C tickles Luka's side!"
if %ransu=2 mov $sel1,"Mud Doll C pokes Luka's anus!"
if %ransu=3 mov $sel1,"Mud Doll C rubs Luka's neck!"
eng $sel1:$sel6
if %wind=1 && %nanido<2 mov %wind_kakuritu,40
if %wind=1 && %nanido=2 mov %wind_kakuritu,40
if %wind=1 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind blew it off!":gosub *wind_guard:skillname "Mud Doll Caress":skip 5
skillcount1 3258
if %nanido<2 damage 7,10
if %nanido=2 damage 10,15
if %nanido=3 damage 14,20
if %ransu=1 mov $sel1,"Mud Doll D rubs Luka's thighs!"
if %ransu=2 mov $sel1,"Mud Doll D tickles Luka's feet!"
if %ransu=3 mov $sel1,"Mud Doll D pokes at Luka's nipples!"
eng $sel1:$sel6
if %wind=1 && %nanido<2 mov %wind_kakuritu,40
if %wind=1 && %nanido=2 mov %wind_kakuritu,40
if %wind=1 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind blew it off!":gosub *wind_guard:skip 6
skillcount1 3258
if %nanido<2 damage 7,10
if %nanido=2 damage 10,15
if %nanido=3 damage 14,20
skillname ""
if %mylife=0 sub %stack,1:return *gnome_h1
sub %stack,1
return



*gnome_a2

add %stack,1
name $name
>..............\
name ""
skillname "Mud Doll Groin Fondle"
dwave 1,"se\ero_slime1.ogg"
rnd2 %ransu,1,2
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"The Mud Dolls flock to Luka's groin!"
if %ransu=2 mov $sel1,"The Mud Dolls attack Luka's groin!"
eng $sel1:$sel6\
if %ransu=1 mov $sel1,"Mud Doll A grabs onto Luka's penis!"
if %ransu=2 mov $sel1,"Mud Doll A uses the palm of its hand to rub the tip of Luka's penis!"
eng $sel1:$sel6
if %wind=1 && %nanido<2 mov %wind_kakuritu,40
if %wind=1 && %nanido=2 mov %wind_kakuritu,40
if %wind=1 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind blows it off!":gosub *wind_guard:skillname "Mud Doll Groin Fondle":skip 5
skillcount1 3259
if %nanido<2 damage 8,11
if %nanido=2 damage 12,16
if %nanido=3 damage 16,22
if %ransu=1 mov $sel1,"Mud Doll B uses both hands to play with Luka's penis!"
if %ransu=2 mov $sel1,"Mud Doll B traces its finger along the back of Luka's penis!"
eng $sel1:$sel6
if %wind=1 && %nanido<2 mov %wind_kakuritu,40
if %wind=1 && %nanido=2 mov %wind_kakuritu,40
if %wind=1 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 && %sinkou=2 mov $sel1,"But the wind blows it off!":gosub *wind_guard:skip 7
if %wind=1 mov $sel1,"But the wind blows it off!":gosub *wind_guard:skillname "Mud Doll Groin Fondle":skip 5
skillcount1 3259
if %nanido<2 damage 8,11
if %nanido=2 damage 12,16
if %nanido=3 damage 16,22
if %sinkou=2 skillname ""
if %sinkou=2 && %mylife=0 sub %stack,1:return *gnome_h2
if %sinkou=2 sub %stack,1:return
if %ransu=1 mov $sel1,"Mud Doll C clings to Luka's penis!"
if %ransu=2 mov $sel1,"Mud Doll C pokes the tip of Luka's penis!"
eng $sel1:$sel6
if %wind=1 && %nanido<2 mov %wind_kakuritu,40
if %wind=1 && %nanido=2 mov %wind_kakuritu,40
if %wind=1 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind blows it off!":gosub *wind_guard:skillname "Mud Doll Groin Fondle":skip 5
skillcount1 3259
if %nanido<2 damage 8,11
if %nanido=2 damage 12,16
if %nanido=3 damage 16,22
if %ransu=1 mov $sel1,"Mud Doll D rubs Luka's penis!"
if %ransu=2 mov $sel1,"Mud Doll D strokes Luka's penis!"
eng $sel1:$sel6
if %wind=1 && %nanido<2 mov %wind_kakuritu,40
if %wind=1 && %nanido=2 mov %wind_kakuritu,40
if %wind=1 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind blows it off!":gosub *wind_guard:skip 6
skillcount1 3259
if %nanido<2 damage 8,11
if %nanido=2 damage 12,16
if %nanido=3 damage 16,22
skillname ""
if %mylife=0 sub %stack,1:return *gnome_h2
sub %stack,1
return



*gnome_a3

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name $name
>..............\
name ""
lsp 700,":a;chara\gnome_st21.bmp",0,0:print 10,500
skillname "Mud Doll Restraint"
>Gnome points her finger at Luka!@
eng "Following her orders, Mud Dolls jump on Luka!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,20
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind blows them away!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>Luka's movement has been bound by the Mud Dolls!\
skillname ""
if %kousan=2 sub %stack,1:return
if %first_sel1=1 skip 10
name $name
>..............\
name ""
name "Luka"
>Gah...\
name ""
>The Mud Dolls are firmly clinging to my arms and feet.@
>I don't think I can get them off too easily!\
mov %first_sel1,1
if %nanido<2 mov %genmogaku,2
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,3
sub %stack,1
return



*gnome_a4

add %stack,1
>Gnome's Mud Dolls are holding Luka down!\
skillcount1 3260
name $name
>..............\
name ""
skillname "Gnome's Hand Games"
dwave 1,"se\ero_koki1.ogg"
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Gnome pokes Luka's penis with curiosity!"
if %ransu=2 mov $sel1,"Gnome grabs Luka's penis with both hands and squeezes!"
if %ransu=3 mov $sel1,"Gnome grabs Luka's penis and strokes him up and down!"
if %ransu=4 mov $sel1,"Gnome pokes at Luka's urethral opening!"
if %ransu=5 mov $sel1,"Gnome continually squeezes and releases Luka's penis!"
eng $sel1:$sel6
if %nanido<2 damage 10,15
if %nanido=2 damage 15,22
if %nanido=3 damage 20,30
skillname ""
if %mylife=0 sub %stack,1:return *gnome_h3
sub %stack,1
return



*gnome_a5

add %stack,1
>Gnome's Mud Dolls are holding Luka down!\
skillcount1 3261
name $name
>..............\
name ""
skillname "Gnome's Mouth Play"
dwave 1,"se\ero_pyu2.ogg"
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Gnome nervously licks Luka's penis!"
if %ransu=2 mov $sel1,"Gnome blows on Luka's penis!"
if %ransu=3 mov $sel1,"Gnome pokes at Luka's urethral opening with her tongue!"
if %ransu=4 mov $sel1,"Gnome puts the tip of Luka's penis in her mouth and licks it!"
if %ransu=5 mov $sel1,"Gnome quickly licks the back of Luka's penis!"
eng $sel1:$sel6
if %nanido<2 damage 13,17
if %nanido=2 damage 19,25
if %nanido=3 damage 26,34
skillname ""
if %mylife=0 sub %stack,1:return *gnome_h4
sub %stack,1
return



*gnome_a6

add %stack,1
>Gnome's Mud Dolls are holding Luka down!\
skillcount1 3262
name $name
>..............\
name ""
skillname "Gnome's Mud Vagina"
dwave 1,"se\ero_syokusyu3.ogg"
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"The sticky mud stimulates Luka!"
if %ransu=2 mov $sel1,"It moves up and down faster than Luka can see!"
if %ransu=3 mov $sel1,"It slowly moves up and down!"
if %ransu=4 mov $sel1,"It spins around!"
if %ransu=5 mov $sel1,"It tightens around Luka's penis!"
>Gnome creates a vagina out of mud over Luka's penis!\
eng $sel1:$sel6
if %nanido<2 damage 15,18
if %nanido=2 damage 22,27
if %nanido=3 damage 30,36
skillname ""
if %mylife=0 sub %stack,1:return *gnome_h5
sub %stack,1
return



*gnome_onedari

mov $list1,"Mud Doll Caress"
if %3258>0 mov %list_num1,1
mov $list2,"Mud Doll Groin Fondle"
if %3259>0 mov %list_num2,1
mov $list3,"Gnome's Hand Games"
if %3260>0 mov %list_num3,1
mov $list4,"Gnome's Mouth Play"
if %3261>0 mov %list_num4,1
mov $list5,"Gnome's Mud Vagina"
if %3262>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *gnome_onedari1
if %cmd1=12 goto *gnome_onedari2
if %cmd1=13 goto *gnome_onedari3
if %cmd1=14 goto *gnome_onedari4
if %cmd1=15 goto *gnome_onedari5
if %cmd1=-1 goto *gnome_main
goto *gnome_onedari



*gnome_onedari1

mov %sinkou,1
lsp 701,":a;chara\doro_st01.bmp",230,0
lsp 702,":a;chara\doro_st02.bmp",-120,0
lsp 703,":a;chara\doro_st03.bmp",-180,0
lsp 704,":a;chara\doro_st03.bmp",240,0
gosub *onedari_syori
gosub *gnome_a1
skip -1



*gnome_onedari2

mov %sinkou,1
lsp 701,":a;chara\doro_st01.bmp",230,0
lsp 702,":a;chara\doro_st02.bmp",-120,0
lsp 703,":a;chara\doro_st03.bmp",-180,0
lsp 704,":a;chara\doro_st03.bmp",240,0
gosub *onedari_syori
gosub *gnome_a2
skip -1



*gnome_onedari3

gosub *onedari_syori_k
if %kousoku=0 gosub *gnome_a3
gosub *gnome_a4
skip -1



*gnome_onedari4

gosub *onedari_syori_k
if %kousoku=0 gosub *gnome_a3
gosub *gnome_a5
skip -1



*gnome_onedari5

gosub *onedari_syori_k
if %kousoku=0 gosub *gnome_a3
gosub *gnome_a6
skip -1



*gnome_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 701,":a;chara\doro_st01bk.bmp",230,0:lsp 702,":a;chara\doro_st02bk.bmp",-120,0
if %sinkou=1 lsp 703,":a;chara\doro_st03bk.bmp",-180,0:lsp 704,":a;chara\doro_st03bk.bmp",240,0
gosub *syasei2
>With the mud dolls stroking his body, Luka finally ejaculates.\
mov %viclose,1:gosub *lose
mov %2565,%2565+1:if %2565=1 mov %count_koenemy,%count_koenemy+1
if %2565>%count_most mov %count_most,%2565:mov $count_mostname,$name
count 28,5
mov $bad1,"Luka succumbed to Gnome's Mud Doll Caress."
mov $bad2," After that, Gnome kept Luka as a toy."
goto *gnome_h



*gnome_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 701,":a;chara\doro_st01bk.bmp",230,0:lsp 702,":a;chara\doro_st02bk.bmp",-120,0
if %sinkou=1 lsp 703,":a;chara\doro_st03bk.bmp",-180,0:lsp 704,":a;chara\doro_st03bk.bmp",240,0
gosub *syasei2
>With the mud dolls stroking his penis, Luka finally ejaculates.\
mov %viclose,1:gosub *lose
mov %2565,%2565+1:if %2565=1 mov %count_koenemy,%count_koenemy+1
if %2565>%count_most mov %count_most,%2565:mov $count_mostname,$name
count 24,5
mov $bad1,"Luka succumbed to Gnome's Mud Doll Groin Fondle."
mov $bad2," After that, Gnome kept Luka as a toy."
goto *gnome_h



*gnome_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\gnome_bk02.bmp",0,0
gosub *syasei2
>While being played with by Gnome's curious hands, Luka finally ejaculates.\
mov %viclose,1:gosub *lose
mov %2565,%2565+1:if %2565=1 mov %count_koenemy,%count_koenemy+1
if %2565>%count_most mov %count_most,%2565:mov $count_mostname,$name
count 5,5
mov $bad1,"Luka succumbed to Gnome's Hand Games."
mov $bad2," After that, Gnome kept Luka as a toy."
goto *gnome_h



*gnome_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\gnome_bk01.bmp",0,0
gosub *syasei2
>While being explored by Gnome's hesitant mouth, Luka finally ejaculates.\
mov %viclose,1:gosub *lose
mov %2565,%2565+1:if %2565=1 mov %count_koenemy,%count_koenemy+1
if %2565>%count_most mov %count_most,%2565:mov $count_mostname,$name
count 4,5
mov $bad1,"Luka succumbed to Gnome's Mouth Play."
mov $bad2," After that, Gnome kept Luka as a toy."
goto *gnome_h



*gnome_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\gnome_bk03.bmp",0,0
gosub *syasei2
>Stimulated by the vagina made of mud that Gnome created, Luka is forced to ejaculate.\
mov %viclose,1:gosub *lose
mov %2565,%2565+1:if %2565=1 mov %count_koenemy,%count_koenemy+1
if %2565>%count_most mov %count_most,%2565:mov $count_mostname,$name
count 27,5
mov $bad1,"Luka succumbed to the vagina made of mud that Gnome created."
mov $bad2," After that, Gnome kept Luka as a toy."
goto *gnome_h



*gnome_h

if %2565=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Auuu...\
name ""
>Immersed in the feelings from my orgasm, I fall to the ground exhausted.\
cspl 690,699
lsp 700,":a;chara\gnome_st21.bmp",0,0
lsp 701,":a;chara\doro_st01.bmp",230,0
lsp 702,":a;chara\doro_st02.bmp",-120,0
lsp 703,":a;chara\doro_st03.bmp",-180,0
lsp 704,":a;chara\doro_st03.bmp",240,0:print 10,500
>Gnome points at me with her finger.@
>Suddenly, the Mud Dolls rush toward my body!\
name "Luka"
>Uwa!@> Wahh!\
name ""
cspl 701,704
lsp 700,":a;chara\gnome_h0.bmp",0,0:print 10,500
>They cling to my arms, legs, stomach and neck... In an instant, I'm completely stuck under a mound of Mud Dolls.\
name "Luka"
>Get off!\
name ""
>Crushed under the extreme weight of all the Mud Dolls, I can't move at all.\
>The dolls start to lose their shape as they morph together into a single mound of sticky mud.\
name "Luka"
>Uwaa!\
name ""
mov %hseanwave,12:hseanwave
>The sticky mud completely covers my body, as it touches every single inch of my skin.\
>The surprisingly warm mud feels pleasant as it covers my body.\
name "Luka"
>Ahhh...\
name ""
>My voice leaks out as the warm mud causes my body to relax.@
>Suddenly, a tiny mud doll climbs up on top of my groin.\
name "Luka"
>What are..@> Ahhh!\
name ""
mov %hseanwave,13:hseanwave
lsp 700,":a;chara\gnome_h1.bmp",0,0:print 10,500
>Before I can say anything else, the doll slams its waist down on me.@
>With a single thrust, my penis pierces the mud doll through its body.\
name "Luka"
>Faaa!!\
name ""
>The mud around my penis is vibrating and pulsating.@
>The mysterious Mud Doll's tiny body forces pleasure into me.\
name "Luka"
>Auu... Incredible...@
>The mud is vibrating... It feels good...\
name ""
name $name
>..............\
name ""
>Gnome quietly watches me as I writhe in pleasure.@
>With an expressionless face, her eyes look on in interest.\
>She silently stares at the point where my penis is forced into the Mud Doll's body.\
>The mud inside of the doll starts to violently vibrate right around the tip of my penis.\
name $name
>..............\
name ""
>Gnome moves her gaze right into my eyes.@
>The way things are going, I'm going to be forced to come as she watches...\
name "Luka"
>No... Stop...\
name ""
>I try to endure the coming disgrace.@
>But the Mud Doll just starts to move and vibrate even more than before.\
>I couldn't help but look over at Gnome's emotionless face as I feel the orgasm rise up in me.\
name "Luka"
>Auu... I'm coming...\
name ""
name $name
>..............\
name ""
>Gnome's eyes slightly widen at my voice.@
>With my eyes locked with hers, she's going to watch me in my moment of humiliation...\
name "Luka"
>Faa... Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\gnome_h2.bmp",0,0
gosub *syasei2
>My semen explodes into the Mud Doll's body.@
>No matter how hard I tried to hold on, she forced me to come anyway...\
>All the while, Gnome intently watched my face.@
>Her eyes look satisfied...\
name "Luka"
>Auuu...\
name ""
>My body relaxes after my orgasm.@
>Is she going to let me go now...?\
name $name
>..............\
name ""
>Gnome points at me again.@
>At the same time, the Mud Doll on my penis starts to bounce up and down.\
>Stuck in its body, the sound of the sticky mud moving around fills the area.\
>Stuck under this mound of mud, I can't do anything but look on as the pleasure attacks me.\
name "Luka"
>Ahhh!!\
name ""
>I shake my head back and forth as the Mud Doll bounces faster and faster.\
>Inside its body, the mud around my penis begins to compact and tighten.@
>As if freely able to manipulate the mud inside of it, the mud around my penis begins to spin in a whirlpool.\
>The tight mud spins around as the doll bounces up and down at the same time, not letting me focus on anything but the varying stimulations.\
name "Luka"
>Ah... Incredible...!@> If you keep doing that...\
name ""
name $name
>..............\
name ""
>Gnome's eyes widen as she impatiently waits for my orgasm.@
>Forcing me to ejaculate, she just silently watches.\
>Not even touching me herself, I feel humiliated at being forced to come by her dolls.\
name "Luka"
>No... I'm coming!\
name ""
name $name
>..............\
name ""
>Gnome intently watches me as I'm forced to another height.\
gosub *syasei1
lsp 700,":a;chara\gnome_h3.bmp",0,0
gosub *syasei2
name "Luka"
>Faaa...\
name ""
>My semen pours into the sticky mud.@
>Enchanted by the pleasure, I let out a sigh during my orgasm.\
>Writhing in humiliation, Gnome forced me to ejaculate again with her mud.\
>With my body drowning in pleasure, my spirit has been broken.@
>If she keeps playing with me like this, I won't stay sane...\
name "Luka"
>Please let me go...\
name ""
name $name
>..............\
name ""
>But Gnome shakes her head left and right, rejecting my plea.\
name "Luka"
>No way...@>Auu!\
name ""
>The Mud Doll on top of me starts to bounce again, as Gnome continues to look on in interest.\
name "Luka"
>Auuu...\
name ""
>The mud inside the doll spins around my penis as I quickly surrender to it again.\
gosub *syasei1
lsp 700,":a;chara\gnome_h4.bmp",0,0
gosub *syasei2
>With another sigh, I shoot out more semen into her sticky mud.\
name "Luka"
>Faa... Stop already...\
name ""
name $name
>..............\
name ""
>No matter how much I beg, Gnome continues to watch as the Mud Doll forces me to ejaculate.\
>Toyed with by this little girl, she continues to look on in interest at each of my orgasms.\
gosub *anten
mov %hseanwave,0:hseanwave
>No matter how much time passes, Gnome won't release me.@
>Gnome takes care of me like a pet, and plays with me every day as a toy to satisfy her curiosity.\
>..................\
goto *badend



*centa_start

mov $name,"Centaur Girl"
mov $name2,"Centaur Girl"
mov $lavel,"centa"
mov $tatie1,"centa_st01"
mov $tatie2,"centa_st02"
mov $tatie3,"centa_st03"
mov $tatie4,"centa_st02"
mov $haikei,"bg077"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,1500
if %nanido=2 mov %max_enemylife,1800
if %nanido=3 mov %max_enemylife,2100
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,1
mov %tikei,2
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But he's forcibly held down!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But he's forcibly held down!"
mov $mogaku_sel1,"It looks like you liked to be raped forcefully!"
mov $mogaku_sel2,"It looks like you liked to be raped forcefully!"
mov $mogaku_sel3,"Struggling is pointless!"
mov $mogaku_sel4,"Struggling is pointless!"
mov $mogaku_sel5,"Struggling is pointless!"
mov $mogaku_earth_dassyutu1,"Kuh... So thin, but so strong!"
mov $mogaku_earth_dassyutu2,""
mov $half_s1,"Now, just be quiet while I rape you..."
mov $half_s2,"I can't hold myself back any longer..."
mov $kiki_s1,"Are you about to give in...?"
mov $kiki_s2,"Breeding with me will feel amazing..."
mov %end_n,2
mov %zmonster_x,-220
mov %tukix,250
name $name
>B...Boy, I have a request...\
name ""
>The Centaur seems like she's almost out of breath.@
>Is she injured, or sick?\
name "Luka"
>Are you OK?\
name ""
name $name
>I...It's mating season. M...My pussy is aching so much...@
>P...Please, use that thing of yours to calm me down!\
name ""
name "Luka"
>I...I can't do that!@
>That's banned by Ilias!\
name ""
gosub *face2
name $name
>You can use that tiny body of yours to pound my throbbing pussy...@
>Ah, you can shake that tiny waist of yours and mate with me endlessly, crying in rapture...\
name ""
>...She isn't listening to me at all.@
>It looks like she's in a deranged mental state.\
>I don't think I can get out of this... It looks like I'll have to fight.\
lsp2 0,":a;chara\gnome_st01.bmp",250,300,100,100,0,200
gosub *syoukan_effect
name "Gnome"
>..............\
name ""
name "Luka"
>Hmmm...?\
name ""
>It feels like Gnome's power is shifting inside of me...@
>Does that mean she wants me to use her power?\
gosub *face1
mov %skill01,8
mov %skill03,0
goto *common_main



*centa_v

gosub *face3
name $name
>Guh... What... Is this!?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Centaur Girl turns into a small horse!\
mov %viclose,1:gosub *victory
mov %getexp,4500:gosub *lvup
mov %2266,1
mov %skill01,8
mov %skill03,0
goto *sean0161



*centa_kousan

gosub *kousan_syori
name ""
>Luka succumbs to temptation, ending his resistance!\
gosub *face2
name $name
>It's OK for me to force myself on you?@
>Then I'll gladly make you my stallion...\
name ""
goto *centa_a



*centa_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *centa_kousan
if %cmd1=16 goto *centa_onedari
if %cmd1=17 goto *centa_skill
goto *centa_main



*centa_skill

gosub *cmd_skill
if %cmd1=21 goto *skill1
if %cmd1=22 goto *skill6
if %cmd1=23 goto *skill3
if %cmd1=24 goto *skill4
if %cmd1=25 goto *skill5
if %cmd1=31 goto *skill7
if %cmd1=32 && %hanyo1=0 goto *centa_skill8
if %cmd1=32 && %hanyo1=1 goto *skill8
if %cmd1=35 goto *skill17
if %cmd1=-1 goto *centa_main
goto *centa_skill



*centa_skill8

name "Luka"
>Gnome, lend me your power!\
name ""
name "Gnome"
>............\
name ""
mov %mp,%mp-2
gosub *mp
skillname "Strength of the Earth"
mov %earth,1:mov %earth_turn,8
if %skill01<9 mov %wind,0:mov %aqua,0:mov %fire,0
dwave 2,"se\earth4.ogg"
lsp2 0,":a;chara\gnome_st21.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *elm_print
>The power of the Earth fills Luka's body!\
skillname ""
name "Luka"
>What is this!?\
name ""
>Insane strength fills my body.@
>It feels like my body has been filled with the unstoppable power of the very Earth itself!\
mov %hanyo1,1
goto "*"+$lavel+"_a"



*centa_a

if %kousoku=1 gosub *centa_a5:goto *common_main
if %turn=2 && %kousan=0 gosub *centa_a4:goto *common_main
rnd2 %ransu,1,4
if %ransu=1 gosub *centa_a1:goto *common_main
if %ransu=2 gosub *centa_a2:goto *common_main
if %ransu=3 gosub *centa_a3:goto *common_main
if %ransu=4 && %owaza_count1a>4 gosub *centa_a4:goto *common_main
skip -5



*centa_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll steal a kiss..."
if %ransu=2 mov $sel1,"Nnnn... *Kiss*"
if %ransu=3 mov $sel1,"Let me kiss you first... Nnnn..."
name $name
eng $sel1:$sel6\
name ""
skillname "Centaur Kiss"
dwave 1,"se\ero_chupa2.ogg"
>The Centaur's hungry lips kiss Luka!
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,25
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
>The sweet kiss stimulates Luka!
skillcount2 3263
if %nanido<2 damage 30,35
if %nanido=2 damage 40,45
if %nanido=3 damage 50,55
skillname ""
if %mylife=0 sub %stack,1:return *centa_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*centa_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"J...Just let me touch your thing..."
if %ransu=2 mov $sel1,"Your thing is quite spirited..."
if %ransu=3 mov $sel1,"Ah... The smell of a male..."
name $name
eng $sel1:$sel6\
name ""
skillname "Centaur Handjob"
dwave 1,"se\ero_koki1.ogg"
>The Centaur grabs Luka's penis, and passionately strokes him up and down!
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,25
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind blows her away!":gosub *wind_guard:sub %stack,1:return
skillcount2 3264
if %nanido<2 damage 35,40
if %nanido=2 damage 45,50
if %nanido=3 damage 55,60
skillname ""
if %mylife=0 sub %stack,1:return *centa_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*centa_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"That... I want to lick it..."
if %ransu=2 mov $sel1,"Let me get a taste of you..."
if %ransu=3 mov $sel1,"Nnn... Delicious... *Lick*"
name $name
eng $sel1:$sel6\
name ""
skillname "Centaur Blowjob"
dwave 1,"se\ero_buchu3.ogg"
>The Centaur sucks Luka's penis into her mouth, and desperately sucks on it!
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,25
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind blows her away!":gosub *wind_guard:sub %stack,1:return
skillcount2 3265
if %nanido<2 damage 45,50
if %nanido=2 damage 55,60
if %nanido=3 damage 65,70
skillname ""
if %mylife=0 sub %stack,1:return *centa_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*centa_a4

add %stack,1
if %kousan=2 skip 7
name $name
if %first_sel1=1 skip 3
>I can't stand it any longer... Mate with me now!\
skip 2
>This time, mate with me!\
name ""
skillname "Reverse Horseback Riding"
>The Centaur leans on Luka, sealing his movement!\
mov %kousoku,1:gosub *status_print
>Luka is being held down by the Centaur!\
skillname ""
gosub *face2
name $name
>Come on... My pussy is just waiting for you...@
>I don't care what you want, you're going to mate with me...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,100
if %earth=0 && %nanido=2 mov %genmogaku,100
if %earth=0 && %nanido=3 mov %genmogaku,100
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
sub %stack,1
return



*centa_a5

add %stack,1
name $name
>Now, it's time to rape you...@
>I'll give you a taste of what a Centaur's pussy is!\
name ""
skillname "Centaur Rape"
dwave 1,"se\ero_pyu2.ogg"
mov $tatie4,"centa_h1"
lsp 700,":a;chara\centa_h1.bmp",0,0
lsp 690,":a;chara\centa_ct01.bmp",0,0:print 10,500
>The Centaur forces Luka into her in a single thrust!
skillcount2 3266
mov %damage_kotei,1
damage 60,75
>Luka is being raped!\
skillname ""
if %mylife=0 sub %stack,1:return *centa_h4
name "Luka"
>Ahhh!\
name ""
>Forced into her hot pussy, Luka's concentration wavers!\
sub %stack,1
goto *centa_a6



*centa_a6

add %stack,1
>Luka is being raped by the Centaur...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Ah, ah, ahh...":mov $sel2,"The Centaur violently shakes her rear!"
if %ransu=2 mov $sel1,"Now, mate with me my little stallion!":mov $sel2,"The Centaur tightens her vagina, squeezing down on Luka's penis!"
if %ransu=3 mov $sel1,"Come...! Give me your semen!":mov $sel2,"The Centaur moves her powerful rear back and forth, forcing Luka in and out!"
if %ransu=4 mov $sel1,"Well...? I feel amazing, don't I?":mov $sel2,"Her incredibly wet vagina lubricates Luka's dick, increasing the sensations!"
if %ransu=5 mov $sel1,"Ah... This dick... Is so good...":mov $sel2,"The Centaur forces her backside into Luka as far as she can, forcing him all the way inside her!"
name $name
eng $sel1:$sel6\
name ""
skillname "Centaur Rape"
dwave 1,"se\ero_chupa4.ogg"
eng $sel2:$sel6
skillcount2 3266
mov %damage_kotei,1
damage 60,75
skillname ""
if %mylife=0 sub %stack,1:return *centa_h5
sub %stack,1
goto *centa_a6



*centa_onedari

mov $list1,"Centaur Kiss"
if %3263>0 mov %list_num1,1
mov $list2,"Centaur Handjob"
if %3264>0 mov %list_num2,1
mov $list3,"Centaur Blowjob"
if %3265>0 mov %list_num3,1
mov $list4,"Centaur Rape"
if %3266>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *centa_onedari1
if %cmd1=12 goto *centa_onedari2
if %cmd1=13 goto *centa_onedari3
if %cmd1=14 goto *centa_onedari4
if %cmd1=-1 goto *centa_main
goto *centa_onedari



*centa_onedari1

gosub *onedari_syori
name $name
>You want me to make you come by kissing you...?@
>That's fine, but after that I'm going to mate with you to my heart's content...\
name ""
gosub *centa_a1
skip -1



*centa_onedari2

gosub *onedari_syori
name $name
>You want to come by a handjob...?@
>That's fine, but after that I'm going to mate with you to my heart's content...\
name ""
gosub *centa_a2
skip -1



*centa_onedari3

gosub *onedari_syori
name $name
>You want to come in my mouth...?@
>That's fine, but after that I'm going to mate with you to my heart's content...\
name ""
gosub *centa_a3
skip -1



*centa_onedari4

gosub *onedari_syori_k
name $name
>It's OK for me to violate you...?@
>Then I'll gladly make you into my stallion!\
name ""
if %kousoku=0 gosub *centa_a4
gosub *centa_a5



*centa_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\centa_bk04.bmp",0,0
gosub *syasei2
>Unable to hold in his excitement any longer, Luka comes as she Centaur kisses him, spraying semen all over her underside.\
mov %viclose,1:gosub *lose
mov %2566,%2566+1:if %2566=1 mov %count_koenemy,%count_koenemy+1
if %2566>%count_most mov %count_most,%2566:mov $count_mostname,$name
count 18,1
mov $bad1,"Luka was forced to come as the Centaur kissed him."
gosub *face2
name $name
>Coming in a place like that... A premature ejaculator?@
>This time, you need to properly mate with me!\
name ""
goto *centa_h



*centa_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\centa_bk05.bmp",0,0
gosub *syasei2
>Was my rough handjob too much for you...?@
>You got it all over my hands... What a waste.\
mov %viclose,1:gosub *lose
mov %2566,%2566+1:if %2566=1 mov %count_koenemy,%count_koenemy+1
if %2566>%count_most mov %count_most,%2566:mov $count_mostname,$name
count 18,1
mov $bad1,"Luka was forced to come by the Centaur's handjob."
gosub *face2
name $name
>Coming in a place like that... A premature ejaculator?@
>This time, you need to properly mate with me!\
name ""
goto *centa_h



*centa_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\centa_bk01.bmp",0,0
gosub *syasei2
>Unable to take her warm mouth any longer, Luka orgasms, shooting semen into her mouth.\
mov %viclose,1:gosub *lose
mov %2566,%2566+1:if %2566=1 mov %count_koenemy,%count_koenemy+1
if %2566>%count_most mov %count_most,%2566:mov $count_mostname,$name
count 18,1
mov $bad1,"Luka was forced to come by the Centaur's blowjob."
gosub *face2
name $name
>Nnn... Coming in my mouth like that so quickly... A premature ejaculator?@
>This time, you need to properly mate with me!\
name ""
goto *centa_h



*centa_h4

mov %ikigoe,3:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\centa_h2.bmp",0,0
lsp 690,":a;chara\centa_ct02.bmp",0,0
gosub *syasei2
>The moment Luka is forced into her hot pussy, he moans and orgasms, overcome by the sudden pleasure.\
mov %viclose,1:gosub *lose
mov %2566,%2566+1:if %2566=1 mov %count_koenemy,%count_koenemy+1
if %2566>%count_most mov %count_most,%2566:mov $count_mostname,$name
count 18,1
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Just from insertion, Luka succumbed to the Centaur."
gosub *face2
name $name
>Nnn... Coming just from insertion...@
>Is a Centaur's pussy too good for you?\
name ""
goto *centa_h



*centa_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\centa_h2.bmp",0,0
lsp 690,":a;chara\centa_ct02.bmp",0,0
gosub *syasei2
>Overcome with pleasure inside her hot pussy, Luka orgasms, shooting his seed inside her waiting body.\
mov %viclose,1:gosub *lose
mov %2566,%2566+1:if %2566=1 mov %count_koenemy,%count_koenemy+1
if %2566>%count_most mov %count_most,%2566:mov $count_mostname,$name
count 18,1
mov $bad1,"Raped by the Centaur, Luka finally comes."
gosub *face2
name $name
>Nnn... You let out quite a lot.@
>You'll be a fine stallion...\
name ""
goto *centa_h



*centa_h

mov $bad2,"Continuing to be raped like that, Luka was forced to become the Centaur's stallion slave."
if %2566=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,2:hseanwave:goto *centa_hb
name "Luka"
>Auuu...\
name ""
>Exhausted, I fall to my knees.@
>As I look up, the Centaur girl has turned around, showing her backside to me.\
name $name
>Look, my pussy... It's all wet and waiting...@
>From now on, you're going to be put to good use here...\
name ""
name "Luka"
>Ah...Ahh...\
name ""
>I can't help but look at the dripping wet opening.\
>With bulging muscles around her powerful backside, the tiny pink opening stands out.\
>A clear liquid is slowly dripping from that waiting pink hole, as a lewd smell starts to fill the air.\
>Her waiting vagina, right in front of my face, is giving off a lot of heat...\
name $name
>Right in there, you're going to be mating with me for a long time...@
>It doesn't matter what you say now, because you're my stallion.\
name ""
>Her dripping hole slowly starts to creep closer toward me.@
>As soon as she starts moving closer, I step back, trying to escape.\
>But I back into a tree, with no escape but right through her.\
name $name
>Now there's no escape...@
>Let's mate.\
name ""
name "Luka"
>Ahhh... S...Stop this...\
name ""
>Ignoring my words, she moves closer in, cornering me as I press myself against the tree.\
>Unable to get away, I can only look on in horror as her powerful backside forces me into her.\
name "Luka"
>Ahhhh!\
name ""
mov %hseanwave,2:hseanwave
cspl 690,699
lsp 700,":a;chara\centa_h1.bmp",0,0:print 10,500
>She continues to push her rear into me, forcing me all the way into her wet pussy.\
lsp 690,":a;chara\centa_ct01.bmp",0,0:print 10,500
>Lubricated by her juices, I easily slip deep into her.@
>Inside her wet and loose vagina, I can feel her powerful muscles flexing and moving.\
>But above all, the unexpected warmth attacks me, causing me to moan out in surprise.\
name $name
>You're inside me now...@
>Well, doesn't it feel amazing?\
name ""
goto *centa_hb



*centa_hb

name "Luka"
>Ah... It's so warm...!\
name ""
>After only a moment, I'm overcome with the pleasure of her warm interior.\
name $name
>A Centaur's pussy may be slightly loose...@> But it feels so warm and pleasurable that it doesn't even matter.\
>Now give up and devote yourself to it, my stallion...\
name ""
name "Luka"
>Th...That... No...\
name ""
>Just before being drowned in the pleasure, I regain my senses right before I was about to ejaculate again.\
>I can't let this happen...!\
name $name
>Now, you need to work hard to give me your semen, my stallion.\
name ""
name "Luka"
>Ahhhh...\
name ""
>Her warmth continues to envelope me, bringing my desire for release to control more and more of my mind.\
>Trying to fight off the instinct to seek more pleasure, I try to hold on.\
>But even then, I'm almost about to orgasm again...@
>I can't give in... If I do, I'll never be able to go back!\
name $name
>What, you haven't come yet...?@
>If you just embrace it, you'll feel amazing you know?\
name ""
name "Luka"
>N...No...\
name ""
>I try to stay as still as possible.@
>Wrapped inside her warm insides so close to an orgasm, it feels like even the slightest stimulation would force me over the edge.\
name $name
>Just give in and come.@
>Once you do, you'll be able to mate with me as much as you want...\
name ""
>The Centaur whispers that into my ear, inviting me towards the forbidden pleasure.@
>Wrapped in her warmth, it almost feels like heaven...\
name "Luka"
>Ahh... Ahhhh!\
name ""
>Unable to take it anymore, I feel the inevitable orgasm rising through me.@
>Half in horror, half in relief, I yell out as I feel myself giving in to her hot vagina.\
name "Luka"
>Ah... No... I'm coming!@
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\centa_h2.bmp",0,0
lsp 690,":a;chara\centa_ct02.bmp",0,0
gosub *syasei2
>Finally giving in, I shoot my semen into her warm, waiting pussy.@
>Still inside of her, her heat increases the pleasure right after my orgasm.\
lsp 690,":a;chara\centa_ct03.bmp",0,0:print 10,500
name "Luka"
>Ahhh...\
name ""
name $name
>Hehe, you came.@
>How did it feel?@> Your first time mating with a Centaur.\
name ""
>I broke the taboo...@
>Both guilt and a sense of twisted perversion at the pleasure that came with it mix around in my head.\
name $name
>What's with that exhausted look?@
>You're far from over... Mating with a Centaur doesn't end like that!\
name ""
name "Luka"
>Eh...?@
>Ahhh!\
name ""
mov %hseanwave,7:hseanwave
>The Centaur suddenly starts to violently move her backside.@
>Stuck between her powerful rear and the tree, I can't do anything but be used by her.\
name $name
>Hahaha!@
>Well? About to come again!?\
name ""
name "Luka"
>Ah! Ahhh!\
name ""
>At the mercy of the reckless Centaur, I'm forced in and out of her wet hole.@
>Exhausted, my small body is tossed up and down and side to side as her powerful form controls everything.\
name "Luka"
>S...Stop!@
>Ahhhh!\
name ""
>Her wet pussy lubricates me, allowing the intense movements to cause unbearable pleasure instead of pain.@
>Controlled by her body, and slowly being intoxicated by her smell, I feel myself already nearing another orgasm.\
name "Luka"
>Ahhh!@>Ahhhhhhh!\
name ""
gosub *syasei1:gosub *syasei2
>With a cry, I ejaculate inside of her again.@
>But too focused on wanting more, the Centaur continues to violently toss me around.\
name $name
>Good!@>Keep going, just like that!@
>We're not stopping until I'm completely satisfied!\
name ""
name "Luka"
>Ahhhh!@
>Stop! Stop it already!\
name ""
>With my begging completely ignored, she continues to thrash around.@
>My semen only acts as an additional lubricant, letting her move around even faster than before.\
>Left gasping for breath, it's a completely one-sided affair as her crazed desire only gets stronger.\
name $name
>More, more! I want more!@
>Give me everything, like a good stallion!\
name ""
name "Luka"
>St...St... Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>Despite the multiple orgasms already, her unrelenting piston movements force me toward another climax.\
name $name
>Good, come!@
>More, more!\
name ""
name "Luka"
>Stop!@>Someone, help!@
>Ahhhh!\
name ""
gosub *syasei1:gosub *syasei2
>After repeated ejaculations, I feel myself on the verge of fainting.@
>With both my mind and body pushed to the limit, I can barely even move.\
name "Luka"
>Ahhh...\
name ""
gosub *syasei1:gosub *syasei2
>With one final orgasm, I feel myself finally drifting into the release of sleep.@
>But right before that, I hear her whisper one final thing into my ear.\
gosub *anten
mov %hseanwave,0:hseanwave
name $name
>Already fainting, how sad...@
>But that's fine, because you're now my stallion.\
>Until you're crushed, I'll be raping you nonstop...\
name ""
>She picks me up and places me on her back, taking me off somewhere.@
>Nothing awaits me now except for an existence as her breeding stallion slave...\
>..........\
goto *badend



*kaeru_start

mov $name,"Frog Girls"
mov $name2,"Frog Girl A"
mov $lavel,"kaeru"
mov $tatie1,"kaerua_st01"
mov $tatie2,"kaerua_st02"
mov $tatie3,"kaerua_st03"
mov $tatie4,"kaerua_st02"
mov $haikei,"bg079"
mov %monster_x,0
mov %monster_y,50
mov $tatie1b,"kaerub_st01"
mov $tatie2b,"kaerub_st02"
mov $tatie3b,"kaerub_st03"
mov %monster_xb,360
mov %monster_yb,50
if %nanido=1 mov %max_enemylife,2600
if %nanido=2 mov %max_enemylife,2800
if %nanido=3 mov %max_enemylife,3000
if %nanido=1 mov %henkahp1,1000
if %nanido=2 mov %henkahp1,1000
if %nanido=3 mov %henkahp1,1000
if %nanido=0 mov %max_enemylife,2
if %nanido=0 mov %henkahp1,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,1
mov %tikei,2
gosub *maxmp:mov %mp,%max_mp
mov %tekikazu,2
gosub *syutugen_plural
mov %end_n,2
mov %zmonster_x,-120
mov %tukix,150
mov %tekikazu,2
mov %owaza_count1a,4
name "Frog Girl A"
>Ahaha, it's a human! \
name ""
name "Frog Girl B"
>A source of delicious semen...@> We just need to play with his thing to be fed.\
name ""
>The two of their slimy bodies crawl out of the river, rushing over to attack me.@
>No... It isn't just two.\
>Inside the river, it seems like there are a lot more...\
name "Luka"
>I don't want to fight, but if you attack me, you'll leave me no choice!\
name ""
>I pull out my sword in front of the Frog Girls, ready to defend myself.\
goto *common_main



*kaeru_v

gosub *face3
name "Frog Girl A"
>Kyaa!@>What's happening!?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Frog Girl A turns into a small frog!\
name "Frog Girl B"
>Ahh! H...Help me!\
name ""
dwave 1,"se\escape.ogg"
csp 702:print 10,500
>Frog Girl B ran away!\
mov %viclose,1:gosub *victory_plural
mov %getexp,5000:gosub *lvup
mov %2267,1
goto *sean0162



*kaeru_kousan

gosub *kousan_syori
name ""
>Luka succumbs to temptation, and stops his resistance!\
gosub *face2
name "Frog Girl A"
>Already giving up?@
>How pathetic! Ahaha! \
name ""
name "Frog Girl B"
>Then we'll get to play with you a lot...\
name ""
goto *kaeru_a



*kaeru_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *kaeru_mogaku1
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *kaeru_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *kaeru_earth2
if %cmd1=12 && %genmogaku>0 goto *kaeru_mogaku1
if %cmd1=12 && %genmogaku=0 goto *kaeru_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *kaeru_kousan
if %cmd1=16 goto *kaeru_onedari
if %cmd1=17 goto *common_skill
goto *kaeru_main



*kaeru_mogaku1

mov %before_action,7
rnd2 %ransu,1,3
if %cmd1=11 && %ransu=1 mov $sel1,"Urhg...!"
if %cmd1=11 && %ransu=2 mov $sel1,"Guh... Damn it!"
if %cmd1=11 && %ransu=3 mov $sel1,"Stop!"
if %cmd1=12 && %ransu=1 mov $sel1,"Uhhg...!"
if %cmd1=12 && %ransu=2 mov $sel1,"L...Let go!"
if %cmd1=12 && %ransu=3 mov $sel1,"Guh... Stop it!"
name "Luka"
eng $sel1:$sel6\
name ""
if %cmd1=11 mov $sel1,"Luka attacks!"
if %cmd1=11 gosub *mp_kaihuku:gosub *mp
if %cmd1=12 mov $sel1,"Luka struggles with all his strength!"
if %cmd1=12 mov %genmogaku,%genmogaku-1:if %genmogaku<0 mov %genmogaku,0
eng $sel1:$sel6
if %cmd1=11 mov $sel1,"But still bound, Luka can't move!"
if %cmd1=12 mov $sel1,"But Luka can't escape from their grasp!"
eng $sel1:$sel6\
rnd2 %ransu,1,5
if %ransu=1 mov $sel1,"Ahaha, we'll never let go. ":mov $sel2,"We'll keep using our tongues to play with you..."
if %ransu=2 mov $sel1,"Useless! ":mov $sel2,"You won't escape..."
if %ransu=3 mov $sel1,"Ahaha, weeaaak! ":mov $sel2,"Such feeble resistance, hehe."
if %ransu=4 mov $sel1,"What are you doing? Aren't you embarrassed?":mov $sel2,"Just drown in the pleasure..."
if %ransu=5 mov $sel1,"What wasted effort. ":mov $sel2,"You'll be too weak to resist soon..."
name "Frog Girl A"
eng $sel1:$sel6\
name ""
name "Frog Girl B"
eng $sel2:$sel6\
name ""
goto *kaeru_a



*kaeru_mogaku2

mov %before_action,8
if %nanido=2 rnd2 %ransu,1,10:if %ransu=5 goto *kaeru_mogaku1
if %nanido=3 rnd2 %ransu,1,2:if %ransu=2 goto *kaeru_mogaku1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Uwaaa!"
if %ransu=2 mov $sel1,"Damn you!"
if %ransu=3 mov $sel1,"Get off!"
name "Luka"
eng $sel1:$sel6\
name ""
csp 699
dwave 1,"se\dassyutu.ogg"
mov %kousoku,0:gosub *status_print
gosub *face3
>Luka struggles with all his might, and breaks free!\
name "Frog Girl A"
>Arara, he fled.\
name ""
name "Frog Girl B"
>You didn't like our tongues?\
name ""
gosub *face1
mov %owaza_count1a,0
goto *common_main



*kaeru_earth1

mov %before_action,7
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Guuh!"
if %ransu=2 mov $sel1,"G...Get off!"
if %ransu=3 mov $sel1,"Damn you!"
name "Luka"
eng $sel1:$sel6\
name ""
dwave 1,"se\power.ogg"
>Filled with the power of earth, Luka summons incredible strength!\
mov %genmogaku,%genmogaku-1:if %genmogaku<0 mov %genmogaku,0
if %genmogaku<0 mov %genmogaku,0
>But he can't break from their grasp!\
rnd2 %ransu,1,5
if %ransu=1 mov $sel1,"Ahaha, we'll never let go. ":mov $sel2,"We'll keep using our tongues to play with you..."
if %ransu=2 mov $sel1,"Useless! ":mov $sel2,"You won't escape..."
if %ransu=3 mov $sel1,"Ahaha, weeaaak! ":mov $sel2,"Such feeble resistance, hehe."
if %ransu=4 mov $sel1,"What are you doing? Aren't you embarrassed?":mov $sel2,"Just drown in the pleasure..."
if %ransu=5 mov $sel1,"What wasted effort. ":mov $sel2,"You'll be too weak to resist soon..."
name "Frog Girl A"
eng $sel1:$sel6\
name ""
name "Frog Girl B"
eng $sel2:$sel6\
name ""
goto *kaeru_a



*kaeru_earth2

mov %before_action,8
if %nanido=3 rnd2 %ransu,1,2:if %ransu=2 goto *kaeru_earth1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"With this strength..."
if %ransu=2 mov $sel1,"With Gnome's power...!"
if %ransu=3 mov $sel1,"With the power of the earth...!"
name "Luka"
eng $sel1:$sel6\
name ""
dwave 1,"se\power.ogg"
>Filled with the power of earth, Luka summons incredible strength!\
csp 699
dwave 1,"se\dassyutu.ogg"
mov %kousoku,0:gosub *status_print
gosub *face3
>Luka struggles with all his might, and breaks free of their grasp!\
name "Frog Girl A"
>What's with that strength!?\
name ""
name "Frog Girl B"
>Was that some kind of strange magic...?\
name ""
gosub *face1
mov %owaza_count1a,0
goto *common_main



*kaeru_a

if %enemylife<%henkahp1 goto *kaeru_v
if %kousoku=1 rnd2 %ransu,1,4
if %kousoku=1 && %ransu=1 gosub *kaeru_a5:gosub *kaeru_a5:goto *common_main
if %kousoku=1 && %ransu=2 gosub *kaeru_a5:gosub *kaeru_a6:goto *common_main
if %kousoku=1 && %ransu=3 gosub *kaeru_a6:gosub *kaeru_a5:goto *common_main
if %kousoku=1 && %ransu=4 gosub *kaeru_a6:gosub *kaeru_a6:goto *common_main
rnd2 %ransu,1,5
if %ransu=1 gosub *kaeru_a1:goto *common_main
if %ransu=2 gosub *kaeru_a2:goto *common_main
if %ransu=3 gosub *kaeru_a3:goto *common_main
if %ransu>3 && %owaza_count1a>5 gosub *kaeru_a4:goto *common_main
skip -5



*kaeru_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll give you a treat with my webbed hands. ":mov $sel2,"Don't try to endure it, just feed us..."
if %ransu=2 mov $sel1,"I'll give some service for my food. ":mov $sel2,"Do you like our slimy palms?"
if %ransu=3 mov $sel1,"I'll play with you a lot, so make sure you give us a lot. ":mov $sel2,"It's fine if you want to give up..."
name "Frog Girl A"
eng $sel1:$sel6\
name ""
name "Frog Girl B"
eng $sel2:$sel6\
name ""
skillname "Frog Handjob"
>The Frog Girls reach out toward Luka's penis!
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,25
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes them away!":gosub *wind_guard:sub %stack,1:return
>Their slimy, webbed hands rub all over Luka's penis!\
skillcount2 3267
mov %damage_nobr,1
dwave 1,"se\ero_koki1.ogg"
if %nanido<2 damage 15,20
if %nanido=2 damage 20,25
if %nanido=3 damage 25,30
dwave 1,"se\ero_koki1.ogg"
if %nanido<2 damage 15,20
if %nanido=2 damage 20,25
if %nanido=3 damage 25,30
skillname ""
if %mylife=0 sub %stack,1:return *kaeru_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *kaeru_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *kaeru_s2
sub %stack,1
return



*kaeru_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My webbed feet are nice and soft. ":mov $sel2,"Our feet are nice and slimy..."
if %ransu=2 mov $sel1,"How do webbed feet feel? ":mov $sel2,"Our legs are really nimble..."
if %ransu=3 mov $sel1,"If you give yourself to us, all of us Frog Girls can step on you like this... ":mov $sel2,"Cover our slimy legs with your slimy semen..."
name "Frog Girl A"
eng $sel1:$sel6\
name ""
name "Frog Girl B"
eng $sel2:$sel6\
name ""
skillname "Frog Footjob"
>The Frog Girl's nimble feet stretch out toward Luka!
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,25
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes them away!":gosub *wind_guard:sub %stack,1:return
>They step on Luka's penis with their slimy webbed feet!\
skillcount2 3268
mov %damage_nobr,1
dwave 1,"se\ero_koki1.ogg"
if %nanido<2 damage 16,22
if %nanido=2 damage 21,27
if %nanido=3 damage 26,32
dwave 1,"se\ero_koki1.ogg"
if %nanido<2 damage 16,22
if %nanido=2 damage 21,27
if %nanido=3 damage 26,32
skillname ""
if %mylife=0 sub %stack,1:return *kaeru_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *kaeru_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *kaeru_s2
sub %stack,1
return



*kaeru_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Our breasts are nice and slimy. ":mov $sel2,"Your dick will get all slimy, too..."
if %ransu=2 mov $sel1,"Here, let us crush your dick... ":mov $sel2,"We'll crush it, hehe."
if %ransu=3 mov $sel1,"Our squishy breasts feel good, don't they? ":mov $sel2,"Cover my breasts in semen..."
name "Frog Girl A"
eng $sel1:$sel6\
name ""
name "Frog Girl B"
eng $sel2:$sel6\
name ""
skillname "Frog Tit Fuck"
>The two Frog Girls sandwich Luka's penis between them!
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,25
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes them away!":gosub *wind_guard:sub %stack,1:return
>Their soft, slimy breasts come together and put pressure on Luka's penis!\
skillcount2 3269
mov %damage_nobr,1
dwave 1,"se\ero_koki1.ogg"
if %nanido<2 damage 18,23
if %nanido=2 damage 23,28
if %nanido=3 damage 28,33
dwave 1,"se\ero_koki1.ogg"
if %nanido<2 damage 18,23
if %nanido=2 damage 23,28
if %nanido=3 damage 28,33
skillname ""
if %mylife=0 sub %stack,1:return *kaeru_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *kaeru_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *kaeru_s2
sub %stack,1
return



*kaeru_a4

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name "Frog Girl A"
>Aha, caught you. \
name ""
skillname "Group Binding"
eng "Frog Girl A grabs hold of Luka's right arm, and Frog Girl B grabs hold of Luka's left arm!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,25
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes them off!":gosub *wind_guard:sub %stack,1:return
\
>With both arms bound, Luka can't move!\
lsp 699,":c;chara\kaeru_ha1.bmp",0,0
mov %kousoku,1:gosub *status_print
>The Frog Girls are holding Luka down!\
skillname ""
if %kousan=2 sub %stack,1:return
if %first_sel1=1 skip 6
name "Luka"
>Guh...!\
name ""
>With both of them holding me down, this is difficult...@
>But I think I can still shake them off!\
name "Frog Girl B"
if %first_sel1=1 skip 4
>Hehe... We'll play with you now.@
>Our long tongues can still reach you like this...\
skip 3
>This time you won't get free.@
>This tongue will finish you off...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,2
if %earth=0 && %nanido=2 mov %genmogaku,3
if %earth=0 && %nanido=3 mov %genmogaku,4
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
sub %stack,1
return



*kaeru_a5

add %stack,1
>The two Frog Girls are holding Luka down...\
skillcount2 3270
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"It's time for some tongue. ":mov $sel2,"Are you happy when we lick your body?":mov $sel3,"Luka's licked all over his body!"
if %ransu=2 mov $sel1,"Does it feel good here...?":mov $sel2,"I'll try here, too...":mov $sel3,"Their tongues wrap around Luka's nipples!"
if %ransu=3 mov $sel1,"Our tongues can reach everywhere... ":mov $sel2,"I'll wrap my tongue around this part...":mov $sel3,"The Frog Girl's tongues wind around Luka's body, licking him all over!"
if %ransu=4 mov $sel1,"Hehe, we can make you slimy everywhere. ":mov $sel2,"We'll smear our drool on you...":mov $sel3,"Their slimy tongues lick Luka all over!"
if %ransu=5 mov $sel1,"I wonder how you taste here...?":mov $sel2,"We'll take our time in tasting you...":mov $sel3,"The Frog Girl's tongues taste every inch of Luka's body!"
name "Frog Girl A"
eng $sel1:$sel6\
name ""
name "Frog Girl B"
eng $sel2:$sel6\
name ""
skillname "Full-Body Licking Attack"
lsp 699,":c;chara\kaeru_ha1.bmp",0,0:print 10,500
>The Frog Girl's long tongues crawl all over Luka's body!
eng $sel3:$sel6\
mov %damage_nobr,1
dwave 1,"se\ero_makituki1.ogg"
if %nanido<2 damage 10,14
if %nanido=2 damage 10,14
if %nanido=3 damage 16,20
mov %damage_nobr,1
dwave 1,"se\ero_makituki1.ogg"
if %nanido<2 damage 10,14
if %nanido=2 damage 10,14
if %nanido=3 damage 16,20
dwave 1,"se\ero_makituki1.ogg"
if %nanido<2 damage 10,14
if %nanido=2 damage 10,14
if %nanido=3 damage 16,20
skillname ""
if %mylife=0 sub %stack,1:return *kaeru_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *kaeru_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *kaeru_s2
sub %stack,1
return



*kaeru_a6

add %stack,1
>The two Frog Girls are holding Luka down...\
skillcount2 3271
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Here, we'll even tease your penis. ":mov $sel2,"I'll wrap my tongue around it, so let it out...":mov $sel3,"The Frog Girl's tongues wind around Luka's penis!"
if %ransu=2 mov $sel1,"If we do this, are you going to leak?":mov $sel2,"At this rate, I'll get a taste in no time...":mov $sel3,"The Frog Girl's tongues wrap around Luka's penis, and start to vibrate!"
if %ransu=3 mov $sel1,"I'll lick the tip nice and carefully. ":mov $sel2,"This licking will leave you in agony...":mov $sel3,"The multiple tongues lick up and down Luka's penis!"
if %ransu=4 mov $sel1,"Hehe... Your penis is delicious. ":mov $sel2,"Give me a good taste...":mov $sel3,"While one tongue licks the tip of Luka's penis, the other massages his back muscle!"
if %ransu=5 mov $sel1,"We'll soak your penis in our drool. ":mov $sel2,"Our slimy tongues feel good, don't they?":mov $sel3,"The Frog Girl's tongues lick Luka's penis up and down, covering it in saliva!"
name "Frog Girl A"
eng $sel1:$sel6\
name ""
name "Frog Girl B"
eng $sel2:$sel6\
name ""
skillname "Groin Licking Attack"
lsp 699,":c;chara\kaeru_ha4.bmp",0,0:print 10,500
>The Frog Girl's tongues shoot out toward Luka's groin!
eng $sel3:$sel6\
mov %damage_nobr,1
dwave 1,"se\ero_makituki2.ogg"
if %nanido<2 damage 12,15
if %nanido=2 damage 12,15
if %nanido=3 damage 18,21
mov %damage_nobr,1
dwave 1,"se\ero_makituki2.ogg"
if %nanido<2 damage 12,15
if %nanido=2 damage 12,15
if %nanido=3 damage 18,21
dwave 1,"se\ero_makituki2.ogg"
if %nanido<2 damage 12,15
if %nanido=2 damage 12,15
if %nanido=3 damage 18,21
skillname ""
if %mylife=0 sub %stack,1:return *kaeru_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *kaeru_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *kaeru_s2
sub %stack,1
return



*kaeru_s1

add %stack,1
if %max_mylife>%mylife*5 mov %sel_hphalf,1:gosub *kaeru_s2:sub %stack,1:return
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Guh..."
if %ransu=2 mov $sel1,"Uhh..."
if %ransu=3 mov $sel1,"Urhg..."
name "Luka"
eng $sel1:$sel6\
name ""
gosub *face2
name "Frog Girl A"
>Aha, it's good isn't it? \
name ""
name "Frog Girl B"
>It's fine to give up and come...\
name ""
gosub *face1
mov %sel_hphalf,1
sub %stack,1
return



*kaeru_s2

add %stack,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ahh..."
if %ransu=2 mov $sel1,"Ahhhh..."
if %ransu=3 mov $sel1,"Haa..."
name "Luka"
eng $sel1:$sel6\
name ""
gosub *face2
name "Frog Girl A"
>You can't stand it anymore, can you?\
name ""
name "Frog Girl B"
>Come on, give up and feed us...\
name ""
mov %sel_kiki,1
sub %stack,1
return



*kaeru_onedari

mov $list1,"Frog Handjob"
if %3267>0 mov %list_num1,1
mov $list2,"Frog Footjob"
if %3268>0 mov %list_num2,1
mov $list3,"Frog Tit Fuck"
if %3269>0 mov %list_num3,1
mov $list4,"Full-Body Licking Attack"
if %3270>0 mov %list_num4,1
mov $list5,"Groin Licking Attack"
if %3271>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *kaeru_onedari1
if %cmd1=12 goto *kaeru_onedari2
if %cmd1=13 goto *kaeru_onedari3
if %cmd1=14 goto *kaeru_onedari4
if %cmd1=15 goto *kaeru_onedari5
if %cmd1=-1 goto *kaeru_main
goto *kaeru_onedari



*kaeru_onedari1

gosub *onedari_syori
name "Frog Girl A"
>With these webbed hands, you want us to make you come?\
name ""
name "Frog Girl B"
>So that's how you like it... Hehe.\
name ""
gosub *kaeru_a1
skip -1



*kaeru_onedari2

gosub *onedari_syori
name "Frog Girl A"
>You want to be teased by our webbed feet?\
name ""
name "Frog Girl B"
>So that's how you like it... Hehe.\
name ""
gosub *kaeru_a2
skip -1



*kaeru_onedari3

gosub *onedari_syori
name "Frog Girl A"
>You want to be crushed between our slimy breasts?\
name ""
name "Frog Girl B"
>So that's how you like it... Hehe.\
name ""
gosub *kaeru_a3
skip -1



*kaeru_onedari4

gosub *onedari_syori_k
name "Frog Girl A"
>You want our slimy tongues all over your body...?\
name ""
name "Frog Girl B"
>So that's how you like it... Hehe.\
name ""
if %kousoku=0 gosub *kaeru_a4
gosub *kaeru_a5
skip -1



*kaeru_onedari5

gosub *onedari_syori_k
name "Frog Girl A"
>You want our long tongues to play with your penis...?\
name ""
name "Frog Girl B"
>So that's how you like it... Hehe.\
name ""
if %kousoku=0 gosub *kaeru_a4
gosub *kaeru_a6
skip -1



*kaeru_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\kaerua_bk03.bmp",0,50
lsp 701,":a;chara\kaerub_bk03.bmp",360,50
gosub *syasei2
>Unable to take the pleasure of their strange webbed hands any longer, Luka finally comes.\
mov %viclose,1:gosub *lose
mov %2567,%2567+1:if %2567=1 mov %count_koenemy,%count_koenemy+1
if %2567>%count_most mov %count_most,%2567:mov $count_mostname,$name
count 5,1
mov $bad1,"Luka was forced to come by the Frog Girl's handjob."
gosub *face2
name "Frog Girl A"
>Ahaha, he came. \
name ""
name "Frog Girl B"
>Our hands are all covered in semen... Hehe.\
name ""
goto *kaeru_hb



*kaeru_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\kaerua_bk04.bmp",0,50
lsp 701,":a;chara\kaerub_bk04.bmp",360,50
gosub *syasei2
>Unable to take the pleasure of their strange webbed feet any longer, Luka finally comes.\
mov %viclose,1:gosub *lose
mov %2567,%2567+1:if %2567=1 mov %count_koenemy,%count_koenemy+1
if %2567>%count_most mov %count_most,%2567:mov $count_mostname,$name
count 6,1
mov $bad1,"Luka was forced to come by the Frog Girl's footjob."
gosub *face2
name "Frog Girl A"
>Ahaha, he came. \
name ""
name "Frog Girl B"
>Our feet are all covered in semen... Hehe.\
name ""
goto *kaeru_hb



*kaeru_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\kaerua_bk02.bmp",0,50
lsp 701,":a;chara\kaerub_bk02.bmp",360,50
gosub *syasei2
>Unable to take the pleasure of their soft, slimy breasts any longer, Luka finally comes.\
mov %viclose,1:gosub *lose
mov %2567,%2567+1:if %2567=1 mov %count_koenemy,%count_koenemy+1
if %2567>%count_most mov %count_most,%2567:mov $count_mostname,$name
count 7,1
mov $bad1,"Luka was forced to come by the Frog Girl's tit fuck."
gosub *face2
name "Frog Girl A"
>Ahaha, he came. \
name ""
name "Frog Girl B"
>Our breasts are all covered in semen... Hehe.\
name ""
goto *kaeru_hb



*kaeru_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 699,":c;chara\kaeru_ha2.bmp",0,0
gosub *syasei2
>With their slimy, long tongues running all over his body, Luka finally orgasms from the constant stimulation all over his body.\
mov %viclose,1:gosub *lose
mov %2567,%2567+1:if %2567=1 mov %count_koenemy,%count_koenemy+1
if %2567>%count_most mov %count_most,%2567:mov $count_mostname,$name
count 28,7
mov $bad1,"With the Frog Girl's tongues licking Luka all over, he finally orgasms."
gosub *face2
name "Frog Girl A"
>Ahaha, he came. \
name ""
name "Frog Girl B"
>Our tongues felt so good that you couldn't control yourself?\
name ""
goto *kaeru_ha



*kaeru_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 699,":c;chara\kaeru_ha5.bmp",0,0
gosub *syasei2
>With the Frog Girl's tongues licking every inch of his penis, Luka finally gives in to the rising orgasm.\
mov %viclose,1:gosub *lose
mov %2567,%2567+1:if %2567=1 mov %count_koenemy,%count_koenemy+1
if %2567>%count_most mov %count_most,%2567:mov $count_mostname,$name
count 4,7
mov $bad1,"With the Frog Girl's tongues licking Luka's penis, he finally orgasms."
gosub *face2
name "Frog Girl A"
>Ahaha, he came. @
>Our tongues are all covered in semen. \
name ""
name "Frog Girl B"
>Our tongues feel really good, don't they?\
name ""
goto *kaeru_ha



*kaeru_ha

mov $bad2,"Caught by a swarm of Frog Girls, Luka was forced into being their semen slave."
if %2820=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2820,1
name "Luka"
>Ahhh...\
name ""
>weakened after my orgasm, I feel my strength start to fade.\
cspl 690,699
lsp 700,":c;chara\kaeru_ha1.bmp",0,0:print 10,500
>Their long tongues run all over my body like snakes, until reaching my groin.\
>With saliva dripping off their long tongues, they turn toward my erect penis.\
name "Luka"
>D...Don't... Stop...\
name ""
name "Frog Girl A"
>No way! @> I love your taste... I don't think I'll ever get tired of licking you. \
name ""
name "Frog Girl B"
>We can hold you down while we play with you with our tongues, so writhe around as much as you want.\
name ""
mov %hseanvoice,1:hseanvoice
lsp 700,":c;chara\kaeru_ha3.bmp",0,0:print 10,500
>Multiple tongues wrap around my penis, slowly coiling until the tips of their tongues reach the tip of my penis.\
name "Luka"
>Ah... Ahhh...\
name ""
>The combination of their rough tongues with their slimy saliva makes me moan out in surprise at the sudden stimulation.\
>Their pink tongues coil and wrap around my penis, as if trying to hide away the spoils of their victory from the world...\
name "Luka"
>S...Stop it... Let me go...\
name ""
name "Frog Girl A"
>Ahaha, we won't let you go. @
>We haven't even started the licking yet! \
name ""
name "Frog Girl C"
>Your penis tastes really good... \
name ""
>Another Frog Girl's long tongue begins to coil around the base of my penis.@
lsp 700,":c;chara\kaeru_ha4.bmp",0,0:print 10,500
>Every visible part of my penis is suddenly covered in multiple tongues!\
name "Luka"
>Ahhhh!!\
name ""
>The multiple tongues all move in random directions, each trying to beat the other for control.@
>The random, powerful stimulation coming from every direction is too much to take.\
name "Luka"
>Ahh...\
name ""
>I bite my lips as I can do nothing but feel what's happening under the pile of long tongues.@
>With a small jump, I let out a sharp cry when I feel the tip of one of their tongues poking my urethral opening.\
name "Frog Girl A"
>Ehehe... Your penis now belongs to our tongues.\
name ""
name "Frog Girl B"
>We'll play with it a lot, so make sure you give us lots of delicious food...\
name ""
>Their slimy tongues begin to tighten around me.@
>With each increased constriction, the tongue poking me in the urethra continues to circle around the opening, adding to the unbearable stimulation.\
name "Luka"
>Ahh! Ahhhh!\
name ""
name "Frog Girl A"
>Hahaha, look at him writhing around. @
>He's so happy that his penis was caught by our tongues, he doesn't know what to do with himself. \
name ""
name "Frog Girl B"
>Let's make it tighter, so he can give us more semen...\
name ""
>Completely entombed in their pink tongues, their brutal attack continues on my penis.\
>The tight pressure being applied by the slimy tongues, with the rough texture as they move and lick every inch causes my back to arch as I moan.\
name "Luka"
>Ahh! Haaaa!!\
name ""
name "Frog Girl C"
>Ahaha, he looks so happy. @
>How pathetic! \
name ""
>With my dick completely at the mercy of their tongues, the Frog Girls start to insult and ridicule me.\
>I can already feel myself nearing an orgasm, but I can't bring myself to admit to such a humiliating defeat.@
>I clench my teeth and bite my lip, trying to do everything in my power to reject the pleasure being forced into me.\
name "Frog Girl A"
>Aha, he's trying to hold on!@
>How cute... But it won't work. \
name ""
name "Frog Girl B"
>Lick him more...@
>There's no escaping the pitiful result of your feeble endurance...\
name ""
>Wrapped in the slimy coil of pleasure, my resistance is being quickly chipped away.\
>The pleasure too powerful to resist any longer, my body overpowers my mind in desiring release.\
name "Luka"
>Ahh... I'm going to come...!@
>Ahhhh!\
name ""
gosub *syasei1
lsp 700,":c;chara\kaeru_ha5.bmp",0,0
gosub *syasei2
>Wrapped in the tower of tongues, I let out a powerful orgasm, as my semen sprays all over their coiled tongues.\
name "Frog Girl A"
>Aha, he came! @
>He tried so hard, but let out so much anyway! \
name ""
name "Frog Girl B"
>It's time for a feast...\
name ""
mov %hseanvoice,2:hseanvoice
lsp 700,":c;chara\kaeru_ha6.bmp",0,0:print 10,500
>The Frog Girl's tongues run all over me, fighting each other to get a taste of the semen I just let out.\
>Their rough tongues both rub against me and each other, as if in a competition to see who can get the most.\
name "Luka"
>Ah... Ahhh!@
>Ahhhhhh!!\
name ""
>Because of that, the stimulation seemingly doubles as they all rub me with almost crazed desire.\
>One of their tongues pokes at my urethral opening, lapping up the last of the semen that didn't manage to get shot out.\
name "Luka"
>Ahh! D...Don't lick the tip like that...!\
name ""
name "Frog Girl A"
>But the tip is where the delicious semen comes from... \
name ""
name "Frog Girl B"
>Until we can't taste even a hint of it left, we won't stop licking.\
name ""
name "Luka"
>Ahhhhh!\
name ""
>I writhe around pathetically on the ground as I'm stuck in their hell of frenzied tongues.\
name "Frog Girl A"
>Don't leave a single spot open on him. \
name ""
name "Frog Girl C"
>This human's sperm is really, really delicious. \
name ""
name "Luka"
>Ahhh!@>Ahhhh!!\
name ""
>Right as it seems as though they got the last taste of semen, I recoil in horror as I feel another orgasm rising through me.\
>I feebly try to hold on to stop the feeding frenzy again, but it's useless.\
gosub *syasei1
lsp 700,":c;chara\kaeru_ha7.bmp",0,0:print 10,500
gosub *syasei2
>As soon as I come again, the tongue frenzy begins anew.@
>Even while ejaculating, their tongues rub, lick, and squeeze my sensitive penis without mercy.\
name "Frog Girl A"
>Aha, he came again. \
name ""
name "Frog Girl B"
>Giving us another feast so quickly, what a thoughtful human...\
name ""
>The Frog Girls all move in closer, eager to get another taste.@
>Stuck in a hell of pleasure, there's no reprieve from their slimy tongues.\
name "Luka"
>Ahhh! Ahhh!!\
name ""
>Captured by the Frog Girl's tongues, I writhe around on the ground trying to get away.@
>But no matter what I do, their long, agile tongues never lose their grip on my penis.\
name "Frog Girl A"
>More... Come more. \
name ""
name "Frog Girl B"
>We'll keep playing with you, so you just keep feeding us.\
name ""
name "Luka"
>Ahhh!@>Stop already...!\
>Ahhhhh!!\
name ""
gosub *syasei1:gosub *syasei2
>As if my body was obeying her commands, I orgasm again, shooting off more semen while my body writhes in pleasure.\
name "Frog Girl A"
>Aha, he did it again. @
>I'll be able to get a good taste... \
name ""
name "Frog Girl B"
>Just drown yourself in our tongues...\
name ""
name "Frog Girl C"
>Hey, come on. I'll lick you even more, so give me more!\
name ""
name "Luka"
>Ahh!\
name ""
gosub *syasei1:gosub *syasei2
>While writhing helplessly, more and more Frog Girls show up, eager to force me toward another ejaculation so they can get a taste...\
gosub *anten
mov %hseanvoice,0:hseanvoice
>Thus, I was caught by a swarm of Frog Girls.@
>Kept as a domestic animal, my only purpose is to feed them.\
>With no chance to escape from the swarm, I had to accept my new life.@
>My adventure ends here...\
>..............
goto *badend



*kaeru_hb

mov $bad2,"Caught by the swarm of Frog Girls, Luka was kept as a breeding slave."
if %2821=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2821,1
name "Luka"
>Ahh...\
name ""
>Weakened after my orgasm, I feel my body go limp.@
cspl 690,699
lsp 700,":c;chara\kaeru_hb0.bmp",0,0:print 10,500
>As soon as I fall to the ground, a Frog Girl clings to me!\
name "Frog Girl A"
>Now, let's mate. \
name ""
name "Frog Girl B"
>We've been waiting for this for a while, hehe.\
name ""
>The two Frog Girls sandwich me between them, rubbing their slimy skin directly on my own.@
>That strange feeling alone causes me to gasp out loud.\
name "Luka"
>Ahh...\
name ""
name "Frog Girl A"
>Hahaha, something like this was enough to make you moan like that?\
name ""
name "Frog Girl B"
>Our slimy skin feels good on the outside, but it feels incredible inside...\
name ""
>The Frog Girl clinging to my front parts her legs, revealing something that looks similar to a human female's vagina.\
>But the texture is completely different...@> Drips of mucus are coming out of the opening, and the pink inside looks puffy and moist.\
>Just the thought of being inserted into that dripping hole causes a shiver to run through my body.\
name "Luka"
>S...Stop it...\
name ""
name "Frog Girl A"
>You can't say "No" before we've even done anything.@
>It feels really good in here, so you won't be able to say "No" for long. \
name ""
name "Frog Girl B"
>Mating with the both of us will be like you're in heaven.\
name ""
name "Luka"
>Ahhh...\
name ""
>She spreads her legs open wider, and positions the tip of my penis right next to her opening.@
dwave 1,"se\ero_pyu1.ogg"
>A small drip of her mucus comes out of her pink hole, and it slowly runs down my erect penis.\
>As the slimy liquid drips down onto my thigh, she slowly forces me into her soft, wet hole.\
mov %hseanwave,4:hseanwave
lsp 700,":c;chara\kaeru_hb1.bmp",0,0:print 10,500
>The Frog Girl slowly forces me all the way inside her, with her puffy mucus covered vaginal walls rubbing against me the entire length in.\
name "Luka"
>Ah...\
name ""
name "Frog Girl A"
>Alright, you're all the way in. @
>Well? It's heavenly inside, isn't it?\
name ""
>The giggling Frog Girl stares right into my face, loose and slack jawed at the stimulation she's forcing on me.\
>As she said, it feels better than anything I've ever felt before...@>Soft, slimy, and warm... As if I could melt inside of her.\
>Her walls are puffy, and seemingly mold to my form, gently pushing and embracing my penis.\
>In addition, the slimy secretions inside of her form a lubricant that makes me slip in and out of her quickly, rubbing against all of her folds and interior bumps with no friction.\
>Just the act of being inside of her is draining me of any remaining power...\
name "Luka"
>Haaa...@
>I...It feels amazing...\
name ""
name "Frog Girl A"
>Don't you love being inside, all the way in?@
>So enjoy it, and mate with us forever. \
name ""
name "Luka"
>M...Mate...?\
name ""
>Right before almost losing myself in the pleasure, that word triggers a final warning in my brain.\
name "Luka"
>Th...That... No... I can't do that...\
name ""
name "Frog Girl A"
>Eh?@>You don't want to mate?@
>Even though it feels so nice inside? \
name ""
>To emphasize her point, the Frog Girl hugs me a little tighter, and quickly squeezes around my penis.@
>I jump back at the sudden stimulation, almost forced to an instant orgasm.\
name "Luka"
>Ahhh... N...No...\
name ""
>But still, I bite my lip and hold on.@
>In response to my feeble protests, the Frog Girls giggle and ridicule me.\
name "Frog Girl B"
>It's pointless to resist at this point.@
>Just surrender, and give yourself to us...\
name ""
>The Frog Girl clinging to my back taunts me with a smile.@
>She rubs her slimy body against me, as if impatient for her turn.\
>With the two Frog Girls on both sides of me, it feels as though my body itself doesn't even belong to me.\
name "Frog Girl A"
>Here, I'll do this to make it even better.@
>There's no reason at all to resist this pleasure. \
name ""
>The Frog Girl raping me starts to move her waist up and down.@
>Up and down, her powerful legs and waist usually used for jumping are being used to quickly snap up and down in a piston movement.\
>The mucus inside of her serves as a powerful lubricant, enabling her to move faster than friction would seemingly allow.\
name "Luka"
>Ahhh...@
>S...Stop... I'm going to come...\
name ""
name "Frog Girl A"
>Here, here! @> I can already feel a little leaking! \
name ""
name "Frog Girl B"
>Stop trying to hold out, just enjoy mating with us.\
name ""
>The Frog Girls giggle at my pained face.@
>Brought to my limit, I can't hold on any longer.\
>Unable to endure it any longer, I feel my body breaking down all of my mental barriers and attempts at holding in my orgasm.\
name "Luka"
>Ahhh...\
name ""
>The last of my resistance crumbles as I give myself to the Frog Girl's amazing pussy.\
gosub *syasei1
lsp 700,":c;chara\kaeru_hb2.bmp",0,0
gosub *syasei2
>My penis twitches inside her soft interior, as I release my semen inside her.@
>With a smile on her face, the Frog Girl stares into my eyes as I ejaculate inside her.\
name "Frog Girl A"
>Ahaha, you came. @
>You let out so much, too. \
name ""
lsp 700,":c;chara\kaeru_hb3.bmp",0,0:print 10,500
>The Frog Girl's long tongue shoots out and forces itself into my mouth, quickly darting around inside.\
name "Frog Girl B"
>I think I'll rape your mouth for a while too...\
name ""
>The Frog Girl clinging to my back also extends her tongue, forcing it into my mouth.\
>Her slimy tongue darts around inside my mouth, as the Frog Girl in front of me doesn't let me pull out of her vagina.\
name "Luka"
>Nnnn... Nnngg...\
name ""
name "Frog Girl A"
>Ehehe, I'll make you feel even better. \
name ""
mov %hseanwave,8:hseanwave
>While the Frog Girl behind me uses her tongue to rape my mouth, the one in front of me starts to slowly move her waist again.\
>She slightly changes the angle, causing the tip of my penis to rub against her puffy walls with every movement.\
>The soft texture of her slimy walls makes me moan in pleasure.\
name "Luka"
>Nnnnn...\
name ""
>It truly is like being in heaven...@
>Sandwiched and toyed with by the Frog Girls, I can't do anything but be embraced by the pleasure...\
name "Frog Girl B"
>Hehe... He isn't resisting at all any more.\
name ""
name "Frog Girl A"
>Giving in after just this little... How pathetic. \
name ""
>The Frog Girl raping me moves in a slow circle, giving a constant flow of pleasure as I rub against her slimy walls.\
name "Luka"
>Ahhh... This is... Incredible...@
>Ahhhh!\
name ""
gosub *syasei1
lsp 700,":c;chara\kaeru_hb4.bmp",0,0
gosub *syasei2
>Having already given in to the pleasure, I don't even attempt to hold back.\
name "Luka"
>Ahhh...\
name ""
>Completely exhausted, I've given myself to the Frog Girls.@
>All I want is to feel more of this ecstasy...\
name "Frog Girl A"
>Ahaha, he completely gave in. \
name ""
name "Frog Girl B"
>We'll keep you as our pet breeding slave.\
name ""
>The Frog Girls giggle as they casually tell me my fate.@
>But at this point, I'm not even paying attention to their words... I just want to feel more pleasure.\
name "Luka"
>Ahhh... This is amazing...@
>Ahhhh!\
name ""
gosub *syasei1:gosub *syasei2
>My only answer to them is my repeated orgasms.\
name "Frog Girl A"
>Ah, you already came again!@
>Good boy. @> You can mate with us as much as you want. \
name ""
name "Frog Girl B"
>We'll be able to give birth to a lot of healthy babies.@
>It looks like our family will be secure for a long time...\
name ""
name "Luka"
>Ahhh...\
name ""
gosub *syasei1:gosub *syasei2
>The Frog Girls continue to ridicule me as I slowly start to faint.@
>Drained in both body and spirit, I pass out.\
gosub *anten
mov %hseanwave,0:hseanwave
>After that, I was never released.@
>Kept as a breeding slave by the Frog Girls, I'm used as a tool to create more offspring.\
>But even so, I'm happy.@
>Because I get to taste their amazing pussies every day...\
>...........\
goto *badend



*alraune_start

mov $name,"Alraune"
mov $name2,"Alraune"
mov $lavel,"alraune"
mov $tatie1,"alraune_st01"
mov $tatie2,"alraune_st02"
mov $tatie3,"alraune_st03"
mov $tatie4,"alraune_st02"
mov $haikei,"bg078"
mov %monster_x,147
mov %monster_y,0
if %nanido=1 mov %max_enemylife,1700
if %nanido=2 mov %max_enemylife,2300
if %nanido=3 mov %max_enemylife,2900
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,1
mov %tikei,2
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But he can't break free of her ivy!"
mov $mogaku_anno2,"Broke free!"
mov $mogaku_anno3,"But with Alraune's ivy around him, he can't move!"
mov $mogaku_sel1,"Stop that. I'm going to squeeze out your semen while you're like that."
mov $mogaku_sel2,"Hmmm... Even if you struggle like that, I'll still squeeze it all out. "
mov $mogaku_sel3,"That's pointless! Even if you struggle, I'm still going to suck it all out!"
mov $mogaku_sel4,"Ehehe, I won't let you get away. "
mov $mogaku_sel5,"Just sit back and let me suck it all out."
mov $mogaku_dassyutu1,"Arere... You got away..."
mov $mogaku_dassyutu2,""
mov $mogaku_earth_dassyutu1,"Wawawa!?"
mov $mogaku_earth_dassyutu2,""
mov $half_s1,"Hehe... Does it feel good?"
mov $half_s2,"More and more... I can make it feel even better! "
mov $kiki_s1,"It looks like you're about to come..."
mov $kiki_s2,"Make sure you come a lot, and give me lots of nutrients. "
mov %end_n,2
mov %zmonster_x,-120
mov %tukix,300
mov %owaza_count1a,2
mov %owaza_count2a,2
gosub *face2
name $name
>Haha, a delicious looking human appeared. @
>Be happy, because I'm going to suck out your semen for nutrients. \
name ""
name "Luka"
>I won't allow that to happen!\
name ""
>Before she can say anything further, I pull out my sword and prepare to defend myself!\
gosub *face1
goto *common_main



*alraune_v

gosub *face3
name $name
>Waaa...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Alraune turns into a flower!\
mov %viclose,1:gosub *victory
mov %getexp,5500:gosub *lvup
mov %2268,1
goto *sean0163



*alraune_kousan

gosub *kousan_syori
name ""
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>Yay!@> I can do whatever I want?@
>Ehehe... I'll suck out all your semen then. \
name ""
goto *alraune_a



*alraune_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *alraune_kousan
if %cmd1=16 goto *alraune_onedari
if %cmd1=17 goto *common_skill
goto *alraune_main



*alraune_a

if %kousoku=1 gosub *alraune_a5:goto *common_main
rnd2 %ransu,1,4
if %ransu=1 gosub *alraune_a1:goto *common_main
if %ransu=2 gosub *alraune_a2:goto *common_main
if %ransu=3 && %status=0 && %owaza_count2a>3 gosub *alraune_a3:goto *common_main
if %ransu=4 && %owaza_count1a>3 gosub *alraune_a4:goto *common_main
skip -5



*alraune_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Let me have a taste of your penis..."
if %ransu=2 mov $sel1,"Delicious... Let me have a taste in my mouth."
if %ransu=3 mov $sel1,"Does my mouth feel good...?"
name $name
eng $sel1:$sel6\
name ""
skillname "Alraune's Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>Alraune sucks Luka's penis into her mouth, and starts to gently suck on it!
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,25
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
skillcount2 3272
if %nanido<2 damage 35,45
if %nanido=2 damage 45,55
if %nanido=3 damage 55,65
skillname ""
if %mylife=0 sub %stack,1:return *alraune_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*alraune_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Please come on my breasts. "
if %ransu=2 mov $sel1,"I'll put your thing between my breasts, and make you come..."
if %ransu=3 mov $sel1,"Mmmpf... Mmpf... Does that feel good?"
name $name
eng $sel1:$sel6\
name ""
skillname "Alraune's Tit Fuck"
dwave 1,"se\ero_koki1.ogg"
>Alraune sandwiches Luka's penis between her breasts, and starts to squeeze them together!
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,25
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
skillcount2 3273
if %nanido<2 damage 45,55
if %nanido=2 damage 55,65
if %nanido=3 damage 65,75
skillname ""
if %mylife=0 sub %stack,1:return *alraune_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*alraune_a3

add %stack,1
mov %owaza_count2a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My breath is veeeery sweet!"
if %ransu=2 mov $sel1,"With this aroma, you'll be violated from the inside... "
if %ransu=3 mov $sel1,"Take a deeeep breath, and let yourself go. "
name $name
eng $sel1:$sel6\
name ""
skillname "Alraune's Fragrance"
dwave 1,"se\ero_pyu3.ogg"
eng "Alraune kisses Luka, with a sweet smell emanating from her mouth...":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,100
if %wind=1 && %nanido=2 mov %wind_kakuritu,90
if %wind=1 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind blows the smell away!":gosub *wind_guard:sub %stack,1:return
\
>The sweet smell flows through Luka's body, drowning him in ecstasy.
skillcount2 3274
if %nanido<2 damage 15,20
if %nanido=2 damage 25,30
if %nanido=3 damage 35,40
if %status=0 mov $sel1,"Luka has been immersed in ecstasy!"
if %status=1 mov $sel1,"Luka is immersed in ecstasy..."
mov %status,1:gosub *status_print
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *alraune_h3
if %kousan=2 sub %stack,1:return
name "Luka"
>Ahhh...\
name ""
name $name
>Aha, it feels really nice, doesn't it?@
>But now I can make it feel even more amazing. \
name ""
rnd2 %status_turn,3,4
if %nanido=2 rnd2 %status_turn,4,5
if %nanido=3 rnd2 %status_turn,5,6
sub %stack,1
return



*alraune_a4

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name $name
>I'm going to catch you, then suck out all your semen! \
name ""
skillname "Ivy Restraint"
dwave 1,"se\ero_makituki3.ogg"
eng "The Alraune's ivy wraps around Luka's body!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,100
if %wind=1 && %nanido=2 mov %wind_kakuritu,90
if %wind=1 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind slices up the ivy!":gosub *wind_guard:sub %stack,1:return
\
>Luka's body is wrapped by Alraune's ivy!
if %nanido<2 damage 20,30
if %nanido=2 damage 30,40
if %nanido=3 damage 40,50
mov %kousoku,1:gosub *status_print
>Luka's being restrained by Alraune's ivy!\
skillname ""
if %mylife=0 sub %stack,1:return *alraune_h4
if %kousan=2 sub %stack,1:return
gosub *face2
name $name
>Ehehe... Caught you. @
if %first_sel1=1 skip 3
>Now, I'll suck it all out with this amazing flower. \
skip 2
>This time, I'll suck it all out. \
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,2
if %earth=0 && %nanido=2 mov %genmogaku,3
if %earth=0 && %nanido=3 mov %genmogaku,4
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,2
if %earth>0 && %nanido=3 mov %genmogaku,3
sub %stack,1
return



*alraune_a5

add %stack,1
>Luka's being restrained by Alraune's ivy!\
skillcount2 3275
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Ehehe... I'm going to suck out all your semen. ":mov $sel2,"The Succubus Flower closes around Luka's penis, and intensely sucks on it!"
if %ransu=2 mov $sel1,"Come on... Let out a lot of semen into this flower. ":mov $sel2,"The Succubus Flower violently sucks on Luka's penis!"
if %ransu=3 mov $sel1,"The honey will cover your penis, and make it feel even better. ":mov $sel2,"The Succubus Flower closes around Luka's penis, its warm honey covering him!"
if %ransu=4 mov $sel1,"Come on, all you have to do is come in here. ":mov $sel2,"The Succubus Flower wraps around Luka's penis, and tightens!"
if %ransu=5 mov $sel1,"Please fill up my flower with all of your white nutrients. ":mov $sel2,"The Succubus Flower tightens around Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Succubus Flower"
dwave 1,"se\ero_chupa6.ogg"
if %hanyo1=0 lsp 690,":a;chara\alraune_ct01.bmp",0,0:print 10,500
lsp 690,":a;chara\alraune_ct02.bmp",0,0:print 10,500
if %kousan=2 mov %hanyo1,1
eng $sel2:$sel6
if %nanido<2 damage 75,100
if %nanido=2 damage 85,110
if %nanido=3 damage 95,120
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *alraune_h5
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*alraune_onedari

mov $list1,"Alraune's Blowjob"
if %3272>0 mov %list_num1,1
mov $list2,"Alraune's Tit Fuck"
if %3273>0 mov %list_num2,1
mov $list3,"Alraune's Fragrance"
if %3274>0 mov %list_num3,1
mov $list4,"Succubus Flower"
if %3275>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *alraune_onedari1
if %cmd1=12 goto *alraune_onedari2
if %cmd1=13 goto *alraune_onedari3
if %cmd1=14 goto *alraune_onedari4
if %cmd1=-1 goto *alraune_main
goto *alraune_onedari



*alraune_onedari1

gosub *onedari_syori
name $name
>You want to come inside my mouth...?\
name ""
gosub *alraune_a1
skip -1



*alraune_onedari2

gosub *onedari_syori
name $name
>You want to come between my breasts...?\
name ""
gosub *alraune_a2
skip -1



*alraune_onedari3

gosub *onedari_syori
name $name
>You want my sweet smell to force you to come?\
name ""
gosub *alraune_a3
skip -1



*alraune_onedari4

gosub *onedari_syori_k
name $name
>You want to be sucked dry by my flower...?\
name ""
if %kousoku=0 gosub *alraune_a4
gosub *alraune_a5
skip -1



*alraune_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\alraune_bk01.bmp",147,0
gosub *syasei2
>Sucked by Alraune's small mouth, Luka was finally forced to orgasm.\
mov %viclose,1:gosub *lose
mov %2568,%2568+1:if %2568=1 mov %count_koenemy,%count_koenemy+1
if %2568>%count_most mov %count_most,%2568:mov $count_mostname,$name
count 4,3
mov $bad1,"Luka succumbed to Alraune's blowjob."
gosub *face2
name $name
>Nnnn... *Suck*\
>Ehehe... You came in my mouth. @
>Did it feel too good for you to take?\
name ""
goto *alraune_h



*alraune_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\alraune_bk02.bmp",147,0
gosub *syasei2
>Sandwiched between Alraune's breasts, Luka was finally forced to orgasm.\
mov %viclose,1:gosub *lose
mov %2568,%2568+1:if %2568=1 mov %count_koenemy,%count_koenemy+1
if %2568>%count_most mov %count_most,%2568:mov $count_mostname,$name
count 7,3
mov $bad1,"Luka succumbed to Alraune's tit fuck."
gosub *face2
name $name
>Ehehe, you made my breasts get all covered in semen. @
>Did it feel too good for you to take?\
name ""
goto *alraune_h



*alraune_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\alraune_bk02.bmp",147,0
gosub *syasei2
>As soon as Luka smelled Alraune's sweet fragrance, the overpowering ecstasy forces him to come.\
mov %viclose,1:gosub *lose
mov %2568,%2568+1:if %2568=1 mov %count_koenemy,%count_koenemy+1
if %2568>%count_most mov %count_most,%2568:mov $count_mostname,$name
count 18,3
mov $bad1,"Just the smell of Alraune's sweet fragrance caused Luka to come."
gosub *face2
name $name
>Ehehe, I smelled so good, you just had to come right away. @
>It smelled so good, you came on accident? \
name ""
goto *alraune_h



*alraune_h4

mov %ikigoe,3:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\alraune_bk02.bmp",147,0
gosub *syasei2
>Entangled by Alraune's ivy, Luka accidentally climaxes...\
mov %viclose,1:gosub *lose
mov %2568,%2568+1:if %2568=1 mov %count_koenemy,%count_koenemy+1
if %2568>%count_most mov %count_most,%2568:mov $count_mostname,$name
count 12,3
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"The simple act of being bound by Alraune's ivy forced Luka to come."
gosub *face2
name $name
>Eh? You already came?@
>I guess that must have been too much for a weak boy like you. Hahaha. \
name ""
goto *alraune_h



*alraune_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\alraune_bk03.bmp",147,0
lsp 690,":a;chara\alraune_ct03.bmp",0,0
gosub *syasei2
>Sucked intensely by the Succubus Flower, Luka finally gives in to the rising desire for release.\
mov %viclose,1:gosub *lose
mov %2568,%2568+1:if %2568=1 mov %count_koenemy,%count_koenemy+1
if %2568>%count_most mov %count_most,%2568:mov $count_mostname,$name
count 12,3
mov $bad1,"Sucked by Alraune's Succubus Flower, Luka was forced to come."
gosub *face2
name $name
>Ehehe, my flower sucked in a lot. @
>My flower felt really good, didn't it?\
name ""
csp 690:print 10,500
goto *alraune_h



*alraune_h

mov $bad2,"After that, Luka was raped by Alraune continually for the rest of his life..."
if %2568=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahhh...\
name ""
>Stuck in the afterglow of the orgasm, my body relaxes.@
>As soon as I do, Alraune's petals start to spread out over my waist.\
dwave 1,"se\ero_makituki3.ogg"
>In only a few seconds, I'm completely covered by her flowers and petals.\
name $name
>Now, next I'm going to use this to suck you dry...@
>This hole down here is the best way to extract nutrients, after all. \
name ""
>Alraune moves some flowers to reveal a pink opening into her body.\
>It almost looks like a human female's, but inside the pink opening, something is wriggling and squirming inside.\
name "Luka"
>St...Stop!\
name ""
name $name
>Eh? But your penis is already big.@
>Doesn't that mean it wants to be inserted in here?@
>It wants to be sucked dry, until it's shriveled and wilts...\
name ""
>Alraune leans on top of me, and aims my penis toward her small pink slit.@
>Already erect, she easily forces me into her in one smooth movement.\
mov %hseanwave,1:hseanwave
cspl 690,699
lsp 700,":a;chara\alraune_h1.bmp",0,0:print 10,500
name $name
>Ehehe. I swallowed your penis. @
>Now, all of your sperm is officially mine! \
name ""
name "Luka"
>Ahhh...!!\
name ""
>Nectar drips out of both her small pink opening and some of her flowers, giving off a sweet scent.\
>Wrapped in the pleasant stimulation from insertion, the sweet smells cause my body to relax.\
>But the feeling after insertion suddenly changes, as it feels like her vaginal walls themselves are coming alive.\
>From her entrance, to all the way inside, it feels like every bump, crease, and fold inside of her has a mind of its own, moving and rubbing every direction at once.\
name "Luka"
>Ahhh!!\
name ""
>My body shakes involuntarily as I let out a pathetic moan at the sudden unexpected pleasure.\
name $name
>Hehehe... What a pitiful face.@
>As soon as a man feels this, they always go insane with ecstasy. \
name ""
name "Luka"
>Haaa...\
name ""
>It's as if I was forced into a massage, specially tailored for maximum stimulation.\
>Her soft, wriggling walls gently rub and massage me, urging me toward a quick orgasm.\
name "Luka"
>Ahhh... I... I'm going to come...!\
name ""
name $name
>Hehe, that's good.@
>I need to suck out alllll of your semen, after all. \
name ""
>As if encouraged by my words, the speed of the massage increases, almost turning into a milking movement.\
>Unable to take it any more, I give in to the rising climax.\
name "Luka"
>Coming...!@
>Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\alraune_h2.bmp",0,0
gosub *syasei2
>As soon as the first spurt of semen shoots into Alraune's vagina, her walls increase in force and speed into a strong milking movement, making sure every single drop is squeezed out of me into her.\
name $name
>Aha, you're coming, you're coming.@
>I'll milk you to the last drop. \
name ""
name "Luka"
>Ahhh... Y...You're wringing it all out...\
name ""
>Designed just for extracting semen from men, her pussy squeezes out every drop of my last orgasm.\
name "Luka"
>Ahhh...\
name ""
name $name
>Ehehe, your face looks so happy. @
>It makes me want to tease you a little. \
name ""
>Two long flowers come out from Alraune's lower body.@
lsp 700,":a;chara\alraune_h3.bmp",0,0:print 10,500
>Suddenly, both of them latch onto my nipples!\
>The unexpected touch on my chest causes me to shiver, and my penis gets hard again inside of Alraune's vagina.\
name "Luka"
>Wh...What are you doing...?\
name ""
name $name
>These flowers are for using on girls.@
>They latch onto their breasts, and are able to suck out milk.\
>I've never used them on a boy before...@
>I want to see what happens!\
name ""
name "Luka"
>N...No way... Ahhh!\
name ""
>The flowers on my left and right nipple latch on, and start to suck on them.\
>The soft, honey covered flowers put pressure on me, while her pussy starts its massaging motions again.\
>The three different sources of milking motions make it feel like my entire body is being exploited.\
name "Luka"
>Ahh! Ahhhh!!\
name ""
>My body shivers as the sucking motions get more intense.@
>If I were a women, would milk be coming out...?\
>But of course, nothing comes out.@
>Even so, the flowers latched onto me don't give up, and continue to suck with ever increasing pressure.\
name "Luka"
>Ahhh! Stop!@
>Ahhhhh!\
name ""
name $name
>Milk really won't come out...@
>But it looks like it feels good anyway. \
name ""
name "Luka"
>Ahhh!\
name ""
>The flowers on my nipples continue to uselessly milk me, while her pussy continues to actually milk me.\
name "Luka"
>Stop it!@> Stop this!!\
name ""
>The bizarre new stimulation on my breasts causes me to reach another orgasm, shooting milk out of my penis instead of my breasts...\
gosub *syasei1
lsp 700,":a;chara\alraune_h4.bmp",0,0
gosub *syasei2
name $name
>Arara... So the milk came out down here.@
>I guess there's no harm in milking both places at once, then. \
name ""
name "Luka"
>Ahh! Stop!@
>Ahhhh!!\
name ""
>Thus began a nightmare of being sucked from three places at once...\
>The flowers suck pointlessly on my nipples, while her pussy milks my penis...\
lsp 700,":a;chara\alraune_h5.bmp",0,0:print 10,500
>But then, more flowers come up to start sucking on my entire body!\
name "Luka"
>Ahhhh!\
name ""
name $name
>I'm milking your breasts like a girl...@
>But just look at that reaction when I embrace your whole body. You're so shy. \
name ""
>Fine hairs inside the flowers start to tickle my body, sending a new stimulation racing throughout me.\
>Then, as if there were two tiny mouths inside, both of my nipples are sucked into a small opening.\
name "Luka"
>Ahhh! Ahhhhh!!\
name ""
name $name
>Ahaha, you look so frantic all of a sudden.@
>Don't worry, you can shoot out your milk whenever it's too much to hold in. \
name ""
>Her pussy tightens after her words, as if emphasizing that it's hungry for more...\
>Way too late to do anything about it, I realize that her whole body has evolved into an efficient way to milk men for their semen...\
name "Luka"
>No more...! I'm going to come!\
name ""
>While being sucked all over, I quickly given in again.\
gosub *syasei1
lsp 700,":a;chara\alraune_h6.bmp",0,0
gosub *syasei2
>The semen, the proof of my submission to her, is quickly sucked up by her waiting pussy.\
name "Luka"
>Ahh... Stop this... Someone help me...\
name ""
>Overcome by the intensity of it all, I beg for Alraune to stop with tears in my eyes.@
>But she just looks back at me with a smile on her face, not stopping the milking.\
name $name
>Not until you're empty.@
>I'll stop right before you would die, so don't worry. \
>I wouldn't waste a delicious source of milk like you.\
name ""
name "Luka"
>Ahhh... Help me...\
name ""
gosub *syasei1:gosub *syasei2
>Milked a final time, I feel myself about to faint.@
>The endless barrage of pleasure finally starts to fade, as I slip into sleep.\
name "Luka"
>Ah... Ahhh...\
name ""
>Wrapped in an endless ecstasy, I finally lose consciousness.\
gosub *anten
mov %hseanwave,0:hseanwave
name $name
>Arere...? He fainted while I'm still sucking on him?@
>But that's fine... I'll be milking him for forever from now on. \
name ""
>I hear those horrifying words right as my world fades to black.\
>Sleep will only be a short respite from this endless pleasure...\
>.............\
goto *badend



*durahan_start

mov $name,"Dullahan"
mov $name2,"Dullahan"
mov $lavel,"durahan"
mov $tatie1,"durahan_st01"
mov $tatie2,"durahan_st02"
mov $tatie3,"durahan_st03"
mov $tatie4,"durahan_st02"
mov $haikei,"bg084"
mov %monster_x,228
mov %monster_y,0
if %nanido=1 mov %max_enemylife,1800
if %nanido=2 mov %max_enemylife,2000
if %nanido=3 mov %max_enemylife,2200
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,90
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %music,1
mov %tikei,0
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't move while being bound!"
mov $mogaku_sel1,"I won't let go..."
mov $mogaku_sel2,"Soak in your despair, and give up..."
mov $mogaku_sel3,"Hehe, struggling is pointless..."
mov $mogaku_sel4,"I'll forcefully quiet you down..."
mov $mogaku_sel5,"I'll suck out semen, just like this..."
mov $mogaku_dassyutu1,"Guh... You're quite stubborn!"
mov $mogaku_dassyutu2,""
mov $mogaku_earth_dassyutu1,"What power!"
mov $mogaku_earth_dassyutu2,""
mov $half_s1,"Hehe, does it feel good?"
mov $half_s2,"My techniques are incredible, aren't they?"
mov $kiki_s1,"It's almost time..."
mov $kiki_s2,"Now, give up and come in front of all these spectators."
mov %end_n,6
mov %exp_minus,0
mov %zmonster_x,-80
mov %tukix,330
mov %owaza_count1a,4
mov %owaza_count2a,4
gosub *face2
name $name
>Oh, what a cute little warrior.@
>Hehe... I'm looking forward to putting on a nice show after you lose.\
name ""
name "Luka"
>I...I won't lose!\
name ""
>This is just the first round.@
>There's no way I'd lose here!\
name $name
>Oh, you actually think you can win?@
>I'll have to put you in your place by humiliating you in front of this huge crowd...\
name ""
gosub *face1
goto *common_main



*durahan_v

gosub *face3
name $name
>Impossible... Me, lose to a human warrior?@
>...I surrender.@>It's my loss.\
name ""
>Suffering from a crippling wound, the Dullahan surrenders!\
mov %viclose,1:gosub *victory
mov %getexp,5000:gosub *lvup
mov %2269,1
goto *sean0168



*durahan_kousan

gosub *kousan_syori
>Luka gives in to temptation, and stops resisting!\
gosub *face2
name $name
>Ara, you already fell?@
>Good, I'll take pleasure in humiliating you...\
name ""
goto *durahan_a



*durahan_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *durahan_kousan
if %cmd1=16 goto *durahan_onedari
if %cmd1=17 goto *common_skill
goto *durahan_main



*durahan_a

if %kousoku=2 rnd2 %ransu,1,4
if %kousoku=2 && %ransu=1 gosub *durahan_a9:gosub *durahan_a9:goto *common_main
if %kousoku=2 && %ransu=2 gosub *durahan_a9:gosub *durahan_a10:goto *common_main
if %kousoku=2 && %ransu=3 gosub *durahan_a10:gosub *durahan_a9:goto *common_main
if %kousoku=2 && %ransu=4 gosub *durahan_a10:gosub *durahan_a10:goto *common_main
if %kousoku=1 rnd2 %ransu,1,4
if %kousoku=1 && %ransu=1 gosub *durahan_a7:gosub *durahan_a7:goto *common_main
if %kousoku=1 && %ransu=2 gosub *durahan_a7:gosub *durahan_a8:goto *common_main
if %kousoku=1 && %ransu=3 gosub *durahan_a8:gosub *durahan_a7:goto *common_main
if %kousoku=1 && %ransu=4 gosub *durahan_a8:gosub *durahan_a8:goto *common_main
rnd2 %ransu,1,8
if %ransu=1 gosub *durahan_a1:gosub *durahan_a3:goto *common_main
if %ransu=2 gosub *durahan_a2:gosub *durahan_a3:goto *common_main
if %ransu=3 gosub *durahan_a1:gosub *durahan_a4:goto *common_main
if %ransu=4 gosub *durahan_a2:gosub *durahan_a4:goto *common_main
if %ransu=5 && %owaza_count1a>5 gosub *durahan_a5:goto *common_main
if %ransu=6 && %owaza_count1a>5 gosub *durahan_a6:goto *common_main
if %ransu>6 && %owaza_count2a>5 gosub *durahan_a11:goto *common_main
skip -8



*durahan_a1

add %stack,1
if %kousan=2 skip 2
>The Dullahan's head and body attack in unison!\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll stroke you here..."
if %ransu=2 mov $sel1,"My hands are unbearable, aren't they?"
if %ransu=3 mov $sel1,"Cover my hand with your semen..."
name $name
eng $sel1:$sel6\
name ""
skillname "Degeneration: Hand"
dwave 1,"se\ero_koki1.ogg"
>The Dullahan's headless body grabs Luka's penis!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
skillcount2 3276
if %nanido<2 damage 18,23
if %nanido=2 damage 23,28
if %nanido=3 damage 28,33
skillname ""
if %mylife=0 sub %stack,1:return *durahan_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*durahan_a2

add %stack,1
if %kousan=2 skip 2
>The Dullahan's head and body attack in unison!\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Here... Cover my breasts with your semen..."
if %ransu=2 mov $sel1,"Like this, I'll squeeze everything out..."
if %ransu=3 mov $sel1,"I'll let you enjoy my chest..."
name $name
eng $sel1:$sel6\
name ""
skillname "Degeneration: Breast"
dwave 1,"se\ero_koki1.ogg"
>The Dullahan's headless body crushes Luka's penis between her breasts!
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,25
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
skillcount2 3277
if %nanido<2 damage 23,28
if %nanido=2 damage 36,31
if %nanido=3 damage 33,38
skillname ""
if %mylife=0 sub %stack,1:return *durahan_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*durahan_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Doesn't my hair feel good?"
if %ransu=2 mov $sel1,"Cover my hair with your sticky semen..."
if %ransu=3 mov $sel1,"Here, I'll squeeze it with my hair..."
name $name
eng $sel1:$sel6\
name ""
skillname "Degeneration: Hair"
dwave 1,"se\umaru.ogg"
>The hair on the Dullahan's head unnaturally grows, and wraps around his penis!
if %wind=1 && %nanido<2 mov %wind_kakuritu,50
if %wind=1 && %nanido=2 mov %wind_kakuritu,35
if %wind=1 && %nanido=3 mov %wind_kakuritu,25
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes it away!":gosub *wind_guard:sub %stack,1:return
skillcount2 3278
if %nanido<2 damage 18,23
if %nanido=2 damage 21,26
if %nanido=3 damage 28,33
skillname ""
if %mylife=0 sub %stack,1:return *durahan_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*durahan_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You'll love my mouth... Mmm..."
if %ransu=2 mov $sel1,"Shoot out everything into my mouth..."
if %ransu=3 mov $sel1,"My mouth will suck out the proof of your defeat..."
name $name
eng $sel1:$sel6\
name ""
skillname "Degeneration: Mouth"
dwave 1,"se\ero_buchu2.ogg"
>The Dullahan's head clamps down on Luka's penis, sucking on him!
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,25
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
skillcount2 3279
if %nanido<2 damage 23,28
if %nanido=2 damage 26,31
if %nanido=3 damage 29,34
skillname ""
if %mylife=0 sub %stack,1:return *durahan_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*durahan_a5

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name $name
>Ha! Caught you!\
name ""
skillname "Body Hold"
eng "The Dullahan's headless body grabs Luka from behind!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,25
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes it off!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,2:gosub *status_print
>Luka is being held by the Dullahan's headless body!\
skillname ""
if %kousan=2 sub %stack,1:return
gosub *face2
name $name
>Hehe, just stay stay there quietly.@
>I'll make you feel really good...\
name ""
if %earth=0 && %nanido<2 mov %genmogaku,1
if %earth=0 && %nanido=2 mov %genmogaku,1
if %earth=0 && %nanido=3 mov %genmogaku,3
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,2
sub %stack,1
return



*durahan_a6

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name $name
>Hehe, I'll keep you still.\
name ""
skillname "Hair Bind"
dwave 1,"se\umaru.ogg"
eng "The Dullahan's hair unnaturally grows, and wraps around Luka's body!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,35
if %wind=1 && %nanido=2 mov %wind_kakuritu,30
if %wind=1 && %nanido=3 mov %wind_kakuritu,17
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes it away!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>Luka has been wrapped by the Dullahan's hair!\
skillname ""
if %kousan=2 sub %stack,1:return
gosub *face2
name $name
>Now you can't move...@
>Stuck like that, my body will squeeze out all your semen...\
name ""
if %earth=0 && %nanido<2 mov %genmogaku,1
if %earth=0 && %nanido=2 mov %genmogaku,1
if %earth=0 && %nanido=3 mov %genmogaku,3
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,2
sub %stack,1
return



*durahan_a7

add %stack,1
>With the Dullahan's hair wrapped around his body, Luka is unable to move...\
skillcount2 3280
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"How does it feel to be teased while unable to move?"
if %ransu=2 mov $sel1,"Is this how you wanted to be raped?"
if %ransu=3 mov $sel1,"Nothing remains for you, except to have your semen squeezed out..."
name $name
eng $sel1:$sel6\
name ""
skillname "Restraint: Hand"
dwave 1,"se\ero_koki1.ogg"
>The Dullahan's headless body quickly pumps Luka's penis!
if %nanido<2 damage 20,25
if %nanido=2 damage 23,28
if %nanido=3 damage 30,35
skillname ""
if %mylife=0 sub %stack,1:return *durahan_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*durahan_a8

add %stack,1
>With the Dullahan's hair wrapped around his body, Luka is unable to move...\
skillcount2 3281
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hehe... How pathetic..."
if %ransu=2 mov $sel1,"Do you like being played with against your will?"
if %ransu=3 mov $sel1,"Enjoy the softness of my breasts, and give in..."
name $name
eng $sel1:$sel6\
name ""
skillname "Restraint: Breast"
dwave 1,"se\ero_koki1.ogg"
>The Dullahan's headless body uses her breasts to crush Luka's penis!
if %nanido<2 damage 25,30
if %nanido=2 damage 23,28
if %nanido=3 damage 35,40
skillname ""
if %mylife=0 sub %stack,1:return *durahan_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*durahan_a9

add %stack,1
>With the Dullahan's headless body holding Luka, he's unable to move...\
skillcount2 3282
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll squeeze you with my hair..."
if %ransu=2 mov $sel1,"Get drunk on the pleasure of my magic hair..."
if %ransu=3 mov $sel1,"Don't you want to feel what it's like to have me suck out your energy?"
name $name
eng $sel1:$sel6\
name ""
skillname "Restraint: Hair"
dwave 1,"se\ero_chupa6.ogg"
>The Dullahan's hair wraps around Luka's penis, gently squeezing him!
if %nanido<2 damage 20,25
if %nanido=2 damage 23,28
if %nanido=3 damage 30,40
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *durahan_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*durahan_a10

add %stack,1
>With the Dullahan's headless body holding Luka, he's unable to move...\
skillcount2 3283
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck up everything with my mouth..."
if %ransu=2 mov $sel1,"Hehe... Isn't my mouth irresistible?"
if %ransu=3 mov $sel1,"You can come in my mouth whenever you want..."
name $name
eng $sel1:$sel6\
name ""
skillname "Restraint: Mouth"
dwave 1,"se\ero_chupa6.ogg"
>The Dullahan's head hangs off Luka's penis, violently sucking on him!
if %nanido<2 damage 25,30
if %nanido=2 damage 28,33
if %nanido=3 damage 35,40
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *durahan_h6
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*durahan_a11

add %stack,1
mov %owaza_count2a,0
skillcount2 3284
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"This kiss will make you melt..."
if %ransu=2 mov $sel1,"Now, give in..."
if %ransu=3 mov $sel1,"I'll make you drown in ecstasy..."
name $name
eng $sel1:$sel6\
name ""
skillname "Kiss of Ecstasy"
dwave 1,"se\ero_chupa2.ogg"
eng "The Dullahan kisses Luka!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,100
if %wind=1 && %nanido=2 mov %wind_kakuritu,90
if %wind=1 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But a gust of wind breaks them apart!":gosub *wind_guard:sub %stack,1:return
\
>A pleasant feeling of ecstasy floods through Luka's body...
if %nanido<2 damage 20,25
if %nanido=2 damage 23,28
if %nanido=3 damage 30,35
if %status=0 mov $sel1,"Luka has been immersed in ecstasy!"
if %status=1 mov $sel1,"Luka is immersed in ecstasy..."
mov %status,1:gosub *status_print
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *durahan_h7
if %kousan=2 sub %stack,1:return
name "Luka"
>Ah... Ahhh...\
name ""
name $name
>Hehe... How is it?@
>While you're just like that, I'll tease you...\
name ""
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,3,4
if %nanido=3 rnd2 %status_turn,4,5
sub %stack,1
return



*durahan_onedari

mov $list1,"Degeneration: Hand"
if %3276>0 mov %list_num1,1
mov $list2,"Degeneration: Breast"
if %3277>0 mov %list_num2,1
mov $list3,"Degeneration: Hair"
if %3278>0 mov %list_num3,1
mov $list4,"Degeneration: Mouth"
if %3279>0 mov %list_num4,1
mov $list5,"Restraint: Hand"
if %3280>0 mov %list_num5,1
mov $list6,"Restraint: Breast"
if %3281>0 mov %list_num6,1
mov $list7,"Restraint: Hair"
if %3282>0 mov %list_num7,1
mov $list8,"Restraint: Mouth"
if %3283>0 mov %list_num8,1
mov $list9,"Kiss of Ecstasy"
if %3284>0 mov %list_num9,1
gosub *cmd_onedari
if %cmd1=11 goto *durahan_onedari1
if %cmd1=12 goto *durahan_onedari2
if %cmd1=13 goto *durahan_onedari3
if %cmd1=14 goto *durahan_onedari4
if %cmd1=15 goto *durahan_onedari5
if %cmd1=16 goto *durahan_onedari6
if %cmd1=17 goto *durahan_onedari7
if %cmd1=18 goto *durahan_onedari8
if %cmd1=19 goto *durahan_onedari9
if %cmd1=-1 goto *durahan_main
goto *durahan_onedari



*durahan_onedari1

gosub *onedari_syori
name $name
>Ara, already giving up?@
>You want my hand to tease you?\
name ""
gosub *durahan_a1
skip -1



*durahan_onedari2

gosub *onedari_syori
name $name
>Ara, already giving up?@
>You want me to tease you with my breasts?\
name ""
gosub *durahan_a2
skip -1



*durahan_onedari3

gosub *onedari_syori
name $name
>Ara, already giving up?@
>You want my hair to tease you?\
name ""
gosub *durahan_a3
skip -1



*durahan_onedari4

gosub *onedari_syori
name $name
>Ara, already giving up?@
>You want me to tease you with my mouth?\
name ""
gosub *durahan_a4
skip -1



*durahan_onedari5

gosub *onedari_syori_k
name $name
>Ara, already giving up?@
>You want me to hold you down and tease you with my hand?\
name ""
if %kousoku=0 gosub *durahan_a6
gosub *durahan_a7
skip -1



*durahan_onedari6

gosub *onedari_syori_k
name $name
>Ara, already giving up?@
>You want me to hold you down and tease you with my breasts?\
name ""
if %kousoku=0 gosub *durahan_a6
gosub *durahan_a8
skip -1



*durahan_onedari7

gosub *onedari_syori_k
name $name
>Ara, already giving up?@
>You want me to hold you down and tease you with my hair?\
name ""
if %kousoku=0 gosub *durahan_a5
gosub *durahan_a9
skip -1



*durahan_onedari8

gosub *onedari_syori_k
name $name
>Ara, already giving up?@
>You want me to hold you down and tease you with my mouth?\
name ""
if %kousoku=0 gosub *durahan_a5
gosub *durahan_a10
skip -1



*durahan_onedari9

gosub *onedari_syori
name $name
>Ara, already giving up?@
>You want to drown in the ecstasy of my kiss? Hehe.\
name ""
gosub *durahan_a11
skip -1



*durahan_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\durahan_bk04.bmp",228,0
gosub *syasei2
>Relentlessly stroked by the Dullahan's hand, Luka finally gives in, covering it with semen.\
mov %viclose,1:gosub *lose
mov %2569,%2569+1:if %2569=1 mov %count_koenemy,%count_koenemy+1
if %2569>%count_most mov %count_most,%2569:mov $count_mostname,$name
count 5,9
mov $bad1,"Unable to take it any longer, Luka comes on the Dullahan's hand."
if %kousoku=1 mov $bad1,"While bound, Luka comes on the Dullahan's hand."
gosub *face2
name $name
>Look, you got my hands all covered in your semen...@
>You let out quite a lot, didn't you? Hehe.\
name ""
goto *durahan_h



*durahan_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\durahan_bk02.bmp",228,0
gosub *syasei2
>Squeezed between the Dullahan's soft breasts, Luka finally gives in, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2569,%2569+1:if %2569=1 mov %count_koenemy,%count_koenemy+1
if %2569>%count_most mov %count_most,%2569:mov $count_mostname,$name
count 7,9
mov $bad1,"Unable to take it any more, Luka comes on the Dullahan's breasts."
if %kousoku=1 mov $bad1,"While bound, Luka helplessly comes on the Dullahan's breasts."
gosub *face2
name $name
>Look, you got my breasts all covered in your semen...@
>You let out quite a lot, didn't you? Hehe.\
name ""
goto *durahan_h



*durahan_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\durahan_bk03.bmp",228,0
gosub *syasei2
>With the Dullahan's hair stroking and rubbing Luka, he finally gives in, covering her hair with his semen.\
mov %viclose,1:gosub *lose
mov %2569,%2569+1:if %2569=1 mov %count_koenemy,%count_koenemy+1
if %2569>%count_most mov %count_most,%2569:mov $count_mostname,$name
count 22,9
mov $bad1,"Unable to take it any longer, Luka comes on the Dullahan's hair."
gosub *face2
name $name
>Look, you got my hair all covered in your semen...@
>You let out quite a lot, didn't you? Hehe.\
name ""
goto *durahan_h



*durahan_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\durahan_bk01.bmp",228,0
gosub *syasei2
>Sucked on by the Dullahan, Luka gives in, filling her warm mouth with his semen.\
mov %viclose,1:gosub *lose
mov %2569,%2569+1:if %2569=1 mov %count_koenemy,%count_koenemy+1
if %2569>%count_most mov %count_most,%2569:mov $count_mostname,$name
count 4,9
mov $bad1,"Unable to endure it any longer, Luka comes inside the Dullahan's mouth."
gosub *face2
name $name
>Nnn... You shot out so much in my mouth...@
>You let out quite a lot, didn't you? Hehe.\
name ""
goto *durahan_h



*durahan_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\durahan_bk03.bmp",228,0
gosub *syasei2
>With the strange hair stroking and rubbing Luka, he finally gives in, covering the Dullahan's hair in semen.\
mov %viclose,1:gosub *lose
mov %2569,%2569+1:if %2569=1 mov %count_koenemy,%count_koenemy+1
if %2569>%count_most mov %count_most,%2569:mov $count_mostname,$name
count 22,9
mov $bad1,"While bound, Luka gives in to the Dullahan's magical hair."
gosub *face2
name $name
>Hehe, you came...@
>My semen squeezing skills are too much for you, aren't they?\
name ""
goto *durahan_h



*durahan_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\durahan_bk01.bmp",228,0
gosub *syasei2
>With the Dullahan's warm mouth violently sucking on Luka, he finally gives in, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2569,%2569+1:if %2569=1 mov %count_koenemy,%count_koenemy+1
if %2569>%count_most mov %count_most,%2569:mov $count_mostname,$name
count 4,9
mov $bad1,"Bound and unable to endure the Dullahan's blowjob, Luka gives in."
gosub *face2
name $name
>Hehe, you came...@
>My semen sucking skills are too much for you, aren't they?\
name ""
goto *durahan_h



*durahan_h7

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\durahan_bk05.bmp",228,0
gosub *syasei2
>As the Dullahan's sweet kiss floods Luka's body in ecstasy, he orgasms, coming all over her stomach.\
mov %viclose,1:gosub *lose
mov %2569,%2569+1:if %2569=1 mov %count_koenemy,%count_koenemy+1
if %2569>%count_most mov %count_most,%2569:mov $count_mostname,$name
count 18,9
mov $bad1,"While being kissed by the Dullahan, Luka climaxed."
gosub *face2
name $name
>Hahaha, how pathetic!@
>Having an orgasm just from a kiss!\
name ""
goto *durahan_h



*durahan_h

mov $bad2,"After that, Luka turned into a slave of the Rape Show."
if %2569=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahhh...\
name ""
>Forced to come by the Dullahan, I collapse to the ground in exhaustion.@
>At the same time, the crowd starts to cheer in a frenzy.\
>The women all jump up from their seats, and stare at me with expectant grins on their faces.@
>All of the female spectators are excited for the moment they were waiting for...\
name $name
>It's time to start the humiliation show...@
>Let's give the audience a good look at that dick of yours.\
name ""
name "Luka"
>S...Stop...\
name ""
>Ignoring my weak protests, she rips off my clothes.\
>Then...@
dwave 1,"se\umaru.ogg"
cspl 690,699
lsp 700,":a;chara\durahan_h1.bmp",0,0:print 10,500
>Her hair starts to wind around my penis!\
name "Luka"
>Ahh...\
name ""
>Moving on its own, her hair slowly wraps around my penis from the base to the tip.@
>I twist involuntarily as the silky hair slowly entangles my shaft.\
name "Female Spectator"
>Aha, she's using her hair for today's rape show.@
>Look at him squirming just from some hair! What a loser! \
name ""
name "Young Lady"
>Male genitalia always looks so ugly!@
>This show is going to be interesting!\
name ""
>The audience members all comment on what's happening as the Dullahan's hair tightens around me.\
>Surrounded by insults and jeers from all side, the miserable feelings start to crush my spirit.\
name $name
>Hehe, the audience looks so pleased.@
>Just think, you're going to come all over my hair in front of hundreds of people.\
name ""
>The Dullahan's body grabs my penis with her gloved hands.@
mov %hseanwave,17:hseanwave
>Like that, she starts to slowly rub me.\
name "Luka"
>St...Stop...@> Ahh...\
name ""
>Her slow, deliberate stroking skillfully stimulates my weakest point.@
>Every time her hand moves, her hair tickles the exposed skin.\
>Unable to hold in my voice, I let out a pathetic moan.\
name "Luka"
>Ah... Ahhh...\
name ""
name $name
>It feels good, right?@
>Come on... Show the audience that pathetic face of yours.\
name ""
>Her hand starts to move even faster, slowly moving her body around to give the audience a better view of her work.\
>At the end of every pump, her hair slightly tightens around me, increasing the pressure.\
name "Luka"
>Ahhh!\
name ""
name $name
>Hehe... What a nice voice.@
>Listen, everyone's laughing at you.\
name ""
name "Female Spectator A"
>Haha, look at him shake while he cries out! @
>Eww, he's so pathetic! \
name ""
name "Female Spectator B"
>How sick, to think someone could really orgasm from that!@>What a loser!\
>That little boy is such a sick pervert!\
name ""
>The girls all insult me and shout jeers at my situation.@
>All around me, the eyes of the grinning and smirking female audience members are glued to what's happening to me.\
>It's as if every one of them is raping me with their gaze...\
>All of them are closely watching me, waiting for the moment of my orgasm.\
name "Luka"
>Stop... I don't want this...\
name ""
name $name
>No matter how much you cry, the rape show isn't going to end.@
>All the customers paid to see you be humiliated, after all.\
name ""
>She tightens her grip on my penis, and continues her slow, skilled hand movements.\
>Encouraged by her hand, pre-come starts to drip out of the tip.@
>Slow drips start to fall to the floor and cover her hair.\
>The cheers from the crowd start to get even louder as they see the moment they've been waiting for about to come.\
name "Luka"
>No... Stop...\
name ""
name $name
>Hehe... It looks like you're at your limit.@
>The moment of your miserable surrender that the audience all wants to see is almost here...\
>What will your face look like?@> How much will come out?@> How will you moan?@
>Everyone here wants to see that...@> They'll all be watching you in your most pathetic moment.\
>Now come on, the time of your disgrace is here!\
name ""
>Her hand starts to violently pump me, obviously trying to force me to come right away to please the crowd.\
name "Luka"
>Ahhh!@
>I...I'm coming...!\
name ""
>Unable to take the pleasure from her hair and hand any longer, I let my body relax as I feel the climax flowing through me.\
>Right as I'm about to come, the Dullahan steps aside to give the audience a full view.\
gosub *syasei1
lsp 700,":a;chara\durahan_h2.bmp",0,0
gosub *syasei2
mov %hseanwave,0:hseanwave
name "Luka"
>Ahhh...\
name ""
>My back arches up as I come, shooting out semen.@
>The crowd starts to laugh and point as I ejaculate on the Dullahan's head.\
name "Young Lady"
>Hehe, that was quite a lot.@
>Did it feel good to ejaculate with hundreds of girls watching you?\
name ""
name "Female Spectator"
>Uwa, look at all that white stuff...@
>It smells kinda bad, too.\
name ""
>The audience continues to comment and laugh at my pitiful appearance.\
name "Luka"
>Ahh...\
name ""
name $name
>Hehe, don't you think you could get addicted to coming in front of a crowd?@
>Men unable to forget the ecstasy of that feeling are always coming back to this rape show...\
name ""
>The Dullahan laughs at me, as I'm too weak to do anything back.\
name $name
>...But the audience isn't satisfied yet.@
>I need to bring this show to a climax...\
name ""
name "Luka"
>Eh...?@> Ahhh!!\
name ""
lsp 700,":a;chara\durahan_h3.bmp",0,0:print 10,500
>The Dullahan's hair grows even longer, covering more of my penis.@
>Her silky hair even wraps my balls, gently squeezing them.\
>Like that, a slow torture of pleasure begins.@
>From the root to the tip, the small strands of her start to tickle and massage me.\
name "Luka"
>Ahhh!@>Ahhh!\
name ""
name $name
>Hehe, what do you think of my hair?@
>This skill is pretty popular with the audience...\
name ""
>Having this pleasure being forced into me by her hair adds to the humiliation of it all.@
>The sense of shame at being reduced to such a state breaks my spirit.\
name "Luka"
>Ahhh... It feels good...\
name ""
>It's like I'm being trained...@
>Under the watchful gaze of the audience, I'm being broken in by her hair.\
>Unable to resist, her hair slowly uses pleasure to turn me into a slave.\
name "Young Lady"
>Ah, the Dullahan is finally using her hair technique!@
>If that little boy takes that technique, he's done for sure.\
name ""
name "Female Spectator"
>Haha, is the hair going to make him come again?@
>Hurry up!@>We want to see you come again!\
name ""
>Their jeers only increase the pathetic feelings inside of me.\
name $name
>This time, I'll make you come really quickly.@
>We wouldn't want to keep the audience waiting, would we?\
name ""
name "Luka"
>Ah!@>Ahhhh!!\
name ""
>Her hair tightens around me, and the speed of the rubbing and tickling doubles.\
>Under the skilled use of her hair, I quickly feel myself being forced to another orgasm.\
name "Luka"
>No... Going to... Come...@
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\durahan_h4.bmp",0,0
gosub *syasei2
>Under the watchful gaze of the audience, I climax again, shooting more semen onto the Dullahan.@
>The proof of my submission covers the Dullahan's head, proudly displayed for the audience to see.\
name "Female Spectator A"
>Hahah! He came again! @
>Come on, boy!@>Try to hold out a little longer, that's just sad!\
name ""
name "Female Spectator B"
>Uwa, he came again...@
>Did you hear that pathetic moan when he came?@>That was so lame.\
name ""
name $name
>Hehe... Serves you right.@
>Thinking you could actually win...@> But at least you made the audience happy.\
name ""
name "Luka"
>Ahhh...\
name ""
>Gradually, I feel my shame at coming in front of the audience start to fade.@
>As if trying to save myself from being destroyed by this situation, the humiliation turns into a sick kind of pleasure.\
>Seeing my changing facial expression, the Dullahan starts to laugh.\
name $name
>Hehe... You're just as pathetic as all those other men.@
>Did you get excited at being seen by all these girls?\
>Don't you want to expose your pitiful self in front of them even more?\
name ""
>After saying that, the Dullahan sticks out her tongue.@
mov %hseanvoice,1:hseanvoice
lsp 700,":a;chara\durahan_h5.bmp",0,0:print 10,500
>And in the next moment, she wraps it around my penis.\
name "Luka"
>Ah!@>Ahhh!\
name ""
>Her soft, wet tongue gently wraps around my sensitive penis.@
>The sudden change in stimulation causes my body to shiver in response.\
name "Female Spectator"
>Haha, this time she's using her tongue! @
>That little boy is going to come again quickly like that.\
name ""
name "Young Lady"
>It feels really good when you lick the tip, right?@
>If that cute little boy couldn't take her hair, this is going to make him go insane.\
name ""
name "Luka"
>Ah!@>Ahhh!\
name ""
>While still coiled around my penis, the tip of her tongue starts to slowly circle the urethral opening at the tip of my penis.\
name $name
>This time, you're going to come while my tongue plays with you...@
>While everyone watches, your semen is going to shoot all over...\
name ""
name "Luka"
>Ahhh...\
name ""
>While her hair continues to rub and massage me, her tongue licks and pokes me at the same time.\
>As I shake my head back and forth in feeble resistance, it only causes me to see that every member of the audience is staring right at my penis.\
>The sense of shame from seeing so many girls waiting to see me orgasm only adds to the twisted sense of pleasure I'm experiencing for the first time.\
name "Luka"
>G...Going to come...@
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\durahan_h6.bmp",0,0
gosub *syasei2
>My white semen shoots out, covering the Dullahan's long tongue.@
>At the same time, under the watchful gaze of the audience, the sick sense of pleasure races through my body.\
name "Female Spectator A"
>Haha, it was reeaaallly fast that time. @
>Hey, Mr. Premature Ejaculator.@> Are you really that unable to do anything at all?\
name ""
name "Female Spectator B"
>How can you live with yourself after doing something so pathetic?@
>What a loser!\
name ""
name "Luka"
>Ah... Ahh...\
name ""
>I shiver in pleasure while the crowd laughs and hurls insults at me.\
name $name
>Hehe, you're completely addicted to it, aren't you?@
>Isn't being raped in front of a huge crowd the best feeling?\
name ""
name "Luka"
>Ahhh!!\
name ""
lsp 700,":a;chara\durahan_h7.bmp",0,0:print 10,500
>Her hair tightens around me, squeezing out the last drops of semen from my last orgasm.@
>Responding to the cries of the crowd for another orgasm, her tongue quickly starts to attack me again.\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\durahan_h8.bmp",0,0
gosub *syasei2
>After only a few moments, I give the crowd what they wanted to see.\
name "Female Spectator"
>He came again so fast... He really is a premature ejaculator. @
>It looks like that penis of his needs to be disciplined some more.\
name ""
name "Young Lady"
>Hehe, look at him shaking.@
>Out of all the guys I've seen in the Colosseum, this little boy is especially sad.\
name ""
name "Luka"
>Ahh...\
name ""
>As the audience laughs, I feel my consciousness start to slip away.\
gosub *anten
mov %hseanvoice,0:hseanvoice
>Thus, I lost my first fight in the Colosseum.@
>After that loss, I had my rape show "Baptism".\
>Then...\
lsp 700,":a;chara\durahan_st02.bmp",228,0
bg "bg\bg084.bmp",10,3000
name $name
>Ara, you again?@
>You're totally hooked, aren't you?\
name ""
>I'm standing in the arena again as a contestant.@
>But my goal this time is much different from last time...\
name $name
>You're as weak as always...@
>Here, I'll start what you've been waiting for...\
name ""
name "Luka"
>Ahhh!\
name ""
lsp 700,":a;chara\durahan_h1.bmp",0,0:print 10,500
>The rape show I was waiting for begins...@
>In front of a huge crowd of people, I'll be forced to orgasm.\
name "Luka"
>Ahh... Incredible...\
name ""
>Her hair wraps around me, and her skilled hand starts to stroke me.@
>I moan and move my hips in time with her strokes, basking in the cheers of the audience.\
>The girls giggle and point at my pitiful appearance, all waiting to see the moment of my orgasm.\
name $name
>Now come...@>And give the crowd a good show!\
name ""
name "Luka"
>Ah... I'm coming...@
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\durahan_h2.bmp",0,0
gosub *syasei2
>I come, shooting semen onto the Dullahan's head as I rejoice in the ridicule hurled on me by the crowd.\
>I don't care about my journey any longer...@
>I just want to be able to feel this pleasure forever.\
gosub *anten
>Thus I abandon my quest, and begin my life as a slave to the spectacle...\
>............\
goto *badend



*kerberos_start

mov $name,"Cerberus"
mov $name2,"Cerberus"
mov $lavel,"kerberos"
mov $tatie1,"kerberos_st01"
mov $tatie2,"kerberos_st02"
mov $tatie3,"kerberos_st03"
mov $tatie4,"kerberos_st02"
mov $haikei,"bg084"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,2000
if %nanido=2 mov %max_enemylife,2200
if %nanido=3 mov %max_enemylife,2400
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,90
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %music,1
mov %tikei,0
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't push her off!"
mov $mogaku_anno2,"Luka forced the Cerberus off him!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Those thin arms can't overpower me!"
mov $mogaku_sel2,"Useless. All that's left for you is to be raped."
mov $mogaku_sel3,"So you think you can escape?"
mov $mogaku_sel4,"Pointless. You're going to come any moment."
mov $mogaku_sel5,"Your struggling just makes the audience's cheers get louder!"
mov $mogaku_earth_dassyutu1,"What's with that strength!?"
mov $mogaku_earth_dassyutu2,""
mov $half_s1,"Heh, are you about to come?"
mov $half_s2,"Give up, and surrender to pleasure."
mov $kiki_s1,"Hah, you're already starting to leak."
mov $kiki_s2,"All that's left is to show your pathetic loss to the audience."
mov %end_n,6
mov %exp_minus,6000
mov %zmonster_x,-300
mov %tukix,350
mov %owaza_count1a,2
gosub *face2
name $name
>Heh, a boy that looks like he's worth raping.\
name ""
name $name
>We'll let you come as much as you want.\
name ""
name $name
>The audience will love seeing you get raped.\
name ""
>The three heads all talk at the same time.@
>It looks like they're independent of each other...\
name "Luka"
>Alright, here I go!\
name ""
>Recovering from the bizarre initial sight, I ready my sword.\
gosub *face1
goto *common_main



*kerberos_v

gosub *face3
name $name
>S...Strong!\
name ""
name $name
>W...We give up!\
name ""
>The Cerberus admits defeat!\
mov %viclose,1:gosub *victory
mov %getexp,5000:gosub *lvup
mov %2270,1
goto *sean0169



*kerberos_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>You surrender?@
>Then all that remains is to be raped!\
name ""
goto *kerberos_a



*kerberos_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *kerberos_kousan
if %cmd1=16 goto *kerberos_onedari
if %cmd1=17 goto *common_skill
goto *kerberos_main



*kerberos_a

if %kousoku=1 gosub *kerberos_a5:goto *common_main
rnd2 %ransu,1,4
if %ransu=1 gosub *kerberos_a1:goto *common_main
if %ransu=2 gosub *kerberos_a2:goto *common_main
if %ransu=3 gosub *kerberos_a3:goto *common_main
if %ransu=4 && %owaza_count1a>3 gosub *kerberos_a4:goto *common_main
skip -5



*kerberos_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Ha ha ha!"
if %ransu=2 mov $sel1,"How does our paw feel?"
if %ransu=3 mov $sel1,"We'll squeeze it out!"
name $name
eng $sel1:$sel6\
name ""
skillname "Shake Job"
dwave 1,"se\ero_koki1.ogg"
eng "The Cerberus tightly grabs Luka's penis, and shakes it up and down!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
\
>Luka's penis twitches under the tight grip of her soft paw!
skillcount2 3285
if %nanido<2 damage 35,40
if %nanido=2 damage 40,45
if %nanido=3 damage 45,50
skillname ""
if %mylife=0 sub %stack,1:return *kerberos_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kerberos_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"How's this!?"
if %ransu=2 mov $sel1,"Does our chest feel good?"
if %ransu=3 mov $sel1,"Three sets make it even better!"
name $name
eng $sel1:$sel6\
name ""
skillname "Triple Tit Fuck"
>The Cerberus forces Luka's penis between her multiple sets of breasts!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
>Luka's penis is crushed by her three sets of soft breasts!\
skillcount2 3286
mov %damage_nobr,1
dwave 1,"se\ero_koki1.ogg"
if %nanido<2 damage 12,17
if %nanido=2 damage 15,20
if %nanido=3 damage 18,23
mov %damage_nobr,1
dwave 1,"se\ero_koki1.ogg"
if %nanido<2 damage 12,17
if %nanido=2 damage 15,20
if %nanido=3 damage 18,23
dwave 1,"se\ero_koki1.ogg"
if %nanido<2 damage 12,17
if %nanido=2 damage 15,20
if %nanido=3 damage 18,23
skillname ""
if %mylife=0 sub %stack,1:return *kerberos_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kerberos_a3

add %stack,1
rnd2 %ransu,1,2
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 goto *kerberos_a3a
if %ransu=2 goto *kerberos_a3b



*kerberos_a3a

name $name
>I'll suck your cock!\
name ""
skillname "Triple Blowjob"
eng "The Cerberus' three heads move toward Luka's groin!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3287
dwave 1,"se\ero_buchu2.ogg"
>The first head gently nibbles on Luka's penis!
if %nanido<2 damage 14,19
if %nanido=2 damage 17,22
if %nanido=3 damage 20,25
name $name
>I'll suck out your semen!\
name ""
dwave 1,"se\ero_buchu2.ogg"
>The second head sucks powerfully on Luka's penis!
if %nanido<2 damage 14,19
if %nanido=2 damage 17,22
if %nanido=3 damage 20,25
name $name
>Hehehe... Which mouth feels the best?\
name ""
dwave 1,"se\ero_buchu2.ogg"
>The third head sucks in Luka's penis, and quickly pumps it!
if %nanido<2 damage 14,19
if %nanido=2 damage 17,22
if %nanido=3 damage 20,25
skillname ""
if %mylife=0 sub %stack,1:return *kerberos_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kerberos_a3b

name $name
>Come on... Let's all do it at once.\
name ""
name $name
>Hehe, I'll lick it all over.\
name ""
name $name
>This will feel amazing, so get ready!\
name ""
skillname "Triple Blowjob"
eng "All three heads shoot toward Luka's groin at the same time!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3287
>Three mouths all suck and lick Luka's penis at the same time!\
mov %damage_nobr,1
dwave 1,"se\ero_buchu2.ogg"
if %nanido<2 damage 14,19
if %nanido=2 damage 17,22
if %nanido=3 damage 20,25
mov %damage_nobr,1
dwave 1,"se\ero_buchu2.ogg"
if %nanido<2 damage 14,19
if %nanido=2 damage 17,22
if %nanido=3 damage 20,25
dwave 1,"se\ero_buchu2.ogg"
if %nanido<2 damage 14,19
if %nanido=2 damage 17,22
if %nanido=3 damage 20,25
skillname ""
if %mylife=0 sub %stack,1:return *kerberos_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kerberos_a4

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name $name
>It's time for some fun!\
name ""
skillname "Push Down"
eng "The Cerberus forces Luka down, and mounts him!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=1 mov $sel1,"But the wind pushes her off!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>Luka is being held down by the Cerberus!\
skillname ""
if %kousan=2 sub %stack,1:return
gosub *face2
if %first_sel1=1 skip 16
>As soon as the Cerberus gets on top of me, the crowd goes wild.\
>The moment they've been waiting for has almost arrived...@
>Me, the defeated loser, being raped by the stronger female monster.\
name $name
>I'm looking forward to today's public mating show...@
>I'll make you impregnate me, right in front of everyone!\
name ""
>The Cerberus shows off her vagina to me.@
>Heat comes off her pink opening, already wet and waiting.\
name "Luka"
>Guh... !@> Stop!\
name ""
>Being raped by a monster in front of so many people...@
>I can't let her do that to me here!\
skip 5
name $name
>Now, this time I'll rape you in front of everyone...@
>Give up and mate with me!\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,1
if %earth=0 && %nanido=2 mov %genmogaku,1
if %earth=0 && %nanido=3 mov %genmogaku,1
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
sub %stack,1
return



*kerberos_a5

add %stack,1
name $name
>It's time for the public mating show!\
name ""
skillname "Evil Dog's Adultery"
dwave 1,"se\ero_pyu5.ogg"
lsp 690,":a;chara\kerberos_ct01.bmp",0,0:print 10,500
>The Cerberus drops her waist, forcing Luka into her waiting pussy!
skillcount2 3288
mov %damage_kotei,1
damage 80,100
mov %kousoku,2
>Luka is being raped by the Cerberus!\
skillname ""
if %mylife=0 sub %stack,1:return *kerberos_h4
name "Luka"
>Ahhh!\
name $name
>Hehe, how do we feel?@
>Let's give the crowd a good show, while I force you to mate with me...\
name ""
if %kousan=2 sub %stack,1:return
sub %stack,1
rnd2 %ransu,1,2
if %ransu=1 goto *kerberos_a6
if %ransu=2 goto *kerberos_a7



*kerberos_a6

add %stack,1
>Luka is being raped by the Cerberus...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hehe... Our inside feel incredible, doesn't it?":mov $sel2,"The Cerberus clamps down on Luka's penis!"
if %ransu=2 mov $sel1,"Every spectator is waiting for the moment of impregnation!":mov $sel2,"Luka's stimulated by the Cerberus' warm insides!"
if %ransu=3 mov $sel1,"We'll make it even tighter...!":mov $sel2,"The Cerberus squeezes down on Luka with her soft pussy!"
if %ransu=4 mov $sel1,"We'll make you come while everyone watches...":mov $sel2,"The Cerberus tightens down hard on Luka's penis!"
if %ransu=5 mov $sel1,"Hehe, we can feel your dick rubbing inside us...":mov $sel2,"Wet juices come out of the Cerberus, and drip down Luka's thigh!"
name $name
eng $sel1:$sel6\
name ""
skillname "Evil Dog's Adultery"
dwave 1,"se\ero_chupa4.ogg"
eng $sel2:$sel6
skillcount2 3288
mov %damage_kotei,1
damage 80,100
skillname ""
if %mylife=0 sub %stack,1:return *kerberos_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
if %kousan=2 sub %stack,1:return
sub %stack,1
rnd2 %ransu,1,2
if %ransu=1 goto *kerberos_a6
if %ransu=2 goto *kerberos_a7



*kerberos_a7

add %stack,1
>Luka is being raped by the Cerberus...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hahaha, come!":mov $sel2,"The Cerberus shakes wildly, moving all over the place!"
if %ransu=2 mov $sel1,"Let's get a little rough!":mov $sel2,"The Cerberus violently pumps Luka!"
if %ransu=3 mov $sel1,"Heh, well? Can't take it, can you?":mov $sel2,"While keeping Luka all the way inside, the Cerberus shakes all over the place!"
if %ransu=4 mov $sel1,"How about these movements!?":mov $sel2,"The Cerberus goes crazy, tossing Luka around!"
if %ransu=5 mov $sel1,"I'll force you to shoot your come in me!":mov $sel2,"The Cerberus grinds against Luka, raping him mercilessly!"
name $name
eng $sel1:$sel6\
name ""
skillname "Wild Shake"
dwave 1,"se\ero_chupa3.ogg"
>The Cerberus gives in to primal desire!@
eng $sel2:$sel6
skillcount2 3289
mov %damage_kotei,1
damage 90,110
skillname ""
if %mylife=0 sub %stack,1:return *kerberos_h6
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
if %kousan=2 sub %stack,1:return
sub %stack,1
rnd2 %ransu,1,2
if %ransu=1 goto *kerberos_a6
if %ransu=2 goto *kerberos_a7



*kerberos_onedari

mov $list1,"Shake Job"
if %3285>0 mov %list_num1,1
mov $list2,"Triple Tit Fuck"
if %3286>0 mov %list_num2,1
mov $list3,"Triple Blowjob"
if %3287>0 mov %list_num3,1
mov $list4,"Evil Dog's Adultery"
if %3288>0 mov %list_num4,1
mov $list5,"Wild Shake"
if %3289>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *kerberos_onedari1
if %cmd1=12 goto *kerberos_onedari2
if %cmd1=13 goto *kerberos_onedari3
if %cmd1=14 goto *kerberos_onedari4
if %cmd1=15 goto *kerberos_onedari5
if %cmd1=-1 goto *kerberos_main
goto *kerberos_onedari



*kerberos_onedari1

gosub *onedari_syori
name $name
>You want to be defeated by our paws?@
>I'll enjoy this...\
name ""
gosub *kerberos_a1
skip -1



*kerberos_onedari2

gosub *onedari_syori
name $name
>You want to be defeated by our breasts?@
>I'll enjoy this...\
name ""
gosub *kerberos_a2
skip -1



*kerberos_onedari3

gosub *onedari_syori
name $name
>You want to be defeated by our mouths?@
>I'll enjoy this...\
name ""
gosub *kerberos_a3
skip -1



*kerberos_onedari4

gosub *onedari_syori_k
name $name
>You want to mate with us?@
>Then we'll rape you like an animal...\
name ""
if %kousoku=0 gosub *kerberos_a4
gosub *kerberos_a5
gosub *kerberos_a6
skip -1



*kerberos_onedari5

gosub *onedari_syori_k
name $name
>You want us to give in to desire and fuck you senseless?@
>Then we'll rape you like an animal...\
name ""
if %kousoku=0 gosub *kerberos_a4
gosub *kerberos_a5
gosub *kerberos_a7
skip -1



*kerberos_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\kerberos_bk03.bmp",0,0
gosub *syasei2
>Unable to endure her soft paws, Luka comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2570,%2570+1:if %2570=1 mov %count_koenemy,%count_koenemy+1
if %2570>%count_most mov %count_most,%2570:mov $count_mostname,$name
count 5,9
mov $bad1,"Luka gave in to the Cerberus' soft paws."
gosub *face2
name $name
>Look at your semen all over our paws...@
>How pathetic.\
name ""
goto *kerberos_ha



*kerberos_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\kerberos_bk02.bmp",0,0
gosub *syasei2
>Unable to endure the feeling of her multiple breasts, Luka orgasms.\
mov %viclose,1:gosub *lose
mov %2570,%2570+1:if %2570=1 mov %count_koenemy,%count_koenemy+1
if %2570>%count_most mov %count_most,%2570:mov $count_mostname,$name
count 7,9
mov $bad1,"Luka gave in to the Cerberus' triple tit fuck."
gosub *face2
name $name
>Look at your semen all over our breasts...@
>How pathetic.\
name ""
goto *kerberos_ha



*kerberos_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\kerberos_bk01.bmp",0,0
gosub *syasei2
>With all three of her head's licking and sucking on him, Luka comes, causing them to fight over the ejected semen.\
mov %viclose,1:gosub *lose
mov %2570,%2570+1:if %2570=1 mov %count_koenemy,%count_koenemy+1
if %2570>%count_most mov %count_most,%2570:mov $count_mostname,$name
count 4,9
mov $bad1,"Luka gave in to the Cerberus' triple blowjob."
gosub *face2
name $name
>Nnn...@> What a nice meal you gave us.@
>Your semen tastes quite good...\
name ""
goto *kerberos_ha



*kerberos_h4

mov %ikigoe,3:gosub *ikigoe
name $name
>What, already done?\
name ""
gosub *syasei1
lsp 690,":a;chara\kerberos_ct02.bmp",0,0
lsp 694,":a;chara\kerberos_bk04.bmp",0,0
gosub *syasei2
>The moment Luka was forced into her warm pussy, he shivers and comes, shooting his semen into her.\
mov %viclose,1:gosub *lose
mov %2570,%2570+1:if %2570=1 mov %count_koenemy,%count_koenemy+1
if %2570>%count_most mov %count_most,%2570:mov $count_mostname,$name
count 1,9
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Just from insertion, Luka accidentally ejaculated."
gosub *face2
name $name
>How pathetic...@
>Unable to endure our pussy for even a few seconds.\
name ""
goto *kerberos_hb



*kerberos_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\kerberos_ct02.bmp",0,0
lsp 694,":a;chara\kerberos_bk04.bmp",0,0
gosub *syasei2
>Unable to take her tight pussy any longer, Luka comes, recoiling in horror at the crowd's cheers.\
mov %viclose,1:gosub *lose
mov %2570,%2570+1:if %2570=1 mov %count_koenemy,%count_koenemy+1
if %2570>%count_most mov %count_most,%2570:mov $count_mostname,$name
count 1,9
mov $bad1,"Raped by the Cerberus, Luka gave in."
gosub *face2
name $name
>Hehe, you did it.@
>Well?@>Did our insides feel good?\
name ""
goto *kerberos_hb



*kerberos_h6

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\kerberos_ct02.bmp",0,0
lsp 694,":a;chara\kerberos_bk04.bmp",0,0
gosub *syasei2
>Tossed around like a doll by the Cerberus' wild rape, Luka gives in, shooting his semen into her waiting pussy.\
mov %viclose,1:gosub *lose
mov %2570,%2570+1:if %2570=1 mov %count_koenemy,%count_koenemy+1
if %2570>%count_most mov %count_most,%2570:mov $count_mostname,$name
count 1,9
mov $bad1,"Raped senseless by the Cerberus, Luka is forced to come."
gosub *face2
name $name
>Hehe, you did it.@
>Our movements are incredible, aren't they?\
name ""
goto *kerberos_hb



*kerberos_ha

mov $bad2,"Played with in front of the crowd, Luka is forced to come over and over again."
if %2822=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2822,1
name "Luka"
>Ahhh...\
name ""
name $name
>Hehehe, you came so much.\
name ""
>Weak from my orgasm, I stand helpless as her three heads approach me.@
>Exhausted, I can only look on as I feel their hot breath on my penis.\
name "Young Spectator Girl"
>Waah... She's going to give a blowjob with all three heads! \
name ""
name "Young Lady"
>Her blowjob is amazing, too.@
>That boy won't even last a minute!\
name ""
>Unable to do anything in the middle of the arena, I'm forced to listen to the cheers and insults of the crowd as they comment on what's about to happen.\
cspl 690,699
;lsp 700,":a;chara\kerberos_ha1.bmp",0,0:print 10,5									;patch
>Then, as if responding to the crowd's wishes, three long tongues reach out from the Cerberus' heads toward my penis.\
name "Luka"
>Ahhh!\
name ""
>With long, quick licks, all three tongues attack my penis from three different directions.\
name $name
>We'll make you come over and over in front of all these girls...@
>All we have to do is lick you a little like this...\
name ""
>Her three tongues give long, deep licks down the full length of my penis.@
>Each time, drips of saliva cover my penis.\
>After a few licks, her warm saliva is dripping off the tip of my penis.\
>Already humiliated at the sight of her doing whatever she wants, the jeers of the crowd just crush my spirit even more.\
name "Luka"
>Ahh... Stop it...\
name ""
name $name
>Hehehe, we use our saliva to mark things that belong to us...@
>Right in front of the audience, we're making your penis into our thing...\
name ""
name "Young Spectator Girl A"
>Ahaha, his penis is all sticky with drool!@
>Hey kid, aren't you happy?@> Your penis now belongs to her! \
name ""
name "Young Spectator Girl B"
>What the heck is that...?@>He's actually happy at being covered in spit?@
>That boy is disgusting...\
name ""
>The audience laughs at my saliva covered penis.@
>Too exhausted to do anything, all I can do is feebly shake my body in protest.\
name $name
>Now that it's ours, it's time to make it come...@
>Come on now, give the crowd a good show!\
name ""
name "Luka"
>Ahhh!\
name ""
mov %hseanvoice,1:hseanvoice
>Their tongues start to move even faster.@
>Completely unlike when they were just spreading saliva on me, their movements are totally different.\
>Each tongue focuses on a different area, licking and wrapping around different parts.\
>One tongue gently pokes and licks the tip of my penis.@
>Another wraps around my balls, and gently squeezes on them.@
>The third licks up and down the back of my penis.\
name "Luka"
>Ahh...@> That feels good...\
name ""
>I look down through hazy eyes at the monster forcing forbidden pleasure into me.@
>Unable to do anything against the triple stimulation, I quickly give in to her.\
name "Luka"
>Coming... Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>I moan as I reach a climax, shooting semen onto her heads.@
>Each head fights the other, as her tongues fight each other to get a taste of my seed.\
name "Young Spectator Girl"
>Aha, this time the boy marked the Cerberus with his semen. \
name ""
name "Young Lady"
>Hehe, just like I thought. Not even a minute.@
>It's always hilarious when the loser is a premature ejaculator.\
name ""
>I ejaculate to the cheers of the audience, still throwing insults and criticizing my display.\
>The Cerberus lifts her heads, all three having a superior grin on their face.\
name $name
>Hehe, you came.@
>Nnnn... *Lick*\
name ""
mov %hseanvoice,2:hseanvoice
>The tongue's work together to squeeze out the last of my semen.@
>One of them massages my balls, while another wraps around my shaft, with the third catching the semen squeezed out of my tip.\
name "Luka"
>Ah...!@> Ahhh!\
name ""
>Sensitive after my orgasm, I moan out loud at the intense stimulation.\
name $name
>Alright, this time we'll be rougher.@
>We'll indulge all the way in your delicious penis...\
name ""
name "Luka"
>N...No way...@>Ahhh!\
name ""
>The Cerberus bends down again, as all three sets of her lips clamp down my penis.@
>Their noses rub together as they jostle to get their mouths around more of my penis.\
>Sandwiched between their three heads, I moan at the unexpected new pleasure.\
>Quickly overpowered by the three mouths, it feels like my lower body is melting away.\
name "Luka"
>Ah!@>A...Amazing...!\
name ""
name $name
>Nnn... *Kiss*@>*Suck*\
name ""
>The three heads continue to fight each other to get more of me in their mouths.@
>At the same time, wet sounds fill the arena as they sloppily suck and lick me.\
>It's as if my penis really is just food for this dog to devour...\
name "Luka"
>Ahhh...\
name ""
>I moan as I feel the rest of the power drain from my body, sucked out by the feeling of their soft lips crushing my penis between them.\
name $name
>It's time to send you to heaven...@
>Give us a lot of your delicious sperm...\
name ""
>One mouth suddenly pushes the other aside, and clamps down on the tip of my penis.@
>Without any delay, she starts to powerfully suck on it.\
name "Luka"
>Ah!\
name ""
>As the one mouth sucks on my tip, the other two tongues start to slowly wrap around the rest of my penis.\
>After barely any time at all, I surrender again to their hungry mouths.\
name "Luka"
>Ahhhhh!!\
name ""
gosub *syasei1:gosub *syasei2
>My semen pours into the center head's mouth.@
>With a loud gulp, the Cerberus swallows it.\
name "Young Spectator Girl A"
>Haha, he shot it right into her mouth! @
>Hey boy, did it feel good to pee semen right into her mouth?\
name ""
name "Young Spectator Girl B"
>Haha, he fed the monster!@
>Even though he's so young, he's already so pathetic!\
name ""
>The female audience points and laughs at me as the Cerberus sucks down the last of my semen.\
mov %hseanvoice,0:hseanvoice
name $name
>Hehe... Your semen is quite delicious.@
>Did you enjoy having your semen drunk in front of a crowd?\
name ""
name "Luka"
>Ahh...\
name ""
>Disgraced in front of such a huge crowd, there's no future for me as a Hero anymore...\
gosub *anten
>With my spirit crushed, I gave up any hope of fighting against a monster again...@
>There's no point in continuing my journey, because I'm just a monster's toy...\
>........\
goto *badend



*kerberos_hb

mov $bad2,"Played with in front of the crowd, Luka is forced to mate over and over again."
if %2823=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2823,1
name "Luka"
>Ahhh...\
name ""
if %kousoku>0 mov %hseanwave,9:hseanwave:goto *kerberos_hc
name $name
>Hehehe... You let out so much.\
>We feel good today... So we'll do a public mating show!@
>We'll force you to come a lot inside us!\
name ""
>Exhausted, I'm easily pushed down by the Cerberus.@
>She climbs on top of me, and shows off her pussy in front of my face.\
name $name
>We're going to rape you with this...@
>Right in front of this huge crowd, we're going to force you to make a child with us!\
name ""
>Wet liquid drips out of her pussy, almost as if it's drooling.\
name "Young Spectator Girl"
>Ah! An impregnation show!\
name ""
name "Young Lady"
>Hehe... This is a rare one.@
>I'm really glad I came today!\
name ""
>The audience members all stand up and start to cheer.\
>The moment they've been waiting for is finally coming...@
>The loser being raped by the victor...\
name $name
name "Luka"
>N...Not that!@>Stop!\
name ""
>Being raped in front of such a huge crowd...@
>And being forced to get her pregnant!?\
>I struggle as hard as I can to prevent this humiliation.@
>But no matter how hard I try, I'm too exhausted to break free.\
name "Luka"
>Don't...@> Please, I'm begging you, stop...\
name ""
name $name
>Hehehe... We love it when they cry so pitifully.@
>The audience loves it, too.\
name ""
>She slowly moves her pussy toward the tip of my penis.@
>She slowly starts to force me inside her, making sure I'm watching.\
>It's as if her pussy is slowly devouring my penis...\
mov %hseanwave,9:hseanwave
cspl 690,699
lsp 690,":a;chara\kerberos_ct01.bmp",0,0:print 10,500
name "Luka"
>Ahhh!\
name ""
name $name
>Hehehe, it's going in.@
>We'll enjoy this a lot...\
name ""
goto *kerberos_hc



*kerberos_hc

>Her soft, hot pussy clamps down tightly around me.@
>Slowly being forced into her, I feel every single crease and fold inside of her rub against my tip.\
>Helpless, I can only shiver and shake my head side to side as the crowd claps and cheers to her slowly dropping waist.\
name "Young Spectator Girl A"
>Kyaa!@>It went in! @
>The boy's face looks so happy! \
>Hey, boy!@>How does it feel to lose your virginity?@> Hahaha!\
name ""
name "Young Spectator Girl B"
>Hey boy, why don't you try moving!@
>Move!@>Move!\
name ""
name $name
>Hehe... Do you hear your fans?@
>Why don't you try moving a little...?\
name ""
name "Luka"
>Ah...Ahh...\
name ""
>I can't move inside of her...@
>I already feel myself close to an orgasm, just the slightest thing is going to force me to climax...\
name $name
>So you can't do it?@
>Then allow us...\
name ""
>The Cerberus looks down at me, with three cruel smiles on her face.@
>Staring right into my eyes with all six of hers, she starts to slowly move.\
>Her movements are long and slow, trying to tease and bring me right to the edge.@
>All the way out, then all the way back in, slowly...\
name $name
>Come on, the audience is waiting...@
>They're all waiting for the moment you impregnate us...\
name ""
>She clamps down tighter around me, and starts to move a little bit faster.@
>Up and down, she uses her body weight to make sure I'm forced all the way inside until I hit the entrance to her womb.\
name "Luka"
>Ahh... I...Incredible...\
name ""
>Stuck at the edge of an orgasm for so long, I give in to the desire of my body.@
>My head shakes side to side as I feel my penis start to pulse, causing my eyes to meet the gazes of the girls in the audience.\
gosub *syasei1
lsp 690,":a;chara\kerberos_ct02.bmp",0,0
lsp 694,":a;chara\kerberos_bk04.bmp",0,0
gosub *syasei2
name "Luka"
>Ahhh...\
name ""
>With powerful throbs, I shoot my semen right into the Cerberus' waiting pussy.\
name $name
>Hehe, you gave us so much...@
>Take a look around... They're all laughing at you.\
>They're all staring at your pathetic face, open and drooling at being dominated by me.@
>Hundreds of people just watched you, naked and being raped, forced to impregnate us...\
name ""
name "Young Spectator Girl A"
>Awww, he came in her vagina!@
>You're going to be the father of a monster's baby.@> Good for you! \
name ""
name "Young Spectator Girl B"
>Uwa, look at him drool...@
>He just mated with a monster... How disgusting.\
name ""
name "Luka"
>Ahhh...\
name ""
>Forced to mate with the Cerberus while the crowd insults me, this mating show chips away at my spirit.@
>Every movement from the Cerberus strips away more and more of my pride as a man.\
csp 690:print 10,500
mov %hseanwave,0:hseanwave
name $name
>Look, you came so much in here...\
name ""
>The Cerberus stands up, and spreads her pussy open.@
>My cloudy white semen slowly drips out.\
>The crowd goes crazy with cheers at the spectacle, as I recoil in shame.\
name $name
>Hehehe, the mating show isn't over yet.@
>Just this little won't satisfy the audience!\
name ""
name "Luka"
>Stop already... Ahhhh!\
name ""
mov %hseanwave,10:hseanwave
lsp 690,":a;chara\kerberos_ct02.bmp",0,0:print 10,500
>The Cerberus quickly sits down on me again, forcing me all the way in.\
>Even though I'm already mentally and physically broken, she only redoubles her efforts.@
>Even more rough than before, she shakes her hips like a crazed animal.\
name $name
>How's this!?@
>More, more!@>We'll rape you and make you give us more of your semen!\
name ""
name "Luka"
>Aiiee!@> Ahhh!\
name ""
>It's vastly different from her slow, skilled movements from before.@
>Now it's as if she has given in to her base instincts, and is just ravishing me.\
>Her pussy that already robbed me of my freedom forces even more pleasure into my exhausted body.@
>Her soft vagina tightens around me, ensuring that I don't slip out of her in the middle of her violent movements.\
>Helpless under her overpowering movements, I feel myself surrendering to her power again.\
name "Luka"
>Ahh... C...Coming again!\
name ""
name $name
>Hehehe, come as much as you want...@
>Every time your semen floods into my womb, my breeding instinct makes me feel so good!\
>More!@>Let the crowd watch you give in and orgasm again!\
name ""
name "Luka"
>I...I'm coming!@
>Ahhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\kerberos_ct03.bmp",0,0
gosub *syasei2
>My penis twitches, shooting semen into her pussy.@
>With a triumphant smile on her face, she slowly starts to calm down again.\
>Completely drained of power, I lean back as the last drops shoot into her.\
name "Young Spectator Girl"
>Aha, he came inside her again. @
>Now she'll be pregnant for sure.@> Congratulations. \
name ""
name "Young Lady"
>Monsters mating with boys looks pretty rough.@
>To think that made him pump her with so much semen... Hehe.\
name ""
>The crowd cheers as the Cerberus shows off the semen I shot into her again.@
>Raped and stripped of all my pride as a man, I accept my total defeat.\
gosub *anten
mov %hseanwave,0:hseanwave
>After that, I couldn't fight against a monster again.@
>Unable to do anything, I'm just a monster's toy...\
>There's no point in continuing my journey...\
>............\
goto *badend



*arumaeruma2_start

mov $name,"Alma Elma"
mov $name2,"Alma Elma"
mov $lavel,"arumaeruma2"
mov $tatie1,"arumaeruma_st21"
mov $tatie2,"arumaeruma_st22"
mov $tatie3,"arumaeruma_st23"
mov $tatie4,"arumaeruma_st22"
mov $haikei,"bg084"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,15000
if %nanido=2 mov %max_enemylife,15000
if %nanido=3 mov %max_enemylife,15000
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,10
if %nanido=3 mov %earth_keigen,5
mov %music,11
mov %tikei,0
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov %end_n,6
mov %exp_minus,13000
mov %zmonster_x,-270
mov %tukix,300
name $name
>Well then... Forget all your troubles, and have some fun in a match against me.\
>Right now, lets just forget the Heavenly Knight and the Hero thing... \
name ""
name "Luka"
>Guh...!\
name ""
>Only a short while ago, I was barely able to survive against her tail...@
>As I am now, will I be able to fight against her?\
lsp2 0,":a;chara\sylph_st03.bmp",250,300,100,100,0,200
gosub *syoukan_effect
name "Sylph"
>Luka, summon me right away!@
>That girl's wind is amazing!@
>If you don't combat it with your wind, you'll be destroyed!\
name ""
name "Luka"
>Eh...?@> G...Got it!\
name ""
name $name
>Ara... Talking with Sylphy?@
>How about you show me what you can do with that wind power...?\
name ""
mov %sinkou,1
goto *common_main



*arumaeruma2_v

if %nanido=0 goto *arumaeruma2_v2
name $name
>But it's the same result...@
>Your attack can't reach me...\
name ""
skillname "Sweet Blow"
>Alma Elma buries her face in Luka's groin!\
wait 500
skillname "Playful Wind"
dwave 1,"se\miss.ogg"
eng "But moving like the wind, Luka easily dodges!":$sel6/
wait 500
\
skillname ""
name $name
>Arara...@
>If neither of us can hit the other, I guess we're stuck...\
name ""
name "Luka"
>It seems like it...\
name ""
>With both of us moving at the same speed, neither can reach the other.@
>In that case, how is this going to end...?\
>As I think about what to do next, Alma starts to speak.\
goto *arumaeruma2_v2



*arumaeruma2_v2

name $name
>...I guess it's my loss then.@
>Just for you, I'll hand over the prize. \
name ""
name "Luka"
>Wh...What!?\
name ""
>Alma is admitting defeat...?@
>But we're evenly matched, aren't we...?\
>Stunned at her sudden declaration, I can't say anything as she continues speaking.\
name $name
>...So, I surrender.@
>Luka-boy...@>Congratulations on your victory. \
name ""
mov %viclose,1:gosub *victory
mov %getexp,5000:gosub *lvup
mov %2271,1
mov %skill02,2
goto *sean0173



*arumaeruma2_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>Arara... You want me to play with you?@
>In that case, I'll end this now...\
name ""
gosub *arumaeruma2_a9



*arumaeruma2_main

gosub *cmd_main
if %cmd1=11 && %nanido=0 goto *common_attack
if %cmd1=11 goto *arumaeruma2_attack
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *arumaeruma2_kousan
if %cmd1=16 goto *arumaeruma2_onedari
if %cmd1=17 && %nanido=0 goto *common_skill
if %cmd1=17 goto *arumaeruma2_skill
goto *arumaeruma2_main



*arumaeruma2_attack

mov %before_action,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ha!"
if %ransu=2 mov $sel1,"Hya!"
if %ransu=3 mov $sel1,"Take this!"
name "Luka"
eng $sel1:$sel6\
name ""
mov %skill_sub,1
gosub *common_attack2
gosub *mp_kaihuku:gosub *mp
dwave 2,"se\miss.ogg"
csp 700:print 1
eng "But Alma Elma moves like the wind, and easily dodges Luka's sword!":$sel6/
gosub *face1
\
if %first_sel1=1 goto *arumaeruma2_a
name "Luka"
>What was with that movement!?\
name ""
>It looked like she teleported or something!@>What's with that speed!?\
mov %first_sel1,1
goto *arumaeruma2_a



*arumaeruma2_skill

gosub *cmd_skill
if %cmd1=21 goto *arumaeruma2_skillx1
if %cmd1=22 goto *arumaeruma2_skillx1
if %cmd1=23 goto *arumaeruma2_skillx1
if %cmd1=24 goto *skill4
if %cmd1=25 goto *arumaeruma2_skillx1
if %cmd1=31 && %skill02=2 goto *skill7b
if %cmd1=31 goto *skill7
if %cmd1=32 goto *skill8
if %cmd1=35 goto *skill17
if %cmd1=-1 goto "*"+$lavel+"_main"
goto *arumaeruma2_skill



*arumaeruma2_skillx1

if %cmd1=21 mov %skill_sub,1:gosub *skill1:skip 4
if %cmd1=22 mov %skill_sub,1:gosub *skill6:skip 3
if %cmd1=23 mov %skill_sub,1:gosub *skill3:skip 2
if %cmd1=25 mov %skill_sub,1:gosub *skill5
mov %skill_sub,0
dwave 2,"se\miss.ogg"
csp 700:print 1
eng "But Alma Elma moves like the wind, and easily dodges Luka's sword!":$sel6/
gosub *face1
\
skillname ""
if %first_sel1=1 goto *arumaeruma2_a
name "Luka"
>What was with that movement!?\
name ""
>It looked like she teleported or something!@>What's with that speed!?\
mov %first_sel1,1
goto *arumaeruma2_a



*arumaeruma2_a

if %wind=0 gosub *arumaeruma2_a9:goto *common_main
if %turn=1 gosub *arumaeruma2_a3:goto *common_main
if %turn=2 gosub *arumaeruma2_a4:goto *common_main
if %turn=3 gosub *arumaeruma2_a5:goto *common_main
if %turn=4 gosub *arumaeruma2_a5b:goto *common_main
if %turn=5 gosub *arumaeruma2_a6:goto *common_main
if %turn=6 gosub *arumaeruma2_a7:goto *common_main
if %turn=7 gosub *arumaeruma2_a8:goto *common_main
if %turn=8 goto *arumaeruma2_v



*arumaeruma2_a3

add %stack,1
name $name
>Here I come... I'm going to catch you. \
name ""
skillname "Trap Hold"
>Alma Elma grabs Luka in a tight hug!\
wait 500
skillname "Wind Protection"
dwave 2,"se\wind2.ogg"
eng "But the wind pushes her away!"
$sel6/
wait 500
\
skillname ""
name $name
>Hmmm... So Luka-boy uses his wind like that...\
>...But that's no good.@
>If you use that strong power like that, the wind will cry you know?\
name ""
sub %stack,1
return



*arumaeruma2_a4

add %stack,1
name $name
>Look... It's this simple to break down that wall of wind.\
name ""
>Alma brings her palm up to her chin, and blows!\
>A powerful wind blasts into Luka!
if %nanido<2 damage 30,40
if %nanido=2 damage 40,50
if %nanido=3 damage 50,60
name "Luka"
>N...No way... My wall of wind...\
name ""
name $name
>Didn't I tell you?@
>Something like that is barely a breeze to me.\
name ""
sub %stack,1
return



*arumaeruma2_a5

add %stack,1
name $name
>Here... Your penis wants me to touch it, doesn't it?\
name ""
skillname "Melty Hand"
>Alma's powerful winds blow away Luka's wall of wind!\
dwave 1,"se\ero_koki1.ogg"
>Easily reaching him, her hand massages his penis through his pants!
skillcount2 3290
if %nanido<2 damage 70,80
if %nanido=2 damage 95,105
if %nanido=3 damage 120,130
skillname ""
if %mylife=0 sub %stack,1:return *arumaeruma2_h1
name "Luka"
>Guh!\
name ""
>I can't win like this...@
>The way we use the same power is like a night and day difference...\
sub %stack,1
return



*arumaeruma2_a5b

add %stack,1
gosub *face2
name $name
>Aha... Not good enough, eh Luka-boy? \
name ""
>Alma Elma giggles.\
gosub *face1
sub %stack,1
return



*arumaeruma2_a6

add %stack,1
name $name
>Hehe... Should I get a little bit serious?\
name ""
skillname "Sweet Blow"
>Alma's powerful winds blow away Luka's wall of wind!\
dwave 1,"se\ero_pyu2.ogg"
>Alma Elma licks Luka's penis over his pants!
skillcount2 3291
if %nanido<2 damage 80,90
if %nanido=2 damage 105,115
if %nanido=3 damage 130,140
skillname ""
if %mylife=0 sub %stack,1:return *arumaeruma2_h2
name "Luka"
>Guh...!\
name ""
>I can't catch Alma at all...@
>She's so fast, all I can get is her after-image...\
name $name
>Luka-boy, can't you hear the wind...?@
>The wind is crying since you're so forceful...@
>You can't force it to do anything. You have to play with it...\
name ""
name "Luka"
>Eh...?\
name ""
>Not the voice of Sylph, but the voice of the wind itself...?@
>I can't hear anything like that...\
name $name
>The wind is very whimsical, you know...@
>If you try to use it like a tool, it will just pass you by.\
>Instead of that, just give yourself over to it and join it for the ride...@
>Just like me... I'm always playing...\
name ""
name "Luka"
>Playing... With the wind?\
name ""
>Instead of trying to use it like a tool, play with it...?@
>I think I can see what she's saying a little bit...\
sub %stack,1
return



*arumaeruma2_a7

add %stack,1
name $name
>Hehe... I'm getting bored with just teasing.@
>I think it's about time to wrap this match up.\
name ""
skillname "Succubatic Footwork"
>Alma's powerful winds blow away Luka's wall of wind!\
dwave 1,"se\ero_koki1.ogg"
>Alma's foot steps on Luka's groin area!
skillcount2 3292
if %nanido<2 damage 90,100
if %nanido=2 damage 115,125
if %nanido=3 damage 140,150
skillname ""
if %mylife=0 sub %stack,1:return *arumaeruma2_h3
name "Luka"
>Ahh...!\
name ""
name $name
>Luka-boy, you really can't hear the voice of the wind?@
>It's been speaking to you through Sylph for a while now...\
>Just like me, it wants to play with you more and more...\
name ""
name "Luka"
>...........\
name ""
>I feel the air moving around me in varying breezes.@
>It really does seem like it's trying to communicate with me...\
>Listen to the free desires of the wind, and channel my thoughts through Sylph to communicate with it...@
>The image starts to form in my mind.\
name "Luka"
>I think... I get it...\
name ""
>I feel Sylph's power return back inside.@
>If I summon her again with this new image...\
mov %skill02,2
mov %wind_turn,0
sub %stack,1
return



*arumaeruma2_a8

add %stack,1
name "Luka"
>Th...This is...!\
name ""
>It feels like the wind itself is part of my body.@
>As if the air around me has become an extension of my body, it feels like I can move as fast as a powerful gale.\
name $name
>Hehe, so you can do it, Luka-boy.@
>That's how you play with the wind...\
name ""
skillname "Melty Hand"
>Alma Elma reaches toward Luka's groin!\
wait 500
skillname "Playful Wind"
dwave 1,"se\miss.ogg"
eng "But moving like the wind, Luka easily dodges!":$sel6/
wait 500
\
skillname ""
name "Luka"
>...I finally understand it...@
>The wind has been speaking to me all this time...\
name ""
>Through Sylph, I can communicate back with the playful wind.@
>This must have been what Alice was saying in that quote from Heinrich...\
>Move like the wind, put earth in your...@> Imbue with...@> Infuse...@> I forget the rest.\
>At any rate, this is what they mean when they say "moving like the wind"...\
name $name
>Arara, your true self is shining through, Luka-boy.@
>You're quite skilled in your use of the wind...\
name ""
sub %stack,1
return



*arumaeruma2_a9

add %stack,1
if %kousan>0 skip 4
name $name
>I'm going to catch you. \
name ""
skillname "Trap Hold"
>Alma Elma tightly hugs Luka!\
mov %kousoku,1:gosub *status_print
>Luka is being hugged by Alma Elma!\
skillname ""
name $name
>Ahaha... Luka-boy...@> I caught you. @
>I'm sorry to say it...@> But playtime has come to an end.\
name ""
sub %stack,1
goto *arumaeruma2_a10



*arumaeruma2_a10

add %stack,1
name $name
>Let me end this in one breath...@
>I'll give you a good taste of my succubus skills... \
name ""
skillname "Succubus Arts"
dwave 1,"se\umaru.ogg"
>Alma Elma grabs Luka from behind!\
>She reaches around and grabs Luka's penis through his pants!
skillcount2 3602
mov %damage_kotei,1
damage 80,100
dwave 1,"se\ero_paizuri.ogg"
>Alma Elma quickly pushes Luka to the ground, and bends over him!\
>She puts Luka's penis between her soft breasts, and squeezes them together!
mov %damage_kotei,1
damage 80,100
dwave 1,"se\ero_sigoki1.ogg"
>While Luka still reacts to the soft feeling of her breasts, Alma Elma quickly stands up and steps on Luka's penis!
mov %damage_kotei,1
damage 80,100
dwave 1,"se\ero_simetuke2.ogg"
>Alma Elma squeezes Luka's penis between her thighs!
mov %damage_kotei,1
damage 80,100
dwave 1,"se\ero_sigoki1.ogg"
>Still locked between her thighs, Alma Elma tightens her legs together!\
>Overcome by too many different stimulations, Luka's body convulses!
mov %damage_kotei,1
damage 80,100
skillname ""
if %mylife=0 sub %stack,1:return *arumaeruma2_h4
sub %stack,1
goto *arumaeruma2_a10



*arumaeruma2_a11

add %stack,1
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll make you stain my palm with your semen. ":mov $sel2,"Alma Elma slowly pumps Luka's penis!"
if %ransu=2 mov $sel1,"If I just rub a little bit here... ":mov $sel2,"Alma Elma makes a small circle with her index finger and thumb, and quickly pumps Luka's penis!"
if %ransu=3 mov $sel1,"Hehe, it feels good, doesn't it?":mov $sel2,"Alma Elma's soft hand slowly tightens around Luka's penis!"
if %ransu=4 mov $sel1,"Just come right in my hand. ":mov $sel2,"Alma Elma gently strokes Luka's penis!"
if %ransu=5 mov $sel1,"Hehe... This is a man's weak spot.":mov $sel2,"Alma Elma's index finger gently circles the tip of Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Melty Hand"
dwave 1,"se\ero_koki1.ogg"
eng $sel2:$sel6
skillcount2 3290
if %nanido<2 damage 70,80
if %nanido=2 damage 95,105
if %nanido=3 damage 120,130
skillname ""
if %mylife=0 sub %stack,1:return *arumaeruma2_h1
sub %stack,1
return



*arumaeruma2_a12

add %stack,1
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"How does it feel to have a blowjob in front of a crowd?":mov $sel2,"She gently sucks on Luka's penis!"
if %ransu=2 mov $sel1,"I know my blowjobs are unbearable...":mov $sel2,"She pumps Luka's penis with her mouth!"
if %ransu=3 mov $sel1,"Being in a Succubus' mouth is like being in heaven...":mov $sel2,"Her tongue wraps around Luka's penis inside her mouth!"
if %ransu=4 mov $sel1,"Aren't you happy? You get to use a Succubus' mouth...":mov $sel2,"She sucks on Luka's penis as if it was candy!"
if %ransu=5 mov $sel1,"Show the audience your orgasm face...":mov $sel2,"Her soft lips close down on Luka's tip!"
name $name
eng $sel1:$sel6\
name ""
skillname "Sweet Blow"
dwave 1,"se\ero_buchu3.ogg"
>Alma Elma sucks in Luka's penis!@
eng $sel2:$sel6
skillcount2 3291
if %nanido<2 damage 80,90
if %nanido=2 damage 105,115
if %nanido=3 damage 130,140
skillname ""
if %mylife=0 sub %stack,1:return *arumaeruma2_h2
sub %stack,1
return



*arumaeruma2_a13

add %stack,1
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Aren't you ashamed at being dominated in front of so many people?":mov $sel2,"She crushes Luka's penis between her foot and his thigh!"
if %ransu=2 mov $sel1,"Aha... My feet are nice and soft, aren't they?":mov $sel2,"She squeezes Luka's tip between her toes!"
if %ransu=3 mov $sel1,"Hahaha... How is it being stepped on?":mov $sel2,"She slowly applies more and more pressure from her feet!"
if %ransu=4 mov $sel1,"I'll pinch you with my toe...":mov $sel2,"The tip of Luka's penis is pinched between two of her toes!"
if %ransu=5 mov $sel1,"It feels nice when I do this, doesn't it?":mov $sel2,"She slowly massages Luka with the ball of her foot!"
name $name
eng $sel1:$sel6\
name ""
skillname "Succubatic Footwork"
dwave 1,"se\ero_koki1.ogg"
>Alma Elma steps on Luka's groin!@
eng $sel2:$sel6
skillcount2 3292
if %nanido<2 damage 90,100
if %nanido=2 damage 115,125
if %nanido=3 damage 140,150
skillname ""
if %mylife=0 sub %stack,1:return *arumaeruma2_h3
sub %stack,1
return



*arumaeruma2_onedari

mov $list1,"Melty Hand"
if %3290>0 mov %list_num1,1
mov $list2,"Sweet Blow"
if %3291>0 mov %list_num2,1
mov $list3,"Succubatic Footwork"
if %3292>0 mov %list_num3,1
mov $list4,"Succubus Arts"
if %3602>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *arumaeruma2_onedari1
if %cmd1=12 goto *arumaeruma2_onedari2
if %cmd1=13 goto *arumaeruma2_onedari3
if %cmd1=14 goto *arumaeruma2_onedari4
if %cmd1=-1 goto *arumaeruma2_main
goto *arumaeruma2_onedari



*arumaeruma2_onedari1

gosub *onedari_syori
name $name
>Arara... You want my hands to play with you?@
>In that case... I'll end this now.\
name ""
>Alma Elma reaches out and pulls down Luka's pants!\
gosub *arumaeruma2_a11
skip -1



*arumaeruma2_onedari2

gosub *onedari_syori
name $name
>Arara... You want me to tease you with my mouth?@
>In that case... I'll end this now.\
name ""
>Alma Elma reaches out and pulls down Luka's pants!\
gosub *arumaeruma2_a12
skip -1



*arumaeruma2_onedari3

gosub *onedari_syori
name $name
>Arara... You want me to tease you with my feet?@
>In that case... I'll end this now.\
name ""
>Alma Elma forces Luka to the ground with one foot, and steps on his groin!\
gosub *arumaeruma2_a13
skip -1



*arumaeruma2_onedari4

gosub *onedari_syori
name $name
>Arara... You want to be defeated by the power of a Succubus?@
>In that case... I'll end this now.\
name ""
gosub *arumaeruma2_a9
skip -1



*arumaeruma2_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\arumaeruma_bk03.bmp",0,0
gosub *syasei2
>Unable to endure Alma's incredibly skilled hand, Luka comes, covering her palms in semen.\
mov %viclose,1:gosub *lose
mov %2571,%2571+1:if %2571=1 mov %count_koenemy,%count_koenemy+1
if %2571>%count_most mov %count_most,%2571:mov $count_mostname,$name+" (2)"
count 5,9
mov $bad1,"Luka gave in to Alma's melty hand skill."
gosub *face2
name $name
>Ah, you got it all over my hands. @
>Isn't that embarrassing, Luka-boy? \
name ""
goto *arumaeruma2_ha



*arumaeruma2_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\arumaeruma_bk01r.bmp",0,0
gosub *syasei2
>Unable to endure Alma's incredibly skilled mouth, Luka comes, filling her mouth with semen.@
>She narrows her eyes at Luka, and swallows it down.\
mov %viclose,1:gosub *lose
mov %2571,%2571+1:if %2571=1 mov %count_koenemy,%count_koenemy+1
if %2571>%count_most mov %count_most,%2571:mov $count_mostname,$name+" (2)"
count 4,9
mov $bad1,"Luka gave in to Alma's sweet blowjob."
gosub *face2
name $name
>Mmmm... You filled my mouth with semen. @
>Isn't that embarrassing, Luka-boy? \
name ""
goto *arumaeruma2_ha



*arumaeruma2_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\arumaeruma_bk15.bmp",0,0
gosub *syasei2
>Unable to take her skilled footwork any longer, Luka comes, covering her feet in semen.\
mov %viclose,1:gosub *lose
mov %2571,%2571+1:if %2571=1 mov %count_koenemy,%count_koenemy+1
if %2571>%count_most mov %count_most,%2571:mov $count_mostname,$name+" (2)"
count 6,9
mov $bad1,"Luka gave in to Alma's skilled feet."
gosub *face2
name $name
>You got my feet all dirty... @
>Isn't that embarrassing, Luka-boy? \
name ""
goto *arumaeruma2_ha



*arumaeruma2_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1

lsp 695,":a;chara\arumaeruma_bk15.bmp",0,0
gosub *syasei2
>Still being sandwiched between Alma's thighs, Luka is overcome by the multiple stimulations.\
>As the crowd cheers at Alma's skilled display, the come erupts into the air through her thighs, landing back down on her.\
mov %viclose,1:gosub *lose
mov %2571,%2571+1:if %2571=1 mov %count_koenemy,%count_koenemy+1
if %2571>%count_most mov %count_most,%2571:mov $count_mostname,$name+" (2)"
count 6,9
mov $bad1,"Luka gave in to Alma's skilled Succubus arts."
gosub *face2
name $name
>How do you like the power of a succubus?@
>You came before you even knew what was happening, didn't you?@>Hehe.\
name ""
goto *arumaeruma2_hb



*arumaeruma2_ha

mov %skill02,0
mov $bad2,"Luka kept coming back to be humiliated by the monsters in front of the Colosseum audience..."
if %2824=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2824,1
name "Luka"
>Urhg...\
name ""
>Exhausted from the pleasure, I fall backward.@
>Before I had even hit the ground, Alma jumps on top of me.\
name "Luka"
>Wh...What are you doing!?\
name ""
if %con_hvoice=0 dwave 0,"voice\arumaeruma2_01.ogg"
name $name
>Hehe... The fun show is starting now.
>I need to amuse both the audience, and you...\
name ""
dwavestop 0
cspl 690,699
lsp 700,":a;chara\arumaeruma_he1.bmp",0,0:print 10,500
>Alma holds down my body, and forces my legs open in the shape of an M.\
>Hanging in the middle of that M is my penis, freely swinging around with the audience's gazes all closely watching what's about to happen.\
name "Young Spectator Girl"
>Kyaa! \
name ""
name "Young Lady"
>Hehe, what a cute penis.\
name ""
>Enthused murmurs from the female audience begin to fill the Colosseum.\
>Embarrassed, I try to break out of her hold.\
name "Luka"
>S...Stop!@>Let me go!\
name ""
>But Alma doesn't let me out of the embarrassing pose.@
>Rather, she just showcases my struggling off.\
if %con_hvoice=0 dwave 0,"voice\arumaeruma2_02.ogg"
name $name
>Well then, shall I show it to the customers...?
>The teasing of Luka-boy's penis. \
name ""
dwavestop 0
>Still holding me down, she reaches toward my groin with her right hand.@
>Her soft palm gently closes around my still soft penis.\
name "Luka"
>S...Stop...@>Ahh...\
name ""
>As if praising a small child, she gently caresses my flaccid penis.@
>Her smooth hand gently rubs and strokes my penis.\
name "Luka"
>Ah... Ahh...\
name ""
>Inside Alma's gentle hand, my penis slowly begins to become erect.@
>Right in front of the audience's eyes, my body responds to her touch...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma2_03.ogg"
name $name
>The audience got to see your penis get all excited...
>Luka-boy, how embarrassing! \
name ""
dwavestop 0
name "Luka"
>Ahhh...\
name ""
name "Young Spectator Girl"
>Hehe, it's sticking up in the air all big now! @
>Does it really feel that good just being touched by someone's hand?\
name ""
name "Young Lady"
>That little boy's penis is quite robust...@
>I want to try touching it, too...\
name ""
>The girls in the audience all point and discuss my erect penis.@
>Some of them laugh, while others look on in longing.\
>Alma keeps gently stroking me as I lay helpless, humiliated at the thought that so many people are watching me get erect.\
>It's as if she's rubbing away my very pride as a man...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma2_04.ogg"
name $name
>And now...@
>Let's show the audience all of your male functions, Luka-boy. \
name ""
dwavestop 0
name "Luka"
>Stop!@>Stop this...!\
name ""
>I struggle with all that's left of my strength, but I can't break out of this M position.\
>Can I really not do anything but be raped in front of all these people...?\
if %con_hvoice=0 dwave 0,"voice\arumaeruma2_05.ogg"
name $name
>How about we make your white pee shoot out in front of the audience...\
name ""
dwavestop 0
>While mincing words like I was a little kid, she gently grabs my penis with her soft hand.\
name "Luka"
>Ahhh...\
name ""
>I unconsciously let out a soft moan at the feeling of being trapped in her warm hand.\
>Seeing a small drip of pre-come drop out of the tip of my penis, the audience starts to renew their cheering.\
name "Young Spectator Girl"
>Ahaha, something's dripping out of the end! \
name ""
name "Underaged Spectator"
>I thought you had to do more than just hold it for the white stuff to come out...@
>Or is it because that boy is just pathetic? \
name ""
if %con_hvoice=0 dwave 0,"voice\arumaeruma2_06.ogg"
name $name
>Hahaha... Everyone is looking at your pre-come.
>Now we just need to show them when it shoots out...\
name ""
dwavestop 0
mov %hseanwave,17:hseanwave
>Alma starts to slowly pump my now fully erect penis.@
>Her hand slowly moves up and down, with a soft squeeze on my tip every time she reaches the top.\
>Her skilled hand quickly brings me to the edge, but doesn't let me go over it.@
>As if milking a cow, her slow movements continue on without stopping for a moment.\
name "Luka"
>Ahh...@> Ahhh...\
name ""
if %con_hvoice=0 dwave 0,"voice\arumaeruma2_07.ogg"
name $name
>Hoora, it's good, isn't it?
>Your delighted face... Your penis being teased... Show them everything.\
name ""
dwavestop 0
>Up and down, her slow hand movements continue...@
>Still being held down, I try my best to struggle out of this pitiful public display.\
name "Female Spectator"
>Haha, he's struggling, he's struggling!@
>I bet that means he's going to come soon!\
name ""
name "Young Lady"
>Arara, his face looks like he's enjoying it so much...@
>I can't wait to see what that cute face of his looks like as he orgasms.\
name ""
>My struggling only serves to excite the audience even further.@
>I'm just a sacrifice to be played with for their amusement...\
name "Luka"
>Ahhh...\
name ""
>Giving up on struggling, I lay back and bite my lip, trying to hold in the rising feelings inside of me.\
if %con_hvoice=0 dwave 0,"voice\arumaeruma2_08.ogg"
name $name
>Hehe... You don't need to hold back.
>Now, accept it and just shoot it out...\
name ""
dwavestop 0
>Whispering that into my ear, her hand movements start to slowly get faster.\
>No man could resist this...@>It's the hand of someone who knows exactly how to make any man do her bidding.\
name "Luka"
>Ahh... I...I'm going to come...!\
name ""
>My body shakes as I feel the orgasm finally about to blow through me.@
>The girls all start cheering, excited that the moment they've been waiting for has finally arrived.\
name "Young Spectator Girl"
>Ahaha, he's going to come!@
>I bet it's going to be a lot, too! \
name ""
name "Young Lady"
>How embarrassing...@
>Being milked in front of a huge crowd... Teehee.\
name ""
>Curiosity, excitement, ridicule... Surrounded by various feelings from the crowd, I'm about to reach a climax.\
if %con_hvoice=0 dwave 0,"voice\arumaeruma2_09.ogg"
name $name
>Now, what you've been waiting for. 
>Everyone, please watch the little boy let it leak out.\
if %con_hvoice=0 dwave 0,"voice\arumaeruma2_10.ogg"
>Hoora... Pew, pew, pew! \
name ""
dwavestop 0
>Alma's hand drastically increases in speed, forcing me over the edge right on her command.\
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\arumaeruma_he2.bmp",0,0
gosub *syasei2
>The audience erupts into cheers and laughter as I spray semen all over the arena floor.\
name "Young Spectator Girl"
>Haha, he came! He came! @
>Look at all that semen shooting out from that cute penis! \
name ""
name "Underaged Spectator"
>Wa, look at all that white pee leaking out! @
>That's so sad! \
name ""
name "Young Lady"
>Hehe, so that's the face he makes...@
>How cute...\
name ""
>The comments from the audience fill the arena.\
>Milked for no reason but to amuse a crowd full of people, my pride as a man is crushed.@
>I let my body slacken as the shame fills me.\
if %con_hvoice=0 dwave 0,"voice\arumaeruma2_11.ogg"
name $name
>Hehehe... Luka-boy... Was that embarrassing?
>But it felt good, didn't it?\
name ""
dwavestop 0
>Suddenly, her grip tightens.\
name "Luka"
>Ahhh!\
name ""
>She squeezes down on me right under the point of where it would hurt.@
>Like that, she roughly pumps me up and down.\
if %con_hvoice=0 dwave 0,"voice\arumaeruma2_12.ogg"
name $name
>Hora... Horahora...
>I'm going to abuse your penis that just came... \
name ""
dwavestop 0
name "Luka"
>Aiee!@>Ahhh!\
name ""
>Focusing mainly on the tip of my penis, her rough hand movements keep getting faster.@
>Every so often she twists my penis like it was a doorknob, and continues pumping for a few times before putting it back.\
>Still sensitive after my last orgasm, my body twists as I struggle from the abuse.\
if %con_hvoice=0 dwave 0,"voice\arumaeruma2_13.ogg"
name $name
>Horahorahora... Hehe.
>How does it feel to have your penis bullied?\
name ""
dwavestop 0
name "Luka"
>Hyaa! Ahhhh!\
name ""
>I writhe pathetically under her abuse.@
>But still held down, all it amounts to is my body bouncing up and down.\
>Writhing in agony as my penis is being tortured...@
>All for the sake of delighting the audience.\
name "Young Lady"
>Hahaha, how pitiful.@
>He's writhing around so much just from having his penis touched a little.\
name ""
name "Young Spectator Girl"
>Hehe... That's so sad. @
>I wonder if I should try that on my boyfriend...?\
name ""
>The audience makes fun of me as I writhe on the ground under her abuse.\
>Even with tears flowing from my eyes, I can't do a thing to stop her.\
if %con_hvoice=0 dwave 0,"voice\arumaeruma2_14.ogg"
name $name
>Hehe... I'll make a spout come out of you in front of the crowd.
>Show everyone how a male spouts it out. \
name ""
dwavestop 0
name "Luka"
>Do...Don't do that...@
>Ahhhh!!\
name ""
>The merciless pleasure is forced into me despite all my pleas.@
>Helpless, my spirit is being chipped away with every powerful pump from Alma's soft hand.\
name "Luka"
>Ahhh!@>Ahhhhhhhh!!\
name ""
if %con_hvoice=0 dwave 0,"voice\arumaeruma2_15.ogg"
name $name
>Hehehe... Even if you say you don't like it... It's pointless.
>A huge spurt is going to spout out of Luka-boy's penis...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma2_16.ogg"
>It will be completely humiliating and pathetic...
>Get ready for a taste of living in disgrace... Hehe.\
name ""
dwavestop 0
name "Luka"
>N...Noo!@> Ahhh!\
name ""
>When it felt like I couldn't feel any more pleasure, something like a thunderbolt hits my body.@
>At first it felt like a normal ejaculation, but something even more powerful blasts through.\
name "Luka"
>Ahhhhhhhh!!\
name ""
mov %hseanwave,0:hseanwave
gosub *syasei1
lsp 700,":a;chara\arumaeruma_he3.bmp",0,0
gosub *syasei2
>A transparent fluid erupts out of my penis, going way higher than the semen did before.@
>One... two... three times it spouts into the air.\
>Each spout feels like a separate orgasm, draining me of energy.\
lsp 700,":a;chara\arumaeruma_he4.bmp",0,0:print 10,500
name "Luka"
>Hya... Ahhh...\
name ""
name "Young Spectator Girl"
>Uwa... That boy spouted semen out like a fountain.@
>I've never seen something like that before. \
name ""
name "Young Lady"
>Hehe, how pathetic.@
>To think anyone could feel good with so many people watching them being raped...\
name ""
>I let my body relax as I hear the resounding laughter fill the arena.\
if %con_hvoice=0 dwave 0,"voice\arumaeruma2_17.ogg"
name $name
>Hehehe... Luka-boy, even though you're still a boy, you shoot it out like a spout.
>Right in front of the audience, a pathetic eruption.\
if %con_hvoice=0 dwave 0,"voice\arumaeruma2_18.ogg"
>Something you should never show to anyone, a man's most pathetic appearance.
>With so many women having seen that, you'll never be a husband. \
name ""
dwavestop 0
name "Luka"
>Ah... Ahh...\
name ""
>The remnants of the pleasure mix with the humiliation.@
>Broken in body and spirit, I'm not sure where each feeling is even coming from anymore.\
>Still flooded in ecstasy, I fall unconscious while Alma holds me down.\
gosub *anten
>After the humiliation show ended, Alma released me.@
>She wasn't fighting seriously, and was only acting in the spirit of the Colosseum.\
>But neither my mind nor my body can forget that humiliating pleasure forced into me on the arena floor.\
>I went to the Colosseum every day after that, and allowed myself to be raped and humiliated by all sorts of monsters in front of the audience.\
>I stop caring about my original goal, and lose myself in the humiliating pleasure...\
>.............\
goto *badend



*arumaeruma2_hb

mov %skill02,0
mov $bad2,"Luka kept coming back to be raped by the monsters in front of the Colosseum audience..."
if %2825=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2825,1
name "Luka"
>Urhg...\
name ""
>Exhausted from my orgasm, I fall backwards onto the arena floor.@
cspl 690,699
lsp 700,":a;chara\arumaeruma_hf1.bmp",0,0:print 10,500
>In the next moment, Alma jumps over and grabs hold of me.\
name "Luka"
>Wh...What are you doing!?\
name ""
if %con_hvoice=0 dwave 0,"voice\arumaeruma3_01.ogg"
name $name
>Hehehe... The fun show is starting now.
>I need to amuse both the audience, and you...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma3_02.ogg"
>I'll rape you with my special Succubus pussy...
>Right in front of the crowd, I'll squeeze out lots of your semen...\
name ""
dwavestop 0
>Between Alma's legs, her pussy lips slightly open.\
>With a little bit of liquid dripping out, the soft creases inside of her start to move, as if they're able to be controlled by Alma...\
name "Luka"
>Ahh...\
name ""
if %con_hvoice=0 dwave 0,"voice\arumaeruma3_03.ogg"
name $name
>Hehe... Isn't my pussy amazing?
>This mouth is going to eat your penis up, Luka-boy.\
name ""
dwavestop 0
name "Young Spectator Girl"
>Wah, how pitiful. @
>The boy's going to be raped by a Succubus! \
name ""
name "Young Lady"
>To think I'd get to see a Succubus rape a boy...@
>It's been so long since such an amazing rape show was put on here!\
name ""
>The audience starts to get excited at the promise of witnessing a rape.\
>The female audience members start to cheer for Alma, urging her on.\
name "Luka"
>Stop!@>Stop this!\
name ""
>I desperately yell out for her to stop, but it's useless.\
if %con_hvoice=0 dwave 0,"voice\arumaeruma3_04.ogg"
name $name
>Hehehe... I'll let you taste the pleasure only a Succubus can give.
>Doesn't the thought of doing it with so many people watching make it even more exciting?\
name ""
dwavestop 0
name "Luka"
>Ah... Ahhh...\
name ""
lsp 690,":a;chara\arumaeruma_ct11.bmp",0,0:print 10,500
>Saying that, Alma slowly drops onto me.@
mov %hseanwave,2:hseanwave
>Bit by bit, she slowly screws my thing into her tight vagina.\
name "Luka"
>Ahhh!\
name ""
>It feels as though my penis is being sucked into an endless narrow tube...@
>Deeper and deeper, the tip of my penis pushes apart her warm walls as I'm forced inside.\
>Until finally, the base of my penis is pressing against her skin, with me all the way inside her.\
name "Luka"
>Ahh... What is this... You're moving inside...\
name ""
>The soft flesh inside of Alma's pussy starts to move and rearrange itself, as if it was molding to fit the shape of my penis.\
if %con_hvoice=0 dwave 0,"voice\arumaeruma3_05.ogg"
name $name
>Hehe, it's incredible, isn't it? This is a Succubus' pussy.
>It changes shape to suck out the most possible from my prey.\
if %con_hvoice=0 dwave 0,"voice\arumaeruma3_06.ogg"
>But... This is a show, so I won't do it seriously.
>I'll use some of my Succubus skills on you...\
name ""
dwavestop 0
name "Luka"
>Uwaah!\
name ""
>The strange feeling inside her surprises me, forcing me to unconsciously thrust into her.@
>Shocked at what I just did, I recoil and moan just from the slight movements I made inside her.\
>The overwhelming stimulation makes it feel like my penis could melt and combine with this pussy made just for it...\
name "Luka"
>Ahhh!@>I...It feels like it's melting!\
name ""
if %con_hvoice=0 dwave 0,"voice\arumaeruma3_07.ogg"
name $name
>Hehe... It may feel like that... But it won't really melt.
>But it's an incredible feeling, isn't it?\
name ""
dwavestop 0
name "Luka"
>Ahhh...\
name ""
>I shiver as her powerful pussy continues to slightly change shape, stimulating me without Alma even having to move.\
>After forming to the shape of my penis, her changing pussy starts to narrow, making the already tight fit even tighter.\
name "Luka"
>Ahh!@> Th...That feels good!\
name ""
if %con_hvoice=0 dwave 0,"voice\arumaeruma3_08.ogg"
name $name
>Hehe, a lewd voice came out...
>Even though I'm going easy on you... How pathetic.\
name ""
dwavestop 0
name "Luka"
>Ahhh!\
name ""
>I wriggle helplessly under Alma's body.@
>The sight of my domination excites the audience, eliciting loud cheers.\
name "Young Spectator Girl"
>Wah... Awesome... He's really being raped.@
>It's the first time I've seen a Succubus have a meal. \
name ""
name "Young Lady"
>This is the only place we would get to see a Succubus rape a man...@
>Make sure you make it good, Kyuba!\
name ""
>I squirm as I'm treated as an object to be laughed at on the arena floor.@
>But there's no escape...\
>Since I lost in the Colosseum, I'm just a sacrifice...@
>Left powerless, I'm the pathetic star of this show...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma3_09.ogg"
name $name
>Now, for what the audience has been waiting for...
>It's time to squeeze one shot out...\
name ""
dwavestop 0
name "Luka"
>Ahhhh!\
name ""
>The soft folds of her pussy start to vibrate and move quickly back and forth.@
>It's as if there are hundreds of tongues inside her rubbing and licking me every which way.\
>As the pleasure starts to overwhelm me, I get desperate and grab at Alma, trying to force her off.@
>But still held firmly in her grasp, she just laughs at me.\
if %con_hvoice=0 dwave 0,"voice\arumaeruma3_10.ogg"
name $name
>Hehe... My folds will torture you with pleasure and finish you off...\
name ""
dwavestop 0
>Her shape changing vagina shrinks again, causing the tongue-like folds and creases to push and rub my penis with even more power.\
name "Luka"
>Ahhhh!\
name ""
>Overcome by the ecstasy, I start to thrust into her.@
>In the next moment, I feel a powerful orgasm blowing through me.\
gosub *syasei1
lsp 700,":a;chara\arumaeruma_hf2.bmp",0,0
lsp 690,":a;chara\arumaeruma_ct12.bmp",0,0
gosub *syasei2
name "Young Spectator Girl"
>Wah! He came inside! \
name ""
name "Young Lady"
>Haha, he's still shaking his hips!@
>What a loser!\
name ""
>The female crowd laughs and cheers as my semen shoots into Alma's dominating pussy.\
if %con_hvoice=0 dwave 0,"voice\arumaeruma3_11.ogg"
name $name
>Hehehe... You came.\
if %con_hvoice=0 dwave 0,"voice\arumaeruma3_12.ogg"
>The audience is watching...
>Luka-boy, you filled my pussy with so much of you... \
name ""
dwavestop 0
name "Luka"
>Ah... Ahhh!\
name ""
>While the crowd looks on, she sucks up the last drop of my semen.@
>Overcome with shame, I try to hide my face from their piercing gazes.\
>Even more drained of power than before, I lay limp in Alma's grasp.\
if %con_hvoice=0 dwave 0,"voice\arumaeruma3_13.ogg"
name $name
>Hehe, the show is still going...
>Hora, horahora... I'll make it tighter...\
name ""
dwavestop 0
name "Luka"
>Ahhh!\
name ""
>Without giving me a chance to recover, Alma slowly starts to change her pussy's shape to make it even tighter.\
>It's as if I'm in the firm grasp of her hand...\
name "Young Spectator Girl"
>Aha, look at his face while he's being raped. @
>Even though he's a man, he looks so stupid! \
name ""
>Tears start to come out of my eyes because of the whole situation.@
>But no matter what I do, her pussy's slow narrowing only continues...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma3_14.ogg"
name $name
>Hora... I'll move my hips...
>When you can't take it any more, just let it out...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma3_15.ogg"
>To make the audience happy, make sure you shoot out a lot, ok? \
name ""
dwavestop 0
mov %hseanwave,10:hseanwave
>Alma flashes me a seductive smile as she slowly starts to grind her hips against mine.@
>Up and down, side to side... Slowly and skillfully, she keeps up her rhythmic movements.\
name "Luka"
>Ah!@>Ahhhh!!\
name ""
>Lubricated by the juices from her pussy and my semen, I easily slip in and out of her.@
>As soon as I was forced into her, my fate was sealed...\
>Trapped inside her incredible pussy, all I can do is moan as she toys with me.\
name "Luka"
>Hyaa!\
name ""
>I twist my body side to side in a feeble attempt to stop the pleasure.\
if %con_hvoice=0 dwave 0,"voice\arumaeruma3_16.ogg"
name $name
>Arara... How pathetic, Luka-boy...\
name ""
dwavestop 0
>She gently squeezes me with her arms that are wrapped around me, emphasizing that I'll never escape her grasp...\
>Completely at her mercy, I just gasp for air.\
name "Luka"
>Hyaa!@>C...Coming again...!\
name ""
if %con_hvoice=0 dwave 0,"voice\arumaeruma3_17.ogg"
name $name
>Go ahead... I'll suck it all up. 
>Hora... Come again! \
name ""
dwavestop 0
>Alma looks down at me with a triumphant smile.@
>Matching her words, she does a final quick pump with her hips, forcing me to come on her command.\
name "Luka"
>Ahhhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\arumaeruma_hf3.bmp",0,0
lsp 690,":a;chara\arumaeruma_ct13.bmp",0,0
gosub *syasei2
>The crowd goes wild as they see me come inside of her for a second time.@
>As her pussy sucks up the last bits of my semen, comments flood in from the crowd.\
name "Young Spectator Girl"
>Aha, he came again! @
>You can squeeze out a lot from a boy, eh? \
name ""
name "Young Lady"
>Haha, look at him drooling like that!@
>It's like he's a little baby clinging to his mommy!\
name ""
>The ridicule from the female audience fills my head as I bask in the afterglow of the orgasm.\
name "Luka"
>Ah... Uhg...\
name ""
>Frustrated and humiliated, I can't stop the tears from coming out.\
if %con_hvoice=0 dwave 0,"voice\arumaeruma3_18.ogg"
name $name
>Don't worry, I won't suck you to death...
>Aren't you glad that this is in the Colosseum...?\
name ""
dwavestop 0
name "Luka"
>Ahh... S...Stop already...@
>Ahhhh!\
name ""
>Alma ignores my protests and starts to shake her hips even faster.@
>As if pointing out that my words and desires are meaningless, she forces the pleasure right back into me.\
if %con_hvoice=0 dwave 0,"voice\arumaeruma3_19.ogg"
name $name
>Hoora... hora, hora, hora... \
name ""
dwavestop 0
name "Luka"
>Ahhh!\
name ""
>With her pumping me like a piston, I unconsciously grab onto her body, pulling myself even closer to her as I come again.\
gosub *syasei1:gosub *syasei2
name "Luka"
>Ahh...\
name ""
>After being forced to come so many times by Alma, I don't even have the strength left to struggle.\
name "Young Spectator Girl"
>Ahaha, he isn't even resisting any more!@
>It felt so good that he gave up.@> How nice. \
name ""
name "Female Soldier"
>Haha, what a pathetic swordsman.@
>How can you surrender to pleasure that easily?\
name ""
>The crowd ridicules me as I give up, too exhausted to do anything.@
>I'm just the prey of a Succubus...\
>The only meaning for my existence is to please the crowd...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma3_20.ogg"
name $name
>Hehehe... The audience is delighted too.
>Isn't that great, Luka-boy?\
if %con_hvoice=0 dwave 0,"voice\arumaeruma3_21.ogg"
>Hora...  I'll make you come again... \
name ""
dwavestop 0
name "Luka"
>Ah... Ahhh...\
name ""
gosub *syasei1:gosub *syasei2
>While the audience laughs and claps, I come.@
>Over and over again, no longer bothering to resist, I give them just what they want to see...\
gosub *syasei1:gosub *syasei2
>After coming more times than I can count, I start to lose consciousness.\
mov %hseanwave,0:hseanwave
name "Young Spectator Girl"
>Aww... He had too many orgasms, so he fainted...\
name ""
name "Young Lady"
>Hehe, we'll be seeing him again.@
>That boy is already totally addicted to the Colosseum.\
name ""
>The last thing I hear before losing consciousness are the comments from the crowd...\
gosub *anten
>After the humiliation show ended, Alma released me.@
>She wasn't fighting seriously, and was only acting in the spirit of the Colosseum.\
>But neither my mind nor my body can forget that humiliating pleasure forced into me on the arena floor.\
>I went to the Colosseum every day after that, and allowed myself to be raped and humiliated by all sorts of monsters in front of the audience.\
>I stop caring about my original goal, and lose myself in the humiliating pleasure...\
>.............\
goto *badend



*yukionna_start

mov $name,"Yuki-onna"
mov $name2,"Yuki-onna"
mov $lavel,"yukionna"
mov $tatie1,"yukionna_st01"
mov $tatie2,"yukionna_st02"
mov $tatie3,"yukionna_st03"
mov $tatie4,"yukionna_st11"
mov $haikei,"bg085"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,1800
if %nanido=2 mov %max_enemylife,2100
if %nanido=3 mov %max_enemylife,2400
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %music,1
mov %tikei,2
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break out of her hug!"
mov $mogaku_anno2,"Luka broke out of her hug!"
mov $mogaku_anno3,"But Luka is bound by her hug!"
mov $mogaku_sel1,"You won't escape... I'll take everything from you..."
mov $mogaku_sel2,"Useless... You can't run any more..."
mov $mogaku_sel3,"No matter how you struggle, I'll take everything..."
mov $mogaku_sel4,"I won't let go... You belong to me..."
mov $mogaku_sel5,"I won't let you go... Ever..."
mov $mogaku_dassyutu1,"Escaped..."
mov $mogaku_dassyutu2,"Are you going to run from me...?"
mov $mogaku_earth_dassyutu1,"This power... The earth?"
mov $mogaku_earth_dassyutu2,"You hold the power of the earth?"
mov $half_s1,"I'll make you mine..."
mov $half_s2,"I'll even steal your body temperature..."
mov $kiki_s1,"You almost belong completely to me..."
mov $kiki_s2,"I'll steal everything from you..."
mov %end_n,6
mov %exp_minus,0
mov %zmonster_x,-300
mov %tukix,320
mov %owaza_count1a,5
mov %owaza_count2a,4
name $name
>Oh... It looks like you're suffering...@
>Allow me to embrace you...@
>I'll bring you close to my chest, and warm you up...\
name ""
name "Luka"
>Guh...!\
name ""
>I jump back, instantly aware of the danger.@
>This is a monster that attacks travelers!\
goto *common_main



*yukionna_v

gosub *face3
name $name
>My power... Is being stolen...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Yuki-onna turns into a tiny snow figure!\
mov %viclose,1:gosub *victory
mov %getexp,5000:gosub *lvup
mov %2272,1
goto *sean0176



*yukionna_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>You accept me...@
>Now, become mine...\
name ""
goto *yukionna_a



*yukionna_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *yukionna_kousan
if %cmd1=16 goto *yukionna_onedari
if %cmd1=17 goto *common_skill
goto *yukionna_main



*yukionna_a

if %kousoku=1 gosub *yukionna_a6:goto *common_main
rnd2 %ransu,1,5
if %ransu=1 gosub *yukionna_a1:goto *common_main
if %ransu=2 gosub *yukionna_a2:goto *common_main
if %ransu=3 gosub *yukionna_a3:goto *common_main
if %ransu=4 && %owaza_count2a>5 && %status=0 gosub *yukionna_a4:goto *common_main
if %ransu=5 && %owaza_count1a>6 gosub *yukionna_a5:goto *common_main
skip -6



*yukionna_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My hair will drown you in pleasure..."
if %ransu=2 mov $sel1,"My hair will entangle you..."
if %ransu=3 mov $sel1,"Do you like my hair...?"
name $name
eng $sel1:$sel6\
name ""
skillname "Icicle Hair"
dwave 1,"se\umaru.ogg"
eng "Yuki-onna's hair grows, and shoots toward Luka's groin!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,40
if %wind=2 && %nanido=2 mov %wind_kakuritu,35
if %wind=2 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind blows it away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>Her freezing hair wraps around Luka's penis!
skillcount2 3293
if %nanido<2 damage 30,40
if %nanido=2 damage 38,48
if %nanido=3 damage 46,56
skillname ""
if %mylife=0 sub %stack,1:return *yukionna_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*yukionna_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My cold hands will feel amazing..."
if %ransu=2 mov $sel1,"Warm these cold hands with your semen..."
if %ransu=3 mov $sel1,"Where do you want me to touch...?"
name $name
eng $sel1:$sel6\
name ""
skillname "Ice Handjob"
dwave 1,"se\ero_koki1.ogg"
eng "Yuki-onna's ice cold hand caresses Luka's body!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>Her cold hand gently strokes Luka's penis!
skillcount2 3294
if %nanido<2 damage 40,45
if %nanido=2 damage 48,53
if %nanido=3 damage 56,61
skillname ""
if %mylife=0 sub %stack,1:return *yukionna_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*yukionna_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Let me feel your warm seed in my cold mouth..."
if %ransu=2 mov $sel1,"My cold mouth feels good, doesn't it?"
if %ransu=3 mov $sel1,"My cold tongue will wrap around your warm thing..."
name $name
eng $sel1:$sel6\
name ""
skillname "Freezing Mouth"
dwave 1,"se\ero_buchu2.ogg"
eng "Yuki-onna sucks Luka's penis into her cold mouth!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>Her cold tongue licks his shaft!
skillcount2 3295
if %nanido<2 damage 45,50
if %nanido=2 damage 53,58
if %nanido=3 damage 61,66
skillname ""
if %mylife=0 sub %stack,1:return *yukionna_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*yukionna_a4

add %stack,1
mov %owaza_count2a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My kisses will chill your soul..."
if %ransu=2 mov $sel1,"What flavor are my ice kisses...?"
if %ransu=3 mov $sel1,"I'll finish you soon..."
name $name
eng $sel1:$sel6\
name ""
skillname "Frozen Kiss"
dwave 1,"se\ero_pyu1.ogg"
eng "Yuki-onna's frozen lips press into Luka's!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,70
if %wind=1 && %nanido=2 mov %wind_kakuritu,55
if %wind=1 && %nanido=3 mov %wind_kakuritu,35
if %wind=2 && %nanido<2 mov %wind_kakuritu,100
if %wind=2 && %nanido=2 mov %wind_kakuritu,90
if %wind=2 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>An icy sensation flows through Luka's body, stopping his movements!
skillcount2 3296
if %nanido<2 damage 15,25
if %nanido=2 damage 23,33
if %nanido=3 damage 31,41
if %status=0 mov $sel1,"Luka has been paralyzed!"
if %status=2 mov $sel1,"Luka is paralyzed..."
mov %status,2:gosub *status_print
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *yukionna_h4
if %kousan=2 sub %stack,1:return
name "Luka"
>Uhh...\
name ""
name $name
>Now, become mine...\
name ""
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,3,4
if %nanido=3 rnd2 %status_turn,4,5
sub %stack,1
return



*yukionna_a5

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name $name
>Please... Accept my embrace...\
name ""
skillname "Yuki-onna's Hug"
eng "Luka is held in a chilling embrace!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,15
if %wind=1 && %nanido=2 mov %wind_kakuritu,10
if %wind=1 && %nanido=3 mov %wind_kakuritu,7
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>Luka is being tightly hugged by Yuki-onna!\
skillname ""
if %kousan=2 sub %stack,1:return
gosub *face2
name $name
if %first_sel1=1 skip 4
>When I hug you, your semen and body heat will both be quickly taken...@
>It's the best pleasure there is...\
skip 2
>This time, I won't let go...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,2
if %earth=0 && %nanido=2 mov %genmogaku,2
if %earth=0 && %nanido=3 mov %genmogaku,3
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,1
sub %stack,1
return



*yukionna_a6

add %stack,1
>Luka is being tightly hugged by Yuki-onna!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll steal everything...":mov $sel2,"Yuki-onna hugs Luka close to her, and steals his power!"
if %ransu=2 mov $sel1,"I'll even take from your penis...":mov $sel2,"Yuki-onna reaches down and squeezes Luka's penis!"
if %ransu=3 mov $sel1,"It feels incredible, doesn't it? Hehe...":mov $sel2,"Yuki-onna's chilling body steals some of Luka's body heat!"
if %ransu=4 mov $sel1,"Everything of yours is mine...":mov $sel2,"Yuki-onna's frozen body chills Luka!"
if %ransu=5 mov $sel1,"It will feel good, so just enjoy it...":mov $sel2,"Yuki-onna reaches down and squeezes Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Chilling Embrace"
dwave 1,"se\ero_buchu1.ogg"
eng $sel2:$sel6
skillcount2 3297
if %nanido<2 damage 60,75
if %nanido=2 damage 60,75
if %nanido=3 damage 76,91
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *yukionna_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*yukionna_onedari

mov $list1,"Icicle Hair"
if %3293>0 mov %list_num1,1
mov $list2,"Ice Handjob"
if %3294>0 mov %list_num2,1
mov $list3,"Freezing Mouth"
if %3295>0 mov %list_num3,1
mov $list4,"Frozen Kiss"
if %3296>0 mov %list_num4,1
mov $list5,"Chilling Embrace"
if %3297>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *yukionna_onedari1
if %cmd1=12 goto *yukionna_onedari2
if %cmd1=13 goto *yukionna_onedari3
if %cmd1=14 goto *yukionna_onedari4
if %cmd1=15 goto *yukionna_onedari5
if %cmd1=-1 goto *yukionna_main
goto *yukionna_onedari



*yukionna_onedari1

gosub *onedari_syori
name $name
>With my hair...?\
name ""
gosub *yukionna_a1
skip -1



*yukionna_onedari2

gosub *onedari_syori
name $name
>With my hands...?\
name ""
gosub *yukionna_a2
skip -1



*yukionna_onedari3

gosub *onedari_syori
name $name
>With my mouth...?\
name ""
gosub *yukionna_a3
skip -1



*yukionna_onedari4

gosub *onedari_syori
name $name
>You want to be frozen by my kisses?\
name ""
gosub *yukionna_a4
skip -1



*yukionna_onedari5

gosub *onedari_syori_k
name $name
>You want me to steal everything...?\
name ""
if %kousoku=0 gosub *yukionna_a5
gosub *yukionna_a6
skip -1



*yukionna_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\yukionna_bk05.bmp",0,0
gosub *syasei2
>Entangled by her cold hair, Luka gives in, covering her clean hair in semen.\
mov %viclose,1:gosub *lose
mov %2572,%2572+1:if %2572=1 mov %count_koenemy,%count_koenemy+1
if %2572>%count_most mov %count_most,%2572:mov $count_mostname,$name
count 22,4
mov $bad1,"Luka succumbed to Yuki-onna's hair."
gosub *face2
name $name
>Your warm semen is covering my hair...@
>This is just the first thing I'll take...\
name ""
goto *yukionna_ha



*yukionna_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\yukionna_bk04.bmp",0,0
gosub *syasei2
>Unable to take her cold hands running all over his body, Luka comes, covering Yuki-onna's soft hands in semen.\
mov %viclose,1:gosub *lose
mov %2572,%2572+1:if %2572=1 mov %count_koenemy,%count_koenemy+1
if %2572>%count_most mov %count_most,%2572:mov $count_mostname,$name
count 5,4
mov $bad1,"Luka succumbed to Yuki-onna's hand."
gosub *face2
name $name
>Your warm semen is covering my hands...@
>This is just the first thing I'll take...\
name ""
goto *yukionna_ha



*yukionna_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\yukionna_bk01.bmp",0,0
gosub *syasei2
>Unable to endure it any longer, Luka comes, filling Yuki-onna's ice cold mouth with semen.\
mov %viclose,1:gosub *lose
mov %2572,%2572+1:if %2572=1 mov %count_koenemy,%count_koenemy+1
if %2572>%count_most mov %count_most,%2572:mov $count_mostname,$name
count 4,4
mov $bad1,"Luka succumbed to Yuki-onna's mouth."
gosub *face2
name $name
>Nnn... So much warm semen...@
>This is just the first thing I'll take...\
name ""
goto *yukionna_ha



*yukionna_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\yukionna_bk03.bmp",0,0
gosub *syasei2
>As her icy lips close on his, Luka comes, unable to endure the chilling pleasure sent through him.\
mov %viclose,1:gosub *lose
mov %2572,%2572+1:if %2572=1 mov %count_koenemy,%count_koenemy+1
if %2572>%count_most mov %count_most,%2572:mov $count_mostname,$name
count 4,4
mov $bad1,"Luka succumbed to Yuki-onna's icy kiss."
gosub *face2
name $name
>Coming just from a kiss...@
>This is just the first thing I'll take...\
name ""
goto *yukionna_ha



*yukionna_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>While being tightly embraced by Yuki-onna, Luka comes, filled with the strange pleasure being forced into him.\
mov %viclose,1:gosub *lose
mov %2572,%2572+1:if %2572=1 mov %count_koenemy,%count_koenemy+1
if %2572>%count_most mov %count_most,%2572:mov $count_mostname,$name
count 29,4
mov $bad1,"Luka succumbed to Yuki-onna's chilling embrace."
gosub *face2
name $name
>Hehe... You came...@
>It feels good when I snatch everything away, doesn't it?\
name ""
goto *yukionna_hb



*yukionna_ha

mov $bad2,"Sucked dry by Yuki-onna's clothing, Luka died."
if %2826=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2826,1
name "Luka"
>Ahhh...\
name ""
>Exhausted after my orgasm, I fall to the frozen ground.@
>Yuki-onna slowly walks toward me, with a cold smile on her face.\
>Just her smile is enough to send chills down my spine...@
>It's the smile of a ruler...@> No, of a predator...\
name $name
>I'll suck on you...@>Suck everything...\
name ""
dwave 1,"se\umaru.ogg"
>The sleeves of her strange clothes extend toward me.@
>It grabs hold of my body, and starts to wrap around me!\
name "Luka"
>Wh...What the... Urhg!\
name ""
dwave 1,"se\ero_simetuke1.ogg"
cspl 690,699
lsp 700,":a;chara\yukionna_h1.bmp",0,0:print 10,500
>Before I can react, I'm already wound in her clothes.@
>Confused, I start to panic.\
>I push and shove against the fabric.@
>But suspended in mid-air, it doesn't do anything.@>The soft fabric lets me struggle without ripping.\
>The overpowering feeling of being trapped sends off alarms in my brain.\
name $name
>Here, I'll suck...\
name ""
name "Luka"
>Ahhh!!\
name ""
>Some strange magic starts to pulse through the silk clothes around me.@
>The skin that's touching the cloth starts to ooze a strange liquid.\
>As the strange liquid oozes out of me, an overpowering sense of release fills my body.\
name "Luka"
>Ahhh...\
name ""
>The stimulation instantly causes my penis to get erect.@
>Noticing, Yuki-onna's cold stare lands on my penis.\
name $name
>So that's what you want?@
>Then, I'll focus here...\
name ""
name "Luka"
>Hyaa!\
name ""
>Her silky clothes quickly wrap around my now erect penis.@
>The soft fabric tightens around me, as the strange sense of release I was feeling starts to be focused all on my penis.\
name "Luka"
>Ahhh...\
name ""
>I yell out in ecstasy as it feels like I'm melting in her clothes.@
>After only a few moments, my penis trembles in the silk.\
gosub *syasei1
lsp 700,":a;chara\yukionna_h2.bmp",0,0
gosub *syasei2
>Semen shoots out, but I don't even notice.@
>The sense of release has already been flooding me for so long, it's just another addition to the stimulation.\
name "Luka"
>Ahhh...\
name ""
>The ejaculation itself felt different from normal, anyway.@
>Instead of shooting out semen, it was more like it was just leaking out.\
name $name
>You came...@
>I'll steal even more from you...\
name ""
name "Luka"
>Ahhhh!!\
name ""
lsp 700,":a;chara\yukionna_h3.bmp",0,0:print 10,500
>Her silky clothes gradually starts to move and massage me, pounding a powerful physical pleasure into me.\
>At the same time, everywhere her clothes are touching me, the strange liquid with the pleasurable release continues to leak out of my body.\
>I tremble in ecstasy as her clothes keep me suspended in mid-air, surrounded by pleasure from all sides.\
gosub *syasei1
lsp 700,":a;chara\yukionna_h4.bmp",0,0
gosub *syasei2
name "Luka"
>Ahhh...\
name ""
>I relax my body, my thoughts being slowly pounded away and replaced by nothing but the feeling of release.\
lsp 700,":a;chara\yukionna_h5.bmp",0,0:print 10,500
name $name
>I'll suck out more...@
>Your life... More... More...\
name ""
name "Luka"
>Ah... Ahhh...\
name ""
>The small bits of light I could see through her clothes are taken from me, as the cloth wraps all the way around my face.\
>Her cold clothes are taking everything from me...@
>Even my life itself is about to be taken by her...\
name "Luka"
>S...Stop...\
name ""
>Just before I drown in the pleasure, I catch myself, and start to writhe.@
>But even weaker than before, I can't escape from the wrap of her clothes...\
>Unable to escape, the realization that I'm going to die dawns on me...\
name $name
>More... I want more...@
>I'll suck on you...@>Until the very end...\
name ""
name "Luka"
>St... Ahh...\
name ""
>As I struggle, the pleasure only becomes even more powerful.@
>After a few more minutes, I don't even have the strength left to resist.\
>I start to lose myself in the ecstasy, as more and more of that liquid is sucked out.\
name "Luka"
>Ah... Haaa....\
name ""
gosub *syasei1
lsp 700,":a;chara\yukionna_h6.bmp",0,0
gosub *syasei2
>Each orgasm just increases the constant pleasure being forced into me.@
>Not bringing a final feeling of release, it just continues to multiply...\
>Each orgasm brings me one step closer to my end...\
name "Luka"
>Stop... Stop...\
name ""
name $name
>I won't let you get away...@
>You already belong to me...\
name ""
name "Luka"
>No... I'm going to come again...\
name ""
gosub *syasei1:gosub *syasei2
>As soon as I orgasm, the pleasure doubles.@
>Gasping in the cold air, I feel myself on the very edge of life.\
>Every single cell of my skin touching the fabric seems to be rejoicing in ecstasy at the release...\
name "Luka"
>Ah... Ahhh....\
name ""
name $name
>The next one will end you...@
>I'll steal everything, to the last drop...\
name ""
>She tightens the silk around my penis at the same time she announces my fate...\
name "Luka"
>Ah... Ahh...\
name ""
gosub *syasei1:gosub *syasei2
>My penis twitches in a final ejaculation, as I lose consciousness.\
name $name
>I stole the last bit... Goodbye.\
name ""
>Yuki-onna whispers that to my frozen body.@
>Wrapped in her strange sleeve, Yuki-onna stole everything from me...\
gosub *anten
>..............\
goto *badend



*yukionna_hb

mov $bad2,"Luka was raped until his death."
if %2827=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2827,1
name "Luka"
>Ahhh...\
name ""
>Exhausted from the orgasm, my body relaxes.@
>Still hugging me, Yuki-onna looks down with a cold smile on her face.\
>Just the sight of that smile sends chills down my spine.@
>It's the smile of a ruler... No...@> Of a predator.\
name $name
>I'll steal it...@> Your everything...\
name ""
name "Luka"
>Ahh...@> Stop!\
name ""
>Yuki-onna hugs me closer to her, and undoes her kimono.@
>Easily controlling my limp body, she positions me right next to her exposed blue pussy...\
>She puts the tip of my penis right at her entrance...@
mov %hseanwave,9:hseanwave
lsp 690,":a;chara\yukionna_ct01.bmp",0,0:print 10,500
>And forces me inside of her!\
name ""
name "Luka"
>Ahhh!!\
name ""
>The coldness of her insides causes me to gasp in surprise.@
>But it doesn't feel unpleasant...\
>It almost feels like the heat is being sucked out of my penis.@
>Just being inside of her is filling me with a powerful sense of release.\
name $name
>It feels good, right?@
>Your energy and warmth...@>I'll steal it all...\
name ""
name "Luka"
>Ah!@>Ahhh!!\
name ""
>She flashes a seductive smile at me as she gives a short squeeze on my penis.@
>In the next instant, her icy pussy starts to move back and forth.\
>As if it was giving me a rough massage, the pleasant friction causes warmth to fill my penis.@
>But just as quickly as the warmth fills me, the sense of release of having it stolen away magnifies the pleasure from before.\
name "Luka"
>Ahhh... Good...\
name ""
name $name
>It feels good when I suck you...@
>So please, just give everything to me...\
name ""
>The soft feeling of the thousands of tiny little hair things in her continue to wriggle and massage me, slowly draining the heat from my penis.\
>Her cold embrace lets a comforting exhaustion flow through me as I feel myself nearing an orgasm.\
name "Luka"
>Ahh... I...I'm going to come...!\
name ""
name $name
>Go ahead... I'll take it all...@
>I'll embrace you until the very end...\
name ""
name "Luka"
>Ahhh!\
name ""
>The constant ecstasy from the sense of release of being inside her takes control of my body.@
gosub *syasei1
lsp 690,":a;chara\yukionna_ct02.bmp",0,0
gosub *syasei2
>After ejaculating, the sense of final release that I was expecting doesn't come.\
name "Luka"
>Ahh... Wh...What is this...?\
name ""
>Even though the pulsations of my penis from the ejaculation have stopped, I still feel something slowly coming out of me.\
>Almost as if I was peeing, a constant slow drip is sucked out of me into her pussy.\
name "Luka"
>Ahh... This is weird...\
name ""
name $name
>I'm sucking out your energy...@
>Everything... Your semen... Your energy... Your life...\
name ""
name "Luka"
>Ahh...@> N...No!@> Stop!\
name ""
>For the first time since being forced into her, my senses return.@
>Alarmed at her words, I struggle in fear.\
>This feeling of release...@> If it continues, I'm going to die...!@
>The fear pushes aside the ecstasy.\
name "Luka"
>Stop!@>Let me go!\
name ""
>I twist and struggle in vain.@
>But I can't break out of Yuki-onna's tight embrace.\
>Helpless in her arms, she continues to suck out my heat and energy...\
name $name
>I won't let you go...@
>I'll steal everything and let you meet your end in my embrace...\
name ""
name "Luka"
>Ahhh...\
name ""
>The strange tiny flesh hair like pieces in her pussy continue to wriggle and massage me.@
>Every movement draining more and more of my life...\
>As soon she forced me into her, I became another victim...@
>Once caught, she forces her catch to drown in pleasure as their life itself is taken...\
name "Luka"
>Ahh... Again... Coming...\
name ""
>Still held tightly against her cold body, I feel another climax coming.@
>Even though I know it will lead to my doom, my body can't resist her overwhelming wriggling vagina.\
name $name
>Don't worry... I'll hold you in my arms...@
>Don't think of anything... Just give me everything...\
name ""
name "Luka"
>Ahh....\
name ""
gosub *syasei1
lsp 690,":a;chara\yukionna_ct03.bmp",0,0
gosub *syasei2
>My warmth slowly floods into Yuki-onna's cold pussy.@
>Little by little, my body gets colder and colder.\
name "Luka"
>Ahh...\
name ""
>After every ejaculation, I lose feeling in another part of my body.@
>The only feeling that never wavers is the overpowering sense of release in her pussy...\
>But it doesn't feel bad...@
>Each time I get colder, the exhaustion mixes with the pleasure, and only makes it feel better...\
name "Luka"
>Ahh... Ahhh....\
name ""
>Before I was even aware of it, I had given myself over to the pleasure.@
>Just as tight as her embrace around me, I embrace her cold body back, eager to feel more.\
name $name
>Hehe... Good boy...@
>I'll take everything now, so rest in peace...\
name ""
name "Luka"
>Ahh...\
name ""
gosub *syasei1:gosub *syasei2
>I lose feeling in everything but my penis.@
>Nestled between her cold breasts, my consciousness slowly start to fade.\
>Tightly held in her cold pussy, my semen, my energy, and even my life is taken...\
name "Luka"
>Ahhh...\
name ""
gosub *syasei1
lsp 690,":a;chara\yukionna_ct04.bmp",0,0
gosub *syasei2
>With a final ejaculation, the last of my life is taken.\
mov %hseanwave,0:hseanwave
name $name
>I stole everything... Goodbye.\
name ""
>She whispers those final words to my frozen body.@
>Held in her tight embrace, she stole everything from me...\
gosub *anten
>.........\
goto *badend



*nekomata_start

mov $name,"Nekomata"
mov $name2,"Nekomata"
mov $lavel,"nekomata"
mov $tatie1,"nekomata_st07"
mov $tatie2,"nekomata_st02"
mov $tatie3,"nekomata_st03"
mov $tatie4,"nekomata_h1"
mov $haikei,"bg086"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,1800
if %nanido=2 mov %max_enemylife,2100
if %nanido=3 mov %max_enemylife,2400
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,90
mov %music,1
mov %tikei,2
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't push the Nekomata off!"
mov $mogaku_anno2,"Luka forced her off!"
mov $mogaku_anno3,"But Luka can't move with the Nekomata holding him!"
mov $mogaku_sel1,"Unyanya..."
mov $mogaku_sel2,"Nyaa..."
mov $mogaku_sel3,"Unyanya..."
mov $mogaku_sel4,"Nyaa..."
mov $mogaku_sel5,"Unyanya..."
mov $mogaku_dassyutu1,"Funya..."
mov $mogaku_dassyutu2,""
mov $mogaku_earth_dassyutu1,"Funya!?"
mov $mogaku_earth_dassyutu2,""
mov $half_s1,"......Nya. "
mov $half_s2,""
mov $kiki_s1,"......Funya. "
mov $kiki_s2,""
if %item11=0 mov %end_n,6
if %item11=1 mov %end_n,1
mov %exp_minus,5000
mov %zmonster_x,-280
mov %tukix,320
mov %owaza_count1a,4
name $name
>Funya!\
name ""
name "Luka"
>Wah!@> What are you doing!?\
name ""
>Attacking travelers just because they won't give her food...!?@
>What an evil monster!\
mov $tatie1,"nekomata_st01"
gosub *face1
goto *common_main



*nekomata_v

gosub *face3
name $name
>Funya...!\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Nekomata turns into a kitten!\
mov %viclose,1:gosub *victory
mov %getexp,5500:gosub *lvup
mov %2273,1
goto *sean0176c



*nekomata_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>Unyaa! \
name ""
goto *nekomata_a



*nekomata_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *nekomata_kousan
if %cmd1=16 goto *nekomata_onedari
if %cmd1=17 goto *common_skill
goto *nekomata_main



*nekomata_a

if %kousoku=1 rnd2 %ransu,1,2
if %kousoku=1 && %ransu=1 gosub *nekomata_a6:goto *common_main
if %kousoku=1 && %ransu=2 gosub *nekomata_a8:goto *common_main
rnd2 %ransu,1,6
if %ransu=1 gosub *nekomata_a1:goto *common_main
if %ransu=2 gosub *nekomata_a2:goto *common_main
if %ransu=3 gosub *nekomata_a3:goto *common_main
if %ransu=4 gosub *nekomata_a4:goto *common_main
if %ransu>4 && %owaza_count1a>5 gosub *nekomata_a5:goto *common_main
skip -6



*nekomata_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Unya!"
if %ransu=2 mov $sel1,"Nyaa..."
if %ransu=3 mov $sel1,"Funya..."
name $name
eng $sel1:$sel6\
name ""
skillname "Bushy Tailjob"
dwave 1,"se\umaru.ogg"
dwave 1,"se\ero_koki1.ogg"
>The Nekomata's bushy tail wraps around Luka's penis, and rubs it up and down!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3298
if %nanido<2 damage 35,40
if %nanido=2 damage 45,50
if %nanido=3 damage 55,60
skillname ""
if %mylife=0 sub %stack,1:return *nekomata_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*nekomata_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Nya! Nya... Nya!"
if %ransu=2 mov $sel1,"Funya! "
if %ransu=3 mov $sel1,"Nyaa... "
name $name
eng $sel1:$sel6\
name ""
skillname "Squishy Pawjob"
dwave 1,"se\ero_koki1.ogg"
>The Nekomata clasps Luka's penis between her squishy paws!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3299
if %nanido<2 damage 38,42
if %nanido=2 damage 48,52
if %nanido=3 damage 58,62
skillname ""
if %mylife=0 sub %stack,1:return *nekomata_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*nekomata_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Unyaaa..."
if %ransu=2 mov $sel1,"Nyaaa..."
if %ransu=3 mov $sel1,"Funyaa..."
name $name
eng $sel1:$sel6\
name ""
skillname "Hairy Tit Fuck"
dwave 1,"se\ero_koki1.ogg"
>The Nekomata massages Luka's penis between her plump breasts!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3300
if %nanido<2 damage 40,45
if %nanido=2 damage 50,55
if %nanido=3 damage 60,65
skillname ""
if %mylife=0 sub %stack,1:return *nekomata_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*nekomata_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Nya!  *Lick* *Lick*"
if %ransu=2 mov $sel1,"Nya... *Lick* *Lick*"
if %ransu=3 mov $sel1,"*Lick* *Lick*"
name $name
eng $sel1:$sel6\
name ""
skillname "Rough Tongue Blowjob"
dwave 1,"se\ero_pyu2.ogg"
>The Nekomata licks Luka's penis with her rough tongue!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3301
if %nanido<2 damage 45,50
if %nanido=2 damage 55,60
if %nanido=3 damage 65,70
skillname ""
if %mylife=0 sub %stack,1:return *nekomata_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*nekomata_a5

add %stack,1
mov %owaza_count1a,0
name $name
>...Unya! \
name ""
skillname "Push Down"
eng "The Nekomata aggressively pushes Luka down!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,5
if %wind=1 && %nanido=2 mov %wind_kakuritu,3
if %wind=1 && %nanido=3 mov %wind_kakuritu,1
if %wind=2 && %nanido<2 mov %wind_kakuritu,15
if %wind=2 && %nanido=2 mov %wind_kakuritu,10
if %wind=2 && %nanido=3 mov %wind_kakuritu,7
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>Luka is being held down by the Nekomata!\
skillname ""
if %kousan=2 sub %stack,1:return
name $name
>Nyaa! Nyaa... Nyaa... \
name ""
if %earth=0 && %nanido<2 mov %genmogaku,1
if %earth=0 && %nanido=2 mov %genmogaku,1
if %earth=0 && %nanido=3 mov %genmogaku,1
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
sub %stack,1
return



*nekomata_a6

add %stack,1
name $name
>Unyaa! \
name ""
skillname "Cat in Heat"
dwave 1,"se\ero_pyu1.ogg"
lsp 700,":a;chara\nekomata_h2.bmp",0,0:print 10,500
>The Nekomata drops her hips, forcing Luka into her pussy!
skillcount2 3302
mov %damage_kotei,1
damage 80,100
>Luka is being raped by the Nekomata!\
if %mylife=0 sub %stack,1:return *nekomata_h5
if %kousan=2 sub %stack,1:return
name "Luka"
>Ahhh!!\
name ""
>The Nekomata's rough vagina walls rub against Luka's penis, until he's forced all the way inside.\
>The unexpectedly sweet friction causes him to yell out in surprise.\
name $name
>Funyaaaa... \
name ""
sub %stack,1
goto *nekomata_a7



*nekomata_a7

add %stack,1
>Luka is being raped by the Nekomata...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Nyaaa... ":mov $sel2,"The Nekomata's vagina tightens around Luka!"
if %ransu=2 mov $sel1,"Unyaa... ":mov $sel2,"The Nekomata grinds her waist against Luka!"
if %ransu=3 mov $sel1,"Funyaa...!":mov $sel2,"The Nekomata bounces up and down!"
if %ransu=4 mov $sel1,"Nyaa... Nyaa...":mov $sel2,"The Nekomata stares into Luka's eyes as she grinds against him!"
if %ransu=5 mov $sel1,"Unya. ":mov $sel2,"The Nekomata pushes into Luka as hard as she can, forcing him all the way inside!"
name $name
eng $sel1:$sel6\
name ""
skillname "Cat in Heat"
dwave 1,"se\ero_pyu1.ogg"
eng $sel2:$sel6
skillcount2 3302
mov %damage_kotei,1
damage 80,100
skillname ""
if %mylife=0 sub %stack,1:return *nekomata_h6
sub %stack,1
goto *nekomata_a7



*nekomata_a8

add %stack,1
name $name
...Nya.\
name ""
skillname "Perverted Cat"
dwave 1,"se\ero_pyu1.ogg"
lsp 700,":a;chara\nekomata_h2.bmp",0,0:print 10,500
>The Nekomata pushes her back into Luka, forcing him into her ass!
skillcount2 3303
mov %damage_kotei,1
damage 80,100
>The Nekomata is using her ass to rape Luka!\
if %mylife=0 sub %stack,1:return *nekomata_h7
if %kousan=2 sub %stack,1:return
name "Luka"
>Wh...Why in there!?@
>Ahhh!@>It...It's too tight!\
name ""
>The Nekomata clamps her warm anus around Luka's penis!\
name $name
>Nyaa... \
name ""
sub %stack,1
goto *nekomata_a9



*nekomata_a9

add %stack,1
>The Nekomata is using her ass to rape Luka...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Unyaaa... ":mov $sel2,"The Nekomata's anus tightens around Luka!"
if %ransu=2 mov $sel1,"Unya... ":mov $sel2,"The Nekomata plays with Luka's penis in her ass, rhythmically squeezing him!"
if %ransu=3 mov $sel1,"Funya, funya, funyaa... ":mov $sel2,"The Nekomata moves her ass side to side, playing with Luka's penis!"
if %ransu=4 mov $sel1,"Nyaaaa... ":mov $sel2,"The Nekomata pushes her ass into Luka, forcing him deeper inside!"
if %ransu=5 mov $sel1,"Nyaa, nyaa, nyaa...":mov $sel2,"The Nekomata violently moves around, forcing Luka in and out of her ass!"
name $name
eng $sel1:$sel6\
name ""
skillname "Perverted Cat"
dwave 1,"se\ero_pyu1.ogg"
eng $sel2:$sel6
skillcount2 3303
mov %damage_kotei,1
damage 80,100
skillname ""
if %mylife=0 sub %stack,1:return *nekomata_h8
sub %stack,1
goto *nekomata_a9



*nekomata_onedari

mov $list1,"Bushy Tailjob"
if %3298>0 mov %list_num1,1
mov $list2,"Squishy Pawjob"
if %3299>0 mov %list_num2,1
mov $list3,"Hairy Tit Fuck"
if %3300>0 mov %list_num3,1
mov $list4,"Rough Tongue Blowjob"
if %3301>0 mov %list_num4,1
mov $list5,"Cat in Heat"
if %3302>0 mov %list_num5,1
mov $list6,"Perverted Cat"
if %3303>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *nekomata_onedari1
if %cmd1=12 goto *nekomata_onedari2
if %cmd1=13 goto *nekomata_onedari3
if %cmd1=14 goto *nekomata_onedari4
if %cmd1=15 goto *nekomata_onedari5
if %cmd1=16 goto *nekomata_onedari6
if %cmd1=-1 goto *nekomata_main
goto *nekomata_onedari



*nekomata_onedari1

gosub *onedari_syori
name $name
>Nya...?\
name ""
gosub *nekomata_a1
skip -1



*nekomata_onedari2

gosub *onedari_syori
name $name
>Nya...?\
name ""
gosub *nekomata_a2
skip -1



*nekomata_onedari3

gosub *onedari_syori
name $name
>Nya...?\
name ""
gosub *nekomata_a3
skip -1



*nekomata_onedari4

gosub *onedari_syori
name $name
>Nya...?\
name ""
gosub *nekomata_a4
skip -1



*nekomata_onedari5

gosub *onedari_syori_k
name $name
>Nya...?\
name ""
if %kousoku=0 gosub *nekomata_a5
gosub *nekomata_a6
skip -1



*nekomata_onedari6

gosub *onedari_syori_k
name $name
>Nya...?\
name ""
if %kousoku=0 gosub *nekomata_a5
gosub *nekomata_a8
skip -1



*nekomata_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\nekomata_bk05.bmp",0,0
gosub *syasei2
>Unable to take her bushy tail any longer, Luka comes, covering it with semen.\
>The Nekomata quickly starts to lick the cloudy semen off her tail.\
mov %viclose,1:gosub *lose
mov %2573,%2573+1:if %2573=1 mov %count_koenemy,%count_koenemy+1
if %2573>%count_most mov %count_most,%2573:mov $count_mostname,$name
count 19,10
mov $bad1,"Luka was forced to come by the Nekomata's bushy tail."
gosub *face2
name $name
>...Nyaa! \
name ""
goto *nekomata_h



*nekomata_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\nekomata_bk03.bmp",0,0
gosub *syasei2
>Unable to take her squishy paws any longer, Luka comes, covering them with semen.\
>The Nekomata quickly starts to lick the cloudy semen off her paws.\
mov %viclose,1:gosub *lose
mov %2573,%2573+1:if %2573=1 mov %count_koenemy,%count_koenemy+1
if %2573>%count_most mov %count_most,%2573:mov $count_mostname,$name
count 4,10
mov $bad1,"Luka was forced to come by the Nekomata's squishy paws."
gosub *face2
name $name
>...Nyaa! \
name ""
goto *nekomata_h



*nekomata_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\nekomata_bk02.bmp",0,0
gosub *syasei2
>Unable to take her soft breasts any longer, Luka comes, covering them with semen.\
>The Nekomata quickly starts to lick the cloudy semen off her breasts.\
mov %viclose,1:gosub *lose
mov %2573,%2573+1:if %2573=1 mov %count_koenemy,%count_koenemy+1
if %2573>%count_most mov %count_most,%2573:mov $count_mostname,$name
count 4,10
mov $bad1,"Luka was forced to come by the Nekomata's breasts."
gosub *face2
name $name
>...Nyaa! \
name ""
goto *nekomata_h



*nekomata_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\nekomata_bk01.bmp",0,0
gosub *syasei2
>Unable to take her rough tongue any longer, Luka comes, covering it with semen.\
>The Nekomata happily swallows the milk given to her.\
mov %viclose,1:gosub *lose
mov %2573,%2573+1:if %2573=1 mov %count_koenemy,%count_koenemy+1
if %2573>%count_most mov %count_most,%2573:mov $count_mostname,$name
count 4,10
mov $bad1,"Luka was forced to come by the Nekomata's rough tongue."
gosub *face2
name $name
>...Nyaa! \
name ""
goto *nekomata_h



*nekomata_h5

mov %ikigoe,3:gosub *ikigoe
name $name
>...Unya?\
name ""
gosub *syasei1
lsp 700,":a;chara\nekomata_h3.bmp",0,0
gosub *syasei2
>Just from being forced into the Nekomata, Luka comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2573,%2573+1:if %2573=1 mov %count_koenemy,%count_koenemy+1
if %2573>%count_most mov %count_most,%2573:mov $count_mostname,$name
count 1,10
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka accidentally comes just from insertion."
gosub *face2
name $name
>...Nyaa! \
name ""
goto *nekomata_h



*nekomata_h6

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\nekomata_h3.bmp",0,0
gosub *syasei2
>Unable to take the feeling of her rough pussy any longer, Luka comes, filling the Nekomata with semen.\
mov %viclose,1:gosub *lose
mov %2573,%2573+1:if %2573=1 mov %count_koenemy,%count_koenemy+1
if %2573>%count_most mov %count_most,%2573:mov $count_mostname,$name
count 1,10
mov $bad1,"Luka was forced to come as the Nekomata mated with him."
gosub *face2
name $name
>...Nyaa! \
name ""
goto *nekomata_h



*nekomata_h7

mov %ikigoe,3:gosub *ikigoe
name $name
>...Unya?\
name ""
gosub *syasei1
lsp 700,":a;chara\nekomata_h3.bmp",0,0
gosub *syasei2
>Surprised at being forced into her tiny anus, Luka comes, filling her ass with semen.\
mov %viclose,1:gosub *lose
mov %2573,%2573+1:if %2573=1 mov %count_koenemy,%count_koenemy+1
if %2573>%count_most mov %count_most,%2573:mov $count_mostname,$name
count 8,10
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka accidentally ejaculates just from being forced into the Nekomata's ass."
gosub *face2
name $name
>...Nyaa! \
name ""
mov %hanyo1,1
goto *nekomata_h



*nekomata_h8

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\nekomata_h3.bmp",0,0
gosub *syasei2
>Unable to endure her tight ass any longer, Luka comes, filling the Nekomata with semen.\
mov %viclose,1:gosub *lose
mov %2573,%2573+1:if %2573=1 mov %count_koenemy,%count_koenemy+1
if %2573>%count_most mov %count_most,%2573:mov $count_mostname,$name
count 8,10
mov $bad1,"Unable to endure the Nekomata's ass, Luka ejaculated."
gosub *face2
name $name
>...Nyaa! \
name ""
mov %hanyo1,1
goto *nekomata_h



*nekomata_h

mov $bad2,"With the Nekomata in permanent heat, she continues to mate with Luka, now a slave to the pleasure she can give."
mov $end_go,"sean0176x"
if %2573=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
if %hanyo1=1:goto *nekomata_hb
if %kousoku>0 mov %hseanwave,1:hseanwave:goto *nekomata_hc
name $name
>Unya! \
name ""
cspl 690,699
lsp 700,":a;chara\nekomata_h1.bmp",0,0:print 10,500
>The Nekomata climbs on top of my exhausted body.\
>Her bushy hair rubs against me, slightly tickling me.@
>Just the sensation of her hair against my skin feels too good to resist.\
name "Luka"
>Wh...What are you doing!?\
name ""
goto *nekomata_hb



*nekomata_hb

name $name
>Funya! \
name ""
>The Nekomata lets out a sweet mew, her face flushed deep red.@
>It seems like she's in heat...\
>Wait! She can't be... Trying to make me get her pregnant!?\
name "Luka"
>N...No! Wait!\
name ""
>But the Nekomata drops her hips down at once.@
mov %hseanwave,1:hseanwave
lsp 700,":a;chara\nekomata_h2.bmp",0,0:print 10,500
>And quickly swallows my thing into her.\
name "Luka"
>Ahhhh!\
name ""
goto *nekomata_hc



*nekomata_hc

>I'm forced into her hot pussy, with the rough vagina walls filling me with a sweet friction.@
>But more than anything, I can feel the small bumps lining her pussy.\
>The closer I get to her womb, the more bumps there are.@
>Surprised at the bizarre sensation, I let out a cry.\
name "Luka"
>Ahh... I...Incredible...\
name ""
name $name
>Unya! \
name ""
>With a happy cry, the Nekomata starts to slowly move her hips.@
>Left to right, she slowly moves her body, causing the bumps to rub all over my penis.\
>Pleasure rushes through my body, bringing me to a pathetically quick orgasm.\
name "Luka"
>Ah... I'm coming...!\
name ""
name $name
>Funya!?\
name ""
gosub *syasei1
lsp 700,":a;chara\nekomata_h3.bmp",0,0:print 10,500
gosub *syasei2
name "Luka"
>Ahh... I came...\
name ""
>After only a few moments, I was forced to come inside her...@
>Horrified at already potentially impregnating her, my body starts to shake.\
>But the Nekomata looks unsatisfied, and quickly resumes her movements.\
name $name
>Unyaaa...\
name ""
lsp 700,":a;chara\nekomata_h4.bmp",0,0:print 10,500
>The Nekomata tightens her pussy around my penis, as if locking me in place inside her.\
name "Luka"
>What is this...!?@>Ahh!\
name ""
mov %hseanwave,8:hseanwave
>Suddenly I feel something start to move inside of her.@
>A rough, wet thing starts to move up and down my penis.@
>It's as if it was her tongue...\
name $name
>Unya... \
name ""
name "Luka"
>Ah!@>Ahhh!\
name ""
>Locked in place by the soft bumps clamping down on my penis, I wriggle underneath the Nekomata as the rough tongue licks every inch of my penis inside her.\
>The tongue starts to circle the tip of my penis, then starts to gently poke at the urethral opening.\
>I tremble in pleasure filled agony as the bizarre tongue like thing pokes at my most sensitive spot.\
name "Luka"
>Ahh!@> D...Don't lick the tip...!\
name ""
name $name
>Unya... \
name ""
>The Nekomata smiles, clearly having fun toying with me.\
>Her rough tongue continues to lick my penis, tasting every inch of me inside her.\
>Unable to take the torture any longer, I give in, allowing myself to be filled by the intense ecstasy from this inhuman pussy.\
name "Luka"
>I'm coming again!@>Ahh!\
name ""
gosub *syasei1
lsp 700,":a;chara\nekomata_h5.bmp",0,0:print 10,500
gosub *syasei2
name "Luka"
>Ahh...\
name ""
>As I come inside of her, her relentless tongue continues to lick the tip of my penis.@
>Each spurt of semen is followed by a lick of her rough tongue.\
name $name
>...Unya. \
name ""
>After my orgasm finished, her rough tongue wraps itself around my penis.@
>Wrapped around me, her tongue starts to play with my penis again, as if it was a mouse she caught.\
name "Luka"
>Ahh!@> Ahhh!\
name ""
name $name
>Unya... \
name ""
>The Nekomata plays with my penis inside her vagina.@
>Unable to do anything, I give in to my body's desires, and surrender to her.\
gosub *syasei1:gosub *syasei2
name "Luka"
>Haaa...\
name ""
>I sigh as I shoot more of my seed into her waiting pussy.@
>Just how many more times is she going to mate with me...?\
name $name
>Funyaa... \
name ""
name "Luka"
>Ahh...\
name ""
>Her pussy tightens around me, squeezing out the last drops of semen.@
>The tongue carefully licks the tip of my penis inside her, quickly lapping up each drop.\
>Powerless before her, I quickly orgasm again, giving more semen to this cat burglar.\
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1:gosub *syasei2
name $name
>Unya! \
name ""
>Still wanting to mate more, the Nekomata doesn't let me go.@
>She forces me to orgasm over and over again, until I eventually faint.\
gosub *anten
mov %hseanwave,0:hseanwave
>When I came to, I was abandoned on the side of the road.@
>After coming so many times, I had fainted.\
>After that, she released me...\
lsp 700,":a;chara\nekomata_h1.bmp",0,0
bg "bg\bg086.bmp",10,3000
name $name
>Unyaa... \
name ""
name "Luka"
>Ahh...@
>You're so warm... It feels so good...\
name ""
>But I was completely addicted to that inhuman pleasure.@
>Drowning in the pleasure gained from breaking the taboo, I continue to mate with the Nekomata in this uninhabited area.\
gosub *syasei1:gosub *syasei2
name "Luka"
>Ahhh...\
name ""
>I'm completely happy doing nothing but giving my seed to this Nekomata.@
>I don't care about that adventure any longer, I just want to mate with her...\
>...........\
goto *badend



*waelf_start

mov $name,"Kunoichi and Samurai Elf"
mov $name2,"Samurai Elf"
mov $lavel,"waelf"
mov $tatie1,"samuraielf_st01"
mov $tatie2,"samuraielf_st02"
mov $tatie3,"samuraielf_st03"
mov $tatie4,"samuraielf_st02"
mov $haikei,"bg086"
mov %monster_x,-170
mov %monster_y,0
mov $tatie1b,"kunoitielf_st01"
mov $tatie2b,"kunoitielf_st02"
mov $tatie3b,"kunoitielf_st03"
mov %monster_xb,170
mov %monster_yb,0
if %nanido=1 mov %max_enemylife,2600
if %nanido=2 mov %max_enemylife,2800
if %nanido=3 mov %max_enemylife,3200
if %nanido=0 mov %max_enemylife,2
if %nanido=1 mov %henkahp1,1400
if %nanido=2 mov %henkahp1,1600
if %nanido=3 mov %henkahp1,1800
if %nanido=0 mov %henkahp1,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,90
mov %music,1
mov %tikei,2
gosub *maxmp:mov %mp,%max_mp
mov %tekikazu,2
gosub *syutugen_plural
mov $mogaku_anno1,"But Luka can't break free from the Samurai Elf!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack in this position!"
mov $mogaku_sel1,"Hehe, struggling is pointless. You'll soon be finished..."
mov $mogaku_sel2,"Hehe, truly pathetic."
mov $mogaku_sel3,"Do you really think you can escape from this hold!?"
mov $mogaku_sel4,"You're still trying to resist, you fool?"
mov $mogaku_sel5,"The more you struggle, the tighter I'll hold..."
mov $mogaku_dassyutu1,"Oh, it looks like you can do something after all."
mov $mogaku_dassyutu2,""
mov $mogaku_earth_dassyutu1,"What strength..."
mov $mogaku_earth_dassyutu2,"I misread your power..."
mov $half_s1,"How long can you endure us?"
mov $half_s2,"Soon, you shall be overcome..."
mov $kiki_s1,"It seems you're nearing your limit."
mov $kiki_s2,"Allow me to finish you!"
mov %end_n,6
mov %exp_minus,10500
mov %zmonster_x,-300
mov %tukix,170
mov %tekikazu,2
mov %owaza_count1a,5
name "Samurai Elf"
>A face I have not seen before...!\
name ""
name "Kunoichi Elf"
>We will not allow hostile strangers into our land.\
name ""
name "Luka"
>Wait a second, please!@
>I'm just going to Yamatai Village...\
name ""
name "Samurai Elf"
>To Yamatai Village, you say?@
>Then you'll have to go through us first!\
name ""
>The strange elves attack before I can say anything else!\
mov %sinkou,1
goto *common_main



*waelf001

name "Samurai Elf"
>What skill...!\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Samurai Elf turned into a child!\
csp 702
lsp 700,":a;chara\kunoitielf_st01.bmp",0,0:print 10,500
mov $name2,"Kunoichi Elf"
mov $tatie1,"kunoitielf_st01"
mov $tatie2,"kunoitielf_st02"
mov $tatie3,"kunoitielf_st03"
mov $tatie4,"kunoitielf_st02"
mov %monster_x,0
mov %monster_y,0
mov $mogaku_anno1,"But Luka can't break free from the Kunoichi Elf!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack in this position!"
mov $mogaku_sel1,"A struggling man just excites a Kunoichi further..."
mov $mogaku_sel2,"A struggling man just excites a Kunoichi further..."
mov $mogaku_sel3,"Pointless. You won't escape from me..."
mov $mogaku_sel4,"Pointless. You won't escape from me..."
mov $mogaku_sel5,"Pointless. You won't escape from me..."
mov $half_s1,"How do my skills taste?"
mov $half_s2,"In revenge for my partner, I'll defeat you..."
mov $kiki_s1,"You're at your limit..."
mov $kiki_s2,"Now, be defeated by my techniques!"
mov %kaihi,80
mov %sel_hphalf,0
mov %sel_kiki,0
mov %first_sel1,0
mov %first_sel2,0
mov %first_sel3,0
mov %tekikazu,1
mov %owaza_count1a,5
mov %zmonster_x,-300
mov %tukix,320
name "Kunoichi Elf"
>Kuh... Using some sort of strange trick, are you!?@
>In that case, I'll have to go all out!\
name ""
mov %sinkou,2
goto *waelf_a



*waelf_v

gosub *face3
name "Kunoichi Elf"
>Guh... Careless...!\
name ""
dwave 1,"se\syometu.ogg"
cspl 700,702:print 99,4500,"system\breakup.dll/urb"
>The Kunoichi Elf turns into a child!\
mov %viclose,1:gosub *victory_plural
mov %getexp,6000:gosub *lvup
mov %2274,1
goto *sean0178



*waelf_kousana

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name "Samurai Elf"
>Giving up... What a pathetic pig.\
name ""
name "Kunoichi Elf"
>As expected, no man can resist two at once.\
name ""
goto *waelf_a



*waelf_kousanb

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name "Kunoichi Elf"
>Giving up...?@
>Don't expect any mercy...\
name ""
goto *waelf_a



*waelf_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 && %sinkou=1 goto *waelf_kousana
if %cmd1=15 && %sinkou=2 goto *waelf_kousanb
if %cmd1=16 && %sinkou=1 goto *waelf_onedaria
if %cmd1=16 && %sinkou=2 goto *waelf_onedarib
if %cmd1=17 goto *common_skill
goto *waelf_main



*waelf_a

if %enemylife<%henkahp1 && %sinkou=1 goto *waelf001
if %sinkou=1 && %kousoku=1 gosub *waelf_a5:gosub *waelf_a6:goto *common_main
rnd2 %ransu,1,4
if %sinkou=1 && %ransu=1 gosub *waelf_a1:goto *common_main
if %sinkou=1 && %ransu=2 gosub *waelf_a2:goto *common_main
if %sinkou=1 && %ransu=3 gosub *waelf_a3:goto *common_main
if %sinkou=1 && %ransu=4 && %owaza_count1a>6 gosub *waelf_a4:goto *common_main
if %sinkou=1 skip -5
if %sinkou=2 && %ransu=1 gosub *waelf_a7:goto *common_main
if %sinkou=2 && %ransu=2 gosub *waelf_a8:goto *common_main
if %sinkou=2 && %ransu=3 gosub *waelf_a9:goto *common_main
if %sinkou=2 && %ransu=4 && %owaza_count1a>6 gosub *waelf_a10:goto *common_main
if %sinkou=2 skip -10



*waelf_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Your semen will shoot out in this hand...":mov $sel2,"Hehe... Being played with by two at the same time is heaven, isn't it?":mov $sel3,"Their two hands join together, forming a tube around Luka's penis!"
if %ransu=2 mov $sel1,"My hands are quite skilled, you know?":mov $sel2,"I'll focus on the tip...":mov $sel3,"The Samurai Elf squeezes Luka's shaft while the Kunoichi Elf rubs the tip of Luka's penis with her palm!"
if %ransu=3 mov $sel1,"I know your weak spot...":mov $sel2,"I wonder what he'll do if I touch here...?":mov $sel3,"The two of them make a circle with their thumb and index fingers, and begin to stroke Luka's penis in opposite directions!"
name "Samurai Elf"
eng $sel1:$sel6\
name ""
name "Kunoichi Elf"
eng $sel2:$sel6\
name ""
skillname "Double Handjob"
eng "Both elves reach out to Luka's penis!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes them away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
eng $sel3:$sel6\
skillcount2 3304
dwave 1,"se\ero_koki1.ogg"
mov %damage_nobr,1
if %nanido<2 damage 27,32
if %nanido=2 damage 30,35
if %nanido=3 damage 33,48
dwave 1,"se\ero_koki1.ogg"
if %nanido<2 damage 27,32
if %nanido=2 damage 30,35
if %nanido=3 damage 33,48
skillname ""
if %mylife=0 sub %stack,1:return *waelf_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*waelf_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll crush you with my breasts!":mov $sel2,"Spray your semen on my chest..."
if %ransu=2 mov $sel1,"This pressure is unbearable, isn't it?":mov $sel2,"Spray your milk where my own comes out..."
if %ransu=3 mov $sel1,"Even my breasts are enough to defeat you...":mov $sel2,"Don't you want to dirty these breasts with your semen?"
name "Samurai Elf"
eng $sel1:$sel6\
name ""
name "Kunoichi Elf"
eng $sel2:$sel6\
name ""
skillname "Double Breast Pressure"
eng "The two elves squeeze Luka's penis between their breasts!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes them away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
dwave 1,"se\ero_koki1.ogg"
skillcount2 3305
mov %damage_nobr,1
if %nanido<2 damage 29,34
if %nanido=2 damage 32,37
if %nanido=3 damage 35,40
dwave 1,"se\ero_koki1.ogg"
if %nanido<2 damage 29,34
if %nanido=2 damage 32,37
if %nanido=3 damage 35,40
skillname ""
if %mylife=0 sub %stack,1:return *waelf_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*waelf_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll lick the tip...":mov $sel2,"While you do that, I'll get the shaft...":mov $sel3,"Their tongues wrap around Luka's penis!"
if %ransu=2 mov $sel1,"Nnn... Are our lips too much?":mov $sel2,"I'll get a good taste...":mov $sel3,"The two elves alternate kissing Luka's penis!"
if %ransu=3 mov $sel1,"Mmm... Go ahead and fill our mouths...":mov $sel2,"I'll be sure to suck out every drop...":mov $sel3,"The two elves lick Luka's penis up and down from both sides!"
name "Samurai Elf"
eng $sel1:$sel6\
name ""
name "Kunoichi Elf"
eng $sel2:$sel6\
name ""
skillname "Double Mouth Attack"
eng "The elves bend over toward Luka's groin!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes them away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
eng $sel3:$sel6\
dwave 1,"se\ero_pyu2.ogg"
skillcount2 3306
mov %damage_nobr,1
if %nanido<2 damage 32,37
if %nanido=2 damage 35,40
if %nanido=3 damage 38,43
dwave 1,"se\ero_pyu2.ogg"
if %nanido<2 damage 32,37
if %nanido=2 damage 35,40
if %nanido=3 damage 38,43
skillname ""
if %mylife=0 sub %stack,1:return *waelf_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*waelf_a4

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name "Samurai Elf"
>Hyah!\
name ""
skillname "Pin"
eng "The Samurai Elf throws Luka down, and holds him in a Judo pin!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>With Luka's face buried in the Samurai Elf's breasts, he's left unable to move!\
mov %kousoku,1:gosub *status_print
>Luka is being tightly embraced by the Samurai Elf!\
skillname ""
if %kousan=2 sub %stack,1:return
gosub *face2
if %first_sel1=1 skip 13
name "Luka"
>Mmmg!\
name ""
>With Luka's head pressed into her breasts, he can't breathe!@
>Instead of sucking in air, all he gets is her soft skin!\
name "Samurai Elf"
>Hehe... At this rate, you'll be suffocated you know...\
name ""
name "Kunoichi Elf"
>I'll deal with his unprotected penis...\
name ""
skip 4
name "Samurai Elf"
>Hehe... This time you're done.\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,2
if %earth=0 && %nanido=2 mov %genmogaku,3
if %earth=0 && %nanido=3 mov %genmogaku,4
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
sub %stack,1
return



*waelf_a5

add %stack,1
>Luka is being tightly embraced by the Samurai Elf...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Suffer in agony in my breasts!"
if %ransu=2 mov $sel1,"Hehe... If you don't give in soon, you'll die."
if %ransu=3 mov $sel1,"Aren't you happy? This is how all men wish to die..."
name "Samurai Elf"
eng $sel1:$sel6\
name ""
skillname "Choking Breast Pin"
>Tightly embraced by the Samurai Elf, Luka is being suffocated in her breasts!
skillcount2 3307
if %nanido<2 damage 30,40
if %nanido=2 damage 40,50
if %nanido=3 damage 50,60
skillname ""
if %mylife=0 sub %stack,1:return *waelf_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*waelf_a6

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll crush the proof of your manhood..."
if %ransu=2 mov $sel1,"Even my feet are too good for you..."
if %ransu=3 mov $sel1,"So happy just from a foot... What a pathetic man."
name "Kunoichi Elf"
eng $sel1:$sel6\
name ""
skillname "Leg Skill: Trample"
>The Kunoichi Elf steps on Luka's penis!
skillcount2 3664
if %nanido<2 damage 25,35
if %nanido=2 damage 30,40
if %nanido=3 damage 30,50
skillname ""
if %mylife=0 sub %stack,1:return *waelf_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*waelf_a7

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Haha... Too good for you?":mov $sel2,"Her ten fingers crawl up and down Luka's penis!"
if %ransu=2 mov $sel1,"How does the tip feel?":mov $sel2,"The Kunoichi Elf's nimble fingers play with the tip of Luka's penis!"
if %ransu=3 mov $sel1,"This is your weak point... Hehe.":mov $sel2,"The Kunoichi Elf plays with Luka's urethral opening!"
name "Kunoichi Elf"
eng $sel1:$sel6\
name ""
skillname "Hand Skill: Spider"
dwave 1,"se\ero_koki1.ogg"
eng $sel2:$sel6
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,40
if %wind=2 && %nanido=2 mov %wind_kakuritu,35
if %wind=2 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3308
if %nanido<2 damage 30,35
if %nanido=2 damage 38,43
if %nanido=3 damage 46,51
skillname ""
if %mylife=0 sub %stack,1:return *waelf_h6
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*waelf_a8

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Have a taste of my erotic technique...":mov $sel2,"While squeezing her breasts together, she licks the tip of Luka's penis!"
if %ransu=2 mov $sel1,"Drown in the softness of my chest...":mov $sel2,"She gently rubs his penis with her breasts!"
if %ransu=3 mov $sel1,"Is it about time to crush your endurance...?":mov $sel2,"She squeezes her breasts together as hard as she can!"
name "Kunoichi Elf"
eng $sel1:$sel6\
name ""
skillname "Breast Skill: Pressure"
dwave 1,"se\ero_koki1.ogg"
eng "The Kunoichi Elf sandwiches Luka's penis between her breasts!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,40
if %wind=2 && %nanido=2 mov %wind_kakuritu,35
if %wind=2 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
eng $sel2:$sel6
skillcount2 3309
if %nanido<2 damage 33,38
if %nanido=2 damage 41,46
if %nanido=3 damage 49,54
skillname ""
if %mylife=0 sub %stack,1:return *waelf_h7
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*waelf_a9

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Relish the pleasure...":mov $sel2,"Inside her warm mouth, she licks his penis!"
if %ransu=2 mov $sel1,"My mouth will finish you...":mov $sel2,"She sucks in as hard as she can!"
if %ransu=3 mov $sel1,"Do you prefer to have it forcefully sucked out...?":mov $sel2,"She uses her mouth like a piston!"
name "Kunoichi Elf"
eng $sel1:$sel6\
name ""
skillname "Mouth Skill: Devour"
dwave 1,"se\ero_pyu2.ogg"
eng "The Kunoichi Elf sucks Luka's penis into her mouth!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,40
if %wind=2 && %nanido=2 mov %wind_kakuritu,35
if %wind=2 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
eng $sel2:$sel6
skillcount2 3310
if %nanido<2 damage 35,40
if %nanido=2 damage 43,48
if %nanido=3 damage 51,56
skillname ""
if %mylife=0 sub %stack,1:return *waelf_h8
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*waelf_a10

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name "Kunoichi Elf"
>Heh. Got you!\
name ""
skillname "Pin"
eng "The Kunoichi Elf throws Luka to the ground, and pins him in place!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,100
if %wind=1 && %nanido=2 mov %wind_kakuritu,100
if %wind=1 && %nanido=3 mov %wind_kakuritu,50
if %wind=2 && %nanido<2 mov %wind_kakuritu,100
if %wind=2 && %nanido=2 mov %wind_kakuritu,100
if %wind=2 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>The Kunoichi Elf slowly repositions herself!\
mov %kousoku,1:gosub *status_print
>The Kunoichi Elf is riding on top of Luka!\
skillname ""
if %kousan=2 skip 5
gosub *face2
name "Luka"
>Urhg...!\
name ""
name "Kunoichi Elf"
>I'll show you the secret skills of a Kunoichi...@
>My overpowering sexual technique will dry you up!\
name ""
skillname "Ultimate Skill: Pussy Exhaustion"
dwave 1,"se\ero_pyu2.ogg"
lsp 690,":a;chara\kunoitielf_ct01.bmp",0,0:print 10,500
>The Kunoichi Elf drops her hips, forcing Luka all the way inside her!\
skillcount2 3311
mov %damage_kotei,1
damage 80,100
>Luka is being raped by the Kunoichi Elf!\
skillname ""
if %mylife=0 sub %stack,1:return *waelf_h9
name "Luka"
>Ahhh!\
name ""
>Her vagina is like a completely different living creature...@
>It squeezes down on me at the same time as it starts to gently suck on my penis.\
name "Kunoichi Elf"
>Hehe... This is a Kunoichi's ultimate weapon.@
>Until you're completely dry, I'll continue to wring out your semen...\
name ""
sub %stack,1
goto *waelf_a12



*waelf_a12

add %stack,1
>Luka is being raped by the Kunoichi Elf...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"It's OK to yell...":mov $sel2,"The soft flesh inside of her wriggles and squirms!"
if %ransu=2 mov $sel1,"Your death will be pleasurable...":mov $sel2,"With powerful kiss-like movements, the Kunoichi Elf's pussy torments Luka!"
if %ransu=3 mov $sel1,"If I squeeze down a little, you'll reach the pinnacle of pleasure...":mov $sel2,"The Kunoichi Elf's pussy contracts, squeezing down on Luka's penis!"
if %ransu=4 mov $sel1,"As soon as I forced you in, your death was sealed...":mov $sel2,"The Kunoichi Elf's soft flesh tightens around Luka!"
if %ransu=5 mov $sel1,"Shoot out the proof of your surrender inside me!":mov $sel2,"The Kunoichi Elf pounds Luka in a piston movement!"
name "Kunoichi Elf"
eng $sel1:$sel6\
name ""
skillname "Ultimate Skill: Pussy Exhaustion"
dwave 1,"se\ero_chupa4.ogg"
eng $sel2:$sel6
skillcount2 3311
mov %damage_kotei,1
damage 80,100
skillname ""
if %mylife=0 sub %stack,1:return *waelf_h10
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
goto *waelf_a12



*waelf_onedaria

mov $list1,"Double Handjob"
if %3304>0 mov %list_num1,1
mov $list2,"Double Breast Pressure"
if %3305>0 mov %list_num2,1
mov $list3,"Double Mouth Attack"
if %3306>0 mov %list_num3,1
mov $list4,"Choking Breast Pin"
if %3307>0 mov %list_num4,1
mov $list5,"Hand Skill: Spider"
if %3308>0 mov %list_num5,1
mov $list6,"Breast Skill: Pressure"
if %3309>0 mov %list_num6,1
mov $list7,"Mouth Skill: Devour"
if %3310>0 mov %list_num7,1
mov $list8,"Leg Skill: Trample"
if %3664>0 mov %list_num8,1
mov $list9,"Ultimate Skill: Pussy Exhaustion"
if %3311>0 mov %list_num9,1
gosub *cmd_onedari
if %cmd1=11 goto *waelf_onedari1
if %cmd1=12 goto *waelf_onedari2
if %cmd1=13 goto *waelf_onedari3
if %cmd1=14 goto *waelf_onedari4
if %cmd1=15 goto *waelf_onedari5
if %cmd1=16 goto *waelf_onedari6
if %cmd1=17 goto *waelf_onedari7
if %cmd1=18 goto *waelf_onedari4a
if %cmd1=19 goto *waelf_onedari8
if %cmd1=-1 goto *waelf_main
goto *waelf_onedaria



*waelf_onedarib

mov %list_num1,0
mov %list_num2,0
mov %list_num3,0
mov %list_num4,0
mov %list_num5,0
mov $list1,"Hand Skill: Spider"
if %3308>0 mov %list_num1,1
mov $list2,"Breast Skill: Pressure"
if %3309>0 mov %list_num2,1
mov $list3,"Mouth Skill: Devour"
if %3310>0 mov %list_num3,1
mov $list4,"Leg Skill: Trample"
if %3664>0 mov %list_num4,1
mov $list5,"Ultimate Skill: Pussy Exhaustion"
if %3311>0 mov %list_num5,1
mov $list6,""
mov $list7,""
mov $list8,""
mov $list9,""
gosub *cmd_onedari
if %cmd1=11 goto *waelf_onedari5
if %cmd1=12 goto *waelf_onedari6
if %cmd1=13 goto *waelf_onedari7
if %cmd1=14 goto *waelf_onedari4a
if %cmd1=15 goto *waelf_onedari8
if %cmd1=-1 goto *waelf_main
goto *waelf_onedarib



*waelf_onedari1

gosub *onedari_syori
name "Samurai Elf"
>Hehe... You wish to be defeated by our hands?\
name ""
name "Kunoichi Elf"
>As you wish, make these hands dirty...\
name ""
gosub *waelf_a1
skip -1



*waelf_onedari2

gosub *onedari_syori
name "Samurai Elf"
>Hehe... You wish to be defeated by our breasts?\
name ""
name "Kunoichi Elf"
>As you wish, make these breasts dirty...\
name ""
gosub *waelf_a2
skip -1



*waelf_onedari3

gosub *onedari_syori
name "Samurai Elf"
>Hehe... You wish to be defeated by our mouths?\
name ""
name "Kunoichi Elf"
>As you wish, make our mouths dirty...\
name ""
gosub *waelf_a3
skip -1



*waelf_onedari4

gosub *onedari_syori_k
name "Samurai Elf"
>Hehe... You wish to be defeated while choking on my breasts?\
name ""
name "Kunoichi Elf"
>Heh. In that case, I shall watch.\
name ""
if %kousoku=0 gosub *waelf_a4
gosub *waelf_a5
skip -1



*waelf_onedari4a

gosub *onedari_syori
name "Kunoichi Elf"
>You want to be trampled by my feet?@>How pathetic.\
name ""
if %sinkou=1 gosub *waelf_onedarix
gosub *waelf_a6
skip -1



*waelf_onedari5

gosub *onedari_syori
name "Kunoichi Elf"
>You want me to use my hands?\
name ""
if %sinkou=1 gosub *waelf_onedarix
gosub *waelf_a7
skip -1



*waelf_onedari6

gosub *onedari_syori
name "Kunoichi Elf"
>You want me to use my breasts?\
name ""
if %sinkou=1 gosub *waelf_onedarix
gosub *waelf_a8
skip -1



*waelf_onedari7

gosub *onedari_syori
name "Kunoichi Elf"
>You want me to use my mouth?\
name ""
if %sinkou=1 gosub *waelf_onedarix
gosub *waelf_a9
skip -1



*waelf_onedari8

gosub *onedari_syori
name "Kunoichi Elf"
>You want to experience my ultimate skill?\
name ""
if %sinkou=1 gosub *waelf_onedarix
gosub *waelf_a10
skip -1



*waelf_onedarix

name "Samurai Elf"
>I entrust the rest to you...\
name ""
dwave 1,"se\escape.ogg"
csp 702
lsp 700,":a;chara\kunoitielf_st02.bmp",0,0:print 10,500
mov $name2,"Kunoichi Elf"
mov $tatie1,"kunoitielf_st01"
mov $tatie2,"kunoitielf_st02"
mov $tatie3,"kunoitielf_st03"
mov $tatie4,"kunoitielf_st02"
mov %monster_x,0
mov %monster_y,0
mov $half_s1,"Hehe, it looks like you're feeling it..."
mov $half_s2,"My technique is amazing, isn't it?"
mov $kiki_s1,"Almost at your limit...?"
mov $kiki_s2,"The finish you desired is almost here!"
mov %sinkou,2:mov %tekikazu,1
return



*waelf_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 699,":a;chara\samuraielf_bk03.bmp",-170,0
lsp 701,":a;chara\kunoitielf_bk03.bmp",170,0
gosub *syasei2
>Unable to take both of their hands at once, Luka comes, covering their supple hands in semen.\
mov %viclose,1:gosub *lose
mov %2574,%2574+1:if %2574=1 mov %count_koenemy,%count_koenemy+1
if %2574>%count_most mov %count_most,%2574:mov $count_mostname,$name
count 5,5
mov $bad1,"Luka came, unable to endure both of their hands at once."
gosub *face2
name "Samurai Elf"
>Hehe, he's done...\
name ""
name "Kunoichi Elf"
>How pitiful.@> Look what you did to our hands.\
name ""
goto *waelf_ha



*waelf_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 699,":a;chara\samuraielf_bk02.bmp",-170,0
lsp 701,":a;chara\kunoitielf_bk02.bmp",170,0
gosub *syasei2
>Sandwiched between their soft breasts, Luka comes, covering their plump chests with semen.\
mov %viclose,1:gosub *lose
mov %2574,%2574+1:if %2574=1 mov %count_koenemy,%count_koenemy+1
if %2574>%count_most mov %count_most,%2574:mov $count_mostname,$name
count 7,5
mov $bad1,"Luka came, unable to endure both of their breasts at once."
gosub *face2
name "Samurai Elf"
>Hehe, he's done...\
name ""
name "Kunoichi Elf"
>How pitiful.@> Look what you did to our breasts.\
name ""
goto *waelf_ha



*waelf_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 699,":a;chara\samuraielf_bk01.bmp",-170,0
lsp 701,":a;chara\kunoitielf_bk01.bmp",170,0
gosub *syasei2
>With both of their lips closed around his penis, Luka comes, covering their faces with sperm.\
mov %viclose,1:gosub *lose
mov %2574,%2574+1:if %2574=1 mov %count_koenemy,%count_koenemy+1
if %2574>%count_most mov %count_most,%2574:mov $count_mostname,$name
count 4,5
mov $bad1,"Luka came, unable to endure both of their mouths at once."
gosub *face2
name "Samurai Elf"
>Hehe, he's done...\
name ""
name "Kunoichi Elf"
>How pitiful.@> Look how much you shot in our mouths.\
name ""
goto *waelf_ha



*waelf_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 699,":a;chara\samuraielf_bk05.bmp",-170,0
gosub *syasei2
>Choking on the Samurai Elf's breasts, Luka comes, unable to take the stimulation any longer.\
mov %viclose,1:gosub *lose
mov %2574,%2574+1:if %2574=1 mov %count_koenemy,%count_koenemy+1
if %2574>%count_most mov %count_most,%2574:mov $count_mostname,$name
count 30,5
mov $bad1,"Choking on the Samurai Elf's breasts, Luka came."
gosub *face2
name "Samurai Elf"
>Hehe, he's done...\
>Having an orgasm just from being smothered by my breasts... How pathetic.\
name ""
goto *waelf_ha



*waelf_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
if %sinkou=1 lsp 701,":a;chara\kunoitielf_bk06.bmp",170,0
if %sinkou=2 lsp 696,":a;chara\kunoitielf_bk06.bmp",0,0
gosub *syasei2
>Unable to take being stepped on any longer, Luka comes, covering the Kunoichi Elf's feet with semen.\
mov %viclose,1:gosub *lose
if %sinkou=1 mov %2574,%2574+1:if %2574=1 mov %count_koenemy,%count_koenemy+1
if %sinkou=1 && %2574>%count_most mov %count_most,%2574:mov $count_mostname,$name
if %sinkou=2 mov %2643,%2643+1:if %2643=1 mov %count_koenemy,%count_koenemy+1
if %sinkou=2 && %2643>%count_most mov %count_most,%2643:mov $count_mostname,$name
count 6,5
mov $bad1,"Luka came while being stepped on by the Kunoichi Elf"
gosub *face2
name "Kunoichi Elf"
>Hehe, you lose.@
>How shameful... Being dominated by a foot.\
name ""
if %sinkou=1 goto *waelf_ha
if %sinkou=2 goto *waelf_hb



*waelf_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\kunoitielf_bk03.bmp",0,0
gosub *syasei2
>With her fingers running up and down Luka's penis like a spider, he finally comes.\
mov %viclose,1:gosub *lose
mov %2643,%2643+1:if %2643=1 mov %count_koenemy,%count_koenemy+1
if %2643>%count_most mov %count_most,%2643:mov $count_mostname,$name
count 5,6
mov $bad1,"Luka succumbed to the Kunoichi Elf's spider-like fingers."
gosub *face2
name "Kunoichi Elf"
>Hmm... My hands are all dirty now.@
>This skill always makes men go insane...\
name ""
goto *waelf_hb



*waelf_h7

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\kunoitielf_bk02.bmp",0,0
gosub *syasei2
>Unable to take the stimulation from her plump breasts any longer, Luka comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2643,%2643+1:if %2643=1 mov %count_koenemy,%count_koenemy+1
if %2643>%count_most mov %count_most,%2643:mov $count_mostname,$name
count 7,6
mov $bad1,"Luka succumbs to the Kunoichi Elf's plump breasts."
gosub *face2
name "Kunoichi Elf"
>Hmm... My breasts are all dirty now.@
>This skill always makes men go insane...\
name ""
goto *waelf_hb



*waelf_h8

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\kunoitielf_bk01.bmp",0,0
gosub *syasei2
>Unable to take it any longer, Luka comes in the Kunoichi Elf's mouth.\
>As soon as his ejaculation finishes, the elf gulps down his semen.\
mov %viclose,1:gosub *lose
mov %2643,%2643+1:if %2643=1 mov %count_koenemy,%count_koenemy+1
if %2643>%count_most mov %count_most,%2643:mov $count_mostname,$name
count 4,6
mov $bad1,"Luka succumbed to the Kunoichi Elf's mouth."
gosub *face2
name "Kunoichi Elf"
>*Gulp*@> That's the first one of many...@
>This skill always makes men go insane...\
name ""
goto *waelf_hb



*waelf_h9

mov %ikigoe,3:gosub *ikigoe
name "Kunoichi Elf"
>Oh?@>An instant loss?\
name ""
gosub *syasei1
lsp 690,":a;chara\kunoitielf_ct02.bmp",0,0
lsp 695,":a;chara\kunoitielf_bk05.bmp",0,0
gosub *syasei2
>Unable to take just the simple act of insertion, Luka comes, filling her pussy with semen.\
mov %viclose,1:gosub *lose
mov %2643,%2643+1:if %2643=1 mov %count_koenemy,%count_koenemy+1
if %2643>%count_most mov %count_most,%2643:mov $count_mostname,$name
count 1,6
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka came as soon as he was forced into the Kunoichi Elf."
gosub *face2
name "Kunoichi Elf"
>Hah... How pathetic.@
>You couldn't even last a couple seconds.\
>But don't worry, you'll get to feel a lot more before you die...\
name ""
goto *waelf_hb



*waelf_h10

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\kunoitielf_ct02.bmp",0,0
lsp 695,":a;chara\kunoitielf_bk05.bmp",0,0
gosub *syasei2
>Overwhelmed by her skilled pussy, Luka quickly orgasms.\
mov %viclose,1:gosub *lose
mov %2643,%2643+1:if %2643=1 mov %count_koenemy,%count_koenemy+1
if %2643>%count_most mov %count_most,%2643:mov $count_mostname,$name
count 1,6
mov $bad1,"Luka was quickly forced to come by the Kunoichi Elf's ultimate skill."
gosub *face2
name "Kunoichi Elf"
>Hehe... I'm quite skilled, aren't I?@
>But don't worry, you'll get to feel a lot more before you die...\
name ""
goto *waelf_hb



*waelf_ha

mov $bad2,"Raped continually, Luka was turned into a plaything of the Samurai Elf."
if %2574=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
>Exhausted, I fall to my knees.@
>In front of me, the stern looking Samurai Elf glares down at me.\
name "Samurai Elf"
>Now then... Please leave the rest to me.\
name ""
name "Kunoichi Elf"
>Understood.@>I'll let you deal with the spoils.\
name ""
dwave 1,"se\escape.ogg"
cspl 701,702:print 10,500
>Saying that, the Kunoichi Elf vanishes.@
cspl 690,699
lsp 700,":a;chara\samuraielf_st02.bmp",0,0:print 10,500
>Wasting no time, the Samurai Elf aggressively forces me to the ground and jumps on me!\
name "Luka"
>S...Stop!\
name ""
name "Samurai Elf"
>Hmph... There's no point resisting at this point.@
>I'm going to torture you with rape now.\
name ""
name "Luka"
>N...No way...\
name ""
>The Samurai Elf forces me, still struggling, into the ground.@
>Just like that, she mounts me.\
name "Samurai Elf"
>Let's see... For you, my dirty hole is more than enough.@
>I'll rape you with my ass until I'm satisfied...\
name ""
>The Samurai Elf takes off her underwear.@
>Now stripped, she pushes her clean round ass against my groin.\
>Reacting to the feeling of her soft skin against my penis, I quickly become erect.\
name "Samurai Elf"
>Your cock is just crying to be screwed into my dirty ass...@
>As I rape you, will you be crying too!?\
name ""
>Yelling that, she forces her ass down onto me.@
mov %hseanwave,2:hseanwave
lsp 690,":a;chara\samuraielf_ct01.bmp",0,0:print 10,500
>Just like that, my penis is forced into her tiny anus!\
name "Luka"
>Ahhh!@>T...Tight!\
name ""
>It's like I'm being squeezed by a strong hand.@
>Especially right at her anus, it feels like it's suffocating the root of my penis.\
>Even my tip feels like it's being crushed.@
>But right at the edge of the pain is an explosion of pleasure.\
name "Luka"
>Ahh... J...Just a little... L...Looser...\
name ""
name "Samurai Elf"
>What are you saying?@> This is torture.@
>Here, I'll make it even tighter...\
name ""
>Her vise-like meat gets even tighter.@
>As if it's trying to cut off my penis, her anus clamps down around the root.\
>A blast of pleasure accompanies the initial pain brought on by her.\
name "Luka"
>Ahhh! Ahhhhhh!@
>T...Too tight!@> L...Looser please!!\
name ""
name "Samurai Elf"
>Hehehe... What a nice cry...\
>You're being completely dominated by just my ass... How disgraceful.@
>Such a pathetic pig.\
name ""
>The Samurai Elf looks at me with a superior smile on her face, tauntingly making her ass even tighter at the same time.\
>Crushed by her tight ass, I can already feel an orgasm about to be forced out of me.@
>I try to endure it as long as possible, but finally reaching my limit, I let out a moan.\
name "Luka"
>Ahhh... I... I'm going to come...\
name ""
name "Samurai Elf"
>Hehe... I want this fun to continue a little longer.\
name ""
>The Samurai Elf's anus tightens even more than before.@
>Right as the feeling of an ejaculation starts, her anus cuts off the flow, stopping my orgasm.\
name "Luka"
>Ahhh... What... Are you...!?\
name ""
name "Samurai Elf"
>Well? You can't come, can you?@
>While I seal off your ability to ejaculate, I'll continue this torture...\
name ""
>The soft flesh inside of her ass starts to press against my twitching penis even harder.\
>Unable to escape or even ejaculate, I writhe helplessly underneath her.\
>The desire for release begins to overpower the rest of my mind, as I scream and moan out during the torture.\
name "Luka"
>Aiie!@>Stop it!!\
name ""
>Responding to my screams, she gives another quick squeeze.@
>The resulting pleasure makes me go over the edge, with my brain trying to trigger another orgasm.\
name "Luka"
>Ahh... I can't come...\
name ""
>But with her anus so tight around me, I can't release.@
>Just like that, I'm stuck bouncing between heaven and hell...\
name "Samurai Elf"
>Haha... I love those cries... More...\
name ""
name "Luka"
>Ahhh!@>Stop this!@> Help me!\
name ""
>The Samurai Elf suddenly loosens her anus, causing me to moan in relief as I feel the ejaculation about to start.@
>But right before anything can happen, she tightens right back up around me.\
>Over and over, she continues to play with me like this...\
>Raping me with her ass, and not even allowing me to come...@
>I cry and moan in humiliation at being so completely dominated by her.\
name "Samurai Elf"
>Hehe... How does it feel to be tortured by this dirty hole of mine?\
>At this rate, you're going to go insane...@
>Or will your penis be crushed first?\
name ""
name "Luka"
>Ahhh...@
>St...Stop...\
name ""
>I feebly push against her, but it does no good.@
>Even if I was able to push her off, her tight hold on my penis feels like it would never break.\
>With all of my pride as a man stolen, I start to beg her.\
name "Luka"
>Haa... P...Please... Let me come...@
>I can't take it... I need to come...\
name ""
name "Samurai Elf"
>...Hehehe. Already reduced to begging?@
>You want to come in this hole I shit from that badly?\
name ""
>With each word she says, she squeezes her ass around my penis at the same time.\
>The pleasure causes me to gasp at every word she says, but I still can't get release...\
name "Luka"
>Let me come... Please...@
>I want to come... Ahh...\
name ""
>I can't do anything but beg any longer.@
>On the brink of insanity, I just repeat those words.\
name "Samurai Elf"
>Do you really want to come in my ass that badly?\
>Not only surrendering to me, but even begging to come in this dirty hole?@>You'll live in disgrace for the rest of your life...@> Is that really what you want?\
name ""
name "Luka"
>Please, let me come...\
name ""
>As I continue to beg, a look of superior contempt fills her face as she stares down at me.\
name "Samurai Elf"
>How pitiful... It looks like you've completely fallen to my ass torture.@
>I'll give you more of this squeezing you love so much...\
>Now scream out louder, you pig!\
name ""
name "Luka"
>Ah...Ahhh!\
name ""
>She finally loosens the stranglehold of her anus around the root of my penis.\
>At the same time, the soft flesh inside of her squeezes and rubs against the tip of my penis, instantly forcing out the held up orgasm.\
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 690,":a;chara\samuraielf_ct02.bmp",0,0
gosub *syasei2
>Tightly compressed in her ass, powerful squirts of semen shoot out of me into her.\
>Even though I'm humiliated by the circumstances, the sense of relief finally given to me causes me to smile.\
>Finally able to come in her ass, the release I wanted was given to me at long last...\
name "Samurai Elf"
>Hehe, you came quite a bit...@
>Look... The proof of your surrender to me is dripping out of my ass.\
name ""
>The Samurai Elf leans forward and pulls my penis from her ass.@
>At the same time, my cloudy white semen drips out of her onto me.\
name "Samurai Elf"
>Now that you're unable to do anything against me...@
>I'll take you home and keep you as my personal toy.\
name ""
name "Luka"
>..............\
name ""
>Just as she said, I have no energy left to resist her.@
>After this, I was taken to the neighboring Elf Village...\
gosub *anten
mov %hseanwave,0:hseanwave
>Kept locked in her house, I was made into a plaything of the elves.@
>Every day, I'm raped endlessly by the elves that live there...\
>Thus, my adventure ends...\
>.............\
goto *badend



*waelf_hb

mov $tatie2,"kunoitielf_st02"
mov %zmonster_x,-300
mov $bad2,"Taking the Kunoichi Elf's ultimate skill, Luka was squeezed to death..."
if %2643=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,9:hseanwave:goto *waelf_hc
name "Luka"
>Ahhh...\
name ""
>Exhausted, I feel backwards onto the ground.@
>In the next instant, the Kunoichi Elf jumps on top of me.\
name "Kunoichi Elf"
>Now then, I'll use my ultimate move to squeeze you dry...\
name ""
>She takes off her underwear, exposing her vagina.\
>The bright pink opening slowly open and closes, as she shows off her muscle control.@
>A small drop of liquid drips out of it, as if it was salivating before swallowing me whole...\
name "Kunoichi Elf"
>Doesn't it look good...?@
>This is a Kunoichi's most powerful weapon...\
>Even the most powerful of men lose their lives to this...\
name ""
name "Luka"
>I...I don't want that...\
name ""
>After she mentions losing my life, I recoil in fear.\
name "Kunoichi Elf"
>You can't fight against me any longer...@
>I'll let you taste the highest of pleasures before you meet your death.\
name ""
name "Luka"
>H...Help me!@> Stop!\
name ""
>I struggle for my life as she slowly moves her vagina closer to my groin.@
>But unable to break her hold on me, I'm forced to look on in horror as her pussy swallows me into her.\
>It's as if I'm watching my death sentence being handed down...\
name "Luka"
>Ahhhhh!\
name ""
>I'm forced deeper and deeper inside her...@
mov %hseanwave,9:hseanwave
cspl 690,699
lsp 690,":a;chara\kunoitielf_ct01.bmp",0,0:print 10,500
>Until I'm all the way inside!\
name "Luka"
>Ah!@>Ahhh!!\
name ""
>In the next moment, I scream.\
>At first expecting something horrible to happen, I'm taken aback as the walls of her mysterious pussy start to move.\
>Back and forth, it feels like she's independently controlling each muscle inside her vagina.@
>The unexpected pleasure shatters the earlier fear, and starts to confuse my emotions.\
name "Luka"
>Ahh!@> I...Incredible...!\
name ""
name "Kunoichi Elf"
>Of course...@> No man can endure the trained pussy of a Kunoichi.@
>Now, how many seconds can you last...?\
name ""
name "Luka"
>Ahhh!@>Ahhhhh!\
name ""
>Her soft walls continue to move in all directions, rubbing and massaging my sensitive penis.@
>At the same time, her already tight hole starts to get even tighter.\
>Attacked by all the stimulation at once, my vision starts to go white as I quickly give in to my male instinct.\
gosub *syasei1
lsp 690,":a;chara\kunoitielf_ct02.bmp",0,0
lsp 695,":a;chara\kunoitielf_bk05.bmp",0,0
gosub *syasei2
name "Luka"
>Ahhh...\
name ""
>I come inside her amazing pussy, each twitch of my penis causing me to moan from her resulting squeeze.\
name "Kunoichi Elf"
>...Hehe, that's just the start.@
>Now, my secret skill will take you to your grave...\
name ""
goto *waelf_hc



*waelf_hc

name "Luka"
>Wh...What are...?\
name ""
name "Kunoichi Elf"
>My secret Kunoichi Skill... Pussy Exhaustion.@
>I use my pussy to dry a man of his semen, exhausting him to the point of death.\
>You're already in the middle of my skill...@
>As soon as it started, your fate was sealed.\
name ""
name "Luka"
>Stop, let me go!\
name ""
>As I beg her to stop, she starts to wiggle her hips.\
name "Kunoichi Elf"
>Here we go... Pussy Exhaustion!\
name ""
name "Luka"
>Ahhhhhhhhhh!!\
name ""
mov %hseanwave,13:hseanwave
>Her vagina squeezes down hard on me, as her soft walls start to move in opposite directions, gently rubbing against me.\
>The pleasure from the stimulation overpowers my thoughts, causing me to squirm in ecstasy as I yell out.\
name "Luka"
>Ahh!@> Ahhhh!!\
name ""
gosub *syasei1:gosub *syasei2
>After only a few seconds, I come, filling her with semen.@
>But her hip movements don't stop for a second.\
>After a few pulses of my penis, I realize that they aren't stopping either.@
>The orgasm doesn't end, as every half second another ejaculation happens, shooting out even more semen into her.\
name "Kunoichi Elf"
>Hahaha!@
>Well? Each shot is bringing you closer to death! Isn't it amazing!?\
name ""
name "Luka"
>Ahh!@> Ahhh!!\
name ""
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
lsp 690,":a;chara\kunoitielf_ct03.bmp",0,0
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
>Shot after shot, I keep ejaculating more semen into her.\
>Each release is met with a powerful suction inside of her, making room for the next shot of semen in her tight hole.\
name "Kunoichi Elf"
>Give up, and just drown in pleasure...@
>That way, you'll be able to reach heaven just a little bit earlier...\
name ""
name "Luka"
>Ahhhh!\
name ""
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
>My penis continues to pulse every half second, triggering another ejaculation.\
>My body shivers as the ecstasy envelopes my body, quickly draining all of the strength from me.\
name "Kunoichi Elf"
>Hehe, it feels amazing, doesn't it?@
>Any man would rejoice at meeting their end in a Kunoichi's pussy...\
name ""
name "Luka"
>Ahh... It feels good...\
name ""
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
>Hopeless and powerless, I've given myself to the pleasure.@
>Already addicted to it, I've even lost my ability to reason.\
>"It's fine if I die like this"@
>That insane thought even starts to make sense to me.\
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
lsp 690,":a;chara\kunoitielf_ct04.bmp",0,0
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
name "Luka"
>Ahhh...\
name ""
>The amount of semen coming out is barely a drip.@
>It must mean there's almost nothing left in me...\
name "Kunoichi Elf"
>Hehe, you're almost done...@
>Now, I'll make you feel heaven once more here before you go to the real one...\
name ""
name "Luka"
>Ah...ahh...\
name ""
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
>Washed away with the final blast of pleasure, I lose consciousness.\
gosub *anten
mov %hseanwave,0:hseanwave
name "Kunoichi Elf"
>Ah, he's gone.@
>He really was quite pitiful.\
name ""
>The Kunoichi Elf looks down at the dead boy's face, still stuck in a look of ecstasy.\
>.............\
goto *badend



*yamatanooroti_start

mov $name,"Yamata no Orochi"
mov $name2,"Yamata no Orochi"
mov $lavel,"yamatanooroti"
mov $tatie1,"yamatanooroti_st01"
mov $tatie2,"yamatanooroti_st02"
mov $tatie3,"yamatanooroti_st03"
mov $tatie4,"yamatanooroti_h01"
mov $haikei,"bg092"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,9500
if %nanido=2 mov %max_enemylife,9500
if %nanido=3 mov %max_enemylife,9900
if %nanido=1 mov %henkahp1,8000
if %nanido=2 mov %henkahp1,8000
if %nanido=3 mov %henkahp1,8000
if %nanido=0 mov %max_enemylife,2
if %nanido=0 mov %henkahp1,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,99
mov %music,2
mov %tikei,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't move like this!"
mov $mogaku_sel1,"You won't get away..."
mov $mogaku_sel2,"Hehe... What pathetic struggling..."
mov $mogaku_sel3,"Struggling will just tire you out faster..."
mov $mogaku_sel4,"Useless... You won't break free."
mov $mogaku_sel5,"Just give up. You won't get away."
mov $mogaku_earth_dassyutu1,"Oh... What strange power."
mov $mogaku_earth_dassyutu2,"How energetic... This will be fun."
mov $half_s1,"Hehe... Feeling good?"
mov $half_s2,"You'll be drowning in that pleasure soon enough..."
mov $kiki_s1,"It's time to finish you..."
mov $kiki_s2,"My tongues will lick up all of your semen..."
mov %end_n,6
mov %exp_minus,16500
mov %zmonster_x,-200
mov %tukix,320
mov %owaza_count1a,4
mov %owaza_count3a,5
mov %owaza_count1b,1
name "Luka"
>...Sorry, but I'm no sacrifice.@
>I came here to defeat you!\
name ""
>I pull out my sword, and take a stance in front of her.@
>As soon as she sees my sword, a strange smile crosses her face.\
gosub *face2
name $name
>Defeat me?@> Don't make me laugh...\
name ""
name $name
>But this should be interesting.@
>A little playtime before the fun starts is never a bad thing.\
name ""
>If I don't win, I'll really be the sacrifice...!@
>But I won't lose!\
gosub *face1
mov %sinkou,1
goto *common_main



*yamatanooroti001

mov %earth,0
name "Luka"
>Guh... !@
>To think she was this strong...!\
name ""
>She takes all of my attacks, barely even flinching.@
>Our gap in power is too large...\
>This isn't good... At this rate, I may not win.\
name "Tamamo"
>Sheesh, how hopeless.@
>Just this once, I'll help you use the power of the earth.\
name ""
name "Luka"
>Eh...?\
name ""
dwave 2,"se\tamamo2.ogg"
mov %item16,0
lsp 699,":a;chara\tamamo_st31.bmp",-200,0:print 10,500
>The ball of fur jumps out of my bag!@
lsp 699,":a;chara\tamamo_st01.bmp",-200,0:print 10,500
>It suddenly grows and unfurls, turning into Tamamo!\
name "Luka"
>Ta...Tamamo!?\
name ""
name "Tamamo"
>Listen, to use the power of the earth, you have to feel its breath.@
>To be able to feel it underneath you, you need to imagine that your body itself is one with the earth.\
>Here, like this!\
name ""
skillname "Breath of the Earth"
dwave 2,"se\earth1.ogg"
>The breath of the earth flows up Tamamo's feet into her body!\
skillname ""
name $name
>...What are you doing, you little beast?@
>I'll teach you to interfere with me!\
name ""
skillname "Head Smash"
dwave 1,"se\karaburi.ogg"
>Yamata aims a blow right at Tamamo's neck!\
wait 500
dwave 2,"se\earth3.ogg"
>But Tamamo takes no damage!\
skillname ""
gosub *face3
name $name
>Wh...What the!?\
name ""
name "Tamamo"
>The image is the most important part.@
>You must feel the energy of the earth coming through your feet, as if it's breathing right into your body.\
>If you do that, blows against you will feel like nothing.\
name ""
name "Luka"
>Imagine my body as one with the earth...?\
name ""
>Saying it easily like that doesn't mean it's something easy to do!\
name "Tamamo"
>Come on, give it a try.@
>With Gnome with you, all you need to do is imagine it right.\
name ""
name "Luka"
>G...Got it...\
name ""
>I don't have much confidence, but I'll give it a try!\
mov %sinkou,2
mov %skill03,2
csp 699:print 10,500
goto *yamatanooroti_main



*yamatanooroti002

name "Tamamo"
>...Hurry up.@
>If you play around too much, you'll be defeated.\
name ""
name $name
>Kuh...!@
>Still your tongue, impudent beast!\
name ""
skillname "Head Smash"
dwave 1,"se\karaburi.ogg"
>Yamata aims a blow right at Tamamo's neck!
wait 500
dwave 2,"se\earth3.ogg"
>But Tamamo takes no damage!\
skillname ""
gosub *face3
name $name
>Impossible!@
>Why is this little beast not reacting to my attacks!?\
name ""
name "Tamamo"
>...You're wasting your time.@
>You could use that attack a thousand times before I even got a scratch.\
name ""
mov %hanyo1,1
goto *yamatanooroti_main



*yamatanooroti002a

rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Why... Why doesn't it work!?"
if %ransu=2 mov $sel1,"This power I've developed over 500 years...!"
if %ransu=3 mov $sel1,"Impossible! Impossible!"
name $name
eng $sel1:$sel6\
name ""
skillname "Head Smash"
dwave 1,"se\karaburi.ogg"
>Yamata aims a blow right at Tamamo's neck!
wait 500
dwave 2,"se\earth3.ogg"
>But Tamamo takes no damage!\
skillname ""
name ""
goto *yamatanooroti_main



*yamatanooroti003

name "Luka"
>This is...!?\
name ""
>This feels completely different from when I used the power of the earth before.\
>It feels like my body itself is made of the strong earth underneath...\
>It feels like attacks would just bounce off of me...\
name "Tamamo"
>Hmph, so you can do it.@
>If you infuse yourself with the breath of the earth, your defense will be significantly higher.\
>Now then, let me play a little bit too. \
name ""
skillname "Tamamo Punch"
dwave 1,"se\karaburi.ogg"
>The power of the earth floods into Tamamo's fist!
dwave 2,"se\dageki2.ogg"
rnd2 %damage,1800,2000:gosub *tamamo_enemylife2
skillname ""
name $name
>How can this be...!?@
>What is this strange force!?\
name ""
>Yamata is confused!\
name "Luka"
>Move the power into your fist, and punch the enemy...?\
name ""
>You can use the power of the earth to even do that...?\
mov %sinkou,3
goto *yamatanooroti_main



*yamatanooroti_v

if %nanido=0 goto *yamatanooroti_v2
name "Tamamo"
>Now then, it's time to end this.@
>Just this once, I'll finish it in your method.\
name ""
>Tamamo takes the Angel Halo from Luka!\
name "Luka"
>Ah, hey!\
name ""
name "Tamamo"
>This is the end!\
name ""
skillname "Earth Rumbling Decapitation"
>Tamamo raises the sword above her, and jumps high into the air!\
wait 500
dwave 1,"se\karaburi.ogg"
lsp 2,":c;effect\earth.bmp",0,0:print 1
wait 300
csp 2:print 18,500,"system\mask01.jpg"
dwave 1,"se\bom2.ogg"
quake 10,1000
>Filled with the weight of the earth, the sword slams into Yamata's head!
dwave 1,"se\damage2.ogg"
rnd2 %damage,3500,4000:gosub *tamamo_enemylife2
goto *yamatanooroti_v2



*yamatanooroti_v2

skillname ""
name $name
>My... Power...@
>This can't... Be!\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Yamata no Orochi turns into a tiny snake with multiple heads!\
mov %viclose,1:gosub *victory
mov %getexp,10000:gosub *lvup
mov %2275,1
mov %skill03,2
mov %item16,0
goto *sean0179



*yamatanooroti_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>Hehe... The sacrifice became obedient.@
>The real fun starts now...\
name ""
goto *yamatanooroti_a



*yamatanooroti_kousan2

name "Tamamo"
>...What are you doing, you idiot?@
>Be serious here.\
name ""
>Tamamo became angry!\
goto *yamatanooroti_main



*yamatanooroti_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 && %sinkou=3 goto *yamatanooroti_attack
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %sinkou=1 && %cmd1=15 goto *yamatanooroti_kousan
if %sinkou>1 && %cmd1=15 goto *yamatanooroti_kousan2
if %sinkou=1 && %cmd1=16 goto *yamatanooroti_onedari
if %sinkou>1 && %cmd1=16 goto *yamatanooroti_kousan2
if %cmd1=17 goto *yamata_skill
goto *yamatanooroti_main



*yamatanooroti_attack

gosub *common_attack1
if %enemylife=0 goto *yamatanooroti_v
if %before_action=3 goto *yamatanooroti_a
name "Luka"
>Guh...!\
name ""
>Even filled with this power, my attacks are still too weak...@
>It's too difficult to control my body like this.\
name "Tamamo"
>Hmm... It seems like the power is still too much for you.@
>It looks like it's still a little too difficult for you to control fully.\
name ""
skillname "Tail Attack"
dwave 1,"se\karaburi.ogg"
>The power of the earth fills Tamamo's tail!
>Her tail slams right into Yamata's body!
dwave 2,"se\dageki2.ogg"
rnd2 %damage,2800,3000:gosub *tamamo_enemylife2
skillname ""
name $name
>Ahhg!@
>How can this tiny beast hit so hard...!?\
name ""
>Yamata is confused!\
name "Tamamo"
>Sheesh...@
>After not returning home for a few hundred years, the young girls here got so arrogant.\
mov %sinkou,4
name ""
goto *yamatanooroti_v



*yamata_skill

gosub *cmd_skill
if %cmd1=21 goto *skill1
if %cmd1=22 goto *yamata_skill6
if %cmd1=23 goto *skill3
if %cmd1=24 goto *skill4
if %cmd1=25 goto *skill5
if %cmd1=31 && %skill02=0 goto *skill7
if %cmd1=31 && %skill02=2 goto *skill7b
if %cmd1=32 && %skill03=0 goto *skill8
if %cmd1=32 && %skill03=2 goto *skill8b
if %cmd1=35 goto *skill17
if %cmd1=-1 goto *yamatanooroti_main
goto *yamata_skill



*yamata_skill6

mov %skill_sub,1
gosub *skill6
mov %skill_sub,0
name $name
>Trying to use such strange techniques against me... Foolishness.\
name ""
name $name
>With my multiple heads, I can see every movement you make...@
>Trying to catch me off guard with random attacks is pointless.\
name ""
dwave 1,"se\miss.ogg"
>She avoids all of my random attacks!\
skillname ""
goto *yamatanooroti_a



*yamatanooroti_a

if %enemylife<%henkahp1 && %sinkou=1 goto *yamatanooroti001
if %sinkou=2 && %earth=0 && %hanyo1=0 goto *yamatanooroti002
if %sinkou=2 && %earth=0 && %hanyo1=1 goto *yamatanooroti002a
if %sinkou=2 && %earth=2 goto *yamatanooroti003
if %sinkou=3 goto *yamatanooroti002a
if %sinkou=4 goto *yamatanooroti_v
if %kousoku=1 gosub *yamatanooroti_a6:goto *common_main
rnd2 %ransu,1,4
if %ransu=1 && %owaza_count3b>1 gosub *yamatanooroti_a1:goto *common_main
if %ransu=2 gosub *yamatanooroti_a2:goto *common_main
if %ransu=3 && %owaza_count3a>6 gosub *yamatanooroti_a3:goto *common_main
if %ransu=4 && %owaza_count1a>5 gosub *yamatanooroti_a4:goto *common_main
skip -5



*yamatanooroti_a1

add %stack,1
mov %owaza_count3b,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Interesting. Trying to beat me...?":mov $sel2,"You'll enjoy my hospitality once you lose...":mov $sel3,"Yamata stares at Luka."
if %ransu=2 mov $sel1,"Hehe... Boys show their devotion in interesting ways...":mov $sel2,"I'll enjoy that face of yours gasping in pleasure.":mov $sel3,"Yamata laughs."
if %ransu=3 mov $sel1,"I wonder how your semen tastes...?":mov $sel2,"I'll be able to enjoy tasting it for a long time...":mov $sel3,"Yamata's multiple heads start to lick their lips as she stares at Luka."
name $name
eng $sel1:$sel6\
name ""
name $name
eng $sel2:$sel6\
name ""
eng $sel3:$sel6\
sub %stack,1
return



*yamatanooroti_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"It's time to taste your body...":mov $sel2,"Hehe... I want to hear your moans..."
if %ransu=2 mov $sel1,"I'll get a good taste of you...":mov $sel2,"I'll lick you..."
if %ransu=3 mov $sel1,"Hehehe... Where shall I lick...?":mov $sel2,"I'll run my tongues over you as much as you want..."
name $name
eng $sel1:$sel6\
name ""
name $name
eng $sel2:$sel6\
name ""
skillname "Sacrifice Tasting"
>Yamata's eight tongues run all over Luka's body!@
dwave 1,"se\ero_pyu2.ogg"
>Two long tongues lick Luka's neck and armpits!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:skillname "Sacrifice Tasting":skip 6
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:skillname "Sacrifice Tasting":skip 5
skillcount2 3312
if %nanido<2 damage 12,16
if %nanido=2 damage 13,17
if %nanido=3 damage 15,19
dwave 1,"se\ero_pyu2.ogg"
>Two long tongues lick Luka's nipples!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:skillname "Sacrifice Tasting":skip 6
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:skillname "Sacrifice Tasting":skip 5
skillcount2 3312
if %nanido<2 damage 12,16
if %nanido=2 damage 13,17
if %nanido=3 damage 15,19
dwave 1,"se\ero_pyu2.ogg"
>Two long tongues wrap around Luka's stomach and groin!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:skillname "Sacrifice Tasting":skip 6
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:skillname "Sacrifice Tasting":skip 5
skillcount2 3312
if %nanido<2 damage 12,16
if %nanido=2 damage 13,17
if %nanido=3 damage 15,19
dwave 1,"se\ero_pyu2.ogg"
>Two long tongues lick Luka's feet and thighs!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:skillname "Sacrifice Tasting":skip 6
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:skillname "Sacrifice Tasting":skip 5
skillcount2 3312
if %nanido<2 damage 12,16
if %nanido=2 damage 13,17
if %nanido=3 damage 15,19
skillname ""
if %mylife=0 sub %stack,1:return *yamatanooroti_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*yamatanooroti_a3

add %stack,1
mov %owaza_count3a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Let me hear your sweet moans...":mov $sel2,"You'll drown in the pleasure..."
if %ransu=2 mov $sel1,"Hehe, you'll get to enjoy this for a full year...":mov $sel2,"Let me have some fun with that young healthy body of yours..."
if %ransu=3 mov $sel1,"Give your body over to me...":mov $sel2,"I'll play with you a lot..."
name $name
eng $sel1:$sel6\
name ""
name $name
eng $sel2:$sel6\
name ""
skillname "Eight Head Assault"
>Yamata's eight heads attack Luka at the same time!\
if %ransu=1 goto *yamatanooroti_a3a
if %ransu=2 goto *yamatanooroti_a3b
if %ransu=3 goto *yamatanooroti_a3c



*yamatanooroti_a3a

>The first head forces its lips onto Luka's!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:skillname "Eight Head Assault":skip 6
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:skillname "Eight Head Assault":skip 5
skillcount2 3313
if %nanido<2 damage 14,18
if %nanido=2 damage 16,20
if %nanido=3 damage 18,22
>The second head comes around toward Luka's side, and licks his ear!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:skillname "Eight Head Assault":skip 6
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:skillname "Eight Head Assault":skip 5
skillcount2 3313
if %nanido<2 damage 14,18
if %nanido=2 damage 16,20
if %nanido=3 damage 18,22
>The third head licks Luka's right nipple!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:skillname "Eight Head Assault":skip 6
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:skillname "Eight Head Assault":skip 5
skillcount2 3313
if %nanido<2 damage 14,18
if %nanido=2 damage 16,20
if %nanido=3 damage 18,22
>The fourth head licks Luka's left nipple!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:skillname "Eight Head Assault":skip 6
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:skillname "Eight Head Assault":skip 5
skillcount2 3313
if %nanido<2 damage 14,18
if %nanido=2 damage 16,20
if %nanido=3 damage 18,22
>The fifth head licks across Luka's lower stomach!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:skillname "Eight Head Assault":skip 6
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:skillname "Eight Head Assault":skip 5
skillcount2 3313
if %nanido<2 damage 14,18
if %nanido=2 damage 16,20
if %nanido=3 damage 18,22
>The sixth and seventh head's clamp their mouth's around Luka's penis!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:skillname "Eight Head Assault":skip 6
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:skillname "Eight Head Assault":skip 5
skillcount2 3313
if %nanido<2 damage 14,18
if %nanido=2 damage 16,20
if %nanido=3 damage 18,22
>The eighth head plays with Luka's balls in its mouth!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:skip 7
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:skip 6
skillcount2 3313
if %nanido<2 damage 14,18
if %nanido=2 damage 16,20
if %nanido=3 damage 18,22
skillname ""
if %mylife=0 sub %stack,1:return *yamatanooroti_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*yamatanooroti_a3b

>The first and second heads take turns kissing Luka!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:skillname "Eight Head Assault":skip 6
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:skillname "Eight Head Assault":skip 5
skillcount2 3313
if %nanido<2 damage 28,36
if %nanido=2 damage 32,40
if %nanido=3 damage 36,44
>The third head wraps her tongue around Luka's neck!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:skillname "Eight Head Assault":skip 6
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:skillname "Eight Head Assault":skip 5
skillcount2 3313
if %nanido<2 damage 14,18
if %nanido=2 damage 16,20
if %nanido=3 damage 18,22
>The fourth and fifth heads rub their breasts against Luka's chest and stomach!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:skillname "Eight Head Assault":skip 6
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:skillname "Eight Head Assault":skip 5
skillcount2 3313
if %nanido<2 damage 28,36
if %nanido=2 damage 32,40
if %nanido=3 damage 36,44
>The sixth and seventh heads crush Luka's penis between their breasts!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:skillname "Eight Head Assault":skip 6
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:skillname "Eight Head Assault":skip 5
skillcount2 3313
if %nanido<2 damage 28,36
if %nanido=2 damage 32,40
if %nanido=3 damage 36,44
>The eighth head's tongue licks Luka's anus!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:skip 7
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:skip 6
skillcount2 3313
if %nanido<2 damage 14,18
if %nanido=2 damage 16,20
if %nanido=3 damage 18,22
skillname ""
if %mylife=0 sub %stack,1:return *yamatanooroti_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*yamatanooroti_a3c

>The first and second heads smother Luka's head with their breasts!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:skillname "Eight Head Assault":skip 6
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:skillname "Eight Head Assault":skip 5
skillcount2 3313
if %nanido<2 damage 28,36
if %nanido=2 damage 32,40
if %nanido=3 damage 36,44
>The third head rubs her nipples against Luka's right nipple!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:skillname "Eight Head Assault":skip 6
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:skillname "Eight Head Assault":skip 5
skillcount2 3313
if %nanido<2 damage 14,18
if %nanido=2 damage 16,20
if %nanido=3 damage 18,22
>The fourth head rubs her nipples against Luka's left nipple!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:skillname "Eight Head Assault":skip 6
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:skillname "Eight Head Assault":skip 5
skillcount2 3313
if %nanido<2 damage 14,18
if %nanido=2 damage 16,20
if %nanido=3 damage 18,22
>The fifth head crushes Luka's penis between her breasts!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:skillname "Eight Head Assault":skip 6
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:skillname "Eight Head Assault":skip 5
skillcount2 3313
if %nanido<2 damage 14,18
if %nanido=2 damage 16,20
if %nanido=3 damage 18,22
>The sixth head rubs her tongue all over Luka's penis!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:skillname "Eight Head Assault":skip 6
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:skillname "Eight Head Assault":skip 5
skillcount2 3313
if %nanido<2 damage 14,18
if %nanido=2 damage 16,20
if %nanido=3 damage 18,22
>The seventh head runs her tongue all over Luka's balls!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:skillname "Eight Head Assault":skip 6
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:skillname "Eight Head Assault":skip 5
skillcount2 3313
if %nanido<2 damage 14,18
if %nanido=2 damage 16,20
if %nanido=3 damage 18,22
>The eighth head's tongue licks Luka's anus!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:skip 7
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:skip 6
skillcount2 3313
if %nanido<2 damage 14,18
if %nanido=2 damage 16,20
if %nanido=3 damage 18,22
skillname ""
if %mylife=0 sub %stack,1:return *yamatanooroti_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*yamatanooroti_a4

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name $name
>It's time to carefully tease you...\
name ""
skillname "Head Bind"
dwave 1,"se\ero_makituki3.ogg"
>Yamata's heads all crowd around Luka at the same time!
if %wind=1 && %nanido<2 mov %wind_kakuritu,40
if %wind=1 && %nanido=2 mov %wind_kakuritu,35
if %wind=1 && %nanido=3 mov %wind_kakuritu,20
if %wind=2 && %nanido<2 mov %wind_kakuritu,70
if %wind=2 && %nanido=2 mov %wind_kakuritu,60
if %wind=2 && %nanido=3 mov %wind_kakuritu,35
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
if %nanido<2 damage 20,30
if %nanido=2 damage 30,40
if %nanido=3 damage 40,50
mov %kousoku,1:gosub *status_print
>Luka is stuck between all of her heads!\
skillname ""
if %mylife=0 sub %stack,1:return *yamatanooroti_h3
if %kousan=2 sub %stack,1:return
gosub *face2
name $name
if %first_sel1=1 skip 4
>Hehehe... These tongues will lick you dry.@
>They'll lick you all over your body, and send you to heaven...\
skip 3
>Hehe, this time you won't escape.@
>I'll lick you all over your body, and send you to heaven...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,100
if %earth=0 && %nanido=2 mov %genmogaku,100
if %earth=0 && %nanido=3 mov %genmogaku,100
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
sub %stack,1
return



*yamatanooroti_a6

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Let me taste this young penis...":mov $sel2,"Hehe... It's fine if you want to wriggle in pleasure."
if %ransu=2 mov $sel1,"Shoot out the proof of your submission...":mov $sel2,"My tongues feel amazing..."
if %ransu=3 mov $sel1,"Hehe... I'll tease this penis of yours...":mov $sel2,"Come whenever you want... I'll lick you clean."
name $name
eng $sel1:$sel6\
name ""
name $name
eng $sel2:$sel6\
name ""
skillname "Unending Licking"
>Yamata's eight tongues shoot out toward Luka's groin!
dwave 1,"se\ero_pyu2.ogg"
>Two tongues alternate licking from root to tip!
skillcount2 3314
if %nanido<2 damage 14,18
if %nanido=2 damage 15,19
if %nanido=3 damage 17,21
dwave 1,"se\ero_pyu2.ogg"
>Two tongues take turns licking the back muscle of Luka's penis!
if %nanido<2 damage 14,18
if %nanido=2 damage 15,19
if %nanido=3 damage 17,21
dwave 1,"se\ero_pyu2.ogg"
>One tongue wraps tightly around the tip of Luka's penis, as another gently licks Luka's urethral opening!
if %nanido<2 damage 14,18
if %nanido=2 damage 15,19
if %nanido=3 damage 17,21
dwave 1,"se\ero_pyu2.ogg"
>One tongue wraps around Luka's balls, as another gently licks Luka's anus!
if %nanido<2 damage 14,18
if %nanido=2 damage 15,19
if %nanido=3 damage 17,21
skillname ""
if %mylife=0 sub %stack,1:return *yamatanooroti_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*yamatanooroti_onedari

mov $list1,"Sacrifice Tasting"
if %3312>0 mov %list_num1,1
mov $list2,"Eight Head Assault"
if %3313>0 mov %list_num2,1
mov $list3,"Unending Licking"
if %3314>0 mov %list_num3,1
gosub *cmd_onedari
if %cmd1=11 goto *yamatanooroti_onedari1
if %cmd1=12 goto *yamatanooroti_onedari2
if %cmd1=13 goto *yamatanooroti_onedari3
if %cmd1=-1 goto *yamatanooroti_main
goto *yamatanooroti_onedari



*yamatanooroti_onedari1

gosub *onedari_syori
name $name
>Hehe... The sacrifice became obedient.@
>It looks like you want to be played with by my tongues...\
name ""
gosub *yamatanooroti_a2
skip -1



*yamatanooroti_onedari2

gosub *onedari_syori
name $name
>Hehe... The sacrifice became obedient.@
>It seems like you want to be overwhelmed by my heads...\
name ""
gosub *yamatanooroti_a3
skip -1



*yamatanooroti_onedari3

gosub *onedari_syori_k
name $name
>Hehe... The sacrifice became obedient.@
>It looks like you want my tongues to take you over...\
name ""
if %kousoku=0 gosub *yamatanooroti_a4
gosub *yamatanooroti_a6
skip -1



*yamatanooroti_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\yamatanooroti_bk01.bmp",0,0
gosub *syasei2
>With eight tongues licking Luka all over, he finally ejaculates, covering her faces with semen.\
mov %viclose,1:gosub *lose
mov %2575,%2575+1:if %2575=1 mov %count_koenemy,%count_koenemy+1
if %2575>%count_most mov %count_most,%2575:mov $count_mostname,$name
count 28,5
mov $bad1,"Yamata's tongues forced Luka to orgasm."
gosub *face2
name $name
>Hehe... What a nice explosion.\
name ""
goto *yamatanooroti_h



*yamatanooroti_h2

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\yamatanooroti_bk01.bmp",0,0
lsp 692,":a;chara\yamatanooroti_bk02.bmp",0,0
gosub *syasei2
>With eight heads attacking Luka all over, he finally ejaculates, covering her faces with semen.\
mov %viclose,1:gosub *lose
mov %2575,%2575+1:if %2575=1 mov %count_koenemy,%count_koenemy+1
if %2575>%count_most mov %count_most,%2575:mov $count_mostname,$name
count 28,5
mov $bad1,"Luka was forced to come as Yamata's eight heads attacked him."
gosub *face2
name $name
>Hehe... What a nice explosion.\
name ""
goto *yamatanooroti_h



*yamatanooroti_h3

mov %ikigoe,3:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\yamatanooroti_h02.bmp",0,0
gosub *syasei2
>Just from the feeling of her heads wrapping around him, Luka ejaculates, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2575,%2575+1:if %2575=1 mov %count_koenemy,%count_koenemy+1
if %2575>%count_most mov %count_most,%2575:mov $count_mostname,$name
count 16,5
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka accidentally came from surprise, just from Yamata's heads wrapping around him."
gosub *face2
name $name
>Oh my, already done?@
>I guess that's to be expected from a youth...\
name ""
goto *yamatanooroti_h



*yamatanooroti_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\yamatanooroti_h02.bmp",0,0
gosub *syasei2
>As the eight tongues attack him, Luka comes, moaning as each spurt is met by another tongue licking across the tip of his penis.\
mov %viclose,1:gosub *lose
mov %2575,%2575+1:if %2575=1 mov %count_koenemy,%count_koenemy+1
if %2575>%count_most mov %count_most,%2575:mov $count_mostname,$name
count 4,5
mov $bad1,"Luka was forced to come as Yamata licked him ceaselessly."
gosub *face2
name $name
>Hehe... Your semen is quite delicious.\
name ""
goto *yamatanooroti_h



*yamatanooroti_h

mov %skill03,0
mov $bad2,"Stuck as the sacrifice, Luka was licked without end..."
if %2575=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
>As I lose the will to resist, Yamata's eight heads crowd around me.\
name $name
>Now then, I'll devour that body of yours...\
name ""
name "Luka"
>"Devour"...? You can't mean...\
name ""
name $name
>Hehehe, don't worry, I don't eat flesh...@
>Instead, my tongues will devour up all of your fluids...\
name ""
name $name
>Sweat, tears, saliva, semen... Everything with a good taste.\
name "Luka"
>N...No, you can't!\
name ""
>I struggle as hard as I can... I have to escape somehow!\
name $name
>Hehe... If you don't want to make me angry, you shouldn't struggle...\
name ""
name $name
>Or would you prefer I crush that small body of yours and lick up the blood?\
name ""
name "Luka"
>N...No!\
name ""
>Scared at her words, I stop resisting.@
>Bound in her heads, I'm totally at her mercy...\
name $name
>Hehe, good.@
>Just lay back and keep quiet...\
name ""
name $name
>If you're nice and obedient, it will feel amazing...\
name ""
mov %hseanvoice,1:hseanvoice
cspl 690,699
lsp 700,":a;chara\yamatanooroti_h03.bmp",0,0:print 10,500
>Her tongues extend, wrapping around my groin and nipples.@
>Before I can react to those, more tongues start to caress my cheek and neck.\
name "Luka"
>Ahhh...\
name ""
>Another tongue slowly wraps around my penis, forming a spiral around it.@
>More and more of her warm saliva starts to cover my body, as her long tongues carefully lick me.\
name $name
>Hehe, what a cute response...\
name ""
>Yamata giggles as her tongues flick my penis and nipples playfully.\
>Her long tongues rub and massage me all around my nipples, as the pointed ends of her tongues gently flick them back and forth.\
>The strange stimulation from my chest causes my body to shiver in response.\
name $name
>Hehehe... I need to carefully taste every inch of your body first...\
name ""
>The snake-like tongue wrapped around my penis starts to slowly move.@
>Very slowly, her warm tongue starts to move up and down.\
>The wet, warm feeling of her saliva covered tongue on me makes me moan out as it slowly pumps me.\
name "Luka"
>Ahh... Urhg...\
name ""
>I'm only barely holding on.@
>If I were to actually struggle, she would crush my body...\
name $name
>It looks like my threat worked...@
>Hehe, what a cute little boy.\
name ""
name $name
>Now then, have a taste of my saliva...\
name ""
>One of her tongues forces its way into my mouth, already half open as I gasp in pleasure.@
>Her long tongue quickly moves around my mouth, and wraps itself around my tongue.\
>With her tongue wrapped both around my own tongue and my penis at the same time, I continue to gasp in pleasure.\
name "Luka"
>Ahh...\
name ""
name $name
>Hehehe... Your pre-come is seeping out.\
name ""
name $name
>Ah, the taste of a young boy's semen...\
name ""
>One of her tongues continually licks across the tip of my penis, tasting each drop of pre-come as it seeps out.\
name "Luka"
>Haaauu!\
name ""
>As several of her tongues fight over my penis, the stimulation makes me moan out.\
>Suddenly, my mind and body start to tingle as I feel myself unconsciously pushing upwards with my waist.\
name "Luka"
>Ahh... I'm going to come...\
name ""
name $name
>Hehe, go ahead and ejaculate...@
>Give me a taste of that fresh semen...\
name ""
>The tongue around my penis tightens, and quickens its pumping motions.@
>Another tongue eagerly licks my urethral opening, as if urging me to shoot it out of there.\
>The combination of sweet stimulations cause my head to go pure white.\
name "Luka"
>Ah... Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\yamatanooroti_h05.bmp",0,0
gosub *syasei2
>As soon as my ejaculation starts, her tongues rush toward my penis.@
>They start to violently lick and massage me, all competing against the others for a taste.\
>I wriggle helplessly under the violent assault of her hungering tongues.\
name "Luka"
>Ahhhh!\
name ""
>Sensitive during the orgasm, the powerful stimulus is too much for me to take.\
name $name
>What delicious semen...@>Nnn... *Lick*\
name ""
name $name
>Hehe, he's even leaking tears... How cute.@
>Allow me to devour even those tears...\
name ""
>A long tongue runs over my cheeks, licking up my tears.@
>I can't do anything without being attacked by one of her tongues...\
>I really am her sacrifice... Just prey to be exploited...\
name $name
>Hehehe... All of your fluids are food to me.\
name ""
lsp 700,":a;chara\yamatanooroti_h06.bmp",0,0:print 10,500
>Yamata's long tongues run over my body, licking up my sweat from the orgasm.\
>Her unnaturally long tongues wrap around my body, gently tightening as they wriggle and lick all over.\
name "Luka"
>Ahh... That feels good...\
name ""
name $name
>Hehe, so you enjoy being caressed by my tongues?\
name ""
name $name
>Then I'll give you even more...\
name ""
>The tongue wrapped around my penis starts to vibrate.@
>Stuck under her warm, wet tongue, the strong vibrations make it feel like I'm being licked thousands of times every second.\
name "Luka"
>Ah...!@> Ahhh!\
name ""
name $name
>Hehehe... What a lovely voice.\
name ""
name $name
>Pathetic boy... I'll make you into my obedient sacrifice...\
name ""
>Her long tongue continues to pump my penis, as it vibrates and tightens around me.@
>It feels like my penis itself is being devoured by her tongue...\
>At the same time, her tongues wrap and lick the rest of my body.@
>My cheek, stomach, thighs, neck, anus...@
>Every part of me is being licked and attacked by her tongues.\
>Entangled in her tongues, I can't do anything but moan in ecstasy.\
name "Luka"
>Ahh!@> I...I'm coming again!\
name ""
name $name
>Hehe, already coming again...@
>Young men sure do come fast...\
name ""
name $name
>Now, come...@> My tongues will send you to heaven...\
name ""
>Her tongue around my penis tightens up.@
>The skilled tongue gently squeezes my tip, as the end of her pointed tongue tickles my urethral opening.\
>Overcome by the pleasure, I give my body over to it.\
name "Luka"
>Ah...\
name ""
gosub *syasei1
lsp 700,":a;chara\yamatanooroti_h07.bmp",0,0
gosub *syasei2
>Stuck in that tight entanglement of tongues, I come again.@
>As soon as I do, the fight over the semen starts again.\
name "Luka"
>Hyaaa!\
name ""
>Her tongues jostle and fight each other, as they all struggle to be the first to lick my penis after each spurt.\
name $name
>Hehe, how delicious...@
>It's good we can squeeze out a lot more...\
name ""
name $name
>There's sweat all over your body...@
>I'll be sure to lick up everything...\
name ""
mov %hseanvoice,2:hseanvoice
lsp 700,":a;chara\yamatanooroti_h08.bmp",0,0:print 10,500
>Her tongues wrap around my body even more.@
>It feels like my entire body is being bound by her tongues...\
name "Luka"
>Ahhh!\
name ""
>Enclosed in her warm, wet tongues, every inch of my body is being licked at the same time.\
>Her tongues start to tighten all over, as the tongue around my penis starts to pump even faster.@
>Frustrated at being so helpless, tears start to flow out of my eyes.\
name $name
>Hehehe... Who would have thought I could ever get hold of such a high quality sacrifice...\
name ""
name $name
>Well?@>How does it feel to be my prey?@>Incredible, right?\
name ""
name "Luka"
>Ahh... It feels good...\
name ""
>With her tongues creeping around my body, I had given myself over to the pleasure before I noticed.\
>I start to expect the pleasure from each movement of her tongue, and moan out in response when it's given.@
>Before long, I feel another orgasm coming.\
name "Luka"
>I'm coming again...!@> Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\yamatanooroti_h09.bmp",0,0
gosub *syasei2
>I spurt out more semen into her waiting tongues.@
>Gasping in pleasure after the orgasm, I've completely become a slave to her tongues...\
name "Luka"
>Ah... Ahhhh!\
name ""
name $name
>Normally I free the sacrifice after a year...\
name ""
name $name
>But since you challenged me like that, I'll keep you forever.@
>I'll keep you here and lick you dry for the rest of your life...\
name ""
name "Luka"
>Ahhhh!\
name ""
>That hopeless announcement of my fate would have made me terrified before...@
>But now it sounds good.@>With my body aching in agony, I continue to desire more pleasure...\
mov %hseanvoice,0:hseanvoice
gosub *anten
>After one year...\
mov %hseanvoice,2:hseanvoice
lsp 700,":a;chara\yamatanooroti_h10.bmp",0,0:print 10,500
bg "bg\bg092.bmp",10,3000
name "Luka"
>Ahhh!\
name ""
>Wrapped in her tongues, I've been licked without end...\
>Semen, sweat, saliva, tears... She licks up everything.@
>Even my urine and other fluids are dealt with by her.\
name "Luka"
>Ahh!@> Ahhhh!\
name ""
>Her warm, wet tongues wriggle around my body.@
>I haven't felt anything but this pleasure for a full year...\
>Long ago I completely gave my self over to her, and now rejoice in the ecstasy.\
name "Luka"
>Ahh... Coming...\
name ""
name $name
>I'll never tire of that semen of yours...\
name ""
>Her tongue tightens around my penis again, forcing out my semen.@
>Already trained on what's coming next, I relax my body as I moan in pleasure.\
gosub *syasei1
lsp 700,":a;chara\yamatanooroti_h11.bmp",0,0
gosub *syasei2
>With my body slack in orgasm, I shoot semen into her waiting tongues.\
name $name
>Such an amazing taste...@
>I'll never let my little sacrifice free...\
name ""
name "Luka"
>Ahhh...\
name ""
>Now her sacrifice, I belong to Yamata...@
>But since I'm able to experience the height of ecstasy, I'm happy.\
>And for the rest of my life, I'll get to experience this pleasure...\
gosub *anten
mov %hseanvoice,0:hseanvoice
>...........\
goto *badend



*insects_start

mov $name,"Insect Girls"
mov $name2,"Moth Girl"
mov $lavel,"insects"
mov $tatie1,"moss_st01"
mov $tatie2,"moss_st02"
mov $tatie3,"moss_st03"
mov $tatie4,"moss_st01"
mov $haikei,"bg093"
mov %monster_x,-50
mov %monster_y,50
mov $tatie1b,"mosquito_st01"
mov $tatie2b,"mosquito_st02"
mov $tatie3b,"mosquito_st03"
mov %monster_xb,450
mov %monster_yb,50
mov $tatie1c,"imomusi_st01"
mov $tatie2c,"imomusi_st02"
mov $tatie3c,"imomusi_st03"
mov %monster_xc,210
mov %monster_yc,160
if %nanido=1 mov %max_enemylife,3200
if %nanido=2 mov %max_enemylife,3600
if %nanido=3 mov %max_enemylife,4000
if %nanido=1 mov %henkahp1,2000
if %nanido=2 mov %henkahp1,2200
if %nanido=3 mov %henkahp1,2400
if %nanido=1 mov %henkahp2,800
if %nanido=2 mov %henkahp2,800
if %nanido=3 mov %henkahp2,800
if %nanido=0 mov %max_enemylife,3
if %nanido=0 mov %henkahp1,2
if %nanido=0 mov %henkahp2,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,40
if %nanido=3 mov %earth_keigen,20
mov %music,1
mov %tikei,2
gosub *maxmp:mov %mp,%max_mp
mov %tekikazu,3
gosub *syutugen2
mov $mogaku_anno1,"But Luka is stuck in the Caterpillar Girl's sticky silk!"
mov $mogaku_anno3,"But wrapped in the Caterpillar Girl's silk, he can't attack!"
mov $mogaku_sel1,"Aha, you can't escape! "
mov $mogaku_sel2,"No matter how violent you struggle, you won't break free! "
mov $mogaku_sel3,"Struggling just makes it tighter! "
mov $mogaku_sel4,"My silk is tougher than it seems. "
mov $mogaku_sel5,"Pointless! You won't break free! "
mov $half_s1,"Hehe, it feels good doesn't it?"
mov $half_s2,"When you can't take it any longer, just come..."
mov $kiki_s1,"It looks like you're at your limit..."
mov $kiki_s2,"It's time to make you into simple prey..."
mov %end_n,6
mov %exp_minus,0
mov %zmonster_x,-50
mov %tukix,40
mov %tekikazu,3
mov %owaza_count1a,3
mov %owaza_count2a,3
mov %owaza_count3a,3
name "Moth Girl"
>If you're defending the plant monsters, you're our enemy too.\
name ""
name "Mosquito Girl"
>Haha, today will be quite the feast. @
>In addition to vegetable juice, I'll get to suck out some human semen. \
name ""
name "Caterpillar Girl"
>Enemy!@> Enemy!@>Get him! \
name ""
name "Luka"
>Guh... This isn't what I was hoping for when I came here!\
name ""
>I pull out my sword in front of the three insect girls.@
>I don't have any choice at the moment but to seal them!\
name "Luka"
>Alright, here I come!\
name ""
name "Moth Girl"
>Whomever makes him come first gets him... How does that sound?\
name ""
name "Mosquito Girl"
>So it's first come for ownership, is it? @
>I'm fine with that. \
name ""
name "Caterpillar Girl"
>Hehehe... Time to put him into a cocoon! \
name ""
mov %sinkou,1
goto *common_main



*insects001

gosub *face3
name "Moth Girl"
>What... Is this...?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Moth Girl turns into a normal moth!\
csp 704
lsp 700,":a;chara\mosquito_st01.bmp",380,50
lsp 702,":a;chara\imomusi_st01.bmp",0,160:print 10,500
mov $name2,"Mosquito Girl"
mov $tatie1,"mosquito_st01"
mov $tatie2,"mosquito_st02"
mov $tatie3,"mosquito_st03"
mov $tatie4,"mosquito_st02"
mov %monster_x,380
mov %monster_y,50
mov $tatie1b,"imomusi_st01"
mov $tatie2b,"imomusi_st02"
mov $tatie3b,"imomusi_st03"
mov %monster_xb,0
mov %monster_yb,160
mov $half_s1,"Hehe, are you feeling good yet?"
mov $half_s2,""
mov $kiki_s1,"It looks like you're almost done..."
mov $kiki_s2,"I'll suck out all of your semen soon..."
mov %sel_hphalf,0
mov %sel_kiki,0
mov %first_sel1,0
mov %first_sel2,0
mov %first_sel3,0
mov %tekikazu,2
mov %zmonster_x,-100
mov %tukix,470
name "Mosquito Girl"
>We can't take him lightly!\
name ""
name "Caterpillar Girl"
>I'll fight seriously too!\
name ""
mov %sinkou,2
goto *insects_a



*insects_v

if %nanido=0 && %sinkou=1 goto *insects_v2
gosub *face3
name "Mosquito Girl"
>Kuh... Too much...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Mosquito Girl turns into a normal mosquito!\
name "Caterpillar Girl"
>Wahwahwah!\
name ""
dwave 1,"se\escape.ogg"
cspl 701,702:print 10,1000
>The Caterpillar girl runs away!\
mov %viclose,1:gosub *victory_plural
mov %getexp,5000:gosub *lvup
mov %2276,1
goto *sean0182



*insects_v2

gosub *face3
name "Mosquito Girl"
>Kuh... Too much...\
name ""
dwave 1,"se\syometu.ogg"
cspl 700,702:print 99,4500,"system\breakup.dll/urb"
>The Mosquito Girl turns into a normal mosquito!\
name "Caterpillar Girl"
>Wahwahwah!\
name ""
dwave 1,"se\escape.ogg"
csp 704:print 10,1000
csp 702:print 10,1000
>The Caterpillar Girl runs away!\
mov %viclose,1:gosub *victory_plural
mov %getexp,5000:gosub *lvup
mov %2276,1
goto *sean0182



*insects_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
if %sinkou=2 skip 4
name "Moth Girl"
>Ara, giving up?\
name ""
name "Mosquito Girl"
>Already giving up?@> What a pathetic human...\
name ""
name "Caterpillar Girl"
>Bullying time, bullying time! 
name ""
goto *insects_a



*insects_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *insects_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *insects_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *insects_kousan
if %cmd1=16 && %sinkou=1 goto *insects_onedaria
if %cmd1=16 && %sinkou=2 goto *insects_onedarib
if %cmd1=17 goto *common_skill
goto *insects_main



*insects_mogaku2

mov %before_action,8
if %nanido=2 rnd2 %ransu,1,10:if %ransu=5 goto *common_mogaku
if %nanido=3 rnd2 %ransu,1,2:if %ransu=2 goto *common_mogaku
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Uooo!"
if %ransu=2 mov $sel1,"Damn you!"
if %ransu=3 mov $sel1,"Let go!"
name "Luka"
eng $sel1:$sel6\
name ""
gosub *face3
mov %kousoku,0:gosub *status_print
dwave 1,"se\dassyutu.ogg"
>Luka struggles violently, and breaks free!\
name "Caterpillar Girl"
>Ohohoh?\
name ""
gosub *face1
mov %owaza_count1a,0
goto *common_main



*insects_earth2

mov %before_action,8
if %nanido=3 rnd2 %ransu,1,2:if %ransu=2 goto *mogaku_earth1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"With this strength...!"
if %ransu=2 mov $sel1,"Using Gnome's power...!"
if %ransu=3 mov $sel1,"With the power of the earth...!"
name "Luka"
eng $sel1:$sel6\
name ""
dwave 1,"se\power.ogg"
>The power of the earth fills Luka with monstrous strength!\
gosub *face3
mov %kousoku,0:gosub *status_print
dwave 1,"se\dassyutu.ogg"
>Luka struggles with all his might, and breaks free!\
name "Caterpillar Girl"
>Wahwahwah!@> Incredible!\
name ""
gosub *face1
mov %owaza_count1a,0
goto *common_main



*insects_a

if %enemylife<%henkahp1 && %sinkou=1 goto *insects001
if %enemylife<%henkahp2 && %sinkou=2 goto *insects_v
if %kousoku=1 rnd2 %ransu,1,4
if %kousoku=1 && %sinkou=1 && %ransu=1 gosub *insects_a1:gosub *insects_a6:gosub *insects_a9:goto *common_main
if %kousoku=1 && %sinkou=1 && %ransu=2 gosub *insects_a2:gosub *insects_a9:goto *common_main
if %kousoku=1 && %sinkou=1 && %ransu=3 gosub *insects_a3:gosub *insects_a9:goto *common_main
if %kousoku=1 && %sinkou=1 && %ransu=4 && %owaza_count2a>4 && %status=0 gosub *insects_a10:gosub *insects_a9:goto *common_main
if %kousoku=1 && %sinkou=2 && %ransu=1 gosub *insects_a6:gosub *insects_a9:goto *common_main
if %kousoku=1 && %sinkou=2 && %ransu=2 gosub *insects_a7:gosub *insects_a9:goto *common_main
if %kousoku=1 && %sinkou=2 && %ransu=3 && %owaza_count3a>4 gosub *insects_a11:gosub *insects_a9:goto *common_main
if %kousoku=1 skip -8
rnd2 %ransu,1,6
if %sinkou=1 && %ransu=1 gosub *insects_a1:gosub *insects_a6:gosub *insects_a4:goto *common_main
if %sinkou=1 && %ransu=2 gosub *insects_a2:gosub *insects_a4:goto *common_main
if %sinkou=1 && %ransu=3 gosub *insects_a3:gosub *insects_a4:goto *common_main
if %sinkou=1 && %ransu=4 && %owaza_count2a>4 && %status=0 gosub *insects_a10:goto *common_main
if %sinkou=2 && %ransu=1 gosub *insects_a6:gosub *insects_a4:goto *common_main
if %sinkou=2 && %ransu=2 gosub *insects_a7:gosub *insects_a4:goto *common_main
if %sinkou=2 && %ransu=3 gosub *insects_a8:goto *common_main
if %sinkou=2 && %ransu=4 && %owaza_count3a>4 gosub *insects_a11:goto *common_main
if %ransu>4 && %owaza_count1a>4 gosub *insects_a5:goto *common_main
skip -10



*insects_a1

add %stack,1
if %kousoku=0 skip 2
>Luka's body is wrapped in the Caterpillar Girl's silk...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll rub you a little..."
if %ransu=2 mov $sel1,"It feels good, doesn't it? Hehehe..."
if %ransu=3 mov $sel1,"My legs are nice and furry, aren't they?"
name "Moth Girl"
eng $sel1:$sel6\
name ""
skillname "Six-Legged Caress"
dwave 1,"se\umaru.ogg"
>The Moth Girl lovingly rubs Luka's body with her six legs!
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3316
if %nanido<2 damage 30,35
if %nanido=2 damage 34,39
if %nanido=3 damage 38,43
skillname ""
if %mylife=0 sub %stack,1:return *insects_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*insects_a2

add %stack,1
if %kousoku=0 skip 2
>Luka's body is wrapped in the Caterpillar Girl's silk...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Have a taste of our chests...":mov $sel2,"We'll crush it like this..."
if %ransu=2 mov $sel1,"Your penis can't take this, can it?":mov $sel2,"It's already so hard... Hehe."
if %ransu=3 mov $sel1,"Spray your semen all over our chests...":mov $sel2,"Now, come on our breasts..."
name "Moth Girl"
eng $sel1:$sel6\
name ""
name "Mosquito Girl"
eng $sel2:$sel6\
name ""
skillname "Double Bug Tit Fuck"
eng "The Moth and Mosquito Girls crush Luka's penis between their breasts!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3318
mov %damage_nobr,1
dwave 1,"se\ero_koki1.ogg"
if %nanido<2 damage 30,35
if %nanido=2 damage 34,39
if %nanido=3 damage 38,43
dwave 1,"se\ero_koki1.ogg"
if %nanido<2 damage 30,35
if %nanido=2 damage 34,39
if %nanido=3 damage 38,43
skillname ""
if %mylife=0 sub %stack,1:return *insects_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*insects_a3

add %stack,1
if %kousoku=0 skip 2
>Luka's body is wrapped in the Caterpillar Girl's silk...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"We'll lick your penis...":mov $sel2,"Having two licking you at once is amazing, isn't it?"
if %ransu=2 mov $sel1,"It feels good, doesn't it?":mov $sel2,"I'll run my tongue all over your penis..."
if %ransu=3 mov $sel1,"Which tongue feels the best?":mov $sel2,"Hehe... Mine's the best, of course."
name "Moth Girl"
eng $sel1:$sel6\
name ""
name "Mosquito Girl"
eng $sel2:$sel6\
name ""
skillname "Double Bug Blowjob"
eng "The Moth and Mosquito Girls lick Luka's penis together!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3319
mov %damage_nobr,1
dwave 1,"se\ero_buchu2.ogg"
if %nanido<2 damage 35,40
if %nanido=2 damage 39,44
if %nanido=3 damage 43,48
dwave 1,"se\ero_buchu2.ogg"
if %nanido<2 damage 35,40
if %nanido=2 damage 39,44
if %nanido=3 damage 43,48
skillname ""
if %mylife=0 sub %stack,1:return *insects_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*insects_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"..........":mov $sel2,"The Caterpillar Girl looks on."
if %ransu=2 mov $sel1,"Wawawa...":mov $sel2,"The Caterpillar Girl is confused!"
if %ransu=3 mov $sel1,"Ehehe...":mov $sel2,"The Caterpillar Girl is smiling."
name "Caterpillar Girl"
eng $sel1:$sel6\
name ""
eng $sel2:$sel6\
sub %stack,1
return



*insects_a5

add %stack,1
mov %owaza_count1a,0
name "Caterpillar Girl"
>There we go!\
name ""
skillname "Sticky Silk"
dwave 1,"se\ero_ito.ogg"
>The Caterpillar Girl sprays sticky silk from her abdomen!
if %wind=1 && %nanido<2 mov %wind_kakuritu,15
if %wind=1 && %nanido=2 mov %wind_kakuritu,10
if %wind=1 && %nanido=3 mov %wind_kakuritu,7
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes it away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3322
if %nanido<2 damage 30,40
if %nanido=2 damage 38,48
if %nanido=3 damage 46,56
if %sinkou=1 lsp 704,":a;chara\imomusi_h1a.bmp",210,160
if %sinkou=2 lsp 702,":a;chara\imomusi_h1a.bmp",0,160
mov %kousoku,1:gosub *status_print
>Luka is covered in the Caterpillar Girl's sticky string!\
skillname ""
if %mylife=0 sub %stack,1:return *insects_h4
if %kousan=2 sub %stack,1:return
gosub *face2
name "Caterpillar Girl"
if %first_sel1=1 skip 3
>Hehe... You can't escape now. \
skip 2
>Don't escape this time. \
name ""
mov %first_sel1,1
if %sinkou=2 skip 5
name "Moth Girl"
>Arara... You got stuck in her sticky silk.@
>You look like a caterpillar yourself now... Hehe.\
name ""
name "Mosquito Girl"
>Ahaha, it's time to play with you...\
name ""
if %sinkou=1 mov $sel1,"The two insect girls giggle."
if %sinkou=2 mov $sel1,"The Moth Girl giggles."
eng $sel1:$sel6\
if %earth=0 && %nanido<2 mov %genmogaku,3
if %earth=0 && %nanido=2 mov %genmogaku,3
if %earth=0 && %nanido=3 mov %genmogaku,4
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
sub %stack,1
return



*insects_a6

add %stack,1
if %kousoku=0 skip 2
>Luka's body is wrapped in the Caterpillar Girl's silk...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I can even get it out by using my hand..."
if %ransu=2 mov $sel1,"Have a nice taste of my hand..."
if %ransu=3 mov $sel1,"Hurry up and come!"
name "Mosquito Girl"
eng $sel1:$sel6\
name ""
skillname "Mosquito Handjob"
dwave 1,"se\ero_koki1.ogg"
>The Mosquito Girl grabs Luka's penis, and violently pumps him up and down!
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3317
if %nanido<2 damage 35,45
if %nanido=2 damage 39,49
if %nanido=3 damage 43,53
skillname ""
if %mylife=0 sub %stack,1:return *insects_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*insects_a7

add %stack,1
if %kousoku=0 skip 2
>Luka's body is wrapped in the Caterpillar Girl's silk...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Spray your semen on my chest..."
if %ransu=2 mov $sel1,"I'll crush your penis from root to tip..."
if %ransu=3 mov $sel1,"It feels good, right? So just come...!"
name "Mosquito Girl"
eng $sel1:$sel6\
name ""
skillname "Mosquito Tit Fuck"
dwave 1,"se\ero_koki1.ogg"
>The Mosquito Girl puts Luka's penis between her breasts, and crushes his penis between them!
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3320
if %nanido<2 damage 45,50
if %nanido=2 damage 49,54
if %nanido=3 damage 53,58
skillname ""
if %mylife=0 sub %stack,1:return *insects_h6
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*insects_a8

add %stack,1
if %kousoku=0 skip 2
>Luka's body is wrapped in the Caterpillar Girl's silk...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Let's lick it all over...":mov $sel2,"I'll suck on it too. "
if %ransu=2 mov $sel1,"We'll both suck on it...":mov $sel2,"I'm good at licking! "
if %ransu=3 mov $sel1,"Make sure you come in my mouth...":mov $sel2,"No, no, in mine! "
name "Mosquito Girl"
eng $sel1:$sel6\
name ""
name "Caterpillar Girl"
eng $sel2:$sel6\
name ""
skillname "Double Insect Blowjob"
dwave 1,"se\ero_buchu2.ogg"
eng "The Mosquito and Caterpillar Girl take turns sucking on Luka's penis!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3321
mov %damage_nobr,1
dwave 1,"se\ero_buchu2.ogg"
if %nanido<2 damage 35,40
if %nanido=2 damage 39,44
if %nanido=3 damage 43,48
dwave 1,"se\ero_buchu2.ogg"
if %nanido<2 damage 35,40
if %nanido=2 damage 39,44
if %nanido=3 damage 43,48
skillname ""
if %mylife=0 sub %stack,1:return *insects_h7
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*insects_a9

add %stack,1
>Luka's body is wrapped in the Caterpillar Girl's silk...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hehe, stuck in a sticky hell. "
if %ransu=2 mov $sel1,"More, more, more! I'll wrap you more! "
if %ransu=3 mov $sel1,"Hehe... My sticky silk feels good, doesn't it? "
name "Caterpillar Girl"
eng $sel1:$sel6\
name ""
skillname "Sticky Silk"
dwave 1,"se\ero_ito.ogg"
>The Caterpillar Girl shoots sticky silk from her abdomen!\
>As the sticky silk entangles him, Luka is attacked by a strange pleasure!
skillcount2 3322
if %nanido<2 damage 30,40
if %nanido=2 damage 38,48
if %nanido=3 damage 46,56
skillname ""
if %mylife=0 sub %stack,1:return *insects_h4
sub %stack,1
return



*insects_a10

add %stack,1
if %kousoku=0 skip 2
>Luka's body is wrapped in the Caterpillar Girl's silk...\
mov %owaza_count2a,0
name "Moth Girl"
>My pheromones will put you in a trance...\
name ""
skillname "Pheromone Scales"
dwave 1,"se\gas.ogg"
eng "The insectile scales under the Moth Girl's wings start to shake!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,50
if %wind=1 && %nanido=2 mov %wind_kakuritu,40
if %wind=1 && %nanido=3 mov %wind_kakuritu,25
if %wind=2 && %nanido<2 mov %wind_kakuritu,90
if %wind=2 && %nanido=2 mov %wind_kakuritu,80
if %wind=2 && %nanido=3 mov %wind_kakuritu,45
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But a gust of wind blows the scales away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3315
mov %status,1:gosub *status_print
>Luka became immersed in ecstasy!\
skillname ""
if %kousan=2 sub %stack,1:return
name "Luka"
>Ahh...\
name ""
name "Moth Girl"
>Now we can play as much as we like...\
name ""
name "Mosquito Girl"
>Hehe... I wonder what I should do...\
name ""
name "Caterpillar Girl"
>Time to tease him!\
name ""
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,3,4
if %nanido=3 rnd2 %status_turn,4,5
sub %stack,1
return



*insects_a11

add %stack,1
if %kousoku=0 skip 2
>Luka's body is wrapped in the Caterpillar Girl's silk...\
mov %owaza_count3a,0
name "Mosquito Girl"
>I'll suck out your semen...\
name ""
skillname "Mosquito Drain"
dwave 1,"se\ero_chupa6.ogg"
>The Mosquito Girl sucks on Luka's penis, as if she was trying to suck blood!
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,25
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
if %wind=2 && %nanido<2 mov %wind_kakuritu,50
if %wind=2 && %nanido=2 mov %wind_kakuritu,40
if %wind=2 && %nanido=3 mov %wind_kakuritu,25
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3585
if %nanido<2 damage 25,30
if %nanido=2 damage 28,33
if %nanido=3 damage 31,36
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
dwave 1,"se\ero_chupa6.ogg"
>She keeps sucking harder!
if %nanido<2 damage 25,30
if %nanido=2 damage 28,33
if %nanido=3 damage 31,36
dwave 1,"se\ero_chupa6.ogg"
>As if trying to suck the semen straight from his balls, she keeps sucking!
if %nanido<2 damage 25,30
if %nanido=2 damage 28,33
if %nanido=3 damage 31,36
skillname ""
if %mylife=0 sub %stack,1:return *insects_h8
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*insects_onedaria

mov $list1,"Six-Legged Caress"
if %3316>0 mov %list_num1,1
mov $list2,"Mosquito Handjob"
if %3317>0 mov %list_num2,1
mov $list3,"Double Bug Tit Fuck"
if %3318>0 mov %list_num3,1
mov $list4,"Double Bug Blowjob"
if %3319>0 mov %list_num4,1
mov $list5,"Pheromone Scales"
if %3315>0 mov %list_num5,1
mov $list6,"Sticky Silk"
if %3322>0 mov %list_num6,1
mov $list7,"Mosquito Tit Fuck"
if %3320>0 mov %list_num7,1
mov $list8,"Double Insect Blowjob"
if %3321>0 mov %list_num8,1
mov $list9,"Mosquito Drain"
if %3585>0 mov %list_num9,1
gosub *cmd_onedari
if %cmd1=11 goto *insects_onedari1
if %cmd1=12 goto *insects_onedari2
if %cmd1=13 goto *insects_onedari3
if %cmd1=14 goto *insects_onedari4
if %cmd1=15 goto *insects_onedari8
if %cmd1=16 goto *insects_onedari7
if %cmd1=17 goto *insects_onedari5
if %cmd1=18 goto *insects_onedari6
if %cmd1=19 goto *insects_onedari9
if %cmd1=-1 goto *insects_main
goto *insects_onedaria



*insects_onedarib

mov %list_num1,0
mov %list_num2,0
mov %list_num3,0
mov %list_num4,0
mov %list_num5,0
mov $list1,"Mosquito Handjob"
if %3317>0 mov %list_num1,1
mov $list2,"Mosquito Tit Fuck"
if %3320>0 mov %list_num2,1
mov $list3,"Double Insect Blowjob"
if %3321>0 mov %list_num3,1
mov $list4,"Mosquito Drain"
if %3585>0 mov %list_num4,1
mov $list5,"Sticky Silk"
if %3322>0 mov %list_num5,1
mov $list6,""
mov $list7,""
mov $list8,""
mov $list9,""
gosub *cmd_onedari
if %cmd1=11 goto *insects_onedari2
if %cmd1=12 goto *insects_onedari5
if %cmd1=13 goto *insects_onedari6
if %cmd1=14 goto *insects_onedari9
if %cmd1=15 goto *insects_onedari7
if %cmd1=-1 goto *insects_main
goto *insects_onedarib



*insects_onedari1

gosub *onedari_syori
name "Moth Girl"
>You want my legs to play with your body?\
name ""
gosub *insects_a1
skip -1



*insects_onedari2

gosub *onedari_syori
name "Mosquito Girl"
>You want my hands to squeeze out your semen?\
name ""
gosub *insects_a6
skip -1



*insects_onedari3

gosub *onedari_syori
name "Moth Girl"
>You want us to use our breasts to squeeze out your semen?\
name ""
name "Mosquito Girl"
>Fine... We'll do what you want!\
name ""
gosub *insects_a2
skip -1



*insects_onedari4

gosub *onedari_syori
name "Moth Girl"
>You want us to suck out your semen with our mouths?\
name ""
name "Mosquito Girl"
>Fine... We'll do what you want!\
name ""
gosub *insects_a3
skip -1



*insects_onedari5

gosub *onedari_syori
name "Mosquito Girl"
>You want my breasts to squeeze out your semen?\
name ""
gosub *insects_a7
skip -1



*insects_onedari6

gosub *onedari_syori
name "Mosquito Girl"
>You want us to suck out your semen with our mouths?\
name ""
name "Caterpillar Girl"
>Ehehe, I'll lick you lots and lots. \
name ""
gosub *insects_a8
skip -1



*insects_onedari7

gosub *onedari_syori_k
name "Caterpillar Girl"
>You want to be wrapped by my silk?\
name ""
if %kousoku=0 gosub *insects_a5
gosub *insects_a9
skip -1



*insects_onedari8

gosub *onedari_syori
name "Moth Girl"
>You want to be immersed in ecstasy?\
name ""
gosub *insects_a10
goto *insects_a



*insects_onedari9

gosub *onedari_syori
name "Mosquito Girl"
>You want me to suck up everything of yours...?\
name ""
gosub *insects_a11
skip -1



*insects_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\moss_bk03.bmp",-50,50
gosub *syasei2
>As the Moth Girl's six legs massage Luka all over his body, he's forced to orgasm, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2576,%2576+1:if %2576=1 mov %count_koenemy,%count_koenemy+1
if %2576>%count_most mov %count_most,%2576:mov $count_mostname,$name
count 28,7
mov $bad1,"Luka was forced to orgasm by the Moth Girl's six legs."
gosub *face2
name "Moth Girl"
>You already came, did you?@> Hehe.\
name ""
goto *insects_ha



*insects_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\moss_bk02.bmp",-50,50
lsp 693,":a;chara\mosquito_bk03.bmp",450,50
gosub *syasei2
>Sandwiched between their breasts, Luka finally gives in, covering their chests with semen.\
mov %viclose,1:gosub *lose
mov %2576,%2576+1:if %2576=1 mov %count_koenemy,%count_koenemy+1
if %2576>%count_most mov %count_most,%2576:mov $count_mostname,$name
count 7,7
mov $bad1,"Luka was forced to orgasm by the Mosquito and Moth Girl's double tit fuck."
gosub *face2
name "Moth Girl"
>He came, eh?@> Hehehe...\
name ""
name "Mosquito Girl"
>Our breasts are all covered...\
name ""
goto *insects_ha



*insects_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\moss_bk01.bmp",-50,50
lsp 692,":a;chara\mosquito_bk01b.bmp",450,50
gosub *syasei2
>Unable to take their double blowjob any longer, Luka comes, scattering semen over their tongues.\
mov %viclose,1:gosub *lose
mov %2576,%2576+1:if %2576=1 mov %count_koenemy,%count_koenemy+1
if %2576>%count_most mov %count_most,%2576:mov $count_mostname,$name
count 4,7
mov $bad1,"Luka was forced to orgasm by the Mosquito and Moth Girl's double blowjob."
gosub *face2
name "Moth Girl"
>He came, eh?@> Hehehe...\
name ""
name "Mosquito Girl"
>He covered our tongues with so much semen...\
name ""
goto *insects_ha



*insects_h4

mov %ikigoe,3:gosub *ikigoe
gosub *syasei1
if %sinkou=1 lsp 704,":a;chara\imomusi_h2a.bmp",210,160
if %sinkou=2 lsp 702,":a;chara\imomusi_h2a.bmp",210,160
gosub *syasei2
>Unable to take the pleasure from the sticky silk wrapping around him, Luka comes.\
mov %viclose,1:gosub *lose
mov %2645,%2645+1:if %2645=1 mov %count_koenemy,%count_koenemy+1
if %2645>%count_most mov %count_most,%2645:mov $count_mostname,$name
count 4,3
mov $bad1,"Luka orgasmed as the Caterpillar Girl's sticky silk wrapped around him."
gosub *face2
name "Caterpillar Girl"
>Ahaha, he came on accident! @
>My sticky silk felt too good, I guess! \
name ""
name "Mosquito Girl"
>Aww... So he's her prey...@
>I guess we'll have to settle for the plants.\
name ""
dwave 1,"se\escape.ogg"
cspl 690,699
if %sinkou=1 cspl 700,703:print 10,500
if %sinkou=2 cspl 700,701:print 10,500
name ""
>Only the Caterpillar Girl remains here.\
name "Caterpillar Girl"
>Hehe... I'll wrap you more and more. \
name ""
goto *insects_hc



*insects_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
if %sinkou=1 lsp 694,":a;chara\mosquito_bk04.bmp",450,50
if %sinkou=2 lsp 694,":a;chara\mosquito_bk04.bmp",380,50
gosub *syasei2
>Squeezed tightly by her strong handjob, Luka comes, covering her hand with semen.\
mov %viclose,1:gosub *lose
mov %2644,%2644+1:if %2644=1 mov %count_koenemy,%count_koenemy+1
if %2644>%count_most mov %count_most,%2644:mov $count_mostname,$name
count 5,7
mov $bad1,"Luka was forced to come by the Mosquito Girl's handjob."
gosub *face2
name "Mosquito Girl"
>Ahaha, I made him come.\
name ""
goto *insects_hb



*insects_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
if %sinkou=1 lsp 693,":a;chara\mosquito_bk03.bmp",450,50
if %sinkou=2 lsp 693,":a;chara\mosquito_bk03.bmp",380,50
gosub *syasei2
>Unable to take her soft chest any longer, Luka comes, covering it with semen.\
mov %viclose,1:gosub *lose
mov %2644,%2644+1:if %2644=1 mov %count_koenemy,%count_koenemy+1
if %2644>%count_most mov %count_most,%2644:mov $count_mostname,$name
count 7,7
mov $bad1,"Luka was forced to come by the Mosquito Girl's tit fuck."
gosub *face2
name "Mosquito Girl"
>Ahaha, I made him come.\
name ""
goto *insects_hb



*insects_h7

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
if %sinkou=1 lsp 691,":a;chara\mosquito_bk01b.bmp",450,50
if %sinkou=1 lsp 692,":a;chara\imomusi_bk01.bmp",210,160
if %sinkou=2 lsp 691,":a;chara\mosquito_bk01b.bmp",380,50
if %sinkou=2 lsp 692,":a;chara\imomusi_bk01.bmp",0,160
gosub *syasei2
>Unable to take their double blowjob any longer, Luka comes, covering their faces with semen.\
mov %viclose,1:gosub *lose
mov %2644,%2644+1:if %2644=1 mov %count_koenemy,%count_koenemy+1
if %2644>%count_most mov %count_most,%2644:mov $count_mostname,$name
count 4,7
mov $bad1,"Luka was forced to come by the Mosquito and Caterpillar Girl's double blowjob."
gosub *face2
name "Mosquito Girl"
>Ahaha, we made him come.\
name ""
name "Caterpillar Girl"
>Haha, so much semen! \
name ""
goto *insects_hb



*insects_h8

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
if %sinkou=1 lsp 692,":a;chara\mosquito_bk01b.bmp",450,50
if %sinkou=2 lsp 692,":a;chara\mosquito_bk01b.bmp",380,50
gosub *syasei2
>Unable to take her powerful sucking any longer, Luka comes, filling the Mosquito Girl's mouth with semen.\
mov %viclose,1:gosub *lose
mov %2644,%2644+1:if %2644=1 mov %count_koenemy,%count_koenemy+1
if %2644>%count_most mov %count_most,%2644:mov $count_mostname,$name
count 4,7
mov $bad1,"Luka was forced to orgasm by the Mosquito Girl's powerful sucking."
gosub *face2
name "Mosquito Girl"
>Ahaha, I sucked out your semen.\
name ""
goto *insects_hb



*insects_ha

mov $bad2,"After being raped for a long time, Luka is kept as the three insect girls' sex slave."
if %2576=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahhh...\
name ""
>Exhausted after my orgasm, I collapse to the ground.@
>The Moth Girl slowly comes up next to me with a smile on her face.\
name "Moth Girl"
>Then... This human is my prey.@
>I was the one who made him come...\
name ""
name "Mosquito Girl"
>Yours was the last to hit him...@
>Hurry up and finish with him.\
name ""
name "Caterpillar Girl"
>See you later.@> We'll deal with the plant girls. \
name ""
dwave 1,"se\escape.ogg"
cspl 690,699:cspl 702,705
lsp 700,":a;chara\moss_st02.bmp",230,50:print 10,500
>Saying that, the two of them vanish.@
>All that remain is the Moth Girl and I...\
name "Moth Girl"
>As you can see, we're quite busy...@
>So I'll hurry up and finish you off.\
name ""
>A hole opens up in the Moth Girl's abdomen.@
>Tiny little hairs of flesh line the wall...@>But more visible is the strange shape of the organ inside.\
name "Moth Girl"
>I'll rape you with this...@
>Aren't you happy? You'll get to be forced inside me...\
name ""
name "Luka"
>I...I don't want that...\
name ""
>I shiver in horror before the disgusting organ in front of me.@
>Just the thought of being inside that wriggling mass of pink causes fear to wash through me.\
name "Moth Girl"
>Hehehe... It may not look great, but it feels amazing.@
>An insect's genitalia is far better than anything a human could ever hope to have...\
name ""
name "Luka"
>Ah... Ahhh!\
name ""
mov %hseanwave,21:hseanwave
cspl 690,699
lsp 690,":a;chara\moss_ct01.bmp",440,0
lsp 700,":a;chara\moss_h1.bmp",0,0:print 10,500
>Her inhuman pussy hovers over my erect penis.@
>The heat from her pussy washes over my member, as the wriggling hairs rub and massage me as she forces me all the way into her.\
name "Luka"
>What... Is this...?@
>Ahhhhh...\
name ""
>Her hole tightens around me, as the hairs start to tickle and rub my trapped penis.\
>The hairs massage my penis all over, gently rubbing and tickling every inch of my member inside her.\
name "Moth Girl"
>Hehehe...\
name ""
name "Luka"
>Ahhh... Th...This feels good...\
name ""
>Despite it being an inhuman pussy, my initial disgust quickly vanishes as the overwhelming pleasure from it attacks me.\
>The ecstasy obtained after only a few seconds of insertion causes me to writhe under her.\
name "Luka"
>Ah!@>Ahhhh!!\
name ""
name "Moth Girl"
>Hehe, see?@> An insects pussy is amazing, isn't it?@
>Don't hold back, just go ahead and come...\
name ""
name "Luka"
>I can't... Do that...!\
name ""
>Even though I'm almost drowning in the pleasure, I hold back the orgasm with everything I can.@
>Against my best efforts, the hairs inside of her continue to massage and rub me toward an orgasm.\
>She starts to tighten her hole even more, as if encouraging me to come inside her.@
>At this rate, I'm going to come right into her reproductive organ...\
name "Luka"
>No... I'm going to come...\
name ""
name "Moth Girl"
>Hehe, it's fine...@
>Just pump your seed into this hole...\
name ""
>As if trying to milk out my ejaculation, the hairs start to squeeze me in a rhythmic pattern.@
>Some of them even start to creep about the tip of my penis, gently rubbing and poking my most sensitive part.\
>Unable to take it any longer, I yield to her inhuman pussy.\
name "Luka"
>Ah!@>Ahhh!!\
name ""
gosub *syasei1
lsp 690,":a;chara\moss_ct02.bmp",440,0
lsp 700,":a;chara\moss_h2.bmp",0,0
gosub *syasei2
>I explode inside her reproductive organ, filling it with semen.@
>As I orgasm, her hairs continue their rhythmic motions, giving an intensely pleasurable feeling of release.\
mov %hseanwave,0:hseanwave
lsp 690,":a;chara\moss_ct03.bmp",440,0:print 10,500
name "Moth Girl"
>Hehehe... You filled my egg sac with plenty of semen.@
>With this much semen, I'm sure to get pregnant.\
name ""
>The Moth Girl looks down at me, giggling with a triumphant smile on her face.@
>I'm still too stunned at breaking the taboo to have a response.\
>Forced to mate with a monster...@
>Even worse, I'm sure I just got her pregnant... There's no way I can face Ilias now...\
name "Moth Girl"
>Hehe, I'll give birth to a healthy child...@
>So you will live in this village, too.\
>Right now we're at war...@
>But once this child grows up, she'll be a member of the victorious insect race!\
name ""
name "Luka"
>Ahhh...\
name ""
>Unable to go against her, I'm forced to live in the village.\
gosub *anten
>Thus, I became a prisoner of the Plansect Village's insect race, and am even forced to wield my sword for them.\
>After peace was returned with the insect tribe's victory, I was made into a communal sex slave for the whole race.\
>Locked up in the village, I live out the rest of my life endlessly mating with the entire race...\
>.........
goto *badend



*insects_hb

mov $tatie2,"mosquito_st02"
mov %zmonster_x,-100
mov %monster_y,50
mov $bad2,"After being raped for a long time, Luka is kept as the three insect girls' sex slave."
if %2644=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahhh...\
name ""
>Exhausted after the orgasm, I collapse to the ground.@
>The Mosquito Girl walks up to me, with a grin on her face.\
name "Mosquito Girl"
>Hehe, my attack was the one to finish him off.@
>So I get to suck his semen now...\
name ""
name "Caterpillar Girl"
>Alright then, I'll go play with the plant girls. \
name ""
dwave 1,"se\escape.ogg"
cspl 690,699:cspl 701,705
lsp 700,":a;chara\mosquito_st02.bmp",180,50:print 10,500
>Saying that, she vanishes, leaving the Mosquito Girl and I alone.\
name "Mosquito Girl"
>I don't have much time, so I'll have to suck out everything at once...\
name ""
>The Mosquito Girl shows off a strange organ on her abdomen.@
>Inside the narrow hole, small little protrusions line the pink walls.\
name "Mosquito Girl"
>I'll suck up everything with this mouth...@
>Everything will be taken all at once, so get ready...\
name ""
>The tiny hole contracts and expands as she slowly approaches...\
name "Luka"
>Ahh...\
name ""
>If my thing was sucked into there, how tight will it feel...?@
>Can I stop myself from an ejaculation...?@>No... That isn't possible...\
name "Mosquito Girl"
>Haha, you're really getting excited, aren't you?@
>As I'm sure you're imagining, my tight mouth feels amazing! \
name ""
name "Luka"
>Ah... Ahhh...\
name ""
>The tiny mouth expands as it hovers over my penis.@
>As if it's waiting for its meal, she forces it down onto me.\
mov %hseanwave,21:hseanwave
cspl 690,699
lsp 700,":a;chara\mosquito_h1.bmp",0,0
lsp 690,":a;chara\mosquito_ct01.bmp",440,0:print 10,500
>At last, my penis is swallowed inside the Mosquito Girl's tight mouth!\
name "Luka"
>Ahhh...!\
name ""
>I writhe helplessly around as her soft walls instantly tighten around me, locking me in place inside her.\
name "Mosquito Girl"
>Now, to suck it all out. \
name ""
name "Luka"
>Eh?@>Ahhh!!\
name ""
>She suddenly tightens, and I feel all of the air that was inside of her instantly vanish.\
>Her soft walls almost glue to my penis as she creates a vacuum inside her warm mouth, violently sucking on my penis.\
>Small bits of air are slowly let inside the mouth, to make a continual powerful sucking motion instead of just a sealed vacuum.\
name "Luka"
>Ahhhh!@
>I...Incredible... Sucking it so hard...!\
name ""
>Unable to endure the feeling of her soft walls stuck to my penis during her intense sucking, I give in to the orgasm.\
gosub *syasei1
lsp 700,":a;chara\mosquito_h2.bmp",0,0
lsp 690,":a;chara\mosquito_ct02.bmp",440,0
gosub *syasei2
>I explode inside of her, filling her mouth with semen.@
>As the sweet feeling of release fills me, I let my body relax.\
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
name "Luka"
>Ahh... Wh...What is this...?\
name ""
>But this isn't the time to be immersed in ecstasy...@
>For some reason, my ejaculation doesn't stop!\
>Inside her narrow mouth, she continues to suck out more and more semen.\
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
name "Luka"
>Ahh... I...It isn't stopping!\
name ""
name "Mosquito Girl"
>I'll keep sucking until there isn't a single drop left.@
>Your penis will be swallowed by the ultimate pleasure, so get ready. \
name ""
name "Luka"
>Ah... Ahhhh!!\
name ""
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
lsp 700,":a;chara\mosquito_h3.bmp",0,0
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
>As soon as my penis twitches, she sucks out the semen inside my penis faster than my muscles can even shoot it out.\
>The pleasure exploding through me with each spasm of ejaculation makes me feel like a piece of my soul itself is being sucked out.\
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
name "Luka"
>Ahh... Ahhh...\
name ""
>My vision flickers as I go limp, helpless to the powerful sucking.\
>But even then, the Mosquito Girl continues to violently suck out my semen.\
name "Mosquito Girl"
>I won't let you die... I'll stop right before you would.@
>You'll probably be unable to walk for about a week...\
name ""
name "Luka"
>Ahh...\
name ""
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
lsp 700,":a;chara\mosquito_h4.bmp",0,0
lsp 690,":a;chara\mosquito_ct03.bmp",440,0
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
>Wrapped in the tremendous pleasure from the suction, I lay on the ground twitching as each shot of semen is quickly sucked into her mouth.\
>More and more power drains from my body, as it becomes too difficult to even keep my eyes open.\
name "Luka"
>...Ah...Aa....\
name ""
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
>While still being sucked, I lose consciousness.\
mov %hseanwave,0:hseanwave
name "Mosquito Girl"
>Ahaha, already fainted?@
>Thanks for the meal. \
name ""
>Sucked dry and too exhausted to move, I was left alone there.\
gosub *anten
>After a while, the insect girls came back and took me to their home.@
>Imprisoned, I'm now their sex slave.\
>My adventure ends here.@>All I can look forward to now is the next time I'm raped...\
>............\
goto *badend



*insects_hc

mov $bad2,"Wrapped in the Caterpillar Girl's cocoon, Luka is used as nourishment while she grows into adulthood."
mov $tatie2,"imomusi_st02"
mov %zmonster_x,-50
mov %monster_y,160
if %2645=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,21:hseanwave:cspl 690,699:cspl 701,705:lsp 700,":a;chara\imomusi_h1.bmp",210,160:print 10,500:goto *insects_hd
name "Luka"
>Ahh...\
name ""
>Exhausted after my ejaculation, I fall to the ground.\
name "Caterpillar Girl"
>Ehehe, then this man belongs to me. \
name ""
dwave 1,"se\ero_ito.ogg"
>The Caterpillar Girl starts to spray sticky silk all over me.@
>As the strange magical silk covers my body, a strange feeling of pleasure comes over me wherever it touches.\
name "Luka"
>Ahh...\
name ""
mov %hseanwave,21:hseanwave
cspl 690,699:cspl 701,705
lsp 700,":a;chara\imomusi_h1.bmp",210,160:print 10,500
>As the sticky silk wraps around my body even more, the ecstasy floods my body.@
>The feeling quickly makes my penis become erect again after my orgasm.\
name "Caterpillar Girl"
>Ohohoh...?@
>Your penis already got big again. \
name ""
>The Caterpillar Girl laughs as she stares at my penis.@
>Suddenly, she starts to cover my penis with her sticky silk!\
name "Caterpillar Girl"
>I'll wrap up your penis, too! \
name ""
name "Luka"
>Ahhhh!!\
name ""
goto *insects_hd



*insects_hd

dwave 1,"se\ero_ito.ogg"
>The sticky silk wraps around my penis, slowly tightening around me as the strange pleasure it forces into whatever it touches attacks me.\
name "Caterpillar Girl"
>Hehe... Round and round your penis it goes... \
>If I do this, then everything you let out can be used as nutrients for me. \
name ""
name "Luka"
>Ah....\
name ""
>The girl continues to wrap up my penis with her sticky silk.@
>I try to struggle against the silk binding me, but it's too tough to break.\
>Unable to resist, I just lay here wrapped up, unable to do anything against the bizarre pleasure.\
name "Caterpillar Girl"
>Hehehe... Does it feel good?\
name ""
>With my penis now completely wrapped in silk, it starts to tighten around me.@
>Surprised at the suddenly powerful stimulation, I feel myself instantly yielding to her.\
name "Luka"
>Ahhh... No...!@
>I'm going to come!\
name ""
name "Caterpillar Girl"
>Ohohoh? Already going to pee?\
name ""
gosub *syasei1
lsp 700,":a;chara\imomusi_h2.bmp",210,160
gosub *syasei2
>Unable to take it any longer, I come, covering the sticky silk in semen.@
>The bizarre pleasure given to me just from touching the silk doesn't stop even during my ejaculation.\
>Despite the humiliation from this pathetic display, I shiver in pleasure from the stimulation.\
name "Caterpillar Girl"
>You came, you came! @
>That was sooo fast! Ahahaha! \
name ""
>The Caterpillar Girl looks down at me, still bound in her silk.@
>At the same time, she continues to tighten the silk around my penis.\
name "Caterpillar Girl"
>You're so bad...@
>I'll have to wrap more around you to punish you. \
name ""
name "Luka"
>Ahhh...\
name ""
>The Caterpillar Girl shoots out even more silk, and rolls up my body.\
cspl 690,699
lsp 700,":a;chara\imomusi_h3.bmp",210,160:print 10,500
>In only a few moments, my entire body is wrapped in the silk.\
name "Caterpillar Girl"
>Hehe, I wrapped it all around you! @
>Now, have as many accidents as you want... \
name ""
name "Luka"
>Ah... Ahhh...\
name ""
>The sticky silk tightens around my body.@
>The strange sense of pleasure brought on by contact with it starts to seep into my body.\
>Since she covered me with even more silk, the amount wrapped around my penis increased too...@
>I've been completely captured by this girl... There's absolutely nothing I can do to escape...\
name "Caterpillar Girl"
>Hehe, I'm going to play with your penis now. \
name ""
>She pulls on the silk wrapped around my penis, causing it to narrow and move around me.\
>As she pulls and pushes the sticky silk cocoon around my penis, I pathetically squirm around as the new direct stimulation is forced into me.\
name "Caterpillar Girl"
>Hehe, come on, come on! White pee again! \
name ""
>The sticky silk tightens around me as she pulls and pushes even harder, finally forcing me to another orgasm.\
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\imomusi_h4.bmp",210,160
gosub *syasei2
>Completely at her mercy, I come again, covering the silk in semen.@
>The sticky silk slowly starts to absorb the semen, sending the nutrients right into her body.\
name "Caterpillar Girl"
>I'm going to suck more and more of your nutrients out... @
>From morning till night, day after day...\
name ""
name "Luka"
>Ah... Ahhh...\
name ""
>Stuck in her cocoon, I'm used as the sole source of the Caterpillar Girl's nutrients...\
gosub *anten
mov %hseanwave,0:hseanwave
>Caught by the Caterpillar Girl, I'm never allowed out of her cocoon.@> Endlessly filled with pleasure, I'm forced to feed her nutrients to the brink of death every day.\
mov %hseanwave,21:hseanwave
lsp 700,":a;chara\imomusi_h4.bmp",210,160
bg "bg\bg093.bmp",10,3000
name "Caterpillar Girl"
>Thanks to your nutrients, I'll be able to grow into an adult soon...@
>Once I'm bigger, I'll be able to suck even more out of you. \
name ""
name "Luka"
>Ah...aa...\
name ""
>I can never escape from her...@
>Abandoning all hope, I'm nothing but simple prey now...\
mov %hseanwave,0:hseanwave
>..................\
goto *badend



*mukade_start

mov $name,"Centipede Girl"
mov $name2,"Centipede Girl"
mov $lavel,"mukade"
mov $tatie1,"mukade_st01"
mov $tatie2,"mukade_st02"
mov $tatie3,"mukade_st03"
mov $tatie4,"mukade_h1"
mov $haikei,"bg094"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,1800
if %nanido=2 mov %max_enemylife,2000
if %nanido=3 mov %max_enemylife,2200
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,70
mov %kaihi,95
mov %earth_keigen,40
if %nanido=3 mov %earth_keigen,20
mov %music,1
mov %tikei,2
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But bound like this, Luka can't move!"
mov $mogaku_sel1,"Don't struggle... Just finish..."
mov $mogaku_sel2,"Once a centipede catches you, you can't escape any longer..."
mov $mogaku_sel3,"Pitiful prey..."
mov $mogaku_sel4,"No matter how much you struggle, you can't escape..."
mov $mogaku_sel5,"Don't you just look pathetic like that..."
mov $mogaku_dassyutu1,"You ran away..."
mov $mogaku_dassyutu2,"That's just wasted effort..."
mov $mogaku_earth_dassyutu1,"What's that power...?"
mov $mogaku_earth_dassyutu2,""
mov $half_s1,"How does it feel to be trampled by a centipede?"
mov $half_s2,"It feels the best, doesn't it?"
mov $kiki_s1,"Now, finish..."
mov $kiki_s2,"Spray your semen all over my legs..."
mov %end_n,6
mov %exp_minus,5000
mov %zmonster_x,-300
mov %tukix,320
mov %owaza_count1a,4
name $name
>It can't be...@> A human soldier?@
>I can't believe it...@>The report was right, a human really did join the plant side...\
name ""
name "Luka"
>Sorry, but I'm going to have to take down Queen Bee!@
>I have to end this pointless war as fast as possible!\
name ""
name $name
>Ah, I see.@> You're quite good at flapping that mouth of yours.@
>But I wonder if it can continue to spout that drivel when it's moaning in ecstasy?\
name ""
>I pull out my sword, and take a fighting stance.\
>Priestess said that the insect race was strong...@
>And with this girl right before my eyes, I can see that she's right!\
goto *common_main



*mukade_v

gosub *face3
name $name
>S...Strong...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Centipede Girl turns into a normal centipede!\
mov %viclose,1:gosub *victory
mov %getexp,5000:gosub *lvup
mov %2277,1
goto *sean0183



*mukade_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>So you gave up, and want to be a centipede's prey...?@
>Then I'll give you just what you want.\
name ""
goto *mukade_a



*mukade_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *mukade_kousan
if %cmd1=16 goto *mukade_onedari
if %cmd1=17 goto *common_skill
goto *mukade_main



*mukade_a

if %kousoku=1 gosub *mukade_a4:goto *common_main
rnd2 %ransu,1,3
if %ransu=1 gosub *mukade_a1:goto *common_main
if %ransu=2 gosub *mukade_a2:goto *common_main
if %ransu=3 && %owaza_count1a>5 gosub *mukade_a3:goto *common_main
skip -4



*mukade_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck on it..."
if %ransu=2 mov $sel1,"My mouth feels good, doesn't it...?"
if %ransu=3 mov $sel1,"Just come in my mouth..."
name $name
eng $sel1:$sel6\
name ""
skillname "Sweet Mouth"
dwave 1,"se\ero_buchu2.ogg"
>The Centipede Girl sucks Luka's penis into her mouth, and licks it with her tongue!
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3323
if %nanido<2 damage 60,65
if %nanido=2 damage 70,75
if %nanido=3 damage 80,85
skillname ""
if %mylife=0 sub %stack,1:return *mukade_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*mukade_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"This is your first time feeling this kind of pleasure, isn't it?"
if %ransu=2 mov $sel1,"Don't be scared... It feels amazing."
if %ransu=3 mov $sel1,"Hehehe..."
name $name
eng $sel1:$sel6\
name ""
skillname "Centipede Attack"
dwave 1,"se\umaru.ogg"
eng "Both arms of the Centipede Girl wrap around Luka's penis!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>Her many feet squirm and wriggle around Luka's penis!
skillcount2 3324
if %nanido<2 damage 65,75
if %nanido=2 damage 75,85
if %nanido=3 damage 85,95
skillname ""
if %mylife=0 sub %stack,1:return *mukade_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*mukade_a3

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 8
name $name
if %first_sel1=1 skip 4
>It's time to finish you off...@
>My one hundred feet will pound the pleasure into you!\
skip 2
>This time you won't escape...\
name ""
skillname "Centipede Winding"
dwave 1,"se\ero_makituki3.ogg"
>Both of the Centipede Girl's arms extend, and wrap around Luka's body!
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
if %nanido<2 damage 70,80
if %nanido=2 damage 80,90
if %nanido=3 damage 90,100
mov %kousoku,1:gosub *status_print
>Luka's body is being restrained by the Centipede Girl!\
skillname ""
if %mylife=0 sub %stack,1:return *mukade_h3
if %kousan=2 sub %stack,1:return
gosub *face2
name $name
>It's time to tease you...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,3
if %earth=0 && %nanido=2 mov %genmogaku,3
if %earth=0 && %nanido=3 mov %genmogaku,4
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
sub %stack,1
return



*mukade_a4

add %stack,1
>Luka's body is being restrained by the Centipede Girl...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"This tickling feels good, doesn't it...?":mov $sel2,"Countless feet wriggle and step all over Luka's body!"
if %ransu=2 mov $sel1,"Are you feeling it?":mov $sel2,"The Centipede Girl's wriggling feet focus on Luka's penis!"
if %ransu=3 mov $sel1,"Isn't it great to be my prey?":mov $sel2,"The Centipede Girl's countless feet stroke Luka's penis!"
if %ransu=4 mov $sel1,"I won't leave your penis alone...":mov $sel2,"One of the Centipede Girl's arms wraps around Luka's penis, as the legs step on it!"
if %ransu=5 mov $sel1,"I'll trample every inch of your body...":mov $sel2,"The Centipede Girl's legs run all over Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Centipede Trample"
dwave 1,"se\umaru.ogg"
lsp 690,":a;chara\mukade_ct01.bmp",0,0:print 10,500
eng $sel2:$sel6
skillcount2 3325
if %nanido<2 damage 70,85
if %nanido=2 damage 80,95
if %nanido=3 damage 90,105
skillname ""
if %mylife=0 sub %stack,1:return *mukade_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*mukade_onedari

mov $list1,"Sweet Mouth"
if %3323>0 mov %list_num1,1
mov $list2,"Centipede Attack"
if %3324>0 mov %list_num2,1
mov $list3,"Centipede Trample"
if %3325>0 mov %list_num3,1
gosub *cmd_onedari
if %cmd1=11 goto *mukade_onedari1
if %cmd1=12 goto *mukade_onedari2
if %cmd1=13 goto *mukade_onedari3
if %cmd1=-1 goto *mukade_main
goto *mukade_onedari



*mukade_onedari1

gosub *onedari_syori
name $name
>You want to be defeated by my mouth...?\
name ""
gosub *mukade_a1
skip -1



*mukade_onedari2

gosub *onedari_syori
name $name
>You want to be defeated by my arms...?\
name ""
gosub *mukade_a2
skip -1



*mukade_onedari3

gosub *onedari_syori_k
name $name
>You want to be dominated by my feet...?\
name ""
if %kousoku=0 gosub *mukade_a3
gosub *mukade_a4
skip -1



*mukade_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\mukade_bk01.bmp",0,0
gosub *syasei2
>Unable to take her skilled blowjob any longer, Luka comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2577,%2577+1:if %2577=1 mov %count_koenemy,%count_koenemy+1
if %2577>%count_most mov %count_most,%2577:mov $count_mostname,$name
count 4,1
mov $bad1,"Luka gave in to the Centipede Girl's blowjob."
gosub *face2
name $name
>Nnn...@> So much delicious semen, fed right to my mouth...@
>What a pathetic man...\
name ""
goto *mukade_h



*mukade_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\mukade_bk03.bmp",0,0
gosub *syasei2
>Unable to endure the strange pleasure from her arms, Luka comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2577,%2577+1:if %2577=1 mov %count_koenemy,%count_koenemy+1
if %2577>%count_most mov %count_most,%2577:mov $count_mostname,$name
count 5,1
mov $bad1,"Luka gave in to the Centipede Girl's centipede attack."
gosub *face2
name $name
>So much semen, right on my arms...@
>What a pathetic man...\
name ""
goto *mukade_h



*mukade_h3

mov %ikigoe,3:gosub *ikigoe
name $name
>...Already?\
name ""
gosub *syasei1
lsp 700,":a;chara\mukade_h2.bmp",0,0
gosub *syasei2
>As her wriggling feet touch his body, Luka accidentally orgasms, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2577,%2577+1:if %2577=1 mov %count_koenemy,%count_koenemy+1
if %2577>%count_most mov %count_most,%2577:mov $count_mostname,$name
count 16,1
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"As soon as he was bound by the Centipede Girl, Luka accidentally orgasms."
gosub *face2
name $name
>Just being bound made you come...?@
>What a pathetic man...\
name ""
goto *mukade_h



*mukade_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\mukade_ct02.bmp",0,0
lsp 700,":a;chara\mukade_h2.bmp",0,0
gosub *syasei2
>As the Centipede Girl's feet trample all over Luka's body, he finally comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2577,%2577+1:if %2577=1 mov %count_koenemy,%count_koenemy+1
if %2577>%count_most mov %count_most,%2577:mov $count_mostname,$name
count 28,1
mov $bad1,"Luka gave in to the Centipede Girl's countless legs."
gosub *face2
name $name
>Hehe... Did it feel good...?@
>A footjob only a centipede can give is the best, isn't it?\
name ""
csp 690:print 10,500
goto *mukade_h



*mukade_h

mov $bad2,"After being raped by the Centipede Girl, Luka was forced to become her mating partner."
if %2577=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahhh...\
name ""
if %kousoku>0 lsp 700,":a;chara\mukade_h3.bmp",0,0:print 10,500:goto *mukade_ha
>Weak after ejaculation, I fall to my knee.@
dwave 1,"se\ero_makituki3.ogg"
cspl 690,699
lsp 700,":a;chara\mukade_h3.bmp",0,0:print 10,500
>Before I can do anything else, the Centipede Girl binds me in her arms.\
goto *mukade_ha



*mukade_ha

name $name
>Now then, it's time to mate...@
>I'll rape you, and force you to fill me with your seed...\
name ""
>A small hole of pink flesh between her two thick insect shells opens up.\
>I shiver in the tight restraint of the Centipede Girl at the thought of being raped by that.\
name "Luka"
>S...Stop!\
name ""
name $name
>My vagina is quite unique...@
>It feels incredible, too.\
name ""
>Still bound in her arms, she starts to slowly pull me closer to her body.\
>She pulls me until the tip of my penis is right next to that pink hole.@
>As soon as it's lined up, she forces me all the way inside!\
name "Luka"
>Ahhhh!@
>Wh...What is this!?\
name ""
mov %hseanwave,21:hseanwave
lsp 690,":a;chara\mukade_ct03.bmp",0,0:print 10,500
>Inside of her hole, it feels like tiny legs are crawling and stepping on my penis.@
>The soft little legs step and crawl all over me, as if each one was a separate tiny insect inside her.\
name "Luka"
>Auuu...@
>This is... Disgusting...\
name ""
name $name
>You're only thinking that at first...@
>Wait until you feel what I can do...\
name ""
name "Luka"
>Ahhh...\
name ""
>The tiny legs start to step into my penis with more force.@
>Every inch of my penis is rubbed, stepped on, and massaged by a soft leg.\
name $name
>You'll never get to feel something like this anywhere else...@
>My pussy evolved to make sure to extract all of a male's semen...\
>Enjoy it as much as you want...@>All I want in return is your semen...\
name ""
name "Luka"
>Ahhh!\
name ""
>From the root to the tip of my penis, the soft little legs gently tickle my penis.@
>It's as if dozens of little bugs are all inside her, carefully playing with my penis...\
>I feel an orgasm starting to rise in my body, but I bite it down.@
>At this rate, I really will come inside this disgusting hole...\
name "Luka"
>Ahh... No...\
name ""
>I try to pull out of her, but I'm too tightly bound close to her to escape.@
>I have no choice but to be stuck in her and come...\
name $name
>Why are you struggling...?@
>Hehe, it's pointless.\
name ""
name "Luka"
>Ah...Ahhh...\
name ""
>Unable to escape, the desire to ejaculate just continues to grow.@
>At last, it became too much to suppress.\
>Encouraged by the legs inside of her, I relax my body, giving myself over to the orgasm.\
gosub *syasei1
lsp 700,":a;chara\mukade_h4.bmp",0,0
lsp 690,":a;chara\mukade_ct04.bmp",0,0
gosub *syasei2
name "Luka"
>Ahh...\
name ""
>The soft legs run all over my penis as I shoot my semen inside her.\
>An overpowering sense of humiliation and defeat fills my body as I helplessly ejaculate in her.\
name $name
>Hehe... How was my pussy?@
>It's something you can never experience with a human partner...\
>More... I'll make you ejaculate more in me...\
name ""
name "Luka"
>Ahh...\
name ""
>The tiny feet start to step on the tip of my penis, still sensitive after my orgasm.@
>At the same time, the soft feet step on the back muscle, pinpointing the most sensitive areas.\
>Everything about her horrible hole seems designed to force a man to come as fast as possible...\
name "Luka"
>Ahhh!@>Haaaa!!\
name ""
>As I writhe around, assaulted by the inescapable pleasure, the Centipede Girl looks on with amusement.\
name $name
>Hehehe... How pitiful.@
>Writhing in such agony as I squeeze out your seed...\
name ""
mov %hseanwave,22:hseanwave
>I can hear the sounds coming from her pussy as the tiny feet rub and move around my penis.@
>Unable to do anything, my head goes white as another orgasm flows through me.\
gosub *syasei1
lsp 700,":a;chara\mukade_h5.bmp",0,0
lsp 690,":a;chara\mukade_ct05.bmp",0,0
gosub *syasei2
name "Luka"
>Ahhh...\
name ""
>Horrified at being forced to come inside of her again, I start to break down.@
>I absorb myself in the pleasure itself, and try to block out everything else.\
name $name
>I really like this penis of yours...@
>Now lets make you come with this stimulus...\
name ""
>Her legs start to quickly tickle and brush against my penis.@
>Overcome by the pleasure, I start to drool.\
>It felt disgusting at first, but now it's like I'm in heaven...\
name "Luka"
>Ahhh...\
name ""
gosub *syasei1
lsp 690,":a;chara\mukade_ct06.bmp",0,0
gosub *syasei2
>Once again, I shoot my semen into her strange hole.@
>Able to fill up her pussy with semen, I'm filled with a male's satisfaction.\
name $name
>Hehe... More... Come more...@
>Until it's completely full of your semen...\
name ""
name "Luka"
>Ahh...\
name ""
gosub *syasei1:gosub *syasei2
gosub *anten
mov %hseanwave,0:hseanwave
>Caught by the Centipede Girl, she made me into a breeding slave.@
>Forced to mate with her, she rapes me dry every day.\
>But I've already given control of my penis to her, happily allowing myself to be violated...\
>Thus, my adventure ends here...\
>............\
goto *badend



*kaiko_start

mov $name,"Silkworm Girl"
mov $name2,"Silkworm Girl"
mov $lavel,"kaiko"
mov $tatie1,"kaiko_st01"
mov $tatie2,"kaiko_st02"
mov $tatie3,"kaiko_st03"
mov $tatie4,"kaiko_h01"
mov $haikei,"bg094"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,2000
if %nanido=2 mov %max_enemylife,2500
if %nanido=3 mov %max_enemylife,3000
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,40
if %nanido=3 mov %earth_keigen,20
mov %music,1
mov %tikei,2
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free of the silk!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"You can't escape from my silk..."
mov $mogaku_sel2,"Just give yourself to the cocoon..."
mov $mogaku_sel3,"Give up and become a cocoon..."
mov $mogaku_sel4,"Once in the cocoon, you won't ever feel pain again..."
mov $mogaku_sel5,"Hehe, pointless... There's no future for you except for in the cocoon."
mov $mogaku_earth_dassyutu1,"Impossible...! Nothing can escape from my silk!"
mov $mogaku_earth_dassyutu2,""
mov $half_s1,"You've gotten quite weak..."
mov $half_s2,"Don't you want to be wrapped up yet...?"
mov $kiki_s1,"It looks like you're at your limit..."
mov $kiki_s2,"You'll be a cocoon soon..."
mov %end_n,6
mov %exp_minus,10000
mov %zmonster_x,-270
mov %tukix,300
mov %owaza_count1a,6
mov %owaza_count2a,6
name $name
>Inside those cocoons are plant monsters...@
>They were poking around here, so I wrapped them up.\
>My cocoons feel amazing, so it's like being in heaven...\
name ""
name "Luka"
>You did all of this...?\
name ""
>The plants that were trying to get into Sectforest were supposed to be the strongest ones...\
>If she did all of this by herself, she must be incredibly powerful!\
gosub *face2
name $name
>I'll wrap you up, too...@
>It will be a taste of heaven, so just give in to it...\
name ""
name "Luka"
>Guh...@> I won't allow that to happen!\
name ""
gosub *face1
goto *common_main



*kaiko_v

gosub *face3
name $name
>Guh...@> What... Is this!?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Silkworm Girl turns into a normal silkworm!\
mov %viclose,1:gosub *victory
mov %getexp,5500:gosub *lvup
mov %2278,1
goto *sean0184



*kaiko_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>So you want to be wrapped in my cocoon...@
>I love honest men...\
name ""
goto *kaiko_a



*kaiko_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *kaiko_kousan
if %cmd1=16 goto *kaiko_onedari
if %cmd1=17 goto *common_skill
goto *kaiko_main



*kaiko_a

if %hanyo1=1 && %kousoku=1 gosub *kaiko_a5:goto *common_main
if %hanyo1=1 && %kousoku=2 gosub *kaiko_a6:goto *common_main
if %hanyo1=1 && %kousoku=3 gosub *kaiko_a7:goto *common_main
if %hanyo1=2 && %kousoku=1 gosub *kaiko_a10:goto *common_main
if %hanyo1=2 && %kousoku=2 gosub *kaiko_a11:goto *common_main
if %hanyo1=2 && %kousoku=3 gosub *kaiko_a12:goto *common_main
rnd2 %ransu,1,5
if %ransu=1 gosub *kaiko_a1:goto *common_main
if %ransu=2 gosub *kaiko_a2:goto *common_main
if %ransu=3 gosub *kaiko_a3:goto *common_main
if %ransu=4 && %owaza_count2a>7 gosub *kaiko_a4:goto *common_main
if %ransu=5 && %owaza_count1a>7 gosub *kaiko_a9:goto *common_main
skip -6



*kaiko_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck on that penis of yours..."
if %ransu=2 mov $sel1,"My mouth is nice and warm, isn't it?"
if %ransu=3 mov $sel1,"Hehe... Delicious..."
name $name
eng $sel1:$sel6\
name ""
skillname "Silky Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>The Silkworm Girl sucks Luka's penis into her mouth!
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3326
if %nanido<2 damage 50,60
if %nanido=2 damage 60,70
if %nanido=3 damage 70,80
skillname ""
if %mylife=0 sub %stack,1:return *kaiko_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kaiko_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Don't you want a taste of these soft breasts?"
if %ransu=2 mov $sel1,"I'll rub you with my breasts..."
if %ransu=3 mov $sel1,"Ejaculate between here..."
name $name
eng $sel1:$sel6\
name ""
skillname "Silky Tit Fuck"
dwave 1,"se\ero_koki1.ogg"
>The Silkworm Girl crushes Luka's penis between her breasts!
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3327
if %nanido<2 damage 55,65
if %nanido=2 damage 65,75
if %nanido=3 damage 75,85
skillname ""
if %mylife=0 sub %stack,1:return *kaiko_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kaiko_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll wrap your penis in my silk..."
if %ransu=2 mov $sel1,"Hehe... Do you want your penis to turn into a cocoon?"
if %ransu=3 mov $sel1,"Here... This will feel amazing."
name $name
eng $sel1:$sel6\
name ""
skillname "Silky Pleasure"
dwave 1,"se\ero_ito.ogg"
eng "The Silkworm Girl shoots sticky silk on Luka's penis!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,25
if %wind=1 && %nanido=2 mov %wind_kakuritu,20
if %wind=1 && %nanido=3 mov %wind_kakuritu,12
if %wind=2 && %nanido<2 mov %wind_kakuritu,50
if %wind=2 && %nanido=2 mov %wind_kakuritu,40
if %wind=2 && %nanido=3 mov %wind_kakuritu,25
gosub *wind_guard_kakuritu
if %wind_guard_on=0 && %hanyo4=0 lsp 690,":a;chara\kumo_ct01.bmp",0,0:print 10,500
if %wind_guard_on=0 lsp 690,":a;chara\kumo_ct02.bmp",0,0:print 10,500
if %kousan=2 mov %hanyo4,1
if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes it away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>The strange silk entangles Luka's penis, and fills him with a bizarre pleasure!
skillcount2 3328
if %nanido<2 damage 65,75
if %nanido=2 damage 75,85
if %nanido=3 damage 85,95
skillname ""
if %mylife=0 sub %stack,1:return *kaiko_h3
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kaiko_a4

add %stack,1
mov %owaza_count2a,0
if %kousan=2 skip 7
name $name
if %first_sel1=1 skip 3
>Hehe... You'll be wrapped in heaven in my cocoon.\
skip 2
>This time you'll stay in heaven...\
name ""
skillname "Intoxicating Cocoon"
dwave 1,"se\ero_ito.ogg"
eng "The Silkworm Girl sprays sticky silk all over Luka's body!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,25
if %wind=1 && %nanido=2 mov %wind_kakuritu,20
if %wind=1 && %nanido=3 mov %wind_kakuritu,12
if %wind=2 && %nanido<2 mov %wind_kakuritu,60
if %wind=2 && %nanido=2 mov %wind_kakuritu,50
if %wind=2 && %nanido=3 mov %wind_kakuritu,30
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>Luka's body has been entangled in sticky silk!
skillcount2 3329
if %nanido<2 damage 35,45
if %nanido=2 damage 50,60
if %nanido=3 damage 65,75
mov %hanyo1,1
mov %kousoku,1:gosub *status_print
>Luka's entangled in sticky silk!\
mov %status,1:gosub *status_print
>Luka is immersed in ecstasy!\
skillname ""
if %mylife=0 sub %stack,1:return *kaiko_h4
if %first_sel1=1 skip 5
name "Luka"
>Ahhh...@
>This... Feels good...\
name ""
gosub *face2
name $name
if %first_sel1=1 skip 4
>Hehe... My silk drowns its catch in ecstasy.@
>You'll soon want to be completely wrapped in this silk...\
skip 2
>Now, be still and drown in the pleasure...\
name ""
mov %first_sel1,1
mov %status_turn,2
if %earth=0 && %nanido<2 mov %genmogaku,1
if %earth=0 && %nanido=2 mov %genmogaku,1
if %earth=0 && %nanido=3 mov %genmogaku,1
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
sub %stack,1
return



*kaiko_a5

add %stack,1
name $name
>Here... I'll wrap you even more...\
name ""
skillname "Intoxicating Cocoon"
dwave 1,"se\ero_ito.ogg"
mov %kousoku,2:gosub *status_print
>More silk is wrapped around Luka!
skillcount2 3329
if %nanido<2 damage 45,50
if %nanido=2 damage 60,65
if %nanido=3 damage 75,80
skillname ""
if %mylife=0 sub %stack,1:return *kaiko_h4
if %kousan=2 sub %stack,1:return
name $name
>Hehe, it feels good doesn't it?@
>Just lay there and drown in it...\
name ""
sub %stack,1
return



*kaiko_a6

add %stack,1
name $name
>It's like being in heaven, isn't it?@
>How does it feel to be wrapped in pleasure itself?\
name ""
skillname "Intoxicating Cocoon"
dwave 1,"se\ero_ito.ogg"
mov %kousoku,3:gosub *status_print
>More silk is wrapped around Luka!
skillcount2 3329
if %nanido<2 damage 45,50
if %nanido=2 damage 60,65
if %nanido=3 damage 75,80
skillname ""
if %mylife=0 sub %stack,1:return *kaiko_h4
if %kousan=2 sub %stack,1:return
name $name
>The next will end it...@
>In only a few moments, you'll be in a cocoon of ecstasy for the rest of your life...\
name ""
sub %stack,1
return



*kaiko_a7

add %stack,1
name $name
>Now for the end...@
>You'll be in heaven before you even die...\
name ""
skillname "Intoxicating Cocoon"
dwave 1,"se\ero_ito.ogg"
>More silk is wrapped around Luka!
skillcount2 3329
if %nanido<2 damage 45,50
if %nanido=2 damage 60,65
if %nanido=3 damage 75,80
skillname ""
if %mylife=0 sub %stack,1:return *kaiko_h4
mov $tatie4,"kaiko_h12"
lsp 700,":a;chara\kaiko_h12.bmp",0,0:print 10,500
>Luka's completely wrapped in a cocoon!\
if %status=1 skip 3
mov %status,1:gosub *status_print
>Luka's immersed in ecstasy!\
name "Luka"
>Ahhhhh!\
name ""
>Wrapped in her warm silk, it's like I'm melting in pleasure.@
>Drowning in the ecstasy, I can't do anything anymore...\
name ""
mov %wind,0:mov %earth,0
sub %stack,1
goto *kaiko_a8



*kaiko_a8

add %stack,1
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"It feels like your body is melting, doesn't it?"
if %ransu=2 mov $sel1,"Are you about to leak out already?"
if %ransu=3 mov $sel1,"It's OK to just give in..."
if %ransu=4 mov $sel1,"Drown in the ecstasy..."
if %ransu=5 mov $sel1,"Drown in the ecstasy..."
name $name
eng $sel1:$sel6\
name ""
skillname "Intoxicating Cocoon"
dwave 1,"se\ero_slime1.ogg"
>Wrapped in the cocoon, Luka is immersed in ecstasy...
skillcount2 3329
mov %damage_kotei,1
damage 50,60
skillname ""
if %mylife=0 sub %stack,1:return *kaiko_h5
sub %stack,1
goto *kaiko_a8



*kaiko_a9

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 7
name $name
if %first_sel2=1 skip 3
>I'll make a special cocoon, just for a boy...\
skip 2
>This time, my cocoon will squeeze out your semen...\
name ""
skillname "Semen Sucking Cocoon"
dwave 1,"se\ero_ito.ogg"
eng "The Silkworm Girl sprays silk all over Luka's body!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,25
if %wind=1 && %nanido=2 mov %wind_kakuritu,20
if %wind=1 && %nanido=3 mov %wind_kakuritu,12
if %wind=2 && %nanido<2 mov %wind_kakuritu,60
if %wind=2 && %nanido=2 mov %wind_kakuritu,50
if %wind=2 && %nanido=3 mov %wind_kakuritu,30
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>Luka's body is entangled in sticky silk!
skillcount2 3330
if %nanido<2 damage 45,50
if %nanido=2 damage 60,65
if %nanido=3 damage 75,80
mov %hanyo1,2
mov %kousoku,1:gosub *status_print
>Luka's body is covered with sticky silk!\
skillname ""
if %mylife=0 sub %stack,1:return *kaiko_h6
if %first_sel2=1 skip 6
name "Luka"
>Urhg...!@> Wh...What is this!?\
name ""
>As the silk covers my body, it feels like it's sucking on my entire body.\
>The silk around my penis feels like it's trying to urge me to ejaculate.\
gosub *face2
name $name
if %first_sel2=1 skip 4
>Hehe... To suck semen from a boy, I can use a special silk.@
>Once wrapped in a cocoon made of this, any man will go mad in agonizing pleasure.\
skip 2
>This time I'll make you into a cocoon...\
name ""
mov %first_sel2,1
if %earth=0 && %nanido<2 mov %genmogaku,100
if %earth=0 && %nanido=2 mov %genmogaku,100
if %earth=0 && %nanido=3 mov %genmogaku,100
if %earth>0 && %nanido<2 mov %genmogaku,2
if %earth>0 && %nanido=2 mov %genmogaku,2
if %earth>0 && %nanido=3 mov %genmogaku,2
sub %stack,1
return



*kaiko_a10

add %stack,1
name $name
>Here... I'll wrap you even more.\
name ""
skillname "Semen Sucking Cocoon"
dwave 1,"se\ero_ito.ogg"
mov %kousoku,2:gosub *status_print
>More silk is wrapped around Luka!
skillcount2 3330
if %nanido<2 damage 45,50
if %nanido=2 damage 60,65
if %nanido=3 damage 75,80
skillname ""
if %mylife=0 sub %stack,1:return *kaiko_h6
if %kousan=2 sub %stack,1:return
name $name
>Hehe, it feels good doesn't it?@
>Just lay there and drown in it...\
name ""
sub %stack,1
return



*kaiko_a11

add %stack,1
name $name
>You can't take it, can you?@
>How does it feel to be overwhelmed by my silk?\
name ""
skillname "Semen Sucking Cocoon"
dwave 1,"se\ero_ito.ogg"
mov %kousoku,3:gosub *status_print
>More silk is wrapped around Luka!
skillcount2 3330
if %nanido<2 damage 45,50
if %nanido=2 damage 60,65
if %nanido=3 damage 75,80
skillname ""
if %mylife=0 sub %stack,1:return *kaiko_h6
if %kousan=2 sub %stack,1:return
name $name
>The next will end it...@
>In only a few moments, you'll be in a cocoon of ecstasy for the rest of your life...\
name ""
sub %stack,1
return



*kaiko_a12

add %stack,1
name $name
>This ends it...@
>Let yourself drown in the pleasure!\
name ""
skillname "Semen Sucking Cocoon"
dwave 1,"se\ero_ito.ogg"
>More silk is wrapped around Luka!
skillcount2 3330
if %nanido<2 damage 45,50
if %nanido=2 damage 60,65
if %nanido=3 damage 75,80
skillname ""
if %mylife=0 sub %stack,1:return *kaiko_h6
mov $tatie4,"kaiko_h12"
lsp 700,":a;chara\kaiko_h12.bmp",0,0:print 10,500
>Luka's completely wrapped in a cocoon!\
name "Luka"
>Ahhhh!\
name ""
>Wrapped in her cocoon, pleasure attacks me from every direction.@
>The silk around my penis feels like it's urging me toward an orgasm...\
name ""
mov %wind,0:mov %earth,0
sub %stack,1
goto *kaiko_a13



*kaiko_a13

add %stack,1
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Make sure you come a lot..."
if %ransu=2 mov $sel1,"It feels like the pleasure will make you insane, doesn't it?"
if %ransu=3 mov $sel1,"You get to be squeezed to exhaustion in my cocoon... Aren't you happy?"
if %ransu=4 mov $sel1,"Don't try to endure it... There's no escape from the cocoon."
if %ransu=5 mov $sel1,"You won't escape... You'll be squeezed dry inside the cocoon."
name $name
eng $sel1:$sel6\
name ""
skillname "Semen Sucking Cocoon"
dwave 1,"se\ero_slime1.ogg"
>The cocoon shrinks and expands, making a powerful suction all around Luka's body!
skillcount2 3330
mov %damage_kotei,1
damage 50,70
skillname ""
if %mylife=0 sub %stack,1:return *kaiko_h7
sub %stack,1
goto *kaiko_a13



*kaiko_onedari

mov $list1,"Silky Blowjob"
if %3326>0 mov %list_num1,1
mov $list2,"Silky Tit Fuck"
if %3327>0 mov %list_num2,1
mov $list3,"Silky Pleasure"
if %3328>0 mov %list_num3,1
mov $list4,"Intoxicating Cocoon"
if %3329>0 mov %list_num4,1
mov $list5,"Semen Sucking Cocoon"
if %3330>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *kaiko_onedari1
if %cmd1=12 goto *kaiko_onedari2
if %cmd1=13 goto *kaiko_onedari3
if %cmd1=14 goto *kaiko_onedari4
if %cmd1=15 goto *kaiko_onedari5
if %cmd1=-1 goto *kaiko_main
goto *kaiko_onedari



*kaiko_onedari1

gosub *onedari_syori
name $name
>You want me to suck it out...?\
name ""
gosub *kaiko_a1
skip -1



*kaiko_onedari2

gosub *onedari_syori
name $name
>You want to be crushed in my breasts...?\
name ""
gosub *kaiko_a2
skip -1



*kaiko_onedari3

gosub *onedari_syori
name $name
>You want your penis to be wrapped in silk...?\
name ""
gosub *kaiko_a3
skip -1



*kaiko_onedari4

gosub *onedari_syori_k
name $name
>You want to be wrapped in a cocoon?\
name ""
if %kousoku=0 gosub *kaiko_a4
if %kousoku=1 gosub *kaiko_a5
if %kousoku=2 gosub *kaiko_a6
if %kousoku=3 gosub *kaiko_a7
skip -1



*kaiko_onedari5

gosub *onedari_syori_k
name $name
>You want to be wrapped in my special silk?\
name ""
if %kousoku=0 gosub *kaiko_a9
if %kousoku=1 gosub *kaiko_a10
if %kousoku=2 gosub *kaiko_a11
if %kousoku=3 gosub *kaiko_a12
skip -1



*kaiko_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\kaiko_bk01.bmp",0,0
gosub *syasei2
>Unable to take her skillful blowjob any longer, Luka comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2578,%2578+1:if %2578=1 mov %count_koenemy,%count_koenemy+1
if %2578>%count_most mov %count_most,%2578:mov $count_mostname,$name
count 4,3
mov $bad1,"Luka succumbed to the Silkworm Girl's blowjob."
gosub *face2
name $name
>Nnn... So much in my mouth...@
>Playtime is over... Now for the real thing.\
name ""
goto *kaiko_h



*kaiko_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\kaiko_bk02.bmp",0,0
gosub *syasei2
>Unable to take the soft pressure of her breasts any longer, Luka comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2578,%2578+1:if %2578=1 mov %count_koenemy,%count_koenemy+1
if %2578>%count_most mov %count_most,%2578:mov $count_mostname,$name
count 7,3
mov $bad1,"Luka succumbed to the Silkworm Girl's tit fuck."
gosub *face2
name $name
>You got it all over my breasts...@
>Playtime is over... Now for the real thing.\
name ""
goto *kaiko_h



*kaiko_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\kaiko_bk03.bmp",0,0
lsp 690,":a;chara\kumo_ct03.bmp",0,0
gosub *syasei2
>Entangled in the silk, the strange pleasure forced into him by it forces Luka to orgasm.\
mov %viclose,1:gosub *lose
mov %2578,%2578+1:if %2578=1 mov %count_koenemy,%count_koenemy+1
if %2578>%count_most mov %count_most,%2578:mov $count_mostname,$name
count 20,3
mov $bad1,"Luka succumbed to the Silkworm Girl's silk."
lsp 690,":a;chara\kumo_ct04.bmp",0,0:print 10,500
name $name
>Your penis couldn't even bear being touched by some silk?@
>Playtime is over... Now for the real thing.\
name ""
csp 690:print 10,500
goto *kaiko_h



*kaiko_h4

mov %ikigoe,3:gosub *ikigoe
name $name
>Already...?@>But you aren't a cocoon yet...\
name ""
gosub *syasei1
lsp 700,":a;chara\kaiko_h21.bmp",0,0
gosub *syasei2
>While still being wrapped in silk, Luka comes, spraying semen all over the sticky threads.\
mov %viclose,1:gosub *lose
mov %2578,%2578+1:if %2578=1 mov %count_koenemy,%count_koenemy+1
if %2578>%count_most mov %count_most,%2578:mov $count_mostname,$name
count 20,3
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka came while still being wrapped by the Silkworm Girl."
gosub *face2
name $name
>You leaked out already...@
>I didn't even have to finish the cocoon, either... How pathetic.\
>Come on... Have a little more endurance this time...\
name ""
mov %hanyo2,1
mov %hanyo3,1
goto *kaiko_h



*kaiko_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\kaiko_h22.bmp",0,0
gosub *syasei2
>Immersed in the ecstasy of the cocoon, Luka comes, giving himself over to the feeling of release.\
mov %viclose,1:gosub *lose
mov %2578,%2578+1:if %2578=1 mov %count_koenemy,%count_koenemy+1
if %2578>%count_most mov %count_most,%2578:mov $count_mostname,$name
count 20,3
mov $bad1,"Immersed in ecstasy, Luka came."
gosub *face2
name $name
>Hehe... You came.@
>It was like having a piece of heaven, wasn't it?\
name ""
mov %hanyo2,2
mov %hanyo3,1
goto *kaiko_h



*kaiko_h6

mov %ikigoe,3:gosub *ikigoe
name $name
>Already...?@>But you aren't a cocoon yet...\
name ""
gosub *syasei1
lsp 700,":a;chara\kaiko_h11.bmp",0,0
gosub *syasei2
>While still being wrapped in silk, Luka comes, spraying semen all over the sticky threads.\
mov %viclose,1:gosub *lose
mov %2578,%2578+1:if %2578=1 mov %count_koenemy,%count_koenemy+1
if %2578>%count_most mov %count_most,%2578:mov $count_mostname,$name
count 20,3
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka came while still being wrapped by the Silkworm Girl."
gosub *face2
name $name
>You leaked out already...@
>I didn't even have to finish the cocoon, either... How pathetic.\
>Come on... Have a little more endurance this time...\
name ""
mov %hanyo2,1
goto *kaiko_h



*kaiko_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\kaiko_h13.bmp",0,0
gosub *syasei2
>As the strange silk sucks on his whole body, Luka comes, giving himself over to the feeling of release.\
mov %viclose,1:gosub *lose
mov %2578,%2578+1:if %2578=1 mov %count_koenemy,%count_koenemy+1
if %2578>%count_most mov %count_most,%2578:mov $count_mostname,$name
count 20,3
mov $bad1,"Unable to take the pleasure forced into him by the strange silk, Luka was forced to an orgasm."
gosub *face2
name $name
>Hehe... You came.@
>But it isn't nearly over yet...\
name ""
mov %hanyo2,2
goto *kaiko_h



*kaiko_h

if %hanyo2=0 mov $bad2,"Still inside the cocoon, Luka's semen is squeezed endlessly."
if %hanyo2>0 mov $bad2,"Stuck inside the cocoon, Luka's semen is squeezed endlessly."
if %2578=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %hanyo2=1 mov %hseanwave,21:hseanwave:goto *kaiko_hb
if %hanyo2=2 mov %hseanwave,21:hseanwave:goto *kaiko_hc
name "Luka"
>Ahh...\
name ""
name $name
>You can't fight any longer... Well then...\
name ""
>Too weak to resist after my orgasm, I'm helpless as she sprays silk over me.\
dwave 1,"se\ero_ito.ogg"
>The sticky white threads shoot over me, covering every inch of my body.\
name $name
>Hehe... My silk gives pleasure just be contact.@
>Just having it blown over you is unbearable, isn't it?\
name ""
name "Luka"
>Ah...Ahh...\
name ""
>The Silkworm Girl's soft, sticky silk continues to cover more and more of my body.@
>After only a few seconds, my body is completely covered in it.\
name "Luka"
>What is... This...?\
name ""
name $name
>Hehe... Stuck in a cocoon of pleasure, you'll be trapped in heaven...\
name ""
mov %hseanwave,21:hseanwave
cspl 690,699
lsp 700,":a;chara\kaiko_h01.bmp",0,0:print 10,500
>Everything from my neck down is tightly wrapped in a cocoon made of her soft silk.@
>Even though I should be horrified at being trapped, I'm instead immersed in pleasure.\
name "Luka"
>Haa... Incredible...\
name ""
name $name
>Hehe... Have a little patience.@
>Once the cocoon is finished, you can come as much as you want.\
name ""
name "Luka"
>Ahh...\
name ""
>With my penis already rock hard as she was covering me with her silk, it feels like it's stuck in a tiny hole.\
>Tightly wrapped in her soft thread, the movements just from breathing are giving an almost unbearable pleasure with them.\
>Quickly overpowered by that ecstasy, I already feel myself giving in to the rising orgasm.\
name "Luka"
>Ahh... I'm coming!\
name ""
name $name
>Ah, already? Sheesh...\
name ""
gosub *syasei1
lsp 700,":a;chara\kaiko_h11.bmp",0,0
gosub *syasei2
name "Luka"
>Ahh... I came...\
name ""
>Unable to take it any longer, I come, shooting my semen into the silk cocoon.@
>With it wrapped so tightly around me, it almost feels more like I just peed in my pants...\
>Looking down, I start to feel humiliated as I see the white stain slowly spreading.\
name $name
>What a helpless little boy... Having an accident before I even finish.@
>Sheesh... Have a little patience.\
name ""
goto *kaiko_hb



*kaiko_hb

>The Silkworm Girl sprays more silk over me, covering me with even more sticky silk.\
lsp 700,":a;chara\kaiko_h12.bmp",0,0:print 10,500
>While immersed in ecstasy, I look on in joy and pleasure as the silk finally completely covers my head.\
name "Luka"
>Ahhh...\
name ""
>Able to breathe, I can't feel anything but the pleasure any longer.@
>With every part of my body being touched by the silk, every part of my body is having pure pleasure forced into it.\
>It's like I'm really stuck in a white paradise...@
>I want to stay in here forever...\
goto *kaiko_hc



*kaiko_hc

name "Luka"
>Ahh... Amazing...\
name ""
name $name
>Hehe... So you like my cocoon?@
>But it's a cocoon that sucks its prey dry of semen you know?\
>Stuck inside there, your semen will be sucked for your whole life you know?\
name ""
name "Luka"
>Eh...?@> Ahhh!\
name ""
mov %hseanwave,22:hseanwave
>Suddenly, the cocoon itself starts to swell back and forth, like a wave motion.@
>Moving in rhythmic waves, it tightens and expands around my body.\
>It almost feels like I'm stuck in a giant mouth, sucking on my body like it was a piece of candy.\
name "Luka"
>Ahhh!@
>Th...The cocoon is moving!?\
name ""
>I writhe side to side, but there's nothing around me but the white silk.@
>Unable to do anything tightly wrapped in her cocoon, I moan in pleasure as it continues to suck on my body.\
name $name
>Hehe, it started...@
>That's how the cocoon will suck out your semen.\
>Once it starts, you aren't able to die any longer.@
>The magic silk keeps you alive and weak as it endlessly sucks the semen from you.\
name ""
name "Luka"
>Ahhh!\
name ""
>I moan in ecstasy inside the cocoon.\
>Every writhing movement I make is countered by the silk, taking advantage of the small room I give it to tighten even closer around my body.\
name "Luka"
>Ahhh!@>I'm coming!\
name ""
gosub *syasei1
if %hanyo3=0 lsp 700,":a;chara\kaiko_h13.bmp",0,0
if %hanyo3=1 lsp 700,":a;chara\kaiko_h23.bmp",0,0
gosub *syasei2
>I ejaculate inside of the cocoon, spraying my semen out inside.@
>The silk itself starts to slowly absorb the semen, as the sucking movements continue.\
name $name
>Hehehe, it already sucked some out.@
>But don't think that it will finish anytime soon...\
name ""
name "Luka"
>Ah! Ahhhh!!\
name ""
>The silk tightens around me again, forcing it even deeper into my skin.@
>Barely able to even move any longer, the stimulation from the sucking motion made by the cocoon gets even more intense.\
>I'm just its prey...@> I'll be stuck in here forever...@
>This pleasure will continue forever, with no release ever granted to me.\
name "Luka"
>Ahh!@> Ahhh!!\
name ""
>I start to cry at the thought of my terrible fate, but it's quickly replaced by a powerful orgasm blowing through me.\
name "Luka"
>Ahh... I'm coming!@
>Ahhhh!!\
name ""
gosub *syasei1
if %hanyo3=0 lsp 700,":a;chara\kaiko_h14.bmp",0,0
if %hanyo3=1 lsp 700,":a;chara\kaiko_h24.bmp",0,0
gosub *syasei2
name $name
>Hehe, please come as much as you want...@
>Every time you fill the cocoon with your semen, I can collect it and use it as my nutrients.\
name ""
name "Luka"
>Ahhh!\
name ""
>As the sweet ecstasy continues to take over more and more of my body, the fear in my mind grows stronger.@
>This is a nightmare...\
name "Luka"
>Ahh...\
name ""
>But it's no dream...@> I have no power to escape...@
>Stuck inside this cocoon, I can't do anything but be squeezed.\
name $name
>Hehe... How pitiful.@
>The more you struggle, the tighter it gets.@>The tighter it gets, the better it feels.\
name ""
name "Luka"
>Ah... Ahhhh!\
name ""
>With the last of my strength, I try to break free.@
>But my powerful struggle is met with an even more powerful squeeze by the cocoon, and I'm instantly forced to an orgasm.\
gosub *syasei1
if %hanyo3=0 lsp 700,":a;chara\kaiko_h15.bmp",0,0
if %hanyo3=1 lsp 700,":a;chara\kaiko_h25.bmp",0,0
gosub *syasei2
>My final desperate act only resulted in a powerful orgasm.@
>Beaten by the cocoon, I give in to despair.\
name "Luka"
>Haaa... H...Help me...\
name ""
name $name
>Hehe... There's no escape from inside my cocoon.@
>No matter how you cry or shout, it will just continue to suck out your semen endlessly.\
name ""
name "Luka"
>Ah...Ahh...\
name ""
>The cocoons rhythmic sucking continues as she talks, forcing me to another orgasm as I moan pathetically.\
gosub *syasei1:gosub *syasei2
>Like that, I'm easily brought to another ejaculation.@
>But an orgasm inside here is no release...\
name $name
>Come on... Ejaculate even more...@
>You'll be in there for the rest of your life, so there's no point in trying to endure the pleasure...\
name ""
name "Luka"
>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
gosub *anten
mov %hseanwave,0:hseanwave
>Defeated by the Silkworm Girl, I'm made into simple prey.\
>With my life sustained by the cocoon, I'm not even able to die...@>My only role in life is to supply semen to the Silkworm Girl.\
>Unable to even move inside this white tomb, I'm sucked endlessly, with no escape...\
>............\
goto *badend



*suzumebati_start

mov $name,"Hornet Girl"
mov $name2,"Hornet Girl"
mov $lavel,"suzumebati"
mov $tatie1,"suzumebati_st01"
mov $tatie2,"suzumebati_st01"
mov $tatie3,"suzumebati_st03"
mov $tatie4,"suzumebati_st01"
mov $haikei,"bg022"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,2000
if %nanido=2 mov %max_enemylife,2000
if %nanido=3 mov %max_enemylife,2400
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,90
mov %earth_keigen,40
if %nanido=3 mov %earth_keigen,20
mov %music,1
mov %tikei,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $half_s1,"MORE MORE. TEASE MORE."
mov $half_s2,""
mov $kiki_s1,"WEAK. YOU."
mov $kiki_s2,"COME, NOW."
mov %end_n,6
mov %exp_minus,15500
mov %zmonster_x,-250
mov %tukix,280
mov %owaza_count2a,6
name $name
>INTRUDER...@
>ELIMINATE.\
name ""
name "Luka"
>A bee type monster...@>She must be a subordinate of Queen Bee.\
name ""
>She has supple limbs, but a sturdy looking exoskeleton...@
>Just from a glance, I can tell she's bred for battle.\
>This won't be easy...\
goto *common_main



*suzumebati_v

gosub *face3
name $name
>QUEEN...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Hornet Girl turns into a normal hornet!\
mov %viclose,1:gosub *victory
mov %getexp,5500:gosub *lvup
mov %2279,1
goto *sean0185



*suzumebati_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>SURRENDER?\
name ""
goto *suzumebati_a



*suzumebati_main

gosub *cmd_main
if %cmd1=11 goto *common_attack
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *suzumebati_kousan
if %cmd1=16 goto *suzumebati_onedari
if %cmd1=17 goto *common_skill
goto *suzumebati_main



*suzumebati_a

rnd2 %ransu,1,12
if %ransu=1 gosub *suzumebati_a1:gosub *suzumebati_a1:goto *common_main
if %ransu=2 gosub *suzumebati_a1:gosub *suzumebati_a2:goto *common_main
if %ransu=3 gosub *suzumebati_a1:gosub *suzumebati_a3:goto *common_main
if %ransu=4 gosub *suzumebati_a2:gosub *suzumebati_a1:goto *common_main
if %ransu=5 gosub *suzumebati_a2:gosub *suzumebati_a2:goto *common_main
if %ransu=6 gosub *suzumebati_a2:gosub *suzumebati_a3:goto *common_main
if %ransu=7 gosub *suzumebati_a3:gosub *suzumebati_a1:goto *common_main
if %ransu=8 gosub *suzumebati_a3:gosub *suzumebati_a2:goto *common_main
if %ransu=9 gosub *suzumebati_a3:gosub *suzumebati_a3:goto *common_main
if %ransu>10 && %owaza_count2a>7 gosub *suzumebati_a4:goto *common_main
skip -11



*suzumebati_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"YOUR PENIS. TEASE."
if %ransu=2 mov $sel1,"WITH ALL HANDS."
if %ransu=3 mov $sel1,"THIS... MALE PENIS."
name $name
eng $sel1:$sel6\
name ""
skillname "Multiple Handjob"
eng "The Hornet Girl grabs Luka's penis with all four of her hands!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,15
if %wind=1 && %nanido=2 mov %wind_kakuritu,10
if %wind=1 && %nanido=3 mov %wind_kakuritu,7
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3331
dwave 1,"se\ero_koki1.ogg"
>The first quickly pumps his penis up and down!
if %nanido<2 damage 13,16
if %nanido=2 damage 15,18
if %nanido=3 damage 19,22
dwave 1,"se\ero_koki1.ogg"
>The second hand massages his balls!
if %nanido<2 damage 13,16
if %nanido=2 damage 15,18
if %nanido=3 damage 19,22
dwave 1,"se\ero_koki1.ogg"
>The third rolls its palm around the tip of his penis!
if %nanido<2 damage 13,16
if %nanido=2 damage 15,18
if %nanido=3 damage 19,22
dwave 1,"se\ero_koki1.ogg"
>The fourth tightly squeezes his penis!
if %nanido<2 damage 13,16
if %nanido=2 damage 15,18
if %nanido=3 damage 19,22
skillname ""
if %mylife=0 sub %stack,1:return *suzumebati_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*suzumebati_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"YOUR PENIS. SUCK."
if %ransu=2 mov $sel1,"PENIS TASTE. NICE."
if %ransu=3 mov $sel1,"SEMEN. EAT."
name $name
eng $sel1:$sel6\
name ""
skillname "Honey Blowjob"
dwave 1,"se\ero_buchu3.ogg"
eng "The Hornet Girl puts Luka's penis into her mouth, and sucks on it like it was honey!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,15
if %wind=1 && %nanido=2 mov %wind_kakuritu,10
if %wind=1 && %nanido=3 mov %wind_kakuritu,7
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>Her warm mouth violently sucks on Luka's penis!
skillcount2 3332
if %nanido<2 damage 40,50
if %nanido=2 damage 48,58
if %nanido=3 damage 64,74
skillname ""
if %mylife=0 sub %stack,1:return *suzumebati_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*suzumebati_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"YOUR PENIS... SQUISH."
if %ransu=2 mov $sel1,"HONEY BREASTS... GOOD?"
if %ransu=3 mov $sel1,"PENIS HONEY..."
name $name
eng $sel1:$sel6\
name ""
skillname "Honey Rich Tit Fuck"
dwave 1,"se\ero_koki1.ogg"
eng "The Hornet Girl forces Luka's penis between her honey covered breasts!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,15
if %wind=1 && %nanido=2 mov %wind_kakuritu,10
if %wind=1 && %nanido=3 mov %wind_kakuritu,7
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>With his penis covered in sticky honey, she crushes his penis between her soft breasts!
skillcount2 3333
if %nanido<2 damage 45,55
if %nanido=2 damage 53,63
if %nanido=3 damage 69,79
skillname ""
if %mylife=0 sub %stack,1:return *suzumebati_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*suzumebati_a4

add %stack,1
mov %owaza_count2a,0
name $name
>FREEZE.\
name ""
skillname "Bee Dance"
eng "The Hornet Girl's stinger shoots toward Luka's body!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,25
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
if %wind=2 && %nanido<2 mov %wind_kakuritu,60
if %wind=2 && %nanido=2 mov %wind_kakuritu,50
if %wind=2 && %nanido=3 mov %wind_kakuritu,30
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3334
>The venom courses through Luka's body, and makes him go numb!\
mov %status,2:gosub *status_print
>Luka is paralyzed!\
skillname ""
if %kousan=2 sub %stack,1:return
name "Luka"
>Urhg...!\
name ""
name $name
>NOW, TEASE.\
name ""
mov %status_turn,2
if %nanido=3 mov %status_turn,3
sub %stack,1
return



*suzumebati_onedari

mov $list1,"Multiple Handjob"
if %3331>0 mov %list_num1,1
mov $list2,"Honey Blowjob"
if %3332>0 mov %list_num2,1
mov $list3,"Honey Rich Tit Fuck"
if %3333>0 mov %list_num3,1
mov $list4,"Bee Dance"
if %3334>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *suzumebati_onedari1
if %cmd1=12 goto *suzumebati_onedari2
if %cmd1=13 goto *suzumebati_onedari3
if %cmd1=14 goto *suzumebati_onedari4
if %cmd1=-1 goto *suzumebati_main
goto *suzumebati_onedari



*suzumebati_onedari1

gosub *onedari_syori
name $name
>WITH HAND?\
name ""
gosub *suzumebati_a1
skip -1



*suzumebati_onedari2

gosub *onedari_syori
name $name
>SUCK?\
name ""
gosub *suzumebati_a2
skip -1



*suzumebati_onedari3

gosub *onedari_syori
name $name
>WITH BREASTS?\
name ""
gosub *suzumebati_a3
skip -1



*suzumebati_onedari4

gosub *onedari_syori
name $name
>PARALYZED TEASE?\
name ""
gosub *suzumebati_a4
goto *suzumebati_a



*suzumebati_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\suzumebati_bk04.bmp",0,0
gosub *syasei2
>As her four hands rub his penis at the same time, Luka finally gives in, covering her hands in semen.\
mov %viclose,1:gosub *lose
mov %2579,%2579+1:if %2579=1 mov %count_koenemy,%count_koenemy+1
if %2579>%count_most mov %count_most,%2579:mov $count_mostname,$name
count 5,7
mov $bad1,"Luka gave in to the Hornet Girl's four hands."
if %status=2 mov $bad1,"While paralyzed, Luka gave in to the Hornet Girl's four hands."
gosub *face2
name $name
>HOT. STICKY.@
>THIS, SEMEN...\
name ""
goto *suzumebati_h



*suzumebati_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\suzumebati_bk01.bmp",0,0
gosub *syasei2
>With her powerful mouth sucking him, Luka finally gives in, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2579,%2579+1:if %2579=1 mov %count_koenemy,%count_koenemy+1
if %2579>%count_most mov %count_most,%2579:mov $count_mostname,$name
count 4,7
mov $bad1,"Luka gave in to the Hornet Girl's blowjob."
if %status=2 mov $bad1,"While paralyzed, Luka gave in to the Hornet Girl's blowjob."
gosub *face2
name $name
>NNN... FISHY.@
>THIS, SEMEN...\
name ""
goto *suzumebati_h



*suzumebati_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\suzumebati_bk02.bmp",0,0
gosub *syasei2
>Squeezed between her honey covered breasts, Luka finally gives in, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2579,%2579+1:if %2579=1 mov %count_koenemy,%count_koenemy+1
if %2579>%count_most mov %count_most,%2579:mov $count_mostname,$name
count 7,7
mov $bad1,"Luka gave in to the Hornet Girl's tit fuck."
if %status=2 mov $bad1,"While paralyzed, Luka gave in to the Hornet Girl's tit fuck."
gosub *face2
name $name
>HOT. STICKY.@
>THIS, SEMEN...\
name ""
goto *suzumebati_h



*suzumebati_h

mov $bad2,"Kept as a prisoner in the hive, Luka is continually gang-raped by all of the bees monsters."
if %2579=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
name $name
>NOW NO RESISTANCE.@
>PRESENT TO QUEEN.\
name ""
>The Hornet Girl lifts me onto her shoulder, and carries me deeper into the hive.@
>Thus, I was taken to Queen Bee...\
gosub *anten
>...........\
lsp 700,":a;chara\suzumebati_st01.bmp",0,0
bg "bg\bg022.bmp",10,3000
name $name
>QUEEN NOT EGG LAYING SOON.@
>YOU MEANINGLESS.\
name ""
>It looks like she was going to make me mate with the Queen...@
>But now she isn't going to lay any eggs, so she doesn't need me.\
name $name
>YOU NOT NEEDED.@
>SLAVE OR RELEASED.\
name ""
name "Luka"
>Then please let me go...\
name ""
>But the Hornet Girl shakes her head no.\
name $name
>I LIKE.@
>YOU BEE PLAYTHING NOW.\
name ""
name "Luka"
>N...No way!@>Ahg!\
name ""
name $name
>YOU, QUIET.\
name ""
>She forces the tip of her abdomen into my mouth, and forces me to the ground.\
name $name
>NOT AS GOOD AS QUEEN.@
>BUT MY PHEROMONES POWERFUL.\
name ""
name "Luka"
>Nnnnggg...\
name ""
>A sweet liquid is forced into my mouth.@
>Forced to swallow it, a warmth slowly flows through my body.\
name "Luka"
>Haa...\
name ""
name $name
>I WORKER BEE.@>NO REPRODUCTION.@
>BUT MY VAGINA STILL WANT.\
name ""
>As the warmth reaches my waist, my penis slowly gets hard.@
>Seeing the reaction she was waiting for, the Hornet Girl slowly sits down on me.\
name "Luka"
>Ahhhhh!\
name ""
mov %hseanwave,1:hseanwave
lsp 690,":a;chara\suzumebati_ct01.bmp",0,0:print 10,500
>Her warm vagina slowly swallows my penis.\
name "Luka"
>Haa... It's slimy...\
name ""
>I can feel warm honey inside of her surrounding my penis.@
>Her soft flesh gently vibrates in time with her wings, filling me with a sweet pleasure.\
name "Luka"
>Ahhh...\
name ""
>In addition, her strange insect vagina feels like it has multiple fleshy tentacles inside of it, wriggling and wrapping around my penis.\
>Entangled in her soft flesh and drunk on the liquid she forced into me, my body rejoices at the pleasure.\
name $name
>THIS NO MEANING.@> NO REPRODUCTION.@
>BUT...@> FEELS GOOD.\
name ""
>The Hornet Girl starts to gently shake her body side to side, riding on top of me as I squirm underneath.\
name "Luka"
>Ahhh!\
name ""
>My penis is slowly forced in and out of her warm hole, each movement causing a little bit of honey to dribble out of her onto my waist.\
>As I'm taken in and out of her, the tentacle like flesh inside of her pussy grabs and coils around my penis, forcing two different stimulations in me at the same time.\
name $name
>IN AND OUT.@>FEELS GOOD.@
>WASTED TIME.@> BUT SO GOOD.\
name ""
name "Luka"
>Ahhhh...!!\
name ""
>The Hornet Girl starts to bounce up and down on top of me.\
>Getting herself even more excited, she indulges in her own lust, riding me like I was just a toy for her own amusement.\
>Her relentless pumping forces me to slowly give in to the pleasure.@
>Covered in dripping honey from her pussy, I feel myself about to give in to the rising orgasm.\
name "Luka"
>Ahh... I... I'm going to come...\
name ""
name $name
>SHOOT SEMEN?@
>DO IT.@> THERE NO MEANING.\
name ""
>The Hornet Girl continues to bounce on top of me in a frenzy, not caring at all about my impending orgasm.\
>Unable to do anything, I surrender to the desire to release.\
name "Luka"
>Ahhhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\suzumebati_ct02.bmp",0,0
lsp 693,":a;chara\suzumebati_bk03.bmp",0,0
gosub *syasei2
>As my semen shoots into her warm hole, more of her honey drips out onto my waist, displaced by my seed.\
name $name
>SEMEN, SHOOTING.@
>MALE SEMEN IN ME...\
name ""
name "Luka"
>Ahh...\
name ""
>Raped and forced to orgasm for no reason at all...@
>The humiliation at that thought brings tears to my eyes.\
mov %hseanwave,5:hseanwave
>The Hornet Girl only stops to consider the semen in her for a second.@
>Quickly giving back in to her lust, she starts bouncing on top of me again.\
name $name
>MORE... MORE SEMEN.@
>WHEN IT SHOOTS...@>FEELS SO GOOD.\
name ""
name "Luka"
>Ah... Ahhh!@>Don't move so fast!!\
name ""
>My breathing gets rough as the Hornet Girl continues to ride me as hard as she can.@
>Helpless underneath her, I can't do anything but plead to her.\
name $name
>INJECT IT.@
>MORE INTO ME.@>I WANT TO FEEL IT.\
name ""
>Her honey sprays onto my waist with each powerful thrust of her hips down onto mine.@
>Already sensitive from my last orgasm, I quickly find myself forced to another climax under her relentless assault.\
name "Luka"
>Ahh... I'm coming...!@
>Ahhh!!\
name ""
gosub *syasei1
lsp 690,":a;chara\suzumebati_ct03.bmp",0,0
gosub *syasei2
>I yell out and shoot more semen into her pussy.@
>The sense of defeat fills me as the Hornet Girl pauses and looks at the semen for only a moment before deciding on something.\
name $name
>YOU OUR SEX SLAVE NOW.@
>I LET ALL BEES PLAY WITH YOU TOO.\
name ""
name "Luka"
>No, I don't want that!@> Ahhh!\
name ""
>The Hornet Girl starts to aggressively ride me again, cutting off my words of protest.\
gosub *syasei1
lsp 690,":a;chara\suzumebati_ct04.bmp",0,0
gosub *syasei2
name "Luka"
>Ahhh...\
name ""
>Unable to take her aggressive piston movements, I come inside her again.@
>Raped to surrender and defeated as a man, I finally faint.\
gosub *anten
mov %hseanwave,0:hseanwave
>After that, I was never released.@
>I'm gang-raped by all the bees in the hive, and used as a source of amusement.\
>Used as a tool just to release pent up sexual feelings of the bees incapable of breeding, I'm raped all day, every day.\
>Thus, my life continues as a sex slave...\
>...............\
goto *badend



*queenbee_start

mov $name,"Queen Bee"
mov $name2,"Queen Bee"
mov $lavel,"queenbee"
mov $tatie1,"queenbee_st01"
mov $tatie2,"queenbee_st02"
mov $tatie3,"queenbee_st03"
mov $tatie4,"queenbee_st02"
mov $haikei,"bg022"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,3200
if %nanido=2 mov %max_enemylife,3500
if %nanido=3 mov %max_enemylife,3800
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,50
if %nanido=3 mov %earth_keigen,25
mov %music,2
mov %tikei,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $half_s1,"Drown in a Queen's body..."
mov $half_s2,"More... Drown in pleasure..."
mov $kiki_s1,"You're almost at your limit..."
mov $kiki_s2,"You will surrender and pour your semen into my body."
mov %end_n,6
mov %exp_minus,21000
mov %zmonster_x,-320
mov %tukix,350
mov %owaza_count2a,6
name "Luka"
>Are you the Queen!?\
name ""
name $name
>Indeed.@>I am Queen Bee.@
>Why did you come here, human?\
name ""
name "Luka"
>I want to end this war!@
>If you won't listen and stop, I'll be forced to defeat you!\
name ""
name $name
>...Unfortunately, we cannot stop fighting.@
>I govern this insect tribe.\
>I must protect those in my charge.\
name ""
name "Luka"
>Then I have no choice...@> I'm sorry, but I have to seal you!\
name ""
>I raise my sword toward the Queen.@
>The insects have all been strong...\
>But I can't back down now!@> I have to end this war!\
name $name
>If you won't give up...@
>Then I shall be your opponent.\
>I'll defeat you with the power of a Queen!\
name ""
goto *common_main



*queenbee_v

gosub *face3
name $name
>If I'm defeated... Then my insect tribe is doomed!\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Queen Bee turns into a tiny normal queen bee!\
mov %viclose,1:gosub *victory
mov %getexp,8000:gosub *lvup
mov %2280,1
goto *sean0186



*queenbee_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>It seems you have stopped resisting.@
>In that case, I shall make you my toy.\
name ""
goto *queenbee_a



*queenbee_main

gosub *cmd_main
if %cmd1=11 goto *common_attack
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *queenbee_kousan
if %cmd1=16 goto *queenbee_onedari
if %cmd1=17 goto *common_skill
goto *queenbee_main



*queenbee_yuwaku_a

rnd2 %ransu,1,3
if %ransu=1 gosub *queenbee_yuwaku_a1:goto *common_main
if %ransu=2 gosub *queenbee_yuwaku_a2:goto *common_main
if %ransu=3 gosub *queenbee_yuwaku_a3:goto *common_main



*queenbee_yuwaku_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Ahh... B...Breasts..."
if %ransu=2 mov $sel1,"Breasts... So soft..."
if %ransu=3 mov $sel1,"Haaa..."
name "Luka"
eng $sel1:$sel6\
name ""
>Luka clings to Queen Bee's body, and buries his face in her breasts!\
>Her soft breasts gently press against his head!
if %nanido<2 damage 10,20
if %nanido=2 damage 15,25
if %nanido=3 damage 25,35
if %mylife=0 sub %stack,1:return *queenbee_h5
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hehe... Are you enjoying my breasts?"
if %ransu=2 mov $sel1,"Good... Drown in it..."
if %ransu=3 mov $sel1,"Entrust your body to me, and give in..."
name $name
eng $sel1:$sel6\
name ""
>Queen Bee crushes Luka's head between her breasts!
if %nanido<2 damage 20,30
if %nanido=2 damage 30,40
if %nanido=3 damage 40,50
if %mylife=0 sub %stack,1:return *queenbee_h5
sub %stack,1
return



*queenbee_yuwaku_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Ah... Ahhh..."
if %ransu=2 mov $sel1,"Uaaaa..."
if %ransu=3 mov $sel1,"Haa..."
name "Luka"
eng $sel1:$sel6\
name ""
>Luka hugs Queen Bee, and kisses her!\
>The sweet sensation that flows from her lips runs through his body!
if %nanido<2 damage 10,20
if %nanido=2 damage 15,25
if %nanido=3 damage 25,35
if %mylife=0 sub %stack,1:return *queenbee_h5
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You desire my lips? Then drown in them..."
if %ransu=2 mov $sel1,"You desire my lips? Then drown in them..."
if %ransu=3 mov $sel1,"You wish to give your lips to me? Then I shall take them..."
name $name
eng $sel1:$sel6\
name ""
>Queen Bee kisses Luka back, smothering him!
if %nanido<2 damage 20,30
if %nanido=2 damage 30,40
if %nanido=3 damage 40,50
if %mylife=0 sub %stack,1:return *queenbee_h5
sub %stack,1
return



*queenbee_yuwaku_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Lick my penis..."
if %ransu=2 mov $sel1,"Y...Your lips... So soft..."
if %ransu=3 mov $sel1,"Suck it..."
name "Luka"
eng $sel1:$sel6\
name ""
>Luka presses his penis to Queen Bee's mouth!\
>The soft touch of her lips against his penis causes him to moan!
if %nanido<2 damage 15,20
if %nanido=2 damage 25,30
if %nanido=3 damage 35,40
if %mylife=0 sub %stack,1:return *queenbee_h5
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Then a little kiss..."
if %ransu=2 mov $sel1,"As you desire, I'll suck a little..."
if %ransu=3 mov $sel1,"Giving your penis over to my lips... Hehe."
name $name
eng $sel1:$sel6\
name ""
>Queen Bee's soft lips slightly open, and gently suck on the tip of Luka's penis!
if %nanido<2 damage 20,30
if %nanido=2 damage 30,40
if %nanido=3 damage 40,50
if %mylife=0 sub %stack,1:return *queenbee_h5
sub %stack,1
return



*queenbee_a

rnd2 %ransu,1,12
if %ransu=1 gosub *queenbee_a1:gosub *queenbee_a1:goto *common_main
if %ransu=2 gosub *queenbee_a1:gosub *queenbee_a2:goto *common_main
if %ransu=3 gosub *queenbee_a1:gosub *queenbee_a3:goto *common_main
if %ransu=4 gosub *queenbee_a2:gosub *queenbee_a1:goto *common_main
if %ransu=5 gosub *queenbee_a2:gosub *queenbee_a2:goto *common_main
if %ransu=6 gosub *queenbee_a2:gosub *queenbee_a3:goto *common_main
if %ransu=7 gosub *queenbee_a3:gosub *queenbee_a1:goto *common_main
if %ransu=8 gosub *queenbee_a3:gosub *queenbee_a2:goto *common_main
if %ransu=9 gosub *queenbee_a3:gosub *queenbee_a3:goto *common_main
if %ransu>10 && %owaza_count2a>7 gosub *queenbee_a4:goto *common_main
skip -11



*queenbee_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My skills will make you moan in agony."
if %ransu=2 mov $sel1,"I won't hold back."
if %ransu=3 mov $sel1,"This is a man's weak spot!"
name $name
eng $sel1:$sel6\
name ""
skillname "Queen's Hand"
eng "The Queen's four hands reach toward Luka's groin!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3335
dwave 1,"se\ero_koki1.ogg"
>The first hand gently rubs the tip of his penis!
if %nanido<2 damage 13,16
if %nanido=2 damage 16,19
if %nanido=3 damage 19,22
dwave 1,"se\ero_koki1.ogg"
>The second hand massages Luka's balls!
if %nanido<2 damage 13,16
if %nanido=2 damage 16,19
if %nanido=3 damage 19,22
dwave 1,"se\ero_koki1.ogg"
>The third hand stimulate Luka's prostate!
if %nanido<2 damage 13,16
if %nanido=2 damage 16,19
if %nanido=3 damage 19,22
dwave 1,"se\ero_koki1.ogg"
>The fourth hand pumps Luka's penis!
if %nanido<2 damage 13,16
if %nanido=2 damage 16,19
if %nanido=3 damage 19,22
skillname ""
if %mylife=0 sub %stack,1:return *queenbee_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*queenbee_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Drown in the Queen's chest..."
if %ransu=2 mov $sel1,"Don't you wish to cover a Queen's chest in semen?"
if %ransu=3 mov $sel1,"No man can resist a Queen's breasts..."
name $name
eng $sel1:$sel6\
name ""
skillname "Queen's Bust"
dwave 1,"se\ero_koki1.ogg"
>Queen Bee sandwiches Luka's penis between her breasts!
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3336
if %nanido<2 damage 40,50
if %nanido=2 damage 50,60
if %nanido=3 damage 60,70
skillname ""
if %mylife=0 sub %stack,1:return *queenbee_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*queenbee_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I wish to taste your penis..."
if %ransu=2 mov $sel1,"When you can't stand it, shoot it into my mouth."
if %ransu=3 mov $sel1,"You won't last with this..."
name $name
eng $sel1:$sel6\
name ""
skillname "Queen's Mouth"
dwave 1,"se\ero_koki1.ogg"
>Queen Bee forces Luka's penis into her mouth, and violently sucks on it!
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3337
if %nanido<2 damage 45,55
if %nanido=2 damage 55,65
if %nanido=3 damage 65,75
skillname ""
if %mylife=0 sub %stack,1:return *queenbee_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*queenbee_a4

add %stack,1
mov %owaza_count2a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"A Queen's kiss will fascinate any man..."
if %ransu=2 mov $sel1,"Your heart will flutter..."
if %ransu=3 mov $sel1,"This kiss will make you give your body to me..."
name $name
eng $sel1:$sel6\
name ""
skillname "Pheromone Kiss"
dwave 1,"se\ero_chupa1.ogg"
eng "The Queen kisses Luka!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,70
if %wind=1 && %nanido=2 mov %wind_kakuritu,60
if %wind=1 && %nanido=3 mov %wind_kakuritu,35
if %wind=2 && %nanido<2 mov %wind_kakuritu,100
if %wind=2 && %nanido=2 mov %wind_kakuritu,90
if %wind=2 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3338
>She forces sweet pheromones into Luka's mouth!
if %nanido<2 damage 20,30
if %nanido=2 damage 30,40
if %nanido=3 damage 40,50
if %status=0 mov $sel1,"Luka has been seduced!"
if %status=5 mov $sel1,"Luka is seduced..."
mov %status,5:gosub *status_print
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *queenbee_h4
if %kousan=2 sub %stack,1:return
name "Luka"
>Ahh... What... Is this...?\
name ""
name $name
>Hehe... Don't you wish to drown in my body?@
>I give you permission... Do what you desire with my body.\
name ""
mov %status_turn,2
if %nanido=3 rnd2 %status_turn,3,4
sub %stack,1
return



*queenbee_onedari

mov $list1,"Queen's Hand"
if %3335>0 mov %list_num1,1
mov $list2,"Queen's Bust"
if %3336>0 mov %list_num2,1
mov $list3,"Queen's Mouth"
if %3337>0 mov %list_num3,1
mov $list4,"Pheromone Kiss"
if %3338>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *queenbee_onedari1
if %cmd1=12 goto *queenbee_onedari2
if %cmd1=13 goto *queenbee_onedari3
if %cmd1=14 goto *queenbee_onedari4
if %cmd1=-1 goto *queenbee_main
goto *queenbee_onedari



*queenbee_onedari1

gosub *onedari_syori
name $name
>You wish to submit to my hand?@
>Then I shall let you enjoy it to your heart's content.\
name ""
gosub *queenbee_a1
skip -1



*queenbee_onedari2

gosub *onedari_syori
name $name
>You wish to submit to my breasts?@
>Then I shall let you enjoy them to your heart's content.\
name ""
gosub *queenbee_a2
skip -1



*queenbee_onedari3

gosub *onedari_syori
name $name
>You wish to submit to my mouth?@
>Then I shall let you enjoy it to your heart's content.\
name ""
gosub *queenbee_a3
skip -1



*queenbee_onedari4

gosub *onedari_syori
name $name
>You wish to be seduced by my kiss?@
>Very well, I shall take your heart...\
name ""
gosub *queenbee_a4
goto *queenbee_yuwaku_a



*queenbee_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\queenbee_bk05.bmp",0,0
gosub *syasei2
>Assaulted by her four skilled hands, Luka gives in, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2580,%2580+1:if %2580=1 mov %count_koenemy,%count_koenemy+1
if %2580>%count_most mov %count_most,%2580:mov $count_mostname,$name
count 5,1
mov $bad1,"Luka succumbed to the Queen's handjob."
gosub *face2
name $name
>You've made my hands so dirty...@
>Hehe... What a pitiful male.\
name ""
goto *queenbee_h



*queenbee_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\queenbee_bk02.bmp",0,0
gosub *syasei2
>Crushed between her soft breasts, Luka gives in, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2580,%2580+1:if %2580=1 mov %count_koenemy,%count_koenemy+1
if %2580>%count_most mov %count_most,%2580:mov $count_mostname,$name
count 7,1
mov $bad1,"Luka succumbed to the Queen's tit fuck."
gosub *face2
name $name
>You've made my breasts so dirty...@
>Hehe... What a pitiful male.\
name ""
goto *queenbee_h



*queenbee_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\queenbee_bk01.bmp",0,0
gosub *syasei2
>Unable to take her warm mouth around his penis any longer, Luka comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2580,%2580+1:if %2580=1 mov %count_koenemy,%count_koenemy+1
if %2580>%count_most mov %count_most,%2580:mov $count_mostname,$name
count 4,1
mov $bad1,"Luka succumbed to the Queen's blowjob."
gosub *face2
name $name
>Nnn... You filled my mouth with so much semen.@
>Hehe... What a pitiful male.\
name ""
goto *queenbee_h



*queenbee_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\queenbee_bk03.bmp",0,0
gosub *syasei2
>As the pleasure from her kiss floods his body, Luka orgasms, shooting out semen without anything even touching his penis.\
mov %viclose,1:gosub *lose
mov %2580,%2580+1:if %2580=1 mov %count_koenemy,%count_koenemy+1
if %2580>%count_most mov %count_most,%2580:mov $count_mostname,$name
count 18,1
mov $bad1,"Luka was forced to an orgasm by the Queen's kiss."
gosub *face2
name $name
>Coming just from the feeling of my lips...@
>Were they heavenly?\
name ""
goto *queenbee_h



*queenbee_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\queenbee_bk03.bmp",0,0
gosub *syasei2
>Drowning in desire for Queen Bee, Luka finally comes.\
mov %viclose,1:gosub *lose
mov %2580,%2580+1:if %2580=1 mov %count_koenemy,%count_koenemy+1
if %2580>%count_most mov %count_most,%2580:mov $count_mostname,$name
count 31,1
mov $bad1,"Seduced by Queen Bee, Luka drowned in desire."
gosub *face2
name $name
>Hehe... You dirtied my body with the proof of your desire.@
>Humans are so pathetic.\
name ""
goto *queenbee_h



*queenbee_h

mov $bad2,"Kept as her breeding partner for life, Luka is forced to mate with Queen Bee endlessly."
if %2580=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Haaa...\
name ""
>As I start to fall to the ground in exhaustion, Queen Bee grabs me from behind and presses me against her soft body.\
name $name
>I was going to refrain from mating until the end of the war...@
>But your genes seem exceptional.\
>Hehe... You'll be permitted to mate with a Queen.@
>With your semen, I should be able to create much stronger children...\
name ""
>She bends over me, and pushes the tip of her abdomen near my groin.\
>A hole opens up at her tip, exposing a ridged pink membrane.\
>Just the sight of it causes the desire to feel it to well up in me.@
>With it hovering right over my penis, the fear and hope start to mix inside my brain.\
name $name
>Our race of bee monsters are like a giant living being...@> Each member acts as a different body part.@
>The Queen of them is equivalent to the reproductive organ.\
>That is, I'm in charge of giving birth to my entire tribe.@
>In essence, if I myself wish to survive, I must constantly breed.\
name ""
>She shakes her reproductive organ back and forth as she giggles.\
>I notice her oddly large stomach...@>Her entire body must have evolved to be nothing but an organism to mate and breed.\
name $name
>Taking the role of the reproductive organ is no easy task.\
>Finding men and forcing them to mate to create thousands of children...@
>One after another, I must give birth endlessly to keep my tribe going.\
>To achieve that, I must mate nonstop with a man...@
>Once connected, we become nothing more than a reproductive machine.\
name ""
name "Luka"
>N...No... I don't want this...\
name ""
name $name
>Hehehe... There's no fighting against it, nor any escape.@
>Here it comes... Once I connect with you, there's no escape...\
name ""
name "Luka"
>Ahh... Stop!@> No!\
name ""
>The organ she was just displaying to me slowly starts to drop down toward my groin...@
mov %hseanwave,1:hseanwave
cspl 690,699
lsp 690,":a;chara\queenbee_ct01.bmp",0,0:print 10,500
>And quickly swallows me inside!\
name "Luka"
>Ahhhh!!\
name ""
>As soon as my penis is encased in her hot hole, I let out a scream of pleasure.\
>The combination of her soft flesh and warm honey inside took me by surprise.@
>After only seconds, it feels like my penis was made to be inside of her, to remain part of her body forever.\
name "Luka"
>Haaa!@>Ahhh!\
name ""
>The soft flesh inside of her gently wraps around my penis, molding to my shape.@
>Small muscles inside of her start to rub and massage me at the same time, as she slowly starts to tighten around me.\
>The combination of pressure and rubbing makes it feel like her pussy itself is tying to milk out my semen.\
name "Luka"
>Ahhhh!!\
name ""
>Having only been inserted into her, I'm already trembling in pleasure.\
>The desire to come inside of her fills me, overpowering my previous fear with this forbidden pleasure granted to me.\
name $name
>Hehehe... A Queen's organ can be nothing but the best.@
>Now, I'll squeeze out your seed like this...\
name ""
>She flashes a superior smile over me as she tightens her pussy around my penis.\
name "Luka"
>Ah... Ahh!\
name ""
>The tightening causes her soft walls to fit even closer around my penis, as my tip rubs against her deepest part.\
>At this rate, not only am I going to come... But it's going to shoot right into her waiting womb...\
name "Luka"
>Ahhh... I... I'm going to come...!\
name ""
name $name
>Hehehe... The Queen is squeezing out your seed.@
>You shouldn't resist something like that... Just come inside me.\
name ""
>Her soft walls tighten even more around me, cornering me into a climax.@
>I yell out in pleasure as I finally give in, exploding inside her.\
gosub *syasei1
lsp 690,":a;chara\queenbee_ct02.bmp",0,0
gosub *syasei2
name "Luka"
>Ahhh... Ahhh...\
name ""
>I sigh in ecstasy as my semen shoots into her.\
name $name
>Sorry to interrupt you as you're drowning in the pleasure...@
>But I need to tighten it up a little more.\
>I need every drop of your superior genes to breed an army to destroy the plants.\
name ""
>Suddenly, her vagina tightens intensely around my penis.@
>Like that, the muscles inside of her move rhythmically up and down, milking out the last bits of semen inside my penis from my orgasm.\
>My body shakes in pleasure as each milking motion forces out a little bit of the remaining semen.\
name "Luka"
>Ah... Ahhh...\
name ""
name $name
>Did mating with a Queen catch your interest?@
>Because you're going to be doing this for a long time...\
name ""
mov %hseanwave,4:hseanwave
>Having squeezed out the last bits of my previous ejaculation, the milking motion gets even faster as she starts to work toward the next.\
>Almost like a pump, her warm vagina keeps rubbing and milking my penis, bringing me toward another orgasm.\
name "Luka"
>Ah... Ahhhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\queenbee_ct03.bmp",0,0
gosub *syasei2
>With a moan, I explode inside the Queen again, filling her with more of my seed.\
name "Luka"
>Ahhh...\
name ""
>It feels like her hole is just a pump, used to suck out my semen...\
>I'm instantly reminded of what she said earlier, about her being nothing but a breeding machine...\
>Once she forced me inside of her, I became a part of that machine too...\
name $name
>Come on... Give more of an effort...@
>You have no use in life anymore except to breed with me...\
name ""
name "Luka"
>Ahhhhhh!!\
name ""
>Her ruthless organ continues to pump me, trying to suck out more semen.\
>Helpless under her, I can't do anything but give her more seed.\
name "Luka"
>Ah... Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>I'm forced to ejaculate over and over again.@
>The constant orgasms bring me closer and closer to total exhaustion.\
name "Luka"
>Ahhh... Ahh...\
name ""
>Orgasm after orgasm...@
gosub *syasei1
lsp 690,":a;chara\queenbee_ct04.bmp",0,0
gosub *syasei2
>My mind and body both break down as I start to lose consciousness.\
name $name
>Fainting, eh...@>That doesn't matter.@
>My organ is able to suck out the seed from an unconscious male.\
>Now, give me more seed...@
>I'll make good use of your male functions...\
name ""
name "Luka"
>Ah...aa...\
name ""
gosub *syasei1:gosub *syasei2
>Even as I fall unconscious, the Queen continues to squeeze out my seed.\
gosub *anten
mov %hseanwave,0:hseanwave
>Even after I woke up, I was still inside the Queen.@
>After a few hours of being awake, I was squeezed to fainting again.\
>Forcefully given nutrition to stay alive, my life is used solely as part of the Queen's reproduction machine...\
>.............\
goto *badend



*plants1_start

mov $name,"Alraune Girls"
mov $name2,"Alra Rooty"
mov $lavel,"plants1"
mov $tatie1,"a_looty_st01"
mov $tatie2,"a_looty_st02"
mov $tatie3,"a_looty_st03"
mov $tatie4,"a_looty_h1a"
mov $haikei,"bg022"
mov %monster_x,50
mov %monster_y,130
mov $tatie1b,"a_alm_st01"
mov $tatie2b,"a_alm_st01"
mov $tatie3b,"a_alm_st03"
mov %monster_xb,380
mov %monster_yb,0
if %nanido=1 mov %max_enemylife,3000
if %nanido=2 mov %max_enemylife,3400
if %nanido=3 mov %max_enemylife,3800
if %nanido=1 mov %henkahp1,1400
if %nanido=2 mov %henkahp1,1600
if %nanido=3 mov %henkahp1,1800
if %nanido=0 mov %max_enemylife,2
if %nanido=0 mov %henkahp1,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,15
if %nanido=3 mov %earth_keigen,8
mov %music,1
mov %tikei,3
gosub *maxmp:mov %mp,%max_mp
mov %tekikazu,2
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free from Alra Rooty's roots!"
mov $mogaku_anno2,"Luka broke free of the roots!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Ahaha, you thought you could escape!?"
mov $mogaku_sel2,"I won't stop until you come!"
mov $mogaku_sel3,"Ahaha, what? Can't do anything?"
mov $mogaku_sel4,"I won't let go! Hahaha."
mov $mogaku_sel5,"Look at you struggling..."
mov $mogaku_dassyutu1,"What's with the pointless struggling..."
mov $mogaku_dassyutu2,""
mov $mogaku_earth_dassyutu1,"Where did this power come from!?"
mov $mogaku_earth_dassyutu2,""
mov $half_s1,"Well, does it feel good?"
mov $half_s2,"Then let me make it even better!"
mov $kiki_s1,"Ahahaha, you're almost done!"
mov $kiki_s2,"Now give up and come!"
mov %end_n,6
mov %exp_minus,29000
mov %zmonster_x,-50
mov %tukix,140
mov %tekikazu,2
mov %owaza_count1a,4
name "Alra Arum"
>Sheesh, a turncoat.@
>To fight now after such a long battle is such a shame...\
name ""
name "Alra Rooty"
>All insects are our enemy!@
>If you defend them, you're our enemy too!\
name ""
>Enemies... Allies...@
>The war should have been over...@> Those words shouldn't have any meaning now!\
name "Alra Arum"
>We're the elite the Queen picked to be the dispatched force.@
>We've just healed from our previous injuries, and are in peak condition...\
name ""
name "Alra Rooty"
>We rushed here to help you, but you were already done...@> Now you're all exhausted and worn out...@
>But we won't hold back!\
name ""
mov %sinkou,1
goto *common_main



*plants1001

gosub *face3
name "Alra Rooty"
>Uaaa...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Alra Rooty turns into a tree stump!\
csp 702
lsp 700,":a;chara\a_alm_st01.bmp",200,0:print 10,500
mov $name2,"Alra Arum"
mov $tatie1,"a_alm_st01"
mov $tatie2,"a_alm_st01"
mov $tatie3,"a_alm_st03"
mov $tatie4,"a_alm_h1a"
mov %monster_x,200
mov %monster_y,0
mov $mogaku_anno1,"But Luka can't break free from her embrace!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Useless... I won't let go."
mov $mogaku_sel2,"You can't escape. You know that, right?"
mov $mogaku_sel3,"Give up. I won't let go."
mov $mogaku_sel4,"Hehe... That's no good. You can't escape."
mov $mogaku_sel5,"No matter how hard you try, you won't break free..."
mov $mogaku_dassyutu1,"You fled..."
mov $mogaku_dassyutu2,""
mov $mogaku_earth_dassyutu1,"What is this power!?"
mov $mogaku_earth_dassyutu2,""
mov $half_s1,"Hehe, it feels good, doesn't it?"
mov $half_s2,"Allow me to make it even better..."
mov $kiki_s1,"You're almost at your limit..."
mov $kiki_s2,"Allow me to suck up all of your delicious seed..."
mov %sel_hphalf,0
mov %sel_kiki,0
mov %first_sel1,0
mov %first_sel2,0
mov %first_sel3,0
mov %tekikazu,1
mov %zmonster_x,-100
mov %tukix,320
gosub *face3
name "Alra Arum"
>...Humans are indeed strong.@
gosub *face1
>But I'm not to be taken lightly either!\
name ""
mov %sinkou,2
goto *plants1_a



*plants1_v

gosub *face3
name "Alra Arum"
>Why are you betraying us...?\
name ""
dwave 1,"se\syometu.ogg"
cspl 700,702:print 99,4500,"system\breakup.dll/urb"
>Alra Arum turns into cabbage!\
mov %viclose,1:gosub *victory_plural
mov %getexp,5000:gosub *lvup
mov %2281,1
goto *sean0187



*plants1_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
if %sinkou=2 skip 4
name "Alra Rooty"
>Ahaha, already surrendering?\
name ""
name "Alra Arum"
>Do you want to feel good that badly?@
>Then let us give you what you want...\
name ""
goto *plants1_a



*plants1_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *plants1_kousan
if %cmd1=16 && %sinkou=1 goto *plants1_onedaria
if %cmd1=16 && %sinkou=2 goto *plants1_onedarib
if %cmd1=17 goto *common_skill
goto *plants1_main



*plants1_a

if %enemylife<%henkahp1 && %sinkou=1 goto *plants1001
if %sinkou=1 && %kousoku=1 gosub *plants1_a5:goto *common_main
if %sinkou=2 && %kousoku=1 gosub *plants1_a10:goto *common_main
rnd2 %ransu,1,4
if %sinkou=1 && %ransu=1 gosub *plants1_a1:goto *common_main
if %sinkou=1 && %ransu=2 gosub *plants1_a2:goto *common_main
if %sinkou=1 && %ransu=3 gosub *plants1_a3:gosub *plants1_a8:goto *common_main
if %sinkou=1 && %ransu=4 && %owaza_count1a>5 gosub *plants1_a4:goto *common_main
if %sinkou=2 && %ransu=1 gosub *plants1_a6:goto *common_main
if %sinkou=2 && %ransu=2 gosub *plants1_a7:goto *common_main
if %sinkou=2 && %ransu=3 gosub *plants1_a8:goto *common_main
if %sinkou=2 && %ransu=4 && %owaza_count1a>5 gosub *plants1_a9:goto *common_main
skip -9



*plants1_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Crush him with our chests!":mov $sel2,"Our breasts are nice and soft, you know?"
if %ransu=2 mov $sel1,"Spray your seed across our chests!":mov $sel2,"Let out a lot, OK...?"
if %ransu=3 mov $sel1,"Crush his penis until he comes!":mov $sel2,"Here, we'll make you feel good..."
name "Alra Rooty"
eng $sel1:$sel6\
name ""
name "Alra Arum"
eng $sel2:$sel6\
name ""
skillname "Double Tit Fuck"
dwave 1,"se\ero_koki1.ogg"
>The two Alraunes sandwich Luka's penis between their breasts!
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,25
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
if %wind=2 && %nanido<2 mov %wind_kakuritu,50
if %wind=2 && %nanido=2 mov %wind_kakuritu,40
if %wind=2 && %nanido=3 mov %wind_kakuritu,25
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3339
mov %damage_nobr,1
if %nanido<2 damage 30,35
if %nanido=2 damage 35,40
if %nanido=3 damage 40,45
if %nanido<2 damage 30,35
if %nanido=2 damage 35,40
if %nanido=3 damage 40,45
skillname ""
if %mylife=0 sub %stack,1:return *plants1_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*plants1_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Lick his penis!":mov $sel2,"Good, I wanted to give it a taste!"
if %ransu=2 mov $sel1,"We'll make you water our mouths with semen...":mov $sel2,"I wonder if his semen tastes good...?"
if %ransu=3 mov $sel1,"Hehe, I'm going to eat your penis...":mov $sel2,"Our mouths will feel amazing..."
name "Alra Rooty"
eng $sel1:$sel6\
name ""
name "Alra Arum"
eng $sel2:$sel6\
name ""
skillname "Double Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>The two Alraunes take turns sucking on Luka's penis!
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,25
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
if %wind=2 && %nanido<2 mov %wind_kakuritu,50
if %wind=2 && %nanido=2 mov %wind_kakuritu,40
if %wind=2 && %nanido=3 mov %wind_kakuritu,25
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3340
mov %damage_nobr,1
if %nanido<2 damage 35,40
if %nanido=2 damage 40,45
if %nanido=3 damage 45,50
if %nanido<2 damage 35,40
if %nanido=2 damage 40,45
if %nanido=3 damage 45,50
skillname ""
if %mylife=0 sub %stack,1:return *plants1_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*plants1_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll use my roots..."
if %ransu=2 mov $sel1,"My roots are nice and soft you know...?"
if %ransu=3 mov $sel1,"Hehe... Where do you want to be massaged?"
name "Alra Rooty"
eng $sel1:$sel6\
name ""
skillname "Rooty Caress"
dwave 1,"se\ero_slime1.ogg"
eng "Alra Rooty's roots grow, and shoot out toward Luka's body like tentacles!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,25
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
if %wind=2 && %nanido<2 mov %wind_kakuritu,50
if %wind=2 && %nanido=2 mov %wind_kakuritu,40
if %wind=2 && %nanido=3 mov %wind_kakuritu,25
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>Her roots run up and down Luka's groin!
skillcount2 3341
if %nanido<2 damage 40,45
if %nanido=2 damage 45,50
if %nanido=3 damage 50,55
skillname ""
if %mylife=0 sub %stack,1:return *plants1_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*plants1_a4

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name "Alra Rooty"
>I caught you!\
name ""
skillname "Rooty Hold"
dwave 1,"se\ero_makituki3.ogg"
>Alra Rooty's roots wrap around Luka's lower body!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
if %nanido<2 damage 40,45
if %nanido=2 damage 50,55
if %nanido=3 damage 60,65
mov %kousoku,1:gosub *status_print
>Luka's lower body has been wrapped in roots!\
skillname ""
if %mylife=0 sub %stack,1:return *plants1_h4
if %kousan=2 sub %stack,1:return
gosub *face2
name "Alra Rooty"
if %first_sel1=1 skip 4
>Haha, unable to move?@
>It's time to tease your penis...\
skip 3
>Haha, unable to move?@
>You won't escape this time...!\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,2
if %earth=0 && %nanido=2 mov %genmogaku,3
if %earth=0 && %nanido=3 mov %genmogaku,4
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
sub %stack,1
return



*plants1_a5

add %stack,1
>Alra Rooty's roots are wrapped around Luka's lower body...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Your penis feels good, doesn't it?"
if %ransu=2 mov $sel1,"I'll make you come... Just like this!"
if %ransu=3 mov $sel1,"Shoot out lots of your seed!"
name "Alra Rooty"
eng $sel1:$sel6\
name ""
skillname "Rooty Draw"
lsp 700,":a;chara\a_looty_h2a.bmp",50,130:print 10,500
dwave 1,"se\ero_slime1.ogg"
>Alra Rooty's roots wrap around Luka's penis, and gently pump him!
skillcount2 3342
if %nanido<2 damage 40,45
if %nanido=2 damage 50,55
if %nanido=3 damage 60,65
skillname ""
if %mylife=0 sub %stack,1:return *plants1_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hehe, it looks like it feels good..."
if %ransu=2 mov $sel1,"Enjoying that so much... Aren't you pitiful?"
if %ransu=3 mov $sel1,"I'll enjoy watching your face as you orgasm..."
if %ransu=4 mov $sel1,"Hahaha, look at him squirm..."
if %ransu=5 mov $sel1,"Ah, I want to taste him too..."
name "Alra Arum"
eng $sel1:$sel6\
name ""
>Alra Rooty giggles at Luka.\
sub %stack,1
return



*plants1_a6

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My breasts will finish you..."
if %ransu=2 mov $sel1,"Just give up and surrender to this valley of mine..."
if %ransu=3 mov $sel1,"Hehe, it feels good doesn't it?"
name "Alra Arum"
eng $sel1:$sel6\
name ""
skillname "Arum Tit Fuck"
dwave 1,"se\ero_koki1.ogg"
>Alra Arum sandwiches Luka's penis between her breasts, and uses them to massage it!
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,25
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
if %wind=2 && %nanido<2 mov %wind_kakuritu,50
if %wind=2 && %nanido=2 mov %wind_kakuritu,40
if %wind=2 && %nanido=3 mov %wind_kakuritu,25
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3343
if %nanido<2 damage 35,40
if %nanido=2 damage 45,50
if %nanido=3 damage 55,60
skillname ""
if %mylife=0 sub %stack,1:return *plants1_h6
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*plants1_a7

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll get a good taste of your penis..."
if %ransu=2 mov $sel1,"Shoot your semen into my mouth..."
if %ransu=3 mov $sel1,"It will feel amazing once you shoot it inside my mouth..."
name "Alra Arum"
eng $sel1:$sel6\
name ""
skillname "Arum Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>Alra Arum sucks Luka's penis into her mouth, and runs her tongue all over!
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,25
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
if %wind=2 && %nanido<2 mov %wind_kakuritu,50
if %wind=2 && %nanido=2 mov %wind_kakuritu,40
if %wind=2 && %nanido=3 mov %wind_kakuritu,25
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3344
if %nanido<2 damage 40,45
if %nanido=2 damage 50,55
if %nanido=3 damage 60,65
skillname ""
if %mylife=0 sub %stack,1:return *plants1_h7
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*plants1_a8

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My flowers feel amazing..."
if %ransu=2 mov $sel1,"My flowers will make you quiver..."
if %ransu=3 mov $sel1,"Cover these flowers in your seed..."
name "Alra Arum"
eng $sel1:$sel6\
name ""
skillname "Lewd Flowers"
dwave 1,"se\ero_koki1.ogg"
eng "Alra Arum wraps Luka's penis in her flowers!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,25
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
if %wind=2 && %nanido<2 mov %wind_kakuritu,50
if %wind=2 && %nanido=2 mov %wind_kakuritu,40
if %wind=2 && %nanido=3 mov %wind_kakuritu,25
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>The soft flowers gently caress Luka's penis!
skillcount2 3345
if %nanido<2 damage 40,50
if %nanido=2 damage 50,60
if %nanido=3 damage 60,70
skillname ""
if %mylife=0 sub %stack,1:return *plants1_h8
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*plants1_a9

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name "Alra Arum"
>Hehe, I'll give you a hug...\
name ""
skillname "Monster Flower Hug"
dwave 1,"se\ero_makituki2.ogg"
eng "Alra Arum hugs Luka from behind, embracing him in her flowers!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>Luka is being embraced by Alra Arum!\
skillname ""
if %kousan=2 sub %stack,1:return
gosub *face2
name "Alra Arum"
if %first_sel2=1 skip 4
>I'll slowly suck out your semen...@
>Give in, and surrender to the pleasure...\
skip 3
>This time, I won't let you go...@
>Give in, and surrender to the pleasure...\
name ""
mov %first_sel2,1
if %earth=0 && %nanido<2 mov %genmogaku,1
if %earth=0 && %nanido=2 mov %genmogaku,2
if %earth=0 && %nanido=3 mov %genmogaku,3
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,1
sub %stack,1
return



*plants1_a10

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck you dry..."
if %ransu=2 mov $sel1,"Don't think of anything but the orgasm..."
if %ransu=3 mov $sel1,"Give yourself to my embrace..."
name "Alra Arum"
eng $sel1:$sel6\
name ""
skillname "Monster Flower Suck"
lsp 700,":a;chara\a_alm_h2a.bmp",200,0:print 10,500
dwave 1,"se\ero_chupa6.ogg"
>As Alra Arum sucks out Luka's energy, a sweet pleasure envelopes him!
skillcount2 3346
if %nanido<2 damage 40,50
if %nanido=2 damage 50,60
if %nanido=3 damage 60,70
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *plants1_h9
sub %stack,1
return



*plants1_onedaria

mov $list1,"Double Tit Fuck"
if %3339>0 mov %list_num1,1
mov $list2,"Double Blowjob"
if %3340>0 mov %list_num2,1
mov $list3,"Rooty Caress"
if %3341>0 mov %list_num3,1
mov $list4,"Rooty Draw"
if %3342>0 mov %list_num4,1
mov $list5,"Lewd Flowers"
if %3345>0 mov %list_num5,1
mov $list6,"Arum Tit Fuck"
if %3343>0 mov %list_num6,1
mov $list7,"Arum Blowjob"
if %3344>0 mov %list_num7,1
mov $list8,"Monster Flower Suck"
if %3346>0 mov %list_num8,1
gosub *cmd_onedari
if %cmd1=11 goto *plants1_onedari1
if %cmd1=12 goto *plants1_onedari2
if %cmd1=13 goto *plants1_onedari3
if %cmd1=14 goto *plants1_onedari4
if %cmd1=15 goto *plants1_onedari7
if %cmd1=16 goto *plants1_onedari5
if %cmd1=17 goto *plants1_onedari6
if %cmd1=18 goto *plants1_onedari8
if %cmd1=-1 goto *plants1_main
goto *plants1_onedaria



*plants1_onedarib

mov %list_num1,0
mov %list_num2,0
mov %list_num3,0
mov %list_num4,0
mov $list1,"Arum Tit Fuck"
if %3343>0 mov %list_num1,1
mov $list2,"Arum Blowjob"
if %3344>0 mov %list_num2,1
mov $list3,"Lewd Flowers"
if %3345>0 mov %list_num3,1
mov $list4,"Monster Flower Suck"
if %3346>0 mov %list_num4,1
mov $list5,""
mov $list6,""
mov $list7,""
mov $list8,""
gosub *cmd_onedari
if %cmd1=11 goto *plants1_onedari5
if %cmd1=12 goto *plants1_onedari6
if %cmd1=13 goto *plants1_onedari7
if %cmd1=14 goto *plants1_onedari8
if %cmd1=-1 goto *plants1_main
goto *plants1_onedarib



*plants1_onedari1

gosub *onedari_syori
name "Alra Rooty"
>You want to be finished between our breasts?\
name ""
name "Alra Arum"
>Then please enjoy it...\
name ""
gosub *plants1_a1
skip -1



*plants1_onedari2

gosub *onedari_syori
name "Alra Rooty"
>You want to be finished in our mouths?\
name ""
name "Alra Arum"
>Then please enjoy it...\
name ""
gosub *plants1_a2
skip -1



*plants1_onedari3

gosub *onedari_syori
name "Alra Rooty"
>You want to be finished by my roots?\
name ""
name "Alra Arum"
>I'll leave it to you then, Rooty.\
name ""
gosub *plants1_a3
skip -1



*plants1_onedari4

gosub *onedari_syori_k
name "Alra Rooty"
>You want to be finished by my roots?\
name ""
name "Alra Arum"
>I'll leave it to you then, Rooty.\
name ""
if %kousoku=0 gosub *plants1_a4
gosub *plants1_a5
skip -1



*plants1_onedari5

gosub *onedari_syori
name "Alra Arum"
>You want me to play with you with my breasts?\
name ""
if %sinkou=1 gosub *plants1_onedarix
gosub *plants1_a6
skip -1



*plants1_onedari6

gosub *onedari_syori
name "Alra Arum"
>You want me to play with you with my mouth?\
name ""
if %sinkou=1 gosub *plants1_onedarix
gosub *plants1_a7
skip -1



*plants1_onedari7

gosub *onedari_syori
name "Alra Arum"
>You want me to play with you with my flowers?\
name ""
if %sinkou=1 gosub *plants1_onedarix
gosub *plants1_a8
skip -1



*plants1_onedari8

gosub *onedari_syori_k
name "Alra Arum"
>Hehe... You want to be sucked dry by my flowers?\
name ""
if %sinkou=1 gosub *plants1_onedarix
if %kousoku=0 gosub *plants1_a9
gosub *plants1_a10
skip -1



*plants1_onedarix

name "Alra Rooty"
>I'm not interested in that...\
name ""
dwave 1,"se\escape.ogg"
csp 702
lsp 700,":a;chara\a_alm_st01.bmp",200,0:print 10,500
mov $name2,"Alra Arum"
mov $tatie1,"a_alm_st01"
mov $tatie2,"a_alm_st01"
mov $tatie3,"a_alm_st03"
mov $tatie4,"a_alm_h1a"
mov %monster_x,200
mov %monster_y,0
mov $half_s1,"Hehe, does it feel good?"
mov $half_s2,"I'll take care of you until you come..."
mov $kiki_s1,"It looks like you're almost at your limit..."
mov $kiki_s2,"I'll finish you, just like you begged for..."
mov %sinkou,2:mov %tekikazu,1
mov %zmonster_x,-100
return



*plants1_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\a_alm_bk02.bmp",380,0
lsp 691,":a;chara\a_looty_bk01.bmp",50,130
gosub *syasei2
>Stuck between both of their breasts, Luka finally climaxes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2646,%2646+1:if %2646=1 mov %count_koenemy,%count_koenemy+1
if %2646>%count_most mov %count_most,%2646:mov $count_mostname,$name
count 7,4
mov $bad1,"Luka succumbed to their double tit fuck."
gosub *face2
name "Alra Rooty"
>Ahaha, he came!\
name ""
name "Alra Arum"
>Hehe, you came so much...@
>Our breasts are covered in semen...\
name ""
goto *plants1_ha



*plants1_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\a_alm_bk04.bmp",380,0
lsp 693,":a;chara\a_looty_bk03.bmp",50,130
gosub *syasei2
>With both of their mouths quickly alternating sucking in Luka's penis, he orgasms, covering their mouths with semen.\
mov %viclose,1:gosub *lose
mov %2646,%2646+1:if %2646=1 mov %count_koenemy,%count_koenemy+1
if %2646>%count_most mov %count_most,%2646:mov $count_mostname,$name
count 4,4
mov $bad1,"Luka succumbed to their double blowjob."
gosub *face2
name "Alra Rooty"
>Ahaha, he came!\
name ""
name "Alra Arum"
>Hehe, you came so much...@
>I wasn't able to taste it all though...\
name ""
goto *plants1_ha



*plants1_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\a_looty_bk02.bmp",50,130
gosub *syasei2
>With Alra Rooty's roots rubbing all over Luka's body, he finally comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2646,%2646+1:if %2646=1 mov %count_koenemy,%count_koenemy+1
if %2646>%count_most mov %count_most,%2646:mov $count_mostname,$name
count 12,4
mov $bad1,"Luka succumbed to Alra Rooty's caress."
gosub *face2
name "Alra Rooty"
>Ah, I can absorb your semen through my roots!\
name ""
name "Alra Arum"
>Aww... You got all of it...\
name ""
goto *plants1_ha



*plants1_h4

mov %ikigoe,3:gosub *ikigoe
name "Alra Rooty"
>Eh...?@> Already coming?\
name ""
gosub *syasei1
lsp 700,":a;chara\a_looty_h3a.bmp",50,130
gosub *syasei2
>As the tentacle like roots wrap around his body, Luka climaxes, accidentally covering them with semen.\
mov %viclose,1:gosub *lose
mov %2646,%2646+1:if %2646=1 mov %count_koenemy,%count_koenemy+1
if %2646>%count_most mov %count_most,%2646:mov $count_mostname,$name
count 12,4
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka accidentally orgasms while being wrapped by Alra Rooty's roots."
gosub *face2
name "Alra Rooty"
>Already coming...?@> You must be a premature ejaculator!\
name ""
name "Alra Arum"
>Hehe... He couldn't even stand that?@
>What a pathetic human...\
name ""
goto *plants1_ha



*plants1_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\a_looty_h3a.bmp",50,130
gosub *syasei2
>As her roots wrap around his penis, Luka finally gives in, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2646,%2646+1:if %2646=1 mov %count_koenemy,%count_koenemy+1
if %2646>%count_most mov %count_most,%2646:mov $count_mostname,$name
count 12,4
mov $bad1,"Luka succumbed to Alra Rooty's roots."
gosub *face2
name "Alra Rooty"
>Ah, my roots drew out his semen!\
name ""
name "Alra Arum"
>Aha... The face you made when you ejaculated was funny.\
name ""
goto *plants1_ha



*plants1_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\a_alm_bk02.bmp",200,0
gosub *syasei2
>Crushed between her soft breasts, Luka finally gives in, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2581,%2581+1:if %2581=1 mov %count_koenemy,%count_koenemy+1
if %2581>%count_most mov %count_most,%2581:mov $count_mostname,$name
count 7,3
mov $bad1,"Luka succumbed to Alra Arum's tit fuck."
gosub *face2
name "Alra Arum"
>You got my breasts so covered in semen...@
>It must have felt good, hehe...\
name ""
goto *plants1_hb



*plants1_h7

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\a_alm_bk04.bmp",200,0
gosub *syasei2
>Licked all over inside her mouth, Luka comes, filling Alra Arum's mouth with semen.\
mov %viclose,1:gosub *lose
mov %2581,%2581+1:if %2581=1 mov %count_koenemy,%count_koenemy+1
if %2581>%count_most mov %count_most,%2581:mov $count_mostname,$name
count 4,3
mov $bad1,"Luka succumbed to Alra Arum's blowjob."
gosub *face2
name "Alra Arum"
>My face is all covered in semen...@
>It must have felt good, hehe...\
name ""
goto *plants1_hb



*plants1_h8

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
if %sinkou=1 lsp 693,":a;chara\a_alm_bk03.bmp",380,0
if %sinkou=2 lsp 693,":a;chara\a_alm_bk03.bmp",200,0
gosub *syasei2
>Unable to take the soft petals of her flowers, Luka gives in, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2581,%2581+1:if %2581=1 mov %count_koenemy,%count_koenemy+1
if %2581>%count_most mov %count_most,%2581:mov $count_mostname,$name
count 12,3
mov $bad1,"Luka succumbed to Alra Arum's flowers."
gosub *face2
name "Alra Arum"
>You got my flowers all covered in semen...@
>It must have felt good, hehe...\
name ""
goto *plants1_hb



*plants1_h9

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\a_alm_h3a.bmp",200,0
gosub *syasei2
>As Alra Arum draws out Luka's energy, he shivers in ecstasy as he's forced to orgasm.\
mov %viclose,1:gosub *lose
mov %2581,%2581+1:if %2581=1 mov %count_koenemy,%count_koenemy+1
if %2581>%count_most mov %count_most,%2581:mov $count_mostname,$name
count 12,3
mov $bad1,"Luka succumbed to Alra Arum's flowers."
gosub *face2
name "Alra Arum"
>Hehe... That's just the first one...\
name ""
goto *plants1_hb



*plants1_ha

mov $name,"Alra Rooty"
mov $bad2,"Alra Rooty sucked Luka's semen until his death."
if %2646=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
if %kousoku>0 cspl 690,702:lsp 700,":a;chara\a_looty_h1.bmp",220,130:print 10,500:goto *plants1_ha2
dwave 1,"se\ero_makituki3.ogg"
cspl 690,702
lsp 700,":a;chara\a_looty_h1.bmp",220,130:print 10,500
>Exhausted and unable to resist, Alra Rooty's roots wrap around my lower body.@
>As if her roots were tentacles, they entangle my lower body.\
goto *plants1_ha2



*plants1_ha2

name $name
>Unlike Arum, I'm not very kind...@
>Until you're dry, I'll suck out all of your nutrients.\
>These roots will absorb everything...\
name ""
>A strange feeling starts to fill me where her roots are wrapped around my body.\
>As if my energy itself is draining out of my body through her roots, my lower body is slowly losing what strength was left in it.\
name "Luka"
>Ahhh... What is this...?\
name ""
name $name
>I just said it...@
>I'm going to suck out all of your nutrients, until you're shriveled and dry.\
name ""
name "Luka"
>Haaa...\
name ""
>The sucking stimulation covers the entire lower half of my body.@
>The sense of release makes it feel like a constant, slow ejaculation is happening all over my lower body.\
>The powerful stimulation from this bizarre release makes my penis erect again.\
name $name
>Hahaha, erect?@
>Then allow me to suck more nutrients from this pitiful penis...\
name ""
mov %hseanwave,21:hseanwave
lsp 700,":a;chara\a_looty_h2.bmp",220,130:print 10,500
>Her roots grow, and quickly entangle my penis.@
>Before I can even react, they're already completely wrapped around me.\
>As soon as they stop moving, the powerful sucking stimulation explodes in my groin area.@
>I let out a yell as the sudden pleasure stuns me.\
name "Luka"
>Ahhhh!\
name ""
name $name
>This penis wanted to mate with a girl, didn't it...?@
>It wanted to go inside the warm pussy of a girl you cared for, creating a child and a family...\
>Haha... But it never will!@
>Because I'm going to suck out everything!\
name ""
>The roots around my penis start to stroke it up and down, as if they were simply playing with it.\
>At the same time, the roots continue to suck the energy out through it, making it feel like me penis is stuck in a constant state of ejaculation.\
name $name
>There are some guys who even come while being sucked dry...@
>To think there are guys who could have an orgasm while being slowly killed... How pathetic.\
name "Luka"
>Ah, no... It feels too good...@
>I'm going to come...\
name ""
>Despite my feeble resisting, the stimulation from her roots sucking my energy is too much to take.@
>I feel a climax building in me, unable to be stopped.\
>Already swimming in ecstasy from the endless feeling of release from her roots, the new desire for release feels like it's going to break my body.\
name $name
>Ahaha, are you really going to come?@
>Does having your life sucked from you really make you feel that good?\
>Then do it, you pitiful boy.@
>I'll suck everything from you, and make it my food.\
name ""
>Her roots tighten around me as she laughs, forcing me to another height of pleasure.\
name "Luka"
>Ahh... I'm coming!@
>Ahhhhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\a_looty_h3.bmp",220,130
gosub *syasei2
>With a loud moan, I'm forced to an orgasm, and shoot semen out all over her roots.\
name $name
>Hahaha, you came...@
>You're really pathetic...\
name ""
name "Luka"
>Ahhh...\
name ""
>Already overwhelmed by the feeling of release from her roots, the additional orgasm almost makes me faint.\
>Instantly overcome by almost total exhaustion from the combined pleasure, I give myself over to the pleasure filling my lower body.\
name "Luka"
>Haaa... Incredible...\
name ""
name $name
>Hahaha, already fallen?@
>Having your nutrients sucked out is the most amazing feeling in the world, isn't it?\
>Here... I'll make it feel even better, and see you off to heaven...\
name ""
mov %hseanwave,22:hseanwave
lsp 700,":a;chara\a_looty_h4.bmp",220,130:print 10,500
>Her roots grown even longer, and entangle the rest of my body.@
>As the roots touch more of my body, that ecstasy of release takes over even more of my being.\
name "Luka"
>Ahhh...\
name ""
name $name
>Hehe, you're going to be sucked dry soon...@
>Hey, how does it feel...?\
name ""
name "Luka"
>G...Good...\
name ""
name $name
>Ahaha, I see... So you're happy.@
>How pitiful, hahaha!\
>You'll get to die with a smile on your face!\
name ""
name "Luka"
>Haaa...\
name ""
>With the roots around my entire body, I drown in the ecstasy given to me.@
>Overcome with pleasure, I don't even attempt to resist any longer.\
>With my mind and body both broken, I enjoy the last feelings of pleasure as I get weaker and weaker.\
name $name
>I'll suck even more...@
>You'll be dry in no time...\
name ""
name "Luka"
>Ah...aa...\
name ""
>Wrapped in the sweet feeling of ecstasy, I start to slowly lose consciousness.@
>My entire being is sucked out through her roots, until even my consciousness is taken from me.\
gosub *anten
mov %hseanwave,0:hseanwave
name $name
>Ahaha, he's all dry and shriveled.@
>That was the last drop.\
name ""
>Alra Rooty takes away her roots, leaving Luka's shriveled body on the hive's floor.@
>With his purpose already fulfilled, his body is left there.\
>Thus, another young man was made into simple prey...\
>............\
goto *badend



*plants1_hb

mov $name,"Alra Arum"
mov $bad2,"Just like that, Alra Arum sucks out Luka's semen endlessly..."
mov $tatie2,"a_alm_st01"
mov %zmonster_x,-100
mov %monster_y,0
if %2581=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahhh...\
name ""
if %kousoku>0 goto *plants1_hb2
name $name
>Now then, I'll embrace you...@
>My embrace will wrap you in heaven...\
name ""
dwave 1,"se\ero_makituki2.ogg"
cspl 690,702
lsp 700,":a;chara\a_alm_h1.bmp",200,0:print 10,500
>Alra Arum wraps her petals around me, forcing me tight against her body.@
>At the same time, her soft flowers wrap around me.\
name "Luka"
>Ahh...\
name ""
goto *plants1_hb2



*plants1_hb2

>A warm liquid seeps out of her flowers onto me, soothing my skin.@
>In addition, the soft petals touching my body gently wriggle, as if they were alive.\
>Tightly embraced in her warm hug, I feebly writhe around.\
name $name
>No man can endure my embrace for longer than a minute...@
>Relish the pleasure only I can bring...\
name ""
name "Luka"
>Ah... Ahhhh...\
name ""
mov %hseanwave,21:hseanwave
lsp 690,":a;chara\a_alm_ct01.bmp",480,0
lsp 700,":a;chara\a_alm_h2.bmp",200,0:print 10,500
>Among the flowers, countless ivy vines extend from her body, and start to caress my lower body.@
>They slowly work up my body, until they reach my groin.\
>Gently winding around my penis, they tighten around it as they also start to wrap around my balls.\
name "Luka"
>Ah!@>Ahhh!\
name ""
>The sudden powerful stimulation almost forces me to ejaculate in an instant.@
>Firmly held in her embrace and unable to move, all I can do is grit my teeth and try to endure the rising orgasm.\
name $name
>...Hehe, there's no need to hold back.@
>No man has managed to resist the pleasure of my embrace.\
>You, too, will surrender to these flowers of mine...\
name ""
name "Luka"
>Ahhh...!\
name ""
>The soft ivy continues to entangle my penis, gently brushing against my sensitive tip.@
>Beaten down by this powerful stimulation, my feeble resistance is quickly chipped away.\
>I want the release...@
>I want her to embrace me as I orgasm...\
>Those desires start to well up inside me as my body begins crushing my mental resistance.\
name $name
>Hehe... It looks like you're breaking.@
>Do what all men do, and just surrender...\
name ""
name "Luka"
>Ahhh... No... No more...\
name ""
>The ivy massages and gently coaxes me toward an orgasm.@
>Unable to endure it any longer, I stop resisting and thrust my hips toward her as the climax wracks my body.\
gosub *syasei1
lsp 690,":a;chara\a_alm_ct02.bmp",480,0
lsp 700,":a;chara\a_alm_h3.bmp",200,0
gosub *syasei2
>With each twitch of my penis in ejaculation, her flowers wrap around the tip and take turns sucking out the semen as I shoot it.\
name "Luka"
>Haaaa... Amazing...\
name ""
>I tremble in pleasure as her flowers continue to take turns sucking me to the last drop.\
lsp 690,":a;chara\a_alm_ct03.bmp",480,0:print 10,500
name $name
>Hehe... It was good, wasn't it?@
>Having a powerful orgasm while being tightly embraced...\
>With that, your heart and body are both mine...@
>I'll cherish you forever, so just relax and enjoy my embrace...\
name ""
name "Luka"
>Ahhh...\
name ""
>I relax my muscles, as I allow her embrace to tighten around me, pulling me even closer to her soft body.\
gosub *anten
mov %hseanwave,0:hseanwave
>After that, I was kept as her semen slave.@
>Tightly embraced in her soft flowers, I'm sucked dry every day.\
>But I don't think about the humiliating or pathetic position I'm in...@
>As long as I get to immerse myself in the pleasure, it doesn't matter...\
>.............\
goto *badend



*plants2_start

mov $name,"Alraune Girls"
mov $name2,"Alra Vore"
mov $lavel,"plants2"
mov $tatie1,"a_vore_st01"
mov $tatie2,"a_vore_st02"
mov $tatie3,"a_vore_st03"
mov $tatie4,"a_vore_h2a"
mov $haikei,"bg094"
mov %monster_x,180
mov %monster_y,130
mov $tatie1b,"a_parasol_st01"
mov $tatie2b,"a_parasol_st02"
mov $tatie3b,"a_parasol_st03"
mov %monster_xb,470
mov %monster_yb,30
mov $tatie1c,"a_prison_st01"
mov $tatie2c,"a_prison_st02"
mov $tatie3c,"a_prison_st03"
mov %monster_xc,-60
mov %monster_yc,70
if %nanido=1 mov %max_enemylife,3300
if %nanido=2 mov %max_enemylife,3600
if %nanido=3 mov %max_enemylife,4400
if %nanido=0 mov %max_enemylife,3
if %nanido=1 mov %henkahp1,2000
if %nanido=2 mov %henkahp1,2200
if %nanido=3 mov %henkahp1,2800
if %nanido=0 mov %henkahp1,2
if %nanido=1 mov %henkahp2,1000
if %nanido=2 mov %henkahp2,1100
if %nanido=3 mov %henkahp2,1400
if %nanido=0 mov %henkahp2,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,20
if %nanido=3 mov %earth_keigen,10
mov %music,7
mov %tikei,2
gosub *maxmp:mov %mp,%max_mp
mov %tekikazu,3
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free of the ivy!"
mov $mogaku_anno2,"Luka broke out of the ivy!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"It's fun to swallow struggling prey..."
mov $mogaku_sel2,"Hahaha, pointless!"
mov $mogaku_sel3,"Everything struggles... But I still swallow them."
mov $mogaku_sel4,"Hahaha, you won't escape!"
mov $mogaku_sel5,"Do you dislike the thought of being eaten that much? Hahaha."
mov $mogaku_dassyutu1,"After I took so much trouble to swallow you whole..."
mov $mogaku_dassyutu2,""
mov $mogaku_earth_dassyutu1,"What is this power!?"
mov $mogaku_earth_dassyutu2,""
mov $half_s1,"Hahaha, are you feeling good?"
mov $half_s2,""
mov $kiki_s1,"You're almost done."
mov $kiki_s2,"All that's left is to eat you..."
mov %end_n,6
mov %exp_minus,34000
mov %zmonster_x,-120
mov %tukix,340
mov %tekikazu,3
mov %owaza_count1a,5
name "Luka"
>Stop!@
>If you continue to attack them, I'll be your opponent!\
name ""
name "Alra Vore"
>Arara...?@
>Aren't you our ally?\
name ""
name "Alra Parasol"
>Did you betray us?@
>What kind of traitor switches to the side that already lost...?\
name ""
name "Alra Prison"
>We must punish traitors.@
>I'll lock you in my flower and suck you dry.\
name ""
name "Luka"
>You all are the betrayers!\
>Didn't you all not want to fight!?@> Isn't that what your leader told me!?\
>How could you tyrannize the losing side like this!?\
name ""
>Outnumbered three to one, I point my sword at the three plant monsters.\
mov %sinkou,1
goto *common_main



*plants2001

gosub *face3
name "Alra Vore"
>This human...!@> So... Strong...!\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Alra Vore turns into a normal plant!\
csp 704
lsp 700,":a;chara\a_parasol_st01.bmp",420,30
lsp 702,":a;chara\a_prison_st01.bmp",0,70:print 10,500
mov $name2,"Alra Parasol"
mov $tatie1,"a_parasol_st01"
mov $tatie2,"a_parasol_st02"
mov $tatie3,"a_parasol_st03"
mov $tatie4,"a_parasol_h1a"
mov %monster_x,420
mov %monster_y,30
mov $tatie1b,"a_prison_st01"
mov $tatie2b,"a_prison_st01"
mov $tatie3b,"a_prison_st01"
mov %monster_xb,0
mov %monster_yb,70
mov $half_s1,"Hehe, it feels good doesn't it...?"
mov $half_s2,"Now, join my seedbed.."
mov $kiki_s1,"Are you ready now?"
mov $kiki_s2,"Your body will join my seedbed..."
mov %sel_hphalf,0
mov %sel_kiki,0
mov %first_sel1,0
mov %first_sel2,0
mov %first_sel3,0
mov %tekikazu,2
mov %zmonster_x,-50
mov %tukix,500
mov %owaza_count3a,5
name "Alra Parasol"
>He's stronger than I thought...\
name ""
name "Alra Prison"
>Yes, he's quite strong.\
name ""
name "Alra Parasol"
>A human like you will make a fine seedbed.\
name ""
mov %sinkou,2
goto *plants2_a



*plants2002

gosub *face3
name "Alra Parasol"
>It can't be...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Alra Parasol turns into a normal mushroom!\
csp 702
lsp 700,":a;chara\a_prison_st01.bmp",160,70:print 10,500
mov $name2,"Alra Prison"
mov $tatie1,"a_prison_st01"
mov $tatie2,"a_prison_st02"
mov $tatie3,"a_prison_st03"
mov $tatie4,"a_prison_h1"
mov %monster_x,160
mov %monster_y,70
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Useless... You can't escape from my prison."
mov $mogaku_sel2,"Useless... You can't escape from my prison."
mov $mogaku_sel3,"Useless... You can't escape from my prison."
mov $mogaku_sel4,"Hehe... There's no escape from me."
mov $mogaku_sel5,"Hehe... There's no escape from me."
mov $mogaku_earth_dassyutu1,"Why run...?"
mov $mogaku_earth_dassyutu2,"If you just relax a little, you can enter heaven..."
mov $half_s1,"It feels good, doesn't it...?"
mov $half_s2,"Let me suck you like this..."
mov $kiki_s1,"I'll suck out all your semen."
mov $kiki_s2,"Down to the very last drop..."
mov %sel_hphalf,0
mov %sel_kiki,0
mov %first_sel1,0
mov %first_sel2,0
mov %first_sel3,0
mov %tekikazu,1
mov %zmonster_x,-70
mov %tukix,280
mov %owaza_count1a,5
mov %hanyo6,0
name "Alra Prison"
>How dare you!?\
name ""
mov %sinkou,3
goto *plants2_a



*plants2_v

gosub *face3
if %sinkou=3 skip 4
name "Alra Parasol"
>It can't be... Me too!?\
name ""
name "Alra Prison"
>What power...!\
name ""
dwave 1,"se\syometu.ogg"
cspl 700,704:print 99,4500,"system\breakup.dll/urb"
if %sinkou=3 skip 2
>Alra Parasol turns into a mushroom!\
>Alra Prison turns into a large flower!\
mov %viclose,1:gosub *victory_plural
mov %getexp,5000:gosub *lvup
mov %2282,1
goto *sean0188



*plants2_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
if %sinkou>1 skip 4
name "Alra Vore"
>Ahaha, already giving up?\
name ""
if %sinkou=3 skip 4
name "Alra Parasol"
>How pathetic... Hehe.\
name ""
name "Alra Prison"
>Time to bully him.\
name ""
goto *plants2_a



*plants2_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *plants2_kousan
if %cmd1=16 && %sinkou=1 goto *plants2_onedaria
if %cmd1=16 && %sinkou=2 goto *plants2_onedarib
if %cmd1=16 && %sinkou=3 goto *plants2_onedaric
if %cmd1=17 goto *common_skill
goto *plants2_main



*plants2_a

if %enemylife<%henkahp1 && %sinkou=1 goto *plants2001
if %enemylife<%henkahp2 && %sinkou=2 goto *plants2002
if %hanyo6=1 && %bougyo=1 gosub *plants2_a11:gosub *plants2_a8:goto *common_main
if %hanyo6=1 && %bougyo=0 gosub *plants2_a12:goto *common_main
if %sinkou=1 && %kousoku=1 gosub *plants2_a5:goto *common_main
if %sinkou=3 && %kousoku=1 gosub *plants2_a15:goto *common_main
rnd2 %ransu,1,12
if %sinkou=1 && %ransu<4 gosub *plants2_a1:gosub *plants2_a2:goto *common_main
if %sinkou=1 && %ransu<7 gosub *plants2_a1:gosub *plants2_a3:goto *common_main
if %sinkou=1 && %ransu>6 && %owaza_count1a>6 gosub *plants2_a4:goto *common_main
if %sinkou=2 && %ransu<3 gosub *plants2_a2:goto *common_main
if %sinkou=2 && %ransu<5 gosub *plants2_a3:goto *common_main
if %sinkou=2 && %ransu=5 gosub *plants2_a6:gosub *plants2_a8:goto *common_main
if %sinkou=2 && %ransu=6 gosub *plants2_a6:gosub *plants2_a9:goto *common_main
if %sinkou=2 && %ransu=7 gosub *plants2_a7:gosub *plants2_a8:goto *common_main
if %sinkou=2 && %ransu=8 gosub *plants2_a7:gosub *plants2_a9:goto *common_main
if %sinkou=2 && %ransu<11 && %owaza_count3a>6 gosub *plants2_a10:gosub *plants2_a8:goto *common_main
if %sinkou=2 && %ransu>10 && %owaza_count3a>6 gosub *plants2_a10:gosub *plants2_a9:goto *common_main
if %sinkou=3 && %ransu<4 gosub *plants2_a8:goto *common_main
if %sinkou=3 && %ransu<7 gosub *plants2_a9:goto *common_main
if %sinkou=3 && %ransu>6 && %owaza_count1a>6 gosub *plants2_a14:goto *common_main
skip -15



*plants2_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hahaha, I'll suck out your semen!"
if %ransu=2 mov $sel1,"Here... This feels good, doesn't it?"
if %ransu=3 mov $sel1,"I'll suck nice and slow..."
name "Alra Vore"
eng $sel1:$sel6\
name ""
skillname "Plant Suck"
dwave 1,"se\ero_syokusyu1.ogg"
>Alra Vore's ivy sucks in Luka's penis, and violently sucks on it!
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,25
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
if %wind=2 && %nanido<2 mov %wind_kakuritu,50
if %wind=2 && %nanido=2 mov %wind_kakuritu,50
if %wind=2 && %nanido=3 mov %wind_kakuritu,25
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3347
if %nanido<2 damage 35,45
if %nanido=2 damage 40,50
if %nanido=3 damage 45,55
skillname ""
if %mylife=0 sub %stack,1:return *plants2_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*plants2_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"We'll suck on it...":mov $sel2,"Give us both a good taste..."
if %ransu=2 mov $sel1,"Let out your semen in my mouth...":mov $sel2,"We'll drink it all down..."
if %ransu=3 mov $sel1,"Hehe, it feels good doesn't it?":mov $sel2,"Let it out, we'll catch it."
name "Alra Parasol"
eng $sel1:$sel6\
name ""
name "Alra Prison"
eng $sel2:$sel6\
name ""
skillname "Double Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>The two Alraunes suck Luka's penis together!
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,25
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
if %wind=2 && %nanido<2 mov %wind_kakuritu,50
if %wind=2 && %nanido=2 mov %wind_kakuritu,50
if %wind=2 && %nanido=3 mov %wind_kakuritu,25
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3349
mov %damage_nobr,1
if %nanido<2 damage 30,40
if %nanido=2 damage 35,45
if %nanido=3 damage 40,50
if %nanido<2 damage 30,40
if %nanido=2 damage 35,45
if %nanido=3 damage 40,50
skillname ""
if %mylife=0 sub %stack,1:return *plants2_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*plants2_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll crush you between these...":mov $sel2,"Fill this valley with your semen..."
if %ransu=2 mov $sel1,"Our breasts are nice and soft, aren't they?":mov $sel2,"Have a taste..."
if %ransu=3 mov $sel1,"Come between us...":mov $sel2,"Come as much as you want..."
name "Alra Parasol"
eng $sel1:$sel6\
name ""
name "Alra Prison"
eng $sel2:$sel6\
name ""
skillname "Double Tit Fuck"
dwave 1,"se\ero_koki1.ogg"
>The two Alraunes crush Luka's penis between their breasts!
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,25
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
if %wind=2 && %nanido<2 mov %wind_kakuritu,50
if %wind=2 && %nanido=2 mov %wind_kakuritu,50
if %wind=2 && %nanido=3 mov %wind_kakuritu,25
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3350
mov %damage_nobr,1
if %nanido<2 damage 35,45
if %nanido=2 damage 40,50
if %nanido=3 damage 45,55
if %nanido<2 damage 35,45
if %nanido=2 damage 40,50
if %nanido=3 damage 45,55
skillname ""
if %mylife=0 sub %stack,1:return *plants2_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*plants2_a4

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name "Alra Vore"
>I'll devour you whole!\
name ""
skillname "Plant Vore"
dwave 1,"se\ero_makituki2.ogg"
>Alra Vore's ivy sucks in Luka's body!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
if %nanido<2 damage 40,50
if %nanido=2 damage 40,50
if %nanido=3 damage 60,70
mov %kousoku,1:gosub *status_print
>Alra Vore's ivy sucks on Luka's body!\
skillname ""
if %mylife=0 sub %stack,1:return *plants2_h4
if %kousan=2 sub %stack,1:return
gosub *face2
name "Alra Vore"
if %first_sel1=1 skip 4
>I'll swallow you whole...@
>But before that, I need to tease you until you're exhausted...\
skip 3
>This time, I'll swallow you whole.@
>But before that, I need to tease you until you're exhausted...\
name ""
if %first_sel1=1 skip 8
name "Alra Parasol"
>Ara, that looks like it feels good.@
>That child is very powerful, so I'm sure he will taste amazing.\
name ""
name "Alra Prison"
>I'll watch as you eat him, hehe.\
name ""
>The other two Alraunes giggle.\
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,1
if %earth=0 && %nanido=2 mov %genmogaku,2
if %earth=0 && %nanido=3 mov %genmogaku,3
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,1
sub %stack,1
return



*plants2_a5

add %stack,1
>Luka's body is being sucked by Alra Vore...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I like to play with my food...":mov $sel2,"The ivy wriggles, stimulating Luka!"
if %ransu=2 mov $sel1,"It's just that easy...":mov $sel2,"The inside of the ivy squirms, stimulating Luka!"
if %ransu=3 mov $sel1,"Hahaha... Teasing prey is fun.":mov $sel2,"The ivy gradually narrows, tightening around Luka!"
if %ransu=4 mov $sel1,"It feels good, doesn't it? Hahaha.":mov $sel2,"A strange wave motion goes through the ivy, stimulating Luka!"
if %ransu=5 mov $sel1,"Just like this, I can swallow you whole...":mov $sel2,"The ivy squeezes and loosens on Luka, as if chewing him!"
name "Alra Vore"
eng $sel1:$sel6\
name ""
skillname "Plant Vore"
dwave 1,"se\ero_makituki2.ogg"
eng $sel2:$sel6
skillcount2 3348
if %nanido<2 damage 40,50
if %nanido=2 damage 40,50
if %nanido=3 damage 60,70
skillname ""
if %mylife=0 sub %stack,1:return *plants2_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hehe... He looks like he's going to come.":mov $sel2,"Hehe, milking him before you eat him."
if %ransu=2 mov $sel1,"Arara, that looks like it feels good.":mov $sel2,"You shouldn't play with your food! Hehe."
if %ransu=3 mov $sel1,"You should just swallow him right now... Hehe.":mov $sel2,"Being swallowed whole like that... Hehe."
name "Alra Parasol"
eng $sel1:$sel6\
name ""
name "Alra Prison"
eng $sel2:$sel6\
name ""
sub %stack,1
return



*plants2_a6

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Enjoy my hands..."
if %ransu=2 mov $sel1,"If I squeeze it like this, will you come?"
if %ransu=3 mov $sel1,"My hands are much softer than any humans..."
name "Alra Parasol"
eng $sel1:$sel6\
name ""
skillname "Sweet Hand"
dwave 1,"se\ero_koki1.ogg"
>Alra Parasol grabs Luka's penis with her soft hand, and plays with it!
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,25
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
if %wind=2 && %nanido<2 mov %wind_kakuritu,50
if %wind=2 && %nanido=2 mov %wind_kakuritu,50
if %wind=2 && %nanido=3 mov %wind_kakuritu,25
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3351
if %nanido<2 damage 30,40
if %nanido=2 damage 35,45
if %nanido=3 damage 40,50
skillname ""
if %mylife=0 sub %stack,1:return *plants2_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*plants2_a7

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Ara, coming all over a girl's skirt..."
if %ransu=2 mov $sel1,"Here, I can even do this..."
if %ransu=3 mov $sel1,"I can even use my skirt to do this..."
name "Alra Parasol"
eng $sel1:$sel6\
name ""
skillname "Fungal Skirt"
dwave 1,"se\ero_makituki1.ogg"
>Alra Parasol's skirt comes alive, and wraps around Luka's penis!
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,25
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
if %wind=2 && %nanido<2 mov %wind_kakuritu,50
if %wind=2 && %nanido=2 mov %wind_kakuritu,50
if %wind=2 && %nanido=3 mov %wind_kakuritu,25
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3352
if %nanido<2 damage 35,45
if %nanido=2 damage 40,50
if %nanido=3 damage 45,55
skillname ""
if %mylife=0 sub %stack,1:return *plants2_h6
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*plants2_a8

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Haha... I'll step on your most important place."
if %ransu=2 mov $sel1,"I'll use my foot, so be thankful!"
if %ransu=3 mov $sel1,"I wonder if your penis wants to be stepped on?"
name "Alra Prison"
eng $sel1:$sel6\
name ""
skillname "Flower Footjob"
dwave 1,"se\ero_koki1.ogg"
>Alra Prison steps on Luka's penis!
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,25
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
if %wind=2 && %nanido<2 mov %wind_kakuritu,50
if %wind=2 && %nanido=2 mov %wind_kakuritu,50
if %wind=2 && %nanido=3 mov %wind_kakuritu,25
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3354
if %nanido<2 damage 30,40
if %nanido=2 damage 35,45
if %nanido=3 damage 40,50
skillname ""
if %mylife=0 sub %stack,1:return *plants2_h7
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*plants2_a9

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Coat my thighs in semen..."
if %ransu=2 mov $sel1,"Here... A plant's thighs are nice and soft..."
if %ransu=3 mov $sel1,"I'll hold your thing between my thighs..."
name "Alra Prison"
eng $sel1:$sel6\
name ""
skillname "Flower Intercrural"
dwave 1,"se\ero_koki1.ogg"
>Alra Prison clasps Luka's penis between her thighs, and slowly squeezes!
if %wind=1 && %nanido<2 mov %wind_kakuritu,30
if %wind=1 && %nanido=2 mov %wind_kakuritu,25
if %wind=1 && %nanido=3 mov %wind_kakuritu,15
if %wind=2 && %nanido<2 mov %wind_kakuritu,50
if %wind=2 && %nanido=2 mov %wind_kakuritu,50
if %wind=2 && %nanido=3 mov %wind_kakuritu,25
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3355
if %nanido<2 damage 35,45
if %nanido=2 damage 40,50
if %nanido=3 damage 45,55
skillname ""
if %mylife=0 sub %stack,1:return *plants2_h8
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*plants2_a10

add %stack,1
name "Alra Parasol"
>Hehe... How about a friendly embrace?\
name ""
skillname "Seedbed Embrace Preparation"
>Alra Parasol seductively giggles!\
skillname ""
name "Alra Parasol"
>Now, come here.@
>Join my seedbed.\
name ""
mov %hanyo6,1
sub %stack,1
return



*plants2_a11

add %stack,1
mov %hanyo6,0
name "Alra Parasol"
>Now, let's embrace.\
name ""
skillname "Seedbed Embrace"
>Alra Parasol hugs Luka!
delay 1000
dwave 1,"se\miss.ogg"
>But Luka dodges!\
skillname ""
name "Alra Parasol"
>Ara... How boring.@
>Don't you wish to embrace me?\
name ""
mov %owaza_count3a,0
sub %stack,1
return



*plants2_a12

add %stack,1
mov %hanyo6,0
if %kousan=2 skip 4
name "Alra Parasol"
>Now, let's embrace.\
name ""
skillname "Seedbed Embrace"
dwave 1,"se\ero_makituki3.ogg"
>Alra Parasol hugs Luka!@
>Luka is tightly held against her soft mushroom body!
skillcount2 3353
mov %damage_kotei,1
damage 80,100
mov %kousoku,1:gosub *status_print
>Luka is being tightly bound by Alra Parasol!\
skillname ""
if %mylife=0 sub %stack,1:return *plants2_h9
name "Luka"
>Ahhh...\
name ""
name "Alra Parasol"
>Hehe... My embrace feels incredible, doesn't it?@
>I'll make you a part of me...\
name ""
name "Alra Prison"
>Made into a seedbed... Pathetic.\
name ""
sub %stack,1
goto *plants2_a13



*plants2_a13

add %stack,1
>Luka's body is slowly being assimilated into Alra Parasol...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Join my seedbed...":mov $sel2,"Her soft body rubs against Luka's penis!"
if %ransu=2 mov $sel1,"If you come like this, it will feel amazing...":mov $sel2,"Her soft body wraps around Luka's penis!"
if %ransu=3 mov $sel1,"Now ejaculate...":mov $sel2,"The softness around Luka's penis squeezes around him!"
if %ransu=4 mov $sel1,"Spray out your sperm, and fertilize my seedbed...":mov $sel2,"Her soft mushroom body rubs against Luka's penis!"
if %ransu=5 mov $sel1,"Does it feel good? It's fine to come...":mov $sel2,"Her soft body vibrates against Luka's balls!"
name "Alra Parasol"
eng $sel1:$sel6\
name ""
skillname "Seedbed Embrace"
dwave 1,"se\ero_makituki3.ogg"
eng $sel2:$sel6
skillcount2 3353
mov %damage_kotei,1
damage 80,100
skillname ""
if %mylife=0 sub %stack,1:return *plants2_h9
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Even though you're going to be a seedbed, you look so happy..."
if %ransu=2 mov $sel1,"Hehe, really pathetic..."
if %ransu=3 mov $sel1,"Is the human really that happy about becoming a seedbed?"
name "Alra Prison"
eng $sel1:$sel6\
name ""
sub %stack,1
goto *plants2_a13



*plants2_a14

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name "Alra Prison"
>Go mad inside my prison...\
name ""
skillname "Flower Prison"
eng "Alra Prison's giant petals wrap around Luka!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,5
if %wind=1 && %nanido=2 mov %wind_kakuritu,3
if %wind=1 && %nanido=3 mov %wind_kakuritu,1
if %wind=2 && %nanido<2 mov %wind_kakuritu,10
if %wind=2 && %nanido=2 mov %wind_kakuritu,7
if %wind=2 && %nanido=3 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3356
mov %kousoku,1:gosub *status_print
>Luka's confined inside Alra Prison!\
skillname ""
if %kousan=2 sub %stack,1:return
name "Luka"
>Wh...What are you doing!?\
name ""
name "Alra Prison"
>Please keep quiet...@
>I'll squeeze out your semen... It will feel amazing.\
name ""
>Stuck inside the plant, it's like I'm in a prison.@
>It feels like things are squirming and moving all around me...\
name "Luka"
>Wh...What the!?\
name ""
lsp 690,":a;chara\a_prison_ct01.bmp",480,0:print 10,500
>Ivy suddenly swarms into the prison!\
if %earth=0 && %nanido<2 mov %genmogaku,100
if %earth=0 && %nanido=2 mov %genmogaku,100
if %earth=0 && %nanido=3 mov %genmogaku,100
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
sub %stack,1
return



*plants2_a15

add %stack,1
if %kousan=2 skip 4
name "Alra Prison"
>Time to suck...\
name ""
skillname "Flower Prison"
dwave 1,"se\ero_buchu1.ogg"
lsp 690,":a;chara\a_prison_ct02.bmp",480,0:print 10,500
>Countless number of ivy vines swarm around Luka's groin!@
>One of the bigger vines sucks in Luka's penis!
skillcount2 3356
mov %damage_kotei,1
damage 80,100
skillname ""
if %mylife=0 sub %stack,1:return *plants2_h10
name "Luka"
>Ahhhh!\
name ""
sub %stack,1
goto *plants2_a16



*plants2_a16

add %stack,1
>Alra Prison's ivy is sucking on Luka's penis inside her prison...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck it all out...":mov $sel2,"The vine sucks on Luka's penis!"
if %ransu=2 mov $sel1,"Are you happy in there...?":mov $sel2,"The vine starts to pump Luka!"
if %ransu=3 mov $sel1,"You're going to come inside me soon...":mov $sel2,"Other ivy vines rub Luka's penis!"
if %ransu=4 mov $sel1,"There's no way out...":mov $sel2,"The vine violently sucks on Luka's penis!"
if %ransu=5 mov $sel1,"My prison feels amazing, doesn't it?":mov $sel2,"Vines wrap around Luka's penis, stimulating him!"
name "Alra Prison"
eng $sel1:$sel6\
name ""
skillname "Flower Prison"
dwave 1,"se\ero_buchu1.ogg"
eng $sel2:$sel6
skillcount2 3356
mov %damage_kotei,1
damage 80,100
skillname ""
if %mylife=0 sub %stack,1:return *plants2_h10
sub %stack,1
goto *plants2_a16



*plants2_onedaria

mov $list1,"Plant Suck"
if %3347>0 mov %list_num1,1
mov $list2,"Plant Vore"
if %3348>0 mov %list_num2,1
mov $list3,"Double Blowjob"
if %3349>0 mov %list_num3,1
mov $list4,"Double Tit Fuck"
if %3350>0 mov %list_num4,1
mov $list5,"Sweet Hand"
if %3351>0 mov %list_num5,1
mov $list6,"Fungal Skirt"
if %3352>0 mov %list_num6,1
mov $list7,"Flower Footjob"
if %3354>0 mov %list_num7,1
mov $list8,"Flower Intercrural"
if %3355>0 mov %list_num8,1
mov $list9,"Seedbed Embrace"
if %3353>0 mov %list_num9,1
mov $list10,"Flower Prison"
if %3356>0 mov %list_num10,1
gosub *cmd_onedari
if %cmd1=11 goto *plants2_onedari1
if %cmd1=12 goto *plants2_onedari2
if %cmd1=13 goto *plants2_onedari3
if %cmd1=14 goto *plants2_onedari4
if %cmd1=15 goto *plants2_onedari5
if %cmd1=16 goto *plants2_onedari6
if %cmd1=17 goto *plants2_onedari8
if %cmd1=18 goto *plants2_onedari9
if %cmd1=19 goto *plants2_onedari7
if %cmd1=20 goto *plants2_onedari10
if %cmd1=-1 goto *plants2_main
goto *plants2_onedaria



*plants2_onedarib

mov $list1,"Double Blowjob"
if %3349>0 mov %list_num1,1
mov $list2,"Double Tit Fuck"
if %3350>0 mov %list_num2,1
mov $list3,"Sweet Hand"
if %3351>0 mov %list_num3,1
mov $list4,"Fungal Skirt"
if %3352>0 mov %list_num4,1
mov $list5,"Flower Footjob"
if %3354>0 mov %list_num5,1
mov $list6,"Flower Intercrural"
if %3355>0 mov %list_num6,1
mov $list7,"Seedbed Embrace"
if %3353>0 mov %list_num7,1
mov $list8,"Flower Prison"
if %3356>0 mov %list_num8,1
mov $list9,""
mov $list10,""
gosub *cmd_onedari
if %cmd1=11 goto *plants2_onedari3
if %cmd1=12 goto *plants2_onedari4
if %cmd1=13 goto *plants2_onedari5
if %cmd1=14 goto *plants2_onedari6
if %cmd1=15 goto *plants2_onedari8
if %cmd1=16 goto *plants2_onedari9
if %cmd1=17 goto *plants2_onedari7
if %cmd1=18 goto *plants2_onedari10
if %cmd1=-1 goto *plants2_main
goto *plants2_onedarib



*plants2_onedaric

mov %list_num1,0
mov %list_num2,0
mov %list_num3,0
mov $list1,"Flower Footjob"
if %3354>0 mov %list_num1,1
mov $list2,"Flower Intercrural"
if %3355>0 mov %list_num2,1
mov $list3,"Flower Prison"
if %3356>0 mov %list_num3,1
mov $list4,""
mov $list5,""
mov $list6,""
mov $list7,""
mov $list8,""
mov $list9,""
mov $list10,""
gosub *cmd_onedari
if %cmd1=11 goto *plants2_onedari8
if %cmd1=12 goto *plants2_onedari9
if %cmd1=13 goto *plants2_onedari10
if %cmd1=-1 goto *plants2_main
goto *plants2_onedaric



*plants2_onedari1

gosub *onedari_syori
name "Alra Vore"
>You want your semen sucked by this vine?\
name ""
name "Alra Parasol"
>So you like Vore's ivy... Hehe.\
name ""
name "Alra Prison"
>Wanting to be sucked by ivy... Pitiful.\
name ""
gosub *plants2_a1
skip -1



*plants2_onedari2

gosub *onedari_syori_k
name "Alra Vore"
>You want to be eaten by my ivy? Hehe.\
name ""
name "Alra Parasol"
>Wanting to be eaten... What a pervert.\
name ""
name "Alra Prison"
>How pitiful!\
name ""
if %kousoku=0 gosub *plants2_a4
gosub *plants2_a5
skip -1



*plants2_onedari3

gosub *onedari_syori
name "Alra Parasol"
>You want to be finished by our mouths?\
name ""
name "Alra Prison"
>I'll lick it a lot...\
name ""
gosub *plants2_a2
skip -1



*plants2_onedari4

gosub *onedari_syori
name "Alra Parasol"
>You want to be finished by our breasts?\
name ""
name "Alra Prison"
>I'll crush it...\
name ""
gosub *plants2_a3
skip -1



*plants2_onedari5

gosub *onedari_syori
name "Alra Parasol"
>You want me to use my soft hand?@
>Then allow me to squeeze it all out...\
name ""
name "Alra Prison"
>Wanting to come so badly... How pitiful.\
name ""
gosub *plants2_a6
skip -1



*plants2_onedari6

gosub *onedari_syori
name "Alra Parasol"
>You want to be played with by my skirt?@
>Then allow me to squeeze it all out...\
name ""
name "Alra Prison"
>Wanting to come so badly... How pitiful.\
name ""
gosub *plants2_a7
skip -1



*plants2_onedari7

gosub *onedari_syori
mov $name,"Alra Parasol"
if %sinkou=1 mov $tatie4,"a_parasol_h1a"
if %sinkou=1 mov %monster_x,470:mov %monster_y,30
if %sinkou=1 lsp 700,":a;chara\a_parasol_st02.bmp",470,30
if %sinkou=1 lsp 702,":a;chara\a_vore_st02.bmp",180,130
name "Alra Parasol"
>You want to join my seedbed...?\
name ""
name "Alra Prison"
>Wanting to do that on his own... What a pervert.\
name ""
gosub *plants2_a12
skip -1



*plants2_onedari8

gosub *onedari_syori
name "Alra Prison"
>You want me to step on you?@
>You're really twisted.\
name ""
if %sinkou=3 skip 4
name "Alra Parasol"
>Then allow me to watch as he drown in pleasure.\
name ""
gosub *plants2_a8
skip -1



*plants2_onedari9

gosub *onedari_syori
name "Alra Prison"
>You want to be squeezed by my thighs?@
>You're really twisted.\
name ""
if %sinkou=3 skip 4
name "Alra Parasol"
>Then allow me to watch as he drown in pleasure.\
name ""
gosub *plants2_a9
skip -1



*plants2_onedari10

gosub *onedari_syori_k
mov $name,"Alra Prison"
mov $tatie4,"a_prison_h1"
if %sinkou=1 mov %monster_x,-60:mov %monster_y,70
if %sinkou=1 lsp 700,":a;chara\a_prison_st02.bmp",-60,70
if %sinkou=1 lsp 704,":a;chara\a_vore_st02.bmp",180,130
if %sinkou=2 mov %monster_x,0:mov %monster_y,70
if %sinkou=2 lsp 700,":a;chara\a_prison_st02.bmp",0,70
if %sinkou=2 lsp 702,":a;chara\a_parasol_st02.bmp",420,30
name "Alra Prison"
>You want to be caged and sucked...?@
>Alright, as you desire...\
name ""
if %kousoku=0 gosub *plants2_a14
gosub *plants2_a15
skip -1



*plants2_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\a_vore_bk03.bmp",180,130
gosub *syasei2
>Unable to take her sucking ivy any longer, Luka orgasms.\
mov %viclose,1:gosub *lose
mov %2582,%2582+1:if %2582=1 mov %count_koenemy,%count_koenemy+1
if %2582>%count_most mov %count_most,%2582:mov $count_mostname,$name
count 12,11
mov $bad1,"Luka succumbed to Alra Vore's plant suck move."
gosub *face2
name "Alra Vore"
>Did it feel good?@
>I'll do something much better...\
name ""
goto *plants2_ha



*plants2_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
if %sinkou=1 lsp 692,":a;chara\a_parasol_bk02.bmp",470,30
if %sinkou=1 lsp 694,":a;chara\a_prison_bk04.bmp",-60,70
if %sinkou=2 lsp 692,":a;chara\a_parasol_bk02.bmp",420,30
if %sinkou=2 lsp 694,":a;chara\a_prison_bk04.bmp",0,70
gosub *syasei2
>As the two Alraunes lick him, Luka ejaculates, covering their faces with semen.\
mov %viclose,1:gosub *lose
mov %2647,%2647+1:if %2647=1 mov %count_koenemy,%count_koenemy+1
if %2647>%count_most mov %count_most,%2647:mov $count_mostname,$name
count 4,12
mov $bad1,"Luka succumbed to their double blowjob."
gosub *face2
name "Alra Parasol"
>Hehe, you got it all over our faces.\
name ""
name "Alra Prison"
>Spraying it all over the place... Pathetic.\
name ""
goto *plants2_hb



*plants2_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
if %sinkou=1 lsp 691,":a;chara\a_parasol_bk01.bmp",470,30
if %sinkou=1 lsp 696,":a;chara\a_prison_bk06.bmp",-60,70
if %sinkou=2 lsp 691,":a;chara\a_parasol_bk01.bmp",420,30
if %sinkou=2 lsp 696,":a;chara\a_prison_bk06.bmp",0,70
gosub *syasei2
>Squeezed between their breasts, Luka comes, covering their chests with semen.\
mov %viclose,1:gosub *lose
mov %2647,%2647+1:if %2647=1 mov %count_koenemy,%count_koenemy+1
if %2647>%count_most mov %count_most,%2647:mov $count_mostname,$name
count 7,12
mov $bad1,"Luka succumbed to their double tit fuck."
gosub *face2
name "Alra Parasol"
>Hehe, coming so much on our chests...\
name ""
name "Alra Prison"
>Spraying it all over the place... Pathetic.\
name ""
goto *plants2_hb



*plants2_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\a_vore_h3a.bmp",180,130
gosub *syasei2
>While his whole body is being sucked by her ivy, Luka comes.\
mov %viclose,1:gosub *lose
mov %2582,%2582+1:if %2582=1 mov %count_koenemy,%count_koenemy+1
if %2582>%count_most mov %count_most,%2582:mov $count_mostname,$name
count 12,11
mov $bad1,"Luka was forced to come by Alra Vore's plant vore ability."
gosub *face2
name "Alra Vore"
>Ahaha, was it good?@
>I'll make you feel even better as I eat you...\
name ""
goto *plants2_ha



*plants2_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
if %sinkou=1 lsp 693,":a;chara\a_parasol_bk03.bmp",470,30
if %sinkou=2 lsp 693,":a;chara\a_parasol_bk03.bmp",420,30
gosub *syasei2
>While being stroked by her soft hand, Luka finally comes.\
mov %viclose,1:gosub *lose
mov %2647,%2647+1:if %2647=1 mov %count_koenemy,%count_koenemy+1
if %2647>%count_most mov %count_most,%2647:mov $count_mostname,$name
count 5,12
mov $bad1,"Luka succumbed to Alra Parasol's soft hand."
gosub *face2
name "Alra Parasol"
>Hehe... So much in my hand...\
name ""
name "Alra Prison"
>Spraying it all over the place... Pathetic.\
name ""
goto *plants2_hb



*plants2_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
if %sinkou=1 lsp 696,":a;chara\a_parasol_bk06.bmp",470,30
if %sinkou=2 lsp 696,":a;chara\a_parasol_bk06.bmp",420,30
gosub *syasei2
>As her living skirt caress him, Luka finally comes, covering it with semen.\
mov %viclose,1:gosub *lose
mov %2647,%2647+1:if %2647=1 mov %count_koenemy,%count_koenemy+1
if %2647>%count_most mov %count_most,%2647:mov $count_mostname,$name
count 12,12
mov $bad1,"Luka was forced to come by Alra Parasol's skirt."
gosub *face2
name "Alra Parasol"
>Hehe... Covering my skirt with so much semen...\
name ""
name "Alra Prison"
>Spraying it all over the place... Pathetic.\
name ""
goto *plants2_hb



*plants2_h7

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
if %sinkou=1 lsp 692,":a;chara\a_prison_bk02.bmp",-60,70
if %sinkou=2 lsp 692,":a;chara\a_prison_bk02.bmp",0,70
if %sinkou=3 lsp 692,":a;chara\a_prison_bk02.bmp",160,70
gosub *syasei2
>Trampled by her foot, Luka finally comes, covering it with semen.\
mov %viclose,1:gosub *lose
mov %2648,%2648+1:if %2648=1 mov %count_koenemy,%count_koenemy+1
if %2648>%count_most mov %count_most,%2648:mov $count_mostname,$name
count 3,3
mov $bad1,"Luka succumbed to Alra Prison's footjob."
gosub *face2
name "Alra Prison"
>Coming just from being stepped on...? The worst kind of man.\
name ""
goto *plants2_hc



*plants2_h8

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
if %sinkou=1 lsp 692,":a;chara\a_prison_bk03.bmp",-60,70
if %sinkou=2 lsp 692,":a;chara\a_prison_bk03.bmp",0,70
if %sinkou=3 lsp 692,":a;chara\a_prison_bk03.bmp",160,70
gosub *syasei2
>As she tightens her thighs, Luka finally comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2648,%2648+1:if %2648=1 mov %count_koenemy,%count_koenemy+1
if %2648>%count_most mov %count_most,%2648:mov $count_mostname,$name
count 3,3
mov $bad1,"Luka succumbed to Alra Prison's intercrural sex."
gosub *face2
name "Alra Prison"
>Leaking out so much all over my thighs... How shameful.\
name ""
goto *plants2_hc



*plants2_h9

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
if %sinkou=1 lsp 700,":a;chara\a_parasol_h2a.bmp",470,30
if %sinkou=2 lsp 700,":a;chara\a_parasol_h2a.bmp",420,30
gosub *syasei2
>Forced against her soft body, Luka finally comes, spraying her fungus covered body with semen.\
mov %viclose,1:gosub *lose
mov %2647,%2647+1:if %2647=1 mov %count_koenemy,%count_koenemy+1
if %2647>%count_most mov %count_most,%2647:mov $count_mostname,$name
count 12,12
mov $bad1,"Luka succumbed to Alra Parasol's embrace."
gosub *face2
name "Alra Parasol"
>Hehe, so much of your seed...@
>Now, I'll make you join my seedbed...\
name ""
name "Alra Parasol"
>...How pathetic, being made into a seedbed.\
name ""
goto *plants2_hb



*plants2_h10

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\a_prison_ct03.bmp",480,0
gosub *syasei2
>Trapped inside her prison, Luka finally comes.\
mov %viclose,1:gosub *lose
mov %2648,%2648+1:if %2648=1 mov %count_koenemy,%count_koenemy+1
if %2648>%count_most mov %count_most,%2648:mov $count_mostname,$name
count 3,3
mov $bad1,"Luka came, stuck inside Alra Prison's prison."
gosub *face2
name "Alra Prison"
>Hehe, that's the first...\
name ""
goto *plants2_hc



*plants2_ha

mov $name,"Alra Vore"
mov $bad2,"Luka was swallowed whole by Alra Vore."
if %2582=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,12:hseanwave:cspl 690,706:lsp 700,":a;chara\a_vore_h2.bmp",170,130:print 10,500:goto *plants2_ha2
name "Luka"
>Ahh...\
name ""
cspl 690,706
lsp 700,":a;chara\a_vore_st02.bmp",170,130:print 10,500
name $name
>Now you can't struggle too much.\
name ""
dwave 1,"se\ero_makituki3.ogg"
lsp 700,":a;chara\a_vore_h1.bmp",170,130:print 10,500
>Her ivy expands, and sucks my right arm inside.@
>My hand is quickly sucked deeper into its warm, pulsating mouth.\
>Next, the other ivy's mouth opens as it approaches my leg.\
name $name
>Hehe, I'll swallow you whole.\
>This ivy is used to swallow living creates whole...@
>So far, I've swallowed men and insect monsters alike...\
name ""
name "Luka"
>Aiee!\
name ""
>I shiver as the predator approaches me.@
>Swallowed by a massive mouth of ivy, and digested...\
>The mouth designed to do just that comes closer, its mouth gaping.\
name $name
>You're going to be swallowed whole, right in here...@
>I'll slowly suck on your body, deeper and deeper inside my own...\
>Hehehe... Scared?\
name ""
name "Luka"
>Aiee... Stop...!\
name ""
name $name
>I won't stop.@>You're my prey.@
>Now, it's time for my meal...\
name ""
name "Luka"
>Ahhh!\
name ""
>The mouth closes around my foot, its horrifying warmth wrapping around my body.\
>With powerful sucking motions, it slowly pulls me into its mouth.\
mov %hseanwave,12:hseanwave
lsp 700,":a;chara\a_vore_h2.bmp",170,130:print 10,500
>Almost in an instant, I'm sucked in until only my head remains outside of her.\
goto *plants2_ha2



*plants2_ha2

name "Luka"
>Ahhhhh!!\
name ""
>It feels like I'm really inside a digestive organ...@
>The walls move and undulate rhythmically, as a strange liquid washes over me.\
>The slimy liquid is spread and painted across my body by the soft walls of flesh wriggling around me.\
name "Luka"
>Ahh... H...Help me!\
name ""
name $name
>I'll eat that cute penis, too...@
>Look... The ivy made just for it is coming...\
name ""
lsp 690,":a;chara\a_vore_ct01.bmp",440,0:print 10,500
>Inside the ivy holding me in its mouth, another small ivy extends toward my groin.@
lsp 690,":a;chara\a_vore_ct02.bmp",440,0:print 10,500
>And slowly sucks my penis into its mouth!\
name "Luka"
>Ahhhh!\
name ""
name $name
>Incredible, isn't it?@>This ivy is made just for boys...@
>Here, I'll devour your penis...\
name ""
lsp 690,":a;chara\a_vore_ct03.bmp",440,0:print 10,500
>The small ivy sucking in my penis shrinks, as it starts to suck on me.\
>The strange nimble shape of the ivy cause it to slightly curve and have ridged edges inside it, making the stimulation unbearable.\
name "Luka"
>Ahhh...!\
name ""
>The folds inside of the small ivy rub against the back of my penis, as the tip of my penis pushes against something all the way inside it.\
>I feebly shake as the pleasure from this man-eating ivy mercilessly devours me.\
name $name
>Hehe, it feels good, doesn't it?@
>Before I eat a man, I always milk him first...\
>I'll do the same for you...@>So give everything to this vine, made just for you...\
name ""
name "Luka"
>Haaa...!\
name ""
>The small vine continues violently sucking on me, vibrating and shaking freely.\
>As her larger ivy continues sucking on my entire body, I feel helpless as the desire to come flows through me.\
name "Luka"
>No... Not like this... I'm going to come...\
name ""
name $name
>Hehe... Just give up.@>It will be easier that way...@
>Once you come, I'll swallow you up...\
name ""
name "Luka"
>Ah...Ahh...\
name ""
>I try to endure, with my mind screaming for my body to stop.\
>But my body surrenders, overpowering my mind.@>That tiny vine inside of her sucking on my penis breaks down the last of my resistance.\
gosub *syasei1
lsp 700,":a;chara\a_vore_h3.bmp",170,130
lsp 690,":a;chara\a_vore_ct04.bmp",440,0
gosub *syasei2
>I sigh as my final barrier is broken down, exploding inside the tiny sucking ivy.\
>As soon as the first drop of semen came out of my penis, the sucking power of the ivy triples as it swallows my semen as I come.\
name "Luka"
>Ah! Ahhh!!\
name ""
>The intense suction sucks out the semen faster than my muscles can propel it, ripping it straight out of my penis into its waiting mouth.\
>Extra sensitive during the ejaculation, the extreme stimulation causes me to thrash around helplessly in the larger ivy holding me.\
name "Luka"
>Ahhhh!\
name ""
lsp 690,":a;chara\a_vore_ct05.bmp",440,0:print 10,500
>Longer than a normal ejaculation, the powerful suction keeps sucking out semen.@
>This vine isn't trying to give pleasure... It's just sucking out food.\
>In just one ejaculation, it feels like everything inside of me has been sucked out forcibly by the voracious ivy.\
name "Luka"
>Ah...ahh...\
name ""
name $name
>Hehe, that was tasty...@
>Now that all of your semen has been turned into my nourishment...\
>Next, I'll digest your body.@
>Take a last look at the world, because my ivy will swallow you whole now...\
name ""
if %hosyoku_cut=1 goto *hosyoku_cut
name "Luka"
>S...Stoooop!!!\
name ""
>I open my mouth in a scream, but it's muffled instantly as her ivy sucks me inside with a gulp.@
>I beat against the soft walls inside of her, but I'm helplessly pushed by her undulating organ deeper inside her body.\
lsp 700,":a;chara\a_vore_h4.bmp",80,130
lsp 690,":a;chara\a_vore_ct11.bmp",400,0:print 10,500
>In only moments, I've been swallowed whole.@
>Stuck in the hideous organ of a predator, I'm tightly bound on all sides by the soft fleshy walls of her stomach.\
name $name
>Hehe... I swallowed him whole.@
>All that's left for you is to be slowly digested...\
>But don't worry, it won't take long.@
>It will be over soon... Hahaha.\
name ""
name "Luka"
>Ah... Ahhh... Nooo...\
name ""
mov %hseanwave,13:hseanwave
lsp 690,":a;chara\a_vore_ct12.bmp",400,0:print 10,500
>The soft walls inside of her vibrate and wriggle around me, as she starts to slowly digest me inside her.\
>I writhe and struggle, but with nothing but her organ around me on all sides, there's no escape.\
name $name
>Doesn't it feel good?@
>Your body will be all liquidy soon...\
name ""
name "Luka"
>Help me... Ahhh...\
name ""
>Despite the fear and horror, a bizarre pleasure envelopes me as the digestive juices drown my body.\
>As her soft fleshy walls wriggle and vibrate around my body, I feel an orgasm racing through me.\
gosub *syasei1
lsp 690,":a;chara\a_vore_ct13.bmp",400,0
gosub *syasei2
name "Luka"
>Ahh...\
name ""
>I let out a humiliating ejaculation while being digested.@
>Even though I know it must be some strange poison inside her, I can't help but feel awash in the ecstasy.\
lsp 690,":a;chara\a_vore_ct14.bmp",400,0:print 10,500
>Calmed by the orgasm, her soft walls close around me even tighter.@
>The fear and horror slowly give way to the pleasure rising through me.\
name "Luka"
>Ahh...\
name ""
>As more digestive juices are sprayed over my body, I drown even more in the ecstasy.\
gosub *syasei1
lsp 690,":a;chara\a_vore_ct15.bmp",400,0
gosub *syasei2
>I sigh in pleasure as more semen leaks out of my penis into her stomach.@
>The sweet stimulation makes it feel like I'm melting...@>No, I may really be melting...\
name "Luka"
>Ah...ahh...\
name ""
>Encased in her digestive organ, I slowly feel my consciousness slip away from me.\
>Smiling in the ecstasy given to me at the very end, my body is digested by Alra Vore.\
gosub *anten
mov %hseanwave,0:hseanwave
name $name
>Thanks for the meal... You were delicious. Hehehe.@
>I knew it, humans really do taste the best...\
name ""
>Thus, another young boy was made into a victim of the plant monster.@
>Meeting a miserable end, his adventure ends here.\
>...............\
goto *badend



*plants2_hb

mov $name,"Alra Parasol"
mov $bad2,"After that, Luka joined Alra Parasol's seedbed..."
mov $tatie2,"a_parasol_st02"
mov %zmonster_x,-50
mov %monster_y,30
if %2647=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,21:hseanwave:cspl 690,705:lsp 700,":a;chara\a_parasol_h1.bmp",250,30:print 10,500:goto *plants2_hb2
name "Luka"
>Ahhh...\
name ""
cspl 690,705
lsp 700,":a;chara\a_parasol_st02.bmp",250,30:print 10,500
name $name
>It looks like you can't resist any longer.@
>Allow me to embrace you...\
>You're very lucky...@
>With my embrace, I'll let you join my seedbed...\
name ""
>Alra Parasol whispers that into my ear as she comes up behind me.@
mov %hseanwave,21:hseanwave
lsp 700,":a;chara\a_parasol_h1.bmp",250,30:print 10,500
>Hugging me close to her, she forces me into her skirt!\
name "Luka"
>Wh...What the!?@>Ahhh!\
name ""
name $name
>I'll wrap you in my fungus, and make you join my seedbed...@
>I need plenty of fertilization first, so shoot out a lot of semen for me...\
name ""
goto *plants2_hb2



*plants2_hb2

name "Luka"
>Ahhh!!\
name ""
>It feels like my lower body has been forced into something soft and vibrating, with tentacles latched around me drawing me further inside.\
>The soft, wriggling matter wraps around my penis as well, completely blocked from my view.\
name $name
>Now, please give me a lot of semen...@
>My body tissue requires lots of fertilization, after all.\
name ""
name "Luka"
>No...!\
name ""
>Unable to see what's going on, I try to deny the pleasure.@
>But the strange stimulation is too much to endure.\
>If I lost focus for even a second, I'd be forced to an orgasm in an instant.\
name "Luka"
>Ah.. Ahh...\
name ""
>My entire lower body is wrapped by something soft and gentle.@
>Stuck inside her fungal body, I struggle to get out, but all it does is make my waist move, stimulating me further.\
name $name
>It's too late to escape...@
>Once I embrace someone, they can't escape.\
>The only thing left for you is to become part of my seedbed.@
>Now give up and ejaculate, please.\
name ""
>The softness inside of her wriggles and moves, as if my penis is stuck inside a giant loaf of dough.\
>But since it's alive, it moves and vibrates, forcing pleasure into my stuck body.\
name $name
>All I have to do is this, and semen comes out...@
>Human males' sexual functions are so simple.\
name ""
name "Luka"
>Ah!@>Ahhhhh!!\
name ""
>I twist my body side to side, trying to endure the rising orgasm.@
>I know as soon as I ejaculate, my life will be over...\
>Horrified at the idea of being assimilated by this monster, I do everything I can to hold on.\
name $name
>You don't need to resist it...@
>Joining my seedbed will make any man really happy...\
>Once you become one with me, you will drown in endless pleasure.@
>Now, give up and ejaculate...\
name ""
name "Luka"
>I can't... No more...\
name ""
>The gentle dough like flesh I'm stuck inside starts to rotate as it vibrates around me.@
>Finally unable to endure it any more, I stop resisting.\
>With my mind broken, I thrust forward, drowning in the pleasure of release I finally succumbed to.\
name "Luka"
>Ahhh... It feels so good...@
>Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\a_parasol_h2.bmp",250,30
gosub *syasei2
>With my entire groin area encased in her soft fungal flesh, I come, spraying semen out right inside her.\
>Her entire body starts to pulsate, as every part of her body seemingly starts to suck on the semen I released in her.\
>Drunk on the pleasure, I open my mouth as I sigh in ecstasy.\
name "Luka"
>Haaa...\
name ""
>I finally came inside her...@
>She's going to swallow my body, and fuse it with her own...\
name $name
>Hehe, fertilization complete.@
>Now, please enjoy your new life as my seedbed.\
name ""
mov %hseanwave,22:hseanwave
lsp 700,":a;chara\a_parasol_h4.bmp",250,30:print 10,500
name "Luka"
>Ahh...\
name ""
>I'm slowly sucked deeper into her body, as her fungal flesh covers more of my own.@
>It feels like my body itself is being corroded and replaced by her own.\
>Despite the seeming horror of my stimulation, I'm too flooded in ecstasy to focus on anything but the pleasure.\
name $name
>Your body will join my seedbed... But your consciousness will remain.@
>So please enjoy the feeling of your body being slowly absorbed for the rest of your life.\
name ""
name "Luka"
>Ah...aa...\
name ""
>Absorbed by the plant monster, and joining her seedbed, I'm meeting a miserable fate.@
>But I'm joining her with a smile on my face, too entranced by the pleasure to care.\
>Melting in the pleasure, my hips shake as more of my body joins her own.\
gosub *syasei1:gosub *syasei2
>I spray out more semen inside her.@
>This semen, too, will be used as fertilizer to grow her body...\
>Thus, my body joins her soft fungal one.@
>She'll slowly feed off me, using my body as a seedbed to grow more fungi with.\
>Drunk on the pleasure, I accept my new life with her.\
gosub *anten
mov %hseanwave,0:hseanwave
>Unable to lose consciousness, only my thoughts and feelings remain as I'm part of her body, used to grow more fungus for her.\
>But I'm happy... Able to feel nothing but pleasure as I live endlessly with Alra Parasol.\
>............\
goto *badend



*plants2_hc

mov $name,"Alra Prison"
mov $bad2,"Trapped in her prison, Luka's semen was sucked endlessly."
mov $tatie2,"a_prison_st02"
mov %zmonster_x,-70
mov %monster_y,70
if %2648=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,21:hseanwave:cspl 690,705:lsp 700,":a;chara\a_prison_h1.bmp",160,70:lsp 690,":a;chara\a_prison_ct02.bmp",480,0:print 10,500:goto *plants2_hc2
name "Luka"
>Ahhh...\
name ""
name $name
>Now I'll make you my prey.@
>With my own special method...\
name ""
>As I'm too exhausted to move, Alra Prison slowly comes closer to me.@
dwave 1,"se\ero_makituki3.ogg"
cspl 690,705
lsp 700,":a;chara\a_prison_h1.bmp",160,70:print 10,500
>And wraps me in a giant flower!\
>Four giant flower petals surround me, cutting me off from the outside world.@
>It's dark, as if I was just placed into a prison.\
name "Luka"
>Wh...what are you doing!?\
name ""
name $name
>What am I going to do with you in here?@
>I'm going to suck out your semen, of course.\
name ""
lsp 690,":a;chara\a_prison_ct01.bmp",480,0:print 10,500
>Inside the prison, countless ivy vines suddenly swarm around me.@
>They quickly entangle my body, sealing off my movement.\
>After that, a bizarre flower approaches my body.\
name $name
>That's a sucking flower...@
>It's a magical flower that sucks out your semen.\
>From now on, this flower is going to be sucking out your semen.\
name ""
name "Luka"
>No...No! Stop!\
name ""
>I tremble in fear as the flower slowly approaches my groin.@
>Then...\
mov %hseanwave,21:hseanwave
lsp 690,":a;chara\a_prison_ct02.bmp",480,0:print 10,500
>With a sticky noise, it sucks my penis inside!\
goto *plants2_hc2



*plants2_hc2

name "Luka"
>Ahhh!\
name ""
>Surprised by the sudden pleasurable stimulation the flower sucking on my penis gives, I relax my body.\
>Sticky mucus drips out of the flower, causing a lewd sound to echo off the tight walls of her prison with every powerful suck.\
name "Luka"
>Haaa... That feels good...\
name ""
>The flower keeps on sucking on me, as the ivy wrapped around my body prevents me from moving.\
>I feel the base of my penis starting to throb as an impending climax starts to well up.\
name $name
>Now, come...@
>Ejaculate into my flower like the pathetic boy you are...\
name ""
name "Luka"
>Ahh... No... More...@
>Ahhhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\a_prison_ct03.bmp",480,0
gosub *syasei2
>As my penis pulses for the ejaculation, the flower suddenly violently sucks on me.@
>Each squirt of semen is met by a powerful suction from the flower.\
name "Luka"
>Ahhhh!?\
name ""
>Perfectly in synch with my spasms, the resulting double stimulus is too much for me to take.\
name "Luka"
>Ahhh... It's sucking...!\
name ""
>It feels as though the flower is the one sucking out the semen, not my body shooting it out.\
>As my head thrashes side to side, my eyes land on the ivy binding me in place.@
>Reminded of my miserable position inside her prison, I come to my senses again.\
name "Luka"
>Ahh... Help me...\
name ""
name $name
>Hehe... Help won't ever come.@
>You're in my prison.@> Nobody will ever see you again.\
name ""
name "Luka"
>Nnn.. Mmmg!?\
name ""
mov %hseanwave,22:hseanwave
lsp 690,":a;chara\a_prison_ct04.bmp",480,0:print 10,500
>More vines entangle my body, tightly wrapping around my body.@
>As I open my mouth in surprise, another vine forces itself into my mouth and starts pumping a liquid in.\
name "Luka"
>Nnnnn!!\
name ""
name $name
>I won't let you die, so I need to feed you...@
>...Oh, and it has an aphrodisiac.\
>You're my prisoner, and I won't allow you to die.@
>You will stay inside me, and be sucked forever.\
name ""
name "Luka"
>Nnnn!!\
name ""
>The flower around my penis starts to suck again, even more powerfully than before.@
>Several soft vines gently massage my penis as the flower sucks on it.\
>Quickly brought to another climax, I sigh as I explode inside the flower again.\
name "Luka"
>Nnn...\
name ""
gosub *syasei1
lsp 690,":a;chara\a_prison_ct05.bmp",480,0
gosub *syasei2
>Just like before, the flower violently sucks on me in time with every spurt of semen.\
name $name
>Hehe, it feels good so there's no reason to hold back anymore, right?@
>You're now just part of my body.\
>You're nothing more than an organ for creating semen.\
name ""
name "Luka"
>Nnn...\
name ""
>After waiting a few moments, the flower starts to suck again.@
>As if it was a machine, it continues its behavior from before without slowing down.\
>It stimulates me with pleasure, forcing me to orgasm.@
>It sucks up the semen I shoot into it. After waiting a few moments, it starts all over again.\
>The cycle almost seems mechanical.\
name "Luka"
>Nnnn....\
name ""
>With my mouth closed up, I can't call for help.@
>With the flowers hiding me inside her, nobody would ever know I was in here...\
name "Luka"
>Nnnn...\
name ""
gosub *syasei1:gosub *syasei2
>Even while grieving over my fate, I continue to come.\
name $name
>Hehe... Do you understand your role?@
>Until you die a natural death, you'll remain in my prison.\
name ""
name "Luka"
>Nnnnn...\
name ""
>Bound inside her prison, I really am just part of her body now...\
gosub *syasei1:gosub *syasei2
>Helpless, her mechanical like flower sucks out another orgasm.\
name $name
>Hehehe, a constant source of semen...@
>As a man, are you horrified?@> Or happy?\
>Of course, it has to be happiness, right?@
>Because I know it feels so good...\
name ""
name "Luka"
>Nnnn...\
name ""
gosub *syasei1:gosub *syasei2
>Unable to answer with my words, the only response I can give is another ejaculation.\
gosub *anten
mov %hseanwave,0:hseanwave
>Trapped in her prison, my existence is nothing but as an extra organ inside her, feeding her constant semen.\
>Unable to die or even move, there's nothing left but to be sucked by her machine like flower...\
>..............\
goto *badend



*a_emp_start

mov $name,"Alra Priestess"
mov $name2,"Alra Priestess"
mov $lavel,"a_emp"
mov $tatie1,"a_emp_st01"
mov $tatie2,"a_emp_st02"
mov $tatie3,"a_emp_st03"
mov $haikei,"bg095"
mov %monster_x,150
mov %monster_y,0
if %nanido=1 mov %max_enemylife,2600
if %nanido=2 mov %max_enemylife,2800
if %nanido=3 mov %max_enemylife,3000
if %nanido=0 mov %max_enemylife,2
if %nanido=1 mov %henkahp1,1200
if %nanido=2 mov %henkahp1,1300
if %nanido=3 mov %henkahp1,1400
if %nanido=0 mov %henkahp1,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,15
if %nanido=3 mov %earth_keigen,8
mov %music,7
mov %tikei,2
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"You can't escape. Writhe around as you lose."
mov $mogaku_sel2,"Pointless, hehe... You're just wasting your energy."
mov $mogaku_sel3,"With that pitiful power, you'll never escape."
mov $mogaku_sel4,"Hehe, useless struggling."
mov $mogaku_sel5,"All that remains for you is to be trampled."
mov $mogaku_dassyutu1,"Why did you run?"
mov $mogaku_dassyutu2,"Even though I'm able to show you heaven..."
mov $mogaku_earth_dassyutu1,"You have quite the hidden strength."
mov $mogaku_earth_dassyutu2,"Why does a human have that power...?"
mov $half_s1,"Hehe, is it good?"
mov $half_s2,"Allow me to make it even better."
mov $kiki_s1,"About to orgasm?"
mov $kiki_s2,"That was quite fast, hehe."
mov %end_n,6
mov %exp_minus,39000
mov %zmonster_x,-130
mov %tukix,320
mov %owaza_count1a,5
mov %owaza_count1b,5
mov %owaza_count2a,5
name $name
>...It seems like you changed your position.@
>Very well, I shall be your opponent.\
name ""
name "Luka"
>Even after I sealed so many, you still want to fight...?\
name ""
>Staring right at her, I slowly take my stance.@
>So it comes to this again...\
gosub *face2
name $name
>In combat prowess, you indeed surpass me.@
>But in the arts of pleasure lies my chance.@>If I can exhaust you, my victory is assured.\
name ""
name "Luka"
>............\
name ""
name $name
>I am a high class Alraune.@
>Scum like you doesn't deserve to touch my reproductive organ.\
>But a simpleton like you can be violated in other ways.@
>Now come, I shall dominate you!\
name ""
gosub *face1
mov %sinkou,1
goto *common_main



*a_emp001

gosub *face3
name $name
>More powerful than I thought...@
>I'll have to go all out!\
name ""
gosub *face1
mov %sinkou,2
goto *a_emp_a



*a_emp_v

gosub *face3
name $name
>Why... How are you so strong...?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Alra Priestess turns into a flower!\
mov %viclose,1:gosub *victory
mov %getexp,6000:gosub *lvup
mov %2283,1
goto *sean0189



*a_emp_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>Giving up now, after all you've done...?@
>I accept your offer, but I won't go easy on you.\
name ""
goto *a_emp_a



*a_emp_main

gosub *cmd_main
if %cmd1=11 && %kousoku=1 goto *common_mogaku
if %cmd1=11 && %kousoku=2 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *a_emp_kousan
if %cmd1=16 goto *a_emp_onedari
if %cmd1=17 goto *common_skill
goto *a_emp_main



*a_emp_a

if %enemylife<%henkahp1 && %sinkou=1 goto *a_emp001
if %kousoku=0 && %status=1 gosub *a_emp_a6:goto *common_main
if %kousoku=1 gosub *a_emp_a7:goto *common_main
if %kousoku=2 gosub *a_emp_a9:goto *common_main
rnd2 %ransu,1,8
if %sinkou=1 && %ransu<3 gosub *a_emp_a1:goto *common_main
if %sinkou=1 && %ransu<5 gosub *a_emp_a2:goto *common_main
if %sinkou=2 && %ransu<3 gosub *a_emp_a3:goto *common_main
if %sinkou=2 && %ransu<5 gosub *a_emp_a4:goto *common_main
if %ransu<7 && %owaza_count1a>6 gosub *a_emp_a6:goto *common_main
if %ransu=7 && %sinkou=2 && %owaza_count1b>6 gosub *a_emp_a8:goto *common_main
if %ransu=8 && %owaza_count2a>6 gosub *a_emp_a5:goto *common_main
skip -8



*a_emp_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"This hair is more than enough..."
if %ransu=2 mov $sel1,"Even my hair can play with you."
if %ransu=3 mov $sel1,"It's fine to come in my hair..."
name $name
eng $sel1:$sel6\
name ""
skillname "Priestess Hair"
dwave 1,"se\umaru.ogg"
>Alra Priestess' hair wraps around Luka's penis!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,40
if %wind=2 && %nanido=2 mov %wind_kakuritu,35
if %wind=2 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3357
if %nanido<2 damage 45,55
if %nanido=2 damage 55,65
if %nanido=3 damage 65,75
skillname ""
if %mylife=0 sub %stack,1:return *a_emp_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*a_emp_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"The proof of your manhood will be trampled underfoot."
if %ransu=2 mov $sel1,"Hehe, it's humiliating, isn't it?"
if %ransu=3 mov $sel1,"Men are easy to control like this..."
name $name
eng $sel1:$sel6\
name ""
skillname "Priestess Foot"
dwave 1,"se\ero_koki1.ogg"
>Alra Priestess steps on Luka's penis!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,40
if %wind=2 && %nanido=2 mov %wind_kakuritu,35
if %wind=2 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3358
if %nanido<2 damage 50,60
if %nanido=2 damage 60,70
if %nanido=3 damage 70,80
skillname ""
if %mylife=0 sub %stack,1:return *a_emp_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*a_emp_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My breasts are too good for the likes of you..."
if %ransu=2 mov $sel1,"You can't stand this, can you?"
if %ransu=3 mov $sel1,"Be defeated by my breasts..."
name $name
eng $sel1:$sel6\
name ""
skillname "Priestess Bust"
dwave 1,"se\ero_koki1.ogg"
>Alra Priestess squeezes her breasts around Luka's penis, and quickly pumps them up and down!
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,25
if %wind=2 && %nanido=2 mov %wind_kakuritu,20
if %wind=2 && %nanido=3 mov %wind_kakuritu,12
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3359
if %nanido<2 damage 55,65
if %nanido=2 damage 65,75
if %nanido=3 damage 75,85
skillname ""
if %mylife=0 sub %stack,1:return *a_emp_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*a_emp_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Shall I use my mouth?"
if %ransu=2 mov $sel1,"I know you can't stand it... Just fill my mouth."
if %ransu=3 mov $sel1,"Allow me to partake in a taste."
name $name
eng $sel1:$sel6\
name ""
skillname "Priestess Mouth"
dwave 1,"se\ero_buchu2.ogg"
>Alra Priestess sucks on Luka's penis!
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,25
if %wind=2 && %nanido=2 mov %wind_kakuritu,20
if %wind=2 && %nanido=3 mov %wind_kakuritu,12
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3360
if %nanido<2 damage 50,60
if %nanido=2 damage 60,70
if %nanido=3 damage 70,80
skillname ""
if %mylife=0 sub %stack,1:return *a_emp_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*a_emp_a5

add %stack,1
mov %owaza_count2a,0
name $name
>Be immersed in the ecstasy of my scent...\
name ""
skillname "Intoxicating Fragrance"
dwave 1,"se\gas.ogg"
eng "A sweet smell spreads from Alra Priestess' flowers!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,100
if %wind=1 && %nanido=2 mov %wind_kakuritu,100
if %wind=1 && %nanido=3 mov %wind_kakuritu,50
if %wind=2 && %nanido<2 mov %wind_kakuritu,100
if %wind=2 && %nanido=2 mov %wind_kakuritu,90
if %wind=2 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind blows it away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %status,1:gosub *status_print
>Luka is immersed in ecstasy!\
name "Luka"
>Haaa...\
name ""
name $name
>Get drunk on my smell.@
>Give your everything to me.\
name ""
rnd2 %status_turn,4,5
if %nanido=2 rnd2 %status_turn,5,6
if %nanido=3 rnd2 %status_turn,6,7
sub %stack,1
return



*a_emp_a6

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
name $name
>This foot is more than enough.\
name ""
skillname "Queen's Foot Hell"
dwave 1,"se\ero_makituki1.ogg"
>Alra Priestess' foot takes the shape of ivy, and wraps around Luka's penis!
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3361
if %nanido<2 damage 50,60
if %nanido=2 damage 60,70
if %nanido=3 damage 70,80
mov $tatie4,"a_emp_ha1a"
mov %kousoku,1:gosub *status_print
>Luka's lower body is wrapped in ivy!\
skillname ""
if %mylife=0 sub %stack,1:return *a_emp_h5
if %kousan=2 sub %stack,1:return
gosub *face2
name $name
if %first_sel1=1 skip 3
>This will continue until you surrender.\
skip 2
>This time, you won't get away.\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,2
if %earth=0 && %nanido=2 mov %genmogaku,2
if %earth=0 && %nanido=3 mov %genmogaku,3
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
sub %stack,1
return



*a_emp_a7

add %stack,1
>Luka's lower body is bound in ivy...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Being destroyed by your own penis... How pathetic.":mov $sel2,"The ivy wraps tighter around Luka's penis!"
if %ransu=2 mov $sel1,"Satisfied just by this... Men are so simple.":mov $sel2,"The ivy crawls up and down Luka's penis!"
if %ransu=3 mov $sel1,"Something this simple will defeat you?":mov $sel2,"The ivy slowly coils around Luka's penis!"
if %ransu=4 mov $sel1,"Now come, ejaculate.":mov $sel2,"The ivy gently massages Luka's penis!"
if %ransu=5 mov $sel1,"If I touch this umbrella, will it finish you off?":mov $sel2,"The ivy wraps around the tip of Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Queen's Foot Hell"
lsp 700,":a;chara\a_emp_ha2a.bmp",150,0:print 10,500
dwave 1,"se\ero_makituki1.ogg"
eng $sel2:$sel6
skillcount2 3361
if %nanido<2 damage 50,60
if %nanido=2 damage 60,70
if %nanido=3 damage 70,80
skillname ""
if %mylife=0 sub %stack,1:return *a_emp_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*a_emp_a8

add %stack,1
mov %owaza_count1b,0
mov %owaza_num1,2
if %kousan=2 skip 4
name $name
>Hehe... They shall crawl all over you like insects.\
name ""
skillname "Ivy Restraint"
dwave 1,"se\ero_makituki3.ogg"
eng "Ivy wraps around Luka's body!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,100
if %wind=1 && %nanido=2 mov %wind_kakuritu,100
if %wind=1 && %nanido=3 mov %wind_kakuritu,50
if %wind=2 && %nanido<2 mov %wind_kakuritu,100
if %wind=2 && %nanido=2 mov %wind_kakuritu,100
if %wind=2 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
mov $tatie4,"a_emp_hb1a"
mov %kousoku,2:gosub *status_print
>Luka's bound in ivy!\
skillname ""
gosub *face2
name $name
if %first_sel2=1 skip 4
>Now then, I shall squeeze out your semen.@
>You will be given pleasure fit for your position, so surrender to it.\
skip 3
>This time, you won't escape.@
>You will be given pleasure fit for your position, so surrender to it.\
name ""
lsp 700,":a;chara\a_emp_hb2a.bmp",150,0:print 10,500
>A flower's mouth opens seductively, moving toward Luka's penis!\
mov %first_sel2,1
if %earth=0 && %nanido<2 mov %genmogaku,1
if %earth=0 && %nanido=2 mov %genmogaku,1
if %earth=0 && %nanido=3 mov %genmogaku,1
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
sub %stack,1
return



*a_emp_a9

add %stack,1
name $name
>Are you ready for your pitiful defeat?@
>Now then, I shall suck in your penis...\
name ""
skillname "Queen's Semen Sucking"
lsp 700,":a;chara\a_emp_hb3a.bmp",150,0:print 10,500
dwave 1,"se\ero_chupa6.ogg"
>The flower sucks in Luka's penis!@
>He's forced all the way into its sticky mouth!
skillcount2 3362
mov %damage_kotei,1
damage 80,100
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *a_emp_h6
sub %stack,1
goto *a_emp_a10



*a_emp_a10

add %stack,1
>Luka's penis is being sucked by Alra Priestess' flower...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"It isn't over yet...":mov $sel2,"The inside of the flower wriggles around Luka's penis!"
if %ransu=2 mov $sel1,"Hehe... Endurance is pointless.":mov $sel2,"The inside of the flower swells and vibrates!"
if %ransu=3 mov $sel1,"Shall I tighten it just a little?":mov $sel2,"The flower tightens around Luka's penis!"
if %ransu=4 mov $sel1,"You have no choice but to come now...":mov $sel2,"The flower violently sucks on Luka's penis!"
if %ransu=5 mov $sel1,"The only result now is for you to orgasm... So hurry up.":mov $sel2,"The flower shrinks and sucks, creating a powerful suction on Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Queen's Semen Sucking"
dwave 1,"se\ero_chupa6.ogg"
eng $sel2:$sel6
skillcount2 3362
mov %damage_kotei,1
damage 80,100
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *a_emp_h7
sub %stack,1
goto *a_emp_a10



*a_emp_onedari

mov $list1,"Priestess Hair"
if %3357>0 mov %list_num1,1
mov $list2,"Priestess Foot"
if %3358>0 mov %list_num2,1
mov $list3,"Priestess Bust"
if %3359>0 mov %list_num3,1
mov $list4,"Priestess Mouth"
if %3360>0 mov %list_num4,1
mov $list5,"Queen's Foot Hell"
if %3361>0 mov %list_num5,1
mov $list6,"Queen's Semen Sucking"
if %3362>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *a_emp_onedari1
if %cmd1=12 goto *a_emp_onedari2
if %cmd1=13 goto *a_emp_onedari3
if %cmd1=14 goto *a_emp_onedari4
if %cmd1=15 goto *a_emp_onedari5
if %cmd1=16 goto *a_emp_onedari6
if %cmd1=-1 goto *a_emp_main
goto *a_emp_onedari



*a_emp_onedari1

gosub *onedari_syori
name $name
>You want to be dominated by my hair?\
name ""
gosub *a_emp_a1
skip -1



*a_emp_onedari2

gosub *onedari_syori
name $name
>You want to be dominated by my foot?\
name ""
gosub *a_emp_a2
skip -1



*a_emp_onedari3

gosub *onedari_syori
name $name
>You want to be dominated by my breasts?\
name ""
gosub *a_emp_a3
skip -1



*a_emp_onedari4

gosub *onedari_syori
name $name
>You want to be dominated by my mouth?\
name ""
gosub *a_emp_a4
skip -1



*a_emp_onedari5

if %kousoku<>1 gosub *onedari_syori
if %kousoku=1 gosub *onedari_syori_k
name $name
>You wish to be dominated by my feet?\
>Then, first...\
name ""
if %kousoku=1 skip 3
gosub *a_emp_a5
gosub *a_emp_a6
gosub *a_emp_a7
skip -1



*a_emp_onedari6

if %kousoku<>2 gosub *onedari_syori
if %kousoku=2 gosub *onedari_syori_k
name $name
>You wish to have your semen sucked by me?@
>Well then...\
name ""
notif %kousoku=2 gosub *a_emp_a8
gosub *a_emp_a9
skip -1



*a_emp_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 698,":a;chara\a_emp_bk08.bmp",150,0
gosub *syasei2
>Assaulted by her soft hair, Luka finally comes, covering her head with semen.\
mov %viclose,1:gosub *lose
mov %2583,%2583+1:if %2583=1 mov %count_koenemy,%count_koenemy+1
if %2583>%count_most mov %count_most,%2583:mov $count_mostname,$name
count 22,6
mov $bad1,"Luka succumbed to Alra Priestess' hair."
gosub *face2
name $name
>Hehe, so you came.@
>You got my hair so dirty...@>You're quite the naughty boy.\
name ""
goto *a_emp_h



*a_emp_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\a_emp_bk03.bmp",150,0
gosub *syasei2
>As he's being stepped on by Alra Priestess' foot, Luka comes, covering her foot in semen.\
mov %viclose,1:gosub *lose
mov %2583,%2583+1:if %2583=1 mov %count_koenemy,%count_koenemy+1
if %2583>%count_most mov %count_most,%2583:mov $count_mostname,$name
count 6,6
mov $bad1,"Luka succumbed to Alra Priestess' foot."
gosub *face2
name $name
>Hehe, so you came.@
>You got my foot so dirty...@>You're quite the naughty boy.\
name ""
goto *a_emp_h



*a_emp_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\a_emp_bk01.bmp",150,0
gosub *syasei2
>Squeezed between her breasts, Luka finally comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2583,%2583+1:if %2583=1 mov %count_koenemy,%count_koenemy+1
if %2583>%count_most mov %count_most,%2583:mov $count_mostname,$name
count 7,6
mov $bad1,"Luka succumbed to Alra Priestess' breasts."
gosub *face2
name $name
>Hehe, so you came.@
>You got my chest so dirty...@> You're quite the naughty boy.\
name ""
goto *a_emp_h



*a_emp_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\a_emp_bk02.bmp",150,0
gosub *syasei2
>Unable to take her warm mouth sucking on him, Luka comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2583,%2583+1:if %2583=1 mov %count_koenemy,%count_koenemy+1
if %2583>%count_most mov %count_most,%2583:mov $count_mostname,$name
count 4,6
mov $bad1,"Luka succumbed to Alra Priestess' blowjob."
gosub *face2
name $name
>Hehe, so you came.@
>You got my face so dirty...@>You're quite the naughty boy.\
name ""
goto *a_emp_h



*a_emp_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\a_emp_ha3a.bmp",150,0:print 10,500
gosub *syasei2
>Unable to take the ivy foot around his penis, Luka comes, covering it with semen.\
mov %viclose,1:gosub *lose
mov %2583,%2583+1:if %2583=1 mov %count_koenemy,%count_koenemy+1
if %2583>%count_most mov %count_most,%2583:mov $count_mostname,$name
count 6,6
mov $bad1,"Luka succumbed to Alra Priestess' foot, wrapped around his penis in the form of ivy."
gosub *face2
name $name
>Hehe, did it feel good?@
>Spraying so much all over the place...@> You're quite the naughty boy.\
name ""
goto *a_emp_h



*a_emp_h6

mov %ikigoe,3:gosub *ikigoe
name $name
>Hehe, already too much for you?\
name ""
gosub *syasei1
lsp 700,":a;chara\a_emp_hb4a.bmp",150,0
gosub *syasei2
>The moment Luka's penis is sucked into the flower, he comes, filling it with semen.\
mov %viclose,1:gosub *lose
mov %2583,%2583+1:if %2583=1 mov %count_koenemy,%count_koenemy+1
if %2583>%count_most mov %count_most,%2583:mov $count_mostname,$name
count 12,6
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to orgasm as soon as the flower touched him."
gosub *face2
name $name
>That was so fast... That's so pathetic.@
>Aren't you able to be even a little patient?\
name ""
>Even right after my orgasm, the flower doesn't stop sucking on me.\
mov %hanyo1,1
goto *a_emp_h



*a_emp_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\a_emp_hb4a.bmp",150,0
gosub *syasei2
>Sucked on by the flower, Luka comes, unable to take the pleasure any longer.\
mov %viclose,1:gosub *lose
mov %2583,%2583+1:if %2583=1 mov %count_koenemy,%count_koenemy+1
if %2583>%count_most mov %count_most,%2583:mov $count_mostname,$name
count 12,6
mov $bad1,"Luka succumbed to Alra Priestess' semen sucking flower."
gosub *face2
name $name
>Hehe, you came.@
>Did it feel good to be sucked on like that?\
name ""
>Even right after my orgasm, the flower doesn't stop sucking on me.\
mov %hanyo1,1
goto *a_emp_h



*a_emp_h

mov $bad2,"Played with like a little toy, Luka had his semen sucked until his death."
if %2583=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %hanyo1=1 mov %hseanwave,15:hseanwave:goto *a_emp_hb
name "Luka"
>Ahh...\
name ""
>Exhausted, I fall to the ground by her feet.\
dwave 1,"se\ero_makituki3.ogg"
cspl 690,699
lsp 700,":a;chara\a_emp_hb1.bmp",150,0:print 10,500
>Her ivy slowly wraps around me, quickly taking off my clothes before tightly restraining me.\
name "Luka"
>S...Stop...\
name ""
name $name
>Don't be foolish, little Hero.@
>I must punish you for betraying us.\
name ""
lsp 700,":a;chara\a_emp_hb2.bmp",150,0:print 10,500
name $name
>This flower shall suck out all of your semen, little Hero.\
name ""
name "Luka"
>Ahh...\
name ""
>Sticky mucus drips from the opening of the flower she shows me.@
>It slowly starts to move closer to my groin.\
>I stare helplessly at the hole in the middle of the flower, looming over me.@
>That thing is going to suck in my penis...\
name $name
>No man can last even ten seconds inside my flower.\
>I wonder how long you will last?@
>Will a Hero last longer than other men?@>Or come in an instant?\
name ""
name "Luka"
>S...Stop...\
name ""
>I tremble in fear as the flower slowly approaches the tip of my penis.@
mov %hseanwave,15:hseanwave
lsp 700,":a;chara\a_emp_hb3.bmp",150,0:print 10,500
>Until finally, it sucks me in!\
name "Luka"
>Ahhhhh!\
name ""
>The moment the flower devours my penis, I let out a sweet moan.\
goto *a_emp_hb



*a_emp_hb

>The sticky honey of the flower covers my shaft as it sucks me inside, as the petals slowly tighten around me.\
>As soon as the petals are tightly wrapped around me, the flower starts to suck.@
>My head quickly goes white as the soft petals rub me in time with the powerful suction.\
name "Luka"
>Ha...aa...\
name ""
name $name
>Hehe, what's wrong?@>You're drooling after only a couple seconds.\
name ""
>My body starts to tremble.\
>Laying at her feet, wrapped in ivy and flowers, my penis starts to throb as I let out a pleasure filled sigh.\
gosub *syasei1
lsp 700,":a;chara\a_emp_hb4.bmp",150,0
gosub *syasei2
>In only a few seconds since my last orgasm, I ejaculate again, shooting my seed right into the flower's sucking mouth.\
name "Luka"
>Haa...\
name ""
name $name
>Ara...? Already came?\
>You only lasted five seconds...@>Not even worthy of being called a man.\
>And you dared to call yourself a Hero? Hah!\
name ""
>Alra Priestess looks down at me by her feet and laughs.\
name $name
>You... Could it be you like this?@
>You really just wanted to lay by my feet and have me suck your semen out?\
name ""
name "Luka"
>N...No...!\
name ""
name $name
>Hehe don't lie to me.@
>Look, if I do this...\
name ""
>Responding to her voice, the flower petals rub against my penis.@
>It's like each soft petal is a separate hand, nimbly massaging me.\
name "Luka"
>Ah... Ahh...\
name ""
name $name
>See, you're so happy.\
>You love having your penis played with like this, see?@
>In actuality, you wanted to be forced to the ground and violated, didn't you?\
>You can't hide your desires in front of me.\
name ""
name "Luka"
>Ahhh..!!\
name ""
>As her voice taunts and teases me, the flower continues to do the same.@
>Even more sensitive after my last orgasm, the gentle petals stroking me have me on the edge of another orgasm.\
name $name
>Come on... Embrace your own desire, and dedicate your semen to me.\
>You want to come, don't you?@
>Give in... I'll be glad to violate you like you so want.\
name ""
name "Luka"
>Ahhh...\
name ""
>The flower violently sucking on me suddenly shrinks, tightening the soft petals against me.@
>Surprised at the sudden increase in stimulation, my lower body shakes as I'm instantly forced to an orgasm.\
name "Luka"
>Ahhhh!\
name ""
gosub *syasei1:gosub *syasei2
>Her horrible flower greedily sucks on my penis, swallowing every spurt of come as it shoots out.\
name $name
>Hehe, it felt good, didn't it?@
>Your semen is my food...\
>But you gave it to me because you wanted to.\
>I'll violate you like you want...@
>So feed me your semen of your own will.\
>That's what you want to do, isn't it?\
name ""
name "Luka"
>Ahh...\
name ""
>The flower greedily sucks on me as I lay here on the ground, melting in pleasure.\
>The feeble resistance I had in my mind has already been broken by the back to back orgasms.@
>Desiring the pleasure more than my own pride, I surrender my body and mind to Alra Priestess.\
name "Luka"
>Suck on it...@
>I want you to suck on it...\
name ""
name $name
>Hehe, so you admit it.\
>Very well, as you wish.@
>I'll suck out all of your semen.\
name ""
name "Luka"
>Ahhhh...!\
name ""
mov %hseanwave,16:hseanwave
>She responds to me with a giggle.@
>In the next instant, the flower sucking on my penis starts to pump me at the same time.\
>In and out, the quick movements combined with the suction are too much for me to take.\
gosub *syasei1:gosub *syasei2
name "Luka"
>Aaaa...\
name ""
>With a happy sigh, I explode inside the flower again.@
>Ecstasy wracking my body, I tremble as it continues to dutifully suck out the last drops of semen from my penis.\
name $name
>Aren't you happy?@
>Just like this, I can satisfy your hidden desire...\
name ""
name "Luka"
>Ahhhh!!\
name ""
>The movements get even more intense, as I'm given no break after my last orgasm.@
>Exhausted, it feels like if this keeps up my life may be in danger...\
name "Luka"
>Ahh... S...Stop it... Already...\
name ""
name $name
>What are you saying...?@
>I'm going to do what you want until you die.\
>All I want to do is give you exactly what you want.\
name ""
name "Luka"
>N...No!@>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>Cutting my scream short, she forces me to another orgasm.@
>I'm horrified at her words, but I'm too exhausted to fight back.\
>Helpless at her feet, she's going to suck me dry...\
name $name
>...This is punishment for your betrayal.@
>Violating you like you wanted, I'll steal your life away.\
>Now, come.@> I shall send you to heaven!\
name ""
name "Luka"
>Ahh... N... No!@>Ahh!\
name ""
gosub *syasei1:gosub *syasei2
>Forced to another orgasm, my vision starts to slowly dim.@
>I really am going to be sucked to death...@> The fear fills my mind, but I can't do anything...\
name "Luka"
>Ah... Haaa...\
name ""
name $name
>Hehe, you're completely helpless.@
>You called yourself a Hero... But you're nothing more than a pitiful boy.\
>Now, give me the last of your semen and vanish.\
name ""
name "Luka"
>Haa... It feels good...@
>More... Suck more...\
name ""
gosub *syasei1:gosub *syasei2
>Driven insane, I call out for the pleasure as I fade into blackness.\
gosub *anten
mov %hseanwave,0:hseanwave
name $name
>Hehe, he's gone.@
>Meeting an end like that...@>Some Hero.\
name ""
>Those were the last words I heard as I faded into nothingness.@
>Sucked dry, my life ended at the feet of Alra Priestess.\
>...............\
goto *badend



*dorothy_start

mov $name,"Dorothy"
mov $name2,"Dorothy"
mov $lavel,"dorothy"
mov $tatie1,"dorothy_st01"
mov $tatie2,"dorothy_st02"
mov $tatie3,"dorothy_st03"
mov $tatie4,"dorothy_h1"
mov $haikei,"bg095"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,3300
if %nanido=2 mov %max_enemylife,3700
if %nanido=3 mov %max_enemylife,4100
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,99
mov %earth_keigen,15
if %nanido=3 mov %earth_keigen,8
mov %music,2
mov %tikei,2
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free of Dorothy's arm!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Good, good... Your struggling wastes your energy."
mov $mogaku_sel2,"Please struggle, just like an insect..."
mov $mogaku_sel3,"Hehe, pitiful."
mov $mogaku_sel4,"They all struggle, but then they all dissolve..."
mov $mogaku_sel5,"You'll be digested as you struggle..."
mov $mogaku_dassyutu1,"Ara, good job."
mov $mogaku_dassyutu2,"It would have felt so good..."
mov $mogaku_earth_dassyutu1,"What power...!"
mov $mogaku_earth_dassyutu2,""
mov $half_s1,"Hehe, is it good?"
mov $half_s2,"Being digested by me will feel amazing..."
mov $kiki_s1,"Are you about to come?"
mov $kiki_s2,"Having an orgasm as you're dissolving feels incredible..."
mov %end_n,6
mov %exp_minus,45000
mov %zmonster_x,-300
mov %tukix,320
mov %owaza_count1a,6
mov %owaza_count3a,6
name "Luka"
>Sorry, but I'm going to seal you!\
name ""
>I point my sword straight at Dorothy's face.\
>These sisters that helped cause such horrible things to happen...@
>I have to seal them so they can never repeat this atrocity!\
gosub *face2
name $name
>Hehe... It's been a while since I've eaten a human.@
>It feels incredible to be digested by a carnivorous plant.\
>I'll let you enjoy it too...@
>You'll love being digested by me!\
name ""
gosub *face1
goto *common_main



*dorothy_v

gosub *face3
name $name
>I...It can't be... Sisters!\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Dorothy turns into a sundew!\
mov %2284,1
mov %count_ko,%count_ko+1
if %zukanon=1 return *zukan_commonkaisou0
goto *sean0189a



*dorothy_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>Hehe... You want me to eat you?@
>Then I'll enjoy you...\
name ""
goto *dorothy_a



*dorothy_main

gosub *cmd_main
if %cmd1=11 && %kousoku=2 goto *common_mogaku
if %cmd1=11 && %kousoku=1 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *dorothy_kousan
if %cmd1=16 goto *dorothy_onedari
if %cmd1=17 goto *common_skill
goto *dorothy_main



*dorothy_a

if %kousoku=2 gosub *dorothy_a6:goto *common_main
if %kousoku=1 gosub *dorothy_a4:goto *common_main
rnd2 %ransu,1,4
if %ransu=1 gosub *dorothy_a1:goto *common_main
if %ransu=2 gosub *dorothy_a2:goto *common_main
if %ransu=3 && %owaza_count3a>7 gosub *dorothy_a5:goto *common_main
if %ransu=4 && %owaza_count1a>7 gosub *dorothy_a3:goto *common_main
skip -5



*dorothy_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"They're nice and sticky..."
if %ransu=2 mov $sel1,"I'll get you ready for digestion..."
if %ransu=3 mov $sel1,"The stickiness is from my digestive juices you know... Hehe."
name $name
eng $sel1:$sel6\
name ""
skillname "Sticky Hairs"
dwave 1,"se\ero_makituki1.ogg"
eng "Sticky hairs all over Dorothy's body shoot toward Luka!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,40
if %wind=2 && %nanido=2 mov %wind_kakuritu,35
if %wind=2 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>The sticky hairs caress him all over!
skillcount2 3363
if %nanido<2 damage 45,55
if %nanido=2 damage 55,65
if %nanido=3 damage 65,75
skillname ""
if %mylife=0 sub %stack,1:return *dorothy_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*dorothy_a2

add %stack,1
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My little hairs are covered with digestive juices."
if %ransu=2 mov $sel1,"I'll play with you a little..."
if %ransu=3 mov $sel1,"I need to cover your penis up in juices..."
if %ransu=4 mov $sel1,"Hehe... Do you want your penis to be digested first?"
name $name
eng $sel1:$sel6\
name ""
skillname "Trichome Penis Torture"
dwave 1,"se\ero_slime1.ogg"
>Tiny fine hairs from Dorothy wrap around Luka's penis!
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,40
if %wind=2 && %nanido=2 mov %wind_kakuritu,35
if %wind=2 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3364
if %nanido<2 damage 55,65
if %nanido=2 damage 65,75
if %nanido=3 damage 75,85
skillname ""
if %mylife=0 sub %stack,1:return *dorothy_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*dorothy_a3

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name $name
>Come on, I'll force you in!\
name ""
skillname "Venus Trap"
dwave 1,"se\ero_makituki2.ogg"
>Dorothy grabs Luka, and forces him closer to her body!
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3365
if %nanido<2 damage 55,65
if %nanido=2 damage 65,75
if %nanido=3 damage 75,85
mov %kousoku,1:gosub *status_print
>Luka's being tightly held by Dorothy!\
skillname ""
if %mylife=0 sub %stack,1:return *dorothy_h3
if %kousan=2 sub %stack,1:return
gosub *face2
name $name
if %first_sel1=1 skip 4
>Hehe, it's time to dissolve you.@
>Melt in the sweet pleasure...\
skip 3
>Hehe, this time you'll be dissolved.@
>Melt in the sweet pleasure...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,2
if %earth=0 && %nanido=2 mov %genmogaku,2
if %earth=0 && %nanido=3 mov %genmogaku,3
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,1
sub %stack,1
return



*dorothy_a4

add %stack,1
>Luka is being tightly held by Dorothy...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You get to be dissolved like this... Aren't you happy?":mov $sel2,"Dorothy's arm tightens around Luka's body!"
if %ransu=2 mov $sel1,"I'll cover you in digestive juices...":mov $sel2,"Digestive juices slowly drip onto Luka's body!"
if %ransu=3 mov $sel1,"Hehe, I need to cover your body...":mov $sel2,"Dorothy's arm slowly covers Luka's body in juices!"
if %ransu=4 mov $sel1,"Your penis is getting covered in my juices...":mov $sel2,"Digestive juices drip onto Luka's penis!"
if %ransu=5 mov $sel1,"Please, struggle more...":mov $sel2,"Dorothy's arms tighten around Luka!"
name $name
eng $sel1:$sel6\
name ""
skillname "Venus Trap"
dwave 1,"se\ero_makituki2.ogg"
eng $sel2:$sel6
skillcount2 3365
if %nanido<2 damage 55,65
if %nanido=2 damage 65,75
if %nanido=3 damage 75,85
skillname ""
if %mylife=0 sub %stack,1:return *dorothy_h4
sub %stack,1
return



*dorothy_a5

add %stack,1
mov %owaza_count3a,0
if %kousan=2 skip 4
name $name
>Now... It's time to eat you!\
name ""
skillname "Philia Melt"
dwave 1,"se\ero_makituki3.ogg"
eng "Dorothy's fine hairs wrap around Luka's body, and forces him into her!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,100
if %wind=1 && %nanido=2 mov %wind_kakuritu,100
if %wind=1 && %nanido=3 mov %wind_kakuritu,50
if %wind=2 && %nanido<2 mov %wind_kakuritu,100
if %wind=2 && %nanido=2 mov %wind_kakuritu,100
if %wind=2 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
lsp 690,":a;chara\dorothy_ct01.bmp",0,0
mov %kousoku,2:gosub *status_print
>Entangled in Dorothy's body, Luka's forced inside of her!
skillcount2 3366
if %nanido<2 damage 100,120
if %nanido=2 damage 120,150
if %nanido=3 damage 160,200
skillname ""
if %mylife=0 sub %stack,1:return *dorothy_h5
name $name
>Hehehe... You can't escape any more.@
>Now you'll be eaten like an insect.\
name ""
if %earth=0 && %nanido<2 mov %genmogaku,100
if %earth=0 && %nanido=2 mov %genmogaku,100
if %earth=0 && %nanido=3 mov %genmogaku,100
if %earth>0 && %nanido<2 mov %genmogaku,100
if %earth>0 && %nanido=2 mov %genmogaku,100
if %earth>0 && %nanido=3 mov %genmogaku,100
sub %stack,1
return



*dorothy_a6

add %stack,1
>Tightly bound by Dorothy, Luka's slowly being digested...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You get to be digested by me... Aren't you happy?":mov $sel2,"Dorothy slowly smears digestive juices on the lower half of Luka's body!"
if %ransu=2 mov $sel1,"Feel the pleasure of being eaten...":mov $sel2,"Fine hairs run all over Luka's body, covering him in juices!"
if %ransu=3 mov $sel1,"I'll dissolve your penis, too...":mov $sel2,"Tiny hairs wrap around Luka's penis!"
if %ransu=4 mov $sel1,"Hehe, immerse yourself in the melting pleasure.":mov $sel2,"Dorothy slowly smears digestive juices on the lower half of Luka's body!"
if %ransu=5 mov $sel1,"Enjoy your last moments...":mov $sel2,"Dorothy forces Luka deeper into her body!"
name $name
eng $sel1:$sel6\
name ""
skillname "Philia Melt"
dwave 1,"se\ero_makituki2.ogg"
eng $sel2:$sel6
skillcount2 3366
if %nanido<2 damage 100,120
if %nanido=2 damage 120,150
if %nanido=3 damage 160,200
skillname ""
if %mylife=0 sub %stack,1:return *dorothy_h6
sub %stack,1
return



*dorothy_onedari

mov $list1,"Sticky Hairs"
if %3363>0 mov %list_num1,1
mov $list2,"Trichome Penis Torture"
if %3364>0 mov %list_num2,1
mov $list3,"Venus Trap"
if %3365>0 mov %list_num3,1
mov $list4,"Philia Melt"
if %3366>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *dorothy_onedari1
if %cmd1=12 goto *dorothy_onedari2
if %cmd1=13 goto *dorothy_onedari3
if %cmd1=14 goto *dorothy_onedari4
if %cmd1=-1 goto *dorothy_main
goto *dorothy_onedari



*dorothy_onedari1

gosub *onedari_syori
name $name
>You want my fine hairs all over your body?\
name ""
gosub *dorothy_a1
skip -1



*dorothy_onedari2

gosub *onedari_syori
name $name
>You want my fine hairs all over your penis?\
name ""
gosub *dorothy_a2
skip -1



*dorothy_onedari3

gosub *onedari_syori_k
name $name
>You want to be tightly held?\
name ""
if %kousoku=0 gosub *dorothy_a3
gosub *dorothy_a4
skip -1



*dorothy_onedari4

gosub *onedari_syori_k
name $name
>Hehe... You want me to eat you?@
>Then I'll enjoy you...\
name ""
if %kousoku=0 gosub *dorothy_a5
gosub *dorothy_a6
skip -1



*dorothy_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\dorothy_bk03.bmp",0,0
gosub *syasei2
>As her tiny, sticky hairs run all over his body, Luka comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2584,%2584+1:if %2584=1 mov %count_koenemy,%count_koenemy+1
if %2584>%count_most mov %count_most,%2584:mov $count_mostname,$name
count 12,11
mov $bad1,"Luka succumbed to her tiny, sticky hairs."
gosub *face2
name $name
>Arara... Even my hairs were too much for you?\
name ""
goto *dorothy_h



*dorothy_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\dorothy_bk03.bmp",0,0
gosub *syasei2
>As her tiny, sticky hairs run all over his penis, Luka comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2584,%2584+1:if %2584=1 mov %count_koenemy,%count_koenemy+1
if %2584>%count_most mov %count_most,%2584:mov $count_mostname,$name
count 12,11
mov $bad1,"Luka succumbed to her tiny, sticky hairs."
gosub *face2
name $name
>Arara... Even my hairs were too much for you?\
name ""
goto *dorothy_h



*dorothy_h3

mov %ikigoe,3:gosub *ikigoe
name $name
>Hehe, already?\
name ""
gosub *syasei1
lsp 700,":a;chara\dorothy_h2.bmp",0,0
gosub *syasei2
>As soon as he's forced against Dorothy's body, Luka suddenly ejaculates, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2584,%2584+1:if %2584=1 mov %count_koenemy,%count_koenemy+1
if %2584>%count_most mov %count_most,%2584:mov $count_mostname,$name
count 12,11
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come just from being bound by Dorothy."
gosub *face2
name $name
>Coming just from being held... Haha.\
name ""
goto *dorothy_h



*dorothy_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\dorothy_h2.bmp",0,0
gosub *syasei2
>Tightly held by her giant arm, Luka comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2584,%2584+1:if %2584=1 mov %count_koenemy,%count_koenemy+1
if %2584>%count_most mov %count_most,%2584:mov $count_mostname,$name
count 12,11
mov $bad1,"Luka succumbed while being held by Dorothy."
gosub *face2
name $name
>Arara, you came?@
>Having an orgasm while being dissolved... How pitiful.\
name ""
goto *dorothy_h



*dorothy_h5

mov %ikigoe,3:gosub *ikigoe
name $name
>Hehe, already?\
name ""
gosub *syasei1
lsp 700,":a;chara\dorothy_h2.bmp",0,0
lsp 690,":a;chara\dorothy_ct01.bmp",0,0
gosub *syasei2
>As soon as his body is wrapped by Dorothy's body, Luka comes.\
mov %viclose,1:gosub *lose
mov %2584,%2584+1:if %2584=1 mov %count_koenemy,%count_koenemy+1
if %2584>%count_most mov %count_most,%2584:mov $count_mostname,$name
count 12,11
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka succumbed right away to Dorothy's philia melt."
gosub *face2
name $name
>I didn't think even you were pathetic enough to come that fast...\
name ""
goto *dorothy_h



*dorothy_h6

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\dorothy_h2.bmp",0,0
lsp 690,":a;chara\dorothy_ct01.bmp",0,0
gosub *syasei2
>Tightly held next to Dorothy as she covers him in her juices, Luka comes.\
mov %viclose,1:gosub *lose
mov %2584,%2584+1:if %2584=1 mov %count_koenemy,%count_koenemy+1
if %2584>%count_most mov %count_most,%2584:mov $count_mostname,$name
count 12,11
mov $bad1,"Luka came while being covered in digestive juices."
gosub *face2
name $name
>Arara, you came?@
>Having an orgasm while being dissolved... How pitiful.\
name ""
goto *dorothy_h



*dorothy_h

mov $bad2,"Tightly bound next to Dorothy, Luka was digested."
if %2584=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,21:hseanwave:goto *dorothy_hb
name "Luka"
>Ahh...\
name ""
name $name
>Hehe... Now it's time for some fun.@
>Held by this predation arm of mine, you'll be digested by me.\
name ""
mov %hseanwave,21:hseanwave
cspl 690,699
lsp 700,":a;chara\dorothy_h3.bmp",0,0:print 10,500
>Dorothy wraps me with a giant arm.@
>Inside the arm, it feels like I'm being held by a giant mouth.\
name "Luka"
>Ahh!@> Stop, let go!\
name ""
>Tiny little hairs cover her body, and start to rub against me.@
>A sticky fluid covers the hairs, painting my body with it as they move back and forth.\
>The sticky fluid makes me stick to her body...@> Held by the arm and stuck to the hairs, I'm trapped.\
name $name
>Hehe... You're just simple food now.@
>All that's left is for me to digest you...\
name ""
goto *dorothy_hb



*dorothy_hb

>Her body starts to wriggle, as more digestive juices spill out onto me.@
>Trembling in fear at the thought of being digested alive, I struggle against her.\
name "Luka"
>N...No!@>Stop, get off!\
name ""
>But no matter how hard I struggle, I can't break free.@
>All my movements do is cover me with more digestive juices.\
>At this rate, I won't be able to get away...\
>The realization of the cruel fate that awaits sends chills through my body.\
name "Luka"
>H...Help me...\
name ""
name $name
>I won't let you go... But I'm not heartless.@
>Since you're a cute little boy, I'll let you feel good.\
name ""
name "Luka"
>Eh...?@> Ahh!\
name ""
lsp 690,":a;chara\dorothy_ct01.bmp",0,0:print 10,500
>Her sticky hairs wrap around my penis, and force me into a tiny hole!\
>It feels like I've been suddenly forced into a tiny vagina...\
name $name
>Hehe, you're so lucky...@> I'll play with your penis until you're digested.\
name ""
name "Luka"
>Ahhhh!!\
name ""
>The flesh-like hole wriggles and moves, gently tightening around my twitching penis.@
>At the same time, the fine sticky hairs wrapped around my penis keep forcing me deeper inside.\
>I feel the digestive juices all over my body, but all of my feelings are focused on my penis.\
name "Luka"
>Ahhh... That feels good...\
name ""
name $name
>Hehe, it feels good when I do this, doesn't it?@
>I'll make it even more intense, so enjoy...\
name ""
name "Luka"
>Ahhhh!\
name ""
>The hairs around my penis start to move up and down, as they slowly pull me deeper inside her.\
>Every thrust causes more digestive juices to splash out of her onto me, but it doesn't feel painful.\
>Tightly wrapped in her flesh, the digestive juices act as a lubricant as the hairs force me in and out of her.\
>I moan in pleasure as her bizarre organ forces me to an orgasm.\
name "Luka"
>Ahhh...!\
name ""
gosub *syasei1
lsp 700,":a;chara\dorothy_h4.bmp",0,0
lsp 690,":a;chara\dorothy_ct02.bmp",0,0
gosub *syasei2
>Too quickly, I'm brought to an orgasm inside of her.\
>She's eating me, and I still came inside of her...@
>The humiliation and horror at this thought makes my body start to shake.\
name "Luka"
>Ahh...\
name ""
name $name
>Hehe... You came.@
>This is what makes males the best kind of food to eat!\
>More, more... Give me more...@
>I'll make you feel good, so give me more!\
name ""
name "Luka"
>S...Stop... Ahhh!\
name ""
mov %hseanwave,22:hseanwave
>Her fleshy hole starts to move around my penis, its soft walls closing in as if it was chewing.\
>Each chewing motions covers me with more juices, overflowing out of her and all over my body.\
>The pleasure makes me go almost crazy as I hang here helplessly in her embrace.\
name "Luka"
>Ahh... Haaa...\
name ""
name $name
>Hehe... Boys are so easy.@
>Just play with them a little, and they get so docile.\
>And even better, they taste so good.\
name ""
name "Luka"
>Ah... Again... Coming...\
name ""
>She giggles at me as her strange organ continues to chew on my penis, forcing me to another orgasm.\
gosub *syasei1
lsp 700,":a;chara\dorothy_h5.bmp",0,0
lsp 690,":a;chara\dorothy_ct03.bmp",0,0
gosub *syasei2
>I explode inside of her again as the fine hairs milk out each drop from my penis.@
>After my ejaculation is over, the flesh inside of her starts to absorb the semen.\
name "Luka"
>Ahh...\
name ""
>Even as I relax in the ecstasy, the little hairs all over the rest of my body continue to cover me with digestive juices.\
>The strange warm sensation flows over my body, relaxing me even more.\
>Before I realized it, my whole body felt like it was floating on a cloud, exhausted.@
>Just like drifting off to sleep, entrusting myself to this exhaustion would feel so good...\
name "Luka"
>Wh...What is this...?\
name ""
name $name
>While you were enjoying coming inside me, your body already started to dissolve...\
name ""
name "Luka"
>A...Aiiee!\
name ""
>Suddenly brought back to my senses, I notice that I can't feel parts of my body.@
>The constant pleasure coming from my penis continues, but other parts of my body are numb...\
name $name
>Hehehe... Your penis already started to melt, too.\
>Why are you so surprised?@>Didn't you expect to be eaten?@
>As soon as you were wrapped in my predation arm, your life was mine.\
name ""
name "Luka"
>Ahhh!@>Stop! Get off!\
name ""
>I scream, but I can't even struggle any longer.@
>I can't do anything any more... I've been caught by this carnivorous plant...\
if %hosyoku_cut=1 goto *hosyoku_cut
name $name
>Now, give up and be digested...@
>Until the very end, I'll let you keep ejaculating...\
>Here, I'll make you come again.\
name ""
name "Luka"
>Ahhhh!\
name ""
>The sticky hairs around my penis tighten suddenly, forcing me over the edge.\
gosub *syasei1
lsp 700,":a;chara\dorothy_h6.bmp",0,0
lsp 690,":a;chara\dorothy_ct04.bmp",0,0
gosub *syasei2
>Immersed in ecstasy, I feel myself giving in to the exhaustion.\
>I'm the prey of this heartless plant...@
>Even while I cry, she continues to digest my body.\
name $name
>Hehe... You're already mostly digested...@
>But even so, you're still coming.@>What a pitiful boy.\
name ""
name "Luka"
>A...aa...\
name ""
>Still basking in the afterglow of my last orgasm, my consciousness itself is melted away.\
gosub *anten
mov %hseanwave,0:hseanwave
name $name
>That was tasty... Hehe.\
name ""
>Today, another young boy was eaten by the plant monsters.@
>Used to satisfy both her hunger and lust, his life was dissolved away.\
>...........\
goto *badend



*rafi_start

mov $name,"Raffia"
mov $name2,"Raffia"
mov $lavel,"rafi"
mov $tatie1,"rafi_st01"
mov $tatie2,"rafi_st02"
mov $tatie3,"rafi_st03"
mov $tatie4,"rafi_st02"
mov $haikei,"bg095"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,3400
if %nanido=2 mov %max_enemylife,3800
if %nanido=3 mov %max_enemylife,4000
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,99
mov %earth_keigen,15
if %nanido=3 mov %earth_keigen,8
mov %music,2
mov %tikei,2
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $half_s1,"Hehe, is it good?"
mov $half_s2,"Once you're inside my pitcher, it will feel even better..."
mov $kiki_s1,"You want to feel good now, don't you?"
mov $kiki_s2,"Once you're in here, it will feel so good you'll melt away..."
mov %end_n,6
mov %exp_minus,45000
mov %zmonster_x,-300
mov %tukix,320
mov %owaza_count1a,6
name $name
>Arara, you defeated Dorothy...@
>Even though you're a human... You're quite skilled.\
name ""
name "Luka"
>Stop attacking the defeated.@
>If you refuse, I'll seal you too.\
name ""
gosub *face2
name $name
>Hehe... I can't do that.@
>I enjoy slowly dissolving my prey too much.\
>I'll put you in my pitcher too, and let you join in the fun...@
>You'll drown in the pleasure...\
name ""
gosub *face1
goto *common_main



*rafi_v

gosub *face3
name $name
>It can't be...!@>I...can't...!\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Raffia turns into a normal pitcher plant!\
mov %2285,1
mov %count_ko,%count_ko+1
if %zukanon=1 return *zukan_commonkaisou0
goto *sean0189b



*rafi_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>Hehe... You want to be melted in pleasure?@
>Then, please enjoy...\
name ""
goto *rafi_a



*rafi_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *rafi_kousan
if %cmd1=16 goto *rafi_onedari
if %cmd1=17 goto *common_skill
goto *rafi_main



*rafi_a

if %kousoku=1 gosub *rafi_a5:goto *common_main
if %status=1 gosub *rafi_a4:goto *common_main
rnd2 %ransu,1,3
if %ransu=1 gosub *rafi_a1:goto *common_main
if %ransu=2 gosub *rafi_a2:goto *common_main
if %ransu=3 && %owaza_count1a>7 gosub *rafi_a3:goto *common_main
skip -4



*rafi_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Let me make you feel good..."
if %ransu=2 mov $sel1,"How does it feel to be teased by ivy?"
if %ransu=3 mov $sel1,"Where do you want me to touch...?"
name $name
eng $sel1:$sel6\
name ""
skillname "Ivy Caress"
dwave 1,"se\ero_makituki1.ogg"
>Raffia's ivy rubs Luka's body all over!
if %wind=1 && %nanido<2 mov %wind_kakuritu,15
if %wind=1 && %nanido=2 mov %wind_kakuritu,10
if %wind=1 && %nanido=3 mov %wind_kakuritu,7
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3367
if %nanido<2 damage 50,60
if %nanido=2 damage 60,70
if %nanido=3 damage 70,80
skillname ""
if %mylife=0 sub %stack,1:return *rafi_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*rafi_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"This is how I'll melt you..."
if %ransu=2 mov $sel1,"Fill this pitcher with your semen..."
if %ransu=3 mov $sel1,"This is a pitcher just for a penis..."
name $name
eng $sel1:$sel6\
name ""
skillname "Mini Pitcher"
dwave 1,"se\ero_syokusyu3.ogg"
eng "A small pitcher is forced onto Luka's penis!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,15
if %wind=1 && %nanido=2 mov %wind_kakuritu,10
if %wind=1 && %nanido=3 mov %wind_kakuritu,7
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>The liquid in the small pitcher stimulates Luka's penis!
skillcount2 3368
if %nanido<2 damage 55,65
if %nanido=2 damage 65,75
if %nanido=3 damage 75,85
skillname ""
if %mylife=0 sub %stack,1:return *rafi_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*rafi_a3

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name $name
>Hehe... You want to jump in my pitcher soon, don't you?\
name ""
skillname "Intoxicating Fragrance"
dwave 1,"se\gas.ogg"
eng "A sweet smell floods out from Raffia's pitcher.":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,100
if %wind=1 && %nanido=2 mov %wind_kakuritu,100
if %wind=1 && %nanido=3 mov %wind_kakuritu,50
if %wind=2 && %nanido<2 mov %wind_kakuritu,100
if %wind=2 && %nanido=2 mov %wind_kakuritu,100
if %wind=2 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %status,1:gosub *status_print
>Luka is immersed in ecstasy!\
skillname ""
name "Luka"
>Haa...\
name ""
if %kousan=2 sub %stack,1:return
name $name
>Melt in the pleasure...\
name ""
mov %status_turn,100
sub %stack,1
return



*rafi_a4

add %stack,1
skillname "Dunking Ivy"
dwave 1,"se\ero_makituki3.ogg"
>Ivy wraps around Luka's body, and lifts him into the air!\
mov %kousoku,1:gosub *status_print
>Luka's body has been bound by Raffia!\
skillname ""
name "Luka"
>Ahhh...\
name ""
>Luka is slowly lifted toward Raffia's pitcher!\
name $name
>Hehe... You'll be soaked in this pitcher.@
>And just like an insect, you'll be dissolved...\
name ""
if %earth=0 && %nanido<2 mov %genmogaku,0
if %earth=0 && %nanido=2 mov %genmogaku,0
if %earth=0 && %nanido=3 mov %genmogaku,0
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
sub %stack,1
return



*rafi_a5

add %stack,1
>The ivy is holding Luka in the air...\
skillname "Intoxicating Pitcher"
dwave 1,"se\ero_slime3.ogg"
lsp 700,":a;chara\rafi_h1.bmp",0,0:print 10,500
>Luka is dropped into the pitcher!\
>His whole body is covered in digestive fluids!
skillcount2 3369
mov %damage_kotei,1
damage 50,60
skillname ""
if %mylife=0 sub %stack,1:return *rafi_h3
name "Luka"
>Ahhhhh!!\
name ""
name $name
>Hehe... The lukewarm juices feel good, don't they?@
>You'll melt away to nothing in there...\
name ""
sub %stack,1
goto *rafi_a6



*rafi_a6

add %stack,1
>Luka is immersed in ecstasy...@
>Luka's stuck inside the pitcher...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You'll melt to nothing inside my pitcher...":mov $sel2,"The digestive juices cover Luka's body!"
if %ransu=2 mov $sel1,"Dissolving in ecstasy... Are you happy?":mov $sel2,"The inner walls of the pitcher push against Luka's body!"
if %ransu=3 mov $sel1,"It feels good, doesn't it?":mov $sel2,"The digestive juices flood Luka with pleasure!"
if %ransu=4 mov $sel1,"Melt in ecstasy and become my food...":mov $sel2,"Luka is immersed in melting pleasure!"
if %ransu=5 mov $sel1,"How does it feel to be eaten like an insect?":mov $sel2,"Drowning in the digestive juices, Luka is flooded with pleasure!"
name $name
eng $sel1:$sel6\
name ""
skillname "Intoxicating Pitcher"
dwave 1,"se\ero_slime3.ogg"
eng $sel2:$sel6
skillcount2 3369
mov %damage_kotei,1
damage 50,60
skillname ""
if %mylife=0 sub %stack,1:return *rafi_h3
sub %stack,1
goto *rafi_a6



*rafi_onedari

mov $list1,"Ivy Caress"
if %3367>0 mov %list_num1,1
mov $list2,"Mini Pitcher"
if %3368>0 mov %list_num2,1
mov $list3,"Intoxicating Pitcher"
if %3369>0 mov %list_num3,1
gosub *cmd_onedari
if %cmd1=11 goto *rafi_onedari1
if %cmd1=12 goto *rafi_onedari2
if %cmd1=13 goto *rafi_onedari3
if %cmd1=-1 goto *rafi_main
goto *rafi_onedari



*rafi_onedari1

gosub *onedari_syori
name $name
>You want to be teased by my ivy?\
name ""
gosub *rafi_a1
skip -1



*rafi_onedari2

gosub *onedari_syori
name $name
>You want a pitcher made just for your penis?\
name ""
gosub *rafi_a2
skip -1



*rafi_onedari3

gosub *onedari_syori
name $name
>Hehe... You want me to melt you?\
name ""
gosub *rafi_a3
gosub *rafi_a4
gosub *rafi_a5
skip -1



*rafi_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\rafi_bk03.bmp",0,0
gosub *syasei2
>As his entire body is massaged by Raffia's ivy, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2585,%2585+1:if %2585=1 mov %count_koenemy,%count_koenemy+1
if %2585>%count_most mov %count_most,%2585:mov $count_mostname,$name
count 12,11
mov $bad1,"Luka was forced to come by Raffia's ivy."
gosub *face2
name $name
>Arara... Coming just from some ivy...\
name ""
goto *rafi_h



*rafi_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\rafi_bk04.bmp",0,0
gosub *syasei2
>Forced into the tiny pitcher, Luka comes, filling it with semen.\
mov %viclose,1:gosub *lose
mov %2585,%2585+1:if %2585=1 mov %count_koenemy,%count_koenemy+1
if %2585>%count_most mov %count_most,%2585:mov $count_mostname,$name
count 12,11
mov $bad1,"Luka was forced to orgasm by Raffia's tiny pitcher."
gosub *face2
name $name
>Arara... If the tiny pitcher was too much for you, then the big one will be...\
name ""
goto *rafi_h



*rafi_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\rafi_h2.bmp",0,0
gosub *syasei2
>Covered in digestive juices, the bizarre intoxicating stimulation of the juices forces Luka to orgasm.\
mov %viclose,1:gosub *lose
mov %2585,%2585+1:if %2585=1 mov %count_koenemy,%count_koenemy+1
if %2585>%count_most mov %count_most,%2585:mov $count_mostname,$name
count 12,11
mov $bad1,"Luka was forced to come inside Raffia's pitcher."
gosub *face2
name $name
>Hehe... Did it feel good to come while being melted?\
name ""
goto *rafi_h



*rafi_h

mov $bad2,"Submerged in Raffia's pitcher, Luka was digested."
if %2585=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,21:hseanwave:lsp 700,":a;chara\rafi_h3.bmp",0,0:print 10,500:goto *rafi_hb
name "Luka"
>Ahhh...\
name ""
name $name
>Now then, come inside...@
>I'll digest you inside my pitcher.\
name ""
name "Luka"
>S...Stop...\
name ""
dwave 1,"se\ero_makituki2.ogg"
>Her vines wrap around me.@
>Too weak to resist, they lift me into the air and slowly bring me closer to her.\
name "Luka"
>Ahh!@> Help me!\
name ""
>Right in front of me, the pitcher attached to her body is open and waiting.\
>A pitcher big enough for a human to easily fit in, it's filled with a sweet smelling amber liquid.\
>A nightmare liquid that will dissolve even a human's body...\
name "Luka"
>S...Stop it... No...\
name ""
name $name
>Hehehe, everyone is reluctant at first.@
>But once they're submerged, they all enjoy it.\
name ""
mov %hseanwave,21:hseanwave
cspl 690,699
lsp 700,":a;chara\rafi_h3.bmp",0,0:print 10,500
>With that, the vines release me, dropping me into her pitcher!\
name "Luka"
>Ahhhh...\
name ""
>The amber liquid quickly washes over me, covering every inch of my body in the warm juice.\
>I'm instantly washed over with a powerful feeling of relaxation, the opposite of the fear I'm filled with.\
goto *rafi_hb



*rafi_hb

name "Luka"
>Noo... Help me...\
name ""
>I claw at the sides of the pitcher, but the incredibly slippery surface is impossible to get a hold on.\
>As I struggle and splash around inside her pitcher, Raffia's sadistic core is clearly enjoying the sight of me.\
name $name
>Hehehe... You look so pitiful.@
>I love watching my prey struggle as I digest them.\
>You too will slowly be digested.\
name ""
name "Luka"
>Aiiee...\
name ""
>I can't escape...@
>The feeling of hopelessness washes over me.\
>Other desires start to awaken inside me...@
>I want to relax in the warm amber liquid... Let it wash over me as I let it submerge me.\
>If I could just relax and give in, it would feel so nice...\
name $name
>When prey enter my pitcher, they start to desire their own digestion...@
>You're starting to feel it now too, aren't you?\
name ""
name "Luka"
>That's not...\
name ""
name $name
>Hehe... I wonder how long you'll continue to bluff.\
name ""
name "Luka"
>Ahhh...\
name ""
>I can't move my body at all, no matter how much I will my mind to struggle.@
>It's as if my body itself just wants to relax in comfort in here...\
>Frustrated at my body refusing to act as I want it to, I feel my penis getting hard.@
>Humiliated at being unable to control myself at all, I bite my lip in shame.\
name $name
>Ara... Did you get an erection?\
name ""
name "Luka"
>Ahhh... W...Why...?\
name ""
>My penis gets hard, moving through the thick amber liquid.@
>Just the feeling itself of having my penis floating in her juices makes me shiver in pleasure.\
name "Luka"
>Ahhh...\
name ""
gosub *syasei1
lsp 700,":a;chara\rafi_h4.bmp",0,0
gosub *syasei2
>As if I was forced to, I ejaculate inside the pitcher.\
>Nothing in particular seemed to trigger it, it just came out.@
>The weak ejaculation just adds to the pitiful state I'm in.\
name $name
>Arara...@
>Coming like that... How pathetic.\
name ""
name "Luka"
>Uurhhg...\
name ""
>I shiver, on the verge of tears in shame.@
>Of all the things, I had to ejaculate while just floating in here...\
name $name
>Coming inside my pitcher like that... What a shameful little boy.@
>But I'm a very kind monster, so I'll give you some extra care.\
name ""
>Small vines start to move inside the pitcher I'm submerged in.@
>One of the vines has a small pitcher at the end of it, slowly moving toward my penis submerged in the amber liquid.\
name $name
>A man's instinct is to insert in whatever he can, right?@
>You can put your penis in there if you want, I don't mind.\
name ""
name "Luka"
>S...Stop it!\
name ""
mov %hseanwave,22:hseanwave
lsp 690,":a;chara\rafi_ct01.bmp",0,0:print 10,500
>Despite my resistance, the small pitcher is pushed onto my penis!\
name "Luka"
>Ah!@>Ahhhh!!\
name ""
>In the next instant, my body relaxes again.@
>The small pitcher starts to suck and pump on my penis, pushing and pulling the amber liquid past my penis.\
name $name
>That's a pitcher for digesting sperm.@
>Of course because of that, it's specially designed to pleasure men.\
>So please enjoy it.@
>Either way, you'll still be digested...\
name ""
name "Luka"
>Ahhhh!\
name ""
>The soft walls of the tiny pitcher chew and wriggle around my penis.\
name "Luka"
>Haaa...\
name ""
>My lower body starts to tingle as my head goes white.@
>Immersed in her warm digestive juices with another pitcher sucking on my penis, it feels too good to do anything but drown myself in the pleasure.\
gosub *syasei1
lsp 700,":a;chara\rafi_h5.bmp",0,0
lsp 690,":a;chara\rafi_ct02.bmp",0,0
gosub *syasei2
>Only a short while after my last orgasm, I come again, filling the small pitcher with my cloudy semen.\
name $name
>Hehehe, you couldn't stop yourself after all.@
>This tiny pitcher is great, isn't it?\
>Don't hold back, just keep coming...@
>Semen is the best nutrient for me, after all.\
name ""
name "Luka"
>Aaaa...\
name ""
>The small pitcher continues to suck on me, its soft walls chewing and wriggling around me.@
>Each movement forces the warm liquid to flow around my penis, stimulating every part of my penis.\
name "Luka"
>Ahh... It feels good...\
name ""
name $name
>Hehe, so you like this?@
>Then I'll make it even better...\
name ""
>More liquid is shot from the tiny pitcher, flowing past my penis.@
>I know it's digestive juices... But it feels so good.\
>The warm liquid covers my body, filling me with a relaxing feeling that makes it feel like my body is melting.\
name "Luka"
>Ahh... I'm melting...\
name ""
name $name
>And it feels good, doesn't it?@
>Dissolving in my pitcher is like relaxing in heaven, you know...\
name ""
name "Luka"
>Aaa...\
name ""
>My body itself is dissolving...@
>But even so, the tiny pitcher is sucking on my penis at the same time, and it feels so good.\
>The sense of ecstasy overpowers my fear and disgust, causing me to sigh in pleasure as I climax again.\
gosub *syasei1
lsp 700,":a;chara\rafi_h6.bmp",0,0
lsp 690,":a;chara\rafi_ct03.bmp",0,0
gosub *syasei2
>Drool drips out of my mouth as I shoot semen in her.@
>It's like I've been put into a trance... I can't focus on anything but the good feelings around me.\
name "Luka"
>Haaa...\
name ""
>Unable to control my own body at all, I surrender to the pleasure.@
>I can't escape, and there's no hope...\
>At the very least, the digestive juices make me feel so good...@
>Thinking those ruinous thoughts, I give my body over to Raffia to be digested.\
if %hosyoku_cut=1 goto *hosyoku_cut
name "Luka"
>Aaa... Good...\
name ""
name $name
>Hehe... So you're happily giving in?@
>Your body will melt into nothing and become nothing but my food...\
name ""
name "Luka"
>Haa...\
name ""
>This pleasure is going to dissolve my body...@
>My arms, my legs, even my head...@
>Everything will be dissolved and digested inside this pitcher.\
>But I can't feel anything but raw pleasure as even my consciousness slowly melts away.\
name "Luka"
>Ahh...\
name ""
gosub *syasei1
lsp 690,":a;chara\rafi_ct04.bmp",0,0
gosub *syasei2
>Drooling and with my eyes unfocused, I come inside the tiny pitcher again.\
name $name
>The seed you use to create offspring is instead being spilled here...@
>But even still, you look so happy.\
>Human male prey really is the most pathetic.\
name ""
>Raffia giggles as she watches me slowly dissolve in her pitcher.@
>But drunk on the sensations, I don't care...@> I've already given myself to this fate.\
>Inside her pitcher, my body itself dissolves into nothing but nutrients for her.\
gosub *anten
mov %hseanwave,0:hseanwave
>Thus, another young boy was dissolved by a carnivorous plant monster.@
>Trading his body itself for the pleasure, his life ended as nothing but food for her.\
>.............\
goto *badend



*dina_start

mov $name,"Deana"
mov $name2,"Deana"
mov $lavel,"dina"
mov $tatie1,"dina_st01"
mov $tatie2,"dina_st02"
mov $tatie3,"dina_st03"
mov $tatie4,"dina_h1"
mov $haikei,"bg095"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,3500
if %nanido=2 mov %max_enemylife,3900
if %nanido=3 mov %max_enemylife,4300
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,15
if %nanido=3 mov %earth_keigen,8
mov %music,2
mov %tikei,2
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"What awkward struggling..."
mov $mogaku_sel2,"Being digested as you struggle... How pitiful."
mov $mogaku_sel3,"If you hate it that much, I'll have to make it feel better..."
mov $mogaku_sel4,"You're just prey now..."
mov $mogaku_sel5,"Just give up and come..."
mov $mogaku_dassyutu1,"The longer you struggle, the longer you'll suffer..."
mov $mogaku_dassyutu2,""
mov $mogaku_earth_dassyutu1,"That power...!?"
mov $mogaku_earth_dassyutu2,""
mov $half_s1,"Well? It feels amazing, doesn't it?"
mov $half_s2,"Accept it, and let me digest you."
mov $kiki_s1,"I'll dissolve your body, and use it as my nourishment..."
mov $kiki_s2,"Doesn't that just sound dreamy?"
mov %end_n,6
mov %exp_minus,45000
mov %zmonster_x,-250
mov %tukix,280
mov %owaza_count1a,6
mov %owaza_count2a,6
name $name
>I'm the eldest of the Canaan Sisters, Deana.@
>It looks like my sisters have you to thank for their current forms.\
name ""
name "Luka"
>There was another sister...@
>Are there more after you!?\
name ""
name $name
>I'm the last of us three.@
>But that doesn't matter, since I'll be eating you.\
>Honestly, I prefer insects...@
>But since you challenged us, I'll gladly eat you.\
name ""
goto *common_main



*dina_v

gosub *face3
name $name
>All three of us lost...!?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Deana turns into a normal carnivorous plant!\
mov $name,"Canaan Sisters"
mov %viclose,1:gosub *victory_plural
mov %getexp,15000:gosub *lvup
mov %2286,1
goto *sean0190



*dina_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>So you want to be digested by me?\
name ""
goto *dina_a



*dina_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *dina_kousan
if %cmd1=16 goto *dina_onedari
if %cmd1=17 goto *common_skill
goto *dina_main



*dina_a

if %status=1 gosub *dina_a5:goto *common_main
if %kousoku=1 gosub *dina_a3:goto *common_main
rnd2 %ransu,1,4
if %ransu<3 gosub *dina_a1:goto *common_main
if %ransu=3 && %owaza_count1a>7 gosub *dina_a2:goto *common_main
if %ransu=4 && %owaza_count2a>7 gosub *dina_a4:goto *common_main
skip -4



*dina_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll tease your penis..."
if %ransu=2 mov $sel1,"I'll even dissolve your penis..."
if %ransu=3 mov $sel1,"Digesting their penis... Most men orgasm during it."
name $name
eng $sel1:$sel6\
name ""
skillname "Venus Bend"
dwave 1,"se\ero_makituki2.ogg"
eng "Deana's predation organ wraps around Luka's penis!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,20
if %wind=1 && %nanido=2 mov %wind_kakuritu,15
if %wind=1 && %nanido=3 mov %wind_kakuritu,10
if %wind=2 && %nanido<2 mov %wind_kakuritu,40
if %wind=2 && %nanido=2 mov %wind_kakuritu,35
if %wind=2 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>It squeezes tightly around Luka's penis!
skillcount2 3665
if %nanido<2 damage 55,65
if %nanido=2 damage 65,75
if %nanido=3 damage 75,85
skillname ""
if %mylife=0 sub %stack,1:return *dina_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*dina_a2

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name $name
>I'll catch you...\
name ""
skillname "Venus Trap"
dwave 1,"se\ero_makituki3.ogg"
>Deana's predation organ wraps around Luka's body!
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3666
if %nanido<2 damage 55,65
if %nanido=2 damage 65,75
if %nanido=3 damage 75,85
lsp 690,":a;chara\dina_ct01.bmp",0,0
mov %kousoku,1:gosub *status_print
>Luka's being restrained by Deana!\
skillname ""
if %mylife=0 sub %stack,1:return *dina_h2
if %kousan=2 sub %stack,1:return
gosub *face2
name $name
if %first_sel1=1 skip 4
>I'll tease you while I digest you...@
>You'll go to heaven while I play with you...\
skip 3
>I'll tease you while I digest you...@
>This time, I'll send you to heaven...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,2
if %earth=0 && %nanido=2 mov %genmogaku,2
if %earth=0 && %nanido=3 mov %genmogaku,3
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,1
sub %stack,1
return



*dina_a3

add %stack,1
>Luka is being restrained by Deana...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Come while I hold you...":mov $sel2,"Her soft wavy flesh stimulates Luka!"
if %ransu=2 mov $sel1,"Hehe, I'm going to eat you, you know?":mov $sel2,"Her organ squeezes Luka, as if it was chewing him!"
if %ransu=3 mov $sel1,"How about I tease you like this...?":mov $sel2,"Deana's organ tightens around Luka!"
if %ransu=4 mov $sel1,"You're going to melt away you know...":mov $sel2,"The warm digestive juices slowly drip onto Luka's body!"
if %ransu=5 mov $sel1,"Does it feel good...? Hehe...":mov $sel2,"The soft walls tighten around Luka's body!"
name $name
eng $sel1:$sel6\
name ""
skillname "Venus Trap"
dwave 1,"se\ero_makituki3.ogg"
eng $sel2:$sel6
skillcount2 3666
if %nanido<2 damage 50,60
if %nanido=2 damage 60,70
if %nanido=3 damage 70,80
skillname ""
if %mylife=0 sub %stack,1:return *dina_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*dina_a4

add %stack,1
mov %owaza_count2a,0
if %kousan=2 skip 4
name $name
>It's time to melt you...\
name ""
skillname "Intoxicating Fragrance"
dwave 1,"se\gas.ogg"
eng "A sweet smell comes off of Deana's body!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,100
if %wind=1 && %nanido=2 mov %wind_kakuritu,100
if %wind=1 && %nanido=3 mov %wind_kakuritu,50
if %wind=2 && %nanido<2 mov %wind_kakuritu,100
if %wind=2 && %nanido=2 mov %wind_kakuritu,100
if %wind=2 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes it away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %status,1:gosub *status_print
>Luka is immersed in ecstasy!\
skillname ""
name "Luka"
>Ahhh...\
name ""
name $name
>You're in a trance now...@
>Now to make you into prey...\
name ""
mov %status_turn,100
sub %stack,1
return



*dina_a5

add %stack,1
skillname "Philia Melt"
dwave 1,"se\ero_makituki3.ogg"
>Deana's predation organ squeezes Luka's body!
skillcount2 3370
damage 80,100
lsp 690,":a;chara\dina_ct01.bmp",0,0
mov %kousoku,1:gosub *status_print
>Luka's being held by Deana!\
skillname ""
if %mylife=0 sub %stack,1:return *dina_h4
gosub *face2
name $name
>Now to dissolve you...@
>Bound by my feeding organ, I'll eat you just like an insect...\
name ""
sub %stack,1
goto *dina_a6



*dina_a6

add %stack,1
>Luka is immersed in ecstasy...@
>Luka is bound by Deana's predation organ...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"How does it feel to be eaten alive?":mov $sel2,"The warm digestive juices wash over Luka's body!"
if %ransu=2 mov $sel1,"I'll be sure to digest your penis, too.":mov $sel2,"Digestive juices cover Luka's penis!"
if %ransu=3 mov $sel1,"It's too good to resist, isn't it?":mov $sel2,"The soft flesh of her organ pushes against Luka's body!"
if %ransu=4 mov $sel1,"Doesn't it feel amazing?":mov $sel2,"The soft flesh of her organ massages Luka's body!"
if %ransu=5 mov $sel1,"My digestive juices will cover every inch of your body...":mov $sel2,"The soft flesh of her organ paints digestive juices all over Luka's body!"
name $name
eng $sel1:$sel6\
name ""
skillname "Philia Melt"
dwave 1,"se\ero_makituki3.ogg"
eng $sel2:$sel6
skillcount2 3370
mov %damage_kotei,1
damage 80,100
skillname ""
if %mylife=0 sub %stack,1:return *dina_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
goto *dina_a6



*dina_onedari

mov $list1,"Venus Bend"
if %3665>0 mov %list_num1,1
mov $list2,"Venus Trap"
if %3666>0 mov %list_num2,1
mov $list3,"Philia Melt"
if %3370>0 mov %list_num3,1
gosub *cmd_onedari
if %cmd1=11 goto *dina_onedari1
if %cmd1=12 goto *dina_onedari2
if %cmd1=13 goto *dina_onedari3
if %cmd1=-1 goto *dina_main
goto *dina_onedari



*dina_onedari1

gosub *onedari_syori
name $name
>You want your penis to be tortured?\
name ""
gosub *dina_a1
skip -1



*dina_onedari2

gosub *onedari_syori_k
name $name
>You want to be bound and played with?\
name ""
if %kousoku=0 gosub *dina_a2
gosub *dina_a3
skip -1



*dina_onedari3

gosub *onedari_syori
name $name
>Hehe... So you finally want me to eat you?\
name ""
gosub *dina_a4
gosub *dina_a5
skip -1



*dina_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\dina_bk03.bmp",0,0
gosub *syasei2
>Stroked by her soft organ, Luka finally comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2586,%2586+1:if %2586=1 mov %count_koenemy,%count_koenemy+1
if %2586>%count_most mov %count_most,%2586:mov $count_mostname,$name
count 12,11
mov $bad1,"Luka succumbed to Deana's venus bend skill."
gosub *face2
name $name
>This predatory organ is another mouth of mine...@
>To think you would dirty it so... What a pathetic man.\
name ""
goto *dina_h



*dina_h2

mov %ikigoe,3:gosub *ikigoe
name $name
>Ara... Already?\
name ""
gosub *syasei1
lsp 700,":a;chara\dina_h2.bmp",0,0
lsp 690,":a;chara\dina_ct02.bmp",0,0
gosub *syasei2
>The moment Luka's grabbed by her organ, Luka comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2586,%2586+1:if %2586=1 mov %count_koenemy,%count_koenemy+1
if %2586>%count_most mov %count_most,%2586:mov $count_mostname,$name
count 12,11
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka accidentally came as soon as Deana grabbed him."
gosub *face2
name $name
>Coming just from that...?@
>Do you like my predatory organ that much?\
name ""
goto *dina_h



*dina_h3

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\dina_h2.bmp",0,0
lsp 690,":a;chara\dina_ct02.bmp",0,0
gosub *syasei2
>As his entire body is toyed with by her predatory organ, Luka comes.\
mov %viclose,1:gosub *lose
mov %2586,%2586+1:if %2586=1 mov %count_koenemy,%count_koenemy+1
if %2586>%count_most mov %count_most,%2586:mov $count_mostname,$name
count 12,11
mov $bad1,"Luka succumbed to Deana's venus trap skill."
gosub *face2
name $name
>This predatory organ is another mouth of mine...@
>To think you would dirty it so... What a pathetic man.\
name ""
goto *dina_h



*dina_h4

mov %ikigoe,3:gosub *ikigoe
name $name
>Ara... Already?\
name ""
gosub *syasei1
lsp 700,":a;chara\dina_h2.bmp",0,0
lsp 690,":a;chara\dina_ct02.bmp",0,0
gosub *syasei2
>The moment Luka's grabbed by her organ, Luka comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2586,%2586+1:if %2586=1 mov %count_koenemy,%count_koenemy+1
if %2586>%count_most mov %count_most,%2586:mov $count_mostname,$name
count 12,11
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka succumbed as soon as Deana's predatory organ touched him."
gosub *face2
name $name
>Coming just from that...?@
>Do you like my predatory organ that much?\
name ""
goto *dina_h



*dina_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\dina_h2.bmp",0,0
lsp 690,":a;chara\dina_ct02.bmp",0,0
gosub *syasei2
>As her digestive juices cover him, Luka comes, unable to take the stimulation any longer.\
mov %viclose,1:gosub *lose
mov %2586,%2586+1:if %2586=1 mov %count_koenemy,%count_koenemy+1
if %2586>%count_most mov %count_most,%2586:mov $count_mostname,$name
count 12,11
mov $bad1,"Luka succumbed to Deana's philia melt skill."
gosub *face2
name $name
>Doesn't it feel good being eaten by me?@
>Until your body is nothing but liquid, it will keep feeling even better...\
name ""
goto *dina_h



*dina_h

mov $bad2,"Stuck in her predatory organ, Luka was digested."
if %2586=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,21:hseanwave:goto *dina_hb
name "Luka"
>Ahh...\
name ""
name $name
>Now that that's been settled...@
>I'll need to quickly dispose of you.\
name ""
mov %hseanwave,21:hseanwave
cspl 690,699
lsp 700,":a;chara\dina_h1.bmp",0,0:print 10,500
>Deana's predation organ clamps around my body!\
name $name
>This is how I eat my prey.@
>I need to eat you quickly, so please don't struggle too much.\
name ""
goto *dina_hb



*dina_hb

name "Luka"
>Ahhh!\
name ""
>Sandwiched inside the soft organ, it starts to press into my whole body.@
>It's as if the toothless mouth is chewing on me...\
name $name
>Don't worry, it won't hurt.@
>I'm in a hurry, so I'll dissolve you nice and fast...\
name ""
>The organ chews on me with more force than before.@
>Unceremoniously chewing me, I'm nothing more than a piece of meat for it to eat...\
name "Luka"
>Ahh...\
name ""
>Strange juices fill the mouth, covering my body.@
>Every time the juices land on my body, a strange sensation spreads from the spot.\
>Reacting to that sensation, my penis starts to get erect.\
name $name
>...You got an erection?@
>Even though there's no chance to reproduce?\
>Sheesh... Men are so pathetic.\
name ""
lsp 700,":a;chara\dina_h2.bmp",0,0
if %kousoku=0 lsp 690,":a;chara\dina_ct01.bmp",0,0
print 10,500
>My erect penis is sucked into her soft flesh.@
>Stuck between a tiny crack in her organ's mouth, it starts to chew on my penis.\
name "Luka"
>Ahhhh!!\
name ""
>I yell out as the soft flesh chews on my penis, with my body being tightly squeezed inside her organ.\
name $name
>Aren't you embarrassed at that voice of yours?\
>Unlike my sisters, I don't care about pleasuring my prey.\
>Just hurry up and dissolve so I can move on to more important things.\
name ""
>Deana looks down at me with a cold glare as her organ continues chewing on me.\
name "Luka"
>Ahhhhh!\
name ""
>The brutal stimulation is forced into me, even though she's nothing but hungry.@
>Unable to endure the chewing stimulation any longer, I moan as I feel an orgasm rising through my body.\
name "Luka"
>Ahh... I'm coming!\
name ""
>Unable to endure it any longer, humiliation fills me as I feel my penis starting to twitch inside her mouth.\
gosub *syasei1
lsp 690,":a;chara\dina_ct02.bmp",0,0
lsp 700,":a;chara\dina_h3.bmp",0,0
gosub *syasei2
name "Luka"
>Haa...\
name ""
>My body relaxes as I ejaculate, filling the mouth that's chewing on me with semen.\
name $name
>...You ejaculated?@
>Having an orgasm while I eat you... How pathetic.\
name ""
>Deana glares at me as her soft mouth continues its relentless chewing.@
>More digestive juices cover my body as I cry out for help.\
name "Luka"
>Ahh... Help me...\
name ""
name $name
>Nobody can help you now.@
>Lay there and be digested while you reflect on your helplessness.\
name ""
name "Luka"
>Haaaa!\
name ""
mov %hseanwave,22:hseanwave
>The soft crack my penis fell into continues its chewing movements along with her larger mouth.\
>Exhausted inside of her mouth, I can't do anything but be overwhelmed by the stimulation.\
name "Luka"
>Ahh... Coming again...\
name ""
gosub *syasei1
lsp 690,":a;chara\dina_ct03.bmp",0,0
lsp 700,":a;chara\dina_h4.bmp",0,0
gosub *syasei2
name $name
>...Ara, again?@
>While most men ejaculate as I eat them...@
>I've never had one ejaculate so many times.\
>You would have been an excellent semen slave.\
name ""
name "Luka"
>Ahh... Help me...\
name ""
name $name
>...But it's too late.@
>Your body is already dissolving, and I've already even swallowed some of it.\
>Sadly, there is no way for you to survive any longer.\
name ""
>Deana calmly announces my certain death.@
>While I'm frozen in horror, her mouth continues to chew on me, not freeing me from the pleasure.\
gosub *syasei1
lsp 690,":a;chara\dina_ct04.bmp",0,0
lsp 700,":a;chara\dina_h5.bmp",0,0
gosub *syasei2
>I explode inside her again, still able to orgasm despite my terror at death.\
name $name
>...Again?@
>You've saved up quite a lot of semen, haven't you?\
>I feel sorry for you, shooting out so much while being eaten...@
>But whatever, it's just more food for me.\
name ""
lsp 700,":a;chara\dina_h6.bmp",0,0:print 10,500
name "Luka"
>Haaa...\
name ""
>A sweet sensation fills my entire body.@
>It doesn't matter any more...@>There's no escape, I might as well enjoy the pleasure before I die...\
if %hosyoku_cut=1 goto *hosyoku_cut
name $name
>...It's almost done, I've already dissolved most of you.@
>You should be honored to have been feasted upon by me.\
name ""
name "Luka"
>A...aa...\
name ""
>It feels like I'm floating in air, with nothing but a sweet melting sensation relaxing me.\
>Drooling at the pleasure, I slowly dissolve into nothing.\
>Until finally, every part of my body has been swallowed and digested by Deana.\
gosub *anten
mov %hseanwave,0:hseanwave
name $name
>Sheesh, that was such a waste of time.@
>Well, he tasted good at least.\
name ""
>Thus, Luka was digested by Deana.@
>His life ending as nothing but simple food, his adventure ended here.\
>...............\
goto *badend



*jelly_start

mov $name,"Jelly Girl"
mov $name2,"Jelly Girl"
mov $lavel,"jelly"
mov $tatie1,"jelly_st01"
mov $tatie2,"jelly_st02"
mov $tatie3,"jelly_st03"
mov $tatie4,"jelly_h1"
mov $haikei,"bg097"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,2500
if %nanido=2 mov %max_enemylife,2700
if %nanido=3 mov %max_enemylife,2900
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,40
if %nanido=3 mov %earth_keigen,20
mov %music,1
mov %tikei,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't get out of the Jelly Girl's body!"
mov $mogaku_anno2,"Luka broke out of her body!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"You won't escape until you come..."
mov $mogaku_sel2,"You won't escape..."
mov $mogaku_sel3,"Don't struggle, just come..."
mov $mogaku_sel4,"No... Let me drink your semen..."
mov $mogaku_sel5,"It feels good, why do you struggle?"
mov $mogaku_dassyutu1,"Don't run away..."
mov $mogaku_dassyutu2,""
mov $mogaku_earth_dassyutu1,"This power... A spirit?"
mov $mogaku_earth_dassyutu2,""
mov $half_s1,"Is it good?"
mov $half_s2,"If I tease you a little more, will you come?"
mov $kiki_s1,"Ejaculate..."
mov $kiki_s2,"I'll use it as nourishment..."
mov %end_n,6
mov %exp_minus,0
mov %zmonster_x,-250
mov %tukix,320
mov %owaza_count1a,4
name $name
>Human, why are you here...?@
>Just for you, let me drink some semen...\
name ""
>The Jelly Girl slowly approaches me.\
>Just like the first monster I ever fought, this girl is a slime...@
>Her body is flexible and able to change shape and form at will...\
name "Luka"
>I just want to meet Undine.\
name ""
gosub *face2
name $name
>I'll wrap up your body...@
>And play with you until you come...\
name ""
name "Luka"
>Looks like she's ignoring me!\
name ""
>I take out my sword in front of the looming slime monster.@
>The fight against the Slime Girl was hard...@> But I'm not the same weak guy I was back then!\
mov %sinkou,1
gosub *face1
goto *common_main



*jelly001

name "Luka"
>Alright, my attacks work!\
name ""
>There's a huge difference in skill compared to when I was fighting the Slime Girl.@
>No matter what kind of body my opponent has, I can seal it!\
mov %sinkou,2
return



*jelly_v

gosub *face3
name $name
>What... Is this?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Jelly Girl turns into a puddle!\
mov %viclose,1:gosub *victory
mov %getexp,10000:gosub *lvup
mov %2287,1
goto *sean0194



*jelly_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>So I can absorb you and squeeze out your semen?\
name ""
goto *jelly_a



*jelly_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *jelly_kousan
if %cmd1=16 goto *jelly_onedari
if %cmd1=17 goto *common_skill
goto *jelly_main



*jelly_a

if %enemylife<%max_enemylife && %sinkou=1 gosub *jelly001
if %kousoku=1 gosub *jelly_a4:goto *common_main
rnd2 %ransu,1,3
if %ransu=1 gosub *jelly_a1:goto *common_main
if %ransu=2 gosub *jelly_a2:goto *common_main
if %ransu=3 && %owaza_count1a>5 gosub *jelly_a3:goto *common_main
skip -4



*jelly_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Drown in my slime..."
if %ransu=2 mov $sel1,"I'll make you feel good inside my body..."
if %ransu=3 mov $sel1,"I feel nice and slimy..."
name $name
eng $sel1:$sel6\
name ""
skillname "Jelly Press"
dwave 1,"se\ero_slime1.ogg"
eng "The Jelly Girl spreads her slime all over Luka's body!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>The wriggling slime massages Luka all over his body!
skillcount2 3371
if %nanido<2 damage 75,85
if %nanido=2 damage 85,95
if %nanido=3 damage 95,105
skillname ""
if %mylife=0 sub %stack,1:return *jelly_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*jelly_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll make your penis all slimy..."
if %ransu=2 mov $sel1,"Leak your semen into my slime..."
if %ransu=3 mov $sel1,"Is it good...? Are you going to come...?"
name $name
eng $sel1:$sel6\
name ""
skillname "Jelly Draw"
dwave 1,"se\ero_slime1.ogg"
>The Jelly Girl's slime covers Luka's penis!
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3372
if %nanido<2 damage 80,90
if %nanido=2 damage 90,100
if %nanido=3 damage 100,110
skillname ""
if %mylife=0 sub %stack,1:return *jelly_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*jelly_a3

add %stack,1
mov %owaza_count1a,0
name $name
>I'll show you heaven...\
name ""
skillname "Jelly Heaven"
dwave 1,"se\ero_slime3.ogg"
>The Jelly Girl falls on Luka, absorbing his body into her own!
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3373
if %nanido<2 damage 80,90
if %nanido=2 damage 90,100
if %nanido=3 damage 100,110
mov %kousoku,1:gosub *status_print
>Luka's stuck inside the Jelly Girl!\
skillname ""
if %mylife=0 sub %stack,1:return *jelly_h3
if %kousan=2 sub %stack,1:return
gosub *face2
name $name
if %first_sel1=1 skip 4
>It feels good inside me, doesn't it...?@
>Now let me play with you...\
skip 3
>This time you won't escape...@
>Now let me play with you...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,3
if %earth=0 && %nanido=2 mov %genmogaku,4
if %earth=0 && %nanido=3 mov %genmogaku,5
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,2
if %earth>0 && %nanido=3 mov %genmogaku,3
sub %stack,1
return



*jelly_a4

add %stack,1
>Luka's stuck inside the Jelly Girl...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I can control my body...":mov $sel2,"The soft slime tightens around Luka's body!"
if %ransu=2 mov $sel1,"I'll tease your penis...":mov $sel2,"The jelly-like slime tightens around Luka's penis!"
if %ransu=3 mov $sel1,"If I do this, will you come...?":mov $sel2,"The soft slime tightens around Luka's penis!"
if %ransu=4 mov $sel1,"Slime can even go inside your ass...":mov $sel2,"The soft slime slowly seeps into Luka's ass!"
if %ransu=5 mov $sel1,"I can spin it around...":mov $sel2,"The slime around Luka's body starts to slowly spin around him!"
name $name
eng $sel1:$sel6\
name ""
skillname "Jelly Heaven"
dwave 1,"se\ero_slime3.ogg"
eng $sel2:$sel6
skillcount2 3373
if %nanido<2 damage 80,90
if %nanido=2 damage 90,100
if %nanido=3 damage 100,110
skillname ""
if %mylife=0 sub %stack,1:return *jelly_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*jelly_onedari

mov $list1,"Jelly Press"
if %3371>0 mov %list_num1,1
mov $list2,"Jelly Draw"
if %3372>0 mov %list_num2,1
mov $list3,"Jelly Heaven"
if %3373>0 mov %list_num3,1
gosub *cmd_onedari
if %cmd1=11 goto *jelly_onedari1
if %cmd1=12 goto *jelly_onedari2
if %cmd1=13 goto *jelly_onedari3
if %cmd1=-1 goto *jelly_main
goto *jelly_onedari



*jelly_onedari1

gosub *onedari_syori
name $name
>You want my slime all over you?\
name ""
gosub *jelly_a1
skip -1



*jelly_onedari2

gosub *onedari_syori
name $name
>You want my slime all over your penis?\
name ""
gosub *jelly_a2
skip -1



*jelly_onedari3

gosub *onedari_syori_k
name $name
>You want to be squeezed inside me?\
name ""
if %kousoku=0 gosub *jelly_a3
gosub *jelly_a4
skip -1



*jelly_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\jelly_bk02.bmp",0,0
gosub *syasei2
>As the Jelly Girl's slime massages him all over, Luka comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2587,%2587+1:if %2587=1 mov %count_koenemy,%count_koenemy+1
if %2587>%count_most mov %count_most,%2587:mov $count_mostname,$name
count 11,3
mov $bad1,"Luka succumbed to the Jelly Girl's slime."
gosub *face2
name $name
>You came a lot...@
>Did it feel good?\
name ""
goto *jelly_h



*jelly_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\jelly_bk03.bmp",0,0
gosub *syasei2
>With the slime wriggling around his penis, Luka comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2587,%2587+1:if %2587=1 mov %count_koenemy,%count_koenemy+1
if %2587>%count_most mov %count_most,%2587:mov $count_mostname,$name
count 11,3
mov $bad1,"Luka succumbed to the Jelly Girl's slime."
gosub *face2
name $name
>You came a lot...@
>Did it feel good?\
name ""
goto *jelly_h



*jelly_h3

mov %ikigoe,3:gosub *ikigoe
name $name
>Already...?\
name ""
gosub *syasei1
lsp 700,":a;chara\jelly_h2.bmp",0,0
gosub *syasei2
>As soon as his body is wrapped in the Jelly Girl's slime, Luka comes, filling her body with semen.\
mov %viclose,1:gosub *lose
mov %2587,%2587+1:if %2587=1 mov %count_koenemy,%count_koenemy+1
if %2587>%count_most mov %count_most,%2587:mov $count_mostname,$name
count 11,3
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come as soon as he was sucked into the Jelly Girl's body."
gosub *face2
name $name
>Already coming...@
>Did it feel that good?\
name ""
goto *jelly_h



*jelly_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\jelly_h2.bmp",0,0
gosub *syasei2
>With the slime wriggling and tightening all around his body, Luka is forced to come, filling her body with semen.\
mov %viclose,1:gosub *lose
mov %2587,%2587+1:if %2587=1 mov %count_koenemy,%count_koenemy+1
if %2587>%count_most mov %count_most,%2587:mov $count_mostname,$name
count 11,3
mov $bad1,"Luka was forced to come while being held inside the Jelly Girl's body."
gosub *face2
name $name
>So much semen...@
>It looks like I felt too good for you...\
name ""
goto *jelly_h



*jelly_h

mov $bad2,"Encased in her slime, Luka's semen is squeezed out endlessly."
if %2587=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,18:cspl 690,699:lsp 700,":a;chara\jelly_h3.bmp",0,0:print 10,500:hseanwave:goto *jelly_hb
name "Luka"
>Ahh...\
name ""
>Completely exhausted, I look on helplessly as her giant looming slimy body slowly moves into my own.@
mov %hseanwave,18:hseanwave
cspl 690,699
lsp 700,":a;chara\jelly_h3.bmp",0,0:print 10,500
>Just like that, my body is absorbed by the Jelly Girl's!\
name "Luka"
>Uaa!\
name ""
goto *jelly_hb



*jelly_hb

>The Jelly Girl's soft slimy body slowly tightens around me, holding me in place inside her.\
name $name
>Your penis... It's still big...\
name ""
>The soft slime around my penis starts to compress.@
>It slowly thickens until my penis is surrounded by and pushed on all sides by her elastic slime.\
name $name
>Does my slime... Feel good...?@
>I'll make it... Even better...\
name ""
name "Luka"
>Ahhhh!\
name ""
>The slime around my penis starts to wriggle, making wet sounds as the soft jelly pulses around me.\
>The soft slime gently tightens around me, as it freely flows in all directions around my penis.\
name "Luka"
>Ahh...! That feels good...!\
name ""
>This stimulation is enough to make any man surrender...@
>I too can't bring myself to resist the slime squirming around my lower body.\
name $name
>When you can't take it any longer, just come...\
name ""
name "Luka"
>Haaa...\
name ""
>At times tightening, and at times swirling around and massaging me, the Jelly Girl freely controls her own body to play with me.\
>The liquid nature of the slime even lets it poke inside the tip of my penis, gently rubbing against the most sensitive spot on my body.\
name "Luka"
>Haaa!@>Ahhh!\
name ""
name $name
>I'll make your penis feel good...\
name ""
>The slime around my body continues to freely change its shape as it attacks me however the Jelly Girl wants.\
>With nothing but her warm slime body around me, I can only shake my head helplessly as I'm forced to a quick orgasm.\
name "Luka"
>Ahhh... I'm coming...\
name ""
name $name
>Fill my blue body with your white semen...\
name ""
>Her body movements get even faster, trying to force me to come right away.\
>Enveloped in her warm body, I don't have any choice but to give in to the stimulation.\
gosub *syasei1
lsp 700,":a;chara\jelly_h4.bmp",0,0
gosub *syasei2
>Semen explodes from the tip of my penis, only able to come out an inch into her body before it stops.\
>All during my ejaculation, her soft slime continues to wriggle and squeeze me, forcing every drop of semen out into her waiting body.\
name "Luka"
>Haa...\
name ""
name $name
>You can come more, right...?@> Come more...\
name ""
mov %hseanwave,19:hseanwave
>As I helplessly float in her body, her slime starts massaging my body even more violently than before.\
>Overpowered by the warm, comfortable slime, just trying to struggle a little bit only makes it feel like I'm thrusting inside her.\
>With my entire body encased in her springy slime, there's no escape.@
>I can't break free of her body any longer...\
name "Luka"
>Ahhh!\
name ""
>The soft slime around my penis gets a little bit tighter as it swirls around my penis, forcing me to another quick orgasm.\
name "Luka"
>Haaaa... Again... Coming again...\
name ""
gosub *syasei1
lsp 700,":a;chara\jelly_h5.bmp",0,0
gosub *syasei2
>I let out a soft moan as I come inside her again.@
>Looking down in shame, I watch the semen slowly bubble up in her transparent body.\
>Her blue body moves around inside, milking out the last drop of semen from my orgasm, all while I look on, watching it mix with her body.\
name "Luka"
>Haaa...\
name ""
name $name
>You can come more, right...?@
>I'll squeeze it all out, don't worry...\
name ""
name "Luka"
>Stop it already...\
name ""
>But her merciless squeezing continues.@
>With my body encased in hers, I float here helplessly as she skillfully manipulates her free flowing body to squeeze and milk out my semen.\
name "Luka"
>Ahhh...\
name ""
>And before I was even aware of it, I had given up.@
>With no way to escape, I relax inside her warm body as her slime fills me with pleasure.\
gosub *syasei1
lsp 700,":a;chara\jelly_h6.bmp",0,0
gosub *syasei2
>Relaxing inside her body, I quickly come again.@
>I look on in ecstasy as my white semen mixes with her blue slime.\
name "Luka"
>Ahhh...\
name ""
>Weakened after my repeated orgasms, I don't even have the strength left to move inside her soft body.@
>Given complete control, her slime freely plays and toys with my body.\
name $name
>Come on... Come more...@
>Fill me with everything...\
name ""
name "Luka"
>Ahhh...\
name ""
gosub *syasei1:gosub *syasei2
>Coming a final time, I lose consciousness.@
>The only sensation I can feel as I drift off into sleep is her warm slime wriggling around my body.\
gosub *anten
mov %hseanwave,0:hseanwave
>Caught by the Jelly Girl, I'll be squeezed like this for the rest of my life...@
>Not killed or released, I'm stuck inside her soft body forever.\
>Stuck inside her body, I've become little more than prey for her to feed on all day.@
>I quickly went insane on the pleasure, and became little more than a slave to pleasure.\
>Today too, the Jelly Girl is squeezing me dry inside her body in the underground cave.@
>Stuck inside the cave nobody visits with the Jelly Girl, my adventure ends here.\
>.............\
goto *badend



*blob_start

mov $name,"Blob Girl"
mov $name2,"Blob Girl"
mov $lavel,"blob"
mov $tatie1,"blob_st01"
mov $tatie2,"blob_st02"
mov $tatie3,"blob_st03"
mov $tatie4,"blob_h1"
mov $haikei,"bg097"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,2700
if %nanido=2 mov %max_enemylife,2950
if %nanido=3 mov %max_enemylife,3100
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,40
if %nanido=3 mov %earth_keigen,20
mov %music,1
mov %tikei,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka is stuck in the Blob Girl!"
mov $mogaku_anno2,"Luka broke out of the Blob Girl!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"It's pointless to struggle. "
mov $mogaku_sel2,"Don't worry, it will feel good as you dissolve. "
mov $mogaku_sel3,"Even though it feels good, you're struggling so much. "
mov $mogaku_sel4,"You can't escape. All you can do is dissolve. "
mov $mogaku_sel5,"Just drown in my body..."
mov $mogaku_earth_dassyutu1,"What the heck is that!?"
mov $mogaku_earth_dassyutu2,"How can a human be that powerful!?"
mov $half_s1,"You can't endure it, can you?"
mov $half_s2,"Your white stuff is going to shoot out soon. "
mov $kiki_s1,"Ahaha, you're going to come soon, aren't you?"
mov $kiki_s2,"Once you come, I'm going to dissolve and eat you. "
mov %end_n,6
mov %exp_minus,10000
mov %zmonster_x,-200
mov %tukix,320
mov %owaza_count1a,4
gosub *face2
name $name
>Aha, a delicious looking human. @
>Two humans in a month. \
name ""
>She looks a little like the Jelly Girl from before, but slightly different...\
>The consistency of her body looks more like sticky melted cheese than anything else...\
>I bet she's a carnivorous type...\
name $name
>I'll wrap you up and dissolve you, too.@
>You look like you taste delicious. \
name ""
name "Luka"
>Two humans...?@
>It can't be... The missing fisherman!?\
name ""
name $name
>That's probably the human I ate.@
>He was carrying a fishing rod, anyway.\
>I squeezed out all of his semen, then dissolved and ate him. \
name ""
name "Luka"
>U...Unforgivable!\
name ""
>The fisherman must have fallen into the spring on accident.@
>After coming into this cave, this Blob Girl ate him!\
name $name
>Hehehe... The same thing will happen to you. @
>I'll dissolve you into mush and digest you. \
>Hahaha... It's time to eat! \
name ""
>I take out my sword as the horrible looming Blob Girl approaches!\
gosub *face1
goto *common_main



*blob_v

gosub *face3
name $name
>How can I lose to a human...!?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Blob Girl turns into a puddle!\
mov %viclose,1:gosub *victory
mov %getexp,12000:gosub *lvup
mov %2288,1
goto *sean0195



*blob_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>You want to be dissolved?@
>Sure... I'll be glad to. \
name ""
goto *blob_a



*blob_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *blob_kousan
if %cmd1=16 goto *blob_onedari
if %cmd1=17 goto *common_skill
goto *blob_main



*blob_a

if %kousoku=1 gosub *blob_a4:goto *common_main
rnd2 %ransu,1,3
if %ransu=1 gosub *blob_a1:goto *common_main
if %ransu=2 gosub *blob_a2:goto *common_main
if %ransu=3 && %owaza_count1a>5 gosub *blob_a3:goto *common_main
skip -4



*blob_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Have a taste of my slime. "
if %ransu=2 mov $sel1,"From top to bottom, I'll cover you with plenty of slime. "
if %ransu=3 mov $sel1,"Drown in the pleasure of a slime. "
name $name
eng $sel1:$sel6\
name ""
skillname "Blob Spread"
dwave 1,"se\ero_slime2.ogg"
eng "The Blob Girl spreads her slime all over Luka's body!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>The sticky slime wriggles all over Luka's body!
skillcount2 3374
if %nanido<2 damage 75,85
if %nanido=2 damage 85,95
if %nanido=3 damage 95,105
skillname ""
if %mylife=0 sub %stack,1:return *blob_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*blob_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Aha... Can you endure this?"
if %ransu=2 mov $sel1,"When you can't take it anymore, it's fine to come inside my slime. "
if %ransu=3 mov $sel1,"Does my slime feel good?"
name $name
eng $sel1:$sel6\
name ""
skillname "Blob Draw"
dwave 1,"se\ero_slime1.ogg"
eng "The Blob Girl's slime covers Luka's groin!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>As the slime clings to his penis, it vibrates!
skillcount2 3375
if %nanido<2 damage 80,90
if %nanido=2 damage 90,100
if %nanido=3 damage 100,110
skillname ""
if %mylife=0 sub %stack,1:return *blob_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*blob_a3

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 8
name $name
if %first_sel1=1 skip 3
>Time to engulf you. \
skip 2
>This time, I'll engulf you. \
name ""
mov %first_sel1,1
skillname "Blob Heaven"
dwave 1,"se\ero_slime3.ogg"
>The Blob Girl falls onto Luka, enveloping his body!
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3376
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
mov %kousoku,1:gosub *status_print
>Luka's been absorbed into the Blob Girl's body!\
skillname ""
if %mylife=0 sub %stack,1:return *blob_h3
gosub *face2
name $name
>Your body is inside mine. @
>I'll rub and tighten around you until you're dissolved, so get ready. \
name ""
if %earth=0 && %nanido<2 mov %genmogaku,100
if %earth=0 && %nanido=2 mov %genmogaku,100
if %earth=0 && %nanido=3 mov %genmogaku,100
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,2
if %earth>0 && %nanido=3 mov %genmogaku,3
sub %stack,1
return



*blob_a4

add %stack,1
>Luka is stuck inside the Blob Girl...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"If I do it like this, you won't be able to stand it, will you?":mov $sel2,"The slime rotates around his penis!"
if %ransu=2 mov $sel1,"Once I wrap someone, there's no human who can endure me. ":mov $sel2,"The slime tightens around his penis!"
if %ransu=3 mov $sel1,"Hehe... I'll turn you into mush inside me. ":mov $sel2,"The slime rubs against Luka's whole body, as if he was covered in tongues!"
if %ransu=4 mov $sel1,"Drown inside of me. ":mov $sel2,"The slime flows around Luka's body, as if playing with him!"
if %ransu=5 mov $sel1,"I'll melt you into nothing. ":mov $sel2,"Wrapped in her body, the slime toys with Luka's body!"
name $name
eng $sel1:$sel6\
name ""
skillname "Blob Heaven"
dwave 1,"se\ero_slime3.ogg"
eng $sel2:$sel6
skillcount2 3376
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
skillname ""
if %mylife=0 sub %stack,1:return *blob_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*blob_onedari

mov $list1,"Blob Spread"
if %3374>0 mov %list_num1,1
mov $list2,"Blob Draw"
if %3375>0 mov %list_num2,1
mov $list3,"Blob Heaven"
if %3376>0 mov %list_num3,1
gosub *cmd_onedari
if %cmd1=11 goto *blob_onedari1
if %cmd1=12 goto *blob_onedari2
if %cmd1=13 goto *blob_onedari3
if %cmd1=-1 goto *blob_main
goto *blob_onedari



*blob_onedari1

gosub *onedari_syori
name $name
>You want my slime all over you?\
name ""
gosub *blob_a1
skip -1



*blob_onedari2

gosub *onedari_syori
name $name
>You want my slime all over your penis?\
name ""
gosub *blob_a2
skip -1



*blob_onedari3

gosub *onedari_syori_k
name $name
>You want to melt into mush inside me?\
name ""
if %kousoku=0 gosub *blob_a3
gosub *blob_a4
skip -1



*blob_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\blob_bk03.bmp",0,0
gosub *syasei2
>As the slime covers his body, Luka comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2588,%2588+1:if %2588=1 mov %count_koenemy,%count_koenemy+1
if %2588>%count_most mov %count_most,%2588:mov $count_mostname,$name
count 11,11
mov $bad1,"Luka was forced to come by the Blob Girl's blob spread skill."
gosub *face2
name $name
>Haha, my slime wriggling all over your body made you come. @
>It felt amazing, didn't it?@>My slime. \
name ""
goto *blob_h



*blob_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\blob_bk03.bmp",0,0
gosub *syasei2
>As the slime covers and wriggles around his penis, Luka comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2588,%2588+1:if %2588=1 mov %count_koenemy,%count_koenemy+1
if %2588>%count_most mov %count_most,%2588:mov $count_mostname,$name
count 11,11
mov $bad1,"Luka was forced to come by the Blob Girl's blob draw skill."
gosub *face2
name $name
>Haha, my slime wriggling all over your penis made you come. @
>It felt amazing, didn't it?@>My slime. \
name ""
goto *blob_h



*blob_h3

mov %ikigoe,3:gosub *ikigoe
$name
>Arere...?@>Already coming?\
name ""
gosub *syasei1
lsp 700,":a;chara\blob_h2.bmp",0,0
gosub *syasei2
>As soon as Luka's body is engulfed by the Blob Girl's, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2588,%2588+1:if %2588=1 mov %count_koenemy,%count_koenemy+1
if %2588>%count_most mov %count_most,%2588:mov $count_mostname,$name
count 11,11
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to an orgasm as soon as the Blob Girl engulfed him."
gosub *face2
name $name
>Ahaha, did it really feel that good?@
>You couldn't endure it even a little bit. \
>Now then, it's time to digest you. \
name ""
goto *blob_h



*blob_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\blob_h2.bmp",0,0
gosub *syasei2
>With his body stuck inside the Blob Girl, Luka is forced to come, filling her body with semen.\
mov %viclose,1:gosub *lose
mov %2588,%2588+1:if %2588=1 mov %count_koenemy,%count_koenemy+1
if %2588>%count_most mov %count_most,%2588:mov $count_mostname,$name
count 11,11
mov $bad1,"Stuck inside the Blob Girl's body, Luka was forced to come."
gosub *face2
name $name
>Ahaha, it was amazing, wasn't it?@
>It felt so good, it was like you were melting, didn't it?\
>Now then... It's time to really melt you. \
name ""
goto *blob_h



*blob_h

mov $bad2,"Dissolved inside her body, Luka was eaten by the Blob Girl."
if %2588=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,18:cspl 690,699:lsp 700,":a;chara\blob_h3.bmp",0,0:print 10,500:hseanwave:goto *blob_hb
name "Luka"
>Ahh...\
name ""
name $name
>Hehehe... Now, it's time to eat.@
>I'll wrap you in my body and dissolve you...\
name ""
mov %hseanwave,18:hseanwave
cspl 690,699
lsp 700,":a;chara\blob_h3.bmp",0,0:print 10,500
>The Blob Girl's wriggling body moves onto mine, sucking me in.\
>Rather than feeling like a liquid, her slime feels like warm flesh.@
>That warm flesh wraps around my body, absorbing me inside her.\
goto *blob_hb



*blob_hb

name "Luka"
>Ahhh!@>Stop!\
name ""
>Despite struggling with all of my strength, my limbs just helplessly move through her body, unable to get me out.\
name $name
>Before I eat you, I'll rape you.@
>I'll violate that penis of yours...\
name ""
name "Luka"
>Stop... Ahhh!\
name ""
>Her warm slime starts to violently wriggle as it swirls and tightens around my penis.@
>As the sticky warmth rubs against me, I involuntarily let out a moan.\
name $name
>Haha, already moaning?@
>But I can make it feel even better... \
>If I wrap it like this...@
>I'll be able to rape that penis nice and good. \
name ""
name "Luka"
>Ahhh!\
name ""
>The sticky slime wraps around my penis...@
>Entangling, rubbing, squeezing...@>The Blob Girl varies the stimulations as she giggles and watches.\
name $name
>Hehe... It feels good, doesn't it?@
>Make sure you give me plenty of that delicious semen in return. \
name ""
name "Luka"
>Ahhh...\
name ""
>With the viscous slime wriggling and squirming around me, it feels like I'm being raped inside her body.\
>Trembling, her warm sticky interior is forcing me to the edge.\
name "Luka"
>Ahh... I'm going to come...\
name ""
name $name
>Good... Let it out inside me. \
name ""
>She squeezes the warm slime inside her around me in a final stimulus, forcing me to come.\
gosub *syasei1
lsp 700,":a;chara\blob_h4.bmp",0,0
gosub *syasei2
>I explode inside her warm body, shooting my semen out into her red slime.\
name "Luka"
>Haa...\
name ""
>My body relaxes after my orgasm, feeling the afterglow as her warm body continues to squirm around me.\
name $name
>Hehe, was it good?@
>My rape is unbearable, isn't it?\
>But it isn't over yet...@
>I'm going to quickly squeeze you dry, then dissolve your body. \
name ""
name "Luka"
>D...Don't... Ahh!\
name ""
>Suddenly, I feel the slime around my penis start to move in a new pattern.@
>The sticky slime starts to slowly spin around the tip of my penis, as if creating a tiny whirlpool.\
>At times it tightens around me, but the sticky slime slowly spins faster and faster.\
name "Luka"
>Aa... Ahhh!\
name ""
name $name
>Haha, what a pathetic moan.@
>Come on... Shoot out that semen quickly! \
name ""
>I tremble inside her warm body as the whirlpool around my penis increases in speed.@
>Helpless inside her sticky slime, I can only feebly shake side to side as she forces me to another orgasm.\
name "Luka"
>Ahh... I'm going to come again...\
name ""
name $name
>Good, let out a lot! \
name ""
name "Luka"
>N...No!@>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\blob_h5.bmp",0,0
gosub *syasei2
name $name
>Ahaha, you came again. @
>But I can still squeeze out a lot more. \
name ""
name "Luka"
>Ahh... Ahhh!\
name ""
>The vortex of slime inside her speeds up even faster.@
>Unable to take it any longer, all I can do is yell and shake as the stimulation overpowers me.\
>I'm being dominated by her body, pathetically flailing around inside her as she looks on and laughs.\
name "Luka"
>Ahhh... No more...\
name ""
name $name
>I told you I'd squeeze out more, didn't I?@
>Come on, come on, I know you have more! \
name ""
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\blob_h6.bmp",0,0
gosub *syasei2
name $name
>...Not too much came out that time.@
>I guess I can squeeze out a bit more as I digest you.\
name ""
name "Luka"
>N...No..\
name ""
>I shudder at the horrifying words she calmly speaks.@
>I'm going to be... Eaten by her?\
name $name
>Now then, it's time for my meal. @
>I'll dissolve your body into mush, then eat you. \
name ""
name "Luka"
>Ahhh!@>Stop!\
name ""
mov %hseanwave,19:hseanwave
lsp 700,":a;chara\blob_h7.bmp",0,0:print 10,500
>Ignoring my pleas, her body sucks me deeper inside.\
>The pressure around me is even more than before, and so is the warmth...\
if %hosyoku_cut=1 goto *hosyoku_cut
name $name
>My body itself is a digestive organ.@
>So you're already inside my stomach itself. \
name ""
name "Luka"
>S...Stop this... Let me go!\
name ""
>Terrified, I struggle with everything I have to get away.@
>I'm struggling with everything I have... But...\
name $name
>Ahaha, struggling is pointless.@
>There's nothing left you can do but be digested. \
name ""
lsp 700,":a;chara\blob_h8.bmp",0,0:print 10,500
>As I start to yell out, her warm slime covers my face itself.@
>Now even deeper inside her body, no amount of struggling can free me.\
>The warm slime covers every inch of my body except for my mouth, wriggling and squirming all over me.@
>The stickiness causes a sweet sensation to flood over me as the slime pulls me deeper into her body.\
>The strange comfort brought by being wrapped inside of her slows my movements, until finally I can't move at all.\
name "Luka"
>Aaa... Uuu...\
name ""
name $name
>Hehe, I've already started digesting you.@
>Well?@>How does it feel to be dissolved alive?\
name ""
name "Luka"
>Ahh... Hel...p me...\
name ""
>Wrapped in the calming sensation of her warm slime, I barely manage to speak those final, desperate words.\
name $name
>Hahaha.@>No. \
name ""
lsp 700,":a;chara\blob_h9.bmp",0,0:print 10,500
>At last, I'm sucked in so far into her body that I can't even see the outside world any longer.\
>Drowning in her body, I give in to the ruinous relaxing feeling being forced into me.\
name "Luka"
>Haaa...\
name ""
>The terror I was feeling before melts away.@
>Along with my body, everything is dissolving into nothingness.\
name $name
>Hehe, you taste really good. @
>It feels good being digested, doesn't it?\
name ""
name "Luka"
>A...aa...@
>Good...\
name ""
gosub *syasei1:gosub *syasei2
>Invited to pleasure by her squirming body, I get a final orgasm.\
name "Luka"
>Aa...a...\
name ""
>Giving up, I let the pleasant feelings fill me.@
>I even start to think that this is the best thing in the world...\
>My body is being melted, and pleasure is taking its place...@
>That's all I can feel anymore, so that's all that matters...\
name $name
>Aha, this is the end.@
>Time to dissolve the last bits of you. \
name ""
name "Luka"
>A...a...\
name ""
>At last, my body is dissolved into nourishment for the Blob Girl to use.@
>Digested by the Blob Girl, I was in bliss until the very end.\
name $name
mov %hseanwave,0:hseanwave
>That was delicious. @
>It's been a while since I had a boy that tasty. \
name ""
gosub *anten
>...................\
goto *badend



*slime_green_start

mov $name,"Green Slime"
mov $name2,"Green Slime"
mov $lavel,"slime_green"
mov $tatie1,"slime_green_st01"
mov $tatie2,"slime_green_st02"
mov $tatie3,"slime_green_st03"
mov $tatie4,"slime_green_st02"
mov $haikei,"bg097"
mov %monster_x,245
mov %monster_y,100
if %nanido=1 mov %max_enemylife,1200
if %nanido=2 mov %max_enemylife,1280
if %nanido=3 mov %max_enemylife,1330
if %nanido=0 mov %max_enemylife,2
if %nanido=1 mov %henkahp1,750
if %nanido=2 mov %henkahp1,750
if %nanido=3 mov %henkahp1,750
if %nanido=0 mov %henkahp1,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,40
if %nanido=3 mov %earth_keigen,20
mov %music,1
mov %tikei,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"With the slime all around him, Luka can't escape!"
mov $mogaku_anno4,"Surrounded in slime, Luka's movements are slowed!"
mov $mogaku_sel1,"Struggle all you want, there's no point to it. "
mov $mogaku_sel2,"Ahaha, pitiful. "
mov $mogaku_sel3,"If you do that, you'll sink!"
mov $mogaku_sel4,"Ehehe... The more you struggle, the more my slime covers you! "
mov $mogaku_sel5,"You won't escape from my slime! "
mov %zmonster_x,0
mov %tukix,320
name $name
>Eh...?@> What's a human doing here?\
name ""
name "Luka"
>I came here to find Undine, to borrow her power.\
name ""
name $name
>...Undine hates humans.@
>So someone like you won't ever meet her.\
>But I love humans.@
>I'll tease you a lot, so let me hear a nice moan. \
name ""
name "Luka"
>Guh...!\
name ""
>It seems like this monster is an enemy...@
>But with such a small body, she doesn't look too strong.\
gosub *face2
name $name
>Alright, here I go. \
name ""
>The Green Slime gets in a preemptive strike!\
skillname "Green Erosion"
dwave 1,"se\ero_slime3.ogg"
>The Green Slime's slime fills the area!
>The whole cave is covered in her slime!
if %nanido<2 damage 10,20
if %nanido=2 damage 15,25
if %nanido=3 damage 20,35
mov %kousoku,1:gosub *status_print
>Luka's feet are caught in the Green Slime's slime!\
skillname ""
name "Luka"
>Wh...What the heck is this!?\
name ""
>She doesn't look strong, but this is quite a crazy skill!\
>There's slime in every direction, like I'm stuck in the middle of a swamp.@
>Able to expand her slime this much... I can't underestimate her!\
name $name
>Ahaha... Drown in me. \
name ""
goto *common_main



*slime_green_v

gosub *face3
name $name
>Kya!\
name ""
mov %kousoku,0:gosub *status_print
dwave 1,"se\dassyutu.ogg"
>Taking serious damage, the Green Slime's Green Erosion skill is broken!\
gosub *face1
name $name
>You're pretty good, aren't you...?@
>I thought you humans that called yourselves Heroes were nothing but talk.\
>I guess I'm left with no choice...@> I'll have to...@> Call for help!\
name ""
>The Green Slime calls for her friends!\
lsp 700,":a;chara\slime_green_st01.bmp",390,155
lsp 702,":a;chara\slime_blue_st01.bmp",70,20
print 10,500
>Blue Slime appears!\
name "Luka"
>N...No way!@
>One was annoying, but now two!?\
name $name
>It's a little too early to be surprised!\
name ""
>The Green Slime calls for her friends!\
lsp 700,":a;chara\slime_green_st01.bmp",480,155
lsp 702,":a;chara\slime_blue_st01.bmp",-40,20
lsp 704,":a;chara\slime_red_st01.bmp",230,10
print 10,500
>Red Slime appears!\
name "Luka"
>Urhg...\
name ""
>Oh crap, three of them...?\
>The Blue Slime calls for her friends!\
lsp 700,":a;chara\slime_purple_st01.bmp",70,120
lsp 702,":a;chara\slime_green_st01.bmp",525,155
lsp 704,":a;chara\slime_blue_st01.bmp",-70,20
lsp 706,":a;chara\slime_red_st01.bmp",345,10
print 10,500
>Purple Slime appears!\
goto *slimes_start



*slime_green_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>You want to drown in my body?@
>Alright, I'll let you swim in me. \
name ""
goto *slime_green_a



*slime_green_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 mov %abairitu,80:goto *common_miss2
if %cmd1=12 && %earth>0 goto *mogaku_earth1
if %cmd1=12 goto *common_mogaku
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *slime_green_kousan
if %cmd1=16 goto *slime_green_onedari
if %cmd1=17 goto *common_skill
goto *slime_green_main



*slime_green_a

if %enemylife<%henkahp1 goto *slime_green_v
if %turn=1 gosub *slime_green_a3
if %turn=2 gosub *slime_green_a4
if %turn=3 gosub *slime_green_a5
if %turn=4 gosub *slime_green_a6
rnd2 %ransu,1,2
if %ransu=1 gosub *slime_green_a1:goto *common_main
if %ransu=2 gosub *slime_green_a2:goto *common_main
skip -3



*slime_green_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Here.. I'll cover you with more slime! "
if %ransu=2 mov $sel1,"My slime feels nice and squishy, doesn't it?"
if %ransu=3 mov $sel1,"Ahaha, I'll rub you all over! "
name $name
eng $sel1:$sel6\
name ""
skillname "Green Spread"
dwave 1,"se\ero_makituki1.ogg"
>The Green Slime covers Luka's body with her squishy slime!
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3377
if %nanido<2 damage 40,50
if %nanido=2 damage 50,60
if %nanido=3 damage 60,70
skillname ""
if %mylife=0 sub %stack,1:return *slime_green_h1
sub %stack,1
return



*slime_green_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll squish your penis. "
if %ransu=2 mov $sel1,"When you can't take it, just shoot it out. "
if %ransu=3 mov $sel1,"Hahaha, more, more! "
name $name
eng $sel1:$sel6\
name ""
skillname "Green Draw"
dwave 1,"se\ero_makituki1.ogg"
>The Green Slime uses her squishy slime to stroke Luka's penis!
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3378
if %nanido<2 damage 45,55
if %nanido=2 damage 55,65
if %nanido=3 damage 65,75
skillname ""
if %mylife=0 sub %stack,1:return *slime_green_h2
sub %stack,1
return



*slime_green_a3

add %stack,1
name $name
>I'm spreading out even more! \
name ""
skillname "Green Erosion"
dwave 1,"se\ero_slime3.ogg"
>The Green Slime spreads out her slime even more!
>The level of the slime increases up to Luka's shins!
if %nanido<2 damage 50,60
if %nanido=2 damage 60,70
if %nanido=3 damage 70,80
skillname ""
name $name
>You're going to be caught in my slime!@
>It feels really good, you know! \
name ""
name "Luka"
>Guh...!\
name ""
>If this slime reaches my waist, I won't be able to do anything anymore.@
>I have to finish this battle before it gets any higher!\
mov $mogaku_anno4,"With his legs slightly entangled by the slime, Luka's movements are slowed!"
sub %stack,1
return



*slime_green_a4

add %stack,1
name $name
>You're slowly going to be submerged. \
name ""
skillname "Green Erosion"
dwave 1,"se\ero_slime3.ogg"
>The Green Slime spreads out her slime even more!
>The level of the slime increases up to Luka's knees!
if %nanido<2 damage 50,60
if %nanido=2 damage 60,70
if %nanido=3 damage 70,80
skillname ""
name $name
>Ehehe... Well?@
>My wriggling body feels good, doesn't it?\
name ""
name "Luka"
>Guh...!\
name ""
sub %stack,1
return



*slime_green_a5

add %stack,1
name $name
>Hehehe. \
name ""
skillname "Green Erosion"
dwave 1,"se\ero_slime3.ogg"
>The Green Slime spreads out her slime even more!
>The level of the slime increases up to Luka's thighs!
if %nanido<2 damage 50,60
if %nanido=2 damage 60,70
if %nanido=3 damage 70,80
skillname ""
name $name
>Hehe... I've almost reached your penis.@
>Once that happens...@> You won't be able to resist me anymore.\
name ""
name "Luka"
>Urhg...!\
name ""
>If this keeps up, I'm going to lose!\
sub %stack,1
return



*slime_green_a6

add %stack,1
if %kousan=2 skip 4
name $name
>Hehe, you're finished. \
name ""
skillname "Green Erosion"
dwave 1,"se\ero_slime3.ogg"
lsp 700,":c;chara\slime_green_h1.bmp",0,0:print 10,500
>The Green Slime spreads out her slime even more!
>The level of the slime increases up to Luka's waist!
if %nanido<2 damage 50,60
if %nanido=2 damage 60,70
if %nanido=3 damage 70,80
skillname ""
name "Luka"
>Ahhh!\
name ""
>The slime finally reaches Luka's waist!@
>With his lower body completely submerged in the Green Slime's body, he can't escape!\
name $name
>Ehehe... You can't resist anymore.@
>Now I can do whatever I want. \
sub %stack,1
goto *slime_green_a7



*slime_green_a7

add %stack,1
name ""
>Luka's lower body is submerged in the Green Slime's body...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Your penis is drowning in me. ":mov $sel2,"The slime flows around Luka's penis, stimulating him!"
if %ransu=2 mov $sel1,"Hehe, I'll tease your penis. ":mov $sel2,"The slime tightens around Luka's penis!"
if %ransu=3 mov $sel1,"I'll play with every spot that feels good... ":mov $sel2,"The slime massages Luka's penis, balls, and even his anus!"
if %ransu=4 mov $sel1,"I'll enjoy playing with you. ":mov $sel2,"Submerged in her body, Luka's penis is toyed with by the slime!"
if %ransu=5 mov $sel1,"Hehe, it feels good doesn't it? ":mov $sel2,"The slime around Luka's lower body massages him all over!"
name $name
eng $sel1:$sel6\
name ""
skillname "Green Ecstasy"
dwave 1,"se\ero_slime3.ogg"
eng $sel2:$sel6
skillcount2 3379
mov %damage_kotei,1
damage 90,100
skillname ""
if %mylife=0 sub %stack,1:return *slime_green_h3
sub %stack,1
goto *slime_green_a7



*slime_green_onedari

mov $list1,"Green Spread"
if %3377>0 mov %list_num1,1
mov $list2,"Green Draw"
if %3378>0 mov %list_num2,1
mov $list3,"Green Ecstasy"
if %3379>0 mov %list_num3,1
gosub *cmd_onedari
if %cmd1=11 goto *slime_green_onedari1
if %cmd1=12 goto *slime_green_onedari2
if %cmd1=13 goto *slime_green_onedari3
if %cmd1=-1 goto *slime_green_main
goto *slime_green_onedari



*slime_green_onedari1

gosub *onedari_syori_k
name $name
>You want my slime to rub you all over?\
name ""
gosub *slime_green_a1
skip -1



*slime_green_onedari2

gosub *onedari_syori_k
name $name
>You want my slime to play with your penis?\
name ""
gosub *slime_green_a2
skip -1



*slime_green_onedari3

gosub *onedari_syori_k
name $name
>Ahaha, you want to drown in my body?@
>Then I'll do it all at once!\
name ""
gosub *slime_green_a6
skip -1



*slime_green_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\slime_green_bk03.bmp",245,100
gosub *syasei2
>As the squishy slime rubs his body, Luka comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2589,%2589+1:if %2589=1 mov %count_koenemy,%count_koenemy+1
if %2589>%count_most mov %count_most,%2589:mov $count_mostname,$name
count 11,3
mov $bad1,"Luka succumbed to the Green Slime's slime spread skill."
gosub *face2
name $name
>Ahaha, you came. \
name ""
goto *slime_green_h



*slime_green_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\slime_green_bk02.bmp",245,100
gosub *syasei2
>As the squishy slime is used to tease his penis, Luka comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2589,%2589+1:if %2589=1 mov %count_koenemy,%count_koenemy+1
if %2589>%count_most mov %count_most,%2589:mov $count_mostname,$name
count 11,3
mov $bad1,"Luka succumbed to the Green Slime's slime draw skill."
gosub *face2
name $name
>Ahaha, you came. \
name ""
goto *slime_green_h



*slime_green_h3

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":c;chara\slime_green_h2.bmp",0,0:print 10,500
gosub *syasei2
>With his lower body submerged in the Green Slime's body, Luka comes, filling her body with semen.\
mov %viclose,1:gosub *lose
mov %2589,%2589+1:if %2589=1 mov %count_koenemy,%count_koenemy+1
if %2589>%count_most mov %count_most,%2589:mov $count_mostname,$name
count 11,3
mov $bad1,"Submerged in the Green Slime, Luka came."
gosub *face2
name $name
>Ahaha, it's incredible, isn't it? \
name ""
goto *slime_green_h



*slime_green_h

mov $bad2,"Stuck in the Green Slime's body, Luka's semen is squeezed endlessly."
if %2589=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %hseanwave,18:hseanwave
cspl 690,699
lsp 700,":c;chara\slime_green_h1.bmp",0,0:print 10,500
>All I can see around me is the Green Slime's body.\
>With my lower body submerged in hers, the slime quickly dissolves my clothes.@
>Without my clothes, my naked penis is floating inside her.\
name "Luka"
>Ahh...\
name ""
>A strange sensation immediately attacks me.@
>Her warm, sticky body applies a little bit of pressure to my penis.\
>Submerged inside of her, I involuntarily let out a moan after feeling her like this for the first time.\
name $name
>Ahaha, it feels good, doesn't it?@
>I'll make your penis feel even better. \
name ""
name "Luka"
>Ah...ahhh!\
name ""
>The slime around my penis starts to thicken a little bit.@
>It starts to move a little, back and forth, up and down, as the squishy slime gently tightens around my penis.\
>With nothing around me in any direction but her body, I wave my arms around helplessly as she freely plays with me.\
name $name
>Ahaha, it's like you're drowning.@
>I'll drown you in more ways than one. \
name ""
name "Luka"
>Ahhhh!\
name ""
>The slime around my lower body starts to move, freely flowing like liquid around me.@
>The sticky slime rubs and massages every inch of my body that's submerged in her, especially the thicker slime around my penis.\
name "Luka"
>Ahh... I'm going to come...\
name ""
name $name
>Hehe, are you going to come inside me?@
>Make sure you get a good look at yourself when you come. \
>Now, come! \
name ""
>The thicker slime around my penis suddenly starts to intensely vibrate.@
>The sudden powerful stimulus crushes the last of my resistance.\
>I'll just enjoy this pleasure and come...@
>While thinking that, I surrender to her.\
name "Luka"
>Haa... Ahhh...\
name ""
gosub *syasei1
lsp 700,":c;chara\slime_green_h2.bmp",0,0
gosub *syasei2
>With a contented sigh, I come inside of her body.@
>Looking down, I can see my milky white semen shooting into her green body.\
>The cloudy semen floats inside her body, slowly being absorbed into her slime.@
>All the while, I'm forced to look at it, witnessing the proof of my own defeat.\
>Forced to witness my own defeat, I start to feel tears of humiliation coming out of my eyes.\
name "Luka"
>Ahhh...\
name ""
name $name
>Haha, you were defeated by a slime.@
>It's frustrating, isn't it?@>Pathetic, isn't it?\
name ""
>The Green Slime giggles as her slime continues to rub my penis, squeezing out the last bits of semen into her body.\
>She starts to press her slime into my penis again, slowly spinning the fluid inside of her around my penis in a circle at the same time.\
name $name
>Hehe, a slime can move their body however they want you know. \
name ""
name "Luka"
>Ahhh!\
name ""
>I moan in pleasure as I'm subjected to her ever-changing attacks.@
>Weak and submerged in her body, I can't do anything as she plays with me.\
>In a state of complete helplessness, I have to accept whatever she does to me.\
name $name
>At this rate, you're going to drown in my body.@
>But your penis is already drowning inside me. \
name ""
>The slime around my penis tightens again.@
>The Green Slime laughs as she alternates between spinning the slime and using it to massage and stroke my penis.\
>At the mercy of her whims, I feel another orgasm already coming out.\
name "Luka"
>Ahh... I'm going to come again...\
name ""
name $name
>Haha, again already?@
>Alright, lets see that pathetic orgasm! \
name ""
>The Green Slime giggles as the slime around my penis starts to vibrate and quickly spin around my penis.\
>Unable to endure it even the slightest, I give in and ejaculate almost in time with her command.\
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":c;chara\slime_green_h3.bmp",0,0
gosub *syasei2
>I explode inside her green body again.@
>My milky white semen bubbles up in her body, humiliating me as I watch on yet again.\
>I let out a pleasure filled sigh as I relax, submerged in her warm body.\
name $name
>I want to tease you some more.@
>So I'll squeeze out more of your semen...\
name $name
name "Luka"
>N...No... Ahhh!\
name ""
>After that, the Green Slime continued to force me to orgasm after orgasm until I fainted.\
gosub *anten
mov %hseanwave,0:hseanwave
>Thus, I've been caught by the Green Slime.@
>Submerged in her body, I'm squeezed dry every waking moment, with no way to escape.\
>My adventure ends here...\
>..............\
goto *badend



*slimes_start

if %continue=1 bgm "bgm\battle.ogg"
mov $name,"Slime Girls"
mov $name2,"Purple Slime"
mov $lavel,"slimes"
mov $tatie1,"slime_purple_st01"
mov $tatie2,"slime_purple_st02"
mov $tatie3,"slime_purple_st03"
mov $tatie4,"slime_purple_st02"
mov $haikei,"bg097"
mov %monster_x,70
mov %monster_y,120
mov $tatie1b,"slime_green_st01"
mov $tatie2b,"slime_green_st02"
mov $tatie3b,"slime_green_st03"
mov %monster_xb,525
mov %monster_yb,155
mov $tatie1c,"slime_blue_st01"
mov $tatie2c,"slime_blue_st02"
mov $tatie3c,"slime_blue_st03"
mov %monster_xc,-70
mov %monster_yc,20
mov $tatie1d,"slime_red_st01"
mov $tatie2d,"slime_red_st02"
mov $tatie3d,"slime_red_st03"
mov %monster_xd,345
mov %monster_yd,10
if %nanido=1 mov %max_enemylife,3200
if %nanido=2 mov %max_enemylife,3400
if %nanido=3 mov %max_enemylife,3600
if %nanido=0 mov %max_enemylife,2
if %nanido=1 mov %henkahp1,1400
if %nanido=2 mov %henkahp1,1400
if %nanido=3 mov %henkahp1,1400
if %nanido=0 mov %henkahp1,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,50
if %nanido=3 mov %earth_keigen,25
mov %music,0
mov %tikei,3
gosub *maxmp:mov %mp,%max_mp
mov %tekikazu,4
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free of all the slime!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack with all this slime on him!"
mov $mogaku_sel1,"Hehehe... Wasted effort."
mov $mogaku_sel2,"Flounder around as you drown in our slime..."
mov $mogaku_sel3,"It will feel so good, your ability to resist will float away..."
mov $mogaku_sel4,"You act like you hate it... But you're really loving this, aren't you?"
mov $mogaku_sel5,"Hehe... Struggle... Drown..."
mov $mogaku_earth_dassyutu1,"Able to escape from our slime hell..."
mov $mogaku_earth_dassyutu2,"It looks like he's no normal human."
mov %end_n,6
mov %exp_minus,22000
mov %zmonster_x,-100
mov %tukix,240
mov %tekikazu,4
mov %owaza_count1a,6
name "Luka"
>Gah... A... A group of them!?\
name ""
>One was hard enough... But now four!?@
>If I lose my focus for a second, I'm done for!\
name "Purple Slime"
>I believe... You said you wished to meet Undine?\
>I'm sorry.@
>But you will become our plaything here.\
name ""
name "Blue Slime"
>It's been so long since we've played with a human...@
>I want to tease him a lot.\
name ""
name "Red Slime"
>Ahaha, get ready! @
>We'll engulf you in a slimy hell! \
name ""
name "Luka"
>Sorry, but I have to meet with Undine!@
>I won't lose here!\
name ""
>It looks like the leader is the Purple Slime...@
>If I take her down, the rest should scatter!\
goto *common_main



*slimes_v

gosub *face3
name "Purple Slime"
>Guh... What skill...!\
name ""
name "Red Slime"
>Wh...What should we do...?@
>We can't handle this human...\
name ""
>With the leader driven to the edge, the other slimes all start to tremble.@
>Was I able to get through this somehow!?\
name "Purple Slime"
>...There's no other choice.@
>We have to...@>Get help from Erubetie!\
name ""
>The Purple Slime calls for assistance!\
dwave 1,"se\ero_slime3.ogg"
name "???"
>...I warned you, but you still came this far.@
>In addition, you even turned your sword towards my brethren.\
name ""
>Suddenly, an oppressive presence fills the air.@
>And that voice I kept hearing...\
name "Luka"
>Guh... Who's coming!?\
name ""
>I've felt this feeling before...@
>An insanely powerful enemy is approaching...\
name "Purple Slime"
>Well, there you have it.@
>Erubetie herself is going to deal with you!\
name ""
name "Green Slime"
>You're already dead.@
>Erubetie is going to dissolve you into mush!\
name ""
dwave 1,"se\escape.ogg"
cspl 700,707:print 10,500
>The Slime Girls run away!\
mov %viclose,2:gosub *victory_plural
mov %getexp,15000:gosub *lvup
mov %2289,1
mov %2349,1
goto *sean0196



*slimes_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *slimes_kousan
if %cmd1=16 goto *slimes_onedari
if %cmd1=17 goto *common_skill
goto *slimes_main



*slimes_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name "Purple Slime"
>Already giving up?@
>Then all four of us will gladly take use of your body...\
name ""
name "Blue Slime"
>I'll squeeze out his semen...\
name ""
name "Red Slime"
>Even if you cry, even if you shout, we won't ever stop!\
name ""
goto *slimes_a



*slimes_a

if %enemylife<%henkahp1 goto *slimes_v
mov %hanyo1,0:mov %hanyo2,0:mov %hanyo3,0:mov %hanyo4,0
if %kousoku=3 gosub *slimes_a14:goto *common_main
if %kousoku=2 gosub *slimes_a13:goto *common_main
if %kousoku=1 gosub *slimes_a12:goto *common_main
rnd2 %ransu,1,148
if %ransu<5 gosub *slimes_a1:gosub *slimes_a6:goto *common_main
if %ransu<9 gosub *slimes_a1:gosub *slimes_a8:goto *common_main
if %ransu<13 gosub *slimes_a2:gosub *slimes_a6:goto *common_main
if %ransu<17 gosub *slimes_a2:gosub *slimes_a8:goto *common_main
if %ransu<21 gosub *slimes_a3:gosub *slimes_a6:goto *common_main
if %ransu<25 gosub *slimes_a3:gosub *slimes_a8:goto *common_main
if %ransu<29 gosub *slimes_a1:gosub *slimes_a2:gosub *slimes_a5:goto *common_main
if %ransu<33 gosub *slimes_a1:gosub *slimes_a3:gosub *slimes_a5:goto *common_main
if %ransu<37 gosub *slimes_a2:gosub *slimes_a3:gosub *slimes_a5:goto *common_main
if %ransu<41 gosub *slimes_a1:gosub *slimes_a2:gosub *slimes_a7:goto *common_main
if %ransu<45 gosub *slimes_a1:gosub *slimes_a3:gosub *slimes_a7:goto *common_main
if %ransu<49 gosub *slimes_a2:gosub *slimes_a3:gosub *slimes_a7:goto *common_main
if %ransu<65 gosub *slimes_a9:goto *common_main
if %ransu<77 gosub *slimes_a10:goto *common_main
if %ransu<89 gosub *slimes_a1:gosub *slimes_a2:gosub *slimes_a3:gosub *slimes_a4:goto *common_main
if %ransu<92 mov %hanyo4,1:gosub *slimes_a5:gosub *slimes_a5:goto *common_main
if %ransu<95 mov %hanyo4,1:gosub *slimes_a5:gosub *slimes_a7:goto *common_main
if %ransu<98 mov %hanyo4,1:gosub *slimes_a7:gosub *slimes_a5:goto *common_main
if %ransu<101 mov %hanyo4,1:gosub *slimes_a7:gosub *slimes_a7:goto *common_main
if %ransu>100 && %owaza_count1a>8 gosub *slimes_a11:goto *common_main
skip -21



*slimes_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Now for a sweet kiss..."
if %ransu=2 mov $sel1,"Please melt with my kiss..."
if %ransu=3 mov $sel1,"My kiss is very sweet..."
name "Purple Slime"
eng $sel1:$sel6\
name ""
skillname "Purple Kiss"
dwave 1,"se\ero_pyu2.ogg"
eng "The Purple Slime presses her soft lips against Luka's!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>A slimy tongue is forced into Luka's mouth!
skillcount2 3380
if %nanido<2 damage 25,35
if %nanido=2 damage 30,40
if %nanido=3 damage 35,45
skillname ""
if %mylife=0 sub %stack,1:return *slimes_h1
mov %hanyo1,1
sub %stack,1
return



*slimes_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Your nipples... Feel good, right?"
if %ransu=2 mov $sel1,"Even though you're a man, reacting to this... You pervert."
if %ransu=3 mov $sel1,"Nipples... I like teasing them."
name "Blue Slime"
eng $sel1:$sel6\
name ""
skillname "Blue Flow"
dwave 1,"se\ero_makituki1.ogg"
eng "The Blue Slime's slime squirms onto Luka's chest!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>The squishy sensation stimulates Luka!
skillcount2 3381
if %nanido<2 damage 25,35
if %nanido=2 damage 30,40
if %nanido=3 damage 35,45
skillname ""
if %mylife=0 sub %stack,1:return *slimes_h2
mov %hanyo2,1
sub %stack,1
return



*slimes_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Come while I play with your ass!"
if %ransu=2 mov $sel1,"Hehe... You can feel it in your ass, can't you?"
if %ransu=3 mov $sel1,"Being played with in your ass is embarrassing, isn't it?"
name "Red Slime"
eng $sel1:$sel6\
name ""
skillname "Red Gale"
dwave 1,"se\ero_chupa2.ogg"
eng "The Red Slime's squishy slime crawls into Luka's ass!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>The wriggling slime stimulates Luka!
skillcount2 3382
if %nanido<2 damage 25,35
if %nanido=2 damage 30,40
if %nanido=3 damage 35,45
skillname ""
if %mylife=0 sub %stack,1:return *slimes_h3
mov %hanyo3,1
sub %stack,1
return



*slimes_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You like it when I tease your penis, don't you?"
if %ransu=2 mov $sel1,"It's fine if you want to come in my slime. "
if %ransu=3 mov $sel1,"Ahaha, come, come! "
name "Green Slime"
eng $sel1:$sel6\
name ""
skillname "Green Draw"
dwave 1,"se\ero_slime1.ogg"
eng "The Green Slime's slime wraps around Luka's penis!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>The slime vibrates, stimulating Luka!
skillcount2 3378
if %nanido<2 damage 25,35
if %nanido=2 damage 30,40
if %nanido=3 damage 35,45
skillname ""
if %mylife=0 sub %stack,1:return *slimes_h4
sub %stack,1
return



*slimes_a5

add %stack,1
if %hanyo4=0 skip 9
mov %hanyo4,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 gosub *slimes_a5a:gosub *slimes_a5b
if %ransu=2 gosub *slimes_a5a:gosub *slimes_a5c
if %ransu=3 gosub *slimes_a5b:gosub *slimes_a5c
skip 13
if %hanyo1=0 gosub *slimes_a5a
if %hanyo2=0 gosub *slimes_a5b
if %hanyo3=0 gosub *slimes_a5c
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Two of us will play with you! "
if %ransu=2 mov $sel1,"Our slime will make you come. "
if %ransu=3 mov $sel1,"Ahaha, come, come! "
name "Green Slime"
eng $sel1:$sel6\
name ""
skillname "Double Draw"
eng "Two of the slime's mix their slime together, and wrap it around Luka!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3384
dwave 1,"se\ero_slime1.ogg"
>The mixed slimes wriggle around Luka's penis!
if %nanido<2 damage 30,40
if %nanido=2 damage 35,45
if %nanido=3 damage 40,50
dwave 1,"se\ero_slime1.ogg"
>The two separate slimes pulsate and move at different speeds!
if %nanido<2 damage 30,40
if %nanido=2 damage 35,45
if %nanido=3 damage 40,50
skillname ""
if %mylife=0 sub %stack,1:return *slimes_h5
sub %stack,1
return



*slimes_a5a

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"The sticky slime feels good, doesn't it...?"
if %ransu=2 mov $sel1,"I'll make your penis all sticky..."
if %ransu=3 mov $sel1,"Have a taste of the sticky sensation..."
name "Purple Slime"
eng $sel1:$sel6\
name ""
mov %hanyo1,1
sub %stack,1
return



*slimes_a5b

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll make your penis feel good..."
if %ransu=2 mov $sel1,"When we do this, men feel good don't they?"
if %ransu=3 mov $sel1,"Come... While our slime wraps around your penis!"
name "Blue Slime"
eng $sel1:$sel6\
name ""
mov %hanyo2,1
sub %stack,1
return



*slimes_a5c

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hehe, let's play with his penis!"
if %ransu=2 mov $sel1,"Your penis will melt in our slime!"
if %ransu=3 mov $sel1,"Our squishy slime feels good, doesn't it?"
name "Red Slime"
eng $sel1:$sel6\
name ""
mov %hanyo3,1
sub %stack,1
return



*slimes_a6

add %stack,1
if %hanyo1=0 gosub *slimes_a5a
if %hanyo2=0 gosub *slimes_a5b
if %hanyo3=0 gosub *slimes_a5c
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Three at once... You won't endure this! "
if %ransu=2 mov $sel1,"It's fine if you want to give three of us your semen. "
if %ransu=3 mov $sel1,"Ahaha, come, come! "
name "Green Slime"
eng $sel1:$sel6\
name ""
skillname "Triple Draw"
eng "Three of the girls mix their slime together, and wrap it around Luka's penis!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3385
dwave 1,"se\ero_slime1.ogg"
>The mixed slimes absorb Luka's penis!
if %nanido<2 damage 30,40
if %nanido=2 damage 35,45
if %nanido=3 damage 40,50
dwave 1,"se\ero_slime1.ogg"
>The mixed slimes spin around Luka's penis!
if %nanido<2 damage 30,40
if %nanido=2 damage 35,45
if %nanido=3 damage 40,50
dwave 1,"se\ero_slime1.ogg"
>The mixed slimes tighten around the tip of Luka's penis!
if %nanido<2 damage 30,40
if %nanido=2 damage 35,45
if %nanido=3 damage 40,50
skillname ""
if %mylife=0 sub %stack,1:return *slimes_h6
sub %stack,1
return



*slimes_a7

add %stack,1
if %hanyo4=0 skip 9
mov %hanyo4,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 gosub *slimes_a7a:gosub *slimes_a7b
if %ransu=2 gosub *slimes_a7a:gosub *slimes_a7c
if %ransu=3 gosub *slimes_a7b:gosub *slimes_a7c
skip 13
if %hanyo1=0 gosub *slimes_a7a
if %hanyo2=0 gosub *slimes_a7b
if %hanyo3=0 gosub *slimes_a7c
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Two of us will go at once. "
if %ransu=2 mov $sel1,"We'll wriggle all over your body. "
if %ransu=3 mov $sel1,"Ahaha, our slime will be all over your body. "
name "Green Slime"
eng $sel1:$sel6\
name ""
skillname "Double Spread"
eng "Two of the girls mix their slime together, and cover Luka's body with it!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3387
dwave 1,"se\ero_slime3.ogg"
>The squishy slime squirms all over Luka's body!
if %nanido<2 damage 30,40
if %nanido=2 damage 35,45
if %nanido=3 damage 40,50
dwave 1,"se\ero_slime3.ogg"
>The squishy slime tightens around Luka's body!
if %nanido<2 damage 30,40
if %nanido=2 damage 35,45
if %nanido=3 damage 40,50
skillname ""
if %mylife=0 sub %stack,1:return *slimes_h8
sub %stack,1
return



*slimes_a7a

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Drown in our bodies..."
if %ransu=2 mov $sel1,"Our sticky slime feels good, doesn't it...?"
if %ransu=3 mov $sel1,"Your body will be wrapped in our slime..."
name "Purple Slime"
eng $sel1:$sel6\
name ""
mov %hanyo1,1
sub %stack,1
return



*slimes_a7b

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Do this, and spread it all over his body..."
if %ransu=2 mov $sel1,"Make him sticky all over..."
if %ransu=3 mov $sel1,"...Does it feel good?"
name "Blue Slime"
eng $sel1:$sel6\
name ""
mov %hanyo2,1
sub %stack,1
return



*slimes_a7c

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Our bodies are warm, aren't they? "
if %ransu=2 mov $sel1,"Our squishy slime feels amazing, doesn't it? "
if %ransu=3 mov $sel1,"We'll cover you with our own bodies! Hehehe. "
name "Red Slime"
eng $sel1:$sel6\
name ""
mov %hanyo3,1
sub %stack,1
return



*slimes_a8

add %stack,1
if %hanyo1=0 gosub *slimes_a7a
if %hanyo2=0 gosub *slimes_a7b
if %hanyo3=0 gosub *slimes_a7c
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Three of us will wrap you up. "
if %ransu=2 mov $sel1,"We'll wriggle all over your body. "
if %ransu=3 mov $sel1,"Ahaha, our slime will be all over your body. "
name "Green Slime"
eng $sel1:$sel6\
name ""
skillname "Triple Spread"
eng "Three of the girls mix their slime together, and cover Luka's body with it!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3388
dwave 1,"se\ero_slime3.ogg"
>The squishy slime crawls all over Luka's body!
if %nanido<2 damage 30,40
if %nanido=2 damage 35,45
if %nanido=3 damage 40,50
dwave 1,"se\ero_slime3.ogg"
>The squishy slime wraps around Luka's body!
if %nanido<2 damage 30,40
if %nanido=2 damage 35,45
if %nanido=3 damage 40,50
dwave 1,"se\ero_slime3.ogg"
>The squishy slime vibrates, stimulating Luka's entire body!
if %nanido<2 damage 30,40
if %nanido=2 damage 35,45
if %nanido=3 damage 40,50
skillname ""
if %mylife=0 sub %stack,1:return *slimes_h9
sub %stack,1
return



*slimes_a9

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 gosub *slimes_a9a:skip 3
if %ransu=2 gosub *slimes_a9b:skip 2
if %ransu=3 gosub *slimes_a9c
skillcount2 3386
skillname ""
if %mylife=0 sub %stack,1:return *slimes_h7
sub %stack,1
return



*slimes_a9a

add %stack,1
name "Purple Slime"
>How about all of us play with his penis at once?\
name ""
name "Blue Slime"
>Everyone at once...?\
name ""
name "Red Slime"
>Drown his penis in a slime hell. \
name ""
name "Green Slime"
>Ahaha, that sounds good. Come, come! \
name ""
skillname "Special Draw"
dwave 1,"se\ero_slime1.ogg"
>All four slime girls mix their slime together, and cover Luka's penis with it!\
>Mobbed by the four slime girls, Luka takes a concentrated attack!
if %nanido<2 damage 120,140
if %nanido=2 damage 140,160
if %nanido=3 damage 160,180
sub %stack,1
return



*slimes_a9b

add %stack,1
name "Purple Slime"
>I'll make your penis sticky like this...\
name ""
name "Blue Slime"
>Ah, me too! Me too!\
name ""
name "Red Slime"
>Then I'll join in too. \
name ""
name "Green Slime"
>Don't leave me out! Everyone together!\
name ""
skillname "Special Draw"
dwave 1,"se\ero_slime1.ogg"
>The four slime girls all climb over each other to play with Luka's penis!\
mov %damage_nobr,1
if %nanido<2 damage 30,35
if %nanido=2 damage 35,40
if %nanido=3 damage 40,45
if %nanido<2 damage 30,35
if %nanido=2 damage 35,40
if %nanido=3 damage 40,45
mov %damage_nobr,1
if %nanido<2 damage 30,35
if %nanido=2 damage 35,40
if %nanido=3 damage 40,45
if %nanido<2 damage 30,35
if %nanido=2 damage 35,40
if %nanido=3 damage 40,45
sub %stack,1
return



*slimes_a9c

add %stack,1
name "Purple Slime"
>Going after the weak spot is the best...\
name ""
skillname "Special Draw"
dwave 1,"se\ero_slime1.ogg"
>The Purple Slime rubs her slime on the back of Luka's penis!
if %nanido<2 damage 30,35
if %nanido=2 damage 35,40
if %nanido=3 damage 40,45
name "Blue Slime"
>I'll go for the pee hole...\
name ""
dwave 1,"se\ero_slime1.ogg"
>The Blue Slime wraps around the tip of Luka's penis, and vibrates!
if %nanido<2 damage 30,35
if %nanido=2 damage 35,40
if %nanido=3 damage 40,45
name "Red Slime"
>Then I'll go right under the mushroom thing. \
name ""
dwave 1,"se\ero_slime1.ogg"
>The Red Slime coils right under the tip of Luka's penis!
if %nanido<2 damage 30,35
if %nanido=2 damage 35,40
if %nanido=3 damage 40,45
name "Green Slime"
>I'll take the rest. \
name ""
dwave 1,"se\ero_slime1.ogg"
>The Green Slime wraps around the shaft of Luka's penis!
if %nanido<2 damage 30,35
if %nanido=2 damage 35,40
if %nanido=3 damage 40,45
sub %stack,1
return



*slimes_a10

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 gosub *slimes_a10a:skip 3
if %ransu=2 gosub *slimes_a10b:skip 2
if %ransu=3 gosub *slimes_a10c
skillcount2 3389
skillname ""
if %mylife=0 sub %stack,1:return *slimes_h10
sub %stack,1
return



*slimes_a10a

add %stack,1
name "Purple Slime"
>Everyone, let's cover his whole body.\
name ""
name "Blue Slime"
>Squishy squishy!\
name ""
name "Red Slime"
>Me too, I'll take the feet!\
name ""
name "Green Slime"
>Ehehe, cover him with our bodies. \
name ""
skillname "Special Spread"
dwave 1,"se\ero_slime3.ogg"
>The four slime girls mix their bodies together, and spread the slime all over Luka's body!\
>Mobbed by the four slime girls, Luka takes a concentrated attack!
if %nanido<2 damage 120,140
if %nanido=2 damage 140,160
if %nanido=3 damage 160,180
sub %stack,1
return



*slimes_a10b

add %stack,1
name "Purple Slime"
>I'll spread my body over yours...\
name ""
name "Blue Slime"
>Me too, I want to tease him too!\
name ""
name "Red Slime"
>I'll cover you with my warm slime, too...\
name ""
name "Green Slime"
>Don't leave me out, let's drown him in our bodies. \
name ""
skillname "Special Spread"
dwave 1,"se\ero_slime3.ogg"
>The four slime girls cover Luka's body in their slime!\
mov %damage_nobr,1
if %nanido<2 damage 30,35
if %nanido=2 damage 35,40
if %nanido=3 damage 40,45
if %nanido<2 damage 30,35
if %nanido=2 damage 35,40
if %nanido=3 damage 40,45
mov %damage_nobr,1
if %nanido<2 damage 30,35
if %nanido=2 damage 35,40
if %nanido=3 damage 40,45
if %nanido<2 damage 30,35
if %nanido=2 damage 35,40
if %nanido=3 damage 40,45
sub %stack,1
return



*slimes_a10c

add %stack,1
name "Purple Slime"
>I'll combine my body with yours...\
name ""
skillname "Special Spread"
dwave 1,"se\ero_slime3.ogg"
>The Purple Slime hugs Luka tightly, pressing her body against his!
if %nanido<2 damage 30,35
if %nanido=2 damage 35,40
if %nanido=3 damage 40,45
name "Blue Slime"
>Me too...\
name ""
dwave 1,"se\ero_slime3.ogg"
>The Blue Slime hugs Luka from behind, pressing her squishy body against his!
if %nanido<2 damage 30,35
if %nanido=2 damage 35,40
if %nanido=3 damage 40,45
name "Red Slime"
>Me too! I'll hug him reeeeaally tight!\
name ""
dwave 1,"se\ero_slime3.ogg"
>The Red Slime tightly hugs Luka from his right side!
if %nanido<2 damage 30,35
if %nanido=2 damage 35,40
if %nanido=3 damage 40,45
name "Green Slime"
>Ehehe, we're all hugging him at once! \
name ""
dwave 1,"se\ero_slime3.ogg"
>The Green Slime hugs Luka from his left, surrounding him by the slime girls in every direction!
if %nanido<2 damage 30,35
if %nanido=2 damage 35,40
if %nanido=3 damage 40,45
sub %stack,1
return



*slimes_a11

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name "Purple Slime"
>Hehe... I'll wrap up your body...\
name ""
skillname "Purple Hold"
dwave 1,"se\ero_slime3.ogg"
>The Purple Slime hugs Luka's body, and wraps it in her own!
if %wind=1 && %nanido<2 mov %wind_kakuritu,10
if %wind=1 && %nanido=2 mov %wind_kakuritu,7
if %wind=1 && %nanido=3 mov %wind_kakuritu,5
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
if %nanido<2 damage 25,35
if %nanido=2 damage 30,40
if %nanido=3 damage 35,45
mov %kousoku,1:gosub *status_print
>Luka's body is wrapped up in the Purple Slime's body!\
skillname ""
if %mylife=0 sub %stack,1:return *slimes_h11
if %kousan=2 sub %stack,1:return
gosub *face2
name "Purple Slime"
if %first_sel1=1 skip 4
>How does it feel, being wrapped in sticky slime?@
>If we stay like this, you can feel as good as you want...\
skip 3
>This time, I won't let go...@
>If we stay like this, you can feel as good as you want...\
name ""
mov %hanyo1,1
if %earth=0 && %nanido<2 mov %genmogaku,100
if %earth=0 && %nanido=2 mov %genmogaku,100
if %earth=0 && %nanido=3 mov %genmogaku,100
if %earth>0 && %nanido<2 mov %genmogaku,2
if %earth>0 && %nanido=2 mov %genmogaku,2
if %earth>0 && %nanido=3 mov %genmogaku,2
rnd2 %ransu,1,2
if %ransu=1 gosub *slimes_a6:sub %stack,1:return
if %ransu=2 gosub *slimes_a8:sub %stack,1:return



*slimes_a12

add %stack,1
if %kousan=2 skip 5
>Luka's body is wrapped in the Purple Slime's body...\
name "Blue Slime"
>I'll wrap him too...\
name ""
skillname "Blue Hold"
dwave 1,"se\ero_slime3.ogg"
>The Blue Slime combines parts of her body with the Purple Slime, and wraps up Luka too!
if %nanido<2 damage 25,35
if %nanido=2 damage 30,40
if %nanido=3 damage 35,45
mov %kousoku,2:gosub *status_print
>Luka's body has been wrapped by the Blue Slime's body!\
skillname ""
if %mylife=0 sub %stack,1:return *slimes_h11
if %kousan=2 sub %stack,1:return
if %first_sel1=1 skip 7
name "Purple Slime"
>Hehe... How does it feel with two at once?\
name ""
name "Blue Slime"
>We'll make you come...\
name ""
mov %hanyo1,1
mov %hanyo2,1
rnd2 %ransu,1,2
if %ransu=1 gosub *slimes_a5:sub %stack,1:return
if %ransu=2 gosub *slimes_a7:sub %stack,1:return



*slimes_a13

add %stack,1
if %kousan=2 skip 6
>Luka is wrapped by the Purple Slime...@
>Luka is wrapped by the Blue Slime...\
name "Red Slime"
>Me too! I'll join you two!\
name ""
skillname "Red Hold"
dwave 1,"se\ero_slime3.ogg"
>The Red Slime combines with the other two slimes, wrapping up Luka's body!
if %nanido<2 damage 25,35
if %nanido=2 damage 30,40
if %nanido=3 damage 35,45
mov %kousoku,3:gosub *status_print
>Luka's body has been wrapped up by the Red Slime's body!\
skillname ""
if %mylife=0 sub %stack,1:return *slimes_h11
if %kousan=2 sub %stack,1:return
if %first_sel1=1 skip 11
name "Purple Slime"
>It's heaven being inside three slimes, isn't it?\
name ""
name "Blue Slime"
>You look like you're feeling so good...\
name ""
name "Red Slime"
>Everyone will make you feel really good together! \
name ""
mov %first_sel1,1
gosub *slimes_a4:sub %stack,1:return



*slimes_a14

add %stack,1
if %kousan=2 skip 7
>Luka is wrapped by the Purple Slime...@
>Luka is wrapped by the Blue Slime...@
>Luka is wrapped by the Red Slime...\
name "Green Slime"
>I'm the last!\
name ""
skillname "Green Hold"
dwave 1,"se\ero_slime3.ogg"
>The Green Slime combines with the other three slimes, wrapping up Luka's body!
if %nanido<2 damage 25,35
if %nanido=2 damage 30,40
if %nanido=3 damage 35,45
mov %kousoku,4:gosub *status_print
>Luka's body has been wrapped up by the Green Slime's body!\
skillname ""
if %mylife=0 sub %stack,1:return *slimes_h11
name "Purple Slime"
>All four of us are together at last... Hehe.\
name ""
name ""
name "Blue Slime"
>You can't ever escape now.\
name ""
name "Red Slime"
>It's paradise, isn't it? Hehe. \
name ""
name "Green Slime"
>Let's do something amazing together, everyone. \
name ""
sub %stack,1
goto *slimes_a15



*slimes_a15

add %stack,1
>Luka's wrapped in all four of the slime girl's bodies...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Let's massage him all over like this...":mov $sel2,"Green Slime":mov $sel3,"Drown in us! ":mov $sel4,"The four slime girls mix their bodies together, covering Luka's body with their sticky slime!"
if %ransu=2 mov $sel1,"Slimes can control their bodies however they want...":mov $sel2,"Green Slime":mov $sel3,"Hehe, he can't take us. ":mov $sel4,"The four slime girls mix their bodies together, creating tiny whirlpools around Luka's penis!"
if %ransu=3 mov $sel1,"Let's make him feel good all over...":mov $sel2,"Red Slime":mov $sel3,"You can't take our bodies, can you?":mov $sel4,"The four slime girl's slime flows around Luka's body, as if thousands of tongues were licking him!"
if %ransu=4 mov $sel1,"Is it humiliating to be toyed with like this...?":mov $sel2,"Blue Slime":mov $sel3,"Hehe... It's tight isn't it?":mov $sel4,"The four slimes wrapped around Luka's body tighten!"
if %ransu=5 mov $sel1,"Everyone, let's slowly rub his penis...":mov $sel2,"Red Slime":mov $sel3,"Rub it and make it come!":mov $sel4,"The four slimes mix their bodies together around Luka's penis, stimulating it!"
name "Purple Slime"
eng $sel1:$sel6\
name ""
name $sel2
eng $sel3:$sel6\
name ""
skillname "Special Heaven"
dwave 1,"se\ero_slime3.ogg"
skillcount2 3390
eng $sel4:$sel6
mov %damage_kotei,1
damage 150,200
skillname ""
if %mylife=0 sub %stack,1:return *slimes_h12
sub %stack,1
goto *slimes_a15



*slimes_onedari

mov $list1,"Purple Kiss"
if %3380>0 mov %list_num1,1
mov $list2,"Blue Flow"
if %3381>0 mov %list_num2,1
mov $list3,"Red Gale"
if %3382>0 mov %list_num3,1
mov $list4,"Green Draw"
if %3378>0 mov %list_num4,1
mov $list5,"Double Draw"
if %3384>0 mov %list_num5,1
mov $list6,"Triple Draw"
if %3385>0 mov %list_num6,1
mov $list7,"Special Draw"
if %3386>0 mov %list_num7,1
mov $list8,"Double Spread"
if %3387>0 mov %list_num8,1
mov $list9,"Triple Spread"
if %3388>0 mov %list_num9,1
mov $list10,"Special Spread"
if %3389>0 mov %list_num10,1
mov $list11,"Special Heaven"
if %3390>0 mov %list_num11,1
gosub *cmd_onedari
if %cmd1=11 goto *slimes_onedari1
if %cmd1=12 goto *slimes_onedari2
if %cmd1=13 goto *slimes_onedari3
if %cmd1=14 goto *slimes_onedari4
if %cmd1=15 goto *slimes_onedari5
if %cmd1=16 goto *slimes_onedari6
if %cmd1=17 goto *slimes_onedari7
if %cmd1=18 goto *slimes_onedari8
if %cmd1=19 goto *slimes_onedari9
if %cmd1=20 goto *slimes_onedari10
if %cmd1=21 goto *slimes_onedari11
if %cmd1=-1 goto *slimes_main
goto *slimes_onedari



*slimes_onedari1

gosub *onedari_syori
name "Purple Slime"
>You want to taste my kiss?\
name ""
gosub *slimes_a1
skip -1



*slimes_onedari2

gosub *onedari_syori
name "Blue Slime"
>Nipple... You want it teased?\
name ""
gosub *slimes_a2
skip -1



*slimes_onedari3

gosub *onedari_syori
name "Red Slime"
>Ahaha, you want me in your ass?@
>How shaaameful. \
name ""
gosub *slimes_a3
skip -1



*slimes_onedari4

gosub *onedari_syori
name "Green Slime"
>You want me to play with your penis?\
name ""
gosub *slimes_a4
skip -1



*slimes_onedari5

gosub *onedari_syori
name "Purple Slime"
>You want us to tease your penis?\
name ""
name "Green Slime"
>Haha, how pathetic! \
name ""
rnd2 %ransu,1,3
if %ransu=1 mov %hanyo1,0:mov %hanyo2,1:mov %hanyo3,1
if %ransu=2 mov %hanyo1,1:mov %hanyo2,0:mov %hanyo3,1
if %ransu=3 mov %hanyo1,1:mov %hanyo2,1:mov %hanyo3,0
gosub *slimes_a5
skip -5



*slimes_onedari6

gosub *onedari_syori
name "Purple Slime"
>You want us to tease your penis?\
name ""
name "Blue Slime"
>You want to ejaculate while covered in our bodies?\
name ""
rnd2 %ransu,1,3
if %ransu=1 mov %hanyo1,0:mov %hanyo2,0:mov %hanyo3,1
if %ransu=2 mov %hanyo1,0:mov %hanyo2,1:mov %hanyo3,0
if %ransu=3 mov %hanyo1,1:mov %hanyo2,0:mov %hanyo3,0
gosub *slimes_a6
skip -5



*slimes_onedari7

gosub *onedari_syori
name "Purple Slime"
>You want us to tease your penis?\
name ""
name "Blue Slime"
>Then drown in our special skill. \
name ""
gosub *slimes_a9
skip -1



*slimes_onedari8

gosub *onedari_syori
name "Purple Slime"
>You want us to play with your whole body?\
name ""
name "Red Slime"
>Ahaha, I'd love to. \
name ""
rnd2 %ransu,1,3
if %ransu=1 mov %hanyo1,0:mov %hanyo2,1:mov %hanyo3,1
if %ransu=2 mov %hanyo1,1:mov %hanyo2,0:mov %hanyo3,1
if %ransu=3 mov %hanyo1,1:mov %hanyo2,1:mov %hanyo3,0
gosub *slimes_a7
skip -5



*slimes_onedari9

gosub *onedari_syori
name "Purple Slime"
>You want us to play with your whole body?\
name ""
name "Blue Slime"
>You want to come as you drown in our bodies?\
name ""
rnd2 %ransu,1,3
if %ransu=1 mov %hanyo1,0:mov %hanyo2,0:mov %hanyo3,1
if %ransu=2 mov %hanyo1,0:mov %hanyo2,1:mov %hanyo3,0
if %ransu=3 mov %hanyo1,1:mov %hanyo2,0:mov %hanyo3,0
gosub *slimes_a8
skip -5



*slimes_onedari10

gosub *onedari_syori
name "Purple Slime"
>You want us to play with your whole body?\
name ""
name "Green Slime"
>Then drown in our special skill. \
name ""
gosub *slimes_a10
skip -1



*slimes_onedari11

gosub *onedari_syori_k
name "Purple Slime"
>Hehe... Are you sure?@
>Even if we ruin you...?\
name ""
name "Blue Slime"
>He wants all of us to wrap him up?\
name ""
name "Red Slime"
>Then we'll cover and drown you in our bodies!\
name ""
name "Green Slime"
>No matter how much you scream or cry, we'll never stop. \
name ""
if %kousoku=0 gosub *slimes_a11
if %kousoku=1 gosub *slimes_a12
if %kousoku=2 gosub *slimes_a13
if %kousoku=3 gosub *slimes_a14
gosub *slimes_a15
skip -1



*slimes_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 699,":a;chara\slime_purple_bk01.bmp",70,120
gosub *syasei2
>After taking the weak kiss from the Purple Slime, Luka comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2649,%2649+1:if %2649=1 mov %count_koenemy,%count_koenemy+1
if %2649>%count_most mov %count_most,%2649:mov $count_mostname,$name
count 11,7
mov $bad1,"Luka succumbed to the Purple Slime's purple kiss skill."
gosub *face2
name "Purple Slime"
>Hehe... You came?\
name ""
goto *slimes_h



*slimes_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 703,":a;chara\slime_blue_bk01.bmp",-70,20
gosub *syasei2
>As the Blue Slime plays with his nipples, Luka comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2649,%2649+1:if %2649=1 mov %count_koenemy,%count_koenemy+1
if %2649>%count_most mov %count_most,%2649:mov $count_mostname,$name
count 11,7
mov $bad1,"Luka succumbed to the Blue Slime's blue flow skill."
gosub *face2
name "Blue Slime"
>You really came from me teasing your nipples...?\
name ""
goto *slimes_h



*slimes_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 705,":a;chara\slime_red_bk01.bmp",345,10
gosub *syasei2
>As the Red Slime teases his anus, Luka comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2649,%2649+1:if %2649=1 mov %count_koenemy,%count_koenemy+1
if %2649>%count_most mov %count_most,%2649:mov $count_mostname,$name
count 11,7
mov $bad1,"Luka succumbed to the Red Slime's red gale skill."
gosub *face2
name "Red Slime"
>Ahaha, having an orgasm just from having your ass played with!?\
name ""
goto *slimes_h



*slimes_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 701,":a;chara\slime_green_bk02.bmp",525,155
gosub *syasei2
>As the Green Slime squeezes his penis, Luka comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2649,%2649+1:if %2649=1 mov %count_koenemy,%count_koenemy+1
if %2649>%count_most mov %count_most,%2649:mov $count_mostname,$name
count 11,7
mov $bad1,"Luka succumbed to the Green Slime's green draw skill."
gosub *face2
name "Green Slime"
>Ahaha, did your penis feel good? \
name ""
goto *slimes_h



*slimes_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
if %hanyo2=0 lsp 703,":a;chara\slime_blue_bk03.bmp",-70,20
lsp 701,":a;chara\slime_green_bk02.bmp",525,155
if %hanyo3=0 lsp 705,":a;chara\slime_red_bk02.bmp",345,10
if %hanyo1=0 lsp 699,":a;chara\slime_purple_bk03.bmp",70,120
gosub *syasei2
>As the two slimes play with his penis, Luka comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2649,%2649+1:if %2649=1 mov %count_koenemy,%count_koenemy+1
if %2649>%count_most mov %count_most,%2649:mov $count_mostname,$name
count 11,7
mov $bad1,"Luka succumbed to the slime girls double draw skill."
gosub *face2
name "Purple Slime"
>Hehe... He came.@
>Did it feel good to have your penis drowned in slime?\
name ""
name "Blue Slime"
>He came... So much...\
name ""
goto *slimes_h



*slimes_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
if %hanyo2=0 lsp 703,":a;chara\slime_blue_bk03.bmp",-70,20
lsp 701,":a;chara\slime_green_bk02.bmp",525,155
if %hanyo3=0 lsp 705,":a;chara\slime_red_bk02.bmp",345,10
if %hanyo1=0 lsp 699,":a;chara\slime_purple_bk03.bmp",70,120
gosub *syasei2
>As the three slimes play with his penis, Luka comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2649,%2649+1:if %2649=1 mov %count_koenemy,%count_koenemy+1
if %2649>%count_most mov %count_most,%2649:mov $count_mostname,$name
count 11,7
mov $bad1,"Luka succumbed to the slime girls triple draw skill."
gosub *face2
name "Purple Slime"
>Hehe... He came.@
>Did it feel good to have your penis drowned in slime?\
name ""
name "Red Slime"
>Ahaha, he sprayed so much everywhere! \
name ""
goto *slimes_h



*slimes_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 703,":a;chara\slime_blue_bk03.bmp",-70,20
lsp 701,":a;chara\slime_green_bk02.bmp",525,155
lsp 705,":a;chara\slime_red_bk02.bmp",345,10
lsp 699,":a;chara\slime_purple_bk03.bmp",70,120
gosub *syasei2
>As the four slimes play with his penis, Luka comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2649,%2649+1:if %2649=1 mov %count_koenemy,%count_koenemy+1
if %2649>%count_most mov %count_most,%2649:mov $count_mostname,$name
count 11,7
mov $bad1,"Luka succumbed to the slime girls special draw skill."
gosub *face2
name "Purple Slime"
>Hehe... He came.@
>Did it feel good to have your penis drowned in slime?\
name ""
name "Green Slime"
>Wow, he came so much! Haha. \
name ""
goto *slimes_h



*slimes_h8

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
if %hanyo2=0 lsp 703,":a;chara\slime_blue_bk01.bmp",-70,20
lsp 701,":a;chara\slime_green_bk03.bmp",525,155
if %hanyo3=0 lsp 705,":a;chara\slime_red_bk01.bmp",345,10
if %hanyo1=0 lsp 699,":a;chara\slime_purple_bk01.bmp",70,120
gosub *syasei2
>As the two slimes mix and spread their slime all over Luka's body, he comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2649,%2649+1:if %2649=1 mov %count_koenemy,%count_koenemy+1
if %2649>%count_most mov %count_most,%2649:mov $count_mostname,$name
count 11,7
mov $bad1,"Luka succumbed to the slime girls double spread skill."
gosub *face2
name "Purple Slime"
>You came just from us spreading our bodies over you a little bit?\
name ""
name "Green Slime"
>Haha, we must feel really good. \
name ""
goto *slimes_h



*slimes_h9

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
if %hanyo1=2 lsp 703,":a;chara\slime_blue_bk01.bmp",-70,20
lsp 701,":a;chara\slime_green_bk03.bmp",525,155
if %hanyo1=3 lsp 705,":a;chara\slime_red_bk01.bmp",345,10
if %hanyo1=1 lsp 699,":a;chara\slime_purple_bk01.bmp",70,120
gosub *syasei2
>As the three slimes mix and spread their slime all over Luka's body, he comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2649,%2649+1:if %2649=1 mov %count_koenemy,%count_koenemy+1
if %2649>%count_most mov %count_most,%2649:mov $count_mostname,$name
count 11,7
mov $bad1,"Luka succumbed to the slime girls triple spread skill."
gosub *face2
name "Purple Slime"
>You came just from us spreading our bodies over you a little bit?\
name ""
name "Red Slime"
>Was it incredible? Haha!\
name ""
goto *slimes_h



*slimes_h10

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 703,":a;chara\slime_blue_bk01.bmp",-70,20
lsp 701,":a;chara\slime_green_bk03.bmp",525,155
lsp 705,":a;chara\slime_red_bk01.bmp",345,10
lsp 699,":a;chara\slime_purple_bk01.bmp",70,120
gosub *syasei2
>As the four slimes mix and spread their slime all over Luka's body, he comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2649,%2649+1:if %2649=1 mov %count_koenemy,%count_koenemy+1
if %2649>%count_most mov %count_most,%2649:mov $count_mostname,$name
count 11,7
mov $bad1,"Luka succumbed to the slime girls special spread skill."
gosub *face2
name "Purple Slime"
>You came just from us spreading our bodies over you a little bit?\
name ""
name "Blue Slime"
>So much semen... Did we really feel that good?\
name ""
goto *slimes_h



*slimes_h11

mov %ikigoe,3:gosub *ikigoe
gosub *syasei1
if %kousoku>1 lsp 703,":a;chara\slime_blue_bk02.bmp",-70,20
if %kousoku>3 lsp 701,":a;chara\slime_green_bk01.bmp",525,155
if %kousoku>2 lsp 705,":a;chara\slime_red_bk03.bmp",345,10
lsp 699,":a;chara\slime_purple_bk02.bmp",70,120
gosub *syasei2
>As the slime girl wraps up his body, Luka comes, covering the slime around him with semen.\
mov %viclose,1:gosub *lose
mov %2649,%2649+1:if %2649=1 mov %count_koenemy,%count_koenemy+1
if %2649>%count_most mov %count_most,%2649:mov $count_mostname,$name
count 11,7
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"As the slime girls wrapped him up, Luka came."
gosub *face2
name "Purple Slime"
>Coming just from us wrapping you up a little bit... Hehe.\
name ""
name "Red Slime"
>He couldn't endure us at all!@
>Piiitiful! \
name ""
goto *slimes_h



*slimes_h12

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 703,":a;chara\slime_blue_bk02.bmp",-70,20
lsp 701,":a;chara\slime_green_bk01.bmp",525,155
lsp 705,":a;chara\slime_red_bk03.bmp",345,10
lsp 699,":a;chara\slime_purple_bk02.bmp",70,120
gosub *syasei2
>Engulfed by all four of the slime girls at once, Luka comes, covering their bodies with semen.\
mov %viclose,1:gosub *lose
mov %2649,%2649+1:if %2649=1 mov %count_koenemy,%count_koenemy+1
if %2649>%count_most mov %count_most,%2649:mov $count_mostname,$name
count 11,7
mov $bad1,"Luka ascended to heaven as the four slime girls mixed their bodies and attacked him with ecstasy."
gosub *face2
name "Purple Slime"
>We're amazing, aren't we? Hehe.\
name ""
name "Green Slime"
>So much semen... @
>It's like heaven, isn't it? \
name ""
goto *slimes_h



*slimes_h

mov $bad2,"Gang-raped endlessly by the slime girls, Luka lives out the rest of his life as their toy."
if %2649=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
>Forced to an orgasm, I collapse to the floor.@
>The Purple Slime lifts me up, as if I was a baby.\
name "Purple Slime"
>Hehe... Now it's time for some of our love...@
>First, from me...\
name ""
mov %hseanwave,18:hseanwave
cspl 690,699
lsp 700,":c;chara\slimes_ha1.bmp",0,0:print 10,500
>The Purple Slime places one of her gigantic breasts on top of my groin, and forces my penis into her.@
>The rest of her soft body embraces mine, holding me in place between her breasts.\
>I shiver in her embrace as she slowly forces me all the way into her body.\
name "Luka"
>Ah...ahh...\
name ""
>Her slime is surprisingly dense, requiring a bit of force to pierce through her body.@
>As her soft body clamps around mine, I start to relax as the cool sensation of her body fills me.\
name "Purple Slime"
>Hehe, what's wrong?@
>Is it too much for you, just being inside my breast?\
name ""
name "Luka"
>Ah...ahh...\
name ""
>Her dense slime pushes into my penis from all directions.@
>The feeling of being inside her is so comfortable, I can't help but relax in her gentle embrace.\
name "Purple Slime"
>We have lots of time, so take your time...@
>But we'll be enjoying this for a long time, so don't think you need to endure it either...\
name ""
>The breast that I'm inserted in starts to wriggle.@
>The dense slime wrapped around my penis shakes and moves, slowly getting faster.\
name "Luka"
>Haa... That feels good...\
name ""
>Before I can stop myself, I let out a soft moan.@
>I'm going to come inside of her in no time at this rate...\
name "Purple Slime"
>Don't hold back...\
name ""
name "Luka"
>Haa... Ahh...\
name ""
>I sigh as the last of my strength fades.@
>If she wasn't holding me like a baby like this, I would collapse to the floor.\
>Entrusting myself to her embrace, I feel my penis start to twitch a little inside her wriggling breast.\
>The Purple Slime looks down on me in her embrace, and giggles.\
name "Purple Slime"
>Hehe... Are you about to come?@
>Go ahead and come inside me, it will feel good...\
name ""
name "Luka"
>I'm coming...@
>Aahh...\
name ""
gosub *syasei1
lsp 700,":c;chara\slimes_ha2.bmp",0,0
gosub *syasei2
>Unable to hold on at all, I sigh as I come inside her breast.\
>My mouth hangs open as I gaze at my penis inside her breast, slowly filling her purple body with my white semen.\
mov %hseanwave,0:hseanwave
name "Purple Slime"
>Hehe, that was a lot.\
name ""
>The Purple Slime stares at me as she holds me in her embrace, giggling.\
name "Red Slime"
>Alright, I'm next. \
name ""
mov %hseanwave,18:hseanwave
cspl 690,699
lsp 700,":c;chara\slimes_hb2.bmp",0,0:print 10,500
>The Purple Slime takes me out of her breast, and the Red Slime quickly takes her place.\
>She turns around, and sticks her butt into my face.\
>Her body slowly sinks into mine, enveloping everything from my mouth to my penis in her entire lower body.\
name "Luka"
>Ahhhh!\
name ""
>Her slime is warm, and completely different from the Purple Slime's.\
>Her body is far more liquidy than the Purple Slime, and a lot warmer.@
>Just the sensations from being inside her are almost too much to take.\
name "Red Slime"
>Hey, how is it?@
>It feels nice and warm inside me, doesn't it?\
name ""
>The Red Slime turns her head around to look at me, laughing.@
>As I'm engulfed by her warm body, she starts to move back and forth, forcing my body from the mouth down in and out of her backside.\
>I writhe helplessly at the feeling of having my body itself being forced in and out of her warm body.\
name "Luka"
>Ah...ahhh!\
name ""
name "Red Slime"
>Ahaha, are you trying to endure it?@
>That can't be done. \
name ""
>Amused by my reaction, the Red Slime shakes her hips side to side.\
>Her movements get even faster, easily forcing my penis to go wherever she wants it to inside her sticky body.\
>Mesmerized by the pleasure, I gasp as she tosses me around.\
>After only a few moments, I feel myself on the edge of an orgasm as she rapes my entire body with her own.\
name "Luka"
>Ahh... Coming...\
name ""
name "Red Slime"
>Ahah, so fast! @
>Now, come! \
name ""
>The Red Slime giggles as she violently bounces her entire body up and down, forcing my whole body into hers.@
>Overwhelmed by her movements, I give in to the orgasm.\
gosub *syasei1
lsp 700,":c;chara\slimes_hb2.bmp",0,0
gosub *syasei2
>I explode inside of her warm body, shooting my semen into her red slime.@
>She presses her ass into my face as she squeezes out all of the semen into her body.\
mov %hseanwave,0:hseanwave
name "Blue Slime"
>Ok... I get him next...\
name ""
mov %hseanwave,18:hseanwave
cspl 690,699
lsp 700,":c;chara\slimes_hc1.bmp",0,0:print 10,500
>The Red Slime lets my body go as the Blue Slime climbs on top of me.\
>She tightly clings to me, and drops her lower body onto my groin.@
>Like that, my penis is forced into her blue body.\
name "Luka"
>Ahhh!\
name ""
>Her body is incredibly soft and sticky.@
>It seems like each slime's body is unique...\
>Her soft body squishes against me, gently squeezing and pushing against me wherever it engulfs.\
>Her sticky slime drips from her body as she looks at me.\
name "Blue Slime"
>If I do this... It's like we're having sex.\
name ""
>The Blue Slime clings to me, pushing her squishy body against my own.@
>Like that, she starts to move up and down, grinding her sticky body against me.\
name "Luka"
>Ahh... That's good...\
name ""
>As she rides me, I sigh in pleasure and let out a moan.@
>In only a few moments, the third slime had already made me surrender to her.\
name "Blue Slime"
>...Hehe.\
name ""
>The Blue Slime looks at my reaction with a happy smile on her face.@
>She leans over and hugs me even tighter, pressing my body deeper into her squishy one.\
>Her small body continues grinding against mine, not slowing down even as she hugs me closer.@
>Giving my body over to this small slime girl, I moan as I feel myself about to explode in her.\
name "Luka"
>Ahh... I'm going to come...\
name ""
name "Blue Slime"
>It's fine... To come inside me.\
name ""
>As I raise my voice about my impending orgasm, the Blue Slime wags her hips a little bit side to side.\
>As my penis is pushed side to side inside her small form, I'm quickly forced over the edge.\
gosub *syasei1
lsp 700,":c;chara\slimes_hc3.bmp",0,0
gosub *syasei2
name "Luka"
>Ahh...\
name ""
>I explode inside the Blue Slime's body, shooting my semen through her small body all the way up to her shoulder.@
>Feeling my seed inside her, the Blue Slime hugs me even closer as she smiles.\
mov %hseanwave,0:hseanwave
name "Purple Slime"
>Now then, shall I have a turn again?\
name ""
name "Red Slime"
>Noo! I want to rape him again! \
name ""
name "Blue Slime"
>...I don't want to let go.\
name ""
name "Green Slime"
>Hey, I haven't had a turn yet!\
name ""
name "Luka"
>Ahh... Ahhh...\
name ""
mov %hseanwave,19:hseanwave
cspl 690,699
lsp 700,":c;chara\slimes_hd1.bmp",0,0:print 10,500
>The four slimes push and fight against each other as they all rush into my body at once.\
>Their slimy bodies mix together, as each of their unique temperatures and consistencies wrap and absorb different parts of my body.\
name "Luka"
>Ahhhh!!\
name ""
>I'm quickly buried under their soft bodies, as their mixed slime wraps around my penis.\
name "Purple Slime"
>Come on, you can come a lot more, can't you?\
name ""
name "Red Slime"
>Make him come even more! \
name ""
>I can feel all four of their unique textures squeezing my penis, as if all four of them had tiny slime fingers caressing my penis.\
>Unable to see anything with the Green Slime's breasts covering my face, I shiver as my entire body is attacked by pleasure.\
name "Luka"
>Ahh...\
name ""
gosub *syasei1
lsp 700,":c;chara\slimes_hd2.bmp",0,0
gosub *syasei2
>Engulfed in a hell of pleasure, I come, shooting my semen into their mixed bodies.\
name "Purple Slime"
>Hehe, did it feel good?\
name ""
name "Blue Slime"
>His semen tastes so good...\
name ""
>Even during my orgasm, the four slimes continue to fight over my penis.@
>Overwhelmed by their sticky touch, I gasp in pleasure as the four of them freely play with my body.\
name "Luka"
>Ahh...\
name ""
>Giving in to the pleasure, I moan as their rape forces me to come again.\
gosub *syasei1
lsp 700,":c;chara\slimes_hd3.bmp",0,0
gosub *syasei2
>My semen shoots into their slimy bodies again, to be used as nourishment.\
name "Purple Slime"
>Until you satisfy all of us, we aren't letting you stop!\
name ""
name "Green Slime"
>Come more! \
name ""
name "Luka"
>Ahhh...\
name ""
gosub *syasei1:gosub *syasei2
>They cover more of my body with their soft slimy bodies as I come again.@
>Drowning in their slime, I'm forced to come over and over again...\
gosub *anten
mov %hseanwave,0:hseanwave
>After that, I never left the cave.\
>Captured by the slimes, I'm kept wrapped up at all times as they keep me in a hell of pleasure.\
>Engulfed in their bodies, I'm squeezed dry every day.@
>Kept too exhausted to ever escape their sticky bodies, I live out the rest of my life as their toy.\
>...............\
goto *badend



*erbetie1_start

mov $name,"Erubetie"
mov $name2,"Erubetie"
mov $lavel,"erbetie1"
mov $tatie1,"erbetie_st01"
mov $tatie2,"erbetie_st01"
mov $tatie3,"erbetie_st01"
mov $tatie4,"erbetie_st01"
mov $haikei,"bg097"
mov %monster_x,225
mov %monster_y,0
if %nanido=1 mov %max_enemylife,22000
if %nanido=2 mov %max_enemylife,22000
if %nanido=3 mov %max_enemylife,22000
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,50
if %nanido=3 mov %earth_keigen,25
mov %music,4
mov %tikei,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov %end_n,6
mov %exp_minus,37000
mov %zmonster_x,-50
mov %tukix,320
name "Luka"
>Wait!@>I just...\
name ""
name $name
>Whomever disturbs our home...@
>No matter who it is, I'll melt them...\
name ""
name "Luka"
>Guh...!\
name ""
>This feeling is totally different from when the other Heavenly Knights fought me...\
>The warrior who fought without killing, Granberia...@
>The one who just wanted to toy with me, Alma Elma...@
>And the one who doesn't even want to fight, Tamamo...\
>But Erubetie is different...@
>She's completely serious about wanting to kill me!\
>If I don't fight back with everything I've got... I'm not making it out of here alive!\
goto *common_main



*erbetie1_v

if %nanido=0 goto *erbetie1_v2
name $name
>You took it once...@>But that won't happen again.\
name ""
name "Luka"
>Uh oh, is she going to use it in rapid succession!?\
name ""
>Using that insane attack one after another!?@
>Is this the real power of a Heavenly Knight!?\
skillname "Melt Storm"
dwave 1,"se\ero_slime3.ogg"
>Erubetie's slime creates a massive tsunami!\
skillname "Aqua Pentagon"
if %effectspeed=2 dwave 1,"se\aqua3.ogg":skip 2
mpegplay "effect\movie03.mpg",1
>A burst of water creates a magic formation!\
dwave 1,"se\aqua4.ogg"
>The wall of water protects Luka, preventing any damage!\
skillname ""
name "Luka"
>Eh...!?\
name ""
name $name
>It can't be... A human using that power?@
>No...\
name ""
goto *erbetie1_v2



*erbetie1_v2

lsp 700,":a;chara\erbetie_st01.bmp",400,0
lsp 701,":a;chara\undine_st11.bmp",-200,0:print 10,500
bgm "bgm\sinpi1.ogg"
name $name
>This was your doing, Undine...@
>Why did you protect this human?\
name ""
lsp 701,":a;chara\undine_st01.bmp",-230,0:print 10,500
name "Undine"
>This human came to meet me.@
>There's no reason for you to deal with him yourself.\
name ""
name $name
>You dislike humans as I do, don't you?\
>...Well, fine.@
>If you say so, I'll let you deal with him.\
name ""
dwave 1,"se\ero_slime3.ogg"
csp 700:print 10,500
>Erubetie melts, and sinks into the ground!@
>Erubetie's gone!\
mov %viclose,2:gosub *victory
mov %getexp,20000:gosub *lvup
mov %2290,1
goto *sean0196a



*erbetie1_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>You've resolved yourself to your punishment?@
>But there still won't be any leniency...\
name ""
gosub *erbetie1_a2



*erbetie1_main

gosub *cmd_main
if %cmd1=11 goto *common_attack
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *erbetie1_kousan
if %cmd1=16 goto *erbetie1_onedari
if %cmd1=17 goto *common_skill
goto *erbetie1_main



*erbetie1_a

if %turn=1 gosub *erbetie1_a1:goto *common_main
if %turn=2 gosub *erbetie1_a2:goto *common_main
if %turn=3 goto *erbetie1_v



*erbetie1_a1

add %stack,1
name $name
>............\
name ""
>Erubetie stares at Luka.\
name "Luka"
>Wh...Whwhat?\
name ""
name $name
>...I dislike humans.@
>Do you know why us of the slime race live here?\
>Humans pollute the water, and steal away the environment for their own usage.\
name ""
name "Luka"
>Th...That's...\
name ""
>It's a problem that will need to be dealt with once humans and monsters live in peace...\
name "Luka"
>But humans aren't...\
name ""
name $name
>Silence.@
>Your words will never change my opinion.\
>You polluted this spring, and harmed the slimes living here...@
>I'll need to give you your reward for those actions.\
name ""
name "Luka"
>Gah...\
name ""
>I realized that Erubetie won't forgive me at all.@
>Unlike Granberia and Alma, she's trying to kill me.\
>But against someone this powerful... I might not have a chance!\
sub %stack,1
return



*erbetie1_a2

add %stack,1
name $name
>I'll melt you away...@
>Feel the anger and sorrow of our race as you dissolve into nothing.\
name ""
skillname "Melt Storm"
dwave 1,"se\ero_slime3.ogg"
>Erubetie's slime creates a massive tsunami!\
>The massive wall of slime slams into Luka's body, overwhelming him in a whirlpool of slime!
skillcount2 3391
if %earth=1 damage 825,875:skip 2
damage 1650,1750
skillname ""
if %mylife=0 sub %stack,1:return *erbetie1_h1
name "Luka"
>Ahhhh!\
name ""
>The powerful slime slams into me, knocking me down flat.\
>I used the power of the earth and everything I had in me to guard...@
>But I'm still just barely hanging on after only a single attack!\
name $name
>It looks like you are able to use a little bit of the spirit's power...\
>Why are the spirits lending their power to a human...?\
name ""
sub %stack,1
return



*erbetie1_onedari

mov $list1,"Melt Storm"
if %3391>0 mov %list_num1,1
gosub *cmd_onedari
if %cmd1=11 goto *erbetie1_onedari1
if %cmd1=-1 goto *erbetie1_main
goto *erbetie1_onedari



*erbetie1_onedari1

gosub *onedari_syori
name $name
>You wish to be dissolved by me?@
>Humans are nothing but fools.\
name ""
gosub *erbetie1_a2
skip -1



*erbetie1_h1

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\erbetie_bk07.bmp",225,0
gosub *syasei2
>As her slime washes over his body, the squirming storm of slime rubs and massages every inch of Luka's body, forcing him to come instantly.\
mov %viclose,1:gosub *lose
mov %2590,%2590+1:if %2590=1 mov %count_koenemy,%count_koenemy+1
if %2590>%count_most mov %count_most,%2590:mov $count_mostname,$name
count 11,11
mov $bad1,"Luka was forced to come as soon as Erubetie's slime washed over him."
gosub *face2
name $name
>You came...@
>Unable to withstand a single skill from me... How pitiful.\
name ""
goto *erbetie1_h



*erbetie1_h

mov $bad2,"Luka was dissolved and digested by Erubetie."
if %2590=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
>I fall onto the ground, covered with Erubetie's slime.@
>Erubetie slowly moves closer, with a cold expression on her face.\
if %con_hvoice=0 dwave 0,"voice\erbetie1_01.ogg"
name $name
>Now then, to melt you...
>I'll suck your body into mine, and make it into nutrients.\
if %con_hvoice=0 dwave 0,"voice\erbetie1_02.ogg"
>But before I melt you, I'll squeeze out your semen...
>Even if you refuse the pleasure, I'll make you ejaculate over and over.\
name ""
dwavestop 0
mov %hseanwave,18:hseanwave
>Erubetie bends over, slowly dropping her body onto me.@
>As if she was sitting on top of me, she forces my penis right into her slimy body.\
name "Luka"
>Ahh...!\
name ""
cspl 690,699
lsp 700,":a;chara\erbetie_ha1r.bmp",0,0:print 10,500
>As soon as my penis touches her squishy interior, it instantly becomes erect.\
if %con_hvoice=0 dwave 0,"voice\erbetie1_03.ogg"
name $name
>...Your penis is already erect...
>Just from a little stimulation, you're ready to reproduce...\
if %con_hvoice=0 dwave 0,"voice\erbetie1_04.ogg"
>But from now on, it isn't going to be in a warm female's vagina...
>It's going to be in a slimy hell, forced to ejaculate.\
name ""
dwavestop 0
>Her body sinks down further, forcing my penis deeper inside her soft body.@
>Pieces of her sticky body drip down, covering me in her cool slime.\
name "Luka"
>Ahhh!\
name ""
>Looking through her transparent blue body, I see my penis inside of her.@
>As if it's been taken and locked in her body, I feel completely dominated.\
>She absorbed my penis into her body...@
>Not for reproduction or any real purpose...@>Just to squeeze out my semen for food.\
if %con_hvoice=0 dwave 0,"voice\erbetie1_05.ogg"
name $name
>Your penis got so big... Do you want to mate?\
if %con_hvoice=0 dwave 0,"voice\erbetie1_06.ogg"
>...But that's too bad.
>Your semen will be forcibly squeezed out, and used as my nourishment.\
if %con_hvoice=0 dwave 0,"voice\erbetie1_07.ogg"
>Then I'll slowly play with it as I melt it...
>Your body will become syrupy as well, and I'll suck it into mine...\
if %con_hvoice=0 dwave 0,"voice\erbetie1_08.ogg"
>You can't reproduce any longer...
>You're going to be taken into my body... Your life is over.\
name ""
dwavestop 0
name "Luka"
>N...No way... Don't...\
name ""
if %con_hvoice=0 dwave 0,"voice\erbetie1_09.ogg"
name $name
>But... Having your semen forcibly squeezed out has pleasure along with it.
>Three... Four times after having their semen squeezed, most men stop resisting.\
if %con_hvoice=0 dwave 0,"voice\erbetie1_10.ogg"
>...I'll make you ejaculate too.
>I'll squeeze out your semen with my slime...\
name ""
dwavestop 0
>The blue slime around my penis suddenly starts to move.\
>At first it slowly starts to wriggle and squirm...@
>But then it tightens, making it feel like the slime is coiling around my penis inside her.\
name "Luka"
>Ahh... Th...That feels good...!@
>Ahhhhh!!\
name ""
>I let out a pathetic moan of pleasure as the sweet slime starts to stimulate me.\
if %con_hvoice=0 dwave 0,"voice\erbetie1_11.ogg"
name $name
>This stimulation makes human males ejaculate, doesn't it?
>You, too... Come quickly.\
name ""
dwavestop 0
name "Luka"
>Haaa... Ahhh!\
name ""
>The squishy slime inside of her tightens around my penis.@
>The formless slime flows and freely moves around inside of her, constantly changing the way it's squeezing me.\
>It's a pleasure so powerful, I can't bring myself to endure it.\
name "Luka"
>Ahh... I'm going to come...\
name ""
if %con_hvoice=0 dwave 0,"voice\erbetie1_12.ogg"
name $name
>Even though it isn't for mating, still coming... How pitiful.
>Hora... Leak out a lot of your fluids of surrender...\
dwavestop 0
name ""
>Her slime squirms around my penis, squeezing me tighter than ever before.@
>Already at the edge of an orgasm, that final stimulation forces me over the edge on her command.\
name "Luka"
>Ah...Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\erbetie_ha2r.bmp",0,0
gosub *syasei2
>I explode inside of her transparent blue body.@
>Slightly drooling, I watch on as my milky semen mixes with her sticky blue slime.\
>I shiver in humiliation as the semen starts to break up and dissolve inside her body.\
name "Luka"
>Ahh...\
name ""
if %con_hvoice=0 dwave 0,"voice\erbetie1_13.ogg"
name $name
>How does it feel to be forced to ejaculate like you would when mating...?
>The semen you took so much effort to shoot out is just going to be my nutrients...\
name ""
dwavestop 0
>The semen inside of her slowly vanishes.@
>It's nothing but food to her...\
>It's as if she's crushing the very essence of my manhood...\
if %con_hvoice=0 dwave 0,"voice\erbetie1_14.ogg"
name $name
>Miserable, isn't it? ...But I'm going to squeeze more...
>I'm going to squeeze out all of your semen...\
name ""
dwavestop 0
name "Luka"
>Ah!@>Ahhh!\
name ""
>The sticky slime clings tighter to my penis as it starts to freely flow around me.@
>My back arches as I let out a moan from the overwhelming sensations.\
>This pleasure...@> Given to me only so she can feed on my semen...\
if %con_hvoice=0 dwave 0,"voice\erbetie1_15.ogg"
name $name
>...Already going to come?
>How does it feel to have your semen squeezed continually like this?\
if %con_hvoice=0 dwave 0,"voice\erbetie1_16.ogg"
>The best...? ...Or miserable?\
name ""
dwavestop 0
name "Luka"
>Haaa... It feels good...\
name ""
if %con_hvoice=0 dwave 0,"voice\erbetie1_17.ogg"
name $name
>...What a lewd, pitiful moan.
>It seems like you're happy to be squeezed.\
if %con_hvoice=0 dwave 0,"voice\erbetie1_18.ogg"
>In that case, I'll finish this quickly...
>It's not in my tastes to make humans so delighted...\
name ""
dwavestop 0
name "Luka"
>Ah! Ahhh!\
name ""
>The slime around my penis suddenly starts to move.@
>Swirling around my penis, her sticky slime rotates around me.\
>The sticky slime, softly pushing into my penis as it spins around me, makes my head go blank as I come.\
gosub *syasei1
lsp 700,":a;chara\erbetie_ha3r.bmp",0,0
gosub *syasei2
>I explode inside of her again, watching as my white semen mixes and dissolves in her transparent blue body.\
name "Luka"
>Ahh...\
name ""
if %con_hvoice=0 dwave 0,"voice\erbetie1_19.ogg"
name $name
>You shot out quite a lot...
>How does it feel to have so much semen squeezed out?\
if %con_hvoice=0 dwave 0,"voice\erbetie1_20.ogg"
>Do you regret being born a man...?
>Or are you thankful you were born a man...?\
name ""
dwavestop 0
mov %hseanwave,19:hseanwave
>Her slimy body starts to slowly get more dense.@
>It starts to surge and suck on me, as if it was a giant amoeba sucking on me.\
name "Luka"
>Ahh... What are you doing...?\
name ""
if %con_hvoice=0 dwave 0,"voice\erbetie1_21.ogg"
name $name
>While I squeeze out and digest your semen...
>I'm melting your body, and absorbing it in...\
if %con_hvoice=0 dwave 0,"voice\erbetie1_22.ogg"
>Taste the sensations of your body being dissolved by me...
>This is the punishment for stepping into our sacred place...\
name ""
dwavestop 0
name "Luka"
>Aiie! Ahhhh!!\
name ""
>More and more of her sticky slime drips onto my body.@
>She really is absorbing more of my body... Preying on me...\
>Everywhere her squishy slime touches, it massages and rubs me, increasing the pleasure I'm being drowned in.@
>The ecstasy battles the fear in my mind, confusing me.\
if %hosyoku_cut=1 goto *hosyoku_cut
name "Luka"
>Wh..What is this...? Ahhh!\
name ""
if %con_hvoice=0 dwave 0,"voice\erbetie1_23.ogg"
name $name
>How does it feel to be eaten and dissolved while alive?
>Just like this, I'm going to absorb you...\
name ""
dwavestop 0
name "Luka"
>Ahhh!\
name ""
>The pleasure beats out the terror in my mind as her soft slime forces me to another orgasm while I yell out.\
gosub *syasei1
lsp 700,":a;chara\erbetie_ha4r.bmp",0,0
gosub *syasei2
>Another horrifying orgasm, forced out of me as I'm being preyed on...\
if %con_hvoice=0 dwave 0,"voice\erbetie1_24.ogg"
name $name
>...Ejaculating while being dissolved?
>You're really pitiful...\
name ""
dwavestop 0
name "Luka"
>Ahhh... Haa...\
name ""
>My eyes haze over as I melt in the pleasure.@
>At the same time, I'm sure my body is literally melting...\
>Put into a trance by ecstasy, I relax, giving my body over to the sensations.@
>Soaking myself in the slimy pleasure of her body, I start to moan.\
name "Luka"
>Ahh... That feels good...\
name ""
gosub *syasei1:gosub *syasei2
>My semen leaks out into her blue body again.@
>But rather than an ejaculation, it felt more like my spirit itself was shot out.\
>Happily accepting the pleasure, I've surrendered to her.@
>Eating, dissolving... It didn't matter... This feels too good to care...\
if %con_hvoice=0 dwave 0,"voice\erbetie1_25.ogg"
name $name
>It looks like both your body and spirit have been eaten by my slime...
>Spraying out semen from your penis like you were peeing... How pitiful.\
dwavestop 0
name ""
>Erubetie looks down at me with her cold gaze as she slowly dissolves my body...@
>My life is going to end while I'm forced to look at such cruel eyes...\
name "Luka"
>Ah...aaa....\
name ""
>But I can't break out of the trance I'm in.\
>Drooling in pleasure with both my mouth and eyes open, I look on as her blue body slowly absorbs more of my own.\
>That blue slime is melting my body, absorbing it, and becoming part of her...@
>All proof of my existence itself is going to be taken by her...\
>Basking in the ecstasy, I slowly become nothing more than nutrients to fuel Erubetie's body.\
gosub *anten
mov %hseanwave,0:hseanwave
if %con_hvoice=0 dwave 0,"voice\erbetie1_26.ogg"
name $name
>What a pathetic Hero.
>So delighted, until the very last moment...\
name ""
dwavestop 0
>After hearing those final cold words, my consciousness fades.\
>My life ends as nothing but food for Erubetie.@
>Meeting a pitiful end, my adventure ends here.\
>..............\
goto *badend



*undine_start

mov $name,"Undine"
mov $name2,"Undine"
mov $lavel,"undine"
mov $tatie1,"undine_st01"
mov $tatie2,"undine_st02"
mov $tatie3,"undine_st03"
mov $tatie4,"undine_ha1"
mov $haikei,"bg097"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,12000
if %nanido=2 mov %max_enemylife,12500
if %nanido=3 mov %max_enemylife,13000
if %nanido=0 mov %max_enemylife,2
if %nanido=1 mov %henkahp1,10000
if %nanido=2 mov %henkahp1,10000
if %nanido=3 mov %henkahp1,10000
if %nanido=0 mov %henkahp1,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,99
mov %earth_keigen,50
if %nanido=3 mov %earth_keigen,25
mov %music,10
mov %tikei,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free of Undine!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"You can't even break out of something like this?"
mov $mogaku_sel2,"It looks like you're already done..."
mov $mogaku_sel3,"You can't use the power of the spirits..."
mov $mogaku_sel4,"Struggling with your power alone is pointless."
mov $mogaku_sel5,"I was wondering what kind of human you were... But to lose to this..."
mov $mogaku_earth_dassyutu1,"It seems like you can use the power of the earth a little."
mov $mogaku_earth_dassyutu2,"But your skill in handling it is still quite poor."
mov $half_s1,"Struggling at this point...?"
mov $half_s2,"You may not be qualified..."
mov $kiki_s1,"Already near your end?"
mov $kiki_s2,"As expected, you don't meet the qualifications..."
mov %end_n,6
mov %exp_minus,57000
mov %zmonster_x,-320
mov %tukix,350
mov %owaza_count1a,4
name "Luka"
>In other words, I have to show you my strength!\
name ""
>I take out my sword in front of Undine.@
>I'll have to see if my power is good enough for her!\
name $name
>I'm not nice like Sylph and Gnome.@
>If I deem you unqualified, I won't pardon you.\
>I'll wrap your body, and take both your body and soul.@
>You'll be taken inside my body and melted to nothing.\
name ""
name "Luka"
>In that case, I must make you acknowledge me no matter what it takes!\
name ""
>It's the same as when I was against Gnome and Sylph.@
>I have to show Undine everything I've acquired on the way to this cave!\
mov %sinkou,1
goto *common_main



*undine002

name $name
>Use both the power of wind and earth at the same time.@
>If you can't even do that, then you aren't qualified to hold the power of the spirits.\
name ""
name "Luka"
>Th...That's... Not yet...\
name ""
>Alice said the same thing...@
>I don't have the concentration to handle both at once right now...\
name $name
>If you can't, then I'll never deem you qualified.@
>Unqualified humans will be preyed on...\
name ""
mov %skill01,9
mov %sinkou,2
goto *common_main



*undine_v

if %nanido=0 goto *undine_v2
name "Luka"
>I...I did it!\
name ""
>I've summoned them both at the same time...@
>It's taking all of my concentration just to keep their power in me, but I can do it!\
gosub *face2
name $name
>...It seems like you're able to call both of them at once.@
>Perhaps you're capable of wielding my power, too.\
name ""
name "Luka"
>...Then, you mean...?\
name ""
goto *undine_v2



*undine_v2

name $name
>You pass.@
>I shall grant you my power of water.\
name ""
mov %viclose,1:gosub *victory
mov %getexp,20000:gosub *lvup
mov %2291,1
mov %skill01,9
goto *sean0197



*undine_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>Giving in to pleasure?@
>In the end, you're just another foolish human...\
name ""
goto *undine_a



*undine_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *undine_kousan
if %cmd1=16 goto *undine_onedari
if %cmd1=17 goto *common_skill
goto *undine_main



*undine_a

if %sinkou=2 && %wind>0 && %earth>0 goto *undine_v
if %turn=2 gosub *undine_a3:goto *common_main
if %turn>5 && %sinkou=1 && %enemylife<%henkahp1 && %kousoku=0 goto *undine002
if %kousoku=1 gosub *undine_a4:goto *common_main
rnd2 %ransu,1,3
if %ransu=1 gosub *undine_a1:goto *common_main
if %ransu=2 gosub *undine_a2:goto *common_main
if %ransu=3 && %sinkou>1 && %owaza_count1a>5 gosub *undine_a3:goto *common_main
skip -4



*undine_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"If you come by this, you aren't qualified..."
if %ransu=2 mov $sel1,"Endure this pleasure..."
if %ransu=3 mov $sel1,"It feels good, doesn't it...? But you must endure."
name $name
eng $sel1:$sel6\
name ""
skillname "Aqua Shake"
dwave 1,"se\ero_makituki1.ogg"
eng "Undine grabs Luka's penis with her hand!":$sel6/
if %wind=1 && %nanido<2 mov %wind_kakuritu,15
if %wind=1 && %nanido=2 mov %wind_kakuritu,10
if %wind=1 && %nanido=3 mov %wind_kakuritu,7
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>His penis sinks into her slimy hand as she shakes it all around!
skillcount2 3392
if %nanido<2 damage 130,150
if %nanido=2 damage 140,160
if %nanido=3 damage 150,170
skillname ""
if %mylife=0 sub %stack,1:return *undine_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*undine_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"How long can you tolerate it...?"
if %ransu=2 mov $sel1,"Now, come... If you're giving up."
if %ransu=3 mov $sel1,"Will you yield to this?"
name $name
eng $sel1:$sel6\
name ""
skillname "Aqua Stroke"
dwave 1,"se\ero_slime1.ogg"
>Undine's tail wraps around Luka's penis, slowly stroking him up and down!
if %wind=1 && %nanido<2 mov %wind_kakuritu,15
if %wind=1 && %nanido=2 mov %wind_kakuritu,10
if %wind=1 && %nanido=3 mov %wind_kakuritu,7
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 3
if %wind=1 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3393
if %nanido<2 damage 150,170
if %nanido=2 damage 160,180
if %nanido=3 damage 170,190
skillname ""
if %mylife=0 sub %stack,1:return *undine_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*undine_a3

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name $name
>I'll wrap up your body...\
name ""
skillname "Aqua Prison"
dwave 1,"se\ero_slime3.ogg"
>Undine's body absorbs Luka's!
if %nanido<2 damage 140,150
if %nanido=2 damage 150,160
if %nanido=3 damage 160,170
mov %kousoku,1:gosub *status_print
>Luka's stuck in Undine's body!\
skillname ""
if %mylife=0 sub %stack,1:return *undine_h3
if %kousan=2 sub %stack,1:return
gosub *face2
name $name
if %first_sel1=0 mov $sel1,"If you're unqualified, then you'll be absorbed."
if %first_sel1=1 mov $sel1,"Can you escape this time...?"
eng $sel1:$sel6\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,100
if %earth=0 && %nanido=2 mov %genmogaku,100
if %earth=0 && %nanido=3 mov %genmogaku,100
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,1
sub %stack,1
return



*undine_a4

add %stack,1
>Luka is stuck inside Undine's body...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Become one with me...":mov $sel2,"Undine's body engulfs Luka's!"
if %ransu=2 mov $sel1,"Now, you're finished...":mov $sel2,"Undine's body tightens around Luka's penis!"
if %ransu=3 mov $sel1,"I'll squeeze out your semen and melt you...":mov $sel2,"Undine's cool slime causes Luka to relax!"
if %ransu=4 mov $sel1,"If I stimulate your penis, will you leak in me?":mov $sel2,"Undine's slimy body wriggles around Luka!"
if %ransu=5 mov $sel1,"Just relax...":mov $sel2,"Undine's body starts to vibrate with Luka stuck inside!"
name $name
eng $sel1:$sel6\
name ""
skillname "Aqua Melty"
dwave 1,"se\ero_makituki3.ogg"
eng $sel2:$sel6
skillcount2 3394
if %nanido<2 damage 140,150
if %nanido=2 damage 150,160
if %nanido=3 damage 160,170
skillname ""
if %kousan=3 sub %stack,1:return
if %mylife=0 sub %stack,1:return *undine_h4
sub %stack,1
return



*undine_onedari

mov $list1,"Aqua Shake"
if %3392>0 mov %list_num1,1
mov $list2,"Aqua Stroke"
if %3393>0 mov %list_num2,1
mov $list3,"Aqua Melty"
if %3394>0 mov %list_num3,1
gosub *cmd_onedari
if %cmd1=11 goto *undine_onedari1
if %cmd1=12 goto *undine_onedari2
if %cmd1=13 goto *undine_onedari3
if %cmd1=-1 goto *undine_main
goto *undine_onedari



*undine_onedari1

gosub *onedari_syori
name $name
>You want to sink into my hand?\
name ""
gosub *undine_a1
skip -1



*undine_onedari2

gosub *onedari_syori
name $name
>You want to be played with by my tail?\
name ""
gosub *undine_a2
skip -1



*undine_onedari3

gosub *onedari_syori_k
name $name
>You want to become one with me?\
name ""
if %kousoku=0 gosub *undine_a3
gosub *undine_a4
skip -1



*undine_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\undine_bk01.bmp",0,0
gosub *syasei2
>Absorbed by her hand, Luka comes, shooting his semen into Undine's hand.\
mov %viclose,1:gosub *lose
mov %2591,%2591+1:if %2591=1 mov %count_koenemy,%count_koenemy+1
if %2591>%count_most mov %count_most,%2591:mov $count_mostname,$name
count 11,11
mov $bad1,"Luka was forced to come by Undine's aqua shake skill."
gosub *face2
name $name
>You came...@
>As expected, you aren't qualified.\
name ""
goto *undine_h



*undine_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\undine_bk03.bmp",0,0
gosub *syasei2
>Stroked by her tail, Luka comes, shooting his semen all over Undine's tail.\
mov %viclose,1:gosub *lose
mov %2591,%2591+1:if %2591=1 mov %count_koenemy,%count_koenemy+1
if %2591>%count_most mov %count_most,%2591:mov $count_mostname,$name
count 11,11
mov $bad1,"Luka was forced to come by Undine's aqua stroke skill."
gosub *face2
name $name
>You came...@
>As expected, you aren't qualified.\
name ""
goto *undine_h



*undine_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\undine_ha2.bmp",0,0
gosub *syasei2
>As Luka's body sinks into Undine's, he comes, filling her body with semen.\
mov %viclose,1:gosub *lose
mov %2591,%2591+1:if %2591=1 mov %count_koenemy,%count_koenemy+1
if %2591>%count_most mov %count_most,%2591:mov $count_mostname,$name
count 11,11
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come as soon as he was wrapped up by Undine."
gosub *face2
name $name
>Coming just from being wrapped in my body?@
>As expected, you aren't qualified.\
name ""
goto *undine_h



*undine_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\undine_ha2.bmp",0,0
gosub *syasei2
>Stuck inside her soft body, Luka is forced to come, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2591,%2591+1:if %2591=1 mov %count_koenemy,%count_koenemy+1
if %2591>%count_most mov %count_most,%2591:mov $count_mostname,$name
count 11,11
mov $bad1,"Stuck inside Undine's body, Luka is forced to come."
gosub *face2
name $name
>It felt amazing, didn't it?@
>But as expected, you aren't qualified...\
name ""
goto *undine_h



*undine_h

mov %skill01,8
mov $bad2,"Dissolved and absorbed, Luka became one with Undine."
if %2591=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,18:hseanwave:goto *undine_hb
name "Luka"
>Ahh...\
name ""
mov %hseanwave,18:hseanwave
cspl 690,699
lsp 700,":a;chara\undine_ha1.bmp",0,0:print 10,500
>Exhausted after my orgasm, Undine presses her body into mine.@
>As she slowly pushes herself into me, I sink into her soft body.\
name "Luka"
>Wh...What are you doing...?\
name ""
goto *undine_hb



*undine_hb

name $name
>I'll dissolve you inside me, and make us one.\
name ""
name "Luka"
>N...No... Stop!\
name ""
name $name
>It's different from being eaten...@
>I'll dissolve your body and soul, and you'll become a part of me.\
>You will live inside of me forever.\
name ""
name "Luka"
>I don't want that...! Ahh...\
name ""
>The slime around my body starts to squirm, moving around me in waves.\
>The strange vibrations cause pleasure to run through my body.@
lsp 690,":a;chara\undine_ct01.bmp",0,0:print 10,500
>With my penis inside her as well, it reacts to the pleasurable sensations.\
name "Luka"
>Ahh...\
name ""
name $name
>I'll have you leave behind all of your semen inside me...@
>You want to come too, don't you?\
name ""
name "Luka"
>S...Stop...\
name ""
>I struggle to save myself from my inevitable death...@
>But it's useless. My body has sunk too far into her soft body to get out.\
>As I lay on top of her, helpless, her slime becomes a little more dense around my penis.@
>It feels like I'm floating on a squishy cloud, with a soft hand inside of it stroking my penis.\
name "Luka"
>Ahhh...!\
name ""
>I moan in pleasure at every soft touch of that invisible hand inside of her.@
>Undine watches me with a cold look in her eyes.\
>The shame is unbearable...@
>Toyed with and forced to come while she glares at me like that...\
name $name
>You can't take it any more, can you?@
>Go on, come.\
name ""
name "Luka"
>Aa...aahh...\
name ""
>The slime inside of her starts to alternate the directions its flowing, pushing and pulling my penis two separate ways at once.\
>A weak aching takes control of my body as the orgasm becomes too much to hold back.@
>I'm going to come in her...\
>The surrendering thought fills my mind as I relax my body, accepting the orgasm.\
gosub *syasei1
lsp 690,":a;chara\undine_ct02.bmp",0,0
gosub *syasei2
>I explode inside her blue body, relaxing after the release.\
name "Luka"
>Haaa...\
name ""
name $name
>Was it good...?@
>I'll absorb you little by little...\
name ""
lsp 700,":a;chara\undine_ha2.bmp",0,0:print 10,500
>Her soft slime squirms around me a little bit, allowing me to sink further into her body.\
>Unable to do anything about it, I moan pathetically as more of my body is covered by her own.\
name "Luka"
>Ahh...\
name ""
>Everywhere her body touches is met by a feeling of relaxation.@
>Just being wrapped in her feels so good...\
>With my penis completely submerged in that pleasure, it quickly becomes erect again after my orgasm.\
>The slime starts to play with my penis again as soon as that happens.@
>With another sigh, I hand over all control of my body to the relaxing slime engulfing me.\
name "Luka"
>Haaa...\
name ""
name $name
>It feels good, doesn't it?@
>Now, I'm going to dissolve you and make you one with me...\
name ""
if %hosyoku_cut=1 goto *hosyoku_cut
>Her slime changes thickness a little bit, slowing my sinking.@
>As soon as that happens, the relaxation sensations get even more intense, making it feel like I'm melting in her.\
>The sense of ecstasy brought along with that melting sensation is so powerful, I cry in happiness as the horrible act starts.\
name "Luka"
>Ahh... Ahhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\undine_ct03.bmp",0,0
gosub *syasei2
>I come inside of her again.@
>Wrapped in her soft body, the sense of release lasts for a long time after my ejaculation itself has ended.\
>I want to go deeper in her...@
>I want more of her around me...@
>The ruinous desire for more pleasure takes hold of my thoughts...\
name "Luka"
>Haa...Aahh...\
name ""
>The thought of being dissolved and eaten while alive...@
>All I can associate with it is the pleasure that's attacking my body now.\
>I want to feel more of this...@> I can't fight the desire to become one with Undine...\
name $name
>It feels good becoming one with me, doesn't it?\
name ""
name "Luka"
>Ah...aa...\
name ""
gosub *syasei1:gosub *syasei2
>I come again inside her soft body.@
>As I bask in the afterglow, her body loosens again, allowing me to sink further inside.\
csp 690
lsp 700,":a;chara\undine_ha3.bmp",0,0:print 10,500
>Then, my dissolving body is taken completely inside Undine's.@
>Surrounded by nothing but her soft body, the rest of my own is slowly melted as I become one with her.\
name "Luka"
>A...a...\
name ""
>As the rest of my body dissolves, it's like I'm wrapped in heaven.\
>My body and even my consciousness is melted away inside her, causing me to become a part of Undine herself.\
>For the rest of eternity, I'll live on inside Undine...\
name $name
>You melted away...@
>Now, you're just another piece of my body.\
name ""
name "Luka"
>............\
name ""
gosub *anten
mov %hseanwave,0:hseanwave
>Thus, my body and soul were melted to nothing inside Undine.@
>Absorbing my being after being melted, I'm endlessly feeling that ecstasy as part of her body.\
>..............\
goto *badend



*kamakiri_start

mov $name,"Mantis Girl"
mov $name2,"Mantis Girl"
mov $lavel,"kamakiri"
mov $tatie1,"kamakiri_st01"
mov $tatie2,"kamakiri_st02"
mov $tatie3,"kamakiri_st03"
mov $tatie4,"kamakiri_ha1"
mov $haikei,"bg061"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,2800
if %nanido=2 mov %max_enemylife,3200
if %nanido=3 mov %max_enemylife,3600
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,90
mov %earth_keigen,40
if %nanido=3 mov %earth_keigen,20
mov %music,1
mov %tikei,2
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't escape!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Heehee... No escape..."
mov $mogaku_sel2,"Heehee... No escape..."
mov $mogaku_sel3,"Hee... No escape..."
mov $mogaku_sel4,"Hee... No escape..."
mov $mogaku_sel5,"Hee... No escape..."
mov $mogaku_earth_dassyutu1,"Hee...! This is a human's power!?"
mov $mogaku_earth_dassyutu2,""
mov $half_s1,"Heehee... Human's smell..."
mov $half_s2,""
mov $kiki_s1,"Heehee... Going to come?"
mov $kiki_s2,"Come on... Let's mate."
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-250
mov %tukix,260
mov %owaza_count1a,2
name $name
>A human male... How rare.@
>I'll capture you... And mate...\
name ""
name "Luka"
>Guh... A strong looking monster...\
name ""
>She seems really agile, with powerful arms...@>And that thick insect carapace...\
>Fighting her head on seems like it will be difficult.\
name "Luka"
>Should I try Undine's power...?\
name ""
mov %skill01,10
mov %skill04,0
mov %sinkou,1
goto *common_main



*kamikiri001

name "Luka"
>Th...This...!\
>Will the wall of water stop the enemy's attack!?\
name ""
gosub *kamakiri_a2
name "Luka"
>Ahhg!?\
name ""
>She went right through the wall of water and hit me anyway...@
>All it feels like is the damage was reduced a tiny bit.\
name "Luka"
>What the heck is this!?@
>It isn't useful at all!\
name ""
>It seems like I shouldn't waste the SP on it...@
>It does the same thing as the earth, only worse!\
goto *common_main



*kamakiri_v

gosub *face3
name $name
>Hee....Heehee...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Mantis Girl turns into a normal mantis!\
mov %viclose,1:gosub *victory
mov %getexp,15000:gosub *lvup
mov %2292,1
goto *sean0200



*kamakiri_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>Heehee... Mate... Mate!\
name ""
goto *kamakiri_a



*kamakiri_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *kamakiri_kousan
if %cmd1=16 goto *kamakiri_onedari
if %cmd1=17 goto *common_skill
goto *kamakiri_main



*kamakiri_a

if %before_action=45 goto *kamikiri001
if %kousoku=1 gosub *kamakiri_a4:goto *common_main
rnd2 %ransu,1,3
if %ransu=1 gosub *kamakiri_a1:goto *common_main
if %ransu=2 gosub *kamakiri_a2:goto *common_main
if %ransu=3 && %owaza_count1a>3 gosub *kamakiri_a3:goto *common_main
skip -4



*kamakiri_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Heehee... Male's... Taste..."
if %ransu=2 mov $sel1,"Hee... Semen... Suck..."
if %ransu=3 mov $sel1,"Penis... Lick..."
name $name
eng $sel1:$sel6\
name ""
skillname "Mantis Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>The Mantis Girl violently sucks on Luka's penis!
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3395
if %nanido<2 damage 95,105
if %nanido=2 damage 110,120
if %nanido=3 damage 125,135
skillname ""
if %mylife=0 sub %stack,1:return *kamakiri_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kamakiri_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Male semen... Spit it out..."
if %ransu=2 mov $sel1,"Heehee... Semen... Semen..."
if %ransu=3 mov $sel1,"Hee... Chest... Ejaculate..."
name $name
eng $sel1:$sel6\
name ""
skillname "Mantis Tit Fuck"
dwave 1,"se\ero_paizuri.ogg"
>The Mantis Girl squeezes Luka's penis between her full breasts!
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3396
if %nanido<2 damage 100,110
if %nanido=2 damage 115,125
if %nanido=3 damage 130,140
skillname ""
if %mylife=0 sub %stack,1:return *kamakiri_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kamakiri_a3

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name $name
>Heehee... Man... Rape...\
name ""
skillname "Embrace"
>The Mantis Girl embraces Luka with her bladed arms!@
mov %kousoku,1:gosub *status_print
>Luka's being bound by the Mantis Girl!\
skillname ""
>The Mantis Girl hovers her genitals over Luka's penis!\
if %kousan=2 sub %stack,1:return
gosub *face2
name $name
if %first_sel1=1 skip 3
>Heehee... Mating...\
skip 2
>Mate... This time we mate...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,100
if %earth=0 && %nanido=2 mov %genmogaku,100
if %earth=0 && %nanido=3 mov %genmogaku,100
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
sub %stack,1
return



*kamakiri_a4

add %stack,1
name $name
>Time to mate...\
name ""
skillname "Mantis Rape"
dwave 1,"se\ero_makituki2.ogg"
lsp 700,":a;chara\kamakiri_ha2.bmp",0,0:print 10,500
>Luka's penis is forced into the Mantis Girl's egg-laying organ!
mov %damage_kotei,1
skillcount2 3397
damage 130,150
skillname ""
if %mylife=0 sub %stack,1:return *kamakiri_h3
>Luka is being raped by the Mantis Girl!\
name "Luka"
>Ahhh!\
name ""
>Luka writhes around in her tight embrace as she forces him all the way inside her sticky vagina!\
sub %stack,1
goto *kamakiri_a5



*kamakiri_a5

add %stack,1
>Luka is being raped by the Mantis Girl...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Heehee... Mating... Mating...":mov $sel2,"The Mantis Girl pumps Luka!"
if %ransu=2 mov $sel1,"Hee...Hee... Does it feel good?":mov $sel2,"The Mantis Girl shakes her hips around!"
if %ransu=3 mov $sel1,"Hurry, semen... Shoot it out...":mov $sel2,"The ribbed feeling of her vagina stimulates Luka!"
if %ransu=4 mov $sel1,"Hurry, come... Impregnate me...":mov $sel2,"The Mantis Girl tightens around Luka!"
if %ransu=5 mov $sel1,"Hee... Fertilize my eggs...":mov $sel2,"The sticky liquid inside of her sticks to Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Mantis Rape"
dwave 1,"se\ero_makituki2.ogg"
eng $sel2:$sel6
skillcount2 3397
mov %damage_kotei,1
damage 130,150
skillname ""
if %mylife=0 sub %stack,1:return *kamakiri_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
goto *kamakiri_a5



*kamakiri_onedari

mov $list1,"Mantis Blowjob"
if %3395>0 mov %list_num1,1
mov $list2,"Mantis Tit Fuck"
if %3396>0 mov %list_num2,1
mov $list3,"Mantis Rape"
if %3397>0 mov %list_num3,1
gosub *cmd_onedari
if %cmd1=11 goto *kamakiri_onedari1
if %cmd1=12 goto *kamakiri_onedari2
if %cmd1=13 goto *kamakiri_onedari3
if %cmd1=-1 goto *kamakiri_main
goto *kamakiri_onedari



*kamakiri_onedari1

gosub *onedari_syori
name $name
>Hee... You want me to suck out your semen with my mouth?\
name ""
gosub *kamakiri_a1
skip -1



*kamakiri_onedari2

gosub *onedari_syori
name $name
>Hee... You want me to squeeze out your semen with my breasts?\
name ""
gosub *kamakiri_a2
skip -1



*kamakiri_onedari3

gosub *onedari_syori_k
name $name
>Hee.... You want to mate?\
name ""
if %kousoku=0 gosub *kamakiri_a3
gosub *kamakiri_a4
skip -1



*kamakiri_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\kamakiri_bk01.bmp",0,0
gosub *syasei2
>Unable to take the Mantis Girl's intense blowjob, Luka comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2592,%2592+1:if %2592=1 mov %count_koenemy,%count_koenemy+1
if %2592>%count_most mov %count_most,%2592:mov $count_mostname,$name
count 4,1
mov $bad1,"The Mantis Girl's blowjob forced Luka to come."
gosub *face2
name $name
>Nnn... Semen in my mouth...\
name ""
goto *kamakiri_h



*kamakiri_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\kamakiri_bk02.bmp",0,0
gosub *syasei2
>Squeezed between the Mantis Girl's plump breasts, Luka comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2592,%2592+1:if %2592=1 mov %count_koenemy,%count_koenemy+1
if %2592>%count_most mov %count_most,%2592:mov $count_mostname,$name
count 7,1
mov $bad1,"The Mantis Girl's tit fuck forced Luka to come."
gosub *face2
name $name
>Semen... All over my chest...\
name ""
goto *kamakiri_h



*kamakiri_h3

mov %ikigoe,3:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\kamakiri_ha3.bmp",0,0
gosub *syasei2
>The instant he was forced into the Mantis Girl, Luka orgasms, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2592,%2592+1:if %2592=1 mov %count_koenemy,%count_koenemy+1
if %2592>%count_most mov %count_most,%2592:mov $count_mostname,$name
count 1,1
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to orgasm just from insertion."
gosub *face2
name $name
>Already ejaculated... Mating... Over...?\
name ""
>The Mantis Girl laughs in delight.@
>She smirks, with the face of a female who has dominated her mate.\
>But she doesn't take my penis out of her...@
>It seems like she wants more...\
goto *kamakiri_h



*kamakiri_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\kamakiri_ha3.bmp",0,0
gosub *syasei2
>Unable to endure the pleasure, Luka comes, filling up the Mantis Girl with his semen.\
mov %viclose,1:gosub *lose
mov %2592,%2592+1:if %2592=1 mov %count_koenemy,%count_koenemy+1
if %2592>%count_most mov %count_most,%2592:mov $count_mostname,$name
count 1,1
mov $bad1,"Luka was forced to orgasm as the Mantis Girl raped him."
gosub *face2
name $name
>Semen came out... Now we've mated...\
name ""
>The Mantis Girl laughs in delight.@
>She smirks, with the face of a female who has dominated her mate.\
>But she doesn't take my penis out of her...@
>It seems like she wants more...\
goto *kamakiri_h



*kamakiri_h

mov $bad2,"After that, Luka was nothing more than a breeding tool for the Mantis Girl."
if %2592=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,20:hseanwave:goto *kamakiri_hb
name "Luka"
>Ahh...\
name ""
>Exhausted, I fall down only to be embraced in the Mantis Girl's arms.\
name $name
>Mating... Impregnate me...\
name ""
cspl 690,699
lsp 700,":a;chara\kamakiri_ha1.bmp",0,0:print 10,500
>The Mantis Girl pushes her abdomen toward me.@>At the end of her abdomen, a tiny hole opens and closes as it approaches my penis.\
name $name
>I'm ready to mate...@
>Now you need to impregnate me...\
name "Luka"
>Ah...ahh...\
name ""
>That's her sexual organ...@
>That horrifying hole is going to suck my penis inside and force me to mate with her...\
>Stuck in her embrace, she's going to make me come inside her and get her pregnate...\
name "Luka"
>N...No... Stop...!\
name ""
>I writhe in her tight embrace, but it's no use.@
>I look on in horror as her vagina slowly gets closer to my penis.\
name $name
>Mating... Give my eggs plenty of your seed...\
name ""
name "Luka"
>Noo... Ahh!\
name ""
mov %hseanwave,20:hseanwave
lsp 700,":a;chara\kamakiri_ha2.bmp",0,0:print 10,500
>With a slurping noise, my penis is sucked deep inside her body.\
>Her warm juices drip out of her onto me as the soft flesh inside tightens around my penis.\
goto *kamakiri_hb



*kamakiri_hb

name "Luka"
>Ahh...\
name ""
>I sigh as the pleasure rushes over me at once.@
>Expecting something horrible, the amazing stimulation catches me off guard.\
>The power leaves my body as my male instinct takes over, making me feel like I want to ejaculate inside her.\
>But I quickly regain my senses as I hold myself back.\
name "Luka"
>N...No... I can't come...\
name ""
>I'm mating with a Mantis Girl right now...@
>She forced me into her, and is raping me...\
>This is breaking Ilias' commandment... I absolutely can't allow myself to ejaculate inside her...\
name $name
>You aren't going to come...?@> We'll be mating a lot, though...\
name ""
>Her soft walls tighten around me as the flesh starts to wriggle and move inside her.\
>The sticky juices inside of her rub into me as her tight vagina squirms around my penis, making me shiver despite my attempts to endure the stimulation.\
name "Luka"
>Ahh...\
name ""
>My body reacts in ecstasy despite my resistance.\
>Her sexual organs, designed to force men to come no matter what, crack my endurance as if it was made of nothing but brittle glass.\
name "Luka"
>Ahh... I shouldn't, but... I... I'm going to come...\
name ""
>The tightness in my waist gradually relaxes as it's replaced with a dull ache.\
>My focus slowly switches from denying the pleasure to accepting the pleasure.\
>My spirit finally breaks, and my body takes control.@
>Finally able to perform what it's purpose is, my seed erupts from my penis and fills the Mantis Girl's vagina.\
name "Luka"
>Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\kamakiri_ha3.bmp",0,0
gosub *syasei2
>The Mantis Girl's vagina doesn't stop tightening and wriggling around me as I ejaculate, squeezing out every drop of my semen into her waiting womb.\
mov %hseanwave,0:hseanwave
name "Luka"
>Ahh... I came...\
name ""
>My semen is inside of her horrifying organ,..@
>It isn't the first time she made me orgasm, but the immorality still makes me shiver.\
name $name
>You gave me lots of semen...@
>Now my eggs have been fertilized...\
name ""
>With a satisfied look on her face, the Mantis Girl happily starts to shake her hips.@
lsp 700,":a;chara\kamakiri_hb1.bmp",0,0:print 10,500
>Like that, she forces me to the ground and lays on top of me.\
name "Luka"
>Wh...What are you doing!?\
name ""
>It looks like she isn't letting me go...@
>Just what else does she want...?\
name $name
>Egg-laying...\
name ""
mov %hseanwave,22:hseanwave
lsp 700,":a;chara\kamakiri_hb2.bmp",0,0:print 10,500
>Something starts to come out of her hole.\
>It's a small egg.@
>Entangling my body, she wraps me in those small eggs.\
name "Luka"
>Wh...What is this!?\
name ""
>Some of the frothy eggs start to wriggle.@
>The ones around my groin squirm, unexpectedly hitting me with pleasure.\
name "Luka"
>Ahh... Wh...What is this...?\
name ""
>Some of the strange sticky eggs cling to my penis as they squirm and wriggle.\
name $name
>Nourishment for the eggs before they hatch...@
>Male semen... The eggs will absorb it...\
name ""
name "Luka"
>N...No way... Ahh!\
name ""
>My semen will be used to nourish these eggs...?@
>I shiver in horror at the thought.\
>But the frothy liquid that's around the eggs is also covering my groin.@
>The bizarre feeling causes my entire lower body to ache in pleasure.\
name "Luka"
>Ahh... Th..This feeling...\
name ""
>Even though I'm horrified, it feels good.\
>The slimy feeling of the wriggling eggs feels good...@
>Their birthing must have evolved this way...\
name $name
>More eggs... To give birth to...\
name ""
lsp 700,":a;chara\kamakiri_hb3.bmp",0,0:print 10,500
>More frothy eggs come out of her, covering my body all the way up to my shoulder in squirming eggs.\
name "Luka"
>Ah...Ahh...\
name ""
>The stimulations cover more and more of my body, making it feel like I'm being massaged all over.\
>Letting out a sigh, I relax as the eggs force me to an orgasm.\
gosub *syasei1:gosub *syasei2
>I ejaculate, spraying my semen all over the eggs.@
>Contrary to a feeling of release, I feel overwhelmed by a feeling of disgust.\
>Wrapped in eggs and forced to come just to feed them...@
>It feels like my worth as a man has been crushed...\
name $name
>Give them more nourishment...@
>Until they're nice and big...\
name ""
name "Luka"
>Haaa...\
name ""
lsp 700,":a;chara\kamakiri_hb4.bmp",0,0:print 10,500
>Even more eggs come out of her, covering more of my body.\
name "Luka"
>Ah...ahh...\
name ""
>The feeling of another orgasm slowly pushes away the revulsion as more of my body is covered by the wriggling eggs.\
>Trembling, I let out a moan as I'm brought to another orgasm.\
gosub *syasei1:gosub *syasei2
>My penis twitches as I come, shooting semen out over the eggs.@
>Absorbing the semen, they start to wriggle and vibrate even more, as if encouraged by the food being given to them.\
>As they squirm with even more intensity on my penis, I feel another orgasm already coming on.\
name "Luka"
>Ahhh...\
name ""
gosub *syasei1:gosub *syasei2
>Wrapped in the pleasant feelings of the eggs all over my body, I reach another climax.\
>Every time I ejaculate, I feel weaker.@
>Slowly, my vision starts to fade as I feel myself about to fall unconscious.\
name "Luka"
>Ah...ahh...\
name ""
>While still leaking semen, I faint.\
name $name
>Come a lot...@
>Feed our daughters...\
name ""
>Even as I'm unconscious, I'm still forced to orgasm.@
>Just like I was awake, there's no escape...\
>For a full week, I lay there covered in her eggs...\
gosub *anten
mov %hseanwave,0:hseanwave
>After the eggs hatched, I wasn't freed.@
>As soon as they had hatched, the Mantis Girl mated with me again, and then wrapped me up in more eggs.\
>Like this, I'm used as nothing more than a breeding tool for the Mantis Girl...@
>My adventure ends here.\
>..............\
goto *badend



*scylla_start

mov $name,"Scylla"
mov $name2,"Scylla"
mov $lavel,"scylla"
mov $tatie1,"scylla_st01"
mov $tatie2,"scylla_st02"
mov $tatie3,"scylla_st03"
mov $tatie4,"scylla_st02"
mov $haikei,"bg099"
mov %monster_x,140
mov %monster_y,0
if %nanido=1 mov %max_enemylife,3000
if %nanido=2 mov %max_enemylife,3200
if %nanido=3 mov %max_enemylife,3400
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %music,1
mov %tikei,2
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"My tentacles will squeeze out your semen even as you struggle..."
mov $mogaku_sel2,"Ahaha... Struggling is pointless."
mov $mogaku_sel3,"How pitiful... Struggling like that."
mov $mogaku_sel4,"If you struggle, I'll just tighten..."
mov $mogaku_sel5,"I won't let you go... My tentacle will control you..."
mov $mogaku_earth_dassyutu1,"To break free from my tentacles..."
mov $mogaku_earth_dassyutu2,"But I'll just coil around you again."
mov $half_s1,"Hehe, it feels good doesn't it?"
mov $half_s2,"Dirty my tentacles with your semen..."
mov $kiki_s1,"Are you going to come soon?"
mov $kiki_s2,"Then let me help you with my tentacles..."
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-130
mov %tukix,320
mov %owaza_count1a,7
mov %owaza_count3a,7
gosub *face2
name $name
>Hehe... It's dangerous for cute little boys like you to be out here at this time.\
>Scaaary girls will come up to you and wrap you in their tentacles, you know?\
name ""
name "Luka"
>Guh... Scylla...\
name ""
>She's from a race of famous, strong monsters.@
>Her tentacles are capable of both powerful binds and attacks...\
name $name
>Hehe... I'll tease you with these tentacles.\
>Don't you want to be squeezed really tightly?@
>Or do you want me to stroke your penis with them?\
name ""
gosub *face1
goto *common_main



*scylla_v

gosub *face3
name $name
>I...It can't be...!\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Scylla turns into an octopus!\
mov %viclose,1:gosub *victory
mov %getexp,16000:gosub *lvup
mov %2293,1
goto *sean0201



*scylla_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>You want to be teased by my tentacles...?@
>Then I'll let you feel them as much as you want...\
name ""
goto *scylla_a



*scylla_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *scylla_kousan
if %cmd1=16 goto *scylla_onedari
if %cmd1=17 goto *common_skill
goto *scylla_main



*scylla_a

if %kousoku=1 rnd2 %ransu,1,11
if %kousoku=1 && %ransu=1 gosub *scylla_a6:gosub *scylla_a1:goto *common_main
if %kousoku=1 && %ransu=2 gosub *scylla_a6:gosub *scylla_a2:goto *common_main
if %kousoku=1 && %ransu=3 gosub *scylla_a6:gosub *scylla_a3:goto *common_main
if %kousoku=1 && %ransu=4 gosub *scylla_a6:gosub *scylla_a4:goto *common_main
if %kousoku=1 && %ransu=5 gosub *scylla_a1:gosub *scylla_a2:goto *common_main
if %kousoku=1 && %ransu=6 gosub *scylla_a1:gosub *scylla_a3:goto *common_main
if %kousoku=1 && %ransu=7 gosub *scylla_a1:gosub *scylla_a4:goto *common_main
if %kousoku=1 && %ransu=8 gosub *scylla_a2:gosub *scylla_a3:goto *common_main
if %kousoku=1 && %ransu=9 gosub *scylla_a2:gosub *scylla_a4:goto *common_main
if %kousoku=1 && %ransu=10 gosub *scylla_a3:gosub *scylla_a4:goto *common_main
if %kousoku=1 && %ransu=11 && %owaza_count3a>6 gosub *scylla_a7:goto *common_main
if %kousoku=1 skip -12
rnd2 %ransu,1,8
if %ransu=1 gosub *scylla_a1:goto *common_main
if %ransu=2 gosub *scylla_a2:goto *common_main
if %ransu=3 gosub *scylla_a3:goto *common_main
if %ransu=4 gosub *scylla_a4:goto *common_main
if %ransu>4 && %owaza_count1a>7 gosub *scylla_a5:goto *common_main
skip -6



*scylla_a1

add %stack,1
if %kousoku=0 skip 2
>Luka is bound by Scylla's tentacles...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Have a taste of my tentacles..."
if %ransu=2 mov $sel1,"Let my tentacles make you feel as good as you want..."
if %ransu=3 mov $sel1,"I'll caress your whole body with my tentacles..."
name $name
eng $sel1:$sel6\
name ""
skillname "Tentacle Body Torture"
dwave 1,"se\ero_makituki1.ogg"
>The Scylla's tentacles crawl all over Luka's body!
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3398
if %nanido<2 damage 60,70
if %nanido=2 damage 70,80
if %nanido=3 damage 80,90
skillname ""
if %mylife=0 sub %stack,1:return *scylla_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*scylla_a2

add %stack,1
if %kousoku=0 skip 2
>Luka is bound by Scylla's tentacles...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Enjoying the feel of my tentacles on your nipples... What a shameful boy."
if %ransu=2 mov $sel1,"Feeling good from your nipples, even though you're a boy?"
if %ransu=3 mov $sel1,"I'll caress your nipples with my tentacles..."
name $name
eng $sel1:$sel6\
name ""
skillname "Tentacle Nipple Torture"
dwave 1,"se\ero_makituki1.ogg"
>Scylla's tentacles massage Luka's nipples!
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3399
if %nanido<2 damage 65,75
if %nanido=2 damage 75,85
if %nanido=3 damage 85,95
skillname ""
if %mylife=0 sub %stack,1:return *scylla_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*scylla_a3

add %stack,1
if %kousoku=0 skip 2
>Luka is bound by Scylla's tentacles...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Don't feel shy..."
if %ransu=2 mov $sel1,"My tentacles will squeeze out your sticky semen..."
if %ransu=3 mov $sel1,"Hehe... I'll make your penis feel good with my tentacles..."
name $name
eng $sel1:$sel6\
name ""
skillname "Tentacle Groin Torture"
dwave 1,"se\ero_makituki2.ogg"
>Scylla's tentacles coil around Luka's penis, slowly rubbing him with it!
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3400
if %nanido<2 damage 70,80
if %nanido=2 damage 80,90
if %nanido=3 damage 90,100
skillname ""
if %mylife=0 sub %stack,1:return *scylla_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*scylla_a4

add %stack,1
if %kousoku=0 skip 2
>Luka is bound by Scylla's tentacles...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My tentacles will violate you..."
if %ransu=2 mov $sel1,"Feeling it even from your ass... What a pitiful boy."
if %ransu=3 mov $sel1,"Will you moan as I violate your ass?"
name $name
eng $sel1:$sel6\
name ""
skillname "Tentacle Anal Torture"
dwave 1,"se\ero_makituki2.ogg"
>One of Scylla's tentacles slips into Luka's ass and starts to vibrate!
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3401
if %nanido<2 damage 85,95
if %nanido=2 damage 95,105
if %nanido=3 damage 105,115
skillname ""
if %mylife=0 sub %stack,1:return *scylla_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*scylla_a5

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name $name
>My tentacles will coil around you...\
name ""
skillname "Tentacle Bind"
dwave 1,"se\ero_makituki3.ogg"
>Scylla's tentacles coil around Luka's body!
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
if %nanido<2 damage 75,85
if %nanido=2 damage 85,95
if %nanido=3 damage 95,105
mov %kousoku,1:gosub *status_print
>Luka has been bound by her powerful tentacles!\
skillname ""
if %mylife=0 sub %stack,1:return *scylla_h5
if %kousan=2 sub %stack,1:return
gosub *face2
name $name
if %first_sel1=1 skip 4
>Hehe... I caught you.@
>Now I'm going to use my tentacles to play with you...\
skip 3
>Hehe, you won't get away this time...@
>Now I'm going to use my tentacles to play with you...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,3
if %earth=0 && %nanido=2 mov %genmogaku,4
if %earth=0 && %nanido=3 mov %genmogaku,5
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,2
if %earth>0 && %nanido=3 mov %genmogaku,3
sub %stack,1
return



*scylla_a6

add %stack,1
>Luka is bound by Scylla's tentacles...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll tighten a little..."
if %ransu=2 mov $sel1,"Here, I'll tease you a little..."
if %ransu=3 mov $sel1,"Come on... Let me hear that pathetic voice of yours..."
name $name
eng $sel1:$sel6\
name ""
skillname "Tentacle Tighten"
dwave 1,"se\ero_simetuke1.ogg"
>Scylla tightens her tentacles around Luka's body!
skillcount2 3402
if %nanido<2 damage 75,85
if %nanido=2 damage 85,95
if %nanido=3 damage 95,105
skillname ""
if %mylife=0 sub %stack,1:return *scylla_h6
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*scylla_a7

add %stack,1
>Luka is bound by Scylla's tentacles...\
mov %owaza_count3a,0
if %kousan=2 skip 5
name $name
>It's about time to give you a taste of heaven...@
>My tentacles will caress you everywhere little boys can feel something...\
name ""
skillname "Elysion-De-Scylla"
dwave 1,"se\ero_makituki3.ogg"
eng "Scylla's tentacles move toward Luka's weak points!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,100
if %wind=2 && %nanido=2 mov %wind_kakuritu,100
if %wind=2 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
skillcount2 3403
dwave 1,"se\ero_makituki1.ogg"
>A tentacle tickles his nipples!
mov %damage_kotei,1
damage 65,75
dwave 1,"se\ero_makituki1.ogg"
>A tentacle gently coils around his balls!
mov %damage_kotei,1
damage 65,75
dwave 1,"se\ero_makituki2.ogg"
>A tentacle slips into his ass and starts to vibrate!
mov %damage_kotei,1
damage 65,75
dwave 1,"se\ero_makituki2.ogg"
>A tentacle wraps around his penis and rubs it!
mov %damage_kotei,1
damage 65,75
skillname ""
if %mylife=0 sub %stack,1:return *scylla_h7
sub %stack,1
goto *scylla_a8



*scylla_a8

add %stack,1
skillcount2 3403
>Luka is bound by Scylla's tentacles...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll play with all of your weak points..."
if %ransu=2 mov $sel1,"Where does it feel best? Here? ...Or here?"
if %ransu=3 mov $sel1,"Pitiful little boy, let me hear that voice of yours..."
name $name
eng $sel1:$sel6\
name ""
skillname "Elysion-De-Scylla"
dwave 1,"se\ero_makituki3.ogg"
>Scylla's tentacles move toward Luka's weak points!\
dwave 1,"se\ero_makituki1.ogg"
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"A tentacle tickles his nipples!"
if %ransu=2 mov $sel1,"A sucker sticks to his nipples and starts to suck!"
if %ransu=3 mov $sel1,"The tip of a tentacle coils around his nipple!"
eng $sel1:$sel6
mov %damage_kotei,1
damage 65,75
dwave 1,"se\ero_makituki1.ogg"
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"A tentacle gently coils around Luka's balls!"
if %ransu=2 mov $sel1,"A tentacle tightens around Luka's balls!"
if %ransu=3 mov $sel1,"The tip of a tentacle plays with Luka's balls!"
eng $sel1:$sel6
mov %damage_kotei,1
damage 65,75
dwave 1,"se\ero_makituki2.ogg"
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"A tentacle slips into Luka's ass, and starts to spin inside!"
if %ransu=2 mov $sel1,"A tentacle slips into Luka's ass and stimulates his prostate!"
if %ransu=3 mov $sel1,"A tentacle goes in and out of Luka's ass!"
eng $sel1:$sel6
mov %damage_kotei,1
damage 65,75
dwave 1,"se\ero_makituki2.ogg"
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"A tentacle coils around Luka's penis!"
if %ransu=2 mov $sel1,"A tentacle tickles the tip of Luka's penis!"
if %ransu=3 mov $sel1,"A tentacle slowly tightens around Luka's penis!"
if %ransu=4 mov $sel1,"A sucker on her tentacle sticks to the tip of Luka's penis!"
eng $sel1:$sel6
mov %damage_kotei,1
damage 65,75
skillname ""
if %mylife=0 sub %stack,1:return *scylla_h7
sub %stack,1
goto *scylla_a8



*scylla_onedari

mov $list1,"Tentacle Body Torture"
if %3398>0 mov %list_num1,1
mov $list2,"Tentacle Nipple Torture"
if %3399>0 mov %list_num2,1
mov $list3,"Tentacle Groin Torture"
if %3400>0 mov %list_num3,1
mov $list4,"Tentacle Anal Torture"
if %3401>0 mov %list_num4,1
mov $list5,"Tentacle Tighten"
if %3402>0 mov %list_num5,1
mov $list6,"Elysion-De-Scylla"
if %3403>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *scylla_onedari1
if %cmd1=12 goto *scylla_onedari2
if %cmd1=13 goto *scylla_onedari3
if %cmd1=14 goto *scylla_onedari4
if %cmd1=15 goto *scylla_onedari5
if %cmd1=16 goto *scylla_onedari6
if %cmd1=-1 goto *scylla_main
goto *scylla_onedari



*scylla_onedari1

gosub *onedari_syori_k
name $name
>You want to feel my tentacles all over your body?\
name ""
if %kousoku=0 gosub *scylla_a5
gosub *scylla_a1
skip -1



*scylla_onedari2

gosub *onedari_syori_k
name $name
>You want me to play with your nipples?\
name ""
if %kousoku=0 gosub *scylla_a5
gosub *scylla_a2
skip -1



*scylla_onedari3

gosub *onedari_syori_k
name $name
>You want my tentacles to play with your penis?\
name ""
if %kousoku=0 gosub *scylla_a5
gosub *scylla_a3
skip -1



*scylla_onedari4

gosub *onedari_syori_k
name $name
>You want to be raped by my tentacles?\
name ""
if %kousoku=0 gosub *scylla_a5
gosub *scylla_a4
skip -1



*scylla_onedari5

gosub *onedari_syori_k
name $name
>You want my tentacles to tighten around your body?\
name ""
if %kousoku=0 gosub *scylla_a5
gosub *scylla_a6
skip -1



*scylla_onedari6

gosub *onedari_syori_k
name $name
>You want to be dominated by my tentacles?\
name ""
if %kousoku=0 gosub *scylla_a5
gosub *scylla_a7
skip -1



*scylla_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\scylla_bk03.bmp",140,0
gosub *syasei2
>As Scylla's tentacles run all over his body, Luka comes, covering her tentacles with his semen.\
mov %viclose,1:gosub *lose
mov %2593,%2593+1:if %2593=1 mov %count_koenemy,%count_koenemy+1
if %2593>%count_most mov %count_most,%2593:mov $count_mostname,$name
count 10,3
mov $bad1,"Luka was forced to orgasm by Scylla's body torture."
gosub *face2
name $name
>Hehe... Did you enjoy my tentacles?\
name ""
goto *scylla_h



*scylla_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\scylla_bk03.bmp",140,0
gosub *syasei2
>As Scylla's tentacles rub his nipples, Luka comes, covering her tentacles with his semen.\
mov %viclose,1:gosub *lose
mov %2593,%2593+1:if %2593=1 mov %count_koenemy,%count_koenemy+1
if %2593>%count_most mov %count_most,%2593:mov $count_mostname,$name
count 23,3
mov $bad1,"Luka was forced to orgasm by Scylla's nipple torture."
gosub *face2
name $name
>Coming just from having your nipples played with...?@
>It's like you're a girl... Hehe.\
name ""
goto *scylla_h



*scylla_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\scylla_bk03.bmp",140,0
gosub *syasei2
>As Scylla's tentacles play with his penis, Luka comes, covering her tentacles with his semen.\
mov %viclose,1:gosub *lose
mov %2593,%2593+1:if %2593=1 mov %count_koenemy,%count_koenemy+1
if %2593>%count_most mov %count_most,%2593:mov $count_mostname,$name
count 10,3
mov $bad1,"Luka was forced to orgasm by Scylla's groin torture."
gosub *face2
name $name
>Hehe... I milked it out with my tentacles.@
>Coming like that is the best, isn't it?\
name ""
goto *scylla_h



*scylla_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\scylla_bk03.bmp",140,0
gosub *syasei2
>As her tentacles violate his ass, Luka comes, covering Scylla's tentacles with semen.\
mov %viclose,1:gosub *lose
mov %2593,%2593+1:if %2593=1 mov %count_koenemy,%count_koenemy+1
if %2593>%count_most mov %count_most,%2593:mov $count_mostname,$name
count 9,3
mov $bad1,"Luka was forced to orgasm by Scylla's anal torture."
gosub *face2
name $name
>Hahaha! You came from that!?@
>Even though you're a boy... How pathetic!\
name ""
goto *scylla_h



*scylla_h5

mov %ikigoe,3:gosub *ikigoe
name $name
>Hehe... What's wrong?\
name ""
gosub *syasei1
lsp 693,":a;chara\scylla_bk03.bmp",140,0
gosub *syasei2
>Unable to endure the feeling of her tentacles on his body, Luka comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2593,%2593+1:if %2593=1 mov %count_koenemy,%count_koenemy+1
if %2593>%count_most mov %count_most,%2593:mov $count_mostname,$name
count 10,3
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka came just from the feeling of Scylla's tentacles on him."
gosub *face2
name $name
>Arara... Coming just from that?@
>If you could have held it for a moment, I could have dome something even better...\
name ""
goto *scylla_h



*scylla_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\scylla_bk03.bmp",140,0
gosub *syasei2
>As the tentacles tighten around his body, Luka comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2593,%2593+1:if %2593=1 mov %count_koenemy,%count_koenemy+1
if %2593>%count_most mov %count_most,%2593:mov $count_mostname,$name
count 16,3
mov $bad1,"Luka came as Scylla's tentacles tightened around him."
gosub *face2
name $name
>Arara, coming as I tighten around you...@
>You're quite a pervert, aren't you?\
name ""
goto *scylla_h



*scylla_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\scylla_bk03.bmp",140,0
gosub *syasei2
>As the tentacles play with every weak point on Luka's body, he comes, covering Scylla with semen.\
mov %viclose,1:gosub *lose
mov %2593,%2593+1:if %2593=1 mov %count_koenemy,%count_koenemy+1
if %2593>%count_most mov %count_most,%2593:mov $count_mostname,$name
count 10,3
mov $bad1,"Luka came as Scylla's tentacles overwhelmed his body."
gosub *face2
name $name
>Hehe, you came a lot, didn't you?@
>It was amazing, wasn't it? Hehe.\
name ""
goto *scylla_h



*scylla_h

mov $bad2,"Caught in her tentacles, Luka became Scylla's semen slave."
if %2593=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
cspl 690,699
lsp 700,":a;chara\scylla_h0.bmp",0,0:print 10,500
>Scylla pins me down with her tentacles, and gets on top of me with a dirty smile on her face.\
>Sitting on top of me, Scylla shows off a hole underneath her body.\
name $name
>Aren't you interested in how it feels inside of me?\
name ""
>To show me inside, she spreads her opening with two tentacles.@
>Bright pink flesh inside of her squirms and wriggles around, just waiting for something to play with...\
name $name
>How does it feel inside me...?@
>Why don't you check with your penis?\
name ""
name "Luka"
>St...Stop this...\
name ""
>Scylla laughs and slowly lowers her body down on me, forcing me inside her.@
mov %hseanwave,9:hseanwave
lsp 700,":a;chara\scylla_h1.bmp",0,0:print 10,500
>She forces me all the way into her body!\
name "Luka"
>Ahhh!!\
name ""
>Her slimy flesh wriggles and tightens around my penis as soon as I'm forced inside her, making me yell out in surprise pleasure.\
>Just like her squishy lower body, her vagina is just as squishy and flexible.\
name $name
>Inside my hole...@
>It's a squishy heaven that will squeeze out your semen. \
name ""
name "Luka"
>Ahh... Ahhh!\
name ""
>Deep inside of her, something new starts to wriggle and squirm around my penis.@
>It's as if there are tiny tentacles lining her soft walls.\
>They crawl all over my penis as they start to coil and entangle it inside of her.\
name "Luka"
>Ahhhg... Something inside of you...\
name ""
name $name
>Hehe... I have more tentacles, even inside my pussy...@
>Tentacles designed to play with your penis. \
name ""
name "Luka"
>Ah... Aahhh!\
name ""
>The tentacles inside of her coil around the tip of my penis, down the shaft and start to rub the back muscle of my penis.\
>Another tentacle coils around my penis and starts to tighten.\
name "Luka"
>Ahh... That feels good...\
name ""
name $name
>It's fine to shoot out your little boy juice...@
>This is the place where you're supposed to shoot your semen, so you're supposed to let out as much as you can...\
name ""
name "Luka"
>B...But...@> Ahhh!\
name ""
>She clamps tightly around me, cutting off my protest.@
>My head goes white as I'm attacked by the pleasure, forgetting why I was resisting this.\
>I push up into her, wanting to feel more.@
>As soon as I do, I feel a tingling spread throughout my entire body.\
name $name
>Hehe, come without holding back.@
>If you come inside me, I can make it feel even better. \
name ""
name "Luka"
>Ahh...\
name ""
>I finally surrender to the pleasure, entrusting my body over to her.@
>As if rewarding my submission, a powerful orgasm wracks my body.\
gosub *syasei1
lsp 700,":a;chara\scylla_h2.bmp",0,0
gosub *syasei2
name "Luka"
>Haa...\
name ""
mov %hseanwave,10:hseanwave
>As soon as my ejaculation starts, the tentacles movements change.@
>They stop wriggling, and start to press and tighten around me.\
name "Luka"
>Ahh... What... Is this...?\
name ""
name $name
>When you come, my tentacles will crawl and coil around you...@
>They'll make it feel reeeeeally good as they help you ejaculate.\
name ""
>As I ejaculate, the tentacles tightly squeeze and release me.@
>The rhythmic pressure causes each spurt of semen to explode out of me when she releases my penis.\
name "Luka"
>Ahh...\
name ""
>Her tentacles squeeze me until the very last drop is out.@
>Exhausted, I lay back on the ground after the long ejaculation, extended by her strange technique.\
lsp 700,":a;chara\scylla_h3.bmp",0,0:print 10,500
name $name
>Do you like my special semen squeezing hole?@
>But I'm not satisfied yet...\
name ""
name "Luka"
>Ah... Aiie!\
name ""
>The tips of two tentacles start to gently rub against the back muscle and tip of my urethral opening at the same time.\
name $name
>Hehe... The pee hole and the back muscle...@
>I know every weak point on a boy...\
name ""
name "Luka"
>Ahh...\
name ""
>As the two tentacles carefully work on those two weak points, the rest continue to massage me.\
>Scylla's hole, designed to squeeze out a man's semen as he's overpowered by pleasure...@
>Gasping in ecstasy, I indulge in the stimulations she's giving me.\
name "Luka"
>Ahh...\
name ""
>Another squishy tentacle starts to coil around the tip of my penis.\
>It starts to vibrate and rhythmically squeeze me.@
>Dominated by the pleasure as she sits on top of me, I feel another orgasm quickly rising through my body.\
name "Luka"
>Ahh... I'm going to come again...\
name ""
name $name
>Hehe... Even though you just came, already going to come again?@
>That's so fast... What a pitiful little boy.\
name ""
>Scylla squeezes me even tighter as she laughs in my face.@
>All at once, I'm forced to a climax.\
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\scylla_h4.bmp",0,0
gosub *syasei2
>Moaning in pleasure, I explode inside her again.\
>But just like before, her tentacles tighten around me, controlling my ejaculation to make me slowly spurt inside of her as she lets me.\
name "Luka"
>Haa... Ahh...\
name ""
>The pleasure from the orgasm lasts much longer than usual thanks to her strange technique.@
>Each spurt of semen comes with a powerful sense of release.\
lsp 700,":a;chara\scylla_h5.bmp",0,0:print 10,500
name $name
>Hehe, I'll squeeze out a lot more...@
>Make sure you give me a lot, too.\
name ""
name "Luka"
>Haa... Ahhhh!\
name ""
>The teasing of her tentacles on my weak spots continues right away, giving me no break.\
>Completely helpless underneath her, I feel another orgasm coming on after only a short while from the last.\
name $name
>Hehehe... It feels like you're about to come again.@
>I'll squeeze out everything... Hehehe.\
name ""
name "Luka"
>Ahh...\
name ""
>I can taste that amazing pleasure if I come again...@
>Thinking that, I relax, thrusting up into her waiting body.\
gosub *syasei1
lsp 700,":a;chara\scylla_h6.bmp",0,0
gosub *syasei2
name "Luka"
>Haa...\
name ""
>Her tentacles coil around me again, beginning the ejaculation technique I was waiting for.@
>I start to drool as the ecstasy fills my body.\
>After the last drop of semen is milked out, I let out a long sigh and relax my body.\
name $name
>Hehe... It looks like you really like my special pussy.\
>I really like you, too.@
>I'm going to make you into my own personal use semen slave.\
name ""
name "Luka"
>Ahh...\
name ""
name $name
>It doesn't sound bad at all, does it?@
>Hahaha, here...!\
name ""
name "Luka"
>Ah!@>Ahhhh!\
name ""
>She starts again, working on the next orgasm.@
>Absorbed in the pleasure, I stop thinking about what she just said.\
gosub *anten
mov %hseanwave,0:hseanwave
>After that, I was captured by her tentacles.@
>Squeezed dry every day by Scylla, I'll live out the rest of my life as her personal semen slave.\
>Able to indulge in pleasure every day, I'm not unhappy.@
>Giving semen to Scylla every day, I'm happiest when I'm inside her.\
>...............\
goto *badend



*medusa_start

mov $name,"Medusa"
mov $name2,"Medusa"
mov $lavel,"medusa"
mov $tatie1,"medusa_st01"
mov $tatie2,"medusa_st02"
mov $tatie3,"medusa_st03"
mov $tatie4,"medusa_st02"
mov $haikei,"bg041"
mov %monster_x,218
mov %monster_y,0
if %nanido=1 mov %max_enemylife,3200
if %nanido=2 mov %max_enemylife,3600
if %nanido=3 mov %max_enemylife,4000
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %music,1
mov %tikei,2
gosub *maxmp:mov %mp,%max_mp-1
gosub *syutugen
mov $half_s1,"Aha, does it feel good?"
mov $half_s2,"Such a dirty smell is coming off your penis..."
mov $kiki_s1,"Are you going to come soon?"
mov $kiki_s2,"Your dirty semen is going to go everywhere...!"
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-70
mov %tukix,320
mov %owaza_count2a,3
mov %owaza_count3a,4
name "Luka"
>Her hair is made up of snakes... What a weird monster.\
name ""
>The snakes on top of her head move around in every direction, hissing and biting the air.\
name $name
>Don't say mean things to me...@
>Or else I'll use them to tease your penis...\
name ""
name "Luka"
>Ah... Sorry.\
name ""
>I shouldn't be saying things like that if I'm looking for humans and monsters to get along.@
>But still... Those snakes look weird.\
name $name
>It's too late to apologize...@
>I'm going to turn you into stone...\
name ""
goto *common_main



*medusa_v

gosub *face3
name $name
>Noooo...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Medusa turns into a snake!\
mov %viclose,1:gosub *victory
mov %getexp,17000:gosub *lvup
mov %2294,1
goto *sean0202



*medusa_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>Already surrendering...?@
>Then I can rape you as I want...\
name ""
goto *medusa_a



*medusa_main

gosub *cmd_main
if %cmd1=11 goto *common_attack
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *medusa_kousan
if %cmd1=16 goto *medusa_onedari
if %cmd1=17 goto *common_skill
goto *medusa_main



*medusa_a

if %status=6 && %status_turn=-1 gosub *medusa_a6
rnd2 %ransu,1,6
if %ransu=1 gosub *medusa_a1:goto *common_main
if %ransu=2 gosub *medusa_a2:goto *common_main
if %ransu=3 gosub *medusa_a3:goto *common_main
if %ransu=4 && %owaza_count3a>4 gosub *medusa_a4:goto *common_main
if %ransu>4 && %owaza_count2a>5 && %status=0 gosub *medusa_a5:goto *common_main
skip -6



*medusa_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll squeeze it out of you like this!"
if %ransu=2 mov $sel1,"Come on... Let my hand squeeze it out!"
if %ransu=3 mov $sel1,"My hand feels good, doesn't it!?"
name $name
eng $sel1:$sel6\
name ""
skillname "Medusa's Hand"
dwave 1,"se\ero_koki1.ogg"
>Medusa grabs Luka's penis, and violently strokes him up and down!
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3404
if %nanido<2 damage 70,80
if %nanido=2 damage 85,95
if %nanido=3 damage 100,110
skillname ""
if %mylife=0 sub %stack,1:return *medusa_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*medusa_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck it like this!"
if %ransu=2 mov $sel1,"Here... Fill my mouth with your dirty semen!"
if %ransu=3 mov $sel1,"I'll lick that dirty penis of yours, so you better be thankful!"
name $name
eng $sel1:$sel6\
name ""
skillname "Medusa's Mouth"
dwave 1,"se\ero_buchu2.ogg"
>Medusa puts Luka's penis in her mouth and starts to suck!
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3405
if %nanido<2 damage 75,85
if %nanido=2 damage 90,100
if %nanido=3 damage 105,115
skillname ""
if %mylife=0 sub %stack,1:return *medusa_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*medusa_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Just this once, I'll do it like this!"
if %ransu=2 mov $sel1,"Is it good? Moan more for me!"
if %ransu=3 mov $sel1,"Cover my thighs with your semen!"
name $name
eng $sel1:$sel6\
name ""
skillname "Medusa's Thighs"
dwave 1,"se\ero_koki1.ogg"
>Medusa squeezes Luka's penis between her thighs!
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3406
if %nanido<2 damage 80,90
if %nanido=2 damage 95,105
if %nanido=3 damage 110,120
skillname ""
if %mylife=0 sub %stack,1:return *medusa_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*medusa_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My snakes will bully your penis!"
if %ransu=2 mov $sel1,"Here, my snakes will caress your penis!"
if %ransu=3 mov $sel1,"This will feel amazing, so come already!"
name $name
eng $sel1:$sel6\
name ""
skillname "Lewd Snake's Hair"
dwave 1,"se\ero_makituki1.ogg"
skillcount2 3407
>Medusa's snake hair grows, and slithers all over Luka's penis!
if %nanido<2 damage 30,35
if %nanido=2 damage 38,43
if %nanido=3 damage 46,51
dwave 1,"se\ero_makituki2.ogg"
>The innumerable snakes tighten around his penis!
if %nanido<2 damage 30,35
if %nanido=2 damage 38,43
if %nanido=3 damage 46,51
dwave 1,"se\ero_pyu2.ogg"
>The snakes' tongues extend, licking Luka's penis all over!
if %nanido<2 damage 30,35
if %nanido=2 damage 38,43
if %nanido=3 damage 46,51
skillname ""
if %mylife=0 sub %stack,1:return *medusa_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
mov %owaza_count3a,0
sub %stack,1
return



*medusa_a5

add %stack,1
mov %owaza_count2a,0
name $name
>I'll turn you to stone!\
name ""
skillname "Eyes of Petrification"
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
eng "Medusa's eyes shine!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,100
if %wind=2 && %nanido=2 mov %wind_kakuritu,100
if %wind=2 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But a gust of wind blocks Luka's view!":gosub *wind_guard:sub %stack,1:return
\
>A cold feeling slowly spreads from Luka's feet!\
dwave 1,"se\stone.ogg"
>Luka is gradually turning to stone!\
mov %status,6:gosub *status_print
skillname ""
name "Luka"
>Wh...What the!?\
name ""
name $name
>Hahaha... Your body is slowly turning to stone.@
>Just like that, become a statue!\
name ""
if %kousan=2 sub %stack,1:return
mov %status_turn,3
sub %stack,1
return



*medusa_a6

add %stack,1
name "Luka"
>Ah...Uuu...\
name ""
>I fall backward to the ground, completely unable to move.@
>My body feels like its turned into cold stone!\
name $name
>Hahaha, you're already stone.@
>I only left a single place where you can feel anything...\
name ""
name "Luka"
>Uh...rhg...\
name ""
>Just as she said, I can only feel one part of my body, my penis...@
>Completely unable to move, I can't even feel the rest of my body.\
name $name
>If I turned your penis to stone, I wouldn't be able to enjoy myself, you know?@
>Now, it's time to rape you!\
name ""
skillname "Lewd Snake's Vagina"
dwave 1,"se\ero_pyu4.ogg"
>Medusa steps over Luka's frozen body and drops down!@
>His penis is forced into her slimy vagina!
skillcount2 3408
mov %damage_kotei,1
damage 100,120
mov %kousoku,1:gosub *status_print
>Luka is being raped by Medusa!\
skillname ""
if %mylife=0 sub %stack,1:return *medusa_h5
name "Luka"
>Ahhhh!\
name ""
gosub *face2
name $name
>Haha, it's pretty pathetic being raped after being petrified, isn't it?@
>Now I'm going to ride you until you come. \
name ""
sub %stack,1
goto *medusa_a7



*medusa_a7

add %stack,1
>Luka's body has turned to stone...@
>Luka is being raped by Medusa...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll squeeze out your dirty semen like this!":mov $sel2,"Medusa's tight vagina clamps down around Luka!"
if %ransu=2 mov $sel1,"Haha... I'll tease the tip of your penis!":mov $sel2,"Medusa slowly bounces up and down on top of Luka!"
if %ransu=3 mov $sel1,"Come on... Come inside me!":mov $sel2,"Medusa grinds her hips against Luka!"
if %ransu=4 mov $sel1,"Here... If I tighten like this, you won't be able to endure it, will you!?":mov $sel2,"Medusa's vagina clamps down tightly around Luka!"
if %ransu=5 mov $sel1,"If I squeeze your tip like this...":mov $sel2,"Medusa slowly moves her hips in a circle as she squeezes on Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Lewd Snake's Vagina"
dwave 1,"se\ero_chupa4.ogg"
eng $sel2:$sel6
skillcount2 3408
mov %damage_kotei,1
damage 100,120
skillname ""
if %mylife=0 sub %stack,1:return *medusa_h6
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
goto *medusa_a7



*medusa_onedari

mov $list1,"Medusa's Hand"
if %3404>0 mov %list_num1,1
mov $list2,"Medusa's Mouth"
if %3405>0 mov %list_num2,1
mov $list3,"Medusa's Thighs"
if %3406>0 mov %list_num3,1
mov $list4,"Lewd Snake's Hair"
if %3407>0 mov %list_num4,1
mov $list5,"Lewd Snake's Vagina"
if %3408>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *medusa_onedari1
if %cmd1=12 goto *medusa_onedari2
if %cmd1=13 goto *medusa_onedari3
if %cmd1=14 goto *medusa_onedari4
if %cmd1=15 goto *medusa_onedari5
if %cmd1=-1 goto *medusa_main
goto *medusa_onedari



*medusa_onedari1

gosub *onedari_syori
name $name
>Haha... You want to come as my hand strokes you? \
name ""
gosub *medusa_a1
skip -1



*medusa_onedari2

gosub *onedari_syori
name $name
>Haha... You want to come as I suck on you? \
name ""
gosub *medusa_a2
skip -1



*medusa_onedari3

gosub *onedari_syori
name $name
>Haha... You want to come as I squeeze you between my thighs? \
name ""
gosub *medusa_a3
skip -1



*medusa_onedari4

gosub *onedari_syori
name $name
>Haha... You want to come as my snakes play with you? \
name ""
gosub *medusa_a4
skip -1



*medusa_onedari5

gosub *onedari_syori_k
name $name
>Haha... You want me to rape you? @
>Then first...\
name ""
if %status=0 gosub *medusa_a5
gosub *medusa_a6
skip -1



*medusa_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\medusa_bk02.bmp",218,0
gosub *syasei2
>As Medusa strokes his penis, Luka comes, covering her hand with semen.\
mov %viclose,1:gosub *lose
mov %2594,%2594+1:if %2594=1 mov %count_koenemy,%count_koenemy+1
if %2594>%count_most mov %count_most,%2594:mov $count_mostname,$name
count 5,5
mov $bad1,"Luka was forced to come by Medusa's handjob."
gosub *face2
name $name
>Aha, you came!@
>Your semen is so dirty!\
name ""
goto *medusa_h



*medusa_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\medusa_bk06.bmp",218,0
gosub *syasei2
>While being sucked by Medusa, Luka comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2594,%2594+1:if %2594=1 mov %count_koenemy,%count_koenemy+1
if %2594>%count_most mov %count_most,%2594:mov $count_mostname,$name
count 4,5
mov $bad1,"Luka was forced to come by Medusa's blowjob."
gosub *face2
name $name
>Aha, you came!@
>Your semen is so dirty!\
name ""
goto *medusa_h



*medusa_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\medusa_bk03.bmp",218,0
gosub *syasei2
>As Medusa squeezes his penis with her thighs, Luka comes, covering her thighs with semen.\
mov %viclose,1:gosub *lose
mov %2594,%2594+1:if %2594=1 mov %count_koenemy,%count_koenemy+1
if %2594>%count_most mov %count_most,%2594:mov $count_mostname,$name
count 3,5
mov $bad1,"Luka was forced to come by Medusa's intercrural sex."
gosub *face2
name $name
>Aha, you came!@
>Your semen is so dirty!\
name ""
goto *medusa_h



*medusa_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\medusa_bk05.bmp",218,0
gosub *syasei2
>As the snakes attack Luka's penis, he comes, covering her snake hair with semen.\
mov %viclose,1:gosub *lose
mov %2594,%2594+1:if %2594=1 mov %count_koenemy,%count_koenemy+1
if %2594>%count_most mov %count_most,%2594:mov $count_mostname,$name
count 22,5
mov $bad1,"Luka was forced to come by Medusa's snake hair."
gosub *face2
name $name
>Aha, you came!@
>Your semen is so dirty!\
name ""
goto *medusa_h



*medusa_h5

mov %ikigoe,3:gosub *ikigoe
name $name
>Hey, stop!@> It hasn't gotten good yet!\
name ""
gosub *syasei1
lsp 693,":a;chara\medusa_bk03.bmp",218,0
gosub *syasei2
>The moment Luka was forced into Medusa's slimy hole, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2594,%2594+1:if %2594=1 mov %count_koenemy,%count_koenemy+1
if %2594>%count_most mov %count_most,%2594:mov $count_mostname,$name
count 1,5
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come just from insertion."
gosub *face2
name $name
>Hahahahaha, you already came!?@
>Sooo fast! That's so pathetic!\
name ""
goto *medusa_h



*medusa_h6

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\medusa_bk03.bmp",218,0
gosub *syasei2
>Frozen and unable to stop her, Luka comes as Medusa rides him, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2594,%2594+1:if %2594=1 mov %count_koenemy,%count_koenemy+1
if %2594>%count_most mov %count_most,%2594:mov $count_mostname,$name
count 1,5
mov $bad1,"Luka was forced to come as Medusa raped him."
gosub *face2
name $name
>Haha... You shot your dirty semen inside me?\
name ""
goto *medusa_h



*medusa_h

mov $bad2,"After being satisfied, Medusa tosses him away."
if %2594=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Haaa...\
name ""
name $name
>Now then, it's time to feed...@
>I'll be feasting on all of your dirty semen.\
name ""
cspl 690,699
lsp 700,":a;chara\medusa_h1.bmp",0,0:print 10,500
>Medusa forces my penis between her giant breasts.@
>After I'm firmly between her breasts, snakes from her hair coil around the base of my penis.\
name "Luka"
>Ahh...\
name ""
>Her warm, soft breasts gently push against my penis from both sides.\
name $name
>Aren't my breasts nice and soft?@
>I'll use them to milk out your semen...\
name ""
>Saying that, she presses her breasts together around my penis.@
mov %hseanwave,17:hseanwave
>At the same time, the snakes coiling around my penis start to squirm around me.\
name "Luka"
>Ahhh!\
name ""
>The snakes slither around me, sometimes coiling and squeezing me.\
>As her breasts squeeze me and her snakes play with me, I feebly shake my waist.\
name $name
>I think I'll milk you once like this...@
>Now come on, cover my breasts with your semen.\
name ""
>Medusa grabs her breasts with her hands, and starts to move them up and down in opposite directions.\
>Up and down, her soft breasts toss my penis side to side with her movements.\
>At the same time, her snakes slither around the base of my penis, stimulating me.\
name "Luka"
>Ahh...\
name ""
>The smooth feeling of her snakes together with the soft pressure of her breasts is too much, bringing me to my limit after only a few moments.\
name $name
>You're at your limit, aren't you?@
>Now, come!\
name ""
>In a finishing blow, she squeezes her soft breasts together as hard as she can as the snakes move even faster around me.\
>Unable to fight against the pleasure, I push upwards into her, seeking more.@
>As soon as I do, the comfortable ache flows through my body as I reach an orgasm.\
gosub *syasei1
lsp 700,":a;chara\medusa_h2.bmp",0,0
gosub *syasei2
>Semen erupts from my penis, landing on Medusa's face and chest.@
>Sighing, I relax as the afterglow of the orgasm fills my body.\
name $name
>Haha, you let it out...@
>Now it's time for me to get a good taste of your seed...\
name ""
>Medusa's snake hair start to squirm and wriggle excitedly...@
lsp 700,":a;chara\medusa_h3.bmp",0,0:print 10,500
>Suddenly, all of their tongues extend at the same time!\
>All of their quick tongues shoot out and lick up the semen that landed both on my penis and on her body.@
>The quick licks on my sensitive penis overwhelm me, making me yell out as they lap up every drop.\
name "Luka"
>Ahhh!@>Ahhhh!!\
name ""
name $name
>Haha... What's with that pitiful reaction?@
>It's just a little licking.\
>Since you seem to love it so much... I'll use my hair to lick out your next ejaculation.\
name ""
>After the snakes finish licking up the semen, their tongues all switch to my penis.\
>Their quick tongues lick every inch of my penis as I writhe helplessly under her.\
name "Luka"
>Ah... Stop...! Ahh!\
name ""
name $name
>Hehe... I won't stop.@
>I'm going to make you come like this.\
name ""
>Medusa giggles as her snakes continue to attack me with their tongues.\
name "Luka"
>Ahhh...\
name ""
>Multiple tongues run around the tip of my penis, circling my urethral opening.@
>Others focus on the back of my penis, and others still wrap around my balls.\
>Overwhelmed by her hair, I'm quickly brought to the edge of another orgasm.\
name "Luka"
>Ahh... I'm going to come...\
name ""
name $name
>Haha, hurry up and come.@
>Let me see that pitiful ejaculation as my snakes lick you!\
name ""
>Medusa laughs as she squeezes her breasts together.\
name "Luka"
>Ahhhh!!\
name ""
>The snakes get even more intense, until they finally overpower my weak endurance.\
gosub *syasei1
lsp 700,":a;chara\medusa_h4.bmp",0,0
gosub *syasei2
name "Luka"
>Ahh...\
name ""
>The snakes go wild as my semen erupts, each of them licking up my semen as fast as they can.\
>I feebly struggle underneath her, unable to do anything against the stimulation.\
name "Luka"
>S...Stop already...\
name ""
name $name
>No. I want to bully you a lot...\
name ""
>From the base of my penis, a snake slowly coils around my penis.\
>It keeps wrapping around me until it reaches my tip.@
lsp 700,":a;chara\medusa_h5.bmp",0,0:print 10,500
>After coiling around my penis, the snake starts to vibrate.\
name "Luka"
>Ahh...!!\
name ""
>I raise my voice in a pleasure filled moan at the new stimulation being used.\
name $name
>My snake wrapped your penis...@
>How does it feel to have your tip licked while being coiled like that?\
>Coming while a snake plays with you is pretty pathetic, don't you think?\
name ""
>While the snake tightens around the rest of my penis, all of the other snake tongues start to focus only on my tip.\
>I tremble in pleasure filled agony as the innumerable snakes all lick me at once.\
name "Luka"
>Ahhhh!!\
name ""
>The snake around me gets even tighter as the tongues get even faster.\
>One tongue after another licks my urethral opening, giving me no rest from the constant stimulation.\
name "Luka"
>Ahh... I'm going to come...\
name ""
name $name
>Haha, coming as your important penis is being played with...@
>How miserable.\
name ""
name "Luka"
>Ahhh!\
name ""
>As Medusa laughs at me, I give in to the unbearable pleasure.\
gosub *syasei1
lsp 700,":a;chara\medusa_h6.bmp",0,0
gosub *syasei2
>Despite my shame at having an orgasm while she laughs at me, I can't stop myself.@
>Completely defeated by her, all strength fades from my body under the torture of her snake hair.\
name "Luka"
>Ah...aaa...\
name ""
name $name
>Haha, already down?@
>But I won't let you go with that much...\
>I won't stop until you've satisfied me...@
>You may die before that happens though.\
name ""
name "Luka"
>N...No way...\
name ""
>The torture of her hair continues, forcing me to ejaculate over and over again...@
>Unable to take it any longer, I faint...\
gosub *anten
mov %hseanwave,0:hseanwave
>Just like this, my semen is endlessly milked.@
>Once Medusa is satisfied, she leaves me alone in my weakened state.\
>After my mind and body have been destroyed like that, I can't fight against monsters anymore.@
>Due to that, I'm forced to abandon my quest...\
>...........\
goto *badend



*golem_start

mov $name,"Golem Girl"
mov $name2,"Golem Girl"
mov $lavel,"golem"
mov $tatie1,"golem_st01"
mov $tatie2,"golem_st01"
mov $tatie3,"golem_st01"
mov $tatie4,"golem_st01"
mov $haikei,"bg098"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,6000
if %nanido=2 mov %max_enemylife,7000
if %nanido=3 mov %max_enemylife,8000
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,80
mov %kaihi,99
mov %earth_keigen,50
if %nanido=3 mov %earth_keigen,25
mov %music,2
mov %tikei,2
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free from her hand!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"NO ESCAPE..."
mov $mogaku_sel2,"NO RESISTANCE..."
mov $mogaku_sel3,"CONTINUE ATTACK..."
mov $mogaku_sel4,"BATTLE DECIDED."
mov $mogaku_sel5,"ENEMY RESISTING."
mov $mogaku_dassyutu1,"...ENEMY ESCAPED..."
mov $mogaku_dassyutu2,""
mov $mogaku_earth_dassyutu1,"MYSTERIOUS ENERGY. UNKNOWN."
mov $mogaku_earth_dassyutu2,""
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-270
mov %tukix,320
mov %owaza_count1a,6
mov %owaza_count3a,2
name $name
>WARNING.@> NO AUTHORITY TO PASS.@
>RETURN.\
name ""
name "Luka"
>Wha... She's huge!@
>What is she!?\
name ""
>Her arm is bigger than my entire body...@
>What's a huge monster like this doing right next to the castle?\
lsp 700,":a;chara\golem_st01.bmp",160,0
lsp 698,":a;chara\alice_st91b.bmp",-160,0
lsp 699,":a;chara\alice_st01b.bmp",-160,0:print 10,500
name "Alice"
>Hmmm... I don't recognize this monster.\
name ""
name "Luka"
>A monster even the Monster Lord doesn't know...?@
>It can't be... Is it another monster like the one in the Forest of Spirits?\
name ""
name "Alice"
>No, her nature feels entirely different.@
>This one has the smell of magic about her.\
name ""
name "Luka"
>Magic...?@>Do you mean she was artificially made?\
name ""
cspl 698,699
lsp 700,":a;chara\golem_st01.bmp",0,0:print 10,500
name $name
>INTRUDER REMAINS.@>BEGIN REMOVAL.\
name ""
>As we calmly talk to each other, the giant monster attacks!@
>It looks like she's attacking Grangold castle...\
>I'm not going to retreat, so I have no choice but to fight!\
goto *common_main



*golem_v

gosub *face3
name $name
>REACTOR DAMAGED.@
>SHUTDOWN INITIATED.\
name ""
dwave 1,"se\earth1.ogg"
csp 700:print 10,500
>The Golem Girl falls to the ground, unmoving!\
mov %viclose,1:gosub *victory
mov %getexp,25000:gosub *lvup
mov %2295,1
goto *sean0203



*golem_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>ENEMY NONRESISTANCE CONFIRMED.\
name ""
gosub *golem_a4
goto *golem_a



*golem_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *golem_kousan
if %cmd1=16 goto *golem_onedari
if %cmd1=17 goto *common_skill
goto *golem_main



*golem_a

if %kousoku=1 rnd2 %ransu,1,3
if %kousoku=1 && %ransu=1 gosub *golem_a5:goto *common_main
if %kousoku=1 && %ransu=2 gosub *golem_a6:goto *common_main
if %kousoku=1 && %ransu=3 && %owaza_count3a>3 gosub *golem_a7:goto *common_main
if %kousoku=1 skip -4
rnd2 %ransu,1,6
if %ransu<4 gosub *golem_a1:goto *common_main
if %ransu=4 gosub *golem_a2:goto *common_main
if %ransu=5 gosub *golem_a3:goto *common_main
if %ransu=6 && %owaza_count1a>7 gosub *golem_a4:goto *common_main
skip -5



*golem_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,".........."
if %ransu=2 mov $sel1,"ENEMY BEHAVIOR ANALYZING..."
if %ransu=3 mov $sel1,"SELECTING ATTACK METHOD..."
name $name
eng $sel1:$sel6\
name ""
>The Golem Girl examines her surroundings!\
sub %stack,1
return



*golem_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"ATTACK EXECUTION."
if %ransu=2 mov $sel1,"ATTACK METHOD A SELECTED."
if %ransu=3 mov $sel1,"CRUSH ENEMY."
name $name
eng $sel1:$sel6\
name ""
skillname "Giant Hammer"
dwave 1,"se\karaburi.ogg"
>The Golem Girl's gigantic fist slams down on Luka!
if %wind=2 && %nanido<2 mov %wind_kakuritu,50
if %wind=2 && %nanido=2 mov %wind_kakuritu,40
if %wind=2 && %nanido=3 mov %wind_kakuritu,25
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
mov %a_effect1,1
if %nanido<2 damage 170,190
if %nanido=2 damage 190,210
if %nanido=3 damage 210,230
skillname ""
if %mylife=0 sub %stack,1:return *golem_h1
sub %stack,1
return



*golem_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"ATTACK EXECUTION."
if %ransu=2 mov $sel1,"ATTACK METHOD B SELECTED."
if %ransu=3 mov $sel1,"CRUSH ENEMY."
name $name
eng $sel1:$sel6\
name ""
skillname "Trample"
dwave 1,"se\karaburi.ogg"
>The Golem Girl's gigantic foot slams down on Luka!
if %wind=2 && %nanido<2 mov %wind_kakuritu,50
if %wind=2 && %nanido=2 mov %wind_kakuritu,40
if %wind=2 && %nanido=3 mov %wind_kakuritu,25
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
mov %a_effect1,1
if %nanido<2 damage 180,200
if %nanido=2 damage 200,220
if %nanido=3 damage 220,240
skillname ""
if %mylife=0 sub %stack,1:return *golem_h1
sub %stack,1
return



*golem_a4

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name $name
>CAPTURE ENEMY.\
name ""
skillname "Grab"
>The Golem Girl grabs Luka with her giant hand!
if %wind=2 && %nanido<2 mov %wind_kakuritu,50
if %wind=2 && %nanido=2 mov %wind_kakuritu,40
if %wind=2 && %nanido=3 mov %wind_kakuritu,25
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
if %nanido<2 damage 130,150
if %nanido=2 damage 150,170
if %nanido=3 damage 170,190
mov %kousoku,1:gosub *status_print
>The Golem Girl has caught Luka!\
skillname ""
if %mylife=0 sub %stack,1:return *golem_h2
if %kousan=2 sub %stack,1:return
gosub *face2
name $name
>CAPTURE SUCCESSFUL.\
name ""
if %earth=0 && %nanido<2 mov %genmogaku,3
if %earth=0 && %nanido=2 mov %genmogaku,3
if %earth=0 && %nanido=3 mov %genmogaku,4
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
sub %stack,1
return



*golem_a5

add %stack,1
>Luka is tightly held in the Golem Girl's grip...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"ENEMY CAPTURED. COMMENCE ATTACK."
if %ransu=2 mov $sel1,"HELPLESS ENEMY. COMMENCE CRUSHING."
if %ransu=3 mov $sel1,"ENEMY HELPLESS. CRUSH."
name $name
eng $sel1:$sel6\
name ""
skillname "Crush"
dwave 1,"se\ero_simetuke1.ogg"
>The Golem Girl squeezes Luka's body!@
>Luka is crushed inside her tight grip!
mov %a_effect1,1
if %nanido<2 damage 120,140
if %nanido=2 damage 140,160
if %nanido=3 damage 160,180
skillname ""
if %mylife=0 sub %stack,1:return *golem_h2
sub %stack,1
return



*golem_a6

add %stack,1
>Luka is tightly held in the Golem Girl's grip...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"ENEMY CAPTURED. COMMENCE PLEASURE ATTACK."
if %ransu=2 mov $sel1,"NEUTRALIZE ENEMY VIA PLEASURE."
if %ransu=3 mov $sel1,"ATTACK SEXUAL ORGANS. NEUTRALIZE ENEMY."
name $name
eng $sel1:$sel6\
name ""
skillname "Play"
dwave 1,"se\ero_paizuri.ogg"
>The Golem Girl plays with Luka's penis with a giant finger!
skillcount2 3409
if %nanido<2 damage 90,110
if %nanido=2 damage 110,130
if %nanido=3 damage 130,150
skillname ""
if %mylife=0 sub %stack,1:return *golem_h3
sub %stack,1
return



*golem_a7

add %stack,1
name $name
>ENEMY GENDER CONFIRMED.@
>POWER POTENTIAL ANALYZING...\
>CONFIRMED. VIABLE SOURCE.\
name ""
skillname "Power Supply"
dwave 1,"se\ero_chupa6.ogg"
>The Golem Girl forces Luka into a giant hole in her lower body!
if %wind=2 && %nanido<2 mov %wind_kakuritu,100
if %wind=2 && %nanido=2 mov %wind_kakuritu,100
if %wind=2 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
lsp 700,":a;chara\golem_h2.bmp",0,0:print 10,500
skillcount2 3410
mov %damage_kotei,1
damage 150,180
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *golem_h4
name "Luka"
>Ahhh...!\
name ""
>Luka is stuck into a fleshy part of the Golem Girl's body!@
>He's slowly sucked deeper inside her!\
sub %stack,1
goto *golem_a8



*golem_a8

add %stack,1
>Luka is stuck in the Golem Girl's hole...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"PLEASURE FOR POWER.":mov $sel2,"Her fleshy meat stimulates Luka's penis!"
if %ransu=2 mov $sel1,"CONTINUE POWER ABSORPTION.":mov $sel2,"Luka's energy is absorbed!"
if %ransu=3 mov $sel1,"INCREASE STIMULATION.":mov $sel2,"The fleshy meat tightens around Luka!"
if %ransu=4 mov $sel1,"STIMULATE FOR POWER SUPPLY.":mov $sel2,"The Golem Girl's flesh starts to wriggle around Luka!"
if %ransu=5 mov $sel1,"REPLENISHING POWER SUPPLY...":mov $sel2,"A powerful sucking force sucks on Luka's body!"
name $name
eng $sel1:$sel6\
name ""
skillname "Power Supply"
dwave 1,"se\ero_chupa6.ogg"
eng $sel2:$sel6
skillcount2 3410
mov %damage_kotei,1
damage 150,180
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *golem_h4
sub %stack,1
goto *golem_a8



*golem_onedari

mov $list1,"Play"
if %3409>0 mov %list_num1,1
mov $list2,"Power Supply"
if %3410>0 mov %list_num2,1
gosub *cmd_onedari
if %cmd1=11 goto *golem_onedari1
if %cmd1=12 goto *golem_onedari2
if %cmd1=-1 goto *golem_main
goto *golem_onedari



*golem_onedari1

gosub *onedari_syori_k
name $name
>ENEMY NONRESISTANCE CONFIRMED.\
name ""
if %kousoku=0 gosub *golem_a4
gosub *golem_a6
skip -1



*golem_onedari2

gosub *onedari_syori_k
name $name
>ENEMY NONRESISTANCE CONFIRMED.\
name ""
if %kousoku=0 gosub *golem_a4
gosub *golem_a7
skip -1



*golem_h1

name "Luka"
>Ahhg...\
name ""
>Taking too much damage, Luka is brought to his knees.\
dwave 1,"se\down.ogg"
>Collapsing on the ground, Luka is left unable to fight.\
mov %viclose,2:gosub *lose
mov %2595,%2595+1:if %2595=1 mov %count_koenemy,%count_koenemy+1
if %2595>%count_most mov %count_most,%2595:mov $count_mostname,$name
count 14,4
mov $bad1,"Luka was brought to his knees by the Golem Girl's physical attacks."
name $name
>ENEMY NONRESISTANCE CONFIRMED.\
name ""
goto *golem_h



*golem_h2

name "Luka"
>Ahg... Urhg...\
name ""
>Tightly grasped in her fist, Luka takes too much damage to continue fighting.\
mov %viclose,2:gosub *lose
mov %2595,%2595+1:if %2595=1 mov %count_koenemy,%count_koenemy+1
if %2595>%count_most mov %count_most,%2595:mov $count_mostname,$name
count 14,4
mov $bad1,"Luka was defeated by the Golem Girl's physical attacks."
name $name
>ENEMY NONRESISTANCE CONFIRMED.\
name ""
goto *golem_h



*golem_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\golem_bk02.bmp",0,0
gosub *syasei2
>As the Golem Girl plays with Luka with her giant finger, Luka is forced to come.\
mov %viclose,1:gosub *lose
mov %2595,%2595+1:if %2595=1 mov %count_koenemy,%count_koenemy+1
if %2595>%count_most mov %count_most,%2595:mov $count_mostname,$name
count 5,4
mov $bad1,"Luka was forced to orgasm by the Golem Girl's giant finger."
name $name
>ENEMY NONRESISTANCE CONFIRMED.\
name ""
goto *golem_h



*golem_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\golem_h3.bmp",0,0
gosub *syasei2
>Stuck inside the Golem Girl's body, Luka is forced to come, spraying out his semen inside her.\
mov %viclose,1:gosub *lose
mov %2595,%2595+1:if %2595=1 mov %count_koenemy,%count_koenemy+1
if %2595>%count_most mov %count_most,%2595:mov $count_mostname,$name
count 2,4
mov $bad1,"Inserted into the Golem Girl as a power supply, Luka's semen is squeezed out."
name $name
>ENEMY NONRESISTANCE CONFIRMED.\
name ""
goto *golem_h



*golem_h

mov $bad2,"Squeezed dry inside the synthetic monster, Luka's semen is used as a power supply."
if %2595=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
gosub *anten
>Beaten by the Golem Girl, I faint.\
>..............\
monocro off
bg "bg\bg161.bmp",10,3000
name "Luka"
>Urhg... Where am I...?\
name ""
>I wake up in a huge place that looks like a laboratory.\
>All around the walls are various machines and magic devices.@
>In the middle of all of them is a woman that looks like a magician, working away.\
lsp 700,":a;chara\mob_madou.bmp",0,0:print 10,500
name "Magic Engineer"
>It looks like you've awoken, little Hero.@
>This is the Grangold Research Laboratory.\
>Thanks to you, I have to do unnecessary maintenance on the Golem Girl.@
>Sheesh, making me waste my time...\
name ""
>I look around, and see more Golem Girls around me...@
>Could it be that they're made here?\
name "Magic Engineer"
>So because of that, I'll have to squeeze energy for the Golem Girl out of you.@
>We need an energy supply quicker than usual, so we haven't been able to prepare a man.\
name ""
name "Luka"
>Eh...?@> Uwa!\
name ""
>Suddenly, the Golem Girl's huge arm reaches out and grabs me.@
>She quickly brings me up right next to her lower body.\
cspl 690,699
lsp 700,":a;chara\golem_h1.bmp",0,0:print 10,500
>In there, a giant vagina opens up.@
>In contrast to her rocky body, the bright pink meat clearly looks like a human female's.\
>A huge vagina, with an opening as big as my body...\
name "Luka"
>Ahh...\
name ""
name "Magic Engineer"
>That's a synthetic semen sucking container.@
>It's designed to extract a male's semen and use it as a power source.\
>Since the man always ends up dying, we use it as a method to both power our Golem Girls and to execute condemned criminals.\
>But that's something confidential that even the King isn't aware of. Hehe.\
name ""
name "Luka"
>S...Stop...!@
>Please, stop!\
name ""
>I struggle as hard as I can, but I can't break free of her grip.\
name "Luka"
>Ahhhhh!!\
name ""
mov %hseanwave,21:hseanwave
lsp 700,":a;chara\golem_h2.bmp",0,0:print 10,500
>With a loud squishing noise, she forces my lower body into her gaping hole.\
>Her soft flesh wraps around my body, gently wrapping my entire lower body inside her.\
>As soon as I'm firmly inserted into her, the soft flesh starts to wriggle and vibrate all around me.\
name "Magic Engineer"
>How does it feel? Good, right?@
>We designed it to give unrivaled pleasure to the man.\
>No matter the man, they are all forced to come.@
>It's the final reward for the criminal before they die, hehe.\
name ""
name "Luka"
>Ahhh...\
name ""
>After only a few seconds inside of her, my penis reacts, growing larger.@
>Stuck inside of her, my erect penis pushes into her soft wall.\
>Pushing into the soft flesh inside of her, my penis is tossed side to side as her giant hole wriggles and tightens around my entire body.\
>This synthetic hole designed to do nothing but force a man to come...@
>Unable to take it for even a few moments, I quickly ejaculate inside her giant hole.\
name "Luka"
>Haa... Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\golem_h3.bmp",0,0
gosub *syasei2
>I quickly explode inside of her, filling her giant hole with my semen.\
>Just as it was designed for, it extracted my semen in mere moments...\
name "Luka"
>Ahh...\
name ""
>I feel incredibly weak after my orgasm.@
>It's as if I shot out not only my semen, but my power as well...\
name "Magic Engineer"
>Hehe, you already ejaculated?@
>Just like that, the rest of your semen will be squeezed out as well.\
>All that remains is your execution by the Golem Girl's semen sucking container.\
>It's a pretty miserable way to go, isn't it?@
>Golem Girl, squeeze this man dry!\
name ""
mov %hseanwave,22:hseanwave
lsp 700,":a;chara\golem_h4.bmp",0,0:print 10,500
>Reacting to her order, the Golem Girl sucks me deeper inside her body.\
name "Luka"
>Nnnnn!!\
name ""
>Wrapped in her soft, wriggling flesh, I relax in pleasure.@
>The same soft pleasure attacks my penis, bringing me to another quick orgasm.\
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\golem_h5.bmp",0,0
gosub *syasei2
>Exploding inside her, more of my semen and life are absorbed by the Golem Girl.@
>Every ejaculation is draining my life itself...\
name "Magic Engineer"
>Hehehe... How does it feel being sucked like that?@
>Are you happy at meeting your end like this?\
name ""
name "Luka"
>Haaa...\
name ""
>The realization dawns on me as I relax in the afterglow of my orgasm.@
>I'm going to die inside of her vagina...\
>As soon as I was forced into her body, my fate was sealed...\
name "Luka"
>Ahhh!!\
name ""
>Stuck inside her warm vagina, my thoughts stop.@
>Unable to think of anything, even the fear, I indulge myself in the pleasure.\
name "Luka"
>Ahhh... That feels good...\
name ""
gosub *syasei1:gosub *syasei2
>I come, and more of my energy is absorbed.@
>The feeling of relaxation gets even more powerful.\
name "Magic Engineer"
>Are you almost out of energy?@
>Until your last moments, enjoy the pleasure...\
name ""
name "Luka"
>Ahhh...!!\
name ""
gosub *syasei1:gosub *syasei2
>Stuck in her wriggling flesh, my energy is absorbed without mercy.@
>Drained by the synthetic monster, the last of my energy is squeezed out.\
gosub *syasei1:gosub *syasei2
name "Luka"
>...A...aa...\
name ""
name "Magic Engineer"
>It looks like you're out of energy.@
>Thanks for your contribution. Now please die.\
name ""
name "Luka"
>Aa....\
>...............\
name ""
>Thus, all of Luka's energy was drained by the synthetic monster.@
>His life itself was traded for the highest pleasure.\
gosub *anten
mov %hseanwave,0:hseanwave
>............\
goto *badend



*madgolem_start

mov $name,"Mud Golem Girl"
mov $name2,"Mud Golem Girl"
mov $lavel,"madgolem"
mov $tatie1,"madgolem_st01"
mov $tatie2,"madgolem_st01"
mov $tatie3,"madgolem_st01"
mov $tatie4,"madgolem_st01"
mov $haikei,"bg100"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,3200
if %nanido=2 mov %max_enemylife,3500
if %nanido=3 mov %max_enemylife,3800
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,99
mov %earth_keigen,40
if %nanido=3 mov %earth_keigen,20
mov %music,1
mov %tikei,5
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't escape from her mud!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"ESCAPE IS IMPOSSIBLE..."
mov $mogaku_sel2,"MALE RESISTANCE CONFIRMED. INCREASING STRENGTH..."
mov $mogaku_sel3,"MALE RESISTANCE CONFIRMED. INCREASING STRENGTH..."
mov $mogaku_sel4,"MALE RESISTANCE CONFIRMED. INCREASING STRENGTH..."
mov $mogaku_sel5,"MALE RESISTING. INCREASE PRESSURE."
mov $mogaku_dassyutu1,"MALE ESCAPE CONFIRMED."
mov $mogaku_dassyutu2,"ATTEMPT AGAIN."
mov $mogaku_earth_dassyutu1,"MALE ESCAPE CONFIRMED."
mov $mogaku_earth_dassyutu2,"ATTEMPT AGAIN."
mov $half_s1,"MALE FLUID CONFIRMED."
mov $half_s2,"CONTINUE STIMULATION."
mov $kiki_s1,"MALE LIMITS CONFIRMED."
mov $kiki_s2,"CONTINUE STIMULATION."
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-330
mov %tukix,320
mov %owaza_count1a,4
mov %owaza_count3a,4
name $name
>ERROR CODE 412.@>ENERGY LOW.@
>MALE CONFIRMED.@>BEGIN SEMEN COLLECTION.\
name ""
name "Luka"
>She's gone berserk...\
name ""
>I take out my sword as I take my stance in front of the Mud Golem Girl.@
>If I want to reach the castle, I'll have to get past her first...\
goto *common_main



*madgolem_v

gosub *face3
name $name
>OPERATIONS HALTED.\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Mud Golem Girl collapses in a lump of mud!\
mov %viclose,1:gosub *victory
mov %getexp,15000:gosub *lvup
mov %2296,1
goto *sean0211



*madgolem_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>SURRENDER CONFIRMED.@
>CARRY OUT SEMEN EXTRACTION.\
name ""
goto *madgolem_a



*madgolem_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *madgolem_kousan
if %cmd1=16 goto *madgolem_onedari
if %cmd1=17 goto *common_skill
goto *madgolem_main



*madgolem_a

rnd2 %ransu,1,3
if %ransu=1 gosub *madgolem_a1:goto *common_main
if %ransu=2 gosub *madgolem_a2:goto *common_main
if %ransu=3 && %kousoku=0 && %owaza_count1a>5 gosub *madgolem_a3:goto *common_main
if %ransu=3 && %kousoku=1 && %hanyo1=1 && %owaza_count3a>5 gosub *madgolem_a4:goto *common_main
skip -5



*madgolem_a1

add %stack,1
if %kousoku=0 skip 2
>Luka is stuck in the Mud Golem Girl's body!\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"COVER MALE."
if %ransu=2 mov $sel1,"STIMULATE ENTIRE MALE BODY."
if %ransu=3 mov $sel1,"USE BODY TO REDUCE MALE FIGHTING POWER."
name $name
eng $sel1:$sel6\
name ""
skillname "Mud Spread"
dwave 1,"se\ero_makituki2.ogg"
>The Mud Golem Girl spreads her mud all over Luka's body!
if %kousoku=1 skip 4
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
if %nanido<2 damage 85,95
if %nanido=2 damage 105,115
if %nanido=3 damage 125,135
skillcount2 3411
skillname ""
if %mylife=0 sub %stack,1:return *madgolem_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
mov %hanyo1,1
sub %stack,1
return



*madgolem_a2

add %stack,1
if %kousoku=0 skip 2
>Luka is stuck in the Mud Golem Girl's body!\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"STIMULATE GENITALS FOR FLUIDS."
if %ransu=2 mov $sel1,"STIMULATE GENITALS."
if %ransu=3 mov $sel1,"FOCUS ON GENITALS."
name $name
eng $sel1:$sel6\
name ""
skillname "Mud Draw"
dwave 1,"se\ero_slime1.ogg"
>The Mud Golem Girl grabs Luka's penis, rubbing her mud all over him!
if %kousoku=1 skip 4
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3412
if %nanido<2 damage 90,100
if %nanido=2 damage 110,120
if %nanido=3 damage 130,140
skillname ""
if %mylife=0 sub %stack,1:return *madgolem_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
mov %hanyo1,1
sub %stack,1
return



*madgolem_a3

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name $name
>BIND THE MAN.\
name ""
skillname "Mud Hold"
dwave 1,"se\ero_slime3.ogg"
lsp 690,":a;chara\madgolem_ct01.bmp",0,0:print 10,500
>The Mud Golem Girl leans on Luka, covering him with mud!
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu
if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
if %nanido<2 damage 90,100
if %nanido=2 damage 110,120
if %nanido=3 damage 130,140
mov %kousoku,1:gosub *status_print
>Luka is stuck in the Mud Golem Girl's body!\
skillname ""
if %mylife=0 sub %stack,1:return *madgolem_h3
if %kousan=2 sub %stack,1:return
name $name
>WHILE BOUND, STIMULATE.\
name ""
if %earth=0 && %nanido<2 mov %genmogaku,2
if %earth=0 && %nanido=2 mov %genmogaku,3
if %earth=0 && %nanido=3 mov %genmogaku,4
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
mov %hanyo1,0
sub %stack,1
return



*madgolem_a4

add %stack,1
>Luka is stuck in the Mud Golem Girl's body!\
name $name
>PERFORM SPECIAL FUNCTION.@
>EXTRACT MALE SEMEN.\
name ""
skillname "Mud Shake"
dwave 1,"se\ero_makituki3.ogg"
>The mud all over Luka's body starts to move!\
>As if stuck in a whirlpool of mud, her body swirls around Luka's!
skillcount2 3413
mov %damage_kotei,1
damage 130,150
skillname ""
if %mylife=0 sub %stack,1:return *madgolem_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
goto *madgolem_a5



*madgolem_a5

add %stack,1
>Luka is stuck in the Mud Golem Girl's body!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"SPIN TO EXTRACT.":mov $sel2,"The whirlpool of mud swirls around Luka!"
if %ransu=2 mov $sel1,"CENTRALIZE VORTEX ON MALE PENIS.":mov $sel2,"The whirlpool of mud around Luka's penis spins even faster!"
if %ransu=3 mov $sel1,"INCREASE PRESSURE.":mov $sel2,"The mud increases in pressure around Luka!"
if %ransu=4 mov $sel1,"INCREASE STIMULATION.":mov $sel2,"The mud flows around Luka's body!"
if %ransu=5 mov $sel1,"STIMULATION SET TO MAXIMUM.":mov $sel2,"The mud sticks to Luka's body as it swirls around, stimulating him all over!"
name $name
eng $sel1:$sel6\
name ""
skillname "Mud Shake"
dwave 1,"se\ero_makituki3.ogg"
eng $sel2:$sel6
skillcount2 3413
mov %damage_kotei,1
damage 130,150
skillname ""
if %mylife=0 sub %stack,1:return *madgolem_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
goto *madgolem_a5



*madgolem_onedari

mov $list1,"Mud Spread"
if %3411>0 mov %list_num1,1
mov $list2,"Mud Draw"
if %3412>0 mov %list_num2,1
mov $list3,"Mud Shake"
if %3413>0 mov %list_num3,1
gosub *cmd_onedari
if %cmd1=11 goto *madgolem_onedari1
if %cmd1=12 goto *madgolem_onedari2
if %cmd1=13 goto *madgolem_onedari3
if %cmd1=-1 goto *madgolem_main
goto *madgolem_onedari



*madgolem_onedari1

gosub *onedari_syori_k
name $name
>SURRENDER CONFIRMED.@
>CARRY OUT SEMEN EXTRACTION.\
name ""
if %kousoku=0 gosub *madgolem_a3
gosub *madgolem_a1
skip -1



*madgolem_onedari2

gosub *onedari_syori_k
name $name
>SURRENDER CONFIRMED.@
>CARRY OUT SEMEN EXTRACTION.\
name ""
if %kousoku=0 gosub *madgolem_a3
gosub *madgolem_a2
skip -1



*madgolem_onedari3

gosub *onedari_syori_k
name $name
>SURRENDER CONFIRMED.@
>CARRY OUT SEMEN EXTRACTION.\
name ""
if %kousoku=0 gosub *madgolem_a3
gosub *madgolem_a4
skip -1



*madgolem_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\madgolem_bk01.bmp",0,0
gosub *syasei2
>As the soft mud rubs all over his body, Luka comes, covering the Mud Golem Girl in semen.\
mov %viclose,1:gosub *lose
mov %2596,%2596+1:if %2596=1 mov %count_koenemy,%count_koenemy+1
if %2596>%count_most mov %count_most,%2596:mov $count_mostname,$name
count 11,3
mov $bad1,"Luka was forced to come as the Mud Golem Girl's mud covered his body."
gosub *face2
name $name
>MALE EJACULATION CONFIRMED.\
name ""
goto *madgolem_h



*madgolem_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\madgolem_bk01.bmp",0,0
gosub *syasei2
>As the soft mud wraps around his penis, Luka comes, covering the Mud Golem Girl in semen.\
mov %viclose,1:gosub *lose
mov %2596,%2596+1:if %2596=1 mov %count_koenemy,%count_koenemy+1
if %2596>%count_most mov %count_most,%2596:mov $count_mostname,$name
count 11,3
mov $bad1,"Luka was forced to come as the Mud Golem Girl's mud covered his penis."
gosub *face2
name $name
>MALE EJACULATION CONFIRMED.\
name ""
goto *madgolem_h



*madgolem_h3

mov %ikigoe,3:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\madgolem_ct02.bmp",0,0
lsp 691,":a;chara\madgolem_bk01.bmp",0,0
gosub *syasei2
>As the Mud Golem Girl's mud body wraps around Luka, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2596,%2596+1:if %2596=1 mov %count_koenemy,%count_koenemy+1
if %2596>%count_most mov %count_most,%2596:mov $count_mostname,$name
count 11,3
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to an orgasm right as the Mud Golem Girl wrapped his body in her own."
gosub *face2
name $name
>UNEXPECTED EJACULATION CONFIRMED.@>PREMATURE EJACULATOR SWITCH SET TO TRUE.\
name ""
goto *madgolem_h



*madgolem_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\madgolem_ct02.bmp",0,0
lsp 691,":a;chara\madgolem_bk01.bmp",0,0
gosub *syasei2
>As the mud swirls around his body, Luka comes, filling the Mud Golem Girl with semen.\
mov %viclose,1:gosub *lose
mov %2596,%2596+1:if %2596=1 mov %count_koenemy,%count_koenemy+1
if %2596>%count_most mov %count_most,%2596:mov $count_mostname,$name
count 11,3
mov $bad1,"Luka was forced to an orgasm while stuck in the Mud Golem Girl's body."
gosub *face2
name $name
>MALE EJACULATION CONFIRMED.\
name ""
goto *madgolem_h



*madgolem_h

mov $bad2,"Caught inside her mud body, Luka's semen is squeezed endlessly."
if %2596=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,21:hseanwave:goto *madgolem_hb
name "Luka"
>Ahh...\
name ""
name $name
>MAN UNABLE TO RESIST.@
>USE AS ENERGY SUPPLY.\
name ""
>The Mud Golem Girl's huge body looms over mine, too exhausted to move away.@
mov %hseanwave,21:hseanwave
lsp 690,":a;chara\madgolem_ct01.bmp",0,0:print 10,500
>Her soft mud body sucks me inside!\
goto *madgolem_hb



*madgolem_hb

name "Luka"
>Ahhh...\
name ""
>Her thick mud body absorbs me inside, leaving me unable to move inside her.\
name $name
>WRAP PENIS.\
name ""
>The mud wraps around my penis, making me shiver in surprise.\
name "Luka"
>Ahh... What's this...?\
name ""
>My sensitive penis sinks into her mud, as if it was being sucked into a soft, tight hole.\
name "Luka"
>It feels so weird...@
>Ahhh!\
name ""
>The surprisingly warm mud squirms and wriggles around me as if it was a living creature.\
>I try to pull my waist back to escape from the sudden sensation, but...\
name $name
>LOCK ENERGY SUPPLIER IN PLACE.@
>DISALLOW MOVEMENTS UNTIL ENERGY EXTRACTED.\
name ""
>Her muddy body tightly presses around me on all sides, locking me in place.\
>Encased in her body and unable to move, her flowing mud attacks my penis with no way for me to stop it.\
name "Luka"
>Ahh... Stop...\
name ""
name $name
>CONTINUE SEMEN EXTRACTION.\
name ""
>I gasp inside her body as the strange stimulation runs over me.@
>My strength slowly leaves my body as the pleasant feelings inside her swampy body fill me.\
name $name
>PRE-COME CONFIRMED.@
>INCREASE STIMULATION.\
name ""
>The mud changes its movements around my penis, taking a more solid form.\
>Forming a tight tube around my penis, the mud moves back and forth quickly as it slowly rotates, forcing me over the edge in an instant.\
name "Luka"
>Ahh... Amazing...@
>Ahhh!\
name ""
>I let out a yell as the sudden stimulation overpowers the last of my resistance.\
gosub *syasei1
lsp 691,":a;chara\madgolem_bk01.bmp",0,0
lsp 690,":a;chara\madgolem_ct02.bmp",0,0
gosub *syasei2
name "Luka"
>Ahh...\
name ""
>I explode inside her warm body, filling her mud with my semen.@
>As the comfortable feelings of release fill me, I relax inside her warm body.\
name $name
>...SEMEN RELEASE CONFIRMED.@
>CONTINUE EXTRACTION UNTIL TANK FULL.\
name ""
name "Luka"
>Ah!@>Ahhhh!!\
name ""
>The mud around my penis gets even quicker, increasing its rotations and pumping movements.\
>I helplessly shake my hips, unable to escape from the pleasure.\
name "Luka"
>Stop... Ahhhh!!\
name ""
>But her body doesn't let me do anything.@
>The Mud Golem Girl must have been designed to force the man to come no matter what...\
name "Luka"
>N...No... I'm going to come again... !@
>Ahhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\madgolem_ct03.bmp",0,0
gosub *syasei2
>My semen pours into her mud body again.@
>But even as I ejaculate, her mud doesn't stop.\
>Assaulted inside her body, I can't even see what's happening outside...\
name $name
>EJACULATION CONFIRMED.@> CONTINUE.\
name ""
name "Luka"
>Haaaa!\
name ""
>Her movements get even more intense after my last ejaculation.@
>Every ejaculation just gives her more power, which she uses to squeeze more semen out...\
>I'm nothing but a power source for this man made monster...\
name "Luka"
>S...Stop... Stop it already...\
name ""
gosub *syasei1:gosub *syasei2
>No matter how many times I ejaculate, she doesn't stop.@
>Trapped in her thick muddy body, I can only yell and orgasm.\
name $name
>CONTINUE POWER REPLENISHMENT.\
name ""
name "Luka"
>Ah... Ahhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\madgolem_ct04.bmp",0,0
gosub *syasei2
>I come over and over again...@
>I can barely even keep my eyes open, but she still continues...\
gosub *syasei1:gosub *syasei2
name $name
>ENERGY TANK NOT FULL.@
>CONTINUE EXTRACTION.\
name ""
name "Luka"
>Ah...a...\
name ""
>When is she going to free me...?@
>Or am I going to be stuck like this until I die?\
>I sob inside her body as she continues to squeeze out my semen...\
gosub *anten
mov %hseanwave,0:hseanwave
>................\
goto *badend



*artm_start

mov $name,"Automata Girl"
mov $name2,"Automata Girl"
mov $lavel,"artm"
mov $tatie1,"artm_st01"
mov $tatie2,"artm_st01"
mov $tatie3,"artm_st03"
mov $tatie4,"artm_st01"
mov $haikei,"bg100"
mov %monster_x,167
mov %monster_y,0
if %nanido=1 mov %max_enemylife,3000
if %nanido=2 mov %max_enemylife,4000
if %nanido=3 mov %max_enemylife,5000
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %music,1
mov %tikei,5
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"I must service you..."
mov $mogaku_sel2,"Please do not struggle so."
mov $mogaku_sel3,"Please do not struggle as I service you."
mov $mogaku_sel4,"Please leave everything to me."
mov $mogaku_sel5,"Don't struggle as I service you."
mov $mogaku_dassyutu1,"Restriction was forcibly removed."
mov $mogaku_dassyutu2,"Attempt to restrict again."
mov $mogaku_earth_dassyutu1,"Restriction was forcibly removed."
mov $mogaku_earth_dassyutu2,"Unexpected power..."
mov $half_s1,"Is it good, Master?"
mov $half_s2,"Please enjoy my service."
mov $kiki_s1,"Moments before ejaculation confirmed."
mov $kiki_s2,"Allow me to finish you off, Master."
mov %end_n,2
mov %exp_minus,15000
mov %zmonster_x,-100
mov %tukix,320
mov %owaza_count1a,4
mov %owaza_count2a,4
mov %owaza_count3a,2
name $name
>Welcome, honored guest.@
>Are you here for my services?\
name ""
name "Luka"
>"Welcome"...?\
name ""
>She rushed out of the inn and is blocking me... What does she mean "Welcome"?\
name $name
>Understood. Please enjoy the highest possible pleasure.@
>Ejaculation counter set to 300,000 times.\
>I shall begin my service.\
name ""
>I look into the inn, and see lots of men collapsed on the floor, naked from the stomach down.\
>All of them are passed out, exhausted.@
>It must have been this Automata Girl...\
name $name
>I shall begin my service.@
>Service begins.\
>Begin service.@
>My service...\
name ""
name "Luka"
>...She's broken too!\
name ""
goto *common_main



*artm_v

gosub *face3
name $name
>Master... Why...?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Automata Girl collapses on the ground, unmoving!\
mov %viclose,1:gosub *victory
mov %getexp,16000:gosub *lvup
mov %2297,1
goto *sean0212



*artm_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>Continue service...\
name ""
goto *artm_a



*artm_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *artm_kousan
if %cmd1=16 goto *artm_onedari
if %cmd1=17 goto *common_skill
goto *artm_main



*artm_a

if %kousoku=1 && %status=1 && %owaza_count3a>3 gosub *artm_a9:goto *common_main
if %kousoku=1 && %hanyo1=1 gosub *artm_a6:goto *common_main
if %kousoku=1 rnd2 %ransu,1,4
if %kousoku=1 && %ransu=1 gosub *artm_a6:goto *common_main
if %kousoku=1 && %ransu=2 gosub *artm_a7:goto *common_main
if %kousoku=1 && %ransu=3 gosub *artm_a8:goto *common_main
if %kousoku=1 && %ransu=4 && %owaza_count3a>3 gosub *artm_a9:goto *common_main
if %kousoku=1 skip -5
rnd2 %ransu,1,5
if %ransu=1 gosub *artm_a1:goto *common_main
if %ransu=2 gosub *artm_a2:goto *common_main
if %ransu=3 gosub *artm_a3:goto *common_main
if %ransu=4 && %owaza_count2a>5 && %status=0 gosub *artm_a4:goto *common_main
if %ransu=5 && %owaza_count1a>5 gosub *artm_a5:goto *common_main
skip -6



*artm_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Program number 1 selected. Hand program."
if %ransu=2 mov $sel1,"Hand mode selected."
if %ransu=3 mov $sel1,"How is my hand service, Master?"
name $name
eng $sel1:$sel6\
name ""
skillname "Mechanical Handjob"
dwave 1,"se\ero_koki1.ogg"
>The Automata Girl grabs Luka's penis, and skillfully services him!
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu
if %wind_guard_on=0 lsp 690,":a;chara\artm_ct01.bmp",172,0:print 10,500
if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3414
if %nanido<2 damage 75,85
if %nanido=2 damage 85,95
if %nanido=3 damage 95,105
skillname ""
if %mylife=0 sub %stack,1:return *artm_h1
if %kousan<2 csp 690:gosub *face1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*artm_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Program number 2 selected. Mouth routine."
if %ransu=2 mov $sel1,"Please insert into mouth."
if %ransu=3 mov $sel1,"I shall suck on you now, Master."
name $name
eng $sel1:$sel6\
name ""
skillname "Mechanical Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>The Automata Girl slowly sucks on Luka's penis!
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
>Her skillful tongue runs all over Luka's penis!\
skillcount2 3415
if %nanido<2 damage 80,90
if %nanido=2 damage 90,100
if %nanido=3 damage 100,110
skillname ""
if %mylife=0 sub %stack,1:return *artm_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*artm_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Program number 3 selected. Chest use."
if %ransu=2 mov $sel1,"Please cover my chest in semen, Master."
if %ransu=3 mov $sel1,"My breast material has been constructed of the softest available textures."
name $name
eng $sel1:$sel6\
name ""
skillname "Mechanical Breast Service"
dwave 1,"se\ero_paizuri.ogg"
>The Automata Girl squeezes Luka's penis between her breasts!
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3416
if %nanido<2 damage 85,95
if %nanido=2 damage 95,105
if %nanido=3 damage 105,115
skillname ""
if %mylife=0 sub %stack,1:return *artm_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*artm_a4

add %stack,1
mov %owaza_count2a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Special service number 3. I shall wash your penis, Master."
if %ransu=2 mov $sel1,"Since Master ordered it, I shall wash his penis."
if %ransu=3 mov $sel1,"Washing penis... Use bubbles to maximize cleanliness."
name $name
eng $sel1:$sel6\
name ""
skillname "Bubble Service Trance"
dwave 1,"se\ero_koki1.ogg"
lsp 690,":a;chara\artm_ct11.bmp",172,0:print 10,500
eng "Bubbles come out from the Automata Girl's hands as she grabs Luka's penis!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,100
if %wind=2 && %nanido=2 mov %wind_kakuritu,90
if %wind=2 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu
if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
lsp 690,":a;chara\artm_ct12.bmp",172,0:print 10,500
\
>She skillfully washes Luka's penis!
skillcount2 3417
if %nanido<2 damage 75,85
if %nanido=2 damage 85,95
if %nanido=3 damage 95,105
mov %status,1
mov %bougyo,0
lsp 598,":a;system\face_01.bmp",34,534:print 10,500
>The smell of the bubbles puts Luka into a trance!\
skillname ""
if %mylife=0 sub %stack,1:return *artm_h4
if %kousan=2 sub %stack,1:return
name "Luka"
>Haa...\
name ""
name $name
>Are you in a trance, Master?@
>Allow me to continue my service.\
name ""
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,2,3
if %nanido=3 rnd2 %status_turn,3,4
if %kousan<2 csp 690:gosub *face1
sub %stack,1
return



*artm_a4b

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"It must be washed thoroughly..."
if %ransu=2 mov $sel1,"Order executed."
if %ransu=3 mov $sel1,"By Master's order, continue washing..."
name $name
eng $sel1:$sel6\
name ""
skillname "Bubble Service Trance"
dwave 1,"se\ero_koki1.ogg"
lsp 690,":a;chara\artm_ct12.bmp",172,0:print 10,500
>The Automata Girl carefully focuses on Luka's penis as she washes him!
skillcount2 3417
if %nanido<2 damage 75,85
if %nanido=2 damage 85,95
if %nanido=3 damage 95,105
skillname ""
if %mylife=0 sub %stack,1:return *artm_h4
sub %stack,1
return



*artm_a5

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 9
name $name
if %first_sel1=1 skip 4
>Master reacting violently. Execute program 7.@
>Please receive service quietly.\
skip 3
>Master still reacting violently. Execute program 7 again.@
>Please receive service quietly.\
name ""
skillname "Restriction Program 7"
>The Automata Girl forcibly holds Luka down!\
mov %kousoku,1:gosub *status_print
>Luka's being held down by the Automata Girl!\
skillname ""
if %kousan=2 sub %stack,1:return
name $name
if %first_sel1=1 skip 4
>Restriction complete.@
>Please accept my service.\
skip 3
>Re-restriction complete.@
>Please accept my service.\
name ""
mov %first_sel1,1
mov %hanyo1,0
if %earth=0 && %nanido<2 mov %genmogaku,3
if %earth=0 && %nanido=2 mov %genmogaku,4
if %earth=0 && %nanido=3 mov %genmogaku,5
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,2
if %earth>0 && %nanido=3 mov %genmogaku,3
sub %stack,1
return



*artm_a6

add %stack,1
>Luka is being forcibly held down by the Automata Girl...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Program number 4 selected. Thigh use."
if %ransu=2 mov $sel1,"Please Master with thighs..."
if %ransu=3 mov $sel1,"Unusual request, but granted."
name $name
eng $sel1:$sel6\
name ""
skillname "Thigh Service"
dwave 1,"se\ero_paizuri.ogg"
lsp 700,":c;chara\artm_ha1.bmp",0,0:print 10,500
>The Automata Girl clamps Luka's penis between her thighs, and wriggles her hips side to side!
skillcount2 3418
if %nanido<2 damage 80,90
if %nanido=2 damage 90,100
if %nanido=3 damage 100,110
skillname ""
if %mylife=0 sub %stack,1:return *artm_h5
mov %hanyo1,1
sub %stack,1
return



*artm_a7

add %stack,1
>Luka is being forcibly held down by the Automata Girl...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Program number 5 selected. Anal stimulation."
if %ransu=2 mov $sel1,"Stimulate prostate for maximum pleasure."
if %ransu=3 mov $sel1,"Please entrust yourself to my service."
name $name
eng $sel1:$sel6\
name ""
skillname "Anal Service"
dwave 1,"se\ero_pyu1.ogg"
>One of the Automata Girl's fingers goes into Luka's ass!\
>She skillfully stimulates Luka's prostate!
skillcount2 3419
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
skillname ""
if %mylife=0 sub %stack,1:return *artm_h6
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*artm_a8

add %stack,1
>Luka is being forcibly held down by the Automata Girl...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Program number 6 selected. Foot use."
if %ransu=2 mov $sel1,"Electromassage foot stimulation selected."
if %ransu=3 mov $sel1,"Subservient Master flag set."
name $name
eng $sel1:$sel6\
name ""
skillname "Mechanical Electro-Footjob"
dwave 1,"se\ero_koki1.ogg"
>The Automata Girl forces Luka's legs apart, and steps on his groin!\
skillcount2 3420
>She steps on Luka's penis!
if %nanido<2 damage 40,50
if %nanido=2 damage 45,55
if %nanido=3 damage 50,60
dwave 1,"se\ero_koki1.ogg"
>Her foot intensely vibrates!
if %nanido<2 damage 40,50
if %nanido=2 damage 45,55
if %nanido=3 damage 50,60
dwave 1,"se\ero_koki1.ogg"
>She steps on Luka's penis again as her foot vibrates!
if %nanido<2 damage 40,50
if %nanido=2 damage 45,55
if %nanido=3 damage 50,60
skillname ""
if %mylife=0 sub %stack,1:return *artm_h7
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*artm_a9

add %stack,1
>Luka is being forcibly held down by the Automata Girl...\
name $name
>Maximum pleasure mode selected.@
>First, remove all freedom of movement.\
name ""
skillname "Restriction Program 666"
eng "The Automata Girl's long arms reach around Luka, hugging him close to her body!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,100
if %wind=2 && %nanido=2 mov %wind_kakuritu,100
if %wind=2 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>Both her legs wrap around Luka's, tightly binding all of his movements!\
name $name
>Ultimate binding completed.@
>Now enjoy the ultimate in pleasure.\
name ""
skillname "Service Program 666"
mov %kousoku,2
dwave 1,"se\ero_pyu2.ogg"
lsp 699,":c;chara\artm_hb1.bmp",0,0:print 10,500
>The Automata Girl presses her body into Luka's, forcing his penis inside her!\
>Luka's forced deep into her artificial vagina!
skillcount2 3421
mov %damage_kotei,1
damage 140,160
>Luka is being raped by the Automata Girl!\
skillname ""
if %mylife=0 sub %stack,1:return *artm_h8
name "Luka"
>Ahhh!\
name ""
sub %stack,1
goto *artm_a10



*artm_a10

add %stack,1
>Luka is being raped by the Automata Girl!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Program 666 invoked. Currently raping Master.":mov $sel2,"The Automata Girl rhythmically pumps Luka!"
if %ransu=2 mov $sel1,"Movements to force ejaculation starting.":mov $sel2,"Her movements slowly beginning to increase in speed!"
if %ransu=3 mov $sel1,"Shrinking to optimal tightness.":mov $sel2,"The Automata Girl's vagina starts to shrink around Luka's penis!"
if %ransu=4 mov $sel1,"I am designed to extract semen, so do not hold back, Master.":mov $sel2,"The Automata Girl begins to pump Luka hard!"
if %ransu=5 mov $sel1,"No man can endure, please finish.":mov $sel2,"The Automata Girl pumps Luka like a piston!"
name $name
eng $sel1:$sel6\
name ""
skillname "Service Program 666"
dwave 1,"se\ero_chupa3.ogg"
eng $sel2:$sel6
skillcount2 3421
mov %damage_kotei,1
damage 140,160
skillname ""
if %mylife=0 sub %stack,1:return *artm_h9
sub %stack,1
goto *artm_a10



*artm_onedari

mov $list1,"Mechanical Handjob"
if %3414>0 mov %list_num1,1
mov $list2,"Mechanical Blowjob"
if %3415>0 mov %list_num2,1
mov $list3,"Mechanical Breast Service"
if %3416>0 mov %list_num3,1
mov $list4,"Bubble Service Trance"
if %3417>0 mov %list_num4,1
mov $list5,"Thigh Service"
if %3418>0 mov %list_num5,1
mov $list6,"Anal Service"
if %3419>0 mov %list_num6,1
mov $list7,"Mechanical Electro-Footjob"
if %3420>0 mov %list_num7,1
mov $list8,"Service Program 666"
if %3421>0 mov %list_num8,1
gosub *cmd_onedari
if %cmd1=11 goto *artm_onedari1
if %cmd1=12 goto *artm_onedari2
if %cmd1=13 goto *artm_onedari3
if %cmd1=14 goto *artm_onedari4
if %cmd1=15 goto *artm_onedari5
if %cmd1=16 goto *artm_onedari6
if %cmd1=17 goto *artm_onedari7
if %cmd1=18 goto *artm_onedari8
if %cmd1=-1 goto *artm_main
goto *artm_onedari



*artm_onedari1

gosub *onedari_syori
name $name
>Master's order confirmed.@
>Hand service selected.\
name ""
gosub *artm_a1
skip -1



*artm_onedari2

gosub *onedari_syori
name $name
>Master's order confirmed.@
>Mouth service selected.\
name ""
gosub *artm_a2
skip -1



*artm_onedari3

gosub *onedari_syori
name $name
>Master's order confirmed.@
>Breast service selected.\
name ""
gosub *artm_a3
skip -1



*artm_onedari4

gosub *onedari_syori
name $name
>Master's order confirmed.@
>Washing service selected.\
name ""
gosub *artm_a4
gosub *artm_a4b
skip -1



*artm_onedari5

gosub *onedari_syori_k
name $name
>Master's order confirmed.@
>Thigh service selected.\
name ""
if %kousoku=0 gosub *artm_a5
gosub *artm_a6
skip -1



*artm_onedari6

gosub *onedari_syori_k
name $name
>Master's order confirmed.@
>Anal service selected.\
name ""
if %kousoku=0 gosub *artm_a5
gosub *artm_a7
skip -1



*artm_onedari7

gosub *onedari_syori_k
name $name
>Master's order confirmed.@
>Electromassage service selected.\
name ""
if %kousoku=0 gosub *artm_a5
gosub *artm_a8
skip -1



*artm_onedari8

gosub *onedari_syori_k
name $name
>Master's order confirmed.@
>Simulated rape service selected.\
name ""
if %kousoku=0 gosub *artm_a5
gosub *artm_a9
skip -1



*artm_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\artm_bk03.bmp",167,0
lsp 690,":a;chara\artm_ct02.bmp",172,0
gosub *syasei2
>Unable to endure her skillful handjob, Luka comes, covering her hand in semen.\
mov %viclose,1:gosub *lose
mov %2597,%2597+1:if %2597=1 mov %count_koenemy,%count_koenemy+1
if %2597>%count_most mov %count_most,%2597:mov $count_mostname,$name
count 5,3
mov $bad1,"Luka was forced to orgasm by the Automata Girl's handjob."
gosub *face2
name $name
>Master's ejaculation confirmed.@
>Was it acceptable, Master?\
name ""
csp 690:print 10,500
goto *artm_h



*artm_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\artm_bk01.bmp",167,0
gosub *syasei2
>Unable to endure her skillful blowjob, Luka comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2597,%2597+1:if %2597=1 mov %count_koenemy,%count_koenemy+1
if %2597>%count_most mov %count_most,%2597:mov $count_mostname,$name
count 4,3
mov $bad1,"Luka was forced to orgasm by the Automata Girl's blowjob."
gosub *face2
name $name
>Master's ejaculation confirmed.@
>Was it acceptable, Master?\
name ""
goto *artm_h



*artm_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\artm_bk02.bmp",167,0
gosub *syasei2
>Unable to endure the feeling of her soft breasts pushing against his penis, Luka comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2597,%2597+1:if %2597=1 mov %count_koenemy,%count_koenemy+1
if %2597>%count_most mov %count_most,%2597:mov $count_mostname,$name
count 7,3
mov $bad1,"Luka was forced to orgasm by the Automata Girl's tit fuck."
gosub *face2
name $name
>Master's ejaculation confirmed.@
>Was it acceptable, Master?\
name ""
goto *artm_h



*artm_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\artm_ct13.bmp",172,0
lsp 691,":a;chara\artm_bk03.bmp",167,0
gosub *syasei2
>Unable to endure her washing, Luka comes, covering her hands with semen.\
mov %viclose,1:gosub *lose
mov %2597,%2597+1:if %2597=1 mov %count_koenemy,%count_koenemy+1
if %2597>%count_most mov %count_most,%2597:mov $count_mostname,$name
count 5,3
mov $bad1,"Luka was forced to an orgasm as the Automata Girl washed his penis."
lsp 690,":a;chara\artm_ct14.bmp",172,0
gosub *face2
name $name
>Unexpected error has occurred.@
>Master ejaculated during cleaning service.\
name ""
csp 690:print 10,500
goto *artm_h



*artm_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":c;chara\artm_ha2.bmp",0,0
gosub *syasei2
>Unable to endure the feeling of her soft thighs pressing against his penis, Luka comes, covering her thighs with semen.\
mov %viclose,1:gosub *lose
mov %2597,%2597+1:if %2597=1 mov %count_koenemy,%count_koenemy+1
if %2597>%count_most mov %count_most,%2597:mov $count_mostname,$name
count 3,3
mov $bad1,"Luka was forced to orgasm by the Automata Girl's intercrural sex."
gosub *face2
name $name
>Master's ejaculation confirmed.@
>Was it acceptable, Master?\
name ""
goto *artm_h



*artm_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\artm_bk04.bmp",167,0
gosub *syasei2
>As the Automata Girl's finger presses against his prostate, Luka comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2597,%2597+1:if %2597=1 mov %count_koenemy,%count_koenemy+1
if %2597>%count_most mov %count_most,%2597:mov $count_mostname,$name
count 9,3
mov $bad1,"Luka was forced to orgasm by the Automata Girl's anal stimulation."
gosub *face2
name $name
>Master's ejaculation confirmed.@
>Was it acceptable, Master?\
name ""
goto *artm_h



*artm_h7

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 696,":a;chara\artm_bk06.bmp",167,0
gosub *syasei2
>Unable to endure her electric footjob, Luka comes, covering her foot with semen.\
mov %viclose,1:gosub *lose
mov %2597,%2597+1:if %2597=1 mov %count_koenemy,%count_koenemy+1
if %2597>%count_most mov %count_most,%2597:mov $count_mostname,$name
count 3,3
mov $bad1,"Luka was forced to an orgasm by the Automata Girl's footjob."
gosub *face2
name $name
>Master's ejaculation confirmed.@
>Was it acceptable, Master?\
name ""
goto *artm_h



*artm_h8

mov %ikigoe,3:gosub *ikigoe
gosub *syasei1
lsp 699,":c;chara\artm_hb2.bmp",0,0
gosub *syasei2
>The moment Luka's forced into the Automata Girl's artificial vagina, Luka comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2597,%2597+1:if %2597=1 mov %count_koenemy,%count_koenemy+1
if %2597>%count_most mov %count_most,%2597:mov $count_mostname,$name
count 1,3
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to an orgasm just from insertion."
gosub *face2
name $name
>Unexpected event occurred, this service will abort.@
>Did you have an accident, Master?\
name ""
goto *artm_h



*artm_h9

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 699,":c;chara\artm_hb2.bmp",0,0
gosub *syasei2
>Helpless in her grasp while she rapes him, Luka comes, filling her artificial vagina with semen.\
mov %viclose,1:gosub *lose
mov %2597,%2597+1:if %2597=1 mov %count_koenemy,%count_koenemy+1
if %2597>%count_most mov %count_most,%2597:mov $count_mostname,$name
count 1,3
mov $bad1,"Luka was forced to orgasm as the Automata Girl raped him."
gosub *face2
name $name
>Master's ejaculation confirmed.@
>Was it acceptable, Master?\
name ""
goto *artm_h



*artm_h

mov $bad2,"Luka is raped endlessly by the malfunctioning Automata Girl."
if %2597=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>1 mov %hseanwave,1:hseanwave:goto *artm_hb
name "Luka"
>Ahh...\
name ""
name $name
>Switching to vaginal service.@
>Please enjoy the unmatched pleasure I can provide.\
name ""
cspl 690,699
lsp 700,":c;chara\artm_ha1.bmp",0,0:print 10,500
>The Automata Girl bends over my body and wraps her arms around me, holding me in place.@
>Her body presses against me, her artificial vagina right next to my penis.\
name "Luka"
>Ah... Stop... Stop it...\
name ""
name $name
>Inserting male penis into vagina.\
name ""
mov %hseanwave,1:hseanwave
lsp 700,":c;chara\artm_hb1.bmp",0,0:print 10,500
>With a wet noise, she pushes her body into mine, forcing me all the way into her.\
>Her soft artificial flesh clamps around me as soon as I'm inside her, holding me in place.\
goto *artm_hb



*artm_hb

name "Luka"
>Ahh... Haa...\
name ""
>I struggle to escape, but her powerful arms and legs around me don't allow me to pull out an inch.\
>I'm at the mercy of this emotionless doll...\
name $name
>Artificial vagina phase 1 activated.@
>Massaging operations beginning.\
name ""
name "Luka"
>Eh...?@> Ahhh!\
name ""
>Her vagina suddenly shrinks, tightly squeezing my penis.@
>At her deepest part, the soft flesh inside her tightly clamps around my tip.\
>The walls of her vagina start to move up and down at alternating rhythms, rubbing against my penis.\
>It feels like four powerful hands are kneading and massaging my penis from four directions inside her tight insides.\
name "Luka"
>Ahh...\
name ""
name $name
>Master's pleasure levels are rising at a constant rate.@
>Ejaculation phase 1 starting.\
>Master, please come inside my vagina.\
name ""
name "Luka"
>Haaa...!\
name ""
>The massaging movements inside her get even more intense, breaking down the last of my endurance.@
>This malfunctioning mechanical monster is holding me down and forcing me to come inside her...\
>Stuck in this pathetic state, I can't even do anything as she forces me to an orgasm...\
name "Luka"
>No... I'm going to come...\
name ""
>I can't last against this massage inside her...@
>The last of my power slowly seeps from my body as I relax under her.\
>I can't fight against it...@
>The desire to release inside this man made monster's artificial vagina is too much to take...\
name $name
>Ejaculation motions detected.@
>Proceeding to operations designed to maximize ejaculation pleasure.\
name ""
>The Automata Girl's vagina suddenly contracts even tighter than before.\
>Now tightly pressing around me, her insides start to powerfully vibrate.\
>I gasp in surprise at the new stimulation, instantly bringing me to an orgasm inside her artificial vagina, designed to please the lusts of men.\
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1
lsp 700,":c;chara\artm_hb2.bmp",0,0
gosub *syasei2
name ""
>I ejaculate, almost in a trance, as the powerful vibrations increase the pleasure to unmatched heights.@
>My penis twitches inside of her, spurting out shot after shot of semen into her fake vagina.\
name $name
>...Ejaculation confirmed.@
>Was it acceptable, Master?\
name ""
name "Luka"
>Ahh...\
name ""
>Tightly held down by the Automata Girl, I relax as the afterglow from the powerful orgasm washes over me.\
name $name
>Phase 2 of vagina use starting...@
>Rotation of inner drum starting.\
name ""
name "Luka"
>Eh...?@> Ahhh!\
name ""
mov %hseanwave,13:hseanwave
>A warm liquid gushes out of her hole.@
>In the next instant, her entire vagina starts to rotate around my penis.\
>A soft piece of flesh lightly taps against the tip of my penis as the rest of her walls spin faster and faster around my lubricated penis.\
name "Luka"
>Ah! Ahhhh!!\
name ""
>The tiny bumps and creases inside of her rub against me in a circle.@
>Faster and faster, her vagina keeps spinning...\
>Squirming and moaning under her body, my head shakes side to side as the powerful stimulation forces me to another orgasm only moments after my last.\
>Unable to think about anything but the pleasure, I entrust myself to the sensations of her spinning vagina.\
name "Luka"
>Ah... Haaaa!\
name ""
gosub *syasei1
lsp 700,":c;chara\artm_hb3.bmp",0,0
gosub *syasei2
>I come, exploding in her vagina, still spinning during my ejaculation.\
>Squirming under the intense stimulation, I shake my hips around desperately trying to escape from the overwhelming stimulation.\
name "Luka"
>Haa!@> Ahhhhh!\
name ""
name $name
>Ejaculation confirmed.@
>According to settings, 299,998 ejaculations remain.\
name ""
name "Luka"
>N...No way...\
name ""
>She's broken...@
>If this keeps up, I'm going to die...\
name $name
>Phase 3 of vagina use starting.@
>Starting forced ejaculation via vibrations.\
name ""
name "Luka"
>Ahhhh!\
name ""
mov %hseanwave,22:hseanwave
>An incredibly powerful vibration starts inside her, running through my penis.\
>The powerful vibrations stimulate my penis, sensitive after my last orgasms.@
>Overpowered again, I give in to this doll designed to make men ejaculate...\
name "Luka"
>Ahh...ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>The intense vibrations quickly force me to another orgasm.@
>But her artificial vagina doesn't part from me.\
>She's going to keep this up, isn't she...@
>Using these skills that were all tested and programmed to maximize pleasure...\
name $name
>299,997 ejaculations remain.@
>Continuing phase 3 vibration stimulation.\
name ""
>Embraced tightly next to her warm body, the intense vibrations stay just as strong as they were.\
name "Luka"
>S...Stop... No more...\
name ""
name $name
>299,997 ejaculations remain.@
>Original setting cannot be aborted.@>Continuing vagina use.\
name ""
name "Luka"
>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
name "Luka"
>I... I'm going to die...\
name ""
name $name
>Acknowledged.@>Life support mode enabled.@
>When your life is in crisis, Master will be forcibly given treatment to prolong life.\
>There is no need to fear.\
name ""
name "Luka"
>N...No way... Ahh!\
name ""
gosub *syasei1:gosub *syasei2
name $name
>299,996 ejaculations remain.@
>I will serve you.@>Serve you.@> Serve you.\
name ""
name "Luka"
>Ah...aa...\
name ""
gosub *anten
mov %hseanwave,0:hseanwave
>Thus, the Automata Girl continues to rape me endlessly like this...\
>Every time I become weak, she forcibly feeds and gives me water.\
>Held down by the Automata Girl, there's no escape from this endless service.@
>I don't know when or even if this will ever end...\
>.................\
goto *badend



*ant_start

mov $name,"Ant Girls"
mov $name2,"Ant Girl A"
mov $lavel,"ant"
mov $tatie1,"ant_st11"
mov $tatie2,"ant_st11"
mov $tatie3,"ant_st13"
mov $tatie4,"ant_st11"
mov $haikei,"bg101"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,3900
if %nanido=2 mov %max_enemylife,4100
if %nanido=3 mov %max_enemylife,4300
if %nanido=1 mov %henkahp1,500
if %nanido=2 mov %henkahp1,500
if %nanido=3 mov %henkahp1,500
if %nanido=0 mov %max_enemylife,2
if %nanido=0 mov %henkahp1,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,90
mov %earth_keigen,40
if %nanido=3 mov %earth_keigen,20
mov %music,1
mov %tikei,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free of the Ant Girls!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"PREY WON'T ESCAPE..."
mov $mogaku_sel2,"DON'T RESIST."
mov $mogaku_sel3,"WE WILL TAKE YOU TO THE QUEEN..."
mov $mogaku_sel4,"DON'T RESIST... IT WILL FEEL GOOD!"
mov $mogaku_sel5,"CALM DOWN!"
mov $mogaku_dassyutu1,"ESCAPED..."
mov $mogaku_dassyutu2,"PREY ESCAPED..."
mov $mogaku_earth_dassyutu1,"STRANGE POWER..."
mov $mogaku_earth_dassyutu2,""
mov $half_s1,"YOU'RE GETTING WEAKER..."
mov $half_s2,"I'LL MAKE YOU EVEN WEAKER..."
mov $kiki_s1,"I'LL FINISH YOU OFF..."
mov $kiki_s2,"MAKE YOU SURRENDER, AND TAKE TO THE QUEEN..."
mov %end_n,2
mov %exp_minus,31000
mov %zmonster_x,-280
mov %tukix,320
mov %owaza_count1a,6
name "Luka"
>I'll be your opponent!\
name ""
>I hold my sword in a ready pose, guarding the fleeing citizens.\
name "Ant Girl A"
>FIRST DEFEAT HIM.@
>THEN GET THE FLEEING MEN.\
name ""
name "Ant Girl B"
>THEN WE'LL PRESENT EVERYONE TO THE QUEEN.\
name ""
name "Luka"
>I won't let that happen!@> Prepare yourself!\
name ""
goto *common_main



*ant_v

gosub *face3
name "Ant Girl A"
>AHH...\
name ""
>As the Ant Girl staggers...\
name "Queen's Voice"
>...That's enough, my cute little children.@
>Ignore that human, and go after the escaping men.\
name ""
name "Ant Girl B"
>BUT THIS HUMAN WILL ATTACK YOU...\
name ""
name "Queen's Voice"
>I won't allow him to hurt my cute little children any further.@
>I shall personally play with this human.\
name ""
name "Ant Girl A"
>UNDERSTOOD, QUEEN.\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,500
>Following the voice's orders, the Ant Girls quickly retreat.\
mov %viclose,1:gosub *victory_plural
mov %getexp,20000:gosub *lvup
mov %2298,1
goto *sean0213



*ant_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name "Ant Girl A"
>HE SURRENDERED...\
name ""
name "Ant Girl B"
>MAKE HIM WEAK, THEN TAKE TO QUEEN!\
name ""
goto *ant_a



*ant_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *ant_kousan
if %cmd1=16 goto *ant_onedari
if %cmd1=17 goto *common_skill
goto *ant_main



*ant_a

if %enemylife<%henkahp1 goto *ant_v
rnd2 %ransu,1,8
if %ransu=1 gosub *ant_a1:gosub *ant_a2:goto *common_main
if %ransu=2 gosub *ant_a1:gosub *ant_a3:goto *common_main
if %ransu=3 gosub *ant_a1:gosub *ant_a4:goto *common_main
if %ransu=4 gosub *ant_a5:goto *common_main
if %ransu=5 gosub *ant_a6:goto *common_main
if %ransu=6 gosub *ant_a7:goto *common_main
if %ransu>6 && %owaza_count1a>7 && %kousoku=0 gosub *ant_a8:goto *common_main
skip -8



*ant_a1

add %stack,1
if %kousoku=0 skip 2
>The Ant Girls are clinging to Luka...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"KISS..."
if %ransu=2 mov $sel1,"MY SWEET LIPS..."
if %ransu=3 mov $sel1,"KISS ALL OVER..."
name "Ant Girl A"
eng $sel1:$sel6\
name ""
skillname "Ant Kiss"
dwave 1,"se\ero_pyu1.ogg"
eng "Ant Girl A kisses Luka!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>The sweet taste of her saliva fills Luka's mouth!
skillcount2 3422
if %nanido<2 damage 30,40
if %nanido=2 damage 40,50
if %nanido=3 damage 50,60
skillname ""
if %mylife=0 sub %stack,1:return *ant_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*ant_a2

add %stack,1
mov %hanyo1,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'LL USE MY HAND!":mov $sel2,"I WILL TOO!"
if %ransu=2 mov $sel1,"HAHAHA!":mov $sel2,"DOES IT FEEL GOOD?"
if %ransu=3 mov $sel1,"I'LL MILK IT OUT WITH MY HAND!":mov $sel2,"I'LL USE MY HAND TOO!"
name "Ant Girl B"
eng $sel1:$sel6\
name ""
name "Ant Girl C"
eng $sel2:$sel6\
name ""
skillname "Double Multi-Arm Handjob"
eng "Ant Girl B and C's multiple arms all reach out toward Luka's penis!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3423
dwave 1,"se\ero_koki1.ogg"
>Ant Girl B gently strokes Luka's penis!
if %nanido<2 damage 12,15
if %nanido=2 damage 13,16
if %nanido=3 damage 14,17
dwave 1,"se\ero_koki1.ogg"
>Ant Girl C gently massages Luka's balls!
if %nanido<2 damage 12,15
if %nanido=2 damage 13,16
if %nanido=3 damage 14,17
dwave 1,"se\ero_koki1.ogg"
>Ant Girl B runs her palm over the tip of Luka's penis!
if %nanido<2 damage 12,15
if %nanido=2 damage 13,16
if %nanido=3 damage 14,17
dwave 1,"se\ero_koki1.ogg"
>Ant Girl C gently pokes Luka's urethral opening!
if %nanido<2 damage 12,15
if %nanido=2 damage 13,16
if %nanido=3 damage 14,17
dwave 1,"se\ero_koki1.ogg"
>Ant Girl B teases just underneath the tip of his penis!
if %nanido<2 damage 12,15
if %nanido=2 damage 13,16
if %nanido=3 damage 14,17
dwave 1,"se\ero_koki1.ogg"
>Ant Girl C traces the back muscle of Luka's penis!
if %nanido<2 damage 12,15
if %nanido=2 damage 13,16
if %nanido=3 damage 14,17
skillname ""
if %mylife=0 sub %stack,1:return *ant_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*ant_a3

add %stack,1
mov %hanyo1,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"SOFT BREASTS!":mov $sel2,"ALL MEN LOVE BREASTS!"
if %ransu=2 mov $sel1,"SQUEEZE WITH CHEST!":mov $sel2,"COVER ME IN WHITE!"
if %ransu=3 mov $sel1,"IT FEELS GOOD, DOESN'T IT!?":mov $sel2,"SQUEEZE HIM TIGHTER!"
name "Ant Girl B"
eng $sel1:$sel6\
name ""
name "Ant Girl C"
eng $sel2:$sel6\
name ""
skillname "Double Ant Tit Fuck"
eng "Ant Girl B and C sandwich Luka's penis between their breasts!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3425
dwave 1,"se\ero_koki1.ogg"
>Ant Girl B presses her soft breasts tightly against Luka's penis!
if %nanido<2 damage 45,55
if %nanido=2 damage 48,58
if %nanido=3 damage 51,61
dwave 1,"se\ero_koki1.ogg"
>Ant Girl C uses her hands to push her breasts up and down!
if %nanido<2 damage 45,55
if %nanido=2 damage 48,58
if %nanido=3 damage 51,61
skillname ""
if %mylife=0 sub %stack,1:return *ant_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*ant_a4

add %stack,1
mov %hanyo1,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"LICK IT...":mov $sel2,"I'LL LICK THE TIP."
if %ransu=2 mov $sel1,"SUCK OUT HIS SEMEN...":mov $sel2,"I'LL LICK TOO!"
if %ransu=3 mov $sel1,"SHOOT OUT A LOT!":mov $sel2,"I'LL TASTE YOUR PENIS!"
name "Ant Girl B"
eng $sel1:$sel6\
name ""
name "Ant Girl C"
eng $sel2:$sel6\
name ""
skillname "Double Ant Blowjob"
eng "Ant Girl B and C lick Luka's penis from both sides!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3427
dwave 1,"se\ero_pyu2.ogg"
>Ant Girl B licks the right side of Luka's penis!
if %nanido<2 damage 50,60
if %nanido=2 damage 53,63
if %nanido=3 damage 56,66
dwave 1,"se\ero_pyu2.ogg"
>Ant Girl C sucks on Luka's tip as her tongue runs down his left side!
if %nanido<2 damage 50,60
if %nanido=2 damage 53,63
if %nanido=3 damage 56,66
skillname ""
if %mylife=0 sub %stack,1:return *ant_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*ant_a5

add %stack,1
mov %hanyo1,1
if %kousoku=0 skip 2
>The Ant Girls are clinging to Luka...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"EVERYONE, HIS PENIS!":mov $sel2,"SQUEEZE IT ALL OUT!"
if %ransu=2 mov $sel1,"CONCENTRATE YOUR ATTACKS!":mov $sel2,"EVERYONE PLAY WITH HIS PENIS!"
if %ransu=3 mov $sel1,"EVERYONE, TOUCH IT!":mov $sel2,"SQUEEZE IT ALL OUT!"
name "Ant Girl A"
eng $sel1:$sel6\
name ""
name "Ant Girl B"
eng $sel2:$sel6\
name ""
skillname "Triple Multi-Arm Handjob"
eng "The Ant Girl's hands all reach out toward Luka's penis!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3424
dwave 1,"se\ero_koki1.ogg"
>Ant Girl A strokes Luka's penis!
if %nanido<2 damage 12,15
if %nanido=2 damage 13,16
if %nanido=3 damage 14,17
dwave 1,"se\ero_koki1.ogg"
>Ant Girl B gently massages Luka's balls!
if %nanido<2 damage 12,15
if %nanido=2 damage 13,16
if %nanido=3 damage 14,17
dwave 1,"se\ero_koki1.ogg"
>Ant Girl C rubs the base of Luka's penis!
if %nanido<2 damage 12,15
if %nanido=2 damage 13,16
if %nanido=3 damage 14,17
dwave 1,"se\ero_koki1.ogg"
>Ant Girl A runs her fingers over the tip of Luka's penis!
if %nanido<2 damage 12,15
if %nanido=2 damage 13,16
if %nanido=3 damage 14,17
dwave 1,"se\ero_koki1.ogg"
>Ant Girl B pokes Luka's urethral opening!
if %nanido<2 damage 12,15
if %nanido=2 damage 13,16
if %nanido=3 damage 14,17
dwave 1,"se\ero_koki1.ogg"
>Ant Girl C traces the tip of her finger under the tip of Luka's penis!
if %nanido<2 damage 12,15
if %nanido=2 damage 13,16
if %nanido=3 damage 14,17
dwave 1,"se\ero_koki1.ogg"
>Ant Girl A rubs around Luka's anus!
if %nanido<2 damage 12,15
if %nanido=2 damage 13,16
if %nanido=3 damage 14,17
dwave 1,"se\ero_koki1.ogg"
>Ant Girl B rubs the tip of Luka's penis with her palm!
if %nanido<2 damage 12,15
if %nanido=2 damage 13,16
if %nanido=3 damage 14,17
dwave 1,"se\ero_koki1.ogg"
>Ant Girl C traces the back muscle of Luka's penis!
if %nanido<2 damage 12,15
if %nanido=2 damage 13,16
if %nanido=3 damage 14,17
skillname ""
if %mylife=0 sub %stack,1:return *ant_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*ant_a6

add %stack,1
mov %hanyo1,1
if %kousoku=0 skip 2
>The Ant Girls are clinging to Luka...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"USE YOUR BREASTS!":mov $sel2,"ALL MEN LOVE BREASTS!"
if %ransu=2 mov $sel1,"EVERYONE, DEFEAT HIM WITH YOUR CHEST!":mov $sel2,"COVER MY CHEST IN SEMEN!"
if %ransu=3 mov $sel1,"MAKE HIM WEAK WITH OUR BREASTS!":mov $sel2,"OUR BREASTS WILL FEEL TOO GOOD FOR HIM!"
name "Ant Girl A"
eng $sel1:$sel6\
name ""
name "Ant Girl C"
eng $sel2:$sel6\
name ""
skillname "Triple Ant Tit Fuck"
eng "The Ant Girls all crowd around Luka's penis!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
skillcount2 3426
if %ransu=1 goto *ant_a6a
if %ransu=2 goto *ant_a6b
if %ransu=3 goto *ant_a6c



*ant_a6a

dwave 1,"se\ero_paizuri.ogg"
>Ant Girl A presses her breasts into Luka from the front!
if %nanido<2 damage 45,55
if %nanido=2 damage 50,60
if %nanido=3 damage 55,65
dwave 1,"se\ero_koki1.ogg"
>Ant Girl B and C squeeze Luka's penis from his sides!
mov %damage_nobr,1
if %nanido<2 damage 45,55
if %nanido=2 damage 50,60
if %nanido=3 damage 55,65
if %nanido<2 damage 45,55
if %nanido=2 damage 50,60
if %nanido=3 damage 55,65
skillname ""
if %mylife=0 sub %stack,1:return *ant_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*ant_a6b

dwave 1,"se\ero_paizuri.ogg"
>Ant Girl A presses her breasts into Luka from the front!
if %nanido<2 damage 45,55
if %nanido=2 damage 50,60
if %nanido=3 damage 55,65
dwave 1,"se\ero_paizuri.ogg"
>Ant Girl B presses her breasts into Luka's back!
if %nanido<2 damage 45,55
if %nanido=2 damage 50,60
if %nanido=3 damage 55,65
dwave 1,"se\ero_koki1.ogg"
>Ant Girl C pumps Luka's penis with her breasts!
if %nanido<2 damage 45,55
if %nanido=2 damage 50,60
if %nanido=3 damage 55,65
skillname ""
if %mylife=0 sub %stack,1:return *ant_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*ant_a6c

dwave 1,"se\ero_paizuri.ogg"
>The Ant Girl's soft breasts push into Luka from three directions at once!
if %nanido<2 damage 45,55
if %nanido=2 damage 50,60
if %nanido=3 damage 55,65
mov %damage_nobr,1
if %nanido<2 damage 45,55
if %nanido=2 damage 50,60
if %nanido=3 damage 55,65
if %nanido<2 damage 45,55
if %nanido=2 damage 50,60
if %nanido=3 damage 55,65
skillname ""
if %mylife=0 sub %stack,1:return *ant_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*ant_a7

add %stack,1
mov %hanyo1,1
if %kousoku=0 skip 2
>The Ant Girls are clinging to Luka...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"EVERYONE, LICK HIM!":mov $sel2,"LICK HIM ALL OVER!"
if %ransu=2 mov $sel1,"USE YOUR MOUTH TO SUCK IT OUT!":mov $sel2,"I'LL DRINK YOUR SEMEN!"
if %ransu=3 mov $sel1,"WEAKEN HIM WITH OUR MOUTHS!":mov $sel2,"DRINK HIS SEMEN AND MAKE HIM WEAK!"
name "Ant Girl B"
eng $sel1:$sel6\
name ""
name "Ant Girl C"
eng $sel2:$sel6\
name ""
skillname "Triple Ant Blowjob"
eng "The Ant Girls bury their faces in Luka's groin!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
skillcount2 3428
if %ransu=1 goto *ant_a7a
if %ransu=2 goto *ant_a7b
if %ransu=3 goto *ant_a7c



*ant_a7a

dwave 1,"se\ero_pyu2.ogg"
>Ant Girl A licks the right side of Luka's penis.
if %nanido<2 damage 50,60
if %nanido=2 damage 55,65
if %nanido=3 damage 60,70
dwave 1,"se\ero_pyu2.ogg"
>Ant Girl B licks the left side of Luka's penis.
if %nanido<2 damage 50,60
if %nanido=2 damage 55,65
if %nanido=3 damage 60,70
dwave 1,"se\ero_pyu2.ogg"
>Ant Girl C licks the tip of Luka's penis.
if %nanido<2 damage 50,60
if %nanido=2 damage 55,65
if %nanido=3 damage 60,70
skillname ""
if %mylife=0 sub %stack,1:return *ant_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*ant_a7b

dwave 1,"se\ero_buchu2.ogg"
>Ant Girl A sucks Luka's penis into her mouth, and runs her tongue all over him!
if %nanido<2 damage 50,60
if %nanido=2 damage 55,65
if %nanido=3 damage 60,70
dwave 1,"se\ero_buchu2.ogg"
>Ant Girl B takes her place and kisses Luka's penis!
if %nanido<2 damage 50,60
if %nanido=2 damage 55,65
if %nanido=3 damage 60,70
dwave 1,"se\ero_buchu2.ogg"
>Ant Girl C takes her place and pumps Luka's penis with her mouth like a piston!
if %nanido<2 damage 50,60
if %nanido=2 damage 55,65
if %nanido=3 damage 60,70
skillname ""
if %mylife=0 sub %stack,1:return *ant_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*ant_a7c

>Ant Girl A sucks on the tip of Luka's penis as B and C clamp their lips down over his shaft!
dwave 1,"se\ero_buchu2.ogg"
if %nanido<2 damage 50,60
if %nanido=2 damage 55,65
if %nanido=3 damage 60,70
dwave 2,"se\ero_pyu2.ogg"
mov %damage_nobr,1
if %nanido<2 damage 50,60
if %nanido=2 damage 55,65
if %nanido=3 damage 60,70
dwave 3,"se\ero_pyu2.ogg"
if %nanido<2 damage 50,60
if %nanido=2 damage 55,65
if %nanido=3 damage 60,70
skillname ""
if %mylife=0 sub %stack,1:return *ant_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*ant_a8

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name "Ant Girl A"
>EVERYONE, HOLD HIM DOWN!\
name ""
skillname "Group Bind"
eng "The Ant Girls cling to Luka's body!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>Luka is being held down by the Ant Girls!\
skillname ""
if %kousan=2 sub %stack,1:return
name "Ant Girl A"
if %first_sel1=1 skip 3
>NOW EVERYONE, WEAKEN HIM!\
skip 2
>NOW EVERYONE, KEEP MAKING HIM WEAK!\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,2
if %earth=0 && %nanido=2 mov %genmogaku,3
if %earth=0 && %nanido=3 mov %genmogaku,4
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
sub %stack,1
return



*ant_onedari

mov $list1,"Ant Kiss"
if %3422>0 mov %list_num1,1
mov $list2,"Double Multi-Arm Handjob"
if %3423>0 mov %list_num2,1
mov $list3,"Triple Multi-Arm Handjob"
if %3424>0 mov %list_num3,1
mov $list4,"Double Ant Tit Fuck"
if %3425>0 mov %list_num4,1
mov $list5,"Triple Ant Tit Fuck"
if %3426>0 mov %list_num5,1
mov $list6,"Double Ant Blowjob"
if %3427>0 mov %list_num6,1
mov $list7,"Triple Ant Blowjob"
if %3428>0 mov %list_num7,1
gosub *cmd_onedari
if %cmd1=11 goto *ant_onedari1
if %cmd1=12 goto *ant_onedari2
if %cmd1=13 goto *ant_onedari3
if %cmd1=14 goto *ant_onedari4
if %cmd1=15 goto *ant_onedari5
if %cmd1=16 goto *ant_onedari6
if %cmd1=17 goto *ant_onedari7
if %cmd1=-1 goto *ant_main
goto *ant_onedari



*ant_onedari1

gosub *onedari_syori_k
name "Ant Girl A"
>THEN I'LL WEAKEN YOU WITH KISSES...\
name ""
if %kousoku=0 gosub *ant_a8
gosub *ant_a1
skip -1



*ant_onedari2

gosub *onedari_syori_k
name "Ant Girl A"
>THEN WE'LL WEAKEN YOU WITH OUR HANDS...\
name ""
if %kousoku=0 gosub *ant_a8
gosub *ant_a2
skip -1



*ant_onedari3

gosub *onedari_syori_k
name "Ant Girl A"
>THEN WE'LL WEAKEN YOU WITH OUR HANDS...\
name ""
if %kousoku=0 gosub *ant_a8
gosub *ant_a5
skip -1



*ant_onedari4

gosub *onedari_syori_k
name "Ant Girl A"
>THEN WE'LL WEAKEN YOU WITH OUR BREASTS...\
name ""
if %kousoku=0 gosub *ant_a8
gosub *ant_a3
skip -1



*ant_onedari5

gosub *onedari_syori_k
name "Ant Girl A"
>THEN WE'LL WEAKEN YOU WITH OUR BREASTS...\
name ""
if %kousoku=0 gosub *ant_a8
gosub *ant_a6
skip -1



*ant_onedari6

gosub *onedari_syori_k
name "Ant Girl A"
>THEN WE'LL WEAKEN YOU WITH OUR MOUTHS...\
name ""
if %kousoku=0 gosub *ant_a8
gosub *ant_a4
skip -1



*ant_onedari7

gosub *onedari_syori_k
name "Ant Girl A"
>THEN WE'LL WEAKEN YOU WITH OUR MOUTHS...\
name ""
if %kousoku=0 gosub *ant_a8
gosub *ant_a7
skip -1



*ant_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\ant_bk04.bmp",0,0
gosub *syasei2
>As the Ant Girl's gentle kiss washes over him, Luka comes, covering her stomach in semen.\
mov %viclose,1:gosub *lose
mov %2598,%2598+1:if %2598=1 mov %count_koenemy,%count_koenemy+1
if %2598>%count_most mov %count_most,%2598:mov $count_mostname,$name
count 18,7
mov $bad1,"Luka was forced to come by the Ant Girl's kiss."
gosub *face2
name "Ant Girl A"
>HE EJACULATED... HE CAN'T RESIST NOW.\
name ""
goto *ant_h



*ant_h2

if %hanyo1=0:mov %ikigoe,1:gosub *ikigoe
if %hanyo1=1:mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
if %hanyo1=1:lsp 693,":a;chara\ant_bk03.bmp",0,0
lsp 697,":a;chara\ant_bk07.bmp",0,0
gosub *syasei2
>As the Ant Girls' multiple hands run all over his penis, Luka comes, covering their hands with semens.\
mov %viclose,1:gosub *lose
mov %2598,%2598+1:if %2598=1 mov %count_koenemy,%count_koenemy+1
if %2598>%count_most mov %count_most,%2598:mov $count_mostname,$name
count 5,7
if %hanyo1=0:mov $bad1,"The Ant Girls' handjob forced Luka to come."
if %hanyo1=1:mov $bad1,"The Ant Girls' handjob forced Luka to come."
gosub *face2
name "Ant Girl A"
>HE EJACULATED... HE CAN'T RESIST NOW.\
name ""
goto *ant_h



*ant_h3

if %hanyo1=0:mov %ikigoe,1:gosub *ikigoe
if %hanyo1=1:mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
if %hanyo1=1:lsp 692,":a;chara\ant_bk02.bmp",0,0
lsp 696,":a;chara\ant_bk06.bmp",0,0
gosub *syasei2
>As the Ant Girls' soft breasts push against Luka's penis, he comes, covering their chests in semen.\
mov %viclose,1:gosub *lose
mov %2598,%2598+1:if %2598=1 mov %count_koenemy,%count_koenemy+1
if %2598>%count_most mov %count_most,%2598:mov $count_mostname,$name
count 7,7
if %hanyo1=0:mov $bad1,"The Ant Girls' tit fuck forced Luka to come."
if %hanyo1=1:mov $bad1,"The Ant Girls' tit fuck forced Luka to come."
gosub *face2
name "Ant Girl A"
>HE EJACULATED... HE CAN'T RESIST NOW.\
name ""
goto *ant_h



*ant_h4

if %hanyo1=0:mov %ikigoe,1:gosub *ikigoe
if %hanyo1=1:mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
if %hanyo1=1:lsp 691,":a;chara\ant_bk01.bmp",0,0
lsp 695,":a;chara\ant_bk05.bmp",0,0
gosub *syasei2
>As the Ant Girls' lick and take turns sucking on his penis, Luka comes, filling their mouths with semen.\
mov %viclose,1:gosub *lose
mov %2598,%2598+1:if %2598=1 mov %count_koenemy,%count_koenemy+1
if %2598>%count_most mov %count_most,%2598:mov $count_mostname,$name
count 4,7
if %hanyo1=0:mov $bad1,"The Ant Girls' blowjob forced Luka to come."
if %hanyo1=1:mov $bad1,"The Ant Girls' blowjob forced Luka to come."
gosub *face2
name "Ant Girl A"
>HE EJACULATED... HE CAN'T RESIST NOW.\
name ""
goto *ant_h



*ant_h

mov $bad2,"Gang-raped endlessly by the Ant Girls, he becomes their toy."
if %2598=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
>Suffering a tragic defeat, I fall to the floor in exhaustion.@
>The Ant Girls pick me up and carry me off somewhere.\
cspl 690,699
sean_change "bg022"
>They take me to an underground cave.@
lsp 700,":a;chara\ant_st11.bmp",0,0:print 10,500
>When I'm free to look around me again, I see Ant Girls all around me.\
name "Luka"
>Wh...What are you going to do?\
name ""
>Are they going to force me to work as a slave...?\
name "Ant Girl A"
>RAPE THE HUMAN.\
name ""
name "Ant Girl B"
>SUCK OUT HIS SEMEN AND MAKE HIM WEAK.\
name ""
>The Ant Girls gather around me and pin me to the ground.@
>As the others hold me down, one of the Ant Girls stands over my waist.\
name "Luka"
>S...Stop!\
name ""
name "Ant Girl A"
>WE ARE WORKER ANTS, UNABLE TO REPRODUCE...@
>BUT WE HAVE GENITALS, SO WE CAN STILL RAPE MEN.\
name ""
>A smile crosses her insect face as she drops her waist down.@
mov %hseanwave,1:hseanwave
lsp 690,":a;chara\ant_ct01.bmp",0,0:print 10,500
>In one swift motion, my penis is forced all the way inside her!\
name "Luka"
>Ahhh!\
name ""
>A wet liquid squirts out of her hole as my penis is forced inside.@
>Even though she can't use her vagina to reproduce, it still feels incredible.\
name "Ant Girl A"
>DOES IT FEEL GOOD...?\
name ""
>The Ant Girl slowly starts to shake her hips as she sits on top of me.@
>Even though she's a worker ant, it seems like she instinctively knows how to rape men...\
>She starts to bounce on top of me.@> Every thrust causes her wetness to squirt out and cover my thighs.\
name "Luka"
>Ah... Stop...! Ahhh!\
name ""
>I yell out in pained pleasure as I'm forced in and out of her warm vagina.@
>The other Ant Girls' eyes open wide in fascination as they watch what's happening.\
name "Ant Girl B"
>DOES IT FEEL GOOD TO RAPE MEN...?\
name ""
name "Ant Girl C"
>HUMANS ARE SO WEIRD...\
name ""
>The Ant Girls holding my body down start to lick me, eagerly tasting my sweat as I pant under the other Ant Girl's rape.@
>The Ant Girl raping me gets a bigger smile on her face as she starts to pump me even faster.\
name "Ant Girl A"
>IT'S SO HARD INSIDE ME...@
>I FEEL IT RUBBING AGAINST MY WALLS... IT FEELS SO GOOD...\
name ""
name "Luka"
>Ahhh!\
name ""
>The Ant Girl bounces even faster on top of me, clearly being overtaken by her own desire.@
>It seems like their desire that was sealed until now is uncontrollable...\
>Held down, I can't do anything but moan as the tip of my penis rubs against her soft flesh with every thrust.\
>After a few moments, I'm gasping for breath as her passionate sex gets faster and wilder.\
name "Luka"
>Ahh... I'm going to come...\
name ""
>With her bouncing on top of me so wildly like that, I can't hold on...@
>Forced in and out of her from the tip to the base, the sweet pleasure washes over my body as I'm unable to hold on any longer.\
name "Ant Girl A"
>I FEEL SO GOOD...@
>COME, I WANT TO FEEL IT EXPLODE IN ME!\
name ""
name "Luka"
>Ahhh!\
name ""
>With a final moan the orgasm takes over my body as I surrender to the wild Ant Girl on top of me.\
gosub *syasei1
lsp 690,":a;chara\ant_ct02.bmp",0,0
lsp 691,":a;chara\ant_bk04.bmp",0,0
gosub *syasei2
>I explode inside of the Ant Girl straddling me, pouring semen into her non functioning vagina.\
mov %hseanwave,0:hseanwave
name "Ant Girl A"
>COMING... I CAN FEEL IT SHOOTING INTO ME...@
>HIS PENIS IS TWITCHING IN ME...@
>THIS FEELS SO GOOD...\
name ""
>With a dazed look on her face, the Ant Girl sits on top of me as she feels my semen pour into her.@
csp 690:print 10,500
>After a few moments, she stands up with a contented look on her face.\
name "Ant Girl B"
>ME NEXT!@
>I WANT TO RAPE THE HUMAN...\
name ""
>But they don't let me go...@
mov %hseanwave,1:hseanwave
lsp 690,":a;chara\ant_ct01.bmp",0,0:print 10,500
>Another Ant Girl eagerly steps over me, and forces me into her wet vagina.\
name "Luka"
>Ahh...!\
name ""
>After only a few seconds in the air, my penis is already back inside another warm vagina.@
>Her soft flesh squeezes around me as soon as I'm inside her, eagerly tasting my penis.\
name "Ant Girl B"
>YOU'RE RIGHT...@>IT FEELS GOOD...!\
name ""
>The Ant Girl slowly starts to grind her waist against me.\
>Her movements force my penis to rub against her insides, making me gasp at each movement, and shake my waist underneath her unintentionally.\
name "Ant Girl B"
>MORE... STIR MY INSIDES UP...@
>MORE... MORE...\
name ""
name "Luka"
>Ahhh!\
name ""
>The Ant Girl's desire slowly overtakes her, making her slow grinding movements rapidly increase in speed.@
>My penis rubs against her walls, tossed around by her rough movements as I'm helplessly held down under her.\
name "Luka"
>This is too much... Ahhh!\
name ""
>I let out a pathetic moan as her intense rape overpowers my senses.@
>Driven wild by her own lust, she grinds against me as fast as she can.\
>The only thing allowed to me is the pleasure.@
>With so many Ant Girls holding me down, I don't think I can escape this...\
name "Ant Girl B"
>RAPING MEN FEELS SO GOOD!\
name ""
name "Luka"
>Ahhh...!\
name ""
>Despite her violent rape, I feel another orgasm coming out.@
>Unable to resist at all, I give in to the feeling without holding back.\
gosub *syasei1
lsp 690,":a;chara\ant_ct02.bmp",0,0
gosub *syasei2
name ""
>I explode inside of the Ant Girl as she rapes me.@
>My semen pours into her barren body, only raping me for her own pleasure.\
>My pride as a man crumbles as they tear my mind and body to pieces for their own enjoyment.\
mov %hseanwave,0:hseanwave
csp 690:print 10,500
name "Luka"
>Ahh... Stop it already...\
name ""
name "Ant Girl C"
>ME NEXT...\
name ""
>But completely ignoring me, another Ant Girl steps forward to rape me.@
mov %hseanwave,1:hseanwave
lsp 690,":a;chara\ant_ct01.bmp",0,0:print 10,500
>She eagerly forces me inside her soft vagina in a single powerful thrust.\
name ""
name "Luka"
>Ahh...\
name ""
>Tears start to appear in my eyes from the combination of humiliation and pleasure of their gang rape.\
>At the same time, the Ant Girl's vagina clamps around my penis, as if testing how I feel inside her.\
name "Ant Girl C"
>AH... IT FEELS GOOD...@
>I WANT TO RAPE HIM MORE...\
name ""
>Just like the other Ant Girls, her eyes widen after feeling me in her.@
>She starts to happily bounce on top of me, forcing me in and out of her in powerful pumps.\
>Liquid squirts out of her vagina with every thrust, quickly covering my penis.@
>Lubricated by the Ant Girls' wetness, I easily slip in and out of her body as she rides me as hard as she can.\
name "Luka"
>Ahhhh...\
name ""
name "Ant Girl C"
>ARE YOU GOING TO COME...?@
>DO IT INSIDE, SO I CAN FEEL IT!\
name ""
>The Ant Girl starts to twist her waist as she pumps, excitedly trying new ways to play with me.\
name "Luka"
>Haaa...\
name ""
>With a final powerful thrust, she clamps around me and delivers the final blow.\
gosub *syasei1
lsp 690,":a;chara\ant_ct02.bmp",0,0
gosub *syasei2
name "Luka"
>Ahh...\
name ""
>Unable to take the stimulation, I come inside of her.@
>Forced to another orgasm against my will, tears of humiliation pour out of me as I bask in the orgasm's afterglow.\
>Held down and raped, forced to ejaculate for no reason...@
>It's like my entire existence as a man is being ripped away from me.\
mov %hseanwave,0:hseanwave
csp 690:print 10,500
name "Ant Girl A"
>I WANT TO DO IT AGAIN!\
name ""
>But it looks like the Ant Girls want to keep raping me...@
mov %hseanwave,1:hseanwave
lsp 690,":a;chara\ant_ct01.bmp",0,0:print 10,500
>Given only a few moments of fresh air, my penis is forced into the first Ant Girl's waiting vagina again.\
>Even more, it seems like she was studying the other girls, and moves her waist with even more skill than before, quickly forcing me over the edge after only a few moments.\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\ant_ct02.bmp",0,0
gosub *syasei2
name "Ant Girl B"
>I NEVER WANT THIS TO STOP!\
name ""
name "Ant Girl C"
>YOU'RE OUR SLAVE NOW.@
>WE'LL RAPE YOU FOREVER!\
name ""
>The Ant Girls take turns riding me, raping me until I come inside them.@
>Taking turns one after another, this humiliating rape will never end...\
gosub *anten
mov %hseanwave,0:hseanwave
>After being raped for days, my body and mind are in tatters.@
>The Ant Girls take turns raping me, leaving me no time to do anything else.\
>The worker ants keep me alive to ensure I won't die, so I can continue to sate their lust.@
>A simple slave of the worker ants, my pitiful days continue on...\
>...............\
goto *badend



*queenant_start

mov $name,"Queen Ant"
mov $name2,"Queen Ant"
mov $lavel,"queenant"
mov $tatie1,"queenant_st01"
mov $tatie2,"queenant_st01"
mov $tatie3,"queenant_st03"
mov $tatie4,"queenant_st01"
mov $haikei,"bg102"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,5000
if %nanido=2 mov %max_enemylife,5500
if %nanido=3 mov %max_enemylife,6000
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,40
if %nanido=3 mov %earth_keigen,20
mov %music,2
mov %tikei,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $half_s1,"My skills are good, are they not?"
mov $half_s2,"When you become my breeding slave, you will get to enjoy this every day."
mov $kiki_s1,"You are at your limit, are you not?"
mov $kiki_s2,"Why fight against that desire to pour your seed into me?"
mov %end_n,2
mov %exp_minus,51000
mov %zmonster_x,-330
mov %tukix,350
mov %owaza_count2a,6
mov %owaza_count3a,6
name $name
>Haha... Do you intend to fight?@
>A mere human thinks he can challenge the Ant Queen?\
name ""
name "Luka"
>I don't think you're a bad monster.@
>You're completely justified in your actions...\
name ""
name $name
>Then why are you pointing your sword at me?\
name ""
name "Luka"
>If I don't do anything, you will take over the castle.@
>From every country, liberation armies will come to try to free their fellow humans.\
>In that case, a huge war between humans and monsters will happen...@
>After that, the division will get deeper, and more wars will occur...\
name ""
name $name
>...So I should silently swallow my anger, and pretend as if the unjust actions toward my family never happened?\
>You dare to feel pity for the assailant and lecture the victim?\
name ""
name "Luka"
>Right now, you are certainly the victim...@
>Standing against you right now clearly makes me the bad guy...\
>But after today is over, you will be the source of hatred for thousands, bringing about retaliation after retaliation...\
>I'll stop that before it happens!\
name ""
name $name
>Haha... I would so enjoy seeing that courageous face of yours twisting in agony.@
>Please, would you be so kind as to show it to me!?\
name ""
name ""
goto *common_main



*queenant_v

gosub *face3
name $name
>Urhg... What power...\
name ""
mov %viclose,1:gosub *victory
mov %getexp,30000:gosub *lvup
mov %2299,1
goto *sean0213a



*queenant_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>So you surrender?@
>Very well, I will make you my sex slave.\
name ""
goto *queenant_a



*queenant_main

gosub *cmd_main
if %cmd1=11 goto *common_attack
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *queenant_kousan
if %cmd1=16 goto *queenant_onedari
if %cmd1=17 goto *common_skill
goto *queenant_main



*queenant_yuwaku_a

rnd2 %ransu,1,3
if %ransu=1 gosub *queenant_yuwaku_a1:goto *common_main
if %ransu=2 gosub *queenant_yuwaku_a2:goto *common_main
if %ransu=3 gosub *queenant_yuwaku_a3:goto *common_main



*queenant_yuwaku_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"L...Lick my penis..."
if %ransu=2 mov $sel1,"Y...Your lips..."
if %ransu=3 mov $sel1,"Su...Suck it..."
name "Luka"
eng $sel1:$sel6\
name ""
>Luka pushes his penis toward the Queen Ant's mouth!@
>The soft touch of her lips brushes against his penis!\
if %nanido<2 damage 30,40
if %nanido=2 damage 40,50
if %nanido=3 damage 50,60
if %mylife=0 sub %stack,1:return *queenant_h6
sub %stack,1
goto *queenant_a1



*queenant_yuwaku_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Ahh... B...Breasts..."
if %ransu=2 mov $sel1,"Your breasts are... So soft..."
if %ransu=3 mov $sel1,"Haaa..."
name "Luka"
eng $sel1:$sel6\
name ""
>Luka pushes his penis between the Ant Queen's breasts!@
>Her soft breasts squeeze Luka's penis!\
if %nanido<2 damage 30,40
if %nanido=2 damage 40,50
if %nanido=3 damage 50,60
if %mylife=0 sub %stack,1:return *queenant_h6
sub %stack,1
goto *queenant_a2



*queenant_yuwaku_a3

add %stack,1
name "Luka"
>Haa... I... I want to put it in...\
name ""
name $name
>Haha... So you wish to breed with me?@
>I do not mind. Go ahead.\
name ""
name "Luka"
>Ah...Ahh...\
name ""
skillname "Queen's Stud"
>Luka leans on top of the Queen Ant's body!@
dwave 1,"se\ero_pyu2.ogg"
lsp 690,":a;chara\queenant_ct01.bmp",0,0:print 10,500
>And shoves his penis into her waiting vagina!\
skillcount2 3433
damage 150,170
skillname ""
>Luka is mating with the Queen Ant!\
if %mylife=0 sub %stack,1:return *queenant_h4
name "Luka"
>Ahhh...\
name ""
>Luka smiles as he's finally inside her like he wanted!\
sub %stack,1
goto *queenant_a5



*queenant_a

rnd2 %ransu,1,6
if %ransu<3 gosub *queenant_a1:goto *common_main
if %ransu<5 gosub *queenant_a2:goto *common_main
if %ransu=5 && %owaza_count3a>7 gosub *queenant_a3:goto *common_main
if %ransu=6 && %owaza_count2a>7 gosub *queenant_a4:goto *common_main
skip -5



*queenant_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I shall have a taste of you."
if %ransu=2 mov $sel1,"No man can endure the mouth of a Queen."
if %ransu=3 mov $sel1,"I shall suck out your semen."
if %status=5 mov $sel1,"Haha... So you wish to enjoy my mouth?"
name $name
eng $sel1:$sel6\
name ""
skillname "Queen's Comfortable Mouth"
eng "The Queen Ant's tongue shoots toward Luka's penis!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,25
if %wind=2 && %nanido=2 mov %wind_kakuritu,20
if %wind=2 && %nanido=3 mov %wind_kakuritu,12
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3429
dwave 1,"se\ero_pyu2.ogg"
>Her tongue runs all over Luka's penis!
if %nanido<2 damage 35,45
if %nanido=2 damage 38,48
if %nanido=3 damage 41,51
dwave 1,"se\ero_buchu2.ogg"
>The Queen Ant sucks on the tip of Luka's penis!
if %nanido<2 damage 35,45
if %nanido=2 damage 38,48
if %nanido=3 damage 41,51
dwave 1,"se\ero_pyu2.ogg"
>The Queen Ant sucks Luka's penis into her mouth and runs her tongue all over it!
if %nanido<2 damage 35,45
if %nanido=2 damage 38,48
if %nanido=3 damage 41,51
skillname ""
if %mylife=0 sub %stack,1:return *queenant_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*queenant_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You may pour your seed on my chest."
if %ransu=2 mov $sel1,"How are my breasts? If you come here, you will surely be delighted."
if %ransu=3 mov $sel1,"I shall allow you to taste my breasts."
if %status=5 mov $sel1,"So you desire a Queen's breasts?"
name $name
eng $sel1:$sel6\
name ""
skillname "Queen's Soft Breasts"
eng "The Queen Ant presses her breasts into Luka's groin!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,25
if %wind=2 && %nanido=2 mov %wind_kakuritu,20
if %wind=2 && %nanido=3 mov %wind_kakuritu,12
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3430
dwave 1,"se\ero_paizuri.ogg"
>She forces Luka's penis between her soft breasts!
if %nanido<2 damage 40,50
if %nanido=2 damage 43,53
if %nanido=3 damage 46,56
dwave 1,"se\ero_koki1.ogg"
>She uses her hands to stroke Luka's penis with her breasts!
if %nanido<2 damage 40,50
if %nanido=2 damage 43,53
if %nanido=3 damage 46,56
dwave 1,"se\ero_koki1.ogg"
>Her motions get even faster as she presses even harder!
if %nanido<2 damage 40,50
if %nanido=2 damage 43,53
if %nanido=3 damage 46,56
skillname ""
if %mylife=0 sub %stack,1:return *queenant_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*queenant_a3

add %stack,1
mov %owaza_count3a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Shall I get a little serious?"
if %ransu=2 mov $sel1,"I'll milk out your seed with this skill..."
if %ransu=3 mov $sel1,"Endurance is meaningless. Now, finish..."
name $name
eng $sel1:$sel6\
name ""
skillname "Queen's Unmatched Skill"
eng "The Queen Ant presses her breasts into Luka's groin!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3431
dwave 1,"se\ero_paizuri.ogg"
>She forces Luka's penis between her plump breasts!
if %nanido<2 damage 35,45
if %nanido=2 damage 39,49
if %nanido=3 damage 43,53
dwave 1,"se\ero_koki1.ogg"
>She uses her hands to stroke Luka's penis with her breasts!
if %nanido<2 damage 35,45
if %nanido=2 damage 39,49
if %nanido=3 damage 43,53
dwave 1,"se\ero_pyu2.ogg"
>Her tongue sticks out, licking the tip of Luka's penis between her breasts!
if %nanido<2 damage 35,45
if %nanido=2 damage 39,49
if %nanido=3 damage 43,53
dwave 1,"se\ero_buchu2.ogg"
>She closes her lips around the tip of Luka's penis and sucks on it as she massages his shaft with her breasts!
if %nanido<2 damage 35,45
if %nanido=2 damage 39,49
if %nanido=3 damage 43,53
dwave 1,"se\ero_koki1.ogg"
>She uses another hand to play with his balls at the same time!
if %nanido<2 damage 35,45
if %nanido=2 damage 39,49
if %nanido=3 damage 43,53
skillname ""
if %mylife=0 sub %stack,1:return *queenant_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*queenant_a4

add %stack,1
mov %owaza_count2a,0
if %kousan=2 skip 4
name $name
>Now then, I shall steal your heart...\
name ""
skillname "Eyes of Seduction"
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
eng "The Queen Ant's eyes shine with a mysterious light!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,100
if %wind=2 && %nanido=2 mov %wind_kakuritu,90
if %wind=2 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But a gust of wind blocks Luka's view!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3432
mov %status,5:gosub *status_print
>Luka was seduced by the Queen Ant!\
skillname ""
if %kousan=2 sub %stack,1:return
name "Luka"
>Ahh...\
name ""
name $name
>Haha... You fell in love with me, did you not?@
>Now, I shall do whatever it is that you desire...\
name ""
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,3,4
if %nanido=3 rnd2 %status_turn,4,5
sub %stack,1
return



*queenant_a5

add %stack,1
>Luka is mating with the Queen Ant...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You wish to taste more of this pleasure, do you not?":mov $sel2,"The Queen Ant's flesh wriggles around Luka's penis!"
if %ransu=2 mov $sel1,"A Queen's body is the ultimate in pleasure, is it not?":mov $sel2,"The creases inside her vagina rub against Luka's penis!"
if %ransu=3 mov $sel1,"This is how it feels to mate with a Queen.":mov $sel2,"Luka's penis rubs against her soft flesh!"
if %ransu=4 mov $sel1,"Good, let us mate like this.":mov $sel2,"The Queen Ant tightens around Luka!"
if %ransu=5 mov $sel1,"I shall squeeze out your seed.":mov $sel2,"The Queen Ant's vagina clamps around Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Queen's Stud"
dwave 1,"se\ero_syokusyu1.ogg"
eng $sel2:$sel6
skillcount2 3433
mov %damage_kotei,1
damage 150,170
skillname ""
if %mylife=0 sub %stack,1:return *queenant_h5
sub %stack,1
goto *queenant_a5



*queenant_onedari

mov $list1,"Queen's Comfortable Mouth"
if %3429>0 mov %list_num1,1
mov $list2,"Queen's Soft Breasts"
if %3430>0 mov %list_num2,1
mov $list3,"Queen's Unmatched Skill"
if %3431>0 mov %list_num3,1
mov $list4,"Eyes of Seduction"
if %3432>0 mov %list_num4,1
mov $list5,"Queen's Stud"
if %3433>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *queenant_onedari1
if %cmd1=12 goto *queenant_onedari2
if %cmd1=13 goto *queenant_onedari3
if %cmd1=14 goto *queenant_onedari4
if %cmd1=15 goto *queenant_onedari5
if %cmd1=-1 goto *queenant_main
goto *queenant_onedari



*queenant_onedari1

gosub *onedari_syori
name $name
>You wish to feel the mouth of a Queen?@
>Very well, enjoy the unmatched pleasure...\
name ""
gosub *queenant_a1
skip -1



*queenant_onedari2

gosub *onedari_syori
name $name
>You wish to feel the breasts of a Queen?@
>Very well, enjoy the unmatched pleasure...\
name ""
gosub *queenant_a2
skip -1



*queenant_onedari3

gosub *onedari_syori
name $name
>You wish to take my ultimate skill?@
>Very well, enjoy the unmatched pleasure...\
name ""
gosub *queenant_a3
skip -1



*queenant_onedari4

gosub *onedari_syori
name $name
>You wish to have your very heart taken by me?\
name ""
gosub *queenant_a4
goto *queenant_yuwaku_a



*queenant_onedari5

gosub *onedari_syori
name $name
>You wish to mate with me?@
>I don't mind... Go ahead.\
name ""
name "Luka"
>Ahh...\
name ""
skillname "Queen's Stud"
>Luka leans on top of the Queen Ant's body!\
dwave 1,"se\ero_pyu2.ogg"
lsp 690,":a;chara\queenant_ct01.bmp",0,0:print 10,500
>And shoves his penis into her waiting vagina!
skillcount2 3433
damage 150,170
skillname ""
>Luka is mating with the Queen Ant!\
if %mylife=0 goto *queenant_h4
name "Luka"
>Ahhh...\
name ""
>Luka smiles as he's finally inside her like he wanted!\
add %stack,1
gosub *queenant_a5



*queenant_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\queenant_bk01.bmp",0,0
gosub *syasei2
>As the Queen Ant's tongue runs all over his penis, Luka comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2599,%2599+1:if %2599=1 mov %count_koenemy,%count_koenemy+1
if %2599>%count_most mov %count_most,%2599:mov $count_mostname,$name
count 4,1
mov $bad1,"Luka was forced to orgasm by the Queen Ant's blowjob."
gosub *face2
name $name
>Nnn... Your seed is quite delicious.@
>Next I shall let my womb get a taste.\
name ""
goto *queenant_h



*queenant_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\queenant_bk02.bmp",0,0
gosub *syasei2
>As the Queen Ant's soft breasts squeeze Luka's penis, he comes, covering her chest in semen.\
mov %viclose,1:gosub *lose
mov %2599,%2599+1:if %2599=1 mov %count_koenemy,%count_koenemy+1
if %2599>%count_most mov %count_most,%2599:mov $count_mostname,$name
count 7,1
mov $bad1,"Luka was forced to an orgasm by the Queen Ant's tit fuck."
gosub *face2
name $name
>You scattered your seed all over my chest...@
>Next I shall let my womb get a taste.\
name ""
goto *queenant_h



*queenant_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\queenant_bk01.bmp",0,0
lsp 692,":a;chara\queenant_bk02.bmp",0,0
gosub *syasei2
>Massaged by her breasts and sucked by her mouth at the same time, Luka comes, covering her face and breasts in semen.\
mov %viclose,1:gosub *lose
mov %2599,%2599+1:if %2599=1 mov %count_koenemy,%count_koenemy+1
if %2599>%count_most mov %count_most,%2599:mov $count_mostname,$name
count 7,1
mov $bad1,"Luka was forced to an orgasm by the Queen's ultimate skill."
gosub *face2
name $name
>Haha... Are my skills too much for you?@
>Next I shall ensure your seed lands in my womb...\
name ""
goto *queenant_h



*queenant_h4

mov %ikigoe,3:gosub *ikigoe
name $name
>Haha, impatient, aren't you?\
name ""
gosub *syasei1
lsp 690,":a;chara\queenant_ct02.bmp",0,0
gosub *syasei2
>As soon as Luka forces himself inside the Queen Ant, he comes, overcome by the pleasure.\
mov %viclose,1:gosub *lose
mov %2599,%2599+1:if %2599=1 mov %count_koenemy,%count_koenemy+1
if %2599>%count_most mov %count_most,%2599:mov $count_mostname,$name
count 1,1
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to an orgasm from simple insertion."
gosub *face2
name $name
>No man is able to endure the feeling of a Queen's vagina.@
>...But I still have never seen a man come that pathetically fast.\
name ""
goto *queenant_h



*queenant_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\queenant_ct02.bmp",0,0
gosub *syasei2
>While thrusting inside the Queen Ant's vagina, Luka comes, filling her warm vagina with semen.\
mov %viclose,1:gosub *lose
mov %2599,%2599+1:if %2599=1 mov %count_koenemy,%count_koenemy+1
if %2599>%count_most mov %count_most,%2599:mov $count_mostname,$name
count 1,1
mov $bad1,"Luka eagerly mated with the Queen Ant, coming inside of her."
gosub *face2
name $name
>No man is able to endure the feeling of a Queen's vagina.@
>Well? Am I not amazing?\
name ""
goto *queenant_h



*queenant_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\queenant_bk01.bmp",0,0
lsp 692,":a;chara\queenant_bk02.bmp",0,0
gosub *syasei2
>Indulging in the Queen Ant's body, Luka happily comes, covering the object of his lust with semen.\
mov %viclose,1:gosub *lose
mov %2599,%2599+1:if %2599=1 mov %count_koenemy,%count_koenemy+1
if %2599>%count_most mov %count_most,%2599:mov $count_mostname,$name
count 31,1
mov $bad1,"Seduced by the Queen Ant, Luka eagerly indulged his lust until he came."
gosub *face2
name $name
>You sprayed the proof of your desire all over my body...@
>Next I shall let my womb get a taste.\
name ""
goto *queenant_h



*queenant_h

mov $bad2,"Kept as a lifelong breeding slave, Luka was forced to mate with the Queen Ant until his death."
if %2599=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
>My body relaxes after my orgasm , becoming slack.@
>As soon as I fall to my knees, a mysterious sense of exhaustion comes over me.\
name $name
>The weakness felt after being forced to orgasm by a Queen is considerable.@
>Now, sleep for a while...\
name ""
name "Luka"
>Ah...aah...\
name ""
>Unable to fight against the exhaustion, my eyes slowly close as I drift off to sleep.\
cspl 690,700
bg black,7,1500
>........\
bg "bg\bg022.bmp",10,1500
name "Luka"
>Urhg... Wh...Where am I...?\
name ""
>When I wake up, I'm in some sort of cave.@
lsp 700,":a;chara\queenant_st01.bmp",0,0:print 10,500
>And right in front of me is the Queen Ant...\
name $name
>This is the Queen's room.@
>From now on, you will be my breeding partner.\
name ""
name "Luka"
>Wh...What? No...\
name ""
name $name
>Now then, let us begin mating right away.@
>Come, insert yourself into me.\
name ""
>The Queen Ant pushes her abdomen out toward me.@
>Near the bottom, a wet hole is dripping with liquid, waiting...\
name $name
>Insert yourself into me.@
>After that, you may cease thinking as you leave the rest to me.\
>I shall stimulate you with the highest pleasure for your seed.@
>All you need do is enjoy the pleasure without struggling.\
name ""
name "Luka"
>N...No...\
name ""
>Her hole eagerly twitches in front of my eyes, as if desiring a man's organ inside of it.\
>But I resist the temptation, and refuse her.@
>I can't do those things with a monster... It would break the prohibition...\
name $name
>As the Queen of the insect monsters, I am in charge of reproducing for the entire group.@
>Due to that, I can mate with any living creature.\
>If the creature has a male's genitals, then no matter whom it is, I can force them to ejaculate.@
>Because no matter what happens, the Queen cannot allow her race to die out.\
name ""
>The Queen Ant spreads open her waiting hole as she talks to me.@
>Small bumps line the flesh inside of her, slightly wet with her juices.\
name $name
>Of course, mating with a human male provides the highest quality children...@
>But I'm still capable of extracting semen from all male living creatures.\
>Don't you want to experience the stimulation that forces other creatures to ejaculation?\
>Just think of how the most evolved and advanced genitals for reproduction would feel...\
name ""
name "Luka"
>Ah... Ahh...\
name ""
>I hold my breath, unable to take my eyes off her hole as she talks.@
>Her lewd flesh inside squirms and wriggles around as she speaks.\
>If I put my thing inside there...@
>It looks like I would come in an instant...\
>As the thoughts and imagery cross through my mind, my body naturally reacts.\
name $name
>Haha, your penis has gotten so big...@
>Until now, you've managed to make it through so many battles intact, haven't you?\
>That penis that has been through so much... This is a rare chance to reward it.@
>To enjoy a Queen's vagina is the ultimate reward.\
name ""
>A wet noise sounds through the cave as she continues to show off her hole to me, taunting me with it.\
name $name
>All you have to do is put it in...@
>Once you do, the pleasure will be so overwhelming, you'll stop thinking about anything else...\
name ""
name "Luka"
>...........\
name ""
>Unable to endure it any longer, I wrap my arms around her warm abdomen.@
mov %hseanwave,4:hseanwave
cspl 690,699
lsp 690,":a;chara\queenant_ct01.bmp",0,0:print 10,500
>Just like that, I push myself into the Queen's waiting vagina.\
name "Luka"
>Ahhhh!\
name ""
>The tiny little bumps inside her run all over my penis as I push inside her.@
>The wriggling flesh makes it feel like thousands of tiny little fingers are massaging and caressing every inch of me inside her.\
>Her warm flesh comfortably wraps around me, holding me in place inside her incredible vagina.\
name "Luka"
>Ahh... You're so warm...\
name ""
>I moan as her warmth fills me.@
>As the ecstasy of just feeling her fills me, I start to slowly move inside her.\
name $name
>Mammals prefer warmth to urge out an ejaculation...@
>For you, I made it the optimal temperature.\
>In addition, if I squeeze just a little...\
name ""
>Her soft insides slowly squeeze around my penis, clamping around my shaft.@
>Overcome in an instant, all power fades from my body as I give in to the pleasure.\
name "Luka"
>Ahhhh...\
name ""
gosub *syasei1
lsp 690,":a;chara\queenant_ct02.bmp",0,0
gosub *syasei2
>I quickly explode inside her.@
>As I ejaculate, her body gets even warmer as she squeezes down around me tighter.\
name "Luka"
>Ahh... This...\
name ""
>I was forced to come inside her, just as easily as she said.@
>A slight feeling of humiliation fills me as my semen pours into her body.\
name $name
>Well? How did it feel inside a Queen?@
>That was the method for forcing mammals to orgasm.\
>As I said before, a Queen's vagina can make any type of male ejaculate.@
>Here, like this...\
name ""
name "Luka"
>Ahhh...!!\
name ""
>Suddenly, her vaginal lips clamp around the base of my penis, leaving me completely unable to move inside her.\
>The powerful pressure slowly moves from the base to the tip of my penis, and then back down to the base.@
>As if her vagina was milking me like a cow, the rhythmic squeezing keeps going from my base to the tip.\
name $name
>This is how you make a fish ejaculate.@
>When a male fish receives this type of stimulation, they are quickly forced to release their seed.\
name ""
name "Luka"
>Ahhhh!!\
name ""
>I struggle as the milking motions continue.@
>I'm a human, not a fish... She can't play with me like this...\
>Trying to resist the humiliation of being forced to come like this, I try everything I can to escape.\
name "Luka"
>Haaa...\
name ""
>But locked tightly inside her, I can't get away.@
>As my face goes red in shame, my penis twitches inside her as I can't take the stimulation any longer.\
gosub *syasei1
lsp 690,":a;chara\queenant_ct03.bmp",0,0
gosub *syasei2
name "Luka"
>Haaa... I came...\
name ""
name $name
>Oh my... That was how fish ejaculate, yet you did as well?@
>I thought you were a human... That is quite pathetic.\
name ""
name "Luka"
>Urhg...\
name ""
>I tremble in misery as she steps on my pride as a man.\
name $name
>Now then, do you wish to feel how birds are brought to ejaculate?@
>For birds, you do it like this...\
name ""
name "Luka"
>Ahhhhh!!\
name ""
>Her soft flesh suddenly clamps around my penis from the base to the tip, crushing my penis inside her warm vagina.\
>I squirm in pleasure as the soft texture of her vagina squeezes tightly around my penis.\
name $name
>Haha... Will you come like a lowly animal again, even though you're a human?@
>Such a pathetic man... Reaching an orgasm from a stimulus not even catered to your own species.\
name ""
name "Luka"
>Ahh...\
name ""
>I try to endure it, but I can't last long...@
>Finally giving in, I relax my waist as I let the ecstasy wash over me.\
gosub *syasei1:gosub *syasei2
name "Luka"
>Ahhh...\
name ""
name $name
>So you came...@
>How was it, coming like you were a simple bird?\
>Next, I shall give the stimulation for an insect...@
>I wonder, would you really reach an orgasm like an insect?\
name ""
name "Luka"
>Ahhhh!\
name ""
>Suddenly, a powerful suction feeling pulls on my penis.@
>As if being sucked by a powerful mouth inside of her, her vagina wriggles and rubs against me.\
name $name
>You force insects to ejaculate by this type of suction stimulation...@
>But... It looks like you as a human are enjoying it too.\
name ""
>I writhe in pleasure as the Ant Queen giggles at me.@
>Relaxing my waist, I give in again as the powerful suction makes it feel like I'm being sucked into her body.\
name "Luka"
>Haaaa...\
name ""
gosub *syasei1
lsp 690,":a;chara\queenant_ct04.bmp",0,0
gosub *syasei2
>Again, I'm forced to an orgasm by a stimulus that isn't even supposed to be used on humans.\
name $name
>That's how to make an insect come.@
>That's the first time a human has ever come from it...\
name ""
name "Luka"
>Ahhh...\
name ""
>With my pride as a man already gone, now she's tearing away my pride as a human.@
>Helpless, I tremble as I watch the Queen Ant deciding what type of stimulation to use next.\
name $name
>Now then, which way did you like the most?@
>I'll let you choose the stimulation you prefer the most.\
>Or do you wish to continue feeling more new methods?\
name ""
name "Luka"
>Ahhhh!!\
name ""
>After that, my mating with the Queen Ant continues on.@
>Forced to come over and over inside her, the Queen Ant continues trying stimulations for different animals on me to see if they work.\
gosub *anten
mov %hseanwave,0:hseanwave
>After breeding with her for days until she was ready to give birth, I still was not released.@
>Recognizing my good genes, she made me her lifelong breeding partner.\
>Thus, I'm forced to continue mating with her from morning until night, every day.@
>Mixing our good genes, she gives birth to a powerful army of Ant Girls...\
>..............\
goto *badend



*maccubus_start

if %continue=1 bgm "bgm\kiki2.ogg"
mov $name,"Maccubus"
mov $name2,"Maccubus"
mov $lavel,"maccubus"
mov $tatie1,"maccubus_st01"
mov $tatie2,"maccubus_st02"
mov $tatie3,"maccubus_st03"
mov $tatie4,"maccubus_h00"
mov $haikei,"bg107"
mov %monster_x,175
mov %monster_y,0
if %nanido=1 mov %max_enemylife,3500
if %nanido=2 mov %max_enemylife,4000
if %nanido=3 mov %max_enemylife,5000
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,20
if %nanido=3 mov %earth_keigen,10
mov %music,0
mov %tikei,5
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't push her off him!"
mov $mogaku_anno2,"Luka forced her off of him!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"It's pointless to struggle... Hehehe."
mov $mogaku_sel2,"You won't get away... I'm going to rape you!"
mov $mogaku_sel3,"It's pointless to struggle... Hehehe."
mov $mogaku_sel4,"You won't get away... I'm going to rape you!"
mov $mogaku_sel5,"It's pointless to struggle... Hehehe."
mov $mogaku_earth_dassyutu1,"What power..."
mov $mogaku_earth_dassyutu2,"So you obtained abnormal power like I did?"
mov $half_s1,"Hehe, does it feel good?"
mov $half_s2,"My pussy feels even better..."
mov $kiki_s1,"It looks like you're at your limit."
mov $kiki_s2,"I'll suck up all your semen with my vagina and send you to heaven..."
mov %end_n,7
mov %exp_minus,0
mov %zmonster_x,-100
mov %tukix,320
mov %owaza_count1a,5
>I jump into the bar and see...\
lsp 700,":a;chara\maccubus_st01.bmp",40,0
lsp 701,":a;chara\mob_seinen2.bmp",160,0:print 10,500
name "Soldier"
>Ah...Ahh...\
name ""
name "Prostitute"
>Haha, it's incredible, isn't it!?@
>I'll make you come even more! Haha!\
name ""
>A man is sprawled out on the floor exhausted.@
>On top of him, a woman is shaking her hips violently as she rides him.\
>This isn't normal...@> She's raping him!\
name "Soldier"
>Ah... Ahhh!\
name ""
>The man trembles as he forces his waist up into the woman.@
>After shaking for a few seconds, his body goes limp.\
name "Luka"
>This is awful...\
name ""
>It isn't just him.@
>There are collapsed men all over the bar.\
name "Prostitute"
>Already finished?@
>That's not fair, having an orgasm before I do!\
name ""
>The prostitute slowly stands up.@
lsp 700,":a;chara\maccubus_st01.bmp",175,0
csp 701:print 10,500
>Looking around, her gaze slowly meets mine.\
name "Prostitute"
>Oh... It's the Hero from earlier today.\
>I think I'll devour you next.@
>I'll let you join the other food collapsed on the ground here.\
name ""
name "Luka"
>Guh... You turned into a Succubus!?\
name ""
>She transformed into a Succubus and came here...\
>Her hands, face and chest are all covered in semen.@
>Just how many men did she cause to faint in exhaustion in such a short time...?\
gosub *face2
name $name
>They gave me so much of their semen...@
>There's so much in my pussy, I can't eat it fast enough!\
>I forced them all in here, and made them fill me up...\
name ""
name "Luka"
>S...Stay back!\
name ""
>I take a step backward as I pull out my sword.@
>If I seal her, will she turn back to normal...?\
mov %music,1
bgm "bgm\battle.ogg"
name $name
>I'll squeeze out your semen, too.@
>I'll absorb everything from you until you're left dry!\
name ""
gosub *face1
goto *common_main



*maccubus_v

gosub *face3
name $name
>The power that I just obtained... No...!\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Her tail and wings vanish as the girl collapses onto the floor!\
mov %viclose,1:gosub *victory
mov %getexp,15000:gosub *lvup
mov %2300,1
goto *sean0218



*maccubus_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>Hehe, so you surrender?@
>You want to be sucked dry by me, too...\
name ""
goto *maccubus_a



*maccubus_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *maccubus_kousan
if %cmd1=16 goto *maccubus_onedari
if %cmd1=17 goto *common_skill
goto *maccubus_main



*maccubus_a

if %kousoku=1 gosub *maccubus_a5
rnd2 %ransu,1,5
if %ransu=1 gosub *maccubus_a1:goto *common_main
if %ransu=2 gosub *maccubus_a2:goto *common_main
if %ransu=3 gosub *maccubus_a3:goto *common_main
if %ransu>3 && %owaza_count1a>6 gosub *maccubus_a4:goto *common_main
skip -5



*maccubus_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll make you come with my hands..."
if %ransu=2 mov $sel1,"Haha, my handjob technique is amazing, isn't it?"
if %ransu=3 mov $sel1,"I've made countless men come with these hands..."
name $name
eng $sel1:$sel6\
name ""
skillname "Succubus Handjob"
dwave 1,"se\ero_koki1.ogg"
eng "Maccubus grabs hold of Luka's penis with her semen covered hand!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,25
if %wind=2 && %nanido=2 mov %wind_kakuritu,20
if %wind=2 && %nanido=3 mov %wind_kakuritu,12
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>Her extremely skilled hands deftly caress his penis!
skillcount2 3434
if %nanido<2 damage 80,90
if %nanido=2 damage 90,100
if %nanido=3 damage 100,110
skillname ""
if %mylife=0 sub %stack,1:return *maccubus_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*maccubus_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Why don't you try coming in my mouth?"
if %ransu=2 mov $sel1,"Please come in my mouth... I'll make you feel good in return."
if %ransu=3 mov $sel1,"My customers couldn't last even a minute in my mouth..."
name $name
eng $sel1:$sel6\
name ""
skillname "Succubus Blowjob"
dwave 1,"se\ero_buchu2.ogg"
eng "Maccubus bends over, opening her semen covered mouth!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,25
if %wind=2 && %nanido=2 mov %wind_kakuritu,20
if %wind=2 && %nanido=3 mov %wind_kakuritu,12
gosub *wind_guard_kakuritu
if %wind_guard_on=0 lsp 700,":a;chara\maccubus_st01.bmp",0,0
if %wind_guard_on=0 lsp 690,":a;chara\maccubus_ct21.bmp",0,0:print 10,500
if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>Holding his penis in her mouth, she sucks on him!
skillcount2 3435
if %nanido<2 damage 90,100
if %nanido=2 damage 100,110
if %nanido=3 damage 110,120
skillname ""
if %mylife=0 sub %stack,1:return *maccubus_h2
if %kousan<2 csp 690:gosub *face1
if %kousan<2 && %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %kousan<2 && %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*maccubus_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll make you cover my breasts with your semen as well."
if %ransu=2 mov $sel1,"Haha, I'll use my breasts!"
if %ransu=3 mov $sel1,"My customers all loved it when I gave them this service!"
name $name
eng $sel1:$sel6\
name ""
skillname "Succubus Tit Fuck"
dwave 1,"se\ero_koki1.ogg"
>Maccubus squeezes Luka between her semen covered breasts!
if %wind=2 && %nanido<2 mov %wind_kakuritu,25
if %wind=2 && %nanido=2 mov %wind_kakuritu,20
if %wind=2 && %nanido=3 mov %wind_kakuritu,12
gosub *wind_guard_kakuritu
if %wind_guard_on=0 lsp 700,":a;chara\maccubus_h21.bmp",0,0:print 10,500
if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3436
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
skillname ""
if %mylife=0 sub %stack,1:return *maccubus_h3
if %kousan<2 gosub *face1
if %kousan<2 && %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %kousan<2 && %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*maccubus_a4

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name $name
>You want me to rape you now, don't you?\
name ""
skillname "Succubus Hold"
>Maccubus pushes Luka down, and mounts him!\
mov %monster_x,0
mov %monster_y,0
mov %kousoku,1:gosub *status_print
>Maccubus is straddling Luka's body like a horse!\
skillname ""
gosub *face2
name $name
if %first_sel1=1 skip 5
>Look, my pussy is all covered in semen already...@
>This dirty hole is going to devour your penis.\
>And until you're dry, I won't stop raping you...\
skip 4
>Look, my pussy is all covered in semen already...@
>This dirty hole is going to devour your penis.\
>Now don't escape this time... Hehe.\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,100
if %earth=0 && %nanido=2 mov %genmogaku,100
if %earth=0 && %nanido=3 mov %genmogaku,100
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
mov %monster_x,175
mov %monster_y,0
sub %stack,1
return



*maccubus_a5

add %stack,1
if %kousan=2 skip 5
name $name
>Are you ready...?@
>Alright, it's time for some fun!\
name ""
skillname "Succubus Pussy"
dwave 1,"se\ero_pyu2.ogg"
lsp 700,":a;chara\maccubus_h01.bmp",0,0:print 10,500
>Maccubus sinks her hips down on Luka, forcing him into her dirtied hole!
skillcount2 3437
mov %damage_kotei,1
damage 130,150
mov %kousoku,2
>Luka is being raped by Maccubus!\
skillname ""
if %mylife=0 sub %stack,1:return *maccubus_h4
name "Luka"
>Ahhhh!\
if %kousan=2 sub %stack,1:return
%ransu,1,4
sub %stack,1
if %ransu=1 goto *maccubus_a6
if %ransu=2 goto *maccubus_a7
if %ransu=3 goto *maccubus_a8
if %ransu=4 goto *maccubus_a9



*maccubus_a6

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Haha... How do you want me to rape you?":mov $sel2,"Her soft vagina gently squeezes around Luka!"
if %ransu=2 mov $sel1,"You'll come inside me... Just like countless others have done!":mov $sel2,"Maccubus giggles as she squeezes Luka's penis!"
if %ransu=3 mov $sel1,"It feels good inside me, doesn't it?":mov $sel2,"Her vagina tightens around the tip of Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Succubus Pussy"
dwave 1,"se\ero_chupa4.ogg"
eng $sel2:$sel6
skillcount2 3437
mov %damage_kotei,1
damage 130,150
skillname ""
if %mylife=0 sub %stack,1:return *maccubus_h5
if %kousan=2 sub %stack,1:return
%ransu,1,4
sub %stack,1
if %ransu=1 goto *maccubus_a6
if %ransu=2 goto *maccubus_a7
if %ransu=3 goto *maccubus_a8
if %ransu=4 goto *maccubus_a9



*maccubus_a7

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Come as much as you can inside...":mov $sel2,"She slowly moves her hips in a circle on top of Luka!"
if %ransu=2 mov $sel1,"No man has endured my waist use... Haha.":mov $sel2,"Maccubus slowly grinds against Luka in a circle!"
if %ransu=3 mov $sel1,"Haha, you can't take it if I do this, can you?":mov $sel2,"Maccubus leans to the side as she grinds against him, forcing the tip of Luka's penis to rub against her vaginal walls!"
name $name
eng $sel1:$sel6\
name ""
skillname "Succubus Grind"
dwave 1,"se\ero_chupa3.ogg"
eng $sel2:$sel6
skillcount2 3438
mov %damage_kotei,1
damage 140,160
skillname ""
if %mylife=0 sub %stack,1:return *maccubus_h6
if %kousan=2 sub %stack,1:return
%ransu,1,4
sub %stack,1
if %ransu=1 goto *maccubus_a6
if %ransu=2 goto *maccubus_a7
if %ransu=3 goto *maccubus_a8
if %ransu=4 goto *maccubus_a9



*maccubus_a8

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Doing it like this is almost cheating!":mov $sel2,"Maccubus bounces on top of Luka, forcing him in and out of her!"
if %ransu=2 mov $sel1,"Don't you love the violent rape!?":mov $sel2,"Maccubus laughs as she pounds against Luka as hard as she can!"
if %ransu=3 mov $sel1,"Hahaha, how's this?":mov $sel2,"Maccubus tightens around Luka's penis as she bounces on top of him!"
name $name
eng $sel1:$sel6\
name ""
skillname "Heavenly Piston"
dwave 1,"se\ero_chupa3.ogg"
eng $sel2:$sel6
skillcount2 3439
if %nanido<2 damage 150,170
if %nanido=2 damage 180,225
if %nanido=3 damage 240,300
skillname ""
if %mylife=0 sub %stack,1:return *maccubus_h7
if %kousan=2 sub %stack,1:return
%ransu,1,4
sub %stack,1
if %ransu=1 goto *maccubus_a6
if %ransu=2 goto *maccubus_a7
if %ransu=3 goto *maccubus_a8
if %ransu=4 goto *maccubus_a9



*maccubus_a9

add %stack,1
name $name
>Haha... Let me show you a new skill I obtained as a Succubus.@
>Have a taste of heaven!\
name ""
skillcount2 3440
skillname "Energy Drain"
dwave 1,"se\ero_chupa5.ogg"
>Her vagina squeezes around Luka's penis, causing pleasure to explode through his body as his energy is drained!
mov %damage_kotei,1
damage 125,140
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
name $name
>Haha, did it feel good?@
>I'll do it again...\
name ""
dwave 1,"se\ero_chupa5.ogg"
>Her vaginal walls slowly rub against Luka's penis, milking out his energy!
mov %damage_kotei,1
damage 125,140
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
name $name
>I'll absorb even more...@
>I'll suck out every drop of your energy...\
name ""
dwave 1,"se\ero_chupa5.ogg"
>Maccubus' vagina tightens around Luka as more energy is sucked out of him!
mov %damage_kotei,1
damage 125,140
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *maccubus_h8
name $name
>You can't take it much longer, can you?@
>Just lay there and let me suck out the rest of your energy...\
name ""
skillcount2 3440
skillname "Energy Drain"
dwave 1,"se\ero_chupa5.ogg"
>Her vaginal walls slowly rub against Luka's penis, milking out his energy!
mov %damage_kotei,1
damage 125,140
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
name $name
>...The next will finish it.@
>Here comes the final blow!\
name ""
dwave 1,"se\ero_chupa5.ogg"
>Warm pleasure spreads through Luka's body as his energy is sucked out!
mov %damage_kotei,1
damage 125,140
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *maccubus_h8
if %kousan=2 sub %stack,1:return
%ransu,1,4
sub %stack,1
if %ransu=1 goto *maccubus_a6
if %ransu=2 goto *maccubus_a7
if %ransu=3 goto *maccubus_a8
if %ransu=4 goto *maccubus_a9



*maccubus_onedari

mov $list1,"Succubus Handjob"
if %3434>0 mov %list_num1,1
mov $list2,"Succubus Blowjob"
if %3435>0 mov %list_num2,1
mov $list3,"Succubus Tit Fuck"
if %3436>0 mov %list_num3,1
mov $list4,"Succubus Pussy"
if %3437>0 mov %list_num4,1
mov $list5,"Succubus Grind"
if %3438>0 mov %list_num5,1
mov $list6,"Heavenly Piston"
if %3439>0 mov %list_num6,1
mov $list7,"Energy Drain"
if %3440>0 mov %list_num7,1
gosub *cmd_onedari
if %cmd1=11 goto *maccubus_onedari1
if %cmd1=12 goto *maccubus_onedari2
if %cmd1=13 goto *maccubus_onedari3
if %cmd1=14 goto *maccubus_onedari4
if %cmd1=15 goto *maccubus_onedari5
if %cmd1=16 goto *maccubus_onedari6
if %cmd1=17 goto *maccubus_onedari7
if %cmd1=-1 goto *maccubus_main
goto *maccubus_onedari



*maccubus_onedari1

gosub *onedari_syori
name $name
>You want my hand to make you feel good?\
name ""
gosub *maccubus_a1
skip -1



*maccubus_onedari2

gosub *onedari_syori
name $name
>You want my mouth to make you feel good?\
name ""
gosub *maccubus_a2
skip -1



*maccubus_onedari3

gosub *onedari_syori
name $name
>You want my breasts to make you feel good?\
name ""
gosub *maccubus_a3
skip -1



*maccubus_onedari4

gosub *onedari_syori_k
name $name
>Haha... You want me to rape you?\
name ""
if %kousoku=0 gosub *maccubus_a4
if %kousoku=1 gosub *maccubus_a5
gosub *maccubus_a6
skip -1



*maccubus_onedari5

gosub *onedari_syori_k
name $name
>Haha... You want me to ride on top of you and grid my waist against yours?\
name ""
if %kousoku=0 gosub *maccubus_a4
if %kousoku=1 gosub *maccubus_a5
gosub *maccubus_a7
skip -1



*maccubus_onedari6

gosub *onedari_syori_k
name $name
>Haha... You want me to pump you like a piston?\
name ""
if %kousoku=0 gosub *maccubus_a4
if %kousoku=1 gosub *maccubus_a5
gosub *maccubus_a8
skip -1



*maccubus_onedari7

gosub *onedari_syori_k
name $name
>Haha... You want to be sucked dry by me?\
name ""
if %kousoku=0 gosub *maccubus_a4
if %kousoku=1 gosub *maccubus_a5
gosub *maccubus_a9
skip -1



*maccubus_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\maccubus_bk03.bmp",175,0
gosub *syasei2
>Stroked by her skilled hands, Luka comes, mixing his semen with the other men's.\
mov %viclose,1:gosub *lose
mov %2600,%2600+1:if %2600=1 mov %count_koenemy,%count_koenemy+1
if %2600>%count_most mov %count_most,%2600:mov $count_mostname,$name
count 5,4
mov $bad1,"Luka was forced to an orgasm by Maccubus' handjob."
gosub *face2
name $name
>Haha... Did you enjoy my hand?@
>Next, I'll have you pour your semen into my pussy!\
name ""
goto *maccubus_h



*maccubus_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\maccubus_st02.bmp",0,0
lsp 690,":a;chara\maccubus_ct22.bmp",0,0
gosub *syasei2
>Stroked by her skilled mouth, Luka comes, mixing his semen with the other men's.\
mov %viclose,1:gosub *lose
mov %2600,%2600+1:if %2600=1 mov %count_koenemy,%count_koenemy+1
if %2600>%count_most mov %count_most,%2600:mov $count_mostname,$name
count 4,4
mov $bad1,"Luka was forced to an orgasm by Maccubus' blowjob."
name $name
>Haha... Did you enjoy my mouth?@
>Next, I'll have you pour your semen into my pussy!\
name ""
goto *maccubus_h



*maccubus_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\maccubus_h22.bmp",0,0
gosub *syasei2
>Squeezed between her soft breasts, Luka comes, mixing his semen with the other men's.\
mov %viclose,1:gosub *lose
mov %2600,%2600+1:if %2600=1 mov %count_koenemy,%count_koenemy+1
if %2600>%count_most mov %count_most,%2600:mov $count_mostname,$name
count 7,4
mov $bad1,"Luka was forced to an orgasm by Maccubus' tit fuck."
name $name
>Haha... Did you enjoy my breasts?@
>Next, I'll have you pour your semen into my pussy!\
name ""
goto *maccubus_h



*maccubus_h4

mov %ikigoe,3:gosub *ikigoe
name $name
>Haha, you're already finishing?\
name ""
gosub *syasei1
lsp 700,":a;chara\maccubus_h02.bmp",0,0
gosub *syasei2
>Unable to take the sensations from simple insertion, Luka comes, filling her vagina with his semen.\
mov %viclose,1:gosub *lose
mov %2600,%2600+1:if %2600=1 mov %count_koenemy,%count_koenemy+1
if %2600>%count_most mov %count_most,%2600:mov $count_mostname,$name
count 1,4
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to an orgasm from simple insertion."
gosub *face2
name $name
>That was fast.@
>Did it really feel that good?\
>Out of all the men in the village, you were the quickest!\
name ""
goto *maccubus_h



*maccubus_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\maccubus_h02.bmp",0,0
gosub *syasei2
>Squeezed inside her soft vagina, Luka comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2600,%2600+1:if %2600=1 mov %count_koenemy,%count_koenemy+1
if %2600>%count_most mov %count_most,%2600:mov $count_mostname,$name
count 1,4
mov $bad1,"Luka was forced to come inside Maccubus' vagina."
gosub *face2
name $name
>My, that was disappointing!\
>Did you really think that weak technique felt good?@
>Well I'm going to do something even better...\
name ""
goto *maccubus_h



*maccubus_h6

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\maccubus_h02.bmp",0,0
gosub *syasei2
>As Maccubus slowly grinds against Luka, he comes, filling her vagina just like all the other men.\
mov %viclose,1:gosub *lose
mov %2600,%2600+1:if %2600=1 mov %count_koenemy,%count_koenemy+1
if %2600>%count_most mov %count_most,%2600:mov $count_mostname,$name
count 1,4
mov $bad1,"Luka was forced to come inside Maccubus as she grinded against him."
gosub *face2
name $name
>My, that was disappointing!\
>Did you really think that weak technique felt good?@
>Well I'm going to do something even better...\
name ""
goto *maccubus_h



*maccubus_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\maccubus_h02.bmp",0,0
gosub *syasei2
>As Maccubus violently rapes Luka, he comes, filling her vagina just like all the other men.\
mov %viclose,1:gosub *lose
mov %2600,%2600+1:if %2600=1 mov %count_koenemy,%count_koenemy+1
if %2600>%count_most mov %count_most,%2600:mov $count_mostname,$name
count 1,4
mov $bad1,"Luka was forced to an orgasm by Maccubus' violent piston movements."
gosub *face2
name $name
>My, that was disappointing!\
>Did you really think that weak technique felt good?@
>Well I'm going to do something even better...\
name ""
goto *maccubus_h



*maccubus_h8

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\maccubus_h02.bmp",0,0
gosub *syasei2
>As Maccubus sucks out Luka's energy, he comes, filling her vagina just like all the other men.\
mov %viclose,1:gosub *lose
mov %2600,%2600+1:if %2600=1 mov %count_koenemy,%count_koenemy+1
if %2600>%count_most mov %count_most,%2600:mov $count_mostname,$name
count 1,4
mov $bad1,"Luka was forced to an orgasm by Maccubus' energy drain."
gosub *face2
name $name
>Haha, I sucked out another man's energy.@
>But I'm going to suck out even more!\
name ""
goto *maccubus_h



*maccubus_h

mov $bad2,"Luka was raped until he was sucked dry."
if %2600=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,2:hseanwave:goto *maccubus_hb
name "Luka"
>Ahh...\
name ""
>Forced to ejaculate from her skilled technique, I fall to my knees in exhaustion.\
cspl 690,699
lsp 700,":a;chara\maccubus_h00.bmp",0,0:print 10,500
>Maccubus pushes me to the ground with a big smile on her face.\
name $name
>You're a virgin, aren't you?@
>I'm going to make a man out of you!\
name ""
name "Luka"
>N...No... Stop this...\
name ""
name $name
>Haha... I did the same thing often during my work.@
>Just like all those other boys, this pussy will devour that virginity of yours.\
name ""
>She uses her finger to play with her vagina as she shows it off to me.@
>The semen from the other men she has raped drips out of her hole as it mixes with her wetness.\
>It's a dirty sight, the likes of which I've never seen before...\
name "Luka"
>Ah...Ahh...\
name ""
name $name
>This dirty pussy of mine, already used by countless men before you...@
>This is how you're going to lose your important virginity.\
>Hahaha... Too bad, huh? \
name ""
name "Luka"
>Ahh... No... No, don't!\
name ""
>She drops her waist on me as she listens to me beg her not to.@
>Forced into her, my penis pierces right into her vagina, already covered in other men's semen.\
mov %hseanwave,2:hseanwave
lsp 700,":a;chara\maccubus_h01.bmp",0,0:print 10,500
name $name
>Haha, look, I just ate up your penis!\
name ""
name "Luka"
>Ahhhh!\
name ""
goto *maccubus_hb



*maccubus_hb

>I feel the other men's semen all the way inside her, acting as a lubricant for my own penis.\
>Her warm interior keeps it warm and slimy, filling me with a sense of disgust at the sensation.\
name "Luka"
>Urhgg...!!\
name ""
name $name
>Haha... Devoured by a Succubus, and losing your virginity at the same time.@
>How are you liking your first taste of pussy?\
name ""
>Just the feeling of being inside her soft vagina is too much.@
>Picking up on my natural instincts, my body screams for more as I try to escape from her hold.\
>Parts of her semen covered body rest on mine, making me feel the slimy sensation every so often.\
>As the pleasure mixes with the disgust, I tremble in confusion under her.\
name "Luka"
>Ahh... No, stop this...\
name ""
name $name
>Aww... You don't like this semen covered pussy that took your virginity?@
>Then... I guess I'll finish this quickly, little virgin boy. \
name ""
name "Luka"
>Ahhhh!\
name ""
>With a laugh, she clamps her pussy down around my penis, squeezing me with her slimy walls.\
>Surprised at the sudden stimulation, I almost ejaculate right there.\
name "Luka"
>Ahh... I... I'm going to come...!\
name ""
name $name
>Well, your virgin dick can't help but come right away, I guess.\
>Now come on, come inside my pussy.@
>Your semen will just be added to everyone else's.\
name ""
>She giggles as she rhythmically squeezes me, forcing me over the edge in only a few moments.\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\maccubus_h02.bmp",0,0
gosub *syasei2
>I explode inside Maccubus, filling her already slimy vagina with even more semen.\
>This Succubus is laughing as she easily forces me to come inside her...@
>My body relaxes as the shame and pleasure both compete to take over my thoughts.\
name $name
>Haha, look at you squirting inside me.@
>Your virgin dick couldn't even last 20 seconds!\
name ""
name "Luka"
>Ahh...\
name ""
>Her soft walls continue to press down into me as I ejaculate, milking out every drop until it's all out of me.\
lsp 700,":a;chara\maccubus_h03.bmp",0,0:print 10,500
name $name
>Alright then! Your virginity is gone, and you've had two orgasms...@
>If I was working, you would be done...@> But this time, I'm feeding.\
>I'll keep absorbing your energy and semen until there's nothing left!\
name ""
name "Luka"
>Y...You can't...@
>Ahhh!\
name ""
>Maccubus starts to slowly shake her hips.@
>Lubricated by the semen, I easily slip in and out of her wet vagina.\
name $name
>Haha... I want to have more fun with you...@
>I'll make you feel amazing until you meet your end!\
name ""
name "Luka"
>Haaaa!\
name ""
>I yell out in horror as my body rejoices in pleasure inside her.\
>But her skilled hip movements continue, slowly eroding away all of my other sensations.@
>Her horrible, dirty vagina feels too good, despite my disgust...\
>Up and down... Her slow, skilled movements fill my body with pleasure.\
name "Luka"
>N...No...\
name ""
>Right before I'm about to ejaculate again, I hold on.@
>Focusing the rest of my power on stopping myself, I manage to endure it.\
name $name
>Oh? You're trying to endure it?@
>Haha, the little virgin boy actually thinks he can endure my technique!?\
name ""
>Maccubus looks down at me with a seductive smile on her face.\
name $name
>Then I'll show you my finisher.@
>No customer has ever lasted longer than 10 seconds when I use this.\
name ""
mov %hseanwave,7:hseanwave
>Her waist suddenly starts to wildly swing around.@
>Side to side, up and down, she tosses me around as she rides me.\
>Wet noises fill the bar as my penis is forced to match every movement she makes.\
name "Luka"
>Ah! Ahhhh!!\
name ""
name $name
>Haha, well?@
>Do you understand now how powerless you are?\
>Give up and just accept it!\
name ""
name "Luka"
>No... I'm going to come...\
name ""
>Unable to take her overpowering hip movements, I let my body relax as the last of my resistance is blown away.\
gosub *syasei1
lsp 700,":a;chara\maccubus_h04.bmp",0,0
gosub *syasei2
name "Luka"
>Ahh...\
name ""
>I tremble as I come, shooting the proof of my surrender into her waiting body.\
lsp 700,":a;chara\maccubus_h05.bmp",0,0:print 10,500
name $name
>Haha, how was my special move?@
>It was amazing, wasn't it?\
name ""
>She looks down at my pathetic figure beneath her.@
>A triumphant smile fills her face, the perfect image of a Succubus who has dominated a man.\
name "Luka"
>Ahh... Stop this already...\
name ""
>Every time I ejaculate, more of my power fades from my body.@
>After my last orgasms, I can barely manage to move.\
>As the overpowering exhaustion gets even stronger, I start to seriously fear for my life.\
name $name
>Unlike the other men, your semen is extremely delicious...@
>I want to squeeze it all out...\
name ""
name "Luka"
>No... Help me...!\
name ""
>She starts to grind her hips against me again as she wags her finger at me, reprimanding me like a child.\
name $name
>Come on, you have to pour it all into my pussy.@
>I'll gulp it all down, so don't worry.\
name ""
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\maccubus_h06.bmp",0,0
gosub *syasei2
>I'm forced to explode inside her again.\
>Her soft walls clamp around me as I ejaculate, and she makes sure to suck out every drop of semen, just like before.\
lsp 700,":a;chara\maccubus_h07.bmp",0,0:print 10,500
name "Luka"
>Ahh... No more...@
>Help me...\
name ""
>Too weak to resist, I have no choice but to lay here as she rapes me.@
>Tears of frustration fall out of my eyes as her rape continues.\
name $name
>Haha, I love this...@
>I'll squeeze you until you're dry!\
name ""
name "Luka"
>Ahhh...\
name ""
gosub *syasei1:gosub *syasei2
>My semen floods into her vagina again, eagerly sucking up every drop.@
>Overcome by exhaustion and pleasure, I'm left in a trance of ecstasy under her.\
name $name
>Haha, more, more!\
name ""
name "Luka"
>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>I don't know how many more times I was forced to ejaculate after that...@
>But after a long time, I lose consciousness...\
gosub *anten
mov %hseanwave,0:hseanwave
name $name
>Haha... Already done?@
>You were quite delicious... Hehe.\
name ""
>All that remains under Maccubus' body is a corpse.@
>The virgin boy who challenged her to a fight...\
>.............\
goto *badend



*minccubus_start

if %continue=1 bgm "bgm\kiki2.ogg"
mov $name,"Mincubus"
mov $name2,"Mincubus"
mov $lavel,"minccubus"
mov $tatie1,"minccubus_st01"
mov $tatie2,"minccubus_st02"
mov $tatie3,"minccubus_st03"
mov $tatie4,"minccubus_st02"
mov $haikei,"bg163"
mov %monster_x,175
mov %monster_y,0
if %nanido=1 mov %max_enemylife,2600
if %nanido=2 mov %max_enemylife,3100
if %nanido=3 mov %max_enemylife,3900
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,90
mov %earth_keigen,20
if %nanido=3 mov %earth_keigen,10
mov %music,0
mov %tikei,5
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't get Mincubus off his face!"
mov $mogaku_anno2,"Luka pushed Mincubus off his face!"
mov $mogaku_anno3,"But with Mincubus riding his face, Luka can't see anything!"
mov $mogaku_sel1,"Ehehe, I'm not getting off. "
mov $mogaku_sel2,"Just give me a lot of milk! "
mov $mogaku_sel3,"Even if you struggle, I'm not getting off! "
mov $mogaku_sel4,"Everyone struggles at first, but then they all calm down. "
mov $mogaku_sel5,"Until you give me your milk, I'm not getting off! "
mov $mogaku_dassyutu1,"Gah! That was surprising..."
mov $mogaku_dassyutu2,"Do you... Do you hate me riding you that much?"
mov $mogaku_earth_dassyutu1,"Wawawa, what crazy power!"
mov $mogaku_earth_dassyutu2,""
mov $half_s1,"Does it feel good...?"
mov $half_s2,"Let me make it even better! "
mov $kiki_s1,"Your penis is twitching!"
mov $kiki_s2,"Your delicious milk is about to come out! "
mov %end_n,7
mov %exp_minus,15000
mov %zmonster_x,-140
mov %tukix,340
mov %owaza_count1a,5
name "Luka"
>That's...\
name ""
lsp 700,":a;chara\minccubus_st01.bmp",15,0
lsp 701,":a;chara\mob_seinen1.bmp",160,0:print 10,500
>A young man I saw earlier in town today is pushed against a wall.@
>Bending down in front of him is a young girl.\
name $name
>Mmm... *Suck*\
name ""
>The young girl is eagerly sucking on his penis...@
>With a tail and wings, it seems like she's another Succubus...\
name "Youth"
>Ahhh...\
name ""
>The young man shudders as a smile crosses his face.@
>Semen pours into the young girl's mouth, who eagerly drinks it all up.\
name $name
>*Slurp* \
name ""
name "Youth"
>Ahhh!\
name ""
>The young man's face shrinks as he yells in pleasure.@
>After a few moments his head droops forward as he collapses to the ground.\
>He probably just fainted...\
csp 701
lsp 700,":a;chara\minccubus_st01.bmp",175,0:print 10,500
name $name
>...Ahhh.@
>Ehehe, your milk was delicious. \
name ""
>The young girl stands up and happily licks her lips clean, swallowing all of his semen.@
>Slowly turning around, her eyes land on me!\
mov %music,1
bgm "bgm\battle.ogg"
gosub *face2
name $name
>Ehehe, now it's your turn, big bro.@
>I'll squeeze out all of your delicious milk. \
name ""
name "Luka"
>Guh...!\
name ""
>I don't want to point my weapon at such a small girl...@
>But I have no choice if I want to turn her back into a human!\
gosub *face1
goto *common_main



*minccubus_v

gosub *face3
name $name
>Ahhh... S...Sister...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Mincubus turns back into a human and collapses to the ground!\
mov %viclose,1:gosub *victory
mov %getexp,15000:gosub *lvup
mov %2301,1
goto *sean0219



*minccubus_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>Ehehe, already surrendering?@
>Alright, then I'm going to play with you a lot. \
name ""
goto *minccubus_a



*minccubus_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *minccubus_kousan
if %cmd1=16 goto *minccubus_onedari
if %cmd1=17 goto *common_skill
goto *minccubus_main



*minccubus_a

if %kousoku=1 rnd2 %ransu,1,2
if %kousoku=1 && %ransu=1 gosub *minccubus_a5:gosub *minccubus_a6:goto *common_main
if %kousoku=1 && %ransu=2 gosub *minccubus_a5:gosub *minccubus_a7:goto *common_main
rnd2 %ransu,1,6
if %ransu=1 gosub *minccubus_a1:goto *common_main
if %ransu=2 gosub *minccubus_a2:goto *common_main
if %ransu=3 gosub *minccubus_a3:goto *common_main
if %ransu>3 && %owaza_count1a>6 gosub *minccubus_a4:goto *common_main
skip -5



*minccubus_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Unf, unf..."
if %ransu=2 mov $sel1,"I'll use my hands to get out your milk. "
if %ransu=3 mov $sel1,"Do my hands feel good?"
name $name
eng $sel1:$sel6\
name ""
skillname "Soft Handjob"
dwave 1,"se\ero_koki1.ogg"
>Mincubus grabs Luka's penis with her small hands, and strokes him as hard as she can!\
if %wind=2 && %nanido<2 mov %wind_kakuritu,15
if %wind=2 && %nanido=2 mov %wind_kakuritu,10
if %wind=2 && %nanido=3 mov %wind_kakuritu,7
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3441
if %nanido<2 damage 65,75
if %nanido=2 damage 75,85
if %nanido=3 damage 85,95
skillname ""
if %mylife=0 sub %stack,1:return *minccubus_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*minccubus_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Squirt your milk into my mouth. "
if %ransu=2 mov $sel1,"I'll suck out your milk with my mouth. "
if %ransu=3 mov $sel1,"Give me a lot, big bro! "
name $name
eng $sel1:$sel6\
name ""
skillname "Wet Blowjob"
dwave 1,"se\ero_pyu2.ogg"
if %wind=2 && %nanido<2 mov %wind_kakuritu,15
if %wind=2 && %nanido=2 mov %wind_kakuritu,10
if %wind=2 && %nanido=3 mov %wind_kakuritu,7
gosub *wind_guard_kakuritu
if %wind_guard_on=0 lsp 700,":a;chara\minccubus_st01.bmp",0,0
if %wind_guard_on=0 lsp 690,":a;chara\minccubus_ct01.bmp",0,0:print 10,500
>Mincubus' long tongue licks Luka's penis!@
if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3442
if %nanido<2 damage 40,45
if %nanido=2 damage 45,50
if %nanido=3 damage 50,55
if %mylife=0 skillname "" sub %stack,1:return *minccubus_h2a
dwave 1,"se\ero_buchu2.ogg"
lsp 700,":a;chara\minccubus_st01.bmp",0,0
lsp 690,":a;chara\minccubus_ct11.bmp",0,0:print 10,500
>She sucks Luka's penis into her mouth and runs her tongue all over it!@
if %nanido<2 damage 40,45
if %nanido=2 damage 45,50
if %nanido=3 damage 50,55
skillname ""
if %mylife=0 sub %stack,1:return *minccubus_h2b
if %kousan<2 csp 690:gosub *face1
if %kousan<2 && %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %kousan<2 && %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*minccubus_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You can cover my hair in milk if you want. "
if %ransu=2 mov $sel1,"Ehehe, hair atttaaack! "
if %ransu=3 mov $sel1,"My silky hair feels really good! "
name $name
eng $sel1:$sel6\
name ""
skillname "Silky Hairjob"
dwave 1,"se\umaru.ogg"
if %wind=2 && %nanido<2 mov %wind_kakuritu,15
if %wind=2 && %nanido=2 mov %wind_kakuritu,10
if %wind=2 && %nanido=3 mov %wind_kakuritu,7
gosub *wind_guard_kakuritu
if %wind_guard_on=0 lsp 700,":a;chara\minccubus_st01.bmp",0,0
if %wind_guard_on=0 lsp 690,":a;chara\minccubus_ct21.bmp",0,0:print 10,500
>Mincubus wraps her silky hair around Luka's penis!\
if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
>She skillfully teases Luka's penis with her hands and mouth as she tightens the hair around him!\
skillcount2 3443
if %nanido<2 damage 80,90
if %nanido=2 damage 90,100
if %nanido=3 damage 100,110
skillname ""
if %mylife=0 sub %stack,1:return *minccubus_h3
if %kousan<2 csp 690:gosub *face1
if %kousan<2 && %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %kousan<2 && %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*minccubus_a4

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name $name
>Ehehe, let's play more! \
name ""
skillname "Face Mount"
dwave 1,"se\ero_paizuri.ogg"
>Mincubus pushes Luka down, and sits on his face!\
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
>Mincubus pushes her vagina into Luka's face!
skillcount2 3444
if %nanido<2 damage 70,80
if %nanido=2 damage 80,90
if %nanido=3 damage 90,100
mov %kousoku,1:gosub *status_print
>Mincubus is riding Luka's face like a horse!\
skillname ""
if %mylife=0 sub %stack,1:return *minccubus_h4
if %kousan=2 sub %stack,1:return
gosub *face2
name $name
if %first_sel1=1 skip 4
>Ehehe, I'm riding you like a horsie. @
>Now I'm going to play with your penis. \
skip 3
>Ehehe, I'm riding you like a horsie. @
>This time I won't let you push me off.\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,4
if %earth=0 && %nanido=2 mov %genmogaku,4
if %earth=0 && %nanido=3 mov %genmogaku,5
if %earth>0 && %nanido<2 mov %genmogaku,2
if %earth>0 && %nanido=2 mov %genmogaku,2
if %earth>0 && %nanido=3 mov %genmogaku,3
sub %stack,1
return



*minccubus_a5

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Make sure you lick my place."
if %ransu=2 mov $sel1,"Do you want to lick me too, big bro?"
if %ransu=3 mov $sel1,"Your face feels really good, big bro..."
name $name
eng $sel1:$sel6\
name ""
skillname "Face Riding"
dwave 1,"se\ero_paizuri.ogg"
>Mincubus pushes her vagina closer to Luka's mouth!@
>The sweet smell and warmth of her fills Luka's senses!\
skillcount2 3444
if %nanido<2 damage 70,80
if %nanido=2 damage 75,85
if %nanido=3 damage 80,90
skillname ""
if %mylife=0 sub %stack,1:return *minccubus_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*minccubus_a6

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll make you feel good with my panties. "
if %ransu=2 mov $sel1,"I'll collect your milk in my panties, big bro."
if %ransu=3 mov $sel1,"Hehe, I was just wearing these. "
name $name
eng $sel1:$sel6\
name ""
skillname "Panty Stroke"
dwave 1,"se\ero_koki1.ogg"
lsp 700,":a;chara\minccubus_hc1.bmp",0,0:print 10,500
>Mincubus wraps Luka's penis in her recently worn panties!@
>She grabs hold of his penis through her silky panties and strokes him up and down!\
skillcount2 3445
if %nanido<2 damage 80,90
if %nanido=2 damage 85,95
if %nanido=3 damage 90,100
skillname ""
if %mylife=0 sub %stack,1:return *minccubus_h5
sub %stack,1
return



*minccubus_a7

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Fill my sock up with milk. "
if %ransu=2 mov $sel1,"I'll put my warm sock onto your penis."
if %ransu=3 mov $sel1,"I'll milk out big bro's milk with my sock. "
name $name
eng $sel1:$sel6\
name ""
skillname "Sock Stroke"
dwave 1,"se\ero_koki1.ogg"
lsp 700,":a;chara\minccubus_ha1.bmp",0,0:print 10,500
>Mincubus puts her warm sock on Luka's penis!@
>She grabs his penis through the sock and gently strokes him!\
skillcount2 3446
if %nanido<2 damage 75,85
if %nanido=2 damage 80,90
if %nanido=3 damage 85,95
skillname ""
if %mylife=0 sub %stack,1:return *minccubus_h6
sub %stack,1
return



*minccubus_onedari

mov $list1,"Soft Handjob"
if %3441>0 mov %list_num1,1
mov $list2,"Wet Blowjob"
if %3442>0 mov %list_num2,1
mov $list3,"Silky Hairjob"
if %3443>0 mov %list_num3,1
mov $list4,"Face Riding"
if %3444>0 mov %list_num4,1
mov $list5,"Panty Stroke"
if %3445>0 mov %list_num5,1
mov $list6,"Sock Stroke"
if %3446>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *minccubus_onedari1
if %cmd1=12 goto *minccubus_onedari2
if %cmd1=13 goto *minccubus_onedari3
if %cmd1=14 goto *minccubus_onedari4
if %cmd1=15 goto *minccubus_onedari5
if %cmd1=16 goto *minccubus_onedari6
if %cmd1=-1 goto *minccubus_main
goto *minccubus_onedari



*minccubus_onedari1

gosub *onedari_syori
name $name
>You want me to milk you with my hands?\
name ""
gosub *minccubus_a1
skip -1



*minccubus_onedari2

gosub *onedari_syori
name $name
>You want me to suck out your milk with my mouth?\
name ""
gosub *minccubus_a2
skip -1



*minccubus_onedari3

gosub *onedari_syori
name $name
>You want me to milk you with my hair?\
name ""
gosub *minccubus_a3
skip -1



*minccubus_onedari4

gosub *onedari_syori_k
name $name
>You want me to sit on your face...? You're weird...\
name ""
if %kousoku=0 gosub *minccubus_a4
gosub *minccubus_a5
skip -1



*minccubus_onedari5

gosub *onedari_syori_k
name $name
>You want me to milk you with my panties?\
name ""
if %kousoku=0 gosub *minccubus_a4
gosub *minccubus_a6
skip -1



*minccubus_onedari6

gosub *onedari_syori_k
name $name
>You want me to milk you with my socks?\
name ""
if %kousoku=0 gosub *minccubus_a4
gosub *minccubus_a7
skip -1



*minccubus_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\minccubus_bk04.bmp",175,0
gosub *syasei2
>As her small hand tightly grasps his penis, Luka comes, covering her cute hand in semen.\
mov %viclose,1:gosub *lose
mov %2601,%2601+1:if %2601=1 mov %count_koenemy,%count_koenemy+1
if %2601>%count_most mov %count_most,%2601:mov $count_mostname,$name
count 5,5
mov $bad1,"Luka was forced to come in Mincubus' hand."
gosub *face2
name $name
>Ehehe, I milked it out. @
>You didn't last very long either, big bro.\
name ""
goto *minccubus_h



*minccubus_h2a

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\minccubus_st02.bmp",0,0
lsp 690,":a;chara\minccubus_ct02.bmp",0,0
lsp 691,":a;chara\minccubus_bk01.bmp",0,0
gosub *syasei2
>As her long tongue runs over Luka's penis, he comes, covering her face in semen.\
mov %viclose,1:gosub *lose
mov %2601,%2601+1:if %2601=1 mov %count_koenemy,%count_koenemy+1
if %2601>%count_most mov %count_most,%2601:mov $count_mostname,$name
count 4,5
mov $bad1,"Luka was forced to come on Mincubus' tongue."
csp 690
lsp 691,":a;chara\minccubus_bk01.bmp",175,0
gosub *face2
name $name
>Ehehe, you got it all over my tongue. @
>You didn't last very long either, big bro.\
name ""
goto *minccubus_h



*minccubus_h2b

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\minccubus_st02.bmp",0,0
lsp 690,":a;chara\minccubus_ct12.bmp",0,0
lsp 691,":a;chara\minccubus_bk01.bmp",0,0
gosub *syasei2
>As her small mouth sucks on his penis, Luka comes, filling her warm mouth with semen.\
mov %viclose,1:gosub *lose
mov %2601,%2601+1:if %2601=1 mov %count_koenemy,%count_koenemy+1
if %2601>%count_most mov %count_most,%2601:mov $count_mostname,$name
count 4,5
mov $bad1,"Luka was forced to come in Mincubus' mouth."
csp 690
lsp 691,":a;chara\minccubus_bk01.bmp",175,0
gosub *face2
name $name
>Ehehe, you squirted your milk right into my mouth. @
>You didn't last very long either, big bro.\
name ""
goto *minccubus_h



*minccubus_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\minccubus_st02.bmp",0,0
lsp 690,":a;chara\minccubus_ct22.bmp",0,0
lsp 692,":a;chara\minccubus_bk02.bmp",0,0
gosub *syasei2
>As Mincubus uses her hair to play with Luka's penis, he comes, covering her silky hair with semen.\
mov %viclose,1:gosub *lose
mov %2601,%2601+1:if %2601=1 mov %count_koenemy,%count_koenemy+1
if %2601>%count_most mov %count_most,%2601:mov $count_mostname,$name
count 22,5
mov $bad1,"Luka was forced to come on Mincubus' hair."
csp 690
lsp 692,":a;chara\minccubus_bk02.bmp",175,0
gosub *face2
name $name
>Ehehe, you covered my head with milk. @
>You didn't last very long either, big bro.\
name ""
goto *minccubus_h



*minccubus_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>As Mincubus plugs up Luka's mouth with her vagina, Luka comes, excited at being ridden.\
mov %viclose,1:gosub *lose
mov %2601,%2601+1:if %2601=1 mov %count_koenemy,%count_koenemy+1
if %2601>%count_most mov %count_most,%2601:mov $count_mostname,$name
count 17,5
mov $bad1,"Luka was forced to an orgasm as Mincubus sat on his face."
gosub *face2
name $name
>Ehehe, your milk shot out. @
>You didn't last very long either, big bro.\
name ""
goto *minccubus_h



*minccubus_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\minccubus_hc3.bmp",0,0
gosub *syasei2
>Stroked with her panties, Luka comes, covering her cute underwear with his semen.\
mov %viclose,1:gosub *lose2
name "Luka"
>Ahh...\
name ""
name $name
>Ehehe, I squeezed out your milk with my panties. @
>You didn't last very long either, big bro.\
>I'll squeeze out more of your milk with my panties, just for you big bro. \
name ""
>Mincubus starts to stroke Luka again with her panties!
skillname "Panty Stroke"
dwave 1,"se\ero_koki1.ogg"
mov %damage_kotei,1
damage 90,110
dwave 1,"se\ero_koki1.ogg"
>She continues to slowly stroke Luka's penis with her underwear!
mov %damage_kotei,1
damage 90,110
skillname ""
name "Luka"
>Ahh... Stop it...\
name ""
name $name
>My panties are nice and silky, aren't they?@
>Go ahead and cover them with your milk. \
name ""
skillname "Panty Stroke"
dwave 1,"se\ero_koki1.ogg"
>Her silky panties rub against Luka's penis!
mov %damage_kotei,1
damage 90,110
dwave 1,"se\ero_koki1.ogg"
>Mincubus gently massages Luka's penis with her panties!
mov %damage_kotei,1
damage 90,110
skillname ""
name "Luka"
>Ahh... I'm going to come...\
name ""
name $name
>Are you going to shoot out your milk again?@
>Go ahead... Cover my panties with it! \
name ""
skillname "Panty Stroke"
dwave 1,"se\ero_koki1.ogg"
>Mincubus rubs the silky panties back and forth around the tip of Luka's penis.
mov %damage_kotei,1
damage 90,110
dwave 1,"se\ero_koki1.ogg"
>She gently squeezes the tip of Luka's penis!
mov %damage_kotei,1
damage 90,110
skillname ""
name "Luka"
>Ahhh...!\
name ""
gosub *syasei1
lsp 700,":a;chara\minccubus_hc4.bmp",0,0
gosub *syasei2
>Giving in to my male instinct, I come, covering the little girl's underwear in semen.@
>The semen sticks to the lining, soaking into the fabric.\
>Gripped by her small hand over her panties, I breathe a long sigh as the feelings from my orgasm fill me.\
name $name
>Ahaha, that's no good. @
>Leaking out in my panties like that...\
>That's so embarrassing, big bro. @
>You're so much bigger than me, but you're still unable to hold it in. \
name ""
name "Luka"
>Ahh...\
name ""
>The little girl laughs at me as she teases me without mercy.\
name $name
>Now I need to punish you for making my panties all dirty, big bro.@
>I guess I'll have to bully your penis with my panties. \
name ""
skillname "Panty Stroke"
dwave 1,"se\ero_koki1.ogg"
>Mincubus tightly grabs Luka's penis with her panties!
mov %damage_kotei,1
damage 90,110
dwave 1,"se\ero_koki1.ogg"
>Like that, she violently pumps Luka's penis!
mov %damage_kotei,1
damage 90,110
skillname ""
name "Luka"
>Ahhh!\
name ""
name $name
>Ahaha, I'm punishing this leaking penis of yours. @
>My panties are going to bully it. \
name ""
skillname "Panty Stroke"
dwave 1,"se\ero_koki1.ogg"
>Mincubus pulls on the panties around Luka's penis, tightening the fabric around him!
mov %damage_kotei,1
damage 90,110
dwave 1,"se\ero_koki1.ogg"
>The fabric tightly wraps around Luka's penis!
mov %damage_kotei,1
damage 90,110
skillname ""
name "Luka"
>Ahhhh!\
name ""
>Mincubus looks at me with an amused smile on her face as I writhe around from the feeling of the silky panties around my penis.\
name $name
>Big bro, are you going to leak again...?@
>You're going to get my cute underwear all dirty with your milk again...\
>Even though I'm punishing you now... How pathetic. \
name ""
>Her smile slowly changes to a dirty one as she continues to tease me with both her words and panties.\
skillname "Panty Stroke"
dwave 1,"se\ero_koki1.ogg"
>Mincubus continues to stroke Luka's penis with her panties!
mov %damage_kotei,1
damage 90,110
dwave 1,"se\ero_koki1.ogg"
>Her tiny hand closes around the tip of Luka's penis!
mov %damage_kotei,1
damage 90,110
skillname ""
name "Luka"
>Ahhhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\minccubus_hc5.bmp",0,0
gosub *syasei2
>With a moan, I explode in her panties again.\
>Despite what she was saying, she was clearly trying to make me ejaculate...\
>My face goes red with humiliation as I realize that this little girl is just toying with me.\
gosub *clear_sprite
gosub *setwindow_01p
name $name
>Ehehe... You got my panties all dirty.@
>It's soaked with big bro's cloudy milk...\
name ""
>Mincubus takes her panties off of my penis.@
>But from her grin, I can tell that more teasing awaits...\
mov %battle,0
mov %hsean,1
mov %2601,%2601+1:if %2601=1 mov %count_koenemy,%count_koenemy+1
if %2601>%count_most mov %count_most,%2601:mov $count_mostname,$name
count 27,5
mov $bad1,"Luka was forced to come in Mincubus' panties."
goto *minccubus_h



*minccubus_h6

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\minccubus_ha2.bmp",0,0
gosub *syasei2
>Stroked with her sock, Luka comes, filling her cute little sock with his semen.\
mov %viclose,1:gosub *lose2
name "Luka"
>Ahh...\
name ""
name $name
>Ehehe, I squeezed out your milk with my sock. @
>You didn't last very long either, big bro.\
>I'll squeeze out more of your milk with my sock, just for you big bro. \
name ""
skillname "Sock Stroke"
dwave 1,"se\ero_koki1.ogg"
>Mincubus grabs Luka's penis through her sock!
mov %damage_kotei,1
damage 90,110
dwave 1,"se\ero_koki1.ogg"
>Her small hand gently strokes him with her sock!
mov %damage_kotei,1
damage 90,110
skillname ""
name "Luka"
>Ahh...\
name ""
name $name
>Ehehe... Does it feel good?@
>I squeezed the last guy's milk out ten times with my other sock.\
name ""
skillname "Sock Stroke"
dwave 1,"se\ero_koki1.ogg"
>Mincubus strokes Luka's penis up and down with her sock!
mov %damage_kotei,1
damage 90,110
dwave 1,"se\ero_koki1.ogg"
>Her small fist slowly tightens around Luka's penis!
mov %damage_kotei,1
damage 90,110
skillname ""
name "Luka"
>Ahh... I'm going to come...\
name ""
name $name
>Ehehe, go ahead, my sock will catch it all. \
name ""
skillname "Sock Stroke"
dwave 1,"se\ero_koki1.ogg"
>The soft fabric of her sock rubs against Luka's penis!
mov %damage_kotei,1
damage 90,110
dwave 1,"se\ero_koki1.ogg"
>Mincubus plays with the tip of Luka's penis through her sock!
mov %damage_kotei,1
damage 90,110
skillname ""
name "Luka"
>Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\minccubus_ha3.bmp",0,0
gosub *syasei2
>Giving in to the stimulation, I explode in her small sock, staining the dark blue fabric with my semen.\
name $name
>Ehehe, I squeezed it out again. @
>Big bro loved my sock so much, he gave it his milk. \
>I want to collect more of big bro's milk with my sock! \
name ""
name "Luka"
>Ahh... S... Stop it...\
name ""
>Ignoring me, Mincubus continues to stroke me with her sock.\
skillname "Sock Stroke"
dwave 1,"se\ero_koki1.ogg"
>Mincubus violently strokes Luka's penis with her sock!
mov %damage_kotei,1
damage 90,110
dwave 1,"se\ero_koki1.ogg"
>Up and down, she pumps Luka's shaft as fast as her small hands can go!
mov %damage_kotei,1
damage 90,110
skillname ""
name "Luka"
>Ahhh...!\
name ""
name $name
>The tip of men's penis is their weak spot, right?@
>Then... I'll bully the tip of your penis! \
name ""
skillname "Sock Stroke"
dwave 1,"se\ero_koki1.ogg"
>Mincubus uses both of her hands to rub the tip of Luka's penis with her palms!
mov %damage_kotei,1
damage 90,110
dwave 1,"se\ero_koki1.ogg"
>The soft fabric of her socks rubs against the tip of Luka's penis!
mov %damage_kotei,1
damage 90,110
skillname ""
name "Luka"
>Ahh...!\
name ""
>An amused smile crosses her face as she watches me writhe under her teasing.\
name $name
>Ehehe... I found your weak spot! @
>Big bro, I'm going to make your milk come out again!\
name ""
>Mincubus looks at me with a seductive look as her small hand closes around the tip of my penis again.\
name $name
>Here, here, here! @
>Milk... Come out!\
name ""
skillname "Sock Stroke"
dwave 1,"se\ero_koki1.ogg"
>While holding the tip of Luka's penis in one hand, a small finger on her other rubs against the back of Luka's penis!
mov %damage_kotei,1
damage 90,110
dwave 1,"se\ero_koki1.ogg"
>Her small hand closes around the tip of Luka's penis as she giggles!
mov %damage_kotei,1
damage 90,110
skillname ""
name "Luka"
>Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\minccubus_ha4.bmp",0,0
gosub *syasei2
>My semen shoots into her sock again.\
>Mincubus laughs like a child who just found a fun new toy to play with as she watches my semen soak into her blue sock.\
gosub *clear_sprite
gosub *setwindow_01p
name $name
>Ehehe... My sock is all soaked in your milk now. @
>I squeezed out so much of big bro's milk... \
name ""
>Mincubus takes her sock off of my penis.@
>But from her grin, I can tell that more teasing awaits...\
mov %battle,0
mov %hsean,1
mov %2601,%2601+1:if %2601=1 mov %count_koenemy,%count_koenemy+1
if %2601>%count_most mov %count_most,%2601:mov $count_mostname,$name
count 27,5
mov $bad1,"Luka was forced to come inside Mincubus' sock."
goto *minccubus_h



*minccubus_h

mov $bad2,"Made into Mincubus' toy, Luka is played with for the rest of his life."
if %2601=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
>After Mincubus forces me to an orgasm, I fall to the ground, exhausted.@
>She stands over my body with a triumphant look on her face.\
name $name
>Ehehe, you can't move any more.@
>Alright then, let me lick that penis of yours. \
name ""
cspl 690,699
lsp 700,":a;chara\minccubus_hb01.bmp",0,0:print 10,500
>Mincubus bends down over me and pushes her face into my groin.@
dwave 1,"se\ero_pyu1.ogg"
>She sticks out her long tongue, and slowly teases my penis with long, deep licks.\
name "Luka"
>Ah...\
name ""
>The little girl's tongue creeps around my penis, gently licking and tasting my sensitive member.@
>I shiver in pleasure as her warm saliva sticks to my skin after each lick.\
>One... Two... Three times her tender tongue lovingly licks across the tip of my penis.\
name "Luka"
>Ahhhh...\
name ""
name $name
>Ehehe... Big bro, your penis tastes so good... \
name ""
mov %hseanvoice,1:hseanvoice
>She sticks out her tongue a little more, and does a long, deep lick up the back of my penis.\
>She's focusing on all my most sensitive areas...@
>This little girl already knows how to force men to come...\
name $name
>Ehehe, it feels good, doesn't it? @>The other guys came after only a minute of this. \
name ""
name "Luka"
>Ahh...\
name ""
name $name
>I'll make you come quickly too, big bro. \
name ""
>She does another deep lick up the back of my penis.@
>When her long tongue reaches my glans, she uses it to gently poke at my urethral opening.\
name "Luka"
>Ah... Haa...\
name ""
>Even though her tongue is moving so slow, the skill the young girl uses it with brings me right to the edge of an orgasm after only a few moments.\
name $name
>Ehehe, are you already about to leak...?@
>I can feel it...\
name ""
>She's even able to feel when I'm about to come...@
>The little girl looks at me with a smile on her face as I shiver.\
name "Luka"
>Ahh...\
name ""
name $name
>Alright, I'll make you come now. \
name ""
>Mincubus presses the tip of her tongue into the back muscle of my penis, as the rest of her tongue pushes against the shaft.\
>The sweet stimulation fills all of my thoughts as I can't focus on anything but her tongue crawling around my penis.\
>There's no way I can even attempt to resist her...\
name $name
>*Lick* ...Now, come! \
name ""
name "Luka"
>Ahhh!\
name ""
>Filled with shame at being toyed with by a little girl, I moan in pleasure as I give in.\
gosub *syasei1
lsp 700,":a;chara\minccubus_hb02.bmp",0,0
gosub *syasei2
>As I ejaculate, her tongue pushes against the back of my penis.@
>Each spurt of semen pushes against her tongue as it comes out, filling me with ecstasy.\
lsp 700,":a;chara\minccubus_hb03.bmp",0,0:print 10,500
name $name
>Ehehe, that was so easy.@
>Big bro, you're nothing special. \
name ""
>She cheerfully giggles.@
>Her innocent looking eyes are a sharp contrast to her devilishness...\
name $name
>Time to lick you more.\
name ""
mov %hseanvoice,2:hseanvoice
lsp 700,":a;chara\minccubus_hb04.bmp",0,0:print 10,500
>Her tongue gets even longer, reaching out all the way to the base of my penis.\
name $name
>Look at how long my tongue got! \
>With this, I can lick you even better.@
>I don't think you'll last even 30 seconds, big bro.\
name ""
>The little girl casually teases me with an innocent smile on her face.@
>After pausing a moment, her long tongue starts to lick my penis, from base to tip.\
name "Luka"
>Ahhhh!!\
name ""
>After every long lick, the saliva left behind drips down onto my legs.@
>Her slow, long licks keep up, covering every inch of my penis in her sticky saliva.\
name $name
>Now, let it leak out! \
name ""
>With her warm saliva all over me as her slow licks continue, I reach the end of my endurance.\
name "Luka"
>Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\minccubus_hb05.bmp",0,0
gosub *syasei2
>I explode, spraying semen into the air, with some landing on her fingers.@
lsp 700,":a;chara\minccubus_hb06.bmp",0,0:print 10,500
>As Mincubus looks down on the proof of my submission to her, she starts to giggle again.\
name $name
>Ahaha... Did it feel good?@
>I can't believe how easy it is to make you come, big bro. \
name ""
name "Luka"
>Ah... Uuuhh...\
name ""
name $name
>I can do these kinds of things now...\
name ""
name "Luka"
>Ahh... Eh...?\
name ""
lsp 700,":a;chara\minccubus_hb07.bmp",0,0:print 10,500
>Her tongue grows even longer, coiling around the base of my penis!\
name $name
>Ehehe... I'm going to devour your penis with my tongue. \
name ""
>Mincubus giggles as she runs her even longer tongue all over my penis.@
>Coiled around the base, her tongue starts to get even longer as it slowly works its way upward, wrapping the rest of my penis.\
>I tremble as this little girl's now monster tongue toys with my penis like it was her own personal toy.\
name "Luka"
>Ah... I'm going to come!\
name ""
>As her tongue continues to wrap around me, I give in, not even trying to resist her any longer.\
gosub *syasei1
lsp 700,":a;chara\minccubus_hb08.bmp",0,0
gosub *syasei2
>I explode, scattering semen all over her face and tongue.@
>Captured by her tongue, I was forced to another pathetic ejaculation...\
lsp 700,":a;chara\minccubus_hb09.bmp",0,0:print 10,500
name $name
>I was still wrapping you up with my tongue...@
>Big bro, you really can't control yourself, can you?\
name ""
>She looks down at me as she reprimands me.@
>After that, her tongue gets even longer, until it finishes coiling around me.\
lsp 700,":a;chara\minccubus_hb10.bmp",0,0:print 10,500
name "Luka"
>Ahhhh!\
name ""
>I feel the warm touch of her tongue all around me.@
>It's like my thing is now just a part of her tongue...\
name $name
>Ehehe, my tongue went round and round your penis. @
>Big bro, does it feel good?\
name ""
name "Luka"
>Ah...Ahh...\
name ""
>She tightens her tongue around me, pushing her soft tongue hard against my sensitive penis.\
name $name
>Now I'm going to tease you while it's all wrapped up like this. @
>I bet you'll come in no time, big bro. \
name ""
name "Luka"
>Ahhh...\
name ""
>I shiver as her tongue gets even tighter around me.@
>Mincubus grins as she watches me squirm under her.\
name $name
>Ahaha, does it feel that good?@
>Then I'll tease you even more. \
name ""
name "Luka"
>Ahhh!\
name ""
>She giggles as she makes her tongue even tighter around me.\
>Slowly being crushed by her tongue as she laughs... I'm nothing but a toy to her.\
name $name
>Eheheh... How's this?\
name ""
name "Luka"
>Ahhh...!\
name ""
>Her squeezing stimulation slowly starts to change.\
>Until now, she was just squeezing my entire penis with her tongue.@
>But now, every part of her tongue but the one clamping the base of my penis loosens, freeing me from the tight pleasure.\
>But that tightness starts to slowly move up the base of my shaft until it reaches my tip, where it starts to go back down again.\
>Her skillful rhythmic tightness motions go up and down, never stopping for even a moment.\
name "Luka"
>Ahh... I'm going to come again...\
name ""
name $name
>Already going to leak again?@
>I don't even remember how many times you've spurted out your milk already...\
>That's so pathetic, big bro. \
name ""
>Mincubus grins as she moves toward the finishing blow.\
>Two separate clamping sensations start from both ends of my penis, each moving up and down at the same time.\
>Giving in at once to the new stimulation, I yell as the pleasure overwhelms me.\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\minccubus_hb11.bmp",0,0
gosub *syasei2
>I come, spraying my semen all over, while her tongue is still coiled around my penis.\
lsp 700,":a;chara\minccubus_hb12.bmp",0,0:print 10,500
name $name
>Ehehe, big bro's milk is all over the place. \
name ""
>The little girl swallows all of the semen that landed on her tongue, happily teasing me in the process.\
>This girl that just became a Succubus is already able to dominate me so easily...\
name $name
>Give me more, big bro! \
name ""
name "Luka"
>Ahh...\
name ""
>Like that, she forces me to ejaculate even more.@
>As much as this little Succubus wants... Over and over...\
gosub *anten
mov %hseanvoice,0:hseanvoice
>Unable to escape, I'm kept as the little girl's semen slave.@
>With my days filled with nothing but Mincubus playing with my penis however she wants, I slowly lose my sanity as I become a slave to the pleasure.\
>................\
goto *badend



*renccubus_start

mov $name,"Lencubus"
mov $name2,"Lencubus"
mov $lavel,"renccubus"
mov $tatie1,"renccubus_st01"
mov $tatie2,"renccubus_st02"
mov $tatie3,"renccubus_st03"
mov $tatie4,"renccubus_st02"
mov $haikei,"bg104"
mov %monster_x,175
mov %monster_y,0
if %nanido=1 mov %max_enemylife,1200
if %nanido=2 mov %max_enemylife,1800
if %nanido=3 mov %max_enemylife,3000
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,100
mov %earth_keigen,20
if %nanido=3 mov %earth_keigen,10
mov %music,1
mov %tikei,5
gosub *maxmp:mov %mp,0
gosub *syutugen
mov $mogaku_anno1,"But Luka is forcibly held down!"
mov $mogaku_anno2,"The Lencubus was thrown off!"
mov $mogaku_anno4,"From this position, Luka lands a critical hit!"
if %nanido=3 mov $mogaku_anno3,"But Luka is forcibly held down!"
mov $mogaku_sel1,"I... I won't let go!"
mov $mogaku_sel2,"I... I won't let go!"
mov $mogaku_sel3,"Even if you struggle, it's useless!"
mov $mogaku_sel4,"Even if you struggle, it's useless!"
mov $mogaku_sel5,"Even if you struggle, it's useless!"
mov $mogaku_dassyutu1,"...You don't want to feel it?"
mov $mogaku_dassyutu2,"Even though it will feel so good, you don't want it?"
mov $mogaku_earth_dassyutu1,"So... Powerful..."
mov $mogaku_earth_dassyutu2,"I want that power too..."
mov $mogaku_kaisin1,"Kyaa!"
mov $mogaku_kaisin2,""
mov %end_n,7
mov %exp_minus,30000
mov %zmonster_x,-130
mov %tukix,320
name $name
>You defeated my younger sister...\
name ""
name "Luka"
>I just turned her back into a human!@
>Don't worry, I'll turn you back as well!\
name ""
lsp 700,":a;chara\renccubus_st02.bmp",175,0:print 10,500
name $name
>Hahaha... I won't let you!@
>I'm bored of living on a farm.\
>With the power of a Succubus, we'll be able to live a luxurious lifestyle!\
lsp 700,":a;chara\renccubus_st01.bmp",175,0:print 10,500
>...And yet, you turned my younger sister back into a human...\
name ""
>The Lencubus glares at me.\
lsp 700,":a;chara\renccubus_st02.bmp",175,0:print 10,500
name $name
>Ehh... You're pretty strong, huh?@
>I can feel it...\
name ""
>She mutters to herself... It doesn't seem like she's very strong herself.\
>The lustful power I feel from her doesn't feel as strong as her sister...\
>It seems like her younger sister's potential for being a Succubus was higher.\
>If that's the case, this shouldn't be too difficult.\
name "Luka"
>I'm sorry, but I'm turning you back into a human too!\
name ""
lsp 700,":a;chara\renccubus_st01.bmp",175,0:print 10,500
name $name
>I won't let you. I finally obtained power...@
>I'll steal your power, and make it my own!\
name ""
mov %sinkou,1
goto *common_main



*renccubus001

mov %sinkou,2
name "Luka"
>.................\
name ""
>As I thought, she's not too strong.@
>If it's like this, I'll be able to defeat her quickly...\
name $name
>It looks like I'm still not strong enough...\
name ""
goto *common_main



*renccubus_v

gosub *face3
name $name
>Power... That's all I wanted...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Lencubus turns back into a human, and falls to the ground!\
mov %viclose,1:gosub *victory
mov %getexp,15000:gosub *lvup
mov %2302,1
goto *sean0220



*renccubus_kousan

gosub *kousan_syori
>Luka surrenders to the promise of pleasure, ending his resistance!\
gosub *face2
name $name
>You'll let me take all of your power?@
>Then... \
name ""
if %kousoku=0 gosub *renccubus_x2:mov %sinkou,2
if %sinkou=2 gosub *renccubus_x3
if %sinkou=3 gosub *renccubus_x4
if %sinkou=4 gosub *renccubus_x5
if %sinkou=5 gosub *renccubus_x6
if %sinkou=6 gosub *renccubus_x7
if %sinkou=7 gosub *renccubus_wait1
if %sinkou=8 gosub *renccubus_wait2
gosub *renccubus_wait3
goto *renccubus_x11



*renccubus_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 && %sinkou<5 && %nanido<3 goto *common_miss3
if %cmd1=11 && %kousoku>0 && %sinkou<5 && %nanido=3 goto *common_mogaku
if %cmd1=11 && %kousoku>0 && %sinkou<7 goto *common_mogaku
if %cmd1=11 && %kousoku>0 && %sinkou=7 goto *renccubus_mogaku1
if %cmd1=11 && %kousoku>0 && %sinkou=8 goto *renccubus_mogaku2
if %cmd1=11 && %kousoku>0 && %sinkou=9 goto *renccubus_mogaku3
if %cmd1=11 goto *common_attack
if %cmd1=12 && %sinkou=7 goto *renccubus_mogaku1
if %cmd1=12 && %sinkou=8 goto *renccubus_mogaku2
if %cmd1=12 && %sinkou=9 goto *renccubus_mogaku3
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 && %sinkou=7 gosub *renccubus_wait1:goto *common_main
if %cmd1=14 && %sinkou=8 gosub *renccubus_wait2:goto *common_main
if %cmd1=14 && %sinkou=9 gosub *renccubus_wait3:goto *common_main
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *renccubus_kousan
if %cmd1=16 goto *renccubus_onedari
if %cmd1=17 goto *common_skill
goto *renccubus_main



*renccubus_mogaku1

mov %sinkou,8
rnd2 %ransu,1,3
if %cmd1=11 && %ransu=1 mov $sel1,"Urhg!"
if %cmd1=11 && %ransu=2 mov $sel1,"Guh... Damn it!"
if %cmd1=11 && %ransu=3 mov $sel1,"Stop!"
if %cmd1=12 && %ransu=1 mov $sel1,"Ahhh!"
if %cmd1=12 && %ransu=2 mov $sel1,"Get... Get off!"
if %cmd1=12 && %ransu=3 mov $sel1,"Gah... Stop!"
name "Luka"
eng $sel1:$sel6\
name ""
if %cmd1=11 mov $sel1,"Luka attacks!"
if %cmd1=11 gosub *mp_kaihuku:gosub *mp
if %cmd1=12 mov $sel1,"Luka struggles!"
eng $sel1:$sel6
>But he's forcibly held down!\
name $name
>What did I just say?@
>I'm already stronger than you!\
name ""
skillname "Level Drain"
skillcount2 3450
dwave 1,"se\ero_chupa6.ogg"
>The Lencubus' vagina vibrates, causing me to twist at the sudden pleasure.\
>With my lower body seemingly going numb, I feel more energy shoot out of me.\
gosub *syasei1
lsp 690,":a;chara\renccubus_ct23.bmp",0,0
gosub *syasei2
>Cloudy liquid shoots out of Luka into the Lencubus!\
gosub *lvdrain
skillname ""
name "Luka"
>Ahhh...\
name ""
name $name
>Hahahaha!@
>You were so strong, but now look at you!\
>If you don't want to lose any more power, all you have to do is shake me off!\
>If you can, of course! Hehe. \
name ""
goto *common_main



*renccubus_mogaku2

mov %sinkou,9
rnd2 %ransu,1,3
if %cmd1=11 && %ransu=1 mov $sel1,"Urhg!"
if %cmd1=11 && %ransu=2 mov $sel1,"Guh... Damn it!"
if %cmd1=11 && %ransu=3 mov $sel1,"Stop!"
if %cmd1=12 && %ransu=1 mov $sel1,"Ahhh!"
if %cmd1=12 && %ransu=2 mov $sel1,"Get... Get off!"
if %cmd1=12 && %ransu=3 mov $sel1,"Gah... Stop!"
name "Luka"
eng $sel1:$sel6\
name ""
if %cmd1=11 mov $sel1,"Luka attacks!"
if %cmd1=11 gosub *mp_kaihuku:gosub *mp
if %cmd1=12 mov $sel1,"Luka struggles!"
eng $sel1:$sel6
>But he's forcibly held down!\
name $name
>Hahaha! Weaaaak!\
name ""
skillname "Level Drain"
skillcount2 3450
dwave 1,"se\ero_chupa6.ogg"
>The tightness and vibrations of her vagina are too much to endure.@
>Unable to move my legs, I feel my energy leak into her again.\
gosub *syasei1
lsp 690,":a;chara\renccubus_ct23.bmp",0,0
gosub *syasei2
>Cloudy liquid shoots out of Luka into the Lencubus!\
gosub *lvdrain
skillname ""
name "Luka"
>Ahhh...\
name ""
name $name
>Hehe... What are you feeling right now?@
>Held down by someone who was so much weaker, raped, having your power all stolen from you...\
>Is it horrifying?@
>But you can't get away anymore!\
>If I drain you one more time, all of your power will be gone.@
>Just give up and enjoy it!\
name ""
goto *common_main



*renccubus_mogaku3

mov %sinkou,10
rnd2 %ransu,1,3
if %cmd1=11 && %ransu=1 mov $sel1,"Urhg!"
if %cmd1=11 && %ransu=2 mov $sel1,"Guh... Damn it!"
if %cmd1=11 && %ransu=3 mov $sel1,"Stop!"
if %cmd1=12 && %ransu=1 mov $sel1,"Ahhh!"
if %cmd1=12 && %ransu=2 mov $sel1,"Get... Get off!"
if %cmd1=12 && %ransu=3 mov $sel1,"Gah... Stop!"
name "Luka"
eng $sel1:$sel6\
name ""
if %cmd1=11 mov $sel1,"Luka attacks!"
if %cmd1=11 gosub *mp_kaihuku:gosub *mp
if %cmd1=12 mov $sel1,"Luka struggles!"
eng $sel1:$sel6
>But he's forcibly held down!\
name $name
>It's a waste of energy to struggle.@
>You're far too weak to break out of my hold.\
>Well, shall I end it?@
>I'll take the last of your power! \
name ""
skillname "Level Drain"
skillcount2 3450
dwave 1,"se\ero_chupa6.ogg"
>The amazing pleasure brought by her only increases.@
>Forcefully lead to another height, more energy flows out.\
gosub *syasei1
lsp 690,":a;chara\renccubus_ct23.bmp",0,0
gosub *syasei2
>Cloudy liquid shoots out of Luka into the Lencubus!\
gosub *lvdrain
skillname ""
name "Luka"
>Aa...a...\
name ""
name $name
>That was delicious! \
>That was the last of your power!@
>Eeeevery bit of it was sucked up by me! \
name ""
goto *renccubus_x11



*renccubus_wait1

add %stack,1
mov %sinkou,8
if %kousan>0 skip 5
>Luka remains motionless.\
name $name
>Oh? So you're going to give me even more? Is that a good idea? Hehe.\
name ""
skillname "Level Drain"
skillcount2 3450
dwave 1,"se\ero_chupa6.ogg"
>The Lencubus' vagina vibrates, causing me to twist at the sudden pleasure.\
>With my lower body seemingly going numb, I feel more energy shoot out of me.\
gosub *syasei1
lsp 690,":a;chara\renccubus_ct23.bmp",0,0
gosub *syasei2
>Cloudy liquid shoots out of Luka into the Lencubus!\
gosub *lvdrain
skillname ""
if %kousan>0 sub %stack,1:return
name "Luka"
>Ahhh...\
name ""
name $name
>Hahahaha!@
>You were so strong, but now look at you!\
>If you don't want to lose any more power, all you have to do is shake me off!\
>If you can, of course! Hehe. \
name ""
sub %stack,1
return



*renccubus_wait2

add %stack,1
mov %sinkou,9
if %kousan>0 skip 6
>Luka remains motionless.\
name $name
>Hehe... Did you give up?@
>Not that it matters... Even if you resist, the result would be the same!\
name ""
skillname "Level Drain"
skillcount2 3450
dwave 1,"se\ero_chupa6.ogg"
>The tightness and vibrations of her vagina are too much to endure.@
>Unable to move my legs, I feel my energy leak into her again.\
gosub *syasei1
lsp 690,":a;chara\renccubus_ct23.bmp",0,0
gosub *syasei2
>Cloudy liquid shoots out of Luka into the Lencubus!\
gosub *lvdrain
skillname ""
if %kousan>0 sub %stack,1:return
name "Luka"
>Ahhh...\
name ""
name $name
>Hehe... What are you feeling right now?@
>Held down by someone who was so much weaker, raped, having your power all stolen from you...\
>Is it horrifying?@
>But you can't get away anymore!\
>If I drain you one more time, all of your power will be gone.@
>Just give up and enjoy it!\
name ""
sub %stack,1
return



*renccubus_wait3

add %stack,1
mov %sinkou,10
if %kousan>0 skip 7
>Luka remains motionless.\
name $name
>Haha... So you gave up!@
>Did you resign yourself to your fate and decide to feel good to the end?\
>I'll let you enjoy losing the last bit of power then! \
name ""
skillname "Level Drain"
skillcount2 3450
dwave 1,"se\ero_chupa6.ogg"
>The amazing pleasure brought by her only increases.@
>Forcefully lead to another height, more energy flows out.\
gosub *syasei1
lsp 690,":a;chara\renccubus_ct23.bmp",0,0
gosub *syasei2
>Cloudy liquid shoots out of Luka into the Lencubus!\
gosub *lvdrain
skillname ""
name "Luka"
>Aa...a...\
name ""
name $name
>That was delicious! \
>That was the last of your power!@
>Eeeevery bit of it was sucked up by me! \
name ""
if %kousan=2 sub %stack,1:return
sub %stack,1
return *renccubus_x11



*renccubus_a

if %kousoku>0 && %sinkou=2 gosub *renccubus_x3:goto *common_main
if %kousoku>0 && %sinkou=3 gosub *renccubus_x4:goto *common_main
if %kousoku>0 && %sinkou=4 gosub *renccubus_x5:goto *common_main
if %kousoku>0 && %sinkou=5 gosub *renccubus_x6:goto *common_main
if %kousoku>0 && %sinkou=6 gosub *renccubus_x7:goto *common_main
if %turn=1 gosub *renccubus_a1:goto *renccubus001
if %turn=2 gosub *renccubus_x2:goto *common_main
rnd2 %ransu,1,5
if %ransu=1 gosub *renccubus_a1:goto *common_main
if %ransu=2 gosub *renccubus_a2:goto *common_main
if %ransu=3 gosub *renccubus_a3:goto *common_main
if %ransu>3 && %sinkou=2 && %owaza_count1a>1 gosub *renccubus_x2b:goto *common_main
if %ransu>3 && %sinkou=3 && %owaza_count1a>1 gosub *renccubus_x3b:goto *common_main
if %ransu>3 && %sinkou=4 && %owaza_count1a>1 gosub *renccubus_x4b:goto *common_main
if %ransu>3 && %sinkou=5 && %owaza_count1a>1 gosub *renccubus_x5b:goto *common_main
if %ransu>3 && %sinkou=6 && %owaza_count1a>1 gosub *renccubus_x5b:goto *common_main
skip -9



*renccubus_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll grab your penis..."
if %ransu=2 mov $sel1,"I know how to make a man feel good..."
if %ransu=3 mov $sel1,"I'll make it feel amazing..."
name $name
eng $sel1:$sel6\
name ""
skillname "Lust Powered Handjob"
dwave 1,"se\ero_koki1.ogg"
>The Lencubus grabs Luka's penis, and slowly strokes him!
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But the wind pushes her hand off!":gosub *wind_guard:sub %stack,1:return
skillcount2 3447
if %nanido<2 damage 5,8
if %nanido=2 damage 7,12
if %nanido=3 damage 10,16
skillname ""
if %mylife=0 sub %stack,1:return *renccubus_h1
sub %stack,1
return



*renccubus_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll use my mouth..."
if %ransu=2 mov $sel1,"I'll suck on it..."
if %ransu=3 mov $sel1,"I want it all in my mouth..."
name $name
eng $sel1:$sel6\
name ""
skillname "Lust Powered Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>The Lencubus gently sucks on Luka's penis!
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
skillcount2 3448
if %nanido<2 damage 6,9
if %nanido=2 damage 9,13
if %nanido=3 damage 12,18
skillname ""
if %mylife=0 sub %stack,1:return *renccubus_h2
sub %stack,1
return



*renccubus_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Like this... I can use my breasts..."
if %ransu=2 mov $sel1,"Even though I may not be large..."
if %ransu=3 mov $sel1,"Whew... How does this feel?"
name $name
eng $sel1:$sel6\
name ""
skillname "Lust Powered Tit Fuck"
dwave 1,"se\ero_koki1.ogg"
>The Lencubus puts Luka's penis between her breasts and gently squeezes him!
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But the wind pushes her away!":gosub *wind_guard:sub %stack,1:return
skillcount2 3449
if %nanido<2 damage 7,10
if %nanido=2 damage 10,15
if %nanido=3 damage 14,20
skillname ""
if %mylife=0 sub %stack,1:return *renccubus_h3
sub %stack,1
return



*renccubus_x2

add %stack,1
name $name
>Haa!\
name ""
skillname "Succubus Hold"
>The Lencubus throws Luka down, and quickly jumps on him!\
lsp 690,":a;chara\renccubus_ct01.bmp",0,0
mov %kousoku,1:gosub *status_print
>The Lencubus is straddling Luka!\
skillname ""
if %kousan>0 sub %stack,1:return
name $name
>Umm... Can I just suck out a little?@
>It's just a little, it really wouldn't be noticeable by someone as strong as you...\
>Please? It will feel really good, I just want to give it a try...@
>You just need to sit still for a little bit, ok?\
name ""
if %earth=0 && %nanido<2 mov %genmogaku,0
if %earth=0 && %nanido=2 mov %genmogaku,0
if %earth=0 && %nanido=3 mov %genmogaku,0
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
sub %stack,1
return



*renccubus_x2b

add %stack,1
name $name
>Haa!\
name ""
skillname "Succubus Hold"
>The Lencubus throws Luka down, and quickly jumps on him!\
lsp 690,":a;chara\renccubus_ct01.bmp",0,0
mov %kousoku,1:gosub *status_print
>The Lencubus is straddling Luka!\
skillname ""
name $name
>Just a little, please let me suck some in...@
>I only want a little, you're so strong you won't even notice...\
>It will feel amazing, I promise!\
name ""
if %earth=0 && %nanido<2 mov %genmogaku,0
if %earth=0 && %nanido=2 mov %genmogaku,0
if %earth=0 && %nanido=3 mov %genmogaku,0
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
sub %stack,1
return



*renccubus_x3

add %stack,1
mov %sinkou,3
if %kousan>0 skip 5
name $name
>Hehehe, you're letting me? Thank you! @
>Well then...\
name ""
skillname "Level Drain"
skillcount2 3450
dwave 1,"se\ero_pyu2.ogg"
lsp 690,":a;chara\renccubus_ct02.bmp",0,0:print 10,500
mov %kousoku,2
>The Lencubus drops her waist down on Luka, forcing him inside!@
>Luka is being violated by the Lencubus!\
name "Luka"
>Ahhh!!\
name ""
>Her warm vagina envelopes me, and a soft pressure pleasantly pushes into me from all sides.\
name $name
>Next, I tighten the insides...@
>Hehehe... \
name ""
name "Luka"
>Ahhhh!!\
name ""
dwave 1,"se\ero_chupa6.ogg"
>She tightens around me, causing a sweet feeling to wash over me.\
gosub *syasei1
lsp 690,":a;chara\renccubus_ct03.bmp",0,0
gosub *syasei2
>In the next moment, a cloudy liquid shoots out of me into her.\
gosub *lvdrain
skillname ""
if %kousan>0 sub %stack,1:return
name "Luka"
>My... My strength...\
name ""
>I've never felt this kind of weakness after ejaculating before...@
>Rather than feeling exhausted, it feels like my power itself just became weaker.\
name $name
>Hehehe... I just sucked in a little bit of your power.@
>But you barely even felt it right?\
name ""
name "Luka"
>My power... You... sucked it in?\
name ""
lsp 690,":a;chara\renccubus_ct13.bmp",0,0:print 10,500
name $name
>Hey, don't you want me to suck out a little more?@
>You're so big and strong, you won't even notice it!\
>Just a little bit more... Don't you want to feel good just a little bit longer?\
name ""
sub %stack,1
return



*renccubus_x3b

add %stack,1
name $name
>Just a little more... I'll take a little more...\
name ""
skillname "Succubus Hold"
>The Lencubus throws Luka down, and quickly jumps on him!\
lsp 690,":a;chara\renccubus_ct11.bmp",0,0
mov %kousoku,1:gosub *status_print
>The Lencubus is straddling Luka!\
skillname ""
name $name
>You're so big and strong...@
>If I just take a little more, you won't even notice it!\
>That's why you should just enjoy the feelings a little!\
name ""
if %earth=0 && %nanido<2 mov %genmogaku,0
if %earth=0 && %nanido=2 mov %genmogaku,0
if %earth=0 && %nanido=3 mov %genmogaku,0
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
sub %stack,1
return



*renccubus_x4

add %stack,1
mov %sinkou,4
name $name
>Thank you! I'll just suck in a little more... \
name ""
skillname "Level Drain"
skillcount2 3450
if %kousoku=2 skip 6
dwave 1,"se\ero_pyu2.ogg"
lsp 690,":a;chara\renccubus_ct12.bmp",0,0:print 10,500
mov %kousoku,2
>The Lencubus drops her waist down on Luka, forcing him inside!@
>Luka is being violated by the Lencubus!\
dwave 1,"se\ero_chupa6.ogg"
>The walls of her vagina slightly vibrate, sending sweet pleasure throughout my waist.@
>The feeling washes over me, making it feel like I'm melting...\
name "Luka"
>Ahh... That feels good...\
name ""
gosub *syasei1
lsp 690,":a;chara\renccubus_ct13.bmp",0,0
gosub *syasei2
>Cloudy liquid shoots out of Luka into the Lencubus!\
gosub *lvdrain
skillname ""
if %kousan>0 sub %stack,1:return
name "Luka"
>Ahh... Again... My power...\
name ""
name $name
>Hehehe... See, I said it would feel good!@
>Doesn't it feel amazing when I suck it out like that?\
>Hey... I want to try a little more...@
>Don't you want more too? The pleasure from my drain...\
name ""
sub %stack,1
return



*renccubus_x4b

add %stack,1
name $name
>I'll throw you down again! \
name ""
skillname "Succubus Hold"
>The Lencubus throws Luka down, and quickly jumps on him!\
lsp 690,":a;chara\renccubus_ct11.bmp",0,0
mov %kousoku,1:gosub *status_print
>The Lencubus is straddling Luka!\
skillname ""
name $name
>Hey... A little more is fine, right?@
>Honestly, it looks like you want to feel it one more time, right?\
>Just lay back and enjoy it, you strong man...\
name ""
if %earth=0 && %nanido<2 mov %genmogaku,0
if %earth=0 && %nanido=2 mov %genmogaku,0
if %earth=0 && %nanido=3 mov %genmogaku,0
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
sub %stack,1
return



*renccubus_x5

add %stack,1
mov $tatie1,"renccubus_st04"
mov $tatie2,"renccubus_st04"
mov $tatie3,"renccubus_st03"
mov $tatie4,"renccubus_st04"
mov %sinkou,5
name $name
>Hehehe... Well then! \
name ""
skillname "Level Drain"
skillcount2 3450
if %kousoku=2 skip 6
dwave 1,"se\ero_pyu2.ogg"
lsp 690,":a;chara\renccubus_ct12.bmp",0,0:print 10,500
mov %kousoku,2
>The Lencubus drops her waist down on Luka, forcing him inside!@
>Luka is being violated by the Lencubus!\
dwave 1,"se\ero_chupa6.ogg"
>The strange movements of her vagina bring unbearable pleasure to me.\
>As if melting away, the pleasure causes me to feel like my power is fading.\
name "Luka"
>Haaa...\
name ""
gosub *syasei1
lsp 690,":a;chara\renccubus_ct13.bmp",0,0
gosub *syasei2
>Cloudy liquid shoots out of Luka into the Lencubus!\
gosub *lvdrain
skillname ""
if %kousan>0 sub %stack,1:return
name "Luka"
>Ahhhh....\
name ""
lsp 690,":a;chara\renccubus_ct23.bmp",0,0:print 10,500
name $name
>Hehehe... I sucked some more! @
>Did it feel good?\
>I know I said one more, but you really want to feel it again right?\
name ""
name "Luka"
>N...No... Stop... Any more and...\
name ""
>I can't let her take any more of my power.@
>But even so, the ruinous desire of wanting to feel more sucked out of me starts to spring up...\
if %earth=0 && %nanido<2 mov %genmogaku,1
if %earth=0 && %nanido=2 mov %genmogaku,1
if %earth=0 && %nanido=3 mov %genmogaku,1
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,1
mov $mogaku_anno3,"But Luka is forcibly held down!"
sub %stack,1
return



*renccubus_x5b

add %stack,1
name $name
>I still want to suck in more...\
name ""
skillname "Succubus Hold"
>The Lencubus throws Luka down, and quickly jumps on him!\
lsp 690,":a;chara\renccubus_ct21.bmp",0,0
mov %kousoku,1:gosub *status_print
>The Lencubus is straddling Luka!\
skillname ""
name $name
>I'll suck in some more...@
>Just lay there and enjoy it...\
name ""
if %earth=0 && %nanido<2 mov %genmogaku,1
if %earth=0 && %nanido=2 mov %genmogaku,1
if %earth=0 && %nanido=3 mov %genmogaku,1
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,1
sub %stack,1
return



*renccubus_x6

add %stack,1
mov %sinkou,6
name $name
>Hehehe... I'll take some more! \
name ""
skillname "Level Drain"
skillcount2 3450
if %kousoku=2 skip 6
dwave 1,"se\ero_pyu2.ogg"
lsp 690,":a;chara\renccubus_ct22.bmp",0,0:print 10,500
mov %kousoku,2
>The Lencubus drops her waist down on Luka, forcing him inside!@
>Luka is being violated by the Lencubus!\
dwave 1,"se\ero_chupa6.ogg"
>Her vagina slowly narrows, until I start to feel crushed by her soft walls.@
>The overpowering pleasure forces me to finish in an instant.\
name "Luka"
>Faaa...\
name ""
gosub *syasei1
lsp 690,":a;chara\renccubus_ct23.bmp",0,0
gosub *syasei2
>Cloudy liquid shoots out of Luka into the Lencubus!\
gosub *lvdrain
skillname ""
name "Luka"
>Uwaa...\
name ""
name $name
>Hehe... This feels amazing.@
>I want more of your power...\
name ""
sub %stack,1
return



*renccubus_x7

add %stack,1
mov %sinkou,7
name $name
>Here, I'll suck some more. \
name ""
skillname "Level Drain"
skillcount2 3450
if %kousoku=2 skip 6
dwave 1,"se\ero_pyu2.ogg"
lsp 690,":a;chara\renccubus_ct22.bmp",0,0:print 10,500
mov %kousoku,2
>The Lencubus drops her waist down on Luka, forcing him inside!@
>Luka is being violated by the Lencubus!\
dwave 1,"se\ero_chupa6.ogg"
>As if having my penis sucked by her, sweet pleasure is forced into me.@
>Unable to hold back, I instantly ejaculate inside of her.\
gosub *syasei1
lsp 690,":a;chara\renccubus_ct23.bmp",0,0
gosub *syasei2
>Cloudy liquid shoots out of Luka into the Lencubus!\
gosub *lvdrain
skillname ""
if %kousan>0 sub %stack,1:return
name "Luka"
>Auuu...\
name ""
name $name
>Hahaha... Do you know how much of your power I've sucked?@
>Hey... Did you notice?\
>I'm stronger than you now...@
>Haha... Don't you think you should struggle?@
>At this rate, I'm going to suck everything out!\
name ""
name "Luka"
>Urhg!\
name ""
>I can't let this go any further!!\
sub %stack,1
return



*renccubus_x11

name $name
>Now I'm going to suck up your energy...@
>You know it already... But it's useless to resist.\
>I'm way stronger than you now after all! \
name ""
name "Luka"
>Uhgg...\
name ""
>It's is if all of the training and fights I've been through up until now are all a dream.@
>I can't even break her grip on me, much less fight back...\
name $name
>Hehe... How do you want me to rape you?@
>As a special favor, I'll listen to your request.\
>Do you want to be defeated in a dash?@
>Or would you rather me slowly bring you to the border of death?\
name ""
csel "Instantly",*renccubus_x12,"Slowly",*renccubus_x13



*renccubus_x12

if %kousan=2 && %cmd1=15 skip 5
name $name
>Then, I'll finish you in a dash!@
>I'm strong enough to defeat you quickly now, after all. \
name ""
skillname "Energy Drain"
skillcount2 3451
dwave 1,"se\ero_chupa6.ogg"
csp 690
lsp 700,":a;chara\renccubus_h1.bmp",0,0:print 10,500
>She tightens around me even more than before!@
>The insane pleasure races through my lower body!\
mov %damage_kotei,1
damage 130,150
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
name "Luka"
>Ahhhhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\renccubus_h2.bmp",0,0
gosub *syasei2
>I couldn't endure that...@
>It was too much... I came in an instant...\
mov %viclose,1:gosub *lose2
lsp 700,":a;chara\renccubus_h3.bmp",0,0:print 10,500
name $name
>Aha. @
>I only tightened for a moment, and you came so quickly. \
>You're really weak!@
>Or am I just too strong?\
name ""
>The Lencubus goes back on what she said, and continues raping Luka!\
skillname "Energy Drain"
skillcount2 3451
dwave 1,"se\ero_chupa6.ogg"
>She tightens around me even more!\
mov %damage_kotei,1
damage 130,150
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
name "Luka"
>Auuu!!\
name ""
gosub *syasei1
lsp 700,":a;chara\renccubus_h4.bmp",0,0
gosub *syasei2
>The overpowering pleasure forces me to ejaculate a second time.\
lsp 700,":a;chara\renccubus_h5.bmp",0,0:print 10,500
name $name
>Aha... You already came again?@
>Let me try it again...\
name ""
name "Luka"
>Stop! Ahhh!\
name ""
skillname "Energy Drain"
skillcount2 3451
dwave 1,"se\ero_chupa6.ogg"
>Still wrapped tightly around me, her vaginal walls start to vibrate and wriggle around.\
mov %damage_kotei,1
damage 130,150
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
name "Luka"
>Faaaa!!\
name ""
gosub *syasei1
lsp 700,":a;chara\renccubus_h6.bmp",0,0
gosub *syasei2
>Helpless at the intense pleasure, I ejaculate a third time.\
lsp 700,":a;chara\renccubus_h7.bmp",0,0:print 10,500
name "Luka"
>Ahh... Please... Stop...\
name ""
name $name
>I'll make you feel even better!@
>After all, I only got this strong thanks to your help.\
>The right thing to do would be to reward you. \
name ""
skillname "Energy Drain"
skillcount2 3451
dwave 1,"se\ero_chupa6.ogg"
>Countless folds inside of her vagina start to move up and down, as if licking me.\
mov %damage_kotei,1
damage 130,150
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
name "Luka"
>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
name $name
>Letting out so much... Are you feeling good enough yet?@
>Here, I can make it even better! \
name ""
skillname "Energy Drain"
skillcount2 3451
dwave 1,"se\ero_chupa6.ogg"
>Her pussy clamps down even tighter on me, as the folds start to gently vibrate.\
mov %damage_kotei,1
damage 130,150
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
gosub *syasei1:gosub *syasei2
name "Luka"
>Aaa...\
name ""
name $name
>I won't let your reward end yet!\
name ""
skillname "Energy Drain"
skillcount2 3451
dwave 1,"se\ero_chupa6.ogg"
>The intense pleasure only increases as I helplessly squirm under her.\
mov %damage_kotei,1
damage 130,150
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
gosub *syasei1:gosub *syasei2
name "Luka"
>U...a...\
name ""
>The pleasure and exhaustion at my repeated orgasms is too much... I can't move anymore...\
>First I lost all of my power... And now all of my energy?\
mov %2602,%2602+1:if %2602=1 mov %count_koenemy,%count_koenemy+1
if %2602>%count_most mov %count_most,%2602:mov $count_mostname,$name
count 1,3
mov $bad1,"Luka's energy and power were completely sucked out."
gosub *clear_sprite
gosub *setwindow_01p
mov %battle,0
mov %hsean,1
name $name
>Hehe, do you understand now?@
>Now even a Hero won't be able to defeat me! \
name ""
>The Lencubus looks down at me and giggles.\
name $name
>The Hero gave all of his power to the Succubus...@
>I need to really show my thanks to you.@>Hehehe. \
name ""
>The Lencubus shakes her waist as she continues to laugh.\
goto *renccubus_h



*renccubus_x13

if %kousan=2 && %cmd1=16 skip 5
name $name
>Alright then, I'll slowly take your energy!@
>I'll give you a good taste of the vagina you strengthened so much! \
name ""
skillname "Life Killing Vagina"
skillcount2 3452
dwave 1,"se\ero_buchu1.ogg"
csp 690
lsp 700,":a;chara\renccubus_h1.bmp",0,0:print 10,500
>The Lencubus' vaginal walls gently vibrate, causing a soft pleasure to spread through my waist.\
mov %damage_kotei,1
damage 1,1
skillname ""
if %mylife=0 goto *renccubus_h4
name "Luka"
>Ah...\
name ""
name $name
>Hehehe... How was that?@
>I'll do it nice and slow, so you can enjoy it for a long time. \
name ""
skillname "Life Killing Vagina"
skillcount2 3452
dwave 1,"se\ero_buchu1.ogg"
>The vibrations slightly increase, bringing a lukewarm feeling to my penis.\
mov %damage_kotei,1
damage 1,1
skillname ""
if %mylife=0 goto *renccubus_h4
name "Luka"
>Auu...\
name ""
name $name
>Now I'll gently tighten. \
name ""
skillname "Life Killing Vagina"
skillcount2 3452
dwave 1,"se\ero_buchu1.ogg"
>I can feel the Lencubus start to slowly tighten around my penis.\
mov %damage_kotei,1
damage 1,1
dwave 1,"se\ero_buchu1.ogg"
>The pressure from her soft walls slowly increases.\
mov %damage_kotei,1
damage 1,1
dwave 1,"se\ero_buchu1.ogg"
>She slowly gets even tighter, bringing a tantalizing pleasure.\
mov %damage_kotei,1
damage 1,1
skillname ""
if %mylife=0 goto *renccubus_h4
name "Luka"
>Ahhh...\
name ""
name $name
>Oh, what's wrong?@
>Is it possible that you're actually wanting this to happen?\
name ""
skillname "Life Killing Vagina"
skillcount2 3452
dwave 1,"se\ero_buchu1.ogg"
>I can feel her muscles tense as she gets even tighter around me.\
mov %damage_kotei,1
damage 1,1
dwave 1,"se\ero_buchu1.ogg"
>Gradually tightening, the tantalizing pleasure only gets worse.\
mov %damage_kotei,1
damage 1,1
skillname ""
if %mylife=0 goto *renccubus_h4
name "Luka"
>Auu...uuu...\
name ""
name $name
>I see... In reality, you want to come right away, don't you?@
>You're getting frustrated at the slow pleasure... I can see it.\
name ""
skillname "Life Killing Vagina"
skillcount2 3452
dwave 1,"se\ero_buchu1.ogg"
>She continues to squeeze me, slowly getting tighter and tighter...\
mov %damage_kotei,1
damage 1,1
skillname ""
if %mylife=0 goto *renccubus_h4
name $name
>Hehe... You look like you're in pain.@
>Next, I'll slowly move around the inside...\
name ""
skillname "Life Killing Vagina"
skillcount2 3452
dwave 1,"se\ero_buchu1.ogg"
>The Lencubus' vaginal walls start to gently wriggle around my penis.\
mov %damage_kotei,1
damage 1,1
dwave 1,"se\ero_buchu1.ogg"
>Slowly moving in a wave, the irritation from the gentle pleasure becomes even worse.\
mov %damage_kotei,1
damage 1,1
dwave 1,"se\ero_buchu1.ogg"
>The waving motion goes even slower, increasing the irritation further.\
mov %damage_kotei,1
damage 1,1
skillname ""
if %mylife=0 goto *renccubus_h4
name "Luka"
>Faa..aa...\
name ""
name $name
>Hehehe... I can see you want to come...@
>Oh what should I do?\
name ""
skillname "Life Killing Vagina"
skillcount2 3452
dwave 1,"se\ero_buchu1.ogg"
>Her vaginal walls continue to gently stimulate me.\
mov %damage_kotei,1
damage 1,1
dwave 1,"se\ero_buchu1.ogg"
>The teasing pleasure causes me to clench my teeth.\
mov %damage_kotei,1
damage 1,1
dwave 1,"se\ero_buchu1.ogg"
>Her flesh gently wriggles around, causing it to feel like all of my body is numb except for my penis.\
mov %damage_kotei,1
damage 1,1
skillname ""
if %mylife=0 goto *renccubus_h4
name "Luka"
>Auuu...uuu...\
name ""
>I feel like I'm about to come, but then it's instantly denied...@
>Brought right to the limit, it's incredibly irritating.\
>But if I move my waist...\
name $name
>...Stop that.@
>I still want to cherish you.\
name ""
>She quickly overpowers me and forces my waist to the ground.@
>No... I'm already just a toy for her to play with...\
name $name
>Here... I'll start to move my waist.@
>But only slowly... Gently...\
name ""
skillname "Life Killing Vagina"
skillcount2 3452
dwave 1,"se\ero_buchu1.ogg"
>The Lencubus starts to slowly move her waist, bringing more tantalizing soft pleasure.\
mov %damage_kotei,1
damage 1,1
dwave 1,"se\ero_buchu1.ogg"
>She slowly moves around, causing my penis to gently rub against her walls.\
mov %damage_kotei,1
damage 1,1
dwave 1,"se\ero_buchu1.ogg"
>She slowly pulls my penis out of her warm vagina.\
mov %damage_kotei,1
damage 1,1
skillname ""
if %mylife=0 goto *renccubus_h4
name "Luka"
>Th...This...@
>Fa...Faster...\
name ""
name $name
>Hahaha... You want this to be more intense?@
>I can grind against you and quickly pump you...\
>Hmmmmm... Oh, what should I do?\
name ""
skillname "Life Killing Vagina"
skillcount2 3452
dwave 1,"se\ero_buchu1.ogg"
>Almost too slow to see, the Lencubus slowly forces her waist down on me, forcing me back inside.\
mov %damage_kotei,1
damage 1,1
dwave 1,"se\ero_buchu1.ogg"
>The tip of my penis gently rubs against the inside of her as I'm forced back inside.\
mov %damage_kotei,1
damage 1,1
dwave 1,"se\ero_buchu1.ogg"
>Finally back all the way inside her, the irritation brought by the slow pleasure causes my body to twitch as she holds me down.\
mov %damage_kotei,1
damage 1,1
skillname ""
if %mylife=0 goto *renccubus_h4
name "Luka"
>Hauu...\
name ""
name $name
>Hahaha... So that's what a man looks like being raped.@
>I'll tease you a little more...\
name ""
skillname "Life Killing Vagina"
skillcount2 3452
dwave 1,"se\ero_buchu1.ogg"
>The flesh around the tip of my penis starts to tighten, slowly increasing the pressure.\
mov %damage_kotei,1
damage 1,1
dwave 1,"se\ero_buchu1.ogg"
>The folds inside of her gently push into my penis.\
mov %damage_kotei,1
damage 1,1
dwave 1,"se\ero_buchu1.ogg"
>One of the ridges inside of her gently tickles the tip of my penis.\
mov %damage_kotei,1
damage 1,1
skillname ""
if %mylife=0 goto *renccubus_h4
name $name
>Hehehe...\
name ""
skillname "Life Killing Vagina"
skillcount2 3452
dwave 1,"se\ero_buchu1.ogg"
>The flesh near the back muscle of my penis starts to rub against it.\
mov %damage_kotei,1
damage 1,1
dwave 1,"se\ero_buchu1.ogg"
>From the base to the tip, she slowly tightens around me.\
mov %damage_kotei,1
damage 1,1
skillname ""
if %mylife=0 goto *renccubus_h4
name $name
>Hehe... Do you want me to finish you off?@
>Do you want me to let you come right now?\
>Just think, I can let you release whenever I want...\
name ""
name "Luka"
>Let me...\
name ""
name $name
>Hehe... Then I'll continue teasing you. \
name ""
skillname "Life Killing Vagina"
skillcount2 3452
dwave 1,"se\ero_buchu1.ogg"
>She gently squeezes on my tip even tighter.\
mov %damage_kotei,1
damage 1,1
>She slowly tightens around me, as her flesh continues to gently wriggle.\
mov %damage_kotei,1
damage 1,1
skillname ""
if %mylife=0 goto *renccubus_h4
name "Luka"
>Ah! Ahhh!\
name ""
>Feeling an ejaculation coming, I push my waist upward.\
name $name
>Here, I'll let you come.@
>Are you glad?@>Hehehe. \
name ""
skillname "Life Killing Vagina"
skillcount2 3452
dwave 1,"se\ero_buchu1.ogg"
>Right on the edge, her vagina continues to gently stimulate me.\
mov %damage_kotei,1
damage 1,1
dwave 1,"se\ero_buchu1.ogg"
>She tightens around me even more, and I can feel my tip rubbing against her deepest part!\
mov %damage_kotei,1
damage 1,1
skillname ""
if %mylife=0 goto *renccubus_h4
name "Luka"
>Hauuuu...\
name ""
name $name
>Now, I want you to beg.\
name ""
name "Luka"
>B...Beg...?\
name ""
name $name
>"Please let me come".@>Once you say that, I'll finish you off.@
>It will feel absolutely amazing, I promise.\
>Now, beg.\
name ""
>Such a shameful thing...@> I can't say that...\
>That's what I'd normally think...@
>But as I am now, I've been torn apart and desire release above anything else...\
name "Luka"
>Let me come... Please...\
name ""
name $name
>...Good job! \
>Then, I'll finish it!@
>Now... Come! \
name ""
skillname "Life Killing Vagina"
skillcount2 3452
dwave 1,"se\ero_buchu1.ogg"
>The Lencubus instantly tightens around me and slowly twists her waist as she does a single quick pump up and down!\
mov %damage_kotei,1
damage 1,1
skillname ""
gosub *syasei1
lsp 700,":a;chara\renccubus_h2.bmp",0,0
gosub *syasei2
name "Luka"
>Ahhhhhhh...\
name ""
>The irritation all vanishes in an explosion as I reach a powerful climax, shooting my semen into the Lencubus.\
>Feeling like my soul itself shot out in that powerful wave, exhaustion flows over my body.\
mov %viclose,1:gosub *lose
mov %2602,%2602+1:if %2602=1 mov %count_koenemy,%count_koenemy+1
if %2602>%count_most mov %count_most,%2602:mov $count_mostname,$name
count 1,3
mov $bad1,"After Luka's energy was drained, he was slowly forced to come by the Lencubus."
name $name
>Hehe, do you understand now?@
>Now even a Hero won't be able to defeat me! \
name ""
>The Lencubus looks down at me and giggles.\
name $name
>The Hero gave all of his power to the Succubus...@
>I need to really show my thanks to you.@>Hehehe. \
name ""
>The Lencubus shakes her waist as she continues to laugh.\
goto *renccubus_h



*renccubus_onedari

mov $list1,"Lust Powered Handjob"
if %3447>1 mov %list_num1,1
mov $list2,"Lust Powered Blowjob"
if %3448>1 mov %list_num2,1
mov $list3,"Lust Powered Tit Fuck"
if %3449>1 mov %list_num3,1
mov $list4,"Level Drain"
if %3450>1 mov %list_num4,1
mov $list5,"Energy Drain"
if %3451>1 mov %list_num5,1
mov $list6,"Life Killing Vagina"
if %3452>1 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *renccubus_onedari1
if %cmd1=12 goto *renccubus_onedari2
if %cmd1=13 goto *renccubus_onedari3
if %cmd1=14 goto *renccubus_onedari4
if %cmd1=15 goto *renccubus_onedari5
if %cmd1=16 goto *renccubus_onedari6
if %cmd1=-1 goto *renccubus_main
goto *renccubus_onedari



*renccubus_onedari1

gosub *onedari_syori_k
name $name
>You want to be defeated by my hand?@
>Before that... Let me drain all your power! \
name ""
if %kousoku=0 gosub *renccubus_x2:mov %sinkou,2
if %sinkou=2 gosub *renccubus_x3
if %sinkou=3 gosub *renccubus_x4
if %sinkou=4 gosub *renccubus_x5
if %sinkou=5 gosub *renccubus_x6
if %sinkou=6 gosub *renccubus_x7
if %sinkou=7 gosub *renccubus_wait1
if %sinkou=8 gosub *renccubus_wait2
gosub *renccubus_wait3
csp 690:mov %kousoku,0:gosub *status_print
name $name
>Hehe... Are you ready?@
>Now that I'm stronger, my handjob will feel even better!\
>Someone weak like you will ejaculate in an instant.@
>Here I go. \
name ""
skillname "Lust Powered Handjob"
dwave 1,"se\ero_koki1.ogg"
>The Lencubus grabs Luka's penis, and quickly pumps him!\
if %nanido<2 damage 5,8
if %nanido=2 damage 7,12
if %nanido=3 damage 10,16
skillname ""
mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\renccubus_bk03.bmp",175,0
gosub *syasei2
>With her now incredibly skilled hand, she quickly forces Luka to ascend to heaven as he covers her palm with semen.\
mov %viclose,1:gosub *lose
mov %2602,%2602+1:if %2602=1 mov %count_koenemy,%count_koenemy+1
if %2602>%count_most mov %count_most,%2602:mov $count_mostname,$name
count 5,3
mov $bad1,"Luka was defeated by the Lencubus' full powered handjob."
gosub *face2
name $name
>See, in an instant. @
>Isn't my hand amazing?\
name ""
goto *renccubus_h



*renccubus_onedari2

gosub *onedari_syori_k
name $name
>You want to be defeated by my mouth?@
>Then before that... Let me drain your power. \
name ""
if %kousoku=0 gosub *renccubus_x2:mov %sinkou,2
if %sinkou=2 gosub *renccubus_x3
if %sinkou=3 gosub *renccubus_x4
if %sinkou=4 gosub *renccubus_x5
if %sinkou=5 gosub *renccubus_x6
if %sinkou=6 gosub *renccubus_x7
if %sinkou=7 gosub *renccubus_wait1
if %sinkou=8 gosub *renccubus_wait2
gosub *renccubus_wait3
csp 690:mov %kousoku,0:gosub *status_print
name $name
>Hehe... Are you ready?@
>Now that I'm stronger, my blowjob will feel even better!\
>Someone weak like you will ejaculate in an instant.@
>Here I go. \
name ""
skillname "Lust Powered Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>The Lencubus quickly puts Luka's penis in her mouth, and sucks like a vacuum!\
if %nanido<2 damage 6,9
if %nanido=2 damage 9,13
if %nanido=3 damage 12,18
skillname ""
mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\renccubus_bk01.bmp",175,0
gosub *syasei2
>With her now incredibly skilled mouth, she quickly forces Luka to ascend to heaven as he comes inside of her.\
mov %viclose,1:gosub *lose
mov %2602,%2602+1:if %2602=1 mov %count_koenemy,%count_koenemy+1
if %2602>%count_most mov %count_most,%2602:mov $count_mostname,$name
count 4,3
mov $bad1,"Luka was defeated by the Lencubus' full powered blowjob."
gosub *face2
name $name
>See, in an instant. @
>Isn't my mouth amazing?\
name ""
goto *renccubus_h



*renccubus_onedari3

gosub *onedari_syori_k
name $name
>You want to be defeated by my chest?@
>Then before that... Let me drain your power. \
name ""
if %kousoku=0 gosub *renccubus_x2:mov %sinkou,2
if %sinkou=2 gosub *renccubus_x3
if %sinkou=3 gosub *renccubus_x4
if %sinkou=4 gosub *renccubus_x5
if %sinkou=5 gosub *renccubus_x6
if %sinkou=6 gosub *renccubus_x7
if %sinkou=7 gosub *renccubus_wait1
if %sinkou=8 gosub *renccubus_wait2
gosub *renccubus_wait3
csp 690:mov %kousoku,0:gosub *status_print
name $name
>Hehe... Are you ready?@
>Now that I'm stronger, my tit fuck will feel even better!\
>Someone weak like you will ejaculate in an instant.@
>Here I go. \
name ""
skillname "Lust Powered Tit Fuck"
dwave 1,"se\ero_koki1.ogg"
>The Lencubus quickly puts Luka's penis between her breasts, and rubs them up and down!\
if %nanido<2 damage 7,10
if %nanido=2 damage 10,15
if %nanido=3 damage 14,20
skillname ""
mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\renccubus_bk02.bmp",175,0
gosub *syasei2
>Stuck between her soft breasts, Luka quickly ascends to heaven as he comes on her chest.\
mov %viclose,1:gosub *lose
mov %2602,%2602+1:if %2602=1 mov %count_koenemy,%count_koenemy+1
if %2602>%count_most mov %count_most,%2602:mov $count_mostname,$name
count 7,3
mov $bad1,"Luka was defeated by the Lencubus' full powered tit fuck."
gosub *face2
name $name
>See, in an instant. @
>Aren't my breasts amazing?\
name ""
goto *renccubus_h



*renccubus_onedari4

gosub *onedari_syori_k
name $name
>I can take all of your power?@
>Then... \
name ""
if %kousoku=0 gosub *renccubus_x2:mov %sinkou,2
if %sinkou=2 gosub *renccubus_x3
if %sinkou=3 gosub *renccubus_x4
if %sinkou=4 gosub *renccubus_x5
if %sinkou=5 gosub *renccubus_x6
if %sinkou=6 gosub *renccubus_x7
if %sinkou=7 gosub *renccubus_wait1
if %sinkou=8 gosub *renccubus_wait2
gosub *renccubus_wait3
goto *renccubus_x11



*renccubus_onedari5

gosub *onedari_syori_k
name $name
>You want me to drain all of your energy?@
>Then before that, let me drain out all your power... \
name ""
if %kousoku=0 gosub *renccubus_x2:mov %sinkou,2
if %sinkou=2 gosub *renccubus_x3
if %sinkou=3 gosub *renccubus_x4
if %sinkou=4 gosub *renccubus_x5
if %sinkou=5 gosub *renccubus_x6
if %sinkou=6 gosub *renccubus_x7
if %sinkou=7 gosub *renccubus_wait1
if %sinkou=8 gosub *renccubus_wait2
gosub *renccubus_wait3
name $name
>Hehe... Now I can drain your energy just like you wanted.@
>Now then, let me take it all in an instant! \
name ""
goto *renccubus_x12



*renccubus_onedari6

gosub *onedari_syori_k
name $name
>You want me to slowly bring you to the edge?@
>Then before that, let me drain out all your power... \
name ""
if %kousoku=0 gosub *renccubus_x2:mov %sinkou,2
if %sinkou=2 gosub *renccubus_x3
if %sinkou=3 gosub *renccubus_x4
if %sinkou=4 gosub *renccubus_x5
if %sinkou=5 gosub *renccubus_x6
if %sinkou=6 gosub *renccubus_x7
if %sinkou=7 gosub *renccubus_wait1
if %sinkou=8 gosub *renccubus_wait2
gosub *renccubus_wait3
name $name
>Hehe... Now I can bring you right to the edge of life, just like you wanted.\
>I'll let you get a good taste of the vagina you just made powerful. \
name ""
goto *renccubus_x13



*renccubus_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\renccubus_bk03.bmp",175,0
gosub *syasei2
>Gently stroked by her soft hands, Luka finally comes, covering her palm with semen.\
mov %viclose,1:gosub *lose2
mov %2602,%2602+1:if %2602=1 mov %count_koenemy,%count_koenemy+1
if %2602>%count_most mov %count_most,%2602:mov $count_mostname,$name
count 5,3
mov $bad1,"Luka was defeated by the Lencubus' handjob."
gosub *face2
name $name
>Haha... I made you come with my hand! @
>Next, let me drain all of your power...\
name ""
cspl 690,699
if %kousoku=0 gosub *renccubus_x2:mov %sinkou,2
if %sinkou=2 gosub *renccubus_x3
if %sinkou=3 gosub *renccubus_x4
if %sinkou=4 gosub *renccubus_x5
if %sinkou=5 gosub *renccubus_x6
if %sinkou=6 gosub *renccubus_x7
if %sinkou=7 gosub *renccubus_wait1
if %sinkou=8 gosub *renccubus_wait2
skillname "Level Drain"
dwave 1,"se\ero_chupa6.ogg"
>The amazing pleasure brought by her only increases.@
>Forcefully lead to another height, more energy flows out.\
gosub *syasei1
lsp 690,":a;chara\renccubus_ct23.bmp",0,0
gosub *syasei2
>Cloudy liquid shoots out of Luka into the Lencubus!\
gosub *lvdrain
skillname ""
name "Luka"
>Ah...h...\
name ""
csp 690:lsp 700,":a;chara\renccubus_h1.bmp",0,0:print 10,500
name $name
>That was delicious! \
>That was the last of your power!@
>Eeeevery bit of it was sucked up by me! \
name ""
gosub *clear_sprite
gosub *setwindow_01p
mov %battle,0
mov %hsean,1
goto *renccubus_h



*renccubus_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\renccubus_bk01.bmp",175,0
gosub *syasei2
>Gently sucked by her warm mouth, Luka finally comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose2
mov %2602,%2602+1:if %2602=1 mov %count_koenemy,%count_koenemy+1
if %2602>%count_most mov %count_most,%2602:mov $count_mostname,$name
count 4,3
mov $bad1,"Luka was defeated by the Lencubus' blowjob."
gosub *face2
name $name
>Haha... I made you come with my mouth! @
>Next, let me drain all of your power...\
name ""
cspl 690,699
if %kousoku=0 gosub *renccubus_x2:mov %sinkou,2
if %sinkou=2 gosub *renccubus_x3
if %sinkou=3 gosub *renccubus_x4
if %sinkou=4 gosub *renccubus_x5
if %sinkou=5 gosub *renccubus_x6
if %sinkou=6 gosub *renccubus_x7
if %sinkou=7 gosub *renccubus_wait1
if %sinkou=8 gosub *renccubus_wait2
skillname "Level Drain"
dwave 1,"se\ero_chupa6.ogg"
>The amazing pleasure brought by her only increases.@
>Forcefully lead to another height, more energy flows out.\
gosub *syasei1
lsp 690,":a;chara\renccubus_ct23.bmp",0,0
gosub *syasei2
>Cloudy liquid shoots out of Luka into the Lencubus!\
gosub *lvdrain
skillname ""
name "Luka"
>Ahh...h...\
name ""
csp 690:lsp 700,":a;chara\renccubus_h1.bmp",0,0:print 10,500
name $name
>That was delicious! \
>That was the last of your power!@
>Eeeevery bit of it was sucked up by me! \
name ""
gosub *clear_sprite
gosub *setwindow_01p
mov %battle,0
mov %hsean,1
goto *renccubus_h



*renccubus_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\renccubus_bk02.bmp",175,0
gosub *syasei2
>Gently rubbed by her soft breasts, Luka finally comes, covering her chest with semen.\
mov %viclose,1:gosub *lose2
mov %2602,%2602+1:if %2602=1 mov %count_koenemy,%count_koenemy+1
if %2602>%count_most mov %count_most,%2602:mov $count_mostname,$name
count 7,3
mov $bad1,"Luka was defeated by the Lencubus' tit fuck."
gosub *face2
name $name
>Haha... I made you come with my breasts! @
>Next, let me drain all of your power...\
name ""
cspl 690,699
if %kousoku=0 gosub *renccubus_x2:mov %sinkou,2
if %sinkou=2 gosub *renccubus_x3
if %sinkou=3 gosub *renccubus_x4
if %sinkou=4 gosub *renccubus_x5
if %sinkou=5 gosub *renccubus_x6
if %sinkou=6 gosub *renccubus_x7
if %sinkou=7 gosub *renccubus_wait1
if %sinkou=8 gosub *renccubus_wait2
skillname "Level Drain"
dwave 1,"se\ero_chupa6.ogg"
>The amazing pleasure brought by her only increases.@
>Forcefully lead to another height, more energy flows out.\
gosub *syasei1
lsp 690,":a;chara\renccubus_ct23.bmp",0,0
gosub *syasei2
>Cloudy liquid shoots out of Luka into the Lencubus!\
gosub *lvdrain
skillname ""
name "Luka"
>Ahh...h...\
name ""
csp 690:lsp 700,":a;chara\renccubus_h1.bmp",0,0:print 10,500
name $name
>That was delicious! \
>That was the last of your power!@
>Eeeevery bit of it was sucked up by me! \
name ""
gosub *clear_sprite
gosub *setwindow_01p
mov %battle,0
mov %hsean,1
goto *renccubus_h



*renccubus_h4

mov %ikigoe,3:gosub *ikigoe
name $name
>Oh? Already...?\
gosub *syasei1
lsp 700,":a;chara\renccubus_h2.bmp",0,0
gosub *syasei2
>Unable to last long enough for the Lencubus to finish her off, Luka accidentally comes.\
>As if his soul itself was released during his orgasm, all of Luka's energy vanishes.\
mov %viclose,1:gosub *lose
mov %2602,%2602+1:if %2602=1 mov %count_koenemy,%count_koenemy+1
if %2602>%count_most mov %count_most,%2602:mov $count_mostname,$name
count 1,3
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"While being brought to the edge, Luka accidentally ejaculated."
name $name
>Ahhh geeze.@>You were too weak to even properly be finished off by my skill!@
>You've become even more pathetic than I thought!\
name ""
>The Lencubus looks down at me and giggles.\
name $name
>The Hero gave all of his power to the Succubus...@
>I need to really show my thanks to you.@>Hehehe. \
name ""
>The Lencubus shakes her waist as she continues to laugh.\
goto *renccubus_h



*renccubus_h

mov $bad2,"After that, the Lencubus kept Luka alive to use as her own personal energy tank for the rest of his life."
if %2602=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,1:hseanwave:goto *renccubus_hb
name "Luka"
>Auuu...\
name ""
>Forced to ejaculate, my energy is all gone.@
>With my power drained, I couldn't do anything even if I had the energy.\
>Unable to do anything, I'm forcibly held down by the Lencubus.\
name $name
>Hehe, do you understand now?@
>Now even a Hero won't be able to defeat me! \
name ""
>The Lencubus looks down at me and giggles.\
name $name
>The Hero gave all of his power to the Succubus...@
>I need to really show my thanks to you.@>Hehehe. \
name ""
mov %hseanwave,1:hseanwave
cspl 690,699
lsp 700,":a;chara\renccubus_h1.bmp",0,0:print 10,500
>The Lencubus pushes down her waist, and forces Luka into her in a dash!\
goto *renccubus_hb



*renccubus_hb

name "Luka"
>Auuu... Get off me...@
>Ahhhh...\
name ""
>I try to struggle underneath her, but it's no use.@
>She's so powerful now...\
name $name
>Hahaha... You can't run away!@
>Because Mr. Hero is weaker than me now! \
>Here... Let me tease the weak Hero's penis. \
name ""
>While giggling, the Lencubus slowly shakes her hips.@
>A wet, lewd sound comes out from where we're connected.\
name "Luka"
>Ahhhh!!\
name ""
>Lubricated by both her juices and my semen, the slippery feeling of moving in and out of her causes me to moan in pleasure.\
name $name
>Haha... @
>Does it feel good when I do this?\
name ""
name "Luka"
>Auuu...\
name ""
>Played with by the Lencubus, I let out an ungraceful moan.@
>She looks down at me with a grin and starts to laugh.\
name $name
>Ahaha... Are you already feeling it?@
>That I still haven't even gotten even a little bit serious yet?\
name ""
>Saying that, she continues to tease me with her skilled waist movements.\
>The stimulation from the friction caused by slowly moving in and out of her is too much, as I start to feel intoxicated by the pleasure.\
name "Luka"
>Auu... I'm going to come...\
name ""
>Barely a few minutes have gone by with her slow movements before I'm already feeling a building orgasm.\
>The stimulation from her slow movements has already caused pre-come to start leaking out inside of her.\
name $name
>Oh?@>Already giving up?@
>But that won't make me go easy on you. \
name ""
>The Lencubus flashes a triumphant smile.@
>In the next moment, she intensely shakes her waist, trying to finish me off in an instant!\
name "Luka"
>Ahhhh!!\
name ""
>Tightened around me, she shakes her waist side to side as she violently pumps me.\
>As if being baptized, her juices flow out and cover my penis, lubricating me and increasing the pleasure from the slippery friction inside of her.\
>I finally give myself completely to the embrace of the pleasure.\
gosub *syasei1
lsp 700,":a;chara\renccubus_h2.bmp",0,0
gosub *syasei2
name "Luka"
>Faa...\
name ""
>I explode inside of the Lencubus, filling her with my semen.@
>It's as if more energy is being sucked out by her devilish vagina.\
name $name
>Ahaha! Sooo quick! \
name ""
>The Lencubus giggles as I ejaculate inside of her.\
lsp 700,":a;chara\renccubus_h3.bmp",0,0:print 10,500
name $name
>Already coming again? Pathetic! @
>And you call yourself a Hero?\
name ""
>She looks down at me with a superior smile on her face.\
>Laughed at by a Succubus that was so weak only moments ago...@
>It's as if she's drained even my dignity itself...\
>Acting like a child who found a new toy, she's treating me as nothing but an object to amuse herself with.\
>While I think that, she leans over and puts her face right in front of mine.\
name $name
>This time...@> I'm going to tighten around you. \
name ""
>She whispers in my ear while giggling.@
>Just like she said, she tightens around me as soon as the last word was out of her mouth.\
name "Luka"
>Auuu!!\
name ""
>I feel every ridge, bump and fold inside of her press into my penis as she clamps down on me.\
>My sensitive member is pressed on all sides by her sweet flesh.\
>But despite the pressure, there's no pain or discomfort.@
>It's a devilish tightness that would make any man ejaculate at once.\
name "Luka"
>Auuu!\
name ""
>I instinctively try to fight against the devilish pleasure.@
>Once again, I unconsciously try to push her off of me.\
name $name
>Ahaha, what was that?@
>Are you seriously trying to fight back?\
>I guess I'll just need to try even harder. \
name ""
>I can't get away...@>All I can do is invite more taunts from her.\
name "Luka"
>Ahh...hhh...\
name ""
>I writhe pathetically under her body as her soft vagina strangles my penis.\
>Filled with disgrace and helplessness, even tears start to come out.\
name $name
>Ahaha! A man is crying while being raped! \
name ""
>Drunk on her new power, she throws insults one after another.@
>At the same time, she squeezes down even tighter on my penis.\
name "Luka"
>Auuu!\
name ""
>Forced toward another ejaculation, I feel myself nearing the edge.@
>My waist is ruled by the desire to ejaculate as more pre-come leaks out.\
name $name
>Alright, it's time to finish you off again!@
>I'll tighten one last time and force you to come. \
name ""
name "Luka"
>Auu.. St..op...\
name ""
name $name
>Aaaand now! \
name ""
>Her vagina clamps down on me harder than ever.@
>Squeezed from the base to the very tip, her soft flesh strangles me.\
>As if being forced into a heaven of pleasure, I ejaculate in an instant.\
gosub *syasei1
lsp 700,":a;chara\renccubus_h4.bmp",0,0
gosub *syasei2
name "Luka"
>Faaa...\
name ""
>During the pulsing ejaculation, the sweet tightness only increases the stimulation.\
>Trapped underneath her, I let out a sigh as the wave of pleasure washes over me.\
>Just like before, she begins to taunt me, drunk on her superiority.\
lsp 700,":a;chara\renccubus_h5.bmp",0,0:print 10,500
name $name
>Ahaha, did I feel that good?@
>But I'm not satisfied. I want more...\
name ""
name "Luka"
>Ahh!@> Haaa!\
name ""
mov %hseanwave,6:hseanwave
>While still tightened around me, a strange movement starts inside of her.\
>Her ridges feel like they're moving around independent of her body movements.\
>It's as if countless little rings of soft flesh are forming around the circumference of her vagina.\
name "Luka"
>Wh...What is this...@> Ahhhh!!\
name ""
>My body shakes and I let out a moan at the sudden blast of pleasure.\
>The soft rings give a powerful massage as they push and pull at my penis, as if chewing on it.\
>It really seems like it's a [Lower Mouth] like this!\
name $name
>Hehe... I'm even able to do something like this...@
>Don't you think my new pussy is amazing?\
name ""
name "Luka"
>Auuu!\
name ""
>The powerful pleasure doesn't even let me try to respond to that.\
>Her once normal human vagina was turned into such an insane weapon to drain the energy from men...\
>Now wrapped and captured in that new weapon, I'm completely at its mercy.\
name $name
>Here, I can do more! \
name ""
name "Luka"
>Auuu!!\
name ""
>I give myself to the overwhelming feeling of her soft flesh.\
gosub *syasei1
lsp 700,":a;chara\renccubus_h6.bmp",0,0
gosub *syasei2
>Urged on by the pleasure, I let out all of my semen inside her.@
>The exhaustion becomes even more intense, as each ejaculation lets her suck more and more of my energy.\
lsp 700,":a;chara\renccubus_h7.bmp",0,0:print 10,500
name "Luka"
>St...Stop...@> Any more and... I'll die...\
name ""
name $name
>Ahaha... Sucking in your energy won't kill you.@
>I'll suck in your energy and power to the very limit, but I won't let you die. \
name ""
>She says that with a condescending look, and pushes her hips into mine again.\
>In time with the thrusts of her waist, she tightens around me.\
name "Luka"
>I'm... coming again!\
name ""
gosub *syasei1:gosub *syasei2
>I quickly come inside of her again.@
>Too weak to fight back, I'm completely at the mercy of the powerful Lencubus.\
>I'm nothing but a toy for her to suck energy and power from...\
name $name
>Ahaha... More power. \
name ""
>Sucking out all of my energy, semen, and power, she gives a triumphant smile at her own new power.\
gosub *anten
mov %hseanwave,0:hseanwave
>Every day after that, she sucked out my energy until I was on the border of death, but kept me alive.\
>Like that, I'm used just like her own personal energy tank.@
>In compensation for this endless pleasure, my existence only serves to supply her with energy...\
>But after being drowned in pleasure for so long, the fear and disgust vanishes as I become addicted to it.\
>I immerse myself in the joy of existing only for the pleasure.\
>..................\
goto *badend



*succubus_start

mov $name,"Succubus"
mov $name2,"Succubus"
mov $lavel,"succubus"
mov $tatie1,"succubus_st01"
mov $tatie2,"succubus_st02"
mov $tatie3,"succubus_st03"
mov $tatie4,"succubus_hd1"
mov $haikei,"bg106"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,4500
if %nanido=2 mov %max_enemylife,5000
if %nanido=3 mov %max_enemylife,6750
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,20
if %nanido=3 mov %earth_keigen,10
mov %music,1
mov %tikei,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this?"
mov $mogaku_earth_dassyutu1,"Ara... Too bad."
mov $mogaku_earth_dassyutu2,"Being squeezed by me is the highest pleasure, you know...?"
mov $half_s1,"It feels amazing, doesn't it?"
mov $half_s2,"Just give up and let yourself be squeezed..."
mov $kiki_s1,"At your limit?"
mov $kiki_s2,"Then allow me to lead you to heaven..."
mov %end_n,7
mov %exp_minus,45000
mov %zmonster_x,-250
mov %tukix,300
mov %owaza_count1a,4
mov %owaza_count1b,4
mov %owaza_count2a,4
gosub *face2
name $name
>But you know...@
>You look really delicious...\
name ""
>The Succubus seductively licks her lips.\
name $name
>She told me not to...@
>But I'm going to squeeze you dry...\
>A single boy's amount won't change the revival of Lilith...\
name ""
name "Luka"
>Guh...!\
name ""
>This monster has a different feeling about her than the other Succubi in the village...\
>Sweet pheromones fill the air around her, making me feel slightly confused and dazed.@
>So this is a high ranking Succubus...\
name $name
>Hehe... I'm going to rape you now.@
>I'll make you come until not a single drop is left in you...\
name ""
gosub *face1
goto *common_main



*succubus_v

gosub *face3
name $name
>How could I be beaten by a human...!?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Succubus turns into a bat!\
mov %viclose,1:gosub *victory
mov %getexp,20000:gosub *lvup
mov %2303,1
goto *sean0221



*succubus_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>You want me to squeeze you...?@
>Good, I'll do just what you want...\
name ""
goto *succubus_a



*succubus_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *succubus_kousan
if %cmd1=16 goto *succubus_onedari
if %cmd1=17 goto *common_skill
goto *succubus_main



*succubus_a

if %kousoku=1 gosub *succubus_a7:goto *common_main
if %kousoku=2 gosub *succubus_a8:goto *common_main
rnd2 %ransu,1,7
if %ransu=1 gosub *succubus_a1:goto *common_main
if %ransu=2 gosub *succubus_a2:goto *common_main
if %ransu=3 gosub *succubus_a3:goto *common_main
if %ransu=4 gosub *succubus_a4:goto *common_main
if %ransu=5 && %owaza_count2a>5 gosub *succubus_a5:goto *common_main
if %ransu=6 && %owaza_count1a>5 gosub *succubus_a6:goto *common_main
if %ransu=7 && %owaza_count1b>5 gosub *succubus_a9:goto *common_main
skip -8



*succubus_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll squeeze out your semen with this hand..."
if %ransu=2 mov $sel1,"Here... My hands will feel amazing."
if %ransu=3 mov $sel1,"Just being grabbed by a Succubus is too much for you, isn't it?"
name $name
eng $sel1:$sel6\
name ""
skillname "Delightful Handjob"
dwave 1,"se\ero_koki1.ogg"
eng "The Succubus grabs Luka's penis, and deftly uses all ten fingers to caress him!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>Her skilled fingers run over every inch of his penis!
skillcount2 3453
if %nanido<2 damage 80,90
if %nanido=2 damage 95,105
if %nanido=3 damage 110,120
skillname ""
if %mylife=0 sub %stack,1:return *succubus_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*succubus_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'm just drooling for a taste of you..."
if %ransu=2 mov $sel1,"You can fill my mouth with as much as you want..."
if %ransu=3 mov $sel1,"Just lay back and let my mouth bring you to heaven..."
name $name
eng $sel1:$sel6\
name ""
skillname "Hecto-Deep Blowjob"
dwave 1,"se\ero_buchu3.ogg"
lsp 700,":a;chara\succubus_hc1.bmp",0,0:print 10,500
eng "The Succubus puts Luka's penis into her mouth, drooling in anticipation.":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu
if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>Her skilled tongue runs all over Luka's penis!
skillcount2 3454
if %nanido<2 damage 90,100
if %nanido=2 damage 105,115
if %nanido=3 damage 120,130
skillname ""
if %mylife=0 sub %stack,1:return *succubus_h2
if %kousan<2 gosub *face1
if %kousan<2 && %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %kousan<2 && %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*succubus_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Let it all out between my breasts..."
if %ransu=2 mov $sel1,"No man can resist a Succubus' breasts..."
if %ransu=3 mov $sel1,"I'll squeeze your penis between these breasts..."
name $name
eng $sel1:$sel6\
name ""
skillname "Breast Squeeze"
dwave 1,"se\ero_koki1.ogg"
lsp 700,":a;chara\succubus_hb1.bmp",0,0:print 10,500
eng "The Succubus puts Luka's penis between her full breasts!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu
if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>She skillfully uses her breasts to stimulate Luka!
skillcount2 3455
if %nanido<2 damage 100,110
if %nanido=2 damage 115,125
if %nanido=3 damage 130,140
skillname ""
if %mylife=0 sub %stack,1:return *succubus_h3
if %kousan<2 gosub *face1
if %kousan<2 && %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %kousan<2 && %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*succubus_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck up all your energy..."
if %ransu=2 mov $sel1,"I'll suck up your energy with this tail..."
if %ransu=3 mov $sel1,"I know how much you love tails..."
name $name
eng $sel1:$sel6\
name ""
skillname "Tail Drain"
dwave 1,"se\ero_chupa6.ogg"
lsp 700,":a;chara\succubus_ha1.bmp",0,0:print 10,500
eng "The Succubus' tail opens up at the end as it shoots toward Luka!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,20
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu
if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
lsp 700,":a;chara\succubus_ha2.bmp",0,0:print 10,500
lsp 700,":a;chara\succubus_ha3.bmp",0,0:print 10,500
\
>The soft flesh inside the tail squirms around Luka's penis, stimulating him as his energy is drained!
skillcount2 3456
if %nanido<2 damage 70,80
if %nanido=2 damage 85,95
if %nanido=3 damage 100,110
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *succubus_h4
if %kousan<2 gosub *face1
if %kousan<2 && %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %kousan<2 && %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*succubus_a5

add %stack,1
mov %owaza_count2a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Melt in my kiss..."
if %ransu=2 mov $sel1,"I can intoxicate you even further..."
if %ransu=3 mov $sel1,"There's nothing as intoxicating as a kiss..."
name $name
eng $sel1:$sel6\
name ""
skillname "Melting Kiss"
dwave 1,"se\ero_chupa2.ogg"
eng "The Succubus leans toward Luka!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,100
if %wind=2 && %nanido=2 mov %wind_kakuritu,90
if %wind=2 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
>Her lips lock with Luka's, spreading a sweet sensation through his body!
skillcount2 3457
if %nanido<2 damage 70,80
if %nanido=2 damage 85,95
if %nanido=3 damage 100,110
if %status=0 mov $sel1,"Luka was put into a trance!"
if %status=1 mov $sel1,"Luka is in a trance..."
mov %status,1:gosub *status_print
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *succubus_h5
if %kousan=2 sub %stack,1:return
name "Luka"
>Haaa...\
name ""
name $name
>...I'll show you a good dream.@
>While you're soaked in that dream, I'll finish you...\
name ""
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,3,4
if %nanido=3 rnd2 %status_turn,4,5
sub %stack,1
return



*succubus_a6

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 5
name $name
>Hehe... I made you wait, didn't I?@> It's time to rape you.\
>I'll squeeze out your semen until you're left dry...\
name ""
skillname "Succubus Hold"
eng "The Succubus throws Luka to the ground, and gets on top of him!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,10
if %wind=2 && %nanido=2 mov %wind_kakuritu,7
if %wind=2 && %nanido=3 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>The Succubus is on top of Luka!\
skillname ""
gosub *face2
name $name
>Getting to be raped by a Succubus... it's like a dream, isn't it?@
>Now, allow me to show you heaven...\
name ""
mov $mogaku_sel1,"Something that weak will never work... Hehe."
mov $mogaku_sel2,"Something that weak will never work... Hehe."
mov $mogaku_sel3,"You can't run from me..."
mov $mogaku_sel4,"You can't run from me..."
mov $mogaku_sel5,"You can't run from me..."
if %earth=0 && %nanido<2 mov %genmogaku,100
if %earth=0 && %nanido=2 mov %genmogaku,100
if %earth=0 && %nanido=3 mov %genmogaku,100
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
sub %stack,1
return



*succubus_a7

add %stack,1
name $name
>Hehe... Time to devour your penis. \
name ""
skillname "Energy Drain"
dwave 1,"se\ero_chupa6.ogg"
mov $tatie4,"succubus_hd2"
lsp 700,":a;chara\succubus_hd2.bmp",0,0:print 10,500
>The Succubus drops down, forcing Luka inside her!\
>As soon as her hot flesh wraps around Luka, his energy is drained!
skillcount2 3458
mov %damage_kotei,1
damage 130,150
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
mov %kousoku,2
>Luka is being violated by the Succubus!\
if %mylife=0 sub %stack,1:return *succubus_h6
name $name
>Now give yourself over completely to the pleasure...@
>While I squeeze out your semen...\
name ""
mov %genmogaku,100
mov $mogaku_sel1,"Hehe, pointless... Give up."
mov $mogaku_sel2,"You can't struggle anymore... Just give up."
mov $mogaku_sel3,"Even if you struggle, I won't let you go."
mov $mogaku_sel4,"How unsightly... Don't you want to be squeezed dry?"
mov $mogaku_sel5,"Even if you want to run, there's no escape for you."
sub %stack,1
return



*succubus_a8

add %stack,1
>Luka is being raped by the Succubus!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Having your energy drained by a Succubus is heavenly, isn't it?":mov $sel2,"Her vagina squirms around Luka's penis, sucking up his energy!"
if %ransu=2 mov $sel1,"Hehe... Can you endure it?":mov $sel2,"The Succubus grinds against Luka!"
if %ransu=3 mov $sel1,"I'll suck out even more, see if you can endure it...":mov $sel2,"Her vagina tightens around Luka's penis!"
if %ransu=4 mov $sel1,"Here... It feels good, doesn't it?":mov $sel2,"The Succubus squeezes Luka's penis inside her!"
if %ransu=5 mov $sel1,"I'll keep doing this until you're dry...":mov $sel2,"The Succubus slowly pumps Luka!"
name $name
eng $sel1:$sel6\
name ""
skillname "Energy Drain"
dwave 1,"se\ero_chupa6.ogg"
eng $sel2:$sel6
skillcount2 3458
mov %damage_kotei,1
damage 130,150
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *succubus_h7
sub %stack,1
return



*succubus_a9

add %stack,1
mov %owaza_count1b,0
mov %owaza_num1,2
if %kousan=2 skip 4
name $name
>I'll send you to heaven in an instant...\
name ""
skillname "Succubus Hold"
lsp 700,":a;chara\succubus_hd1.bmp",0,0:print 10,500
eng "The Succubus throws Luka to the ground and mounts him!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,100
if %wind=2 && %nanido=2 mov %wind_kakuritu,100
if %wind=2 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,2:gosub *status_print
>Luka is being ridden by the Succubus!\
skillname ""
name $name
>Hehehe...\
name ""
>While riding Luka, the Succubus puts the tip of her finger into her vagina!@
>Like that, she slowly fingers herself!\
name $name
>I can make myself even wetter like this, increasing my lust even further...\
>Look... As soon as your dick is in here, you'll explode in happiness.\
>This wet hole of mine will dominate you, squeezing you dry...@
>Being squeezed empty by this pussy of mine... It's the highest pleasure a man can feel.\
name ""
name "Luka"
>N...No...\
name ""
name $name
>Watch... I'm going to rape you with this greedy pussy of mine.@
>Writhe underneath me in ecstasy as you're squeezed dry...\
name ""
skillcount2 3459
skillname "Infinite Pussy"
dwave 1,"se\ero_chupa6.ogg"
lsp 700,":a;chara\succubus_hd2.bmp",0,0:print 10,500
>The Succubus drops down, forcing Luka inside her!@
>The wet flesh squirms around Luka, eagerly wrapping around his penis!\
>Luka is being raped by the Succubus!\
name "Luka"
>Ahhhhh!!\
name ""
name $name
>Hehe, it's incredible, isn't it?\
name ""
>Luka is overcome by pleasure, convulsing under the Succubus as he screams in ecstasy!
mov %damage_kotei,1
damage 1000,1200
skillname ""
name "Luka"
>Ahhhhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\succubus_hd3.bmp",0,0
gosub *syasei2
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
>Defeated by the intense pleasure, Luka came in an instant.@
>But she doesn't stop...\
name "Luka"
>Ah...Ahhh...\
name ""
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
>The ejaculation isn't stopping...@
>Like urine, I keep spurting inside of her warm vagina.\
name "Luka"
>Wh...What is this...!?@
>I...It isn't stopping!\
name ""
name $name
>I said it already, didn't it?@
>I won't stop until you're left dry...\
>But it feels incredible, doesn't it?\
name ""
name "Luka"
>Haaaa...\
name ""
lsp 700,":a;chara\succubus_hd4.bmp",0,0
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
>Her devilish vagina keeps wriggling around me, draining more of my semen and energy.\
>Each new spurt of semen feels like a new orgasm, compounding on all the previous ones that still haven't stopped...\
>Writhing under her in ecstasy, I continue to shoot my semen into her waiting vagina.\
name "Luka"
>Haaa...\
name ""
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
>Every pulse of ecstasy running through my body leaves me weaker.@
>After only a minute, it's difficult to even keep my eyes open.\
>But I don't care... This feels too good...\
gosub *anten
name "Luka"
>Ah...ahh...\
name ""
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
name $name
>Hehe...@>Thanks for the meal.\
name ""
>After finally sucking me dry, the Succubus stands up, parting from my body.\
>While tasting unrivaled pleasure, my energy was drained by the Succubus...\
>All that remains of me is a shriveled up corpse, the face still frozen in pleasure.\
mov %2603,%2603+1:if %2603=1 mov %count_koenemy,%count_koenemy+1
if %2603>%count_most mov %count_most,%2603:mov $count_mostname,$name
count 1,4
mov $bad1,"Luka was squeezed dry by the Succubus."
mov $bad2,""
sub %stack,1
return *badend



*succubus_onedari

mov $list1,"Delightful Handjob"
if %3453>0 mov %list_num1,1
mov $list2,"Hecto-Deep Blowjob"
if %3454>0 mov %list_num2,1
mov $list3,"Breast Squeeze"
if %3455>0 mov %list_num3,1
mov $list4,"Tail Drain"
if %3456>0 mov %list_num4,1
mov $list5,"Melting Kiss"
if %3457>0 mov %list_num5,1
mov $list6,"Energy Drain"
if %3458>0 mov %list_num6,1
mov $list7,"Infinite Pussy"
if %3459>0 mov %list_num7,1
gosub *cmd_onedari
if %cmd1=11 goto *succubus_onedari1
if %cmd1=12 goto *succubus_onedari2
if %cmd1=13 goto *succubus_onedari3
if %cmd1=14 goto *succubus_onedari4
if %cmd1=15 goto *succubus_onedari5
if %cmd1=16 goto *succubus_onedari6
if %cmd1=17 goto *succubus_onedari7
if %cmd1=-1 goto *succubus_main
goto *succubus_onedari



*succubus_onedari1

gosub *onedari_syori
name $name
>You want to be milked by my hands?\
name ""
gosub *succubus_a1
skip -1



*succubus_onedari2

gosub *onedari_syori
name $name
>You want to be sucked by my mouth?\
name ""
gosub *succubus_a2
skip -1



*succubus_onedari3

gosub *onedari_syori
name $name
>You want to be squeezed between my breasts?\
name ""
gosub *succubus_a3
skip -1



*succubus_onedari4

gosub *onedari_syori
name $name
>You want my tail to drain your energy?\
name ""
gosub *succubus_a4
skip -1



*succubus_onedari5

gosub *onedari_syori
name $name
>You want to melt in my kiss?\
name ""
gosub *succubus_a5
skip -1



*succubus_onedari6

gosub *onedari_syori_k
name $name
>So you want to be raped after all... Hehe.\
name ""
if %kousoku=0 gosub *succubus_a6
if %kousoku=1 gosub *succubus_a7
gosub *succubus_a8
skip -1



*succubus_onedari7

gosub *onedari_syori
name $name
>You want to be dominated all at once with my ultimate move?\
name ""
gosub *succubus_a9
skip -1



*succubus_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\succubus_bk03.bmp",0,0
gosub *syasei2
>Unable to endure the Succubus' skillful fingers, Luka comes, covering her hand in semen.\
mov %viclose,1:gosub *lose
mov %2603,%2603+1:if %2603=1 mov %count_koenemy,%count_koenemy+1
if %2603>%count_most mov %count_most,%2603:mov $count_mostname,$name
count 5,4
mov $bad1,"Luka was forced to orgasm by the Succubus' handjob."
gosub *face2
name $name
>Hehe... Did it feel good?@
>Now it's time to really rape you!\
name ""
goto *succubus_h



*succubus_h2

name "Luka"
>Ahhh... I'm going to come...\
name ""
lsp 700,":a;chara\succubus_hc2.bmp",0,0:print 10,500
name $name
>Nnn... Hehe.\
name ""
>As I moan, on the verge of an orgasm, a seductive smile flashes across the Succubus' face.@
>She stops sucking, and moves her tongue to the tip of my penis.\
>As her tongue plays with my glans, my head goes white as I sigh and give in to the release.\
name "Luka"
>Ah...Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\succubus_hc3.bmp",0,0
gosub *syasei2
>I explode in the Succubus' mouth, filling her wet mouth with semen.\
mov %viclose,1:gosub *lose2
name "Luka"
>Haaa...\
name ""
>After my ejaculation finishes, she doesn't let go.@
>Instead, she continues to suck on me.\
name $name
>I'll suck out some more like this...@
>I'll get a good taste of your semen...\
name ""
skillcount2 3454
skillname "Hecto-Deep Blowjob"
dwave 1,"se\ero_buchu3.ogg"
>The Succubus starts to suck on Luka's penis again!
mov %damage_kotei,1
damage 110,130
dwave 1,"se\ero_buchu3.ogg"
>Her wet tongue wraps around the tip of Luka's penis!
mov %damage_kotei,1
damage 110,130
skillname ""
name "Luka"
>N...No more...\
name ""
name $name
>My mouth isn't satisfied with just one ejaculation.@
>Even if you cry and plead, I won't stop until I'm satisfied...\
name ""
skillcount2 3454
skillname "Hecto-Deep Blowjob"
dwave 1,"se\ero_buchu3.ogg"
>The Succubus' tongue wraps around the tip of Luka's penis!
mov %damage_kotei,1
damage 110,130
dwave 1,"se\ero_buchu3.ogg"
>As her tongue coils around his penis, she sucks hard on Luka!
mov %damage_kotei,1
damage 110,130
skillname ""
name "Luka"
>S...Stop...!@
>Ahhh!\
name ""
>My refusal is stopped by the wave of pleasure.\
>As if her mouth was a vacuum, she forcibly sucks out my semen.@
>Unable to take it any longer, I relax my waist, exploding inside her mouth again.\
gosub *syasei1
lsp 700,":a;chara\succubus_hc4.bmp",0,0
gosub *syasei2
name "Luka"
>Haaa...\
name ""
name $name
>Hehe... More delicious semen.@
lsp 700,":a;chara\succubus_hc5.bmp",0,0:print 10,500
>Nnnn... *Suck* *Slurp*\
name ""
skillcount2 3454
skillname "Hecto-Deep Blowjob"
dwave 1,"se\ero_buchu3.ogg"
>The Succubus uses the tip of her tongue to lick the semen still in Luka's urethra!
mov %damage_kotei,1
damage 110,130
dwave 1,"se\ero_buchu3.ogg"
>Her tongue lightly pushes against Luka's urethral opening as she sucks up the semen!
mov %damage_kotei,1
damage 110,130
skillname ""
name "Luka"
>Ah...!@> S...Stop!\
name ""
>I try to escape from her mouth, but her hands wrap around my waist and keep me inside her.\
name $name
>*Suck*...@>What a bad boy, trying to get away...@
>Don't worry, I can force you to come in an instant like this...\
name ""
skillcount2 3454
skillname "Hecto-Deep Blowjob"
dwave 1,"se\ero_buchu3.ogg"
>The Succubus forces Luka even deeper into her mouth!
mov %damage_kotei,1
damage 110,130
>Her skilled mouth sucks on Luka, forcing him over the edge only moments after his last orgasm!
dwave 1,"se\ero_buchu3.ogg"
mov %damage_kotei,1
damage 110,130
skillname ""
name "Luka"
>Ahhhh!\
name ""
>My back arches as her mouth sucks on me, leaving me unable to think about anything but the feeling of her wet lips around me.\
gosub *syasei1
lsp 700,":a;chara\succubus_hc6.bmp",0,0
gosub *syasei2
name $name
>*Suck* *Slurp*\
name ""
name "Luka"
>Stop... Let me go...@
>Don't suck on me any more...\
name ""
>I plead to her with tears falling from my eyes.@
>But she ignores me, and uses her hands around my waist to force me deeper into her mouth.\
skillcount2 3454
skillname "Hecto-Deep Blowjob"
dwave 1,"se\ero_buchu3.ogg"
lsp 700,":a;chara\succubus_hc7.bmp",0,0:print 10,500
>The Succubus' tongue runs all over Luka's penis!
mov %damage_kotei,1
damage 110,130
>Like that, she sucks in deeply!
dwave 1,"se\ero_buchu3.ogg"
mov %damage_kotei,1
damage 110,130
skillname ""
name "Luka"
>Haaaaa!
>No, stop... I'm going to come again!\
name ""
name $name
>No way... You aren't going to escape from my mouth.@
>Nnn... *Suck*\
name ""
skillcount2 3454
skillname "Hecto-Deep Blowjob"
dwave 1,"se\ero_buchu3.ogg"
>Her lips close around the base of Luka's penis as she narrows her mouth around his penis!
mov %damage_kotei,1
damage 110,130
>Like that, she sucks harder than ever before!
dwave 1,"se\ero_buchu3.ogg"
mov %damage_kotei,1
damage 110,130
skillname ""
name "Luka"
>Ahhh!\
name ""
>As it feels like she's sucking my semen out directly from my balls, my head goes white as I explode inside her mouth.\
gosub *syasei1
lsp 700,":a;chara\succubus_hc8.bmp",0,0
gosub *syasei2
name $name
>Nnn... *Suck* *Slurp*\
name ""
name "Luka"
>Ahh...\
name ""
>She continues sucking on me, forcing out every drop into her greedy mouth.@
>After finishing her meal, she giggles and wipes her lips.\
gosub *clear_sprite
gosub *setwindow_01p
lsp 700,":a;chara\succubus_hc9.bmp",0,0:print 10,500
name $name
>Hehe... Did it feel good?@
>Now it's time to really rape you!\
name ""
>She finally release my penis from her mouth.@
>But it doesn't look like I'm going to be free yet...\
mov %battle,0
mov %hsean,1
mov %2603,%2603+1:if %2603=1 mov %count_koenemy,%count_koenemy+1
if %2603>%count_most mov %count_most,%2603:mov $count_mostname,$name
count 4,4
mov $bad1,"Luka was forced to an orgasm by the Succubus' blowjob."
goto *succubus_h



*succubus_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\succubus_hb2.bmp",0,0
gosub *syasei2
>Squeezed between the Succubus' soft breasts, Luka comes, covering her chest with semen.\
mov %viclose,1:gosub *lose2
name $name
>...Hehe, you covered me with quite a lot.@
>But I'll squeeze out even more...\
>Come on... I'll give you your fill of my breasts.\
name ""
skillcount2 3455
skillname "Breast Squeeze"
dwave 1,"se\ero_koki1.ogg"
lsp 700,":a;chara\succubus_hb3.bmp",0,0:print 10,500
>The Succubus presses her breasts together, squeezing Luka's penis!
mov %damage_kotei,1
damage 110,130
dwave 1,"se\ero_koki1.ogg"
>She slowly puts more power into it, squeezing him tighter!
mov %damage_kotei,1
damage 110,130
skillname ""
name "Luka"
>D...Don't keep going...@
>Ahhhh...\
name ""
>Too weak to resist, I squirm helplessly under her as she continues to use her breasts to toy with me.\
name $name
>But isn't being squeezed between my breasts amazing?@
>I know you like it, so come as much as you want...\
name ""
skillcount2 3455
skillname "Breast Squeeze"
dwave 1,"se\ero_koki1.ogg"
>Her soft breasts push into Luka's penis!
mov %damage_kotei,1
damage 110,130
dwave 1,"se\ero_koki1.ogg"
>The sensation of her soft breasts fills Luka!
mov %damage_kotei,1
damage 110,130
skillname ""
name "Luka"
>Haaa...\
name ""
name $name
>Hehe... You look so happy.@
>Then let me make it a little more intense...\
>You won't last through this, so just go ahead and come...\
name ""
skillcount2 3455
skillname "Breast Squeeze"
dwave 1,"se\ero_koki1.ogg"
>She squeezes her breasts together as hard as she can!
mov %damage_kotei,1
damage 110,130
dwave 1,"se\ero_koki1.ogg"
>The overpowering sense of pressure fills Luka!
mov %damage_kotei,1
damage 110,130
skillname ""
name "Luka"
>Haaa... Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\succubus_hb4.bmp",0,0
gosub *syasei2
>Wrapped in her breasts, I give in, unable to take the feeling of her chest around me.\
>Coming, my semen shoots through her breasts and lands on her waiting face.\
lsp 700,":a;chara\succubus_hb5.bmp",0,0:print 10,500
name $name
>Giving me so much delicious milk...@
>Are you looking forward to these breasts squeezing you dry that much?\
name ""
skillcount2 3455
skillname "Breast Squeeze"
dwave 1,"se\ero_koki1.ogg"
>The Succubus takes turn slowly moving her right and left breasts!
mov %damage_kotei,1
damage 110,130
dwave 1,"se\ero_koki1.ogg"
>Slowly increasing in speed, she continues to massage Luka's penis!
mov %damage_kotei,1
damage 110,130
skillname ""
name "Luka"
>Ahh...\
name ""
name $name
>Just like this, I can milk out the rest of your semen with my breasts...\
name ""
skillcount2 3455
skillname "Breast Squeeze"
dwave 1,"se\ero_koki1.ogg"
>The Succubus uses her breasts to pump Luka even faster!
mov %damage_kotei,1
damage 110,130
dwave 1,"se\ero_koki1.ogg"
>As they move up and down in alternate rhythms, Luka's eyes glaze over in pleasure!
mov %damage_kotei,1
damage 110,130
skillname ""
name "Luka"
>Haa...\
name ""
name $name
>You're going to come soon...@
>Now, cover my chest in semen!\
name ""
skillcount2 3455
skillname "Breast Squeeze"
dwave 1,"se\ero_koki1.ogg"
>The Succubus presses her breasts together hard, as she continues to pump Luka's penis!
mov %damage_kotei,1
damage 110,130
dwave 1,"se\ero_koki1.ogg"
>Her intense stimulation destroys the last of Luka's resistance!
mov %damage_kotei,1
damage 110,130
skillname ""
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\succubus_hb6.bmp",0,0
gosub *syasei2
>Defeated by her breasts, I come again, spraying my semen out onto her smiling face.\
>After my ejaculation finishes, I sigh and relax, completely drained of power.\
gosub *clear_sprite
gosub *setwindow_01p
name $name
>Hehe... Did it feel good?@
>Now it's time to really rape you!\
name ""
>She finally releases me from between her breasts.@
>But it doesn't look like she has any intent to end this...\
mov %battle,0
mov %hsean,1
mov %2603,%2603+1:if %2603=1 mov %count_koenemy,%count_koenemy+1
if %2603>%count_most mov %count_most,%2603:mov $count_mostname,$name
count 7,4
mov $bad1,"Luka was forced to an orgasm by the Succubus' tit fuck."
goto *succubus_h



*succubus_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\succubus_ha4.bmp",0,0
gosub *syasei2
>As the Succubus drains Luka's energy with his tail, he comes, moaning as the sense of release fills his body.\
name "Luka"
>Ahh...\
name ""
lsp 700,":a;chara\succubus_ha5.bmp",0,0:print 10,500
>Sucking noises sound out from her tail as it greedily swallows his semen, forcibly sucked out.\
mov %viclose,2:gosub *lose
mov %2603,%2603+1:if %2603=1 mov %count_koenemy,%count_koenemy+1
if %2603>%count_most mov %count_most,%2603:mov $count_mostname,$name
count 19,4
mov $bad1,"Luka was forced to an orgasm as the Succubus drained his energy."
lsp 700,":a;chara\succubus_ha6.bmp",0,0:print 10,500
>After a few more gulps, the tail finally separates from my penis, still sticky with my semen.\
name $name
>Hehe... I sucked out a lot with my tail, didn't I?@
>Now for the real rape...\
name ""
goto *succubus_h



*succubus_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\succubus_bk05.bmp",0,0
gosub *syasei2
>As the sweet sensation of her kiss fills his body, Luka comes, covering her stomach with semen.\
mov %viclose,1:gosub *lose
mov %2603,%2603+1:if %2603=1 mov %count_koenemy,%count_koenemy+1
if %2603>%count_most mov %count_most,%2603:mov $count_mostname,$name
count 7,4
mov $bad1,"Luka came as the Succubus kissed him."
gosub *face2
name $name
>Hehe, it looks like your brain melted in the pleasure...@
>Now for the real rape...\
name ""
goto *succubus_h



*succubus_h6

mov %ikigoe,3:gosub *ikigoe
name $name
>Hehe, already?\
name ""
gosub *syasei1
lsp 700,":a;chara\succubus_hd3.bmp",0,0
gosub *syasei2
>As soon as Luka is forced into the Succubus, he comes, giving up in an instant.\
mov %viclose,1:gosub *lose
mov %2603,%2603+1:if %2603=1 mov %count_koenemy,%count_koenemy+1
if %2603>%count_most mov %count_most,%2603:mov $count_mostname,$name
count 1,4
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to an orgasm just from insertion."
gosub *face2
name $name
>How pathetic, coming so fast...@
>You're really weak...\
name ""
goto *succubus_h



*succubus_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\succubus_hd3.bmp",0,0
gosub *syasei2
>While being intensely raped by the Succubus, Luka comes, filling her wet vagina with semen.\
mov %viclose,1:gosub *lose
mov %2603,%2603+1:if %2603=1 mov %count_koenemy,%count_koenemy+1
if %2603>%count_most mov %count_most,%2603:mov $count_mostname,$name
count 1,4
mov $bad1,"Luka was forced to an orgasm as the Succubus raped him."
gosub *face2
name $name
>Hehe, it was amazing, wasn't it?@
>Now come on, I want to rape you even more...!\
name ""
goto *succubus_h



*succubus_h

mov $bad2,"After that, Luka was squeezed dry."
if %2603=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,9:hseanwave:goto *succubus_hb
name "Luka"
>Ahh...\
name ""
>Too weak to resist any longer, I fall to the ground.@
>The Succubus stands over me with a triumphant smile on her face.\
name $name
>Hehe... Sorry to have made you wait.@
>It's time for me to suck out your energy.\
name ""
cspl 690,699
lsp 700,":a;chara\succubus_hd1.bmp",0,0:print 10,500
>The Succubus sits down on top of me as I lay down on my back.@
>She's going to rape me now... My life is just prey for her to devour...\
name $name
>Hehe... It's time to suck you dry.\
name ""
name "Luka"
>S...Stop... Stop...\
name ""
>Despite my words of refusal, my body betrays me as my penis is already erect.@
>She slowly lowers her waist, bringing her vagina closer and closer to my penis.\
>Her wet vaginal lips eagerly open and close, as if it was a mouth hungry for its prey...\
>That pink hole is about to suck me inside...@
>Sucking my energy, that wet hole is going to kill me...\
>My mind is filled with fear and despair, while my body is shivering in expectation...\
name $name
>Hehe... Time to eat. \
name ""
name "Luka"
>Ahhh!!\
name ""
mov %hseanwave,9:hseanwave
lsp 700,":a;chara\succubus_hd2.bmp",0,0:print 10,500
>Just like that, she drops down on me, forcing my penis all the way into her wet vagina in a single stroke.\
name "Luka"
>Ahhhh!\
name ""
name $name
>Hehe... I swallowed you up.@
>Your penis is now just food for a Succubus!\
name ""
goto *succubus_hb



*succubus_hb

name "Luka"
>N...No... Th...This...@
>This feels good...\
name ""
>Her soft flesh rubs and squirms around my penis, letting me feel every crease and fold inside her.\
>Already weak from my ejaculation, the pheromones she's letting off make me feel even dizzier as her man eating hole tightens around me.\
name $name
>Hehe, it feels good, doesn't it?@
>Being devoured by a Succubus is the best way to go, isn't it?\
name ""
name "Luka"
>Ahhh!\
name ""
>The Succubus taunts me as she just holds me inside her, not even moving yet.@
>But even with just being inside of her, it's almost too much to take...\
name $name
>First, I need to disgrace you as a man.@
>I'll force you to come just by sitting on you.\
name ""
name "Luka"
>Th...That can't be... Ahhh!\
name ""
>As the sweet pleasure fills my body, my denial is cut short by a moan.\
>Even though she isn't moving at all, her vagina is squirming and moving around like it was a separate living being.\
>Rubbing and wriggling, her soft flesh massages me as she sits on top of me.\
name "Luka"
>Ahhhh!\
name ""
name $name
>Hehe... What's wrong?@
>I'm not even moving, or using any techniques you know?\
name ""
>The Succubus giggles on top of me as I squirm under her.@
>It's not just the pleasure that's filling me...\
>Being controlled so easily by her makes my face go red in shame as she just looks on and laughs.\
name "Luka"
>Ahh... I'm going to come...\
name ""
name $name
>Arara, already?@
>I thought you were weak, but I didn't think you were that pathetic...\
name ""
name "Luka"
>Ahhh...\
name ""
>I try to endure it, but it's no use.@
>No matter how I try to resist or focus on something else, the stimulation blows through it and takes over again.\
>Until finally, I can't take it any longer.\
name $name
>And there's the end of you!@
>Now surrender and come inside me.\
name ""
name "Luka"
>Ah...Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\succubus_hd3.bmp",0,0
gosub *syasei2
>I moan in ecstasy as I explode in her, shooting up into her.\
>My body relaxes as the sweet sensation of release fills me after giving in and letting the pleasure fill my body.\
name "Luka"
>Ahh...\
name ""
name $name
>I didn't even need to use a technique, and you still came...\
>Hehe... I wonder if you get it already?@
>When I rape you, you're completely at my mercy, unable to do anything.\
name ""
>The Succubus looks down at me, her eyes sparkling in victory.\
>Even though we're having sex, there's no love here...@
>This is just a predator eating her prey...\
name $name
>Hehe... Now, playtime is over.@
>The real time to feed starts now.\
>You may already know, but we Succubi have an ability to drain energy...@
>It's a heavenly sensation to die for... Do you want to feel it once?\
name ""
name "Luka"
>N...No... Don't...\
name ""
>Energy drain...@>That's the famous ability that Succubi have...@
>Able to stun the man with pleasure as they suck out all of his energy.\
>It's said that men around the world seek out Succubi just to meet their death from this ability.@
>This Succubus is going to use that on me...?\
name "Luka"
>N...No... Stop...\
name ""
name $name
>Hehe... Are you ready to be sucked dry?@
>Well then... Here I go.\
name ""
>A seductive smile crosses her face as she leans down and whispers in my ear.\
name $name
>Here I go...@> Energy Drain...\
name ""
name "Luka"
>Ahhhhh!\
name ""
mov %hseanwave,13:hseanwave
>In the next instant, the sensations in her vagina change.@
>Something deep inside of her reaches out and clamps around the tip of my penis.\
>It starts to powerfully suck on my penis, like it was trying to forcibly suck out my semen.\
name "Luka"
>What is this!? I...It's sucking...!@
>Ahhh!\
name ""
>I cry in surprise and pleasure as the warm flesh tube that clamped around me shrinks, making the suction even more powerful.\
>At the same time, her vagina itself moves back and forth around my penis in a milking motion, bringing me to the edge of an orgasm after only a few moments.\
name "Luka"
>Ahhh... I... I can't take this...\
name ""
name $name
>Of course... Did you really think a man could resist a Succubus' best technique?\
name ""
name "Luka"
>Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\succubus_hd4.bmp",0,0
gosub *syasei2
>Unable to take it, I explode inside her as the powerful suction sucks up the semen after every spurt.\
>Pleasure courses through my body as the sucking feels like it's pulling my entire body into her vagina.\
>I start to drool as the ecstasy fills all of my thoughts, blocking out the fear from only moments before.\
name "Luka"
>Ahh...\
name ""
name $name
>Hehe, you're in a trance...@
>The same face all Succubi's prey make...\
>But there's no relief coming for you...\
name ""
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
name "Luka"
>Ahhh...@
>Wh...What is this...?\
>It...It isn't stopping...\
name ""
>After being stuck in the trance for what felt like an eternity, I finally notice something's wrong.@
>My ejaculation, which only should take a few seconds, has kept going, pulse after pulse...\
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
name "Luka"
>Ahhh...\
name ""
>I shiver with every spurt inside of her, renewing and amplifying the pleasure from the last.\
name $name
>Hehe, it's good, isn't it?@
>Like this, you can ejaculate over and over again as all of your energy is squeezed...\
name ""
name "Luka"
>N...No! Ahhh!\
name ""
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
>I feebly struggle under her, but it's no use.@
>With her powerful body holding me down, and me too weak to fight back, I can't do anything but continue to ejaculate inside her.\
>All the while, she looks down at me with a triumphant smile as I feel weaker and weaker.\
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
name "Luka"
>Ahh... N...Not this...\
name ""
name $name
>Hehe... Being able to die while being immersed in pleasure...@
>It's the best way to go, isn't it?\
name ""
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
>Her wet vagina continues to massage me, as the tube clamped around my penis keeps up its powerful suction.@
>It's sucking me dry... The source of this pleasure is also the source of my death...\
name "Luka"
>No... No more...\
name ""
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
>But the suction keeps going, sucking out more of my energy.@
>This devilish stimulation won't stop, and neither will my repeated orgasms...\
>Completely helpless under her, I can't do anything but writhe in pleasure.\
name "Luka"
>Haaa...\
name ""
>A feeling of worthlessness fills my mind.@
>Finally broken, I give myself over completely to the pleasure as I just let myself soak in it.\
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
name $name
>Hehe... Your energy is flowing into me...@
>Your life itself is slowly being drained into my pussy.\
name ""
name "Luka"
>Haa... It feels good...\
name ""
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
>Over and over, the orgasms continue building on top of each other as she keeps sucking more out of me.@
>In return for my energy and semen, she gives me this pleasure...\
>Surrendering completely to the Succubus, I moan in ecstasy as I await my fate.\
name "Luka"
>Ahh...hhh...\
name ""
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
name $name
>You're almost empty...@
>Hehe, you'll go right from feeling like you're in heaven to actually being in heaven...\
name ""
name "Luka"
>Ah...\
name ""
>My body and mind slowly melt together as I can't sense anything but pleasure around me.\
>As everything swirls together, my life itself fades, all while being raped by the Succubus.\
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
gosub *anten
mov %hseanwave,0:hseanwave
name $name
>Hehe... Thanks for the meal.@
>It looks like you had a good dream, right until the very end.\
name ""
>The Succubus laughs to herself, content after her meal.@
>All that remains in the room with her is the dried corpse of the boy she devoured.\
>.............\
goto *badend



*witchs_start

mov $name,"Succubus Witch"
mov $name2,"Succubus Witch"
mov $lavel,"witchs"
mov $tatie1,"witchs_st01"
mov $tatie2,"witchs_st02"
mov $tatie3,"witchs_st03"
mov $tatie4,"witchs_hk1"
mov $haikei,"bg110"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,4200
if %nanido=2 mov %max_enemylife,4700
if %nanido=3 mov %max_enemylife,6300
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,90
mov %earth_keigen,20
if %nanido=3 mov %earth_keigen,10
mov %music,2
mov %tikei,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't push her off!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Hehe, I won't let you go."
mov $mogaku_sel2,"If you struggle, I'll just squeeze harder."
mov $mogaku_sel3,"You don't want your semen squeezed...? Too bad, since I still won't let you go."
mov $mogaku_sel4,"Pointless struggling..."
mov $mogaku_sel5,"You can't break free from a Succubus who has decided you're to be fed on..."
mov $mogaku_earth_dassyutu1,"...What is this power?"
mov $mogaku_earth_dassyutu2,"A power even I don't recognize...?"
mov $half_s1,"It feels good, doesn't it?"
mov $half_s2,"Let me make it even better..."
mov $kiki_s1,"You can't take it any longer, can you?"
mov $kiki_s2,"Now, give me your energy!"
mov %end_n,7
mov %exp_minus,65000
mov %zmonster_x,-270
mov %tukix,280
mov %owaza_count1a,4
mov %owaza_count2a,4
mov %owaza_count3a,4
mov %owaza_count3b,4
>Powerful magic fills the room, emanating from the Witch.@
>It's so thick with her power, even her gloves and hat are floating around her...\
>A giant tongue is hanging out of her hat... Is it alive...?\
name $name
>I'll squeeze out all your energy and devote it to Lilith's revival.@
>It will feel really good, so make sure you work hard to revive her!\
name ""
goto *common_main



*witchs_v

gosub *face3
name $name
>If I'm going to be sealed...@
>I'll transfer all of my magical power to Lilith first!\
name ""
dwave 1,"se\warm.ogg"
csp 700
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
>The Succubus Witch's body flashes with a bright light, then vanishes!\
mov %viclose,1:gosub *victory
mov %getexp,25000:gosub *lvup
mov %2304,1
goto *sean0222



*witchs_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>Ara, so you want to give me your energy?\
name ""
goto *witchs_a



*witchs_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *witchs_kousan
if %cmd1=16 goto *witchs_onedari
if %cmd1=17 goto *common_skill
goto *witchs_main



*witchs_yuwaku_a

rnd2 %ransu,1,2
if %ransu=1 gosub *witchs_yuwaku_a1:goto *common_main
if %ransu=2 gosub *witchs_yuwaku_a2:goto *common_main



*witchs_yuwaku_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"L...Lick it..."
if %ransu=2 mov $sel1,"Th...Those soft lips..."
if %ransu=3 mov $sel1,"Please... Suck on it..."
name "Luka"
eng $sel1:$sel6\
name ""
lsp 690,":a;chara\witchs_ct21.bmp",0,0
lsp 700,":a;chara\witchs_hg1.bmp",0,0:print 10,500
>Luka pushes his penis toward the Succubus Witch's lips!\
>Her soft lips brush against the tip of his penis!
if %nanido<2 damage 50,60
if %nanido=2 damage 57,67
if %nanido=3 damage 64,74
if %mylife=0 sub %stack,1:return *witchs_h9
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"What a bad boy, forcing himself on a girl like that. "
if %ransu=2 mov $sel1,"Such a naughty little boy. "
if %ransu=3 mov $sel1,"Sheesh... You want me to play with your penis that badly?"
name $name
eng $sel1:$sel6\
name ""
>The Succubus Witch gently licks Luka's penis!
if %nanido<2 damage 50,60
if %nanido=2 damage 57,67
if %nanido=3 damage 64,74
if %mylife=0 sub %stack,1:return *witchs_h9
if %kousan<2 csp 690:gosub *face1
sub %stack,1
return



*witchs_yuwaku_a2

add %stack,1
mov %hanyo1,2
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Ahh... B...Breasts..."
if %ransu=2 mov $sel1,"I...I want to feel them..."
if %ransu=3 mov $sel1,"Haaa..."
name "Luka"
eng $sel1:$sel6\
name ""
csp 690
lsp 700,":a;chara\witchs_hj1.bmp",0,0:print 10,500
>Luka clings to the Succubus Witch's body, and buries his face in her chest!\
>The soft pressure of her breasts fills Luka's senses!
if %nanido<2 damage 40,50
if %nanido=2 damage 47,57
if %nanido=3 damage 54,64
if %mylife=0 sub %stack,1:return *witchs_h9
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Boys all love breasts, don't they? "
if %ransu=2 mov $sel1,"Do you want to come with your head buried in my breasts?"
if %ransu=3 mov $sel1,"Arara, what a spoiled little boy. "
name $name
eng $sel1:$sel6\
name ""
>The Succubus Witch gently pushes her breasts together, rubbing them against Luka's head!
if %nanido<2 damage 40,50
if %nanido=2 damage 47,57
if %nanido=3 damage 54,64
if %mylife=0 sub %stack,1:return *witchs_h9
if %kousan<2 csp 690:gosub *face1
sub %stack,1
return



*witchs_a

if %kousoku=1 gosub *witchs_a9:goto *common_main
rnd2 %ransu,1,9
if %ransu=1 gosub *witchs_a1:goto *common_main
if %ransu=2 gosub *witchs_a2:goto *common_main
if %ransu=3 gosub *witchs_a3:goto *common_main
if %ransu=4 && %owaza_count3a>5 gosub *witchs_a4:goto *common_main
if %ransu=5 && %owaza_count3a>5 gosub *witchs_a5:goto *common_main
if %ransu=6 && %owaza_count2a>5 gosub *witchs_a6:goto *common_main
if %ransu=7 && %owaza_count2a>5 gosub *witchs_a7:goto *common_main
if %ransu=8 && %owaza_count1a>5 gosub *witchs_a8:goto *common_main
if %ransu=9 && %owaza_count3b>5 && %status=0 gosub *witchs_a11:goto *common_main
skip -10



*witchs_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Look, I can even do this..."
if %ransu=2 mov $sel1,"These gloves make it even better!"
if %ransu=3 mov $sel1,"Are you going to cover my gloves in semen?"
name $name
eng $sel1:$sel6\
name ""
skillname "Milking Gloves"
dwave 1,"se\umaru.ogg"
eng "The Succubus Witch's gloves float through the air toward Luka's groin!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>Flying through the air, they stroke Luka's penis!
skillcount2 3460
if %nanido<2 damage 60,70
if %nanido=2 damage 75,85
if %nanido=3 damage 90,100
skillname ""
if %mylife=0 sub %stack,1:return *witchs_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*witchs_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"This hat is full of power..."
if %ransu=2 mov $sel1,"Do you want to be played with by a Succubus' hat?"
if %ransu=3 mov $sel1,"Is my hat alone enough to make you come?"
name $name
eng $sel1:$sel6\
name ""
skillname "Hat of Pleasure"
dwave 1,"se\ero_pyu5.ogg"
lsp 690,":a;chara\witchs_ct01.bmp",0,0
lsp 700,":a;chara\witchs_hc1.bmp",0,0:print 10,500
eng "The Succubus Witch's hat flies onto Luka's groin!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu
if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>Sucking his penis inside, thousands of tiny feelers stimulate Luka's penis inside the hat!
skillcount2 3461
if %nanido<2 damage 65,75
if %nanido=2 damage 80,90
if %nanido=3 damage 95,105
skillname ""
if %mylife=0 sub %stack,1:return *witchs_h2
if %kousan<2 csp 690:gosub *face1
if %kousan<2 && %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %kousan<2 && %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*witchs_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll squeeze it out with my chest..."
if %ransu=2 mov $sel1,"See how much you can shoot between my breasts..."
if %ransu=3 mov $sel1,"I feel soft, don't I? Haha..."
name $name
eng $sel1:$sel6\
name ""
skillname "Breast Milking"
dwave 1,"se\ero_koki1.ogg"
lsp 700,":a;chara\witchs_hd1.bmp",0,0:print 10,500
eng "The Succubus Witch puts Luka's penis between her breasts!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu
if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>Using her soft breasts, she massages Luka's penis!
skillcount2 3462
if %nanido<2 damage 70,80
if %nanido=2 damage 85,95
if %nanido=3 damage 100,110
skillname ""
if %mylife=0 sub %stack,1:return *witchs_h3
if %kousan<2 gosub *face1
if %kousan<2 && %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %kousan<2 && %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*witchs_a4

add %stack,1
mov %owaza_count3a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll take your strength..."
if %ransu=2 mov $sel1,"Let it all out in my tail!"
if %ransu=3 mov $sel1,"I'll suck out some energy, and make you feel good at the same time..."
name $name
eng $sel1:$sel6\
name ""
skillname "HP Tail Drain"
dwave 1,"se\ero_chupa6.ogg"
lsp 700,":a;chara\witchs_hi1.bmp",0,0:print 10,500
eng "The Succubus Witch's tail shoots toward Luka, the tip opening up in a mouth!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu
if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>It clamps around Luka's penis, absorbing his energy!
skillcount2 3463
if %nanido<2 damage 70,80
if %nanido=2 damage 85,95
if %nanido=3 damage 100,110
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *witchs_h4
if %kousan<2 gosub *face1
if %kousan<2 && %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %kousan<2 && %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*witchs_a5

add %stack,1
mov %owaza_count3a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"How about I suck out your power itself?"
if %ransu=2 mov $sel1,"To think you would lose your abilities through your penis..."
if %ransu=3 mov $sel1,"It feels good, doesn't it? You want me to suck more, don't you?"
name $name
eng $sel1:$sel6\
name ""
skillname "Lvl Tail Drain"
dwave 1,"se\ero_chupa6.ogg"
if %hanyo2=0 lsp 700,":a;chara\witchs_hi1.bmp",0,0:print 10,500
if %hanyo2=1 lsp 700,":a;chara\witchs_hi3.bmp",0,0:print 10,500
eng "The Succubus Witch's tail shoots toward Luka, the tip opening up in a mouth!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,66
if %wind=2 && %nanido=2 mov %wind_kakuritu,55
if %wind=2 && %nanido=3 mov %wind_kakuritu,33
gosub *wind_guard_kakuritu
if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3464
>It clamps around Luka's penis, absorbing his power!\
name "Luka"
>Ahhh...!\
name ""
gosub *syasei1
if %hanyo2=0 lsp 700,":a;chara\witchs_hi2.bmp",0,0
if %hanyo2=1 lsp 700,":a;chara\witchs_hi4.bmp",0,0:mov %hanyo2,2
gosub *syasei2
>A relaxing sense of release fills Luka, as a strange liquid is sucked out of him!\
gosub *lvdrain
skillname ""
if %mylv=1 sub %stack,1:return *witchs_h5
if %kousan<2 gosub *face1
sub %stack,1
return



*witchs_a6

add %stack,1
mov %owaza_count2a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"A Succubus' kiss will make you melt away..."
if %ransu=2 mov $sel1,"Give yourself to my kiss..."
if %ransu=3 mov $sel1,"I'll kiss you as much as you want..."
name $name
eng $sel1:$sel6\
name ""
skillname "Melting Kiss"
dwave 1,"se\ero_chupa2.ogg"
lsp 700,":a;chara\witchs_hh2.bmp",0,0:print 10,500
eng "The Succubus Witch presses her lips against Luka's!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,50
if %wind=2 && %nanido=2 mov %wind_kakuritu,40
if %wind=2 && %nanido=3 mov %wind_kakuritu,25
gosub *wind_guard_kakuritu
if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>A feeling of weakness flows over Luka's body, as the sweet kiss fills his senses!
skillcount2 3465
if %nanido<2 damage 60,70
if %nanido=2 damage 75,85
if %nanido=3 damage 90,100
if %status=0 mov $sel1,"Luka was put into a trance!"
if %status=1 mov $sel1,"Luka is in a trance..."
mov %status,1:gosub *status_print
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *witchs_h6
if %kousan=2 sub %stack,1:return
name "Luka"
>Haa...\
name ""
name $name
>It feels like you could melt away, doesn't it?@
>Hehehe...\
name ""
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,3,4
if %nanido=3 rnd2 %status_turn,4,5
gosub *face1
sub %stack,1
return



*witchs_a7

add %stack,1
mov %owaza_count2a,0
if %kousan=2 skip 4
name $name
>Now, become mine!\
name ""
skillname "Eyes of Seduction"
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
eng "The Succubus Witch's eyes shine with a mysterious light!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,50
if %wind=2 && %nanido=2 mov %wind_kakuritu,40
if %wind=2 && %nanido=3 mov %wind_kakuritu,25
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But a gust of wind blocks Luka's view!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3466
mov %status,5:gosub *status_print
>Luka was seduced by the Succubus Witch!\
skillname ""
name "Luka"
>Ah...Ahh...\
name ""
name $name
>You want me, don't you?@
>I'll let you do whatever you want to me... Teehee.\
name ""
if %kousan=2 sub %stack,1:return
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,2,3
if %nanido=3 rnd2 %status_turn,3,4
sub %stack,1
return



*witchs_a8

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 5
name $name
>You want me to rape you now, don't you?@
>I'll squeeze it all out, just lay back and give it to me!\
name ""
skillname "Succubus Hold"
eng "The Succubus Witch forces Luka to the ground, and jumps on top of him!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,10
if %wind=2 && %nanido=2 mov %wind_kakuritu,7
if %wind=2 && %nanido=3 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>The Succubus Witch is riding Luka!\
skillname ""
if %kousan=2 sub %stack,1:return
name $name
if %first_sel1=1 skip 4
>Now, just behave yourself.@
>I'll make this feel really good...\
skip 3
>This time, behave yourself.@
>I'll make this feel really good...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,1
if %earth=0 && %nanido=2 mov %genmogaku,1
if %earth=0 && %nanido=3 mov %genmogaku,1
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
sub %stack,1
return



*witchs_a9

add %stack,1
>The Succubus Witch is riding Luka...\
name $name
>...Now to rape you.@
>I'll squeeze a lot out of you, so get ready!\
name ""
skillname "Energy Drain"
dwave 1,"se\ero_chupa6.ogg"
mov %kousoku,2
lsp 700,":a;chara\witchs_hk2.bmp",0,0:print 10,500
>The Succubus Witch drops her waist, forcing Luka inside her!@
>Luka's energy flows out of him into her hot vagina!\
skillcount2 3467
if %nanido<2 damage 80,100
if %nanido=2 damage 95,115
if %nanido=3 damage 110,120
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
>Luka is being raped by the Succubus Witch!\
if %mylife=0 sub %stack,1:return *witchs_h7
name $name
>...Well, it's incredible, isn't it?@
>Go ahead and ejaculate as much as you want!\
name ""
mov %genmogaku,100
sub %stack,1
goto *witchs_a10



*witchs_a10

add %stack,1
>Luka is being raped by the Succubus Witch...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Come on, come!":mov $sel2,"The Succubus Witch's vagina squirms around Luka's penis!"
if %ransu=2 mov $sel1,"It feels good, doesn't it...?":mov $sel2,"The Succubus Witch grinds against Luka!"
if %ransu=3 mov $sel1,"Surrender and let your energy be absorbed...":mov $sel2,"The Succubus Witch tightens around Luka as she pumps him!"
if %ransu=4 mov $sel1,"Are you about to come?":mov $sel2,"The Succubus Witch tightens around Luka's penis!"
if %ransu=5 mov $sel1,"If I do it like this, it feels goooood. ":mov $sel2,"The Succubus Witch slowly moves her waist in a circle on top of Luka!"
notif %status=5 skip 5
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Hehe, let's enjoy this together."
if %ransu=2 mov $sel1,"Move with me, so we both feel good!"
if %ransu=3 mov $sel1,"You want my body, and I want your energy... It's a fair trade!"
name $name
eng $sel1:$sel6\
name ""
skillname "Energy Drain"
dwave 1,"se\ero_chupa6.ogg"
eng $sel2:$sel6
mov %damage_kotei,1
skillcount2 3467
damage 80,100
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *witchs_h8
sub %stack,1
goto *witchs_a10



*witchs_a11

add %stack,1
mov %owaza_count3b,0
name $name
>I'll make you into a toy with my special magic!\
name ""
skillname "Minimum Phantasm"
dwave 1,"se\flash.ogg"
eng "Gentle light begins to emanate from the Succubus Witch's hands!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,100
if %wind=2 && %nanido=2 mov %wind_kakuritu,100
if %wind=2 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
dwave 2,"se\minimum.ogg"
>Luka's body rapidly shrinks!\
skillname ""
lsp 700,":a;chara\witchs_hb1.bmp",0,0:print 10,500
mov %wind,0:mov %earth,0:mov %aqua,0:mov %fire,0
name "Luka"
>Wh...What's going on!?\
name ""
>Magic courses through Luka's body, making him tiny!@
>The now seemingly gigantic Succubus Witch towers over him!\
name $name
>Ahaha, you're so tiny now! @
>It's time to play with my new toy!\
name ""
if %kousan=2 sub %stack,1:return
sub %stack,1
rnd2 %ransu,1,2
if %ransu=1 goto *witchs_a12
if %ransu=2 goto *witchs_a13



*witchs_a12

add %stack,1
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Let me feel you squirm in my chest! "
if %ransu=2 mov $sel1,"Uh oh, I'm going to crush you between my breasts! "
if %ransu=3 mov $sel1,"Hehe, you're going to come as your body is stuck between my breasts. "
if %ransu=4 mov $sel1,"Isn't this what every boy dreams of?"
if %ransu=5 mov $sel1,"Hehe, your tiny little body is clinging to my breasts. "
name $name
eng $sel1:$sel6\
name ""
skillname "Minimum Phantasm: Heaven"
dwave 1,"se\ero_paizuri.ogg"
lsp 700,":a;chara\witchs_hb2.bmp",0,0:print 10,500
>The Succubus Witch puts Luka between her breasts, squeezing them together to play with him!
skillcount2 3598
mov %damage_kotei,1
damage 100,120
skillname ""
if %mylife=0 sub %stack,1:return *witchs_h10
sub %stack,1
goto *witchs_a12



*witchs_a13

add %stack,1
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Watch out, I'm going to sit on you!"
if %ransu=2 mov $sel1,"Ahaha, I hope your body can hold my weight. "
if %ransu=3 mov $sel1,"I wonder if you'll get crushed?"
if %ransu=4 mov $sel1,"My ass is nice and soft, isn't it?"
if %ransu=5 mov $sel1,"How does it feel to be sat on?"
name $name
eng $sel1:$sel6\
name ""
skillname "Minimum Phantasm: Hell"
dwave 1,"se\ero_paizuri.ogg"
lsp 700,":a;chara\witchs_hf1.bmp",0,0:print 10,500
>The Succubus Witch sits on top of Luka's tiny body, forcing him into her ass cheeks!
skillcount2 3599
mov %damage_kotei,1
damage 100,120
skillname ""
if %mylife=0 sub %stack,1:return *witchs_h11
sub %stack,1
goto *witchs_a13



*witchs_onedari

mov $list1,"Milking Gloves"
if %3460>0 mov %list_num1,1
mov $list2,"Hat of Pleasure"
if %3461>0 mov %list_num2,1
mov $list3,"Breast Milking"
if %3462>0 mov %list_num3,1
mov $list4,"HP Tail Drain"
if %3463>0 mov %list_num4,1
mov $list5,"Lvl Tail Drain"
if %3464>0 mov %list_num5,1
mov $list6,"Melting Kiss"
if %3465>0 mov %list_num6,1
mov $list7,"Eyes of Seduction"
if %3466>0 mov %list_num7,1
mov $list8,"Energy Drain"
if %3467>0 mov %list_num8,1
mov $list9,"Minimum Phantasm: Heaven"
if %3598>0 mov %list_num9,1
mov $list10,"Minimum Phantasm: Hell"
if %3599>0 mov %list_num10,1
gosub *cmd_onedari
if %cmd1=11 goto *witchs_onedari1
if %cmd1=12 goto *witchs_onedari2
if %cmd1=13 goto *witchs_onedari3
if %cmd1=14 goto *witchs_onedari4
if %cmd1=15 goto *witchs_onedari5
if %cmd1=16 goto *witchs_onedari6
if %cmd1=17 goto *witchs_onedari7
if %cmd1=18 goto *witchs_onedari8
if %cmd1=19 goto *witchs_onedari9
if %cmd1=20 goto *witchs_onedari10
if %cmd1=-1 goto *witchs_main
goto *witchs_onedari



*witchs_onedari1

gosub *onedari_syori
name $name
>You want these gloves of mine to play with your penis?\
name ""
gosub *witchs_a1
skip -1



*witchs_onedari2

gosub *onedari_syori
name $name
>You want to be played with by my hat?\
name ""
gosub *witchs_a2
skip -1



*witchs_onedari3

gosub *onedari_syori
name $name
>You want to be teased with my breasts?
name ""
gosub *witchs_a3
skip -1



*witchs_onedari4

gosub *onedari_syori
name $name
>You want your energy sucked by my tail?\
name ""
gosub *witchs_a4
skip -1



*witchs_onedari5

gosub *onedari_syori
name $name
>You want your power sucked by my tail?\
name ""
gosub *witchs_a5
mov %hanyo2,1
gosub *witchs_a5
skip -1



*witchs_onedari6

gosub *onedari_syori
name $name
>You want to melt in my kiss?\
name ""
gosub *witchs_a6
skip -1



*witchs_onedari7

gosub *onedari_syori
name $name
>You want to devote yourself to me?\
name ""
gosub *witchs_a7
goto *witchs_yuwaku_a



*witchs_onedari8

gosub *onedari_syori_k
name $name
>You want me to rape you?\
name ""
if %kousoku=0 gosub *witchs_a8
if %kousoku=1 gosub *witchs_a9
skip -1



*witchs_onedari9

gosub *onedari_syori
name $name
>You want me to shrink you, and give you a taste of heaven?\
name ""
gosub *witchs_a11
gosub *witchs_a12



*witchs_onedari10

gosub *onedari_syori
name $name
>You want me to shrink you, and give you a taste of hell?\
name ""
gosub *witchs_a11
gosub *witchs_a13



*witchs_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\witchs_bk01.bmp",0,0
gosub *syasei2
>As the floating gloves stroke Luka, he comes, covering them with his semen.\
mov %viclose,1:gosub *lose
mov %2604,%2604+1:if %2604=1 mov %count_koenemy,%count_koenemy+1
if %2604>%count_most mov %count_most,%2604:mov $count_mostname,$name
count 27,13
mov $bad1,"Luka was forced to an orgasm by the Succubus Witch's gloves."
gosub *face2
name $name
>You got my gloves all dirty...@
>And here I thought you were a wielder of great power... Oh well.\
name ""
goto *witchs_ha



*witchs_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\witchs_ct02.bmp",0,0
lsp 700,":a;chara\witchs_hc2.bmp",0,0
gosub *syasei2
>With his penis stuck inside the Succubus Witch's strange hat, Luka comes, filling it with his semen.\
mov %viclose,1:gosub *lose2
name "Luka"
>Ahh...\
name ""
name $name
>My hat feels good, doesn't it?@
>I'll let you play with it more.\
name ""
skillcount2 3461
skillname "Hat of Pleasure"
dwave 1,"se\ero_pyu5.ogg"
>The fleshy projections squirm around Luka's penis!
mov %damage_kotei,1
damage 110,130
dwave 1,"se\ero_pyu5.ogg"
>The hat's bizarre feelers stimulate Luka!
mov %damage_kotei,1
damage 110,130
skillname ""
name "Luka"
>Ahhh!\
name ""
>Looking down, all I can see is her red hat, simply sitting on top of my groin.\
>But inside, flesh like feelers are rubbing me up and down, squirming and writhing around.\
name $name
>Hehehe... Does it feel good?@
>I'll let you play with my hat for as long as you want.\
name ""
skillcount2 3461
skillname "Hat of Pleasure"
dwave 1,"se\ero_pyu5.ogg"
>The feelers inside the hat rub the tip of Luka's penis!
mov %damage_kotei,1
damage 110,130
dwave 1,"se\ero_pyu5.ogg"
>The flesh like projections move up and down Luka's penis!
mov %damage_kotei,1
damage 110,130
skillname ""
name "Luka"
>Haaa...\
name ""
name $name
>Hehe, what a nice moan.@
>It looks like you're going to come inside my hat soon...\
>Look, it's going to finish you off now. \
name ""
skillcount2 3461
skillname "Hat of Pleasure"
dwave 1,"se\ero_pyu5.ogg"
>The hat shrinks, clamping tightly around Luka's penis!
mov %damage_kotei,1
damage 110,130
dwave 1,"se\ero_pyu5.ogg"
>Tight around his penis, the feelers run all over Luka's penis!
mov %damage_kotei,1
damage 110,130
skillname ""
name "Luka"
>Ahhh... Haaaaa!\
name ""
gosub *syasei1
lsp 690,":a;chara\witchs_ct03.bmp",0,0
lsp 700,":a;chara\witchs_hc3.bmp",0,0
gosub *syasei2
>I helplessly grab at the cloth hat as it forces me to an orgasm.@
>My semen spurts inside the hat, filling up the small hole inside it.\
name $name
>That's the second! @
>You let out a lot again, didn't you?\
name ""
name "Luka"
>Ahh...\
name ""
>Even though I just ejaculated, the feelers coil right back around me again.@
>Defeated by a hat...\
name $name
>It's going to make you come again.@
>Haha... Beaten by a mere hat.\
name ""
skillcount2 3461
skillname "Hat of Pleasure"
dwave 1,"se\ero_pyu5.ogg"
>The hat starts to slowly vibrate!
mov %damage_kotei,1
damage 110,130
dwave 1,"se\ero_pyu5.ogg"
>The strange feelers coil around Luka's penis as they vibrate!
mov %damage_kotei,1
damage 110,130
skillname ""
name "Luka"
>Ahhhh!\
name ""
>I let out a moan as it feels like thousands of tiny fingers are caressing my penis inside the hat.\
>A wet sound fills the small room as the semen from my previous ejaculations act as a lubricant for the hat to rub me even harder.\
name $name
>Hehe, you love it, don't you?@
>Come as much as you want inside my hat. \
name ""
skillcount2 3461
skillname "Hat of Pleasure"
dwave 1,"se\ero_pyu5.ogg"
>Thousands of feelers run all over Luka's penis!
mov %damage_kotei,1
damage 110,130
dwave 1,"se\ero_pyu5.ogg"
>They coil tighter around Luka's penis as they squirm around!
mov %damage_kotei,1
damage 110,130
skillname ""
name "Luka"
>Ahh...\
name ""
name $name
>Hehe, about to come again?@
>You're about to leak for a third time in my hat!\
>Now, go ahead. \
name ""
skillcount2 3461
skillname "Hat of Pleasure"
dwave 1,"se\ero_pyu5.ogg"
>The feelers tighten around Luka's penis!
mov %damage_kotei,1
damage 110,130
dwave 1,"se\ero_pyu5.ogg"
>Thousands of finger-like feelers run up and down the back of Luka's penis, as more wriggle around his tip!
mov %damage_kotei,1
damage 110,130
skillname ""
name "Luka"
>Ahhhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\witchs_ct04.bmp",0,0
lsp 700,":a;chara\witchs_hc4.bmp",0,0
gosub *syasei2
>I explode inside the hat again, visibly shaking the small cloth piece of clothing.\
>Right after my ejaculation, the feelers inside of it eagerly run all over my penis, collecting all the semen inside.\
gosub *clear_sprite
gosub *setwindow_01p
name $name
>Was it fun to be squeezed by a simple hat?@
>And here I thought you were a wielder of great power... Oh well.\
name ""
mov %battle,0
mov %hsean,1
mov %2604,%2604+1:if %2604=1 mov %count_koenemy,%count_koenemy+1
if %2604>%count_most mov %count_most,%2604:mov $count_mostname,$name
count 27,13
mov $bad1,"The Succubus Witch's hat forced Luka to come."
goto *witchs_ha



*witchs_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\witchs_hd2.bmp",0,0
gosub *syasei2
>As the Succubus Witch uses her breasts to play with Luka's penis, he comes, covering her chest in semen.\
mov %viclose,1:gosub *lose2
name "Luka"
>Ahh...\
name ""
name $name
>Did it feel good...?@
>I'll squeeze out some more with my breasts.\
name ""
>Keeping his penis between her breasts, the Succubus Witch continues teasing Luka!\
skillcount2 3462
skillname "Breast Milking"
dwave 1,"se\ero_koki1.ogg"
>Her soft breasts press together around Luka's penis!
mov %damage_kotei,1
damage 110,130
dwave 1,"se\ero_koki1.ogg"
>The Succubus Witch presses her breasts together, tightly squeezing Luka's penis between them!
mov %damage_kotei,1
damage 110,130
skillname ""
name "Luka"
>Haaa...\
name ""
name $name
>Hehe, I'm not done yet.@
>I'm going to milk it out again. \
name ""
skillcount2 3462
skillname "Breast Milking"
dwave 1,"se\ero_koki1.ogg"
>Stuck between her valley, the Succubus Witch's soft flesh pushes against his penis from every direction!
mov %damage_kotei,1
damage 110,130
dwave 1,"se\ero_koki1.ogg"
>Pressed between her breasts, the Succubus Witch focuses on teasing his tip!
mov %damage_kotei,1
damage 110,130
skillname ""
name "Luka"
>Ahhh...\
name ""
name $name
>Do you like it...?@
>Time to make you come again!\
name ""
skillcount2 3462
skillname "Breast Milking"
dwave 1,"se\ero_koki1.ogg"
>The Succubus Witch starts to alternate moving her breasts up and down!
mov %damage_kotei,1
damage 110,130
dwave 1,"se\ero_koki1.ogg"
>Her soft breasts massage Luka's penis, forcing a sweet stimulation into his body!
mov %damage_kotei,1
damage 110,130
skillname ""
name "Luka"
>Ah... Ahhh...\
name ""
gosub *syasei1
lsp 700,":a;chara\witchs_hd3.bmp",0,0
gosub *syasei2
>Indulging in the ecstasy, I explode on her chest.@
>My semen shoots out, covering the valley between her large breasts.\
lsp 700,":a;chara\witchs_hd4.bmp",0,0:print 10,500
name $name
>Aha, another loss to my breasts.@
>Aren't you embarrassed at being milked by a girl's breasts?\
name ""
name "Luka"
>Urhg...\
name ""
name $name
>But I'm not done milking you. \
name ""
skillcount2 3462
skillname "Breast Milking"
dwave 1,"se\ero_koki1.ogg"
>The Succubus Witch uses her hands to increase the pressure on Luka's penis!
mov %damage_kotei,1
damage 110,130
dwave 1,"se\ero_koki1.ogg"
>The pressure gets even higher, crushing Luka between her soft breasts!
mov %damage_kotei,1
damage 110,130
skillname ""
name "Luka"
>Ahhh!\
name ""
>My penis sinks into her smooth skin, slowly being pushed together with my penis in between.\
>I writhe around under her, but there's no way I can escape from her.\
name $name
>Ahaha, what a pathetic face.@
>Are you really that overjoyed at being milked by my breasts?\
name ""
skillcount2 3462
skillname "Breast Milking"
dwave 1,"se\ero_koki1.ogg"
>Buried between her breasts, she pushes them even tighter together!
mov %damage_kotei,1
damage 110,130
dwave 1,"se\ero_koki1.ogg"
>Like that, she moves them up and down, stroking Luka!
mov %damage_kotei,1
damage 110,130
skillname ""
name "Luka"
>Ahh... I'm going to come...\
name ""
name $name
>Ahaha, are you going to cover my breasts in semen again? @
>Alright then, here it comes! \
name ""
skillcount2 3462
skillname "Breast Milking"
dwave 1,"se\ero_koki1.ogg"
>Speeding up, she moves her breasts up and down even faster!
mov %damage_kotei,1
damage 110,130
dwave 1,"se\ero_koki1.ogg"
>Squeezing even tighter than before, she presses against the tip of Luka's penis, delivering the finishing blow!
mov %damage_kotei,1
damage 110,130
skillname ""
name "Luka"
>Ahhhh...!\
name ""
gosub *syasei1
lsp 700,":a;chara\witchs_hd5.bmp",0,0
gosub *syasei2
>With a pleasure filled sigh, I give in to the desire to release.\
>My semen spurts out between her breasts, covering her large breasts in my sticky white semen.\
lsp 700,":a;chara\witchs_hd6.bmp",0,0:print 10,500
name $name
>My breasts are all covered in semen now...@
>And here I thought you were a wielder of great power... Oh well.\
name ""
gosub *clear_sprite
gosub *setwindow_01p
mov %battle,0
mov %hsean,1
mov %2604,%2604+1:if %2604=1 mov %count_koenemy,%count_koenemy+1
if %2604>%count_most mov %count_most,%2604:mov $count_mostname,$name
count 7,13
mov $bad1,"Luka was forced to an orgasm by the Succubus Witch's tit fuck."
goto *witchs_ha



*witchs_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\witchs_hi2.bmp",0,0
gosub *syasei2
>As the tail sucks on Luka's penis, he comes, filling it with his semen.\
mov %viclose,1:gosub *lose
mov %2604,%2604+1:if %2604=1 mov %count_koenemy,%count_koenemy+1
if %2604>%count_most mov %count_most,%2604:mov $count_mostname,$name
count 19,13
mov $bad1,"Luka was forced to an orgasm as the Succubus Witch sucked his energy."
name $name
>Giving me so much semen, along with your energy...@
>And here I thought you were a wielder of great power... Oh well.\
name ""
goto *witchs_ha



*witchs_h5

name "Luka"
>Ahhh...\
name ""
>With all of his power drained, Luka can't even stand any longer.\
mov %viclose,2:gosub *lose
mov %2604,%2604+1:if %2604=1 mov %count_koenemy,%count_koenemy+1
if %2604>%count_most mov %count_most,%2604:mov $count_mostname,$name
count 19,13
mov $bad1,"Luka had all of his power drained by the Succubus Witch."
name $name
>Hehe... I absorbed everything you had.@
>And here I thought you were a wielder of great power... Oh well.\
name ""
goto *witchs_ha



*witchs_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\witchs_hh3.bmp",0,0
gosub *syasei2
>As the sweet kiss fills his senses, Luka comes, pathetically shooting his semen onto her.\
mov %viclose,1:gosub *lose
mov %2604,%2604+1:if %2604=1 mov %count_koenemy,%count_koenemy+1
if %2604>%count_most mov %count_most,%2604:mov $count_mostname,$name
count 18,13
mov $bad1,"Luka was forced to come as the Succubus Witch kissed him."
lsp 700,":a;chara\witchs_hh4.bmp",0,0:print 10,500
name $name
>Coming only from me kissing you...?@
>And here I thought you were a wielder of great power... Oh well.\
name ""
goto *witchs_ha



*witchs_h7

mov %ikigoe,3:gosub *ikigoe
name $name
>Ara, already coming?\
name ""
gosub *syasei1
lsp 700,":a;chara\witchs_hk3.bmp",0,0
gosub *syasei2
>The moment Luka feels her vagina, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2604,%2604+1:if %2604=1 mov %count_koenemy,%count_koenemy+1
if %2604>%count_most mov %count_most,%2604:mov $count_mostname,$name
count 1,13
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to an orgasm just from insertion."
name $name
>That was fast... Was it too much for the little boy?@
>And here I thought you were a wielder of great power... Oh well.\
name ""
goto *witchs_ha



*witchs_h8

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\witchs_hk3.bmp",0,0
gosub *syasei2
>As the Succubus Witch drains Luka's energy, he comes inside her, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2604,%2604+1:if %2604=1 mov %count_koenemy,%count_koenemy+1
if %2604>%count_most mov %count_most,%2604:mov $count_mostname,$name
count 1,13
mov $bad1,"Luka was forced to an orgasm as the Succubus Witch drained his energy."
name $name
>You came inside me...@
>And here I thought you were a wielder of great power... Oh well.\
name ""
goto *witchs_ha



*witchs_h9

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
if %hanyo1=1 lsp 690,":a;chara\witchs_ctc01.bmp",0,0
if %hanyo1=1 lsp 691,":a;chara\witchs_ct21.bmp",0,0
if %hanyo1=1 lsp 699,":a;chara\witchs_hgc1.bmp",0,0
if %hanyo1=1 lsp 700,":a;chara\witchs_hg1.bmp",0,0
if %hanyo1=2 lsp 700,":a;chara\witchs_hj2.bmp",0,0
gosub *syasei2
>Filled with desire for the Succubus Witch, Luka happily comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2604,%2604+1:if %2604=1 mov %count_koenemy,%count_koenemy+1
if %2604>%count_most mov %count_most,%2604:mov $count_mostname,$name
count 31,13
mov $bad1,"Luka was seduced by the Succubus Witch, and eagerly indulged in her body."
name $name
>Do you feel better now?@
>And here I thought you were a wielder of great power... Oh well.\
name ""
goto *witchs_ha



*witchs_h10

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\witchs_hb3.bmp",0,0
gosub *syasei2
>With his tiny body stuck between her breasts, Luka comes, squirting out tiny bits of semen between her gigantic breasts.\
mov %viclose,1:gosub *lose2
name "Luka"
>Ahh...\
name ""
name $name
>Hehe, you came, didn't you?@
>Isn't it fun being played with like a toy?\
>Here, let me play with you even more... Hehe.\
name ""
skillcount2 3598
skillname "Minimum Phantasm: Heaven"
dwave 1,"se\ero_paizuri.ogg"
>The Succubus Witch bounces Luka's tiny body back and forth between her right and left breast!
mov %damage_kotei,1
damage 110,130
dwave 1,"se\ero_paizuri.ogg"
>She gently pushes her breasts together, squeezing his whole body!
mov %damage_kotei,1
damage 110,130
skillname ""
name "Luka"
>Ahhh!!\
name ""
>I feebly twist my body between her gigantic breasts.@
>But my tiny hands are only able to push a little bit into her soft flesh, easily being pushed back.\
name $name
>Even if you struggle as hard as you can, it will only feel like a gentle tickle now.\
>You can't do anything but come, now.\
name ""
skillcount2 3598
skillname "Minimum Phantasm: Heaven"
dwave 1,"se\ero_paizuri.ogg"
>The Succubus Witch alternates moving her left and right breast, tossing Luka around!
mov %damage_kotei,1
damage 110,130
dwave 1,"se\ero_paizuri.ogg"
>Luka's penis sinks into her soft flesh, rubbing all the way up and down with every movement she makes!
mov %damage_kotei,1
damage 110,130
skillname ""
name "Luka"
>Ah...Ahhh...\
name ""
name $name
>Ara...? Your little hands aren't pushing as hard.@
>Does it feel so good that you can't resist?\
name ""
skillcount2 3598
skillname "Minimum Phantasm: Heaven"
dwave 1,"se\ero_paizuri.ogg"
>Her soft breasts slowly move up and down Luka's tiny body!
mov %damage_kotei,1
damage 110,130
dwave 1,"se\ero_paizuri.ogg"
>Luka's entire body sinks into her smooth skin, filling him with a comfortable sense of warmth!
mov %damage_kotei,1
damage 110,130
skillname ""
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\witchs_hb4.bmp",0,0
gosub *syasei2
>Stuck between her breasts, I come.@
>The small amount of semen from my tiny body slowly drips out between her breasts.\
>Exhausted after my orgasm, the gentle pressure from her soft breasts keeps my body firmly in place between them.\
name $name
>Hehe, you leaked again.@
>It's like floating in heaven, isn't it?\
>I don't want to stop playing with you yet, so make sure you leak out a lot more...\
name ""
name "Luka"
>Ahh...\
name ""
>Helpless between her breasts, I feebly grab at her giant breasts with my tiny hands as she continues to toy with me.\
skillcount2 3598
skillname "Minimum Phantasm: Heaven"
dwave 1,"se\ero_paizuri.ogg"
>The Succubus Witch bounces up and down, tossing Luka around between her breasts!
mov %damage_kotei,1
damage 110,130
dwave 1,"se\ero_paizuri.ogg"
>Luka's entire body bounces up and down, rubbing against her breasts!
mov %damage_kotei,1
damage 110,130
skillname ""
name "Luka"
>Haaa... It feels so good...\
name ""
name $name
>Arara, are you already addicted to my breasts?@
>What a naughty little boy... Hehe.\
name ""
skillcount2 3598
skillname "Minimum Phantasm: Heaven"
dwave 1,"se\ero_paizuri.ogg"
>Luka bounces back and forth between the Succubus Witch's right and left breasts!
mov %damage_kotei,1
damage 110,130
dwave 1,"se\ero_paizuri.ogg"
>Luka's penis rubs against the smooth skin of her breast!
mov %damage_kotei,1
damage 110,130
skillname ""
name "Luka"
>Ah... Ahhhh...\
name ""
name $name
>Hehe, you're completely in a trance.@
>Alright then, time to make you come again...\
name ""
skillcount2 3598
skillname "Minimum Phantasm: Heaven"
dwave 1,"se\ero_paizuri.ogg"
>The Succubus Witch carefully uses her right breast to rub Luka's entire body up and down!
mov %damage_kotei,1
damage 110,130
dwave 1,"se\ero_paizuri.ogg"
>Like that, she uses her left breast to push Luka's body into her moving right breast!
mov %damage_kotei,1
damage 110,130
skillname ""
name "Luka"
>Ah...Ahh...\
name ""
gosub *syasei1
lsp 700,":a;chara\witchs_hb5.bmp",0,0
gosub *syasei2
>With a happy sigh, I come again, shooting out a tiny amount of semen on her giant breasts.\
>Having been utterly defeated, I've already given up any hope of escaping her.\
gosub *clear_sprite
gosub *setwindow_01p
name $name
>Hehe, how was it?@
>Heavenly, right?\
name ""
mov %battle,0
mov %hsean,1
mov %2604,%2604+1:if %2604=1 mov %count_koenemy,%count_koenemy+1
if %2604>%count_most mov %count_most,%2604:mov $count_mostname,$name
count 7,11
mov $bad1,"Luka was shrunken and forced to come while stuck between the Succubus Witch's breasts."
goto *witchs_hb



*witchs_h11

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\witchs_hf2.bmp",0,0
gosub *syasei2
>Stuck under the Succubus Witch's ass, Luka comes, pathetically spraying tiny bursts of semen under her cheeks.\
mov %viclose,1:gosub *lose2
name "Luka"
>Ahhh...\
name ""
name $name
>Arara, you came?@
>Having an orgasm as I sit on top of you... What a shameful little boy.\
>That just makes me want to tease you even more. Hehe.\
name ""
skillcount2 3599
skillname "Minimum Phantasm: Hell"
dwave 1,"se\ero_paizuri.ogg"
>The Succubus Witch puts more weight on Luka, crushing him under her ass!
mov %damage_kotei,1
damage 100,120
dwave 1,"se\ero_paizuri.ogg"
>She slowly rocks back and forth!
mov %damage_kotei,1
damage 100,120
skillname ""
name "Luka"
>Ah... Urhggg...!\
name ""
>I groan under the pressure.@
>My small body sinks deep into her tender cheeks.\
name $name
>Ahaha, is it painful?@
>That cute little voice of yours just makes me want to tease you even more. \
name ""
skillcount2 3599
skillname "Minimum Phantasm: Hell"
dwave 1,"se\ero_paizuri.ogg"
>The Succubus Witch puts more weight on Luka!
mov %damage_kotei,1
damage 100,120
dwave 1,"se\ero_paizuri.ogg"
>The intense pressure forces more of Luka's body to sink into her soft ass!
mov %damage_kotei,1
damage 100,120
skillname ""
name "Luka"
>Ahhhh!!\
name ""
name $name
>When on the verge of death, most living creatures have a sudden urge to leave offspring behind...\
>That's why there are so many little boys who ejaculate just from feeling a little pain. \
name ""
skillcount2 3599
skillname "Minimum Phantasm: Hell"
dwave 1,"se\ero_paizuri.ogg"
>The Succubus Witch slightly twists her waist, forcing Luka's body to be pushed around under her ass!
mov %damage_kotei,1
damage 100,120
dwave 1,"se\ero_paizuri.ogg"
>The movements of her body toss Luka around like a toy!
mov %damage_kotei,1
damage 100,120
skillname ""
name "Luka"
>Ahhhh!!\
name ""
>Even though it's painful, a strange sensation runs through my body.@
>The pain mixes with the pleasure, confusing my brain as to which is which.\
gosub *syasei1
lsp 700,":a;chara\witchs_hf3.bmp",0,0
gosub *syasei2
>While being crushed under her ass, I ejaculate, shooting semen all over the ground.\
>I moan during my pathetic ejaculation, stuck under her ass.\
name $name
>Hehe, you came again...@
>So you are one of those pathetic little boys who's able to even come in a situation like this...\
>Hehe, I'll bully you even more, since you like it so much!\
name ""
name "Luka"
>Ahhhg... Ahhh!\
name ""
>The Succubus Witch continues to crush Luka under her without mercy!\
skillcount2 3599
skillname "Minimum Phantasm: Hell"
dwave 1,"se\ero_paizuri.ogg"
>She tightens the muscles in her ass, causing her cheeks to become less soft!
mov %damage_kotei,1
damage 100,120
dwave 1,"se\ero_paizuri.ogg"
>Her full weight falls on Luka's tiny body!
mov %damage_kotei,1
damage 100,120
skillname ""
name "Luka"
>Ahhhh!\
name ""
name $name
>Aha, is it really that painful?@
>But your penis is so hard, I can feel it pushing into my ass. \
name ""
skillcount2 3599
skillname "Minimum Phantasm: Hell"
dwave 1,"se\ero_paizuri.ogg"
>The Succubus Witch slowly starts to bounce, pounding down on Luka with each movement!
mov %damage_kotei,1
damage 100,120
dwave 1,"se\ero_paizuri.ogg"
>Up and down, Luka is helplessly squished!
mov %damage_kotei,1
damage 100,120
skillname ""
name "Luka"
>Ahhg... Ahh!\
name ""
name $name
>Hehe are you going to come again?@
>Aren't you happy you can experience a new kind of pleasure, borne from pain?\
name ""
skillcount2 3599
skillname "Minimum Phantasm: Hell"
dwave 1,"se\ero_paizuri.ogg"
>The Succubus Witch turns side to side, forcing Luka to move with her!
mov %damage_kotei,1
damage 100,120
dwave 1,"se\ero_paizuri.ogg"
>She tightens and rapidly shakes her ass, as if to finish off Luka!
mov %damage_kotei,1
damage 100,120
skillname ""
name "Luka"
>Ahh... Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>I ejaculate again as I feel the full weight of the Succubus Witch on top of me, crushing me under her ass.\
>Semen gets all over the place as tears of shame leak out of me.\
name "Luka"
>Ah...ahh...\
name ""
>My heart and soul have been crushed under this girl's ass...\
gosub *clear_sprite
gosub *setwindow_01p
name $name
>Hehe, well?@
>It was hellish, wasn't it?\
name ""
mov %battle,0
mov %hsean,1
mov %2604,%2604+1:if %2604=1 mov %count_koenemy,%count_koenemy+1
if %2604>%count_most mov %count_most,%2604:mov $count_mostname,$name
count 34,11
mov $bad1,"Luka was forced to an orgasm as the Succubus Witch sat on him."
goto *witchs_hb



*witchs_ha

mov $bad2,"After being captured, Luka was made into her guinea pig."
if %2828=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2828,1
name "Luka"
>Ahh...\
name ""
>Too weak to resist her any longer, I fall backwards.@
cspl 690,699
lsp 700,":a;chara\witchs_ha01.bmp",0,0:print 10,500
>Before I can protect myself, the Succubus Witch plants her foot right onto my groin.\
name "Luka"
>Wh...What are you doing!?\
name ""
name $name
>Sorry, but I need to extract out even more semen from you.@
>I'll step on you, so you better let out a lot.\
name ""
name "Luka"
>D...Don't do... Ahh!\
name ""
mov %hseanwave,17:hseanwave
>With a sudden movement, she steps down on my penis.\
>Humiliation and a strange sense of pleasure fills me as her foot steps on my sensitive penis.\
>The sudden act leaves me no chance to try to hide my surprise and shame at the sensation.\
name "Luka"
>Wh...Why with your foot!?\
name ""
name $name
>I have a big job waiting for me after this, so I don't want to waste too much energy.@
>That's why I'll finish you off quickly with my foot.\
>...What, do you have a complaint?@
>Even if you don't like it, I'll make you come anyway.\
name ""
name "Luka"
>Urhg...!\
name ""
>I'd never get an orgasm from such humiliating torture...@
>I tense my waist, denying the stimulation.\
name $name
>Hehehe...@
>You're going to come from being stepped on...\
name ""
>The Succubus Witch steps down on my penis again.\
>The sole of her foot moves up and down my penis, as if it was the palm of her hand stroking me.@
>I bite my lip, trying to deny the pleasure that sparks through my lower body with each stroke from her foot.\
name "Luka"
>Ah. Ah...\
name ""
>I twist my body side to side pathetically as a moan escapes from my lips before I can stop it.\
name $name
>Ahaha, I knew it.@
>You're feeling it.@
>You're going to come on my foot just like this. \
name ""
name "Luka"
>Ahhh!\
name ""
>Her skillful footwork corners me in no time.\
>Her toes slowly curl, pushing into the tip of my penis.@
>The sole of her foot slowly moves up and down the back muscle of my penis as her toes continue to play with my tip.\
>Every so often she puts my penis between her big toe and smaller toes, stroking me up and down like that.\
>Taking her skilled footwork, I can feel an impending orgasm slowly rise from my waist, filling all of my body.\
name "Luka"
>Ah...!@> Ahhhh!\
name ""
name $name
>Hehe... It looks like you're about to come.@
>Being able to have an orgasm just from having your penis being stepped on... How embarrassing.\
name ""
>The Succubus Witch looks down at me and giggles.@
>I told myself I was going to endure it... But it doesn't seem like that's possible.\
>She's sneering and trampling my manhood at the same time...@
>But unable to do anything, I raise the flag of surrender as I give in to the pleasure.\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\witchs_ha02.bmp",0,0
gosub *syasei2
>As the Succubus Witch steps on my penis, I come, spraying my semen all over her foot.\
name $name
>See, you came anyway!@
>In truth, you love this, don't you?\
name ""
>As I ejaculate, she laughs and steps down on my penis even harder.@
>I shiver in humiliation and pleasure as she uses her foot to play with me during my orgasm.\
lsp 700,":a;chara\witchs_ha03.bmp",0,0:print 10,500
name $name
>I need to squeeze out even more semen from you.@
>I'll use this foot of mine to stamp out even more!\
name ""
name "Luka"
>Ahhh!\
name ""
>The Succubus Witch slowly starts to step on me harder, increasing the force.\
>She curls her toes, grabbing hold of my skin.@
>Holding my penis with her foot, she starts to move her foot side to side, tossing my penis around with it.\
>Squirming under her, I moan in surprise at the stimulation from her deftly controlled foot.\
name "Luka"
>Ah!@>Ahhh!\
name ""
>The Succubus Witch's smile slowly starts to fade, as her foot massage gets even more violent.\
name $name
>...I know it feels good, so hurry up and come already.@
>I need a lot of semen for her revival, after all...\
name ""
name "Luka"
>Ahhhh!\
name ""
>She starts to quickly move her foot in tiny movements, almost as if her foot itself was vibrating.@
>Before I can stop myself, the surprising new stimulation makes my back arch upwards as I push myself closer to her foot.\
>Unable to stop myself from seeking more pleasure, I give in to the desire to release.\
gosub *syasei1
lsp 700,":a;chara\witchs_ha04.bmp",0,0
gosub *syasei2
name "Luka"
>Hyaaa...\
name ""
>Her foot continues to vibrate as I come.@
>I let out a happy sigh as power fades from my body after my orgasm.\
lsp 700,":a;chara\witchs_ha05.bmp",0,0:print 10,500
>The force of my ejaculation was increased from the pressure from her foot, making some go all the way to her chest.\
>Completely drained of power, I relax my body as she presses down a little harder on my penis with her foot.\
name $name
>Awww... Do you think you're finished?@
>But you know you have to come a lot more, right?\
name ""
name "Luka"
>Ahhhh!\
name ""
>The Succubus Witch continues forcing pleasure into me, clearly not willing to let me stop.\
>Too exhausted to do anything, I have no choice but to feebly accept whatever she wants to do to me.\
name "Luka"
>Ahhh...\
name ""
gosub *syasei1:gosub *syasei2
>She forces me to ejaculate over and over, without any mercy.@
>Her skilled foot continues to squeeze out orgasm after orgasm, with no break in between.\
gosub *syasei1:gosub *syasei2
>After losing count of how many times I've orgasmed, my heart and soul are in tatters.@
>With my vision hazy and unfocused, I gasp for breath under her.\
gosub *syasei1:gosub *syasei2
>With a final orgasm, I lose consciousness, drifting off into freedom at last.\
gosub *anten
mov %hseanwave,0:hseanwave
name $name
>Hehe... With this much, I can finish the ceremony.@
>I didn't think the boy was worth much, but this semen is quite high quality...\
>Now then, what should I do with him...?@
>He has some high quality semen, I wonder if I should make him into a test subject?\
>There are a lot more erotic magics I wish to study after all... Hehehe.\
name ""
name "Luka"
>.............\
name ""
>Thus, the rest of my life was decided on.@
>Made into her personal test subject, she violates me however she wants.\
>Never being freed, I spend the rest of my life in this Succubus Village.\
>Just like every day, pleasure filled screams are coming out of the Succubus Witch's magical laboratory room...\
>...............\
goto *badend



*witchs_hb

mov $bad2,"Forced inside the Succubus Witch, Luka spends the rest of his life in her warm womb."
if %2829=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2829,1
name "Luka"
>Ahh...\
name ""
>Forced to come over and over by the Succubus Witch, I gasp for air, completely defenseless with my tiny body.\
name $name
>Playtime is over now.\
>It would be a waste to make a fine human like you into a mere semen slave.@
>So I'm going to use you in the best way for the ritual...\
name ""
>Her gigantic tail slowly moves through the air toward my tiny body.@
dwave 1,"se\ero_pyu2.ogg"
cspl 690,699
lsp 700,":a;chara\witchs_st01.bmp",0,0
lsp 690,":a;chara\witchs_ct11.bmp",-200,-100:print 10,500
>A mouth opens at the end of it, easily sucking my body inside.\
name "Luka"
>Ahh... Wh...What are you doing!?\
name ""
name $name
>I'm going to return you to the womb.@
>I won't merely prey on you... You'll become one with me.\
name ""
name "Luka"
>Eh...?\
name ""
>Return me to the womb...?@
>I stop struggling for a moment, confused at the meaning behind her words.\
name $name
>Hehe... Like this...\
name ""
csp 690
lsp 700,":a;chara\witchs_he1.bmp",0,0:print 10,500
>The Succubus Witch sits on the floor and uses her hands to spread open her vagina.@
>The giant tail holding my body slowly brings me toward her waiting hole.\
name "Luka"
>Y...You wouldn't!\
name ""
name $name
>Hehe, you got it!@
>I'm going to put your body into my pussy...\
>You're going to be just like a baby, in reverse...@
>I'll take you inside my body, and make you become one with me.\
name ""
lsp 700,":a;chara\witchs_he2.bmp",0,0:print 10,500
>As if it was a hungry mouth, her vagina spreads open even further.@
>Wet juices flow out of it, as if drooling.\
>A mouth that's going to swallow me whole...\
name "Luka"
>S...Stop it!\
name ""
>I desperately struggle for my life, but it's useless.@
>The tail brings me closer and closer to her waiting pink flesh.\
name $name
>Ahh, geez, stop struggling.@
>It will feel incredible to you, after all.\
name ""
name "Luka"
>Ahhhh!!\
name ""
mov %hseanwave,21:hseanwave
lsp 700,":a;chara\witchs_he3.bmp",0,0:print 10,500
>With a push, the tail forces me into her vagina.@
>My view is instantly full of nothing but her pink flesh, as her warm juices flow over my body.\
name "Luka"
>Aiieee!\
name ""
>I feel the creases of her vagina all over my body as her warm hole envelopes me.\
name $name
>Come on, go in deeper...@
>All the way inside me, until you're a baby again...\
name ""
name "Luka"
>Ahh...\
name ""
lsp 700,":a;chara\witchs_he4.bmp",0,0:print 10,500
>Her vaginal wells flex and loosen, pulling me deeper into her warm vagina.\
>As if being pulled through a soft tube, her juices cover my body as I slip further and further into her body.\
>Her warm flesh runs all over my body as I slowly go deeper and deeper.@
>All the while, my penis rubs against her, gently flicked by every crease inside her vagina.\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>Unable to take the stimulation, I come inside her.@
>The small amount of semen my tiny body manages to push out mixes with her juices, as her vagina squirms around me.\
name $name
>Oh dear, you came inside me?@
>I could feel your tiny little penis twitch inside me... What a shameful little baby.\
name ""
name "Luka"
>Ahhh...\
name ""
>Just like that, I'm pulled deeper and deeper inside her body.@
>Until finally, I can see another small hole in front of me.\
lsp 700,":a;chara\witchs_he5.bmp",0,0:print 10,500
name $name
>There's your goal!@
>Return to my womb...\
name ""
mov %hseanwave,22:hseanwave
lsp 690,":a;chara\witchs_ct12.bmp",-200,-100:print 10,500
>My body is pushed against the tiny membrane, slowly sucked inside.@
>Her womb... She forced me into her womb...\
name "Luka"
>Haaa...\
name ""
>As soon as I'm forced into her womb, I unconsciously curl into the fetal position.@
>The warm sensations fill my body, making it feel like I could melt inside here.\
>The fear and terror of moments ago fade, as the comforting feeling fills my body.@
>Indulging in the ecstasy of perfect security and comfort, I let out a happy sigh.\
name "Luka"
>Ahhh...\
name ""
gosub *syasei1:gosub *syasei2
>I accidentally ejaculate as I relax inside her.@
>The exhaustion brought by my orgasm just lets me relax even deeper inside her womb.\
name $name
>Ahh geez... Coming in my womb itself?@
>Babies shouldn't be leaking in the womb, you know!\
>Now that you're in my womb, become one with me...\
name ""
name "Luka"
>Haaaa...\
name ""
>As the tranquil feelings eat into my body, I give myself over to it.@
>I leave myself completely up to the mercy of these good feelings.\
>All the fear is gone, and all that remains is the warmth and security her womb gives.\
if %hosyoku_cut=1 goto *hosyoku_cut
name "Luka"
>Haaa...\
name ""
gosub *syasei1:gosub *syasei2
>More semen leaks out of me as I relax inside of her.@
>Now back inside the womb, I don't care any more...\
name "Luka"
>Ah...aa...\
name ""
>It feels like my body is being absorbed by her...@
>No... My life itself is being absorbed by her.\
name "Luka"
>...Aa...\
name ""
>The last of my thoughts fade, as I give my body and heart over to her, now one with her in her womb.\
gosub *anten
mov %hseanwave,0:hseanwave
name $name
>Hehe... Power is overflowing from my body...!@
>I knew it, this boy holds amazing power.\
>With this power, I can easily bring back Lilith!\
name ""
>The Succubus Witch laughs as she rubs her stomach.\
>Continuing the ceremony, she brings Lilith back into the world, bringing a new age of disorder...\
>.............\
goto *badend



*lilith_start

mov $name,"Lilith & Lilim"
mov $name2,"Lilith"
mov $lavel,"lilith"
mov $tatie1,"lilith_st01"
mov $tatie2,"lilith_st02"
mov $tatie3,"lilith_st03"
mov $tatie4,"lilith_ha0"
mov $haikei,"bg110"
mov %monster_x,138
mov %monster_y,0
if %nanido=1 mov %max_enemylife,6000
if %nanido=2 mov %max_enemylife,6500
if %nanido=3 mov %max_enemylife,9000
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,20
if %nanido=3 mov %earth_keigen,10
mov %music,2
mov %tikei,4
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free from the sisters!"
mov $mogaku_anno2,"Luka broke free from the sisters!"
mov $mogaku_anno3,"But with the sisters holding him like this, Luka can't attack!"
mov $mogaku_sel1,"Struggle and give in..."
mov $mogaku_sel2,"Your heart isn't broken yet... I wonder how long you can stand it...?"
mov $mogaku_sel3,"We'll violate your soul itself as you struggle..."
mov $mogaku_sel4,"It's pointless, you can't escape from this pleasure..."
mov $mogaku_sel5,"Squirm in agony as we feed on your energy..."
mov $mogaku_earth_dassyutu1,"Gnome's power!?"
mov $mogaku_earth_dassyutu2,"This boy holds the same power as that disgusting Hero!"
mov %end_n,7
mov %exp_minus,90000
mov %zmonster_x,-150
mov %tukix,340
mov %owaza_count1a,7
mov %owaza_count3a,7
mov %owaza_count3b,7
name "Lilith"
>Hehe... A delicious smelling boy is here, sister.\
name ""
>Lilith greedily eyes me up and down.\
name "Lilim"
>He looks absolutely delectable, sister.@
>I want to play with him, and absorb his energy so badly...\
name ""
name "Luka"
>Guh...!@
>If it's come to this, I'll have to seal you again!\
name ""
>I nervously take a step back as I hold my sword in front of me.\
>As soon as they take notice of my sword, their eyes widen in surprise.\
name "Lilim"
>Sister... That sword the boy is holding... Could it be...?\
name ""
name "Lilith"
>Angel Halo... There's no mistake...@
>A wielder of that accursed sword is standing in our way again, sister.\
name ""
name "Lilim"
>Now that you mention it, that boy does look familiar...@
>Just like that man that sealed us 500 years ago...\
name ""
name "Lilith"
>He not only looks the same, he smells the same too...@
>This boy must be that disgusting Hero's descendant.\
name ""
name "Luka"
>...What!?\
name ""
>The previous wielder of this sword?@
>A Hero from 500 years ago?\
name "Lilim"
>Sister, looking at this boy is forcing me to remember...@
>The anger and pain of the last 500 years...\
name ""
name "Lilith"
>Yes... Let's show this boy the grudge we've held for the last half millennium.\
name ""
gosub *face2
name "Lilim"
>We'll use our magic to force you to come over and over again...\
name ""
name "Lilith"
>We'll violate you until you lose your mind...@
>Your sanity will be drowned under the pleasure only a Succubus can give.\
name ""
name "Lilim"
>We'll squeeze you dry, and show you a glimpse of heaven...\
name ""
name "Lilith"
>Writhing in pleasure filled agony, you'll meet your death with a smile on your face...\
name ""
>The sisters approach me with seductive smiles on their faces.\
>This seems like it will be difficult... But there's no escape.@
>I cannot let such horrible beings be released into the world!\
gosub *face1
goto *common_main



*lilith_v

gosub *face3
name "Lilim"
>Sister... Not again...\
name ""
name "Lilith"
>This cannot be... To be sealed right after being revived...!\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The two girls vanish, their energy dispersing back into the magic square they came from!\
mov %viclose,1:gosub *victory_plural
mov %getexp,30000:gosub *lvup
mov %2305,1
goto *sean0223



*lilith_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name "Lilim"
>Sister... The boy has already fallen.\
name ""
name "Lilith"
>Well then, let's enjoy ourselves then, shall we?\
name ""
goto *lilith_a



*lilith_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *lilith_kousan
if %cmd1=16 goto *lilith_onedari
if %cmd1=17 goto *common_skill
goto *lilith_main



*lilith_a

if %hanyo2=1 gosub *lilith_a10:goto *common_main
if %kousoku=1 gosub *lilith_a7:goto *common_main
if %kousoku=2 gosub *lilith_a8:goto *common_main
rnd2 %ransu,1,8
if %ransu=1 gosub *lilith_a1:goto *common_main
if %ransu=2 gosub *lilith_a2:goto *common_main
if %ransu=3 gosub *lilith_a3:goto *common_main
if %ransu=4 gosub *lilith_a4:goto *common_main
if %ransu=5 && %owaza_count3b>8 gosub *lilith_a5:goto *common_main
if %ransu=6 && %owaza_count3a>8 && %mp>1 gosub *lilith_a9:goto *common_main
if %ransu>6 && %owaza_count1a>8 gosub *lilith_a6:goto *common_main
skip -8



*lilith_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 goto *lilith_a1a
if %ransu=2 goto *lilith_a1b
if %ransu=3 goto *lilith_a1c



*lilith_a1a

name "Lilith"
>Lilim, let's use our hands to play with him.\
name ""
name "Lilim"
>Of course, sister.@
>I'm sure he'll be unable to endure it at all.\
name ""
skillname "Laughing Gend"
>Lilith covers one side of Luka's penis with her right palm!@
eng "Lilim covers the other side of Luka's penis with her left palm!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3468
dwave 1,"se\ero_koki1.ogg"
>Luka's penis is sandwiched between their two soft palms!
if %nanido<2 damage 43,47
if %nanido=2 damage 46,50
if %nanido=3 damage 49,53
>The two sisters rub their palms together, stroking Luka!
mov %damage_nobr,1
if %nanido<2 damage 43,47
if %nanido=2 damage 46,50
if %nanido=3 damage 49,53
if %nanido<2 damage 43,47
if %nanido=2 damage 46,50
if %nanido=3 damage 49,53
skillname ""
if %mylife=0 sub %stack,1:return *lilith_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *lilith_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *lilith_s2
sub %stack,1
return



*lilith_a1b

name "Lilith"
>Lilim, let's play with him together.\
name ""
name "Lilim"
>Of course, sister.@
>I'm sure he'll be unable to endure us at all.\
name ""
skillname "Laughing Gend"
dwave 1,"se\ero_koki1.ogg"
>Lilith grabs the tip of Luka's penis, and gently strokes him!
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3468
if %nanido<2 damage 45,50
if %nanido=2 damage 50,55
if %nanido=3 damage 55,60
dwave 1,"se\ero_koki1.ogg"
>Lilim grabs the shaft of Luka's penis, and slowly strokes him up and down!
if %nanido<2 damage 40,55
if %nanido=2 damage 50,55
if %nanido=3 damage 55,60
skillname ""
if %mylife=0 sub %stack,1:return *lilith_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *lilith_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *lilith_s2
sub %stack,1
return



*lilith_a1c

name "Lilith"
>Lilim, let's tickle his penis.\
name ""
name "Lilim"
>Hehe, his face will glaze over in pleasure from our hands.\
name ""
skillname "Laughing Gend"
dwave 1,"se\umaru.ogg"
eng "One of Lilith's small fingers gently tickles the tip of Luka's penis!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3468
mov %damage_nobr,1
if %nanido<2 damage 22,25
if %nanido=2 damage 24,27
if %nanido=3 damage 26,39
if %nanido<2 damage 22,25
if %nanido=2 damage 24,27
if %nanido=3 damage 26,39
dwave 1,"se\umaru.ogg"
>Lilim gently runs a finger up and down the back of Luka's penis!
mov %damage_nobr,1
if %nanido<2 damage 22,25
if %nanido=2 damage 24,27
if %nanido=3 damage 26,39
if %nanido<2 damage 22,25
if %nanido=2 damage 24,27
if %nanido=3 damage 26,39
skillname ""
if %mylife=0 sub %stack,1:return *lilith_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *lilith_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *lilith_s2
sub %stack,1
return



*lilith_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 goto *lilith_a2a
if %ransu=2 goto *lilith_a2b
if %ransu=3 goto *lilith_a2c



*lilith_a2a

name "Lilith"
>Lilim, he's quite cute, isn't it?\
name ""
name "Lilim"
>He is, sister.\
name ""
>The two sisters eagerly kiss each other!@
>Saliva drips off of their tongues, seductively wrapped around each other!\
name "Lilith"
>Let's use our mouths to play with the boy's penis.\
name ""
name "Lilim"
>Of course, sister...@
>I'd love to run my tongue over his penis with you...\
name ""
skillname "Tin Cyrus"
dwave 1,"se\ero_pyu1.ogg"
eng "The two sisters lick Luka's penis from both sides!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3469
>Both of their tongues run all over his penis!
if %nanido<2 damage 35,38
if %nanido=2 damage 38,41
if %nanido=3 damage 41,44
dwave 1,"se\ero_pyu1.ogg"
>Dripping with their saliva, their tongues coil around each other as they eagerly lick Luka's penis!
if %nanido<2 damage 35,38
if %nanido=2 damage 38,41
if %nanido=3 damage 41,44
dwave 1,"se\ero_buchu2.ogg"
>The two sisters passionately kiss each other, with Luka's penis between their soft lips!
if %nanido<2 damage 35,38
if %nanido=2 damage 38,41
if %nanido=3 damage 41,44
skillname ""
if %mylife=0 sub %stack,1:return *lilith_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *lilith_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *lilith_s2
sub %stack,1
return



*lilith_a2b

name "Lilith"
>I'd love to get a nice taste of his penis.\
name ""
name "Lilim"
>Sister, allow me to taste his penis too.\
name ""
skillname "Tin Cyrus"
dwave 1,"se\ero_buchu3.ogg"
>Lilith sucks Luka's penis into her mouth, slowly running her tongue down his shaft!
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3469
if %nanido<2 damage 52,58
if %nanido=2 damage 57,63
if %nanido=3 damage 62,68
dwave 1,"se\ero_buchu3.ogg"
>As soon as Lilith releases his penis, Lilim sucks it into her mouth, using her mouth to pump him like a piston!
if %nanido<2 damage 52,58
if %nanido=2 damage 57,63
if %nanido=3 damage 62,68
skillname ""
if %mylife=0 sub %stack,1:return *lilith_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *lilith_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *lilith_s2
sub %stack,1
return



*lilith_a2c

name "Lilith"
>You'll enjoy our tongues...\
name ""
name "Lilim"
>Let me take his ass!\
name ""
skillname "Tin Cyrus"
dwave 1,"se\ero_buchu3.ogg"
>Lilith sucks Luka's penis into her mouth, gently sucking on him!
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3469
if %nanido<2 damage 52,58
if %nanido=2 damage 57,63
if %nanido=3 damage 62,68
dwave 1,"se\ero_buchu3.ogg"
>Lilim pushes her long tongue into Luka's ass!
if %nanido<2 damage 52,58
if %nanido=2 damage 57,63
if %nanido=3 damage 62,68
skillname ""
if %mylife=0 sub %stack,1:return *lilith_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *lilith_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *lilith_s2
sub %stack,1
return



*lilith_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Lilim... Let's use our breasts.":mov $sel2,"Of course, sister. Now, cover our breasts in semen..."
if %ransu=2 mov $sel1,"Make sure you rub in rhythm with me.":mov $sel2,"I'll be sure to match you, sister."
if %ransu=3 mov $sel1,"Our breasts are nice and soft...":mov $sel2,"His penis looks so happy... Teehee."
name "Lilith"
eng $sel1:$sel6\
name ""
name "Lilim"
eng $sel2:$sel6\
name ""
skillname "Melo Sophia"
dwave 1,"se\ero_paizuri.ogg"
eng "Lilith and Lilim press their breasts together, with Luka's penis between them!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>His penis is squished between their soft breasts!
skillcount2 3470
if %nanido<2 damage 37,40
if %nanido=2 damage 40,43
if %nanido=3 damage 43,46
>The two sisters rub their breasts together, massaging Luka's penis!
mov %damage_nobr,1
if %nanido<2 damage 37,40
if %nanido=2 damage 40,43
if %nanido=3 damage 43,46
if %nanido<2 damage 37,40
if %nanido=2 damage 40,43
if %nanido=3 damage 43,46
skillname ""
if %mylife=0 sub %stack,1:return *lilith_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *lilith_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *lilith_s2
sub %stack,1
return



*lilith_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Lilim... Let's step on it.":mov $sel2,"Of course, sister. Let's humiliate him."
if %ransu=2 mov $sel1,"Squeeze it out with our feet.":mov $sel2,"Some men just love being humiliated."
if %ransu=3 mov $sel1,"Let's use our feet to play with him.":mov $sel2,"Do you really think he's pathetic enough to come from that, sister?"
name "Lilith"
eng $sel1:$sel6\
name ""
name "Lilim"
eng $sel2:$sel6\
name ""
skillname "Ritis Ani"
dwave 1,"se\ero_paizuri.ogg"
eng "Lilith and Lilim both step on Luka's groin at the same time!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>Like that, both of them step on Luka's penis!
skillcount2 3471
if %nanido<2 damage 23,25
if %nanido=2 damage 25,27
if %nanido=3 damage 27,29
>Lilith curls her toes around the tip of Luka's penis!
mov %damage_nobr,1
if %nanido<2 damage 23,25
if %nanido=2 damage 25,27
if %nanido=3 damage 27,29
if %nanido<2 damage 23,25
if %nanido=2 damage 25,27
if %nanido=3 damage 27,29
>Lilim steps down hard on Luka's shaft!
mov %damage_nobr,1
if %nanido<2 damage 23,25
if %nanido=2 damage 25,27
if %nanido=3 damage 27,29
if %nanido<2 damage 23,25
if %nanido=2 damage 25,27
if %nanido=3 damage 27,29
skillname ""
if %mylife=0 sub %stack,1:return *lilith_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *lilith_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *lilith_s2
sub %stack,1
return



*lilith_a5

add %stack,1
mov %owaza_count3b,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Lilim... Let's take this boy's power.":mov $sel2,"Of course, sister. Let's suck everything out of this pathetic boy."
if %ransu=2 mov $sel1,"I'll take that power of yours with my tail.":mov $sel2,"We'll take everything..."
if %ransu=3 mov $sel1,"I'll take away all your energy...":mov $sel2,"I'll take away all your power..."
name "Lilith"
eng $sel1:$sel6\
name ""
name "Lilim"
eng $sel2:$sel6\
name ""
skillname "HP Tail Drain"
dwave 1,"se\ero_chupa6.ogg"
eng "Lilim's tail shoots toward Luka's penis!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,100
if %wind=2 && %nanido=2 mov %wind_kakuritu,90
if %wind=2 && %nanido=3 mov %wind_kakuritu,40
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>A mouth opens at the end of her tail, sucking in Luka's penis and draining his energy!
skillcount2 3472
if %nanido<2 damage 100,110
if %nanido=2 damage 100,110
if %nanido=3 damage 130,140
mov $name2,"Lilim"
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *lilith_h5
skillname "Lvl Tail Drain"
skillcount2 3472
dwave 1,"se\ero_chupa6.ogg"
>Lilith's tail opens up next, sucking in Luka's penis!@
>The inside of her tail squirms and vibrates, absorbing Luka's power as he squirms in pleasure!\
name "Luka"
>Ah..Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>A strange liquid is forced out of Luka!\
gosub *lvdrain
skillname ""
if %mylv=1 sub %stack,1:return *lilith_h6
mov $name2,"Lilith"
sub %stack,1
return



*lilith_a6

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 11
name "Lilith"
>Lilim, it's about time to finish the boy off.\
name ""
name "Lilim"
>Of course, sister.@
if %first_sel1=1 skip 3
>We'll make you writhe in pleasure filled agony.\
skip 2
>This time you won't get away.\
name ""
skillname "Twin Hold"
eng "Lilith and Lilim push Luka to the ground!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,10
if %wind=2 && %nanido=2 mov %wind_kakuritu,7
if %wind=2 && %nanido=3 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
dwave 1,"se\ero_paizuri.ogg"
>Lilith pushes her vagina into Luka's face!
skillcount2 3473
if %nanido<2 damage 80,100
if %nanido=2 damage 80,100
if %nanido=3 damage 110,130
if %mylife=0 sub %stack,1:return *lilith_h7
>Lilim straddles Luka's waist!\
mov %monster_x,0
mov %monster_y,0
mov %kousoku,1:gosub *status_print
>The two sisters are riding Luka!\
skillname ""
if %first_sel1=1 skip 7
name "Luka"
>Nnnm!\
name ""
>The sweet smell from her vagina overpowers all of my senses.@
>With my mouth blocked, each breath through my nose makes it feel like my brain itself is being violated by her smell.\
mov %first_sel1,1
name "Lilith"
>Succubi as powerful as us can absorb your energy even by sitting on your face.\
>So with us like this, we can absorb your energy from two places at once...\
name ""
name "Lilim"
>I'll take care of his lower body, sister.@
>I'll rape him as you ride his face.\
name ""
>Lilim slowly starts to drop her waist down.@
>It's like she's a guillotine, dropping down to finish off my life...\
if %earth=0 && %nanido<2 mov %genmogaku,1
if %earth=0 && %nanido=2 mov %genmogaku,1
if %earth=0 && %nanido=3 mov %genmogaku,1
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
mov %monster_x,138
mov %monster_y,0
sub %stack,1
return



*lilith_a7

add %stack,1
name "Lilim"
>I'll do it nice and slow...@
>If I went all out, you would die too quickly, after all.\
name ""
skillcount2 3473
skillname "Energy Drain"
dwave 1,"se\ero_chupa6.ogg"
lsp 700,":a;chara\lilith_ha1.bmp",0,0:print 10,500
>Lilim drops her waist down on top of Luka, forcing him inside her!
mov %damage_kotei,1
damage 150,180
mov $name2,"Lilim"
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
mov %kousoku,2
>Luka is being raped by Lilim!\
skillname ""
if %mylife=0 sub %stack,1:return *lilith_h8
name "Lilith"
>Both your mouth and nose are blocked as you're being raped...@
>Hehe... Aren't you the lucky one?\
name ""
name "Lilim"
>He gets to indulge in our bodies and squeezed dry... What a lucky boy, sister.\
name ""
mov %genmogaku,100
sub %stack,1
return



*lilith_a8

add %stack,1
>Lilith is sitting on Luka's face...\
mov $name2,"Lilith"
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Finish as you get a good taste of my pussy.":mov $sel2,"Lilith pushes her vagina harder into Luka's mouth!"
if %ransu=2 mov $sel1,"I'll violate both your mouth and your nose with my pussy.":mov $sel2,"Lilith pushes her vagina into Luka's face!"
if %ransu=3 mov $sel1,"Haha... I can feel you trying to breathe in my vagina.":mov $sel2,"Lilith's vagina blocks both Luka's mouth and nose, forcing him to breathe in her smell!"
if %ransu=4 mov $sel1,"Aren't you glad that you're able to be raped like this?":mov $sel2,"Lilith laughs as her wetness flows out of her, covering Luka's face!"
if %ransu=5 mov $sel1,"Get a taste of me, and become my slave.":mov $sel2,"The sweet smell from her vagina fills Luka's senses!"
name "Lilith"
eng $sel1:$sel6\
name ""
skillcount2 3473
skillname "Hold Drain"
dwave 1,"se\ero_chupa6.ogg"
eng $sel2:$sel6
mov %damage_kotei,1
damage 80,100
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *lilith_h7
>Lilim is raping Luka...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"How do you like being raped?":mov $sel2,"Lilim slowly moves her waist!"
if %ransu=2 mov $sel1,"I'll get a good taste of your energy, too.":mov $sel2,"Lilim tightens her vagina around Luka's penis!"
if %ransu=3 mov $sel1,"I'll make you come inside me like this...":mov $sel2,"Lilim forces Luka all the way inside her!"
if %ransu=4 mov $sel1,"You're just our prey, now...":mov $sel2,"Luka is forced in and out of Lilim!"
if %ransu=5 mov $sel1,"Forget everything but the pleasure, and give yourself over to us...":mov $sel2,"Lilim bounces around intensely, violently raping Luka!"
name "Lilim"
eng $sel1:$sel6\
name ""
skillcount2 3473
skillname "Energy Drain"
dwave 1,"se\ero_chupa6.ogg"
eng $sel2:$sel6
mov %damage_kotei,1
damage 150,180
mov $name2,"Lilim"
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *lilith_h9
mov $name2,"Lilith"
sub %stack,1
return



*lilith_a9

add %stack,1
if %kousan=2 skip 4
name "Lilim"
>I'll absorb your spirit...\
name ""
skillname "SP Tail Drain"
dwave 1,"se\ero_chupa6.ogg"
eng "Lilim's tail shoots toward Luka!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,70
if %wind=2 && %nanido=2 mov %wind_kakuritu,60
if %wind=2 && %nanido=3 mov %wind_kakuritu,35
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
@
>It sucks in Luka's penis, absorbing his SP!\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>Strange liquid shoots out of Luka into her tail!@
dwave 1,"se\lvdown.ogg"
mov %mp,%mp-2
gosub *mp
>Luka loses 2 SP!\
skillname ""
name "Lilim"
>Ahh... I can feel his power flowing into me.\
name ""
name "Lilith"
>Hehe... It looks like you enjoy the feeling of having your power snatched away from you.\
name ""
mov %hanyo2,1
sub %stack,1
return



*lilith_a10

add %stack,1
mov %hanyo2,0
if %kousan=2 skip 7
name "Lilith"
>Let's show him a little bit of our magic, sister.\
name ""
name "Lilim"
>Powered up with the energy we stole from him, too!\
name ""
>Lilim and Lilith begin an incantation...@
>A magic square appears underneath Luka's feet!\
name "Lilith"
>Now, drown in our power!\
name ""
name "Lilim"
>Spray semen all over as you writhe in pleasure!\
name ""
skillname "Chaos Pleasure"
dwave 1,"se\ero_makituki3.ogg"
lsp 699,":a;chara\lilith_ct01.bmp",0,0:print 10,500
>Thousands of tentacles emerge from the magic square and surround Luka's body!\
>The innumerable tentacles caress every inch of Luka's body!
skillcount2 3474
if %nanido<2 damage 50,60
if %nanido=2 damage 52,62
if %nanido=3 damage 54,64
dwave 1,"se\ero_makituki2.ogg"
>The tentacles massage Luka's balls and nipples!
if %nanido<2 damage 50,60
if %nanido=2 damage 52,62
if %nanido=3 damage 54,64
dwave 1,"se\ero_makituki2.ogg"
>Another tentacle slips into Luka's ass and stimulates his prostate!
if %nanido<2 damage 50,60
if %nanido=2 damage 52,62
if %nanido=3 damage 54,64
dwave 1,"se\ero_makituki2.ogg"
>Innumerable tentacles coil around Luka's penis, stroking and massaging him!
if %nanido<2 damage 50,60
if %nanido=2 damage 52,62
if %nanido=3 damage 54,64
dwave 1,"se\ero_makituki2.ogg"
>More tentacles tickle and stroke the tip of Luka's penis!
if %nanido<2 damage 50,60
if %nanido=2 damage 52,62
if %nanido=3 damage 54,64
dwave 1,"se\ero_makituki2.ogg"
>More tentacles reach out, massaging the rest of Luka's body!
if %nanido<2 damage 50,60
if %nanido=2 damage 52,62
if %nanido=3 damage 54,64
dwave 1,"se\ero_makituki2.ogg"
>The tentacles violently stroke Luka's penis!
if %nanido<2 damage 50,60
if %nanido=2 damage 52,62
if %nanido=3 damage 54,64
skillname ""
if %mylife=0 sub %stack,1:return *lilith_h10
csp 699:print 10,500
sub %stack,1
return



*lilith_s1

add %stack,1
if %max_mylife>%mylife*5 mov %sel_hphalf,1:gosub *lilith_s2:sub %stack,1:return
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Guh..."
if %ransu=2 mov $sel1,"Urhg..."
if %ransu=3 mov $sel1,"Uhg..."
name "Luka"
eng $sel1:$sel6\
name ""
gosub *face2
name "Lilim"
>He looks like he's enjoying this, sister.\
name ""
name "Lilith"
>Hehe... What a nice face.@
>More... More... Drown in the pleasure...\
name ""
gosub *face1
mov %sel_hphalf,1
sub %stack,1
return



*lilith_s2

add %stack,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ahhg..."
if %ransu=2 mov $sel1,"Aaahh..."
if %ransu=3 mov $sel1,"Haa..."
name "Luka"
eng $sel1:$sel6\
name ""
gosub *face2
name "Lilim"
>It looks like he's about to come...@
>Sister... This boy is more lewd than I thought.\
name ""
name "Lilith"
>That man's descendant is quite pathetic...@
>I'll enjoy seeing his offspring in a submissive, pathetic state.\
name ""
mov %sel_kiki,1
sub %stack,1
return



*lilith_onedari

mov $list1,"Laughing Gend"
if %3468>0 mov %list_num1,1
mov $list2,"Tin Cyrus"
if %3469>0 mov %list_num2,1
mov $list3,"Melo Sophia"
if %3470>0 mov %list_num3,1
mov $list4,"Ritis Ani"
if %3471>0 mov %list_num4,1
mov $list5,"Twin Tail Drain"
if %3472>0 mov %list_num5,1
mov $list6,"Twin Energy Drain"
if %3473>0 mov %list_num6,1
mov $list7,"Chaos Pleasure"
if %3474>0 mov %list_num7,1
gosub *cmd_onedari
if %cmd1=11 goto *lilith_onedari1
if %cmd1=12 goto *lilith_onedari2
if %cmd1=13 goto *lilith_onedari3
if %cmd1=14 goto *lilith_onedari4
if %cmd1=15 goto *lilith_onedari5
if %cmd1=16 goto *lilith_onedari6
if %cmd1=17 goto *lilith_onedari7
if %cmd1=-1 goto *lilith_main
goto *lilith_onedari



*lilith_onedari1

gosub *onedari_syori
name "Lilim"
>He wants us to use our hands, sister.\
name ""
name "Lilith"
>Then cover these palms of ours with as much as you can shoot out...\
name ""
gosub *lilith_a1
skip -1



*lilith_onedari2

gosub *onedari_syori
name "Lilim"
>He wants us to use our mouths, sister.\
name ""
name "Lilith"
>Then fill our mouths with as much as you can shoot out...\
name ""
gosub *lilith_a2
skip -1



*lilith_onedari3

gosub *onedari_syori
name "Lilim"
>He wants us to use our breasts, sister.\
name ""
name "Lilith"
>Then cover these breasts of ours with as much as you can shoot out...\
name ""
gosub *lilith_a3
skip -1



*lilith_onedari4

gosub *onedari_syori
name "Lilim"
>He wants us to use our feet, sister.\
name ""
name "Lilith"
>Then cover these feet of ours with as much as you can shoot out...\
name ""
gosub *lilith_a4
skip -1



*lilith_onedari5

gosub *onedari_syori
name "Lilim"
>He wants us to absorb his power, sister.\
name ""
name "Lilith"
>Then we shall enjoy stealing everything from you...\
name ""
gosub *lilith_a5
skip -1



*lilith_onedari6

gosub *onedari_syori_k
name "Lilim"
>He wants us to rape him, sister.\
name ""
name "Lilith"
>Then let's enjoy ourselves, shall we?\
name ""
if %kousoku=0 gosub *lilith_a6
if %kousoku=1 gosub *lilith_a7
gosub *lilith_a8
skip -1



*lilith_onedari7

gosub *onedari_syori
name "Lilim"
>He wants to experience our secret skill, sister.\
name ""
name "Lilith"
>Then first let us prepare it...\
name ""
gosub *lilith_a9
gosub *lilith_a10
skip -1



*lilith_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\lilith_bk02.bmp",138,0
gosub *syasei2
>As the two sisters caress his penis, Luka comes, covering their hands with his semen.\
mov %viclose,1:gosub *lose
mov %2605,%2605+1:if %2605=1 mov %count_koenemy,%count_koenemy+1
if %2605>%count_most mov %count_most,%2605:mov $count_mostname,$name
count 5,5
mov $bad1,"Luka was forced to an orgasm by the sisters' handjob."
gosub *face2
name "Lilim"
>Our hands are all covered...\
name ""
name "Lilim"
>He came so much... Was it too good for him?\
name ""
goto *lilith_h



*lilith_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\lilith_bk05.bmp",138,0
gosub *syasei2
>As the two sisters' tongues run all over his penis, Luka comes, covering their faces in semen.\
mov %viclose,1:gosub *lose
mov %2605,%2605+1:if %2605=1 mov %count_koenemy,%count_koenemy+1
if %2605>%count_most mov %count_most,%2605:mov $count_mostname,$name
count 4,5
mov $bad1,"Luka was forced to an orgasm by the sisters' kissing."
gosub *face2
name "Lilim"
>It's all over my face...\
name ""
name "Lilim"
>He came so much... Was it too good for him?\
name ""
goto *lilith_h



*lilith_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\lilith_bk01.bmp",138,0
gosub *syasei2
>As the two sisters squish Luka's penis between their breasts, he comes, covering their breasts in semen.\
mov %viclose,1:gosub *lose
mov %2605,%2605+1:if %2605=1 mov %count_koenemy,%count_koenemy+1
if %2605>%count_most mov %count_most,%2605:mov $count_mostname,$name
count 7,5
mov $bad1,"Luka was forced to an orgasm as the two sisters squeezed him between their breasts."
gosub *face2
name "Lilim"
>Our chests are all covered in semen...\
name ""
name "Lilim"
>He came so much... Was it too good for him?\
name ""
goto *lilith_h



*lilith_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\lilith_bk04.bmp",138,0
gosub *syasei2
>As the two sisters stamp on his penis, Luka comes, covering their soft feet with his semen.\
mov %viclose,1:gosub *lose
mov %2605,%2605+1:if %2605=1 mov %count_koenemy,%count_koenemy+1
if %2605>%count_most mov %count_most,%2605:mov $count_mostname,$name
count 6,5
mov $bad1,"Luka was forced to an orgasm as the sisters trampled on him."
gosub *face2
name "Lilim"
>It's all over our feet...\
name ""
name "Lilim"
>He came so much... Was it too good for him?\
name ""
goto *lilith_h



*lilith_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>As Lilim sucks out his power through her tail, Luka comes, shooting his semen into her tail.\
mov %viclose,1:gosub *lose
mov %2605,%2605+1:if %2605=1 mov %count_koenemy,%count_koenemy+1
if %2605>%count_most mov %count_most,%2605:mov $count_mostname,$name
count 19,5
mov $bad1,"Luka was forced to an orgasm as Lilim drained his HP."
gosub *face2
name "Lilim"
>Mmm... I got to drink so much through my tail...\
name ""
name "Lilim"
>It felt amazing, didn't it? Teehee.\
name ""
goto *lilith_h



*lilith_h6

name "Luka"
>Ahhh...\
name ""
>I fall to my knees, the last of my power drained.@
>It feels like she sucked out everything with that tail of hers...\
mov %viclose,1:gosub *lose
mov %2605,%2605+1:if %2605=1 mov %count_koenemy,%count_koenemy+1
if %2605>%count_most mov %count_most,%2605:mov $count_mostname,$name
count 19,5
mov $bad1,"All of Luka's power was drained by Lilith's level drain."
gosub *face2
name "Lilith"
>Your power is completely gone now...\
name ""
name "Lilim"
>It felt amazing, didn't it? Teehee.\
name ""
goto *lilith_h



*lilith_h7

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\lilith_ha2.bmp",0,0
gosub *syasei2
>As Lilith rides Luka's face, he comes, all the while taking in deep breaths of her vagina.\
mov %viclose,1:gosub *lose
mov %2605,%2605+1:if %2605=1 mov %count_koenemy,%count_koenemy+1
if %2605>%count_most mov %count_most,%2605:mov $count_mostname,$name
count 17,5
mov $bad1,"Luka was forced to come as Lilith sat on his face."
gosub *face2
name "Lilith"
>Hehe... It was amazing, wasn't it?\
name ""
name "Lilim"
>Make sure you come a lot inside me, as well...\
name ""
goto *lilith_h



*lilith_h8

mov %ikigoe,3:gosub *ikigoe
name "Lilith"
>Ara, already done?\
name ""
name "Lilim"
>Teehee... How pathetic.\
name ""
gosub *syasei1
lsp 700,":a;chara\lilith_ha2.bmp",0,0
gosub *syasei2
>As soon as Luka is inserted into Lilim, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2605,%2605+1:if %2605=1 mov %count_koenemy,%count_koenemy+1
if %2605>%count_most mov %count_most,%2605:mov $count_mostname,$name
count 1,5
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to an orgasm from simple insertion."
gosub *face2
name "Lilith"
>Coming so fast... What a pathetic little boy.\
name ""
name "Lilim"
>But I feel too good, so there's no helping it I guess...@
>Isn't that right, little premature ejaculator? Teehee.\
name ""
goto *lilith_h



*lilith_h9

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\lilith_ha2.bmp",0,0
gosub *syasei2
>As Lilim rapes Luka, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2605,%2605+1:if %2605=1 mov %count_koenemy,%count_koenemy+1
if %2605>%count_most mov %count_most,%2605:mov $count_mostname,$name
count 1,5
mov $bad1,"Luka was forced to an orgasm as Lilim raped him."
gosub *face2
name "Lilim"
>Teehee... I can feel his semen leaking out inside me.\
name ""
name "Lilith"
>It felt amazing, didn't it? Teehee.\
name ""
goto *lilith_h



*lilith_h10

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 699,":a;chara\lilith_ct02.bmp",0,0
gosub *syasei2
>Stuck in a vortex of summoned tentacles, Luka comes as they caress every inch of his body.\
mov %viclose,1:gosub *lose
mov %2605,%2605+1:if %2605=1 mov %count_koenemy,%count_koenemy+1
if %2605>%count_most mov %count_most,%2605:mov $count_mostname,$name
count 10,5
mov $bad1,"Luka was finished by the sisters' ultimate move."
gosub *face2
name "Lilim"
>Well, wasn't it amazing?\
name ""
name "Lilim"
>With that, you're our prey...\
name ""
csp 699:print 10,500
goto *lilith_h



*lilith_h

mov $bad2,"Raped in turns by the two sisters, Luka becomes their eternal sex slave."
if %2605=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,2:hseanwave:goto *lilith_hb
name "Luka"
>Ah...Ahhh...\
name ""
name "Lilim"
>Sister, the Hero wasn't able to resist us.\
name ""
name "Lilith"
>Well then, it's time to exercise the victor's right.@
>I shall enjoy raping him in revenge for these last 500 years.\
name ""
>The two girls bend over, locking their supple limbs together around my body.\
>Their warm bodies push together, sandwiching me between them.\
name "Lilim"
>...I'll rape him first.@
>The boy will lose his mind as I cherish his body.\
name ""
name "Lilith"
>I'll ride his face then, sister.@
>He'll get drunk on my heavenly smell.\
name ""
cspl 690,699
lsp 700,":a;chara\lilith_ha0.bmp",0,0:print 10,500
>Lilith steps over my head, and drops down quickly.@
>Pushing her vagina into my face, the heat from her instantly warms up my face.\
>I breathe in a sharp gasp of surprise at the sudden movement, with my vision now blocked by her brown skin.\
name "Luka"
>Nnn! Mmmgg!\
name ""
>With my mouth blocked, I'm forced to breathe through my nose.@
>After just a single breath of air, the smell of her vagina fills my senses and causes a strange sensation to flow through me.\
name "Luka"
>Ahhh!\
name ""
name "Lilith"
>Hehe... Taste me even more...\
name ""
>Lilith slowly increases the weight on my face as she starts to grind her vagina against my mouth.\
>Her juices flow out of her vagina, covering my face.@
>As I gasp for breath under her, some of her wetness gets into my mouth and I'm forced to swallow it.\
>All of the air I'm allowed to breathe is air that has already touched her skin or vagina.\
>Due to that, all of the air I breathe in is warm and sweet, filled with Lilith's taste.\
name "Lilim"
>I'll feast on his penis...@
>He looks so happy at being able to be raped by us.\
name ""
>I feel Lilim begin to drop down on my waist.@
mov %hseanwave,2:hseanwave
lsp 700,":a;chara\lilith_ha1.bmp",0,0:print 10,500
>With Lilith blocking my vision as she sits on my face, I gasp in surprise at the sudden feeling of being forced into Lilim's hot vagina.\
name "Luka"
>Ahhhh!!\
name ""
>A loud moan escaped from my mouth as I get the first feel of Lilim's vagina.\
>Her tight vagina squeezes me, almost forcing me to an orgasm just from insertion.\
name "Luka"
>Am...Amazing... Ahhh!\
name ""
name "Lilim"
>Teehee... Only your tip is in.@
>Now, allow me to invite you further inside me...\
name ""
>Lilim giggles as she starts to slowly drop her waist again.@
>I try to stifle my moan at being slowly screwed into her, but it's too much for me to take.\
goto *lilith_hb



*lilith_hb

name "Luka"
>Ah!@>Ahhh!\
name ""
>As Lilim drops her waist, I let out a pathetic moan.\
>Just the feeling of going into her tight vagina is too much, I can barely endure it.\
>From the entrance all the way inside of her, I feel the tip of my penis parting away her warm, wet flesh as I invade deeper inside.\
>All the while, the smell from Lilith's vagina clouds my mind and makes my brain swim.\
name "Luka"
>Ahh... I... I can't take this...!\
name ""
name "Lilim"
>...Sister, I don't think he can last until he's all the way inside me.@
>This Hero is really pathetic.\
name ""
name "Lilith"
>Arara, Lilim's vagina is one of the finest in the world.@
>It would be a shame for you to be finished before you even got a real taste of it.\
name ""
name "Luka"
>Haaa...\
name ""
>Her waist continues to slowly drop, millimeter by millimeter...@
>The desire to release wells up in me... It doesn't feel like I can take this much longer.\
name "Luka"
>Ahh... I'm going to come...\
name ""
name "Lilim"
>Teehee, you really are weak.@
>Sister, he's going to come while I'm still putting it in.\
name ""
name "Lilith"
>Hehe, I can't wait to feel his mouth gasping for air against my pussy as he comes in yours.\
name ""
>Lilith rubs her vagina against my face as she giggles.@
>Her soft ass rests on my eyes, as her vagina blocks my mouth and nose.\
>Unable to take their assault any longer, I feel my penis start to twitch, about to ejaculate.\
name "Luka"
>Ah...Ahhh...\
name ""
>The time for my submission has come...@
>Giving in, I relax my waist as I let myself go in Lilim.\
gosub *syasei1
lsp 700,":a;chara\lilith_ha2.bmp",0,0
gosub *syasei2
>Gasping in pleasure, the smell from Lilith's vagina fills me as my semen shoots into Lilim.\
>I couldn't even last until I was all the way inside her...@
>Not even a full insertion, I was defeated part way...\
name "Lilim"
>You didn't even get a good taste of me yet...@
>How sad... But it felt good at least, didn't it? Teehee.\
name ""
name "Lilith"
>Lilim's pussy is one of the finest in the world.@
>Any man given the chance to be all the way inside her would go mad with pleasure...\
>It's a shame you couldn't manage to endure it a little bit longer...\
name ""
name "Luka"
>Ah...Ahh...\
name ""
>Something even better than what I just felt...@
>Having just tasted unimaginable pleasure, the thought that there's something even better...\
>The carnal desire in me rises up, desiring to see what it's like.@
>The two sisters toying with me clearly see the change in me.\
name "Lilim"
>Come on... I'll let you go even deeper...@
>You want to feel it, don't you?\
>The unbearable pleasure of being all the way inside me?\
name ""
>Lilim starts to slowly resume forcing me inside her.\
>Further and further inside I go, making the pressure from her soft walls around my penis continue to increase.\
>Little by little, my tip pushes apart her wet flesh, making way in her tight vagina for my penis.@
>If I was to relax my waist again, it feels like I would come right away...\
name "Luka"
>Ah...Ahh...\
name ""
name "Lilim"
>A little more... You're almost there...@
>Teehee... Are you ready?\
name ""
name "Lilith"
>Hehe, the pleasure you were desiring is almost here.@
>Just a little further, and you'll have arrived in heaven...\
name ""
>With a final small thrust, I reach all the way inside her.@
>My tip pushes against a soft wall at the back of her, signaling that I'm all the way inside her.\
name "Luka"
>Ah!@>Ahhh!\
name ""
>Deep inside Lilim, a tiny hole opens up and lets my tip slip in.@
>Gently squeezing my glans, it feels like a tiny even more sensitive vagina inside of her.\
>The flesh around my glans constricts, as if molding to my form.@
>The tiny creases rub and massage me as they shrink and mold to me.\
name "Luka"
>Hya!@> Ahh!\
name ""
>Her walls start to slightly squirm, rubbing and massaging the shaft of my penis inside her.\
>My back muscle, my tip, everything... I writhe underneath the sisters as the agonizing pleasure makes me lose control of my own body.\
name "Lilim"
>See, I'm amazing, aren't I?@
>Once your tip slips into there, there's no escape from the pleasure any longer...\
>Not until every drop of your semen has been squeezed out...\
name ""
name "Lilith"
>Hehe, what disgraceful behavior.@
>I love feeling a man squirm as he becomes corrupted by pleasure.\
name ""
name "Luka"
>Ahh... C...Coming... I'm coming!\
name ""
>Tiny bumps rub against my glans as her form fitting flesh gently moves around it.@
>As Lilim's vagina ruthlessly overpowers me in pleasure, I give up, shooting the proof of my submission into her.\
gosub *syasei1
lsp 700,":a;chara\lilith_ha3.bmp",0,0
gosub *syasei2
name "Luka"
>Ahh... What... Is this...?\
name ""
>As soon as I explode in her, she tightens around me.@
>Her vagina starts to stroke my penis in a milking motion, sucking and pulling on me until I'm forced to another quick orgasm.\
name "Luka"
>Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\lilith_ha4.bmp",0,0
gosub *syasei2
>I'm forced to another ejaculation before my first one is even over.@
>Assaulted by the ecstasy of the double orgasm, I convulse under the weight of the two sisters as I gasp in pleasure.\
mov %hseanwave,0:hseanwave
name "Lilith"
>Arara, two at once...@
>Hehe, what a weak boy.\
name ""
name "Lilim"
>But sister...@
>Even though he's pathetic, his semen is delicious...\
name ""
name "Luka"
>Urhg...\
name ""
>I gasp in pleasure as the two sisters riding me calmly talk to each other.@
>Exhausted, I lay under them as the ecstasy fills every corner of my body.\
name "Lilith"
>Lilim... Isn't it about time for me to have a turn?@
>I wish to rape the boy next.\
name ""
name "Lilim"
>Of course, sister.\
name ""
>Without ever letting go of my body, the two sisters entangle themselves around me, their limbs locking together in a tight embrace with me between them.\
lsp 700,":a;chara\lilith_hb1.bmp",0,0:print 10,500
>Lilith tightly hugs me from the front, while Lilim holds me from the back.@
>Both of them pull their bodies close together, pushing their soft breasts into my skin.\
>As their smooth brown skin rubs against me while they position themselves, I unintentionally let out a happy sigh.\
name "Lilith"
>Are you enjoying being sandwiched between us?@
>But we haven't even gotten to the good part...\
name ""
name "Lilim"
>A wet, slippery heaven awaits you... Teehee.\
name ""
>A liquid, almost like sweat, begins to come out of the sisters' skin.@
>The warm wetness from both of them covers my body as their skin rubs against mine.\
>Their wet bodies rub against me as they pull themselves close to me.@
>Lubricated by their liquid, I'm in a trance of pleasure as the two of their bodies massage my own.\
name "Lilith"
>Hehe, it's almost unbearable just being held, isn't it?@
>But that isn't enough for me... I want to rape you, too...\
name ""
>Lilith wraps her arms around my back, and pushes her waist against mine.@
mov %hseanwave,8:hseanwave
>Like that, she slips me into her wet vagina!\
name "Luka"
>Ahhh...!\
name ""
>Her juices lubricate me, letting me slip into her while she tightens around me.@
>Forcing me all the way inside her, my tip slips into a hole, just like it did with Lilim.\
name "Luka"
>Th...The tip... Ahh!@
>Ah...Ahhhh!\
name ""
>As soon as that inner hole closes around my tip, tiny little bumps begin to rub me, as if welcoming me inside.\
>I shake side to side as the pleasure attacks me, causing my body itself to rub against both of the sisters'.\
name "Lilith"
>Hehe, there's no need to hold back.@
>No human can endure me more than a few seconds, anyway.\
>You'll be just like the rest...@
>So go ahead and come inside me.\
name ""
name "Luka"
>Ahhh!!\
name ""
>Her vagina shrinks, taking the shape of my penis.@
>It's as if it was made just for me... Designed to give me unmatched pleasure.\
>The stimulation of the legendary Lilith... As soon as she forced me into her, my fate was sealed.\
name "Luka"
>Ahh... I...I'm going to come...\
name ""
name "Lilith"
>Come...@
>I'll rub you all the way inside of me, so go ahead and explode...\
name ""
>The small creases and bumps inside of her start to move back and forth, gently massaging me.@
>Taking the finishing blow, the last of my feeble endurance is smashed.\
name "Luka"
>Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\lilith_hb2.bmp",0,0
gosub *syasei2
>My penis twitches as I explode in her tight vagina.@
>Just like with Lilim, she starts a milking motion inside of her, squeezing out every drop even as I ejaculate.\
name "Luka"
>Ahh... S...Stop it...\
name ""
>I twist my body in pleasure filled agony, trying to get a reprieve.@
>But with the two sisters so tightly holding their bodies against me, there's no escape.\
name "Lilith"
>Hehe, that's the first...@
>But I want a lot more than that.\
>Lilim, will you please assist?\
name ""
name "Lilim"
>Right away, sister.\
name ""
lsp 700,":a;chara\lilith_hb3.bmp",0,0:print 10,500
>Suddenly, Lilim's small tail gently forces itself into my ass.@
>The sudden feeling of her wet tail inside me makes me push forward in surprise, as the stimulation sends a shock through my body.\
name "Luka"
>Ahhhh!\
name ""
name "Lilim"
>Teehee...@>You're being raped from the front, and violated from behind.\
name ""
>I feebly shake my hips, trying to escape the strange feeling of her small tail inside me.@
>But as it rubs against me, the sudden spark of pleasure makes me go red in humiliation.\
>At the same time, Lilith's vagina shrinks again, forcing her soft flesh against my sensitive penis.\
>The sensations from behind me force me to push myself into Lilith against my will, sending explosions of bliss through me.\
name "Luka"
>Ah!@>Ahhh!\
name ""
>Then as Lilim uses her tail to push against my prostate...@
gosub *syasei1
lsp 700,":a;chara\lilith_hb4.bmp",0,0
gosub *syasei2
>I thrust forward from the lightning bolt of pleasure and explode in Lilith, filling her tight vagina with even more of my semen.\
name "Luka"
>Haaa...\
name ""
>Drained of all strength, I relax in the sisters' tight hug.@
>But they have no intention of letting me stop now...\
name "Lilith"
>Hehe, this is no time to rest.@
>Your work is far from over...\
name ""
name "Lilim"
>I'll tease his ass more...@
>Come on, let me hear that pitiful gasping moan of yours again.\
name ""
name "Luka"
>Aiiee!\
name ""
>Sandwiched between the two sisters, they continue to play with me.@
>As I convulse in pleasure, they easily control my body with their skilled techniques.\
gosub *syasei1:gosub *syasei2
>My vision gets hazy as they press their bodies tighter against mine, desiring more.@
>Given no time to rest, I'm forced to come over and over...\
gosub *syasei1:gosub *syasei2
name "Luka"
>Ahh...\
name ""
>Unsure of whether I'm in heaven or hell, I finally faint.\
gosub *anten
mov %hseanwave,0:hseanwave
>After that, the Succubus sisters continue to play with me...@
>One of the sisters assists as the other rapes me, endlessly forcing me to give them semen.\
>Not allowing me to die, they ensure I stay alive so they can continue to rape me...@
>Thus, my days continue as a sex slave to the sisters...\
>...............\
goto *badend



*madaminsect_start

mov $name,"Madame Insect"
mov $name2,"Madame Insect"
mov $lavel,"madaminsect"
mov $tatie1,"madaminsect_st01"
mov $tatie2,"madaminsect_st02"
mov $tatie3,"madaminsect_st03"
mov $tatie4,"madaminsect_h1"
mov $haikei,"bg111"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,3200
if %nanido=2 mov %max_enemylife,3400
if %nanido=3 mov %max_enemylife,4800
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,40
if %nanido=3 mov %earth_keigen,20
mov %music,1
mov %tikei,5
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Struggle and squirm, my cute prey... You won't escape."
mov $mogaku_sel2,"The gentlemen I squeezed dry struggled just as you did..."
mov $mogaku_sel3,"If you settle down, it will feel even better..."
mov $mogaku_sel4,"That's useless, you'll be squeezed dry no matter what..."
mov $mogaku_sel5,"Stop struggling, and just give me your fluids..."
mov $mogaku_earth_dassyutu1,"I've squeezed many travelers dry so far..."
mov $mogaku_earth_dassyutu2,"But this is the first time one has broken free from my hold."
mov $half_s1,"Does it feel nice? Hehe."
mov $half_s2,"I'll absorb everything you let out, so give me a lot..."
mov $kiki_s1,"It's almost time..."
mov $kiki_s2,"Give me all of your male extract..."
mov %end_n,7
mov %exp_minus,0
mov %zmonster_x,-250
mov %tukix,290
mov %owaza_count1a,2
name $name
>Hehe, a delicious looking gentleman.@
>I'll carefully caress your body to extract all of your fluids...\
name ""
>The lady, now revealed as a monster, stands in front of me!\
name "Luka"
>You were a monster...!?\
name ""
>This must have been what happened to all the other travelers who came to this village!\
gosub *face2
name $name
>It's an unbearable feeling, to be squeezed dry by me.@
>I've lost count on the amount of gentlemen who have died smiling in my embrace...\
name ""
name "Luka"
>I won't let there be any more victims!\
name ""
>I point my sword at the strange monster, taking my stance!\
gosub *face1
goto *common_main



*madaminsect_v

gosub *face3
name $name
>It can't be... I can't be defeated...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Madame Insect turns into a small beetle!\
mov %viclose,1:gosub *victory
mov %getexp,15000:gosub *lvup
mov %2306,1
goto *sean0230



*madaminsect_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>You wish to be sucked dry then?@
>Well then, allow me...\
name ""
goto *madaminsect_a



*madaminsect_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *madaminsect_kousan
if %cmd1=16 goto *madaminsect_onedari
if %cmd1=17 goto *common_skill
goto *madaminsect_main



*madaminsect_a

if %kousoku=1 gosub *madaminsect_a5:goto *common_main
rnd2 %ransu,1,5
if %ransu=1 gosub *madaminsect_a1:goto *common_main
if %ransu=2 gosub *madaminsect_a2:goto *common_main
if %ransu=3 gosub *madaminsect_a3:goto *common_main
if %ransu>3 && %owaza_count1a>3 gosub *madaminsect_a4:goto *common_main
skip -5



*madaminsect_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Please excuse the gloves."
if %ransu=2 mov $sel1,"My gloves are made of silk, so this should feel extra nice."
if %ransu=3 mov $sel1,"Feel free to dirty my gloves."
name $name
eng $sel1:$sel6\
name ""
skillname "Lady's Masturbation"
dwave 1,"se\ero_koki1.ogg"
>Wearing silk gloves, Madame Insect strokes Luka's penis!
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3475
if %nanido<2 damage 90,100
if %nanido=2 damage 110,120
if %nanido=3 damage 130,140
skillname ""
if %mylife=0 sub %stack,1:return *madaminsect_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*madaminsect_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"May I suck on your penis?"
if %ransu=2 mov $sel1,"Nnn... I love the taste of a gentleman."
if %ransu=3 mov $sel1,"I'll kiss the tip."
name $name
eng $sel1:$sel6\
name ""
skillname "Lady's Blowjob"
dwave 1,"se\ero_pyu2.ogg"
>Madame Insect closes her soft lips around Luka's penis, and gently sucks on him!
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3476
if %nanido<2 damage 95,105
if %nanido=2 damage 115,125
if %nanido=3 damage 115,125
skillname ""
if %mylife=0 sub %stack,1:return *madaminsect_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*madaminsect_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Forgive me, I'm still wearing my clothes."
if %ransu=2 mov $sel1,"I have more clothes, so feel free to dirty these."
if %ransu=3 mov $sel1,"Don't worry, I can slip it under my clothes."
name $name
eng $sel1:$sel6\
name ""
skillname "Lady's Tit Fuck"
dwave 1,"se\ero_koki1.ogg"
>Madame Insect puts Luka's penis under her clothes, and sandwiches it between her breasts!
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3477
if %nanido<2 damage 100,110
if %nanido=2 damage 120,130
if %nanido=3 damage 140,150
skillname ""
if %mylife=0 sub %stack,1:return *madaminsect_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*madaminsect_a4

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 7
name $name
if %first_sel1=1 skip 3
>Now then, if you'll excuse me... I'd like to start sucking on you in earnest.\
skip 2
>Now then, if you'll excuse me... I'd like to try this again.\
name ""
skillname "Insect Hold"
eng "Madame Insect grabs Luka with her legs, and pulls him close to her body!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>Luka is being held by Madame Insect!\
skillname ""
name $name
>Now then, I'd like to take a sip of your fluids.@
>Please relax and leave everything to me.\
name ""
skillname "Fluid Sucking"
dwave 1,"se\ero_kyuin1.ogg"
>Madame Insect forces Luka's penis into her lower mouth!@
>The wet flesh closes around Luka!
skillcount2 3478
if %nanido<2 damage 130,150
if %nanido=2 damage 130,150
if %nanido=3 damage 150,170
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *madaminsect_h4
if %kousan=2 sub %stack,1:return
gosub *face2
name $name
if %first_sel1=1 skip 4
>Well, is it comfortable?@
>My lower mouth is used exclusively for drinking fluids.\
skip 3
>This time, you won't get away.@
>Please give me a lot of fluids to drink.\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,100
if %earth=0 && %nanido=2 mov %genmogaku,100
if %earth=0 && %nanido=3 mov %genmogaku,100
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
sub %stack,1
return



*madaminsect_a5

add %stack,1
>Luka is being raped by Madame Insect...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"That pleased face of yours... Hehe, what a cute little gentleman.":mov $sel2,"Madame Insect's lower mouth sucks on Luka's penis!"
if %ransu=2 mov $sel1,"Just like the other men, I'll suck you dry.":mov $sel2,"Her lower mouth gets tighter around Luka's penis!"
if %ransu=3 mov $sel1,"This is how I extracted all of the other men's fluids...":mov $sel2,"Her flesh sticks to Luka's, sucking on him!"
if %ransu=4 mov $sel1,"Excuse me, for this might get a little intense...":mov $sel2,"The soft walls of flesh chew on Luka's penis!"
if %ransu=5 mov $sel1,"Now, please give me a lot to drink.":mov $sel2,"Her hole squirms and sucks on Luka, as if milking him!"
name $name
eng $sel1:$sel6\
name ""
skillname "Fluid Sucking"
dwave 1,"se\ero_kyuin1.ogg"
eng $sel2:$sel6
skillcount2 3478
if %nanido<2 damage 130,150
if %nanido=2 damage 130,150
if %nanido=3 damage 150,170
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *madaminsect_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*madaminsect_onedari

mov $list1,"Lady's Masturbation"
if %3475>0 mov %list_num1,1
mov $list2,"Lady's Blowjob"
if %3476>0 mov %list_num2,1
mov $list3,"Lady's Tit Fuck"
if %3477>0 mov %list_num3,1
mov $list4,"Fluid Sucking"
if %3478>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *madaminsect_onedari1
if %cmd1=12 goto *madaminsect_onedari2
if %cmd1=13 goto *madaminsect_onedari3
if %cmd1=14 goto *madaminsect_onedari4
if %cmd1=-1 goto *madaminsect_main
goto *madaminsect_onedari



*madaminsect_onedari1

gosub *onedari_syori
name $name
>You wish to be stroked by my hand?\
name ""
gosub *madaminsect_a1
skip -1



*madaminsect_onedari2

gosub *onedari_syori
name $name
>You wish to be sucked by my mouth?\
name ""
gosub *madaminsect_a2
skip -1



*madaminsect_onedari3

gosub *onedari_syori
name $name
>You wish to be squeezed by my breasts?\
name ""
gosub *madaminsect_a3
skip -1



*madaminsect_onedari4

gosub *onedari_syori_k
name $name
>You want me to suck out your fluids?\
name ""
if %kousoku=0 gosub *madaminsect_a4
gosub *madaminsect_a5
skip -1



*madaminsect_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\madaminsect_bk03.bmp",0,0
gosub *syasei2
>As her gloves hands caress Luka, he comes, covering her silky gloves with semen.\
mov %viclose,1:gosub *lose
mov %2606,%2606+1:if %2606=1 mov %count_koenemy,%count_koenemy+1
if %2606>%count_most mov %count_most,%2606:mov $count_mostname,$name
count 5,4
mov $bad1,"Luka was forced to come as Madame Insect stroked his penis."
gosub *face2
name $name
>Oh my, how wonderful.@>You absolutely covered my gloves with that male extract of yours.\
name ""
goto *madaminsect_h



*madaminsect_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\madaminsect_bk01.bmp",0,0
gosub *syasei2
>As her soft lips lightly squeezed around the shaft of Luka's penis, he comes, filling her mouth with his semen.\
mov %viclose,1:gosub *lose
mov %2606,%2606+1:if %2606=1 mov %count_koenemy,%count_koenemy+1
if %2606>%count_most mov %count_most,%2606:mov $count_mostname,$name
count 4,4
mov $bad1,"Luka was forced to an orgasm as Madame Insect gave him a blowjob."
gosub *face2
name $name
>Oh my, how wonderful.@>You absolutely filled my mouth with that male extract of yours.\
name ""
goto *madaminsect_h



*madaminsect_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\madaminsect_bk02.bmp",0,0
gosub *syasei2
>As Madame Insect squeezes Luka's penis with her breasts, Luka comes, covering her clothes with semen.\
mov %viclose,1:gosub *lose
mov %2606,%2606+1:if %2606=1 mov %count_koenemy,%count_koenemy+1
if %2606>%count_most mov %count_most,%2606:mov $count_mostname,$name
count 7,4
mov $bad1,"Luka was forced to an orgasm as Madame Insect gave him a tit fuck while still clothed."
gosub *face2
name $name
>Oh my, how wonderful.@>You absolutely covered my breasts with that male extract of yours.\
name ""
goto *madaminsect_h



*madaminsect_h4

mov %ikigoe,3:gosub *ikigoe
name $name
>Oh...?\
name ""
gosub *syasei1
lsp 700,":a;chara\madaminsect_h2.bmp",0,0
gosub *syasei2
>As soon as Luka is forced inside her, he comes, filling her lower mouth with semen.\
mov %viclose,1:gosub *lose
mov %2606,%2606+1:if %2606=1 mov %count_koenemy,%count_koenemy+1
if %2606>%count_most mov %count_most,%2606:mov $count_mostname,$name
count 2,4
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come as soon as he was inserted into Madame Insect."
gosub *face2
name $name
>That was awfully quick.@
>Hehe, you're the fastest gentleman I've sucked so far.\
name ""
goto *madaminsect_h



*madaminsect_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\madaminsect_h2.bmp",0,0
gosub *syasei2
>As she sucked on his penis with her lower mouth, Luka comes, filling her waiting mouth with his semen.\
mov %viclose,1:gosub *lose
mov %2606,%2606+1:if %2606=1 mov %count_koenemy,%count_koenemy+1
if %2606>%count_most mov %count_most,%2606:mov $count_mostname,$name
count 2,4
mov $bad1,"Luka was forced to an orgasm as Madame Insect sucked out his fluids."
gosub *face2
name $name
>Ah... Your male extract is flowing into me...@
>There's no bliss quite like this taste...\
name ""
goto *madaminsect_h



*madaminsect_h

mov $bad2,"She continued to suck out his semen until Luka died of exhaustion."
if %2606=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,21:hseanwave:goto *madaminsect_hb
name "Luka"
>Ahh...\
name ""
name $name
>...Now then, you can't fight any longer, can you?\
name ""
>Madame Insect sneers at me as I'm left too weak to fight back.@
>A bright pink hole opens up in her lower body.\
>A small organ, whose position and shape can mean it's used for only one thing...\
name $name
>Now then, accept my embrace...@
>And let me extract all of those fluids from you.\
name ""
>She approaches me, that strange hole dripping with wetness...@
cspl 690,699
lsp 700,":a;chara\madaminsect_h1.bmp",0,0:print 10,500
>Her feet clasp around my back, holding me in a tight embrace!\
name "Luka"
>Guh... S...Stop it!\
name ""
>Her insect feet lock around me, and force my waist right against hers.\
mov %hseanwave,21:hseanwave
>Carefully orienting my body, she forces my erect penis straight into her wet hole!\
goto *madaminsect_hb



*madaminsect_hb

name "Luka"
>Ahhhh!!\
name ""
lsp 690,":a;chara\madaminsect_ct01.bmp",0,0:print 10,500
>As soon as I'm forced into her, tiny little suckers latch all over my penis.@
>My tip, my back muscle... They latch on to every part of me.\
>Then, one by one, each starts its own separate sucking motion.@
>As the innumerable suckers stimulate me, my body trembles in her embrace.\
name $name
>Well? How are you enjoying my lower mouth?@
>It's evolved specially to suck out that delicious male extract of yours.\
name ""
name "Luka"
>Ah...Ahh...\
name ""
>I shiver as the strange stimulation runs up my spine.\
>Each sucking at its own unique pace and speed, the innumerable suckers latched onto my penis continue to pump me.\
>Even if I try to pull out, they're so tightly latched onto me that I'm stuck inside of her.\
name $name
>I'll suck out all of your extract inside here.@
>You won't be able to escape until there's nothing left to suck...\
name ""
name "Luka"
>S...Stop... Ahhh...\
name ""
>As they suck on me, a chill runs down my back from her words, while another spark of pleasure runs up, signaling my impending orgasm.\
name $name
>Hehe, already about to come?\
>Give me everything...@
>Just let it go, you'll be able to enjoy a comfortable death...\
name ""
name "Luka"
>N...No way...@>Ahh!\
name ""
>The sucker latched onto my tip starts to get even more intense, as if trying to suck out my semen right through my urethra.\
>The sudden increase in suction makes me lose my concentration, loosing a powerful orgasm as it forcefully sucks the semen up as I shoot it out.\
gosub *syasei1
lsp 700,":a;chara\madaminsect_h2.bmp",0,0
lsp 690,":a;chara\madaminsect_ct02.bmp",0,0
gosub *syasei2
name "Luka"
>Ahh...\
name ""
>With every twitch of my penis, the sucker latched onto my tip sucks just as hard, pulling out the semen with extra force.\
>At the same time, all of the other suckers pull and push into my shaft, all eager to get a taste of the semen rushing through.\
name $name
>Hehehe... What a surprising amount.@
>It felt amazing, didn't it?\
name ""
name "Luka"
>Ahh...\
name ""
>Madame Insect laughs as I relax in her embrace, exhausted.\
name $name
>...But it isn't over yet.@
>I never stop sucking out a male's extract until he's completely dry...\
name ""
name "Luka"
>D...Don't do... Ahhh!\
name ""
>The suckers all start to squirm and wriggle around my penis, still latched on.\
>There's no escape... They're holding me inside of her, eagerly going to suck everything out of me...\
name "Luka"
>Ah... Ahhh...\
name ""
name $name
>My, my, my... What a vulgar moan that was.@
>But it's music to my ears.\
>I'd love to hear that pitiful voice of yours a little more.\
name ""
>The suckers around me all start to suck and pull even more violently than before.\
>It feels like my skin itself is being pulled into them from every direction, stretching out my penis and making it even bigger inside of her.\
name "Luka"
>Ah... Ahh!\
name ""
name $name
>Hehehehe... Sing... Sing...!@
>I want to hear more of that miserable voice of yours!\
name ""
>She looks down with a cruel grin on her face as I helplessly squirm under her.@
>As I look into her cold eyes, I feel another orgasm about to be sucked out of me.\
name "Luka"
>Ahh... I'm going to come again...\
name ""
name $name
>Hehe... You're giving me quite the feast.@
>Are you really that eager to let me feast on your life?\
name ""
name "Luka"
>N...No... No...!\
name ""
>I'm horrified at her words, but there's no way for me to endure the gnawing orgasm any longer.@
>With a loud moan, it explodes out of me.\
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\madaminsect_h3.bmp",0,0
lsp 690,":a;chara\madaminsect_ct03.bmp",0,0
gosub *syasei2
>I twitch inside of her, spraying my semen into her pink mouth.@
>As soon as I come, an overpowering weakness fills me as she embraces me slightly tighter.\
>If this weakness gets any stronger... I'll be in real danger...\
name "Luka"
>Ahh... No more... Any more and I'll...\
name ""
name $name
>Why not just surrender?@
>I've had prey beg me to stop...\
>But as a predator, I'd never listen to lowly prey.@
>Just give up and give all of your extract to me.\
name ""
name "Luka"
>Ahhhh!!\
name ""
mov %hseanwave,22:hseanwave
>Cruelly mocking my pleading, the suckers continue just as before.@
>This monster, evolved to suck men dry against their will...@>My penis is stuck inside of her, with no hope for escape.\
>I'm nothing more than food to be devoured by an insect now...\
name "Luka"
>Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\madaminsect_h4.bmp",0,0
lsp 690,":a;chara\madaminsect_ct04.bmp",0,0
gosub *syasei2
>More semen is sucked out, and more of my life itself goes with it.@
>Giving up, I stop struggling and just give myself over.\
name $name
>The feeling of my prey becoming weak, and surrendering to my embrace...@
>There's no greater joy than that in this world.\
name ""
>She giggles as she looks down on me, her suckers forcing me to another dangerous ejaculation at the same time.\
name "Luka"
>Ahh...\
name ""
gosub *syasei1:gosub *syasei2
>Lording over me with a triumphant smile, I shoot more semen into her.@
>My last moments are going to be spent looking up at such cruel eyes...\
name "Luka"
>Ahh...\
name ""
gosub *syasei1:gosub *syasei2
name $name
>Hehe, I absolutely love this...@
>Watching my prey slowly weaken, gasping in pleasure...\
>But I've gotten bored of you.\
name ""
>With an especially cruel smile, she says that right to my face.\
name $name
>You were a nice distraction for a few minutes.@
>I guess I'll finish you off now.\
name ""
>Her entire lower mouth starts to suck on me in addition to the suckers, making it feel like I could be sucked right into her hole.\
>Way different than before, it feels like if I stopped tensing my waist, everything inside of me would be sucked right out into her.\
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1:gosub *syasei2
>I explode again in no time, easily brought to shoot out more of the fluids she desires.@
>Even as I ejaculate, the suckers don't stop for a moment, already working on bringing out another shot.\
name "Luka"
>Ah...!@> Ahhg!\
name ""
gosub *syasei1:gosub *syasei2
name $name
>Hehe, you've gotten awfully weak...@
>Don't worry, you'll be in heaven soon...\
name ""
name "Luka"
>Urhg... Ahh...\
name ""
gosub *syasei1:gosub *syasei2
>Each shot of sperm leaves me weaker.@
>I can't even move anymore, just weakly ejaculate inside of her.\
gosub *syasei1:gosub *syasei2
name $name
>It looks like the next one will finish you.@
>Now then, enjoy your pleasure filled death...\
name ""
>The suckers attached to my penis all suck on me at the same time...\
name "Luka"
>Ha.. Aa...\
name ""
gosub *syasei1:gosub *syasei2
>And with that final ejaculation, my vision starts to go dark.@
>Drained of all my energy, my thoughts all mix together as I drift off into blackness.\
name "Luka"
>Ah...aaa...\
name ""
>Just like that, my life fades as I'm still in the middle of my final orgasm.\
gosub *anten
mov %hseanwave,0:hseanwave
name $name
>Thanks for the meal.@> I really enjoyed it...\
name ""
>Madame Insect laughs as she finishes her meal.@
>Tossing away the boy's dry corpse, she resumes her stroll.\
>.................\
goto *badend



*madamumbrella_start

mov $name,"Madame Umbrella"
mov $name2,"Madame Umbrella"
mov $lavel,"madamumbrella"
mov $tatie1,"madamumbrella_st01"
mov $tatie2,"madamumbrella_st02"
mov $tatie3,"madamumbrella_st03"
mov $tatie4,"madamumbrella_h01"
mov $haikei,"bg111"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,3400
if %nanido=2 mov %max_enemylife,3600
if %nanido=3 mov %max_enemylife,5100
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %music,1
mov %tikei,5
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"I won't let you go... You're just my toy..."
mov $mogaku_sel2,"Struggling is a waste of energy... Hehe."
mov $mogaku_sel3,"Your struggling is getting weaker and weaker..."
mov $mogaku_sel4,"Oh my, do you not want to play with me?"
mov $mogaku_sel5,"Even if you hate it, I'm not going to stop..."
mov $mogaku_earth_dassyutu1,"How can a human have such power...!?"
mov $mogaku_earth_dassyutu2,""
mov $half_s1,"Does it feel good?"
mov $half_s2,"Why not just give yourself over to this pleasure?"
mov $kiki_s1,"It looks like you're at your limit..."
mov $kiki_s2,"I'm looking forward to this... The moment when you come..."
mov %end_n,7
mov %exp_minus,15000
mov %zmonster_x,-280
mov %tukix,320
mov %owaza_count1a,3
mov %owaza_count3a,3
name "Luka"
>Another monster disguising herself like that other lady!\
name ""
name $name
>Hehe... What a stupid thing to say.@
>There are no humans in this village at all.\
>This is a monster village, where we feed on humans who go astray.\
name ""
name "Luka"
>N...No way...\
name ""
>The realization finally dawns on me.@
>That's why there isn't a single man here!\
gosub *face2
name $name
>Now, I'll feed on you as well...@
>First, I'll need to weaken you with these tentacles of mine...\
name ""
gosub *face1
goto *common_main



*madamumbrella_v

gosub *face3
name $name
>To a human...?@> How...!?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Madame Umbrella turns into a tiny fleshy umbrella!\
mov %viclose,1:gosub *victory
mov %getexp,15000:gosub *lvup
mov %2307,1
goto *sean0231



*madamumbrella_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>Hehe, you're giving yourself over to me?@
>Then I'll gladly enjoy feeding on you...\
name ""
goto *madamumbrella_a



*madamumbrella_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *madamumbrella_kousan
if %cmd1=16 goto *madamumbrella_onedari
if %cmd1=17 goto *common_skill
goto *madamumbrella_main



*madamumbrella_a

if %kousoku=1 && %ransu=3 gosub *madamumbrella_a5:goto *common_main
rnd2 %ransu,1,4
if %ransu=1 gosub *madamumbrella_a1:goto *common_main
if %ransu=2 gosub *madamumbrella_a2:goto *common_main
if %ransu=3 && %owaza_count3a>4 gosub *madamumbrella_a3:goto *common_main
if %ransu=4 && %owaza_count1a>4 gosub *madamumbrella_a4:goto *common_main
skip -5



*madamumbrella_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll tease your penis with my tentacles."
if %ransu=2 mov $sel1,"Is it humiliating to be played with like this?"
if %ransu=3 mov $sel1,"Could it be that you'll come just from this?"
name $name
eng $sel1:$sel6\
name ""
skillname "Tentacle Play"
dwave 1,"se\ero_makituki1.ogg"
eng "Madame Umbrella's tentacles coil around Luka's penis!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>The tentacles caress and massage Luka's penis!
skillcount2 3479
if %nanido<2 damage 90,100
if %nanido=2 damage 105,115
if %nanido=3 damage 120,130
skillname ""
if %mylife=0 sub %stack,1:return *madamumbrella_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*madamumbrella_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Men always love these suckers of mine..."
if %ransu=2 mov $sel1,"I'll use my suckers to suck on that delicate part of yours..."
if %ransu=3 mov $sel1,"Don't you want to taste my suckers?"
name $name
eng $sel1:$sel6\
name ""
skillname "Sucker Play"
dwave 1,"se\ero_kyuin2.ogg"
eng "One of Madame Umbrella's tentacles wraps around Luka's penis!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>Her suckers latch onto his penis, and start to suck on him!
skillcount2 3480
if %nanido<2 damage 90,105
if %nanido=2 damage 105,120
if %nanido=3 damage 120,135
skillname ""
if %mylife=0 sub %stack,1:return *madamumbrella_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*madamumbrella_a3

add %stack,1
mov %owaza_count3a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"All men moan when they take this..."
if %ransu=2 mov $sel1,"I can even play with your ass..."
if %ransu=3 mov $sel1,"Play with your weakest spot..."
name $name
eng $sel1:$sel6\
name ""
skillname "Sensual Anal Spin"
dwave 1,"se\ero_syokusyu3.ogg"
eng "One of Madame Umbrella's moves toward Luka's ass!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,60
if %wind=2 && %nanido=2 mov %wind_kakuritu,50
if %wind=2 && %nanido=3 mov %wind_kakuritu,30
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>Slipping inside, it spins around inside of Luka's ass!
skillcount2 3481
if %nanido<2 damage 100,110
if %nanido=2 damage 115,125
if %nanido=3 damage 130,140
skillname ""
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"It's not over yet..."
if %ransu=2 mov $sel1,"Hehe, there's no rest for you..."
if %ransu=3 mov $sel1,"I'll spin it even more inside of you..."
name $name
eng $sel1:$sel6\
name ""
skillname "Sensual Anal Spin"
dwave 1,"se\ero_syokusyu3.ogg"
>The tentacle moves in and out like a piston as it spins!
skillcount2 3481
if %nanido<2 damage 100,110
if %nanido=2 damage 115,125
if %nanido=3 damage 130,140
skillname ""
if %mylife=0 sub %stack,1:return *madamumbrella_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*madamumbrella_a4

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name $name
>Now then, shall I really start to tease you?\
name ""
skillname "Tentacle Capture"
dwave 1,"se\ero_makituki3.ogg"
>A tentacle reaches out and grabs Luka, forcing him into her umbrella!
if %nanido<2 damage 90,100
if %nanido=2 damage 105,115
if %nanido=3 damage 120,130
mov %kousoku,1:gosub *status_print
>Luka's being bound by Madame Umbrella!\
skillname ""
if %mylife=0 sub %stack,1:return *madamumbrella_h4
if %kousan=2 sub %stack,1:return
gosub *face2
name $name
if %first_sel1=1 skip 4
>Now then, it's time to have some fun...@
>I'll stroke that penis of yours, and milk out that delicious semen...\
skip 3
>You won't escape this time.@
>I'll stroke that penis of yours, and milk out that delicious semen...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,100
if %earth=0 && %nanido=2 mov %genmogaku,100
if %earth=0 && %nanido=3 mov %genmogaku,100
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
sub %stack,1
return



*madamumbrella_a5

add %stack,1
>Luka is bound by Madame Umbrella...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Let me hear that vulgar voice of yours...":mov $sel2,"Her tentacles tighten around Luka's penis!"
if %ransu=2 mov $sel1,"If it feels good, just come...":mov $sel2,"Her tentacles stroke Luka's penis!"
if %ransu=3 mov $sel1,"Here, I'll stroke you all over...":mov $sel2,"Her tentacles massage Luka all over his body!"
if %ransu=4 mov $sel1,"How do my suckers feel?":mov $sel2,"Suckers on her tentacles latch onto Luka's penis!"
if %ransu=5 mov $sel1,"This is how I milk out men's semen...":mov $sel2,"Multiple tentacles coil around Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Lady's Amusement"
dwave 1,"se\ero_makituki3.ogg"
eng $sel2:$sel6
skillcount2 3482
if %nanido<2 damage 120,140
if %nanido=2 damage 120,140
if %nanido=3 damage 135,155
skillname ""
if %mylife=0 sub %stack,1:return *madamumbrella_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*madamumbrella_onedari

mov $list1,"Tentacle Play"
if %3479>0 mov %list_num1,1
mov $list2,"Sucker Play"
if %3480>0 mov %list_num2,1
mov $list3,"Sensual Anal Spin"
if %3481>0 mov %list_num3,1
mov $list4,"Lady's Amusement"
if %3482>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *madamumbrella_onedari1
if %cmd1=12 goto *madamumbrella_onedari2
if %cmd1=13 goto *madamumbrella_onedari3
if %cmd1=14 goto *madamumbrella_onedari4
if %cmd1=-1 goto *madamumbrella_main
goto *madamumbrella_onedari



*madamumbrella_onedari1

gosub *onedari_syori
name $name
>You want to enjoy my tentacles?\
name ""
gosub *madamumbrella_a1
skip -1



*madamumbrella_onedari2

gosub *onedari_syori
name $name
>You want to enjoy my suckers?\
name ""
gosub *madamumbrella_a2
skip -1



*madamumbrella_onedari3

gosub *onedari_syori
name $name
>You want to feel me in your ass?\
name ""
gosub *madamumbrella_a3
skip -1



*madamumbrella_onedari4

gosub *onedari_syori_k
name $name
>You'll let me do whatever I want?\
name ""
if %kousoku=0 gosub *madamumbrella_a4
gosub *madamumbrella_a5
skip -1



*madamumbrella_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\madamumbrella_bk03.bmp",0,0
gosub *syasei2
>As her tentacle strokes Luka's penis, he comes, covering it with semen.\
mov %viclose,1:gosub *lose
mov %2607,%2607+1:if %2607=1 mov %count_koenemy,%count_koenemy+1
if %2607>%count_most mov %count_most,%2607:mov $count_mostname,$name
count 10,6
mov $bad1,"Luka was forced to an orgasm as Madame Umbrella's tentacle stroked him."
gosub *face2
name $name
>Ah, your semen...@
>Hehe... I milked it out with my tentacle.\
name ""
goto *madamumbrella_h



*madamumbrella_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\madamumbrella_bk03.bmp",0,0
gosub *syasei2
>As the suckers latch onto Luka's penis and suck on him, he comes, covering her tentacle with semen.\
mov %viclose,1:gosub *lose
mov %2607,%2607+1:if %2607=1 mov %count_koenemy,%count_koenemy+1
if %2607>%count_most mov %count_most,%2607:mov $count_mostname,$name
count 10,6
mov $bad1,"Lucked as forced to an orgasm as Madame Umbrella's suckers sucked on him."
gosub *face2
name $name
>Ah, your semen...@
>Hehe... I sucked it out with my suckers.\
name ""
goto *madamumbrella_h



*madamumbrella_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\madamumbrella_bk03.bmp",0,0
gosub *syasei2
>As her tentacle spins inside his ass, Luka comes, spraying semen all over her.\
mov %viclose,1:gosub *lose
mov %2607,%2607+1:if %2607=1 mov %count_koenemy,%count_koenemy+1
if %2607>%count_most mov %count_most,%2607:mov $count_mostname,$name
count 9,6
mov $bad1,"Luka was forced to an orgasm as Madame Umbrella's tentacle violated his ass."
gosub *face2
name $name
>How humiliating, to come from having your ass violated...\
name ""
goto *madamumbrella_h



*madamumbrella_h4

mov %ikigoe,3:gosub *ikigoe
name $name
>Oh dear, already?\
name ""
gosub *syasei1
lsp 700,":a;chara\madamumbrella_h02.bmp",0,0
gosub *syasei2
>As soon as her tentacles coil around his body, Luka comes, spraying semen all over her.\
mov %viclose,1:gosub *lose
mov %2607,%2607+1:if %2607=1 mov %count_koenemy,%count_koenemy+1
if %2607>%count_most mov %count_most,%2607:mov $count_mostname,$name
count 10,6
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to an orgasm just from beind bound by Madame Umbrella."
gosub *face2
name $name
>Oh, how pitiful...@
>I didn't even do anything, and you already came...\
name ""
goto *madamumbrella_h



*madamumbrella_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\madamumbrella_h02.bmp",0,0
gosub *syasei2
>As her tentacles run all over Luka's body, caressing and playing with him, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2607,%2607+1:if %2607=1 mov %count_koenemy,%count_koenemy+1
if %2607>%count_most mov %count_most,%2607:mov $count_mostname,$name
count 10,6
mov $bad1,"Luka was forced to an orgasm as Madame Umbrella played with him with her tentacles."
gosub *face2
name $name
>Hehe, your semen...@>And so much of it, too.\
>But I want to play with you even more...\
name ""
goto *madamumbrella_h



*madamumbrella_h

mov $bad2,"Madame Umbrella played with Luka with her tentacles until he was squeezed to death."
if %2607=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 goto *madamumbrella_hb
name "Luka"
>Ahh...\
name ""
>Forced to come, I'm unable to resist against her any longer.@
>Quickly taking her chance, Madame Umbrella's tentacles coil around my weak body.\
dwave 1,"se\ero_makituki3.ogg"
goto *madamumbrella_hb



*madamumbrella_hb

cspl 690,699
lsp 700,":a;chara\madamumbrella_h05.bmp",0,0:print 10,500
>Her tentacles coil around my right and left legs.@
>Pulling them apart in a humiliating posture, I'm left unable to close my legs.\
name $name
>Hehehe, what a pathetic position you're in.@
>You know what's going to happen now, don't you?\
>I'm going to disgrace you with my tentacles...@
>Forced to come over and over, all while tasting the humiliation of your helplessness.\
name ""
name "Luka"
>S...Stop... Ahh...\
name ""
mov %hseanwave,17:hseanwave
>Two tentacles squirm around my body until they reach my nipples, where she uses the tips of her tentacles to play with my nipples.\
>Flicking them side to side, sometimes rubbing them... Her slimy tentacles just play with me.\
name "Luka"
>Ahh...\
name ""
>Reacting to the stimulation, I feel them get slightly hard, like they do when I'm cold.@
>Noticing, she latches a sucker onto each of them.\
name $name
>Hehe, your nipples are just like a girl's.@
>Do you like the feeling of my tentacles on you that much?\
name ""
>She giggles as her tentacles continue to play with my nipples.@
>The tickling sensation makes me squirm and shake, trying to escape from the sensation.\
>Before I had noticed, my penis was hard again after my last orgasm.\
name $name
>Hehe... Your penis got big again.@
>Do you like having your nipples played with that much?\
name ""
>Madame Umbrella teases me with a sneer on her face.@
>I gasp as the tickling sensation becomes almost unbearable.\
>Giggling as she watches my reactions, she's clearly enjoying this.\
name $name
>Hehe, do you want to feel my tentacles coil around your penis?@
>From the base all the way to the tip... Tightening, coiling, stroking...?\
name ""
name "Luka"
>N...No... Not that...\
name ""
>Contrary to my words, my penis is twitching in the air, as if it's excited at the prospect of being played with.\
name $name
>I might have believed you if it wasn't so big already...@
>Well then...\
name ""
lsp 700,":a;chara\madamumbrella_h06.bmp",0,0:print 10,500
name "Luka"
>Ah...!\
name ""
>Suddenly, one of her tentacles slips into my ass!\
>I feel her slimy tentacle force itself into me, easily slipping inside.@
>First it was my nipples, now she's violating me like this...\
name "Luka"
>Haaa...!!\
name ""
name $name
>Hehe, how pitiful...@
>Even having your ass violated by my tentacles...\
name ""
>Her tentacle moves around inside of me, slowly squirming and wriggling around inside of me.\
name "Luka"
>S...Stop..!@>Ahh!\
name ""
name $name
>Hehe... Why are you moaning like that at having your ass violated?@
>Enjoying yourself just like a girl... What a pitiful excuse for a man.\
name ""
name "Luka"
>Ahh... Nnngg!\
name ""
lsp 700,":a;chara\madamumbrella_h07.bmp",0,0:print 10,500
>As my mouth is open in a yell, she forces another tentacle into my mouth.\
>She's violating me from every direction...@
>But the only thing left untouched is my penis, still expectantly twitching in the air.\
name $name
>...It looks like you're almost about to come.@
>Are you really going to do it? Have an orgasm without even having your penis touched...?\
>Just from being played with as if you were a girl...?\
name ""
name "Luka"
>Nnnnn!!\
name ""
>The tentacle in my ass starts to move in and out of me in a piston movement.@
>Each time it goes deep inside, I feel it stimulate my prostate, causing me to push my waist up in reaction.\
>Unable to take it any longer, I feel an orgasm rising through me as she stimulates my prostate again.\
name "Luka"
>Nnnnn!!\
name ""
gosub *syasei1
lsp 700,":a;chara\madamumbrella_h08.bmp",0,0
gosub *syasei2
>Semen starts to come shooting out of my penis, going right into the air.\
>My face goes red with humiliation as I'm forced to an orgasm just from having my ass violated.\
name $name
>Hehe, how pitiful...@
>To think you really would come just from that.\
name ""
name "Luka"
>Nnn...\
name ""
>The tentacle inside me continues to squirm and wriggle around.@
>It doesn't look like she has any intention of stopping...\
name $name
>As your reward, I'll play with your penis this time...@
>I'll enjoy watching another unsightly orgasm from you.\
name ""
name "Luka"
>Nnnn!!\
name ""
lsp 700,":a;chara\madamumbrella_h09.bmp",0,0:print 10,500
>One of her tentacles finally coils itself around my penis.\
>Her slimy tentacle wraps around my member, gently wrapping its squishy flesh around my own.@
>I watch it slowly wrap around me until it's completely captured.\
name $name
>Hehe, this is what you wanted, wasn't it?@
>Having my tentacle wrapped around you?\
name ""
>With each syllable, she tightens and relaxes her grip on my penis.@
>The pulsing stimulation feels so good, I catch myself feeling disappointed as she stops talking.\
name "Luka"
>N...Nnn...!\
name ""
>A few moments after she stops talking, the tentacle in my ass starts to squirm around again.@
>My mouth, my nipples, my ass, my penis... Every part of me is being violated by her.\
>Unable to take being attacked from every direction like this, I feel another orgasm already about to come out.\
name "Luka"
>Nnnn..!!\
name ""
name $name
>My, my, already at your limit again?@
>You love these tentacles of mine so much, don't you...?\
name ""
>She starts to squeeze my penis with her tentacles again with a triumphant look on her face.@
>As her pace increases, it feels like she's trying to finish me off.\
>At the same time, the tentacle in my ass starts to stimulate my prostate again.@
>Drowning in her tentacles, I give myself over to the feeling.\
gosub *syasei1
lsp 700,":a;chara\madamumbrella_h10.bmp",0,0
gosub *syasei2
>I explode, shooting semen onto the tentacle coiled around my penis.\
name $name
>Hehe, you came.@
>Allow me to help you get it all out...\
name ""
>The tentacle around my penis tightens at the base, and starts to move up toward the tip.@
>Like that, it continues going down and up in a milking motion, forcing every drop of semen still in my urethra out.\
name "Luka"
>Nnn...\
name ""
>I sigh and relax as her milking motion continues.@
>But there's no time to relax yet...\
name $name
>Do you think it's over...?@
>There's still a lot more I need to squeeze from you.\
name ""
name "Luka"
>Nnn!@> Nnnnn!!\
name ""
>The milking motion only increases in intensity.@
>Helplessly milked by her tentacles, I can't even beg her to stop since she has another tentacle in my mouth.\
name $name
>Hehe, there's no time to rest...@
>Come on, I feel it twitching again!\
name ""
name "Luka"
>Nnnnn!!\
name ""
gosub *syasei1
lsp 700,":a;chara\madamumbrella_h11.bmp",0,0
gosub *syasei2
>The semen squeezed out by her shoots into the air, coming back down and landing on her tentacle.@
>Despair fills me as my entire body is played with by her tentacles, my body nothing more than a toy for her.\
name $name
>Hehe, I want to play even more...@
>Your penis is just my personal toy...\
name ""
>Giggling, Madame Umbrella continues to play with me.@
>No matter how many times I ejaculate, it's never enough for her...\
gosub *anten
mov %hseanwave,0:hseanwave
>After that, she continues to play with me as a toy.@
>She uses her tentacles on me however she wants, forcing me to orgasm after orgasm.\
>Sometimes violating me like a woman, other times raping me like a man...@
>Too weak to resist, I can't do anything but accept whatever she wants to do to me.\
>Thus, my life ends as Madame Umbrella just forces me to come over and over again.\
>............\
goto *badend



*maidscyulla_start

mov $name,"Scylla Maid"
mov $name2,"Scylla Maid"
mov $lavel,"maidscyulla"
mov $tatie1,"maidscyulla_st01"
mov $tatie2,"maidscyulla_st02"
mov $tatie3,"maidscyulla_st03"
mov $tatie4,"maidscyulla_h01"
mov $haikei,"bg112"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,4000
if %nanido=2 mov %max_enemylife,4500
if %nanido=3 mov %max_enemylife,6000
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %music,1
mov %tikei,5
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free from her tentacles!"
mov $mogaku_anno2,"Luka broke away!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Regretfully, I cannot let you go."
mov $mogaku_sel2,"Please surrender and accept my servicing."
mov $mogaku_sel3,"Forgive me, but I cannot release you."
mov $mogaku_sel4,"Please Sir, do not struggle like that."
mov $mogaku_sel5,"Give up and accept my servicing, sir."
mov $mogaku_dassyutu1,"You escaped."
mov $mogaku_dassyutu2,"But you won't be free for long..."
mov $mogaku_earth_dassyutu1,"What strange physical strength..."
mov $mogaku_earth_dassyutu2,"That is something more than a human should possess..."
mov $half_s1,"Is my service acceptable?"
mov $half_s2,"If I may suggest, ceasing your struggling would make it better."
mov $kiki_s1,"It appears as though you're at your limit, sir."
mov $kiki_s2,"Well then, allow me to service you to the end."
mov %end_n,7
mov %exp_minus,30000
mov %zmonster_x,-260
mov %tukix,320
mov %owaza_count1a,6
name "Luka"
>Are you another one attacking people!?@
>If so, sorry but I'll have...\
name ""
name "Ran"
>I only follow orders from my master.@
>Such as disposing of men that are not to Mistress Cassandra's liking.\
>I wrap my tentacles around their bodies, weaken them, then swallow them whole...@
>I'll be disposing of you in the same way, sir.\
name ""
name "Luka"
>I won't let you do that ever again!\
name ""
>I draw my sword, ready to fight!\
goto *common_main



*maidscyulla_v

gosub *face3
name $name
>Forgive me, Mistress Cassandra...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Scylla Maid turns into a small octopus!\
mov %viclose,1:gosub *victory
mov %getexp,20000:gosub *lvup
mov %2308,1
goto *sean0232



*maidscyulla_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>So you have resigned yourself?@
>Very well, I shall begin my service now, sir.\
name ""
goto *maidscyulla_a



*maidscyulla_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *maidscyulla_kousan
if %cmd1=16 goto *maidscyulla_onedari
if %cmd1=17 goto *common_skill
goto *maidscyulla_main



*maidscyulla_a

if %kousoku=2 gosub *maidscyulla_a7:goto *common_main
if %kousoku=3 gosub *maidscyulla_a9:goto *common_main
rnd2 %ransu,1,8
if %kousoku=1 && %ransu<3 gosub *maidscyulla_a5:goto *common_main
if %kousoku=1 && %ransu<5 gosub *maidscyulla_a6:goto *common_main
if %kousoku=1 && %ransu=5 gosub *maidscyulla_a8:goto *common_main
if %ransu=1 gosub *maidscyulla_a1:goto *common_main
if %ransu=2 gosub *maidscyulla_a2:goto *common_main
if %ransu=3 gosub *maidscyulla_a3:goto *common_main
if %ransu>3 && %owaza_count1a>7 gosub *maidscyulla_a4:goto *common_main
skip -8



*maidscyulla_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Well then, I shall service you with my hand."
if %ransu=2 mov $sel1,"You seem to be in pain, allow me to relieve that pressure with my hand."
if %ransu=3 mov $sel1,"Would you like me to use my hand, sir?"
name $name
eng $sel1:$sel6\
name ""
skillname "Service: Hand"
dwave 1,"se\ero_koki1.ogg"
>Scylla Maid skillfully strokes Luka's penis!
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3483
if %nanido<2 damage 85,95
if %nanido=2 damage 100,110
if %nanido=3 damage 115,125
skillname ""
if %mylife=0 sub %stack,1:return *maidscyulla_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*maidscyulla_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Well then, I shall service you with my mouth."
if %ransu=2 mov $sel1,"Please feel free to shoot it in my mouth."
if %ransu=3 mov $sel1,"Enjoy my mouth as much as you want, sir."
name $name
eng $sel1:$sel6\
name ""
skillname "Service: Mouth"
dwave 1,"se\ero_buchu2.ogg"
>Scylla Maid sucks Luka's penis into her mouth and gently sucks on him!
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3484
if %nanido<2 damage 90,100
if %nanido=2 damage 105,115
if %nanido=3 damage 120,130
skillname ""
if %mylife=0 sub %stack,1:return *maidscyulla_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*maidscyulla_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I shall serve you with this tentacle... Nice and gentle."
if %ransu=2 mov $sel1,"I'll coil my tentacle around your penis..."
if %ransu=3 mov $sel1,"This type of service is oft requested."
name $name
eng $sel1:$sel6\
name ""
skillname "Service: Tentacle"
dwave 1,"se\ero_slime1.ogg"
>Scylla Maid coils a tentacle around Luka's penis, and gently squeezes it!
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3485
if %nanido<2 damage 95,105
if %nanido=2 damage 110,120
if %nanido=3 damage 125,135
skillname ""
if %mylife=0 sub %stack,1:return *maidscyulla_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*maidscyulla_a4

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name $name
>Well then, please entrust your body to me, sir.\
name ""
skillname "Coiling"
dwave 1,"se\ero_makituki3.ogg"
>One of Scylla Maid's tentacles coils around Luka's body!
if %nanido<2 damage 95,105
if %nanido=2 damage 95,105
if %nanido=3 damage 120,120
rnd2 %ransu,1,3
mov %kousoku,1:gosub *status_print
>Luka's bound in Scylla Maid's tentacle!\
skillname ""
if %mylife=0 sub %stack,1:return *maidscyulla_h4
if %kousan=2 sub %stack,1:return
if %first_sel1=1 skip 3
name "Luka"
>Ahh...!\
gosub *face2
name $name
>Which kind of service would you like?@
>Make it tighter?@> Perhaps a little sucking?@> Or... Would you just like to be swallowed whole?\
name ""
if %earth=0 && %nanido<2 mov %genmogaku,100
if %earth=0 && %nanido=2 mov %genmogaku,100
if %earth=0 && %nanido=3 mov %genmogaku,100
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,1
sub %stack,1
return



*maidscyulla_a5

add %stack,1
>Luka's bound by Scylla Maid's tentacles...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Some men prefer this kind of service..."
if %ransu=2 mov $sel1,"Many other guests were overjoyed with this service."
if %ransu=3 mov $sel1,"I can slowly make it even tighter..."
name $name
eng $sel1:$sel6\
name ""
skillname "Service: Holding"
dwave 1,"se\ero_simetuke1.ogg"
>Her tentacles tighten around Luka's body!
skillcount2 3486
if %nanido<2 damage 95,105
if %nanido=2 damage 95,105
if %nanido=3 damage 120,120
skillname ""
if %mylife=0 sub %stack,1:return *maidscyulla_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*maidscyulla_a6

add %stack,1
>Luka's bound by Scylla Maid's tentacles...\
name $name
>Well then, I shall begin sucking straight from your penis...\
name ""
skillname "Service: Sucking"
dwave 1,"se\ero_kyuin1.ogg"
mov %kousoku,2
lsp 700,":a;chara\maidscyulla_h04.bmp",0,0
lsp 690,":a;chara\maidscyulla_ct11.bmp",0,0:print 10,500
>Scylla Maid forces Luka's penis into her lower mouth!\
>Tiny little feelers run all over Luka's penis!
skillcount2 3487
if %nanido<2 damage 100,110
if %nanido=2 damage 100,110
if %nanido=3 damage 115,125
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *maidscyulla_h6
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*maidscyulla_a7

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I shall squeeze out your semen, sir."
if %ransu=2 mov $sel1,"Please enjoy my sucking service."
if %ransu=3 mov $sel1,"Well? Do you enjoy this type of service?"
name $name
eng $sel1:$sel6\
name ""
skillname "Service: Sucking"
dwave 1,"se\ero_kyuin1.ogg"
>The tiny tentacles squirm around Luka's penis as her lower mouth sucks on him!
skillcount2 3487
if %nanido<2 damage 100,110
if %nanido=2 damage 100,110
if %nanido=3 damage 115,125
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *maidscyulla_h7
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*maidscyulla_a8

add %stack,1
>Luka's bound by Scylla Maid's tentacles...\
name $name
>Very well, I shall feast on you now, sir.\
name ""
skillname "Service: Feeding"
dwave 1,"se\ero_makituki2.ogg"
mov %kousoku,3
lsp 700,":a;chara\maidscyulla_h04.bmp",0,0:print 10,500
>Luka is slowly being dragged toward Scylla Maid's gaping lower mouth!@
>The wet mouth opens wide, ready to swallow Luka's body!\
skillname ""
name "Luka"
>Ahhh!\
name ""
name $name
>I shall swallow you whole now, sir.\
>Please don't struggle, for it will feel amazing to be digested by me.@
>Your body and fear will both melt away quickly...\
name ""
sub %stack,1
return



*maidscyulla_a9

add %stack,1
>Luka's bound by Scylla Maid's tentacles...\
name $name
>Now then, it's dinnertime.\
name ""
skillname "Service: Feeding"
skillcount2 3488
dwave 1,"se\ero_makituki2.ogg"
>Scylla Maid's tentacle forces Luka into her gaping mouth!\
name "Luka"
>Ahhhh!\
name ""
lsp 700,":a;chara\maidscyulla_h08.bmp",0,0
lsp 560,":a;system\gager0.bmp",114,556
print 10,500
>Luka's been sucked into Scylla Maid's mouth!\
skillname ""
mov %viclose,2:gosub *lose
mov %2608,%2608+1:if %2608=1 mov %count_koenemy,%count_koenemy+1
if %2608>%count_most mov %count_most,%2608:mov $count_mostname,$name
count 0,11
mov $bad1,"Scylla Maid swallowed Luka whole."
mov $bad2,""
sub %stack,1
return *maidscyulla_ax



*maidscyulla_ax

if %2608=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %hseanwave,22:hseanwave
goto *maidscyulla_hd



*maidscyulla_onedari

mov $list1,"Service: Hand"
if %3483>0 mov %list_num1,1
mov $list2,"Service: Mouth"
if %3484>0 mov %list_num2,1
mov $list3,"Service: Tentacle"
if %3485>0 mov %list_num3,1
mov $list4,"Service: Holding"
if %3486>0 mov %list_num4,1
mov $list5,"Service: Sucking"
if %3487>0 mov %list_num5,1
mov $list6,"Service: Feeding"
if %3488>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *maidscyulla_onedari1
if %cmd1=12 goto *maidscyulla_onedari2
if %cmd1=13 goto *maidscyulla_onedari3
if %cmd1=14 goto *maidscyulla_onedari4
if %cmd1=15 goto *maidscyulla_onedari5
if %cmd1=16 goto *maidscyulla_onedari6
if %cmd1=-1 goto *maidscyulla_main
goto *maidscyulla_onedari



*maidscyulla_onedari1

gosub *onedari_syori
name $name
>You wish for me to service you with my hand?@
>Well then...\
name ""
gosub *maidscyulla_a1
skip -1



*maidscyulla_onedari2

gosub *onedari_syori
name $name
>You wish for me to service you with my mouth?@
>Well then...\
name ""
gosub *maidscyulla_a2
skip -1



*maidscyulla_onedari3

gosub *onedari_syori
name $name
>You wish for me to service you with my tentacles?@
>Well then...\
name ""
gosub *maidscyulla_a3
skip -1



*maidscyulla_onedari4

gosub *onedari_syori_k
name $name
>You wish for me to service you with my tentacles?@
>Well then...\
name ""
if %kousoku=0 gosub *maidscyulla_a4
gosub *maidscyulla_a5
skip -1



*maidscyulla_onedari5

gosub *onedari_syori_k
name $name
>You wish for me to suck on you with my other mouth?@
>Well then...\
name ""
if %kousoku=0 gosub *maidscyulla_a4
notif %kousoku=2 gosub *maidscyulla_a6
gosub *maidscyulla_a7
skip -1



*maidscyulla_onedari6

gosub *onedari_syori_k
name $name
>So you wish to be eaten, do you?@> Hehe...\
name ""
if %kousoku=0 gosub *maidscyulla_a4
notif %kousoku=3 gosub *maidscyulla_a8
gosub *maidscyulla_a9
skip -1



*maidscyulla_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\maidscyulla_bk03.bmp",0,0
gosub *syasei2
>As her hand caresses Luka's penis, he comes, covering it with semen.\
mov %viclose,1:gosub *lose
mov %2608,%2608+1:if %2608=1 mov %count_koenemy,%count_koenemy+1
if %2608>%count_most mov %count_most,%2608:mov $count_mostname,$name
count 5,11
mov $bad1,"Luka was forced to an orgasm as Scylla Maid strokes him with her hand."
gosub *face2
name $name
>So much semen... Did you enjoy my service, sir?\
name ""
goto *maidscyulla_h



*maidscyulla_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\maidscyulla_bk01.bmp",0,0
gosub *syasei2
>As she gently sucks on Luka, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2608,%2608+1:if %2608=1 mov %count_koenemy,%count_koenemy+1
if %2608>%count_most mov %count_most,%2608:mov $count_mostname,$name
count 4,11
mov $bad1,"Luka was forced to an orgasm as Scylla Maid sucked on him."
gosub *face2
name $name
>Nnn... What a great amount.@
>Did you enjoy my service, sir?\
name ""
goto *maidscyulla_h



*maidscyulla_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\maidscyulla_bk05.bmp",0,0
gosub *syasei2
>As her squishy tentacle coils around his penis, Luka comes, covering it with semen.\
mov %viclose,1:gosub *lose
mov %2608,%2608+1:if %2608=1 mov %count_koenemy,%count_koenemy+1
if %2608>%count_most mov %count_most,%2608:mov $count_mostname,$name
count 10,11
mov $bad1,"Luka was forced to an orgasm as Scylla Maid's tentacle coiled around his penis."
gosub *face2
name $name
>So much semen... Did you enjoy my service, sir?\
name ""
goto *maidscyulla_h



*maidscyulla_h4

mov %ikigoe,3:gosub *ikigoe
name $name
>Oh...?\
name ""
gosub *syasei1
lsp 700,":a;chara\maidscyulla_h02.bmp",0,0
gosub *syasei2
>As soon as her tentacles coil around his body, Luka comes, spraying semen all over her.\
mov %viclose,1:gosub *lose
mov %2608,%2608+1:if %2608=1 mov %count_koenemy,%count_koenemy+1
if %2608>%count_most mov %count_most,%2608:mov $count_mostname,$name
count 10,11
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to an orgasm just from being wrapped by Scylla Maid's tentacles."
gosub *face2
name $name
>That made you orgasm, sir?@
>Please excuse me... I... I did not intend to finish my service with that technique.\
name ""
goto *maidscyulla_h



*maidscyulla_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\maidscyulla_h02.bmp",0,0
gosub *syasei2
>As her tentacles tighten around his body, Luka comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2608,%2608+1:if %2608=1 mov %count_koenemy,%count_koenemy+1
if %2608>%count_most mov %count_most,%2608:mov $count_mostname,$name
count 16,11
mov $bad1,"Luka was forced to an orgasm as Scylla Maid's tentacles tightened around his body."
gosub *face2
name $name
>Having an orgasm just from being tightened...@
>You're a strange one, aren't you? Hehe.\
name ""
goto *maidscyulla_h



*maidscyulla_h6

mov %ikigoe,3:gosub *ikigoe
name $name
>Oh my, are you already satisfied?\
name ""
gosub *syasei1
lsp 700,":a;chara\maidscyulla_h05.bmp",0,0
lsp 690,":a;chara\maidscyulla_ct12.bmp",0,0
gosub *syasei2
>The moment Luka's sucked into her lower mouth, he comes, filling it with his semen.\
mov %viclose,1:gosub *lose
mov %2608,%2608+1:if %2608=1 mov %count_koenemy,%count_koenemy+1
if %2608>%count_most mov %count_most,%2608:mov $count_mostname,$name
count 2,11
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to an orgasm as soon as Scylla Maid sucked him into her lower mouth."
gosub *face2
name $name
>So just that was enough to satisfy you?@
>You must forgive me. I was... I was not expecting you to come that quickly.\
name ""
csp 690:print 10,500
mov $bad2,"After being played with by her tentacles, Scylla Maid swallows Luka whole."
if %2608=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
goto *maidscyulla_hc



*maidscyulla_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\maidscyulla_h05.bmp",0,0
lsp 690,":a;chara\maidscyulla_ct12.bmp",0,0
gosub *syasei2
>As she sucks on Luka's body in her mouth, he comes, filling it with semen.\
mov %viclose,1:gosub *lose
mov %2608,%2608+1:if %2608=1 mov %count_koenemy,%count_koenemy+1
if %2608>%count_most mov %count_most,%2608:mov $count_mostname,$name
count 2,11
mov $bad1,"Luka was forced to an orgasm as Scylla Maid's lower mouth sucked on him."
gosub *face2
name $name
>Forgive me, I seem to have sucked out far more semen than I intended.@
>Was it acceptable, sir?\
name ""
csp 690:print 10,500
mov $bad2,"After being played with by her tentacles, Luka was swallowed whole."
if %2608=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
goto *maidscyulla_hc



*maidscyulla_h

mov $bad2,"After being played with by her tentacles, Luka was swallowed whole."
if %2608=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 goto *maidscyulla_hb
name "Luka"
>Ahh...\
name ""
name $name
>Hehe, it seems as though you have been left unable to speak.@
>Very well, allow me to move to the next step in my servicing...\
name ""
dwave 1,"se\ero_makituki3.ogg"
cspl 690,699
lsp 700,":a;chara\maidscyulla_h01.bmp",0,0:print 10,500
>One of her large tentacles wraps around me, and holds me in the air.@
>Her squishy tentacle tightens around me, increasing the pressure.\
goto *maidscyulla_hb



*maidscyulla_hb

name "Luka"
>Ahg... Uhh...\
name ""
>I let out a grunt of pain as her tentacles tighten around my body, squeezing me so hard I can barely breathe.\
name $name
>Hehe... Is it painful?@
>More... Let me hear that moan of agony more!\
name ""
dwave 1,"se\ero_simetuke1.ogg"
lsp 700,":a;chara\maidscyulla_h02.bmp",0,0:print 10,500
name "Luka"
>Ahhh!!\
name ""
>Her octopus like tentacles coil even tighter around me, covering more of my body.\
>The pain gets even worse as she just toys with me and laughs.\
name $name
>Hehe... What an unbecoming scream, sir.@
>Is it really that painful? Hehe.\
name ""
dwave 1,"se\ero_simetuke1.ogg"
>She squeezes even harder, enjoying watching me suffering.@
>Each time I lose concentration and loosen my muscles, she takes the chance to constrict even tighter around me.\
name $name
>It would be quite easy for me to squish your body.@
>If I just put a little more power into it, you would be finished in moments...\
name ""
name "Luka"
>Stop..!@>Ahh!\
name ""
dwave 1,"se\ero_simetuke1.ogg"
>The pressure gets even more intense, as I shake in fear from her words.@
>At any moment, she could drastically squeeze me harder and crush me...\
>At the same time, one of her tentacles coincidentally rubs against my groin, rubbing and pushing into my penis.\
name "Luka"
>Ahh...\
name ""
name $name
>My, my...@>Why has your penis gotten all hard like this?\
name ""
>Noticing my erection, she uses the tentacle that was brushing against my penis to skillfully stroke me until I'm completely hard.\
>As soon as I'm fully erect, she bursts into laughter.\
name $name
>Hahaha, you got this excited while being tortured like this?@
>Well then, how about I coil around your penis just as I'm doing to your body?\
name ""
dwave 1,"se\ero_makituki2.ogg"
>Her squishy tentacle slowly coils around my penis, wrapping it from base to tip.@
>As soon as it's all the way around me, she starts squeezing me with increasing force.\
name "Luka"
>Ah...!@> Ahh!\
name ""
>I shake in pain and pleasure as she tortures my body and caresses my penis, the drastically differing sensations confusing my brain.\
name "Luka"
>S...Stop... Ahhh!\
name ""
name $name
>Hehe... How does it feel?@
>Would you like me to tighten it a little more...?\
name ""
dwave 1,"se\ero_simetuke1.ogg"
>Her squishy tentacle tightens even more around my penis, mixing the pain and pleasure even further.\
>At the same time, the tentacles around my body get even tighter.@
>All the while, the maid laughs as she plays with me, her prey.\
name "Luka"
>Ahhh...\
name ""
>Mixing with the pain, the tingling of an orgasm fills my body.@
>With a loud sigh, my body shivers as my waist goes numb.\
gosub *syasei1
lsp 700,":a;chara\maidscyulla_h03.bmp",0,0
gosub *syasei2
>Spurting out, my semen shoots out as I gasp in her tight tentacles.\
name "Luka"
>Ah...ahh...\
name ""
>My semen leaks out of my penis as her tentacles continue to torture me, making my face go red in humiliation.\
name $name
>...Hehe, you appear to have leaked, sir.@
>But don't worry about that.\
>There have been a few other men who act like you do as they fear for their life, after all.\
name ""
name "Luka"
>Urhgg...\
name ""
>Horrified, I let my body relax as I start to lose hope of ever escaping from her torture.\
>The maid's already cold face takes on an even more sadistic smile as she watches me.\
goto *maidscyulla_hc



*maidscyulla_hc

name $name
>Well then, I believe it's time to feed, sir.@
>I shall enjoy feasting on your flesh and blood in addition to the semen.\
name ""
name "Luka"
>Y...You can't... No...!\
name ""
mov %hseanwave,21:hseanwave
lsp 700,":a;chara\maidscyulla_h06.bmp",0,0:print 10,500
>Ignoring my pleas, she pulls me down and into her lower mouth.@
>Uselessly struggling against her powerful tentacles, ones from inside of her latch onto me and pull me inside her body.\
if %hosyoku_cut=1 goto *hosyoku_cut
name "Luka"
>Stop... Ahhh!\
name ""
>Inside her slimy mouth, tentacles latch onto my body and force my legs apart.@
>Taking advantage of my exposed posture, more wrap around my penis.\
name "Luka"
>Help me... Help...!\
name ""
name $name
>Hehe... Nobody will listen to your pleas any longer.@
>Isn't that a shame? Haha.\
>Sir, there is no saving you any longer.@
>The only path left to you is to be eaten by me.\
name ""
name "Luka"
>Hyaaa!\
name ""
>Stuck inside her mouth, I'm forced to look up into her cold eyes as she sadistically smiles at me.\
>As the toothless mouth slowly chews on my body, warm liquid sprays out and covers me.\
name $name
>How does it feel being eaten alive?@
>Please, let me hear those delicious screams again.\
name ""
name "Luka"
>Hyaaa!\
name ""
>The tentacles in her mouth pull on me again, drawing me further inside.@
mov %hseanwave,22:hseanwave
lsp 700,":a;chara\maidscyulla_h08.bmp",0,0:print 10,500
>After only a few moments, I've been sucked inside all the way to my shoulders.\
goto *maidscyulla_hd



*maidscyulla_hd

name $name
>Hehe... What a delicious looking body.@
>It will feel pleasant for you, so please offer yourself to me willingly.\
name ""
name "Luka"
>N...No...\
name ""
lsp 700,":a;chara\maidscyulla_h09.bmp",0,0:print 10,500
>Her tentacles grip my body and pull me deeper into her horrifying mouth.@
>Leaving only my head, I'm being pulled inside her body.\
lsp 690,":a;chara\maidscyulla_ct01.bmp",0,0:print 10,500
>Stuck inside the mouth that's eating me, tentacles squirm all over my body, stimulating every inch of my body.\
>As they run over my penis, it reacts, getting hard again inside of her mouth.\
name "Luka"
>Ah...Ahh...\
name ""
name $name
>Oh dear... Even though you're being eaten, your genitals have grown so big.\
>You must forgive me since I only use this hole for feeding.@
>But shall I give you some extra service? Hehe.\
name ""
lsp 690,":a;chara\maidscyulla_ct02.bmp",0,0:print 10,500
name "Luka"
>Ahhh...!\
name ""
>As the stimulation used for digestion fills my body with pleasure, I feebly shake in horror at what's happening.\
>As her digestive juices flow over my body, her soft toothless mouth chews on my penis.@
>The thought that this actually feels good is too horrifying to take.\
name "Luka"
>No... Not this...@
>Ahh!\
name ""
>As the digestion motions continue, I feel my waist go numb.@
>Biting back the tears, I shake in humiliation as I give in to the orgasm.\
gosub *syasei1
lsp 690,":a;chara\maidscyulla_ct03.bmp",0,0
gosub *syasei2
>I miserably come inside her mouth as she swallows me whole.\
name $name
>Oh dear, you seem to have had an orgasm while being eaten.@
>That is behavior most unfit for a gentleman.\
name ""
>She giggles as she continues to prey on me.@
>Writhing around helplessly, I yell out for help.\
name "Luka"
>S...Stop this!@> Help me!\
name ""
name $name
>Hehe... The taste of live prey is the best.@
>Please, you should enjoy this as well.\
name ""
name "Luka"
>Ahhh...\
name ""
gosub *syasei1:gosub *syasei2
>Another orgasm brought on by the digestive motions shoots out of me as she giggles.\
name "Luka"
>Ahh... Help... Help...\
name ""
name $name
>Hehe... Goodbye, sir.\
name ""
>After those cold final words...@
lsp 700,":a;chara\maidscyulla_h10.bmp",0,0:print 10,500
>She sucks me all the way into her mouth.\
name "Luka"
>Ahhhh!!\
name ""
>My vision goes dark as I'm pulled into her stomach and covered in digestive juices.\
name "Luka"
>N...No... Stop... No...\
name ""
>There's no way out, I'm just simple food now...@
>There's nothing left but to be digested...\
name "Luka"
>Ahhh... That feels good...\
name ""
gosub *syasei1:gosub *syasei2
>I come inside of her again, brought on by the soothing motions of her stomach.@
>My semen shoots inside of her, serving no purpose but to act as more nourishment.\
>Stuck inside of her stomach, I can't do anything but pathetically ejaculate as she digests me alive.\
gosub *anten
mov %hseanwave,0:hseanwave
>Thus, another young boy was preyed on by a monster.\
>Swallowed whole, he was digested alive as he drowned in ecstasy.\
>............\
goto *badend



*emily_start

mov $name,"Emily"
mov $name2,"Emily"
mov $lavel,"emily"
mov $tatie1,"emily_st01"
mov $tatie2,"emily_st02"
mov $tatie3,"emily_st03"
mov $tatie4,"emily_h5"
mov $haikei,"bg113"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,5000
if %nanido=2 mov %max_enemylife,5500
if %nanido=3 mov %max_enemylife,7500
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %music,2
mov %tikei,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free from Emily!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Wahaha, Emily won't let go even if you struggle!"
mov $mogaku_sel2,"Emily's trying so hard, why are you struggling?"
mov $mogaku_sel3,"You look really silly right now!"
mov $mogaku_sel4,"Do you want to escape...? Sorry, but Emily won't let you! "
mov $mogaku_sel5,"In truth, you really want to play with Emily more, don't you?"
mov $mogaku_dassyutu1,"Why would you break free when I was trying so hard..."
mov $mogaku_dassyutu2,"Do you really not like me?"
mov $mogaku_earth_dassyutu1,"Hmm... So that's Gnome's power?"
mov $mogaku_earth_dassyutu2,"Emily wants to learn more about that..."
mov $half_s1,"Are you already feeling it from just that little?"
mov $half_s2,"You really aren't that strong..."
mov $kiki_s1,"Eh eh eh? Already about to come...?"
mov $kiki_s2,"Then let Emily finish you off!"
mov %end_n,7
mov %exp_minus,50000
mov %zmonster_x,-280
mov %tukix,320
mov %owaza_count1a,5
mov %owaza_count3a,6
name "Luka"
>Have you been preying on humans too!?\
name ""
name $name
>Wahaha, of course!@
>I've teased and eaten plenty of men already!\
>I wrap these tentacles of mine around them, and squeeze out their semen.@
>Like that, I make them go mad with pleasure. \
name ""
name "Luka"
>...........\
name ""
>With a carefree smile on her face, she talks about her murders.@
>So even this seemingly silly young girl is as cruel as the others...\
name $name
>You know, Emily... Emily is really interested in you.\
>What does your penis feel like...?@
>How much semen will come out if Emily plays with it...?\
>What kind of moan do you make as you come...?@
>How does your semen taste?\
>Emily wants to find out eeeeverything!\
name ""
goto *common_main



*emily_v

gosub *face3
name $name
>E...Emily lost...?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Emily shrinks into the form of a tiny octopus!\
mov %viclose,1:gosub *victory
mov %getexp,25000:gosub *lvup
mov %2309,1
goto *sean0233



*emily_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>Eh? Already giving up?@
>Ok, then Emily will play with you! \
name ""
goto *emily_a



*emily_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *emily_kousan
if %cmd1=16 goto *emily_onedari
if %cmd1=17 goto *common_skill
goto *emily_main



*emily_a

if %kousoku=1 gosub *emily_a5:goto *common_main
if %kousoku=2 gosub *emily_a7:goto *common_main
rnd2 %ransu,1,5
if %ransu=1 gosub *emily_a1:goto *common_main
if %ransu=2 gosub *emily_a2:goto *common_main
if %ransu=3 && %owaza_count3a>7 gosub *emily_a3:goto *common_main
if %ransu=4 && %owaza_count1a>6 gosub *emily_a4:goto *common_main
if %ransu=5 && %owaza_count1a>6 gosub *emily_a6:goto *common_main
skip -6



*emily_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Here, Emily's hand! "
if %ransu=2 mov $sel1,"Emily is really skilled at handjobs, isn't she?"
if %ransu=3 mov $sel1,"It's ok to cover Emily's hands in semen."
name $name
eng $sel1:$sel6\
name ""
skillname "Emily's Handjob"
dwave 1,"se\ero_koki1.ogg"
>Emily grabs Luka's penis, and strokes him up and down!
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3489
if %nanido<2 damage 90,100
if %nanido=2 damage 100,110
if %nanido=3 damage 110,120
skillname ""
if %mylife=0 sub %stack,1:return *emily_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*emily_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Fill Emily's mouth!"
if %ransu=2 mov $sel1,"Everyone always likes it when Emily sucks on them!"
if %ransu=3 mov $sel1,"How about Emily sucks out your semen?"
name $name
eng $sel1:$sel6\
name ""
skillname "Emily's Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>Emily sucks Luka's penis into her mouth, and intensely sucks on him!
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3490
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
skillname ""
if %mylife=0 sub %stack,1:return *emily_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*emily_a3

add %stack,1
mov %owaza_count3a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Emily's tentacles will play with your penis like a toy!"
if %ransu=2 mov $sel1,"Emily will play with you! "
if %ransu=3 mov $sel1,"Nobody lasts long when Emily's tentacles play with them."
name $name
eng $sel1:$sel6\
name ""
skillname "Emily's Toy"
lsp 700,":a;chara\emily_st12.bmp",0,0:print 10,500
dwave 1,"se\ero_makituki1.ogg"
>Emily's tentacles coil around Luka's penis!
if %wind=2 && %nanido<2 mov %wind_kakuritu,50
if %wind=2 && %nanido=2 mov %wind_kakuritu,40
if %wind=2 && %nanido=3 mov %wind_kakuritu,25
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3491
if %nanido<2 damage 50,60
if %nanido=2 damage 55,65
if %nanido=3 damage 60,70
dwave 1,"se\ero_makituki2.ogg"
>The tentacle squirms around Luka's penis from base to tip!
if %nanido<2 damage 50,60
if %nanido=2 damage 55,65
if %nanido=3 damage 60,70
dwave 1,"se\ero_makituki2.ogg"
>The tentacle shrinks, squeezing Luka's penis!
if %nanido<2 damage 50,60
if %nanido=2 damage 55,65
if %nanido=3 damage 60,70
skillname ""
if %mylife=0 sub %stack,1:return *emily_h3
gosub *face1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*emily_a4

add %stack,1
mov $tatie4,"emily_h5"
mov %owaza_count1a,0
if %kousan=2 skip 4
name $name
>This tentacle is a little sadistic. \
name ""
skillname "Twin Tail Hug"
dwave 1,"se\ero_simetuke1.ogg"
eng "Emily's pigtails turn into giant tentacles, and coil around Luka's body!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>Her strong tentacles bind Luka's body!
if %nanido<2 damage 90,100
if %nanido=2 damage 100,110
if %nanido=3 damage 110,120
mov %kousoku,1:gosub *status_print
>Luka has been bound by Emily's tentacles!\
skillname ""
if %mylife=0 sub %stack,1:return *emily_h4
if %kousan=2 sub %stack,1:return
gosub *face2
name $name
if %first_sel1=1 skip 4
>The tentacles will get tighter and tighter...@
>Emily will see how long you can endure it.\
skip 3
>This time, don't struggle.@
>Emily will see how long you can endure it.\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,4
if %earth=0 && %nanido=2 mov %genmogaku,4
if %earth=0 && %nanido=3 mov %genmogaku,5
if %earth>0 && %nanido<2 mov %genmogaku,2
if %earth>0 && %nanido=2 mov %genmogaku,2
if %earth>0 && %nanido=3 mov %genmogaku,3
sub %stack,1
return



*emily_a5

add %stack,1
>Luka has been bound by Emily's tentacle...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Both your body and penis are going to be choked. "
if %ransu=2 mov $sel1,"Wahaha... Do you give up?"
if %ransu=3 mov $sel1,"Wahaha, pathetic! Pitiful! Loser! "
name $name
eng $sel1:$sel6\
name ""
skillname "Twin Tail Rondo"
dwave 1,"se\ero_simetuke1.ogg"
>Her squishy tentacles tighten around Luka's body!\
>The tentacle around Luka's penis gets even tighter at the same time!
skillcount2 3492
if %nanido<2 damage 90,100
if %nanido=2 damage 100,110
if %nanido=3 damage 110,120
skillname ""
if %mylife=0 sub %stack,1:return *emily_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*emily_a6

add %stack,1
mov $tatie4,"emily_h1"
mov %owaza_count1a,0
if %kousan=2 skip 4
name $name
>This tentacle feels really good! \
name ""
skillname "Tentacle Bind"
dwave 1,"se\ero_makituki3.ogg"
>Emily's tentacles coil around Luka's body!
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
if %nanido<2 damage 95,105
if %nanido=2 damage 105,115
if %nanido=3 damage 115,125
mov %kousoku,2:gosub *status_print
>Luka has been bound by Emily's tentacles!\
skillname ""
if %mylife=0 sub %stack,1:return *emily_h6
if %kousan=2 sub %stack,1:return
gosub *face2
name $name
if %first_sel2=1 skip 4
>Now it's time for Emily to tease your whole body.@
>How much can you endure?@> Emily will find out...\
skip 3
>You want me to tease you again, don't you...?@
>How much can you endure?@> Emily will find out...\
name ""
mov %first_sel2,1
if %earth=0 && %nanido<2 mov %genmogaku,3
if %earth=0 && %nanido=2 mov %genmogaku,3
if %earth=0 && %nanido=3 mov %genmogaku,4
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
sub %stack,1
return



*emily_a7

add %stack,1
>Luka has been bound by Emily's tentacles...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"How much can your penis take...?":mov $sel2,"Emily's tentacle coils around Luka's penis!"
if %ransu=2 mov $sel1,"Emily is trying her best, so don't hold back!":mov $sel2,"Emily's tentacles squirm all over Luka's penis!"
if %ransu=3 mov $sel1,"Everyone always comes when Emily does it like this!":mov $sel2,"Emily's tentacle coils further around Luka's penis!"
if %ransu=4 mov $sel1,"It's fun playing with Emily, isn't it!?":mov $sel2,"Emily plays with every part of Luka's body with her multiple tentacles!"
if %ransu=5 mov $sel1,"Emily will play with the tip!":mov $sel2,"The tip of one of Emily's tentacles traces up the back of Luka's penis until she reaches the tip!"
name $name
eng $sel1:$sel6\
name ""
skillname "Tentacle Waltz"
lsp 690,":a;chara\emily_ct01.bmp",0,0:print 10,500
dwave 1,"se\ero_makituki3.ogg"
eng $sel2:$sel6\
skillcount2 3493
mov %damage_nobr,1
if %nanido<2 damage 40,50
if %nanido=2 damage 45,55
if %nanido=3 damage 50,60
mov %damage_nobr,1
if %nanido<2 damage 40,50
if %nanido=2 damage 45,55
if %nanido=3 damage 50,60
if %nanido<2 damage 40,50
if %nanido=2 damage 45,55
if %nanido=3 damage 50,60
skillname ""
if %mylife=0 sub %stack,1:return *emily_h7
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*emily_onedari

mov $list1,"Emily's Handjob"
if %3489>0 mov %list_num1,1
mov $list2,"Emily's Blowjob"
if %3490>0 mov %list_num2,1
mov $list3,"Emily's Toy"
if %3491>0 mov %list_num3,1
mov $list4,"Twin Tail Rondo"
if %3492>0 mov %list_num4,1
mov $list5,"Tentacle Waltz"
if %3493>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *emily_onedari1
if %cmd1=12 goto *emily_onedari2
if %cmd1=13 goto *emily_onedari3
if %cmd1=14 goto *emily_onedari4
if %cmd1=15 goto *emily_onedari5
if %cmd1=-1 goto *emily_main
goto *emily_onedari



*emily_onedari1

gosub *onedari_syori
name $name
>You want to play with Emily's hand?\
name ""
gosub *emily_a1
skip -1



*emily_onedari2

gosub *onedari_syori
name $name
>You want to play with Emily's mouth?\
name ""
gosub *emily_a2
skip -1



*emily_onedari3

gosub *onedari_syori
name $name
>You want to play with Emily's tentacles?\
name ""
gosub *emily_a3
skip -1



*emily_onedari4

if %kousoku<>1 gosub *onedari_syori
if %kousoku=1 gosub *onedari_syori_k
name $name
>You want to be teased by Emily's tentacles?\
name ""
notif %kousoku=1 gosub *emily_a4
gosub *emily_a5
skip -1



*emily_onedari5

if %kousoku<>2 gosub *onedari_syori
if %kousoku=2 gosub *onedari_syori_k
name $name
>You want Emily's tentacles to make you feel good?\
name ""
notif %kousoku=2 gosub *emily_a6
gosub *emily_a7
skip -1



*emily_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\emily_bk02.bmp",0,0
gosub *syasei2
>As Emily's young hands stroke Luka, he comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2609,%2609+1:if %2609=1 mov %count_koenemy,%count_koenemy+1
if %2609>%count_most mov %count_most,%2609:mov $count_mostname,$name
count 5,6
mov $bad1,"Luka was forced to an orgasm by Emily's handjob."
gosub *face2
name $name
>Emily's handjob made you come?@
>You're a lot weaker than Emily thought...\
name ""
goto *emily_h



*emily_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\emily_bk01.bmp",0,0
gosub *syasei2
>As Emily eagerly sucked on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2609,%2609+1:if %2609=1 mov %count_koenemy,%count_koenemy+1
if %2609>%count_most mov %count_most,%2609:mov $count_mostname,$name
count 4,6
mov $bad1,"Luka was forced to an orgasm by Emily's blowjob."
gosub *face2
name $name
>Nnnn... Emily's blowjob made you come?@
>You're a lot weaker than Emily thought...\
name ""
goto *emily_h



*emily_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\emily_bk04.bmp",0,0
gosub *syasei2
>As Emily strokes Luka's penis with her squishy tentacles, Luka comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2609,%2609+1:if %2609=1 mov %count_koenemy,%count_koenemy+1
if %2609>%count_most mov %count_most,%2609:mov $count_mostname,$name
count 10,6
mov $bad1,"Emily's tentacles forced Luka to an orgasm."
name $name
>Emily's tentacles made you come?@
>You're a lot weaker than Emily thought...\
name ""
goto *emily_h



*emily_h4

mov %ikigoe,3:gosub *ikigoe
name $name
>Noo!@> That's too fast, you can't be that fast!\
name ""
gosub *syasei1
lsp 700,":a;chara\emily_h6.bmp",0,0
gosub *syasei2
>As Emily's tentacles wrap around Luka's body, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2609,%2609+1:if %2609=1 mov %count_koenemy,%count_koenemy+1
if %2609>%count_most mov %count_most,%2609:mov $count_mostname,$name
count 10,6
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to an orgasm just from Emily's tentacles coiling around him."
gosub *face2
name $name
>You didn't even try...@
>Emily was going to try her best, but you were too pathetic to begin with...\
name ""
goto *emily_h



*emily_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\emily_h6.bmp",0,0
gosub *syasei2
>As Emily's tentacles squeeze Luka's body and penis tighter, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2609,%2609+1:if %2609=1 mov %count_koenemy,%count_koenemy+1
if %2609>%count_most mov %count_most,%2609:mov $count_mostname,$name
count 10,6
mov $bad1,"Luka was forced to an orgasm as Emily tightened her tentacles around his body."
gosub *face2
name $name
>All Emily did was make it a little tighter...@
>You're a lot weaker than Emily thought...\
name ""
mov %kousoku,0
goto *emily_h



*emily_h6

mov %ikigoe,3:gosub *ikigoe
name $name
>Noo!@> That's too fast, you can't be that fast!\
name ""
gosub *syasei1
lsp 700,":a;chara\emily_h2.bmp",0,0
lsp 690,":a;chara\emily_ct02.bmp",0,0
gosub *syasei2
>As Emily's tentacles wrap around Luka's body, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2609,%2609+1:if %2609=1 mov %count_koenemy,%count_koenemy+1
if %2609>%count_most mov %count_most,%2609:mov $count_mostname,$name
count 10,6
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to an orgasm just from Emily's tentacles coiling around him."
gosub *face2
name $name
>You didn't even try...@
>Emily was going to try her best, but you were too pathetic to begin with...\
name ""
goto *emily_h



*emily_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\emily_h2.bmp",0,0
lsp 690,":a;chara\emily_ct02.bmp",0,0
gosub *syasei2
>As Emily's tentacles play with Luka, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2609,%2609+1:if %2609=1 mov %count_koenemy,%count_koenemy+1
if %2609>%count_most mov %count_most,%2609:mov $count_mostname,$name
count 10,6
mov $bad1,"Emily's tentacle waltz forced Luka to an orgasm."
gosub *face2
name $name
>Emily's tentacles made you come?@
>You're a lot weaker than Emily thought...\
name ""
goto *emily_h



*emily_h

mov $bad2,"Emily used her tentacles to play with Luka until he died."
if %2609=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,21:hseanwave:goto *emily_hb
name "Luka"
>Ahh...\
name ""
>Right after my ejaculation is over, I fall to the ground exhausted.@
>Emily steps closer to me with a triumphant smile.\
name $name
>Wahaha, you can't defy Emily any longer!@
>Now to make you Emily's toy...!\
name ""
dwave 1,"se\ero_makituki3.ogg"
>Tentacles from Emily's lower body shoot toward my body, coiling around me.@
mov %hseanwave,21:hseanwave
cspl 690,699
lsp 700,":a;chara\emily_h1.bmp",0,0:print 10,500
>Like that, she drags me underneath her, and leaves me unable to move.\
name $name
>Wahaha, Emily's tentacles are aaaallll around you! @
>You look so silly lying there!\
>So this is what a Hero looks like? How stupid! \
name ""
goto *emily_hb



*emily_hb

>Emily looks at me and laughs.\
name $name
>Emily is going to test your penis now.@
>What kinds of things will make it come?@>How much will it shoot out?\
>In other words, Emily is going to make you come over and over again!@
>Doesn't that make you happy? Wahaha! \
name ""
name "Luka"
>N...No... Don't...\
name ""
name $name
>But games are so much more fun when the winner gets something!@
>I know, Emily will make a rule!\
>If you can endure Emily's playing for five minutes, Emily will let you go!@
>But if you don't, then Emily gets to keep going!@> The time resets with each ejaculation!\
name ""
name "Luka"
>Y...You're lying...@>You won't let me go even if I do...\
name ""
>She would never do that... She's just toying with me, isn't she?@
>But if she isn't...\
name $name
>Emily never lies!@
>You'll ejaculate over and over again, so you'll get a lot of chances!\
>If you can do it before Emily gets bored with you, Emily will let you go!\
name ""
>Emily giggles as she looks at me.@
>It's like she's just an innocent little girl playing with a doll...\
name $name
>But... If Emily gets tired of you before you ever manage to hold on for five minutes...@
>Emily will just have to kill the owner of such a useless penis. \
>Emily will squeeze out your semen with no stopping until you die! \
name ""
name "Luka"
>N...No way...\
name ""
name $name
>If you don't want that, you just need to hold on!@
>It's only five minutes, so you should be able to do it.\
>Alright, it's time for Emily's game to start.@
>Emily will try her best, so you should too! \
name ""
lsp 690,":a;chara\emily_ct01.bmp",0,0:print 10,500
>Her slimy tentacle coils around my penis, wasting no time in starting to stroke me.\
name "Luka"
>Ah... Ahh...\
name ""
name $name
>Wow, already moaning like that right from the start?@
>Emily doesn't think you will do too well in this game...\
name ""
>Her tentacle slowly coils tighter around my penis, covering me with warm slime as it moves.\
>I resist the feeling with all of my might.@
>All I need to do is endure this, and I can save myself.\
name "Luka"
>Urhg...\
name ""
name $name
>Wahaha, endure it, endure it!@
>You can see the clock on the wall, it's just five minutes!\
>Emily doesn't want to lose either, so Emily will do her best! \
name ""
>The tentacle around my penis slowly gets tighter and tighter, increasing the stimulation more and more.\
name ""
name "Luka"
>Ah... Urhg...\
name ""
name $name
>First is a tightness test!@
>How long can your penis take being squeezed by Emily's tentacles...?\
name ""
name "Luka"
>Haaa...!\
name ""
>Her squishy tentacle slowly squeezes harder and harder around me.@
>The small tip of her tentacle coils around the tip of my penis, gently squeezing me.\
>As she squeezes my tip, I unintentionally let out a moan.\
name "Luka"
>Ahh!\
name ""
name $name
>Wahaha, what's with that voice?@
>Are you about to come just from this?\
>Even boys smaller than you don't come this quickly...\
name ""
name "Luka"
>Urhg...\
name ""
>I grit my teeth and do everything to deny the pleasure filling my lower body.@
>The numbness spreads through me, breaking down my desperate resistance.\
>More and more, the desire to release erodes the rest of my thoughts, wanting to give in to her tentacle.\
name "Luka"
>Ahhgg... I... I can't...\
name ""
name $name
>Wahaha, what the heck?@
>Forget five minutes, you're barely past a minute...\
name ""
>Emily laughs at me as she increases the pressure from her tentacle even further.@
>I can't take it...@> With tears in my eyes, I feel my body betraying me and giving in to her.\
name "Luka"
>No...!@> I'm coming...!\
name ""
>The moment my heart surrenders to her, my penis starts to twitch.@
>Exploding in ecstasy, I submit to her tentacle.\
gosub *syasei1
lsp 700,":a;chara\emily_h2.bmp",0,0
lsp 690,":a;chara\emily_ct02.bmp",0,0
gosub *syasei2
>As her tentacle squeezes me, I shoot my semen into the air.@
>It's as if it's a white flag of surrender, proof of my submission to her.\
>I miserably let out a sigh as the afterglow from my orgasm fills me, just adding to the humiliation of it all.\
name "Luka"
>Haaa...\
name ""
name $name
>Awwww... Already?@
>Is your penis broken or something?@> It wasn't even that tight, but that was enough for you...?\
>So that's a Hero's penis? How pitiful! \
name ""
>Emily looks down at me and giggles.\
name $name
>Emily will get bored really quick if you come that fast...@
>You better try harder, or this will be a short game...\
name ""
name "Luka"
>N...No... Don't do that...\
name ""
name $name
>That's right, you don't want that, right?@
>Emily wants to have fun with this game too, so you need to try harder. \
name ""
>Starting again, Emily's tentacle around my penis squeezes me again.\
name "Luka"
>Ah...Ahh...\
name ""
name $name
>It's time to start the testing again...@
>Emily will do her best!\
name ""
>She tightens around the base of my penis, and starts to slowly move upwards in a wave motion.\
>Up and down, it feels like a wave of pleasure is racing up and down my penis even though her tentacles aren't even moving.\
name "Luka"
>Ah...Ahh...@
>That feels good...\
name ""
name $name
>Emily will test how long you can endure a tentacle massage!\
name ""
>Her tentacles continue to tighten and loosen in a wave.@
>I start to gasp in pleasure with every motion she makes.\
>I have to endure this... My life depends on it...@
>Even though I know that, it doesn't feel like my body will let me...\
name "Luka"
>Urhg... Ahh...\
name ""
name $name
>Sheesh, are you already struggling?@
>Your penis is just like a little boy's, really sensitive.\
>Aren't you ashamed you can't endure it a little longer?@
>At this rate, you'll actually be even more pitiful than a child...\
name ""
>As Emily teases me with words, her tentacle continues to massage me.@
>Reacting to the stimulation, I can't stop my body from bouncing upwards with each wave motion from her tentacle.\
>The pathetic shaking of my waist just adds to the stimulation.\
name ""
name $name
>Ahh, geez... You're shaking your waist all over the place.@
>Is it just your male instinct taking over?\
>Do you think you're actually having sex with Emily or something?@
>Emily's just using her tentacles to play with you, though. \
name ""
>Up and down... The milking wave motion from her tightening and loosening continues.@
>I look over at the clock with hope, but see it hasn't even been three minutes.\
>Realizing that there's no way I can hold on, I relax and give myself over to the pleasure.\
name "Luka"
>Ahh... That feels good...@
>I'm going to come...\
name ""
name $name
>Sheesh, it hasn't even been three minutes and you're already going to come again?\
>You lose the round as soon as you come, you know.@
>Emily will win as soon as that penis of yours twitches and explodes! \
name ""
>The wave motion from her gets even faster, milking me without holding anything back.\
>As I gasp in pleasure from her tentacle massage, I push my waist up toward her as the orgasm of my loss blows through me.\
gosub *syasei1
lsp 700,":a;chara\emily_h3.bmp",0,0
lsp 690,":a;chara\emily_ct03.bmp",0,0
gosub *syasei2
name "Luka"
>Haaa...\
name ""
>My semen is milked out of me, spewing out onto her tentacle.@
>In the end, I couldn't endure it that time either...\
name $name
>Awww, you came again.@
>You're even worse than a little boy!\
>Since you're coming so quickly, does that mean you want Emily to kill you?\
name ""
>Emily continues to massage me with her tentacle as she scolds me like a child.\
>Suddenly, even more tentacles coil around my penis.@
lsp 690,":a;chara\emily_ct04.bmp",0,0:print 10,500
>As even more of them coil around me, it feels like my penis is stuck inside a mass of tentacle flesh.\
name "Luka"
>Ahh...\
name ""
name $name
>Next Emily will test with wriggling stimulations!@
>Emily coiled around your penis with her tentacles, and will now squirm and wriggle with them!\
>Since it's you, Emily doesn't think you'll last long...@
>But try your best, you never know!\
name ""
name "Luka"
>Ahhh!!@
>Wh...What is this...? No... Stop...!\
name ""
mov %hseanwave,22:hseanwave
>Right after she stops speaking, her tentacles coiled around my penis start to squirm and move all at once.@
>Each one moves independent of the others, going in random directions and squeezing at random times.\
>It feels like my penis is being caressed by multiple fingers, each with their own mind.\
name $name
>One guy said it felt like thousands of earthworms.@
>Is that true?@>Emily's technique seems to work quite well!\
>For a premature ejaculator like you, Emily doesn't think you'll last for more than a minute. \
name ""
name "Luka"
>Haaa... Ahhh!\
name ""
>Her tentacles wriggle all around my penis, making me gasp in pleasure from the unending stimulation.\
>I can't even attempt to endure this any longer.@
>All of the power fades from my body as I just let the pleasure run through me.\
name $name
>Wahaha... Did you really just give up?@
>So you're fine with Emily winning the game?\
name ""
>Emily giggles as she looks down on me, still stroking me with her tentacles.@
>High on her victory, she clearly looks pleased with herself.\
>Meanwhile, I gasp under her as I'm quickly brought to another orgasm by her wriggling tentacles.\
name "Luka"
>Ah... Coming... Ahh!\
name ""
gosub *syasei1
lsp 700,":a;chara\emily_h4.bmp",0,0
lsp 690,":a;chara\emily_ct05.bmp",0,0
gosub *syasei2
>Unable to take it, I explode under her.@
>My semen sprays over her squirming tentacles, flying all over the place.\
name $name
>...Emily is bored testing your penis.@
>You come too easily from everything.\
>Since Emily won the game like we agreed, she will now kill you.\
name ""
>Emily's sadistic eyes sparkle as she looks down at me.@
>Her tentacles tighten around me and start to move up and down as more squirm around me, combining all of the different stimulations at once.\
name "Luka"
>Ahhhhh!!\
name ""
>Unlike before when she was just toying with me, now she's seriously trying to force me to come quickly.@
>This intense stimulation almost makes it feel like my penis could fall off.\
>I struggle and gasp in pleasure as the intense pleasure runs through me, leaving me even more helpless than before.\
name "Luka"
>Ahhg... Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>I orgasm, shooting semen out all over her yet again.@
>But unlike before when she stopped to change her testing, this time she just continues as if nothing happened.\
name "Luka"
>Aiie... S... Stop!@
>No more!\
name ""
name $name
>Wahaha, did you forget? There's no stopping now! @
>Emily won, you lost.@> Now Emily gets to kill you, just like you agreed.\
>You can go ahead and keep coming as you go to heaven.@
>Wahaha! \
name ""
>Even as I come, her tentacles don't stop stimulating me for even a moment.\
>Every inch of my penis is stroked, massaged and squeezed by her multiple slimy tentacles, all jostling and squirming around each other in order to force me to another orgasm.\
name "Luka"
>Ahhh!\
name ""
>The intense ecstasy is too much for me to take, causing my vision to flicker and go hazy.@
>Barely able to even breathe, I beg Emily to stop.\
name "Luka"
>N...No... Coming... Ahh...@
>S...Stop... Please! Emily!\
gosub *syasei1:gosub *syasei2
name ""
>I come again as I beg her to stop.@
>But no matter what I do or say, the tentacles squirming around me forcing me to orgasm after orgasm don't stop.\
name "Luka"
>Haaaa!@> Stop, stop!@
>Ahh!\
name ""
gosub *syasei1:gosub *syasei2
name $name
>Wahaha, how pathetic! @
>Emily won fair and square, no complaining! \
name ""
>The young carefree girl giggles as she watches me slowly dying underneath her.@
>Just how many men has this cruel girl killed like this...?\
>I, too, am just going to die for this young girl's enjoyment...\
name "Luka"
>Hyaaa!@
>Stop!@>Ahh!\
name ""
gosub *syasei1:gosub *syasei2
name $name
>Emily's sure you know already, but each orgasm is making you a lot weaker.@
>You're already as weak as a baby now.\
>Each time you come, it's your life itself shooting out of you onto the floor.@
>Every pleasurable spurt of semen is one step closer to your end. \
name ""
name "Luka"
>Ahh... No... No...@
>Ahhh!\
name ""
>Just as she said, I feel incredibly weak.@
>But even if I know what's coming, I can't stop myself.\
>Forcibly making me ejaculate, there's no stopping this cruel girl from killing me as I squirm in horror filled ecstasy.\
name "Luka"
>Ahh... Haaa...\
name ""
gosub *syasei1:gosub *syasei2
>Weaker and weaker, each drop of semen shot out of me is a step closer to my end.@
>My life is slowly fading away in a storm of pleasure.\
name $name
>Wahaha, you're even weaker than a baby now.@
>More, more! Emily will squeeze out more! \
name ""
name "Luka"
>Ahh...\
name ""
>As if it was blood flowing from a fatal wound, my semen continues to spill out of me.@
>Barely able to see or breathe, I feel my life itself spilling out of me.\
>On the verge of death, I can't do a thing to stop Emily from forcibly make me ejaculate toward my own death...\
gosub *syasei1:gosub *syasei2
name "Luka"
>Ah...aaa...\
name ""
>The last of my strength trickles away as I fade into blackness.\
gosub *anten
mov %hseanwave,0:hseanwave
name $name
>Wahaha, are you already about to die?@
>You got to feel good all the way to your death, isn't that nice? \
>Bye bye!@> Wahaha!\
name ""
>The sound of Emily laughing at me...@
>That was the last thing I heard.\
>I take my last breaths to the sound of a young girl's carefree laughter.\
>............\
goto *badend



*cassandra_start

mov $name,"Cassandra"
mov $name2,"Cassandra"
mov $lavel,"cassandra"
mov $tatie1,"cassandra_st01"
mov $tatie2,"cassandra_st02"
mov $tatie3,"cassandra_st03"
mov $tatie4,"cassandra_ha1"
mov $haikei,"bg160"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,18500
if %nanido=2 mov %max_enemylife,19000
if %nanido=3 mov %max_enemylife,19650
if %nanido=1 mov %henkahp1,15750
if %nanido=2 mov %henkahp1,16000
if %nanido=3 mov %henkahp1,16200
if %nanido=0 mov %max_enemylife,2
if %nanido=0 mov %henkahp1,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %music,3
mov %tikei,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free from Cassandra!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Did you think you could escape from me...?"
mov $mogaku_sel2,"Look at you struggle in my sticky flesh... Haha."
mov $mogaku_sel3,"If all you do is struggle like that, you'll never escape."
mov $mogaku_sel4,"Just how many men have been dissolved into nothing like you're going to be?"
mov $mogaku_sel5,"There's no need to hate it, for you will drown in the pleasure soon enough..."
mov $mogaku_dassyutu1,"Stubborn to the end, are you?"
mov $mogaku_dassyutu2,"But it's useless."
mov $mogaku_earth_dassyutu1,"Hah. One of the spirit's powers?"
mov $mogaku_earth_dassyutu2,"That must have been from Alice..."
mov $half_s1,"There is no human that can beat me."
mov $half_s2,"I will drill that fact into you."
mov $kiki_s1,"It's the fate of the weak to be preyed on by the strong."
mov $kiki_s2,"You will understand this fact well enough as I devour you."
mov %end_n,7
mov %exp_minus,75000
mov %zmonster_x,-300
mov %tukix,320
mov %owaza_count1a,7
mov %owaza_count1b,7
name $name
>Hehehe... This room is no different than my body itself now.@
>Why not just surrender now and save yourself the agony?\
name ""
name "Luka"
>Guh... Wh...What power...\
name ""
>The ground, walls, and ceiling are all covered in the same sticky substance that her body is made of.\
>It's just as she said... It's like I'm already inside of her body...\
>Can I win against someone this strong as I am now...?\
name $name
>Hehe... Resisting as I prey on you won't make it end any faster.\
>I'll slowly indulge in your body, dissolving and digesting you piece by piece...\
>Until your final moments, you'll be drowning in me, begging for more.\
name ""
name "Luka"
>Guh...!\
name ""
>I can't stop myself from shivering at her words as I stand in my fighting stance.\
mov %sinkou,1
goto *common_main



*cassandra_v

name "Luka"
>Guh... What power...\
name ""
name $name
>Do you understand my strength now?@
>It's too late to beg for forgiveness!\
name ""
>I can't take any more of her attacks...@
>I'm going to lose at this rate...\
lsp 700,":a;chara\alice_st04.bmp",-43,0
lsp 701,":a;chara\cassandra_st01.bmp",160,0:print 10,500
name "Alice"
>Sheesh, so it came to this as I thought.@
>I tried to stop you since I knew you wouldn't be able to beat her.\
name ""
name "Luka"
>A...Alice...!?\
name ""
lsp 701,":a;chara\cassandra_st03.bmp",160,0:print 10,500
name $name
>Alipheese...\
name ""
lsp 700,":a;chara\alice_st02.bmp",-43,0:print 10,500
name "Alice"
>...But still, you have become quite strong, Luka.@
>To think you would last that long in a battle against Cassandra Nereneid...\
name ""
name "Luka"
>Who is she...?@
>Such a high level monster in this tiny village...\
name ""
lsp 700,":a;chara\alice_st01.bmp",-43,0:print 10,500
name "Alice"
>I told you about the Monster Lord succession ceremony before, didn't I?\
>When my mother rose to the throne, Cassandra was the only one who challenged her.\
>She lost to my mother in single combat...@
>It was a close battle, where they were on equal footing.\
name ""
lsp 701,":a;chara\cassandra_st02.bmp",160,0:print 10,500
name $name
>...Yes, I was defeated by your mother in the past.@
>But I'm different now.\
>I've preyed on hundreds of men since then, storing and saving my power...\
>I narrowly lost then, but as I am now, I would have a complete victory.\
name ""
lsp 700,":a;chara\alice_st02.bmp",-43,0:print 10,500
name "Alice"
>Hmph.@>How stupid, Cassandra.@
>"In the past"..."But now".@> Still haven't gotten over your loss, have you?\
>As expected, you would never have been fit to sit on the Monster Lord's throne.\
name ""
name $name
>...The one unfit for the Monster Lord's throne was your mother, was it not?@
>That foolish advocate for coexistence between man and monster.\
>Then killed by those same humans she wanted to get along with.@
>How ridiculous.\
>Truly a disgrace, unfit to be called Monster Lord.\
name ""
lsp 700,":a;chara\alice_st04.bmp",-43,0:print 10,500
name "Alice"
>...........\
name ""
>Alice's mother was killed by a human...?@
>And she also wanted coexistence between man and monster...?\
name $name
>It's just a rumor I've heard...@
>Is it true you're following that stupid woman's wish of coexistence?\
name ""
>She...She is?@
>But Alice has done nothing but poke holes and make fun of my dream...\
name "Luka"
>Wh...What's going on Alice!?@
>Your dream is the same as mine!?\
name ""
lsp 700,":a;chara\alice_st01.bmp",-43,0:print 10,500
name "Alice"
>...Hmph.@
>Whenever you talk about your dream, it pisses me off.\
>The thought that I could have the same ideal as an idiot like you...\
name ""
name "Luka"
>H...Hey...\
name ""
dwave 1,"se\ero_slime3.ogg"
>Having taken my eyes off Cassandra, I'm suddenly knocked off my feet as her sticky body suddenly wraps around me, disturbing our conversation!\
name "Luka"
>Guh...!@>Get off!\
name ""
name $name
>What type of fool would have a leisurely conversation in front of an enemy?\
>Did you think I would sit idly by as you chatted?\
>Now then, little Alipheese.@
>What reason do you have for coming here?\
>I know you're a pathetic excuse for a Monster Lord, but I doubt you would travel here just to attack me.\
name ""
lsp 700,":a;chara\alice_st04.bmp",-43,0:print 10,500
name "Alice"
>As a matter of fact, I'm actually surprised myself.@
>To think that idiot would actually be right for once.\
lsp 700,":a;chara\alice_st03.bmp",-43,0:print 10,500
>As long as a monster like you exists, man and monster will forever be enemies!\
>As the Monster Lord, it falls to me to discipline trash like you!\
name ""
name "Luka"
>A...Alice... No...@
>You're the Monster Lord... You can't fight your own monsters...\
name ""
>That's my role...\
lsp 700,":a;chara\alice_st01.bmp",-43,0:print 10,500
name "Alice"
>Hmph, that's funny coming from someone who can't even move.@
>That's perfect.@>Just lay there and watch.\
name ""
name "Luka"
>N...No... Don't fight among your own kind...\
name ""
lsp 700,":a;chara\alice_st04.bmp",-43,0:print 10,500
name "Alice"
>...Please, Luka.@
>Leave this to me.\
lsp 700,":a;chara\alice_st01.bmp",-43,0:print 10,500
>This is an issue from the previous generation...@
>The fight between Cassandra who wished to rule the humans, and my mother who wished to exist alongside them.\
name ""
name "Luka"
>Alice...\
name ""
>In either case, I can't move...@
>It looks like I can't do anything but watch...\
name $name
>Living in peace with humans...@
>It has been a while since I heard that laughable tripe.\
>Why should predators spare any thought for their prey?@> Just what kind of world do you think you live in, girl?\
name ""
dwave 1,"se\ero_slime2.ogg"
>Cassandra's corrosive flesh flies toward Alice!\
dwave 2,"se\damage.ogg"
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
rnd2 %damage,300,350
>Alice took 327 damage!\
lsp 700,":a;chara\alice_st51.bmp",-43,0:print 10,500
name "Alice"
>Guh...!\
name ""
name $name
>Only the strong can survive in this world.\
>Humans are nothing but prey to be devoured by stronger monsters.@
>And weak monsters... They too should be preyed on by the stronger monsters.\
>No matter how hard you cry for that pathetic dream, you cannot change the truth of the world!\
name ""
dwave 1,"se\ero_slime3.ogg"
>Cassandra's corrosive flesh swarms around Alice's body!\
dwave 2,"se\damage.ogg"
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
rnd2 %damage,400,450
>Alice took 432 damage!\
>Alice has been bound by Cassandra's corrosive body!\
name $name
>...Prepare yourself, Alipheese.@
>I shall ensure that you receive no pleasure as I dissolve you.\
>Feel the pain as your body melts into nothing.@
>Writhe in agony as your better devours you.\
name ""
dwave 1,"se\ero_slime3.ogg"
>A whirlpool of Cassandra's corrosive flesh crashes on Alice!\
dwave 2,"se\damage.ogg"
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
rnd2 %damage,400,450
>Alice took 449 damage!\
lsp 700,":a;chara\alice_st01.bmp",-43,0:print 10,500
name "Alice"
>I see...@> So you can transform this flesh of yours, and increase it at will.\
>Like that, you move your digestive organ outside of your own body, and use it to start digesting your prey as you fight.\
name ""
name $name
>That's right...@>Since I can control it at will, my flesh will just stretch from any impact.\
>Thus, once you've been completely wrapped, there's no longer a way to escape.\
>You're already in my stomach...@
>There's nothing left but for you to writhe in agony as I digest you alive.\
name ""
lsp 700,":a;chara\alice_st04.bmp",-43,0:print 10,500
name "Alice"
>...I realize quite well what you're capable of now.@
>You're just like an amoeba, absorbing and increasing your own body mass.\
>In addition, you're able to control your body even when it's separated from your core...\
name ""
name $name
>Hehe, that's right.@
>I'm glad you're able to understand the method of your own death.\
name ""
lsp 700,":a;chara\alice_st03.bmp",-43,0:print 10,500
name "Alice"
>Very well.@> In that case...\
name ""
skillname "Eyes of Chaos"
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
>Alice's eyes shine with a strange light!\
skillname ""
lsp 701,":a;chara\cassandra_st05.bmp",160,0:print 10,500
name $name
>Wh...What!?\
name ""
dwave 1,"se\ero_slime1.ogg"
>Suddenly, Cassandra's sticky flesh starts to vibrate!\
name $name
>N...No... My control...\
name ""
dwave 1,"se\ero_slime3.ogg"
>All of the flesh not directly attached to Cassandra starts to melt, turning into goo.@
>The flesh around Alice drips off of her, puddling at her feet.\
lsp 700,":a;chara\alice_st01.bmp",-43,0:print 10,500
name "Alice"
>That flesh of yours is made up of cells who have wills of their own.\
>If someone were to just disturb that connection you have with them, they'd lose their form and revert back to the worthless lumps of flesh they are.\
name ""
name $name
>I...It can't be!@
>Eye magic from a low rank monster like you shouldn't have any effect!\
name ""
name "Alice"
>...Sheesh, don't you get it?@
>You were careless, and...@
lsp 700,":a;chara\alice_st02.bmp",-43,0:print 10,500
>Are far weaker than me.\
name ""
name $name
>I... I cannot...\
name ""
dwave 1,"se\ero_slime3.ogg"
>Cassandra's sticky flesh squirms all over the place, melting and becoming useless puddles of goo.\
>The flesh covering the ceiling and walls starts to fall on the floor.\
name $name
>I...I fought with Alipheese the fifteenth on equal terms!@
>I did!\
name ""
name "Alice"
>...So you're still clinging to the past, are you?@
>You aren't even equal to one of the Four Heavenly Knights, much less the Monster Lord.\
name ""
name $name
>No!@>My body...@> My body!!\
name ""
dwave 1,"se\ero_slime3.ogg"
>As Cassandra's corrosive flesh collapses on itself, it starts dissolving her own body.\
>Mixing and melting together, her own body is digesting itself.\
name $name
>I...I cannot...@>Not to me...@
>Why... Why do I have to die!?\
name ""
lsp 700,":a;chara\alice_st03.bmp",-43,0:print 10,500
name "Alice"
>...What an idiotic question, Cassandra.\
>This world follows the law of the survival of the fittest, right?@
>If you were to die, that can only mean one thing, right?\
>You're nothing but a weak fool, unfit to do anything but die at the hands of the strong... Right!?\
name ""
name $name
>N...No... Help me... Don't let me die...\
name ""
lsp 700,":a;chara\alice_st04.bmp",-43,0:print 10,500
name "Alice"
>Sheesh, I would love to help.@
>But I wouldn't want to tread on your ideal world of survival of the fittest.\
name ""
>Alice's eyes go cold as she stares at Cassandra.\
lsp 700,":a;chara\alice_st01.bmp",-43,0:print 10,500
name "Alice"
>...Sorry, but I cannot spare your life even if you beg.@
>You know the purpose behind there being a Monster Lord, do you not?\
name ""
name $name
>To use power to maintain order...\
name ""
name "Alice"
>You've killed far too many.@
>As the Monster Lord, I must pass judgement on you.\
name ""
name $name
>Ahhhh!!\
name ""
dwave 1,"se\ero_slime3.ogg"
>Cassandra lets loose a horrifying scream as she meets her death.@
csp 701:print 10,500
>Dissolved by her own flesh, she experiences exactly what the ones she killed did.\
dwave 1,"se\ero_slime3.ogg"
bg "bg\bg113.bmp",10,1500
>The last of her flesh falls from the walls and melts away, leaving no trace of her existence.\
lsp 700,":a;chara\alice_st04.bmp",-43,0:print 10,500
name "Alice"
>..............\
name ""
>Alice looks on, expressionless.\
mov %viclose,1:gosub *victory
mov %getexp,45000:gosub *lvup
mov %2310,1
goto *sean0234



*cassandra_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>Hehe, already giving up?@
>Then I shall enjoy preying on you...\
name ""
goto *cassandra_a



*cassandra_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *cassandra_kousan
if %cmd1=16 goto *cassandra_onedari
if %cmd1=17 goto *common_skill
goto *cassandra_main



*cassandra_a

if %enemylife<%henkahp1 goto *cassandra_v
if %kousoku=1 gosub *cassandra_a8:goto *common_main
if %kousoku=2 gosub *cassandra_a9:goto *common_main
rnd2 %ransu,1,9
if %ransu=1 gosub *cassandra_a1:goto *common_main
if %ransu=2 gosub *cassandra_a2:goto *common_main
if %ransu=3 gosub *cassandra_a3:goto *common_main
if %ransu=4 gosub *cassandra_a4:goto *common_main
if %ransu=5 gosub *cassandra_a5:goto *common_main
if %ransu<8 && %owaza_count1a>8 gosub *cassandra_a6:goto *common_main
if %ransu>7 && %owaza_count1b>8 gosub *cassandra_a7:goto *common_main
skip -8



*cassandra_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Taste my flesh with your body."
if %ransu=2 mov $sel1,"I'll cover your body with my flesh."
if %ransu=3 mov $sel1,"My flesh will finish you..."
name $name
eng $sel1:$sel6\
name ""
skillname "Corrosive Prelude"
dwave 1,"se\ero_slime2.ogg"
eng "Cassandra's sticky flesh pours over Luka's body!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>Her strange flesh is all over Luka's body!
skillcount2 3494
if %nanido<2 damage 140,160
if %nanido=2 damage 150,170
if %nanido=3 damage 160,180
skillname ""
if %mylife=0 sub %stack,1:return *cassandra_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*cassandra_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"This hand is more than you deserve."
if %ransu=2 mov $sel1,"My handling is unbearable..."
if %ransu=3 mov $sel1,"I shall allow you to come in my hand..."
name $name
eng $sel1:$sel6\
name ""
skillname "Flesh Waltz"
dwave 1,"se\ero_koki1.ogg"
>Cassandra grabs Luka's penis!
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3495
if %nanido<2 damage 75,85
if %nanido=2 damage 80,90
if %nanido=3 damage 85,95
dwave 1,"se\ero_syokusyu1.ogg"
>Her sticky hand strokes him up and down!
if %nanido<2 damage 75,85
if %nanido=2 damage 80,90
if %nanido=3 damage 85,95
skillname ""
if %mylife=0 sub %stack,1:return *cassandra_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*cassandra_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Bury yourself in the pleasure..."
if %ransu=2 mov $sel1,"How does it feel to be melted as you're squeezed between my breasts?"
if %ransu=3 mov $sel1,"Melt away in the pleasure..."
name $name
eng $sel1:$sel6\
name ""
skillname "Melting Rondo"
dwave 1,"se\ero_koki1.ogg"
>Cassandra sandwiches Luka's penis between her breasts!
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3496
if %nanido<2 damage 75,85
if %nanido=2 damage 80,90
if %nanido=3 damage 85,95
dwave 1,"se\ero_syokusyu2.ogg"
>Her sticky, loose flesh wriggles around Luka as her breasts squeeze him!
if %nanido<2 damage 80,90
if %nanido=2 damage 85,95
if %nanido=3 damage 90,100
skillname ""
if %mylife=0 sub %stack,1:return *cassandra_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*cassandra_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My foot is good enough for simple prey."
if %ransu=2 mov $sel1,"Even if I step on you, you're sure to feel it."
if %ransu=3 mov $sel1,"How pitiful... Do you really derive pleasure from having your manhood trampled on?"
name $name
eng $sel1:$sel6\
name ""
skillname "Digestive Tango"
dwave 1,"se\ero_koki1.ogg"
>Cassandra steps on Luka's penis!
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3497
if %nanido<2 damage 75,85
if %nanido=2 damage 80,90
if %nanido=3 damage 85,95
dwave 1,"se\ero_syokusyu2.ogg"
>Her fleshy skirt extends, wrapping around Luka's penis as she steps down harder!
if %nanido<2 damage 85,95
if %nanido=2 damage 90,100
if %nanido=3 damage 95,105
skillname ""
if %mylife=0 sub %stack,1:return *cassandra_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*cassandra_a5

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Have a taste of my flesh skirt."
if %ransu=2 mov $sel1,"Soak in the ecstasy of my body."
if %ransu=3 mov $sel1,"Are you going to come inside my skirt?"
name $name
eng $sel1:$sel6\
name ""
skillname "Sticky Symphony"
dwave 1,"se\ero_syokusyu3.ogg"
>Cassandra's sticky flesh skirt extends, covering Luka's lower body!
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3498
if %nanido<2 damage 75,85
if %nanido=2 damage 80,90
if %nanido=3 damage 85,95
dwave 1,"se\ero_syokusyu2.ogg"
>The sticky skirt squirms around Luka's penis!
if %nanido<2 damage 90,100
if %nanido=2 damage 95,105
if %nanido=3 damage 100,110
skillname ""
if %mylife=0 sub %stack,1:return *cassandra_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*cassandra_a6

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
name $name
>Drown in my flesh...\
name ""
skillname "Black and White Concerto"
dwave 1,"se\ero_slime3.ogg"
eng "Cassandra's flesh skirt grows, wrapping around Luka's body!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>Her corrosive flesh clings to Luka's body!
skillcount2 3499
if %nanido<2 damage 85,95
if %nanido=2 damage 90,100
if %nanido=3 damage 95,105
dwave 1,"se\ero_syokusyu2.ogg"
>Her flesh coils up around his lower body up to his shoulders, squirming the entire time!
if %nanido<2 damage 85,95
if %nanido=2 damage 90,100
if %nanido=3 damage 95,105
dwave 1,"se\ero_syokusyu2.ogg"
>The wriggling flesh envelopes his penis!
if %nanido<2 damage 85,95
if %nanido=2 damage 90,100
if %nanido=3 damage 95,105
mov $tatie4,"cassandra_ha1"
mov %kousoku,1:gosub *status_print
>Luka's covered in Cassandra's flesh!\
skillname ""
if %mylife=0 sub %stack,1:return *cassandra_h6
if %kousan=2 sub %stack,1:return
gosub *face2
name $name
if %first_sel1=1 skip 4
>Hehe, how pitiful looking.@
>I'll slowly dissolve you away...\
skip 3
>Hehe, this time I won't let you get away.@
>I'll slowly dissolve you away...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,3
if %earth=0 && %nanido=2 mov %genmogaku,3
if %earth=0 && %nanido=3 mov %genmogaku,4
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
sub %stack,1
return



*cassandra_a7

add %stack,1
mov %owaza_count1b,0
mov %owaza_num1,2
if %kousan=2 skip 5
name $name
>Now then, it's time for my embrace...@
>Melt away in my arms...\
name ""
skillname "Embracing Serenade"
dwave 1,"se\ero_makituki3.ogg"
eng "Cassandra hugs Luka!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,50
if %wind=2 && %nanido=2 mov %wind_kakuritu,40
if %wind=2 && %nanido=3 mov %wind_kakuritu,25
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>Her fleshy skirt wraps around Luka!
if %nanido<2 damage 180,190
if %nanido=2 damage 190,200
if %nanido=3 damage 200,210
mov $tatie4,"cassandra_hc1"
mov %kousoku,2:gosub *status_print
>Luka is tightly wrapped in Cassandra's fleshy skirt!\
skillname ""
if %mylife=0 sub %stack,1:return *cassandra_h8
if %kousan=2 sub %stack,1:return
gosub *face2
name $name
if %first_sel2=1 skip 4
>Now then, I shall begin...@
>It's time to squeeze out your semen as I digest you...\
skip 3
>This time you won't escape...@
>It's time to squeeze out your semen as I digest you...\
name ""
mov %first_sel2,1
if %earth=0 && %nanido<2 mov %genmogaku,3
if %earth=0 && %nanido=2 mov %genmogaku,3
if %earth=0 && %nanido=3 mov %genmogaku,4
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
sub %stack,1
return



*cassandra_a8

add %stack,1
>Luka is wrapped in Cassandra's fleshy skirt...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hehe, dissolve away just like this...":mov $sel2,"Her sticky flesh squirms all over Luka's body!"
if %ransu=2 mov $sel1,"Being wrapped in my flesh feels good, doesn't it?":mov $sel2,"Her sticky flesh covers more of Luka's body!"
if %ransu=3 mov $sel1,"I can even play with you like this...":mov $sel2,"The sticky flesh tightens around Luka!"
if %ransu=4 mov $sel1,"I'll use my sticky flesh to play with your thing...":mov $sel2,"The flesh around his penis starts to vibrate!"
if %ransu=5 mov $sel1,"I know it feels good, so go ahead and come...":mov $sel2,"Her sticky flesh teases every part of Luka's exposed body!"
name $name
eng $sel1:$sel6\
name ""
skillname "Dissolving Sonata"
dwave 1,"se\ero_makituki3.ogg"
eng $sel2:$sel6
skillcount2 3500
if %nanido<2 damage 160,180
if %nanido=2 damage 170,190
if %nanido=3 damage 180,200
skillname ""
if %mylife=0 sub %stack,1:return *cassandra_h7
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*cassandra_a9

add %stack,1
>Luka is being tightly embraced by Cassandra...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You'll love being eaten by me...":mov $sel2,"Cassandra's sticky flesh wraps around Luka, melting him in pleasure!"
if %ransu=2 mov $sel1,"You'll finish just like this...":mov $sel2,"Her sticky flesh squirms around Luka's penis!"
if %ransu=3 mov $sel1,"Do you want your penis to be dissolved too?":mov $sel2,"Her sticky flesh wriggles around Luka's penis!"
if %ransu=4 mov $sel1,"Just think of the hundreds of other men who died like this...":mov $sel2,"Cassandra hugs Luka tighter!"
if %ransu=5 mov $sel1,"It feels good, doesn't it? Slowly being digested...":mov $sel2,"Cassandra's sticky flesh covers more of Luka's body!"
name $name
eng $sel1:$sel6\
name ""
skillname "Prey's Requiem"
dwave 1,"se\ero_makituki3.ogg"
eng $sel2:$sel6
skillcount2 3501
if %nanido<2 damage 170,190
if %nanido=2 damage 180,200
if %nanido=3 damage 190,210
skillname ""
if %mylife=0 sub %stack,1:return *cassandra_h9
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*cassandra_onedari

mov $list1,"Corrosive Prelude"
if %3494>0 mov %list_num1,1
mov $list2,"Flesh Waltz"
if %3495>0 mov %list_num2,1
mov $list3,"Melting Rondo"
if %3496>0 mov %list_num3,1
mov $list4,"Digestive Tango"
if %3497>0 mov %list_num4,1
mov $list5,"Sticky Symphony"
if %3498>0 mov %list_num5,1
mov $list6,"Black and White Concerto"
if %3499>0 mov %list_num6,1
mov $list7,"Dissolving Sonata"
if %3500>0 mov %list_num7,1
mov $list8,"Prey's Requiem"
if %3501>0 mov %list_num8,1
gosub *cmd_onedari
if %cmd1=11 goto *cassandra_onedari1
if %cmd1=12 goto *cassandra_onedari2
if %cmd1=13 goto *cassandra_onedari3
if %cmd1=14 goto *cassandra_onedari4
if %cmd1=15 goto *cassandra_onedari5
if %cmd1=16 goto *cassandra_onedari6
if %cmd1=17 goto *cassandra_onedari7
if %cmd1=18 goto *cassandra_onedari8
if %cmd1=-1 goto *cassandra_main
goto *cassandra_onedari



*cassandra_onedari1

gosub *onedari_syori
name $name
>You want to feel my flesh all over your body?\
name ""
gosub *cassandra_a1
skip -1



*cassandra_onedari2

gosub *onedari_syori
name $name
>You wish to be stroked by these hands of mine?\
name ""
gosub *cassandra_a2
skip -1



*cassandra_onedari3

gosub *onedari_syori
name $name
>You wish to meet your end between my breasts?\
name ""
gosub *cassandra_a3
skip -1



*cassandra_onedari4

gosub *onedari_syori
name $name
>You want to be trampled on?\
name ""
gosub *cassandra_a4
skip -1



*cassandra_onedari5

gosub *onedari_syori
name $name
>You want to be wrapped in this skirt?\
name ""
gosub *cassandra_a5
skip -1



*cassandra_onedari6

gosub *onedari_syori
name $name
>You want to drown in my flesh?\
name ""
gosub *cassandra_a6
skip -1



*cassandra_onedari7

if %kousoku<>1 gosub *onedari_syori
if %kousoku=1 gosub *onedari_syori_k
name $name
>You want to drown in my flesh?\
name ""
notif %kousoku=1 gosub *cassandra_a6
gosub *cassandra_a8
skip -1



*cassandra_onedari8

if %kousoku<>2 gosub *onedari_syori
if %kousoku=2 gosub *onedari_syori_k
name $name
>You want to be digested as I tightly embrace you?\
name ""
notif %kousoku=2 gosub *cassandra_a7
gosub *cassandra_a9
skip -1



*cassandra_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\cassandra_bk02.bmp",0,0
gosub *syasei2
>As her sticky flesh covers his body, Luka comes, covering Cassandra in semen.\
mov %viclose,1:gosub *lose
mov %2610,%2610+1:if %2610=1 mov %count_koenemy,%count_koenemy+1
if %2610>%count_most mov %count_most,%2610:mov $count_mostname,$name
count 15,4
mov $bad1,"Luka was forced to an orgasm as Cassandra's flesh squirmed over his body."
gosub *face2
name $name
>You let out so much...@
>Your semen, too, is nothing but food for me...\
name ""
goto *cassandra_ha



*cassandra_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\cassandra_bk01.bmp",0,0
gosub *syasei2
>As Cassandra strokes him, Luka comes, covering her hands in semen.\
mov %viclose,1:gosub *lose
mov %2610,%2610+1:if %2610=1 mov %count_koenemy,%count_koenemy+1
if %2610>%count_most mov %count_most,%2610:mov $count_mostname,$name
count 5,4
mov $bad1,"Luka was forced to an orgasm from Cassandra's stroking."
gosub *face2
name $name
>You let out so much...@
>Your semen, too, is nothing but food for me...\
name ""
goto *cassandra_ha



*cassandra_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\cassandra_bk03.bmp",0,0
gosub *syasei2
>As Luka's rubbed between her soft breasts, he comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2610,%2610+1:if %2610=1 mov %count_koenemy,%count_koenemy+1
if %2610>%count_most mov %count_most,%2610:mov $count_mostname,$name
count 7,4
mov $bad1,"Luka was forced to an orgasm by Cassandra's tit fuck."
gosub *face2
name $name
>You let out so much...@
>Your semen, too, is nothing but food for me...\
name ""
goto *cassandra_ha



*cassandra_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\cassandra_bk04.bmp",0,0
gosub *syasei2
>As Cassandra stamps on Luka's penis, he comes, covering her foot with semen.\
mov %viclose,1:gosub *lose
mov %2610,%2610+1:if %2610=1 mov %count_koenemy,%count_koenemy+1
if %2610>%count_most mov %count_most,%2610:mov $count_mostname,$name
count 6,4
mov $bad1,"Luka was forced to an orgasm as Cassandra stepped on him."
gosub *face2
name $name
>You let out so much...@
>Your semen, too, is nothing but food for me...\
name ""
goto *cassandra_ha



*cassandra_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\cassandra_bk02.bmp",0,0
gosub *syasei2
>As Cassandra's fleshy skirt wraps around Luka's lower body, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2610,%2610+1:if %2610=1 mov %count_koenemy,%count_koenemy+1
if %2610>%count_most mov %count_most,%2610:mov $count_mostname,$name
count 27,4
mov $bad1,"Luka was forced to an orgasm as Cassandra's fleshy skirt wrapped around him."
gosub *face2
name $name
>You let out so much...@
>Your semen, too, is nothing but food for me...\
name ""
goto *cassandra_ha



*cassandra_h6

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\cassandra_ha2.bmp",0,0
gosub *syasei2
>As Cassandra's sticky flesh squirms around Luka's penis, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2610,%2610+1:if %2610=1 mov %count_koenemy,%count_koenemy+1
if %2610>%count_most mov %count_most,%2610:mov $count_mostname,$name
count 15,4
mov $bad1,"Luka was forced to an orgasm by Cassandra's sticky flesh."
gosub *face2
name $name
>You let out so much...@
>Your semen, too, is nothing but food for me...\
name ""
goto *cassandra_hb



*cassandra_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\cassandra_ha2.bmp",0,0
gosub *syasei2
>While covered in her sticky flesh, Luka comes, spraying semen onto her.\
mov %viclose,1:gosub *lose
mov %2610,%2610+1:if %2610=1 mov %count_koenemy,%count_koenemy+1
if %2610>%count_most mov %count_most,%2610:mov $count_mostname,$name
count 15,4
mov $bad1,"As Cassandra's flesh crawled over his body, Luka was forced to an orgasm."
gosub *face2
name $name
>Was it enjoyable to come inside my flesh?@
>Your semen, too, is nothing but food for me...\
name ""
goto *cassandra_hb



*cassandra_h8

mov %ikigoe,3:gosub *ikigoe
name $name
>My, already finished?\
name ""
gosub *syasei1:gosub *syasei2
>As soon as Cassandra's fleshy skirt wraps around Luka, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2610,%2610+1:if %2610=1 mov %count_koenemy,%count_koenemy+1
if %2610>%count_most mov %count_most,%2610:mov $count_mostname,$name
count 15,11
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to an orgasm as soon as Cassandra's flesh wrapped around him."
gosub *face2
name $name
>How miserable, to have an accidental ejaculation...@
>Your semen, too, is nothing but food for me...\
name ""
goto *cassandra_hb



*cassandra_h9

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>Wrapped in Cassandra's fleshy skirt, Luka comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2610,%2610+1:if %2610=1 mov %count_koenemy,%count_koenemy+1
if %2610>%count_most mov %count_most,%2610:mov $count_mostname,$name
count 15,11
mov $bad1,"As Cassandra's flesh crawled over his body, Luka was forced to an orgasm."
gosub *face2
name $name
>How miserable, to ejaculate in this situation...@
>Your semen, too, is nothing but food for me...\
name ""
goto *cassandra_hb



*cassandra_ha

mov $bad2,"Stuck in her cage of flesh, Luka's semen was squeezed until his death."
if %2830=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2830,1
name "Luka"
>Ahh...\
name ""
>Exhausted after my orgasm, I fall to my knees.@
>Her sticky flesh quickly surrounds my powerless body.\
dwave 1,"se\ero_slime3.ogg"
mov %hseanwave,21:hseanwave
cspl 690,699
lsp 700,":a;chara\cassandra_hb1.bmp",0,0:print 10,500
>The flesh around me forms into the shape of a bizarre organ, with me inside of it.\
name "Luka"
>Guh...!@>What is this!?\
name ""
>The strange organ holds down my limbs, making it so I can't move an inch.\
>Supporting my body, it's almost like I'm sitting down inside of this organ of sticky flesh.\
>Just what's going to happen to me in this horrifying position?@
>A chill goes down my back just thinking about it.\
name $name
>I can grow and control my own flesh, moving my organs itself outside of my body.\
>In other words, this whole room is the same as my body itself.\
>That organ I created around you, too, is part of me.@
>Basically, you're inside an organ made specially to squeeze out male semen.\
name ""
name "Luka"
>Th...This can't be... Ahh...\
name ""
>All of the flesh around me pulses with life, clearly alive.@
>The flesh around my penis slightly shifts as well, sending sparks of pleasure up my spine.\
name $name
>Here... It's an organ I made specially for you.@
>My flesh itself is coiling around your penis, eager to squeeze out that semen of yours.\
name ""
name "Luka"
>N...No... Ah...\
name ""
>The squirming flesh clings to my penis.\
>The flesh coils around the shaft of my penis, slowly covering more and more of me inside of her organ.\
name "Luka"
>Ahhh!!\
name ""
>I can't stop myself from trembling from the strange stimulation.\
>The warm flesh coils around the rest of my penis, finally reaching my tip.\
>As soon as it does, it starts to squirm and vibrate all across my glans.\
name $name
>Make sure you watch closely...@
>As my superior flesh toys with your inferior penis.\
name ""
name "Luka"
>Ahh...\
name ""
>This strange organ... How can it feel good...?@
>Stuck inside of it, I'm forced to stare right at Cassandra as she looks on, watching me be made to shamefully orgasm for her personal enjoyment.\
name $name
>My, my, isn't that a pitiful position for you?@
>Unable to move, and being forced to ejaculate.\
>Still no more than a boy, made to shamefully spray your semen all over the place inside my organ.\
>Living your life up until this point just to feed me some of your semen.\
>As a man... No, as a living being, the ultimate disgrace.\
name ""
name "Luka"
>S...Stop!@>Ahh!\
name ""
>I feel her flesh tighten around my tip and crawl down my back muscle as she taunts me.@
>The strange pleasure makes my waist go numb as I feel an ejaculation about to explode.\
name "Luka"
>Ahh... I'm going to come...\
name ""
name $name
>Hehe, already finished?@
>Make sure you watch closely as you succumb to your instincts and willingly surrender to me.\
name ""
>Her flesh tightens around me as it squirms and wriggles, stimulating my most sensitive spots.@
>My mouth half opens in a moan as the massage forces me to ejaculate.\
name "Luka"
>Ahhh...\
name ""
gosub *syasei1
lsp 700,":a;chara\cassandra_hb2.bmp",0,0
gosub *syasei2
>Reaching a sweet climax, I shake as I come, filling her pulsing organ with my semen.\
name "Luka"
>Haaaa...\
name ""
>I relax in exhaustion as my face flushes in shame.\
>This horrifying organ forced me to come...@
>Locking me in place, I even had to watch as she laughed at me, too.\
>My pride itself is simply trampled on by her.\
name $name
>Hehe, was it enjoyable?@
>How was the taste of pleasure as you met that miserable finish?\
>...But playtime ends here.@
>Now I'm going to squeeze you without any mercy.\
name ""
name "Luka"
>S...Stop...\
name ""
lsp 700,":a;chara\cassandra_hb3.bmp",0,0:print 10,500
>As soon as she said that, the hole in her organ closes, leaving me unable to see what's going on.\
name "Luka"
>Ahhhhh!!\
name ""
mov %hseanwave,22:hseanwave
>In the next moment, more flesh clings to my penis as the squirming and vibrating get far more powerful than before.\
>Unable to see what's happening, the fear and excitement are magnified as the sticky flesh moves all around me.\
name "Luka"
>Wh...What is this!?@
>What are you doing!? Ahhh!\
name ""
lsp 690,":a;chara\cassandra_ct01.bmp",0,0:print 10,500
>I feel something brush against my penis, a more solid piece of flesh covered in tiny bumps.\
>That strange thing latches onto my penis, with tiny little feelers coming off of it and rubbing all over the tip of my penis.\
name "Luka"
>Wh...What is this...? It feels so good...\
name ""
name $name
>You should be happy... This is an organ I created just to delight men in various ways.@
>It will feel so good, it will be like you're melting in bliss.\
name ""
name "Luka"
>Ah... Ahhh...!\
name ""
>The meat brush stuck to my penis vibrates as the tiny feelers flick back and forth across my tip.\
>On the other side of my penis, I feel another lump of flesh stroking my back muscle.@
>As the two unique stimulations attack me at the same time, I feel a powerful ejaculation well up.\
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\cassandra_hb4.bmp",0,0
lsp 690,":a;chara\cassandra_ct02.bmp",0,0
gosub *syasei2
>The flesh vibrates around me as I come, as if excited at my semen being released inside the organ.\
>Unable to take it, I give myself over to the amazing pleasure.\
>This strange organ is forcing me to come...@
>Unable to do a thing to escape, I'm left completely humiliated as a man.\
name "Luka"
>Ahhh...\
name ""
>After the sweet feelings of my last orgasm fade, the stimulations begin again.\
>Given no break after my last orgasm, her organ is already well on its way to forcing another ejaculation out of me.\
name "Luka"
>Ahhh!@>Stop already!\
name ""
name $name
>What are you saying?@
>Did you think this would stop after one or two ejaculations?\
>You'll be squeezed in this organ until you're dead.@
>There's no stopping until the last drop is out of you.\
name ""
name "Luka"
>Hyaaa...\
name ""
>The tiny little feelers coming off the meat brush start to tickle the tip of my penis.@
>Her pulsing organ continues doing what it was designed for, working on another ejaculation from its catch.\
name "Luka"
>Ahh... I'm going to come again...\
name ""
name $name
>Hehehe... The only reason for that organ is to squeeze a man dry.@
>So there's no need to hold back, just give in...\
>Gasp in pleasure until there isn't even a drop left.\
name ""
name "Luka"
>Ahhh...\
name ""
gosub *syasei1
lsp 700,":a;chara\cassandra_hb5.bmp",0,0
lsp 690,":a;chara\cassandra_ct03.bmp",0,0
gosub *syasei2
>I shoot out semen in her organ again.@
>Leaking out, her organ absorbs it to use as nourishment.\
name $name
>Come on, keep it up...@
>You still have a ways to go until you're empty.\
name ""
name "Luka"
>Hyaa!@>H...Help me!\
name ""
>My arms and legs are locked in place, leaving me helpless to resist this forced squeezing.@
>Her fleshy brush continues to tickle and rub me, forcing out another orgasm seemingly seconds after my last one.\
name "Luka"
>Ahh...!\
name ""
gosub *syasei1:gosub *syasei2
>Drowning in misery, I leak out inside of her as tears fall from my eyes.@
>More food for her...\
name $name
>Oh my... Why are you crying?@
>Aren't you happy at being squeezed by me?\
>This organ makes men go mad with pleasure, after all...\
name ""
name "Luka"
>Ah!@>Ahhh!\
name ""
>No mercy and no escape, her horrible organ easily brings me to another orgasm as I fight back the tears.\
gosub *syasei1:gosub *syasei2
name "Luka"
>Haaa...\
name ""
>My heart and body are in shreds, torn apart by Cassandra's organ.@
>Now nothing more than a living addition to her organ, I'm only used to squirt out semen to nourish her.\
>Drowning in misery, my life itself is slowly being taken by this organ of hers.\
name "Luka"
>Ahh...aa...\
name ""
name $name
>My my, you appear to be getting awfully weak.@
>But how lucky you are... To meet your end while immersed in pleasure.\
>Well then, shall I finish you off once and for all?@
>A final squeeze, and you'll be in heaven.\
name ""
>With a final squeeze and rub, her organ wrings out a final orgasm.\
gosub *syasei1:gosub *syasei2
>With a weak throb, the last drops of semen bubble out of me.@
>As my vision goes dark, I realize that my final moments are here at last.\
name "Luka"
>Ah...aa...\
name ""
>I relax in the coming darkness as the last of my power fades.\
>Squeezed to the last drop, I'm left completely empty.\
gosub *anten
mov %hseanwave,0:hseanwave
name $name
>Hehe, a corpse with a smile on his face.@
>Remember that feeling even in the afterlife...\
name ""
>After the boy named Luka was squeezed dry, Cassandra's flesh digested the remains of his body.\
>Like that, all trace of Luka vanished from the world after his journey to Lady's Village...\
>.............\
goto *badend



*cassandra_hb

mov $bad2,"Covered in Cassandra's flesh, Luka was dissolved without mercy."
if %2831=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2831,1
mov %hseanwave,18:hseanwave
cspl 690,699
lsp 700,":a;chara\cassandra_hc1.bmp",0,0:print 10,500
name "Luka"
>Ahhh...\
name ""
>Cassandra hugs me tighter, her flesh melting away from her body and covering mine.\
name $name
>Hehe... Isn't my embrace simply heavenly?@
>Let me hold you even closer...\
name ""
lsp 700,":a;chara\cassandra_hc2.bmp",0,0:print 10,500
>More and more, her sticky flesh flows off of her and onto my body, covering me in her flesh.\
name "Luka"
>Ahh...\
name ""
>It's like she's an amoeba, slowly moving her own body into mine.@
>As her flesh envelopes my body, I start to get more and more afraid.\
name $name
>Hehe, there's no need to be afraid.@
>All men have smiles on their face as they melt away in my embrace.\
name ""
name "Luka"
>Ahhh...\
name ""
>Her flesh squirms around my body as it continues to cover me.@
>Just as she said, I can feel pleasure radiating from my skin wherever she touches me.\
>Responding to that unnatural pleasure, my penis gets erect.\
name $name
>Hehehe, your pathetic organ seems to have gotten excited.@
>Do you want my flesh to envelope that penis of yours, too?\
name ""
name "Luka"
>Ah... Ahhh...\
name ""
>Her sticky flesh starts to pour off of her body, covering my penis.@
>The warm flesh pools around it until it slightly solidifies again, enveloping my penis.\
>With my penis now stuck in her warm flesh, I gasp as the sudden explosion of pleasure surprises me.\
name "Luka"
>Hyaaaa!@
>A...Amazing...!\
name ""
name $name
>Hehe, come as much as you want.@
>My embrace is too much for a man to endure, after all.\
name ""
name "Luka"
>Ahh... I'm going to come...\
name ""
>I moan as her warm glob of flesh around my penis vibrates and massages me, attached to my skin itself.\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>I succumb to the pleasure, spraying semen into her flesh.@
>All the while, her pulsing flesh continues to stimulate me.\
>Just the touch of her skin on me is too much for me to endure...\
name $name
>Hehe, you came...@
>Meeting your death in my embrace is simply the best way for a man to die...\
>I'll embrace you even tighter, so come even more...\
name ""
lsp 700,":a;chara\cassandra_hc3.bmp",0,0:print 10,500
>Even more of her flesh flows over me.@
>My body itself is being slowly absorbed into her...\
name "Luka"
>Haaa... That feels good...\
name ""
name $name
>Hehehe... This flesh is my digestive organ.@
>You'll be dissolved and digested as I embrace you...\
name ""
name "Luka"
>N...No...\
name ""
>The horrifying words snap me back to reality in an instant.@
>Cassandra's going to eat me like this...?\
name "Luka"
>L...Let go... Ahh...\
name ""
name $name
>Hehe, there's no escaping from my flesh.@
>You'll dissolve into nothing like this...\
name ""
>Everywhere her corrosive flesh touches, a strange warmth spreads through the area.@
>The relaxing feeling forces me to let out a long sigh before I can stop myself.\
>But this relaxing warmth must be my body being dissolved...\
name "Luka"
>Hyaaa... S... Stop...\
name ""
>I try to move my arms and legs, but they're firmly stuck in her sticky flesh.@
>I'm already no more than prey being devoured by a predator...\
name $name
>Oh?@>Are you still resisting?@
>It seems that the pleasure I was giving wasn't enough.\
name ""
>The flesh surrounding my penis starts to wriggle and squirm.@
>Helplessly being eaten, I moan in pleasure as the predator uses pleasure to calm me, her prey.\
name "Luka"
>Ah...ahh...\
name ""
>I stop trying to struggle as I feel myself on the edge of an orgasm.\
name "Luka"
>I...I'm coming...\
name ""
name $name
>Come...@
>I'll let you meet your death in ecstasy...\
name ""
name "Luka"
>Haaa...\
name ""
>I relax as I immerse myself in the pleasure from her flesh.\
gosub *syasei1:gosub *syasei2
>My strength fades as I come inside her flesh, my energy leaking out just as fast as my semen.\
>I'm completely defenseless, and just making myself weaker with each orgasm.\
name $name
>Hehe... Just give yourself over to my embrace.@
>I'll make it feel good for you, so just surrender...\
name ""
lsp 700,":a;chara\cassandra_hc4.bmp",0,0:print 10,500
>Her corrosive flesh flows onto me again, covering me from head to toe in her own body.\
name $name
>Now that you're covered in my flesh, I can begin to digest you...@
>Enjoy it to your last breath...\
name ""
if %hosyoku_cut=1 goto *hosyoku_cut
name "Luka"
>Ahhh...!\
name ""
mov %hseanwave,19:hseanwave
>Her flesh pulses around me.@
>The vibrations of her sticky flesh massage and caress my entire body.\
>Hopeless and seeing no way out, I let myself relax and indulge in the sensations.\
name $name
>Hehe... I'll be dissolving and digesting your body now.@
>Your life will be nothing but nourishment for me...\
>How does it feel?@>Hehe.\
name ""
name "Luka"
>Ahhh...\
name ""
>Her sticky flesh flows over me, cornering me with the digestive stimulation.\
>My waist goes numb as the overwhelming pleasure all around me throws me over the edge.\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>My semen flows out into her.@
>Even while being eaten, she still forced me to come...\
name $name
>Oh my, you seem to have ejaculated while being digested.@
>What a pitiful little boy.\
name ""
name "Luka"
>Ahh...\
name ""
>It feels like I'm melting in the pleasure...@
>No, I really am melting...\
>Even though it's horrifying, I've already become a captive to the pleasure given to me from her digestion.\
name "Luka"
>Ahh... That feels good...\
name ""
lsp 700,":a;chara\cassandra_hc5.bmp",0,0:print 10,500
>My body itself dissolves, turning into liquid and being absorbed into her body.\
>Everywhere my body dissolves, the sense of release that goes with it is just like another powerful ejaculation.\
name $name
>How are you enjoying the feeling that comes with being eaten by me?@
>You can enjoy it until there's nothing left of you...\
name "Luka"
>Ahh...aa...\
name ""
>More and more of my body dissolves away and is absorbed into her sticky flesh.@
>All the while, I'm in a trance of complete ecstasy.\
>I can't think of anything better in the world than this feeling of being eaten by her.\
name $name
>Hehe... The joy of eating a living man.@
>There's no greater bliss than that for a monster.\
name ""
>Cassandra giggles as she absorbs and digests the last of my body.\
mov %hseanwave,0:hseanwave
lsp 700,":a;chara\cassandra_hc6.bmp",0,0:print 10,500
name $name
>Thanks for the meal, hehe.@
>I enjoyed every part of you...\
name ""
gosub *anten
>..............\
goto *badend



*yougan_start

mov $name,"Lava Girl"
mov $name2,"Lava Girl"
mov $lavel,"yougan"
mov $tatie1,"yougan_st01"
mov $tatie2,"yougan_st02"
mov $tatie3,"yougan_st03"
mov $tatie4,"yougan_h1"
mov $haikei,"bg115"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,4800
if %nanido=2 mov %max_enemylife,5300
if %nanido=3 mov %max_enemylife,7200
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,40
if %nanido=3 mov %earth_keigen,20
mov %music,1
mov %tikei,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"You can't escape from my magma..."
mov $mogaku_sel2,"It's useless to struggle..."
mov $mogaku_sel3,"It feels good, doesn't it? Stop struggling, and just soak in the pleasure..."
mov $mogaku_sel4,"No matter how hard you struggle, you won't get away..."
mov $mogaku_sel5,"Stop struggling, and just give me your semen."
mov $mogaku_dassyutu1,"Why would you run from me...?"
mov $mogaku_dassyutu2,"It will feel so good when you ejaculate..."
mov $mogaku_earth_dassyutu1,"How strange..."
mov $mogaku_earth_dassyutu2,"I feel the power of nature from you..."
mov $half_s1,"The heat feels good, doesn't it?"
mov $half_s2,"It will feel even better after you come..."
mov $kiki_s1,"Almost done?"
mov $kiki_s2,"That's good... Pour it all inside my magma."
mov %end_n,7
mov %exp_minus,0
mov %zmonster_x,-270
mov %tukix,270
mov %owaza_count1a,5
name $name
>It can't be... A human?@
>It has been decades since a human last came here...\
name ""
name "Luka"
>Excuse me... I'm looking for Salamander.@
>Can you just let me go by, please?\
name ""
name $name
>It has been so long since I had a feast...@
>Let my magma absorb all of your semen...\
name ""
name "Luka"
>I...I'd burn to death if I even touched you!\
name ""
name $name
>Of course, I'll cool my body down...@
>I wouldn't want to char my food.\
name ""
goto *common_main



*yougan_v

gosub *face3
name $name
>I... How could I be sealed...?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Lava Girl turns into a puddle of lava!\
mov %viclose,1:gosub *victory
mov %getexp,25000:gosub *lvup
mov %2311,1
goto *sean0239



*yougan_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>You want to come inside my magma?@
>Then let me heat you up...\
name ""
goto *yougan_a



*yougan_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *yougan_kousan
if %cmd1=16 goto *yougan_onedari
if %cmd1=17 goto *common_skill
goto *yougan_main



*yougan_a

if %kousoku=1 gosub *yougan_a4:goto *common_main
rnd2 %ransu,1,3
if %ransu=1 gosub *yougan_a1:goto *common_main
if %ransu=2 gosub *yougan_a2:goto *common_main
if %ransu=3 && %owaza_count1a>6 gosub *yougan_a3:goto *common_main
skip -4



*yougan_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My hand is nice and hot..."
if %ransu=2 mov $sel1,"Ejaculate on my hot palm..."
if %ransu=3 mov $sel1,"It feels good like this, doesn't it?"
name $name
eng $sel1:$sel6\
name ""
skillname "Magma Shaft"
dwave 1,"se\ero_koki1.ogg"
>The Lava Girl strokes Luka's penis with her hot hand!
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3502
if %nanido<2 damage 110,120
if %nanido=2 damage 130,140
if %nanido=3 damage 150,160
skillname ""
if %mylife=0 sub %stack,1:return *yougan_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*yougan_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Pour your cool semen in my hot magma..."
if %ransu=2 mov $sel1,"Ejaculate in my magma..."
if %ransu=3 mov $sel1,"It feels nice and hot, doesn't it?"
name $name
eng $sel1:$sel6\
name ""
skillname "Magma Draw"
dwave 1,"se\ero_slime1.ogg"
>The Lava Girl's hot magma flows over Luka's body, stimulating him!
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3503
if %nanido<2 damage 115,125
if %nanido=2 damage 135,145
if %nanido=3 damage 155,165
skillname ""
if %mylife=0 sub %stack,1:return *yougan_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*yougan_a3

add %stack,1
mov %owaza_count1a,0
name $name
>Pour your semen in me...\
name ""
skillname "Magma Hold"
dwave 1,"se\ero_slime3.ogg"
>The Lava Girl's hot magma flows over Luka's body!
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
if %nanido<2 damage 120,140
if %nanido=2 damage 140,160
if %nanido=3 damage 160,180
mov %kousoku,1:gosub *status_print
>Luka is stuck inside the Lava Girl!\
skillname ""
if %mylife=0 sub %stack,1:return *yougan_h3
if %kousan=2 sub %stack,1:return
gosub *face2
name $name
if %first_sel1=1 skip 4
>It feels nice and hot, doesn't it?@
>I'll make your penis even hotter...\
skip 3
>This time, don't run...@
>I'll make your penis even hotter...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,3
if %earth=0 && %nanido=2 mov %genmogaku,4
if %earth=0 && %nanido=3 mov %genmogaku,5
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,2
if %earth>0 && %nanido=3 mov %genmogaku,3
sub %stack,1
return



*yougan_a4

add %stack,1
>Luka's body is bound by the Lava Girl...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My magma will swirl around your penis...":mov $sel2,"Her magma swirls around Luka's penis!"
if %ransu=2 mov $sel1,"Drown in my body...":mov $sel2,"The magma flows all over Luka's body, drowning him in pleasure!"
if %ransu=3 mov $sel1,"I'll heat up your penis...":mov $sel2,"Her magma bubbles around Luka's penis!"
if %ransu=4 mov $sel1,"Let my magma stick to your body...":mov $sel2,"Magma crawls around Luka's body, as if a hot tongue was licking him all over!"
if %ransu=5 mov $sel1,"Let me heat you up to a boil...":mov $sel2,"The sticky magma jiggles as it flows around Luka's body!"
name $name
eng $sel1:$sel6\
name ""
skillname "Magma Bath"
dwave 1,"se\ero_makituki2.ogg"
eng $sel2:$sel6
skillcount2 3504
if %nanido<2 damage 120,140
if %nanido=2 damage 140,160
if %nanido=3 damage 160,180
skillname ""
if %mylife=0 sub %stack,1:return *yougan_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*yougan_onedari

mov $list1,"Magma Shaft"
if %3502>0 mov %list_num1,1
mov $list2,"Magma Draw"
if %3503>0 mov %list_num2,1
mov $list3,"Magma Bath"
if %3504>0 mov %list_num3,1
gosub *cmd_onedari
if %cmd1=11 goto *yougan_onedari1
if %cmd1=12 goto *yougan_onedari2
if %cmd1=13 goto *yougan_onedari3
if %cmd1=14 goto *yougan_onedari4
if %cmd1=15 goto *yougan_onedari5
if %cmd1=16 goto *yougan_onedari6
if %cmd1=17 goto *yougan_onedari7
if %cmd1=18 goto *yougan_onedari8
if %cmd1=-1 goto *yougan_main
goto *yougan_onedari



*yougan_onedari1

gosub *onedari_syori
name $name
>You want to be stroked by my hot hand?\
name ""
gosub *yougan_a1
skip -1



*yougan_onedari2

gosub *onedari_syori
name $name
>You want to come inside my magma?\
name ""
gosub *yougan_a2
skip -1



*yougan_onedari3

gosub *onedari_syori_k
name $name
>You want to drown in my body?\
name ""
if %kousoku=0 gosub *yougan_a3
gosub *yougan_a4
skip -1



*yougan_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\yougan_bk03.bmp",0,0
gosub *syasei2
>As her hot hand strokes Luka, he comes, covering her magma formed hand with semen.\
mov %viclose,1:gosub *lose
mov %2611,%2611+1:if %2611=1 mov %count_koenemy,%count_koenemy+1
if %2611>%count_most mov %count_most,%2611:mov $count_mostname,$name
count 5,3
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to an orgasm as the Lava Girl's hot hand stroked him."
gosub *face2
name $name
>Your cold semen is all over my hand...\
name ""
goto *yougan_h



*yougan_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\yougan_bk03.bmp",0,0
gosub *syasei2
>As her hot magma flows over his body, Luka comes, mixing his semen in with her magma.\
mov %viclose,1:gosub *lose
mov %2611,%2611+1:if %2611=1 mov %count_koenemy,%count_koenemy+1
if %2611>%count_most mov %count_most,%2611:mov $count_mostname,$name
count 11,3
mov $bad1,"Luka was forced to an orgasm as the Lava Girl's magma flowed over his body."
gosub *face2
name $name
>Your cold semen is mixing with my magma...\
name ""
goto *yougan_h



*yougan_h3

mov %ikigoe,3:gosub *ikigoe
name $name
>You're already done...?\
name ""
gosub *syasei1
lsp 700,":a;chara\yougan_h2.bmp",0,0
gosub *syasei2
>As her hot magma wraps around his body, Luka accidentally comes, mixing his semen in with her magma.\
mov %viclose,1:gosub *lose
mov %2611,%2611+1:if %2611=1 mov %count_koenemy,%count_koenemy+1
if %2611>%count_most mov %count_most,%2611:mov $count_mostname,$name
count 11,3
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come just from the Lava Girl's magma flowing over him."
gosub *face2
name $name
>You couldn't take my heat...\
name ""
goto *yougan_h



*yougan_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\yougan_h2.bmp",0,0
gosub *syasei2
>Stuck in her hot magma as it runs all over his body, Luka comes, mixing his semen in with her magma.\
mov %viclose,1:gosub *lose
mov %2611,%2611+1:if %2611=1 mov %count_koenemy,%count_koenemy+1
if %2611>%count_most mov %count_most,%2611:mov $count_mostname,$name
count 11,3
mov $bad1,"Luka was forced to an orgasm as he was bound in the Lava Girl's magma."
gosub *face2
name $name
>So much cold semen inside me...\
name ""
goto *yougan_h



*yougan_h

mov $bad2,"Stuck inside her body, Luka's semen was endlessly squeezed."
if %2611=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
mov %hseanwave,18:hseanwave
cspl 690,699
lsp 700,":a;chara\yougan_h3.bmp",0,0:print 10,500
if %kousoku>0 goto *yougan_hb
>Exhausted after my orgasm, I fall to my knees.@
>Quickly taking her chance, the Lava Girl's magma washes over me and sucks me into her body.\
name "Luka"
>Aieee!!\
name ""
name $name
>There's no need to be afraid...@
>I lowered my body temperature so as not to burn you.\
>Men are so rare here, there's no way I would let one go to waste.@
>I can use my magma like this to squeeze out their semen...\
name ""
goto *yougan_hb



*yougan_hb

>Her hot sticky magma coiled around me flows around my body, slightly solidifying around my penis.\
>The initial burst of fear from being burned fades as the relaxing warmth from her body fills me.\
name "Luka"
>Ahh... What is this...?\
name ""
>The heat quickly exhausts me, making me melt in the warm stimulations.@
>After no time at all, I feel myself giving in to the relaxing pleasure.\
name "Luka"
>Ah... That feels good...\
name ""
gosub *syasei1
lsp 700,":a;chara\yougan_h4.bmp",0,0
gosub *syasei2
name "Luka"
>Eh...?@> I... I came...?\
name ""
>The strange sense of release fills my lower body as I come.@
>I gasp in surprise at the sudden orgasm, as there was no preceding rise to it.\
>The odd ejaculation felt more like incontinence than anything.@
>But with this relaxing warmth all around me, the afterglow feels many times better than anything I've felt before.\
name "Luka"
>Ahhh... Amazing...\
name ""
>Her warm magma body covers my lower body.@
>Just as she said, the temperature feels like a nice relaxing bath, without burning me.\
>As the warmth fills my body, it feels like I could melt away in bliss inside of her.\
name "Luka"
>Ahh... It's so warm...\
name ""
name $name
>Do you want to indulge in my warmth even more?@
>Then let me bring you further inside...\
name ""
lsp 700,":a;chara\yougan_h5.bmp",0,0:print 10,500
>Her magma bubbles up, covering me all the way to my neck.@
>More of my body is immersed in the relaxing warmth of her body.\
>With my penis well inside of her body, the feelings of the last orgasm I had comes flooding back to me.\
name "Luka"
>So warm... So good...\
name ""
>Her sticky magma, almost like jelly, flows around my penis.@
>It's a bliss I've never experienced before in my life.\
>Completely relaxed by her warm body, I immerse myself in the pleasure.\
name "Luka"
>Ahhhh...\
name ""
gosub *syasei1:gosub *syasei2
>Feeling like I could melt into nothing, semen leaks out of me into her.@
>Just like before, it's almost like I'm peeing instead of ejaculating.\
>Sighing in pleasure, I relax inside her body even deeper as the overwhelming feeling of release fills me.\
name "Luka"
>Ahh... Incredible... This feels so good...\
name ""
name $name
>Being inside my body is the best, isn't it?@
>Let me take you further in...\
>I'll make sure you stay alive, so come as much as you want...\
name ""
mov %hseanwave,19:hseanwave
lsp 700,":a;chara\yougan_h6.bmp",0,0:print 10,500
>Her magma bubbles up one more time, covering the rest of my body.@
>With even my head immersed in her body, I'm drowning in the Lava Girl's warmth.\
name "Luka"
>Ahhh!\
name ""
>The relaxing bliss gets even deeper, consuming more and more of me.@
>I feel so safe and secure inside her warm body, almost as if I'm back in my mother's womb.\
name "Luka"
>Ahhh...\
name ""
gosub *syasei1:gosub *syasei2
>Sighing in pleasure, more semen leaks out into the Lava Girl's body.\
name "Luka"
>Haaa... So good...\
name ""
gosub *syasei1:gosub *syasei2
>I leak out inside of her over and over, drowning in ecstasy.\
name $name
>I'll squeeze out your semen for the rest of your life like this...@
>I'll keep you safe inside my womb so that you can give me your semen forever.\
name ""
name "Luka"
>Ahhh...\
name ""
gosub *syasei1:gosub *syasei2
>Not bothering to endure it at all, I happily let myself come inside of her womb.@
>Stuck in a warm blissful trance, I give myself over completely to her.\
name $name
>Good boy...@
>You'll be giving me your semen for ever and ever...\
>In return, I'll make you feel good for ever and ever...\
name ""
name "Luka"
>Haaa...\
name ""
gosub *syasei1:gosub *syasei2
gosub *anten
mov %hseanwave,0:hseanwave
>I lose myself in the Lava Girl's womb.@
>I abandon my quest and think of nothing but the pleasure.\
>Like that, the Lava Girl will squeeze my semen for the rest of my life.@
>A slave to the pleasure, my days go on as nothing more than a monster's source of food.\
>...........\
goto *badend



*basilisk_start

mov $name,"Basilisk"
mov $name2,"Basilisk"
mov $lavel,"basilisk"
mov $tatie1,"basilisk_st01"
mov $tatie2,"basilisk_st02"
mov $tatie3,"basilisk_st03"
mov $tatie4,"basilisk_st02"
mov $haikei,"bg115"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,5200
if %nanido=2 mov %max_enemylife,5700
if %nanido=3 mov %max_enemylife,7800
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,90
mov %earth_keigen,20
if %nanido=3 mov %earth_keigen,10
mov %music,1
mov %tikei,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $half_s1,"It feels good, doesn't it...?"
mov $half_s2,"Good, because I'm gonna rape you."
mov $kiki_s1,"Already done?"
mov $kiki_s2,"I'm looking forward to this..."
mov %end_n,7
mov %exp_minus,25000
mov %zmonster_x,-300
mov %tukix,330
mov %owaza_count3a,1
name $name
>Oh, a human?@> How rare.@
>I'm gonna enjoy playing with ya...\
name ""
name "Luka"
>Guh... A Basilisk?\
name ""
>A Basilisk... A powerful monster that has a mix of bird and reptile in it.\
>Their strength is insane... But it's their ability to petrify that's the most dangerous.\
gosub *face2
name $name
>I'm gonna turn ya into stone, and make a nice toy out of ya.\
>I'll turn everything but your penis to stone, and rape you.@
>Or... Should I petrify your penis too so it won't ever get soft?\
>Heh, heh... Which do ya want?\
name ""
name "Luka"
>I...I don't want either!\
name ""
>I point my sword at her, ready to defend myself.@
>Is there some way I can stop her from turning me to stone...?\
gosub *face1
goto *common_main



*basilisk_v

gosub *face3
name $name
>How could I lose to a kid like that...!?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Basilisk turns into a chicken!\
mov %viclose,1:gosub *victory
mov %getexp,25000:gosub *lvup
mov %2312,1
goto *sean0240



*basilisk_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>Already giving up?@
>Time to have some fun with ya, then.\
name ""
goto *basilisk_a



*basilisk_main

gosub *cmd_main
if %cmd1=11 goto *common_attack
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *basilisk_kousan
if %cmd1=16 goto *basilisk_onedari
if %cmd1=17 goto *common_skill
goto *basilisk_main



*basilisk_a

rnd2 %ransu,1,3
if %ransu=1 gosub *basilisk_a1:goto *common_main
if %ransu=2 gosub *basilisk_a2:goto *common_main
if %ransu=3 && %owaza_count3a>2 && %hanyo1=0 gosub *basilisk_a3:goto *common_main
if %ransu=3 && %owaza_count3a>2 && %hanyo1=1 gosub *basilisk_a4:goto *common_main
if %ransu=3 && %owaza_count3a>2 && %hanyo1=2 gosub *basilisk_a5:goto *common_main
if %ransu=3 && %owaza_count3a>2 && %hanyo1=3 gosub *basilisk_a6:goto *common_main
skip -7



*basilisk_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My hands feel good ya know..."
if %ransu=2 mov $sel1,"Shall I squeeze out that semen of yours?"
if %ransu=3 mov $sel1,"I'll work that dick of yours..."
name $name
eng $sel1:$sel6\
name ""
skillname "Bird Handjob"
dwave 1,"se\ero_koki1.ogg"
>The Basilisk grabs Luka's penis with her strange feeling hand, and strokes him!
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3505
if %nanido<2 damage 80,90
if %nanido=2 damage 95,105
if %nanido=3 damage 110,120
skillname ""
if %mylife=0 sub %stack,1:return *basilisk_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*basilisk_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll squeeze out that semen of yours with my tits!"
if %ransu=2 mov $sel1,"My tits are nice and soft ya know?"
if %ransu=3 mov $sel1,"These tits of mine can make a boy like you come easily."
name $name
eng $sel1:$sel6\
name ""
skillname "Ample Tit Fuck"
dwave 1,"se\ero_koki1.ogg"
>The Basilisk slowly pumps Luka's penis between her huge breasts!
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3506
if %nanido<2 damage 85,95
if %nanido=2 damage 100,110
if %nanido=3 damage 115,125
skillname ""
if %mylife=0 sub %stack,1:return *basilisk_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*basilisk_a3

add %stack,1
mov %owaza_count3a,0
if %first_sel1=1 skip 9
name $name
>Let me show ya something nice.@
>I can turn something to stone by licking it.\
name ""
name "Luka"
>Eh...?\
name ""
skip 5
name $name
>Don't avoid it this time!@
>I'll lick it and petrify ya...\
name ""
mov %first_sel1,1
skillname "Petrifying Lick"
dwave 1,"se\ero_pyu2.ogg"
>The Basilisk runs her tongue all over Luka's penis!
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3507
if %nanido<2 damage 90,100
if %nanido=2 damage 105,115
if %nanido=3 damage 120,130
mov %hanyo1,1
dwave 1,"se\stone.ogg"
mov %status_turn,100
mov %status,8:gosub *status_print
>Part of Luka's penis turns to stone!\
skillname ""
if %mylife=0 sub %stack,1:return *basilisk_h3
name "Luka"
>Ah...Ahh!\
name ""
>The places where she licked on my penis turn to stone.@
>One side from the base to about halfway has turned to stone...\
name $name
>I'll turn your penis to stone...\
name ""
sub %stack,1
return



*basilisk_a4

add %stack,1
name $name
>I'll lick your penis clean!\
name ""
skillname "Petrifying Lick"
dwave 1,"se\ero_pyu2.ogg"
>The Basilisk's tongue runs under the tip of Luka's penis!
if %wind=2 && %nanido<2 mov %wind_kakuritu,60
if %wind=2 && %nanido=2 mov %wind_kakuritu,50
if %wind=2 && %nanido=3 mov %wind_kakuritu,30
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3507
if %nanido<2 damage 90,100
if %nanido=2 damage 105,115
if %nanido=3 damage 120,130
mov %hanyo1,2
dwave 1,"se\stone.ogg"
>Most of the area under the tip of Luka's penis turns to stone!\
skillname ""
if %mylife=0 sub %stack,1:return *basilisk_h3
name "Luka"
>N...No way!\
name ""
>This time, the skin around the tip of my penis has turned mostly to stone.@
>I shudder at the heavy feeling of the weight between my legs.\
name $name
>Well? How does it feel having your penis turned to stone?\
name ""
sub %stack,1
return



*basilisk_a5

add %stack,1
name $name
>This time I'm aiming for the tip!\
name ""
skillname "Petrifying Lick"
dwave 1,"se\ero_pyu2.ogg"
>The Basilisk's tongue runs over the tip of Luka's penis!
if %wind=2 && %nanido<2 mov %wind_kakuritu,60
if %wind=2 && %nanido=2 mov %wind_kakuritu,50
if %wind=2 && %nanido=3 mov %wind_kakuritu,30
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3507
if %nanido<2 damage 90,100
if %nanido=2 damage 105,115
if %nanido=3 damage 120,130
mov %hanyo1,3
dwave 1,"se\stone.ogg"
>The tip of Luka's penis turns to stone!\
skillname ""
if %mylife=0 sub %stack,1:return *basilisk_h3
name "Luka"
>Ahh!\
name ""
>Most of my penis has turned to stone...@
>A few spots of sensation remain, but it's almost completely solid...\
name $name
>Next time, I'm going to suck on that partially stone dick of yours.@
>After that, it'll be solid stone...\
name ""
sub %stack,1
return



*basilisk_a6

add %stack,1
name $name
>Alright, time to suck...@
>You'll be rock hard after my mouth is done with ya.\
name ""
skillname "Petrifying Lick"
dwave 1,"se\ero_buchu3.ogg"
>The Basilisk sucks Luka's penis into her mouth, and violently sucks on him!
if %wind=2 && %nanido<2 mov %wind_kakuritu,60
if %wind=2 && %nanido=2 mov %wind_kakuritu,50
if %wind=2 && %nanido=3 mov %wind_kakuritu,30
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3507
if %nanido<2 damage 90,100
if %nanido=2 damage 105,115
if %nanido=3 damage 120,130
mov %hanyo1,2
dwave 1,"se\stone.ogg"
>Luka's penis turns completely to stone!\
skillname ""
if %mylife=0 sub %stack,1:return *basilisk_h3
name "Luka"
>Ahh...\
name ""
>My penis is completely stone at last.@
>It should be sensitive, but now I can barely feel it...\
if %kousan=2 && %cmd1=13 sub %stack,1:return
name $name
>Alright, the fun finally starts!@
>Time to rape that stone dick of yours!\
name ""
skillname "Stone Rape"
dwave 1,"se\ero_pyu5.ogg"
lsp 690,":a;chara\basilisk_ct01.bmp",0,0:print 10,500
>The Basilisk forces Luka to the ground, and mounts him!\
>His stone penis sinks into her vagina!
skillcount2 3508
mov %damage_kotei,1
damage 120,140
mov %kousoku,1:gosub *status_print
>Luka is being raped by the Basilisk!\
skillname ""
if %mylife=0 sub %stack,1:return *basilisk_h4
name "Luka"
>Ahhh...@
>Wh...What is this!?\
name ""
>Even though my penis is completely stone, there's a slight sensation left.\
>It's dulled, but I can feel her tight hole squeezing around my rock hard penis.\
name $name
>It's a different type of feeling being raped like this, isn't it?@
>I'll make sure ya get a good taste of it!\
name ""
sub %stack,1
goto *basilisk_a7



*basilisk_a7

sub %stack,1
>Luka is being raped by the Basilisk...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Haha, how's it feel?":mov $sel2,"The Basilisk's vagina squirms around Luka's penis!"
if %ransu=2 mov $sel1,"How does that petrified dick of yours feel?":mov $sel2,"The Basilisk's vagina tightens around Luka's stone penis!"
if %ransu=3 mov $sel1,"Feels strange, doesn't it?":mov $sel2,"The Basilisk's vagina tightens around Luka's petrified penis!"
if %ransu=4 mov $sel1,"Ahh, I love this feeling!":mov $sel2,"The Basilisk bounces on top of Luka, forcing his stone penis in and out of her!"
if %ransu=5 mov $sel1,"I love it... This stone dick of yours!":mov $sel2,"The Basilisk grinds against Luka, forcing his stone penis to rub against her!"
name $name
eng $sel1:$sel6\
name ""
skillname "Stone Rape"
dwave 1,"se\ero_chupa4.ogg"
eng $sel2:$sel6
skillcount2 3508
mov %damage_kotei,1
damage 120,140
skillname ""
if %mylife=0 sub %stack,1:return *basilisk_h5
sub %stack,1
goto *basilisk_a7



*basilisk_a8

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck on that stone dick of yours even more."
if %ransu=2 mov $sel1,"Do you want me to suck on that hard dick of yours more?"
if %ransu=3 mov $sel1,"I'll suck on you as hard as I can."
name $name
eng $sel1:$sel6\
name ""
skillname "Petrifying Lick"
dwave 1,"se\ero_buchu3.ogg"
>The Basilisk sucks on Luka's stone penis!
skillcount2 3507
if %nanido<2 damage 90,100
if %nanido=2 damage 105,115
if %nanido=3 damage 120,130
skillname ""
if %mylife=0 sub %stack,1:return *basilisk_h6
sub %stack,1
return



*basilisk_onedari

mov $list1,"Bird Handjob"
if %3505>0 mov %list_num1,1
mov $list2,"Ample Tit Fuck"
if %3506>0 mov %list_num2,1
mov $list3,"Petrifying Sucking"
if %3507>0 mov %list_num3,1
mov $list4,"Stone Rape"
if %3508>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *basilisk_onedari1
if %cmd1=12 goto *basilisk_onedari2
if %cmd1=13 goto *basilisk_onedari3
if %cmd1=14 goto *basilisk_onedari4
if %cmd1=-1 goto *basilisk_main
goto *basilisk_onedari



*basilisk_onedari1

gosub *onedari_syori
name $name
>You want me to stroke that dick of yours?\
name ""
gosub *basilisk_a1
skip -1



*basilisk_onedari2

gosub *onedari_syori
name $name
>You want me to squeeze that dick of yours between my breasts?\
name ""
gosub *basilisk_a2
skip -1



*basilisk_onedari3

gosub *onedari_syori
name $name
>You want me to lick ya?@
>Hehehe... You sure about that?\
name ""
if %hanyo1=0 gosub *basilisk_a3
if %hanyo1=1 gosub *basilisk_a4
if %hanyo1=2 gosub *basilisk_a5
gosub *basilisk_a6
gosub *basilisk_a8
skip -1



*basilisk_onedari4

gosub *onedari_syori
name $name
>You want me to rape ya?@
>Then I need to make it good for me, first...\
name ""
if %hanyo1=0 gosub *basilisk_a3
if %hanyo1=1 gosub *basilisk_a4
if %hanyo1=2 gosub *basilisk_a5
gosub *basilisk_a6
skip -1



*basilisk_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\basilisk_bk03.bmp",0,0
gosub *syasei2
>As the Basilisk's uniquely shaped hand strokes Luka, he comes, covering her soft palm in semen.\
mov %viclose,1:gosub *lose
mov %2612,%2612+1:if %2612=1 mov %count_koenemy,%count_koenemy+1
if %2612>%count_most mov %count_most,%2612:mov $count_mostname,$name
count 5,5
mov $bad1,"Luka was forced to an orgasm by the Basilisk's handjob."
gosub *face2
name $name
>My hand is all sticky now...\
name ""
goto *basilisk_h



*basilisk_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\basilisk_bk02.bmp",0,0
gosub *syasei2
>Squeezed between the Basilisk's giant breasts, Luka comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2612,%2612+1:if %2612=1 mov %count_koenemy,%count_koenemy+1
if %2612>%count_most mov %count_most,%2612:mov $count_mostname,$name
count 7,5
mov $bad1,"Luka was forced to an orgasm as the Basilisk squeezed him with her breasts."
gosub *face2
name $name
>My tits are all sticky now...\
name ""
goto *basilisk_h



*basilisk_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\basilisk_bk01.bmp",0,0
gosub *syasei2
>As the Basilisk licks Luka's penis, he comes, shooting semen out of his partially petrified penis.\
mov %viclose,1:gosub *lose
mov %2612,%2612+1:if %2612=1 mov %count_koenemy,%count_koenemy+1
if %2612>%count_most mov %count_most,%2612:mov $count_mostname,$name
count 4,5
mov $bad1,"Luka was forced to an orgasm from the Basilisk licking him."
gosub *face2
name $name
>Ya came before I could make it stone?@
>How pathetic...\
name ""
goto *basilisk_h



*basilisk_h4

mov %ikigoe,3:gosub *ikigoe
name $name
>Oi, oi... That's too fast.\
name ""
gosub *syasei1
vsp 2,0:print 10,400
vsp 2,1:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
>The moment Luka's forced into the Basilisk's vagina, he reaches a climax.@
>But no sense of release comes with it...\
mov %viclose,1:gosub *lose
mov %2612,%2612+1:if %2612=1 mov %count_koenemy,%count_koenemy+1
if %2612>%count_most mov %count_most,%2612:mov $count_mostname,$name
count 1,5
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to a climax as soon as he was inserted into the Basilisk's orgasm."
gosub *face2
name $name
>Hahaha, you can't come with a stone dick.@
>Here... I'll make it even more unbearable for ya.\
name ""
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
>The Basilisk's eyes shine with a bright light!\
>Suddenly, full feeling returns to the tip of my penis!\
name ""
goto *basilisk_h



*basilisk_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
vsp 2,0:print 10,400
vsp 2,1:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
>As the Basilisk rapes Luka, he reaches a climax.@
>But no sense of release comes with it...\
mov %viclose,1:gosub *lose
mov %2612,%2612+1:if %2612=1 mov %count_koenemy,%count_koenemy+1
if %2612>%count_most mov %count_most,%2612:mov $count_mostname,$name
count 1,5
mov $bad1,"Luka was forced to a climax as the Basilisk raped him."
gosub *face2
name $name
>Hahaha, you can't come with a stone dick.@
>Here... I'll make it even more unbearable for ya.\
name ""
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
>The Basilisk's eyes shine with a bright light!\
>Suddenly, full feeling returns to the tip of my penis!\
name ""
goto *basilisk_h



*basilisk_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
vsp 2,0:print 10,400
vsp 2,1:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
>As the Basilisk sucks on his stone penis, Luka reaches a climax.@
>But no sense of release comes with it...\
mov %viclose,1:gosub *lose
mov %2612,%2612+1:if %2612=1 mov %count_koenemy,%count_koenemy+1
if %2612>%count_most mov %count_most,%2612:mov $count_mostname,$name
count 4,5
mov $bad1,"Luka was brought to a climax as the Basilisk sucked on his stone penis."
gosub *face2
name $name
>Hahaha... You can't come with a stone dick!@
>I love this!@> Raping men like this is the best!\
>Here... I'll make it even more unbearable for ya.\
name ""
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
>The Basilisk's eyes shine with a bright light!\
>Suddenly, full feeling returns to the tip of my penis!\
name ""
goto *basilisk_h



*basilisk_h

mov $bad2,"Petrifying Luka's penis, she used him as a simple sex toy for the rest of his life."
if %2612=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,1:hseanwave:goto *basilisk_hc
if %status=6 goto *basilisk_hb
name "Luka"
>Ahh...\
name ""
>Exhausted from my orgasm, I drop to my knees.@
>Standing in front of me, the Basilisk has a cold smile on her face.\
name $name
>Heh, the fun starts now.\
name ""
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
>The Basilisk's eyes shine with a bright light!\
dwave 1,"se\stone.ogg"
>After seeing that flash of light, my body starts to turn to stone!\
name "Luka"
>Ahhhh!!\
name ""
>I gradually lose all feeling from my hands, feet, thighs... Everything.@
>After only a few moments, my body is just like cold stone.\
name $name
>Hehe... Now you're nothing but stone.@
>Even your penis, of course...@>But only the shaft. I left the tip.\
>Keep the shaft rock hard and let them feel it through the tip...@
>Just the thought of raping a man like this is making me wet!\
name ""
goto *basilisk_hb



*basilisk_hb

mov %hseanwave,1:hseanwave
cspl 690,699
lsp 690,":a;chara\basilisk_ct01.bmp",0,0:print 10,500
>The Basilisk drops down on me, forcing my half stone penis into her wet vagina.\
goto *basilisk_hc



*basilisk_hc

name "Luka"
>Ahhh!\
name ""
>I yell out from the feeling of her vagina around my penis.\
>Only able to feel it from my tip, I feel my sensitive tip pushing into her warm flesh.\
name $name
>Heh... My pussy is both part reptile and part bird.\
>Due to that, I got muscles that let me control everything inside my pussy, letting me play with a penis inside me...\
>I've also got lots of nice little bumps to rub against that tip of yours.\
>Haha... And your stone dick can enjoy it without ever getting soft!\
name ""
name "Luka"
>Ahhh!!\
name ""
>The Basilisk tightens her vagina around me, and at the same time uses her muscles to rub it up and down.\
>The tiny little bumps inside of her rub against my sensitive tip, forcing amazing pleasure to wrack through my body.\
>At the same time, the tightness around me is too much to take.@
>This famous monster's combination of bird and reptile vagina is too good...\
name "Luka"
>Ahh...\
name ""
name $name
>Haha, I feel amazing, don't I?@
>Come on, lets see ya come!\
name ""
>The Basilisk starts to grind against me, violently raping me.\
>After grinding her hips against me for a few moments, she starts to bounce on top of me instead, alternating the stimulation.\
>With pleasure exploding through my body with every thrust from her, I can't even try to endure it.\
name "Luka"
>Ahh...\
name ""
>Giving myself over to the sensations, I listen to the wet sounds of her raping me.@
>After what seems like only a few moments, I feel a tingling in my waist as an orgasm is about to burst out.\
name "Luka"
>Ahh... I'm going to come...\
name ""
name $name
>Haha, already?@
>Alright then, time to finish ya off!\
name ""
>The Basilisk drops down as hard as she can, forcing me all the way inside.@
>Once I'm deep inside her, she clamps her muscles around the tip of my penis, rubbing me with her tiny bumps.\
name "Luka"
>Ahhhh!\
name ""
>I easily climax from her finishing blow.\
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,400
vsp 2,1:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
name "Luka"
>Ahh... W...What...?\
name ""
>I should have ejaculated...@
>But that sense of release after the orgasm never came.\
>I felt the powerful climax, but not the accompanying release...@
>Feeling like something is incomplete, I start to shudder.\
name $name
>Hahahaha!@>You can't ejaculate with a stone dick.@
>But ya can feel everything through that flesh and blood tip of yours.\
>Haha, orgasm as much as ya want!@
>Nothing will ever come out, and you'll never get that full relief!\
name ""
>The Basilisk laughs as she pumps me like a piston, raping me even harder than before.@
>Even though I didn't ejaculate, my tip is extra sensitive as if I did.\
>Forced in and out of her wet vagina with every pump, my body shivers in intense pleasure.\
name $name
>Haha, I'm going to rape you over and over!@
>Your heart and soul will be shattered as I pump ya!\
name ""
mov %hseanwave,7:hseanwave
>The Basilisk, almost berserk in her own lust, violently pumps me however she wants.\
>Almost like an animal on pure instinct, she bounces and grinds against me as hard as she can.\
name "Luka"
>Ahhh!@>Ahhh!!\
name ""
name $name
>God, I love that voice!@
>Let me hear it more! Hahaha!\
name ""
name "Luka"
>Hyaaa!@> Ahh!\
name ""
>Drunk on her own pleasure, she just sadistically taunts me as she rides on top of me.\
>Her tight vagina squeezes around my tip every time I'm all the way inside of her, quickly loosening as she bounces back up.\
>Every time I penetrate back inside of her, the tiny bumps rub against my tip, bringing unbearable pleasure with it.\
name "Luka"
>Ahhh...!!\
name ""
>Violently raped, I'm quickly brought to another height.\
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,400
vsp 2,1:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
name "Luka"
>Ahh...\
name ""
>The feeling of the climax blows over me, but the sense of release from the ejaculation still doesn't come.@
>A dull ache pounds away at the base of my penis, as if the semen inside of me is desperate to be released.\
>My body twists at the intense discomfort, the irritation at the incomplete orgasm gnawing away at me.\
name $name
>Hahaha, do you want to come in my pussy?@
>Want to shoot that semen of yours into my body?\
name ""
>The Basilisk stops pumping me like a piston for a moment.@
>Now just seductively grinding her waist against me, she starts to taunt me with words.\
>My tip slowly rubs against her walls, only adding to the frustration from my inability to get relief.\
name "Luka"
>Ahh... N...No... I don't...\
name ""
name $name
>Hahaha, I'll make ya climax over and over with my pussy then.@
>But... You'll never get to ejaculate! Hahaha!\
name ""
>The Basilisk starts her piston-like thrusting again as she looks down at me.@
>Trembling, I helplessly moan under her.\
>Way faster than before, I feel another climax coming up, my body screaming for an actual ejaculation.\
name "Luka"
>Ahhhh!!\
name ""
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,400
vsp 2,1:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
>But the release doesn't come.@
>The frustration and irritation only gets even stronger, gnawing at my brain.\
name "Luka"
>P...Please...@
>Please let me come...\
name ""
>I start to beg her with tears in my eyes.@
>I can't take this... This torture is too much.\
name $name
>Hahaha, already crying?@
>Never had a guy cry as fast as that.\
>Haha, that just makes me want to tease ya more!@
>Come on, let me hear that delicious scream of yours as I rape ya!\
name ""
>The Basilisk ignores my begging, and continues her violent rape.\
name "Luka"
>Ahhh!!\
name ""
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,400
vsp 2,1:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
>After only a few moments, I reach another climax.@
>The pleasure explodes in me, but is quickly replaced by the gnawing frustration.\
>This is too much... I need to feel it... I need to release...\
name "Luka"
>Ahh... L...Let me... Let me c...\
name ""
name $name
>Hahaha, sure, I'll let you climax again!\
name ""
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,400
vsp 2,1:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
name "Luka"
>N...No...@
>Ejaculate... Let me come!\
name ""
name $name
>Hehehe... What a pathetic guy.@
>You want to come inside me that badly?\
name ""
>The Basilisk giggles as she stares right into my eyes.@
>A smile of superiority is stuck on her face as she gloats over me.\
name $name
>Alright... Then beg me.@
>What exactly do you want?\
name ""
name "Luka"
>I...I want to come...\
name ""
name $name
>Hahaha, that ain't quite it is it?@
>If you aren't perfectly clear, I'll never know what it is!\
name ""
>The Basilisk clamps around my tip again as she grinds against me, forcing me to another frustrating climax.\
name "Luka"
>N...No... Ahhh!\
name ""
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,400
vsp 2,1:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
>Another incomplete orgasm.@
>I'll go insane if I can't release.\
name "Luka"
>I... I want to ejaculate...@
>Please... Please let me come inside you!!\
name ""
name $name
>Hahahaha, what a pathetic desire!@
>Do you want to impregnate a monster like me that badly?\
>If ya want it that badly, I guess I got no choice do I?@
>Here, I'll let ya come inside me just like you want.\
name ""
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
>Her eyes flash with a bright light, suddenly releasing my penis from its petrification.\
name "Luka"
>Ahhhh...\
name ""
>As the sensation returns to my shaft, still inside her vagina, the stimulation is much more powerful than before.\
>The bumps inside of her rub my shaft, now free to experience the pleasure of her vagina.\
>After mere seconds of feeling her, an intense climax starts to wrack my body.\
name "Luka"
>Haaa... Incredible...@
>Ahhh!!\
name ""
gosub *syasei1
lsp 690,":a;chara\basilisk_ct03.bmp",0,0
lsp 695,":a;chara\basilisk_bk05.bmp",0,0
gosub *syasei2
>My back arches upward as I ejaculate, exploding inside of her.@
>I gasp in ecstasy as it feels like multiple ejaculations are stacked on top of each other, all being forced out at once.\
>In a trance of ecstasy, I moan as I drown in the bliss of the release finally granted to me.\
name $name
>Haha, you came, you came.@
>Ahh, I love the feeling of semen bursting in me you can only get from denying ejaculations.\
>My pussy got filled with only one burst from that once stone dick of yours...@
>Being able to shoot that much into me, you must have loved it too.\
name ""
name "Luka"
>Ahhh...\
name ""
>After finally tasting the ejaculation so long denied to me, my limbs go limp as I start to drool from the comfortable ecstasy of release.\
gosub *anten
mov %hseanwave,0:hseanwave
>After that, I became nothing but her sex toy.@
>Keeping my penis half stone, she uses me as nothing but a tool to satisfy her lust.\
>Every so often she releases the petrification to let me come inside her, but she always puts it back.\
>Like that, I've been degraded to little more than furniture for her exclusive use...\
>..............\
goto *badend



*dragon_start

mov $name,"Dragon Girl"
mov $name2,"Dragon Girl"
mov $lavel,"dragon"
mov $tatie1,"dragon_st01"
mov $tatie2,"dragon_st02"
mov $tatie3,"dragon_st03"
mov $tatie4,"dragon_h1"
mov $haikei,"bg115"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,6000
if %nanido=2 mov %max_enemylife,6000
if %nanido=3 mov %max_enemylife,9000
if %nanido=0 mov %max_enemylife,2
if %nanido=1 mov %henkahp1,2000
if %nanido=2 mov %henkahp1,2000
if %nanido=3 mov %henkahp1,2000
if %nanido=0 mov %henkahp1,1
mov %alice_skill,0
mov %damage_keigen,60
mov %kaihi,99
mov %earth_keigen,40
if %nanido=3 mov %earth_keigen,20
mov %music,1
mov %tikei,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Even if you struggle, you won't get out of my mouth!"
mov $mogaku_sel2,"No man has escaped from my mouth..."
mov $mogaku_sel3,"I'll suck on you until there's nothing left!"
mov $mogaku_sel4,"No matter how hard you struggle, it's useless!"
mov $mogaku_sel5,"Foolish man... Do you think you can escape from a Dragon?"
mov $mogaku_dassyutu1,"No matter how hard you struggle..."
mov $mogaku_dassyutu2,"In the end, you'll still lose."
mov $mogaku_earth_dassyutu1,"H...How can such a tiny body hold the power of the Earth!?"
mov $mogaku_earth_dassyutu2,""
mov $half_s1,"What a nice face."
mov $half_s2,"I'll enjoy looking at it as you finish..."
mov $kiki_s1,"Already at your limit?"
mov $kiki_s2,"Then let me have a taste of your semen..."
mov %end_n,7
mov %exp_minus,50000
mov %zmonster_x,-300
mov %tukix,340
mov %owaza_count1a,6
mov %owaza_count3a,5
name "Luka"
>A...A Dragon!?\
name ""
>A legendary monster... Right in front of me...\
>Claws that can tear any armor to shreds...@
>Flames that can turn all into ash...\
>Scales that can deflect any weapon...\
gosub *face2
name $name
>Oh, a human?@> What rare prey...\
name ""
name "Luka"
>Guh...!\
name ""
>I take a step back, pressured by her mere presence.\
name $name
>Hehe... There's no need to be afraid.@
>I won't tear you apart with these claws, nor incinerate you with my flames.\
>There's no need for me to fight seriously against a tiny being like you.@
>Just come a little closer, so I can lovingly caress you...\
name ""
gosub *face1
mov %sinkou,1
goto *common_main



*dragon_v

if %nanido=0 goto *dragon_v2
name "Luka"
>Alright, I'm winning!\
name ""
>I managed to drive a legendary Dragon almost to her knees...!\
name $name
>...How dare you attempt to seal me.@
>I don't care about your pathetic semen any longer!\
>I will simply crush and incinerate you!\
name ""
dwave 1,"se\earth1.ogg"
quake 10,1000
name "Luka"
>Ahhhgg...\
name ""
>The Dragon Girl is finally getting serious...@
>The power radiating from her is far more intense than when she was just trying to make me come...\
name "Luka"
>N...No way...@>She's so powerful...!\
name ""
>She's too powerful... I can't win normally.\
>Suddenly, both Alice's previous warning and training flashes through my mind.\
>The mental training I went through to control the power of water...\
name "Luka"
>..............\
name ""
>I close my eyes and entrust my fate to the flow.@
>As my mind clears, I feel another sense awakening in me.\
bg black,10,1500
bgm "bgm\aqua.ogg"
name "Luka"
>Th...This...\
name ""
>I can sense the differing "flows" all around me.\
>The flow of the air... The flow of sound... The flow of power itself...@
>I take in all of those mixing streams into my heart.\
>It feels like I've become one with the world itself...@> One with the flow of the world.\
name $name
>...What's wrong!?@>Giving up already!?\
name ""
skillname "Dragon Claw"
>Something huge is approaching me.@
>As it moves closer and closer, it creates massive waves, disturbing the streams flowing into my heart.\
name "Luka"
>...........\
name ""
skillname "Serene Movement"
dwave 3,"se\miss_aqua.ogg"
>I easily dodge to the side, avoiding the attack.\
>No... I wouldn't call it dodging...@
>It's more like a leaf floating down a stream, simply pushed to the side.\
skillname ""
name "Luka"
>I see it... The flow...!\
name ""
name $name
>Flow...?@> What are you talking about?@
>Are you hallucinating in fear?\
name ""
skillname "Dragon Fang"
>I feel another wave coming, disturbing the flows around me.\
skillname "Serene Movement"
dwave 3,"se\miss_aqua.ogg"
>...I can see it.@
>I see the waves coming off of the Dragon's giant fang.\
>Like a tiny leaf floating on a stream, I let the wave formed by her giant fang simply push me aside, evading her attack.\
skillname ""
gosub *face3
name $name
>What the...!?@
>How did you avoid my attack!?\
name ""
>Without even needing to think about it, I easily evade all of her attacks.\
>Alice's training paid off... With this, she would never be able to slap me again...\
name $name
>Why can't I hit him!?\
name ""
>She attacks even faster, creating more massive waves all around me.@
dwave 3,"se\miss_aqua.ogg"
>Swaying side to side, I evade every one of her sharp attacks.\
>Without even needing to think about it, my body is pushed aside before her attacks can connect.\
>Entrusting my arm to the flow connecting me to the Dragon, I draw my sword and slice along it.\
skillname "Blade of Still Water"
>Luka draws his sword, letting the flow of water guide his blade!
dwave 1,"se\slash4.ogg"
rnd2 %damage,1400,1500
if %enemylife<%damage mov %enemylife,%damage+100
gosub *enemylife2
skillname ""
name $name
>Wh...What the...!?\
name ""
>Slicing along the flow connecting us, I feel my sword easily connect with an unguarded part of her body.\
name $name
>...I...Impossible...!@>My thick scales... Cut through like paper!?@
>H...How can such a thin arm...?\
name ""
name "Luka"
>...I didn't cut you with power, I just followed the flow.\
name ""
name $name
>That doesn't make sense!@
>Ahhhgg... Then how about this!?\
name ""
dwave 1,"se\fire1.ogg"
>Another powerful wave is coming.@
dwave 1,"se\slash4.ogg"
>...That, too, I cut through, dispersing the disturbance of the flows.\
name $name
>R...Ridiculous!@>You can't cut flame!\
name ""
bg "BG\"+$haikei+".bmp",10,500
bgm "bgm\battle.ogg"
name "Luka"
>Eh...?@> That was fire!?\
name ""
>The surprise at what I just did draws me back to reality, making me lose focus of the flows around me.\
>I gasp in surprise at seeing the Dragon Girl's mouth right next to me!\
name "Luka"
>Uwaaaa!!\
name ""
name $name
>I'm going to swallow you whole!\
name ""
name "Luka"
>Ahhh!\
name ""
>I thrust forward in a panic, landing a direct blow to her neck!
dwave 1,"se\slash3.ogg"
rnd2 %damage,600,650:gosub *enemylife2
goto *dragon_v2



*dragon_v2

name $name
>I...Impossible...@>Just who are you...!?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Dragon Girl takes the form of a giant lizard!\
mov %viclose,1:gosub *victory
mov %getexp,30000:gosub *lvup
mov %2313,1
goto *sean0241



*dragon_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>Surrendering...?@
>Then I'll use you as I wish!\
name ""
goto *dragon_a



*dragon_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *dragon_kousan
if %cmd1=16 goto *dragon_onedari
if %cmd1=17 goto *common_skill
goto *dragon_main



*dragon_a

if %enemylife<%henkahp1 goto *dragon_v
if %kousoku=1 gosub *dragon_a6:goto *common_main
rnd2 %ransu,1,5
if %ransu=1 gosub *dragon_a1:goto *common_main
if %ransu=2 gosub *dragon_a2:goto *common_main
if %ransu=3 gosub *dragon_a3:goto *common_main
if %ransu=4 && %owaza_count3a>6 gosub *dragon_a4:goto *common_main
if %ransu=5 && %owaza_count1a>7 gosub *dragon_a5:goto *common_main
skip -6



*dragon_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You'll cover this hand of mine with your semen!"
if %ransu=2 mov $sel1,"I'll squeeze out your semen!"
if %ransu=3 mov $sel1,"Is it feeling good?"
name $name
eng $sel1:$sel6\
name ""
skillname "Dragon Hand"
dwave 1,"se\ero_koki1.ogg"
>The Dragon strokes Luka's penis!
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3509
if %nanido<2 damage 120,140
if %nanido=2 damage 135,155
if %nanido=3 damage 150,170
skillname ""
if %mylife=0 sub %stack,1:return *dragon_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*dragon_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll get a good taste of that penis of yours..."
if %ransu=2 mov $sel1,"Nnnn... Come inside my mouth when you can't take it any longer..."
if %ransu=3 mov $sel1,"I'll suck out your semen..."
name $name
eng $sel1:$sel6\
name ""
skillname "Dragon Mouth"
dwave 1,"se\ero_buchu2.ogg"
>The Dragon Girl sucks on Luka's penis with her giant mouth!
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3510
if %nanido<2 damage 130,150
if %nanido=2 damage 145,165
if %nanido=3 damage 160,180
skillname ""
if %mylife=0 sub %stack,1:return *dragon_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*dragon_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Bury yourself in these breasts of mine..."
if %ransu=2 mov $sel1,"My breasts are soft, aren't they?"
if %ransu=3 mov $sel1,"It's fine to cover me in semen..."
name $name
eng $sel1:$sel6\
name ""
skillname "Dragon Breasts"
dwave 1,"se\ero_koki1.ogg"
>The Dragon Girl squeezes Luka's penis between her soft breasts!
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3511
if %nanido<2 damage 140,160
if %nanido=2 damage 155,175
if %nanido=3 damage 170,190
skillname ""
if %mylife=0 sub %stack,1:return *dragon_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*dragon_a4

add %stack,1
mov %owaza_count3a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My tongue will make you writhe in pleasure!"
if %ransu=2 mov $sel1,"I'll cover you in my saliva!"
if %ransu=3 mov $sel1,"You can't endure my tongue, can you?"
name $name
eng $sel1:$sel6\
name ""
skillname "Dragon Tongue"
dwave 1,"se\ero_pyu2.ogg"
>The Dragon Girl's dripping tongue licks Luka!
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3512
if %nanido<2 damage 80,90
if %nanido=2 damage 87,97
if %nanido=3 damage 94,104
dwave 1,"se\ero_pyu2.ogg"
>Her huge tongue coils around Luka's body, licking him clean!
if %nanido<2 damage 80,90
if %nanido=2 damage 87,97
if %nanido=3 damage 94,104
dwave 1,"se\ero_pyu2.ogg"
>The tip of her tongue plays with Luka's penis!
if %nanido<2 damage 80,90
if %nanido=2 damage 87,97
if %nanido=3 damage 94,104
skillname ""
if %mylife=0 sub %stack,1:return *dragon_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*dragon_a5

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name $name
>...It's time to prey on you!\
name ""
skillname "Bite"
eng "The Dragon Girl opens her giant mouth wide, and bites down on Luka!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>Luka's been sucked into the Dragon Girl's mouth!\
skillname ""
if %kousan=2 sub %stack,1:return
gosub *face2
name $name
if %first_sel1=1 skip 4
>I'll devour you like this...@
>First, I'll suck you dry...\
skip 3
>You won't get away this time...@
>First, I'll suck you dry...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,5
if %earth=0 && %nanido=2 mov %genmogaku,5
if %earth=0 && %nanido=3 mov %genmogaku,6
if %earth>0 && %nanido<2 mov %genmogaku,2
if %earth>0 && %nanido=2 mov %genmogaku,2
if %earth>0 && %nanido=3 mov %genmogaku,3
sub %stack,1
return



*dragon_a6

add %stack,1
>Luka is stuck inside the Dragon Girl's mouth...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll lick you until you dissolve... Hehe.":mov $sel2,"Her giant tongue licks Luka's body!"
if %ransu=2 mov $sel1,"Hehe... I'll enjoy this.":mov $sel2,"Her female upper body hugs Luka inside her giant mouth, running her fingers all over Luka!"
if %ransu=3 mov $sel1,"Let me suck out that male juice of yours.":mov $sel2,"She sucks on Luka's penis with her female upper body's mouth!"
if %ransu=4 mov $sel1,"I'll wrap that body of yours with my tongue...":mov $sel2,"Her giant tongue squeezes Luka's body!"
if %ransu=5 mov $sel1,"You'll finish inside my mouth...":mov $sel2,"The tip of her giant tongue plays with Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Oral Fixation"
dwave 1,"se\ero_makituki3.ogg"
eng $sel2:$sel6
skillcount2 3513
if %nanido<2 damage 120,140
if %nanido=2 damage 120,140
if %nanido=3 damage 160,180
skillname ""
if %mylife=0 sub %stack,1:return *dragon_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*dragon_onedari

mov $list1,"Dragon Hand"
if %3509>0 mov %list_num1,1
mov $list2,"Dragon Mouth"
if %3510>0 mov %list_num2,1
mov $list3,"Dragon Breasts"
if %3511>0 mov %list_num3,1
mov $list4,"Dragon Tongue"
if %3512>0 mov %list_num4,1
mov $list5,"Oral Fixation"
if %3513>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *dragon_onedari1
if %cmd1=12 goto *dragon_onedari2
if %cmd1=13 goto *dragon_onedari3
if %cmd1=14 goto *dragon_onedari4
if %cmd1=15 goto *dragon_onedari5
if %cmd1=-1 goto *dragon_main
goto *dragon_onedari



*dragon_onedari1

gosub *onedari_syori
name $name
>You want my hand?\
name ""
gosub *dragon_a1
skip -1



*dragon_onedari2

gosub *onedari_syori
name $name
>You want my mouth?\
name ""
gosub *dragon_a2
skip -1



*dragon_onedari3

gosub *onedari_syori
name $name
>You want my breasts?\
name ""
gosub *dragon_a3
skip -1



*dragon_onedari4

gosub *onedari_syori
name $name
>You want my tongue?\
name ""
gosub *dragon_a4
skip -1



*dragon_onedari5

gosub *onedari_syori_k
name $name
>You want me to suck on your body?\
name ""
if %kousoku=0 gosub *dragon_a5
gosub *dragon_a6
skip -1



*dragon_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\dragon_bk03.bmp",0,0
gosub *syasei2
>As the Dragon Girl strokes Luka's penis with her hand, he comes, covering her hands with semen.\
mov %viclose,1:gosub *lose
mov %2613,%2613+1:if %2613=1 mov %count_koenemy,%count_koenemy+1
if %2613>%count_most mov %count_most,%2613:mov $count_mostname,$name
count 5,11
mov $bad1,"Luka was forced to an orgasm by the Dragon Girl's handjob."
gosub *face2
name $name
>Already...? Hehe.\
name ""
goto *dragon_h



*dragon_h2

mov %ikigoe,1
lsp 691,":a;chara\dragon_bk01.bmp",0,0
gosub *ikigoe
gosub *syasei1:gosub *syasei2
>As the Dragon Girl sucks on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2613,%2613+1:if %2613=1 mov %count_koenemy,%count_koenemy+1
if %2613>%count_most mov %count_most,%2613:mov $count_mostname,$name
count 4,11
mov $bad1,"Luka was forced to an orgasm by the Dragon Girl's blowjob."
gosub *face2
name $name
>Already...? Hehe.\
name ""
goto *dragon_h



*dragon_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\dragon_bk02.bmp",0,0
gosub *syasei2
>As the Dragon Girl's soft breasts squeeze Luka's penis, he comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2613,%2613+1:if %2613=1 mov %count_koenemy,%count_koenemy+1
if %2613>%count_most mov %count_most,%2613:mov $count_mostname,$name
count 7,11
mov $bad1,"Luka was forced to an orgasm by the Dragon Girl's tit fuck."
gosub *face2
name $name
>Already...? Hehe.\
name ""
goto *dragon_h



*dragon_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\dragon_bk04.bmp",0,0
gosub *syasei2
>As the Dragon Girl's huge tongue licks Luka's body, he comes, covering it with semen.\
mov %viclose,1:gosub *lose
mov %2613,%2613+1:if %2613=1 mov %count_koenemy,%count_koenemy+1
if %2613>%count_most mov %count_most,%2613:mov $count_mostname,$name
count 4,11
mov $bad1,"Luka was forced to an orgasm by the Dragon Girl's huge tongue."
gosub *face2
name $name
>Already...? Hehe.\
name ""
goto *dragon_h



*dragon_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\dragon_h2.bmp",0,0
gosub *syasei2
>Stuck inside the Dragon Girl's huge mouth, Luka comes, covering both her female upper body and giant tongue with semen.\
mov %viclose,1:gosub *lose
mov %2613,%2613+1:if %2613=1 mov %count_koenemy,%count_koenemy+1
if %2613>%count_most mov %count_most,%2613:mov $count_mostname,$name
count 4,11
mov $bad1,"While stuck inside the Dragon Girl's huge mouth, Luka was forced to an orgasm."
gosub *face2
name $name
>Already...? Hehe.\
name ""
goto *dragon_h



*dragon_h

mov $bad2,"With his whole body sucked on inside her giant mouth, Luka dissolved away."
if %2613=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,21:hseanwave:goto *dragon_hb
name "Luka"
>Ahh...\
name ""
name $name
>Well then, it's time to eat you...\
name ""
name "Luka"
>Ahhh!\
name ""
>The Dragon's long tongue coils around my limp body...@
mov %hseanwave,21:hseanwave
cspl 690,699
lsp 700,":a;chara\dragon_h1.bmp",0,0:print 10,500
>And easily pulls me inside her mouth!\
goto *dragon_hb



*dragon_hb

name "Luka"
>Ahhh... S... Stop it!\
name ""
>Her hot, slimy mouth closes around my body as her long tongue stops my struggling.\
>It's like I'm stuck in a giant, soft creature...@
>Her saliva drips out of her mouth, covering my body in warm liquid.\
name $name
>I won't chew you, nor swallow you whole...@
>It's been a while since I've had human, so I'd like to savor your taste until you melt away.\
name ""
name "Luka"
>N...No way... Ahh!\
name ""
>Her long tongue starts to wriggle, pushing against my body.@
>At the same time, her giant mouth starts to move.\
>The giant tongue wraps around my body, slowly tightening as it moves.\
name "Luka"
>Ahhh...\
name ""
>A pleasant feeling starts to fill my body as her huge tongue toys with me inside her mouth.\
>Every time her tongue brushes over my penis, I shiver.@
>The feeling of that soft, wet tongue brushing against me is too much to take.\
name $name
>...Shivering in pleasure from having your body sucked on?@
>What pitiful prey...\
name ""
>She starts to move her tongue with more power, licking every corner of my body.\
name "Luka"
>Ahh... That feels good...\
name ""
>As the stimulation attacks me, I unconsciously thrust my waist forward, sinking my penis into her soft tongue.\
>I moan in pleasure at the accidental stimulation of my sensitive penis rubbing against her saliva covered tongue.\
name "Luka"
>Haaaa...\
name ""
name $name
>Pitiful men... Always wanting to be licked...\
name ""
>Saying that, she moves the tip of her giant tongue into my groin, and starts to play with my penis.\
>Her soft, wet tongue runs up and down my penis, tiny by comparison.\
name "Luka"
>Ahhh!!\
name ""
>I tremble in ecstasy from the direct stimulation.\
>My penis easily sinks into her giant tongue as it pushes against me, quickly bringing me close to an orgasm.\
name "Luka"
>Ahh... I'm going to come...\
name ""
name $name
>Already...?@>Men have gotten even more pathetic, it seems...@
>Here, I'll finish you off...\
name ""
>Her wet tongue pushes against my penis even harder.\
>Sinking into her soft tongue, I give in as she rubs it against me.\
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\dragon_h2.bmp",0,0
gosub *syasei2
>With my body restrained by her tongue, and my penis played with by the tip of that same tongue, I'm forced to a pitiful orgasm.\
>But even though I'm humiliated, it feels so good...\
name "Luka"
>Ahhh...\
name ""
>I sigh as I feel even more strength drain from my body.\
name $name
>All it takes is a little moving from my tongue...@
>Here, I'll do it even more...\
name ""
>Her tongue starts to squirm and wriggle around, with my body still firmly in its hold.\
>I'm stuck inside her mouth, and just being played with until she eats me...@
>But even though it's horrifying, I can't help but indulge myself in the pleasure.\
name "Luka"
>Ahh... That feels good...\
name ""
name $name
>Hehe, what a foolish boy.@
>Are you really that happy at being preyed on?\
name ""
>The tip of her giant tongue continues to play with my penis.@
>Sometimes licking it, sometimes flicking it, sometimes just pressing into me...\
name "Luka"
>Ahhhh!!\
name ""
>My body shakes with the intense pleasure.@
>But with her giant tongue coiled around me, I can barely even do that.\
>Even though I'm stuck inside her mouth, and able to be swallowed whole at any moment...@
>Despite the humiliation and fear, the ecstasy blocks out all my other thoughts.\
name "Luka"
>Ah!@>Ahh!\
name ""
>My lower body, covered in her saliva, starts to ache as I feel another orgasm about to be licked out of me.\
name "Luka"
>Ahh... C...Coming...\
name ""
gosub *syasei1
lsp 700,":a;chara\dragon_h3.bmp",0,0
gosub *syasei2
>I explode inside her mouth, covering her giant tongue with semen.\
>She stops playing with me for a moment, and I hold my breath in fear thinking she's about to swallow me.\
>But after a few moments, she speaks instead.\
name $name
>Hehe, what delicious semen.@
>And your penis tastes quite delicious, too...\
name ""
name "Luka"
>Ahhh!\
name ""
>Her tongue starts to move even faster, rubbing my penis quicker than I thought could even be possible.@
>At the same time, the rest of her tongue around my body tenses up, tightening around me.\
>Her mouth itself gets a little smaller, as I feel a suction start to pull at me.@
>It's like I'm a piece of candy, and she's using her entire mouth to suck on me...\
name $name
>Hehehe... I'm going to suck on you until you dissolve.@
>Well? That's what you wanted, isn't it?\
name ""
name "Luka"
>Ahh... N... No...\
name ""
>The fear that was pushed aside by the pleasure comes back.@
>I don't want to be dissolved inside her mouth...\
>I struggle for my life, desperate to escape.@
>But there's no way out... I'm stuck inside her mouth, and her tongue is far too powerful...\
name $name
>I won't let you go, you're just my food now.@
>I'll suck on you until there's nothing left.\
>But don't worry, I'll keep licking that penis of yours so you can die in pleasure.@
>Aren't I nice? Hehehe...\
name ""
name "Luka"
>Aieee!\
name ""
if %hosyoku_cut=1 goto *hosyoku_cut
mov %hseanwave,22:hseanwave
>Liquid starts to drip out inside of her, covering my body in her warm juices.@
>At the same time, the squirming and wriggling of her tongue around me gets even more intense.\
>Is this... Is this her digestive juices?@
>She really is going to dissolve me into nothing as she licks me...\
>As the realization of my fate finally strikes home, my thoughts are interrupted by her tongue, licking my penis with powerful licks.\
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\dragon_h4.bmp",0,0
gosub *syasei2
>As her giant tongue flicks my penis, I reach a climax, covering it with semen.@
>Even though she's dissolving me, I still came...\
name $name
>See, it feels good, doesn't it?@
>You can enjoy it as I dissolve you and make your body itself into nourishment for me...\
>Of course, I'll enjoy eating that semen of yours as you shoot it out. Hehe.\
name ""
name "Luka"
>N...No... Stop... Ahhh!\
name ""
>The loud, wet sounds of her sucking on my body fill my ears, drowning out the sounds of her laughter.\
>Despair stabs me through the heart as I writhe around inside her mouth, unable to even see the outside world...\
name "Luka"
>No.... Help me...\
name ""
gosub *syasei1:gosub *syasei2
>Even as I beg for mercy, I come, spraying semen onto her giant tongue.\
name $name
>Look, your body is getting all soft...@
>You're going to dissolve away soon...\
name ""
>The warm liquid that I thought was saliva is covering my body.@
>I want to get it off, but my arms and legs are bound inside her tongue.\
>Feeling helpless, I slowly give myself over to the strange sense of comfort filling me.@
>As my body melts away, my penis continues to tremble in joy.\
name "Luka"
>Ah...aaa...\
name ""
gosub *syasei1:gosub *syasei2
>As she sucks on my body, I relax.@
>Forgetting the fear and horror at what's to come, I just focus on nothing but the pleasure.\
>Covered in her digestive juices, my body melts away.@
>Turning liquidy, it mixes with her saliva, swallowed down her giant throat every so often.\
name "Luka"
>...A...h...\
name ""
>All the while, her tongue continues to play with me.\
name $name
>Hehe, your body tastes absolutely delicious.@
>I'm so happy I was able to prey on you.\
name ""
name "Luka"
>A....@
>................\
name ""
gosub *anten
mov %hseanwave,0:hseanwave
>Thus, the young boy known as Luka was preyed on.@
>Held inside the Dragon Girl's mouth, she sucked on him until he dissolved into nothing.\
>..................\
goto *badend



*salamander_start

mov $name,"Salamander"
mov $name2,"Salamander"
mov $lavel,"salamander"
mov $tatie1,"salamander_st01"
mov $tatie2,"salamander_st02"
mov $tatie3,"salamander_st03"
mov $tatie4,"salamander_st02"
mov $haikei,"bg115"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,16000
if %nanido=2 mov %max_enemylife,16500
if %nanido=3 mov %max_enemylife,17500
if %nanido=1 mov %henkahp1,13500
if %nanido=2 mov %henkahp1,13500
if %nanido=3 mov %henkahp1,13500
if %nanido=0 mov %max_enemylife,2
if %nanido=0 mov %henkahp1,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,90
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %music,10
mov %tikei,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"What's wrong? That's it? You'll lose in no time at this rate!"
mov $mogaku_sel2,"Don't think you can break free from me so easily!"
mov $mogaku_sel3,"Weak struggling like that won't ever break you free!"
mov $mogaku_sel4,"If you don't try as hard as you can, you'll never break free..."
mov $mogaku_sel5,"I can't lend my power to such weakness..."
mov $mogaku_dassyutu1,"You finally broke away, eh?"
mov $mogaku_dassyutu2,"It took you far too long... It seems like you're still too naive."
mov $mogaku_earth_dassyutu1,"It seems as though you can use Gnome's power."
mov $mogaku_earth_dassyutu2,""
mov $half_s1,"...Is that it?"
mov $half_s2,"Show me more!"
mov $kiki_s1,"Already at your limit?"
mov $kiki_s2,"It seems I was wrong about you..."
mov %end_n,7
mov %exp_minus,80000
mov %zmonster_x,-330
mov %tukix,370
mov %owaza_count1a,5
mov %owaza_count1b,5
mov %owaza_count1c,5
name "Luka"
>...I got it.@> Here I come!\
name ""
>I have to beat Granberia at some point.\
>If Salamander is the one who taught her...@
>I absolutely have to make her recognize my ability!\
mov %sinkou,1
goto *common_main



*salamander001

name $name
>...Well?@
>You are able to use the power of water, right?\
name ""
name "Luka"
>We...well...\
name ""
name $name
>I saw the fight with the Dragon Girl.@
>At that time, you gave your heart over completely to the flow.\
name ""
name "Luka"
>.............\
name ""
>I was able to do it then...@
>But can I do it again?\
name $name
>You need to take Undine's power inside you, and project your inner self into the world around you.@
>Like that, you can connect to the flow around you.\
>I can't lend my power to one who cannot even do that.\
name ""
name "Luka"
>I got it...!\
name ""
>I don't know if I can do it again...@
>But I have to try!\
mov %skill04,2
mov %sinkou,2
goto *common_main



*salamander002

name "Luka"
>Th...This is...\
name ""
>I feel Undine's power take root in my heart.@
>Projecting the power outside of me, I connect to the flow of the world around me.\
name $name
>Heh, so you can use it, can you?@
>Then dodge this!\
name ""
skillname "Anti Fire Fist"
dwave 1,"se\dageki.ogg"
>Salamander's hot fist shoots toward Luka's groin!
gosub *aqua_guard
name "Luka"
>............\
name ""
>Just like before, I'm surrounded by the flow of the world.\
>Sensing the wave from her disturbance, my body is pushed aside along it, evading her fist.\
name $name
>...I see, good.@
>It doesn't look like any attack will hit you as you are now.\
>Then next try attacking.@
>Not a special skill, just a normal attack.\
name ""
mov %sinkou,3
if %mp=0,mov %mp,1:gosub *mp
goto *common_main



*salamander_v

if %nanido=0 goto *salamander_v2
name "Luka"
>Ah... It went away...\
name ""
>As the last of my SP drains away, my concentration breaks.@
>It feels like I was forcefully dragged away from a fantasy world back into the normal one I had left.\
name $name
>...It seems like you understand it now.@
>When you're using that power, you're basically invincible.\
>But in turn, your SP decreases by one every turn.@
>Once you run out, the power is cut.\
name ""
name "Luka"
>I get it...!\
name ""
goto *salamander_v2



*salamander_v2

gosub *face2
name $name
>Hmm... So I'm already teaching you, am I?\
>...You pass, Luka.@
>I'll entrust my power of fire to you!\
name ""
mov %viclose,1:gosub *victory
mov %getexp,50000:gosub *lvup
mov %2314,1
mov %skill04,2
goto *sean0242



*salamander_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>Giving up?@
>Why did you even bother coming here then?\
name ""
goto *salamander_a



*salamander_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 && %aqua=2 && %sinkou=3 goto *salamander_attack
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *salamander_kousan
if %cmd1=16 goto *salamander_onedari
if %cmd1=17 goto *common_skill
goto *salamander_main



*salamander_attack

mov %before_action,4
gosub *common_attack1
name "Luka"
>Th...That was...\
name ""
>I just swung my sword along the flow.@
>Even though it seemed like a normal swing, the damage it inflicted was insane.\
name $name
>...Good, that's it.@
>When you're connected to the world, both your attacks and evasion are unmatched.\
>...But did you notice?@
>Your SP is decreasing by one every turn.\
>In other words, it's taking intense concentration to maintain that control.\
name ""
>Just as she said, maintaining this connection is quickly tiring me out.\
name $name
>...No more talking now.@
>The challenge continues!\
name ""
mov %sinkou,4
goto *common_main



*salamander_a

if %sinkou=1 && %enemylife<%henkahp1 && %mp>1 && %kousoku=0 && %kousan=0 goto *salamander001
if %sinkou=2 && %aqua=2 && %kousan=0 goto *salamander002
if %sinkou=4 && %aqua=0 && %kousan=0 goto *salamander_v
if %kousoku=1 gosub *salamander_a4:goto *common_main
if %kousoku=2 gosub *salamander_a6:goto *common_main
if %kousoku=3 gosub *salamander_a8:goto *common_main
if %enemylife<8000 gosub *salamander_a5:goto *common_main
rnd2 %ransu,1,5
if %ransu=1 gosub *salamander_a1:goto *common_main
if %ransu=2 gosub *salamander_a2:goto *common_main
if %ransu=3 && %owaza_count1a>6 gosub *salamander_a3:goto *common_main
if %ransu=4 && %owaza_count1b>6 gosub *salamander_a5:goto *common_main
if %ransu=5 && %owaza_count1c>6 gosub *salamander_a7:goto *common_main
skip -6



*salamander_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hmm, it seems you have some skill..."
if %ransu=2 mov $sel1,"Now, show me your strength!"
if %ransu=3 mov $sel1,"That's a nice gaze... But how do your abilities compare?"
name $name
eng $sel1:$sel6\
name ""
if %ransu=1 mov $sel1,"Salamander just sizes Luka up."
if %ransu=2 mov $sel1,"Salamander calmly remains motionless."
if %ransu=3 mov $sel1,"Salamander judges Luka."
eng $sel1:$sel6\
sub %stack,1
return



*salamander_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Can you take this attack!?"
if %ransu=2 mov $sel1,"Always attack the weak point!"
if %ransu=3 mov $sel1,"This skill will leave you defenseless!"
name $name
eng $sel1:$sel6\
name ""
skillname "Anti Fire Fist"
dwave 1,"se\dageki.ogg"
>Salamander's hot fist shoots toward Luka's groin!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3514
if %nanido<2 damage 55,65
if %nanido=2 damage 60,70
if %nanido=3 damage 65,75
dwave 1,"se\ero_koki1.ogg"
>Salamander grabs Luka's penis, stroking it with her hot hand!
if %nanido<2 damage 55,65
if %nanido=2 damage 60,70
if %nanido=3 damage 65,75
>She strokes him even faster!
if %nanido<2 damage 55,65
if %nanido=2 damage 60,70
if %nanido=3 damage 65,75
skillname ""
if %mylife=0 sub %stack,1:return *salamander_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*salamander_a3

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Take my foot technique!"
if %ransu=2 mov $sel1,"Too slow! You're open!"
if %ransu=3 mov $sel1,"My foot will crush you!"
name $name
eng $sel1:$sel6\
name ""
skillname "Fire Spirit's Foot"
dwave 1,"se\dageki.ogg"
>Salamander's foot shoots toward Luka's groin!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3515
if %nanido<2 damage 55,65
if %nanido=2 damage 60,70
if %nanido=3 damage 65,75
mov %status,2:gosub *status_print
>Luka's body goes numb!\
gosub *face2
name $name
>Heh, an opening!\
name ""
>Salamander forces Luka to the ground and grabs his legs!@
>Spreading them apart, she steps on his penis!\
mov %kousoku,1:gosub *status_print
>Both of Luka's legs are being held by Salamander!\
dwave 1,"se\ero_koki1.ogg"
>Salamander steps down hard on Luka's penis!
if %nanido<2 damage 35,45
if %nanido=2 damage 40,50
if %nanido=3 damage 45,55
>She moves her foot back and forth, stroking Luka with her foot!
if %nanido<2 damage 35,45
if %nanido=2 damage 40,50
if %nanido=3 damage 45,55
skillname ""
if %mylife=0 sub %stack,1:return *salamander_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,2,3
if %nanido=3 rnd2 %status_turn,3,4
if %earth=0 && %nanido<2 mov %genmogaku,2
if %earth=0 && %nanido=2 mov %genmogaku,3
if %earth=0 && %nanido=3 mov %genmogaku,4
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
sub %stack,1
return



*salamander_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hahaha!"
if %ransu=2 mov $sel1,"It isn't over yet! Writhe under my foot!"
if %ransu=3 mov $sel1,"Haha, well? Do you love my foot!?"
name $name
eng $sel1:$sel6\
name ""
skillname "Fire Spirit's Foot"
dwave 1,"se\ero_koki1.ogg"
>Salamander steps down hard on Luka's penis!
skillcount2 3515
if %nanido<2 damage 35,45
if %nanido=2 damage 35,45
if %nanido=3 damage 45,55
>Salamander uses the sole of her foot to rub Luka's shaft!
if %nanido<2 damage 35,45
if %nanido=2 damage 35,45
if %nanido=3 damage 45,55
>Salamander violently shakes her foot, vibrating against Luka's penis!
if %nanido<2 damage 35,45
if %nanido=2 damage 35,45
if %nanido=3 damage 45,55
skillname ""
if %mylife=0 sub %stack,1:return *salamander_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*salamander_a5

add %stack,1
mov %owaza_count1b,0
mov %owaza_num1,2
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Will my embrace finish you?"
if %ransu=2 mov $sel1,"I'm good at restraining moves, too..."
if %ransu=3 mov $sel1,"Letting me get so close... You're still too inexperienced!"
name $name
eng $sel1:$sel6\
name ""
skillname "Fire Spirit's Embrace"
dwave 1,"se\ero_makituki5.ogg"
>Salamander rushes forward and hugs Luka, forcing his face into her breasts!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3516
if %nanido<2 damage 35,45
if %nanido=2 damage 35,45
if %nanido=3 damage 45,55
mov %kousoku,2:gosub *status_print
>Luka is being tightly hugged by Salamander!\
gosub *face2
name $name
>Hah!@> Choke on my breasts!\
name ""
dwave 1,"se\ero_makituki5.ogg"
>Salamander squeezes Luka's head between her breasts!
if %nanido<2 damage 35,45
if %nanido=2 damage 35,45
if %nanido=3 damage 45,55
dwave 1,"se\ero_simetuke1.ogg"
>She tightens her arms, hugging Luka even tighter!
if %nanido<2 damage 45,55
if %nanido=2 damage 35,45
if %nanido=3 damage 45,55
skillname ""
if %mylife=0 sub %stack,1:return *salamander_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
if %earth=0 && %nanido<2 mov %genmogaku,3
if %earth=0 && %nanido=2 mov %genmogaku,3
if %earth=0 && %nanido=3 mov %genmogaku,4
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
if %enemylife<8000 mov %genmogaku,99
sub %stack,1
return



*salamander_a6

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"It's not over yet! Writhe in my embrace!"
if %ransu=2 mov $sel1,"Hehe, my breasts are hot, aren't they?"
if %ransu=3 mov $sel1,"I'll hug you tighter and tighter!"
name $name
eng $sel1:$sel6\
name ""
skillname "Fire Spirit's Embrace"
dwave 1,"se\ero_makituki5.ogg"
>Salamander squeezes Luka's head between her breasts!
skillcount2 3516
if %nanido<2 damage 35,45
if %nanido=2 damage 35,45
if %nanido=3 damage 45,55
dwave 1,"se\ero_simetuke1.ogg"
>She tightens her arms, hugging Luka even tighter!
if %nanido<2 damage 45,55
if %nanido=2 damage 35,45
if %nanido=3 damage 45,55
skillname ""
if %mylife=0 sub %stack,1:return *salamander_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*salamander_a7

add %stack,1
mov %owaza_count1c,0
mov %owaza_num1,3
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"This technique is both a bind and a throw!"
if %ransu=2 mov $sel1,"How about this!?"
if %ransu=3 mov $sel1,"It's about to get a little violent!"
name $name
eng $sel1:$sel6\
name ""
skillname "Flame Steiner"
dwave 1,"se\ero_makituki5.ogg"
eng "Salamander jumps at Luka, and grabs his head between her thighs!":$sel6/
skillcount2 3517
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>Like that, Luka is flung to the ground!
if %nanido<2 damage 25,35
if %nanido=2 damage 30,40
if %nanido=3 damage 35,45
mov %kousoku,3:gosub *status_print
>Salamander is sitting on top of Luka, with his head between her thighs!\
gosub *face2
name $name
>Hah, take it!\
name ""
dwave 1,"se\ero_makituki5.ogg"
>Salamander squeezes Luka's head between her thighs!
if %nanido<2 damage 35,45
if %nanido=2 damage 35,45
if %nanido=3 damage 45,55
dwave 1,"se\ero_simetuke1.ogg"
>She squeezes even tighter, increasing the pressure!
if %nanido<2 damage 35,45
if %nanido=2 damage 35,45
if %nanido=3 damage 45,55
skillname ""
if %mylife=0 sub %stack,1:return *salamander_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
if %earth=0 && %nanido<2 mov %genmogaku,3
if %earth=0 && %nanido=2 mov %genmogaku,3
if %earth=0 && %nanido=3 mov %genmogaku,4
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
sub %stack,1
return



*salamander_a8

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"It isn't over yet! Taste my thighs!"
if %ransu=2 mov $sel1,"Are you going to be finished from this!?"
if %ransu=3 mov $sel1,"Haha, are you getting light-headed!?"
name $name
eng $sel1:$sel6\
name ""
skillname "Flame Steiner"
dwave 1,"se\ero_makituki5.ogg"
>Salamander squeezes Luka's head between her thighs!
skillcount2 3517
if %nanido<2 damage 35,45
if %nanido=2 damage 35,45
if %nanido=3 damage 45,55
dwave 1,"se\ero_simetuke1.ogg"
>She squeezes even tighter, increasing the pressure!
if %nanido<2 damage 35,45
if %nanido=2 damage 35,45
if %nanido=3 damage 45,55
skillname ""
if %mylife=0 sub %stack,1:return *salamander_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*salamander_onedari

mov $list1,"Anti Fire Fist"
if %3514>0 mov %list_num1,1
mov $list2,"Fire Spirit's Foot"
if %3515>0 mov %list_num2,1
mov $list3,"Fire Spirit's Embrace"
if %3516>0 mov %list_num3,1
mov $list4,"Flame Steiner"
if %3517>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *salamander_onedari1
if %cmd1=12 goto *salamander_onedari2
if %cmd1=13 goto *salamander_onedari3
if %cmd1=14 goto *salamander_onedari4
if %cmd1=-1 goto *salamander_main
goto *salamander_onedari



*salamander_onedari1

gosub *onedari_syori
name $name
>You want to take my fist?\
name ""
gosub *salamander_a2
skip -1



*salamander_onedari2

gosub *onedari_syori_k
name $name
>You want to take my foot technique?\
name ""
notif %kousoku=1 gosub *salamander_a3
gosub *salamander_a4
skip -1



*salamander_onedari3

gosub *onedari_syori_k
name $name
>You want to feel my embrace?\
name ""
notif %kousoku=2 gosub *salamander_a5
gosub *salamander_a6
skip -1



*salamander_onedari4

gosub *onedari_syori_k
name $name
>You want to take my throwing technique?\
name ""
notif %kousoku=3 gosub *salamander_a7
gosub *salamander_a8
skip -1



*salamander_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\salamander_bk04.bmp",0,0
gosub *syasei2
>As Salamander's hot hand strokes Luka's penis, he comes, covering her palm in semen.\
mov %viclose,1:gosub *lose
mov %2614,%2614+1:if %2614=1 mov %count_koenemy,%count_koenemy+1
if %2614>%count_most mov %count_most,%2614:mov $count_mostname,$name
count 5,3
mov $bad1,"Salamander's handjob forced Luka to an orgasm."
gosub *face2
name $name
>Becoming defenseless from that little...?@
>How disappointing...\
name ""
goto *salamander_h



*salamander_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\salamander_bk03.bmp",0,0
gosub *syasei2
>As Salamander stepped on Luka's penis, he comes, covering her foot in semen.\
mov %viclose,1:gosub *lose
mov %2614,%2614+1:if %2614=1 mov %count_koenemy,%count_koenemy+1
if %2614>%count_most mov %count_most,%2614:mov $count_mostname,$name
count 6,3
mov $bad1,"Salamander forced Luka to an orgasm as she stepped on him."
gosub *face2
name $name
>It seems like my foot was too much for you...@
>How disappointing...\
name ""
goto *salamander_h



*salamander_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\salamander_bk02.bmp",0,0
gosub *syasei2
>As Luka's head is squeezed between Salamander's breasts as she tightly embraces him, he comes, shamefully having an orgasm as he chokes.\
mov %viclose,1:gosub *lose
mov %2614,%2614+1:if %2614=1 mov %count_koenemy,%count_koenemy+1
if %2614>%count_most mov %count_most,%2614:mov $count_mostname,$name
count 30,3
mov $bad1,"Luka was forced to an orgasm as Salamander choked him with her breasts."
gosub *face2
name $name
>Having an orgasm from a little choking?@
>How disappointing...\
name ""
goto *salamander_h



*salamander_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\salamander_bk01.bmp",0,0
gosub *syasei2
>As Salamander's thighs squeeze his head, Luka comes, shamefully having an orgasm from the pain.\
mov %viclose,1:gosub *lose
mov %2614,%2614+1:if %2614=1 mov %count_koenemy,%count_koenemy+1
if %2614>%count_most mov %count_most,%2614:mov $count_mostname,$name
count 30,3
mov $bad1,"As Salamander squeezed Luka's head between her thighs, he had an orgasm."
gosub *face2
name $name
>Having an orgasm from a little squeezing?@
>How disappointing...\
name ""
goto *salamander_h



*salamander_h

mov %skill04,0
mov $bad2,"Exercising her right as the victor, Salamander rapes Luka for the rest of his life."
if %2614=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
name $name
>So a novice made me waste my time.@
>You'll have to pay for that.\
name ""
>Exhausted and unable to resist her, Salamander brings me close to her body.@
cspl 690,699
lsp 700,":a;chara\salamander_ha1.bmp",0,0:print 10,500
>Like that, she forces my penis into one of her breasts!\
name "Luka"
>Ah!@>Ahh...\
name ""
>My penis sinks into her soft breast, filling me with her warmth.\
>After the initial surprise starts to fade, I feel the heat from her chest flowing through me, slowly making my body tingle in pleasure.\
name $name
>Hehe, my breast is hot, isn't it?@
>If I wanted to, I could increase the temperature and incinerate your body whenever I want...\
name ""
name "Luka"
>Ahh... D...D.on't... Stop...\
name ""
name $name
>Don't worry, I have no interest in doing that.@
>If I injured your body, I wouldn't be able to have any fun with it, after all.\
>I'll keep it nice and hot, but not enough to burn you...\
name ""
>Smiling, Salamander pushes her breast into my penis.@
>I sink into her soft flesh, sighing in pleasure as my sensitive penis rubs against her smooth skin.\
name "Luka"
>Ah...ahh...\
name ""
>As her warmth relaxes me, I sigh and soak myself in the amazing pleasure.\
name $name
>Hehe, well?@
>Do you like my hot breast?\
name ""
name "Luka"
>Haa... This feels so good...\
name ""
>As I focus on nothing but the heat and softness of her breast, a dull ache fills my lower body.\
>Unable to endure her at all, I let out a happy moan as I yield to the orgasm.\
gosub *syasei1
lsp 700,":a;chara\salamander_ha2.bmp",0,0
gosub *syasei2
name $name
>Hmm...?@>What, already finished?\
name ""
name "Luka"
>Ahhh...\
name ""
>My cheeks go red at the seemingly accidental ejaculation.@
>All the while, her soft breast gently pushes against my penis.\
>I don't even try to struggle against her.@
>Her warmth... I want to feel more of it...\
name $name
>Your sword arm is lacking, and your penis is quick to orgasm...@
>You really are a man of low worth.\
name ""
>Salamander pushes my penis even harder into her breast as she taunts me.\
>My now extra sensitive penis after my orgasm sinks into her soft breast, exploding new pleasure within me.\
name "Luka"
>Ahhhh...\
name ""
name $name
>I'll rub it next...@
>The best way to deal with that fragile penis of yours is with these soft breasts of mine...\
name ""
name "Luka"
>Ahhh...!!\
name ""
mov %hseanwave,17:hseanwave
>The tip of my penis sinks even deeper into her soft breast as she uses her hand to grind her breast against my penis.@
>Like that, she starts to rub her breast against me, as if trying to scrub it clean.\
>Along with the heat radiating off her chest, the gentle massage makes me gasp in pleasure as I stop thinking about anything but the ecstasy.\
name "Luka"
>Haaa...\
name ""
>I give myself over completely to the stimulation from her breast, gently grinding against my penis.\
name $name
>Has your heart already broken?@
>How pathetic...\
name ""
>Salamander sneers at me as she rubs her breast against me.@
>But not caring about her taunts, I just indulge in the pleasure, sometimes even pushing up into her to feel more.\
name "Luka"
>Ahh... I'm going to come again...\
name ""
name $name
>Sheesh, you really are a premature ejaculator, aren't you?@
>Go ahead, cover my breasts in semen again.\
name ""
>Salamander starts to rub me with even more intensity, trying to finish me off.\
>Up and down, back and forth... She moves her breast in seemingly random directions, massaging my penis as she rubs me.\
name $name
>Come on, lets see another miserable ejaculation!\
name ""
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\salamander_ha3.bmp",0,0
gosub *syasei2
>I tremble as I come again, covering her breasts with even more semen than the first orgasm.\
name "Luka"
>Ahh...\
name ""
>I immerse myself in the comfortable bliss of her warm breast after my orgasm.@
>Sighing, I relax as all of my strength fades from me.\
name $name
>Even though you're weak, and a premature ejaculator...@
>Your semen still tastes delicious.\
>Alright, I decided.@>I'll keep you as a semen slave.@
>From now on, your only role in life is to satisfy my appetite.\
name ""
name "Luka"
>Wh...What...?@>Ahhh!!\
name ""
>Salamander rubs her nipple against the tip of my penis, gently pushing against my urethral opening.@
>As her hard nipple pushes into my tip, my words of protest are cut off.\
name $name
>Humans who challenge the spirits and lose have traditionally been killed.@
>But I'll keep you alive...@> You should be thankful.\
name ""
name "Luka"
>Ahhhh...\
name ""
>After saying that, Salamander laughs as she plays with the tip of my penis with her nipple, already working on the next orgasm...\
gosub *anten
mov %hseanwave,0:hseanwave
>After that, she continued using me for my semen...@
>Kept captive, my days are filled with nothing but being milked for my semen.\
>This is my fate, decided by Salamander...@
>Nothing but a slave to be used to satisfy her appetite...\
>...........\
goto *badend



*granberia3_start

mov $name,"Granberia"
mov $name2,"Granberia"
mov $lavel,"granberia3"
mov $tatie1,"granberia_st41"
mov $tatie2,"granberia_st41"
mov $tatie3,"granberia_st41"
mov $tatie4,"granberia_st41"
mov $haikei,"bg115"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,24000
if %nanido=2 mov %max_enemylife,24000
if %nanido=3 mov %max_enemylife,24000
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,70
mov %kaihi,80
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %music,4
mov %tikei,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov %end_n,7
mov %exp_minus,130000
mov %zmonster_x,-270
mov %tukix,320
name "Luka"
>Of course, I'll accept her challenge!\
name ""
>If I don't accept her challenge, I'd be neither a Hero nor a warrior nor a man!\
name $name
>Now show me, boy!@
>Fight with everything you have right from the start!\
name ""
mov %sinkou,1
goto *common_main



*granberia3001

name $name
>That's what I've been waiting for!\
name ""
skillname "Cleave"
dwave 1,"se\karaburi.ogg"
>Granberia steps forward, and slashes out with her giant sword!\
name "Luka"
>.............\
name ""
>A huge wave is racing right toward me.@
>I let the giant wave push me aside, evading her attack.\
gosub *aqua_guard
name $name
>Oho? I see...\
name ""
mov %sinkou,2
goto *common_main



*granberia3002

if %before_action>40 goto *granberia3006
name $name
>....!\
name ""
>Taking my quick attack, Granberia jumps backward in surprise.\
name $name
>P...Powerful!@
>How can such thin arms attack with such force...?\
name ""
name "Luka"
>..........\
name ""
>...I can do it!@
>I can fight Granberia as I am now!\
name $name
>It seems that my wait and see attitude is no longer necessary.@
>Very well then, I'll take this fight seriously!\
name ""
skillname "Serene Mind"
dwave 2,"se\aqua.ogg"
>Granberia entrusts herself to the flow!\
skillname ""
name "Luka"
>...What!? No way!\
name ""
>The huge wave coming off of her, that seemed to overwhelm everything around it...@
>In seconds, it faded into the flow of everything else!\
>Did she do the same thing as me, and become one with the flows!?\
name "Luka"
>Aren't you the "Swordswoman of Fire"!?@
>Why would you use a water ability!?\
name ""
name $name
>Having a serene mind is natural for a warrior.@
>The attribute it's associated with is meaningless!\
name ""
skillname "Cleave"
dwave 1,"se\karaburi.ogg"
>Swinging down the flow, Granberia's sword flashes toward Luka!\
wait 500
skillname "Serene Movement"
>Barely able to detect the wave, the attack glances against Luka!
damage 100,150
skillname ""
if %mylife=0 goto *granberia3_h1
name "Luka"
>Guh...!\
name ""
>It hit, I couldn't do anything...@
>No, not quite... I was able to lower the damage it dealt, protecting me from an instant death...\
name "Luka"
>I didn't think you could use that skill...\
name ""
name $name
>Heh, that's what I was going to say.@
>To think you could master that ability as a human...\
>In fact... I only managed to master it 20 years ago.\
name ""
name "Luka"
>20 years ago...?@
>Granberia, how old are you...?\
name ""
>I never thought about how old she was...@
>Seeing as how she's so powerful, she must be quite old...\
name $name
>I'll be 25 this year.@
>But no more talking during our battle!\
name ""
name "Luka"
>Oh, really...@>Ehhh!?\
>Then... You mastered it at 5 years old!?\
name ""
>A 5 year old child was able to attain a serene mind!?\
name $name
>No more words!@
>We will speak with our blades!\
name ""
mov %sinkou,3
goto *common_main



*granberia3003

if %before_action>40 goto *granberia3006
name $name
>That sharp attack I couldn't avoid... !\
name ""
>Blood drips from Granberia's cheek.\
name $name
>How many years has it been since I was wounded in battle...?@
>Ahh, my pulse is racing, my spirit is burning!\
name ""
skillname "Dragon Butcher Attack"
dwave 1,"se\karaburi.ogg"
>Following the flow, Granberia's sword slams down!\
wait 500
skillname "Serene Movement"
>Barely able to detect the wave, the attack glances against Luka!
damage 300,400
if %mylife=0 goto *granberia3_h1
skillname ""
name "Luka"
>Guh...!\
name ""
>Even though it only glanced against me, it dealt that much damage...@
>If I took that attack normally, I'd be dead!\
name $name
>...It's time to settle this battle.@
>Look upon my ultimate move!\
name ""
>Granberia holds up her sword, and starts to concentrate her power!\
name "Luka"
>Gah!@> Granberia's ultimate move!?\
name ""
>The ultimate move of the legendary swordswoman Granberia...@
>This can't be good!\
lsp2 0,":a;chara\salamander_st03.bmp",250,300,100,100,0,200
gosub *syoukan_effect
name "Salamander"
>This isn't good!@> You can't defend or evade that attack!@
>The only chance is for you to attack her with your most powerful move at the same time!\
name ""
mov %sinkou,4
if %mp>4 goto *common_main
name "Luka"
>But my SP...\
name ""
>I don't have enough power left to launch a Death Sword Chaos Star...!\
goto *common_main



*granberia3004

dwave 1,"se\fire1.ogg"
lsp 700,":a;chara\granberia_st42.bmp",0,0:print 10,500
name $name
>Ultimate move... Vaporizing Rebellion Sword!\
name ""
skillname "Vaporizing Rebellion Sword"
>Granberia's sword flashes, launching innumerable attacks!\
wait 500
gosub *skill16a
dwave 1,"se\slash.ogg"
mov %damage_kotei,1
mov %damage_nobr,1:damage 500,700
dwave 1,"se\slash.ogg"
mov %damage_kotei,1
mov %damage_nobr,2:damage 500,700
textclear
dwave 1,"se\slash.ogg"
mov %damage_kotei,1
mov %damage_nobr,1:damage 500,700
dwave 1,"se\slash.ogg"
mov %damage_kotei,1
mov %damage_nobr,1:damage 500,700
textclear
dwave 1,"se\slash.ogg"
mov %damage_kotei,1
mov %damage_nobr,2:damage 500,700
\
skillname ""
name "Luka"
>Uwaaa!\
name ""
>Unable to take her relentless assault, I fall to my knees.\
dwave 1,"se\down.ogg"
lsp 700,":a;chara\granberia_st41.bmp",0,0:print 10,500
mov %viclose,2:gosub *lose
mov %2615,%2615+1:if %2615=1 mov %count_koenemy,%count_koenemy+1
if %2615>%count_most mov %count_most,%2615:mov $count_mostname,$name+" (3)"
count 14,3
mov $bad1,"Luka was brought to his knees by Granberia's ultimate move."
name $name
>...There's no need to be ashamed.@
>For a human, you did well to make it this far.\
name ""
goto *granberia3_h



*granberia3005

name $name
>...Has your concentration run out?@
>If so, you have no chance of victory.\
>Now taste my ultimate move!\
name ""
goto *granberia3004



*granberia3006

name $name
>What's wrong...?@
>Show me your power!\
name ""
>Granberia calmly brandishes her sword at Luka!\
goto *common_main



*granberia3_v

name "Luka"
>Death Sword Chaos Star!\
name ""
mov %mp,%mp-4
gosub *mp
dwave 1,"se\fire1.ogg"
lsp 700,":a;chara\granberia_st42.bmp",0,0:print 10,500
name $name
>Ultimate move... Vaporizing Rebellion Sword!\
name ""
>The two of them unleash their most powerful moves at the same time!\
wait 500
gosub *skill16a
textclear
>Luka and Granberia's swords clash together!\
dwave 1,"se\slash.ogg"
rnd2 %abairitu,50,150:mov %damage_nobr,1:gosub *enemylife
dwave 1,"se\slash.ogg"
mov %damage_kotei,1
mov %damage_nobr,2:damage 500,700
textclear
dwave 1,"se\slash.ogg"
rnd2 %abairitu,50,150:mov %damage_nobr,1:gosub *enemylife
dwave 1,"se\slash.ogg"
mov %damage_kotei,1
mov %damage_nobr,1:damage 500,700
dwave 1,"se\slash.ogg"
rnd2 %abairitu,50,150:mov %damage_nobr,2:gosub *enemylife
textclear
dwave 1,"se\slash.ogg"
mov %damage_kotei,1
mov %damage_nobr,1:damage 500,700
dwave 1,"se\slash.ogg"
rnd2 %abairitu,50,150:mov %damage_nobr,1:gosub *enemylife
dwave 1,"se\slash.ogg"
mov %damage_kotei,1
mov %damage_nobr,2:damage 500,700
textclear
dwave 1,"se\slash.ogg"
rnd2 %abairitu,50,150:mov %damage_nobr,1:gosub *enemylife
dwave 1,"se\slash.ogg"
mov %damage_kotei,1
damage 500,700
skillname ""
name "Luka"
>Uwaaa!\
name ""
dwave 1,"se\down.ogg"
>Luka's body is thrown into the air, then crashes to the ground!\
bgmstop
lsp 700,":a;chara\granberia_st41.bmp",0,0
bg "BG\"+$haikei+".bmp",10,1500
mov %aqua,0
gosub *elm_print
bgm "bgm\sitenno.ogg"
name "Luka"
>Guh...\
name ""
>Vaporizing Rebellion Sword... My skill doesn't even compare to hers.\
name $name
>Wonderful...@
>Inflicting a wound upon me even as taking my attack.\
name ""
>But... Granberia wasn't left uninjured.@
>Of course, my injuries are far, far worse...\
name "Luka"
>Urhg...\
name ""
>I don't even have the power left to stand.@
>It's my complete loss...\
bgmstop
mov %2315,1
mov %battle,0:skipoff
bg "BG\"+$haikei+".bmp",10,1500
cspl 0,611
gosub *setwindow_01p
>Luka was defeated by Granberia...\
if %zukanon=1 return *zukan_commonkaisou0
goto *sean0243



*granberia3_kousan

>She would simply kill me if I surrendered here...\
goto *granberia3_main



*granberia3_main

gosub *cmd_main
if %cmd1=11 && %nanido=0 goto *common_attack
if %cmd1=11 && %sinkou=1 goto *granberia3_attack
if %cmd1=11 goto *common_attack
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *granberia3_kousan
if %cmd1=16 goto *granberia3_onedari
if %cmd1=17 && %nanido=0 goto *common_skill
if %cmd1=17 goto *granberia3_skill
goto *granberia3_main



*granberia3_attack

mov %before_action,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ha!"
if %ransu=2 mov $sel1,"Hya!"
if %ransu=3 mov $sel1,"Orya!"
name "Luka"
eng $sel1:$sel6\
name ""
mov %skill_sub,1
gosub *common_attack2
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\miss.ogg"
gosub *kaihi
>But Granberia easily dodges!\
skillname ""
goto "*"+$lavel+"_a"



*granberia3_skill

gosub *cmd_skill
if %cmd1=21 && %aqua=2 goto *skill1
if %cmd1=21 && %aqua<2 goto *granberia3_skillx1
if %cmd1=22 && %aqua=2 && %sinkou=4 goto *granberia3_v
if %cmd1=22 && %aqua=2 goto *skill6
if %cmd1=22 && %aqua<2 goto *granberia3_skillx1
if %cmd1=24 goto *skill4
if %cmd1=26 && %aqua=2 goto *skill11
if %cmd1=26 && %aqua<2 goto *granberia3_skillx1
if %cmd1=27 && %aqua=2 goto *skill12
if %cmd1=27 && %aqua<2 goto *granberia3_skillx1
if %cmd1=31 goto *skill7b
if %cmd1=32 goto *skill8b
if %cmd1=33 goto *skill10b
if %cmd1=35 goto *skill17
if %cmd1=-1 goto "*"+$lavel+"_main"
goto *granberia3_skill



*granberia3_skillx1

if %cmd1=21 mov %skill_sub,1:gosub *skill1:skip 4
if %cmd1=22 mov %skill_sub,1:gosub *skill6:skip 3
if %cmd1=26 mov %skill_sub,1:gosub *skill11:skip 2
if %cmd1=27 mov %skill_sub,1:gosub *skill12
mov %skill_sub,0
wait 200
dwave 1,"se\karaburi.ogg"
gosub *kaihi
>But Granberia easily dodges!\
skillname ""
goto "*"+$lavel+"_a"



*granberia3_a

if %sinkou>1 && %aqua=0 goto *granberia3005
if %sinkou=1 && %aqua=2 goto *granberia3001
if %sinkou=2 && %aqua=2 goto *granberia3002
if %sinkou=3 && %aqua=2 goto *granberia3003
if %sinkou=4 && %aqua=2 goto *granberia3004
if %aqua=0 rnd2 %ransu,1,3
if %aqua=0 && %ransu<3 gosub *granberia3_a1:goto *common_main
if %aqua=0 && %ransu=3 gosub *granberia3_a2:goto *common_main
skip -3



*granberia3_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"What's wrong...? Show me your moves!"
if %ransu=2 mov $sel1,"That pathetic ability isn't what you're really made of!"
if %ransu=3 mov $sel1,"Show me your true power!"
name $name
eng $sel1:$sel6\
name ""
skillname "Feint"
dwave 1,"se\tuki.ogg"
>Granberia lightly uses her hilt to hit Luka!
damage 100,150
skillname ""
if %mylife=0 sub %stack,1:return *granberia3_h1
sub %stack,1
return



*granberia3_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I don't intend to wait silently!"
if %ransu=2 mov $sel1,"I'll cut you down if you don't intend to show me your power!"
if %ransu=3 mov $sel1,"Do you intend to play around in front of me!?"
name $name
eng $sel1:$sel6\
name ""
skillname "Cleave"
dwave 1,"se\karaburi.ogg"
>Granberia slashes out, mowing down everything in her sword's path!
mov %a_effect1,1
damage 300,400
skillname ""
if %mylife=0 sub %stack,1:return *granberia3_h1
sub %stack,1
return



*granberia3_onedari

>Granberia would never listen to my demands...\
goto *granberia3_main



*granberia3_h1

name "Luka"
>Urhg!\
name ""
>Overwhelmed by Granberia's abilities, I fall to my knees.\
mov %viclose,2:gosub *lose
mov %2615,%2615+1:if %2615=1 mov %count_koenemy,%count_koenemy+1
if %2615>%count_most mov %count_most,%2615:mov $count_mostname,$name+" (3)"
count 14,3
mov $bad1,"Granberia's abilities brought Luka to his knees."
name $name
>...So that's it.@
>In the end, a human cannot ever match me.\
name ""
goto *granberia3_h



*granberia3_h

mov $bad2,"Brought back to the Monster Lord's castle, Luka became Granberia's lover."
mov $tatie2,"granberia_st13"
if %2615=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Urhg...\
name ""
>Exhausted and injured, I fall to the ground.@
>Almost as if paralyzed, I can't move.\
lsp 700,":a;chara\granberia_st05.bmp",0,0:print 10,500
name $name
>...........\
name ""
>Granberia looks down at me at her feet.@
>Suddenly, her eyes brighten up as she speaks.\
if %con_hvoice=0 dwave 0,"voice\granberia3_01.ogg"
name $name
>After a battle of life and death, my body becomes so hot...
>My monster instinct is making me desire a male's semen...\
name ""
dwavestop 0
>Granberia starts to slowly rip off my pants.\
name "Luka"
>S...Stop!\
name ""
>After ripping off my pants, she tears through my underwear.@
>Granberia stares intently at my penis, now exposed to the air.\
if %con_hvoice=0 dwave 0,"voice\granberia3_02.ogg"
name $name
>Nnn... The smell of sweat and the smell of a man...\
if %con_hvoice=0 dwave 0,"voice\granberia3_03.ogg"
>If you let out such a dirty smell as that...
>I won't be able to hold myself back...\
name ""
dwavestop 0
>Granberia tears off her armor as fast as she can, and jumps at me, planting her face right in front of my penis.\
cspl 690,699
lsp 700,":a;chara\granberia_hc1.bmp",0,0:print 10,500
>And sticking out her tongue, licks my penis with one long draw of her tongue.\
name "Luka"
>Ahh!\
name ""
>Her rough tongue leaves a trail of her saliva on me.\
if %con_hvoice=0 dwave 0,"voice\granberia3_04.ogg"
name $name
>Your penis has such a dirty taste...
>I'll taste it even more...\
if %con_hvoice=0 dwave 0,"voice\granberia3_05.ogg"
>Nnnn... *Lick*\
name ""
mov %hseanvoice,8:hseanvoice
>Granberia continues to lick me, her strong tongue running up and down my shaft with powerful strokes.\
>Almost like she was trying to lick me clean, she eagerly gets the taste of me she wanted.\
name "Luka"
>Ah..Ahh...\
name ""
if %con_hvoice=0 dwavestop 13:dwave 0,"voice\granberia3_06.ogg"
name $name
>*Lick* *Lick*\
name ""
mov %hseanvoice,8:hseanvoice
>The dignified Granberia is so eagerly licking my penis...\
>Over and over, she licks my shaft up and down, indulging herself in the taste.@
>In almost no time at all, my penis is sticky with her warm saliva.\
name "Luka"
>S...Stop... Don't lick it like that...\
name ""
>Her tongue is rough, almost like a cat's.\
>I can hear the almost silent sound of her rough tongue licking my skin with every run of her tongue, mixed in with the sounds of her saliva and breathing.\
mov %hseanvoice,0:hseanvoice
if %con_hvoice=0 dwavestop 13:dwave 0,"voice\granberia3_07.ogg"
name $name
>Nnnn... *Lick*\
name ""
mov %hseanvoice,8:hseanvoice
name "Luka"
>Ah...!@> Ahh!\
name ""
>Granberia's tongue switches over to the tip of my penis, using her tip to poke and rub at me.\
>After licking my tip clean, she switches over to the back muscle of my penis, running her rough tongue up and down.\
>Over and over, she traces her tongue up and down my sensitive muscle.\
name "Luka"
>Ahh...\
name ""
if %con_hvoice=0 dwavestop 13:dwave 0,"voice\granberia3_08.ogg"
name $name
>*Lick* Nnnn...\
name ""
mov %hseanvoice,8:hseanvoice
>The tip of Granberia's tongue starts to poke at my urethral opening.@
>She gently pushes against it, lapping up the pre-come leaking out.\
>I tremble as she tenderly licks my tip, already greedily licking up my pre-come.@
>At this rate, she's going to make me ejaculate in no time...\
name "Luka"
>N...No more... I'm going to come...\
name ""
if %con_hvoice=0 dwavestop 13:dwave 0,"voice\granberia3_09.ogg"
name $name
>*Lick*... Good, come...
>Shoot out a lot of your male juice... *Lick*\
if %con_hvoice=0 dwave 0,"voice\granberia3_10.ogg"
>*Lick* *Lick*\
name ""
mov %hseanvoice,8:hseanvoice
>Granberia starts to attack me with even more intensity with her tongue, excited at the prospect of my orgasm.\
>I feel the climax rising through me as Granberia's tongue runs over my penis.\
name "Luka"
>Ah...ahh...!@> Ahhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\granberia_hc2.bmp",0,0
gosub *syasei2
if %con_hvoice=0 dwavestop 13:dwave 0,"voice\granberia3_11.ogg"
name $name
>Nnnn! Nnnn...
>*Lick*\
name ""
mov %hseanvoice,8:hseanvoice
>The moment my semen shoots out toward her face, Granberia's tongue switches to the tip of my penis.@
>Licking my tip faster than I thought possible, she greedily laps up my semen as I shoot it out.\
name "Luka"
>S...Stop!@
>Don't lick like that as I'm coming!\
name ""
if %con_hvoice=0 dwavestop 13:dwave 0,"voice\granberia3_12.ogg"
name $name
>*Lick*\
name ""
mov %hseanvoice,8:hseanvoice
>I writhe in unbearable pleasure as her rough tongue rubs and pokes at my urethral opening, licking out the leftover semen.\
>After my powerful orgasm and having my penis forcibly licked clean, I sigh as I feel the energy drain from my body.\
name "Luka"
>Ahhhh...\
name ""
if %con_hvoice=0 dwavestop 13:dwave 0,"voice\granberia3_13.ogg"
name $name
>Nnn... *Lick* More... That isn't enough...
>I'll drink more of your male juice...\
name ""
dwavestop 0
name "Luka"
>S..Stop this already...\
name ""
if %con_hvoice=0 dwave 0,"voice\granberia3_14.ogg"
name $name
>I'll taste your penis inside my mouth...
>Nnn... Mmmm...\
name ""
mov %hseanvoice,9:hseanvoice
lsp 700,":a;chara\granberia_hc3.bmp",0,0:print 10,500
>Like that, Granberia closes her lips around just the tip of my penis.\
name "Luka"
>Ahhh!\
name ""
>The sensitive tip of my penis is inside of her warm mouth.@
>With her soft lips gently pressed around my shaft under the tip, I can't stop myself from shaking my waist side to side in pleasure.\
if %con_hvoice=0 dwavestop 13:dwave 0,"voice\granberia3_15.ogg"
name $name
>Nnnn... *Suck*
>A male's taste... Is filling my mouth...\
if %con_hvoice=0 dwave 0,"voice\granberia3_16.ogg"
>*Lick* *Suck*\
name ""
mov %hseanvoice,9:hseanvoice
>Granberia frantically sucks on the tip of my penis as her tongue eagerly runs all over the glans inside of her mouth.\
name "Luka"
>Haaa...\
name ""
if %con_hvoice=0 dwavestop 13:dwave 0,"voice\granberia3_17.ogg"
name $name
>Nnnn... *Suck* *Lick*
>*Lick*\
name ""
mov %hseanvoice,9:hseanvoice
>The force she's using to suck on me slowly gets even more powerful and crazed as she gives in to her monster lust.\
>Unable to endure her, I writhe pitifully as she sucks on me.\
name "Luka"
>Ahh... Don't suck so hard...\
name ""
if %con_hvoice=0 dwavestop 13:dwave 0,"voice\granberia3_18.ogg"
name $name
>*Suck* *Lick*
>*Suck*\
name ""
mov %hseanvoice,9:hseanvoice
>But she ignores me, too enraptured in indulging herself to listen.@
>Every so often I manage to pull back and escape her mouth, but she just silently repositions herself and sucks me back in.\
>And all too soon, I feel myself about to reach another orgasm, brought out by her lusting mouth.\
name "Luka"
>Ahh... I'm going to come again...\
name ""
if %con_hvoice=0 dwavestop 13:dwave 0,"voice\granberia3_19.ogg"
name $name
>Nnn... *Lick* *Suck*
>Male juice... Let out a lot... *Suck*\
name ""
mov %hseanvoice,9:hseanvoice
>My begging her to stop serves the opposite effect, only making her get even more intense in her sucking.@
>Realizing she's about to get what she wants, she greedily sucks on me, overcome by her own desire.\
>My head goes blank as her soft lips press down a little harder, her tongue running all over my glans inside her warm mouth.\
name "Luka"
>Ah... Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\granberia_hc4.bmp",0,0
gosub *syasei2
if %con_hvoice=0 dwavestop 13:dwave 0,"voice\granberia3_20.ogg"
name $name
>Mmmnnn... *Lick*
>*Suck*\
name ""
mov %hseanvoice,9:hseanvoice
>As soon as I explode in her mouth, she sucks even harder than before.@
>After each spurt of semen inside her mouth, Granberia greedily swallows it.\
name "Luka"
>Ah...!@> Ahh!\
name ""
>As if stuck in a powerful vacuum, I moan helplessly as she sucks everything out of me.@
>As soon as my penis twitches in a spurt, her intense sucking pulls out the semen into her lusting mouth.\
>Like that, Granberia swallows all of my semen, not allowing a single drop to go to waste.\
if %con_hvoice=0 dwavestop 13:dwave 0,"voice\granberia3_21.ogg"
name $name
>Nnnn... *Suck* *Swallow*\
if %con_hvoice=0 dwave 0,"voice\granberia3_22.ogg"
>...I won't let you go anymore.
>I'm going to bring you back to the Monster Lord's castle and make you mine.\
name ""
dwavestop 0
name "Luka"
>Y...You can't...@> Ahh!\
name ""
>After declaring that, she closes her lips back around my penis.@
>Looking at me with upturned eyes, she smiles.\
if %con_hvoice=0 dwave 0,"voice\granberia3_23.ogg"
name $name
>...I defeated you.
>Don't forget that you don't have a choice...\
name ""
dwavestop 0
name "Luka"
>Ahh...\
name ""
>I can't defy her.@
>Without any ability to resist against her, I'm left pinned to the ground in pleasure.\
>Accepting the fate of the loser, I yield both my body and heart to Granberia.\
gosub *anten
>..............\
goto *badend



*kani2_start

mov $name,"Crab Girl"
mov $name2,"Crab Girl"
mov $lavel,"kani2"
mov $tatie1,"kani_st01"
mov $tatie2,"kani_st02"
mov $tatie3,"kani_st03"
mov $tatie4,"kani_st11"
mov $haikei,"bg039"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,2200
if %nanido=2 mov %max_enemylife,2700
if %nanido=3 mov %max_enemylife,3300
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,60
mov %kaihi,95
mov %earth_keigen,20
if %nanido=3 mov %earth_keigen,10
mov %music,1
mov %tikei,0
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"I'll make it feel so good, you won't even think about escaping!"
mov $mogaku_sel2,"I said don't struggle!"
mov $mogaku_sel3,"What are you doing...? That's pointless."
mov $mogaku_sel4,"I can't wash you properly if you struggle so much!"
mov $mogaku_sel5,"I'll wash your penis, so just lay there quietly!"
mov $mogaku_dassyutu1,"Heeey... Don't run away..."
mov $mogaku_dassyutu2,""
mov $mogaku_earth_dassyutu1,"Such power... You didn't have this last time..."
mov $mogaku_earth_dassyutu2,""
mov $half_s1,"Hehe... It feels good, doesn't it?"
mov $half_s2,"I'll cover you with even more bubbles! "
mov $kiki_s1,"Oh, oh? Already about to come?"
mov $kiki_s2,"How weak! "
mov %end_n,8
mov %exp_minus,0
mov %zmonster_x,-280
mov %tukix,320
mov %owaza_count1a,4
mov %owaza_count2a,4
name "Luka"
>Eh...?@> Aren't you the one from before...?\
name ""
>I fought this monster before...@
>I'm pretty sure it was in this exact place, too.\
name $name
>...Don't tell me you forgot about me.@
>After all I went through to turn back to normal...\
name ""
name "Luka"
>.................\
name ""
name $name
>I promised I'd get revenge on you, and trained nonstop...@
>I won't let this opportunity pass!\
>Prepare yourself!@
>I'll wash your penis so thoroughly, you'll be in heaven!\
name ""
goto *common_main



*kani2_v

gosub *face3
if %hanyo1=0 mov $sel1,"N...Not again...!"
if %hanyo1=1 mov $sel1,"This is too mean...!"
name $name
eng $sel1:$sel6\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Crab Girl is sealed into the form of a crab again!\
mov %viclose,1:gosub *victory
mov %getexp,20000:gosub *lvup
mov %2316,1
goto *sean0256



*kani2_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>Aha, already giving up?@
>It's time to give you my powered up washing technique then. \
name ""
goto *kani2_a



*kani2_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *kani2_kousan
if %cmd1=16 goto *kani2_onedari
if %cmd1=17 goto *common_skill
goto *kani2_main



*kani2_a

if %turn=1 && %aqua=2 mov %hanyo1,1
if %aqua=0 mov %hanyo1,0
if %status=2 && %kousoku=0 gosub *kani2_a3:goto *common_main
if %kousoku=2 gosub *kani2_a9:goto *common_main
if %kousoku=1 rnd2 %ransu,1,5
if %kousoku=1 && %ransu=1 gosub *kani2_a5:gosub *kani2_a6:goto *common_main
if %kousoku=1 && %ransu=2 gosub *kani2_a5:gosub *kani2_a7:goto *common_main
if %kousoku=1 && %ransu=3 gosub *kani2_a6:gosub *kani2_a7:goto *common_main
if %kousoku=1 && %ransu=4 gosub *kani2_a4:goto *common_main
if %kousoku=1 && %ransu=5 gosub *kani2_a8:goto *common_main
if %kousoku=1 skip -6
if %turn=1 gosub *kani2_a2:goto *common_main
rnd2 %ransu,1,4
if %ransu<3 gosub *kani2_a1:goto *common_main
if %ransu=3 && %owaza_count2a>5 gosub *kani2_a2:goto *common_main
if %ransu=4 && %owaza_count1a>5 gosub *kani2_a3:goto *common_main
skip -4



*kani2_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Time to cover you in my bubbles. "
if %ransu=2 mov $sel1,"You didn't forget about my bubbles, did you?"
if %ransu=3 mov $sel1,"I'll cover you in bubbles..."
name $name
eng $sel1:$sel6\
name ""
skillname "Bubble Bubble"
dwave 1,"se\ero_makituki1.ogg"
eng "The Crab Girl sprays bubbles all over Luka's penis!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>The bubbles cling to his penis!
skillcount2 3518
if %nanido<2 damage 60,70
if %nanido=2 damage 75,85
if %nanido=3 damage 90,100
skillname ""
if %mylife=0 sub %stack,1:return *kani2_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kani2_a2

add %stack,1
mov %owaza_count2a,0
name $name
>My new skill will make you numb!\
name ""
skillname "Crab Beam"
dwave 1,"se\laser.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
eng "Strange beams of light shoot out from the Crab Girl's claws!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,100
if %wind=2 && %nanido=2 mov %wind_kakuritu,100
if %wind=2 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>The beam hits Luka's body, paralyzing him!\
mov %status,2:gosub *status_print
>Luka has been paralyzed!\
skillname ""
if %kousan=2 sub %stack,1:return
name "Luka"
>U...rhg...\
name ""
name $name
>Ahaha, you can't move any longer.@
>Now that you're still, I'll wash your penis nice and clean. \
name ""
rnd2 %status_turn,4,6
if %nanido=2 rnd2 %status_turn,5,7
if %nanido=3 rnd2 %status_turn,6,8
sub %stack,1
return



*kani2_a3

add %stack,1
mov %owaza_count1a,0
name $name
>I'm going to catch you!\
name ""
skillname "Firm Grasp"
eng "The Crab Girl grabs Luka with her powerful claws!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>Luka is being bound by the Crab Girl!\
skillname ""
if %kousan=2 sub %stack,1:return
gosub *face2
name $name
>Caught you...@
>It's time to wash that dirty body of yours. \
name ""
if %earth=0 && %nanido<2 mov %genmogaku,3
if %earth=0 && %nanido=2 mov %genmogaku,3
if %earth=0 && %nanido=3 mov %genmogaku,4
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
sub %stack,1
return



*kani2_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll weaken you with my washing technique. "
if %ransu=2 mov $sel1,"I'll cover your penis in bubbles, and show you heaven!"
if %ransu=3 mov $sel1,"Have a taste of a bubble heaven..."
name $name
eng $sel1:$sel6\
name ""
skillname "Bubble Wash Heaven"
dwave 1,"se\ero_sigoki1.ogg"
lsp 690,":a;chara\kani_ct11.bmp",0,0:print 10,500
>Bubbles cover Luka's penis!
skillcount2 3519
if %nanido<2 damage 25,35
if %nanido=2 damage 28,38
if %nanido=3 damage 31,41
dwave 1,"se\ero_sigoki1.ogg"
>Bubble covered hands cover Luka's penis from every direction!
if %nanido<2 damage 25,35
if %nanido=2 damage 28,38
if %nanido=3 damage 31,41
dwave 1,"se\ero_sigoki1.ogg"
>Numerous hands gently caress and rub Luka's penis!
if %nanido<2 damage 25,35
if %nanido=2 damage 28,38
if %nanido=3 damage 31,41
dwave 1,"se\ero_sigoki1.ogg"
>The bubble massage puts Luka into a trance!
if %nanido<2 damage 25,35
if %nanido=2 damage 28,38
if %nanido=3 damage 31,41
if %status=0 mov $sel1,"Luka was put into a trance!"
if %status=2 mov $sel1,"Luka was put into a trance!"
if %status=1 mov $sel1,"Luka is in a trance..."
mov %status,1:gosub *status_print
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *kani2_h2
if %kousan=2 sub %stack,1:return
name "Luka"
>Haa...\
name ""
name $name
>Well? It's heavenly, isn't it?\
name ""
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,2,3
if %nanido=3 rnd2 %status_turn,3,4
sub %stack,1
return



*kani2_a5

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Everyone writhes when I focus on the tip..."
if %ransu=2 mov $sel1,"If I grab the tip and shake my hand... It's a hell of pleasure. "
if %ransu=3 mov $sel1,"Humans love it when I do this..."
name $name
eng $sel1:$sel6\
name ""
skillname "Bubble Shake Hell"
dwave 1,"se\ero_koki1.ogg"
lsp 690,":a;chara\kani_ct11.bmp",0,0:print 10,500
>One of the Crab Girl's bubble covered hands grabs the shaft of Luka's penis!
skillcount2 3520
if %nanido<2 damage 25,35
if %nanido=2 damage 28,38
if %nanido=3 damage 31,41
dwave 1,"se\ero_koki1.ogg"
>A bubble covered hand quickly pumps Luka's penis!
if %nanido<2 damage 25,35
if %nanido=2 damage 28,38
if %nanido=3 damage 31,41
dwave 1,"se\ero_koki1.ogg"
>Another hand grabs the tip of Luka's penis!
if %nanido<2 damage 25,35
if %nanido=2 damage 28,38
if %nanido=3 damage 31,41
dwave 1,"se\ero_koki1.ogg"
>Both of her hands start to quickly shake!
if %nanido<2 damage 25,35
if %nanido=2 damage 28,38
if %nanido=3 damage 31,41
dwave 1,"se\ero_koki1.ogg"
>As she sprays more bubbles on his penis, the Crab Girl pumps Luka's penis up and down as she shakes her hand!
if %nanido<2 damage 25,35
if %nanido=2 damage 28,38
if %nanido=3 damage 31,41
skillname ""
if %mylife=0 sub %stack,1:return *kani2_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kani2_a6

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You want to be stroked by these bubble covered hands, don't you?"
if %ransu=2 mov $sel1,"I'll play with a boy's sensitive place..."
if %ransu=3 mov $sel1,"Let it out when you can't stand it any longer..."
name $name
eng $sel1:$sel6\
name ""
skillname "Special Bubble Handjob"
dwave 1,"se\ero_sigoki1.ogg"
lsp 690,":a;chara\kani_ct11.bmp",0,0:print 10,500
skillcount2 3521
>Numerous hands grab at Luka's penis!
if %nanido<2 damage 30,40
if %nanido=2 damage 33,43
if %nanido=3 damage 36,46
dwave 1,"se\ero_sigoki1.ogg"
>A bubble covered hand gently grabs the tip of Luka's penis, massaging him!
if %nanido<2 damage 30,40
if %nanido=2 damage 33,43
if %nanido=3 damage 36,46
dwave 1,"se\ero_sigoki1.ogg"
>Two gentle fingers rub right underneath the tip of Luka's penis!
if %nanido<2 damage 30,40
if %nanido=2 damage 33,43
if %nanido=3 damage 36,46
dwave 1,"se\ero_sigoki1.ogg"
>A bubble covered palm rubs up and down the shaft of Luka's penis!
if %nanido<2 damage 30,40
if %nanido=2 damage 33,43
if %nanido=3 damage 36,46
skillname ""
if %mylife=0 sub %stack,1:return *kani2_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kani2_a7

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll need to clean that dirty body of yours..."
if %ransu=2 mov $sel1,"Let me hear you moan as I wash you!"
if %ransu=3 mov $sel1,"I'll wash every dirty place on you..."
name $name
eng $sel1:$sel6\
name ""
skillname "Full Body Bubble Hell"
dwave 1,"se\ero_koki1.ogg"
lsp 690,":a;chara\kani_ct11.bmp",0,0:print 10,500
>Numerous bubble covered hands rub all over Luka's body!
skillcount2 3522
if %nanido<2 damage 30,40
if %nanido=2 damage 33,43
if %nanido=3 damage 36,46
dwave 1,"se\ero_koki1.ogg"
>Two hands rub Luka's chest, playing with his nipples!
if %nanido<2 damage 30,40
if %nanido=2 damage 33,43
if %nanido=3 damage 36,46
dwave 1,"se\ero_koki1.ogg"
>Two hands wash Luka's sides, as another hand gently traces its pointer finger around Luka's stomach!
if %nanido<2 damage 30,40
if %nanido=2 damage 33,43
if %nanido=3 damage 36,46
dwave 1,"se\ero_koki1.ogg"
>Two more hands play with Luka's balls, as another washes around Luka's anus!
if %nanido<2 damage 30,40
if %nanido=2 damage 33,43
if %nanido=3 damage 36,46
skillname ""
if %mylife=0 sub %stack,1:return *kani2_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kani2_a8

add %stack,1
name $name
>I'll let you go mad in pleasure with my surefire kill washing technique...\
>I've been practicing this all the time, just to bully you with it...\
name ""
skillname "Hellish Penis Washing"
mov %kousoku,2
dwave 1,"se\ero_koki1.ogg"
lsp 690,":a;chara\kani_ct01.bmp",0,0:print 10,500
>The Crab Girl gently massages the tip of Luka's penis with a bubble covered hand!
skillcount2 3523
damage 80,100
skillname ""
if %mylife=0 sub %stack,1:return *kani2_h6
name $name
>The true power in this skill is shown after you ejaculate...@
>So first I'll need to make you come quickly.\
name ""
skillname "Hellish Penis Washing"
dwave 1,"se\ero_koki1.ogg"
>The Crab Girl continues her massage, soaking Luka in pleasure!
mov %damage_kotei,1
damage 140,160
skillname ""
if %mylife=0 sub %stack,1:return *kani2_h6
sub %stack,1
return



*kani2_a9

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Haha, come on, come on, come!"
if %ransu=2 mov $sel1,"It will be a hell of pleasure after you come, so prepare yourself..."
if %ransu=3 mov $sel1,"Trying to endure it? That's pointless..."
name $name
eng $sel1:$sel6\
name ""
skillname "Hellish Penis Washing"
dwave 1,"se\ero_koki1.ogg"
>The Crab Girl continues her massage, soaking Luka in pleasure!
skillcount2 3523
mov %damage_kotei,1
damage 140,160
skillname ""
if %mylife=0 sub %stack,1:return *kani2_h6
sub %stack,1
goto *kani2_a9



*kani2_onedari

mov $list1,"Bubble Bubble"
if %3518>0 mov %list_num1,1
mov $list2,"Bubble Wash Heaven"
if %3519>0 mov %list_num2,1
mov $list3,"Bubble Shake Hell"
if %3520>0 mov %list_num3,1
mov $list4,"Special Bubble Handjob"
if %3521>0 mov %list_num4,1
mov $list5,"Full Body Bubble Hell"
if %3522>0 mov %list_num5,1
mov $list6,"Hellish Penis Washing"
if %3523>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *kani2_onedari1
if %cmd1=12 goto *kani2_onedari2
if %cmd1=13 goto *kani2_onedari3
if %cmd1=14 goto *kani2_onedari4
if %cmd1=15 goto *kani2_onedari5
if %cmd1=16 goto *kani2_onedari6
if %cmd1=-1 goto *kani2_main
goto *kani2_onedari



*kani2_onedari1

gosub *onedari_syori
name $name
>You want to be covered in my bubbles?\
name ""
gosub *kani2_a1
skip -1



*kani2_onedari2

gosub *onedari_syori_k
name $name
>You want to taste my heavenly bubble technique?\
name ""
if %kousoku=0 gosub *kani2_a3
gosub *kani2_a4
skip -1



*kani2_onedari3

gosub *onedari_syori_k
name $name
>You want to writhe as I rub your tip?\
name ""
if %kousoku=0 gosub *kani2_a3
gosub *kani2_a5
skip -1



*kani2_onedari4

gosub *onedari_syori_k
name $name
>You want these bubble covered hands to rub you? \
name ""
if %kousoku=0 gosub *kani2_a3
gosub *kani2_a6
skip -1



*kani2_onedari5

gosub *onedari_syori_k
name $name
>You want me to wash your body?\
name ""
if %kousoku=0 gosub *kani2_a3
gosub *kani2_a7
skip -1



*kani2_onedari6

gosub *onedari_syori_k
name $name
>You want to taste my new finishing move?\
name ""
if %kousoku=0 gosub *kani2_a3
gosub *kani2_a8
gosub *kani2_a9
skip -1



*kani2_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>As the Crab Girl covers Luka in bubbles, he comes, covering her body in semen.\
mov %viclose,1:gosub *lose
mov %2616,%2616+1:if %2616=1 mov %count_koenemy,%count_koenemy+1
if %2616>%count_most mov %count_most,%2616:mov $count_mostname,$name+" (2)"
count 5,1
mov $bad1,"Luka was forced to an orgasm as the Crab Girl covered his body in bubbles."
gosub *face2
name $name
>Hahaha, you came. @
>Coming while covered in bubbles from head to foot... Pathetic! \
name ""
goto *kani2_h



*kani2_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\kani_st12.bmp",0,0
lsp 690,":a;chara\kani_ct12.bmp",0,0
gosub *syasei2
>As the Crab Girl washes his penis, Luka comes, covering her hands in semen.\
mov %viclose,1:gosub *lose
mov %2616,%2616+1:if %2616=1 mov %count_koenemy,%count_koenemy+1
if %2616>%count_most mov %count_most,%2616:mov $count_mostname,$name+" (2)"
count 5,1
mov $bad1,"Luka was forced to an orgasm as the Crab Girl washed his penis."
lsp 690,":a;chara\kani_ct13.bmp",0,0
lsp 700,":a;chara\kani_st13.bmp",0,0:print 10,500
name $name
>Hahaha, you came. @
>Your semen started spurting out as I was washing you. \
name ""
csp 690:print 10,500
goto *kani2_h



*kani2_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\kani_st12.bmp",0,0
lsp 690,":a;chara\kani_ct12.bmp",0,0
gosub *syasei2
>As the Crab Girl teases Luka's penis, he comes, covering her hands in semen.\
mov %viclose,1:gosub *lose
mov %2616,%2616+1:if %2616=1 mov %count_koenemy,%count_koenemy+1
if %2616>%count_most mov %count_most,%2616:mov $count_mostname,$name+" (2)"
count 5,1
mov $bad1,"Luka was forced to an orgasm as the Crab Girl teased him."
lsp 690,":a;chara\kani_ct13.bmp",0,0
lsp 700,":a;chara\kani_st13.bmp",0,0:print 10,500
name $name
>Hahaha, you came. @
>Your semen is getting all over the bubbles. \
name ""
csp 690:print 10,500
goto *kani2_h



*kani2_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\kani_st12.bmp",0,0
lsp 690,":a;chara\kani_ct12.bmp",0,0
gosub *syasei2
>As the Crab Girl strokes Luka with her bubble covered hands, Luka comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2616,%2616+1:if %2616=1 mov %count_koenemy,%count_koenemy+1
if %2616>%count_most mov %count_most,%2616:mov $count_mostname,$name+" (2)"
count 5,1
mov $bad1,"Luka was forced to an orgasm as the Crab Girl stroked him."
lsp 690,":a;chara\kani_ct13.bmp",0,0
lsp 700,":a;chara\kani_st13.bmp",0,0:print 10,500
name $name
>Hahaha, you came. @
>My bubble handjob was too much for you, wasn't it? \
name ""
csp 690:print 10,500
goto *kani2_h



*kani2_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\kani_st12.bmp",0,0
lsp 690,":a;chara\kani_ct12.bmp",0,0
gosub *syasei2
>As the Crab Girl washes Luka's body, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2616,%2616+1:if %2616=1 mov %count_koenemy,%count_koenemy+1
if %2616>%count_most mov %count_most,%2616:mov $count_mostname,$name+" (2)"
count 5,1
mov $bad1,"Luka was forced to an orgasm as the Crab Girl washed his body."
lsp 690,":a;chara\kani_ct13.bmp",0,0
lsp 700,":a;chara\kani_st13.bmp",0,0:print 10,500
name $name
>Hahaha, you came. @
>It's so easy to make you come. \
name ""
csp 690:print 10,500
goto *kani2_h



*kani2_h6

name "Luka"
>Haa... That feels good...\
name ""
gosub *syasei1
lsp 690,":a;chara\kani_ct02.bmp",0,0:gosub *syasei2
>Unable to take it any longer, I orgasm as the Crab Girl continues washing my penis, covering her hands with semen.\
lsp 690,":a;chara\kani_ct03.bmp",0,0:print 10,500
mov %viclose,1:gosub *lose2
name $name
>Haha, you came. @
>Now, for the penis that just came...\
name ""
skillcount2 3523
skillname "Hellish Penis Washing"
dwave 1,"se\ero_koki1.ogg"
>Numerous bubble covered hands grab at Luka's penis!\
>She starts to rub his extra sensitive penis without mercy!
damage 140,160
skillname ""
name "Luka"
>Ahh!\
name ""
name $name
>Right after coming, your penis is really sensitive, isn't it?@
>I'll keep on slowly washing this tip of yours... \
name ""
skillcount2 3523
skillname "Hellish Penis Washing"
dwave 1,"se\ero_koki1.ogg"
>The Crab Girl's bubble covered palm slowly rubs against the tip of Luka's penis!
damage 140,160
dwave 1,"se\ero_koki1.ogg"
>Her hand slowly moves across his tip, covering him in bubbles!
damage 140,160
skillname ""
name "Luka"
>Ah...ahh...\
name ""
name $name
>Rubbing your extra sensitive tip...@>Even though it feels amazing, I won't allow you to come.\
>I'll make you drown in the pleasure as you can't ejaculate. \
name ""
skillcount2 3523
skillname "Hellish Penis Washing"
dwave 1,"se\ero_koki1.ogg"
>Her gentle fingers crawl over the tip of Luka's penis!
damage 140,160
dwave 1,"se\ero_koki1.ogg"
>Another bubble covered finger traces up and down the back of Luka's penis!
damage 140,160
skillname ""
name "Luka"
>Ah...! Ahh!\
name ""
name $name
>Haha, it's amazing, isn't it?@
>All of the men writhe around when I do this.\
>But I'll make you writhe more than anyone else. \
name ""
skillcount2 3523
skillname "Hellish Penis Washing"
dwave 1,"se\ero_koki1.ogg"
>Five fingers rub around under the tip of Luka's penis!
damage 140,160
dwave 1,"se\ero_koki1.ogg"
>Another five fingers run around on the tip of Luka's penis!
damage 140,160
skillname ""
name "Luka"
>Ahh!\
name ""
name $name
>Hahaha!@>What a nice voice...@
>Is it that good...?@>I'll make you writhe even more!\
name ""
skillcount2 3523
skillname "Hellish Penis Washing"
dwave 1,"se\ero_koki1.ogg"
>Her bubble covered fingers continue tormenting the tip of Luka's penis!
damage 140,160
dwave 1,"se\ero_koki1.ogg"
>Another finger runs up and down the back of Luka's penis!
damage 140,160
skillname ""
name "Luka"
>S...Stop!@>Stop it already!!\
name ""
name $name
>Haha, even if you tremble like that, you can't escape from this technique.\
>Because when I wash your penis, I won't let you do anything but writhe in agony. \
name ""
skillcount2 3523
skillname "Hellish Penis Washing"
dwave 1,"se\ero_koki1.ogg"
>A finger gently tickles the tip of Luka's penis!
damage 140,160
dwave 1,"se\ero_koki1.ogg"
>Five fingers run all over the shaft of Luka's penis!
damage 140,160
skillname ""
name "Luka"
>Ahh...!@>S...Sstt... Ahhh!\
name ""
name $name
>Eh? What was that?@> I couldn't catch it. Haha!\
name ""
skillcount2 3523
skillname "Hellish Penis Washing"
dwave 1,"se\ero_koki1.ogg"
>The Crab Girl grabs Luka's penis, and gently turns her hand back and forth.
damage 140,160
dwave 1,"se\ero_koki1.ogg"
>She turns her hand even faster, lubricated by the bubbles!
damage 140,160
skillname ""
name "Luka"
>Ahhhhh!!@
>Ahhhhhhhhhh!!\
name ""
name $name
>Haha, you're going crazy! @
>It's time to pet that penis of yours.\
name ""
skillcount2 3523
skillname "Hellish Penis Washing"
dwave 1,"se\ero_koki1.ogg"
>The Crab Girl pushes her bubble covered palm against the tip of Luka's penis.
damage 140,160
skillname ""
name $name
>There there, good boy... \
name ""
skillcount2 3523
skillname "Hellish Penis Washing"
dwave 1,"se\ero_koki1.ogg"
>The tip of Luka's penis pushes into her palm!
damage 140,160
dwave 1,"se\ero_koki1.ogg"
>Like that, she starts to move back and forth, as if petting his penis!
damage 140,160
dwave 1,"se\ero_koki1.ogg"
>She slowly moves back and forth, tormenting his penis!
damage 140,160
skillname ""
name "Luka"
>S...Sto.... Die... I'm going to die...@
>Ahhhh!!\
name ""
name $name
>Haha, already wanting to ejaculate?@>Do you want me to let you come?@
>But no, not yet. \
name ""
skillcount2 3523
skillname "Hellish Penis Washing"
dwave 1,"se\ero_koki1.ogg"
>The Crab Girl brings another hand up, and squeezes Luka's penis between them.
damage 140,160
dwave 1,"se\ero_koki1.ogg"
>She squeezes his penis between her two hands!
damage 140,160
skillname ""
name "Luka"
>Ahhh!\
name ""
name $name
>Haha, how pathetic... @
>I wanted to see that pitiful face of yours so much, so I practiced so hard. \
name ""
skillcount2 3523
skillname "Hellish Penis Washing"
dwave 1,"se\ero_koki1.ogg"
>The Crab Girl starts to stroke Luka's penis with both of her hands!
damage 140,160
dwave 1,"se\ero_koki1.ogg"
>Moving in opposite directions, her lubricated hands quickly stroke him up and down!
damage 140,160
skillname ""
name "Luka"
>S...Stop... Ahhh!\
name ""
name $name
>Well? How do you like my hellish massage?@
>Do you want me to let you finish?\
>You want to come all over my hands, don't you?\
>Then I want to hear you beg me...@
>"Please, let me come!" \
name ""
skillcount2 3523
skillname "Hellish Penis Washing"
dwave 1,"se\ero_koki1.ogg"
>Two hands massage Luka's penis!
damage 140,160
dwave 1,"se\ero_koki1.ogg"
>Lubricated by the bubbles, they quickly run all over Luka's penis!
damage 140,160
skillname ""
name "Luka"
>Ahh...\
name ""
name $name
>Are you sure you aren't going to beg me?@
>If you don't, I'll keep you on the edge forever, never allowing you to orgasm again.\
>But if you humiliatingly beg me, I'll reward you.@
>Just think of how it will feel once you can finally come...\
>To make it feel amazing, I'll even continue to wash you as you come.@
>I'm sure it will be the best you've ever felt in your life...\
name ""
skillcount2 3523
skillname "Hellish Penis Washing"
dwave 1,"se\ero_koki1.ogg"
>Her hands stroke Luka's penis even faster!
damage 140,160
dwave 1,"se\ero_koki1.ogg"
>Keeping him right on the edge, the Crab Girl continues to massage Luka's penis!
damage 140,160
skillname ""
name "Luka"
>Ahh... P...Please... Let me come...\
name ""
name $name
>Hahaha, pathetic. @
>Do you even realize how pitiful you look right now?\
>Your mouth is half open, with drool coming out...@
>Now you're even begging me to let you come?\
name ""
>The Crab Girl looks down at me and laughs, reveling in her victory.\
name $name
>You lost to my penis washing technique.@
>Now you belong to me.\
name ""
skillcount2 3523
skillname "Hellish Penis Washing"
dwave 1,"se\ero_koki1.ogg"
>Her bubble covered hand grabs hold of Luka's shaft!
damage 140,160
skillname ""
name "Luka"
>Ahh...!\
name ""
name $name
>I'm nice, so I'll give you a reward.@
>I'll stroke your penis as hard as I can, and let you shoot out that semen of yours. \
name ""
skillcount2 3523
skillname "Hellish Penis Washing"
dwave 1,"se\ero_koki1.ogg"
>Her bubble covered hand strokes Luka as fast as she can!
damage 140,160
dwave 1,"se\ero_koki1.ogg"
>Lubricated by the bubbles, her hand flies up and down his penis!
damage 140,160
dwave 1,"se\ero_koki1.ogg"
>From the base to the tip, her palm slides up and down Luka's penis!
damage 140,160
skillname ""
name "Luka"
>Ah...!@> Ahhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\kani_ct02.bmp",0,0
gosub *syasei2
lsp 690,":a;chara\kani_ct03.bmp",0,0:print 10,500
>Finally able to come, I explode into the Crab Girl's hands.\
>As my penis twitches and semen covers her, I sigh and relax in the afterglow.\
csp 690:print 10,500
gosub *clear_sprite
mov %battle,0:skipoff
gosub *setwindow_01p
mov %2616,%2616+1:if %2616=1 mov %count_koenemy,%count_koenemy+1
if %2616>%count_most mov %count_most,%2616:mov $count_mostname,$name+" (2)"
count 5,1
mov $bad1,"Luka was forced to surrender to the Crab Girl by her hellish penis washing."
mov %hsean,1
goto *kani2_h



*kani2_h

mov $bad2,"Forced to mate with the Crab Girl, Luka becomes her breeding slave."
if %2616=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name $name
>Now that your penis is nice and clean...@
>I'll let you mate with me.\
name ""
name "Luka"
>Ahh... N...No way...\
name ""
>Too exhausted to resist, the Crab Girl grabs my body with her claws.\
name $name
>Now you can't escape anymore.@
>I'll mate with you now... Haha.\
name ""
>Something that looks like a pipe comes out of the Crab Girl's abdomen region.@
>The tip of it opens, revealing a hole...\
name $name
>This is my oviduct.@
>You'll stick your penis inside, and I'll suck out your semen.\
>Mating with me will feel really good...\
name ""
name "Luka"
>N...No... I don't want to do that...\
name ""
>As she brings me closer to her, I try to struggle and get away.@
>But it's no good...\
name $name
>Haha, didn't I already say it?@
>You can't escape any longer. \
name ""
>Her oviduct presses against my penis.@
>The hole opens a little wider, sucking my penis inside.\
name "Luka"
>Ahhh...!\
name ""
mov %hseanwave,15:hseanwave
cspl 690,699
lsp 700,":a;chara\kani_h3.bmp",0,0:print 10,500
>Slowly pulling me deeper inside, my penis slips deep into her tube.\
lsp 690,":a;chara\kani_ct21.bmp",0,0:print 10,500
>Wrapped in her slimy, narrow tube, I cringe at the initial strange feeling.\
name "Luka"
>Ah...ahh...\
name ""
>This is mating with an inhuman monster...@
>Her oviduct feels completely foreign to me.\
>Filled with the immorality of mating with a monster, I also start to feel a strange sense of pleasure rising through me.\
name $name
>Haha, now you're connected with me.\
>My oviduct feels amazing, doesn't it?@
>You want to shoot your seed inside, don't you?\
name ""
name "Luka"
>Th...That... No...\
name ""
>Even as I deny it with my mouth, my male organ is obviously rejoicing in the feelings.@
>The Crab Girl obviously notices the disconnect...\
name $name
>Haha, stubborn aren't you?\
>Then let me see how long you can endure it. \
name ""
name "Luka"
>Ah...!@> Ahhh!\
name ""
>Her tube starts to move like a piston, thrusting me in and out of it.\
>Her spiral shaped inner wall rubs against my penis with every thrust, making me gasp in pleasure.\
>With every thrust into her, the tip of my penis pushes against her walls, spreading her narrow tube aside.\
>As she pulls me out, the spiral ridges of her walls rub against the neck of my penis, almost as if they were grabbing at it.\
>The Crab Girl looks down at me with a smile as I writhe in pleasure from the inserting and pulling pleasures.\
name $name
>Oh? It looks like you're really loving this.@
>Look at that waist of yours, shaking around! Haha. \
>You love this, don't you?@
>You want to shoot that seed of yours right into my oviduct, don't you?\
name ""
name "Luka"
>Ah...ahh...\
name ""
>Unable to even deny her words, I simply moan as she continues forcing me in and out of her oviduct.\
>If I relaxed for even a second, I'd explode inside of her...\
name $name
>Haha, go ahead and come. \
>Just think of how good it will feel when you come inside me... \
name ""
name "Luka"
>Ahh...\
name ""
>The Crab Girl taunts me as she continues to thrust her tube back and forth.\
>Unable to take it any longer, I relax my body as I entrust myself to the pleasure.@
>I stop thinking about the taboo, and just focus on the pleasure from her spiral shaped oviduct.\
name $name
>Haha, it looks like you gave up.@
>It feels so good, so I guess there wasn't any helping it. \
>Alright then, I guess I'll make you come now.@
>I'll do something special to let you finish inside me. \
name ""
>The Crab Girl giggles as her oviduct continues to drown me in pleasure.\
>She tightens the tube around me, forcing the spiral walls deep against my penis.\
>Pumping it in and out like a piston, the narrow hole quickly pushes me over the limit.\
name "Luka"
>Ha...ahhh...\
name ""
gosub *syasei1
lsp 700,":a;chara\kani_h3.bmp",0,0
lsp 690,":a;chara\kani_ct22.bmp",0,0
gosub *syasei2
>I explode inside of her oviduct.@
>Moaning in pleasure, my semen shoots straight into her reproductive organ.\
name "Luka"
>Ha...ahh...\
name ""
name $name
>Haha... Did you enjoy it?\
name ""
>The Crab Girl looks right into my eyes and laughs.@
>At the same time, her oviduct stops moving and instead starts sucking on me, pulling the semen out into her.\
mov %hseanwave,0:hseanwave
name $name
>You let out quite a lot... @
>Even though you said you didn't want to at first... \
>With all of that semen, you must have fertilized all of my eggs.@
>You lost to the pleasure, and became a daddy at the same time! \
name ""
name "Luka"
>N...No way...\
name ""
name $name
>So now you're just my breeding slave.@
>I'll keep sucking out your seed, and make lots of children. \
>You'll have to feed our daughters...@
>Help them learn how to wash penises...@
>There's a lot of work for the dad, so get ready! \
name ""
name "Luka"
>Ahh...\
name ""
>After giving in to the pleasure and coming inside the Crab Girl, I fertilized her.@
>There's no escaping from my responsibilities...\
>Thus, the Crab Girl keeps me as her breeding slave.@
>My life as an adventurer ends, and my new one as a slave to the Crab Girl and our daughters begins...\
gosub *anten
>.................\
goto *badend



*dagon_start

mov $name,"Mermaid?"
mov $name2,"Dagon"
mov $lavel,"dagon"
mov $tatie1,"dagon_st11"
mov $tatie2,"dagon_st02"
mov $tatie3,"dagon_st03"
mov $tatie4,"dagon_h1"
mov $haikei,"bg050"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,4600
if %nanido=2 mov %max_enemylife,5100
if %nanido=3 mov %max_enemylife,6900
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,75
mov %earth_keigen,20
if %nanido=3 mov %earth_keigen,10
mov %music,1
mov %tikei,0
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Pointless... I won't let go!"
mov $mogaku_sel2,"Don't act violently!"
mov $mogaku_sel3,"You won't escape even if you struggle...!"
mov $mogaku_sel4,"All that you can do is be squeezed at this point. "
mov $mogaku_sel5,"It will feel good in a moment, so stop struggling..."
mov $mogaku_earth_dassyutu1,"Oh, you escaped...?"
mov $mogaku_earth_dassyutu2,"That's too bad..."
mov %end_n,8
mov %exp_minus,20000
if %ivent04=0 mov %exp_minus,%exp_minus-20000
mov %zmonster_x,-300
mov %tukix,320
mov %owaza_count1a,2
>The upper body is human, and the lower is a fish...?@
>Almost all Mermaids are friendly to humans, but...\
name $name
>Ah... A human?\
name ""
>The Mermaid(?) smiles at me as I hesitate at her appearance.\
name $name
>Uhm... I have a present I'd like to give you.@
>Can you come a little closer...?\
name ""
csel "Approach",*dagon_start1,"Don't",*dagon_start2



*dagon_start1

name $name
>Aha, caught you!\
name ""
lsp 700,":a;chara\dagon_st01.bmp",0,0:print 10,500
>The Mermaid(?)'s true form was a Dagon!\
mov %kousoku,1:gosub *status_print
>Luka's been caught by the Dagon!\
mov $name,"Dagon"
mov $tatie1,"dagon_st01"
if %earth=0 && %nanido<2 mov %genmogaku,5
if %earth=0 && %nanido=2 mov %genmogaku,5
if %earth=0 && %nanido=3 mov %genmogaku,5
if %earth>0 && %nanido<2 mov %genmogaku,2
if %earth>0 && %nanido=2 mov %genmogaku,2
if %earth>0 && %nanido=3 mov %genmogaku,2
goto *common_main



*dagon_start2

name $name
>I see... That's too bad...@
>Then I'll just have to give it to you by force!\
name ""
lsp 700,":a;chara\dagon_st01.bmp",0,0:print 10,500
>The Mermaid(?)'s true form was a Dagon!\
mov $name,"Dagon"
mov $tatie1,"dagon_st01"
goto *common_main



*dagon_v

gosub *face3
name $name
>Noooo...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Dagon is sealed into the form of an octopus!\
mov %viclose,1:gosub *victory
mov %getexp,25000:gosub *lvup
mov %2318,1
goto *sean0259



*dagon_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>Giving up?@
>Then I'll squeeze it all out without holding back. \
name ""
goto *dagon_a



*dagon_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *dagon_kousan
if %cmd1=16 goto *dagon_onedari
if %cmd1=17 goto *common_skill
goto *dagon_main



*dagon_a

if %kousoku=1 add %hanyo2,1
if %kousoku=1 && %hanyo2>3 gosub *dagon_a6:goto *common_main
if %kousoku=1 rnd2 %ransu,1,3
if %kousoku=1 && %ransu=1 gosub *dagon_a3:goto *common_main
if %kousoku=1 && %ransu=2 gosub *dagon_a4:goto *common_main
if %kousoku=1 && %ransu=3 gosub *dagon_a5:goto *common_main
rnd2 %ransu,1,2
if %ransu=1 gosub *dagon_a1:goto *common_main
if %ransu=2 && %owaza_count1a>1 gosub *dagon_a2:goto *common_main
skip -3



*dagon_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hooo..."
if %ransu=2 mov $sel1,"Lalala..."
if %ransu=3 mov $sel1,"The weather is so nice today... "
name $name
eng $sel1:$sel6\
name ""
>The Dagon aimlessly swims around.\
sub %stack,1
return



*dagon_a2

add %stack,1
if %kousan=2 skip 4
name $name
>I'm going to catch you! \
name ""
skillname "Dagon Hold"
dwave 1,"se\ero_makituki3.ogg"
>The Dagon's lower body closes around Luka's body!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,15
if %wind=2 && %nanido=2 mov %wind_kakuritu,10
if %wind=2 && %nanido=3 mov %wind_kakuritu,7
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
if %nanido<2 damage 100,120
if %nanido=2 damage 120,140
if %nanido=3 damage 140,160
mov %kousoku,1:gosub *status_print
>Luka's bound inside the Dagon's lower body!\
skillname ""
if %mylife=0 sub %stack,1:return *dagon_h2
if %kousan=2 sub %stack,1:return
gosub *face2
name $name
if %first_sel1=1 skip 5
>Aha, I caught you. @
>Now I'm going to squeeze out a lot of your semen.\
>Get ready, because it's going to feel really good.\
skip 4
>Aha, I caught you again. @
>Now I'm going to squeeze out a lot of your semen.\
>Get ready, because it's going to feel really good.\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,5
if %earth=0 && %nanido=2 mov %genmogaku,5
if %earth=0 && %nanido=3 mov %genmogaku,5
if %earth>0 && %nanido<2 mov %genmogaku,2
if %earth>0 && %nanido=2 mov %genmogaku,2
if %earth>0 && %nanido=3 mov %genmogaku,2
mov %hanyo2,0
sub %stack,1
return



*dagon_a3

add %stack,1
>Luka is bound by the Dagon's lower body...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'm still getting ready... I'll squeeze you a lot soon."
if %ransu=2 mov $sel1,"Squirm squirm time! "
if %ransu=3 mov $sel1,"The folds inside me feel good, don't they?"
name $name
eng $sel1:$sel6\
name ""
skillname "Squirm Squirm"
dwave 1,"se\ero_slime1.ogg"
lsp 690,":a;chara\dagon_ct01.bmp",0,0:print 10,500
>The Dagon's lower body squirms around Luka's body!\
>The folds of her membrane push and rub against his body!
skillcount2 3528
if %nanido<2 damage 100,120
if %nanido=2 damage 120,140
if %nanido=3 damage 140,160
skillname ""
if %mylife=0 sub %stack,1:return *dagon_h2
sub %stack,1
return



*dagon_a4

add %stack,1
>Luka is bound by the Dagon's lower body...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'm still getting ready, so don't come yet!"
if %ransu=2 mov $sel1,"It's suck suck time! "
if %ransu=3 mov $sel1,"I can make your penis feel good like this!"
name $name
eng $sel1:$sel6\
name ""
skillname "Suck Suck"
dwave 1,"se\ero_slime1.ogg"
lsp 690,":a;chara\dagon_ct01.bmp",0,0:print 10,500
>The Dagon's lower body sucks on Luka's body in a wave motion!\
>Her membrane clings tightly to his body as it sucks!
skillcount2 3529
if %nanido<2 damage 110,130
if %nanido=2 damage 130,150
if %nanido=3 damage 150,170
skillname ""
if %mylife=0 sub %stack,1:return *dagon_h3
sub %stack,1
return



*dagon_a5

add %stack,1
>Luka is bound by the Dagon's lower body...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll squeeze you once I'm done getting ready..."
if %ransu=2 mov $sel1,"It's squish squish time! "
if %ransu=3 mov $sel1,"I can make your penis feel good like this. "
name $name
eng $sel1:$sel6\
name ""
skillname "Squish Squish"
dwave 1,"se\ero_slime1.ogg"
lsp 690,":a;chara\dagon_ct01.bmp",0,0:print 10,500
>The Dagon's lower body shrinks around Luka's body, squeezing him!
skillcount2 3530
if %nanido<2 damage 120,140
if %nanido=2 damage 140,160
if %nanido=3 damage 160,180
skillname ""
if %mylife=0 sub %stack,1:return *dagon_h4
sub %stack,1
return



*dagon_a6

add %stack,1
>Luka is bound by the Dagon's lower body...\
name $name
>Aha, does it feel good?@
>My preparations are done now.\
>I'm going to squeeze you with all my might, so please give me a lot of semen!\
>Hah! \
name ""
mov %wind,0:mov %earth,0:mov %aqua,0
skillname "Forcible Semen Squeeze"
lsp 690,":a;chara\dagon_ct02.bmp",0,0:print 10,500
sub %stack,1
goto *dagon_a7



*dagon_a7

add %stack,1
rnd2 %ransu,1,10
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Her membrane shrinks as she plays with Luka's body!"
if %ransu=2 mov $sel1,"Her membrane stimulates Luka's penis!"
if %ransu=3 mov $sel1,"Her membrane wriggles all over Luka's body!"
if %ransu=4 mov $sel1,"Her membrane vibrates around Luka's body!"
if %ransu=5 mov $sel1,"Her membrane vibrates around Luka's penis!"
if %ransu=6 mov $sel1,"Her membrane clings tightly to Luka's body, rubbing against him!"
if %ransu=7 mov $sel1,"Her membrane shrinks around Luka's penis, rubbing against him!"
if %ransu=8 mov $sel1,"Her membrane shrinks around Luka's body, squeezing him!"
if %ransu=9 mov $sel1,"Her membrane contracts in a wave motion, as if milking Luka's entire body!"
if %ransu=10 mov $sel1,"He membrane coils around Luka's penis!"
dwave 1,"se\ero_makituki2.ogg"
eng $sel1:$sel6
skillcount2 3531
mov %damage_kotei,1
damage 140,160
skillname ""
if %mylife=0 skillname "":sub %stack,1:return *dagon_h5
sub %stack,1
goto *dagon_a7



*dagon_onedari

mov $list1,"Squirm Squirm"
if %3528>0 mov %list_num1,1
mov $list2,"Suck Suck"
if %3529>0 mov %list_num2,1
mov $list3,"Squish Squish"
if %3530>0 mov %list_num3,1
mov $list4,"Forcible Semen Squeeze"
if %3531>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *dagon_onedari1
if %cmd1=12 goto *dagon_onedari2
if %cmd1=13 goto *dagon_onedari3
if %cmd1=14 goto *dagon_onedari4
if %cmd1=-1 goto *dagon_main
goto *dagon_onedari



*dagon_onedari1

gosub *onedari_syori_k
name $name
>You want my squirm squirm?@
>Then I'll give you my squirm squirm! \
name ""
if %kousoku=0 gosub *dagon_a2
gosub *dagon_a3
skip -1



*dagon_onedari2

gosub *onedari_syori_k
name $name
>You want my suck suck?@
>Then I'll give you my suck suck! \
name ""
if %kousoku=0 gosub *dagon_a2
gosub *dagon_a4
skip -1



*dagon_onedari3

gosub *onedari_syori_k
name $name
>You want my squish squish?@
>Then I'll give you my squish squish! \
name ""
if %kousoku=0 gosub *dagon_a2
gosub *dagon_a5
skip -1



*dagon_onedari4

gosub *onedari_syori_k
name $name
>You want me to squeeze out your semen?@
>Then I'll squeeze out a lot...\
name ""
if %kousoku=0 gosub *dagon_a2
gosub *dagon_a6
skip -1



*dagon_h1

mov %ikigoe,3:gosub *ikigoe
name $name
>Ehhh...?\
name ""
gosub *syasei1
lsp 690,":a;chara\dagon_ct01a.bmp",0,0
lsp 700,":a;chara\dagon_h2.bmp",0,0
gosub *syasei2
>As the Dagon's lower body wraps up Luka's body, he comes, unable to take the sensation.\
mov %viclose,1:gosub *lose
mov %2618,%2618+1:if %2618=1 mov %count_koenemy,%count_koenemy+1
if %2618>%count_most mov %count_most,%2618:mov $count_mostname,$name
count 15,3
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka came on accident as the Dagon wrapped around him."
gosub *face2
name $name
>That was fast...\
name ""
goto *dagon_h



*dagon_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\dagon_ct01a.bmp",0,0
lsp 700,":a;chara\dagon_h2.bmp",0,0
gosub *syasei2
>As the Dagon's lower body plays with his body, Luka comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2618,%2618+1:if %2618=1 mov %count_koenemy,%count_koenemy+1
if %2618>%count_most mov %count_most,%2618:mov $count_mostname,$name
count 15,3
mov $bad1,"Dagon's squirm squirm forced Luka to come."
gosub *face2
name $name
>Ehh? Already coming...?@
>That was pretty fast...\
name ""
goto *dagon_h



*dagon_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\dagon_ct01a.bmp",0,0
lsp 700,":a;chara\dagon_h2.bmp",0,0
gosub *syasei2
>As the Dagon's lower body plays with his body, Luka comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2618,%2618+1:if %2618=1 mov %count_koenemy,%count_koenemy+1
if %2618>%count_most mov %count_most,%2618:mov $count_mostname,$name
count 15,3
mov $bad1,"Dagon's suck suck forced Luka to come."
gosub *face2
name $name
>Ehh? Already coming...?@
>That was pretty fast...\
name ""
goto *dagon_h



*dagon_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\dagon_ct01a.bmp",0,0
lsp 700,":a;chara\dagon_h2.bmp",0,0
gosub *syasei2
>As the Dagon's lower body plays with his body, Luka comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2618,%2618+1:if %2618=1 mov %count_koenemy,%count_koenemy+1
if %2618>%count_most mov %count_most,%2618:mov $count_mostname,$name
count 15,3
mov $bad1,"Dagon's squish squish forced Luka to come."
gosub *face2
name $name
>Ehh? Already coming...?@
>That was pretty fast...\
name ""
goto *dagon_h



*dagon_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\dagon_ct03.bmp",0,0
lsp 700,":a;chara\dagon_h2.bmp",0,0
gosub *syasei2
>As the Dagon works her hardest to squeeze out his semen, Luka comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2618,%2618+1:if %2618=1 mov %count_koenemy,%count_koenemy+1
if %2618>%count_most mov %count_most,%2618:mov $count_mostname,$name
count 15,3
mov $bad1,"The Dagon was able to squeeze out Luka's semen."
gosub *face2
name $name
>Aha, that was a lot! @
>So much delicious food in my umbrella! \
name ""
goto *dagon_h



*dagon_h

mov $bad2,"Stuck in her umbrella, the Dagon kept on squeezing Luka's semen forever."
if %2618=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,21:hseanwave:lsp 700,":a;chara\dagon_h3.bmp",0,0:print 10,500:goto *dagon_hb
name "Luka"
>Ahh...\
name ""
name $name
>Alright, now it's time for me to squeeze out your semen.@
>I'll be squeezing out a lot, so get ready. \
name ""
dwave 1,"se\ero_makituki3.ogg"
mov %hseanwave,21:hseanwave
cspl 690,699
lsp 700,":a;chara\dagon_h3.bmp",0,0:print 10,500
>The Dagon's umbrella wraps around my exhausted body.@
>It feels like I'm being swallowed by a soft creature...\
name "Luka"
>Ahhh!!\
name ""
lsp 690,":a;chara\dagon_ct01.bmp",0,0:print 10,500
goto *dagon_hb



*dagon_hb

>My body rubs against the warm, slimy membrane inside of her soft umbrella.@
>Little feelers line her umbrella, and start to rub against my body.\
>The slimy tentacles gently rub and brush against me, almost as if they were tickling me.\
name "Luka"
>Ahh... L...Let me go...!\
name ""
>I struggle and twist my body, trying to escape from the tickling sensation.@
>But her umbrella firmly holds onto me, keeping me from escaping.\
name $name
>Don't struggle, or I'll have to squeeze you reeeeaaallly tight.\
name ""
name "Luka"
>Ah...ahh...\
name ""
>The Dagon's umbrella gets even tighter, pressing against my body.\
>The tentacles start to coil and wrap around my body, restricting my movement even more.\
>As my lower body pushes against her soft membrane, I feel my penis getting bigger again.\
lsp 690,":a;chara\dagon_ct02.bmp",0,0:print 10,500
>As soon as it does, one of her warm tentacles slowly coils around it!\
name "Luka"
>Haa...!@>Ahh!\
name ""
>My body stiffens as I feel the tentacle coil around my penis.@
>Tiny little bumps line the tentacle, rubbing against me as it slowly finishes coiling around me.\
name $name
>Alright, it's time to squeeze out your semen inside my umbrella.@
>I won't stop, so feel free to come whenever you want. \
name ""
>The Dagon's membrane start to move in a wave motion, back and forth.@
>With my body stuck inside of her umbrella, I feel it push and pull on me as it waves.\
>With her tentacle coiled around my penis, it gets pulled and pushed just like my body.@
>Every movement causes the small bumps and ridges in her membrane to rub against my body and penis, massaging me.\
name "Luka"
>Ah...!@> Ahh!\
name ""
name $name
>Every human man always ejaculates when I do this! \
name ""
name "Luka"
>Ahh...!\
name ""
>More and more tentacles coil around my body.@
>It really is like I'm just prey being held down by a predator...\
>The slimy tentacle around my erect penis continues on in the same wave motion as her body, pushing and pulling on me.\
name $name
>Hehe, come! \
name ""
name "Luka"
>Ahh...\
name ""
>The tiny bumps lining her tentacle rub against my penis with every movement.@
>Even though she's barely moving, the stimulation is already unbearable.\
>I shake and writhe inside her umbrella, but there's no escape from her soft membrane.\
name $name
>Are you going to leak soon?@
>Then... I'll have to keep playing with your penis. \
name ""
name "Luka"
>Haaa...\
name ""
>Trying to finish me off, her tentacle around my penis moves even faster.@
>As the tiny bumps rub against me, I moan in pleasure and give in.\
gosub *syasei1
lsp 690,":a;chara\dagon_ct03.bmp",0,0
lsp 700,":a;chara\dagon_h4.bmp",0,0
gosub *syasei2
name "Luka"
>Ahh...\
name ""
>Unable to do anything, I'm forced to ejaculate.@
>Caught by a monster and milked like an animal...\
>I look down as my cloudy semen is absorbed by her membrane.@
>Tears of shame start to fill my eyes as I see my own semen treated as simple food.\
name $name
>Aha, that was a lot. @
>That was good... You have a good penis. \
name ""
>The Dagon's laughter makes her membrane vibrate, bringing a sudden surge of unexpected pleasure.\
name "Luka"
>Ahh...\
name ""
>Even though I feel so humiliated, my body is still rejoicing in pleasure...@
>Everything just keeps adding to my shame.\
name $name
>But I'll squeeze a lot more.@
>Now it's time for some rubbing! \
name ""
>Her soft tentacles push against my body, and start to massage me.@
>The gentle massage makes me relax, releasing my muscles and ending my feeble resistance inside her umbrella.\
name $name
>Now that you're relaxed, I can squeeze you really tight.@
>Men love this, and always come in no time. \
name ""
name "Luka"
>Ahhhh!\
name ""
>Her umbrella suddenly shrinks around me, pushing her squirming tentacles deep against my body.\
>My penis sinks deep into her soft membrane, flooding me with a storm of pleasure at the sudden increase in stimulation.\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\dagon_ct04.bmp",0,0
lsp 700,":a;chara\dagon_h5.bmp",0,0
gosub *syasei2
>In almost no time since she squeezed around me, I'm forced to an orgasm.\
name "Luka"
>Ah...ahh...\
name ""
>My quick successive orgasms leave me even more tired.@
>But her umbrella doesn't show any sign of letting me go.\
name $name
>I'm going to squeeze out a lot more than that! @
>Next is vibrating! \
name ""
name "Luka"
>Ahh!\
name ""
>The Dagon's umbrella shrinks tighter around me, and starts to vibrate.\
>The tentacle around my penis starts to vibrate too, leaving my head blank in pleasure.\
name "Luka"
>Ah!@>Ahhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\dagon_ct05.bmp",0,0
lsp 700,":a;chara\dagon_h6.bmp",0,0
gosub *syasei2
>I'm forcibly made to ejaculate again, shooting my semen onto her membrane.\
name "Luka"
>Ahh...\
name ""
>The Dagon's umbrella was clearly made to squeeze the semen from her prey...@
>Now that I'm in here, I don't have a choice but to feed her...\
name $name
>Squirm squirm time! \
name ""
name "Luka"
>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
name $name
>Now it's suck suck time! \
name ""
name "Luka"
>Haaa...!\
name ""
gosub *syasei1:gosub *syasei2
>The Dagon continues playing with me, forcing me to ejaculate with various methods.\
>After each orgasm, the ecstasy and weakness in me both get even stronger.\
>Like that, I'm forced to ejaculate for her over and over again.@
>Long after I lost count, I finally faint.\
gosub *anten
mov %hseanwave,0:hseanwave
>But even after that, the Dagon never lets me go.@
>Keeping me in her umbrella, she forcibly squeezes out my semen to feed herself.\
>My days are filled with nothing but being forced to ejaculate inside her umbrella.\
>Like I'm nothing but a disabled person, she cares for me inside her umbrella, making sure I stay alive so I can continue to feed her...\
>...........\
goto *badend



*poseidones_start

mov $name,"Poseidoness"
mov $name2,"Poseidoness"
mov $lavel,"poseidones"
mov $tatie1,"poseidones_st01"
mov $tatie2,"poseidones_st02"
mov $tatie3,"poseidones_st03"
mov $tatie4,"poseidones_ha1"
mov $haikei,"bg053"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,7500
if %nanido=2 mov %max_enemylife,7500
if %nanido=3 mov %max_enemylife,10500
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,50
if %nanido=3 mov %earth_keigen,25
mov %music,2
mov %tikei,4
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break away from her tentacles!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"No matter how you struggle, it's pointless..."
mov $mogaku_sel2,"Settle down and let me squeeze you..."
mov $mogaku_sel3,"Hmm... Why don't you just accept it?"
mov $mogaku_sel4,"If you just settle down, you'll feel heavenly pleasure."
mov $mogaku_sel5,"No matter how you struggle, you'll never escape!"
mov $mogaku_dassyutu1,"You managed to escape..."
mov $mogaku_dassyutu2,"But you're already at death's door."
mov $mogaku_earth_dassyutu1,"That's a spirit...!"
mov $mogaku_earth_dassyutu2,"The same power that Heinrich had...!"
mov $half_s1,"That's it...?"
mov $half_s2,"I thought you might be a little more powerful than that..."
mov $kiki_s1,"Already approaching your limit? How disappointing..."
mov $kiki_s2,"My tentacles will finish you off..."
mov %end_n,8
mov %exp_minus,45000
if %ivent04=0 mov %exp_minus,%exp_minus-20000
mov %zmonster_x,-300
mov %tukix,320
mov %owaza_count1a,8
mov %owaza_count2a,7
mov %owaza_count3a,7
mov %owaza_count3b,4
name $name
>Thief who came to take the Orb...@
>I'll give you a punishment fit for your crime, so prepare yourself.\
>The best way to humiliate a male is...\
name ""
name "Luka"
>N...No, you're wrong!@
>I didn't come here to steal anything!\
name ""
name $name
>No discussion.@> I'll use my tentacles to play with you!\
name ""
name "Luka"
>Guh...!\
name ""
>There's no persuading her...@
>It looks like I have to fight!\
mov %sinkou,1
goto *common_main



*poseidones_v

gosub *face3
name $name
>What skill...@
>It's my loss.\
name ""
mov %viclose,1:gosub *victory
mov %getexp,60000:gosub *lvup
mov %2320,1
goto *sean0261



*poseidones_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>How pathetic... Already giving up?@
>Then allow me to punish you!\
name ""
goto *poseidones_a



*poseidones_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *poseidones_kousan
if %cmd1=16 goto *poseidones_onedari
if %cmd1=17 goto *common_skill
goto *poseidones_main



*poseidones_a

if %kousoku=1 rnd2 %ransu,1,8
if %kousoku=1 && %ransu=1 gosub *poseidones_a6:gosub *poseidones_a6:goto *common_main
if %kousoku=1 && %ransu=2 gosub *poseidones_a6:gosub *poseidones_a7:goto *common_main
if %kousoku=1 && %ransu=3 gosub *poseidones_a7:gosub *poseidones_a6:goto *common_main
if %kousoku=1 && %ransu=4 gosub *poseidones_a7:gosub *poseidones_a7:goto *common_main
if %kousoku=1 && %ransu>4 && %owaza_count3b>8 gosub *poseidones_a8:goto *common_main
if %kousoku=1 skip -6
rnd2 %ransu,1,24
if %ransu<4 gosub *poseidones_a1:gosub *poseidones_a1:goto *common_main
if %ransu<7 gosub *poseidones_a1:gosub *poseidones_a2:goto *common_main
if %ransu<10 gosub *poseidones_a2:gosub *poseidones_a1:goto *common_main
if %ransu<13 gosub *poseidones_a2:gosub *poseidones_a2:goto *common_main
if %ransu<17 && %owaza_count3a>8 gosub *poseidones_a3:goto *common_main
if %ransu>16 && %ransu<21 && %owaza_count2a>8 gosub *poseidones_a4:goto *common_main
if %ransu>20 && %owaza_count1a>9 gosub *poseidones_a5:goto *common_main
skip -8



*poseidones_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Writhe in my tentacles..."
if %ransu=2 mov $sel1,"Hehe, I'll play with you nice and carefully..."
if %ransu=3 mov $sel1,"I'll caress your entire body..."
name $name
eng $sel1:$sel6\
name ""
skillname "Tentacle Caress"
dwave 1,"se\ero_slime1.ogg"
>Poseidoness' tentacles caress Luka's body!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,40
if %wind=2 && %nanido=2 mov %wind_kakuritu,35
if %wind=2 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3535
if %nanido<2 damage 90,110
if %nanido=2 damage 100,120
if %nanido=3 damage 110,130
skillname ""
if %mylife=0 sub %stack,1:return *poseidones_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*poseidones_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You want my tentacles all over your penis, don't you?"
if %ransu=2 mov $sel1,"I'll coil around your male organ..."
if %ransu=3 mov $sel1,"Is there anyone who can endure my tentacles?"
name $name
eng $sel1:$sel6\
name ""
skillname "Tentacle Raid"
dwave 1,"se\ero_slime1.ogg"
>Poseidoness' tentacles coil around Luka's penis!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,40
if %wind=2 && %nanido=2 mov %wind_kakuritu,35
if %wind=2 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3536
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
skillname ""
if %mylife=0 sub %stack,1:return *poseidones_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*poseidones_a3

add %stack,1
mov %owaza_count3a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Get drunk on the pleasure!"
if %ransu=2 mov $sel1,"My tentacle will play with your dirty hole..."
if %ransu=3 mov $sel1,"I'll violate your anus, and trample your dignity as a man!"
name $name
eng $sel1:$sel6\
name ""
skillname "Tentacle Smash"
dwave 1,"se\ero_makituki2.ogg"
>The tip of a tentacle slips into Luka's anus!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,66
if %wind=2 && %nanido=2 mov %wind_kakuritu,55
if %wind=2 && %nanido=3 mov %wind_kakuritu,33
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3537
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
dwave 1,"se\ero_slime1.ogg"
>The soft tentacle squirms around inside of Luka!
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
dwave 1,"se\ero_slime1.ogg"
>Her feeler stimulates Luka's prostate!
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
skillname ""
if %mylife=0 sub %stack,1:return *poseidones_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*poseidones_a4

add %stack,1
mov %owaza_count2a,0
name $name
>Feel my thunder!\
name ""
skillname "Sea God's Thunder"
dwave 1,"se\ikazuti.ogg"
quake 10,1000
eng "Poseidoness raises her three-pronged spear, bringing down a crash of thunder!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,100
if %wind=2 && %nanido=2 mov %wind_kakuritu,90
if %wind=2 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %status,2:gosub *status_print
>Luka has been paralyzed!\
skillname ""
name "Luka"
>Ahg!\
name ""
name $name
>Oh, did that shirt of yours protect you and only make you become paralyzed?\
>Hah... Now you simply look like a fish on a cutting board.\
name ""
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,2,3
if %nanido=3 rnd2 %status_turn,3,4
sub %stack,1
return



*poseidones_a5

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name $name
>I'll coil my tentacles around you, and make you writhe in agony!\
name ""
skillname "Tentacle Bind"
dwave 1,"se\ero_makituki3.ogg"
>Poseidoness' tentacles coil around Luka's body!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
if %nanido<2 damage 90,100
if %nanido=2 damage 90,100
if %nanido=3 damage 100,110
mov %kousoku,1:gosub *status_print
>Luka's been bound by her tentacles!\
skillname ""
if %mylife=0 sub %stack,1:return *poseidones_h4
gosub *face2
if %first_sel1=1 skip 3
>Now then, how shall I deal with you...?\
skip 2
>Don't think you'll be able to keep escaping from me...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,4
if %earth=0 && %nanido=2 mov %genmogaku,5
if %earth=0 && %nanido=3 mov %genmogaku,6
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,2
if %earth>0 && %nanido=3 mov %genmogaku,3
sub %stack,1
return



*poseidones_a6

add %stack,1
>Luka has been bound by Poseidoness' tentacles...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"How about being caressed while unable to move?"
if %ransu=2 mov $sel1,"How pitiful, hehe..."
if %ransu=3 mov $sel1,"Haha, I won't go easy on you!"
name $name
eng $sel1:$sel6\
name ""
skillname "Bound Caress"
dwave 1,"se\ero_slime1.ogg"
>Poseidon's tentacles run all over Luka's body, caressing him!
skillcount2 3538
if %nanido<2 damage 90,100
if %nanido=2 damage 90,100
if %nanido=3 damage 100,110
skillname ""
if %mylife=0 sub %stack,1:return *poseidones_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*poseidones_a7

add %stack,1
>Luka has been bound by Poseidoness' tentacles...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll torment your penis..."
if %ransu=2 mov $sel1,"I want to see you struggle..."
if %ransu=3 mov $sel1,"How does it feel to be held by my tentacles and treated like a toy...?"
name $name
eng $sel1:$sel6\
name ""
skillname "Bound Raid"
dwave 1,"se\ero_slime1.ogg"
>Multiple tentacles coil around Luka's penis!
skillcount2 3539
if %nanido<2 damage 100,110
if %nanido=2 damage 100,110
if %nanido=3 damage 110,120
skillname ""
if %mylife=0 sub %stack,1:return *poseidones_h6
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*poseidones_a8

add %stack,1
mov %owaza_count3b,0
>Luka has been bound by Poseidoness' tentacles...\
name $name
>It's time to squeeze you...\
name ""
skillname "Abyss Drain"
dwave 1,"se\ero_syokusyu1.ogg"
eng "A hole opens in Poseidoness' abdomen!":$sel6/
if %wind=2 && %nanido<2 mov %wind_kakuritu,100
if %wind=2 && %nanido=2 mov %wind_kakuritu,100
if %wind=2 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>Luka's body is slowly pulled toward it!\
name "Luka"
>Ahhh!\
name ""
name $name
>Give up, you won't escape!\
name ""
lsp 690,":a;chara\poseidones_ct01.bmp",0,0
lsp 700,":a;chara\poseidones_ha2.bmp",0,0:print 10,500
dwave 1,"se\ero_makituki2.ogg"
>Luka's penis is forced into the hole!
skillcount2 3540
mov %damage_kotei,1
damage 150,180
skillname ""
>Luka is being raped by Poseidoness!\
if %mylife=0 sub %stack,1:return *poseidones_h7
name "Luka"
>Ahhhhh!!\
name ""
name $name
>Now to squeeze out all of your semen...\
name ""
sub %stack,1
goto *poseidones_a9



*poseidones_a9

add %stack,1
>Luka is being raped by Poseidoness...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Mating with me is incredible, isn't it?":mov $sel2,"The flesh around Luka's penis squirms!"
if %ransu=2 mov $sel1,"Hehe... I'll squeeze out all your semen.":mov $sel2,"Her hole contracts, creating a suction around Luka's penis!"
if %ransu=3 mov $sel1,"You can't escape ever again... Give up.":mov $sel2,"The hole sucks on Luka's penis!"
if %ransu=4 mov $sel1,"I'll give you unbearable pleasure...":mov $sel2,"Moving like a living creature, her hole pulls on Luka's penis in a wave motion!"
if %ransu=5 mov $sel1,"Just ejaculate...":mov $sel2,"Her hole pushes and pulls on Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Abyss Drain"
dwave 1,"se\ero_makituki2.ogg"
eng $sel2:$sel6
skillcount2 3540
mov %damage_kotei,1
damage 150,180
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *poseidones_h8
sub %stack,1
goto *poseidones_a9



*poseidones_onedari

mov $list1,"Tentacle Caress"
if %3535>0 mov %list_num1,1
mov $list2,"Tentacle Raid"
if %3536>0 mov %list_num2,1
mov $list3,"Tentacle Smash"
if %3537>0 mov %list_num3,1
mov $list4,"Bound Caress"
if %3538>0 mov %list_num4,1
mov $list5,"Bound Raid"
if %3539>0 mov %list_num5,1
mov $list6,"Abyss Drain"
if %3540>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *poseidones_onedari1
if %cmd1=12 goto *poseidones_onedari2
if %cmd1=13 goto *poseidones_onedari3
if %cmd1=14 goto *poseidones_onedari4
if %cmd1=15 goto *poseidones_onedari5
if %cmd1=16 goto *poseidones_onedari6
if %cmd1=-1 goto *poseidones_main
goto *poseidones_onedari



*poseidones_onedari1

gosub *onedari_syori
name $name
>You want my tentacles to caress your entire body?\
name ""
gosub *poseidones_a1
skip -1



*poseidones_onedari2

gosub *onedari_syori
name $name
>You want my tentacles all over your penis?\
name ""
gosub *poseidones_a2
skip -1



*poseidones_onedari3

gosub *onedari_syori
name $name
>You want to feel my tentacles in your anus...?\
name ""
gosub *poseidones_a3
skip -1



*poseidones_onedari4

gosub *onedari_syori_k
name $name
>You want to be bound and played with?\
name ""
if %kousoku=0 gosub *poseidones_a5
gosub *poseidones_a6
skip -1



*poseidones_onedari5

gosub *onedari_syori_k
name $name
>You want to be bound and have your penis played with?\
name ""
if %kousoku=0 gosub *poseidones_a5
gosub *poseidones_a7
skip -1



*poseidones_onedari6

gosub *onedari_syori_k
name $name
>You want me to squeeze out your semen? Hehe.\
name ""
if %kousoku=0 gosub *poseidones_a5
gosub *poseidones_a8
skip -1



*poseidones_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\poseidones_bk03.bmp",0,0
gosub *syasei2
>As she caresses Luka's body with her tentacles, he comes, covering her with his semen.\
mov %viclose,1:gosub *lose
mov %2620,%2620+1:if %2620=1 mov %count_koenemy,%count_koenemy+1
if %2620>%count_most mov %count_most,%2620:mov $count_mostname,$name
count 10,5
mov $bad1,"Luka was forced to an orgasm as Poseidoness caressed his entire body with her tentacles."
gosub *face2
name $name
>This absurd farce is over now.\
name ""
goto *poseidones_h



*poseidones_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\poseidones_bk03.bmp",0,0
gosub *syasei2
>As she caresses Luka's penis with her tentacles, he comes, covering her with his semen.\
mov %viclose,1:gosub *lose
mov %2620,%2620+1:if %2620=1 mov %count_koenemy,%count_koenemy+1
if %2620>%count_most mov %count_most,%2620:mov $count_mostname,$name
count 10,5
mov $bad1,"Luka was forced to an orgasm as Poseidoness caressed his penis with her tentacles."
gosub *face2
name $name
>This absurd farce is over now.\
name ""
goto *poseidones_h



*poseidones_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\poseidones_bk03.bmp",0,0
gosub *syasei2
>As she violated Luka's ass with her tentacles, Luka comes, shooting semen out onto her tentacles.\
mov %viclose,1:gosub *lose
mov %2620,%2620+1:if %2620=1 mov %count_koenemy,%count_koenemy+1
if %2620>%count_most mov %count_most,%2620:mov $count_mostname,$name
count 9,5
mov $bad1,"Luka was forced to an orgasm as Poseidoness played with his anus."
gosub *face2
name $name
>Having an orgasm from your ass being violated?@
>How miserable for a man...\
name ""
goto *poseidones_h



*poseidones_h4

mov %ikigoe,3:gosub *ikigoe
name $name
>Already done? How easy...\
name ""
gosub *syasei1:gosub *syasei2
>As Luka feels her tentacles coil around his body, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2620,%2620+1:if %2620=1 mov %count_koenemy,%count_koenemy+1
if %2620>%count_most mov %count_most,%2620:mov $count_mostname,$name
count 10,5
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka accidentally comes just from being bound by Poseidoness' tentacles."
gosub *face2
name $name
>What a pathetic end...\
name ""
goto *poseidones_h



*poseidones_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>As she caresses Luka's body with her tentacles, he comes, covering her with his semen.\
mov %viclose,1:gosub *lose
mov %2620,%2620+1:if %2620=1 mov %count_koenemy,%count_koenemy+1
if %2620>%count_most mov %count_most,%2620:mov $count_mostname,$name
count 10,5
mov $bad1,"Luka was forced to an orgasm as Poseidoness caressed his body with her tentacles."
gosub *face2
name $name
>Did my tentacles make you come?@
>Even while being bound, you were still able to orgasm... Hehe.\
name ""
goto *poseidones_h



*poseidones_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>As she caresses Luka's penis with her tentacles, he comes, covering her with his semen.\
mov %viclose,1:gosub *lose
mov %2620,%2620+1:if %2620=1 mov %count_koenemy,%count_koenemy+1
if %2620>%count_most mov %count_most,%2620:mov $count_mostname,$name
count 10,5
mov $bad1,"Luka was forced to an orgasm as Poseidoness caressed his penis with her tentacles."
gosub *face2
name $name
>Did my tentacles make you come?@
>Even while being bound, you were still able to orgasm... Hehe.\
name ""
goto *poseidones_h



*poseidones_h7

mov %ikigoe,3:gosub *ikigoe
name $name
>Oh... All I did was insert it, though?\
name ""
gosub *syasei1
lsp 690,":a;chara\poseidones_ct02.bmp",0,0
gosub *syasei2
>As soon as Luka is forced into her, he comes, filling her hole with semen.\
mov %viclose,1:gosub *lose
mov %2620,%2620+1:if %2620=1 mov %count_koenemy,%count_koenemy+1
if %2620>%count_most mov %count_most,%2620:mov $count_mostname,$name
count 2,5
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to an orgasm from simple insertion."
name $name
>Already...?@
>That was disappointing, you pathetic Hero...\
name ""
csp 690:print 10,500
goto *poseidones_h



*poseidones_h8

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\poseidones_ct02.bmp",0,0
gosub *syasei2
>As her hole sucks and squirms around his penis, Luka comes, filling Poseidoness' hole with semen.\
mov %viclose,1:gosub *lose
mov %2620,%2620+1:if %2620=1 mov %count_koenemy,%count_koenemy+1
if %2620>%count_most mov %count_most,%2620:mov $count_mostname,$name
count 2,5
mov $bad1,"Luka was forced to an orgasm as Poseidoness raped him."
name $name
>Hmm... That's the first.@
>To come so easily... What a miserable Hero.\
name ""
csp 690:print 10,500
goto *poseidones_h



*poseidones_h

mov $bad2,"Kept at the bottom of the sea, Luka became nothing but her plaything."
if %2620=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
name $name
>I'm not satisfied.@
>A criminal deserves to be squeezed until he's dry.\
name ""
name "Luka"
>N...No... I'm not a criminal...\
name ""
name $name
>What you were doesn't matter.@
>To me, you're just a mere thief.\
name ""
name "Luka"
>Ahh...\
name ""
dwave 1,"se\ero_makituki3.ogg"
mov %hseanwave,17:hseanwave
cspl 690,699
lsp 700,":a;chara\poseidones_hb1.bmp",0,0:print 10,500
>Her tentacles coil around my body, too drained of strength to resist.@
>Grabbing my legs, she spreads them apart into a humiliating position.\
>Then, one of her squishy tentacles starts to slowly coil up my penis in a spiral.\
name "Luka"
>Ahh...\
name ""
>Gently spiraling up me until she reaches my tip, where she gives a gentle squeeze.\
>Slowly squeezing me even tighter, her squishy tentacle pushes against my sensitive organ.\
name $name
>Being squeezed by tentacles is humiliating for a man, isn't it?@
>I'll let you get a good taste of that disgrace...\
name ""
name "Luka"
>Ahh...\
name ""
>I feel the soft muscles inside of her tentacle through my penis, gently squeezing me.\
>Her soft, slimy flesh rubs against my skin as her tentacle ever so slightly squirms around.\
>As the differing stimulations combine together, I squirm under her tight hold in pleasure.\
name "Luka"
>Ahhh!\
name ""
name $name
>You'll come right away if I do it like this, won't you?@
>Come on... Let me see that pathetic ejaculation of yours again.\
name ""
>The tentacle coiled around my penis in a spiral starts to squeeze me in a wave motion.\
>Starting from the root of my penis, her tentacle tightens up my shaft until it reaches my tip.@
>Going back and forth, she skillfully squeezes me in a wave.\
>My head goes white as I gasp in pleasure, unable to endure the rising orgasm.\
name "Luka"
>N...No... I'm coming...@
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\poseidones_hb2.bmp",0,0
gosub *syasei2
>As she squeezes me, I come, shooting semen onto both her tentacle and the floor.\
>Even during my orgasm, her squeezing doesn't stop.@
>Each wave motion from her tentacle forces out more drips of semen that weren't shot out with the orgasm.\
name "Luka"
>Ah! Ah...\
name ""
name $name
>Until your pathetic body fluids don't shoot out any longer, I'll keep on squeezing you...@
>My tentacles will leave you dry...\
name ""
>Her tentacle starts to move up and down, still in its spiral.\
>Sliding up and down my shaft and lubricated by her own slime, the soft tentacle squeezes me as it gently strokes me.\
name "Luka"
>Ah!@>Ahhh!\
name ""
>My waist shakes in pleasure as her spiral continues to slowly pump me.@
>I look up at Poseidoness, and see her looking down with a bored face.\
>She's not doing this to give me pleasure, she's just trying to squeeze out my semen...\
>Not eating my semen, or using it for anything... Just letting it spill onto the floor.@
>Her tentacles continue to stroke me, bringing me to the edge of another meaningless ejaculation.\
name "Luka"
>Ah...aahhhh!\
name ""
>Her spiral shaped tentacle continues to slowly pump me.@
>Lubricated by her slime, she tightly squeezes me at the same time, making my tip rub against her suckers with every pump.\
>Unable to endure it, I feel another forced orgasm about to wash over me.\
name "Luka"
>Ahh!@> I...I'm going to come...!\
name ""
name $name
>Sheesh... You just came a few moments ago, and you're already about to come again?\
>It looks like I'll be able to squeeze you dry a lot faster than I thought...\
name ""
name "Luka"
>Ahh...\
name ""
>I moan as her tentacle brings me to a finish, making me even push upwards into her tentacle as I climax.\
gosub *syasei1
lsp 700,":a;chara\poseidones_hb3.bmp",0,0
gosub *syasei2
>My penis twitches as I explode, shooting my semen straight up into the air.@
>After floating in the water for a few seconds, it sinks down and lands on both her tentacles and the floor.\
>Not to be used for any purpose, only a result of Poseidoness squeezing me dry as a punishment...\
>I'm tormented by the humiliation, feeling useless as she just continues to force orgasms out of me.\
name "Luka"
>Ahh...\
name ""
name $name
>How does it feel having your semen squeezed like this?@
>It should be used to create a loving family... But instead, it's just going to sit on the sea floor.\
>As a man, it's miserable, isn't it?\
name ""
>After that brief taunt, her tentacle starts stroking me again, already working on the next ejaculation to waste more semen.\
name "Luka"
>Ahhh!\
name ""
name $name
>How about I do something to make you come a little bit faster...?@
>Here, how's this?\
name ""
>I feel another tentacle move around to my back, and push against my ass.@
>In the next moment, I feel the slimy tentacle slip into my ass.\
name "Luka"
>Ahhh!\
name ""
>I shake my hips side to side in surprise at the sudden feeling of it in me.\
>Once inside of me, the tentacle starts to squirm and push against my flesh.\
name $name
>Here, I'll stimulate your prostate...@
>If I do it like this, your orgasms will be even more humiliating...\
name ""
name "Luka"
>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>A sharp burst of pleasure shoots through me as her tentacle stimulates my prostate, making me come in almost no time.\
name $name
>You can come even more, can't you?@
>I'm not stopping until you're dry...\
name ""
name "Luka"
>Ahhh!\
name ""
>The tentacle pumping my penis starts to stroke me even faster, as the one in my ass starts to squirm and push against my prostate at the same time.\
>I gasp and moan in pleasure as this humiliating rape gets even more intense.\
name "Luka"
>Ah..ahhhh!\
name ""
gosub *syasei1:gosub *syasei2
>I come again in only moments after my last orgasm, as her tentacles continue to violate and insult me.\
name $name
>Oh, there wasn't that much semen in that one...@
>But there's still more in there...\
name ""
name "Luka"
>Stop... Stop already...\
name ""
>But ignoring my pleas, her tentacles continue to humiliate me.@
>My body trembles as I'm brought to another forced orgasm.\
gosub *syasei1:gosub *syasei2
name "Luka"
>Ahh...\
name ""
name $name
>Not yet...\
name ""
>The tentacle in my anus continues to squirm and press against my prostate, as the one in front of me never stops its milking motion.\
name "Luka"
>Ahh...\
name ""
gosub *syasei1
lsp 700,":a;chara\poseidones_hb4.bmp",0,0
gosub *syasei2
mov %hseanwave,0:hseanwave
>...I've lost count of how many times she has forced me to come.@
>But finally, nothing comes out after my orgasm.\
>After my semen covers the sea floor, Poseidoness lifts me up with her tentacles right next to her face.\
name "Luka"
>Ahh...\
name ""
name $name
>It looks like there's nothing left in you.@
>Well? How was it being squeezed dry by my tentacles?\
name ""
name "Luka"
>Ah...aa...\
name ""
>I can't even focus my eyes or respond to her.@
>Completely exhausted, not even my fingers will respond to my commands to move.\
name $name
>Hehe, it seems like you can't even speak any longer.\
>I'll keep you imprisoned here at the bottom of the sea.@
>As soon as you have more semen, I'll squeeze it all back out.\
>That shall be your punishment.@
>You will never leave here, until you die.\
name ""
name "Luka"
>Ah...aa...\
name ""
>I hear her words as I'm at the edge of exhaustion.@
>Finally fainting, I drift off.\
gosub *anten
>Thus, I'm kept imprisoned at the bottom of the sea.@
>Every day, she squeezes my semen completely dry as a punishment.\
>I lose my mind to this endless sexual punishment.@
>I become someone unable to do anything but drown in the pleasure from her tentacles.\
>....................\
goto *badend



*seiren_start

mov $name,"Siren"
mov $name2,"Siren"
mov $lavel,"seiren"
mov $tatie1,"seiren_st01"
mov $tatie2,"seiren_st02"
mov $tatie3,"seiren_st03"
mov $tatie4,"seiren_st02"
mov $haikei,"bg125"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,5200
if %nanido=2 mov %max_enemylife,5900
if %nanido=3 mov %max_enemylife,7800
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,90
mov %earth_keigen,20
if %nanido=3 mov %earth_keigen,10
mov %music,1
mov %tikei,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $half_s1,"It feels good, doesn't it?"
mov $half_s2,"I'll make it even better..."
mov $kiki_s1,"Are you almost at your limit?"
mov $kiki_s2,"My body will let you feel heaven..."
mov %end_n,8
mov %exp_minus,0
mov %zmonster_x,-300
mov %tukix,320
mov %owaza_count2a,4
name $name
>I thought this ship had nothing but women...@
>But then suddenly, I spotted a very high quality looking piece of meat...\
name ""
name "Luka"
>A Siren!?\
name ""
>This is a legendary monster that seduces sailors with her voice...@
>I have to be careful here!\
gosub *face2
name $name
>I'll indulge in your semen...@
>Get drunk on my voice, and soar in the pleasure.\
name ""
gosub *face1
goto *common_main



*seiren_v

gosub *face3
name $name
>How could a human...!?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Siren is sealed into the form of a seagull!\
mov %viclose,1:gosub *victory
mov %getexp,30000:gosub *lvup
mov %2321,1
goto *sean0263



*seiren_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>Hehe... So you want to have fun with my body?\
name ""
goto *seiren_a



*seiren_main

gosub *cmd_main
if %cmd1=11 goto *common_attack
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *seiren_kousan
if %cmd1=16 goto *seiren_onedari
if %cmd1=17 goto *common_skill
goto *seiren_main



*seiren_yuwaku_a

gosub *seiren_yuwaku_a1:goto *common_main



*seiren_yuwaku_a1

add %stack,1
name $name
>Now, come here...\
name ""
>The Siren spreads open her vagina, and shows off the pink inside to Luka.\
name $name
>Mate with me.@
>Thrust that penis of yours into me... I'm waiting for you...\
name ""
name "Luka"
>Ahh...\
name ""
dwave 1,"se\ero_pyu1.ogg"
lsp 690,":a;chara\seiren_ct01.bmp",0,0
mov %kousoku,1:gosub *status_print
>Seduced by the Siren, Luka rushes toward her and thrusts his penis inside her vagina!
skillcount2 3546
mov %damage_kotei,1
damage 170,190
skillname ""
if %mylife=0 sub %stack,1:return *seiren_h6
>Luka is being raped by the Siren!\
name "Luka"
>Ahh... That feels good...\
name ""
name $name
>Hehe... You look so happy to be mating with me.@
>You belong to me now...\
name ""
sub %stack,1
goto *seiren_a7



*seiren_a

rnd2 %ransu,1,7
if %ransu=1 gosub *seiren_a1:goto *common_main
if %ransu=2 gosub *seiren_a2:goto *common_main
if %ransu=3 gosub *seiren_a3:goto *common_main
if %ransu=4 gosub *seiren_a4:goto *common_main
if %ransu=5 gosub *seiren_a5:goto *common_main
if %ransu>5 && %owaza_count2a>5 gosub *seiren_a6:goto *common_main
skip -7



*seiren_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll make you feel good with these wings..."
if %ransu=2 mov $sel1,"They're nice and soft... Hehe."
if %ransu=3 mov $sel1,"I'll tickle your penis..."
name $name
eng $sel1:$sel6\
name ""
skillname "Feather Caress"
dwave 1,"se\umaru.ogg"
>The Siren's soft feathers tickle Luka's penis!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3541
if %nanido<2 damage 110,130
if %nanido=2 damage 120,140
if %nanido=3 damage 130,150
skillname ""
if %mylife=0 sub %stack,1:return *seiren_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*seiren_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll squeeze out your semen with these wings..."
if %ransu=2 mov $sel1,"My wings feel good, don't they?"
if %ransu=3 mov $sel1,"Drown in pleasure..."
name $name
eng $sel1:$sel6\
name ""
skillname "Feather Wingjob"
dwave 1,"se\ero_koki1.ogg"
>The Siren strokes Luka's penis between her two wings!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3542
if %nanido<2 damage 120,140
if %nanido=2 damage 130,150
if %nanido=3 damage 150,170
skillname ""
if %mylife=0 sub %stack,1:return *seiren_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*seiren_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Cover my chest in semen..."
if %ransu=2 mov $sel1,"Exhaust yourself in my breasts..."
if %ransu=3 mov $sel1,"My chest is soft, isn't it...?"
name $name
eng $sel1:$sel6\
name ""
skillname "Chest of Pleasure"
dwave 1,"se\ero_koki1.ogg"
>The Siren sandwiches Luka's penis between her breasts, and squeezes them together!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3543
if %nanido<2 damage 130,150
if %nanido=2 damage 150,170
if %nanido=3 damage 170,190
skillname ""
if %mylife=0 sub %stack,1:return *seiren_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*seiren_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"A male's flavor... I'll get a good taste of it."
if %ransu=2 mov $sel1,"Shoot it out in my mouth..."
if %ransu=3 mov $sel1,"Hehe... What a dirty taste..."
name $name
eng $sel1:$sel6\
name ""
skillname "Mouth of Fascination"
dwave 1,"se\ero_buchu2.ogg"
>The Siren sucks Luka's penis into her mouth, and eagerly sucks on it!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3544
if %nanido<2 damage 140,160
if %nanido=2 damage 160,180
if %nanido=3 damage 180,200
skillname ""
if %mylife=0 sub %stack,1:return *seiren_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*seiren_a5

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Even my armpits can squeeze semen out of you..."
if %ransu=2 mov $sel1,"Don't you want to use somewhere new?"
if %ransu=3 mov $sel1,"Even my armpits are too much for you..."
name $name
eng $sel1:$sel6\
name ""
skillname "Armpit Squeeze"
dwave 1,"se\ero_buchu2.ogg"
dwave 1,"se\ero_koki1.ogg"
>The Siren squeezes Luka's penis with her feather covered armpit!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3545
if %nanido<2 damage 130,150
if %nanido=2 damage 150,170
if %nanido=3 damage 170,190
skillname ""
if %mylife=0 sub %stack,1:return *seiren_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*seiren_a6

add %stack,1
mov %owaza_count2a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll make you mine with my song..."
if %ransu=2 mov $sel1,"I'll take your heart..."
if %ransu=3 mov $sel1,"Listen to a Siren's song..."
if %kousan=2 skip 4
name $name
eng $sel1:$sel6\
name ""
skillname "Song of Seduction"
eng "The Siren begins to sing an alluring song!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,100
if %wind=2 && %nanido=2 mov %wind_kakuritu,100
if %wind=2 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But the roar of the wind drowns out the song!":gosub *wind_guard:sub %stack,1:return
\
mov %status,5:gosub *status_print
>Luka has been seduced!\
if %kousan=2 sub %stack,1:return
name "Luka"
>Ahh...\
name ""
mov %status_turn,100
sub %stack,1
return



*seiren_a7

add %stack,1
>Luka is being raped by the Siren...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck out your semen like this...":mov $sel2,"The Siren's vagina rubs against Luka's penis!"
if %ransu=2 mov $sel1,"It feels good inside me, doesn't it?":mov $sel2,"The Siren's vagina tightens around Luka's penis!"
if %ransu=3 mov $sel1,"Now come...":mov $sel2,"The folds inside of the Siren rub against Luka's penis as she rapes him!"
if %ransu=4 mov $sel1,"Hehe, I'll squeeze you...":mov $sel2,"The Siren squeezes down on Luka's penis, forcing her soft flesh to push against his penis!"
if %ransu=5 mov $sel1,"Harder... Thrust in me harder!":mov $sel2,"The Siren pumps Luka, passionately raping him!"
name $name
eng $sel1:$sel6\
name ""
skillname "Thirsting Vagina"
dwave 1,"se\ero_chupa4.ogg"
eng $sel2:$sel6
skillcount2 3546
mov %damage_kotei,1
damage 170,190
skillname ""
if %mylife=0 sub %stack,1:return *seiren_h7
sub %stack,1
goto *seiren_a7



*seiren_onedari

mov $list1,"Feather Caress"
if %3541>0 mov %list_num1,1
mov $list2,"Feather Wingjob"
if %3542>0 mov %list_num2,1
mov $list3,"Chest of Pleasure"
if %3543>0 mov %list_num3,1
mov $list4,"Mouth of Fascination"
if %3544>0 mov %list_num4,1
mov $list5,"Armpit Squeeze"
if %3545>0 mov %list_num5,1
mov $list6,"Thirsting Vagina"
if %3546>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *seiren_onedari1
if %cmd1=12 goto *seiren_onedari2
if %cmd1=13 goto *seiren_onedari3
if %cmd1=14 goto *seiren_onedari4
if %cmd1=15 goto *seiren_onedari5
if %cmd1=16 goto *seiren_onedari6
if %cmd1=-1 goto *seiren_main
goto *seiren_onedari



*seiren_onedari1

gosub *onedari_syori
name $name
>You want to have fun with my feathers...?\
name ""
gosub *seiren_a1
skip -1



*seiren_onedari2

gosub *onedari_syori
name $name
>You want to have fun with my wings...?\
name ""
gosub *seiren_a2
skip -1



*seiren_onedari3

gosub *onedari_syori
name $name
>You want to have fun with my breasts...?\
name ""
gosub *seiren_a3
skip -1



*seiren_onedari4

gosub *onedari_syori
name $name
>You want to have fun with my mouth...?\
name ""
gosub *seiren_a4
skip -1



*seiren_onedari5

gosub *onedari_syori
name $name
>You want to have fun with my armpits...?\
name ""
gosub *seiren_a5
skip -1



*seiren_onedari6

gosub *onedari_syori
name $name
>You want to mate with me...?@
>Then before that...\
name ""
gosub *seiren_a6
goto *seiren_yuwaku_a
skip -1



*seiren_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\seiren_bk05.bmp",0,0
gosub *syasei2
>As the Siren's feathers caress Luka's penis, he comes, covering her wings in semen.\
mov %viclose,1:gosub *lose
mov %2621,%2621+1:if %2621=1 mov %count_koenemy,%count_koenemy+1
if %2621>%count_most mov %count_most,%2621:mov $count_mostname,$name
count 13,3
mov $bad1,"Luka was forced to an orgasm as the Siren's feathers caressed him."
gosub *face2
name $name
>It looks like you really enjoyed my feathers...@
>Aren't you happy? Hehe...\
name ""
goto *seiren_h



*seiren_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\seiren_bk03.bmp",0,0
gosub *syasei2
>As the Siren's wings rub against Luka's penis, he comes, covering her in semen.\
mov %viclose,1:gosub *lose
mov %2621,%2621+1:if %2621=1 mov %count_koenemy,%count_koenemy+1
if %2621>%count_most mov %count_most,%2621:mov $count_mostname,$name
count 5,3
mov $bad1,"Luka was forced to an orgasm as the Siren's wings stroked him."
gosub *face2
name $name
>It looks like you really enjoyed my wings...@
>Aren't you happy? Hehe...\
name ""
goto *seiren_h



*seiren_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\seiren_bk02.bmp",0,0
gosub *syasei2
>As the Siren squeezes Luka's penis between her breasts, Luka comes, covering her chest in semen.\
mov %viclose,1:gosub *lose
mov %2621,%2621+1:if %2621=1 mov %count_koenemy,%count_koenemy+1
if %2621>%count_most mov %count_most,%2621:mov $count_mostname,$name
count 7,3
mov $bad1,"Luka was forced to an orgasm by the Siren's breasts."
gosub *face2
name $name
>It looks like you really enjoyed my breasts...@
>Aren't you happy? Hehe...\
name ""
goto *seiren_h



*seiren_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\seiren_bk01.bmp",0,0
gosub *syasei2
>As the Siren greedily sucks on him, Luka comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2621,%2621+1:if %2621=1 mov %count_koenemy,%count_koenemy+1
if %2621>%count_most mov %count_most,%2621:mov $count_mostname,$name
count 4,3
mov $bad1,"Luka was forced to an orgasm as the Siren sucked on him."
gosub *face2
name $name
>It looks like you really enjoyed my mouth...@
>Aren't you happy? Hehe...\
name ""
goto *seiren_h



*seiren_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\seiren_bk04.bmp",0,0
gosub *syasei2
>As the Siren squeezes Luka between her armpits, Luka comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2621,%2621+1:if %2621=1 mov %count_koenemy,%count_koenemy+1
if %2621>%count_most mov %count_most,%2621:mov $count_mostname,$name
count 32,3
mov $bad1,"Luka was forced to an orgasm as the Siren squeezed him with her armpits."
gosub *face2
name $name
>It looks like you really enjoyed my armpits...@
>Aren't you happy? Hehe...\
name ""
goto *seiren_h



*seiren_h6

mov %ikigoe,3:gosub *ikigoe
name $name
>Hehe... Already?\
name ""
gosub *syasei1
lsp 690,":a;chara\seiren_ct02.bmp",0,0
lsp 697,":a;chara\seiren_bk07.bmp",0,0
gosub *syasei2
>As soon as Luka thrusts into the Siren, he comes, filling her vagina with semen.\
mov %viclose,1:gosub *lose
mov %2621,%2621+1:if %2621=1 mov %count_koenemy,%count_koenemy+1
if %2621>%count_most mov %count_most,%2621:mov $count_mostname,$name
count 1,3
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come just from insertion."
gosub *face2
name $name
>Unable to take it just from insertion... Am I really that good?\
name ""
goto *seiren_h



*seiren_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\seiren_ct02.bmp",0,0
lsp 697,":a;chara\seiren_bk07.bmp",0,0
gosub *syasei2
>As the Siren rapes Luka, he comes, filling her vagina with semen.\
mov %viclose,1:gosub *lose
mov %2621,%2621+1:if %2621=1 mov %count_koenemy,%count_koenemy+1
if %2621>%count_most mov %count_most,%2621:mov $count_mostname,$name
count 1,3
mov $bad1,"Luka was forced to an orgasm as the Siren raped him."
gosub *face2
name $name
>You let out so much inside me... Hehe.@
>More... I want to rape you until you're dry!\
name ""
goto *seiren_h



*seiren_h

mov $bad2,"A victim of the Siren, Luka is forced to mate with her endlessly..."
if %2621=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,2:hseanwave:goto *seiren_hb
name "Luka"
>Ahh...\
name ""
name $name
>Now to have some fun...@
>I'll let you taste heaven...\
name ""
mov %hseanwave,2:hseanwave
cspl 690,699
lsp 690,":a;chara\seiren_ct01.bmp",0,0:print 10,500
>The Siren jumps on top of me, and forces my penis into her warm vagina in a single stroke.\
name "Luka"
>Ahhh!!\
name ""
>Just from the feeling of insertion, I let out a pleasure filled moan.\
goto *seiren_hb



*seiren_hb

>Her soft flesh squeezes down around my penis from every side.\
>All the way from her entrance to her deepest part, tiny little folds and creases rub against my penis with every small movement she makes.\
>It's as if she has thousands of tiny tongues inside of her, licking me with every little movement.\
name $name
>Hehehe... This feels so good...@
>More... Make me feel even better!\
name ""
name "Luka"
>Ah... Ahhh!\
name ""
>The Siren grinds against me for her own pleasure, forcing my penis to rub against the flesh inside of her vagina with every awkward movement she makes.\
>Helpless under her, I squirm as her soft feathers rub across my body as her body rubs against mine during her rape.\
name "Luka"
>Haaa!@>Ahhh!\
name ""
name $name
>Ahh... That's good... Your penis feels amazing...@
>You should enjoy it too... It's fine if you go crazy...\
name ""
>The Siren begins to sing with an alluring voice as she rides on top of me.\
>As I listen to her sweet song, it feels as if my body is melting in pleasure.@
>All of my other thoughts slowly get pushed away as I indulge in the ecstasy of her bouncing on top of me.\
name "Luka"
>Haaa...\
name ""
>The Siren's voice seemingly violates my brain in pleasure, as her vagina continues to fill the rest of my body with ecstasy.\
>As the Siren thrusts me in and out of her, I feel myself about to ejaculate.\
name "Luka"
>Haa... I'm going to come...!\
name ""
name $name
>Already...?@>But I'm not there yet...@
>Hold on a little longer!\
name ""
name "Luka"
>I can't... It feels too good...!\
name ""
name $name
>Not yet...@
>I want you deeper... Nnnn...\
name ""
>The Siren bounces on top of me even harder, bringing my penis even deeper inside of her with every thrust.\
>When I'm all the way inside her, I feel the tip of my penis rub against something deep inside her.\
>As my sensitive tip pushes against her inner wall, I relax as it becomes way too much for me to endure.\
name "Luka"
>I'm coming... Ahhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\seiren_ct02.bmp",0,0
lsp 697,":a;chara\seiren_bk07.bmp",0,0
gosub *syasei2
>I explode inside of the Siren, shooting my seed deep into her warm vagina.\
>The blissful feeling of release fills me, making me sigh in content as the Siren sits on top of me.\
name "Luka"
>Haa...\
name ""
name $name
>That was fast... How pathetic.@
>I was so close, too...\
>...I'm not stopping now.@
>I'm not satisfied at all yet.\
name ""
>The Siren squirms her waist side to side, slightly twisting my penis inside her.\
>I shake in pleasure as the sudden stimulation forces me to get erect again almost instantly.\
name "Luka"
>Ah...!@> Ahhh!\
name ""
name $name
>Ahh... That feels so good...@
>My singing will let you melt away in pleasure too...\
name ""
>The Siren begins singing her song of seduction again.@
>My world starts to fade away, leaving seemingly nothing but the Siren and her song.\
>The only things left for me to feel is the Siren having sex with me, and her beautiful singing voice...\
name "Luka"
>Haaa...\
name ""
name $name
>Last a little bit longer...@
>So that you can satisfy me...\
name ""
>The Siren twists her waist again, and forces me all the way inside her again.\
name "Luka"
>Ah!\
name ""
>My brain is attacked by her voice and the pleasure at the same time, forcing me to a quick, disappointing ejaculation.\
gosub *syasei1
lsp 690,":a;chara\seiren_ct03.bmp",0,0
gosub *syasei2
>I come inside of her again, filling her warm vagina with my semen.\
>The Siren looks annoyed, and sighs at me.\
name "Luka"
>Ahh... I came...\
name ""
name $name
>Already...?@
>You really have a pathetic penis...\
>You're never going to satisfy me at this rate...@
>It looks like I'm going to have to train you for a long time...\
name ""
name "Luka"
>S...Stop... Ahhh!\
name ""
>The Siren gives into her carnal desire again and starts to rape me, grinding and pumping me as hard as she can.\
>Like that, she forces me to orgasm after orgasm as she strives to sate her lust...\
gosub *anten
mov %hseanwave,0:hseanwave
>After that, I'm kept as a toy for the Siren to satisfy her lust with.@
>Raping me with her body as she rapes my mind with her song, she forces me to mate over and over.\
>Her song causes me to lose my sanity, and my heart and soul slowly become hers.\
>............\
goto *badend



*hitode_start

mov $name,"Starfish Girl"
mov $name2,"Starfish Girl"
mov $lavel,"hitode"
mov $tatie1,"hitode_st01"
mov $tatie2,"hitode_st02"
mov $tatie3,"hitode_st03"
mov $tatie4,"hitode_ha1"
mov $haikei,"bg130"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,4800
if %nanido=2 mov %max_enemylife,5800
if %nanido=3 mov %max_enemylife,7200
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %music,1
mov %tikei,0
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka breaks free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Taste the torture only a starfish can bring..."
mov $mogaku_sel2,"It's pointless to struggle..."
mov $mogaku_sel3,"No matter how much you struggle, you'll never escape..."
mov $mogaku_sel4,"Don't think you can escape once a starfish has you..."
mov $mogaku_sel5,"I'll force you to come before you can escape..."
mov $mogaku_dassyutu1,"To think someone could escape from my just by struggling..."
mov $mogaku_dassyutu2,""
mov $mogaku_earth_dassyutu1,"What is this power!?"
mov $mogaku_earth_dassyutu2,""
mov $half_s1,"It feels good, doesn't it?"
mov $half_s2,"Give in to me..."
mov $kiki_s1,"You're going to come soon, aren't you?"
mov $kiki_s2,"I'll suck in all your semen..."
mov %end_n,8
mov %exp_minus,30000
mov %zmonster_x,-300
mov %tukix,320
mov %owaza_count1a,4
gosub *face2
name $name
>Hehe... I'll finally be able to suck some human semen after being stuck in here for so long.\
>I'll suck out all of your semen...@
>Then feast on that delicious body of yours...\
name ""
name "Luka"
>She does seem strong...!\
name ""
>Since we're so close to the northern continent, she must be strong...\
>I have the power of the spirits though, so I won't lose!\
gosub *face1
goto *common_main



*hitode_v

gosub *face3
name $name
>After training here for so long... To think I'd lose...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Starfish Girl is sealed into the form of a tiny starfish!\
mov %viclose,1:gosub *victory
mov %getexp,35000:gosub *lvup
mov %2317,1
goto *sean0265



*hitode_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>You give up?@
>Then I'll do whatever I want with you...\
name ""
goto *hitode_a



*hitode_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *hitode_kousan
if %cmd1=16 goto *hitode_onedari
if %cmd1=17 goto *common_skill
goto *hitode_main



*hitode_a

if %kousoku=1 rnd2 %ransu,1,2
if %kousoku=1 && %ransu=1 gosub *hitode_a4:goto *common_main
if %kousoku=1 && %ransu=2 gosub *hitode_a5:goto *common_main
rnd2 %ransu,1,3
if %ransu=1 gosub *hitode_a1:goto *common_main
if %ransu=2 gosub *hitode_a2:goto *common_main
if %ransu=3 && %owaza_count1a>5 gosub *hitode_a3:goto *common_main
skip -4



*hitode_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll hold it in my mouth..."
if %ransu=2 mov $sel1,"I'll suck on it..."
if %ransu=3 mov $sel1,"I'll suck out your semen..."
name $name
eng $sel1:$sel6\
name ""
skillname "Star Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>The Starfish Girl puts Luka's penis into her mouth, and sucks on it!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3524
if %nanido<2 damage 120,140
if %nanido=2 damage 140,160
if %nanido=3 damage 160,180
skillname ""
if %mylife=0 sub %stack,1:return *hitode_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*hitode_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"How does it feel having all of my feet on you...?"
if %ransu=2 mov $sel1,"If you take this... Will you be able to endure it?"
if %ransu=3 mov $sel1,"Come on, there's no need to hold back..."
name $name
eng $sel1:$sel6\
name ""
skillname "Star Caress"
dwave 1,"se\ero_slime1.ogg"
>The Starfish Girl's feet wrap around Luka's penis, and wriggle around!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3525
if %nanido<2 damage 130,150
if %nanido=2 damage 150,170
if %nanido=3 damage 170,190
skillname ""
if %mylife=0 sub %stack,1:return *hitode_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*hitode_a3

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name $name
>It will feel good even if I cling to you...\
name ""
skillname "Cling"
dwave 1,"se\ero_makituki3.ogg"
>The Starfish Girl clings to Luka's body!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
if %nanido<2 damage 130,150
if %nanido=2 damage 150,170
if %nanido=3 damage 170,190
mov %kousoku,1:gosub *status_print
>Luka is being bound by the Starfish Girl!\
skillname ""
if %mylife=0 sub %stack,1:return *hitode_h3
if %kousan=2 sub %stack,1:return
gosub *face2
name $name
if %first_sel1=1 skip 4
>Hehe... I caught you.@
>I'll use my feet to make you squirm in pleasure...\
skip 3
>This time you won't get away...@
>I'll use my feet to make you squirm in pleasure...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,100
if %earth=0 && %nanido=2 mov %genmogaku,100
if %earth=0 && %nanido=3 mov %genmogaku,100
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,2
if %earth>0 && %nanido=3 mov %genmogaku,3
sub %stack,1
return



*hitode_a4

add %stack,1
>The Starfish Girl is clinging to Luka...\
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll make your whole body feel good...":mov $sel2,"The Starfish Girl's feet wriggle all over Luka's body!"
if %ransu=2 mov $sel1,"I'll overwhelm your body...":mov $sel2,"The Starfish Girl's feet tickle every inch of Luka's body!"
if %ransu=3 mov $sel1,"How do you like being played with by a starfish...?":mov $sel2,"The Starfish Girl caresses Luka's body with her feet!"
if %ransu=4 mov $sel1,"How does it feel? Hehe.":mov $sel2,"The Starfish Girl tickles Luka's sides with her feet!"
name $name
eng $sel1:$sel6\
name ""
skillname "Full-Body Foot Caress"
dwave 1,"se\ero_makituki2.ogg"
eng $sel2:$sel6
skillcount2 3526
if %nanido<2 damage 130,150
if %nanido=2 damage 130,150
if %nanido=3 damage 150,170
skillname ""
if %mylife=0 sub %stack,1:return *hitode_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*hitode_a5

add %stack,1
>The Starfish Girl is clinging to Luka...\
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Does it feel good being played with here?":mov $sel2,"The Starfish Girl's feet crawl over Luka's penis!"
if %ransu=2 mov $sel1,"When you can't endure it, just come...":mov $sel2,"The Starfish Girl's feet squirm around Luka's penis!"
if %ransu=3 mov $sel1,"I'll stroke your penis nice and slow...":mov $sel2,"The Starfish Girl's feet wrap around Luka's penis, stroking him up and down!"
if %ransu=4 mov $sel1,"Is it heavenly?":mov $sel2,"The Starfish Girl's feet tighten around Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Penis Foot Caress"
dwave 1,"se\ero_makituki2.ogg"
eng $sel2:$sel6
skillcount2 3527
if %nanido<2 damage 140,160
if %nanido=2 damage 140,160
if %nanido=3 damage 160,180
skillname ""
if %mylife=0 sub %stack,1:return *hitode_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*hitode_onedari

mov $list1,"Star Blowjob"
if %3524>0 mov %list_num1,1
mov $list2,"Star Caress"
if %3525>0 mov %list_num2,1
mov $list3,"Full-Body Foot Caress"
if %3526>0 mov %list_num3,1
mov $list4,"Penis Foot Caress"
if %3527>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *hitode_onedari1
if %cmd1=12 goto *hitode_onedari2
if %cmd1=13 goto *hitode_onedari3
if %cmd1=14 goto *hitode_onedari4
if %cmd1=-1 goto *hitode_main
goto *hitode_onedari



*hitode_onedari1

gosub *onedari_syori
name $name
>You want me to suck on it?\
name ""
gosub *hitode_a1
skip -1



*hitode_onedari2

gosub *onedari_syori
name $name
>You want me to play with you with my feet?\
name ""
gosub *hitode_a2
skip -1



*hitode_onedari3

gosub *onedari_syori_k
name $name
>You want me to cling to you and use my feet?\
name ""
if %kousoku=0 gosub *hitode_a3
gosub *hitode_a4
skip -1



*hitode_onedari4

gosub *onedari_syori_k
name $name
>You want me to cling to you and use my feet?\
name ""
if %kousoku=0 gosub *hitode_a3
gosub *hitode_a5
skip -1



*hitode_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\hitode_bk01.bmp",0,0
gosub *syasei2
>As the Starfish Girl sucks on Luka, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2617,%2617+1:if %2617=1 mov %count_koenemy,%count_koenemy+1
if %2617>%count_most mov %count_most,%2617:mov $count_mostname,$name
count 4,11
mov $bad1,"The Starfish Girl's blowjob made Luka come."
gosub *face2
name $name
>My mouth was too much? Hehe.\
name ""
goto *hitode_h



*hitode_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\hitode_bk03.bmp",0,0
gosub *syasei2
>As the Starfish Girl's legs crawl over Luka's penis, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2617,%2617+1:if %2617=1 mov %count_koenemy,%count_koenemy+1
if %2617>%count_most mov %count_most,%2617:mov $count_mostname,$name
count 32,11
mov $bad1,"The Starfish Girl's legs forced Luka to come."
gosub *face2
name $name
>That was quite a lot...@
>It looks like that stimulation was too much for you.\
name ""
goto *hitode_h



*hitode_h3

mov %ikigoe,3:gosub *ikigoe
name $name
>Hehe, so soon...?\
name ""
gosub *syasei1
lsp 700,":a;chara\hitode_ha2.bmp",0,0
gosub *syasei2
>As soon as the Starfish Girl clings to Luka, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2617,%2617+1:if %2617=1 mov %count_koenemy,%count_koenemy+1
if %2617>%count_most mov %count_most,%2617:mov $count_mostname,$name
count 32,11
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come as soon as the Starfish Girl clung to him."
gosub *face2
name $name
>How fast...@
>You're pretty pathetic.\
name ""
goto *hitode_h



*hitode_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\hitode_ha2.bmp",0,0
gosub *syasei2
>As the Starfish Girl clings to Luka and uses her feet to play with his body, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2617,%2617+1:if %2617=1 mov %count_koenemy,%count_koenemy+1
if %2617>%count_most mov %count_most,%2617:mov $count_mostname,$name
count 32,11
mov $bad1,"Luka was forced to an orgasm as he was bound and played with."
gosub *face2
name $name
>That was quite a lot...@
>It looks like that stimulation was too much for you.\
name ""
goto *hitode_h



*hitode_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\hitode_ha2.bmp",0,0
gosub *syasei2
>As the Starfish Girl clings to Luka and uses her feet to play with his penis, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2617,%2617+1:if %2617=1 mov %count_koenemy,%count_koenemy+1
if %2617>%count_most mov %count_most,%2617:mov $count_mostname,$name
count 32,11
mov $bad1,"Luka was forced to an orgasm as he was bound and played with."
gosub *face2
name $name
>That was quite a lot...@
>It looks like that stimulation was too much for you.\
name ""
goto *hitode_h



*hitode_h

mov $bad2,"After sucking out all of Luka's semen, the Starfish Girl eats him."
if %2617=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
name $name
>Now it's time to feast on you...@
>Your blood, flesh and semen will all be made into my nourishment...\
name ""
>She slowly moves closer to me, too drained of strength to run.@
>After a few moments, her huge body is looming over me.\
name "Luka"
>S...Stop it...\
name ""
name $name
>Starfish eat their prey by digesting them outside of their body.@
>We bring our stomachs outside of our body and wrap up our prey, dissolving them.\
>Hehe, isn't it horrifying?@
>That's how you're going to be eaten...\
name ""
name "Luka"
>N...No... Don't do it...\
name ""
>I struggle as the terrifying Starfish Girl bends over me.@
>But I'm too weak... I can't get away.\
cspl 690,699
lsp 700,":a;chara\hitode_ha3.bmp",0,0:print 10,500
name "Luka"
>N...No... Help me!\
name ""
name $name
>Hehe... You don't want to be eaten?@
>Do you want me to help you?\
>Alright... I'll give you a chance then.@
>If you beat me at a little game, I'll let you go free.\
name ""
name "Luka"
>A... Game...?\
name ""
name $name
>I have a special mouth that evolved solely to suck in human semen.@
>Using it, I can force any man to come and feed me, whether they want to or not...\
>I'm going to stick your penis in there.\
>Of course, it feels so good it doesn't give my prey a choice in feeding me.@
>No matter the man, they always come once they're inside me...\
name ""
name "Luka"
>...........\
name ""
>I swallow nervously.@
>She's going to use that on me...?\
>The thought that something like that even exists fills me with fear and a little bit of expectation...\
name $name
>It's an endurance game... If you can endure it for ten minutes, I'll let you go free.\
>If you can't, then I'll eat you.\
name ""
name "Luka"
>R...Really...?\
name ""
name $name
>I swear on it, since I love patient men.@
>Do you understand the rules of this game? Hehe.\
name ""
>A strange mouth opens up behind the Starfish Girl.@
>The flesh inside wriggles and squirms around, and a strange liquid drips out.\
>I have to stick my penis in that...@
>If I can endure it, she'll let me go free...\
name $name
>Now then, stick your penis in here...@
>If you can endure it, I'll set you free.\
name ""
>The strange mouth, dripping with liquid gets closer and closer to my penis...@
mov %hseanwave,21:hseanwave
lsp 690,":a;chara\hitode_ct01.bmp",0,0:print 10,500
>Opening up a little bit wider, it sucks in my penis!\
name "Luka"
>Ahhhh!\
name ""
>As soon as I'm sucked inside, the flesh starts to wriggle and squirm around my penis.@
>I shiver as the stimulation attacks me, far more powerful than I expected.\
name $name
>Well...?@> I feel incredible, don't I?@
>All you have to do is endure it... If you don't want to be eaten, that is.\
name ""
name "Luka"
>Ah...ahh...\
name ""
>The soft flesh rubs and strokes me, the warm juices inside her making wet noises at the same time.@
>If I relaxed for even a second, it feels like I would come...\
>Endure this for ten minutes... I don't think that's possible...\
name "Luka"
>Ahh... I... I can't endure this...@
>M...Make it easier...\
name ""
name $name
>Hehe... Sorry, but I can't do that.@
>It's the organ I use to feed on semen, I can't control it.\
>Come on, you just need to endure it...@
>If you don't want to be eaten, just don't come.\
name ""
name "Luka"
>Ah...!@> Hyaa...\
name ""
>Her mouth continues to suck on me, the soft inner walls rubbing and stroking my penis.@
>The more I try to ignore it, the more powerful it seems to become.\
name "Luka"
>Haa... That feels good...\
name ""
name $name
>Hehe, of course it does.@
>The only purpose of this organ is to force men to ejaculate.\
>You, too, will eventually give in and come.@
>So why not just go ahead and do it? It will feel amazing...\
name ""
name "Luka"
>No... I can't...\
name ""
>I try everything I can to endure the ejaculation as my penis is stuck inside her.\
>My body starts to shake in ecstasy as I tense my waist, barely holding on.\
>If I come, she's going to eat me... I can't let that happen...!\
name "Luka"
>Ahh... Aa...\
name ""
>But the amazing pleasure flowing from my penis to the rest of my body never subsides.@
>Her wet hole continues to suck, stroke and tighten around me...\
>My body starts to ache in frustration, screaming for release.@
>It's all I can do to deny my body the orgasm it so desperately wants.\
name "Luka"
>N...No... I can't come...\
name ""
>I shake my head side to side, trying to clear my mind and focus.\
name $name
>Oh my... Its only been three minutes, and you're already struggling that hard?@
>Even though you'll be eaten if you come...\
name ""
name "Luka"
>Haaa...\
name ""
>Suddenly I feel something brushing against the tip of my penis.@
>Deep inside of her hole, my glans starts to rub against her warm flesh.\
>I gasp in pleasure and frustration as the new stimulation sends my body into new spasms.\
name "Luka"
>C...Come... I... I can't come...\
name ""
name $name
>Hehehe... Being preyed on by me will feel incredible, too.@
>Don't you want to feel that once in a lifetime bliss?\
name ""
name "Luka"
>Nooo...\
name ""
>I struggle as hard as I can.@
>But I realize that I can't hold on for much longer...\
>My penis is stuck inside of her organ, evolved to only force men to come...@
>There's no way I could endure it...\
name "Luka"
>Ahhh... This is impossible...\
name ""
>As her soft walls rub against my penis inside her, I realize that this was a game I could never have won.\
name $name
>Oh my, did you give up?@
>But you aren't allowed to surrender...\
>If you do, I'll eat you.@
>The only thing you can do now is endure it.\
name ""
name "Luka"
>No... I don't want to be eaten...\
name ""
>Tears start to come out of my eyes as I feel my body on the verge of surrendering to the pleasure.\
>Despite how hard I tried to focus my mind and fight it, I'm not able to deny my male instinct.\
name "Luka"
>Coming... I'm coming...!@
>Ahhhhh!!\
name ""
>I shiver in horror and pleasure as my penis starts to twitch.@
>As I shout out, my waist relaxes, letting loose the orgasm I was holding back all this time.\
gosub *syasei1
lsp 700,":a;chara\hitode_ha4.bmp",0,0
lsp 690,":a;chara\hitode_ct02.bmp",0,0
gosub *syasei2
>I explode inside the Starfish Girl, shooting the proof of my defeat into her wet mouth.\
name "Luka"
>Haaa...\
name ""
>She just looks down at me with a grin as her walls stroke and rub against me, forcing out every drop.@
>As I lay back in the afterglow of the orgasm, it feels like all of my hope is being squeezed out at the same time.\
name $name
>Hehe, so you came...@
>Did it feel good?@>But... That means it's your loss.\
>Just as promised, the loser will be eaten...@> But don't be afraid.@
>Being digested alive is a once in a lifetime pleasure...\
name ""
name "Luka"
>No... Noo...@
>Ahhh!\
name ""
mov %hseanwave,22:hseanwave
csp 690
lsp 700,":a;chara\hitode_hb1.bmp",0,0:print 10,500
>A soft organ comes out of the Starfish Girl's body.@
>The thing that must be her stomach slowly wraps up my body, unable to even move at this point.\
>The soft, warm thing squeezes my body as it wraps around me.\
name $name
>This is how a starfish wraps their living prey...@
>Now you'll be slowly digested...\
name ""
name "Luka"
>No... Help me...\
name ""
>All that remains is the despair from being preyed on...@
>As her warm stomach wraps around me, I start to feel lightheaded and almost drunk.\
>This must be something designed to prevent her prey from acting violently...\
if %hosyoku_cut=1 goto *hosyoku_cut
name $name
>Hehe... It feels good, doesn't it?\
name ""
name "Luka"
>Ahhh....\
name ""
lsp 700,":a;chara\hitode_hb2.bmp",0,0:print 10,500
>Before I can even do anything, my entire body is wrapped up in her stomach.\
>It feels like every part of me is inside of that mouth my penis was just in.@
>Her soft walls stroke and rub against me, as the whole thing gently sucks on me.\
>Strange, wet sounds fill the area as her stomach pumps warm liquid onto me.\
>I've probably already started to dissolve...\
name "Luka"
>Ahh... That feels good...\
name ""
>This should be nothing but horrifying...@
>But for some reason, the drunken pleasure is taking more of a hold in my mind.\
>It feels like I could relax and melt away into nothing...@
>No, I probably really am melting into nothing...\
>This unnatural pleasure is proof that something wrong is happening.@
>I'm going to be digested while confused like this...\
name $name
>See, it feels nice being eaten, doesn't it?@
>Enjoy the last pleasure of your life...\
name ""
name "Luka"
>Ahh...\
name ""
>Overwhelmed by the sensations, I give myself over to the pleasure.@
>I leave everything to whatever may be, and just soak myself in the ecstasy.\
lsp 700,":a;chara\hitode_hb3.bmp",0,0:print 10,500
>As I blankly stare at the Starfish Girl grinning at me, her stomach rises again and covers my head.\
>Now completely immersed in bliss, I start to feel content with my fate.\
name "Luka"
>Ah...aaa...\
name ""
name $name
>Ahh... So delicious...@
>Little boys like you taste the best...\
name ""
>My body continues to dissolve as I listen to the Starfish Girl talk about how nice I taste.@
lsp 700,":a;chara\hitode_hb4.bmp",0,0:print 10,500
>My life itself is being absorbed by the Starfish Girl...\
name "Luka"
>Ah...aa...\
name ""
name $name
>Hehe, your consciousness will be gone in a few seconds.@
>You were really delicious.@> Thanks for the meal...\
gosub *anten
mov %hseanwave,0:hseanwave
>Thus, another boy was preyed on by a monster.@
>Though there aren't many man eating monsters, the boy dreaming of being a Hero was unfortunate enough to meet one.\
>His life ends with a trade of his body for pleasure.\
>..............\
goto *badend



*beelzebub_start

mov $name,"Beelzebub Girls"
mov $name2,"Beelzebub A"
mov $lavel,"beelzebub"
mov $tatie1,"beelzebub_st01"
mov $tatie2,"beelzebub_st02"
mov $tatie3,"beelzebub_st03"
mov $tatie4,"beelzebub_h01"
mov $haikei,"bg132"
mov %monster_x,100
mov %monster_y,50
mov $tatie1b,"beelzebub_st11"
mov $tatie2b,"beelzebub_st12"
mov $tatie3b,"beelzebub_st13"
mov %monster_xb,-150
mov %monster_yb,-50
mov $tatie1c,"beelzebub_st21"
mov $tatie2c,"beelzebub_st22"
mov $tatie3c,"beelzebub_st23"
mov %monster_xc,150
mov %monster_yc,-50
if %nanido=1 mov %max_enemylife,24000
if %nanido=2 mov %max_enemylife,24700
if %nanido=3 mov %max_enemylife,28000
if %nanido=1 mov %henkahp1,16000
if %nanido=2 mov %henkahp1,16000
if %nanido=3 mov %henkahp1,16000
if %nanido=1 mov %henkahp2,8000
if %nanido=2 mov %henkahp2,8000
if %nanido=3 mov %henkahp2,8000
if %nanido=0 mov %max_enemylife,3
if %nanido=0 mov %henkahp1,2
if %nanido=0 mov %henkahp2,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,90
mov %earth_keigen,50
if %nanido=3 mov %earth_keigen,25
mov %music,2
mov %tikei,3
gosub *maxmp:mov %mp,%max_mp
mov %tekikazu,3
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov %end_n,8
mov %exp_minus,65000
mov %zmonster_x,-180
mov %tukix,320
mov %tekikazu,3
mov %owaza_count1a,9
mov %owaza_count1b,9
mov %owaza_count1c,9
mov %owaza_count3a,5
mov %owaza_count3b,5
gosub *face2
name "Beelzebub A"
>I take back my previous words.@
>You seem to be quite powerful...\
name ""
name "Beelzebub B"
>That pirate girl gave us quite the present.@
>A powerful boy like this will let us create a strong army of flies...\
>Come here and make children with us, boy.@
>Our army of daughters will take over the world...\
name ""
name "Beelzebub C"
>We'll make this world into a paradise for flies.@
>All we require is your semen...\
name ""
name "Luka"
>Not a chance!\
name ""
name "Beelzebub A"
>Oh my, how brave.@
>We'll have to teach this boy that his only use lies in being a tool for reproduction!\
name ""
mov %sinkou,1
gosub *face1
goto *common_main



*beelzebub001

gosub *face3
name "Beelzebub A"
>H...How could I...?@
>I thought he was weak... But...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Beelzebub A is sealed in the shape of a fly!\
csp 704
lsp 700,":a;chara\beelzebub_st11.bmp",250,0
lsp 702,":a;chara\beelzebub_st21.bmp",-250,0:print 10,500
mov $name2,"Beelzebub B"
mov $tatie1,"beelzebub_st11"
mov $tatie2,"beelzebub_st12"
mov $tatie3,"beelzebub_st13"
mov $tatie4,"beelzebub_st12"
mov %monster_x,250
mov %monster_y,0
mov $tatie1b,"beelzebub_st21"
mov $tatie2b,"beelzebub_st22"
mov $tatie3b,"beelzebub_st23"
mov %monster_xb,-250
mov %monster_yb,0
mov %tekikazu,2
mov %tukix,500
name "Beelzebub B"
>Her carelessness got her sealed!\
name ""
name "Beelzebub C"
>It doesn't look like he'll quietly become our reproductive slave.@
>We have no choice... We were originally trying to keep you alive, but...\
name ""
dwave 1,"se\earth1.ogg"
quake 10,1000
>Power begins to radiate off of the Beelzebubs!@
>It doesn't look like they were fighting seriously until now!\
name "Luka"
>Guh...!@>What power...\
name ""
>As I take a step back and shield my face...\
cspl 701,703
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>...Sheesh.@
>How long are you planning on playing with them?\
name ""
name "Luka"
>A...Alice...!?\
name ""
>Alice suddenly moves next to me.@
>Standing by my side, she faces toward the Beelzebubs.\
name "Luka"
>Are you planning on fighting...?@
>I thought you said you were never going to assist me...\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Alipheese the first sealed these monsters herself.@
>It's the role of the current Monster Lord to keep them sealed!\
lsp 700,":a;chara\alice_st03b.bmp",67,0:print 10,500
>So I'll fight!@
>But don't forget that it's your role to fight monsters too, Luka!\
name ""
name "Luka"
>G...Got it!\
name ""
>The duties of the first Monster Lord still fall upon the one today.\
>I'm almost the one intruding on the fight here as someone uninvolved...\
csp 699
lsp 700,":a;chara\beelzebub_st11.bmp",250,0
lsp 702,":a;chara\beelzebub_st21.bmp",-250,0:print 10,500
name "Beelzebub B"
>Big words coming from someone who was just cowering in a corner.\
name ""
name "Beelzebub C"
>The current Monster Lord seems to be a failure.@
>She will be no match for us...\
name ""
mov %sinkou,2:if %nanido=0 gosub *beelzebub_alice_skillx:goto *beelzebub_v
goto *common_main



*beelzebub002

gosub *face3
name "Beelzebub B"
>What is this power...!?\
name ""
dwave 1,"se\syometu2.ogg"
csp 700:print 10,500
>Beelzebub B was killed!\
csp 702
lsp 700,":a;chara\beelzebub_st23.bmp",0,0
mov $name2,"Beelzebub C"
mov $tatie1,"beelzebub_st21"
mov $tatie2,"beelzebub_st22"
mov $tatie3,"beelzebub_st23"
mov $tatie4,"beelzebub_st22"
mov %monster_x,0
mov %monster_y,0
mov %tukix,370
mov %tekikazu,1
print 10,500
name "Beelzebub C"
>No...@
>How is that cowering fool so powerful...?\
name ""
name "Alice"
>Aren't you the one cowering, you idiot!?@
>You're next!@> You'll meet your friend in hell in a moment!\
name ""
mov %sinkou,3
gosub *face1
goto *common_main



*beelzebub003a

rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Hah!":mov $sel2,"Take this..."
if %ransu=2 mov $sel1,"Here I come!":mov $sel2,"Damn you..."
if %ransu=3 mov $sel1,"Take this!":mov $sel2,"Guh...!"
name "Beelzebub B"
eng $sel1:$sel6\
name ""
name "Beelzebub C"
eng $sel2:$sel6\
name ""
skillname "Monster Fly Gang Attack"
>Beelzebub B attacks!
dwave 2,"se\damage.ogg":quakex 2,440
rnd2 %sub1,50,75:itoa $sub1,%sub1
eng "Alice took "+$sub1+" damage!":$sel6\
>Beelzebub C attacks!@
dwave 2,"se\damage.ogg":quakex 2,440
rnd2 %sub1,50,75:itoa $sub1,%sub1
eng "Alice took "+$sub1+" damage!":$sel6\
skillname ""
goto *common_main



*beelzebub003b

rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"You'll regret resisting us!":mov $sel2,"Vanish..."
if %ransu=2 mov $sel1,"Can you take this power!?":mov $sel2,"Break..."
if %ransu=3 mov $sel1,"Taste our might!":mov $sel2,"Your body will be smashed..."
name "Beelzebub B"
eng $sel1:$sel6\
name ""
name "Beelzebub C"
eng $sel2:$sel6\
name ""
skillname "Bursting Magical Jail"
dwave 1,"se\bom2.ogg"
>The Beelzebubs create an explosion of magical power!
dwave 2,"se\damage.ogg":quakex 2,440
rnd2 %sub1,150,200:itoa $sub1,%sub1
eng "Alice took "+$sub1+" damage!":$sel6\
skillname ""
goto *common_main



*beelzebub004a

rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Th...This can't be...!"
if %ransu=2 mov $sel1,"St...Stay back!"
if %ransu=3 mov $sel1,"What's with this strength!?"
name "Beelzebub C"
eng $sel1:$sel6\
name ""
skillname "Monster Fly Attack"
>Beelzebub C attacks!
dwave 2,"se\damage.ogg":quakex 2,440
rnd2 %sub1,50,75:itoa $sub1,%sub1
eng "Alice took "+$sub1+" damage!":$sel6\
skillname ""
goto *common_main



*beelzebub004b

rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Why won't this work!?"
if %ransu=2 mov $sel1,"How can this be!?"
if %ransu=3 mov $sel1,"Why is our power not working!?"
name "Beelzebub C"
eng $sel1:$sel6\
name ""
skillname "Bursting Magical Jail"
dwave 1,"se\bom2.ogg"
>Beelzebub C creates an explosion of magical power!\
dwave 2,"se\damage.ogg":quakex 2,440
rnd2 %sub1,100,130:itoa $sub1,%sub1
eng "Alice took "+$sub1+" damage!":$sel6\
skillname ""
goto *common_main



*beelzebub_v

gosub *face3:if %nanido=0 && %sinkou=1 goto *beelzebub001
if %nanido>0 skip 3
name "Beelzebub B"
>What is this power...!?\
name "Beelzebub C"
>This is... The Monster Lord's power...\
name ""
dwave 1,"se\syometu2.ogg"
cspl 700,702:print 10,500
if %nanido=0 skip 3
>Beelzebub C was killed!\
skip 2
>Beelzebubs B and C were killed!\
mov %viclose,1:gosub *victory_plural
mov %getexp,70000:gosub *lvup
mov %2324,1
goto *sean0266



*beelzebub_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name "Beelzebub A"
>Giving up...?\
name ""
name "Beelzebub B"
>You want to be our reproduction slave, then? Hehe...\
name ""
name "Beelzebub C"
>We'll milk your seed and make lots of daughters, just as you want...\
name ""
goto *beelzebub_a



*beelzebub_kousan2

name "Alice"
>Quit screwing around, Luka!@
>Don't show any disgraceful behavior when I'm fighting by your side!\
name ""
>Alice is angry...\
goto *beelzebub_main



*beelzebub_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %kousoku=1 && %earth>0 && %genmogaku=0 goto *beelzebub_mogaku_earth1
if %cmd1=12 && %kousoku=2 && %earth>0 && %genmogaku=0 goto *beelzebub_mogaku_earth2
if %cmd1=12 && %kousoku=3 && %earth>0 && %genmogaku=0 goto *beelzebub_mogaku_earth3
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %kousoku=1 && %genmogaku=0 goto *beelzebub_mogaku1
if %cmd1=12 && %kousoku=2 && %genmogaku=0 goto *beelzebub_mogaku2
if %cmd1=12 && %kousoku=3 && %genmogaku=0 goto *beelzebub_mogaku3
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 && %sinkou=1 goto *beelzebub_kousan
if %cmd1=15 && %sinkou>1 goto *beelzebub_kousan2
if %cmd1=16 && %sinkou=1 goto *beelzebub_onedari
if %cmd1=16 && %sinkou>1 goto *beelzebub_kousan2
if %cmd1=17 goto *common_skill
goto *beelzebub_main



*beelzebub_mogaku1

mov %before_action,8
if %nanido=2 rnd2 %ransu,1,10:if %ransu=5 goto *common_mogaku
if %nanido=3 rnd2 %ransu,1,2:if %ransu=2 goto *common_mogaku
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Uwaaa!"
if %ransu=2 mov $sel1,"Damn it...!"
if %ransu=3 mov $sel1,"Get off!"
name "Luka"
eng $sel1:$sel6\
name ""
dwave 1,"se\dassyutu.ogg"
gosub *face3
mov %kousoku,0:gosub *status_print
>Luka struggles as hard as he can, and breaks free from Beelzebub A!\
mov %owaza_count1a,0
mov %owaza_num1,0
name "Beelzebub A"
>Ah... He ran away.@
>Even though it would have felt so good...\
name ""
gosub *face1
goto *common_main



*beelzebub_mogaku_earth1

mov %before_action,8
if %nanido=3 rnd2 %ransu,1,2:if %ransu=2 goto *mogaku_earth1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"With this power...!"
if %ransu=2 mov $sel1,"With Gnome's power...!"
if %ransu=3 mov $sel1,"With the power of the earth...!"
name "Luka"
eng $sel1:$sel6\
name ""
dwave 1,"se\power.ogg"
>The breath of the earth fills Luka's body!\
dwave 2,"se\dassyutu.ogg"
gosub *face3
mov %kousoku,0:gosub *status_print
>Luka struggles as hard as he can, and breaks free from Beelzebub A!\
mov %owaza_count1a,0
mov %owaza_num1,0
name "Beelzebub A"
>What an interesting power...@
>It looks like humans have evolved a little...\
name ""
gosub *face1
goto *common_main



*beelzebub_mogaku2

mov %before_action,8
if %nanido=2 rnd2 %ransu,1,10:if %ransu=5 goto *common_mogaku
if %nanido=3 rnd2 %ransu,1,2:if %ransu=2 goto *common_mogaku
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Uwaaa!"
if %ransu=2 mov $sel1,"Damn it...!"
if %ransu=3 mov $sel1,"Get off!"
name "Luka"
eng $sel1:$sel6\
name ""
dwave 1,"se\dassyutu.ogg"
gosub *face3
mov %kousoku,0:gosub *status_print
>Luka struggles as hard as he can, and breaks free from Beelzebub B!\
mov %owaza_count1b,0
mov %owaza_num1,0
name "Beelzebub B"
>Oh my, he ran...@
>You should have just given yourself over to my embrace...\
name ""
mov $tatie1,"beelzebub_st01"
mov $tatie2,"beelzebub_st02"
mov $tatie3,"beelzebub_st03"
mov $tatie4,"beelzebub_h01"
mov $haikei,"bg132"
mov %monster_x,100
mov %monster_y,50
mov $tatie1b,"beelzebub_st11"
mov $tatie2b,"beelzebub_st12"
mov $tatie3b,"beelzebub_st13"
mov %monster_xb,-150
mov %monster_yb,-50
mov $tatie1c,"beelzebub_st21"
mov $tatie2c,"beelzebub_st22"
mov $tatie3c,"beelzebub_st23"
mov %monster_xc,150
mov %monster_yc,-50
gosub *face1
goto *common_main



*beelzebub_mogaku_earth2

mov %before_action,8
if %nanido=3 rnd2 %ransu,1,2:if %ransu=2 goto *mogaku_earth1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"With this power...!"
if %ransu=2 mov $sel1,"With Gnome's power...!"
if %ransu=3 mov $sel1,"With the power of the earth...!"
name "Luka"
eng $sel1:$sel6\
name ""
dwave 1,"se\power.ogg"
>The breath of the earth fills Luka's body!\
dwave 2,"se\dassyutu.ogg"
gosub *face3
mov %kousoku,0:gosub *status_print
>Luka struggles as hard as he can, and breaks free from Beelzebub B!\
mov %owaza_count1b,0
mov %owaza_num1,0
name "Beelzebub B"
>What power...@
>This prey is high quality...\
name ""
mov $tatie1,"beelzebub_st01"
mov $tatie2,"beelzebub_st02"
mov $tatie3,"beelzebub_st03"
mov $tatie4,"beelzebub_h01"
mov $haikei,"bg132"
mov %monster_x,100
mov %monster_y,50
mov $tatie1b,"beelzebub_st11"
mov $tatie2b,"beelzebub_st12"
mov $tatie3b,"beelzebub_st13"
mov %monster_xb,-150
mov %monster_yb,-50
mov $tatie1c,"beelzebub_st21"
mov $tatie2c,"beelzebub_st22"
mov $tatie3c,"beelzebub_st23"
mov %monster_xc,150
mov %monster_yc,-50
gosub *face1
goto *common_main



*beelzebub_mogaku3

mov %before_action,8
if %nanido=2 rnd2 %ransu,1,10:if %ransu=5 goto *common_mogaku
if %nanido=3 rnd2 %ransu,1,2:if %ransu=2 goto *common_mogaku
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Uwaaa!"
if %ransu=2 mov $sel1,"Damn it...!"
if %ransu=3 mov $sel1,"Get off!"
name "Luka"
eng $sel1:$sel6\
name ""
dwave 1,"se\dassyutu.ogg"
gosub *face3
mov %kousoku,0:gosub *status_print
>Luka struggles as hard as he can, and breaks free from Beelzebub C!\
mov %owaza_count1c,0
mov %owaza_num1,0
name "Beelzebub C"
>You escaped from my embrace...?@
>But you would feel so happy if you let me suck everything out...\
name ""
mov $tatie1,"beelzebub_st01"
mov $tatie2,"beelzebub_st02"
mov $tatie3,"beelzebub_st03"
mov $tatie4,"beelzebub_h01"
mov $haikei,"bg132"
mov %monster_x,100
mov %monster_y,50
mov $tatie1b,"beelzebub_st11"
mov $tatie2b,"beelzebub_st12"
mov $tatie3b,"beelzebub_st13"
mov %monster_xb,-150
mov %monster_yb,-50
mov $tatie1c,"beelzebub_st21"
mov $tatie2c,"beelzebub_st22"
mov $tatie3c,"beelzebub_st23"
mov %monster_xc,150
mov %monster_yc,-50
gosub *face1
goto *common_main



*beelzebub_mogaku_earth3

mov %before_action,8
if %nanido=3 rnd2 %ransu,1,2:if %ransu=2 goto *mogaku_earth1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"With this power...!"
if %ransu=2 mov $sel1,"With Gnome's power...!"
if %ransu=3 mov $sel1,"With the power of the earth...!"
name "Luka"
eng $sel1:$sel6\
name ""
dwave 1,"se\power.ogg"
>The breath of the earth fills Luka's body!\
dwave 2,"se\dassyutu.ogg"
gosub *face3
mov %kousoku,0:gosub *status_print
>Luka struggles as hard as he can, and breaks free from Beelzebub C!\
mov %owaza_count1c,0
mov %owaza_num1,0
name "Beelzebub C"
>What a strange power...@
>I want to suck out that power, too...\
name ""
mov $tatie1,"beelzebub_st01"
mov $tatie2,"beelzebub_st02"
mov $tatie3,"beelzebub_st03"
mov $tatie4,"beelzebub_h01"
mov $haikei,"bg132"
mov %monster_x,100
mov %monster_y,50
mov $tatie1b,"beelzebub_st11"
mov $tatie2b,"beelzebub_st12"
mov $tatie3b,"beelzebub_st13"
mov %monster_xb,-150
mov %monster_yb,-50
mov $tatie1c,"beelzebub_st21"
mov $tatie2c,"beelzebub_st22"
mov $tatie3c,"beelzebub_st23"
mov %monster_xc,150
mov %monster_yc,-50
gosub *face1
goto *common_main



*beelzebub_alice_skillx

add %stack,1
rnd2 %ransu,1,4
if %ransu=1 goto *beelzebub_alice_skillx1
if %ransu=2 goto *beelzebub_alice_skillx2
if %ransu=3 goto *beelzebub_alice_skillx3
if %ransu=4 goto *beelzebub_alice_skillx4



*beelzebub_alice_skillx1

rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"You little upstart!"
if %ransu=2 mov $sel1,"Eat this!"
if %ransu=3 mov $sel1,"Hah!"
name "Alice"
eng $sel1:$sel6\
name ""
>Alice attacks!
dwave 1,"se\dageki.ogg"
rnd2 %damage,800,1200
dwave 2,"se\damage2.ogg"
gosub *alice_enemylife2
sub %stack,1
return



*beelzebub_alice_skillx2

rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Burn!"
if %ransu=2 mov $sel1,"I'll barbecue you!"
if %ransu=3 mov $sel1,"The flames of the Monster Lord shall incinerate you!"
name "Alice"
eng $sel1:$sel6\
name ""
skillname "Omega Blaze"
>Alice creates a storm of fire!\
>A scorching maelstrom of fire envelopes the area!
delay 500
if %effectspeed=2 dwave 1,"se\fire1.ogg":skip 2
mpegplay "effect\movie01.mpg",1
rnd2 %damage,3000,3600
dwave 2,"se\damage2.ogg"
gosub *alice_enemylife2
skillname ""
sub %stack,1
return



*beelzebub_alice_skillx3

rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Freeze and shatter!"
if %ransu=2 mov $sel1,"A freezing hell awaits you!"
if %ransu=3 mov $sel1,"Turn to ice!"
name "Alice"
eng $sel1:$sel6\
name ""
skillname "Frost Ozma"
>Pure magic flows off of Alice, freezing the air around her!
delay 500
if %effectspeed=2 dwave 1,"se\wind3.ogg":skip 2
mpegplay "effect\movie02.mpg",1
dwave 2,"se\damage2.ogg"
rnd2 %damage,3000,3600
gosub *alice_enemylife2
skillname ""
sub %stack,1
return



*beelzebub_alice_skillx4

rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Tremble before the power of the Monster Lord!"
if %ransu=2 mov $sel1,"This is the power of a Monster Lord!"
if %ransu=3 mov $sel1,"Take a look at the power of darkness!"
name "Alice"
eng $sel1:$sel6\
name ""
skillname "Monster Lord's Cruelty"
dwave 1,"se\bom1.ogg"
>The power of darkness radiates from Alice!
wait 300
flushout 1000
vsp 700,0
vsp 702,0
bg white,10,1000
dwave 2,"se\damage2.ogg"
quake 10,600
rnd2 %damage,1000,1200
itoa $sel1,%damage
eng "Alice deals "+$sel1+" damage!":$sel6
mov %enemylife,%enemylife-%damage
if %enemylife>%max_enemylife mov %enemylife,%max_enemylife
if %enemylife<0 mov %enemylife,0
if %enemylife=0 mov %gage,0 skip 3
mov %gage,%enemylife*100/%max_enemylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
print 10,500
dwave 2,"se\damage2.ogg"
quake 10,600
rnd2 %damage,1000,1200
itoa $sel1,%damage
eng "Alice deals "+$sel1+" damage!":$sel6/
mov %enemylife,%enemylife-%damage
if %enemylife>%max_enemylife mov %enemylife,%max_enemylife
if %enemylife<0 mov %enemylife,0
if %enemylife=0 mov %gage,0 skip 3
mov %gage,%enemylife*100/%max_enemylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
print 10,500
textclear
dwave 2,"se\damage2.ogg"
quake 10,600
rnd2 %damage,1000,1200
itoa $sel1,%damage
eng "Alice deals "+$sel1+" damage!":$sel6
mov %enemylife,%enemylife-%damage
if %enemylife>%max_enemylife mov %enemylife,%max_enemylife
if %enemylife<0 mov %enemylife,0
if %enemylife=0 mov %gage,0 skip 3
mov %gage,%enemylife*100/%max_enemylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
print 10,500
dwave 2,"se\damage2.ogg"
quake 10,600
rnd2 %damage,1000,1200
itoa $sel1,%damage
eng "Alice deals "+$sel1+" damage!":$sel6/
mov %enemylife,%enemylife-%damage
if %enemylife>%max_enemylife mov %enemylife,%max_enemylife
if %enemylife<0 mov %enemylife,0
if %enemylife=0 mov %gage,0 skip 3
mov %gage,%enemylife*100/%max_enemylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
print 10,500
vsp 700,1
vsp 702,1
bg "bg\bg132.bmp",10,2000
\
skillname ""
sub %stack,1
return



*beelzebub_a

if %sinkou>1 gosub *beelzebub_alice_skillx
if %enemylife<%henkahp1 && %sinkou=1 goto *beelzebub001
if %enemylife<%henkahp2 && %sinkou=2 goto *beelzebub002
if %enemylife<1 && %sinkou=3 goto *beelzebub_v
if %sinkou>1 rnd2 %ransu,1,3
if %sinkou=2 && %ransu<3 goto *beelzebub003a
if %sinkou=2 && %ransu=3 goto *beelzebub003b
if %sinkou=3 && %ransu<3 goto *beelzebub004a
if %sinkou=3 && %ransu=3 goto *beelzebub004b
if %kousoku=1 gosub *beelzebub_a6:goto *common_main
if %kousoku=2 gosub *beelzebub_a8:goto *common_main
if %kousoku=3 gosub *beelzebub_a10:goto *common_main
rnd2 %ransu,1,8
if %ransu=1 gosub *beelzebub_a1:goto *common_main
if %ransu=2 gosub *beelzebub_a2:goto *common_main
if %ransu=3 gosub *beelzebub_a3:goto *common_main
if %ransu=4 && %owaza_count3b>6 gosub *beelzebub_a11:gosub *beelzebub_a12:gosub *beelzebub_a13:goto *common_main
if %ransu=5 && %owaza_count3a>6 gosub *beelzebub_a4:goto *common_main
if %ransu=6 && %owaza_count1a>10 gosub *beelzebub_a5:goto *common_main
if %ransu=7 && %owaza_count1b>10 gosub *beelzebub_a7:goto *common_main
if %ransu=8 && %owaza_count1c>10 gosub *beelzebub_a9:goto *common_main
skip -9



*beelzebub_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"We'll play with you to get that semen...":mov $sel2,"Hehe, it will feel amazing..."
if %ransu=2 mov $sel1,"Your seed will make our army...":mov $sel2,"Our daughters will help you make even more flies..."
if %ransu=3 mov $sel1,"We just need to stimulate you a little bit to make our daughters...":mov $sel2,"How miserable..."
name "Beelzebub A"
eng $sel1:$sel6\
name ""
name "Beelzebub B"
eng $sel2:$sel6\
name ""
skillname "Flies of Purgatory"
dwave 1,"se\umaru.ogg"
eng "Thousands of flies burst out of the Beelzebubs abdomen!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,40
if %wind=2 && %nanido=2 mov %wind_kakuritu,35
if %wind=2 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
@
>They land on Luka's penis, buzzing and stimulating him!\
skillcount2 3554
textclear
mov %damage_nobr,1
if %nanido<2 damage 50,60
if %nanido=2 damage 55,65
if %nanido=3 damage 60,70
mov %damage_nobr,1
if %nanido<2 damage 50,60
if %nanido=2 damage 55,65
if %nanido=3 damage 60,70
if %nanido<2 damage 50,60
if %nanido=2 damage 55,65
if %nanido=3 damage 60,70
skillname ""
if %mylife=0 sub %stack,1:return *beelzebub_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *beelzebub_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *beelzebub_s2
sub %stack,1
return



*beelzebub_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Cover our breasts with your seed...":mov $sel2,"We're very soft..."
if %ransu=2 mov $sel1,"We'll squeeze it out...":mov $sel2,"Indulge in the pleasure..."
if %ransu=3 mov $sel1,"Now, come...":mov $sel2,"Dye our breasts in your cloudy white..."
name "Beelzebub A"
eng $sel1:$sel6\
name ""
name "Beelzebub C"
eng $sel2:$sel6\
name ""
skillname "Triple Breast Crush"
dwave 1,"se\ero_koki1.ogg"
eng "The Beelzebubs surround Luka's penis with their breasts!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,40
if %wind=2 && %nanido=2 mov %wind_kakuritu,35
if %wind=2 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
@
>Their multiple breasts push against Luka's penis, crushing him in their softness!\
skillcount2 3555
textclear
mov %damage_nobr,1
if %nanido<2 damage 55,65
if %nanido=2 damage 60,70
if %nanido=3 damage 65,75
mov %damage_nobr,1
if %nanido<2 damage 55,65
if %nanido=2 damage 60,70
if %nanido=3 damage 65,75
if %nanido<2 damage 55,65
if %nanido=2 damage 60,70
if %nanido=3 damage 65,75
skillname ""
if %mylife=0 sub %stack,1:return *beelzebub_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *beelzebub_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *beelzebub_s2
sub %stack,1
return



*beelzebub_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Shall I have a taste of your semen...?":mov $sel2,"I'll suck it hard..."
if %ransu=2 mov $sel1,"I'll suck out your semen...":mov $sel2,"Make sure you come a lot..."
if %ransu=3 mov $sel1,"I'll even suck on you... Hehehe.":mov $sel2,"I'll indulge a little in your penis..."
name "Beelzebub A"
eng $sel1:$sel6\
name ""
name "Beelzebub B"
eng $sel2:$sel6\
name ""
skillname "Monster Fly Suck"
dwave 1,"se\ero_buchu2.ogg"
eng "The Beelzebubs lean over Luka, and take turns sucking on his penis!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,40
if %wind=2 && %nanido=2 mov %wind_kakuritu,35
if %wind=2 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
@
>The two Beelzebubs eagerly suck on Luka's penis!\
skillcount2 3556
textclear
mov %damage_nobr,1
if %nanido<2 damage 60,70
if %nanido=2 damage 65,75
if %nanido=3 damage 70,80
mov %damage_nobr,1
if %nanido<2 damage 60,70
if %nanido=2 damage 65,75
if %nanido=3 damage 70,80
if %nanido<2 damage 60,70
if %nanido=2 damage 65,75
if %nanido=3 damage 70,80
skillname ""
if %mylife=0 sub %stack,1:return *beelzebub_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *beelzebub_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *beelzebub_s2
sub %stack,1
return



*beelzebub_a4

add %stack,1
mov %owaza_count3a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You'll enjoy this hand...":mov $sel2,"Come as much as you want..."
if %ransu=2 mov $sel1,"I have twelve hands, you know...":mov $sel2,"When you taste this, you'll go mad..."
if %ransu=3 mov $sel1,"How do you want me to play with you...?":mov $sel2,"You'll love this..."
name "Beelzebub A"
eng $sel1:$sel6\
name ""
name "Beelzebub C"
eng $sel2:$sel6\
name ""
skillname "Black Sabbath"
eng "The Beelzebubs' multiple arms reach out toward Luka's body!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,66
if %wind=2 && %nanido=2 mov %wind_kakuritu,55
if %wind=2 && %nanido=3 mov %wind_kakuritu,33
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3557
dwave 1,"se\ero_koki1.ogg"
>Beelzebub A's hands rub the back of Luka's neck and his armpits!
if %nanido<2 damage 45,55
if %nanido=2 damage 48,58
if %nanido=3 damage 51,61
dwave 1,"se\ero_koki1.ogg"
>Beelzebub A rubs Luka's nipples with her fingers!
if %nanido<2 damage 45,55
if %nanido=2 damage 48,58
if %nanido=3 damage 51,61
dwave 1,"se\ero_koki1.ogg"
>Beelzebub A gently massages Luka's sides!
if %nanido<2 damage 45,55
if %nanido=2 damage 48,58
if %nanido=3 damage 51,61
dwave 1,"se\ero_koki1.ogg"
>Beelzebub B softly caresses Luka's thighs!
if %nanido<2 damage 45,55
if %nanido=2 damage 48,58
if %nanido=3 damage 51,61
dwave 1,"se\ero_koki1.ogg"
>Beelzebub B tenderly massages Luka's balls!
if %nanido<2 damage 45,55
if %nanido=2 damage 48,58
if %nanido=3 damage 51,61
dwave 1,"se\ero_koki1.ogg"
>Beelzebub B's finger slips into Luka's ass, and stimulates his prostate!
if %nanido<2 damage 45,55
if %nanido=2 damage 48,58
if %nanido=3 damage 51,61
dwave 1,"se\ero_koki1.ogg"
>Beelzebub C grabs Luka's penis, and pumps him!
if %nanido<2 damage 45,55
if %nanido=2 damage 48,58
if %nanido=3 damage 51,61
dwave 1,"se\ero_koki1.ogg"
>Beelzebub C's skilled fingers rub the tip of Luka's penis!
if %nanido<2 damage 45,55
if %nanido=2 damage 48,58
if %nanido=3 damage 51,61
skillname ""
if %mylife=0 sub %stack,1:return *beelzebub_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *beelzebub_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *beelzebub_s2
sub %stack,1
return



*beelzebub_a5

add %stack,1
mov $tatie4,"beelzebub_h01"
mov %owaza_count1a,0
if %kousan=2 skip 4
name "Beelzebub A"
>Catch him...\
name ""
skillname "Monster Fly Restriction"
dwave 1,"se\ero_makituki2.ogg"
>Beelzebub A wraps Luka up in her breast covered abdomen!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,40
if %wind=2 && %nanido=2 mov %wind_kakuritu,35
if %wind=2 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
if %nanido<2 damage 100,120
if %nanido=2 damage 115,135
if %nanido=3 damage 130,150
mov %kousoku,1:gosub *status_print
>Luka has been bound by Beelzebub A!\
skillname ""
if %mylife=0 sub %stack,1:return *beelzebub_h5
if %kousan=2 sub %stack,1:return
if %first_sel1=1 skip 10
name "Beelzebub A"
>My breasts feel nice and soft, don't they?@
>Writhe in pleasure as I hold you...\
name ""
name "Beelzebub B"
>Hehe... What a pathetic look.@
>I'll enjoy watching that face of yours twist in ecstasy...\
name ""
skip 5
name "Beelzebub A"
>You won't escape this time...@
>I'll drive you mad with pleasure...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,4
if %earth=0 && %nanido=2 mov %genmogaku,4
if %earth=0 && %nanido=3 mov %genmogaku,5
if %earth>0 && %nanido<2 mov %genmogaku,2
if %earth>0 && %nanido=2 mov %genmogaku,2
if %earth>0 && %nanido=3 mov %genmogaku,3
mov $mogaku_sel1,"I'll watch you come..."
mov $mogaku_sel2,"Look at you struggling... Look at you panting..."
mov $mogaku_sel3,"Humans are just as pathetic as ever..."
mov $mogaku_sel4,"Stop resisting, and just enjoy it..."
mov $mogaku_sel5,"Struggling humans... How pitiful looking."
sub %stack,1
return



*beelzebub_a6

add %stack,1
>Luka is being bound by Beelzebub A's breast covered abdomen...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Your penis is being squeezed...":mov $sel2,"Her soft breasts push against Luka's penis!"
if %ransu=2 mov $sel1,"Don't you love this? Hehe...":mov $sel2,"Luka's buried beneath her numerous breasts!"
if %ransu=3 mov $sel1,"Drown in my breasts...":mov $sel2,"Luka's entire body is being squeezed between her breasts!"
if %ransu=4 mov $sel1,"I'll make it a little tighter...":mov $sel2,"Her soft breasts push hard against Luka's body from every direction!"
if %ransu=5 mov $sel1,"Come whenever you want...":mov $sel2,"Her breasts push against Luka's penis!"
name "Beelzebub A"
eng $sel1:$sel6\
name ""
skillname "Breast Jail"
dwave 1,"se\ero_name2.ogg"
eng $sel2:$sel6
skillcount2 3558
if %nanido<2 damage 100,120
if %nanido=2 damage 115,135
if %nanido=3 damage 130,150
skillname ""
if %mylife=0 sub %stack,1:return *beelzebub_h6
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
>Beelzebub B and C laugh as they watch Luka.\
sub %stack,1
return



*beelzebub_a7

add %stack,1
mov $tatie1,"beelzebub_st11"
mov $tatie2,"beelzebub_st12"
mov $tatie3,"beelzebub_st13"
mov $tatie4,"beelzebub_h11"
mov %monster_x,60
mov %monster_y,50
mov $tatie1b,"beelzebub_st01"
mov $tatie2b,"beelzebub_st02"
mov $tatie3b,"beelzebub_st03"
mov %monster_xb,-100
mov %monster_yb,-50
mov $tatie1c,"beelzebub_st21"
mov $tatie2c,"beelzebub_st22"
mov $tatie3c,"beelzebub_st23"
mov %monster_xc,150
mov %monster_yc,-50
gosub *face1
mov %owaza_count1b,0
if %kousan=2 skip 4
name "Beelzebub B"
>Hehe... I'll hug you.\
name ""
skillname "Monster Fly Restriction"
dwave 1,"se\ero_makituki2.ogg"
>Beelzebub B hugs Luka tight to her breast covered abdomen!
if %aqua>1 gosub *beelzebub_aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,40
if %wind=2 && %nanido=2 mov %wind_kakuritu,35
if %wind=2 && %nanido=3 mov %wind_kakuritu,20
if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *beelzebub_wind_guard:sub %stack,1:return
if %nanido<2 damage 100,120
if %nanido=2 damage 115,135
if %nanido=3 damage 130,150
mov %kousoku,2:gosub *status_print
>Luka was bound by Beelzebub B!\
skillname ""
if %mylife=0 sub %stack,1:return *beelzebub_h7
if %kousan=2 sub %stack,1:return
if %first_sel2=1 skip 10
name "Beelzebub B"
>Do you like my embrace...?@
>Your mind will melt away in pleasure...\
name ""
name "Beelzebub C"
>What a lewd face.@
>Do you love being embraced by a Beelzebub that much?\
name ""
skip 5
name "Beelzebub B"
>This time you won't escape...@
>I'll make you go mad in pleasure...\
name ""
mov %first_sel2,1
if %earth=0 && %nanido<2 mov %genmogaku,3
if %earth=0 && %nanido=2 mov %genmogaku,3
if %earth=0 && %nanido=3 mov %genmogaku,4
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
mov $mogaku_sel1,"Don't waste your energy..."
mov $mogaku_sel2,"I'll never let go, so your struggling is useless..."
mov $mogaku_sel3,"Such weak resistance..."
mov $mogaku_sel4,"Don't struggle when a woman is holding you..."
mov $mogaku_sel5,"I love it when they struggle..."
sub %stack,1
return



*beelzebub_a8

add %stack,1
>Luka is being tightly held against Beelzebub B's breasts...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Men always melt away in pleasure...":mov $sel2,"Her soft breasts push against Luka's body!"
if %ransu=2 mov $sel1,"You'll surrender to my embrace soon enough...":mov $sel2,"Her smooth skin puts Luka into a trance of pleasure!"
if %ransu=3 mov $sel1,"Just give in to the pleasure...":mov $sel2,"The milk oozing from her breasts covers Luka's body!"
if %ransu=4 mov $sel1,"Give me your seed...":mov $sel2,"Her breasts spray milk as they press against Luka's penis!"
if %ransu=5 mov $sel1,"My breasts will milk it out of you...":mov $sel2,"Her breasts press against Luka's penis!"
name "Beelzebub B"
eng $sel1:$sel6\
name ""
skillname "Breast Prison"
dwave 1,"se\ero_name2.ogg"
eng $sel2:$sel6
skillcount2 3587
if %nanido<2 damage 100,120
if %nanido=2 damage 115,135
if %nanido=3 damage 130,150
skillname ""
if %mylife=0 sub %stack,1:return *beelzebub_h8
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
>Beelzebub A and C laugh as they watch Luka.\
sub %stack,1
return



*beelzebub_a9

add %stack,1
mov $tatie1,"beelzebub_st21"
mov $tatie2,"beelzebub_st22"
mov $tatie3,"beelzebub_st23"
mov $tatie4,"beelzebub_h21"
mov %monster_x,-70
mov %monster_y,50
mov $tatie1b,"beelzebub_st01"
mov $tatie2b,"beelzebub_st02"
mov $tatie3b,"beelzebub_st03"
mov %monster_xb,-100
mov %monster_yb,-50
mov $tatie1c,"beelzebub_st11"
mov $tatie2c,"beelzebub_st12"
mov $tatie3c,"beelzebub_st13"
mov %monster_xc,300
mov %monster_yc,-50
gosub *face1
mov %owaza_count1c,0
if %kousan=2 skip 4
name "Beelzebub C"
>I'll hug and suck it out of you...\
name ""
skillname "Monster Fly Restriction"
dwave 1,"se\ero_makituki2.ogg"
>Beelzebub C hugs Luka tight to her breast covered abdomen!
if %aqua>1 gosub *beelzebub_aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,40
if %wind=2 && %nanido=2 mov %wind_kakuritu,35
if %wind=2 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *beelzebub_wind_guard:sub %stack,1:return
if %nanido<2 damage 100,120
if %nanido=2 damage 115,135
if %nanido=3 damage 130,150
mov %kousoku,3:gosub *status_print
>Luka has been bound by Beelzebub C!\
skillname ""
if %mylife=0 sub %stack,1:return *beelzebub_h9
if %kousan=2 sub %stack,1:return
if %first_sel3=1 skip 9
name "Beelzebub C"
>I'll suck out your energy as I embrace you...@
>It will feel amazing, so don't hold back...\
name ""
name "Beelzebub A"
>Haha, I'll enjoy watching his face...\
name ""
skip 5
name "Beelzebub C"
>One more time...@
>Don't struggle, it feels good...\
name ""
mov %first_sel3,1
if %earth=0 && %nanido<2 mov %genmogaku,3
if %earth=0 && %nanido=2 mov %genmogaku,3
if %earth=0 && %nanido=3 mov %genmogaku,4
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
mov $mogaku_sel1,"Give yourself over to me, and calm down..."
mov $mogaku_sel2,"It's a waste of energy to struggle..."
mov $mogaku_sel3,"Why are you struggling when it feels so good?"
mov $mogaku_sel4,"Calm down... I'll satisfy you..."
mov $mogaku_sel5,"Even though it feels good, why are you struggling?"
sub %stack,1
return



*beelzebub_a10

add %stack,1
>Luka is being tightly held by Beelzebub C...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck it all out...":mov $sel2,"She sucks out Luka's energy as he's held down by her breasts!"
if %ransu=2 mov $sel1,"Don't you just feel all weak and tingly...?":mov $sel2,"Luka's energy is stolen as he's held in her soft embrace!"
if %ransu=3 mov $sel1,"I'll slowly suck it all out...":mov $sel2,"Luka's energy is sucked out as her soft breasts push into his body!"
if %ransu=4 mov $sel1,"Give everything over to me... Just lay back...":mov $sel2,"Luka's energy is drained out into the Beelzebub!"
if %ransu=5 mov $sel1,"It feels good, doesn't it? Here... I'll suck out more energy...":mov $sel2,"As her breasts press into his body from every direction, the Beelzebub absorbs Luka's energy!"
name "Beelzebub A"
eng $sel1:$sel6\
name ""
skillname "Breast Confinement"
dwave 1,"se\ero_name2.ogg"
eng $sel2:$sel6
skillcount2 3588
if %nanido<2 damage 100,120
if %nanido=2 damage 115,135
if %nanido=3 damage 130,150
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *beelzebub_h10
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
>Beelzebub A and B laugh as they watch Luka.\
sub %stack,1
return



*beelzebub_a11

add %stack,1
mov %owaza_count3b,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My hand will show you heaven..."
if %ransu=2 mov $sel1,"I'll rub my fingers all over your body..."
if %ransu=3 mov $sel1,"I'll finish you off with my hand..."
name "Beelzebub A"
eng $sel1:$sel6\
name ""
skillname "Monster Fly Handjob"
>Beelzebub A runs her fingers all over Luka's body!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,40
if %wind=2 && %nanido=2 mov %wind_kakuritu,35
if %wind=2 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3603
mov %damage_nobr,1
dwave 1,"se\umaru.ogg"
if %nanido<2 damage 25,30
if %nanido=2 damage 27,32
if %nanido=3 damage 29,34
dwave 1,"se\umaru.ogg"
if %nanido<2 damage 25,30
if %nanido=2 damage 27,32
if %nanido=3 damage 29,34
>She grabs Luka's penis, and starts to stroke it!
mov %damage_nobr,1
dwave 1,"se\ero_koki1.ogg"
if %nanido<2 damage 25,30
if %nanido=2 damage 27,32
if %nanido=3 damage 29,34
dwave 1,"se\ero_koki1.ogg"
if %nanido<2 damage 25,30
if %nanido=2 damage 27,32
if %nanido=3 damage 29,34
skillname ""
if %mylife=0 sub %stack,1:return *beelzebub_h11
sub %stack,1
return



*beelzebub_a12

add %stack,1
mov $tatie1,"beelzebub_st11"
mov $tatie2,"beelzebub_st12"
mov $tatie3,"beelzebub_st13"
mov $tatie4,"beelzebub_h11"
mov %monster_x,60
mov %monster_y,50
mov $tatie1b,"beelzebub_st01"
mov $tatie2b,"beelzebub_st02"
mov $tatie3b,"beelzebub_st03"
mov %monster_xb,-100
mov %monster_yb,-50
mov $tatie1c,"beelzebub_st21"
mov $tatie2c,"beelzebub_st22"
mov $tatie3c,"beelzebub_st23"
mov %monster_xc,150
mov %monster_yc,-50
mov %zmonster_x,-200
gosub *face1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll let you enjoy my chest..."
if %ransu=2 mov $sel1,"Indulge yourself in my breasts..."
if %ransu=3 mov $sel1,"My breasts can bring you ecstasy..."
name "Beelzebub B"
eng $sel1:$sel6\
name ""
skillname "Monster Fly Breast Squeeze"
dwave 1,"se\ero_koki1.ogg"
>Beelzebub B sandwiches Luka's penis between her breasts, and squeezes it!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,70
if %wind=2 && %nanido=2 mov %wind_kakuritu,60
if %wind=2 && %nanido=3 mov %wind_kakuritu,35
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3661
if %nanido<2 damage 90,110
if %nanido=2 damage 95,115
if %nanido=3 damage 100,120
if %status=0 mov $sel1,"Luka was put into a trance!"
if %status=1 mov $sel1,"Luka is in a trance..."
mov %status,1:gosub *status_print
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *beelzebub_h12
rnd2 %status_turn,1,2
if %nanido=2 rnd2 %status_turn,2,3
if %nanido=3 rnd2 %status_turn,3,4
sub %stack,1
return



*beelzebub_a13

add %stack,1
mov $tatie1,"beelzebub_st21"
mov $tatie2,"beelzebub_st22"
mov $tatie3,"beelzebub_st23"
mov $tatie4,"beelzebub_h21"
mov %monster_x,-70
mov %monster_y,50
mov $tatie1b,"beelzebub_st01"
mov $tatie2b,"beelzebub_st02"
mov $tatie3b,"beelzebub_st03"
mov %monster_xb,-100
mov %monster_yb,-50
mov $tatie1c,"beelzebub_st11"
mov $tatie2c,"beelzebub_st12"
mov $tatie3c,"beelzebub_st13"
mov %monster_xc,300
mov %monster_yc,-50
mov %zmonster_x,-370
gosub *face1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck out your energy..."
if %ransu=2 mov $sel1,"I'll suck everything out of you..."
if %ransu=3 mov $sel1,"You want to be sucked until you're left dry, don't you?"
name "Beelzebub C"
eng $sel1:$sel6\
name ""
skillname "Monster Fly Blowjob"
eng "Beelzebub C sucks on Luka's penis!":$sel6/
if %aqua>1 gosub *beelzebub_aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,40
if %wind=2 && %nanido=2 mov %wind_kakuritu,35
if %wind=2 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *beelzebub_wind_guard:sub %stack,1:return
\
skillcount2 3662
dwave 1,"se\ero_chupa6.ogg"
>Luka's energy is drained out of his penis into the Beelzebub!
if %nanido<2 damage 90,110
if %nanido=2 damage 95,115
if %nanido=3 damage 100,120
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *beelzebub_h13
if %kousan=2 sub %stack,1:return
mov $tatie1,"beelzebub_st01"
mov $tatie2,"beelzebub_st02"
mov $tatie3,"beelzebub_st03"
mov $tatie4,"beelzebub_h01"
mov %monster_x,100
mov %monster_y,50
mov $tatie1b,"beelzebub_st11"
mov $tatie2b,"beelzebub_st12"
mov $tatie3b,"beelzebub_st13"
mov %monster_xb,-150
mov %monster_yb,-50
mov $tatie1c,"beelzebub_st21"
mov $tatie2c,"beelzebub_st22"
mov $tatie3c,"beelzebub_st23"
mov %monster_xc,150
mov %monster_yc,-50
mov %zmonster_x,-180
gosub *face1
sub %stack,1
return



*beelzebub_aqua_guard

add %stack,1
wait 500
skillname "Serene Movement"
dwave 3,"se\miss_aqua.ogg"
mov $tatie1,"beelzebub_st01"
mov $tatie2,"beelzebub_st02"
mov $tatie3,"beelzebub_st03"
mov $tatie4,"beelzebub_h01"
mov %monster_x,100
mov %monster_y,50
mov $tatie1b,"beelzebub_st11"
mov $tatie2b,"beelzebub_st12"
mov $tatie3b,"beelzebub_st13"
mov %monster_xb,-150
mov %monster_yb,-50
mov $tatie1c,"beelzebub_st21"
mov $tatie2c,"beelzebub_st22"
mov $tatie3c,"beelzebub_st23"
mov %monster_xc,150
mov %monster_yc,-50
mov %zmonster_x,-180
gosub *face1
textclear
>But like water flowing around an obstacle, Luka evades it!\
skillname ""
sub %stack,1
return



*beelzebub_wind_guard

add %stack,1
wait 500
skillname "Wind Dance"
dwave 3,"se\miss.ogg"
mov $tatie1,"beelzebub_st01"
mov $tatie2,"beelzebub_st02"
mov $tatie3,"beelzebub_st03"
mov $tatie4,"beelzebub_h01"
mov %monster_x,100
mov %monster_y,50
mov $tatie1b,"beelzebub_st11"
mov $tatie2b,"beelzebub_st12"
mov $tatie3b,"beelzebub_st13"
mov %monster_xb,-150
mov %monster_yb,-50
mov $tatie1c,"beelzebub_st21"
mov $tatie2c,"beelzebub_st22"
mov $tatie3c,"beelzebub_st23"
mov %monster_xc,150
mov %monster_yc,-50
mov %zmonster_x,-180
gosub *face1
textclear
eng $sel1:$sel6\
skillname ""
sub %stack,1
return



*beelzebub_s1

add %stack,1
if %max_mylife>%mylife*5 mov %sel_hphalf,1:gosub *common_s2:sub %stack,1:return
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Guh..."
if %ransu=2 mov $sel1,"Urhg..."
if %ransu=3 mov $sel1,"Uhg..."
name "Luka"
eng $sel1:$sel6\
name ""
gosub *face2
name "Beelzebub A"
>It feels good, doesn't it?@
>Just surrender to the pleasure only we can give...\
name ""
name "Beelzebub B"
>We'll let you taste heaven if you surrender...\
name ""
gosub *face1
mov %sel_hphalf,1
sub %stack,1
return



*beelzebub_s2

add %stack,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ahh..."
if %ransu=2 mov $sel1,"Aaaaa..."
if %ransu=3 mov $sel1,"Haaa..."
name "Luka"
eng $sel1:$sel6\
name ""
gosub *face2
name "Beelzebub A"
>It looks like you're almost done...\
name ""
name "Beelzebub C"
>We'll make you into our breed slave...@
>You'll be able to taste the highest pleasure, every day...\
name ""
mov %sel_kiki,1
sub %stack,1
return



*beelzebub_onedari

mov $list1,"Flies of Purgatory"
if %3554>0 mov %list_num1,1
mov $list2,"Triple Breast Crush"
if %3555>0 mov %list_num2,1
mov $list3,"Monster Fly Suck"
if %3556>0 mov %list_num3,1
mov $list4,"Black Sabbath"
if %3557>0 mov %list_num4,1
mov $list5,"Monster Fly Handjob"
if %3603>0 mov %list_num5,1
mov $list6,"Monster Fly Breast Squeeze"
if %3661>0 mov %list_num6,1
mov $list7,"Monster Fly Blowjob"
if %3662>0 mov %list_num7,1
mov $list8,"Breast Jail"
if %3558>0 mov %list_num8,1
mov $list9,"Breast Prison"
if %3587>0 mov %list_num9,1
mov $list10,"Breast Confinement"
if %3588>0 mov %list_num10,1
gosub *cmd_onedari
if %cmd1=11 goto *beelzebub_onedari1
if %cmd1=12 goto *beelzebub_onedari2
if %cmd1=13 goto *beelzebub_onedari3
if %cmd1=14 goto *beelzebub_onedari4
if %cmd1=15 goto *beelzebub_onedari5
if %cmd1=16 goto *beelzebub_onedari6
if %cmd1=17 goto *beelzebub_onedari7
if %cmd1=18 goto *beelzebub_onedari8
if %cmd1=19 goto *beelzebub_onedari9
if %cmd1=20 goto *beelzebub_onedari10
if %cmd1=-1 goto *beelzebub_main
goto *beelzebub_onedari



*beelzebub_onedari1

gosub *onedari_syori
name "Beelzebub A"
>Hehe... You want our flies to make you come?\
name ""
gosub *beelzebub_a1
skip -1



*beelzebub_onedari2

gosub *onedari_syori
name "Beelzebub A"
>Hehe... You want to be crushed by our breasts?\
name ""
gosub *beelzebub_a2
skip -1



*beelzebub_onedari3

gosub *onedari_syori
name "Beelzebub A"
>Hehe... You want to be sucked on?\
name ""
gosub *beelzebub_a3
skip -1



*beelzebub_onedari4

gosub *onedari_syori
name "Beelzebub A"
>Hehe... You want us to use our hands?\
name ""
gosub *beelzebub_a4
skip -1



*beelzebub_onedari5

mov $tatie1,"beelzebub_st01"
mov $tatie2,"beelzebub_st02"
mov $tatie3,"beelzebub_st03"
mov $tatie4,"beelzebub_h01"
mov %monster_x,100
mov %monster_y,50
mov $tatie1b,"beelzebub_st11"
mov $tatie2b,"beelzebub_st12"
mov $tatie3b,"beelzebub_st13"
mov %monster_xb,-150
mov %monster_yb,-50
mov $tatie1c,"beelzebub_st21"
mov $tatie2c,"beelzebub_st22"
mov $tatie3c,"beelzebub_st23"
mov %monster_xc,150
mov %monster_yc,-50
gosub *onedari_syori
name "Beelzebub A"
>Hehe... You want me to use my hand?\
name ""
gosub *beelzebub_a11
skip -1



*beelzebub_onedari6

mov $tatie1,"beelzebub_st11"
mov $tatie2,"beelzebub_st12"
mov $tatie3,"beelzebub_st13"
mov $tatie4,"beelzebub_h11"
mov %monster_x,60
mov %monster_y,50
mov $tatie1b,"beelzebub_st01"
mov $tatie2b,"beelzebub_st02"
mov $tatie3b,"beelzebub_st03"
mov %monster_xb,-100
mov %monster_yb,-50
mov $tatie1c,"beelzebub_st21"
mov $tatie2c,"beelzebub_st22"
mov $tatie3c,"beelzebub_st23"
mov %monster_xc,150
mov %monster_yc,-50
gosub *onedari_syori
name "Beelzebub B"
>Hehe... You want me to use my breasts?\
name ""
gosub *beelzebub_a12
skip -1



*beelzebub_onedari7

mov $tatie1,"beelzebub_st21"
mov $tatie2,"beelzebub_st22"
mov $tatie3,"beelzebub_st23"
mov $tatie4,"beelzebub_h21"
mov %monster_x,-70
mov %monster_y,50
mov $tatie1b,"beelzebub_st01"
mov $tatie2b,"beelzebub_st02"
mov $tatie3b,"beelzebub_st03"
mov %monster_xb,-100
mov %monster_yb,-50
mov $tatie1c,"beelzebub_st11"
mov $tatie2c,"beelzebub_st12"
mov $tatie3c,"beelzebub_st13"
mov %monster_xc,300
mov %monster_yc,-50
gosub *onedari_syori
name "Beelzebub C"
>You want me to suck out your semen?\
name ""
gosub *beelzebub_a13
skip -1



*beelzebub_onedari8

mov $tatie1,"beelzebub_st01"
mov $tatie2,"beelzebub_st02"
mov $tatie3,"beelzebub_st03"
mov $tatie4,"beelzebub_h01"
mov %monster_x,100
mov %monster_y,50
mov $tatie1b,"beelzebub_st11"
mov $tatie2b,"beelzebub_st12"
mov $tatie3b,"beelzebub_st13"
mov %monster_xb,-150
mov %monster_yb,-50
mov $tatie1c,"beelzebub_st21"
mov $tatie2c,"beelzebub_st22"
mov $tatie3c,"beelzebub_st23"
mov %monster_xc,150
mov %monster_yc,-50
gosub *onedari_syori
name "Beelzebub A"
>You want me to embrace you and drown you in breasts?\
name ""
if %kousoku=0 gosub *beelzebub_a5
gosub *beelzebub_a6
skip -1



*beelzebub_onedari9

mov $tatie1,"beelzebub_st11"
mov $tatie2,"beelzebub_st12"
mov $tatie3,"beelzebub_st13"
mov $tatie4,"beelzebub_h11"
mov %monster_x,60
mov %monster_y,50
mov $tatie1b,"beelzebub_st01"
mov $tatie2b,"beelzebub_st02"
mov $tatie3b,"beelzebub_st03"
mov %monster_xb,-100
mov %monster_yb,-50
mov $tatie1c,"beelzebub_st21"
mov $tatie2c,"beelzebub_st22"
mov $tatie3c,"beelzebub_st23"
mov %monster_xc,150
mov %monster_yc,-50
gosub *onedari_syori
name "Beelzebub B"
>You want me to embrace you and drive you mad?\
name ""
if %kousoku=0 gosub *beelzebub_a7
gosub *beelzebub_a8
skip -1



*beelzebub_onedari10

mov $tatie1,"beelzebub_st21"
mov $tatie2,"beelzebub_st22"
mov $tatie3,"beelzebub_st23"
mov $tatie4,"beelzebub_h21"
mov %monster_x,-70
mov %monster_y,50
mov $tatie1b,"beelzebub_st01"
mov $tatie2b,"beelzebub_st02"
mov $tatie3b,"beelzebub_st03"
mov %monster_xb,-100
mov %monster_yb,-50
mov $tatie1c,"beelzebub_st11"
mov $tatie2c,"beelzebub_st12"
mov $tatie3c,"beelzebub_st13"
mov %monster_xc,300
mov %monster_yc,-50
gosub *onedari_syori
name "Beelzebub C"
>You want me to embrace you and suck out your semen?\
name ""
if %kousoku=0 gosub *beelzebub_a9
gosub *beelzebub_a10
skip -1



*beelzebub_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\beelzebub_bk04.bmp",100,50
lsp 701,":a;chara\beelzebub_bk14.bmp",-150,-50
lsp 703,":a;chara\beelzebub_bk24.bmp",150,-50
gosub *syasei2
>As the tiny flies cover and buzz on his penis, Luka comes, spraying semen into the air.\
mov %viclose,1:gosub *lose
mov %2624,%2624+1:if %2624=1 mov %count_koenemy,%count_koenemy+1
if %2624>%count_most mov %count_most,%2624:mov $count_mostname,$name
count 32,7
mov $bad1,"The tiny flies forced Luka to come."
gosub *face2
name "Beelzebub A"
>He let out quite a lot, didn't he? Hehe.\
name ""
name "Beelzebub C"
>You seem to have enjoyed the flies...\
name ""
goto *beelzebub_h



*beelzebub_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\beelzebub_bk02.bmp",100,50
lsp 701,":a;chara\beelzebub_bk12.bmp",-150,-50
lsp 703,":a;chara\beelzebub_bk22.bmp",150,-50
gosub *syasei2
>As breasts press into his penis from every direction, Luka comes, covering the Beelzebub Girls with semen.\
mov %viclose,1:gosub *lose
mov %2624,%2624+1:if %2624=1 mov %count_koenemy,%count_koenemy+1
if %2624>%count_most mov %count_most,%2624:mov $count_mostname,$name
count 7,7
mov $bad1,"Luka was forced to an orgasm as the three Beelzebub Girls' breasts squeezed his penis."
gosub *face2
name "Beelzebub A"
>He let out quite a lot, didn't it? Hehe.\
name ""
name "Beelzebub B"
>It looks like you enjoyed our breasts...\
name ""
goto *beelzebub_h



*beelzebub_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\beelzebub_bk01.bmp",100,50
lsp 701,":a;chara\beelzebub_bk11.bmp",-150,-50
lsp 703,":a;chara\beelzebub_bk21.bmp",150,-50
gosub *syasei2
>As the three Beelzebub Girls eagerly suck on Luka's penis in turns, he comes, covering their faces in semen.\
mov %viclose,1:gosub *lose
mov %2624,%2624+1:if %2624=1 mov %count_koenemy,%count_koenemy+1
if %2624>%count_most mov %count_most,%2624:mov $count_mostname,$name
count 4,7
mov $bad1,"Luka was forced to an orgasm as the three Beelzebub Girls sucked on him."
gosub *face2
name "Beelzebub A"
>He let out quite a lot, didn't it? Hehe.\
name ""
name "Beelzebub C"
>That's the wrong hole to put your semen, boy...\
name ""
goto *beelzebub_h



*beelzebub_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\beelzebub_bk03.bmp",100,50
lsp 701,":a;chara\beelzebub_bk13.bmp",-150,-50
lsp 703,":a;chara\beelzebub_bk23.bmp",150,-50
gosub *syasei2
>As their hands run all over his body, Luka comes, covering the Beelzebub Girls in semen.\
mov %viclose,1:gosub *lose
mov %2624,%2624+1:if %2624=1 mov %count_koenemy,%count_koenemy+1
if %2624>%count_most mov %count_most,%2624:mov $count_mostname,$name
count 5,7
mov $bad1,"Luka was forced to an orgasm as the three Beelzebub Girls played with his body."
gosub *face2
name "Beelzebub A"
>He let out quite a lot, didn't it? Hehe.\
name ""
name "Beelzebub B"
>Were our hands too much for you?\
name ""
goto *beelzebub_h



*beelzebub_h5

mov %ikigoe,3:gosub *ikigoe
name "Beelzebub A"
>Oh, already?\
name ""
gosub *syasei1
lsp 700,":a;chara\beelzebub_h02.bmp",100,50
gosub *syasei2
>As Beelzebub A's breast covered abdomen wraps around him, Luka comes, spraying semen all over her breasts.\
mov %viclose,1:gosub *lose
mov %2624,%2624+1:if %2624=1 mov %count_koenemy,%count_koenemy+1
if %2624>%count_most mov %count_most,%2624:mov $count_mostname,$name
count 7,7
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to an orgasm as Beelzebub A's breasts wrapped around him."
gosub *face2
name "Beelzebub A"
>You have no endurance at all... How pathetic.\
name ""
name "Beelzebub B"
>And just look at how much he sprayed all over...\
name ""
goto *beelzebub_h



*beelzebub_h6

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\beelzebub_h02.bmp",100,50
gosub *syasei2
>As Luka drowns in her breasts, he comes, spraying semen all over her.\
mov %viclose,1:gosub *lose
mov %2624,%2624+1:if %2624=1 mov %count_koenemy,%count_koenemy+1
if %2624>%count_most mov %count_most,%2624:mov $count_mostname,$name
count 7,7
mov $bad1,"Luka was forced to an orgasm as her drowned in Beelzebub A's breasts."
gosub *face2
name "Beelzebub A"
>He let out quite a lot, didn't it? Hehe.\
name ""
name "Beelzebub C"
>The face you made as you came was priceless.\
name ""
goto *beelzebub_h



*beelzebub_h7

mov %ikigoe,3:gosub *ikigoe
name "Beelzebub B"
>Oh my, you really couldn't be...?\
name ""
gosub *syasei1
lsp 700,":a;chara\beelzebub_h12.bmp",60,50
gosub *syasei2
>As Beelzebub B's breast covered abdomen wraps around him, Luka comes, spraying semen all over her breasts.\
mov %viclose,1:gosub *lose
mov %2624,%2624+1:if %2624=1 mov %count_koenemy,%count_koenemy+1
if %2624>%count_most mov %count_most,%2624:mov $count_mostname,$name
count 7,7
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to an orgasm as Beelzebub B's breasts wrapped around him."
gosub *face2
name "Beelzebub B"
>Coming just as I embrace you... How pitiful.\
name ""
name "Beelzebub A"
>It looks like humans have gotten even more pathetic over the years!\
name ""
goto *beelzebub_h



*beelzebub_h8

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\beelzebub_h12.bmp",60,50
gosub *syasei2
>As Luka drowns in her breasts, he comes, spraying semen all over her.\
mov %viclose,1:gosub *lose
mov %2624,%2624+1:if %2624=1 mov %count_koenemy,%count_koenemy+1
if %2624>%count_most mov %count_most,%2624:mov $count_mostname,$name
count 7,7
mov $bad1,"Luka was forced to an orgasm as her drowned in Beelzebub B's breasts."
gosub *face2
name "Beelzebub B"
>Well?@>How did it feel melting away in my breasts?\
name ""
name "Beelzebub C"
>What a face...@
>That expression as he came... I loved it.\
name ""
goto *beelzebub_h



*beelzebub_h9

mov %ikigoe,3:gosub *ikigoe
name "Beelzebub C"
>Already...?\
name ""
gosub *syasei1
lsp 700,":a;chara\beelzebub_h22.bmp",-70,50
gosub *syasei2
>As Beelzebub C's breast covered abdomen wraps around him, Luka comes, spraying semen all over her breasts.\
mov %viclose,1:gosub *lose
mov %2624,%2624+1:if %2624=1 mov %count_koenemy,%count_koenemy+1
if %2624>%count_most mov %count_most,%2624:mov $count_mostname,$name
count 7,7
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to an orgasm as Beelzebub C's breasts wrapped around him."
gosub *face2
name "Beelzebub C"
>How pathetic, I was only embracing you...\
name ""
name "Beelzebub A"
>What a pitiful man, hehe.\
name ""
goto *beelzebub_h



*beelzebub_h10

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\beelzebub_h22.bmp",-70,50
gosub *syasei2
>As Luka drowns in Beelzebub C's breasts and has his energy sucked out, he comes, covering her in semen.\
mov %viclose,1:gosub *lose
mov %2624,%2624+1:if %2624=1 mov %count_koenemy,%count_koenemy+1
if %2624>%count_most mov %count_most,%2624:mov $count_mostname,$name
count 7,7
mov $bad1,"Luka was forced to an orgasm as her drowned in Beelzebub C's breasts."
gosub *face2
name "Beelzebub C"
>It felt good having your energy sucked, didn't it?@
>If you enjoyed it, shall I continue...?\
name ""
name "Beelzebub B"
>Hehe... But before that, we have to make lots of children...\
name ""
goto *beelzebub_h



*beelzebub_h11

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\beelzebub_bk03.bmp",100,50
gosub *syasei2
>As Beelzebub A's fingers run all over his body, Luka comes, covering her in semen.\
mov %viclose,1:gosub *lose
mov %2624,%2624+1:if %2624=1 mov %count_koenemy,%count_koenemy+1
if %2624>%count_most mov %count_most,%2624:mov $count_mostname,$name
count 5,7
mov $bad1,"Luka was forced to an orgasm as Beelzebub A caressed his body."
gosub *face2
name "Beelzebub A"
>Hehe... It looks like you enjoyed my caress.\
name ""
goto *beelzebub_h



*beelzebub_h12

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\beelzebub_bk12.bmp",60,50
gosub *syasei2
>As Beelzebub B's breasts squeeze Luka's penis, he comes, covering her chest in semen.\
mov %viclose,1:gosub *lose
mov %2624,%2624+1:if %2624=1 mov %count_koenemy,%count_koenemy+1
if %2624>%count_most mov %count_most,%2624:mov $count_mostname,$name
count 7,7
mov $bad1,"Luka was forced to an orgasm as Beelzebub B's breasts squeezed him."
gosub *face2
name "Beelzebub B"
>Oh my... You covered my chest...\
name ""
goto *beelzebub_h



*beelzebub_h13

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\beelzebub_bk21.bmp",-70,50
gosub *syasei2
>As Beelzebub C eagerly sucks on Luka's penis, he comes, covering her face in semen.\
mov %viclose,1:gosub *lose
mov %2624,%2624+1:if %2624=1 mov %count_koenemy,%count_koenemy+1
if %2624>%count_most mov %count_most,%2624:mov $count_mostname,$name
count 4,7
mov $bad1,"Luka was forced to an orgasm as Beelzebub C sucked on him."
gosub *face2
name "Beelzebub C"
>I sucked it out with my mouth... Are you satisfied now?\
name ""
goto *beelzebub_h



*beelzebub_h

mov %monster_y,0
mov $bad2,"Captured by the Beelzebubs, Luka became their group breeding tool."
if %2624=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
>Completely exhausted, I fall to the ground.\
cspl 690,704
lsp 700,":a;chara\beelzebub_h31.bmp",0,0:print 10,500
>In the next moment, she picks me up and places me on top of her breast covered abdomen.\
>Too weak to resist, I'm easily held down by her.\
name "Beelzebub A"
>Let's start breeding right away...@
>It will be fun for you.\
name ""
name "Luka"
>Ahhh...\
name ""
>She moves my erect penis close to the hole in her abdomen...@
mov %hseanwave,12:hseanwave
>And easily slips my penis into her wet hole!\
name "Luka"
>Ahhhh!!\
name ""
>Chills run through my body as I'm inserted into her.@
>The tip of my penis slowly pushes into her flesh, rubbing against tiny little warts.\
>Each tiny wart moves and rubs against me as I'm being forced inside of her, causing me to grip tighter to her abdomen in surprise at the sudden stimulation.\
>The horror of mating with an insect monster is quickly shoved aside at the surprise of how good it feels.\
name "Luka"
>Ahhh... It's moving inside...\
name ""
name "Beelzebub A"
>It feels good mating with a Monster Fly, doesn't it?@
>Why don't you just relax and leave everything to me?\
>Just come inside me, and we can begin to build our army of daughters...\
name ""
>The tiny warts inside of her gently rub against me, encouraging me to come just as her words do.\
>The immorality of mating with something so ugly and inhuman brings a strange, sick sort of pleasure to the whole situation.\
name "Luka"
>Ah...Ahh!\
name ""
name "Beelzebub A"
>Hehe... There's no need to deny it when it feels this good, right?@
>Just start thrusting that waist of yours, and enjoy it...\
>Come on... Release as much semen in me as you want.@
>Indulge yourself in the joy of breeding...\
name ""
name "Luka"
>Ahhh...\
name ""
>Just as she suggested, I start to thrust in and out of her.@
>The pleasure I felt just from insertion is suddenly magnified as I pull in and out of her.\
name "Beelzebub B"
>Oh my, he's already drunk on the pleasure...\
name ""
name "Beelzebub C"
>How pitiful...@
>To be so willing to be a mere stud...\
name ""
>The other two Beelzebubs laugh at me.@
>But I don't stop... I keep slowly thrusting in and out of her even as I feel humiliated.\
>I sigh in pleasure as the tip of my penis forces itself into her, rubbing against the tiny little warts all the way in.\
>As I pull out of her, the tiny warts pull on the tip of my penis, almost making it feel like my penis is stretching and striving to stay inside her.\
name "Luka"
>Am...Amazing...\
name ""
name "Beelzebub A"
>Hehe... That's right...@
>Why don't you try thrusting a little faster...?\
name ""
>Almost as if her words are magical, they soothe my mind and make me start to pump even harder into her.@
>Tears of shame fill my eyes as I thrust even harder in and out of her, awash in ecstasy.\
>Suddenly, I feel a tingle down my back as my penis starts to throb.\
name "Luka"
>Ahh... I'm going to come...!\
name ""
>I stop moving and almost plead to her for some reason.@
>Wrapped inside her soft hole, I could explode and impregnate her any moment...\
name "Beelzebub A"
>Oh... Already?@> How pitiful...\
>I'll do the finishing blow for you...@
>You just need to act like a good stud, and give me a lot of semen...\
name ""
name "Luka"
>Ahhhh!!\
name ""
>In the next instant, the tiny warts inside of her press tightly against my penis, and start to quickly rub and massage me.@
>My head goes blank as the overpowering stimulation instantly blows away any thought I could have had about enduring the orgasm.\
gosub *syasei1
lsp 700,":a;chara\beelzebub_h32.bmp",0,0
gosub *syasei2
>Then in the next instant, I explode inside of her.@
>My semen shoots right into the horrifying monster's reproductive organ...\
name "Luka"
>Ahh...\
name ""
>I shiver in bliss, then relax, slowly sinking into her soft abdomen.\
name "Beelzebub A"
>Hehe... That does it for the fertilization.@
>Your genes are surely quite high quality...\
>We need to have every egg fertilized, so you'll have to keep acting as the stud...@
>But I'll begin to lay my eggs at the same time.\
name ""
name "Luka"
>Eh...?@> Ahh!\
name ""
lsp 700,":a;chara\beelzebub_h33.bmp",0,0:print 10,500
>Suddenly, I feel something force itself into my ass.@
>It seems like the tip of her abdomen was just pushed inside of me...\
name "Beelzebub A"
>I'll send all of the fertilized eggs into you to be incubated.@
>Once they hatch, all of our energetic little daughters will crawl right out...\
>Every part of your body will be used as a breeding tool.@
>You should feel honored... Hehehe.\
name ""
name "Luka"
>N...No... Ahhh!\
name ""
lsp 700,":a;chara\beelzebub_h34.bmp",0,0:print 10,500
>I feel a warm, sticky liquid being pumped into me... The eggs she was just talking about...\
name "Beelzebub B"
>Hehe... The face of men when eggs are pumped into their ass...@
>I don't think there's anything more amusing in the world.\
name ""
name "Beelzebub C"
>Does it feel good having eggs pumped into your ass?@
>Human men are the worst...\
name ""
>The other Beelzebubs laugh at me as she continues pumping eggs into me.@
>The worst part of it all is the horrifying fact that small spikes of pleasure are racing through me as they pump inside me.\
name "Luka"
>S...Stop it... Ahhh!\
name ""
name "Beelzebub A"
>Do you really realize that you're being filled with eggs?@
>You're going to be our daughters nursery... Hehe.\
name ""
>My face goes bright red in shame as the eggs continue to pump inside of me.@
>It's almost as if I'm a woman, being raped and forced to become pregnant...\
>But at the same time, my penis is stuck inside of her, fertilizing those same eggs that are being pumped back into me.\
>It's like I'm being raped as both a man and a girl at the same time... My pride as a human shredded and stepped on.\
>Raped as both a man and a woman might be, every possible sexual humiliation at once...\
name "Beelzebub A"
>Your ass is quite small...@
>If we don't make it a little wider, the eggs will never fit...\
name ""
>The tip of her abdomen filling me with eggs suddenly starts to move around inside me.@
>Pushing in a little deeper, I feel it push right against my prostate, sending a sudden spark of pleasure racing through me.\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>I explode inside of her again, my semen fertilizing even more eggs inside of her to be pumped back into me...\
name "Luka"
>Ahh...\
name ""
name "Beelzebub A"
>Oh my, I'm sorry... It seems as though I stimulated your prostate.@
>Well, I guess it's fine... You were able to fertilize some more eggs after all.\
name ""
>She giggles as she continues to push against my prostate, all while filling me with even more sticky eggs.\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>My body shakes in forced pleasure as more semen shoots into her reproductive organ.\
name "Luka"
>S...Stop already...\
name ""
name "Beelzebub A"
>Absolutely not... We have to create a large army capable of taking over the world.@
>You're going to have to work very hard, stud...\
name ""
name "Luka"
>Ahhhh!\
name ""
>She continues filling me with eggs as she stimulates me from both the front and the back.\
>Almost glued against her abdomen, I can't escape anywhere.\
name "Luka"
>Ah...Ahhh...!\
name ""
gosub *syasei1:gosub *syasei2
>I shiver as I come inside her again.@
>Every ejaculation just fertilizes more eggs to be pumped into me...\
name "Beelzebub A"
>You only live to breed with us now.@
>It's the ultimate honor for a male...\
>Now come on, fertilize me more...@
>We need to create thousands of daughters...\
name ""
name "Luka"
>Ahhh....\
name ""
gosub *syasei1:gosub *syasei2
>This horrible cycle continues on...\
>She forces me to come and fertilize her...@
>She then pumps the fertilized eggs back into me to incubate...\
>All of my dignity as a living being is stripped away, and I'm reduced to this wretched existence.\
name "Beelzebub A"
>Come on... More seed... More daughters...\
name ""
name "Luka"
>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
gosub *anten
mov %hseanwave,0:hseanwave
>Thus, I'm kept as a reproductive slave for the Beelzebubs.@
>Forced to create an army of daughters, they bring a calamity to the world.\
>But it doesn't concern me... I'm still stuck here, forced to create more daughters...\
>........................\
goto *badend



*trickfairy_start

mov $name,"Trick Fairy"
mov $name2,"Trick Fairy"
mov $lavel,"trickfairy"
mov $tatie1,"trickfairy_st01"
mov $tatie2,"trickfairy_st02"
mov $tatie3,"trickfairy_st03"
mov $tatie4,"trickfairy_st02"
mov $haikei,"bg135"
mov %monster_x,142
mov %monster_y,0
if %nanido=1 mov %max_enemylife,4400
if %nanido=2 mov %max_enemylife,5000
if %nanido=3 mov %max_enemylife,6600
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,50
mov %earth_keigen,20
if %nanido=3 mov %earth_keigen,10
mov %music,1
mov %tikei,2
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $half_s1,"Ehehe... Does it feel nice?"
mov $half_s2,"I want to see the white stuff now! "
mov $kiki_s1,"Ehehe, almost done?"
mov $kiki_s2,"The white stuff is about to shoot out! "
mov %end_n,8
mov %exp_minus,0
mov %zmonster_x,-130
mov %tukix,320
name $name
>Ehehe... It's just like the Queen said!@
>A Hero came to save the princess! \
name ""
name "Luka"
>You seem to already know why I'm here.@
>Please return the princess...\
name ""
name $name
>Noooo waay. @
>That princess is going to become our friend! \
name ""
name "Luka"
>Your friend...?@>What do you mean...?\
name ""
>I stare at the small Fairy in confusion.\
gosub *face2
name $name
>And then you, you know... You're going to be...@
>My new toy! \
>I'm a reeeeaally strong Fairy you know!\
>I can make a human boy like you into a toy really easily! \
name ""
>I do feel a lot of power coming from this small Fairy...@
>She must be the assistant to the Queen class Elf...\
>I can't be careless here...\
name $name
>Ahaha, ok, here I coooome! \
name ""
gosub *face1
goto *common_main



*trickfairy_v

gosub *face3
name $name
>Nooo!\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Trick Fairy is sealed into the form of a butterfly!\
mov %viclose,1:gosub *victory
mov %getexp,40000:gosub *lvup
mov %2325,1
goto *sean0268



*trickfairy_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>Oh, already giving up?@
>Then it's time to play! \
name ""
goto *trickfairy_a



*trickfairy_main

gosub *cmd_main
if %cmd1=11 goto *common_attack
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *trickfairy_kousan
if %cmd1=16 goto *trickfairy_onedari
if %cmd1=17 goto *common_skill
goto *trickfairy_main



*trickfairy_a

rnd2 %ransu,1,4
if %ransu=1 gosub *trickfairy_a1:goto *common_main
if %ransu=2 gosub *trickfairy_a2:goto *common_main
if %ransu=3 gosub *trickfairy_a3:goto *common_main
if %ransu=4 gosub *trickfairy_a4:goto *common_main
skip -5



*trickfairy_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Let me rub it! "
if %ransu=2 mov $sel1,"All I have to do is rub it to make the white stuff come out, right?"
if %ransu=3 mov $sel1,"I'm gonna touch it! "
name $name
eng $sel1:$sel6\
name ""
skillname "Trick Hand"
dwave 1,"se\ero_koki1.ogg"
>The Trick Fairy grabs Luka's penis with her tiny hands, and eagerly strokes him!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,10
if %wind=2 && %nanido=2 mov %wind_kakuritu,7
if %wind=2 && %nanido=3 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3559
if %nanido<2 damage 100,120
if %nanido=2 damage 120,140
if %nanido=3 damage 140,160
skillname ""
if %mylife=0 sub %stack,1:return *trickfairy_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*trickfairy_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll use my whoooole chest! "
if %ransu=2 mov $sel1,"My breasts feel soft, don't they?"
if %ransu=3 mov $sel1,"I'll use my breasts to play with your penis. "
name $name
eng $sel1:$sel6\
name ""
skillname "Trick Chest"
dwave 1,"se\ero_koki1.ogg"
>The Trick Fairy grabs onto Luka's penis, and moves her entire body up and down!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,10
if %wind=2 && %nanido=2 mov %wind_kakuritu,7
if %wind=2 && %nanido=3 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3560
if %nanido<2 damage 110,130
if %nanido=2 damage 130,150
if %nanido=3 damage 150,170
skillname ""
if %mylife=0 sub %stack,1:return *trickfairy_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*trickfairy_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'm gonna lick it! "
if %ransu=2 mov $sel1,"I want to see what it tastes like! "
if %ransu=3 mov $sel1,"I'm gonna lick the tip of it! "
name $name
eng $sel1:$sel6\
name ""
skillname "Trick Mouth"
dwave 1,"se\ero_pyu1.ogg"
>The Trick Fairy sticks her face in Luka's groin, and licks Luka's penis!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,10
if %wind=2 && %nanido=2 mov %wind_kakuritu,7
if %wind=2 && %nanido=3 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3561
if %nanido<2 damage 120,140
if %nanido=2 damage 140,160
if %nanido=3 damage 160,180
skillname ""
if %mylife=0 sub %stack,1:return *trickfairy_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*trickfairy_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll press my butt into it! "
if %ransu=2 mov $sel1,"I wanna see if my butt can make the white stuff come out! "
if %ransu=3 mov $sel1,"Ehehe... My mommy said this was the wrong end. "
name $name
eng $sel1:$sel6\
name ""
skillname "Soft Butt"
dwave 1,"se\ero_koki1.ogg"
>The Trick Fairy presses her small, soft butt into Luka's penis!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,10
if %wind=2 && %nanido=2 mov %wind_kakuritu,7
if %wind=2 && %nanido=3 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3562
if %nanido<2 damage 130,150
if %nanido=2 damage 150,170
if %nanido=3 damage 170,190
skillname ""
if %mylife=0 sub %stack,1:return *trickfairy_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*trickfairy_onedari

mov $list1,"Trick Hand"
if %3559>0 mov %list_num1,1
mov $list2,"Trick Chest"
if %3560>0 mov %list_num2,1
mov $list3,"Trick Mouth"
if %3561>0 mov %list_num3,1
mov $list4,"Soft Butt"
if %3562>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *trickfairy_onedari1
if %cmd1=12 goto *trickfairy_onedari2
if %cmd1=13 goto *trickfairy_onedari3
if %cmd1=14 goto *trickfairy_onedari4
if %cmd1=-1 goto *trickfairy_main
goto *trickfairy_onedari



*trickfairy_onedari1

gosub *onedari_syori
name $name
>You want to play with my hand?\
name ""
gosub *trickfairy_a1
skip -1



*trickfairy_onedari2

gosub *onedari_syori
name $name
>You want to play with my chest?\
name ""
gosub *trickfairy_a2
skip -1



*trickfairy_onedari3

gosub *onedari_syori
name $name
>You want me to lick you?\
name ""
gosub *trickfairy_a3
skip -1



*trickfairy_onedari4

gosub *onedari_syori
name $name
>You want to feel my butt?\
name ""
gosub *trickfairy_a4
skip -1



*trickfairy_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\trickfairy_bk03.bmp",142,0
gosub *syasei2
>As her tiny little hands grab Luka's penis, he comes, covering her hands in semen.\
mov %viclose,1:gosub *lose
mov %2625,%2625+1:if %2625=1 mov %count_koenemy,%count_koenemy+1
if %2625>%count_most mov %count_most,%2625:mov $count_mostname,$name
count 5,5
mov $bad1,"The Trick Fairy forced Luka to come as she stroked him with her tiny hands."
gosub *face2
name $name
>Ahaha, it shot out! @
>My hands are all sticky now! \
name ""
goto *trickfairy_h



*trickfairy_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\trickfairy_bk02.bmp",142,0
gosub *syasei2
>As the Trick Fairy rubbed her breasts against Luka's penis, he comes, covering her with semen.
mov %viclose,1:gosub *lose
mov %2625,%2625+1:if %2625=1 mov %count_koenemy,%count_koenemy+1
if %2625>%count_most mov %count_most,%2625:mov $count_mostname,$name
count 7,5
mov $bad1,"The Trick Fairy's small breasts rubbing against Luka's penis forced him to come."
gosub *face2
name $name
>Ahaha, it shot out! @
>My breasts are all sticky now! \
name ""
goto *trickfairy_h



*trickfairy_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\trickfairy_bk01.bmp",142,0
gosub *syasei2
>As the Trick Fairy's small tongue licks the tip of Luka's penis, he comes, covering her face in semen.\
mov %viclose,1:gosub *lose
mov %2625,%2625+1:if %2625=1 mov %count_koenemy,%count_koenemy+1
if %2625>%count_most mov %count_most,%2625:mov $count_mostname,$name
count 4,5
mov $bad1,"The Trick Fairy's small tongue forced Luka to come."
gosub *face2
name $name
>Ahaha, it shot out! @
>My mouth is all sticky now! \
name ""
goto *trickfairy_h



*trickfairy_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\trickfairy_bk04.bmp",142,0
gosub *syasei2
>As the Trick Fairy presses her soft, tiny butt into Luka's penis, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2625,%2625+1:if %2625=1 mov %count_koenemy,%count_koenemy+1
if %2625>%count_most mov %count_most,%2625:mov $count_mostname,$name
count 34,5
mov $bad1,"The Trick Fairy's soft butt forced Luka to come."
gosub *face2
name $name
>Ahaha, it shot out! @
>My butt is all sticky now! \
name ""
goto *trickfairy_h



*trickfairy_h

mov $bad2,"Turned into her toy, the Trick Fairy kept on playing with Luka for the rest of his life."
if %2625=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
>I fall to the ground in exhaustion as the Trick Fairy flies around me, giggling.\
name $name
>Hey, hey, have sex with me!@
>I've always wanted to try having sex with a human! \
name ""
name "Luka"
>N...No... We can't...!\
name ""
>I'm a giant compared to her.@
>That isn't even physically possible.\
name $name
>Even if you don't want to, I'm going to make you do it anyway! @
>Here I cooome! \
name ""
>The Trick Fairy presses against my penis, and slowly starts to push toward me.@
>I helplessly watch my penis spread open her tiny hole, sinking into her tiny body inch by inch.\
name "Luka"
>Ahhh...\
name ""
mov %hseanwave,1:hseanwave
cspl 690,699
lsp 700,":a;chara\trickfairy_h1.bmp",0,0:print 10,500
name $name
>Nnnn... I...It went in... \
name ""
>After a few moments, my penis is completely inside her.@
>Way too big for her tiny body, I see the tip of my penis poking out of her stomach.\
>Her vagina is way too small.@
>I feel her entire body tightly squeezing my penis, firmly stuck inside her tiny body.\
>Almost like being tightly held by a huge hand, I tremble from the sensations.\
name "Luka"
>Ahh...!@>We...We can't do this...!\
name ""
name $name
>S...So this is sex...@
>My stomach feels so full, and it kind of tingles a bit... But it feels so good! \
>Hey, try moving a little bit...@
>I want to feel your penis grinding against my body. \
name ""
name "Luka"
>Th...That's impossible...\
name ""
>Her vagina is too tight for me to move.\
>Every time she breathes, her entire body clamps down hard against my penis... I don't think I could even pull her off of me even if I wasn't already exhausted.\
name $name
>If you won't do it, then I will! @
>Hehe, lets try it! \
name ""
>While gasping, the Trick Fairy slowly starts to move up and down.@
>Every small movement pushes and pulls on my penis, still stuck inside her tiny vagina.\
>Her wet juices barely lubricate me enough to move around inside her.\
>Her soft, tight vaginal walls squeeze my penis the entire time, sending sparks of ecstasy through me from even the tiniest of her movements.\
name "Luka"
>Ah...!@> Ahhhh!!\
name ""
name $name
>Ahaha, does it feel good for you too?@
>I've never felt anything this good before! \
name ""
>The Trick Fairy happily wiggles her tiny body around on my penis, her wings excitedly flapping behind her.\
>I can feel the muscles controlling her wings through her small body, making it feel like a tiny little hand inside of her is rubbing me with every flap of her wings.\
>Every part of this little Fairy's body is pressing around my penis, easily controlling me with pleasure even though she's so much smaller.\
name $name
>Hey, can you come inside me soon...?@
>I've always wanted to feel an ejaculation inside me... \
name ""
name "Luka"
>N...No... I can't do that...\
name ""
name $name
>I'll make you do it, even if you don't want to! @
>Nnn... Nnnnn! \
name ""
>The Trick Fairy suddenly stops moving, and starts clenching her muscles.@
>Her small little frame suddenly tenses up, drastically clenching down on my penis inside her.\
name "Luka"
>Ahhhh!!\
name ""
>Her already tiny vagina gets even smaller, seemingly crushing my penis inside her.@
>With her body so tight around me, even feeling the beat of her heart sends pleasure racing down my spine.\
>After only a few moments of her squeezing me like that, I feel an orgasm about to flow through me.\
name "Luka"
>N...No... Stop...\
name ""
name $name
>I won't stop until you come...@
>So just come inside me! \
name ""
>The Trick Fairy giggles, sending vibrations through my penis.@
>My head goes blank as the attack of pleasure from every corner of her body overpowers me.\
name "Luka"
>Ahh... No more...\
name ""
>I let my waist relax as I give myself over to the pleasure, exploding inside her tiny body.\
gosub *syasei1
lsp 700,":a;chara\trickfairy_h2.bmp",0,0
gosub *syasei2
>My semen bursts into her tiny body, quickly filling up her vagina and spilling outside.\
name "Luka"
>Ahh...\
name ""
>I came inside this tiny little Fairy...@
>Even worse, she forced me to do it against my will...\
name $name
>Y...You came...@
>That felt so good... \
name ""
>The Trick Fairy goes silent for a moment as she's overcome by her own pleasure.@
>Her tiny body shivers every so often, as her breathing gets a little ragged.\
>Just the feeling of her small breaths through her tight body feel too good for me to hold back my voice.\
name "Luka"
>Ahhh...\
name ""
>I try to pull out of her as she's in a daze, but she's clamped down too tight.@
>Almost as if I'm stuck inside of her, there's no way to get her off me.\
name $name
>Hey, hey... I want to feel that again...@
>It felt so good when your penis twitched like that...\
name ""
mov %hseanwave,4:hseanwave
>Still heavily breathing, the Trick Fairy starts to move her body again.@
>Up and down and side to side, she slowly moves around, half drunk on her own pleasure.\
>My penis rubs against her vaginal walls, still tightly clamping down around me.\
name "Luka"
>Ahhh...\
name ""
name $name
>Aha... Shake... Shake...@
>When it rubs against my insides... It feels so good...\
name ""
>Absorbed in her own pleasure, the Trick Fairy talks to herself as she moves however she wants.\
>This tiny Fairy is just treating me like a toy for her own pleasure...@
>As the humiliation and pleasure compete in my brain, I feel another orgasm about to be forced out of me.\
name "Luka"
>Ahh... Again... I'm going to come...\
name ""
name $name
>It's going to twitch again...?@
>Good... Let me feel it again...! \
name ""
>Excited, the Trick Fairy starts to move even faster, forcing me in and out of her tiny vagina as her breathing gets even heavier.\
gosub *syasei1
lsp 700,":a;chara\trickfairy_h3.bmp",0,0
gosub *syasei2
name "Luka"
>Ahh...\
name ""
>I explode inside her again, most of it spilling out of her since her body is too small to take it all.\
name $name
>Ahh... It feels so good when it explodes inside me...@
>His penis twitches and gets bigger, then the warm liquid stretches my stomach...\
name ""
>The Trick Fairy talks to herself in a daze as she just rests with me inside her.\
name "Luka"
>Ahh...\
name ""
>She's so tight around me, I can't get out of her.\
>It's almost as if her tiny vagina became shackles, chaining her to me and preventing me from ever escaping from the pleasure.\
name $name
>More... I want to feel more...\
name ""
>After regaining her breath, the Fairy drools as her lust takes her over again.\
>Shifting and wriggling her tiny body around, she forces my penis to move all around inside her.\
name $name
>More, more... @
>Come... Explode...! \
name ""
name "Luka"
>Ahhhh!\
name ""
>Her soft body clamps around my penis as she barely manages to force me in and out of her.@
>She lets out a happy giggle as my penis starts to twitch inside her, ready to come again.\
gosub *syasei1
lsp 700,":a;chara\trickfairy_h4.bmp",0,0
gosub *syasei2
>Her stomach swells even further out as I explode in her tiny body, my semen filling her.\
name $name
>Ehehe... So... Good...\
name ""
>Drool drips from her blissful looking face as she turns her head around to look at me.\
name $name
>You're my toy now...@
>I'll keep you forever...\
name ""
name "Luka"
>N...No way...\
name ""
name $name
>Bad boy, no complaining! \
name ""
name "Luka"
>Ah!@>Ahhh!\
name ""
>She scolds me like I'm a pet, then squeezes down on me, forcing me to a quick ejaculation.\
gosub *syasei1:gosub *syasei2
gosub *anten
mov %hseanwave,0:hseanwave
>Thus, I'm kept as a pet to satisfy her lust.@
>She forces me into her tiny vagina every day, and has sex with me until she's exhausted.\
>I slowly lose my sanity as I drown in the pleasure from having sex with the Trick Fairy.@
>My adventure ends on this island...\
>..............\
goto *badend



*queenfairy_start

mov $name,"Queen Fairy"
mov $name2,"Queen Fairy"
mov $lavel,"queenfairy"
mov $tatie1,"queenfairy_st01"
mov $tatie2,"queenfairy_st02"
mov $tatie3,"queenfairy_st03"
mov $tatie4,"queenfairy_st02"
mov $haikei,"bg136"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,9500
if %nanido=2 mov %max_enemylife,10500
if %nanido=3 mov %max_enemylife,14250
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,75
mov %earth_keigen,20
if %nanido=3 mov %earth_keigen,10
mov %music,2
mov %tikei,2
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_dassyutu1,"Hehe, there's no point in running."
mov $mogaku_dassyutu2,"You'll never escape the anger of the forest..."
mov $mogaku_earth_dassyutu1,"How can a human use the power of the earth!?"
mov $mogaku_earth_dassyutu2,""
mov $half_s1,"Does it feel good...?"
mov $half_s2,"How about I make it even better?"
mov $kiki_s1,"The forest desires your semen..."
mov $kiki_s2,"As a man, shouldn't you be happy at giving it?"
mov %end_n,8
mov %exp_minus,40000
mov %zmonster_x,-250
mov %tukix,280
mov %owaza_count1a,11
mov %owaza_count1b,11
mov %owaza_count2a,11
mov %owaza_count3a,8
mov %owaza_count3b,8
name $name
>Hehe, I won't let you disturb her.@
>Sara will become one of us...\
name ""
>The Queen Fairy deftly flies around, ready to fight me.@
>The flowers and ivy on all the nearby plants and trees start to grow, as if ready to assist her...\
name "Luka"
>This... Are you controlling those plants...?\
name ""
gosub *face2
name $name
>All Fairies are able to converse with plants.@
>As the Queen, I can even freely control them...\
>I'll show you the anger of the forest!@
>The sorrow of being isolated on a tiny island!\
name ""
gosub *face1
goto *common_main



*queenfairy_v

gosub *face3
name $name
>How... Could I lose...?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Queen Fairy is sealed into the form of a butterfly!\
mov %viclose,1:gosub *victory
mov %getexp,70000:gosub *lvup
mov %2326,1
goto *sean0270



*queenfairy_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>Oh, already surrendering?@
>It seems as though want to feel the anger of the forest with your own body...\
name ""
goto *queenfairy_a



*queenfairy_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *queenfairy_kousan
if %cmd1=16 goto *queenfairy_onedari
if %cmd1=17 goto *common_skill
goto *queenfairy_main



*queenfairy_a

if %kousoku=1 gosub *queenfairy_a9:goto *common_main
if %kousoku=2 rnd2 %ransu,1,2
if %kousoku=2 && %ransu=1 gosub *queenfairy_a10:goto *common_main
if %kousoku=2 && %ransu=2 gosub *queenfairy_a11:goto *common_main
rnd2 %ransu,1,14
if %ransu<4 gosub *queenfairy_a1:goto *common_main
if %ransu<7 gosub *queenfairy_a2:goto *common_main
if %ransu<10 gosub *queenfairy_a3:goto *common_main
if %ransu=10 && %owaza_count3a>9 gosub *queenfairy_a4:goto *common_main
if %ransu=11 && %owaza_count3b>9 gosub *queenfairy_a5:goto *common_main
if %ransu=12 && %owaza_count2a>12 && %status=0 gosub *queenfairy_a6:goto *common_main
if %ransu=13 && %owaza_count1b>12 gosub *queenfairy_a7:goto *common_main
if %ransu=14 && %owaza_count1a>12 gosub *queenfairy_a8:goto *common_main
skip -9



*queenfairy_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"This is the anger of the forest..."
if %ransu=2 mov $sel1,"The ivy shall overcome you..."
if %ransu=3 mov $sel1,"The ivy shall play with you!"
name $name
eng $sel1:$sel6\
name ""
skillname "Ivy Wand"
dwave 1,"se\ero_makituki2.ogg"
eng "Responding to the Queen Fairy's voice, ivy grows all around Luka!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,50
if %wind=2 && %nanido=2 mov %wind_kakuritu,40
if %wind=2 && %nanido=3 mov %wind_kakuritu,25
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>The ivy caresses every inch of Luka's body!
skillcount2 3570
if %nanido<2 damage 120,130
if %nanido=2 damage 135,145
if %nanido=3 damage 150,160
skillname ""
if %mylife=0 sub %stack,1:return *queenfairy_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*queenfairy_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Taste the pleasure from this ivy..."
if %ransu=2 mov $sel1,"Deriving pleasure even from this... Men are pathetic."
if %ransu=3 mov $sel1,"The ivy shall play with your penis..."
name $name
eng $sel1:$sel6\
name ""
skillname "Ivy Draw"
dwave 1,"se\ero_makituki2.ogg"
if %aqua=0 lsp 690,":a;chara\queenfairy_ct01.bmp",0,0:print 10,500
eng "Responding to the Queen Fairy's voice, ivy grows all around Luka!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,50
if %wind=2 && %nanido=2 mov %wind_kakuritu,40
if %wind=2 && %nanido=3 mov %wind_kakuritu,25
gosub *wind_guard_kakuritu
if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>The ivy coils around Luka's penis, stimulating him!
skillcount2 3571
if %nanido<2 damage 130,140
if %nanido=2 damage 145,155
if %nanido=3 damage 160,170
skillname ""
if %mylife=0 sub %stack,1:return *queenfairy_h2
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*queenfairy_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Give your semen to the forest..."
if %ransu=2 mov $sel1,"Feed the forest to repent for your barbarism..."
if %ransu=3 mov $sel1,"Water the forest with your semen..."
name $name
eng $sel1:$sel6\
name ""
skillname "Sucking Ivy"
dwave 1,"se\ero_syokusyu1.ogg"
if %aqua=0 lsp 690,":a;chara\queenfairy_ct11.bmp",0,0:print 10,500
eng "Responding to the Queen Fairy's words, a hole opens at the end of a giant branch of ivy!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,50
if %wind=2 && %nanido=2 mov %wind_kakuritu,40
if %wind=2 && %nanido=3 mov %wind_kakuritu,25
gosub *wind_guard_kakuritu
if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>Swallowing Luka's penis, the ivy sucks on him!
skillcount2 3572
if %nanido<2 damage 130,140
if %nanido=2 damage 145,155
if %nanido=3 damage 160,170
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *queenfairy_h3
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*queenfairy_a4

add %stack,1
mov %owaza_count3a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"These flowers are more than enough..."
if %ransu=2 mov $sel1,"Taste the sexual organ of a plant..."
if %ransu=3 mov $sel1,"The flowers of the forest seem to want to tease you as well..."
name $name
eng $sel1:$sel6\
name ""
skillname "Fanatic Dahlia"
dwave 1,"se\umaru.ogg"
if %aqua=0 lsp 690,":a;chara\queenfairy_ct21.bmp",0,0:print 10,500
eng "Responding to the Queen Fairy's voice, beautiful flowers sprout up all around Luka's body!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,50
if %wind=2 && %nanido=2 mov %wind_kakuritu,40
if %wind=2 && %nanido=3 mov %wind_kakuritu,25
gosub *wind_guard_kakuritu
if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>Countless flowers cover Luka's groin!
skillcount2 3573
if %nanido<2 damage 60,70
if %nanido=2 damage 65,75
if %nanido=3 damage 70,80
dwave 1,"se\ero_koki1.ogg"
>The soft petals of the flowers wriggle around Luka's penis!
if %nanido<2 damage 60,70
if %nanido=2 damage 65,75
if %nanido=3 damage 70,80
dwave 1,"se\ero_koki1.ogg"
>The flowers surround Luka's penis!
if %nanido<2 damage 60,70
if %nanido=2 damage 65,75
if %nanido=3 damage 70,80
skillname ""
if %mylife=0 sub %stack,1:return *queenfairy_h4
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*queenfairy_a5

add %stack,1
mov %owaza_count3b,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll do it directly..."
if %ransu=2 mov $sel1,"Here, you wanted me to do this, didn't you?"
if %ransu=3 mov $sel1,"I'll grab hold of your penis..."
name $name
eng $sel1:$sel6\
name ""
skillname "Heaven's Dance"
eng "The Queen Fairy clings to Luka's penis!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,25
if %wind=2 && %nanido=2 mov %wind_kakuritu,20
if %wind=2 && %nanido=3 mov %wind_kakuritu,12
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3574
dwave 1,"se\umaru.ogg"
>Her small wings wrap around Luka's penis!
if %nanido<2 damage 40,50
if %nanido=2 damage 44,54
if %nanido=3 damage 48,58
dwave 1,"se\ero_koki1.ogg"
>She hugs Luka's penis tighter to her body!
if %nanido<2 damage 40,50
if %nanido=2 damage 44,54
if %nanido=3 damage 48,58
dwave 1,"se\ero_koki1.ogg"
>The Queen Fairy grabs hold of the tip of Luka's penis!
if %nanido<2 damage 40,50
if %nanido=2 damage 44,54
if %nanido=3 damage 48,58
dwave 1,"se\ero_pyu1.ogg"
>The Queen Fairy licks Luka's penis as she rubs her body against him!
if %nanido<2 damage 40,50
if %nanido=2 damage 44,54
if %nanido=3 damage 48,58
skillname ""
if %mylife=0 sub %stack,1:return *queenfairy_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*queenfairy_a6

add %stack,1
mov %owaza_count2a,0
if %kousan=2 skip 4
name $name
>Get drunk on the sweet smell of the forest...\
name ""
skillname "Ecstasy Incense"
dwave 1,"se\gas.ogg"
eng "A sweet smell fills the air!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,80
if %wind=2 && %nanido=2 mov %wind_kakuritu,60
if %wind=2 && %nanido=3 mov %wind_kakuritu,40
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But the wind blows it all away!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3575
mov %status,1:gosub *status_print
>Luka was put into a trance!\
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,2,3
if %nanido=3 rnd2 %status_turn,3,4
sub %stack,1
return



*queenfairy_a7

add %stack,1
mov %owaza_count1b,0
mov %owaza_num1,2
if %kousan=2 skip 7
name $name
if %first_sel2=1 skip 3
>I can even do this, if I just borrow the power of the forest...\
skip 2
>Hehe, shall I bind you in ivy again?\
name ""
skillname "Ivy Bind"
dwave 1,"se\ero_makituki3.ogg"
>Ivy grows all around Luka, and binds his body!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
if %nanido<2 damage 85,95
if %nanido=2 damage 85,95
if %nanido=3 damage 115,125
mov %kousoku,2:gosub *status_print
>Luka is being bound by the ivy!\
skillname ""
if %mylife=0 sub %stack,1:return *queenfairy_h8
if %kousan=2 sub %stack,1:return
name $name
if %first_sel2=1 skip 4
>Hehehe, what a pathetic figure.@
>I'll let that ivy play with you...\
skip 3
>This time you won't escape.@
>I'll let that ivy play with you...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,3
if %earth=0 && %nanido=2 mov %genmogaku,3
if %earth=0 && %nanido=3 mov %genmogaku,4
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
mov $mogaku_sel1,"Hehe, this is the anger of the forest..."
mov $mogaku_sel2,"Struggle as you realize your own helplessness..."
mov $mogaku_sel3,"Even if you struggle, you won't break free..."
mov $mogaku_sel4,"How pitiful..."
mov $mogaku_sel5,"You should just give up and let the ivy play with you..."
sub %stack,1
return



*queenfairy_a8

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 4
name $name
>I'll squeeze out all of your semen!\
name ""
skillname "Mellow Rafflesia"
dwave 1,"se\ero_makituki3.ogg"
if %aqua=0 lsp 690,":a;chara\queenfairy_ct31.bmp",0,0:print 10,500
eng "A huge rafflesia grows under Luka, and binds his lower body!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,100
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu
if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>A different rafflesia sucks in Luka's penis!
skillcount2 3576
if %nanido<2 damage 140,160
if %nanido=2 damage 140,160
if %nanido=3 damage 170,190
mov %kousoku,1:gosub *status_print
>Luka's penis is stuck inside a rafflesia!\
skillname ""
if %mylife=0 sub %stack,1:return *queenfairy_h6
if %kousan=2 sub %stack,1:return
name $name
if %first_sel1=1 skip 4
>That rafflesia has the power to suck out male semen.@
>Your semen will be sucked out and used to nourish the forest...\
skip 3
>This time you won't escape...@
>Your semen will be sucked out and used to nourish the forest...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,3
if %earth=0 && %nanido=2 mov %genmogaku,3
if %earth=0 && %nanido=3 mov %genmogaku,4
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
mov $mogaku_sel1,"Hehe, this is the anger of the forest..."
mov $mogaku_sel2,"Struggle as you realize your helplessness..."
mov $mogaku_sel3,"That rafflesia is too much for you..."
mov $mogaku_sel4,"How pitiful..."
mov $mogaku_sel5,"Being defeated by a flower... How miserable."
sub %stack,1
return



*queenfairy_a9

add %stack,1
>Luka's penis is being sucked by the rafflesia...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Males like being stimulated this way...":mov $sel2,"The rafflesia's flowers rub against Luka's penis!"
if %ransu=2 mov $sel1,"Here... I'll make it tighter...":mov $sel2,"The flower's mouth around Luka's penis gets even tighter!"
if %ransu=3 mov $sel1,"What a miserable Hero... Just being milked.":mov $sel2,"The rafflesia sucks on Luka's penis!"
if %ransu=4 mov $sel1,"Look, you're almost about to come...":mov $sel2,"The flower around Luka's penis rubs him!"
if %ransu=5 mov $sel1,"Now, give your semen to the forest...":mov $sel2,"The rafflesia sucks on Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Mellow Rafflesia"
dwave 1,"se\ero_makituki2.ogg"
eng $sel2:$sel6
skillcount2 3576
if %nanido<2 damage 140,160
if %nanido=2 damage 140,160
if %nanido=3 damage 170,190
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *queenfairy_h7
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*queenfairy_a10

add %stack,1
>Luka is being bound by the ivy...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Here, I'll make it even tighter..."
if %ransu=2 mov $sel1,"Hehe, does hurt?"
if %ransu=3 mov $sel1,"I'll make it even tighter..."
name $name
eng $sel1:$sel6\
name ""
skillname "Ivy Tighten"
dwave 1,"se\ero_simetuke1.ogg"
>Following the Queen Fairy's words, the ivy tightens around Luka's body!
skillcount2 3563
if %nanido<2 damage 85,95
if %nanido=2 damage 85,95
if %nanido=3 damage 115,125
skillname ""
if %mylife=0 sub %stack,1:return *queenfairy_h8
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*queenfairy_a11

add %stack,1
>Luka is being bound by the ivy...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll torment your penis...":mov $sel2,"The ivy around Luka's penis gets even tighter!"
if %ransu=2 mov $sel1,"If I do this, will you come?":mov $sel2,"The ivy around Luka's penis starts to stroke him!"
if %ransu=3 mov $sel1,"Here, the ivy wants to play with you...":mov $sel2,"The ivy crawls all over Luka's body, caressing him!"
if %ransu=4 mov $sel1,"Haha... It feels good, doesn't it?":mov $sel2,"The ivy squirms around Luka's body!"
if %ransu=5 mov $sel1,"Hehe... I'll make you feel good.":mov $sel2,"The ivy coils around Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Ivy Caress"
dwave 1,"se\ero_makituki2.ogg"
lsp 690,":a;chara\queenfairy_ct01.bmp",0,0:print 10,500
eng $sel2:$sel6
skillcount2 3564
if %nanido<2 damage 90,100
if %nanido=2 damage 90,100
if %nanido=3 damage 120,130
skillname ""
if %mylife=0 sub %stack,1:return *queenfairy_h9
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*queenfairy_onedari

mov $list1,"Ivy Wand"
if %3570>0 mov %list_num1,1
mov $list2,"Ivy Draw"
if %3571>0 mov %list_num2,1
mov $list3,"Sucking Ivy"
if %3572>0 mov %list_num3,1
mov $list4,"Fanatic Dahlia"
if %3573>0 mov %list_num4,1
mov $list5,"Heaven's Dance"
if %3574>0 mov %list_num5,1
mov $list6,"Ecstasy Incense"
if %3575>0 mov %list_num6,1
mov $list7,"Ivy Tighten"
if %3563>0 mov %list_num7,1
mov $list8,"Ivy Caress"
if %3564>0 mov %list_num8,1
mov $list9,"Mellow Rafflesia"
if %3576>0 mov %list_num9,1
gosub *cmd_onedari
if %cmd1=11 goto *queenfairy_onedari1
if %cmd1=12 goto *queenfairy_onedari2
if %cmd1=13 goto *queenfairy_onedari3
if %cmd1=14 goto *queenfairy_onedari4
if %cmd1=15 goto *queenfairy_onedari5
if %cmd1=16 goto *queenfairy_onedari6
if %cmd1=17 goto *queenfairy_onedari7
if %cmd1=18 goto *queenfairy_onedari8
if %cmd1=19 goto *queenfairy_onedari9
if %cmd1=-1 goto *queenfairy_main
goto *queenfairy_onedari



*queenfairy_onedari1

gosub *onedari_syori
name $name
>Hehe... You want to be played with by the ivy?\
name ""
gosub *queenfairy_a1
skip -1



*queenfairy_onedari2

gosub *onedari_syori
name $name
>Hehe... You want to be played with by the ivy?\
name ""
gosub *queenfairy_a2
skip -1



*queenfairy_onedari3

gosub *onedari_syori
name $name
>Hehe... You want to be played with by the ivy?\
name ""
gosub *queenfairy_a3
skip -1



*queenfairy_onedari4

gosub *onedari_syori
name $name
>Hehe... You want to be sucked by a flower?\
name ""
gosub *queenfairy_a4
skip -1



*queenfairy_onedari5

gosub *onedari_syori
name $name
>Hehe... So you want me to personally squeeze it out?\
name ""
gosub *queenfairy_a5
skip -1



*queenfairy_onedari6

gosub *onedari_syori
name $name
>You want to get drunk on the pleasure?@
>Then I'll do as you want...\
name ""
gosub *queenfairy_a6
name $name
>Hehe, an unbearable feeling, isn't it?@
>Now I'll finish you off...\
name ""
gosub *queenfairy_a
skip -1



*queenfairy_onedari7

gosub *onedari_syori_k
name $name
>You want to be bound by ivy and squeezed...?\
name ""
if %kousoku=0 gosub *queenfairy_a7
gosub *queenfairy_a10
skip -1



*queenfairy_onedari8

gosub *onedari_syori_k
name $name
>You want to be bound by ivy and squeezed...?\
name ""
if %kousoku=0 gosub *queenfairy_a7
gosub *queenfairy_a11
skip -1



*queenfairy_onedari9

gosub *onedari_syori_k
name $name
>You want to give your semen right to a rafflesia?\
name ""
if %kousoku=0 gosub *queenfairy_a8
gosub *queenfairy_a9
skip -1



*queenfairy_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>As the ivy caresses his entire body, Luka comes, covering the forest floor in semen.\
mov %viclose,1:gosub *lose
mov %2626,%2626+1:if %2626=1 mov %count_koenemy,%count_koenemy+1
if %2626>%count_most mov %count_most,%2626:mov $count_mostname,$name
count 10,3
mov $bad1,"The ivy forced Luka to come."
gosub *face2
name $name
>Good... Like that, give all your semen to the forest...\
name ""
goto *queenfairy_h



*queenfairy_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\queenfairy_ct02.bmp",0,0
gosub *syasei2
>As the ivy strokes his penis, Luka comes, covering the forest floor in semen.\
mov %viclose,1:gosub *lose
mov %2626,%2626+1:if %2626=1 mov %count_koenemy,%count_koenemy+1
if %2626>%count_most mov %count_most,%2626:mov $count_mostname,$name
count 10,3
mov $bad1,"The ivy forced Luka to come."
gosub *face2
name $name
>Good... Like that, give all your semen to the forest...\
name ""
csp 690:print 10,500
goto *queenfairy_h



*queenfairy_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\queenfairy_ct12.bmp",0,0
gosub *syasei2
>As the ivy sucks on Luka's penis, he comes, filling it with semen.\
mov %viclose,1:gosub *lose
mov %2626,%2626+1:if %2626=1 mov %count_koenemy,%count_koenemy+1
if %2626>%count_most mov %count_most,%2626:mov $count_mostname,$name
count 10,3
mov $bad1,"The ivy forced Luka to come."
gosub *face2
name $name
>Good... Like that, give all your semen to the forest...\
name ""
csp 690:print 10,500
goto *queenfairy_h



*queenfairy_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\queenfairy_ct22.bmp",0,0
gosub *syasei2
>As the flower stimulates Luka's penis, he comes, covering the flower in semen.\
mov %viclose,1:gosub *lose
mov %2626,%2626+1:if %2626=1 mov %count_koenemy,%count_koenemy+1
if %2626>%count_most mov %count_most,%2626:mov $count_mostname,$name
count 10,3
mov $bad1,"The flower controlled by the Queen Fairy forced Luka to come."
gosub *face2
name $name
>Good... Like that, give all your semen to the forest...\
name ""
csp 690:print 10,500
goto *queenfairy_h



*queenfairy_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\queenfairy_bk01.bmp",0,0
lsp 692,":a;chara\queenfairy_bk02.bmp",0,0
gosub *syasei2
>As the Queen Fairy uses her small body to play with Luka's penis, he comes, covering her in semen.\
mov %viclose,1:gosub *lose
mov %2626,%2626+1:if %2626=1 mov %count_koenemy,%count_koenemy+1
if %2626>%count_most mov %count_most,%2626:mov $count_mostname,$name
count 31,3
mov $bad1,"As the Queen Fairy rubbed her body against Luka's penis, he came."
gosub *face2
name $name
>Good... Like that, give all your semen to the forest...\
name ""
goto *queenfairy_h



*queenfairy_h6

mov %ikigoe,3:gosub *ikigoe
name $name
>Oh, so you can't even endure that?\
name ""
gosub *syasei1
lsp 690,":a;chara\queenfairy_ct32.bmp",0,0
gosub *syasei2
>As soon as Luka feels the rafflesia on him, he comes, filling it with semen.\
mov %viclose,1:gosub *lose
mov %2626,%2626+1:if %2626=1 mov %count_koenemy,%count_koenemy+1
if %2626>%count_most mov %count_most,%2626:mov $count_mostname,$name
count 10,3
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to an orgasm just from feeling the rafflesia."
gosub *face2
name $name
>Hehe, what a silly man.\
name ""
csp 690:print 10,500
goto *queenfairy_h



*queenfairy_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\queenfairy_ct32.bmp",0,0
gosub *syasei2
>As the rafflesia sucks on his penis, Luka comes, filling it with semen.\
mov %viclose,1:gosub *lose
mov %2626,%2626+1:if %2626=1 mov %count_koenemy,%count_koenemy+1
if %2626>%count_most mov %count_most,%2626:mov $count_mostname,$name
count 10,3
mov $bad1,"Luka was forced to come from the rafflesia sucking on him."
gosub *face2
name $name
>Good... Like that, give all your semen to the forest...\
name ""
csp 690:print 10,500
goto *queenfairy_h



*queenfairy_h8

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>As the ivy painfully tightens around his body, Luka comes, covering the forest floor in front of him in semen.\
mov %viclose,1:gosub *lose
mov %2626,%2626+1:if %2626=1 mov %count_koenemy,%count_koenemy+1
if %2626>%count_most mov %count_most,%2626:mov $count_mostname,$name
count 10,3
mov $bad1,"The pain from the ivy tightening around him forced Luka to come."
gosub *face2
name $name
>Having an orgasm from a little pain?@
>What a pathetic man...\
name ""
goto *queenfairy_h



*queenfairy_h9

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\queenfairy_ct02.bmp",0,0
gosub *syasei2
>Bound and caressed by the ivy, Luka comes, spraying his semen onto the ground.\
mov %viclose,1:gosub *lose
mov %2626,%2626+1:if %2626=1 mov %count_koenemy,%count_koenemy+1
if %2626>%count_most mov %count_most,%2626:mov $count_mostname,$name
count 10,3
mov $bad1,"The Queen Fairy's ivy forced Luka to come."
gosub *face2
name $name
>The ivy made you come?@
>How sad...\
name ""
csp 690:print 10,500
goto *queenfairy_h



*queenfairy_h

mov $bad2,"Captured, Luka was forced to nourish the forest with his semen for the rest of his life."
if %2626=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahhh...\
name ""
name $name
>Now for your punishment.@
>You must give all of your semen to the forest.\
>For the Elves, Fairies and nature itself that you humans have ruined...@
>Your body will serve to atone a little for the human's crimes.\
name ""
name "Luka"
>S...Stop... Ahh!\
name ""
dwave 1,"se\ero_makituki3.ogg"
>The Queen Fairy whispers something, causing all the ivy to grow around me.@
>Coiling around every part of my body, I'm held firmly in place, unable to move.\
name $name
>We won't kill you, for we are not barbaric like humans.@
>Instead you will be bound and forced to feed your semen to the forest for all of your life.\
name ""
name "Luka"
>Stop... Ahhh!\
name ""
mov %hseanwave,21:hseanwave
cspl 690,699
lsp 690,":a;chara\queenfairy_ct01.bmp",0,0:print 10,500
>I yell out in surprise as a sap covered branch of ivy coils around my penis.\
name "Luka"
>Ahhh...\
name ""
name $name
>This is how we'll stimulate you and squeeze your semen out.@
>The ground below you shall absorb your semen, and use it to nourish the forest.\
name ""
>The ivy around my penis starts to squirm a little bit.\
>Gently tightening around me, it starts to move, slowly stroking me up and down.\
name "Luka"
>Ah...Ahh...\
name ""
>Another piece of ivy creeps across the tip of my penis, almost as if it was a small finger rubbing me, causing me to tremble.\
name $name
>Come on, ejaculate without holding back.@
>You won't be able to resist the ivy, so just surrender.\
name ""
name "Luka"
>Ahhh!\
name ""
>The ivy rubbing against my tip coils around it, gently squeezing me.@
>I yell out in surprise at the stimulation as the Queen Fairy hovers over me with a smile on her face.\
name $name
>Hehehe... Are you feeling miserable?@
>You shall remain here forever, scattering your semen onto the ground...\
name ""
name "Luka"
>Haaaa...!\
name ""
>The ivy stroking my penis gets even more intense, bringing me to the edge of an orgasm.\
>At the same time, the warm sticky sap covering the ivy spreads over my penis, lubricating and warming up my penis.\
name "Luka"
>Ahh... I'm going to come...\
name ""
name $name
>So you're about to finish...@
>I'll give you the finishing blow!\
name ""
>Reacting to the Queen Fairy's words, the ivy gets even more intense.\
>The ivy coiled around my tip squeezes tighter as the one around my shaft pumps me like a piston.\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\queenfairy_ct02.bmp",0,0
gosub *syasei2
>Relaxing my waist, I explode, spraying my semen all over the ground in front of me.\
name $name
>This forest, where magic dwells...@
>Human semen is the best fertilizer...\
>Hehe, and look at how much you came...@
>Was being forced to come by some plants really that pleasurable?\
name ""
>The ivy squeezes out the last of my semen still in my urethra, causing a few more drops to drip onto the forest floor.\
name $name
>You must make sure to give every drop to the forest...\
name ""
name "Luka"
>Ahh...\
name ""
>I look down at misery at my semen pooling on the ground.\
>I'm completely at the Queen Fairy's mercy...@
>She really is going to milk me dry.\
mov %hseanwave,0:hseanwave
csp 690:print 10,500
name $name
>You need to ejaculate even more...@
>Until this forest has absorbed every drop in you.\
name ""
>A different branch of ivy approaches my groin.\
>This one has a giant opening at the tip, dripping with a sticky looking liquid.\
name "Luka"
>Ahhh...\
name ""
name $name
>Hehe... This ivy is designed to suck out male semen.@
>Don't you want to taste it too?@
>It will suck on you for as long as you can endure it...\
name ""
name "Luka"
>Stop... Stop!\
name ""
mov %hseanwave,15:hseanwave
cspl 690,699
lsp 690,":a;chara\queenfairy_ct11.bmp",0,0:print 10,500
name "Luka"
>Ahhhh...\
name ""
>The sticky feeling of the sap covers my penis as soon as I'm sucked inside of it.\
>My penis rubs against the green ivy's walls as I'm pulled all the way inside of it.@
>As soon as I'm locked inside of it, the ivy starts pulling on my penis in a powerful sucking sensation.\
name "Luka"
>Haaa... I... It's sucking...\
name ""
name $name
>Hehehehe... It looks like you've already started to drown in the pleasure.@
>Does it feel good being sucked by a plant?\
>Aren't you ashamed at thinking that a plant is going to make you come?\
name ""
name "Luka"
>Ahhg...\
name ""
>The opening shrinks around my penis, making the suction even more powerful.@
>It's sucking so hard, I can feel my waist moving closer to it as it pulls on me.\
>I thought I could resist this at first... But...\
name "Luka"
>Haaa...@>Ahhh!\
name ""
>It feels so good, I can't hold my moan of pleasure back.@
>My back arches as I unconsciously push closer to it, desiring more.\
>It's going to suck out my semen...@
>There's nothing I can do.\
name $name
>Hehe... How unsightly.@
>Even though you're a Hero, you've already given up?\
>Even a commoner would try a little longer than that.@
>You really are pitiful.\
name ""
name "Luka"
>Ahhhhh...\
name ""
>I thrust forward into the plant as the Queen Fairy insults me.\
>It feels like my penis belongs to the forest now...@
>The plants are binding me down and forcing me to ejaculate for it.\
name "Luka"
>Ahh... I'm going to come...\
name ""
>I shake side to side as I feel an orgasm coming along.\
name $name
>Oh, already?@
>Here, let the ivy suck it out...\
name ""
name "Luka"
>Ahhh...\
name ""
>The ivy sucks on me even harder, making my head go white in ecstasy.@
>Relaxing my body, I let myself go and bask in the pleasure.\
gosub *syasei1
lsp 690,":a;chara\queenfairy_ct12.bmp",0,0
gosub *syasei2
>I explode in the ivy, the powerful suction pulling out my semen into the plant as I shoot it out.\
name $name
>Hehe, that was quite a lot.@
>Your semen will all go towards nourishing the forest...\
name ""
name "Luka"
>Ah..aaah...\
name ""
>The Queen Fairy giggles as the ivy continues sucking out every drop of my semen.\
mov %hseanwave,0:hseanwave
csp 690:print 10,500
name $name
>Your semen is surprisingly high quality...@
>Well? Do you want to try having sex with a plant?\
name ""
name "Luka"
>N...No... Not that...\
name ""
>Another plant grows up near me.\
>The flowers are dripping with honey, with a small hole right in the middle of the petals.\
name ""
name $name
>The flower is the sexual organ of a plant...@
>This rafflesia is designed to have sex with men.\
>Squeezing out the male semen, it uses the seed to fertilize itself and create more magical flowers.\
name ""
name "Luka"
>No... Stop this...!\
name ""
>Horrified at the new flower, I squirm and struggle, trying to escape.@
>But the ivy is holding me down too tightly, leaving me no ability to escape.\
name $name
>Hehe... The pleasure that flower can bring is unmatched.@
>Now then, please give it a lot of your seed...\
name ""
name "Luka"
>Ahhhh!\
name ""
mov %hseanwave,16:hseanwave
cspl 690,699
lsp 690,":a;chara\queenfairy_ct31.bmp",0,0:print 10,500
>With a wet noise, my penis slips into the flower.@
>My mind goes blank in pleasure as soon as I'm inserted, pleasure exploding through my body.\
name "Luka"
>Ah... What is this...?@> Ahhh!\
name ""
>As soon as I'm inside of the flower, it shrinks down tight around me.@
>The plant itself start to wriggle and squirm around me, the soft petals rubbing and massaging every inch of my penis.\
name "Luka"
>Haaa... Too much...@
>I'm coming... Ahhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\queenfairy_ct32.bmp",0,0
gosub *syasei2
>With a pathetic moan, I come, filling the strange flower with semen.\
name $name
>Oh dear, already?@
>You really have no patience for this, do you?\
>Now then, give it even more.@
>Enjoy having sex with a plant...\
name ""
name "Luka"
>Ahhhh...\
name ""
>The rafflesia continues sucking and squeezing me, its sticky honey flowing out and covering my groin.\
>There's no way for me to make it stop... My body is bound, and I don't think it can even understand my pleas.@
>I'm helplessly left here to come and give my semen to this inhuman plant.\
name "Luka"
>Ah... I'm coming again...\
name ""
>Even though I just came, I already feel another orgasm coming along.@
>As my penis starts to twitch, the rafflesia just continues rubbing its petals against my penis.\
name "Luka"
>Ah... Coming...\
name ""
gosub *syasei1:gosub *syasei2
>My body shakes as I explode inside the rafflesia, still squeezing and sucking on me even as I come.\
name $name
>Hehe... It isn't over yet.@
>You need to give far more to the forest...\
name ""
>The Queen Fairy giggles at me as she watches me come over and over...\
gosub *anten
mov %hseanwave,0:hseanwave
>Captured by the Queen Fairy, I'm kept bound as a sacrifice to give semen to the forest.\
>Unable to move, I'm forced to ejaculate over and over every single day.@
>Always on the verge of exhaustion, I'm little more than a disabled person now, still nourishing the forest with my semen...\
>...................\
goto *badend



*queenelf_start

mov $name,"Queen Elf"
mov $name2,"Queen Elf"
mov $lavel,"queenelf"
mov $tatie1,"queenelf_st01"
mov $tatie2,"queenelf_st02"
mov $tatie3,"queenelf_st03"
mov $tatie4,"queenelf_st02"
mov $haikei,"bg136"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,10000
if %nanido=2 mov %max_enemylife,11000
if %nanido=3 mov %max_enemylife,15000
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,20
if %nanido=3 mov %earth_keigen,10
mov %music,2
mov %tikei,0
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka is kept pinned to the ground!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"How pathetic... Hehehe..."
mov $mogaku_sel2,"How pathetic... Hehehe..."
mov $mogaku_sel3,"Give up and be violated by the Queen..."
mov $mogaku_sel4,"Give up and be violated by the Queen..."
mov $mogaku_sel5,"Give up and be violated by the Queen..."
mov $mogaku_earth_dassyutu1,"This is the earth's power!?"
mov $mogaku_earth_dassyutu2,"Why would Gnome give her power to a human!?"
mov $half_s1,"Well, does it feel good?"
mov $half_s2,"I'll relieve some of my pain by raping you..."
mov $kiki_s1,"It looks like you're near your end."
mov $kiki_s2,"I'll force you to admit your defeat through your ejaculation..."
mov %end_n,8
mov %exp_minus,110000
mov %zmonster_x,-300
mov %tukix,330
mov %owaza_count1a,8
mov %owaza_count2a,11
mov %owaza_count2b,11
mov %owaza_count2c,11
mov %owaza_count3a,8
mov %owaza_count3b,8
name $name
>I don't intend to waste time in a pointless argument.@
>We never intend to compromise with humans any more.\
name ""
name "Luka"
>Guh...\
name ""
>She hates humans too much...@
>Nothing I say here will change that.\
gosub *face2
name $name
>I'll show you the anger we harbor for you invading humans.@
>I'll humiliate and degrade you, stripping away all dignity you had as a human.\
>Prepare yourself, human.@
>I'm going to take everything from you.\
name ""
gosub *face1
goto *common_main



*queenelf_v

gosub *face3
name $name
>Guh...!\
name ""
>Too weak to continue fighting, the Queen Elf drops to her knees!\
mov %viclose,1:gosub *victory
mov %getexp,70000:gosub *lvup
mov %2327,1
goto *sean0271



*queenelf_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>So you want me to treat you as simple prey...@
>Then I won't hold back!\
name ""
goto *queenelf_a



*queenelf_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *queenelf_kousan
if %cmd1=16 goto *queenelf_onedari
if %cmd1=17 goto *common_skill
goto *queenelf_main



*queenelf_a

if %hanyo6=1 && %aqua>1 gosub *queenelf_a9:goto *common_main
if %hanyo6=1 && %bougyo=1 gosub *queenelf_a9:goto *common_main
if %hanyo6=1 && %bougyo=0 gosub *queenelf_a10:goto *common_main
if %kousoku=1 gosub *queenelf_a6:goto *common_main
rnd2 %ransu,1,15
if %ransu<4 gosub *queenelf_a1:goto *common_main
if %ransu<7 gosub *queenelf_a2:goto *common_main
if %ransu<10 gosub *queenelf_a3:goto *common_main
if %ransu=10 && %owaza_count2a>12 gosub *queenelf_a4:goto *common_main
if %ransu=11 && %status=0 && %owaza_count1a>9 gosub *queenelf_a5:goto *common_main
if %ransu=12 && %status=0 && %owaza_count3a>9 gosub *queenelf_a8:goto *common_main
if %ransu=13 && %status=0 && %owaza_count3b>9 gosub *queenelf_a12:goto *common_main
if %ransu=14 && %status=0 && %owaza_count2b>12 gosub *queenelf_a14:goto *common_main
if %ransu=15 && %status=0 && %owaza_count2c>12 gosub *queenelf_a16:goto *common_main
skip -10



*queenelf_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Have a taste of my hand..."
if %ransu=2 mov $sel1,"My hand will squeeze out your sperm..."
if %ransu=3 mov $sel1,"Hehe... Can you endure this technique?"
name $name
eng $sel1:$sel6\
name ""
skillname "Elven Hand Squeeze"
dwave 1,"se\ero_koki1.ogg"
>The Queen Elf grabs hold of Luka's penis, slowly stroking it!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,15
if %wind=2 && %nanido=2 mov %wind_kakuritu,10
if %wind=2 && %nanido=3 mov %wind_kakuritu,7
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3577
if %nanido<2 damage 100,110
if %nanido=2 damage 115,125
if %nanido=3 damage 130,140
skillname ""
if %mylife=0 sub %stack,1:return *queenelf_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*queenelf_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You will melt in my mouth..."
if %ransu=2 mov $sel1,"How long can you endure me?"
if %ransu=3 mov $sel1,"Here, I'll suck on it..."
name $name
eng $sel1:$sel6\
name ""
skillname "Elven Mouth Melt"
dwave 1,"se\ero_buchu3.ogg"
>The Queen Elf sucks on Luka's penis like it was a piece of candy!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,15
if %wind=2 && %nanido=2 mov %wind_kakuritu,10
if %wind=2 && %nanido=3 mov %wind_kakuritu,7
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3578
if %nanido<2 damage 110,120
if %nanido=2 damage 125,135
if %nanido=3 damage 140,150
skillname ""
if %mylife=0 sub %stack,1:return *queenelf_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*queenelf_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"No man can endure my breasts for longer than a few seconds..."
if %ransu=2 mov $sel1,"Drown in my breasts..."
if %ransu=3 mov $sel1,"Cover my chest in semen..."
name $name
eng $sel1:$sel6\
name ""
skillname "Elven Breast Drowning"
dwave 1,"se\ero_koki1.ogg"
>The Queen Elf sandwiches Luka's penis between her breasts, drowning Luka in pleasure!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,15
if %wind=2 && %nanido=2 mov %wind_kakuritu,10
if %wind=2 && %nanido=3 mov %wind_kakuritu,7
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3579
if %nanido<2 damage 120,130
if %nanido=2 damage 135,145
if %nanido=3 damage 150,160
skillname ""
if %mylife=0 sub %stack,1:return *queenelf_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*queenelf_a4

add %stack,1
mov %owaza_count2a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Melt away in my kiss..."
if %ransu=2 mov $sel1,"Give yourself over to my sweet kiss..."
if %ransu=3 mov $sel1,"Let's kiss as if we were mere lovers..."
name $name
eng $sel1:$sel6\
name ""
skillname "Kiss of Ecstasy"
dwave 1,"se\ero_chupa2.ogg"
eng "The Queen Elf kisses Luka!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,66
if %wind=2 && %nanido=2 mov %wind_kakuritu,55
if %wind=2 && %nanido=3 mov %wind_kakuritu,33
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>The sweet sensation from her soft lips spreads through Luka's body!
skillcount2 3581
if %nanido<2 damage 100,110
if %nanido=2 damage 115,125
if %nanido=3 damage 130,140
if %status=0 mov $sel1,"Luka was put into a trance!"
if %status=1 mov $sel1,"Luka is in a trance..."
mov %status,1:gosub *status_print
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *queenelf_h5
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,2,3
if %nanido=3 rnd2 %status_turn,3,4
sub %stack,1
return



*queenelf_a5

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 5
name $name
>Hehe, what a pathetic figure...@
>I'll enjoy preying on that erect penis of yours...\
name ""
skillname "Mount"
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
mov %kousoku,1:gosub *status_print
>The Queen Elf mounts Luka!\
skillname ""
if %kousan=2 sub %stack,1:return
name $name
>The unmatched pussy of a queen...@
>You want to taste it, don't you?\
name ""
>The Queen Elf lifts up her skirt, and starts to drop down!\
if %earth=0 && %nanido<2 mov %genmogaku,100
if %earth=0 && %nanido=2 mov %genmogaku,100
if %earth=0 && %nanido=3 mov %genmogaku,100
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
sub %stack,1
return



*queenelf_a6

add %stack,1
>The Queen Elf is riding on top of Luka...\
name $name
>Now to rape you...@
>Being violated by a Queen's pussy is the same as being in heaven...\
name ""
mov %kousoku,2
skillname "Elven Queen's Vagina"
dwave 1,"se\ero_pyu1.ogg"
lsp 690,":a;chara\queenelf_ct01.bmp",0,0:print 10,500
>The Queen Elf drops down on Luka, forcing his penis into her!
skillcount2 3582
mov %damage_kotei,1
skillcount2 3582
damage 180,200
>Luka is being raped by the Queen Elf!\
skillname ""
if %mylife=0 sub %stack,1:return *queenelf_h10
name "Luka"
>Ahhhh!\
name ""
sub %stack,1
goto *queenelf_a7



*queenelf_a7

add %stack,1
>Luka is being raped by the Queen Elf...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"This is a Queen's pussy... Isn't it amazing?":mov $sel2,"The Queen Elf squeezes down on Luka's penis!"
if %ransu=2 mov $sel1,"Surrender to me...":mov $sel2,"The Queen Elf's vaginal walls rub against Luka's penis!"
if %ransu=3 mov $sel1,"Being raped by a Queen is the highest of honors...":mov $sel2,"Luka writhes in ecstasy just from being inside the Queen Elf!"
if %ransu=4 mov $sel1,"A human woman would never be able to do this... Hehe.":mov $sel2,"The tip of Luka's penis is massaged by the folds inside the Queen Elf!"
if %ransu=5 mov $sel1,"If I rub you inside of me, you won't be able to stand for more than a few seconds...":mov $sel2,"The Queen Elf's vagina shrinks around Luka, squeezing him inside of her!"
name $name
eng $sel1:$sel6\
name ""
skillname "Elven Queen's Vagina"
dwave 1,"se\ero_chupa4.ogg"
eng $sel2:$sel6
skillcount2 3582
mov %damage_kotei,1
damage 180,200
skillname ""
if %mylife=0 sub %stack,1:return *queenelf_h11
sub %stack,1
goto *queenelf_a7



*queenelf_a8

add %stack,1
if %kousan=2 skip 4
name $name
>Surrender all of your semen to me...\
name ""
skillname "Infinite Sucking Preparation"
>The Queen Elf puts her hands under her skirt and starts to masturbate!\
skillname ""
name $name
>Hehe... I'm ready for you now...@
>My pussy... The next thing that goes inside will be squeezed dry...\
name ""
mov %hanyo6,1
sub %stack,1
return



*queenelf_a9

add %stack,1
mov %hanyo6,0
name $name
>I shall leave you dry!\
name ""
skillname "Infinite Sucking"
>The Queen Elf pushes Luka down!
if %aqua>1 gosub *aqua_guard:skip 5
delay 1000
dwave 1,"se\miss.ogg"
>But Luka rolls and regains his stance!\
skillname ""
if %first_sel1=1 skip 9
name "Luka"
>Don't think I'll just let you rape me!\
name ""
name $name
>Oh, that's too bad.@
>To think you would pass up a chance to be raped by a Queen...\
name ""
mov %first_sel1,1
mov %owaza_count3a,0
sub %stack,1
return



*queenelf_a10

add %stack,1
mov %hanyo6,0
name $name
>I shall leave you dry!\
name ""
skillname "Infinite Sucking"
>The Queen Elf pushes Luka down!\
dwave 1,"se\ero_pyu1.ogg"
lsp 690,":a;chara\queenelf_ct01.bmp",0,0
mov %kousoku,2:gosub *status_print
>Before he can regain his stance, she forces his penis all the way into her!
skillcount2 3601
mov %damage_kotei,1
damage 180,200
>Luka is being raped by the Queen Elf!\
skillname ""
if %mylife=0 sub %stack,1:return *queenelf_h15
name "Luka"
>Ahhhh!!\
name ""
>Her warm vagina clamps down around me as soon as I'm inside.@
>The overpowering stimulation stuns me, leaving me helpless as soon as the Queen Elf starts to rape me.\
sub %stack,1
goto *queenelf_a11



*queenelf_a11

add %stack,1
>Luka is being raped by the Queen Elf...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Well? How does it feel having everything sucked out...?":mov $sel2,"Her vagina tightens around Luka's penis!"
if %ransu=2 mov $sel1,"Taste the endless pleasure...":mov $sel2,"The Queen Elf's vagina pulls on Luka's penis!"
if %ransu=3 mov $sel1,"Sucked dry by a Queen's pussy... Aren't you the lucky one?":mov $sel2,"As if it was a mouth, the Queen Elf's vagina sucks on Luka's penis!"
if %ransu=4 mov $sel1,"My pussy will leave you dry...":mov $sel2,"Her vagina sucks on Luka!"
if %ransu=5 mov $sel1,"I'll suck out every drop of your semen with my pussy...":mov $sel2,"The Queen Elf's vagina tightens around Luka, almost as if trying to milk him!"
name $name
eng $sel1:$sel6\
name ""
skillname "Infinite Sucking"
dwave 1,"se\ero_chupa4.ogg"
eng $sel2:$sel6
skillcount2 3601
mov %damage_kotei,1
damage 180,200
skillname ""
if %mylife=0 sub %stack,1:return *queenelf_h16
sub %stack,1
goto *queenelf_a11



*queenelf_a12

add %stack,1
mov %owaza_count3b,0
if %kousan=2 skip 4
name $name
>Hehe... I'll end you in an instant.\
name ""
skillname "Standing Grapple"
eng "The Queen Elf grabs hold of Luka, and embraces him tightly against her!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,100
if %wind=2 && %nanido=2 mov %wind_kakuritu,100
if %wind=2 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>Still standing, Luka's arms are bound by the Queen Elf!\
skillname ""
name $name
>Now I'll force it in!\
name ""
skillname "Standing Rape"
dwave 1,"se\ero_pyu1.ogg"
lsp 690,":a;chara\queenelf_ct01.bmp",0,0:print 10,500
>The Queen Elf lifts up her skirt, and forces Luka into her!
mov %damage_kotei,1
damage 180,200
>Luka is being raped by the Queen Elf!\
skillname ""
if %mylife=0 sub %stack,1:return *queenelf_h13
name "Luka"
>Ahhh!\
name ""
>Still standing, the Queen Elf started raping me before I even knew what was happening.\
name $name
>Hehe, it was quick, wasn't it?@
>You've already been defeated...\
>I'll rape you like this, and force you to finish just as fast...\
name ""
sub %stack,1
goto *queenelf_a13



*queenelf_a13

add %stack,1
>Luka is being raped by the Queen Elf...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll tighten it more and more...":mov $sel2,"The Queen Elf's vagina tightens around Luka!"
if %ransu=2 mov $sel1,"Just a little tighter...":mov $sel2,"Her tight vagina gets even tighter!"
if %ransu=3 mov $sel1,"Hehe, it's tight isn't it?":mov $sel2,"Her soft walls squeeze even tighter around Luka's penis!"
if %ransu=4 mov $sel1,"All men like tight pussies, don't they?":mov $sel2,"Her soft vagina clamps down around the tip of Luka's penis!"
if %ransu=5 mov $sel1,"The Queen's pussy is more than you deserve...":mov $sel2,"The deepest part of the Queen Elf's vagina pushes against the tip of Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Hellishly Tight Vagina"
dwave 1,"se\ero_chupa5.ogg"
eng $sel2:$sel6
skillcount2 3600
mov %damage_kotei,1
damage 180,200
skillname ""
if %mylife=0 sub %stack,1:return *queenelf_h14
sub %stack,1
goto *queenelf_a13



*queenelf_a14

add %stack,1
mov %owaza_count2b,0
if %kousan=2 skip 4
name $name
>Hehe, how about this kind of play?\
name ""
skillname "Eyes of Paralysis"
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
eng "The Queen Elf's eyes flash!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,100
if %wind=2 && %nanido=2 mov %wind_kakuritu,100
if %wind=2 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But a gust of wind blocks Luka's view!":gosub *wind_guard:sub %stack,1:return
\
>Luka's body goes rigid as all power fades from him!\
mov %status,2:gosub *status_print
>Luka has been paralyzed!\
skillname ""
mov %status_turn,100
name "Luka"
>Ah...Urhg...\
name ""
>I fall down to the ground, unable to even move a finger.@
>The Queen Elf walks up to me and looks down, grinning.\
name $name
>I'll rape you while you're unable to move.@
>Since you won't be able to do anything else, make sure you watch carefully as I violate you.\
name ""
name "Luka"
>Ahhhh!\
name ""
skillname "Elven Queen's Vagina"
dwave 1,"se\ero_pyu1.ogg"
lsp 690,":a;chara\queenelf_ct01.bmp",0,0
mov %kousoku,2:gosub *status_print
>The Queen Elf laughs as she slowly sits down, forcing Luka into her!
mov %damage_kotei,1
damage 180,200
>Luka is being raped by the Queen Elf!\
skillname ""
if %mylife=0 sub %stack,1:return *queenelf_h10
name "Luka"
>Ahhh!\
name ""
>She moved so slowly, I easily could have thrust her off if I wasn't paralyzed...\
>Forced to watch, I helplessly gasp in pleasure as my penis sinks deep into her warm vagina.\
name $name
>Now to rape you however I want...@
>See how long you can last... Not that I'm expecting much.\
sub %stack,1
goto *queenelf_a15



*queenelf_a15

add %stack,1
>Luka is being raped by the Queen Elf...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"No man can withstand a Queen's skills...":mov $sel2,"The Queen Elf slowly forces Luka in and out of her!"
if %ransu=2 mov $sel1,"I'll thrust a little...":mov $sel2,"The Queen Elf very slowly thrusts in and out of Luka!"
if %ransu=3 mov $sel1,"My pumping will send you to heaven...":mov $sel2,"The Queen Elf bounces on top of Luka, forcing him and out of her like a piston!"
if %ransu=4 mov $sel1,"Let's see if you can last a few seconds as I grind against you...":mov $sel2,"The Queen Elf grinds back and forth against Luka's paralyzed body!"
if %ransu=5 mov $sel1,"How does it feel being helplessly raped?":mov $sel2,"The Queen Elf violently rides Luka!"
name $name
eng $sel1:$sel6\
name ""
skillname "Heavenly Thrusting"
dwave 1,"se\ero_chupa3.ogg"
eng $sel2:$sel6
skillcount2 3580
mov %damage_kotei,1
damage 180,200
skillname ""
if %mylife=0 sub %stack,1:return *queenelf_h12
sub %stack,1
goto *queenelf_a15



*queenelf_a16

add %stack,1
mov %owaza_count2c,0
if %kousan=2 skip 4
name $name
>Shall I turn you into my puppet?\
name ""
skillname "Eyes of Obedience"
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
eng "The Queen Elf's eyes flash!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,100
if %wind=2 && %nanido=2 mov %wind_kakuritu,100
if %wind=2 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But a gust of wind blocks Luka's view!":gosub *wind_guard:sub %stack,1:return
\
mov %status,4:gosub *status_print
>Luka surrenders to the Queen Elf!\
skillname ""
mov %status_turn,100
name "Luka"
>Urhg... What...?\
name ""
name $name
>You cannot ignore my orders any longer.@
>Though there's only one thing a boy like you is good for.\
name ""
>The Queen Elf lifts her skirt, and starts to finger herself.\
name $name
>You're going to put your penis into here.@
>I'll slowly suck out all of your energy...\
>The Succubus skill, Energy Drain...@
>Since I'm the Queen Elf, using a skill like that is easy...\
name ""
name "Luka"
>N...No way...\
name ""
name $name
>Now, force yourself into me.@
>You must stick yourself into the pussy that will defeat you with your own power.\
name ""
name "Luka"
>Y...Yes... Ahh...\
name ""
>I slowly walk up to the Queen Elf, still fingering herself.@
>I can't disobey her orders... I have to stick myself in her...\
name "Luka"
>Ahh... No... I can't do it...\
name ""
name $name
>You aren't allowed to defy me.@
>Now, put it in.\
name ""
name "Luka"
>Yes... Ahhhh...\
name ""
>Obeying her orders, I push myself into her vagina.\
skillname "Elven Queen's Vagina"
dwave 1,"se\ero_pyu1.ogg"
lsp 690,":a;chara\queenelf_ct01.bmp",0,0
mov %kousoku,2:gosub *status_print
>Luka pushes himself into the Queen Elf's vagina!
skillcount2 3582
mov %damage_kotei,1
damage 180,200
>Luka is being raped by the Queen Elf!\
skillname ""
if %mylife=0 sub %stack,1:return *queenelf_h10
name "Luka"
>Ahhh!\
name ""
>I feel her tight vagina squeeze me as I force myself inside her, sending explosions of ecstasy through me.\
name $name
>Now to suck out all of your energy and semen...\
sub %stack,1
goto *queenelf_a17



*queenelf_a17

add %stack,1
name ""
>Luka is being raped by the Queen Elf...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hehe... How does it feel having your energy sucked by an Elf?":mov $sel2,"Her vagina gets tighter as it absorbs Luka's energy!"
if %ransu=2 mov $sel1,"I love sucking the energy from men...":mov $sel2,"Luka's energy is drained out into the Queen Elf's vagina!"
if %ransu=3 mov $sel1,"Shall I suck in some more?":mov $sel2,"Luka's energy is sucked as the Queen Elf's vagina tightens around him!"
if %ransu=4 mov $sel1,"I'll make it even tighter...":mov $sel2,"The Queen Elf squeezes down on Luka, sucking out his energy!"
if %ransu=5 mov $sel1,"Tasting men like this is so fun...":mov $sel2,"Luka's energy is sucked out into the Queen Elf's vagina!"
name $name
eng $sel1:$sel6\
name ""
skillname "Energy Drain"
dwave 1,"se\ero_chupa5.ogg"
eng $sel2:$sel6
skillcount2 3663
mov %damage_kotei,1
damage 180,200
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *queenelf_h17
sub %stack,1
goto *queenelf_a17



*queenelf_onedari

mov $list1,"Elven Hand Squeeze"
if %3577>0 mov %list_num1,1
mov $list2,"Elven Mouth Melt"
if %3578>0 mov %list_num2,1
mov $list3,"Elven Breast Drowning"
if %3579>0 mov %list_num3,1
mov $list4,"Kiss of Ecstasy"
if %3581>0 mov %list_num4,1
mov $list5,"Elven Queen's Vagina"
if %3582>0 mov %list_num5,1
mov $list6,"Heavenly Thrusting"
if %3580>0 mov %list_num6,1
mov $list7,"Hellishly Tight Vagina"
if %3600>0 mov %list_num7,1
mov $list8,"Infinite Sucking"
if %3601>0 mov %list_num8,1
mov $list9,"Energy Drain"
if %3663>0 mov %list_num9,1
gosub *cmd_onedari
if %cmd1=11 goto *queenelf_onedari1
if %cmd1=12 goto *queenelf_onedari2
if %cmd1=13 goto *queenelf_onedari3
if %cmd1=14 goto *queenelf_onedari4
if %cmd1=15 goto *queenelf_onedari5
if %cmd1=16 goto *queenelf_onedari6
if %cmd1=17 goto *queenelf_onedari7
if %cmd1=18 goto *queenelf_onedari8
if %cmd1=19 goto *queenelf_onedari9
if %cmd1=-1 goto *queenelf_main
goto *queenelf_onedari



*queenelf_onedari1

gosub *onedari_syori
name $name
>You want to be pleasured by my hand?@
>Very well then...\
name ""
gosub *queenelf_a1
skip -1



*queenelf_onedari2

gosub *onedari_syori
name $name
>You want to be pleasured by my mouth?@
>Very well then...\
name ""
gosub *queenelf_a2
skip -1



*queenelf_onedari3

gosub *onedari_syori
name $name
>You want to be pleasured by my breasts?@
>Very well then...\
name ""
gosub *queenelf_a3
skip -1



*queenelf_onedari4

gosub *onedari_syori
name $name
>You want to forget everything in my kiss?@
>Very well then...\
name ""
gosub *queenelf_a4
skip -1



*queenelf_onedari5

gosub *onedari_syori_k
name $name
>You want me to rape you...?@
>Hehe... Very well then.\
name ""
if %kousoku=0 gosub *queenelf_a5
gosub *queenelf_a6
skip -1



*queenelf_onedari6

gosub *onedari_syori
name $name
>You want me to rape you?@
>Then let me take away your freedom first...\
name ""
gosub *queenelf_a14
skip -1



*queenelf_onedari7

gosub *onedari_syori
name $name
>You want me to rape you and make it as tight as I can?@
>Very well then...\
name ""
gosub *queenelf_a12
skip -1



*queenelf_onedari8

gosub *onedari_syori
name $name
>You want me to rape you?@
>Very well then...\
name ""
if %hanyo6=0 gosub *queenelf_a8
gosub *queenelf_a10
skip -1



*queenelf_onedari9

gosub *onedari_syori
name $name
>You want your energy to be drained by me?@
>Very well then...\
name ""
gosub *queenelf_a16
skip -1



*queenelf_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\queenelf_bk03.bmp",0,0
gosub *syasei2
>As the Queen Elf strokes Luka's penis, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2627,%2627+1:if %2627=1 mov %count_koenemy,%count_koenemy+1
if %2627>%count_most mov %count_most,%2627:mov $count_mostname,$name
count 5,7
mov $bad1,"The Queen Elf's handjob forced Luka to come."
gosub *face2
name $name
>You've dirtied my hand...\
name ""
goto *queenelf_h



*queenelf_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\queenelf_bk01.bmp",0,0
gosub *syasei2
>As the Queen Elf sucks on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2627,%2627+1:if %2627=1 mov %count_koenemy,%count_koenemy+1
if %2627>%count_most mov %count_most,%2627:mov $count_mostname,$name
count 4,7
mov $bad1,"The Queen Elf's blowjob forced Luka to come."
gosub *face2
name $name
>You've filled up my mouth with quite a lot...\
name ""
goto *queenelf_h



*queenelf_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\queenelf_bk02.bmp",0,0
gosub *syasei2
>As the Queen Elf squeezes Luka's penis with her breasts, he comes, covering her chest in semen.\
mov %viclose,1:gosub *lose
mov %2627,%2627+1:if %2627=1 mov %count_koenemy,%count_koenemy+1
if %2627>%count_most mov %count_most,%2627:mov $count_mostname,$name
count 7,7
mov $bad1,"The Queen Elf's soft breasts forced Luka to come."
gosub *face2
name $name
>You made my chest all dirty...\
name ""
goto *queenelf_h



*queenelf_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\queenelf_bk04.bmp",0,0
gosub *syasei2
>As the sweet sensations from her kiss flood his body, Luka comes, covering the Queen Elf in semen.\
mov %viclose,1:gosub *lose
mov %2627,%2627+1:if %2627=1 mov %count_koenemy,%count_koenemy+1
if %2627>%count_most mov %count_most,%2627:mov $count_mostname,$name
count 18,7
mov $bad1,"The Queen Elf's sweet kiss made Luka come."
gosub *face2
name $name
>Hehe, my kiss was too much for you?\
name ""
goto *queenelf_h



*queenelf_h10

mov %ikigoe,3:gosub *ikigoe
name $name
>Already?\
name ""
gosub *syasei1
lsp 690,":a;chara\queenelf_ct02.bmp",0,0
gosub *syasei2
>As soon as Luka's inside the Queen Elf's vagina, he comes, unable to endure the pleasure for even a moment.\
mov %viclose,1:gosub *lose
mov %2627,%2627+1:if %2627=1 mov %count_koenemy,%count_koenemy+1
if %2627>%count_most mov %count_most,%2627:mov $count_mostname,$name
count 1,7
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come just from insertion."
gosub *face2
name $name
>Hehehe... What a pathetic Hero...@
>Unable to endure my pussy for even a few seconds.\
name ""
goto *queenelf_h



*queenelf_h11

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\queenelf_ct02.bmp",0,0
gosub *syasei2
>As the Queen Elf rapes him, Luka comes, filling her warm vagina with semen.\
mov %viclose,1:gosub *lose
mov %2627,%2627+1:if %2627=1 mov %count_koenemy,%count_koenemy+1
if %2627>%count_most mov %count_most,%2627:mov $count_mostname,$name
count 1,7
mov $bad1,"Luka was forced to come as the Queen Elf raped him."
gosub *face2
name $name
>Hehe... You sure shot a lot into me...@
>Well? How is the Elf Queen's pussy?\
name ""
goto *queenelf_h



*queenelf_h12

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\queenelf_ct02.bmp",0,0
gosub *syasei2
>As the Elf Queen violently rapes Luka, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2627,%2627+1:if %2627=1 mov %count_koenemy,%count_koenemy+1
if %2627>%count_most mov %count_most,%2627:mov $count_mostname,$name
count 1,7
mov $bad1,"Luka was forced to come as the Queen Elf raped him."
gosub *face2
name $name
>Hehe... You sure shot a lot into me...@
>Well? How is the Elf Queen's pussy?\
name ""
goto *queenelf_h



*queenelf_h13

mov %ikigoe,3:gosub *ikigoe
name $name
>Oh, already?\
name ""
gosub *syasei1
lsp 690,":a;chara\queenelf_ct02.bmp",0,0
gosub *syasei2
>As soon as Luka's inside the Elf Queen, the pleasure explodes through him, forcing him to ejaculate right away.\
mov %viclose,1:gosub *lose
mov %2627,%2627+1:if %2627=1 mov %count_koenemy,%count_koenemy+1
if %2627>%count_most mov %count_most,%2627:mov $count_mostname,$name
count 1,7
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come just from simple insertion."
gosub *face2
name $name
>Forgive me, I didn't think you would finish quite that fast...@
>I wanted to give you just a little more pleasure...\
name ""
goto *queenelf_h



*queenelf_h14

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\queenelf_ct02.bmp",0,0
gosub *syasei2
>As the Queen Elf tightens her vagina around his penis, Luka comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2627,%2627+1:if %2627=1 mov %count_koenemy,%count_koenemy+1
if %2627>%count_most mov %count_most,%2627:mov $count_mostname,$name
count 1,7
mov $bad1,"Luka was forced to come as the Queen Elf raped him."
gosub *face2
name $name
>Hehe... You sure shot a lot into me...@
>Well? How is the Elf Queen's pussy?\
name ""
goto *queenelf_h



*queenelf_h15

mov %ikigoe,3:gosub *ikigoe
name $name
>Already? How pathetic...\
name ""
gosub *syasei1
lsp 690,":a;chara\queenelf_ct02.bmp",0,0
gosub *syasei2
>As soon as Luka's inside the Elf Queen, the pleasure explodes through him, forcing him to ejaculate right away.\
mov %viclose,1:gosub *lose
mov %2627,%2627+1:if %2627=1 mov %count_koenemy,%count_koenemy+1
if %2627>%count_most mov %count_most,%2627:mov $count_mostname,$name
count 1,7
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come just from simple insertion."
gosub *face2
name $name
>Forgive me, I didn't think you would finish quite that fast...@
>I wanted to give you just a little more pleasure...\
name ""
goto *queenelf_h



*queenelf_h16

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\queenelf_ct02.bmp",0,0
gosub *syasei2
>Unable to take the pleasure any longer, Luka comes, filling the Queen Elf's vagina with semen.\
mov %viclose,1:gosub *lose
mov %2627,%2627+1:if %2627=1 mov %count_koenemy,%count_koenemy+1
if %2627>%count_most mov %count_most,%2627:mov $count_mostname,$name
count 1,7
mov $bad1,"Luka was forced to come as the Queen Elf raped him."
gosub *face2
name $name
>Hehe... You sure shot a lot into me...@
>Well? How is the Elf Queen's pussy?\
name ""
goto *queenelf_h



*queenelf_h17

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\queenelf_ct02.bmp",0,0
gosub *syasei2
>As Luka's energy is drained out through his penis, he comes, filling the Queen Elf with semen.\
mov %viclose,1:gosub *lose
mov %2627,%2627+1:if %2627=1 mov %count_koenemy,%count_koenemy+1
if %2627>%count_most mov %count_most,%2627:mov $count_mostname,$name
count 1,7
mov $bad1,"Luka was forced to come as the Queen Elf drained his energy."
gosub *face2
name $name
>Hehehe... Every man melts away in bliss when they take that move.\
name ""
goto *queenelf_h



*queenelf_h

mov $bad2,"After stopping Luka from ever making any more semen, the Queen Elf throws him away."
if %2627=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,1:hseanwave:goto *queenelf_hb
name "Luka"
>Ahhh...\
name ""
>Exhausted, I fall onto the ground.@
>Not only couldn't I help Sara, but I've been captured myself...\
name $name
>...Now then, before I continue with Sara, I'll rape you.@
>First I'll make you come in five seconds after insertion to humiliate you.\
>I'll need to show you how worthless of a man you are.\
name ""
name "Luka"
>N...No...\
name ""
>The Queen Elf stands over me with a cold smile on her face.@
>Lifting up her skirt, she starts to sit down on me.\
name $name
>Now, to rape you...@
>See how powerless you are when faced with a Queen's pussy.\
name ""
name "Luka"
>S...Stop... Ahh!\
name ""
mov %hseanwave,1:hseanwave
cspl 690,699
lsp 690,":a;chara\queenelf_ct01.bmp",0,0:print 10,500
>Ignoring my pleas, the Queen Elf just forces me inside her.\
name "Luka"
>Ahh...\
name ""
>I thought she was just teasing me about the five seconds...@
>But as her soft flesh squeezes my penis, I feel myself about to orgasm just from insertion.\
>Her small folds rub against my tip as my penis pushes into her, making my head go white in ecstasy.\
>By the time I'm all the way inside her, it feels like I'm already in a trance.@
>As the tip of my penis pushes against her innermost spot, I feel my waist ache as a powerful orgasm is about to flow over me.\
name "Luka"
>Th...This is too much... Ahh...\
name ""
gosub *syasei1
lsp 690,":a;chara\queenelf_ct02.bmp",0,0
gosub *syasei2
>My body shakes as I explode inside of her, pouring my semen into her warm vagina.\
>Forced to an orgasm only moments after insertion...@
>Just as she said, I couldn't even last five seconds inside her.\
>I start to tremble in helplessness underneath her.\
name $name
>Hehe... Isn't that just pitiful...?@
>But at least it felt good, didn't it?\
name ""
>The Queen Elf smiles at me, but her eyes betray her scorn.\
>She looks down at me as a ruler would look upon her slave... The miserable man she was able to easily control...\
goto *queenelf_hb



*queenelf_hb

name "Luka"
>Ahh...\
name ""
name $name
>After humiliating you...@
>Next, I'll take away your ability to ever have children.\
>With my power, I'll make it so you can never create any more semen.\
name ""
name "Luka"
>Y...You can't... Ahhh!\
name ""
>The Queen Elf suddenly grabs my balls, and starts to massage me.@
>Warmth flows from her hand into me... It feels like some sort of magic power is being forced into me.\
>A horrible sensation flows over me as that warmth takes hold.\
name "Luka"
>What... What are you doing...?\
name ""
name $name
>I'm killing all of your semen...@> And stopping any from ever being made again.\
>You will never have a family of your own now.\
>The human population will decrease if I do this to all of the men...@
>You'll be the first.\
name ""
name "Luka"
>S...Stop it!\
name ""
>She continues to rub my scrotum with her hands as I struggle.@
>Unable to get away and forced to watch, she slowly takes away what it means to be born a man from me.\
>There's no pain, only pleasure from her hands...@
>But the horrifying act makes me shiver in despair.\
name $name
>As I stop you from ever being able to make more semen, I'll need to squeeze out the last of what you've already made...\
name ""
name "Luka"
>Ahhhh!\
name ""
>Her vagina squeezes my penis as she massages my balls, sending sudden sparks of pleasure through me.\
gosub *syasei1
lsp 690,":a;chara\queenelf_ct03.bmp",0,0
gosub *syasei2
>I come inside of her in no time, filling her up with some of the last remains of my semen.\
name "Luka"
>Haa... Ahh...\
name ""
name $name
>Oh my, what an awful lot...@
>But that's good, you should enjoy this, for it's the last chance in your life you'll have to come like that.\
>You should try to make it last a little longer to enjoy it.@
>...Oh, forgive me, I forgot.@> You're unable to endure anything.\
name ""
mov %hseanwave,4:hseanwave
>The Queen Elf giggles as she tightens her vagina around me again, gently fondling my scrotum at the same time.\
>She's behaving like a demon...@
>Destroying my ability to ever make more semen, and squeezing out every drop that I already have...\
name "Luka"
>Ahh... S...Stop already...\
name ""
name $name
>Hehehe... If I could, I would do this to every man in the world.\
>Rape them one by one, and squeeze out every drop of semen...@
>Breaking their only role as a man, and leave them infertile.\
name ""
name "Luka"
>Ahhhh!\
name ""
gosub *syasei1:gosub *syasei2
>She forces me to come inside her again as she speaks.@
>The last of my semen that could create a family, taken from me...\
name $name
>Hehe, you still managed to shoot out that much...@
>Those precious few drops of semen you had left...\
name ""
name "Luka"
>Ahhh...\
name ""
>She continues rubbing my scrotum, still in the process of robbing me of my ability to produce semen.@
>Crying, I beg her to stop.\
name "Luka"
>Stop... Stop it please...\
name ""
name $name
>No matter how much you beg, I won't forgive you.@
>You will be left seedless as punishment for your crimes.\
name ""
>She gently rolls my balls between her skilled fingers.@
>Suddenly, her hands stop moving as a cruel smile crosses her face.\
>Giggling, she squeezes me with her vagina and starts to thrust me in and out of her.\
gosub *syasei1:gosub *syasei2
>After I explode inside her again, she takes her hand off my scrotum.\
name $name
>Hehe... I've finished.@
>You will never create more semen.\
>Your semen has dried up.@
>Your orgasms will only remind you that you are an incomplete man.\
name ""
name "Luka"
>Ahh...\
name ""
>She finished...@>She broke my ability to make semen...\
>I'll never have a family...@>Overcome in despair, I relax my body.\
name "Luka"
>Ahhh...\
name ""
gosub *syasei1
lsp 690,":a;chara\queenelf_ct04.bmp",0,0
gosub *syasei2
mov %hseanwave,0:hseanwave
name $name
>Hehe... That orgasm was nothing but empty fluid.@
>All of your sperm are dead already.\
>Hehe... You can't call yourself a true "man" anymore.@
>How do you feel? Hahaha!\
name ""
name "Luka"
>Ah...aa...\
name ""
>The Queen Elf laughs as she continues raping me, forcing me to orgasm over and over for no reason but my own humiliation.\
gosub *anten
>After that, she throws me away like garbage.@
>Alone and in despair, I wander around the island in a daze.\
>Various Elves and Fairies capture me and treat me like a toy.@
>But since I can't give them semen, they eventually get bored and throw me away for the next random monster to find and use.\
>....................\
goto *badend



*saraevil_start

mov $name,"Sara"
mov $name2,"Sara"
mov $lavel,"saraevil"
mov $tatie1,"saraevil_st01"
mov $tatie2,"saraevil_st02"
mov $tatie3,"saraevil_st03"
mov $tatie4,"saraevil_ha1"
mov $haikei,"bg136"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,12000
if %nanido=2 mov %max_enemylife,13000
if %nanido=3 mov %max_enemylife,18000
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,20
if %nanido=3 mov %earth_keigen,10
mov %music,2
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Don't struggle, Luka..."
mov $mogaku_sel2,"Ahahaha... Luka, you're so weak! "
mov $mogaku_sel3,"Just become mine..."
mov $mogaku_sel4,"Stop struggling..."
mov $mogaku_sel5,"You're still struggling...? Let me put an end to that..."
mov $mogaku_dassyutu1,"Why did you run...?"
mov $mogaku_dassyutu2,""
mov $mogaku_earth_dassyutu1,"You're so rough, Luka..."
mov $mogaku_earth_dassyutu2,""
mov $half_s1,"Hehe... Let me make it feel even better."
mov $half_s2,"I'll let you come a lot, Luka..."
mov $kiki_s1,"Are you about to come?"
mov $kiki_s2,"Hehe... I'm going to make Luka come! "
mov %end_n,8
mov %exp_minus,180000
mov %zmonster_x,-270
mov %tukix,320
mov %owaza_count1a,8
mov %owaza_count1b,8
mov %owaza_count2a,8
name $name
>Ah... What happened to me...?@
>I feel so... Weird...\
>Power is coursing through me... I feel so strong...@
>But I feel so thirsty... I'm so... So hungry...\
name ""
>Sara whispers to herself, almost in a trance.@
>She looks around, until her gaze lands on me.\
name $name
>Ah... It's Luka...@
>You look so... So delicious...@> I want to eat...\
>Hey... Luka...@
>I want to eat your energy so badly...\
name ""
name "Luka"
>Guh...!\
name ""
>Just from looking at her, I can tell she isn't sane.\
name "Luka"
>Get away, Queen Elf!@
>You're too drained of power to protect yourself, right?\
name ""
lsp 700,":a;chara\queenelf_st03.bmp",-160,0
lsp 701,":a;chara\saraevil_st01.bmp",160,0:print 10,500
name "Queen Elf"
>Why are you protecting me...?@
>I'm a monster, an enemy to humans...\
name ""
name "Luka"
>I believe a time will come when humans and monsters understand each other, and live in peace.\
>That's why I'll always fight to protect humans and monsters both!\
name ""
csp 701
lsp 700,":a;chara\saraevil_st01.bmp",0,0:print 10,500
>I take out my sword and stand in front of Sara.@
>If I seal her with my sword, I'm sure she'll return back to human...\
gosub *face2
name $name
>Aha... Luka... Are you going to fight me?@
>That's good... I... I want to mess you up...\
>I... I want to rape you... Violate you... Suck out your semen...@
>My pussy is aching... I want your semen so bad, Luka...\
name ""
gosub *face1
goto *common_main



*saraevil_v

gosub *face3
name $name
>Eh...?@> What am I doing...?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The magical power in Sara fades, turning her back into a human!\
mov %viclose,1:gosub *victory
mov %getexp,75000:gosub *lvup
mov %2328,1
goto *sean0271a



*saraevil_kousan

gosub *kousan_syori
>Luka succumbs to temptation, ending his resistance.\
gosub *face2
name $name
>Ahaha... Luka fell...@
>You'll let me do whatever I want, then? \
name ""
goto *saraevil_a



*saraevil_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *saraevil_kousan
if %cmd1=16 goto *saraevil_onedari
if %cmd1=17 goto *common_skill
goto *saraevil_main



*saraevil_a

if %status=1 gosub *saraevil_a4:goto *common_main
if %kousoku=1 gosub *saraevil_a6:gosub *saraevil_a7:goto *common_main
if %kousoku=2 gosub *saraevil_a9:goto *common_main
rnd2 %ransu,1,9
if %ransu<4 gosub *saraevil_a1:goto *common_main
if %ransu<7 gosub *saraevil_a2:goto *common_main
if %ransu=7 && %owaza_count2a>9 gosub *saraevil_a3:goto *common_main
if %ransu=8 && %owaza_count1a>9 gosub *saraevil_a5:goto *common_main
if %ransu=9 && %owaza_count1b>9 gosub *saraevil_a8:goto *common_main
skip -6



*saraevil_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I want to tease your penis..."
if %ransu=2 mov $sel1,"I want to squeeze it out with my hand..."
if %ransu=3 mov $sel1,"I'll squeeze out Luka's semen with my hand..."
name $name
eng $sel1:$sel6\
name ""
skillname "Earth Mother's Handjob"
dwave 1,"se\ero_koki1.ogg"
>Sara grabs hold of Luka's penis, and slowly strokes him!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3565
if %nanido<2 damage 45,50
if %nanido=2 damage 50,55
if %nanido=3 damage 55,60
dwave 1,"se\ero_koki1.ogg"
>She uses her other hand to rub the tip of Luka's penis!
if %nanido<2 damage 45,50
if %nanido=2 damage 50,55
if %nanido=3 damage 55,60
dwave 1,"se\ero_koki1.ogg"
>She pumps him even faster as she squeezes his tip!
if %nanido<2 damage 45,50
if %nanido=2 damage 50,55
if %nanido=3 damage 55,60
skillname ""
if %mylife=0 sub %stack,1:return *saraevil_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*saraevil_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll wrap it in my breasts..."
if %ransu=2 mov $sel1,"I'll squeeze it out with my breasts..."
if %ransu=3 mov $sel1,"I... I want to feel Luka's semen all over my chest..."
name $name
eng $sel1:$sel6\
name ""
skillname "Isis' Lovemaking"
dwave 1,"se\ero_koki1.ogg"
if %aqua=0 lsp 690,":a;chara\saraevil_ctb01.bmp",0,0:print 10,500
>Sara squeezes Luka's penis between her breasts!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,30
if %wind=2 && %nanido=2 mov %wind_kakuritu,25
if %wind=2 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu
if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3566
if %nanido<2 damage 47,52
if %nanido=2 damage 52,57
if %nanido=3 damage 57,62
dwave 1,"se\ero_koki1.ogg"
>Sara uses her hands to press her breasts together!
if %nanido<2 damage 47,52
if %nanido=2 damage 52,57
if %nanido=3 damage 57,62
dwave 1,"se\ero_koki1.ogg"
>Like that, she pushes her breasts up and down, stroking Luka with them!
if %nanido<2 damage 47,52
if %nanido=2 damage 52,57
if %nanido=3 damage 57,62
skillname ""
if %mylife=0 sub %stack,1:return *saraevil_h2
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*saraevil_a3

add %stack,1
mov %owaza_count2a,0
name $name
>I want to suck out semen...@
>I'll suck as hard as I can, so get ready...\
name ""
skillname "Hellish Blowjob"
dwave 1,"se\ero_pyu2.ogg"
if %aqua=0 lsp 690,":a;chara\saraevil_cta01.bmp",0,0:print 10,500
>Sara's soft lips close tightly around Luka's penis!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu
if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3567
if %nanido<2 damage 47,52
if %nanido=2 damage 52,57
if %nanido=3 damage 57,62
dwave 1,"se\ero_buchu2.ogg"
>Her wet tongue licks the tip of Luka's penis!
if %nanido<2 damage 47,52
if %nanido=2 damage 52,57
if %nanido=3 damage 57,62
dwave 1,"se\ero_buchu3.ogg"
>Pressing her lips tighter around his shaft, Sara sucks on Luka's penis like a vacuum!
if %nanido<2 damage 47,52
if %nanido=2 damage 52,57
if %nanido=3 damage 57,62
mov %status,1:mov %stuck,1:gosub *status_print
>Luka was put into a trance!\
skillname ""
if %mylife=0 sub %stack,1:return *saraevil_h3
if %kousan=2 sub %stack,1:return
name "Luka"
>Haaa...\
name ""
name $name
>Hehe, it's the best, isn't it?@
>I want to taste Luka's semen in my mouth again...\
name ""
rnd2 %status_turn,1,2
if %nanido=2 rnd2 %status_turn,1,2
if %nanido=3 rnd2 %status_turn,2,3
sub %stack,1
return



*saraevil_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Come inside my mouth..."
if %ransu=2 mov $sel1,"I'll suck out Luka's semen..."
if %ransu=3 mov $sel1,"Nnn... I'll suck as hard as I can..."
name $name
eng $sel1:$sel6\
name ""
skillname "Hellish Blowjob"
dwave 1,"se\ero_pyu2.ogg"
>Sara sucks on Luka's penis as hard as she can!
skillcount2 3567
if %nanido<2 damage 47,52
if %nanido=2 damage 52,57
if %nanido=3 damage 57,62
dwave 1,"se\ero_buchu2.ogg"
>Her tongue eagerly licks the tip of Luka's penis!
if %nanido<2 damage 47,52
if %nanido=2 damage 52,57
if %nanido=3 damage 57,62
dwave 1,"se\ero_buchu3.ogg"
>Pressing her lips tighter around his shaft, Sara sucks on Luka's penis like a vacuum!
if %nanido<2 damage 47,52
if %nanido=2 damage 52,57
if %nanido=3 damage 57,62
skillname ""
if %mylife=0 sub %stack,1:return *saraevil_h3
sub %stack,1
return



*saraevil_a5

add %stack,1
mov $tatie4,"saraevil_ha1"
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 4
name $name
>I want it too... Lick me, Luka...\
name ""
skillname "Ecstasy Press"
dwave 1,"se\ero_makituki5.ogg"
if %aqua=0 lsp 700,":a;chara\saraevil_ha1.bmp",0,0:print 10,500
eng "Sara pushes Luka to the ground, and sits on his face!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,15
if %wind=2 && %nanido=2 mov %wind_kakuritu,10
if %wind=2 && %nanido=3 mov %wind_kakuritu,7
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>Sara's vagina is in Luka's face!
skillcount2 3568
if %nanido<2 damage 60,70
if %nanido=2 damage 67,77
if %nanido=3 damage 74,84
mov $tatie4,"saraevil_ha1"
mov %kousoku,1:gosub *status_print
>Sara is riding Luka's face!\
skillname ""
if %mylife=0 sub %stack,1:return *saraevil_h4
if %kousan=2 sub %stack,1:return
name $name
if %first_sel1=1 skip 4
>Ah... I pushed my secret place right into Luka's face...@
>Hey, how do I smell...?\
skip 3
>I want to feel you lick me... Don't run away this time...@
>Hey, how do I smell...?\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,3
if %earth=0 && %nanido=2 mov %genmogaku,4
if %earth=0 && %nanido=3 mov %genmogaku,5
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,2
if %earth>0 && %nanido=3 mov %genmogaku,3
sub %stack,1
return



*saraevil_a6

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Haha... Come as you choke on my pussy..."
if %ransu=2 mov $sel1,"This is the first time I've sat on a man like this... Hehe."
if %ransu=3 mov $sel1,"Well, Luka? How does my pussy taste...?"
name $name
eng $sel1:$sel6\
name ""
skillname "Ecstasy Press"
dwave 1,"se\ero_paizuri.ogg"
>Sara pushes her vagina into Luka's mouth!
>The heat and smell from her overpowers his senses!
skillcount2 3568
if %nanido<2 damage 60,70
if %nanido=2 damage 67,77
if %nanido=3 damage 74,84
skillname ""
if %mylife=0 sub %stack,1:return *saraevil_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*saraevil_a7

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Can I really use this tail to drink semen...?"
if %ransu=2 mov $sel1,"Let me try this tail..."
if %ransu=3 mov $sel1,"Does it feel good when my tail sucks on you...?"
name $name
eng $sel1:$sel6\
name ""
skillname "Tail Drain"
dwave 1,"se\ero_chupa6.ogg"
>Sara's tail sucks in Luka's penis!
skillcount2 3569
if %nanido<2 damage 80,90
if %nanido=2 damage 87,97
if %nanido=3 damage 94,104
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *saraevil_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*saraevil_a8

add %stack,1
mov %owaza_count1b,0
mov %owaza_num1,2
name $name
>I want to have some fun...\
name ""
skillname "Mount"
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
mov $tatie4,"saraevil_hb0"
mov %kousoku,2:gosub *status_print
>Sara pushes Luka down, and sits on top of him!\
skillname ""
if %kousan=2 sub %stack,1:return
name $name
>I'm going to swallow your penis with my pussy...@
>It's throbbing, and so wet... I can't hold myself back...\
name ""
if %earth=0 && %nanido<2 mov %genmogaku,1
if %earth=0 && %nanido=2 mov %genmogaku,1
if %earth=0 && %nanido=3 mov %genmogaku,1
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
sub %stack,1
return



*saraevil_a9

add %stack,1
if %kousan=2 skip 4
name $name
>Here I come! \
name ""
skillname "New Succubus Vagina"
dwave 1,"se\ero_pyu4.ogg"
lsp 700,":a;chara\saraevil_hb1.bmp",0,0:print 10,500
mov %kousoku,3
>Sara drops her waist down, forcing Luka inside her!
mov %damage_kotei,1
damage 200,230
if %mylife=0 sub %stack,1:return *saraevil_h6
>Luka is being raped by Sara!\
skillname ""
if %kousan=2 sub %stack,1:return
name "Luka"
>Ahhh!\
name ""
name $name
>Ahaha... It went in!@
>Hey, Luka... How do you want it?\
>Do you want me to make it reeeeaallly tight?@
>Or do you want me to pump you as hard as I can?\
name ""
sub %stack,1
csel "Tight",*saraevil_a10,"Pump",*saraevil_a11



*saraevil_a10

add %stack,1
name $name
>Then I'll tighten around you! \
name ""
skillcount2 3583
skillname "Penis Choking Vagina"
dwave 1,"se\ero_chupa5.ogg"
>Sara tightens her vagina, squeezing Luka's penis inside her!
mov %damage_kotei,1
damage 200,230
skillname ""
if %mylife=0 sub %stack,1:return *saraevil_h7
name $name
>I'll make it even tighter...\
name ""
skillcount2 3583
skillname "Penis Choking Vagina"
dwave 1,"se\ero_chupa5.ogg"
>Sara clamps down even further, making Luka's penis sink into her soft flesh!
mov %damage_kotei,1
damage 200,230
skillname ""
if %mylife=0 sub %stack,1:return *saraevil_h7
name $name
>Well, Luka...? Do I feel good?@
>Come inside me whenever you want...\
name ""
skillcount2 3583
skillname "Penis Choking Vagina"
dwave 1,"se\ero_chupa5.ogg"
>She gets even tighter, squeezing Luka's penis from every direction!
mov %damage_kotei,1
damage 200,230
skillname ""
if %mylife=0 sub %stack,1:return *saraevil_h7
name $name
>This is it... Now, come! \
name ""
skillcount2 3583
skillname "Penis Choking Vagina"
dwave 1,"se\ero_chupa5.ogg"
>Sara's tight vagina presses down even harder, forcing Luka over the edge!
mov %damage_kotei,1
damage 250,300
skillname ""
sub %stack,1
return *saraevil_h7



*saraevil_a11

add %stack,1
name $name
>You want it rough...?@
>Then I'll rape you as hard as I can! \
name ""
skillname "Overwhelming Grind"
dwave 1,"se\ero_chupa3.ogg"
>Giving in to her lust, Sara bounces on top of Luka as fast as she can!
skillcount2 3584
mov %damage_kotei,1
damage 350,400
dwave 1,"se\ero_chupa3.ogg"
>Forcing Luka in and out of her like a piston, Sara moves even faster!
mov %damage_kotei,1
damage 350,400
dwave 1,"se\ero_chupa3.ogg"
>Sara grinds her waist against Luka as she rides him!
mov %damage_kotei,1
damage 350,400
skillname ""
sub %stack,1
return *saraevil_h8



*saraevil_onedari

mov $list1,"Earth Mother's Handjob"
if %3565>0 mov %list_num1,1
mov $list2,"Isis' Lovemaking"
if %3566>0 mov %list_num2,1
mov $list3,"Hellish Blowjob"
if %3567>0 mov %list_num3,1
mov $list4,"Ecstasy Press"
if %3568>0 mov %list_num4,1
mov $list5,"Tail Drain"
if %3569>0 mov %list_num5,1
mov $list6,"Penis Choking Vagina"
if %3583>0 mov %list_num6,1
mov $list7,"Overwhelming Grind"
if %3584>0 mov %list_num7,1
gosub *cmd_onedari
if %cmd1=11 goto *saraevil_onedari1
if %cmd1=12 goto *saraevil_onedari2
if %cmd1=13 goto *saraevil_onedari3
if %cmd1=14 goto *saraevil_onedari4
if %cmd1=15 goto *saraevil_onedari5
if %cmd1=16 goto *saraevil_onedari6
if %cmd1=17 goto *saraevil_onedari7
if %cmd1=-1 goto *saraevil_main
goto *saraevil_onedari



*saraevil_onedari1

gosub *onedari_syori
name $name
>You want me to use my hands?@
>Then I'll play with you like that...\
name ""
gosub *saraevil_a1
skip -1



*saraevil_onedari2

gosub *onedari_syori
name $name
>You want me to use my breasts?@
>Then I'll play with you like that...\
name ""
gosub *saraevil_a2
skip -1



*saraevil_onedari3

gosub *onedari_syori
name $name
>You want me to use my mouth?@
>Then I'll play with you like that...\
name ""
gosub *saraevil_a3
gosub *saraevil_a4
skip -1



*saraevil_onedari4

if %kousoku=0 gosub *onedari_syori
if %kousoku=1 gosub *onedari_syori_k
if %kousoku>1 gosub *onedari_syori
name $name
>Ahaha... You want to taste my pussy?@
>Then I'll let you choke on it...\
name ""
if %kousoku=0 gosub *saraevil_a5
gosub *saraevil_a6
skip -1



*saraevil_onedari5

gosub *onedari_syori_k
name $name
>You want me to use my tail?@
>Then I'll play with you like that...\
name ""
if %kousoku=0 gosub *saraevil_a5
gosub *saraevil_a7
skip -1



*saraevil_onedari6

if %kousoku<2 gosub *onedari_syori
if %kousoku=2 gosub *onedari_syori_k
name $name
>Ahaha... You want me to rape you?@
>Then I'll enjoy this...\
name ""
if %kousoku<2 gosub *saraevil_a8
if %kousoku=2 gosub *saraevil_a9
gosub *saraevil_a10
skip -1



*saraevil_onedari7

if %kousoku<2 gosub *onedari_syori
if %kousoku=2 gosub *onedari_syori_k
name $name
>Ahaha... You want me to rape you?@
>Then I'll enjoy this...\
name ""
if %kousoku<2 gosub *saraevil_a8
if %kousoku=2 gosub *saraevil_a9
gosub *saraevil_a11
skip -1



*saraevil_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\saraevil_bk03.bmp",0,0
gosub *syasei2
>As Sara strokes Luka's penis, he comes, covering her hands in semen.\
mov %viclose,1:gosub *lose
mov %2628,%2628+1:if %2628=1 mov %count_koenemy,%count_koenemy+1
if %2628>%count_most mov %count_most,%2628:mov $count_mostname,$name
count 5,4
mov $bad1,"Sara's handjob forced Luka to come."
gosub *face2
name $name
>Ahaha... Luka's semen...@
>It tastes so good...\
name ""
goto *saraevil_h



*saraevil_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\saraevil_ctb02.bmp",0,0
gosub *syasei2
>As Sara presses her breasts together around Luka's penis, he comes, covering her chest in semen.\
mov %viclose,1:gosub *lose2
mov %2628,%2628+1:if %2628=1 mov %count_koenemy,%count_koenemy+1
if %2628>%count_most mov %count_most,%2628:mov $count_mostname,$name
count 5,3
mov $bad1,"Sara forced Luka to come using her breasts."
mov $bad2,"After that, she continued using her breasts to play with Luka for the rest of his life."
gosub *face2
name $name
>Ahaha... Luka... Your semen is so delicious...@
>Look... Your sticky semen is all over my breasts...\
name ""
>Sara continues rubbing her breasts against me as she licks up some of the semen.\
name "Luka"
>Ahh... Stop already...\
name ""
name $name
>Hehe... No...\
name ""
skillname "Isis' Lovemaking"
dwave 1,"se\ero_koki1.ogg"
>Sara presses her breasts together!
mov %damage_kotei,1
damage 120,150
dwave 1,"se\ero_koki1.ogg"
>She presses even harder, sinking Luka's penis into her soft flesh!
mov %damage_kotei,1
damage 120,150
dwave 1,"se\ero_koki1.ogg"
>Sara pushes her breasts together as hard as she can!
mov %damage_kotei,1
damage 120,150
skillname ""
name "Luka"
>Ahhh...!\
name ""
name $name
>Hehehe...@
>My breasts are incredible, aren't they?\
name ""
skillname "Isis' Lovemaking"
dwave 1,"se\ero_koki1.ogg"
>Sara rubs her breasts against Luka's penis!
mov %damage_kotei,1
damage 120,150
dwave 1,"se\ero_koki1.ogg"
>Luka's penis sinks deeper into Sara's soft breasts!
mov %damage_kotei,1
damage 120,150
dwave 1,"se\ero_koki1.ogg"
>Luka's penis is squeezed from every direction in her chest!
mov %damage_kotei,1
damage 120,150
skillname ""
name "Luka"
>Ahh... I'm going to come again...\
name ""
name $name
>Ahah... My breasts are going to make you come again!@
>Now, come! \
name ""
skillname "Isis' Lovemaking"
dwave 1,"se\ero_koki1.ogg"
>Sara bounces her breasts up and down!
mov %damage_kotei,1
damage 120,150
dwave 1,"se\ero_koki1.ogg"
>Her left and right breasts rub against Luka's penis in opposite directions!
mov %damage_kotei,1
damage 120,150
dwave 1,"se\ero_koki1.ogg"
>Sara strokes Luka's penis as she pushes her breasts together!
mov %damage_kotei,1
damage 120,150
skillname ""
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 690,":a;chara\saraevil_ctb03.bmp",0,0
gosub *syasei2
>I come all over Sara's breasts again, helpless to endure her.\
name $name
>Ahaha... I'll make you come even more.@
>I'll milk you just like you were a cow...\
name ""
skillname "Isis' Lovemaking"
dwave 1,"se\ero_koki1.ogg"
>Sara bounces up and down quickly, making a vibration stimulation with her breasts!
mov %damage_kotei,1
damage 120,150
dwave 1,"se\ero_koki1.ogg"
>Her soft breasts quickly rub against Luka's penis!
mov %damage_kotei,1
damage 120,150
dwave 1,"se\ero_koki1.ogg"
>Sara's soft breasts press together as she plays with Luka's penis!
mov %damage_kotei,1
damage 120,150
skillname ""
name "Luka"
>S...Stop...\
name ""
>I'm trembling in pleasure under her, but no matter how much I struggle or try to escape, I can't pull myself out from between her breasts.\
name $name
>You can't escape, Luka...@
>I'm going to keep squeezing out your semen like this...\
name ""
skillname "Isis' Lovemaking"
dwave 1,"se\ero_koki1.ogg"
>Sara presses down harder, increasing the pressure!
mov %damage_kotei,1
damage 120,150
dwave 1,"se\ero_koki1.ogg"
>She rubs her breasts hard against Luka's penis!
mov %damage_kotei,1
damage 120,150
dwave 1,"se\ero_koki1.ogg"
>Her soft skin rubs against Luka's penis!
mov %damage_kotei,1
damage 120,150
skillname ""
name "Luka"
>A...Again...!\
name ""
name $name
>Haha, come! @
>I want to watch it shoot out... \
name ""
skillname "Isis' Lovemaking"
dwave 1,"se\ero_koki1.ogg"
>Sara presses her breasts together!
mov %damage_kotei,1
damage 120,150
dwave 1,"se\ero_koki1.ogg"
>Sara bounces her breasts up and down as fast as she can!
mov %damage_kotei,1
damage 120,150
dwave 1,"se\ero_koki1.ogg"
>She shakes side to side, playing with Luka's penis like it was a toy!
mov %damage_kotei,1
damage 120,150
skillname ""
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1
lsp 690,":a;chara\saraevil_ctb04.bmp",0,0
gosub *syasei2
>I let go again, shooting out my semen between Sara's breasts.\
>Sara's chest is already covered in my semen...@> But she doesn't show any signs of being bored yet.\
name "Luka"
>No more... No more...\
name ""
name $name
>I'm going to squeeze out more...@
>I'll keep going until you're dry...\
name ""
name "Luka"
>Ahhhh...\
name ""
gosub *syasei1:gosub *syasei2
mov %battle,0
mov %hsean,1
gosub *anten
gosub *clear_sprite
gosub *setwindow_01p
>I eventually lose consciousness as she continues to use her breasts to milk me.\
>After that, Sara made me a slave to her breasts.@
>Every day for the rest of my life, she uses her breasts to milk me until I faint.\
>..................\
goto *badend



*saraevil_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\saraevil_cta02.bmp",0,0
gosub *syasei2
>As Sara sucks on Luka like a vacuum, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose2
mov %2628,%2628+1:if %2628=1 mov %count_koenemy,%count_koenemy+1
if %2628>%count_most mov %count_most,%2628:mov $count_mostname,$name
count 5,3
mov $bad1,"Sara's blowjob forced Luka to come."
mov $bad2,"After that, she continued sucking Luka dry every day for the rest of his life."
gosub *face2
name $name
>Nnnn... Luka's semen tastes so good...@
>Hey... I want to suck all of it out...\
name ""
name "Luka"
>Ahh... Stop it already...\
name ""
name $name
>Nnnmmm... *Suck*\
name ""
skillname "Hellish Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>Sara continues eagerly sucking on Luka's penis!
mov %damage_kotei,1
damage 120,150
dwave 1,"se\ero_buchu2.ogg"
>She deftly uses her tongue to lick out the last drops of semen from his last ejaculation!
mov %damage_kotei,1
damage 120,150
>Sara sucks as hard as she can, filling the area with the wet sounds of her mouth!
mov %damage_kotei,1
damage 120,150
skillname ""
name "Luka"
>Ahhhh!\
name ""
>I tremble under her as she continues sucking on me, still extra sensitive after my last orgasm.\
name $name
>Nnn... *Lick*\
name ""
skillname "Hellish Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>Sara's tongue presses against the tip of Luka's penis!
mov %damage_kotei,1
damage 120,150
dwave 1,"se\ero_buchu2.ogg"
>She eagerly runs her tongue all over Luka's penis!
mov %damage_kotei,1
damage 120,150
>Sara's saliva drips onto Luka's legs as she sucks even harder on him!
mov %damage_kotei,1
damage 120,150
skillname ""
name "Luka"
>Ahh... I'm going to come again...\
name ""
name $name
>I'll suck it all out...@
>Even if you try to endure it, I'll make sure I get it out...\
name ""
skillname "Hellish Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>Sara presses her lips down tighter around Luka's shaft!
mov %damage_kotei,1
damage 120,150
dwave 1,"se\ero_buchu2.ogg"
>She makes her mouth even smaller, pressing her tongue against Luka's penis!
mov %damage_kotei,1
damage 120,150
>Sara sucks on Luka like a vacuum, as if trying to forcibly draw out his semen!
mov %damage_kotei,1
damage 120,150
skillname ""
name "Luka"
>Ahhhhh!!\
name ""
gosub *syasei1
lsp 690,":a;chara\saraevil_cta03.bmp",0,0
gosub *syasei2
>I explode inside Sara's mouth, still violently sucking on me.@
>My body trembles as it feels like she was sucking out my soul itself.\
>Just as fast as I shoot out the semen, Sara sucks it up and swallows it.\
name "Luka"
>Ahhh...\
name ""
>I relax in weakness as the overwhelming sense of relief floods over my body.\
>All the while, Sara gently sucks on my penis, pulling out the last drops of semen still inside me.\
name "Luka"
>No more... Stop this...\
name ""
name $name
>More... I want to taste more of Luka's semen...@
>Nnn... *Suck*\
name ""
skillname "Hellish Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>Without ever letting Luka's penis leave her mouth, Sara continues sucking on him!
mov %damage_kotei,1
damage 120,150
dwave 1,"se\ero_buchu2.ogg"
>Sucking like a vacuum, she sucks out the last drop of semen that was in Luka's urethra!
mov %damage_kotei,1
damage 120,150
>Sara's tongue pokes at the tip of Luka's penis as she sucks on him!
mov %damage_kotei,1
damage 120,150
skillname ""
name "Luka"
>Ahhh!!\
name ""
>I can feel my penis almost stretching as her intense suction pulls me all the way into her throat itself.\
name "Luka"
>No more... Stop...\
name ""
name $name
>Nnnn... *Suck*\
name ""
skillname "Hellish Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>Sara wraps her tongue around the shaft of Luka's penis!
mov %damage_kotei,1
damage 120,150
dwave 1,"se\ero_buchu2.ogg"
>Her warm saliva covers Luka's penis!
mov %damage_kotei,1
damage 120,150
>Luka sighs as Sara's skilled mouth continues sucking him!
mov %damage_kotei,1
damage 120,150
skillname ""
name "Luka"
>Haaa... I'm going to come again...\
name ""
name $name
>Good, come...\
name ""
skillname "Hellish Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>Sara starts to move her head back and forth, forcing Luka's penis in and out of her mouth!
mov %damage_kotei,1
damage 120,150
dwave 1,"se\ero_buchu2.ogg"
>While sucking on him as hard as she can, she pumps him like a piston!
mov %damage_kotei,1
damage 120,150
>Sara forces Luka's penis in and out of her, from her lips all the way to her throat!
mov %damage_kotei,1
damage 120,150
skillname ""
name "Luka"
>Ahhh...\
name ""
gosub *syasei1
lsp 690,":a;chara\saraevil_cta04.bmp",0,0
gosub *syasei2
>I explode inside her again, shooting my semen straight into her waiting mouth.@
>As she happily swallows my semen, I beg her to stop.\
name "Luka"
>No... No more... Please...\
name ""
name $name
>No... I want to taste more...@
>I want to suck out all of Luka's semen...\
name ""
name "Luka"
>Ahh...\
name ""
gosub *syasei1:gosub *syasei2
mov %battle,0
mov %hsean,1
gosub *anten
gosub *clear_sprite
gosub *setwindow_01p
>I eventually lose consciousness as Sara sucks on me, never satisfied no matter how much semen she swallows.\
>After that, Sara made me her semen sucking slave.@
>Every day, she sucks me until I'm dry, eagerly swallowing all of my semen.\
>These days continue for the rest of my life...\
goto *badend



*saraevil_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>As Sara rides his face, Luka comes, overcome by the sweet smell from her vagina.\
mov %viclose,1:gosub *lose
mov %2628,%2628+1:if %2628=1 mov %count_koenemy,%count_koenemy+1
if %2628>%count_most mov %count_most,%2628:mov $count_mostname,$name
count 17,4
mov $bad1,"Luka was forced to come as Sara rode his face."
gosub *face2
name $name
>Ahaha... You came as you choked on my vagina...\
name ""
goto *saraevil_h



*saraevil_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>As Sara's tail sucks on Luka's penis, he comes, filling it with semen.\
mov %viclose,1:gosub *lose
mov %2628,%2628+1:if %2628=1 mov %count_koenemy,%count_koenemy+1
if %2628>%count_most mov %count_most,%2628:mov $count_mostname,$name
count 19,4
mov $bad1,"Sara's tail forced Luka to come."
gosub *face2
name $name
>Ahaha... I can even suck out semen with my tail...\
name ""
goto *saraevil_h



*saraevil_h6

mov %ikigoe,3:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\saraevil_hb2.bmp",0,0
gosub *syasei2
>Unable to take the overpowering pleasure from Sara's vagina, Luka comes as soon as he's inside her, filling Sara with semen.\
mov %viclose,1:gosub *lose
mov %2628,%2628+1:if %2628=1 mov %count_koenemy,%count_koenemy+1
if %2628>%count_most mov %count_most,%2628:mov $count_mostname,$name
mov %count_bouhatu,%count_bouhatu+1
count 1,4
mov $bad1,"Luka was forced to come just from insertion."
gosub *face2
name $name
>Eh...?@> You... You already came?@
>Hahaha, that's so sad! \
name ""
>After recovering from her surprise, Sara just laughs at me.\
goto *saraevil_h



*saraevil_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\saraevil_hb2.bmp",0,0
gosub *syasei2
>As Sara tightens her vagina around Luka, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2628,%2628+1:if %2628=1 mov %count_koenemy,%count_koenemy+1
if %2628>%count_most mov %count_most,%2628:mov $count_mostname,$name
count 1,4
mov $bad1,"Luka was forced to come as Sara tightened her vagina around him."
gosub *face2
name $name
>Hehe... Luka came inside me...@
>Did it feel good?\
name ""
>Sara laughs at me as I'm left too weak to fight back!\
goto *saraevil_h



*saraevil_h8

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\saraevil_hb2.bmp",0,0
gosub *syasei2
>As Sara violently rapes Luka, he comes, filling her with semen only seconds after insertion.\
mov %viclose,1:gosub *lose
mov %2628,%2628+1:if %2628=1 mov %count_koenemy,%count_koenemy+1
if %2628>%count_most mov %count_most,%2628:mov $count_mostname,$name
count 1,4
mov $bad1,"Sara forced Luka to come in seconds after violating him."
gosub *face2
name $name
>And you're done! @
>Luka, you're a lot more pathetic than I remember. \
name ""
>Sara laughs at me as I'm left too weak to fight back!\
goto *saraevil_h



*saraevil_h

mov $bad2,"Unable to control herself, Sara raped Luka until he died."
if %2628=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>1 mov %hseanwave,18:hseanwave:goto *saraevil_hb
name "Luka"
>Ahh...\
name ""
cspl 690,699
lsp 700,":a;chara\saraevil_hb0.bmp",0,0:print 10,500
>After I fall to the ground exhausted, Sara jumps on top of me with a smile on her face.@
>The once human Sara... She looks completely like a Succubus, corrupted to the core.\
name $name
>Luka, I'm going to completely defeat you with my vagina...@
>I won't stop until you're dry.\
name ""
>Sara uses her fingers to spread open her vagina, dripping wet.@
>Now a Succubus, her lust radiates off her as she slowly brings her waist closer to me.\
name "Luka"
>S...Sara!@>Don't do this!\
name ""
name $name
>Time to devour that penis of yours! \
name ""
mov %hseanwave,1:hseanwave
lsp 700,":a;chara\saraevil_hb1.bmp",0,0:print 10,500
>Sara drops her waist down onto me.\
name "Luka"
>Ahhhh!!\
name ""
>Plunging into her wet vagina, I yell out in despair and pleasure.\
goto *saraevil_hb



*saraevil_hb

>Her soft, warm insides squeeze me as her vaginal lips press against the base of my shaft, as if locking me inside of her.\
name $name
>Well, Luka?@
>How does it feel to be inside of a Succubus' pussy?\
name ""
name "Luka"
>Ahh... T...Tight...@
>Ahhh...\
name ""
name $name
>Hahaha... You're so dirty, Luka.@
>You're already moaning with such a lewd voice.\
name ""
>Sara tightens her vagina around me as she laughs, making it feel like my penis is being crushed inside her soft insides.\
name "Luka"
>Ah...ahh!\
name ""
>I writhe in agony under her as she slowly squeezes me tighter and tighter.\
>Sara looks down at me under her with a smirk on her face, clearly enjoying her dominant position.@
>It's as if she has already completely turned into a Succubus, interested only in teasing her prey...\
name $name
>I'll squeeze your penis as hard as I can...\
name ""
name "Luka"
>Ahhh!\
name ""
>Her soft flesh closes even tighter around my penis, draining me of strength.@
>Before I could stop myself, I feel my waist ache as an orgasm blows through me.\
gosub *syasei1
lsp 700,":a;chara\saraevil_hb2.bmp",0,0
gosub *syasei2
name $name
>Eh?@>Already...?\
name ""
>My body surrendered to Sara before I was even aware of it.@
>The ecstasy of the orgasm mixes with the humiliation at the accidental ejaculation as Sara looks down at me.\
>She was just playing with me, not even trying to make me come...@
>But I still had an orgasm...\
name "Luka"
>Ahh...\
name ""
name $name
>Luka, that was fast. @
>Does my Succubus pussy really feel that good...?\
name ""
>Sara laughs at me as she sits on top of me, clearly enjoying herself.\
name $name
>After Luka's semen shot into me, I felt a rush of power...@
>It feels like I can move my pussy like it was my mouth now.\
>I think I can suck on you with my pussy, just like I did in the castle...\
name ""
name "Luka"
>Ahh...!@>Ahhh!\
name ""
>Sara's pussy suddenly gets smaller, almost as if it was stretching out.@
>Then deep inside of her, I feel a soft suction pulling at the tip of my penis.\
name "Luka"
>Ahh... You're sucking on the tip...\
name ""
name $name
>Hehe... Do like that feeling, Luka?@
>Then let me do it some more...\
name ""
name "Luka"
>Ahhh...\
name ""
>The sucking sensations get even stronger as Sara gets more comfortable with controlling her pussy.@
>Her juices start to overflow from her pussy, covering both my penis and my legs in her wetness.\
name $name
>Hehe... I'm going to suck out your semen, Luka.@
>Then I'll drink it all with my pussy...\
name ""
name "Luka"
>Ahh...\
name ""
>The suction is so strong, it almost feels like she's pulling my waist itself into her.@
>I try to pull out to escape, but with Sara riding on top of me, there's no way I can pull out of her.\
name $name
>Haha... Look at you tremble, Luka. @
>Do you like being sucked on by my pussy that much?\
name ""
name "Luka"
>Ahh...\
name ""
name $name
>Then I'll suck it out now...@
>I'll drink all of Luka's semen with my new Succubus pussy...\
name ""
>A large smile crosses Sara's face as she tightens around my penis and starts to suck on me even harder.\
name "Luka"
>Ahhhhh!!\
name ""
>My head goes blank as the sudden increase in pleasure is too much to endure.\
gosub *syasei1
lsp 700,":a;chara\saraevil_hb3.bmp",0,0
gosub *syasei2
>I explode inside of Sara, shooting my semen straight into her sucking vagina.@
>Her vaginal walls start to squirm, as if excited at the meal just delivered to it.\
>The thought of Sara so happily drinking my semen brings a confusing sort of excitement with it.\
name "Luka"
>Ahh...\
name ""
name $name
>Ahaha... I drank Luka's semen again...@
>Each time I feel your energy come into me, it feels like new powers are awakened...\
>Hehe... I want to try more things with my new pussy...\
name ""
name "Luka"
>Ahhh!!\
name ""
mov %hseanwave,4:hseanwave
>Suddenly, her vaginal walls start to squirm and wriggle around me, as if thousands of tiny little muscles were rubbing me.\
name $name
>I can control the folds inside me like they were my own tongue...\
>Hehe, I'm going to rub Luka's penis and lick him clean...\
name ""
name "Luka"
>Ahhh!\
name ""
>Her tongue-like folds all start to rub and stroke me, from tip to base inside her.\
>I writhe around under Sara as she giggles and tests her newfound ability.\
name $name
>Hehe, I'll lick you even harder...@
>Then make you come inside me as I squeeze you even tighter...\
name ""
name "Luka"
>Ahh...\
name ""
>I helplessly push against Sara, but I can't get her off of me.@
>All the while, I feel her tongue-like folds rub against every inch of my penis.\
>My feeble resistance gets weaker and weaker, until I feel another comfortable ache spread through my body.\
name "Luka"
>Ahh... Again...\
name ""
name $name
>Ahaha, again already?@
>It looks like my new Succubus pussy is way too strong for you. \
name ""
>I moan as she squeezes down around me, instantly increasing the force of stimulation and sending me over the edge.\
gosub *syasei1
lsp 700,":a;chara\saraevil_hb4.bmp",0,0
gosub *syasei2
name "Luka"
>Haaa...\
name ""
>It felt just like she squeezed out that ejaculation.@
>Even as I came, she clamped her vagina tight around me, rubbing me with her folds.\
>I blissfully sigh as Sara sits on top of me, squeezing out every drop of semen into her.\
name "Luka"
>Ahhh...\
name ""
name $name
>Ahaha... It's time to really work you.@
>Sorry, Luka... I'm going to have to suck you dry...\
name ""
>Sara's eyes, that were looking at me as a simple toy for her to play with...@
>Slowly change to one of a predator, hungrily looking at her prey.\
>Suddenly, the shape of her vagina changes.@
>Deep inside of her, something that almost feels like her womb opens up and sucks in the tip of my penis.\
name "Luka"
>Ahhhh!\
name ""
>An intense suction pulls on the tip of my penis in the next instant.@
>I scream in ecstasy at the sudden pleasure, barely managing to beg her to stop one last time.\
name "Luka"
>N...No... Stop this...!\
name ""
name $name
>I'll suck out every drop from you like this...@
>All of Luka's semen will be sucked out with my new Succubus pussy...\
name ""
name "Luka"
>Ah...Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>I quickly come inside her again, shooting my semen right into the womb sucking on my tip.\
name "Luka"
>Ahhh!@
>Stop!!!\
name ""
name $name
>No... I won't stop...@
>I'll suck everything out from you, Luka...\
name ""
name "Luka"
>Hyaaa!\
name ""
gosub *syasei1:gosub *syasei2
>Every time I explode inside her, more and more strength fades from my body.\
>If she sucks out any more, my life will be in danger...@
>But even if I know that, there's nothing I can do to get Sara off from on top of me.\
name "Luka"
>Stop... Help me...\
name ""
name $name
>Ahaha... Luka's semen is so delicious...\
name ""
gosub *syasei1:gosub *syasei2
>Sara continues sucking out both my semen and my life itself.@
>Helpless, I feebly squirm under Sara as she slowly takes my life.\
name "Luka"
>Ha... Ahh...\
name ""
gosub *syasei1:gosub *syasei2
>My breathing gets rough as Sara forces out another orgasm.\
>Sara just looks down at me with cold, unfeeling eyes.@
>Nothing exists of the girl that I once knew...\
name $name
>Ahaha... Already almost gone, Luka?@
>Then let me drink the last drops of your life...\
name ""
name "Luka"
>Ah...a...\
name ""
>With a powerful final suck on my penis, I shiver as my body responds for a final time.\
gosub *syasei1:gosub *syasei2
>A tiny drop of semen leaks out of my penis.\
>The final drop of my life itself, taken by Sara...\
name "Luka"
>...Aa...\
name ""
gosub *anten
mov %hseanwave,0:hseanwave
>Overcome by weakness, my world fades into an unending sleep.\
name $name
>Ahaha... He's all dry...@
>Your life tasted delicious, Luka.\
name ""
>Sara laughs as she sits on top of the boy's corpse.@
>Right after being transformed into a Succubus, she raped her friend to death.\
>After that, the new Succubus went on to create many more sacrifices due to her lust.@
>But her first prey's body remains here...\
>..................\
goto *badend



*wyvern_start

mov $name,"Wyvern"
mov $name2,"Wyvern"
mov $lavel,"wyvern"
mov $tatie1,"wyvern_st01"
mov $tatie2,"wyvern_st02"
mov $tatie3,"wyvern_st03"
mov $tatie4,"wyvern_st02"
mov $haikei,"bg140"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,5500
if %nanido=2 mov %max_enemylife,7550
if %nanido=3 mov %max_enemylife,9300
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,90
mov %earth_keigen,20
if %nanido=3 mov %earth_keigen,10
mov %music,2
mov %tikei,0
gosub *maxmp:mov %mp,1
gosub *syutugen
mov $half_s1,"You won't win!"
mov $half_s2,"No human can beat me in the sky!"
mov $kiki_s1,"At your limit?"
mov $kiki_s2,"I'll finish you off!"
mov %end_n,8
mov %exp_minus,0
mov %zmonster_x,-230
mov %tukix,270
name $name
>It can't be... A Hero riding on top of a Garuda Girl?\
>I'm an air defense soldier of the Monster Lord!@
>If you want to get to Hellgondo, you'll have to get past me first!\
name ""
name "Luka"
>A soldier of the Monster Lord?\
name ""
>As I look back for Alice...@
>It looks like she's hiding under Galda's feathers.\
name $name
>You can't defeat me when we're in the air!@
>I'll teach you a lesson you won't forget!\
name ""
name "Luka"
>Guh...!\
name ""
>She seems like a strong monster, similar to the dragon race...@
>Even worse, we're in the air.\
>She can fly wherever she wants, but I have to stay on Galda's back...\
mov %sinkou,1
goto *common_main



*wyvern001

name "Luka"
>Th...This power...\
name ""
name "Salamander"
>With my power, your fighting spirit is at its maximum.@
>Your SP is maxed out, isn't it...?\
name ""
name "Luka"
>Y...Yeah...@
>And my sword is hot!\
name ""
name "Salamander"
>Your burning spirit took hold in your sword itself.@
>With that extra power, you should be able to tear apart any enemy with your sword skills.\
>But... Right now you're way too fired up.@
>You won't be able to meditate.\
name ""
name "Luka"
>Got it!\
name ""
>My fighting spirit shot up, instantly restoring all my SP.@
>In addition, even my skills themselves seem to be even more powerful...\
>But I'll need to be careful, since I can't heal myself any longer...\
name "Salamander"
>...And one more thing.@
>When the power of fire fades, your SP will drop to zero.\
>It's a berserker attack meant to destroy the enemy in front of you.@
>Go all out with everything you have, because there won't be a second chance...\
name ""
name "Luka"
>...Yeah, got it!\
name ""
>There's no need to worry about defense, since I wouldn't be able to last through a drawn out fight.\
>I'll need to rush headfirst and defeat her before she defeats me!\
mov %sinkou,4
goto *wyvern_a



*wyvern_v

gosub *face3
name $name
>Forgive me, your majesty!\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Wyvern is sealed into the form of a winged lizard!\
mov %viclose,1:gosub *victory
mov %getexp,70000:gosub *lvup
mov %2329,1
mov %skill05,2
goto *sean0281



*wyvern_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>Already giving up...?@
>Then I'll do as I want!\
name ""
goto *wyvern_a



*wyvern_main

gosub *cmd_main
if %cmd1=11 && %nanido=0 goto *common_attack
if %cmd1=11 && %sinkou=1 goto *wyvern_attack1
if %cmd1=11 && %sinkou=2 goto *wyvern_attack2
if %cmd1=11 goto *wyvern_attack3
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *wyvern_kousan
if %cmd1=16 goto *wyvern_onedari
if %cmd1=17 goto *common_skill
goto *wyvern_main



*wyvern_attack1

mov %before_action,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ha!"
if %ransu=2 mov $sel1,"Hya!"
if %ransu=3 mov $sel1,"Orya!"
name "Luka"
eng $sel1:$sel6\
name ""
mov %skill_sub,1
gosub *common_attack2
if %aqua<>2 gosub *mp_kaihuku:gosub *mp
dwave 1,"se\slash.ogg"
rnd2 %damage,50,80:gosub *enemylife2
name "Luka"
>Guh...!\
name ""
>Her defense is just as strong as a dragon's...@
>And I'm unsteady on my feet here since I'm standing on Galda's back.\
>I can't damage her much like this!\
name "Luka"
>This isn't good...@
>I'll have to use my sword skills...\
name ""
lsp2 0,":a;chara\salamander_st01.bmp",250,300,100,100,0,200
gosub *syoukan_effect
name "Salamander"
>No...@
>SP....@> Save it...\
name ""
name "Luka"
>...Hmm?\
name ""
>I thought I heard Salamander whisper something...\
mov %sinkou,2
goto *wyvern_a



*wyvern_attack2

mov %before_action,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ha!"
if %ransu=2 mov $sel1,"Hya!"
if %ransu=3 mov $sel1,"Orya!"
name "Luka"
eng $sel1:$sel6\
name ""
mov %skill_sub,1
gosub *common_attack2
if %aqua<>2 gosub *mp_kaihuku:gosub *mp
dwave 1,"se\slash.ogg"
rnd2 %damage,50,80:gosub *enemylife2
name "Luka"
>It's no good...\
name ""
>I'm barely damaging her.@
>I don't think I'm a match for her when we're in the sky...\
lsp2 0,":a;chara\salamander_st01.bmp",250,300,100,100,0,200
gosub *syoukan_effect
name "Salamander"
>Luka... Can you hear me...?@
>Call me...\
name ""
name "Luka"
>Eh...? But...\
name ""
name "Salamander"
>You should be able to use my power now!@
>If you can infuse your skills with flame, you should be able to turn this fight around!\
name ""
name "Luka"
>G...Got it!\
name ""
mov %skill05,2
mov %sinkou,3
goto *wyvern_a



*wyvern_attack3

mov %before_action,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ha!"
if %ransu=2 mov $sel1,"Hya!"
if %ransu=3 mov $sel1,"Orya!"
name "Luka"
eng $sel1:$sel6\
name ""
mov %skill_sub,1
gosub *common_attack2
if %aqua<>2 gosub *mp_kaihuku:gosub *mp
dwave 1,"se\slash.ogg"
rnd2 %damage,50,80:gosub *enemylife2
name "Luka"
>Guh...!\
name ""
>My normal attacks won't work at all...\
goto *wyvern_a



*wyvern_a

if %fire=2 && %sinkou=3 goto *wyvern001
if %turn>3 && %aqua=0 && %fire=0 gosub *wyvern_a3:goto *common_main
rnd2 %ransu,1,2
if %ransu=1 gosub *wyvern_a1:goto *common_main
if %ransu=2 gosub *wyvern_a2:goto *common_main
skip -3



*wyvern_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Come inside my mouth!"
if %ransu=2 mov $sel1,"I'll violate you with my mouth!"
if %ransu=3 mov $sel1,"Come as I suck on you!"
name $name
eng $sel1:$sel6\
name ""
skillname "Aerial Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>The Wyvern sucks on Luka's penis as hard as she can!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3589
damage 150,170
skillname ""
if %mylife=0 sub %stack,1:return *wyvern_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*wyvern_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Will I crush it between my breasts...?"
if %ransu=2 mov $sel1,"Haha, can you endure this?"
if %ransu=3 mov $sel1,"Now, spill it all out!"
name $name
eng $sel1:$sel6\
name ""
skillname "Violent Breast Rape"
dwave 1,"se\ero_koki1.ogg"
>The Wyvern sandwiches Luka's penis between her breasts, and crushes it!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3590
damage 160,180
skillname ""
if %mylife=0 sub %stack,1:return *wyvern_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*wyvern_a3

add %stack,1
if %kousan=2 skip 4
name $name
>Since you can't fly, you won't dodge this!\
name ""
skillname "Violent Gust"
dwave 1,"se\wind3.ogg"
>The Wyvern creates a violent gust of wind, blowing Luka off Galda's back!\
if %aqua>1 bg "BG\"+$haikei+".bmp",10,1500
mov %wind,0:mov %earth,0:mov %aqua,0
>Luka is falling through the air!\
skillname ""
name $name
>Got you!\
name ""
mov %kousoku,1:gosub *status_print
>The Wyvern swoops down and grabs Luka, embracing him tightly against her body as she flies through the air!\
if %kousan=2 skip 4
name "Luka"
>Guh...!\
name ""
name $name
>Now I'm going to rape you!\
name ""
skillcount2 3591
skillname "Air Rape"
dwave 1,"se\ero_pyu1.ogg"
lsp 690,":a;chara\wyvern_ct01.bmp",0,0:print 10,500
>The Wyvern hugs Luka closer to her, forcing his penis into into her vagina!
mov %damage_kotei,1
damage 260,290
>Luka is being raped by the Wyvern!\
skillname ""
if %mylife=0 sub %stack,1:return *wyvern_h3
name "Luka"
>Ahhh!\
name ""
>Her vagina clamps down around me as soon as I'm inside her, attacking me with overwhelming pleasure.\
name $name
>I'll hold on tight to you...\
name ""
skillcount2 3591
skillname "Air Rape"
dwave 1,"se\ero_chupa5.ogg"
>The Wyvern squeezes down tighter, choking Luka's penis inside her!
mov %damage_kotei,1
damage 260,290
skillname ""
if %mylife=0 sub %stack,1:return *wyvern_h4
name $name
>Hehe, you can't take it much longer, can you?@
>I'll keep squeezing you like this until you come!\
name ""
skillcount2 3591
skillname "Air Rape"
dwave 1,"se\ero_chupa5.ogg"
>The Wyvern's warm vagina squeezes down harder around Luka's penis!
mov %damage_kotei,1
damage 260,290
skillname ""
if %mylife=0 sub %stack,1:return *wyvern_h4
name $name
>This is it...@>Now, you're finished!\
name ""
skillcount2 3591
skillname "Air Rape"
dwave 1,"se\ero_chupa5.ogg"
>The Wyvern tightens around Luka, giving the fatal blow!
mov %damage_kotei,1
damage 260,290
skillname ""
sub %stack,1
return *wyvern_h4



*wyvern_onedari

mov $list1,"Aerial Blowjob"
if %3589>0 mov %list_num1,1
mov $list2,"Violent Breast Rape"
if %3590>0 mov %list_num2,1
mov $list3,"Air Rape"
if %3591>0 mov %list_num3,1
gosub *cmd_onedari
if %cmd1=11 goto *wyvern_onedari1
if %cmd1=12 goto *wyvern_onedari2
if %cmd1=13 goto *wyvern_onedari3
if %cmd1=-1 goto *wyvern_main
goto *wyvern_onedari



*wyvern_onedari1

gosub *onedari_syori
name $name
>You want me to suck on you...?\
name ""
gosub *wyvern_a1
skip -1



*wyvern_onedari2

gosub *onedari_syori
name $name
>You want to be crushed between my breasts?\
name ""
gosub *wyvern_a2
skip -1



*wyvern_onedari3

gosub *onedari_syori
name $name
>You want me to rape you...?@
>In that case...!\
name ""
gosub *wyvern_a3
skip -1



*wyvern_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\wyvern_bk01.bmp",0,0
gosub *syasei2
>As the Wyvern hovers over Luka sucking his penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2629,%2629+1:if %2629=1 mov %count_koenemy,%count_koenemy+1
if %2629>%count_most mov %count_most,%2629:mov $count_mostname,$name
count 4,2
mov $bad1,"Luka was forced to come by the Wyvern's blowjob."
gosub *face2
name $name
>Whew, that was a lot...@
>Your semen is delicious.\
name ""
goto *wyvern_h



*wyvern_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\wyvern_bk02.bmp",0,0
gosub *syasei2
>As the Wyvern crushes Luka's penis between her breasts, he comes, spraying he semen all over her chest.\
mov %viclose,1:gosub *lose
mov %2629,%2629+1:if %2629=1 mov %count_koenemy,%count_koenemy+1
if %2629>%count_most mov %count_most,%2629:mov $count_mostname,$name
count 7,2
mov $bad1,"The Wyvern's breasts forced Luka to come."
gosub *face2
name $name
>Oh, you got it all over my chest...@
>That delicious semen of yours.\
name ""
goto *wyvern_h



*wyvern_h3

mov %ikigoe,3:gosub *ikigoe
name $name
>Already?@> How pathetic...\
name ""
gosub *syasei1
lsp 690,":a;chara\wyvern_ct02.bmp",0,0
lsp 694,":a;chara\wyvern_bk04.bmp",0,0
gosub *syasei2
>As soon as the Wyvern forces Luka into her, he comes, filling her with his semen.\
mov %viclose,1:gosub *lose
mov %2629,%2629+1:if %2629=1 mov %count_koenemy,%count_koenemy+1
if %2629>%count_most mov %count_most,%2629:mov $count_mostname,$name
count 1,2
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come just from simple insertion into the Wyvern."
gosub *face2
name $name
>Whew, how disappointing...@
>I know I feel good, but I was hoping that would last longer than a few seconds.\
name ""
goto *wyvern_h



*wyvern_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\wyvern_ct02.bmp",0,0
lsp 694,":a;chara\wyvern_bk04.bmp",0,0
gosub *syasei2
>As the Wyvern tightly clamps down around Luka's penis, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2629,%2629+1:if %2629=1 mov %count_koenemy,%count_koenemy+1
if %2629>%count_most mov %count_most,%2629:mov $count_mostname,$name
count 1,2
mov $bad1,"Luka was forced to come as the Wyvern raped him in the air."
gosub *face2
name $name
>Heh, so you came inside me?@
>A dragon type monster's vagina is the best, isn't it?\
name ""
goto *wyvern_h



*wyvern_h

mov %skill05,0
mov $bad2,"Luka was used as a breeding slave until he died of exhaustion."
if %2629=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,2:hseanwave:goto *wyvern_hb
name "Luka"
>Ahh...\
name ""
>As soon as my strength fades, the Wyvern swoops down and grabs hold of me.\
>Quickly flying away from Galda, I helplessly stare at the ground thousands of feet below me.\
name $name
>Now to rape you...@
>You should feel honored at having the privilege to mate with a dragon type monster such as myself.\
name ""
>She moves me closer to her, slowly forcing me into her vagina.\
mov %hseanwave,2:hseanwave
lsp 690,":a;chara\wyvern_ct01.bmp",0,0:print 10,500
>Like that, she forces me all the way inside her!\
goto *wyvern_hb



*wyvern_hb

name "Luka"
>Ahhh...!\
name ""
>As her hot vagina wraps tighter all around me, I sigh and move closer to her.\
>Far from fighting against her, I'm actually bringing myself closer to her...\
name $name
>Hehe... No man can withstand my embrace for longer than a minute.@
>You'll be finished inside me, too!\
name ""
name "Luka"
>Ahhh!\
name ""
>Her soft flesh squeezes around me and twitches, sending shocks of pleasure through me with every movement.\
>It feels like I could melt away in her sensations and warmth...@
>She must be so warm because she's part of the dragon race...\
name "Luka"
>Ahh... It's so warm...\
name ""
>I want to give myself over to this warmth...@
>That ruinous desire starts to take over my mind.\
>Just from helplessly clinging to her and being stuck inside her, I start to feel my lower body tingle as another ejaculation is about to explode out of me.\
name $name
>I can feel your penis twitching inside me...@
>Are you already about to give me your seed?\
name ""
>The Wyvern looks down at me and smiles as she soars through the sky.@
>At the same time, she clamps her hot vagina down even tighter around me.\
name $name
>Go on, let it out...@
>Pour all of your seed right into my womb...\
name ""
name "Luka"
>Ahhh!\
name ""
>She squeezes me as she asks for it.@
>Unable to endure it, my body happily obliges...\
gosub *syasei1
lsp 690,":a;chara\wyvern_ct02.bmp",0,0
lsp 694,":a;chara\wyvern_bk04.bmp",0,0
gosub *syasei2
>My semen pours right into her hot vagina.@
>As each twitch shoots out more, the sense of blissful release gets even more intense.\
name $name
>Ahahaha, you really did come!@
>Out of all the men I've raped so far, you are by far the most pathetic.\
name ""
mov %hseanwave,5:hseanwave
>As the Wyvern laughs at me, she starts to shake her hips back and forth.@
>Awkwardly hanging in the air, I'm bounced around all over the place as she forces me in and out of her.\
>At the same time, she clamps down tightly around me, making the friction create an even more unbearable warmth.\
name "Luka"
>Haa... Ahhh!\
name ""
name $name
>Hehe... Mating with a dragon feels good, doesn't it?\
>A man like you could never hope to fight against a dragon when she decides to rape you...\
name ""
name "Luka"
>Ahh... Incredible...\
name ""
>Each flap of her wings bounces me around, making my penis bounce in and out of her in awkward, almost random thrusts.\
>Every time I'm forced all the way in her, she clamps down around the tip of my penis, almost as if trying to hold onto me as I bounce back out.\
>The random stimulation destroys any attempt I could have had at enduring it.@
>With the fall certain to kill me if I struggled, I'm unable to do anything but allow her to rape me however she wants.\
name $name
>It's almost time for the finish...@
>Here, lets make you come inside me again...\
name ""
>With a quick flap of her wings, the Wyvern forces me all the way inside her.@
>Clamping down around my tip, she forces me over the edge in one swift movement.\
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1
lsp 690,":a;chara\wyvern_ct03.bmp",0,0
gosub *syasei2
>I explode inside of her again, shaking in pleasure from the orgasm.\
name $name
>I'll make you come inside me even more!@
>I want every drop out of you!\
name ""
name "Luka"
>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>Forced in and out of her tight vagina, I'm forced to orgasm after orgasm.\
gosub *syasei1:gosub *syasei2
>Given no time to rest, the Wyvern never stops raping me even as we fly through the sky.\
gosub *syasei1:gosub *syasei2
>Forced to consecutive orgasms, almost one after the other, I relax in her embrace, far too weak to even hold onto her anymore.\
name "Luka"
>Ahh... Stop already...@
>Or I'm going to die...\
name ""
name $name
>Didn't I say I would get every drop out of you?@
>I'll force you to keep coming in me, even if it kills you...\
name ""
name "Luka"
>Ahhh!!\
name ""
>I scream in terror and pleasure as she clamps down around me at the same time she speaks.\
gosub *syasei1
lsp 690,":a;chara\wyvern_ct04.bmp",0,0
gosub *syasei2
>Over and over, I'm forced to come inside her...\
>As I fly through the air in her embrace, the Wyvern just keeps on raping me.\
name "Luka"
>Ahh... Aaa...\
name ""
name $name
>More...\
name ""
gosub *syasei1:gosub *syasei2
>No matter how weak I get, the Wyvern just keeps on raping me.@
>My eyes slowly begin to close in exhaustion, my only view of the Wyvern's cold eyes.\
gosub *syasei1:gosub *syasei2
name "Luka"
>Ah...aa...\
name ""
>My consciousness starts to fade as the last of my semen trickles out into her.\
gosub *anten
mov %hseanwave,0:hseanwave
name $name
>...Out of energy?@
>What an amazing way to die... Hehe.\
name ""
>The Wyvern lets go of the boy's corpse, letting his shriveled penis finally break free from her.\
>With no more use for him, the Wyvern lets his lifeless body fall to the ground below.\
>............\
goto *badend



*kyoryuu_start

mov $name,"Kyoryuu"
mov $name2,"Kyoryuu"
mov $lavel,"kyoryuu"
mov $tatie1,"kyoryuu_st01"
mov $tatie2,"kyoryuu_st02"
mov $tatie3,"kyoryuu_st03"
mov $tatie4,"kyoryuu_st11"
mov $haikei,"bg142"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,10000
if %nanido=2 mov %max_enemylife,11000
if %nanido=3 mov %max_enemylife,15000
if %nanido=1 mov %kousoku_maxhp,450
if %nanido=2 mov %kousoku_maxhp,450
if %nanido=3 mov %kousoku_maxhp,750
if %nanido=0 mov %max_enemylife,1
if %nanido<2 mov %kousoku_maxhp,450
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,99
mov %earth_keigen,50
if %nanido=3 mov %earth_keigen,25
mov %music,1
mov %tikei,2
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"No matter how hard Luka struggles, there's no forcing her mouth open!"
mov $mogaku_anno4,"Luka slashes, but only gets in a glancing blow!"
mov $mogaku_sel1,"Stop squirming in my mouth..."
mov $mogaku_sel2,"Stop that..."
mov $mogaku_sel3,"Mmm... You won't get away..."
mov $mogaku_sel4,"You taste good... But stop that..."
mov $mogaku_sel5,"If you struggle I might swallow you..."
mov $half_s1,"I'll make you weaker..."
mov $half_s2,""
mov $kiki_s1,"Can I eat you...?"
mov $kiki_s2,""
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-350
mov %tukix,370
mov %owaza_count1a,3
mov %owaza_count2a,9
name "Luka"
>I...It's huge!\
name ""
>I'm left stunned as the huge monster lumbers by.@
>As expected of this dangerous continent...\
name $name
>........?\
name ""
>Uh oh, it looks like she noticed me...@
>The giant Kyoryuu licks her lips as she eyes me.\
name $name
>Human... Delicious...\
name ""
name "Luka"
>Guh... Do I have to fight!?\
name ""
>This is the home of the monsters...@
>Anyone here looking for a fight is probably really strong!\
goto *common_main



*kyoryuu_v

gosub *face3
name $name
>No more...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Kyoryuu is sealed in the form of a giant turtle!\
mov %viclose,1:gosub *victory
mov %getexp,60000:gosub *lvup
mov %2330,1
goto *sean0282



*kyoryuu_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>I can eat you...?\
name ""
goto *kyoryuu_a



*kyoryuu_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 mov %abairitu,80:goto *common_miss2
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 goto *mogaku_earth1
if %cmd1=12 goto *common_mogaku
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *kyoryuu_kousan
if %cmd1=16 goto *kyoryuu_onedari
if %cmd1=17 goto *common_skill
goto *kyoryuu_main



*kyoryuu_kaihou

gosub *face3
name $name
>Nnnn...\
name ""
mov %kousoku,0:gosub *status_print
dwave 1,"se\dassyutu.ogg"
>Unable to take the repeated attacks, the Kyoryuu spits Luka out!\
gosub *face1
mov %owaza_count1a,0
goto *common_main



*kyoryuu_a

if %kousoku=1 && %kousoku_hp<0 goto *kyoryuu_kaihou
if %kousoku=1 rnd2 %ransu,1,2
if %kousoku=1 && %ransu=1 gosub *kyoryuu_a5:goto *common_main
if %kousoku=1 && %ransu=2 gosub *kyoryuu_a6:goto *common_main
rnd2 %ransu,1,7
if %ransu<3 gosub *kyoryuu_a1:goto *common_main
if %ransu<5 gosub *kyoryuu_a2:goto *common_main
if %ransu<7 && %owaza_count1a>4 gosub *kyoryuu_a3:goto *common_main
if %ransu=7 && %owaza_count2a>10 && %status=0 gosub *kyoryuu_a4:goto *common_main
skip -5



*kyoryuu_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Nnn... *Slurp*"
if %ransu=2 mov $sel1,"I'm drooling..."
if %ransu=3 mov $sel1,"Ah..."
name $name
eng $sel1:$sel6\
name ""
skillname "Sticky Saliva"
dwave 1,"se\ero_pyu5.ogg"
eng "The Kyoryuu opens her mouth, dripping huge amounts of saliva on Luka!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,15
if %wind=2 && %nanido=2 mov %wind_kakuritu,10
if %wind=2 && %nanido=3 mov %wind_kakuritu,7
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>Luka's body is covered in her warm saliva!
skillcount2 3667
if %nanido<2 damage 140,160
if %nanido=2 damage 160,180
if %nanido=3 damage 180,200
skillname ""
if %mylife=0 sub %stack,1:return *kyoryuu_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kyoryuu_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Licking..."
if %ransu=2 mov $sel1,"*Lick*"
if %ransu=3 mov $sel1,"Do humans taste good...?"
name $name
eng $sel1:$sel6\
name ""
skillname "Wet Lick"
dwave 1,"se\ero_pyu1.ogg"
eng "The Kyoryuu's licks Luka with her gigantic tongue!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,15
if %wind=2 && %nanido=2 mov %wind_kakuritu,10
if %wind=2 && %nanido=3 mov %wind_kakuritu,7
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>Luka's entire body is covered in her warm saliva!
skillcount2 3668
if %nanido<2 damage 150,170
if %nanido=2 damage 170,190
if %nanido=3 damage 190,210
skillname ""
if %mylife=0 sub %stack,1:return *kyoryuu_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kyoryuu_a3

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name $name
>Ahh...\
name ""
skillname "Chomp"
dwave 1,"se\ero_sigoki1.ogg"
>The Kyoryuu opens wide, and closes her mouth around Luka's body!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,15
if %wind=2 && %nanido=2 mov %wind_kakuritu,10
if %wind=2 && %nanido=3 mov %wind_kakuritu,7
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
if %nanido<2 damage 160,180
if %nanido=2 damage 160,180
if %nanido=3 damage 180,200
lsp 690,":a;chara\kyoryuu_ct01.bmp",0,0
mov %kousoku,1:gosub *status_print
>Luka's stuck in the Kyoryuu's mouth!\
skillname ""
if %mylife=0 sub %stack,1:return *kyoryuu_h3
if %kousan=2 sub %stack,1:return
name $name
>Human... Delicious...\
name ""
mov %kousoku_hp,%kousoku_maxhp
sub %stack,1
return



*kyoryuu_a4

add %stack,1
mov %owaza_count2a,0
name $name
>Ah...\
name ""
skillname "Kyoryuu's Earthquake"
dwave 1,"se\karaburi.ogg"
eng "The Kyoryuu swings a gigantic arm down at Luka!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,80
if %wind=2 && %nanido=2 mov %wind_kakuritu,70
if %wind=2 && %nanido=3 mov %wind_kakuritu,40
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>A single, powerful blow slams into Luka!
mov %a_effect1,1
if %nanido<2 damage 180,200
if %nanido=2 damage 180,200
if %nanido=3 damage 200,220
if %mylife=0 sub %stack,1:return *kyoryuu_h4
mov %status,2:gosub *status_print
>Luka has been paralyzed!\
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,2,3
if %nanido=3 rnd2 %status_turn,3,4
sub %stack,1
return



*kyoryuu_a5

add %stack,1
>Luka is being held in the Kyoryuu's mouth...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Let me lick you..."
if %ransu=2 mov $sel1,"I want to lick it out..."
if %ransu=3 mov $sel1,"Nnn... Delicious..."
name $name
eng $sel1:$sel6\
name ""
skillname "Full-Body Lick"
dwave 1,"se\ero_pyu1.ogg"
>The Kyoryuu starts licking Luka with her gigantic tongue!
skillcount2 3592
if %nanido<2 damage 160,180
if %nanido=2 damage 160,180
if %nanido=3 damage 200,220
skillname ""
if %mylife=0 sub %stack,1:return *kyoryuu_h5
sub %stack,1
return



*kyoryuu_a6

add %stack,1
>Luka is being held in the Kyoryuu's mouth...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Let me suck..."
if %ransu=2 mov $sel1,"I'll suck until the taste is gone..."
if %ransu=3 mov $sel1,"Delicious... I want to suck more..."
name $name
eng $sel1:$sel6\
name ""
skillname "Full-Body Suck"
dwave 1,"se\ero_buchu3.ogg"
>The Kyoryuu starts to suck on Luka's body!
skillcount2 3593
if %nanido<2 damage 170,190
if %nanido=2 damage 170,190
if %nanido=3 damage 190,210
skillname ""
if %mylife=0 sub %stack,1:return *kyoryuu_h6
sub %stack,1
return



*kyoryuu_onedari

mov $list1,"Sticky Saliva"
if %3667>0 mov %list_num1,1
mov $list2,"Wet Lick"
if %3668>0 mov %list_num2,1
mov $list3,"Full-Body Lick"
if %3592>0 mov %list_num3,1
mov $list4,"Full-Body Suck"
if %3593>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *kyoryuu_onedari1
if %cmd1=12 goto *kyoryuu_onedari2
if %cmd1=13 goto *kyoryuu_onedari3
if %cmd1=14 goto *kyoryuu_onedari4
if %cmd1=-1 goto *kyoryuu_main
goto *kyoryuu_onedari



*kyoryuu_onedari1

gosub *onedari_syori
name $name
>My saliva...?\
name ""
gosub *kyoryuu_a1
skip -1



*kyoryuu_onedari2

gosub *onedari_syori
name $name
>My tongue...?\
name ""
gosub *kyoryuu_a2
skip -1



*kyoryuu_onedari3

gosub *onedari_syori_k
name $name
>Licking...?\
name ""
if %kousoku=0 gosub *kyoryuu_a3
gosub *kyoryuu_a5
skip -1



*kyoryuu_onedari4

gosub *onedari_syori_k
name $name
>Sucking...?\
name ""
if %kousoku=0 gosub *kyoryuu_a3
gosub *kyoryuu_a6
skip -1



*kyoryuu_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>As Luka's covered in her warm saliva, he ejaculates.\
mov %viclose,1:gosub *lose
mov %2630,%2630+1:if %2630=1 mov %count_koenemy,%count_koenemy+1
if %2630>%count_most mov %count_most,%2630:mov $count_mostname,$name
count 11,11
mov $bad1,"Luka was forced to come as the Kyoryuu's saliva dripped on him."
gosub *face2
name $name
>The white stuff shot out...\
name ""
goto *kyoryuu_h



*kyoryuu_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\kyoryuu_bk01.bmp",0,0
gosub *syasei2
>As the Kyoryuu's giant tongue licks him, Luka comes, covering her tongue in semen.\
mov %viclose,1:gosub *lose
mov %2630,%2630+1:if %2630=1 mov %count_koenemy,%count_koenemy+1
if %2630>%count_most mov %count_most,%2630:mov $count_mostname,$name
count 4,11
mov $bad1,"Luka was forced to come as the Kyoryuu licked him."
gosub *face2
name $name
>The white stuff shot out...\
name ""
goto *kyoryuu_h



*kyoryuu_h3

mov %ikigoe,3:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\kyoryuu_st12.bmp",0,0
lsp 690,":a;chara\kyoryuu_ct02.bmp",0,0
gosub *syasei2
>As soon as Luka is sucked into the Kyoryuu's mouth, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2630,%2630+1:if %2630=1 mov %count_koenemy,%count_koenemy+1
if %2630>%count_most mov %count_most,%2630:mov $count_mostname,$name
count 4,11
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come as soon as he was sucked into the Kyoryuu's mouth."
gosub *face2
name $name
>The white stuff shot out...\
name ""
goto *kyoryuu_h



*kyoryuu_h4

name "Luka"
>Ahhg...\
name ""
>Taking a powerful blow, Luka is left unable to move.\
mov %viclose,2:gosub *lose
mov %2630,%2630+1:if %2630=1 mov %count_koenemy,%count_koenemy+1
if %2630>%count_most mov %count_most,%2630:mov $count_mostname,$name
count 14,11
mov $bad1,"The Kyoryuu's powerful blow immobilized Luka."
gosub *face2
name $name
>He stopped moving...\
name ""
goto *kyoryuu_h



*kyoryuu_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\kyoryuu_st12.bmp",0,0
lsp 690,":a;chara\kyoryuu_ct02.bmp",0,0
gosub *syasei2
>As the Kyoryuu licked Luka's entire body inside her mouth, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2630,%2630+1:if %2630=1 mov %count_koenemy,%count_koenemy+1
if %2630>%count_most mov %count_most,%2630:mov $count_mostname,$name
count 4,11
mov $bad1,"Luka was forced to come as the Kyoryuu licked him."
gosub *face2
name $name
>The white stuff shot out...\
name ""
goto *kyoryuu_h



*kyoryuu_h6

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\kyoryuu_st12.bmp",0,0
lsp 690,":a;chara\kyoryuu_ct02.bmp",0,0
gosub *syasei2
>As the Kyoryuu sucks on Luka's body, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2630,%2630+1:if %2630=1 mov %count_koenemy,%count_koenemy+1
if %2630>%count_most mov %count_most,%2630:mov $count_mostname,$name
count 4,11
mov $bad1,"Luka was forced to an orgasm as the Kyoryuu sucked on his body."
gosub *face2
name $name
>The white stuff shot out...\
name ""
goto *kyoryuu_h



*kyoryuu_h

mov $bad2,"The Kyoryuu kept sucking on Luka's body like a piece of candy, until he dissolved in her mouth."
if %2630=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanvoice,5:hseanvoice:lsp 690,":a;chara\kyoryuu_ct03.bmp",0,0:print 10,500:goto *kyoryuu_hb
name "Luka"
>Ahh...\
name ""
name $name
>Now I'll suck...\
name ""
>The Kyoryuu picks me up...@
mov %hseanvoice,5:hseanvoice
cspl 690,699
lsp 690,":a;chara\kyoryuu_ct03.bmp",0,0
lsp 700,":a;chara\kyoryuu_st11.bmp",0,0:print 10,500
>And sucks me into her mouth!\
name $name
>Mmmm...\
name ""
goto *kyoryuu_hb



*kyoryuu_hb

name "Luka"
>Ahhhh!!\
name ""
>Her warm, sticky saliva washes over my body as she sucks on me inside her mouth.\
>At the same time, her gigantic tongue pushes against my body as it runs back and forth over me, licking me clean.\
name $name
>Mmm... Nnn...\
name ""
name "Luka"
>Ahhh...\
name ""
>More sticky saliva covers me as she starts to salivate.\
>Before long, she starts to play with my groin with the tip of her tongue.@
>Reacting to her powerful licks, my penis starts to get erect.\
name $name
>Penis... I'll lick it...\
name ""
>Feeling my penis get erect with her huge tongue, she starts to focus solely on it.\
>My ears fill with the wet sounds of her huge mouth as she licks me, her gigantic tongue eagerly licking my penis.\
name $name
>Nnnn...@
>You taste good...\
name ""
name "Luka"
>Ahhh!\
name ""
>I tremble inside her mouth as her unrelenting tongue keeps tasting me.\
>I struggle as hard as I can, but my hands and feet just pointlessly sink into her soft tongue.\
name $name
>Mmmm...\
name ""
name "Luka"
>Ahhh!\
name ""
>Her strong tongue licks me over and over, with no signs of stopping.@
>Despite the huge tongue, she deftly controls it, gently licking at my comparatively small penis.\
name $name
>Your penis tastes good... Nnn...\
name ""
name "Luka"
>Haaa...\
name ""
>Before I had noticed it, I was giving in to the sensations, letting her huge mouth toss me around as her tongue keeps on licking me.\
name "Luka"
>Ah...Ahh... That feels good...\
name ""
>My waist starts to ache as I feel an ejaculation about to break through.@
>Expecting the orgasm, I unconsciously push forward into her tongue as pre-come starts to leak out.\
name $name
>Ah, the filling is coming out...@
>The tip tastes so good...\
name ""
>Her tongue starts to focus on the tip of my penis, eagerly licking and sucking up each drop of pre-come that comes leaking out.\
>Unable to endure it any longer, I relax my body as her tongue keeps me pinned down in her mouth.\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\kyoryuu_ct04.bmp",0,0
lsp 700,":a;chara\kyoryuu_st12.bmp",0,0:print 10,500
gosub *syasei2
>My penis twitches as I explode inside her mouth, spraying my semen all over inside her.\
name $name
>So much filling...@
>Mmmm...\
name ""
name "Luka"
>Ahhh...\
name ""
>I feebly shake my waist as her powerful tongue licks up all the semen off my penis, still extra sensitive after my orgasm.\
name $name
>Nnnn... *Suck*\
name ""
>The Kyoryuu starts to salivate suddenly, covering my body in her warm saliva.\
>It's almost like I was dipped into a warm pool of water.\
name "Luka"
>Uhg... Ah...\
name ""
name $name
>*Suck* *Suck*\
name ""
>Suddenly, a powerful suction pulls on my body.@
>Her mouth narrows as she starts to suck hard on my body, while still licking me with her tongue at the same time.\
>It's almost like I'm a piece of candy, and she's just enjoying the taste as she plays with me in her mouth...\
name "Luka"
>Ahhh!\
name ""
name $name
>Mmmn...@
>Delicious... *Suck*\
name ""
>Attacked head to toe with the powerful stimulation, I moan as her warm saliva washes over me with every suck.\
name "Luka"
>Ahh... That feels good...\
name ""
>I relax and give myself over to the pleasure as she tosses me around and sucks on me.@
>I immerse myself in pleasure as her giant tongue plays with me like I was a piece of candy.\
gosub *syasei1
lsp 690,":a;chara\kyoryuu_ct05.bmp",0,0
gosub *syasei2
>I quickly explode inside her again.@
>As soon as I do, the Kyoryuu starts to eagerly suck even harder on my whole body.\
name "Luka"
>Ahh... Amazing...\
name ""
name $name
>Delicious... Mmmnn...\
name ""
>The Kyoryuu's giant tongue starts licking my penis again, eager to lap up all of the semen I just shot out.\
name $name
>That tastes good...@
>Shoot out more...\
name ""
name "Luka"
>Ahhh... That feels good...\
name ""
gosub *syasei1
lsp 690,":a;chara\kyoryuu_ct06.bmp",0,0
gosub *syasei2
>I sigh in ecstasy as her giant tongue forces me to another height.@
>Overcome by bliss, I don't even notice my body beginning to be dissolved away.\
name "Luka"
>Ahhh...\
name ""
>The Kyoryuu keeps sucking on me like that, forcing me to orgasm after orgasm.@
>As time goes on, more and more of my body dissolves away inside her mouth.\
>She treats me like candy until the very end.@
>Enjoying my taste until there's nothing left...\
name $name
>Nnn... Mmmn...\
name ""
name "Luka"
>Ahh...\
name ""
>The last of my life melts away inside her mouth, no longer giving the Kyoryuu the delicious taste she was enjoying...\
gosub *anten
mov %hseanvoice,0:hseanvoice
>...............\
goto *badend



*c_beast_start

mov $name,"Chimera Beast"
mov $name2,"Chimera Beast"
mov $lavel,"c_beast"
mov $tatie1,"c_beast_st01"
mov $tatie2,"c_beast_st01"
mov $tatie3,"c_beast_st03"
mov $tatie4,"c_beast_st01"
mov $haikei,"bg143"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,8500
if %nanido=2 mov %max_enemylife,9500
if %nanido=3 mov %max_enemylife,14700
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,75
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %music,1
mov %tikei,0
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $half_s1,"Enemy weakening..."
mov $half_s2,"Continue attack."
mov $kiki_s1,"Imminent semen release."
mov $kiki_s2,"Continue until ejaculation."
mov %end_n,9
mov %exp_minus,0
mov %zmonster_x,-200
mov %tukix,320
mov %owaza_count3a,7
name "Luka"
>Wh...Who are you!?\
name ""
>A strange monster jumps in front of us!\
>It almost looks like a collection of random creatures, all fused together...\
>And this feeling... It doesn't feel alive...\
>That's right...@>I've felt something like this before...\
lsp 699,":a;chara\alice_st91b.bmp",-120,0
lsp 700,":a;chara\alice_st01b.bmp",-120,0
lsp 701,":a;chara\c_beast_st01.bmp",160,0:print 10,500
name "Alice"
>...I don't recognize this monster.\
name ""
>I've heard those words before.\
>This is just like when we were leaving the Forest of Spirits.@
>That Chimera Dryad... I'm getting the same feeling from this as I did back then.\
>Why is this thing in Remina...?\
name $name
>Human... Monster... Eliminate.\
name ""
>The Chimera Beast kicks the ground...@
dwave 1,"se\karaburi.ogg"
>In the next moment, a giant claw goes shooting past my head!\
name "Luka"
>Guh...!\
name ""
dwave 1,"se\miss.ogg"
>I barely managed to dodge it.\
lsp 700,":a;chara\alice_st03b.bmp",-120,0:print 10,500
name "Alice"
>Don't let your guard down, Luka!@
>This thing's physical abilities are insanely high!\
name ""
name "Luka"
>Yeah, got it!\
name ""
>I could understand that much just from her last attack...@
>I take out my sword, and stand in a ready position in front of the strange beast.\
lsp 698,":a;chara\c_beast_st01.bmp",310,0:print 10,500
>Suddenly, another Chimera appears behind some nearby grass!\
name "Luka"
>Another one!?\
name ""
name "Alice"
>No... It's not just two!\
name ""
>She's right... I feel them all around us.@
>Things that feel just like these two are swarming toward us, attracted by the sound!\
>There are way too many for me to count.@
>Maybe a hundred or more...\
name "Luka"
>What the hell is going on!?\
name ""
name "Alice"
>This isn't the time to lose focus!\
name ""
dwave 1,"se\dageki2.ogg"
>Alice speeds forward, slamming her fist right into one of the Chimera Beasts.\
>Carried forward by her momentum, the two of them break through a nearby building in a loud explosion.\
dwave 1,"se\escape.ogg"
cspl 698,700:print 10,500
>After that, she runs off.\
name "Luka"
>Oi, Alice!\
name ""
>She's heading right toward where they're all coming from...@
>Even for Alice, facing a hundred of those is way too much.\
>I have to help her...@
csp 701
lsp 700,":a;chara\c_beast_st01.bmp",0,0:print 10,500
>But that original Chimera Beast blocks my path.\
name $name
>Target selected.@> Human male.@
>Gene quality... High.\
name ""
name "Luka"
>Guh...!\
name ""
>I won't be able to help Alice until I get past her!\
name "Luka"
>...B...Bring it!\
name ""
>I point my sword at her, ready to attack.\
goto *common_main



*c_beast_v

gosub *face3
name $name
>Injured... Too much damage...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Chimera Beast fades, spraying chunks of meat everywhere.@
>Right in the center of the flesh is a tiny tiger.\
name "Luka"
>...Wh...What?\
name ""
>Why did it do that...?@> A sealed monster should be sealed into a smaller form...\
dwave 1,"se\escape.ogg"
>The tiny tiger runs away covered in flesh and blood, leaving behind the chunks of meat.\
mov %viclose,1:gosub *victory
mov %getexp,100000:gosub *lvup
mov %2331,1
goto *sean0284



*c_beast_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>Surrender confirmed.@
>Continue attack.\
name ""
goto *c_beast_a



*c_beast_main

gosub *cmd_main
if %cmd1=11 goto *common_attack
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *c_beast_kousan
if %cmd1=16 goto *c_beast_onedari
if %cmd1=17 goto *common_skill
goto *c_beast_main



*c_beast_a

rnd2 %ransu,1,4
if %ransu=1 gosub *c_beast_a1:goto *common_main
if %ransu=2 gosub *c_beast_a2:goto *common_main
if %ransu=3 gosub *c_beast_a3:goto *common_main
if %ransu=4 && %owaza_count3a>6 gosub *c_beast_a4:goto *common_main
skip -5



*c_beast_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Attack option A. Breast use."
if %ransu=2 mov $sel1,"Neutralize enemy with breasts."
if %ransu=3 mov $sel1,"Double breast use initialized."
name $name
eng $sel1:$sel6\
name ""
skillname "Double Breast Rape"
dwave 1,"se\ero_koki1.ogg"
eng "The Chimera Beast forces Luka's lower body between her double set of breasts, and forces him up and down!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3594
>Her soft breasts rub against Luka's penis!
if %nanido<2 damage 55,66
if %nanido=2 damage 60,71
if %nanido=3 damage 65,76
dwave 1,"se\ero_koki1.ogg"
>Another soft breast pushes against Luka's balls!
if %nanido<2 damage 55,66
if %nanido=2 damage 60,71
if %nanido=3 damage 65,76
dwave 1,"se\ero_koki1.ogg"
>Luka's penis sinks into her soft breast!
if %nanido<2 damage 55,66
if %nanido=2 damage 60,71
if %nanido=3 damage 65,76
skillname ""
if %mylife=0 sub %stack,1:return *c_beast_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_beast_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Attack option B. Tongue use."
if %ransu=2 mov $sel1,"Force pleasure on enemy with tongue use."
if %ransu=3 mov $sel1,"Neutralize enemy with tongues."
name $name
eng $sel1:$sel6\
name ""
skillname "Tongue Splash"
dwave 1,"se\ero_makituki1.ogg"
eng "Several tongues grow on the Chimera Beast, and reach out to Luka's penis!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3595
>One tongue licks up and down Luka's shaft!
if %nanido<2 damage 60,70
if %nanido=2 damage 65,75
if %nanido=3 damage 70,80
dwave 1,"se\ero_makituki2.ogg"
>Another tongue wraps around the tip of Luka's penis!
if %nanido<2 damage 60,70
if %nanido=2 damage 65,75
if %nanido=3 damage 70,80
dwave 1,"se\ero_makituki2.ogg"
>A third tongue gently licks Luka's balls!
if %nanido<2 damage 60,70
if %nanido=2 damage 65,75
if %nanido=3 damage 70,80
skillname ""
if %mylife=0 sub %stack,1:return *c_beast_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_beast_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Attack C selected. Tail suction."
if %ransu=2 mov $sel1,"Vacuum out semen with tail."
if %ransu=3 mov $sel1,"Suck out all of the target's semen with my tail."
name $name
eng $sel1:$sel6\
name ""
skillname "Vacuum Tail"
eng "The Chimera Beast's tail reaches out toward Luka's groin!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
dwave 1,"se\ero_pyu1.ogg"
lsp 690,":a;chara\c_beast_ct01.bmp",0,0:print 10,500
>The Chimera Beast sucks Luka's penis into her tail!
skillcount2 3596
if %nanido<2 damage 70,80
if %nanido=2 damage 75,85
if %nanido=3 damage 80,90
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
dwave 1,"se\ero_syokusyu3.ogg"
>Her tail shrinks around Luka's penis!
if %nanido<2 damage 70,80
if %nanido=2 damage 75,85
if %nanido=3 damage 80,90
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
dwave 1,"se\ero_syokusyu1.ogg"
>The Chimera Beast's tail sucks on Luka's penis like a vacuum!
if %nanido<2 damage 70,80
if %nanido=2 damage 75,85
if %nanido=3 damage 80,90
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *c_beast_h3
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_beast_a4

add %stack,1
mov %owaza_count3a,0
if %kousan=2 skip 4
name $name
>Attack option D selected.@>Begin rape.\
name ""
skillname "Rape Assault"
eng "The Chimera Beast charges at Luka!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,100
if %wind=2 && %nanido=2 mov %wind_kakuritu,100
if %wind=2 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>After knocking Luka down, the Chimera Beast leans on top of him!\
dwave 1,"se\ero_pyu1.ogg"
lsp 690,":a;chara\c_beast_ct11.bmp",0,0:print 10,500
>Sinking down on him, she forces Luka's penis into her vagina!
mov %damage_kotei,1
damage 180,200
skillname ""
>Luka is being raped by the Chimera Beast!\
if %mylife=0 sub %stack,1:return *c_beast_h4
sub %stack,1
goto *c_beast_a5



*c_beast_a5

add %stack,1
>Luka is being raped by the Chimera Beast...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Begin piston movements."
if %ransu=2 mov $sel1,"Induce ejaculation with friction."
if %ransu=3 mov $sel1,"Expected submission in twenty seconds."
name $name
eng $sel1:$sel6\
name ""
skillname "Piston Rush"
dwave 1,"se\ero_chupa3.ogg"
>The Chimera Beast violently rapes Luka, forcing him in and out of her!
skillcount2 3597
mov %damage_kotei,1
damage 180,200
skillname ""
if %mylife=0 sub %stack,1:return *c_beast_h5
sub %stack,1
goto *c_beast_a5



*c_beast_onedari

mov $list1,"Double Breast Rape"
if %3594>0 mov %list_num1,1
mov $list2,"Tongue Splash"
if %3595>0 mov %list_num2,1
mov $list3,"Vacuum Tail"
if %3596>0 mov %list_num3,1
mov $list4,"Piston Rush"
if %3597>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *c_beast_onedari1
if %cmd1=12 goto *c_beast_onedari2
if %cmd1=13 goto *c_beast_onedari3
if %cmd1=14 goto *c_beast_onedari4
if %cmd1=-1 goto *c_beast_main
goto *c_beast_onedari



*c_beast_onedari1

gosub *onedari_syori
name $name
>Attack confirmed. Begin neutralization.\
name ""
gosub *c_beast_a1
skip -1



*c_beast_onedari2

gosub *onedari_syori
name $name
>Attack confirmed. Begin neutralization.\
name ""
gosub *c_beast_a2
skip -1



*c_beast_onedari3

gosub *onedari_syori
name $name
>Attack confirmed. Begin neutralization.\
name ""
gosub *c_beast_a3
skip -1



*c_beast_onedari4

gosub *onedari_syori
name $name
>Attack confirmed. Begin neutralization.\
name ""
gosub *c_beast_a4
skip -1



*c_beast_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\c_beast_bk02.bmp",0,0
gosub *syasei2
>As the Chimera Beast's breasts rub against Luka, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2631,%2631+1:if %2631=1 mov %count_koenemy,%count_koenemy+1
if %2631>%count_most mov %count_most,%2631:mov $count_mostname,$name
count 7,4
mov $bad1,"The Chimera Beast forced Luka to come with her breasts."
gosub *face2
name $name
>Ejaculation confirmed. Target neutralized.\
name ""
goto *c_beast_h



*c_beast_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\c_beast_bk01.bmp",0,0
gosub *syasei2
>As the Chimera Beast's innumerable tongues lick Luka, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2631,%2631+1:if %2631=1 mov %count_koenemy,%count_koenemy+1
if %2631>%count_most mov %count_most,%2631:mov $count_mostname,$name
count 4,4
mov $bad1,"Luka was forced to come as the Chimera Beast's multiple tongues licked him."
gosub *face2
name $name
>Ejaculation confirmed. Target neutralized.\
name ""
goto *c_beast_h



*c_beast_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\c_beast_bk03.bmp",0,0
lsp 690,":a;chara\c_beast_ct02.bmp",0,0
gosub *syasei2
>As the Chimera Beast's tail sucks on Luka's penis like a vacuum, he comes, filling her tail with semen.\
mov %viclose,1:gosub *lose
mov %2631,%2631+1:if %2631=1 mov %count_koenemy,%count_koenemy+1
if %2631>%count_most mov %count_most,%2631:mov $count_mostname,$name
count 19,4
mov $bad1,"The Chimera Beast's tail forced Luka to come."
gosub *face2
name $name
>Ejaculation confirmed. Target neutralized.\
name ""
csp 690:print 10,500
goto *c_beast_h



*c_beast_h4

mov %ikigoe,3:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\c_beast_ct12.bmp",0,0
lsp 694,":a;chara\c_beast_bk04.bmp",0,0
gosub *syasei2
>As soon as Luka is violated by the Chimera Beast, he comes, filling her vagina with semen.\
mov %viclose,1:gosub *lose
mov %2631,%2631+1:if %2631=1 mov %count_koenemy,%count_koenemy+1
if %2631>%count_most mov %count_most,%2631:mov $count_mostname,$name
count 1,4
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come as soon as the Chimera Beast violated him."
csp 690:print 10,500
gosub *face2
name $name
>Ejaculation confirmed. Target neutralized quicker than expected.\
name ""
goto *c_beast_h



*c_beast_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\c_beast_ct12.bmp",0,0
lsp 694,":a;chara\c_beast_bk04.bmp",0,0
gosub *syasei2
>As the Chimera Beast rapes Luka, he comes, filling her vagina with semen.\
mov %viclose,1:gosub *lose
mov %2631,%2631+1:if %2631=1 mov %count_koenemy,%count_koenemy+1
if %2631>%count_most mov %count_most,%2631:mov $count_mostname,$name
count 1,4
mov $bad1,"Luka was forced to come as the Chimera Beast violently raped him."
csp 690:print 10,500
gosub *face2
name $name
>Ejaculation confirmed. Target neutralized.\
name ""
goto *c_beast_h



*c_beast_h

mov $bad2,"Luka's semen was sucked by the Chimera Beast's tail until his death."
if %2631=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
name $name
>Beginning rape program.@
>Phase 1 initiated.@> Bind with tail.\
name ""
dwave 1,"se\ero_makituki2.ogg"
>The Chimera Beast's tail wraps around my body, forcing my legs apart.\
cspl 690,699
lsp 700,":a;chara\c_beast_h1.bmp",0,0:print 10,500
name $name
>Erection confirmed.\
name ""
>The Chimera Beast's lifeless eyes move toward my penis.@
>It's like she isn't alive at all... Just soullessly following imaginary orders.\
name $name
>Humiliation function called.@> Begin tongue use.\
name ""
mov %hseanvoice,1:hseanvoice
lsp 700,":a;chara\c_beast_h2.bmp",0,0:print 10,500
>Tongues grow from the Chimera Beast's mouth, winding around my penis.\
name "Luka"
>Ahhh!\
name ""
>Her tongues crawl around me, wrapping around me from the balls to the tip of my penis.\
>I struggle in her firm grip as her tongues squirm and squeeze me as they wrap me up tighter and tighter.\
name $name
>Secrete saliva to increase stimulation...\
name ""
name "Luka"
>Haaa...!\
name ""
>Warm saliva starts to leak from her tongues, covering my penis in her sticky juices.\
>Now lubricated, her tongues slip easier over my penis, moving even faster than before.\
name $name
>Imminent ejaculation signs noticed...@>Starting final tongue phase.\
name ""
name "Luka"
>Ahhh!\
name ""
>Her tongues all start to lick me in unison, making it feel like my penis is caught in a whirlpool of wet tongues.\
>Then, all at once, her tongues wrap around me and start to squeeze every inch of my penis.@
>Unable to take the sudden burst of pleasure, I thrust upward as my body starts to ache for release.\
name "Luka"
>Ahh...!@>I'm coming!\
name ""
gosub *syasei1
lsp 700,":a;chara\c_beast_h3.bmp",0,0:print 10,500
gosub *syasei2
>My semen erupts from my penis, still covered in her wriggling tongues.\
>Her tongues mechanically squeeze out the semen in my penis as her other tongues lap up the semen that spills out.\
name "Luka"
>Ahhh...\
name ""
>I feebly squirm around as her tongues all continue licking and squeezing me, forcing out every drop of semen.\
mov %hseanvoice,0:hseanvoice
name $name
>Rape continuation...@> Start tail sucking phase.\
name ""
mov %hseanwave,15:hseanwave
lsp 700,":a;chara\c_beast_h4.bmp",0,0:print 10,500
>Before I can even process what she said, the end of her tail swings around over my groin, and sucks in my penis.\
name "Luka"
>Ahhh!!\
name ""
lsp 690,":a;chara\c_beast_ct01.bmp",0,0:print 10,500
>Thousands of tiny little tentacles squirm around inside her tail, as a strong suction begins pulling on my penis.\
>As soon as I'm all the way inside her tail, the slimy tentacles coil around me, latching onto my penis.\
name $name
>Begin sucking...\
name ""
name "Luka"
>Haaa...\
name ""
>The thousands of tentacles start to rub and stroke me as her tail itself sucks on me like a vacuum.\
>Some of the tentacles wrap around the tip of my penis, as others tickle my urethra.\
name $name
>Increasing tentacle movements to assist in sucking...\
name ""
name "Luka"
>Ahhh... Incredible...\
name ""
>I feel my penis slightly stretching inside her tail as the powerful suction pulls me deeper inside.@
>At the same time, more tentacles begin to latch around my shaft and squirm around.\
>This strange, almost as if un-living, monster's tail effortlessly brings me to another ejaculation.\
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\c_beast_h5.bmp",0,0
lsp 690,":a;chara\c_beast_ct02.bmp",0,0:print 10,500
gosub *syasei2
>I explode inside the horrifying monster's tail, pouring my semen into her.\
>As the afterglow of the orgasm washes over me, I sigh in exhaustion.@
>But it doesn't look like she has any intention of stopping...\
name $name
>Ejaculation confirmed.@> Semen quantity at 5cc.@
>Resume sucking...\
name ""
name "Luka"
>Ahhh!!\
name ""
mov %hseanwave,16:hseanwave
>The tentacles start to squirm even faster than before.@
>More and more of them start to cover my penis, as some focus almost exclusively on stroking my back muscle and tickling my urethral opening.\
>I feel another thin tentacle slowly coil right under the tip of my penis, and start to quickly vibrate right under my umbrella.\
>I writhe under her as the tentacles inside her tail easily bring me to the edge of another orgasm.\
name "Luka"
>No... !@>I'm coming...!@
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\c_beast_h6.bmp",0,0
lsp 690,":a;chara\c_beast_ct03.bmp",0,0:print 10,500
gosub *syasei2
>The unfeeling monster quickly forces me to another ejaculation, sucking out even more semen into her tail.\
>This horrifying tail that forced me to ejaculate twice in a row...@
>I'm too weak to fight against it any longer.\
name $name
>Ejaculation confirmed.@> Semen quantity at 4cc.@
>Resume sucking...\
name ""
name "Luka"
>Haaa...@>S...Stop!\
name ""
>Without even acknowledging my screams, the Chimera Beast continues sucking on me.@
>The tentacles inside her tail continue rubbing and squeezing me, clearly created to do nothing but force men to ejaculate...\
name "Luka"
>No... Stop this...\
name ""
name $name
>Continue sucking...@>Increasing stimulation to speed up ejaculations.\
name ""
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\c_beast_ct04.bmp",0,0:print 10,500
gosub *syasei2
>The Chimera Beast's tails start to suck even harder on me, forcing out another ejaculation.@
>My fate was sealed as soon as this unfeeling monster caught me...\
name $name
>Continue sucking...\
name ""
name "Luka"
>Ahhh!\
name ""
>Unable to fight back, she continues sucking on me with her tail.\
>Forced to come over and over, my life slowly fades as I'm lost in a trance of ecstasy.\
gosub *anten
mov %hseanwave,0:hseanwave
name $name
>Target's signs of life have ceased.\
name ""
>The Chimera Beast announces that to herself, then releases the boy's corpse.@
>Thus, the young boy's life was ended by the strange monster who sucked him dry...\
>.................\
goto *badend



*c_dryad_vore_start

mov $name,"Chimera Dryad Vore"
mov $name2,"Chimera Dryad Vore"
mov $lavel,"c_dryad_vore"
mov $tatie1,"c_dryad_vore_st01"
mov $tatie2,"c_dryad_vore_st01"
mov $tatie3,"c_dryad_vore_st01"
mov $haikei,"bg144"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,16000
if %nanido=2 mov %max_enemylife,17000
if %nanido=3 mov %max_enemylife,24000
if %nanido=0 mov %max_enemylife,1
if %nanido=1 mov %kousoku_maxhp,350
if %nanido=2 mov %kousoku_maxhp,350
if %nanido=3 mov %kousoku_maxhp,450
if %nanido<2 mov %kousoku_maxhp,350
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,99
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %music,3
mov %tikei,0
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_sel1,""
mov $mogaku_sel2,""
mov $mogaku_sel3,""
mov $mogaku_sel4,""
mov $mogaku_sel5,""
mov $mogaku_dassyutu1,"..........."
mov $mogaku_dassyutu2,""
mov $mogaku_earth_dassyutu1,"..........."
mov $mogaku_earth_dassyutu2,""
mov %end_n,9
mov %exp_minus,100000
mov %zmonster_x,-280
mov %tukix,320
mov %owaza_count1a,8
mov %owaza_count1b,8
mov %owaza_count2a,8
mov %owaza_count3a,8
name "Luka"
>Y...You...!?\
name ""
>The strange monster I met in the Forest of Spirits...@
>She looks almost the exact same!\
name $name
>............\
name ""
>Her silent, unfeeling gaze is just like the previous one.@
>The strange parasitic plants are growing all over her body, just like the other...\
name "Luka"
>Is this one a plant type!?\
name ""
>I'm getting a much more dangerous feeling from her than from the Chimera I just fought...\
goto *common_main



*c_dryad_vore_v

gosub *face3
name $name
>.............\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Chimera Dryad's body falls apart, scattering plants all over the ground!\
mov %viclose,1:gosub *victory
mov %getexp,150000:gosub *lvup
mov %2333,1
goto *sean0286



*c_dryad_vore_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>............\
name ""
goto *c_dryad_vore_a



*c_dryad_vore_main

gosub *cmd_main
if %cmd1=11 && %kousoku=1 goto *common_mogaku
if %cmd1=11 && %kousoku=2 mov %abairitu,70:goto *common_miss2
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *c_dryad_vore_kousan
if %cmd1=16 goto *c_dryad_vore_onedari
if %cmd1=17 goto *common_skill
goto *c_dryad_vore_main



*c_dryad_vore_kaihou

mov %kousoku,0:gosub *status_print
dwave 1,"se\dassyutu.ogg"
gosub *face1
>After suffering multiple attacks, the venus flytrap opens, releasing Luka!\
mov %owaza_count1a,0
goto *common_main



*c_dryad_vore_a

if %kousoku=2 && %kousoku_hp<0 goto *c_dryad_vore_kaihou
if %hanyo6=1 && %aqua>1 gosub *c_dryad_vore_a10:goto *common_main
if %hanyo6=1 && %bougyo=1 gosub *c_dryad_vore_a10:goto *common_main
if %hanyo6=1 && %bougyo=0 gosub *c_dryad_vore_a11:goto *common_main
if %kousoku=1 gosub *c_dryad_vore_a6:goto *common_main
if %kousoku=2 gosub *c_dryad_vore_a8:goto *common_main
rnd2 %ransu,1,7
if %ransu=1 gosub *c_dryad_vore_a1:goto *common_main
if %ransu=2 gosub *c_dryad_vore_a2:goto *common_main
if %ransu=3 gosub *c_dryad_vore_a3:goto *common_main
if %ransu=4 && %owaza_count2a>9 && %status=0 gosub *c_dryad_vore_a4:goto *common_main
if %ransu=5 && %owaza_count1a>9 gosub *c_dryad_vore_a5:goto *common_main
if %ransu=6 && %owaza_count1b>9 gosub *c_dryad_vore_a7:goto *common_main
if %ransu=7 && %owaza_count3a>9 gosub *c_dryad_vore_a9:goto *common_main
skip -8



*c_dryad_vore_a1

add %stack,1
name $name
>...............\
name ""
skillname "Ivy Digestion"
dwave 1,"se\ero_makituki1.ogg"
eng "Ivy dripping with digestive juices run all over Luka's body!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,40
if %wind=2 && %nanido=2 mov %wind_kakuritu,35
if %wind=2 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>The ivy crawls all over Luka's penis, dripping juices at the same time!
skillcount2 3604
if %nanido<2 damage 170,190
if %nanido=2 damage 190,210
if %nanido=3 damage 210,230
skillname ""
if %mylife=0 sub %stack,1:return *c_dryad_vore_h1
sub %stack,1
return



*c_dryad_vore_a2

add %stack,1
name $name
>..............\
name ""
skillname "Penis Devouring Flytrap"
dwave 1,"se\ero_slime1.ogg"
eng "The Chimera Dryad's venus flytrap opens!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,40
if %wind=2 && %nanido=2 mov %wind_kakuritu,35
if %wind=2 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>It clamps down around Luka's penis, rubbing him!
skillcount2 3605
if %nanido<2 damage 180,200
if %nanido=2 damage 200,220
if %nanido=3 damage 220,240
skillname ""
if %mylife=0 sub %stack,1:return *c_dryad_vore_h2
sub %stack,1
return



*c_dryad_vore_a3

add %stack,1
name $name
>.............\
name ""
skillname "Semen Slurping Pitcher"
dwave 1,"se\ero_makituki2.ogg"
eng "A small pitcher plant reaches out toward Luka from her bigger pitcher plant!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,40
if %wind=2 && %nanido=2 mov %wind_kakuritu,35
if %wind=2 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>The small pitcher plant is forced onto Luka's penis and shrinks!
skillcount2 3606
if %nanido<2 damage 180,200
if %nanido=2 damage 200,220
if %nanido=3 damage 220,240
skillname ""
if %mylife=0 sub %stack,1:return *c_dryad_vore_h3
sub %stack,1
return



*c_dryad_vore_a4

add %stack,1
mov %owaza_count2a,0
name $name
>............\
name ""
skillname "Intoxicating Aroma"
dwave 1,"se\gas.ogg"
eng "A sweet smell leaks out from the pitcher plant!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,90
if %wind=2 && %nanido=2 mov %wind_kakuritu,80
if %wind=2 && %nanido=3 mov %wind_kakuritu,45
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3607
>The sweet smell attacks Luka's brain and spreads through his body!@
mov %status,1:gosub *status_print
>Luka was put into a trance!\
skillname ""
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,2,3
if %nanido=3 rnd2 %status_turn,3,4
sub %stack,1
return



*c_dryad_vore_a5

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
name $name
>............\
name ""
skillname "Melty Ivy"
dwave 1,"se\ero_makituki3.ogg"
>Ivy, dripping with digestive juices, wraps around Luka's body!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,40
if %wind=2 && %nanido=2 mov %wind_kakuritu,35
if %wind=2 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3608
if %nanido<2 damage 160,180
if %nanido=2 damage 160,180
if %nanido=3 damage 180,200
mov $tatie4,"c_dryad_vore_st11"
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov %kousoku,1:gosub *status_print
>Luka has been completely wrapped in ivy!\
skillname ""
if %mylife=0 sub %stack,1:return *c_dryad_vore_h4
if %earth=0 && %nanido<2 mov %genmogaku,3
if %earth=0 && %nanido=2 mov %genmogaku,4
if %earth=0 && %nanido=3 mov %genmogaku,5
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,2
if %earth>0 && %nanido=3 mov %genmogaku,3
sub %stack,1
return



*c_dryad_vore_a6

add %stack,1
>Luka is wrapped in ivy...\
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"The ivy squirms all over Luka's body, dripping digestive juices!"
if %ransu=2 mov $sel1,"The ivy tightens around Luka's penis, dripping digestive juices!"
if %ransu=3 mov $sel1,"The ivy coils around Luka's penis, dripping digestive juices!"
if %ransu=4 mov $sel1,"The ivy tightens around Luka's body!"
name $name
>...........\
name ""
skillname "Melty Ivy"
dwave 1,"se\ero_makituki2.ogg"
eng $sel1:$sel6
skillcount2 3608
if %nanido<2 damage 160,180
if %nanido=2 damage 160,180
if %nanido=3 damage 180,200
skillname ""
if %mylife=0 sub %stack,1:return *c_dryad_vore_h4
sub %stack,1
return



*c_dryad_vore_a7

add %stack,1
mov %owaza_count1b,0
mov %owaza_num1,2
name $name
>...........\
name ""
skillname "Venus Trap of Pleasure"
dwave 1,"se\ero_makituki3.ogg"
>The huge venus flytrap shoots out and closes around Luka's body!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,10
if %wind=2 && %nanido=2 mov %wind_kakuritu,7
if %wind=2 && %nanido=3 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3609
if %nanido<2 damage 170,190
if %nanido=2 damage 170,190
if %nanido=3 damage 190,210
mov $tatie4,"c_dryad_vore_st21"
mov $mogaku_anno1,"The flytrap is clamped too tightly for Luka to struggle free!"
mov $mogaku_anno4,"Stuck in an awkward position, Luka's attack is slightly dulled!"
mov %kousoku,2:gosub *status_print
>Luka has been caught by the venus flytrap!\
skillname ""
if %mylife=0 sub %stack,1:return *c_dryad_vore_h5
mov %kousoku_hp,%kousoku_maxhp
if %earth=0 && %nanido<2 mov %genmogaku,100
if %earth=0 && %nanido=2 mov %genmogaku,100
if %earth=0 && %nanido=3 mov %genmogaku,100
if %earth>0 && %nanido<2 mov %genmogaku,100
if %earth>0 && %nanido=2 mov %genmogaku,100
if %earth>0 && %nanido=3 mov %genmogaku,100
sub %stack,1
return



*c_dryad_vore_a8

add %stack,1
>Luka is stuck in the venus flytrap...\
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"The venus flytrap chews on Luka's body!"
if %ransu=2 mov $sel1,"The lukewarm digestive juices cover Luka's body!"
if %ransu=3 mov $sel1,"The venus flytrap chews on Luka's body with its soft petals!"
if %ransu=4 mov $sel1,"Luka's penis is squeezed inside the venus flytrap!"
name $name
>..............\
name ""
skillname "Venus Trap of Pleasure"
dwave 1,"se\ero_slime1.ogg"
eng $sel1:$sel6
skillcount2 3609
if %nanido<2 damage 170,190
if %nanido=2 damage 170,190
if %nanido=3 damage 190,210
skillname ""
if %mylife=0 sub %stack,1:return *c_dryad_vore_h5
sub %stack,1
return



*c_dryad_vore_a9

add %stack,1
name $name
>..............\
name ""
skillname "Pitcher Preparation"
dwave 1,"se\ero_slime3.ogg"
>Amber colored digestive juices start to pool inside the Chimera Dryad's pitcher plant!\
skillname ""
mov %hanyo6,1
name "Luka"
>Wh...What the!?\
name ""
>I have a bad feeling...\
sub %stack,1
return



*c_dryad_vore_a10

add %stack,1
mov %hanyo6,0
mov %owaza_count3a,0
name $name
>..............\
name ""
skillname "Digestive Pitcher"
>The huge pitcher plant moves to suck in Luka's body!
if %aqua>1 gosub *aqua_guard:skip 5
delay 1000
dwave 1,"se\miss.ogg"
>But Luka quickly dodges!\
skillname ""
name "Luka"
>Whew... That was close...\
name ""
sub %stack,1
return



*c_dryad_vore_a11

add %stack,1
mov %hanyo6,0
name $name
>..............\
name ""
skillname "Digestive Pitcher"
dwave 1,"se\ero_slime3.ogg"
>The huge pitcher plant moves to suck in Luka's body!
mov %damage_kotei,1
damage 190,200
mov $tatie4,"c_dryad_vore_st31"
mov $mogaku_anno1,"But Luka can't escape from the pitcher plant!"
mov $mogaku_anno3,"But Luka can't move inside the pitcher plant!"
skillcount2 3610
mov %kousoku,3:gosub *status_print
>Luka's body is submerged in the pitcher plant's digestive juices!\
if %status=0 mov $sel1,"Luka was put into a trance!"
if %status=1 mov $sel1,"Luka is in a trance..."
mov %status,1:gosub *status_print
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *c_dryad_vore_h6
sub %stack,1
goto *c_dryad_vore_a12



*c_dryad_vore_a12

add %stack,1
>Luka is stuck inside the pitcher plant...\
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Digestive juices flow all over Luka's body, filling him with a strange feeling!"
if %ransu=2 mov $sel1,"The warmth of the pitcher plant fills Luka with a strange sense of relaxation!"
if %ransu=3 mov $sel1,"Luka is drowning in pleasure!"
if %ransu=4 mov $sel1,"Luka soaks in the warm digestive juices!"
name $name
>..............\
name ""
skillname "Digestive Pitcher"
dwave 1,"se\ero_slime3.ogg"
mov $tatie4,"c_dryad_vore_st33"
lsp 700,":a;chara\c_dryad_vore_st33.bmp",0,0:print 10,500
eng $sel1:$sel6
skillcount2 3610
mov %damage_kotei,1
damage 190,200
skillname ""
if %mylife=0 sub %stack,1:return *c_dryad_vore_h6
sub %stack,1
goto *c_dryad_vore_a12



*c_dryad_vore_onedari

mov $list1,"Ivy Digestion"
if %3604>0 mov %list_num1,1
mov $list2,"Penis Devouring Flytrap"
if %3605>0 mov %list_num2,1
mov $list3,"Semen Slurping Pitcher"
if %3606>0 mov %list_num3,1
mov $list4,"Intoxicating Aroma"
if %3607>0 mov %list_num4,1
mov $list5,"Melty Ivy"
if %3608>0 mov %list_num5,1
mov $list6,"Venus Trap of Pleasure"
if %3609>0 mov %list_num6,1
mov $list7,"Digestive Pitcher"
if %3610>0 mov %list_num7,1
gosub *cmd_onedari
if %cmd1=11 goto *c_dryad_vore_onedari1
if %cmd1=12 goto *c_dryad_vore_onedari2
if %cmd1=13 goto *c_dryad_vore_onedari3
if %cmd1=14 goto *c_dryad_vore_onedari4
if %cmd1=15 goto *c_dryad_vore_onedari5
if %cmd1=16 goto *c_dryad_vore_onedari6
if %cmd1=17 goto *c_dryad_vore_onedari7
if %cmd1=-1 goto *c_dryad_vore_main
goto *c_dryad_vore_onedari



*c_dryad_vore_onedari1

gosub *onedari_syori
gosub *c_dryad_vore_a1
skip -1



*c_dryad_vore_onedari2

gosub *onedari_syori
gosub *c_dryad_vore_a2
skip -1



*c_dryad_vore_onedari3

gosub *onedari_syori
gosub *c_dryad_vore_a3
skip -1



*c_dryad_vore_onedari4

gosub *onedari_syori
gosub *c_dryad_vore_a4
goto *c_dryad_vore_a



*c_dryad_vore_onedari5

if %kousoku<>1 gosub *onedari_syori
if %kousoku=1 gosub *onedari_syori_k
notif %kousoku=1 gosub *c_dryad_vore_a5
gosub *c_dryad_vore_a6
skip -1



*c_dryad_vore_onedari6

if %kousoku<>2 gosub *onedari_syori
if %kousoku=2 gosub *onedari_syori_k
notif %kousoku=2 gosub *c_dryad_vore_a7
gosub *c_dryad_vore_a8
skip -1



*c_dryad_vore_onedari7

gosub *onedari_syori
gosub *c_dryad_vore_a11
skip -1



*c_dryad_vore_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\c_dryad_vore_bk01.bmp",0,0
gosub *syasei2
>As the Chimera Dryad's slimy ivy crawls all over his body, Luka comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2633,%2633+1:if %2633=1 mov %count_koenemy,%count_koenemy+1
if %2633>%count_most mov %count_most,%2633:mov $count_mostname,$name
count 12,11
mov $bad1,"Luka was forced to come as the Chimera Dryad's ivy crawled all over his body."
gosub *face2
name $name
>................\
name ""
goto *c_dryad_vore_ha



*c_dryad_vore_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\c_dryad_vore_bk02.bmp",0,0
gosub *syasei2
>As the venus flytrap chewed on Luka's penis, he comes, filling it with semen.\
mov %viclose,1:gosub *lose
mov %2633,%2633+1:if %2633=1 mov %count_koenemy,%count_koenemy+1
if %2633>%count_most mov %count_most,%2633:mov $count_mostname,$name
count 12,11
mov $bad1,"Luka was forced to come as the Chimera Dryad's venus flytrap chewed on his penis."
gosub *face2
name $name
>................\
name ""
goto *c_dryad_vore_hb



*c_dryad_vore_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\c_dryad_vore_bk03.bmp",0,0
gosub *syasei2
>As the smaller pitcher plant squeezed Luka's penis, he comes, filling it with semen.\
mov %viclose,1:gosub *lose
mov %2633,%2633+1:if %2633=1 mov %count_koenemy,%count_koenemy+1
if %2633>%count_most mov %count_most,%2633:mov $count_mostname,$name
count 12,11
mov $bad1,"The small pitcher plant forced Luka to come."
gosub *face2
name $name
>................\
name ""
goto *c_dryad_vore_hc



*c_dryad_vore_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\c_dryad_vore_st11a.bmp",0,0
gosub *syasei2
>As the ivy squeezes his body, Luka comes, covering the Chimera Dryad with semen.\
mov %viclose,1:gosub *lose
mov %2633,%2633+1:if %2633=1 mov %count_koenemy,%count_koenemy+1
if %2633>%count_most mov %count_most,%2633:mov $count_mostname,$name
count 12,11
mov $bad1,"Luka was forced to come as the Chimera Dryad's ivy squeezed him."
gosub *face2
name $name
>................\
name ""
goto *c_dryad_vore_ha



*c_dryad_vore_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\c_dryad_vore_st21a.bmp",0,0
gosub *syasei2
>As the venus flytrap closes around Luka's body, he comes, filling it with semen.\
mov %viclose,1:gosub *lose
mov %2633,%2633+1:if %2633=1 mov %count_koenemy,%count_koenemy+1
if %2633>%count_most mov %count_most,%2633:mov $count_mostname,$name
count 12,11
mov $bad1,"Luka was forced to come as the Chimera Dryad's venus flytrap chewed on him."
gosub *face2
name $name
>................\
name ""
goto *c_dryad_vore_hb



*c_dryad_vore_h6

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\c_dryad_vore_st33.bmp",0,0
gosub *syasei2
>As the digestive juices in the pitcher plant cover Luka's body, he comes, filling the plant with semen.\
mov %viclose,1:gosub *lose
mov %2633,%2633+1:if %2633=1 mov %count_koenemy,%count_koenemy+1
if %2633>%count_most mov %count_most,%2633:mov $count_mostname,$name
count 12,11
mov $bad1,"Luka was forced to come as he soaked in the pitcher plant's juices."
gosub *face2
name $name
>................\
name ""
goto *c_dryad_vore_hc



*c_dryad_vore_ha

mov $bad2,"After being covered in digestive juices, Luka was dissolved and digested."
if %2832=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2832,1
if %kousoku>0 mov %hseanwave,17:cspl 690,699:lsp 700,":a;chara\c_dryad_vore_st12.bmp",0,0:hseanwave:goto *c_dryad_vore_ha2
name "Luka"
>Ahh...\
name ""
dwave 1,"se\ero_makituki3.ogg"
mov %hseanwave,17:hseanwave
cspl 690,699
lsp 700,":a;chara\c_dryad_vore_st12.bmp",0,0:print 10,500
>Exhausted and out of strength, I'm helpless as the Chimera Dryad's ivy wraps around me and covers me in sticky digestive juices.\
>The sticky juices slow my movements even more, making me no more than a simple insect caught by a carnivorous plant.\
goto *c_dryad_vore_ha2



*c_dryad_vore_ha2

name "Luka"
>Ahhh...\
name ""
>Sticky juices ooze out of the ivy wrapped around me, covering every inch of my body.@
>Feebly struggling, I beg her to stop.\
name "Luka"
>Urhg...!@> Stop!\
name ""
>My movements gradually get slower as the sticky liquid covers more and more of my body.@
>The Chimera Dryad just lifelessly stares ahead as I struggle for my life next to her.\
>Without even looking at me, her ivy starts to slowly coil around my penis as I squirm like a bug.\
name "Luka"
>Ahhh...!\
name ""
>I gasp in surprise as her warm, sticky ivy coils around my most sensitive part.\
name "Luka"
>Ahh...\
name ""
>The ivy starts to slowly stroke me up and down.@
>Her sticky juices almost act like a sort of lubricant, making her small movements fill my penis with a gentle warmth from the friction.\
>I shake my hips side to side to escape the stimulation, but I can't break away.\
name "Luka"
>Ahh... That feels good...\
name ""
>She's going to force me to ejaculate as I dissolve away...\
name "Luka"
>Ahhh!\
name ""
>The ivy slowly starts to tighten as more of her warm juices ooze out.\
>Her slow, rhythmic stroking continues for a while until I feel an ejaculation rising through my body.\
name "Luka"
>Ahh... I'm going to come...\
name ""
>I relaxed before I knew what I was doing, entrusting my body to the stimulation.\
gosub *syasei1
lsp 700,":a;chara\c_dryad_vore_st13.bmp",0,0
gosub *syasei2
>My semen shoots out into the air and lands on the ivy, where it quickly gets absorbed.\
>It looks like the Chimera Dryad is able to absorb semen through her ivy somehow.\
name "Luka"
>Ahh...\
name ""
>This horrifying ivy forced me to come...@
>Overcome with humiliation, I let my body relax as her ivy binds me.\
name $name
>.............\
name ""
lsp 700,":a;chara\c_dryad_vore_st14.bmp",0,0:print 10,500
name "Luka"
>S...Stop!@>Ahh!\
name ""
>Without giving me even a moment to breathe, the ivy suddenly lifts me up into the air.\
>She starts caressing and massaging my body...@>No, she isn't doing that... She's just spreading more of her digestive juices all over me.\
name "Luka"
>S...Stop!@>Ahhh!\
name ""
>One branch of her ivy continues stroking my penis as others rub her juices on me.@
>As more and more of my body is covered, my thoughts get more and more confused.\
name "Luka"
>Ahhh...!\
name ""
>It almost feels like I'm getting drunk as her juices rub into my skin.@
>Every time I struggle, she tightens around my penis and easily forces me to stop.\
>As I helplessly squirm, I feel another horrible orgasm bouncing through my body.\
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1:gosub *syasei2
>Forced to another orgasm, my semen shoots out and lands on her ivy again.@
>But the Chimera Dryad doesn't stop any of her movements for even a moment.\
>She continues rubbing more and more digestive juices on me as she slowly strokes my penis.\
name "Luka"
>Ahhh...\
name ""
if %hosyoku_cut=1 goto *hosyoku_cut
>The warmth slowly takes over more and more of my body, until it feels like my heart and soul are drowning in it.\
>Unable to even struggle any longer, I give in to the ecstasy that's melting me away.\
name "Luka"
>Haaa...\
name ""
>There's nothing left I can do...@> I'm just an insect caught by a plant.@
>I'll meet my end, indulging in this ecstasy.\
>Even though I know I'm going to be digested and turned into food for this soulless monster...@
>I don't have the willpower to fight against it any longer.\
name "Luka"
>Haa...ahh...\
name ""
>I slowly start to lose feeling in my body as every sense is replaced by just a comfortable warmth.\
>My body itself must be melting now at this point, and being absorbed through her ivy...\
name "Luka"
>Ah...aa...\
name ""
>Thus, I'm eaten just like an insect.@
>My life ends at the hand of the unfeeling Chimera Dryad.\
gosub *anten
mov %hseanwave,0:hseanwave
>Another boy met his death at the hands of a carnivorous monster.@
>In time, this monster will attack a human settlement and devour many victims...\
>But that doesn't matter to Luka anymore.\
>...................\
goto *badend



*c_dryad_vore_hb

mov $bad2,"Caught by the Chimera Dryad's venus flytrap, Luka was eaten alive."
if %2833=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2833,1
if %kousoku>0 mov %hseanwave,21:cspl 690,699:lsp 700,":a;chara\c_dryad_vore_st22.bmp",0,0:hseanwave:goto *c_dryad_vore_hb2
name "Luka"
>Ahh...\
name ""
>Too weak to resist, I look on helplessly as the Chimera Dryad's venus flytrap opens wide, and starts to close around my body.\
name $name
>..............\
name ""
name "Luka"
>S...Stop!@>Ahhh!\
name ""
dwave 1,"se\ero_makituki2.ogg"
mov %hseanwave,21:hseanwave
cspl 690,699
lsp 700,":a;chara\c_dryad_vore_st22.bmp",0,0:print 10,500
>Like that, I'm easily pulled into the venus flytrap's mouth.@
>As soon as I'm inside, the soft interior closes tightly around me, squeezing my body.\
goto *c_dryad_vore_hb2



*c_dryad_vore_hb2

>The walls of the venus flytrap are covered in sticky juices, rubbing into me wherever she squeezes.\
name "Luka"
>W...What is this...?@> Ahh...\
name ""
>The tiny little folds inside of the venus flytrap make it feel like warm tongues are licking me with every slight movement.\
>The warm, gentle stimulation runs all over my body, causing my penis to get erect in response.@
>My body is naturally reacting, wanting to feel more of this...\
name $name
>................\
name ""
lsp 700,":a;chara\c_dryad_vore_st23.bmp",0,0:print 10,500
>Suddenly, the venus flytrap closes around more of my body, forcing my penis inside!\
name "Luka"
>A...Ahhh...\
name ""
>The pleasure was far above what I was expecting.\
>The sticky walls press into my penis from both directions, and are filled with seemingly thousands of tiny bumps, all oozing warm liquid.\
>The folds inside of the venus flytrap rub against my penis as they move, making it feel like hundreds of sticky fingers are all grabbing at me.\
>Her soft petals gently chew on me, making me shiver in pleasure from the stimulation.@
>But I can't let this continue...\
name "Luka"
>S...Stop... Get off!\
name ""
>Its movements are just for eating me...@
>This horrible liquid, too, must be her digestive juices.\
>This terrifying carnivorous monster is going to eat me.@
>I struggle, trying to break free, but...\
name "Luka"
>Ahh... It feels good...\
name ""
>The venus flytrap squeezes down around me as I struggle, sending explosions of pleasure racing through me.\
>It's trying to calm me, her prey, with pleasure to stop me from struggling...\
>My feeble resistance gets weaker and weaker as the venus flytrap continues to softly chew on my penis.\
name "Luka"
>Haa... No... Stop...\
name ""
>I swing between pleasure and terror, slowly becoming more and more confused.\
>I'm easily being held down and drowned in pleasure.@
>But I can't just give in... I have to escape...\
name "Luka"
>Ahhh...\
name ""
>Unwilling to just surrender, my meaningless struggle continues inside her venus flytrap.\
>At the same time, I feel an orgasm welling up in my body brought out by this horrifying plant.\
name "Luka"
>Ah... I'm going to come...!\
name ""
gosub *syasei1
lsp 700,":a;chara\c_dryad_vore_st24.bmp",0,0
gosub *syasei2
>I explode inside of the plant, the pleasure finally pushing off the terror.\
name $name
>...............\
name ""
>Suddenly...@
mov %hseanwave,22:hseanwave
lsp 700,":a;chara\c_dryad_vore_st25.bmp",0,0:print 10,500
>The venus flytrap pulls in even my upper body!\
name "Luka"
>Ahhhh!\
name ""
>The venus flytrap starts chewing on me far faster than before.@
>Its soft, toothless mouth rubs and pushes into my body, surrounding me in the overwhelming stimulation.\
>She's really trying to eat me...@
>I'm going to be digested alive...\
if %hosyoku_cut=1 goto *hosyoku_cut
name "Luka"
>S...Stop!@>Ahhh!\
name ""
>The soft petals squeeze and crawl all over my body, covering me in her warm digestive juices.\
>At the same time, the part of the venus flytrap chewing on my penis gets even more intense, forcing me into another fear filled orgasm.\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>She's digesting me alive, and I still managed to ejaculate...\
name "Luka"
>Ahh... Stop... Help me...\
name ""
>My words go unanswered though.@
>Instead, more and more of her warm digestive juices cover my body, filling me with an unnatural warm bliss.\
>My body stops twitching as I relax in the warmth.@
>Despite the horror, ecstasy races up my spine as my resistance slowly turns into submission.\
name "Luka"
>Haaa... Th...That feels good...\
name ""
gosub *syasei1:gosub *syasei2
>I ejaculate as my body melts away.@
>Relaxing in the warmth, it feels like my whole world is melting away into warm pleasure.\
>The venus flytrap continues softly chewing on me as I melt away inside it.\
name "Luka"
>Ah...aa...\
name ""
>More and more of my body melts away and is absorbed into the venus flytrap.\
>My life is going to end here as nothing but simple nourishment for this Chimera Dryad...\
gosub *anten
mov %hseanwave,0:hseanwave
>Another boy met his death at the hands of a carnivorous monster.@
>In time, this monster will attack a human settlement and devour many victims...\
>But that doesn't matter to Luka anymore.\
>...................\
goto *badend



*c_dryad_vore_hc

mov $bad2,"Stuck in the pitcher plant, Luka was dissolved."
if %2834=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2834,1
if %kousoku>0 mov %hseanwave,21:hseanwave:goto *c_dryad_vore_hc2
name "Luka"
>Ahh...\
name ""
>Too exhausted to fight back, the Chimera Dryad easily forces me into her pitcher plant.\
mov %hseanwave,21:hseanwave
cspl 690,699
lsp 700,":a;chara\c_dryad_vore_st32.bmp",0,0:print 10,500
goto *c_dryad_vore_hc2



*c_dryad_vore_hc2

>Her digestive juices quickly dissolve away my clothes and start to soak into my bare skin.@
>The warm sensations quickly cloud my thoughts, almost making me drunk.\
>Even though I know I'll be dissolved if I don't get out of here, I can't bring myself to fight it.\
name "Luka"
>Ahh... That feels good...\
name ""
>I relax in the calm ecstasy.@
>It would be simple to escape out of here... But I just can't bring myself to do it.\
>Drunk on the pleasure, this pitcher plant must sedate its prey to keep them from escaping as they're digested...\
name "Luka"
>Haaa...\
name ""
lsp 700,":a;chara\c_dryad_vore_st33.bmp",0,0:print 10,500
>My body sinks deeper into the pitcher plant, bringing the warm amber liquid closer to my head.\
>My skin tingles in ecstasy everywhere the amber liquid touches, causing me to want to submerge myself even deeper.\
name "Luka"
>Ahh...\
name ""
>I feel something shifting around my groin.@
>A slightly different colored liquid forms around my penis, much thicker and denser than her other juices.\
>It almost feels like something warm and gentle is stroking me.@
>I relax in contented bliss as my lower body starts to tingle in response to the stimulation.\
name "Luka"
>Haaa...aahh...\
name ""
gosub *syasei1:gosub *syasei2
>I sigh as I ejaculate, shooting my white semen into her amber digestive juices, making it slightly cloudy.\
name "Luka"
>Haaa...aa...\
name ""
>The sense of release just adds to my overall relaxation, making me sink even deeper into her pitcher plant.\
name $name
>............\
name ""
>Her juices feel like they're getting a little bit thicker as they flow around my body.\
>The sticky juices rub against me as they ever so slightly swirl around, making it feel like I'm stuck inside some kind of amoeba.\
>Even though I know she's trying to eat me, my heart and soul have already been broken by the overpowering relaxation.\
if %hosyoku_cut=1 goto *hosyoku_cut
name "Luka"
>Ahhh...\
name ""
>The feeling in some parts of my body starts to get a little bit numb, signaling me that I'm already starting to dissolve inside her.\
>If I think about it, it should horrify me...@
>But I just can't bring myself to hate this sensation.\
gosub *syasei1:gosub *syasei2
>I smile as I come inside her again, letting the warm juices flow over me even more.\
name "Luka"
>Haaa... That feels so good...\
name ""
>I'm just a helpless insect, stuck inside here until I meet my end...\
gosub *syasei1:gosub *syasei2
>Overcome in ecstasy as I'm eaten alive, I keep having orgasms one after the other.\
>My mouth opens wide as I just moan, not focusing on anything but the pleasure.\
name "Luka"
>Ahh..aa...\
name ""
gosub *syasei1:gosub *syasei2
>I've given over everything of me to this pitcher plant.\
>The feeling in my body numbs and is replaced by a warm, throbbing sensation of pleasure as more and more of my body dissolves away.\
name "Luka"
>Th...That... G...Good...\
name ""
>My life itself is melted away, only to be absorbed into this plant monster.\
name "Luka"
>Aa...\
name ""
>Just like that, my life ends as simple nourishment for the monster.\
gosub *anten
mov %hseanwave,0:hseanwave
>Another boy met his death at the hands of a carnivorous monster.@
>In time, this monster will attack a human settlement and devour many victims...\
>But that doesn't matter to Luka anymore.\
>...................\
goto *badend



*vampire_start

mov $name,"Vampire"
mov $name2,"Vampire"
mov $lavel,"vampire"
mov $tatie1,"vampire_st01"
mov $tatie2,"vampire_st02"
mov $tatie3,"vampire_st03"
mov $tatie4,"vampire_st02"
mov $haikei,"bg142"
mov %monster_x,175
mov %monster_y,0
if %nanido=1 mov %max_enemylife,9000
if %nanido=2 mov %max_enemylife,10000
if %nanido=3 mov %max_enemylife,13500
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,75
mov %earth_keigen,20
if %nanido=3 mov %earth_keigen,10
mov %music,1
mov %tikei,0
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free from her!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"I won't let you escape from my dress until I've sucked you dry..."
mov $mogaku_sel2,"Look at you struggle..."
mov $mogaku_sel3,"Struggling like that is just pathetic... Hehe."
mov $mogaku_sel4,"Do you enjoy being sucked while struggling?"
mov $mogaku_sel5,"Hehe... Is that all you've got?"
mov $mogaku_dassyutu1,"You escaped from my dress..."
mov $mogaku_dassyutu2,"You're a strong-willed one, aren't you?"
mov $mogaku_earth_dassyutu1,"What power is that...?"
mov $mogaku_earth_dassyutu2,""
mov $half_s1,"It feels amazing, doesn't it?"
mov $half_s2,"Give in and enjoy it..."
mov $kiki_s1,"Are you almost at your limit?"
mov $kiki_s2,"You'll love being drained dry..."
mov %end_n,9
mov %exp_minus,0
mov %zmonster_x,-120
mov %tukix,320
mov %owaza_count1a,8
mov %owaza_count2a,8
name $name
>How unusual, a human is wandering around on this continent...@
>Even more, he looks so tasty... Hehe.\
name ""
>The Vampire looks me over from head to toe with a smile on her face.\
name "Luka"
>Guh... A Vampire...?\
name ""
>A Vampire...@> A powerful monster, famous for drinking both blood and energy.\
>A high level monster that wields great magical power...\
>Only in Hellgondo could such a powerful monster like this just be wandering around...\
gosub *face2
name $name
>Hehe... Do you want me to suck your blood?@
>Or would you rather I suck your semen?\
>If you desire, I can even suck both...@
>I can suck out both your blood and semen until you're dry...\
name ""
gosub *face1
goto *common_main



*vampire_v

gosub *face3
name $name
>Is this... A Hero's power!?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Vampire is sealed in the form of a bat!\
mov %viclose,1:gosub *victory
mov %getexp,110000:gosub *lvup
mov %2335,1
goto *sean0288a



*vampire_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>Have you already given in?@
>Then let me drain you dry...\
name ""
goto *vampire_a



*vampire_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *vampire_kousan
if %cmd1=16 goto *vampire_onedari
if %cmd1=17 goto *common_skill
goto *vampire_main



*vampire_a

if %status=4 gosub *vampire_a4:goto *common_main
if %kousoku=1 gosub *vampire_a6:goto *common_main
rnd2 %ransu,1,4
if %ransu=1 gosub *vampire_a1:goto *common_main
if %ransu=2 gosub *vampire_a2:goto *common_main
if %ransu=3 && %owaza_count2a>9 && %status=0 gosub *vampire_a3:goto *common_main
if %ransu=4 && %owaza_count1a>9 gosub *vampire_a5:goto *common_main
skip -5



*vampire_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Shall I squeeze your penis between my breasts?"
if %ransu=2 mov $sel1,"I'll milk you with my breasts..."
if %ransu=3 mov $sel1,"Do you want to be squeezed between these breasts of mine?"
name $name
eng $sel1:$sel6\
name ""
skillname "Vampire Bust"
dwave 1,"se\ero_koki1.ogg"
>The Vampire sandwiches Luka's penis between her breasts!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3617
if %nanido<2 damage 160,170
if %nanido=2 damage 180,190
if %nanido=3 damage 200,210
skillname ""
if %mylife=0 sub %stack,1:return *vampire_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*vampire_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck out your energy from your penis..."
if %ransu=2 mov $sel1,"All men like having their energy sucked from here..."
if %ransu=3 mov $sel1,"Lucky you, getting to be sucked like this..."
name $name
eng $sel1:$sel6\
name ""
skillname "Semen Drain"
dwave 1,"se\ero_buchu2.ogg"
eng "The Vampire sucks Luka's penis into her mouth, and starts to suck on it!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>Weakness floods Luka's body as the sweet feeling of release comes over him!
skillcount2 3618
if %nanido<2 damage 170,180
if %nanido=2 damage 190,200
if %nanido=3 damage 210,220
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *vampire_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*vampire_a3

add %stack,1
mov %owaza_count2a,0
name $name
>Hehe... I'll make you into my toy...\
name ""
skillname "Eyes of Obedience"
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
eng "The Vampire's eyes flash!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,100
if %wind=2 && %nanido=2 mov %wind_kakuritu,90
if %wind=2 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But a gust of wind blocks Luka's view!":gosub *wind_guard:sub %stack,1:return
\
mov %status,4:gosub *status_print
>Luka surrenders to the Vampire!\
skillname ""
name $name
>Now, grab your penis.@
>I want to watch you pleasure yourself.\
name ""
name "Luka"
>Y...Yes...\
name ""
dwave 1,"se\ero_koki1.ogg"
>Luka starts to stroke himself!
if %nanido<2 damage 60,70
if %nanido=2 damage 70,80
if %nanido=3 damage 80,90
name $name
>Good boy...@
>Now, I'll suck on your blood...\
name ""
skillname "Bloodsucking"
dwave 1,"se\ero_chupa6.ogg"
>The Vampire leans over, and bites into Luka's neck!\
>As soon as her fangs pierce his skin, a warm feeling of ecstasy begins to flood into Luka's body!
skillcount2 3619
if %nanido<2 damage 160,170
if %nanido=2 damage 170,180
if %nanido=3 damage 180,190
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *vampire_h3
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,2,3
if %nanido=3 rnd2 %status_turn,3,4
sub %stack,1
return



*vampire_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Keep stroking yourself..."
if %ransu=2 mov $sel1,"Don't stop until you come..."
if %ransu=3 mov $sel1,"Hehe, look at you playing with yourself... How shameful."
name $name
eng $sel1:$sel6\
name ""
name "Luka"
>Y...Yes...\
name ""
dwave 1,"se\ero_koki1.ogg"
>Unable to disobey her order, Luka continues stroking himself!
skillcount2 3619
if %nanido<2 damage 60,70
if %nanido=2 damage 70,80
if %nanido=3 damage 80,90
skillname "Bloodsucking"
dwave 1,"se\ero_chupa6.ogg"
>The Vampire sucks on Luka's neck, drawing out his blood!\
>Ecstasy radiates from his neck and fills his body!
if %nanido<2 damage 160,170
if %nanido=2 damage 170,180
if %nanido=3 damage 180,190
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *vampire_h3
sub %stack,1
return



*vampire_a5

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name $name
>I'll bind you with my dress, and suck you dry...\
name ""
skillname "Dress Binding"
dwave 1,"se\ero_makituki1.ogg"
eng "The Vampire's dress shoots out, and wraps up Luka's body!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,15
if %wind=2 && %nanido=2 mov %wind_kakuritu,10
if %wind=2 && %nanido=3 mov %wind_kakuritu,7
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>Luka has been bound in the Vampire's dress!\
skillname ""
if %kousan=2 sub %stack,1:return
name $name
if %first_sel1=1 skip 4
>How does my dress feel...?@
>I'll drain you dry just like this...\
skip 3
>This time, you won't get away...@
>I'll drain you dry just like this...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,3
if %earth=0 && %nanido=2 mov %genmogaku,4
if %earth=0 && %nanido=3 mov %genmogaku,5
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,2
if %earth>0 && %nanido=3 mov %genmogaku,3
sub %stack,1
return



*vampire_a6

add %stack,1
>Luka has been bound in the Vampire's dress...\
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You know what's going to happen next, don't you...?":mov $sel2,"The dress squeezes down on Luka's penis!"
if %ransu=2 mov $sel1,"It feels good being squeezed by me, doesn't it?":mov $sel2,"Her dress squirms around, stimulating Luka's penis!"
if %ransu=3 mov $sel1,"I'll squeeze you until you're dry...":mov $sel2,"Her dress squeezes down hard on Luka's body!"
if %ransu=4 mov $sel1,"I'll torment you here until you come...":mov $sel2,"Her dress wraps around Luka's penis, stimulating him!"
name $name
eng $sel1:$sel6\
name ""
skillname "Dress Drain"
dwave 1,"se\ero_makituki2.ogg"
eng $sel2:$sel6
skillcount2 3620
if %nanido<2 damage 180,190
if %nanido=2 damage 180,190
if %nanido=3 damage 200,210
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *vampire_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*vampire_onedari

mov $list1,"Vampire Bust"
if %3617>0 mov %list_num1,1
mov $list2,"Semen Drain"
if %3618>0 mov %list_num2,1
mov $list3,"Bloodsucking"
if %3619>0 mov %list_num3,1
mov $list4,"Dress Drain"
if %3620>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *vampire_onedari1
if %cmd1=12 goto *vampire_onedari2
if %cmd1=13 goto *vampire_onedari3
if %cmd1=14 goto *vampire_onedari4
if %cmd1=-1 goto *vampire_main
goto *vampire_onedari



*vampire_onedari1

gosub *onedari_syori
name $name
>So you want to be finished off by my breasts?\
name ""
gosub *vampire_a1
skip -1



*vampire_onedari2

gosub *onedari_syori
name $name
>So you want to be finished off by my mouth?\
name ""
gosub *vampire_a2
skip -1



*vampire_onedari3

gosub *onedari_syori
name $name
>You want me to suck your blood?@
>Then let me ask something of you first...\
name ""
gosub *vampire_a3
gosub *vampire_a4
skip -1



*vampire_onedari4

gosub *onedari_syori_k
name $name
>You want to be wrapped up in my dress?\
name ""
if %kousoku=0 gosub *vampire_a5
gosub *vampire_a6
skip -1



*vampire_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\vampire_bk02.bmp",175,0
gosub *syasei2
>As the Vampire squeezes Luka's penis between her breasts, he comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2635,%2635+1:if %2635=1 mov %count_koenemy,%count_koenemy+1
if %2635>%count_most mov %count_most,%2635:mov $count_mostname,$name
count 7,4
mov $bad1,"The Vampire forced Luka to come by using her breasts."
gosub *face2
name $name
>Hehe, that's the first...\
name ""
goto *vampire_h



*vampire_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\vampire_bk01.bmp",175,0
gosub *syasei2
>As the Vampire sucks on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2635,%2635+1:if %2635=1 mov %count_koenemy,%count_koenemy+1
if %2635>%count_most mov %count_most,%2635:mov $count_mostname,$name
count 4,4
mov $bad1,"The Vampire forced Luka to come by using her mouth."
gosub *face2
name $name
>Hehe, that's the first...\
name ""
goto *vampire_h



*vampire_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\vampire_bk03.bmp",175,0
gosub *syasei2
>As Luka masturbates and the Vampire sucks his blood, he comes, covering the Vampire with semen.\
mov %viclose,1:gosub *lose
mov %2635,%2635+1:if %2635=1 mov %count_koenemy,%count_koenemy+1
if %2635>%count_most mov %count_most,%2635:mov $count_mostname,$name
count 31,4
mov $bad1,"As the Vampire sucked his blood, Luka stroked himself until he came."
gosub *face2
name $name
>Hehe, that's the first...\
name ""
goto *vampire_h



*vampire_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\vampire_bk03.bmp",175,0
gosub *syasei2
>As the Vampire's dress squeezed down on Luka, he comes, covering her dress in semen.\
mov %viclose,1:gosub *lose
mov %2635,%2635+1:if %2635=1 mov %count_koenemy,%count_koenemy+1
if %2635>%count_most mov %count_most,%2635:mov $count_mostname,$name
count 27,4
mov $bad1,"The Vampire forced Luka to come by using her dress."
gosub *face2
name $name
>Hehe, that's the first...\
name ""
goto *vampire_h



*vampire_h

mov $bad2,"Luka's semen was sucked dry as the Vampire raped him."
if %2635=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahhh...\
name ""
name $name
>Hehe, that felt good, didn't it?@
>Now I'm going to suck on you seriously...\
name ""
>The Vampire leans over me, and slowly bites down on my neck.@
>After her fangs pierce into my skin, she starts to softly suck on my neck.\
name "Luka"
>Haaa...\
name ""
>A sweet feeling almost like an ejaculation radiates out from my neck, filling the rest of my body as she softly sucks on me.\
name $name
>Nnn... Mmm...\
name ""
>I feel my blood flowing into her mouth, almost like a slow continual ejaculation.\
>As soon as that blissful feeling of release reaches my groin, my penis instantly becomes erect.\
name $name
>Getting so hard from having your blood sucked... What a naughty little boy.@
>Would you like for me to suck out that semen of yours too, little boy?\
name ""
name "Luka"
>N...N... Ahhh...\
name ""
>Stuck in a trance of ecstasy, I can barely manage to move my tongue to form my words.@
>The Vampire just looks at me with a seductive smile on her face.\
name $name
>Since your penis got so big, you must want me to suck on it too...@
>That's fine, I'd love to suck your blood and semen at the same time...\
name ""
mov %hseanwave,9:hseanwave
cspl 690,699
lsp 700,":a;chara\vampire_h1.bmp",0,0:print 10,500
>The Vampire takes off her mantle, and slowly sits down on top of me.@
>With one slow movement, she forces me all the way into her.\
name "Luka"
>Ahhh!\
name ""
>I scream in pleasure as my penis slowly invades her warm vagina, pushing aside her soft flesh as I go deeper and deeper into her.\
>The Vampire is sucking my blood as she rapes me...@
>Despite this hopeless situation I'm in, my body trembles in joy.\
name $name
>Your penis is twitching in joy inside me...@
>Now, let me suck it out...\
>It's fine if you want to come inside me just like this...@
>But wouldn't you rather taste a Vampire's special sucking skills instead?\
name ""
>Her soft flesh squeezes down around my penis, as her vaginal walls start to rub against me.\
name "Luka"
>Ahhh...!!\
name ""
name $name
>Now there's no escape for you...@
>You have no choice but to be sucked by me...\
name ""
>I feel her vagina shrink, as something like two soft lips presses against the tip of my penis.@
>Opening a little bit, my glans is forced into the mouth.\
>Almost like my tip is being sucked on by a small mouth inside her vagina, the suction inside of her slowly gets more and more intense.\
name "Luka"
>Ah...!@> Ahhh!\
name ""
>My body shivers in ecstasy, as it feels like all of the power left in me is being sucked out into her vagina.\
>My mouth hangs open as my mind goes blank.@
>Unable to focus on anything but the pleasure, I twitch as I feel myself being forced over the edge.\
gosub *syasei1
lsp 700,":a;chara\vampire_h2.bmp",0,0
gosub *syasei2
>I let out a weak moan as I explode inside her, filling the small mouth inside her vagina with my semen.\
name $name
>Hehe... I'll keep sucking out your spirit like this until not even a drop is left...\
name ""
name "Luka"
>Hyaaa!\
name ""
mov %hseanwave,10:hseanwave
>The mouth sucks on my penis in a rhythm, almost the same as when my penis spasms during an orgasm.\
>I writhe in agony under the forced pleasure, too weak to find any relief.\
name $name
>Hehe... It's delicious...@
>Both your blood and your semen...\
name ""
>The Vampire continues to gently suck out my blood from my neck.@
>Every so often I feel her tongue stretch out and lick my neck clean before she starts sucking again.\
>I feel myself getting weaker and weaker, slowly giving over to the feelings.@
>Both the warm ecstasy radiating from my neck, and the powerful pleasure from my penis.\
name "Luka"
>Haaa...\
name ""
>I let myself relax, focusing on the pleasure.@
>I want her to drink my blood, to suck out my semen...@
>The more she sucks on me, the more I want her to take from me.\
>My reason crumbles away, letting a deep desire take its place.\
name "Luka"
>Ahh... That feels so good...@
>More... Suck more...\
name ""
name $name
>Hehe... It looks like you're already my slave...@
>Then allow me to take more of your blood and semen...\
name ""
>The Vampire starts to suck even harder on both my neck and my penis, sending explosions of ecstasy through my body.\
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\vampire_h3.bmp",0,0
gosub *syasei2
>I shout out in pleasure as I explode inside the Vampire, filling her vagina with semen.\
name $name
>Hehe... Isn't being sucked by me the best?@
>Forget everything, and just give your body to me...\
name ""
name "Luka"
>Ah... Ahhh...\
name ""
>My soul itself feels like its been put into a trance of pleasure.@
>Despite how dangerous this is, I give myself over completely to her.\
>I want her to suck me dry...@
>Unable to push away the dangerous thoughts, I just embrace them.\
name $name
>Come inside me again...@
>I'll suck out all of your semen...\
name ""
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\vampire_h4.bmp",0,0
gosub *syasei2
>Just like she ordered, I explode inside her again.\
name "Luka"
>Ahh...\
name ""
name $name
>Mmm... To the last drop...\
name ""
name "Luka"
>Ahh...\
name ""
>It's as if both my semen and life itself are being drained into her...@
>Each soft suck of her lips leaves me feeling even more fatigued and exhausted.\
>My vision goes hazy as my thoughts get confused and muddy.@
>The only thing I can work out is that this Vampire is draining my life from me...\
name "Luka"
>Haaa...\
name ""
name $name
>Hehe... I'll be drinking the last of your life soon...@
>How does it feel, living your long life until now just to end up as my food...?\
name ""
name "Luka"
>I...It feels good...\
name ""
>I surrender myself over to her.@
>Completely submissive, I just let her suck my blood.\
>She's going to suck me dry...@
>It feels like I'm in heaven...\
name "Luka"
>Ah...aaa...\
name ""
>My consciousness is almost completely gone.@
>Feeling cold all over, it feels like this isn't even my own body anymore.\
name $name
>You'll die after the next ejaculation...@
>I'll have taken everything from you.\
>Do you still want to come?\
name ""
name "Luka"
>A...Ahh... I want to come...\
name ""
name $name
>So you even want to give me your last drop...@
>What a good boy, hehe.\
>Now then, I'll gladly take it...\
name ""
name "Luka"
>Haaa...\
name ""
>She sucks down hard on my penis again...\
gosub *syasei1:gosub *syasei2
>With two weak throbs, I come inside her.@
>The last of my life weakly pours into her warm vagina.\
mov %hseanwave,0:hseanwave
name $name
>Hehe, I drained you to the last drop...@
>Just what you wanted, right?\
name ""
name "Luka"
>Ah...a...\
name ""
>Wrapped in ecstasy, my life drifts away...\
gosub *anten
>After having both his blood and semen sucked dry, the boy remains as nothing but a corpse.\
>But even though he's dead, the boy died with a smile on his face...\
>.............\
goto *badend



*behemoth_start

mov $name,"Behemoth"
mov $name2,"Behemoth"
mov $lavel,"behemoth"
mov $tatie1,"behemoth_st01"
mov $tatie2,"behemoth_st02"
mov $tatie3,"behemoth_st03"
mov $tatie4,"behemoth_st02"
mov $haikei,"bg142"
mov %monster_x,-30
mov %monster_y,0
if %nanido=1 mov %max_enemylife,10000
if %nanido=2 mov %max_enemylife,11000
if %nanido=3 mov %max_enemylife,15000
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,99
mov %earth_keigen,40
if %nanido=3 mov %earth_keigen,20
mov %music,1
mov %tikei,0
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"You ain't getting away!"
mov $mogaku_sel2,"Haha, don't think that ya can get away with that pathetic excuse for struggling!"
mov $mogaku_sel3,"Haha, let me see some more of that pathetic squirming!"
mov $mogaku_sel4,"Look at that, you're so pitiful!"
mov $mogaku_sel5,"My aren't you an energetic one?"
mov $mogaku_dassyutu1,"Ya escaped...?"
mov $mogaku_dassyutu2,"It would have been easier for ya to just give in..."
mov $mogaku_earth_dassyutu1,"A power stronger than mine...?"
mov $mogaku_earth_dassyutu2,"What the hell are you!?"
mov $half_s1,"It feels good, doesn't it?"
mov $half_s2,"That face of yours just makes me want to torment ya some more..."
mov $kiki_s1,"Already about to give up?"
mov $kiki_s2,"Then I'll finish ya off!"
mov %end_n,9
mov %exp_minus,110000
mov %zmonster_x,-300
mov %tukix,320
mov %owaza_count1a,6
name $name
>What's a human doing here?@
>Ah, did ya come here just to be fucked by me by any chance?\
name ""
name "Luka"
>A...A Behemoth!?\
name ""
>An incredibly strong monster is in front of me...@
>I've only heard the legends about them living in places where humans aren't able to tread...\
>She really exists, and is right in front of me...@
>This place is far more dangerous than I realized...!\
gosub *face2
name $name
>That's some great timing ya got there.@
>I was just getting into my breeding phase, and it looks like ya could have some good sperm...\
name ""
gosub *face1
goto *common_main



*behemoth_v

gosub *face3
name $name
>How can a human have such power!?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Behemoth is sealed into a mix between a lion and a rhino!\
mov %viclose,1:gosub *victory
mov %getexp,120000:gosub *lvup
mov %2334,1
goto *sean0289



*behemoth_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>Gave up, eh?@
>Then I'll rape ya until you're crazy!\
name ""
goto *behemoth_a



*behemoth_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *behemoth_kousan
if %cmd1=16 goto *behemoth_onedari
if %cmd1=17 goto *common_skill
goto *behemoth_main



*behemoth_a

if %kousoku=1 rnd2 %ransu,1,5
if %kousoku=1 && %ransu<3 gosub *behemoth_a5:goto *common_main
if %kousoku=1 && %ransu<5 gosub *behemoth_a6:goto *common_main
if %kousoku=1 && %ransu=5 && %owaza_count1a>1 gosub *behemoth_a7
if %kousoku=1 skip -4
rnd2 %ransu,1,4
if %ransu=1 gosub *behemoth_a1:goto *common_main
if %ransu=2 gosub *behemoth_a2:goto *common_main
if %ransu=3 gosub *behemoth_a3:goto *common_main
if %ransu=4 && %owaza_count1a>7 gosub *behemoth_a4:goto *common_main
skip -5



*behemoth_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll force it out of ya like this!"
if %ransu=2 mov $sel1,"Haha, come on! Let out that semen into my hand!"
if %ransu=3 mov $sel1,"I just might crush it if I want!"
name $name
eng $sel1:$sel6\
name ""
skillname "Behemoth Shake"
dwave 1,"se\ero_koki1.ogg"
>The Behemoth tightly grabs Luka's penis, and starts to violently stroke him!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3611
if %nanido<2 damage 170,190
if %nanido=2 damage 190,210
if %nanido=3 damage 210,230
skillname ""
if %mylife=0 sub %stack,1:return *behemoth_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*behemoth_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck your cock!"
if %ransu=2 mov $sel1,"How about I suck it all out!?"
if %ransu=3 mov $sel1,"Come on, I'll suck it out of ya!"
name $name
eng $sel1:$sel6\
name ""
skillname "Behemoth Suck"
dwave 1,"se\ero_buchu3.ogg"
>The Behemoth uses her mouth to pump Luka's penis like a piston!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3612
if %nanido<2 damage 180,200
if %nanido=2 damage 200,220
if %nanido=3 damage 220,240
skillname ""
if %mylife=0 sub %stack,1:return *behemoth_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*behemoth_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"How about I crush that penis of yours between my breasts?"
if %ransu=2 mov $sel1,"My breasts are pretty soft, ya know?"
if %ransu=3 mov $sel1,"Let's see ya shoot it out right between these!"
name $name
eng $sel1:$sel6\
name ""
skillname "Behemoth Breasts"
dwave 1,"se\ero_koki1.ogg"
>The Behemoth squeezes Luka's penis between her breasts!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3613
if %nanido<2 damage 190,210
if %nanido=2 damage 210,230
if %nanido=3 damage 230,250
skillname ""
if %mylife=0 sub %stack,1:return *behemoth_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*behemoth_a4

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name $name
>I'm gonna torment ya with my tail!\
name ""
skillname "Behemoth Tail"
dwave 1,"se\ero_makituki3.ogg"
>The Behemoth's tail wraps around Luka's body!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
if %nanido<2 damage 180,200
if %nanido=2 damage 200,220
if %nanido=3 damage 220,240
mov %kousoku,1:gosub *status_print
>Luka's being bound by the Behemoth's tail!\
skillname ""
if %mylife=0 sub %stack,1:return *behemoth_h4
if %kousan=2 sub %stack,1:return
name $name
if %first_sel1=1 skip 4
>Hehehe... How do ya want me to torment ya?@
>How about I strangle you to death...?\
skip 3
>Ya ain't getting away this time.@
>I'll finish ya off with my tail!\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,100
if %earth=0 && %nanido=2 mov %genmogaku,100
if %earth=0 && %nanido=3 mov %genmogaku,100
if %earth>0 && %nanido<2 mov %genmogaku,2
if %earth>0 && %nanido=2 mov %genmogaku,2
if %earth>0 && %nanido=3 mov %genmogaku,3
sub %stack,1
return



*behemoth_a5

add %stack,1
>Luka is bound by the Behemoth's tail...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Haha, painful isn't it?"
if %ransu=2 mov $sel1,"I'll make it tighter and torment ya!"
if %ransu=3 mov $sel1,"Let me see ya squirm in agony!"
name $name
eng $sel1:$sel6\
name ""
skillname "Behemoth Torture"
dwave 1,"se\ero_simetuke1.ogg"
>The Behemoth's tail tightens around Luka's body!
skillcount2 3614
if %nanido<2 damage 180,200
if %nanido=2 damage 200,220
if %nanido=3 damage 220,240
skillname ""
if %mylife=0 sub %stack,1:return *behemoth_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*behemoth_a6

add %stack,1
>Luka is bound by the Behemoth's tail...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll make sure to torment you're penis, too!"
if %ransu=2 mov $sel1,"I'll tighten around your penis..."
if %ransu=3 mov $sel1,"Let me see ya come like the weak boy you are!"
name $name
eng $sel1:$sel6\
name ""
skillname "Behemoth Draw"
dwave 1,"se\ero_koki1.ogg"
>The Behemoth's tail wraps around Luka's penis, and starts to stroke him!
skillcount2 3615
if %nanido<2 damage 190,210
if %nanido=2 damage 210,230
if %nanido=3 damage 230,250
skillname ""
if %mylife=0 sub %stack,1:return *behemoth_h6
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*behemoth_a7

add %stack,1
>Luka is bound by the Behemoth's tail...\
name $name
>Alright, it's time to rape ya...@
>With my tail!\
name ""
skillname "Animal Rape"
dwave 1,"se\ero_pyu1.ogg"
>The tip of the Behemoth's tail slips into Luka's ass!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,100
if %wind=2 && %nanido=2 mov %wind_kakuritu,100
if %wind=2 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3616
mov %damage_kotei,1
damage 250,280
skillname ""
if %mylife=0 sub %stack,1:return *behemoth_h7
sub %stack,1
goto *behemoth_a8



*behemoth_a8

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll rape ya nice and hard!":mov $sel2,"Her tail goes in out of Luka's ass like a piston!"
if %ransu=2 mov $sel1,"Don't ya just love this kind of torment!?":mov $sel2,"The tip of her tail pushes against Luka's prostate!"
if %ransu=3 mov $sel1,"Hah, how does it feel being raped like this even though you're a man!?":mov $sel2,"Her tail vibrates inside Luka's ass!"
name $name
eng $sel1:$sel6\
name ""
skillname "Animal Rape"
dwave 1,"se\ero_koki1.ogg"
eng $sel2:$sel6
skillcount2 3616
mov %damage_kotei,1
damage 250,280
skillname ""
if %mylife=0 sub %stack,1:return *behemoth_h7
sub %stack,1
goto *behemoth_a8



*behemoth_onedari

mov $list1,"Behemoth Shake"
if %3611>0 mov %list_num1,1
mov $list2,"Behemoth Suck"
if %3612>0 mov %list_num2,1
mov $list3,"Behemoth Breasts"
if %3613>0 mov %list_num3,1
mov $list4,"Behemoth Torture"
if %3614>0 mov %list_num4,1
mov $list5,"Behemoth Draw"
if %3615>0 mov %list_num5,1
mov $list6,"Animal Rape"
if %3616>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *behemoth_onedari1
if %cmd1=12 goto *behemoth_onedari2
if %cmd1=13 goto *behemoth_onedari3
if %cmd1=14 goto *behemoth_onedari4
if %cmd1=15 goto *behemoth_onedari5
if %cmd1=16 goto *behemoth_onedari6
if %cmd1=-1 goto *behemoth_main
goto *behemoth_onedari



*behemoth_onedari1

gosub *onedari_syori
name $name
>Ya want to be squeezed by my hand, eh?\
name ""
gosub *behemoth_a1
skip -1



*behemoth_onedari2

gosub *onedari_syori
name $name
>Ya want to be sucked by my mouth, eh?\
name ""
gosub *behemoth_a2
skip -1



*behemoth_onedari3

gosub *onedari_syori
name $name
>Ya want to be squeezed by my breasts, eh?\
name ""
gosub *behemoth_a3
skip -1



*behemoth_onedari4

gosub *onedari_syori_k
name $name
>Ya want my tail to strangle you, eh?\
name ""
if %kousoku=0 gosub *behemoth_a4
gosub *behemoth_a5
skip -1



*behemoth_onedari5

gosub *onedari_syori_k
name $name
>Ya want my tail to stroke your cock, eh?\
name ""
if %kousoku=0 gosub *behemoth_a4
gosub *behemoth_a6
skip -1



*behemoth_onedari6

gosub *onedari_syori_k
name $name
>Ya want me to rape your ass...?\
name ""
if %kousoku=0 gosub *behemoth_a4
gosub *behemoth_a7
skip -1



*behemoth_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\behemoth_bk03.bmp",-30,0
gosub *syasei2
>As the Behemoth violently strokes Luka's penis, he comes, covering her hand with semen.\
mov %viclose,1:gosub *lose
mov %2634,%2634+1:if %2634=1 mov %count_koenemy,%count_koenemy+1
if %2634>%count_most mov %count_most,%2634:mov $count_mostname,$name
count 5,1
mov $bad1,"Luka was forced to come as the Behemoth gave him a violent handjob."
gosub *face2
name $name
>Haha, look at it all over my hand...\
name ""
goto *behemoth_h



*behemoth_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\behemoth_bk01.bmp",-30,0
gosub *syasei2
>As the Behemoth violently sucks on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2634,%2634+1:if %2634=1 mov %count_koenemy,%count_koenemy+1
if %2634>%count_most mov %count_most,%2634:mov $count_mostname,$name
count 4,1
mov $bad1,"The Behemoth forced Luka to come by giving him a violent blowjob."
gosub *face2
name $name
>Nnn... Look at all this semen...\
name ""
goto *behemoth_h



*behemoth_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\behemoth_bk02.bmp",-30,0
gosub *syasei2
>As her soft breasts crush his penis, Luka comes, spraying his semen all over her chest.\
mov %viclose,1:gosub *lose
mov %2634,%2634+1:if %2634=1 mov %count_koenemy,%count_koenemy+1
if %2634>%count_most mov %count_most,%2634:mov $count_mostname,$name
count 7,1
mov $bad1,"The Behemoth forced Luka to come by using her breasts."
gosub *face2
name $name
>Haha, look at it all over my chest...\
name ""
goto *behemoth_h



*behemoth_h4

mov %ikigoe,3:gosub *ikigoe
name $name
>What, already?\
name ""
gosub *syasei1
lsp 694,":a;chara\behemoth_bk04.bmp",-30,0
gosub *syasei2
>As soon as her tail wraps around his body, Luka comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2634,%2634+1:if %2634=1 mov %count_koenemy,%count_koenemy+1
if %2634>%count_most mov %count_most,%2634:mov $count_mostname,$name
count 19,1
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka accidentally came just from being wrapped by her tail."
gosub *face2
name $name
>Hahaha, that was pathetic!\
name ""
goto *behemoth_h



*behemoth_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\behemoth_bk04.bmp",-30,0
gosub *syasei2
>As the Behemoth tightened her tail around his body, Luka comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2634,%2634+1:if %2634=1 mov %count_koenemy,%count_koenemy+1
if %2634>%count_most mov %count_most,%2634:mov $count_mostname,$name
count 16,1
mov $bad1,"Luka was forced to come as the Behemoth tightened her tail around his body."
gosub *face2
name $name
>Ya came while being tormented?@> Haha, that's just pathetic!\
name ""
goto *behemoth_h



*behemoth_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\behemoth_bk04.bmp",-30,0
gosub *syasei2
>As the Behemoth stroked Luka's penis with her tail, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2634,%2634+1:if %2634=1 mov %count_koenemy,%count_koenemy+1
if %2634>%count_most mov %count_most,%2634:mov $count_mostname,$name
count 19,1
mov $bad1,"Luka was forced to come as the Behemoth strokes his penis with her tail."
gosub *face2
name $name
>Haha, ya got it all over my tail...\
name ""
goto *behemoth_h



*behemoth_h7

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\behemoth_bk04.bmp",-30,0
gosub *syasei2
>As the Behemoth's tail went in and out of Luka's ass, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2634,%2634+1:if %2634=1 mov %count_koenemy,%count_koenemy+1
if %2634>%count_most mov %count_most,%2634:mov $count_mostname,$name
count 9,1
mov $bad1,"Luka was forced to come as the Behemoth raped his ass."
gosub *face2
name $name
>Ya came from being raped in the ass?@
>You're a disgusting man, ya know? Haha!\
name ""
goto *behemoth_h



*behemoth_h

mov $bad2,"Luka slowly went crazy as the Behemoth kept raping him for the rest of his life."
if %2634=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
name $name
>Alright, time for me to rape ya.@
>I'll be fucking ya for a long time, so get ready!\
name ""
mov %hseanwave,1:hseanwave
cspl 690,699
lsp 690,":a;chara\behemoth_ct01.bmp",0,0:print 10,500
>The Behemoth mounts me, and forces my penis into her pink vagina before I can react.\
name "Luka"
>Ahhh!\
name ""
>As soon as I'm inside her, I feel powerful muscles inside her vagina clamp down around my penis, locking me inside her.\
>Almost as if there's a strong hand inside her vagina grasping me, no matter how hard I struggle, I can't pull out of her.\
name "Luka"
>Ahh... It's too tight...\
name ""
name $name
>My pussy is just as strong as the rest of my body.@
>I'll squeeze down on ya as hard as I can, and force that semen out!\
name ""
>The Behemoth laughs as she starts to flex her muscles, clamping down even tighter around my penis.\
>Three different rhythms of pressure starts to squeeze me around the base shaft and tip of my penis.@
>As if she had three, strong hands inside her, each section squeezes my penis different from the other.\
>Overwhelmed by the sudden pleasure, I let out a scream.\
name "Luka"
>Ahhh!\
name ""
name $name
>Haha, look at ya screaming in pleasure from being raped.@> What a poor excuse for a man.@
>I'll squeeze out that semen of yours in no time with my pussy!\
name ""
>Her vagina squeezes down even harder around my penis as she taunts me, making me shiver in helpless pleasure.\
name $name
>Looks like you're about done!@
>I'll finish ya off with this!\
name ""
name "Luka"
>Ahhh!\
name ""
>Her vagina suddenly gets narrow, making my penis sink deep into her soft flesh.@
>Unable to take it any longer, I feel my penis start to pulse inside of her as I give in.\
gosub *syasei1
lsp 690,":a;chara\behemoth_ct02.bmp",0,0
lsp 695,":a;chara\behemoth_bk05.bmp",-30,0
gosub *syasei2
name $name
>Haha, I feel ya squirting inside my pussy.@
>Looks like I squeezed it out of ya.\
name ""
>The Behemoth laughs at me as I come inside of her.@
>Still clamping down around me, she uses the muscles inside her vagina to squeeze out all of the semen into her.\
name "Luka"
>Ahh...\
name ""
name $name
>You ain't resting now!@
>I'm not done raping ya!\
name ""
mov %hseanwave,7:hseanwave
>The Behemoth suddenly starts to shake her hips, violently forcing me in and out of her.\
name "Luka"
>Ahhh!\
name ""
>I'm roughly forced in and out of her tight vagina, her flesh rubbing hard against my penis with every movement.\
>As more of her fluids flood out of her onto me, the lubrication slowly gets better, letting me slip in and out of her easier and easier.\
name "Luka"
>Ahh... Amazing...\
name ""
name $name
>Haha, take it!@
>My rough sex is too much for you, ain't it!?\
name ""
>The Behemoth bounces on top of me, slowly getting faster and faster as she rides me.@
>The friction inside of her gets so strong, it almost feels like my penis could burn from the heat.\
name "Luka"
>Ahhh!\
name ""
>I scream out as she wildly rapes me, forcing me to another height.\
gosub *syasei1
lsp 690,":a;chara\behemoth_ct03.bmp",0,0
gosub *syasei2
>I explode inside of her tight vagina, my mouth hanging open as she squeezes out every drop.\
name $name
>Come on, no resting!@
>I ain't done raping ya!\
name ""
>The Behemoth keeps riding me hard, giving me no time to rest.\
name "Luka"
>Ahhh!@
>S...Stop already!\
name ""
name $name
>There's no way I'd be satisfied with just that!@
>Come on, ya gotta come a hell of a lot more than that!\
name ""
name "Luka"
>Ahhh!\
name ""
>She clamps down hard again on my penis as she forces out another pitiful ejaculation.\
gosub *syasei1
lsp 690,":a;chara\behemoth_ct04.bmp",0,0
gosub *syasei2
name $name
>Hah, ya came again?@
>Ain't my muscular pussy the best?\
name ""
name "Luka"
>Ahhh...\
name ""
name $name
>You're just my little sex slave now, boy.@
>I'll clamp down on your penis with my pussy, and make sure ya never get away from me.\
>Haha, how's this?@
>Eh, well!?\
name ""
name "Luka"
>S...Stop!!!@>Please, let me go!@
>Ahhh!\
name ""
>I cry out in misery as she continues to violently rape me.@
>Despite the pained cries from my mouth, my penis throbs in delight at the feeling of her warm vagina.\
gosub *syasei1:gosub *syasei2
>The white proof of my submission shoots into her.\
>I'm just a sex slave, and she's going to keep violently raping me like this...@
>I start to sink into despair.\
gosub *anten
mov %hseanwave,0:hseanwave
>Kept as her sex slave, she rapes me every day.@
>Endlessly being raped, I slowly lose my mind.\
>With my heart and soul in tatters, I just look up into the sky in a daze as she continues to violently rape me.\
>Thus, my adventure ends...\
>..............\
goto *badend



*esuccubus_start

mov $name,"Elder Succubus"
mov $name2,"Elder Succubus"
mov $lavel,"esuccubus"
mov $tatie1,"esuccubus_st01"
mov $tatie2,"esuccubus_st02"
mov $tatie3,"esuccubus_st03"
mov $tatie4,"esuccubus_st02"
mov $haikei,"bg148"
mov %monster_x,188
mov %monster_y,0
if %nanido=1 mov %max_enemylife,9500
if %nanido=2 mov %max_enemylife,10500
if %nanido=3 mov %max_enemylife,14250
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,90
mov %earth_keigen,20
if %nanido=3 mov %earth_keigen,10
mov %music,1
mov %tikei,0
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Hehe, useless... I'll drain you dry."
mov $mogaku_sel2,"Hehe, useless... I'll drain you dry."
mov $mogaku_sel3,"There's no use struggling, you're already my prey..."
mov $mogaku_sel4,"There's no use struggling, you're already my prey..."
mov $mogaku_sel5,"There's no use struggling, you're already my prey..."
mov $mogaku_dassyutu1,"That's too bad... Just a little more, and you would have drowned in pleasure..."
mov $mogaku_dassyutu2,""
mov $mogaku_earth_dassyutu1,"What power..."
mov $mogaku_earth_dassyutu2,"I feel the earth itself in you..."
mov $half_s1,"Indulge in my body..."
mov $half_s2,"You'll be able to die while tasting the ultimate in pleasure..."
mov $kiki_s1,"You're almost done, hehe..."
mov $kiki_s2,"It looks like it's about time for me to finish you off..."
mov %end_n,9
mov %exp_minus,0
mov %zmonster_x,-130
mov %tukix,320
mov %owaza_count1a,6
mov %owaza_count2a,6
mov %owaza_count3a,6
name $name
>You won't go any further, you delicious looking boy...\
name ""
>The monster blocking my path looks at me with a seductive smile.\
name "Luka"
>Guh... A Succubus...?\
name ""
gosub *face2
name $name
>If you don't resist, I can give you an amazing orgasm...@
>You'll be able to die in ecstasy...\
name ""
name "Luka"
>Sorry, but I'm going to get through here no matter what!\
name ""
>I calmly pull out my sword and take a fighting stance.\
name $name
>Oh? You're going to resist?@
>I'm the highest class of Succubus, you know...?\
>I'll let you realize yourself just what that means as I drain you dry!\
name ""
gosub *face1
goto *common_main



*esuccubus_v

gosub *face3
name $name
>How can this be!?@>How could I lose!?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Elder Succubus is sealed in the form of a bat!\
mov %viclose,1:gosub *victory
mov %getexp,120000:gosub *lvup
mov %2336,1
goto *sean0294



*esuccubus_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>You want to be my prey?@
>Then I'll show you the unmatched skills of an Elder Succubus...\
name ""
goto *esuccubus_a



*esuccubus_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *esuccubus_kousan
if %cmd1=16 goto *esuccubus_onedari
if %cmd1=17 goto *common_skill
goto *esuccubus_main



*esuccubus_a

if %kousoku=1 gosub *esuccubus_a9:goto *common_main
rnd2 %ransu,1,7
if %ransu=1 gosub *esuccubus_a1:goto *common_main
if %ransu=2 gosub *esuccubus_a2:goto *common_main
if %ransu=3 gosub *esuccubus_a3:goto *common_main
if %ransu=4 gosub *esuccubus_a4:goto *common_main
if %ransu=5 && %owaza_count2a>7 && %status=0 gosub *esuccubus_a5:goto *common_main
if %ransu=6 && %owaza_count3a>7 gosub *esuccubus_a6:goto *common_main
if %ransu=7 && %owaza_count1a>7 gosub *esuccubus_a8:goto *common_main
skip -8



*esuccubus_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"First I put my finger around the tip..."
if %ransu=2 mov $sel1,"I just need to do this to milk it out..."
if %ransu=3 mov $sel1,"It feels good having your penis played with, doesn't it?"
name $name
eng $sel1:$sel6\
name ""
skillname "Semen Squeezecraft"
dwave 1,"se\ero_koki1.ogg"
>The Elder Succubus uses her skilled hands to stroke Luka's penis!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3621
if %nanido<2 damage 140,160
if %nanido=2 damage 160,180
if %nanido=3 damage 180,200
skillname ""
if %mylife=0 sub %stack,1:return *esuccubus_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*esuccubus_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Step on the proof of your manhood..."
if %ransu=2 mov $sel1,"Feeling pleasure from an act like this... How pathetic."
if %ransu=3 mov $sel1,"Let me see that semen shoot out as I step on you..."
name $name
eng $sel1:$sel6\
name ""
skillname "Male Dominating Footcraft"
dwave 1,"se\ero_koki1.ogg"
>The Elder Succubus steps on Luka's penis!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3622
if %nanido<2 damage 150,170
if %nanido=2 damage 170,190
if %nanido=3 damage 190,210
skillname ""
if %mylife=0 sub %stack,1:return *esuccubus_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*esuccubus_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck in your energy with my mouth..."
if %ransu=2 mov $sel1,"Even if you don't ejaculate, I can still take your energy..."
if %ransu=3 mov $sel1,"Doesn't it feel like you could just melt away in my mouth?"
name $name
eng $sel1:$sel6\
name ""
skillname "Draining Blowjob"
dwave 1,"se\ero_chupa6.ogg"
eng "The Elder Succubus eagerly sucks on Luka's penis!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>The sweet feeling of release floods his body as she sucks on him!
skillcount2 3623
if %nanido<2 damage 160,180
if %nanido=2 damage 180,200
if %nanido=3 damage 200,220
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *esuccubus_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*esuccubus_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll milk you with my breasts..."
if %ransu=2 mov $sel1,"Cover my chest in semen..."
if %ransu=3 mov $sel1,"You want my breasts to tease you, don't you?"
name $name
eng $sel1:$sel6\
name ""
skillname "Male Squeezing Titcraft"
dwave 1,"se\ero_koki1.ogg"
>The Elder Succubus squeezes Luka's penis between her breasts!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3624
if %nanido<2 damage 170,190
if %nanido=2 damage 190,210
if %nanido=3 damage 210,230
skillname ""
if %mylife=0 sub %stack,1:return *esuccubus_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*esuccubus_a5

add %stack,1
mov %owaza_count2a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Melt away in my kiss..."
if %ransu=2 mov $sel1,"Let your thoughts melt away in my kiss..."
if %ransu=3 mov $sel1,"Drown in my lips..."
name $name
eng $sel1:$sel6\
name ""
skillname "Kiss of Ecstasy"
dwave 1,"se\ero_chupa2.ogg"
eng "The Elder Succubus kisses Luka!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,100
if %wind=2 && %nanido=2 mov %wind_kakuritu,90
if %wind=2 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>A weak numbness floods from his lips to the rest of his body!
skillcount2 3625
if %nanido<2 damage 130,150
if %nanido=2 damage 150,170
if %nanido=3 damage 170,190
if %status=0 mov $sel1,"Luka was put into a trance!"
if %status=1 mov $sel1,"Luka is in a trance..."
mov %status,1:gosub *status_print
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *esuccubus_h5
if %kousan=2 sub %stack,1:return
name "Luka"
>Haa...\
name ""
name $name
>Now you're just my prey...@
>It's time for me to play with my food...\
name ""
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,2,3
if %nanido=3 rnd2 %status_turn,3,4
sub %stack,1
return



*esuccubus_a6

add %stack,1
mov %owaza_count3a,0
if %kousan=2 skip 9
name $name
if %first_sel1=1 skip 4
>Hehe... It's time for some fun.@
>I'll absorb your energy with this wet pussy of mine...\
skip 3
>Now, have sex with me...@
>I'll absorb your energy with this wet pussy of mine...\
name ""
skillname "Succubus Mount"
eng "The Elder Succubus pushes Luka to the ground, and quickly mounts him!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,100
if %wind=2 && %nanido=2 mov %wind_kakuritu,100
if %wind=2 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>The Elder Succubus is sitting on top of Luka!\
skillname ""
name $name
>It's time for me to devour your penis...@
>You'll drown in bliss once it's in my pussy...\
name ""
skillcount2 3626
skillname "Energy Drain"
dwave 1,"se\ero_pyu2.ogg"
lsp 700,":a;chara\esuccubus_h1.bmp",0,0:print 10,500
>The Elder Succubus drops her waist, and forces Luka into her!\
mov %damage_kotei,1
damage 200,230
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
>Luka is being raped by the Elder Succubus!\
skillname ""
if %mylife=0 sub %stack,1:return *esuccubus_h6
if %kousan=2 sub %stack,1:return
name $name
>Hehe... It's incredible inside me, isn't it?@
>I'll absorb all your energy, just like this...\
name ""
mov %first_sel1,1
sub %stack,1
goto *esuccubus_a7



*esuccubus_a7

add %stack,1
>Luka is being raped by the Elder Succubus...\
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll make it nice and tight...":mov $sel2,"Her vagina slowly gets smaller and smaller!"
if %ransu=2 mov $sel1,"It feels good, doesn't it? Make sure you give a lot of semen as thanks...":mov $sel2,"Her vagina starts to vibrate!"
if %ransu=3 mov $sel1,"This is what it's like to have sex with a Succubus... Doesn't it feel like you just melt away?":mov $sel2,"The folds inside of her vagina start to squirm and wriggle around Luka's penis!"
if %ransu=4 mov $sel1,"Your life will fade little by little as we have sex...":mov $sel2,"Her soft flesh rubs against Luka's penis as she slightly moves!"
name $name
eng $sel1:$sel6\
name ""
skillname "Energy Drain"
dwave 1,"se\ero_chupa6.ogg"
eng $sel2:$sel6
skillcount2 3626
mov %damage_kotei,1
damage 200,230
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *esuccubus_h7
sub %stack,1
goto *esuccubus_a7



*esuccubus_a8

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name $name
>Hehe, caught you!\
name ""
skillname "Succubus Hold"
eng "The Elder Succubus clings to Luka!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>Luka is being held down by the Elder Succubus!\
skillname ""
name $name
>Just for you, I'll rape you with my bellybutton...\
name ""
skillname "Voracious Monster Bellybutton"
>The Elder Succubus' bellybutton opens, revealing a pink hole!\
>A strange, wet liquid drips out of her!\
skillname ""
name $name
if %first_sel2=1 skip 5
>Doesn't my bellybutton just look amazing...?@
>You'll go mad with pleasure in no time once you're in here...\
>Aren't you looking forward to trying it? Hehe.\
skip 3
>I won't let you get away this time...@
>You'll go mad with pleasure in no time once you're in here...\
name ""
mov %first_sel2,1
if %earth=0 && %nanido<2 mov %genmogaku,1
if %earth=0 && %nanido=2 mov %genmogaku,1
if %earth=0 && %nanido=3 mov %genmogaku,1
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
sub %stack,1
return



*esuccubus_a9

add %stack,1
if %kousan=2 skip 5
name $name
>Are you ready?@
>Alright, then it's time for me to devour your penis with my bellybutton...\
name ""
skillcount2 3627
skillname "Voracious Monster Bellybutton"
dwave 1,"se\ero_pyu2.ogg"
>The Elder Succubus' bellybutton opens wide, and swallows Luka's penis!
mov %damage_kotei,1
damage 350,370
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
>Luka is being raped by the Elder Succubus' bellybutton!\
skillname ""
if %mylife=0 sub %stack,1:return *esuccubus_h8
name "Luka"
>Ahhh!!\
name ""
name $name
>Haha, it's amazing isn't it?@
>Look, I'm really eating your penis with my stomach...\
name ""
skillcount2 3627
skillname "Voracious Monster Bellybutton"
dwave 1,"se\ero_pyu2.ogg"
>Her bellybutton moves around Luka's penis, making chewing motions!
mov %damage_kotei,1
damage 350,370
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *esuccubus_h8
name "Luka"
>Haaa...\
name ""
name $name
>There's no enduring it...@
>As soon as you were forced into here, your fate was sealed...\
name ""
skillcount2 3627
skillname "Voracious Monster Bellybutton"
dwave 1,"se\ero_pyu2.ogg"
>Her stomach vibrates around Luka's penis!
mov %damage_kotei,1
damage 350,370
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *esuccubus_h8
name "Luka"
>Ahh... N...No more...\
name ""
name $name
>You can't take it any longer...?@
>Then I'll just have to finish you off...\
name ""
skillcount2 3627
skillname "Voracious Monster Bellybutton"
dwave 1,"se\ero_pyu2.ogg"
>Her bellybutton chews on Luka's penis, sending him over the edge!
mov %damage_kotei,1
damage 350,370
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
return *esuccubus_h8



*esuccubus_onedari

mov $list1,"Semen Squeezecraft"
if %3621>0 mov %list_num1,1
mov $list2,"Male Dominating Footcraft"
if %3622>0 mov %list_num2,1
mov $list3,"Draining Blowjob"
if %3623>0 mov %list_num3,1
mov $list4,"Male Squeezing Titcraft"
if %3624>0 mov %list_num4,1
mov $list5,"Kiss of Ecstasy"
if %3625>0 mov %list_num5,1
mov $list6,"Energy Drain"
if %3626>0 mov %list_num6,1
mov $list7,"Voracious Monster Bellybutton"
if %3627>0 mov %list_num7,1
gosub *cmd_onedari
if %cmd1=11 goto *esuccubus_onedari1
if %cmd1=12 goto *esuccubus_onedari2
if %cmd1=13 goto *esuccubus_onedari3
if %cmd1=14 goto *esuccubus_onedari4
if %cmd1=15 goto *esuccubus_onedari5
if %cmd1=16 goto *esuccubus_onedari6
if %cmd1=17 goto *esuccubus_onedari7
if %cmd1=-1 goto *esuccubus_main
goto *esuccubus_onedari



*esuccubus_onedari1

gosub *onedari_syori
name $name
>You want me to use my hand to make you feel good?\
name ""
gosub *esuccubus_a1
skip -1



*esuccubus_onedari2

gosub *onedari_syori
name $name
>You want me to use my foot to make you feel good?\
name ""
gosub *esuccubus_a2
skip -1



*esuccubus_onedari3

gosub *onedari_syori
name $name
>You want me to use my mouth to make you feel good?\
name ""
gosub *esuccubus_a3
skip -1



*esuccubus_onedari4

gosub *onedari_syori
name $name
>You want me to use my breasts to make you feel good?\
name ""
gosub *esuccubus_a4
skip -1



*esuccubus_onedari5

gosub *onedari_syori
name $name
>You want to drown in my kiss?\
name ""
gosub *esuccubus_a5
skip -1



*esuccubus_onedari6

gosub *onedari_syori
name $name
>You want to be raped?\
name ""
gosub *esuccubus_a6
gosub *esuccubus_a7
skip -1



*esuccubus_onedari7

gosub *onedari_syori_k
name $name
>You want to try being raped by my bellybutton?@
>You're a strange one... Lucky for you, an Elder Succubus can grant that desire.\
name ""
if %kousoku=0 gosub *esuccubus_a8
gosub *esuccubus_a9
skip -1



*esuccubus_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\esuccubus_bk03.bmp",188,0
gosub *syasei2
>As the Elder Succubus' skilled fingers run over Luka's penis, he comes, covering her hand in semen.\
mov %viclose,1:gosub *lose
mov %2636,%2636+1:if %2636=1 mov %count_koenemy,%count_koenemy+1
if %2636>%count_most mov %count_most,%2636:mov $count_mostname,$name
count 5,4
mov $bad1,"Luka was forced to come by the Elder Succubus' skilled handjob."
gosub *face2
name $name
>Hehe... My hand technique is the best, isn't it?@
>Covering my hand with so much semen... It was unbearable, wasn't it?\
name ""
goto *esuccubus_h



*esuccubus_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 697,":a;chara\esuccubus_bk07.bmp",188,0
gosub *syasei2
>As the Elder Succubus steps on Luka's penis, he comes, covering her foot with semen.\
mov %viclose,1:gosub *lose
mov %2636,%2636+1:if %2636=1 mov %count_koenemy,%count_koenemy+1
if %2636>%count_most mov %count_most,%2636:mov $count_mostname,$name
count 6,4
mov $bad1,"Luka was forced to come by the Elder Succubus' skilled footjob."
gosub *face2
name $name
>Hehe... My foot technique is the best, isn't it?@
>Covering my foot with so much semen... It was unbearable, wasn't it?\
name ""
goto *esuccubus_h



*esuccubus_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\esuccubus_bk01.bmp",188,0
gosub *syasei2
>As the Elder Succubus' skilled mouth sucks on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2636,%2636+1:if %2636=1 mov %count_koenemy,%count_koenemy+1
if %2636>%count_most mov %count_most,%2636:mov $count_mostname,$name
count 4,4
mov $bad1,"Luka was forced to come by the Elder Succubus' skilled blowjob."
gosub *face2
name $name
>Hehe... My mouth technique is the best, isn't it?@
>Filling my mouth with so much semen... It was unbearable, wasn't it?\
name ""
goto *esuccubus_h



*esuccubus_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\esuccubus_bk02.bmp",188,0
gosub *syasei2
>As the Elder Succubus' soft breasts squeeze into Luka's penis, he comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2636,%2636+1:if %2636=1 mov %count_koenemy,%count_koenemy+1
if %2636>%count_most mov %count_most,%2636:mov $count_mostname,$name
count 7,4
mov $bad1,"Luka was forced to come by the Elder Succubus' skilled tit fuck."
gosub *face2
name $name
>Hehe... My breasts are the greatest, aren't they?@
>Since you covered them with so much semen, it seems like you enjoyed them...\
name ""
goto *esuccubus_h



*esuccubus_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\esuccubus_bk04.bmp",188,0
gosub *syasei2
>As the Elder Succubus deeply kissed him, Luka couldn't stop himself from ejaculating.\
mov %viclose,1:gosub *lose
mov %2636,%2636+1:if %2636=1 mov %count_koenemy,%count_koenemy+1
if %2636>%count_most mov %count_most,%2636:mov $count_mostname,$name
count 18,4
mov $bad1,"Luka was forced to come as the Elder Succubus kissed him."
gosub *face2
name $name
>Hehe, just from a simple kiss?@
>That's so pitiful, little boy...\
name ""
goto *esuccubus_h



*esuccubus_h6

mov %ikigoe,3:gosub *ikigoe
name $name
>Hehe, already?\
gosub *syasei1
lsp 700,":a;chara\esuccubus_h2.bmp",0,0
gosub *syasei2
>The moment Luka's penis sinks into her, he comes, filling the Elder Succubus with semen.\
mov %viclose,1:gosub *lose
mov %2636,%2636+1:if %2636=1 mov %count_koenemy,%count_koenemy+1
if %2636>%count_most mov %count_most,%2636:mov $count_mostname,$name
count 7,4
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"As soon as Luka was forced into the Elder Succubus, he came."
gosub *face2
name $name
>Lost in an instant. Hehe.\
name ""
goto *esuccubus_h



*esuccubus_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\esuccubus_h2.bmp",0,0
gosub *syasei2
>As the Elder Succubus rides Luka, he comes, filling her vagina with semen.\
mov %viclose,1:gosub *lose
mov %2636,%2636+1:if %2636=1 mov %count_koenemy,%count_koenemy+1
if %2636>%count_most mov %count_most,%2636:mov $count_mostname,$name
count 1,4
mov $bad1,"Luka was forced to come as the Elder Succubus raped him."
gosub *face2
name $name
>Hehe... You seem to love being raped by a Succubus.@
>Just look at all the delicious semen you gave me...\
name ""
goto *esuccubus_h



*esuccubus_h8

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 696,":a;chara\esuccubus_bk06.bmp",188,0
gosub *syasei2
>As the Elder Succubus' bellybutton chews on Luka's penis, he comes, filling her stomach with semen.\
mov %viclose,1:gosub *lose
mov %2636,%2636+1:if %2636=1 mov %count_koenemy,%count_koenemy+1
if %2636>%count_most mov %count_most,%2636:mov $count_mostname,$name
count 2,4
mov $bad1,"The Elder Succubus raped Luka with her bellybutton, and forced him to come."
mov $bad2,"Like that, she continued to rape him until he dried up."
gosub *face2
name $name
>Hehe, you came...@
>But I'm not done yet...\
name ""
name "Luka"
>Ahh...\
name ""
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
>My penis continues to pulse inside her, each throb shooting off more semen directly into her stomach.\
>Each pulse sends the sensations of another ejaculation through me, overloading my brain.\
name $name
>Hehe, keep coming until there's nothing left...@
>I'll drink up every drop right into my stomach...\
name ""
name "Luka"
>Haaa!\
name ""
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
>My mouth gapes open in stunned bliss as the continual orgasms go off one after another.\
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
>The throbbing of my penis is seemingly in sync with my heartbeat, each pulse shooting off more and more of my life right into her stomach.\
name $name
>Hehehe... I'm going to suck out your energy until you're dead you know.@
>You'll get to feel sooo good by a Succubus, though.\
name ""
name "Luka"
>Ahh... No... No...\
name ""
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
>More and more semen pours into her bellybutton, the throbbing orgasms not subsiding in the least.@
>Even as I feel weaker and weaker, the ecstasy just gets stronger and stronger.\
>On the verge of passing out in exhaustion, I slowly begin to just indulge myself in the ecstasy.\
name "Luka"
>Haaa... Ahh...\
name ""
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
name $name
>Hehe, did you break?@
>Don't worry, you'll be in heaven soon...\
name ""
gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
>A final, powerful orgasm rocks my body as the last drop of life is mercilessly taken from me.\
>As I drift away, my last vision is of the smiling Elder Succubus.\
gosub *anten
gosub *clear_sprite
gosub *setwindow_01p
>Another boy lost his life to the skills of an Elder Succubus.@
>His long journey comes to an end as the simple prey of a monster.\
>............\
goto *badend



*esuccubus_h

mov $bad2,"The Elder Succubus raped Luka until his death."
if %2636=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
if %kousoku>0 mov %hseanwave,9:hseanwave:goto *esuccubus_hb
name $name
>Now it's time for me to absorb your energy seriously...@
>In truth, you wanted to be raped by a Succubus, didn't you?\
name ""
>The Elder Succubus easily pushes me to the ground, and hops on top of me.@
>She puts the entrance of her wet, pink hole right next to the tip of my penis.\
>The small vagina of a skilled Succubus, used to devour her prey.@
>She's about to force me into there...\
name $name
>I'll give you a taste of heaven.@
>You'll be able to meet your death in unmatched ecstasy.\
name ""
name "Luka"
>Ahh...\
name ""
>I'm about to be raped by a Succubus...@
>She might even really kill me.\
>The vagina that might bring my death slowly moves down closer to me.@
>Too weak to resist, I can only look on as she drops down.\
mov %hseanwave,9:hseanwave
cspl 690,699
lsp 700,":a;chara\esuccubus_h1.bmp",0,0:print 10,500
>In the next instant, she forces me all the way into her!\
name "Luka"
>Ahhhh!\
name ""
>As soon as I feel her, I let out a pitiful moan.@
goto *esuccubus_hb



*esuccubus_hb

>The feelings from her hot, wet vagina seem to continually change around my penis.\
>It feels like thousands of tiny little feelers are lining every inch of her vagina, rubbing and squirming around my penis.\
>Each one rubs up against my penis, paying special attention to the tip of my penis, and my back muscle.\
>Coming from deeper inside her, something that feels almost like a snake coils around my penis.\
>Coiling around me inside of her, it almost feels like a wet hand is stroking me inside her vagina at the same time.\
>At the same time, the walls of her vagina feel rough, and rub against my penis with every movement, filling me with a warm feeling of friction.\
>Lastly, her vagina sucks on me like a mouth, the suction seemingly pulling me deeper inside of her.\
>As all of these stimulations hit me at once, I'm left stunned in pleasure.\
name "Luka"
>Haaa...@
>Th...That feels amazing...\
name ""
name $name
>Hehe... I'm the best, aren't I?@
>You'll get to have your semen drained dry in my pussy...\
>Doesn't that just make you happy? Hehe.\
name ""
name "Luka"
>Ahh...\
name ""
>Even though she's a powerful Succubus, this is far more than I ever thought possible.\
>I can't do anything but tremble in joy just from being inside of her.\
>After only moments of being inside her, I already feel myself about to come.\
name "Luka"
>Ahh... I'm going to come...\
name ""
name $name
>Good, come inside of me...@
>It would be rude not to give a Succubus' pussy as much semen as you can.\
name ""
>Her vagina suddenly shrinks around me, doubling the force of every stimulation inside of her.\
name "Luka"
>Ahhh!\
name ""
>I spasm in bliss from her finishing blow, and go over the edge in an instant.\
gosub *syasei1
lsp 700,":a;chara\esuccubus_h2.bmp",0,0
gosub *syasei2
>I explode inside of the Elder Succubus, shooting off my semen into her wet vagina.@
>The feelers inside of her deftly squeeze and massage me during my orgasm, making it feel like it would last forever.\
name "Luka"
>Ahhh...\
name ""
>I keep pulsing inside of her, pouring more and more semen inside.@
>My long, long ejaculation continues as I start to drool.\
name $name
>Hehe, did you enjoy that?@
>I'm not done squeezing you, though...\
name ""
name "Luka"
>Haaa...\
name ""
>The Elder Succubus' vagina almost feels like a totally different creature...\
>All of the different stimulations inside of her feel like they're competing against each other, each trying to outdo the other in forcing me to spasm in pleasure.\
name $name
>Hehe... You want to come more, don't you?@
>Giving me all of your energy until you meet your death?\
name ""
name "Luka"
>Haaa...\
name ""
>She squeezes me tighter with her vagina as she giggles, sending fresh waves of bliss through me.\
name "Luka"
>Ahh... I'm going to come again...\
name ""
gosub *syasei1
lsp 700,":a;chara\esuccubus_h3.bmp",0,0
gosub *syasei2
>My penis throbs with joy inside of her, eager to drown inside of her vagina.\
name $name
>Hehe... What delicious semen...@
>Give me more...\
name ""
>The Elder Succubus looks down at me and giggles as she rides me.@
>Her eyes are ones of a predator looking down at their prey...\
>A Succubus is riding me...@
>A Succubus is draining me of my life...\
>The thought brings both humiliation and excitement to me as a man.\
name $name
>Playtime is about over...@
>I should really finish you off soon.\
name ""
name "Luka"
>Stop... Don't...@
>Ahhh!\
name ""
mov %hseanwave,10:hseanwave
>The Elder Succubus starts to slowly move her waist, forcing me in and out of her.@
>As I'm forced in and out of her wet vagina, I'm unable to even hold on for a few seconds.\
gosub *syasei1
lsp 700,":a;chara\esuccubus_h4.bmp",0,0
gosub *syasei2
name "Luka"
>Haaa...\
name ""
name $name
>It won't stop this time until you're dry...\
name ""
>The Elder Succubus continues slowly riding me, even as my ejaculation continues on.@
>Time continues to pass by, but my orgasm never finishes.\
name "Luka"
>Ahhhh!!\
name ""
name $name
>Hehe, it feels good, doesn't it?@
>You'll get to feel that all the way until your death...\
>Your life will end as I rape you... Doesn't that just make you happy? Hehe.\
name ""
name "Luka"
>Ah... Haaa!\
name ""
>Even as the Elder Succubus continues to ride me, my ejaculation doesn't stop.@
>Pulse after pulse, my seemingly endless orgasm continues on.\
name "Luka"
>Ahh...\
name ""
>I feel myself quickly getting weaker and weaker as my power floods out of me.@
>Unable to do anything any longer, I just give in and indulge myself in the ecstasy.\
name $name
>Hehehe... That's not good, boy.@
>Are you really going to give in and let yourself be killed?\
>In that case, I'll finish you in an instant...\
name ""
name "Luka"
>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>A wave of bliss races over me, as it feels like everything is being sucked right out of me through my penis.\
>The storm of ecstasy makes me spasm as my consciousness quickly starts to fade.\
>After mere moments, I'm left too weak to even move, and just slowly drift off into nothingness.\
name $name
>That's it... You're dry.@
>I hope you enjoyed it as much as I did. Hehe.\
name ""
gosub *anten
mov %hseanwave,0:hseanwave
>The brave Hero who came to the Monster Lord's Castle met a tragic end from a Succubus before even reaching the inner castle.\
>..................\
goto *badend



*hatibi_start

mov $name,"Yao"
mov $name2,"Yao"
mov $lavel,"hatibi"
mov $tatie1,"hatibi_st01"
mov $tatie2,"hatibi_st02"
mov $tatie3,"hatibi_st03"
mov $tatie4,"hatibi_hb1"
mov $haikei,"bg148"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,12000
if %nanido=2 mov %max_enemylife,13000
if %nanido=3 mov %max_enemylife,18000
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,20
if %nanido=3 mov %earth_keigen,10
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Hehe, you're quite weak..."
mov $mogaku_sel2,"Hehe, you're quite weak..."
mov $mogaku_sel3,"Hehe, you should give up."
mov $mogaku_sel4,"Hehe, you should give up."
mov $mogaku_sel5,"Hehe, you should give up."
mov $mogaku_earth_dassyutu1,"Impossible... You're able to use the power of the earth?"
mov $mogaku_earth_dassyutu2,""
mov $half_s1,"My skills are quite good, aren't they?"
mov $half_s2,"Why not drown yourself in me?"
mov $kiki_s1,"Are you not able to bear it much longer?"
mov $kiki_s2,"Just enjoy it and come..."
mov %end_n,9
mov %exp_minus,120000
mov %zmonster_x,-270
mov %tukix,290
mov %owaza_count1a,8
mov %owaza_count2a,8
mov %owaza_count3a,8
name "Luka"
>Who are you...?\
name ""
>I didn't feel her presence at all until she called out.@
>She must be a really powerful monster...\
name $name
>I am called Yao.@
>The right hand of Tamamo, I'm the strongest soldier of the Kitsune race.\
>Besides Tamamo, of course.\
name ""
name "Luka"
>Eight tails...?\
name ""
>You can tell how strong a Kitsune is by the number of their tails...@
>If she has eight, that must mean she's very strong.\
name $name
>Hehe, why not indulge yourself in my sexual skills?@
>I'd be glad to squeeze out as much semen as you'd like...\
name ""
goto *common_main



*hatibi_v

gosub *face3
name $name
>How could I make such a blunder...?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Yao is sealed into the form of a fox!\
mov %viclose,1:gosub *victory
mov %getexp,150000:gosub *lvup
mov %2319,1
goto *sean0294a



*hatibi_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance.\
gosub *face2
name $name
>Oh, you'll let me do as I like?@
>Then allow me to have some fun with you...\
name ""
goto *hatibi_a



*hatibi_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *hatibi_kousan
if %cmd1=16 goto *hatibi_onedari
if %cmd1=17 goto *common_skill
goto *hatibi_main



*hatibi_yuwaku_a

if %hanyo2=1 gosub *hatibi_yuwaku_a2:goto *common_main
gosub *hatibi_yuwaku_a1:goto *common_main



*hatibi_yuwaku_a1

add %stack,1
name "Luka"
>Ahh... B...Breasts...\
name ""
>Luka clings to Yao, and buries his face in her chest!\
name $name
>Hehe... You're just like a baby.@
>I'd be glad to show you some love...\
name ""
>Yao gently grabs the back of Luka's head, and pushes him closer to her breasts!
if %nanido<2 damage 140,160
if %nanido=2 damage 150,170
if %nanido=3 damage 160,180
skillname ""
if %mylife=0 sub %stack,1:return *hatibi_h8
mov %hanyo2,1
sub %stack,1
rnd2 %ransu,1,2
if %ransu=1 goto *hatibi_a1
if %ransu=2 goto *hatibi_a2



*hatibi_yuwaku_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Ahh... B...Breasts..."
if %ransu=2 mov $sel1,"So soft..."
if %ransu=3 mov $sel1,"Ahhh..."
name "Luka"
eng $sel1:$sel6\
name ""
>Luka clings to Yao, and buries his face in her chest!\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hehehe, you're so cute..."
if %ransu=2 mov $sel1,"You're more like a baby than a Hero..."
if %ransu=3 mov $sel1,"Hehehe... I'll take good care of you, from top to bottom..."
name $name
eng $sel1:$sel6\
name ""
>Yao gently holds the back of Luka's head, and pushes him closer to her breasts!
if %nanido<2 damage 140,160
if %nanido=2 damage 150,170
if %nanido=3 damage 160,180
skillname ""
if %mylife=0 sub %stack,1:return *hatibi_h8
sub %stack,1
rnd2 %ransu,1,2
if %ransu=1 goto *hatibi_a1
if %ransu=2 goto *hatibi_a2



*hatibi_a

if %hanyo6=1 gosub *hatibi_a6:goto *common_main
if %kousoku=1 gosub *hatibi_a8:goto *common_main
rnd2 %ransu,1,7
if %ransu=1 gosub *hatibi_a1:goto *common_main
if %ransu=2 gosub *hatibi_a2:goto *common_main
if %ransu=3 gosub *hatibi_a3:goto *common_main
if %ransu=4 gosub *hatibi_a4:goto *common_main
if %ransu=5 && %owaza_count3a>9 gosub *hatibi_a5:goto *common_main
if %ransu=6 && %owaza_count1a>9 gosub *hatibi_a7:goto *common_main
if %ransu=7 && %owaza_count2a>9 gosub *hatibi_a10:goto *common_main
skip -8



*hatibi_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %status=0 && %ransu=1 mov $sel1,"I'll let you enjoy my tail a little..."
if %status=0 && %ransu=2 mov $sel1,"I'll make you come with my fluffy tail..."
if %status=0 && %ransu=3 mov $sel1,"My tail will make you shiver in pleasure..."
if %status=5 && %ransu=1 mov $sel1,"I'll have some fun with you right here, too..."
if %status=5 && %ransu=2 mov $sel1,"Look at how big your thing is getting, you spoiled little boy you..."
if %status=5 && %ransu=3 mov $sel1,"I don't mind babying you a little, hehe."
name $name
eng $sel1:$sel6\
name ""
skillname "Tail Comfort"
dwave 1,"se\umaru.ogg"
if %aqua=0 && %hanyo3=0 lsp 690,":a;chara\hatibi_ct01.bmp",440,0:print 10,500
>Yao's tail winds around Luka's penis!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu
if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
lsp 690,":a;chara\hatibi_ct02.bmp",440,0:print 10,500
if %kousan=2 mov %hanyo3,1
skillcount2 3548
if %nanido<2 damage 140,160
if %nanido=2 damage 160,180
if %nanido=3 damage 180,200
skillname ""
if %mylife=0 sub %stack,1:return *hatibi_h1
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*hatibi_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %status=0 && %ransu=1 mov $sel1,"I'll rub you with this soft hand of mine..."
if %status=0 && %ransu=2 mov $sel1,"I'll lead you to paradise with this hand..."
if %status=0 && %ransu=3 mov $sel1,"My hands feel amazing... Don't you want to feel them?"
if %status=5 && %ransu=1 mov $sel1,"I'll take good care of you..."
if %status=5 && %ransu=2 mov $sel1,"Look at how big your thing is getting just from a little babying..."
if %status=5 && %ransu=3 mov $sel1,"I don't mind babying you a little bit... Hehe."
name $name
eng $sel1:$sel6\
name ""
skillname "Playful Hand"
dwave 1,"se\umaru.ogg"
>Yao grabs Luka's penis with her soft hand!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3549
if %nanido<2 damage 150,170
if %nanido=2 damage 170,190
if %nanido=3 damage 190,210
skillname ""
if %mylife=0 sub %stack,1:return *hatibi_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*hatibi_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll lick you nice and carefully..."
if %ransu=2 mov $sel1,"I'll cover every inch of your penis with my tongue..."
if %ransu=3 mov $sel1,"I'll run my tongue all over your penis..."
name $name
eng $sel1:$sel6\
name ""
skillname "Dancing Tongue"
dwave 1,"se\ero_pyu2.ogg"
>Yao's rough tongue coils around Luka's penis, licking it clean!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3550
if %nanido<2 damage 160,180
if %nanido=2 damage 180,200
if %nanido=3 damage 200,220
skillname ""
if %mylife=0 sub %stack,1:return *hatibi_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*hatibi_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Don't you want to try feeling my breasts?"
if %ransu=2 mov $sel1,"Don't my breasts just look nice and soft...?"
if %ransu=3 mov $sel1,"I'll let you feel the warmth between my breasts..."
name $name
eng $sel1:$sel6\
name ""
skillname "Breast Valley"
dwave 1,"se\ero_paizuri.ogg"
>Yao rubs Luka's penis between her soft, warm breasts!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3551
if %nanido<2 damage 170,190
if %nanido=2 damage 190,210
if %nanido=3 damage 210,230
skillname ""
if %mylife=0 sub %stack,1:return *hatibi_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*hatibi_a5

add %stack,1
name $name
>Wait just a moment, and I'll lead you to heaven...\
name ""
skillname "Magic Concentration"
dwave 1,"se\power.ogg"
>Yao begins to concentrate her magical power!\
skillname ""
mov %hanyo6,1
sub %stack,1
return



*hatibi_a6

add %stack,1
mov %owaza_count3a,0
mov %owaza_num1,1
mov %hanyo6,0
name $name
>Your penis will love my tail...@
>I'll make sure to play with it until it explodes in joy.\
name ""
skillname "Eight Moons"
dwave 1,"se\umaru.ogg"
eng "Yao's eight tails shoot toward Luka's penis!":$sel6/
if %aqua>1 csp 690:print 10,500:gosub *aqua_guard:sub %stack,1:return
\
lsp 690,":a;chara\hatibi_ct11.bmp",440,0:print 10,500
lsp 690,":a;chara\hatibi_ct12.bmp",440,0:print 10,500
>The first tail coils around Luka's penis!
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":mov %stuck,1:gosub *wind_guard:skillname "Eight Moons":skip 5
skillcount2 3552
if %nanido<2 damage 130,150
if %nanido=2 damage 130,150
if %nanido=3 damage 150,170
dwave 1,"se\umaru.ogg"
>The second tail twines around the tip of his penis!
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":mov %stuck,1:gosub *wind_guard:skillname "Eight Moons":skip 5
skillcount2 3552
if %nanido<2 damage 130,150
if %nanido=2 damage 130,150
if %nanido=3 damage 150,170
dwave 1,"se\umaru.ogg"
>The third tail tickles the tip of Luka's penis!
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":mov %stuck,1:gosub *wind_guard:skillname "Eight Moons":skip 5
skillcount2 3552
if %nanido<2 damage 130,150
if %nanido=2 damage 130,150
if %nanido=3 damage 150,170
dwave 1,"se\umaru.ogg"
>The fourth tail runs up and down the back of Luka's penis!
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":mov %stuck,1:gosub *wind_guard:skillname "Eight Moons":skip 5
skillcount2 3552
if %nanido<2 damage 130,150
if %nanido=2 damage 130,150
if %nanido=3 damage 150,170
dwave 1,"se\umaru.ogg"
>The tip of the fifth tail plays with his urethral opening!
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":mov %stuck,1:gosub *wind_guard:skillname "Eight Moons":skip 5
skillcount2 3552
if %nanido<2 damage 130,150
if %nanido=2 damage 130,150
if %nanido=3 damage 150,170
dwave 1,"se\umaru.ogg"
>The six tail brushes up and down the shaft of Luka's penis like a brush!
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":mov %stuck,1:gosub *wind_guard:skillname "Eight Moons":skip 5
skillcount2 3552
if %nanido<2 damage 130,150
if %nanido=2 damage 130,150
if %nanido=3 damage 150,170
dwave 1,"se\umaru.ogg"
>The seventh tail traces right under the neck of Luka's penis!
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":mov %stuck,1:gosub *wind_guard:skillname "Eight Moons":skip 5
skillcount2 3552
if %nanido<2 damage 130,150
if %nanido=2 damage 130,150
if %nanido=3 damage 150,170
dwave 1,"se\umaru.ogg"
>The eighth tail wraps all around Luka's penis, playing with him!
if %wind=2 && %nanido<2 mov %wind_kakuritu,20
if %wind=2 && %nanido=2 mov %wind_kakuritu,15
if %wind=2 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":mov %stuck,1:gosub *wind_guard:skillname "Eight Moons":skip 5
skillcount2 3552
if %nanido<2 damage 130,150
if %nanido=2 damage 130,150
if %nanido=3 damage 150,170
skillname ""
if %mylife=0 sub %stack,1:return *hatibi_h5
csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*hatibi_a7

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 8
name $name
if %first_sel1=1 skip 4
>I think I shall rape you now...@
>I have a fun idea I'd love to try, too.\
skip 2
>I'm going to mount you again...\
name ""
skillname "Mount"
eng "Yao pushes Luka to the ground, and mounts him!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
skillname ""
name $name
if %first_sel1=1 skip 4
>I'm going to force you into my ass...@
>I'll make you submit in my unclean hole...\
skip 3
>Hehe... This time, just give up.@
>I'll force you to submit in my unclean hole...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,1
if %earth=0 && %nanido=2 mov %genmogaku,1
if %earth=0 && %nanido=3 mov %genmogaku,1
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
sub %stack,1
return



*hatibi_a8

add %stack,1
name $name
>Are you ready...?@
>Now to rape you with my ass...\
name ""
skillname "Gate of Defilement"
mov %kousoku,2
lsp 700,":a;chara\hatibi_hb2.bmp",0,0:print 10,500
>Yao drops down, forcing Luka into her ass!\
>Luka's penis screws into her incredibly tight hole!
skillcount2 3553
mov %damage_kotei,1
damage 200,250
>Luka is being raped by Yao!\
skillname ""
if %mylife=0 sub %stack,1:return *hatibi_h6
skillname ""
name "Luka"
>Ahhh!\
name ""
name $name
>Hehe, well?@
>How does it feel inside my ass?\
>Now to make it even tighter...@
>Don't worry, I won't drag things out... Hehe.\
name ""
mov %first_sel1,1
sub %stack,1
goto *hatibi_a9



*hatibi_a9

add %stack,1
>Luka is being raped by Yao...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Pinch on you just like when I'm going to the bathroom...":mov $sel2,"Yao's anus tightens around the base of Luka's penis!"
if %ransu=2 mov $sel1,"Shall I make it a little tighter...?":mov $sel2,"Pressure attacks every inch of Luka's penis!"
if %ransu=3 mov $sel1,"I'll make it tighter and tighter...":mov $sel2,"Yao clenches her stomach, tightening her ass!"
if %ransu=4 mov $sel1,"How about I move around a little... Hehe...":mov $sel2,"Yao starts to move her waist around!"
if %ransu=5 mov $sel1,"It's already unclean, I don't mind if you come inside... Hehe.":mov $sel2,"Yao clenches down on Luka's penis as she gently forces him in and out of her ass!"
name $name
eng $sel1:$sel6\
name ""
skillname "Gate of Defilement"
dwave 1,"se\ero_chupa5.ogg"
eng $sel2:$sel6
skillcount2 3553
mov %damage_kotei,1
damage 200,250
skillname ""
if %mylife=0 sub %stack,1:return *hatibi_h7
sub %stack,1
goto *hatibi_a9



*hatibi_a10

add %stack,1
mov %owaza_count2a,0
name $name
>Go mad in desire...\
name ""
skillname "Eyes of Temptation"
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
eng "Yao's eyes shine!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,100
if %wind=2 && %nanido=2 mov %wind_kakuritu,90
if %wind=2 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But a gust of wind blocks Luka's view!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3586
mov %status,5:gosub *status_print
>Luka has been put into a trance!\
skillname ""
name "Luka"
>Haa...\
name ""
name $name
>I'd be glad to indulge that desire of yours...@
>Come on... You can use my body as you like...\
name ""
if %nanido<2 rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,2,3
if %nanido=3 rnd2 %status_turn,3,4
mov %hanyo2,0
sub %stack,1
return



*hatibi_onedari

mov $list1,"Tail Comfort"
if %3548>0 mov %list_num1,1
mov $list2,"Playful Hand"
if %3549>0 mov %list_num2,1
mov $list3,"Dancing Tongue"
if %3550>0 mov %list_num3,1
mov $list4,"Breast Valley"
if %3551>0 mov %list_num4,1
mov $list5,"Eight Moons"
if %3552>0 mov %list_num5,1
mov $list6,"Gate of Defilement"
if %3553>0 mov %list_num6,1
mov $list7,"Eyes of Temptation"
if %3586>0 mov %list_num7,1
gosub *cmd_onedari
if %cmd1=11 goto *hatibi_onedari1
if %cmd1=12 goto *hatibi_onedari2
if %cmd1=13 goto *hatibi_onedari3
if %cmd1=14 goto *hatibi_onedari4
if %cmd1=15 goto *hatibi_onedari5
if %cmd1=16 goto *hatibi_onedari6
if %cmd1=17 goto *hatibi_onedari7
if %cmd1=-1 goto *hatibi_main
goto *hatibi_onedari



*hatibi_onedari1

gosub *onedari_syori
name $name
>You like my tails?@
>Hehehe... I'll rape you just as you desire.\
name ""
gosub *hatibi_a1
skip -1



*hatibi_onedari2

gosub *onedari_syori
name $name
>You like my hands?@
>Hehehe... I'll rape you just as you desire.\
name ""
gosub *hatibi_a2
skip -1



*hatibi_onedari3

gosub *onedari_syori
name $name
>You like my tongue?@
>Hehehe... I'll rape you just as you desire.\
name ""
gosub *hatibi_a3
skip -1



*hatibi_onedari4

gosub *onedari_syori
name $name
>You like my breasts?@
>Hehehe... I'll rape you just as you desire.\
name ""
gosub *hatibi_a4
skip -1



*hatibi_onedari5

gosub *onedari_syori
name $name
>You want to see my special move?@
>Hehehe... I'll rape you just as you desire.\
name ""
gosub *hatibi_a5
gosub *hatibi_a6
skip -2



*hatibi_onedari6

gosub *onedari_syori_k
name $name
>You want to use my ass...?@
>Hehe, you're a perverted one too, aren't you?\
name ""
if %kousoku=0 gosub *hatibi_a7
gosub *hatibi_a8
skip -1



*hatibi_onedari7

gosub *onedari_syori
name $name
>You want me to take away your freedom?@
>Then I'd be glad to steal your heart...\
name ""
gosub *hatibi_a10
goto *hatibi_yuwaku_a



*hatibi_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\hatibi_ct03.bmp",440,0
lsp 694,":a;chara\hatibi_bk04.bmp",0,0
gosub *syasei2
>As Yao plays with Luka's penis with her tail, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2619,%2619+1:if %2619=1 mov %count_koenemy,%count_koenemy+1
if %2619>%count_most mov %count_most,%2619:mov $count_mostname,$name
count 19,5
mov $bad1,"Yao used her tail to force Luka to come."
if %status=5 mov $bad1,"Yao seduced Luka, then used her tail to force him to come."
lsp 690,":a;chara\hatibi_ct04.bmp",440,0
gosub *face2
name $name
>Hehe, so you came...@
>My tail is unmatched, isn't it?\
name ""
csp 690:print 10,500
goto *hatibi_hb



*hatibi_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\hatibi_bk03.bmp",0,0
gosub *syasei2
>As Yao strokes Luka with her soft hands, he comes, covering her fur with semen.\
mov %viclose,1:gosub *lose
mov %2619,%2619+1:if %2619=1 mov %count_koenemy,%count_koenemy+1
if %2619>%count_most mov %count_most,%2619:mov $count_mostname,$name
count 5,5
mov $bad1,"Yao forced Luka to come with a handjob."
if %status=5 mov $bad1,"After seducing Luka, Yao forced him to come with a handjob."
gosub *face2
name $name
>Hehe, so you came...@
>My hand is unmatched, isn't it?\
name ""
goto *hatibi_hb



*hatibi_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\hatibi_bk01.bmp",0,0
gosub *syasei2
>As Yao eagerly licked Luka's penis with her long tongue, he comes, covering her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2619,%2619+1:if %2619=1 mov %count_koenemy,%count_koenemy+1
if %2619>%count_most mov %count_most,%2619:mov $count_mostname,$name
count 4,5
mov $bad1,"Yao forced Luka to come with her tongue."
gosub *face2
name $name
>Hehe, so you came...@
>My tongue is unmatched, isn't it?\
name ""
goto *hatibi_hb



*hatibi_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\hatibi_bk02.bmp",0,0
gosub *syasei2
>As Yao squeezes Luka's penis between her breasts, he comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2619,%2619+1:if %2619=1 mov %count_koenemy,%count_koenemy+1
if %2619>%count_most mov %count_most,%2619:mov $count_mostname,$name
count 7,5
mov $bad1,"Yao used her breasts to force Luka to come."
gosub *face2
name $name
>Hehe, so you came...@
>My breasts are unmatched, aren't they?\
name ""
goto *hatibi_hb



*hatibi_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\hatibi_ct13.bmp",440,0
lsp 694,":a;chara\hatibi_bk04.bmp",0,0
lsp 695,":a;chara\hatibi_bk05.bmp",0,0
gosub *syasei2
>As Yao's tails mercilessly attack Luka from every direction, he comes, covering her tails in semen.\
mov %viclose,1:gosub *lose
mov %2619,%2619+1:if %2619=1 mov %count_koenemy,%count_koenemy+1
if %2619>%count_most mov %count_most,%2619:mov $count_mostname,$name
count 19,5
mov $bad1,"Yao forced Luka to come with her ultimate skill."
lsp 690,":a;chara\hatibi_ct14.bmp",440,0
gosub *face2
name $name
>Hehe, so you came...@
>My secret skill is unmatched, isn't it?\
name ""
csp 690:print 10,500
goto *hatibi_hb



*hatibi_h6

mov %ikigoe,3:gosub *ikigoe
name $name
>What?@>I only just put it in...\
name ""
gosub *syasei1
lsp 700,":a;chara\hatibi_hb3.bmp",0,0
gosub *syasei2
>As soon as Luka is forced into Yao's ass, he comes, shooting his semen into her.\
mov %viclose,1:gosub *lose
mov %2619,%2619+1:if %2619=1 mov %count_koenemy,%count_koenemy+1
if %2619>%count_most mov %count_most,%2619:mov $count_mostname,$name
count 8,3
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Using her ass to rape Luka, Yao forced him to come from simple insertion."
gosub *face2
name $name
>Hehe, you couldn't even last a few seconds...@
>Just when I thought I wouldn't be able to disgrace you worse than I was about to...\
name ""
goto *hatibi_ha



*hatibi_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\hatibi_hb3.bmp",0,0
gosub *syasei2
>Unable to endure Yao's tight ass any longer, Luka comes, spraying his semen inside her.\
mov %viclose,1:gosub *lose
mov %2619,%2619+1:if %2619=1 mov %count_koenemy,%count_koenemy+1
if %2619>%count_most mov %count_most,%2619:mov $count_mostname,$name
count 8,3
mov $bad1,"Yao forced Luka to come as she raped him with her ass."
gosub *face2
name $name
>Hehe... You came inside my ass...@
>Pouring your semen in such an unclean place... What a pathetic man.\
name ""
goto *hatibi_ha



*hatibi_h8

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 696,":a;chara\hatibi_bk06.bmp",0,0
gosub *syasei2
>As Luka buries his face in Yao's breasts, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2619,%2619+1:if %2619=1 mov %count_koenemy,%count_koenemy+1
if %2619>%count_most mov %count_most,%2619:mov $count_mostname,$name
count 31,5
mov $bad1,"Seduced by Yao, Luka was forced to come as he buried his face in her chest."
gosub *face2
name $name
>Able to come with your face buried in my chest... Aren't you the lucky one?@
>You're such a cute little baby...\
name ""
goto *hatibi_hb



*hatibi_ha

mov $bad2,"Using her mouth, Yao endlessly indulges herself on Luka's semen."
if %2835=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2835,1
name "Luka"
>Ahh...\
name ""
name $name
>Now... I'd love to get a good taste of that semen of yours...\
name ""
mov %hseanvoice,1:hseanvoice
cspl 690,699
lsp 700,":a;chara\hatibi_ha1.bmp",0,0:print 10,500
>Yao easily forces me to the ground, and starts to wind her tongue around my penis.\
name $name
>Look... I'm wrapping up your penis with my tongue...\
name ""
>Almost like a snake, her long tongue slowly coils up my shaft, slowly covering more and more of my penis.\
name "Luka"
>Ahh...\
name ""
lsp 700,":a;chara\hatibi_ha2.bmp",0,0:print 10,500
>Finally, her tongue reaches all the way to the tip of my penis.@
>Her warm saliva rubs into my penis, filling me with a stimulating warmth.\
name $name
>Hehe... Are you enjoying my tongue?\
name ""
>Yao starts to use the tip of her tongue to rub around the glans of my penis.\
>Every lick from her rough tongue causes me to shiver.@
>As the rest of her tongue clamps down around my penis, I feel myself quickly being forced over the edge.\
name $name
>Hmmm...?@> Hold on a little longer.@
>I've only just coiled around you...\
name ""
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\hatibi_ha3.bmp",0,0:print 10,500
gosub *syasei2
>Despite her chiding me like a child, I can't stop myself from coming.@
>My semen pours out onto her tongue as my face goes red in humiliation.\
name "Luka"
>Ahh... I came...\
name ""
>Despite how horrible I felt after my almost accidental ejaculation, the pleasure that accompanied with it made me relax in bliss.\
name $name
>All I did was simply coil around it with my tongue...@
>You're pretty pathetic...\
name ""
>Yao looks at me and laughs.@
>As a man, I feel humiliated seeing my body played with right in front of my eyes like this.\
name $name
>Since you're a little premature ejaculator, I guess I'll have to hold it in my mouth...@
>We wouldn't want any more accidents, now would we?\
name ""
name "Luka"
>Ahh...\
name ""
>With her tongue still coiled around my penis, she starts to pull me into her mouth.@
mov %hseanvoice,3:hseanvoice
lsp 700,":a;chara\hatibi_ha4.bmp",0,0:print 10,500
>As soon my penis is inside her, she clamps her lips down around the base of my penis!\
name "Luka"
>Ahhh!\
name ""
>As soon as her mouth closes, her warm saliva drips all over me as my penis rubs against the sides of her small mouth.\
name $name
>Mmm... Nnngg..\
name ""
>Yao suddenly starts to move in a chewing motion.@
>Without using her teeth, she sucks and gently presses down on my penis with her mouth.\
>Her tongue presses me against the roof and floor of her mouth in an intense chewing motion.\
name "Luka"
>Ahhhh!\
name ""
name $name
>Mmm... Mmmfff...\
>Your penis tastes delicious...@
>I don't think I'd ever get tired of this.\
name ""
>Yao starts to suck and chew on me even more eagerly, her tongue excitedly running up and down my shaft.\
>As she savors my penis in her mouth as if it was a delicious piece of candy, my head starts to go blank in pleasure.\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\hatibi_ha5.bmp",0,0:print 10,500
gosub *syasei2
>After only a few moments inside her mouth, I come, shooting my semen into her.@
>Yao eagerly sucks on me as I come, swallowing my semen as fast as I shoot it out.\
name "Luka"
>Ahh...\
name ""
name $name
>Hehe... You gave me so much delicious semen so quickly...@
>Did you want me to eat it that badly?\
name ""
>After Yao finishes swallowing the semen I shot out, she uses her tongue to squeeze out the rest of the semen still in my urethra.\
>As each drop is forced out, she eagerly licks across the tip of my penis to lap it up.\
>Still sensitive after my orgasm, I just silently moan in pleasure as Yao happily savors my taste.\
lsp 700,":a;chara\hatibi_ha6.bmp",0,0:print 10,500
name $name
>I'll suck out even more...@
>I don't think I'd ever get tired of this flavor...\
name ""
mov %hseanvoice,4:hseanvoice
>Just as before, she starts to eagerly suck on my penis again.\
>She starts her chewing motions again as she works me, already trying to get another taste of my semen.\
name "Luka"
>Ahh...\
name ""
name $name
>Hehe, it's the ultimate bliss, isn't it?@
>Having me desire you so...\
>Mmmnnff... Mmmmg...\
name ""
>Her long tongue rubs and licks me from every direction in her small mouth.@
>After her last taste of me, Yao starts to salivate even more, filling her mouth with a warm bath of her saliva.\
>At the same time, she stretches out her mouth, making her soft lips press down on more of my shaft than before.\
name "Luka"
>Ahh... I'm going to come again...\
name ""
name $name
>Hehe... Don't hold back, just come...@
>Mmmf... Nnnff...\
name ""
>Right after realizing I'm on the verge of an orgasm, Yao starts to suck on me even harder, easily pushing me over the edge.\
gosub *syasei1
lsp 700,":a;chara\hatibi_ha7.bmp",0,0:print 10,500
gosub *syasei2
>I explode inside Yao again.@
>Looking up at me with a smile, she happily swallows every spurt I shoot into her.\
name $name
>Hehehe...@
>More... I want to taste more...\
name ""
name "Luka"
>Stop this... Ahhh!\
name ""
>Without giving me a chance to rest, Yao keeps sucking on me.@
>Helpless in this position, I'm stuck here with Yao sucking on me for a long time...\
gosub *anten
mov %hseanvoice,0:hseanvoice
>After being captured by Yao, she never lets me go.@
>Every day, she eagerly sucks on me until I pass out.\
>Defeated by a powerful enemy soon after making it to the Monster Lord's Castle, my journey ends.@
>My new life as a monster's plaything begins...\
>.............\
goto *badend



*hatibi_hb

mov $bad2,"Endlessly raping Luka with her ass, Yao keeps him as a simple sex slave."
if %2836=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2836,1
name "Luka"
>Ahh...\
name ""
cspl 690,699
lsp 700,":a;chara\hatibi_hb1.bmp",0,0:print 10,500
>After my orgasm, Yao pushes me down and mounts on top of me.\
name $name
>Hehe... Now, let me give you a little encouragement.@
>Take a good look at my vagina...\
name ""
name "Luka"
>S...Stop!\
name ""
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
>Yao's eyes suddenly flash.@
>In the next moment, I feel an intense lust start to build up inside of me.\
>Having been tempted by her magical eyes, my reason quickly starts to run away from me.\
name $name
>Hehehe... You want to have sex with me now, don't you?@
>To pour your seed inside me, and be nothing but a simple stud?\
name ""
name "Luka"
>Ahh...\
name ""
>My spirit was quickly shattered by her eyes.@
>My natural instinct as a man rapidly starts to take over the rest of my thoughts.\
>I want to force myself inside Yao's vagina...@
>I want to pour my seed in her...@
>This uncontrollable desire begins to take over my body.\
name $name
>Hehe... Allow me to use my vagina to sate that desire of yours.@
>Come now, be a good stud for me...\
name ""
>Yao positions herself over me, then drops down.@
mov %hseanwave,2:hseanwave
lsp 700,":a;chara\hatibi_hb2.bmp",0,0:print 10,500
>In the next moment, I'm forced right into her tiny, warm hole!\
name "Luka"
>Ahhh!\
name ""
>Her soft flesh firmly clamps down around me as I push inside.@
>The deeper I sink into her, the tighter she gets.\
name $name
>How does my vagina feel?@
>Make sure you pour plenty of that seed of yours inside...\
>Come now, make an effort and thrust into me.@
>You want to get me pregnant, don't you?\
name ""
name "Luka"
>Ahh...\
name ""
>Overcome with the desire to pour my seed into her, I start to slowly thrust in and out of her.\
>Her incredibly tight vagina clamps down around me, barely letting me move in and out of her.@
>But after a few moments of thrusting, I feel myself about to come inside her.\
name "Luka"
>Ahh... It's too tight...!\
name ""
>Barely able to last inside her, I explode inside her vagina.\
gosub *syasei1
lsp 700,":a;chara\hatibi_hb3.bmp",0,0
gosub *syasei2
>I gasp in ecstasy as she tightens her vagina around me while I come.@
>Right after my ejaculation finishes, my heart explodes in joy at the thought of impregnating her.\
>With my thoughts still confused from her magical eyes, my only desire is to come inside her.\
lsp 700,":a;chara\hatibi_hb4.bmp",0,0:print 10,500
name $name
>Hehe, you only thrust in a few times, and it already made you come?\
>Even more, you let out so much semen...@
>Do you really want to get me pregnant that badly?\
name ""
name "Luka"
>Ahh... More...\
name ""
>Not satisfied, I quickly start to pump her again.@
>Despite how tight she is, I move as fast as I can.\
>I need to come inside her more...@
>I have to make sure I get her pregnant...@
>The instinctual male thoughts take over my body, not letting me go against them.\
name $name
>Hehehe... You're mating like a child...@
>But I like that kind of single-mindedness.\
>Look, my vagina is eager for your penis, too...@
>I can't stop myself from squeezing down on you, to wring out more semen...\
name ""
name "Luka"
>Ahh...\
name ""
>Yao tightens around me, but I keep thrusting in and out of her faster and faster.@
>Now lubricated by my previous ejaculation, I can slip in and out of her easier.\
>Her tight entrance always clamps down on the tip of my penis as I'm almost all the way out of her, making me gasp in ecstasy as I'm signaled to thrust back in.\
name $name
>Come on, you can move faster than that, can't you?@
>If you don't do your best, you won't get me pregnant...\
name ""
name "Luka"
>Urhg...\
name ""
>Desperate to come inside of her, I attack her vagina as hard as I can.@
>I cry out in bliss as I feel another ejaculation welling up in me.\
name "Luka"
>Ahh... Coming...\
name ""
name $name
>Hehehe, already at your limit again?@
>Good, come inside me...\
name ""
mov %hseanwave,5:hseanwave
>Yao smiles and tightens her vagina around me, finishing me off in one quick move.\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\hatibi_hb5.bmp",0,0
gosub *syasei2
>I explode inside Yao again, filling her with my seed.@
>I sigh in satisfaction as I think of my semen racing to impregnate her.\
name $name
>Hehe, that was a lot...@
>I almost feel myself getting full of your semen.\
name ""
name "Luka"
>Ahh... More... More...\
name ""
>It isn't enough.@
>Still overcome by instinct, I start to thrust in her again.\
>I want to indulge in this pleasure, and get Yao pregnant...\
name $name
>Hehe, what a beast...@
>Do you enjoy my vagina that much?\
>Then I'll put in a little effort, too...\
name ""
>Yao starts to squeeze down on me in rhythm with my thrusting, sending fresh waves of ecstasy racing through me.\
name "Luka"
>Ahhh!\
name ""
name $name
>Hehe, already surrendering?@
>Here, I'll keep squeezing you...\
name ""
name "Luka"
>Ahhhh!!\
name ""
>Her squeezing gets faster and faster, almost as if her vagina is just vibrating around me.@
>My vision goes hazy as I pump her like a piston at the same time, bringing myself to another height.\
name "Luka"
>Haaa...!\
name ""
gosub *syasei1
lsp 700,":a;chara\hatibi_hb6.bmp",0,0
gosub *syasei2
>As I pour my seed into her, Yao keeps squeezing down on me.@
>Just how many times have I come inside her?\
>Exhausted, I finally let myself relax after being satisfied that I've come inside her enough.\
mov %hseanwave,0:hseanwave
name $name
>Did you enjoy mating with me?@
>You sure seemed to try your hardest...\
>Hehehe... But it was all wasted effort.@
>Take a good look.\
name ""
lsp 700,":a;chara\hatibi_hb7.bmp",0,0:print 10,500
>Yao rolls up her skirt...@
>And shows off my penis, firmly stuck in her ass!\
name $name
>Hehehe... You've been so desperately mating with my ass.@
>All of that semen you so frantically pumped into me...@> Did you honestly think you would get me pregnant?\
>Hahaha... You were trying to get me pregnant so badly, but all you did was have sex with my dirty hole.\
name ""
>Yao sneers at me as she shows off her ass.@
>Defeat and misery fills me as I see my semen pointlessly leaking out of her.\
name "Luka"
>Ah...ahh...\
name ""
name $name
>Hehehe... I'll be glad to rape you with my ass from now on.@
>You're just going to be a simple toy, only able to use this dirty hole.\
name ""
name "Luka"
>N...No way...\
name ""
name $name
>It's just perfect for a pathetic boy like you.@
>Come on, it looked like you enjoyed it so much only a few moments ago.\
name ""
>Yao tightens her ass around me as she giggles.\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>Easily forced to come inside her ass again, the misery just becomes even more amplified.\
gosub *anten
>After being captured by Yao, she never frees me.@
>Every day, she just rapes me with her ass until I pass out.\
>Defeated by a powerful enemy soon after making it to the Monster Lord's Castle, my journey is over.@
>My new life as a monster's plaything begins...\
>..............\
goto *badend



*inp_start

mov $name,"Imp"
mov $name2,"Imp"
mov $lavel,"inp"
mov $tatie1,"inp_st01"
mov $tatie2,"inp_st02"
mov $tatie3,"inp_st03"
mov $tatie4,"inp_hc1"
mov $haikei,"bg149"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,50
if %nanido=2 mov %max_enemylife,50
if %nanido=3 mov %max_enemylife,50
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,100
mov %earth_keigen,0
if %nanido=3 mov %earth_keigen,0
mov %music,1
gosub *maxmp:mov %mp,0
gosub *syutugen
mov %end_n,9
mov %exp_minus,270000
mov %zmonster_x,-300
mov %tukix,300
gosub *face3
name $name
>Wah!@> A Hero...!@
>What should I do...?@> I wasn't able to run away...\
name ""
name "Luka"
>An Imp...?@
>Then it wasn't from her, was it?\
name ""
>There's no way the owner of that huge magical power could be this small monster.\
>She looks incredibly weak...@
>There's no way I could lose against her, unless I did something really stupid.\
lsp 700,":a;chara\inp_st04.bmp",0,0:print 10,500
name $name
>What should I do...?@
>I could never beat a Hero who managed to make it all the way here...\
name ""
>The Imp frets around for a little bit, before she starts to timidly speak to me.\
gosub *face1
name $name
>H...Hey...@
>I'm really weak... S...So... You aren't going to kill me... Right?\
name ""
name "Luka"
>Of course, I'd never hurt a monster who doesn't bother humans.\
name ""
gosub *face3
name $name
>Oh no, that means you're going to kill me...@
>I've teased a lot of humans before...\
name ""
name "Luka"
>............\
name ""
gosub *face1
name $name
>Hey, hey...@
>I'll stroke your penis, so let me go, okay?\
>It's a little hard since I have tiny hands, but it will feel good, I promise...@
>So just be still for a little bit, okay?\
name ""
mov %sinkou,1
goto *common_main



*inp001

lsp 700,":a;chara\inp_st04.bmp",0,0:print 10,500
name $name
>W...What is that?@
>What's with all this huge magic...?\
>Y...You couldn't be aiming that at me...?\
name ""
>The Imp looks on in confusion.\
name "Luka"
>Come, Gnome!\
name ""
skillname "Gnome"
dwave 2,"se\earth1.ogg"
lsp2 0,":a;chara\gnome_st21.bmp",200,300,100,100,0,200
gosub *syoukan_effect
>The power of the earth takes hold in Luka's sword!\
skillname ""
name $name
>This is a joke, right?@
>Y...You really couldn't be attacking me with that, right?@>Right?\
name ""
>The Imp looks around in even more confusion!\
name "Luka"
>Come, Undine!\
name ""
skillname "Undine"
dwave 2,"se\aqua2.ogg"
lsp2 0,":a;chara\undine_st11.bmp",200,300,100,100,0,200
gosub *syoukan_effect
>The power of water takes hold in Luka's sword!\
skillname ""
gosub *face3
name $name
>W...Wait!@
>S...Stop, stop!\
name ""
>The Imp is frightened!\
name "Luka"
>Come, Salamander!\
name ""
skillname "Salamander"
dwave 2,"se\fire2.ogg"
lsp2 0,":a;chara\salamander_st02.bmp",200,300,100,100,0,200
gosub *syoukan_effect
>The power of fire takes hold in Luka's sword!\
skillname ""
name $name
>Kyaa!@>Help me!\
name ""
>The Imp starts to run away!\
mov %kadora,0
mov %count_kadora,1
name "Luka"
>It's over! Quadruple Giga!\
name ""
skillname1 "Quadruple Giga"
vspl 3,650,0
dwave 2,"se\wind2.ogg"
lsp2 2,":c;effect\cutin_wind.bmp",100,150,100,100,0,10
for %move=0 to 200 step 20
msp2 2,0,20,0,0,0,24
print 1:wait 5
next
csp2 2
lsp 10,":c;effect\cutin_wind.bmp",0,0:print 1
dwave 3,"se\earth1.ogg"
lsp2 2,":c;effect\cutin_earth.bmp",300,150,100,100,0,10
for %move=0 to 200 step 20
msp2 2,0,20,0,0,0,24
print 1:wait 5
next
csp2 2
lsp 11,":c;effect\cutin_earth.bmp",200,0:print 1
dwave 4,"se\aqua2.ogg"
lsp2 3,":c;effect\cutin_aqua.bmp",500,150,100,100,0,10
for %move=0 to 200 step 20
msp2 3,0,20,0,0,0,24
print 1:wait 5
next
csp2 3
lsp 12,":c;effect\cutin_aqua.bmp",400,0:print 1
dwave 5,"se\fire2.ogg"
lsp2 4,":c;effect\cutin_fire.bmp",700,150,100,100,0,10
for %move=0 to 200 step 20
msp2 4,0,20,0,0,0,24
print 1:wait 5
next
csp2 4
lsp 13,":c;effect\cutin_fire.bmp",600,0:print 1
cspl 10,13:print 10,600
vspl 3,650,1
csp 0:csp 1
skillname "Quadruple Giga"
>The power of the four spirits overlap and amplify each other, exploding in a torrent of power!\
wait 500
dwave 1,"se\karaburi.ogg"
lsp 2,":c;effect\003.bmp",0,0:print 1
wait 300
dwave 3,"se\earth1.ogg"
lsp 2,":a;effect\earth.bmp",0,0:print 1
wait 100
dwave 5,"se\fire2.ogg"
lsp 2,":a;effect\fire.bmp",0,0:print 1
wait 100
dwave 4,"se\aqua2.ogg"
lsp 2,":a;effect\aqua.bmp",0,0:print 1
wait 100
dwave 2,"se\wind2.ogg"
lsp 2,":a;effect\wind.bmp",0,0:print 1
wait 100
csp 2:print 18,500,"system\mask01.jpg"
dwave 1,"se\bom3.ogg"
quake 10,2000
>The power to crush anything slams into the Imp!
dwave 1,"se\damage2.ogg"
rnd2 %damage,40000,50000:gosub *enemylife2
skillname ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Even the Imp's scream is sealed...\
mov %viclose,1:gosub *victory
mov %getexp,25:gosub *lvup
mov %2322,1
goto *sean0294b



*inp_v

gosub *face3
name $name
>Gyan!\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Imp is sealed in the form of a tiny bat!\
mov %viclose,1:gosub *victory
mov %getexp,25:gosub *lvup
mov %2322,1
goto *sean0294b



*inp_kousan

gosub *kousan_syori
>Luka succumbs to temptation, ending his resistance!\
if %sinkou=1 && %hanyo1=0 gosub *inp_a1_1:goto *common_main
if %sinkou=1 && %hanyo1=1 gosub *inp_a1_2:goto *common_main
if %sinkou=1 && %hanyo1=2 gosub *inp_a1_3:goto *common_main
if %sinkou=1 && %hanyo1=3 gosub *inp_a1_4:goto *common_main
if %sinkou=1 && %hanyo1=4 gosub *inp_a1_5:goto *common_main
if %sinkou=1 && %hanyo1=5 gosub *inp_a1_6:goto *common_main
if %sinkou=1 && %hanyo1=6 gosub *inp_a1_7:goto *common_main
if %sinkou=1 && %hanyo1=7 gosub *inp_a1_8:goto *common_main
if %sinkou=2 && %hanyo2=0 gosub *inp_a2_1:goto *common_main
if %sinkou=2 && %hanyo2=1 gosub *inp_a2_2:goto *common_main
if %sinkou=2 && %hanyo2=2 gosub *inp_a2_3:goto *common_main
if %sinkou=2 && %hanyo2=3 gosub *inp_a2_4:goto *common_main
if %sinkou=2 && %hanyo2=4 gosub *inp_a2_5:goto *common_main
if %sinkou=3 && %hanyo3=0 gosub *inp_a3_1:goto *common_main
if %sinkou=3 && %hanyo3=1 gosub *inp_a3_2:goto *common_main
if %sinkou=3 && %hanyo3=2 gosub *inp_a3_3:goto *common_main
if %sinkou=3 && %hanyo3=3 gosub *inp_a3_4:goto *common_main
if %sinkou=4 gosub *inp_a4:goto *common_main



*inp_main

gosub *cmd_main
if %cmd1=11 && %nanido=0 goto *common_attack
if %cmd1=11 && %sinkou=1 goto *inp_attack1
if %cmd1=11 && %sinkou=2 goto *inp_attack2
if %cmd1=11 && %sinkou=3 goto *inp_attack3
if %cmd1=11 && %sinkou=4 goto *common_attack
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *inp_kousan
if %cmd1=16 goto *inp_onedari
if %cmd1=17 goto *common_skill
goto *inp_main



*inp_attack1

lsp 700,":a;chara\inp_st04.bmp",0,0:print 10,500
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ha!"
if %ransu=2 mov $sel1,"Ya!"
if %ransu=3 mov $sel1,"Orya!"
name "Luka"
eng $sel1:$sel6\
name ""
>Luka attacks!\
if %aqua<>2 gosub *mp_kaihuku:gosub *mp
dwave 1,"se\miss.ogg"
gosub *kaihi
>But the Imp desperately dodges!\
name $name
>Kya!?@
>Just a little closer, and I thought I was going to die!\
name ""
name "Luka"
>No... You would only be sealed, you wouldn't die...\
name ""
lsp 700,":a;chara\inp_st01.bmp",0,0:print 10,500
name $name
>Yo...You don't want a handjob...?@
>Th...Then how about a blowjob...?\
name ""
>The Imp nervously smiles and sticks out her tongue.\
name $name
>I'll lick you the best I can with my tongue...@
>But it's kind of small... So you have to stay still, okay?\
name ""
mov %sinkou,2
goto *common_main



*inp_attack2

lsp 700,":a;chara\inp_st04.bmp",0,0:print 10,500
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ha!"
if %ransu=2 mov $sel1,"Ya!"
if %ransu=3 mov $sel1,"Orya!"
name "Luka"
eng $sel1:$sel6\
name ""
>Luka attacks!\
if %aqua<>2 gosub *mp_kaihuku:gosub *mp
dwave 1,"se\miss.ogg"
gosub *kaihi
>But the Imp manages to dodge somehow!\
name $name
>Hyaa!@>That was dangerous!@
>I was going to make an exception and even lick your penis, too...\
lsp 700,":a;chara\inp_st01.bmp",0,0:print 10,500
>Th...Then how about my breasts...?@
>I can sandwich your penis between them, and play with you...\
>If you stop moving for a moment, I'll do it for a looooong time, too! @
>You want to try it, right?@> ...Right?\
name ""
mov %sinkou,3
goto *common_main



*inp_attack3

lsp 700,":a;chara\inp_st04.bmp",0,0:print 10,500
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ha!"
if %ransu=2 mov $sel1,"Ya!"
if %ransu=3 mov $sel1,"Orya!"
name "Luka"
eng $sel1:$sel6\
name ""
>Luka attacks!\
if %aqua<>2 gosub *mp_kaihuku:gosub *mp
dwave 1,"se\miss.ogg"
gosub *kaihi
>But the Imp barely manages to dodge!\
name $name
>Waaah!@> Why are you ignoring my offers!?\
lsp 700,":a;chara\inp_st01.bmp",0,0:print 10,500
>Then how about we do some perverted stuff?@
>I'll let you use my vagina as much as you want! \
>I'll do the best I can, and shake my hips as hard as I can!@
>So please, be still for a moment, okay...?@> Okay?\
name ""
mov %sinkou,4
goto *common_main



*inp_a

if %before_action=47 goto *inp001
if %sinkou=1 && %hanyo1=0 gosub *inp_a1_1:goto *common_main
if %sinkou=1 && %hanyo1=1 gosub *inp_a1_2:goto *common_main
if %sinkou=1 && %hanyo1=2 gosub *inp_a1_3:goto *common_main
if %sinkou=1 && %hanyo1=3 gosub *inp_a1_4:goto *common_main
if %sinkou=1 && %hanyo1=4 gosub *inp_a1_5:goto *common_main
if %sinkou=1 && %hanyo1=5 gosub *inp_a1_6:goto *common_main
if %sinkou=1 && %hanyo1=6 gosub *inp_a1_7:goto *common_main
if %sinkou=1 && %hanyo1=7 gosub *inp_a1_8:goto *common_main
if %sinkou=2 && %hanyo2=0 gosub *inp_a2_1:goto *common_main
if %sinkou=2 && %hanyo2=1 gosub *inp_a2_2:goto *common_main
if %sinkou=2 && %hanyo2=2 gosub *inp_a2_3:goto *common_main
if %sinkou=2 && %hanyo2=3 gosub *inp_a2_4:goto *common_main
if %sinkou=2 && %hanyo2=4 gosub *inp_a2_5:goto *common_main
if %sinkou=3 && %hanyo3=0 gosub *inp_a3_1:goto *common_main
if %sinkou=3 && %hanyo3=1 gosub *inp_a3_2:goto *common_main
if %sinkou=3 && %hanyo3=2 gosub *inp_a3_3:goto *common_main
if %sinkou=3 && %hanyo3=3 gosub *inp_a3_4:goto *common_main
if %sinkou=4 gosub *inp_a4:goto *common_main



*inp_a1_1

add %stack,1
if %kousan=2 skip 5
name $name
>Yes, yes, like that...@> Don't move for a moment...@
>I'll be able to stroke you as much as you want! \
name ""
skillname "Imp Handjob"
dwave 1,"se\ero_koki1.ogg"
>The Imp grabs Luka's penis with her small hand, and timidly strokes him!
skillcount2 3532
mov %damage_kotei,1
damage 55,60
skillname ""
if %mylife=0 sub %stack,1:return *inp_h1
name $name
>Alright, I'm done... Did it feel good?@
>But if I stop now, wouldn't you be left unsatisfied?\
>In that case, I'll give you a special service. @
>If you stay still a little bit longer, I'll keep stroking you a little more... \
name ""
mov %hanyo1,1
sub %stack,1
return



*inp_a1_2

add %stack,1
name $name
>Ahaha, good boy.@
>So you did want me to play with you a little after all...\
name ""
skillcount2 3532
skillname "Imp Handjob"
dwave 1,"se\ero_koki1.ogg"
>The Imp grabs Luka's penis, and strokes him with a little more confidence!
mov %damage_kotei,1
damage 55,60
dwave 1,"se\ero_koki1.ogg"
>She uses her other hand to gently rub the tip of Luka's penis with her palm at the same time!
mov %damage_kotei,1
damage 55,60
skillname ""
if %mylife=0 sub %stack,1:return *inp_h1
name $name
>Ehehe, it looks like you liked that...@
>If you stay still even longer, I'll give you a better reward. \
>I'll pat the head, and praise it like the good boy it is...\
name ""
mov %hanyo1,2
sub %stack,1
return



*inp_a1_3

add %stack,1
name $name
>Hehehe... Good boy...@
>Let me reward your penis.\
>Good boy, good boy...\
name ""
skillcount2 3532
skillname "Imp Handjob"
dwave 1,"se\ero_koki1.ogg"
>The Imp happily grabs the tip of Luka's penis with her palm, and rubs it!
mov %damage_kotei,1
damage 55,60
dwave 1,"se\ero_koki1.ogg"
>Like that, shes uses her fingers to rub him all over!
mov %damage_kotei,1
damage 55,60
name $name
>Good boy, good boy...@
>Hehe.\
name ""
dwave 1,"se\ero_koki1.ogg"
>The Imp rubs the tip of Luka's penis between her small palms, lovingly petting it like it was a cute animal!\
mov %damage_kotei,1
damage 55,60
skillname ""
if %mylife=0 sub %stack,1:return *inp_h1
name $name
>Hehe, does it feel good when I praise Mr. Turtle? \
>If you stay still a little longer, I'll play with him with my fingers... \
>I'll crawl all over him with my small fingers, and make it feel reeeeally good. \
name ""
mov %hanyo1,3
sub %stack,1
return



*inp_a1_4

add %stack,1
name $name
>Haha, I'll use my fingers to play with Mr. Turtle! @
>I'll do it just like I promised, okay? \
name ""
skillcount2 3532
skillname "Imp Handjob"
dwave 1,"se\ero_koki1.ogg"
>The Imp slowly traces her finger around the tip of Luka's penis!
mov %damage_kotei,1
damage 55,60
name $name
>Mr. Turtle is twitching! @
>He likes being teased by my finger! \
name ""
dwave 1,"se\ero_koki1.ogg"
>The Imp gently uses her fingers to squeeze the tip of Luka's penis!
mov %damage_kotei,1
damage 55,60
dwave 1,"se\ero_koki1.ogg"
>She softly tickles the glans!
mov %damage_kotei,1
damage 55,60
skillname ""
if %mylife=0 sub %stack,1:return *inp_h1
name $name
>Haha, I just saw your hips move. @
>Then do you want me to make it feel even better...?\
>I can grab it really tight with my hand...@
>Since it's you, I'll give you an extra special massage.\
>I'm sure it will feel amazing... @
>All you have to do is stay still, okay? \
name ""
mov %hanyo1,4
sub %stack,1
return



*inp_a1_5

add %stack,1
name $name
>Ehehe, so you want me to grab it that badly?@
>There's no helping you, hehe.@
>Okay, I'll massage it! \
name ""
skillcount2 3532
skillname "Imp Handjob"
dwave 1,"se\ero_koki1.ogg"
>The Imp grabs Luka's penis, and gently squeezes it with her small hand!
mov %damage_kotei,1
damage 55,60
dwave 1,"se\ero_koki1.ogg"
>She slowly squeezes harder with her soft palm!
mov %damage_kotei,1
damage 55,60
name $name
>Now for the special service... @
>I'll massage Mr. Turtle! \
name ""
dwave 1,"se\ero_koki1.ogg"
>The Imp massages the tip of Luka's penis with her hand!
mov %damage_kotei,1
damage 55,60
dwave 1,"se\ero_koki1.ogg"
>She rubs it, as if washing his penis!
mov %damage_kotei,1
damage 55,60
skillname ""
if %mylife=0 sub %stack,1:return *inp_h1
name $name
>Ehe... How about I stroke you the same time I massage you?@
>I know for certain it will feel even more amazing...\
>You want to try it, don't you? Ehehe...@
>Now just don't move for a moment...\
name ""
mov %hanyo1,5
sub %stack,1
return



*inp_a1_6

add %stack,1
name $name
>Alright, I'll rub it a lot! @
>Here, like this... \
name ""
skillcount2 3532
skillname "Imp Handjob"
dwave 1,"se\ero_koki1.ogg"
>The Imp grabs the shaft of Luka's penis with her right hand, and starts to slowly pump him up and down.
mov %damage_kotei,1
damage 55,60
dwave 1,"se\ero_koki1.ogg"
>At the same time, she gently tickles the tip of his penis with her left hand!
mov %damage_kotei,1
damage 55,60
name $name
>You're kind of pathetic... Teehee.@
>You looks so happy at getting a handjob from such a weak monster like me... \
name ""
dwave 1,"se\ero_koki1.ogg"
>The Imp's small hand slowly moves faster!
mov %damage_kotei,1
damage 55,60
>Her left hand skillfully massages the tip of Luka's penis at the same time!
mov %damage_kotei,1
damage 55,60
skillname ""
if %mylife=0 sub %stack,1:return *inp_h1
name $name
>Hehe, look at that face of yours. @
>You want me to rub you even more, don't you?\
>Next... I'll focus on your weak point, right under the tip...@
>So just stay still a little longer... Okay? \
name ""
mov %hanyo1,6
sub %stack,1
return



*inp_a1_7

add %stack,1
name $name
>Then, just like I promised... Mr. Pathetic Hero.@
>You can't bring yourself to go against this, can you? \
name ""
skillcount2 3532
skillname "Imp Handjob"
dwave 1,"se\ero_koki1.ogg"
>The Imp creates a ring with her thumb and index finger, and places it right under the tip of Luka's penis!
mov %damage_kotei,1
damage 55,60
dwave 1,"se\ero_koki1.ogg"
>With quick, small movements, the Imp uses her two fingers to rub Luka right under the tip of his penis!
mov %damage_kotei,1
damage 55,60
name $name
>Hehehe... @
>This is how you wanted me to tease your penis, right?\
>Even though you came here for world peace, a weak monster like me is going to make you come...\
>I'm so lucky you're a pathetic Hero who gets so happy at having his penis played with! \
name ""
dwave 1,"se\ero_koki1.ogg"
>The Imp happily continues using her two fingers to stroke Luka's penis!
mov %damage_kotei,1
damage 55,60
>At the same time, she uses the palm of her other hand to rub the tip of Luka's penis!
mov %damage_kotei,1
damage 55,60
skillname ""
if %mylife=0 sub %stack,1:return *inp_h1
name $name
>You're going to shoot it out soon, aren't you?@
>Do you want to come in my hand...?\
>Ok... Then this time, I'll keep going until you come!@
>I'll make sure to do my best, and won't stop until you come! \
>So just don't move, okay? \
name ""
mov %hanyo1,7
sub %stack,1
return



*inp_a1_8

add %stack,1
name $name
>Hehehe... You want me to make you come? @
>More than bringing peace to the world, you just want my small hands to give you an orgasm? \
>Alright... Then let me make you come inside my hand.@
>I'll keep rubbing you until you come, so go ahead and shoot out a lot! \
name ""
skillcount2 3532
skillname "Imp Handjob"
dwave 1,"se\ero_koki1.ogg"
>Confident in herself, the Imp firmly grabs Luka's penis, and quickly strokes him up and down!
mov %damage_kotei,1
damage 55,60
dwave 1,"se\ero_koki1.ogg"
>As she strokes him even faster, she uses the palm of her other hand to massage the tip of his penis!
mov %damage_kotei,1
damage 55,60
name $name
>Now, it's going to blow! \
name ""
dwave 1,"se\ero_koki1.ogg"
>The Imp giggles as she strokes Luka as fast as she can, finishing him off!
mov %damage_kotei,1
damage 85,95
skillname ""
sub %stack,1
return *inp_h1



*inp_a2_1

add %stack,1
if %kousan=2 skip 6
name $name
>So you do want me to lick you after all! @
>Ok... I'll lick the tip! \
>Nnn... *Lick* \
name ""
skillname "Imp Fellatio"
dwave 1,"se\ero_pyu2.ogg"
if %aqua=0 lsp 700,":a;chara\inp_hd1.bmp",0,0:print 10,500
>The Imp timidly sticks out her tongue, and licks Luka's penis!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
skillcount2 3533
mov %damage_kotei,1
damage 80,85
dwave 1,"se\ero_pyu2.ogg"
>Like that, she gently licks the tip of his penis clean!
mov %damage_kotei,1
damage 80,85
skillname ""
if %mylife=0 sub %stack,1:return *inp_h2
name $name
>Ehehe... It felt good, didn't it?@
>Do you want me to lick it some more...?\
>My wet, warm tongue slowly licking your penis clean...@
>If you just stay still for a while, I'll make sure you're satisfied! \
name ""
mov %hanyo2,1
sub %stack,1
return



*inp_a2_2

add %stack,1
name $name
>Ehehe... So you do want me to lick you some more? @
>Alright, then let me lick you clean. \
name ""
skillname "Imp Fellatio"
dwave 1,"se\ero_pyu2.ogg"
>The Imp licks the tip of Luka's penis with more enthusiasm!
skillcount2 3533
mov %damage_kotei,1
damage 80,85
dwave 1,"se\ero_pyu2.ogg"
>Like that, she trails her tongue all over his penis, covering it with her warm saliva!
mov %damage_kotei,1
damage 80,85
dwave 1,"se\ero_pyu2.ogg"
>The Imp continues licking Luka, making sure every spot on his penis is clean!
mov %damage_kotei,1
damage 80,85
skillname ""
if %mylife=0 sub %stack,1:return *inp_h2
name $name
>That felt good, didn't it? \
>But don't you want to try something even better...?@
>I'll gently bite down on your penis, and make everything even better!\
>I'll hold it in my mouth, and just gently nibble on it with my lips...@
>If you want me to, just stay still, okay? \
name ""
mov %hanyo2,2
sub %stack,1
return



*inp_a2_3

add %stack,1
name $name
>Hehe... So you want to stick your penis into my mouth?@
>Then I'll eat it just like you wanted. \
>I'll gently nibble on your penis... \
name ""
skillname "Imp Fellatio"
dwave 1,"se\ero_chupa1.ogg"
lsp 700,":a;chara\inp_hd2.bmp",0,0:print 10,500
>The Imp opens her mouth, and slowly swallows Luka's penis!
skillcount2 3533
mov %damage_kotei,1
damage 80,85
dwave 1,"se\ero_pyu2.ogg"
>Like that, she starts to make chewing motions in her mouth without using her teeth!
mov %damage_kotei,1
damage 80,85
name $name
>Mmm...@> My mouth feels good, doesn't it?@
>Let me taste more of your penis, too. \
dwave 1,"se\ero_pyu2.ogg"
name ""
>The Imp's tongue races around the tip of Luka's penis inside her mouth!
mov %damage_kotei,1
damage 80,85
dwave 1,"se\ero_pyu2.ogg"
>The Imp continues making the chewing movements as she licks him!
mov %damage_kotei,1
damage 80,85
skillname ""
if %mylife=0 sub %stack,1:return *inp_h2
name $name
>Ehehe... You like this, right?@
>I wouldn't mind being a little more forceful in sucking on you... \
>I'll coil my tongue around the tip of your penis as I suck on you even harder...@
>I'm sure you would come really quickly. \
>Now just be still...@
>If you want me to suck on you, of course.\
name ""
mov %hanyo2,3
sub %stack,1
return



*inp_a2_4

add %stack,1
name $name
>Good, that's good...@
>I'll use my mouth to give you a taste of paradise. \
name ""
skillname "Imp Fellatio"
dwave 1,"se\ero_pyu4.ogg"
>The Imp's tongue slowly coils around the tip of Luka's penis inside her mouth!
skillcount2 3533
mov %damage_kotei,1
damage 80,85
dwave 1,"se\ero_pyu4.ogg"
>Her mouth gets smaller as she starts to suck on Luka with more force!
mov %damage_kotei,1
damage 80,85
name $name
>Ehehe... Can you endure it?@
>I haven't gotten to the best part yet! \
name ""
dwave 1,"se\ero_pyu4.ogg"
>After wrapping her tongue around his penis, the Imp uses the tip of her tongue to trace around Luka's urethral opening!
mov %damage_kotei,1
damage 80,85
dwave 1,"se\ero_pyu4.ogg"
>The Imp starts to resume her chewing motions as she sucks on his penis!
mov %damage_kotei,1
damage 80,85
skillname ""
if %mylife=0 sub %stack,1:return *inp_h2
name $name
>Do you want to come soon...?@
>You want to explode inside my mouth, don't you?\
>I'll let you come in my mouth if you stay still for a moment...@
>I'll suck you as hard as I can, and swallow all of your semen. \
>You want me to swallow it, right?@
>Then just stay still for a moment...\
name ""
mov %hanyo2,4
sub %stack,1
return



*inp_a2_5

add %stack,1
name $name
>Ahaha, I knew it, you want to come inside my mouth!\
>Ok, then I'll keep sucking until you come!@
>Forget all about the fight, and just enjoy yourself! \
name ""
skillname "Imp Fellatio"
dwave 1,"se\ero_pyu4.ogg"
>While sucking as hard as she can, the Imp starts to pump her head back and forth!
skillcount2 3533
mov %damage_kotei,1
damage 80,85
dwave 1,"se\ero_pyu4.ogg"
>The Imp's soft lips glide up and down Luka's penis as she makes a piston movement!
mov %damage_kotei,1
damage 80,85
name $name
>I'll do this to make you come! @
>Now come inside my mouth! \
name ""
dwave 1,"se\ero_pyu4.ogg"
>The Imp uses her tongue to lick the tip of Luka's penis as she continues her quick movements!
mov %damage_kotei,1
damage 80,85
dwave 1,"se\ero_pyu4.ogg"
>She smiles as she moves even faster than ever, finishing Luka off!
mov %damage_kotei,1
damage 110,115
skillname ""
sub %stack,1
return *inp_h2



*inp_a3_1

add %stack,1
if %kousan=2 skip 6
name $name
>Ehehe, you're a boy after all.@
>You can't help but want to play with my breasts... \
>Alright, I'll use my breasts just like I promised! \
name ""
skillname "Imp Tit Fuck"
dwave 1,"se\ero_paizuri.ogg"
if %aqua=0 lsp 700,":a;chara\inp_hb1.bmp",0,0:print 10,500
eng "The Imp puts Luka's penis between her breasts!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
\
>The soft feeling of her skin attacks Luka from the left and right!
skillcount2 3534
mov %damage_kotei,1
damage 110,115
dwave 1,"se\ero_paizuri.ogg"
>Luka's penis sinks a little into her soft breasts!
mov %damage_kotei,1
damage 110,115
skillname ""
if %mylife=0 sub %stack,1:return *inp_h3
name $name
>My breasts are soft, aren't they? @
>You want to feel them some more... Right?\
>Do you want me to try pressing them together with your penis inside?@
>If you just stay still, I'll press them together as hard as I can! \
name ""
mov %hanyo3,1
sub %stack,1
return



*inp_a3_2

add %stack,1
name $name
>That's right, don't fight back...@
>I mean, you're already in position, right?\
>I'll squeeze them together, just like I promised. @
>You'll love the feeling of having your penis pressed! \
name ""
skillname "Imp Tit Fuck"
dwave 1,"se\ero_paizuri.ogg"
>The Imp grabs her breasts, and pushes them together!
skillcount2 3534
mov %damage_kotei,1
damage 110,115
dwave 1,"se\ero_paizuri.ogg"
>The soft pressure attacks Luka with pleasure!
mov %damage_kotei,1
damage 110,115
dwave 1,"se\ero_paizuri.ogg"
>Luka's penis sinks deeper into her soft breasts!
mov %damage_kotei,1
damage 110,115
skillname ""
if %mylife=0 sub %stack,1:return *inp_h3
name $name
>Ehehe, it's like being in heaven, right?@
>But how about I give you a little more service...?\
>I can move them up and down, too...@
>I'll do my best to move them as fast as I can while I squeeze your penis between them!\
>You want to try that... Right, Mr. Hero?@
>So, just relax for a moment, okay? \
name ""
mov %hanyo3,2
sub %stack,1
return



*inp_a3_3

add %stack,1
name $name
>Hehe, you aren't resisting...@
>Does that mean I can use my breasts some more?\
>I'll give you lots of service, so enjoy it!@
>Just let me do the work. \
name ""
skillname "Imp Tit Fuck"
dwave 1,"se\ero_paizuri.ogg"
>The Imp uses her hands to bounce her breasts up and down!
skillcount2 3534
mov %damage_kotei,1
damage 110,115
dwave 1,"se\ero_paizuri.ogg"
>At the same time, she presses her breasts together as hard as she can!
mov %damage_kotei,1
damage 110,115
dwave 1,"se\ero_paizuri.ogg"
>The Imp starts to alternate directions, moving one breast up as the other moves down!
mov %damage_kotei,1
damage 110,115
skillname ""
if %mylife=0 sub %stack,1:return *inp_h3
name $name
>Ehehe, it feels great, right?@
>Do you want to try coming now?\
>Hey... Do you want me to keep going until you come?@
>Don't you want to try exploding between my soft breasts?\
>I don't mind... I'd be happy to keep going until you come. @
>So just relax and let me do the rest... \
name ""
mov %hanyo3,3
sub %stack,1
return



*inp_a3_4

add %stack,1
name $name
>Hehe... So I can make you come?@
>Alright, I'll keep going until you explode! \
name ""
skillname "Imp Tit Fuck"
dwave 1,"se\ero_paizuri.ogg"
>The Imp happily squeezes her breasts together even harder than before!
skillcount2 3534
mov %damage_kotei,1
damage 110,115
dwave 1,"se\ero_paizuri.ogg"
>After that, she starts moving her breasts up and down in an alternating movement!
mov %damage_kotei,1
damage 110,115
name $name
>Ehehe, I'm going to make you come between my breasts.@
>Letting yourself be played with by such a weak monster... How embarrassing, little Hero! \
>Hehe... Now come! \
name ""
dwave 1,"se\ero_paizuri.ogg"
>The Imp giggles as she bounces her breasts up and down!
mov %damage_kotei,1
damage 110,115
dwave 1,"se\ero_paizuri.ogg"
>Rubbing her soft breasts against Luka as hard as she can, the Imp finishes Luka off!
mov %damage_kotei,1
damage 140,145
skillname ""
sub %stack,1
return *inp_h3



*inp_a4

add %stack,1
if %kousan=2 skip 5
name $name
>Hehe... So you aren't going to resist?@
>That means I can rape you... Right?\
name ""
skillname "Imp Rape"
dwave 1,"se\ero_pyu1.ogg"
if %aqua=0 lsp 700,":a;chara\inp_hc1.bmp",0,0:print 10,500
eng "The Imp excitedly jumps on Luka, and forces him into her!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
\
>Luka's penis sinks deep into her hot vagina!
mov %damage_kotei,1
damage 225,235
mov %kousoku,1:gosub *status_print
>Luka is being raped by the Imp!\
skillname ""
if %mylife=0 sub %stack,1:return *inp_h4
name $name
>Ahhh, you gave in to temptation! \
>Did you think it would turn out alright if it was just a weak monster like me raping you?\
>No matter how much stronger than me you are...@
>If I'm raping you, you're mine! \
name ""
>Luka is being raped by the Imp...\
name $name
>I said I would shake my hips, right...?@
>Just like you wanted, I'll ride you as hard as I can! \
>Hehehe. \
name ""
skillcount2 3547
skillname "Imp Hip Shake"
dwave 1,"se\ero_chupa3.ogg"
>The Imp happily bounces on top of Luka, attacking him with overwhelming pleasure!
mov %damage_kotei,1
damage 225,235
skillname ""
if %mylife=0 sub %stack,1:return *inp_h5
name $name
>Well...?@
>My vagina feels amazing, doesn't it?\
>Did you think you'd be able to resist this?\
name ""
skillcount2 3547
skillname "Imp Hip Shake"
dwave 1,"se\ero_chupa3.ogg"
>The Imp twists her waist side to side as she rides Luka!
mov %damage_kotei,1
damage 225,235
skillname ""
if %mylife=0 sub %stack,1:return *inp_h5
name $name
>Oh, oh?@>What's wrong?@
>Are you giving up already?@> Or are you too weak to endure it?\
>Haha, it feels so good you're powerless!@
>You're so pathetic! \
>I'm going to ride you harder! \
name ""
skillcount2 3547
skillname "Imp Hip Shake"
dwave 1,"se\ero_chupa3.ogg"
>The Imp grinds her hips against Luka, rubbing his penis deep against her vaginal walls!
mov %damage_kotei,1
damage 225,235
skillname ""
if %mylife=0 sub %stack,1:return *inp_h5
name $name
>Haha, you weren't anything special after all! @
>Such a stroooong Hero giving in to such a weeeak monster like me!\
>Aren't you ashamed of yourself?\
name ""
skillcount2 3547
skillname "Imp Hip Shake"
dwave 1,"se\ero_chupa3.ogg"
>The Imp slowly forces Luka in and out of her as she teases him!
mov %damage_kotei,1
damage 225,235
skillname ""
if %mylife=0 sub %stack,1:return *inp_h5
name $name
>It's time for me to finish you off. \
>Now come, right inside of a weak monster's vagina! \
name ""
skillcount2 3547
skillname "Imp Hip Shake"
dwave 1,"se\ero_chupa3.ogg"
>The Imp giggles as she rides Luka as hard as she can, finishing him off!
mov %damage_kotei,1
damage 255,265
skillname ""
sub %stack,1
return *inp_h5



*inp_onedari

mov $list1,"Imp Handjob"
if %3532>0 mov %list_num1,1
mov $list2,"Imp Fellatio"
if %3533>0 mov %list_num2,1
mov $list3,"Imp Tit Fuck"
if %3534>0 mov %list_num3,1
mov $list4,"Imp Hip Shake"
if %3547>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *inp_onedari1
if %cmd1=12 goto *inp_onedari2
if %cmd1=13 goto *inp_onedari3
if %cmd1=14 goto *inp_onedari4
if %cmd1=-1 goto *inp_main
goto *inp_onedari



*inp_onedari1

gosub *onedari_syori
name $name
>Ehe... You want me to rub your penis?\
>Ok, then don't move...@
>If you don't, then I'll rub you as much as you want. \
name ""
if %hanyo1=0 gosub *inp_a1_1
if %hanyo1>1 skip 2
>Luka remains motionless.\
if %hanyo1=1 gosub *inp_a1_2
if %hanyo1>2 skip 2
>Luka remains motionless.\
if %hanyo1=2 gosub *inp_a1_3
if %hanyo1>3 skip 2
>Luka remains motionless.\
if %hanyo1=3 gosub *inp_a1_4
if %hanyo1>4 skip 2
>Luka remains motionless.\
if %hanyo1=4 gosub *inp_a1_5
if %hanyo1>5 skip 2
>Luka remains motionless.\
if %hanyo1=5 gosub *inp_a1_6
if %hanyo1>6 skip 2
>Luka remains motionless.\
if %hanyo1=6 gosub *inp_a1_7
if %hanyo1>7 skip 2
>Luka remains motionless.\
if %hanyo1=7 gosub *inp_a1_8



*inp_onedari2

gosub *onedari_syori_k
name $name
>So you do want me to lick you after all! @
>Ok... I'll lick the tip! \
>Nnn... *Lick* \
name ""
if %hanyo2=0 gosub *inp_a2_1
if %hanyo2>1 skip 2
>Luka remains motionless.\
if %hanyo2=1 gosub *inp_a2_2
if %hanyo2>2 skip 2
>Luka remains motionless.\
if %hanyo2=2 gosub *inp_a2_3
if %hanyo2>3 skip 2
>Luka remains motionless.\
if %hanyo2=3 gosub *inp_a2_4
if %hanyo2>4 skip 2
>Luka remains motionless.\
if %hanyo2=4 gosub *inp_a2_5



*inp_onedari3

gosub *onedari_syori_k
name $name
>Ehehe, you're a boy after all.@
>You can't help but want to play with my breasts... \
>Alright, I'll use my breasts just like I promised! \
name ""
if %hanyo3=0 gosub *inp_a3_1
if %hanyo3>1 skip 2
>Luka remains motionless.\
if %hanyo3=1 gosub *inp_a3_2
if %hanyo3>2 skip 2
>Luka remains motionless.\
if %hanyo3=2 gosub *inp_a3_3
if %hanyo3>3 skip 2
>Luka remains motionless.\
if %hanyo3=3 gosub *inp_a3_4



*inp_onedari4

gosub *onedari_syori
name $name
>Ehe... You want me to rape you?@
>Okay... I'll rape you as much as you want! \
name ""
gosub *inp_a4



*inp_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\inp_bk03.bmp",0,0
gosub *syasei2
>As the Imp happily strokes Luka's penis, he comes, covering her small palm with semen.\
mov %viclose,1:gosub *lose
mov %2622,%2622+1:if %2622=1 mov %count_koenemy,%count_koenemy+1
if %2622>%count_most mov %count_most,%2622:mov $count_mostname,$name
count 5,5
mov $bad1,"The Imp made Luka come using her hands."
gosub *face2
name $name
>Ahaha, someone like me made him come with a simple handjob! \
>Even though you're a Hero, you're so pathetic! \
name ""
goto *inp_ha



*inp_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\inp_hd3.bmp",0,0
gosub *syasei2
>As the Imp eagerly sucks on his penis, Luka comes, filling her small mouth with semen.\
mov %viclose,1:gosub *lose
mov %2622,%2622+1:if %2622=1 mov %count_koenemy,%count_koenemy+1
if %2622>%count_most mov %count_most,%2622:mov $count_mostname,$name
count 4,5
mov $bad1,"The Imp made Luka come using her mouth."
name $name
>Nnn... You filled my mouth with semen. @
>Even though you're a Hero, you're so pathetic! \
name ""
goto *inp_ha



*inp_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\inp_hb2.bmp",0,0
gosub *syasei2
>Stuck between her large breasts, Luka comes, shooting his semen between them.\
mov %viclose,1:gosub *lose
mov %2622,%2622+1:if %2622=1 mov %count_koenemy,%count_koenemy+1
if %2622>%count_most mov %count_most,%2622:mov $count_mostname,$name
count 7,5
mov $bad1,"The Imp made Luka come using her breasts."
name $name
>Ehehe, your penis exploded between my breasts. @
>You're pretty pathetic aren't you, little Hero? \
name ""
mov %hanyo3,10
goto *inp_hb



*inp_h4

mov %ikigoe,3:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\inp_hc2.bmp",0,0
gosub *syasei2
>As soon as Luka is pushed into the Imp's small vagina, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2622,%2622+1:if %2622=1 mov %count_koenemy,%count_koenemy+1
if %2622>%count_most mov %count_most,%2622:mov $count_mostname,$name
count 1,5
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come just from being forced inside the Imp."
name $name
>Eh...?@> Already!?@
>I thought I was weak... That's just pathetic! \
name ""
goto *inp_ha



*inp_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\inp_hc2.bmp",0,0
gosub *syasei2
>As the Imp happily rides Luka, he comes, filling her small vagina with semen.\
mov %viclose,1:gosub *lose
mov %2622,%2622+1:if %2622=1 mov %count_koenemy,%count_koenemy+1
if %2622>%count_most mov %count_most,%2622:mov $count_mostname,$name
count 1,5
mov $bad1,"Luka was forced to come as the Imp raped him."
name $name
>Ehehe, that was so easy. @
>You didn't think you'd lose to a weak Imp's vagina, did you?\
>Aren't you ashamed now, little Hero? \
name ""
goto *inp_ha



*inp_ha

mov $bad2,"The victim of a weak Imp, Luka became nothing more than livestock for her to milk."
if %2837=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2837,1
name "Luka"
>Ahh...\
name ""
name $name
>It's time for the loser's punishment. @
>I'll squeeze out all of your boy's milk with my hand. \
name ""
cspl 690,699
lsp 700,":a;chara\inp_ha1.bmp",0,0:print 10,500
>The Imp moves behind me, and grabs my penis from around my back.@
>She takes out a milk bottle, and holds it next to my penis with her tail.\
name $name
>I'll milk you just like Mr. Cow.@
>My technique will get every drop of milk out of you...\
>We need to fill this bottle, so lets get started. \
name ""
name "Luka"
>N...No way...!\
name ""
name $name
>Aha... Here we go! \
name ""
mov %hseanwave,17:hseanwave
>Grabbing me from behind, the Imp's small hand starts to skillfully glide up and down my shaft.\
>Holding me with a comfortable grip, she occasionally gives me a slight squeeze as she pumps my penis.\
>As she slowly moves up and down, I can't summon the strength to force her off me.\
name "Luka"
>Ah... Haaa...\
name ""
name $name
>Ahaha, does it feel good?@
>My milking technique is good, isn't it?\
>I'll be able to fill up this bottle quickly with your milk, then. \
name ""
>The Imp continues slowly stroking me as she giggles.\
>But it isn't just a rhythmic stroking motion...@
>As she pumps me, she squeezes and loosens, varying the pressure as her small hand glides up and down.\
>It's like she's trying to squeeze something out of a tube...@
>A soft movement, clearly learned from trying to milk a cow.\
>But instead of an animal, she's using it on my penis.\
name "Luka"
>Ah... Uhh...\
name ""
name $name
>Ehehe, what a lewd voice. @
>Are you about to come soon...?\
>Come on, there's no point trying to endure it...@
>Go ahead and come right into the bottle! \
name ""
>The Imp grins as she continues her milking motion.\
>The desire to just give up and come wells up in me as I start to shake.\
name $name
>Ehehe, it's almost time...@
>I can feel your penis starting to twitch. \
name ""
>The Imp brings the bottle closer to my penis as I near an ejaculation.\
>Treated like a cow, and having my semen collected in a bottle...@
>My face flushes red with humiliation as I get closer to the edge.\
name "Luka"
>Ahh... I'm going to come...\
name ""
name $name
>Good, come... @
>I'll milk it out with my hand. \
name ""
>Trying to finish me off, the Imp's gentle milking motion quickly starts to speed up.@
>As her small hand runs up and down my penis, I feel my body breaking down, ready to give in.\
>At the same time, I feel my pride itself shattering as this weak monster treats me like I was simple livestock.\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\inp_ha2.bmp",0,0
gosub *syasei2
>As I come, the Imp skillfully positions the bottle in front of my penis, catching the semen as I shoot it out.\
name $name
>Hehe, it shot out, it shot out! @
>So much milk! \
name ""
>The Imp's soft hand squeezes down hard on me as she forces out the rest of my semen into the bottle.\
name "Luka"
>Ahh...!\
name ""
>I feebly squirm as her tight hand slowly moves from the base to the tip, ensuring every single drop goes into her bottle.\
mov %hseanwave,0:hseanwave
lsp 700,":a;chara\inp_ha3.bmp",0,0:print 10,500
>Satisfied that she got everything, the Imp giggles as she holds up the bottle.\
name $name
>Hehe, look, look! @
>Look at how much milk I squeezed out of your penis! \
name ""
name "Luka"
>Ahh...\
name ""
>I look at the bottle in shame as the Imp happily shows off the results of her handiwork.@
>My body is being used in such a pitiful way...\
>To make it even worse, she's such a low level monster, too.\
name $name
>But I need a lot more to fill it up...@
>We're going to need to milk a lot more out, so get ready! \
name ""
name "Luka"
>Y...You can't... Ahhh!\
name ""
mov %hseanwave,17:hseanwave
>The Imp resumes milking me again.@
>It looks like she's just stroking me up and down, but it's far more advanced than just that.\
>Her soft palm squeezes down on me at different points along her stroking movement, making me shiver with every movement she makes.\
>As soon as she reaches the top, she gives a slight squeeze with her small hand before starting back down my shaft.\
>Unable to take it, I already feel another ejaculation about to be forced out of me.\
name "Luka"
>Ahhh...\
name ""
name $name
>Hey... How does it feel to be milked by a weak monster like me...?\
>In truth, you're incredibly strong, right...?@
>Don't you feel ashamed at being milked like this by me...?\
name ""
>The Imp continues slowly making her milking motions as she teases me.\
>A monster I could have beaten in a single attack...@
>She's just taunting me now, and there's nothing I can do about it.\
name $name
>You came here on an important mission, but gave it all up just so I would play with your penis...\
>You're a failure as a Hero. Hehe. \
name ""
name "Luka"
>Ahhh!\
name ""
>The Imp giggles as she starts to stroke me a little bit faster.@
>Keeping me right on the edge, it feels like she could force me to come at any moment.\
name $name
>Haha... You just can't resist it, can you?@
>My little hand is going to make you come again, isn't it? \
name ""
name "Luka"
>Ah...Ahh...\
name ""
>I was going to try to resist this as long as I can, but I realize now it's not possible.\
>My heart has already surrendered to her.\
>She will just keep milking me...@
>Too exhausted to do anything, I surrender myself to the Imp.\
name $name
>Hahaha, even though you're a Hero, you already gave up?@
>Do you want me to make you come that badly...?\
>Okay... Then, come! \
name ""
>The Imp does a quick, powerful stroke, sending me over the edge right on command.\
name "Luka"
>Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\inp_ha4.bmp",0,0
gosub *syasei2
>I explode again, shooting my semen straight into the bottle she's holding.@
>Leaning back, I feel myself relax in the sweet sensation of release.\
name $name
>Ehehe... I'll use my special technique. @
>All I have to do is squeeze your penis like this as you come...\
name ""
name "Luka"
>Aiiiee!\
name ""
>The Imp suddenly squeezes down on my penis, all five fingers clutching and releasing me in a wave.\
>Fireworks of ecstasy go off in my head as she plays with me right in the middle of my ejaculation, sending me into another whirlwind of pleasure.\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\inp_ha5.bmp",0,0
gosub *syasei2
>Almost as if I had another orgasm during my last one, I explode again into her bottle.\
>A numbing ache of pleasure radiates out from my waist as I gasp from the double orgasm.\
name "Luka"
>Ahh... Haa...\
name ""
name $name
>Ehehe... Incredible, right?\
name ""
>Using her techniques, the Imp keeps milking me...@
mov %hseanwave,0:hseanwave
lsp 700,":a;chara\inp_ha6.bmp",0,0:print 10,500
>Until after a while, the bottle is finally full.\
>She shows off her bottle to me with a smile on her face, as I feel humiliated at being so easily dominated by a mere Imp.\
name $name
>Ahaha, my bottle is full!@
>I didn't think I'd ever manage to get so much Hero milk!\
>How embarrassing for you! \
name ""
>The Imp stares at her bottle with a wide smile on her face.\
name $name
>Nnn... *Gulp* *Gulp*@
>Ahh!\
name ""
>In one quick movement, she drinks the entire bottle.\
name $name
>Ahhh, that tasted great! @
>I drank all of it...\
name ""
name "Luka"
>............\
name ""
>I look on in misery at watching my semen drunk out of a bottle like that.@
>It's like I really am just livestock...\
name $name
>I beat you... So you belong to me now.@
>Every day from now on, I'm going to milk you. \
name ""
name "Luka"
>N...No way...\
name ""
>I can't defy this weak Imp any longer.@
>It's my fate to spend the rest of my life as mere livestock for her to milk.\
gosub *anten
>After that, the Imp continued to milk me.@
>My days are spent as nothing but as a simple animal, serving no purpose but to be milked for semen.\
>Today, too, I'll be milked dry by this weak monster...\
>............\
goto *badend



*inp_hb

mov $bad2,"Defeated, the Imp kept using her breasts to milk Luka's semen."
if %2838=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2838,1
name "Luka"
>Ahh...\
name ""
name $name
>It's time for the little Hero's punishment! @
>I'll use my breasts to play with your penis. \
name ""
if %hanyo3=10 goto *inp_hb2
>Too weak to escape, I lay helplessly on my back as the Imp kneels in front of me.@
>Positioning herself above me, she plants the tip of my penis right below her breasts.\
cspl 690,699
lsp 700,":a;chara\inp_hb1.bmp",0,0:print 10,500
>And in one quick movement, forces me right between them!\
name "Luka"
>Ahh...\
name ""
>I'm instantly attacked by the soft feeling of her breasts, gently squeezing my penis.\
>The warm feeling of pressure runs through my waist as I slowly sink into her soft skin, almost like I was forced into her vagina instead of just her breasts.\
name $name
>Ehehe... My breasts feel good, don't they?@
>It's fine if you want to come between them like this. \
name ""
name "Luka"
>Ahhh...\
goto *inp_hb2



*inp_hb2

name ""
>The Imp's knees are locking me in place, leaving me completely unable to move.@
>With my penis stuck between her gigantic breasts, it feels like I could come just from insertion.\
name $name
>Ehehe, you can drown yourself in this weak monster's breasts...@
>Just forget all about your silly adventure... Okay? \
name ""
name "Luka"
>I...I can't...\
name ""
>I've been through so many difficult fights and situations just to make it here...@
>I can't have my quest end at the hands of a tiny, weak little Imp...\
name $name
>Teehee. @
>I'm going to squeeze you with my breasts now. \
>Go ahead and explode between my breasts, okay? \
name ""
mov %hseanwave,17:hseanwave
>The Imp grabs her breasts with her hands, and starts to press them together.@
>As she slowly increases the force, my penis sinks deep into her huge breasts.\
>As my sensitive penis rubs against her smooth skin, I start to unconsciously moan.\
name "Luka"
>S...Stop... Ahh...@> I'm going to come...\
name ""
>My waist starts to go numb as I rub against her smooth skin.@
>This weak Imp is toying with me so easily, I don't think I can endure it much longer...\
name $name
>Heehee, come! @
>Fill my breasts with your milk! \
name ""
>The Imp grins as she presses down even harder, clearly trying to finish me off.@
>As my head goes white in ecstasy, I feel myself going over the edge.\
name "Luka"
>Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\inp_hb2.bmp",0,0
gosub *syasei2
>My penis twitches between her breasts, shooting my semen all over her.@
>The white semen slowly spills out of her, dirtying up her smooth skin.\
>Even though I feel humiliated at being toyed with by such a low level monster, I can't help but sigh in the afterglow of the orgasm.\
name "Luka"
>Ah... Ahh...\
name ""
name $name
>Aha, that was surprisingly easy. @
>Your penis is really weak, little Hero. \
name ""
>The Imp giggles as she happily squeezes her breasts together even harder.@
>I can't take this any longer... It feels like I really will surrender to her breasts.\
>I writhe around under her as the Imp's soft breasts push tighter together around my penis, still sensitive after my orgasm.\
name $name
>Even though you came all the way to the Monster Lord's Castle, you just ended up losing to an Imp. @
>Now a suuuuper weak monster is teasing you with her breasts. \
>You're a total failure as a Hero. @
>Aren't you ashamed? Or frustrated?\
name ""
name "Luka"
>Haaa...\
name ""
>The Imp taunts me as she continues rubbing her breasts against my penis at the same time, clearly enjoying being in a dominant position.\
name $name
>Hehehe... You know what this means, right?@
>To have been beaten by an Imp's breasts, and forced to come?\
>You can't continue your adventure anymore.@
>You were a Hero, but now you're just a weak little monster's toy! \
name ""
>The Imp grins as she looks down at me, gently teasing me with her breasts at the same time as her words.\
>Too weak to push her off, I have no choice but to allow her to do whatever she wants to me...\
name "Luka"
>Ahh...\
name ""
name $name
>Ehehe, what a lewd voice. @
>Don't you feel ashamed at ever calling yourself a Hero?\
name ""
>The Imp starts to rub her breasts against me a little harder as she talks.\
name "Luka"
>Haaa...\
name ""
>With my spirit already broken, I just moan as I give myself over to the feeling from her breasts.\
name $name
>Aww, the little Hero lost all his drive.@
>It was silly of you to think you could do anything here in the castle.\
>It suits you better to be nothing but a weak monster's toy. @
>Hehe, let's make you come again! \
name ""
>The Imp starts rubbing her left and right breasts against me in opposite ways, forcefully pushing her breasts together as hard as she can.\
>My body shakes in bliss as my penis starts to twitch between her breasts.\
name "Luka"
>Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\inp_hb3.bmp",0,0
gosub *syasei2
>I explode between her breasts yet again, shaking in ecstasy as I watch my semen start to slowly drip out from her chest.\
name $name
>Ehehe, you're making my breasts all dirty with your semen.@
>I can't believe you ever thought you could defeat the Monster Lord! \
name ""
>The Imp's smile gets even bigger as she joyfully continues toying with me.\
name "Luka"
>Ahhh...\
name ""
name $name
>But yeah, this role suits you a lot more. @
>Now come on, I'm going to make you come again! \
name ""
>The small Imp rubs her breasts hard against me again, and easily forces me to another orgasm.\
gosub *syasei1
lsp 700,":a;chara\inp_hb4.bmp",0,0
gosub *syasei2
>Forced to come again, I spray even more semen between her huge breasts.@
>I can't even bring myself to attempt to endure her anymore.\
name $name
>Ahhh... My breasts are all soaked in semen now...@
>But you just couldn't help but fill up my breasts with all that semen of yours, could you? \
name ""
name "Luka"
>Haaa...\
name ""
>I've already been completely defeated by this Imp's breasts.@
>I don't even care about why I came here anymore...\
name $name
>Hehe... Drown in my breasts. \
name ""
name "Luka"
>Ahhh...\
name ""
>Stuck inside her soft breasts, the Imp continues to force me to come...\
gosub *anten
mov %hseanwave,0:hseanwave
>After that, the Imp keeps on abusing me with her breasts.@
>The rest of my life will be spent as nothing but as a toy for a monster far weaker than me...\
>.............\
goto *badend



*gigantweapon_start

mov $name,"Giganto Weapon"
mov $name2,"Giganto Weapon"
mov $lavel,"gigantweapon"
mov $tatie1,"gigantweapon_st01"
mov $tatie2,"gigantweapon_st01"
mov $tatie3,"gigantweapon_st02"
mov $tatie4,"gigantweapon_h1"
mov $haikei,"bg149"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,18000
if %nanido=2 mov %max_enemylife,18000
if %nanido=3 mov %max_enemylife,27000
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,50
if %nanido=3 mov %earth_keigen,25
mov %music,8
mov %tikei,0
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $half_s1,"ENEMY VITALITY DECLINING."
mov $half_s2,"CONTINUE ATTACK."
mov $kiki_s1,"SUBMISSION IMMINENT."
mov $kiki_s2,"CONTINUE ATTACK."
mov %end_n,9
mov %exp_minus,270025
mov %zmonster_x,-140
mov %tukix,300
mov %owaza_count2a,8
mov %owaza_count3a,8
name "Luka"
>Wh...What the hell is this!?\
name ""
>I step back from the brutal aura her imposing form gives off.\
>Despite her terrifying looks, I feel something strange...@
>It's almost as if there's no emotion in her.\
lsp 699,":a;chara\tamamo_st04.bmp",160,0:print 10,500
name "Tamamo"
>Wawawa! It's going berserk!\
name ""
name "Luka"
>T...Tamamo!?\
name ""
>Suddenly, I notice Tamamo riding on the strange monster's back!\
lsp 699,":a;chara\tamamo_st01.bmp",160,0:print 10,500
name "Tamamo"
>This Giganto Weapon is a biological weapon created 1,000 years ago during the Great Monster Wars.\
>It was too powerful, so it has been sealed all this time.\
name ""
name "Luka"
>...A...A biological weapon!?\
name ""
>Something created by unnatural methods...?@
>Is that why I don't feel any emotions coming from her?\
name "Tamamo"
>With that...@> I'm off!\
name ""
dwave 2,"se\tamamo2.ogg"
>Tamamo does a quick backflip off the Giganto Weapon's back.@
dwave 1,"se\escape.ogg"
csp 699:print 10,500
>With that, she vanishes from view!\
>The seemingly lifeless Giganto Weapon's eyes slowly turn toward me.\
name $name
>TARGET OBTAINED.@> DESTROY.\
name ""
name "Luka"
>Guh...!\
name ""
>It doesn't look like she has any emotions after all...@
>A beast created by others, designed to do nothing but follow orders without question...\
mov %sinkou,1
goto *common_main



*gigantweapon001

if %aqua=2 bg "BG\"+$haikei+".bmp",10,1500
if %aqua=2 gosub *musicplay
mov %aqua,0:mov %aqua_turn,0
gosub *elm_print
name $name
>DAMAGE TAKEN.@>ENTERING CRISIS MODE.@
>BEGIN SELF-PRESERVATION ROUTINE.\
name ""
name "Luka"
>Eh...?@> I didn't beat it...?\
name ""
name $name
>BEGIN REGENERATION.\
name ""
skillname "Regeneration"
>The Giganto Weapon begins to regenerate.\
mov %damage,3000:gosub *enemylife_kaihuku
skillname ""
name "Luka"
>Wh...What the!?\
name ""
name $name
>DAMAGE RESTORED.@> BREAK CRISIS MODE.@
>RESUME NORMAL OPERATIONS.\
name ""
name "Luka"
>No way...!\
name ""
lsp2 0,":a;chara\salamander_st01.bmp",250,300,100,100,0,200
gosub *syoukan_effect
name "Salamander"
>It looks like the enemy can regenerate herself somehow.\
>You probably won't be able to beat her unless you start damaging her faster than she regenerates.\
name ""
name "Luka"
>But my skills...\
name ""
name "Salamander"
>You should be able to use it now.\
>A skill that infuses your sword with the flames of hell, and unleashes a flurry of chaotic attacks.\
name ""
name "Luka"
>That same skill Granberia used...?\
name ""
>Vaporizing Rebellion Sword... I felt for myself just how powerful that was.\
>But... Can I really pull that off?\
mov %sinkou,2
mov %skill01,16
goto *gigantweapon_a



*gigantweapon002

if %aqua>1 bg "BG\"+$haikei+".bmp",10,1500
mov %aqua,0:mov %aqua_turn,0
gosub *elm_print
name $name
>DAMAGE TAKEN.@>ENTERING CRISIS MODE.@
>BEGIN SELF-PRESERVATION ROUTINE.\
name ""
name "Luka"
>Guh...!\
name ""
name $name
>BEGIN REGENERATION.\
name ""
skillname "Regeneration"
>The Giganto Weapon begins to regenerate.\
mov %damage,3000:gosub *enemylife_kaihuku
skillname ""
>I really can't defeat her with my normal attacks...@
>I need to use something far more powerful to beat her before she regenerates.\
goto *gigantweapon_a



*gigantweapon_v

if %nanido=0 goto *gigantweapon_v2
if %sinkou=1 goto *gigantweapon001
if %sinkou=2 goto *gigantweapon002
if %sinkou=3 goto *gigantweapon_v2



*gigantweapon_v2

gosub *face3
name $name
>CRITICAL DAMAGE TAKEN.@> REACTOR SHUTDOWN.@> ABORT.\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Giganto Weapon is sealed into a form that looks similar to a lion!\
mov %viclose,1:gosub *victory
mov %getexp,200000:gosub *lvup
mov %2337,1
mov %skill01,16
goto *sean0296



*gigantweapon_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>SURRENDER CONFIRMED.@
>CAPTURE PROGRAM INITITATED...@>ERROR.@> CONTINUE ATTACKS.\
name ""
goto *gigantweapon_a



*gigantweapon_main

gosub *cmd_main
if %cmd1=11 goto *common_attack
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *gigantweapon_kousan
if %cmd1=16 goto *gigantweapon_onedari
if %cmd1=17 && %sinkou=1 goto *common_skill
if %cmd1=17 && %sinkou=2 goto *gigantweapon_skill
goto *gigantweapon_main



*gigantweapon_skill

gosub *cmd_skill
if %cmd1=24 goto *skill4
if %cmd1=26 goto *skill11
if %cmd1=27 goto *skill12
if %cmd1=28 goto *skill13
if %cmd1=29 goto *skill15
if %cmd1=30 mov %sinkou,3:goto *skill16
if %cmd1=31 goto *skill7b
if %cmd1=32 goto *skill8b
if %cmd1=33 goto *skill10b
if %cmd1=34 goto *skill14b
if %cmd1=35 goto *skill17
if %cmd1=-1 goto *gigantweapon_main
goto *gigantweapon_skill



*gigantweapon_a

if %hanyo6=1 && %aqua>1 gosub *gigantweapon_a6:goto *common_main
if %hanyo6=1 && %bougyo=1 gosub *gigantweapon_a6:goto *common_main
if %hanyo6=1 && %bougyo=0 gosub *gigantweapon_a7:goto *common_main
rnd2 %ransu,1,5
if %ransu=1 gosub *gigantweapon_a1:goto *common_main
if %ransu=2 gosub *gigantweapon_a2:goto *common_main
if %ransu=3 gosub *gigantweapon_a3:goto *common_main
if %ransu=4 && %owaza_count2a>9 && %status=0 gosub *gigantweapon_a4:goto *common_main
if %ransu=5 && %owaza_count3a>9 gosub *gigantweapon_a5:goto *common_main
skip -6



*gigantweapon_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"ATTACK K. FLAMES."
if %ransu=2 mov $sel1,"INCINERATE."
if %ransu=3 mov $sel1,"FLAMES READY."
name $name
eng $sel1:$sel6\
name ""
skillname "Giga Inferno"
dwave 1,"se\fire2.ogg"
lsp 690,":a;effect\008.bmp",0,0:print 10,500
eng "The Giganto Weapon sprays crimson flames in front of her!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,40
if %wind=2 && %nanido=2 mov %wind_kakuritu,35
if %wind=2 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>The entire room erupts in a vortex of flame!
mov %a_effect1,1
if %nanido<2 damage 250,280
if %nanido=2 damage 280,310
if %nanido=3 damage 310,340
skillname ""
csp 690:print 10,500
if %mylife=0 sub %stack,1:return *gigantweapon_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*gigantweapon_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"ATTACK B. RUSH."
if %ransu=2 mov $sel1,"COLLATERAL DAMAGE UNAVOIDABLE."
if %ransu=3 mov $sel1,"PERMISSION TO DESTROY GRANTED."
name $name
eng $sel1:$sel6\
name ""
skillname "Rampage"
eng "The Giganto Weapon rushes wildly around the room, slamming multiple times into everything in her path!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,40
if %wind=2 && %nanido=2 mov %wind_kakuritu,35
if %wind=2 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
>
mov %damage_nobr,2
mov %a_effect1,1
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
delay 500
textclear
mov %damage_nobr,1
mov %a_effect1,1
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
mov %damage_nobr,1
mov %a_effect1,1
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
mov %a_effect1,1
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
skillname ""
if %mylife=0 sub %stack,1:return *gigantweapon_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*gigantweapon_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"ATTACK N. TENTACLES."
if %ransu=2 mov $sel1,"TARGET LOCK. TENTACLE DEPLOY."
if %ransu=3 mov $sel1,"PACIFY TARGET WITH TENTACLES."
name $name
eng $sel1:$sel6\
name ""
skillname "Tentacle Dance"
dwave 1,"se\ero_makituki3.ogg"
lsp 690,":a;chara\lilith_ct01.bmp",0,0:print 10,500
eng "The Giganto Weapon's tentacles dance around the room!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,40
if %wind=2 && %nanido=2 mov %wind_kakuritu,35
if %wind=2 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>Grabbing hold of Luka, they massage his body!
skillcount2 3628
if %nanido<2 damage 300,330
if %nanido=2 damage 330,360
if %nanido=3 damage 360,390
skillname ""
if %mylife=0 sub %stack,1:return *gigantweapon_h2
csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*gigantweapon_a4

add %stack,1
mov %owaza_count2a,0
name $name
>ATTACK D. DESTROY AREA.\
name ""
skillname "Disrupting Roar"
dwave 1,"se\bom1.ogg"
>The Giganto Weapon's loud roar causes nearby walls to crumble!
wait 300
flushout 1000
vsp 700,0
bg white,10,1000
wait 1000
vsp 700,1
if %aqua=0 bg "bg\bg149.bmp",10,1000
if %aqua>0 bg black,10,1000
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=2 && %nanido<2 mov %wind_kakuritu,100
if %wind=2 && %nanido=2 mov %wind_kakuritu,90
if %wind=2 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=2 mov $sel1,"But Luka's quick reactions let him cover his ears first!":gosub *wind_guard:sub %stack,1:return
mov %a_effect1,1
if %nanido<2 damage 300,330
if %nanido=2 damage 330,360
if %nanido=3 damage 360,390
mov %status,2:gosub *status_print
>Luka has been paralyzed!\
skillname ""
if %mylife=0 sub %stack,1:return *gigantweapon_h1
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,2,3
if %nanido=3 rnd2 %status_turn,3,4
sub %stack,1
return



*gigantweapon_a5

add %stack,1
name $name
>ACTIVATE SEMEN EXTRACTION CONTAINER.\
name ""
skillname "Semen Squeezing Program"
dwave 1,"se\ero_buchu1.ogg"
lsp 700,":a;chara\gigantweapon_st11.bmp",0,0:print 10,500
lsp 700,":a;chara\gigantweapon_st21.bmp",0,0:print 10,500
mov $tatie1,"gigantweapon_st21"
mov $tatie2,"gigantweapon_st21"
mov $tatie3,"gigantweapon_st02"
mov $tatie4,"gigantweapon_h1"
>The Giganto Weapon's tail opens, revealing a strange hole!\
skillname ""
mov %hanyo6,1
sub %stack,1
return



*gigantweapon_a6

add %stack,1
mov %hanyo6,0
name $name
>INITIATE EXTRACTION PROGRAM.\
name ""
skillname "Semen Squeezing Program"
>The Giganto Weapon's tail rushes toward Luka!
if %aqua>1 gosub *aqua_guard:skip 5
delay 1000
dwave 1,"se\miss.ogg"
>But Luka dodges it!\
skillname ""
lsp 700,":a;chara\gigantweapon_st01.bmp",0,0:print 10,500
mov $tatie1,"gigantweapon_st01"
mov $tatie2,"gigantweapon_st01"
mov $tatie3,"gigantweapon_st02"
mov $tatie4,"gigantweapon_h1"
mov %owaza_count3a,0
sub %stack,1
return



*gigantweapon_a7

add %stack,1
mov %hanyo6,0
name $name
>INITIATE EXTRACTION PROGRAM.\
name ""
skillcount2 3629
skillname "Semen Squeezing Program"
dwave 1,"se\ero_makituki3.ogg"
>The Giganto Weapon's tail rushes toward Luka!
mov %damage_kotei,1
damage 370,400
mov %kousoku,1:gosub *status_print
>Luka's body is sucked into her tail!\
skillname ""
if %mylife=0 sub %stack,1:return *gigantweapon_h3
name $name
>ENEMY CAPTURED.@
>BEGIN SEMEN EXTRACTION.\
name ""
skillcount2 3629
skillname "Semen Squeezing Program"
dwave 1,"se\ero_makituki3.ogg"
>The inside of the Giganto Weapon's tail starts to squirm around Luka, attacking him with pleasure!
mov %damage_kotei,1
damage 370,400
skillname ""
if %mylife=0 sub %stack,1:return *gigantweapon_h3
name $name
>CONTINUE STIMULATION.@
>PACIFY ENEMY.\
name ""
skillcount2 3629
skillname "Semen Squeezing Program"
dwave 1,"se\ero_makituki3.ogg"
>The tail shrinks around Luka, squeezing his body!
mov %damage_kotei,1
damage 370,400
skillname ""
if %mylife=0 sub %stack,1:return *gigantweapon_h3
name $name
>IMMINENT SUBMISSION ACKNOWLEDGED.@
>CONTINUE PACIFICATION.\
name $name
skillcount2 3629
skillname "Semen Squeezing Program"
dwave 1,"se\ero_makituki3.ogg"
>Her tail squeezes on Luka's penis, forcing him over the edge!
mov %damage_kotei,1
damage 370,400
skillname ""
sub %stack,1
return *gigantweapon_h3



*gigantweapon_onedari

mov $list1,"Tentacle Dance"
if %3628>0 mov %list_num1,1
mov $list2,"Semen Squeezing Program"
if %3629>0 mov %list_num2,1
gosub *cmd_onedari
if %cmd1=11 goto *gigantweapon_onedari1
if %cmd1=12 goto *gigantweapon_onedari2
if %cmd1=-1 goto *gigantweapon_main
goto *gigantweapon_onedari



*gigantweapon_onedari1

gosub *onedari_syori
name $name
>CONTINUE TENTACLE ATTACKS.\
name ""
gosub *gigantweapon_a3
skip -1



*gigantweapon_onedari2

gosub *onedari_syori
if %hanyo1=0:gosub *gigantweapon_a5
gosub *gigantweapon_a7
skip -1



*gigantweapon_h1

name "Luka"
>Ah... Guh...\
name ""
>After taking serious damage, Luka falls to his knees!\
mov %viclose,2:gosub *lose
mov %2637,%2637+1:if %2637=1 mov %count_koenemy,%count_koenemy+1
if %2637>%count_most mov %count_most,%2637:mov $count_mostname,$name
count 14,4
mov $bad1,"Unable to endure the Giganto Weapon's violent attacks, Luka was defeated."
gosub *face2
name $name
>ENEMY PACIFIED.@
>START ENERGY ABSORPTION.\
name ""
goto *gigantweapon_h



*gigantweapon_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\lilith_ct02.bmp",0,0
lsp 695,":a;chara\gigantweapon_bk05.bmp",0,0
gosub *syasei2
>As the Giganto Weapon's tentacles rub against Luka's body, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2637,%2637+1:if %2637=1 mov %count_koenemy,%count_koenemy+1
if %2637>%count_most mov %count_most,%2637:mov $count_mostname,$name
count 10,4
mov $bad1,"The Giganto Weapon forced Luka to come using her tentacles."
gosub *face2
name $name
>ENEMY PACIFIED.@
>START ENERGY ABSORPTION.\
name ""
csp 690:print 10,500
goto *gigantweapon_h



*gigantweapon_h3

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\gigantweapon_h2.bmp",0,0
gosub *syasei2
>As Luka's squeezed inside the Giganto Weapon's tail, he comes, shooting semen into her.\
mov %viclose,1:gosub *lose
mov %2637,%2637+1:if %2637=1 mov %count_koenemy,%count_koenemy+1
if %2637>%count_most mov %count_most,%2637:mov $count_mostname,$name
count 2,4
mov $bad1,"Luka was forced to come by the Giganto Weapon's tail."
gosub *face2
name $name
>ENEMY PACIFIED.@
>CONTINUE ENERGY ABSORPTION.\
name ""
goto *gigantweapon_h



*gigantweapon_h

mov %skill01,15
mov $bad2,"Luka's semen was extracted by the Giganto Weapon's tail until his death."
if %2637=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 goto *gigantweapon_hb
name "Luka"
>Ahh...\
name ""
dwave 1,"se\ero_buchu1.ogg"
cspl 690,699
lsp 700,":a;chara\gigantweapon_st11.bmp",0,0:print 10,500
lsp 700,":a;chara\gigantweapon_st21.bmp",0,0:print 10,500
>The Giganto Weapon's tail opens, revealing a mouth.@
>I helplessly watch as it approaches me.\
dwave 1,"se\ero_makituki3.ogg"
mov %hseanwave,21:hseanwave
cspl 690,699
lsp 700,":a;chara\gigantweapon_h1.bmp",0,0:print 10,500
>In the next moment, my body is pulled into it!\
name "Luka"
>Ahhh...\
name ""
>The slimy walls of her tail rub against me as she pulls me inside.@
>But her tail starts to quickly suck and squeeze me, almost as if she's trying to suck energy out right from my body.\
>The Giganto Weapon emotionlessly looks on as I'm left stunned by the sudden pleasure.\
name $name
>TARGET INSERTION COMPLETE.@
>BEGIN ENERGY ABSORPTION.\
name ""
lsp 700,":a;chara\gigantweapon_h2.bmp",0,0:print 10,500
>A tongue shoots out from her mouth, and forces itself into my mouth.@
>Almost as if she was raping me with her tongue, the warm organ runs around my mouth.\
>A strange warmth flows from my body as it feels like I could melt away in her deep kiss.\
>She must be absorbing energy from my mouth...@
>Even though I know what she's doing, I'm too weak to stop her.\
name "Luka"
>Haaa...\
name ""
name $name
>ENERGY REPLENISHMENT COMPLETE.@
>BEGIN SEMEN EXTRACTION.\
name ""
goto *gigantweapon_hb



*gigantweapon_hb

name "Luka"
>Ahhhh!\
name ""
mov %hseanwave,22:hseanwave
>Suddenly I feel something squirming around me.@
>A large tentacle comes up from deeper inside her, and wraps itself around my lower body.\
>It slowly coils up over more of my body, as her slimy walls start to squirm and wriggle around me.\
>It's almost like a vagina... As if my entire body is stuck inside a giant vagina.\
name "Luka"
>Hyaa!\
name ""
>More than anywhere else, I can feel her rubbing right against my penis.@
>As soon as the tentacle rubs against it once, the tip of it starts to coil around my penis and squeeze.\
name $name
>CONCENTRATE ON PENIS.\
name ""
name "Luka"
>Ahhh...!\
name ""
>Her tentacle starts to stroke me inside of her, with her lifeless words announcing her intentions at the same time.\
>Helplessly squirming inside her tail, I just pathetically moan as her emotionless actions force me to come.\
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\gigantweapon_h3.bmp",0,0
gosub *syasei2
>I explode inside her giant tail.@
>Defeated, my body relaxes as I soak in the afterglow of the orgasm.\
name $name
>EJACULATION CONFIRMED.@> CONTINUE EXTRACTION.\
name ""
name "Luka"
>Haaa...\
name ""
>The Giganto Weapon's tongue continues forcing itself around inside my mouth, mysteriously sucking out my energy at the same time.\
>At the same time, her giant tail continues squeezing and massaging my body, drowning me in ecstasy.\
>It feels like my whole body is just being soaked in pleasure, with no escape from it no matter which direction I turn.\
name "Luka"
>Haaa...\
name ""
>With no hope of escape, my despair is quickly replaced by bursts of pleasure.\
>As I slowly start to just entrust myself to the pleasure, I feel my lower body start to ache.\
name "Luka"
>Ahh... Again... Coming...\
name ""
>Not even bothering to fight against it, I just let myself come.\
gosub *syasei1
lsp 700,":a;chara\gigantweapon_h4.bmp",0,0
gosub *syasei2
>I come inside her again, shooting more of the semen she uses as nourishment right into her tail.\
>How could it ever feel this good to be squeezed for food while still alive?\
name "Luka"
>Haa...\
name ""
>The Giganto Weapon's tongue starts to wrap itself around my tongue, as she uses the tip of it to rub against the rest of my mouth.\
>This kiss is draining my energy... But I can't bring myself to hate it.\
>I'm just simply wrapped up in a giant sexual organ... Every part of her is devoted to making me tremble in ecstasy.\
name "Luka"
>Haa... Ahh...\
name ""
name $name
>NO ISSUES DETECTED.@
>CONTINUE NORMAL OPERATIONS.\
name ""
>Without changing or tiring, she just continues squeezing on me inside her tail.\
>If she keeps forcing me to come and draining my energy like this, my life is going to be in danger...@
>Even though my instinct is warning me of the danger, I just continue shaking in pleasure.\
name "Luka"
>Ahh... Again...\
name ""
gosub *syasei1
lsp 700,":a;chara\gigantweapon_h5.bmp",0,0
gosub *syasei2
>After my multiple orgasms, my semen is just barely leaking out with each orgasm.\
name "Luka"
>Haa...\
name ""
>There's almost no energy left in me for her to squeeze out...@
>Too weak to even move my body, I just wait for the end.\
name $name
>CONTINUE EXTRACTION.\
name ""
>The Giganto Weapon's tongue moves out of my mouth for a moment, and starts to lick my face clean.\
>Running around my face, she methodically makes sure every ounce of energy is sucked out of me into her.\
lsp 700,":a;chara\gigantweapon_h6.bmp",0,0:print 10,500
name $name
>TARGET ALMOST EMPTY.@
>SHIFTING TO FINAL STAGE.\
name ""
>The Giganto Weapon's tail suddenly tightens around me, as if trying to forcefully squeeze everything right out.\
name "Luka"
>Ahh...\
name ""
>Almost like my body was just a simple tube of gel, she squeezes me from head to toe, forcing out the last drops of energy.\
gosub *syasei1:gosub *syasei2
>Wrapped in ecstasy, I come for a final time as I fade into darkness.\
gosub *anten
mov %hseanwave,0:hseanwave
name $name
>EXTRACTION COMPLETE.@> EJECT CORPSE.\
name ""
>Thus, another boy loses his life at the hands of an ancient biological weapon.\
>With a smile on his face, his life ended as his energy was emotionlessly extracted...\
>...............\
goto *badend



*arumaeruma3_start

mov $name,"Alma Elma"
mov $name2,"Alma Elma"
mov $lavel,"arumaeruma3"
mov $tatie1,"arumaeruma_st21"
mov $tatie2,"arumaeruma_st22"
mov $tatie3,"arumaeruma_st23"
mov $tatie4,"arumaeruma_st22"
mov $haikei,"bg047"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,15000
if %nanido=2 mov %max_enemylife,20000
if %nanido=3 mov %max_enemylife,25000
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,10
if %nanido=3 mov %earth_keigen,5
mov %music,11
mov %tikei,0
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But with her tail around him like this, Luka can't attack!"
mov $mogaku_dassyutu1,"Oh my, did you escape?"
mov $mogaku_dassyutu2,"I was going to squeeze you until you were dry, though..."
mov $mogaku_earth_dassyutu1,"It looks like you're quite good at using the power of the earth."
mov $mogaku_earth_dassyutu2,"But not as well as Tamamo."
mov $half_s1,"What's wrong? Are you feeling good?"
mov $half_s2,"Why don't you just let me squeeze out that cute semen of yours, Luka-boy? "
mov $kiki_s1,"You're almost at your limit, aren't you?"
mov $kiki_s2,"Do you want me to use my hand? Or my mouth? Or...?"
mov %end_n,9
mov %exp_minus,470025
mov %zmonster_x,-270
mov %tukix,320
name $name
>So I'll be your first opponent.@
>Just like I said before, I want to play with you...\
>With my hands...@> With my mouth...@>With my breasts...@> With my pussy...\
>I want to feel Luka-boy's penis with every part of my body. \
name ""
name "Luka"
>Guh...!\
name ""
>My heart is almost shaken by her seductive nature.@
>But I quickly regain my composure, and fight off the thoughts.\
name $name
>By the way, I heard you awoke to a serene mind...@
>I wonder which of us is faster?@>Don't you just want to find out?\
name ""
name "Luka"
>As usual, always playing around...\
>But that isn't a skill to use right from the start!@
>It takes a lot of concentration to calm---\
name ""
name $name
>I don't like difficult strategies like that.@
>Let's ignore all that, and just go right to the fun. \
name ""
mov %sinkou,1
goto *common_main



*arumaeruma3001

name "Luka"
>Guh... I can't hit her after all!?\
name ""
name $name
>That serene state...@> Won't you show it to me?@
>Or would you rather just play with me?\
name ""
return



*arumaeruma3002

name $name
>Hmmm... So that's it?@
>You look funny swaying like that, Luka-boy. \
>Let me try. \
name ""
skillname "Melty Hand"
dwave 1,"se\ero_koki1.ogg"
>Alma Elma quickly grabs Luka's penis and strokes it!\
>Luka can't evade in time!
skillcount2 3630
if %nanido<2 damage 150,170
if %nanido=2 damage 150,170
if %nanido=3 damage 150,170
skillname ""
if %mylife=0 goto *arumaeruma3_h1
bgmstop
bg "BG\"+$haikei+".bmp",10,1500
mov %aqua,0
mov %aqua_end,0
gosub *elm_print
bgm "bgm\yonseirei2.ogg"
name "Luka"
>Ah...!\
name ""
>Her speed is insane...@
>She grabs me before I can dodge, on nothing but quickness alone!\
name $name
>Oh my... It seems my wind is faster than your water.\
>Even if you can read the flow of my movements, it doesn't help if I can still move faster than you.\
>Our speeds are too different, so you'll never be able to evade me.\
name ""
name "Luka"
>N...No way...!\
name ""
>Even what I thought was my perfect evasion is useless before her speed...@
>I have to find another way to win!\
mov %sinkou,2
goto *common_main



*arumaeruma3003

name $name
>You're a lot better than you were before...@
>But you still can't use that wind of yours well, Luka-boy.\
>Can't you hear the wind crying...?@
>It wants to play with you so badly, but you're just ignoring it...\
name ""
name "Luka"
>............\
name ""
>I focus on the voice of the wind again.\
>As I listen to its faint whisperings, I finally realize what it has been telling me this whole time.\
lsp2 0,":a;chara\sylph_st01.bmp",250,300,100,100,0,200
gosub *syoukan_effect
name "Sylph"
>...I'll try harder!@
>As long as I'm with Luka, I can try my best!\
>So believe in me, Luka!@
>Listen to my voice, and go crazy with me!\
name ""
name "Luka"
>Yeah... Got it.@
>I'll run with the wind together with you, Sylph!\
name ""
name $name
>Hehe... So you can hear it now?@
>Now come on, we'll both play with the wind.\
>Let's have a contest seeing who's faster. \
name ""
>Alma Elma giggles with excitement.\
mov %skill02,3
mov %sinkou,3
if %wind>0 mov %wind,0:mov %wind_turn,0:gosub *elm_print
goto *common_main



*arumaeruma3004

name "Luka"
>I...Incredible...@
>This is the true power of the wind...!\
name ""
>It feels like my body itself became the wind.@
>As if I could move anywhere, and run through anything in an instant!\
name $name
>Then shall we see who's faster?@
>I want to see if Luka-boy is just as quick as I expect. \
name ""
skillname "Melty Hand"
dwave 1,"se\ero_koki1.ogg"
>Alma Elma reaches out toward Luka's penis!
wait 500
skillname "Extreme Wind"
dwave 3,"se\miss_wind.ogg"
wait 500
textclear
>But Luka moves like the wind and dodges!\
skillname ""
name $name
>Hehe... It seems like we're about even.\
name ""
>I can finally see her movements.@
>Not only that, but I can keep up with her, too.\
>With this, I think we're finally on equal terms!\
mov %sinkou,4
goto *common_main



*arumaeruma3005

lsp 700,":a;chara\arumaeruma_st23.bmp",0,0:print 10,500
name $name
>Ouch...@
>You hit me...?\
lsp 700,":a;chara\arumaeruma_st21.bmp",0,0:print 10,500
>Not bad, Luka-boy.@
>You seem to be just as strong as I am now. \
name ""
>Alma Elma laughs, and dusts the dirt off her mantle.\
name $name
>Oh well...@
>There's three more after me, so I'll give this victory to you.\
name ""
>Alma laughs as she nonchalantly surrenders.\
>This is just like before...@
>She's just handing me the victory without a care.\
name "Luka"
>...You always surrender quickly, Alma.\
name ""
lsp 700,":a;chara\arumaeruma_st23.bmp",0,0:print 10,500
name $name
>Oh, is that so...?\
name ""
name "Luka"
>...Before the fight, you said you would be my "first opponent".@
>Someone planning on winning wouldn't have said "first".\
>Were you planning on losing right from the very start?@
>To surrender whenever you saw a chance to do it?\
>You're always playing around, never taking anything seriously...@
>Your wind is empty, and has no meaning.\
name ""
if %ivent08=0 mov $sel1,"Just like on the ship..."
if %ivent08=1 mov $sel1,"Just like on the ship, and in the Colosseum..."
eng $sel1:$sel6\
>Even like Alice's story about the fight for the Monster Lord's seat...@
>Alma is always just giving up.\
>As if she never wants to be in an actual fight...\
name "Luka"
>Even though you're so strong, why are you so scared of fighting?@
>Do you hate fighting seriously that much?\
name ""
name $name
>...............\
name ""
>Alma's eyebrows raise in slight surprise.@
>It's the first time I've ever seen this reaction out of her...\
name "Alma Elma"
>...What are you trying to say, Luka-boy?\
name ""
name "Luka"
>...I won't accept a victory like that.\
>I must make you accept me!@
>That's why I'm fighting!\
>So you have to fight seriously too, Alma!@
>I won't let you cut any corners this time!\
name ""
lsp 700,":a;chara\arumaeruma_st21.bmp",0,0:print 10,500
name "Alma Elma"
>.............\
>Hmm... Aren't you the little Hero.@
>You've become something great, Luka-boy...\
lsp 700,":a;chara\arumaeruma_st22.bmp",0,0:print 10,500
>...No, Hero Luka.\
name ""
mov %owaza_count1a,7
mov %owaza_count1b,7
mov %owaza_count2a,7
mov %owaza_count3a,7
mov $tatie1,"arumaeruma_st51"
mov $tatie2,"arumaeruma_st52"
mov $tatie3,"arumaeruma_st53"
mov $tatie4,"arumaeruma_st52"
dwave 1,"se\escape.ogg"
lsp 700,":a;chara\arumaeruma_st52.bmp",0,0:print 10,500
>Alma Elma calmly takes off her clothes!\
mov %music,4
bgm "bgm\sitenno.ogg"
name "Alma Elma"
>If you're going to go that far...@>Shall I fight you seriously?@
>Me as the Queen Succubus, and you as the Hero!?\
name ""
name "Luka"
>Just as I wanted.@>Come!\
name ""
>I point my sword at her again.\
>As soon as she took her clothes off, an overpoweringly sweet smell filled the air.\
>The slightly cold atmosphere warms up, and I feel my head start to spin.\
>This is the true power of Alma Elma... The Queen Succubus!\
lsp 560,":a;system\gager100.bmp",114,556
mov %mylife,%max_mylife:mov %mp,%max_mp
gosub *hp:gosub *mp
mov %sel_hphalf,0
mov %sel_kiki,0
mov $half_s1,"Do you want me to bring you to heaven soon?"
mov $half_s2,"I'll show you to a world of unmatched pleasure..."
mov $kiki_s1,"I'll make you fall into a world of pleasure..."
mov $kiki_s2,"You'll writhe in ecstasy, and go insane in bliss..."
mov %sinkou,5
gosub *face1
goto *common_main



*arumaeruma3_v

mov $tatie3,"arumaeruma_st53"
gosub *face3
name $name
>...It's my loss this time.@
>I fought seriously as the Queen Succubus.\
name ""
>Alma Elma drops to her knees!\
mov %viclose,1:gosub *victory
mov %getexp,300000:gosub *lvup
mov %2338,1
mov %skill02,3
goto *sean0297



*arumaeruma3_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
if %sinkou=5 skip 4
>Aha, giving up?@
>Then let's have some fun. \
skip 3
>Hehe... Already surrendering?@
>Then accept your fate as the loser without complaining...\
name ""
goto *arumaeruma3_a



*arumaeruma3_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 && %nanido=0 goto *common_attack
if %cmd1=11 && %wind=3 goto *common_attack
if %cmd1=11 && %wind<3 goto *arumaeruma3_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *arumaeruma3_kousan
if %cmd1=16 && %sinkou<5 goto *arumaeruma3_onedari
if %cmd1=16 && %sinkou=5 goto *arumaeruma3_onedarib
if %cmd1=17 && %nanido=0 goto *common_skill
if %cmd1=17 && %wind=3 goto *common_skill
if %cmd1=17 && %wind<3 goto *arumaeruma3_skill
goto *arumaeruma3_main



*arumaeruma3_attack

if %aqua=2 mov %before_action,4:mov %skill_sub,1:gosub *common_attack1:skip 12
mov %before_action,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ha!"
if %ransu=2 mov $sel1,"Hya!"
if %ransu=3 mov $sel1,"Orya!"
name "Luka"
eng $sel1:$sel6\
name ""
mov %skill_sub,1
gosub *common_attack2
gosub *mp_kaihuku:gosub *mp
dwave 2,"se\miss_wind.ogg"
csp 700:print 1
>But like a leaf in the wind, Alma Elma dodges!\
gosub *face1
if %aqua=2 skillname ""
if %sinkou=1 gosub *arumaeruma3001
goto *arumaeruma3_a



*arumaeruma3_skill

gosub *cmd_skill
if %cmd1=24 goto *skill4
if %cmd1=26 goto *arumaeruma3_skillx1
if %cmd1=27 goto *arumaeruma3_skillx1
if %cmd1=28 goto *arumaeruma3_skillx1
if %cmd1=29 goto *skill15
if %cmd1=30 goto *arumaeruma3_skillx1
if %cmd1=31 && %skill02=2 goto *skill7b
if %cmd1=31 && %skill02=3 goto *skill7c
if %cmd1=32 goto *skill8b
if %cmd1=33 goto *skill10b
if %cmd1=34 goto *skill14b
if %cmd1=35 goto *skill17
if %cmd1=-1 goto *arumaeruma3_main
goto *arumaeruma3_skill



*arumaeruma3_skillx1

if %cmd1=26 mov %skill_sub,1:gosub *skill11:skip 4
if %cmd1=27 mov %skill_sub,1:gosub *skill12:skip 3
if %cmd1=28 mov %skill_sub,1:gosub *skill13:skip 2
if %cmd1=30 mov %skill_sub,1:gosub *skill16
mov %skill_sub,0
dwave 2,"se\miss_wind.ogg"
csp 700:print 1
>But like a leaf in the wind, Alma Elma dodges!\
gosub *face1
skillname ""
if %sinkou=1 gosub *arumaeruma3001
goto *arumaeruma3_a



*arumaeruma3_a

if %sinkou=1 && %aqua=2 goto *arumaeruma3002
if %sinkou=2 && %kousan=0 && %aqua=0 goto *arumaeruma3003
if %sinkou=3 && %wind=3 goto *arumaeruma3004
if %sinkou=4 && %wind=3 && %before_action<40 goto *arumaeruma3005
if %sinkou<5 rnd2 %ransu,1,3
if %sinkou<5 && %ransu=1 gosub *arumaeruma3_a1:goto *common_main
if %sinkou<5 && %ransu=2 gosub *arumaeruma3_a2:goto *common_main
if %sinkou<5 && %ransu=3 gosub *arumaeruma3_a3:goto *common_main
if %sinkou<5 skip -4
if %kousoku=1 gosub *arumaeruma3_a10:goto *common_main
if %kousoku=2 && %before_action<40 gosub *arumaeruma3_a12:goto *common_main
if %kousoku=2 && %before_action>40 gosub *arumaeruma3_a14:goto *common_main
rnd2 %ransu,1,7
if %ransu=1 gosub *arumaeruma3_a4:goto *common_main
if %ransu=2 gosub *arumaeruma3_a5:goto *common_main
if %ransu=3 gosub *arumaeruma3_a6:goto *common_main
if %ransu=4 && %owaza_count3a>8 gosub *arumaeruma3_a7:goto *common_main
if %ransu=5 && %owaza_count2a>8 && %status=0 gosub *arumaeruma3_a8:goto *common_main
if %ransu=6 && %owaza_count1a>8 gosub *arumaeruma3_a9:goto *common_main
if %ransu=7 && %owaza_count1b>8 gosub *arumaeruma3_a11:goto *common_main
skip -8



*arumaeruma3_a1

add %stack,1
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hehe... Are you going to dirty my hand with that semen of yours?":mov $sel2,"Alma Elma slowly strokes Luka's penis!"
if %ransu=2 mov $sel1,"I can't help but want to tease it. ":mov $sel2,"Alma Elma makes a ring with her two fingers, and strokes the tip of Luka's penis!"
if %ransu=3 mov $sel1,"Hehe... It feels nice, right?":mov $sel2,"Alma Elma softly squeezes Luka's penis!"
if %ransu=4 mov $sel1,"Go ahead and come. ":mov $sel2,"Alma Elma lovingly caresses the tip of Luka's penis!"
if %ransu=5 mov $sel1,"Hehe... It feels the best here, doesn't it?":mov $sel2,"Alma Elma gently rubs her finger up and down the back of Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Melty Hand"
dwave 1,"se\ero_koki1.ogg"
>Alma Elma reaches out toward Luka's penis!
if %wind=2 && %nanido<2 mov %wind_kakuritu,0
if %wind=2 && %nanido=2 mov %wind_kakuritu,0
if %wind=2 && %nanido=3 mov %wind_kakuritu,0
if %wind=3 && %nanido<2 mov %wind_kakuritu,100
if %wind=3 && %nanido=2 mov %wind_kakuritu,100
if %wind=3 && %nanido=3 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
eng $sel2:$sel6\
skillcount2 3630
if %nanido<2 damage 150,170
if %nanido=2 damage 150,170
if %nanido=3 damage 150,170
skillname ""
if %mylife=0 sub %stack,1:return *arumaeruma3_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*arumaeruma3_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hehe... Luka-boy's penis tastes so good. ":mov $sel2,"Alma Elma sucks on Luka's penis!"
if %ransu=2 mov $sel1,"I'll lick the tip.":mov $sel2,"Alma Elma licks the tip of Luka's penis!"
if %ransu=3 mov $sel1,"Your penis feels good, doesn't it?":mov $sel2,"Alma Elma's soft lips glide up and down Luka's penis!"
if %ransu=4 mov $sel1,"Nnn... I'll suck out Luka-boy's semen. ":mov $sel2,"Alma Elma tightens her lips around Luka's penis!"
if %ransu=5 mov $sel1,"Go ahead and come inside my mouth. ":mov $sel2,"Alma Elma uses her mouth to pump Luka like a piston!"
name $name
eng $sel1:$sel6\
name ""
skillname "Sweet Fellatio"
dwave 1,"se\ero_buchu3.ogg"
>Alma Elma sucks Luka's penis into her mouth!
if %wind=2 && %nanido<2 mov %wind_kakuritu,0
if %wind=2 && %nanido=2 mov %wind_kakuritu,0
if %wind=2 && %nanido=3 mov %wind_kakuritu,0
if %wind=3 && %nanido<2 mov %wind_kakuritu,100
if %wind=3 && %nanido=2 mov %wind_kakuritu,100
if %wind=3 && %nanido=3 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
eng $sel2:$sel6\
skillcount2 3631
if %nanido<2 damage 160,180
if %nanido=2 damage 160,180
if %nanido=3 damage 160,180
skillname ""
if %mylife=0 sub %stack,1:return *arumaeruma3_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*arumaeruma3_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll make you feel good with my tail. "
if %ransu=2 mov $sel1,"I'll massage you, Luka-boy. "
if %ransu=3 mov $sel1,"I know how much you love my tail. "
name $name
eng $sel1:$sel6\
name ""
skillname "Tail Caress"
dwave 1,"se\ero_slime1.ogg"
>Alma Elma's tail rubs against Luka's penis!
if %wind=2 && %nanido<2 mov %wind_kakuritu,0
if %wind=2 && %nanido=2 mov %wind_kakuritu,0
if %wind=2 && %nanido=3 mov %wind_kakuritu,0
if %wind=3 && %nanido<2 mov %wind_kakuritu,100
if %wind=3 && %nanido=2 mov %wind_kakuritu,100
if %wind=3 && %nanido=3 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3632
if %nanido<2 damage 150,170
if %nanido=2 damage 150,170
if %nanido=3 damage 150,170
skillname ""
if %mylife=0 sub %stack,1:return *arumaeruma3_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*arumaeruma3_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My hand skills will make you writhe..."
if %ransu=2 mov $sel1,"No man can endure my finger..."
if %ransu=3 mov $sel1,"What do you think? This is a Queen Succubus' hand technique..."
name $name
eng $sel1:$sel6\
name ""
skillname "Ancient Succubus Way: Snake"
eng "All ten of Alma Elma's fingers run up and down Luka's penis!":$sel6/
;if %aqua>1 gosub *aqua_guard:sub %stack,1:return									;patch
if %wind=3 && %nanido<2 mov %wind_kakuritu,30
if %wind=3 && %nanido=2 mov %wind_kakuritu,25
if %wind=3 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
dwave 1,"se\ero_koki1.ogg"
>Her fingers climb up and down Luka's penis like snakes!
skillcount2 3633
if %nanido<2 damage 90,110
if %nanido=2 damage 97,117
if %nanido=3 damage 104,124
dwave 1,"se\ero_koki1.ogg"
>Her ten fingers coil around his penis!
if %nanido<2 damage 90,110
if %nanido=2 damage 97,117
if %nanido=3 damage 104,124
dwave 1,"se\ero_koki1.ogg"
>Like that, she starts to squeeze on him!
if %nanido<2 damage 90,110
if %nanido=2 damage 97,117
if %nanido=3 damage 104,124
skillname ""
if %mylife=0 sub %stack,1:return *arumaeruma3_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*arumaeruma3_a5

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Have a good taste of a Queen Succubus' mouth skills..."
if %ransu=2 mov $sel1,"I can suck it out whether you want me to or not..."
if %ransu=3 mov $sel1,"I'll suck you into submission..."
name $name
eng $sel1:$sel6\
name ""
skillname "Romanus Teri Spirit"
dwave 1,"se\ero_buchu3.ogg"
eng "Alma Elma sucks Luka's penis into her mouth!":$sel6/
;if %aqua>1 gosub *aqua_guard:sub %stack,1:return									;patch
if %wind=3 && %nanido<2 mov %wind_kakuritu,30
if %wind=3 && %nanido=2 mov %wind_kakuritu,25
if %wind=3 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3634
>Her tongue runs all over Luka's penis!
if %nanido<2 damage 100,120
if %nanido=2 damage 107,127
if %nanido=3 damage 114,134
dwave 1,"se\ero_buchu3.ogg"
>Alma Elma's soft tongue squeezes Luka's penis!
if %nanido<2 damage 100,120
if %nanido=2 damage 107,127
if %nanido=3 damage 114,134
dwave 1,"se\ero_buchu3.ogg"
>Alma Elma sucks hard on Luka's penis as her tongue coils around it!
if %nanido<2 damage 100,120
if %nanido=2 damage 107,127
if %nanido=3 damage 114,134
skillname ""
if %mylife=0 sub %stack,1:return *arumaeruma3_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*arumaeruma3_a6

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Even my breasts are a weapon..."
if %ransu=2 mov $sel1,"My breasts bring a dreamlike pleasure with them..."
if %ransu=3 mov $sel1,"I'll drown you in my breasts..."
name $name
eng $sel1:$sel6\
name ""
skillname "Melo Sophie Tellus"
dwave 1,"se\ero_koki1.ogg"
eng "Alma Elma squeezes Luka's penis between her large breasts!":$sel6/
;if %aqua>1 gosub *aqua_guard:sub %stack,1:return									;patch
if %wind=3 && %nanido<2 mov %wind_kakuritu,30
if %wind=3 && %nanido=2 mov %wind_kakuritu,25
if %wind=3 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>The marshmallow like touch surrounds Luka from every direction!
skillcount2 3635
if %nanido<2 damage 110,130
if %nanido=2 damage 117,137
if %nanido=3 damage 124,144
dwave 1,"se\ero_koki1.ogg"
>Alma Elma slowly squeezes her breasts together around Luka's penis!
if %nanido<2 damage 110,130
if %nanido=2 damage 117,137
if %nanido=3 damage 124,144
dwave 1,"se\ero_koki1.ogg"
>Like that, she shakes her chest side to side, bouncing Luka's penis around between her breasts!
if %nanido<2 damage 110,130
if %nanido=2 damage 117,137
if %nanido=3 damage 124,144
skillname ""
if %mylife=0 sub %stack,1:return *arumaeruma3_h6
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*arumaeruma3_a7

add %stack,1
mov %owaza_count3a,0
name $name
>Writhe in pleasure filled agony with my secret skill!\
name ""
skillname "Succubus Ceremony"
eng "Alma Elma grabs Luka from behind!":$sel6/
;if %aqua>1 gosub *aqua_guard:sub %stack,1:return									;patch
if %wind=3 && %nanido<2 mov %wind_kakuritu,25
if %wind=3 && %nanido=2 mov %wind_kakuritu,20
if %wind=3 && %nanido=3 mov %wind_kakuritu,12
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3636
dwave 1,"se\ero_koki1.ogg"
>Grabbing Luka from behind, she starts to stroke him!
if %nanido<2 damage 90,110
if %nanido=2 damage 93,113
if %nanido=3 damage 96,116
dwave 1,"se\ero_paizuri.ogg"
>Quickly knocking Luka to the ground, she places his penis between her breasts, and squeezes!
if %nanido<2 damage 90,110
if %nanido=2 damage 93,113
if %nanido=3 damage 96,116
dwave 1,"se\ero_sigoki1.ogg"
>As Luka tries to get back up, Alma Elma quickly jumps up and steps on his penis, forcing him back to the ground!
if %nanido<2 damage 90,110
if %nanido=2 damage 93,113
if %nanido=3 damage 96,116
dwave 1,"se\ero_koki1.ogg"
>Just like that, she presses down harder with her foot!
if %nanido<2 damage 90,110
if %nanido=2 damage 93,113
if %nanido=3 damage 96,116
dwave 1,"se\ero_simetuke2.ogg"
>Bending down over him, she squeezes Luka's penis with the back of her knee!
if %nanido<2 damage 90,110
if %nanido=2 damage 93,113
if %nanido=3 damage 96,116
dwave 1,"se\ero_sigoki1.ogg"
>As she squeezes him with the back of her knee, she repositions herself until she can squeeze him between her thighs!
if %nanido<2 damage 90,110
if %nanido=2 damage 93,113
if %nanido=3 damage 96,116
dwave 1,"se\ero_koki1.ogg"
>Shaking side to side, she continues squeezing Luka's penis between her thighs!
if %nanido<2 damage 90,110
if %nanido=2 damage 93,113
if %nanido=3 damage 96,116
skillname ""
if %mylife=0 sub %stack,1:return *arumaeruma3_h7
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*arumaeruma3_a8

add %stack,1
mov %owaza_count2a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Melt away in my kiss..."
if %ransu=2 mov $sel1,"I'll take away your heart..."
if %ransu=3 mov $sel1,"Your heart is mine..."
name $name
eng $sel1:$sel6\
name ""
skillname "Meltic Kiss"
dwave 1,"se\ero_chupa2.ogg"
eng "Alma Elma presses her lips against Luka's!":$sel6/
;if %aqua>1 gosub *aqua_guard:sub %stack,1:return									;patch
if %wind=3 && %nanido<2 mov %wind_kakuritu,100
if %wind=3 && %nanido=2 mov %wind_kakuritu,90
if %wind=3 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>The sweet sensation from her kiss spreads through Luka's body!
skillcount2 3637
if %nanido<2 damage 150,170
if %nanido=2 damage 170,190
if %nanido=3 damage 190,210
if %status=0 mov $sel1,"Luka was put into a trance!"
if %status=1 mov $sel1,"Luka is in a trance..."
mov %status,1:gosub *status_print
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *arumaeruma3_h8
if %kousan=2 sub %stack,1:return
name "Luka"
>Haa...\
name ""
name $name
>It feels good, doesn't it?@
>Let me make it even better...\
name ""
rnd2 %status_turn,3,4
if %nanido=2 rnd2 %status_turn,4,5
if %nanido=3 rnd2 %status_turn,5,6
sub %stack,1
return



*arumaeruma3_a9

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 7
name $name
if %first_sel1=1 skip 3
>I'll make you writhe in ecstasy with my tail...\
skip 2
>You won't be able to escape from my tail forever...\
name ""
skillname "Tail Bind"
dwave 1,"se\ero_makituki3.ogg"
eng "Alma Elma's tail coils around Luka's body!":$sel6/
;if %aqua>1 gosub *aqua_guard:sub %stack,1:return									;patch
if %wind=3 && %nanido<2 mov %wind_kakuritu,15
if %wind=3 && %nanido=2 mov %wind_kakuritu,10
if %wind=3 && %nanido=3 mov %wind_kakuritu,7
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
mov $tatie4,"arumaeruma_st52"
mov %kousoku,1:gosub *status_print
>Luka has been bound by Alma Elma's tail!\
skillname ""
name $name
>Now... I'm going to devour that penis of yours with my tail.@
>I'll suck on it so hard, you'll be left completely dry...\
name ""
skillname "Tail Drain: Reterra"
dwave 1,"se\ero_syokusyu1.ogg"
lsp 690,":a;chara\arumaeruma_ct01.bmp",500,0:print 10,1000
lsp 690,":a;chara\arumaeruma_ct02.bmp",500,0:print 10,500
lsp 690,":a;chara\arumaeruma_ct03.bmp",500,0:print 10,500
lsp 690,":a;chara\arumaeruma_ct04.bmp",500,0:print 10,500
>The tip of Alma Elma's tail opens, sucking in Luka's penis!
skillcount2 3638
if %nanido<2 damage 120,140
if %nanido=2 damage 127,147
if %nanido=3 damage 134,154
skillname ""
if %mylife=0 sub %stack,1:return *arumaeruma3_h9
if %kousan=2 sub %stack,1:return
name $name
if %first_sel1=1 skip 4
>Hehe, it feels good, doesn't it?@
>I'll make you come, just like this...\
skip 2
>Can you resist this pleasure again...?\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,3
if %earth=0 && %nanido=2 mov %genmogaku,3
if %earth=0 && %nanido=3 mov %genmogaku,4
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
mov $mogaku_sel1,"You can't escape from my tail that easily..."
mov $mogaku_sel2,"Give yourself over to me..."
mov $mogaku_sel3,"I wonder if you just want to be squeezed as you struggle...?"
mov $mogaku_sel4,"Just give up... Then you'll get to enjoy it."
mov $mogaku_sel5,"No matter how hard you struggle, you won't escape from my tail..."
sub %stack,1
return



*arumaeruma3_a10

add %stack,1
>Luka's penis is stuck inside Alma Elma's tail...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll squeeze out all of your semen with my tail..."
if %ransu=2 mov $sel1,"Hehe... Indulge yourself in the pleasure."
if %ransu=3 mov $sel1,"I'll squeeze out all your semen... Until you're dry..."
name $name
eng $sel1:$sel6\
name ""
skillname "Tail Drain: Reterra"
dwave 1,"se\ero_syokusyu1.ogg"
>Alma Elma's tail gets smaller, squeezing Luka's penis!
skillcount2 3638
if %nanido<2 damage 120,140
if %nanido=2 damage 127,147
if %nanido=3 damage 134,154
dwave 1,"se\ero_syokusyu3.ogg"
>Her tail vibrates, forcing pleasure into Luka!
if %nanido<2 damage 120,140
if %nanido=2 damage 127,147
if %nanido=3 damage 134,154
dwave 1,"se\ero_syokusyu2.ogg"
>Alma Elma's tail shrinks further, rubbing hard against Luka's penis as it vibrates!
if %nanido<2 damage 120,140
if %nanido=2 damage 127,147
if %nanido=3 damage 134,154
skillname ""
if %mylife=0 sub %stack,1:return *arumaeruma3_h9
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*arumaeruma3_a11

add %stack,1
mov %owaza_count1b,0
mov %owaza_num1,2
if %kousan=2 skip 4
name $name
>Shall I make you into my prey now...?\
name ""
skillname "Succubus Hold"
eng "Alma Elma pushes Luka down, and jumps on top of him!":$sel6/
;if %aqua>1 gosub *aqua_guard:sub %stack,1:return									;patch
if %wind=3 && %nanido<2 mov %wind_kakuritu,15
if %wind=3 && %nanido=2 mov %wind_kakuritu,10
if %wind=3 && %nanido=3 mov %wind_kakuritu,7
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
mov $tatie4,"arumaeruma_hd0"
mov %kousoku,2:gosub *status_print
>Alma Elma is tightly embracing Luka!\
skillname ""
if %kousan=2 sub %stack,1:return
name $name
if %first_sel2=1 skip 6
>Now I'm going to rape you...@
>If you don't resist, I'll lead you into a hell of endless pleasure.\
>If you resist, I'll squeeze you dry without mercy.@
>Now... What are you going to do?\
skip 3
>Are you going to thrust me aside again...?@
>Or drown in pleasure?\
name ""
mov %first_sel2,1
if %earth=0 && %nanido<2 mov %genmogaku,1
if %earth=0 && %nanido=2 mov %genmogaku,1
if %earth=0 && %nanido=3 mov %genmogaku,1
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
mov $mogaku_sel1,"If that's your choice, I'll never let you go free again..."
mov $mogaku_sel2,"If that's your choice, I'll never let you go free again..."
mov $mogaku_sel3,"What a poor decision..."
mov $mogaku_sel4,"What a poor decision..."
mov $mogaku_sel5,"What a poor decision..."
sub %stack,1
return



*arumaeruma3_a12

add %stack,1
>Alma Elma is riding on top of Luka...\
if %kousan=2 skip 5
name $name
>Fighting to the very end...@
>Oh well, I guess I'll just have to make you submit forcibly.\
name ""
skillname "A Queen's Drain"
dwave 1,"se\ero_pyu1.ogg"
lsp 700,":a;chara\arumaeruma_hd1.bmp",0,0:print 10,500
>Alma Elma drops down, forcing Luka into her warm vagina!
skillcount2 3639
damage 250,300
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
>Luka is being raped by Alma Elma!\
skillname ""
if %mylife=0 sub %stack,1:return *arumaeruma3_h10
sub %stack,1
goto *arumaeruma3_a13



*arumaeruma3_a13

add %stack,1
>Luka is being raped by Alma Elma...\
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck it out nice and slowly...":mov $sel2,"Alma Elma's vagina shrinks around Luka's penis!"
if %ransu=2 mov $sel1,"I'll suck it all out...":mov $sel2,"Alma Elma's vagina vibrates!"
if %ransu=3 mov $sel1,"Come as I tighten around it...":mov $sel2,"Alma Elma tightens her vagina!"
if %ransu=4 mov $sel1,"Hehe... I'll squeeze the tip.":mov $sel2,"Alma Elma's vagina squirms around Luka, stunning him in pleasure!"
name $name
eng $sel1:$sel6\
name ""
skillname "A Queen's Drain"
dwave 1,"se\ero_chupa6.ogg"
eng $sel2:$sel6
skillcount2 3639
mov %damage_kotei,1
damage 250,300
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *arumaeruma3_h11
sub %stack,1
goto *arumaeruma3_a13



*arumaeruma3_a14

add %stack,1
>Alma Elma is riding on top of Luka...\
skillcount2 3640
if %kousan=2 skip 9
name $name
>So you surrender... I'll drown you in a hell of pleasure, then.@
>Depending on how deep you get into my pussy, the stimulation changes.\
>As you go deeper inside me, you'll lose your mind...@
>The ultimate skill, named the Five Step Vaginal Hell...\
>You'll be one of the few who ever gets to taste it...@
>Hehe... I wonder at which stage you'll go mad?\
name ""
skillname "Five Step Vaginal Hell: First Prison"
dwave 1,"se\ero_pyu1.ogg"
lsp 700,":a;chara\arumaeruma_hd1.bmp",0,0:print 10,500
>Alma Elma slowly drops down on Luka, forcing just the tip of his penis into her vagina!
mov %damage_kotei,1
damage 300,350
skillname ""
>Luka is being raped by Alma Elma!\
if %mylife=0 sub %stack,1:return *arumaeruma3_h12
name "Luka"
>Ahhh!\
name ""
name $name
>Hehe... That's just the first step.@
>The deeper you go, the deeper the agonizing pleasure becomes.\
>A little bit deeper, and my pussy curves a little...@
>As your glans rubs against me, you'll spasm in bliss.\
>Here... Enjoy my incredible pussy curve...\
skillname "Five Step Vaginal Hell: Second Prison"
dwave 1,"se\ero_slime1.ogg"
>Alma Elma drops a little lower, forcing Luka deeper inside!\
>The tip of Luka's penis rubs hard against her vagina as it slightly bends!
mov %damage_kotei,1
damage 300,350
skillname ""
if %mylife=0 sub %stack,1:return *arumaeruma3_h13
name "Luka"
>Ahhh...\
name ""
name $name
>Oh my... You didn't come yet?\
>As expected from someone who made it this far...@
>But I wonder how much longer you can last?\
>After the bend comes a hell of folds...@
>I can move every single fold and crease inside my pussy, letting me lick you as if I had a thousand tongues...\
>The moment you taste it, all of your power will drain...\
name ""
skillname "Five Step Vaginal Hell: Third Prison"
dwave 1,"se\ero_name2.ogg"
>Alma Elma slowly drops lower, forcing Luka deeper inside!\
>Thousands of folds rub against the tip of Luka's penis, as if licking him clean!
mov %damage_kotei,1
damage 300,350
skillname ""
if %mylife=0 sub %stack,1:return *arumaeruma3_h13
name "Luka"
>Ah... Ahhh!\
name ""
name $name
>Hehe... You held on somehow.@
>But it only gets stronger from here on out...\
>My vagina gets really small now...@
>We'll have to really force your tip in.\
>Once you make it through, you'll be pressing up right against my deepest part though...\
name ""
skillname "Five Step Vaginal Hell: Fourth Prison"
dwave 1,"se\ero_chupa5.ogg"
>Alma Elma slowly drops lower, forcing Luka deeper inside!\
>After a couple pushes, Luka's tip breaks deeper through Alma Elma's tight vagina!
mov %damage_kotei,1
damage 300,350
skillname ""
if %mylife=0 sub %stack,1:return *arumaeruma3_h13
name "Luka"
>Ah... Urhg...\
name ""
name $name
>Hehe... You endured it all the way to here.\
>But your breath is getting really rough...@
>The next step will finish you off.\
>My cervix is twitching, just waiting for you...@
>I can open it up, and clamp it down around the tip of your penis...\
>Nobody is able to endure this...@
>So just give up, and enjoy!\
name ""
skillname "Five Step Vaginal Hell: Fifth Prison"
dwave 1,"se\ero_makituki3.ogg"
>Alma Elma slowly drops lower, forcing Luka deeper inside!\
>Her cervix opens up, and clamps down around the tip of Luka's penis!
mov %damage_kotei,1
damage 300,350
skillname ""
sub %stack,1
return *arumaeruma3_h13



*arumaeruma3_onedari

mov $list1,"Melty Hand"
if %3630>0 mov %list_num1,1
mov $list2,"Sweet Fellatio"
if %3631>0 mov %list_num2,1
mov $list3,"Tail Caress"
if %3632>0 mov %list_num3,1
gosub *cmd_onedari
if %cmd1=11 goto *arumaeruma3_onedari1
if %cmd1=12 goto *arumaeruma3_onedari2
if %cmd1=13 goto *arumaeruma3_onedari3
if %cmd1=-1 goto *arumaeruma3_main
goto *arumaeruma3_onedari



*arumaeruma3_onedarib

mov %list_num1,0
mov %list_num2,0
mov %list_num3,0
mov $list1,"Ancient Succubus Way: Snake"
if %3633>0 mov %list_num1,1
mov $list2,"Romanus Teri Spirit"
if %3634>0 mov %list_num2,1
mov $list3,"Melo Sophie Tellus"
if %3635>0 mov %list_num3,1
mov $list4,"Succubus Ceremony"
if %3636>0 mov %list_num4,1
mov $list5,"Meltic Kiss"
if %3637>0 mov %list_num5,1
mov $list6,"Tail Drain: Reterra"
if %3638>0 mov %list_num6,1
mov $list7,"A Queen's Drain"
if %3639>0 mov %list_num7,1
mov $list8,"Five Step Vaginal Hell"
if %3640>0 mov %list_num8,1
gosub *cmd_onedari
if %cmd1=11 goto *arumaeruma3_onedari4
if %cmd1=12 goto *arumaeruma3_onedari5
if %cmd1=13 goto *arumaeruma3_onedari6
if %cmd1=14 goto *arumaeruma3_onedari7
if %cmd1=15 goto *arumaeruma3_onedari8
if %cmd1=16 goto *arumaeruma3_onedari9
if %cmd1=17 goto *arumaeruma3_onedari10
if %cmd1=18 goto *arumaeruma3_onedari11
if %cmd1=-1 goto *arumaeruma3_main
goto *arumaeruma3_onedari



*arumaeruma3_onedari1

gosub *onedari_syori
name $name
>Aha, you want me to play with you with my hand?@
>Alright Luka-boy, I'll play with your penis as much as I want. \
name ""
gosub *arumaeruma3_a1
skip -1



*arumaeruma3_onedari2

gosub *onedari_syori
name $name
>Aha, you want me to play with you with my mouth?@
>Alright Luka-boy, I'll play with your penis as much as I want. \
name ""
gosub *arumaeruma3_a2
skip -1



*arumaeruma3_onedari3

gosub *onedari_syori
name $name
>Aha, you want me to play with you with my tail?@
>Alright Luka-boy, I'll play with your penis as much as I want. \
name ""
gosub *arumaeruma3_a3
skip -1



*arumaeruma3_onedari4

gosub *onedari_syori
name $name
>Now you want me to use my hand...?@
>Then allow me to assist in your corruption...\
name ""
gosub *arumaeruma3_a4
skip -1



*arumaeruma3_onedari5

gosub *onedari_syori
name $name
>Now you want me to use my mouth...?@
>Then allow me to assist in your corruption...\
name ""
gosub *arumaeruma3_a5
skip -1



*arumaeruma3_onedari6

gosub *onedari_syori
name $name
>Now you want me to use my breasts...?@
>Then allow me to assist in your corruption...\
name ""
gosub *arumaeruma3_a6
skip -1



*arumaeruma3_onedari7

gosub *onedari_syori
name $name
>You want me to force you to come with my finisher?@
>Then let me end you in an instant...\
name ""
gosub *arumaeruma3_a7
skip -1



*arumaeruma3_onedari8

gosub *onedari_syori
name $name
>You want to drown in my kiss?@
>Then give me your heart...\
name ""
gosub *arumaeruma3_a8
skip -1



*arumaeruma3_onedari9

if %kousoku<>1 gosub *onedari_syori
if %kousoku=1 gosub *onedari_syori_k
name $name
>You want to be squeezed by my tail?@
>Then let me take it all, to the last drop...\
name ""
notif %kousoku=1 gosub *arumaeruma3_a9
gosub *arumaeruma3_a10
skip -1



*arumaeruma3_onedari10

if %kousoku<>2 gosub *onedari_syori
if %kousoku=2 gosub *onedari_syori_k
name $name
>You want to be defeated by my pussy?@
>Then I'll squeeze you to the last drop...\
if %kousoku=2 skip 6
gosub *arumaeruma3_a11
name $name
>I'll rape you just like this...@
>Until there's nothing left...\
name ""
gosub *arumaeruma3_a12
skip -1



*arumaeruma3_onedari11

if %kousoku<>2 gosub *onedari_syori
if %kousoku=2 gosub *onedari_syori_k
name $name
>You want to taste a Queen Succubus' unmatched pussy?\
if %kousoku=2 skip 6
gosub *arumaeruma3_a11
name $name
>So you surrender... I'll drown you in a hell of pleasure, then.@
>Depending on how deep you get into my pussy, the stimulation changes.\
>As you go deeper inside me, you'll lose your mind...@
>The ultimate skill, named the Five Step Vaginal Hell...\
>You'll be one of the few who ever gets to taste it...@
>Hehe... I wonder at which stage you'll go mad?\
name ""
gosub *arumaeruma3_a14
skip -1



*arumaeruma3_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\arumaeruma_bk03.bmp",0,0
gosub *syasei2
>As Alma Elma's skilled hand strokes Luka's penis, he comes, covering her with semen.\
mov %viclose,1:gosub *lose2
mov %2638,%2638+1:if %2638=1 mov %count_koenemy,%count_koenemy+1
if %2638>%count_most mov %count_most,%2638:mov $count_mostname,$name+" (3)"
count 5,3
mov $bad1,"Alma Elma forced Luka to come using her hand."
gosub *face2
name $name
>Aha, my hand is all covered in semen...@
>It felt good, didn't it Luka-boy?\
name ""
goto *arumaeruma3_ha



*arumaeruma3_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\arumaeruma_bk01r.bmp",0,0
gosub *syasei2
>As Alma Elma skillfully sucks on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose2
mov %2638,%2638+1:if %2638=1 mov %count_koenemy,%count_koenemy+1
if %2638>%count_most mov %count_most,%2638:mov $count_mostname,$name+" (3)"
count 4,3
mov $bad1,"Alma Elma forced Luka to come with her blowjob."
gosub *face2
name $name
>Aha, you filled my mouth with semen...@
>It felt good, didn't it Luka-boy?\
name ""
goto *arumaeruma3_ha



*arumaeruma3_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 696,":a;chara\arumaeruma_bk16.bmp",0,0
gosub *syasei2
>As Alma Elma uses her tail to play with Luka, he comes, covering her with semen.\
mov %viclose,1:gosub *lose2
mov %2638,%2638+1:if %2638=1 mov %count_koenemy,%count_koenemy+1
if %2638>%count_most mov %count_most,%2638:mov $count_mostname,$name+" (3)"
count 19,3
mov $bad1,"Alma Elma used her tail to force Luka to come."
gosub *face2
name $name
>Aha, my tail is all covered in semen...@
>It felt good, didn't it Luka-boy?\
name ""
goto *arumaeruma3_ha



*arumaeruma3_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\arumaeruma_bk03.bmp",0,0
gosub *syasei2
>As Alma Elma's skilled hand strokes Luka's penis, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2638,%2638+1:if %2638=1 mov %count_koenemy,%count_koenemy+1
if %2638>%count_most mov %count_most,%2638:mov $count_mostname,$name+" (3)"
count 5,4
mov $bad1,"Alma Elma forced Luka to come with her hand."
gosub *face2
name $name
>Hehe... I made the brave, courageous Hero come.@
>Did you enjoy my hand that much?\
name ""
goto *arumaeruma3_hb



*arumaeruma3_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\arumaeruma_bk11.bmp",0,0
gosub *syasei2
>As Alma Elma sucks on Luka's penis, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2638,%2638+1:if %2638=1 mov %count_koenemy,%count_koenemy+1
if %2638>%count_most mov %count_most,%2638:mov $count_mostname,$name+" (3)"
count 4,4
mov $bad1,"Alma Elma forced Luka to come with her blowjob."
gosub *face2
name $name
>Hehe... I made the brave, courageous Hero come.@
>Did you enjoy my mouth that much?\
name ""
goto *arumaeruma3_hb



*arumaeruma3_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\arumaeruma_bk12.bmp",0,0
gosub *syasei2
>As Alma Elma's soft breasts rub against Luka's penis, he comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2638,%2638+1:if %2638=1 mov %count_koenemy,%count_koenemy+1
if %2638>%count_most mov %count_most,%2638:mov $count_mostname,$name+" (3)"
count 7,4
mov $bad1,"Alma Elma forced Luka to come with her breasts."
gosub *face2
name $name
>Hehe... I made the brave, courageous Hero come.@
>Did you enjoy my breasts that much?\
name ""
goto *arumaeruma3_hb



*arumaeruma3_h7

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\arumaeruma_bk13.bmp",0,0
gosub *syasei2
>As Alma Elma steps on Luka's penis, he comes, covering her foot with semen.\
mov %viclose,1:gosub *lose
mov %2638,%2638+1:if %2638=1 mov %count_koenemy,%count_koenemy+1
if %2638>%count_most mov %count_most,%2638:mov $count_mostname,$name+" (3)"
count 6,4
mov $bad1,"Alma Elma forced Luka to come with her foot."
gosub *face2
name $name
>Hehe... I made the brave, courageous Hero come.@
>Did you enjoy my foot that much?\
name ""
goto *arumaeruma3_hb



*arumaeruma3_h8

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\arumaeruma_bk14.bmp",0,0
gosub *syasei2
>As Alma Elma kisses Luka, he comes, shooting his semen onto her.\
mov %viclose,1:gosub *lose
mov %2638,%2638+1:if %2638=1 mov %count_koenemy,%count_koenemy+1
if %2638>%count_most mov %count_most,%2638:mov $count_mostname,$name+" (3)"
count 18,4
mov $bad1,"Alma Elma force Luka to come as she kissed him."
gosub *face2
name $name
>Hehe... It looks like I stole your body as well as your heart.\
name ""
goto *arumaeruma3_hb



*arumaeruma3_h9

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 696,":a;chara\arumaeruma_bk21.bmp",0,0
lsp 690,":a;chara\arumaeruma_ct05.bmp",500,0
gosub *syasei2
>Overwhelmed by the pleasure from her tail, Luka comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2638,%2638+1:if %2638=1 mov %count_koenemy,%count_koenemy+1
if %2638>%count_most mov %count_most,%2638:mov $count_mostname,$name+" (3)"
count 19,4
mov $bad1,"Alma Elma used her tail to force Luka to come."
gosub *face2
name $name
>Hehe... Being squeezed by my tail felt amazing, didn't it?\
name ""
csp 690:print 10,500
goto *arumaeruma3_hb



*arumaeruma3_h10

mov %ikigoe,3:gosub *ikigoe
name $name
>Already done? How sad...\
name ""
gosub *syasei1
lsp 700,":a;chara\arumaeruma_hd2.bmp",0,0
gosub *syasei2
>The moment Luka is forced inside Alma Elma, he comes, filling her vagina with semen.\
mov %viclose,1:gosub *lose
mov %2638,%2638+1:if %2638=1 mov %count_koenemy,%count_koenemy+1
if %2638>%count_most mov %count_most,%2638:mov $count_mostname,$name+" (3)"
count 1,4
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come from simple insertion."
name $name
>Coming just from insertion...@>How sad.\
>No matter how skilled you are with your sword, you're still pathetic when it comes to this.\
>But you weren't able to really enjoy my vagina that time, right?\
>How about we start over again, and see if you can do a little bit better...?\
name ""
lsp 692,":a;chara\arumaeruma_bk14.bmp",0,0
lsp 700,":a;chara\arumaeruma_st51.bmp",0,0:print 10,500
>Alma Elma stands up, freeing me from her vagina.\
name $name
>This time we'll go a little slower...@
>I'll show you just how amazing my pussy really is.\
name ""
goto *arumaeruma3_hb



*arumaeruma3_h11

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\arumaeruma_hd2.bmp",0,0
gosub *syasei2
>As Alma Elma rapes Luka, he comes, filling her vagina with semen.\
mov %viclose,1:gosub *lose
mov %2638,%2638+1:if %2638=1 mov %count_koenemy,%count_koenemy+1
if %2638>%count_most mov %count_most,%2638:mov $count_mostname,$name+" (3)"
count 1,4
mov $bad1,"Luka was forced to come as Alma Elma raped him."
gosub *face2
name $name
>Hehe... The Hero shot out so much semen...\
>But you weren't able to really enjoy my vagina that time, right?\
>How about we start over again, and see if you can do a little bit better...?\
name ""
lsp 692,":a;chara\arumaeruma_bk14.bmp",0,0
lsp 700,":a;chara\arumaeruma_st51.bmp",0,0:print 10,500
>Alma Elma stands up, freeing me from her vagina.\
name $name
>This time we'll go a little slower...@
>I'll show you just how amazing my pussy really is.\
name ""
goto *arumaeruma3_hb



*arumaeruma3_h12

mov %ikigoe,3:gosub *ikigoe
name $name
>Oh...?@> I only just put it in, though...\
name ""
gosub *syasei1
lsp 700,":a;chara\arumaeruma_hd2.bmp",0,0
gosub *syasei2
>As soon as the tip of Luka's penis pierces into Alma Elma, he comes, filling her vagina with semen.\
mov %viclose,1:gosub *lose
mov %2638,%2638+1:if %2638=1 mov %count_koenemy,%count_koenemy+1
if %2638>%count_most mov %count_most,%2638:mov $count_mostname,$name+" (3)"
count 1,4
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come just from insertion into Alma Elma."
gosub *face2
name $name
>Coming just from insertion...@>How sad.\
>No matter how skilled you are with your sword, you're still pathetic when it comes to this.\
>You weren't able to really enjoy my vagina that time, right?\
>How about we start over again, and see if you can do a little bit better...?\
name ""
lsp 692,":a;chara\arumaeruma_bk14.bmp",0,0
lsp 700,":a;chara\arumaeruma_st51.bmp",0,0:print 10,500
>Alma Elma stands up, freeing me from her vagina.\
name $name
>This time we'll go a little slower...@
>I'll show you just how amazing my pussy really is.\
name ""
goto *arumaeruma3_hb



*arumaeruma3_h13

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\arumaeruma_hd2.bmp",0,0
gosub *syasei2
>Unable to endure Alma Elma's vagina any longer, Luka comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2638,%2638+1:if %2638=1 mov %count_koenemy,%count_koenemy+1
if %2638>%count_most mov %count_most,%2638:mov $count_mostname,$name+" (3)"
count 1,4
mov $bad1,"Luka was forced to come from Alma Elma's unmatched vagina."
gosub *face2
name $name
>Hehe... Did you enjoy it?@
>If you let out that much, you must have loved it...\
>But you weren't able to really enjoy my vagina that time, right?\
>How about we start over again, and see if you can last that long again...?\
name ""
lsp 692,":a;chara\arumaeruma_bk14.bmp",0,0
lsp 700,":a;chara\arumaeruma_st51.bmp",0,0:print 10,500
>Alma Elma stands up, freeing me from her vagina.\
name $name
>This time we'll go a little slower...@
>I'll show you just how amazing my pussy really is.\
name ""
goto *arumaeruma3_hb



*arumaeruma3_ha

name $name
>But I'm not satisfied yet.@
>How about you treat me to more of that delicious semen of yours, Luka-boy?\
name ""
skillname "Romanus Teri"
dwave 1,"se\ero_buchu3.ogg"
cspl 690,699
lsp 700,":a;chara\arumaeruma_hc1.bmp",0,0:print 10,500
>Without letting go, Alma Elma continues to suck on Luka's penis!
mov %damage_kotei,1
damage 150,180
dwave 1,"se\ero_buchu3.ogg"
>She wraps her tongue around the tip of his penis, and licks up the remaining semen with her tongue!
mov %damage_kotei,1
damage 150,180
dwave 1,"se\ero_buchu3.ogg"
>Alma Elma sucks hard on Luka's penis!
mov %damage_kotei,1
damage 150,180
skillname ""
name "Luka"
>Ah...Ahh...\
name ""
>Even though I just had an orgasm, Alma doesn't stop sucking on me for even a moment.\
>Already extra sensitive from my last orgasm, I can't help but softly moan as she sucks.\
name $name
>There's no pulling out...\
name ""
skillname "Romanus Teri"
dwave 1,"se\ero_buchu3.ogg"
>Alma Elma reaches around and grabs Luka's waist, pulling him closer to her mouth!
mov %damage_kotei,1
damage 150,180
dwave 1,"se\ero_buchu3.ogg"
>She winds her tongue around the tip of his penis!
mov %damage_kotei,1
damage 150,180
dwave 1,"se\ero_buchu3.ogg"
>Rubbing the tip of his penis against the top of her mouth, she continues sucking!
mov %damage_kotei,1
damage 150,180
skillname ""
name "Luka"
>Ahh...!\
name ""
>I shake side to side, trying to escape from her mouth...@
>But Alma firmly holds onto my waist, pushing me further inside her instead.\
name $name
>Nnn... You can't escape from my mouth...@
>*Lick* *Suck*\
name ""
skillname "Romanus Teri"
dwave 1,"se\ero_buchu3.ogg"
>Alma Elma's tongue crawls all over Luka's penis!
mov %damage_kotei,1
damage 150,180
dwave 1,"se\ero_buchu3.ogg"
>She uses her tongue to squeeze Luka's penis!
mov %damage_kotei,1
damage 150,180
dwave 1,"se\ero_buchu3.ogg"
>Sucking hard, she forces out Luka's semen!
mov %damage_kotei,1
damage 150,180
skillname ""
name "Luka"
>Ahh... I'm coming!\
name ""
gosub *syasei1
lsp 700,":a;chara\arumaeruma_hc2.bmp",0,0
gosub *syasei2
name $name
>Nnn... *Gulp* *Slurp*@
>Mmm...\
name ""
>Keeping me in her mouth, Alma happily swallows my semen as I shoot it out.\
>I shiver in pleasure as her warm mouth gently sucks on me all through my orgasm.\
name "Luka"
>Ahh...!@>S...Stop already...!\
name ""
skillname "Romanus Teri"
dwave 1,"se\ero_buchu3.ogg"
>Ignoring Luka, Alma Elma continues sucking on him!
mov %damage_kotei,1
damage 150,180
dwave 1,"se\ero_buchu3.ogg"
>She uses her tongue to rub Luka's penis against the top of her mouth!
mov %damage_kotei,1
damage 150,180
dwave 1,"se\ero_buchu3.ogg"
>Alma Elma runs the tip of her tongue up and down the back of Luka's penis!
mov %damage_kotei,1
damage 150,180
skillname ""
name "Luka"
>Ahhhhh!\
name ""
name $name
>Aren't you a boy...?@> You shouldn't be moaning with a voice like that...@
>Nnn... *Suck*\
name ""
skillname "Romanus Teri"
dwave 1,"se\ero_buchu3.ogg"
>Alma Elma starts to suck even harder, like a vacuum!
mov %damage_kotei,1
damage 150,180
dwave 1,"se\ero_buchu3.ogg"
>The force causes her cheeks to narrow, rubbing them against Luka's penis!
mov %damage_kotei,1
damage 150,180
dwave 1,"se\ero_buchu3.ogg"
>The force of her suction pulls Luka deeper inside her mouth!
mov %damage_kotei,1
damage 150,180
skillname ""
name "Luka"
>Ahh... Stop...@
>No more sucking...\
name ""
name $name
>Hehe... But it feels good...@
>In truth, you really want me to suck more, right?\
>Now come on, explode in my mouth...@
>Nnnn... *Suck*\
name ""
skillname "Romanus Teri"
dwave 1,"se\ero_buchu3.ogg"
>Alma Elma continues sucking hard on Luka's penis!
mov %damage_kotei,1
damage 150,180
dwave 1,"se\ero_buchu3.ogg"
>Her tongue runs up and down his penis, cleaning every inch of it!
mov %damage_kotei,1
damage 150,180
dwave 1,"se\ero_buchu3.ogg"
>Gently rubbing the tip of her tongue across his urethral opening, she finishes him off!
mov %damage_kotei,1
damage 150,180
skillname ""
name "Luka"
>Ahh...\
name ""
gosub *syasei1
lsp 700,":a;chara\arumaeruma_hc3.bmp",0,0
gosub *syasei2
>I explode inside her mouth, letting her drink down the semen she forcibly sucked out.\
>As my semen leaks into her, I sigh in release as it feels like my soul itself is being drawn out.\
name $name
>You can come more, right?@
>Mmmm... *Suck*\
name ""
name "Luka"
>Aiee!@>No more...@
>Ahh!\
name ""
skillname "Romanus Teri"
dwave 1,"se\ero_buchu3.ogg"
>Alma Elma sucks even harder, drawing out the semen still stuck in Luka's penis!
mov %damage_kotei,1
damage 150,180
dwave 1,"se\ero_buchu3.ogg"
>Her skilled tongue runs all over Luka's penis, licking up the rest!
mov %damage_kotei,1
damage 150,180
dwave 1,"se\ero_buchu3.ogg"
>Wrapping her tongue around him, she uses her tongue to squeeze on his sensitive penis!
mov %damage_kotei,1
damage 150,180
skillname ""
name "Luka"
>N...No more... I can't...@
>Ahhh!\
name ""
>I feebly struggle, pushing against her with my hands and feet.\
>But Alma Elma just looks up at me with a grin on her face.\
name $name
>I'll suck more...@>So show me more of that dirty face of yours.@
>Nnn... *Suck*\
name ""
name "Luka"
>Ahhh!\
name ""
skillname "Romanus Teri"
dwave 1,"se\ero_buchu3.ogg"
>Alma Elma sucks hard, like a vacuum!
mov %damage_kotei,1
damage 150,180
dwave 1,"se\ero_buchu3.ogg"
>She sucks on Luka's penis like a straw, sucking out his semen!
mov %damage_kotei,1
damage 150,180
dwave 1,"se\ero_buchu3.ogg"
>Firmly latched onto his penis, he has no choice but to come!
mov %damage_kotei,1
damage 150,180
skillname ""
gosub *syasei1
lsp 700,":a;chara\arumaeruma_hc4.bmp",0,0
gosub *syasei2
name "Luka"
>Ahh...\
name ""
>Unable to escape from her mouth, she easily sucks another ejaculation out of me.\
>As I feel myself weaken, it's like she sucked out my soul itself.\
name $name
>Hehehe... I'm not done sucking on you.@
>I'll make you mine, and just suck on you forever...\
name "Luka"
>Ahhh...\
name ""
>Without letting me go, Alma continues sucking on me...\
>I don't even know how many times her mouth has forced me to come, but there won't ever be a chance to escape from her again...\
name $name
>Nnn... *Suck*\
name ""
name "Luka"
>Ah...aa...\
name ""
>Too exhausted to continue, I feel myself about to pass out.@
>The last thing I see before drifting off to sleep is Alma, still sucking on me.\
mov %battle,0
mov %hsean,1
gosub *anten
gosub *clear_sprite
gosub *setwindow_01p
>Defeated by Alma Elma, my semen is sucked out for the rest of my life.@
>Whether I'm awake or unconscious, she just continues sucking on me.\
>It doesn't matter what time of the day it is, since I'm nothing but Alma's prey, good only for ejaculations.\
>................\
mov $bad2,"Caught by Alma Elma, Luka became a simple semen slave."
mov %skill02,2
goto *badend



*arumaeruma3_hb

mov %skill02,2
mov $bad2,"Alma Elma used her vagina to rape Luka to death."
if %2638=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_01.ogg"
name $name
>Hehe... You're ready, aren't you?
>I'm going to squeeze out a lot from you now...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_02.ogg"
>With my special, unrivaled Queen Succubus' pussy...\
name ""
dwavestop 0
cspl 690,699
lsp 700,":a;chara\arumaeruma_hd0.bmp",0,0:print 10,500
>Alma steps over me as I lay on the ground.@
>Squatting down, she presses her soft body against mine.\
>It feels like she's a powerful predator, about ready to feast on her game...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_03.ogg"
name $name
>I'll let you taste the best hell of pleasure...
>My pussy gives varying stimulation and pleasure based on how far you go in...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_04.ogg"
>The deeper you go, the more agonizing the pleasure becomes...
>A legendary skill called the Five Step Vaginal Hell...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_05.ogg"
>Your semen is going to be squeezed out with that devilish pussy now...
>Aren't you looking forward to it? Hehehe.\
name ""
dwavestop 0
name "Luka"
>N...No... I don't want this...\
name ""
>I shiver with both fear and expectation about what's to come.@
>Smiling, Alma just softly hugs me close to her.\
>She really is just a predator, about to feast on me...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_06.ogg"
name $name
>...It's time to devour your penis.
>Get a good taste of the first hell... The entrance to my pussy.\
name ""
dwavestop 0
mov %hseanwave,1:hseanwave
lsp 700,":a;chara\arumaeruma_hd1.bmp",0,0:print 10,500
>Alma Elma very slowly drops down, slipping my tip into her vagina.@
>As soon as I barely pierce into her, her wet vagina eagerly clasps around my tip, squeezing me.\
name "Luka"
>Ahhh!\
name ""
>She stops moving as soon as my tip is inside, just keeping me right there.\
>Even though she isn't moving, just the feeling of her hot, wet vagina squeezing down on my tip is too much to take.\
>Though the stimulation isn't that intense, the calm pleasure races through my body, bring a dull ache with it.\
name "Luka"
>Haa... Wh... What is this...?\
name ""
>Somehow, I already feel myself about to ejaculate.\
>The feeling races from my penis to the rest of my body.@
>Even though only my tip is inside of her, I already want to surrender to her...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_07.ogg"
name $name
>Oh dear... Going to be finished just by the first prison?
>Alright... You'll get a concrete sense of defeat if you come here, so I'll make you come...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_08.ogg"
>Taste the humiliation of coming just from insertion...
>Let your semen shoot out as the miserable feelings race through you...\
name ""
dwavestop 0
>Her vaginal lips suddenly rub against my tip as they tighten, instantly breaking down the last of my resistance.\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\arumaeruma_hd2.bmp",0,0
gosub *syasei2
>Overwhelmed, I explode inside her entrance.\
>My face flushes with shame as I come, barely in far enough to be qualified as insertion.\
name "Luka"
>Ahh...\
name ""
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_09.ogg"
name $name
>...Hehe, good job.
>Your job as a man finished in no time...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_10.ogg"
>Out of all the men I've sucked in before, you may be the most pathetic.
>There hasn't been a man who has finished just from being in the entrance...\
name ""
dwavestop 0
>Alma looks down and laughs at me, just increasing my misery even more.@
>All the while, the tip of my penis is still being held just in her entrance.\
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_11.ogg"
name $name
>This already surrendering to the first jail premature ejaculating penis of yours...
>I'll invite it deeper, to the second prison...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_12.ogg"
>Going a little deeper into my pussy, the path starts to bend a little...
>As you go through this curve, you'll feel an enrapturing pleasure...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_13.ogg"
>Hoora... Get a good taste of this enrapturing curve...\
name ""
dwavestop 0
mov %hseanwave,4:hseanwave
>Alma Elma slowly drops down further, sinking me deeper into her.@
>As her waist slowly moves down, she invites me further inside.\
name "Luka"
>Ahh...\
name ""
>As my penis is forced further inside of her, I feel her vagina start to bend and wind back and forth.@
>Rubbing against tiny little curves, it feels like I'm being massaged against millions of tiny ridges inside her.\
>At the same time, the tiny bends and curves start to vibrate and squirm against my penis.@
>It's almost like I've been forced into some kind of digestive organ...\
name "Luka"
>Ahh... It's vibrating inside...@
>T...This feels good...\
name ""
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_14.ogg"
name $name
>Hehe... This is the second prison.
>Most men finish once here...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_15.ogg"
>But... You just finished once in the first prison.
>Certainly you wouldn't do something so shameful as coming here, too?\
name ""
dwavestop 0
name "Luka"
>Ahh...\
name ""
>As her vagina vibrates around me, the tiny curves quickly rub against my penis.@
>My mouth opens in ecstasy as I can't help but be put into a trance by the pleasure.\
name "Luka"
>Ahh... I...It's vibrating...@
>I... I'm going to come...\
name ""
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_16.ogg"
name $name
>Oh...? It looks like you're already about to come...
>You really are a pitiful premature ejaculator...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_17.ogg"
>Alright... I'll let you come.
>I'll watch your shameful accident...\
name ""
dwavestop 0
name "Luka"
>Ahhh...\
name ""
>A powerful numbness spreads through my body as her vagina vibrates around me.@
>Completely helpless before the pleasure, my head goes blank as I give in.\
name "Luka"
>Ah... Coming... !@
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\arumaeruma_hd3.bmp",0,0
gosub *syasei2
>I explode inside of her again as her vagina gently vibrates.@
>Completely entranced in the pleasure, I just sigh in bliss.\
name "Luka"
>Haa...\
name ""
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_18.ogg"
name $name
>Hehe, you leaked out again...
>Already twice, and you're only at the second prison...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_19.ogg"
>I wonder what will happen if I keep going on from here...?\
name ""
dwavestop 0
>Alma slowly drops even lower as she giggles.@
>My penis starts to slowly pierce deeper into her...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_20.ogg"
name $name
>Past here is a hell of thousands of folds...
>Each will wriggle and squirm as if they had their own will, and rub all over your penis...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_21.ogg"
>Your strength will fade, and you'll finish in an instant...
>This is the third prison...\
name ""
dwavestop 0
name "Luka"
>Ah...!@> Ahhh!\
name ""
mov %hseanwave,7:hseanwave
>I moan as my tip slowly moves into the next part of her vagina.\
>Just as she described, thousands of tiny little folds rub up and down on my penis as I enter inside, rubbing against me as if each was a hungry tongue.\
name "Luka"
>Ah...ah...ah...!\
name ""
>As my tip slowly moves deeper inside, they push against and massage my urethral opening, still extra sensitive after my orgasm.\
>Unable to take it, I cling helplessly to Alma's body.@
>Looking drunk on her own sadistic pleasure, Alma looks down and gently pats my head.\
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_22.ogg"
name $name
>Oh my, what a shameful little boy...
>Do you want to hug me tightly?\
name ""
dwavestop 0
>Alma smiles and tenderly hugs me back.@
>All the while, the folds inside of her continue to rub against my penis.\
>My head goes white as I feel completely at her mercy.\
gosub *syasei1:gosub *syasei2
>Still clinging to Alma, I pitifully ejaculate inside her.\
>Her folds rub against me as I explode inside her, feeling like all of my power is just leaking into her vagina.\
name "Luka"
>Haaa...\
name ""
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_23.ogg"
name $name
>Hehe... Did that feel good?
>That makes three times...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_24.ogg"
>But there's more to come...\
name ""
dwavestop 0
>Alma lowers herself again, sinking me even deeper into her vagina...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_25.ogg"
name $name
>It gets a little tight now...
>My small pussy will squeeze your penis nice and tight...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_26.ogg"
>My soft, lewd flesh will tighten around your neck... Hehe.
>No matter the man, they all eventually come here...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_27.ogg"
>This is the fourth prison...\
name ""
dwavestop 0
name "Luka"
>Ah...ahh...@
>Amazing... I...It's getting smaller...\
name ""
mov %hseanwave,10:hseanwave
>With a little push, the tip of my penis is forced into an incredibly tight hole.@
>But her flesh is so soft and stretchy, it allows me to go in.\
>Right after I'm inside, her soft flesh seemingly forms itself right to my shape, tightly squeezing me inside her.\
>As more of my penis is forced into this new area, the tightness gets more and more unbearable.\
name "Luka"
>Ahh... That feels so good...\
name ""
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_28.ogg"
name $name
>Hehe... Boys sure are weak to tightness...
>Hoora, I'll squeeze it harder...\
name ""
dwavestop 0
name "Luka"
>A...Ah... Ahh!\
name ""
>I cling tighter against Alma, unable to do anything but drown in the pleasure.\
>As her warm vagina squeezes down harder on me, I just start to drool.\
>With the rest of my penis still feeling the other areas of her vagina, I just give myself over to her, letting myself soak in the ecstasy.\
name "Luka"
>Ahh... I'm going to come again...\
name ""
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_29.ogg"
name $name
>Then go ahead and let it out...
>Coming as your penis is being squeezed is an unmatched pleasure...\
name ""
dwavestop 0
name "Luka"
>Haa...\
name ""
>Squeezing me with her vagina at the same time as she talks, I give myself over to her, embracing the orgasm without trying to endure it at all.\
gosub *syasei1:gosub *syasei2
>I explode inside Alma's vagina as she squeezes me, hugging her even tighter at the same time.\
name "Luka"
>Haa... It feels so good...\
name ""
>I gasp in pleasure in her embrace.@
>Even though I'm in such a pitiful position, I can't bring myself to dislike this...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_30.ogg"
name $name
>Oh my... Only the fourth prison, and you've already lost your backbone?\
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_31.ogg"
>But I won't go easy on you.
>I'll invite you to the final hell, the fifth prison...\
name ""
dwavestop 0
name "Luka"
>Ahh...\
name ""
>Just how can anything possibly feel better than this...?\
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_32.ogg"
name $name
>My cervix will suck in the tip of your penis, and contract as it twitches...
>Fitting right around the tip of your penis, I'll flood you with a spasm like stimulation...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_33.ogg"
>There is no way to endure this pleasure...
>No matter how much a man perseveres, he's left completely helpless to come...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_34.ogg"
>This is my pussy's fifth prison...
>The Queen Succubus' ultimate technique, able to finish any man...\
name ""
dwavestop 0
name "Luka"
>Ahh...\
name ""
>An incredible pleasure, able to defeat any man...@
>I feel myself start to shake in expectation, wanting to taste it...\
>The humiliation and shame still swirl around in my brain...@
>But even if I wanted to do something, I'm completely at her mercy.\
>I can't do anything but cling to her, accepting whatever she wants to do to me...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_35.ogg"
name $name
>Hehe, are you ready?
>Now... Ascend to a heaven of pleasure...\
name ""
dwavestop 0
>Alma Elma drops lower, forcing me all the way inside.\
name "Luka"
>Ah...ah....@
>Aiieee!\
name ""
mov %hseanwave,13:hseanwave
>I feel my penis press against her back wall for a moment, before it opens up and lets in the tip of my penis.\
>Contracting back, it fits itself exactly to the head of my penis.\
>Suddenly, it shrinks even further, pressing down on my tip from every side.@
>It's like I was just sucked into a hole, designed just to fit my penis...\
name "Luka"
>Ahh...!@>Ahhh!\
name ""
>My body starts to shake in controllable pleasure.@
>Trying to stop myself, I hug even tighter to Alma's soft body.\
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_36.ogg"
name $name
>Hehe... It's unbearable, isn't it?
>Now, finish...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_37.ogg"
>Give all of your semen to me...
>Everything, until the very last drop...\
name ""
dwavestop 0
name "Luka"
>Ahhh...!\
name ""
>After only a few moments of being squeezed deep inside her, I already feel myself about to come.\
>Far more powerful than anything I've ever felt, it feels like I could just melt inside her.\
gosub *syasei1
lsp 700,":a;chara\arumaeruma_hd4.bmp",0,0
gosub *syasei2
name "Luka"
>Haa...\
name ""
>A surprisingly large amount of semen gushes out of me into her.@
>It's almost as if her womb itself is eagerly drinking my semen...\
name "Luka"
>Haaa...\
name ""
>Suddenly, my vision goes hazy as I feel incredibly weak from that last orgasm.\
name "Luka"
>W...What... Ahh...\
name ""
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_38.ogg"
name $name
>Hehe, didn't I mention it before?
>I'll be squeezing out all of your semen from that penis of yours that struggled all the way inside my hell of pleasure...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_39.ogg"
>All of your semen is going to be squeezed out...
>Now come and meet a blissful end inside me...\
name ""
dwavestop 0
name "Luka"
>Haa... Ahhh!\
name ""
>My semen keeps leaking out right into her womb.@
>It's as if my life itself is slowly being taken by her vagina...\
>Stuck in a trance of unmatched pleasure, I just helplessly gasp in ecstasy as my life is taken.\
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_40.ogg"
name $name
>Horahora... I'll wring the semen from your penis...
>The Queen Succubus herself shall lead you to heaven...\
name ""
dwavestop 0
name "Luka"
>A...aa...\
name ""
>Her cervix continues sucking on me, letting her womb drink up all my semen...@
>My vision goes hazy as I get weaker and weaker.\
>Before long, I can't feel anything but the powerful pleasure replacing all of my senses.\
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_41.ogg"
name $name
>Hehe... The end is almost here.
>With the next spurt, your semen will be exhausted.\
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_42.ogg"
>Your last orgasm will feel good...
>The final squeeze as I take away everything...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_43.ogg"
>Hoora... Meet your end.\
name ""
dwavestop 0
name "Luka"
>Aaa...\
name ""
>With a final powerful suction, her cervix pulls on my tip.@
>The dull ache instantly fills my body, bringing me to a final, powerful orgasm.\
gosub *syasei1:gosub *syasei2
>My consciousness starts to fade at the same time I explode inside Alma.\
gosub *anten
mov %hseanwave,0:hseanwave
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_44.ogg"
name $name
>...This is the fate of one who challenges the Queen Succubus.
>You were satisfied at being able to taste such pleasure at the end of your life, weren't you?\
if %con_hvoice=0 dwave 0,"voice\arumaeruma4_45.ogg"
>Goodbye, Luka-boy...\
name ""
dwavestop 0
name "Luka"
>..............\
name ""
>With both my semen and life sucked out of me, I meet my death.@
>I made it all this way just to end up as simple prey.\
>.................\
goto *badend



*tamamo2_start

mov $name,"Tamamo"
mov $name2,"Tamamo"
mov $lavel,"tamamo2"
mov $tatie1,"tamamo_st01"
mov $tatie2,"tamamo_st02"
mov $tatie3,"tamamo_st03"
mov $tatie4,"tamamo_st01"
mov $haikei,"bg047"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,22000
if %nanido=2 mov %max_enemylife,27000
if %nanido=3 mov %max_enemylife,33000
if %nanido=0 mov %max_enemylife,3
if %nanido=1 mov %henkahp1,11000
if %nanido=2 mov %henkahp1,11000
if %nanido=3 mov %henkahp1,11000
if %nanido=0 mov %henkahp1,2
if %nanido=1 mov %henkahp2,5000
if %nanido=2 mov %henkahp2,5000
if %nanido=3 mov %henkahp2,5000
if %nanido=0 mov %henkahp2,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,50
if %nanido=3 mov %earth_keigen,25
mov %music,12
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free from Tamamo's tail!"
mov $mogaku_anno2,"Luka broke free of Tamamo's tail!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"I'm not done with you yet. "
mov $mogaku_sel2,"You can't escape that easily."
mov $mogaku_sel3,"Hmmhmmhmm... You have a long way to go before competing with me in strength!"
mov $mogaku_sel4,"I won't lose when it comes to power."
mov $mogaku_sel5,"Even if you struggle, you won't break free!"
mov $mogaku_earth_dassyutu1,"Hum... That's some power."
mov $mogaku_earth_dassyutu2,"As expected from someone filled with Gnome's power."
mov $half_s1,"Fufu... My skills are unmatched, aren't they?"
mov $half_s2,"If you're obedient to me, I'll show you a lot more love..."
mov $kiki_s1,"Are you almost at your limit?"
mov $kiki_s2,"Be happy, for you'll be able to come in the midst of unrivaled pleasure..."
mov %end_n,9
mov %exp_minus,770025
mov %zmonster_x,-280
mov %tukix,320
name $name
>You're quite something, to defeat Alma Elma...@
>But do you think you can deal with me?\
name ""
>Tamamo quickly bounces up, taking her place in front of me.@
>Despite her tiny body, the presence radiating off of her is huge...\
>It's almost as if a giant mountain is right in front of me.\
name "Luka"
>Tamamo is next, eh...?@
>Don't hold anything back, fight seriously!\
name ""
name $name
>The moon is the source of the Kitsune race's power.@
>And today is a full moon!\
name ""
skillname "Breath of the Earth"
dwave 2,"se\earth2.ogg"
quake 5,1000
>Tamamo is filled with the breath of the earth!\
skillname ""
name $name
>My tiny body is full of the power of the earth.@
>Do you think you can possibly damage me?\
name ""
name "Luka"
>I just have to surpass it!\
name ""
>The only way I can match her strength is to use the earth myself.@
>I'll lose for certain if I can't match her in power!\
mov %sinkou,1
goto *common_main



*tamamo2001

name "Luka"
>Guh... My attack didn't work!?\
name ""
name $name
>My powered up body is the same as a mountain.@
>There's no way that weak attack would even make me flinch.\
name ""
name "Luka"
>..............\
name ""
>I can't fight her head on...@
>The me of the past would have despaired at this point.\
>But I can wield the power of the earth, too.@
>There's no reason I can't do the same thing she can!\
mov %first_sel2,1
return



*tamamo2002

mov %bougyo,0
name $name
>Ha!\
name ""
skillname "Tamamo Punch"
dwave 1,"se\karaburi.ogg"
>Tamamo steps forward, and punches with the weight of the earth behind her!
mov %a_effect1,1
damage 1800,1900
skillname ""
if %mylife=0 goto *tamamo2_h1
name "Luka"
>Guha...!\
name ""
>I'm thrown back by the incredible force behind her small body.\
>Even guarding with the power of the earth, it still almost knocked me out in a single hit.\
lsp 700,":a;chara\tamamo_st04.bmp",0,0:print 10,500
name $name
>It's not over yet!\
name ""
name "Luka"
>Guh...!\
name ""
>I can't take another hit!@
>I have to avoid it!\
mov %sinkou,2
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
goto *common_main



*tamamo2003

mov %bougyo,0
name $name
>Orya!\
name ""
skillname "Tamamo Tackle"
dwave 1,"se\karaburi.ogg"
>Tamamo dashes toward Luka, and jumps into the air!
if %wind=3 && %nanido<2 mov %wind_kakuritu,100
if %wind=3 && %nanido=2 mov %wind_kakuritu,100
if %wind=3 && %nanido=3 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:skillname "":skip 5
mov %a_effect1,1
damage 3100,3500
skillname ""
if %mylife=0 goto *tamamo2_h1
>Whew, I managed to avoid her...\
dwave 1,"se\bom2.ogg"
quake 10,1000
>The moment Tamamo lands headfirst on the floor, the floor cracks and splinters.@
>It's like a giant meteor just hit!\
name "Luka"
>Wh...What a hard head...\
name ""
>...That's not it!@
>Her control of the earth is far past what I can do!\
>If that had hit me, I think I would have died!\
mov %sinkou,3
goto *common_main



*tamamo2004

mov %bougyo,0
name $name
>Ha!\
name ""
skillname "Tail Attack"
dwave 1,"se\karaburi.ogg"
>Tamamo's tail suddenly grows as she swings it toward Luka!
if %wind=3 && %nanido<2 mov %wind_kakuritu,100
if %wind=3 && %nanido=2 mov %wind_kakuritu,100
if %wind=3 && %nanido=3 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:skillname "":skip 5
mov %a_effect1,1
damage 3100,3500
skillname ""
if %mylife=0 goto *tamamo2_h1
>Narrowly dodging, her tail goes flying over my head.@
dwave 1,"se\bom4.ogg"
quake 10,1000
>Hitting a pillar, it instantly destroys it, bringing down a section of the ceiling!\
name "Luka"
>Wh...What power...\
name ""
mov %sinkou,4
goto *common_main



*tamamo2005

mov %bougyo,0
name $name
>Haha, watch out!\
name ""
skillname "Tamamo Rolling"
dwave 1,"se\tamamo1.ogg"
quake 10,1000
>Tamamo curls into a ball, and rolls toward Luka!
if %wind=3 && %nanido<2 mov %wind_kakuritu,100
if %wind=3 && %nanido=2 mov %wind_kakuritu,100
if %wind=3 && %nanido=3 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:skillname "":skip 5
mov %a_effect1,1
damage 3100,3500
skillname ""
if %mylife=0 goto *tamamo2_h1
dwave 1,"se\tamamo1.ogg"
quake 10,1000
>I narrowly dodge to the side as Tamamo rolls by, slamming into the wall and bringing it down with her.\
name "Alma Elma"
>...Excuse me, little Tamamo?@
>Would you please stop destroying the castle?\
name ""
name "Erubetie"
>...Just who do you think is going to fix this?\
name ""
lsp 700,":a;chara\tamamo_st04.bmp",0,0:print 10,500
name $name
>Why, Luka of course.@
>After I defeat him, he'll be my slave.@> I'll make him repair it.\
name ""
name "Luka"
>Ehh!?\
name ""
>That isn't funny...@
>I have to deal with this crazy power somehow!\
mov %sinkou,5
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
goto *common_main



*tamamo2006

name $name
>Quit moving around!\
name ""
skillname "Tail Bind"
dwave 1,"se\ero_makituki3.ogg"
>Tamamo's tail coils around Luka's body!
mov %damage_kotei,1
damage 200,220
mov %kousoku,1:gosub *status_print
>Luka has been bound by Tamamo's tail!\
skillname ""
if %mylife=0 goto *tamamo2_h2
name "Luka"
>Guh...!\
name ""
dwave 1,"se\ero_simetuke1.ogg"
>Tamamo's powerful tail tightens around my body as I let out a groan of pain.\
name $name
>Caught you. @
>Now that you're like this, you have no chance of victory.@>Give up.\
name ""
name "Luka"
>W...Who would ever... Give up!?\
name ""
mov %sinkou,6
goto *common_main



*tamamo2007

lsp 700,":a;chara\tamamo_st13.bmp",0,0:print 10,500
name $name
>Ouch!\
name ""
>My blow manages to damage Tamamo!\
lsp 700,":a;chara\tamamo_st11.bmp",0,0:print 10,500
name $name
>...You've really become quite something.@
>I had almost forgotten what it felt like to take damage.\
>There's no more going easy on you.@
>From here on out, I'm serious!\
name ""
name "Luka"
>Let's go!\
name ""
mov %sinkou,11
return



*tamamo2008

name $name
>.............\
name ""
>Tamamo is exhausted...\
goto *common_main



*tamamo2_v

mov $tatie3,"tamamo_st21"
gosub *face3
name $name
>I give up...@
>I can't fight any longer...\
name ""
mov %viclose,1:gosub *victory
mov %getexp,300000:gosub *lvup
mov %2339,1
mov %skill03,3
goto *sean0298



*tamamo2_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>Oho? Surrendering?@
>Well, you've done well for a human to make it this far.\
>Shall I reward you...?\
name ""
if %sinkou<10 gosub *tamamo2_onedarix
goto *tamamo2_a



*tamamo2_kousan2

name $name
>.............\
name ""
>Tamamo is exhausted...\
goto *tamamo2_main



*tamamo2_main

gosub *cmd_main
if %cmd1=11 && %kousoku=1 goto *tamamo2_mogaku1
if %cmd1=11 && %nanido=0 goto *common_attack
if %cmd1=11 && %earth=3 goto *common_attack
if %cmd1=11 && %earth<3 goto *tamamo2_attack
if %cmd1=12 && %sinkou=6 goto *tamamo2_mogaku2
if %cmd1=12 && %sinkou=7 goto *tamamo2_mogaku3
if %cmd1=12 && %sinkou=8 goto *tamamo2_mogaku4
if %cmd1=12 && %sinkou=9 goto *tamamo2_mogaku5
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 && %kousoku=1 goto *tamamo2_nasugamama1
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 && %sinkou<13 goto *tamamo2_kousan
if %cmd1=15 && %sinkou=13 goto *tamamo2_kousan2
if %cmd1=16 && %sinkou<13 goto *tamamo2_onedari
if %cmd1=16 && %sinkou=13 goto *tamamo2_kousan2
if %cmd1=17 && %nanido=0 goto *common_skill
if %cmd1=17 && %earth=3 goto *common_skill
if %cmd1=17 && %earth<3 goto *tamamo2_skill
goto *tamamo2_main



*tamamo2_attack

if %aqua=2 mov %before_action,4:mov %skill_sub,1:gosub *common_attack1:skip 12
mov %before_action,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ha!"
if %ransu=2 mov $sel1,"Hya!"
if %ransu=3 mov $sel1,"Orya!"
name "Luka"
eng $sel1:$sel6\
name ""
mov %skill_sub,1
gosub *common_attack2
gosub *mp_kaihuku:gosub *mp
dwave 2,"se\earth3.ogg"
delay 90
>But Tamamo takes no damage!\
if %aqua=2 skillname ""
if %wind<>3 skip 6
mov %skill_sub,1
gosub *common_attack2
dwave 2,"se\earth3.ogg"
delay 90
>But Tamamo takes no damage!\
if %first_sel2=0 && %sinkou<6 gosub *tamamo2001
goto *tamamo2_a



*tamamo2_mogaku1

mov %before_action,7
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Urhg...!"
if %ransu=2 mov $sel1,"Guh... Damn it...!"
if %ransu=3 mov $sel1,"Stop it!"
name "Luka"
eng $sel1:$sel6\
name ""
>Luka attacks!
>But Luka can't attack like this!\
name $name
>What are you doing...?@
>Don't you think you should escape before you try to attack?\
name ""
skillname "Tail Squeeze"
dwave 1,"se\ero_simetuke1.ogg"
>Tamamo's tail gets tighter around Luka's body!@
mov %damage_kotei,1
damage 300,320
skillname ""
if %mylife=0 goto *tamamo2_h2
goto *common_main



*tamamo2_mogaku2

mov %before_action,7
name "Luka"
>Urhg...!\
name ""
if %earth>0 dwave 1,"se\power.ogg"
>Luka struggles as hard as he can!@
>But he can't break free from Tamamo's tail!\
name $name
>You'll never defeat my tail with power of that level.@
>If you don't use Gnome's power to its full extent, this will be your end...\
name ""
skillname "Tail Squeeze"
dwave 1,"se\ero_simetuke1.ogg"
>Tamamo's tail gets tighter around Luka's body!
mov %damage_kotei,1
damage 200,220
skillname ""
if %mylife=0 goto *tamamo2_h2
name $name
>...Fufu, are you going to lose just from this?@
>What a disappointing Hero...\
name ""
name "Luka"
>Urhg...\
name ""
>There's no way I can break free of this...@
>The despair starts to slowly take hold in my heart.\
mov %sinkou,7
goto *common_main



*tamamo2_mogaku3

mov %before_action,7
name "Luka"
>Guh... Damn it!\
name ""
if %earth>0 dwave 1,"se\power.ogg"
>Luka struggles as hard as he can!@
>But he can't break free from Tamamo's tail!\
name $name
>You won't escape...@
>If you don't surrender, I'll just keep making it tighter and tighter...\
name ""
skillname "Tail Squeeze"
dwave 1,"se\ero_simetuke1.ogg"
>Tamamo's tail gets tighter around Luka's body!
mov %damage_kotei,1
damage 200,220
skillname ""
if %mylife=0 goto *tamamo2_h2
name $name
>...Did you forget what I said before?@
>The image you have is the most important part of controlling the power of the earth.\
>If you had only imaged yourself as a giant mountain, you could have escaped from this so easily...\
name ""
name "Luka"
>Even if you say that, I...@
>That kind of image...\
name ""
>...I can't do it.@
>No matter how hard I try, in the end I'm only human.\
>How could I imagine myself as an all powerful mountain when I'm in a position like this?\
mov %sinkou,8
goto *common_main



*tamamo2_mogaku4

mov %before_action,7
name "Luka"
>Ahh...\
name ""
if %earth>0 dwave 1,"se\power.ogg"
>Luka weakly struggles!@
>But he can't break free from Tamamo's tail!\
name $name
>Even your struggling is getting weaker...\
name ""
skillname "Tail Squeeze"
dwave 1,"se\ero_simetuke1.ogg"
>Tamamo's tail gets tighter around Luka's body!
mov %damage_kotei,1
damage 200,220
skillname ""
if %mylife=0 goto *tamamo2_h2
name $name
>Oho...?@
>Are you about to give up?\
name ""
name "Luka"
>I...It's impossible...\
name ""
name $name
>...Just what's impossible, you idiot?@
>You're the man that moody Gnome accepted as her master.\
>And the Hero that Alipheese the Sixteenth accepted.\
name ""
name "Luka"
>...............\
name ""
name $name
>...Think back.@> Just who are you?@
>Why did you come here?\
>Was your resolve always this easily shattered?\
name ""
name "Luka"
>...I... I...\
name ""
name ""
mov %sinkou,9
goto *common_main



*tamamo2_mogaku5

name "Luka"
>I...\
>I'm a Hero!@
>I came here to stop the hatred between humans and monsters from getting worse!\
name ""
>...That's right, I'm a Hero!\
>I'm here for the dream both Alice and I believe in...@
>I can't give up here!\
name ""
dwave 1,"se\earth2.ogg"
lsp2 0,":a;chara\gnome_st01.bmp",250,300,100,100,0,200
gosub *syoukan_effect
name "Gnome"
>............!!\
name ""
dwave 1,"se\power.ogg"
name "Luka"
>Uoooooo!!\
name ""
lsp 700,":a;chara\tamamo_st03.bmp",0,0
mov %skill03,3
mov %earth,3:mov %earth_turn,16
gosub *elm_print
dwave 1,"se\tamamo3.ogg"
lsp 700,":a;chara\tamamo_st41.bmp",0,0
mov %kousoku,0:gosub *status_print
>With power coursing through him, Luka rips off the tail binding him!\
name $name
>Ahh!@> My fluffy tail!\
name ""
>The tail ripped off of Tamamo fades as soon as it touches the ground.\
gosub *face3
>With a tiny burst of magical power, a new tail takes its place!\
gosub *face1
name $name
>...Hmph, that was quite something.@
>But was that just an accident!?\
name ""
skillname "Tamamo Punch"
dwave 1,"se\karaburi.ogg"
>Tamamo steps forward, punching with the weight of the earth behind her!
wait 500
dwave 2,"se\earth3.ogg"
>But Luka takes no damage!\
skillname ""
name "Luka"
>T...This power...\
name ""
name $name
>Hmmhmm... It looks like my brute force attacks won't work any longer.\
>Oh well, it looks like I have to resort to pleasure attacks.\
name ""
mov $tatie1,"tamamo_st11"
mov $tatie2,"tamamo_st12"
mov $tatie3,"tamamo_st13"
mov $tatie4,"tamamo_st12"
mov %owaza_count1a,7
mov %owaza_count2a,7
mov %owaza_count3a,5
mov %owaza_count3b,7
dwave 1,"se\escape.ogg"
lsp 700,":a;chara\tamamo_st11.bmp",0,0:print 10,500
>Tamamo takes off her clothes, exposing her naked body!\
mov %music,4
bgm "bgm\sitenno.ogg"
lsp 560,":a;system\gager100.bmp",114,556
mov %mylife,%max_mylife:mov %mp,%max_mp
gosub *hp:gosub *mp
mov %sinkou,10
goto *common_main



*tamamo2_nasugamama1

mov %before_action,52
>Luka doesn't even try to struggle...\
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Already giving up?"
if %ransu=2 mov $sel1,"Well? Are you going to struggle or surrender?"
if %ransu=3 mov $sel1,"Do you know what it means to just give up?"
name $name
eng $sel1:$sel6\
name ""
skillname "Tail Squeeze"
dwave 1,"se\ero_simetuke1.ogg"
>Tamamo's tail gets tighter around Luka's body!
mov %damage_kotei,1
damage 300,320
skillname ""
if %mylife=0 goto *tamamo2_h2
goto *common_main



*tamamo2_skill

gosub *cmd_skill
if %cmd1=24 goto *skill4
if %cmd1=26 goto *tamamo2_skillx1
if %cmd1=27 goto *tamamo2_skillx1
if %cmd1=28 goto *tamamo2_skillx1
if %cmd1=29 goto *skill15
if %cmd1=30 goto *tamamo2_skillx1
if %cmd1=31 goto *skill7c
if %cmd1=32 && %skill03=2 goto *skill8b
if %cmd1=32 && %skill03=3 goto *skill8c
if %cmd1=33 goto *skill10b
if %cmd1=34 goto *skill14b
if %cmd1=35 goto *skill17
if %cmd1=-1 goto *tamamo2_main
goto *tamamo2_skill



*tamamo2_skillx1

if %cmd1=26 mov %skill_sub,1:gosub *skill11:skip 4
if %cmd1=27 mov %skill_sub,1:gosub *skill12:skip 3
if %cmd1=28 mov %skill_sub,1:gosub *skill13:skip 2
if %cmd1=30 mov %skill_sub,1:gosub *skill16
mov %skill_sub,0
dwave 2,"se\earth3.ogg"
>But Tamamo takes no damage!\
skillname ""
if %first_sel2=0 && %sinkou<6 gosub *tamamo2001
goto *tamamo2_a



*tamamo2_a

if %kousan=1 skip 11
if %wind=3 && %sinkou=1 gosub *tamamo2_el0a:goto *common_main
if %aqua=2 && %sinkou<6 gosub *tamamo2_el0b:goto *common_main
if %fire=2 && %sinkou<6 gosub *tamamo2_el0c:goto *common_main
if %sinkou=1 goto *tamamo2002
if %sinkou=2 goto *tamamo2003
if %sinkou=3 goto *tamamo2004
if %sinkou=4 goto *tamamo2005
if %sinkou=5 goto *tamamo2006
if %sinkou=10 && %before_action<40 && %earth=3 gosub *tamamo2007
if %sinkou=13 goto *tamamo2008
if %enemylife<%henkahp1 && %hanyo1=0 gosub *tamamo2_a10:goto *common_main
if %enemylife<%henkahp2 && %hanyo4=0 gosub *tamamo2_a11:goto *common_main
if %hanyo6=1 && %aqua>1 gosub *tamamo2_a12:goto *common_main
if %hanyo6=1 && %bougyo=1 gosub *tamamo2_a12:goto *common_main
if %hanyo6=1 && %bougyo=0 gosub *tamamo2_a13:goto *common_main
if %kousoku=2 gosub *tamamo2_a8:goto *common_main
rnd2 %ransu,1,8
if %ransu=1 gosub *tamamo2_a1:goto *common_main
if %ransu=2 gosub *tamamo2_a2:goto *common_main
if %ransu=3 gosub *tamamo2_a3:goto *common_main
if %ransu=4 gosub *tamamo2_a4:goto *common_main
if %ransu=5 && %owaza_count2a>8 && %status=0 gosub *tamamo2_a5:goto *common_main
if %ransu=6 && %owaza_count3a>6 gosub *tamamo2_a6:goto *common_main
if %ransu=7 && %owaza_count1a>8 gosub *tamamo2_a7:goto *common_main
if %ransu=8 && %owaza_count3b>8 gosub *tamamo2_a9:goto *common_main
skip -9



*tamamo2_el0a

add %stack,1
name $name
>I hate it when people dash around like that.\
name ""
skillname "Wind Cancel"
>A wave of power shoots off of Tamamo's tail!
dwave 1,"se\cancelar.ogg"
bg "bg\bg047.bmp",99,1000,"system\lngtwave.dll/vwi"
mov %wind,0:mov %wind_turn,0:gosub *elm_print
>Sylph's power fades!\
skillname ""
if %first_sel1=1 skip 9
name "Luka"
>Y...You can do that!?\
name ""
name $name
>How do you think I've managed to stay alive these hundreds of years?@
>I know more techniques than anyone else.\
name ""
mov %first_sel1,1
sub %stack,1
return



*tamamo2_el0b

add %stack,1
name $name
>Dealing with that serene mind thing is quite annoying.\
name ""
skillname "Water Cancel"
>A wave of power shoots off of Tamamo's tail!
dwave 1,"se\cancelar.ogg"
bg "bg\bg047.bmp",99,1000,"system\lngtwave.dll/vwi"
mov %aqua,0:mov %aqua_turn,0:gosub *elm_print
bgm "bgm\tamamo.ogg"
>Undine's power fades!\
skillname ""
if %first_sel1=1 skip 9
name "Luka"
>Y...You can do that!?\
name ""
name $name
>How do you think I've managed to stay alive these hundreds of years?@
>I know more techniques than anyone else.\
name ""
mov %first_sel1,1
sub %stack,1
return



*tamamo2_el0c

add %stack,1
name $name
>Fire isn't good for my fluffy tail, you know.\
name ""
skillname "Fire Cancel"
>A wave of power shoots off of Tamamo's tail!
dwave 1,"se\cancelar.ogg"
bg "bg\bg047.bmp",99,1000,"system\lngtwave.dll/vwi"
mov %fire,0:mov %fire_turn,0:gosub *elm_print
mov %mp,0:gosub *mp
>Salamander's power fades!\
skillname ""
if %first_sel1=1 skip 9
name "Luka"
>Y...You can do that!?\
name ""
name $name
>How do you think I've managed to stay alive these hundreds of years?@
>I know more techniques than anyone else.\
name ""
mov %first_sel1,1
sub %stack,1
return



*tamamo2_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You'll love my hand."
if %ransu=2 mov $sel1,"The tip feels the best, no?"
if %ransu=3 mov $sel1,"I'll tickle the tip."
name $name
eng $sel1:$sel6\
name ""
skillname "Kitsune Handling"
dwave 1,"se\ero_koki1.ogg"
>Tamamo's tiny hands skillfully stroke Luka's penis!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=3 && %nanido<2 mov %wind_kakuritu,20
if %wind=3 && %nanido=2 mov %wind_kakuritu,15
if %wind=3 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3641
if %nanido<2 damage 370,400
if %nanido=2 damage 400,430
if %nanido=3 damage 430,460
skillname ""
if %mylife=0 sub %stack,1:return *tamamo2_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*tamamo2_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck on it as much as I want. "
if %ransu=2 mov $sel1,"Don't you want to come in my mouth? Fufu..."
if %ransu=3 mov $sel1,"Fufu... Do you think you can endure my mouth?"
name $name
eng $sel1:$sel6\
name ""
skillname "Kitsune Mouth Handling"
dwave 1,"se\ero_buchu3.ogg"
if %aqua=0 lsp 700,":a;chara\tamamo_ha2.bmp",0,0:print 10,500
if %aqua=0 lsp 700,":a;chara\tamamo_ha4.bmp",0,0:print 10,500
>Tamamo greedily sucks on Luka's penis with her small mouth!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=3 && %nanido<2 mov %wind_kakuritu,20
if %wind=3 && %nanido=2 mov %wind_kakuritu,15
if %wind=3 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu
if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3642
if %nanido<2 damage 400,420
if %nanido=2 damage 430,450
if %nanido=3 damage 460,480
skillname ""
if %mylife=0 sub %stack,1:return *tamamo2_h4
gosub *face1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*tamamo2_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My breasts are small... But I know how to use them."
if %ransu=2 mov $sel1,"I can still press your sensitive tip against my nipples..."
if %ransu=3 mov $sel1,"There are plenty of men who prefer smaller chests. "
name $name
eng $sel1:$sel6\
name ""
skillname "Flat Breast Rub"
dwave 1,"se\ero_koki1.ogg"
>Tamamo rubs Luka's penis against her flat chest!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=3 && %nanido<2 mov %wind_kakuritu,20
if %wind=3 && %nanido=2 mov %wind_kakuritu,15
if %wind=3 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3643
if %nanido<2 damage 380,400
if %nanido=2 damage 410,430
if %nanido=3 damage 440,460
skillname ""
if %mylife=0 sub %stack,1:return *tamamo2_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*tamamo2_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Some men just love being dominated. "
if %ransu=2 mov $sel1,"I'll think a lot less of you if this makes you come..."
if %ransu=3 mov $sel1,"I'll step on your penis nice and hard..."
name $name
eng $sel1:$sel6\
name ""
skillname "Moonwar Footpound"
dwave 1,"se\ero_koki1.ogg"
>Tamamo steps on Luka's penis with her tiny foot!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=3 && %nanido<2 mov %wind_kakuritu,20
if %wind=3 && %nanido=2 mov %wind_kakuritu,15
if %wind=3 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3644
if %nanido<2 damage 180,200
if %nanido=2 damage 190,210
if %nanido=3 damage 200,220
dwave 1,"se\ero_koki1.ogg"
>Pressing down on him, she rubs her small foot against his penis!
if %nanido<2 damage 180,200
if %nanido=2 damage 190,210
if %nanido=3 damage 200,220
dwave 1,"se\ero_koki1.ogg"
>Holding herself up with her tail, she squeezes Luka's penis between both of her small feet!
if %nanido<2 damage 180,200
if %nanido=2 damage 190,210
if %nanido=3 damage 200,220
skillname ""
if %mylife=0 sub %stack,1:return *tamamo2_h6
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*tamamo2_a5

add %stack,1
mov %owaza_count2a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"That face of yours just makes me want to lick it..."
if %ransu=2 mov $sel1,"My tongue can make any man mine..."
if %ransu=3 mov $sel1,"My tongue can overwhelm any man. "
name $name
eng $sel1:$sel6\
name ""
skillname "Emasculating Amusement"
dwave 1,"se\ero_pyu1.ogg"
>Tamamo jumps onto Luka, hugging him tightly!@
>Like that, she starts to lick his face all over!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=3 && %nanido<2 mov %wind_kakuritu,100
if %wind=3 && %nanido=2 mov %wind_kakuritu,90
if %wind=3 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3645
if %nanido<2 damage 200,220
if %nanido=2 damage 230,250
if %nanido=3 damage 260,280
if %status=0 mov $sel1,"Luka is put into a trance!"
if %status=1 mov $sel1,"Luka is in a trance..."
mov %status,1:gosub *status_print
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *tamamo2_h7
if %kousan=2 sub %stack,1:return
name "Luka"
>Haa...\
name ""
name $name
>All men become toys when they feel my tongue...@
>Now then, how shall I play with you?\
name ""
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,3,4
if %nanido=3 rnd2 %status_turn,4,5
sub %stack,1
return



*tamamo2_a6

add %stack,1
mov %owaza_count3a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"It's time for a big skill!"
if %ransu=2 mov $sel1,"How about my finisher. "
if %ransu=3 mov $sel1,"This skill will force you to come. "
name $name
eng $sel1:$sel6\
name ""
skillname "Nine Moons"
rnd2 %ransu,1,2
if %ransu=1 mov %hanyo2,1:goto *tamamo2_a6a
if %ransu=2 mov %hanyo2,2:goto *tamamo2_a6b



*tamamo2_a6a

lsp 690,":a;chara\tamamo_cta01.bmp",490,0:print 10,500
>Tamamo's nine tails all shoot toward Luka!\
dwave 1,"se\umaru.ogg"
lsp 690,":a;chara\tamamo_cta02.bmp",490,0:print 10,500
>The first tail coils around Luka's penis!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=3 && %nanido<2 mov %wind_kakuritu,40
if %wind=3 && %nanido=2 mov %wind_kakuritu,35
if %wind=3 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":mov %stuck,1:gosub *wind_guard:skillname "Nine Moons":skip 5
skillcount2 3647
if %nanido<2 damage 180,220
if %nanido=2 damage 184,224
if %nanido=3 damage 188,228
dwave 1,"se\umaru.ogg"
>The second tail wraps around the base of Luka's penis!
if %wind=3 && %nanido<2 mov %wind_kakuritu,40
if %wind=3 && %nanido=2 mov %wind_kakuritu,35
if %wind=3 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":mov %stuck,1:gosub *wind_guard:skillname "Nine Moons":skip 5
skillcount2 3647
if %nanido<2 damage 180,220
if %nanido=2 damage 184,224
if %nanido=3 damage 188,228
dwave 1,"se\umaru.ogg"
>The tip of the third tail tickles his urethral opening!
if %wind=3 && %nanido<2 mov %wind_kakuritu,40
if %wind=3 && %nanido=2 mov %wind_kakuritu,35
if %wind=3 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":mov %stuck,1:gosub *wind_guard:skillname "Nine Moons":skip 5
skillcount2 3647
if %nanido<2 damage 180,220
if %nanido=2 damage 184,224
if %nanido=3 damage 188,228
dwave 1,"se\umaru.ogg"
>The fourth tail massages the tip of Luka's penis!
if %wind=3 && %nanido<2 mov %wind_kakuritu,40
if %wind=3 && %nanido=2 mov %wind_kakuritu,35
if %wind=3 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":mov %stuck,1:gosub *wind_guard:skillname "Nine Moons":skip 5
skillcount2 3647
if %nanido<2 damage 180,220
if %nanido=2 damage 184,224
if %nanido=3 damage 188,228
dwave 1,"se\umaru.ogg"
>The fifth tail plays with Luka's balls!
if %wind=3 && %nanido<2 mov %wind_kakuritu,40
if %wind=3 && %nanido=2 mov %wind_kakuritu,35
if %wind=3 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":mov %stuck,1:gosub *wind_guard:skillname "Nine Moons":skip 5
skillcount2 3647
if %nanido<2 damage 180,220
if %nanido=2 damage 184,224
if %nanido=3 damage 188,228
dwave 1,"se\umaru.ogg"
>The sixth tail runs up and down the back of Luka's penis!
if %wind=3 && %nanido<2 mov %wind_kakuritu,40
if %wind=3 && %nanido=2 mov %wind_kakuritu,35
if %wind=3 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":mov %stuck,1:gosub *wind_guard:skillname "Nine Moons":skip 5
skillcount2 3647
if %nanido<2 damage 180,220
if %nanido=2 damage 184,224
if %nanido=3 damage 188,228
dwave 1,"se\umaru.ogg"
>The seventh tail gently rubs against Luka's anus!
if %wind=3 && %nanido<2 mov %wind_kakuritu,40
if %wind=3 && %nanido=2 mov %wind_kakuritu,35
if %wind=3 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":mov %stuck,1:gosub *wind_guard:skillname "Nine Moons":skip 5
skillcount2 3647
if %nanido<2 damage 180,220
if %nanido=2 damage 184,224
if %nanido=3 damage 188,228
dwave 1,"se\umaru.ogg"
>The eighth tail runs up and down the other side of Luka's penis!
if %wind=3 && %nanido<2 mov %wind_kakuritu,40
if %wind=3 && %nanido=2 mov %wind_kakuritu,35
if %wind=3 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":mov %stuck,1:gosub *wind_guard:skillname "Nine Moons":skip 5
skillcount2 3647
if %nanido<2 damage 180,220
if %nanido=2 damage 184,224
if %nanido=3 damage 188,228
dwave 1,"se\umaru.ogg"
>The ninth tail coils around the tip of Luka's penis and squeezes!
if %wind=3 && %nanido<2 mov %wind_kakuritu,40
if %wind=3 && %nanido=2 mov %wind_kakuritu,35
if %wind=3 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":mov %stuck,1:gosub *wind_guard:skip 5
skillcount2 3647
if %nanido<2 damage 180,220
if %nanido=2 damage 184,224
if %nanido=3 damage 188,228
skillname ""
if %mylife=0 sub %stack,1:return *tamamo2_h8
csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*tamamo2_a6b

dwave 1,"se\umaru.ogg"
lsp 690,":a;chara\tamamo_ctb01.bmp",440,0:print 10,500
>Tamamo's nine tails come together in a cylinder shape, and shoot toward Luka!\
if %aqua=0 lsp 690,":a;chara\tamamo_ctb02.bmp",440,0:print 10,500
>Luka's penis is forced into the hole made by the tails!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=3 && %nanido<2 mov %wind_kakuritu,40
if %wind=3 && %nanido=2 mov %wind_kakuritu,35
if %wind=3 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu
if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":mov %stuck,1:gosub *wind_guard:skillname "Nine Moons":skip 5
skillcount2 3647
if %nanido<2 damage 540,660
if %nanido=2 damage 552,672
if %nanido=3 damage 564,684
dwave 1,"se\umaru.ogg"
>Tamamo's fluffy tail squeezes down around Luka's penis!
if %wind=3 && %nanido<2 mov %wind_kakuritu,40
if %wind=3 && %nanido=2 mov %wind_kakuritu,35
if %wind=3 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu
if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":mov %stuck,1:gosub *wind_guard:skillname "Nine Moons":skip 5
skillcount2 3647
if %nanido<2 damage 540,660
if %nanido=2 damage 552,672
if %nanido=3 damage 564,684
dwave 1,"se\umaru.ogg"
>Almost faster than he can see, her fluffy tail pumps him like a piston!
if %wind=3 && %nanido<2 mov %wind_kakuritu,40
if %wind=3 && %nanido=2 mov %wind_kakuritu,35
if %wind=3 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu
if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":mov %stuck,1:gosub *wind_guard:skip 5
skillcount2 3647
if %nanido<2 damage 540,660
if %nanido=2 damage 552,672
if %nanido=3 damage 564,684
skillname ""
if %mylife=0 sub %stack,1:return *tamamo2_h8
csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*tamamo2_a7

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 7
name $name
if %first_sel3=1 skip 3
>I'll wrap my tail around you!\
skip 2
>I'll wrap my tail around you again!\
name ""
skillname "Tail Entangle"
dwave 1,"se\ero_makituki3.ogg"
>Tamamo's nine tails coil around Luka's body!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=3 && %nanido<2 mov %wind_kakuritu,10
if %wind=3 && %nanido=2 mov %wind_kakuritu,7
if %wind=3 && %nanido=3 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
if %nanido<2 damage 250,280
if %nanido=2 damage 380,310
if %nanido=3 damage 410,340
mov %kousoku,2:gosub *status_print
>Luka has been bound by Tamamo's tails!\
skillname ""
if %mylife=0 sub %stack,1:return *tamamo2_h9
if %kousan=2 sub %stack,1:return
name $name
if %first_sel3=1 skip 3
>I'll give you lots of love with this fluffy tail of mine. \
skip 2
>This time you won't escape. \
name ""
mov %first_sel3,1
if %earth=0 && %nanido<2 mov %genmogaku,100
if %earth=0 && %nanido=2 mov %genmogaku,100
if %earth=0 && %nanido=3 mov %genmogaku,100
if %earth>0 && %nanido<2 mov %genmogaku,2
if %earth>0 && %nanido=2 mov %genmogaku,2
if %earth>0 && %nanido=3 mov %genmogaku,3
sub %stack,1
return



*tamamo2_a8

add %stack,1
>Luka has been bound by Tamamo's tail...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Fufu, a tickle hell!":mov $sel2,"The tip of her fluffy tail tickles Luka's penis!"
if %ransu=2 mov $sel1,"I love this thing of yours. ":mov $sel2,"One of Tamamo's tails tenderly strokes Luka's penis!"
if %ransu=3 mov $sel1,"I'll run my tails over your weak spot...":mov $sel2,"Tamamo's nine tails run all over Luka's penis!"
if %ransu=4 mov $sel1,"The proof of your manhood will be the source of your defeat...":mov $sel2,"All nine tails take turns rubbing against Luka's penis!"
if %ransu=5 mov $sel1,"I won't get mad if you cover my tail with your semen. ":mov $sel2,"The tip of one of Tamamo's tail runs up and down the back of Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Moontail Entanglement"
dwave 1,"se\umaru.ogg"
if %hanyo3=0 lsp 690,":a;chara\tamamo_ctc01.bmp",440,0:print 10,500
lsp 690,":a;chara\tamamo_ctc02.bmp",440,0:print 10,500
mov %hanyo3,1
eng $sel2:$sel6
skillcount2 3646
if %nanido<2 damage 250,280
if %nanido=2 damage 380,310
if %nanido=3 damage 410,340
skillname ""
if %mylife=0 sub %stack,1:return *tamamo2_h9
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*tamamo2_a9

add %stack,1
mov %owaza_count3b,0
name $name
>Ha!\
name ""
skillname "Kitsune Mount"
eng "Tamamo jumps on Luka, forcing him to the ground with her on top!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=3 && %nanido<2 mov %wind_kakuritu,100
if %wind=3 && %nanido=2 mov %wind_kakuritu,100
if %wind=3 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>Tamamo is riding on top of Luka!\
name $name
>You've already lost.@
>Now, let's have sex. \
name ""
skillcount2 3648
skillname "Moonlight Rendezvous"
dwave 1,"se\ero_pyu1.ogg"
lsp 700,":a;chara\tamamo_hb2.bmp",0,0:print 10,500
>Tamamo sinks down, forcing Luka into her tiny vagina!
mov %damage_kotei,1
damage 400,450
>Luka is being raped by Tamamo!\
skillname ""
if %mylife=0 sub %stack,1:return *tamamo2_h10
name "Luka"
>Ahhh...!\
name ""
>I gasp in pleasure as Tamamo's wet, tiny vagina instantly clamps down on me.@
>Losing all of my strength in an instant, I look on in surprise.\
name $name
>Fufu... I feel amazing, don't I?@
>Here, let me make it even tighter... \
name ""
skillcount2 3648
skillname "Moonlight Rendezvous"
dwave 1,"se\ero_chupa5.ogg"
>Tamamo clenches her stomach, making her vagina even tighter!
mov %damage_kotei,1
damage 400,450
skillname ""
if %mylife=0 sub %stack,1:return *tamamo2_h11
name "Luka"
>Ahh... You're too tight...\
name ""
name $name
>Fufufu... But it feels good, right?@
>Just think, if I was to move... \
name ""
skillcount2 3648
skillname "Moonlight Rendezvous"
dwave 1,"se\ero_chupa3.ogg"
>Tamamo starts to rub her small butt against Luka, forcing him in and out of her tight vagina!
mov %damage_kotei,1
damage 400,450
skillname ""
if %mylife=0 sub %stack,1:return *tamamo2_h11
name "Luka"
>Ahh...\
name ""
name $name
>Fufu, you're at your end.@
>Now then, to make you come inside me. \
name ""
skillcount2 3648
skillname "Moonlight Rendezvous"
dwave 1,"se\ero_chupa4.ogg"
>Tamamo rides Luka harder, forcing him over the edge!
mov %damage_kotei,1
damage 400,450
skillname ""
sub %stack,1
return *tamamo2_h11



*tamamo2_a10

add %stack,1
name $name
>Hmmhmm... To be pushed this far...\
name ""
skillname "Moonlight Healing"
>Tamamo focuses her power...\
if %nanido<2 mov %damage,11000
if %nanido=2 mov %damage,16500
if %nanido=3 mov %damage,22000
gosub *enemylife_kaihuku
skillname ""
name "Luka"
>Guh... !@> You recovered!?\
name ""
name $name
>What?@>You've been doing it too.@
>Besides, I can't use this as often as you do...\
>That Meditation of yours is almost cheating...\
name ""
mov %hanyo1,1
sub %stack,1
return



*tamamo2_a11

add %stack,1
dwave 1,"se\escape.ogg"
mov $tatie1,"tamamo_st01"
mov $tatie2,"tamamo_st02"
mov $tatie3,"tamamo_st03"
mov $tatie4,"tamamo_st02"
lsp 700,":a;chara\tamamo_st03.bmp",0,0:print 10,500
name $name
>Hmmhmm... I've been pushed into a corner...\
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
>Oh well, it's time for a bold move!\
name ""
skillname "Tail Attack"
dwave 1,"se\bom2.ogg"
quake 10,1000
>Tamamo's tail shoots up, and cracks open the ceiling!\
skillname ""
name "Luka"
>Eh...?@> What are you doing?\
name ""
>As the dust fades, moonlight streams into the room...\
name ""
name $name
>I'll show you my secret skill!\
name ""
skillname "Moonlight Charge"
dwave 1,"se\power.ogg"
>Tamamo's nine tails spread out!@
>Each of them begins to shine as they absorb the moonlight!\
skillname ""
name "Luka"
>W...What are you doing!?\
name ""
>I don't quite know what's going on, but I have a bad feeling...@
>Whatever's about to come, I can't let it hit me!\
name ""
mov %hanyo6,1
mov %hanyo4,1
sub %stack,1
return



*tamamo2_a12

add %stack,1
mov %hanyo6,0
name $name
>Here it comes, my ultimate attack!\
name ""
name ""
skillname "Moonlight Cannon"
>The tips of Tamamo's tails come together, and point straight at Luka!
dwave 1,"se\laser2.ogg"
wait 300
flushout 1000
vsp 700,0
bg white,10,1000
if %aqua>1 mov %stuck,1:gosub *aqua_guard:skip 5
delay 1000
dwave 1,"se\miss.ogg"
>But Luka dodges!\
skillname ""
vsp 700,1
if %aqua>1 bg black,10,3000:skip 2
bg "bg\bg047.bmp",10,3000
name "Luka"
>I...I dodged it...\
name ""
>The beam of light goes by me, making a giant hole in the wall.@
>If that had hit me...\
name ""
gosub *face3
name $name
>Hrm...@> It missed...\
name ""
mov $tatie1,"tamamo_st21"
mov $tatie2,"tamamo_st21"
mov $tatie3,"tamamo_st21"
mov $tatie4,"tamamo_st21"
mov %monster_y,100
dwave 1,"se\down.ogg"
lsp 700,":a;chara\tamamo_st21.bmp",0,100:print 10,500
>Tamamo falls to the ground!\
name ""
mov %kadora_damage,0
mov %sinkou,13
sub %stack,1
return



*tamamo2_a13

add %stack,1
mov %hanyo6,0
name $name
>Here it comes, my ultimate attack!\
name ""
name ""
skillname "Moonlight Cannon"
>The tips of Tamamo's tails come together, and point straight at Luka!\
dwave 1,"se\laser2.ogg"
wait 300
flushout 1000
vsp 700,0
bg white,10,1000
wait 1000
>A giant beam of light slams into Luka!
mov %damage_kotei,1
mov %a_effect1,1
damage 3000,4000
skillname ""
vsp 700,1
bg "bg\bg047.bmp",10,3000
name "Luka"
>Uwaaa!\
name ""
>Knocked off my feet by the insane burst of light, I fall to the ground in defeat.\
mov %viclose,2:gosub *lose
mov %2639,%2639+1:if %2639=1 mov %count_koenemy,%count_koenemy+1
if %2639>%count_most mov %count_most,%2639:mov $count_mostname,$name+" (2)"
count 14,5
mov $bad1,"Luka was defeated by Tamamo's Moonlight Cannon."
gosub *face2
name $name
>Whew... You're still breathing.@
>If you weren't using the power of the earth, you would have been nothing but ashes.\
name ""
sub %stack,1
return *tamamo2_hb



*tamamo2_onedari

mov $list1,"Kitsune Handling"
if %3641>0 mov %list_num1,1
mov $list2,"Kitsune Mouth Handling"
if %3642>0 mov %list_num2,1
mov $list3,"Flat Breast Rub"
if %3643>0 mov %list_num3,1
mov $list4,"Moonwar Footpound"
if %3644>0 mov %list_num4,1
mov $list5,"Emasculating Amusement"
if %3645>0 mov %list_num5,1
mov $list6,"Moontail Entanglement"
if %3646>0 mov %list_num6,1
mov $list7,"Nine Moons"
if %3647>0 mov %list_num7,1
mov $list8,"Moonlight Rendezvous"
if %3648>0 mov %list_num8,1
gosub *cmd_onedari
if %cmd1=11 goto *tamamo2_onedari1
if %cmd1=12 goto *tamamo2_onedari2
if %cmd1=13 goto *tamamo2_onedari3
if %cmd1=14 goto *tamamo2_onedari4
if %cmd1=15 goto *tamamo2_onedari5
if %cmd1=16 goto *tamamo2_onedari6
if %cmd1=17 goto *tamamo2_onedari7
if %cmd1=18 goto *tamamo2_onedari8
if %cmd1=-1 goto *tamamo2_main
goto *tamamo2_onedari



*tamamo2_onedari1

gosub *onedari_syori
name $name
>You want my hand to finish you off?@
>Then as your reward for making it this far...\
name ""
if %sinkou<10 gosub *tamamo2_onedarix
gosub *tamamo2_a1
skip -1



*tamamo2_onedari2

gosub *onedari_syori
name $name
>You want my mouth to finish you off?@
>Then as your reward for making it this far...\
name ""
if %sinkou<10 gosub *tamamo2_onedarix
gosub *tamamo2_a2
skip -1



*tamamo2_onedari3

gosub *onedari_syori
name $name
>You want my breasts to finish you off?@
>Then as your reward for making it this far...\
name ""
if %sinkou<10 gosub *tamamo2_onedarix
gosub *tamamo2_a3
skip -1



*tamamo2_onedari4

gosub *onedari_syori
name $name
>You want my foot to finish you off?@
>Then as your reward for making it this far...\
name ""
if %sinkou<10 gosub *tamamo2_onedarix
gosub *tamamo2_a4
skip -1



*tamamo2_onedari5

gosub *onedari_syori
name $name
>You want me to lick you and make you unable to resist me?@
>Then as your reward for making it this far...\
name ""
if %sinkou<10 gosub *tamamo2_onedarix
gosub *tamamo2_a5
skip -1



*tamamo2_onedari6

gosub *onedari_syori_k
name $name
>You want my tail to finish you off?@
>Then as your reward for making it this far...\
name ""
if %sinkou<10 gosub *tamamo2_onedarix
if %kousoku=0 gosub *tamamo2_a7
gosub *tamamo2_a8
skip -1



*tamamo2_onedari7

gosub *onedari_syori
name $name
>You want to be defeated by my secret skill?@
>Then as your reward for making it this far...\
name ""
if %sinkou<10 gosub *tamamo2_onedarix
gosub *tamamo2_a6
skip -1



*tamamo2_onedari8

gosub *onedari_syori
name $name
>You want me to rape you...?@
>Then as your reward for making it this far...\
name ""
if %sinkou<10 gosub *tamamo2_onedarix
gosub *tamamo2_a9
skip -1



*tamamo2_onedarix

mov $tatie1,"tamamo_st11"
mov $tatie2,"tamamo_st12"
mov $tatie3,"tamamo_st13"
mov $tatie4,"tamamo_st12"
dwave 1,"se\escape.ogg"
lsp 700,":a;chara\tamamo_st12.bmp",0,0:print 10,500
>Tamamo rips off her clothes!\
return



*tamamo2_h1

name "Luka"
>Guha...\
name ""
>After taking her powerful attack, I fall to my knees, defeated.\
mov %viclose,2:gosub *lose2
mov %2639,%2639+1:if %2639=1 mov %count_koenemy,%count_koenemy+1
if %2639>%count_most mov %count_most,%2639:mov $count_mostname,$name+" (2)"
count 14,5
mov $bad1,"Luka was defeated by Tamamo's powerful attack."
gosub *face2
name $name
>Hmmhmm... A knockdown?@
>You did well for one so young.\
name ""
goto *tamamo2_ha



*tamamo2_h2

name "Luka"
>Ahh...!\
name ""
gosub *syasei1
lsp 693,":a;chara\tamamo_bk03.bmp",0,0
gosub *syasei2
>As Tamamo's tail tightens around his body, Luka comes, spraying semen onto her fluffy tail.\
mov %viclose,1:gosub *lose2
mov %2639,%2639+1:if %2639=1 mov %count_koenemy,%count_koenemy+1
if %2639>%count_most mov %count_most,%2639:mov $count_mostname,$name+" (2)"
count 14,5
mov $bad1,"Luka came as Tamamo's tail tightened around him."
gosub *face2
name $name
>Hmmhmm... You came?@
>I didn't think you would ejaculate from some pain...\
name ""
goto *tamamo2_ha



*tamamo2_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\tamamo_bk05.bmp",0,0
gosub *syasei2
>As Tamamo's skilled hands stroke him, Luka comes, covering her tiny palms with semen.\
mov %viclose,1:gosub *lose
mov %2639,%2639+1:if %2639=1 mov %count_koenemy,%count_koenemy+1
if %2639>%count_most mov %count_most,%2639:mov $count_mostname,$name+" (2)"
count 5,5
mov $bad1,"Tamamo forced Luka to come with her hands."
gosub *face2
name $name
>Fufu... So you came?@
>My palms are covered in your semen... \
name ""
goto *tamamo2_hb



*tamamo2_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\tamamo_ha5.bmp",0,0
gosub *syasei2
>As Tamamo sucks on Luka, he comes, filling her small mouth with semen.\
mov %viclose,1:gosub *lose2
name $name
>Nnn... You gave me quite a lot...@
>*Suck* *Lick*\
name ""
skillname "Kitsune Mouth Handling"
dwave 1,"se\ero_buchu3.ogg"
>Tamamo keeps sucking on Luka's penis without letting go!
mov %damage_kotei,1
damage 330,350
dwave 1,"se\ero_buchu3.ogg"
>Her rough tongue runs up and down his penis, licking him clean!
mov %damage_kotei,1
damage 330,350
skillname ""
name "Luka"
>Hyaaa!\
name ""
name $name
>Mmm... Your penis tastes delicious. @
>*Lick* *Lick*\
name ""
>I try to pull my waist back out of her mouth, but Tamamo's firm grip on me doesn't let me go anywhere.\
skillname "Kitsune Mouth Handling"
dwave 1,"se\ero_buchu3.ogg"
>Tamamo's mouth waters as she sucks on Luka, covering his penis with her warm saliva!
mov %damage_kotei,1
damage 330,350
dwave 1,"se\ero_buchu3.ogg"
>Her soft lips press against the shaft of Luka's penis as she sucks on him!
mov %damage_kotei,1
damage 330,350
skillname ""
name $name
>Ahh...\
name ""
name $name
>Nnn... Mmm...@
>It feels like you're about to come...\
lsp 700,":a;chara\tamamo_hc4.bmp",0,0:print 10,500
>I'll suck as hard as I can, so give me a feast.@
>Nnn.. *Suck*!\
name ""
skillname "Kitsune Mouth Handling"
dwave 1,"se\ero_buchu3.ogg"
>Tamamo sucks as hard as she can on Luka, wracking his body in pleasure!
mov %damage_kotei,1
damage 330,350
dwave 1,"se\ero_buchu3.ogg"
>Almost like a vacuum, she forcibly sucks out Luka's semen!
mov %damage_kotei,1
damage 330,350
skillname ""
name "Luka"
>Ah... Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\tamamo_hc5.bmp",0,0
gosub *syasei2
>My body shakes in pleasure as I come, filling Tamamo's small mouth with my semen.\
name $name
>Nnn... That was quite a lot.@
>*Suck* *Lick*\
name ""
>Tamamo licks up and swallows all of the semen I shot out.@
>Sucking on my penis as hard as she can, she's treating it as little more than a straw.\
skillname "Kitsune Mouth Handling"
dwave 1,"se\ero_buchu3.ogg"
>Tamamo sucks hard on the tip of Luka's penis, drawing out the rest of the semen still in his urethra!
mov %damage_kotei,1
damage 330,350
dwave 1,"se\ero_buchu3.ogg"
>Like a cat lapping at milk, her small tongue rubs against the tip of Luka's penis!
mov %damage_kotei,1
damage 330,350
skillname ""
name "Luka"
>Ahhh...\
name ""
>As she continues working on my penis, still sensitive after my orgasm, I start to softly moan.\
>I shake side to side as I try to break free, but there's no way out of her small mouth...\
skillname "Kitsune Mouth Handling"
dwave 1,"se\ero_buchu3.ogg"
>Tamamo starts to move her head back and forth, pumping Luka's penis!
mov %damage_kotei,1
damage 330,350
dwave 1,"se\ero_buchu3.ogg"
>Her soft lips trail up and down Luka's shaft with every pump!
mov %damage_kotei,1
damage 330,350
skillname ""
name "Luka"
>Ahh...\
name ""
name $name
>It looks like you're going to come again...@
>I'll suck it out!\
>*Suck*!\
name ""
skillname "Kitsune Mouth Handling"
dwave 1,"se\ero_buchu3.ogg"
>Tamamo's small tongue licks up Luka's pre-come as she sucks hard on him!
mov %damage_kotei,1
damage 330,350
dwave 1,"se\ero_buchu3.ogg"
>Like a vacuum, she forces out another orgasm from Luka!
mov %damage_kotei,1
damage 330,350
skillname ""
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\tamamo_hc7.bmp",0,0
gosub *syasei2
name $name
>Nnn... *Gulp*\
name ""
>I hear and feel Tamamo swallow my semen as I come out, hungrily devouring everything I give her.\
>Unable to do anything I just lean back as she feeds herself.\
mov %battle,0
mov %hsean,1
mov %viclose,1:gosub *lose
mov %2639,%2639+1:if %2639=1 mov %count_koenemy,%count_koenemy+1
if %2639>%count_most mov %count_most,%2639:mov $count_mostname,$name+" (2)"
count 4,5
mov $bad1,"Tamamo's blowjob forced Luka to come."
goto *tamamo2_hb



*tamamo2_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\tamamo_bk02.bmp",0,0
gosub *syasei2
>As Tamamo rubs Luka's penis against her tiny breasts, he comes, covering her flat chest in semen.\
mov %viclose,1:gosub *lose
mov %2639,%2639+1:if %2639=1 mov %count_koenemy,%count_koenemy+1
if %2639>%count_most mov %count_most,%2639:mov $count_mostname,$name+" (2)"
count 7,5
mov $bad1,"Tamamo used her flat chest to force Luka to come."
gosub *face2
name $name
>Fufu... So you came?@
>My chest is covered in your semen... \
name ""
goto *tamamo2_hb



*tamamo2_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 697,":a;chara\tamamo_bk07.bmp",0,0
gosub *syasei2
>As Tamamo's tiny feet press down on Luka penis, he comes, covering her feet in semen.\
mov %viclose,1:gosub *lose
mov %2639,%2639+1:if %2639=1 mov %count_koenemy,%count_koenemy+1
if %2639>%count_most mov %count_most,%2639:mov $count_mostname,$name+" (2)"
count 6,5
mov $bad1,"Tamamo used her foot to force Luka to come."
gosub *face2
name $name
>Fufu... So you came?@
>My feet are covered in your semen... \
name ""
goto *tamamo2_hb



*tamamo2_h7

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 696,":a;chara\tamamo_bk06.bmp",0,0
gosub *syasei2
>As Tamamo uses her rough tongue to lick Luka's face, he comes, covering her small body with semen.\
mov %viclose,1:gosub *lose
mov %2639,%2639+1:if %2639=1 mov %count_koenemy,%count_koenemy+1
if %2639>%count_most mov %count_most,%2639:mov $count_mostname,$name+" (2)"
count 32,5
mov $bad1,"Luka was forced to come as Tamamo licked him."
gosub *face2
name $name
>Just from a little licking?@
>How embarrassing... Fufu. \
name ""
goto *tamamo2_hb



*tamamo2_h8

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
if %hanyo2=1 lsp 690,":a;chara\tamamo_cta03.bmp",490,0
if %hanyo2=2 lsp 690,":a;chara\tamamo_ctb03.bmp",440,0
lsp 693,":a;chara\tamamo_bk03.bmp",0,0
lsp 694,":a;chara\tamamo_bk04.bmp",0,0
gosub *syasei2
>As Tamamo's nine tails run all over Luka's penis, he comes, covering her tails in semen.\
mov %viclose,1:gosub *lose
mov %2639,%2639+1:if %2639=1 mov %count_koenemy,%count_koenemy+1
if %2639>%count_most mov %count_most,%2639:mov $count_mostname,$name+" (2)"
count 19,5
mov $bad1,"Tamamo forced Luka to come with her secret skill."
if %hanyo2=1 lsp 690,":a;chara\tamamo_cta04.bmp",490,0
if %hanyo2=2 lsp 690,":a;chara\tamamo_ctb04.bmp",440,0
print 10,500
gosub *face2
name $name
>Fufu, in an instant?@
>My tail is all covered in semen... \
name ""
csp 690:print 10,500
goto *tamamo2_hb



*tamamo2_h9

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\tamamo_bk03.bmp",0,0
lsp 690,":a;chara\tamamo_ctc03.bmp",440,0
gosub *syasei2
>As Tamamo's nine tails run all over Luka's penis, he comes, covering her tails in semen.\
mov %viclose,1:gosub *lose
mov %2639,%2639+1:if %2639=1 mov %count_koenemy,%count_koenemy+1
if %2639>%count_most mov %count_most,%2639:mov $count_mostname,$name+" (2)"
count 19,5
mov $bad1,"Tamamo used her tails to force Luka to come."
lsp 690,":a;chara\tamamo_ctc04.bmp",440,0
gosub *face2
name $name
>Fufu, so you came?@
>My tails are all covered in semen... \
name ""
csp 690:print 10,500
goto *tamamo2_hb



*tamamo2_h10

mov %ikigoe,3:gosub *ikigoe
name $name
>My, that was fast...\
name ""
gosub *syasei1
lsp 700,":a;chara\tamamo_hb3.bmp",0,0
gosub *syasei2
>As soon as Luka is forced into her small vagina, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2639,%2639+1:if %2639=1 mov %count_koenemy,%count_koenemy+1
if %2639>%count_most mov %count_most,%2639:mov $count_mostname,$name+" (2)"
count 1,5
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come from simple insertion into Tamamo."
gosub *face2
name $name
>I didn't even get to feel you yet...@
>Did it feel that good inside me?\
>I'm not going to let it end with that. \
name ""
goto *tamamo2_hb



*tamamo2_h11

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\tamamo_hb3.bmp",0,0
gosub *syasei2
>Overwhelmed by her tiny vagina, Luka comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2639,%2639+1:if %2639=1 mov %count_koenemy,%count_koenemy+1
if %2639>%count_most mov %count_most,%2639:mov $count_mostname,$name+" (2)"
count 1,5
mov $bad1,"Luka was forced to come as Tamamo raped him."
gosub *face2
name $name
>Fufu, you came inside me...@
>You gave me so much, I don't know if it can even all fit. \
>But I'm not going to let it end with that. \
name ""
goto *tamamo2_hb



*tamamo2_ha

name $name
>Anyway, after exercising a little like that, I feel hungry...\
cspl 690,699
lsp 700,":a;chara\tamamo_hc1.bmp",0,0:print 10,500
>I think I shall feast a little on your semen...\
name ""
skillname "Kitsune Mouth Handling"
dwave 1,"se\ero_buchu3.ogg"
lsp 700,":a;chara\tamamo_hc3.bmp",0,0:print 10,500
>Tamamo bends over, and sucks Luka's penis into her small mouth!
mov %damage_kotei,1
damage 330,350
dwave 1,"se\ero_buchu3.ogg"
>Her rough tongue runs up and down his penis, licking him clean!
mov %damage_kotei,1
damage 330,350
skillname ""
name "Luka"
>Hyaaa!\
name ""
name $name
>Mmm... Your penis tastes delicious. @
>*Lick* *Lick*\
name ""
>I try to pull my waist back out of her mouth, but Tamamo's firm grip on me doesn't let me go anywhere.\
skillname "Kitsune Mouth Handling"
dwave 1,"se\ero_buchu3.ogg"
>Tamamo's mouth waters as she sucks on Luka, covering his penis with her warm saliva!
mov %damage_kotei,1
damage 330,350
dwave 1,"se\ero_buchu3.ogg"
>Her soft lips press against the shaft of Luka's penis as she sucks on him!
mov %damage_kotei,1
damage 330,350
skillname ""
name $name
>Ahh...\
name ""
name $name
>Nnn... Mmm...@
>It feels like you're about to come...\
lsp 700,":a;chara\tamamo_hc4.bmp",0,0:print 10,500
>I'll suck as hard as I can, so give me a feast.@
>Nnn.. *Suck*!\
name ""
skillname "Kitsune Mouth Handling"
dwave 1,"se\ero_buchu3.ogg"
>Tamamo sucks as hard as she can on Luka, wracking his body in pleasure!
mov %damage_kotei,1
damage 330,350
dwave 1,"se\ero_buchu3.ogg"
>Almost like a vacuum, she forcibly sucks out Luka's semen!
mov %damage_kotei,1
damage 330,350
skillname ""
name "Luka"
>Ah... Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\tamamo_hc5.bmp",0,0
gosub *syasei2
>My body shakes in pleasure as I come, filling Tamamo's small mouth with my semen.\
name $name
>Nnn... That was quite a lot.@
>*Suck* *Lick*\
name ""
>Tamamo licks up and swallows all of the semen I shot out.@
>Sucking on my penis as hard as she can, she's treating it as little more than a straw.\
skillname "Kitsune Mouth Handling"
dwave 1,"se\ero_buchu3.ogg"
>Tamamo sucks hard on the tip of Luka's penis, drawing out the rest of the semen still in his urethra!
mov %damage_kotei,1
damage 330,350
dwave 1,"se\ero_buchu3.ogg"
>Like a cat lapping at milk, her small tongue rubs against the tip of Luka's penis!
mov %damage_kotei,1
damage 330,350
skillname ""
name "Luka"
>Ahhh...\
name ""
>As she continues working on my penis, still sensitive after my orgasm, I start to softly moan.\
>I shake side to side as I try to break free, but there's no way out of her small mouth...\
skillname "Kitsune Mouth Handling"
dwave 1,"se\ero_buchu3.ogg"
>Tamamo starts to move her head back and forth, pumping Luka's penis!
mov %damage_kotei,1
damage 330,350
dwave 1,"se\ero_buchu3.ogg"
>Her soft lips trail up and down Luka's shaft with every pump!
mov %damage_kotei,1
damage 330,350
skillname ""
name "Luka"
>Ahh...\
name ""
name $name
>It looks like you're going to come again...@
>I'll suck it out!\
>*Suck*!\
name ""
skillname "Kitsune Mouth Handling"
dwave 1,"se\ero_buchu3.ogg"
>Tamamo's small tongue licks up Luka's pre-come as she sucks hard on him!
mov %damage_kotei,1
damage 330,350
dwave 1,"se\ero_buchu3.ogg"
>Like a vacuum, she forces out another orgasm from Luka!
mov %damage_kotei,1
damage 330,350
skillname ""
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\tamamo_hc7.bmp",0,0
gosub *syasei2
name $name
>Nnn... *Gulp*\
name ""
>I hear and feel Tamamo swallow my semen as I come out, hungrily devouring everything I give her.\
>Unable to do anything I just lean back as she feeds herself.\
>Overcome by ecstasy, I feel myself about to pass out as she continues sucking on me.\
mov %battle,0
mov %hsean,1
gosub *anten
gosub *clear_sprite
gosub *setwindow_01p
>Thus, I was defeated and made into Tamamo's lover.@
>Happily playing with me every day, she drowns me in pleasure.\
>I completely lose my original motive, and my faith at some point.@
>The only thing left to me is indulging myself as Tamamo's lover...\
>.................\
mov $bad2,"After that, Tamamo took Luka back to the Kitsune village as her lover."
goto *badend



*tamamo2_hb

mov %skill03,2
mov $bad2,"After that, Tamamo took Luka back to the Kitsune village as her lover."
if %2639=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>2 mov %hseanwave,1:hseanwave:goto *tamamo2_hb2
name "Luka"
>Ahh...\
name ""
>Exhausted, I fall to the ground.@
>Too weak, I can't resist Tamamo any longer...\
if %con_hvoice=0 dwave 0,"voice\tamamo2_01.ogg"
name $name
>Fufufu... It's my victory.
>Now to play with you...\
name ""
dwavestop 0
>Tamamo bounces on top of me, and presses the tiny entrance to her vagina against the tip of my penis.\
if %con_hvoice=0 dwave 0,"voice\tamamo2_02.ogg"
name $name
>How long can you endure my tight, tight pussy...?
>As my tight, soft insides clamp around you...\
name ""
dwavestop 0
>A lewd smile crosses her small face...\
mov %hseanwave,1:hseanwave
cspl 690,699
lsp 700,":a;chara\tamamo_hb1.bmp",0,0:print 10,500
>And forces me all the way inside in a single thrust!\
name "Luka"
>Ahhhh!\
name ""
>My penis pushes through her tight vagina, pushing aside her soft flesh as I invade deeper and deeper into her small body.\
if %con_hvoice=0 dwave 0,"voice\tamamo2_03.ogg"
name $name
>Fufu, how cute...
>Letting out a voice like that just from insertion...\
name ""
dwavestop 0
goto *tamamo2_hb2



*tamamo2_hb2

>Tamamo clenches her stomach, squeezing her already tight vagina down even harder around me.\
name "Luka"
>Ahh... You're too tight...\
name ""
if %con_hvoice=0 dwave 0,"voice\tamamo2_04.ogg"
name $name
>Horehore, I want to play more. 
>I'll use my fluffy tail to give you some extra service. \
name ""
dwavestop 0
lsp 700,":a;chara\tamamo_hb2.bmp",0,0:print 10,500
>Tamamo slowly winds her tail around me.@
>As the soft, fluffy tail rubs against my skin, I feel entranced by the incredible sensations.\
name "Luka"
>Ahh...!\
name ""
>She continues squeezing me as her tail massages my body.@
>Overcome by pleasure, I squirm under her tiny body.\
if %con_hvoice=0 dwave 0,"voice\tamamo2_05.ogg"
name $name
>Oho, how shameful...
>Being so confused from a girl riding you...\
name ""
dwavestop 0
>Tamamo giggles to herself as she squeezes down harder, just toying with me.\
name "Luka"
>A...Amazing...@> Ahh!\
name ""
if %con_hvoice=0 dwave 0,"voice\tamamo2_06.ogg"
name $name
>Fufu... You seem to be quite enjoying my tight, tight pussy...
>Then allow me to have some fun, too...\
name ""
dwavestop 0
lsp 700,":a;chara\tamamo_hb3.bmp",0,0:print 10,500
>Tamamo starts to slowly move her hips.@
>Rubbing her small butt against my lower body, she starts to slowly bring me in and out of her.\
name "Luka"
>Ah...!@> Ahhh!\
name ""
if %con_hvoice=0 dwave 0,"voice\tamamo2_07.ogg"
name $name
>Nnn... Your thing is quite good...
>I'll have you rub against the deepest part of my pussy...\
name ""
dwavestop 0
>Tamamo starts to move side to side, forcing the tip of my penis to rub against her deepest part.\
>I quickly feel myself about to come as her tight vagina squeezes down on me, with her movements bringing explosions of pleasure from each motion.\
name "Luka"
>Ahh... I'm going to come already...\
name ""
if %con_hvoice=0 dwave 0,"voice\tamamo2_08.ogg"
name $name
>Hmmhmm... That's too fast.
>Won't you let me have some more fun?\
name ""
dwavestop 0
>Tamamo doesn't stop moving as she speaks.@
>As her tiny body continues slowly moving and rubbing against mine, I feel myself unable to endure it like she wants.\
name "Luka"
>No... Coming... !@
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\tamamo_hb4.bmp",0,0
gosub *syasei2
>Disappointing Tamamo, I come inside of her quickly, almost as if accidentally ejaculating.\
>As my semen floods into her tiny vagina, I relax in the afterglow.\
lsp 700,":a;chara\tamamo_hb5.bmp",0,0:print 10,500
if %con_hvoice=0 dwave 0,"voice\tamamo2_09.ogg"
name $name
>Sheesh, already letting it out?
>Giving up after just this level... What a miserable penis.\
if %con_hvoice=0 dwave 0,"voice\tamamo2_10.ogg"
>I'll punish you a little...\
name ""
dwavestop 0
>Suddenly, her vagina closes far tighter than ever before.@
>Almost as if her soft flesh was trying to strangle me inside her.\
name "Luka"
>Ahh...!@>T...Too tight!\
name ""
lsp 700,":a;chara\tamamo_hb6.bmp",0,0:print 10,500
if %con_hvoice=0 dwave 0,"voice\tamamo2_11.ogg"
name $name
>Hoore, I'll make it tighter.
>Horehorehore!\
name ""
dwavestop 0
name "Luka"
>Hyaaa!!\
name ""
>The pressure gets more and more intense.@
>My penis starts to sink deep into her soft flesh, almost as if I was a part of her body itself.\
>It feels like she's squeezing me as hard as she can.@
>I let out a pleasure filled groan of pain as I beg her to stop.\
name "Luka"
>Ahh... N...Not that tight, please!\
name ""
if %con_hvoice=0 dwave 0,"voice\tamamo2_12.ogg"
name $name
>Fufufu... My pussy will squeeze your thing like a vise.
>Hoore, horehorehore! \
name ""
dwavestop 0
name "Luka"
>Ah...!@> Aiieee!\
name ""
>I writhe under her, trying everything to escape from this painful pleasure.@
>But even though she's so tiny, my attempts at getting her off of me are fruitless.\
>As I squirm, I feel myself about to come...@
>But since she's squeezing me so tight, even that is easily stopped up.\
if %con_hvoice=0 dwave 0,"voice\tamamo2_13.ogg"
name $name
>Fufufu... I could crush your thing like this.\
name ""
dwavestop 0
name "Luka"
>S...Stop... Not that...\
name ""
if %con_hvoice=0 dwave 0,"voice\tamamo2_14.ogg"
name $name
>Don't worry, I won't do that...
>In return, I'll just squeeze you some more...\
name ""
dwavestop 0
name "Luka"
>Ah...!@> Ahhh!\
name ""
>Tamamo continues squeezing me as I gasp under her.@
>But even though I want to come, she's easily blocking me, making me unable to release...\
if %con_hvoice=0 dwave 0,"voice\tamamo2_15.ogg"
name $name
>Fufu... If I make it just a little looser, you'll come in an instant.
>Well? Do you want to come?\
name ""
dwavestop 0
name "Luka"
>Ahh... Looser...\
name ""
>I beg Tamamo for freedom from her tight vagina...\
if %con_hvoice=0 dwave 0,"voice\tamamo2_16.ogg"
name $name
>Then I'll squeeze some more. \
name ""
dwavestop 0
name "Luka"
>Ahhhh!\
name ""
>I gasp in ecstasy as she continues forcing painful pleasure into me, but still not allowing me to come.\
name "Luka"
>Ahh... Ah!\
name ""
if %con_hvoice=0 dwave 0,"voice\tamamo2_17.ogg"
name $name
>Horehore... Is it painful?
>Do you want to come?\
name ""
dwavestop 0
name "Luka"
>I want to come... Please, let me...\
name ""
>I want to be freed from this tight hell...@
>With tears in my eyes, I beg Tamamo for release.\
if %con_hvoice=0 dwave 0,"voice\tamamo2_18.ogg"
name $name
>You're helpless... Hoore, I'll loosen it...
>If I make it a little less tight like this...\
name ""
dwavestop 0
name "Luka"
>Ahhh...!\
name ""
>Finally granted release, the pleasure that has been denied to me is finally released.@
>Feeling like my body itself is exploding, my body shakes as I reach a powerful orgasm.\
gosub *syasei1
lsp 700,":a;chara\tamamo_hb7.bmp",0,0
gosub *syasei2
>I erupt in her, almost like my penis is splitting open.@
>A huge amount of semen shoots straight into her tiny vagina.\
name "Luka"
>Ahh...\
name ""
>Breathing hard, I lay down after the intense orgasm, feeling like my heart and soul itself were just forced to submit.\
>And sitting on top of me, Tamamo looks down at me and giggles.\
if %con_hvoice=0 dwave 0,"voice\tamamo2_19.ogg"
name $name
>Fufu... And now the punishment is over.\
if %con_hvoice=0 dwave 0,"voice\tamamo2_20.ogg"
>Next will be something sweet.
>This time I'll give you a nice orgasm. \
name ""
dwavestop 0
name "Luka"
>Ah... Ahh!\
name ""
mov %hseanwave,4:hseanwave
>I feel Tamamo tightening around me again...@
>But she quickly releases it, making it looser.\
>Following that, she clamps down again, and quickly releases.@
>Like that, she continues in a rhythm alternating between the two stimulations.\
name "Luka"
>Ahh... What... Is this...?\
name ""
if %con_hvoice=0 dwave 0,"voice\tamamo2_21.ogg"
name $name
>Fufufu... This technique feels amazing, doesn't it?
>I'll use my vagina to give your thing a nice massage...\
name ""
dwavestop 0
name "Luka"
>Haaa... It feels so good...\
name ""
>Tamamo's soft vaginal walls squeeze and loosen around me, as if her tiny vagina was massaging me.\
>Tight, loose, tight loose...@
>The incredible massage quickly sends me to the edge.\
name "Luka"
>Ahh... I'm going to come...\
name ""
if %con_hvoice=0 dwave 0,"voice\tamamo2_22.ogg"
name $name
>Sheesh... As fast as usual.
>Hoore, go ahead and come. \
name ""
dwavestop 0
>Tamamo grins at me as she makes her rhythm even faster.\
name "Luka"
>C...Coming... Ahh!\
name ""
gosub *syasei1
lsp 700,":a;chara\tamamo_hb8.bmp",0,0
gosub *syasei2
>My body shakes as I come, pouring my semen into her.@
>After the drawn out orgasm from before, the quick ejaculation almost seems disappointing.\
name "Luka"
>Ahh...\
name ""
>It's like I can't even think about anything but this pleasure any longer...@
>My heart and body are crumbling before her relentless onslaught of ecstasy.\
if %con_hvoice=0 dwave 0,"voice\tamamo2_23.ogg"
name $name
>Fufu... You'll be my lover from now on.
>I'll be loving you for a long time, so prepare yourself...\
name ""
dwavestop 0
name "Luka"
>Ahh...\
name ""
>I can't do anything but feebly nod at her words.@
>If she's able to show me such pleasure, there's no way I could deny her.\
>My body and heart already completely belong to her...\
gosub *anten
mov %hseanwave,0:hseanwave
>Thus, I was defeated and made into Tamamo's lover.@
>Happily playing with me every day, she drowns me in pleasure.\
>I completely lose my original motive, and my faith at some point.@
>The only thing left to me is indulging myself as Tamamo's lover...\
>............\
goto *badend



*erbetie2_start

mov $name,"Erubetie"
mov $name2,"Erubetie"
mov $lavel,"erbetie2"
mov $tatie1,"erbetie_st01"
mov $tatie2,"erbetie_st01"
mov $tatie3,"erbetie_st01"
mov $tatie4,"erbetie_st01"
mov $haikei,"bg047"
mov %monster_x,225
mov %monster_y,0
if %nanido=1 mov %max_enemylife,22000
if %nanido=2 mov %max_enemylife,27000
if %nanido=3 mov %max_enemylife,33000
if %nanido=0 mov %max_enemylife,1
if %nanido=1 mov %kousoku_maxhp,400
if %nanido=2 mov %kousoku_maxhp,400
if %nanido=3 mov %kousoku_maxhp,800
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,50
if %nanido=3 mov %earth_keigen,25
mov %music,4
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $half_s1,"Dissolve into nothing..."
mov $half_s2,"You'll enjoy it..."
mov $kiki_s1,"Don't you want to dissolve away into nothing?"
mov $kiki_s2,"Or would you rather I play with you first...?"
mov %end_n,9
mov %exp_minus,1070025
mov %zmonster_x,-50
mov %tukix,320
mov %owaza_count1a,8
mov %owaza_count1b,8
mov %owaza_count3a,8
mov %owaza_count3b,8
>Erubetie moves in front of me next.\
>The Queen Slime who hates humans for destroying her race's habitat...\
>I won't be able to deal with her using normal means...\
name $name
>I'm different from Tamamo and Alma Elma.\
>There will be no foolish attempt at training you.@
>Nor will I be a fool and try to do anything less than crush you.\
name ""
lsp 701,":a;chara\arumaeruma_st11.bmp",-200,0
lsp 700,":a;chara\tamamo_st04.bmp",225,0:print 10,500
name "Alma Elma"
>Oh?@>Did I do something like that?\
name ""
name "Tamamo"
>Oh dear, whatever are you talking about?\
name ""
csp 701
lsp 700,":a;chara\erbetie_st01.bmp",225,0:print 10,500
name $name
>...I'll never go easy on one of you intruding humans.@
>You humans, who have caused so much harm to us Slimes, are unforgivable.\
>I'll wrap all the humans in my body and melt them away...@
>Starting with you.\
name ""
mov %hanyo1,0
mov %sinkou,1
goto *common_main



*erbetie2001

if %enemylife<19000 && %sinkou=1 && %kousoku=0 goto *erbetie2002
if %enemylife<16000 && %sinkou=2 && %kousoku=0 goto *erbetie2003
if %enemylife<13000 && %sinkou=3 && %kousoku=0 goto *erbetie2004
if %enemylife<10000 && %sinkou=4 && %kousoku=0 goto *erbetie2005
if %enemylife<7000 && %sinkou=5 && %kousoku=0 goto *erbetie2006
if %enemylife<4000 && %sinkou=6 && %kousoku=0 goto *erbetie2007
goto *common_main



*erbetie2002

name $name
>You speak of coexisting with humans...@
>But do you simply not realize how long we have suffered at the hands of humans?\
>Undine, whom you begged for power from...@
>She herself was driven to the edge as the area humans took up continued to grow.\
>Along with us Slimes, there are many other monsters suffering the same fate...@
>As you humans grow, we die!\
>Is that what you mean when you talk about us living together!?\
name ""
name "Luka"
>...Humans don't understand monsters at all yet.@
>The overwhelming majority don't even know about the troubles they are causing you.\
>But, as we come to understand each other...\
name ""
name $name
>Understand what!?@
>If they are ignoring our pains, then why should we care about theirs!?\
>We shall instill fear in them, and show them the pain they showed us!@>Then we shall see just how long they can remain ignorant of our suffering!\
name ""
name "Luka"
>...............\
name ""
mov %sinkou,2
goto *common_main



*erbetie2003

name "Luka"
>Erubetie... Have you ever tried appealing to humans directly?@
>Telling them just how much your race has suffered?\
name ""
name $name
>What could humans possibly understand about our pains?\
name ""
name "Luka"
>They'll understand...@>Humans aren't stupid.@
>If they know the pain you're in, many will come to your aid!\
>If a step is never taken to resolving the issue, how can you expect it to ever get better!?\
name ""
mov %sinkou,3
goto *common_main



*erbetie2004

name $name
>Understanding... Coexistence...@>I'm sick of these hypocritical words!@>Is that why you fight?@> So you can overlook your own hypocrisy!?\
name ""
name "Luka"
>If I am...@
>Then you're a hypocrite too, Erubetie.\
>You're acting the victim, and looking down on humans at the same time...@> Abandoning all attempts at an intelligent solution, and moving on a path of violence and fear.\
>Charging forth and fighting for the sake of victims, you're creating even more victims!@
>How is that anything but hypocrisy?\
name ""
name $name
>Humans would-\
name ""
name "Luka"
>You think so little of humans.@
>You believe them to be beneath you, and you're unwilling to even try!\
name ""
mov %sinkou,4
goto *common_main



*erbetie2005

name "Luka"
>...There are humans just like you.@
>They consider monsters things just to be destroyed.\
>There was a man who said much the same...@
>That humans would never be able to understand monsters.\
>As long as they were more powerful than us, we could never live side by side with them.\
name ""
name $name
>...He sounds like a smart man.@
>Humans should be scared of us!\
>We'll educate you with fear!@
>Until it's ingrained in humanity's mind that they should never trifle with us!\
name ""
name "Luka"
>Educate humans with fear...?@
>The reason humans are even killing monsters is because they fear them!\
>As long as humans are afraid of you, they'll never understand you!@
>All you're doing is prolonging the suffering on both sides!\
name ""
mov %sinkou,5
goto *common_main



*erbetie2006

name "Luka"
>Erubetie...@
>The reason you hate humans so much is because you know nothing about them.\
>If we can come together in coexistence, everything will be so much better...@> The only reason this unhappy reality exists right now is because we aren't living in peace.\
>Your race has been forced into such a corner...@>Surely you must recognize that your path isn't working?\
name ""
name $name
>But, I...@
>I cannot forgive humans...\
>Humans have tortured my race for so long...@
>So... I'll...!\
name ""
name "Luka"
>So you want revenge?@
>That's your true motivation, isn't it?\
>What does that get you?@
>After it's over, the human side is just going to fight back and get revenge, too!\
>All you're doing is creating more misfortune and hatred!\
name ""
name $name
>If that's how it ends up, then so be it!@
>My belief in ruling humans by fear will not change!\
name ""
name "Luka"
>If that's your intention, all the way to the end...@
>Then I'll stop you!\
name ""
mov %sinkou,6
goto *common_main



*erbetie2007

name $name
>No matter what you say...@
>I'll never live in peace with you humans!\
>Get used to humans?@>Understand humans?@> I can't do that!\
name ""
name "Luka"
>..............\
name ""
>It felt like Erubetie's heart wavered with that last shout...\
>It was as if she was trying to convince herself more than me...\
mov %sinkou,7
goto *common_main



*erbetie2008

name $name
>Do you honestly think you have driven me into a corner?@
>That you could beat the Queen of Slimes with a sword!?\
name ""
dwave 1,"se\ero_slime3.ogg"
lsp 700,":a;chara\erbetie_st01.bmp",225,0
lsp 702,":a;chara\erbetie_st01.bmp",0,0
lsp 704,":a;chara\erbetie_st01.bmp",450,0:print 10,500
>Erubetie divides!\
name "Luka"
>Guh... Which is the real body?\
name ""
name $name
>None is an illusion, nor is any a fake.@
>I can simply divide my body itself as freely as I wish...\
name ""
name "Luka"
>N...No way...!\
name ""
mov %sinkou,8
mov %hanyo1,1
rnd2 %ransu,1,3
if %ransu=1 gosub *erbetie2_a1:goto *common_main
if %ransu=2 gosub *erbetie2_a2:goto *common_main
if %ransu=3 gosub *erbetie2_a3:goto *common_main



*erbetie2009

name $name
>This isn't just a mere self destruction...@
>It's an ultimate skill, designed to turn every piece of my body into pure energy.\
>At this point-blank range, not even a single cell will remain of you...\
name ""
skillname "Nuclear Fission Countdown"
dwave 1,"se\power.ogg"
mov %kousoku,6
>Erubetie's body begins to radiate extreme heat!\
skillname ""
name "Luka"
>Wh...What are you doing!?\
name ""
>I shiver as the devastating energy slams into me.@
>At this rate, she's going to destroy the entire castle!\
name "Luka"
>Stop it Erubetie!@
>If you make such a huge explosion, you'll kill a bunch of innocent monsters!\
name ""
lsp 701,":a;chara\arumaeruma_st12.bmp",-200,0
lsp 700,":a;chara\tamamo_st03.bmp",225,0:print 10,500
name "Alma Elma"
>That's right, what are you thinking!?\
name ""
name "Tamamo"
>Quit that right now!\
name ""
csp 701
lsp 700,":a;chara\erbetie_st01.bmp",225,0:print 10,500
name $name
>...Leave this continent quickly.@
>This explosion will cause a chain reaction, and annihilate the entire continent.\
name ""
goto *common_main



*erbetie2010

name $name
>Haha, let's count down, Luka.@
>We'll meet oblivion together.\
name ""
skillname "Countdown to Oblivion"
dwave 1,"se\power.ogg"
mov %kousoku,7
>Energy fills the room as the reaction begins inside Erubetie's body!\
skillname ""
name "Luka"
>Stop it Erubetie!@
>What do you think this is going to solve!?\
>Both of us will just die meaningless deaths!@
>Even worse, you'll kill thousands of innocents!\
name ""
name $name
>................\
name ""
mov $mogaku_sel1,""
mov $mogaku_sel2,""
mov $mogaku_sel3,""
mov $mogaku_sel4,""
mov $mogaku_sel5,""
goto *common_main



*erbetie2_v

if %nanido=0 goto *erbetie2_v2
if %sinkou<8 && kousoku>0 mov %kousoku,0:gosub *status_print
if %sinkou<8 goto *erbetie2_v1
name "Luka"
>Do you want to kill me that badly!?@
>Is that the conclusion you've come to!?\
>Getting other innocents involved, and dying a meaningless death...@
>Is that really what you want!?\
name ""
name $name
>And if it is?\
name ""
name "Luka"
>Then you'll be the same as those you hate!@
>No... If you destroy this entire continent, you'll be far worse!\
>You realize it yourself, right!?@
>This won't solve anything!\
name ""
name $name
>Yes... It won't solve anything.\
>................\
>...Indeed, it is pointless.\
name ""
mov %kousoku,0:gosub *status_print
dwave 1,"se\dassyutu.ogg"
>Erubetie slowly stops her reaction, and lets Luka go!\
name "Luka"
>Eh...!?\
name ""
>I'm stunned at being released at the last minute.\
bgm "bgm\hutuu2.ogg"
name "Luka"
>...Did my words reach you, Erubetie...?\
name ""
name $name
>Not at all.\
>But there is one thing I realized...@
>Nobody would benefit if we killed each other here.\
name ""
name "Luka"
>Erubetie...\
name ""
goto *erbetie2_v2



*erbetie2_v1

mov %enemylife,2000
if %enemylife>%max_enemylife mov %enemylife,%max_enemylife
mov %gage,%enemylife*100/%max_enemylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
print 10,500
goto *erbetie2008



*erbetie2_v2

name $name
>This useless fight is over.@
>Granberia will dispose of you.\
name ""
mov %viclose,1:gosub *victory
mov %getexp,300000:gosub *lvup
mov %2340,1
mov %skill05,3
goto *sean0299



*erbetie2_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance!\
gosub *face2
name $name
>Good... So you want to drown in me...\
name ""
goto *erbetie2_a



*erbetie2_kousan2

name $name
>Making requests now?@
>This explosion will annihilate you...\
name ""
goto *erbetie2_main



*erbetie2_main

gosub *cmd_main
if %cmd1=11 && %nanido=0 goto *common_attack
if %cmd1=11 && %kousoku=1 mov %abairitu,50:goto *common_miss2
if %cmd1=11 && %kousoku>1 goto *common_mogaku
if %cmd1=11 && %sinkou=11 goto *common_mogaku
if %cmd1=11 && %sinkou<8 goto *common_attack
if %cmd1=11 && %sinkou>7 goto *erbetie2_attack1
if %cmd1=12 && %sinkou=11 goto *common_mogaku
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *erbetie2_mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 && %sinkou<11 goto *erbetie2_kousan
if %cmd1=15 && %sinkou=11 goto *erbetie2_kousan2
if %cmd1=16 && %sinkou<11 goto *erbetie2_onedari
if %cmd1=16 && %sinkou=11 goto *erbetie2_kousan2
if %cmd1=17 && %nanido=0 goto *common_skill
if %cmd1=17 && %sinkou<8 goto *common_skill
if %cmd1=17 && %sinkou>7 goto *erbetie2_skill
goto *erbetie2_main



*erbetie2_attack1

if %aqua=2 goto *erbetie2_attack2
mov %before_action,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ha!"
if %ransu=2 mov $sel1,"Hya!"
if %ransu=3 mov $sel1,"Orya!"
name "Luka"
eng $sel1:$sel6\
name ""
mov %skill_sub,1
gosub *common_attack2
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\slash2.ogg"
if %fire=0 mov %abairitu,100+%mylv
if %fire=3 mov %abairitu,200+%mylv*2
gosub *enemylife
if %wind=0 goto *erbetie2_bunretu
mov %skill_sub,1
gosub *common_attack2
dwave 1,"se\slash2.ogg"
if %fire=0 mov %abairitu,100+%mylv
if %fire=3 mov %abairitu,200+%mylv*2
gosub *enemylife
goto *erbetie2_bunretu



*erbetie2_attack2

mov %before_action,4
mov %skill_sub,1
gosub *common_attack1
dwave 1,"se\slash2.ogg"
mov %abairitu,140+%mylv*7/5
gosub *enemylife
skillname ""
goto *erbetie2_bunretu



*erbetie2_bunretu

dwave 1,"se\ero_slime3.ogg"
csp 700:print 10,500
>Erubetie collapses!\
name $name
>Pointless...\
name ""
if %enemylife>0 skip 7
mov %enemylife,2000
mov %gage,%enemylife*100/%max_enemylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
print 10,500
dwave 1,"se\ero_slime3.ogg"
lsp 700,":a;chara\erbetie_st01.bmp",225,0
lsp 702,":a;chara\erbetie_st01.bmp",0,0
lsp 704,":a;chara\erbetie_st01.bmp",450,0:print 10,500
>But Erubetie divides again!\
if %sinkou=9 goto *erbetie2_bunretu2
if %sinkou=10 && %fire=3 goto *erbetie2_bunretu3
if %sinkou=10 && %fire=0 goto *erbetie2_bunretu2
rnd2 %ransu,1,3
if %ransu=1 gosub *erbetie2_a1:skip 3
if %ransu=2 gosub *erbetie2_a2:skip 2
if %ransu=3 gosub *erbetie2_a3
name $name
>It's useless, no matter how much you attack...@
>I'll just keep dividing, forever.\
name ""
name "Luka"
>Guh...!\
name ""
>Does that mean this is a stalemate...?\
lsp2 0,":a;chara\salamander_st02.bmp",200,300,100,100,0,200
gosub *syoukan_effect
name "Salamander"
>Then all you have to do is defeat all of her bodies at once.@
>Fill your sword with flame, and let loose on them.\
name ""
name "Luka"
>Yeah... Let's give it a try!\
name ""
mov %sinkou,9
goto *common_main



*erbetie2_bunretu2

if %first_sel2=1 skip 10
name $name
>No human can defeat all at once...\
name ""
name "Luka"
>Guh...!\
name ""
>I can't just attack at random...@
>My only choice is to use the flame to power up an attack.\
mov %first_sel2,1
rnd2 %ransu,1,3
if %ransu=1 gosub *erbetie2_a1:goto *common_main
if %ransu=2 gosub *erbetie2_a2:goto *common_main
if %ransu=3 gosub *erbetie2_a3:goto *common_main



*erbetie2_bunretu3

if %first_sel3=1 skip 12
name $name
>Such power...@>But it still isn't enough to defeat me.\
name ""
name "Luka"
>Guh...!\
name ""
name "Salamander"
>That isn't good enough!@
>You have to overwhelm her with your flame!\
name ""
mov %first_sel3,1
rnd2 %ransu,1,3
if %ransu=1 gosub *erbetie2_a1:goto *common_main
if %ransu=2 gosub *erbetie2_a2:goto *common_main
if %ransu=3 gosub *erbetie2_a3:goto *common_main



*erbetie2_mogaku_earth2

mov %before_action,8
if %nanido=3 rnd2 %ransu,1,2:if %ransu=2 goto *mogaku_earth1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"With this power...!"
if %ransu=2 mov $sel1,"With Gnome's power...!"
if %ransu=3 mov $sel1,"With the power of the earth...!"
name "Luka"
eng $sel1:$sel6\
name ""
dwave 1,"se\power.ogg"
>The power of the earth fills Luka as he struggles!@
mov %kousoku,0:gosub *status_print
dwave 1,"se\dassyutu.ogg"
>Struggling with all his might, Luka breaks free!\
mov %owaza_count1b,0
mov %owaza_num1,0
name $name
>You don't want us to play with you?@
>That's too bad... We were going to show you a hell of slimy pleasure...\
name ""
dwave 1,"se\ero_slime3.ogg"
csp 702:csp 704
mov %monster_x,225
gosub *face1
mov %hanyo1,0
>Erubetie gathers back up!\
goto *common_main



*erbetie2_kaihou

gosub *face3
name $name
>You're struggling an awful lot...\
name ""
mov %kousoku,0:gosub *status_print
dwave 1,"se\dassyutu.ogg"
>Attacking from the inside, Luka's sword tears open the slime around him!\
gosub *face1
mov %owaza_count1a,0
goto *common_main



*erbetie2_skill

gosub *cmd_skill
if %cmd1=24 goto *skill4
if %cmd1=26 goto *erbetie2_skillx1
if %cmd1=27 goto *erbetie2_skillx1
if %cmd1=28 goto *erbetie2_skillx1
if %cmd1=29 goto *skill15
if %cmd1=30 && %sinkou<10 goto *erbetie2_skillx1
if %cmd1=30 && %sinkou=10 && %fire=3 goto *erbetie2_skill16
if %cmd1=30 && %sinkou=10 && %fire=0 goto *erbetie2_skillx1
if %cmd1=31 goto *skill7c
if %cmd1=32 goto *skill8c
if %cmd1=33 goto *skill10b
if %cmd1=34 && %sinkou=8 goto *erbetie2_skill14
if %cmd1=34 && %sinkou=9 goto *erbetie2_skill14
if %cmd1=34 && %skill05=2 goto *skill14b
if %cmd1=34 && %skill05=3 goto *skill14c
if %cmd1=35 goto *skill17
if %cmd1=-1 goto *erbetie2_main
goto *erbetie2_skill



*erbetie2_skillx1

if %cmd1=26 mov %skill_sub,3:gosub *skill11:skip 4
if %cmd1=27 mov %skill_sub,3:gosub *skill12:skip 3
if %cmd1=28 mov %skill_sub,3:gosub *skill13:skip 2
if %cmd1=30 mov %skill_sub,3:gosub *skill16
mov %skill_sub,0
goto *erbetie2_bunretu



*erbetie2_skill14

mov %before_action,46
mov %count_fire,%count_fire+1
name "Luka"
>Ignite my sword with the flames of hell...!\
name ""
mov %mp,%max_mp
gosub *mp
skillname "Hellfire Sword"
mov %wind,0:mov %wind_turn,0:mov %earth,0:mov %earth_turn,0
mov %fire,2:mov %fire_turn,5
dwave 2,"se\fire2.ogg"
lsp2 0,":a;chara\salamander_st02.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *elm_print
>The flames of hell take hold in Luka's sword!\
skillname ""
name "Salamander"
>...That's no good.@
>You need to put more of your fighting spirit into your sword.\
>Otherwise, you'll never defeat Erubetie...\
name ""
name "Luka"
>B...But... More than this...?\
name ""
>My spirit is already at its maximum.@
>Igniting my heart even further is too much...\
name "Salamander"
>...Why did you pick up that sword of yours?@
>Wasn't it to fix the mistakes of those like Erubetie?\
name ""
name "Luka"
>...!!\
name ""
>That's right...\
mov %skill05,3
name "Luka"
>Salamander, purify everything with the flames of purgatory!\
name ""
skillname "Purgatory Flame"
mov %fire,3:mov %fire_turn,5
dwave 2,"se\fire4.ogg"
lsp2 0,":a;chara\salamander_st02.bmp",200,300,100,100,0,200
gosub *syoukan_effect
>The purifying flames of purgatory take hold in Luka's sword!\
skillname ""
name "Luka"
>Th...This flame...!\
name ""
>My sword glows with a radiant light.@
>Almost as if humming with power, I can feel the incredible increase in power running up my sword arm.\
name "Luka"
>But... I feel somewhat calmer than before.@
>My heart isn't boiling in fighting spirit like it used to be.\
name ""
name "Salamander"
>You've become able to keep your presence of mind as you control your flames.\
>As you are now, you should be able to wield my power the same way you do Sylph and Gnome's.\
name ""
name "Luka"
>At the same time as Sylph and Gnome...\
name ""
>Even with my sword radiating power, I can still manage to meditate.@>Not only that, but my SP won't go to zero in exhaustion once the effect ends.\
>Finally, I should be able to summon Salamander at the same time as the other spirits...\
name "Salamander"
>You're not simply borrowing my power like you were before.@
>Right now, you've completely made it your own.\
>In other words, my power is your power!@
>Now is the time to wield your scorching hot sword for what you believe in!\
name ""
name "Luka"
>Alright, got it!\
name ""
mov %sinkou,10
rnd2 %ransu,1,3
if %ransu=1 gosub *erbetie2_a1:goto *common_main
if %ransu=2 gosub *erbetie2_a2:goto *common_main
if %ransu=3 gosub *erbetie2_a3:goto *common_main



*erbetie2_skill16

mov %before_action,29
rnd2 %ransu,1,2
if %ransu=1 mov $sel1,"Be purified in an explosion of crimson fire... Vaporizing Rebellion Sword!"
if %ransu=2 mov $sel1,"To me, Salamander! Vaporizing Rebellion Sword!"
name "Luka"
eng $sel1:$sel6\
name ""
mov %mp,%mp-4
gosub *mp
skillname "Vaporizing Rebellion Sword"
eng "Burning with the flames of purgatory, Luka attacks in a whirlwind of fire!"
$sel6
delay 500
csp 590:csp 591
skillname1 "Vaporizing Rebellion Sword"
textoff
vspl 3,650,0
dwave 2,"se\fire2.ogg"
lsp2 0,":c;effect\cutin_ruka_fire.bmp",600,150,100,100,0,10
lsp2 1,":c;effect\cutin_fire.bmp",200,150,100,100,0,10
gosub *skill_cutin
texton
vspl 3,650,1
csp 0:csp 1
skillname "Vaporizing Rebellion Sword"
gosub *skill16a
textclear
dwave 1,"se\slash.ogg"
rnd2 %abairitu,200+%mylv*2,300+%mylv*3
vsp 702,0:print 10,15
vsp 702,1:print 10,15
vsp 702,0:print 10,15
vsp 702,1:print 10,15
vsp 702,0:print 10,15
vsp 702,1:print 10,15
mov %damage,%abairitu*%mylv*%damage_keigen/2000
rnd2 %damage,%damage*9/10,%damage*11/10
itoa $sel1,%damage
eng "Erubetie takes "+$sel1+" damage!"
$sel6
mov %enemylife,%enemylife-%damage
if %enemylife<0 mov %enemylife,0
if %enemylife=0 mov %gage,0 skip 3
mov %gage,%enemylife*100/%max_enemylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
print 10,500
dwave 1,"se\slash.ogg"
rnd2 %abairitu,200+%mylv*2,300+%mylv*3
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
mov %damage,%abairitu*%mylv*%damage_keigen/2000
rnd2 %damage,%damage*9/10,%damage*11/10
itoa $sel1,%damage
eng "Erubetie takes "+$sel1+" damage!"
$sel6
mov %enemylife,%enemylife-%damage
if %enemylife<0 mov %enemylife,0
if %enemylife=0 mov %gage,0 skip 3
mov %gage,%enemylife*100/%max_enemylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
print 10,500
textclear
dwave 1,"se\slash.ogg"
rnd2 %abairitu,200+%mylv*2,300+%mylv*3
vsp 702,0:print 10,15
vsp 702,1:print 10,15
vsp 702,0:print 10,15
vsp 702,1:print 10,15
vsp 702,0:print 10,15
vsp 702,1:print 10,15
mov %damage,%abairitu*%mylv*%damage_keigen/2000
rnd2 %damage,%damage*9/10,%damage*11/10
itoa $sel1,%damage
eng "Erubetie takes "+$sel1+" damage!"
$sel6
mov %enemylife,%enemylife-%damage
if %enemylife<0 mov %enemylife,0
if %enemylife=0 mov %gage,0 skip 3
mov %gage,%enemylife*100/%max_enemylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
print 10,500
dwave 1,"se\slash.ogg"
rnd2 %abairitu,200+%mylv*2,300+%mylv*3
vsp 704,0:print 10,15
vsp 704,1:print 10,15
vsp 704,0:print 10,15
vsp 704,1:print 10,15
vsp 704,0:print 10,15
vsp 704,1:print 10,15
mov %damage,%abairitu*%mylv*%damage_keigen/2000
rnd2 %damage,%damage*9/10,%damage*11/10
itoa $sel1,%damage
eng "Erubetie takes "+$sel1+" damage!"
$sel6
mov %enemylife,%enemylife-%damage
if %enemylife<0 mov %enemylife,0
if %enemylife=0 mov %gage,0 skip 3
mov %gage,%enemylife*100/%max_enemylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
print 10,500
dwave 1,"se\slash.ogg"
rnd2 %abairitu,200+%mylv*2,300+%mylv*3
vsp 704,0:print 10,15
vsp 704,1:print 10,15
vsp 704,0:print 10,15
vsp 704,1:print 10,15
vsp 704,0:print 10,15
vsp 704,1:print 10,15
mov %damage,%abairitu*%mylv*%damage_keigen/2000
rnd2 %damage,%damage*9/10,%damage*11/10
itoa $sel1,%damage
eng "Erubetie takes "+$sel1+" damage!"
$sel6/
mov %enemylife,%enemylife-%damage
if %enemylife<0 mov %enemylife,0
if %enemylife=0 mov %gage,0 skip 3
mov %gage,%enemylife*100/%max_enemylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
print 10,500
\
skillname ""
name $name
>Ah...!\
name ""
dwave 1,"se\ero_slime3.ogg"
csp 702:csp 704:print 10,500
>One after another, her divided bodies fall back into normal slime.\
>As they come back together into a single body, it's clear she has taken serious damage.\
name $name
>...It's not over yet.@
>For the sake of my race, I will not lose...@>I cannot lose!\
name ""
skillname "Heaven's Prison"
dwave 1,"se\ero_slime3.ogg"
>Slime spreads out, wrapping around Luka!\
mov %kousoku,5:gosub *status_print
>Luka is stuck in Erubetie's slime!\
skillname ""
name "Luka"
>Wh...What are you doing!?@
>You don't have the energy to keep fighting, right!?\
name ""
name $name
>I said it's not over yet...@
>I'm going to blow myself up, with you right here next to me...\
name ""
name "Luka"
>Wh...What did you say!?\
name ""
mov $mogaku_anno1,"But Luka can't break free from Erubetie's slime!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"It's no use, I'll never let you go!"
mov $mogaku_sel2,"It's no use, I'll never let you go!"
mov $mogaku_sel3,"I won't let you go... Never!"
mov $mogaku_sel4,"I won't let you go... Never!"
mov $mogaku_sel5,"I won't let you go... Never!"
mov %sinkou,11
goto *common_main



*erbetie2_a

if %kousoku=5 goto *erbetie2009
if %kousoku=6 goto *erbetie2010
if %kousoku=7 goto *erbetie2_v
if %sinkou=7 && %kousoku=0 goto *erbetie2008
if %sinkou>7 goto *erbetie2_ab
if %kousoku=1 && %kousoku_hp<0 goto *erbetie2_kaihou
if %kousoku=1 rnd2 %ransu,1,3
if %kousoku=1 && %ransu<3 gosub *erbetie2_a7:goto *erbetie2001
if %kousoku=1 && %ransu=3 && %owaza_count3c>3 gosub *erbetie2_a8:goto *erbetie2001
if %kousoku=1 skip -3
if %kousoku=2 gosub *erbetie2_a10:goto *erbetie2001
if %kousoku=3 gosub *erbetie2_a11:goto *erbetie2001
if %kousoku=4 gosub *erbetie2_a12:goto *erbetie2001
rnd2 %ransu,1,7
if %ransu=1 gosub *erbetie2_a1:goto *erbetie2001
if %ransu=2 gosub *erbetie2_a2:goto *erbetie2001
if %ransu=3 gosub *erbetie2_a3:goto *erbetie2001
if %ransu=4 && %owaza_count3a>9 gosub *erbetie2_a4:goto *erbetie2001
if %ransu=5 && %owaza_count3b>9 gosub *erbetie2_a5:goto *erbetie2001
if %ransu=6 && %owaza_count1a>9 gosub *erbetie2_a6:goto *erbetie2001
if %ransu=7 && %owaza_count1b>9 gosub *erbetie2_a9:goto *erbetie2001
skip -8



*erbetie2_ab

rnd2 %ransu,1,3
if %ransu=1 gosub *erbetie2_a1:goto *common_main
if %ransu=2 gosub *erbetie2_a2:goto *common_main
if %ransu=3 gosub *erbetie2_a3:goto *common_main
skip -4



*erbetie2_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll use my slime to play with it..."
if %ransu=2 mov $sel1,"How long can you endure my slime?"
if %ransu=3 mov $sel1,"Fill my slime with your semen..."
name $name
eng $sel1:$sel6\
name ""
skillname "Agartha Draw"
dwave 1,"se\ero_slime1.ogg"
>Erubetie's slime sticks to Luka's penis!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=3 && %nanido<2 mov %wind_kakuritu,15
if %wind=3 && %nanido=2 mov %wind_kakuritu,7
if %wind=3 && %nanido=3 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3649
if %nanido<2 damage 340,370
if %nanido=2 damage 360,390
if %nanido=3 damage 380,410
skillname ""
if %mylife=0 sub %stack,1:return *erbetie2_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*erbetie2_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Feel my slime over your entire body..."
if %ransu=2 mov $sel1,"I'll rub it all over your body..."
if %ransu=3 mov $sel1,"I'll caress you all over..."
name $name
eng $sel1:$sel6\
name ""
skillname "Arcadia Spread"
dwave 1,"se\ero_makituki2.ogg"
>Erubetie's slime squirms all over Luka's body!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=3 && %nanido<2 mov %wind_kakuritu,15
if %wind=3 && %nanido=2 mov %wind_kakuritu,7
if %wind=3 && %nanido=3 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3650
if %nanido<2 damage 360,380
if %nanido=2 damage 380,400
if %nanido=3 damage 300,420
skillname ""
if %mylife=0 sub %stack,1:return *erbetie2_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*erbetie2_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll play with your back hole..."
if %ransu=2 mov $sel1,"My formless slime can slip in quite easily..."
if %ransu=3 mov $sel1,"Let me see a pathetic ejaculation with this method..."
name $name
eng $sel1:$sel6\
name ""
skillname "Xanadu Stroke"
dwave 1,"se\ero_makituki2.ogg"
>Erubetie's slime slips into Luka's ass, stimulating his prostate!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=3 && %nanido<2 mov %wind_kakuritu,15
if %wind=3 && %nanido=2 mov %wind_kakuritu,7
if %wind=3 && %nanido=3 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3651
if %nanido<2 damage 380,400
if %nanido=2 damage 400,420
if %nanido=3 damage 420,440
skillname ""
if %mylife=0 sub %stack,1:return *erbetie2_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*erbetie2_a4

add %stack,1
mov %owaza_count3a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Writhe in a whirlpool of pleasure!"
if %ransu=2 mov $sel1,"Something only a Slime can do..."
if %ransu=3 mov $sel1,"I'll torture it with a mixer of pleasure..."
name $name
eng $sel1:$sel6\
name ""
skillname "Shangri-La Screw"
dwave 1,"se\ero_slime1.ogg"
>Erubetie's slime flows over Luka's penis!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=3 && %nanido<2 mov %wind_kakuritu,15
if %wind=3 && %nanido=2 mov %wind_kakuritu,7
if %wind=3 && %nanido=3 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3652
if %nanido<2 damage 180,200
if %nanido=2 damage 187,207
if %nanido=3 damage 194,214
dwave 1,"se\ero_slime1.ogg"
>The slime takes shape around him, slightly squeezing his penis!
if %nanido<2 damage 180,200
if %nanido=2 damage 187,207
if %nanido=3 damage 194,214
dwave 1,"se\ero_slime1.ogg"
>Like that, it starts to spin around his penis like a whirlpool!
if %nanido<2 damage 180,200
if %nanido=2 damage 187,207
if %nanido=3 damage 194,214
skillname ""
if %mylife=0 sub %stack,1:return *erbetie2_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*erbetie2_a5

add %stack,1
mov %owaza_count3b,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Dissolve in a wave of pleasure!"
if %ransu=2 mov $sel1,"Melt away in the giant wave..."
if %ransu=3 mov $sel1,"Dissolve in my body..."
name $name
eng $sel1:$sel6\
name ""
skillname "Melt Storm"
dwave 1,"se\ero_slime3.ogg"
eng "Erubetie's slime creates a massive tsunami!":$sel6/
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=3 && %nanido<2 mov %wind_kakuritu,40
if %wind=3 && %nanido=2 mov %wind_kakuritu,25
if %wind=3 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>The massive wall of slime slams into Luka's body, overwhelming him in a whirlpool of slime!
skillcount2 3653
if %nanido<2 damage 1650,1750
if %nanido=2 damage 1650,1750
if %nanido=3 damage 1800,1900
skillname ""
if %mylife=0 sub %stack,1:return *erbetie2_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*erbetie2_a6

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 4
name $name
>Drown in the pleasure of my body!\
name ""
skillname "Heaven's Prison"
dwave 1,"se\ero_slime3.ogg"
>Erubetie's slime covers Luka's body, and brings him inside her!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=3 && %nanido<2 mov %wind_kakuritu,15
if %wind=3 && %nanido=2 mov %wind_kakuritu,7
if %wind=3 && %nanido=3 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
skillcount2 3654
if %nanido<2 damage 330,360
if %nanido=2 damage 350,380
if %nanido=3 damage 370,400
mov %kousoku,1:gosub *status_print
>Luka is stuck in Erubetie's slime!\
skillname ""
if %mylife=0 sub %stack,1:return *erbetie2_h6
if %kousan=2 sub %stack,1:return
name $name
if %first_sel1=1 skip 4
>Now to squeeze you...@
>Let me see you writhe in agonizing pleasure...\
skip 3
>You won't escape this time.@
>Let me see you writhe in agonizing pleasure...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,100
if %earth=0 && %nanido=2 mov %genmogaku,100
if %earth=0 && %nanido=3 mov %genmogaku,100
if %earth>0 && %nanido<2 mov %genmogaku,100
if %earth>0 && %nanido=2 mov %genmogaku,100
if %earth>0 && %nanido=3 mov %genmogaku,100
mov $mogaku_anno1,"But struggling just makes Luka sink further inside her!"
mov $mogaku_anno4,"But stuck inside her slime, Luka's power is dulled!"
mov $mogaku_sel1,"You won't escape..."
mov $mogaku_sel2,"Give in..."
mov $mogaku_sel3,"Why not just surrender?"
mov $mogaku_sel4,"Cease struggling, and just indulge in pleasure inside me..."
mov $mogaku_sel5,"Just dissolve away inside me... Accept the fate of a Hero."
mov %kousoku_hp,%kousoku_maxhp
sub %stack,1
return



*erbetie2_a7

add %stack,1
>Luka is stuck inside Erubetie's slime...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I can squeeze your whole body like this...":mov $sel2,"The slime around Luka's body massages his entire body!"
if %ransu=2 mov $sel1,"I'll use every inch of my body to force you to come...":mov $sel2,"The slime swirls around Luka's penis, forcing pleasure into him!"
if %ransu=3 mov $sel1,"I'll play with your penis...":mov $sel2,"The slime rubs against Luka's penis!"
if %ransu=4 mov $sel1,"I'll make it even tighter...":mov $sel2,"The slime presses down harder around Luka!"
if %ransu=5 mov $sel1,"Your penis is feeling good, isn't it?":mov $sel2,"The slime vibrates all around Luka, massaging every inch of his body!"
name $name
eng $sel1:$sel6\
name ""
skillname "Heaven's Prison"
dwave 1,"se\ero_slime3.ogg"
eng $sel2:$sel6
skillcount2 3654
if %nanido<2 damage 330,360
if %nanido=2 damage 350,380
if %nanido=3 damage 370,400
skillname ""
if %mylife=0 sub %stack,1:return *erbetie2_h6
sub %stack,1
return



*erbetie2_a8

add %stack,1
mov %owaza_count3c,0
>Luka is stuck inside Erubetie's slime...\
name $name
>I have a special plan in store for you...\
name ""
skillname "Neverland Frontier"
dwave 1,"se\ero_slime3.ogg"
eng "Erubetie's slime fills with strange magical power as it rubs against Luka's body!":$sel6/
if %wind=3 && %nanido<2 mov %wind_kakuritu,100
if %wind=3 && %nanido=2 mov %wind_kakuritu,100
if %wind=3 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But a strong gale pushes the magical power off!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3655
dwave 2,"se\minimum.ogg"
>As the slime rubs into his body, Luka's body starts to regress in age!\
skillname ""
name "Luka"
>Wh...What's happening!?@
>My... My body...!?\
name ""
>Luka turns back into a small child!\
name $name
>I used my magical power to turn you into a child.@
>Now you can't resist any longer, can you?\
>Now to squeeze you...\
name ""
name "Luka"
>Uwaaa!\
name ""
dwave 1,"se\ero_slime1.ogg"
>Erubetie's slime crawls all over Luka's now small penis!
mov %damage_kotei,1
damage 320,350
if %mylife=0 sub %stack,1:return *erbetie2_h7
name "Luka"
>What... Is this...?\
name ""
>As my body shrank, my foreskin grew back over my penis.@
>Slipping under the skin, the slime continues rubbing against the tip of my penis.\
name $name
>A pitiful child's penis, unable to even peel the skin down...@
>Here, let me peel it back for you...\
name ""
dwave 1,"se\ero_slime1.ogg"
>The formless slime pushes under Luka's foreskin, and slowly starts to peel it away!
mov %damage_kotei,1
damage 320,350
if %mylife=0 sub %stack,1:return *erbetie2_h8
name $name
>Hehe... It looks quite sensitive.@
>My slime will feel amazing as it rubs against it...\
name ""
dwave 1,"se\ero_slime1.ogg"
>Erubetie's slime latches onto the tip of Luka's penis, and gently massages it!
mov %damage_kotei,1
damage 320,350
if %mylife=0 sub %stack,1:return *erbetie2_h8
name "Luka"
>Haaa...\
name ""
>I've never felt anything like this before.@
>My now underdeveloped penis shakes in joy at tasting a brand new pleasure.\
name ""
name $name
>That tiny penis of yours looks so happy...@
>Allow me to continue rewarding it with my slime...\
name ""
dwave 1,"se\ero_slime1.ogg"
>Erubetie's slime coils around Luka's small penis!
mov %damage_kotei,1
damage 320,350
if %mylife=0 sub %stack,1:return *erbetie2_h8
name "Luka"
>Haaa... It feels so good...\
name ""
>Feeling like my penis could melt away, I relax as her slime gently massages my small penis.\
>Erubetie looks down at me and smiles as my mouth hangs open in pleasure.\
name $name
>It's time to give this tiny penis of yours its first ejaculation...\
name ""
dwave 1,"se\ero_slime1.ogg"
>Erubetie's slime solidifies a little around Luka's small penis as it starts to spin!
mov %damage_kotei,1
damage 320,350
sub %stack,1
return *erbetie2_h8



*erbetie2_a9

add %stack,1
mov %owaza_count1b,0
mov %owaza_num1,2
if %kousan=2 skip 4
name $name
>Hehe... Let me give you a little hug...\
name ""
skillname "Divine Gale"
dwave 1,"se\ero_slime3.ogg"
>Erubetie moves behind Luka, and hugs him!
if %aqua>1 gosub *aqua_guard:sub %stack,1:return
if %wind=3 && %nanido<2 mov %wind_kakuritu,15
if %wind=3 && %nanido=2 mov %wind_kakuritu,7
if %wind=3 && %nanido=3 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
if %nanido<2 damage 200,240
if %nanido=2 damage 220,260
if %nanido=3 damage 240,280
mov %kousoku,2:gosub *status_print
>The back of Luka's body sinks into Erubetie's body!\
skillname ""
if %mylife=0 sub %stack,1:return *erbetie2_h9
if %kousan=2 sub %stack,1:return
name $name
>My body feels good, doesn't it?@
>Let me make it even better...\
name ""
if %earth=0 && %nanido<2 mov %genmogaku,100
if %earth=0 && %nanido=2 mov %genmogaku,100
if %earth=0 && %nanido=3 mov %genmogaku,100
if %earth>0 && %nanido<2 mov %genmogaku,2
if %earth>0 && %nanido=2 mov %genmogaku,2
if %earth>0 && %nanido=3 mov %genmogaku,2
mov $mogaku_anno1,"But Luka can't break free from Erubetie!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"That's pointless, you won't escape..."
mov $mogaku_sel2,"Give in..."
mov $mogaku_sel3,"Why not just surrender?"
mov $mogaku_sel4,"Cease struggling, and just indulge in pleasure inside me..."
mov $mogaku_sel5,"Just dissolve away inside me... Accept the fate of a Hero."
sub %stack,1
return



*erbetie2_a10

add %stack,1
if %kousan=2 skip 4
name $name
>Hehe... I can do this, too...\
name ""
skillname "Divine Flow"
dwave 1,"se\ero_slime3.ogg"
lsp 700,":a;chara\erbetie_st01.bmp",50,0
lsp 702,":a;chara\erbetie_st01.bmp",400,0:print 10,500
mov %monster_x,50
mov %hanyo1,1
>Erubetie divides into another body, who hugs Luka from the front!
if %nanido<2 damage 200,240
if %nanido=2 damage 220,260
if %nanido=3 damage 240,280
mov %kousoku,3
>Luka is sandwiched between two Erubeties!\
skillname ""
if %mylife=0 sub %stack,1:return *erbetie2_h10
if %kousan=2 sub %stack,1:return
name "Erubetie A"
>Hehe... Two feels better, doesn't it?\
name ""
name "Erubetie B"
>I'll make it even better...\
name ""
sub %stack,1
return



*erbetie2_a11

add %stack,1
if %kousan=2 skip 4
name $name
>I'll let you enjoy sex that only a Slime can give...\
name ""
skillname "Divine Draw"
dwave 1,"se\ero_slime3.ogg"
lsp 700,":a;chara\erbetie_st01.bmp",225,0
lsp 702,":a;chara\erbetie_st01.bmp",0,0
lsp 704,":a;chara\erbetie_st01.bmp",450,0:print 10,500
mov %monster_x,225
>Erubetie divides again!@
>The new body grabs onto Luka's lower body!
if %nanido<2 damage 200,240
if %nanido=2 damage 220,260
if %nanido=3 damage 240,280
mov %kousoku,4
>Luka's body is being held by three Erubeties!\
skillname ""
if %mylife=0 sub %stack,1:return *erbetie2_h11
if %kousan=2 sub %stack,1:return
name "Erubetie A"
>Hehe... That's it for the preparations.\
name ""
name "Erubetie B"
>Now it's time for some fun...\
name ""
name "Erubetie C"
>Writhe in agony in the hell of pleasure only a slime can bring...\
name ""
sub %stack,1
return



*erbetie2_a12

add %stack,1
if %kousan=2 skip 4
name $name
>Now, go mad in pleasure...\
name ""
skillname "Divine Destiny"
>The Erubeties grabbing onto Luka's body all begin moving at once!\
sub %stack,1
goto *erbetie2_a13



*erbetie2_a13

add %stack,1
rnd2 %ransu,1,12
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Slime pushes into Luka's ass, and starts to vibrate!":dwave 1,"se\ero_slime1.ogg"
if %ransu=2 mov $sel1,"Slime wraps around Luka's penis, and starts to spin!":dwave 1,"se\ero_makituki2.ogg"
if %ransu=3 mov $sel1,"Slime rubs against the tip of Luka's penis!":dwave 1,"se\ero_slime1.ogg"
if %ransu=4 mov $sel1,"Sticky slime crawls around the tip of Luka's penis!":dwave 1,"se\ero_slime1.ogg"
if %ransu=5 mov $sel1,"Sticky slime rubs hard against the back of Luka's penis!":dwave 1,"se\ero_slime2.ogg"
if %ransu=6 mov $sel1,"Slime massages Luka's neck and armpits!":dwave 1,"se\ero_slime1.ogg"
if %ransu=7 mov $sel1,"Slime tickles Luka's feet and sides!":dwave 1,"se\ero_makituki2.ogg"
if %ransu=8 mov $sel1,"Slime massages Luka's balls!":dwave 1,"se\ero_slime1.ogg"
if %ransu=9 mov $sel1,"Slime tightens around the tip of Luka's penis!":dwave 1,"se\ero_slime1.ogg"
if %ransu=10 mov $sel1,"Slime gently rubs around inside Luka's urethral opening!":dwave 1,"se\ero_slime1.ogg"
if %ransu=11 mov $sel1,"Slime vibrates around Luka's penis!":dwave 1,"se\ero_makituki2.ogg"
if %ransu=12 mov $sel1,"Slime swirls all around Luka's body!":dwave 1,"se\ero_slime3.ogg"
eng $sel1:$sel6
skillcount2 3656
mov %damage_kotei,1
damage 100,120
skillname ""
if %mylife=0 skillname "":sub %stack,1:return *erbetie2_h12
sub %stack,1
goto *erbetie2_a13



*erbetie2_onedari

mov $list1,"Agartha Draw"
if %3649>0 mov %list_num1,1
mov $list2,"Arcadia Spread"
if %3650>0 mov %list_num2,1
mov $list3,"Xanadu Stroke"
if %3651>0 mov %list_num3,1
mov $list4,"Shangri-La Screw"
if %3652>0 mov %list_num4,1
mov $list5,"Melt Storm"
if %3653>0 mov %list_num5,1
mov $list6,"Heaven's Prison"
if %3654>0 mov %list_num6,1
mov $list7,"Neverland Frontier"
if %3655>0 mov %list_num7,1
mov $list8,"Divine Destiny"
if %3656>0 mov %list_num8,1
gosub *cmd_onedari
if %cmd1=11 goto *erbetie2_onedari1
if %cmd1=12 goto *erbetie2_onedari2
if %cmd1=13 goto *erbetie2_onedari3
if %cmd1=14 goto *erbetie2_onedari4
if %cmd1=15 goto *erbetie2_onedari5
if %cmd1=16 goto *erbetie2_onedari6
if %cmd1=17 goto *erbetie2_onedari7
if %cmd1=18 goto *erbetie2_onedari8
if %cmd1=-1 goto *erbetie2_main
goto *erbetie2_onedari



*erbetie2_onedari1

gosub *onedari_syori
name $name
>You wish to feel my slime all over your penis?\
name ""
if %hanyo1=1 gosub *erbetie2_onedari_x
gosub *erbetie2_a1
skip -1



*erbetie2_onedari2

gosub *onedari_syori
name $name
>You wish to feel my slime all over your body?\
name ""
if %hanyo1=1 gosub *erbetie2_onedari_x
gosub *erbetie2_a2
skip -1



*erbetie2_onedari3

gosub *onedari_syori
name $name
>You wish to feel my slime in your ass?\
name ""
if %hanyo1=1 gosub *erbetie2_onedari_x
gosub *erbetie2_a3
skip -1



*erbetie2_onedari4

gosub *onedari_syori
name $name
>You want to feel a whirlpool of slime...?\
name ""
if %hanyo1=1 gosub *erbetie2_onedari_x
gosub *erbetie2_a4
skip -1



*erbetie2_onedari5

gosub *onedari_syori
name $name
>You want to be smashed by a wave of pleasure?\
name ""
if %hanyo1=1 gosub *erbetie2_onedari_x
gosub *erbetie2_a5
skip -1



*erbetie2_onedari6

if %kousoku<>1 gosub *onedari_syori
if %kousoku=1 gosub *onedari_syori_k
name $name
>You want to be wrapped up and squeezed?\
name ""
if %hanyo1=1 gosub *erbetie2_onedari_x
if %kousoku=0 gosub *erbetie2_a6
gosub *erbetie2_a7
skip -1



*erbetie2_onedari7

if %kousoku<>1 gosub *onedari_syori
if %kousoku=1 gosub *onedari_syori_k
name $name
>You wish to be played with like a child?@
>Hehe... I can make it better than just some imitation...\
name ""
if %hanyo1=1 gosub *erbetie2_onedari_x
if %kousoku=0 gosub *erbetie2_a6
gosub *erbetie2_a8



*erbetie2_onedari8

if %kousoku<2 gosub *onedari_syori
if %kousoku>1 gosub *onedari_syori_k
name $name
>You wish to take the secret skill of a Queen Slime?\
name ""
if %sinkou>7 gosub *erbetie2_onedari_x
if %kousoku=0 gosub *erbetie2_a9
if %kousoku=2 gosub *erbetie2_a10
if %kousoku=3 gosub *erbetie2_a11
if %kousoku=4 gosub *erbetie2_a12



*erbetie2_onedari_x

add %stack,1
csp 702:csp 704
mov %monster_x,225
gosub *face2
>Erubetie gathers back up!\
sub %stack,1
return



*erbetie2_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\erbetie_bk03.bmp",225,0
gosub *syasei2
>As Erubetie's slime rubs against Luka's penis, he comes, filling her with his semen.\
mov %viclose,1:gosub *lose
mov %2640,%2640+1:if %2640=1 mov %count_koenemy,%count_koenemy+1
if %2640>%count_most mov %count_most,%2640:mov $count_mostname,$name+" (2)"
count 11,5
mov $bad1,"Erubetie made Luka come using her slime."
gosub *face2
name $name
>So you've lost, you pitiful Hero...\
name ""
goto *erbetie2_h



*erbetie2_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 697,":a;chara\erbetie_bk07.bmp",225,0
gosub *syasei2
>As Erubetie's slime runs all over Luka's body, he comes, filling her body with semen.\
mov %viclose,1:gosub *lose
mov %2640,%2640+1:if %2640=1 mov %count_koenemy,%count_koenemy+1
if %2640>%count_most mov %count_most,%2640:mov $count_mostname,$name+" (2)"
count 11,5
mov $bad1,"Erubetie made Luka come using her slime."
gosub *face2
name $name
>So you've lost, you pitiful Hero...\
name ""
goto *erbetie2_h



*erbetie2_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\erbetie_bk04.bmp",225,0
gosub *syasei2
>As Erubetie's slime stimulates Luka's prostate, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2640,%2640+1:if %2640=1 mov %count_koenemy,%count_koenemy+1
if %2640>%count_most mov %count_most,%2640:mov $count_mostname,$name+" (2)"
count 11,5
mov $bad1,"Erubetie made Luka come using her slime."
gosub *face2
name $name
>So you've lost, you pitiful Hero...\
name ""
goto *erbetie2_h



*erbetie2_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\erbetie_bk02.bmp",225,0
gosub *syasei2
>As Erubetie's slime swirls around Luka's penis, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2640,%2640+1:if %2640=1 mov %count_koenemy,%count_koenemy+1
if %2640>%count_most mov %count_most,%2640:mov $count_mostname,$name+" (2)"
count 11,5
mov $bad1,"Erubetie made Luka come using her slime."
gosub *face2
name $name
>So you've lost, you pitiful Hero...\
name ""
goto *erbetie2_h



*erbetie2_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 697,":a;chara\erbetie_bk07.bmp",225,0
gosub *syasei2
>As the tsunami of slime runs all over his body, Luka comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2640,%2640+1:if %2640=1 mov %count_koenemy,%count_koenemy+1
if %2640>%count_most mov %count_most,%2640:mov $count_mostname,$name+" (2)"
count 11,5
mov $bad1,"Erubetie made Luka come using her slime."
gosub *face2
name $name
>So you've lost, you pitiful Hero...\
name ""
goto *erbetie2_h



*erbetie2_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\erbetie_bk05.bmp",225,0
gosub *syasei2
>Stuck inside Erubetie's slime, Luka comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2640,%2640+1:if %2640=1 mov %count_koenemy,%count_koenemy+1
if %2640>%count_most mov %count_most,%2640:mov $count_mostname,$name+" (2)"
count 11,5
mov $bad1,"Erubetie made Luka come using her slime."
gosub *face2
name $name
>So you've lost, you pitiful Hero...\
name ""
goto *erbetie2_h



*erbetie2_h7

name "Luka"
>Haaa...!\
name ""
name $name
>Oh, already?\
name ""
gosub *syasei1
lsp 691,":a;chara\erbetie_bk01.bmp",225,0
gosub *syasei2
>The moment Luka's undeveloped penis touches Erubetie's slime, he comes, filling her with his semen.\
mov %viclose,1:gosub *lose
mov %2640,%2640+1:if %2640=1 mov %count_koenemy,%count_koenemy+1
if %2640>%count_most mov %count_most,%2640:mov $count_mostname,$name+" (2)"
count 11,5
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka came almost instantly after turning back into a child."
mov $bad2,"After that, he became her squeezing toy."
gosub *face2
name $name
>A child's penis is quite sensitive, isn't it?@
>But that was still too fast...\
name ""
if %2640=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>No... I'm scared...\
name ""
goto *erbetie2_hb



*erbetie2_h8

name "Luka"
>Haa...!\
name ""
gosub *syasei1
lsp 691,":a;chara\erbetie_bk01.bmp",225,0
gosub *syasei2
>Luka shakes as strange liquid shoots out of him, and an unknown pleasure wracks his small body.\
mov %viclose,1:gosub *lose
mov %2640,%2640+1:if %2640=1 mov %count_koenemy,%count_koenemy+1
if %2640>%count_most mov %count_most,%2640:mov $count_mostname,$name+" (2)"
count 11,5
mov $bad1,"After turning Luka into a child, Erubetie forced him to come."
mov $bad2,"After that, he became her squeezing toy."
gosub *face2
name $name
>Enjoying the pleasure of a slime so much...@
>What a bad Hero. Hehe.\
name ""
if %2640=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>No... I'm scared...\
name ""
goto *erbetie2_hb



*erbetie2_h9

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\erbetie_bk04.bmp",225,0
gosub *syasei2
>As Erubetie grabs Luka from behind, he comes, shooting out semen.\
mov %viclose,1:gosub *lose
mov %2640,%2640+1:if %2640=1 mov %count_koenemy,%count_koenemy+1
if %2640>%count_most mov %count_most,%2640:mov $count_mostname,$name+" (2)"
count 11,5
mov $bad1,"Luka came as Erubetie grabbed him from behind."
gosub *face2
name $name
>You couldn't even wait until I got started...@
>What a pathetic Hero.\
name ""
goto *erbetie2_h



*erbetie2_h10

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\erbetie_bk04.bmp",50,0
lsp 701,":a;chara\erbetie_bk05.bmp",400,0
gosub *syasei2
>As the second Erubetie grabs him from the front, Luka comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2640,%2640+1:if %2640=1 mov %count_koenemy,%count_koenemy+1
if %2640>%count_most mov %count_most,%2640:mov $count_mostname,$name+" (2)"
count 11,5
mov $bad1,"Luka came as a second Erubetie grabbed him from the front."
gosub *face2
name $name
>You couldn't even wait until I got started...@
>What a pathetic Hero.\
name ""
goto *erbetie2_h



*erbetie2_h11

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\erbetie_bk04.bmp",225,0
lsp 701,":a;chara\erbetie_bk05.bmp",0,0
lsp 703,":a;chara\erbetie_bk06.bmp",450,0
gosub *syasei2
>As a third Erubetie grabs his lower body, Luka comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2640,%2640+1:if %2640=1 mov %count_koenemy,%count_koenemy+1
if %2640>%count_most mov %count_most,%2640:mov $count_mostname,$name+" (2)"
count 11,5
mov $bad1,"Luka came as a third Erubetie grabbed his lower body."
gosub *face2
name $name
>You couldn't even wait until I got started...@
>What a pathetic Hero.\
name ""
goto *erbetie2_h



*erbetie2_h12

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\erbetie_bk04.bmp",225,0
lsp 701,":a;chara\erbetie_bk05.bmp",0,0
lsp 703,":a;chara\erbetie_bk06.bmp",450,0
gosub *syasei2
>Surrounded by Erubeties, Luka is forced to come as they all attack him at once.\
mov %viclose,1:gosub *lose
mov %2640,%2640+1:if %2640=1 mov %count_koenemy,%count_koenemy+1
if %2640>%count_most mov %count_most,%2640:mov $count_mostname,$name+" (2)"
count 11,5
mov $bad1,"Luka is forced to come as the three Erubeties attack him at the same time."
gosub *face2
name $name
>So you came...@
>Being surrounded by slime is amazing, isn't it?\
name ""
goto *erbetie2_h



*erbetie2_h

mov %skill05,2
mov $bad2,"After that, he became her squeezing toy."
if %2640=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
cspl 701,706:print 10,500
if %con_hvoice=0 dwave 0,"voice\erbetie2_01.ogg"
name $name
>Now then, I'll squeeze you with a special idea of mine.
>I'll purify your body, then pollute it...\
name ""
dwavestop 0
skillname "Neverland Frontier"
dwave 1,"se\ero_slime3.ogg"
>Strong magical power begins to fill Erubetie's slime as it covers Luka!\
dwave 2,"se\minimum.ogg"
>As the slime rubs into his body, Luka's body starts to regress in age!\
skillname ""
name "Luka"
>Wh...What's happening!?@
>My... My body...!?\
name ""
>Luka reverts back into a child!\
if %con_hvoice=0 dwave 0,"voice\erbetie2_02.ogg"
name $name
>I turned you into a child with my magic.
>Now you can't resist anymore, can you?\
name ""
dwavestop 0
name "Luka"
>Wh...What is this...?@
>What am I doing here...?\
name ""
>Shortly after his body returns to its childhood state, so does his mind.\
>All of his memories fade until it's as if he had never grown past his current age.\
if %con_hvoice=0 dwave 0,"voice\erbetie2_03.ogg"
name $name
>You may not remember it, but you did a very bad thing.
>That's why I'll need to punish you.\
name ""
dwavestop 0
name "Luka"
>A... A monster!?@> Help me!!\
name ""
goto *erbetie2_hb



*erbetie2_hb

>Losing all of his memories from when he used to be older, Luka starts to panic at the strange monster suddenly in front of him.\
dwave 1,"se\ero_slime3.ogg"
csp 691
lsp 700,":a;chara\erbetie_st01.bmp",50,0
lsp 702,":a;chara\erbetie_st01.bmp",400,0:print 10,500
>As he feebly kicks with his small hands and feet, Erubetie suddenly splits.\
name "Luka"
>Ahh!!\
name ""
>Suddenly, another Erubetie forms behind him...\
dwave 1,"se\ero_slime3.ogg"
lsp 700,":a;chara\erbetie_st01.bmp",225,0
lsp 702,":a;chara\erbetie_st01.bmp",0,0
lsp 704,":a;chara\erbetie_st01.bmp",450,0:print 10,500
>She divides again, creating yet another body...@
>Terrified, Luka can't do anything but shrink in fear as they surround him.\
name "Luka"
>H...Help me...@
>I... I didn't do anything bad...\
name ""
if %con_hvoice=0 dwave 0,"voice\erbetie2_04.ogg"
name $name
>No, you are a very bad boy.
>That's why you must accept a lot of punishment...\
name ""
dwavestop 0
dwave 1,"se\ero_slime3.ogg"
mov %hseanwave,18:hseanwave
cspl 690,704
lsp 700,":a;chara\erbetie_hb1r.bmp",0,0:print 10,500
>The divided Erubeties all grab Luka at the same time.@
>Helpless, Luka just shakes in fear as he's easily wrapped up.\
name "Luka"
>Ahh... S...Stop...@
>D...Don't eat me!\
name ""
>As the slime covers his body, Luka feebly struggles.@
>But there's no way a small child could push off a high class monster.\
if %con_hvoice=0 dwave 0,"voice\erbetie2_05.ogg"
name $name
>Your now pure body... I'll pollute it.\
name ""
dwavestop 0
>The squirming slime around him starts to rub against Luka's body, touching everywhere but his groin area.\
name "Luka"
>S...Stop that!@> It tickles!\
name ""
>Luka is confused by the tickling sensation at first.@
>But as the slime continues rubbing, he starts to feel something different.\
name "Luka"
>Ahh...\
name ""
>A gasp of surprise comes out of the boy's mouth.\
>As the slime gently caresses and massages his neck, armpits, nipples and the rest of his body...@
>The initial tickling sensation starts to give way to something completely foreign to him.\
if %con_hvoice=0 dwave 0,"voice\erbetie2_06.ogg"
name $name
>What's wrong...? You let out a dirty voice there...
>Are you starting to feel it?\
name ""
dwavestop 0
name "Luka"
>Ahh... Stop squirming around me...\
name ""
>Luka's face starts to flush as the strange sensations get even stronger.@
>The child is feeling sexual pleasure for the very first time in his life.\
>Luka's body awakens to the feelings of a "man" as his childlike brain struggles to understand what's happening to him.\
name "Luka"
>Wh...What's going on...? M...My penis...\
name ""
>Luka looks down in surprise as his penis starts to do something strange.@
>Sticking out like a stick, it grows bigger than he has ever seen before.\
>Luka looks stunned as he watches his first erection, all the while being filled with his first taste of sexual pleasure.\
name "Luka"
>Ahh...\
name ""
if %con_hvoice=0 dwave 0,"voice\erbetie2_07.ogg"
name $name
>Your penis got excited it seems...\
if %con_hvoice=0 dwave 0,"voice\erbetie2_08.ogg"
>Hehe... What a cute boy's penis.
>It's so small, and still covered...\
name ""
dwavestop 0
name "Luka"
>Ahhh... My penis is acting strange...@
>Why did it do that?\
name ""
if %con_hvoice=0 dwave 0,"voice\erbetie2_09.ogg"
name $name
>Your penis getting big is a very bad thing.
>That's why I'm going to have to punish it...\
if %con_hvoice=0 dwave 0,"voice\erbetie2_10.ogg"
>I'll devour it with my slime...\
name ""
dwavestop 0
>Still hard from his very first erection, Luka looks on in confusion as Erubetie's slime slowly starts to wrap up his penis.\
>Completely ignorant of sex, Luka starts to panic.\
name "Luka"
>Ahh... No... Don't eat my penis...!\
name ""
>Luka trembles in fear as he thinks the slime is about to eat his penis.@
>But as soon as it rubs against it, his eyes go open in surprise.\
>Skillfully controlling her slime, Erubetie starts to gently massage Luka's penis.\
name "Luka"
>Ahh... What... Is this...?@
>My penis... My penis...!\
name ""
>Luka cries out in surprise as he's suddenly attacked by a strange new sensation.\
>Without knowing why, his small body starts to shake as the slime latches onto his sensitive area.\
>All the while, he's still terrified at the thought of having his penis eaten by the slime.\
name "Luka"
>Ahh... No... Don't eat it...@
>Don't eat my penis...\
name ""
if %con_hvoice=0 dwave 0,"voice\erbetie2_11.ogg"
name $name
>Hehe, that's no use... I'm going to devour your penis...
>To make it easier to devour, I'll need to peel the skin...\
name ""
dwavestop 0
name "Luka"
>S...Skin...?@> D...Don't!\
name ""
>The slime starts to move in front of the terrified boy's eyes.\
>It slowly seeps into the cracks around the tip of his penis, and begins to slowly pull his foreskin down.\
name "Luka"
>Ah...Ah...\
name ""
>As the skin starts to be pulled back, Luka is able to see the bright pink color of his urethral opening.\
name "Luka"
>Wh...What are you doing...?@
>Don't peel my penis...\
name ""
if %con_hvoice=0 dwave 0,"voice\erbetie2_12.ogg"
name $name
>No, I have to peel it...
>Expose your defenseless penis in front of me...\
name ""
dwavestop 0
>Erubetie continues gently pulling down the skin, exposing Luka's glans to the air.\
name "Luka"
>S...Stop it!\
name ""
>Sparks of pain and pleasure mix together in his small body as his penis changes before his eyes.\
name "Luka"
>Wh...What is this... My penis...?\
name ""
>Luka's eyes go wide as he watches his penis, the sensitive skin feeling the air for the very first time.\
if %con_hvoice=0 dwave 0,"voice\erbetie2_13.ogg"
name $name
>That sensitive looking glans is worth teasing...
>You'll taste the stimulation at once...\
if %con_hvoice=0 dwave 0,"voice\erbetie2_14.ogg"
>The pleasure as my sticky slime coils around your tip...\
name ""
dwavestop 0
name "Luka"
>What are you going... Ahh!\
name ""
>Moments after being exposed for the first time, the tip of Luka's penis is already being covered in slime.\
name "Luka"
>Ahhh!\
name ""
>Luka's body starts to shake as the slime rubs against his sensitive glans.\
>Little by little, his body is awakening to the unknown pleasure.\
name "Luka"
>What is this... Ahhh!\
name ""
>The natural male instinct in Luka starts to tell his mind that this is a good thing...@
>That he should seek more of this feeling.\
if %con_hvoice=0 dwave 0,"voice\erbetie2_15.ogg"
name $name
>I'll be gentle...
>I'll instill the feeling of pleasure into your tip...\
name ""
dwavestop 0
>Slime coils around right under the neck of Luka's penis, as it pushes against the back of his penis at the same time.\
name "Luka"
>Haa...\
name ""
>At first, it just felt like someone was grabbing him...@
>But as he gets used to it, small tingles of pleasure race from his penis up through the rest of his body.\
>Pleasure that could cause even an experienced man to instantly surrender...@
>For a boy's first sexual experience, it's enough to make him go mad.\
name "Luka"
>Ahhh... I feel so good...@
>My penis feels so good...\
name ""
>Luka sighs in ecstasy as he relaxes, letting Erubetie's slime continue surrounding his small pink penis without any complaint.\
>Erubetie looks down on the child's increasingly loose face with a smile.\
if %con_hvoice=0 dwave 0,"voice\erbetie2_16.ogg"
name $name
>...It's time for your first ejaculation.
>I'll squeeze out your very first semen with my slime...\
name ""
dwavestop 0
>The slime around Luka's small penis starts to gently vibrate.\
>The gentle stimulation sends explosions of pleasure through him as Luka becomes more and more entranced.\
name "Luka"
>Haa... So good...@
>My penis feels so good...\
name ""
>Giving himself over to the new pleasure, Luka starts to gasp.\
>Overcome by his first sexual experience, his penis starts to finally react as a man for the first time.\
name "Luka"
>Ahh... What is this...@
>It feels like... Something's happening...!\
name ""
if %con_hvoice=0 dwave 0,"voice\erbetie2_17.ogg"
name $name
>You're going to leak out a male's juice...\
if %con_hvoice=0 dwave 0,"voice\erbetie2_18.ogg"
>Experience it...
>As I squeeze out your first semen...\
name ""
dwavestop 0
name "Luka"
>Something... Something's happening...!\
name ""
>He pushes his small hips forward as it feels like his body is being drowned in pleasure.\
>Thinking he's about to pee, the boy tries his best to hold it in, but...\
name "Luka"
>Ahhh...\
name ""
>Feeling too good, he begins to stop caring.@
>Entrusting everything to the feeling flooding him from his penis, the boy gasps as the sensations wash over him.\
>His small penis, wrapped in slime, starts to pulse.\
mov %hseanwave,0:hseanwave
gosub *syasei1
lsp 700,":a;chara\erbetie_hb2r.bmp",0,0
gosub *syasei2
>Semen starts to pour out of his urethral opening.@
>Each tiny pulse of his penis pushes out more of the white liquid into the slime.\
>Luka gasps as his small penis still manages to push out semen like a grown man.\
name "Luka"
>Ah... Ahh...\
name ""
>Luka trembles fearfully during his first ejaculation.@
>Whenever his penis twitches, more white liquid comes out.\
>He looks at the white liquid in confusion as a sensation that he never had when peeing before fills him.\
>Various feelings swirl around in the boy's head after his first ejaculation.\
>Erubetie forcefully awoke his male instinct...\
name "Luka"
>Haaa... What was that...?@
>White pee came out...\
name ""
>Luka stares at the cloudy liquid floating in the slime, watching in wonder as it slowly dissolves inside her blue body.\
if %con_hvoice=0 dwave 0,"voice\erbetie2_19.ogg"
name $name
>Hehe... How does it feel to have your first orgasm?
>This is a male's joy...\
name ""
dwavestop 0
>Giving the small child his first sexual experience, Erubetie looks down on him with an air of superiority.\
>But Luka seems too entranced by his own orgasm to respond.\
if %con_hvoice=0 dwave 0,"voice\erbetie2_20.ogg"
name $name
>Next... I'll take your virginity.
>I'll violate and pollute your pure body...\
name ""
dwavestop 0
>Slime starts to solidify into the shape of a female vagina around Erubetie's lower body.\
>But unlike a normal vagina, hers is far smaller than normally possible, and made of soft, elastic slime.\
>A specially formed vagina able to force any man to come in moments...@
>It hovers inside Erubetie's formless body right above the child who only just had his first erection.\
if %con_hvoice=0 dwave 0,"voice\erbetie2_21.ogg"
name $name
>I'll rape you with this slime vagina, and snatch away your virginity...
>You'll spit out your cloudy semen, and become polluted...\
name ""
dwavestop 0
name "Luka"
>What are you talking about...?@
>D...Don't scare me...\
name ""
>The vagina of slime slowly gets closer to his penis.@
>Looking on in fear, Luka starts to tremble since he didn't understand what she was talking about.\
>As it gets closer and closer to his penis, he starts to feel excited for some reason.@
>But the terror quickly takes hold again, as he starts to panic at the thought of something bad happening.\
if %con_hvoice=0 dwave 0,"voice\erbetie2_22.ogg"
name $name
>There's no point even if you hate it... You won't escape.
>This fake vagina will lower around your thing...\
name ""
dwavestop 0
name "Luka"
>Stop!@>Don't, I didn't do anything bad!\
name ""
if %con_hvoice=0 dwave 0,"voice\erbetie2_23.ogg"
name $name
>Now feel good... Hoora...\
name ""
dwavestop 0
>At last, Erubetie starts to rape the small child without mercy...\
mov %hseanwave,19:hseanwave
lsp 700,":a;chara\erbetie_hb3r.bmp",0,0:print 10,500
>Luka's small penis sinks into the vagina Erubetie created just for him...\
name "Luka"
>Hyaaa!\
name ""
>Luka's penis screws into the tight slime vagina, the stretchy material pressing hard around him from every side.\
>As he's forced deeper inside, the sexual pleasure he first felt minutes ago blows through him a second time.\
name "Luka"
>Again...@
>It's coming out again!\
name ""
gosub *syasei1
lsp 700,":a;chara\erbetie_hb4r.bmp",0,0
gosub *syasei2
>Semen quickly floods out of him again as soon as he's forced into her artificially created vagina.\
name "Luka"
>Haaa...\
name ""
>Feeling like he could melt away in the sensations, Luka sighs and relaxes.\
>With the second erection of his life, his virginity was taken by Erubetie...\
if %con_hvoice=0 dwave 0,"voice\erbetie2_24.ogg"
name $name
>...You already came, I see.
>Your first time was quite pitiful...\
if %con_hvoice=0 dwave 0,"voice\erbetie2_25.ogg"
>But I'm not done raping you...
>I'll rape your pure body until you're broken...\
name ""
dwavestop 0
name "Luka"
>Ahhhh!\
name ""
>Her slime squeezes down around his penis, incredibly sensitive after having just ejaculated.\
>The soft slime starts to rub against him at the same time, sending waves of pleasure through his small body.\
>Still not used to the strange feeling of sexual pleasure, Luka is easily pushed to another orgasm.\
name "Luka"
>Again... It's coming again!@
>Ahhhh!!\
name ""
gosub *syasei1:gosub *syasei2
>In the next moment, he comes again, letting out more of his white liquid into Erubetie.\
>Given no time to rest since his last orgasm, the boy is already shaking from the effects of another.\
>With his heart completely swayed by the new feelings, Luka softly moans under Erubetie's slime.\
name "Luka"
>Haaa... Ahh...@
>My penis feels so good...\
name ""
if %con_hvoice=0 dwave 0,"voice\erbetie2_26.ogg"
name $name
>Hehe... What a shameful child...
>You're completely in a trance from playing with the bad slime...\
if %con_hvoice=0 dwave 0,"voice\erbetie2_27.ogg"
>I love dirtying an innocent child like this...
>I'll keep violating you with my slime, and completely pollute you...\
name ""
dwavestop 0
>A small tendril of slime reaches into the artificial vagina and starts to rub against the tip of Luka's penis.\
>As the dual pleasures overlap, the powerful stimulations easily break down the child's sense of reason.\
name "Luka"
>Haa... It feels so good...\
name ""
>Luka has already given in to the new feeling of pleasure.@
>Both his fear and terror are gone, and all that is in its place is ecstasy.\
>Having his very first experience be such an extremely intense one has broken his small mind...\
name "Luka"
>Ahh... More... Play with my penis more...\
name ""
if %con_hvoice=0 dwave 0,"voice\erbetie2_28.ogg"
name $name
>...Your mind seems to be becoming just as polluted as your body from the pleasure.
>Do you enjoy having both your body and mind violated by me?\
name ""
dwavestop 0
>Erubetie squeezes her slime vagina around Luka's penis as she talks to him.@
>Like that, she starts to slowly spin it around his penis, forcing him into a new set of convulsions.\
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\erbetie_hb5r.bmp",0,0
gosub *syasei2
>Toying around with his body however she wants, Erubetie forces him to another orgasm.@
>Luka just gasps in ecstasy, with drool dripping out of his gaping mouth.\
>Feeling like he's in heaven, he relaxes his small body in Erubetie's embrace.\
name "Luka"
>Haaa...\
name ""
if %con_hvoice=0 dwave 0,"voice\erbetie2_29.ogg"
name $name
>Having been polluted by me, you're already a slave to my slime...
>With both your body and mind broken, I'll raise you into the kind of boy I like...\
name ""
dwavestop 0
name "Luka"
>Ahh...\
name ""
>Luka's body slowly sinks deeper into Erubetie's, as if he's sinking into a brand new world of pleasure.\
if %con_hvoice=0 dwave 0,"voice\erbetie2_30.ogg"
name $name
>Taste every pleasure inside of me.
>I'll make you think of nothing but ejaculating...\
name ""
dwavestop 0
name "Luka"
>Ahhhhh!!\
name ""
>Every sort of pleasure is forced into the boy inside of Erubetie.@
>Kept like a pet inside of her slime body, his role is now as nothing but a toy...\
gosub *anten
mov %hseanwave,0:hseanwave
>Thus, the boy who would grow up into a Hero was instead reverted back to a child.@
>His heart and body were retrained, and instead became Erubetie's toy.\
>Re-trained, the boy is now no longer able to think about anything but pleasure...@
>The boy who held such hope for the future now spends his days as a simple toy for Erubetie.\
>.................\
goto *badend



*granberia4_start

mov $name,"Granberia"
mov $name2,"Granberia"
mov $lavel,"granberia4"
mov $tatie1,"granberia_st41"
mov $tatie2,"granberia_st41"
mov $tatie3,"granberia_st41"
mov $tatie4,"granberia_st41"
mov $haikei,"bg047"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,24000
if %nanido=2 mov %max_enemylife,29000
if %nanido=3 mov %max_enemylife,36000
if %nanido=0 mov %max_enemylife,2
if %nanido=1 mov %henkahp1,14000
if %nanido=2 mov %henkahp1,14000
if %nanido=3 mov %henkahp1,14000
if %nanido=0 mov %henkahp1,1
mov %alice_skill,0
mov %damage_keigen,70
mov %kaihi,80
mov %earth_keigen,50
if %nanido=3 mov %earth_keigen,25
mov %music,4
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov %end_n,9
mov %exp_minus,1370025
mov %zmonster_x,-270
mov %tukix,320
name "Luka"
>This is it, Granberia!@
>You'll have to stop attacking humans once I win!\
name ""
name $name
>Yes, attack me with everything you've got!@
>Show me everything you can do!\
name ""
name "Luka"
>I'd have shown you even if you didn't ask...@
>All of the power I've gained on my way to here!\
name ""
>There's no way I could defeat her if I don't use everything I've learned!\
mov %sinkou,1
goto *common_main



*granberia4001

name $name
>...I've seen the power of the spirits.\
>For there to be a human to hold such power in their weak body..@
>Matching the legendary Heinrich's power is no small feat.\
>...Be proud, Luka.\
name ""
name "Luka"
>There's nothing to be proud of if I lose!@
>I came here to win, not to be praised!\
name ""
name $name
>Hm... A commendable feeling.@
>But as you are now, you can't beat me.\
name ""
name "Luka"
>Grhg...\
name ""
>I still haven't reached her level yet...@
>What I still lack...\
name "Luka"
>You said my serene mind still had fog in it, didn't you!?\
name ""
name $name
>...That's right.@
>Even if the skills have the same name, our mastery of it is far different.\
>Without clearing out that fog, your blade will forever be dulled!\
name ""
name "Luka"
>..............\
name ""
lsp2 0,":a;chara\undine_st11.bmp",200,300,100,100,0,200
gosub *syoukan_effect
name "Undine"
>...Your dreams will die here if you lose now.@
>Your battles and pain will all have been for nothing.\
name ""
name "Luka"
>Yeah... That's why I'll win.@
>I absolutely must win!\
name ""
name "Undine"
>...Then call me once again.\
>That conviction in your beliefs will supplement your heart.@
>With that desire filling your heart, it will blow away any fog still remaining.\
>At that time, your serene mind will be unmatched!\
name ""
mov %skill04,3
goto *common_main



*granberia4003

name $name
>Splendid...!\
name ""
name "Luka"
>Yes... I've finally made it.@
>To your same level... No, above you!\
name ""
name $name
>Oh, so you think to be my superior now?@
>Then let us cross swords and see!\
name ""
name "Luka"
>Just what I planned on doing!\
name ""
mov %owaza_count3a,3
mov %owaza_count3b,4
mov %owaza_count3c,4
mov %sinkou,3
goto *granberia4_a



*granberia4005

name $name
>...I grow weary of this bout.@
>Let us settle this with a single attack!\
name ""
name "Luka"
>..............\
name ""
>She may think it a simple bout, but I consider this a life or death battle!\
name $name
>Deciding victory with our strongest attacks...@
>Isn't that the way true warriors clash!?\
name ""
name "Luka"
>You got it!\
name ""
>I take my stance for the Vaporizing Rebellion Sword Skill.@
>So this will be decided by whomever is more powerful...\
name ""
name $name
>...No, that isn't it.@
>I know you hold some other technique.\
name ""
name "Luka"
>Ah... But that's...\
name ""
>Quadruple Giga isn't usable in a fight.@
>It takes too long for me to set up.\
name ""
name "Luka"
>I can't use it in a fight...@
>It takes too long to prepare.\
name ""
name $name
>...I don't care, I'll defeat it.\
name ""
>Granberia calmly holds up her sword.\
name $name
>Let us decide this with a final attack!@
>Show me everything you've got!\
name ""
mov %sinkou,4
goto *common_main



*granberia4_v

if %nanido=0 goto *granberia4_v2
name $name
>A skill that attacks with razor wind...?@
>No, that isn't it...\
name ""
>Granberia calmly studies Luka's movements.\
name "Luka"
>Come, Gnome...!\
name ""
skillname "Gnome"
dwave 2,"se\earth1.ogg"
lsp2 0,":a;chara\gnome_st21.bmp",200,300,100,100,0,200
gosub *syoukan_effect
>The power of earth takes hold in Luka's sword!\
skillname ""
name $name
>The power of earth, as well...?@
>Oh, and it isn't over yet?\
name ""
>Granberia calmly studies Luka's movements.\
name "Luka"
>Come, Undine!\
name ""
skillname "Undine"
dwave 2,"se\aqua2.ogg"
lsp2 0,":a;chara\undine_st11.bmp",200,300,100,100,0,200
gosub *syoukan_effect
>The power of water takes hold in Luka's sword!\
skillname ""
name $name
>I see, so it's that kind of technique...\
name ""
>Granberia calmly studies Luka's movements.\
name "Luka"
>..........\
name ""
>If Granberia attacked me right now, her victory would be assured.@
>But she seems too engrossed in analyzing my technique...\
>She's waiting for me to finish, just as she said...@
>Eager to see my most powerful attack.\
>The ultimate skill that I thought impossible to use due to no opponent ever giving me the chance...@
>Granberia is the only one who really would wait!\
name "Luka"
>Come, Salamander!\
name ""
skillname "Salamander"
dwave 2,"se\fire2.ogg"
lsp2 0,":a;chara\salamander_st02.bmp",200,300,100,100,0,200
gosub *syoukan_effect
>The power of fire takes hold in Luka's sword!\
skillname ""
name $name
>You seem to be finished...\
name ""
name "Luka"
>Yes...\
name ""
>I barely manage to stop myself from thanking her for waiting.\
>Granberia passed up a guaranteed victory just to see my strongest attack...\
>The only thing I can do to thank her is to show her the skill she wanted to see!\
name "Luka"
>Here I come, Granberia!\
name ""
name $name
>Come, Luka!\
name ""
>Luka and Granberia attack each other at the same time!\
skillname "Vaporizing Rebellion Sword"
dwave 1,"se\fire1.ogg"
lsp 700,":a;chara\granberia_st42.bmp",0,0:print 10,500
>Granberia attacks in a whirlwind of fire!\
wait 500
gosub *skill16a
textclear
name "Luka"
>Quadruple Giga!\
name ""
skillname "Quadruple Giga"
>The power of the four spirits overlap and amplify each other, exploding in a torrent of power!\
wait 500
dwave 1,"se\karaburi.ogg"
lsp 2,":c;effect\003.bmp",0,0:print 1
wait 300
dwave 3,"se\earth1.ogg"
lsp 2,":a;effect\earth.bmp",0,0:print 1
wait 100
dwave 5,"se\fire2.ogg"
lsp 2,":a;effect\fire.bmp",0,0:print 1
wait 100
dwave 4,"se\aqua2.ogg"
lsp 2,":a;effect\aqua.bmp",0,0:print 1
wait 100
dwave 2,"se\wind2.ogg"
lsp 2,":a;effect\wind.bmp",0,0:print 1
wait 100
csp 2:print 18,500,"system\mask01.jpg"
dwave 1,"se\bom3.ogg"
quake 10,2000
>The power to crush anything slams into Granberia!
dwave 1,"se\damage2.ogg"
rnd2 %damage,40000,50000:gosub *enemylife2
skillname ""
goto *granberia4_v2



*granberia4_v2

lsp 700,":a;chara\granberia_st41.bmp",0,0:print 10,500
name $name
>Splendid...!\
name ""
dwave 1,"se\down.ogg"
csp 700:print 10,500
>Granberia falls to her knees!\
mov %viclose,1:gosub *victory
mov %getexp,300000:gosub *lvup
mov %2341,1
mov %skill04,3
goto *sean0300



*granberia4_kousan

>She would kill me in an instant if I surrendered...\
goto *granberia4_main



*granberia4_main

gosub *cmd_main
if %cmd1=11 && %nanido=0 goto *common_attack
if %cmd1=11 && %aqua=3 goto *common_attack
if %cmd1=11 && %aqua=2 goto *granberia4_attack2
if %cmd1=11 goto *granberia4_attack1
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *granberia4_kousan
if %cmd1=16 goto *granberia4_onedari
if %cmd1=17 && %nanido=0 goto *common_skill
if %cmd1=17 && %aqua=3 goto *common_skill
if %cmd1=17 goto *granberia4_skill
goto *granberia4_main



*granberia4_attack1

mov %before_action,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ha!"
if %ransu=2 mov $sel1,"Hya!"
if %ransu=3 mov $sel1,"Orya!"
name "Luka"
eng $sel1:$sel6\
name ""
mov %skill_sub,1
gosub *common_attack2
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\karaburi.ogg"
gosub *kaihi
>But Granberia dodges!\
if %wind=0 skip 6
mov %skill_sub,1
gosub *common_attack2
dwave 1,"se\karaburi.ogg"
gosub *kaihi
>But Granberia dodges!\
if %first_sel3=1 goto *granberia4_a
name "Luka"
>Guh... I can't hit her.\
name ""
name $name
>My mind is always calm and serene.@
>Normal attacks like that are a joke!\
name ""
>So normal attacks are no good...\
mov %first_sel3,1
goto *granberia4_a



*granberia4_attack2

mov %before_action,4
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"............"
if %ransu=2 mov $sel1,"I see it!"
if %ransu=3 mov $sel1,"Entrust myself to the flow of water...!"
name "Luka"
eng $sel1:$sel6\
name ""
skillname "Blade of Still Water"
>Luka's sword flashes, following the flow toward his opponent!
dwave 1,"se\karaburi.ogg"
gosub *kaihi
>But Granberia dodges!\
skillname ""
goto *granberia4_a



*granberia4_skill

gosub *cmd_skill
if %cmd1=24 goto *skill4
if %cmd1=26 goto *granberia4_skill11
if %cmd1=27 goto *granberia4_skill12
if %cmd1=28 goto *granberia4_skill13
if %cmd1=29 goto *skill15
if %cmd1=30 && %hanyo4=0 && %fire=3 goto *granberia4_skill16b
if %cmd1=30 goto *granberia4_skill16
if %cmd1=31 && %hanyo1=0 goto *granberia4_skill7
if %cmd1=31 && %hanyo1=1 goto *skill7c
if %cmd1=32 && %hanyo2=0 goto *granberia4_skill8
if %cmd1=32 && %hanyo2=1 goto *skill8c
if %cmd1=33 && %skill04=3 && %sinkou=1 goto *granberia4_skill10c
if %cmd1=33 && %skill04=3 && %sinkou>1 goto *skill10c
if %cmd1=33 && %hanyo3=0 goto *granberia4_skill10
if %cmd1=33 && %hanyo3=1 goto *skill10b
if %cmd1=34 && %hanyo4=0 goto *granberia4_skill14
if %cmd1=34 && %hanyo4=1 goto *skill14c
if %cmd1=35 goto *skill17
if %cmd1=-1 goto *granberia4_main
goto *granberia4_skill



*granberia4_skill7

mov %before_action,43
mov %count_wind,%count_wind+1
name "Luka"
>Sylph, rage around as you please!\
name ""
mov %mp,%mp-1
gosub *mp
skillname "Devastating Gale"
mov %wind,3:mov %wind_turn,16
dwave 2,"se\wind3.ogg"
rnd2 %ransu,1,100
notif %ransu=100 lsp2 0,":a;chara\sylph_st12.bmp",200,300,100,100,0,200
if %ransu=100 lsp2 0,":a;chara\sylph_st07.bmp",200,300,100,100,0,200:mov %g_sylph,1
gosub *syoukan_effect
mov %windiconlock,0:gosub *elm_print
>Luka's movements become as fast and powerful as a devastating gale!\
skillname ""
name $name
>I see, those are some impressive movements...@
>But...!\
name ""
if %first_sel2=0 mov %first_sel2,1
skillname "Bloody Fissure Thunder Thrust * Gale"
dwave 1,"se\tuki.ogg"
>Granberia steps in like thunder, and quickly thrusts!
damage 300,320
skillname ""
if %mylife=0 goto *granberia4_h1
name "Luka"
>Guh...!\
name ""
name $name
>Your speed is indeed impressive...@> But in the end, you're still a human.\
>Even if you're quick, I can read the flow of your heart before you even start to move!\
name ""
>What an insane battle sense...@
>She can even overcome the speed of my wind.\
mov %hanyo1,1
if %hanyo1+%hanyo2+%hanyo3+%hanyo4=4 goto *granberia4001
name $name
>Show me the other powers of your spirits.@
>Show me everything you have!\
name ""
goto *common_main



*granberia4_skill8

mov %before_action,44
mov %count_earth,%count_earth+1
name "Luka"
>Gnome, infuse me with the unmoving power of the earth!\
name ""
mov %mp,%mp-1
gosub *mp
skillname "Wild Lands"
mov %earth,3:mov %earth_turn,16
dwave 2,"se\earth2.ogg"
rnd2 %ransu,1,100
notif %ransu=100 lsp2 0,":a;chara\gnome_st21.bmp",200,300,100,100,0,200
if %ransu=100 lsp2 0,":a;chara\gnome_st12.bmp",200,300,100,100,0,200:mov %z_gnome,1
gosub *syoukan_effect
gosub *elm_print
>The unmoving power of the earth takes hold in Luka's body!\
skillname ""
name "Luka"
>Now your blade can't damage me!\
name ""
name $name
>Hmph... Do you think my attacks so light!?\
name ""
skillname "Dragon Butcher Attack"
dwave 1,"se\karaburi.ogg"
>Granberia swings down her sword!
mov %a_effect1,1
damage 500,600
skillname ""
if %mylife=0 goto *granberia4_h1
name "Luka"
>Guh... !@> No way...!\
>That should have repelled all physical attacks...!\
name ""
name $name
>You may have heard it from Alipheese already...@
>But I competed for the Monster Lord's Throne in the last selection.\
>At that time, most of my sword attacks were nullified by the power of earth...@
>I realized then just how much training I still lacked.\
name ""
lsp 701,":a;chara\granberia_st41.bmp",-180,0
lsp 700,":a;chara\tamamo_st01.bmp",180,0:print 10,500
name "Tamamo"
>...Hmph.@> It wasn't quite fair last time.\
name ""
csp 701
lsp 700,":a;chara\granberia_st41.bmp",0,0:print 10,500
name $name
>I trained so as to never suffer that humiliation again!@
>Now my sword can cut through even a mountain!\
>Don't think that defense will protect you from my blade!\
name ""
name "Luka"
>Gah...!\
name ""
>Even with the strongest power of the earth, I can't protect myself from her...@
>It looks like a purely defensive strategy won't work here!\
mov %hanyo2,1
if %hanyo1+%hanyo2+%hanyo3+%hanyo4=4 goto *granberia4001
name $name
>...Next.@
>That can't be the extent of those spirits of yours!\
name ""
goto *common_main



*granberia4_skill10

mov %before_action,45
mov %count_aqua,%count_aqua+1
name "Luka"
>Calm my heart and mind...\
name ""
skillname "Serene Mind"
mov %aqua,2
mov %wind,0:mov %wind_turn,0:mov %earth,0:mov %earth_turn,0:mov %fire,0:mov %fire_turn,0
dwave 2,"se\aqua.ogg"
lsp2 0,":a;chara\undine_st11.bmp",200,300,100,100,0,200
gosub *syoukan_effect
mov %aquaiconlock,0:gosub *elm_print
bgmstop
bg black,10,1500
bgm "bgm\aqua.ogg"
>Luka clears his mind and connects with the flow of the world!\
skillname ""
name $name
>A serene state of mind...@>It is impressive to have reached that state in such a short time.\
>However!\
name ""
if %first_sel1=0 mov %first_sel1,1
skillname "Cursed Sword * Decapitation"
dwave 1,"se\tuki.ogg"
>Granberia quickly steps forward, and aims a powerful slash at Luka's neck!
damage 300,320
skillname ""
if %mylife=0 goto *granberia4_h1
bgmstop
bg "BG\"+$haikei+".bmp",10,1500
mov %aqua,0
mov %aqua_end,0
gosub *elm_print
if %music=4 bgm "bgm\sitenno.ogg"
name "Luka"
>Ahg!\
name ""
name $name
>Your heart isn't yet on my level.@
>Your serene mind still has patches of fog in it!\
name ""
mov %hanyo3,1
if %hanyo1+%hanyo2+%hanyo3+%hanyo4=4 goto *granberia4001
name $name
>You can't be done yet.@
>I'll defeat every spirit you have!\
name ""
goto *common_main



*granberia4_skill10c

name "Luka"
>...............\
name ""
>Why did I pick up a sword?@
>Someone like me who doesn't want to hurt others...\
>I don't want to see humans and monsters fighting any longer.@
>I don't want to see lives being lost for no reason...\
>If I lose, nothing will change.@
>I must win!\
mov %before_action,45
mov %count_aqua,%count_aqua+1
name "Luka"
>There can be no hesitation in my heart!\
name ""
skillname "Serene Mind"
mov %mp,%mp-4
gosub *mp
mov %aqua,3:mov %aqua_turn,16
dwave 2,"se\aqua.ogg"
lsp2 0,":a;chara\undine_st11.bmp",200,300,100,100,0,200
gosub *syoukan_effect
mov %aquaiconlock,0:gosub *elm_print
>Luka's heart clears, reaching the height of a serene state!\
skillname ""
name "Luka"
>This is it...@>A perfectly serene mind...\
name ""
>It's surprisingly more peaceful than before...@
>It's as if time itself is gradually slowing down into nothing.\
>This must be what Granberia is always feeling in battle...@
>Now standing on the same stage as her, I see how she can be so powerful...\
name "Undine"
>You're now able to completely use my power.@
>Your SP won't be reduced by 1 every turn anymore.\
>My power should be able to be used at the same time as the other spirits, too...\
name "Luka"
>Got it!\
name ""
name $name
>Oh... So is this the real fight?\
>Very well!@
>Show me your abilities!\
name ""
>Granberia calmly stands in a ready position.\
lsp 560,":a;system\gager100.bmp",114,556
mov %mylife,%max_mylife:mov %mp,%max_mp
gosub *hp:gosub *mp
mov %sinkou,2
goto *common_main



*granberia4_skill11

mov %before_action,25
rnd2 %ransu,1,2
if %ransu=1 mov $sel1,"With the wind guiding my sword... Lightning Sword Flash!"
if %ransu=2 mov $sel1,"With Sylph's power...! Lightning Sword Flash!"
if %turn=1 mov $sel1,"Here I come! Lightning Sword Flash!"
name "Luka"
eng $sel1:$sel6\
name ""
name $name
>Hmm... Lightning Sword Flash!\
name ""
mov %mp,%mp-2
gosub *mp
skillname "Lightning Sword Flash"
>Luka and Granberia use the same skill at the same time and clash together!\
if %wind>0 | %turn=1 dwave 1,"se\slash3.ogg":skip 2
dwave 1,"se\tuki.ogg"
lsp 1,":a;effect\wind.bmp",0,0:print 10,12
lsp 2,":a;effect\009a_01.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009a_02.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009a_03.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009a_04.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009a_05.bmp",%tukix,%tukiy:print 10,12
csp 1:print 10,12
mov %damage_nobr,1
mov %abairitu,22+%mylv*11/50:gosub *enemylife
damage 300,320
skillname ""
if %mylife=0 goto *granberia4_h1
if %first_sel4=1 goto *common_main
name "Luka"
>Guh...!\
name ""
>Even though I just used this skill before, she managed to duplicate it...@
>I launched it first, but I took more damage too...\
name "Luka"
>Even worse, she can use the wind attribute part of it too...\
name ""
name $name
>I've lived my life for the sword.@
>There's no power that doesn't dwell in my blade!\
name ""
mov %first_sel4,1
goto *common_main



*granberia4_skill12

mov %before_action,25
rnd2 %ransu,1,2
if %ransu=1 mov $sel1,"Oh Earth, infuse my sword with your weight! Earth Rumbling Decapitation!"
if %ransu=2 mov $sel1,"Gnome, lend me your power! Earth Rumbling Decapitation!"
if %ransu=3 mov $sel1,"Feel the weight of the Earth itself! Earth Rumbling Decapitation!"
name "Luka"
eng $sel1:$sel6\
name ""
name $name
>Well then, me too...@> Earth Rumbling Decapitation!\
name ""
mov %mp,%mp-3
gosub *mp
skillname "Earth Rumbling Decapitation"
dwave 1,"se\karaburi.ogg"
lsp 2,":c;effect\earth.bmp",0,0:print 1
wait 300
csp 2:print 18,500,"system\mask01.jpg"
dwave 1,"se\bom2.ogg"
quake 10,1000
>Luka and Granberia use the same skill at the same time and clash together!\
dwave 1,"se\damage2.ogg"
mov %damage_nobr,1
mov %abairitu,45+%mylv*9/20:gosub *enemylife
mov %a_effect1,1
damage 400,450
skillname ""
if %mylife=0 goto *granberia4_h1
if %first_sel4=1 goto *common_main
name "Luka"
>Guh...\
name ""
>Even though I just used this skill before, she managed to duplicate it...@
>I launched it first, but I took more damage too...\
name "Luka"
>Even worse, she can use the earth attribute part of it too...\
name ""
name $name
>I've lived my life for the sword.@
>There's no power that doesn't dwell in my blade!\
name ""
mov %first_sel4,1
goto *common_main



*granberia4_skill13

mov %before_action,25
rnd2 %ransu,1,2
if %ransu=1 mov $sel1,"Along the flow... Serene Demon Sword!"
if %ransu=2 mov $sel1,"Undine, lend me your power... Serene Demon Sword!"
if %ransu=3 mov $sel1,"I shall cut everything in my path... Serene Demon Sword!"
name "Luka"
eng $sel1:$sel6\
name ""
name $name
>Did you think to be the only one who could use that?@> Serene Demon Sword!\
name ""
mov %mp,%mp-2
gosub *mp
skillname "Serene Demon Sword"
dwave 3,"se\karaburi.ogg"
lsp 2,":c;effect\006a.bmp",0,0:print 1
wait 300
csp 2:print 18,500,"system\mask01.jpg"
vspl 3,650,1
>Luka and Granberia use the same skill at the same time and clash together!\
dwave 4,"se\slash4.ogg"
mov %damage_nobr,1
mov %abairitu,30+%mylv*3/10:gosub *enemylife
mov %a_effect1,1
damage 350,380
skillname ""
if %mylife=0 goto *granberia4_h1
if %first_sel4=1 goto *common_main
name "Luka"
>Guh...!\
name ""
>Even though I just used this skill before, she managed to duplicate it...@
>I launched it first, but I took more damage too...\
name "Luka"
>Even worse, she can use the water attribute part of it too...\
name ""
name $name
>I've lived my life for the sword.@
>There's no power that doesn't dwell in my blade!\
name ""
mov %first_sel4,1
goto *common_main



*granberia4_skill14

mov %before_action,46
mov %count_fire,%count_fire+1
name "Luka"
>Salamander, purify everything with the flames of purgatory!\
name ""
mov %mp,%max_mp
gosub *mp
skillname "Purgatory Flame"
mov %fire,3:mov %fire_turn,5
dwave 2,"se\fire4.ogg"
lsp2 0,":a;chara\salamander_st02.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *elm_print
>Licks of flame run up and down Luka's sword, ready to ignite with his sword skills!\
skillname ""
name $name
>Such a nostalgic flame...@
>Hold that flame in your blade, and hit me with your best skill!\
>No...@>The skill you copied from me!\
name ""
>Granberia holds her sword in a ready position.\
mov %hanyo6,1
goto *common_main



*granberia4_skill16

mov %before_action,25
rnd2 %ransu,1,2
if %ransu=1 mov $sel1,"I'll purify you in the flames of purgatory... Vaporizing Rebellion Sword!"
if %ransu=2 mov $sel1,"Lend me your power, Salamander! Vaporizing Rebellion Sword!"
name "Luka"
eng $sel1:$sel6\
name ""
name $name
>A borrowed skill...@>That's easily dealt with!\
name ""
mov %mp,%mp-4
gosub *mp
if %first_sel2=0 mov %first_sel2,1
skillname "Bloody Fissure Thunder Thrust * Gale"
dwave 1,"se\tuki.ogg"
>Granberia steps forward with a powerful stab before Luka can attack!
damage 300,320
skillname ""
if %mylife=0 goto *granberia4_h1
if %hanyo4=1 goto *common_main
name "Luka"
>Guh...!@
>But I defeated Erubetie with that...!\
name ""
name $name
>You're copying one of my skills.@
>Who better than me to know all of its weak points?\
>...Though I don't know what would have happened had Salamander augmented it.\
name ""
name "Luka"
>Then if I use Salamander's power at the same time...\
name ""
goto *common_main



*granberia4_skill16b

mov %before_action,29
mov %hanyo6,0
rnd2 %ransu,1,2
if %ransu=1 mov $sel1,"I'll purify you in the flames of purgatory... Vaporizing Rebellion Sword!"
if %ransu=2 mov $sel1,"Lend me your power, Salamander! Vaporizing Rebellion Sword!"
name "Luka"
eng $sel1:$sel6\
name ""
mov %mp,%mp-4
gosub *mp
skillname1 "Vaporizing Rebellion Sword"
vspl 3,650,0
dwave 2,"se\fire2.ogg"
lsp2 0,":c;effect\cutin_ruka_fire.bmp",600,150,100,100,0,10
lsp2 1,":c;effect\cutin_fire.bmp",200,150,100,100,0,10
gosub *skill_cutin
gosub *skill16a
vspl 3,650,1
csp 0:csp 1
skillname "Vaporizing Rebellion Sword"
>Burning with the flames of purgatory, Luka attacks in a whirlwind of fire!\
skillname ""
mov %owaza_count3c,0
name $name
>Hm... That's it!?\
name ""
skillname "Death Sword Chaos Star"
>Granberia's sword flashes like a chaotic shooting star!\
wait 500
dwave 1,"se\slash.ogg"
skipoff
lsp 2,":c;effect\005_01.jpg",0,0:print 1
dwave 2,"se\slash.ogg"
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
dwave 3,"se\slash.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
csp 2:print 10,1000
>Luka's attacks are all offset by Granberia's!\
skillname ""
name "Luka"
>No way...!\
name ""
>My skill should have been better than Death Sword Chaos Star...@
>But she managed to offset every attack!?\
name $name
>In the end, it's a skill copied from me...@
>Though I must say, it isn't weak by any means.\
>It may be an inferior copy, but it's still my skill...@
>You are likely the only human swordsman in the world capable of using it.\
name ""
name "Luka"
>...............\
name ""
>In the end, it doesn't matter if it's inferior to the original...@
>Granberia's power is just too overwhelming...\
mov %hanyo4,1
if %hanyo1+%hanyo2+%hanyo3+%hanyo4=4 goto *granberia4001
name $name
>That can't be it...?@
>Show me everything!\
name ""
goto *common_main



*granberia4_a

if %hanyo6=1 gosub *granberia4_a7:goto *common_main
if %sinkou=2 && %before_action<40 goto *granberia4003
if %enemylife<%henkahp1 && %mp>0 && %sinkou=3 goto *granberia4005
if %sinkou=4 && %kadora=0 gosub *granberia4_a8:goto *common_main
if %sinkou=4 && %kadora=1 goto *granberia4_v
rnd2 %ransu,1,9
if %ransu<3 gosub *granberia4_a1:goto *common_main
if %ransu<5 gosub *granberia4_a2:goto *common_main
if %ransu<7 gosub *granberia4_a3:goto *common_main
if %ransu=7 && %owaza_count3a>5 gosub *granberia4_a4:goto *common_main
if %ransu=8 && %owaza_count3b>5 gosub *granberia4_a5:goto *common_main
if %ransu=9 && %owaza_count3c>5 gosub *granberia4_a6:goto *common_main
skip -7



*granberia4_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Ha!"
if %ransu=2 mov $sel1,"An attack like this should be easy to avoid!"
if %ransu=3 mov $sel1,"Just a tap..."
name $name
eng $sel1:$sel6\
name ""
skillname "Cleave"
dwave 1,"se\karaburi.ogg"
>Granberia's sword mows down everything in front of her!
rnd2 %ransu,1,100
if %aqua=3 && %nanido<2 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %aqua=3 && %nanido=2 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %aqua=3 && %nanido=3 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind=3 && %nanido<2 mov %wind_kakuritu,40
if %wind=3 && %nanido=2 mov %wind_kakuritu,35
if %wind=3 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
mov %a_effect1,1
if %nanido<2 damage 300,400
if %nanido=2 damage 320,420
if %nanido=3 damage 340,440
skillname ""
if %mylife=0 sub %stack,1:return *granberia4_h1
sub %stack,1
return



*granberia4_a2

add %stack,1
if %first_sel1=0 mov %first_sel1,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"How's this!?"
if %ransu=2 mov $sel1,"Here I come!"
if %ransu=3 mov $sel1,"Can you see this attack!?"
name $name
eng $sel1:$sel6\
name ""
skillname "Cursed Sword * Decapitation"
dwave 1,"se\tuki.ogg"
>Granberia quickly steps forward, and aims a powerful slash at Luka's neck!
rnd2 %ransu,1,100
if %aqua=3 && %nanido<2 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %aqua=3 && %nanido=2 && %ransu<15 gosub *aqua_guard:sub %stack,1:return
if %aqua=3 && %nanido=3 && %ransu<10 gosub *aqua_guard:sub %stack,1:return
if %wind=3 && %nanido<2 mov %wind_kakuritu,20
if %wind=3 && %nanido=2 mov %wind_kakuritu,15
if %wind=3 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
if %nanido<2 damage 300,320
if %nanido=2 damage 320,340
if %nanido=3 damage 340,360
skillname ""
if %mylife=0 sub %stack,1:return *granberia4_h1
if %first_sel1+%first_sel2=2 sub %stack,1:goto *granberia4_a9
sub %stack,1
return



*granberia4_a3

add %stack,1
if %first_sel2=0 mov %first_sel2,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Take this!"
if %ransu=2 mov $sel1,"Slow!"
if %ransu=3 mov $sel1,"Can you keep up with my movements!?"
name $name
eng $sel1:$sel6\
name ""
skillname "Bloody Fissure Thunder Thrust * Gale"
dwave 1,"se\tuki.ogg"
>Granberia steps in like thunder, and quickly thrusts!
rnd2 %ransu,1,100
if %aqua=3 && %nanido<2 && %ransu<10 gosub *aqua_guard:sub %stack,1:return
if %aqua=3 && %nanido=2 && %ransu<7 gosub *aqua_guard:sub %stack,1:return
if %aqua=3 && %nanido=3 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind=3 && %nanido<2 mov %wind_kakuritu,5
if %wind=3 && %nanido=2 mov %wind_kakuritu,3
if %wind=3 && %nanido=3 mov %wind_kakuritu,1
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
if %nanido<2 damage 300,320
if %nanido=2 damage 320,340
if %nanido=3 damage 340,360
skillname ""
if %mylife=0 sub %stack,1:return *granberia4_h1
if %first_sel1+%first_sel2=2 sub %stack,1:goto *granberia4_a9
sub %stack,1
return



*granberia4_a4

add %stack,1
mov %owaza_count3a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Haa!"
if %ransu=2 mov $sel1,"Feel the power of my sword with your body!"
if %ransu=3 mov $sel1,"I won't go lightly on you!"
name $name
eng $sel1:$sel6\
name ""
skillname "Dragon Butcher Attack"
dwave 1,"se\karaburi.ogg"
>Granberia's sword comes crashing down on Luka!
rnd2 %ransu,1,100
if %aqua=3 && %nanido<2 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %aqua=3 && %nanido=2 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %aqua=3 && %nanido=3 && %ransu<15 gosub *aqua_guard:sub %stack,1:return
if %wind=3 && %nanido<2 mov %wind_kakuritu,20
if %wind=3 && %nanido=2 mov %wind_kakuritu,15
if %wind=3 && %nanido=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
mov %a_effect1,1
if %nanido<2 damage 500,600
if %nanido=2 damage 520,620
if %nanido=3 damage 540,640
skillname ""
if %mylife=0 sub %stack,1:return *granberia4_h1
sub %stack,1
return



*granberia4_a5

add %stack,1
mov %owaza_count3b,0
name $name
>With all my strength...!\
name ""
skillname "Demon Skull Beheading * Purgatory"
dwave 1,"se\karaburi.ogg"
lsp 2,":c;effect\003.bmp",0,0:print 1
wait 300
csp 2:print 18,1000,"system\mask01.jpg"
dwave 1,"se\bom2.ogg"
quake 10,500
eng "Granberia jumps into the air and comes slamming down!":$sel6/
rnd2 %ransu,1,100
if %aqua=3 && %nanido<2 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %aqua=3 && %nanido=2 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %aqua=3 && %nanido=3 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind=3 && %nanido<2 mov %wind_kakuritu,40
if %wind=3 && %nanido=2 mov %wind_kakuritu,35
if %wind=3 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
\
>A single, powerful blow slams into Luka's head!
dwave 1,"se\damage2.ogg"
if %nanido<2 damage 1000,1200
if %nanido=2 damage 1020,1220
if %nanido=3 damage 1040,1240
skillname ""
if %mylife=0 sub %stack,1:return *granberia4_h1
sub %stack,1
return



*granberia4_a6

add %stack,1
mov %owaza_count3c,0
name $name
>I'll drill the terror of this skill into you!\
name ""
skillname "Death Sword Chaos Star"
>Granberia's sword flashes like a chaotic shooting star!
wait 500
dwave 1,"se\slash.ogg"
skipoff
lsp 2,":c;effect\005_01.jpg",0,0:print 1
dwave 2,"se\slash.ogg"
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
dwave 3,"se\slash.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
csp 2:print 10,1000
rnd2 %ransu,1,100
if %aqua=3 && %nanido<2 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %aqua=3 && %nanido=2 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %aqua=3 && %nanido=3 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind=3 && %nanido<2 mov %wind_kakuritu,40
if %wind=3 && %nanido=2 mov %wind_kakuritu,35
if %wind=3 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:skillname "Death Sword Chaos Star":skip 2
mov %damage_nobr,1:damage 300,400
if %wind=3 && %nanido<2 mov %wind_kakuritu,40
if %wind=3 && %nanido=2 mov %wind_kakuritu,35
if %wind=3 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:skillname "Death Sword Chaos Star":skip 2
mov %damage_nobr,2:damage 300,400
wait 500
textclear
if %wind=3 && %nanido<2 mov %wind_kakuritu,40
if %wind=3 && %nanido=2 mov %wind_kakuritu,35
if %wind=3 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:skillname "Death Sword Chaos Star":skip 2
mov %damage_nobr,1:damage 300,400
if %wind=3 && %nanido<2 mov %wind_kakuritu,40
if %wind=3 && %nanido=2 mov %wind_kakuritu,35
if %wind=3 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:skillname "Death Sword Chaos Star":skip 2
mov %damage_nobr,1:damage 300,400
if %wind=3 && %nanido<2 mov %wind_kakuritu,40
if %wind=3 && %nanido=2 mov %wind_kakuritu,35
if %wind=3 && %nanido=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:skip 3
mov %damage_nobr,2:damage 300,400
\
skillname ""
if %mylife=0 sub %stack,1:return *granberia4_h1
sub %stack,1
return



*granberia4_a7

add %stack,1
mov %hanyo6,0
name $name
>There will be no more observing!@
>The real fight starts now!\
dwave 1,"se\fire1.ogg"
lsp 700,":a;chara\granberia_st42.bmp",0,0:print 10,500
>Take this, my secret skill...@>Vaporizing Rebellion Sword!\
name ""
skillname "Vaporizing Rebellion Sword"
>Granberia attacks in a whirlwind of flame!
wait 500
gosub *skill16a
mov %damage_kotei,1
mov %damage_nobr,1:damage 500,700
mov %damage_kotei,1
mov %damage_nobr,2:damage 500,700
wait 500
textclear
mov %damage_kotei,1
mov %damage_nobr,1:damage 500,700
mov %damage_kotei,1
mov %damage_nobr,1:damage 500,700
mov %damage_kotei,1
mov %damage_nobr,2:damage 500,700
\
skillname ""
lsp 700,":a;chara\granberia_st41.bmp",0,0:print 10,500
sub %stack,1
return *granberia4_h1



*granberia4_a8

add %stack,1
name $name
>I don't know what you're planning... But I won't go easy on you!\
dwave 1,"se\fire1.ogg"
lsp 700,":a;chara\granberia_st42.bmp",0,0:print 10,500
>Take this, my secret skill...@>Vaporizing Rebellion Sword!\
name ""
skillname "Vaporizing Rebellion Sword"
>Granberia attacks in a whirlwind of flame!
wait 500
gosub *skill16a
mov %damage_kotei,1
mov %damage_nobr,1:damage 500,700
mov %damage_kotei,1
mov %damage_nobr,2:damage 500,700
wait 500
textclear
mov %damage_kotei,1
mov %damage_nobr,1:damage 500,700
mov %damage_kotei,1
mov %damage_nobr,1:damage 500,700
mov %damage_kotei,1
mov %damage_nobr,2:damage 500,700
\
skillname ""
lsp 700,":a;chara\granberia_st41.bmp",0,0:print 10,500
sub %stack,1
return *granberia4_h1



*granberia4_a9

add %stack,1
name "Luka"
>No way... My skill...?\
name ""
name $name
>...It's not that I'm borrowing your skills.@
>These techniques are just the most powerful of the Cursed Sword style.\
>Alipheese taught these skills to begin with, didn't she?@
>In order to train you...\
name ""
name "Luka"
>............\
name ""
>That's right...@>Alice taught me all of these skills.@
>I wouldn't be here if it wasn't for her!\
>For Alice's sake, I can't lose here!\
mov %first_sel1,2:mov %first_sel2,2
sub %stack,1
return



*granberia4_onedari

>She isn't an opponent I could request something from!\
goto *granberia4_main



*granberia4_h1

name "Luka"
>Guha...!\
name ""
dwave 1,"se\down.ogg"
>After taking extreme damage, Luka collapses on the ground.\
mov %viclose,2:gosub *lose
mov %2641,%2641+1:if %2641=1 mov %count_koenemy,%count_koenemy+1
if %2641>%count_most mov %count_most,%2641:mov $count_mostname,$name+" ()"
count 14,5
mov $bad1,"Luka was defeated by Granberia."
gosub *face2
name $name
>There's no need to be ashamed.@
>A powerful man like you has never before appeared before me...\
name ""
name "Luka"
>Urhg...\
name ""
gosub *anten
>With my body pulsing in pain, I pass out.\
>...............\
monocro off
bg "bg\bg047.bmp",10,3000
print 10,3000
goto *granberia4_h



*granberia4_h

mov %skill04,2
mov $bad2,"Now Granberia's lover, he spends his life in her care."
mov $tatie2,"granberia_st52"
if %2641=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %con_hvoice=0 dwave 0,"voice\granberia4_01.ogg"
name $name
>Wake up, Luka.
>Come on, wake up.\
name ""
dwavestop 0
name "Luka"
>Urhg...\
name ""
>The voice of a woman wakes me from my sleep.@
>As I open my eyes, I realize I'm laying in a bed.\
>Then...@
cspl 690,699
lsp 700,":a;chara\granberia_st51.bmp",0,0:print 10,500
>Right in front of me, I see Granberia standing completely naked!\
name "Luka"
>Ehh!?@>Wh...What's going on!?\
name ""
lsp 700,":a;chara\granberia_st53.bmp",0,0:print 10,500
if %con_hvoice=0 dwave 0,"voice\granberia4_02.ogg"
name $name
>...Don't be so surprised.
>Is it that strange to see me naked?\
dwavestop 0
lsp 700,":a;chara\granberia_st52.bmp",0,0:print 10,500
if %con_hvoice=0 dwave 0,"voice\granberia4_03.ogg"
>As a soldier, I made you surrender.
>Next, as a woman, I'm going to make you surrender again.\
if %con_hvoice=0 dwave 0,"voice\granberia4_04.ogg"
>With my female weapons...\
name ""
dwavestop 0
lsp 700,":a;chara\granberia_hd1.bmp",0,0:print 10,500
>Granberia presses her soft breasts against my penis.\
mov %hseanwave,17:hseanwave
>Like that, she slips my penis between them.\
name "Luka"
>Wh...What are you... Ah...\
name ""
if %con_hvoice=0 dwave 0,"voice\granberia4_05.ogg"
name $name
>Hoora... How are my breasts?
>If you come here, it will be my victory...\
name ""
dwavestop 0
>Granberia gently presses my penis between her breasts, and softly starts to push them together.\
>As my penis rubs against her smooth skin, my body instantly reacts in excitement.\
if %con_hvoice=0 dwave 0,"voice\granberia4_06.ogg"
name $name
>Horahora... I'll slowly increase the pressure...
>Now then, I wonder how long you can endure it...?\
name ""
dwavestop 0
name "Luka"
>Ahh...!\
name ""
>As her warm breasts slowly press down on my penis from both sides, I slowly feel myself nearing an orgasm.\
>The greedy desire for release fills my waist, extending to the rest of my body.@
>Suddenly feeling such pleasure soon after waking up, I can't help but sigh as I give in to the sensations.\
name "Luka"
>Ahh... I'm coming...\
name ""
gosub *syasei1
lsp 700,":a;chara\granberia_hd2.bmp",0,0
gosub *syasei2
>Almost like an accidental ejaculation, I come on Granberia's breasts.@
>My white semen slowly rolls down the smooth skin on her chest.\
if %con_hvoice=0 dwave 0,"voice\granberia4_07.ogg"
name $name
>What...? Already finished...?\
name ""
dwavestop 0
name "Luka"
>Haa...\
name ""
>Granberia stares at me with a slightly puzzled face.@
>As I stare back down at Granberia, with my milky white semen rolling down her body, I flush in embarrassment.\
if %con_hvoice=0 dwave 0,"voice\granberia4_08.ogg"
name $name
>To finish so quickly like that...
>What a difference from your swordarm... How pitiful...\
name ""
dwavestop 0
>Granberia looks up at me with a big smile on her face.@
>The smile of one who completely has someone under her power.\
if %con_hvoice=0 dwave 0,"voice\granberia4_09.ogg"
name $name
>...That makes it my victory.
>As a woman, I easily made you surrender.\
name ""
dwavestop 0
name "Luka"
>Ahh...\
name ""
>The mix of humiliation and pleasure swirls around in my brain as her soft breasts continue pushing against my penis.\
>As I look into her eyes, she stares back with a look of superiority.@
>The one who has completely forced me to surrender to her...\
if %con_hvoice=0 dwave 0,"voice\granberia4_10.ogg"
name $name
>...Now to tease you some more.
>I'll make you realize that you're no match for me...!\
name ""
dwavestop 0
>Granberia presses her breasts together again, then starts to slowly move up and down.\
>Pressing her soft body against me, she grinds her breasts against me as she squeezes my penis between them.\
if %con_hvoice=0 dwave 0,"voice\granberia4_11.ogg"
name $name
>Sora, sora, sora...
>I'll squeeze out your male extract...\
if %con_hvoice=0 dwave 0,"voice\granberia4_12.ogg"
>See my breasts completely covered in your semen, and realize your defeat...\
name ""
dwavestop 0
>Granberia grinds harder against me, pressing her breasts deep into my body.@
>At the same time, she grabs her breasts and starts to rub them hard against my penis.\
name "Luka"
>Ahh...\
name ""
>I squirm under her as she rubs against me, drowning me in a heaven of pleasure.\
name "Luka"
>Haa... No... Not that...@
>I'm going to come again...\
name ""
if %con_hvoice=0 dwave 0,"voice\granberia4_13.ogg"
name $name
>Hehe... Already at your limit?
>You're quick, aren't you?\
if %con_hvoice=0 dwave 0,"voice\granberia4_14.ogg"
>Now to finish you...
>Hoora, my breasts will finish you...\
name ""
dwavestop 0
>Granberia smiles and presses her breasts harder around my penis.\
>Rubbing against me at the same time, I quickly surrender to her soft touch.\
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\granberia_hd3.bmp",0,0
gosub *syasei2
>I explode between her breasts again, covering her smooth skin with more white semen.\
if %con_hvoice=0 dwave 0,"voice\granberia4_15.ogg"
name $name
>Hoora... There's more to come...
>This isn't enough to make you completely surrender after all, is it?\
name ""
dwavestop 0
name "Luka"
>S...Stop already...@
>Ah... Ahhh!\
name ""
>But her relentless attacks continue.@
>Without stopping for a moment, Granberia continues rubbing her breasts against me...\
gosub *anten
mov %hseanwave,0:hseanwave
>..............\
monocro off
lsp 700,":a;chara\granberia_hd4.bmp",0,0
bg "bg\bg047.bmp",10,3000
print 10,3000
name "Luka"
>Ah...@>Aaa...\
name ""
if %con_hvoice=0 dwave 0,"voice\granberia4_16.ogg"
name $name
>...It seems like this is the end.
>I squeezed out all of that stored up male extract of yours.\
name ""
dwavestop 0
>Granberia's breasts are covered in my semen, slowly dripping off her onto the ground.\
>She proudly shows it off to me in triumph.@
>The proof of my submission, and the badge that shows that she rules over me...\
if %con_hvoice=0 dwave 0,"voice\granberia4_17.ogg"
name $name
>...Do you recognize it now?
>That you are no match for me...\
name ""
dwavestop 0
name "Luka"
>I... Recognize it...@
>So... Stop already...\
name ""
>Overcome by intense ecstasy, I weakly respond to Granberia.@
>With this, I've surrendered both my heart and soul to her...\
if %con_hvoice=0 dwave 0,"voice\granberia4_18.ogg"
name $name
>Hehe... Then I'll make you into my plaything.
>I'll be playing with you a lot from now on...\
name ""
dwavestop 0
name "Luka"
>Ah...Ahh...!\
name ""
>I shiver as Granberia looks at me in complete victory.\
gosub *anten
mov %hseanwave,0:hseanwave
>After that, I became Granberia's plaything.@
>Playing with my penis however she wants, she continually forces me to come.\
>But as the loser, I have no choice but to accept the desires of the winner...@
>Thus, both my heart and soul are dominated by Granberia.\
>.............\
goto *badend



*alice2_start

mov $name,"Alipheese"
mov $name2,"Alipheese"
mov $lavel,"alice2"
mov $tatie1,"alice_st01"
mov $tatie2,"alice_st02"
mov $tatie3,"alice_st01"
mov $tatie4,"alice_st02"
mov $haikei,"bg141"
mov %monster_x,172
mov %monster_y,0
if %nanido=1 mov %max_enemylife,32000
if %nanido=2 mov %max_enemylife,42000
if %nanido=3 mov %max_enemylife,52000
if %nanido=0 mov %max_enemylife,1
mov %alice_skill,0
mov %damage_keigen,100
mov %kaihi,90
mov %earth_keigen,50
if %nanido=3 mov %earth_keigen,25
mov %music,5
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free from her tail!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"It isn't that easy to escape from the Monster Lord..."
mov $mogaku_sel2,"Will you be finished that easily...?"
mov $mogaku_sel3,"You won't escape... I'll squeeze you more..."
mov $mogaku_sel4,"What's wrong? Is this all you had...?"
mov $mogaku_sel5,"What pitiful struggling... Hehe."
mov $mogaku_earth_dassyutu1,"Gnome's power truly is strong..."
mov $mogaku_earth_dassyutu2,"To think you could even break loose from me..."
mov %end_n,1
mov %zmonster_x,-60
mov %tukix,300
mov %owaza_count1a,4
mov %owaza_count2a,4
mov %owaza_count3a,5
name "Alice"
>Don't misunderstand me.@>I don't intend to simply roll over and die.\
>If there's even the slightest hesitation in your blade, you will end up dead yourself.\
>If you are unable to defeat me with everything you've got, you wouldn't be worth entrusting the world to...\
name ""
mov %sinkou,1
goto *common_main



*alice2_001

name "Alice"
>Did you think that I wouldn't attack if you didn't?@
>This fight won't end until one of us falls!\
name ""
return



*alice2_002

bgm "bgm\alice2.ogg"
lsp 700,":a;chara\alice_st02.bmp",172,0:print 10,500
name "Alice"
>...It was a fun journey, Luka.\
>The days I spent going around the world with you...@
>They were the happiest days of my life.\
>Now, end this journey with your own hand.@
>Since it's you, I can keep my resolve...\
name ""
if %enemylife<1 mov %enemylife,1
mov %sinkou,2
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
goto *common_main



*alice2_003

name "Alice"
>...What are you hesitating for?@
>Your adventure will be over with your next blow.\
>Don't tell me you forgot your role as a Hero.@
>Now, swing your sword downward!\
name ""
mov %sinkou,3
goto *common_main



*alice2_004

name "Alice"
>You can't do it...?\
name ""
name "Luka"
>There's no way I could do it...\
name ""
lsp 700,":a;chara\alice_st04.bmp",172,0:print 10,500
name "Alice"
>...............@>You idiot...\
name ""
if %battle_auto=1 skipoff
wait 1000
mov %battle,0
if %aqua=2 bg "BG\"+$haikei+".bmp",10,1500
cspl 0,611
gosub *setwindow_01p
if %nanido=0 skip 6
if %mylife=%max_mylife && %nodamage=0 mov %count_hpfull,1
if %nanido=3 mov %count_hellvic,1
if %status=7 mov %count_vickonran,1
if %counter>0 mov %counterk,1
if %alice_skill=1 mov %alicek,1
if %zukanon=1 return *zukan_commonkaisou0
mov %2342,1
goto *sean0303



*alice2_005

lsp 700,":a;chara\alice_st04.bmp",172,0:print 10,500
name $name
>I see... That skill, at the end.@
>Just like Heinrich, 500 years ago...\
name ""
>Alipheese calmly closes her eyes.\
name "Luka"
>Gnome...\
name ""
skillname "Gnome"
dwave 2,"se\earth1.ogg"
lsp2 0,":a;chara\gnome_st21.bmp",200,300,100,100,0,200
gosub *syoukan_effect
>The power of the earth takes hold in Luka's sword!\
skillname ""
name $name
>I have no regrets.@
>Don't fail, Luka.\
name ""
>Alipheese doesn't move an inch...\
name "Luka"
>Undine...\
name ""
skillname "Undine"
dwave 2,"se\aqua2.ogg"
lsp2 0,":a;chara\undine_st11.bmp",200,300,100,100,0,200
gosub *syoukan_effect
>The power of water takes hold in Luka's sword!\
skillname ""
name $name
>You have gotten better at keeping the attributes at a stable level.@
>You've grown, Luka...\
name ""
>Alipheese doesn't move an inch...\
name "Luka"
>Salamander...\
name ""
skillname "Salamander"
dwave 2,"se\fire2.ogg"
lsp2 0,":a;chara\salamander_st02.bmp",200,300,100,100,0,200
gosub *syoukan_effect
>The power of fire takes hold in Luka's sword!\
skillname ""
name $name
>...................\
name ""
>Alipheese doesn't move an inch...\
mov %kadora,0
name "Luka"
>...Quadruple Giga!\
name ""
skillname1 "Quadruple Giga"
vspl 3,650,0
dwave 2,"se\wind2.ogg"
lsp2 2,":c;effect\cutin_wind.bmp",100,150,100,100,0,10
for %move=0 to 200 step 20
msp2 2,0,20,0,0,0,24
print 1:wait 5
next
csp2 2
lsp 10,":c;effect\cutin_wind.bmp",0,0:print 1
dwave 3,"se\earth1.ogg"
lsp2 2,":c;effect\cutin_earth.bmp",300,150,100,100,0,10
for %move=0 to 200 step 20
msp2 2,0,20,0,0,0,24
print 1:wait 5
next
csp2 2
lsp 11,":c;effect\cutin_earth.bmp",200,0:print 1
dwave 4,"se\aqua2.ogg"
lsp2 3,":c;effect\cutin_aqua.bmp",500,150,100,100,0,10
for %move=0 to 200 step 20
msp2 3,0,20,0,0,0,24
print 1:wait 5
next
csp2 3
lsp 12,":c;effect\cutin_aqua.bmp",400,0:print 1
dwave 5,"se\fire2.ogg"
lsp2 4,":c;effect\cutin_fire.bmp",700,150,100,100,0,10
for %move=0 to 200 step 20
msp2 4,0,20,0,0,0,24
print 1:wait 5
next
csp2 4
lsp 13,":c;effect\cutin_fire.bmp",600,0:print 1
cspl 10,13:print 10,600
vspl 3,650,1
csp 0:csp 1
skillname "Quadruple Giga"
>The power of the four spirits overlap and amplify each other, exploding in a torrent of power!\
wait 500
dwave 1,"se\karaburi.ogg"
lsp 2,":c;effect\003.bmp",0,0:print 1
wait 300
dwave 3,"se\earth1.ogg"
lsp 2,":a;effect\earth.bmp",0,0:print 1
wait 100
dwave 5,"se\fire2.ogg"
lsp 2,":a;effect\fire.bmp",0,0:print 1
wait 100
dwave 4,"se\aqua2.ogg"
lsp 2,":a;effect\aqua.bmp",0,0:print 1
wait 100
dwave 2,"se\wind2.ogg"
lsp 2,":a;effect\wind.bmp",0,0:print 1
wait 100
csp 2:print 18,500,"system\mask01.jpg"
dwave 1,"se\bom3.ogg"
quake 10,2000
>The power to crush anything slams into Alipheese!
dwave 1,"se\damage2.ogg"
rnd2 %damage,40000,50000:gosub *enemylife2
skillname ""
gosub *face2
name $name
>...Amazing... Luka...@
>You...@> Are a true Hero...\
name ""
>A tender smile flashes across Alipheese's face...@
dwave 1,"se\down.ogg"
csp 700:print 10,500
>Then she slowly falls to the ground!\
if %battle_auto=1 skipoff
wait 1000
mov %battle,0
cspl 0,611
bgmstop
gosub *setwindow_01p
>Alipheese was slain...\
mov %count_ko,%count_ko+1
if %nanido=0 skip 6
if %mylife=%max_mylife && %nodamage=0 mov %count_hpfull,1
if %nanido=3 mov %count_hellvic,1
if %status=7 mov %count_vickonran,1
if %counter>0 mov %counterk,1
if %alice_skill=1 mov %alicek,1
if %zukanon=1 return *zukan_commonkaisou0
mov %2342,1
goto *sean0301



*alice2_v

if %sinkou=1 goto *alice2_002
gosub *face2
name $name
>...You've gotten strong, Luka.@
>You...@> Are a true Hero...\
name ""
>A tender smile flashes across Alipheese's face...@
dwave 1,"se\down.ogg"
csp 700:print 10,500
>Then she slowly falls to the ground!\
if %battle_auto=1 skipoff
wait 1000
mov %battle,0
cspl 0,611
bgmstop
gosub *setwindow_01p
>Alipheese was slain...\
mov %count_ko,%count_ko+1
if %nanido=0 skip 6
if %mylife=%max_mylife && %nodamage=0 mov %count_hpfull,1
if %nanido=3 mov %count_hellvic,1
if %status=7 mov %count_vickonran,1
if %counter>0 mov %counterk,1
if %alice_skill=1 mov %alicek,1
if %zukanon=1 return *zukan_commonkaisou0
mov %2342,1
goto *sean0301



*alice2_kousan

gosub *kousan_syori
>Luka stops resisting...\
name $name
>Is that your answer?\
gosub *face2
>Sheesh... There's no hope for you.\
name ""
gosub *alice2_a10
goto *common_main



*alice2_kousan2

name "Alice"
>After coming this far, don't disappoint me.@
>All that's left is for you to wield your sword...\
name ""
goto *alice2_main



*alice2_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 && %sinkou=1 goto *alice2_kousan
if %cmd1=15 && %sinkou>1 goto *alice2_kousan2
if %cmd1=16 && %sinkou=1 goto *alice2_onedari
if %cmd1=16 && %sinkou>1 goto *alice2_kousan2
if %cmd1=17 goto *common_skill
goto *alice2_main



*alice2_yuwaku_a

if %hanyo2=1 gosub *alice2_yuwaku_a2:goto *common_main
gosub *alice2_yuwaku_a1:goto *common_main



*alice2_yuwaku_a1

add %stack,1
name "Luka"
>Ahh... B...Breasts...\
name ""
>Luka clings to Alice, and buries his head in her soft breasts!
if %nanido<2 damage 100,150
if %nanido=2 damage 120,170
if %nanido=3 damage 140,190
name $name
>Sheesh, what a spoiled little child...@
>Do you still love my breasts that much?\
name ""
>Alipheese hugs Luka, pushing him harder against her breasts!\
dwave 1,"se\ero_koki1.ogg"
>Like that, she reaches down and starts to stroke his penis at the same time!
if %nanido<2 damage 300,400
if %nanido=2 damage 320,425
if %nanido=3 damage 340,440
if %mylife=0 sub %stack,1:return *alice2_h5
mov %hanyo2,1
sub %stack,1
return



*alice2_yuwaku_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Haa..."
if %ransu=2 mov $sel1,"Alice..."
if %ransu=3 mov $sel1,"It feels so good..."
name "Luka"
eng $sel1:$sel6\
name ""
>Luka relaxes as he buries his face in Alipheese's breasts...
if %nanido<2 damage 120,150
if %nanido=2 damage 140,170
if %nanido=3 damage 160,190
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Finish as you feel my breasts..."
if %ransu=2 mov $sel1,"Such a spoiled child..."
if %ransu=3 mov $sel1,"I'll stroke it until you finish..."
name $name
eng $sel1:$sel6\
name ""
dwave 1,"se\ero_koki1.ogg"
>While pressing Luka closer to her breasts, she gently strokes his penis!
if %nanido<2 damage 300,400
if %nanido=2 damage 320,420
if %nanido=3 damage 340,440
if %mylife=0 sub %stack,1:return *alice2_h5
sub %stack,1
return



*alice2_a

if %sinkou>1 && %before_action=47 goto *alice2_005
if %sinkou=1 && %enemylife<500 goto *alice2_002
if %turn=1 && %before_action=51 gosub *alice2_001
if %turn=1 && %before_action=52 gosub *alice2_001
if %sinkou=2 goto *alice2_003
if %sinkou=3 goto *alice2_004
if %hanyo6=1 && %bougyo=1 && %aqua=3 gosub *alice2_a6:goto *common_main
if %hanyo6=1 gosub *alice2_a7:goto *common_main
if %kousoku=1 rnd2 %ransu,1,2
if %kousoku=1 && %ransu=1 gosub *alice2_a9:goto *common_main
if %kousoku=1 && %ransu=2 gosub *alice2_a10:goto *common_main
if %turn<3 gosub *alice2_a1:goto *common_main
rnd2 %ransu,1,7
if %ransu=1 gosub *alice2_a1:goto *common_main
if %ransu=2 gosub *alice2_a2:goto *common_main
if %ransu=3 gosub *alice2_a3:goto *common_main
if %ransu=4 gosub *alice2_a4:goto *common_main
if %ransu=5 && %owaza_count3a>8 && %aqua_turn>2 gosub *alice2_a5:goto *common_main
if %ransu=6 && %owaza_count1a>7 gosub *alice2_a8:goto *common_main
if %ransu=7 && %owaza_count2a>7 && %status=0 gosub *alice2_a11:goto *common_main
skip -8



*alice2_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I won't hold back..."
if %ransu=2 mov $sel1,"Eat this!"
if %ransu=3 mov $sel1,"You wouldn't lose to this level of attack, would you!?"
name $name
eng $sel1:$sel6\
name ""
>Alipheese attacks!
rnd2 %ransu,1,100
if %aqua=3 && %nanido<2 && %ransu<15 gosub *aqua_guard:sub %stack,1:return
if %aqua=3 && %nanido=2 && %ransu<10 gosub *aqua_guard:sub %stack,1:return
if %aqua=3 && %nanido=3 && %ransu<7 gosub *aqua_guard:sub %stack,1:return
if %wind=3 && %nanido<2 mov %wind_kakuritu,15
if %wind=3 && %nanido=2 mov %wind_kakuritu,10
if %wind=3 && %nanido=3 mov %wind_kakuritu,7
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
if %nanido<2 damage 200,300
if %nanido=2 damage 250,350
if %nanido=3 damage 300,400
if %mylife=0 sub %stack,1:return *alice2_h1
sub %stack,1
return



*alice2_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Feel the power of the Monster Lord with your own body!"
if %ransu=2 mov $sel1,"This is the Monster Lord's power!"
if %ransu=3 mov $sel1,"I'll show you the true power of darkness!"
name $name
eng $sel1:$sel6\
name ""
skillname "Monster Lord's Cruelty"
dwave 1,"se\bom1.ogg"
>Alipheese lets loose the power of darkness!\
wait 300
flushout 1000
vsp 700,0
bg white,10,1000
rnd2 %ransu,1,100
if %aqua=3 && %nanido<2 && %ransu<50 mov %stuck,1:gosub *aqua_guard:vsp 700,1:bg "bg\bg141.bmp",10,2000:sub %stack,1:return
if %aqua=3 && %nanido=2 && %ransu<40 mov %stuck,1:gosub *aqua_guard:vsp 700,1:bg "bg\bg141.bmp",10,2000:sub %stack,1:return
if %aqua=3 && %nanido=3 && %ransu<25 mov %stuck,1:gosub *aqua_guard:vsp 700,1:bg "bg\bg141.bmp",10,2000:sub %stack,1:return
if %wind=3 && %nanido<2 mov %wind_kakuritu,50
if %wind=3 && %nanido=2 mov %wind_kakuritu,40
if %wind=3 && %nanido=3 mov %wind_kakuritu,25
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":mov %stuck,1:gosub *wind_guard:skillname "Monster Lord's Cruelty":skip 6
mov %a_effect1,1
mov %damage_nobr,1
if %nanido<2 damage 550,650
if %nanido=2 damage 590,690
if %nanido=3 damage 630,730
if %wind=3 && %nanido<2 mov %wind_kakuritu,50
if %wind=3 && %nanido=2 mov %wind_kakuritu,40
if %wind=3 && %nanido=3 mov %wind_kakuritu,25
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":mov %stuck,1:gosub *wind_guard:skillname "Monster Lord's Cruelty":skip 7
mov %a_effect1,1
mov %damage_nobr,2
if %nanido<2 damage 550,650
if %nanido=2 damage 590,690
if %nanido=3 damage 630,730
wait 500
textclear
if %wind=3 && %nanido<2 mov %wind_kakuritu,50
if %wind=3 && %nanido=2 mov %wind_kakuritu,40
if %wind=3 && %nanido=3 mov %wind_kakuritu,25
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":mov %stuck,1:gosub *wind_guard:skillname "Monster Lord's Cruelty":skip 6
mov %a_effect1,1
mov %damage_nobr,1
if %nanido<2 damage 550,650
if %nanido=2 damage 590,690
if %nanido=3 damage 630,730
if %wind=3 && %nanido<2 mov %wind_kakuritu,50
if %wind=3 && %nanido=2 mov %wind_kakuritu,40
if %wind=3 && %nanido=3 mov %wind_kakuritu,25
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":mov %stuck,1:gosub *wind_guard:skip 5
mov %a_effect1,1
if %nanido<2 damage 550,650
if %nanido=2 damage 590,690
if %nanido=3 damage 630,730
vsp 700,1
bg "bg\bg141.bmp",10,2000
skillname ""
if %mylife=0 sub %stack,1:return *alice2_h1
sub %stack,1
return



*alice2_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I call forth the fires of hell!"
if %ransu=2 mov $sel1,"Can you endure this scorching heat!?"
if %ransu=3 mov $sel1,"Eat the flames of the Monster Lord!"
name $name
eng $sel1:$sel6\
name ""
skillname "Omega Blaze"
eng "Alipheese creates a storm of fire!":$sel6/
delay 500
if %effectspeed=2 dwave 1,"se\fire1.ogg":skip 2
mpegplay "effect\movie01.mpg",1
rnd2 %ransu,1,100
if %aqua=3 && %nanido<2 && %ransu<60 gosub *aqua_guard:sub %stack,1:return
if %aqua=3 && %nanido=2 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %aqua=3 && %nanido=3 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %wind=3 && %nanido<2 mov %wind_kakuritu,50
if %wind=3 && %nanido=2 mov %wind_kakuritu,40
if %wind=3 && %nanido=3 mov %wind_kakuritu,25
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
>
>A scorching whirlpool of flame envelopes Luka!
mov %a_effect1,1
if %nanido<2 damage 1500,1800
if %nanido=2 damage 1700,2000
if %nanido=3 damage 1900,2200
skillname ""
if %mylife=0 sub %stack,1:return *alice2_h1
sub %stack,1
return



*alice2_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I call forth the icy touch of death!"
if %ransu=2 mov $sel1,"Go numb to your very bones!"
if %ransu=3 mov $sel1,"Freeze in a block of ice!"
name $name
eng $sel1:$sel6\
name ""
skillname "Frost Ozma"
eng "Alipheese's magical power freezes the air!":$sel6/
delay 500
if %effectspeed=2 dwave 1,"se\wind3.ogg":skip 2
mpegplay "effect\movie02.mpg",1
rnd2 %ransu,1,100
if %aqua=3 && %nanido<2 && %ransu<60 gosub *aqua_guard:sub %stack,1:return
if %aqua=3 && %nanido=2 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %aqua=3 && %nanido=3 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %wind=3 && %nanido<2 mov %wind_kakuritu,50
if %wind=3 && %nanido=2 mov %wind_kakuritu,40
if %wind=3 && %nanido=3 mov %wind_kakuritu,25
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
>
mov %a_effect1,1
if %nanido<2 damage 1500,1800
if %nanido=2 damage 1700,2000
if %nanido=3 damage 1900,2200
skillname ""
if %mylife=0 sub %stack,1:return *alice2_h1
sub %stack,1
return



*alice2_a5

add %stack,1
name $name
>...............\
name ""
skillname "Magic Concentration"
dwave 1,"se\power.ogg"
>Alipheese begins to concentrate magical power!\
mov %hanyo6,1
skillname ""
if %aqua=3 sub %stack,1:return
name "Luka"
>Wh...What's this!?\
name ""
>Incredible magical power is radiating off of Alice...\
>I have to strengthen my defense...@
>No, not even just defense will protect me from this!\
sub %stack,1
return



*alice2_a6

add %stack,1
mov %hanyo6,0
mov %owaza_count3a,0
name $name
>See for yourself the power of the Monster Lord...\
name ""
skillname "Omega Blaze"
>Alipheese creates a storm of fire!
delay 500
if %effectspeed=2 dwave 1,"se\fire1.ogg":skip 2
mpegplay "effect\movie01.mpg",1
mov %stuck,1:gosub *aqua_guard
skillname "Frost Ozma"
>Alipheese's magical power freezes the air!
delay 500
if %effectspeed=2 dwave 1,"se\wind3.ogg":skip 2
mpegplay "effect\movie02.mpg",1
mov %stuck,1:gosub *aqua_guard
skillname "Monster Lord's Cruelty"
dwave 1,"se\bom1.ogg"
>Alipheese lets loose the power of darkness!
wait 300
flushout 1000
vsp 700,0
bg white,10,1000
mov %stuck,1:gosub *aqua_guard
vsp 700,1
bg "bg\bg141.bmp",10,2000
sub %stack,1
return



*alice2_a7

add %stack,1
mov %hanyo6,0
mov %owaza_count3a,0
name $name
>See for yourself the power of the Monster Lord...\
name ""
skillname "Omega Blaze"
eng "Alipheese creates a storm of fire!":$sel6/
delay 500
if %effectspeed=2 dwave 1,"se\fire1.ogg":skip 2
mpegplay "effect\movie01.mpg",1
>
>A scorching whirlpool of flame envelopes Luka!
mov %a_effect1,1
if %nanido<2 damage 1500,1800
if %nanido=2 damage 1700,2000
if %nanido=3 damage 1900,2200
skillname ""
skillname "Frost Ozma"
eng "Alipheese's magical power freezes the air!":$sel6/
delay 500
if %effectspeed=2 dwave 1,"se\wind3.ogg":skip 2
mpegplay "effect\movie02.mpg",1
>
mov %a_effect1,1
if %nanido<2 damage 1500,1800
if %nanido=2 damage 1700,2000
if %nanido=3 damage 1900,2200
skillname ""
skillname "Monster Lord's Cruelty"
dwave 1,"se\bom1.ogg"
>Alipheese lets loose the power of darkness!\
wait 300
flushout 1000
vsp 700,0
bg white,10,1000
mov %a_effect1,1
mov %damage_kotei,1
mov %damage_nobr,1
if %nanido<2 damage 550,650
if %nanido=2 damage 590,690
if %nanido=3 damage 630,730
mov %a_effect1,1
mov %damage_kotei,1
mov %damage_nobr,2
if %nanido<2 damage 550,650
if %nanido=2 damage 590,690
if %nanido=3 damage 630,730
wait 500
textclear
mov %a_effect1,1
mov %damage_kotei,1
mov %damage_nobr,1
if %nanido<2 damage 550,650
if %nanido=2 damage 590,690
if %nanido=3 damage 630,730
mov %a_effect1,1
mov %damage_kotei,1
if %nanido<2 damage 550,650
if %nanido=2 damage 590,690
if %nanido=3 damage 630,730
vsp 700,1
bg "bg\bg141.bmp",10,2000
if %mylife=0 sub %stack,1:return *alice2_h1
sub %stack,1
return



*alice2_a8

add %stack,1
mov %owaza_count1a,0
if %kousan=2 skip 4
name $name
>Ha!\
name ""
skillname "Tail Bind"
dwave 1,"se\ero_makituki3.ogg"
>Alipheese's tail shoots out, and coils around Luka's body!
rnd2 %ransu,1,100
if %aqua=3 && %nanido<2 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %aqua=3 && %nanido=2 && %ransu<25 gosub *aqua_guard:sub %stack,1:return
if %aqua=3 && %nanido=3 && %ransu<15 gosub *aqua_guard:sub %stack,1:return
if %wind=3 && %nanido<2 mov %wind_kakuritu,30
if %wind=3 && %nanido=2 mov %wind_kakuritu,25
if %wind=3 && %nanido=3 mov %wind_kakuritu,15
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:sub %stack,1:return
if %nanido<2 damage 200,300
if %nanido=2 damage 200,300
if %nanido=3 damage 240,340
mov %kousoku,1:gosub *status_print
>Luka has been bound by Alipheese's tail!\
skillname ""
if %mylife=0 sub %stack,1:return *alice2_h2
if %kousan=2 sub %stack,1:return
name $name
if %first_sel1=1 skip 4
>Now to torment you...@
>If you don't fight back here, you'll be finished you know...?\
skip 3
>Hehehe... I caught you again.@
>If you don't fight back here, you'll be finished you know...?\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,100
if %earth=0 && %nanido=2 mov %genmogaku,100
if %earth=0 && %nanido=3 mov %genmogaku,100
if %earth>0 && %nanido<2 mov %genmogaku,2
if %earth>0 && %nanido=2 mov %genmogaku,3
if %earth>0 && %nanido=3 mov %genmogaku,4
sub %stack,1
return



*alice2_a9

add %stack,1
>Luka has been bound by Alipheese's tail...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll make it tighter and tighter..."
if %ransu=2 mov $sel1,"Is it starting to hurt?"
if %ransu=3 mov $sel1,"Are you going to end up dying from the tightness...?"
name $name
eng $sel1:$sel6\
name ""
skillname "Satanic Pressure"
dwave 1,"se\ero_simetuke1.ogg"
lsp 700,":a;chara\alice_st02.bmp",172,0:print 10,500
>Alipheese tenses her tail muscles, tightening her tail around Luka!
skillcount2 3657
if %nanido<2 damage 300,400
if %nanido=2 damage 300,400
if %nanido=3 damage 340,440
skillname ""
if %mylife=0 sub %stack,1:return *alice2_h3
sub %stack,1
return



*alice2_a10

add %stack,1
>Luka has been bound by Alipheese's tail...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Let me have a taste of your energy..."
if %ransu=2 mov $sel1,"Will you finish as your penis is being sucked?"
if %ransu=3 mov $sel1,"If you give in to this pleasure, you'll never overcome me..."
name $name
eng $sel1:$sel6\
name ""
skillname "Pleasure Drain"
dwave 1,"se\ero_chupa6.ogg"
lsp 700,":a;chara\alice_st21.bmp",172,0:print 10,500
>Alipheese's tail opens up, and starts to suck on Luka's penis!
skillcount2 3658
if %nanido<2 damage 400,500
if %nanido=2 damage 400,500
if %nanido=3 damage 440,540
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *alice2_h4
sub %stack,1
return



*alice2_a11

add %stack,1
mov %owaza_count2a,0
name $name
>Give your heart to me!\
name ""
skillname "Eyes of Temptation"
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
eng "Alipheese's eyes flash!":$sel6/
if %wind=3 && %nanido<2 mov %wind_kakuritu,100
if %wind=3 && %nanido=2 mov %wind_kakuritu,90
if %wind=3 && %nanido=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But a gust of wind blocks Luka's view!":gosub *wind_guard:sub %stack,1:return
\
skillcount2 3659
mov %status,5:gosub *status_print
>Luka has been seduced by Alipheese!\
skillname ""
if %first_sel2=1 skip 9
name "Luka"
>Haa... Alice...\
name ""
name $name
>...Sheesh, you're so easily seduced.@
>I'll satisfy your lust with my body...\
name ""
mov %first_sel2,1
mov %hanyo2,0
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,2,3
if %nanido=3 rnd2 %status_turn,3,4
sub %stack,1
return



*alice2_onedari

mov $list1,"Satanic Pressure"
if %3657>0 mov %list_num1,1
mov $list2,"Pleasure Drain"
if %3658>0 mov %list_num2,1
mov $list3,"Eyes of Temptation"
if %3659>0 mov %list_num3,1
gosub *cmd_onedari
if %cmd1=11 goto *alice2_onedari1
if %cmd1=12 goto *alice2_onedari2
if %cmd1=13 goto *alice2_onedari3
if %cmd1=-1 goto *alice2_main
goto *alice2_onedari



*alice2_onedari1

gosub *onedari_syori_k
name $name
>You want me to strangle you with my tail...?@
>Sheesh... There's no hope for you.\
name ""
if %kousoku=0 gosub *alice2_a8
gosub *alice2_a9
skip -1



*alice2_onedari2

gosub *onedari_syori_k
name $name
>You want me to suck on you with my tail...?@
>Sheesh... There's no hope for you.\
name ""
if %kousoku=0 gosub *alice2_a8
gosub *alice2_a10
skip -1



*alice2_onedari3

gosub *onedari_syori
name $name
>You want to give your heart to me?@
>Sheesh... There's no hope for you.\
name ""
gosub *alice2_a11
goto *alice2_yuwaku_a



*alice2_h1

name "Luka"
>Uwa...!\
name ""
dwave 1,"se\down.ogg"
>After taking Alice's attack, I fall to the ground in defeat.\
mov %viclose,2:gosub *lose
mov %2642,%2642+1:if %2642=1 mov %count_koenemy,%count_koenemy+1
if %2642>%count_most mov %count_most,%2642:mov $count_mostname,$name
count 14,3
mov $bad1,"Alipheese's attack brought Luka to his knees."
gosub *face2
goto *alice2_h



*alice2_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\alice_bk07.bmp",172,0
gosub *syasei2
>As Alipheese's tail winds around Luka, he comes, spraying his semen all over her tail.\
mov %viclose,1:gosub *lose
mov %2642,%2642+1:if %2642=1 mov %count_koenemy,%count_koenemy+1
if %2642>%count_most mov %count_most,%2642:mov $count_mostname,$name
count 16,3
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come as Alipheese wrapped her tail around him."
gosub *face2
goto *alice2_h



*alice2_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\alice_bk07.bmp",172,0
gosub *syasei2
>As Alipheese tightens her tail around Luka, he comes, spraying his semen all over her tail.\
mov %viclose,1:gosub *lose
mov %2642,%2642+1:if %2642=1 mov %count_koenemy,%count_koenemy+1
if %2642>%count_most mov %count_most,%2642:mov $count_mostname,$name
count 16,3
mov $bad1,"Luka was forced to come as Alipheese tightened her tail around him."
gosub *face2
goto *alice2_h



*alice2_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\alice_bk11.bmp",172,0
gosub *syasei2
>As Alipheese sucks on Luka's penis with the tip of her tail, Luka comes, filling her with his semen.\
mov %viclose,1:gosub *lose
mov %2642,%2642+1:if %2642=1 mov %count_koenemy,%count_koenemy+1
if %2642>%count_most mov %count_most,%2642:mov $count_mostname,$name
count 2,3
mov $bad1,"Alipheese used her tail to suck on Luka and force him to come."
gosub *face2
goto *alice2_h



*alice2_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\alice_bk04.bmp",172,0
gosub *syasei2
>As Luka lusts after Alipheese's breasts, he comes, covering her hands with his semen.\
mov %viclose,1:gosub *lose
mov %2642,%2642+1:if %2642=1 mov %count_koenemy,%count_koenemy+1
if %2642>%count_most mov %count_most,%2642:mov $count_mostname,$name
count 31,3
mov $bad1,"Luka was forced to come as he lusted after Alipheese's breasts."
goto *alice2_h



*alice2_h

mov $end_go,"sean0300a"
mov $bad2,"Luka spends an eternity having sex with Alice in the closed off space."
if %2642=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
cspl 690,699
lsp 700,":a;chara\alice_st04.bmp",172,0:print 10,500
name "Alice"
if %kousan=0 skip 3
>Sheesh, you really are pitiful...\
skip 3
>Did you truly fight seriously...?@
>No, it doesn't matter anymore.\
name ""
>Alice begins to mutter a strange incantation...@
>The throne room fills with power, as a strange atmosphere descends around us.\
>I hold my breath as it feels like the outside world itself is being cut off from us.\
name "Luka"
>Wh...What are you doing...?\
name ""
lsp 700,":a;chara\alice_st01.bmp",172,0:print 10,500
name "Alice"
>I created an unbreakable barrier around this room.@
>It's no longer possible to enter or leave.\
name ""
name "Luka"
>N...No way...\
name ""
>She created an unbreakable barrier...?@
>And inside of it, just the two of us remain...\
name "Alice"
>With this, the Monster Lord vanished from the world.@
>Sadly, so did the brave Hero who killed her.\
>...Just a slight modification of the original scenario.@
>The world should easily accept that kind of story, too.\
>However... You can never escape from here again.@
>Together with me, you shall be in here for eternity.\
name ""
name "Luka"
>Wh...Why did you...?\
name ""
name "Alice"
>.............\
name ""
dwave 1,"se\ero_makituki3.ogg"
>Alice slowly winds her tail around me, calmly taking off my clothes.@
>After stripping me naked, she pulls me close against her body.\
if %con_hvoice=0 dwave 0,"voice\alice9_01.ogg"
name "Alice"
>...Luka, have sex with me.
>We shall spend eternity lusting after each other's bodies...\
name ""
dwavestop 0
name "Luka"
>B...But I...\
name ""
>Alice uses her tail to press me up right against her.\
if %con_hvoice=0 dwave 0,"voice\alice9_02.ogg"
name "Alice"
>Hoora... It's the Monster Lord's pussy that took your virginity...
>I'll use this to show you heaven again...\
name ""
dwavestop 0
name "Luka"
>N...No, Alice...!@
>Ahh!\
name ""
>Ignoring me, Alice violates me by force.\
mov %hseanwave,1:hseanwave
lsp 700,":a;chara\alice_h09_1r.bmp",0,0:print 10,500
>My penis slowly sinks into her, the hot, wet flesh rubbing against me as I enter.@
>Her seductive touch is much different from when I felt her in her human form.\
>Warm juices fill her vagina, dripping out the deeper I go.@
>At the same time, her soft flesh presses against my penis, rubbing me all the way inside.\
>Her folds eagerly twitch at the feeling of my glans as I press into her, all while she gently squeezes down on me.\
if %con_hvoice=0 dwave 0,"voice\alice9_03.ogg"
name "Alice"
>Hoora, you're all the way inside...\
name ""
dwavestop 0
name "Luka"
>Ahhh...\
name ""
>The moment I'm all the way inside her, my body shakes as I seemingly go into a trance of pure ecstasy.\
gosub *syasei1
lsp 700,":a;chara\alice_h09_2r.bmp",0,0
gosub *syasei2
>Having an instant orgasm, I come inside Alice as soon as I'm all the way in her.\
>Alice looks down at me and smiles as I go red from humiliation.\
if %con_hvoice=0 dwave 0,"voice\alice9_04.ogg"
name "Alice"
>Hehe... Couldn't endure for ten seconds again?
>My pussy is an instant finish for you, I see...\
if %con_hvoice=0 dwave 0,"voice\alice9_05.ogg"
>Even if I don't use a skill or anything, just insertion is enough...
>That really is a weak penis you have there...\
name ""
dwavestop 0
name "Luka"
>Ahh...\
name ""
>Even though I feel humiliated, with her powerful tail around me, I can't escape...@
>Frustration wells up in me as I can't even struggle.\
>As a result, I just feebly squirm in pleasure.@
>Just how long is Alice going to coil around me and tease me like this...?\
if %con_hvoice=0 dwave 0,"voice\alice9_06.ogg"
name "Alice"
>Hehe... What a pitiful look. You don't look like a Hero.
>You betrayed my hopes, and couldn't fulfill your duty as a Hero...\
if %con_hvoice=0 dwave 0,"voice\alice9_07.ogg"
>I'll need to torment a miserable guy like you a lot...
>Hoora... Writhe in the Monster Lord's vagina techniques!\
name ""
dwavestop 0
>Alice's vagina suddenly squeezes down around my penis, as if it was a snake coiling around its prey.\
name "Luka"
>Ah!@>Ahhh!\
name ""
if %con_hvoice=0 dwave 0,"voice\alice9_08.ogg"
name "Alice"
>Hehe... Unbearable tightness, isn't it?
>I can control my pussy at will, and even change its shape...\
if %con_hvoice=0 dwave 0,"voice\alice9_09.ogg"
>I've mastered many techniques to bring a man to tears...
>Hora... Horahora... Like this...\
name ""
dwavestop 0
name "Luka"
>Ahhh!!\
name ""
>As my body is attacked by the sensations from the intense tightness, Alice presses me closer against her body\
if %con_hvoice=0 dwave 0,"voice\alice9_10.ogg"
name "Alice"
>Hehe... It looks like it feels good.
>That skill is called "Serpent Choking"...\
if %con_hvoice=0 dwave 0,"voice\alice9_11.ogg"
>I skillfully use my vaginal muscles to tighten and give you a feeling of pressure...
>If you take this, someone like you wouldn't last long...\
name ""
dwavestop 0
name "Luka"
>Ahhh!!\
name ""
>I feel her muscles pressing into me from every direction, clamping down around my penis.\
>Without being painful at all, the unique sensations flood me with pleasure Alice hugs me closer.\
name "Luka"
>Ahh... I... I'm going to come...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice9_12.ogg"
name "Alice"
>Hehe... You sure are fast...
>Now come as the serpent squeezes down on you!\
name ""
dwavestop 0
>Suddenly, she squeezes down on me from the base of my penis right to the tip, just as if there really was a snake inside of her constricting my penis.\
name "Luka"
>Ahh...!\
name ""
>The serpent inside of her squeezes and presses down on me, forcing me over the edge.\
name "Luka"
>Ah... No more...@
>Ahh!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice_h09_3r.bmp",0,0
gosub *syasei2
>I explode inside of Alice, defeated by the clamping sensations inside of her.\
if %con_hvoice=0 dwave 0,"voice\alice9_13.ogg"
name "Alice"
>Hehe... Such a quick surrender.
>What a shameful man, letting so much leak out...\
if %con_hvoice=0 dwave 0,"voice\alice9_14.ogg"
>I'll train that premature ejaculating penis of yours a little with my pussy...
>We have an eternity of time, after all...\
name ""
dwavestop 0
name "Luka"
>Eh...?@> Ahh!\
name ""
>Suddenly, she loosens her vagina around me as the walls of her vagina start to squeeze and rub against my penis.\
>It's almost as if I'm stuck in the digestive organ of some creature...@
>Overcome by a completely new sensation, I feel the strength drain from my body again.\
if %con_hvoice=0 dwave 0,"voice\alice9_15.ogg"
name "Alice"
>This skill is called the Sea Slug Wave...
>The name is poor, but it was created by a Monster Lord generations back...\
if %con_hvoice=0 dwave 0,"voice\alice9_16.ogg"
>As you're feeling now, I make my pussy slowly move in a wave motion...
>A skill to drive a man to orgasm with this strange movement...\
if %con_hvoice=0 dwave 0,"voice\alice9_17.ogg"
>Horehore... It's unbearable, isn't it?
>You can't endure it, can you? You want to come, don't you?\
name ""
dwavestop 0
name "Luka"
>Ahhh...!\
name ""
>The wave motion in her vagina gets more and more intense, even going so far as to slightly bend my erect penis a little bit inside of her.\
>The tip of my penis rubs hard against her soft flesh as her walls push it around inside her, bringing unbearable pleasure with it.\
if %con_hvoice=0 dwave 0,"voice\alice9_18.ogg"
name "Alice"
>Hehe... I know your penis is rejoicing at being inside my pussy.\
if %con_hvoice=0 dwave 0,"voice\alice9_19.ogg"
>You want to come inside me like this, don't you?
>Go ahead and come, without holding anything back...\
name ""
dwavestop 0
name "Luka"
>Ahh... It feels so good...\
name ""
>My penis twitches inside of her as my body rejoices in bliss at the soft feeling of Alice's vagina around me.\
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1:gosub *syasei2
>I climax as her wave motion continues, knocking my penis around inside of her even as I come.\
>Surrendering myself to the pleasure of her vagina, I softly sigh as her vagina continues rubbing against my penis as I come inside her.\
name "Luka"
>Ahh...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice9_20.ogg"
name "Alice"
>Hehe... You surrendered after the third time...
>I'll torment that surrendered penis of yours even more...\
if %con_hvoice=0 dwave 0,"voice\alice9_21.ogg"
>Taste the Monster Lord's vaginal skills with your body...\
name ""
dwavestop 0
>Alice's vagina suddenly gets smaller, as a slow suction sensation starts to pull at me inside her.\
>At the same time her vagina starts seemingly sucking on me, the vaginal walls start to squirm and wriggle around my penis.\
>It feels like my body itself could melt in pleasure as the suction slowly gets stronger and stronger.\
name "Luka"
>Haa...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice9_22.ogg"
name "Alice"
>This skill is called "Leech Suck".
>Like a leech sucking blood, I can suck semen out of your penis...\
if %con_hvoice=0 dwave 0,"voice\alice9_23.ogg"
>Hoora, I'm going to suck the semen right out of your penis...
>Hora, hora, hora...\
name ""
dwavestop 0
name "Luka"
>Ahhh!!\
name ""
>The suction slowly gets more and more intense, causing her soft vaginal walls to press down hard against my penis.\
>Almost pulling my penis deeper inside, it really is as if her vagina is a giant leech, trying to forcibly suck semen out of my penis.\
name "Luka"
>No... I'm going to come again...\
name ""
>I clench my stomach, trying to stop the coming orgasm.@
>As a man, I can't just let myself be played with like this...\
if %con_hvoice=0 dwave 0,"voice\alice9_24.ogg"
name "Alice"
>Hehe, it's pointless to resist...
>This is a skill to forcibly suck out semen, after all.\
if %con_hvoice=0 dwave 0,"voice\alice9_25.ogg"
>Give up to the suction sensations, and allow me to suck out your semen...\
name ""
dwavestop 0
name "Luka"
>Ahhh...\
name ""
>Her vagina sucks hard on me like a mouth even as she teases me for my resistance.\
>Despite my best effort to hold on, the unrelenting stimulation slowly breaks down my defenses.@
>Before long, I feel my lower body start to go numb in pleasure.\
name "Luka"
>Ahh... It... It feels good...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice9_26.ogg"
name "Alice"
>Hehe, what truly short endurance...
>Hoora, I'll suck out the proof of your surrender!\
name ""
dwavestop 0
>In the next instant, her vagina starts pulling on me even harder.@
>Almost as if my soul itself was being sucked out, I feel myself pulled deeper into her as I'm pushed over the edge.\
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1:gosub *syasei2
>As I explode inside her, the powerful suction pulls out my semen even as I come.@
>Greedily sucking on my penis, the semen is pulled deeper inside Alice as she sucks on me with her vagina.\
>I shake in ecstasy as the suction continues, until every drop of my semen has been forcibly sucked out.\
name "Luka"
>Haa...@
>Stop this already...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice9_27.ogg"
name "Alice"
>Hehe... Did you think you would be freed from my pussy after just that?
>Once your penis is inside me, I'm not going to let go until I drain every drop of semen...\
if %con_hvoice=0 dwave 0,"voice\alice9_28.ogg"
>Hoora, how about this skill?\
name ""
dwavestop 0
>Suddenly, her vaginal walls start to move as the thousands of folds inside her press hard against my penis.\
>Like that, they all start moving up and down, as if they were thousands of tongues licking every inch of me.\
name "Luka"
>Ahhh!!\
name ""
if %con_hvoice=0 dwave 0,"voice\alice9_29.ogg"
name "Alice"
>Hehe... This is called "Fold Hell".
>I can move each and every fold as I want...\
if %con_hvoice=0 dwave 0,"voice\alice9_30.ogg"
>If I focus on the tip...\
name ""
dwavestop 0
>The folds all converge around the tip of my penis, as if hundreds of tiny individual tongues are all licking my glans.\
name "Luka"
>Ahhh!!@
>Stop it!\
name ""
>I tremble in Alice's tail, still tightly holding me next to her as the overwhelming stimulation attacks me.\
>With her coiled around me like this, there's nothing I can do...@
>It's like I'm nothing but Alice's prey...\
if %con_hvoice=0 dwave 0,"voice\alice9_31.ogg"
name "Alice"
>Hehe, how unsightly...
>Writhing like that in a woman's embrace... How embarrassing.\
if %con_hvoice=0 dwave 0,"voice\alice9_32.ogg"
>I'll lick you clean in my pussy, and make you look even more pathetic...\
name ""
dwavestop 0
name "Luka"
>Ah...!@> Ahhh!\
name ""
>From the base to the tip, her tongue-like folds lick against me as her vaginal walls themselves squirm and wriggle.\
>Just like the name, it really is as if I'm stuck in a hell of folds...\
if %con_hvoice=0 dwave 0,"voice\alice9_33.ogg"
name "Alice"
>Hoora... Finish as my folds rub against you...
>Hora, horahorahora...\
name ""
dwavestop 0
name "Luka"
>N...No... I'm coming again... !@
>Ahh!\
name ""
gosub *syasei1:gosub *syasei2
>Unable to endure her vagina, I explode inside of Alice all while her folds continue rubbing against me.\
name "Luka"
>Ah...! Ah...\
name ""
>My body shakes as I come inside her, suddenly overcome with intense weakness after the powerful orgasm.\
>Now even weaker, I'm left completely defenseless in Alice's embrace.\
if %con_hvoice=0 dwave 0,"voice\alice9_34.ogg"
name "Alice"
>Hehe... It seems like your tip is quite sensitive...
>Now then, I'll use a vaginal skill to play with just that tip...\
name ""
dwavestop 0
name "Luka"
>S...Stop... Ahh!\
name ""
>I feel the muscles in her vagina moving around again.\
>Something like a tiny tentacle starts to tickle my urethral opening.@
>Suddenly, more and more tiny tentacles start to surround my tip, focusing solely around my opening.\
name "Luka"
>Wh...What is this...?@
>N...Not just the tip... Ah...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice9_35.ogg"
name "Alice"
>Hehe... This skill is called "Playful Sea Anemone".
>A sea anemone hidden in my vagina will play with your penis...\
name ""
dwavestop 0
name "Luka"
>That feels... Disgusting...@>Ah!\
name ""
>I feebly shake side to side as the tentacles play with my urethral opening.\
if %con_hvoice=0 dwave 0,"voice\alice9_36.ogg"
name "Alice"
>At first, the "Playful Sea Anemone" will focus on your urethral opening...
>Since you're a man, you can't endure an attack on the urethra.\
if %con_hvoice=0 dwave 0,"voice\alice9_37.ogg"
>Hoora, hora, hora hora...\
name ""
dwavestop 0
name "Luka"
>Hyaaa!\
name ""
>I yell out as the tiny tentacle crawls around over the tip of my penis, sometimes gently slipping inside and rubbing around right at the entrance.\
>My hands and feet flail around wildly at the sensations, but Alice just pins me back to the floor, keeping me still.\
if %con_hvoice=0 dwave 0,"voice\alice9_38.ogg"
name "Alice"
>Hehe... It seems quite effective.
>For now, I'll finish you off with "Umbrella Hole Kill".\
if %con_hvoice=0 dwave 0,"voice\alice9_39.ogg"
>Hoora, I'll slowly play with your urethral opening...
>Horahora, hora... Hehe.\
name ""
dwavestop 0
name "Luka"
>Ahhh!!\
name ""
>The most sensitive part on my body is gently being tortured by Alice.\
>As the tip of one of her tiny wet tentacles rubs around inside again, I feel myself about to come.\
name "Luka"
>Ahh... Alice... I'm going to come...@
>It... It feels so good...\
name ""
gosub *syasei1:gosub *syasei2
>I explode, shooting semen out as Alice's tentacle continues to rub against the hole it's shooting from.\
>My entire body feels like it could melt into pleasure itself as I come.\
if %con_hvoice=0 dwave 0,"voice\alice9_40.ogg"
name "Alice"
>...What, already finished?
>I knew it, your glans is quite sensitive...\
if %con_hvoice=0 dwave 0,"voice\alice9_41.ogg"
>We have as much time as we need, so I'll thoroughly train it...
>Hoora, next is the frenulum...\
name ""
dwavestop 0
name "Luka"
>Hyaa... Ah...!\
name ""
>This time, the tiny tentacles start to rub against the back of my penis, right where my glans starts.\
>As she switches from sensitive spot to sensitive spot, I continue squirming in her embrace.\
name "Luka"
>Ahhh... N... No...@
>If you do that... I'll come again...!\
name ""
if %con_hvoice=0 dwave 0,"voice\alice9_42.ogg"
name "Alice"
>Sheesh, you're weak here too?
>Your penis is full of weak points, isn't it...?\
if %con_hvoice=0 dwave 0,"voice\alice9_43.ogg"
>Horahora... I'm sure an ejaculation as I stimulate back here will feel amazing...\
name ""
dwavestop 0
name "Luka"
>Ahhh...!\
name ""
>The tiny tentacles focus solely on the back of my penis, not giving me even a moment's respite from the unending stimulation.\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>As her tentacles massage the back of my penis, I come inside Alice again.\
if %con_hvoice=0 dwave 0,"voice\alice9_44.ogg"
name "Alice"
>...Sheesh, an instant finish even with the back.
>It doesn't qualify as training like this...\
if %con_hvoice=0 dwave 0,"voice\alice9_45.ogg"
>Next is going to be the neck of the penis, but I'm sure you'll come right away anyway...
>Sheesh, such a pitiful guy...\
name ""
dwavestop 0
>The tentacles move from the back of my penis, this time slowly coiling around right under my glans.\
name "Luka"
>Ah...!\
name ""
if %con_hvoice=0 dwave 0,"voice\alice9_46.ogg"
name "Alice"
>Hehe, it feels good, doesn't it?\
if %con_hvoice=0 dwave 0,"voice\alice9_47.ogg"
>This skill is particularly good at this kind of teasing...
>I can make someone at your level come in no time...\
name ""
dwavestop 0
name "Luka"
>Ah...ah...ah...\
name ""
>The tentacles wrap tighter around the area right under the tip of my penis.\
>After they all latch on, they start to quickly move up and down, in very small movements.\
>I feebly press against Alice's body in an unconscious reaction, but there's still no getting away.\
name "Luka"
>Ahh!@> Guh...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice9_48.ogg"
name "Alice"
>Oh... It looks like you're enduring it for once.
>But in the end, you'll reach the same miserable result.\
if %con_hvoice=0 dwave 0,"voice\alice9_49.ogg"
>At this rate, training your penis is going to be quite difficult...\
name ""
dwavestop 0
name "Luka"
>Ahh...!\
name ""
>Just as she said, my ability to withstand this is already at its breaking point.\
>All I can feel are her tiny tentacles, rubbing quickly right underneath my glans.@
>Unable to take it any longer, I let my body relax.\
name "Luka"
>Ahh... Already... Coming...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice9_50.ogg"
name "Alice"
>Sheesh... You can't even take this for a minute?
>Oh well, come as I play with your glans...\
name ""
dwavestop 0
>Alice sighs as the tentacles move even faster, easily pushing me over the edge right on her command.\
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1:gosub *syasei2
>More of my semen flows into Alice as her tentacles keep massaging right under the tip of my penis.\
name "Luka"
>Haaa...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice9_51.ogg"
name "Alice"
>...Now then, I'm going to torment your urethral opening, neck and frenulum all at the same time.
>Let's see if you can withstand this "Glans Killer" for even a second.\
name ""
dwavestop 0
name "Luka"
>N...No... If you do it all at the same time...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice9_52.ogg"
name "Alice"
>Hoora... Here I go...
>Hora, hora, hora...\
name ""
dwavestop 0
name "Luka"
>Ahhhh!!\
name ""
>Her tiny tentacles latch onto every part of the tip of my penis.\
>The tip of one slips into my urethral opening, as the others latch onto the back of my penis, and others right under the neck.\
>The moment all of them latch onto me, all the strength leaves my body as my vision goes white.\
name "Luka"
>Haaa...\
name ""
if %con_hvoice=0 dwave 0,"voice\alice9_53.ogg"
name "Alice"
>...Sheesh, broken in an instant.
>Surrendering in seconds... Such a pitiful penis.\
name ""
dwavestop 0
name "Luka"
>Haa...\
name ""
>As Alice looks at me with disgust in her eyes...\
gosub *syasei1
lsp 700,":a;chara\alice_h09_4r.bmp",0,0
gosub *syasei2
>I come inside her, shooting the proof of my submission into her.\
name "Luka"
>Ahh...\
name ""
>Forced to yet another orgasm after only seconds, my face goes red in humiliation and ecstasy.\
if %con_hvoice=0 dwave 0,"voice\alice9_54.ogg"
name "Alice"
>Hehe... Truly pitiful. But cute.
>From now on, I'll carefully train you with my pussy...\
if %con_hvoice=0 dwave 0,"voice\alice9_55.ogg"
>We have as much time as we want...
>Let's continue having sex for eternity...\
name ""
dwavestop 0
name "Luka"
>Ahh... Alice... Alice...\
name ""
>I cling to Alice's warm body as I indulge in the ecstasy.@
>Kept in her embrace, she fills me with blissful pleasure.\
if %con_hvoice=0 dwave 0,"voice\alice9_56.ogg"
name "Alice"
>Hehe... I'll never let go...
>You'll have sex with me forever in this room...\
if %con_hvoice=0 dwave 0,"voice\alice9_57.ogg"
>Just the two of us, forever...
>Forever... Forever...\
name ""
dwavestop 0
gosub *anten
mov %hseanwave,0:hseanwave
>Thus, the Hero and the Monster Lord continue having sex.@
>Stuck in a closed off space for eternity, they never part again.\
>With them behind an unbreakable barrier, even Goddess Ilias cannot lay her hands on them.@
>Without any interference, Ilias forcefully takes over the world and begins to re-create it...\
>Thus, the world is brought to peace...\
>.................\
goto *badend



*cupid_start

mov $ori_name,"Luka"
mov $name,"Cupid"
mov $name2,"Cupid"
mov $lavel,"cupid"
mov $tatie1,"cupid_st01"
mov $tatie2,"cupid_st04"
mov $tatie3,"cupid_st03"
mov $tatie4,"cupid_ha1"
mov $haikei,"bg047"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,13000
if %nanido=2 mov %max_enemylife,18000
if %nanido=3 mov %max_enemylife,36000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,100
mov %earth_keigen,20
if %nanido=3 mov %earth_keigen,10
mov %alice_skill,0
mov %music,9
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't push Cupid off him!"
mov $mogaku_anno2,"Luka shoved Cupid off him!"
mov $mogaku_anno3,"But Luka can't move like this!"
mov $mogaku_sel1,"Bad booooy. No ruuuuning! "
mov $mogaku_sel2,"There's no point struggling! "
mov $mogaku_sel3,"Bad booooy.No ruuuuning! "
mov $mogaku_sel4,"There's no point struggling! "
mov $mogaku_sel5,"Bad booooy.No ruuuuning! "
mov $mogaku_dassyutu1,"Aww, why'd you escape?"
mov $mogaku_dassyutu2,"I was going to rape you and everything..."
mov $mogaku_earth_dassyutu1,"Aww, why'd you escape?"
mov $mogaku_earth_dassyutu2,"I was going to rape you and everything..."
mov $half_s1,"Ahaha, it feels good, huh? "
mov $half_s2,"I'm going to make you come you knooooow? "
mov $kiki_s1,"Ahaha, going to come soon?"
mov $kiki_s2,"You're going to be just another prey of cupid soon you knoooow? "
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-270
mov %tukix,300
mov %owaza_count1a,4
mov %owaza_count2a,4
name $name
>Ahaha... Are you after my body too?@
>That's fine, I'll enjoy raping you. \
name ""
name "Luka"
>Is someone like you really an angel...?\
name ""
>Neat and clean, without a single imperfection.@
>The lewd girl in front of me was nothing like what I imagined an angel to be.\
lsp 700,":a;chara\cupid_st05.bmp",-200,0
lsp 701,":a;chara\valkyrie_st01.bmp",80,0:print 10,500
name $name
>Valkyrie, don't interfere.@
>The disgraced Hero picked me after all. \
name ""
name "Valkyrie"
>I got it... Don't be careless.@
>If a ground worlder should push you, it would besmirch the angels' honor.\
name ""
lsp 700,":a;chara\cupid_st01.bmp",0,0
csp 701:print 10,500
>The Valkyrie turns away from the Cupid, heading toward another group of monsters fighting.@
>I need to defeat Cupid quick, and go stop the other angels!\
name $name
>Ahaha. I've wanted to have a taste of a Hero for so long... @
>I'll prey on that penis of yours with my pussy. \
name ""
name "Luka"
>Don't screw around. Here I come!\
name ""
>I will destroy these angels who believe monsters to be completely evil!@
>I'll stop this massacre!\
mov %sinkou,1
goto *common_main



*cupid001

lsp 700,":a;chara\cupid_st06.bmp",0,0:print 10,500
name $name
>Hya!?@
>Why did the human's attack hit!?\
name ""
lsp 700,":a;chara\cupid_st06.bmp",-200,0
lsp 701,":a;chara\valkyrie_st01.bmp",80,0:print 10,500
name "Valkyrie"
>That's the cursed blade, Angel Halo...@
>The original fallen angel created that in order to bring ruin to the angels.\
>Be careful, Cupid.@
>If that hits, even we will be in danger.\
name ""
csp 701
lsp 700,":a;chara\cupid_st03.bmp",0,0:print 10,500
name $name
>Hmph!@
>That's so cowardly!\
name ""
name "Luka"
>Says the one immune to the attacks of the monsters they're massacring!\
name ""
gosub *face1
mov %sinkou,2
goto *cupid_a



*cupid_v

gosub *face3
name $name
>Wait, what's going on!?\
name ""
dwave 1,"se\bun.ogg"
csp 700:print 99,1000,"system\breakup.dll/lrB"
>Cupid fades away into particles, then vanishes!\
mov %viclose,1:gosub *victory
mov %getexp,80000:gosub *lvup
mov %2350,1
goto *sean0304b



*cupid_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and ends his resistance.\
gosub *face2
name $name
>Ahaha, you want to be preyed on by my pussy?@
>Alright then, it's time for some fun! \
name ""
goto *cupid_a



*cupid_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *cupid_kousan
if %cmd1=16 goto *cupid_onedari
if %cmd1=17 goto *common_skill
goto *cupid_main



*cupid_a

if %before_action<40 && %kousoku=0 && %sinkou=1 goto *cupid001
if %status=1 gosub *cupid_a5:goto *common_main
if %kousoku=1 gosub *cupid_a7:goto *common_main
rnd2 %ransu,1,5
if %ransu=1 gosub *cupid_a1:goto *common_main
if %ransu=2 gosub *cupid_a2:goto *common_main
if %ransu=3 gosub *cupid_a3:goto *common_main
if %ransu=4 && %owaza_count1a>5 gosub *cupid_a6:goto *common_main
if %ransu>4 && %owaza_count2a>5 && %status=0 gosub *cupid_a4:goto *common_main
skip -6



*cupid_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Here you goooo. Coming from a handjooob! "
if %ransu=2 mov $sel1,"Cmon, explode in my haaaand! "
if %ransu=3 mov $sel1,"How long can you endure my handjob? Ahahaha! "
name $name
eng $sel1:$sel6\
name ""
skillname "Eros' Handjob"
dwave 1,"se\ero_koki1.ogg"
>Cupid grabs Luka's penis, and passionately strokes him!
rnd2 %ransu,0,99:if %aqua=3 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka nimbly dodges it!":gosub *wind_guard:sub %stack,1:return
skillcount3 3383
if %nanido<2 damage 200,230
if %nanido=2 damage 300,330
if %nanido=3 damage 400,430
skillname ""
if %mylife=0 sub %stack,1:return *cupid_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*cupid_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I wonder what kind of taste your penis haaaaas?"
if %ransu=2 mov $sel1,"I'll lick and lick, and suck and suck! "
if %ransu=3 mov $sel1,"The Hero's dick will explode in my moooouth! "
name $name
eng $sel1:$sel6\
name ""
skillname "Cupid's Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>Cupid takes Luka's penis deep in her throat, and eagerly sucks on it!
rnd2 %ransu,0,99:if %aqua=3 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka nimbly dodges it!":gosub *wind_guard:sub %stack,1:return
skillcount3 3660
if %nanido<2 damage 220,250
if %nanido=2 damage 320,350
if %nanido=3 damage 420,450
skillname ""
if %mylife=0 sub %stack,1:return *cupid_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*cupid_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Your dick will feel soooo good between my breasts you knooow? "
if %ransu=2 mov $sel1,"I'll squeeze and squeeze with my breasts, so you need to spurt and spurt! "
if %ransu=3 mov $sel1,"Time to make the Hero's dick spurt with my breaaaasts! "
name $name
eng $sel1:$sel6\
name ""
skillname "Amores' Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>Cupid violently rubs Luka's penis between her breasts!
rnd2 %ransu,0,99:if %aqua=3 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka nimbly dodges it!":gosub *wind_guard:sub %stack,1:return
skillcount3 3669
if %nanido<2 damage 240,260
if %nanido=2 damage 340,360
if %nanido=3 damage 440,460
skillname ""
if %mylife=0 sub %stack,1:return *cupid_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*cupid_a4

add %stack,1
mov %owaza_count2a,0
name $name
>I'm better than eeeeeveryone at archery! \
name ""
skillname "Cupid's Arrow"
dwave 1,"se\yumi.ogg"
eng "Aiming at Luka, Cupid lets off multiple arrows!":$sel6/
rnd2 %ransu,0,99:if %aqua=3 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %wind=3 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka nimbly dodges it!":gosub *wind_guard:sub %stack,1:return
\
>Magic floods Luka's body from the point where the arrow hits him...@
mov %status,1:gosub *status_print
>Luka has been immersed in ecstasy!\
skillname ""
name "Luka"
>Haa...\
name ""
name $name
>Ahaha... After taking that arrow, you won't move for a whiiiile! @
>From now oooon... @
>You're going to be the prey of my breasts!\
name ""
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,3,4
if %nanido=3 rnd2 %status_turn,4,5
sub %stack,1
return



*cupid_a5

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Have a piece of true heaveeen! "
if %ransu=2 mov $sel1,"Is the Hero going to come in my breeeasts? All your white stuff!?"
if %ransu=3 mov $sel1,"Prey of my breaassts! Take this, and this, and thiiis! "
name $name
eng $sel1:$sel6\
name ""
skillname "Tit Fuck Temptation"
dwave 1,"se\ero_sigoki1.ogg"
lsp 690,":a;chara\cupid_hb1.bmp",134,0:print 10,500
>Cupid violently rubs Luka's penis between her breasts!
skillcount3 3670
if %nanido<2 damage 240,280
if %nanido=2 damage 340,380
if %nanido=3 damage 440,480
dwave 1,"se\ero_sigoki1.ogg"
>Cupid uses her hands to press the sweet softness of her breasts into Luka's penis!
if %nanido<2 damage 240,280
if %nanido=2 damage 340,380
if %nanido=3 damage 440,480
skillname ""
if %mylife=0 sub %stack,1:return *cupid_h4
if %kousan<>2 csp 690:print 10,500
sub %stack,1
return



*cupid_a6

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 7
name $name
if %first_sel1=1 skip 3
>Time to prey on the Hero's dick with my puuuussy! \
skip 2
>This time I'll devour you, you knooow? \
name ""
skillname "Love Angel's Restraint"
eng "Cupid aggressively pushes Luka down!":$sel6/
rnd2 %ransu,0,99:if %aqua=3 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka nimbly dodges it!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>Cupid is on top of Luka!\
skillname ""
if %kousan=2 sub %stack,1:return
name $name
if %first_sel1=1 skip 3
>You're going to be raped by Cupid now! @
skip 2
>I'll rape you this time. @
>I'm really intense, so... Get ready! \
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,100
if %earth=0 && %nanido=2 mov %genmogaku,100
if %earth=0 && %nanido=3 mov %genmogaku,100
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
sub %stack,1
return



*cupid_a7

add %stack,1
name $name
>Ahaha... Did you resign yourself to it?@
>My pussy is going to devour that dick of youuurs! \
>I'll rape you! @
>It'll feel good! @
>Then you'll come! \
name ""
name ""
skillname "Love Angel's Lust"
skillcount3 3671
dwave 1,"se\ero_pyu1.ogg"
>Cupid drops her waist, and takes Luka's penis deep inside her!
mov %damage_kotei,1
if %nanido<2 damage 250,300
if %nanido=2 damage 250,300
if %nanido=3 damage 250,300
mov %kousoku,1:gosub *status_print
>Luka is being raped by Cupid!\
skillname ""
if %mylife=0 sub %stack,1:return *cupid_h5
name $name
>Raaaape time! @
>I'm going to make you come hundreds of times! \
name ""
sub %stack,1
goto *cupid_a8



*cupid_a8

add %stack,1
>Luka is being raped by Cupid...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Ahaha... The Hero's dick feels sooo good! ":mov $sel2,"Cupid bounces quickly up and down!"
if %ransu=2 mov $sel1,"It feels so gooood! I can't stop myself! ":mov $sel2,"Cupid tightens her vagina, squeezing down on Luka's penis!"
if %ransu=3 mov $sel1,"Take this, and this! Come in my pussy! ":mov $sel2,"Cupid moves up and down and side to side, violently raping Luka!"
if %ransu=4 mov $sel1,"Come right in Cupid's special pussy! ":mov $sel2,"Cupid eagerly bounces on top of Luka as she squeezes him!"
if %ransu=5 mov $sel1,"So good... This dick is so good in my pussy! ":mov $sel2,"Cupid rotates her hips around, forcing Luka's penis to rub against every inch of her vaginal wall!"
name $name
eng $sel1:$sel6\
name ""
skillname "Love Angel's Lust"
skillcount3 3671
dwave 1,"se\ero_chupa3.ogg"
eng $sel2:$sel6
mov %damage_kotei,1
if %nanido<2 damage 250,300
if %nanido=2 damage 250,300
if %nanido=3 damage 250,300
skillname ""
if %mylife=0 sub %stack,1:return *cupid_h6
sub %stack,1
goto *cupid_a8



*cupid_onedari

mov $list1,"Eros' Handjob"
if %3383>0 mov %list_num1,1
mov $list2,"Cupid's Blowjob"
if %3660>0 mov %list_num2,1
mov $list3,"Amores' Tit Fuck"
if %3669>0 mov %list_num3,1
mov $list4,"Tit Fuck Temptation"
if %3670>0 mov %list_num4,1
mov $list5,"Love Angel's Lust"
if %3671>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *cupid_onedari1
if %cmd1=12 goto *cupid_onedari2
if %cmd1=13 goto *cupid_onedari3
if %cmd1=14 goto *cupid_onedari4
if %cmd1=15 goto *cupid_onedari5
if %cmd1=-1 goto *cupid_main
goto *cupid_onedari



*cupid_onedari1

gosub *onedari_syori
name $name
>You want me to use my hands to make your dick feel good?@
>You're a total pervert tooooo! \
name ""
gosub *cupid_a1
skip -1



*cupid_onedari2

gosub *onedari_syori
name $name
>You want me to use my mouth to make your dick feel good?@
>You're a total pervert tooooo! \
name ""
gosub *cupid_a2
skip -1



*cupid_onedari3

gosub *onedari_syori
name $name
>You want me to use my breasts to make your dick feel good?@
>You're a total pervert tooooo! \
name ""
gosub *cupid_a3
skip -1



*cupid_onedari4

gosub *onedari_syori
name $name
>You want me to use my breasts to send you to heaven itself?@
>You're a total pervert tooooo! \
name ""
gosub *cupid_a4
gosub *cupid_a5
skip -1



*cupid_onedari5

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want me to use my pussy to send you to heaven itself?@
>You're a total pervert tooooo! \
name ""
if %kousoku=0 gosub *cupid_a6
gosub *cupid_a7
skip -1



*cupid_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\cupid_bk03.bmp",0,0
gosub *syasei2
>Unable to take her violent stroking any longer, Luka comes, covering her hand in semen.\
mov %viclose,1:gosub *lose
mov %2650,%2650+1:if %2650=1 mov %count_koenemy,%count_koenemy+1
if %2650>%count_most mov %count_most,%2650:mov $count_mostname,$name
count 5,5
mov $bad1,"Cupid forced Luka to come with her handjob."
gosub *face2
name $name
>Ahaha, the semen came out like pew peeeew! @
>The sticky white stuff came out like pee! \
name ""
goto *cupid_h



*cupid_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\cupid_bk01.bmp",0,0
gosub *syasei2
>Unable to take her eager sucking any longer, Luka comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2650,%2650+1:if %2650=1 mov %count_koenemy,%count_koenemy+1
if %2650>%count_most mov %count_most,%2650:mov $count_mostname,$name
count 4,5
mov $bad1,"Cupid forced Luka to come with her blowjob."
gosub *face2
name $name
>Mmm... The semen came out like pew peeeew! @
>The sticky white stuff came out like pee! \
name ""
goto *cupid_h



*cupid_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\cupid_bk02.bmp",0,0
gosub *syasei2
>Unable to take the soft feeling of her breasts rubbing against him any longer, Luka comes, covering her chest in semen.\
mov %viclose,1:gosub *lose
mov %2650,%2650+1:if %2650=1 mov %count_koenemy,%count_koenemy+1
if %2650>%count_most mov %count_most,%2650:mov $count_mostname,$name
count 7,5
mov $bad1,"Cupid forced Luka to come with her tit fuck."
gosub *face2
name $name
>Ahaha, the semen came out like pew peeeew! @
>The sticky white stuff came out like pee! \
name ""
goto *cupid_h



*cupid_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\cupid_hb2.bmp",134,0
lsp 692,":a;chara\cupid_bk02.bmp",0,0
gosub *syasei2
>As Cupid stimulates Luka with her breasts, he comes, unable to take it any longer.@
>His white, sticky semen covers her chest.\
mov %viclose,1:gosub *lose2
name "Luka"
>Ahh...\
name ""
name $name
>Ahaha... My breasts are all covered in semen now!@
>A sinner who defiles an angel requires a milking punishment. \
>Now then, accept your punishment from my breasts! \
name ""
skillcount3 3670
skillname "Tit Fuck Temptation"
dwave 1,"se\ero_sigoki1.ogg"
>Cupid squeezes her breasts together, pressing her two soft mounds hard against Luka's penis!\
mov %damage_kotei,1
damage 240,280
dwave 1,"se\ero_sigoki1.ogg"
>Luka's penis sinks into her soft skin!\
mov %damage_kotei,1
damage 240,280
skillname ""
name "Luka"
>N...No... Ahh...!\
name ""
name $name
>Aha... An angel's breasts feel amazing, don't they?@
>I'll milk out all that semen of yours with my squishy breasts! \
name ""
skillcount3 3670
skillname "Tit Fuck Temptation"
dwave 1,"se\ero_sigoki1.ogg"
>Cupid squeezes harder, increasing the pressure on Luka's penis!\
mov %damage_kotei,1
damage 240,280
dwave 1,"se\ero_sigoki1.ogg"
>Luka's penis is pressed against her soft skin!\
mov %damage_kotei,1
damage 240,280
skillname ""
name "Luka"
>Stop... Or I'll come again...\
name ""
name $name
>Aha, going to spurt again?@
>Then to finish you off...! \
name ""
skillcount3 3670
skillname "Tit Fuck Temptation"
dwave 1,"se\ero_sigoki1.ogg"
>Cupid presses down harder on Luka's penis between her breasts!\
mov %damage_kotei,1
damage 240,280
dwave 1,"se\ero_sigoki1.ogg"
>The incredible sensations between her two soft mounds sends Luka over the edge!\
mov %damage_kotei,1
damage 240,280
skillname ""
name "Luka"
>S...Sto... Ahhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\cupid_hb3.bmp",134,0
gosub *syasei2
>With a moan, Luka comes, reaching another orgasm.@
>Some of the semen lands on Cupid's face.\
lsp 690,":a;chara\cupid_hb4.bmp",134,0:print 10,500
name $name
>Aha... So much milk!@
>You got some on my face... Such an inconsiderate penis you have! \
>Do you not have any regret at all for your actions?@
>In that case... You leave me no choice but to continue the milking punishment. \
name ""
name "Luka"
>Ah... Ahhh!\
name ""
skillcount3 3670
skillname "Tit Fuck Temptation"
dwave 1,"se\ero_sigoki1.ogg"
>Squeezing Luka's penis between her breasts, Cupid starts to bounce them up and down!\
mov %damage_kotei,1
damage 240,280
dwave 1,"se\ero_sigoki1.ogg"
>The intense vibration sends shivers down Luka's spine!\
mov %damage_kotei,1
damage 240,280
skillname ""
name "Luka"
>Stop... No more... It's impossible...@
>Hyaaa!\
name "Cupid"
>Ahaha... No more? Really? We'll just have to test and see! @
>I really love the milk squeezed out of a penis, after all. \
name ""
skillcount3 3670
skillname "Tit Fuck Temptation"
dwave 1,"se\ero_sigoki1.ogg"
>Cupid slowly moves her breasts up and down, gently massaging Luka's penis.\
mov %damage_kotei,1
damage 240,280
dwave 1,"se\ero_sigoki1.ogg"
>The rhythmic stimulation from her soft breasts forces another cry from Luka.\
mov %damage_kotei,1
damage 240,280
skillname ""
name "Luka"
>N...No... Or I'll come again...\
name ""
name $name
>Eh? You'll come again?@
>Ahaha, I thought you said that it was impossible?\
>That was a quick turnaround. Time to make you come again! @
>Spurt out more of that baby juice! \
name ""
skillcount3 3670
skillname "Tit Fuck Temptation"
dwave 1,"se\ero_sigoki1.ogg"
>Cupid raises and lowers her left and right breasts in alternate motions!\
mov %damage_kotei,1
damage 240,280
dwave 1,"se\ero_sigoki1.ogg"
>Luka twitches and moans in pleasure as he's at the mercy of Cupid's tit fuck!\
mov %damage_kotei,1
damage 240,280
skillname ""
name "Luka"
>Ahhh...!\
name ""
gosub *syasei1
lsp 690,":a;chara\cupid_hb5.bmp",134,0
gosub *syasei2
>With another moan, Luka comes, dirtying her chest and face with even more semen.\
lsp 690,":a;chara\cupid_hb6.bmp",134,0:print 10,500
name $name
>Ahaha, it's like a fountain! @
>Hey, hey... Did it feel good?\
name ""
gosub *clear_sprite
gosub *setwindow_01p
>After coming three times, Cupid's chest and face were both covered in semen.@
>But even covered in semen, Cupid just lets out a dirty laugh.\
mov %battle,0
mov %hsean,1
mov %2650,%2650+1:if %2650=1 mov %count_koenemy,%count_koenemy+1
if %2650>%count_most mov %count_most,%2650:mov $count_mostname,$name
count 7,5
mov $bad1,"Luka was forced to come by Cupid's tit fuck."
goto *cupid_h



*cupid_h5

mov %ikigoe,3:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\cupid_ha2.bmp",0,0
gosub *syasei2
>The moment Luka is forced into Cupid, he comes, unable to take even the slightest of stimulation.\
mov %viclose,1:gosub *lose
mov %2650,%2650+1:if %2650=1 mov %count_koenemy,%count_koenemy+1
if %2650>%count_most mov %count_most,%2650:mov $count_mostname,$name
count 5,5
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come the moment of insertion."
gosub *face2
name $name
>Ehh? Alreeeaaady!?@
>Ahaha... Cupid's pussy is absolutely amaaaazing! \
name ""
>Cupid doesn't even make a motion to take me out of her.@
>Just the feeling of being inside her is like heaven itself...\
goto *cupid_h



*cupid_h6

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\cupid_ha2.bmp",0,0
gosub *syasei2
>Unable to take it any longer, Luka comes inside the Cupid.@
>Tasting unbearable pleasure, Luka gasps as he spurts inside her.\
mov %viclose,1:gosub *lose
mov %2650,%2650+1:if %2650=1 mov %count_koenemy,%count_koenemy+1
if %2650>%count_most mov %count_most,%2650:mov $count_mostname,$name
count 5,5
mov $bad1,"Luka came inside Cupid as she lusted after him."
gosub *face2
name $name
>Ahaha... The semen came out like pew peeeew in my pussy! @
>Cupid's pussy felt amazing, didn't iiiiit? \
>But there's a lot more rape to coooome! \
name ""
>Cupid doesn't even make a motion to take me out of her.@
>Just the feeling of being inside her is like heaven itself...\
goto *cupid_h



*cupid_h

mov $bad2,"Endlessly raped, Luka's life continues as a plaything."
if %2650=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 goto *cupid_hb
name "Luka"
>Ahh...\
name ""
name $name
>Ehehe... Is that it already for your resistance?@
>Then it's time for some real fun, right?\
>I'll make you into a nice toy! \
name ""
cspl 690,699
lsp 700,":a;chara\cupid_ha1.bmp",0,0:print 10,500
>Cupid easily pushes me down, and mounts me with her small body.@
>Her small butt presses against my groin as she stares at me.\
name $name
>I'll rape you for a nice long time.@
>I'll devour your penis with my pussy! \
name ""
name "Luka"
>S...Stop!\
name ""
>I struggle and push at Cupid, but no strength is in my movements.@
>I'm left helpless, pushed down by Cupid onto the floor.\
name $name
>An angel's pussy is literally a piece of heaven, you knooow?@
>Ehehe... I'll let you enjoy plenty of it. \
name ""
>As she speaks, she drops her waist down.@
>The very tip of my penis barely pierces her vagina.\
name "Luka"
>Ahhh!\
name ""
>Just with that, my body starts to tremble in pleasure.@
>More than just feeling good and warm, it was as if a brand new world of pleasure was opening to me...\
>As the pleasure radiates through my body, I feel goose bumps rising up all over.\
name $name
>Ehe... My pussy is nice and warm, isn't it?@
>Here, I'll take it all the way inside noooow! \
name ""
name "Luka"
>Ah... Ahhhh!!\
name ""
dwave 1,"se\ero_pyu1.ogg"
>With a single movement, she drops down, forcing me all the way into her.@
>Unbearable pleasure races through me, sending my consciousness itself to nothing but a white cloud of bliss.\
goto *cupid_hb



*cupid_hb

>I feel small folds inside of her, rubbing against my penis with the slightest of movements.@
>Overcome by the pleasure, it makes me feel as if I could just lay back and do nothing but focus on the sensations.\
name $name
>Ahaha... It feels soooo good! @
>You feel great too, right?\
name ""
name "Luka"
>Haa... Ahh...\
name ""
name $name
>Ehhh? You can't even answer properly?@
>Ahaha, that's soooo pathetic! \
name ""
mov %hseanwave,7:hseanwave
>Giggling to herself, Cupid starts to move her waist.@
>Her almost violent movements make me gasp in pure bliss.\
name $name
>Take that, and that!@
>Ahaha, it feels amaaaazing! \
name ""
name "Luka"
>Ahhh!!\
name ""
>I'm forced in and out of her soft hole as she bounces up and down.@
>My penis pierces her narrow entrance, spreading apart her lips with each bounce, before being pulled out of her again.\
>Her folds rub and press against me each way, and in moments my penis is glistening with her wetness.\
name $name
>Look, your penis is getting swallowed over and over! @
>Ahahah! More, moooore! \
name ""
name "Luka"
>Hyaaa!@
>Stop it! Don't move any more!\
name ""
>Enraptured in ecstasy, I can only focus on the sweet sensation from her angelic vagina.@
>Her violent movements send sparks of bliss through me, leaving me gasping in agonized pleasure.\
>Despite trying to reject the stimulation, my body itself embraces it, causing my penis to swell and twitch.@
>A sweet, dull ache rises up through my waist to the rest of my body.\
name "Luka"
>Haa... I'm going to come...\
name ""
name $name
>Ehehe... Already leaking out I see. @
>You couldn't hold out against an angel's pussy, eh? \
>I just love men the moment they orgasm.\
>Their penis swells and shakes...@
>That warm semen explodes inside my pussy, and spreads out all over...\
>You're about to orgasm... @
>You're going to explode right into me! \
name ""
>Almost as if delirious, her movements suddenly increase.@
>Forcing me in and out of her, Cupid eagerly pushes me closer to my orgasm.\
>Overwhelmed by her greedy lust, I'm pushed over my limit with a scream.\
name "Luka"
>Haa... I can't take it any more...@
>I'm coming! Ahhh!\
name ""
name $name
>Good, let it out!@
>Hurry, come! \
name ""
>She presses down, taking me all the way inside.@
>Shaking her hips quickly side to side, Cupid delivers the finishing blow.\
name "Luka"
>Ahhh....\
name ""
gosub *syasei1
lsp 700,":a;chara\cupid_ha2.bmp",0,0:print 10,500
gosub *syasei2
>An incredible feeling of release and freedom washes over me as I reach orgasm.@
>I lay back in ecstasy, still inside her angelic vagina.\
>It feels as if my soul itself was given to her.\
name "Luka"
>Ah... Haa...\
name ""
name $name
>Aha... So you already leaked out. @
>There aren't too many people that finish that quick, you know...?\
>I'm still not satisfied yet, after all!@
>Come on, it's time for some more rape! \
name ""
name "Luka"
>Ah... Ahhhh!!\
name ""
>As her intense movements suddenly continue, I let out a scream.@
>Still sensitive after my orgasm, the blinding stimulation is almost too much to take.\
>Her sweet, wet vaginal walls rub hard against my extra sensitive penis.@
>After only moments, it already feels like I could melt away again inside of her.\
name "Luka"
>Aiie!@
>Ahhhh!!\
name ""
>I writhe under her in the tortuous ecstasy.\
name $name
>Yes, yes... That reaction is just what I wanted!@
>Because when your penis twitches like that, it feels so good in my pussy! \
name ""
name "Luka"
>S...Stop it...!@
>Ahhh!\
name ""
>I feebly press and push against Cupid's body, but I can't move her even an inch.@
>I tremble and twitch under her, stuck in this hell of pleasure.\
>But that trembling movement only served to provide Cupid with more pleasure.\
name $name
>Ahaha... Raping humans is the best because of this! @
>Come on, struggle some more! \
name ""
>Hungry for her own pleasure, Cupid aggressively forces me in and out of her.@
>I feel my penis pulsing from the intense stimulation, giving her just the reaction she wants out of me.\
>My attempts to resist and endure only serve to pleasure her, making her movements get even more violent and fevered.\
name $name
>Come on, move more!@
>Stir me up with that dick of yours! \
name ""
name "Luka"
>Hyaa!@
>Stop moving! I'm going to come...!\
name ""
name $name
>Ahaha... Coming again?@
>You're feeling really good too! \
name ""
name "Luka"
>No... Ah... Ahhhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\cupid_ha3.bmp",0,0
gosub *syasei2
>My penis pulses as I orgasm, sending spurt after spurt of semen into her waiting vagina.@
>But this time, I didn't even get a chance to enjoy the pleasure of my climax.\
>Because even as I come inside her, she doesn't stop moving at all.@
>Rather, she starts to get even more intense.\
mov %hseanwave,4:hseanwave
name $name
>Ahaha, so much is spurting in! @
>Your dick is pulsing and spitting out in me! \
>I love this feeling... @
>Come on, give me mooore! \
name ""
name "Luka"
>Hyaaa!@
>Ah... Ah... Ahhh!\
name ""
>I can't do anything but scream and gasp as my sensitive penis is forced in and out of her, even while coming.\
>Quickly after my last orgasm, I already feel a new feeling of release filling my head.\
gosub *syasei1
lsp 700,":a;chara\cupid_ha4.bmp",0,0:print 10,500
gosub *syasei2
>Coming again, I spit out more inside of her accepting vagina.@
>The nonstop stimulation only seems to serve to reduce the time between my climaxes.\
>It's as if the biological function itself of ejaculation was broken by the heavenly pleasure, transcending human reason.\
>Even now, I'm still spitting out semen into her warm vagina.\
name $name
>Ahaha... The human's tap seems to have broken!@
>But it feels so good when you come inside me...\
>Here, I'll break your penis even more! @
>I'll move even more too, so it feels better for me!\
name ""
name "Luka"
>Hyaaa!!\
name ""
>I feel my sexual functions breaking down due to her unending lust.@
>Not even coming during orgasms anymore, I feel semen coming out in random spurts.\
>Only thinking of her own lust, Cupid continues to violently rape me.@
>She thinks of me as nothing but a living vibrator of meat.\
>As the receiver of her intense rape, it's all too clear...\
name $name
>Take that, and that! \
name ""
name "Luka"
>Aiie!@>Ahhhgg!\
name ""
gosub *syasei1
lsp 700,":a;chara\cupid_ha6.bmp",0,0
gosub *syasei2
>My vision flashes white, as my entire body spasms in uncontrollable ecstasy.@
>But Cupid's violent rape doesn't show any sign of stopping.\
name $name
>More, more, moooore... @
>Your dick feels so gooood! \
>Come on, explode more in me! @
>I want more of that warm semen in me! \
name ""
name "Luka"
>Hya! No more, please!@
>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>No matter how much I ejaculate, she just gets even more violent.@
>I'm left helpless as the recipient to her unending lust.\
name $name
>I still want more...@
>Give me more, make me feel even better! \
name ""
name "Luka"
>Stop... I'll die!@
>Hyaaa!\
name ""
gosub *syasei1:gosub *syasei2
name $name
>More... Give me more!@
>Come on, you're not dead yet!@
>Give it to me! \
name ""
name "Luka"
>Ahh... Ah... Ahhh...\
name ""
gosub *syasei1
lsp 700,":a;chara\cupid_ha7.bmp",0,0
gosub *syasei2
>A crazy, completely lust-filled look crosses Cupid's face as even milk starts to leak from her breasts.@
>But I'm sure my face looks even worse than hers at this point.\
name "Luka"
>Ah... Ahh...\
name ""
>Still being violently ridden by the sex-crazed angel, I feel myself about to faint.@
>Even as I do, I continue spurting semen into her hot vagina.\
>My vision goes dark as my body continues to react against my will, giving her just what she wants.\
mov %hseanwave,0:hseanwave
gosub *anten
>Thus, I became Cupid's sex toy.@
>A toy that satisfies her sexual desire by fulfilling my own.\
>In front of an existence beyond human understanding like an angel, human dignity was the same as dust.@
>So I was simply an eternal plaything...\
>......\
goto *badend



*valkyrie_start

mov $name,"Valkyrie"
mov $name2,"Valkyrie"
mov $lavel,"valkyrie"
mov $tatie1,"valkyrie_st01"
mov $tatie2,"valkyrie_st12"
mov $tatie3,"valkyrie_st13"
mov $tatie4,"valkyrie_st12"
mov $haikei,"bg047"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,18000
if %nanido=2 mov %max_enemylife,25000
if %nanido=3 mov %max_enemylife,32000
if %nanido=0 mov %max_enemylife,3
if %nanido=1 mov %henkahp1,15000
if %nanido=2 mov %henkahp1,20000
if %nanido=3 mov %henkahp1,25000
if %nanido=0 mov %henkahp1,2
if %nanido=1 mov %henkahp2,10000
if %nanido=2 mov %henkahp2,15000
if %nanido=3 mov %henkahp2,20000
if %nanido=0 mov %henkahp2,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,0
mov %music,9
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't escape from Valkyrie's chokehold technique!"
mov $mogaku_anno2,"Luka escaped from Valkyrie!"
mov $mogaku_anno3,"But still bound by Valkyrie's chokehold technique, Luka can't move!"
mov $mogaku_sel1,"No matter how you struggle, you can't escape from my hold."
mov $mogaku_sel2,"You should just give up now."
mov $mogaku_sel3,"Rampage all you like, I won't let go."
mov $mogaku_sel4,"You think that's enough to make me release you?"
mov $mogaku_sel5,"You can still struggle... Is the pain not enough?"
mov $mogaku_dassyutu1,"Escaping from my bind...?"
mov $mogaku_dassyutu2,""
mov $mogaku_earth_dassyutu1,"Insane power... You are dangerous."
mov $mogaku_earth_dassyutu2,""
mov $half_s1,"How are my sexual techniques?"
mov $half_s2,"I can finish you off right now..."
mov $kiki_s1,"You seem to be in a corner."
mov $kiki_s2,"Just give up, and be released by my sexual skills..."
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-360
mov %tukix,300
mov %owaza_count1a,4
name $name
>Defeating Cupid with pure force...@
>As a Fencer, I am in the highest class in the heavens.\
>But if you're that powerful, then meeting force with force won't work...\
name ""
dwave 1,"se\escape.ogg"
mov $tatie1,"valkyrie_st11"
lsp 700,":a;chara\valkyrie_st11.bmp",0,0:print 10,500
>Valkyrie sheathes her sword, and stands in front of me barehanded.@
>But it doesn't look like she has any intention of giving up...\
name $name
>I shall use sexual techniques.@
>I doubt a swordsman of your caliber has had much experience with those.\
name ""
mov %sinkou,1
goto *common_main



*valkyrie001

mov $tatie1,"valkyrie_st21"
mov $tatie2,"valkyrie_st22"
mov $tatie3,"valkyrie_st23"
mov $tatie4,"valkyrie_st22"
dwave 1,"se\break.ogg"
gosub *face3
>My blow knocks off Valkyrie's helmet!\
name $name
>You are quite good...@
>I need to get serious.\
name ""
gosub *face1
mov %sinkou,2
goto *valkyrie_a



*valkyrie002

name $name
>As expected of the Hero that Ilias called dangerous...@
>This time I'll use everything I've got to play with you.\
name ""
mov $tatie1,"valkyrie_st31"
mov $tatie2,"valkyrie_st32"
mov $tatie3,"valkyrie_st33"
mov $tatie4,"valkyrie_ha1"
mov $mogaku_sel1,"There's no use struggling... You can't escape from my feathers."
mov $mogaku_sel2,"You'll enjoy it if you just give yourself over to the pleasure..."
mov $mogaku_sel3,"No matter how you rampage around, I won't let you go..."
mov $mogaku_sel4,"Do you think I would release you with just that much?"
mov $mogaku_sel5,"You still have the energy to struggle... Is the pleasure not enough?"
mov $mogaku_dassyutu1,"To think you could escape from my feathers..."
mov $mogaku_dassyutu2,""
dwave 1,"se\escape.ogg"
gosub *face1
>Valkyrie strips off her armor, exposing her naked body!\
mov %sinkou,3
goto *valkyrie_a



*valkyrie_v

gosub *face3
name $name
>No, this cannot be...@
>I, the Angel of War, being defeated by a human...?\
name ""
dwave 1,"se\bun.ogg"
csp 700:print 99,1000,"system\breakup.dll/lrB"
>Valkyrie fades away into particles, then vanishes!\
mov %viclose,1:gosub *victory
mov %getexp,80000:gosub *lvup
mov %2351,1
goto *sean0305



*valkyrie_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Even if you submit, you won't be forgiven.@
>Heaven's vengeance must be given to criminals.\
name ""
goto *valkyrie_a



*valkyrie_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *valkyrie_kousan
if %cmd1=16 goto *valkyrie_onedari
if %cmd1=17 goto *common_skill
goto *valkyrie_main


*valkyrie_a

if %enemylife<%henkahp1 && %sinkou=1 goto *valkyrie001
if %enemylife<%henkahp2 && %sinkou=2 goto *valkyrie002
rnd2 %ransu,1,2
if %kousoku=1 && %sinkou<3 gosub *valkyrie_a6:goto *common_main
if %kousoku=1 && %ransu=1 && %sinkou=3 gosub *valkyrie_a8:goto *common_main
if %kousoku=1 && %ransu=2 && %sinkou=3 gosub *valkyrie_a9:goto *common_main
rnd2 %ransu,1,5
if %ransu=1 gosub *valkyrie_a1:goto *common_main
if %ransu=2 gosub *valkyrie_a2:goto *common_main
if %ransu=3 && %sinkou>1 gosub *valkyrie_a3:goto *common_main
if %ransu=4 && %sinkou=3 gosub *valkyrie_a4:goto *common_main
if %ransu=5 && %sinkou<3 && %owaza_count1a>5 gosub *valkyrie_a5:goto *common_main
if %ransu=5 && %sinkou=3 && %owaza_count1a>5 gosub *valkyrie_a7:goto *common_main
skip -7



*valkyrie_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"By this hand, I shall squeeze out your semen..."
if %ransu=2 mov $sel1,"Pollute my palm with your semen..."
if %ransu=3 mov $sel1,"I shall finish you off with this hand..."
name $name
eng $sel1:$sel6\
name ""
skillname "War Angel's Handjob"
dwave 1,"se\ero_koki1.ogg"
>Valkyrie's soft palm gently grips Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua=3 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %wind=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
>She violently pumps him up and down!
skillcount3 3672
if %nanido<2 damage 250,280
if %nanido=2 damage 350,380
if %nanido=3 damage 450,480
skillname ""
if %mylife=0 sub %stack,1:return *valkyrie_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*valkyrie_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Please feel my feathers..."
if %ransu=2 mov $sel1,"Be honored, for you get to feel the feathers of an angel."
if %ransu=3 mov $sel1,"Pollute these pure white feathers with your dirty semen..."
name $name
eng $sel1:$sel6\
name ""
skillname "War Angel's Heavenly Wings"
dwave 1,"se\umaru.ogg"
>Valkyrie's pure white feathers caress Luka's body!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua=3 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %wind=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
>They especially focus on tickling Luka's groin area!
skillcount3 3673
if %nanido<2 damage 260,290
if %nanido=2 damage 360,390
if %nanido=3 damage 460,490
skillname ""
if %mylife=0 sub %stack,1:return *valkyrie_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*valkyrie_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"With this mouth, I shall give you pleasure..."
if %ransu=2 mov $sel1,"With this mouth, I shall suck out your semen..."
if %ransu=3 mov $sel1,"Please ejaculate... I shall swallow it all."
name $name
eng $sel1:$sel6\
name ""
skillname "War Angel's Blowjob"
dwave 1,"se\ero_buchu2.ogg"
eng "Valkyrie puts her mouth around Luka's penis!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua=3 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %wind=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
>Able to move back and forth, she pumps his penis like a piston!
skillcount3 3674
if %nanido<2 damage 270,300
if %nanido=2 damage 370,400
if %nanido=3 damage 470,500
skillname ""
if %mylife=0 sub %stack,1:return *valkyrie_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*valkyrie_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"With these breasts, I shall squeeze out your semen..."
if %ransu=2 mov $sel1,"Be finished between these breasts of mine."
if %ransu=3 mov $sel1,"Spray your dirty fluid all over these breasts..."
name $name
eng $sel1:$sel6\
name ""
skillname "War Angel's Breast Comfort"
dwave 1,"se\ero_sigoki1.ogg"
>Valkyrie sandwiches Luka's penis between her breasts, and slowly increases the pressure!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua=3 && %ransu<80 gosub *aqua_guard:sub %stack,1:return
if %wind=3 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3675
if %nanido<2 damage 200,220
if %nanido=2 damage 230,250
if %nanido=3 damage 260,280
dwave 1,"se\ero_sigoki1.ogg"
>She strengthens the pressure, almost crushing Luka's penis!
if %nanido<2 damage 200,220
if %nanido=2 damage 230,250
if %nanido=3 damage 260,280
dwave 1,"se\ero_sigoki1.ogg"
>Still pressing, she starts to move her breasts up and down, stroking Luka's penis with her breasts!
if %nanido<2 damage 200,220
if %nanido=2 damage 230,250
if %nanido=3 damage 260,280
skillname ""
if %mylife=0 sub %stack,1:return *valkyrie_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*valkyrie_a5

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 7
name $name
if %first_sel1=1 skip 3
>I shall embrace you... But my embrace is painful.\
skip 2
>I shall embrace you again... You remember the pain, do you not?\
name ""
skillname "War Angel's Embrace"
dwave 1,"se\ero_simetuke1.ogg"
>Valkyrie tightly squeezes Luka's body, pressing him against her armor!
rnd2 %ransu,0,99:if %aqua=3 && %ransu<25 gosub *aqua_guard:sub %stack,1:return
if %wind=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3676
if %nanido<2 damage 250,270
if %nanido=2 damage 350,370
if %nanido=3 damage 450,470
mov %kousoku,1:gosub *status_print
>Luka's being squeezed against Valkyrie's armored body!\
skillname ""
if %mylife=0 sub %stack,1:return *valkyrie_h5
if %kousan=2 sub %stack,1:return
name "Luka"
>Urhg...!\
name ""
name $name
>Do not underestimate my own physical strength.@
>I can crush a small body like yours in no time...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,2
if %earth=0 && %nanido=2 mov %genmogaku,2
if %earth=0 && %nanido=3 mov %genmogaku,3
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,1
sub %stack,1
return



*valkyrie_a6

add %stack,1
>Luka is being crushed by Valkyrie's embrace...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Well? Is it painful?"
if %ransu=2 mov $sel1,"You better surrender soon."
if %ransu=3 mov $sel1,"I'll tighten some more... It's painful, isn't it?"
name $name
eng $sel1:$sel6\
name ""
skillname "War Angel's Embrace"
dwave 1,"se\ero_simetuke1.ogg"
>Luka's pressed hard against Valkyrie's armored body!
skillcount3 3676
if %nanido<2 damage 250,270
if %nanido=2 damage 350,370
if %nanido=3 damage 450,470
skillname ""
if %mylife=0 sub %stack,1:return *valkyrie_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*valkyrie_a7

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 8
name $name
>I'll catch your penis between my thighs...@
if %first_sel1=1 skip 3
>Then I'll tighten until you ejaculate!\
skip 2
>This time, I'll tighten until you ejaculate!\
name ""
skillname "War Angel's Intercrural"
eng "Valkyrie's wings wrap around Luka's body!":$sel6/
rnd2 %ransu,0,99:if %aqua=3 && %ransu<25 gosub *aqua_guard:sub %stack,1:return
if %wind=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
dwave 1,"se\ero_paizuri.ogg"
>Using the opening, Valkyrie catches Luka's penis between her tight thighs!
skillcount3 3677
if %nanido<2 damage 300,320
if %nanido=2 damage 400,420
if %nanido=3 damage 500,520
mov %kousoku,1:gosub *status_print
>Luka is bound by Angel's wings!\
skillname ""
if %mylife=0 sub %stack,1:return *valkyrie_h6
if %kousan=2 sub %stack,1:return
name "Luka"
>Ahh...!\
name ""
name $name
>I won't let you go again.@
>I'll tighten until you're finished...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,2
if %earth=0 && %nanido=2 mov %genmogaku,2
if %earth=0 && %nanido=3 mov %genmogaku,3
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,1
sub %stack,1
return



*valkyrie_a8

add %stack,1
>Luka's penis is sandwiched between Valkyrie's thighs...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll squeeze it just like this..."
if %ransu=2 mov $sel1,"Can you withstand this?"
if %ransu=3 mov $sel1,"Be finished between my thighs..."
name $name
eng $sel1:$sel6\
name ""
skillname "War Angel's Intercrural"
dwave 1,"se\ero_paizuri.ogg"
>Valkyrie's bare thighs rub against Luka's penis, making him writhe in agony!
skillcount3 3677
if %nanido<2 damage 300,320
if %nanido=2 damage 400,420
if %nanido=3 damage 500,520
skillname ""
if %mylife=0 sub %stack,1:return *valkyrie_h6
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*valkyrie_a9

add %stack,1
if %kousan=2 skip 5
name $name
>I'll end it with this...@
>Take you inside, and wring your semen dry in an instant.\
name ""
skillname "War Angel's Vagina"
dwave 1,"se\ero_pyu1.ogg"
mov $tatie4,"valkyrie_ha6"
lsp 700,":a;chara\valkyrie_ha6.bmp",0,0:print 10,500
>Valkyrie quickly switches positions, forcing Luka's penis to sink into her vagina before he can react!
skillcount3 3678
mov %damage_kotei,1
damage 320,340
mov %kousoku,2:gosub *status_print
>Luka is being raped by Valkyrie!\
skillname ""
if %mylife=0 sub %stack,1:return *valkyrie_h7
name "Luka"
>Ah...Ahhhh!\
name ""
>Her warm pussy instantly clamps down on me, trapping me in her.@
>I gasp in surprise at the pleasure, losing control of my body.\
name $name
>I'll finish you, just like this.@
>Let it scatter out inside me...\
name ""
sub %stack,1
goto *valkyrie_a10



*valkyrie_a10

add %stack,1
>Luka is being raped by Valkyrie...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll squeeze it all with my pussy...":mov $sel2,"Valkyrie tightens her muscles, squeezing Luka's penis inside her!"
if %ransu=2 mov $sel1,"I'll finish you off in one squeeze!":mov $sel2,"Valkyrie pushes down hard on Luka, forcing him all the way inside her!"
if %ransu=3 mov $sel1,"Spray your white juice of surrender inside me...":mov $sel2,"Valkyrie swings her waist back and forth, rubbing her soft walls against Luka's penis!"
if %ransu=4 mov $sel1,"Can you take this movement?":mov $sel2,"Valkyrie starts grinding her waist against Luka!"
if %ransu=5 mov $sel1,"I'll change how it feels inside...":mov $sel2,"Valkyrie contracts her vagina, squeezing down on Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "War Angel's Vagina"
dwave 1,"se\ero_chupa4.ogg"
eng $sel2:$sel6
skillcount3 3678
mov %damage_kotei,1
damage 320,340
skillname ""
if %mylife=0 sub %stack,1:return *valkyrie_h8
sub %stack,1
goto *valkyrie_a10



*valkyrie_onedari

mov $list1,"War Angel's Handjob"
if %3672>0 mov %list_num1,1
mov $list2,"War Angel's Heavenly Wings"
if %3673>0 mov %list_num2,1
mov $list3,"War Angel's Blowjob"
if %3674>0 mov %list_num3,1
mov $list4,"War Angel's Breast Comfort"
if %3675>0 mov %list_num4,1
mov $list5,"War Angel's Embrace"
if %3676>0 mov %list_num5,1
mov $list6,"War Angel's Intercrural"
if %3677>0 mov %list_num6,1
mov $list7,"War Angel's Vagina"
if %3678>0 mov %list_num7,1
gosub *cmd_onedari
if %cmd1=11 goto *valkyrie_onedari1
if %cmd1=12 goto *valkyrie_onedari2
if %cmd1=13 goto *valkyrie_onedari3
if %cmd1=14 goto *valkyrie_onedari4
if %cmd1=15 goto *valkyrie_onedari5
if %cmd1=16 goto *valkyrie_onedari6
if %cmd1=17 goto *valkyrie_onedari7
if %cmd1=-1 goto *valkyrie_main
goto *valkyrie_onedari



*valkyrie_onedari1

gosub *onedari_syori
name $name
>You want to come in my hands?@
>Then go ahead and pollute my pure body...\
name ""
gosub *valkyrie_a1
skip -1



*valkyrie_onedari2

gosub *onedari_syori
name $name
>You want to come on my wings?@
>Then go ahead and pollute my pure body...\
name ""
gosub *valkyrie_a2
skip -1



*valkyrie_onedari3

gosub *onedari_syori
name $name
>You want to come in my mouth?@
>Then go ahead and pollute my pure body...\
name ""
if %sinkou>1 skip 5
mov $tatie2,"valkyrie_st22"
dwave 1,"se\escape.ogg"
gosub *face2
>Valkyrie takes off her helmet!\
gosub *valkyrie_a3
skip -1



*valkyrie_onedari4

gosub *onedari_syori
name $name
>You want to come between my breasts?@
>Then go ahead and pollute my pure body...\
name ""
if %sinkou=3 skip 5
mov $tatie2,"valkyrie_st32"
dwave 1,"se\escape.ogg"
gosub *face2
>Valkyrie strips off her armor, exposing her nude body!\
gosub *valkyrie_a4
skip -1



*valkyrie_onedari5

gosub *onedari_syori
name $name
>You want me to hug you tightly, and feel my embrace?@
>If you desire it...\
name ""
if %sinkou=1 skip 8
mov $tatie1,"valkyrie_st01"
mov $tatie2,"valkyrie_st12"
mov $tatie3,"valkyrie_st13"
mov $tatie4,"valkyrie_st12"
dwave 1,"se\escape.ogg"
gosub *face2
>Valkyrie puts back on her armor!\
if %kousoku=0 gosub *valkyrie_a5
gosub *valkyrie_a6
skip -1



*valkyrie_onedari6

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want to come while being squeezed between my thighs...?@
>Then go ahead and pollute my pure body...\
name ""
if %sinkou=3 skip 6
mov $tatie2,"valkyrie_st32"
mov $tatie4,"valkyrie_ha1"
dwave 1,"se\escape.ogg"
gosub *face2
>Valkyrie strips off her armor, exposing her nude body!\
if %kousoku=0 gosub *valkyrie_a7
gosub *valkyrie_a8
skip -1



*valkyrie_onedari7

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want to be raped by me?@
>How miserable... Desiring your own punishment.\
name ""
if %sinkou=3 skip 6
mov $tatie2,"valkyrie_st32"
mov $tatie4,"valkyrie_ha1"
dwave 1,"se\escape.ogg"
gosub *face2
>Valkyrie strips off her armor, exposing her nude body!\
if %kousoku=0 gosub *valkyrie_a7
gosub *valkyrie_a9
skip -1



*valkyrie_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
if %sinkou<3 lsp 693,":a;chara\valkyrie_bk03.bmp",0,0
if %sinkou=3 lsp 693,":a;chara\valkyrie_bk33.bmp",0,0
gosub *syasei2
>Unable to take it any longer, Luka comes, covering Valkyrie's pure white hand with his semen.\
mov %viclose,1:gosub *lose
mov %2651,%2651+1:if %2651=1 mov %count_koenemy,%count_koenemy+1
if %2651>%count_most mov %count_most,%2651:mov $count_mostname,$name
count 1,16
mov $bad1,"Valkyrie forced Luka to come with her handjob."
gosub *face2
name $name
>Polluting an angel's hands with semen...@
>Such a sinful human.\
name ""
goto *valkyrie_h



*valkyrie_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\valkyrie_bk35.bmp",0,0
gosub *syasei2
>Unable to take it any longer, Luka comes, covering Valkyrie's pure white wings with his semen.\
mov %viclose,1:gosub *lose
mov %2651,%2651+1:if %2651=1 mov %count_koenemy,%count_koenemy+1
if %2651>%count_most mov %count_most,%2651:mov $count_mostname,$name
count 13,16
mov $bad1,"Valkyrie forced Luka to come with her wings."
gosub *face2
name $name
>Polluting an angel's wings with semen...@
>Such a sinful human.\
name ""
goto *valkyrie_h



*valkyrie_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\valkyrie_bk11.bmp",0,0
gosub *syasei2
>Unable to take it any longer, Luka comes, filling Valkyrie's accepting mouth with semen.\
mov %viclose,1:gosub *lose
mov %2651,%2651+1:if %2651=1 mov %count_koenemy,%count_koenemy+1
if %2651>%count_most mov %count_most,%2651:mov $count_mostname,$name
count 4,16
mov $bad1,"Valkyrie's blowjob forced Luka to come."
gosub *face2
name $name
>Nnn... Polluting an angel's mouth with semen...@
>Such a sinful human.\
name ""
goto *valkyrie_h



*valkyrie_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\valkyrie_bk32.bmp",0,0
gosub *syasei2
>Sandwiched between Valkyrie's soft breasts, Luka comes, covering her pure white chest with semen.\
mov %viclose,1:gosub *lose
mov %2651,%2651+1:if %2651=1 mov %count_koenemy,%count_koenemy+1
if %2651>%count_most mov %count_most,%2651:mov $count_mostname,$name
count 7,16
mov $bad1,"Valkyrie forced Luka to come, sandwiched between her breasts."
gosub *face2
name $name
>Polluting an angel's chest with semen...@
>Such a sinful human.\
name ""
goto *valkyrie_h



*valkyrie_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\valkyrie_bk02.bmp",0,0
gosub *syasei2
>While being tightly crushed by Valkyrie's embrace, Luka comes, the pain leading him to orgasm.\
mov %viclose,1:gosub *lose
mov %2651,%2651+1:if %2651=1 mov %count_koenemy,%count_koenemy+1
if %2651>%count_most mov %count_most,%2651:mov $count_mostname,$name
count 32,16
mov $bad1,"Valkyrie forced Luka to come as she crushed him in her embrace."
gosub *face2
name $name
>Pleasure from pain...?@
>That sort of sexual deviancy certainly warrants punishment.\
name ""
goto *valkyrie_h



*valkyrie_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\valkyrie_ha2.bmp",0,0
gosub *syasei2
>Sandwiched between Valkyrie's soft thighs, Luka comes, covering her pure white legs with semen.\
mov %viclose,1:gosub *lose
mov %2651,%2651+1:if %2651=1 mov %count_koenemy,%count_koenemy+1
if %2651>%count_most mov %count_most,%2651:mov $count_mostname,$name
count 3,16
mov $bad1,"Valkyrie forced Luka to come using her thighs."
gosub *face2
lsp 700,":a;chara\valkyrie_ha3.bmp",0,0:print 10,500
name $name
>Polluting an angel's thighs with semen...@
>Such a sinful human.\
name ""
goto *valkyrie_h



*valkyrie_h7

mov %ikigoe,3:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\valkyrie_ha7.bmp",0,0
gosub *syasei2
>As soon as Luka is forced into Valkyrie's vagina, he comes, quickly filling her accepting vagina with semen.\
mov %viclose,1:gosub *lose
mov %2651,%2651+1:if %2651=1 mov %count_koenemy,%count_koenemy+1
if %2651>%count_most mov %count_most,%2651:mov $count_mostname,$name
mov %count_bouhatu,%count_bouhatu+1
count 1,16
mov $bad1,"Valkyrie forced Luka to come as soon as she forced him into her."
gosub *face2
name $name
>How embarrassing... Coming as soon as it's on.@
>Aren't you ashamed of yourself, as a man?\
name ""
goto *valkyrie_h



*valkyrie_h8

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\valkyrie_ha7.bmp",0,0
gosub *syasei2
>While being raped by Valkyrie, Luka comes, filling her vagina with semen.\
mov %viclose,1:gosub *lose
mov %2651,%2651+1:if %2651=1 mov %count_koenemy,%count_koenemy+1
if %2651>%count_most mov %count_most,%2651:mov $count_mostname,$name

count 1,16
mov $bad1,"Valkyrie forced Luka to orgasm as she raped him."
gosub *face2
name $name
>You filled me with so much...@
>How absolutely repulsive.\
name ""
goto *valkyrie_h



*valkyrie_h

mov $bad2,"Luka continues to be raped by Valkyrie for the next 20,000 years..."
if %2651=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>1 mov %hseanwave,2:hseanwave:goto *valkyrie_hb
name "Luka"
>Ahhh...\
name ""
>Drained of strength, I feel myself collapsing to the floor.@
>But before I hit the ground, a ring of light suddenly surrounds me.\
>The ring raises me back up into a standing position, keeping me firmly in place.\
name $name
>Now then, I will carry out the punishment that Heaven has decreed for you.@
>Your rape of 20,000 years begins now.\
name ""
name "Luka"
>Urhg! G...Get off!\
name ""
>I try to pull and push against the rings, but they don't budge an inch.\
>Valkyrie turns around, and pushes her butt out towards me.@
>She backs into me, pressing herself against my groin.\
name $name
>Prepare yourself...@
>Your penis will not be released from my vagina for the next 20,000 years.\
>During that time, I will be endlessly raping you...\
name ""
name "Luka"
>S...Stop...\
name ""
>My trembling penis touches the entrance to her vagina.@
mov %hseanwave,2:hseanwave
cspl 690,699
lsp 700,":a;chara\valkyrie_ha6.bmp",0,0:print 10,500
>And before I can say anything else, it slowly sinks into her narrow hole.\
name "Luka"
>Ah...Ahh...!\
name ""
>In only a moment, I was all the way inside her.@
>Her warm, soft walls slowly start to clamp down around me inside of her.\
goto *valkyrie_hb



*valkyrie_hb

>Her soft walls clamp down harder and harder around me.@
>Almost as if it was a firm grip... No, it's even more than that.\
name "Luka"
>Ahh...!\
name ""
name $name
>Well...? It's tight, isn't it?@
>While being squeezed inside of me, lament your sins.\
name ""
name "Luka"
>Ah...\
name ""
>Her muscles tense, bringing the walls of her vagina down even harder on me.@
>The soft walls close around my penis, almost as if forming themselves exactly to my shape.\
>At first, the fear of having my penis crushed paralyzes me...@
>But soon, I start to feel twangs of pleasure mixing in.\
name $name
>Even tighter...\
name ""
name "Luka"
>Ahhhg!\
name ""
>I writhe under the pressure overtaking all of my senses.@
>But no matter how hard I pull my waist back, I can't pull out of her.\
>As I feebly take this one-sided torture, I start to feel a building ache in my lower body.\
>The desire to release in this tight pressure...@
>I do everything I can to suppress it.\
name "Luka"
>S...Stop it... Ahh...@
>I...I'm going to come...\
name ""
name $name
>...Already going to finish?@
>Driven this far just from a little tightening... A truly pathetic man.\
>Now, receive your miserable finish.@
>Contemplate your sinful behavior as you come inside.\
name ""
>Her already overpoweringly tight vagina squeezes down on me even further, sending me over my limits.@
>Completely surrendering, my penis twitches in bliss as I come, filling her tight vagina in semen.\
name ""
gosub *syasei1
lsp 700,":a;chara\valkyrie_ha7.bmp",0,0
gosub *syasei2
name "Luka"
>A...Ahh...@
>Stop... Don't tighten it...\
name ""
name $name
>........\
name ""
>My sensitive penis, still being squeezed right after my orgasm, makes my body spasm in response.\
>Her tight squeezes continue on, milking out the last amounts of semen inside my penis.\
>Until it's all out, she silently continues that motion with her vagina.\
name "Luka"
>Ah...\
name ""
name $name
>You seem to have finished releasing semen.@
>It's miserable for a man to come just from some squeezing.\
>Just like this, you'll continue polluting my vagina.@
>This is your punishment for your sins for the next 20,000 years.\
name ""
name "Luka"
>N...No way... Hyaaa!\
name ""
mov %hseanwave,4:hseanwave
>My refusals are cut into a scream as she squeezes down on me, interrupting my thought.@
>Completely different from normal sex, this is designed to be a punishment of tightness...\
name "Luka"
>Stop... It's too tight...\
name ""
>I already know it's useless to beg her to stop.@
>But there's no escape... The intense pressure continues on, squeezing out my semen.\
name $name
>I will not loosen it.@
>This is punishment for a sinner.\
>Be in pain... Be in agony...@
>Writhe as your dirty bodily fluids are squeezed dry by my vagina.\
name ""
name "Luka"
>Ahhhh!\
name ""
>Following her words, the intense pressure gets impossibly tighter.@
>My back arches as I feel my penis already starting to twitch again.\
>Unconsciously giving over to that building release, I feel my body slacken.@
>The aching from my penis spreads to my waist, and continues on all the way to the rest of my body.\
gosub *syasei1
lsp 700,":a;chara\valkyrie_ha8.bmp",0,0
gosub *syasei2
>Like that, I come inside Valkyrie again, filling her with even more semen.\
name "Luka"
>Ahhnn...\
name ""
>My waist shakes as I come inside of Valkyrie.@
>But with the intense pressure, I can't even get a weak feeling of release from my orgasm.\
name $name
>You came again...@
>This will continue for 20,000 years. Why do you bother trying to endure it at all?\
name ""
name "Luka"
>I...I don't want that...
>Help me...\
name ""
>Squeeze... Squeeze... I feel her squeezing down on me.@
>From the root to tip, my penis is being crushed in her tight vagina.\
>Even when I orgasm, the release never comes with it.@
>All I can feel is the endlessly continuing pain and pleasure of her tightness.\
name $name
>It can still get tighter...@
>If I focused on the tip of your penis, you wouldn't be able to endure it.\
name ""
name "Luka"
>Ah...Ahhh!\
name ""
>I feel the very tip of my penis being squeezed tighter than the rest.@
>Having my weakest point attacked so directly, my lower body shakes in pleasure filled agony.\
name "Luka"
>Stop... I'm going to come again...\
name ""
name $name
>I won't stop... Reach your pathetic finish.@
>I'll squeeze you over and over again... Until this punishment is over.\
name ""
name "Luka"
>Ahhhh....\
name ""
gosub *syasei1:gosub *syasei2
>I helplessly come again, filling her tight vagina with even more semen.\
name "Luka"
>Hyaa... Stop already...\
name ""
name $name
>The punishment has only begun.@
>If you're already complaining now, how will you last the next 20,000 years?\
name ""
name "Luka"
>Aiiie!\
name ""
gosub *syasei1:gosub *syasei2
>My mind clouds over in the sweet sense of another orgasm before I can do anything about it.@
>It's beyond human coherence... This will continue for 20,000 years?\
name "Luka"
>Ahh... Stop... Help me...\
name ""
name $name
>Even if you cry and ask for forgiveness, your crimes will not vanish.@
>The only thing left for you is to accept your punishment.\
name ""
>At the same time she finishes her sentence, she squeezes down hard again on my glans.\
name "Luka"
>Hyaaaa!\
name ""
gosub *syasei1:gosub *syasei2
>Again, she forcibly drives me to ejaculation.\
>Over and over again, all as I beg for forgiveness.@
>But my appeals are ignored, and she instead forces me to even more ejaculations.\
name "Luka"
>Stop...@
>Please, I'm begging you... Forgive me...\
name ""
name $name
>You truly are a pathetic sinner.@
>No matter how you cry, I will not loosen you.\
name ""
name "Luka"
>Hyaaa!\
name ""
gosub *syasei1:gosub *syasei2
>Thus, she continues on raping me like that...@
>Far past human understanding, 20,000 years might as well be forever.\
>Without knowing when I may be released, I continue receiving the endless torture.@
>Slobbering and crying as she squeezes out my semen, I wait for the day when my punishment ends...\
mov %hseanwave,0:hseanwave
gosub *anten
>...........\
goto *badend



*ariel_start

mov $name,"Archangel Ariel"
mov $name2,"Ariel"
mov $lavel,"ariel"
mov $tatie1,"ariel_st01"
mov $tatie2,"ariel_st02"
mov $tatie3,"ariel_st03"
mov $tatie4,"ariel_h1"
mov $haikei,"bg047"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,22000
if %nanido=2 mov %max_enemylife,25000
if %nanido=3 mov %max_enemylife,28000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,50
mov %earth_keigen,50
if %nanido=3 mov %earth_keigen,25
mov %alice_skill,0
mov %music,9
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $half_s1,"Well? Does it feel good?"
mov $half_s2,"Be still, and accept this pleasure..."
mov $kiki_s1,"Already at your limit? How silly..."
mov $kiki_s2,"Now to make you ejaculate."
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-280
mov %tukix,300
mov %owaza_count2a,7
mov %owaza_count2b,7
mov $name,"Ariel"
name "Alice"
>It can't be... An Archangel!?@
>An Angel of that class descending to the human world...!?\
name ""
>Even while she pins a Chimeric Beast to the floor, Alice lets out a yell of wonder.\
name "Alice"
>Don't let your guard down, Luka!@
>She is a very powerful Angel!\
name ""
name "Luka"
>Yes, I can feel it...\
name ""
>I'm having trouble simply breathing due to this divine aura.@
>Judging by the oppressive aura, there's no way she's normal...\
name $name
>You are the disgraced Hero Luka.@
>I see... You do indeed have physical power beyond reason.\
>It is dangerous to even allow a soul such as yours to participate in the Samsara of reincarnation.@
>I must violate you with this body, and suck up your spirit.\
name ""
name "Luka"
>......\
name ""
>I take a breath to calm myself, and regain my stance.\
mov %sinkou,1
goto *common_main



*ariel001

name $name
>A serene state of mind... I know that trick.\
>You synchronize yourself with the air around you, seeing the enemy's movements as waves through it.\
>It lets you almost see into the future of their actions, and evade their blows.\
>So if I control my thirst for blood and intent to the maximum, you won't be able to read anything.\
name ""
name "Luka"
>Guh... She knows how to beat the skill!?\
name ""
>It shouldn't be possible to know that much about the skill just from seeing it once.@
>She must have seen it before somewhere...\
name $name
>I am one of the few Angels who survived the fight with Heinrich.@
>I am fully aware of that skill's weak points.\
name ""
name "Luka"
>...Did you say Heinrich?@
>The Hero Heinrich...?\
name ""
mov %sinkou,2
goto *ariel_a



*ariel_v

gosub *face3
name $name
>What strength...@
>Eden's concerns... Were correct...!\
name ""
dwave 1,"se\bun.ogg"
csp 700:print 99,1000,"system\breakup.dll/lrB"
>Ariel fades away into particles, then vanishes!\
mov $name,"Archangel Ariel"
mov %viclose,1:gosub *victory
mov %getexp,170000:gosub *lvup
mov %2352,1
goto *sean0306



*ariel_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Seeing my power, you lost the will to resist?@
>You are wrong if you thought that would make me forgive you...\
name ""
goto *ariel_a



*ariel_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *ariel_kousan
if %cmd1=16 goto *ariel_onedari
if %cmd1=17 goto *common_skill
goto *ariel_main



*ariel_a

if %aqua>0 && %sinkou=1 goto *ariel001
if %status=2 gosub *ariel_a7:goto *common_main
rnd2 %ransu,1,6
if %ransu=1 gosub *ariel_a1:goto *common_main
if %ransu=2 gosub *ariel_a2:goto *common_main
if %ransu=3 gosub *ariel_a3:goto *common_main
if %ransu=4 gosub *ariel_a4:goto *common_main
if %ransu=5 && %owaza_count2a>8 && %status=0 gosub *ariel_a5:goto *common_main
if %ransu=6 && %owaza_count2b>8 && %status=0 gosub *ariel_a6:goto *common_main
skip -7



*ariel_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Dye this palm with the cloudiness of your humiliation..."
if %ransu=2 mov $sel1,"I shall squeeze it out like this."
if %ransu=3 mov $sel1,"Will you come if I rub it this way?"
name $name
eng $sel1:$sel6\
name ""
skillname "Archangel's Masturbation"
dwave 1,"se\ero_koki1.ogg"
>Ariel smoothly strokes Luka's penis with her hand!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua=3 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind=3 mov %wind_kakuritu,30
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4136
if %nanido<2 damage 500,520
if %nanido=2 damage 600,620
if %nanido=3 damage 700,720
skillname ""
if %mylife=0 sub %stack,1:return *ariel_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*ariel_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Now, finish yourself in my mouth..."
if %ransu=2 mov $sel1,"My oral technique is unmatched."
if %ransu=3 mov $sel1,"There is no greater luxury than the mouth of an Angel."
name $name
eng $sel1:$sel6\
name ""
skillname "Archangel's Fellatio"
dwave 1,"se\ero_buchu2.ogg"
>Ariel sucks diligently on Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua=3 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind=3 mov %wind_kakuritu,30
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3679
if %nanido<2 damage 510,530
if %nanido=2 damage 610,630
if %nanido=3 damage 710,730
skillname ""
if %mylife=0 sub %stack,1:return *ariel_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*ariel_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"To be able to dirty the most purest of feathers is a luxury..."
if %ransu=2 mov $sel1,"Enjoy the pure white feathers of an Archangel..."
if %ransu=3 mov $sel1,"Spread your dirty semen on these white wings..."
name $name
eng $sel1:$sel6\
name ""
skillname "Archangel's Feathers"
dwave 1,"se\umaru.ogg"
>Ariel's pure white feathers caress Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua=3 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind=3 mov %wind_kakuritu,30
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3680
if %nanido<2 damage 520,540
if %nanido=2 damage 620,640
if %nanido=3 damage 720,740
skillname ""
if %mylife=0 sub %stack,1:return *ariel_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*ariel_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll use these breasts to carefully stimulate you..."
if %ransu=2 mov $sel1,"If I do it this way... Any man would finish instantly."
if %ransu=3 mov $sel1,"An Angel's breasts are so soft, you will come instantly..."
name $name
eng $sel1:$sel6\
name ""
skillname "Archangel's Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>Ariel sandwiches Luka's penis between her breasts!
if %daten>0 goto *skill22x
if %wind=3 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3681
if %nanido<2 damage 300,320
if %nanido=2 damage 330,350
if %nanido=3 damage 360,380
dwave 1,"se\ero_koki1.ogg"
>She squeezes her breasts together, crushing Luka's penis!
skillcount3 3681
if %nanido<2 damage 300,320
if %nanido=2 damage 330,350
if %nanido=3 damage 360,380
dwave 1,"se\ero_koki1.ogg"
>Using her hands, she moves her breasts up and down!
skillcount3 3681
if %nanido<2 damage 300,320
if %nanido=2 damage 330,350
if %nanido=3 damage 360,380
skillname ""
if %mylife=0 sub %stack,1:return *ariel_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*ariel_a5

add %stack,1
mov %owaza_count2a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You will be a captive of these breasts..."
if %ransu=2 mov $sel1,"Don't you want to be embraced like this?"
if %ransu=3 mov $sel1,"Feel at peace in my breasts..."
name $name
eng $sel1:$sel6\
name ""
skillname "Archangel's Embrace"
dwave 1,"se\ero_makituki5.ogg"
eng "Ariel gently presses Luka's head to her chest!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua=3 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind=3 mov %wind_kakuritu,30
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount3 3682
>She buries his face between her breasts, and presses them into the sides of his head!
if %nanido<2 damage 450,470
if %nanido=2 damage 550,570
if %nanido=3 damage 650,670
if %status=0 mov $sel1,"Luka has been immersed in ecstasy!"
if %status=1 mov $sel1,"Luka is immersed in ecstasy..."
mov %status,1:gosub *status_print
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *ariel_h5
if %kousan=2 sub %stack,1:return
name "Luka"
>Haaa...\
name ""
name $name
>An Angel's embrace feels good, doesn't it?@
>Have a taste of heaven...\
name ""
rnd2 %status_turn,1,2
if %nanido=2 rnd2 %status_turn,1,2
if %nanido=3 rnd2 %status_turn,2,3
sub %stack,1
return



*ariel_a6

add %stack,1
mov %owaza_count2b,0
name $name
>Now take the wrath of the Heavens!\
name ""
skillname "Arc Bolt"
dwave 1,"se\laser.ogg"
eng "An electric current fires from Ariel's arm into Luka's body!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua=3 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind=3 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %status,2:gosub *status_print
>Luka has been paralyzed!\
skillname ""
name "Luka"
>Ah...Urhg...\
name ""
name $name
>Your body is numb, and won't move...@
>I'll take you to heaven, just like that...\
name ""
mov %status_turn,99
sub %stack,1
return



*ariel_a7

add %stack,1
if %kousan=2 skip 5
name $name
>Now I shall violate you.@
>Indulge in an Angel's vagina, the finest of pleasures...\
name ""
skillname "Archangel's Rape"
skillcount3 3683
>Ariel mounts Luka's paralyzed body!
dwave 1,"se\ero_pyu1.ogg"
>She drops her waist down, taking him deep into her!
mov %damage_kotei,1
damage 550,600
mov %kousoku,1:gosub *status_print
>Luka is being raped by Ariel!\
skillname ""
if %mylife=0 sub %stack,1:return *ariel_h6
name "Luka"
>Ahhh...!\
name $name
>With this, you will die.@
>My vagina will suck up your spirit, and leave you empty.\
>But do not be afraid.@
>You will taste the most supreme of pleasures until your death.\
name ""
mov %genmogaku,99
sub %stack,1
goto *ariel_a8



*ariel_a8

add %stack,1
name ""
>Ariel is raping Luka...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll shake my waist and finish you...":mov $sel2,"Ariel violently moves her waist, sending Luka into spasms of pleasure!"
if %ransu=2 mov $sel1,"Like this, you'll give in any moment...":mov $sel2,"Ariel tenses her muscles, tightening her vagina around Luka's penis!"
if %ransu=3 mov $sel1,"There is no greater bliss than being violated by an Angel...":mov $sel2,"Ariel gently shakes her waist, stimulating Luka!"
if %ransu=4 mov $sel1,"I'll get a little rougher... Resign yourself to it.":mov $sel2,"Ariel starts to raise and lower herself violently on top of Luka!"
if %ransu=5 mov $sel1,"If I contract and release some, any man will finish...":mov $sel2,"Ariel's vagina starts to squeeze and loosen, causing her folds to rub Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Archangel's Rape"
dwave 1,"se\ero_chupa4.ogg"
eng $sel2:$sel6
skillcount3 3683
mov %damage_kotei,1
damage 550,600
skillname ""
if %mylife=0 sub %stack,1:return *ariel_h7
sub %stack,1
goto *ariel_a8



*ariel_onedari

mov $list1,"Archangel's Masturbation"
if %4136>0 mov %list_num1,1
mov $list2,"Archangel's Fellatio"
if %3679>0 mov %list_num2,1
mov $list3,"Archangel's Feathers"
if %3680>0 mov %list_num3,1
mov $list4,"Archangel's Tit Fuck"
if %3681>0 mov %list_num4,1
mov $list5,"Archangel's Embrace"
if %3682>0 mov %list_num5,1
mov $list6,"Archangel's Rape"
if %3683>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *ariel_onedari1
if %cmd1=12 goto *ariel_onedari2
if %cmd1=13 goto *ariel_onedari3
if %cmd1=14 goto *ariel_onedari4
if %cmd1=15 goto *ariel_onedari5
if %cmd1=16 goto *ariel_onedari6
if %cmd1=-1 goto *ariel_main
goto *ariel_onedari



*ariel_onedari1

gosub *onedari_syori
name $name
>You want me to use my hand?@
>Very well, cover it in your semen...\
name ""
gosub *ariel_a1
skip -1



*ariel_onedari2

gosub *onedari_syori
name $name
>You want me to use my mouth?@
>Very well, fill it with your semen...\
name ""
gosub *ariel_a2
skip -1



*ariel_onedari3

gosub *onedari_syori
name $name
>You want me to use my wings?@
>Very well, cover them in your semen...\
name ""
gosub *ariel_a3
skip -1



*ariel_onedari4

gosub *onedari_syori
name $name
>You want me to use my chest?@
>Very well, cover it in your semen...\
name ""
gosub *ariel_a4
skip -1



*ariel_onedari5

gosub *onedari_syori
name $name
>You want to embrace me as you're finished?@
>Very well, I shall gently embrace you...\
name ""
gosub *ariel_a5
skip -1



*ariel_onedari6

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want me to rape you?@
>Only a fool wishes punishment on themself...\
name ""
if %kousoku=0 gosub *ariel_a7
gosub *ariel_a8
skip -1



*ariel_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\ariel_bk03.bmp",0,0
gosub *syasei2
>As Ariel's soft palm strokes him, Luka comes, covering her pure hand in semen.\
mov %viclose,1:gosub *lose
mov %2652,%2652+1:if %2652=1 mov %count_koenemy,%count_koenemy+1
if %2652>%count_most mov %count_most,%2652:mov $count_mostname,$name
count 5,17
mov $bad1,"Ariel's handjob forced Luka to come."
gosub *face2
name $name
>You covered an Angel's hand in your dirty semen.@
>...I must give you a hard punishment.\
name ""
goto *ariel_h



*ariel_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\ariel_bk01.bmp",0,0
gosub *syasei2
>As Ariel slowly and carefully sucked on his penis, Luka comes, filling her accepting mouth with semen.\
mov %viclose,1:gosub *lose
mov %2652,%2652+1:if %2652=1 mov %count_koenemy,%count_koenemy+1
if %2652>%count_most mov %count_most,%2652:mov $count_mostname,$name
count 4,17
mov $bad1,"Ariel forced Luka to come with her blowjob."
gosub *face2
name $name
>Nnn... You filled an Angel's mouth with your dirty semen.@
>...I must give you a hard punishment.\
name ""
goto *ariel_h



*ariel_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 696,":a;chara\ariel_bk06.bmp",0,0
gosub *syasei2
>As Ariel's pure white wings stroke Luka, he comes, covering her feathers in semen.\
mov %viclose,1:gosub *lose
mov %2652,%2652+1:if %2652=1 mov %count_koenemy,%count_koenemy+1
if %2652>%count_most mov %count_most,%2652:mov $count_mostname,$name
count 13,17
mov $bad1,"Ariel forced Luka to come with her wings."
gosub *face2
name $name
>You covered an Angel's wings in your dirty semen.@
>...I must give you a hard punishment.\
name ""
goto *ariel_h



*ariel_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\ariel_bk02.bmp",0,0
gosub *syasei2
>As Ariel's breasts squeeze Luka's penis, he comes, covering her chest in semen.\
mov %viclose,1:gosub *lose
mov %2652,%2652+1:if %2652=1 mov %count_koenemy,%count_koenemy+1
if %2652>%count_most mov %count_most,%2652:mov $count_mostname,$name
count 7,17
mov $bad1,"Ariel used her breasts to force Luka to come."
gosub *face2
name $name
>You covered an Angel's chest in your dirty semen.@
>...I must give you a hard punishment.\
name ""
goto *ariel_h



*ariel_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\ariel_bk04.bmp",0,0
gosub *syasei2
>As Luka buries his face in Ariel's breasts, he comes, accidentally spraying his semen on her stomach.\
mov %viclose,1:gosub *lose
mov %2652,%2652+1:if %2652=1 mov %count_koenemy,%count_koenemy+1
if %2652>%count_most mov %count_most,%2652:mov $count_mostname,$name
count 29,17
mov $bad1,"Ariel gently embraced Luka, forcing him to come."
gosub *face2
name $name
>You came just from hugging me?@
>...I must give you a hard punishment.\
name ""
goto *ariel_h



*ariel_h6

mov %ikigoe,3:gosub *ikigoe
name $name
>How unsightly...\
name ""
gosub *syasei1
lsp 700,":a;chara\ariel_h2.bmp",0,0
gosub *syasei2
>As soon as Luka is inside Ariel's vagina, he comes, filling her up with semen.\
mov %viclose,1:gosub *lose
mov %2652,%2652+1:if %2652=1 mov %count_koenemy,%count_koenemy+1
if %2652>%count_most mov %count_most,%2652:mov $count_mostname,$name
count 1,17
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come as soon as he felt Ariel's vagina."
gosub *face2
name $name
>You didn't even last a few seconds inside me...@
>You are a poor excuse for a man.\
name ""
goto *ariel_h



*ariel_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\ariel_h2.bmp",0,0
gosub *syasei2
>Immersed in Ariel's vagina, Luka comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2652,%2652+1:if %2652=1 mov %count_koenemy,%count_koenemy+1
if %2652>%count_most mov %count_most,%2652:mov $count_mostname,$name
count 1,17

mov $bad1,"Ariel forced Luka to come as she raped him."
gosub *face2
name $name
>...Did you come in my vagina?@
>You will not escape punishment for that.\
name ""
goto *ariel_h



*ariel_h

mov $bad2,"Luka continued being raped and having his spirit sucked until reincarnation was impossible."
if %2652=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,3:hseanwave:goto *ariel_hb
name "Luka"
>Ahhh...\
name ""
name $name
>I will not allow you to have offspring.@
>I will squeeze out every drop of your semen.\
>I will also cut off your life itself.@
>As to make sure you never reincarnate, I will dispose of you properly.\
name ""
>Too weak to resist, Ariel easily pushes me down and mounts me.\
name "Luka"
>W...What are you doing!?\
name ""
name $name
>I do not enjoy imitating monsters, but...@
>Absorbing spirit through the genital tract is the most efficient way.\
>Thus, I will rape you and drain your semen.@
>Your life itself will be sucked, so just die peacefully...\
name ""
name "Luka"
>Guh... S...Stop...\
name ""
>The moment I try to raise my arms and legs in resistance...\
name $name
>...I won't allow any resistance.@
>Resign yourself, and accept the rape.\
name ""
dwave 1,"se\laser.ogg"
>From the arm she's touching, electricity races through my body.@
>I feel myself tense for a moment, before I'm left completely numb.\
name "Luka"
>Uwaa!\
name ""
>After the shock, I'm left completely unable to resist.@
>As I am now, I can only accept the punishment...\
name $name
>...Now, I'll rape you.@
>Die peacefully as you enjoy crossing with an Angel...\
name ""
name "Luka"
>Stop... Stop...@
>Ahhhh!!\
name ""
mov %hseanwave,3:hseanwave
cspl 690,699
lsp 700,":a;chara\ariel_h1.bmp",0,0:print 10,500
>Ariel drops her waist, taking me deep inside.@
>Her warm, soft folds rub my penis all the way inside her.\
>Her wet juices cover my penis from tip to base as it goes in.@
>Contrary to the divine presence she gives off, the pleasure is surprisingly raw.\
goto *ariel_hb



*ariel_hb

name "Luka"
>Ahh... Ahhhh!\
name ""
name $name
>Does this feel good...?@
>But I do not intend for this to delight you.\
>This is only for taking your spirit.@
>I'll squeeze you dry, and take everything...\
name ""
name "Luka"
>Ahh... No... No...\
name ""
>Intense pleasure spreads from my penis to the rest of my body.@
>But this is no time to immerse myself in the sensations...\
>This Angel's vagina is going to take everything from me.@
>If I come inside of her, she will take even my life...\
>The blinding realization of my fate crashes on me all at once.\
name "Luka"
>D...Don't... Ah...\
name ""
>I twist my body, desperate to escape, but...\
name $name
>...I told you not to resist.@
>Just be raped in silence.\
name ""
dwave 1,"se\laser.ogg"
>The current races through my body again.@
>I tense up, and instantly stop resisting her.\
name "Luka"
>Ahhhh!\
name ""
>Far from getting her off, I can't even make feeble resistance.@
>I can only grit my teeth and endure the rape.\
name "Luka"
>Ah... Urhg...\
name ""
name $name
>Are you holding back your ejaculation?@
>That's useless...\
>A human male cannot resist this pleasure.@
>Give up, and come inside me...\
name ""
>Ariel looks down at me, and slowly starts moving her waist.@
>Her warm walls rub hard against my penis with each movement she makes.\
>Her soft folds rub against my tip as she moves her waist, causing my body to tremble in response.\
name "Luka"
>Stop... Don't move...\
name ""
>At last, I'm left unable to hold back my orgasm.@
>But if I come, she will take my life...\
>I cannot allow that to happen.@
>No matter what, I must endure...\
name "Luka"
>Ah...Ahh...@
>It feels good...\
name ""
>But it feels so good inside of her, it's almost as if I could melt away.@
>Her finger-like folds gently run up and down my penis with each movement, making me sigh in pleasure.\
>At this rate, I'm going to come inside of her.@
>I could just end it, and indulge myself in the pleasure...\
name $name
>Hehe...\
name ""
>At that moment, a smile of superiority crosses Ariel's face.@
>The only crack in her business like face so far.\
>As I stare into those eyes looking down on me, I finally reach my climax.\
name "Luka"
>No... I don't want to come!@
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\ariel_h2.bmp",0,0
gosub *syasei2
>My penis twitches, and I explode inside Ariel.@
>Her vagina squeezes and pulses in time with my ejaculation, squeezing everything out into her.\
name "Luka"
>Ah...! Hyaa!\
name ""
>My body bends in agonized pleasure as she keeps squeezing me during my ejaculation, almost as if she was massaging me through it.\
name $name
>You came... Now, I'll suck out your life itself.@
>Meet your end while tasting a pleasure that will steal your everything.\
name ""
name "Luka"
>Stop, stop...@
>Ahhhh!!!\
name ""
mov %hseanwave,8:hseanwave
>The suction of my nightmares started...\
>This vagina, one that gave me such blissful pleasure is now doing something cruel and merciless.\
>Unable to hold back any longer, I let out another white flag of surrender to this unyielding suction.\
name "Luka"
>Hyaaa!\
name ""
gosub *syasei1
lsp 700,":a;chara\ariel_h3.bmp",0,0
gosub *syasei2
>It's not just semen that's released.@
>My life energy itself is being absorbed by Ariel's vagina.\
>Pleasure being traded for my ruin...\
name "Luka"
>Hyaaaa!!@
>Ahhhh!\
name ""
>I scream under Ariel's body, but it was pointless.@
>One after another, I'm wracked by orgasms as more and more cloudy fluid flows into her accepting vagina.\
gosub *syasei1
lsp 700,":a;chara\ariel_h4.bmp",0,0
gosub *syasei2
>This nightmare hole, able to take everything from a man...@
>My life energy and semen are both being shot by my own body right into it.\
>In exchange for that cruel function, the pleasure this Angel's vagina can provide is unmatched.\
name "Luka"
>Aiie! Hyaaa!\
name ""
>Bouncing between extreme pleasure and fear, I try to move my limbs again, but...\
name $name
>...I won't allow you to act violently.@
>Continue climaxing in silence.\
name ""
>Another electric shock runs through me, and I go limp again.@
>Trained not to resist, I just feebly moan as my life itself is taken from me.\
name "Luka"
>Ahh...\
name ""
gosub *syasei1:gosub *syasei2
>My life is being taken in incredible speed...@
>I already can't feel any power in my body, and I feel on the verge of fainting.\
>I clearly understand my life is being sucked out right in front of my eyes...@
>My soul itself is being swallowed by Ariel.\
>The death of my very existence is before me.\
name "Luka"
>Stop... Stop...\
name ""
>I beg Ariel as she stares at me with a ruthless look in her eye.@
>But there's no way this cruel act will stop...\
name $name
>You have a great amount of energy.@
>It took time to consume all of it...\
>But I've already taken all of the energy that was for your power.@
>All that remains is your life energy itself...\
name ""
name "Luka"
>Ah... Ah...\
name ""
>I can't even move a finger any longer.@
>All that remains is for my life itself to be sucked away...\
name $name
>...Are you prepared?@
>Then I'll take the last drop of your life into my vagina...\
>Here I go...\
name ""
name "Luka"
>Ahh...\
name ""
>Ariel's vagina squeezes around me, one last time.@
>My penis happily twitches in response.\
>It was as if I was a rag, having the last drops of water wrung from me before being thrown away.\
name "Luka"
>Ha... Aa...\
name ""
gosub *syasei1:gosub *syasei2
>My penis happily pulses, and I reach a final orgasm.@
>The last of my life spurts into Ariel's vagina.\
>My consciousness fades in that moment, stuck in the final moment of ecstasy.\
mov %hseanwave,0:hseanwave
name $name
>...He is gone.@
>Not even your soul will reincarnate anymore.\
>I sucked your soul itself into me, and absorbed you...\
name ""
>Ariel looks at the lifeless body with a cruel look.@
>The boy's soul was sucked into her vagina, and treated the same as mere food...\
gosub *anten
>.....\
goto *badend



*c_s2_start

mov $name,"Experimental Organism S-2"
mov $name2,"S-2"
mov $lavel,"c_s2"
mov $tatie1,"c_s2_st01"
mov $tatie2,"c_s2_st02"
mov $tatie3,"c_s2_st03"
mov $tatie4,"c_s2_ha3"
mov $haikei,"bg184"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,7500
if %nanido=2 mov %max_enemylife,8500
if %nanido=3 mov %max_enemylife,9500
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,0
mov %music,1
mov %tikei,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't escape from S-2's restraint!"
mov $mogaku_anno2,"Luka breaks free from S-2!"
mov $mogaku_anno3,"But Luka can't move like this!"
mov $mogaku_sel1,"I won't release you, even if you struggle..."
mov $mogaku_sel2,"You can't escape from my bubbles..."
mov $mogaku_sel3,"If I make you feel even better, will you stop struggling?"
mov $mogaku_sel4,"I'll give you even more bubbles..."
mov $mogaku_sel5,"Even if you rage around, I won't let you go."
mov $mogaku_dassyutu1,"Why would you run...?"
mov $mogaku_dassyutu2,"Didn't it feel good...?"
mov $half_s1,"Does it feel good...?"
mov $half_s2,"Let me make it even better."
mov $kiki_s1,"Is that pre-come?"
mov $kiki_s2,"I want it all..."
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,4
mov $name,"S-2"
name $name
>Awawa... I'm outside...@
>Arere? Is that a human?\
name ""
>Her arms are tentacles, and her lower body is more like viscous liquid...@
>She slowly turns, and locks eyes with me.\
name "Luka"
>...I...I'm not your enemy.\
>Were you being experimented on?@
>I'm here to free you...\
name ""
name $name
>Awawa... I'm not interested in the outside world at all.\
>...But your semen seems so delicious.@
>Can I squeeze some out and drink it...?\
name ""
name "Luka"
>Gah... A type that attacks humans!\
name ""
>I don't seem to have a choice but to defend myself...@
>Am I going to be alright without the spirits...?\
goto *common_main



*c_s2_v

gosub *face3
name $name
>Awawa...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>S-2 turns into a mass of viscous liquid!\
mov $name,"Experimental Organism S-2"
mov %viclose,1:gosub *victory
mov %getexp,100000:gosub *lvup
mov %2353,1
goto *sean0309



*c_s2_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>You're going to give me your penis...?@
>Then I'll cover it in bubbles!\
name ""
goto *c_s2_a



*c_s2_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *c_s2_kousan
if %cmd1=16 goto *c_s2_onedari
if %cmd1=17 goto *common_skill
goto *c_s2_main



*c_s2_a

if %kousoku=2 rnd2 %ransu,1,2
if %kousoku=2 && %ransu=1 gosub *c_s2_a5:goto *common_main
if %kousoku=2 && %ransu=2 gosub *c_s2_a6:goto *common_main
if %kousoku=1 gosub *c_s2_a5:goto *common_main
rnd2 %ransu,1,4
if %ransu=1 gosub *c_s2_a1:goto *common_main
if %ransu=2 gosub *c_s2_a2:goto *common_main
if %ransu=3 gosub *c_s2_a3:goto *common_main
if %ransu=4 && %owaza_count1a>5 gosub *c_s2_a4:goto *common_main
skip -5



*c_s2_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Suck, suck... Penis is so delicious!"
if %ransu=2 mov $sel1,"I'll suck your power right from the source!"
if %ransu=3 mov $sel1,"I can take your power like this..."
name $name
eng $sel1:$sel6\
name ""
skillname "Semen Sucking Pacifier"
dwave 1,"se\ero_buchu2.ogg"
>S-2 sucks in Luka's penis, and eagerly starts to suck!
skillcount3 3684
if %nanido<2 damage 150,170
if %nanido=2 damage 170,190
if %nanido=3 damage 190,210
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *c_s2_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_s2_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I can even absorb your energy through my breasts..."
if %ransu=2 mov $sel1,"I'll suck your life from between my breasts..."
if %ransu=3 mov $sel1,"I can even absorb a man's power like this!"
name $name
eng $sel1:$sel6\
name ""
skillname "Absorbing Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>Sandwiching Luka's penis between her breasts, S-2 absorbs Luka's energy!
skillcount3 3685
if %nanido<2 damage 160,180
if %nanido=2 damage 180,200
if %nanido=3 damage 200,220
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *c_s2_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_s2_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck your semen through my tentacle..."
if %ransu=2 mov $sel1,"It will feel good when I suck you with my tentacle..."
if %ransu=3 mov $sel1,"I can even suck your energy with my special tentacle..."
name $name
eng $sel1:$sel6\
name ""
skillname "Semen Sucking Tentacle"
dwave 1,"se\ero_makituki1.ogg"
>S-2's tentacles suck in Luka's penis, absorbing his energy!
skillcount3 3686
if %nanido<2 damage 170,190
if %nanido=2 damage 190,210
if %nanido=3 damage 210,230
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *c_s2_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_s2_a4

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 8
name $name
>Caught you.@
if %first_sel1=1 skip 3
>I'll make you feel good with my bubbles...\
skip 2
>It will feel even better than before...\
name ""
skillname "Bubble Shake"
dwave 1,"se\ero_slime3.ogg"
>Foamy mucus covers Luka's lower body!\
skillcount3 3687
dwave 1,"se\ero_makituki1.ogg"
lsp 700,":a;chara\c_s2_ha1.bmp",0,0:print 10,500
>S-2's tentacle twines around Luka's penis, giving him a sweet stimulation!
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
dwave 1,"se\ero_slime1.ogg"
lsp 700,":a;chara\c_s2_ha3.bmp",0,0:print 10,500
>The frothy liquid covers Luka's penis!
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
mov %kousoku,1:gosub *status_print
>Luka's body has been bound by S-2!\
skillname ""
if %mylife=0 sub %stack,1:return *c_s2_h4
if %kousan=2 sub %stack,1:return
name $name
if %first_sel1=1 skip 3
>You won't escape...\
skip 2
>You won't escape again...\
name ""
mov %first_sel1,1
if %nanido<2 mov %genmogaku,1
if %nanido=2 mov %genmogaku,1
if %nanido=3 mov %genmogaku,2
sub %stack,1
return



*c_s2_a5

add %stack,1
>Luka is bound by S-2...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Slimy slimy, bubbly bubbley... Hehe."
if %ransu=2 mov $sel1,"Does it feel good covered in bubbles?"
if %ransu=3 mov $sel1,"Playing with your penis is so fun..."
if %ransu=4 mov $sel1,"Hurry up and come... Let out your delicious white stuff..."
if %ransu=5 mov $sel1,"I'll cover your penis with lots of bubbles, and wrap my tentacle around it..."
name $name
eng $sel1:$sel6\
name ""
skillname "Bubble Shake"
skillcount3 3687
dwave 1,"se\ero_slime1.ogg"
>Foamy mucus covers Luka's penis!
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
dwave 2,"se\ero_makituki1.ogg"
>As the foamy mucus bubbles cover his penis, S-2's tentacle strokes it!
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
skillname ""
mov %kousoku,2
if %mylife=0 sub %stack,1:return *c_s2_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_s2_a6

add %stack,1
if %kousan=2 skip 6
>Luka is bound by S-2...\
name $name
>I want to absorb even more...@
>Come a lot as you're covered in bubbles...\
name ""
skillname "Bubble Heaven"
dwave 1,"se\ero_slime3.ogg"
skillcount3 3688
mov $tatie4,"c_s2_hb1"
lsp 700,":a;chara\c_s2_hb1.bmp",0,0
lsp 690,":a;chara\c_s2_ct01.bmp",0,0:print 10,500
>Large amounts of bubbles cover Luka's penis!
>Deep inside the bubbles, something wraps around his penis!
mov %damage_kotei,1
damage 200,220
mov %kousoku,3:gosub *status_print
>S-2 leans over Luka's body!\
skillname ""
if %mylife=0 sub %stack,1:return *c_s2_h5
name $name
>Your penis is wrapped in my bubbly mucus...@
>I won't let you go until you've come...\
sub %stack,1
goto *c_s2_a7



*c_s2_a7

add %stack,1
>Luka's lower body is completely covered in S-2's bubbly mucus...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Bubble bubble, squeeze squeeze..."
if %ransu=2 mov $sel1,"Hurry up and come..."
if %ransu=3 mov $sel1,"All over your penis..."
if %ransu=4 mov $sel1,"Squish squish..."
if %ransu=5 mov $sel1,"Hurry up and come..."
name $name
eng $sel1:$sel6\
name ""
skillname "Bubble Heaven"
dwave 1,"se\ero_slime3.ogg"
skillcount3 3688
dwave 1,"se\ero_slime1.ogg"
>Frothy mucus stimulates Luka's penis!
mov %damage_kotei,1
damage 200,220
skillname ""
if %mylife=0 sub %stack,1:return *c_s2_h5
sub %stack,1
goto *c_s2_a7



*c_s2_onedari

mov $list1,"Semen Sucking Pacifier"
if %3684>0 mov %list_num1,1
mov $list2,"Absorbing Tit Fuck"
if %3685>0 mov %list_num2,1
mov $list3,"Semen Sucking Tentacle"
if %3686>0 mov %list_num3,1
mov $list4,"Bubble Shake"
if %3687>0 mov %list_num4,1
mov $list5,"Bubble Heaven"
if %3688>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *c_s2_onedari1
if %cmd1=12 goto *c_s2_onedari2
if %cmd1=13 goto *c_s2_onedari3
if %cmd1=14 goto *c_s2_onedari4
if %cmd1=15 goto *c_s2_onedari5
if %cmd1=-1 goto *c_s2_main
goto *c_s2_onedari



*c_s2_onedari1

gosub *onedari_syori
name $name
>You want me to suck on your penis?@
>Then I'll suck and suck...\
name ""
gosub *c_s2_a1
skip -1



*c_s2_onedari2

gosub *onedari_syori
name $name
>You want me to sandwich your penis between my breasts?@
>Then I'll squeeze and squeeze...\
name ""
gosub *c_s2_a2
skip -1



*c_s2_onedari3

gosub *onedari_syori
name $name
>You want me to tease your penis with my tentacle?@
>Then I'll tease and tease...\
name ""
gosub *c_s2_a3
skip -1



*c_s2_onedari4

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want me to cover your penis in bubbles?@
>Then I'll give you lots of bubbles...\
name ""
if %kousoku=0 gosub *c_s2_a4
gosub *c_s2_a5
skip -1



*c_s2_onedari5

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want me to cover your penis in bubbles?@
>Then I'll completely cover it...\
name ""
if %kousoku=0 gosub *c_s2_a4
gosub *c_s2_a6
skip -1



*c_s2_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\c_s2_bk01.bmp",0,0
gosub *syasei2
>As S-2 sucks on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2653,%2653+1:if %2653=1 mov %count_koenemy,%count_koenemy+1
if %2653>%count_most mov %count_most,%2653:mov $count_mostname,$name
count 4,3
mov $bad1,"Luka was forced to come by S-2's mouth."
gosub *face2
name $name
>So much in my mouth...\
name ""
goto *c_s2_h



*c_s2_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\c_s2_bk02.bmp",0,0
gosub *syasei2
>Sandwiched between S-2's breasts, Luka comes, covering her chest in semen.\
mov %viclose,1:gosub *lose
mov %2653,%2653+1:if %2653=1 mov %count_koenemy,%count_koenemy+1
if %2653>%count_most mov %count_most,%2653:mov $count_mostname,$name
count 7,3
mov $bad1,"Luka was forced to come by S-2's breasts."
gosub *face2
name $name
>So much, all over my breasts...\
name ""
goto *c_s2_h



*c_s2_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\c_s2_bk03.bmp",0,0
gosub *syasei2
>As S-2's tentacle plays with Luka's penis, he comes, covering it in semen.\
mov %viclose,1:gosub *lose
mov %2653,%2653+1:if %2653=1 mov %count_koenemy,%count_koenemy+1
if %2653>%count_most mov %count_most,%2653:mov $count_mostname,$name
count 10,3
mov $bad1,"S-2 used her tentacle to force Luka to come."
gosub *face2
name $name
>So much semen, all over my tentacles...\
name ""
goto *c_s2_h



*c_s2_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\c_s2_ha4.bmp",0,0
gosub *syasei2
>As S-2 covers Luka's penis in bubbles and plays with it with her tentacle, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2653,%2653+1:if %2653=1 mov %count_koenemy,%count_koenemy+1
if %2653>%count_most mov %count_most,%2653:mov $count_mostname,$name
count 11,3
mov $bad1,"S-2 forced Luka to come using her bubbly mucus."
gosub *face2
name $name
>So much semen inside the bubbles...\
name ""
goto *c_s2_h



*c_s2_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\c_s2_hb2.bmp",0,0
lsp 690,":a;chara\c_s2_ct02.bmp",0,0
gosub *syasei2
>As the bubble-like mucus covers Luka's penis, he comes, spraying out his semen all over the bubbles.\
mov %viclose,1:gosub *lose2
name "Luka"
>Ahh...\
name ""
name $name
>So much semen, all over the bubbles...@
>It's delicious.\
>Hey, give me more?@
>If I give you more bubbles, will you let out more semen?\
name ""
skillcount3 3688
skillname "Bubble Heaven"
dwave 1,"se\ero_slime3.ogg"
>More mucus covers Luka's penis, wriggling all the while!
mov %damage_kotei,1
damage 200,220
dwave 1,"se\ero_slime3.ogg"
>The writhing mucus stimulates Luka's penis!
mov %damage_kotei,1
damage 200,220
skillname ""
name "Luka"
>Hyaa... N...No more...\
name ""
name $name
>I'll put some more on the tip...\
name ""
skillcount3 3688
skillname "Bubble Heaven"
dwave 1,"se\ero_slime3.ogg"
>More bubble-like mucus covers the tip of Luka's penis!
mov %damage_kotei,1
damage 200,220
dwave 1,"se\ero_slime3.ogg"
>Some of it sticks around the neck of Luka's penis!
mov %damage_kotei,1
damage 200,220
skillname ""
name "Luka"
>Stop... Or I'm going to come!\
name ""
name $name
>Doesn't it feel good on the tip?@
>Now then, here's the finish. \
name ""
skillcount3 3688
skillname "Bubble Heaven"
dwave 1,"se\ero_slime3.ogg"
>Sticky liquid rubs against Luka's penis, massaging it!
mov %damage_kotei,1
damage 200,220
dwave 1,"se\ero_slime3.ogg"
>The liquid moves faster, almost like it was running water around it!
mov %damage_kotei,1
damage 200,220
skillname ""
name "Luka"
>No... I'm coming...!@
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\c_s2_hb3.bmp",0,0
lsp 690,":a;chara\c_s2_ct03.bmp",0,0
gosub *syasei2
>Luka comes again, covering the bubbles in even more semen.\
name $name
>Ehehe... So much delicious semen.@
>I'll cover it more, to get even more!\
name ""
name "Luka"
>Hyaa... Stop... Stop!\
name ""
skillcount3 3688
skillname "Bubble Heaven"
dwave 1,"se\ero_slime3.ogg"
>S-2 sprays more bubble-like mucus on Luka's penis!
mov %damage_kotei,1
damage 200,220
dwave 1,"se\ero_slime3.ogg"
>The mucus swirls around Luka's penis, stimulating him!
mov %damage_kotei,1
damage 200,220
skillname ""
name $name
>Squishy squishy!@
>Let it out in the bubble massage! \
name ""
skillcount3 3688
skillname "Bubble Heaven"
dwave 1,"se\ero_slime3.ogg"
>The viscous mucus rubs against Luka's penis!
mov %damage_kotei,1
damage 200,220
dwave 1,"se\ero_slime3.ogg"
>The innumerable bubbles creep all over Luka's lower body!
mov %damage_kotei,1
damage 200,220
skillname ""
name "Luka"
>Ah... Stop... I'm going to come again!\
name ""
name $name
>Let out a lot...@
>Shoot out your baby juice! \
name ""
skillcount3 3688
skillname "Bubble Heaven"
dwave 1,"se\ero_slime3.ogg"
>The mucus flows quickly around Luka's penis!
mov %damage_kotei,1
damage 200,220
dwave 1,"se\ero_slime3.ogg"
>The bubbles compact tightly around the tip of Luka's penis!
mov %damage_kotei,1
damage 200,220
skillname ""
name "Luka"
>Ahhh...!\
name ""
gosub *syasei1
lsp 700,":a;chara\c_s2_hb4.bmp",0,0
lsp 690,":a;chara\c_s2_ct04.bmp",0,0
gosub *syasei2
>Covered in bubbles, Luka comes again, shooting his semen through the viscous mucus.\
name $name
>Your baby juice is so delicious...@
>I want to eat even more...!\
name ""
gosub *clear_sprite
gosub *setwindow_01p
>S-2 laughs out loud as she squeezes Luka's semen, wrapping up his entire body with more of her bubble-like mucus.\
mov %battle,0
mov %hsean,1
mov %2653,%2653+1:if %2653=1 mov %count_koenemy,%count_koenemy+1
if %2653>%count_most mov %count_most,%2653:mov $count_mostname,$name
count 11,3
mov $bad1,"S-2 forced Luka to come using her Bubble Heaven skill."
goto *c_s2_h



*c_s2_h

mov $bad2,"Luka lived out the rest of his life supplying semen to the experimental organism."
if %2653=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku=1 | %kousoku=2 mov %hseanwave,20:hseanwave:goto *c_s2_hb
name "Luka"
>Ahh...\
name ""
name $name
>So much of your white stuff...@
>I can't resist it any longer!\
name ""
>The sticky mucus covers my lower body as I fall to the floor, exhausted.@
>Grabbing hold of me, she spreads open my legs wide in front of her eyes.\
name $name
>I'll play with your penis...@
>And let you spray out your baby juice until you're empty!\
name ""
dwave 1,"se\ero_makituki3.ogg"
mov %hseanwave,20:hseanwave
cspl 690,699
lsp 700,":a;chara\c_s2_ha1.bmp",0,0:print 10,500
>The tentacle, covered in sticky mucus, clings to my penis.\
>Her tentacle is surprisingly soft and warm.@
>The strange feeling makes me unconsciously shake my waist.\
goto *c_s2_hb



*c_s2_hb

name "Luka"
>Ah... Ahhh!\
name ""
name $name
>...Is it good?@
>My tentacle can quickly make any man ejaculate...\
name ""
name "Luka"
>I...It doesn't feel good...@>Ahhn!\
name ""
>The touch of the tentacle winding around me cuts short my words of rejection.@
>While softly laughing, S-2's tentacle continues winding around my penis.\
>It slowly coils up my penis, wrapping around and covering more and more of it.@
>Her skillful control makes it feel like she really is just playing with it...\
name "Luka"
>Ah...!@
>S...Stop it!\
name ""
name $name
>You said it doesn't feel good?@
>But then why are you moaning like that?\
name ""
>While smiling and laughing, she continues moving her tentacle up my penis.@
>Her movements make it obvious that she knows what she's doing...\
>The tip of the tentacle plays with my urethral opening, as the rest of it rubs and squeezes my shaft and back muscle.\
>In addition, the whole thing is slowly moving up and down underneath the neck of my penis.@
>Every movement is calculated to encourage a man to climax.\
name "Luka"
>Ahhh...!\
name ""
>The gentle caress of the tentacle causes the energy to drain from my lower body.@
>My will to resist slowly fades as my body surrenders itself to her tentacle.\
>The humiliation at being played with is already quickly fading.@
>Replacing it instead is a sweet, aching sensation from my lower body.\
>As she diligently toys with my penis, the ability to stop my orgasm from coming is slowly being taken away.\
name "Luka"
>Stop... I'm about to come...\
name ""
name $name
>Are you already going to shoot out your baby juice...?\
name ""
>Laughing at my cry, S-2's tentacles get even more intense.\
>Her tentacles tighten around my penis as they stroke even harder.@
>As the tip of her tentacle rubs on my glans, my head goes blank.\
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\c_s2_ha2.bmp",0,0
gosub *syasei2
>S-2 looks at me with a satisfied look in her eye as I come, spraying semen all over her tentacle.\
name $name
>The baby juice leaked out...@
>You came from my tentacle...\
name ""
name "Luka"
>Ah... Ahh...\
name ""
name $name
>I'll play with your penis even more...\
name ""
lsp 700,":a;chara\c_s2_ha3.bmp",0,0:print 10,500
mov %hseanwave,19:hseanwave
>S-2 sprays a large amount of frothy mucus on my penis, quickly covering it.\
>The strange, sticky sensation mixes with the caress of the tentacle, bringing about a much more intense sensation.\
name "Luka"
>Haaa...\
name ""
>Even though it looks grotesque, the incredible sensation of her warm mucus makes me sigh.\
>Even though my mind feels miserable by being played with by such a monster, my body is rejoicing in the pleasure of a man.\
name $name
>A penis is supposed to go into a female when it ejaculates...@
>If you spray your baby juice all out here, you won't make a baby you know?\
name ""
name "Luka"
>Ah...\
name ""
>Even if it's horrifying, I can't fight against this pleasure...@
>I relax my body, giving myself over to the sensations of the mucus.\
>The tentacle coiled around my penis starts to wriggle.@
>Lubricated by the bubble-like mucus, the stimulation is much more intense.\
name "Luka"
>Ah... Ah...\
name ""
>Gasping in surprise, I push up my waist toward it before I can stop myself.@
>Another dull ache fills my lower body, and takes over my brain.\
name "Luka"
>N...No... Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\c_s2_ha4.bmp",0,0
gosub *syasei2
>Surprisingly fast, I come again.@
>It came on so quickly, it felt more like an accidental ejaculation than a real orgasm.\
name "Luka"
>Nnnn...\
name ""
name $name
>You came again...@
>I need to punish this little, quick coming penis.\
name ""
>The tentacles and bubbles start to squirm far more intensely.@
>Sensitive right after my orgasm, the stimulation is way beyond any from before.\
name "Luka"
>Ahhhh!!\
name ""
>My body bends, as the agonizing pleasure takes hold of my every sense.@
>It feels like she's intensely scrubbing my penis clean inside her bubble-like mucus.\
>Her tight tentacle goes up and down my shaft, while the warm mucus makes it feel hot and sticky.@
>The combination of sensations is far too much for me.\
name "Luka"
>Ah...!@> Hyaaaa!\
name ""
gosub *syasei1
lsp 700,":a;chara\c_s2_ha5.bmp",0,0
gosub *syasei2
>I'm quickly forced to another height from the unrelenting pleasure.@
>But even after I came again, S-2 doesn't stop the torture.\
name $name
>Let out more baby juice...\
name ""
name "Luka"
>Hyaaa!\
name ""
gosub *syasei1:gosub *syasei2
>The compounded stimulations force me to orgasm after orgasm.@
>All the while, S-2 is more and more amused by everything.\
>It's a hell of continual ejaculations...\
name $name
>Come again!\
name ""
name "Luka"
>Stop it already!@> Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>Like that, I'm forced to come over and over until my heart and soul are in tatters.\
name "Luka"
>Ah...ah...\
name ""
gosub *syasei1:gosub *syasei2
name $name
>The baby juice isn't coming out anymore...@
>Your penis is still twitching, but it's empty...\
name ""
>I feel the orgasms, but no semen is coming out.@
>I don't know if I'm truly empty, or if something broke...\
name "Luka"
>Ah...Aa...\
name ""
name $name
>But I won't let you escape...@
>As soon as more semen is produced, I'll squeeze it out right away.\
name ""
name "Luka"
>N...No...\
name ""
>As the despair washes over me, I feel myself fainting.@
>The pleasure and fear mix together, making me black out.\
mov %hseanwave,0:hseanwave
gosub *anten
>Thus, defeated by the experimental organism, I became its prey.@
>As I let out tears of frustration, she squeezes me completely dry every day.\
>............\
goto *badend



*c_a3_start

mov $name,"Experimental Organism A-3"
mov $name2,"A-3"
mov $lavel,"c_a3"
mov $tatie1,"c_a3_st01"
mov $tatie2,"c_a3_st01"
mov $tatie3,"c_a3_st01"
mov $tatie4,"c_a3_ha1"
mov $haikei,"bg185"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,9000
if %nanido=2 mov %max_enemylife,11000
if %nanido=3 mov %max_enemylife,13000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,0
mov %music,1
mov %tikei,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't push A-3 off him!"
mov $mogaku_anno2,"Luka manages to push away A-3!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Don't resist me... Just give in and come."
mov $mogaku_sel2,"I won't let you go, even if you rage around..."
mov $mogaku_sel3,"Even if you struggle, I won't let go..."
mov $mogaku_sel4,"If you resist, I'll just get more violent..."
mov $mogaku_sel5,"Resisting is pointless... Just give in and come."
mov $mogaku_dassyutu1,"Why did you run away?"
mov $mogaku_dassyutu2,"Just relax and let me finish you off!"
mov $half_s1,"Doesn't it feel good?"
mov $half_s2,"Let me make you come right away..."
mov $kiki_s1,"Are you going to come soon?"
mov $kiki_s2,"Then let me finish you off!"
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,4
mov %owaza_count3a,4
mov $name,"A-3"
name $name
>What does this mean?@
>Why is a human freely walking around here?\
name ""
name "Luka"
>An angel...?@
>Or...\
name ""
>She has wings, and a halo over her head...@
>But her tentacles and lower body...\
name $name
>I was once an angel.@
>But now... This body...\
name ""
name "Luka"
>.........\
name ""
>She's even treating her allied angels like this.@
>It's not just humans and monsters Promestein will experiment on...\
name "Luka"
>I'm not your enemy...@>Will you let me pass through here?\
name ""
name $name
>I can't help it, this body is so dry...@
>I want to squeeze out men's semen, and suck them empty...\
>I'll squeeze out all of your semen...@
>I'll drink it all, and satisfy my thirst...\
name ""
name "Luka"
>She won't listen after all!\
name ""
>I'm reluctant, but there's no choice but to fight!\
mov %sinkou,1
goto *common_main



*c_a3_v

gosub *face3
name $name
>I'm finally released...\
name ""
dwave 1,"se\bun.ogg"
csp 700:print 99,1000,"system\breakup.dll/lrB"
>A-3 fades away into particles, then vanishes!\
mov $name,"Experimental Organism A-3"
mov %viclose,1:gosub *victory
mov %getexp,100000:gosub *lvup
mov %2354,1
goto *sean0310



*c_a3_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>You won't resist anymore?@
>You want to be teased like this...?\
name ""
goto *c_a3_a



*c_a3_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *c_a3_kousan
if %cmd1=16 goto *c_a3_onedari
if %cmd1=17 goto *common_skill
goto *c_a3_main



*c_a3_a

if %hanyo6=1 && %bougyo=1 gosub *c_a3_a7:goto *common_main
if %hanyo6=1 && %bougyo=0 gosub *c_a3_a8:goto *common_main
if %kousoku=1 gosub *c_a3_a5:goto *common_main
rnd2 %ransu,1,5
if %ransu=1 gosub *c_a3_a1:goto *common_main
if %ransu=2 gosub *c_a3_a2:goto *common_main
if %ransu=3 gosub *c_a3_a3:goto *common_main
if %ransu=4 && %owaza_count1a>5 gosub *c_a3_a4:goto *common_main
if %ransu=5 && %owaza_count3a>5 gosub *c_a3_a6:goto *common_main
skip -6



*c_a3_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I can make you come with this horrifying tongue..."
if %ransu=2 mov $sel1,"My tongue was modified to make men feel good..."
if %ransu=3 mov $sel1,"I want it... A man's semen..."
name $name
eng $sel1:$sel6\
name ""
skillname "Tongue Stroke"
dwave 1,"se\ero_pyu1.ogg"
>A-3's tongue grows, and wraps around Luka's penis!
skillcount3 3689
if %nanido<2 damage 200,220
if %nanido=2 damage 220,240
if %nanido=3 damage 240,260
skillname ""
if %mylife=0 sub %stack,1:return *c_a3_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_a3_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Please come all over my chest... Hurry!"
if %ransu=2 mov $sel1,"It will feel good the quicker you come!"
if %ransu=3 mov $sel1,"Why are you holding back... Hurry up and cover me in your semen!"
name $name
eng $sel1:$sel6\
name ""
skillname "Breast Press"
dwave 1,"se\ero_sigoki1.ogg"
>A-3's hugs Luka around his waist, and presses his penis against her big breasts!
skillcount3 3690
if %nanido<2 damage 210,230
if %nanido=2 damage 230,250
if %nanido=3 damage 250,270
skillname ""
if %mylife=0 sub %stack,1:return *c_a3_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_a3_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll stroke you with my tentacle... It will feel good!"
if %ransu=2 mov $sel1,"It feels good, doesn't it? Hurry up and come!"
if %ransu=3 mov $sel1,"I'll make you into prey... You should be happy..."
name $name
eng $sel1:$sel6\
name ""
skillname "Tentacle Rape"
dwave 1,"se\ero_makituki1.ogg"
>A-3's tentacles coil around Luka's penis, stimulating him!
skillcount3 3691
if %nanido<2 damage 220,240
if %nanido=2 damage 240,260
if %nanido=3 damage 260,280
skillname ""
if %mylife=0 sub %stack,1:return *c_a3_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_a3_a4

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 7
name $name
if %first_sel1=1 skip 3
>I won't let you part from me until you come...\
skip 2
>This time I won't let you go...\
name ""
skillname "Immoral Hold"
dwave 1,"se\ero_makituki3.ogg"
>A-3 grabs hold of Luka, and restrains him in a humiliating position!@
mov %kousoku,1:gosub *status_print
>Luka has been bound by A-3!\
skillname ""
name $name
if %first_sel1=1 skip 3
>Ejaculate, just like this...@
skip 2
>I won't let you go this time...@
>Spray out your semen in this humiliating position!\
name ""
mov %first_sel1,1
if %nanido<2 mov %genmogaku,2
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,3
sub %stack,1
return



*c_a3_a5

add %stack,1
>Luka is being held by A-3...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hurry up and come for me!":mov $sel2,"A tentacle stimulate Luka's ass as A-3 sucks on his penis!"
if %ransu=2 mov $sel1,"Hurry up and come! Is the stimulation not enough?":mov $sel2,"While A-3 licks Luka's penis, a tentacle plays with his ass!"
if %ransu=3 mov $sel1,"Why are you holding on? Just be obedient and come...":mov $sel2,"As A-3 licks Luka's penis, a tentacle plays with his ass!"
if %ransu=4 mov $sel1,"Come all over me as I play with your ass...":mov $sel2,"A tentacle slips into Luka's ass, stimulating his prostate!"
if %ransu=5 mov $sel1,"Come as I lick your penis...":mov $sel2,"A-3's tongue winds around Luka's penis, stimulating him!"
name $name
eng $sel1:$sel6\
name ""
skillname "Immoral Raid"
dwave 1,"se\ero_makituki2.ogg"
eng $sel2:$sel6
skillcount3 3692
if %nanido<2 damage 150,170
if %nanido=2 damage 170,190
if %nanido=3 damage 190,210
skillname ""
if %mylife=0 sub %stack,1:return *c_a3_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_a3_a6

add %stack,1
name $name
>Hurry up, I want to suck out your semen!\
name ""
skillname "Immoral Blowjob Preparation"
dwave 1,"se\ero_slime3.ogg"
>A-3's mucus-like body starts to wriggle around...\
skillname ""
name $name
>Are you ready?@
>I'll suck out all your semen...\
name ""
mov %hanyo6,1
sub %stack,1
return



*c_a3_a7

add %stack,1
name $name
>I'll finish you quickly!@
>Be buried under my mucus...\
name ""
skillname "Immoral Feeling"
dwave 1,"se\ero_slime3.ogg"
>A-3's mucus covers Luka's body!
delay 1000
dwave 1,"se\miss.ogg"
>But Luka dodges it!\
skillname ""
if %first_sel2=1 skip 9
name "Luka"
>Whew... That was close.\
name ""
name $name
>Why did you avoid it?@
>I would have sucked you dry...\
name ""
mov %first_sel2,1
mov %hanyo6,0
mov %owaza_count3a,0
sub %stack,1
return



*c_a3_a8

add %stack,1
mov %hanyo6,0
if %kousan=2 skip 5
name $name
>I'll finish you quickly!@
>Be buried under my mucus...\
name ""
skillname "Immoral Feeling"
dwave 1,"se\ero_slime3.ogg"
skillcount3 3693
>A-3's mucus covers Luka's body!@
>Completely covering Luka, he's left unable to move!\
mov $tatie4,"c_a3_hb1"
mov %kousoku,2:gosub *status_print
>Luka's body has been bound by A-3!\
skillname ""
name $name
>I caught you... Now I'll make you come.@
>I'll squeeze out your semen, so don't hold back!\
name ""
sub %stack,1
goto *c_a3_a9



*c_a3_a9

add %stack,1
>Luka has been bound by A-3...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Come on... Hurry up and come!"
if %ransu=2 mov $sel1,"If I play with your nipples, will you come right away?"
if %ransu=3 mov $sel1,"How miserable for a man... Having your nipples played with."
if %ransu=4 mov $sel1,"If you don't come quickly, your penis might dissolve away..."
if %ransu=5 mov $sel1,"No matter the man, they would all come if I do this..."
name $name
eng $sel1:$sel6\
name ""
skillname "Immoral Feeling"
dwave 1,"se\ero_slime3.ogg"
skillcount3 3693
>The mucus around Luka's penis starts to vibrate!
if %nanido<2 damage 200,220
if %nanido=2 damage 210,230
if %nanido=3 damage 220,240
dwave 1,"se\ero_makituki1.ogg"
>A-3's tentacles knead Luka's nipples!
if %nanido<2 damage 200,220
if %nanido=2 damage 210,230
if %nanido=3 damage 220,240
skillname ""
if %mylife=0 sub %stack,1:return *c_a3_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
goto *c_a3_a9



*c_a3_onedari

mov $list1,"Tongue Stroke"
if %3689>0 mov %list_num1,1
mov $list2,"Breast Press"
if %3690>0 mov %list_num2,1
mov $list3,"Tentacle Rape"
if %3691>0 mov %list_num3,1
mov $list4,"Immoral Raid"
if %3692>0 mov %list_num4,1
mov $list5,"Immoral Feeling"
if %3693>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *c_a3_onedari1
if %cmd1=12 goto *c_a3_onedari2
if %cmd1=13 goto *c_a3_onedari3
if %cmd1=14 goto *c_a3_onedari4
if %cmd1=15 goto *c_a3_onedari5
if %cmd1=-1 goto *c_a3_main
goto *c_a3_onedari



*c_a3_onedari1

gosub *onedari_syori
name $name
>You want to be dealt with by my tongue?@
>Because of perverts like you, I was turned into this...\
name ""
gosub *c_a3_a1
skip -1



*c_a3_onedari2

gosub *onedari_syori
name $name
>You want to be dealt with by my breasts?@
>Because of perverts like you, I was turned into this...\
name ""
gosub *c_a3_a2
skip -1



*c_a3_onedari3

gosub *onedari_syori
name $name
>You want to be dealt with by my tentacles?@
>Because of perverts like you, I was turned into this...\
name ""
gosub *c_a3_a3
skip -1



*c_a3_onedari4

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want me to suck on your penis as my tentacle goes into your ass?@
>Perverts like you are better off dead...\
name ""
if %kousoku=0 gosub *c_a3_a4
gosub *c_a3_a5
skip -1



*c_a3_onedari5

gosub *onedari_syori
name $name
>You want to come while buried in my sticky mucus?@
>Perverts like you are better off dead...\
name ""
gosub *c_a3_a8
skip -1



*c_a3_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\c_a3_bk01.bmp",0,0
gosub *syasei2
>As A-3's wet tongue licks Luka's penis, he comes, covering her in semen.\
mov %viclose,1:gosub *lose
mov %2654,%2654+1:if %2654=1 mov %count_koenemy,%count_koenemy+1
if %2654>%count_most mov %count_most,%2654:mov $count_mostname,$name
count 4,4
mov $bad1,"A-3 forced Luka to come with her tongue."
gosub *face2
name $name
>My tongue made you come? You pervert...@
>Because of horny humans like you, I was...\
name ""
goto *c_a3_h



*c_a3_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\c_a3_bk02.bmp",0,0
gosub *syasei2
>As Luka's penis rubs against A-3's soft breasts, he comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2654,%2654+1:if %2654=1 mov %count_koenemy,%count_koenemy+1
if %2654>%count_most mov %count_most,%2654:mov $count_mostname,$name
count 7,4
mov $bad1,"A-3 forced Luka to come with her breasts."
gosub *face2
name $name
>My breasts made you come? You pervert...@
>Because of horny humans like you, I was...\
name ""
goto *c_a3_h



*c_a3_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\c_a3_bk03.bmp",0,0
gosub *syasei2
>As A-3's tentacles play with Luka's penis, he comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2654,%2654+1:if %2654=1 mov %count_koenemy,%count_koenemy+1
if %2654>%count_most mov %count_most,%2654:mov $count_mostname,$name
count 10,4
mov $bad1,"A-3 forced Luka to come with her tentacles."
gosub *face2
name $name
>My tentacle made you come? You pervert...@
>Because of horny humans like you, I was...\
name ""
goto *c_a3_h



*c_a3_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\c_a3_ha2.bmp",0,0
gosub *syasei2
>As A-3 licks Luka's penis at the same time her tentacle plays with his ass, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2654,%2654+1:if %2654=1 mov %count_koenemy,%count_koenemy+1
if %2654>%count_most mov %count_most,%2654:mov $count_mostname,$name
count 9,4
mov $bad1,"A-3 used her tongue and tentacles to force Luka to come."
gosub *face2
name $name
>Coming while having a tentacle in your ass? You pervert...@
>I should relentlessly squeeze humans like you to death...\
name ""
goto *c_a3_h



*c_a3_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\c_a3_hb2.bmp",0,0
gosub *syasei2
>Wrapped up in A-3's mucus, Luka comes, covering her in his semen.\
mov %viclose,1:gosub *lose2
name "Luka"
>Haaa...\
name ""
name $name
>You came from that...?@> Does it not matter what it is, as long as it feels good!?@
>If that's the case, then take this you pervert!\
name ""
skillname "Immoral Feeling"
dwave 1,"se\ero_makituki1.ogg"
skillcount3 3693
>A-3's tentacles start playing with Luka's nipples!
mov %damage_kotei,1
damage 200,220
dwave 1,"se\ero_slime3.ogg"
>A-3's sticky mucus squirms around Luka's penis!
mov %damage_kotei,1
damage 200,220
skillname ""
name "Luka"
>Stop... Help...\
name ""
name $name
>If you want this to stop, why did you get an erection?@
>You really want this, don't you!?\
name ""
skillname "Immoral Feeling"
dwave 1,"se\ero_makituki1.ogg"
skillcount3 3693
>The tentacles gently pinch Luka's nipples!
mov %damage_kotei,1
damage 200,220
dwave 1,"se\ero_slime3.ogg"
>The mucus swirls around, massaging Luka's penis!
mov %damage_kotei,1
damage 200,220
skillname ""
name "Luka"
>Ahh... I'm going to come...\
name ""
name $name
>Hmph, you're pathetic.@
>At least come a lot, and satisfy my thirst!\
name ""
skillname "Immoral Feeling"
dwave 1,"se\ero_makituki1.ogg"
skillcount3 3693
>The tentacles gently twist Luka's nipples!
mov %damage_kotei,1
damage 200,220
dwave 1,"se\ero_slime3.ogg"
>The mucus tightly squeezes Luka's penis, as if milking it!
mov %damage_kotei,1
damage 200,220
skillname ""
name "Luka"
>I'm coming!@
>Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\c_a3_hb3.bmp",0,0
gosub *syasei2
>Luka's penis twitches, and sprays semen all over the squirming mucus.\
name $name
>Now look... Look at all of that semen.@
>Aren't you ashamed of how you're acting?\
name ""
name "Luka"
>Haaa...\
name ""
name $name
>Hmph... You look almost senile.@
>It seems you require more abuse.\
name ""
skillname "Immoral Feeling"
dwave 1,"se\ero_makituki1.ogg"
skillcount3 3693
>The tentacles tickle Luka's nipples!
mov %damage_kotei,1
damage 200,220
dwave 1,"se\ero_slime3.ogg"
>At the same time, the mucus tightens around Luka's penis!
mov %damage_kotei,1
damage 200,220
skillname ""
name "Luka"
>Hyaaa!@> Stop it!\
name ""
name $name
>How does it feel just having more than just your penis teased?@
>Do you still want more? Huh!?\
name ""
skillname "Immoral Feeling"
dwave 1,"se\ero_makituki1.ogg"
skillcount3 3693
>The tentacles on Luka's nipples start slowly massaging him!
mov %damage_kotei,1
damage 200,220
dwave 1,"se\ero_slime3.ogg"
>The mucus swirls around Luka's penis!
mov %damage_kotei,1
damage 200,220
skillname ""
name "Luka"
>Haa... I'm going to come again...\
name ""
name $name
>Hmph. Just come again, then.@
>Spray it out right in front of my eyes, as I watch how pathetic you are.\
name ""
skillname "Immoral Feeling"
dwave 1,"se\ero_makituki1.ogg"
skillcount3 3693
>The tentacles knead Luka's nipples, as if they were dough!
mov %damage_kotei,1
damage 200,220
dwave 1,"se\ero_slime3.ogg"
>The mucus around Luka's penis shrinks in size, squeezing him tightly!
mov %damage_kotei,1
damage 200,220
skillname ""
name "Luka"
>Hyaaa!\
name ""
gosub *syasei1
lsp 700,":a;chara\c_a3_hb4.bmp",0,0
gosub *syasei2
>Unable to endure it, Luka comes again, spraying his semen all over A-3's mucus covered body.\
gosub *clear_sprite
gosub *setwindow_01p
name $name
>All I did was abuse your genitals a little, and you came so much.@
>Just look at all this semen...\
>Aren't you ashamed of yourself!?\
name ""
>Luka hangs his head, ashamed at the site of his semen covering A-3.\
mov %battle,0
mov %hsean,1
mov %2654,%2654+1:if %2654=1 mov %count_koenemy,%count_koenemy+1
if %2654>%count_most mov %count_most,%2654:mov $count_mostname,$name
count 11,4
mov $bad1,"A-3 forced Luka to come with her Immoral Fellatio technique."
goto *c_a3_h



*c_a3_h

mov $bad2,"Luka was squeezed until his death."
if %2654=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku=1 goto *c_a3_hb
name "Luka"
>Ahhh...\
name ""
name $name
>Why are you acting tired?@
>Your wretched desires haven't even started, have they?\
name ""
dwave 1,"se\ero_makituki3.ogg"
cspl 690,699
lsp 700,":a;chara\c_a3_ha1.bmp",0,0:print 10,500
>A-3's tentacles wrap around my body, and hoist me into the air.@
>Like that, her growing tongues wrap around my penis.\
name "Luka"
>Wh...What are you... Ahhh...\
name ""
>My upper body is dipped into her mucus-like body.@
>Like this, the only part of me that I can move are my legs...\
name $name
>What an embarrassing position...@
>But I can easily squeeze your semen this way.\
>Give both your semen and your life to me.@
>You'll be food to satisfy my desires...\
goto *c_a3_hb



*c_a3_hb

name "Luka"
>S...Stop it!@> Ahhh!\
name ""
mov %hseanvoice,1:hseanvoice
>Stuck in this humiliating position, she starts working on me.@
>Her tongue coils around my penis, almost as if she's trying to clean it.\
>The rough tongue trails up and down my shaft, with a short lick across my glans.@
>The slimy feeling of her saliva makes me shiver as she carefully tastes every inch of my penis.\
name "Luka"
>Stop... Ah...\
name ""
>I shake my feet, doing anything I can to try to escape.@
>But it doesn't work...\
name $name
>Hmph... It's pointless to struggle.\
name ""
>Making things even worse, her tentacles coil around my feet, stopping even that form of struggling.@
>Deprived of all resistance, I can only resign myself to being milked...\
name $name
>If I simply licked you, you would come...@
>But I want this to be over with quickly.\
>How about this?@
>Don't struggle, just come quickly...\
name ""
name "Luka"
>Ahhh...!\
name ""
>The change in tongue motion makes me let loose a moan.@
>Her tongue coils around my penis, and starts to stroke me up and down.\
>All the while, her saliva covered tongue still felt like it was licking me.@
>Almost like a soft hand, stroking my penis up and down...\
name $name
>When I was an angel, I was proud of my tongue...@
>No man could last more than 30 seconds.\
>So hurry up and accept it.@
>Just give me your thick semen...\
name ""
name "Luka"
>Hyaaa!\
name ""
>Her tongue motions almost make me feel like I'm being milked.@
>My body jerks back and forth as her tongue squeezes me even tighter.\
>My moans get louder as her tongue movements get even quicker.\
>There's no way I can fight against such intense pleasure...\
name "Luka"
>Ahh... I'm going to come...\
name ""
name $name
>Hurry up and come...@
>Here, I'll make it come faster.\
name ""
mov %hseanvoice,2:hseanvoice
>As if spurred on by my cries, her tongue gets even faster than before.@
>With a final moan, my body jerks as I give in to the climax.\
name "Luka"
>Ahhhhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\c_a3_ha2.bmp",0,0
gosub *syasei2
>My penis pulses, and sprays semen out all over A-3's tongue.@
>Even during my ejaculation, she continues squeezing me, milking out every drop.\
name $name
>I won't leave a single drop...@
>I'll use it all as my nourishment.\
name ""
name "Luka"
>Ah... Urhg...\
name ""
>Her tongue keeps pressing and squeezing me, licking my urethral hole until she was sure nothing was left.\
name $name
>It's still not enough...@
>I'll keep squeezing you, until your male extract is completely gone.\
name ""
>Her tongue's up and down motions continue again.@
>As soon as she licked up the last of my semen, she already started working on the next one...\
name "Luka"
>Stop...!@
>I just came, so...\
name ""
name $name
>Quit acting like a spoiled child...@
>I already told you I'd squeeze out your semen until your death.\
name ""
name "Luka"
>S...St... Ahhh!\
name ""
>Her ruthless tongue stroking continues on, despite my cries.@
>At her mercy, my body spasms as the pleasure takes over my thoughts.\
>If this stimulation continues on, I won't be able to stay sane...@
>And even worse, in this humiliating position I can't even resist.\
name "Luka"
>Ah... Ahhh!\
name ""
name $name
>Don't gasp, just come.@
>Hurry up, let it out!\
name ""
>Her tongue strokes me even faster, not caring about anything but the next ejaculation.@
>She doesn't care about me or anything... Only that if she licks my penis, she can get my semen.\
>The complete humiliation of the act overpowers me as I feel another orgasm coming.\
name "Luka"
>Ahh... I'm going to come again...\
name ""
>I beg her to stop, as I moan about my building orgasm.@
>But my begging is meaningless, for she doesn't stop.\
>Rather, it seems to have encouraged her to finish me off even quicker.\
name $name
>Come on, hurry up.@
>Quit wasting so much of my time...\
name ""
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\c_a3_ha3.bmp",0,0
gosub *syasei2
>I explode, spraying semen all over her face and tongue.@
>That tongue that ruthlessly made me come a second time...\
name "Luka"
>Ah... Aaa...\
name ""
>Coming so quickly for a second time, I'm completely drained of strength.@
>And judging from my fatigue, the amount of vitality I'm losing from each ejaculation seems far from ordinary.\
>If she keeps this up, my life really may be in danger...@
>Is A-3 really planning on milking me to death...?\
name "Luka"
>S...Stop it... Help me...\
name ""
name $name
>There's no point, even if you beg.@> You're fated to become my prey.@
>Even if I kept you here, it would be too troublesome to manage how often I make you come.\
>I'll do this to make you ejaculate consecutively.@
>When I was an angel, I used this tongue technique to toy with men...\
name ""
name "Luka"
>Ahh...?@
>Aiiee!\
name ""
lsp 700,":a;chara\c_a3_ha4.bmp",0,0:print 10,500
>Suddenly, I feel something pressing into my ass.@
>A warm, wet thing slips into my anus.\
>It's a tongue...@
>While she's using one to coil around my penis, another one is inside my ass!\
name $name
>I'll violate your ass with this tongue...@
>Like this, you'll come over and over, quickly.\
>Until your death...\
name ""
name "Luka"
>N...Not that...@
>Please, I'm begging you...\
name ""
>Fear grips my body.@
>She's going to violate my ass with her tongue, and make me ejaculate until my death...\
name $name
>Now then, I'll keep you in a state of orgasm until your death.@
>Give all of your semen to me...\
name ""
name "Luka"
>Stop! Hyaaa!\
name ""
>Finally, the nightmare began for real...@
>Her tongue starts to wriggle in my ass.\
>It goes in and out like a piston, the tip of her tongue pressing against my prostate with each cycle.\
>My body spasms in horrible pleasure as my dignity as a man is shredded.\
name "Luka"
>Hyaa!@>Ahhhh!!\
name ""
>At the same time, her tongue squeezes down on my penis as the stroking continues.\
>Assaulted from the front and back, I helplessly moan and cry out as another orgasm comes blindingly fast.\
name "Luka"
>Ahhhhnnn!\
name ""
gosub *syasei1
lsp 700,":a;chara\c_a3_ha5.bmp",0,0
gosub *syasei2
>I erupt in no time, spraying more semen onto A-3's face.\
name "Luka"
>Stop... Stop this already...\
name ""
name $name
>Just give up...@
>I'm not stopping until you're dried up.\
>You'll keep coming until you die.@
>Meet your death with a smile, knowing you'll be my food.\
name ""
name "Luka"
>Hyaaaaa!!\
name ""
gosub *syasei1:gosub *syasei2
>From that moment, she forces me to come over and over again, without a break between climaxes.@
>My heart and body are quickly worn down until I lose consciousness.\
mov %hseanvoice,0:hseanvoice
>After the final orgasm, as I'm nearing the very end, I heard A-3's words...\
name $name
>More... I need more...@
>It isn't enough... I need more semen...\
name ""
gosub *anten
>.............\
goto *badend



*stein1_start

mov $name,"Promestein"
mov $name2,"Promestein"
mov $lavel,"stein1"
mov $tatie1,"stein_st02"
mov $tatie2,"stein_st22"
mov $tatie3,"stein_st23"
mov $tatie4,"stein_hb0"
mov $haikei,"bg186"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,20000
if %nanido=2 mov %max_enemylife,25000
if %nanido=3 mov %max_enemylife,30000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,0
mov %music,3
mov %tikei,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't escape from Promestein's hold!"
mov $mogaku_anno2,"Luka broke free of Promestein's hold!"
mov $mogaku_anno3,"But, bound by Promestein, Luka can't attack!"
mov $mogaku_sel1,"Haha... Struggle and be finished."
mov $mogaku_sel2,"There's no escape from my magic seaweed..."
mov $mogaku_sel3,"The more you struggle, the tighter it gets..."
mov $mogaku_sel4,"Quit struggling, just give up and come."
mov $mogaku_sel5,"Just surrender... That way, I'll make it feel better."
mov $mogaku_dassyutu1,"Escaping from my bind..."
mov $mogaku_dassyutu2,"It appears you're not called a Hero simply for show."
mov $half_s1,"How are you feeling?"
mov $half_s2,"I'll squeeze the Hero's semen personally."
mov $kiki_s1,"You seem to be at your limit."
mov $kiki_s2,"I'll train your body with pleasure."
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-300
mov %tukix,300
name $name
>This is a perfect opportunity.@> I wanted to try this body in actual combat.\
>It's a special gene I implanted in my own body!\
name ""
dwave 1,"se\ero_slime1.ogg"
>Promestein's clothes start to expand and spread open...@
>It looks like her body itself is bubbling underneath it!\
name "Luka"
>It can't be... She experimented on her own body!?\
name ""
>Not just her fellow angels, but even on herself?\
lsp 700,":a;chara\alice_st81.bmp",-170,50
lsp 701,":a;chara\stein_st02.bmp",160,0:print 10,500
name "Alice"
>What is this?@
>How is the aura of monster magic flowing from your body!?\
name ""
name $name
>Hero, you saw the mixture of angel and monster already, didn't you?@
>My own body is the final product of those experiments.\
name ""
dwave 1,"se\ero_makituki4.ogg"
mov $tatie1,"stein_st21"
csp 701
lsp 700,":a;chara\stein_st21.bmp",0,0:print 10,500
>Promestein's coat rips as the transformed body bursts it open!@
>Strange plant-like organs come off her body, making her look just like a terrifying amalgam of plant monsters...\
name "Luka"
>W...What the!?\
name ""
lsp 700,":a;chara\alice_st77.bmp",-170,50
lsp 701,":a;chara\stein_st21.bmp",160,0:print 10,500
name "Alice"
>S...Seaweed!?\
name ""
name $name
>This is ancient monster seaweed, an extinct life form close to the origin of all monsters.\
>You plebeians may not understand what it means, but I have revived an extinct life form!\
>After experimenting on thousands of monsters, I chose this monster seaweed to be a part of my very body!\
name ""
name "Luka"
>I don't care about any of that!\
name ""
lsp 700,":a;chara\alice_st73.bmp",-170,50:print 10,500
name "Alice"
>Don't be proud about being part seaweed, you fool!\
name ""
csp 701
lsp 700,":a;chara\stein_st21.bmp",0,0:print 10,500
mov %sinkou,1
goto *common_main



*stein1001

add %stack,1
name "Alice"
>Gah... I can't afford to hit Luka by mistake...@
>It's just like she has him held hostage...\
name ""
>With Luka bound, Alice hesitates in attacking...\
mov %hanyo1,1
sub %stack,1
return



*stein1002

name "Luka"
>Guh...@
>She's strong!\
name ""
name $name
>Haha... Now for the finishing blow.@
>Become the prey of this ancient seaweed!\
name ""
mov %aqua,4:mov %aqua_turn,12
mov %aquaiconlock,0:gosub *elm_print
skillname "Tenderness"
dwave 1,"se\ero_makituki3.ogg"
>Innumerable seaweed-like tentacles race toward Luka's body!
gosub *aqua_guard
gosub *face3
name "Luka"
>Eh...?\
name ""
>Free from obstructing thoughts, I evade all of the attacking tentacles.@
>Even without Undine, I had entered a serene state of mind...\
name $name
>It can't be!@> All of the spirits were sealed!\
name ""
name "Luka"
>............\
name ""
>It's true I can't use the power of the spirits themselves...@
>But I still have all of the experience from when we did fight together!\
>Even without Undine, I remember the sensation...@
>The calming of my heart, clearing my mind of unnecessary thoughts...\
gosub *face1
mov %skill01,18
mov %sinkou,3
goto *common_main



*stein1003

gosub *face3
name $name
>How can you move like that, even after I sealed your spirits!?@
>You should be as good as powerless now!\
name ""
skillname "Tenderness"
dwave 1,"se\ero_makituki3.ogg"
>Innumerable seaweed-like tentacles race toward Luka's body!
gosub *aqua_guard
name "Luka"
>..........\
name ""
>Why didn't I notice it before...?@
>If I calm my thoughts like I did before, I can still feel the flow of the world.\
>It's true that with Undine inside me, I could always feel the flow...@
>But if I calm my heart and mind, I can still reach it on my own!\
name $name
>Foolishness!@> It makes no sense!@
>What is going on!?\
name ""
name "Luka"
>My serene state of mind...@> I never lost it to begin with.@
>It was always there... I was just too preoccupied to notice.\
name ""
name $name
>...What are you talking about?@
>Quit babbling!\
name ""
lsp 700,":a;chara\alice_st72.bmp",-170,50
lsp 701,":a;chara\stein_st23.bmp",160,0:print 10,500
name "Alice"
>Hehe... Bound by only what you understand, you're a horrible opponent.\
>His idiotic ways will always confound any calculations you've made!\
name ""
csp 701
gosub *face1
mov %sinkou,4
goto *common_main



*stein1_v

gosub *face3
name $name
>I lost...?@
>Impossible... This can't be!\
name ""
>Promestein loses the will to fight...\
mov %viclose,1:gosub *victory
mov %getexp,200000:gosub *lvup
mov %2355,1
mov %skill01,18
goto *sean0311



*stein1_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Haha... You lost the will to resist.@
>I'll make you into the prey of this seaweed as you desire.\
name ""
goto *stein1_a



*stein1_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *stein1_kousan
if %cmd1=16 goto *stein1_onedari
if %cmd1=17 goto *common_skill
goto *stein1_main



*stein1_alice_skillx

add %stack,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Haa!"
if %ransu=2 mov $sel1,"Eat this!"
if %ransu=3 mov $sel1,"Hya!"
name "Alice"
eng $sel1:$sel6\
name ""
>Alice attacks!
dwave 1,"se\dageki.ogg"
rnd2 %damage,300,350:gosub *alice_enemylife2
if %enemylife=0 mov %count_alice1,1:sub %stack,1:return *stein1_v
if %sinkou>1 sub %stack,1:return
lsp 700,":a;chara\alice_st72.bmp",-170,50
lsp 701,":a;chara\stein_st21.bmp",160,0:print 10,500
name "Luka"
>Alice's attack hit her...?\
name ""
>I thought monsters couldn't damage angels...?\
name "Alice"
>I knew it.@
>With your present body, my attacks seem to be able to land.\
>Burdening yourself with the body of a monster, and creating your own weakpoint...@
>It looks like your great experiment was a huge failure.\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50:print 10,500
name $name
>Haha... You think so?@
>Why do you think I chose an ancient, primitive seaweed gene instead of a powerful monster's?\
>Raw physical power was not a factor...@
>You should look deeper, into the roots of why!\
name ""
name "Alice"
>Professor Seaweed, huh?@
>Well whatever, first of all we'll just beat you until you're unable to stand!\
name ""
mov %sinkou,2
csp 701
gosub *face1
sub %stack,1
return



*stein1_a

if %kousan=0 && %kousoku=0 gosub *stein1_alice_skillx
if %kousan=0 && %kousoku>0 && %hanyo1=0 gosub *stein1001
if %mylife<700 && %kousoku=0 && %sinkou=2 goto *stein1002
if %sinkou=3 goto *stein1003
if %sinkou=4 gosub *stein1_el1:goto *common_main
if %kousoku=1 rnd2 %ransu,1,2
if %kousoku=1 && %ransu=1 gosub *stein1_a6:goto *common_main
if %kousoku=1 && %ransu=2 gosub *stein1_a7:goto *common_main
if %hanyo6=1 && %bougyo=1 && %aqua>0 gosub *stein1_a5m:goto *common_main
if %hanyo6=1 gosub *stein1_a5:goto *common_main
rnd2 %ransu,1,5
if %ransu=1 gosub *stein1_a1:goto *common_main
if %ransu=2 gosub *stein1_a2:goto *common_main
if %ransu=3 gosub *stein1_a3:goto *common_main
if %ransu=4 gosub *stein1_a4:goto *common_main
if %ransu=5 && %sinkou=5 && %owaza_count3a>5 && %enemy_wind=0 gosub *stein1_el1:goto *common_main
skip -6



*stein1_el1

add %stack,1
mov %owaza_count3a,0
name $name
>Come, Zylphe!\
name ""
skillname "Wind Spirit Summon"
mov %enemy_wind,2
mov %kaihi_el,50
mov %hanyo6,1
dwave 2,"se\wind2.ogg"
lsp2 0,":a;chara\zylphe_st02.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *enemy_elm_print
>Promestein summons a spirit of wind!\
skillname ""
if %sinkou=5 sub %stack,1:return
name $name
>Haha... How about this?@
>You should know most of all the fear that the spirits can cause...\
name ""
>The summoned spirit drastically increased Promestein's speed...@
>But...\
name "Luka"
>...........\
name ""
>Her blood thirst is still pouring out of her, making her movements easy to read.@
>She's about to perform a powerful move...\
mov %sinkou,5
sub %stack,1
return



*stein1_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I don't mind a little in my mouth..."
if %ransu=2 mov $sel1,"My licking technique will finish you quickly."
if %ransu=3 mov $sel1,"I'll drink it all down... Now come on, come."
name $name
eng $sel1:$sel6\
name ""
skillname "Warmth"
dwave 1,"se\ero_buchu3.ogg"
>Promestein sucks on Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<80 gosub *aqua_guard:sub %stack,1:return
skillcount3 3694
if %nanido<2 damage 400,500
if %nanido=2 damage 500,600
if %nanido=3 damage 600,700
skillname ""
if %mylife=0 sub %stack,1:return *stein1_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*stein1_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll squeeze out your semen with my breasts..."
if %ransu=2 mov $sel1,"This will give you supreme bliss..."
if %ransu=3 mov $sel1,"My breasts will make you quickly ejaculate..."
name $name
eng $sel1:$sel6\
name ""
skillname "Softness"
dwave 1,"se\ero_sigoki1.ogg"
>Promestein sandwiches Luka's penis between her soft breasts!
rnd2 %ransu,0,99:if %aqua>0 && %ransu<80 gosub *aqua_guard:sub %stack,1:return
skillcount3 3695
if %nanido<2 damage 420,520
if %nanido=2 damage 520,620
if %nanido=3 damage 620,720
skillname ""
if %mylife=0 sub %stack,1:return *stein1_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*stein1_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Savor the seaweed and mucus-like sensation..."
if %ransu=2 mov $sel1,"Enjoy the sensation of this tentacle..."
if %ransu=3 mov $sel1,"This tentacle will lead you to a pathetic ejaculation..."
name $name
eng $sel1:$sel6\
name ""
skillname "Pressure"
dwave 1,"se\ero_makituki1.ogg"
>A seaweed-like tentacle clings to Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<80 gosub *aqua_guard:sub %stack,1:return
skillcount3 3696
if %nanido<2 damage 440,540
if %nanido=2 damage 540,640
if %nanido=3 damage 640,740
skillname ""
if %mylife=0 sub %stack,1:return *stein1_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*stein1_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Accept the gift of pleasure, and come..."
if %ransu=2 mov $sel1,"I'll suck out your energy..."
if %ransu=3 mov $sel1,"I'll absorb your semen... You can come inside too, you know?"
name $name
eng $sel1:$sel6\
name ""
skillname "Suction"
dwave 1,"se\ero_makituki1.ogg"
>The hole in Promestein's arm sucks in Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<80 gosub *aqua_guard:sub %stack,1:return
skillcount3 3697
dwave 2,"se\ero_chupa6.ogg"
>It sucks on Luka's penis as if it was a mouth!
if %nanido<2 damage 300,400
if %nanido=2 damage 350,450
if %nanido=3 damage 400,500
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
dwave 1,"se\ero_chupa6.ogg"
>It sucks even harder, as if it was a vacuum!
if %nanido<2 damage 300,400
if %nanido=2 damage 350,450
if %nanido=3 damage 400,500
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *stein1_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*stein1_a5m

add %stack,1
mov %hanyo6,0
if %kousan=2 skip 8
name $name
if %first_sel3=1 skip 4
>First I'll take away your freedom...@
>Then I'll take my time to deal with you...\
skip 2
>This time, I'll deal with you...\
name ""
skillname "Tenderness"
dwave 1,"se\ero_makituki3.ogg"
>Countless strands of seaweed wrap around Luka's body!
delay 1000
dwave 1,"se\miss.ogg"
>But Luka nimbly dodges!\
skillname ""
if %first_sel3=1 sub %stack,1:return
gosub *face3
name $name
>What the...!?@
>How can you react faster than me, when I have the spirit of wind!?\
name ""
name "Luka"
>Promestein, are you able to hear the voice of the wind...?\
name ""
name $name
>What are you babbling about?@
>The wind has no voice!\
name ""
name "Luka"
>Then you'll never manage to use the spirit.@
>The voice of the wind is telling me it wants to rage around more...\
name ""
name $name
>Guh... Quit it with the nonsense!\
name ""
>She's only using them as tools, not really listening to them...@
>If it's like that, she'll never be able to really draw their power!\
mov %first_sel3,1
gosub *face1
sub %stack,1
return



*stein1_a5

add %stack,1
mov %hanyo6,0
if %kousan=2 skip 5
name $name
>First I'll take away your freedom...@
>Then I'll take my time to deal with you...\
name ""
skillname "Tenderness"
dwave 1,"se\ero_makituki3.ogg"
>Countless strands of seaweed wrap around Luka's body!
skillcount3 3698
if %nanido<2 damage 400,500
if %nanido=2 damage 450,550
if %nanido=3 damage 500,600
mov %kousoku,1:gosub *status_print
>Luka has been bound by Promestein!\
skillname ""
if %mylife=0 sub %stack,1:return *stein1_h5
name $name
>I'll give you a good taste...@
>This pleasure will wrack your whole body...\
name ""
mov %first_sel1,1
if %nanido<2 mov %genmogaku,99
if %nanido=2 mov %genmogaku,99
if %nanido=3 mov %genmogaku,99
sub %stack,1
return



*stein1_a6

add %stack,1
>Luka has been bound by Promestein...\
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Have a taste of seaweed designed to pleasure a man..."
if %ransu=2 mov $sel1,"This seaweed will squeeze you until you're dry..."
if %ransu=3 mov $sel1,"My cute seaweed wants your semen..."
if %ransu=4 mov $sel1,"I'll caress your whole body like this, until you come..."
name $name
eng $sel1:$sel6\
name ""
skillname "Tenderness"
skillcount3 3698
lsp 690,":a;chara\stein_ct11.bmp",0,0:print 10,500
dwave 1,"se\ero_makituki1.ogg"
>The seaweed crawls around Luka's body, caressing him all over!
if %nanido<2 damage 300,400
if %nanido=2 damage 350,450
if %nanido=3 damage 400,500
dwave 1,"se\ero_makituki1.ogg"
>The seaweed wraps around his penis, tightening around him!
if %nanido<2 damage 300,400
if %nanido=2 damage 350,450
if %nanido=3 damage 400,500
skillname ""
if %mylife=0 sub %stack,1:return *stein1_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*stein1_a7

add %stack,1
>Luka is bound by Promestein...\
name $name
>These tentacles were designed to give maximum pleasure to a man...@
>Have a taste of their beauty!\
name ""
skillname "Temperance"
skillcount3 3699
lsp 700,":a;chara\stein_hb5.bmp",0,0:print 10,500
dwave 1,"se\ero_makituki1.ogg"
>Numerous seaweed-like tentacles reach out for Luka's body!
if %nanido<2 damage 300,400
if %nanido=2 damage 350,450
if %nanido=3 damage 400,500
dwave 1,"se\ero_makituki1.ogg"
>They violently crawl all over Luka's body!
if %nanido<2 damage 300,400
if %nanido=2 damage 350,450
if %nanido=3 damage 400,500
skillname ""
if %mylife=0 sub %stack,1:return *stein1_h6
name $name
>Moan, pant, and writhe in ecstasy!@
>I'll finish you off, just like this!\
name ""
skillname "Temperance"
skillcount3 3699
lsp 690,":a;chara\stein_ct11.bmp",0,0:print 10,500
dwave 1,"se\ero_makituki1.ogg"
>The seaweed-like tentacles coil around Luka's penis, and squeeze!
if %nanido<2 damage 300,400
if %nanido=2 damage 350,450
if %nanido=3 damage 400,500
dwave 1,"se\ero_makituki1.ogg"
>They focus on the glans of Luka's penis!
if %nanido<2 damage 300,400
if %nanido=2 damage 350,450
if %nanido=3 damage 400,500
dwave 1,"se\ero_makituki1.ogg"
>Wrapped around his penis, the stimulation relentlessly assaults Luka!
if %nanido<2 damage 300,400
if %nanido=2 damage 350,450
if %nanido=3 damage 400,500
skillname ""
if %mylife=0 sub %stack,1:return *stein1_h6
sub %stack,1
goto *stein1_a8



*stein1_a8

add %stack,1
>Luka is being bound by Promestein...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Having your body caressed by seaweed is amazing, isn't' it?":mov $sel2,"The monster seaweed caresses Luka all over his body!"
if %ransu=2 mov $sel1,"Moan like the pathetic man you are!":mov $sel2,"Countless strands of seaweed wind around Luka's penis!"
if %ransu=3 mov $sel1,"Haha, I'll focus on the tip...":mov $sel2,"The monster seaweed squeezes especially hard around the tip of Luka's penis!"
if %ransu=4 mov $sel1,"This plant loves male genitals...":mov $sel2,"The monster seaweed tightens around Luka's penis!"
if %ransu=5 mov $sel1,"Writhe in pleasure as it plays with you!":mov $sel2,"The seaweed around Luka's penis moves, stroking his penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Temperance"
skillcount3 3699
dwave 1,"se\ero_makituki1.ogg"
eng $sel2:$sel6
if %nanido<2 damage 300,400
if %nanido=2 damage 350,450
if %nanido=3 damage 400,500
skillname ""
if %mylife=0 sub %stack,1:return *stein1_h6
sub %stack,1
goto *stein1_a8



*stein1_onedari

mov $list1,"Warmth"
if %3694>0 mov %list_num1,1
mov $list2,"Softness"
if %3695>0 mov %list_num2,1
mov $list3,"Pressure"
if %3696>0 mov %list_num3,1
mov $list4,"Suction"
if %3697>0 mov %list_num4,1
mov $list5,"Tenderness"
if %3698>0 mov %list_num5,1
mov $list6,"Temperance"
if %3699>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *stein1_onedari1
if %cmd1=12 goto *stein1_onedari2
if %cmd1=13 goto *stein1_onedari3
if %cmd1=14 goto *stein1_onedari4
if %cmd1=15 goto *stein1_onedari5
if %cmd1=16 goto *stein1_onedari6
if %cmd1=-1 goto *stein1_main
goto *stein1_onedari



*stein1_onedari1

gosub *onedari_syori
name $name
>You want to finish in my mouth? How foolish...\
name ""
gosub *stein1_a1
skip -1



*stein1_onedari2

gosub *onedari_syori
name $name
>You want to finish on my chest? How foolish...\
name ""
gosub *stein1_a2
skip -1



*stein1_onedari3

gosub *onedari_syori
name $name
>You want to be finished by my tentacles? How foolish...\
name ""
gosub *stein1_a3
skip -1



*stein1_onedari4

gosub *onedari_syori
name $name
>You want to be finished by my tentacles? How foolish...\
name ""
gosub *stein1_a4
skip -1



*stein1_onedari5

gosub *onedari_syori
name $name
>You want to be overrun by my tentacles? How foolish...\
name ""
if %kousoku=0 gosub *stein1_a5
gosub *stein1_a6
skip -1



*stein1_onedari6

gosub *onedari_syori
name $name
>You want your penis covered in seaweed? How foolish...\
name ""
if %kousoku=0 gosub *stein1_a5
gosub *stein1_a7
skip -1



*stein1_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\stein_bk11.bmp",0,0
gosub *syasei2
>As Promestein sucks on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2655,%2655+1:if %2655=1 mov %count_koenemy,%count_koenemy+1
if %2655>%count_most mov %count_most,%2655:mov $count_mostname,$name
count 4,11
mov $bad1,"Promestein forced Luka to come with her mouth."
gosub *face2
name $name
>Nnn... Already?@
>How foolish... Now you're finished.\
name ""
goto *stein1_h



*stein1_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\stein_bk12.bmp",0,0
gosub *syasei2
>As Promestein squeezes Luka's penis between her soft breasts, he comes, covering her chest in semen.\
mov %viclose,1:gosub *lose
mov %2655,%2655+1:if %2655=1 mov %count_koenemy,%count_koenemy+1
if %2655>%count_most mov %count_most,%2655:mov $count_mostname,$name
count 7,11
mov $bad1,"Promestein forced Luka to come with her breasts."
gosub *face2
name $name
>Haha... Came already?@
>How foolish... Now you're finished.\
name ""
goto *stein1_h



*stein1_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\stein_bk14.bmp",0,0
gosub *syasei2
>As the monster seaweed caresses Luka's penis, he comes, covering it with semen.\
mov %viclose,1:gosub *lose
mov %2655,%2655+1:if %2655=1 mov %count_koenemy,%count_koenemy+1
if %2655>%count_most mov %count_most,%2655:mov $count_mostname,$name
count 12,11
mov $bad1,"Promestein used her monster seaweed to force Luka to come."
gosub *face2
name $name
>Haha... Came already?@
>How foolish... Now you're finished.\
name ""
goto *stein1_h



*stein1_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\stein_bk13.bmp",0,0
gosub *syasei2
>As the strange energy absorbing seaweed sucks on Luka's penis, he comes, covering it with semen.\
mov %viclose,1:gosub *lose
mov %2655,%2655+1:if %2655=1 mov %count_koenemy,%count_koenemy+1
if %2655>%count_most mov %count_most,%2655:mov $count_mostname,$name
count 12,11
mov $bad1,"Promestein forced Luka to come with her energy absorbing seaweed."
gosub *face2
name $name
>Haha... Came already?@
>How foolish... Now you're finished.\
name ""
goto *stein1_h



*stein1_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\stein_ct12.bmp",0,0
gosub *syasei2
>Completely covered in monster seaweed, Luka comes, spraying his semen over it.\
mov %viclose,1:gosub *lose
mov %2655,%2655+1:if %2655=1 mov %count_koenemy,%count_koenemy+1
if %2655>%count_most mov %count_most,%2655:mov $count_mostname,$name
count 12,11
mov $bad1,"Promestein forced Luka to come using her monster seaweed."
gosub *face2
name $name
>Haha... Came already?@
>Now then, shall I use this to continue squeezing out your semen...?\
name ""
goto *stein1_h



*stein1_h6

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\stein_ct12.bmp",0,0
gosub *syasei2
>Assaulting Luka's penis with her numerous seaweed-like tentacles, Promestein forces Luka to an orgasm.\
mov %viclose,1:gosub *lose
mov %2655,%2655+1:if %2655=1 mov %count_koenemy,%count_koenemy+1
if %2655>%count_most mov %count_most,%2655:mov $count_mostname,$name
count 12,11
mov $bad1,"Promestein forces Luka to come with her monster seaweed."
gosub *face2
name $name
>Haha... Came already?@
>Now then, shall I use this to continue squeezing out your semen...?\
name ""
goto *stein1_h



*stein1_h

mov %skill01,17
mov $bad2,"Preyed on by the ancient monster seaweed, Luka was turned into mere nutrients..."
if %2655=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 goto *stein1_hb
name "Luka"
>Ahhh...\
name ""
name $name
>I seem to have used some physical strength up...@
>The poor energy efficiency will have to be rectified in the future.\
name ""
>Promestein looks down at me with cold eyes.\
name $name
>I'll give you a good taste of this body.@
>I'll just take your semen in compensation.\
>Haha... It's not a bad deal, is it?\
name ""
name "Luka"
>I don't want... Urhg!\
name ""
>Innumerable plants coil around my body, sealing off my movements.\
dwave 1,"se\ero_makituki2.ogg"
cspl 690,699
lsp 700,":a;chara\stein_hb1.bmp",0,0:print 10,500
>Promestein's left arm is a strange plant-like organ.\
>It's gaping center looks like some sort of sultry oral cavity.@
>The meat and bumps inside of it squirm and wriggle around.\
>The use of this organ is very clear...@
>This thing is going to feed on me...\
goto *stein1_hb



*stein1_hb

name "Luka"
>S...Stop this...\
name ""
name $name
>This semen squeezing organ is the highest of qualities...@
>It's from an ancient plant that got its sustenance from captured males.\
>It felt so amazing, that all human males in a wide area became its prey.@
>Due to its extreme consumption, all of its available prey was wiped out in a short time.\
>The only reason it went extinct is because all of the available prey delivered themselves to it at once.\
>I'll show you why...\
name ""
name "Luka"
>Ahh...\
name ""
>I can't take my eyes off the bizarre organ.@
>Its interior hole contracts and expands as it comes closer, giving off the promise of devilish pleasure.\
>A pleasure so powerful, its prey willingly delivered themselves to their own destruction.@
>The ruinous desire to experience it starts to well up in me...\
name $name
>Hehe... Do you want to taste it?@
>I'll turn you into its prey, just as you want.\
>You should be honored, for you'll have the privilege of experiencing this ancient monster plant.@
>No other human male alive has had this experience...\
name ""
name "Luka"
>Haa... S...Stop...\
name ""
>I struggle, but I can't escape.@
>The plant organ slowly gets closer and closer...@> My eyes go wide as I brace myself for the sensations to come.\
>Somewhere deep in my heart, I'm eagerly looking forward to the pleasure about to come.\
name "Luka"
>Ahhh...\
name ""
mov %hseanwave,12:hseanwave
cspl 690,699
lsp 690,":a;chara\stein_ct01.bmp",0,0
lsp 700,":a;chara\stein_hb2.bmp",0,0:print 10,500
>At last, my penis is sucked into the strange organ.@
>The pleasure and disgust all hit at the same time.\
name "Luka"
>Ahhhhh!!\
name ""
>My penis is enveloped all at once by a strange softness.@
>The slimy walls rub against me as it sucks me deeper inside.\
>The innumerable folds run across my shaft as if they were fingers, lovingly caressing me.\
>At the same time, the whole organ itself is slightly vibrating.@
>The combination of stimuli cause my lower body to start shaking right away.\
name "Luka"
>Th...This is...@>Haaa...\
name ""
name $name
>Hahaha... Already moaning in pleasure?@
>This ancient plant is as amazing as I researched...\
name ""
>A smile of superiority crosses Promestein as she watches me.@
>As the wriggling motions get even more intense, I sigh as my body loses energy.\
>I can't even think about resisting anymore... Just about devouring this pleasure.\
name "Luka"
>Ah... Haaa...\
name ""
name $name
>This ancient plant starts by capturing and sucking on the prey's penis.@
>After that, most males cannot resist any longer.\
>That's what you're tasting now...@
>How does it feel?@>The capturing process of a plant so potent it caused itself to go extinct?\
name ""
name "Luka"
>Ha...Ah...\
name ""
>I can't even respond to her question with anything but a moan.@
>My entire being is focused on the ecstasy, my reason and thoughts themselves almost vanishing.\
name $name
>Haha... You can't even speak any longer.\
name ""
>Promestein stares at me, reveling in her dominance.\
>A dull ache quickly spreads from my penis to the rest of my body, demanding to be released into this organ.\
name "Luka"
>Ahh... Coming...\
name ""
name $name
>Sheesh, already?@
>Alright then, let it out... I'll absorb it all.\
name ""
name "Luka"
>Ahhh...\
name ""
>Succumbing to the pleasure, my body goes numb as I reach a powerful orgasm.\
gosub *syasei1
lsp 690,":a;chara\stein_ct02.bmp",0,0
lsp 700,":a;chara\stein_hb3.bmp",0,0
gosub *syasei2
>I explode inside of it, pouring my semen into its sucking hole.@
>All during my ejaculation, it continues sucking on me, skillfully consuming everything I shoot into it.\
name "Luka"
>Haaa...\
name ""
>I fall back and sigh, able to climax with everything I had into this thing's mouth.\
name $name
>Hehehe... Semen obtained.@
>Now begins the merciless semen extraction...\
name ""
name "Luka"
>Ahhhh!\
name ""
mov %hseanwave,13:hseanwave
>The squirming walls suddenly increase to an insane speed.@
>The stimulation suddenly turns from one of pure pleasure, into one designed to quickly force a man to ejaculate.\
>My lower body quickly goes numb, as I feel myself unconsciously pushing up with my waist at the source of the ecstasy.\
name "Luka"
>Aiie... It feels good...@> It feels so good!\
name ""
>The mad pleasure confuses my thoughts, and drives me to another climax in seconds.\
gosub *syasei1
lsp 690,":a;chara\stein_ct03.bmp",0,0
lsp 700,":a;chara\stein_hb4.bmp",0,0
gosub *syasei2
>I explode inside it again, spraying my semen into its eager hole.\
name $name
>Hehehe... It's recognized you as prey.@
>The final step will begin in a moment.\
name ""
name "Luka"
>Eh...?@> Ahhhh!\
name ""
cspl 690,699
lsp 700,":a;chara\stein_hb5.bmp",0,0:print 10,500
>Suddenly, numerous plant-like tentacles all wrap around my body!@
>In seconds, I'm completely covered... As if they were trying to eat my very body itself!\
name "Luka"
>W...What is this... Help...@
>Ahhh!\
name ""
name $name
>The final process is predation while it consumes your semen.@
>Like this, it can acquire both the energy from your semen and the meat of your body.\
>Once this stage starts, most males don't get away...@
>It really is a miserable sight.\
name ""
name "Luka"
>Hyaaa!\
name ""
gosub *syasei1
lsp 690,":a;chara\stein_ct04.bmp",0,0
gosub *syasei2
>I come again, spraying more semen right into the organ's mouth.@
>Even as it's feeding on my body, I still came...\
>And even after I come, it's still feeding on me...\
name $name
>Hehe... How does it feel coming while you're unable to move?@
>I said it was the last process, but this final step takes a long time...\
>As it exploits your semen, it's not possible for you to die.@
>It will take several months before your body is fully digested and consumed.\
>Isn't the feeding habits of this ancient plant simply amazing?@
>You'll have a few months to experience everything it has to offer.\
name ""
name "Luka"
>Ahh...\
name ""
>The plants squirm around me as they feed on me.@
>Little by little, it's dissolving my body to digest it...\
>But it doesn't hurt at all...@
>It's an ecstasy I can literally melt away in.\
name "Luka"
>Haa... It feels so good...\
name ""
gosub *syasei1:gosub *syasei2
>I come again, overcome by the sensations of being preyed on.@
>For the time being, it doesn't matter how much I come... It won't digest me any faster.\
>It will slowly feast on me for the next several months...@
>Until in the end, even my heart and soul are absorbed.\
name $name
>But don't worry, your death won't be meaningless.@
>I'll observe the digestion process, and will be provided with excellent research data.\
>And besides... Isn't it a long dreamed of way for a man to die?@
>You have the privilege of being preyed on by the finest of specimens.\
name ""
name "Luka"
>Ahh...@> Help... Help...\
name ""
>Even feeling horrified, I can't escape from the pleasure that's assaulting me.@
>Terrified of my fate, I continue to climax.\
name "Luka"
>Ahhh...\
name ""
gosub *syasei1:gosub *syasei2
>After a few more ejaculations, I accept my fate.@
>I'll be digested over a few months, and become this plant's nourishment.\
>I couldn't help but accept it, despite my feelings of despair.\
mov %hseanwave,0:hseanwave
gosub *anten
>I accept my life as prey, and enjoy my last pleasure filled months.@
>Meeting my last miserable moments, I end my life as simple prey...\
>...........\
goto *badend



*ranael_start

mov $name,"Archangel Ranael"
mov $name2,"Ranael"
mov $lavel,"ranael"
mov $tatie1,"ranael_st01"
mov $tatie2,"ranael_st32"
mov $tatie3,"ranael_st33"
mov $tatie4,"ranael_h0"
mov $haikei,"bg187"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,20000
if %nanido=2 mov %max_enemylife,23000
if %nanido=3 mov %max_enemylife,26000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,0
mov %music,9
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't push her away!"
mov $mogaku_anno2,"Luka forces Ranael off him!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"It's useless... You can't escape."
mov $mogaku_sel2,"It's useless... You can't escape."
mov $mogaku_sel3,"It's useless... You can't escape."
mov $mogaku_sel4,"It's useless... You can't escape."
mov $mogaku_sel5,"It's useless... You can't escape."
mov $mogaku_dassyutu1,"You were almost in a world of pleasure..."
mov $mogaku_dassyutu2,"Wouldn't it be easier to just accept it?"
mov $half_s1,"Ahaha... What's wrong?"
mov $half_s2,"You're about to come..."
mov $kiki_s1,"Almost at your limit? How do you want me to make you come?"
mov $kiki_s2,"Quickly? Slowly? Or... In an instant?"
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,4
mov %owaza_count3a,4
mov $name,"Ranael"
name "Luka"
>Did you destroy this village?\
name ""
name $name
>Yes... This was my work.@
>It's an Archangel's duty to punish sinners.\
name ""
>The angel, dressed in white, lets out a cruel laugh.\
name $name
>I inflicted the wrath of the Heavens on these villagers.@
dwave 1,"se\ero_makituki1.ogg"
lsp 700,":a;chara\ranael_st11.bmp",0,0:print 10,500
>I tightened this tentacle around their necks, until they ceased breathing...\
dwave 2,"se\ero_pyu2.ogg"
lsp 700,":a;chara\ranael_st12.bmp",0,0:print 10,500
>I swallowed some with this arm...@
>And dissolved them away, as they writhed in agony...\
name ""
name "Luka"
>..........\
name ""
isskip %sinkouonoff
if %sinkouonoff=1 skip 2
dwave 1,"se\kodou.ogg":wait 1000
dwave 2,"se\kodou.ogg"
>My heart is beating so hard in my chest, it's painful.@
>I feel the temperature in my body itself rising, as if my body itself is burning.\
isskip %sinkouonoff
if %sinkouonoff=1 skip 2
dwave 1,"se\kodou.ogg":wait 1000
>My breathing gets quicker and quicker, where even my throat can't keep up.@
>My right hand, holding my sword, feels searing hot.\
lsp 700,":a;chara\ranael_st21.bmp",0,0:print 10,500
name $name
>The villagers here were quite interesting.@
>They kept begging and pleading for Ilias to help them.\
dwave 1,"se\ero_makituki2.ogg"
lsp 700,":a;chara\ranael_st22.bmp",0,0:print 10,500
>All while I slowly squeezed them to death...@
dwave 1,"se\ero_makituki3.ogg"
lsp 700,":a;chara\ranael_st23.bmp",0,0:print 10,500
>And crushed their necks with these tentacles.\
lsp 700,":a;chara\ranael_st31.bmp",0,0:print 10,500
>Clinging to Ilias all the way to the end... So pathetic.\
>Still begging and pleading to the very person who ordered their deaths!\
name ""
isskip %sinkouonoff
if %sinkouonoff=1 skip 3
dwave 1,"se\kodou.ogg":wait 500
dwave 2,"se\kodou.ogg":wait 500
dwave 3,"se\kodou.ogg"
>My quick breathing, bursting heart, and burning body...@
>It feels like my body itself is overheating.\
isskip %sinkouonoff
if %sinkouonoff=1 skip 7
dwave 1,"se\kodou.ogg":wait 300
dwave 2,"se\kodou.ogg":wait 300
dwave 3,"se\kodou.ogg":wait 300
dwave 4,"se\kodou.ogg":wait 100
dwave 5,"se\kodou.ogg":wait 100
dwave 6,"se\kodou.ogg":wait 100
dwave 7,"se\kodou.ogg"
name "Luka"
>........!!!\
name ""
>The next instant, something unbelievable happens.\
dwave 1,"se\power.ogg"
>My ring burns searing hot.@
dwave 2,"se\break.ogg"
>And then shatters!\
name $name
>Ahaha... You look so angry.@
>Looks like your special serene state of mind that I heard about won't help you now!\
name ""
>All at once the burning sensation chills.@
>The intense heat that was searing me before turns into a gentle aura that envelopes my body.\
name $name
>You'll never be able to defeat an Archangel with your heart so...@
lsp 700,":a;chara\ranael_st33.bmp",0,0:print 10,500
>...Huh?\
name ""
dwave 1,"se\fire4.ogg"
mov %ruka_tati,2
mov %skill01,19
mov %skill02,0
mov %skill03,0
mov %skill04,0
mov %skill05,0
>The soft aura coalesces on my body, and starts to take shape.@
>A giant wing of light appears from my back.\
name $name
>What is that!?@
>Why does a human have an angel's power!?\
name ""
bgm "bgm\ruka.ogg"
name "Luka"
>...Ranael.@> You will fall here.@
>I won't let you do anything like this to anyone else, ever again!\
name ""
mov $tatie1,"ranael_st31"
lsp 700,":a;chara\ranael_st31.bmp",0,0:print 10,500
name $name
>Hmph...@>Arrogant human!@
>Your feeble abilities pale in the face of an Archangel's might!\
name ""
mov %sinkou,1
goto *common_main



*ranael001

name $name
>Wh...What is this power!?@
>Are you really human!?\
name ""
name "Luka"
>What about you?@>Are you really an angel!?@
>You robbed people of their lives as they prayed to the Heavens!\
>Yet you still consider yourself a messenger of that Heaven!?\
name ""
mov %sinkou,2
goto *ranael_a



*ranael_v

gosub *face3
name $name
>What... Is that power...?@
>Why does Ilias... Remain silent...?\
name ""
dwave 1,"se\bun.ogg"
csp 700:print 99,1000,"system\breakup.dll/lrB"
>Ranael fades away into particles, then vanishes!\
mov $name,"Archangel Ranael"
mov %viclose,1:gosub *victory
mov %getexp,200000:gosub *lvup
mov %2357,1
goto *sean0312



*ranael_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Hehehe... After all that raging, you surrender anyway?\
>Wishing to be raped by the one that destroyed your very home... How delightfully perverted.\
name ""
goto *ranael_a



*ranael_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *ranael_kousan
if %cmd1=16 goto *ranael_onedari
if %cmd1=17 goto *common_skill
goto *ranael_main



*ranael_a

if %before_action>29 && %before_action<34 && %kousoku=0 && %sinkou=1 goto *ranael001
if %hanyo6=1 && %bougyo=1 gosub *ranael_a9:goto *common_main
if %hanyo6=1 && %bougyo=0 gosub *ranael_a10:goto *common_main
if %kousoku=1 gosub *ranael_a6:goto *common_main
rnd2 %ransu,1,6
if %ransu=1 gosub *ranael_a1:goto *common_main
if %ransu=2 gosub *ranael_a2:goto *common_main
if %ransu=3 gosub *ranael_a3:goto *common_main
if %ransu=4 gosub *ranael_a4:goto *common_main
if %ransu=5 && %owaza_count1a>5 gosub *ranael_a5:goto *common_main
if %ransu=6 && %owaza_count3a>5 gosub *ranael_a8:goto *common_main
skip -7



*ranael_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll squeeze you with this tentacle!"
if %ransu=2 mov $sel1,"Hurry up and give your semen to this tentacle!"
if %ransu=3 mov $sel1,"No matter the man, they will all come in this tentacle!"
name $name
eng $sel1:$sel6\
name ""
skillname "Drain Vine"
dwave 1,"se\ero_chupa6.ogg"
>Ranael's tentacle sucks hard on Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<10 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3700
if %nanido<2 damage 250,270
if %nanido=2 damage 280,300
if %nanido=3 damage 310,340
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *ranael_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*ranael_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'm going to eat you just like this..."
if %ransu=2 mov $sel1,"I'll gently chew and swallow you..."
if %ransu=3 mov $sel1,"I'll eat you just like you were an insect..."
name $name
eng $sel1:$sel6\
name ""
skillname "Fine Melody"
dwave 1,"se\ero_makituki2.ogg"
>Ranael's venus flytrap bites down on Luka's body!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<10 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3701
>Dripping with saliva, it chews on his body!
if %nanido<2 damage 260,290
if %nanido=2 damage 290,320
if %nanido=3 damage 320,350
skillname ""
if %mylife=0 sub %stack,1:return *ranael_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*ranael_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My hair gives the finest of pleasures..."
if %ransu=2 mov $sel1,"Let these children of mine slurp up your semen..."
if %ransu=3 mov $sel1,"Being devoured by snakes is an appropriate end to a sinner..."
name $name
eng $sel1:$sel6\
name ""
skillname "Medusa Hair"
dwave 1,"se\ero_makituki1.ogg"
>Ranael's snake hair wraps all around Luka's body!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<10 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3702
if %nanido<2 damage 200,220
if %nanido=2 damage 215,235
if %nanido=3 damage 230,250
dwave 1,"se\ero_makituki1.ogg"
>The snake hair races toward Luka's penis, coiling around his penis!
if %nanido<2 damage 200,220
if %nanido=2 damage 215,235
if %nanido=3 damage 230,250
skillname ""
if %mylife=0 sub %stack,1:return *ranael_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*ranael_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"These tentacles will carefully squeeze you dry!"
if %ransu=2 mov $sel1,"I know just where you want these... Hehe."
if %ransu=3 mov $sel1,"It's humiliating for a man to be toyed with like this..."
name $name
eng $sel1:$sel6\
name ""
skillname "Menacing Caress"
dwave 1,"se\ero_makituki2.ogg"
>Ranael's soft tentacles caress Luka's body!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<10 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,70
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3703
if %nanido<2 damage 200,220
if %nanido=2 damage 210,230
if %nanido=3 damage 220,240
dwave 1,"se\ero_makituki2.ogg"
>The tentacles race toward Luka's penis, and coil around it!
if %nanido<2 damage 200,220
if %nanido=2 damage 210,230
if %nanido=3 damage 220,240
dwave 1,"se\ero_makituki2.ogg"
>Wound around his penis, they tighten!
if %nanido<2 damage 200,220
if %nanido=2 damage 210,230
if %nanido=3 damage 220,240
skillname ""
if %mylife=0 sub %stack,1:return *ranael_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*ranael_a5

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 8
name $name
if %first_sel1=1 skip 3
>I'll cook you soon...@
skip 2
>I'll cook you this time...@
>You want to end this quickly too, don't you?\
name ""
skillname "Lean"
eng "Ranael leans on top of Luka, sealing off his movements!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<10 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>Luka has been bound by Ranael!\
skillname ""
if %kousan=2 sub %stack,1:return
name $name
if %first_sel1=1 skip 3
>I'll violate you like this.@
skip 2
>This time I'll violate you.@
>Scream and cry out as I squeeze you dry...\
name ""
mov %first_sel1,1
if %nanido<2 mov %genmogaku,0
if %nanido=2 mov %genmogaku,0
if %nanido=3 mov %genmogaku,0
sub %stack,1
return



*ranael_a6

add %stack,1
if %kousan=2 skip 6
>Luka is being held down by Ranael...\
name $name
>Not with an angel's divine vagina...@
>But with the mucus covered animal-like pussy!\
name ""
skillname "Ray Heine"
dwave 1,"se\ero_pyu1.ogg"
skillcount3 3704
>Ranael's fleshy tentacle swallows Luka's penis!@
mov $tatie4,"ranael_he1"
mov %kousoku,2:gosub *status_print
>Luka is being raped by Ranael!\
skillname ""
if %mylife=0 sub %stack,1:return *ranael_h5
name "Luka"
>Ahhh!\
name ""
>The incredibly elastic vagina instantly contracts around Luka's penis as soon as he's inside!\
name $name
>Ahaha... Too bad.@>I'm sure you'd rather the divine vagina of an angel...\
>But this animal-like pussy is good too, isn't it?@
>Enjoy it! Hahaha!\
name ""
sub %stack,1
goto *ranael_a7



*ranael_a7

add %stack,1
>Luka is being raped by Ranael...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"It feels good, doesn't it?":mov $sel2,"Ranael shrinks her flesh around Luka's penis!"
if %ransu=2 mov $sel1,"I'll tighten it plenty!":mov $sel2,"Ranael squeezes down hard on Luka's penis!"
if %ransu=3 mov $sel1,"Tighter and tighter, I'll squeeze out your semen!":mov $sel2,"Ranael tightens down hard around Luka's penis!"
if %ransu=4 mov $sel1,"I'll crush your penis like this!":mov $sel2,"Putting all her strength into it, Ranael crushes Luka's penis!"
if %ransu=5 mov $sel1,"It feels good being all the way inside, doesn't it?":mov $sel2,"Ranael shakes her waist, causing Luka to gasp in surprised pleasure!"
name $name
eng $sel1:$sel6\
name ""
skillname "Ray Heine"
dwave 1,"se\ero_chupa4.ogg"
skillcount3 3704
eng $sel2:$sel6
mov %damage_kotei,1
damage 250,300
skillname ""
if %mylife=0 sub %stack,1:return *ranael_h6
sub %stack,1
goto *ranael_a7



*ranael_a8

add %stack,1
name $name
>Hehe... Wait just a moment.@
>I'll bring you to a hell of pleasure...\
name ""
skillname "Arna Principality"
>The grotesque organ attached to Ranael's body starts to wriggle...\
skillname ""
name $name
>Burn the memory of my power into your eyes...\
name ""
mov %hanyo6,1
sub %stack,1
return



*ranael_a9

add %stack,1
name $name
>The setup is finished... Come to me!\
name ""
skillname "Arna Principality"
>Ranael's strange organs and tentacles all reach toward Luka's body!@
delay 1000
dwave 1,"se\miss.ogg"
>But Luka nimbly dodges!\
skillname ""
if %first_sel2=1 skip 8
name "Luka"
>Did you think I'd let something like that hit me?\
name ""
name $name
>You damn surface dweller...!\
name ""
mov %first_sel2,1
mov %hanyo6,0
mov %owaza_count3a,0
sub %stack,1
return



*ranael_a10

add %stack,1
mov %hanyo6,0
if %kousan=2 skip 4
name $name
>The setup is finished... Come to me!\
name ""
skillname "Arna Principality"
dwave 1,"se\ero_makituki3.ogg"
eng "Ranael's strange organs and tentacles all reach toward Luka's body!":$sel6/
if %daten>0 mov %tamek,1:goto *skill22x
@
mov $tatie4,"ranael_hf1"
mov %kousoku,1:gosub *status_print
>Luka has been bound by Ranael!\
skillname ""
name $name
>Not with an angel's divine vagina...@
>But with the mucus covered animal-like pussy!\
name ""
skillname "Arna Principality"
dwave 1,"se\ero_pyu1.ogg"
lsp 690,":a;chara\ranael_ct01.bmp",0,0:print 10,500
skillcount3 3705
>Ranael's strange fleshy hole swallows Luka's penis!@
mov %kousoku,3:gosub *status_print
>Luka is being raped by Ranael!\
skillname ""
if %mylife=0 sub %stack,1:return *ranael_h5
name "Luka"
>Ahhh!!\
name ""
>The incredibly elastic vagina instantly contracts around Luka's penis as soon as he's inside!\
name $name
>Ahaha... Too bad.@>I'm sure you'd rather the divine vagina of an angel...\
>But this animal-like pussy is good too, isn't it?@
>Enjoy it! Hahaha!\
name ""
sub %stack,1
goto *ranael_a11



*ranael_a11

add %stack,1
>Luka is being raped by Ranael...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"It feels good, doesn't it?":mov $sel2,"Ranael shrinks her flesh around Luka's penis!"
if %ransu=2 mov $sel1,"I'll tighten it plenty!":mov $sel2,"Ranael squeezes down hard on Luka's penis!"
if %ransu=3 mov $sel1,"Tighter and tighter, I'll squeeze out your semen!":mov $sel2,"Ranael tightens down hard around Luka's penis!"
if %ransu=4 mov $sel1,"I'll crush your penis like this!":mov $sel2,"Putting all her strength into it, Ranael crushes Luka's penis!"
if %ransu=5 mov $sel1,"It feels good being all the way inside, doesn't it?":mov $sel2,"Ranael shakes her waist, causing Luka to gasp in surprised pleasure!"
name $name
eng $sel1:$sel6\
name ""
skillname "Arna Principality"
dwave 1,"se\ero_chupa4.ogg"
skillcount3 3705
eng $sel2:$sel6
mov %damage_kotei,1
damage 200,250
skillname ""
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"It's not enough... I'll entertain you more with this body of mine."
if %ransu=2 mov $sel1,"Ahaha... Isn't it miserable feeling, having your body played with this way?"
if %ransu=3 mov $sel1,"Hurry up and finish... If you do, I'll give you some nice service!"
name $name
eng $sel1:$sel6\
name ""
skillname "Arna Principality"
dwave 1,"se\ero_chupa6.ogg"
rnd2 %ransu,1,2
if %ransu=1 mov $sel1,"Ranael's tentacles suck on Luka's nipples!"
if %ransu=2 mov $sel1,"Ranael uses her tentacles to stimulate Luka's lower body!"
eng $sel1:$sel6
mov %damage_kotei,1
damage 200,250
dwave 1,"se\ero_makituki2.ogg"
rnd2 %ransu,1,2
if %ransu=1 mov $sel1,"Ranael's venus flytrap chews on Luka's body!"
if %ransu=2 mov $sel1,"Ranael's venus flytrap slowly chews on Luka's body!"
eng $sel1:$sel6
mov %damage_kotei,1
damage 200,250
dwave 1,"se\ero_makituki2.ogg"
rnd2 %ransu,1,2
if %ransu=1 mov $sel1,"Ranael's snake hair licks Luka's face clean!"
if %ransu=2 mov $sel1,"Ranael's snake hair licks Luka's neck and armpits clean!"
eng $sel1:$sel6
mov %damage_kotei,1
damage 200,250
dwave 1,"se\ero_makituki1.ogg"
rnd2 %ransu,1,2
if %ransu=1 mov $sel1,"Ranael's tentacle slips inside Luka's ass!"
if %ransu=2 mov $sel1,"Ranael's tentacles play with Luka's scrotum!"
eng $sel1:$sel6
mov %damage_kotei,1
damage 200,250
skillname ""
if %mylife=0 sub %stack,1:return *ranael_h7
sub %stack,1
goto *ranael_a11



*ranael_onedari

mov $list1,"Drain Vine"
if %3700>0 mov %list_num1,1
mov $list2,"Fine Melody"
if %3701>0 mov %list_num2,1
mov $list3,"Medusa Hair"
if %3702>0 mov %list_num3,1
mov $list4,"Menacing Caress"
if %3703>0 mov %list_num4,1
mov $list5,"Ray Heine"
if %3704>0 mov %list_num5,1
mov $list6,"Arna Principality"
if %3705>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *ranael_onedari1
if %cmd1=12 goto *ranael_onedari2
if %cmd1=13 goto *ranael_onedari3
if %cmd1=14 goto *ranael_onedari4
if %cmd1=15 goto *ranael_onedari5
if %cmd1=16 goto *ranael_onedari6
if %cmd1=-1 goto *ranael_main
goto *ranael_onedari



*ranael_onedari1

gosub *onedari_syori
name $name
>Ahaha... You want to be squeezed by my tentacles?@
>As you wish... I'll squeeze you until you cry out!\
name ""
gosub *ranael_a1
skip -1



*ranael_onedari2

gosub *onedari_syori
name $name
>Ahaha... You want to be chewed on by this flytrap?@
>As you wish... I'll chew on you until you cry out!\
name ""
gosub *ranael_a2
skip -1



*ranael_onedari3

gosub *onedari_syori
name $name
>Ahaha... You want my snakes to suck down your semen?@
>As you wish... I'll let them suck on you until you cry out!\
name ""
gosub *ranael_a3
skip -1



*ranael_onedari4

gosub *onedari_syori
name $name
>Ahaha... You want to be squeezed by my tentacles?@
>As you wish... I'll torment you until you cry out!\
name ""
gosub *ranael_a4
skip -1



*ranael_onedari5

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>Ahaha... You want to be violated by me?@
>Then I'll use this fleshy hole...\
name ""
if %kousoku=0 gosub *ranael_a5
gosub *ranael_a6
skip -1



*ranael_onedari6

gosub *onedari_syori
name $name
>Ahaha... You want to be completely violated by me?@
>Then I'll rape you until you go crazy...\
name ""
gosub *ranael_a10
skip -1



*ranael_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\ranael_bk33.bmp",0,0
gosub *syasei2
>As Ranael's tentacles suck on Luka's penis, he comes, filling them with semen.\
mov %viclose,1:gosub *lose
mov %2657,%2657+1:if %2657=1 mov %count_koenemy,%count_koenemy+1
if %2657>%count_most mov %count_most,%2657:mov $count_mostname,$name
count 10,17
mov $bad1,"Ranael forced Luka to come with her tentacles."
gosub *face2
name $name
>Aha... You gave plenty to my tentacles.@
>It felt absolutely amazing, didn't it? Hahaha...\
name ""
goto *ranael_h



*ranael_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\ranael_bk34.bmp",0,0
gosub *syasei2
>As Luka's penis is chewed on by Ranael's venus flytrap, he comes, filling its mouth with semen.\
mov %viclose,1:gosub *lose
mov %2657,%2657+1:if %2657=1 mov %count_koenemy,%count_koenemy+1
if %2657>%count_most mov %count_most,%2657:mov $count_mostname,$name
count 12,17
mov $bad1,"Ranael forced Luka to come with her venus flytrap."
gosub *face2
name $name
>Aha... You gave plenty to my venus flytrap.@
>It felt absolutely amazing, didn't it? Hahaha...\
name ""
goto *ranael_h



*ranael_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\ranael_bk31.bmp",0,0
gosub *syasei2
>As Ranael's snake hair licks Luka's penis, he comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2657,%2657+1:if %2657=1 mov %count_koenemy,%count_koenemy+1
if %2657>%count_most mov %count_most,%2657:mov $count_mostname,$name
count 22,17
mov $bad1,"Ranael forced Luka to come with her snake hair."
gosub *face2
name $name
>Aha... You gave plenty to my lovely snake children...@
>It felt absolutely amazing, didn't it? Hahaha...\
name ""
goto *ranael_h



*ranael_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\ranael_bk35.bmp",0,0
gosub *syasei2
>As Ranael's soft tentacles stroke Luka's body, he comes, covering them in semen.\
mov %viclose,1:gosub *lose
mov %2657,%2657+1:if %2657=1 mov %count_koenemy,%count_koenemy+1
if %2657>%count_most mov %count_most,%2657:mov $count_mostname,$name
count 10,17
mov $bad1,"Ranael forced Luka to come with her tentacles."
gosub *face2
name $name
>Aha... You gave plenty to my tentacles.@
>It felt absolutely amazing, didn't it? Hahaha...\
name ""
goto *ranael_h



*ranael_h5

mov %ikigoe,3:gosub *ikigoe
name $name
>Aha... Already?\
name ""
gosub *syasei1
if %kousoku=2 lsp 700,":a;chara\ranael_he2.bmp",0,0
if %kousoku=3 lsp 700,":a;chara\ranael_hf2.bmp",0,0
if %kousoku=3 lsp 690,":a;chara\ranael_ct02.bmp",0,0
gosub *syasei2
>The moment Luka's penis feels Ranael's hole, he comes, filling it with semen.\
mov %viclose,1:gosub *lose
mov %2657,%2657+1:if %2657=1 mov %count_koenemy,%count_koenemy+1
if %2657>%count_most mov %count_most,%2657:mov $count_mostname,$name
count 1,17
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to orgasm at the moment of insertion."
gosub *face2
name $name
>You didn't even last a couple seconds!@
>Did it really feel that amazing? Haha...\
name ""
goto *ranael_h



*ranael_h6

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\ranael_he2.bmp",0,0
gosub *syasei2
>As Ranael squeezes Luka's penis with her elastic hole, Luka comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2657,%2657+1:if %2657=1 mov %count_koenemy,%count_koenemy+1
if %2657>%count_most mov %count_most,%2657:mov $count_mostname,$name
count 1,17
mov $bad1,"Ranael forces Luka to come with her fleshy hole."
gosub *face2
name $name
>I can tighten that hole even more...@
>Hehehe, you look so dumbfounded...\
name ""
goto *ranael_h



*ranael_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\ranael_hf2.bmp",0,0
lsp 690,":a;chara\ranael_ct02.bmp",0,0
gosub *syasei2
>As Luka's body is overrun by tentacles, he comes, pouring his semen into Ranael's hole.\
mov %viclose,1:gosub *lose2
name "Luka"
>Ahh...\
name ""
name $name
>How does it feel drowning in the pleasure of multiple organs?\
>Does it feel like you've ascended to heaven itself? Hahaha.\
>But it's not over yet...@
>I'll squeeze more and more!\
name ""
skillcount3 3705
skillname "Arna Principality"
dwave 1,"se\ero_chupa6.ogg"
>One of Ranael's tentacles sucks on Luka's nipples!
mov %damage_kotei,1
damage 200,250
dwave 1,"se\ero_makituki2.ogg"
>Her venus flytrap softly chews on Luka's body!
mov %damage_kotei,1
damage 200,250
skillname ""
dwave 1,"se\ero_chupa4.ogg"
>Ranael squeezes down on Luka's penis!
mov %damage_kotei,1
damage 200,250
name "Luka"
>Haa... Ahhhh!\
name ""
name $name
>I'll make you feel good with my whole body.@
>Come on... Let loose more of your seed into my body...\
name ""
skillcount3 3705
dwave 1,"se\ero_makituki2.ogg"
dwave 1,"se\ero_chupa6.ogg"
>Ranael's snake hair crawls around Luka's body, licking him all over!
mov %damage_kotei,1
damage 200,250
dwave 1,"se\ero_makituki1.ogg"
>Another tentacle tickles Luka's scrotum, as a second rubs against his ass!
mov %damage_kotei,1
damage 200,250
skillname ""
dwave 1,"se\ero_chupa4.ogg"
>Ranael contracts her muscles, squeezing down even harder on Luka's penis!
mov %damage_kotei,1
damage 200,250
name "Luka"
>Hyaaa!\
name ""
gosub *syasei1
lsp 700,":a;chara\ranael_hf3.bmp",0,0
lsp 690,":a;chara\ranael_ct03.bmp",0,0
gosub *syasei2
>Having his entire body assaulted, Luka comes again, held down as his body is wracked by another orgasm.\
name $name
>Haha... You really are a failure of a Hero.@
>Coming from the caress of the one who destroyed your hometown...\
name ""
name "Luka"
>S...Stop... Ahhh!\
name ""
skillcount3 3705
skillname "Arna Principality"
dwave 1,"se\ero_chupa6.ogg"
>Ranael's tentacles suck on Luka's nipples!
mov %damage_kotei,1
damage 200,250
dwave 1,"se\ero_makituki2.ogg"
>Her venus flytrap rubs its saliva-filled mouth against Luka's body!
mov %damage_kotei,1
damage 200,250
skillname ""
dwave 1,"se\ero_chupa4.ogg"
>Deep inside, Ranael squeezes down, applying pressure to the tip of Luka's penis!
mov %damage_kotei,1
damage 200,250
name "Luka"
>Urhgg...!!\
name ""
name $name
>Raped by your enemy, and having your semen squeezed...\
>You can't live with that kind of disgrace, can you? Haha.\
>Come on, come inside me again.@
>Inside the enemy you hate so much, feeling good all the while!\
name ""
skillcount3 3705
dwave 1,"se\ero_makituki2.ogg"
dwave 1,"se\ero_chupa6.ogg"
>Ranael's snake hair licks every inch of Luka's body!
mov %damage_kotei,1
damage 200,250
dwave 1,"se\ero_makituki1.ogg"
>A tentacle slips into Luka's anus, and violates him!
mov %damage_kotei,1
damage 200,250
skillname ""
dwave 1,"se\ero_chupa4.ogg"
>The flesh inside Ranael squirms around, rubbing against Luka's penis!
mov %damage_kotei,1
damage 200,250
name "Luka"
>N...Noooo!!\
name ""
gosub *syasei1
lsp 700,":a;chara\ranael_hf4.bmp",0,0
lsp 690,":a;chara\ranael_ct04.bmp",0,0
gosub *syasei2
>While yelling and moaning, Luka comes, pouring his semen straight into Ranael's hole.\
name $name
>Hmph... How disappointing.@
>You had some strange power, but you're just a human after all.\
name ""
gosub *clear_sprite
gosub *setwindow_01p
mov %battle,0
mov %hsean,1
mov %2657,%2657+1:if %2657=1 mov %count_koenemy,%count_koenemy+1
if %2657>%count_most mov %count_most,%2657:mov $count_mostname,$name
count 1,17
mov $bad1,"Ranael forced Luka to come using her various body parts..."
goto *ranael_h



*ranael_h

mov %skill01,18
mov $bad2,"Bound and violated, Luka was squeezed until his death..."
if %2657=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahhh...\
name ""
cspl 690,699
lsp 700,":a;chara\ranael_h0.bmp",0,0:print 10,500
>Ranael looks at me with a sadistic smile as she leans over me, sealing off my movement.\
name $name
>You can't resist any longer now.@
>I'll let you choose the method of your death...\
>Do you want my snake hair to play with you, squeezing you until your death?\
>Or perhaps having my left arm thoroughly draining you of your semen?\
>Perhaps being squeezed over and over by my tentacles, and dying a debilitating death?\
>There's always having your penis chewed on by my venus flytrap, and dissolving away with it...\
>How do you want to climax?@
>Choose your own death... Hahaha!\
name ""
name "Luka"
>N...No...@>I don't want anything!\
name ""
name $name
>If you don't choose, I'll just cut off your head now.\
>You don't want that, do you...?@
>At the very least, you might as well feel good as a man before you go...\
>Now choose...@
>How do you want to die?\
name ""
name "Luka"
>Urhg...\
name ""
>If I'm going to die anyway...\
csel "Snake hair",*ranael_ha,"Left arm",*ranael_hb,"Tentacles",*ranael_hc,"Venus flytrap",*ranael_hd



*ranael_ha

name $name
>Ahaha... You want snakes to indulge in your genitals.@
>What a pathetic way to go.\
>Very well, I'll let these children play with you until your death.@
>Enjoy it all the way to the very end...\
name ""
>Ranael's snake hair grows, causing innumerable snakes to approach my body.@
>They open and close their mouths, searching for their prey.\
>Their prey is my penis...@
>They're going to indulge and play with it, all to get my semen...\
name "Luka"
>Ahhh...\
name ""
name $name
>They'll give you lots of love...@
>Until you die of course. Hahaha.\
name ""
dwave 1,"se\ero_makituki3.ogg"
mov %hseanwave,11:hseanwave
cspl 690,699
lsp 700,":a;chara\ranael_ha1.bmp",0,0:print 10,500
>They quickly find my penis, and all attack it at once.@
>One of them bites down, the strange sensation of its toothless mouth assaulting me all at once.\
name "Luka"
>Ah...!@> Hyaa!\
name ""
>One by one, they bite down on different parts of my penis.@
>A strange sense as the toothless mouths all gently chew at various speeds and intensities.\
>Another snake chews just on the tip of my penis.@
>All of it together makes my eyes widen in surprise at the sudden powerful pleasure.\
name "Luka"
>Hyaa... A...Amazing...@
>Th...This...\
name ""
name $name
>Hahaha... You look so happy.@
>Do you love having your penis played with by my snakes that much?\
>But prepare yourself...@
>When these children make you come, they also devour your life force itself.\
>I take pride in the skill they show when squeezing men to death...\
name ""
name "Luka"
>N...No... Hya!\
name ""
>The snake chewing on my penis presses down a little harder, making me moan a little.@
>I can't help but shake my waist as I stare at the snakes forcing me to feel this way.\
>My most important part is being treated in such a miserable way...\
name $name
>Aha... Does it feel good having my snakes indulge on you like that?@
>What a worthless male pig...\
>You seem to be about ready to leak out...@
>Why don't you just surrender, and let it out?\
name ""
name "Luka"
>Ah... Urhg...\
name ""
>They'll absorb my life force if I come...@
>I don't think I can endure it much longer, but I don't want to die.\
>As I grit my teeth and hold on, Ranael looks down at me and laughs.\
name $name
>Stop holding it in...@
>Just come, and feel good until your death...\
name ""
name "Luka"
>Guh... I won't come...\
name ""
name $name
>Hahaha... Then I wonder how long you will last?@
>It will be forced out of you eventually anyway.\
name ""
>Ranael just laughs at my desperate attempt to hang on.@
>At the same time, the snake biting on my glans takes my tip in a little deeper into its mouth as it chews on me.\
>The sweet pleasure makes my vision go blindingly white.@
>My lower body starts to ache... I don't think I can hold on much longer.\
name "Luka"
>Stop... Stop... Ahh...@
>I'm about to...\
name ""
name $name
>Haha... Already giving up?@
>That was unbelievably fast...\
name ""
>Almost as if spurred on by my pulsing penis, the snakes suddenly start chewing and biting on me even faster.\
>Even though the scene looks horrifying, it feels so good...@
>Despite my best efforts, I feel my body giving over to it.\
name "Luka"
>Ah...C...Coming...@> Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\ranael_ha2.bmp",0,0
gosub *syasei2
>With a few spurts, my semen sprays out, covering the snakes.@
>Eager to get at it, they swarm my penis, biting and licking everywhere as I come.\
>At the same time, the overpowering weakness of my life energy draining slams into me.@
>If this happens a couple more times, I'll be dead...\
name "Luka"
>Ahhh...\
name ""
name $name
>Hahaha... You came.@
>You're already finished.\
>Now then... Please die.\
name ""
mov %hseanwave,12:hseanwave
>With Ranael's chilling command, the snakes resume their toothless chewing.\
>The snake chewing on my tip bites down even harder than before.@
>My body feebly shakes and twitches as they indulge and feed on me.\
name "Luka"
>Ahhh...!@
>Stop!!\
name ""
name $name
>Hahaha... There's no mercy for you now.@
>No matter how much you cry and plead, you won't be saved.\
>Just continue coming as your life fades away.@
>A fitting end to a male pig like you.\
name ""
name "Luka"
>No... Coming again...!\
name ""
gosub *syasei1
lsp 700,":a;chara\ranael_ha3.bmp",0,0
gosub *syasei2
>As the snakes bite and greedily suck on my penis, I come again.@
>More of my life force drains, leaving me far weaker than I already was.\
>My thoughts get woozy and confused...@
>Any more than this will be really dangerous.\
name "Luka"
>Haa... It feels good...\
name ""
name $name
>Haha... Even though you know it's killing you, you can't stop coming.@
>What a wretched pig of a man.\
name ""
name "Luka"
>Hyaaa...\
name ""
>Before I had noticed it, I was completely a captive of the pleasures these snakes are forcing into me.\
>I want to give them semen, and have them continue lusting after me...@
>Having my thoughts confused and reversed, I eagerly relax into another climax.\
name "Luka"
>Ahh...\
name ""
gosub *syasei1
lsp 700,":a;chara\ranael_ha4.bmp",0,0
gosub *syasei2
>More power fades from me as I come, feeding the snakes desire.\
name $name
>Hahaha... Are you still able to comprehend that you're dying?@
>Does it feel that good?\
>Now please die... Immersed in pleasure.\
name ""
name "Luka"
>Ah... Hyaa...\
name ""
gosub *syasei1:gosub *syasei2
>I can't even move a finger any longer.@
>The only thing I can sense is the ruthless pleasure taking hold of my body.\
gosub *syasei1:gosub *syasei2
name "Luka"
>Ahh...\
name ""
>With a final spasm of my body, I feel the last of my power being taken by the greedy snakes.\
gosub *syasei1:gosub *syasei2
mov %hseanwave,0:hseanwave
gosub *anten
>At the very end, I faded into darkness with a smile on my face as I gave myself over to desire.@
>Thus, I welcomed my own cruel fate...\
>...........\
goto *badend



*ranael_hb

name $name
>Ahaha... So you want this tentacle to suck on you as you die?@
>That's how you wish to meet your end? How pathetic...\
>Very well, I'll suck on you until you're dry.@
>Enjoy it, until you breath your last.\
name ""
>Ranael's right arm extends, pressing against my crotch with a tube-shaped end.\
>It's prey is my penis.@
>Once it sucks me in, it will suck out my semen until I die...\
name "Luka"
>Ahhh...\
name ""
name $name
>I'll suck up all of that semen of yours...@
>Until you shrivel and die!\
name ""
dwave 1,"se\ero_makituki3.ogg"
mov %hseanwave,14:hseanwave
cspl 690,699
lsp 700,":a;chara\ranael_hb1.bmp",0,0:print 10,500
>The tentacle sucks in my penis, and instantly starts sucking on me.@
>At the same time, another tentacle latches onto my balls, and starts sucking.\
name "Luka"
>Ah!@>Hyaa!\
name ""
>The sense of being sucked fills my body.@
>As the tentacle sucks on me, the texture of its soft walls rubs against my penis, too.\
>A stimulation to provoke men to come...@
>I can already feel my body giving itself over to it.\
name "Luka"
>Hyaa... A...Amazing...\
name ""
name $name
>Hahaha... You look so happy.@
>Is it so enjoyable having your penis sucked by my tentacle?\
>But prepare yourself...@
>This tentacle will suck out your life in addition to your semen.\
>That's the function of this tentacle... Solely to suck men to death.\
name ""
name "Luka"
>N...No... Hyaa!\
name ""
>My waist unconsciously jerks upwards as my glans is sucked on.@
>I writhe in agony, unable to take my eyes off the tentacle forcing this pleasure into me.\
>The most important part of a man, treated to such humiliation...\
name $name
>Ahaha... Does it feel good being sucked on by my tentacle?@
>It's quite pathetic to be so happy from this...\
>Is your precious juice about to be sucked out?@
>There's no need to endure it...\
name ""
name "Luka"
>Ah... Urhg...\
name ""
>If I come, my life itself will go out with my semen.@
>I don't think I can endure it much longer, but I don't want to die.\
>Ranael laughs as she looks at me, trying my hardest to hold on.\
name $name
>Stop holding it in...@
>Just come, and feel good until your death...\
name ""
name "Luka"
>Guh... I won't come...\
name ""
name $name
>Hahaha... Then I wonder how long you will last?@
>It will be forced out of you eventually anyway.\
name ""
>Ranael just laughs at my desperate attempt to hang on.@
>The slimy sensation of the tentacle sucking on me fills all my thoughts, slowly wearing down my resistance.\
>The sweet pleasure makes my vision go blindingly white.@
>My lower body starts to ache... I don't think I can hold on much longer.\
name "Luka"
>Stop... Stop... Ahh...@
>I'm about to...\
name ""
name $name
>Haha... Already giving up?@
>That was unbelievably fast...\
name ""
>The tentacle sucking on my tip suddenly increases in intensity, as if sensing how close I am to climaxing.\
>At the same time, the ones sucking on my balls start to push and pull even quicker.\
>It feels like my soul itself is being sucked out...@
>Overcome by the sensation of having my everything sucked out, I relax my lower body and give in to it.\
name "Luka"
>Ahh... Coming...@> Hyaa!\
name ""
gosub *syasei1
lsp 700,":a;chara\ranael_hb2.bmp",0,0
gosub *syasei2
>With a twitch, my penis erupts, pouring my semen right into the sucking tentacles hole.\
>At the same time, the overpowering weakness of my life energy draining slams into me.@
>If this happens a couple more times, I'll be dead...\
name "Luka"
>Ahhh...\
name ""
name $name
>Hahaha... You came.@
>You're already finished.\
>Now then... Please die.\
name ""
mov %hseanwave,15:hseanwave
>With Ranael's chilling command, the suction drastically increases in intensity.\
>The tentacle shrinks inside, suddenly getting far tighter than before.@
>At the same time, the vacuum like pressure feels like it's almost pulling my whole body inside.\
name "Luka"
>Ahhh!!@
>Stop!!\
name ""
name $name
>Hahaha... There's no mercy for you now.@
>No matter how much you cry and plead, you won't be saved.\
>Just continue coming as your life fades away.@
>A fitting end to a male pig like you.\
name ""
name "Luka"
>No... I'm coming again...!\
name ""
gosub *syasei1
lsp 700,":a;chara\ranael_hb3.bmp",0,0
gosub *syasei2
>My body spasms as I come again, erupting right into the sucking tentacle's hole.@
>More of my life force drains, leaving me far weaker than I already was.\
>My thoughts get woozy and confused...@
>Any more than this will be really dangerous.\
name "Luka"
>Haaa... It feels so good...\
name ""
name $name
>Haha... Even though you know it's killing you, you can't stop coming.@
>What a wretched pig of a man.\
name ""
name "Luka"
>Hyaaa...\
name ""
>The heartless tentacles keep sucking on me, oblivious to my fears.@
>Before I had noticed it, I had surrendered to this ecstasy.\
>I want to give my semen to this lustful tentacle, and indulge in the pleasure.\
name "Luka"
>Ahh...\
name ""
gosub *syasei1
lsp 700,":a;chara\ranael_hb4.bmp",0,0
gosub *syasei2
>Each time I ejaculate, a large portion of my energy fades with it.\
name $name
>Hahaha... Are you still able to comprehend that you're dying?@
>Does it feel that good?\
>Now please die... Immersed in pleasure.\
name ""
name "Luka"
>Ah... Hyaa...\
name ""
gosub *syasei1:gosub *syasei2
>I can't even move a finger any longer.@
>The only thing I can sense is the ruthless pleasure taking hold of my body as the tentacles suck on me.\
gosub *syasei1:gosub *syasei2
name "Luka"
>Ahh...\
name ""
>With a final shudder and climax, I reach my end.@
>Feeling as if my soul itself is being sucked out by these tentacles.\
gosub *syasei1:gosub *syasei2
mov %hseanwave,0:hseanwave
gosub *anten
>At the very end, I faded into darkness with a smile on my face as I gave myself over to desire.@
>Thus, I welcomed my own cruel fate...\
>...........\
goto *badend



*ranael_hc

name $name
>Ahaha... You want to meet your end being stroked by these soft tentacles?@
>What a pitiful way to reach your end...\
>Very well... I'll squeeze you until you die.@
>Enjoy your last moments!\
name ""
>Octopus-like tentacles from Ranael's lower body reach out toward my groin.@
>They look slimy, and have mucus dripping off of them...\
>Their prey is my penis...@
>They'll wind around my penis, and stroke it until I come...\
name "Luka"
>Ahhh...\
name ""
name $name
>I'll give you lots of love.@
>...Until you die. Hahaha.\
name ""
dwave 1,"se\ero_makituki2.ogg"
mov %hseanwave,20:hseanwave
cspl 690,699
lsp 700,":a;chara\ranael_hc1.bmp",0,0:print 10,500
>The soft, elastic tentacles coil around my penis, slowly enveloping it.\
name "Luka"
>Ah...!@> Hyaaa!\
name ""
>Her tentacles slowly tighten around my penis, causing me to almost sink into them.@
>The slimy mucus covering the tentacles lubricates my penis, making every movement almost unbearable.\
>The sweet, tight sensations make it feel like I could throw everything away and just drown in the sensations.\
name "Luka"
>Hyaa... A...Amazing...\
name ""
name $name
>Hahaha... You look so happy.@
>Is it really that amazing having my tentacles coiled around your penis?\
>But prepare yourself...@
>This tentacle will also squeeze out your life in addition to your semen.\
>That's the function of this tentacle... Solely to squeeze men to death.\
name ""
name "Luka"
>Ah!@>Hyaa!\
name ""
>The sense of being squeezed fills my body.@
>As the tentacle tightens around me, my penis sinks into its soft, slimy skin.\
>A stimulation to provoke men to come...@
>I can already feel my body giving itself over to it.\
name $name
>Ahaha... Does it feel good being squeezed by my tentacles?@
>It's quite pathetic to be so happy from this...\
>Is your precious juice about to burst out?@
>There's no need to endure it...\
name ""
name "Luka"
>Ah... Urhg...\
name ""
>If I come, my life itself will go out with my semen.@
>I don't think I can endure it much longer, but I don't want to die.\
>Ranael laughs as she looks at me, trying my hardest to hold on.\
name $name
>Stop holding it in...@
>Just come, and feel good until your death...\
name ""
name "Luka"
>Guh... I won't come...\
name ""
name $name
>Hahaha... Then I wonder how long you will last?@
>It will be forced out of you eventually anyway.\
name ""
>Ranael just laughs at my desperate attempt to hang on.@
>The soft sensation of the tentacle coiled around my penis fills all my thoughts, slowly wearing down my resistance.\
>The sweet pleasure makes my vision go blinding white.@
>My lower body starts to ache... I don't think I can hold on much longer.\
name "Luka"
>Stop... Stop... Ahh...@
>I'm about to...\
name ""
name $name
>Haha... Already giving up?@
>That was unbelievably fast...\
name ""
>A sucker attaches itself to my glans, and starts to pull on the tip.@
>At the same time, her coiled tentacle starts to stroke my penis up and down.\
>Two more suckers attach to each of my balls, and start to pull on them.@
>Overcome by the intense stimulation, I'm pushed over the limit at once.\
name "Luka"
>Ahh... Coming...@> Hyaa!\
name ""
gosub *syasei1
lsp 700,":a;chara\ranael_hc2.bmp",0,0
gosub *syasei2
>My penis pulses, and sprays my semen into the air.@
>It comes back down, falling on the tentacles that skillfully milked it out.\
>At the same time, the overpowering weakness of my life energy draining slams into me.@
>If this happens a couple more times, I'll be dead...\
name "Luka"
>Ahhh...\
name ""
name $name
>Hahaha... You came.@
>You're already finished.\
>Now then... Please die.\
name ""
mov %hseanwave,21:hseanwave
>At Ranael's statement, the tentacles suddenly get far more intense.\
>The tentacle tightens around my penis, and drastically increases its up and down movement.@
>At the same time, the suckers pull even harder on my glans and balls, overpowering me in the ecstasy.\
name "Luka"
>Ahhh!@
>Stop!!\
name ""
name $name
>Hahaha... There's no mercy for you now.@
>No matter how much you cry and plead, you won't be saved.\
>Just continue coming as your life fades away.@
>A fitting end to a male pig like you.\
name ""
name "Luka"
>No... I'm coming again...!\
name ""
gosub *syasei1
lsp 700,":a;chara\ranael_hc3.bmp",0,0
gosub *syasei2
>My body spasms as I come again, erupting all over the squeezing tentacles.@
>More of my life force drains, leaving me far weaker than I already was.\
>My thoughts get woozy and confused...@
>Any more than this will be really dangerous.\
name "Luka"
>Haaa... It feels so good...\
name ""
name $name
>Haha... Even though you know it's killing you, you can't stop coming.@
>What a wretched pig of a man.\
name ""
name "Luka"
>Hyaaa...\
name ""
>The heartless tentacle keeps squeezing me, oblivious to my fears.@
>Before I had noticed it, I had surrendered to this ecstasy.\
>I want to give my semen to this lustful tentacle, and indulge in the pleasure.\
name "Luka"
>Ahh...\
name ""
gosub *syasei1
lsp 700,":a;chara\ranael_hc4.bmp",0,0
gosub *syasei2
>Each time I ejaculate, a large portion of my energy fades with it.\
name $name
>Hahaha... Are you still able to comprehend that you're dying?@
>Does it feel that good?\
>Now please die... Immersed in pleasure.\
name ""
name "Luka"
>Ah... Hyaa...\
name ""
gosub *syasei1:gosub *syasei2
>I can't even move a finger any longer.@
>The only thing I can sense is the ruthless pleasure taking hold of my body as the tentacle squeezes me dry.\
gosub *syasei1:gosub *syasei2
name "Luka"
>Ahh...\
name ""
>With a final shudder and climax, I reach my end.@
>Feeling as if my soul itself is being squeezed out by these tentacles.\
gosub *syasei1:gosub *syasei2
mov %hseanwave,0:hseanwave
gosub *anten
>At the very end, I faded into darkness with a smile on my face as I gave myself over to desire.@
>Thus, I welcomed my own cruel fate...\
>...........\
goto *badend



*ranael_hd

name $name
>Ahaha... You want this venus flytrap to chew on your penis?@
>What a miserable way to meet your end...\
>Very well, I'll chew on you plenty with it.@
>Enjoy it all the way until your death...\
name ""
>Her right arm extends toward me, exposing the giant flytrap.@
>It's mouth opens, showing off the slimy, soft-looking interior.\
>It's prey is my penis...@
>It will bite down on it, and keep on chewing it until I'm dead.\
name "Luka"
>Ahhh...\
name ""
name $name
>I'll give you lots of love.@
>...Until you die. Hahaha.\
name ""
dwave 1,"se\ero_makituki3.ogg"
mov %hseanwave,11:hseanwave
cspl 690,699
lsp 700,":a;chara\ranael_hd1.bmp",0,0:print 10,500
>The venus flytrap opens wide, then clamps down my penis.@
>The intense tightness takes me by surprise, forcing me to moan.\
name "Luka"
>Ah...!@> Ahhh!\
name ""
>After closing on me, it starts to slowly chew.@
>Each biting motion sends sparks of pleasure racing through my body.\
>Countless folds inside of it rub and stroke my penis with each movement it makes.@
>The sweet pleasure makes my mind numb, making me want to indulge in the pleasure.\
name "Luka"
>Hyaa... A...Amazing...\
name ""
name $name
>Hahaha... You look so happy.@
>Is it really that amazing to have your penis chewed on?\
>But prepare yourself...@
>Once you come inside this flytrap, your life itself will be taken in addition to your semen.\
>This flytrap chews men dry, then takes their life...\
name ""
name "Luka"
>N...No...@>Haa!\
name ""
>The sweet biting sensation causes my body to shake in pleasure, cutting my words short.@
>I can't bring myself to take my eyes off the horrifying plant in front of me.\
>A stimulation to provoke men to come...@
>I can already feel my body giving itself over to it.\
name $name
>Ahaha... Does it feel good being chewed on by my flytrap?@
>It's quite pathetic to be so happy from this...\
>Is your precious juice about to burst out?@
>There's no need to endure it...\
name ""
name "Luka"
>Ah... Urhg...\
name ""
>If I come, my life itself will go out with my semen.@
>I don't think I can endure it much longer, but I don't want to die.\
>Ranael laughs as she looks at me, trying my hardest to hold on.\
name $name
>Stop holding it in...@
>Just come, and feel good until your death...\
name ""
name "Luka"
>Guh... I won't come...\
name ""
name $name
>Hahaha... Then I wonder how long you will last?@
>It will be forced out of you eventually anyway.\
name ""
>Ranael just laughs at my desperate attempt to hang on.@
>The flytrap keeps on chewing on my penis, sandwiched in its mouth.\
>The sweet pleasure makes my vision go blinding white.@
>My lower body starts to ache... I don't think I can hold on much longer.\
name "Luka"
>Stop... Stop... Ahh...@
>I'm about to...\
name ""
name $name
>Haha... Already giving up?@
>That was unbelievably fast...\
name ""
>The slow and careful biting stimulation causes the folds to rub hard against my penis.@
>A mad torture of pleasure as it feels just like my penis is being eaten.\
>After only a few more moments, I feel myself going over the edge.\
name "Luka"
>Ahh... Coming...@> Hyaaa!\
name ""
gosub *syasei1
lsp 700,":a;chara\ranael_hd2.bmp",0,0
gosub *syasei2
>My penis pulses, and sprays my semen right into the venus flytrap.@
>It fills the chewing mouth, providing even more lubrication for it to chew on my penis.\
>At the same time, the overpowering weakness of my life energy draining slams into me.@
>If this happens a couple more times, I'll be dead...\
name "Luka"
>Ahhh...\
name ""
name $name
>Hahaha... You came.@
>You're already finished.\
>Now then... Please die.\
name ""
mov %hseanwave,21:hseanwave
>Right after Ranael's statement, the chewing motions get far more intense.\
>A wet noise rings out with each bite as the pressure and speed get drastically higher.\
>Each chewing noise makes my body shiver, as the intense stimulation makes me moan in ecstasy.\
name "Luka"
>Ahhhhnnn!@
>Stop!!\
name ""
name $name
>Hahaha... There's no mercy for you now.@
>No matter how much you cry and plead, you won't be saved.\
>Just continue coming as your life fades away.@
>A fitting end to a male pig like you.\
name ""
name "Luka"
>No... I'm coming again...!\
name ""
gosub *syasei1
lsp 700,":a;chara\ranael_hd3.bmp",0,0
gosub *syasei2
>My body spasms as I come again, filling the venus flytrap with even more semen.@
>More of my life force drains, leaving me far weaker than I already was.\
>My thoughts get woozy and confused...@
>Any more than this will be really dangerous.\
name "Luka"
>Haaa... It feels so good...\
name ""
name $name
>Haha... Even though you know it's killing you, you can't stop coming.@
>What a wretched pig of a man.\
name ""
name "Luka"
>Hyaaa...\
name ""
>Each time it chews on me, explosions of bliss wrack my body.@
>Before I had noticed it, I had surrendered to this ecstasy.\
>I want to give my semen to this lustful flytrap, and indulge in the pleasure.\
name "Luka"
>Ahh...\
name ""
gosub *syasei1
lsp 700,":a;chara\ranael_hd4.bmp",0,0
gosub *syasei2
>Each time I ejaculate, a large portion of my energy fades with it.\
name $name
>Hahaha... Are you still able to comprehend that you're dying?@
>Does it feel that good?\
>Now please die... Immersed in pleasure.\
name ""
name "Luka"
>Ah... Hyaa...\
name ""
gosub *syasei1:gosub *syasei2
>I can't even move a finger any longer.@
>The only thing I can sense is the ruthless pleasure taking hold of my body as the flytrap chews me dry.\
gosub *syasei1:gosub *syasei2
name "Luka"
>Ahhh...\
name ""
>With a final shudder and climax, I reach my end.@
>Feeling as if my soul itself is being chewed up by this venus flytrap...\
gosub *syasei1:gosub *syasei2
mov %hseanwave,0:hseanwave
gosub *anten
>At the very end, I faded into darkness with a smile on my face as I gave myself over to desire.@
>Thus, I welcomed my own cruel fate...\
>...........\
goto *badend



*c_tangh_start

mov $name,"Chimera Tongue"
mov $name2,"Chimera Tongue"
mov $lavel,"c_tangh"
mov $tatie1,"c_tangh_st01"
mov $tatie2,"c_tangh_st02"
mov $tatie3,"c_tangh_st03"
mov $tatie4,"c_tangh_st11"
mov $haikei,"bg029"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,15000
if %nanido=2 mov %max_enemylife,17000
if %nanido=3 mov %max_enemylife,19000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,0
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't escape from Chimera Tongue's hold!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"You can't escape from my tongue..."
mov $mogaku_sel2,"I'll lick you until you can't resist..."
mov $mogaku_sel3,"No man can escape from my tongue hell..."
mov $mogaku_sel4,"Struggling so much... Do you want to be wound up tighter?"
mov $mogaku_sel5,"Once you're bound in my tongue, all that's left is to come..."
mov $mogaku_dassyutu1,"Why would you run...?"
mov $mogaku_dassyutu2,"Don't you want to be licked until your body itself wrinkles?"
mov $half_s1,"I'll lick you more and more..."
mov $half_s2,"You'll be able to come, even as I lick you..."
mov $kiki_s1,"Your semen is already leaking..."
mov $kiki_s2,"I'll taste everything you have to offer..."
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,4
name "Luka"
>Stop!@>I'm your opponent!\
name ""
name $name
>Oh?@>A human soldier?@
>You want to be preyed on too?\
>Good... I'll give you some extra big service.@
>I'll lick you clean with my tongue, and drive you mad with pleasure...\
name ""
name "Luka"
>This feeling... A Chimeric Beast?\
name ""
>That strange sensation that I get from the other Chimeras...@
>Even if she's able to understand language, she's just the same.\
>They're giving off that intense lust...@>I think the serene state will be extra effective on these types of opponents.\
>But for angels like Ranael, the Fallen Angel Dance seems to be a better option.\
>Since she's a monster, I should use the serene state!\
goto *common_main



*c_tangh_v

gosub *face3
name $name
>No...@
>After all the trouble of being born...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Chimera Tongue is sealed in the form of a slug!\
mov %viclose,1:gosub *victory
mov %getexp,180000:gosub *lvup
mov %2358,1
goto *sean0313



*c_tangh_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Just the sight of this tongue was too much for you?@
>I'll lick you, just as you desire...\
name ""
goto *c_tangh_a



*c_tangh_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *c_tangh_kousan
if %cmd1=16 goto *c_tangh_onedari
if %cmd1=17 goto *common_skill
goto *c_tangh_main



*c_tangh_a

if %kousoku=1 rnd2 %ransu,1,2
if %kousoku=1 && %ransu=1 gosub *c_tangh_a6:goto *common_main
if %kousoku=1 && %ransu=2 gosub *c_tangh_a7:goto *common_main
rnd2 %ransu,1,6
if %ransu=1 gosub *c_tangh_a1:goto *common_main
if %ransu=2 gosub *c_tangh_a2:goto *common_main
if %ransu=3 gosub *c_tangh_a3:goto *common_main
if %ransu=4 gosub *c_tangh_a4:goto *common_main
if %ransu>4 && %owaza_count1a>5 gosub *c_tangh_a5:goto *common_main
skip -6



*c_tangh_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll lick your genitals clean..."
if %ransu=2 mov $sel1,"I'll lick you with this tongue..."
if %ransu=3 mov $sel1,"You wanted me to do this ever since you first saw me, didn't you?"
name $name
eng $sel1:$sel6\
name ""
skillname "Swarm Lick"
dwave 1,"se\ero_pyu1.ogg"
>Countless tongues from the Chimera's hair eagerly lick Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3706
if %nanido<2 damage 250,270
if %nanido=2 damage 280,300
if %nanido=3 damage 310,330
skillname ""
if %mylife=0 sub %stack,1:return *c_tangh_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_tangh_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Don't you want to feel it wind around your penis?"
if %ransu=2 mov $sel1,"I'll coil this tongue around your genitals..."
if %ransu=3 mov $sel1,"I'll cover your penis in saliva, and play with it..."
name $name
eng $sel1:$sel6\
name ""
skillname "Entangled Lick"
dwave 1,"se\ero_pyu1.ogg"
>Chimera Tongue's giant tongue licks Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
>The tongue licks Luka's penis clean as it coils around him!
skillcount3 3707
if %nanido<2 damage 260,280
if %nanido=2 damage 290,310
if %nanido=3 damage 320,340
skillname ""
if %mylife=0 sub %stack,1:return *c_tangh_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_tangh_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll lick your body clean..."
if %ransu=2 mov $sel1,"You'll finish as I lick your body..."
if %ransu=3 mov $sel1,"I'll cover your body in saliva..."
name $name
eng $sel1:$sel6\
name ""
skillname "Disorder Lick"
dwave 1,"se\ero_pyu1.ogg"
>Chimera Tongue's two arms lick Luka's body from head to foot!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
>She focuses especially close on Luka's groin!
skillcount3 3708
if %nanido<2 damage 270,290
if %nanido=2 damage 300,320
if %nanido=3 damage 330,350
skillname ""
if %mylife=0 sub %stack,1:return *c_tangh_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_tangh_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Doesn't it feel like your penis itself could dissolve?"
if %ransu=2 mov $sel1,"You'll melt away in my tongues caress..."
if %ransu=3 mov $sel1,"I'll lick you with my special digestive juices..."
name $name
eng $sel1:$sel6\
name ""
skillname "Dissolving Lick"
dwave 1,"se\ero_pyu1.ogg"
eng "Dripping with digestive juices, the Chimera's tongue races toward Luka's body!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
>Covered in digestive juices, her tongue licks up and down Luka's body!
skillcount3 3709
if %nanido<2 damage 280,300
if %nanido=2 damage 310,330
if %nanido=3 damage 340,360
skillname ""
if %mylife=0 sub %stack,1:return *c_tangh_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_tangh_a5

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 4
name $name
>I'll wrap you up with this tongue and get a nice, long taste of you...\
name ""
skillname "Winding Lick"
dwave 1,"se\ero_makituki3.ogg"
>Chimera Tongue's huge tongue moves to wrap around Luka's body!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<80 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3710
if %nanido<2 damage 250,270
if %nanido=2 damage 280,300
if %nanido=3 damage 310,330
mov %kousoku,1:gosub *status_print
>Luka has been bound by Chimera Tongue!\
skillname ""
if %mylife=0 sub %stack,1:return *c_tangh_h2
name $name
>How does it feel to be wrapped by my tongue?@
>I'll lick every inch of you now...\
name ""
if %earth=0 && %nanido<2 mov %genmogaku,2
if %earth=0 && %nanido=2 mov %genmogaku,2
if %earth=0 && %nanido=3 mov %genmogaku,3
sub %stack,1
return



*c_tangh_a6

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You'll finish in my tongue's embrace..."
if %ransu=2 mov $sel1,"Go mad with pleasure in my tongue..."
if %ransu=3 mov $sel1,"Where do you want me to lick... Your nipples? Anus? Penis?"
name $name
eng $sel1:$sel6\
name ""
skillname "Winding Lick"
dwave 1,"se\ero_pyu1.ogg"
>Chimera Tongue's huge tongue wriggles around Luka's body!
>The rough texture rubs against Luka's body!
skillcount3 3710
if %nanido<2 damage 150,160
if %nanido=2 damage 165,175
if %nanido=3 damage 180,190
dwave 1,"se\ero_pyu1.ogg"
>The tip of her tongue plays with Luka's penis!
if %nanido<2 damage 150,160
if %nanido=2 damage 165,175
if %nanido=3 damage 180,190
skillname ""
if %mylife=0 sub %stack,1:return *c_tangh_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_tangh_a7

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll lick everything clean..."
if %ransu=2 mov $sel1,"I'll lick you until you have no more taste..."
if %ransu=3 mov $sel1,"Come as you writhe in agony..."
name $name
eng $sel1:$sel6\
name ""
skillname "Hellish Lick"
dwave 1,"se\ero_pyu1.ogg"
>Chimera Tongue's numerous tongues attack Luka all over!
>Innumerable other tongues lick Luka's neck and nipples!
skillcount3 3711
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
dwave 1,"se\ero_pyu1.ogg"
>The Chimera's huge middle tongue licks Luka's balls!
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
dwave 1,"se\ero_pyu1.ogg"
>Her mouth tongue licks Luka's ass!
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
dwave 1,"se\ero_pyu1.ogg"
>Her right arm tongue coils around Luka's penis!
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
dwave 1,"se\ero_pyu1.ogg"
>Her left arm tongue focuses on his glans!
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
skillname ""
if %mylife=0 sub %stack,1:return *c_tangh_h6
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_tangh_onedari

mov $list1,"Swarm Lick"
if %3706>0 mov %list_num1,1
mov $list2,"Entangled Lick"
if %3707>0 mov %list_num2,1
mov $list3,"Disorder Lick"
if %3708>0 mov %list_num3,1
mov $list4,"Dissolving Lick"
if %3709>0 mov %list_num4,1
mov $list5,"Winding Lick"
if %3710>0 mov %list_num5,1
mov $list6,"Hellish Lick"
if %3711>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *c_tangh_onedari1
if %cmd1=12 goto *c_tangh_onedari2
if %cmd1=13 goto *c_tangh_onedari3
if %cmd1=14 goto *c_tangh_onedari4
if %cmd1=15 goto *c_tangh_onedari5
if %cmd1=16 goto *c_tangh_onedari6
if %cmd1=-1 goto *c_tangh_main
goto *c_tangh_onedari



*c_tangh_onedari1

gosub *onedari_syori
name $name
>You want me to use my hair tongue?@
>Then I'll lick you clean...\
name ""
gosub *c_tangh_a1
skip -1



*c_tangh_onedari2

gosub *onedari_syori
name $name
>You want me to use my normal tongue?@
>Then I'll lick you clean...\
name ""
gosub *c_tangh_a2
skip -1



*c_tangh_onedari3

gosub *onedari_syori
name $name
>You want me to use my arm tongues?@
>Then I'll lick you clean...\
name ""
gosub *c_tangh_a3
skip -1



*c_tangh_onedari4

gosub *onedari_syori
name $name
>You want me to use my huge tongue?@
>Then I'll lick you clean...\
name ""
gosub *c_tangh_a4
skip -1



*c_tangh_onedari5

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want to be bound and licked?@
>Then I'll lick you clean...\
name ""
if %kousoku=0 gosub *c_tangh_a5
gosub *c_tangh_a6
skip -1



*c_tangh_onedari6

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want to taste a hell of tongue pleasure?@
>Then writhe away in agony...\
name ""
if %kousoku=0 gosub *c_tangh_a5
gosub *c_tangh_a7
skip -1



*c_tangh_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\c_tangh_bk02.bmp",0,0
gosub *syasei2
>As the Chimera's hair tongues lick Luka's penis, he comes, covering her head with semen.\
mov %viclose,1:gosub *lose
mov %2658,%2658+1:if %2658=1 mov %count_koenemy,%count_koenemy+1
if %2658>%count_most mov %count_most,%2658:mov $count_mostname,$name
count 4,3
mov $bad1,"Chimera Tongue forced Luka to come with her hair tongues."
gosub *face2
name $name
>Mmm... Male extract all over my taste buds.@
>Such a darkly delicious flavor...\
name ""
goto *c_tangh_h



*c_tangh_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\c_tangh_bk01.bmp",0,0
gosub *syasei2
>As the Chimera's tongue coils around Luka's penis, he comes, covering it with semen.\
mov %viclose,1:gosub *lose
mov %2658,%2658+1:if %2658=1 mov %count_koenemy,%count_koenemy+1
if %2658>%count_most mov %count_most,%2658:mov $count_mostname,$name
count 4,3
mov $bad1,"Chimera Tongue forced Luka to come with her stomach tongue."
gosub *face2
name $name
>Mmm... Male extract all over my taste buds.@
>Such a darkly delicious flavor...\
name ""
goto *c_tangh_h



*c_tangh_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\c_tangh_bk03.bmp",0,0
gosub *syasei2
>As both of the Chimera's arm tongues lick Luka's penis, he comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2658,%2658+1:if %2658=1 mov %count_koenemy,%count_koenemy+1
if %2658>%count_most mov %count_most,%2658:mov $count_mostname,$name
count 4,3
mov $bad1,"Chimera Tongue forced Luka to come with her arm tongues."
gosub *face2
name $name
>Mmm... Male extract all over my taste buds.@
>Such a darkly delicious flavor...\
name ""
goto *c_tangh_h



*c_tangh_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\c_tangh_bk04.bmp",0,0
gosub *syasei2
>As the Chimera's tongue licks Luka's body, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2658,%2658+1:if %2658=1 mov %count_koenemy,%count_koenemy+1
if %2658>%count_most mov %count_most,%2658:mov $count_mostname,$name
count 4,3
mov $bad1,"Chimera Tongue forced Luka to come with her stomach tongue."
gosub *face2
name $name
>Mmm... Male extract all over my taste buds.@
>Such a darkly delicious flavor...\
name ""
goto *c_tangh_h



*c_tangh_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>As the Chimera's tongue winds around Luka's penis, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2658,%2658+1:if %2658=1 mov %count_koenemy,%count_koenemy+1
if %2658>%count_most mov %count_most,%2658:mov $count_mostname,$name
count 4,3
mov $bad1,"Chimera Tongue forced Luka to come as her tongue coiled around his penis."
gosub *face2
name $name
>Mmm... Male extract all over my taste buds.@
>Such a darkly delicious flavor...\
name ""
goto *c_tangh_h



*c_tangh_h6

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>As countless tongues assault his body at once, Luka comes, covering Chimera Tongue with his semen.\
mov %viclose,1:gosub *lose
mov %2658,%2658+1:if %2658=1 mov %count_koenemy,%count_koenemy+1
if %2658>%count_most mov %count_most,%2658:mov $count_mostname,$name
count 4,3
mov $bad1,"Chimera Tongue forced Luka to come under an assault of her whole body."
gosub *face2
name $name
>Mmm... Male extract all over my taste buds.@
>Such a darkly delicious flavor...\
name ""
goto *c_tangh_h



*c_tangh_h

mov $bad2,"Violated by innumerable tongues, Luka was licked until he could no longer stand."
if %2658=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,11:hseanwave:lsp 700,":a;chara\c_tangh_h1.bmp",0,0:goto *c_tangh_hb
name "Luka"
>Ahh...\
name ""
>Chimera Tongue steps up to me, now too weak to resist.@
>Each movement of her body makes her tongues wriggle and squirm seductively.\
name $name
>Do you want to be embraced by this body of mine?@
>Most men squeal in agony just from touching me...\
>Then there are some who come just from the sensation...@
>I'll hug you and find out which you are.\
name ""
mov %hseanwave,11:hseanwave
>Her giant tongue slowly reaches out toward my body.@
>It touches my skin, covering my skin with her saliva.\
name "Luka"
>Ah...\
name ""
>Too weak to resist, I can't help but watch as her tongue slowly coils around my body.\
dwave 1,"se\ero_makituki3.ogg"
cspl 690,699
lsp 700,":a;chara\c_tangh_h1.bmp",0,0:print 10,500
>Until finally, she has me completely wrapped up in her tongue.@
>With the warm saliva all around me, it feels like I'm trapped in someone's mouth...\
>The warmth makes goosebumps rise on my skin, making me shiver with how good it feels.\
goto *c_tangh_hb



*c_tangh_hb

name "Luka"
>Ahh...\
name ""
name $name
>I've only just held you, and you're already looking so happy?@>Hahaha...\
name ""
>As she laughs, her tongues squirm and vibrate an incredible amount.@
>The sudden burst of stimulation instantly makes me hard.\
name $name
>Already big...?@
>Do you want me to lick it clean with my big tongue?\
name ""
name "Luka"
>S...Stop...\
name ""
name $name
>Then I'll lick you clean.@
>Don't hold back... Just enjoy it, and ejaculate when you can't take it any longer...\
name ""
name "Luka"
>Ah...!\
name ""
>Her wet tongue slowly starts running up and down my now erect penis.@
>The very tip of her tongue presses against my back muscle as it goes up.\
>I feel my waist pushing up toward her as the skilled tongue licks me clean.\
name "Luka"
>Ah...Ahhh!@> Stop!\
name ""
name $name
>Look at you, moaning already...@
>You taste delicious... I'll lick you even more.\
>I'll taste your whole body, and leave you in a wet hell of tonguing.\
name ""
name "Luka"
>Ah...Ah...@> Hyaa!\
name ""
>All the tongues coiled around my body start to move at once.\
>Each one licks and rubs against any bared skin, drowning me in a hell of pleasure.\
name "Luka"
>Hyaaa!\
name ""
name $name
>You taste so delicious...@
>Writhe in agony more and more... Show me more of that amazing face!\
name ""
>My shoulders, arms, legs, chest...@
>Tongues are licking and cleaning every inch of me.\
>The rough textures wash over me, attacking me with a storm of pleasure.\
name "Luka"
>Ahh!@> Hyaaa!\
name ""
>My body trembles as I twist and squirm in her embrace.@
>But I can't escape from her tongues wet hold.\
>They continue licking me into submission.\
name $name
>Well?@>It's amazing, isn't it?@
>Now I'll have you ejaculate...\
>I'll lick away all of your semen...\
name ""
name "Luka"
>Hyaaa!\
name ""
>My penis starts to pulse as her rough tongue runs even quicker up and down it.@
>With my entire body trembling in her embrace, I tense as it sends me over the edge.\
gosub *syasei1
lsp 700,":a;chara\c_tangh_h2.bmp",0,0
gosub *syasei2
>My penis pulses, and sprays out semen over the Chimera's tongues.@
>The sweet sensations of my orgasm overcome after I come...\
>With a smile, the Chimera uses her tongues to lick up the semen.\
name "Luka"
>Ah...!\
name ""
name $name
>So delicious...@
>I'll lick up all your sweat and semen...\
name ""
name "Luka"
>Haaa!\
name ""
>Even right after ejaculating, her tongue continues licking me, making me writhe as she attacks my sensitive penis.\
name $name
>Well? Did it feel good?@
>Now how do you want it next...?\
>Hmm...@> Teasing your penis is the best, after all.@
>How about I wrap around it like this...?\
name ""
>One of the tongues from her body reaches out to the base of my penis, and slowly coils up...\
lsp 700,":a;chara\c_tangh_h4.bmp",0,0:print 10,500
name "Luka"
>Ahh!\
name ""
>Until finally, it had completely wrapped around my penis.@
>It feels like I'm inside a tube of tongues...\
name $name
>This feels good, doesn't it?@
>Doesn't it feel just like you were in a pussy made out of tongues?\
name ""
mov %hseanwave,12:hseanwave
>Keeping the shape of the tube, she starts slowly moving it up and down on my penis.@
>Each movement makes the rough surface of her tongue rub against me.\
>Neutralized by the intense pleasure, I can only moan as she controls me with her tongues.\
name "Luka"
>Ahh... Haaa...\
name ""
>Covered by the natural lubricant of her saliva, she's able to pump me at an incredible speed with her tongue.\
>No man could withstand this...@
>At the same time, she's using her other tongues to lick clean the rest of my body.\
name $name
>What a shameful voice...@
>And such a loose expression...\
name ""
name "Luka"
>Ahhh!\
name ""
>She brings her face next to mine, and licks me with her normal tongue.@
>Still taking the piston movement of her main tongue, I quickly feel a second orgasm coming.\
name "Luka"
>Ah... Ahhh!\
name ""
>Moaning and screaming, my body goes slack as another orgasm takes me.\
gosub *syasei1
lsp 700,":a;chara\c_tangh_h5.bmp",0,0
gosub *syasei2
name "Luka"
>Ahh...\
name ""
>Spurting, my semen shoots into her tongue tube.@
>As I come, Chimera Tongue looks into my eyes and laughs.\
name $name
>Your fluids really are so delicious...@
>I don't know when I'll be able to find such high quality prey as you again...\
name ""
name "Luka"
>Ah...Ahh...\
name ""
>After my consecutive ejaculations, I can barely manage to catch my breath.@
>As I gasp for air, Chimera Tongue continues licking my face clean.\
name $name
>I've decided never to let you loose.@
>I'll keep you in my tongue hell forever...\
name ""
name "Luka"
>Ah... Hyaaa!\
name ""
lsp 700,":a;chara\c_tangh_h6.bmp",0,0:print 10,500
>Her tongue coils even tighter around me, not even leaving a single gap.@
>Her wet tongue licks and rubs against me, tossing me around in her embrace like I was a piece of meat.\
>It's just as if I was being eaten alive inside a giant mouth...\
name "Luka"
>Ahhh!@>Stop it, help!@
>Ahhh!\
name ""
>With tears leaking from my eyes, I go mad in the agony of pleasure.\
name $name
>Yes, cry and moan as you come in my embrace.@
>I'll lick you from head to foot, over and over...\
name ""
name "Luka"
>Aiiie!\
name ""
gosub *syasei1:gosub *syasei2
>Her tongues keep licking me even during my ejaculation, bringing me to new heights of tortuous pleasure.\
name "Luka"
>Hyaa!@>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>I struggle and cry, but I can't help but reach another climax.@
>I'll never escape from this hell, even if I faint...\
>Licking up my sweat and semen, she keeps licking me for more...@
>Violated by her tongues, my heart and soul are slowly torn into pieces...\
name "Luka"
>Ah... Ah...\
name ""
>The only thing left for me to do is cry tears of unbearable pleasure.\
mov %hseanwave,0:hseanwave
gosub *anten
>...........\
goto *badend




*angels_start

mov $name,"Angel Soldiers"
mov $name2,"Angel Soldier A"
mov $lavel,"angels"
mov $tatie1,"angels_st01"
mov $tatie2,"angels_st02"
mov $tatie3,"angels_st03"
mov $tatie4,"angels_st02"
mov $haikei,"bg029"
mov %monster_x,-280
mov %monster_y,0
mov $tatie1b,"angels_st21"
mov $tatie2b,"angels_st22"
mov $tatie3b,"angels_st23"
mov %monster_xb,-90
mov %monster_yb,0
mov $tatie1c,"angels_st31"
mov $tatie2c,"angels_st32"
mov $tatie3c,"angels_st33"
mov %monster_xc,90
mov %monster_yc,0
mov $tatie1d,"angels_st11"
mov $tatie2d,"angels_st12"
mov $tatie3d,"angels_st13"
mov %monster_xd,280
mov %monster_yd,0
if %nanido=1 mov %max_enemylife,12000
if %nanido=2 mov %max_enemylife,14000
if %nanido=3 mov %max_enemylife,16000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,0
mov %music,9
gosub *maxmp:mov %mp,%max_mp
mov %tekikazu,4
gosub *syutugen2
mov $half_s1,"How do you like our combination play?"
mov $half_s2,"You should give up and come for your own good."
mov $kiki_s1,"You seem to be in ecstasy from our sexual techniques."
mov $kiki_s2,"We'll finish you off soon enough!"
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-300
mov %tukix,300
mov %tekikazu,4
name "Angel Soldier A"
>The disgraced Hero appeared...@
>Everyone, let's work together and break him.@
>As Ilias ordered, neuter him with pleasure!\
name ""
name "Angel Soldier B"
>So... We'll gang rape you.@
>Cover all of our breasts with semen.\
name ""
name "Angel Soldier C"
>R...Resistance is useless...@
>It would be better to give in quickly, ok...?\
name ""
name "Angel Soldier D"
>Haha, even if you cry and scream, I won't stop.@
>You'll get the full force of Heaven's wrath...\
name ""
>Several angel soldiers quickly surround me.@
>I can't break free of this circle so easily...\
>There's only one way to fight in this case...@
>I'll focus on the leader, and break their cohesion!\
mov %sinkou,1
goto *common_main



*angels_v

gosub *face3
name "Angel Soldier A"
>No... A surface dweller shouldn't have this much power...!\
name ""
dwave 1,"se\bun.ogg"
csp 700:print 99,1000,"system\breakup.dll/lrB"
>Angel Soldier A fades away into particles, then vanishes!\
name "Luka"
>Alright!\
name ""
>She appeared to be the leader of these angels.@
>If I took her out, then her subordinates should lose their sense of cohesion...\
name "Angel Soldier B"
>W...What do we do?@
>I...I'm the new leader, right!?\
name ""
name "Angel Soldier C"
>Eh?@>You're still going to fight?@
>Don't you think we should withdraw?\
name ""
name "Angel Soldier D"
>W...Wait a second...@
>What should we do now?\
name ""
>The Angel Soldiers all start arguing with each other.\
name "Angel Soldier B"
>W...We have to withdraw and regroup!\
name ""
dwave 1,"se\escape.ogg"
cspl 700,706:print 10,500
>The remaining Angel Soldiers all run away!\
mov %viclose,1:gosub *victory_plural
mov %getexp,200000:gosub *lvup
mov %2361,1
goto *sean0314



*angels_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name "Angel Soldier A"
>So you'll surrender and accept the damnation of Heaven?\
name ""
name "Angel Soldier B"
>Very good, that's the best choice.@
>We'll bind and violate you with our breasts!\
name ""
goto *angels_a



*angels_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *angels_kousan
if %cmd1=16 goto *angels_onedari
if %cmd1=17 goto *common_skill
goto *angels_main



*angels_a

rnd2 %ransu,1,5
if %ransu=1 gosub *angels_a1:goto *common_main
if %ransu=2 gosub *angels_a2:goto *common_main
if %ransu=3 gosub *angels_a3:goto *common_main
if %ransu=4 gosub *angels_a4:goto *common_main
if %ransu=5 gosub *angels_a5:goto *common_main



*angels_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 goto *angels_a1a
if %ransu=2 goto *angels_a1b
if %ransu=3 goto *angels_a1c



*angels_a1a

name "Angel Soldier A"
>We'll use our hands in rotation...\
name ""
skillname "Angel Group Handjob"
dwave 1,"se\ero_koki1.ogg"
>Angel Soldier A grabs Luka's penis, and pumps it up and down!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,40
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3712
if %nanido<2 damage 80,100
if %nanido=2 damage 85,105
if %nanido=3 damage 90,110
skillname ""
name "Angel Soldier B"
>I'm next... Isn't my hand nice and soft?\
name ""
skillname "Angel Group Handjob"
dwave 1,"se\ero_koki1.ogg"
>Angel Soldier B massages Luka's penis!
if %nanido<2 damage 80,100
if %nanido=2 damage 85,105
if %nanido=3 damage 90,110
skillname ""
name "Angel Soldier C"
>L...Like this...? Hurry up and come, ok?\
name ""
skillname "Angel Group Handjob"
dwave 1,"se\ero_koki1.ogg"
>Angel Soldier C gently strokes Luka's penis!
if %nanido<2 damage 80,100
if %nanido=2 damage 85,105
if %nanido=3 damage 90,110
skillname ""
name "Angel Soldier D"
>Haha... I'm last.
>If I do it like this, you can't stand it, can you?\
name ""
skillname "Angel Group Handjob"
dwave 1,"se\ero_koki1.ogg"
>Angel Soldier D circles her fingers under the neck of Luka's penis, and strokes him!
if %nanido<2 damage 80,100
if %nanido=2 damage 85,105
if %nanido=3 damage 90,110
skillname ""
if %mylife=0 sub %stack,1:return *angels_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*angels_a1b

name "Angel Soldier A"
>Everyone, attack at once!\
name ""
name "Angel Soldier B"
>Be finished in our group handjob!\
name ""
skillname "Angel Group Handjob"
dwave 1,"se\ero_koki1.ogg"
>Angel Soldier's A and B join hands around Luka's penis, and quickly stroke him!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,40
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3712
if %nanido<2 damage 170,190
if %nanido=2 damage 180,200
if %nanido=3 damage 190,210
dwave 1,"se\ero_koki1.ogg"
>Angel Soldier's C and D each fondle one of Luka's balls at the same time!
if %nanido<2 damage 170,190
if %nanido=2 damage 180,200
if %nanido=3 damage 190,210
skillname ""
if %mylife=0 sub %stack,1:return *angels_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*angels_a1c

name "Angel Soldier A"
>Everyone, aim for the tip!\
name ""
name "Angel Soldier D"
>Spray it all over our hands!\
name ""
skillname "Angel Group Handjob"
dwave 1,"se\ero_koki1.ogg"
eng "Angel Soldier A carefully traces her finger up and down Luka's back muscle.":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,40
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
@
skillcount3 3712
>Angel Soldier B rubs Luka's urethral hole with her fingertip!\
>Angel Soldier C traces her finger underneath the neck of Luka's penis!\
>Angel Soldier D tickles the tip of Luka's penis with her fingertips!
if %nanido<2 damage 350,370
if %nanido=2 damage 370,390
if %nanido=3 damage 390,410
skillname ""
if %mylife=0 sub %stack,1:return *angels_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*angels_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 goto *angels_a2a
if %ransu=2 goto *angels_a2b
if %ransu=3 goto *angels_a2c



*angels_a2a

name "Angel Soldier A"
>We'll step on your penis...\
name ""
skillname "Angel Group Footjob"
dwave 1,"se\ero_koki1.ogg"
>Angel Soldier A puts her foot on Luka's penis, and presses down!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,40
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3713
if %nanido<2 damage 90,110
if %nanido=2 damage 100,120
if %nanido=3 damage 110,130
skillname ""
name "Angel Soldier B"
>I'm next... I don't mind if you come all over my foot.\
name ""
skillname "Angel Group Footjob"
dwave 1,"se\ero_koki1.ogg"
>Angel Soldier B uses her dexterous toes to rub Luka's penis!
if %nanido<2 damage 90,110
if %nanido=2 damage 100,120
if %nanido=3 damage 110,130
skillname ""
name "Angel Soldier C"
>Uhm... It doesn't hurt...?\
name ""
skillname "Angel Group Footjob"
dwave 1,"se\ero_koki1.ogg"
>Angel Soldier C steps on Luka's penis, and slowly puts more weight on it!
if %nanido<2 damage 90,110
if %nanido=2 damage 100,120
if %nanido=3 damage 110,130
skillname ""
name "Angel Soldier D"
>My foot will make you come!\
name ""
skillname "Angel Group Footjob"
dwave 1,"se\ero_koki1.ogg"
>Angel Soldier D steps on Luka's penis, then starts violently shaking her leg!
if %nanido<2 damage 90,110
if %nanido=2 damage 100,120
if %nanido=3 damage 110,130
skillname ""
if %mylife=0 sub %stack,1:return *angels_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*angels_a2b

name "Angel Soldier A"
>Everyone, step on his penis!\
name ""
name "Angel Soldier B"
>How does it feel having all of our feet at once!?\
name ""
skillname "Angel Group Footjob"
dwave 1,"se\ero_koki1.ogg"
eng "All of the Angel Soldiers step on Luka's penis!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,40
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
>All four of their feet rub him different ways, assaulting Luka with incredible stimulation!
skillcount3 3713
if %nanido<2 damage 390,410
if %nanido=2 damage 430,450
if %nanido=3 damage 470,490
skillname ""
if %mylife=0 sub %stack,1:return *angels_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*angels_a2c

name "Angel Soldier A"
>How about in pairs?\
name ""
skillname "Angel Group Footjob"
dwave 1,"se\ero_koki1.ogg"
>Angel Soldiers A and B sandwich Luka's penis between two of their feet!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,40
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3713
if %nanido<2 damage 190,210
if %nanido=2 damage 210,230
if %nanido=3 damage 230,250
skillname ""
name "Angel Soldier C"
>Next are us, right...?\
name ""
dwave 1,"se\ero_koki1.ogg"
>Angel Soldier C gently presses on Luka's balls!
>Angel Soldier D uses her toes to play with the tip of Luka's penis!
if %nanido<2 damage 190,210
if %nanido=2 damage 210,230
if %nanido=3 damage 230,250
skillname ""
if %mylife=0 sub %stack,1:return *angels_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*angels_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 goto *angels_a3a
if %ransu=2 goto *angels_a3b
if %ransu=3 goto *angels_a3c



*angels_a3a

name "Angel Soldier A"
>We'll suck you one after another...\
name ""
skillname "Angel Group Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>Angel Soldier A sucks in Luka's penis, and moves quickly up and down!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,40
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3714
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
skillname ""
name "Angel Soldier B"
>Can you endure my vacuum?\
name ""
skillname "Angel Group Blowjob"
dwave 1,"se\ero_buchu3.ogg"
>Angel Soldier B sucks like a vacuum on Luka's penis!
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
skillname ""
name "Angel Soldier C"
>S...Sucking on it...?\
name ""
skillname "Angel Group Blowjob"
dwave 1,"se\ero_pyu1.ogg"
>Angel Soldier C hesitantly sticks out her tongue, and licks the tip of Luka's penis!
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
skillname ""
name "Angel Soldier D"
>Haha... I'll make it nice and wet.\
name ""
skillname "Angel Group Blowjob"
dwave 1,"se\ero_pyu2.ogg"
>Angel Soldier D places her lips over Luka's shaft, and moves up and down it!
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
skillname ""
if %mylife=0 sub %stack,1:return *angels_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*angels_a3b

name "Angel Soldier A"
>Be finished with our double blowjob...\
name ""
skillname "Angel Group Blowjob"
dwave 1,"se\ero_pyu1.ogg"
>Angel Soldier A and B lick Luka's penis from the right and left!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,40
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3714
if %nanido<2 damage 210,230
if %nanido=2 damage 230,250
if %nanido=3 damage 250,270
skillname ""
name "Angel Soldier D"
>I'll keep it in my mouth until you come...\
name ""
skillname "Angel Group Blowjob"
dwave 1,"se\ero_buchu3.ogg"
>Angel Soldier D sucks hard on Luka's penis, as Angel Soldier C licks his balls!
if %nanido<2 damage 210,230
if %nanido=2 damage 230,250
if %nanido=3 damage 250,270
skillname ""
if %mylife=0 sub %stack,1:return *angels_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*angels_a3c

name "Angel Soldier A"
>We'll all make him come with our mouths!\
name ""
name "Angel Soldier B"
>Go mad in pleasure!\
name ""
skillname "Angel Group Blowjob"
dwave 1,"se\ero_pyu1.ogg"
eng "Angel Soldier A eagerly licks the tip of Luka's penis!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,40
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
@
>Angel Soldier B licks underneath the neck of Luka's penis!@
>Angel Soldier C licks up and down Luka's shaft!\
>Angel Soldier D sucks Luka's balls into her mouth!
skillcount3 3714
if %nanido<2 damage 430,450
if %nanido=2 damage 470,490
if %nanido=3 damage 510,530
skillname ""
if %mylife=0 sub %stack,1:return *angels_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*angels_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 goto *angels_a4a
if %ransu=2 goto *angels_a4b
if %ransu=3 goto *angels_a4c



*angels_a4a

name "Angel Soldier A"
>Taste all of our breasts...\
name ""
skillname "Angel Group Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>Angel Soldier A sandwiches Luka's penis between her breasts, and strokes him!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,40
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3715
if %nanido<2 damage 110,130
if %nanido=2 damage 120,140
if %nanido=3 damage 130,150
skillname ""
name "Angel Soldier B"
>Which pair do you like most?\
name ""
skillname "Angel Group Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>Angel Soldier B squeezes Luka hard with her breasts!
if %nanido<2 damage 110,130
if %nanido=2 damage 120,140
if %nanido=3 damage 130,150
skillname ""
name "Angel Soldier C"
>Please come on my breasts...\
name ""
skillname "Angel Group Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>Angel Soldier C gently rubs her breasts against Luka's penis!
if %nanido<2 damage 110,130
if %nanido=2 damage 120,140
if %nanido=3 damage 130,150
skillname ""
name "Angel Soldier D"
>Now I'll make you come!\
name ""
skillname "Angel Group Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>Angel Soldier D presses her breasts hard on Luka's penis, and moves them up and down against him!
if %nanido<2 damage 110,130
if %nanido=2 damage 120,140
if %nanido=3 damage 130,150
skillname ""
if %mylife=0 sub %stack,1:return *angels_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*angels_a4b

name "Angel Soldier A"
>Use two pairs at once to drive him mad!\
name ""
skillname "Angel Group Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>Angel Soldiers A and B press Luka's penis between their breasts!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,40
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3715
if %nanido<2 damage 230,250
if %nanido=2 damage 250,270
if %nanido=3 damage 270,290
skillname ""
name "Angel Soldier C"
>We'll make a penis sandwich with our breasts...\
name ""
skillname "Angel Group Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>Angel Soldiers C and D press their breasts together around Luka's penis, and start moving them up and down!
if %nanido<2 damage 230,250
if %nanido=2 damage 250,270
if %nanido=3 damage 270,290
skillname ""
if %mylife=0 sub %stack,1:return *angels_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*angels_a4c

name "Angel Soldier A"
>Finish him off with all four pairs!\
name ""
name "Angel Soldier D"
>We'll make you come in an instant!\
name ""
skillname "Angel Group Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
eng "The Angel Soldiers press their breasts together around Luka's penis!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,40
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
>All four of their soft breasts come together, crushing Luka in their softness!
skillcount3 3715
if %nanido<2 damage 470,490
if %nanido=2 damage 510,530
if %nanido=3 damage 550,570
skillname ""
if %mylife=0 sub %stack,1:return *angels_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*angels_a5

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll discipline your penis with my whip!"
if %ransu=2 mov $sel1,"I've seen you looking at my whip..."
if %ransu=3 mov $sel1,"I'll give your penis extra punishment!"
name "Angel Soldier A"
eng $sel1:$sel6\
name ""
skillname "Angel Group Items"
dwave 1,"se\spank.ogg"
>Angel Soldier A hits Luka's penis with her whip!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3716
if %nanido<2 damage 120,140
if %nanido=2 damage 130,150
if %nanido=3 damage 140,160
skillname ""
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hehe... Is the melting wax hot?"
if %ransu=2 mov $sel1,"I'll disgrace you with wax..."
if %ransu=3 mov $sel1,"Look at yourself, letting your penis be covered in wax..."
name "Angel Soldier B"
eng $sel1:$sel6\
name ""
skillname "Angel Group Items"
>Angel Soldier B drips hot wax on Luka's penis!
if %nanido<2 damage 120,140
if %nanido=2 damage 130,150
if %nanido=3 damage 140,160
skillname ""
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Tickle tickle tickle!"
if %ransu=2 mov $sel1,"I'll tickle your penis..."
if %ransu=3 mov $sel1,"There are some men who come from this... Hehe."
name "Angel Soldier C"
eng $sel1:$sel6\
name ""
skillname "Angel Group Items"
dwave 1,"se\umaru.ogg"
>Angel Soldier C uses her feather to tickle Luka's penis!
if %nanido<2 damage 120,140
if %nanido=2 damage 130,150
if %nanido=3 damage 140,160
skillname ""
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll make you come with this fake vagina!"
if %ransu=2 mov $sel1,"I'll punish you by making you no more than a stud..."
if %ransu=3 mov $sel1,"You're going to come without even touching something real!"
name "Angel Soldier D"
eng $sel1:$sel6\
name ""
skillname "Angel Group Items"
dwave 1,"se\ero_buchu1.ogg"
>Angel Soldier D pumps Luka quickly with the fake vagina she's holding!
if %nanido<2 damage 120,140
if %nanido=2 damage 130,150
if %nanido=3 damage 140,160
skillname ""
if %mylife=0 sub %stack,1:return *angels_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*angels_onedari

mov $list1,"Angel Group Handjob"
if %3712>0 mov %list_num1,1
mov $list2,"Angel Group Footjob"
if %3713>0 mov %list_num2,1
mov $list3,"Angel Group Blowjob"
if %3714>0 mov %list_num3,1
mov $list4,"Angel Group Tit Fuck"
if %3715>0 mov %list_num4,1
mov $list5,"Angel Group Items"
if %3716>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *angels_onedari1
if %cmd1=12 goto *angels_onedari2
if %cmd1=13 goto *angels_onedari3
if %cmd1=14 goto *angels_onedari4
if %cmd1=15 goto *angels_onedari5
if %cmd1=-1 goto *angels_main
goto *angels_onedari



*angels_onedari1

gosub *onedari_syori
name "Angel Soldier A"
>You want your punishment to be dealt by our hands?@
>Very well... Scatter your semen all over our hands!\
name ""
gosub *angels_a1
skip -1



*angels_onedari2

gosub *onedari_syori
name "Angel Soldier A"
>You want your punishment to be dealt by our feet?@
>Very well... Scatter your semen all over our feet!\
name ""
gosub *angels_a2
skip -1



*angels_onedari3

gosub *onedari_syori
name "Angel Soldier A"
>You want your punishment to be dealt by our mouths?@
>Very well... Scatter your semen all over our faces!\
name ""
gosub *angels_a3
skip -1



*angels_onedari4

gosub *onedari_syori
name "Angel Soldier A"
>You want your punishment to be dealt by our breasts?@
>Very well... Scatter your semen all over our breasts!\
name ""
gosub *angels_a4
skip -1



*angels_onedari5

gosub *onedari_syori
name "Angel Soldier A"
>You want your punishment to be dealt by our items?@
>Good... We'll let you taste the pleasure our items can bring!\
name ""
gosub *angels_a5
skip -1



*angels_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 699,":a;chara\angels_bk07.bmp",-280,0
lsp 701,":a;chara\angels_bk27.bmp",-90,0
lsp 703,":a;chara\angels_bk37.bmp",90,0
lsp 705,":a;chara\angels_bk07.bmp",280,0
gosub *syasei2
>As the group of angels all stroke and rub Luka's penis with their hands, he comes, covering their palms in semen.\
mov %viclose,1:gosub *lose
mov %2661,%2661+1:if %2661=1 mov %count_koenemy,%count_koenemy+1
if %2661>%count_most mov %count_most,%2661:mov $count_mostname,$name
count 5,16
mov $bad1,"The Angel Soldiers forced Luka to come with their hands."
gosub *face2
name "Angel Soldier A"
>You came all over our hands...@
>Now our palms are all dirty...\
name ""
goto *angels_h



*angels_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 699,":a;chara\angels_bk05.bmp",-280,0
lsp 701,":a;chara\angels_bk05.bmp",-90,0
lsp 703,":a;chara\angels_bk05.bmp",90,0
lsp 705,":a;chara\angels_bk05.bmp",280,0
gosub *syasei2
>As the group of angels all step and stroke Luka with their feet, he comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2661,%2661+1:if %2661=1 mov %count_koenemy,%count_koenemy+1
if %2661>%count_most mov %count_most,%2661:mov $count_mostname,$name
count 6,16
mov $bad1,"The Angel Soldiers forced Luka to come with their feet."
gosub *face2
name "Angel Soldier A"
>You came all over our feet...@
>Now our feet are all dirty...\
name ""
goto *angels_h



*angels_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 699,":a;chara\angels_bk01.bmp",-280,0
lsp 701,":a;chara\angels_bk01.bmp",-90,0
lsp 703,":a;chara\angels_bk01.bmp",90,0
lsp 705,":a;chara\angels_bk01.bmp",280,0
gosub *syasei2
>As each of the angels sucks and licks on Luka, he comes, covering their faces in semen.\
mov %viclose,1:gosub *lose
mov %2661,%2661+1:if %2661=1 mov %count_koenemy,%count_koenemy+1
if %2661>%count_most mov %count_most,%2661:mov $count_mostname,$name
count 4,16
mov $bad1,"The Angel Soldiers forced Luka to come with their mouths."
gosub *face2
name "Angel Soldier A"
>You came all over our faces...@
>Now our faces are all dirty...\
name ""
goto *angels_h



*angels_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 699,":a;chara\angels_bk02.bmp",-280,0
lsp 701,":a;chara\angels_bk02.bmp",-90,0
lsp 703,":a;chara\angels_bk02.bmp",90,0
lsp 705,":a;chara\angels_bk02.bmp",280,0
gosub *syasei2
>Violated by the Angel Soldier's intense breast attack, Luka comes, covering their chests in semen.\
mov %viclose,1:gosub *lose
mov %2661,%2661+1:if %2661=1 mov %count_koenemy,%count_koenemy+1
if %2661>%count_most mov %count_most,%2661:mov $count_mostname,$name
count 7,16
mov $bad1,"The Angel Soldiers forced Luka to come using their breasts."
gosub *face2
name "Angel Soldier A"
>You came all over our breasts...@
>Now our breasts are all dirty...\
name ""
goto *angels_h



*angels_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 699,":a;chara\angels_bk06.bmp",-280,0
lsp 701,":a;chara\angels_bk26.bmp",-90,0
lsp 703,":a;chara\angels_bk36.bmp",90,0
gosub *syasei2
>As each of the Angels use their tools to torment Luka, he comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2661,%2661+1:if %2661=1 mov %count_koenemy,%count_koenemy+1
if %2661>%count_most mov %count_most,%2661:mov $count_mostname,$name
count 27,16
mov $bad1,"The Angel Soldiers forced Luka to come using their special items."
gosub *face2
name "Angel Soldier A"
>Were our items too much for you?@
>You got all of our special tools so dirty...\
name ""
goto *angels_h



*angels_h

mov $bad2,"Continually gang-raped by the Angel Soldier's breasts, Luka's punishment continues on..."
if %2661=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
>Too weak to resist any longer, I'm left helpless as the Angel Soldiers surround me.\
name "Angel Soldier"
>Now then, your punishment of 100,000 years will begin.@
>As Goddess Ilias ordered, we will rape you with our breasts.\
>We will rape you in turn.@>Are you ready?@
>I'll have you taste my breasts first...\
name ""
name "Luka"
>No... Stop...\
name ""
mov %hseanwave,17:hseanwave
cspl 690,706
lsp 700,":a;chara\angels_h01.bmp",0,0:print 10,500
>One of the angels quickly pushes her breasts forward, and slips my penis between them.@
>I feel my penis sinking in, her soft mounds pressing against both sides.\
name "Luka"
>Ahhh...!\
name ""
>The warm, oppressive feeling hits me as soon as I'm caught between them.@
>I twist side to side, trying to escape the excessive sensation of her soft breasts pressing against my penis.\
name "Luka"
>Ahhhh...\
name ""
name "Angel Soldier"
>Oh come now... Are you already moaning just from me sandwiching it?@
>It isn't over yet...@> I'm going to slowly squeeze and rub it...\
name ""
name "Luka"
>Ahhh!!\
name ""
>The angel starts pressing on her breasts, pushing into my hard penis between them.@
>The increasing pressure slowly causes a sweet pleasure to ache through my lower body.\
>As she slowly crushes my penis between her soft breasts, I already feel myself nearing my limit.@
>In moments, I'm already breathing hard and gritting my teeth to endure coming.\
name "Luka"
>Ahh... I'm going to come...\
name ""
name "Angel Soldier"
>Already...?@>Wow, how pitiful...@
>I've never seen a man so quick to orgasm.\
>...Now, go ahead and stain my breasts dirty.@
>I'll squeeze out your own milk with my breasts, and make you taste humiliation...\
name ""
>Delivering the finishing blow, the angel presses down hard on her breasts, crushing my penis with their softness.\
>My penis feels like it's sinking right into her soft breasts, dying my head white as explosions of pleasure take hold of my body.\
name "Luka"
>Ah... Ahhh....\
name ""
mov %hseanwave,0:hseanwave
gosub *syasei1
lsp 700,":a;chara\angels_h02.bmp",0,0
gosub *syasei2
>Pressed between her breasts, my penis pulses.@
>And stuck in her cleavage, my semen spurts out, filling up her valley.\
name "Luka"
>Ahh...\
name ""
>My body trembles as I look at my semen, spilling out from between her breasts.@
>The angel just looks at me, grinning.\
name "Angel Soldier"
>Hmph... Pathetic.@
>Letting out such a wretched face from this small amount of pleasure.\
name ""
>With those final words, the angel parts from me.@
lsp 700,":a;chara\angels_h03.bmp",0,0:print 10,500
>Before I can think I'm free, another angel steps up and sandwiches my penis between her breasts.\
name "Luka"
>Ahhh!\
name ""
name "Angel Soldier"
>Hehe, I'm next.@
>Get ready, because I'm going to use my breasts to make you come this time!\
name ""
>The next angel to toy with me has a provocative tone.@
>She stares at me the whole time, sneering.\
>They all look the same, but their personalities are all different...\
name "Angel Soldier"
>Hahaha...@
>It's good, isn't it!?\
name ""
mov %hseanwave,17:hseanwave
>After sandwiching my penis between her breasts, she starts using her hands to lift and lower them.@
>The last angel used mostly pressure, but this one is using her breasts to stroke me...\
>As her soft, elastic breasts quickly move up and down, my lower body starts to unbearably ache.\
name "Luka"
>Ahh...!\
name ""
name "Angel Soldier"
>Hahaha... You seem to be really feeling it!@
>It's an absolute joke controlling you.\
>I'll really enjoy toying with you for a long time...@
>Hmm... Or should I just force you to come in an instant?\
name ""
>As the angel uses her breasts to pump me, she coldly laughs.@
>In complete control of my reactions, she casually toys with my body.\
name "Angel Soldier"
>The others are still waiting for their turn...@
>So I'll finish you off quickly!\
name ""
name "Luka"
>Ahhh...\
name ""
>The angel suddenly picks up speed, moving her breasts far faster than ever before.@
>She's going for the last spurt, wanting to make me ejaculate in seconds as she stated.\
>Just as she intended, the pleasure is too much to take.@
>My lower body is already going numb, as I feel myself unconsciously pushing up into her breasts.\
name "Angel Soldier"
>Now let me see your miserable orgasm face!@
>Cover my breasts with your semen!\
name ""
name "Luka"
>Hyaaa!!\
name ""
>My body spasms as her pumping motions keep increasing in speed.@
>With a final gasp, I let myself go, giving over to the pleasure from her breasts.\
gosub *syasei1
lsp 700,":a;chara\angels_h04.bmp",0,0
gosub *syasei2
>Even as I ejaculate between her breasts, she doesn't stop stroking me.@
>My semen sprays out, and flies all over her body.\
mov %hseanwave,0:hseanwave
name "Luka"
>Ahhh...\
name ""
>So easily forcing me to come, I tremble in humiliation as she looks at my semen on her.\
name "Angel Soldier"
>Hahaha... You let out quite a lot.@
>Did it really feel that good?\
name ""
>With a scornful smile, the angel turns me over to the next one.@
lsp 700,":a;chara\angels_h05.bmp",0,0:print 10,500
>The next angel that approaches looks timid as she sandwiches myself between her giant breasts.\
name "Angel Soldier"
>T...Then I'm next...@
>I...I'll move now...\
name ""
name "Luka"
>Ah...\
name ""
mov %hseanwave,17:hseanwave
>She starts moving her breasts in very slow motion.@
>Each movement and squeeze she gives is carefully thought about before she does it.\
>Every so often she shakes her breasts side to side, all while keeping up her movements.@
>The light, gentle stimulation makes my whole body relax in the calm bliss of the moment.\
name "Angel Soldier"
>I...Is this good...?@
>Are you enjoying it?\
name ""
name "Luka"
>Haa... It feels good...\
name ""
name "Angel Soldier"
>Ok, then I'll keep going...\
name ""
>Although she looks embarrassed, she continues her slow motion caress.@
>The smooth, continual pleasure almost makes me feel like I could melt away in her breasts.\
>The slow, gradual stimulation brings me to a height far quicker than I thought possible.\
name "Luka"
>Ah... I'm coming...!\
name ""
name "Angel Soldier"
>Ehh!?\
name ""
>Surprised, she suddenly presses her breasts hard together.@
>The final shock of pleasure is enough to instantly send me over.\
name "Luka"
>Ahh...\
name ""
gosub *syasei1
lsp 700,":a;chara\angels_h06.bmp",0,0
gosub *syasei2
>I erupt in her slow motion caress, almost on accident.@
>Coming faster than I thought possible, I feel ashamed.\
mov %hseanwave,0:hseanwave
name "Angel Soldier"
>Wah...@> You came...@
>That was so easy...@>Why was I so nervous about something that simple?\
name ""
>The angel parts from me, looking more confident about herself after how quickly I came.\
cspl 690,699
lsp 700,":a;chara\angels_h07.bmp",0,0:print 10,500
name "Angel Soldier"
>Hmph. I'll make you come in an instant now.@
>I want to make you feel as miserable as possible.\
name ""
mov %hseanwave,17:hseanwave
>Declaring that, the angel starts quickly moving her left and right breasts up and down in opposite time with each other.\
>Going far faster than any of the others, I'm already on the edge in only moments.\
name "Luka"
>Ahh...\
name ""
name "Angel Soldier"
>Mmm... I love that miserable voice!@
>Now let me see how fast you can come!\
name ""
>She moves faster and faster, edged on by my moans of pleasure.@
>The intense movements make me feel like I could melt away between her breasts.\
>Feeling too good, my waist starts to shake and spasm in time with her movements.\
name "Luka"
>Ahh... I'm going to come!\
name ""
name "Angel Soldier"
>I told you, didn't I?@
>I'd make you come in an instant!@> Now come!\
name ""
name "Luka"
>Ahhh!!\
name ""
mov %hseanwave,0:hseanwave
gosub *syasei1
lsp 700,":a;chara\angels_h08.bmp",0,0
gosub *syasei2
>I shiver as I'm led to an ejaculation in mere moments after she started.@
>The angel just looks at me with a superior smile on her face.\
name "Angel Soldier"
>Hmph. Disappointing.@
>That was the easiest instant kill I've ever seen.\
name ""
>The angel parts from me, handing me over to yet another soldier.\
lsp 700,":a;chara\angels_h09.bmp",0,0:print 10,500
name "Angel Soldier"
>Hehehe... You've already come so many times.@
>I'll give you a nice, tender ejaculation.\
name ""
>While giggling, the new angel sandwiches my penis between her giant breasts.@
mov %hseanwave,17:hseanwave
>As soon as I'm wedged between them, she starts moving.\
>Softly up and down, she's careful to be gentle to my sensitive penis.\
name "Luka"
>Ah...ah...\
name ""
name "Angel Soldier"
>Hehehe... Go ahead and come whenever you want.@
>I don't mind getting my chest a little dirty.\
name ""
>The angel softly whispers in my ear as she strokes her breasts against me.@
>Almost immediately, I'm brought to another height with her soft touch.\
name "Luka"
>Ahhh...\
name ""
gosub *syasei1
lsp 700,":a;chara\angels_h10.bmp",0,0
gosub *syasei2
>A big smile crosses her face as I come.@
>As I spurt semen between her breasts, she softly giggles.\
mov %hseanwave,0:hseanwave
name "Angel Soldier"
>Oh my, my... Look at all that...@> Did it feel good?@
>But there's a lot, lot more to go.@
>I'll be nice and gentle when it's my turn again, too.\
name ""
name "Luka"
>Ahh...\
name ""
name "Angel Soldier"
>I'm next!\
name ""
mov %hseanwave,17:hseanwave
>As soon as that angel was finished, another one eagerly jumped up to take her place.@
>Once she was done, yet another one came forward.\
>It's truly a prison of pleasure that I cannot escape from.@
>Unable to get away, I'm forced to stay here accepting my punishment from the army of angels.\
name "Luka"
>Ahhh!@
>Stop... Stop already!\
name ""
gosub *syasei1:gosub *syasei2
>The gang-rape by the angels continues on, despite my cry...@
>One after another, they'll take turns using their breasts to rape me for a near eternity as my punishment...\
mov %hseanwave,0:hseanwave
gosub *anten
>..............\
goto *badend



*nagael_start

mov $name,"Principality Nagael"
mov $name2,"Nagael"
mov $lavel,"nagael"
mov $tatie1,"nagael_st01"
mov $tatie2,"nagael_st02"
mov $tatie3,"nagael_st03"
mov $tatie4,"nagael_h1"
mov $haikei,"bg029"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,17000
if %nanido=2 mov %max_enemylife,19000
if %nanido=3 mov %max_enemylife,21000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,0
mov %music,9
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free from Nagael!"
mov $mogaku_anno2,"Luka broke free from Nagael!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"No matter how you struggle, I won't let you escape..."
mov $mogaku_sel2,"It's always sad to see criminals like you struggle..."
mov $mogaku_sel3,"Does that mean you wish for me to make my hold even tighter?"
mov $mogaku_sel4,"You cannot escape from my judgement."
mov $mogaku_sel5,"Give up and accept your status as a criminal."
mov $mogaku_dassyutu1,"You escaped from my children..."
mov $mogaku_dassyutu2,"Your crimes only continue to increase."
mov $half_s1,"How does it feel to be punished?"
mov $half_s2,"I'll continue this until you ejaculate."
mov $kiki_s1,"You seem near your limit."
mov $kiki_s2,"Ejaculate, and fall to your knees before me."
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,4
mov %owaza_count3a,4
mov $name,"Nagael"
name "Luka"
>Stop it!\
name ""
dwave 1,"se\slash.ogg"
>I quickly jump forward and cut the snake holding the Elf!@
dwave 2,"se\down.ogg"
>Released from the hold, the Elf's body crumples to the ground.\
name $name
>Oh... That's quite a nice slash you have there.@
>Are you perhaps that disgraced Hero I've heard rumors about?\
>I am Principality Nagael, the judge and punisher of criminals.\
>My duty is to use these snakes to force criminals to shed tears of remorse.\
name ""
name "Luka"
>Neither I, nor the Elves, are criminals!@
>You can't just blanket everyone as a criminal to serve Ilias' wishes!\
name ""
name $name
>Is that your only defense?@
>Very well, I have judged you...@>Your punishment is set to 30,000 years of violation.\
name ""
>Sitting on her throne of snakes, Nagael's cold eyes flash at me.\
name $name
>My snakes have been trained to deliver sexual abuse to criminals.\
>I will make you confess to your crimes during your 30,000 years of punishment!\
name ""
goto *common_main



*nagael_v

gosub *face3
name $name
>This can't be...@
>How could I be defeated by a criminal!?\
name ""
dwave 1,"se\bun.ogg"
csp 700:print 99,1000,"system\breakup.dll/lrB"
>Principality Nagael fades away into particles, then vanishes!\
mov $name,"Principality Nagael"
mov %viclose,1:gosub *victory
mov %getexp,200000:gosub *lvup
mov %2359,1
goto *sean0315



*nagael_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>So you accepted your crimes.@
>But my cute snakes will not go any easier on you.\
name ""
goto *nagael_a



*nagael_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *nagael_kousan
if %cmd1=16 goto *nagael_onedari
if %cmd1=17 goto *common_skill
goto *nagael_main



*nagael_a

if %kousoku=1 rnd2 %ransu,1,2
if %kousoku=1 && %ransu=1 gosub *nagael_a6:goto *common_main
if %kousoku=1 && %ransu=2 gosub *nagael_a7:goto *common_main
rnd2 %ransu,1,5
if %ransu=1 gosub *nagael_a1:goto *common_main
if %ransu=2 gosub *nagael_a2:goto *common_main
if %ransu=3 gosub *nagael_a3:goto *common_main
if %ransu=4 && %owaza_count3a>5 gosub *nagael_a4:goto *common_main
if %ransu=5 && %owaza_count1a>5 gosub *nagael_a5:goto *common_main
skip -6



*nagael_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll humiliate you with this hand..."
if %ransu=2 mov $sel1,"How does it feel being abused by a hand?"
if %ransu=3 mov $sel1,"I'll make you come with my hand..."
name $name
eng $sel1:$sel6\
name ""
skillname "Punishing Handjob"
dwave 1,"se\ero_koki1.ogg"
>Nagael grips Luka's penis, and fiercely strokes him!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3717
if %nanido<2 damage 280,310
if %nanido=2 damage 310,340
if %nanido=3 damage 340,370
skillname ""
if %mylife=0 sub %stack,1:return *nagael_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*nagael_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck out the proof of your disgrace."
if %ransu=2 mov $sel1,"I'll humiliate you with my mouth."
if %ransu=3 mov $sel1,"Meet your end as my tongue curls around it..."
name $name
eng $sel1:$sel6\
name ""
skillname "Punishing Blowjob"
dwave 1,"se\ero_buchu3.ogg"
>Nagael sucks hard on Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3718
if %nanido<2 damage 290,320
if %nanido=2 damage 320,350
if %nanido=3 damage 350,380
skillname ""
if %mylife=0 sub %stack,1:return *nagael_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*nagael_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Spray your seed all over my chest..."
if %ransu=2 mov $sel1,"I'll squeeze out your semen with my proof of womanhood..."
if %ransu=3 mov $sel1,"Stain my chest with the proof of your sin..."
name $name
eng $sel1:$sel6\
name ""
skillname "Punishing Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>Nagael squeezes Luka's penis between her breasts, and crushes it!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3719
if %nanido<2 damage 300,330
if %nanido=2 damage 330,360
if %nanido=3 damage 360,390
skillname ""
if %mylife=0 sub %stack,1:return *nagael_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*nagael_a4

add %stack,1
mov %owaza_count3a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"A criminal cannot complain about being trampled..."
if %ransu=2 mov $sel1,"I'm going to trample your manhood... Are you ready?"
if %ransu=3 mov $sel1,"I'll make you ejaculate with my foot..."
name $name
eng $sel1:$sel6\
name ""
skillname "Foot of Divine Punishment"
dwave 1,"se\ero_koki1.ogg"
>Nagael steps on Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,70
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3720
if %nanido<2 damage 200,220
if %nanido=2 damage 210,230
if %nanido=3 damage 220,240
dwave 1,"se\ero_koki1.ogg"
>She slowly increases the weight!
if %nanido<2 damage 200,220
if %nanido=2 damage 210,230
if %nanido=3 damage 220,240
dwave 1,"se\ero_koki1.ogg"
>Shaking her foot violently, she uses it to intensely stroke Luka's penis!
if %nanido<2 damage 200,220
if %nanido=2 damage 210,230
if %nanido=3 damage 220,240
skillname ""
if %mylife=0 sub %stack,1:return *nagael_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*nagael_a5

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 8
name $name
if %first_sel1=1 skip 3
>Shall I have my children enact your punishment?@
skip 2
>Shall I have my children enact your punishment again?@
>Go get him...\
name ""
skillname "Judge Snake's Restraint"
dwave 1,"se\ero_makituki3.ogg"
eng "Nagael's snakes coil around Luka's body!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
@
mov %kousoku,1:gosub *status_print
>Luka has been bound by Nagael's snakes!\
skillname ""
name $name
if %first_sel1=1 skip 4
>My children are skilled at punishing criminals.@
>They will completely violate you...\
skip 3
>This time you won't escape.@
>They will completely violate you...\
name ""
mov %first_sel1,1
if %nanido<2 mov %genmogaku,2
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,3
sub %stack,1
return



*nagael_a6

add %stack,1
>Luka has been bound by Nagael's snakes...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll have them tighten..."
if %ransu=2 mov $sel1,"I can't even count the number of criminals my children have strangled."
if %ransu=3 mov $sel1,"Is it tight? Painful?"
name $name
eng $sel1:$sel6\
name ""
skillname "Judge Snake's Curse"
dwave 1,"se\ero_simetuke1.ogg"
>The snakes tighten hard around Luka's body!
skillcount3 3721
if %nanido<2 damage 250,280
if %nanido=2 damage 280,310
if %nanido=3 damage 310,340
skillname ""
if %mylife=0 sub %stack,1:return *nagael_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*nagael_a7

add %stack,1
>Luka has been bound by Nagael's snakes...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"They'll take turns licking you, criminal."
if %ransu=2 mov $sel1,"My children will lick up your semen... A suitable finish for a criminal."
if %ransu=3 mov $sel1,"Scatter your seed among my children, criminal."
name $name
eng $sel1:$sel6\
name ""
skillname "Judge Snake's Punishment"
dwave 1,"se\ero_pyu2.ogg"
>The snake's tongues all extend at once, licking Luka's body clean!\
>One of the snake's tongues coils around Luka's penis at the same time!
skillcount3 3722
if %nanido<2 damage 260,290
if %nanido=2 damage 290,320
if %nanido=3 damage 320,350
skillname ""
if %mylife=0 sub %stack,1:return *nagael_h6
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*nagael_onedari

mov $list1,"Punishing Handjob"
if %3717>0 mov %list_num1,1
mov $list2,"Punishing Blowjob"
if %3718>0 mov %list_num2,1
mov $list3,"Punishing Tit Fuck"
if %3719>0 mov %list_num3,1
mov $list4,"Foot of Divine Punishment"
if %3720>0 mov %list_num4,1
mov $list5,"Judge Snake's Curse"
if %3721>0 mov %list_num5,1
mov $list6,"Judge Snake's Punishment"
if %3722>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *nagael_onedari1
if %cmd1=12 goto *nagael_onedari2
if %cmd1=13 goto *nagael_onedari3
if %cmd1=14 goto *nagael_onedari4
if %cmd1=15 goto *nagael_onedari5
if %cmd1=16 goto *nagael_onedari6
if %cmd1=-1 goto *nagael_main
goto *nagael_onedari



*nagael_onedari1

gosub *onedari_syori
name $name
>You wish for your punishment to be dealt by my hand?\
>Very well then, release the proof of your disgrace in my palm.\
name ""
gosub *nagael_a1
skip -1



*nagael_onedari2

gosub *onedari_syori
name $name
>You wish for your punishment to be dealt by my mouth?\
>Very well then, release the proof of your disgrace in my mouth.\
name ""
gosub *nagael_a2
skip -1



*nagael_onedari3

gosub *onedari_syori
name $name
>You wish for your punishment to be dealt by my breasts?\
>Very well then, release the proof of your disgrace on my breasts.\
name ""
gosub *nagael_a3
skip -1



*nagael_onedari4

gosub *onedari_syori
name $name
>You wish for your punishment to be dealt by my foot?\
>Very well then, release the proof of your disgrace on my foot.\
name ""
gosub *nagael_a4
skip -1



*nagael_onedari5

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You wish for my cute snakes to squeeze you?@
>I cannot understand masochists like you...\
name ""
if %kousoku=0 gosub *nagael_a5
gosub *nagael_a6
skip -1



*nagael_onedari6

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You wish to be overrun by my cute snakes?\
>You truly are miserable... Desiring pleasure in this situation.\
name ""
if %kousoku=0 gosub *nagael_a5
gosub *nagael_a7
skip -1



*nagael_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 697,":a;chara\nagael_bk07.bmp",0,0
gosub *syasei2
>As Nagael strokes Luka with her hand, he comes, covering her hands in semen.\
mov %viclose,1:gosub *lose
mov %2659,%2659+1:if %2659=1 mov %count_koenemy,%count_koenemy+1
if %2659>%count_most mov %count_most,%2659:mov $count_mostname,$name
count 5,16
mov $bad1,"Nagael forced Luka to come with her hands."
gosub *face2
name $name
>Look at how much you got on my hands...@
>Filthy...\
name ""
goto *nagael_h



*nagael_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\nagael_bk01.bmp",0,0
gosub *syasei2
>As Nagael's warm mouth sucks on Luka, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2659,%2659+1:if %2659=1 mov %count_koenemy,%count_koenemy+1
if %2659>%count_most mov %count_most,%2659:mov $count_mostname,$name
count 4,16
mov $bad1,"Nagael forced Luka to come with her mouth."
gosub *face2
name $name
>Nnn... Look at how much you released in my mouth...@
>Filthy...\
name ""
goto *nagael_h



*nagael_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\nagael_bk02.bmp",0,0
gosub *syasei2
>As Nagael's soft breasts press against Luka's penis, he comes, covering her chest in semen.\
mov %viclose,1:gosub *lose
mov %2659,%2659+1:if %2659=1 mov %count_koenemy,%count_koenemy+1
if %2659>%count_most mov %count_most,%2659:mov $count_mostname,$name
count 7,16
mov $bad1,"Nagael forced Luka to come with her breasts."
gosub *face2
name $name
>Look at how much you got on my breasts...@
>Filthy...\
name ""
goto *nagael_h



*nagael_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\nagael_bk03.bmp",0,0
gosub *syasei2
>As Nagael steps on Luka's penis, he comes, covering her foot in semen.\
mov %viclose,1:gosub *lose
mov %2659,%2659+1:if %2659=1 mov %count_koenemy,%count_koenemy+1
if %2659>%count_most mov %count_most,%2659:mov $count_mostname,$name
count 6,16
mov $bad1,"Nagael forced Luka to come with her foot."
gosub *face2
name $name
>Look at how much you got on my foot...@
>Filthy...\
name ""
goto *nagael_h



*nagael_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\nagael_h2.bmp",0,0
gosub *syasei2
>As Nagael's snakes tighten around Luka's body, he comes, tasting a mix of pleasure and pain.\
mov %viclose,1:gosub *lose
mov %2659,%2659+1:if %2659=1 mov %count_koenemy,%count_koenemy+1
if %2659>%count_most mov %count_most,%2659:mov $count_mostname,$name
count 16,16
mov $bad1,"Luka came as Nagael's snakes strangled him."
gosub *face2
name $name
>Ejaculating while being squeezed...@
>You are so miserable, there are no words...\
name ""
goto *nagael_h



*nagael_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\nagael_h2.bmp",0,0
gosub *syasei2
>As the snakes lick every inch of his body, Luka comes, covering Nagael's snakes with semen.\
mov %viclose,1:gosub *lose
mov %2659,%2659+1:if %2659=1 mov %count_koenemy,%count_koenemy+1
if %2659>%count_most mov %count_most,%2659:mov $count_mostname,$name
count 4,16
mov $bad1,"Luka came as Nagael's snakes licked him all over."
gosub *face2
name $name
>The criminal seems to have ejected his filth...@
>Now the true punishment begins.\
name ""
goto *nagael_h



*nagael_h

mov $bad2,"With his heart broken by the pleasure, Luka continues receiving his punishment."
if %2659=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 goto *nagael_hb
name "Luka"
>Ahh...\
name ""
name $name
>It seems your will to resist is gone.@
>Now that your body has succumbed, next shall I take your heart?\
name "Luka"
>W...What are... Ahh!\
name ""
dwave 1,"se\ero_makituki3.ogg"
cspl 690,699
lsp 700,":a;chara\nagael_h1.bmp",0,0:print 10,500
>Nagael's snakes all rush out toward me, weakened on the ground.@
>With quick, deft movements, they bind my body in their long bodies.\
>Two of them bury their heads in my groin area.@
>As their tongues quickly flick in and out of their mouths, they slowly approach my penis.\
>It's obvious what they're aiming for...\
goto *nagael_hb



*nagael_hb

name "Luka"
>S...Stop...\
name ""
name $name
>Now than, shall we convert you...?@
>You'll repent your crimes, and swear yourself over to Ilias.\
>If you don't...@>Take this.\
name ""
mov %hseanwave,20:hseanwave
lsp 690,":a;chara\nagael_ct01.bmp",0,0:print 10,500
>At Nagael's command, the snakes by my groin start to move.@
>Their quick tongues reach out toward my penis, and start licking.\
name "Luka"
>Ahhhh!!\
name ""
>The next moment, I was screaming.@
>The pleasure is so intense, the thoughts are instantly driven from my mind.\
>Their quick tongues flick and lick at me, shooting in and out faster than I can even see.\
>One of them quickly bites on my glans, its toothless mouth sending waves of bliss through me.@
>I writhe in agony, completely toyed with by her snakes.\
name "Luka"
>Hyaaa!@> S...Stop!\
name ""
name $name
>Until you convert, this won't stop.@>Do you swear to devote yourself to Ilias?\
name ""
name "Luka"
>W...Who would do...@
>Ahhh!\
name ""
>One of the snake's rough tongues coils around my glans, its tip flicking against my urethral opening.@
>At the same time, another snake nibbles on my glans.\
>It's as if they're eagerly devouring my penis, trapping me in a prison of pleasure.\
name "Luka"
>S...Stop...@>Hyaaa!\
name ""
>The violent pleasure makes me writhe and squirm in her hold.@
>Even if I'm horrified, my body reacts as a man to the stimulation.\
>Pre-come is already leaking out, flowing out in seconds from the snake's assault.\
name $name
>I think you know, but...@
>If you ejaculate, their violation will get far more severe.\
>This torture will only get more intense as your penis gets more sensitive.@
>I think it would be best if you converted before you go mad.\
name ""
name "Luka"
>Guh... I would never... Convert...@
>Ahh!\
name ""
>Imagining just how intense this would get if I ejaculate, I tense up my lower body to hold back my orgasm.\
name "Luka"
>Ah...!\
name ""
>But the skilled snake's tongues put me back into a corner.@
>I can feel their quick tongues going up and down my back muscle, and running over my tip...\
>I don't think I can hold on much longer...\
name $name
>You're already at your limit, I see...@
>Very well then, I'll force you to come.\
name ""
>Responding to Nagael's instructions, their tongue movements get far more intense.\
>The tongues coiled around my penis slightly contract, as the ones licking me move even faster.\
name "Luka"
>Ahh...\
name ""
>The desire to release, to accept the pleasure finally overpowers my brain.@
>Relaxing my waist, I give in and let the pleasure overtake me.\
gosub *syasei1
lsp 700,":a;chara\nagael_h2.bmp",0,0
lsp 690,":a;chara\nagael_ct02.bmp",0,0
gosub *syasei2
name "Luka"
>Hyaaa!\
name ""
>My penis pulses, and shoots my semen straight up into the air.@
>Seeing my semen released, the snakes all rush at my penis, eager to lick up the released semen.\
name "Luka"
>Ahhh!@>Stop, stop!\
name ""
>The tongues lick and flick at my urethral opening as I ejaculate, each snake trying to be the first to get at the semen.@
>The violent stimulation during my orgasm makes me scream and cry out, spraying my semen all over.\
name "Luka"
>Hyaaa!\
name ""
>My body goes into convulsions as the relentless attack on my weakest point continues.\
name $name
>If you want to escape from those tongues, you must convert.@
>Swear your eternal loyalty to Ilias.\
name ""
>Underneath this violent assault of pleasure, I feel my reason and faith crumbling.\
name "Luka"
>I s...swear...@> S...Stop this!\
name ""
>Wanting to do anything to escape, I tell her what she wants to hear.@
>I swear my loyalty to Ilias.\
name $name
>...I see, I've heard you.@
>You will retake Ilias' faith as your own, like before?\
name ""
name "Luka"
>Y...Yes...@> So please, stop...\
name ""
>Wanting to escape from this hell of pleasure, I spit out the words before I think about them.@
>With them, my heart itself breaks.\
name $name
>...My purpose has been achieved with that.@
>Now that you are a firm believer in Ilias again, this torture is unnecessary.\
name ""
mov %hseanwave,0:hseanwave
>Her snakes part from my penis, finally releasing me.@
>Finally free, I breath a large sigh of relief.\
name $name
>...Now I shall judge you as a pious believer of Ilias.@
>As a faithful follower, you pointed your sword at her.\
>As punishment for your sins, you are sentenced to violation by my snakes for 10,000 years.@
>I'll start your punishment myself...\
name ""
name "Luka"
>N...No, that's not what you said!\
mov %hseanwave,22:hseanwave
cspl 690,699
lsp 700,":a;chara\nagael_h3.bmp",0,0:print 10,500
>Ahhhh!!\
name ""
>In the next moment, the snakes rush and coil around my body.@
>Their tongues lick every inch of my body, sending me back into the nightmare of pleasure.\
name "Luka"
>H...Help me!@> Ahhh!\
name ""
>Their rough, slimy tongues lick up and down my penis, toying with it as if I was nothing.\
name "Luka"
>Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\nagael_h4.bmp",0,0
lsp 690,":a;chara\nagael_ct03.bmp",0,0
gosub *syasei2
>I come in no time, spraying my semen over the eagerly licking snakes.@
>But their tongue assault continues on without stopping, covering my penis with more of their wet saliva.\
>My penis happily twitches, my body rejoicing in this stimulation.@
>One of the snakes starts to gently chew on my glans, bringing me to another height in only moments.\
name "Luka"
>Ah... Hyaaa!\
name ""
gosub *syasei1:gosub *syasei2
>Mobbed by the snakes, I come again.@
>My whole body is going into convulsions, unable to endure the intense stimulation.\
name "Luka"
>Stop... Forgive me...@
>Hyaa!\
name ""
gosub *syasei1:gosub *syasei2
name $name
>Yes... Cry out like the criminal you are.@
>Realize your own crimes.\
>Once this punishment is over, I shall bless you as a pious follower of Ilias.@
>If you're still sane after 10,000 years, that is...\
name ""
name "Luka"
>Ah... Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>This will continue for 10,000 years...@
>No, it's more like an eternity for a human like me.\
name "Luka"
>Ah...@>Ah...\
name ""
>In a hell of pleasure like this, it didn't take much time for me to lose my sanity.@
>But even as I became disabled, the snake's assault never stopped for a moment.\
name $name
>Sheesh, did you break already?@
>But don't think that will free you from your punishment...\
name "Luka"
>Ha... ah...\
name ""
gosub *syasei1:gosub *syasei2
>Completely losing my mind, I just continue to ejaculate.@
>I meet my fate as a criminal who pointed his sword at the Goddess...\
mov %hseanwave,0:hseanwave
gosub *anten
>...........\
goto *badend



*c_tentacle_start

mov $name,"Chimera Tentacle"
mov $name2,"Chimera Tentacle"
mov $lavel,"c_tentacle"
mov $tatie1,"c_tentacle_st01"
mov $tatie2,"c_tentacle_st02"
mov $tatie3,"c_tentacle_st03"
mov $tatie4,"c_tentacle_st11"
mov $haikei,"bg018"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,16000
if %nanido=2 mov %max_enemylife,18000
if %nanido=3 mov %max_enemylife,20000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,1
mov %alice_skill1,100
mov %alice_skill2,100
mov %alice_skill3,100
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free of her restraint!"
mov $mogaku_anno2,"Luka breaks free from her restraint!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Pointless... You can't escape from my tentacles."
mov $mogaku_sel2,"No matter how much you struggle, my tentacles won't let go..."
mov $mogaku_sel3,"If you struggle, they'll just entangle you more..."
mov $mogaku_sel4,"Though everyone struggles like that, they never get free..."
mov $mogaku_sel5,"No escape."
mov $mogaku_dassyutu1,"How could you escape from my tentacles?"
mov $mogaku_dassyutu2,"You're different from the normal prey..."
mov $half_s1,"How do my tentacles taste?"
mov $half_s2,"I'll let you enjoy them even more..."
mov $kiki_s1,"You're almost finished..."
mov $kiki_s2,"Just a little more, and I'll squeeze you dry with these tentacles..."
mov %end_n,10
mov %exp_minus,0
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,4
mov %owaza_count3a,4
name "Luka"
>Are you girls all right!?\
name ""
dwave 1,"se\down.ogg"
>After I cut off the tentacle, the two crumple to the floor.@
>They're both limp, but they seem to be alive.\
lsp 700,":a;chara\vgirl_st03.bmp",-160,0
lsp 701,":a;chara\c_tentacle_st01.bmp",160,0:print 10,500
name "Vampire Girl"
>Y...You came to save us?\
name ""
name "Luka"
>Yes... I'll take this one on!\
name ""
csp 701
lsp 700,":a;chara\c_tentacle_st01.bmp",0,0:print 10,500
>I stand in front of the Chimera with my sword drawn.@
>I won't let anyone else become a sacrifice to them!\
name ""
name $name
>You cut my tentacles with that sword...@
>You seem to be quite able for a human.\
name ""
name "Luka"
>...........\
name ""
dwave 1,"se\ero_makituki1.ogg"
>Her tentacles start to squirm around, obviously excited.@
>The two that I cut off are already regrowing, too...\
>In addition, I feel an evil aura coming from her...@
>She seems like she will be quite a tough opponent.\
name $name
>...How do you want me to play with you?@
>Since you challenged me, you must love tentacles...\
>Shall I squeeze you tight?@
>Or perhaps you want me to play with your penis...?\
name ""
goto *common_main



*c_tentacle_v

gosub *face3
name $name
>How could I be overwhelmed!?\
name ""
>Terrified, Chimera Tentacle loses the will to fight!\
mov %viclose,1:gosub *victory
mov %getexp,180000:gosub *lvup
mov %2362,1
goto *sean0317



*c_tentacle_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Hehe, you want my tentacles to play with you?@
>I'll wind, tighten, and toy with you...\
name ""
goto *c_tentacle_a



*c_tentacle_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *c_tentacle_kousan
if %cmd1=16 goto *c_tentacle_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *c_tentacle_main



*c_tentacle_a

if %kousoku=1 rnd2 %ransu,1,2
if %kousoku=1 && %ransu=1 gosub *c_tentacle_a5:goto *common_main
if %kousoku=1 && %ransu=2 gosub *c_tentacle_a6:goto *common_main
rnd2 %ransu,1,4
if %ransu=1 gosub *c_tentacle_a1:goto *common_main
if %ransu=2 gosub *c_tentacle_a2:goto *common_main
if %ransu=3 && %owaza_count3a>5 gosub *c_tentacle_a3:goto *common_main
if %ransu=4 && %owaza_count1a>5 gosub *c_tentacle_a4:goto *common_main
skip -5



*c_tentacle_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll let your whole body taste my tentacles..."
if %ransu=2 mov $sel1,"You want me to coil around you? But before that..."
if %ransu=3 mov $sel1,"I'll train my tentacles over every inch of your body..."
name $name
eng $sel1:$sel6\
name ""
skillname "Tentatrain"
dwave 1,"se\ero_makituki1.ogg"
>The Chimera's tentacles caress every inch of Luka's body!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3723
if %nanido<2 damage 250,270
if %nanido=2 damage 280,300
if %nanido=3 damage 310,330
skillname ""
if %mylife=0 sub %stack,1:return *c_tentacle_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_tentacle_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Do you want them all over? Or squeezing you?"
if %ransu=2 mov $sel1,"I know how to please a man with my tentacles..."
if %ransu=3 mov $sel1,"I'll use my tentacles to squeeze out your semen..."
name $name
eng $sel1:$sel6\
name ""
skillname "Tentacoil"
dwave 1,"se\ero_makituki1.ogg"
>The Chimera's tentacles slowly wind around Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3724
if %nanido<2 damage 260,280
if %nanido=2 damage 290,310
if %nanido=3 damage 320,340
skillname ""
if %mylife=0 sub %stack,1:return *c_tentacle_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_tentacle_a3

add %stack,1
mov %owaza_count3a,0
name $name
>Be happy, for these tentacles will play with you...@
>I'll completely violate your penis!\
name ""
skillname "Tentatempest"
dwave 1,"se\ero_makituki1.ogg"
>The Chimera's tentacles shoot toward Luka's groin!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3725
>A tentacle coils around Luka's balls, and gently massages them!
if %nanido<2 damage 90,110
if %nanido=2 damage 100,120
if %nanido=3 damage 110,130
dwave 1,"se\ero_makituki1.ogg"
>A tentacle slips into Luka's ass, and stimulates him!
if %nanido<2 damage 90,110
if %nanido=2 damage 100,120
if %nanido=3 damage 110,130
dwave 1,"se\ero_makituki1.ogg"
>The tentacle around Luka's balls slowly squeezes!
if %nanido<2 damage 90,110
if %nanido=2 damage 100,120
if %nanido=3 damage 110,130
dwave 1,"se\ero_makituki1.ogg"
>A third tentacle coils around Luka's penis!
if %nanido<2 damage 90,110
if %nanido=2 damage 100,120
if %nanido=3 damage 110,130
skillname ""
if %mylife=0 sub %stack,1:return *c_tentacle_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_tentacle_a4

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 8
name $name
>I'll bind you with my tentacles...@
if %first_sel1=1 skip 3
>Is this what you wished for?\
skip 2
>This time you won't escape...\
name ""
skillname "Tentaroll"
dwave 1,"se\ero_makituki3.ogg"
eng "Countless tentacles coil around Luka's body!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
>Tentacles have coiled around Luka's body, binding him!
skillcount3 3726
if %nanido<2 damage 200,220
if %nanido=2 damage 230,250
if %nanido=3 damage 260,280
mov %kousoku,1:gosub *status_print
>Luka has been bound by Chimera Tentacle!\
skillname ""
if %mylife=0 sub %stack,1:return *c_tentacle_h4
name $name
>Hehe, how does it feel?@
if %first_sel1=1 skip 3
>I'll give you some love with my tentacles now...\
skip 2
>I'll give you more love with my tentacles....\
name ""
mov %first_sel1,1
if %nanido<2 mov %genmogaku,2
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,3
sub %stack,1
return



*c_tentacle_a5

add %stack,1
>Luka has been bound by the Chimera's tentacles...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll make it even tighter..."
if %ransu=2 mov $sel1,"I'll squeeze harder and harder..."
if %ransu=3 mov $sel1,"I'll tease you a little... Make you realize where you stand."
name $name
eng $sel1:$sel6\
name ""
skillname "Tentabind"
dwave 1,"se\ero_simetuke1.ogg"
>The tentacles around Luka's body tighten, squeezing him with intense pressure!
skillcount3 3726
if %nanido<2 damage 200,220
if %nanido=2 damage 230,250
if %nanido=3 damage 260,280
skillname ""
if %mylife=0 sub %stack,1:return *c_tentacle_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_tentacle_a6

add %stack,1
>Luka has been bound by the Chimera's tentacles...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll squeeze out your semen with my tentacles...":mov $sel2,"The tentacles around Luka's penis tighten!"
if %ransu=2 mov $sel1,"It would be so unsightly for you to come like this...":mov $sel2,"The tip of the Chimera's tentacles crawl around Luka's glans!"
if %ransu=3 mov $sel1,"I've made so many come, just like this....":mov $sel2,"The tentacle around Luka's penis strokes him!"
if %ransu=4 mov $sel1,"Isn't being milked by tentacles the best?":mov $sel2,"The tentacle coiled around Luka's penis makes a milking motion!"
if %ransu=5 mov $sel1,"I'll finish you off quickly...":mov $sel2,"The tentacle coiled around Luka's penis violently strokes him!"
name $name
eng $sel1:$sel6\
name ""
skillname "Tentafiesta"
dwave 1,"se\ero_makituki3.ogg"
eng $sel2:$sel6
skillcount3 3727
if %nanido<2 damage 210,230
if %nanido=2 damage 240,270
if %nanido=3 damage 270,300
skillname ""
if %mylife=0 sub %stack,1:return *c_tentacle_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_tentacle_onedari

mov $list1,"Tentatrain"
if %3723>0 mov %list_num1,1
mov $list2,"Tentacoil"
if %3724>0 mov %list_num2,1
mov $list3,"Tentatempest"
if %3725>0 mov %list_num3,1
mov $list4,"Tentabind"
if %3726>0 mov %list_num4,1
mov $list5,"Tentafiesta"
if %3727>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *c_tentacle_onedari1
if %cmd1=12 goto *c_tentacle_onedari2
if %cmd1=13 goto *c_tentacle_onedari3
if %cmd1=14 goto *c_tentacle_onedari4
if %cmd1=15 goto *c_tentacle_onedari5
if %cmd1=-1 goto *c_tentacle_main
goto *c_tentacle_onedari



*c_tentacle_onedari1

gosub *onedari_syori
name $name
>You want my tentacles to stroke your body all over?@
>Very well... I'll let you enjoy my tentacles to your heart's content!\
name ""
gosub *c_tentacle_a1
skip -1



*c_tentacle_onedari2

gosub *onedari_syori
name $name
>You want my tentacles to play with your penis...?@
>Very well... I'll let you enjoy my tentacles to your heart's content!\
name ""
gosub *c_tentacle_a2
skip -1



*c_tentacle_onedari3

gosub *onedari_syori
name $name
>You want my tentacles to overrun your penis?@
>Very well... I'll let you enjoy my tentacles to your heart's content!\
name ""
gosub *c_tentacle_a3
skip -1



*c_tentacle_onedari4

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want to be bound and squeezed by my tentacles?@
>Very well... I'll make it extra tight!\
name ""
if %kousoku=0 gosub *c_tentacle_a4
gosub *c_tentacle_a5
skip -1



*c_tentacle_onedari5

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want to be bound and played with by my tentacles?@
>Very well... Go mad in my tentacles assault!\
name ""
if %kousoku=0 gosub *c_tentacle_a4
gosub *c_tentacle_a6
skip -1



*c_tentacle_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\c_tentacle_bk02.bmp",0,0
gosub *syasei2
>As the Chimera's tentacles stroke Luka's body all over, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2662,%2662+1:if %2662=1 mov %count_koenemy,%count_koenemy+1
if %2662>%count_most mov %count_most,%2662:mov $count_mostname,$name
count 10,9
mov $bad1,"The Chimera used her tentacles to force Luka to come."
gosub *face2
name $name
>My tentacles made you come?@
>Did it feel good? Hahaha...\
name ""
goto *c_tentacle_h



*c_tentacle_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\c_tentacle_bk02.bmp",0,0
gosub *syasei2
>As the Chimera's tentacles played with Luka's penis, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2662,%2662+1:if %2662=1 mov %count_koenemy,%count_koenemy+1
if %2662>%count_most mov %count_most,%2662:mov $count_mostname,$name
count 10,9
mov $bad1,"The Chimera used her tentacles to force Luka to come."
gosub *face2
name $name
>My tentacles made you come?@
>Did it feel good? Hahaha...\
name ""
goto *c_tentacle_h



*c_tentacle_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\c_tentacle_bk02.bmp",0,0
gosub *syasei2
>As the Chimera's tentacles assault Luka's sensitive spots, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2662,%2662+1:if %2662=1 mov %count_koenemy,%count_koenemy+1
if %2662>%count_most mov %count_most,%2662:mov $count_mostname,$name
count 10,9
mov $bad1,"The Chimera used her tentacles to force Luka to come."
gosub *face2
name $name
>My tentacles made you come?@
>Did it feel good? Hahaha...\
name ""
goto *c_tentacle_h



*c_tentacle_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\c_tentacle_st11.bmp",0,0
gosub *syasei2
>As the tentacles squeeze and crush Luka, he comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2662,%2662+1:if %2662=1 mov %count_koenemy,%count_koenemy+1
if %2662>%count_most mov %count_most,%2662:mov $count_mostname,$name
count 16,9
mov $bad1,"The Chimera used her tentacles to force Luka to come."
gosub *face2
name $name
>Coming from being squeezed?@
>A true pervert... Hahaha.\
name ""
goto *c_tentacle_h



*c_tentacle_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\c_tentacle_st11.bmp",0,0
gosub *syasei2
>Bound by Chimera, her tentacles play with Luka until he's forced to come.\
mov %viclose,1:gosub *lose
mov %2662,%2662+1:if %2662=1 mov %count_koenemy,%count_koenemy+1
if %2662>%count_most mov %count_most,%2662:mov $count_mostname,$name
count 10,9
mov $bad1,"The Chimera used her tentacles to force Luka to come."
gosub *face2
name $name
>My tentacles made you come?@
>Did it feel good? Hahaha...\
name ""
goto *c_tentacle_h



*c_tentacle_h

mov $bad2,"Surrendering his heart and mind, Luka continues giving his semen to her."
if %2662=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahhh...\
name ""
name $name
>It seems you realize how good these tentacles are.@
>Here, I'll amuse you some more...\
name ""
>The Chimera's tentacles coil around me, sealing off my movement.@
dwave 1,"se\ero_makituki3.ogg"
mov %hseanwave,20:hseanwave
cspl 690,699
lsp 700,":a;chara\c_tentacle_h1.bmp",0,0:print 10,500
>With that, another one coils around my penis.\
name "Luka"
>Ahh!\
name ""
>As the soft, slimy surface of her tentacle rubs against my penis, I let out a small gasp.\
>I can't help but look down as the disgusting thing claims my penis as its own.\
name $name
>Are you still thinking I have a disgusting body with these tentacles?@
>Even though your penis seems so delighted with it?\
>My slimy, soft tentacles...@
>Don't they just feel unbearably good?@>Here, I'll squeeze you some...\
name ""
name "Luka"
>Ahh...\
name ""
>The tentacle wound around my penis slowly tightens around it, as if it was a hand grasping me.@
>Feeling good, my body jerks in response to the stimulation.\
name $name
>Your penis looks so happy to be in the care of my tentacle...@
>Would you like it to make you come?\
name ""
name "Luka"
>W...Who would want...\
name ""
>I feel humiliated just having the slimy tentacle playing with me like that.@
>I grit my teeth, trying to pretend like the pleasure is a lie.\
name $name
>Hehe, there's no need to try to endure it.@
>I know you're feeling pleasure.\
name ""
name "Luka"
>Ahhh!\
name ""
>The tip of her tentacle slowly crawls across my glans, making me gasp in response.@
>She gently squeezes on my shaft at the same time.\
>Her skilled control of her tentacle leaves me a little irritated, my body desiring more...\
name $name
>Since you acted so stubbornly, I lessened the stimulation.@
>If you ask nicely, I'll let you come.\
name ""
name "Luka"
>Urhg...\
name ""
>Her tentacles skillfully play with my penis as she adjusts how much stimulation to use.\
>She gradually squeezes as her tentacle strokes my glans.@
>But before I reach a threshold, she holds back and stops it short.\
>Trained in making men ejaculate, she easily leads me along by the pleasure, quickly bringing me to moans.\
name "Luka"
>Ah... ahh...\
name ""
>If she did just a little more, I'd come in an instant...@
>But she always stops just short.\
>My pre-come is already leaking out, getting her slimy tentacle even wetter.@
>I've been on the edge so long, it's starting to feel painful.\
name "Luka"
>Ahh...\
name ""
name $name
>If I just put a little more into it, you would orgasm in a second.@
>It will feel soooo good as you spurt out that semen of yours.\
name ""
>While whispering in my ear, she continues stroking me.@
>Building me up until just before, then letting me back down.\
>My instinct as a man is screaming for release.@
>I want to finish, to come with everything in my body.\
name $name
>Hehe... Do you want the finishing move?@
>Then you'll have to ask me for it...\
name ""
>She is completely aware of my irritation...@
>Her tentacle teases me as her words tease me.\
>Of course, with it being too weak to let me orgasm...\
name "Luka"
>Ahh...\
name ""
name $name
>If you obediently ask me, I'll finish you off.@
>A powerful orgasm with my tentacles...\
name ""
>As she whispers in my ear, I finally give in.\
>I want her to finish me off with her tentacles...@
>Desiring it with every inch of my body, I ask her.\
name "Luka"
>Ahh... Let me come...\
name ""
name $name
>Hehe, you confessed...@> Then let me give you a special reward.@
>I'll let you choose how you finish by...\
>Do you want me to squeeze it out?@>Or violently stroke it out?@
>How do you want me to make you come?\
name ""
name "Luka"
>S...Squeeze...\
name ""
>That soft sensation of her squishy tentacles...@
>I want to feel that as I come.\
>I honestly respond to her question.@
>Drowning in the humiliation, I've completely succumbed to her.\
name $name
>Ahaha... So you want me to squeeze your penis?@
>You miserable boy... I'll make you come, just as you wanted.\
name ""
>With a powerful squeeze, her soft tentacle tightens around my penis.@
>The sudden, intense stimulation sends me right over the top.\
name "Luka"
>Ahh...\
name ""
>After being on edge so long, my waist pushes forward as my head goes pure white in ecstasy.\
name $name
>This is just what you've been waiting for, right?@
>Embrace the end you desired...\
name ""
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\c_tentacle_h2.bmp",0,0
gosub *syasei2
>With a powerful orgasm, my semen erupts into the air, finally released.@
>Her tentacles continue squeezing me even as I come, making the orgasm feel even more intense.\
name "Luka"
>Ah...\
name ""
>Overcome by the pleasure, my body goes completely slack.@
>The Chimera just looks at me and giggles.\
name $name
>Hehe, aren't you happy?@
>But you're still not satisfied, are you?\
>Now how do you want it next?@
>Be honest, and I'll do just as you ask...\
name ""
name "Luka"
>Ahh... Stroke it...\
name ""
>The shame and humiliation don't matter anymore.@
>I just speak what my body wants.\
name $name
>You want me to stroke your penis up and down with my tentacles?@
>Like this, I wonder?\
name ""
name "Luka"
>Ah...\
name ""
mov %hseanwave,21:hseanwave
>The tentacle coiled around my penis slowly starts to move up and down, stroking me.@
>Each time the top of the tentacle hits the glans of my penis, she tightens it a little bit.\
>I sigh as I melt in the pleasure I desired...\
name "Luka"
>Haaa... That feels good...\
name ""
name $name
>Are you satisfied with this?@
>Or did you want something more like this...?\
name ""
>The tip of her tentacle finishes winding around my glans, as her entire tentacle is now moving up and down from my base to my tip.\
>I can't endure this anymore...@
>Greedily embracing the pleasure, I feel myself climaxing again.\
name "Luka"
>Ahh... I'm coming again...@
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\c_tentacle_h3.bmp",0,0
gosub *syasei2
>As she strokes me with her tentacles, I come, exploding my dirty semen all over her.\
name "Luka"
>Ahh...\
name ""
>Her tentacles continue stroking me even as I come, milking out every last drop of semen even during my orgasm.\
name "Luka"
>Haaa...\
name ""
name $name
>Hehe, it felt good, didn't it?@
>Now what do you want next?\
name ""
name "Luka"
>Wind around... My tip...\
name ""
>Without any shame, I tell her exactly what my body wants to feel.@
>Desiring more of the pleasure from her tentacles, I'm already looking forward to what's coming next.\
name $name
>You want my tentacle to play with your glans?@
>Hehe... I'll give you lots of service, then.\
name ""
>Her tentacle coils around just my tip, and starts to massage it.@
>Already feeling like I'm in heaven, I sigh in ecstasy.\
>The slimy sensation of her soft tentacle fills my mind as it plays with me.@
>Feeling even better than I expected it to be, I keep moaning.@
>I can't think of anything besides feeling more of this...\
name "Luka"
>Ahh... Keep going...\
name ""
name $name
>Hehe, I got it...@
>You want to come while feeling this, don't you?\
name ""
name "Luka"
>Haa... It feels so good...\
name ""
>Accepting my request, she keeps playing with me just as I asked for.@
>Sighing in pleasure, I'm brought to another orgasm.\
gosub *syasei1
lsp 700,":a;chara\c_tentacle_h4.bmp",0,0
gosub *syasei2
name "Luka"
>Ahhh...\
name ""
>I let out a deep sigh as the pleasure of my orgasm washes over me.\
>Whatever I ask for, the Chimera gives me with her tentacles.@
>In spite of that, I have the feeling that I'm being dominated in reverse.\
>I'm being retrained by her tentacles, turning into a slave of pleasure.\
name $name
>Hehe... That still wasn't enough, was it?@
>Well then, next is...\
name ""
name "Luka"
>Ahhh...\
name ""
>From then on, she endlessly uses her tentacles to make come.@
>Doing whatever stimulation I ask for, she brings me to orgasm after orgasm.\
>But the power is completely in the Chimera's tentacles.@
>I'm nothing more than a slave to the pleasure, giving her my semen.\
mov %hseanwave,0:hseanwave
gosub *anten
>.............\
goto *badend



*mariel_start

mov $name,"Archangel Mariel"
mov $name2,"Mariel"
mov $lavel,"mariel"
mov $tatie1,"mariel_st01"
mov $tatie2,"mariel_st02"
mov $tatie3,"mariel_st03"
mov $tatie4,"mariel_ha01"
mov $haikei,"bg017"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,18000
if %nanido=2 mov %max_enemylife,20000
if %nanido=3 mov %max_enemylife,22000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,1
mov %alice_skill1,0
mov %alice_skill2,0
mov %alice_skill3,0
mov %music,9
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free from Mariel's restraint!"
mov $mogaku_anno2,"Luka broke free from Mariel!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"You won't escape from my foot."
mov $mogaku_sel2,"I won't let you free. I'll stamp on you even more!"
mov $mogaku_sel3,"There's no running from me."
mov $mogaku_sel4,"Do you want to escape? Hahaha..."
mov $mogaku_sel5,"Even if you escape, you're already a captive of my foot..."
mov $mogaku_dassyutu1,"Why did you run...?"
mov $mogaku_dassyutu2,"It actually felt good, didn't it?"
mov $half_s1,"My techniques are quite good."
mov $half_s2,"You've only just begun to feel what they can bring..."
mov $kiki_s1,"Are you almost finished?"
mov $kiki_s2,"I'll bring you to your climax in an instant..."
mov %end_n,10
mov %exp_minus,180000
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,6
mov $name,"Mariel"
name $name
>Ara... Another human?@>Did you come to be prey, too?@
>I'm Archangel Mariel, the leader of the Iliasburg assault forces.\
name ""
>An innocent looking girl appears...@
>But just as she claims, the intense pressure of a powerful angel is all around her.\
name "Luka"
>I'm Luka... A simple fake Hero.\
name ""
name $name
>...Oh my, the rumored disgraced Hero.@
>I must treat you as a respectable opponent, then.\
>I'll use my sexual techniques to make you harmless... As Goddess Ilias ordered.@
>I'll keep on teasing you with my indecent techniques...\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\mariel_st01.bmp",160,0:print 10,500
name "Alice"
>Luka, you already know...@
>But my attacks don't work on angels.\
name ""
name "Luka"
>Yes, I remember...\
name ""
csp 701
gosub *face1
goto *common_main



*mariel_v

gosub *face3
name $name
>Ah... Goddess Ilias...@
>I lost... To a human...\
name ""
dwave 1,"se\bun.ogg"
csp 700:print 99,1000,"system\breakup.dll/lrB"
>Archangel Mariel fades away into particles, then vanishes!\
mov $name,"Archangel Mariel"
mov %viclose,1:gosub *victory
mov %getexp,200000:gosub *lvup
mov %2360,1
goto *sean0318



*mariel_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Do you want me to play with you now?@
>Hehe... Now then, how should I do it...?\
name ""
goto *mariel_a



*mariel_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *mariel_kousan
if %cmd1=16 goto *mariel_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *mariel_main



*mariel_a

if %kousoku=1 gosub *mariel_a5:goto *common_main
rnd2 %ransu,1,4
if %ransu=1 gosub *mariel_a1:goto *common_main
if %ransu=2 gosub *mariel_a2:goto *common_main
if %ransu=3 gosub *mariel_a3:goto *common_main
if %ransu=4 && %owaza_count1a>7 gosub *mariel_a4:goto *common_main
skip -5



*mariel_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Finish in my palm..."
if %ransu=2 mov $sel1,"Hehehe... I'll stroke you plenty."
if %ransu=3 mov $sel1,"I'll slowly draw it out..."
name $name
eng $sel1:$sel6\
name ""
skillname "Angel Hand"
dwave 1,"se\ero_koki1.ogg"
>Mariel softly strokes Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3728
if %nanido<2 damage 320,350
if %nanido=2 damage 350,380
if %nanido=3 damage 380,410
skillname ""
if %mylife=0 sub %stack,1:return *mariel_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*mariel_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You may come inside this clean, pure mouth of angel."
if %ransu=2 mov $sel1,"I'll let you feel the happiness of finishing in an angel's mouth..."
if %ransu=3 mov $sel1,"My tongue and lips will bring you to heaven..."
name $name
eng $sel1:$sel6\
name ""
skillname "Angel Mouth"
dwave 1,"se\ero_buchu2.ogg"
>Mariel puts Luka's penis into her mouth, and slowly licks it clean!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3729
if %nanido<2 damage 330,360
if %nanido=2 damage 360,390
if %nanido=3 damage 390,420
skillname ""
if %mylife=0 sub %stack,1:return *mariel_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*mariel_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My breast skills aren't the best... But I'll give it everything I've got."
if %ransu=2 mov $sel1,"My breasts may not be big, but..."
if %ransu=3 mov $sel1,"This is enough to be able to stimulate a man..."
name $name
eng $sel1:$sel6\
name ""
skillname "Angel Chest"
dwave 1,"se\ero_buchu2.ogg"
>Mariel rubs Luka's penis hard against her small breasts!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3730
if %nanido<2 damage 340,370
if %nanido=2 damage 370,400
if %nanido=3 damage 400,430
skillname ""
if %mylife=0 sub %stack,1:return *mariel_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*mariel_a4

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 8
name $name
if %first_sel1=1 skip 3
>I'll use my special technique on you.@
skip 2
>I'll let you taste my special technique again.@
>I'll use this foot to bully you...\
name ""
skillname "Heaven's Foot"
dwave 1,"se\ero_koki1.ogg"
eng "Mariel casts a spell, creating a seal to bind Luka!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount3 3731
>Mariel presses her small foot down on Luka's penis!
if %nanido<2 damage 300,320
if %nanido=2 damage 330,350
if %nanido=3 damage 360,380
mov %kousoku,1:gosub *status_print
>Luka has been bound by Mariel!\
skillname ""
if %mylife=0 sub %stack,1:return *mariel_h4
name $name
>Hehehe... Were you able to prepare yourself?@
if %first_sel1=1 skip 3
>I'll keep playing with you until you've stained my foot with your semen...\
skip 2
>This time, I'll play with you until you're done...\
name ""
if %nanido<2 mov %genmogaku,1
if %nanido=2 mov %genmogaku,1
if %nanido=3 mov %genmogaku,2
mov %first_sel1,1
sub %stack,1
return



*mariel_a5

add %stack,1
>Mariel is stepping on Luka's penis as he's bound...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"What a humiliating way to have your male genitalia treated...":mov $sel2,"Mariel uses her big toe to rub the tip of Luka's penis!"
if %ransu=2 mov $sel1,"Look, I'm stepping on you...":mov $sel2,"Mariel steps down hard on Luka's penis!"
if %ransu=3 mov $sel1,"Does it feel good? When you can't take it, just let it out...":mov $sel2,"Mariel shakes her leg, making it almost vibrate against Luka's penis!"
if %ransu=4 mov $sel1,"I won't stop until you cover my foot in semen...":mov $sel2,"Mariel presses down on the tip of Luka's penis!"
if %ransu=5 mov $sel1,"Haha... Look how happy you are at being stepped on.":mov $sel2,"Mariel uses her heel to rub Luka's balls!"
name $name
eng $sel1:$sel6\
name ""
skillname "Heaven's Foot"
dwave 1,"se\ero_koki1.ogg"
eng $sel2:$sel6
skillcount3 3731
if %nanido<2 damage 300,320
if %nanido=2 damage 330,350
if %nanido=3 damage 360,380
skillname ""
if %mylife=0 sub %stack,1:return *mariel_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*mariel_onedari

mov $list1,"Angel Hand"
if %3728>0 mov %list_num1,1
mov $list2,"Angel Mouth"
if %3729>0 mov %list_num2,1
mov $list3,"Angel Chest"
if %3730>0 mov %list_num3,1
mov $list4,"Heaven's Foot"
if %3731>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *mariel_onedari1
if %cmd1=12 goto *mariel_onedari2
if %cmd1=13 goto *mariel_onedari3
if %cmd1=14 goto *mariel_onedari4
if %cmd1=-1 goto *mariel_main
goto *mariel_onedari



*mariel_onedari1

gosub *onedari_syori
name $name
>You want to finish on my hands?@
>Desiring the humiliation yourself... How miserable.\
name ""
gosub *mariel_a1
skip -1



*mariel_onedari2

gosub *onedari_syori
name $name
>You want to finish in my mouth?@
>Desiring the humiliation yourself... How miserable.\
name ""
gosub *mariel_a2
skip -1



*mariel_onedari3

gosub *onedari_syori
name $name
>You want to finish on my chest?@
>Desiring the humiliation yourself... How miserable.\
name ""
gosub *mariel_a3
skip -1



*mariel_onedari4

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want to be bullied by my foot?@
>Desiring the humiliation yourself... How miserable.\
name ""
if %kousoku=0 gosub *mariel_a4
gosub *mariel_a5
skip -1



*mariel_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\mariel_bk03.bmp",0,0
gosub *syasei2
>As Mariel strokes Luka with her smooth hand, he comes, covering her palms in semen.\
mov %viclose,1:gosub *lose
mov %2660,%2660+1:if %2660=1 mov %count_koenemy,%count_koenemy+1
if %2660>%count_most mov %count_most,%2660:mov $count_mostname,$name
count 5,16
mov $bad1,"Mariel forced Luka to come with her hand."
gosub *face2
name $name
>You covered my hand in your semen...@
>How filthy... You need to be punished.\
name ""
goto *mariel_ha



*mariel_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\mariel_bk01.bmp",0,0
gosub *syasei2
>As Mariel licks Luka's penis in her warm mouth, he comes, filling her small mouth with semen.\
mov %viclose,1:gosub *lose
mov %2660,%2660+1:if %2660=1 mov %count_koenemy,%count_koenemy+1
if %2660>%count_most mov %count_most,%2660:mov $count_mostname,$name
count 4,16
mov $bad1,"Mariel forced Luka to come with her small mouth."
gosub *face2
name $name
>Nnn... You filled my mouth with your semen...@
>How filthy... You need to be punished.\
name ""
goto *mariel_ha



*mariel_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\mariel_bk02.bmp",0,0
gosub *syasei2
>As Mariel rubs Luka's penis against her small breasts, he comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2660,%2660+1:if %2660=1 mov %count_koenemy,%count_koenemy+1
if %2660>%count_most mov %count_most,%2660:mov $count_mostname,$name
count 7,16
mov $bad1,"Mariel forced Luka to come with her small breasts."
gosub *face2
name $name
>You covered my breasts in your semen...@
>How filthy... You need to be punished.\
name ""
goto *mariel_ha



*mariel_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\mariel_ha07.bmp",0,0
gosub *syasei2
>As Mariel steps on Luka's penis, he comes, covering her foot in semen.\
mov %viclose,1:gosub *lose
mov %2660,%2660+1:if %2660=1 mov %count_koenemy,%count_koenemy+1
if %2660>%count_most mov %count_most,%2660:mov $count_mostname,$name
count 6,16
mov $bad1,"Mariel forced Luka to come with her foot."
gosub *face2
name $name
>You covered my foot in your semen...@
>How filthy... You need to be punished.\
name ""
goto *mariel_hb



*mariel_ha

mov $bad2,"Continuing to use her feet to play with him, Mariel keeps Luka as her sex slave."
if %2845=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2845,1
>Mariel smiles as she sees me collapse in weakness.\
name $name
>What ill manners... Having an accident on my pure, holy body.@
>It seems I will need to instill some discipline in that penis of yours.\
name ""
cspl 690,699
lsp 700,":a;chara\mariel_ha01.bmp",0,0:print 10,500
>Mariel suddenly steps on my penis!@
>Her soft sole presses down on my now erect penis.\
name "Luka"
>Ahhh!\
name ""
name $name
>I'll teach you with my foot...@
>Just how miserable and pathetic human males really are.\
name ""
mov %hseanwave,17:hseanwave
lsp 700,":a;chara\mariel_ha02.bmp",0,0:print 10,500
>Mariel starts grinding her foot against me, slowly pressing down harder and harder on my penis as she moves.\
name "Luka"
>Ahhh!@
>Stop!!\
name ""
name $name
>Hahaha... If you want me to stop, then resist a little.@
>That is... If you can.\
name ""
name "Luka"
>Urhg!\
name ""
>I try to summon the last of my strength to push her off...@
>But before I can, she presses down harder on my penis, causing my strength to flee my body again.\
>Slowly grinding her foot up and down against my penis, I'm left defenseless in no time.\
name "Luka"
>Haa... Ahh...\
name ""
name $name
>Teehee... No man can resist me when I'm stepping on his penis.@
>If I use my foot like this, I can make you come whenever I want. \
name ""
>Mariel continues slowly torturing my penis with her foot as she giggles.\
>She sometimes twists her foot side to side, and other times just presses down hard with the soft sole of her foot...\
name "Luka"
>Haa... Ahh...\
name ""
>I feel miserable and immoral at having this small angel toy with me with her foot.@
>But at the same time, the pleasure and excitement are mixing with the humiliation, confusing me.\
name $name
>Well? I'm skilled, aren't I?@
>Are you already a slave of my foot?\
name ""
>Mariel suddenly stops her foot movements.@
>Before I can hope that she's done playing with me, her toes bend as she starts using them to play and squeeze my glans.\
name "Luka"
>Haaa!\
name ""
>Feeling too much, my waist pushes up into her small foot as I feel myself nearing a climax.\
lsp 700,":a;chara\mariel_ha03.bmp",0,0:print 10,500
name $name
>Ara... Already about to leak?@
>Well then...\
name ""
dwave 1,"se\magic.ogg"
lsp 700,":a;chara\mariel_ha04.bmp",0,0:print 10,500
>Mariel chants to herself for a moment, summoning a circle of light.@
>It appears around the base of my penis, completely damming up the ejaculation that almost arrived.\
name "Luka"
>Ah... Ahh...\
name ""
name $name
>I won't let you feel good that easily...@
>I want you to be completely disgraced as you leak.\
>Didn't you hear me before?@
>I said I'd use my foot to discipline your penis...\
name ""
name "Luka"
>N...No...\
name ""
>A pathetic expression crosses my face, horrified at having my orgasm sealed off at the last moment.@
>Mariel just looks down at me as she continues stepping on me with her foot.\
>As her warm foot twists side to side, the pleasure makes me feel like I'm completely entranced by her every movement.\
name "Luka"
>Haaa!\
name ""
>But no matter how good it feels, I can't ejaculate.@
>Each time I feel like I'm over the cliff, the seal stops me and pushes me a little bit back.\
>But even still, she continues forcing pleasure into me.@
>Kept at the edge, I feel myself going crazy with pleasure.\
name "Luka"
>Ahh... Hyaaa!\
name ""
lsp 700,":a;chara\mariel_ha05.bmp",0,0:print 10,500
name $name
>Oh my, just listen to that voice...@
>How vulgar.\
name ""
>Mariel laughs as she continues grinding her small foot against my penis.@
>Each time she presses down with her soft sole, the desire to come wells up deep inside me, before being sealed off again.\
>Every time her small toes curl and rub my glans, a moan of ecstasy leaks from my lips.@
>In no time, I'm left panting and gasping under her foot techniques.\
name "Luka"
>Hyaa!@>Ahhh!\
name $name
>Hehe... How is it?@> This hell of pleasure, with no ejaculation to escape from it...\
>No matter the man, they would be crying in agony after just a little bit of this...@
>And as they miserably cry, they swear to become a slave to my foot.\
name ""
name "Luka"
>Ah... Ahhh... Ahhhh!!\
name ""
>As Mariel continues to play with my foot, my body starts spasming.@
>Even tears are starting to leak from my eyes, as I'm stuck in this near-ejaculation hell.\
name $name
>Now then, do you realize your standing?@
>Who is your master?\
name ""
name "Luka"
>T...That... Haa...\
name ""
lsp 700,":a;chara\mariel_ha06.bmp",0,0:print 10,500
name $name
>...It seems you require more discipline.\
name ""
name "Luka"
>Ha... Ahhh!\
name ""
>Her grinding motion suddenly gets far more intense.@
>Pushing down a little harder on her sole, her foot is moving up and down so fast it's almost vibrating.\
>Assaulted by her electric massage, I moan and scream in agonized pleasure.@
>Each movement is enough to make me orgasm, but with the seal I keep hitting against the maddening wall.\
name "Luka"
>S...Stop... Help me...\
name ""
name $name
>You won't come until you tell me who your master is.@
>Once you do, I'll release the seal and step on you until you come.\
>That will form a pact with me.@
>By pledging your soul to me, you'll become my lifelong slave.\
name ""
name "Luka"
>N...No way... Haa...\
name ""
>This is no joke...@
>If I give in here, I'll be her slave until death.@>No, even after death...\
>I absolutely cannot allow that to happen.@
>I have to fight here with everything I have...\
name $name
>Just be obedient, and give in...@> Once you do, you will feel so good.@
>In truth, you really want to surrender to my foot, don't you?\
>Once you do, you can let it go as much as you want.@
>You can spit out that dirty fluid of yours all you want.\
name ""
name "Luka"
>Haaa...!\
name ""
>Mariel steps down harder on me, violating my body with more ruthless pleasure.@
>My penis is already constantly twitching, stuck in the phase right before ejaculation.\
>But there's no release... The mad pleasure just swirls around in my body with nowhere to go, tearing down my reason.\
name $name
>You should let yourself feel good.@
>If you keep this up much longer, your mind will collapse.\
>Now admit it.@
>Whose slave do you want to become?\
name ""
name "Luka"
>Ahhh...\
name ""
>Her big toe curls, and starts rubbing against my glans.@
>If it wasn't for this seal, that would have given me a powerful orgasm...\
>I want to come...@>I want to ejaculate as she steps on me.\
>At long last, my reason is finally beat down by the desires of my body.\
name "Luka"
>M...Mariel's...@>S...Slave...\
name ""
name $name
>...I didn't hear that.@> Swear it with more conviction.@
>And is that any way to address your master?\
name ""
name "Luka"
>Haaa!\
name ""
>She presses down hard against my penis with her statement.@
>Unable to think clearly anymore, I start screaming out what she's ordering me to tell her.\
name "Luka"
>Master Mariel, please make me your slave!!\
name ""
name $name
>...No.@
>I don't want to have a human as a slave.\
name ""
name "Luka"
>N...No way...\
name ""
>Her rejection sends me wallowing into total despair.@
>Even though I begged her so pathetically so she would let me come...\
name $name
>But... Instead of me personally, what about my foot?\
>Your master will be this foot of mine.@
>In that case, I would allow it.\
name ""
>In complete despair, her words are like a beacon of hope.@
>Clinging to that, I beg her with everything I have in me.\
name "Luka"
>I will!@
>I'll be the slave of Master Mariel's foot!\
name ""
>With that, I swear that I'll obey and submit to her foot.\
name $name
>Hehehe... Then good luck.@
>As of now, you are a slave to my foot.\
>Due to your pledge, I'll permit you to ejaculate.@
>Now devote all of your semen faithfully to your Master.\
name ""
name "Luka"
>Y...Yes!\
name ""
>Full of joy, I eagerly await what's next.@
lsp 700,":a;chara\mariel_ha02.bmp",0,0:print 10,500
>With a magic word, Mariel releases the seal!\
>At the same time, she steps down on my penis!\
name "Luka"
>Ahhhhnnnn!!\
name ""
gosub *syasei1
lsp 700,":a;chara\mariel_ha07.bmp",0,0
gosub *syasei2
>It's as if I completely went to heaven itself.@
>My penis twitches, and the orgasm takes over my body in a rush of ecstasy.\
>My semen spurts out, and lands all over her foot as I'm in a daze of bliss.\
mov %hseanwave,0:hseanwave
name "Luka"
>Haaa... It feels so good...\
name ""
name $name
>Oh my, just look at all that.@
>You got my foot all dirty with your semen.\
name ""
name "Luka"
>Ahh...\
name ""
>After the lingering bliss of the orgasm fades, my reason slowly returns to me.\
name $name
>Teehee... With that, the covenant has been sealed.@
>You are now my foot's slave.\
>Since you swore it in front of an Archangel, it's bound by your very soul.@
>Your soul itself will eternally revere my foot as its master.\
name ""
name "Luka"
>N...No... I'm...\
name ""
>A slave of Master Mariel's foot.@
>Overcome by pleasure, I swore that to her.\
name $name
>Now, a reward from your master.@
>Since you were such an obedient slave, you will receive some joy.\
name ""
name "Luka"
>Ah... Hyaa!\
name ""
mov %hseanwave,17:hseanwave
>Putting power back into her foot, Master Mariel starts stepping on my penis again.\
>Her soft sole presses down against my shaft, as her nimble toes rub my glans.\
name $name
>Hahaha... Go ahead and finish.@
>Give all of your semen to your master as thanks.\
name ""
name "Luka"
>Haa... Ahhh!\
name ""
>Master Mariel's skilled footwork quickly brings me to the edge in no time.@
>With no seal blocking me, I give in right away to the overwhelming pleasure.\
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\mariel_ha08.bmp",0,0
gosub *syasei2
>With that, I reach my second defeat by her foot.\
name $name
>Oh my, you offered your semen to your master in no time.@
>Obedience is good, but this is almost a joke!\
name ""
>While chuckling, Master Mariel twists her foot as she continues stroking my penis with it.@
>As she presses down hard again, I feel my body going limp again.\
name "Luka"
>No... It feels too good...@
>I'm coming again...\
name ""
name $name
>Hahaha... You are such an obedient slave, aren't you?@
>My foot discipline is quite effective, isn't it?\
name ""
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\mariel_ha09.bmp",0,0
gosub *syasei2
>In seconds, her foot...@
>No, my Master makes me come.\
>Looking pleased with herself, Master Mariel continues stroking her foot hard against my penis.\
name $name
>Come again for me.@
>Continue coming for as long as your master wishes.\
name ""
name "Luka"
>Y...Yes!@> I'll come!@
>Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\mariel_ha10.bmp",0,0
gosub *syasei2
mov %hseanwave,0:hseanwave
>Obeying her command, I give in to the sweet sensations of my orgasm, overpowering my old humiliation and immorality.\
>I give all of my semen to my Master, covering her in the proof of my obedience.@
>Trained by Master Mariel's foot, I've completely become a slave...\
name $name
>Haha... You realize it, right?@
>You're already a slave to my foot.\
>Keep working hard from now on.@
>If you do, you'll get a reward from your master...\
name ""
name "Luka"
>Y...Yes...\
name ""
>I'm now completely a slave to Master Mariel's foot.@
>I swore to worship it as my Master with my soul itself.\
gosub *anten
>..............\
goto *badend



*mariel_hb

mov $bad2,"Continued to be trained by the angel's pleasure, Luka is raped for an eternity."
if %2846=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2846,1
>Mariel looks down at me and smiles.\
name $name
>As punishment from the Heavens, I'll violate you with my vagina.@
>I'll make you completely harmless.@> Get ready...\
name ""
name "Luka"
>N...No...@>Stop!\
name ""
cspl 690,699
lsp 700,":a;chara\mariel_hb1.bmp",0,0:print 10,500
>Mariel jumps on top of me, straddling me with her tiny body.@
>And pressing against me, she leads my penis into her...\
name "Luka"
>Ah!@>Ahhh!\
name ""
mov %hseanwave,1:hseanwave
lsp 700,":a;chara\mariel_hc1.bmp",0,0:print 10,500
>My penis slowly sinks into her small, warm vagina.@
>Her wet walls rub against me as I slowly slip inside, her natural tightness squeezing down hard around me.\
>It's like I entered through the gates of heaven itself...@
>Just from insertion, I feel like I could come inside her.\
name "Luka"
>Ah...\
name ""
name $name
>Ahaha... You're being raped by an angel.@
>Does it feel good inside me?\
name ""
>Mariel looks down at me with a seductive smile.@
>And slowly starts to move with me inside her.\
>Moving up, her tight vagina squeezes down on me as she pulls me out of her.@
>Then dropping back down, my tip rubs against her folds all the way back inside.\
>Already feeling like I could come just from insertion, this is too much to take.\
name "Luka"
>Ahh... Don't move...@
>Or I'll come...\
name ""
name $name
>Hehe, you want me to stop?@
>This is what I do to those who tell me that...\
name ""
lsp 700,":a;chara\mariel_hc2.bmp",0,0:print 10,500
>Mariel suddenly starts bouncing up and down!@
>Moving like a piston, she forces me in and out of her at an incredible speed.\
name ""
name "Luka"
>Ahhhh!!\
name ""
>My penis pounds in and out of her tight, tiny vagina.@
>Each quick cycle pulls and pushes on my penis like her vagina doesn't want to let go.\
>The tip of my penis rubs hard against her folds, making me feel like my body could melt away in pleasure.@
>My body wants to do nothing more than come inside this angel's body.\
name "Luka"
>No... I'm going to come... Come...!\
name ""
name $name
>Haha, I do not mind...@
>Go ahead and pour it inside.\
>It's not like you could ever endure this movement anyway.@
>Hehehe.\
name ""
>Mariel laughs to herself as she moves, sending me over my limit in moments.\
name "Luka"
>Ah...Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\mariel_hc3.bmp",0,0
gosub *syasei2
>My semen explodes into Mariel's tiny vagina.\
>Her skilled movements made me come in no time...@
>My face goes red at the shame of being raped by an angel.\
>My body goes completely limp under Mariel, unable to even feebly struggle.\
name "Luka"
>Ahh...\
name ""
name $name
>Haha... Are you satisfied?\
name ""
lsp 700,":a;chara\mariel_hc4.bmp",0,0:print 10,500
>Mariel stares into my face as I gasp, and laughs.@
>Even in her innocent face, it's easy to see the contempt she has for me.\
name $name
>You wanted to be raped by an angel, didn't you?@
>Played with, just like this?\
>And raped like that, have every drop of semen squeezed out?@
>I can see right through you.\
name ""
name "Luka"
>I...I did not!\
name ""
name $name
>You can try to deny it, but your body is honest...@
>Look, you want to be raped like this, don't you?\
name ""
mov %hseanwave,7:hseanwave
lsp 700,":a;chara\mariel_hc5.bmp",0,0:print 10,500
>Starting up the intense movement again, Mariel starts bouncing up and down on top of me again.@
>As the piston-like rape starts again, I'm left completely overwhelmed.\
>Every thrust into her small, amazing vagina is met by a moan of pleasure from me.@
>Taking this torture of pleasure, I can only lay back and try to hold on.\
name "Luka"
>Ahhgg...\
name ""
name $name
>Haha... There's no point holding back.@
>I'll pound right through that false display...\
name ""
>Wanting to finish me off, Mariel starts grinding her waist against me.@
>My pitiful attempts at enduring are overpowered as I let out a moan along with my climax.\
name "Luka"
>C...Coming...@>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\mariel_hc6.bmp",0,0
gosub *syasei2
>The proof of my submission to her shoots out into her vagina.@
>She made me come so easily with her intense riding...\
>My pride feels torn in two at having been forced to two quick orgasms in a row.\
name $name
>See... Just like I said, there was no point trying to hold back.\
name ""
>Mariel looks into my eyes, a look of pure superiority on her face.\
name $name
>But you will need to be trained so it is etched on your soul itself.@
>That the pleasure I can give is completely and totally irresistible.\
name ""
lsp 700,":a;chara\mariel_hc7.bmp",0,0:print 10,500
>Completely exhausted, I can only moan in pleasure as Mariel starts raping me again.@
>Unable to do anything, I can only submit my body and heart to the ecstasy flowing through me.\
name $name
>Here, lets make you come again.@
>I'll just twist my waist a little bit like this...\
name ""
name "Luka"
>Ah... Hyaaa...\
name ""
gosub *syasei1
lsp 700,":a;chara\mariel_hc8.bmp",0,0
gosub *syasei2
>Mariel twists her waist to the side some, triggering an instant ejaculation from me.@
>I feel my sense of self crumbling as this girl sitting on top of me is able to control my body so easily.\
>I can no longer go against Mariel...@
>The humiliation and pleasure broke down my spirit and turned me into her slave.\
lsp 700,":a;chara\mariel_hc9.bmp",0,0:print 10,500
name "Luka"
>Ah... Uhh...\
name ""
name $name
>Hehehe... You seem to have completely fallen.@
>Did you come to understand that I'm your Master?\
name ""
name "Luka"
>Y...Yes...\
name ""
>Brainwashed by the pleasure, I obediently nod at her.@
>If I don't, she may not give me more of this amazing pleasure...\
name $name
>Hahaha... The results of your education are already showing.@
>No matter the human, an angel just needs to rape them a little to make them into a slave.\
>Let me give you a reward now...@
>I'll rape you a little more gently.\
name ""
name "Luka"
>Ahh...\
name ""
>Mariel continues raping me, only this time slowly moving her waist.@
>But I can't escape from these shackles of pleasure.\
>This is the fate of one who is raped by an angel...@
>I can only accept the humiliation of being her slave.\
mov %hseanwave,0:hseanwave
gosub *anten
>..........\
goto *badend



*c_medulahan_start

mov $name,"Chimera Medullahan"
mov $name2,"Chimera Medullahan"
mov $lavel,"c_medulahan"
mov $tatie1,"c_medulahan_st01"
mov $tatie2,"c_medulahan_st02"
mov $tatie3,"c_medulahan_st03"
mov $tatie4,"c_medulahan_st11"
mov $haikei,"bg220"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,18000
if %nanido=2 mov %max_enemylife,20000
if %nanido=3 mov %max_enemylife,22000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,1
mov %alice_skill1,100
mov %alice_skill2,130
mov %alice_skill3,100
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"My children don't release prey easily..."
mov $mogaku_sel2,"How pointless... You can't escape."
mov $mogaku_sel3,"No matter how much you struggle, it's pointless..."
mov $mogaku_sel4,"Just let yourself be wrapped by my snakes..."
mov $mogaku_sel5,"Do you not like my snake torture? But you will soon..."
mov $mogaku_dassyutu1,"Impossible... Escaping from my snake's restraint?"
mov $mogaku_dassyutu2,"That is quite the strength for a human..."
mov $mogaku_earth_dassyutu1,"Impossible... Escaping from my snake's restraint?"
mov $mogaku_earth_dassyutu2,"That is quite the strength for a human..."
mov $half_s1,"Hehe, it feels good doesn't it?"
mov $half_s2,"Become a victim of my snakes..."
mov $kiki_s1,"Almost time..."
mov $kiki_s2,"Your semen shall feed my snakes..."
mov %end_n,10
mov %exp_minus,0
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,4
mov %owaza_count2a,4
name $name
>Come to think of it...@> I heard there was some Hero able to use the power of spirits...\
>But I'm no common monster, either.\
>I'm a combination of both a Dullahan and a Medusa...@> I'll show you the splendor of this body!\
name ""
name "Luka"
>Guh...!\
name ""
>Not only is her head not attached to her body, but she also has snake hair all over...\
>I'll have to watch out for attacks from multiple directions.\
>Also, since she's part Medusa, she should also have petrification magic...\
name $name
>Hehe... You seem worried about my snake hair.@
>But that isn't the only places I have snakes...\
>I also have thousands of snakes inside this vagina of mine...@
>Any man who enters in me goes insane with pleasure in only one hour.\
>I wonder how long you will last...?\
name ""
goto *common_main



*c_medulahan_v

gosub *face3
name $name
>M...My body...!?@
>After being reborn into a new existence...!\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Chimera Medullahan is sealed in the form of a snake!\
mov %viclose,1:gosub *victory
mov %getexp,190000:gosub *lvup
mov %2363,1
goto *sean0320



*c_medulahan_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Hehe, are you sure that's a good idea?@
>If you stop resisting, all that awaits is a death by pleasure...\
name ""
goto *c_medulahan_a



*c_medulahan_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *c_medulahan_kousan
if %cmd1=16 goto *c_medulahan_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *c_medulahan_main



*c_medulahan_a

if %kousoku=1 gosub *c_medulahan_a7:goto *common_main
if %status=8 gosub *c_medulahan_a9:goto *common_main
rnd2 %ransu,1,10
if %ransu=1 gosub *c_medulahan_a1:gosub *c_medulahan_a4:goto *common_main
if %ransu=2 gosub *c_medulahan_a2:gosub *c_medulahan_a4:goto *common_main
if %ransu=3 gosub *c_medulahan_a3:gosub *c_medulahan_a4:goto *common_main
if %ransu=4 gosub *c_medulahan_a1:gosub *c_medulahan_a5:goto *common_main
if %ransu=5 gosub *c_medulahan_a2:gosub *c_medulahan_a5:goto *common_main
if %ransu=6 gosub *c_medulahan_a3:gosub *c_medulahan_a5:goto *common_main
if %ransu<9 && %owaza_count1a>5 gosub *c_medulahan_a6:goto *common_main
if %ransu>8 && %owaza_count2a>5 gosub *c_medulahan_a8:goto *common_main
skip -9



*c_medulahan_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My handling is the best..."
if %ransu=2 mov $sel1,"I'll use my hand to squeeze it all out..."
if %ransu=3 mov $sel1,"Pour your humiliation in my palm..."
name $name
eng $sel1:$sel6\
name ""
skillname "Medullahan's Masturbation"
dwave 1,"se\ero_koki1.ogg"
>Medullahan grabs Luka's penis, and strokes him up and down!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3732
if %nanido<2 damage 140,150
if %nanido=2 damage 160,170
if %nanido=3 damage 180,190
skillname ""
if %mylife=0 sub %stack,1:return *c_medulahan_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_medulahan_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll trample your important male organ!"
if %ransu=2 mov $sel1,"Many men have leaked from my footwork!"
if %ransu=3 mov $sel1,"Will you come from being stepped on? How pitiful..."
name $name
eng $sel1:$sel6\
name ""
skillname "Medullahan's Footjob"
dwave 1,"se\ero_koki1.ogg"
>Medullahan steps down on Luka's crotch, rubbing the sole of her foot against his penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3733
if %nanido<2 damage 150,160
if %nanido=2 damage 170,180
if %nanido=3 damage 190,200
skillname ""
if %mylife=0 sub %stack,1:return *c_medulahan_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_medulahan_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll show you some love with my breasts..."
if %ransu=2 mov $sel1,"Cover my breasts in your semen, and disgrace yourself..."
if %ransu=3 mov $sel1,"My breast technique will lead you to a miserable finish..."
name $name
eng $sel1:$sel6\
name ""
skillname "Medullahan's Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>Medullahan pinches Luka's penis between her breasts, and uses them to massage it!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3734
if %nanido<2 damage 160,170
if %nanido=2 damage 180,190
if %nanido=3 damage 200,210
skillname ""
if %mylife=0 sub %stack,1:return *c_medulahan_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_medulahan_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll let you taste my tongue to your heart's content..."
if %ransu=2 mov $sel1,"I'll taste your semen..."
if %ransu=3 mov $sel1,"Devote all of your fluids to my mouth..."
name $name
eng $sel1:$sel6\
name ""
skillname "Medusa's Blowjob"
dwave 1,"se\ero_buchu3.ogg"
>Medullahan slowly and carefully sucks on Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3735
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
dwave 1,"se\ero_pyu1.ogg"
>Her long tongue wraps around Luka's penis!
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
skillname ""
if %mylife=0 sub %stack,1:return *c_medulahan_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_medulahan_a5

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My children's tongues are better than mine..."
if %ransu=2 mov $sel1,"Let these snakes taste you..."
if %ransu=3 mov $sel1,"My children's favorite food is the semen from young men... Hehe."
name $name
eng $sel1:$sel6\
name ""
skillname "Medusa's Hair"
dwave 1,"se\ero_pyu1.ogg"
>The snakes coil around Luka's penis, licking it all over!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3736
if %nanido<2 damage 170,180
if %nanido=2 damage 190,200
if %nanido=3 damage 210,220
skillname ""
if %mylife=0 sub %stack,1:return *c_medulahan_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_medulahan_a6

add %stack,1
mov $tatie4,"c_medulahan_st11"
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 4
name $name
>My snakes will coil around you!\
name ""
skillname "Snake Restraint"
dwave 1,"se\ero_makituki3.ogg"
>Medullahan's snakes race toward Luka's body!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3737
if %nanido<2 damage 150,160
if %nanido=2 damage 180,190
if %nanido=3 damage 210,220
mov %kousoku,1:gosub *status_print
>Luka has been bound by Medullahan!\
skillname ""
if %mylife=0 sub %stack,1:return *c_medulahan_h9
name $name
if %first_sel1=1 skip 4
>Hehe...@>Doesn't being bound by snakes feel unexpectedly good?@
>If you're nice and docile, then it will feel even better...\
skip 3
>Look, you're rolled up again...@
>If you're nice and docile, then it will feel even better...\
name ""
mov %first_sel1,1
if %nanido<2 mov %genmogaku,2
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,3
sub %stack,1
return



*c_medulahan_a7

add %stack,1
>Luka has been bound by Medullahan's snakes...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My cute snakes will love your whole body..."
if %ransu=2 mov $sel1,"Entrust your genitals to my children..."
if %ransu=3 mov $sel1,"My snakes will make you feel amazing as you come..."
name $name
eng $sel1:$sel6\
name ""
skillname "Snake Violation"
dwave 1,"se\ero_makituki3.ogg"
mov $tatie4,"c_medulahan_ha1"
lsp 700,":a;chara\c_medulahan_ha1.bmp",0,0
lsp 690,":a;chara\c_medulahan_ct01.bmp",0,0:print 10,500
>Medullahan's snakes squirm all over Luka's body!
skillcount3 3737
if %nanido<2 damage 100,110
if %nanido=2 damage 115,125
if %nanido=3 damage 130,140
dwave 1,"se\ero_makituki3.ogg"
>Focusing only on his groin, their numerous tongues all lick Luka one after another!
if %nanido<2 damage 100,110
if %nanido=2 damage 115,125
if %nanido=3 damage 130,140
skillname ""
if %mylife=0 sub %stack,1:return *c_medulahan_h6
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_medulahan_a8

add %stack,1
mov %owaza_count2a,0
name $name
>There's no way you don't know about a Medusa's magic...@
>Now turn to stone...\
name ""
skillname "Eyes of Petrification"
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
eng "Medullahan's eyes flash white!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka manages to look away in time!":gosub *wind_guard:sub %stack,1:return
\
dwave 1,"se\stone.ogg"
mov %status,8:gosub *status_print
>Luka's body is petrified!\
skillname ""
name "Luka"
>Ah... Urhg...!\
name ""
name $name
>The only thing I didn't petrify was your penis...@
>Now I'll get to enjoy you, nice and slowly...\
name ""
mov $status_end," "
sub %stack,1
return



*c_medulahan_a9

add %stack,1
name $name
>My biggest joy is raping men who have turned to stone...\
name ""
skillname "Serpent Rape"
dwave 1,"se\ero_pyu1.ogg"
mov $tatie4,"c_medulahan_hb5"
lsp 700,":a;chara\c_medulahan_hb5.bmp",0,0
lsp 690,":a;chara\c_medulahan_ct11.bmp",0,0:print 10,500
>Medullahan drops her waist down, forcing Luka's penis into her!
skillcount3 3738
mov %damage_kotei,1
damage 300,330
mov %kousoku,2:gosub *status_print
>Medullahan is raping Luka!\
skillname ""
if %mylife=0 sub %stack,1:return *c_medulahan_h7
name "Luka"
>Ahhhh!\
name ""
>As soon as I'm inside her, I feel something squirming and wriggling inside her vagina.\
>There's something inside her moving around...\
name $name
>Hehehe... There are snakes inside my pussy solely to give extra pleasure to men.\
>I'll give you a good taste of them...\
name ""
>The snakes inside her vagina start to coil around my penis!\
sub %stack,1
goto *c_medulahan_a10



*c_medulahan_a10

add %stack,1
>Luka has been petrified...@
>Luka is being raped...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hehe... My serpent vagina is the best.":mov $sel2,"Innumerable snakes coil and squirm around Luka's penis!"
if %ransu=2 mov $sel1,"No man can put up with a snake sucking on his penis inside a pussy...":mov $sel2,"The snakes squirm inside her vagina, forcing intense stimulation into Luka's body!"
if %ransu=3 mov $sel1,"My snake vagina... It will finish you off too.":mov $sel2,"The snakes all start to lick the tip of Luka's penis!"
if %ransu=4 mov $sel1,"Surrender to the feeling of my snakes...":mov $sel2,"The snakes coil around Luka's penis, slowly tightening!"
if %ransu=5 mov $sel1,"Drown in the ultimate of pleasures...":mov $sel2,"The snakes start to vibrate, forcing bizarre pleasure through Luka's body!"
name $name
eng $sel1:$sel6\
name ""
skillname "Serpent Rape"
dwave 1,"se\ero_makituki3.ogg"
eng $sel2:$sel6
skillcount3 3738
mov %damage_kotei,1
damage 300,330
skillname ""
if %mylife=0 sub %stack,1:return *c_medulahan_h8
sub %stack,1
goto *c_medulahan_a10



*c_medulahan_onedari

mov $list1,"Medullahan's Masturbation"
if %3732>0 mov %list_num1,1
mov $list2,"Medullahan's Footjob"
if %3733>0 mov %list_num2,1
mov $list3,"Medullahan's Tit Fuck"
if %3734>0 mov %list_num3,1
mov $list4,"Medusa's Blowjob"
if %3735>0 mov %list_num4,1
mov $list5,"Medusa's Hair"
if %3736>0 mov %list_num5,1
mov $list6,"Snake Violation"
if %3737>0 mov %list_num6,1
mov $list7,"Serpent Rape"
if %3738>0 mov %list_num7,1
gosub *cmd_onedari
if %cmd1=11 goto *c_medulahan_onedari1
if %cmd1=12 goto *c_medulahan_onedari2
if %cmd1=13 goto *c_medulahan_onedari3
if %cmd1=14 goto *c_medulahan_onedari4
if %cmd1=15 goto *c_medulahan_onedari5
if %cmd1=16 goto *c_medulahan_onedari6
if %cmd1=17 goto *c_medulahan_onedari7
if %cmd1=-1 goto *c_medulahan_main
goto *c_medulahan_onedari



*c_medulahan_onedari1

gosub *onedari_syori
name $name
>You want me to use my hands to play with you?@
>Then I'll make you shoot out that semen of yours...\
name ""
gosub *c_medulahan_a1
skip -1



*c_medulahan_onedari2

gosub *onedari_syori
name $name
>You want me to use my foot to play with you?@
>Then I'll make you shoot out that semen of yours...\
name ""
gosub *c_medulahan_a2
skip -1



*c_medulahan_onedari3

gosub *onedari_syori
name $name
>You want me to use my breasts to play with you?@
>Then I'll make you shoot out that semen of yours...\
name ""
gosub *c_medulahan_a3
skip -1



*c_medulahan_onedari4

gosub *onedari_syori
name $name
>You want me to use my mouth to play with you?@
>Then I'll make you shoot out that semen of yours...\
name ""
gosub *c_medulahan_a4
skip -1



*c_medulahan_onedari5

gosub *onedari_syori
name $name
>You want me to use my snake hair to play with you?@
>Then I'll make you shoot out that semen of yours...\
name ""
gosub *c_medulahan_a5
skip -1



*c_medulahan_onedari6

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want my snakes to bind and violate you?@
>Then I'll squeeze you as you desire...\
name ""
if %kousoku=0 gosub *c_medulahan_a6
gosub *c_medulahan_a7
skip -1



*c_medulahan_onedari7

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want me to rape you?@
>Then first...\
name ""
gosub *c_medulahan_a8
gosub *c_medulahan_a9
skip -1



*c_medulahan_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\c_medulahan_bk03.bmp",0,0
gosub *syasei2
>As the Chimera Medullahan strokes Luka's penis, he comes, covering her hand with semen.\
mov %viclose,1:gosub *lose
mov %2663,%2663+1:if %2663=1 mov %count_koenemy,%count_koenemy+1
if %2663>%count_most mov %count_most,%2663:mov $count_mostname,$name
count 5,6
mov $bad1,"Chimera Medullahan forced Luka to come with her hands."
gosub *face2
name $name
>Hehe... You covered my hand in semen.@
>To so happily spray out so much semen... What a miserable male.\
name ""
goto *c_medulahan_h



*c_medulahan_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\c_medulahan_bk04.bmp",0,0
gosub *syasei2
>As the Chimera Medullahan grinds the sole of her foot into Luka's penis, he comes, covering her foot with semen.\
mov %viclose,1:gosub *lose
mov %2663,%2663+1:if %2663=1 mov %count_koenemy,%count_koenemy+1
if %2663>%count_most mov %count_most,%2663:mov $count_mostname,$name
count 6,6
mov $bad1,"Chimera Medullahan forced Luka to come with her foot."
gosub *face2
name $name
>Hehe... You covered my foot in semen.@
>To so happily spray out so much semen... What a miserable male.\
name ""
goto *c_medulahan_h



*c_medulahan_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\c_medulahan_bk02.bmp",0,0
gosub *syasei2
>As Chimera Medullahan's breasts massage Luka's penis between them, he comes, filling the space between her breasts with semen.\
mov %viclose,1:gosub *lose
mov %2663,%2663+1:if %2663=1 mov %count_koenemy,%count_koenemy+1
if %2663>%count_most mov %count_most,%2663:mov $count_mostname,$name
count 7,6
mov $bad1,"Chimera Medullahan forced Luka to come with her breasts."
gosub *face2
name $name
>Hehe, you covered my breasts in semen.@
>To so happily spray out so much semen... What a miserable male.\
name ""
goto *c_medulahan_h



*c_medulahan_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\c_medulahan_bk01.bmp",0,0
gosub *syasei2
>As the Chimera Medullahan eagerly sucks on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2663,%2663+1:if %2663=1 mov %count_koenemy,%count_koenemy+1
if %2663>%count_most mov %count_most,%2663:mov $count_mostname,$name
count 4,6
mov $bad1,"Chimera Medullahan forced Luka to come using her mouth."
gosub *face2
name $name
>Nnnn... That was quite a lot.@
>To so happily spray out so much semen... What a miserable male.\
name ""
goto *c_medulahan_h



*c_medulahan_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\c_medulahan_bk05.bmp",0,0
gosub *syasei2
>As the Chimera Medullahan's snake hair licks Luka's penis clean, he comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2663,%2663+1:if %2663=1 mov %count_koenemy,%count_koenemy+1
if %2663>%count_most mov %count_most,%2663:mov $count_mostname,$name
count 22,6
mov $bad1,"Chimera Medullahan forced Luka to come with her snake hair."
gosub *face2
name $name
>Hehe, you covered my children with your semen...@
>To so happily spray out so much semen... What a miserable male.\
name ""
goto *c_medulahan_h



*c_medulahan_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\c_medulahan_ha2.bmp",0,0
lsp 690,":a;chara\c_medulahan_ct02.bmp",0,0
gosub *syasei2
>Bound in the Chimera Medullahan's snakes, Luka comes as the innumerable snakes lick and rub against his whole body.\
mov %viclose,1:gosub *lose2
name "Luka"
>Ahhh...\
name ""
name $name
>Hehe, you covered my children with so much semen...@
>To so happily spray out so much semen... What a miserable male.\
>Come now, let them lick it all out...\
name ""
skillcount3 3737
skillname "Snake Violation"
dwave 1,"se\ero_pyu2.ogg"
>The snake's tongues concentrate on Luka's glans!
mov %damage_kotei,1
damage 100,110
dwave 1,"se\ero_pyu2.ogg"
>The pleasure of countless tongues licking him at once overwhelms Luka!
mov %damage_kotei,1
damage 100,110
skillname ""
name "Luka"
>Ah... Hyaa!\
name ""
name $name
>Hehe, you stall haven't had enough teasing yet, have you?\
>Don't worry, I'll give you plenty more...\
name ""
skillcount3 3737
skillname "Snake Violation"
dwave 1,"se\ero_pyu2.ogg"
>The snake's tongues lick every inch of Luka's penis!
mov %damage_kotei,1
damage 100,110
dwave 1,"se\ero_pyu2.ogg"
>Their tongues wind around Luka's penis, squeezing at the same time!
mov %damage_kotei,1
damage 100,110
skillname ""
name "Luka"
>S...Stop... Ahhh!\
name ""
name $name
>About to come again, I see...@
>Here, let their tongues squeeze it out!\
name ""
skillcount3 3737
skillname "Snake Violation"
dwave 1,"se\ero_pyu2.ogg"
>A snake's tongue winds around the neck of Luka's penis!
mov %damage_kotei,1
damage 100,110
dwave 1,"se\ero_pyu2.ogg"
>A tongue runs up and down the back of Luka's penis!
mov %damage_kotei,1
damage 100,110
skillname ""
name "Luka"
>C...Coming...!@> Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\c_medulahan_ha3.bmp",0,0
lsp 690,":a;chara\c_medulahan_ct03.bmp",0,0
gosub *syasei2
>As the tongues run all over Luka's penis, he comes, covering the eagerly licking snakes with more semen.\
name $name
>Hehe... Semen is my children's favorite food.@
>Look at how happy you have made them...\
>Look, they're getting ready to play with your penis again.@
>It looks like they've acquired a taste for your semen...\
name ""
name "Luka"
>No more... Ahhh...\
name ""
skillcount3 3737
skillname "Snake Violation"
dwave 1,"se\ero_pyu2.ogg"
>Countless tongues lick Luka's glans, licking up the leftover semen!
mov %damage_kotei,1
damage 100,110
dwave 1,"se\ero_pyu2.ogg"
>The tip of a tongue flicks Luka's urethral opening, seeking more semen!
mov %damage_kotei,1
damage 100,110
skillname ""
name "Luka"
>Ahh... Stop licking...\
name ""
name $name
>Even if you say that, they still want more.@
>I'm sure if you give them more of what they want, they'll eventually be satisfied...\
name ""
skillcount3 3737
skillname "Snake Violation"
dwave 1,"se\ero_pyu2.ogg"
>The tip of a snake's tongue traces around under the neck of Luka's penis!
mov %damage_kotei,1
damage 100,110
dwave 1,"se\ero_pyu2.ogg"
>The tongues coiled around his penis slowly tighten!
mov %damage_kotei,1
damage 100,110
skillname ""
name "Luka"
>Ahh... I'm going to come again...\
name ""
name $name
>Hehe... Another meal coming for them.@
>Now then, close your eyes and don't think about anything but feeding my children...\
name ""
skillcount3 3737
skillname "Snake Violation"
dwave 1,"se\ero_pyu2.ogg"
>The tongues lick with even more force on Luka's glans, licking it clean!
mov %damage_kotei,1
damage 100,110
dwave 1,"se\ero_pyu2.ogg"
>The tongues squeeze and lick every single inch of Luka's penis!
mov %damage_kotei,1
damage 100,110
skillname ""
name "Luka"
>Ha...!@> Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\c_medulahan_ha4.bmp",0,0
lsp 690,":a;chara\c_medulahan_ct04.bmp",0,0
gosub *syasei2
>Overrun by the snakes, Luka comes again, covering them with even more semen.\
>Moments after his ejaculation, they've already almost fully licked up all the semen again.\
name $name
>Are they satisfied with their food?@
>Oh my, just look at their swollen bellies...\
>Next I'll have you entertain me some...\
name ""
gosub *clear_sprite
gosub *setwindow_01p
mov %battle,0
mov %hsean,1
mov %2663,%2663+1:if %2663=1 mov %count_koenemy,%count_koenemy+1
if %2663>%count_most mov %count_most,%2663:mov $count_mostname,$name
count 22,6
mov $bad1,"Chimera Medullahan's snakes forced Luka to come as he was kept bound."
goto *c_medulahan_h



*c_medulahan_h7

mov %ikigoe,3:gosub *ikigoe
name $name
>Ahaha... Instant defeat.@
>Already coming...\
name ""
gosub *syasei1
lsp 700,":a;chara\c_medulahan_hb6.bmp",0,0
lsp 690,":a;chara\c_medulahan_ct12.bmp",0,0
gosub *syasei2
>The moment Luka is forced into the Chimera Medullahan's vagina, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2663,%2663+1:if %2663=1 mov %count_koenemy,%count_koenemy+1
if %2663>%count_most mov %count_most,%2663:mov $count_mostname,$name
mov %count_bouhatu,%count_bouhatu+1
count 1,6
mov $bad1,"Luka was brought to orgasm just from being inserted into Chimera Medullahan."
gosub *face2
name $name
>Hehe, my serpent vagina is already full of semen...@
>You really are miserable, aren't you?\
>But we have only just started.@
>If I move it inside like this...\
name ""
goto *c_medulahan_h



*c_medulahan_h8

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\c_medulahan_hb6.bmp",0,0
lsp 690,":a;chara\c_medulahan_ct12.bmp",0,0
gosub *syasei2
>As the snakes inside the Chimera Medullahan's vagina plays with Luka's penis, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2663,%2663+1:if %2663=1 mov %count_koenemy,%count_koenemy+1
if %2663>%count_most mov %count_most,%2663:mov $count_mostname,$name
count 1,6
mov $bad1,"Luka was forced to come inside the Chimera Medullahan's vagina."
gosub *face2
name $name
>Hehe, my serpent vagina is already full of semen...@
>You really are miserable, aren't you?\
>But we have only just started.@
>If I move it inside like this...\
name ""
goto *c_medulahan_h



*c_medulahan_h9

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>As the snakes coil around Luka's body, he accidentally comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2663,%2663+1:if %2663=1 mov %count_koenemy,%count_koenemy+1
if %2663>%count_most mov %count_most,%2663:mov $count_mostname,$name
mov %count_bouhatu,%count_bouhatu+1
count 16,6
mov $bad1,"Luka was brought to orgasm as the Chimera Medullahan's snakes wrapped around his body."
gosub *face2
name $name
>Coming just from being bound up?@
>It's about to get much better...\
name ""
goto *c_medulahan_h



*c_medulahan_h

mov $bad2,"Luka was raped until his death, driven insane by the pleasure."
if %2663=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku=2 mov %hseanwave,12:hseanwave:goto *c_medulahan_hb
name "Luka"
>Ahh...\
name ""
name $name
>Now to rape you...@
>With this serpent vagina that has finished off countless men already...\
name ""
cspl 690,699
lsp 700,":a;chara\c_medulahan_hb0.bmp",0,0:print 10,500
>The Chimera's body jumps on top of me, almost as if she was riding me.@
>She leans her detached head over my chest with a cold-blooded smile.\
name $name
>My vagina is incredible...@
>It's filled with tiny snakes that will climb all over your penis, squeezing and rubbing and tightening...\
>No man can even last for more than ten seconds...@
>After an hour, they all go insane too.\
>You, too, will keep on climaxing until you break.@
>The next victim of my serpent vagina...\
name ""
name "Luka"
>N...No...@>Stop!\
name ""
>My appeals fall on deaf ears as she drops her waist.@
>With one quick movement, I'm forced deep into her.\
mov %hseanwave,12:hseanwave
lsp 700,":a;chara\c_medulahan_hb1.bmp",0,0:print 10,500
>In seconds, my penis is in her all the way to the root.@
>Inserted into her horrible serpent vagina...\
goto *c_medulahan_hb



*c_medulahan_hb

name "Luka"
>Ah...ahh...\
name ""
lsp 690,":a;chara\c_medulahan_ct11.bmp",0,0:print 10,500
>In the next second, I lose control of my reactions.\
>Innumerable tiny snakes rush out and attack my penis.@
>Rubbing, massaging, squeezing, licking... It's like nothing I've ever felt before.\
>They run over my glans, squeezing it at times...@
>Trembling and shaking, my mind goes blank as the pleasure takes over me.\
name "Luka"
>Ah...ahh...\
name ""
gosub *syasei1
if %kousoku<2 lsp 700,":a;chara\c_medulahan_hb2.bmp",0,0
if %kousoku=2 lsp 700,":a;chara\c_medulahan_hb6.bmp",0,0
lsp 690,":a;chara\c_medulahan_ct12.bmp",0,0
gosub *syasei2
>Before I had even felt the orgasm, my semen explodes into her.@
>It seems like my body surrendered to her vagina before my mind could even register it.\
>Almost solely from insertion, her hellish vagina already drew out a climax.@
>The sensation from the orgasm floods over me as that realization hits.\
name "Luka"
>Wh...What is...@
>Ahh...\
name ""
name $name
>Hahaha, an instant kill?@
>How does it feel orgasming before even knowing why?\
>Your senses will catch up soon...@
>This is just the beginning of the serpent vagina hell.\
name ""
name "Luka"
>I...It's moving inside...!@
>Ahhg!\
name ""
mov %hseanwave,13:hseanwave
>I was brought to an orgasm before I even really knew why...@
>And those same strange movements are still continuing inside her vagina.\
>As my senses slowly clear, the pleasure quickly ramps up to unimaginable heights.@
>I feel the innumerable snakes coiling and wriggling around my penis as I race up another climax.\
name "Luka"
>Ahhh...!!\
name ""
gosub *syasei1
if %kousoku<2 lsp 700,":a;chara\c_medulahan_hb3.bmp",0,0
if %kousoku=2 lsp 700,":a;chara\c_medulahan_hb7.bmp",0,0
lsp 690,":a;chara\c_medulahan_ct13.bmp",0,0
gosub *syasei2
>Going mad with pleasure, I'm brought to a second height in no time.@
>But despite feeling it, my body still doesn't recognize the exact trigger for what brought me over the edge...\
>It's like her vagina is able to just force an orgasm whenever she wants it to.\
name $name
>Hehe, that was the second one...@
>But it isn't over until you're completely empty of semen.\
>I wonder if you'll go completely dry before your mind breaks?\
name ""
name "Luka"
>Ahhhh!!\
name ""
>Forced pleasure is pounded into me, designed to break a man's mind.@
>As the horrible snakes inside of her rub and greedily devour my penis, my body unconsciously pushes up into her, seeking more.\
>If this devastating pleasure continues much longer, my mind is going to burn out.\
name "Luka"
>Uwaaa!@> L...let me go!@
>Help me!\
name ""
name $name
>Ahaha... What a nice voice you have!@
>Do you like my serpent vagina that much?\
>Come on, let me hear more of those screams.@
>Go mad in my serpent vagina hell...\
name ""
name "Luka"
>Aiiieee!!\
name ""
gosub *syasei1
if %kousoku<2 lsp 700,":a;chara\c_medulahan_hb4.bmp",0,0
if %kousoku=2 lsp 700,":a;chara\c_medulahan_hb8.bmp",0,0
lsp 690,":a;chara\c_medulahan_ct14.bmp",0,0
gosub *syasei2
>In a storm of pleasure, my semen explodes into her vagina.@
>Again, I'm forced to ejaculate before the pleasure registers in my head.\
>The tangled snakes around my penis continue rubbing me, as the pleasure registers in my head a few seconds later.\
>My breathing gets rough as the continual ejaculations overlap with each other.\
name "Luka"
>Ahhhh!!\
name ""
>Unable to hold my body back, my waist thrusts up into her.@
>Bouncing up and down, it's almost like I'm having a seizure under her.\
>My vision goes hazy as the overwhelming ecstasy takes hold of me.@
>Any more of this and I really will go insane...\
name "Luka"
>Hyaa... Stop...\
name ""
name $name
>Hehe, it's amazing isn't it?@
>Any man would go crazy if raped by me...\
>And then die while stuck in that insanity of orgasms.@
>You too will die in my serpent vagina...\
name ""
>The Chimera looks down on me and laughs.@
>With her eyes locked on mine, she's watching closely as I descend into madness.\
name "Luka"
>H...Help me... Ahhhh!\
name ""
gosub *syasei1:gosub *syasei2
>My body goes into spasms as I'm brought to another height only moments after the last one.@
>Raped by her, stuck in her serpent vagina...\
name "Luka"
>Stop... I'll die...!@
>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>As if spiting my yells, another orgasm continues my whirlwind of pleasure.@
>Too exhausted to struggle any longer, nothing can stop it from coming.\
name "Luka"
>Ahhgg... Ahhh...\
name ""
>My brain feels like it's going to overheat...@
>And all the while, the Chimera just watches and laughs.\
gosub *syasei1:gosub *syasei2
name "Luka"
>Ah...ah....\
name ""
>My body trembles just a little bit now with each spurt of semen.@
>Overpowered by the pleasure, my thoughts are slipping away from me.\
>It's like a circuit inside of me was broken from the storm of pleasure.@
>With no strength left in my body, I'm just slowly fading away...\
gosub *syasei1:gosub *syasei2
name "Luka"
>Ah..a...\
name ""
name $name
>Good... I see the light vanishing from your eyes.@
>Now you too have been broken.\
>But just a little more...@
>I'll let you die like this.\
name ""
name "Luka"
>Ah...ah...\
name ""
gosub *syasei1:gosub *syasei2
>With a final thin orgasm, the last of my life spurts into her.@
>At the same time, my consciousness starts to fade...\
mov %hseanwave,0:hseanwave
>Cut off from the world, it feels like I'm falling into a gentle, long sleep...\
name $name
>Ahaha... Already dead?@
>Humans are so fragile...\
name ""
>The Chimera Medullahan looks down at the corpse of the boy before her, another victim of her serpent vagina...\
gosub *anten
>...............\
goto *badend



*trinity_start

mov $name,"Trinity"
mov $name2,"Trinity A"
mov $lavel,"trinity"
mov $tatie1,"trinity_st01"
mov $tatie2,"trinity_st02"
mov $tatie3,"trinity_st03"
mov $tatie4,"trinity_ha1"
mov $haikei,"bg221"
mov %monster_x,0
mov %monster_y,0
mov $tatie1b,"trinity_st11"
mov $tatie2b,"trinity_st12"
mov $tatie3b,"trinity_st13"
mov %monster_xb,0
mov %monster_yb,0
mov $tatie1c,"trinity_st21"
mov $tatie2c,"trinity_st22"
mov $tatie3c,"trinity_st23"
mov %monster_xc,0
mov %monster_yc,0
if %nanido=1 mov %max_enemylife,17000
if %nanido=2 mov %max_enemylife,19000
if %nanido=3 mov %max_enemylife,21000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,1
mov %alice_skill1,0
mov %alice_skill2,0
mov %alice_skill3,0
mov %music,9
gosub *maxmp:mov %mp,%max_mp
mov %tekikazu,3
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free from the Trinities' restraint!"
mov $mogaku_anno2,"Luka broke free of the Trinities!"
mov $mogaku_anno3,"But Luka can't move while bound like this!"
mov $mogaku_sel1,"You can't escape. You will finish on my chest..."
mov $mogaku_sel2,"Once this happens, no man is able to escape..."
mov $mogaku_sel3,"Are you not pleased with this pleasure? It's a luxury..."
mov $mogaku_sel4,"I'll even take your will to struggle..."
mov $mogaku_sel5,"No matter how much you struggle, we won't let you escape your ascension..."
mov $half_s1,"You can't match our skill."
mov $half_s2,"Just surrender and enjoy your ascension to paradise..."
mov $kiki_s1,"You're almost finished..."
mov $kiki_s2,"Shall we prepare the cross of pleasure?"
mov %end_n,10
mov %exp_minus,190000
mov %zmonster_x,-300
mov %tukix,300
mov %tekikazu,3
mov %owaza_count1a,4
name "Luka"
>What did you three do to him!?\
name ""
name "Trinity A"
>We purified the sinner who dared to mate with harpies with a cross of pleasure.\
name ""
name "Trinity B"
>This unclean village full of men who cross with harpies...@
>It's our duty to cleanse the sinners.\
name ""
name "Trinity C"
>We shall also cleanse you with a cross of pleasure.@
>After that, we will bring the rest of the villagers to the afterlife...\
name ""
name "Luka"
>I won't allow it!\
name ""
>I point my sword at the three angels.\
>They may be the leaders of the assault force...@
>If I fight them off, the command structure should collapse!\
goto *common_main



*trinity_v

gosub *face3
name "Trinity A"
>It can't be... A human overcame our cooperation!?\
name ""
dwave 1,"se\bun.ogg"
csp 700:print 99,1000,"system\breakup.dll/lrB"
>Trinity A fades away into particles, then vanishes!\
name "Trinity B"
>N...No... With just the two of us...\
name ""
name "Trinity C"
>We must retreat!\
name ""
dwave 1,"se\escape.ogg"
cspl 700,706:print 10,500
>The two remaining angels quickly fly away...\
mov %viclose,1:gosub *victory
mov %getexp,200000:gosub *lvup
mov %2356,1
goto *sean0321



*trinity_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name "Trinity A"
>So you've resigned yourself to accepting the cross?\
name ""
name "Trinity B"
>You don't have to think about anything anymore.@
>Just indulge in eternal pleasure...\
name ""
goto *trinity_a



*trinity_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=11 && %sinkou=1 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *trinity_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *trinity_kousan
if %cmd1=16 goto *trinity_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *trinity_main



*trinity_mogaku2

mov %before_action,8
if %nanido=2 rnd2 %ransu,1,10:if %ransu=5 goto *common_mogaku
if %nanido=3 rnd2 %ransu,1,2:if %ransu=2 goto *common_mogaku
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Uooo!"
if %ransu=2 mov $sel1,"Youuu!"
if %ransu=3 mov $sel1,"Get off!"
name "Luka"
eng $sel1:$sel6\
name ""
dwave 1,"se\dassyutu.ogg"
lsp 700,":a;chara\trinity_st03.bmp",0,0
lsp 702,":a;chara\trinity_st13.bmp",0,0
lsp 704,":a;chara\trinity_st23.bmp",0,0
mov %kousoku,0:gosub *status_print
>Luka struggles with everything he has, and breaks free of the Trinities!\
mov %owaza_count1a,0
name "Trinity A"
>Do you not wish to ascend?@
>We shall make it so you will wish for nothing else but that...\
name ""
lsp 702,":a;chara\trinity_st11.bmp",0,0
lsp 704,":a;chara\trinity_st21.bmp",0,0
gosub *face1
goto *common_main



*trinity_a

if %kousoku=1 gosub *trinity_a5:goto *common_main
if %kousoku=2 gosub *trinity_a6:goto *common_main
rnd2 %ransu,1,4
if %ransu=1 gosub *trinity_a1:goto *common_main
if %ransu=2 gosub *trinity_a2:goto *common_main
if %ransu=3 gosub *trinity_a3:goto *common_main
if %ransu=4 && %owaza_count1a>5 gosub *trinity_a4:goto *common_main
skip -5



*trinity_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Taste the supreme bliss my hand can bring..."
if %ransu=2 mov $sel1,"I'll accept your semen in my hand..."
if %ransu=3 mov $sel1,"An angel's palms are nice and soft..."
name "Trinity A"
eng $sel1:$sel6\
name ""
skillname "Blissful Masturbation"
dwave 1,"se\ero_koki1.ogg"
>Trinity A grabs hold of Luka's penis, and slowly strokes him!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3763
if %nanido<2 damage 130,140
if %nanido=2 damage 140,150
if %nanido=3 damage 150,160
skillname ""
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"How many men do you think have finished in this hand of mine?"
if %ransu=2 mov $sel1,"Now give yourself over to bliss..."
if %ransu=3 mov $sel1,"I'll squeeze all of your semen out..."
name "Trinity B"
eng $sel1:$sel6\
name ""
skillname "Blissful Masturbation"
dwave 1,"se\ero_koki1.ogg"
>Trinity B rhythmically squeezes Luka's penis!
if %nanido<2 damage 130,140
if %nanido=2 damage 140,150
if %nanido=3 damage 150,160
skillname ""
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"When you can't take it any longer, go ahead and leak..."
if %ransu=2 mov $sel1,"Rejoice, for not many men can claim to have spilled their seed on an angel's palm..."
if %ransu=3 mov $sel1,"Your energetic penis will get to spray out lots of semen..."
name "Trinity C"
eng $sel1:$sel6\
name ""
skillname "Blissful Masturbation"
dwave 1,"se\ero_koki1.ogg"
>Trinity C slowly massages Luka's penis with her hand!
if %nanido<2 damage 130,140
if %nanido=2 damage 140,150
if %nanido=3 damage 150,160
skillname ""
if %mylife=0 sub %stack,1:return *trinity_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*trinity_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Taste the happiness of my mouth..."
if %ransu=2 mov $sel1,"Do you want to ejaculate while covered with an angel's saliva?"
if %ransu=3 mov $sel1,"Nnn... I'll coil my tongue around the tip..."
name "Trinity A"
eng $sel1:$sel6\
name ""
skillname "Proselytising Blowjob"
dwave 1,"se\ero_buchu3.ogg"
>Trinity A sucks on Luka's penis with her wet mouth!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3764
if %nanido<2 damage 140,150
if %nanido=2 damage 150,160
if %nanido=3 damage 160,170
skillname ""
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Do you want to pour your semen in an angel's mouth?"
if %ransu=2 mov $sel1,"I'll make you come with my technique..."
if %ransu=3 mov $sel1,"If I'm a little intense, can you still endure it?"
name "Trinity B"
eng $sel1:$sel6\
name ""
skillname "Proselytising Blowjob"
dwave 1,"se\ero_buchu3.ogg"
>Trinity B sucks in Luka's penis, and quickly pumps him!
if %nanido<2 damage 140,150
if %nanido=2 damage 150,160
if %nanido=3 damage 160,170
skillname ""
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Nnn... Go ahead and finish..."
if %ransu=2 mov $sel1,"Well? Doesn't it feel like your soul itself is being sucked out?"
if %ransu=3 mov $sel1,"Even if you come, I'll keep sucking and swallow it..."
name "Trinity C"
eng $sel1:$sel6\
name ""
skillname "Proselytising Blowjob"
dwave 1,"se\ero_buchu3.ogg"
>Trinity C sucks hard on Luka's penis, covering him with her saliva!
if %nanido<2 damage 140,150
if %nanido=2 damage 150,160
if %nanido=3 damage 160,170
skillname ""
if %mylife=0 sub %stack,1:return *trinity_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*trinity_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Finish on my pure thigh..."
if %ransu=2 mov $sel1,"Indulge in the pleasure found between my thighs..."
if %ransu=3 mov $sel1,"My body is very warm, is it not?"
name "Trinity A"
eng $sel1:$sel6\
name ""
skillname "Pleasurable Intercrural"
dwave 1,"se\ero_sigoki1.ogg"
>Trinity A slowly squeezes her thighs around Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3765
if %nanido<2 damage 150,160
if %nanido=2 damage 160,170
if %nanido=3 damage 170,180
skillname ""
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"If I tighten my thighs like this, will you finish right away?"
if %ransu=2 mov $sel1,"Between these thighs, numerous men have ascended..."
if %ransu=3 mov $sel1,"If I squeeze like this, it's incredible..."
name "Trinity B"
eng $sel1:$sel6\
name ""
skillname "Pleasurable Intercrural"
dwave 1,"se\ero_sigoki1.ogg"
>Trinity B squeezes her thighs down tight against Luka's penis!
if %nanido<2 damage 150,160
if %nanido=2 damage 160,170
if %nanido=3 damage 170,180
skillname ""
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"This feels amazing, doesn't it?"
if %ransu=2 mov $sel1,"Come, sully my pure thighs with all of your dirty semen..."
if %ransu=3 mov $sel1,"When semen is sprayed onto my thighs, it gets all sticky and disgusting..."
name "Trinity C"
eng $sel1:$sel6\
name ""
skillname "Pleasurable Intercrural"
dwave 1,"se\ero_sigoki1.ogg"
>Trinity C squeezes Luka's penis between her thighs, then starts to wriggle her waist around!
if %nanido<2 damage 150,160
if %nanido=2 damage 160,170
if %nanido=3 damage 170,180
skillname ""
if %mylife=0 sub %stack,1:return *trinity_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*trinity_a4

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 7
name "Trinity A"
>It's time for you to taste my chest...\
name ""
name "Trinity B"
>First we will stop you from escaping...\
name ""
skillname "Ascension Restraint"
eng "Trinity B and C each hold down half of Luka's body!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
cspl 702,704
mov %kousoku,1:gosub *status_print
>Luka has been bound by the Trinities!\
skillname ""
lsp 690,":a;chara\trinity_ct01.bmp",0,0:print 10,500
name "Trinity A"
>I've ascended hundreds of men with my breasts...@
>You too will ascend to heaven between them...\
name ""
if %earth=0 && %nanido<2 mov %genmogaku,2
if %earth=0 && %nanido=2 mov %genmogaku,2
if %earth=0 && %nanido=3 mov %genmogaku,3
sub %stack,1
return



*trinity_a5

add %stack,1
if %kousan=2 skip 5
>Luka has been bound by the Trinities...\
name "Trinity A"
>Now to give you a taste of pleasure...\
name ""
skillname "Ascending Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
lsp 700,":a;chara\trinity_ha2.bmp",0,0
lsp 690,":a;chara\trinity_ct02.bmp",0,0:print 10,500
>Trinity A sandwiches Luka's penis between her breasts!
>His penis sinks into her soft skin!
skillcount3 3766
if %nanido<2 damage 120,130
if %nanido=2 damage 150,160
if %nanido=3 damage 180,190
skillname ""
if %mylife=0 sub %stack,1:return *trinity_h4
>Luka has been bound by the Trinities...\
name "Trinity A"
>I'll make it even more comfortable...@
>I'll cover it with lots of my saliva.\
name ""
skillname "Ascending Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
lsp 700,":a;chara\trinity_ha3.bmp",0,0
lsp 690,":a;chara\trinity_ct03.bmp",0,0:print 10,500
>Trinity A lets spit fall out of her mouth, covering Luka's penis!
>The warm liquid lubricates Luka's penis between her soft breasts!
skillcount3 3766
if %nanido<2 damage 120,130
if %nanido=2 damage 150,160
if %nanido=3 damage 180,190
mov %kousoku,2
skillname ""
if %mylife=0 sub %stack,1:return *trinity_h4
name "Trinity A"
>Now you're ready.@
>All that's left is to bring you to heaven...\
name ""
sub %stack,1
return



*trinity_a6

add %stack,1
mov $tatie4,"trinity_ha4"
>Luka has been bound by the Trinities...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You'll finish right away if I tighten like this...":mov $sel2,"Trinity A presses on her breasts, squeezing Luka's penis between them!"
if %ransu=2 mov $sel1,"Shall I make it a little more intense?":mov $sel2,"Trinity A uses her hands to rub her breasts against Luka's penis in opposite directions!"
if %ransu=3 mov $sel1,"I'll do it nice and slowly like this...":mov $sel2,"Trinity A gently presses down on Luka's penis between her breasts!"
if %ransu=4 mov $sel1,"It feels good, doesn't it? Let it go whenever you want...":mov $sel2,"Trinity A bounces her breasts up and down, bouncing Luka's penis around between them!"
if %ransu=5 mov $sel1,"Come, sully my breasts with your dirty semen...":mov $sel2,"Trinity A uses both her hands to pump Luka's penis with her breasts!"
name "Trinity A"
eng $sel1:$sel6\
name ""
skillname "Ascending Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
lsp 700,":a;chara\trinity_ha4.bmp",0,0
lsp 690,":a;chara\trinity_ct04.bmp",0,0:print 10,500
eng $sel2:$sel6
skillcount3 3766
if %nanido<2 damage 120,130
if %nanido=2 damage 150,160
if %nanido=3 damage 180,190
skillname ""
if %mylife=0 sub %stack,1:return *trinity_h4
return



*trinity_onedari

mov $list1,"Blissful Masturbation"
if %3763>0 mov %list_num1,1
mov $list2,"Proselytising Blowjob"
if %3764>0 mov %list_num2,1
mov $list3,"Pleasurable Intercrural"
if %3765>0 mov %list_num3,1
mov $list4,"Ascending Tit Fuck"
if %3766>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *trinity_onedari1
if %cmd1=12 goto *trinity_onedari2
if %cmd1=13 goto *trinity_onedari3
if %cmd1=14 goto *trinity_onedari4
if %cmd1=-1 goto *trinity_main
goto *trinity_onedari



*trinity_onedari1

gosub *onedari_syori
name "Trinity A"
>You want to come in our hands?@
>Then as you wish...\
name ""
gosub *trinity_a1
skip -1



*trinity_onedari2

gosub *onedari_syori
name "Trinity A"
>You want to come in our mouths?@
>Then as you wish...\
name ""
gosub *trinity_a2
skip -1



*trinity_onedari3

gosub *onedari_syori
name "Trinity A"
>You want to come between our thighs?@
>Then as you wish...\
name ""
gosub *trinity_a3
skip -1



*trinity_onedari4

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name "Trinity A"
>You want to ascend between my breasts?@
>Then as you wish...\
name ""
if %kousoku=0 gosub *trinity_a4
if %kousoku=1 gosub *trinity_a5
if %kousoku=2 gosub *trinity_a6
skip -1



*trinity_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 699,":a;chara\trinity_bk04.bmp",0,0
lsp 701,":a;chara\trinity_bk14.bmp",0,0
lsp 703,":a;chara\trinity_bk24.bmp",0,0
gosub *syasei2
>Unable to endure the three Trinities hand techniques, Luka comes, covering their palms in semen.\
mov %viclose,1:gosub *lose
mov %2656,%2656+1:if %2656=1 mov %count_koenemy,%count_koenemy+1
if %2656>%count_most mov %count_most,%2656:mov $count_mostname,$name
count 5,16
mov $bad1,"The Trinities forced Luka to come with their hands."
gosub *face2
name "Trinity A"
>Hehe, did it feel good?@
>But the true taste of heaven starts now...\
name ""
goto *trinity_h



*trinity_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 699,":a;chara\trinity_bk01.bmp",0,0
lsp 701,":a;chara\trinity_bk11.bmp",0,0
lsp 703,":a;chara\trinity_bk21.bmp",0,0
gosub *syasei2
>As the Trinities take turns sucking on Luka's penis, he comes, covering their faces in semen.\
mov %viclose,1:gosub *lose
mov %2656,%2656+1:if %2656=1 mov %count_koenemy,%count_koenemy+1
if %2656>%count_most mov %count_most,%2656:mov $count_mostname,$name
count 4,16
mov $bad1,"The Trinities forced Luka to come with their mouths."
gosub *face2
name "Trinity A"
>Hehe, did it feel good?@
>But the true taste of heaven starts now...\
name ""
goto *trinity_h



*trinity_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 699,":a;chara\trinity_bk03.bmp",0,0
lsp 701,":a;chara\trinity_bk13.bmp",0,0
lsp 703,":a;chara\trinity_bk23.bmp",0,0
gosub *syasei2
>As the Trinities take turns squeezing Luka's penis between their thighs, he comes, covering their pure white skin in semen.\
mov %viclose,1:gosub *lose
mov %2656,%2656+1:if %2656=1 mov %count_koenemy,%count_koenemy+1
if %2656>%count_most mov %count_most,%2656:mov $count_mostname,$name
count 3,16
mov $bad1,"The Trinities forced Luka to come with their thighs."
gosub *face2
name "Trinity A"
>Hehe, did it feel good?@
>But the true taste of heaven starts now...\
name ""
goto *trinity_h



*trinity_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\trinity_ha5.bmp",0,0
lsp 690,":a;chara\trinity_ct05.bmp",0,0
gosub *syasei2
>As the two Trinities hold him down, and the third squeezes his penis with her breasts, he comes, covering her chest in semen.\
mov %viclose,1:gosub *lose2
name "Luka"
>Ahhh...\
name ""
name "Trinity A"
>Did it feel good?@
>I'll have you taste the softness of my breasts even more...\
name ""
skillcount3 3766
skillname "Ascending Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
lsp 690,":a;chara\trinity_ct06.bmp",0,0:print 10,500
>Squeezing her breasts hard, Trinity A's breasts press into Luka's penis!
mov %damage_kotei,1
damage 120,130
dwave 1,"se\ero_sigoki1.ogg"
>Putting more power into her arms, they tighten around Luka's penis!
mov %damage_kotei,1
damage 120,130
skillname ""
name "Luka"
>Haa... It feels good...\
name ""
name "Trinity B"
>Don't deny the pleasure, just accept it...\
name ""
name "Trinity C"
>If you do, you'll be able to truly taste heaven...\
name ""
skillcount3 3766
skillname "Ascending Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>Trinity A slowly increases the pressure on her breasts!
mov %damage_kotei,1
damage 120,130
dwave 1,"se\ero_sigoki1.ogg"
>Her smooth skin rubs against Luka's penis as they squeeze him!
mov %damage_kotei,1
damage 120,130
skillname ""
name "Luka"
>Haaa... I'm going to come again...\
name ""
name "Trinity A"
>Don't resist it, just accept it.@
>Now, finish between my breasts...\
name ""
skillcount3 3766
skillname "Ascending Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>The pressure slowly increases even more!
mov %damage_kotei,1
damage 120,130
dwave 1,"se\ero_sigoki1.ogg"
>With a final powerful squeeze, Luka's penis sinks deep into her elastic breasts!\
mov %damage_kotei,1
damage 120,130
skillname ""
name "Luka"
>S...So good... Ahhh...\
name ""
gosub *syasei1
lsp 700,":a;chara\trinity_ha6.bmp",0,0
gosub *syasei2
>Sighing in pleasure, Luka's body relaxes as he explodes between her breasts.\
name "Trinity A"
>Yes, that's good...@
>If you desire it, I'll squeeze out your semen over and over between my breasts.\
name ""
name "Luka"
>Haa... Ahh...\
name ""
skillcount3 3766
skillname "Ascending Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
lsp 690,":a;chara\trinity_ct07.bmp",0,0:print 10,500
>Trinity A starts to move her breasts up and down!
mov %damage_kotei,1
damage 120,130
dwave 1,"se\ero_sigoki1.ogg"
>Moving in opposite directions, she uses her breasts to knead his penis!
mov %damage_kotei,1
damage 120,130
skillname ""
name "Luka"
>Haa... That's amazing...\
name ""
name "Trinity B"
>Drown in the pleasure...\
name ""
name "Trinity C"
>Then become a slave to it...\
name ""
skillcount3 3766
skillname "Ascending Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>Trinity A shakes her breasts, making them almost vibrate!
mov %damage_kotei,1
damage 120,130
dwave 1,"se\ero_sigoki1.ogg"
>Luka's penis is tossed side to side between her soft, vibrating breasts!
mov %damage_kotei,1
damage 120,130
skillname ""
name "Luka"
>Haa... Incredible...\
name ""
name $name
>Now ascend...@
>Give me everything...\
name ""
skillcount3 3766
skillname "Ascending Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>Moving her breasts in an alternate rhythm, Trinity A kneads Luka's penis with her breasts!
mov %damage_kotei,1
damage 120,130
dwave 1,"se\ero_sigoki1.ogg"
>At the same time, Trinity A squeezes down tightly, crushing Luka's penis between her elastic breasts!
mov %damage_kotei,1
damage 120,130
skillname ""
name "Luka"
>Ahhhh...\
name ""
gosub *syasei1
lsp 690,":a;chara\trinity_ct08.bmp",0,0
gosub *syasei2
>His body and soul almost melting in pleasure, he comes all over the Trinity's chest.\
>It's as if he truly ascended to heaven...\
name "Trinity A"
>Hehe, did it feel good?@
>But the true taste of heaven starts now...\
name ""
gosub *clear_sprite
gosub *setwindow_01p
>The angels all around me start to smile.@
>Just what do they have planned for me next...?\
mov %battle,0
mov %hsean,1
mov %2656,%2656+1:if %2656=1 mov %count_koenemy,%count_koenemy+1
if %2656>%count_most mov %count_most,%2656:mov $count_mostname,$name
count 7,16
mov $bad1,"Trinity A forced Luka to come with her breasts as the other two held him down."
goto *trinity_h



*trinity_h

mov $bad2,"Hung on a cross of pleasure, Luka is forced to ascend over and over..."
if %2656=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahhh...\
name ""
>As I weaken and fall to my knees, the angels look on me with gentle smiles.\
name "Trinity A"
>Now let us put the sinner on the cross of pleasure.@
>Repent your sins as you drown in pleasure.\
name ""
name "Trinity B"
>Normally a cross of pleasure is performed with three angels.@
>But due to your especially grievous crimes, it will be done by two sets of Trinities.\
name ""
name "Luka"
>Eh...?\
name ""
>Next to the three Trinities, another set of three appears from the sky.@
>Suddenly, six Trinities are in a circle around me...\
cspl 690,706
lsp 700,":a;chara\trinity_hb1.bmp",0,0:print 10,500
>The angels set me up in a cross-shaped position.@
>All twelve of their soft, large breasts are pressed against me...\
name "Trinity A"
>Now surrender to this cross of pleasure.\
name ""
name "Trinity B"
>We'll allow you to ascend feeling the ultimate of pleasures.\
name ""
name "Luka"
>S...Stop, get off!@> Nnngg!\
name ""
>As I struggle and cry out, one of the Trinities pushes her large breasts into my face.@
>At the same time, another one pushes hers to the back of my head, surrounding my head in an elastic circle of breasts.\
name "Luka"
>Nnnm... Nnn...\
name ""
>The soft feeling of their breasts makes me stop struggling.@
>Left still by the compassionate angel's breasts, they take the chance to continue teasing me.\
name "Trinity C"
>Come now, it's alright to touch.\
name ""
>My right and left hands are also put onto two of their breasts.@
>It feels like I'm trapped in their soft warmth.\
>As my hands squeeze, and my fingers sink into their soft breasts, I feel my body relax more and more.\
>The last two angel's eyes turn toward my erect penis, already near to bursting from this sensation.\
name "Trinity D"
>Oh my, it's already so energetic.\
name ""
name "Trinity E"
>Very well then, we'll take care of showing love to this place...\
name ""
mov %hseanwave,17:hseanwave
>In the next moment, a dreamy, soft sensation wraps around my penis.@
>The final two Trinities push their breasts together from both sides, squeezing my penis between them.\
name "Luka"
>Haaa...\
name ""
name "Trinity A"
>Hehe, what a nice voice...@
>Any man instantly becomes powerless when we do this.\
name ""
name "Trinity B"
>You are nothing but a miserable sinner...@
>But your crime will be forgiven if you give yourself over to this cross.\
name ""
>The soft sensations press against my penis from the tip to the root.@
>No... More accurately, I could say it's buried between their soft breasts.\
>They gently press their breasts together, squeezing my penis at the same time.@
>I feel like I could melt away in this sensation...\
name "Luka"
>Haaa... It feels so good...\
name ""
>My entire body feels like it's wrapped inside their breasts...@
>The last bits of my fighting spirit are gone, and all I want to do is give myself over to this pleasure.\
>Feeling like I'm in heaven, my face itself slackens as my body drains of strength, giving myself over completely to the angels.\
name "Trinity A"
>Oh dear, you seem to be very comfortable.\
name ""
name "Trinity B"
>You were resisting so hard before, now you're like a helpless baby.\
name ""
>With their breasts all pressing against me, the Trinities laugh.@
>But even their laughs sound more like sweet singing.\
>At the same time, their laughs cause their breasts to vibrate, making them rub against me all over.@
>The breasts pressing my penis together tighten too.\
>My body melts in complete pleasure, as I feel myself nearing my limit as a man.\
name "Luka"
>Haaa...\
name ""
name "Trinity E"
>Oh...? Your penis is starting to tremble... Hehe.\
name ""
>Seeing my reaction, the angels start to giggle as their eyes all move to my penis.\
name "Luka"
>Ahh... I'm coming...!@
>Ahhhh!\
name ""
>With all six of the angels closely watching, I finally reach my moment of submission.\
gosub *syasei1
lsp 700,":a;chara\trinity_hb3.bmp",0,0
gosub *syasei2
>Between their soft breasts, my penis spasms.@
>Spraying out my semen, it lands on top of their smooth skin.\
>My cloudy white seed pollutes their pure white skin...@
>The angels look on as if I was just a mischievous little baby.\
name "Trinity A"
>Hehe, you already ascended once.\
name ""
name "Trinity B"
>It was a really nice orgasm, wasn't it?\
name ""
name "Luka"
>Ahh... S...Sorry...\
name ""
>The Trinities breasts got all dirty with my semen...@
>With six of them staring at me like I was a bad child, I can't help but feel guilty.\
name ""
name "Trinity E"
>Any man would leak if they were in this cross...@
>So don't worry about it.\
name ""
name "Luka"
>B...But... Mmmg!\
name ""
>The Trinity with her breast on my face suddenly pushes harder, pressing her breasts tightly into my face.@
>With her breasts forced hard into my mouth, it almost feels suffocating.\
>But with the other Trinity pushing between my head at the same time, it feels good.@
>Like my head is wrapped in sweet, relaxing warmth.\
name "Luka"
>Nnnn...\
name ""
>Slightly struggling from the sudden pressure on my face, all of my fingers squeeze down deep into the other two angels soft breasts.\
>Even after I open my hands in surprise, the sense of softness I felt lingers.\
name "Trinity A"
>Once your dirty fluids have been completely dried by this cross, your sins will be forgiven.@
>Do your best on this cross...\
name ""
name "Trinity B"
>We will bring you to climax many, many times to help cleanse your sins.@
>You just need to surrender yourself to this cross...\
name ""
>Right after my orgasm, they press their breasts together again against my penis.\
>Pressed between four breasts, the soft pressure feels like my lower body itself is melting away.\
name "Luka"
>Haaaa...\
name ""
>Completely powerless, any desire to escape this cross of pleasure vanishes from my body.\
name "Trinity A"
>Hehehe... His heart seems to have completely broken.\
name ""
name "Trinity B"
>Does it feel that good? Hehe.\
name ""
>Sensing my total loss of resistance, the angels all start laughing again.@
>With all six of them laughing around me, the sense of shame and humiliation rises in me.\
name "Trinity E"
>Now then, let us reward you for being so obedient.\
name ""
>One of the angels traces her nipple around the tip of my penis.@
>The sudden new sensation makes my body tremble.\
name "Luka"
>Ahh... That feels good...\
name ""
name "Trinity E"
>Do you like it?@
>Then let us ascend you again with this sensation...\
name ""
>The angel presses her nipple a little harder into my glans.@
>Rubbing it around, she sometimes even presses it against my urethral opening.\
>At the same time, the other angel uses her nipple to rub up and down my back muscle.@
>Unable to take the pleasure, my lower body twitches as my waist pushes toward them for more.\
name "Luka"
>Ahh... I'm going... To come...\
name ""
>The desire to ejaculate wells up inside me.@
>If I relaxed my waist for even a moment, I'd come instantly.\
name "Trinity E"
>Let it all out, and empty the source of your dirtiness...\
name ""
name "Luka"
>Ahhh...\
name ""
>As her nipple rubs against my glans, I give myself over to it and relax my waist.\
gosub *syasei1
lsp 700,":a;chara\trinity_hb6.bmp",0,0
gosub *syasei2
>My penis spasms as I come, spraying my semen over her nipple.@
>Still shooting out, the semen shoots up and dirties more of their breasts.\
name "Luka"
>Haaa...\
name ""
name "Trinity A"
>Hehehe... After letting out so much semen, are you satisfied?\
name ""
name "Trinity B"
>But your sins won't be forgiven with just that.@
>You must give everything, and cleanse the source of your dirtiness.\
name ""
>They press their breasts harder against me.@
>Mobbed between four breasts, my penis continues twitching in ecstasy.\
name "Luka"
>Haaa...\
name ""
>The two Trinities take turns squeezing my penis between their breasts, and sometimes sticking me between their own two breasts.\
name "Trinity A"
>Now ascend over and over...\
name ""
name "Trinity B"
>We will take all of your dirtiness on our chests.\
name ""
name "Luka"
>Haaa... I'm going to come again...\
name ""
>I let out a weak moan, with the angel's breasts still pressed against my face.@
>My body spasms as I let out another spurt of my submission to them.\
gosub *syasei1
lsp 700,":a;chara\trinity_hb7.bmp",0,0
gosub *syasei2
name "Luka"
>Haaaa...\
name ""
>With the release, more of that sweet weakness comes over me.@
>And with no time to rest, the sweet pressure of their breasts continues on.\
name "Trinity A"
>...You're still releasing that much?@
>If you work really hard, it should only take thirty milleniums...\
name ""
name "Trinity B"
>You are a very special sinner...@
>To cleanse all of your sins, your semen will be squeezed out without end for 30,000 years.\
name ""
name "Luka"
>N...No... Ahh!\
name ""
>This is going to continue for 30,000 years...?@
>Cutting short my cry of despair, the angel presses her breasts hard against my face again.\
>At the same time, they massage my penis between their breasts with even more force.@
>These Trinities won't even allow me to despair...\
name "Luka"
>Haaa... It feels so good...\
name ""
name "Trinity A"
>Hehe, are you happy?@
>Then please ascend over and over...\
name ""
name "Trinity B"
>Haha, what a nice face...\
name ""
>The angels laugh, causing their breasts to rub and massage me all over again.@
>Tasting that soft heaven, I feel myself going over the edge again.\
name "Luka"
>Aieee...\
name ""
gosub *syasei1:gosub *syasei2
>My penis twitches as I spray out more dirty semen onto their chests.@
>But they don't stop for even an instant.\
name "Trinity E"
>Hehe... You get to come over and over again, aren't you happy?\
name ""
name "Trinity F"
>Just like this, you'll be stuck on this cross of pleasure for the next 30,000 years...@
>You have lots of time, so enjoy every second of it.\
name ""
name "Luka"
>Haaa...\
name ""
gosub *syasei1:gosub *syasei2
>Tasting the start of this endless pleasure, I'm taken by another powerful climax.@
>Unable to escape from this cross, I'll be stuck in this heaven of pleasure.\
mov %hseanwave,0:hseanwave
>The sweet, powerful pleasure of the Trinities slowly breaks me.@
>After a while, I'm the same as a cripple, able to only drool and orgasm.\
>But I'm still not released from this cross...@
>My punishment of 30,000 years has only just begun.\
gosub *anten
>................\
goto *badend



*c_bug_start

mov $name,"Chimera Bug"
mov $name2,"Chimera Bug"
mov $lavel,"c_bug"
mov $tatie1,"c_bug_st01"
mov $tatie2,"c_bug_st02"
mov $tatie3,"c_bug_st03"
mov $tatie4,"c_bug_st02"
mov $haikei,"bg048"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,18000
if %nanido=2 mov %max_enemylife,21000
if %nanido=3 mov %max_enemylife,24000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,1
mov %alice_skill1,130
mov %alice_skill2,100
mov %alice_skill3,100
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free of the Chimera Bug!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Ahaha, resisting is pointless! "
mov $mogaku_sel2,"You won't escape from a mating hell with that! "
mov $mogaku_sel3,"Ahaha, resisting is pointless! "
mov $mogaku_sel4,"You won't escape from a mating hell with that! "
mov $mogaku_sel5,"Ahaha, resisting is pointless! "
mov $mogaku_dassyutu1,"What the heck... You don't want to mate?"
mov $mogaku_dassyutu2,"You could mate as much as you want with my oviduct you know...?"
mov $half_s1,"Lusting after an insect like me? You're such a pervert!"
mov $half_s2,"Why don't you just admit it and come?"
mov $kiki_s1,"Aha, you're almost about to come! "
mov $kiki_s2,"Coming because of this disguuuuusting bug, right? "
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-250
mov %tukix,300
mov %owaza_count1a,4
name "Luka"
>Stop it!@> I'm your opponent!\
name ""
dwave 1,"se\karaburi.ogg"
>Jumping in, I slash at the insect-like Chimera attacking the youth!\
name $name
>Kyaa... What the!?\
name ""
>The Chimera jumps away from the youth, and turns her gaze on me.@
>Her smile quickly spreads.\
name $name
>So you want to be my mating partner...?@
>Yes, you look like you would do very well...\
name ""
name "Luka"
>...........\
name ""
>Losing interest in the youth, her attention is fully on me now.@
>She seems like an insect type monster, but...\
name $name
>Aha... That's good...@
>I'll make sure you do the other boy's share of mating, too.\
>I'll squeeze every drop of that delicious semen from you. \
name ""
>The strange ominous feeling I sense from her proves she's no ordinary Chimeric Beast...\
goto *common_main



*c_bug_v

gosub *face3
name $name
>I... Just wanted to make children...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Chimera Bug is sealed in the form of a small insect!\
mov %viclose,1:gosub *victory
mov %getexp,200000:gosub *lvup
mov %2365,1
goto *sean0323



*c_bug_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Aha, so you want to mate now?@
>Well then, I'll make sure that you're able to properly shoot out semen first. \
name ""
goto *c_bug_a



*c_bug_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *c_bug_kousan
if %cmd1=16 goto *c_bug_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *c_bug_main



*c_bug_a

if %kousoku=1 gosub *c_bug_a7:goto *common_main
rnd2 %ransu,1,7
if %ransu=1 gosub *c_bug_a1:goto *common_main
if %ransu=2 gosub *c_bug_a2:goto *common_main
if %ransu=3 gosub *c_bug_a3:goto *common_main
if %ransu=4 gosub *c_bug_a4:goto *common_main
if %ransu=5 gosub *c_bug_a5:goto *common_main
if %ransu>5 && %owaza_count1a>5 gosub *c_bug_a6:goto *common_main
skip -7



*c_bug_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My slimy hand feels great. "
if %ransu=2 mov $sel1,"My hand was remodeled to make this feel even better. "
if %ransu=3 mov $sel1,"My slimy fingers will coil around you like tentacles, and make this feel amazing. "
name $name
eng $sel1:$sel6\
name ""
skillname "Slimy Handjob"
dwave 1,"se\ero_koki1.ogg"
lsp 690,":a;chara\c_bug_ct11.bmp",0,0:print 10,500
>The Chimera Bug's slimy tentacle-like fingers wrap around Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3767
if %nanido<2 damage 300,320
if %nanido=2 damage 330,350
if %nanido=3 damage 360,380
skillname ""
if %mylife=0 sub %stack,1:return *c_bug_h1
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_bug_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck your semen in like nectar. "
if %ransu=2 mov $sel1,"I take pride in my mouth skills too!"
if %ransu=3 mov $sel1,"Before mating, how about some preparations with my mouth?"
name $name
eng $sel1:$sel6\
name ""
skillname "Wet Blowjob"
dwave 1,"se\ero_buchu2.ogg"
lsp 690,":a;chara\c_bug_ct21.bmp",0,0:print 10,500
>The Chimera Bug takes Luka's penis into her mouth, and sucks on it!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3768
if %nanido<2 damage 310,330
if %nanido=2 damage 340,370
if %nanido=3 damage 370,400
skillname ""
if %mylife=0 sub %stack,1:return *c_bug_h2
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_bug_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"With my sticky milk all over, it will feel even better! "
if %ransu=2 mov $sel1,"I'll squeeze it with my milk covered breasts. "
if %ransu=3 mov $sel1,"My special breasts were explicitly made to feel amazing! "
name $name
eng $sel1:$sel6\
name ""
skillname "Sticky Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
lsp 690,":a;chara\c_bug_ct01.bmp",0,0:print 10,500
>The Chimera Bug squeezes Luka's penis between her breasts, covered in sticky milk!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3769
if %nanido<2 damage 320,340
if %nanido=2 damage 350,370
if %nanido=3 damage 380,400
skillname ""
if %mylife=0 sub %stack,1:return *c_bug_h3
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_bug_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My stomach looks nice and smooth, doesn't it?"
if %ransu=2 mov $sel1,"I don't mind if you shoot it out over my stomach. "
if %ransu=3 mov $sel1,"My huge stomach is my charm point. "
name $name
eng $sel1:$sel6\
name ""
skillname "Human Stomach Rub"
dwave 1,"se\ero_sigoki1.ogg"
>Chimera Bug presses Luka's penis against her smooth human-like stomach and rubs it back and forth!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3770
if %nanido<2 damage 330,350
if %nanido=2 damage 360,380
if %nanido=3 damage 390,410
skillname ""
if %mylife=0 sub %stack,1:return *c_bug_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_bug_a5

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"This stomach is pretty good too..."
if %ransu=2 mov $sel1,"Cover this insect stomach with semen. "
if %ransu=3 mov $sel1,"My slimy insect stomach will make your penis happy. "
name $name
eng $sel1:$sel6\
name ""
skillname "Insect Stomach Rub"
dwave 1,"se\ero_sigoki1.ogg"
>Chimera Bug presses Luka's penis against her slimy insect-like stomach and rubs it back and forth!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3771
if %nanido<2 damage 330,350
if %nanido=2 damage 360,380
if %nanido=3 damage 390,410
skillname ""
if %mylife=0 sub %stack,1:return *c_bug_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_bug_a6

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 5
name $name
>Now then, it's time to mate.@
>You want to stick your penis into my oviduct too, don't you?\
name ""
skillname "Hold"
dwave 1,"se\ero_makituki3.ogg"
eng "The Chimera Bug pushes Luka to the ground, and moves to pin him!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
lsp 690,":c;chara\c_bug_hb01.bmp",0,0
mov %kousoku,1:gosub *status_print
>Luka has been bound by the Chimera Bug!\
skillname ""
name "Luka"
>Gah...!\
name ""
name $name
>Ahaha, you can't escape any longer.@
>Look closely, your penis is going to be devoured by my insect pussy. \
name ""
>The Chimera Bug's oviduct slowly gets closer to my penis, its mouth eagerly opening and closing...\
>Able to see inside of it, I can see the hole quickly narrowing, and dripping with sticky liquid...\
mov %genmogaku,0
sub %stack,1
return



*c_bug_a7

add %stack,1
>Luka has been bound by the Chimera Bug...\
name $name
>Now to connect us. \
name ""
skillname "Forced Oviduct Mating"
dwave 1,"se\ero_pyu1.ogg"
csp 690
lsp 700,":c;chara\c_bug_hb02.bmp",0,0:print 10,500
>The Chimera Bug's oviduct sucks in Luka's penis!
skillcount3 3772
mov %damage_kotei,1
damage 350,370
mov %kousoku,2
>Luka is being raped by the Chimera Bug!\
skillname ""
if %mylife=0 sub %stack,1:return *c_bug_h6
name "Luka"
>Ahhhh!\
name ""
mov $tatie4,"c_bug_hb18"
lsp 700,":c;chara\c_bug_hb03.bmp",0,0:print 10,500
>The lukewarm walls of the oviduct squirm around me...@
>At the same time, the tip of my penis presses against something warm.\
lsp 700,":c;chara\c_bug_hb04.bmp",0,0:print 10,500
name $name
>Well?@>How does it feel inside my oviduct?@
>You can feel the tip of your penis hitting my eggs, can't you?\
>Please shoot out your semen over them.@
>Make sure you fertilize every one of my insect eggs. \
name ""
sub %stack,1
goto *c_bug_a8



*c_bug_a8

add %stack,1
>Luka is being raped by the Chimera Bug...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"So you wanted to be raped forcibly like this? This is fun sometimes, too. ":mov $sel2,"The Chime Bug's oviduct quickly moves back and forth, pumping Luka!"
if %ransu=2 mov $sel1,"If I do this... You can't stop from coming eventually. ":mov $sel2,"The Chimera Bug's oviduct starts to vibrate!"
if %ransu=3 mov $sel1,"Hehe, I'll make it tighter... ":mov $sel2,"The Chimera Bug's oviduct suddenly tightens around Luka's penis!"
if %ransu=4 mov $sel1,"If I rotate around you like this...":mov $sel2,"The Chimera Bug's oviduct suddenly starts to rotate!"
if %ransu=5 mov $sel1,"Here, I can even do things like this... ":mov $sel2,"The walls of the Chimera Bug's oviduct wave and wriggle!"
name $name
eng $sel1:$sel6\
name ""
skillname "Forced Oviduct Mating"
dwave 1,"se\ero_name2.ogg"
eng $sel2:$sel6
skillcount3 3772
mov %damage_kotei,1
damage 350,370
skillname ""
if %mylife=0 sub %stack,1:return *c_bug_h7
sub %stack,1
goto *c_bug_a8



*c_bug_onedari

mov $list1,"Slimy Handjob"
if %3767>0 mov %list_num1,1
mov $list2,"Wet Blowjob"
if %3768>0 mov %list_num2,1
mov $list3,"Sticky Tit Fuck"
if %3769>0 mov %list_num3,1
mov $list4,"Human Stomach Rub"
if %3770>0 mov %list_num4,1
mov $list5,"Insect Stomach Rub"
if %3771>0 mov %list_num5,1
mov $list6,"Forced Oviduct Mating"
if %3772>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *c_bug_onedari1
if %cmd1=12 goto *c_bug_onedari2
if %cmd1=13 goto *c_bug_onedari3
if %cmd1=14 goto *c_bug_onedari4
if %cmd1=15 goto *c_bug_onedari5
if %cmd1=16 goto *c_bug_onedari6
if %cmd1=-1 goto *c_bug_main
goto *c_bug_onedari



*c_bug_onedari1

gosub *onedari_syori
name $name
>You want me to toy with you with my hand?@
>Alright, I'll give you an amazing ejaculation. \
name ""
gosub *c_bug_a1
skip -1



*c_bug_onedari2

gosub *onedari_syori
name $name
>You want me to suck on you with my mouth?@
>Alright, I'll give you an amazing ejaculation. \
name ""
gosub *c_bug_a2
skip -1



*c_bug_onedari3

gosub *onedari_syori
name $name
>You want me to squeeze you with my breasts?@
>Alright, I'll give you an amazing ejaculation. \
name ""
gosub *c_bug_a3
skip -1



*c_bug_onedari4

gosub *onedari_syori
name $name
>You want to rub against my human stomach?@
>Alright, I'll give you an amazing ejaculation. \
name ""
gosub *c_bug_a4
skip -1



*c_bug_onedari5

gosub *onedari_syori
name $name
>You want to rub against my insect stomach?@
>Alright, I'll give you an amazing ejaculation. \
name ""
gosub *c_bug_a5
skip -1



*c_bug_onedari6

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want to stick yourself inside my oviduct?@
>Alright, I'll have you mate plenty with me. \
name ""
if %kousoku=0 gosub *c_bug_a6
gosub *c_bug_a7
skip -1



*c_bug_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\c_bug_bk03.bmp",0,0
lsp 690,":a;chara\c_bug_ct12.bmp",0,0
gosub *syasei2
>As the slimy, tentacle-like fingers of the Chimera Bug wrap around Luka's penis, he comes, covering her hand in semen.\
mov %viclose,1:gosub *lose
mov %2665,%2665+1:if %2665=1 mov %count_koenemy,%count_koenemy+1
if %2665>%count_most mov %count_most,%2665:mov $count_mostname,$name
count 1,5
mov $bad1,"Chimera Bug uses her hands to force Luka to come."
gosub *face2
name $name
>Ahaha... You made my hand all dirty! @
>Wow, that was fast! What a pathetic penis... \
name ""
csp 690:print 10,500
goto *c_bug_h



*c_bug_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\c_bug_bk01.bmp",0,0
lsp 690,":a;chara\c_bug_ct22.bmp",0,0
gosub *syasei2
>As the Chimera Bug's wet mouth sucks hard on him, Luka comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2665,%2665+1:if %2665=1 mov %count_koenemy,%count_koenemy+1
if %2665>%count_most mov %count_most,%2665:mov $count_mostname,$name
count 4,5
mov $bad1,"The Chimera Bug used her mouth to force Luka to come."
lsp 690,":a;chara\c_bug_ct23.bmp",0,0
gosub *face2
name $name
>Nnng... You filled my mouth! @
>Wow, that was fast! What a pathetic penis... \
name ""
csp 690:print 10,500
goto *c_bug_h



*c_bug_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\c_bug_bk02.bmp",0,0
lsp 690,":a;chara\c_bug_ct02.bmp",0,0
gosub *syasei2
>As the Chimera Bug's sticky breasts rub and squeeze his penis, Luka comes, covering her breasts with semen.\
mov %viclose,1:gosub *lose
mov %2665,%2665+1:if %2665=1 mov %count_koenemy,%count_koenemy+1
if %2665>%count_most mov %count_most,%2665:mov $count_mostname,$name
count 7,5
mov $bad1,"The Chimera Bug used her breasts to force Luka to come."
gosub *face2
name $name
>Ahaha... You made my breasts all dirty! @
>Wow, that was fast! What a pathetic penis... \
name ""
csp 690:print 10,500
goto *c_bug_h



*c_bug_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\c_bug_bk04.bmp",0,0
gosub *syasei2
>As the Chimera Bug rubs Luka's penis on her smooth human stomach, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2665,%2665+1:if %2665=1 mov %count_koenemy,%count_koenemy+1
if %2665>%count_most mov %count_most,%2665:mov $count_mostname,$name
count 32,5
mov $bad1,"The Chimera Bug used her human stomach to force Luka to come."
gosub *face2
name $name
>Ahaha... You made my stomach all dirty! @
>Wow, that was fast! What a pathetic penis... \
name ""
goto *c_bug_h



*c_bug_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\c_bug_bk06.bmp",0,0
gosub *syasei2
>As the Chimera Bug rubs Luka's penis on her slimy insect stomach, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2665,%2665+1:if %2665=1 mov %count_koenemy,%count_koenemy+1
if %2665>%count_most mov %count_most,%2665:mov $count_mostname,$name
count 32,5
mov $bad1,"The Chimera Bug used her insect stomach to force Luka to come."
gosub *face2
name $name
>Ahaha... You made my stomach all dirty! @
>Wow, that was fast! What a pathetic penis... \
name ""
goto *c_bug_h



*c_bug_h6

mov %ikigoe,3:gosub *ikigoe
name $name
>Aha, already!? \
name ""
gosub *syasei1
lsp 700,":c;chara\c_bug_hb08.bmp",0,0
gosub *syasei2
>As soon as Luka is inserted into the Chimera Bug's oviduct, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2665,%2665+1:if %2665=1 mov %count_koenemy,%count_koenemy+1
if %2665>%count_most mov %count_most,%2665:mov $count_mostname,$name
count 2,5
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come the moment of insertion into the Chimera Bug's oviduct."
gosub *face2
name $name
>Ahaha, you sure are quick, aren't you? @
>Look at all that semen on my eggs... \
name ""
goto *c_bug_h



*c_bug_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":c;chara\c_bug_hb08.bmp",0,0
gosub *syasei2
>As the Chimera Bug rapes Luka, he comes, spraying his semen into her oviduct and all over her eggs.\
mov %viclose,1:gosub *lose
mov %2665,%2665+1:if %2665=1 mov %count_koenemy,%count_koenemy+1
if %2665>%count_most mov %count_most,%2665:mov $count_mostname,$name
count 2,5
mov $bad1,"Luka was forced to come as the Chimera Bug raped him with her oviduct."
gosub *face2
name $name
>Ahaha, it spurted out so much! @
>Look at all that semen on my eggs... \
name ""
goto *c_bug_h



*c_bug_h

mov $bad2,"Forced to continually mate with her, Luka was kept as a breeding slave."
if %2665=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku=2 mov %hseanwave,11:hseanwave:goto *c_bug_hb
name "Luka"
>Ahh...\
name ""
name $name
>Now, I'm going to rape you...@
>But which hole should I use?\
name ""
>The Chimera Bug leans forward and spreads open her human vagina.\
name $name
>This hole is for having sex with humans...@
>And this...\
name ""
>The Chimera Bug moves her insect abdomen toward me, and opens up the very tip of it, exposing another hole.\
name $name
>...This is for insects.@
>Male insect genitals are stuck in here, and it's designed to squeeze out their semen.\
>Because you're like a pathetic insect, I won't let you use the human pussy.@
>I'll let you mate with the hole for insects. \
name ""
name "Luka"
>N...No way...!@
>Ahh!\
name ""
>The Chimera Bug presses me down, forcibly keeping me from getting out of this shameful position.\
name $name
>I hold down little insects like this...@
>And then rape them with my insect pussy! \
mov %hseanwave,11:hseanwave
cspl 690,699
lsp 700,":c;chara\c_bug_hb01.bmp",0,0:print 10,500
name ""
>The strange tip of her reproductive hole on her insect abdomen presses against my penis.@
>But she only just puts the tip inside.\
name "Luka"
>Ahhh...!\
name ""
>It feels wet and strange...@
>But just tasting it on my glans is enough to make my penis fully erect.\
name $name
>Ahaha, your tip's inside.@
>How does this mating hole for insects feel?\
>Here, let me invite you alllll the way in! \
name ""
lsp 700,":c;chara\c_bug_hb02.bmp",0,0:print 10,500
name "Luka"
>N...No!\
name ""
>With a wet noise, she pushes me deeper inside her insect vagina.@
>It's full of tiny little holes and walls, making my penis break through each one of them.\
>Each time the neck of my penis rubs against one of those little walls, my body spasms in pleasure.\
name $name
>Ehh?@> What's wrong?@
>Is it too hard for you to go into an insect pussy after all?\
>But... I can't let you use the human hole, because you're just a little insect...@
>I'd let you use it if you were a decent human being, you know?\
name ""
>The Chimera looks down at my pitiful state and laughs.@
>At the same time, she keeps pressing against me, forcibly bringing my penis deeper into her insect vagina.\
lsp 700,":c;chara\c_bug_hb03.bmp",0,0:print 10,500
name $name
>Alright, you're all the way in! \
>How does it feel inside an insect's vagina?@
>Is it so good you can't even speak?\
name ""
goto *c_bug_hb



*c_bug_hb

name "Luka"
>Ha... Ahh!\
name ""
>The strange mucus inside her fills my senses, along with the odd winding construction of her vagina.@
>It feels like tiny little things are crawling and moving around inside her, too...\
>Despite the eerie strange sensation, it feels amazing.\
name $name
>Does it feel good?@> Does it feel disgusting?@
>This is the first time I've felt something like this!@>...Is what you're thinking, isn't it?\
>But it's not a human pussy you're inside, it's an insect's.@
>This is how it feels to mate with an insect... \
>So with that said...@
>Decent human beings wouldn't feel good with this hole.\
>If this felt good to you...@>That would make you the lowest of horrible perverts, wouldn't it?\
name ""
name "Luka"
>Ahh... Th...That's not right...@
>Ahh! What...!?\
>Something is pressing against my tip!\
name ""
lsp 700,":c;chara\c_bug_hb04.bmp",0,0:print 10,500
>My glans presses against something soft.@
>They feel wet, and rub against my urethral opening with each slight movement she makes.\
>It feels good, but it also feels bizarre...\
name "Luka"
>Ahh.. What... Is that...?\
name ""
name $name
>Hehehe... Those are my eggs. @
>My insect eggs are all closely packed up in my womb. \
name ""
name "Luka"
>H...Hya!?\
name ""
>My body trembles in shock.@
>The tip of my penis is rubbing against her insect eggs?\
name $name
>Hehe, you know what that means?@
>If you ejaculate, you'll cover my eggs in your semen. \
>Does it make you shiver thinking of directly fertilizing insect eggs?@
>I mean if you did that...@>You'd no longer be anything close to human!\
name ""
name "Luka"
>Haa... N...No...\
name ""
>I will never fertilize something like an insect's eggs...@
>I tense my whole body, willing myself far away from an orgasm.\
name $name
>Aha, are you trying to hold on?@
>Even though you're already a failure for mating with an insect pussy, you still don't want to fall even more?\
>But it's not possible for insects not to come inside this pussy...@
>If I move my abdomen like this, I can work your penis hard...\
name ""
name "Luka"
>Ahhh...!\
name ""
name $name
>First I'll puuuuuull up! \
name ""
lsp 700,":c;chara\c_bug_hb05.bmp",0,0:print 10,500
>The Chimera Bug slowly pulls away, dragging my penis out of her vagina.\
>With that, the neck of my penis catches on every single wall and membrane that stopped it before.@
>And, just before she completely would take my penis out of her...\
name $name
>Now I'll force it all in at once! \
name ""
name "Luka"
>Ah... Hyaa!\
name ""
lsp 700,":c;chara\c_bug_hb06.bmp",0,0:print 10,500
>With a powerful shove, my penis sinks deep back into her vagina.@
>My glans breaks through and rubs against every membrane and wall along the way.\
>Once all the way inside, the tip of my penis rubs against her insect eggs again.\
name $name
>Ahaha, that felt good didn't it? @
>Your penis is already twitching in happiness inside my insect pussy. \
>My insect eggs are waiting for your semen inside my womb, you know?@
>Don't you want to give your future daughters your seed?\
name ""
name "Luka"
>N...No... I don't want that! No!\
name ""
>Again, she slowly pulls me out of her...@
>Right before I'm all the way free, she shoves me hard back inside.\
>She continues this slow pumping motion, leaving my body spasming in pleasure filled torture.\
>I don't think I can hold it back any longer...\
name "Luka"
>Stop... I'm going to come...\
name ""
name $name
>Ahhh... It looks like my ejaculation technique went well then.@
>Now then, please spray your seed all over my insect eggs. \
name ""
lsp 700,":c;chara\c_bug_hb07.bmp",0,0:print 10,500
>The Chimera Bug forces my penis deep inside her again, rubbing my tip against her eggs.\
name "Luka"
>Ahhh!\
name ""
name $name
>Ahaha... As the mother, I can tell my eggs want your semen badly.\
>Aren't you getting addicted to mating with this non human insect pussy, too?\
>Now come on, come in me...@
>Your insemination that can never be undone...\
name ""
name "Luka"
>I...I don't want to...@> Anything but that...\
name ""
>While my mind pleads with my body not to ejaculate, I can't hold it back any longer.@
>The tip of my penis rubs against her eggs, my instinct as a man demanding that I relax and shoot out my semen onto it.\
>I can never climax from an insect vagina...@
>I'm a human, I can't inseminate insect eggs...!\
name "Luka"
>No... Don't come... No...\
name ""
>I feel my penis start to twitch, signaling my body is about to give up...\
name $name
>Alright, the human disqualification orgasm is coming! @
>Now spray out a lot! \
name ""
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":c;chara\c_bug_hb08.bmp",0,0
gosub *syasei2
>My semen explodes into her insect vagina.@
>The feeling of forbidden release paralyzes my body as the pleasure of climax washes over me.\
name $name
>Aha, it looks like you came after all! @
>Your human semen is all over my insect eggs! \
>Mmm... Your semen is spreading out all inside my pussy.@
>With this much semen, I know that successful fertilization is assured. \
>Good job, with that your disqualification as a human has been accomplished! \
name ""
name "Luka"
>Ah...\
name ""
>I tremble in horror.@
>Unable to endure the pleasure, I fertilized her insect eggs...\
lsp 700,":c;chara\c_bug_hb09.bmp",0,0:print 10,500
name $name
>Now... This time I'll really move until you come. \
>I want you to come inside me as I violently ride you.@
>With this violent insect pussy rape, please stop thinking of yourself as human. \
name ""
name "Luka"
>Ahhhh!!\
name ""
mov %hseanwave,12:hseanwave
lsp 700,":c;chara\c_bug_hb10.bmp",0,0:print 10,500
>She starts moving her insect abdomen far more intensely than I thought possible.\
>Still holding me down, I can't do anything as she pumps my penis in and out of her insect vagina like a piston.\
name "Luka"
>S...Stop... Stop this!\
name ""
>The intense motions only leave me capable of screaming.@
>Swallowed and pulled out over and over, the storm of pleasure takes over my body.\
lsp 700,":c;chara\c_bug_hb11.bmp",0,0:print 10,500
>Her hole suddenly tightens a little bit, causing the mucus membranes to rub and stroke against my glans with each cycle.\
name $name
>It's time to stroke your glans!@>How are the movements of my insect abdomen?@
>It's a lot more intense than you thought possible, isn't it?\
>Hey, how about it...?@
>Stop that pitiful gasping, and tell me when you think. \
name ""
name "Luka"
>Aiiie!\
name ""
>Over and over, she forces me quickly in and out.@
>Her hole is almost like a predator, greedily devouring its prey...\
name $name
>Ahaha... This is what it's like mating with an insect. @
>Even though you're a human, you're mating with an insect. \
>Because... You're not even a human anymore! @
>You're the owner of all that semen covering my insect eggs, after all. \
name ""
>Her abdomen comes up and down...@
>The strange shape of her insect vagina makes it seem almost impossible for this movement to be so fast.\
>My instinct as a man quickly makes me succumb to this greedy rape.\
name $name
>Are you going to come again?@
>Pour that semen all into this insect pussy?\
>Then please let out a lot! @
>Now spray it out! \
name ""
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1
lsp 700,":c;chara\c_bug_hb12.bmp",0,0
gosub *syasei2
>As she pumps me up and down, I explode in her.@
>But even though I came, she doesn't slow down.\
name "Luka"
>S...Stop...!@
>I already came, so stop!\
name ""
lsp 700,":c;chara\c_bug_hb13.bmp",0,0:print 10,500
>Her walls rub and stroke me as she moves just as fast.@
>As my extra sensitive penis is still twitching in orgasm, her walls rub and stroke my glans.\
name $name
>Ahaha, isn't this insect piston the best?@
>It's all slimy inside, with walls to catch and rub against you... Your penis seems to be very happy with it \
>At this rate, you'll only ever be able to come inside an insect's vagina.@
>Should I train this penis of yours to only ever come when mating with an insect?\
name ""
lsp 700,":c;chara\c_bug_hb14.bmp",0,0:print 10,500
>Her mating behavior suddenly gets even more intense.@
>At the same time, she flexes her muscles and changes something...\
name "Luka"
>Ah...!@> Ahhh!\
name ""
name $name
>Hehe... This is real insect mating now.@
>Aren't you glad you are able to experience it? \
>At this rate, the shape of your penis itself might change...?\
name ""
>Her sticky mucus clings to my penis, creating a sweet warmth from the friction.@
>The Chimera's soft walls rub hard against my penis with each movement, almost as if she was polishing it.\
name "Luka"
>No... I'm going to come again...\
name ""
name $name
>Already?@
>You're going to pour more semen into my insect pussy?\
>You're really that satisfied by this insect pussy?@
>Were you ever really human to begin with...?\
name ""
name "Luka"
>T...That's... Ahhh!\
name ""
>Overcome by pleasure, my body shakes before I can refute her.\
name ""
gosub *syasei1
lsp 700,":c;chara\c_bug_hb15.bmp",0,0
gosub *syasei2
name "Luka"
>Haaa...\
name ""
>I spray out more of my semen into her insect vagina.@
>Suffering from her intense piston movements, she made me come yet again...\
>The horrible feelings of being forced to ejaculate by an insect vagina wash over me.\
name $name
>Mmm, thank you for the meal. @
>But It's far from over yet...\
>I'm going to train your penis to only be used in this insect pussy.@
>First I'll completely fill my pussy with insect juice... \
name ""
name "Luka"
>Haa... Stop...!\
name ""
>Strange, sticky mucus sprays out onto my penis inside of her.@
>Slowing down for a moment, she uses her vaginal muscles to rub and spread the sticky mucus all over my penis.\
name $name
>After I cover your penis with my insect juice...@
lsp 700,":c;chara\c_bug_hb16.bmp",0,0:print 10,500
>Now to start the hellish piston movements again. \
name ""
name "Luka"
>Hyaaa!!\
name ""
>With the secretions now all over my penis, her intense movements suddenly get far more fluid.@
>The strange construction of her vagina now lets my penis slip in and out even easier and faster.\
lsp 700,":c;chara\c_bug_hb17.bmp",0,0:print 10,500
name $name
>Haha, I can make it even more intense! @
>Do you know what will happen if you keep taking this?\
>Your penis will turn into something that can only be used in insect pussies. @
>It'll become a miserable penis that can only feel pleasure from insects. \
name ""
>Her now lubricated movements get far more intense, the up and down rape violating me to my limit.\
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":c;chara\c_bug_hb18.bmp",0,0
gosub *syasei2
>And with that, I'm forced to even another ejaculation...\
name "Luka"
>Ahhg...\
name ""
>Helpless due to the pleasure, I feebly look up into the Chimera Bug's looming face.\
name $name
>More semen...@
>More, more... Let out more!\
name ""
name "Luka"
>Aiieee!\
name ""
>Her eyes go bloodshot as her mating instinct completely takes her over.\
lsp 700,":c;chara\c_bug_hb19.bmp",0,0:print 10,500
name $name
>Ah... Aha, my primal instincts took over for a second there.@
>Since your penis is so well suited to my insect pussy, my insect instincts just sort of took over...\
>...Oh my, my... Did I scare you?@
>I'll keep my human face next time, so it's fine, don't worry. \
name ""
name "Luka"
>Ah...\
name ""
>The realization that I tried to push away hits me again.@
>Right now I'm mating with an inhuman monster...\
>I'm mating with something not even close to a human, and am being forced to fertilize her eggs...\
name "Luka"
>S...Stop... Release me!@
>Ahh!\
name ""
name $name
>What are you saying after all this time?@
>You're no longer human after mating with this insect pussy, and fertilizing my eggs...\
name ""
lsp 700,":c;chara\c_bug_hb20.bmp",0,0:print 10,500
>She presses my penis deep inside her, rubbing the tip of my penis against her eggs again.\
name $name
>See... You can feel it with your penis, can't you?@
>The eggs that you fertilized.\
name ""
name "Luka"
>Ah...ahhh... Slimy...@
>Ahhn!\
name ""
gosub *syasei1:gosub *syasei2
>The touch of the eggs breaks my endurance, and forces me to come again, covering them with even more semen.\
name $name
>Ahhhh... Geez, what are you doing?@
>How embarrassing! Hehe. \
name ""
>The Chimera Bug laughs at me, teasing me for my almost accidental ejaculation.\
name $name
>You can only come inside insect pussies now you know.@
>So from now on, you have no choice but to continue mating with this hole.\
>I mean...@>You already fertilized these eggs and disqualified yourself from being human, so you have no choice, right?\
name ""
name "Luka"
>Ah...\
name ""
>Feeling horrified, I'm left under the Chimera Bug as she continues raping me...@
>Thus, I'm trained and kept as a breeding slave by the Chimera Bug.\
mov %hseanwave,0:hseanwave
gosub *anten
>............\
goto *badend



*sisterlamia_start

mov $name,"Sister Lamia"
mov $name2,"Sister Lamia"
mov $lavel,"sisterlamia"
mov $tatie1,"sisterlamia_st01r"
mov $tatie2,"sisterlamia_st02"
mov $tatie3,"sisterlamia_st03"
mov $tatie4,"sisterlamia_h1"
mov $haikei,"bg048"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,18000
if %nanido=2 mov %max_enemylife,20000
if %nanido=3 mov %max_enemylife,22000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,1
mov %alice_skill1,100
mov %alice_skill2,130
mov %alice_skill3,130
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free from Sister Lamia!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Didn't I tell you? I'll give you joy..."
mov $mogaku_sel2,"You should just give yourself to me winding around you..."
mov $mogaku_sel3,"I won't separate until you feel the joy..."
mov $mogaku_sel4,"Stop fighting against the joy I can give you."
mov $mogaku_sel5,"Why would you try to escape from the pleasure of me wound around you?"
mov $mogaku_dassyutu1,"Why did you run?"
mov $mogaku_dassyutu2,"Do you not wish to receive my love...?"
mov $half_s1,"How does the joy of a man feel?"
mov $half_s2,"I'll let you feel even more of that good sensation..."
mov $kiki_s1,"Does it feel good?"
mov $kiki_s2,"Your moment of bliss is almost here..."
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-280
mov %tukix,300
mov %owaza_count1a,4
mov %owaza_count3a,8
name $name
>...And according to her revelation, the grave sinners must accept the wrath of heaven.\
>Since I am a holy Sister who serves the Goddess, I don't wish to do anything cruel...@
>But it is her command, and I must serve her will.\
name ""
name "Luka"
>Why are you following her like this!?\
name ""
>I know how stupid the question must sound to her...@
>Only a short while ago, I was her follower, trying to follow a similar command...\
name $name
>Why, because I'm a faithful follower of Ilias.@
>She promised us monsters a paradise.\
name ""
name "Luka"
>No, she's just using you!@
>She would never give a paradise to monsters!\
name ""
name $name
>You are claiming Ilias is a liar?@>You are a sinner...@
>It seems you too must be one of the great sinners deserving the wrath of heaven.\
>I must give you punishment.@
>But not in a cruel way...@>You must meet your end in my embrace.\
name ""
name "Luka"
>Urhg...!\
name ""
>It's no good, I can't convince her in the face of her blind obedience...@
>I have no choice but to seal her!\
mov %sinkou,1
goto *common_main



*sisterlamia_v

gosub *face3
name $name
>My Goddess...@
>I apologize for my failure from the bottom of my heart!\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Sister Lamia was sealed in the form of a snake!\
mov %viclose,1:gosub *victory
mov %getexp,200000:gosub *lvup
mov %2364,1
goto *sean0324



*sisterlamia_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>You have stopped resisting?@
>Then let me lead you to a blissful finish...\
name ""
goto *sisterlamia_a



*sisterlamia_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *sisterlamia_kousan
if %cmd1=16 goto *sisterlamia_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *sisterlamia_main



*sisterlamia_yuwaku_a

gosub *sisterlamia_counter:goto *common_main



*sisterlamia_a

if %kousoku=1 gosub *sisterlamia_a6:goto *common_main
if %counter>0 add %counter,1
if %counter>3 gosub *sisterlamia_x2:goto *common_main
if %counter>0 rnd2 %ransu,1,3
if %counter>0 && %ransu<3 gosub *sisterlamia_a7:goto *common_main
if %counter>0 && %ransu=3 && %owaza_count2a>5 gosub *sisterlamia_a8:goto *common_main
if %counter>0 skip -3
if %kousan=1 skip 4
if %enemy_earth>0 skip 3
mov %hanyo2,%hanyo2+1
if %hanyo2>4 gosub *sisterlamia_x1:goto *common_main
if %enemy_earth=2 gosub *sisterlamia_a5:goto *common_main
rnd2 %ransu,1,8
if %ransu=1 gosub *sisterlamia_a1:goto *common_main
if %ransu=2 gosub *sisterlamia_a2:goto *common_main
if %ransu=3 gosub *sisterlamia_a3:goto *common_main
if %ransu=4 gosub *sisterlamia_a4:goto *common_main
if %ransu<7 && %owaza_count1a>5 gosub *sisterlamia_a5:goto *common_main
if %ransu>6 && %owaza_count3a>9 && %enemy_earth=0 gosub *sisterlamia_el2:goto *common_main
skip -7



*sisterlamia_el2

add %stack,1
mov %owaza_count3a,0
name $name
>Gnomaren, please assist me!\
name ""
skillname "Summon Earth Spirit"
mov %enemy_earth,3
mov %damage_keigen_el,50
dwave 2,"se\earth1.ogg"
lsp2 0,":a;chara\gnomaren_st01.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *enemy_elm_print
>Sister Lamia summons the spirit of Earth!\
skillname ""
if %first_sel2=1 sub %stack,1:return
name "Luka"
>It can't be... The spirit of Earth!?\
name ""
name $name
>This power was bestowed by Ilias...@
>Do you know what this strength does...?\
name ""
name "Luka"
>.....\
name ""
>I can feel the strength of her earth-filled body.@
>If I get bound, I won't be escaping...\
>To combat that, I need the power of wind...@
>But without Sylph, I'll have to use something at least with a wind based nature!\
mov %first_sel2,1
sub %stack,1
return



*sisterlamia_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"This mouth has brought blessings to many men..."
if %ransu=2 mov $sel1,"I shall give you a blessing with my mouth, too..."
if %ransu=3 mov $sel1,"Very well, I shall let you finish in my mouth..."
name $name
eng $sel1:$sel6\
name ""
skillname "Graceful Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>Sister Lamia slowly and powerfully sucks on Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3773
if %nanido<2 damage 300,320
if %nanido=2 damage 330,350
if %nanido=3 damage 360,380
skillname ""
if %mylife=0 sub %stack,1:return *sisterlamia_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*sisterlamia_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Many men have fallen in love with these breasts..."
if %ransu=2 mov $sel1,"Now, taste the joy of my breasts..."
if %ransu=3 mov $sel1,"My breasts will fill you with love."
name $name
eng $sel1:$sel6\
name ""
skillname "Love-Filled Breast Squeeze"
dwave 1,"se\ero_sigoki1.ogg"
>Sister Lamia slips Luka's penis between her breasts over her clothes, and squeezes it!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3774
if %nanido<2 damage 310,330
if %nanido=2 damage 340,360
if %nanido=3 damage 370,390
skillname ""
if %mylife=0 sub %stack,1:return *sisterlamia_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*sisterlamia_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"This hand has graced many men with joy..."
if %ransu=2 mov $sel1,"I'll bring you delight with my hand..."
if %ransu=3 mov $sel1,"I'll let you feel the joy of ejaculation with my hand..."
name $name
eng $sel1:$sel6\
name ""
skillname "Delightful Masturbation"
dwave 1,"se\ero_koki1.ogg"
>Sister Lamia gently holds Luka's penis with her left hand, and strokes him!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3775
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
dwave 1,"se\ero_koki1.ogg"
>She places her right palm over the tip of Luka's penis, and rotates it!
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
dwave 1,"se\ero_koki1.ogg"
>Using both hands, she strokes Luka's penis up and down!
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
skillname ""
if %mylife=0 sub %stack,1:return *sisterlamia_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*sisterlamia_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Many men have also been left exhausted with this..."
if %ransu=2 mov $sel1,"The scales will bring joy to your penis..."
if %ransu=3 mov $sel1,"The sensation of my tail around your penis will give a joyful ejaculation."
name $name
eng $sel1:$sel6\
name ""
skillname "Snake Body of Bliss"
dwave 1,"se\ero_makituki1.ogg"
>Sister Lamia's tail skillfully coils around Luka's penis and tightens around it!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3776
if %nanido<2 damage 320,340
if %nanido=2 damage 350,370
if %nanido=3 damage 380,400
skillname ""
if %mylife=0 sub %stack,1:return *sisterlamia_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*sisterlamia_a5

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 5
name $name
>Now let me wrap you up.@
>Men who are in my embrace feel pure bliss...\
name ""
skillname "Ecstasy Snake Wrap"
dwave 1,"se\ero_makituki3.ogg"
>Sister Lamia's snake tail coils around Luka's body!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,5
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3777
if %nanido<2 damage 200,250
if %nanido=2 damage 230,260
if %nanido=3 damage 260,290
mov %kousoku,1:gosub *status_print
>Luka has been bound by Sister Lamia!\
skillname ""
if %mylife=0 sub %stack,1:return *sisterlamia_h5
name "Luka"
>Ahh... What... is this...?\
name ""
>I feel my strength fading as she coils around me...@
>Everywhere she's touching, intense sparks of pleasure flood through my body.\
mov %status,1:gosub *status_print
>Luka is immersed in ecstasy!\
name $name
>My tail lets those it winds around immerse themselves in pleasure.@
>Hehe, doesn't it feel like you have already gone to Heaven?\
name ""
if %nanido<2 mov %genmogaku,1
if %nanido=2 mov %genmogaku,1
if %nanido=3 mov %genmogaku,2
if %enemy_earth>0 mov %genmogaku,99
rnd2 %status_turn,1,2
if %nanido=2 rnd2 %status_turn,1,2
if %nanido=3 rnd2 %status_turn,2,3
sub %stack,1
return



*sisterlamia_a6

add %stack,1
>Luka has been bound by Sister Lamia's tail...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Oh dear... If I do this, it's almost like you're my prey..."
if %ransu=2 mov $sel1,"I always feel most at calm when I'm coiled around a man like this..."
if %ransu=3 mov $sel1,"Are you feeling the joy? Let me tighten some more..."
if %ransu=4 mov $sel1,"Many men have reached that moment of bliss in this embrace..."
if %ransu=5 mov $sel1,"Forget everything else as I wind around you... Embrace the ejaculation..."
name $name
eng $sel1:$sel6\
name ""
skillname "Ecstasy Snake Wrap"
dwave 1,"se\ero_makituki3.ogg"
>Sister Lamia's tail gently tightens a little more around Luka's body!
skillcount3 3777
if %nanido<2 damage 200,250
if %nanido=2 damage 230,280
if %nanido=3 damage 260,310
skillname ""
if %mylife=0 sub %stack,1:return *sisterlamia_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*sisterlamia_x1

add %stack,1
name $name
>Now come here...@
>I'll give you a tender, love-filled hug.\
name ""
skillname "Holy Snake's Invitation"
mov $tatie1,"sisterlamia_st22"
mov $tatie2,"sisterlamia_st22"
mov $tatie3,"sisterlamia_st23"
mov $tatie4,"sisterlamia_h1"
gosub *face1
>Sister Lamia opens her arms wide, and beckons Luka closer to her bared chest.\
skillname ""
mov %counter,1
sub %stack,1
return



*sisterlamia_a7

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Many people feel the love from my breasts as they finish..."
if %ransu=2 mov $sel1,"Taste the ecstasy of my breasts and ascend..."
if %ransu=3 mov $sel1,"I'll squeeze your penis between my breasts and fill you with pleasure..."
name $name
eng $sel1:$sel6\
name ""
skillname "Love-Filled Breasts"
dwave 1,"se\ero_sigoki1.ogg"
lsp 690,":a;chara\sisterlamia_hb1.bmp",0,0:print 10,500
>Sister Lamia sandwiches Luka's penis between her naked breasts, and uses them to massage him!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *face1:gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *face1:gosub *wind_guard:sub %stack,1:return
skillcount3 3778
if %nanido<2 damage 150,170
if %nanido=2 damage 180,200
if %nanido=3 damage 210,230
skillname ""
if %mylife=0 sub %stack,1:return *sisterlamia_h6
if %kousan<2 gosub *face1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*sisterlamia_a8

add %stack,1
mov %owaza_count2a,0
name $name
>I'll take that heart of yours...\
name ""
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
eng "Sister Lamia's eyes flash white!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka manages to avert his eyes in time!":gosub *wind_guard:sub %stack,1:return
\
mov %status,5:gosub *status_print
mov %status_turn,1
mov $status_mid," "
>Luka was entranced by Sister Lamia!\
skillname ""
name "Luka"
>Ah... Ahh...\
name ""
>Sister Lamia opens her arms wide, and beckons Luka closer to her bared chest.\
>Unable to hold himself back, Luka jumps forward into her embrace and buries his face in her breasts!\
sub %stack,1
return



*sisterlamia_x2

add %stack,1
if %kousan=2 skip 5
gosub *face3
name $name
>Oh... You don't wish to be embraced by me?\
name ""
mov $tatie1,"sisterlamia_st01r"
mov $tatie2,"sisterlamia_st02"
mov $tatie3,"sisterlamia_st03"
mov $tatie4,"sisterlamia_h1"
gosub *face1
>Sister Lamia covers back up her breasts...\
mov %counter,0
mov %hanyo2,0
sub %stack,1
return



*sisterlamia_counter

add %stack,1
mov %counter,0
lsp 700,":a;chara\sisterlamia_st25.bmp",0,0:print 10,500
if %kousan=2 skip 5
name $name
>Hehe, you came to my embrace...@
>I'll give you the greatest of joys as thanks.\
name ""
skillname "Holy Snake's Embrace"
>Sister Lamia hugs Luka, and coils her snake body around him!
>Luka's face is pushed between Sister Lamia's breasts!\
mov $tatie4,"sisterlamia_h1"
mov %kousoku,1:gosub *status_print
>Luka has been bound by Sister Lamia!\
skillname ""
name "Luka"
>Ahhh...!\
name ""
name $name
>You won't escape anymore, no matter how you struggle.@
>Now you'll get a taste of Heaven...\
name ""
skillname "Holy Snake's Embrace"
skillcount3 3779
>Sister Lamia presses her waist against Luka's!@
dwave 1,"se\ero_pyu1.ogg"
lsp 690,":c;chara\sisterlamia_ct01.bmp",0,0:print 10,500
>With a gentle push, she slips Luka's penis into her vagina!
mov %damage_kotei,1
damage 390,410
mov %kousoku,2
>Luka is being raped by Sister Lamia!\
skillname ""
if %mylife=0 sub %stack,1:return *sisterlamia_h7
name "Luka"
>Ahhhh!!\
name ""
>Her tight, wet vagina quickly closes down on my penis as soon as I'm inside her.\
>At the same time, her hand pushes my face harder against her breasts as my body spasms in sudden pleasure.\
sub %stack,1
goto *sisterlamia_a9



*sisterlamia_a9

add %stack,1
>Luka is being raped by Sister Lamia...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Taste the joy of my vagina.":mov $sel2,"Sister Lamia tightens her vagina around Luka's penis!"
if %ransu=2 mov $sel1,"No man can endure my embrace.":mov $sel2,"Sister Lamia hugs Luka tighter, and forces him deeper inside!"
if %ransu=3 mov $sel1,"Many men have tasted joy just as you are.":mov $sel2,"The wet walls of Sister Lamia's vagina rub against Luka's penis!"
if %ransu=4 mov $sel1,"Shall I tighten it and delight your penis more?":mov $sel2,"Sister Lamia slowly tightens her vagina around Luka's penis!"
if %ransu=5 mov $sel1,"This is the joy men desire most...":mov $sel2,"The wall of Sister Lamia's vagina move, vibrating against Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Holy Snake's Embrace"
dwave 1,"se\ero_chupa4.ogg"
eng $sel2:$sel6
skillcount3 3779
mov %damage_kotei,1
damage 390,410
skillname ""
if %mylife=0 sub %stack,1:return *sisterlamia_h8
sub %stack,1
goto *sisterlamia_a9



*sisterlamia_onedari

mov $list1,"Graceful Blowjob"
if %3773>0 mov %list_num1,1
mov $list2,"Love-Filled Breast Squeeze"
if %3774>0 mov %list_num2,1
mov $list3,"Delightful Masturbation"
if %3775>0 mov %list_num3,1
mov $list4,"Snake Body of Bliss"
if %3776>0 mov %list_num4,1
mov $list5,"Ecstasy Snake Wrap"
if %3777>0 mov %list_num5,1
mov $list6,"Love-Filled Breasts"
if %3778>0 mov %list_num6,1
mov $list7,"Holy Snake's Embrace"
if %3779>0 mov %list_num7,1
gosub *cmd_onedari
if %cmd1=11 goto *sisterlamia_onedari1
if %cmd1=12 goto *sisterlamia_onedari2
if %cmd1=13 goto *sisterlamia_onedari3
if %cmd1=14 goto *sisterlamia_onedari4
if %cmd1=15 goto *sisterlamia_onedari5
if %cmd1=16 goto *sisterlamia_onedari6
if %cmd1=17 goto *sisterlamia_onedari7
if %cmd1=-1 goto *sisterlamia_main
goto *sisterlamia_onedari



*sisterlamia_onedari1

gosub *onedari_syori
name $name
>You want to finish in my mouth?@
>Very well, I'll bring you to Heaven with my mouth...\
name ""
if %counter>0 gosub *sisterlamia_x2
gosub *sisterlamia_a1
skip -1



*sisterlamia_onedari2

gosub *onedari_syori
name $name
>You want to finish on my breasts?@
>Very well, I'll bring you to Heaven with my breasts...\
name ""
if %counter>0 gosub *sisterlamia_x2
gosub *sisterlamia_a2
skip -1



*sisterlamia_onedari3

gosub *onedari_syori
name $name
>You want to finish on my hand?@
>Very well, I'll bring you to Heaven with my hand...\
name ""
if %counter>0 gosub *sisterlamia_x2
gosub *sisterlamia_a3
skip -1



*sisterlamia_onedari4

gosub *onedari_syori
name $name
>You want to finish on my tail?@
>Very well, I'll bring you to Heaven with my tail...\
name ""
if %counter>0 gosub *sisterlamia_x2
gosub *sisterlamia_a4
skip -1



*sisterlamia_onedari5

gosub *onedari_syori_k
name $name
>You want me to coil around you and finish you off?@
>Very well, I'll bring you to Heaven in my embrace...\
name ""
if %counter>0 gosub *sisterlamia_x2
if %kousoku=0 gosub *sisterlamia_a5
gosub *sisterlamia_a6
skip -1



*sisterlamia_onedari6

gosub *onedari_syori
name $name
>You want to finish on my breasts?@
>Very well, I'll bring you to Heaven with my breasts...\
name ""
if %counter>0 skip 5
mov $tatie1,"sisterlamia_st22"
mov $tatie2,"sisterlamia_st22"
gosub *face1
>Sister Lamia opens her arms, inviting Luka to her now bare breasts!\
gosub *sisterlamia_a7
skip -1



*sisterlamia_onedari7

gosub *onedari_syori
name $name
>You want me to coil around you and finish you off?\
name ""
if %counter>0 skip 5
mov $tatie1,"sisterlamia_st22"
mov $tatie2,"sisterlamia_st22"
gosub *face1
>Sister Lamia opens her arms, inviting Luka to her now bare breasts!\
name $name
>...Now taste the finest of joys.\
name ""
gosub *sisterlamia_counter



*sisterlamia_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\sisterlamia_st05.bmp",0,0
lsp 691,":a;chara\sisterlamia_bk01.bmp",0,0
gosub *syasei2
>As Sister Lamia sucks on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2664,%2664+1:if %2664=1 mov %count_koenemy,%count_koenemy+1
if %2664>%count_most mov %count_most,%2664:mov $count_mostname,$name
count 4,17
mov $bad1,"Sister Lamia forced Luka to come with her mouth."
name $name
>Nnn... The proof of your pleasure filled my mouth.@
>Did it feel good?\
name ""
goto *sisterlamia_h



*sisterlamia_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\sisterlamia_st12.bmp",0,0
lsp 692,":a;chara\sisterlamia_bk12.bmp",0,0
gosub *syasei2
>Pressed between Sister Lamia's soft breasts over her clothes, Luka comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2664,%2664+1:if %2664=1 mov %count_koenemy,%count_koenemy+1
if %2664>%count_most mov %count_most,%2664:mov $count_mostname,$name
count 7,17
mov $bad1,"Sister Lamia forced Luka to come with her breasts."
name $name
>Hehe... My breasts are covered in the proof of your pleasure.@
>Did it feel good?\
name ""
goto *sisterlamia_h



*sisterlamia_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\sisterlamia_st12.bmp",0,0
lsp 693,":a;chara\sisterlamia_bk13.bmp",0,0
lsp 694,":a;chara\sisterlamia_bk14.bmp",0,0
gosub *syasei2
>As Sister Lamia gently strokes Luka's penis with her hands, he comes, covering her hands with semen.\
mov %viclose,1:gosub *lose
mov %2664,%2664+1:if %2664=1 mov %count_koenemy,%count_koenemy+1
if %2664>%count_most mov %count_most,%2664:mov $count_mostname,$name
count 5,17
mov $bad1,"Sister Lamia forced Luka to come with her hands."
name $name
>Hehe... My hands are covered in the proof of your pleasure.@
>Did it feel good?\
name ""
goto *sisterlamia_h



*sisterlamia_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 697,":a;chara\sisterlamia_bk07.bmp",0,0
gosub *syasei2
>As Sister Lamia's tail coils around Luka's penis, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2664,%2664+1:if %2664=1 mov %count_koenemy,%count_koenemy+1
if %2664>%count_most mov %count_most,%2664:mov $count_mostname,$name
count 19,17
mov $bad1,"Sister Lamia used her tail to force Luka to come."
gosub *face2
name $name
>Hehe... My tail is covered in the proof of your pleasure.@
>Did it feel good?\
name ""
goto *sisterlamia_h



*sisterlamia_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>As Sister Lamia slowly tightens her tail around Luka's body, he comes, covering her stomach with semen.\
mov %viclose,1:gosub *lose
mov %2664,%2664+1:if %2664=1 mov %count_koenemy,%count_koenemy+1
if %2664>%count_most mov %count_most,%2664:mov $count_mostname,$name
count 16,17
mov $bad1,"Sister Lamia forced Luka to come by tightening around his body."
gosub *face2
name $name
>Hehe... You finished from being squeezed.@
>Did it feel good?\
name ""
goto *sisterlamia_h



*sisterlamia_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\sisterlamia_bk08.bmp",0,0
lsp 700,":a;chara\sisterlamia_hb2.bmp",0,0
gosub *syasei2
>As Luka's penis is squeezed between Sister Lamia's soft breasts, he comes, covering her breasts in semen.\
mov %viclose,1:gosub *lose
mov %2664,%2664+1:if %2664=1 mov %count_koenemy,%count_koenemy+1
if %2664>%count_most mov %count_most,%2664:mov $count_mostname,$name
count 7,17
mov $bad1,"Sister Lamia forced Luka to come with her breasts."
name $name
>Hehe... My breasts are covered in the proof of your pleasure.@
>Did it feel good?\
name ""
goto *sisterlamia_h



*sisterlamia_h7

mov %ikigoe,3:gosub *ikigoe
name $name
>Oh?@>My, my... Already?\
name ""
gosub *syasei1
lsp 700,":a;chara\sisterlamia_h2.bmp",0,0
lsp 690,":c;chara\sisterlamia_ct02.bmp",0,0
gosub *syasei2
>As soon as Luka's penis is inserted into Sister Lamia, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2664,%2664+1:if %2664=1 mov %count_koenemy,%count_koenemy+1
if %2664>%count_most mov %count_most,%2664:mov $count_mostname,$name
mov %count_bouhatu,%count_bouhatu+1
count 1,17
mov $bad1,"Luka was forced to come the moment of insertion into Sister Lamia."
gosub *face2
name $name
>Hehe... To think you would finish so quickly...@
>Did it truly feel that amazing? Hahaha.\
name ""
goto *sisterlamia_h



*sisterlamia_h8

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\sisterlamia_h2.bmp",0,0
lsp 690,":c;chara\sisterlamia_ct02.bmp",0,0
gosub *syasei2
>As Sister Lamia's vagina squeezes down on Luka's penis, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2664,%2664+1:if %2664=1 mov %count_koenemy,%count_koenemy+1
if %2664>%count_most mov %count_most,%2664:mov $count_mostname,$name
count 1,17
mov $bad1,"Sister Lamia forced Luka to come as she raped him."
gosub *face2
name $name
>Hehe... My vagina is filled with the proof of your pleasure.@
>It must have felt amazing for you to have shot out so much...\
name ""
goto *sisterlamia_h



*sisterlamia_h

mov $bad2,"Raped by Sister Lamia, Luka meets his death inside her coiling embrace."
if %2664=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku=1 goto *sisterlamia_hb
if %kousoku=2 mov %hseanwave,5:hseanwave:goto *sisterlamia_hc
name "Luka"
>Ahh...\
name ""
name $name
>You seem to have lost the will to resist.@
>Now I shall coil around you.\
name ""
>Sister Lamia slowly winds around me with her snake body...@
>It's just like I was some small prey about to be devoured by a snake.\
dwave 1,"se\ero_makituki3.ogg"
cspl 690,699
lsp 700,":a;chara\sisterlamia_h1.bmp",0,0:print 10,500
>She presses my face between her large breasts.@
>Like that, I'm left completely bound in her embrace.\
name "Luka"
>Ahhg... Uhh...\
name ""
name $name
>Hehe... I've completely coiled around you.@
>And it looks like your body is already looking forward to the pleasure.\
name ""
>Sister Lamia softly mumbles that to herself, as my penis pokes against her stomach in this helpless state.\
>A feeling of pressure fills every inch of my body...@
>Stuck in her tight embrace, it almost feels reassuring.\
>Stuck inside a Lamia's coiling, I'm no more than helpless prey...\
goto *sisterlamia_hb



*sisterlamia_hb

name "Luka"
>L...Let me go...!\
name ""
name $name
>...Ilias' orders were to squeeze you to death.@
>It's not something I am particularly fond of, but I will do her will.\
name ""
name "Luka"
>Guh...!@>Stop this!\
name ""
>I struggle with everything I have to escape her coil...@
>But in response, she just squeezes me even tighter.\
>At the same time, she presses my face even harder into her breasts.@
>Pushed hard into her soft chest, I'm almost chocking on her breasts.\
name "Luka"
>Nnn... Mmmgg!\
name ""
name $name
>...Please don't act violently.@
>At the least, I'll indulge you in pleasure until your last moments.\
name ""
name "Luka"
>Ah...\
name ""
>With my face pressed into her breasts, I can't see anything that's going on.@
>As I feebly struggle, I suddenly feel something wrap around my penis.\
mov %hseanwave,5:hseanwave
lsp 690,":c;chara\sisterlamia_ct01.bmp",0,0:print 10,500
>Something wet and tight suddenly surrounds my penis.\
name "Luka"
>Ahh...!@>W...What is this!?\
name ""
name $name
>I took in your penis...@
>It's the will of the Goddess for you to be raped and squeezed to death.\
name ""
goto *sisterlamia_hc



*sisterlamia_hc

name "Luka"
>Hyaaa!\
name ""
>With some wet noises sounding out, my penis slowly sinks into her vagina.@
>Despite being unable to see it, it's like another snake is coiling around my penis, like she is around my body...\
>I slowly sink into her, as her wet flesh slowly squeezes down harder on my penis.\
>It's like a large mouth opened up and is swallowing my penis...@
>Unable to see it, I just writhe in her embrace as the sensations wash over me.\
name "Luka"
>Ahh...!\
name ""
>It feels like I'm all the way inside her... Her warm flesh is around my penis from the tip to root.\
name $name
>Since I'm a Lamia, it's easy to squeeze you to death.@
>But I'll send you to Heaven without you even feeling any pain.\
name ""
name "Luka"
>No... Stop...@
>Ahhh...\
name ""
>Suddenly, her vaginal walls start to squirm and wriggle against my penis.@
>The stimulation rubs against my penis as she squeezes down at the same time.\
>Using her powerful muscles, she makes waves of pressure roll up my penis from the base to the tip.@
>At the same time, she squeezes just the tip of my penis deep inside her.\
>It felt just like a snake playing with its prey before it devoured it...\
name "Luka"
>Ah... Hyaa!\
name ""
>The intense pleasure makes my body go slack as I stop struggling, relaxing in her sweet embrace.\
name $name
>Yes, that's good... Give yourself over to my embrace.@
>That way I'll be able to let you ascend to Heaven right away.\
name ""
name "Luka"
>Hyaaa... Stop...\
name ""
>I hear a strange wet sound coming from where my penis is stuck in her vagina.\
>Feeling and hearing what's going on, but unable to see it, increases the sense of pleasure, bringing me close to my limit.\
name "Luka"
>Stop... Let me go...@
>Ahh... I'm going to come...\
name ""
name $name
>Good, just let it out...@
>I won't let you resist it, so just give in...\
name ""
name "Luka"
>Ahhh!!\
name ""
>The waves of squeezing inside her vagina suddenly get even faster.@
>As if encouraging me to an orgasm, she also squeezes down on the tip of my penis at the same time.\
name ""
name $name
>Now, please...\
name ""
name "Luka"
>Ah... Ahhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\sisterlamia_h2.bmp",0,0
lsp 690,":c;chara\sisterlamia_ct02.bmp",0,0
gosub *syasei2
>Overwhelmed by the waves of pressure in her vagina, I reach a climax.@
>Still held in her tight embrace, my semen explodes into her.\
name "Luka"
>Ah...\
name ""
>At the same time as my ejaculation, I feel a lightness spread to my limbs.@
>Instead of pain, it feels more like a sweet ache...\
>It's clear to me that my own life energy was sucked up along with my ejaculation.\
name "Luka"
>Ah... Let go...\
name ""
name $name
>...I'm sorry, but I cannot do that.@
>It is the Goddess' will for you to be raped to death...\
name ""
name "Luka"
>Ahhh...!\
name ""
mov %hseanwave,8:hseanwave
>As if emphasizing her words, her vagina suddenly tightens much more around me.\
>Starting from my root and slowly moving like a wave to my tip, the tightness squeezes out every drop of semen that was still in me into her.\
>Continuing that movement again, she's already working towards my next orgasm...\
name "Luka"
>Ah...! Ahh!\
name ""
name $name
>Is it heart breaking?@>But it should also feel good.@
>I'll embrace you until your last moments.@
>So please, end your life peacefully.\
name ""
>From her words and caring embrace, I can feel her love leaking through...@
>But at the same time, the sensation of being prey doesn't vanish.\
>She's using her tight vagina to squeeze out my life itself.\
name "Luka"
>Hyaa!@>Ah...!\
name ""
>My body goes rigid with spasms as the pleasure takes over my lower body.@
>Through it all, Sister Lamia keeps me in her loving embrace.\
>All the while, her waves of pressure up and down my penis continue on, forcing the full amounts of pleasure she can into my body.\
name $name
>You seem to be leaking again...@
>Allow me to bring you to the next climax.\
name ""
>In the next moment, the tightness around my glans suddenly increases.@
>Doing everything she can to finish me off, I feel my body rejoicing in the coming climax.\
name "Luka"
>Ha...!@> Ahh!\
name ""
gosub *syasei1:gosub *syasei2
>Reacting to her squeeze, I come again.@
>It feels like she was able to make me come at will.\
>The weakness in my body spreads even more.@
>My life itself really is fleeing with each ejaculation...\
name "Luka"
>Aiie!\
name ""
>But despite all that, her waves of squeezing don't stop at all.@
>My body rejoices in the pleasure, while my mind fears for what's next.\
name $name
>Now let me make you ejaculate over and over.@
>Please enjoy this ecstasy before your death.\
>And the moment you surrender to it, you will ascend to Heaven...@> Hehe.\
name ""
>...She just laughed, I'm certain of it.@
>While squeezing me tight, she couldn't help but smile.\
>This affectionate embrace is no lie.@
>But deep inside her heart, she still thinks of me like prey to be squeezed.\
name $name
>Now please meet a peaceful end, and fill my vagina with your cloudy semen.@
>Because I'll send you to Heaven in the throes of pleasure.\
name ""
name "Luka"
>Ah... Aiiee!\
name ""
>Sister Lamia's vagina suddenly gets wetter, increasing the lubrication.@
>As the wet noises from our connection get louder, the stimulation gets far more intense.\
>Unable to withstand the now lubricated feeling of her warm vagina, I'm brought to another fast climax.\
gosub *syasei1
lsp 700,":a;chara\sisterlamia_h3.bmp",0,0
lsp 690,":c;chara\sisterlamia_ct03.bmp",0,0
gosub *syasei2
>I come in only moments...@>Sister Lamia's vagina won't allow any man to endure it if she doesn't want him to.\
name "Luka"
>Ah... Stop...@
>I'm going to die...\
name ""
name $name
>You understand that your life is being squeezed out?@
>But there's no need to fear.\
>Since you'll be able to reach Heaven in the heights of pleasure.\
name ""
name "Luka"
>Hyaa... No...\
name ""
>Her snake body tightens more around me, cutting off even the last of my feeble attempts at struggling.\
>At the same time, her vagina continues squeezing around me, helplessly leading me to another ejaculation.\
name "Luka"
>Haa... It's going to leak again...\
name ""
name $name
>I don't mind... Go ahead.@
>Let out everything.\
name ""
name "Luka"
>Haaa...\
name ""
gosub *syasei1:gosub *syasei2
>I explode inside Sister Lamia again, letting the sweet weakness fill more of my body.\
>I can't even move my body any longer, and my mind is being eroded by pleasure.\
name "Luka"
>Ah... Haaa...\
name ""
name $name
>Your life will be finished in my embrace.@
>Until the last moments of your life, indulge in this bliss.\
name ""
>With an affectionate smile, Sister Lamia hugs me even tighter.@
>And in her vagina, she continues squeezing out my life itself, trading pleasure for death.\
name "Luka"
>Ha... Ah...\
name ""
gosub *syasei1:gosub *syasei2
>Another drop of my life is taken by her vagina.@
>As I am now, I'm too weak to even move a finger.\
>A sweet fog fills my mind, and I can't even see straight any longer.\
name $name
>You seem to be near your end...@
>Do not fear, you'll be in my loving embrace until the end.\
name ""
name "Luka"
>Ah... uh...\
name ""
gosub *syasei1:gosub *syasei2
>The last of my life spurts into her vagina, causing me to faint at the same time.@
>I slowly drift into a deep, deep sleep from which I won't awaken.\
>Thus, I meet my end in Sister Lamia's sweet embrace.@
>Sister Lamia gives one final squeeze to my lifeless body as she can't help but let out a charming laugh.\
name $name
>Hehe... Did you die?@
>Oh Goddess Ilias, thank you for my daily meal.\
name ""
mov %hseanwave,0:hseanwave
gosub *anten
>...........\
goto *badend



*muzukiel_start

mov $name,"Power Muzukiel"
mov $name2,"Muzukiel"
mov $lavel,"muzukiel"
mov $tatie1,"muzukiel_st01"
mov $tatie2,"muzukiel_st02"
mov $tatie3,"muzukiel_st03"
mov $tatie4,"muzukiel_ha1"
mov $haikei,"bg157"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,18000
if %nanido=2 mov %max_enemylife,21000
if %nanido=3 mov %max_enemylife,24000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,0
mov %music,9
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free from Muzukiel!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"You can't escape divine punishment..."
mov $mogaku_sel2,"Sinners aren't allowed to escape from my leech."
mov $mogaku_sel3,"Give up and accept your punishment."
mov $mogaku_sel4,"No matter how you struggle, you won't escape from your sins."
mov $mogaku_sel5,"No matter how you struggle, my leech won't let you go."
mov $mogaku_dassyutu1,"Escaping from my leech..."
mov $mogaku_dassyutu2,"Don't you understand that resistance to punishment only serves to elicit further punishment?"
mov $half_s1,"Do you taste the pleasure yet?"
mov $half_s2,"Even though it's the wrath of the Heavens..."
mov $kiki_s1,"Are you almost at your limit?"
mov $kiki_s2,"Please hurry up and scatter your dirty seed."
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-200
mov %tukix,300
mov %owaza_count1a,4
mov %owaza_count3a,4
mov %owaza_count3b,4
mov $name,"Muzukiel"
name "Luka"
>I won't let you sacrifice anyone else!@
>Now come, I'm your opponent!\
name ""
>Holding my sword ready, I face down the angel.\
>Insect-like organs twitch and wriggle, along with holes dripping with mucus...@
>She looks far from a sacred existence.\
name "Luka"
>What a body...@
>You're no different from a monster.\
name ""
name $name
>Insulting an angel as soon as you see one...@
>Truly, you are a disgraced Hero.\
name ""
name "Luka"
>...It's not an insult, just an observation.@
>Unlike you, I do not discriminate against monsters.\
name ""
name $name
>........\
name ""
>Muzukiel glares at me, showing intense hostility.@
>At the same time, a lecherous look appears in her eyes.\
name $name
>I am the angel of harvests and fertility, Power Muzukiel...@
>My role is to sprinkle abundant life upon the ground, and create growth.\
>However... In front of the re-creation, life is in short supply.\
>Shall I harvest your semen for the future?\
name ""
>An angel in the Power circle... She must be quite formidable.@
>But if I defeat her, the enemy's cohesion should crumble.\
>I have to defeat her somehow!\
goto *common_main



*muzukiel_v

gosub *face3
name $name
>I am Power Muzukiel...@
>Harvests... And... Fertility...\
name ""
dwave 1,"se\bun.ogg"
csp 700:print 99,1000,"system\breakup.dll/lrB"
>Power Muzukiel fades away into particles, then vanishes!\
mov $name,"Power Muzukiel"
mov %viclose,1:gosub *victory
mov %getexp,220000:gosub *lvup
mov %2366,1
goto *sean0325



*muzukiel_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>You're ready to provide your semen to me?@
>Then I shall collect it without wasting a drop...\
name ""
goto *muzukiel_a



*muzukiel_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *muzukiel_kousan
if %cmd1=16 goto *muzukiel_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *muzukiel_main



*muzukiel_a

if %hanyo6=1 && %bougyo=1 && %wind>0 gosub *muzukiel_a8:goto *common_main
if %hanyo6=1 gosub *muzukiel_a9:goto *common_main
if %kousoku=1 gosub *muzukiel_a6:goto *common_main
rnd2 %ransu,1,6
if %ransu=1 gosub *muzukiel_a1:goto *common_main
if %ransu=2 gosub *muzukiel_a2:goto *common_main
if %ransu=3 gosub *muzukiel_a3:goto *common_main
if %ransu=4 && %owaza_count3a>5 gosub *muzukiel_a4:goto *common_main
if %ransu=5 && %owaza_count1a>5 gosub *muzukiel_a5:goto *common_main
if %ransu=6 && %owaza_count3b>5 gosub *muzukiel_a7:goto *common_main
skip -7



*muzukiel_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"The punishment will be delivered by hand."
if %ransu=2 mov $sel1,"I'll use this hand to squeeze your semen."
if %ransu=3 mov $sel1,"I'll wring out your semen into my palm, and offer it to Ilias."
name $name
eng $sel1:$sel6\
name ""
skillname "Punishing Handjob"
dwave 1,"se\ero_koki1.ogg"
>Muzukiel grabs hold of Luka's penis, and slowly strokes him!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3780
if %nanido<2 damage 350,370
if %nanido=2 damage 380,400
if %nanido=3 damage 410,430
skillname ""
if %mylife=0 sub %stack,1:return *muzukiel_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*muzukiel_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"The punishment will be delivered orally."
if %ransu=2 mov $sel1,"I'll suck your penis as punishment."
if %ransu=3 mov $sel1,"Your punishment decrees that all of your semen shall be swallowed by me."
name $name
eng $sel1:$sel6\
name ""
skillname "Punishing Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>Muzukiel slips Luka's penis into her mouth, and sucks on it!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3781
if %nanido<2 damage 360,380
if %nanido=2 damage 390,410
if %nanido=3 damage 420,440
skillname ""
if %mylife=0 sub %stack,1:return *muzukiel_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*muzukiel_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Take your punishment between my breasts."
if %ransu=2 mov $sel1,"Repent your sins while being squeezed by my breasts!"
if %ransu=3 mov $sel1,"Submit the proof of your sin on my chest!"
name $name
eng $sel1:$sel6\
name ""
skillname "Punishing Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>Muzukiel squeezes Luka's penis between her breasts!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3782
if %nanido<2 damage 370,390
if %nanido=2 damage 400,420
if %nanido=3 damage 430,450
skillname ""
if %mylife=0 sub %stack,1:return *muzukiel_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*muzukiel_a4

add %stack,1
mov %owaza_count3a,0
name $name
>Sinners like you deserve an orgasm by horrifying methods.@
>I'll violate your penis with this centipede like organ...\
name ""
skillname "Punishing Centipede"
dwave 1,"se\umaru.ogg"
>Muzukiel's centipede-like tail coils around Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3783
if %nanido<2 damage 150,170
if %nanido=2 damage 160,180
if %nanido=3 damage 170,190
dwave 1,"se\umaru.ogg"
>The centipede-like tail tightens around Luka's penis!
if %nanido<2 damage 150,170
if %nanido=2 damage 160,180
if %nanido=3 damage 170,190
dwave 1,"se\umaru.ogg"
>Countless feet all move and wriggle, tickling Luka's penis!
if %nanido<2 damage 150,170
if %nanido=2 damage 160,180
if %nanido=3 damage 170,190
skillname ""
if %mylife=0 sub %stack,1:return *muzukiel_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*muzukiel_a5

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 5
name $name
>I extract semen from sinners like you without mercy.@
>This leech will suck it all up.\
name ""
skillname "Punishing Leech"
dwave 1,"se\ero_makituki3.ogg"
>Muzukiel's semen sucking leech sucks in Luka's lower body!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3784
if %nanido<2 damage 320,350
if %nanido=2 damage 350,380
if %nanido=3 damage 380,410
mov %kousoku,1:gosub *status_print
>Luka has been bound by Muzukiel!\
skillname ""
if %mylife=0 sub %stack,1:return *muzukiel_h5
name $name
if %first_sel2=1 skip 3
>Now you can't escape any longer.@
skip 2
>This time you won't escape.@
>Repent your crime as my hideous leech sucks on you...\
name ""
mov %first_sel2,1
if %nanido<2 mov %genmogaku,2
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,3
sub %stack,1
return



*muzukiel_a6

add %stack,1
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"This leech won't separate until the sinner's semen is empty..."
if %ransu=2 mov $sel1,"Your dirty semen is this leech's food."
if %ransu=3 mov $sel1,"Being sucked dry by my leech is an appropriate fate for you."
if %ransu=4 mov $sel1,"How does it feel having your semen sucked by a leech?"
if %ransu=5 mov $sel1,"No matter the sinner, they all cry before ten ejaculations are sucked out."
name $name
eng $sel1:$sel6\
name ""
skillname "Punishing Leech"
dwave 1,"se\ero_makituki3.ogg"
>The leech sucks hard on Luka's lower body!
>A sweet sensation fills Luka's body as his energy is sucked out!
skillcount3 3784
if %nanido<2 damage 320,350
if %nanido=2 damage 350,380
if %nanido=3 damage 380,410
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *muzukiel_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*muzukiel_a7

add %stack,1
if %kousan=2 skip 5
name $name
>It's time for the true punishment to begin.@
>I'll use the vessel in my lower body to exact severe punishment on you.\
name ""
skillname "Punishing Flesh Hole Preparation"
dwave 1,"se\ero_pyu1.ogg"
mov $tatie1,"muzukiel_st11"
mov $tatie2,"muzukiel_st11"
lsp 700,":a;chara\muzukiel_st11.bmp",0,0:print 10,500
>A seductive hole opens up in Muzukiel's crotch area!\
skillname ""
name $name
>This flesh hole is used for reproductive purposes...@
>It can extract semen from any male organ in moments.\
name ""
mov %hanyo6,1
sub %stack,1
return



*muzukiel_a8

add %stack,1
name $name
>Now to insert your penis into me...\
name ""
skillname "Punishing Flesh Hole"
>Muzukiel's sickle-like arm wraps around Luka's waist!
delay 1000
dwave 1,"se\miss.ogg"
>But Luka parries it away and jumps back!\
skillname ""
mov $tatie1,"muzukiel_st01"
mov $tatie2,"muzukiel_st02"
gosub *face1
if %first_sel1=1 skip 6
name $name
>You saw through me...@
>You're quite observant, aren't you?\
name ""
mov %first_sel1,1
mov %hanyo6,0
mov %owaza_count3b,0
sub %stack,1
return



*muzukiel_a9

add %stack,1
mov %hanyo6,0
if %kousan=2 skip 4
name $name
>Now to insert your penis into me...\
name ""
skillname "Punishing Flesh Hole"
eng "Muzukiel's sickle-like arm wraps around Luka's waist!":$sel6/
if %daten>0 mov %tamek,1:goto *skill22x
\
dwave 1,"se\ero_pyu1.ogg"
mov $tatie4,"muzukiel_st21"
lsp 700,":a;chara\muzukiel_st21.bmp",0,0:print 10,500
>Pulling him in, Muzukiel forces Luka's penis into her open hole!
skillcount3 3785
mov %damage_kotei,1
damage 330,360
mov %kousoku,1:gosub *status_print
>Luka is being raped by Muzukiel!\
skillname ""
if %mylife=0 sub %stack,1:return *muzukiel_h6
name "Luka"
>Ahhh!!\
name ""
>My penis spreads open her strange, elastic hole, making her flesh almost form to my shape.\
name $name
>Do you know why I'm raping you?@
>Because you're a sinner.\
name ""
mov %genmogaku,99
sub %stack,1
goto *muzukiel_a10



*muzukiel_a10

add %stack,1
>Luka is being raped by Muzukiel...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I won't leave a drop of your dirty semen...":mov $sel2,"The flesh inside Muzukiel's vagina wriggles and squirms around Luka's penis!"
if %ransu=2 mov $sel1,"How does it feel being squeezed dry? Painful? Frustrating?":mov $sel2,"The hole suddenly squeezes down tightly around Luka's penis!"
if %ransu=3 mov $sel1,"Realize your crime as you're raped.":mov $sel2,"The flesh inside Muzukiel intensely vibrates!"
if %ransu=4 mov $sel1,"Even if you scream and cry, I won't forgive you, sinner.":mov $sel2,"The elastic flesh pushes and forms to the shape of Luka's penis!"
if %ransu=5 mov $sel1,"I'll squeeze your semen dry with my angel vagina.":mov $sel2,"The fleshy walls inside Muzukiel pull at Luka's penis, as if it was sucking him in!"
name $name
eng $sel1:$sel6\
name ""
skillname "Punishing Flesh Hole"
dwave 1,"se\ero_makituki3.ogg"
eng $sel2:$sel6
skillcount3 3785
mov %damage_kotei,1
damage 330,360
skillname ""
if %mylife=0 sub %stack,1:return *muzukiel_h7
sub %stack,1
goto *muzukiel_a10



*muzukiel_onedari

mov $list1,"Punishing Handjob"
if %3780>0 mov %list_num1,1
mov $list2,"Punishing Blowjob"
if %3781>0 mov %list_num2,1
mov $list3,"Punishing Tit Fuck"
if %3782>0 mov %list_num3,1
mov $list4,"Punishing Centipede"
if %3783>0 mov %list_num4,1
mov $list5,"Punishing Leech"
if %3784>0 mov %list_num5,1
mov $list6,"Punishing Flesh Hole"
if %3785>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *muzukiel_onedari1
if %cmd1=12 goto *muzukiel_onedari2
if %cmd1=13 goto *muzukiel_onedari3
if %cmd1=14 goto *muzukiel_onedari4
if %cmd1=15 goto *muzukiel_onedari5
if %cmd1=16 goto *muzukiel_onedari6
if %cmd1=-1 goto *muzukiel_main
goto *muzukiel_onedari



*muzukiel_onedari1

mov $tatie1,"muzukiel_st01"
mov $tatie2,"muzukiel_st02"
gosub *onedari_syori
name $name
>You wish to be punished by my hands?@
>Now to squeeze out that dirty semen...\
name ""
gosub *muzukiel_a1
skip -1



*muzukiel_onedari2

mov $tatie1,"muzukiel_st01"
mov $tatie2,"muzukiel_st02"
gosub *onedari_syori
name $name
>You wish to be punished by my mouth?@
>Now to suck out that dirty semen...\
name ""
gosub *muzukiel_a2
skip -1



*muzukiel_onedari3

mov $tatie1,"muzukiel_st01"
mov $tatie2,"muzukiel_st02"
gosub *onedari_syori
name $name
>You wish to be punished by my breasts?@
>Now to squeeze out that dirty semen...\
name ""
gosub *muzukiel_a3
skip -1



*muzukiel_onedari4

mov $tatie1,"muzukiel_st01"
mov $tatie2,"muzukiel_st02"
gosub *onedari_syori
name $name
>You wish to be punished by my centipede tail?@
>Now to wring out that dirty semen...\
name ""
gosub *muzukiel_a4
skip -1



*muzukiel_onedari5

gosub *onedari_syori
name $name
>You wish to be sucked dry by this leech of mine?@
>How odd, to desire the punishment of the Heavens...\
name ""
if %kousoku=0 gosub *muzukiel_a5
gosub *muzukiel_a6
skip -1



*muzukiel_onedari6

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You wish to mate with me and be punished by my vagina?@
>Then I shall punish you as you wish...\
name ""
if %hanyo6=1 skip 2
gosub *muzukiel_a7
gosub *muzukiel_a9
skip -1




*muzukiel_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\muzukiel_bk03.bmp",0,0
gosub *syasei2
>As Muzukiel's delicate hand strokes Luka's penis, he comes, covering her hands in semen.\
mov %viclose,1:gosub *lose
mov %2666,%2666+1:if %2666=1 mov %count_koenemy,%count_koenemy+1
if %2666>%count_most mov %count_most,%2666:mov $count_mostname,$name
count 5,1
mov $bad1,"Muzukiel forced Luka to come with her hands."
gosub *face2
name $name
>This is your seed...@
>Even though it was milked out due to Heaven's punishment, you sure let out a lot...\
name ""
goto *muzukiel_h



*muzukiel_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\muzukiel_bk01.bmp",0,0
gosub *syasei2
>As Muzukiel sucks on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2666,%2666+1:if %2666=1 mov %count_koenemy,%count_koenemy+1
if %2666>%count_most mov %count_most,%2666:mov $count_mostname,$name
count 4,1
mov $bad1,"Muzukiel forced Luka to come with her mouth."
gosub *face2
name $name
>Nnn... This is your seed...@
>Even though it was milked out due to Heaven's punishment, you sure let out a lot...\
name ""
goto *muzukiel_h



*muzukiel_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\muzukiel_bk02.bmp",0,0
gosub *syasei2
>As Muzukiel's breasts squeeze down on Luka's penis, he comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2666,%2666+1:if %2666=1 mov %count_koenemy,%count_koenemy+1
if %2666>%count_most mov %count_most,%2666:mov $count_mostname,$name
count 7,1
mov $bad1,"Muzukiel forced Luka to come with her breasts."
gosub *face2
name $name
>This is your seed...@
>Even though it was milked out due to Heaven's punishment, you sure let out a lot...\
name ""
goto *muzukiel_h



*muzukiel_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\muzukiel_bk05.bmp",0,0
gosub *syasei2
>As Muzukiel's centipede-like tail coils around Luka's penis, he comes, covering it with semen.\
mov %viclose,1:gosub *lose
mov %2666,%2666+1:if %2666=1 mov %count_koenemy,%count_koenemy+1
if %2666>%count_most mov %count_most,%2666:mov $count_mostname,$name
count 32,1
mov $bad1,"Muzukiel forced Luka to come with her centipede-like tail."
gosub *face2
name $name
>This is your seed...@
>Even though it was milked out due to Heaven's punishment, you sure let out a lot...\
name ""
goto *muzukiel_h



*muzukiel_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\muzukiel_ha2.bmp",0,0
gosub *syasei2
>As the leech sucks on Luka's lower body, he comes, spraying semen into its gaping mouth.\
mov %viclose,1:gosub *lose2
name "Luka"
>Ahhh...\
name ""
name $name
>This is your seed...@
>And quite a lot, considering it was an inferior lowly leech that drew it out.\
>Just this once, shall I extract some more?@
>Come on, I'm sure you have more in there...\
name ""
skillcount3 3784
skillname "Punishing Leech"
dwave 1,"se\ero_makituki3.ogg"
>The leech starts to vibrate around Luka's lower body!
mov %damage_kotei,1
damage 320,350
dwave 1,"se\ero_makituki3.ogg"
>As if surrounded by tentacles, the folds of the leech rub against Luka's body!
mov %damage_kotei,1
damage 320,350
skillname ""
name "Luka"
>S...Stop... Ahhh!\
name ""
name $name
>Unlike others, I don't have strange hobbies toying with prey...@
>Just give me your semen, and stop that pathetic crying.\
name ""
skillcount3 3784
skillname "Punishing Leech"
dwave 1,"se\ero_makituki3.ogg"
>The inner walls squirm around Luka's penis!
mov %damage_kotei,1
damage 320,350
dwave 1,"se\ero_makituki3.ogg"
>Tentacles crawl all over Luka's body like fingers!
mov %damage_kotei,1
damage 320,350
skillname ""
name "Luka"
>Ah... Going to come again...\
name ""
name $name
>I see... Then let me hurry you up.@
>A large amount of semen will soon be required, after all.\
name ""
skillcount3 3784
skillname "Punishing Leech"
dwave 1,"se\ero_makituki3.ogg"
>The leech squeezes on Luka's body!
mov %damage_kotei,1
damage 320,350
dwave 1,"se\ero_makituki3.ogg"
>Wrapping up his penis, the walls of the leech almost suck it inside!
mov %damage_kotei,1
damage 320,350
skillname ""
name "Luka"
>Haa... Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\muzukiel_ha3.bmp",0,0
gosub *syasei2
>The horrifying leech forces Luka to another orgasm, his semen shooting out and spilling down into its eager mouth.\
name $name
>Wow, another huge ejaculation.@
>Even after shooting off one load, you had another one that big in you?\
>I think I'll improve the quality of my handling of you a little.@
>This time, I'll give some gentle pleasure...\
name ""
name "Luka"
>Ah... Ahhhh!!\
name ""
skillcount3 3784
skillname "Punishing Leech"
dwave 1,"se\ero_makituki3.ogg"
>The leech sucks hard on Luka's body, almost adhering to the shape of his lower body!
mov %damage_kotei,1
damage 320,350
dwave 1,"se\ero_makituki3.ogg"
>Pressed down on him, tentacles caress every inch of his body!
mov %damage_kotei,1
damage 320,350
skillname ""
name $name
>It feels good this way, doesn't it?@
>This leech is the best organ for sucking out male semen...\
name ""
skillcount3 3784
skillname "Punishing Leech"
dwave 1,"se\ero_makituki3.ogg"
>The leech makes chewing motions on Luka's lower body, flooding him with sweet pleasure!
mov %damage_kotei,1
damage 320,350
dwave 1,"se\ero_makituki3.ogg"
>Chewing and sucking on his penis, stimulation is forced into Luka!
mov %damage_kotei,1
damage 320,350
skillname ""
name "Luka"
>Ahh... Stop... I can't come any more...\
name ""
name $name
>No, you can.@
>As the angel over fertility, I know well just how much semen you have.\
>Shall I force you to prove it?\
name ""
skillcount3 3784
skillname "Punishing Leech"
dwave 1,"se\ero_makituki3.ogg"
>The leech sucks Luka's penis further inside, trying to suck out his semen!
mov %damage_kotei,1
damage 320,350
dwave 1,"se\ero_makituki3.ogg"
>The fleshy walls rub and vibrate against his glans!
mov %damage_kotei,1
damage 320,350
skillname ""
name "Luka"
>Haa... Ahh...!\
name ""
gosub *syasei1
lsp 700,":a;chara\muzukiel_ha4.bmp",0,0
gosub *syasei2
>As the leech sucks hard on Luka's penis, he comes, spraying more semen into its greedy mouth.\
name $name
>See, I told you that you could come again.@
>And with this much energy in you, mating still seems to be possible...\
name ""
gosub *clear_sprite
gosub *setwindow_01p
mov %battle,0
mov %hsean,1
mov %2666,%2666+1:if %2666=1 mov %count_koenemy,%count_koenemy+1
if %2666>%count_most mov %count_most,%2666:mov $count_mostname,$name
count 2,1
mov $bad1,"Muzukiel forced Luka to come with her leech."
lsp 700,":a;chara\muzukiel_st02.bmp",0,0:print 10,500
goto *muzukiel_h



*muzukiel_h6

mov %ikigoe,3:gosub *ikigoe
name $name
>How absurd...@>Is that really your limit?\
name ""
gosub *syasei1:gosub *syasei2
>As soon as Luka is forced into Muzukiel's hole, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2666,%2666+1:if %2666=1 mov %count_koenemy,%count_koenemy+1
if %2666>%count_most mov %count_most,%2666:mov $count_mostname,$name
count 1,1
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come the moment of insertion."
gosub *face2
name $name
>That was fast, even for a foolish sinner...@
>To think you would finish so quickly in my vagina...\
name ""
goto *muzukiel_h



*muzukiel_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\muzukiel_st22.bmp",0,0
gosub *syasei2
>Unable to endure Muzukiel raping him any longer, Luka comes, filling her hole with semen.\
mov %viclose,1:gosub *lose
mov %2666,%2666+1:if %2666=1 mov %count_koenemy,%count_koenemy+1
if %2666>%count_most mov %count_most,%2666:mov $count_mostname,$name
count 1,1
mov $bad1,"Muzukiel forced Luka to come as she raped him."
gosub *face2
name $name
>You seem to have finished inside me.@
>A large amount of your seed burst out into me.\
name ""
goto *muzukiel_h



*muzukiel_h

mov $bad2,"Luka was forced to continue mating with her for eternity, assisting with sowing life on the new world."
if %2666=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahhh...\
name ""
name $name
>Now you will mate with me.@
>As I said before, I need semen for growing life in the new world.\
>Your semen is of very good quality, so I will be using lots of it.@
>Devote yourself for the sake of new life, and for the innumerable insects in the new world.\
name ""
>Her centipede-like arm reaches out, and grabs hold of my body.@
>At the same time, an oviduct extends out from her body toward my waist.\
>A nightmarish forced mating is about to start...\
name "Luka"
>Urhg...\
name ""
>The oviduct opens up, showing off wriggling walls of flesh, and tiny little bumps all over the lining.@
>Little fine hairs are deeper inside, eagerly moving around...\
>And through it all, sticky mucus is dripping and covering everything.\
name "Luka"
>N...No... Stop...!\
name ""
>A chill runs down my spine at the thought of my penis being in that horrifying hole.@
>It's like it was a completely foreign creature.\
name $name
>Hehe... Humans are repelled by the thought of mating with other creatures by instinct.@
>And for an oviduct like this, they are especially repulsed at the thought.\
>But on the other hand, humans are also driven to seek pleasure by instinct.@
>And look... You seem ready to mate, too.\
name ""
name "Luka"
>N...No way...\
name ""
>In front of Muzukiel's horrifying oviduct, my penis got completely hard.@
>Despite my revulsion at it, my body wants to feel it.\
name "Luka"
>No, this is...\
name ""
name $name
>Hehe... You can deny it, but your body reacted.@
>In truth, you want to mate with me despite your disgust, don't you?\
>You want to stick it inside this oviduct, and feel the sensation...@
>And drowning in pleasure, shoot your semen deep inside.\
name ""
name "Luka"
>Y...You're wrong...\
name ""
>As I refute her, I can't help but think about it.@
>Just looking at it, I can tell it was designed to mate with men...\
>The shrinking and expanding walls, almost waving inside...@
>The tiny bumps, lining all of the walls...@
>And the hairs, right where my glans would be.\
>The disastrous thoughts of wanting to feel it all spring up in my heart.\
name $name
>Hehe... Whether you want to or not, the fact that you'll be doing it won't change.@
>Just obediently accept the pleasure.\
>...Now let us mate.@
>I'll squeeze out all of your semen...\
name ""
name "Luka"
>S...Stop...!@
>Ahh!\
name ""
>My expectation and fear at feeling her oviduct...@
>They all mix together and explode at once as she forces me inside her.\
dwave 1,"se\ero_makituki2.ogg"
mov %hseanwave,12:hseanwave
cspl 690,699
lsp 700,":a;chara\muzukiel_hb1.bmp",0,0:print 10,500
name "Luka"
>Ah...!@> Ahhh!\
name ""
>My penis finally pierces into her oviduct, the sweet feeling of pressure filling me all at once.@
>At the same time, I feel the slimy mucus rubbing into my penis.\
name $name
>Hehe... We've become one.@
>My oviduct took in your penis...\
>How does it feel, mating with an angel?\
name ""
name "Luka"
>Ha... Ahhh!@
>It's moving inside...!\
name ""
>As her oviduct shrinks down around my penis, the strange feeling of her moving walls rushes through me.@
>The waving motions of her oviduct make it seem like it had a will of its own.\
name $name
>Hahaha... The waving motion feels good, doesn't it?@
>I'll keep doing that, and make you release your semen.\
>But that won't be the only stimulation...\
name ""
name "Luka"
>Ahh... My tip... Something's coiling...@
>Ahhh!\
name ""
>The tiny hair-like things I saw early are rubbing and coiling around my glans.@
>They rub against my back muscle and under my neck, making my body spasm in ecstasy.\
>I can't endure much more of this...\
name $name
>Making children with angels is amazing, isn't it?@
>Now I'll have you ejaculate into my oviduct...\
name ""
name "Luka"
>Ah...\
name ""
>Making children with an angel...@> It sounds too normal for this horrifying mating.@
>If I lose to the pleasure and come, I don't even know what horrifying being I'll be creating.\
name "Luka"
>Ahh... It feels too good...@
>I'm going to come...\
name ""
name $name
>Good... There's no reason to hold back.@
>Just release your semen into my oviduct.\
>Now just give in to your instinct, and inseminate me...\
name ""
name "Luka"
>Ahh... N...No...\
name ""
>Despite my rejection, my body gives in.@
>Relaxing, my body rejoices in the pleasure of a man.\
gosub *syasei1
lsp 700,":a;chara\muzukiel_hb2.bmp",0,0
gosub *syasei2
>My semen explodes into her oviduct.@
>At last, I couldn't take it any longer, and inseminated her...\
name "Luka"
>Haaa...\
name ""
mov %hseanwave,13:hseanwave
>At the same time as my ejaculation, her oviduct squeezes down on me.@
>All during my ejaculation, the waves of her walls rub against me, encouraging even more semen out of me.\
>Like this, every drop of my semen is brought out into her oviduct.@
>Feeling like she sucked everything out of me, I sigh in pleasure.\
>But even with that, she doesn't release me from her oviduct...\
name $name
>Hehe... I was able to suck out lots of your semen.@
>With that, lots of happy little female insect daughters will be born.\
>But I don't have nearly enough.@
>I need enough to seed all of the insects of the new world, after all...\
name ""
name "Luka"
>Ahh...\
name ""
>Her walls start their waving motion again, rubbing and massaging my penis.@
>It feels more like a milking motion, trying to milk out all of my seed...\
name $name
>It's not over yet...@
>I'll squeeze out all of your semen with my oviduct...\
name ""
name "Luka"
>Ah... Haaa...\
name ""
>After my first ejaculation, I lost all of my mental ability to resist.@
>Overcome, I give myself over to indulging in mating with her oviduct.\
>More... I want to come inside of her oviduct more.@
>Prompted by the instinct to inseminate, I start pitifully shaking my waist.\
name $name
>Oh dear, look at you shaking your hips like that...@
>That's what you do when you have sex with humans.\
>When you're mating with an oviduct, that really doesn't work...@
>But I understand your desires well, hehe.\
name ""
name "Luka"
>Ahh... It feels good...@
>I'm coming again...\
name ""
>Unable to stop myself, my waist keeps shaking as I approach another climax.@
>Once my heart succumbed to her, it was only a few seconds until my next ejaculation.\
>The desire to come and sate my sexual desire takes over.\
gosub *syasei1
lsp 700,":a;chara\muzukiel_hb3.bmp",0,0
gosub *syasei2
>Able to surrender and come with everything I have, my semen explodes into her dripping wet oviduct.\
>Just like before, her waving walls squeeze out every drop of my semen, letting me taste the pleasure the whole time.\
name $name
>Hehehe... Lots of semen.@
>But we need to make lots of daughters, so I need far more...\
name ""
name "Luka"
>Ah... ahh...\
name ""
>The mating continues on as I indulge in ecstasy.@
>In reward for my semen, I get to taste this endless pleasure of her oviduct.\
>Even if I wanted to, I wouldn't have been able to endure it anyway...\
gosub *syasei1
lsp 700,":a;chara\muzukiel_hb4.bmp",0,0
gosub *syasei2
name "Luka"
>Ah...\
name ""
>I've already completely become a tool for her reproduction use...@
>All I can do now is continue spitting out semen as a stud.\
name $name
>Hehe... I still need more.@
>Converting the amount of semen into orgasms, I need about 5,000 more.\
>Even after that is done, I'll need far more to continue leading the evolutionary process.@
>Thus this mating will likely continue for the rest of time...\
name "Luka"
>Ahh...\
name ""
>This mating will continue for an eternity...@
>Mating with her oviduct, and having my semen continually squeezed out for her use.\
>Drowning in the pleasures of mating with an angel, I feel almost happy.@
>Thus I'm kept alive as her tool for breeding...\
mov %hseanwave,0:hseanwave
gosub *anten
>The daughters that I fertilized will be released to the new world.@
>And even after that, my semen will continue to be squeezed out and used as raw materials to make more insects...\
>..........\
goto *badend



*mermaid_start

mov $name,"Mermaid"
mov $name2,"Mermaid"
mov $lavel,"mermaid"
mov $tatie1,"mermaid_st01"
mov $tatie2,"mermaid_st02"
mov $tatie3,"mermaid_st03"
mov $tatie4,"mermaid_st02"
mov $haikei,"bg037"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,16000
if %nanido=2 mov %max_enemylife,19000
if %nanido=3 mov %max_enemylife,22000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,1
mov %alice_skill1,130
mov %alice_skill2,100
mov %alice_skill3,100
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $half_s1,"Well? How are a Mermaid's skills?"
mov $half_s2,"I'll go a little easier on you if you surrender..."
mov $kiki_s1,"Already about to ejaculate?"
mov $kiki_s2,"Human men really are so easy..."
mov %end_n,11
mov %exp_minus,0
mov %zmonster_x,-350
mov %tukix,300
mov %owaza_count2a,4
mov %owaza_count3a,7
name "Luka"
>Wait, listen to me!@
>The discrimination against Mermaids is already...\
name ""
name $name
>Stop talking!@
>It's your human's nature to flap your mouth and say whatever you can to save yourself.\
>I'll shut you up!@
>You'll be gasping in pleasure, unable to go against us Mermaids ever again!\
>Go mad in the embrace of a Mermaid!\
name ""
name "Luka"
>Guh...\
name ""
>She's not willing to listen to me...@
>It looks like there's no choice but to fight!\
mov %sinkou,1
goto *common_main



*mermaid_v

gosub *face3
name $name
>Guh... I can't fall... Until I clear the regrets of the Queen...\
name ""
name "Luka"
>The Queen's regrets...?@>What do you mean?\
name ""
name $name
>The tragic Laura from the legends...@
>She's the current Mermaid Queen...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Mermaid is sealed in the form of a fish!\
mov %viclose,1:gosub *victory
mov %getexp,150000:gosub *lvup
mov %2367,1
goto *sean0329



*mermaid_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>You can't hold yourself back any more?@
>I'll give you a full taste of a Mermaid's skills!\
name ""
goto *mermaid_a



*mermaid_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *mermaid_kousan
if %cmd1=16 goto *mermaid_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *mermaid_main



*mermaid_yuwaku_a

rnd2 %ransu,1,2
if %ransu=1 gosub *mermaid_yuwaku_a1:goto *common_main
if %ransu=2 gosub *mermaid_yuwaku_a2:goto *common_main



*mermaid_yuwaku_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Ahh... B...Breasts..."
if %ransu=2 mov $sel1,"Boobs... So soft..."
if %ransu=3 mov $sel1,"Haaaa..."
name "Luka"
eng $sel1:$sel6\
name ""
>Luka clings to the Mermaid's body and pushes his penis between her breasts!
if %nanido<2 damage 200,230
if %nanido=2 damage 230,260
if %nanido=3 damage 260,290
if %mylife=0 sub %stack,1:return *mermaid_h2
sub %stack,1
goto *mermaid_a2



*mermaid_yuwaku_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Lick my penis..."
if %ransu=2 mov $sel1,"S...Such soft lips..."
if %ransu=3 mov $sel1,"S...Suck it..."
name "Luka"
eng $sel1:$sel6\
name ""
>Luka presses his penis against the Mermaid's lips!
if %nanido<2 damage 200,230
if %nanido=2 damage 230,260
if %nanido=3 damage 260,290
if %mylife=0 sub %stack,1:return *mermaid_h1
sub %stack,1
goto *mermaid_a1



*mermaid_a

rnd2 %ransu,1,8
if %ransu=1 gosub *mermaid_a1:goto *common_main
if %ransu=2 gosub *mermaid_a2:goto *common_main
if %ransu=3 gosub *mermaid_a3:goto *common_main
if %ransu=4 gosub *mermaid_a4:goto *common_main
if %ransu=5 gosub *mermaid_a5:goto *common_main
if %ransu>5 && %enemy_aqua>0 && %owaza_count2a>5 gosub *mermaid_a6:goto *common_main
if %ransu>5 && %enemy_aqua=0 && %owaza_count3a>8 gosub *mermaid_el3:goto *common_main
skip -8



*mermaid_el3

add %stack,1
mov %owaza_count3a,0
name $name
>Come, Grandine!\
name ""
skillname "Summon Water Spirit"
mov %enemy_aqua,3
mov %damage_keigen_el,70
dwave 2,"se\aqua2.ogg"
lsp2 0,":a;chara\grandine_st01.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *enemy_elm_print
>The Mermaid summons a spirit of water!\
skillname ""
sub %stack,1
return



*mermaid_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I am fairly confident in my oral skills..."
if %ransu=2 mov $sel1,"Any man will finish instantly with my technique..."
if %ransu=3 mov $sel1,"Nnn... I'll make you finish in my mouth."
name $name
eng $sel1:$sel6\
name ""
skillname "Mermaid Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>The Mermaid slips Luka's penis into her mouth, and sucks hard on him!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3786
if %nanido<2 damage 300,330
if %nanido=2 damage 315,345
if %nanido=3 damage 330,360
if %enemy_aqua=0 skip 6
dwave 1,"se\ero_slime1.ogg"
>Sticky liquid from the spirit swirls around in her mouth around the glans of Luka's penis!
if %nanido<2 damage 300,330
if %nanido=2 damage 315,345
if %nanido=3 damage 330,360
skillname ""
if %mylife=0 sub %stack,1:return *mermaid_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*mermaid_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You want to get a good taste of these breasts, don't you?"
if %ransu=2 mov $sel1,"I'd like you to cover these breasts in your semen..."
if %ransu=3 mov $sel1,"The sensation between my breasts is amazing."
name $name
eng $sel1:$sel6\
name ""
skillname "Mermaid Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>The Mermaid sandwiches Luka's penis between her breasts, and squeezes down on him!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3787
if %nanido<2 damage 310,320
if %nanido=2 damage 325,335
if %nanido=3 damage 340,350
if %enemy_aqua=0 skip 6
dwave 1,"se\ero_slime1.ogg"
>Sticky liquid from the spirit swirls around the tip of Luka's exposed penis!
if %nanido<2 damage 310,320
if %nanido=2 damage 325,335
if %nanido=3 damage 340,350
skillname ""
if %mylife=0 sub %stack,1:return *mermaid_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*mermaid_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Shall I play with you with my hair?"
if %ransu=2 mov $sel1,"I can even move my hair freely..."
if %ransu=3 mov $sel1,"A Mermaid's hair is amazingly soft..."
name $name
eng $sel1:$sel6\
name ""
skillname "Mermaid Hair"
dwave 1,"se\umaru.ogg"
>The Mermaid's hair coils around Luka's penis, rubbing against him!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3788
if %nanido<2 damage 310,320
if %nanido=2 damage 325,335
if %nanido=3 damage 340,350
if %enemy_aqua=0 skip 6
dwave 1,"se\ero_slime1.ogg"
>At the same time, sticky liquid from the spirit rubs around the neck of Luka's penis!
if %nanido<2 damage 310,320
if %nanido=2 damage 325,335
if %nanido=3 damage 340,350
skillname ""
if %mylife=0 sub %stack,1:return *mermaid_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*mermaid_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My slippery tail feels surprisingly good, doesn't it?"
if %ransu=2 mov $sel1,"Since I'm a Mermaid, I can control my tail with great skill..."
if %ransu=3 mov $sel1,"Don't human men dream of this sort of thing?"
name $name
eng $sel1:$sel6\
name ""
skillname "Mermaid Tail"
dwave 1,"se\ero_koki1.ogg"
>The Mermaid uses her tail to stroke Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3789
if %nanido<2 damage 300,320
if %nanido=2 damage 315,335
if %nanido=3 damage 330,350
if %enemy_aqua=0 skip 6
dwave 1,"se\ero_slime1.ogg"
>The slimy liquid from her tail covers Luka's penis, stimulating him!
if %nanido<2 damage 300,320
if %nanido=2 damage 315,335
if %nanido=3 damage 330,350
skillname ""
if %mylife=0 sub %stack,1:return *mermaid_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*mermaid_a5

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"This water magic will feel amazing..."
if %ransu=2 mov $sel1,"My water magic feels far better than any slime..."
if %ransu=3 mov $sel1,"This is magic to force any man to orgasm."
name $name
eng $sel1:$sel6\
name ""
skillname "Gel Blow"
dwave 1,"se\ero_slime2.ogg"
>A mass of sticky liquid forms around Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3790
if %nanido<2 damage 200,220
if %nanido=2 damage 210,230
if %nanido=3 damage 220,240
dwave 1,"se\ero_slime1.ogg"
>The mass of sticky liquid solidifies around Luka's penis, quickly increasing the tightness!
if %nanido<2 damage 200,220
if %nanido=2 damage 210,230
if %nanido=3 damage 220,240
dwave 1,"se\ero_slime3.ogg"
>The sticky liquid starts to knead and massage the tip of Luka's penis!
if %nanido<2 damage 200,220
if %nanido=2 damage 210,230
if %nanido=3 damage 220,240
if %enemy_aqua=0 skip 11
dwave 1,"se\ero_slime3.ogg"
>The mass of sticky liquid starts to all vibrate at once!
if %nanido<2 damage 200,220
if %nanido=2 damage 210,230
if %nanido=3 damage 220,240
dwave 1,"se\ero_slime3.ogg"
>The mass of sticky liquid starts to rotate around Luka's penis!
if %nanido<2 damage 200,220
if %nanido=2 damage 210,230
if %nanido=3 damage 220,240
skillname ""
if %mylife=0 sub %stack,1:return *mermaid_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*mermaid_a6

add %stack,1
mov %owaza_count2a,0
name $name
>I'll make you my slave with my song...\
name ""
skillname "Song of the Mermaid"
eng "The Mermaid sings a song!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka manages to cover his ears in time!":gosub *wind_guard:sub %stack,1:return
\
>The captivating melody disturbs Luka's mind...@
skillcount3 3791
mov %status,5:gosub *status_print
>Luka has been charmed by the Mermaid!\
skillname ""
name "Luka"
>Haa... What... Is this...?\
name ""
name $name
>Hehe... You want me more than anything, don't you?@
>Go ahead... I'll let you use my body as you please.\
name ""
mov %status_turn,2
if %nanido=2 rnd2 %status_turn,2,3
if %nanido=3 rnd2 %status_turn,3,4
sub %stack,1
return



*mermaid_onedari

mov $list1,"Mermaid Blowjob"
if %3786>0 mov %list_num1,1
mov $list2,"Mermaid Tit Fuck"
if %3787>0 mov %list_num2,1
mov $list3,"Mermaid Hair"
if %3788>0 mov %list_num3,1
mov $list4,"Mermaid Tail"
if %3789>0 mov %list_num4,1
mov $list5,"Gel Blow"
if %3790>0 mov %list_num5,1
mov $list6,"Song of the Mermaid"
if %3791>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *mermaid_onedari1
if %cmd1=12 goto *mermaid_onedari2
if %cmd1=13 goto *mermaid_onedari3
if %cmd1=14 goto *mermaid_onedari4
if %cmd1=15 goto *mermaid_onedari5
if %cmd1=16 goto *mermaid_onedari6
if %cmd1=-1 goto *mermaid_main
goto *mermaid_onedari



*mermaid_onedari1

gosub *onedari_syori
name $name
>You want to come in my mouth?@
>Very well, I'll make you fill my mouth up...\
name ""
gosub *mermaid_el3
gosub *mermaid_a1
skip -1



*mermaid_onedari2

gosub *onedari_syori
name $name
>You want to come on my breasts?@
>Very well, I'll make you cover my breasts...\
name ""
gosub *mermaid_el3
gosub *mermaid_a2
skip -1



*mermaid_onedari3

gosub *onedari_syori
name $name
>You want to come on my hair?@
>Very well, I'll make you cover my head...\
name ""
gosub *mermaid_el3
gosub *mermaid_a3
skip -1



*mermaid_onedari4

gosub *onedari_syori
name $name
>You want to come on my tail?@
>Very well, I'll make you cover my tail...\
name ""
gosub *mermaid_el3
gosub *mermaid_a4
skip -1



*mermaid_onedari5

gosub *onedari_syori
name $name
>You want me to make you come with my water magic?@
>Very well, I'll make you finish in a sticky mass of liquid...\
name ""
gosub *mermaid_el3
gosub *mermaid_a5
skip -1



*mermaid_onedari6

gosub *onedari_syori
name $name
>You want to be robbed of body and mind with my song?@
>Then I'll take your heart...\
name ""
gosub *mermaid_a6
goto *mermaid_yuwaku_a
skip -1



*mermaid_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\mermaid_bk01.bmp",0,0
gosub *syasei2
>As the Mermaid sucks on his penis, Luka comes, filling her wet mouth with semen.\
mov %viclose,1:gosub *lose
mov %2667,%2667+1:if %2667=1 mov %count_koenemy,%count_koenemy+1
if %2667>%count_most mov %count_most,%2667:mov $count_mostname,$name
count 4,5
mov $bad1,"The Mermaid forced Luka to come with her mouth."
gosub *face2
name $name
>Nnn... Were my oral techniques the best you've ever felt?@
>I'll let you feel them over and over...\
name ""
goto *mermaid_h



*mermaid_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\mermaid_bk03.bmp",0,0
gosub *syasei2
>As the Mermaids soft breasts squeeze down on Luka's penis, he comes, covering her chest in semen.\
mov %viclose,1:gosub *lose
mov %2667,%2667+1:if %2667=1 mov %count_koenemy,%count_koenemy+1
if %2667>%count_most mov %count_most,%2667:mov $count_mostname,$name
count 7,5
mov $bad1,"The Mermaid used her breasts to force Luka to come."
gosub *face2
name $name
>Were my breasts the best thing you've ever felt?@
>I'll let you feel them over and over...\
name ""
goto *mermaid_h



*mermaid_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\mermaid_bk02.bmp",0,0
gosub *syasei2
>As the Mermaid's soft hair rubs and winds around Luka's penis, he comes, covering her hair with semen.\
mov %viclose,1:gosub *lose
mov %2667,%2667+1:if %2667=1 mov %count_koenemy,%count_koenemy+1
if %2667>%count_most mov %count_most,%2667:mov $count_mostname,$name
count 22,5
mov $bad1,"The Mermaid forced Luka to come with her hair."
gosub *face2
>Hehe... Was my hair the best thing you've ever felt?@
>I'll let you feel it over and over...\
name ""
goto *mermaid_h



*mermaid_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 696,":a;chara\mermaid_bk06.bmp",0,0
gosub *syasei2
>As the Mermaid's slimy tail strokes Luka's penis, he comes, covering her tail with semen.\
mov %viclose,1:gosub *lose
mov %2667,%2667+1:if %2667=1 mov %count_koenemy,%count_koenemy+1
if %2667>%count_most mov %count_most,%2667:mov $count_mostname,$name
count 19,5
mov $bad1,"The Mermaid forced Luka to come with her tail."
gosub *face2
name $name
>Hehe... Was my tail the best thing you've ever felt?@
>I'll let you feel them over and over...\
name ""
goto *mermaid_h



*mermaid_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 697,":a;chara\mermaid_bk07.bmp",0,0
gosub *syasei2
>As the strange sticky liquid rubs and vibrates around Luka's penis, he comes, filling the tiny glob of liquid with semen.\
mov %viclose,1:gosub *lose
mov %2667,%2667+1:if %2667=1 mov %count_koenemy,%count_koenemy+1
if %2667>%count_most mov %count_most,%2667:mov $count_mostname,$name
count 11,5
mov $bad1,"The Mermaid forced Luka to come with her water magic skills."
gosub *face2
name $name
>Hehe... Were my water magic skills the best thing you've ever felt?@
>I'll let you feel them over and over...\
name ""
goto *mermaid_h



*mermaid_h

mov $bad2,"Captured by the Mermaid, he was played with for the rest of his life..."
if %2667=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahhh...\
name ""
>Losing all of my strength, I fall to the ground.@
>The Mermaid approaches me, and places her hand on her breasts.\
name $name
>Now then, I'll squeeze you with these breasts.@
>I'll sandwich your penis between them, and make you feel good.\
name ""
name "Luka"
>S...Stop!@
>Ahhh!\
name ""
mov %hseanvoice,3:hseanvoice
cspl 690,699
lsp 700,":a;chara\mermaid_h1.bmp",0,0:print 10,500
>The Mermaid leans over me, and presses her huge breasts around my penis.@
>Her soft flesh presses against mine, filling me with the sensation of her warmth.\
>It's a dreamlike feeling of pressure...@
>Forgetting to struggle, I almost give myself over to the sensation instantly.\
name $name
>Haha, it's soft, isn't it?@
>No man can resist covering these breasts with their semen.\
>I'll squeeze your semen completely dry with these breasts.@
>While you're screaming and moaning... Hehe.\
name ""
name "Luka"
>Ahh...\
name ""
>Just the feeling of being between her breasts leaves me in agonized pleasure.@
>Her giant breasts press together on their own, squeezing my penis without her even doing anything.\
>And the feeling of her wet, smooth skin...@
>I feel like I could just melt away in bliss between her breasts.\
name $name
>It feels good, doesn't it?@
>Enjoy these breasts to your heart's content...\
name ""
name "Luka"
>Haaa...\
name ""
>A drop of pre come slips out of the tip of my penis, just barely poking through her cleavage.@
>Feeling so good, it already came out before she even did anything.\
name $name
>Oh, your juice is already coming out...@
>How disgraceful.\
name ""
>Suddenly, she sticks out her tongue and licks my tip.@
>Her slightly slimy tongue sends shocks through my body as it touches my sensitive tip.\
>Gently using the tip of her tongue, she pokes and licks up my pre come right from my urethral opening.\
name "Luka"
>Ah...!@> Coming...!\
name ""
name $name
>Eh...?@> Already...?\
name ""
gosub *syasei1
lsp 700,":a;chara\mermaid_h2.bmp",0,0
gosub *syasei2
>Along with the feeling of release, my semen spurts out onto her.@
>But with her breasts pressing so hard against my penis and balls, only a little bit shoots out.\
>Some semen drips off her huge breasts, as a look of surprise is fixed on her face.@
>Feeling more like an accidental ejaculation, my face goes bright red in embarrassment.\
name $name
>Pppff... Hahahahaha!\
name ""
>Looking at my small stains of semen on her huge breasts, she starts laughing.@
>After getting hold of herself, she looks down at me and sneers.\
name $name
>Hahaha... You came just from me licking your tip for a second?@
>I haven't even done anything yet...\
>I heard rumors that the Monster Lord had her sights on you, so I was wondering what kind of crazy man you were...@
>But to think you were so pathetic, and a premature ejaculator! Hahaha!\
name ""
>As she openly ridicules me, I try to shrink back in shame.@
>But after laughing for a moment, she grabs hold of her breasts and starts pushing them together.\
>Pressing her breasts together, the pressure between her breasts slowly gets more and more intense.\
name $name
>As punishment for disappointing me so badly...@> I'll play with you.@
>Shall I force you to finish over and over between these breasts?\
name ""
name "Luka"
>N...No don't... Ahhh!\
name ""
>Cutting off my protest, she squeezes her breasts hard down again.@
>At the same time, she sticks her tongue down onto my glans.\
name $name
>You may be a premature ejaculator, but your taste is amazing...@
>I'm sure the Monster Lord loved this flavor too.\
name ""
name "Luka"
>Ahhh...!\
name ""
>Her tongue crawls all over the tip of my penis, licking up the semen from my ejaculation.\
>My waist shakes in pleasure as her quick, wet tongue greedily laps up everything I shot out.\
name $name
>Oh dear, you're flopping around like a fish out of water...@
>You just keep on getting more and more pathetic, don't you?\
name ""
>The Mermaid leans over more on me, pressing her breasts down hard against my groin.@
>With her weight on me, I can't even move my waist anymore.\
name "Luka"
>Ahh...!\
name ""
name $name
>I said I was going to squeeze you dry with these breasts...@
>Now let me finish you off.\
name ""
>She starts using her hands to lift and lower her breasts, rubbing my penis between them...@
>But it isn't a continuous movement, she keeps changing the speed and force of each breast at random.\
>At times she moves them in opposite directions, or presses one as she only moves the other...@
>At the ever-changing stimulation, I'm quickly gasping in pleasure.\
name "Luka"
>Haaa... S...So good...\
name ""
>Caught between her huge breasts, I can't do anything as she teases me.@
>As the pleasure builds up, the ache from my lower body quickly spreads to the rest of my body.\
name $name
>Hehe... I can tell that you're about to leak.@
>Now, shall I give the decisive blow?\
>Nnnn... *Lick*\
name ""
>Her tongue, already gently licking my glans, suddenly drastically increases in speed.@
>Running over my urethral opening and licking my most sensitive spots, my body spasms as she forces me over the edge.\
name "Luka"
>Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\mermaid_h3.bmp",0,0
gosub *syasei2
>My penis twitches between her breasts as I come.@
>But even during my orgasm, her wet tongue doesn't stop licking my tip for a moment.\
name "Luka"
>Aiiie! I...I'm coming so...@
>Ahhhhnnn!\
name ""
name $name
>Nnnn... *Lick* *Lick*\
name ""
mov %hseanvoice,4:hseanvoice
>The tip of her tongue keeps quickly licking my urethral opening, all during my orgasm.@
>At the same time, she keeps rubbing her breasts against my shaft, as if assisting with the ejaculation itself.\
>My body spasms in unbearable pleasure as the stimulations are only heightened by the orgasm.@
>Forced to excessive ecstasy, my thoughts are completely blank as I'm unable to focus on anything but the pleasure.\
name "Luka"
>Ha... Ah...\
name ""
>With my ejaculation finally finished, the storm of pleasure slowly fades.\
>Totally weakened, my body only manages to twitch every couple seconds like an almost dead fish.\
name $name
>Oh dear, how pitiful...@
>I didn't think you would give up after just that.\
>I'm still not even close to done, either.@
>I'm not stopping until those balls of yours are empty.\
name ""
name "Luka"
>S...Stop... Please...@
>Hya!\
name ""
>But ignoring me, the violation continues.\
>Her soft breasts press against me as she uses them to massage my shaft.@
>At the same time, her quick tongue laps up every drop of pre come that leaks out.\
name $name
>I'll make you come again!\
name ""
name "Luka"
>Ahh... Ahh!\
name ""
gosub *syasei1
lsp 700,":a;chara\mermaid_h4.bmp",0,0
gosub *syasei2
>With pleasure that is melting away my heart itself, I come again.@
>Staring at me during my orgasm, the Mermaid just laughs.\
name $name
>Oh my, just look at you leaking all over the place.@
>But you still have more left... I have to squeeze you till the last drop.\
name ""
name "Luka"
>Aiiiee!\
name ""
>She keeps massaging my penis between her huge breasts, and uses her tongue to coax out another orgasm with no effort.\
name "Luka"
>Hya... S...Stop already...\
name ""
gosub *syasei1:gosub *syasei2
>But even as I reach another orgasm, she doesn't stop for a moment.@
>Just like she said, she's going to keep doing this until nothing more comes out.\
name $name
>Come on, you can still come more, can't you?@
>There's no reason to hold back, so just give in and come!\
name ""
>Crushing my penis between her large breasts, she moves them up and down in alternate motions.@
>At the same time, her wet tongue greedily devours the semen from my last ejaculation off the tip of my penis.\
name "Luka"
>Stop... Ahhh...\
name ""
gosub *syasei1:gosub *syasei2
name $name
>I'll squeeze your semen dry between my breasts like this...@
>Hehe, aren't you happy?\
name ""
>The tip of her tongue traces a line from my back muscle to my urethral opening.@
>At the same time, my sensitive penis sinks into her soft, wet breasts.\
name "Luka"
>Haa...\
name ""
gosub *syasei1:gosub *syasei2
>Despite orgasm after orgasm, this ejaculation hell continued on...@
>Until nothing is left, she kept going.\
>Until finally, my penis twitches and spasmed, but nothing came out.@
>Just like she said, she squeezed me completely dry.\
name "Luka"
>Ah...ahh...\
name ""
>The Mermaid lets out a sadistic laugh as she looks down at me, completely helpless beneath her.\
name $name
>Hahaha... You're completely empty I see.@
>You should thank me for not taking your life.\
>From now on, you're my slave.@>It wouldn't be as amusing to just squeeze you to death, after all.\
name ""
name "Luka"
>N...No... Ah...\
name ""
>From now on, I'm this Mermaid's sex slave.@
>With my semen completely drained and my body completely helpless, I have no right to say no.\
>Thus I became her simple toy, squeezed dry every single day.@
>My adventure ends here, and my humiliating days continue on...\
mov %hseanvoice,0:hseanvoice
gosub *anten
>............\
goto *badend



*g_mermaid_start

mov $name,"Mermaid General"
mov $name2,"Mermaid General"
mov $lavel,"g_mermaid"
mov $tatie1,"g_mermaid_st01"
mov $tatie2,"g_mermaid_st02"
mov $tatie3,"g_mermaid_st03"
mov $tatie4,"g_mermaid_st02"
mov $haikei,"bg125"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,18000
if %nanido=2 mov %max_enemylife,21000
if %nanido=3 mov %max_enemylife,24000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,1
mov %alice_skill1,120
mov %alice_skill2,100
mov %alice_skill3,100
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free of the Mermaid General!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Did you think that would be enough to break free...?"
mov $mogaku_sel2,"Struggling is pointless... Prepare yourself!"
mov $mogaku_sel3,"Did you think that would be enough to break free...?"
mov $mogaku_sel4,"Struggling is pointless... Prepare yourself!"
mov $mogaku_sel5,"Did you think that would be enough to break free...?"
mov $mogaku_dassyutu1,"You escaped from my restraint...?"
mov $mogaku_dassyutu2,"That's a first from a human..."
mov $half_s1,"Do you realize the power of a Mermaid's techniques?"
mov $half_s2,"I'll make you feel amazing if you surrender now."
mov $kiki_s1,"You're about to come I see..."
mov $kiki_s2,"Surrender to the techniques of a Mermaid..."
mov %end_n,11
mov %exp_minus,150000
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,5
mov %owaza_count2a,5
mov %owaza_count3a,14
name $name
>I am the Mermaid race's most powerful soldier, serving the Queen.@
>I will not forgive anyone who dares defy me.\
name ""
name "Luka"
>Sorry, but I have to beat you down to get to the Queen then!\
name ""
>The Mermaid Queen who hates humans...@
>I won't let her continue attacking the town like this!\
name $name
>...As I feared, you are a dangerous one.@
>I cannot allow you to meet with the Queen.\
>You leave me no choice...@>I'll make you harmless with my sexual skills.\
>I'll leave you so addicted to pleasure, you'll be a complete slave...\
name ""
>The Mermaid General doesn't seem willing to get out of my way...@
>Leaving me no choice, I guess I really will have to fight!\
goto *common_main



*g_mermaid_v

gosub *face3
name $name
>If a human like you meets the Queen...@
>She will only suffer more pain...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Mermaid General is sealed in the form of a fish!\
mov %viclose,1:gosub *victory
mov %getexp,170000:gosub *lvup
mov %2368,1
goto *sean0330



*g_mermaid_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Hmph, you seem to have resigned yourself.@
>But I won't stop until you're completely helpless.\
name ""
goto *g_mermaid_a



*g_mermaid_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *g_mermaid_kousan
if %cmd1=16 goto *g_mermaid_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *g_mermaid_main



*g_mermaid_a

if %kousoku=1 gosub *g_mermaid_a7:goto *common_main
rnd2 %ransu,1,10
if %ransu=1 gosub *g_mermaid_a1:goto *common_main
if %ransu=2 gosub *g_mermaid_a2:goto *common_main
if %ransu=3 gosub *g_mermaid_a3:goto *common_main
if %ransu=4 gosub *g_mermaid_a4:goto *common_main
if %ransu<7 && %owaza_count2a>6 && %status=0 && %enemy_aqua=0 gosub *g_mermaid_a5:goto *common_main
if %ransu>6 && %ransu<9 && %owaza_count1a>6 gosub *g_mermaid_a6:goto *common_main
if %ransu>8 && %owaza_count3a>15 && %enemy_aqua=0 gosub *g_mermaid_el3:goto *common_main
skip -8



*g_mermaid_el3

add %stack,1
mov %owaza_count3a,0
name $name
>Come, Grandine!\
name ""
skillname "Summon Water Spirit"
mov %enemy_aqua,5
mov %damage_keigen_el,70
dwave 2,"se\aqua2.ogg"
lsp2 0,":a;chara\grandine_st01.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *enemy_elm_print
>The Mermaid General summons a water spirit!\
skillname ""
sub %stack,1
return



*g_mermaid_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll be tasting that semen of yours..."
if %ransu=2 mov $sel1,"I'll sip the semen out from your penis."
if %ransu=3 mov $sel1,"I'll suck on it... Just try and endure it."
name $name
eng $sel1:$sel6\
name ""
skillname "General's Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>The Mermaid General slips Luka's penis into her mouth, and coils her tongue around it as she sucks!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3792
if %nanido<2 damage 300,320
if %nanido=2 damage 315,335
if %nanido=3 damage 330,350
if %enemy_aqua=0 skip 6
dwave 1,"se\ero_slime1.ogg"
>The sticky liquid summoned by the spirit swirls around the glans of Luka's penis!
if %nanido<2 damage 300,320
if %nanido=2 damage 315,335
if %nanido=3 damage 330,350
skillname ""
if %mylife=0 sub %stack,1:return *g_mermaid_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*g_mermaid_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll sandwich your cock right here..."
if %ransu=2 mov $sel1,"If you come just from this, you won't make a good toy..."
if %ransu=3 mov $sel1,"Spit out your nasty smelling semen on my chest!"
name $name
eng $sel1:$sel6\
name ""
skillname "General's Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>The Mermaid General sandwiches Luka's penis between her breasts, and strokes him up and down with them!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3793
if %nanido<2 damage 310,320
if %nanido=2 damage 325,335
if %nanido=3 damage 340,350
if %enemy_aqua=0 skip 6
dwave 1,"se\ero_slime1.ogg"
>The sticky liquid sticking to Luka's glans stimulates him at the same time!
if %nanido<2 damage 310,320
if %nanido=2 damage 325,335
if %nanido=3 damage 340,350
skillname ""
if %mylife=0 sub %stack,1:return *g_mermaid_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*g_mermaid_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"A monster as powerful as me can even use hair as a weapon..."
if %ransu=2 mov $sel1,"Can you endure my hair playing with you like this?"
if %ransu=3 mov $sel1,"I'll make you come with my hair!"
name $name
eng $sel1:$sel6\
name ""
skillname "General's Hair"
dwave 1,"se\umaru.ogg"
>The Mermaid General's hair winds around Luka's penis and tightens!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3794
if %nanido<2 damage 320,340
if %nanido=2 damage 335,355
if %nanido=3 damage 350,370
if %enemy_aqua=0 skip 6
dwave 1,"se\ero_slime1.ogg"
>The sticky liquid summoned by the spirit clings to Luka's penis at the same time!
if %nanido<2 damage 330,340
if %nanido=2 damage 335,355
if %nanido=3 damage 350,370
skillname ""
if %mylife=0 sub %stack,1:return *g_mermaid_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*g_mermaid_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Mermaid's can even use this to stimulate cocks."
if %ransu=2 mov $sel1,"Able to get an orgasm from a Mermaid's tail... You must be one happy man."
if %ransu=3 mov $sel1,"This is slimy and soft..."
name $name
eng $sel1:$sel6\
name ""
skillname "General's Tail"
dwave 1,"se\ero_koki1.ogg"
>The Mermaid General's tail strokes Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3795
if %nanido<2 damage 330,350
if %nanido=2 damage 345,365
if %nanido=3 damage 360,380
if %enemy_aqua=0 skip 6
dwave 1,"se\ero_slime1.ogg"
>The sticky slime on her tail rubs against Luka's penis!
if %nanido<2 damage 330,350
if %nanido=2 damage 345,365
if %nanido=3 damage 360,380
skillname ""
if %mylife=0 sub %stack,1:return *g_mermaid_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*g_mermaid_a5

add %stack,1
mov %owaza_count2a,0
name $name
>Taste the power of the Water God's Thunder!\
name ""
skillname "General's Lance"
dwave 1,"se\ikazuti.ogg"
quake 10,1000
eng "A flash of powerful lightning races from the Mermaid General's lance to Luka!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<90 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %status,2:gosub *status_print
>Luka has been paralyzed!\
skillname ""
name "Luka"
>Ah... Urhg...\
name ""
name $name
>Haha, you can't move now can you?@
>I'll deal with you nice and slowly...\
name ""
rnd2 %status_turn,1,2
if %nanido=2 rnd2 %status_turn,1,2
if %nanido=3 rnd2 %status_turn,2,3
sub %stack,1
return



*g_mermaid_a6

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 4
name $name
>Caught you...!\
name ""
skillname "General's Hold"
eng "The Mermaid General's tail winds around Luka's waist!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>Luka has been bound by the Mermaid General!\
skillname ""
name $name
if %first_sel1=1 skip 3
>Now I'm going to rape you.@
skip 2
>This time I'll rape you.@
>I'll rape your pathetic self, and wring your semen out with my Mermaid pussy.\
name ""
mov %first_sel1,1
mov %genmogaku,0
sub %stack,1
return



*g_mermaid_a7

add %stack,1
>Luka has been bound by the Mermaid General...\
name $name
>Now I'll rape you.@
>Blow your load in my Mermaid pussy!\
name ""
skillname "General's Rape"
dwave 1,"se\ero_pyu1.ogg"
mov $tatie4,"g_mermaid_hb1"
lsp 700,":a;chara\g_mermaid_hb1.bmp",0,0
lsp 690,":a;chara\g_mermaid_ct01.bmp",0,0:print 10,500
>Luka's penis sinks into the Mermaid General's vagina!
mov %kousoku,2:gosub *status_print
skillcount3 3796
mov %damage_kotei,1
damage 350,370
skillname ""
>Luka is being raped by the Mermaid General!\
skillname ""
if %mylife=0 sub %stack,1:return *g_mermaid_h5
name "Luka"
>Ahhh!\
name ""
>My penis sinks deep into her warm, slimy vagina...@
>The small folds deep inside rub hard against my tip.\
sub %stack,1
goto *g_mermaid_a8



*g_mermaid_a8

add %stack,1
>Luka is being raped by the Mermaid General...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Ahaha... How does it feel being raped by a Mermaid?":mov $sel2,"The Mermaid General violently moves her waist!"
if %ransu=2 mov $sel1,"Get yourself drunk on my technique!":mov $sel2,"Pounding Luka like a piston, the Mermaid General rides Luka hard!"
if %ransu=3 mov $sel1,"How does Mermaid pussy taste!?":mov $sel2,"The tip of Luka's penis rubs against the deepest part of the Mermaid General's vagina!"
if %ransu=4 mov $sel1,"I'll squeeze out your semen with my Mermaid pussy!":mov $sel2,"The Mermaid General squeezes her vagina as tight as she can!"
if %ransu=5 mov $sel1,"Come inside my Mermaid pussy!":mov $sel2,"The Mermaid General grinds against Luka, making his penis rub against her walls!"
name $name
eng $sel1:$sel6\
name ""
skillname "General's Rape"
dwave 1,"se\ero_chupa4.ogg"
eng $sel2:$sel6
skillcount3 3796
mov %damage_kotei,1
damage 350,370
skillname ""
if %mylife=0 sub %stack,1:return *g_mermaid_h6
sub %stack,1
goto *g_mermaid_a8



*g_mermaid_onedari

mov $list1,"General's Blowjob"
if %3792>0 mov %list_num1,1
mov $list2,"General's Tit Fuck"
if %3793>0 mov %list_num2,1
mov $list3,"General's Hair"
if %3794>0 mov %list_num3,1
mov $list4,"General's Tail"
if %3795>0 mov %list_num4,1
mov $list5,"General's Rape"
if %3796>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *g_mermaid_onedari1
if %cmd1=12 goto *g_mermaid_onedari2
if %cmd1=13 goto *g_mermaid_onedari3
if %cmd1=14 goto *g_mermaid_onedari4
if %cmd1=15 goto *g_mermaid_onedari5
if %cmd1=-1 goto *g_mermaid_main
goto *g_mermaid_onedari



*g_mermaid_onedari1

gosub *onedari_syori
name $name
>You want me to use my mouth?@
>Then I'll force you to a pathetic finish...\
name ""
gosub *g_mermaid_el3
gosub *g_mermaid_a1
skip -1



*g_mermaid_onedari2

gosub *onedari_syori
name $name
>You want me to use my breasts?@
>Then I'll force you to a pathetic finish...\
name ""
gosub *g_mermaid_el3
gosub *g_mermaid_a2
skip -1



*g_mermaid_onedari3

gosub *onedari_syori
name $name
>You want me to use my hair?@
>Then I'll force you to a pathetic finish...\
name ""
gosub *g_mermaid_el3
gosub *g_mermaid_a3
skip -1



*g_mermaid_onedari4

gosub *onedari_syori
name $name
>You want me to use my tail?@
>Then I'll force you to a pathetic finish...\
name ""
gosub *g_mermaid_el3
gosub *g_mermaid_a4
skip -1



*g_mermaid_onedari5

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want me to rape you...?@
>Then I'll force you to a pathetic finish...\
name ""
if %kousoku=0 gosub *g_mermaid_a6
gosub *g_mermaid_a7
skip -1



*g_mermaid_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\g_mermaid_bk01.bmp",0,0
gosub *syasei2
>As the Mermaid General's warm mouth sucks on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2668,%2668+1:if %2668=1 mov %count_koenemy,%count_koenemy+1
if %2668>%count_most mov %count_most,%2668:mov $count_mostname,$name
count 4,9
mov $bad1,"The Mermaid General forced Luka to come with her mouth."
gosub *face2
name $name
>Nnn... You filled my mouth with semen in no time.@
>But I need to give you far more pleasure, until you're completely helpless.\
name ""
goto *g_mermaid_ha



*g_mermaid_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\g_mermaid_bk03.bmp",0,0
gosub *syasei2
>As the Mermaid General's soft breasts press against Luka's penis, he comes, covering her chest in semen.\
mov %viclose,1:gosub *lose
mov %2668,%2668+1:if %2668=1 mov %count_koenemy,%count_koenemy+1
if %2668>%count_most mov %count_most,%2668:mov $count_mostname,$name
count 7,9
mov $bad1,"The Mermaid General forced Luka to come with her breasts."
gosub *face2
name $name
>Hmph... You covered my breasts in semen in no time.@
>But I need to give you far more pleasure, until you're completely helpless.\
name ""
goto *g_mermaid_ha



*g_mermaid_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\g_mermaid_bk02.bmp",0,0
gosub *syasei2
>As the Mermaid General's hair winds around Luka's penis, he comes, covering her head with semen.\
mov %viclose,1:gosub *lose
mov %2668,%2668+1:if %2668=1 mov %count_koenemy,%count_koenemy+1
if %2668>%count_most mov %count_most,%2668:mov $count_mostname,$name
count 22,9
mov $bad1,"The Mermaid General forced Luka to come with her hair."
gosub *face2
name $name
>Hmph... You covered my hair in semen in no time.@
>But I need to give you far more pleasure, until you're completely helpless.\
name ""
goto *g_mermaid_ha



*g_mermaid_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\g_mermaid_bk05.bmp",0,0
gosub *syasei2
>As the Mermaid General's tail strokes Luka's penis, he comes, covering her tail with semen.\
mov %viclose,1:gosub *lose
mov %2668,%2668+1:if %2668=1 mov %count_koenemy,%count_koenemy+1
if %2668>%count_most mov %count_most,%2668:mov $count_mostname,$name
count 19,9
mov $bad1,"The Mermaid General forced Luka to come with her tail."
gosub *face2
name $name
>Hmph... You covered my tail in semen in no time.@
>But I need to give you far more pleasure, until you're completely helpless.\
name ""
goto *g_mermaid_ha



*g_mermaid_h5

mov %ikigoe,3:gosub *ikigoe
name $name
>Hmph, how pathetic.@
>Have you no pride as a man?\
name ""
gosub *syasei1
lsp 700,":a;chara\g_mermaid_hb2.bmp",0,0
lsp 690,":a;chara\g_mermaid_ct02.bmp",0,0:print 10,500
gosub *syasei2
>As soon as Luka is forced into the Mermaid General's vagina, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2668,%2668+1:if %2668=1 mov %count_koenemy,%count_koenemy+1
if %2668>%count_most mov %count_most,%2668:mov $count_mostname,$name
count 1,9
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come the moment of insertion."
gosub *face2
name $name
>You couldn't even last five seconds before filling up my pussy with semen.\
>This is the fastest a man has ever finished in me.\
name ""
goto *g_mermaid_hb



*g_mermaid_h6

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\g_mermaid_hb2.bmp",0,0
lsp 690,":a;chara\g_mermaid_ct02.bmp",0,0:print 10,500
gosub *syasei2
>As the Mermaid General raped Luka with her warm Mermaid vagina, Luka comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2668,%2668+1:if %2668=1 mov %count_koenemy,%count_koenemy+1
if %2668>%count_most mov %count_most,%2668:mov $count_mostname,$name
count 1,9
mov $bad1,"The Mermaid General forced Luka to come as she raped him."
gosub *face2
name $name
>Hmph... You sure filled up my pussy with lots of semen.@
>But I need to give you far more pleasure, until you're completely helpless.\
name ""
goto *g_mermaid_hb



*g_mermaid_ha

mov $bad2,"Continually using her breasts to play with Luka, he is kept in a helpless state as a pet."
if %2853=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2853,1
name "Luka"
>Ahh...\
name ""
name $name
>You cannot resist me anymore now.\
>To ensure you never meet the Queen, I shall make you my slave.@
>...Using these.\
name ""
cspl 690,699
lsp 700,":a;chara\g_mermaid_ha1.bmp",0,0:print 10,500
>The Mermaid grabs hold of my waist, and pulls me close to her.@
>Like that, she sandwiches my penis between her breasts.\
name "Luka"
>Ah...!@> Ahh!\
name ""
name $name
>They are soft, aren't they?@
>I'll caress your penis with my breasts.\
>With it between them, I'll slowly increase the pressure...\
name ""
>The Mermaid presses down on her breasts, slowly squeezing my penis between them.@
>My penis sinks deep into her breasts, the softness giving way.\
name "Luka"
>Haa... S...Stop...\
name ""
name $name
>Well?@>Do you still want to go to the Queen, even now?\
name ""
name "Luka"
>Ahh... I...I have to convince her...@
>I have to stop this...\
name ""
name $name
>Hmph, you're still being obstinate?@
>Then how about if I do this...\
name ""
mov %hseanwave,17:hseanwave
>The Mermaid General starts using her hands to move her breasts.\
>Her soft, wet breasts rub hard against my penis between them.@
>The sudden increase in stimulation makes my waist jump up in surprise as I moan.\
name "Luka"
>Ah... Haaa!\
name ""
name $name
>This technique would force any man to cover my breasts in semen in moments...@
>I wonder how long you will last?\
name ""
>Her breasts rub and massage my penis...@>A technique that could surely force anyone to orgasm in moments.\
>The dreamlike pleasure fills my body as her soft breasts rub against me, leaving me to gasp in pleasure.\
name "Luka"
>Haa... It feels so good...\
name ""
name $name
>Heh, already surrendering?@
>Even if your sword techniques are powerful, your penis is weak.\
>Now come between my breasts.@
>I'll squeeze them, and force out your semen.\
name ""
>The Mermaid presses down even harder on her breasts, crushing my penis between them as she moves them up and down!\
name "Luka"
>C...Coming... Ahhh!\
name ""
name $name
>Now for the finishing blow.@
>Become a slave to my breasts!\
name ""
>Pressing mainly on the top of her breasts, the soft wet flesh comes together to squeeze my glans.@
>With my body desiring nothing more than release, my waist pushes up as I go over the edge.\
name "Luka"
>Ahhh...\
name ""
gosub *syasei1
lsp 700,":a;chara\g_mermaid_ha2.bmp",0,0
gosub *syasei2
>I explode, spraying out from between her cleavage.@
>The semen fills the water, spreading out over the area around her breasts.\
>All during my orgasm, the Mermaid kept squeezing my penis with her breasts.@
>Completely entranced by the pleasure, I just bask in the pleasure from the orgasm.\
name $name
>Haha, you let out quite a lot.@
>Do you still want to go to the Queen?\
name ""
name "Luka"
>Ahh... M...More...\
name ""
>The feeling of ejaculation between her breasts is like a drug.@
>After tasting it, I want more of it... I've become a slave to her breasts.\
name $name
>Hehe... Good boy.@
>Then I must reward your penis.\
name ""
name "Luka"
>Haa... Ahhh...\
name ""
>The Mermaid presses on her breasts as hard as she can, giving me a full taste of their soft elasticity.\
>Then while still pressing down, she starts moving her breasts up and down, tossing my penis side to side between her soft breasts.\
name $name
>Boys really love breasts, don't they...?@
>I can even make a famous Hero like you ejaculate in seconds with mine.\
>I thought it would be a lot harder, but I'm glad it was so easy.@
>You're happy too, aren't you?@>Because now you get to feel this...\
name ""
name "Luka"
>Haaa...\
name ""
>While taking her breast techniques, I don't even try to resist.@
>Losing thought of the idea of ever fighting back, I just want to indulge in this pleasure.\
>As her soft breasts rub against me, the desire to ejaculate wells up again.@
>My penis goes numb as the urge to release floods through me.\
name "Luka"
>Ahh... I'm going to come again...\
name ""
name $name
>Haha, it's so easy to control you now.@
>You're pathetic, little Hero.\
>Here, I'll make you come again.@
>Spray out all of your semen between my breasts.\
name ""
>With a chuckle, the Mermaid moves toward finishing me off.@
>Her soft breasts crush my penis between them, making my head go blank in pleasure.\
name "Luka"
>Haaa...\
name ""
gosub *syasei1
lsp 700,":a;chara\g_mermaid_ha3.bmp",0,0
gosub *syasei2
>Still being squeezed between her breasts, I come again.@
>Each spurt of semen is met with a gasp of pleasure from me.\
>All through the water, my semen is gently floating around.@
>The proof of my complete submission to the Mermaid General.\
name $name
>Aha, you leaked again.@
>I can't drink it all, either... I wonder if the fishes will come to try some?\
name ""
name "Luka"
>Ahh...\
name ""
>I melt away in the ecstasy, with my penis still stuck between her breasts.\
name $name
>Hehe, can you only think of my breasts now?@
>But that's fine... I'll take care of you until you die.\
>So keep drowning in my body for ever and ever, so you'll never want to go to the Queen...\
name ""
name "Luka"
>Haaa...\
name ""
>Captured by the Mermaid General, I'll never be freed again.@
>And every day, she completely squeezes me dry with her breasts.\
>While taking care to keep me alive, this will continue for the rest of my life.@
>Unable to think about anything else, I drown in the pleasure from her body...\
mov %hseanwave,0:hseanwave
gosub *anten
>..........\
goto *badend



*g_mermaid_hb

mov $bad2,"Continually raping Luka, the Mermaid General keeps Luka in a helpless state as a pet."
if %2854=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2854,1
if %kousoku>0 mov %hseanwave,2:hseanwave:goto *g_mermaid_hb2
name "Luka"
>Ahhh...\
name ""
>The Mermaid grabs hold of my waist, and pulls me close to her.@
>Her hand reaches down, and grabs hold of my erect penis.\
name $name
>I'll make you my slave, so that you'll never want to go to the Queen again.@
>And I'll squeeze you dry right here...\
name ""
>The Mermaid spreads apart a hole in her abdomen region, clearly used for mating...@
>Pulling me closer to her, she presses the tip of my penis right next to the opening.\
name $name
>Look, your penis is going in...\
name ""
name "Luka"
>Ah...\
name ""
mov %hseanwave,2:hseanwave
cspl 690,699
lsp 690,":a;chara\g_mermaid_ct01.bmp",0,0
lsp 700,":a;chara\g_mermaid_hb1.bmp",0,0:print 10,500
>My penis easily slips into her wet hole.@
>As I'm brought inside, her soft flesh clamps down on me the whole time.\
goto *g_mermaid_hb2



*g_mermaid_hb2

name "Luka"
>Haa...!\
name ""
>The sweet sensation makes a pitiful moan leak out before I can stop myself.@
>Too weak to resist, I can't even stop the Mermaid from raping me...\
name $name
>Oh my, even though you're a boy, that was pitiful...@
>Does my vagina feel so good you can't even stop your moans?\
name ""
>The Mermaid General giggles as she embraces me.\
name $name
>That's right... A Mermaid's lower body is that of a fish.@
>There are lots of muscles there, so we can freely control the tightness and movement of our vaginas.\
>It would be easy to crush something like your penis...\
name ""
name "Luka"
>N...No... Stop...\
name ""
name $name
>Hahaha... Don't worry, I won't crush it.@
>I'll just tighten it some to make it feel better...\
name ""
name "Luka"
>Ahhh...!\
name ""
>I feel the muscles inside of her vagina contract as her walls squeeze down on me.@
>As her wet walls press against my penis, I suddenly feel my penis twitching in a sudden surrender to her.\
name "Luka"
>Ahhh...\
name ""
gosub *syasei1
lsp 690,":a;chara\g_mermaid_ct02.bmp",0,0
lsp 700,":a;chara\g_mermaid_hb2.bmp",0,0
gosub *syasei2
>As my waist trembles, I explode inside of her on accident.@
>Feeling both pleasure and humiliation, my body goes completely weak.\
>After my orgasm finishes, the Mermaid looks down on me with a look of superiority on her face.\
name $name
>Ahaha... I only tightened a little, and you already leaked?@
>What a pitiful penis...\
>Did it feel that good when I just tightened it a little?@
>Come on, hold on a little longer for this next time...\
name ""
name "Luka"
>Ah...!@> Ahhh!\
name ""
>With another squeeze, her vagina clamps down even harder.@
>But despite the incredible pressure, there's no pain...\
>My penis sinks into her wet, warm walls instead, her incredible vagina already bringing me close to another orgasm.\
name "Luka"
>Haaa... It feels good...\
name ""
name $name
>Ahh geez, you're already panting that heavily?@
>Does a Mermaid's pussy feel that good?\
>But you're a boy, aren't you?@>Hold on a little longer!\
name ""
>Despite what she's saying, she doesn't let up squeezing on me for a moment.@
>Instead, she squeezes down on my glans, bringing another scream of pleasure from me.\
name "Luka"
>Ahhh!@
>Stop, don't tighten it any more!\
name ""
>My penis starts to twitch inside of her vagina.@
>Even though I just came a moment ago, I already feel another one coming...\
>A cruel smile forms on the Mermaid's lips as she feels my penis twitching inside of her.\
name $name
>Even though I told you to hold on, you can't do it?@
>Fine... I'll finish you off all at once then!\
name ""
>Squeezing my penis in a wave from the root to the tip, the Mermaid works to finish me off all at once.\
name "Luka"
>No... I can't hold it...!@
>Ahhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\g_mermaid_ct03.bmp",0,0
lsp 700,":a;chara\g_mermaid_hb3.bmp",0,0
gosub *syasei2
>Unable to endure that pleasure for even a moment, I'm brought to another tragic orgasm.@
>My semen pours into her warm vagina as my body spasms.\
>All during it, the Mermaid keeps squeezing her vagina, drawing out every drop of semen into her.\
name "Luka"
>Ahh... Haa...\
name ""
name $name
>Well?@>A Mermaid's vagina is nice and tight, isn't it?@
>You don't want to take it out now, do you?\
>If you're obedient and just stay inside me, I'll keep on squeezing you...\
name ""
name "Luka"
>.........\
name ""
>I don't pull my waist back as the Mermaid rapes me.@
>I want to feel more of this... More of her incredible vagina squeezing me.\
name $name
>...Hehe, good boy.@
>Then as promised, I'll really squeeze you...\
name ""
name "Luka"
>Ahhh...!\
name ""
mov %hseanwave,4:hseanwave
>As a reward, the squeezing motions instantly continue.@
>Pressing and releasing me at random, the pleasure quickly takes over my body again.\
name "Luka"
>Haa... It's so good...@
>Ahhhn!\
name ""
>I'm not able to do anything but cling to the Mermaid General and writhe in pleasure.\
>Keeping my penis inside her amazing vagina, I just entrust everything to her, drowning in ecstasy.\
name $name
>Hehe, you're completely helpless now, aren't you?@
>Then I'll let you come again...\
>Here, you love this tightness, don't you?\
name ""
name "Luka"
>Ahhhh!!\
name ""
>Like a finishing blow, she squeezes down on my glans.@
>Not resisting in the slightest, I rejoice in the orgasm that follows.\
gosub *syasei1
lsp 690,":a;chara\g_mermaid_ct04.bmp",0,0
lsp 700,":a;chara\g_mermaid_hb4.bmp",0,0
gosub *syasei2
>And once again, more of my cloudy semen explodes into her.@
>The tight feeling of her vagina squeezing on me during my orgasm takes me over.\
>I completely submit to her.\
name "Luka"
>Ahh...\
name $name
>Hehe, can you only think of my vagina now?@
>But that's fine... I'll take care of you until you die.\
>So keep drowning in my body for ever and ever, so you'll never want to go to the Queen...\
name ""
name "Luka"
>Haaa...\
name ""
>Captured by the Mermaid General, I'll never be freed again.@
>And every day, she rapes me until I'm completely dry.\
>While taking care to keep me alive, this will continue for the rest of my life.@
>Unable to think about anything else, I drown in the pleasure from her body...\
mov %hseanwave,0:hseanwave
gosub *anten
>..........\
goto *badend



*ningyohime_start

mov $name,"El"
mov $name2,"El"
mov $lavel,"ningyohime"
mov $tatie1,"ningyohime_st05"
mov $tatie2,"ningyohime_st12"
mov $tatie3,"ningyohime_st13"
mov $tatie4,"ningyohime_h1"
mov $haikei,"bg189"
mov %monster_x,0
mov %monster_y,50
if %nanido=1 mov %max_enemylife,15000
if %nanido=2 mov %max_enemylife,18000
if %nanido=3 mov %max_enemylife,21000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,1
mov %alice_skill1,120
mov %alice_skill2,100
mov %alice_skill3,100
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't push El off of him!"
mov $mogaku_anno2,"Luka pushed El off of him!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Ahaha, I won't let you go! "
mov $mogaku_sel2,"No, no, nooo! I won't let you gooo! "
mov $mogaku_sel3,"Ahaha, I won't let you go! "
mov $mogaku_sel4,"No, no, nooo! I won't let you gooo! "
mov $mogaku_sel5,"Ahaha, I won't let you go! "
mov $mogaku_dassyutu1,"Why did you push me off!? Meanie!"
mov $mogaku_dassyutu2,""
mov $half_s1,"Ahaha, does it feel nice?"
mov $half_s2,"I don't mind if you come you know? "
mov $kiki_s1,"Ehehe... Are you going to come soon?"
mov $kiki_s2,"I'm not scared of your penis at all! "
mov %end_n,11
mov %exp_minus,320000
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,5
name "Luka"
>No!@
>I just want to persuade her not to...\
name ""
name $name
>Not listeniiiing!@
dwave 1,"se\escape.ogg"
mov $tatie1,"ningyohime_st11"
gosub *face1
>I'll make you cry with my techniques! \
name ""
>El strips off her bikini and puffs out her small chest with an innocent expression on her face.\
>It looks like a fight is unavoidable...\
mov %sinkou,1
goto *common_main



*ningyohime_v

mov $tatie3,"ningyohime_st19"
gosub *face3
name $name
>Waah... Stop bullying me...\
name ""
>El loses the will to fight...\
mov %viclose,1:gosub *victory
mov %getexp,200000:gosub *lvup
mov %2369,1
goto *sean0331



*ningyohime_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>You want me to make you come?@
>Then I'll make it shoot out! \
name ""
goto *ningyohime_a



*ningyohime_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *ningyohime_kousan
if %cmd1=16 goto *ningyohime_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *ningyohime_main



*ningyohime_a

if %kousoku=1 gosub *ningyohime_a6:goto *common_main
rnd2 %ransu,1,6
if %ransu=1 gosub *ningyohime_a1:goto *common_main
if %ransu=2 gosub *ningyohime_a2:goto *common_main
if %ransu=3 gosub *ningyohime_a3:goto *common_main
if %ransu=4 gosub *ningyohime_a4:goto *common_main
if %ransu>4 && %owaza_count1a>6 gosub *ningyohime_a5:goto *common_main
skip -6



*ningyohime_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Even I can make you come if I use my mouth! "
if %ransu=2 mov $sel1,"I'll cover it in drool!"
if %ransu=3 mov $sel1,"I wanna feel it come in my mouth! "
name $name
eng $sel1:$sel6\
name ""
skillname "Princess' Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>El sucks on Luka's penis with her small mouth!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3797
if %nanido<2 damage 210,230
if %nanido=2 damage 240,260
if %nanido=3 damage 270,290
skillname ""
if %mylife=0 sub %stack,1:return *ningyohime_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*ningyohime_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My boobs might be tiny... But they're soft!"
if %ransu=2 mov $sel1,"I can make you come with my boobs like an adult mermaid! "
if %ransu=3 mov $sel1,"I heard having your boobs covered in semen feels good... "
name $name
eng $sel1:$sel6\
name ""
skillname "Princess' Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>El rubs Luka's penis against her soft, tiny swelling breasts!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3798
if %nanido<2 damage 220,240
if %nanido=2 damage 250,270
if %nanido=3 damage 280,300
skillname ""
if %mylife=0 sub %stack,1:return *ningyohime_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*ningyohime_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Men feel good rubbing against smooth things... Right?"
if %ransu=2 mov $sel1,"I want you to come on my bellybutton... "
if %ransu=3 mov $sel1,"My mommy once took semen into her bellybutton too!"
name $name
eng $sel1:$sel6\
name ""
skillname "Princess' Stomach Rub"
dwave 1,"se\ero_sigoki1.ogg"
>El rubs Luka's penis up and down her soft, smooth stomach!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3799
if %nanido<2 damage 230,250
if %nanido=2 damage 260,280
if %nanido=3 damage 200,310
skillname ""
if %mylife=0 sub %stack,1:return *ningyohime_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*ningyohime_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My mom is really good at getting men to ejaculate with her tail... "
if %ransu=2 mov $sel1,"I'm good at controlling my tail, so your penis will feel really good! "
if %ransu=3 mov $sel1,"Cover my tail with semen! "
name $name
eng $sel1:$sel6\
name ""
skillname "Princess' Tail Rub"
dwave 1,"se\ero_koki1.ogg"
>El lightly rubs her small tail against Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3800
if %nanido<2 damage 240,260
if %nanido=2 damage 270,290
if %nanido=3 damage 300,320
skillname ""
if %mylife=0 sub %stack,1:return *ningyohime_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*ningyohime_a5

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 4
name $name
>Even I can rape a man! \
name ""
skillname "Princess' Cling"
eng "El leans into Luka, and clings tightly to him!"$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>Luka has been bound by El!\
skillname ""
name $name
if %first_sel1=1 skip 3
>I'm going to rape you now! @
skip 2
>This time I'll rape you for sure! @
>Because I want to make you my prey... \
name ""
mov %first_sel1,1
mov %genmogaku,0
sub %stack,1
return



*ningyohime_a6

add %stack,1
name $name
>Now to rape you underwater! \
name ""
skillname "Princess' Perversion"
dwave 1,"se\aqua4.ogg"
mov $tatie4,"ningyohime_h2"
lsp 700,":a;chara\ningyohime_h2.bmp",0,0
bg "bg\bg050.bmp",10,1000
>As El dives into the sea with Luka, she forces him into her vagina!
skillcount3 3801
mov %damage_kotei,1
damage 300,330
mov %kousoku,2
>Luka is being raped by El!\
skillname ""
if %mylife=0 sub %stack,1:return *ningyohime_h5
name "Luka"
>Ahh!\
name ""
>Her wet vagina is incredibly tight, clamping down hard around me the instant I'm inside her.\
name $name
>Ahaha, it went in... @
>Wooow! Your penis really wasn't something to be scared of! \
name ""
sub %stack,1
goto *ningyohime_a7



*ningyohime_a7

add %stack,1
>Luka is being raped by El...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Your penis is gonna explode in me! ":mov $sel2,"El violently moves her waist in random directions!"
if %ransu=2 mov $sel1,"I'll prove even my vagina can make you come! ":mov $sel2,"El tightens her tiny vagina around Luka's penis!"
if %ransu=3 mov $sel1,"Ahaha... Does being raped feel good?":mov $sel2,"El wiggles her hips left and right!"
if %ransu=4 mov $sel1,"I'll tighten around your penis inside me! ":mov $sel2,"El tightens her vagina as hard as she can!"
if %ransu=5 mov $sel1,"It's alright to come inside my tiny Mermaid vagina! ":mov $sel2,"El grinds back and forth against Luka, squeezing his penis in her vagina at the same time!"
name $name
eng $sel1:$sel6\
name ""
skillname "Princess' Perversion"
dwave 1,"se\ero_chupa3.ogg"
eng $sel2:$sel6
skillcount3 3801
mov %damage_kotei,1
damage 300,330
skillname ""
if %mylife=0 sub %stack,1:return *ningyohime_h6
sub %stack,1
goto *ningyohime_a7



*ningyohime_onedari

mov $list1,"Princess' Blowjob"
if %3797>0 mov %list_num1,1
mov $list2,"Princess' Tit Fuck"
if %3798>0 mov %list_num2,1
mov $list3,"Princess' Stomach Rub"
if %3799>0 mov %list_num3,1
mov $list4,"Princess' Tail Rub"
if %3800>0 mov %list_num4,1
mov $list5,"Princess' Perversion"
if %3801>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *ningyohime_onedari1
if %cmd1=12 goto *ningyohime_onedari2
if %cmd1=13 goto *ningyohime_onedari3
if %cmd1=14 goto *ningyohime_onedari4
if %cmd1=15 goto *ningyohime_onedari5
if %cmd1=-1 goto *ningyohime_main
goto *ningyohime_onedari



*ningyohime_onedari1

gosub *onedari_syori
name $name
>You want to come in my mouth...?@
>Then I'll suck on it! \
name ""
gosub *ningyohime_a1
skip -1



*ningyohime_onedari2

gosub *onedari_syori
name $name
>You want to come on my boobs...?@
>Then I'll rub it on them! \
name ""
gosub *ningyohime_a2
skip -1



*ningyohime_onedari3

gosub *onedari_syori
name $name
>You want to come on my stomach...?@
>Then I'll rub it on me! \
name ""
gosub *ningyohime_a3
skip -1



*ningyohime_onedari4

gosub *onedari_syori
name $name
>You want to come on my tail...?@
>Then I'll use my tail to stroke it! \
name ""
gosub *ningyohime_a4
skip -1



*ningyohime_onedari5

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want to mate with me...?@
>Okay, I'll do the perverted stuff with you! \
name ""
if %kousoku=0 gosub *ningyohime_a5
gosub *ningyohime_a6
skip -1



*ningyohime_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\ningyohime_bk01.bmp",0,50
gosub *syasei2
>As El uses her tiny mouth to suck on Luka's penis, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2669,%2669+1:if %2669=1 mov %count_koenemy,%count_koenemy+1
if %2669>%count_most mov %count_most,%2669:mov $count_mostname,$name
count 4,5
mov $bad1,"El forced Luka to come with her mouth."
gosub *face2
name $name
>Nnn... Your semen shot out in my mouth! @
>Does my mouth feel good...?\
name ""
goto *ningyohime_h



*ningyohime_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\ningyohime_bk12.bmp",0,50
gosub *syasei2
>As El rubs Luka's penis against her flat chest, he comes, covering her tiny swellings with semen.\
mov %viclose,1:gosub *lose
mov %2669,%2669+1:if %2669=1 mov %count_koenemy,%count_koenemy+1
if %2669>%count_most mov %count_most,%2669:mov $count_mostname,$name
count 7,5
mov $bad1,"El used her breasts to force Luka to come."
gosub *face2
name $name
>Aha... You got semen all over my boobs! @
>Do my boobs feel good...?\
name ""
goto *ningyohime_h



*ningyohime_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\ningyohime_bk03.bmp",0,50
gosub *syasei2
>As El rubs Luka's penis against her smooth stomach, he comes, covering her body with semen.\
mov %viclose,1:gosub *lose
mov %2669,%2669+1:if %2669=1 mov %count_koenemy,%count_koenemy+1
if %2669>%count_most mov %count_most,%2669:mov $count_mostname,$name
count 32,5
mov $bad1,"El used her stomach to force Luka to come."
gosub *face2
name $name
>Aha... You got semen all over my stomach! @
>Does my stomach feel good...?\
name ""
goto *ningyohime_h



*ningyohime_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\ningyohime_bk05.bmp",0,50
gosub *syasei2
>As El's small, wet tail strokes Luka's penis, he comes, covering her tail with semen.\
mov %viclose,1:gosub *lose
mov %2669,%2669+1:if %2669=1 mov %count_koenemy,%count_koenemy+1
if %2669>%count_most mov %count_most,%2669:mov $count_mostname,$name
count 19,5
mov $bad1,"El forced Luka to come with her tail."
gosub *face2
name $name
>Aha... You got semen all over my tail! @
>Does my tail feel good...?\
name ""
goto *ningyohime_h



*ningyohime_h5

mov %ikigoe,3:gosub *ikigoe
name $name
>Eh!?@> It's already coming out!?\
name ""
gosub *syasei1
lsp 700,":a;chara\ningyohime_h3.bmp",0,0
gosub *syasei2
>As soon as Luka is forced into El's tiny vagina, he comes, filling the surprised young Mermaid with semen.\
mov %viclose,1:gosub *lose
mov %2669,%2669+1:if %2669=1 mov %count_koenemy,%count_koenemy+1
if %2669>%count_most mov %count_most,%2669:mov $count_mostname,$name
count 1,5
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come the moment of insertion."
gosub *face2
name $name
>Awww geez, already came? @
>Letting it out so quickly! That's soooo embarrassing! \
name ""
goto *ningyohime_h



*ningyohime_h6

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\ningyohime_h3.bmp",0,0
gosub *syasei2
>As El eagerly rapes Luka, he comes, filling the young Mermaid's vagina with semen.\
mov %viclose,1:gosub *lose
mov %2669,%2669+1:if %2669=1 mov %count_koenemy,%count_koenemy+1
if %2669>%count_most mov %count_most,%2669:mov $count_mostname,$name
count 1,5
mov $bad1,"El forced Luka to come as she raped him."
gosub *face2
name $name
>Ahaha, I can feel your semen in my vagina! @
>Hey, hey... Did it feel good?\
name ""
goto *ningyohime_h



*ningyohime_h

mov $bad2,"Caught by El, Luka becomes the young Mermaid's toy."
if %2669=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,1:hseanwave:goto *ningyohime_hb
name "Luka"
>Ahh...\
name ""
name $name
>Ehehe, you're really weak now, right?@
>So then, uhm...@>I'm going to rape you now! \
name ""
>El leans over me, laughing innocently the whole time.@
>She spreads open a tiny hole in her abdomen, and brings it close to my penis.\
name $name
>I know this much, at least!@
>Because I watched my mommy rape a lot of men like this! \
>You do this, then jump into the sea... \
name ""
name "Luka"
>S...Stop... Ahh...\
name ""
dwave 1,"se\aqua4.ogg"
cspl 690,699
lsp 700,":a;chara\ningyohime_h1.bmp",0,0
bg "bg\bg050.bmp",10,1000
mov %hseanwave,1:hseanwave
>At the same time she presses me into her, El jumps into the sea.@
>Her tiny vagina feels a little bit stiff, and incredibly tight...\
name $name
>Nnnn... It went in. @
>Well? Does it feel good?\
name ""
goto *ningyohime_hb



*ningyohime_hb

name "Luka"
>Ahh... No, don't do this...\
name ""
>Her tiny vagina feels small and good, but her walls feel a little firm...@
>My body twists unconsciously not in intense pleasure, but more in resistance to the feeling...\
name $name
>Hrrrm... This doesn't feel right!@
>Come on, gasp or moan or something a little more...\
>I wonder if I should do it more like my mom was...?@
>Put some force into my tail like this... \
name ""
name "Luka"
>Ah...!\
name ""
>Her vagina, previously just tight and firm, suddenly changes.@
>As her tail moves in the water, her muscles suddenly come alive, squeezing and rubbing hard against my penis.\
>The firm walls suddenly give way and become more flexible as they move, sending a shock of pleasure through me.\
name $name
>Nnnnn! \
name ""
name "Luka"
>S...Stop...!@
>Ahhh!\
name ""
name ""
>She suddenly gets extra tight inside.@
>The young girl, using sexual techniques for the first time, already made me surrender...\
>Unable to endure her incredibly tight vagina any longer, the desire to release in her takes over my body.\
name "Luka"
>Ah... Coming... Ahh!\
name ""
gosub *syasei1
lsp 700,":a;chara\ningyohime_h2.bmp",0,0
gosub *syasei2
>My penis twitches and explodes, filling up the small Mermaid's vagina.@
>The feeling of shame washes over me as the young girl easily brought me to orgasm, seemingly just playing around.\
name "Luka"
>Ah... Ahh...\
name ""
name $name
>Ehh?@> Your penis got all twitchy...@
>Did you just come!?\
name ""
>For a moment, El looks really surprised.@
>But after a moment, a huge smile crosses her face.\
name $name
>...Ahaha, you came! @
>All I had to do was squeeze a little bit with my muscles, and you leaked! \
>That was so easy! \
name ""
>The young girl laughs as I shake in humiliation.@
>But my penis is still stuck inside her tiny vagina...\
>El is already no longer an inexperienced girl...@
>She's turning into a devilish imp that enjoys toying with men.\
name $name
>Ehehe... Ooooh what should I do next?@
>How about moving like this...? \
name ""
mov %hseanwave,6:hseanwave
>El wiggles her lower body, as if she was a fish swimming through the water.@
>Helpless inside of her, the movements cause my penis to rub hard against her soft walls.\
name "Luka"
>Ahhh... D...Don't move!\
name ""
>I scream in tortured pleasure as my penis is toyed with inside her tiny vagina.\
>Her slightest movements press and bend her vaginal walls hard against my penis, bringing torrents of pleasure along with them.\
name $name
>Ehehe, does it feel good?@
>Then if I do this, will it feel even better...?\
name ""
>My pleas and cries seem to have just fueled her sense of superiority and budding sadism...\
>With an impish smile, she starts moving even faster, squeezing me in her already too tight vagina at the same time.\
name "Luka"
>Ahh...!@>Stop!\
name ""
name $name
>Ehehe... The same reactions as the men my mommy rapes.@
>Are my techniques amazing?\
name ""
name "Luka"
>Ahh...\
name ""
>In reply, I can only moan.@> Her smile lets me know that was the response she was hoping to hear...@
>Making full use of the sexual skills she observed her mother using, El is having fun trying them all out on me.\
>Completely helpless, I can't do anything as this innocent looking young girl toys around with me however she wants...\
name $name
>Ahaha, what about this!?@
>It's super easy to make men come, isn't it!? \
name ""
name "Luka"
>Don't!@> Please stop moving!!\
name ""
>My appeals fall on deaf ears as she just squeezes my penis in response.\
>Moving her waist and squeezing me in her tiny vagina...@
>Suffering the abusive pleasure from this small girl, I'm already struggling to breathe.\
>If I relaxed for even a moment, I'd come again...@
>Sensing this, a sadistic smile slowly appears on El's face.\
name $name
>...Ehehe, you're about to come, aren't you?@
>Then I'm going to give you a finishing blow! \
>The finish will be a super squeeze! \
>Aaaaand...@> Squeeze!\
name ""
name "Luka"
>Ahhhhhhh!!\
name ""
>Her already tiny vagina suddenly squeezes down impossibly hard on me, almost crushing my penis inside her.\
gosub *syasei1
lsp 700,":a;chara\ningyohime_h3.bmp",0,0
gosub *syasei2
>And again the cloudy proof of my submission explodes into the young Mermaid.@
>As the semen drawn out from her budding sexual skills flows into her, a satisfied look appears on her face.\
name $name
>Ahaha, you came again. @
>Your penis went all twitchy, and spat out warm juice. \
name ""
>While giggling, El continues gently moving her waist.@
>My penis rubs against her walls, bringing forth more moans.\
name "Luka"
>Ahh... Stop...@
>Don't move any more...\
name ""
name $name
>Noooooope. @
>Because you're already my slave!@
>I'm going to squeeze you a lot, and make you into a toy! \
name ""
>The small girl continues torturing me with pleasure as she giggles.@
>Her tiny vagina tightens around me at the same time, bringing forth another spurt of submission to her.\
gosub *syasei1
lsp 700,":a;chara\ningyohime_h4.bmp",0,0
gosub *syasei2
name "Luka"
>Ahhh...\
name ""
>Each time she squeezes down hard, I'm forced to another orgasm.\
>I feel like El is completely in control of me...@
>I'm not able to fight against her any longer.\
mov %hseanwave,0:hseanwave
gosub *anten
>For several days after that, El never separated from me.@
>She mated with me for three days and three nights straight through, since she liked me.\
>Left completely exhausted by it, El takes me back to her home.@
>Ever since then, she has kept raping me continually, keeping me as a sex slave.\
>............\
goto *badend



*queenmermaid_start

mov $name,"Queen Mermaid"
mov $name2,"Queen Mermaid"
mov $lavel,"queenmermaid"
mov $tatie1,"queenmermaid_st01"
mov $tatie2,"queenmermaid_st01"
mov $tatie3,"queenmermaid_st03"
mov $tatie4,"queenmermaid_ha1"
mov $haikei,"bg189"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,21000
if %nanido=2 mov %max_enemylife,24000
if %nanido=3 mov %max_enemylife,27000
if %nanido=0 mov %max_enemylife,2
if %nanido=1 mov %henkahp1,14000
if %nanido=2 mov %henkahp1,16000
if %nanido=3 mov %henkahp1,18000
if %nanido=0 mov %henkahp1,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,1
mov %alice_skill1,110
mov %alice_skill2,100
mov %alice_skill3,100
mov %music,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free from the Queen Mermaid!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"There's no use struggling now..."
mov $mogaku_sel2,"Pointless... Submit to the rape."
mov $mogaku_sel3,"There's no use struggling now..."
mov $mogaku_sel4,"Pointless... Submit to the rape."
mov $mogaku_sel5,"There's no use struggling now..."
mov $mogaku_dassyutu1,"Only rude men refuse a lady at that point."
mov $mogaku_dassyutu2,"Or do you just want more foreplay first?"
mov $half_s1,"Does it feel good?"
mov $half_s2,"It's quite easy to get addicted to this pleasure..."
mov $kiki_s1,"Already at your limit I see."
mov $kiki_s2,"The techniques of a Queen will overwhelm you and make you scatter your semen to the seas."
mov %end_n,11
mov %exp_minus,520000
mov %zmonster_x,-310
mov %tukix,300
mov %owaza_count1a,5
mov %owaza_count2a,7
mov %owaza_count3a,14
name "Luka"
>Listen to me, please...@
>Humans aren't like that...\
name ""
name $name
>I have no intention of listening to you.@
>If you want to appeal to me, then you must defeat me first.\
name ""
>Her attitude is just like Erubetie's was...@
>It looks like she has no intention of listening to me unless I beat her down first!\
name "Luka"
>Still, let me just say one thing first...\
>Are you hating humans so deeply only because you once loved a human just as deeply!?\
>He was a human that you now hate!@
>Then why...!?\
name ""
name $name
>I said I have no intention of listening to you.\
name ""
name "Luka"
>Then I'll make you listen after I win!\
name ""
mov %sinkou,1
goto *common_main



*queenMermaid001

if %enemylife>%henkahp1 goto *common_main
if %sinkou=2 goto *common_main
name "Luka"
>Queen Mermaid...@
>What will happen to that child if humans and monsters can't live together?\
>That girl has the blood of those hateful humans in her!@
>She's the child of man and monster!\
name ""
name $name
>So what if she is?@
>That's no concern of yours!\
name ""
name "Luka"
>I'm the son of a human and an angel.@
>My life itself is proof that different races can live together!\
>So stop instilling more hatred in that girl!\
name ""
mov %sinkou,2
goto *common_main



*queenmermaid_v

name $name
>It can't be...@
>How could I run out of power...?\
name ""
>Completely drained of strength, the Queen Mermaid loses the will to fight.\
mov %viclose,1:gosub *victory
mov %getexp,220000:gosub *lvup
mov %2370,1
goto *sean0332



*queenmermaid_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Already giving up... How miserable.@
>Come now, I'll make you come quickly...\
name ""
goto *queenmermaid_a



*queenmermaid_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *queenmermaid_kousan
if %cmd1=16 goto *queenmermaid_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *queenmermaid_main



*queenmermaid_a

if %kousoku=1 gosub *queenmermaid_a7:goto *common_main
rnd2 %ransu,1,8
if %ransu=1 gosub *queenmermaid_a1:goto *queenMermaid001
if %ransu=2 gosub *queenmermaid_a2:goto *queenMermaid001
if %ransu=3 gosub *queenmermaid_a3:goto *queenMermaid001
if %ransu=4 gosub *queenmermaid_a4:goto *queenMermaid001
if %ransu=5 && %owaza_count2a>8 && %status=0 && %enemy_aqua>0 gosub *queenmermaid_a5:goto *queenMermaid001
if %ransu=6 && %owaza_count1a>6 && %enemy_aqua>0 gosub *queenmermaid_a6:goto *common_main
if %ransu>6 && %owaza_count3a>15 && %enemy_aqua=0 gosub *queenmermaid_el3:goto *common_main
skip -8



*queenmermaid_el3

add %stack,1
mov %owaza_count3a,0
name $name
>Come, Grandine...\
name ""
skillname "Summon Water Spirit"
mov %enemy_aqua,5
mov %damage_keigen_el,70
dwave 2,"se\aqua2.ogg"
lsp2 0,":a;chara\grandine_st01.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *enemy_elm_print
>The Queen Mermaid summons a water spirit!\
skillname ""
sub %stack,1
return



*queenmermaid_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck you with my saliva filled mouth."
if %ransu=2 mov $sel1,"If I suck on your penis, there's no way you can hold your semen back."
if %ransu=3 mov $sel1,"I'll taste your penis with my royal mouth."
name $name
eng $sel1:$sel6\
name ""
skillname "Mermaid's Sucking Mouth"
dwave 1,"se\ero_buchu2.ogg"
>The Queen Mermaid sucks Luka's penis into her wet mouth!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3802
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
dwave 1,"se\ero_pyu2.ogg"
>Her tongue coils around his penis!
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
dwave 1,"se\ero_buchu2.ogg"
>She sucks hard on Luka's penis!
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
if %enemy_aqua=0 skip 11
dwave 1,"se\ero_slime1.ogg"
>The sticky liquid summoned by the spirit swirls around the glans of Luka's penis!
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
dwave 1,"se\ero_slime1.ogg"
>The sticky liquid vibrates against the back of Luka's penis!
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
skillname ""
if %mylife=0 sub %stack,1:return *queenmermaid_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*queenmermaid_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You'll just be another man who finished between my breasts..."
if %ransu=2 mov $sel1,"Immerse yourself in a Queen's chest."
if %ransu=3 mov $sel1,"Do you think you can endure a Queen's breast techniques?"
name $name
eng $sel1:$sel6\
name ""
skillname "Mermaid's Squeezing Breasts"
dwave 1,"se\ero_sigoki1.ogg"
>The Queen Mermaid sandwiches Luka's penis between her big breasts!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3803
if %nanido<2 damage 105,125
if %nanido=2 damage 115,135
if %nanido=3 damage 125,145
dwave 1,"se\ero_sigoki1.ogg"
>She slowly presses her breasts together around his penis!
if %nanido<2 damage 105,125
if %nanido=2 damage 115,135
if %nanido=3 damage 125,145
dwave 1,"se\ero_sigoki1.ogg"
>The Queen Mermaid bounces her breasts up and down with Luka's penis between!
if %nanido<2 damage 105,125
if %nanido=2 damage 115,135
if %nanido=3 damage 125,145
if %enemy_aqua=0 skip 11
dwave 1,"se\ero_slime1.ogg"
>The sticky liquid summoned by the spirit clings to the glans of Luka's penis!
if %nanido<2 damage 105,125
if %nanido=2 damage 115,135
if %nanido=3 damage 125,145
dwave 1,"se\ero_slime1.ogg"
>The sticky liquid starts to spin!
if %nanido<2 damage 105,125
if %nanido=2 damage 115,135
if %nanido=3 damage 125,145
skillname ""
if %mylife=0 sub %stack,1:return *queenmermaid_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*queenmermaid_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"How does this feel...?"
if %ransu=2 mov $sel1,"A Mermaid's stomach is irresistibly slimy..."
if %ransu=3 mov $sel1,"I don't even know how many men have leaked from this technique..."
name $name
eng $sel1:$sel6\
name ""
skillname "Mermaid's Slimy Stomach"
dwave 1,"se\ero_sigoki1.ogg"
>The Queen Mermaid presses Luka's penis against her slimy stomach!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3804
if %nanido<2 damage 110,130
if %nanido=2 damage 120,140
if %nanido=3 damage 130,150
dwave 1,"se\ero_sigoki1.ogg"
>She rubs his penis up and down her stomach!
if %nanido<2 damage 110,130
if %nanido=2 damage 120,140
if %nanido=3 damage 130,150
dwave 1,"se\ero_sigoki1.ogg"
>The glans of Luka's penis is rubbed against her smooth, slimy skin!
if %nanido<2 damage 110,130
if %nanido=2 damage 120,140
if %nanido=3 damage 130,150
if %enemy_aqua=0 skip 11
dwave 1,"se\ero_slime1.ogg"
>The sticky liquid increases the warmth and sensations of her rubbing motions!
if %nanido<2 damage 110,130
if %nanido=2 damage 120,140
if %nanido=3 damage 130,150
dwave 1,"se\ero_slime1.ogg"
>The sticky liquid pulls and massages Luka's penis!
if %nanido<2 damage 110,130
if %nanido=2 damage 120,140
if %nanido=3 damage 130,150
skillname ""
if %mylife=0 sub %stack,1:return *queenmermaid_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*queenmermaid_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"A Mermaid's tail... Not something you get to experience every day."
if %ransu=2 mov $sel1,"Drown in the ever changing pleasure of a Mermaid's tail..."
if %ransu=3 mov $sel1,"How many men do you think have been brought to orgasm by a Mermaid's tail?"
name $name
eng $sel1:$sel6\
name ""
skillname "Mermaid's Chaotic Tail"
dwave 1,"se\ero_koki1.ogg"
>The Queen Mermaid strokes Luka's penis with her tail!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3805
if %nanido<2 damage 115,135
if %nanido=2 damage 125,145
if %nanido=3 damage 135,155
dwave 1,"se\ero_koki1.ogg"
>The tip of her tail wraps around the glans of Luka's penis!
if %nanido<2 damage 115,135
if %nanido=2 damage 125,145
if %nanido=3 damage 135,155
dwave 1,"se\ero_koki1.ogg"
>The slimy tail quickly strokes Luka's penis!
if %nanido<2 damage 115,135
if %nanido=2 damage 125,145
if %nanido=3 damage 135,155
if %enemy_aqua=0 skip 11
dwave 1,"se\ero_slime1.ogg"
>The sticky liquid covering the tail pulls and rubs against Luka's penis!
if %nanido<2 damage 115,135
if %nanido=2 damage 125,145
if %nanido=3 damage 135,155
dwave 1,"se\ero_slime1.ogg"
>Clinging to the glans of Luka's penis, the sticky liquid brings additional stimulation!
if %nanido<2 damage 115,135
if %nanido=2 damage 125,145
if %nanido=3 damage 135,155
skillname ""
if %mylife=0 sub %stack,1:return *queenmermaid_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*queenmermaid_a5

add %stack,1
mov %owaza_count2a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Allow me to treat you to a special skill..."
if %ransu=2 mov $sel1,"Taste the skill that can charm any man..."
if %ransu=3 mov $sel1,"Be grateful. Your genitals will be personally washed by a Queen..."
name $name
eng $sel1:$sel6\
name ""
skillname "Mermaid's Cleaning Hand"
dwave 1,"se\ero_koki1.ogg"
>The Queen Mermaid drips saliva into her hands, turning it into bubbles!\
>Her bubble-covered palm grabs Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<80 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3806
if %nanido<2 damage 115,135
if %nanido=2 damage 125,145
if %nanido=3 damage 135,155
dwave 1,"se\ero_koki1.ogg"
>She uses her fingers to carefully scrub Luka's penis clean!
if %nanido<2 damage 115,135
if %nanido=2 damage 125,145
if %nanido=3 damage 135,155
dwave 1,"se\ero_koki1.ogg"
>The strange bubbles bring an unusual wave of pleasure over Luka!
if %nanido<2 damage 115,135
if %nanido=2 damage 125,145
if %nanido=3 damage 135,155
if %status=0 mov $sel1,"Luka was immersed in ecstasy!"
if %status=1 mov $sel1,"Luka is immersed in ecstasy..."
mov %status,1:gosub *status_print
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *queenmermaid_h5
if %kousan=2 sub %stack,1:return
name "Luka"
>Haaa...\
name ""
name $name
>Helpless in an instant... How pitiful.\
name ""
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,2,3
if %nanido=3 rnd2 %status_turn,3,4
sub %stack,1
return



*queenmermaid_a6

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 4
name $name
>It's about time to rape you!\
name ""
skillname "Mermaid's Restraint"
eng "The Queen Mermaid tightly grabs hold of Luka!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>Luka has been bound by the Queen Mermaid!\
skillname ""
name $name
>The vagina of a Queen Mermaid is nothing ordinary.@
>Now prepare yourself...\
name ""
mov %genmogaku,0
sub %stack,1
return



*queenmermaid_a7

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 4
name $name
>Are you ready? Well then...\
name ""
skillname "Mermaid's Pussy"
dwave 1,"se\aqua4.ogg"
lsp 690,":a;chara\queenmermaid_ct01.bmp",0,0
bg "bg\bg050.bmp",10,1000
>The Queen Mermaid forces Luka into her as she dives into the sea with him!
mov %damage_kotei,1
damage 400,420
mov %kousoku,2:gosub *status_print
>Luka is being raped by the Queen Mermaid!\
skillname ""
if %mylife=0 sub %stack,1:return *queenmermaid_h6
name "Luka"
>Ahh...\
name ""
>I can't help but let out a moan from the feeling of her vagina around my penis.\
>The slimy, slippery feeling of her lower fish body...@
>And at the same time, her warm vagina clamping down on me.\
name $name
>Innumerable men have drowned in ecstasy in my vagina.@
>You will finish in the same throes of bliss...\
name ""
if %kousan=2 sub %stack,1:return
sub %stack,1
rnd2 %ransu,1,2
if %ransu=1 goto *queenmermaid_a8
if %ransu=2 goto *queenmermaid_a9



*queenmermaid_a8

add %stack,1
>Luka is being raped by the Queen Mermaid...\
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll make it tighter insider...":mov $sel2,"The Queen squeezes down on Luka's penis!"
if %ransu=2 mov $sel1,"Any man would come from this tightness...":mov $sel2,"The sweet tightness makes Luka gasp in pleasure!"
if %ransu=3 mov $sel1,"My vaginal muscles are just as powerful as my arms...":mov $sel2,"The Queen slowly shrinks her vagina, squeezing Luka's penis!"
if %ransu=4 mov $sel1,"Finish from the tightness of a Queen's vagina.":mov $sel2,"The Queen rhythmically tightens and loosens her vagina, massaging Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Mermaid's Tight Pussy"
dwave 1,"se\ero_chupa5.ogg"
eng $sel2:$sel6
skillcount3 3807
mov %damage_kotei,1
damage 400,420
skillname ""
if %mylife=0 sub %stack,1:return *queenmermaid_h7
if %kousan=2 sub %stack,1:return
sub %stack,1
rnd2 %ransu,1,2
if %ransu=1 goto *queenmermaid_a8
if %ransu=2 goto *queenmermaid_a9



*queenmermaid_a9

add %stack,1
>Luka is being raped by the Queen Mermaid...\
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"If you use the muscles around the vagina, you can even do this...":mov $sel2,"The Queen Mermaid's vagina vibrates around Luka's penis!"
if %ransu=2 mov $sel1,"I'll squeeze out your semen in no time...":mov $sel2,"A wave motion goes up and down the Queen Mermaid's vagina, stimulating Luka!"
if %ransu=3 mov $sel1,"No man can hold back their orgasm after taking a Queen's techniques.":mov $sel2,"The wave motion going up and down the walls of the Queen Mermaid's vagina rubs against Luka's penis!"
if %ransu=4 mov $sel1,"Can you taste this and still hold back? It's impossible, isn't it?":mov $sel2,"Using her muscles, the Queen Mermaid makes her vagina seemingly vibrate around Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Mermaid's Vibrating Pussy"
dwave 1,"se\ero_makituki3.ogg"
eng $sel2:$sel6
skillcount3 3808
mov %damage_kotei,1
damage 400,420
skillname ""
if %mylife=0 sub %stack,1:return *queenmermaid_h8
if %kousan=2 sub %stack,1:return
sub %stack,1
rnd2 %ransu,1,2
if %ransu=1 goto *queenmermaid_a8
if %ransu=2 goto *queenmermaid_a9



*queenmermaid_onedari

mov $list1,"Mermaid's Sucking Mouth"
if %3802>0 mov %list_num1,1
mov $list2,"Mermaid's Squeezing Breasts"
if %3803>0 mov %list_num2,1
mov $list3,"Mermaid's Slimy Stomach"
if %3804>0 mov %list_num3,1
mov $list4,"Mermaid's Chaotic Tail"
if %3805>0 mov %list_num4,1
mov $list5,"Mermaid's Cleaning Hand"
if %3806>0 mov %list_num5,1
mov $list6,"Mermaid's Tight Pussy"
if %3807>0 mov %list_num6,1
mov $list7,"Mermaid's Vibrating Pussy"
if %3808>0 mov %list_num7,1
gosub *cmd_onedari
if %cmd1=11 goto *queenmermaid_onedari1
if %cmd1=12 goto *queenmermaid_onedari2
if %cmd1=13 goto *queenmermaid_onedari3
if %cmd1=14 goto *queenmermaid_onedari4
if %cmd1=15 goto *queenmermaid_onedari5
if %cmd1=16 goto *queenmermaid_onedari6
if %cmd1=17 goto *queenmermaid_onedari7
if %cmd1=-1 goto *queenmermaid_main
goto *queenmermaid_onedari



*queenmermaid_onedari1

gosub *onedari_syori
name $name
>You wish to finish in a Queen's mouth?@
>Then just this once, I'll do as you desire...\
name ""
gosub *queenmermaid_el3
gosub *queenmermaid_a1
skip -1



*queenmermaid_onedari2

gosub *onedari_syori
name $name
>You wish to finish on a Queen's chest?@
>Then just this once, I'll do as you desire...\
name ""
gosub *queenmermaid_el3
gosub *queenmermaid_a2
skip -1



*queenmermaid_onedari3

gosub *onedari_syori
name $name
>You wish to finish on a Queen's stomach?@
>Then just this once, I'll do as you desire...\
name ""
gosub *queenmermaid_el3
gosub *queenmermaid_a3
skip -1



*queenmermaid_onedari4

gosub *onedari_syori
name $name
>You wish to finish on a Queen's tail?@
>Then just this once, I'll do as you desire...\
name ""
gosub *queenmermaid_el3
gosub *queenmermaid_a4
skip -1



*queenmermaid_onedari5

gosub *onedari_syori
name $name
>You wish to finish on a Queen's hand?@
>Then just this once, I'll do as you desire...\
name ""
gosub *queenmermaid_a5
skip -1



*queenmermaid_onedari6

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want me to rape you and squeeze you with my vagina?@
>I'll grant your desire...\
name ""
if %kousoku=0 gosub *queenmermaid_a6
gosub *queenmermaid_a7
gosub *queenmermaid_a8
skip -1



*queenmermaid_onedari7

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want me to rape you and taste my vibration technique?@
>I'll grant your desire...\
name ""
if %kousoku=0 gosub *queenmermaid_a6
gosub *queenmermaid_a7
gosub *queenmermaid_a9
skip -1



*queenmermaid_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\queenmermaid_bk01.bmp",0,0
gosub *syasei2
>As the Queen's wet mouth sucks on him, Luka comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2670,%2670+1:if %2670=1 mov %count_koenemy,%count_koenemy+1
if %2670>%count_most mov %count_most,%2670:mov $count_mostname,$name
count 4,7
mov $bad1,"The Queen Mermaid forced Luka to come with her mouth."
gosub *face2
name $name
>Hmph... Already came I see.@
>Men are so pitiful... Just make them feel a little good, and they surrender.\
name ""
goto *queenmermaid_ha



*queenmermaid_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\queenmermaid_bk02.bmp",0,0
gosub *syasei2
>As the Queen squeezes Luka's penis between her soft breasts, he comes, covering her chest in semen.\
mov %viclose,1:gosub *lose
mov %2670,%2670+1:if %2670=1 mov %count_koenemy,%count_koenemy+1
if %2670>%count_most mov %count_most,%2670:mov $count_mostname,$name
count 7,7
mov $bad1,"The Queen Mermaid forced Luka to come with her breasts."
gosub *face2
name $name
>Hmph... Already came I see.@
>Men are so pitiful... Just make them feel a little good, and they surrender.\
name ""
goto *queenmermaid_ha



*queenmermaid_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\queenmermaid_bk04.bmp",0,0
gosub *syasei2
>As the Queen rubs Luka's penis against her slimy stomach, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2670,%2670+1:if %2670=1 mov %count_koenemy,%count_koenemy+1
if %2670>%count_most mov %count_most,%2670:mov $count_mostname,$name
count 32,7
mov $bad1,"The Queen Mermaid used her slimy stomach to force Luka to come."
gosub *face2
name $name
>Hmph... Already came I see.@
>Men are so pitiful... Just make them feel a little good, and they surrender.\
name ""
goto *queenmermaid_ha



*queenmermaid_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 696,":a;chara\queenmermaid_bk06.bmp",0,0
gosub *syasei2
>As the Queen Mermaid's slimy tail strokes Luka's penis, he comes, covering her tail in semen.\
mov %viclose,1:gosub *lose
mov %2670,%2670+1:if %2670=1 mov %count_koenemy,%count_koenemy+1
if %2670>%count_most mov %count_most,%2670:mov $count_mostname,$name
count 19,7
mov $bad1,"The Queen Mermaid forced Luka to come with her tail."
gosub *face2
name $name
>Hmph... Already came I see.@
>Men are so pitiful... Just make them feel a little good, and they surrender.\
name ""
goto *queenmermaid_ha



*queenmermaid_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\queenmermaid_bk03.bmp",0,0
gosub *syasei2
>As the Queen Mermaid washes Luka's penis with her magic bubbles, he comes, covering her hands in semen.\
mov %viclose,1:gosub *lose
mov %2670,%2670+1:if %2670=1 mov %count_koenemy,%count_koenemy+1
if %2670>%count_most mov %count_most,%2670:mov $count_mostname,$name
count 5,7
mov $bad1,"The Queen Mermaid forced Luka to come with her hand."
gosub *face2
name $name
>Hmph... Already came I see.@
>Men are so pitiful... Just make them feel a little good, and they surrender.\
name ""
goto *queenmermaid_ha



*queenmermaid_h6

mov %ikigoe,3:gosub *ikigoe
name $name
>Already coming...?@
>How laughable after you mouthed off like that.\
name ""
gosub *syasei1
lsp 700,":a;chara\queenmermaid_ha2.bmp",0,0
lsp 690,":a;chara\queenmermaid_ct02.bmp",0,0
gosub *syasei2
>As soon as Luka is forced into the Queen's warm vagina, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2670,%2670+1:if %2670=1 mov %count_koenemy,%count_koenemy+1
if %2670>%count_most mov %count_most,%2670:mov $count_mostname,$name
count 1,3
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was brought to an orgasm the moment of insertion."
gosub *face2
name $name
>You couldn't even last ten seconds.@
>I've never seen such a pitiful human before...\
name ""
goto *queenmermaid_hb



*queenmermaid_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\queenmermaid_ha2.bmp",0,0
lsp 690,":a;chara\queenmermaid_ct02.bmp",0,0
gosub *syasei2
>As the Queen tightens her vagina around Luka, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2670,%2670+1:if %2670=1 mov %count_koenemy,%count_koenemy+1
if %2670>%count_most mov %count_most,%2670:mov $count_mostname,$name
count 1,3
mov $bad1,"The Queen Mermaid forced Luka to come as she raped him."
gosub *face2
name $name
>You came inside me...@>You're finished now.@
>Men are so pitiful... Just make them feel a little good, and they surrender.\
name ""
goto *queenmermaid_hb



*queenmermaid_h8

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\queenmermaid_ha2.bmp",0,0
lsp 690,":a;chara\queenmermaid_ct02.bmp",0,0
gosub *syasei2
>As the Queen uses her muscle control to make her vaginal walls vibrate, Luka comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2670,%2670+1:if %2670=1 mov %count_koenemy,%count_koenemy+1
if %2670>%count_most mov %count_most,%2670:mov $count_mostname,$name
count 1,3
mov $bad1,"The Queen Mermaid forced Luka to come as she raped him."
gosub *face2
name $name
>You came inside me...@>You're finished now.@
>Men are so pitiful... Just make them feel a little good, and they surrender.\
name ""
goto *queenmermaid_hb



*queenmermaid_ha

mov $bad2,"Captured, Luka was kept as a sex slave for the Mermaids to freely use."
if %2857=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2857,1
name "Luka"
>Ahhh...\
name ""
>Forced to ejaculate by the Queen Mermaid, I'm left completely helpless.\
name $name
>With that, you can no longer fight back.@
>I shall take ownership of your body.\
name ""
>Thus, I was captured by the Queen Mermaid.\
gosub *anten
cspl 690,701
lsp 700,":a;chara\queenmermaid_hb1.bmp",0,0
bg "bg\bg039.bmp",10,1000
mov %hseanwave,20:hseanwave
name $name
>El... Today I am going to teach you how to perform in-vitro fertilization.@
>I'll demonstrate on this boy, so please watch carefully.\
name ""
>The eggs the Queen Mermaid laid are piled on top of my groin.@
>Their soft, slimy texture rubs against my penis.\
name "Luka"
>ah...\
name ""
>The strange texture of them rubbing against my penis quickly makes me get hard.\
name "El"
>Ahaha... It got big!@
>Now what do you do?@>Do you squeeze it out by hand?\
name ""
name $name
>That would work, but...@
>Just the stimulation of the eggs themselves are enough to make males ejaculate.\
>See, watch.\
name ""
name "El"
>OK! \
name ""
lsp 690,":a;chara\queenmermaid_ct11.bmp",0,0
>The young Mermaid gazes intensely at my penis.@
>At the same time, the eggs piled on me start to move.\
>Piled around my penis, the warm, slimy eggs almost makes it feel like I'm inside a vagina.@
>And with them moving and vibrating, it feels even more alive.\
name "Luka"
>Ah...\
name ""
>Surprised at the sensations, I can't help but tremble as the pleasure creeps up my lower body.@
>Seeing my body shake, the Queen's arms press a little harder against me, sealing off my movements.\
name $name
>Most males will try to escape, so you must make it so they cannot run before you mate with them.\
>Not just humans, but most organisms have an instinctive desire to avoid mating with other creatures that aren't of the same race.\
>For that reason, us monsters have each developed various ways of giving extreme pleasure to males.\
>Forcing that into them, you use the intense pleasure to paralyze their natural instinct to try to escape.\
name ""
name "El"
>So you make them feel really good so they don't escape?\
name ""
name "Luka"
>Ahhh...\
name ""
>No matter how I twist and struggle, the Queen doesn't loosen her hold.@
>It feels like she won't loosen her hold until I come on these eggs...\
>But the more I struggle, the more the sensations from the eggs rubbing against my penis gets to me.@
>In only a few moments, I'm already leaking pre come onto them...\
>I can't put up with any more of this...\
name "Luka"
>Haaa... I'm going to come...\
name ""
name $name
>Now look closely.@
>This male's natural instinct to avoid mating with other creatures is about to lose to the pleasure.\
>Once they reach this state, they usually ejaculate within the next ten seconds.\
name ""
name "El"
>Ahaha, he lost to sexual desire, right? @
>Human males are really pathetic! \
name ""
>The little Mermaid is giggling as she carefully watches my penis, eagerly looking forward to the moment I come.\
>Feeling horrified at such a small girl looking at my penis in curiosity like that, I slowly go over edge of what I can endure.\
name "Luka"
>Ahhhh...\
name ""
gosub *syasei1
lsp 700,":a;chara\queenmermaid_hb2.bmp",0,0
lsp 690,":a;chara\queenmermaid_ct12.bmp",0,0
gosub *syasei2
>My penis, buried in her eggs, pulses as I explode in them.@
>The pleasure and immoral feelings of fertilizing her eggs washes over me all at once.\
>And all during it, the young girl's eyes keep staring at my penis in curiosity.\
name "Luka"
>Ahh...\
name ""
>My body goes completely loose after my orgasm.@
>From behind, the Queen keeps holding me as she inspects the eggs.\
name $name
>He seems to have ejected a good quantity of semen on the eggs.@
>But you need to make them ejaculate a few times, to ensure the fertilization.\
name ""
name "El"
>Ohh... Really?@
>Ahaha, so we're going to make it go pew pew again? \
name ""
>El's gaze turns to my loose face, laughing all the while.\
name $name
>So with that said, hurry up and come.@
>I want this lesson to be finished quickly.\
name ""
name "Luka"
>N...No way... Ah...\
name ""
>I wither under the Queen's cold gaze, as the eggs continue rubbing against my penis.@
>Their slimy surfaces rub against me as they vibrate, making me feel like I could climax over and over...\
name "El"
>So you just wrap the eggs around the male's penis, and he comes no matter what.@
>Ahaha, that's really easy! \
name ""
name $name
>Yes... When you want to fertilize a large number of eggs, you should use this method.@
>Capture many men, take away their resistance, and cover their genitals in eggs.\
>Leave them like that for a while, and many new children will be born.\
name ""
name "Luka"
>Ahhh!\
name ""
>The sweet sensations of the eggs drive me into another corner as the mother and daughter talk.@
>I can't hold back any longer...\
name "El"
>Eh?@>Is he coming again?@
>But he just came once only a moment ago...?@>Is that possible?\
name ""
name $name
>The touch of the eggs is very comfortable.@
>He seems to have become a slave to fertilizing them.\
name ""
name "Luka"
>Ahhh!\
name ""
>As the Queen's cold eyes watch me, I succumb to the pleasure.\
gosub *syasei1
lsp 700,":a;chara\queenmermaid_hb3.bmp",0,0
lsp 690,":a;chara\queenmermaid_ct13.bmp",0,0
gosub *syasei2
>Just like before, I explode onto the eggs, covering them in semen.@
>With this, I've fertilized the monster's eggs for sure...\
>I can't help but tremble at the immoral action.\
name "Luka"
>Ah...\
name ""
name $name
>That makes two.@
>You should make him ejaculate one more time for good measure.\
name ""
name "El"
>Ehehe, one more she said! @
>So come on and come again! \
name ""
>With a grin, El recites off the lesson her mom just instructed her on.@
>With her staring at me, I lose the will to fight against the pleasure.\
>Giving in to the stimulation of the eggs, my body relaxes as I reach another height.\
name "Luka"
>Ahhh!\
name ""
mov %hseanwave,0:hseanwave
gosub *syasei1
lsp 700,":a;chara\queenmermaid_hb4.bmp",0,0
lsp 690,":a;chara\queenmermaid_ct14.bmp",0,0
gosub *syasei2
>My semen is covering the eggs...@
>With the three ejaculations, it's nearly dripping off of them.\
>Forced to look down at my semen covering the eggs, the shame of it all slams into me.\
name "El"
>Mommy's eggs got all covered in semen!@
>Haha, look at it all hanging onto them.\
name ""
>El points at the eggs as she looks at me and laughs.@
>But the Queen's eyes were completely cold.\
name $name
>With this much semen, it should be enough.@
>Three girls will be born soon, El.\
name ""
name "El"
>Yaaay!@> I'll have younger sisters! \
name ""
name "Luka"
>Ah...\
name ""
>The immorality of fertilizing the eggs and becoming a father slam into me.@
>At the same time, the exhaustion from the consecutive orgasms fills me.\
>My consciousness fades away, and I fall into a deep sleep...\
gosub *anten
>After that, I was taken to the Mermaid's castle.@
>While imprisoned there, I'm gang-raped every day by the Mermaids starting with the Queen.\
>Kept as a sex slave for any of the Mermaids to use freely, I live out the rest of my days.\
>............\
goto *badend



*queenmermaid_hb

mov $bad2,"After being raped, Luka was kept as a sex slave for the Mermaids."
if %2858=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2858,1
name "Luka"
>Ahhh...\
name ""
>Forced to climax by the Queen Mermaid, I'm left helpless.\
name $name
>With that, you can no longer fight back.@
>I shall take ownership of your body.\
name ""
>Thus, I was captured by the Queen Mermaid.\
gosub *anten
cspl 690,701
lsp 700,":a;chara\queenmermaid_ha1.bmp",0,0
bg "bg\bg050.bmp",10,1000
mov %hseanwave,1:hseanwave
name "Luka"
>Ah... Haaa!\
name ""
name $name
>This is how Mermaids mate as they swim...\
name ""
>Holding me tightly in her arms, the Queen rapes me as she swims.@
>With her swimming movements, the muscles inside her vagina move in a unique waving way.\
lsp 690,":a;chara\queenmermaid_ct01.bmp",0,0:print 10,500
>Each tail movement causes another muscle to rub or squeeze against my penis, almost tossing me around inside her wet vagina.\
name "Luka"
>Haa... Ahhh!\
name ""
>The winding shape of her vagina shrinks and expands with each swish of her tail.@
>With my penis stuck inside her, my penis is squeezed and released as we swim in the water.\
>My glans itself is pressed down with each muscle movement she makes, letting me directly feel the results from every movement of her tail.\
name "Luka"
>Ahh... It feels good...\
name ""
name $name
>This is how Mermaids rape men.@
>Both when they really like him, and when they just want to play with him...\
name ""
name "Luka"
>Haaa...\
name ""
>The movements of her lower fish body transmit directly to her vagina, making me want to explode inside of her warm, tight insides.\
name "Luka"
>Ahh... I'm going to come...\
name ""
>I cling tightly to the Queen, and bury my face in her chest.@
>My heart has already melted away, and I've given myself over to this swimming mating.\
name $name
>Already at your limit?@
>That is pathetic.\
>Then I'll make you come.@
>Let me watch your pitiful face as you ejaculate.\
name ""
name "Luka"
>Haa... Ahh!\
name ""
>The Queen speeds up her swimming motion, making her vaginal muscles massage my penis.@
>With my patience at my limit, it was a completely decisive blow.\
gosub *syasei1
lsp 690,":a;chara\queenmermaid_ct02.bmp",0,0
lsp 700,":a;chara\queenmermaid_ha2.bmp",0,0
gosub *syasei2
>Wrapped in her warm insides, my penis twitches as I come, filling up her continually moving vagina.\
name "Luka"
>Ha... Ahh...\
name ""
>Still clinging to the Queen, the feeling of sweet release fills my body.\
name $name
>You must be ecstatic at being able to come inside a Queen's vagina.@
>Here, let me swim a little faster this time.\
name ""
name "Luka"
>Ahhh!!\
name ""
mov %hseanwave,6:hseanwave
>The Queen suddenly starts swimming much faster, her tail movements drastically increasing the rubbing of her vaginal walls against my penis.\
>Her muscles squeeze and contract, tightening and releasing the pressure around my penis in a speed I wouldn't have thought possible.\
name "Luka"
>Hyaaa!@> It's squeezing...!\
name ""
>Panting in pleasure, I cling tightly to her body, trying to hold on as the ecstasy takes me over.@
>Looking down as she swims, the Queen just stares at me with a cold expression.\
name $name
>Sheesh... Humans really are pitiful creatures, aren't they?@
>If you're reacting like that, have you become a captive of my vagina?\
>Then I'll squeeze all of your semen out...@
>It's your reward for daring to resist me.\
name ""
name "Luka"
>Haa... Ahhh!\
name ""
>Her intense swimming motions toss my penis around inside of her.@
>Her powerful swimming muscles flex and compress my penis, only to be released a second later as her tail goes the other direction.\
>The irregular movements make me gasp in pleasure as I'm helplessly toyed with, my penis feeling like it's being rubbed raw inside her.\
name "Luka"
>C...Coming... I'm coming already!\
name ""
name $name
>Can't you endure it a little bit longer?@
>Or are you just a man who can't help but pollute my insides continually?\
name ""
name "Luka"
>Hyaaa!\
name ""
gosub *syasei1
lsp 690,":a;chara\queenmermaid_ct03.bmp",0,0
lsp 700,":a;chara\queenmermaid_ha3.bmp",0,0
gosub *syasei2
>Clinging to her body as tight as I can, I explode in her.@
>In her still squeezing and contracting vagina, my penis is tossed around even during my orgasm.\
name "Luka"
>Haaa...\
name ""
>The mad pleasure melts away my heart and mind, unable to feel anything but the pleasure from her vagina...\
mov %hseanwave,0:hseanwave
name $name
>Your body belongs to me.@
>I'll play with you when I have time.\
>If I tire of you, I'll give you to my subordinates.@
>Until then, you'll serve as my partner.\
name ""
name "Luka"
>Haaa...\
name ""
>After that, I was taken to the Mermaid's castle.@
>While imprisoned there, I'm gang-raped every day by the Mermaids starting with the Queen.\
>Kept as a sex slave for any of the Mermaids to use freely, I live out the rest of my days.\
gosub *anten
>............\
goto *badend



*shadow_start

mov $name,"Shadow Girl"
mov $name2,"Shadow Girl"
mov $lavel,"shadow"
mov $tatie1,"shadow_st01"
mov $tatie2,"shadow_st01"
mov $tatie3,"shadow_st01"
mov $tatie4,"shadow_st11"
mov $haikei,"bg056"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,14000
if %nanido=2 mov %max_enemylife,17000
if %nanido=3 mov %max_enemylife,20000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,1
mov %alice_skill1,50
mov %alice_skill2,20
mov %alice_skill3,20
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free from her restraint!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"No... Running..."
mov $mogaku_sel2,"I won't..."
mov $mogaku_sel3,"Nothing escapes..."
mov $mogaku_sel4,"Impossible..."
mov $mogaku_sel5,"No... Squeeze..."
mov $mogaku_dassyutu1,"........."
mov $mogaku_dassyutu2,""
mov $half_s1,"Semen... Want..."
mov $half_s2,"Male... Semen..."
mov $kiki_s1,"Squeeze..."
mov $kiki_s2,"Take body... Violate..."
mov %end_n,11
mov %exp_minus,0
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,4
mov %owaza_count3a,4
name "Luka"
>A monster!?\
name ""
>She's clearly not an angel...@
>Could she be a Chimeric Beast?\
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\shadow_st01.bmp",160,0:print 10,500
name "Alice"
>She's... A monster formed from residual dark magic inside deep shadows.@
>Whew... Not a ghost.\
name ""
>I've wondered this before, but just what kind of strange classification of "ghost" does Alice have?\
name "Alice"
>But don't lower your guard, she isn't a naturally occurring monster...@
>She was probably made artificially!\
name ""
name "Luka"
>Is she also the result of Promestein's experiments?@
>If so, I have no choice but to fight...!\
name ""
csp 701
gosub *face1
>I draw my sword in front of the creeping Shadow Girl!\
mov %sinkou,1
goto *common_main



*shadow_v

gosub *face3
name $name
>..........\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Shadow Girl vanishes into the darkness!\
mov %viclose,1:gosub *victory
mov %getexp,170000:gosub *lvup
mov %2372,1
goto *sean0334



*shadow_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
goto *shadow_a



*shadow_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *shadow_kousan
if %cmd1=16 goto *shadow_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *shadow_main



*shadow_a

if %kousoku=1 gosub *shadow_a5:goto *common_main
rnd2 %ransu,1,4
if %ransu=1 gosub *shadow_a1:goto *common_main
if %ransu=2 gosub *shadow_a2:goto *common_main
if %ransu=3 && %owaza_count3a>5 gosub *shadow_a3:goto *common_main
if %ransu=4 && %owaza_count1a>5 gosub *shadow_a4:goto *common_main
skip -5



*shadow_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Mouth... Suck..."
if %ransu=2 mov $sel1,"Mouth... Slurp..."
if %ransu=3 mov $sel1,"Ejaculate... Mouth..."
name $name
eng $sel1:$sel6\
name ""
skillname "Mouth of Shadow"
dwave 1,"se\ero_buchu2.ogg"
eng "The Shadow Girl sucks Luka's penis into her mouth!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
>The strange, sticky cold of her mouth forces bizarre pleasure through Luka's body!
skillcount3 3809
if %nanido<2 damage 330,350
if %nanido=2 damage 360,380
if %nanido=3 damage 390,410
skillname ""
if %mylife=0 sub %stack,1:return *shadow_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*shadow_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Breast... Semen..."
if %ransu=2 mov $sel1,"Squeeze... Ejaculate..."
if %ransu=3 mov $sel1,"Semen... Breasts... Squeeze..."
name $name
eng $sel1:$sel6\
name ""
skillname "Breasts of Shadow"
dwave 1,"se\ero_sigoki1.ogg"
eng "The Shadow Girl sandwiches Luka's penis between her breasts!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
>Her cold, sticky body forces bizarre pleasure through Luka's body!
skillcount3 3810
if %nanido<2 damage 350,370
if %nanido=2 damage 380,400
if %nanido=3 damage 410,430
skillname ""
if %mylife=0 sub %stack,1:return *shadow_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*shadow_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hair... Squeeze..."
if %ransu=2 mov $sel1,"Hair... Suck..."
if %ransu=3 mov $sel1,"Hair... Ejaculate..."
name $name
eng $sel1:$sel6\
name ""
skillname "Hair of Shadow"
dwave 1,"se\umaru.ogg"
>The Shadow Girl's hair races toward Luka's groin!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3811
if %nanido<2 damage 120,140
if %nanido=2 damage 130,150
if %nanido=3 damage 140,160
dwave 1,"se\umaru.ogg"
>The cold hair coils around Luka's penis!
if %nanido<2 damage 120,140
if %nanido=2 damage 130,150
if %nanido=3 damage 140,160
dwave 1,"se\umaru.ogg"
>While rubbing against him, the hair tightens around his penis!
if %nanido<2 damage 120,140
if %nanido=2 damage 130,150
if %nanido=3 damage 140,160
skillname ""
if %mylife=0 sub %stack,1:return *shadow_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*shadow_a4

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 4
name $name
>Freedom... Take...\
name ""
skillname "Cross of Shadow"
dwave 1,"se\ero_slime1.ogg"
>The Shadow Girl grabs Luka from behind, and entangles her body with his!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3812
if %nanido<2 damage 320,340
if %nanido=2 damage 350,370
if %nanido=3 damage 380,400
mov %kousoku,1:gosub *status_print
>Luka has been bound by the Shadow Girl!\
skillname ""
if %mylife=0 sub %stack,1:return *shadow_h4
name $name
>Now... Semen...\
name ""
mov %first_sel1,1
if %nanido<2 mov %genmogaku,1
if %nanido=2 mov %genmogaku,1
if %nanido=3 mov %genmogaku,2
sub %stack,1
return



*shadow_a5

add %stack,1
>Luka has been bound by the Shadow Girl...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Cross... Squeeze..."
if %ransu=2 mov $sel1,"Penis... Extract..."
if %ransu=3 mov $sel1,"Semen... Suck..."
name $name
eng $sel1:$sel6\
name ""
skillname "Cross of Shadow"
dwave 1,"se\ero_slime1.ogg"
>The sticky shadows that make up the Shadow Girl's body stroke Luka's penis!
skillcount3 3812
if %nanido<2 damage 320,340
if %nanido=2 damage 350,370
if %nanido=3 damage 380,400
skillname ""
if %mylife=0 sub %stack,1:return *shadow_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
return



*shadow_onedari

mov $list1,"Mouth of Shadow"
if %3809>0 mov %list_num1,1
mov $list2,"Breasts of Shadow"
if %3810>0 mov %list_num2,1
mov $list3,"Hair of Shadow"
if %3811>0 mov %list_num3,1
mov $list4,"Cross of Shadow"
if %3812>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *shadow_onedari1
if %cmd1=12 goto *shadow_onedari2
if %cmd1=13 goto *shadow_onedari3
if %cmd1=14 goto *shadow_onedari4
if %cmd1=-1 goto *shadow_main
goto *shadow_onedari



*shadow_onedari1

gosub *onedari_syori
name $name
>Giving yourself up...\
name ""
gosub *shadow_a1
skip -1



*shadow_onedari2

gosub *onedari_syori
name $name
>Giving yourself up...\
name ""
gosub *shadow_a2
skip -1



*shadow_onedari3

gosub *onedari_syori
name $name
>Giving yourself up...\
name ""
gosub *shadow_a3
skip -1



*shadow_onedari4

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>Giving yourself up...\
name ""
if %kousoku=0 gosub *shadow_a4
gosub *shadow_a5
skip -1



*shadow_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\shadow_bk01.bmp",0,0
gosub *syasei2
>As the cold Shadow Girl's mouth sucks on his penis, Luka comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2672,%2672+1:if %2672=1 mov %count_koenemy,%count_koenemy+1
if %2672>%count_most mov %count_most,%2672:mov $count_mostname,$name
count 4,11
mov $bad1,"The Shadow Girl forced Luka to come with her mouth."
gosub *face2
name $name
>Finished...\
name ""
goto *shadow_h



*shadow_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\shadow_bk03.bmp",0,0
gosub *syasei2
>As the cold Shadow Girl's breasts squeeze Luka's penis, he comes, covering her jet black chest with semen.\
mov %viclose,1:gosub *lose
mov %2672,%2672+1:if %2672=1 mov %count_koenemy,%count_koenemy+1
if %2672>%count_most mov %count_most,%2672:mov $count_mostname,$name
count 7,11
mov $bad1,"The Shadow Girl forced Luka to come with her breasts."
gosub *face2
name $name
>Finished...\
name ""
goto *shadow_h



*shadow_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\shadow_bk02.bmp",0,0
gosub *syasei2
>As the Shadow Girl's cold hair coils around Luka's penis, he comes, covering her jet black head with semen.\
mov %viclose,1:gosub *lose
mov %2672,%2672+1:if %2672=1 mov %count_koenemy,%count_koenemy+1
if %2672>%count_most mov %count_most,%2672:mov $count_mostname,$name
count 22,11
mov $bad1,"The Shadow Girl used her hair to force Luka to come."
gosub *face2
name $name
>Finished...\
name ""
goto *shadow_h



*shadow_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\shadow_st12.bmp",0,0
gosub *syasei2
>As the Shadow Girl's jet black body swirls and melds with Luka's body, he comes, covering her jet black body with semen.\
mov %viclose,1:gosub *lose
mov %2672,%2672+1:if %2672=1 mov %count_koenemy,%count_koenemy+1
if %2672>%count_most mov %count_most,%2672:mov $count_mostname,$name
count 28,11
mov $bad1,"The Shadow Girl forced Luka to come as she held him from behind."
gosub *face2
name $name
>Finished...\
name ""
goto *shadow_h



*shadow_h

mov $bad2,"Completely incorporated into the Shadow Girl, Luka becomes one with her."
if %2672=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahhh...\
name ""
name $name
>Now, capture...@
>Unite and become one...\
name ""
cspl 690,699
lsp 700,":a;chara\shadow_h1.bmp",0,0:print 10,500
>Drained of strength and on the ground, the Shadow Girl clings to me from behind.@
>Her body presses against me, feeling lukewarm and oddly sticky.\
>Pressing her body against me, it feels more like I'm sinking into a swamp than being held by a solid being.@
>Still pressing harder against me, it feels like her body is somehow taking mine into hers.\
name "Luka"
>S...Stop... Ah...\
name ""
>The Shadow Girl's arm reaches around and strokes across my chest.@
>At the same time, another arm reaches from underneath me and gently grabs hold of my penis!\
name "Luka"
>Ah...\
name ""
mov %hseanwave,18:hseanwave
>The lukewarm feeling of her hand causes my body to shiver as the first response.@
>But as her hand closes around my penis, it feels less like she's grabbing it, and more like my penis is just sinking into her body.\
>Her hand isn't even moving, either...@
>Despite that, the sticky feeling of her body brings an unusual spark of pleasure with it.\
name "Luka"
>Ah...Ah... Let me go...@
>Release me...\
name ""
name $name
>Semen... Release...\
name ""
>Everywhere the Shadow Girl touches, I start to lose strength in.@
>Radiating from her jet black body, a feeling of extreme weakness replaces my sensations.\
>It's as if some strange magic is eroding away my body itself.@
>But it doesn't feel unpleasant... The weakness feels more like my body is relaxing and being filled with pleasure instead.\
name "Luka"
>Ahh...\
name ""
>That same feeling of weakness and relaxation fills my penis, too.@
>With my penis sunk inside her jet black hand, my thoughts turn more and more toward just focusing on the pleasure.\
>My body gently shakes and twitches as my weakest point is surrounded.@
>As the gentle pleasure fills me, I let my tension go as I give in to the rising desire.\
name "Luka"
>What is this... Haaa...\
name ""
>The instant I let my tension go, the sweet melting pleasure takes over.\
gosub *syasei1
lsp 700,":a;chara\shadow_h2.bmp",0,0
gosub *syasei2
>With a couple twitches, my semen spills out into her black hand.@
>Barely aware of it, I had reached a orgasm.\
name "Luka"
>Ahh... I came...\
name ""
>The feeling of orgasm was far different from any I had felt before.@
>With my penis weakened by the strange magic coming from the Shadow Girl, it felt more like I accidentally urinated.\
>More of that relaxing pleasure spreads to the rest of my body, making it feel like more of my body is melting away in bliss.\
name "Luka"
>Ahh... What's going on...?\
name ""
mov %hseanwave,19:hseanwave
>I feel like the Shadow Girl's body behind me is slowly stretching out...@
>Along with that, the strange malaise coming over me gets more powerful.\
>It brings more of the pleasure, but also an ominous sense of foreboding.\
name "Luka"
>This isn't... How she weakens prey is it?\
name ""
name $name
>More... More... Semen... Release...\
name ""
>I have no doubt...@> This Shadow Girl is trying to make me ejaculate to erode away my body.@
>Once I'm completely weakened, she's going to absorb my body...!\
name "Luka"
>Guh... Get off!\
name ""
>I frantically twist and struggle, trying to get her off my back.\
>But it's no good... the Shadow Girl has already eroded most of my body.@
>No matter how much I struggle, I won't get her off of me.\
name "Luka"
>Urhg...\
name ""
>I clench my teeth, trying to stop myself from ejaculating again.@
>If I give in to pleasure here, she'll take my body.\
name $name
>Pointless...@> Release it all...\
name ""
name "Luka"
>Ah...\
name ""
>Her hand that was still before suddenly starts slowly moving.@
>Stroking me from root to tip, the slow movements are almost unbearable.\
>The calm, slow movements of her trying to make me ejaculate are too much, and I can't stop a moan from leaking out.\
name "Luka"
>It feels good...@> I...I can't take this...\
name ""
>With the weakness spreading over almost my whole body, I can't take it any longer.@
>Letting go of the last of my endurance, I relax and embrace the pleasure.\
gosub *syasei1
lsp 700,":a;chara\shadow_h3.bmp",0,0
gosub *syasei2
name "Luka"
>Haaa...\
name ""
>As her slowly stroking hand continues, I come.@
>Despite knowing that my ejaculation will let her erode more of my body, I couldn't stop it.\
>The Shadow Girl's dark body takes over more of my own, leaving me even weaker.@
>As I am now, I can't even move a finger...\
name "Luka"
>Stop... If I come any more... Ah...\
name ""
name $name
>Come... Everything...\
name ""
>Ignoring me, her hand continues slowly stroking me.@
>Her lukewarm hand, with my penis sinking into it, gently brings me to another unstoppable orgasm.\
gosub *syasei1
lsp 700,":a;chara\shadow_h4.bmp",0,0
gosub *syasei2
name "Luka"
>Ahh...@
>No... Help me...\
name ""
>Each time I ejaculate, the Shadow Girl takes over more of my body.@
>But still I climax, mixing the pleasure and despair together.\
name $name
>..........\
name ""
name "Luka"
>Ah... Ahh...\
name ""
gosub *syasei1
lsp 700,":a;chara\shadow_h5.bmp",0,0
gosub *syasei2
>After that, I was forced to come over and over again...@
>With those repeated ejaculations, the Shadow Girl eroded the last of my body away.\
>In that lukewarm, relaxing weakness, my body and heart melt away into pure pleasure.@
>Thus, my body is incorporated into the Shadow Girl's...\
>A miserable end as prey, with my semen squeezed out and my body taken.\
mov %hseanwave,0:hseanwave
gosub *anten
>..........\
goto *badend



*gaistvine_start

mov $name,"Paintgeist"
mov $name2,"Paintgeist"
mov $lavel,"gaistvine"
mov $tatie1,"gaistvine_st01"
mov $tatie2,"gaistvine_st01"
mov $tatie3,"gaistvine_st02"
mov $tatie4,"gaistvine_st21"
mov $haikei,"bg057"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,16000
if %nanido=2 mov %max_enemylife,17000
if %nanido=3 mov %max_enemylife,18000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,0
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $half_s1,"Now drown in desire..."
mov $half_s2,"And scatter out that male white liquor..."
mov $kiki_s1,"You're almost finished..."
mov $kiki_s2,"I shall accept all of your desires."
mov %end_n,11
mov %exp_minus,170000
mov %zmonster_x,-300
mov %tukix,300
name $name
>Hehe, come in...@
>Have fun with me forever in my painted world...\
name ""
name "Luka"
>A monster who lives in a painting...@
>Just like the Shadow Girl from before, a bunch of weird ones are here, huh?\
name ""
>She doesn't look like a Chimeric Beast either.@
>Is this strange type of monster naturally occurring, too?\
mov %sinkou,1
goto *common_main



*gaistvine_v

gosub *face3
name $name
>My power... Is fading...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>
mov %viclose,1:gosub *victory
mov %getexp,180000:gosub *lvup
mov %2373,1
goto *sean0335



*gaistvine_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>You want to come in here...?@
>Then let me invite you...\
name ""
goto *gaistvine_a



*gaistvine_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *gaistvine_kousan
if %cmd1=16 goto *gaistvine_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *gaistvine_main



*gaistvine_a

if %status=4 gosub *gaistvine_a7:goto *common_main
if %counter>0 add %counter,1
if %counter>4 gosub *gaistvine_x2:goto *common_main
if %counter>0 rnd2 %ransu,1,2
if %counter>0 && %ransu=1 gosub *gaistvine_a5:goto *common_main
if %counter>0 && %ransu=2 && %owaza_count2a>2 gosub *gaistvine_a6:goto *common_main
if %counter>0 skip -3
if %kousan=1 skip 3
mov %hanyo2,%hanyo2+1
if %hanyo2>5 gosub *gaistvine_x1:goto *common_main
rnd2 %ransu,1,4
if %ransu=1 gosub *gaistvine_a1:goto *common_main
if %ransu=2 gosub *gaistvine_a2:goto *common_main
if %ransu=3 gosub *gaistvine_a3:goto *common_main
if %ransu=4 gosub *gaistvine_a4:goto *common_main
skip -5



*gaistvine_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Drown in my sweet kiss..."
if %ransu=2 mov $sel1,"You may finish during my kiss..."
if %ransu=3 mov $sel1,"Let us devour each other's lips in desire..."
name $name
eng $sel1:$sel6\
name ""
skillname "Kiss of Desire"
dwave 1,"se\ero_chupa2.ogg"
>The Paintgeist sucks on Luka's lips as she deeply kisses him!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3813
if %nanido<2 damage 260,280
if %nanido=2 damage 280,300
if %nanido=3 damage 300,320
skillname ""
if %mylife=0 sub %stack,1:return *gaistvine_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*gaistvine_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Taste the sweet sensual pleasure of my hand..."
if %ransu=2 mov $sel1,"I'll make you drunk on my hand skills..."
if %ransu=3 mov $sel1,"I'll accept the fluids of your desire in my palm..."
name $name
eng $sel1:$sel6\
name ""
skillname "Sensual Handjob"
dwave 1,"se\ero_koki1.ogg"
>The Paintgeist gently rubs and strokes Luka's penis, massaging him!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3814
if %nanido<2 damage 270,290
if %nanido=2 damage 290,310
if %nanido=3 damage 310,330
skillname ""
if %mylife=0 sub %stack,1:return *gaistvine_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*gaistvine_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck out the cause of your desire..."
if %ransu=2 mov $sel1,"Give in to the pleasure and release in my mouth..."
if %ransu=3 mov $sel1,"Get a good taste of my oral techniques..."
name $name
eng $sel1:$sel6\
name ""
skillname "Mouth of Desire"
dwave 1,"se\ero_buchu3.ogg"
>The Paintgeist eagerly and intensely sucks on Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3815
if %nanido<2 damage 280,300
if %nanido=2 damage 300,320
if %nanido=3 damage 320,340
skillname ""
if %mylife=0 sub %stack,1:return *gaistvine_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*gaistvine_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You may release all of your desire on my ass..."
if %ransu=2 mov $sel1,"My dirty ass has taken the desires of many men..."
if %ransu=3 mov $sel1,"I'll violate you with my ass..."
name $name
eng $sel1:$sel6\
name ""
skillname "Ass of Desire"
dwave 1,"se\ero_sigoki1.ogg"
>The Paintgeist presses her ass against Luka's penis, and shakes her lower body up and down.
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3816
if %nanido<2 damage 290,310
if %nanido=2 damage 310,330
if %nanido=3 damage 330,350
skillname ""
if %mylife=0 sub %stack,1:return *gaistvine_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*gaistvine_x1

add %stack,1
if %kousan=2 skip 4
name $name
>...........\
name ""
mov $tatie1,"gaistvine_st11"
mov $tatie2,"gaistvine_st11"
mov $tatie3,"gaistvine_st11"
mov $tatie4,"gaistvine_st21"
gosub *face1
>The Paintgeist retracts into her painting...\
mov %counter,1
sub %stack,1
return



*gaistvine_a5

add %stack,1
name $name
>..........\
name ""
>The Paintgeist is inside her painting...\
sub %stack,1
return



*gaistvine_a6

add %stack,1
mov %owaza_count2a,0
name $name
>..........\
name ""
skillname "Eyes of Obedience"
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
eng "The Paintgeist's eyes mysteriously flash!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount3 3817
mov %status,4:gosub *status_print
>Luka surrenders to the Paintgeist!\
skillname ""
name $name
>Now you can't go against me.\
name ""
name "Luka"
>Ahhh...\
name ""
>I can't move my body any longer...@
>I'm left completely still, only able to respond to her orders.\
name $name
>Now grab hold of your penis.@
>Stroke it until you force yourself to come.\
name ""
name "Luka"
>Y...Yes...\
name ""
>Luka grabs his penis, and starts to masturbate!
mov %damage_kotei,1
damage 200,220
if %mylife=0 sub %stack,1:return *gaistvine_h5
rnd2 %status_turn,1,2
if %nanido=2 rnd2 %status_turn,1,2
if %nanido=3 rnd2 %status_turn,2,3
sub %stack,1
return



*gaistvine_x2

add %stack,1
if %kousan=2 skip 5
name $name
>You won't attack my painting...@
>Is it because you're a Gentleman?@>Or do you sense danger...?\
name ""
mov $tatie1,"gaistvine_st01"
mov $tatie2,"gaistvine_st01"
mov $tatie3,"gaistvine_st02"
mov $tatie4,"gaistvine_st21"
gosub *face1
>The Paintgeist emerges from her picture!\
mov %counter,0
mov %hanyo2,0
sub %stack,1
return



*gaistvine_a7

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Keep stroking yourself until you ejaculate."
if %ransu=2 mov $sel1,"Grab your penis, and bring yourself to your own ruin."
if %ransu=3 mov $sel1,"Masturbate in front of me."
name $name
eng $sel1:$sel6\
name ""
>Luka continues stroking himself in front of the Paintgeist...
mov %damage_kotei,1
damage 200,220
if %mylife=0 sub %stack,1:return *gaistvine_h5
sub %stack,1
return



*gaistvine_counter

add %stack,1
mov %counter,0
if %kousan=2 skip 6
lsp 700,":a;chara\gaistvine_st01.bmp",0,0:print 10,500
name $name
>Now come inside...@
>I'll guide you to a world of pleasure.\
name ""
skillname "Baroque Orgasm"
>The Paintgeist grabs hold of Luka's body, and drags him into her painting!@
mov $tatie4,"gaistvine_st21"
mov %kousoku,1:gosub *status_print
>Luka is stuck inside the painting!\
skillname ""
name "Luka"
>Wh...What is this!?\
name ""
>I'm laying down in a strange room, unable to move a muscle.@
>It's as if I'm part of the painting itself...\
name $name
>Welcome to my world.@
>You've been incorporated into it as a motif of semen exploitation...\
name ""
>The Paintgeist grabs hold of Luka's penis with her soft hand!\
sub %stack,1
goto *gaistvine_a8



*gaistvine_a8

add %stack,1
>Luka is trapped in the painting...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll milk it out like this...":mov $sel2,"Stroking Luka's penis quickly up and down, she forces pleasure into him!"
if %ransu=2 mov $sel1,"Now taste the pleasure that will melt you away...":mov $sel2,"The Paintgeist uses her other palm to rub the tip of Luka's penis!"
if %ransu=3 mov $sel1,"Don't worry about how many climaxes you reach....":mov $sel2,"Gently holding Luka's penis, she starts squeezing him!"
if %ransu=4 mov $sel1,"Drown in my sexual techniques until your heart melts away...":mov $sel2,"Using her fingertips, the Paintgeist traces around the tip of Luka's penis!"
if %ransu=5 mov $sel1,"I'll squeeze you empty in this world of mine...":mov $sel2,"Forming a circle with her thumb and pointer finger, the Paintgeist strokes Luka right under the neck of his penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Baroque Orgasm"
dwave 1,"se\ero_koki1.ogg"
eng $sel2:$sel6
skillcount3 3818
mov %damage_kotei,1
damage 300,320
skillname ""
if %mylife=0 sub %stack,1:return *gaistvine_h6
sub %stack,1
goto *gaistvine_a8



*gaistvine_onedari

mov $list1,"Kiss of Desire"
if %3813>0 mov %list_num1,1
mov $list2,"Sensual Handjob"
if %3814>0 mov %list_num2,1
mov $list3,"Mouth of Desire"
if %3815>0 mov %list_num3,1
mov $list4,"Ass of Desire"
if %3816>0 mov %list_num4,1
mov $list5,"Eyes of Obedience"
if %3817>0 mov %list_num5,1
mov $list6,"Baroque Orgasm"
if %3818>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *gaistvine_onedari1
if %cmd1=12 goto *gaistvine_onedari2
if %cmd1=13 goto *gaistvine_onedari3
if %cmd1=14 goto *gaistvine_onedari4
if %cmd1=15 goto *gaistvine_onedari5
if %cmd1=16 goto *gaistvine_onedari6
if %cmd1=-1 goto *gaistvine_main
goto *gaistvine_onedari



*gaistvine_onedari1

gosub *onedari_syori
name $name
>You want to finish while kissing me?@
>Then please entrust everything to me...\
name ""
if %counter>0 gosub *gaistvine_x2
gosub *gaistvine_a1
skip -1



*gaistvine_onedari2

gosub *onedari_syori
name $name
>You want to finish as I stroke your penis?@
>Then please entrust everything to me...\
name ""
if %counter>0 gosub *gaistvine_x2
gosub *gaistvine_a2
skip -1



*gaistvine_onedari3

gosub *onedari_syori
name $name
>You want to finish as I suck your penis?@
>Then please entrust everything to me...\
name ""
if %counter>0 gosub *gaistvine_x2
gosub *gaistvine_a3
skip -1



*gaistvine_onedari4

gosub *onedari_syori
name $name
>You want to finish as I press my ass against your penis?@
>Then please entrust everything to me...\
name ""
if %counter>0 gosub *gaistvine_x2
gosub *gaistvine_a4
skip -1



*gaistvine_onedari5

gosub *onedari_syori
name $name
>You want me to control your body and become a complete slave to my will...?@
>You're a total mystery...\
name ""
if %counter=0 gosub *gaistvine_x1
gosub *gaistvine_a6
gosub *gaistvine_a7
skip -1



*gaistvine_onedari6

gosub *onedari_syori
name $name
>You want me to stroke you inside my painting?@
>Then I'll lead you to a world of pleasure...\
name ""
if %counter=0 gosub *gaistvine_x1
gosub *gaistvine_counter



*gaistvine_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\gaistvine_bk01.bmp",0,0
gosub *syasei2
>As the Paintgeist sweetly kisses Luka, he comes, covering her stomach in semen.\
mov %viclose,1:gosub *lose
mov %2673,%2673+1:if %2673=1 mov %count_koenemy,%count_koenemy+1
if %2673>%count_most mov %count_most,%2673:mov $count_mostname,$name
count 18,3
mov $bad1,"The Paintgeist forced Luka to come as she kissed him."
gosub *face2
name $name
>Are you satisfied...?@
>Then let me take you into my world...\
name ""
goto *gaistvine_h



*gaistvine_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\gaistvine_bk01.bmp",0,0
gosub *syasei2
>As the Paintgeist gently strokes Luka's penis, he comes, covering her hand in semen.\
mov %viclose,1:gosub *lose
mov %2673,%2673+1:if %2673=1 mov %count_koenemy,%count_koenemy+1
if %2673>%count_most mov %count_most,%2673:mov $count_mostname,$name
count 5,3
mov $bad1,"Luka was forced to come by the Paintgeist's hand techniques."
gosub *face2
name $name
>Are you satisfied...?@
>Then let me take you into my world...\
name ""
goto *gaistvine_h



*gaistvine_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\gaistvine_bk01.bmp",0,0
gosub *syasei2
>As the Paintgeist sucks on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2673,%2673+1:if %2673=1 mov %count_koenemy,%count_koenemy+1
if %2673>%count_most mov %count_most,%2673:mov $count_mostname,$name
count 4,3
mov $bad1,"The Paintgeist forced Luka to come with her mouth."
gosub *face2
name $name
>Are you satisfied...?@
>Then let me take you into my world...\
name ""
goto *gaistvine_h



*gaistvine_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\gaistvine_bk01.bmp",0,0
gosub *syasei2
>As the Paintgeist presses her ass against Luka's penis, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2673,%2673+1:if %2673=1 mov %count_koenemy,%count_koenemy+1
if %2673>%count_most mov %count_most,%2673:mov $count_mostname,$name
count 34,3
mov $bad1,"The Paintgeist forced Luka to come with her ass."
gosub *face2
name $name
>Are you satisfied...?@
>Then let me take you into my world...\
name ""
goto *gaistvine_h



*gaistvine_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 697,":a;chara\gaistvine_bk17.bmp",0,0
gosub *syasei2
>Still stroking himself as the Paintgeist ordered, Luka comes, spraying his semen onto her painting.\
mov %viclose,1:gosub *lose
mov %2673,%2673+1:if %2673=1 mov %count_koenemy,%count_koenemy+1
if %2673>%count_most mov %count_most,%2673:mov $count_mostname,$name
count 21,3
mov $bad1,"As the Paintgeist ordered him to, Luka stroked himself until he ejaculated."
gosub *face2
name $name
>Hehe, how miserable...@
>Now next, how about I comfort you...?\
name ""
goto *gaistvine_h



*gaistvine_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\gaistvine_st22.bmp",0,0
gosub *syasei2
>As the Paintgeist strokes Luka's penis inside her painting, he comes, covering her hand in semen.\
mov %viclose,1:gosub *lose
mov %2673,%2673+1:if %2673=1 mov %count_koenemy,%count_koenemy+1
if %2673>%count_most mov %count_most,%2673:mov $count_mostname,$name
count 5,3
mov $bad1,"The Paintgeist forced Luka to come with her hand."
gosub *face2
name $name
>That's one...@
>I'll have you taste far more pleasure than that...\
name ""
goto *gaistvine_h



*gaistvine_h

mov $bad2,"Drawn into the painting, Luka was eternally milked for semen."
if %2673=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
gosub *anten
>After that, I was drawn into the painting.@
>Stuck in a world I can never escape from, I'm raped for an eternity...\
mov %hseanwave,17:hseanwave
lsp 700,":a;chara\gaistvine_st21.bmp",0,0
bg "bg\bg057.bmp",10,1500
>There's a painting decorating a certain room...@
>From it, a faint moan can be heard.\
>A woman is gently stroking a young boy's penis, her nimble fingers slowly sliding up and down his erect penis.\
name "Luka"
>Ahh...\
name ""
>The young boy continues moaning, his small body shaking every so often.@
>But the woman's skilled hand never stops, using the palm of her other hand to gently rub the boy's glans.\
>Sometimes her movements change, using her thumb and index finger to rub right under the neck of his penis.@
>Other times she brings her hands together to squeeze his penis between them.\
>Under her skilled techniques, the boy is left completely helpless, only able to moan.\
name "Luka"
>Ahhh...!\
name ""
>As the boy's moans get louder, the woman's hand movements get quicker and quicker.\
>It's exactly as if they're moving down the final spurt...@
>At last, the moment of the boy's surrender came.\
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\gaistvine_st22.bmp",0,0
gosub *syasei2
>The boy's penis pulses, as his semen shoots out onto the woman's face.\
lsp 700,":a;chara\gaistvine_st23.bmp",0,0:print 10,500
>At the same time, a cloudy liquid oozes out from the painting itself.\
name "Luka"
>Ahh...\
name ""
>But even then, the woman in the painting doesn't stop stroking him with her hands.\
>Not giving him a break even during his ejaculation, she is already skillfully working him towards his next orgasm.\
name "Luka"
>Hyaaa...\
name ""
>The boy trembles as the woman uses her fingers to rub the tip of his penis.@
>Tracing around the tip, her finger moves to under the neck of his penis, and finally down his back muscle.\
>Almost like a puppet on strings attached to the woman's fingers, the boy twitches with each finger movement.@
>After only moments, the boy is already moaning again, nearing another height.\
name "Luka"
>Ahh...\
name ""
>As the boy's moans get louder, the woman's movements change again.@
>This time she brings her hands together, and squeezes the boy's penis.\
>Using the palm of her left hand, she rubs his glans as she squeezes down.@
>With her right hand, she squeezes his shaft as she slowly strokes him up and down.\
>Under her devilish assault, the young boy stands no chance.\
name "Luka"
>Hyaaa!\
name ""
gosub *syasei1:gosub *syasei2
>Shortly after his last orgasm, more semen spurts out, covering both the woman and the painting itself.\
>This painting is named the Semen Prison.@
>For one drawn inside, their fate is to be endlessly milked of semen for an eternity.\
name "Luka"
>Ahhh...\
name ""
>The indecent scene of the woman squeezing the young boy's semen continues on in the painting.@
>Large amounts of semen are discharged from the painting, covering both the wall and the floor.\
>No matter how much semen the boy is milked of, he will never be released.@
>For the rest of eternity, he will continue having his semen milked out by the woman's hand...\
mov %hseanwave,0:hseanwave
gosub *anten
>...........\
goto *badend



*chrom2_start

mov $name,"Chrome"
mov $name2,"Chrome"
mov $lavel,"chrom2"
mov $tatie1,"chrom_st41"
mov $tatie2,"chrom_st42"
mov $tatie3,"chrom_st43"
mov $tatie4,"chrom_st42"
mov $haikei,"bg058"
mov %monster_x,-50
mov %monster_y,0
if %nanido=1 mov %max_enemylife,18000
if %nanido=2 mov %max_enemylife,21000
if %nanido=3 mov %max_enemylife,24000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,1
mov %music,2
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free from the ghost's restraint!"
mov $mogaku_anno2,"Luka broke free of the ghosts!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Haha, you won't escape with that!"
mov $mogaku_sel2,"Yes, good. Hold him down like that!"
mov $mogaku_sel3,"You can't get Spi or Rit off of you that easily!"
mov $mogaku_sel4,"Hehe... Struggle, struggle! Then come!"
mov $mogaku_sel5,"Haha! I want to see you spray your semen as you struggle!"
mov $mogaku_dassyutu1,"Fool... You struggle in vain."
mov $mogaku_dassyutu2,"I'll make it twice as bad later in payback!"
mov $half_s1,"Hehe... How is my ghost's handling?"
mov $half_s2,"Give up and give us your semen!"
mov $kiki_s1,"Hehe, you look to be at your limit."
mov $kiki_s2,"Come on, I'll let these two suck on you plenty..."
mov %end_n,11
mov %exp_minus,350000
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,5
mov %owaza_count3a,5
name $name
>Spi!@> Rit!@>Let's do this!@
>Use your sexual skills to play with that Hero!\
name ""
dwave 1,"se\yami.ogg"
lsp 700,":a;chara\chrom_st41.bmp",-50,0
lsp 699,":a;chara\chromg_st02.bmp",-250,0:print 10,500
name "Spi"
>Ahaha, here I cooome! \
name ""
dwave 2,"se\yami.ogg"
lsp 698,":a;chara\chromg_st11.bmp",230,40:print 10,500
name "Rit"
>I want it...\
name ""
>Two ghosts appear at Chrome's side.@
>They don't seem like normal ones, either.@>They both feel really powerful...\
>Chrome made more powerful undead creatures with her research...!\
name "Luka"
>...There's no choice, I'll have to fight!\
name ""
mov %sinkou,1
goto *common_main



*chrom2_v

dwave 1,"se\escape.ogg"
cspl 698,699
gosub *face3
name $name
>...I...I give up!@>I surrender...\
name ""
>As the ghosts vanish, Chrome loses the will to fight...\
mov %alice_skill,0
mov %viclose,1:gosub *victory
mov %getexp,200000:gosub *lvup
mov %2374,1
goto *sean0336



*chrom2_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Hehehe, already giving up?@
>Aren't you foolish...@>I'll make you come!\
name ""
goto *chrom2_a



*chrom2_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *chrom2_kousan
if %cmd1=16 goto *chrom2_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *chrom2_alice_skill
goto *chrom2_main



*chrom2_alice_skill

cspl 698,699
lsp 700,":a;chara\alice_st94.bmp",225,250:print 10,500
name "Alice"
>..........\
name ""
>No good...\
lsp 700,":a;chara\chrom_st41.bmp",-50,0
lsp 699,":a;chara\chromg_st02.bmp",-250,0
lsp 698,":a;chara\chromg_st11.bmp",230,40:print 10,500
goto *chrom2_main



*chrom2_a

if %kousoku=1 rnd2 %ransu,1,2
if %kousoku=1 && %ransu=1 gosub *chrom2_a7:goto *common_main
if %kousoku=1 && %ransu=2 gosub *chrom2_a8:goto *common_main
rnd2 %ransu,1,6
if %ransu=1 gosub *chrom2_a1:gosub *chrom2_a2:goto *common_main
if %ransu=2 gosub *chrom2_a1:gosub *chrom2_a3:goto *common_main
if %ransu=3 gosub *chrom2_a1:gosub *chrom2_a4:goto *common_main
if %ransu=4 && %owaza_count2a>6 && %status=0 gosub *chrom2_a5:goto *common_main
if %ransu=5 && %owaza_count1a>6 gosub *chrom2_a6:goto *common_main
if %ransu=6 && %owaza_count3a>6 gosub *chrom2_a9:goto *common_main
skip -7



*chrom2_a1

add %stack,1
rnd2 %ransu,1,12
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hehe... Oh what should I do?"
if %ransu=2 mov $sel1,"Look well on the power of my ghosts!"
if %ransu=3 mov $sel1,"Well!? How do you like my ghosts!"
if %ransu=4 mov $sel1,"If you surrender to me, I won't do anything bad to you..."
if %ransu=5 mov $sel1,"Spi! Rit! Keep on playing with him!"
if %ransu=6 mov $sel1,"Spi! Rit! Show him your power!"
if %ransu=7 mov $sel1,"Taste the results of my research!"
if %ransu=8 mov $sel1,"Never underestimate Chrome!"
if %ransu=9 mov $sel1,"Bring him to his knees!"
if %ransu=10 mov $sel1,"Together now!"
if %ransu=11 mov $sel1,"Just like I taught you!"
if %ransu=12 mov $sel1,"Why not just surrender? I'll treat you well..."
name $name
eng $sel1:$sel6\
name ""
>Chrome laughs as she watches!\
sub %stack,1
return



*chrom2_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Ehehe... I'll squeeze it! "
if %ransu=2 mov $sel1,"Come in my hand! "
if %ransu=3 mov $sel1,"Even though it's a ghost's hands, does your penis feel good?"
name "Spi"
eng $sel1:$sel6\
name ""
if %ransu=1 mov $sel1,"Hurry... Come..."
if %ransu=2 mov $sel1,"Rub the penis like this..."
if %ransu=3 mov $sel1,"Squeeze it by hand..."
name "Rit"
eng $sel1:$sel6\
name ""
skillname "Ghost Handjob"
dwave 1,"se\ero_koki1.ogg"
eng "Spi and Rit both grab Luka's penis, and stroke him at the same time!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount3 3819
mov %damage_nobr,1
if %nanido<2 damage 150,160
if %nanido=2 damage 165,175
if %nanido=3 damage 180,190
if %nanido<2 damage 150,160
if %nanido=2 damage 165,175
if %nanido=3 damage 180,190
skillname ""
if %mylife=0 sub %stack,1:return *chrom2_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*chrom2_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Even a ghost's mouth can be nice and warm! "
if %ransu=2 mov $sel1,"Any man would come if a ghost licked his penis! "
if %ransu=3 mov $sel1,"I'll suck out your semen with my mouth! "
name "Spi"
eng $sel1:$sel6\
name ""
if %ransu=1 mov $sel1,"Dry up... With my mouth..."
if %ransu=2 mov $sel1,"I'll suck you..."
if %ransu=3 mov $sel1,"It feels good... Inside my mouth..."
name "Rit"
eng $sel1:$sel6\
name ""
skillname "Ghost Blowjob"
dwave 1,"se\ero_buchu2.ogg"
eng "Bringing their heads together, Spi and Rit suck on Luka's penis at the same time!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount3 3820
mov %damage_nobr,1
if %nanido<2 damage 160,170
if %nanido=2 damage 175,185
if %nanido=3 damage 190,200
if %nanido<2 damage 160,170
if %nanido=2 damage 175,185
if %nanido=3 damage 190,200
skillname ""
if %mylife=0 sub %stack,1:return *chrom2_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*chrom2_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll squeeze his penis between my breasts!"
if %ransu=2 mov $sel1,"Ahaha... I'll crush it with my breasts! "
if %ransu=3 mov $sel1,"Ghost boobs are really soft you know?"
name "Spi"
eng $sel1:$sel6\
name ""
if %ransu=1 mov $sel1,"Finish between my breasts..."
if %ransu=2 mov $sel1,"How does it feel...? Between a ghost's breasts..."
if %ransu=3 mov $sel1,"I'll squeeze out your semen... With my breasts..."
name "Rit"
eng $sel1:$sel6\
name ""
skillname "Ghost Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
eng "Sandwiching Luka's penis, Spi and Rit rub their breasts together with Luka's penis in between!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount3 3821
mov %damage_nobr,1
if %nanido<2 damage 170,180
if %nanido=2 damage 185,195
if %nanido=3 damage 200,210
if %nanido<2 damage 170,180
if %nanido=2 damage 185,195
if %nanido=3 damage 200,210
skillname ""
if %mylife=0 sub %stack,1:return *chrom2_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*chrom2_a5

add %stack,1
mov %owaza_count2a,0
name $name
>Bad children get injections!\
name ""
skillname "I'll Give an Injection!"
eng "Chrome injects Luka with a strange medicine!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %status,2:gosub *status_print
>Luka has been paralyzed!\
skillname ""
if %kousan>0 skip 4
name "Luka"
>Urhg... Damn it...\
name ""
name $name
>Hehehe, now you can't do anything!@
>Spi! Rit!@>Handle him nice and slow!\
name ""
mov %status_turn,2
if %nanido=2 rnd2 %status_turn,2,3
if %nanido=3 rnd2 %status_turn,3,4
sub %stack,1
return



*chrom2_a6

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 4
name $name
>Spi, Rit!@>Stop him from moving!\
name ""
skillname "Ghost Restraint"
eng "Spi and Rit cling to Luka's body, sealing off his movements!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>Luka has been bound by the ghosts!\
skillname ""
name $name
>Hehe, now you can't move!@
>I'll deal with you nice and slow myself!\
name ""
mov %first_sel1,1
if %nanido<2 mov %genmogaku,2
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,3
sub %stack,1
return



*chrom2_a7

add %stack,1
>Luka has been bound by the ghosts...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll squeeze it all out with my hand!"
if %ransu=2 mov $sel1,"You're gonna leak in my hand!"
if %ransu=3 mov $sel1,"My amazing handling will finish you off!"
name $name
eng $sel1:$sel6\
name ""
skillname "I'll Give a Handjob!"
dwave 1,"se\ero_koki1.ogg"
>Chrome grabs hold of Luka's penis, and strokes him up and down!
skillcount3 3822
if %nanido<2 damage 140,150
if %nanido=2 damage 155,165
if %nanido=3 damage 170,180
dwave 1,"se\ero_koki1.ogg"
>Chrome uses the palm of her other hand to squeeze the glans of Luka's penis!
if %nanido<2 damage 140,150
if %nanido=2 damage 155,165
if %nanido=3 damage 170,180
skillname ""
if %mylife=0 sub %stack,1:return *chrom2_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*chrom2_a8

add %stack,1
>Luka has been bound by the ghosts...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll use my mouth to play with you! Nnn..."
if %ransu=2 mov $sel1,"Hehe, my mouth feels amazing, doesn't it?"
if %ransu=3 mov $sel1,"I'll suck up all your semen with my mouth!"
name $name
eng $sel1:$sel6\
name ""
skillname "I'll Give a Blowjob!"
dwave 1,"se\ero_buchu2.ogg"
>Chrome sucks Luka's penis into her small mouth!
skillcount3 3823
if %nanido<2 damage 150,160
if %nanido=2 damage 165,175
if %nanido=3 damage 180,190
dwave 1,"se\ero_buchu2.ogg"
>Raising and lowering her head, she slowly pumps Luka's penis with her mouth!
if %nanido<2 damage 150,160
if %nanido=2 damage 165,175
if %nanido=3 damage 180,190
skillname ""
if %mylife=0 sub %stack,1:return *chrom2_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*chrom2_a9

add %stack,1
mov %owaza_count3a,0
mov %owaza_num1,1
if %kousan=2 skip 4
name $name
>Spi! Rit!@>Show him your killer move!\
name ""
name "Rit"
>Then I'm first...\
name ""
skillname "Phantasmagoria"
eng "Rit jumps at Luka, and presses her waist against his at the same time!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
dwave 1,"se\ero_pyu1.ogg"
lsp 690,":c;chara\chromg_h1.bmp",0,0:print 10,500
skillcount3 3824
>Luka's penis sinks into the groin area of her astral body!
mov %damage_kotei,1
damage 220,240
mov %kousoku,1:gosub *status_print
>Luka is being raped by Rit!\
skillname ""
name "Rit"
>How does it feel inside me...?\
name ""
name "Luka"
>Ah... Ahh!\
name ""
>A fluffy, twisting sensation surrounds my penis...@
>The unique sensation almost feels like extremely thick gas is flowing around my penis...\
name "Spi"
>Next is me! @
>Two ghosts occupying the same space is really hard...\
name ""
name "Luka"
>Eh...?@> Ahhh!\
name ""
skillname "Phantasmagoria"
>Spi jumps on Luka too, her body overlapping with Rit's!\
dwave 1,"se\ero_pyu1.ogg"
lsp 690,":c;chara\chromg_h7.bmp",0,0:print 10,500
skillcount3 3824
>Melding their two bodies in the same space, Luka's penis is inside Spi's vagina now too!
mov %damage_kotei,1
damage 220,240
mov %kousoku,1:gosub *status_print
>Luka is being raped by Spi!\
skillname ""
if %mylife=0 sub %stack,1:return *chrom2_h6
name "Luka"
>T..This is...@>Ahhh!\
name ""
>With my penis inside both of their vaginas, a bizarre sensation courses through my body.\
>I can feel both of their unique textures at the same time, overlapping with each other...\
name "Spi"
>This is our killer move!@> Synchronous rape! \
name ""
name "Rit"
>Finish quickly as you're raped by both of us...\
name ""
sub %stack,1
goto *chrom2_a10



*chrom2_a10

add %stack,1
>Luka is being raped by the two ghosts...\
rnd2 %ransu,1,4
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 goto *chrom2_a10a
if %ransu=2 goto *chrom2_a10b
if %ransu=3 goto *chrom2_a10c
if %ransu=4 goto *chrom2_a10d



*chrom2_a10a

name $name
>Tighten around him, the two of you!\
name ""
name "Spi"
>Aha, squeeze squeeze! \
name ""
skillname "Phantasmagoria"
dwave 1,"se\ero_chupa5.ogg"
skillcount3 3824
>Spi and Rit both squeeze down on Luka in slightly different amounts!\
mov %damage_kotei,1
mov %damage_nobr,1
damage 180,200
damage 180,200
skillname ""
if %mylife=0 sub %stack,1:return *chrom2_h7
sub %stack,1
goto *chrom2_a10



*chrom2_a10b

name $name
>Give him a good taste of your vaginas you two!\
name ""
name "Spi"
>Here, don't we feel good? \
name ""
skillname "Phantasmagoria"
dwave 1,"se\ero_chupa3.ogg"
skillcount3 3824
>Spi shakes her hips side to side!
mov %damage_kotei,1
damage 180,200
dwave 1,"se\ero_chupa5.ogg"
>At the same time, Rit squeezes down on Luka's penis!
mov %damage_kotei,1
damage 180,200
skillname ""
if %mylife=0 sub %stack,1:return *chrom2_h7
sub %stack,1
goto *chrom2_a10



*chrom2_a10c

name $name
>Both of you, ride him hard!\
name ""
name "Rit"
>Now come... As we ride you...\
name ""
skillname "Phantasmagoria"
dwave 1,"se\ero_chupa3.ogg"
skillcount3 3824
>Spi and Rit bounce up and down on Luka's penis, each moving in the opposite direction of the other!\
mov %damage_kotei,1
mov %damage_nobr,1
damage 180,200
damage 180,200
skillname ""
if %mylife=0 sub %stack,1:return *chrom2_h7
sub %stack,1
goto *chrom2_a10



*chrom2_a10d

name $name
>Use your special techniques to make him come!\
name ""
name "Rit"
>I'll squeeze out your semen...\
name ""
skillname "Phantasmagoria"
dwave 1,"se\ero_buchu3.ogg"
skillcount3 3824
>Spi makes her vagina vibrate around Luka's penis!
mov %damage_kotei,1
damage 180,200
dwave 1,"se\ero_chupa6.ogg"
>Rit's vagina pulls on Luka's penis, making it feel like he's being sucked!
mov %damage_kotei,1
damage 180,200
skillname ""
if %mylife=0 sub %stack,1:return *chrom2_h7
sub %stack,1
goto *chrom2_a10



*chrom2_onedari

mov $list1,"Ghost Handjob"
if %3819>0 mov %list_num1,1
mov $list2,"Ghost Blowjob"
if %3820>0 mov %list_num2,1
mov $list3,"Ghost Tit Fuck"
if %3821>0 mov %list_num3,1
mov $list4,"I'll Give a Handjob!"
if %3822>0 mov %list_num4,1
mov $list5,"I'll Give a Blowjob!"
if %3823>0 mov %list_num5,1
mov $list6,"Phantasmagoria"
if %3824>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *chrom2_onedari1
if %cmd1=12 goto *chrom2_onedari2
if %cmd1=13 goto *chrom2_onedari3
if %cmd1=14 goto *chrom2_onedari4
if %cmd1=15 goto *chrom2_onedari5
if %cmd1=16 goto *chrom2_onedari6
if %cmd1=-1 goto *chrom2_main
goto *chrom2_onedari



*chrom2_onedari1

gosub *onedari_syori
name $name
>You want the ghosts to make you come with their hands?@
>Spi! Rit!@>Give him a handjob!\
name ""
gosub *chrom2_a2
skip -1



*chrom2_onedari2

gosub *onedari_syori
name $name
>You want the ghosts to make you come with their mouths?@
>Spi! Rit!@>Give him a blowjob!\
name ""
gosub *chrom2_a3
skip -1



*chrom2_onedari3

gosub *onedari_syori
name $name
>You want the ghosts to make you come with their breasts?@
>Spi! Rit!@>Use your breasts on him!\
name ""
gosub *chrom2_a4
skip -1



*chrom2_onedari4

gosub *onedari_syori
name $name
>You want me to use my hand to make you come?@
>Spi! Rit!@>Seal off his movements!\
name ""
if %kousoku=0 gosub *chrom2_a6
gosub *chrom2_a7
skip -1



*chrom2_onedari5

gosub *onedari_syori
name $name
>You want me to use my mouth to make you come?@
>Spi! Rit!@>Seal off his movements!\
name ""
if %kousoku=0 gosub *chrom2_a6
gosub *chrom2_a8
skip -1



*chrom2_onedari6

gosub *onedari_syori
name $name
>You want to be raped by both ghosts at once...?\
name ""
gosub *chrom2_a9
skip -1



*chrom2_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\chromg_bk02.bmp",-250,0
lsp 692,":a;chara\chromg_bk12.bmp",230,40
gosub *syasei2
>As the two ghosts stroke Luka's penis with their astral hands, he comes, covering their hands with semen.\
mov %viclose,1:gosub *lose
mov %2674,%2674+1:if %2674=1 mov %count_koenemy,%count_koenemy+1
if %2674>%count_most mov %count_most,%2674:mov $count_mostname,$name+" (2)"
count 5,13
mov $bad1,"The ghosts forced Luka to come with their hands."
gosub *face2
name $name
>You made him come with your hands I see...@
>As a reward, I'll let you suck up some of his semen.\
name ""
goto *chrom2_h



*chrom2_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\chromg_bk01.bmp",-250,0
lsp 692,":a;chara\chromg_bk11.bmp",230,40
gosub *syasei2
>As the two ghosts suck on Luka's penis at the same time, he comes, filling their mouths with semen.\
mov %viclose,1:gosub *lose
mov %2674,%2674+1:if %2674=1 mov %count_koenemy,%count_koenemy+1
if %2674>%count_most mov %count_most,%2674:mov $count_mostname,$name+" (2)"
count 4,13
mov $bad1,"The ghosts forced Luka to come with their mouths"
gosub *face2
name $name
>You made him come with your mouths I see...@
>As a reward, I'll let you suck up some of his semen.\
name ""
goto *chrom2_h



*chrom2_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\chromg_bk02.bmp",-250,0
lsp 692,":a;chara\chromg_bk12.bmp",230,40
gosub *syasei2
>As the two ghosts rub their breasts together with Luka's penis between, he comes, covering their chests in semen.\
mov %viclose,1:gosub *lose
mov %2674,%2674+1:if %2674=1 mov %count_koenemy,%count_koenemy+1
if %2674>%count_most mov %count_most,%2674:mov $count_mostname,$name+" (2)"
count 7,13
mov $bad1,"The ghosts forced Luka to come with their breasts."
gosub *face2
name $name
>You made him come with your breasts I see...@
>As a reward, I'll let you suck up some of his semen.\
name ""
goto *chrom2_h



*chrom2_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\chrom_bk42.bmp",-50,0
gosub *syasei2
>As Chrome strokes Luka's penis with her hand, he comes, covering her hand in semen.\
mov %viclose,1:gosub *lose
mov %2674,%2674+1:if %2674=1 mov %count_koenemy,%count_koenemy+1
if %2674>%count_most mov %count_most,%2674:mov $count_mostname,$name+" (2)"
count 5,13
mov $bad1,"Chrome used her own hand to force Luka to come."
gosub *face2
name $name
>Hahaha... I made you come myself.@
>And shooting out so much semen...@>You really are pathetic.\
name ""
goto *chrom2_h



*chrom2_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\chrom_bk41.bmp",-50,0
gosub *syasei2
>As Chrome's small mouth sucks on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2674,%2674+1:if %2674=1 mov %count_koenemy,%count_koenemy+1
if %2674>%count_most mov %count_most,%2674:mov $count_mostname,$name+" (2)"
count 4,13
mov $bad1,"Chrome used her own mouth to force Luka to come."
gosub *face2
name $name
>Hahaha... I made you come myself.@
>And shooting out so much semen...@>You really are pathetic.\
name ""
goto *chrom2_h



*chrom2_h6

mov %ikigoe,3:gosub *ikigoe
name $name
>Hmph, already?@
>That's pathetic...\
gosub *syasei1
lsp 690,":c;chara\chromg_h8.bmp",0,0
gosub *syasei2
>The moment the two ghosts join together to rape him, Luka comes, spraying semen into their astral bodies.\
mov %viclose,1:gosub *lose
mov %2674,%2674+1:if %2674=1 mov %count_koenemy,%count_koenemy+1
if %2674>%count_most mov %count_most,%2674:mov $count_mostname,$name+" (2)"
count 1,13
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come the moment he was inside both ghosts."
gosub *face2
name $name
>That's quite the premature ejaculation you have going...@
>You didn't even last a couple seconds...\
name ""
goto *chrom2_h



*chrom2_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":c;chara\chromg_h8.bmp",0,0
gosub *syasei2
>Unable to endure the strange sensation of being raped by two ghosts at once, Luka comes, spraying his semen into both of them.\
mov %viclose,1:gosub *lose2
name "Luka"
>Ahhh...\
name ""
name $name
>Haha... Look at him, coming inside ghosts.@
>Spi, Rit! Let him have even more!\
name ""
name "Spi"
>Roger! \
name ""
name "Rit"
>I'll tighten my insides more...\
name ""
skillcount3 3824
skillname "Phantasmagoria"
dwave 1,"se\ero_chupa3.ogg"
>Spi wiggles her hips side to side!
mov %damage_kotei,1
damage 180,200
dwave 1,"se\ero_chupa5.ogg"
>At the same time, Rit squeezes down with her vagina!
mov %damage_kotei,1
damage 180,200
skillname ""
name "Luka"
>Haaa... Stop already...\
name ""
name "Spi"
>Hahaha, but Master ordered otherwise! \
name ""
name "Rit"
>Moan in agony more...\
name ""
skillcount3 3824
skillname "Phantasmagoria"
dwave 1,"se\ero_chupa3.ogg"
>Spi bounces up and down on Luka's penis like a piston!
mov %damage_kotei,1
damage 180,200
dwave 1,"se\ero_chupa5.ogg"
>Rit squeezes and tightens her vagina even more around Luka's penis!
mov %damage_kotei,1
damage 180,200
skillname ""
name "Luka"
>No... I'm going to come again...\
name ""
name $name
>Heh, heh... Already surrendering?@
>Spi, Rit! Give him the finishing blow!\
name ""
name "Spi"
>Then this is the end! \
name ""
name "Rit"
>Finish inside me...\
name ""
skillcount3 3824
skillname "Phantasmagoria"
dwave 1,"se\ero_chupa3.ogg"
>Spi violently moves her back, riding Luka hard!
mov %damage_kotei,1
damage 180,200
dwave 1,"se\ero_chupa5.ogg"
>At the same time, Rit squeezes down on Luka's penis as hard as she can!
mov %damage_kotei,1
damage 180,200
skillname ""
name "Luka"
>Ah...!@> Ahhh!\
name ""
gosub *syasei1
lsp 690,":c;chara\chromg_h9.bmp",0,0
gosub *syasei2
>As the two ghosts rape Luka as hard as they can, he comes again, spraying more of his semen into their astral bodies.\
name $name
>Haha... How is it, being screwed by two ghosts at once?@
>This is a precious experiment, too...\
name ""
gosub *clear_sprite
gosub *setwindow_01p
mov %battle,0
mov %hsean,1
mov %2674,%2674+1:if %2674=1 mov %count_koenemy,%count_koenemy+1
if %2674>%count_most mov %count_most,%2674:mov $count_mostname,$name+" (2)"
count 1,13
mov $bad1,"Luka was forced to come as the two ghosts raped him at the same time."
goto *chrom2_h



*chrom2_h

mov $bad2,"Caught by Chrome, Luka was made into a guinea pig for semen and sex research."
if %2674=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
name $name
>Now to punish you for fighting back against me.@
>You did really horrible things to me before...\
name ""
cspl 690,706
lsp 700,":c;chara\chrom_hc01.bmp",0,0:print 10,500
>Chrome turns around, and presses her ass against me.@
>At the same time, the two ghosts each hold part of my body.\
name "Luka"
>Ahh...\
name ""
lsp 700,":c;chara\chrom_hc02.bmp",0,0:print 10,500
>The ghosts reach out from behind me and grab my penis.@
>At the strange touch of their astral hands, I can't help but let out a soft moan.\
name $name
>Spi, Rit... Make him come with your hands.@
>Make him shoot his semen out all on my ass.\
name ""
name "Spi"
>Yay!@> I'll squeeze it! \
name ""
name "Luka"
>N...No... Ahh...!\
name ""
mov %hseanwave,17:hseanwave
>The two ghosts start to slowly stroke my penis.\
>The two ghosts' astral hands grab hold of my penis, and slowly move up and down.@
>Each of their palms feels different...\
>One feels more like dense gas, slightly sticky to the touch.@
>But the other one's body feels more like liquid...\
>As the two different sensations rub and stroke me, I sigh in pleasure.\
name "Luka"
>Haaa...\
name ""
name $name
>Hehe, my ghosts' hands feel good, don't they?@
>For my studies, I'll make sure they play with your body a lot!\
>Spi, Rit...@>Show him more of your techniques!\
name ""
name "Rit"
>Absolutely...\
name ""
>The ghosts' hands stroke me a little faster, sometimes using their palms to rub my glans as the other ghost continues stroking.\
name "Luka"
>Ah...ahhh!\
name ""
>The two different sensations blend together, combining the sticky gas and liquid feelings of their astral hands.\
>The ghost rubbing my glans also starts using her other free hand to fondle my balls.@
>Attacked by the fluffy, astral hands, I'm quickly brought to my limit.\
name "Luka"
>Ah...Ah...!@
>No... I'm going to come...!\
name ""
name $name
>Already?@
>Come on then, my ass will accept it all! \
name ""
>Chrome presses her ass against me again, swaying it side to side.@
>If I come now, my semen will spray out all over her...\
name "Luka"
>Ahh... No...\
name ""
name $name
>Spi, Rit... Finish him off now.\
name ""
name "Spi"
>Ok, then here he comes! \
name ""
>The two ghosts' movements suddenly get far faster all at once.@
>Rubbing my glans and stroking my shaft, the intense stimulation blasts me over the edge.\
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":c;chara\chrom_hc03.bmp",0,0
gosub *syasei2
>My semen bursts out, shooting right through the ghosts' astral hands and onto Chrome's ass.@
>All during my orgasm, their hands don't stop stroking me for a moment.\
>Even when I try to pull my waist back, I can't escape...@
>Helpless, I just continue spurting my semen during my orgasm, covering Chrome's ass.\
mov %hseanwave,0:hseanwave
name $name
>Hehehe... That was quite a lot.@
>Covering a lady's ass in semen like that... Your penis is quite ill-mannered, isn't it?\
>Come on now, you can't get a girl pregnant by spraying semen all over her ass you know!\
name ""
name "Luka"
>Ahh...\
name ""
>Chrome sways her ass side to side, still covered in my semen.@
>Seeing the proof of my submission on her, I shrink back in defeat.\
name $name
>Next, I'll taste your semen directly...@
>Now which hole do you want to be raped by?\
name ""
name "Luka"
>Eh...?\
name ""
lsp 700,":c;chara\chrom_hc04.bmp",0,0:print 10,500
>Chrome takes off her skirt, and exposes her vagina to me as I stare at her puzzled.\
name $name
>I asked you, do you want to be raped by my pussy or my ass?\
>In my wet pussy, I'll rub and wring your semen out...@
>Or would you rather be squeezed and feel the pressure of my ass?\
>As a special service, I'll let you decide.\
name ""
name "Luka"
>..........\
name ""
>Stuck in this situation, I can't refuse or escape...@
>So...\
csel "Vagina",*chrom2_ha,"Ass",*chrom2_hb



*chrom2_ha

name $name
>Hehe, so your preference is my pussy?@
>Then I'll rape you as you requested.\
>Prepare yourself, because I'm going to suck up all that semen of yours...\
name ""
>The ghosts grab my waist, pushing me closer to Chrome.@
>Guiding my penis in, the tip of my glans presses against her small opening...\
name "Luka"
>Ah...Ahhh!\
name ""
cspl 690,699
mov %hseanwave,2:hseanwave
lsp 700,":c;chara\chrom_hc06.bmp",0,0:print 10,500
>And all at once, they push me into her.@
>Quickly sinking in, it feels like my penis is sucked up into her wet vagina.\
name "Luka"
>Haaa...\
name ""
>My penis is all the way inside her soft, seductive flesh.@
>Her small vagina squeezes down on me, as if capturing me.\
name $name
>Hehehe... I'm a Succubus too, you know?@
>I'll slowly draw out that semen of yours...\
name ""
name "Luka"
>Ahhh!\
name ""
>Her flesh suddenly starts pulling on me, almost as if her vagina was a mouth sucking on my penis.@
>Wet noises fill the room, coming from her vagina... The sucking she mentioned earlier has just started.\
>Just as she said, Chrome is a Succubus...@>A Succubus that feeds off men's semen is raping me.\
>Inside that legendary type of monster's vagina, there's no way I could hold on...\
name "Luka"
>Haaa... I'm going to come...\
name ""
name $name
>Hehe, you're already at your limit?@
>Did you take a liking to being inside me?\
>Now let it go...@
>My pussy will drink up all of your semen.\
name ""
name "Luka"
>Ahhh...!\
name ""
>Little by little, the suction sensation gets even stronger.@
>The sensation of being sucked spreads from just my penis, and moves into my entire lower body.\
>I can't take this anymore...\
name $name
>Now come inside.@
>Offer up your semen to my pussy!\
name ""
name "Luka"
>N...No... Ahhh!\
name ""
gosub *syasei1
lsp 700,":c;chara\chrom_hc07.bmp",0,0
gosub *syasei2
>With the sweet feeling of suction filling my body, I release in Chrome.@
>My penis pulsing in her tight vagina, my semen spurts deep into her.\
>As I come, she rhythmically squeezes her vagina in time with my spurts, drawing my semen deep into her.\
name "Luka"
>Haaa... It feels so good...\
name ""
>My life energy is being sucked out by a Succubus' vagina...@
>Immersed in intense pleasure, my semen will be squeezed to the last drop.\
name $name
>Hehehe... That was the first shot.\
name ""
mov %hseanwave,0:hseanwave
lsp 700,":c;chara\chrom_hc08.bmp",0,0:print 10,500
>Chrome pulls back, taking my penis out of her vagina.@
>A large amount of semen drips out of her small hole.\
>Seeing the proof of my submission on her, I shrink back in defeat.\
name $name
>Hehehe, you belong to me now.@
>I'll make good use of your semen.\
>Feeding my ghosts... Snacks for me...@>I'll use it in lots of ways.@
>This is your reward for disturbing my research... Hehehe.\
name ""
name "Luka"
>Ahhh...\
name ""
>After that, I'm never let free.@>I'm kept as a sex slave for Chrome.@
>I have no choice but to accept my miserable new life...\
gosub *anten
>..........\
goto *badend



*chrom2_hb

name $name
>Hehe, so your preference is my ass?@
>Then I'll rape you as you requested.\
>Prepare yourself, because I'm going to squeeze out all that semen of yours...\
name ""
>The ghosts grab my waist, pushing me closer to Chrome.@
>Guiding my penis in, the tip of my glans presses between her small ass cheeks...\
name "Luka"
>Ahhh!\
name ""
mov %hseanwave,3:hseanwave
cspl 690,699
lsp 700,":c;chara\chrom_hc09.bmp",0,0:print 10,500
>And all at once, they push me into her.@
>Quickly sinking in, it feels like my penis is sucked up into her incredibly tight ass.\
name "Luka"
>Ah... Urhg...\
name ""
>It feels like my penis was crammed into something far too small for it...@
>The firm walls of her ass squeeze down hard on me as soon as I'm inside her.\
name $name
>Hehehe, you're thinking it's too tight, aren't you?@
>I'll work your dick inside my ass like this...\
name ""
name "Luka"
>Hyaaa!\
name ""
>Tightening her sphincter, her already narrow ass suddenly gets even tighter, squeezing me down hard inside her.\
>As the mix of pleasure and pain radiates through me, I let out a moan.\
name "Luka"
>Ahhh... Tight...!\
name ""
name $name
>Hehe, it feels like your penis could be crushed, doesn't it?@
>All I have to do is squeeze down a little more to get you to blow.\
>Now let me hear that cry as you come...@
>Here's the finishing blow!\
name ""
name "Luka"
>Ahhh!!\
name ""
>Her unforgiving tightness gets even worse, making the last effort to resist vanish in an instant.@
>The sweet numbness floods from her ass into the rest of my body as I give myself over.\
name $name
>Now come!@
>Leak it all out in my ass!\
name ""
name "Luka"
>Hyaaa!\
name ""
gosub *syasei1
lsp 700,":c;chara\chrom_hc10.bmp",0,0
gosub *syasei2
>As Chrome's ass squeezes down on me, I come, spraying my semen into her tight hole.@
>All during my orgasm, she keeps squeezing and tightening her sphincter, as if trying to abuse my penis during my ejaculation...\
name "Luka"
>Ahhg...!\
name ""
>Every drop of my semen is squeezed out during her nightmarish squeezing...@
>All the way until my ejaculation finishes, I'm stuck in her vise-like ass...\
name $name
>Hehehe, that was the first shot...\
name ""
mov %hseanwave,0:hseanwave
lsp 700,":c;chara\chrom_hc11.bmp",0,0:print 10,500
>Chrome pulls back, taking my penis out of her ass.@
>A large amount of semen drips out of the small hole.\
>Showing the proof of my submission to her, I shrink back in defeat.\
name $name
>Hehehe, you belong to me now.@
>I'll make good use of your semen.\
>Feeding my ghosts... Snacks for me...@>I'll use it in lots of ways.@
>This is your reward for disturbing my research... Hehehe.\
name ""
name "Luka"
>Ahhh...\
name ""
>After that, I'm never let free.@>I'm kept as a sex slave for Chrome.@
>I have no choice but to accept my miserable new life...\
gosub *anten
>..........\
goto *badend



*berryel_start

mov $name,"Power Berryelle"
mov $name2,"Berryelle"
mov $lavel,"berryel"
mov $tatie1,"berryel_st01"
mov $tatie2,"berryel_st02"
mov $tatie3,"berryel_st03"
mov $tatie4,"berryel_st21"
mov $haikei,"bg061"
mov %monster_x,60
mov %monster_y,0
if %nanido=1 mov %max_enemylife,17000
if %nanido=2 mov %max_enemylife,20000
if %nanido=3 mov %max_enemylife,23000
if %nanido=0 mov %max_enemylife,1
mov %kousoku_maxhp,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,1
mov %alice_skill1,0
mov %alice_skill2,0
mov %alice_skill3,0
mov %music,9
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free from Berryelle!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_anno4,"But held in this awkward position, he only gets in a glancing blow!"
mov $mogaku_sel1,"You're a sinner... Why are you struggling?"
mov $mogaku_sel2,"Know your place, sinner."
mov $mogaku_sel3,"Haha... Look at you struggling."
mov $mogaku_sel4,"Why don't you just resign yourself?"
mov $mogaku_sel5,"Do you intend to fight against your fate as a sinner?"
mov $mogaku_dassyutu1,"This is the first time a man has escaped from my restraint..."
mov $mogaku_dassyutu2,"You're a sinner worth devouring. Hehehe..."
mov $half_s1,"Do you wish to be eaten by this fruit soon?"
mov $half_s2,"The moment you climax, this fruit will swallow you whole..."
mov $kiki_s1,"It's almost time to eat you..."
mov $kiki_s2,"My fruit will devour you whole..."
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-250
mov %tukix,300
mov %owaza_count1a,4
mov %owaza_count1b,4
mov %owaza_count2a,4
mov $name,"Berryelle"
name "Luka"
>Gah... An Angel!?\
name ""
>Despite her odd appearance, I feel the holy aura coming from her...@
>The power coming off of her shows her as being a high-ranking one, too.\
name $name
>I am Power Berryelle.@
>My duty is to eat the sinners who would try to eat this fruit.\
>The Hero and Monster Lord will also be fed on by me...@
>If you give in quietly, I'll eat you nice and tenderly...\
name ""
name "Luka"
>Who would ever let themselves be eaten!?\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\berryel_st03.bmp",220,0:print 10,500
name "Alice"
>I'll eat you instead, you idiot!\
name ""
name $name
>...So you intend to resist till the end.@
>Then I'll devour you whole as you struggle in pain...\
>When I eat human men, I first squeeze out all of their semen...@
>Then using that as flavoring, I savor the body.\
>Please satisfy my appetite...\
name ""
csp 701
gosub *face1
goto *common_main



*berryel_v

gosub *face3
name $name
>No... After eating so many sinners, how could I...?\
name ""
dwave 1,"se\bun.ogg"
csp 700:print 99,1000,"system\breakup.dll/lrB"
>Power Berryelle fades away into particles, then vanishes!\
mov $name,"Power Berryelle"
mov %viclose,1:gosub *victory
mov %getexp,220000:gosub *lvup
mov %2375,1
goto *sean0338



*berryel_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Were you tempted by my smell?@
>Would want there to be a feast, don't you? Hehehe...\
name ""
goto *berryel_a



*berryel_main

gosub *cmd_main
if %cmd1=11 && %kousoku=1 goto *common_mogaku
if %cmd1=11 && %kousoku=2 mov %abairitu,50:goto *common_miss2
if %cmd1=11 goto *common_attack
if %cmd1=12 && %kousoku=2 goto *common_mogaku
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *berryel_kousan
if %cmd1=16 goto *berryel_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *berryel_main



*berryel_kaihou

gosub *face3
name $name
>You don't know when to give up...\
name ""
dwave 1,"se\dassyutu.ogg"
mov %kousoku,0:gosub *status_print
>Unable to endure Luka's attacks, she spits him out!\
gosub *face1
mov %owaza_count1b,0
goto *common_main



*berryel_a

if %kousoku=2 && %kousoku_hp<0 goto *berryel_kaihou
if %kousoku=1 gosub *berryel_a5:goto *common_main
if %kousoku=2 gosub *berryel_a7:goto *common_main
rnd2 %ransu,1,5
if %ransu=1 gosub *berryel_a1:goto *common_main
if %ransu=2 gosub *berryel_a2:goto *common_main
if %ransu=3 && %owaza_count2a>5 && %status=0 gosub *berryel_a3:goto *common_main
if %ransu=4 && %owaza_count1a>5 gosub *berryel_a4:goto *common_main
if %ransu=5 && %owaza_count1b>5 && %status=0 gosub *berryel_a6:goto *common_main
skip -6



*berryel_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Be grateful, for an angel will suck on you."
if %ransu=2 mov $sel1,"I'll sip up your semen like this..."
if %ransu=3 mov $sel1,"Now I shall drink your semen..."
name $name
eng $sel1:$sel6\
name ""
skillname "Semen Sipping Mouth"
dwave 1,"se\ero_buchu2.ogg"
>Berryelle takes Luka's penis into her mouth, and makes slurping noises as she sucks!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,40
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3825
if %nanido<2 damage 330,350
if %nanido=2 damage 360,380
if %nanido=3 damage 390,410
skillname ""
if %mylife=0 sub %stack,1:return *berryel_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*berryel_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Spray out your desire on my chest."
if %ransu=2 mov $sel1,"Melt away in my chest..."
if %ransu=3 mov $sel1,"I'll use my breasts to squeeze out your semen."
name $name
eng $sel1:$sel6\
name ""
skillname "Man Melting Breasts"
dwave 1,"se\ero_sigoki1.ogg"
>Berryelle sandwiches Luka's penis between her soft breasts, and uses them to massage him!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,40
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3826
if %nanido<2 damage 340,370
if %nanido=2 damage 370,400
if %nanido=3 damage 400,430
skillname ""
if %mylife=0 sub %stack,1:return *berryel_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*berryel_a3

add %stack,1
mov %owaza_count2a,0
name $name
>Indulge in the ecstasy of my smell...\
name ""
skillname "Sinner Charming Smell"
dwave 1,"se\ero_koki1.ogg"
eng "A sweet smell wafts from Berryelle's pomegranate toward Luka!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,30
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %status,1:gosub *status_print
>Luka is immersed in ecstasy!\
skillname ""
name "Luka"
>Haaa...\
name ""
name $name
>Hehe, you're in a trance...@
>And while you are, I shall feast on you...\
name ""
rnd2 %status_turn,1,2
if %nanido=2 rnd2 %status_turn,1,2
if %nanido=3 rnd2 %status_turn,2,3
sub %stack,1
return



*berryel_a4

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 4
name $name
>After stopping you from moving, I'll squeeze you nice and slowly...\
name ""
skillname "Semen Milking Hands"
dwave 1,"se\ero_makituki3.ogg"
eng "Berryelle's pomegranate bites down on Luka's arms and legs!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount3 3827
>Her tentacle-like fingers wrap around Luka's penis!
if %nanido<2 damage 200,220
if %nanido=2 damage 230,250
if %nanido=3 damage 260,280
mov $tatie4,"berryel_st21"
mov %kousoku,1:gosub *status_print
>Luka has been bound by Berryelle!\
skillname ""
if %mylife=0 sub %stack,1:return *berryel_h3
name $name
>You can't move now...@
>Just like this, I'll milk out your semen while you're helpless...\
name ""
if %nanido<2 mov %genmogaku,2
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,3
mov $mogaku_anno3,"But Luka can't attack like this!"
sub %stack,1
return



*berryel_a5

add %stack,1
>Luka has been bound by Berryelle...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"More than a hundred sinners have been finished by these fingers..."
if %ransu=2 mov $sel1,"An angel is squeezing out your semen... Be happy."
if %ransu=3 mov $sel1,"I'll finish you off with an angel's finger techniques."
name $name
eng $sel1:$sel6\
name ""
skillname "Semen Milking Hands"
dwave 1,"se\ero_koki1.ogg"
>The tentacle-like fingers around Luka's penis tighten!
skillcount3 3827
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
dwave 1,"se\ero_koki1.ogg"
>A finger rubs right under the neck of Luka's penis!
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
dwave 1,"se\ero_koki1.ogg"
>Another finger rubs and massages the tip of Luka's penis!
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
skillname ""
if %mylife=0 sub %stack,1:return *berryel_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*berryel_a6

add %stack,1
mov %owaza_count1b,0
mov %owaza_num1,2
if %kousan=2 skip 5
name $name
>Playtime ends now...@
>You will become nourishment for my pomegranate...\
name ""
skillname "Man Devouring Pomegranate"
dwave 1,"se\ero_makituki3.ogg"
>The mouth of Berryelle's pomegranate opens as tentacles grab hold of Luka's body!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
mov $tatie4,"berryel_st31"
mov %kousoku,2:gosub *status_print
>Luka has been partially bound by Berryelle!\
skillname ""
name "Luka"
>Hya!\
name ""
name $name
>Are you scared?@
>I'm going to swallow you...\
>But since my pomegranate is so cruel... I'll devour all of your semen first.\
>While my pomegranate eats you, you will come over and over again...\
>I wonder how many times you will orgasm before you're completely digested...?\
name ""
mov %kousoku_hp,%kousoku_maxhp
sub %stack,1
return



*berryel_a7

add %stack,1
>Luka has been bound by Berryelle...\
if %kousan=2 skip 5
name $name
>Thank you for waiting...@
>It's time to be eaten!\
name ""
skillname "Man Devouring Pomegranate"
dwave 1,"se\ero_makituki3.ogg"
>The pomegranate's mouth opens wide, and swallows Luka's body!
skillcount3 3828
mov %damage_kotei,1
damage 350,400
mov $tatie4,"berryel_st32"
mov %kousoku,2:gosub *status_print
>Luka has been taken into the pomegranate's mouth!\
skillname ""
if %mylife=0 sub %stack,1:return *berryel_h4
name $name
>This toothless mouth will make you come over and over...\
>Enjoy the final pleasure as my pomegranate greedily devours you...\
name ""
sub %stack,1
goto *berryel_a8



*berryel_a8

add %stack,1
>Luka has been taken into the pomegranate's mouth...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My pomegranate desires your body..."
if %ransu=2 mov $sel1,"Does it feel good having your penis chewed on too?"
if %ransu=3 mov $sel1,"Sinners are to be judged and devoured by my pomegranate... Haha."
name $name
eng $sel1:$sel6\
name ""
skillname "Man Devouring Pomegranate"
dwave 1,"se\ero_makituki3.ogg"
>Berryelle's toothless pomegranate chews on Luka's body!
skillcount3 3828
mov %damage_kotei,1
damage 350,400
skillname ""
if %mylife=0 sub %stack,1:return *berryel_h4
sub %stack,1
goto *berryel_a8



*berryel_onedari

mov $list1,"Semen Sipping Mouth"
if %3825>0 mov %list_num1,1
mov $list2,"Man Melting Breasts"
if %3826>0 mov %list_num2,1
mov $list3,"Semen Milking Hands"
if %3827>0 mov %list_num3,1
mov $list4,"Man Devouring Pomegranate"
if %3828>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *berryel_onedari1
if %cmd1=12 goto *berryel_onedari2
if %cmd1=13 goto *berryel_onedari3
if %cmd1=14 goto *berryel_onedari4
if %cmd1=-1 goto *berryel_main
goto *berryel_onedari



*berryel_onedari1

gosub *onedari_syori
name $name
>You want to ejaculate in my mouth?@
>Even though you're a sinner, you're rather greedy...\
name ""
gosub *berryel_a1
skip -1



*berryel_onedari2

gosub *onedari_syori
name $name
>You want to ejaculate on my breasts?@
>Even though you're a sinner, you're rather greedy...\
name ""
gosub *berryel_a2
skip -1



*berryel_onedari3

if %kousoku<>1 gosub *onedari_syori
if %kousoku=1 gosub *onedari_syori_k
name $name
>You want to ejaculate on my hands?@
>Then I'll hold you down and milk you...\
name ""
if %kousoku<>1 gosub *berryel_a4
gosub *berryel_a5
skip -1



*berryel_onedari4

if %kousoku<>2 gosub *onedari_syori
if %kousoku=2 gosub *onedari_syori_k
name $name
>Hehe... You've given up, and want me to eat you?@
>Then I shall enjoy your taste...\
name ""
if %kousoku<>2 gosub *berryel_a6
gosub *berryel_a7
skip -1



*berryel_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\berryel_bk01.bmp",60,0
gosub *syasei2
>As Berryelle sucks on him, Luka comes, gushing his semen into her mouth.\
mov %viclose,1:gosub *lose
mov %2675,%2675+1:if %2675=1 mov %count_koenemy,%count_koenemy+1
if %2675>%count_most mov %count_most,%2675:mov $count_mostname,$name
count 4,11
mov $bad1,"Berryelle forced Luka to come with her mouth."
gosub *face2
name $name
>Hehe, so much sinner semen...@
>It's pathetic to so easily ejaculate like that.\
name ""
goto *berryel_h



*berryel_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\berryel_bk02.bmp",60,0
gosub *syasei2
>As Berryelle's soft breasts press against Luka's penis, he comes, covering her chest in semen.\
mov %viclose,1:gosub *lose
mov %2675,%2675+1:if %2675=1 mov %count_koenemy,%count_koenemy+1
if %2675>%count_most mov %count_most,%2675:mov $count_mostname,$name
count 7,11
mov $bad1,"Berryelle forced Luka to come with her breasts."
gosub *face2
name $name
>Hehe, so much sinner semen...@
>It's pathetic to so easily ejaculate like that.\
name ""
goto *berryel_h



*berryel_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\berryel_st22.bmp",60,0
gosub *syasei2
>As Berryelle strokes Luka's penis, he comes, covering her hands with semen.\
mov %viclose,1:gosub *lose
mov %2675,%2675+1:if %2675=1 mov %count_koenemy,%count_koenemy+1
if %2675>%count_most mov %count_most,%2675:mov $count_mostname,$name
count 5,11
mov $bad1,"Berryelle forced Luka to come with her hands."
lsp 700,":a;chara\berryel_st23.bmp",60,0:print 10,500
name $name
>Hehe, so much sinner semen...@
>It's pathetic to so easily ejaculate like that.\
name ""
goto *berryel_h



*berryel_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\berryel_st33.bmp",60,0
gosub *syasei2
>As Berryelle's mouth chews on Luka's body, he comes, spraying his semen into her preying mouth.\
mov %viclose,1:gosub *lose
mov %2675,%2675+1:if %2675=1 mov %count_koenemy,%count_koenemy+1
if %2675>%count_most mov %count_most,%2675:mov $count_mostname,$name
count 33,11
mov $bad1,"Berryelle forced Luka to come as she preyed on his body."
lsp 700,":a;chara\berryel_st34.bmp",60,0:print 10,500
name $name
>Hehe, so much sinner semen...@
>It's quite pathetic to ejaculate when being preyed on...\
name ""
goto *berryel_h



*berryel_h

mov $bad2,"Preyed upon by the angel, Luka is completely digested."
if %2675=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
name $name
>It seems as though you have no energy left to resist.@
>Very well, I shall eat you now...\
>Rejoice, for you will be preyed on by an angel.@
>There are few humans who can lay claim to that happiness.\
name ""
>Too weak to resist, Berryelle's tentacles easily coil around my body, and start pulling me to her.\
name "Luka"
>S...Stop!@>Ahh!\
name ""
>The giant mouth in the center of her body opens up, revealing an interior full of movement.\
>The tentacles coiled around my body slowly pull me closer to her gaping mouth, just like I was a simple fish caught by a sea anemone..\
name "Luka"
>Ahhh!\
name ""
if %hosyoku_cut=1 goto *hosyoku_cut
dwave 1,"se\ero_makituki3.ogg"
mov %hseanwave,11:hseanwave
cspl 690,699
lsp 700,":a;chara\berryel_st11.bmp",60,0:print 10,500
>After only a few moments, my body from the waist down is stuck in her mouth.@
>The soft, wet walls of her mouth close down around my lower body.\
>Terrified of being treated like food, I raise a cry as those walls start making chewing motions on my body.\
name "Luka"
>Hyaa!@>S...Stop!\
name ""
name $name
>Don't be so scared... You won't feel any pain.@
>I won't bite you in half, or chew you to bits.\
>I'll just slowly dissolve your body, and digest you...@
>It will feel good, so relax.\
name ""
name "Luka"
>I don't want that!@
>Let me go!\
name ""
>No matter how much I struggle, I can't break my lower body free...@
>And with her tentacles coiled around my arms, I can't pull myself out either.\
>I can't resist her at all...@> I'm just going to effortlessly be eaten...\
name $name
>Now to start digesting your lower body...@
>Just give yourself over to it, and enjoy your new role as food.\
name "Luka"
>Ahh...\
name ""
>Slowly, her mouth starts its horrible predation...@
>The soft walls rub and chew, as warm digestive juice spills out over me.\
>Along with those movements, little projections and bumps start rubbing against my skin in time with her chewing movements.\
name "Luka"
>S...Stop... Ahh!\
name ""
>The bizarre sensations of being chewed on by a toothless mouth run all through me.@
>Though it's horrifying, it feels oddly pleasant...\
>Reacting to that, my penis slowly starts to get erect.@
>Still being attacked by the chewing motions, it only adds to the stimulation assaulting me.\
name $name
>Oh my, you got big...@
>It's nothing to be ashamed of, since you are just a human male after all.\
>Sometimes men get erections and ejaculate when I feed on them...@
>Enjoy it as much as you can, until I finish feeding on you.\
name ""
name "Luka"
>Ahhh!!\
name ""
>Her mouth tosses me around, the chewing motions and juices making it feel like I really am being devoured alive.\
>Even though I'm being eaten as food, it still feels so good... Trading my life for pleasure.\
>Even though I should only feel horror...@
>I can't help it.\
name $name
>I'll suck on you a little harder...@
>Enjoy the sensation of feeling your body itself be digested...\
name ""
mov %hseanwave,12:hseanwave
>With loud slurping noises, her mouth suddenly shrinks as the chewing motions get even more intense.@
>Helpless in her mouth, I'm tossed around as her preying mouth savors my body.\
>With my penis completely erect, it rubs back and forth across her wet walls, bringing even more agonizing pleasure with it.\
>The little bumps and creases along the surface rub and massage my glans and shaft as I'm tossed around, bringing forth moans of pleasure.\
name "Luka"
>Ah... Ahhh!\
name ""
name $name
>Hehe...\
name ""
>Berryelle looks down at me and smiles.@
>She's focusing her chewing motions on my groin area on purpose...\
>The humiliating pleasure finally gets to me, as I feel my body about to surrender in orgasm to the mouth that's eating me.\
name "Luka"
>Ahh... I'm going to come...\
name ""
name $name
>Didn't I say it before?@
>Many men ejaculate when I eat them...\
>There's no need to hold back, just go ahead and let it out...\
name ""
name "Luka"
>Ahh...\
name ""
>I try to endure it with everything I have, but it's no good...@
>Relaxing my lower body, I let the climax take over my body.\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\berryel_st12.bmp",60,0
gosub *syasei2
>As Berryelle's predation mouth chews on me, I come, miserably reaching a climax from being digested.\
name "Luka"
>Ahhh...\
name ""
>Berryelle looks down at me with satisfaction, watching my body tremble in spasms as she chews on my twitching penis.\
name $name
>Hehehe... So you leaked I see.@
>There's no need to be ashamed, though.\
>As I said before, lots of men are just like you, and ejaculate as they are digested.\
name ""
name "Luka"
>Ah...\
name ""
name $name
>Now then, I'll start eating your whole body, not just half of it...@
>Dissolve away and become my nourishment...\
name ""
name "Luka"
>Stop... Stop...@>Ahh!\
name ""
lsp 700,":a;chara\berryel_st13.bmp",60,0:print 10,500
>The mouth suddenly sucks down hard on me, dragging my body deeper into her.@
>At the same time, my penis rubs along her soft walls, still sensitive after my orgasm.\
>The intense chewing motions hit even more of my body, sending fresh waves of pleasure through me.\
name "Luka"
>Ahhhh!!\
name ""
name $name
>Hehehe... You realize that you are being eaten, don't you?@
>Slowly being chewed up, and dissolved away...\
name ""
>The digestive juices swirl around my body as she chews, driving me mad with pleasure as I'm eaten alive.@
>After only a few more moments, my penis starts to pulse again inside her mouth.\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>Unable to do anything as I'm chewed on, I reach another miserable orgasm.@
>Weakness floods my body after my orgasm, leaving me bereft of strength.\
>My body has already probably partially dissolved away...\
name $name
>Hehe, the digestion is advancing...@
>How does it feel having your body dissolve away?\
name ""
name "Luka"
>Ah...\
name ""
>Though this situation is horrifying, I feel calm somehow...@
>Rather, I even feel content and happy.\
name $name
>Your body will dissolve into delicious soup for me to suck up...@
>Hehehe... You realize it already, right?@
>Your body is already mostly delicious mush...\
name ""
name "Luka"
>No... H...Help me...\
name ""
>But my mind still rebels against it...@
>Even if my body is rejoicing in the pleasure, I don't want to be digested alive...\
name $name
>Hehe... It's too late for help, now.@
>Your body is already gone, all that's left is your head...\
>But you're still conscious I see...@>How interesting, despite your body mostly being gone.\
name ""
name "Luka"
>Ah... Uh...\
name ""
>Most of my body is gone...?@
>It's true I can't feel most of my body...\
>Soaking in the lukewarm fog, I feel my consciousness fading away...\
name $name
>I'll digest even your head now...\
name ""
name "Luka"
>Ah...\
name ""
lsp 700,":a;chara\berryel_st14.bmp",60,0:print 10,500
>With a slurp, my head is sucked into her mouth...@
>My vision of the world is replaced by the sight of the pink walls of her mouth, covered in digestive juices.\
>The last sight of my life as prey...\
name $name
>Oh dear, his arm is still left.\
name ""
lsp 700,":a;chara\berryel_st15.bmp",60,0:print 10,500
>The boy's last showing part is sucked into the angel's mouth.@
>Along with the slurping noise, a few dribbles of semen spill from her mouth.\
>The semen of a boy who miserably ejaculated as he was eaten...\
name $name
>Oh dear, he leaked so much...@
>Hehehe, how vulgar.\
name ""
>Looking at the semen spilling from her mouth, Berryelle giggles.\
mov %hseanwave,0:hseanwave
gosub *anten
>.................\
goto *badend



*revel_start

mov $name,"Virtue Revel"
mov $name2,"Revel"
mov $lavel,"revel"
mov $tatie1,"revel_st01"
mov $tatie2,"revel_st01"
mov $tatie3,"revel_st01"
mov $tatie4,"revel_h1"
mov $haikei,"bg061"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,18000
if %nanido=2 mov %max_enemylife,21000
if %nanido=3 mov %max_enemylife,24000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,1
mov %alice_skill1,0
mov %alice_skill2,0
mov %alice_skill3,0
mov %music,9
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free from Revel!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Are you trying to escape...?"
mov $mogaku_sel2,"There's no escape from reincarnation..."
mov $mogaku_sel3,"There's no point in acting violent..."
mov $mogaku_sel4,"Stop fighting, and be reborn inside me..."
mov $mogaku_sel5,"Resign yourself to a new life..."
mov $mogaku_dassyutu1,"Why did you run?"
mov $mogaku_dassyutu2,"You could be reborn into an immaculate new existence..."
mov $half_s1,"Does it feel good?"
mov $half_s2,"The pleasure you will feel as your soul returns will be far greater..."
mov $kiki_s1,"Now, ejaculate."
mov $kiki_s2,"Then say goodbye to your dirty body..."
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-310
mov %tukix,300
mov %owaza_count1a,3
mov %owaza_count3a,3
mov $name,"Revel"
name $name
>I am Virtue Revel, the angel in charge of reincarnation.@
>Disgraced Hero Luka...@> Ilias has blessed you with a new, purified life.\
name ""
>She's even stranger looking than the last angel...@
>But at the same time, a holy aura is radiating off her body.\
>I draw my sword in front of the strange, divine being.\
name "Luka"
>Purified life?@
>What in the world does that mean?\
name ""
name $name
>I was given the power of reincarnation...@
>I take in a body, disassemble it into its base components, and re-create it as a new life.\
>...But do not be afraid.@
>You will be reborn while tasting an intoxicating pleasure.\
name ""
name "Luka"
>No way!@
>I haven't even completed my goal in this life, I don't want another!\
name ""
goto *common_main



*revel_v

gosub *face3
name $name
>My mission...@>I wasn't able to fulfill it...\
name ""
dwave 1,"se\bun.ogg"
csp 700:print 99,1000,"system\breakup.dll/lrB"
>Virtue Revel fades away into particles, then vanishes!\
mov $name,"Virtue Revel"
mov %viclose,1:gosub *victory
mov %getexp,240000:gosub *lvup
mov %2376,1
goto *sean0339



*revel_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>So you have decided to obediently be reincarnated?@
>Then I shall give you pleasure until the end...\
name ""
goto *revel_a



*revel_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *revel_kousan
if %cmd1=16 goto *revel_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *revel_main



*revel_a

if %kousoku=1 gosub *revel_a3:goto *common_main
if %hanyo6=1 && %bougyo=1 && %wind>0 gosub *revel_a5m:goto *common_main
if %hanyo6=1 gosub *revel_a5:goto *common_main
rnd2 %ransu,1,3
if %ransu=1 gosub *revel_a1:goto *common_main
if %ransu=2 && %owaza_count1a>4 gosub *revel_a2:goto *common_main
if %ransu=3 && %owaza_count3a>4 gosub *revel_a4:goto *common_main
skip -4



*revel_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"What a sinful soul..."
if %ransu=2 mov $sel1,"I shall take back your soul and cleanse that body..."
if %ransu=3 mov $sel1,"Why have you fallen into the darkness, when you wield that power?"
name $name
eng $sel1:$sel6\
name ""
>Revel is sizing up Luka...\
sub %stack,1
return



*revel_a2

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 5
name $name
>I'll absorb your semen through my navel.@
>Your reincarnation will be more smooth if I collect gene samples beforehand...\
name ""
skillname "Holy Umbilical Bond"
eng "Revel grabs hold of Luka's body!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,30
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
mov $tatie4,"revel_h1"
dwave 1,"se\ero_pyu1.ogg"
lsp 700,":a;chara\revel_h1.bmp",0,0
lsp 690,":a;chara\revel_ct11.bmp",0,0:print 10,500
lsp 690,":a;chara\revel_ct15.bmp",0,0:print 10,500
lsp 690,":a;chara\revel_ct16.bmp",0,0:print 10,500
>Luka's penis sinks into Revel's navel!
skillcount3 3829
if %nanido<2 damage 450,500
if %nanido=2 damage 460,510
if %nanido=3 damage 470,520
mov %kousoku,1:gosub *status_print
>Luka has been bound by Revel!\
skillname ""
if %mylife=0 sub %stack,1:return *revel_h1
name $name
>Now release your semen into my stomach...@
>I'll give you pleasure to encourage an ejaculation.\
name ""
if %nanido<2 mov %genmogaku,2
if %nanido=2 mov %genmogaku,2
if %nanido=3 mov %genmogaku,3
sub %stack,1
return



*revel_a3

add %stack,1
>Luka has been bound by Revel...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Is the stimulus not enough? Then how about this...":mov $sel2,"Revel's navel makes chewing motions around Luka's penis!"
if %ransu=2 mov $sel1,"Release your semen inside...":mov $sel2,"The inside of Revel's navel tightens around Luka's penis!"
if %ransu=3 mov $sel1,"Your organ only exists to eject semen... There's no need to hold back.":mov $sel2,"Revel's navel squeezes and releases, rubbing Luka's penis!"
if %ransu=4 mov $sel1,"Shall I move it around inside?":mov $sel2,"Revel's navel moves in a strange way, stimulating Luka's penis!"
if %ransu=5 mov $sel1,"I'll suck on your penis with my navel...":mov $sel2,"The inside of Revel's navel sucks on Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Holy Umbilical Bond"
dwave 1,"se\ero_kyuin1.ogg"
eng $sel2:$sel6
skillcount3 3829
if %nanido<2 damage 450,500
if %nanido=2 damage 460,510
if %nanido=3 damage 470,520
skillname ""
if %mylife=0 sub %stack,1:return *revel_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*revel_a4

add %stack,1
if %kousan=2 skip 5
name $name
>Surrender yourself to this sacred hole.@
>Both your body and soul will be purified in here...\
name ""
skillname "Hole Release"
dwave 1,"se\ero_kyuin1.ogg"
lsp 700,":a;chara\revel_st11.bmp",0,0:print 10,500
>Revel's groin area opens up, revealing a hole!\
skillname ""
mov %hanyo6,1
sub %stack,1
return



*revel_a5m

add %stack,1
name $name
>Now, come inside...@
>I'll purify you and reincarnate you into a new existence...\
name ""
skillname "Holy Return"
>Revel's hole moves to swallow Luka's body!
delay 1000
dwave 1,"se\miss.ogg"
>But Luka nimbly dodges!\
skillname ""
mov %hanyo6,0
mov %owaza_count3a,0
gosub *face1
sub %stack,1
return



*revel_a5

add %stack,1
mov %hanyo6,0
mov %owaza_count3a,0
name $name
>Now, come inside...@
>I'll purify you and reincarnate you into a new existence...\
name ""
skillname "Holy Return"
eng "Revel's hole swallows Luka's body!":$sel6/
if %daten>0 mov %tamek,1:goto *skill22x
@
skillcount3 3830
mov $tatie4,"revel_st12"
mov %kousoku,2:gosub *status_print
>Luka's body is stuck inside Revel's hole!\
skillname ""
name "Luka"
>Ahhh!\
name ""
name $name
>It's useless to fight...@
>Now give yourself to me.\
name ""
skillname "Holy Return"
mov $tatie4,"revel_st01"
lsp 700,":a;chara\revel_st01.bmp",0,0:print 10,500
>Luka has been swallowed by Revel's hole!\
dwave 1,"se\ero_makituki3.ogg"
skillcount3 3830
lsp 690,":a;chara\revel_ct01.bmp",540,0:print 10,500
>Taken into Revel's womb, a tube attaches itself to Luka's penis!
mov %damage_kotei,1
damage 400,450
>Luka has been bound inside Revel's womb!\
skillname ""
if %mylife=0 sub %stack,1:return *revel_h2
name "Luka"
>Ahhhh!\
name ""
name $name
>Then first I will collect your semen...@
>I'll take it by force, so there's no way you can resist.\
name ""
sub %stack,1
goto *revel_a6



*revel_a6

add %stack,1
>Luka is being raped by Revel...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Even if you try to resist, I'll suck it out anyway.":mov $sel2,"The tube sucks hard on Luka's penis, trying to force him to ejaculate!"
if %ransu=2 mov $sel1,"Just let all of your semen out.":mov $sel2,"The tube sucks hard on Luka's penis, trying to force him to ejaculate!"
if %ransu=3 mov $sel1,"This process won't finish until I harvest your semen...":mov $sel2,"The tube squeezes down on Luka's penis, trying to force him to ejaculate!"
if %ransu=4 mov $sel1,"I need to collect your semen first, so I'll force you to ejaculate.":mov $sel2,"The tube squeezes down on Luka's penis, trying to force him to ejaculate!"
if %ransu=5 mov $sel1,"If you resist, it will just take longer... There's no denying it in the end.":mov $sel2,"The tube alternates between sucking and squeezing Luka's penis, trying to force him to ejaculate!"
name $name
eng $sel1:$sel6\
name ""
skillname "Holy Return"
dwave 1,"se\ero_kyuin1.ogg"
eng $sel2:$sel6
skillcount3 3830
mov %damage_kotei,1
damage 400,450
skillname ""
if %mylife=0 sub %stack,1:return *revel_h2
sub %stack,1
goto *revel_a6



*revel_onedari

mov $list1,"Holy Umbilical Bond"
if %3829>0 mov %list_num1,1
mov $list2,"Holy Return"
if %3830>0 mov %list_num2,1
gosub *cmd_onedari
if %cmd1=11 goto *revel_onedari1
if %cmd1=12 goto *revel_onedari2
if %cmd1=-1 goto *revel_main
goto *revel_onedari



*revel_onedari1

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want me to collect your semen with my navel...?@
>Then I'll squeeze it as you desire...\
name ""
if %kousoku=0 gosub *revel_a2
gosub *revel_a3
skip -1



*revel_onedari2

gosub *onedari_syori
name $name
>You want to be swallowed and returned to the womb?@
>Then entrust yourself to my sacred hole...\
name ""
if %hanyo6=0 gosub *revel_a4
gosub *revel_a5
skip -1



*revel_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\revel_h2.bmp",0,0
lsp 690,":a;chara\revel_ct17.bmp",0,0
gosub *syasei2
>As Revel's navel sucks on Luka's penis, he comes, spraying his semen into her belly.\
mov %viclose,1:gosub *lose
mov %2676,%2676+1:if %2676=1 mov %count_koenemy,%count_koenemy+1
if %2676>%count_most mov %count_most,%2676:mov $count_mostname,$name
count 2,15
mov $bad1,"Revel forced Luka to come with her navel."
gosub *face2
name $name
>That's a good start... But I require more semen.@
>Please ejaculate again so I can analyze your genes in more detail.\
name ""
goto *revel_h



*revel_h2

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\revel_ct02.bmp",540,0
gosub *syasei2
>Stuck inside Revel's womb, Luka comes, spraying his semen into the tube sucking on him.\
mov %viclose,1:gosub *lose
mov %2676,%2676+1:if %2676=1 mov %count_koenemy,%count_koenemy+1
if %2676>%count_most mov %count_most,%2676:mov $count_mostname,$name
count 2,15
mov $bad1,"Luka was forced to come inside Revel's womb."
gosub *face2
name $name
>That's a good start... But I require more semen.@
>Please ejaculate again so I can analyze your genes in more detail.\
name ""
goto *revel_h



*revel_h

mov $bad2,"With his body absorbed by Revel, Luka is reincarnated into a new existence..."
if %2676=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku=2 mov %hseanwave,13:hseanwave:goto *revel_hb
name "Luka"
>Ahhh...\
name ""
cspl 690,699
lsp 700,":a;chara\revel_st11.bmp",0,0:print 10,500
>Helpless before Revel, I can only feebly yell as a hole opens up in her groin area.@
>Grabbing hold of my body, she pulls me closer to it.\
name "Luka"
>S...Stop!\
name ""
mov %hseanwave,12:hseanwave
lsp 700,":a;chara\revel_st12.bmp",0,0:print 10,500
>She presses my lower body into the open hole.@
>Sucking on me, I feel her trying to draw me even deeper in...\
name "Luka"
>Gurhg... Stop!\
name ""
>Using every ounce of strength I have left, I use my arms to try to pull myself out...@
lsp 700,":a;chara\revel_st13.bmp",0,0:print 10,500
>But too weak, my strength breaks as I'm sucked all the way in.\
lsp 700,":a;chara\revel_st01.bmp",0,0
lsp 690,":a;chara\revel_ct01.bmp",540,0:print 10,500
name "Luka"
>Ahhh!\
name ""
>In the dark interior of Revel's womb, my body is partially absorbed into her wall lining.@
>My arms and legs sink completely in, leaving me unable to move.\
>A tube-like organ is placed over my mouth and nose, delivering air and a sweet tasting liquid.@
>Another tube latches onto my penis.\
name "Luka"
>Urhg... What... Is this...?\
name ""
>What's happening...?@
>My body shakes in fear as I wonder what's about to happen.\
name $name
>...You are in my womb.@
>I will suck out your semen, and use it to analyze your genes.\
>After that I will break your body down, reassemble it, and reincarnate you into a new existence.\
name ""
name "Luka"
>N...No...!\
name ""
name $name
>You are not allowed to refuse.@
>It is my duty to reincarnate sinners.\
>Now first I must collect your semen.@
>Please eject it into here...\
name ""
mov %hseanwave,13:hseanwave
>The process of reincarnation...@>The nightmarish ceremony is starting.@
>The tube-like organ on my penis suddenly starts to suck on me.\
goto *revel_hb



*revel_hb

name "Luka"
>Ahhh!\
name ""
>From deeper inside the tube, a powerful suction pulls on my penis.@
>Rather than feeling like it's trying to give pleasure, it's more like it's just trying to suck out my semen...\
name $name
>You can ejaculate if you want...@
>Even if you don't, it will draw out your semen anyway.\
>A natural ejaculation will bring you pleasure and ecstasy.@
>Having it taken forcefully will be painful and humiliating.\
>It's your choice, if you want to resist for no reason or not.\
name ""
name "Luka"
>.........\
name ""
>There's no point resisting anymore in this state...@
>I decide to just give in and stop resisting.\
>As I stop tensing my waist trying to resist, the suction slowly starts to feel better and better.\
name "Luka"
>Ah... Ahh!\
name ""
>I slowly relax my body, absorbing myself in the stimulation from the suction.@
>The humiliation at having my semen collected by this strange organ slowly turns to pleasure.\
name $name
>So you decided to yield yourself to the pleasure...@
>Good, that way is much better.\
name ""
name "Luka"
>Hyaaa...!\
name ""
>As the powerful suction pulls on my penis, my body spasms in pleasure.@
>After only moments, I feel a coming orgasm filling my body.\
name $name
>You're already about to ejaculate I see.@
>Go ahead, let it out.\
name ""
name "Luka"
>Ah... Ahhh!\
name ""
>Not holding back at all, I greedily give in to the rising climax.\
gosub *syasei1
lsp 690,":a;chara\revel_ct02.bmp",540,0:print 10,500
gosub *syasei2
name "Luka"
>Haaaa...\
name ""
>My penis twitches inside the tube, ejecting semen straight into it.@
>It's quickly sucked up by the organ, and collected.\
>Even as I tremble in pleasure, an unease comes over me.@
>What's going to happen to me now that I've surrendered to the pleasure and let her harvest my semen...?\
name $name
>The semen collection is over, and I've finished analyzing your genes.@
>Now I can break down your body and reassemble it into a new one.\
>Now let us begin your reincarnation...\
name ""
if %hosyoku_cut=1 goto *hosyoku_cut
lsp 690,":a;chara\revel_ct03.bmp",540,0:print 10,500
name "Luka"
>Haaa...\
name ""
>Viscous liquid suddenly fills up around my body, completely covering me.@
>Everywhere it touches, it slowly dissolves and melts away my body...\
>Far from fear, it leaves me completely at peace.@
>As if I'm back to being a fetus inside a womb.\
name "Luka"
>Ah...Ahhh...\
name ""
name $name
>It feels good, doesn't it?@
>Your sinful flesh is being dissolved as we speak.\
>I'll create a new body for you, and reincarnate your soul into it as a new existence.\
name ""
name "Luka"
>Ah...ah...\
name ""
>Overcome by the sweet sensations, my body continues to dissolve away and mix with Revel's fluids.@
>Slowly fading from my current self, to become a new me...\
>And...\
mov %hseanwave,0:hseanwave
name $name
>Now to release the new life upon this world...\
name ""
cspl 690,699
lsp 700,":a;chara\revel_st14.bmp",0,0:print 10,500
>From out of Revel's womb, a single egg is birthed.@
>Inside of it is the soul of the one who was known as the Hero Luka.\
>Reincarnated into this new existence, he was birthed again as a new life.\
gosub *anten
>............\
goto *badend



*carmilla_start

mov $name,"Carmilla"
mov $name2,"Carmilla"
mov $lavel,"carmilla"
mov $tatie1,"carmilla_st01"
mov $tatie2,"carmilla_st02"
mov $tatie3,"carmilla_st03"
mov $tatie4,"carmilla_hb1"
mov $haikei,"bg223"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,19000
if %nanido=2 mov %max_enemylife,21000
if %nanido=3 mov %max_enemylife,23000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,20
if %nanido=3 mov %earth_keigen,10
mov %alice_skill,1
mov %alice_skill1,130
mov %alice_skill2,100
mov %alice_skill3,70
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free of Carmilla!"
mov $mogaku_anno2,"Luka broke free from Carmilla!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"No, no! I won't let you go!"
mov $mogaku_sel2,"There's no point struggling like that!"
mov $mogaku_sel3,"No, no! I won't let you go!"
mov $mogaku_sel4,"There's no point struggling like that!"
mov $mogaku_sel5,"No, no! I won't let you go!"
mov $mogaku_dassyutu1,"Arara... You ran away."
mov $mogaku_dassyutu2,"Didn't you want to have your semen sucked by my other mouth...?"
mov $mogaku_earth_dassyutu1,"Wahwah... What crazy power!"
mov $mogaku_earth_dassyutu2,"Didn't you want to have your semen sucked by my other mouth...?"
mov $half_s1,"Hehe, it feels great, doesn't it?"
mov $half_s2,"Just go ahead and come now. "
mov $kiki_s1,"First I'll make you come..."
mov $kiki_s2,"Then after that, I'll suck, suck, suck you dry! "
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,4
mov %owaza_count2a,4
mov %owaza_count3a,7
mov %owaza_count3b,4
name $name
>I am the close aide to the Queen, Carmilla.@
>We have already taken this Castle...\
>The Queen ordered me to take care of any intruders who dared to come in.@
>I'll suck out all of your blood, and dispose of you. \
name ""
name "Luka"
>Gah!\
name ""
>She seems somewhat absentminded, but is unmistakably powerful...@
>She isn't the aide to the Queen for show...\
name $name
>Don't worry, I'll gently suck you dry...@
>You'll go completely dry in my embrace. \
name ""
name "Luka"
>What did you do to the Sabasa King...?@
>You didn't kill him, did you!?\
name ""
name $name
>He's shut up in the dungeon.@
>He was too hard to catch...\
name ""
name "Luka"
>I see, thank goodness...@
>Then I'll defeat you all and liberate both the Castle and the King!\
name ""
goto *common_main



*carmilla_v

gosub *face3
name $name
>No...@
>My Queen... Forgive meeee!\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Carmilla is sealed in the shape of a bat!\
mov %viclose,1:gosub *victory
mov %getexp,180000:gosub *lvup
mov %2395,1
goto *sean0342



*carmilla_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Aha, do you want me to suck on you?@
>Then I'll keep going until you're completely dry. \
name ""
goto *carmilla_a



*carmilla_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *carmilla_kousan
if %cmd1=16 goto *carmilla_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *carmilla_main



*carmilla_a

if %kousoku=1 gosub *carmilla_a7:goto *common_main
rnd2 %ransu,1,8
if %ransu=1 gosub *carmilla_a1:goto *common_main
if %ransu=2 gosub *carmilla_a2:goto *common_main
if %ransu=3 gosub *carmilla_a3:goto *common_main
if %ransu=4 && %owaza_count3b>5 gosub *carmilla_a4:goto *common_main
if %ransu=5 && %owaza_count2a>5 && %status=0 && %enemy_wind=0 gosub *carmilla_a5:goto *common_main
if %ransu=6 && %owaza_count1a>5 gosub *carmilla_a6:goto *common_main
if %ransu>6 && %owaza_count3a>8 && %enemy_wind=0 gosub *carmilla_el1:goto *common_main
skip -8



*carmilla_el1

add %stack,1
mov %owaza_count3a,0
name $name
>Please come, Zylphe!\
name ""
skillname "Wind Spirit Summon"
mov %enemy_wind,4
mov %kaihi_el,50
dwave 2,"se\wind2.ogg"
lsp2 0,":a;chara\zylphe_st02.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *enemy_elm_print
>Carmilla summons a spirit of wind!\
skillname ""
if %first_sel1=1 sub %stack,1:return
if %kousan=2 sub %stack,1:return
name "Luka"
>You have a spirit too...\
name ""
>Due to the spirit's power, Carmilla's speed seems to have drastically increased.\
lsp 700,":a;chara\alice_st73.bmp",-170,50
lsp 701,":a;chara\carmilla_st01.bmp",160,0:print 10,500
name "Alice"
>Wind against wind! Counter speed with speed!@
>Luka, you need to use the wind-based fallen angel dance!\
name ""
name "Luka"
>No... That won't work.\
name ""
>A wind based technique won't do anything against an actual wind spirit.@
>Rather, I should use the power of the earth...\
>She'll sacrifice some power for that increased speed.@
>So if I increase my defense with the power of the earth, it should have a much more noticeable difference!\
csp 701
gosub *face1
mov %first_sel1,1
sub %stack,1
return



*carmilla_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll pet your penis all over! "
if %ransu=2 mov $sel1,"I'll make it shoot out with my hand! "
if %ransu=3 mov $sel1,"I'll tease your penis through my cloak! "
name $name
eng $sel1:$sel6\
name ""
skillname "Carmilla's Fingering"
dwave 1,"se\ero_koki1.ogg"
>Carmilla grabs Luka's penis through her cloak, and rubs it!
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3831
mov %earth_keigen_el,70
if %nanido<2 damage 300,320
if %nanido=2 damage 320,340
if %nanido=3 damage 340,360
if %enemy_wind=0 skip 13
dwave 1,"se\ero_koki1.ogg"
>She fingers the tip of his penis through her cloak!
mov %earth_keigen_el,70
if %nanido<2 damage 300,320
if %nanido=2 damage 320,340
if %nanido=3 damage 340,360
dwave 1,"se\ero_koki1.ogg"
>She rubs the shaft of Luka's penis through her cloak!
mov %earth_keigen_el,70
if %nanido<2 damage 300,320
if %nanido=2 damage 320,340
if %nanido=3 damage 340,360
skillname ""
if %mylife=0 sub %stack,1:return *carmilla_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*carmilla_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Melt away inside my mouth. "
if %ransu=2 mov $sel1,"If your semen leaks out, I'll just suck it all up! "
if %ransu=3 mov $sel1,"I'll suck on you, and make you come right away! "
name $name
eng $sel1:$sel6\
name ""
skillname "Carmilla's Mouthing"
dwave 1,"se\ero_buchu2.ogg"
>Carmilla sucks on Luka's penis!
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3832
mov %earth_keigen_el,70
if %nanido<2 damage 310,330
if %nanido=2 damage 330,350
if %nanido=3 damage 350,370
if %enemy_wind=0 skip 13
dwave 1,"se\ero_pyu2.ogg"
>Her tongue crawls around the tip of his penis!
mov %earth_keigen_el,70
if %nanido<2 damage 310,330
if %nanido=2 damage 330,350
if %nanido=3 damage 350,370
dwave 1,"se\ero_buchu3.ogg"
>Her wet saliva swirls around Luka's penis as she sucks!
mov %earth_keigen_el,70
if %nanido<2 damage 310,330
if %nanido=2 damage 330,350
if %nanido=3 damage 350,370
skillname ""
if %mylife=0 sub %stack,1:return *carmilla_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*carmilla_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I can even suck out your semen between these breasts you know? "
if %ransu=2 mov $sel1,"Come between these sooooft breasts! "
if %ransu=3 mov $sel1,"It'll feel amazing if you leak out between these breasts. "
name $name
eng $sel1:$sel6\
name ""
skillname "Carmilla's Milking"
dwave 1,"se\ero_sigoki1.ogg"
>Carmilla sandwiches Luka's penis between her breasts, and squeezes!
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3833
mov %earth_keigen_el,70
if %nanido<2 damage 320,340
if %nanido=2 damage 340,360
if %nanido=3 damage 360,380
if %enemy_wind=0 skip 13
dwave 1,"se\ero_sigoki1.ogg"
>Pressing the right and left breasts together, she crushes Luka's penis between them!
mov %earth_keigen_el,70
if %nanido<2 damage 320,340
if %nanido=2 damage 340,360
if %nanido=3 damage 360,380
dwave 1,"se\ero_sigoki1.ogg"
>Sandwiched between her soft breasts, Luka is attacked by tight pleasure!
mov %earth_keigen_el,70
if %nanido<2 damage 320,340
if %nanido=2 damage 340,360
if %nanido=3 damage 360,380
skillname ""
if %mylife=0 sub %stack,1:return *carmilla_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*carmilla_a4

add %stack,1
mov %owaza_count3b,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My cloak feels amazing. "
if %ransu=2 mov $sel1,"A simple man can't stand up to my cloak. "
if %ransu=3 mov $sel1,"Finish while wrapped in my cloak. "
name $name
eng $sel1:$sel6\
name ""
skillname "Carmilla's Night Clothing"
dwave 1,"se\ero_makituki1.ogg"
>Carmilla's cloak coils around Luka's body!
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<60 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3834
mov %earth_keigen_el,70
if %nanido<2 damage 120,140
if %nanido=2 damage 130,150
if %nanido=3 damage 140,160
dwave 1,"se\ero_makituki1.ogg"
>Her cloak caresses and rubs every inch of Luka's body!
mov %earth_keigen_el,70
if %nanido<2 damage 120,140
if %nanido=2 damage 130,150
if %nanido=3 damage 140,160
>The cloak around his body slowly tightens!
dwave 1,"se\ero_simetuke1.ogg"
mov %earth_keigen_el,70
if %nanido<2 damage 120,140
if %nanido=2 damage 130,150
if %nanido=3 damage 140,160
if %enemy_wind=0 skip 17
dwave 1,"se\ero_chupa6.ogg"
>The bizarre cloak sucks out Luka's energy!
mov %earth_keigen_el,70
if %nanido<2 damage 120,140
if %nanido=2 damage 130,150
if %nanido=3 damage 140,160
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
dwave 1,"se\ero_chupa6.ogg"
>The cloak tightens, and squeezes out more of Luka's energy!
mov %earth_keigen_el,70
if %nanido<2 damage 120,140
if %nanido=2 damage 130,150
if %nanido=3 damage 140,160
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *carmilla_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*carmilla_a5

add %stack,1
mov %owaza_count2a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Ehehe... Time to suck on you. "
if %ransu=2 mov $sel1,"Your blood smells so delicious... "
if %ransu=3 mov $sel1,"I'll suck it all up... It will feel amazing. "
name $name
eng $sel1:$sel6\
name ""
skillname "Carmilla's Blood Sucking"
dwave 1,"se\ero_chupa6.ogg"
eng "Carmilla's fangs brush against Luka's neck!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount3 3835
>As Carmilla bites down and sucks his blood, ecstasy floods Luka's body!
if %nanido<2 damage 280,300
if %nanido=2 damage 300,320
if %nanido=3 damage 320,340
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
if %status=0 mov $sel1,"Luka has been immersed in ecstasy!"
if %status=1 mov $sel1,"Luka is immersed in ecstasy..."
mov %status,1:gosub *status_print
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *carmilla_h5
if %kousan=2 sub %stack,1:return
name "Luka"
>Haaa...\
name ""
name $name
>Ahaha... I only sucked a little, and you're already like this?@
>Shall I make you come, just like this?\
name ""
rnd2 %status_turn,1,2
if %nanido=2 rnd2 %status_turn,1,2
if %nanido=3 rnd2 %status_turn,2,3
sub %stack,1
return



*carmilla_a6

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 4
name $name
>Now I'm going to suck out your semen itself. \
name ""
skillname "Lean"
eng "Carmilla pushes Luka down, and leans over him!":$sel6/
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>Luka has been bound by Carmilla!\
skillname ""
name $name
>A Vampire can suck blood and energy with their lower mouths, too...@
>First I'll suck up your energy and weaken you... \
name ""
if %earth=0 && %nanido<2 mov %genmogaku,0
if %earth=0 && %nanido=2 mov %genmogaku,0
if %earth=0 && %nanido=3 mov %genmogaku,0
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
sub %stack,1
return



*carmilla_a7

add %stack,1
name $name
>Now to suck everything from you with my other mouth.@
>It feels incredible, so prepare yourself. \
name ""
skillname "Graveyard of Lilies"
dwave 1,"se\ero_pyu1.ogg"
mov $tatie4,"carmilla_hb2"
lsp 700,":a;chara\carmilla_hb2.bmp",0,0:print 10,500
>Carmilla drops her waist, forcing Luka into her!
skillcount3 3836
mov %damage_kotei,1
damage 400,450
mov %kousoku,1:gosub *status_print
>Luka is being raped by Carmilla!\
skillname ""
if %mylife=0 sub %stack,1:return *carmilla_h6
name "Luka"
>Uwaaa!!\
name ""
>As I'm forced into her, it feels like her warm flesh is sucking me deeper just like it was a small mouth.\
name $name
>Now you can't run anymore...@
>I'll keep sucking everything up, until you're completely dry. \
name ""
sub %stack,1
goto *carmilla_a8



*carmilla_a8

add %stack,1
>Luka is being raped by Carmilla...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck out your energy through my lower mouth. ":mov $sel2,"Carmilla's vagina squeezes down on Luka's penis!"
if %ransu=2 mov $sel1,"Just let it out once you can't take it any longer. ":mov $sel2,"Carmilla slowly squeezes down harder on Luka's penis!"
if %ransu=3 mov $sel1,"If I tighten up, will you let it out?":mov $sel2,"Carmilla tightens her vagina round Luka's penis!"
if %ransu=4 mov $sel1,"Time to squeeze your penis! ":mov $sel2,"Carmilla squeezes Luka's penis hard!"
if %ransu=5 mov $sel1,"If I move my waist, it's like we're actually having sex. ":mov $sel2,"Carmilla slowly moves her hips back and forth!"
name $name
eng $sel1:$sel6\
name ""
skillname "Graveyard of Lilies"
dwave 1,"se\ero_chupa4.ogg"
eng $sel2:$sel6
skillcount3 3836
mov %damage_kotei,1
damage 400,450
skillname ""
if %mylife=0 sub %stack,1:return *carmilla_h7
sub %stack,1
goto *carmilla_a8



*carmilla_onedari

mov $list1,"Carmilla's Fingering"
if %3831>0 mov %list_num1,1
mov $list2,"Carmilla's Mouthing"
if %3832>0 mov %list_num2,1
mov $list3,"Carmilla's Milking"
if %3833>0 mov %list_num3,1
mov $list4,"Carmilla's Night Clothing"
if %3834>0 mov %list_num4,1
mov $list5,"Carmilla's Blood Sucking"
if %3835>0 mov %list_num5,1
mov $list6,"Graveyard of Lilies"
if %3836>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *carmilla_onedari1
if %cmd1=12 goto *carmilla_onedari2
if %cmd1=13 goto *carmilla_onedari3
if %cmd1=14 goto *carmilla_onedari4
if %cmd1=15 goto *carmilla_onedari5
if %cmd1=16 goto *carmilla_onedari6
if %cmd1=-1 goto *carmilla_main
goto *carmilla_onedari



*carmilla_onedari1

gosub *onedari_syori
name $name
>You want me to make you come with my hands?@
>Then it's time for some special service... \
name ""
gosub *carmilla_el1
gosub *carmilla_a1
skip -1



*carmilla_onedari2

gosub *onedari_syori
name $name
>You want me to make you come with my mouth?@
>Then it's time for some special service... \
name ""
gosub *carmilla_el1
gosub *carmilla_a2
skip -1



*carmilla_onedari3

gosub *onedari_syori
name $name
>You want me to make you come with my breasts?@
>Then it's time for some special service... \
name ""
gosub *carmilla_el1
gosub *carmilla_a3
skip -1



*carmilla_onedari4

gosub *onedari_syori
name $name
>You want me to make you come with my cloak?@
>Then it's time for some special service... \
name ""
gosub *carmilla_el1
gosub *carmilla_a4
skip -1



*carmilla_onedari5

gosub *onedari_syori
name $name
>You want me to suck your blood?@
>Then it's time for some special service... \
name ""
gosub *carmilla_a5
skip -1



*carmilla_onedari6

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want me to rape you?@
>Then it's time for some special service... \
name ""
if %kousoku=0 gosub *carmilla_a6
gosub *carmilla_a7
skip -1



*carmilla_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\carmilla_bk03.bmp",0,0
gosub *syasei2
>As Carmilla strokes Luka's penis through her cloak, he comes, covering her cloak and hands in semen.\
mov %viclose,1:gosub *lose
mov %2695,%2695+1:if %2695=1 mov %count_koenemy,%count_koenemy+1
if %2695>%count_most mov %count_most,%2695:mov $count_mostname,$name
count 5,4
mov $bad1,"Carmilla forced Luka to come with her hands."
gosub *face2
name $name
>Aha, look at how much you leaked out...@
>You covered my hands in semen... \
name ""
goto *carmilla_h



*carmilla_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\carmilla_bk01.bmp",0,0
gosub *syasei2
>As Carmilla sucks on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2695,%2695+1:if %2695=1 mov %count_koenemy,%count_koenemy+1
if %2695>%count_most mov %count_most,%2695:mov $count_mostname,$name
count 4,4
mov $bad1,"Carmilla forced Luka to come with her mouth."
gosub *face2
name $name
>Aha, look at how much you leaked out...@
>You filled my mouth with semen... \
name ""
goto *carmilla_h



*carmilla_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\carmilla_bk02.bmp",0,0
gosub *syasei2
>As Carmilla's soft breasts press down around Luka's penis, he comes, covering her chest in semen.\
mov %viclose,1:gosub *lose
mov %2695,%2695+1:if %2695=1 mov %count_koenemy,%count_koenemy+1
if %2695>%count_most mov %count_most,%2695:mov $count_mostname,$name
count 7,4
mov $bad1,"Carmilla used her breasts to force Luka to come."
gosub *face2
name $name
>Aha, look at how much you leaked out...@
>You covered my breasts in semen... \
name ""
goto *carmilla_h



*carmilla_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 696,":a;chara\carmilla_bk06.bmp",0,0
gosub *syasei2
>As Carmilla's strange cloak wraps around Luka's penis, he comes, covering it with semen.\
mov %viclose,1:gosub *lose
mov %2695,%2695+1:if %2695=1 mov %count_koenemy,%count_koenemy+1
if %2695>%count_most mov %count_most,%2695:mov $count_mostname,$name
count 27,4
mov $bad1,"Carmilla forced Luka to come with her cloak."
gosub *face2
name $name
>Aha, look at how much you leaked out...@
>You covered my cloak in semen... \
name ""
goto *carmilla_h



*carmilla_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\carmilla_bk04.bmp",0,0
gosub *syasei2
>As Carmilla sucks on Luka's blood, he comes, shooting semen onto her stomach.\
mov %viclose,1:gosub *lose
mov %2695,%2695+1:if %2695=1 mov %count_koenemy,%count_koenemy+1
if %2695>%count_most mov %count_most,%2695:mov $count_mostname,$name
count 32,4
mov $bad1,"Carmilla forced Luka to come as she sucked his blood."
gosub *face2
name $name
>Did you end up having an orgasm from me sucking your blood?@
>You covered my stomach in semen... \
name ""
goto *carmilla_h



*carmilla_h6

mov %ikigoe,3:gosub *ikigoe
name $name
>What?@>But I just barely put it in...\
name ""
gosub *syasei1
lsp 700,":a;chara\carmilla_hb3.bmp",0,0
gosub *syasei2
>The moment Luka is forced into Carmilla's vagina, he comes, filling her with semen.\
mov %viclose,1:gosub *lose2
mov %2695,%2695+1:if %2695=1 mov %count_koenemy,%count_koenemy+1
if %2695>%count_most mov %count_most,%2695:mov $count_mostname,$name
count 1,4
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come the moment of insertion."
gosub *face2
name $name
>Aha, you didn't even last a couple seconds. @
>What a pitiful little boy, unable to hold it in at all. \
name ""
goto *carmilla_h8



*carmilla_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\carmilla_hb3.bmp",0,0
gosub *syasei2
>As Carmilla's vagina sucks and squeezes his penis, Luka comes, filling her with semen.\
mov %viclose,1:gosub *lose2
mov %2695,%2695+1:if %2695=1 mov %count_koenemy,%count_koenemy+1
if %2695>%count_most mov %count_most,%2695:mov $count_mostname,$name
count 1,4
mov $bad1,"Carmilla forced Luka to orgasm as she raped him."
gosub *face2
name $name
>Aha... You filled my pussy with so much semen. @
>It felt amazing being sucked on by my other mouth, didn't it?\
name ""
goto *carmilla_h8



*carmilla_h8

name "Luka"
>Ahhh...\
name ""
name $name
>But I can still suck out so much more. @
>I'll suck out more and more from this penis of yours! \
name ""
skillcount3 3836
skillname "Graveyard of Lilies"
dwave 1,"se\ero_chupa4.ogg"
lsp 700,":a;chara\carmilla_hb6.bmp",0,0:print 10,500
>While raping Luka, Carmilla wraps his body with her cloak!\
mov %damage_kotei,1
damage 400,450
dwave 1,"se\ero_chupa4.ogg"
lsp 700,":a;chara\carmilla_hb7.bmp",0,0:print 10,500
>She keeps raping him with the cloak over him!
mov %damage_kotei,1
damage 400,450
skillname ""
name "Luka"
>Ahhh! It's sucking on me...!\
name ""
name $name
>Hehehe, I can suck out your energy even with my pussy...\
>It would be a waste to leave you completely dry before I sucked your blood, though... \
name ""
skillcount3 3836
skillname "Graveyard of Lilies"
dwave 1,"se\ero_chupa4.ogg"
>Her slightly curved vagina rubs against Luka's penis with every movement!
mov %damage_kotei,1
damage 400,450
dwave 1,"se\ero_chupa4.ogg"
>Carmilla's vagina vibrates around Luka's penis!
mov %damage_kotei,1
damage 400,450
skillname ""
name "Luka"
>Haaa... I'm going to come again...\
name ""
name $name
>Ehehe... You're going to give me another feast?@
>Then I'll properly suck it all up! \
name ""
skillcount3 3836
skillname "Graveyard of Lilies"
dwave 1,"se\ero_chupa4.ogg"
>Her vagina tightens around Luka's penis!
mov %damage_kotei,1
damage 400,450
dwave 1,"se\ero_chupa4.ogg"
>From deep inside her vagina, a suction pulls on Luka's penis!
mov %damage_kotei,1
damage 400,450
skillname ""
name "Luka"
>I...It feels too good...! Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\carmilla_hb8.bmp",0,0
gosub *syasei2
>Luka trembles as the ecstasy from his orgasm washes over his weak body.\
name $name
>Ufufu... I sucked it out again. @
>I need to properly suck up the leftovers in your urethra... \
name ""
skillcount3 3836
skillname "Graveyard of Lilies"
dwave 1,"se\ero_chupa4.ogg"
>The suction from deep inside Carmilla's vagina gets stronger!
mov %damage_kotei,1
damage 400,450
dwave 1,"se\ero_chupa4.ogg"
>Tightening at the same time, the semen still inside his urethra is pulled out!
mov %damage_kotei,1
damage 400,450
skillname ""
name "Luka"
>A...Ahh... Stop sucking...\
name ""
name $name
>No...@
>I'm going to completely suck out your semen, after all. \
name ""
skillcount3 3836
skillname "Graveyard of Lilies"
dwave 1,"se\ero_chupa4.ogg"
>Carmilla's vagina shrinks smaller, squeezing Luka's penis hard!
mov %damage_kotei,1
damage 400,450
dwave 1,"se\ero_chupa4.ogg"
>Luka's penis presses into her wet, soft walls!
mov %damage_kotei,1
damage 400,450
skillname ""
name "Luka"
>T...Too good... No...\
name ""
name $name
>Ufufu... Next, how about I suck on you with my cervix?@
>It will feel absolutely incredible. \
name ""
skillcount3 3836
skillname "Graveyard of Lilies"
dwave 1,"se\ero_chupa4.ogg"
>Carmilla's cervix opens and clamps around the tip of Luka's penis!
mov %damage_kotei,1
damage 400,450
dwave 1,"se\ero_chupa4.ogg"
>Her narrow cervix sucks hard on the tip of Luka's penis!
mov %damage_kotei,1
damage 400,450
skillname ""
name "Luka"
>A...Amazing...! Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\carmilla_hb9.bmp",0,0
gosub *syasei2
>As Carmilla's cervix sucks on the tip of Luka's penis, he comes, spraying his semen directly into her womb.\
name $name
>Hehe... Very delicious. @
>Next, shall I suck your blood as well...?\
name ""
gosub *clear_sprite
gosub *setwindow_01p
>After forcing Luka to multiple orgasms, the Vampire looks at Luka's weakened body with a cold smile.\
>The cruel smile of a predator about to feast on their prey...\
mov %battle,0
mov %hsean,1
count 1,4
mov $bad1,"Carmilla forced Luka to come as she raped him."
goto *carmilla_h



*carmilla_h

mov $bad2,"Sucking both his semen and blood dry, Carmilla mercilessly left Luka a dry husk."
if %2695=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
name $name
>Unable to resist?@
>Then it's time to suck you. \
name ""
cspl 690,699
lsp 700,":a;chara\carmilla_ha1.bmp",0,0:print 10,500
>Carmilla embraces me, and slowly licks my neck.@
>I shiver as her wet tongue runs around my sensitive neck.\
name "Luka"
>Ah...\
name ""
>I can't help but writhe in her embrace as the sensitive stimulation attacks me.\
>At the same time, she embraces me even tighter...@
>And plunges her fangs into my neck!\
name $name
>Nnnn... *Suck*\
name ""
name "Luka"
>Ahhh...\
name ""
>My blood is being sucked by the Vampire... But there's no pain.@
>Instead, a sweet sensation of pleasure radiates out from where she bit me.\
name $name
>Delicious... *Slurp*\
name ""
name "Luka"
>Haaa...\
name ""
>A strange sensation of powerlessness starts to fill my body.@
>And the feeling of ecstasy is making me feel even more at ease.\
>As more and more blood is sucked, the sensations spread to my whole body.@
>Overcome by the pleasure, I quickly surrender myself to the Vampire, wanting her to suck even more blood.\
name "Luka"
>Ahh... That feels so good...\
name ""
>My mouth hangs open in her embrace.@
>Drool starts to drip from my mouth as she sucks my blood while hugging me close.\
>As I beg her to suck more from me, a sudden pressure attacks my waist.\
gosub *syasei1
lsp 700,":a;chara\carmilla_ha2.bmp",0,0
gosub *syasei2
name "Luka"
>Ahhh...\
name ""
>Even though nothing was touching my penis, I ejaculated.@
>My white semen sprays out onto her black cloak.\
>Feeling so good from her sucking my blood, I somehow reached an orgasm.\
name $name
>Oh dear... You peed out your white semen?@
>And you got it all over my cloak, too...\
>Your penis needs to be punished, I see.@
>I'll suck and absorb your energy from there, too.\
name ""
lsp 700,":a;chara\carmilla_ha3.bmp",0,0:print 10,500
name "Luka"
>Ah... Ahhh!\
name ""
mov %hseanwave,11:hseanwave
>Carmilla's cloak suddenly moves, as if it had a will of its own.@
>It quickly wraps around my body, completely enveloping my body.\
>In addition, there are many tiny little tentacles writhing around inside the cloak...@
>They cling to my penis as I ejaculate, stimulating my already extra sensitive organ.\
name "Luka"
>Wh...What the... Ahh!\
name ""
gosub *syasei1
lsp 700,":a;chara\carmilla_ha4.bmp",0,0
gosub *syasei2
>Feeling too good, I quickly reach another orgasm as the tentacles squeeze my penis.\
name "Luka"
>Haaa...\
name ""
name $name
>Aha, already?@
>Did having your energy sucked from your penis feel good, too?\
>Your blood, or your semen... Which would you rather be sucked dry first?\
name ""
>Carmilla continues sucking blood from my neck with an innocent smile.@
>The feeling of ecstasy from before is only getting stronger, as I feel my life itself slowly fading from my body.\
>At the same time, the countless tentacles from her cloak are stroking and rubbing my penis...@
>My mind and body are completely taken by the ecstasy.\
name "Luka"
>Ahh... Suck more...\
name ""
name $name
>Hehehe... Sure thing. @
>I'll suck on you until you're completely dry!\
>*Suck*\
name ""
name "Luka"
>Haaa...\
name ""
gosub *syasei1:gosub *syasei2
>As she sucks on my blood, I reach another powerful orgasm.@
>The semen I shoot out is quickly absorbed by the cloak.\
name "Luka"
>Ahh...\
name ""
>If any more is sucked out, my life will really be in danger...@
>Even though I realize this, I can't bring myself to resist her.\
>Rather, the desire to have her suck everything from me is rising...\
name "Luka"
>Haa... More... More...\
name ""
name $name
>Then, just as you wish... I'll suck everything up at once.@
>Have a taste of Heaven as I suck you dry. \
name ""
>My response to those horrifying words...@
>Was just to cling to her body.\
>I just want her to suck me...@>That ruinous desire is all I can think of.\
name $name
>Hehe, you're such a spoiled little boy. \
>I'll hug you until your last moments...@
>So relax and be dried up. \
name ""
mov %hseanwave,12:hseanwave
lsp 700,":a;chara\carmilla_ha5.bmp",0,0:print 10,500
>The cloak tightens around my body, its tentacles rubbing and stroking my penis.\
name "Luka"
>Ahhhh!\
name ""
>They start squeezing tighter and tighter around my glans, crushing it under several layers of softness...\
gosub *syasei1
lsp 700,":a;chara\carmilla_ha6.bmp",0,0
gosub *syasei2
name "Luka"
>Ahhh...!\
name ""
>In only moments, an orgasm is forced into me, drawing out semen as she continues sucking my blood.\
>While writhing in her embrace, all of my bodily fluids are being drawn out...@
>And all I can do in response is gasp and writhe in ecstasy.\
name $name
>Teehee... I'll gulp everything down. \
name ""
name "Luka"
>Haaa...\
name ""
lsp 700,":a;chara\carmilla_ha7.bmp",0,0:print 10,500
>The semen I leaked out is absorbed by the cloak.@
>The tentacles stroking my penis rub out every drop of semen inside me, sucking that up too.\
name $name
>*Suck* *Slurp*\
name ""
name "Luka"
>Hyaaa!\
name ""
gosub *syasei1
lsp 700,":a;chara\carmilla_ha8.bmp",0,0
gosub *syasei2
>Her cloak strokes and squeezes my penis, almost wringing out semen like my penis was a towel.\
>My penis spasms and shoots out semen, as my blood rushes into her mouth through my neck.\
>Every second, more of my life itself is being sucked out of my body into Carmilla's...\
name "Luka"
>Haaa...\
name ""
name $name
>*Suck* *Slurp*\
name ""
gosub *syasei1
lsp 700,":a;chara\carmilla_ha9.bmp",0,0
gosub *syasei2
>The devilish cloak acts like a pump, sucking out my semen almost without stopping.@
>The realization that my life is about to end dawns on me...\
name "Luka"
>Ah...ah...\
name ""
>I nestle in Carmilla's embrace, enraptured by the feeling of having everything of mine sucked out.\
mov %hseanwave,0:hseanwave
gosub *anten
name $name
>Hehehe... Thanks for the meal. \
name ""
>A dried out corpse is dropped from Carmilla's cloak.@
>The horrifying corpse of the one known as Luka, completely bereft of semen and blood.\
>.............\
goto *badend



*elisabeth_start

mov $name,"Elizabeth"
mov $name2,"Elizabeth"
mov $lavel,"elisabeth"
mov $tatie1,"elisabeth_st01"
mov $tatie2,"elisabeth_st02"
mov $tatie3,"elisabeth_st03"
mov $tatie4,"elisabeth_st02"
mov $haikei,"bg223"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,17000
if %nanido=2 mov %max_enemylife,17000
if %nanido=3 mov %max_enemylife,20000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,1
mov %alice_skill1,140
mov %alice_skill2,100
mov %alice_skill3,70
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't escape from Elizabeth's cloak!"
mov $mogaku_anno2,"Luka broke free of Elizabeth's cloak!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Hehe, you won't escape with that!"
mov $mogaku_sel2,"Come as you struggle miserably!"
mov $mogaku_sel3,"What's wrong? Is that all the resistance you can muster?"
mov $mogaku_sel4,"You can't escape from my cloak that easily!"
mov $mogaku_sel5,"You won't escape, no matter how hard you struggle!"
mov $mogaku_dassyutu1,"Oh? Able to escape from my cloak?"
mov $mogaku_dassyutu2,"It would have been easier for you had you just given up..."
mov $mogaku_earth_dassyutu1,"That is a great power indeed."
mov $mogaku_earth_dassyutu2,"It would have been easier for you had you just given up..."
mov $half_s1,"Hehe, my sexual skills are top class."
mov $half_s2,"Now shoot your semen onto my body..."
mov $kiki_s1,"Can you not take it anymore...?"
mov $kiki_s2,"Then submit all of your bodily fluids to me!"
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,6
mov %owaza_count1b,6
mov %owaza_count2a,6
mov %owaza_count3a,8
name $name
>My name is Elizabeth, a Vampire of the highest rank whom has sworn loyalty to the Queen.\
>Unfortunately for you, I am not as kind as Carmilla.@
>While you go mad with agonized pleasure, I'll slowly suck you to death!\
name ""
name "Luka"
>Erhg...@>Here I come!\
name ""
>She seems just as strong as Carmilla...@
>There's no choice but to fight!\
goto *common_main



*elisabeth_v

gosub *face3
name $name
>It can't be... After living hundreds of years, this is how I fall?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Elizabeth is sealed in the form of a bat!\
mov %viclose,1:gosub *victory
mov %getexp,200000:gosub *lvup
mov %2396,1
goto *sean0343



*elisabeth_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Hehe... Do you wish to be my prey?@
>Then I shall reward you, my little obedient boy...\
name ""
goto *elisabeth_a



*elisabeth_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *elisabeth_kousan
if %cmd1=16 goto *elisabeth_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *elisabeth_main



*elisabeth_a

if %kousoku=1 gosub *elisabeth_a6:goto *common_main
if %enemy_earth=3 gosub *elisabeth_a7:goto *common_main
rnd2 %ransu,1,7
if %ransu=1 gosub *elisabeth_a1:goto *common_main
if %ransu=2 gosub *elisabeth_a2:goto *common_main
if %ransu=3 gosub *elisabeth_a3:goto *common_main
if %ransu=4 && %owaza_count2a>7 && %status=0 && %enemy_earth=0 gosub *elisabeth_a4:goto *common_main
if %ransu=5 && %owaza_count1a>7 && %status=0 gosub *elisabeth_a5:goto *common_main
if %ransu>5 && %owaza_count3a>9 && %status=0 && %enemy_earth=0 gosub *elisabeth_el2:goto *common_main
skip -7



*elisabeth_el2

add %stack,1
mov %owaza_count3a,0
name $name
>Come, Gnomaren!\
name ""
skillname "Summon Earth Spirit"
mov %enemy_earth,4
mov %damage_keigen_el,50
dwave 2,"se\earth1.ogg"
lsp2 0,":a;chara\gnomaren_st01.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *enemy_elm_print
>Elizabeth summons a spirit of earth!\
skillname ""
if %first_sel2=1 sub %stack,1:return
if %kousan=2 sub %stack,1:return
name "Luka"
>Gah...@> Another spirit?\
name ""
lsp 700,":a;chara\alice_st73.bmp",-170,50
lsp 701,":a;chara\elisabeth_st01.bmp",160,0:print 10,500
name "Alice"
>Counter stupid strength with stupid strength!@
>Luka, call Gnome!\
name ""
name "Luka"
>No... That's no good.\
name ""
>Though her strength just sharply increased, I can see her speed went down an equal amount...\
>If I focus solely on evasion, I don't think she'll be able to catch me.\
>Wind based would counter earth...@>But without Sylph, the next closest thing is Fallen Angel Dance.\
>With that, I should be able to evade her blows!\
csp 701
gosub *face1
mov %first_sel2,1
sub %stack,1
return



*elisabeth_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Make my gloves dirty!"
if %ransu=2 mov $sel1,"I'll squeeze it like this!"
if %ransu=3 mov $sel1,"Hehehe, can you withstand my hand technique?"
name $name
eng $sel1:$sel6\
name ""
skillname "Elizabeth's Captivating Hand"
dwave 1,"se\ero_koki1.ogg"
>Elizabeth strokes Luka's penis with her silky gloved hands!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,20
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3837
if %nanido<2 damage 320,340
if %nanido=2 damage 340,360
if %nanido=3 damage 360,380
skillname ""
if %mylife=0 sub %stack,1:return *elisabeth_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*elisabeth_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll get a good taste of your semen..."
if %ransu=2 mov $sel1,"If I suck on you like this, will you finish right away?"
if %ransu=3 mov $sel1,"It may be fun to finish you off with my mouth..."
name $name
eng $sel1:$sel6\
name ""
skillname "Elizabeth's Attending Mouth"
dwave 1,"se\ero_buchu2.ogg"
>Elizabeth sucks on Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,20
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3838
if %nanido<2 damage 330,350
if %nanido=2 damage 350,370
if %nanido=3 damage 370,390
skillname ""
if %mylife=0 sub %stack,1:return *elisabeth_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*elisabeth_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hmph... Even these breasts are enough to delight a man."
if %ransu=2 mov $sel1,"I'll squeeze you between... No, I mean rub it against my breasts."
if %ransu=3 mov $sel1,"I've heard spraying semen on breasts makes them bigger!"
name $name
eng $sel1:$sel6\
name ""
skillname "Elizabeth's Admiring Breasts"
dwave 1,"se\ero_buchu2.ogg"
>Elizabeth rubs Luka's penis against her breasts!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,20
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3839
if %nanido<2 damage 340,360
if %nanido=2 damage 360,380
if %nanido=3 damage 380,400
skillname ""
if %mylife=0 sub %stack,1:return *elisabeth_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*elisabeth_a4

add %stack,1
mov %owaza_count2a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Shall I take a sip of your blood? Mmmm..."
if %ransu=2 mov $sel1,"I'll take a good drink..."
if %ransu=3 mov $sel1,"Hehe... Do you want me to suck you dry?"
name $name
eng $sel1:$sel6\
name ""
skillname "Elizabeth's Bloodsucking"
dwave 1,"se\ero_chupa6.ogg"
eng "Elizabeth's fangs race toward Luka's neck!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
>Biting into him, sweet ecstasy floods through Luka's body as Elizabeth sucks his blood!
skillcount3 3840
if %nanido<2 damage 300,320
if %nanido=2 damage 320,340
if %nanido=3 damage 340,360
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
if %status=0 mov $sel1,"Luka has been immersed in ecstasy!"
if %status=1 mov $sel1,"Luka is immersed in ecstasy..."
mov %status,1:gosub *status_print
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *elisabeth_h4
if %kousan=2 sub %stack,1:return
name "Luka"
>Haaa...\
name ""
name $name
>Hehe, you look so dazed...@
>Now, shall I send you to heaven as you are?\
name ""
rnd2 %status_turn,1,2
if %nanido=2 rnd2 %status_turn,1,2
if %nanido=3 rnd2 %status_turn,2,3
sub %stack,1
return



*elisabeth_a5

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 5
name $name
>The fun ends here.@
>Now you will taste a hell of ejaculations...\
name ""
skillname "Bathory's Cradle"
dwave 1,"se\ero_makituki3.ogg"
eng "Elizabeth's cloak winds around Luka's body!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,5
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
mov $tatie4,"elisabeth_ha1"
mov %kousoku,1:gosub *status_print
>Luka has been bound by Elizabeth!\
skillname ""
name $name
>Hehe, what a pitiful look.@
>Your defenseless penis will be played with by this hand...\
name ""
skillname "Bathory's Cradle"
dwave 1,"se\ero_koki1.ogg"
>Elizabeth gently grabs hold of Luka's penis!
skillcount3 3841
if %nanido<2 damage 170,180
if %nanido=2 damage 180,190
if %nanido=3 damage 190,200
skillname ""
name $name
>Now for something even more pitiful...@
>Hehe, how's this?\
name ""
skillname "Bathory's Cradle"
dwave 1,"se\ero_makituki2.ogg"
mov $tatie4,"elisabeth_ha2"
lsp 700,":a;chara\elisabeth_ha2.bmp",0,0:print 10,500
>The tip of Elizabeth's cloak slips into Luka's ass, and presses against his prostate!
if %nanido<2 damage 170,180
if %nanido=2 damage 180,190
if %nanido=3 damage 190,200
skillname ""
if %mylife=0 sub %stack,1:return *elisabeth_h5
if %earth=0 && %nanido<2 mov %genmogaku,99
if %earth=0 && %nanido=2 mov %genmogaku,99
if %earth=0 && %nanido=3 mov %genmogaku,99
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
if %enemy_earth>0 mov %genmogaku,99
sub %stack,1
return



*elisabeth_a6

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hehe... I'm going to squeeze out all of that semen of yours.":mov $sel2,"Even though you're a man... How does it feel being violated in your ass?"
if %ransu=2 mov $sel1,"Come on, shoot it all out on my face.":mov $sel2,"Cry out as you're violated from behind!"
if %ransu=3 mov $sel1,"Spray it all out into my hand!":mov $sel2,"Hehe, how pitiful... The ultimate dishonor for a man!"
name $name
eng $sel1:$sel6\
name ""
skillname "Bathory's Cradle"
dwave 1,"se\ero_koki1.ogg"
>Elizabeth gently strokes Luka's penis up and down!
skillcount3 3841
if %nanido<2 damage 170,180
if %nanido=2 damage 180,190
if %nanido=3 damage 190,200
skillname ""
name $name
eng $sel2:$sel6\
name ""
skillname "Bathory's Cradle"
dwave 1,"se\ero_makituki2.ogg"
>Elizabeth's cloak presses against Luka's prostate, stimulating him!
if %nanido<2 damage 170,180
if %nanido=2 damage 180,190
if %nanido=3 damage 190,200
skillname ""
if %mylife=0 sub %stack,1:return *elisabeth_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*elisabeth_a7

add %stack,1
mov %owaza_count1b,0
mov %owaza_num1,2
if %kousan=2 skip 5
name $name
>For a high class Vampire like me, even the navel can be used as a sexual organ.\
>Here, how about I suck on you from here...?\
name ""
skillname "Transylvania Midnight"
dwave 1,"se\ero_pyu1.ogg"
lsp 690,":a;chara\elisabeth_ct01.bmp",0,0:print 10,500
eng "Elizabeth grabs Luka's penis, and brings it to her navel!":$sel6/
if %daten>0 goto *skill22x
if %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
>Luka's penis sinks into her tiny navel!
skillcount3 3842
mov %damage_kotei,1
damage 400,500
mov $tatie4,"elisabeth_st02"
mov %kousoku,1:gosub *status_print
>Luka is being raped by Elizabeth's navel!\
skillname ""
if %mylife=0 sub %stack,1:return *elisabeth_h6
name "Luka"
>Hyaaa!\
name ""
>The tiny bellybutton sucks in Luka's penis, the flesh of her soft stomach pressing down hard around him!\
name $name
>Hehehe... It feels incredible, doesn't it?@
>Many men have succumbed to this navel...\
name ""
sub %stack,1
goto *elisabeth_a8



*elisabeth_a8

add %stack,1
>Luka is being raped by Elizabeth's navel...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hehe... I can suck out your semen with this hole":mov $sel2,"Elizabeth's navel makes sucking motions on Luka's penis!"
if %ransu=2 mov $sel1,"I'll tighten my navel around your penis!":mov $sel2,"Elizabeth's navel suddenly tightens hard around Luka's penis!"
if %ransu=3 mov $sel1,"Hehehe, does it feel like you're having sex with me?":mov $sel2,"Elizabeth's small navel shrinks even more, squeezing Luka's penis!"
if %ransu=4 mov $sel1,"If I wave my stomach around...":mov $sel2,"Elizabeth waves her stomach, tossing Luka's penis around inside her navel!"
if %ransu=5 mov $sel1,"How does it feel losing your strength to a belly button?":mov $sel2,"Elizabeth's navel squeezes on Luka's penis, and makes sucking motions!"
name $name
eng $sel1:$sel6\
name ""
skillname "Transylvania Midnight"
dwave 1,"se\ero_chupa4.ogg"
eng $sel2:$sel6
skillcount3 3842
mov %damage_kotei,1
damage 400,500
skillname ""
if %mylife=0 sub %stack,1:return *elisabeth_h7
sub %stack,1
goto *elisabeth_a8



*elisabeth_onedari

mov $list1,"Elizabeth's Captivating Hand"
if %3837>0 mov %list_num1,1
mov $list2,"Elizabeth's Attending Mouth"
if %3838>0 mov %list_num2,1
mov $list3,"Elizabeth's Admiring Breasts"
if %3839>0 mov %list_num3,1
mov $list4,"Elizabeth's Bloodsucking"
if %3840>0 mov %list_num4,1
mov $list5,"Bathory's Cradle"
if %3841>0 mov %list_num5,1
mov $list6,"Transylvania Midnight"
if %3842>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *elisabeth_onedari1
if %cmd1=12 goto *elisabeth_onedari2
if %cmd1=13 goto *elisabeth_onedari3
if %cmd1=14 goto *elisabeth_onedari4
if %cmd1=15 goto *elisabeth_onedari5
if %cmd1=16 goto *elisabeth_onedari6
if %cmd1=-1 goto *elisabeth_main
goto *elisabeth_onedari



*elisabeth_onedari1

gosub *onedari_syori
name $name
>Hehe, you want to finish on my hands?@
>Then I'll squeeze you until you're finished!\
name ""
gosub *elisabeth_a1
skip -1



*elisabeth_onedari2

gosub *onedari_syori
name $name
>Hehe, you want to finish in my mouth?@
>Then I'll suck on you until you're finished!\
name ""
gosub *elisabeth_a2
skip -1



*elisabeth_onedari3

gosub *onedari_syori
name $name
>Hehe, you want to finish on my breasts?@
>Then I'll squeeze you until you're finished!\
name ""
gosub *elisabeth_a3
skip -1



*elisabeth_onedari4

gosub *onedari_syori
name $name
>Hehe, you want me to suck your blood?@
>Then I'll suck on you until you're finished!\
name ""
gosub *elisabeth_a4
skip -1



*elisabeth_onedari5

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>Hehe, you want to be raped by my cloak?@
>Then I'll humiliate you as a man!\
name ""
if %kousoku=0 gosub *elisabeth_a5
gosub *elisabeth_a6
skip -1



*elisabeth_onedari6

gosub *onedari_syori
name $name
>Hehe, do you want me to rape you with my navel?@
>Then I'll squeeze you dry with it!\
name ""
gosub *elisabeth_a7
skip -1



*elisabeth_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 696,":a;chara\elisabeth_bk06.bmp",0,0
gosub *syasei2
>As Elizabeth's gloved hands caress Luka's penis, he comes, shooting his semen onto her.\
mov %viclose,1:gosub *lose
mov %2696,%2696+1:if %2696=1 mov %count_koenemy,%count_koenemy+1
if %2696>%count_most mov %count_most,%2696:mov $count_mostname,$name
count 5,4
mov $bad1,"Elizabeth forced Luka to come with her hands."
gosub *face2
name $name
>Hehe, you sprayed the proof of your submission all over my hands.@
>You are quite pathetic, hehe.\
name ""
goto *elisabeth_h



*elisabeth_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\elisabeth_bk01.bmp",0,0
gosub *syasei2
>As Elizabeth sucks on Luka's penis with her small mouth, he comes, quickly filling her up.\
mov %viclose,1:gosub *lose
mov %2696,%2696+1:if %2696=1 mov %count_koenemy,%count_koenemy+1
if %2696>%count_most mov %count_most,%2696:mov $count_mostname,$name
count 4,4
mov $bad1,"Elizabeth forced Luka to come with her mouth."
gosub *face2
name $name
>Hehe, you sprayed the proof of your submission right into my mouth.@
>You are quite pathetic, hehe.\
name ""
goto *elisabeth_h



*elisabeth_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\elisabeth_bk02.bmp",0,0
gosub *syasei2
>As Elizabeth rubs Luka's penis against her small breasts, he comes, shooting semen onto her chest.\
mov %viclose,1:gosub *lose
mov %2696,%2696+1:if %2696=1 mov %count_koenemy,%count_koenemy+1
if %2696>%count_most mov %count_most,%2696:mov $count_mostname,$name
count 7,4
mov $bad1,"Elizabeth forced Luka to come with her breasts."
gosub *face2
name $name
>Hehe, you sprayed the proof of your submission all over my breasts.@
>You are quite pathetic, hehe.\
name ""
goto *elisabeth_h



*elisabeth_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\elisabeth_bk03.bmp",0,0
gosub *syasei2
>As Elizabeth sucks Luka's blood, he comes, shooting his semen onto her stomach.\
mov %viclose,1:gosub *lose
mov %2696,%2696+1:if %2696=1 mov %count_koenemy,%count_koenemy+1
if %2696>%count_most mov %count_most,%2696:mov $count_mostname,$name
count 32,4
mov $bad1,"Elizabeth forced Luka to come as she sucked his blood."
gosub *face2
name $name
>Hehe, you sprayed the proof of your submission all over my stomach.@
>You are quite pathetic, hehe.\
name ""
goto *elisabeth_h



*elisabeth_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\elisabeth_ha3.bmp",0,0
gosub *syasei2
>As Elizabeth's cloak violates him from behind, and her hand strokes him from the front, Luka comes, shooting his semen right into Elizabeth's smiling face.\
mov %viclose,1:gosub *lose2
name "Luka"
>Ahhh...\
name ""
name $name
>You came while being violated in the ass?@
>How pathetic for a man... Hahaha.\
>This time I'll suck it out of your penis.@
>Go mad in pleasure with my mouth technique!\
name ""
skillcount3 3841
skillname "Bathory's Cradle"
dwave 1,"se\ero_buchu2.ogg"
lsp 700,":a;chara\elisabeth_ha4.bmp",0,0:print 10,500
lsp 700,":a;chara\elisabeth_ha5.bmp",0,0:print 10,500
>Elizabeth sucks Luka's penis into her mouth!
mov %damage_kotei,1
damage 170,180
dwave 1,"se\ero_makituki2.ogg"
>At the same time, the cloak in Luka's ass wriggles around!
mov %damage_kotei,1
damage 170,180
skillname ""
name "Luka"
>Ah...!\
name ""
name $name
>Hehe, how pathetic...@
>Your semen is going to be sucked out as you're violated from behind!\
name ""
skillcount3 3841
skillname "Bathory's Cradle"
dwave 1,"se\ero_buchu2.ogg"
>Elizabeth's small mouth sucks on Luka's penis like a vacuum!
mov %damage_kotei,1
damage 170,180
dwave 1,"se\ero_makituki2.ogg"
>The cloak inside his ass twists around!
mov %damage_kotei,1
damage 170,180
skillname ""
name "Luka"
>Hyaaa... I...I'm going to come...!\
name ""
name $name
>Hehehe... I'll give the final blow in your ass.\
>Any man would ejaculate if their prostate was directly stimulated!\
name ""
skillcount3 3841
skillname "Bathory's Cradle"
dwave 1,"se\ero_buchu2.ogg"
>Elizabeth purses her mouth as she sucks on Luka!
mov %damage_kotei,1
damage 170,180
dwave 1,"se\ero_makituki2.ogg"
>At the same time, the cloak pushes deeper into Luka's ass, pressing hard against his prostate!
mov %damage_kotei,1
damage 170,180
skillname ""
name "Luka"
>Hya...!@>Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\elisabeth_ha6.bmp",0,0
gosub *syasei2
>As if a button was pressed inside him, Luka comes with a moan.\
name $name
>Nnn... Pressing your prostate is almost like a button, isn't it?\
>One press, and you shower me with delicious milk.\
>I feel like drinking some more male milk...@
>I'll keep violating your ass, so give me more!\
name ""
name "Luka"
>No more... Ahhhh!\
name ""
skillcount3 3841
skillname "Bathory's Cradle"
dwave 1,"se\ero_buchu2.ogg"
>Moving her head back and forth, Elizabeth pumps Luka's penis with her mouth!
mov %damage_kotei,1
damage 170,180
dwave 1,"se\ero_makituki2.ogg"
>The cloak inside his ass starts to vibrate!
mov %damage_kotei,1
damage 170,180
skillname ""
name "Luka"
>No... Stop...@
>Hyaa!\
name ""
name $name
>Hehe, don't say that when it's clear you're feeling so good.\
>Even though you're a man, you're feeling so good from beind violated from behind!\
name ""
skillcount3 3841
skillname "Bathory's Cradle"
dwave 1,"se\ero_buchu2.ogg"
>While sucking on Luka's penis, Elizabeth's tongue coils around his glans!
mov %damage_kotei,1
damage 170,180
dwave 1,"se\ero_makituki2.ogg"
>The cloak inside Luka's ass slowly starts to expand!
mov %damage_kotei,1
damage 170,180
skillname ""
name "Luka"
>Hyaa!@>I'm going to come again!\
name ""
name $name
>Shoot out the proof of your utter humiliation in my mouth...\
name ""
skillcount3 3841
skillname "Bathory's Cradle"
dwave 1,"se\ero_buchu2.ogg"
>Elizabeth sucks as hard as she can on Luka's penis!
mov %damage_kotei,1
damage 170,180
dwave 1,"se\ero_makituki2.ogg"
>The enlarged cloak presses even harder against his prostate!
mov %damage_kotei,1
damage 170,180
skillname ""
name "Luka"
>Hyaaaaa!!\
name ""
gosub *syasei1
lsp 700,":a;chara\elisabeth_ha7.bmp",0,0
gosub *syasei2
>As the cloak presses against his prostate, Luka comes again, filling Elizabeth's small mouth with the proof of his submission.\
name $name
>Hehe... I was able to drink lots of milk.@
>Now shall I change things up a little...?\
name ""
gosub *clear_sprite
gosub *setwindow_01p
>Elizabeth happily swallows the semen I shot into her mouth.@
>I'm too weak to resist her anymore...\
mov %battle,0
mov %hsean,1
mov %2696,%2696+1:if %2696=1 mov %count_koenemy,%count_koenemy+1
if %2696>%count_most mov %count_most,%2696:mov $count_mostname,$name
count 9,4
mov $bad1,"Elizabeth forced Luka to come with her cloak and hands."
goto *elisabeth_h



*elisabeth_h6

mov %ikigoe,3:gosub *ikigoe
name $name
>But I only just put it in...@
>And you call yourself a man?\
name ""
gosub *syasei1
lsp 690,":a;chara\elisabeth_ct02.bmp",0,0
lsp 697,":a;chara\elisabeth_bk07.bmp",0,0
gosub *syasei2
>As soon as Elizabeth forces Luka's penis into her navel, he comes, filling up her tiny hole.\
mov %viclose,1:gosub *lose
mov %2696,%2696+1:if %2696=1 mov %count_koenemy,%count_koenemy+1
if %2696>%count_most mov %count_most,%2696:mov $count_mostname,$name
count 2,4
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to orgasm the moment of insertion into Elizabeth's navel."
gosub *face2
name $name
>Hehe, you couldn't even last a couple seconds.\
>I'm sure you wouldn't want to keep living with that disgrace as a man... Hehe.\
name ""
goto *elisabeth_h



*elisabeth_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\elisabeth_ct02.bmp",0,0
lsp 697,":a;chara\elisabeth_bk07.bmp",0,0
gosub *syasei2
>As Elizabeth rapes Luka with her navel, he comes, quickly filling up her small hole.\
mov %viclose,1:gosub *lose
mov %2696,%2696+1:if %2696=1 mov %count_koenemy,%count_koenemy+1
if %2696>%count_most mov %count_most,%2696:mov $count_mostname,$name
count 2,4
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to orgasm as Elizabeth raped him with her navel."
gosub *face2
name $name
>Hehe, you filled up my navel with your semen.@
>You can't make a baby even if you come there, you know?\
name ""
goto *elisabeth_h



*elisabeth_h

mov $bad2,"While playing with Luka's penis with her foot, she sucks all of Luka's blood."
if %2696=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
name $name
>Hehehe... What a pitiful face.@
>All I did was draw out a little semen, and you're left completely helpless.\
>Now I'll make you into my prey!@
>I'll suck you dry as you miserably squirm under me.\
name ""
cspl 690,699
lsp 700,":a;chara\elisabeth_hb1.bmp",0,0:print 10,500
>Grabbing me from behind, Elizabeth's fangs suddenly sink into my neck.@
>As soon as she bites down, a sweet numbness slowly fills my body...\
name "Luka"
>Ahhh... S...Stop...\
name ""
name $name
>Hehe... Your life is precious to you, isn't it?@
>Then let us play a little game...\
>I'll toy with your penis with my foot from now on.@
>If you ejaculate, then I'll suck your blood just once.\
>If you don't want your blood sucked, then just don't come.@
>But as soon as you do, both your semen and blood will be taken...\
name ""
name "Luka"
>N...No... I don't want that...\
name ""
name $name
>You don't have a choice of participation.@
>Now let's start the game...\
name ""
mov %hseanwave,17:hseanwave
>Still keeping her fangs in my neck, Elizabeth's dexterous foot presses against my penis.@
>Her toes start to rub and press against my glans.\
name "Luka"
>Ahh...!\
name ""
>The unique stimulation makes me moan before I can stop myself.\
name $name
>Haha... Already moaning just from that?@
>You may be a little bit too pathetic to play this game...\
name ""
>Reaching around me, Elizabeth starts to rub and gently flick my nipples with her hands.\
name "Luka"
>Ah...ahh...\
name ""
name $name
>Even though you're a man, you're feeling something from having your nipples played with?@
>Aren't you embarrassed at yourself? Haha...\
name ""
>As Elizabeth continues playing with my nipples, her toe keeps rubbing against my glans.\
>Tracing her big toe around the neck of my penis, and every so often squeezing it between her toes...@
>The delicate stimulation brings waves of pleasure through my lower body.\
>My face goes red as this young Vampire from behind so easily toys with my body...\
name "Luka"
>Ahhh...!\
name ""
>Her finger movements on my right and left nipples get smoother and more controlled...@
>At the same time, her toes use my penis as their own personal toy.\
>With the three areas of stimulation all attacking me at once, I don't think I can stop myself from giving in to the rising orgasm...\
name "Luka"
>Ahh... I'm going to come...\
name ""
name $name
>Hehe, already giving up?@
>Don't forget, each time you ejaculate I'll suck your blood...\
name ""
name "Luka"
>Urhg... Uhh...\
name ""
>Even if I did everything I could to resist it, I can't hold on any more.@
>My body relaxes as I give myself over to the pleasure from her hands and toes.\
name $name
>...You stopped resisting, I see.@
>Then I'll finish you off...\
name ""
>Her two biggest toes bend around my glans, squeezing it beneath them!\
name "Luka"
>N...No... Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\elisabeth_hb2.bmp",0,0
gosub *syasei2
>As Elizabeth's toes toy with my penis, I come, covering her little feet in my semen.\
name "Luka"
>Ahhh...\
name ""
>The intense orgasm from having my nipples and penis toyed with washes over me.@
>As I bask in the ecstasy, I wait for her to suck my blood...\
mov %hseanwave,0:hseanwave
name $name
>Hehe, you leaked so quickly...@
>I won't be able to enjoy the game like that!\
>Now for your ejaculation penalty...@
>I'll suck your blood, just once.\
name ""
lsp 700,":a;chara\elisabeth_hb3.bmp",0,0:print 10,500
>With a cruel smile, she starts to suck my blood.@
>The feeling of ecstasy from my neck quickly spreads out to the rest of my body.\
name "Luka"
>Haaa...\
name ""
>The euphoria from feeling my blood being sucked into her mouth is intoxicating.@
>After only moments, I already want her to keep sucking.\
>But after only one big gulp, she stops.\
name $name
>Mmmm... That was one gulp.@
>Your blood is really delicious... This game is getting more and more fun!\
name ""
>With a giggle, Elizabeth starts moving her foot and toes again.\
name $name
>Now let's continue playing...@
>This time I'll be a little more serious.\
name ""
mov %hseanwave,17:hseanwave
>Elizabeth's footwork suddenly gets a lot more intense.@
>Sandwiching my penis between the soles of both of her feet, she uses them to rub me.\
>At the same time, her toes each massage my glans, every so often rubbing the area right under the neck of my glans.\
name "Luka"
>Haa... Ahhh!\
name ""
>The sudden, intense pleasure makes me jump up and push my back against her stomach.@
>Elizabeth continues using her hands to play with my nipples, laughing at me.\
name $name
>Hehe... I get a little bit serious, and you writhe around like crazy.@
>I think I'll make you come right now...\
name ""
>Elizabeth's feet suddenly stroke my penis between them even faster, making my head go blank in pleasure.\
name "Luka"
>Ah... Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\elisabeth_hb4.bmp",0,0
gosub *syasei2
>As her small feet toy with my penis, I reach a climax, miserably spraying my semen all over them.@
>There's no way I can endure this...\
mov %hseanwave,0:hseanwave
name $name
>Hehe... Already?@
>Do you want to be sucked dry that badly?\
name ""
lsp 700,":a;chara\elisabeth_hb5.bmp",0,0:print 10,500
>The sucking penalty is starting again...@
>With a powerful suck, my blood is brought into Elizabeth's mouth.\
name "Luka"
>Aiiee...\
name ""
>My body instantly relaxes in bliss as my blood is sucked.@
>The sweet ecstasy spreads through me, making it feel like my mind and body could just melt away.\
>I want her to suck everything from me...@
>The catastrophic thoughts of desiring to be prey overwhelm my reason.\
name "Luka"
>Ahhh... More... Suck more...\
name ""
>I finally said it out loud to Elizabeth...@
>I beg the young Vampire to make me her prey.\
name $name
>Hehe... You don't even want to continue the game anymore?@
>What a pathetic man... Sacrificing everything for some pleasure.\
>Well then, this is Game Over.@
>I'll drain both your blood and semen completely dry...\
name ""
mov %hseanwave,13:hseanwave
lsp 700,":a;chara\elisabeth_hb6.bmp",0,0:print 10,500
>As if alive, Elizabeth's cloak wraps up my upper body.@
>Blocking my view, the merciless blood sucking continues on from both Elizabeth and the cloak around me.\
name $name
>Nnnn... *Suck*\
name ""
name "Luka"
>Hyaaa!\
name ""
>The intense pleasure leaves me writhing in no time.@
>It feels like the ecstasy is poison inside my body, dissolving my body from the inside.\
>And at the same time, Elizabeth's small feet continue rubbing and stroking my penis between them.\
name $name
>*Slurp*\
name ""
name "Luka"
>Ah...!@> Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\elisabeth_hb7.bmp",0,0
gosub *syasei2
>In a storm of pleasure, I reach another climax.@
>All during my ejaculation, her feet continue stroking and pressing me between her two soles.\
>My blood draining from my neck, and semen coming from my penis...@
>With screams of pleasure, I start to convulse.\
name "Luka"
>Ah!@>Ahhh!\
name ""
name $name
>Hehe... I've almost drained you dry.@
>Enjoy your transition to the next world as I suck you dry...\
>*Suck* *Slurp*\
name ""
name "Luka"
>Ah... Ah...\
name ""
>Almost as if my brain has been fried in pleasure, I start to lose consciousness.@
>I'm still aware that my life itself is being quickly sucked out by Elizabeth...\
name $name
>Nnnn... *Suck*\
name ""
name "Luka"
>Ah...\
name ""
mov %hseanwave,0:hseanwave
>With that final slurp from Elizabeth, and final moan from me, my life is blown out.@
>My semen and blood are both all given to the Vampire, and all that's left is a dried out corpse...\
gosub *anten
>..............\
goto *badend



*queenvanpire_start

mov $name,"Queen Vampire"
mov $name2,"Queen Vampire"
mov $lavel,"queenvanpire"
mov $tatie1,"queenvanpire_st01"
mov $tatie2,"queenvanpire_st02"
mov $tatie3,"queenvanpire_st03"
mov $tatie4,"queenvanpire_ha1"
mov $haikei,"bg224"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,21000
if %nanido=2 mov %max_enemylife,23000
if %nanido=3 mov %max_enemylife,25000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,1
mov %alice_skill1,130
mov %alice_skill2,100
mov %alice_skill3,70
mov %music,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free of the Queen Vampire!"
mov $mogaku_anno2,"Luka broke free of the Queen Vampire!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Hehe... Did you think you would escape with that?"
mov $mogaku_sel2,"There's no use struggling... I'll suck you dry anyway."
mov $mogaku_sel3,"You'll only be free once your blood has been drained..."
mov $mogaku_sel4,"Hehe, just give up and indulge in pleasure."
mov $mogaku_sel5,"I'll suck you even as you struggle..."
mov $mogaku_dassyutu1,"Oh? Refusing my blood sucking..."
mov $mogaku_dassyutu2,"You are quite insolent, but you are quite powerful."
mov $mogaku_earth_dassyutu1,"I see, so that's your spirit."
mov $mogaku_earth_dassyutu2,"It's quite something to enable you to break free of my cloak that easily."
mov $half_s1,"Hehehe... You can't endure against my sexual skills."
mov $half_s2,"Why not just give up and indulge in the pleasure?"
mov $kiki_s1,"Haha... How trifling."
mov $kiki_s2,"Shall I make you come now...?"
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-300
mov %tukix,300
mov %%owaza_count1a,11
mov %%owaza_count3a,8
name $name
>Indeed...@>I am the one in charge of all vampires.@
>I am the Queen of the night, the highest of aristocrats.\
name ""
name "Luka"
>Queen or whoever, you still have to get out of this Castle!\
name ""
name $name
>That won't be happening.@> This Castle will be the new base for the Vampire race.@
>Our Empire of Night will begin from this land.\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\queenvanpire_st01.bmp",160,0:print 10,500
name "Alice"
>You're the same as ever, Queen Vampire...@
>Performing barbaric acts to throw the world into disorder again?\
name ""
name $name
>The world is already in disorder, little Monster Lord.@
>What else should a Queen do but try to make a name for herself in these troubled times?\
name ""
lsp 700,":a;chara\alice_st74.bmp",-170,50:print 10,500
name "Alice"
>Sheesh, still an anachronism...\
name ""
csp 701
gosub *face1
name $name
>I do not forgive those who go against me.@
>...But, I am generous with those who follow me.\
>In particular, you... The promising young Hero Luka.\
name ""
>With a bewitching laugh, she puts forward her right foot.\
name $name
>Lick my foot, and prove your absolute deference to me.@
>Then I shall keep you for the night.\
>You can taste the highest of joys, every single night...@
>Simply sell your soul over to me.\
name ""
name "Luka"
>I refuse!\
name ""
name $name
>Hehe, I do not dislike young men of spirit...@
>But since you defied me, I must suck you to your death.\
>I will suck out everything of yours, and use it as food...@
>Go mad in agony as your life itself is sucked dry!\
name ""
goto *common_main



*queenvanpire_v

gosub *face3
name $name
>What power...!@
>This is the Hero's...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Queen Vampire is sealed in the form of a bat!\
mov %viclose,1:gosub *victory
mov %getexp,220000:gosub *lvup
mov %2397,1
goto *sean0344



*queenvanpire_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Even if your spirit has broken now, I won't forgive you...@
>At the least, you'll die in the throes of pleasure...\
name ""
goto *queenvanpire_a



*queenvanpire_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *queenvanpire_kousan
if %cmd1=16 goto *queenvanpire_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *queenvanpire_main



*queenvanpire_a

if %kousoku=1 gosub *queenvanpire_a5:goto *common_main
if %counter>0 add %counter,1
if %counter>3 gosub *queenvanpire_x2:goto *common_main
if %counter>0 gosub *queenvanpire_a6:goto *common_main
if %kousan=1 skip 3
mov %hanyo2,%hanyo2+1
if %hanyo2>4 gosub *queenvanpire_x1:goto *common_main
rnd2 %ransu,1,6
if %ransu=1 gosub *queenvanpire_a1:goto *common_main
if %ransu=2 gosub *queenvanpire_a2:goto *common_main
if %ransu=3 gosub *queenvanpire_a3:goto *common_main
if %ransu=4 && %owaza_count1a>12 gosub *queenvanpire_a4:goto *common_main
if %ransu=5 && %owaza_count3a>9 && %enemy_wind=0 && %enemy_earth=0 gosub *queenvanpire_el1:goto *common_main
if %ransu=6 && %owaza_count3a>9 && %enemy_wind=0 && %enemy_earth=0 gosub *queenvanpire_el2:goto *common_main
skip -7



*queenvanpire_el1

add %stack,1
mov %owaza_count3a,0
name $name
>Come, Zylphe!\
name ""
skillname "Wind Spirit Summon"
mov %enemy_wind,5
mov %kaihi_el,50
dwave 2,"se\wind2.ogg"
lsp2 0,":a;chara\zylphe_st02.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *enemy_elm_print
>The Queen Vampire summons a spirit of wind!\
skillname ""
sub %stack,1
return



*queenvanpire_el2

add %stack,1
mov %owaza_count3a,0
name $name
>Come, Gnomaren!\
name ""
skillname "Summon Earth Spirit"
mov %enemy_earth,5
mov %damage_keigen_el,50
dwave 2,"se\earth1.ogg"
lsp2 0,":a;chara\gnomaren_st01.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *enemy_elm_print
>The Queen Vampire summons a spirit of earth!\
skillname ""
sub %stack,1
return



*queenvanpire_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My fingers will make you writhe..."
if %ransu=2 mov $sel1,"Hehe, I don't mind if you pollute my fingers..."
if %ransu=3 mov $sel1,"Will you go crazy if I use my fingers like this...?"
name $name
eng $sel1:$sel6\
name ""
skillname "Erotic Fingers"
dwave 1,"se\ero_koki1.ogg"
>The Queen Vampire caresses Luka's penis with her fingers!
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,5
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3843
mov %earth_keigen_el,70
if %nanido<2 damage 290,310
if %nanido=2 damage 320,340
if %nanido=3 damage 350,370
if %enemy_wind=0 skip 15
dwave 1,"se\ero_koki1.ogg"
>The middle of her index finger rubs from his urethral hole down his back muscle!
mov %earth_keigen_el,70
if %nanido<2 damage 290,310
if %nanido=2 damage 320,340
if %nanido=3 damage 350,370
dwave 1,"se\ero_chupa6.ogg"
>A soft light radiates off her finger, absorbing Luka's energy!
mov %earth_keigen_el,70
if %nanido<2 damage 290,310
if %nanido=2 damage 320,340
if %nanido=3 damage 350,370
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *queenvanpire_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*queenvanpire_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"To have me sucking on your genitals... You are quite the lucky male."
if %ransu=2 mov $sel1,"Spill out all of your semen into this mouth of mine..."
if %ransu=3 mov $sel1,"Nnn... My mouth is quite warm, isn't it?"
name $name
eng $sel1:$sel6\
name ""
skillname "Lascivious Tongue"
dwave 1,"se\ero_buchu2.ogg"
>The Queen Vampire puts Luka's penis into her mouth, and sucks!
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,5
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3844
mov %earth_keigen_el,70
if %nanido<2 damage 300,320
if %nanido=2 damage 330,350
if %nanido=3 damage 360,380
if %enemy_wind=0 skip 15
dwave 1,"se\ero_pyu2.ogg"
>Her tongue slowly wraps around Luka's penis inside her mouth!
mov %earth_keigen_el,70
if %nanido<2 damage 300,320
if %nanido=2 damage 330,350
if %nanido=3 damage 360,380
dwave 1,"se\ero_chupa6.ogg"
>Sucking hard on Luka's penis, she drains his energy!
mov %earth_keigen_el,70
if %nanido<2 damage 300,320
if %nanido=2 damage 330,350
if %nanido=3 damage 360,380
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *queenvanpire_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*queenvanpire_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll squeeze out everything of yours with these breasts..."
if %ransu=2 mov $sel1,"Now come and dirty up these breasts..."
if %ransu=3 mov $sel1,"Hehe... Sprinkle that semen of yours onto these."
name $name
eng $sel1:$sel6\
name ""
skillname "Dream Milking"
dwave 1,"se\ero_sigoki1.ogg"
>The Queen Vampire sandwiches Luka's penis between her breasts, and starts to use them to stroke him!
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,5
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3845
mov %earth_keigen_el,70
if %nanido<2 damage 310,330
if %nanido=2 damage 340,360
if %nanido=3 damage 370,390
if %enemy_wind=0 skip 15
dwave 1,"se\ero_sigoki1.ogg"
>She tightens her breasts around Luka's penis!
mov %earth_keigen_el,70
if %nanido<2 damage 310,330
if %nanido=2 damage 340,360
if %nanido=3 damage 370,390
dwave 1,"se\ero_chupa6.ogg"
>Luka's energy is siphoned from between her soft breasts!
mov %earth_keigen_el,70
if %nanido<2 damage 310,330
if %nanido=2 damage 340,360
if %nanido=3 damage 370,390
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *queenvanpire_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*queenvanpire_a4

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 4
name $name
>Now... I shall get a good taste of your blood!\
name ""
skillname "Nocturnal Bloodsucker"
eng "The Queen Vampire grabs Luka from behind!":$sel6/
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,5
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
dwave 1,"se\ero_chupa6.ogg"
lsp 700,":a;chara\queenvanpire_ha1.bmp",0,0:print 10,500
skillcount3 3846
>Her fangs pierce Luka's neck as she starts to suck his blood!
mov %earth_keigen_el,70
if %nanido<2 damage 200,220
if %nanido=2 damage 230,250
if %nanido=3 damage 260,280
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
if %status=0 mov $sel1,"Luka has been immersed in ecstasy!"
if %status=1 mov $sel1,"Luka is immersed in ecstasy..."
mov %status,1:gosub *status_print
eng $sel1:$sel6\
mov %kousoku,1:gosub *status_print
>Luka has been bound by the Queen Vampire!\
skillname ""
if %mylife=0 sub %stack,1:return *queenvanpire_h4
name "Luka"
>Haa...\
name ""
name $name
>Haha... Soak yourself in this paradise.@
>It will make this end quicker...\
name ""
rnd2 %status_turn,1,2
if %nanido=2 rnd2 %status_turn,1,2
if %nanido=3 rnd2 %status_turn,2,3
if %earth=0 && %nanido<2 mov %genmogaku,1
if %earth=0 && %nanido=2 mov %genmogaku,1
if %earth=0 && %nanido=3 mov %genmogaku,2
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,1
if %enemy_earth>0 mov %genmogaku,99
sub %stack,1
return



*queenvanpire_a5

add %stack,1
>Luka has been bound by the Queen Vampire...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hahaha... What delicious blood."
if %ransu=2 mov $sel1,"If you don't struggle more, I'll suck you dry..."
if %ransu=3 mov $sel1,"You should feel lucky to be sucked dry by me..."
name $name
eng $sel1:$sel6\
name ""
skillname "Nocturnal Bloodsucker"
dwave 1,"se\ero_chupa6.ogg"
>The Queen Vampire sucks Luka's blood from his neck!
skillcount3 3846
mov %earth_keigen_el,70
if %nanido<2 damage 200,220
if %nanido=2 damage 230,250
if %nanido=3 damage 260,280
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
if %enemy_wind=0 skip 15
dwave 1,"se\ero_chupa6.ogg"
mov %earth_keigen_el,70
if %nanido<2 damage 200,220
if %nanido=2 damage 230,250
if %nanido=3 damage 260,280
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
dwave 1,"se\ero_chupa6.ogg"
mov %earth_keigen_el,70
if %nanido<2 damage 200,220
if %nanido=2 damage 230,250
if %nanido=3 damage 260,280
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *queenvanpire_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*queenvanpire_x1

add %stack,1
if %kousan=2 skip 4
name $name
>Haha... How about this?\
name ""
mov $tatie1,"queenvanpire_st11"
mov $tatie2,"queenvanpire_st12"
mov $tatie3,"queenvanpire_st13"
mov $tatie4,"queenvanpire_hb1"
gosub *face1
skillname "Invitation to Nightly Pleasure"
>Magic power floods into the Queen Vampire's cloak!@
>The cloak spreads out wide, like it had a will of its own!\
skillname ""
if %kousan=2 sub %stack,1:return
name "Luka"
>Wh...What the!?\
name ""
name $name
>Now, come!@
>And go mad during the night!\
name ""
mov %counter,1
sub %stack,1
return



*queenvanpire_a6

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hahaha... Do you wish to be sucked on by my cloak?"
if %ransu=2 mov $sel1,"Haha... My cloak is greedy, too..."
if %ransu=3 mov $sel1,"Stain this dark clothing with your whiteness..."
name $name
eng $sel1:$sel6\
name ""
skillname "Devilish Membrane"
dwave 1,"se\umaru.ogg"
>Forming into tentacles, the Queen Vampire's cloak strokes Luka's body all over!
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,5
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3847
mov %earth_keigen_el,70
if %nanido<2 damage 70,90
if %nanido=2 damage 80,100
if %nanido=3 damage 90,110
dwave 1,"se\umaru.ogg"
>The tentacles coil around Luka's penis, and tighten!
mov %earth_keigen_el,70
if %nanido<2 damage 70,90
if %nanido=2 damage 80,100
if %nanido=3 damage 90,110
dwave 1,"se\umaru.ogg"
>The cloak wriggles all over Luka's body!
mov %earth_keigen_el,70
if %nanido<2 damage 70,90
if %nanido=2 damage 80,100
if %nanido=3 damage 90,110
if %enemy_wind=0 skip 17
dwave 1,"se\ero_chupa6.ogg"
>The cloak squeezes on Luka's body, sucking up his energy!
mov %earth_keigen_el,70
if %nanido<2 damage 70,90
if %nanido=2 damage 80,100
if %nanido=3 damage 90,110
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
dwave 1,"se\ero_chupa6.ogg"
>Getting even tighter, more of Luka's energy is drained!
mov %earth_keigen_el,70
if %nanido<2 damage 70,90
if %nanido=2 damage 80,100
if %nanido=3 damage 90,110
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *queenvanpire_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*queenvanpire_x2

add %stack,1
if %kousan=2 skip 4
name $name
>Oh... You are quite careful, aren't you?\
name ""
mov $tatie1,"queenvanpire_st01"
mov $tatie2,"queenvanpire_st02"
mov $tatie3,"queenvanpire_st03"
mov $tatie4,"queenvanpire_ha1"
gosub *face1
>The magic fades from the Queen Vampire's cloak, and it returns to its normal state!\
mov %counter,0
mov %hanyo2,0
sub %stack,1
return



*queenvanpire_counter

add %stack,1
mov %counter,0
gosub *face2
if %kousan=2 skip 5
name $name
>Hahaha... Now to hold you close.@
>Be wrapped in my clothes as you go mad in agony!\
name ""
skillname "Moonlight Nocturne"
dwave 1,"se\ero_makituki3.ogg"
lsp 700,":a;chara\queenvanpire_hb1.bmp",0,0:print 10,500
>The Queen vampire's cloak wraps around Luka's body, sealing off his movements!@
mov $tatie4,"queenvanpire_hb2"
mov %kousoku,1:gosub *status_print
>Luka has been bound by the Queen Vampire!\
skillname ""
name "Luka"
>Urhg... Uhh...\
name ""
name $name
>Now you are just my prey.@
>And quite pitiful prey at that... Haha.\
name ""
sub %stack,1
goto *queenvanpire_a7



*queenvanpire_a7

add %stack,1
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Go mad in agony!"
if %ransu=2 mov $sel1,"Haha... What feels better? My cloak, or my tongue?"
if %ransu=3 mov $sel1,"I'll lick that sensitive glans of yours..."
if %ransu=4 mov $sel1,"I'll tighten my cloak even more!"
if %ransu=5 mov $sel1,"Be engulfed in my dark clothes!"
name $name
eng $sel1:$sel6\
name ""
skillname "Moonlight Nocturne"
dwave 1,"se\ero_koki1.ogg"
>The cloak coils around Luka's penis, slowly tightening!
skillcount3 3848
mov %damage_kotei,1
damage 400,500
dwave 1,"se\ero_pyu1.ogg"
lsp 700,":a;chara\queenvanpire_hb3.bmp",0,0:print 10,500
>The Queen Vampire's tongue licks the glans of Luka's penis!
mov %damage_kotei,1
damage 400,500
skillname ""
if %mylife=0 sub %stack,1:return *queenvanpire_h6
sub %stack,1
goto *queenvanpire_a7



*queenvanpire_onedari

mov $list1,"Erotic Fingers"
if %3843>0 mov %list_num1,1
mov $list2,"Lascivious Tongue"
if %3844>0 mov %list_num2,1
mov $list3,"Dream Milking"
if %3845>0 mov %list_num3,1
mov $list4,"Nocturnal Bloodsucker"
if %3846>0 mov %list_num4,1
mov $list5,"Devilish Membrane"
if %3847>0 mov %list_num5,1
mov $list6,"Moonlight Nocturne"
if %3848>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *queenvanpire_onedari1
if %cmd1=12 goto *queenvanpire_onedari2
if %cmd1=13 goto *queenvanpire_onedari3
if %cmd1=14 goto *queenvanpire_onedari4
if %cmd1=15 goto *queenvanpire_onedari5
if %cmd1=16 goto *queenvanpire_onedari6
if %cmd1=-1 goto *queenvanpire_main
goto *queenvanpire_onedari



*queenvanpire_onedari1

gosub *onedari_syori
name $name
>Haha... You wish to be finished off by my fingers?@
>Then I shall honor your desires, and do as you wish...\
name ""
if %counter>0 gosub *queenvanpire_x2
if %enemy_wind+%enemy_earth=0 gosub *queenvanpire_el1
gosub *queenvanpire_a1
skip -1



*queenvanpire_onedari2

gosub *onedari_syori
name $name
>Haha... You wish to be finished off by my mouth?@
>Then I shall honor your desires, and do as you wish...\
name ""
if %counter>0 gosub *queenvanpire_x2
if %enemy_wind+%enemy_earth=0 gosub *queenvanpire_el1
gosub *queenvanpire_a2
skip -1



*queenvanpire_onedari3

gosub *onedari_syori
name $name
>Haha... You wish to be finished off by my breasts?@
>Then I shall honor your desires, and do as you wish...\
name ""
if %counter>0 gosub *queenvanpire_x2
if %enemy_wind+%enemy_earth=0 gosub *queenvanpire_el1
gosub *queenvanpire_a3
skip -1



*queenvanpire_onedari4

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You wish me to suck your blood until you finish?@
>Then I shall honor your desires, and do as you wish...\
name ""
if %counter>0 gosub *queenvanpire_x2
if %kousoku=0 && %enemy_wind+%enemy_earth=0 gosub *queenvanpire_el1
if %kousoku=0 gosub *queenvanpire_a4
gosub *queenvanpire_a5
skip -1



*queenvanpire_onedari5

gosub *onedari_syori
name $name
>Haha... You want to be violated by my cloak?@
>Then I shall honor your desires, and do as you wish...\
name ""
if %counter=0 gosub *queenvanpire_x1
if %enemy_wind+%enemy_earth=0 gosub *queenvanpire_el1
gosub *queenvanpire_a6
skip -1



*queenvanpire_onedari6

gosub *onedari_syori
name $name
>You want to be wrapped in my cloak, and violated?@
>Then I shall honor your desires, and do as you wish...\
name ""
if %counter=0 gosub *queenvanpire_x1
if %enemy_wind+%enemy_earth=0 gosub *queenvanpire_el1
gosub *queenvanpire_counter



*queenvanpire_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\queenvanpire_bk03.bmp",0,0
gosub *syasei2
>Unable to stand the Queen Vampire's finger techniques, Luka comes, covering her hands with semen...\
mov %viclose,1:gosub *lose
mov %2697,%2697+1:if %2697=1 mov %count_koenemy,%count_koenemy+1
if %2697>%count_most mov %count_most,%2697:mov $count_mostname,$name
count 5,4
mov $bad1,"The Queen Vampire forced Luka to come with her fingers."
gosub *face2
name $name
>Haha... Did you pollute my hand?@
>Finishing with just that... How pitiful.\
name ""
goto *queenvanpire_h



*queenvanpire_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\queenvanpire_bk01.bmp",0,0
gosub *syasei2
>Unable to endure the Queen Vampire's oral techniques, Luka comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2697,%2697+1:if %2697=1 mov %count_koenemy,%count_koenemy+1
if %2697>%count_most mov %count_most,%2697:mov $count_mostname,$name
count 4,4
mov $bad1,"The Queen Vampire forced Luka to come with her mouth."
gosub *face2
name $name
>Haha... Did you pollute my mouth?@
>Finishing with just that... How pitiful.\
name ""
goto *queenvanpire_h



*queenvanpire_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\queenvanpire_bk02.bmp",0,0
gosub *syasei2
>As the Queen Vampire's soft breasts press against Luka's penis, he comes, covering her chest in semen.\
mov %viclose,1:gosub *lose
mov %2697,%2697+1:if %2697=1 mov %count_koenemy,%count_koenemy+1
if %2697>%count_most mov %count_most,%2697:mov $count_mostname,$name
count 7,4
mov $bad1,"The Queen Vampire forced Luka to come with her breasts."
gosub *face2
name $name
>Haha... Did you pollute my breasts?@
>Finishing with just that... How pitiful.\
name ""
goto *queenvanpire_h



*queenvanpire_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\queenvanpire_ha2.bmp",0,0
gosub *syasei2
>Stuck in the Queen Vampire's embrace as she sucks his blood, Luka comes, shivering in ecstasy as her fangs pierce his neck.\
mov %viclose,1:gosub *lose2
name "Luka"
>Ahhh...\
name ""
name $name
>Haha... Did you leak while in my embrace?@
>I'll suck more of your blood... Drown deeper in the ecstasy!\
name ""
skillcount3 3846
skillname "Nocturnal Bloodsucker"
dwave 1,"se\ero_chupa6.ogg"
>The Queen Vampire continues sucking Luka's blood from his neck!
mov %damage_kotei,1
damage 200,220
dwave 1,"se\ero_koki1.ogg"
lsp 700,":a;chara\queenvanpire_ha3.bmp",0,0:print 10,500
>Her cloak wraps around Luka's penis, and squeezes!
mov %damage_kotei,1
damage 200,220
skillname ""
name "Luka"
>Ha... Ahh...\
name ""
name $name
>I'll even show your genitals some love as I suck you...@
>Look, I'm squeezing it nice and slowly...\
name ""
skillcount3 3846
skillname "Nocturnal Bloodsucker"
dwave 1,"se\ero_chupa6.ogg"
>The sweet sensation from Luka's neck spreads to the rest of his body!
mov %damage_kotei,1
damage 200,220
dwave 1,"se\ero_koki1.ogg"
>At the same time, the cloak slowly strokes Luka's penis!
mov %damage_kotei,1
damage 200,220
skillname ""
name "Luka"
>Haa... That feels good...\
name ""
name $name
>Now then... Shall I finish you off?@
>Drown in the pleasure, and shoot it all out...\
name ""
skillcount3 3846
skillname "Nocturnal Bloodsucker"
dwave 1,"se\ero_chupa6.ogg"
>The Queen Vampire sucks on Luka's blood, immersing him deeper in ecstasy!
mov %damage_kotei,1
damage 200,220
dwave 1,"se\ero_koki1.ogg"
>The tip of the cloak tightens around the tip of Luka's penis!
mov %damage_kotei,1
damage 200,220
skillname ""
name "Luka"
>Haa... Ahh...\
name ""
gosub *syasei1
lsp 700,":a;chara\queenvanpire_ha4.bmp",0,0
gosub *syasei2
>His face loose in ecstasy, Luka comes, letting his semen freely spray out on her cloak.\
name $name
>Haha... How pathetic.@
>Look at what the Hero who fought so hard has become.\
>Being sucked by me is akin to being in paradise, isn't it?@
>I don't mind if you lose your sanity...\
name ""
name "Luka"
>Ah...ahh...\
name ""
skillcount3 3846
skillname "Nocturnal Bloodsucker"
dwave 1,"se\ero_chupa6.ogg"
>The Queen Vampire continues sucking Luka's blood!
mov %damage_kotei,1
damage 200,220
dwave 1,"se\ero_koki1.ogg"
>The cloak tightens around Luka's penis!
mov %damage_kotei,1
damage 200,220
skillname ""
name "Luka"
>Haa... More... Suck more...\
name ""
name $name
>Sheesh, you're already completely entranced by having your blood sucked.\
>You've disqualified yourself as a human now that you've succumbed to this pleasure. Hehe.\
name ""
skillcount3 3846
skillname "Nocturnal Bloodsucker"
dwave 1,"se\ero_chupa6.ogg"
>The Queen Vampire sucks Luka's blood without mercy!
mov %damage_kotei,1
damage 200,220
dwave 1,"se\ero_koki1.ogg"
>The cloak rubs Luka's glans and back muscle!
mov %damage_kotei,1
damage 200,220
skillname ""
name "Luka"
>Ha... Ahh...!\
name ""
name $name
>Now to make you come again...@
>Release that semen of yours as much as you wish.\
name ""
skillcount3 3846
skillname "Nocturnal Bloodsucker"
dwave 1,"se\ero_chupa6.ogg"
>The Queen Vampire sucks on Luka as he writhes in ecstasy!
mov %damage_kotei,1
damage 200,220
dwave 1,"se\ero_koki1.ogg"
>The cloak strokes his penis, giving him the finishing blow!
mov %damage_kotei,1
damage 200,220
skillname ""
name "Luka"
>Hyaaa!\
name ""
gosub *syasei1
lsp 700,":a;chara\queenvanpire_ha5.bmp",0,0
gosub *syasei2
>As the cloak strokes him and the Queen Vampire sucks his blood, Luka comes, spraying his semen onto her clothes.\
name $name
>Haha... Have you completely lost your sanity?@
>Don't worry... I'll take care of you until your last moments.\
name ""
gosub *clear_sprite
gosub *setwindow_01p
mov %battle,0
mov %hsean,1
mov %2697,%2697+1:if %2697=1 mov %count_koenemy,%count_koenemy+1
if %2697>%count_most mov %count_most,%2697:mov $count_mostname,$name
count 32,4
mov $bad1,"The Queen Vampire forced Luka to come as she sucked his blood."
goto *queenvanpire_h



*queenvanpire_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\queenvanpire_bk05.bmp",0,0
gosub *syasei2
>As the Queen Vampire's cloak strokes Luka's penis, he comes, covering her cloak in semen.\
mov %viclose,1:gosub *lose
mov %2697,%2697+1:if %2697=1 mov %count_koenemy,%count_koenemy+1
if %2697>%count_most mov %count_most,%2697:mov $count_mostname,$name
count 27,4
mov $bad1,"The Queen Vampire forced Luka to come with her cloak."
gosub *face2
name $name
>Haha... Did you pollute my cloak?@
>Finishing with just that... How pitiful.\
name ""
goto *queenvanpire_h



*queenvanpire_h6

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\queenvanpire_hb4.bmp",0,0
gosub *syasei2
>With the cloak wrapped around him as the Queen Vampire licks him, Luka comes, covering her face in semen.\
mov %viclose,1:gosub *lose2
name "Luka"
>Ahhh...\
name ""
name $name
>Haha... Did you finish while being wrapped in my cloak?@
>I'll lick out even more of your semen...@> Drown deeper in the ecstasy!\
name ""
skillcount3 3848
skillname "Moonlight Nocturne"
dwave 1,"se\ero_koki1.ogg"
>Stretching out her tongue, the Queen Vampire continues licking Luka's penis!
mov %damage_kotei,1
damage 400,500
dwave 1,"se\ero_pyu1.ogg"
>The sweet tongue runs all over his penis, cleaning off the semen!
mov %damage_kotei,1
damage 400,500
skillname ""
name "Luka"
>Haaa... S...Stop...\
name ""
name $name
>Are you still resisting?@> Then let me blow away your reason...\
>My cloak is infused by the magical power always radiating off my body.\
>Any man will become a slave to me if I cover their face with it.\
name ""
skillcount3 3848
skillname "Moonlight Nocturne"
lsp 700,":a;chara\queenvanpire_hb5.bmp",0,0:print 10,500
>The Queen Vampire's cloak wraps around Luka's face, filling him with her smell!
mov %damage_kotei,1
damage 400,500
>The magic inside her cloak floods his body, immersing him in ecstasy!
mov %damage_kotei,1
damage 400,500
mov $tatie4,"queenvanpire_hb5"
mov %status,1:gosub *status_print
skillname ""
name "Luka"
>Ah... Haaa...\
name ""
name $name
>Haha... Did your heart melt away that quickly?@
>Let your semen out as you drown in ecstasy...\
name ""
skillcount3 3848
skillname "Moonlight Nocturne"
dwave 1,"se\ero_koki1.ogg"
>The Queen Vampire trails her tongue up and down Luka's penis!
mov %damage_kotei,1
damage 400,500
dwave 1,"se\ero_pyu1.ogg"
>Her quick tongue movements bring Luka to a climax!
mov %damage_kotei,1
damage 400,500
skillname ""
name "Luka"
>Haa... Ahhh...\
name ""
gosub *syasei1
lsp 700,":a;chara\queenvanpire_hb6.bmp",0,0
gosub *syasei2
>As Luka sighs, he comes, sagging back in ecstasy as the magic from the cloak continues filling his body.\
name $name
>Haha... My techniques are the best, aren't they?@
>Being able to taste this pleasure is more than you deserve...\
name ""
name "Luka"
>Haaa...\
name ""
skillcount3 3848
skillname "Moonlight Nocturne"
dwave 1,"se\ero_koki1.ogg"
>The Queen Vampire kisses the tip of Luka's penis!
mov %damage_kotei,1
damage 400,500
dwave 1,"se\ero_pyu1.ogg"
>Pressing her lips against his tip, the Queen Vampire sucks out the semen still in his urethra!
mov %damage_kotei,1
damage 400,500
skillname ""
name "Luka"
>Haaa... More... Suck more...\
name ""
name $name
>Sheesh, you're already completely entranced by having your semen sucked.\
>You've disqualified yourself as a human now that you've succumbed to this pleasure. Hehe.\
name ""
skillcount3 3848
skillname "Moonlight Nocturne"
dwave 1,"se\ero_koki1.ogg"
>With the tip of his penis in her mouth, the Queen Vampire's tongue runs all over Luka's penis!
mov %damage_kotei,1
damage 400,500
dwave 1,"se\ero_pyu1.ogg"
>Her tongue coils around his glans and down his back muscle!
mov %damage_kotei,1
damage 400,500
skillname ""
name "Luka"
>Ha... Ah..ahh...\
name ""
name $name
>Now to make you come again...@
>Release that semen of yours as much as you wish.\
name ""
skillcount3 3848
skillname "Moonlight Nocturne"
dwave 1,"se\ero_koki1.ogg"
>The Queen Vampire starts to suck harder on the tip of Luka's penis!
mov %damage_kotei,1
damage 400,500
dwave 1,"se\ero_pyu1.ogg"
>Her tongue coils all the way around Luka's penis, and starts to squeeze!
mov %damage_kotei,1
damage 400,500
skillname ""
name "Luka"
>Ha... Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\queenvanpire_hb7.bmp",0,0
gosub *syasei2
>As the Queen Vampire sucks on Luka's penis, he comes, filling her mouth with semen.\
name $name
>Haha... Have you completely lost your sanity?@
>Don't worry... I'll take care of you until your last moments.\
name ""
gosub *clear_sprite
gosub *setwindow_01p
mov %battle,0
mov %hsean,1
mov %2697,%2697+1:if %2697=1 mov %count_koenemy,%count_koenemy+1
if %2697>%count_most mov %count_most,%2697:mov $count_mostname,$name
count 27,4
mov $bad1,"The Queen Vampire forced Luka to come with her tongue as he was bound in her cloak."
goto *queenvanpire_h



*queenvanpire_h

mov $bad2,"Completely enveloped by the Queen Vampire's cloak, Luka's blood was sucked dry."
if %2697=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
name $name
>Now, I shall suck your bodily fluids...@
>Be happy, for you will be sucked by the Queen herself.\
name ""
cspl 690,699
lsp 700,":a;chara\queenvanpire_st12.bmp",0,0:print 10,500
>Emitting strange magical power, the Queen's cloak expands...@
>The crimson lining starts to rustle.\
>Emerging from the cloak's lining, countless tentacles start to wave in the air, surrounding me in a whirlpool of tentacles.\
name $name
>Hehe... I'll wrap you up in this.@
>You will give me all of your semen and blood...\
name ""
name "Luka"
>S...Stop... Ahhh!\
name ""
dwave 1,"se\ero_makituki3.ogg"
mov %hseanwave,12:hseanwave
lsp 700,":a;chara\queenvanpire_hc1.bmp",0,0:print 10,500
>Without being able to resist, I'm treated as her simple prey...@
>Wrapped up by her cloak, I'm deprived of my freedom.\
>The same time the cloak envelopes my body, the tentacles start to crawl over my body.\
>In addition, her fangs pierce into my neck.@
>Not only does it not hurt, but a warm feeling of pleasure starts to spread through my body from where the fangs pierce me.\
>Her vagina opens up, and welcomes me into her...@
>My penis is slowly sucked up into her warm interior.\
name "Luka"
>Ahhhh!\
name ""
>The Queen starts to squeeze and contract her vagina around my penis, her flesh wriggling around every so often and massaging me.\
name $name
>Hehe... How does it feel mating with a Queen?@
>I'll squeeze you completely dry with my vagina...\
>And with my fangs, I'll suck your blood dry at the same time.@
>Nnnn... *Suck*\
name ""
name "Luka"
>Hyaaa!\
name ""
>A groan of pleasure escapes my mouth as she starts to suck my blood.@
>A sweet, relaxing pleasure floods my body from where she's biting me.\
>I feel my body trying to twitch and writhe around...@> But the cloak wrapped around me prevents me from even doing that.\
>The tentacles from her cloak stroke and rub against my whole body, not leaving a single space on my body free from some sort of stimulation.\
name $name
>Haha... I'll drain all of your bodily fluids.@
>Die as you go mad in the agony of absorption...\
name ""
name "Luka"
>Ahhh!\
name ""
>The tentacles violating my body, the Queen raping me as she sucks my blood...@
>There's no way a man could endure this kind of assault.\
>It's a hell of pleasure with no escape.@
>Unable to even writhe around, I can only go mad in ecstasy.\
name "Luka"
>Urhg... C...Coming...\
name ""
>Her warm flesh around my penis waves and rubs against me.@
>It's too much... Nobody could hold out from this.\
name $name
>Haha... Finish off inside my vagina.@
>Pour that semen of yours into me.\
>Nnnn... *Suck*\
name ""
>With a cold-blooded smile, the Queen continues sucking up more blood.@
>The dull pleasure radiating from my neck gets ever stronger as I lose more blood.\
>As she rapes me at the same time, I feel a powerful climax taking over my body.\
gosub *syasei1
lsp 700,":a;chara\queenvanpire_hc2.bmp",0,0
gosub *syasei2
name "Luka"
>Ahh...\
name ""
>I explode inside her warm vagina.@
>At the same time, she starts contracting her vagina in a strange, devilish way.\
>It's almost creating a type of suction on my penis, forcibly drawing out my semen into her.\
name "Luka"
>Haaa... What... Was that...?\
name ""
>And my ejaculation doesn't stop...@
>It should have stopped shooting out semen after a few seconds, but mine is still pulsing inside her.\
>The intense sensation of orgasm is still exploding in my brain, as my penis continues to pulse and leak out inside her.\
name "Luka"
>Ahh... It won't stop...\
name ""
name $name
>...Haha, it feels amazing, doesn't it?@
>Devote everything of yours to me...\
name ""
name "Luka"
>N...No... Ahhh!\
name ""
lsp 700,":a;chara\queenvanpire_hc3.bmp",0,0:print 10,500
>A huge amount of semen is being shot into her.@
>This is too much... If this keeps up, I'm going to die.\
name "Luka"
>G...Get off...\
name ""
>I struggle to escape somehow...@
>But the Queen Vampire just embraces me tighter, holding my limbs down with her cloak's tentacles.\
>I can't even run... All I can do is have my blood and semen forcibly sucked out of me.\
name "Luka"
>Stop... I'm going to die!\
name ""
name $name
>Haha... What are you talking about?@
>We already covered this a while ago.@> You will give all of your bodily fluids to me.\
>And it's not just semen.@
>It's everything.\
name ""
>Suddenly, the Queen's cloak starts to rustle around...\
mov %hseanwave,13:hseanwave
lsp 700,":a;chara\queenvanpire_hc4.bmp",0,0:print 10,500
>It expands and covers even more of my body, enveloping more of me.\
name "Luka"
>Stop, get off!\
name ""
>The tentacles suddenly press down even harder on my body.@
>It feels like I'm being swallowed by some huge creature...\
name $name
>Hehehe... You're beyond help now.@
>Dry out into a shriveled corpse as you scream.\
name ""
name "Luka"
>Hyaaa!\
name ""
lsp 700,":a;chara\queenvanpire_hc5.bmp",0,0:print 10,500
>Little by little, more of my world is taken by the black cloak and tentacles.@
>It's like her cloak is already digesting me alive...\
name "Luka"
>Urhg... Help... Help...\
name ""
lsp 700,":a;chara\queenvanpire_hc6.bmp",0,0:print 10,500
name $name
>I'll start sucking your blood again...@
>I'll suck you until you die, so prepare yourself...\
name ""
>With a sadistic smile...@
lsp 700,":a;chara\queenvanpire_hc7.bmp",0,0:print 10,500
>She pierces my neck again with her fangs!\
name "Luka"
>Aiiie!\
name ""
>At the same time, tentacles creep into her vagina and coil around my penis even as she rapes me.\
>It makes it feel like she's forcibly squeezing out my semen even faster than ever.\
lsp 700,":a;chara\queenvanpire_hc8.bmp",0,0:print 10,500
>The merciless stimulation makes each pulse of my penis shoot out even more semen into her.\
name "Luka"
>Ahhhh!\
name ""
name $name
>Are you already seeing a bit of Heaven?@
>You're going to be nothing but a dry corpse in my embrace soon enough...\
>Are you happy?@> Isn't it a great way to go?@
>Hahaha.\
name ""
name "Luka"
>Ahhgg... Ah!\
name ""
>My body relaxes in weakness as she drains everything from me.@
>My blood through her fangs, my semen into her vagina, and the rest of my fluids through her cloak...\
name "Luka"
>Ahh...ah...\
name ""
>The storm of pleasure slowly takes over my brain, leaving me unable to do anything but focus on the ecstasy.@
>My life itself is being sucked out, and I'm drying up...\
name "Luka"
>Aa...a...\
name ""
>Quickly after that, my last drop is taken by the Queen... My life itself sucked out.\
mov %hseanwave,0:hseanwave
name $name
>Hehehe... You were delicious.@
>I'll even use the last of your meat as some food.\
name ""
>Inside the cloak, the Hero's dried up corpse is melted down into a small amount of nutrients to be digested.@
>Thus, every piece of the Hero is used to feed the Queen Vampire.\
gosub *anten
>.............\
goto *badend



*c_homunculus_start

mov $name,"Chimera Homunculus"
mov $name2,"Chimera Homunculus"
mov $lavel,"c_homunculus"
mov $tatie1,"c_homunculus_st01"
mov $tatie2,"c_homunculus_st02"
mov $tatie3,"c_homunculus_st03"
mov $tatie4,"c_homunculus_st02"
mov $haikei,"bg072"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,17000
if %nanido=2 mov %max_enemylife,20000
if %nanido=3 mov %max_enemylife,23000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,40
if %nanido=3 mov %earth_keigen,20
mov %alice_skill,1
mov %alice_skill1,100
mov %alice_skill2,100
mov %alice_skill3,100
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free from the Chimera Homunculus!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"I won't let you go until you ejcaulate..."
mov $mogaku_sel2,"I won't release you, even if you struggle..."
mov $mogaku_sel3,"You can't escape from my tentacles..."
mov $mogaku_sel4,"...Do you want me to tighten more...?"
mov $mogaku_sel5,"Don't struggle... Just come already."
mov $mogaku_dassyutu1,"If you escape, I'll just catch you again..."
mov $mogaku_dassyutu2,""
mov $mogaku_earth_dassyutu1,"If you escape, I'll just catch you again..."
mov $mogaku_earth_dassyutu2,""
mov $half_s1,"I'll just give more pleasure and lead you to ejaculation..."
mov $half_s2,"Then absorb your semen as nutrients..."
mov $kiki_s1,"You're almost about to ejaculate..."
mov $kiki_s2,"That life essence will shoot out from your genitalia..."
mov %end_n,12
mov %exp_minus,0
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,4
mov %owaza_count3a,4
name $name
>I sense quite a lot of magical power coming from you...@
>More than any alchemy...@> Something almost primordial...\
name ""
>The Chimera's eyes lock onto me, her tentacles waving around her.\
name "Luka"
>It looks like she was created using alchemy...\
name ""
>Inside the flasks are various strange organisms...@
>This monster is something called a Homunculus.\
>There's a lot of variety among the artificially made monsters...@
>Promestein seems to have advanced her research and design quite a lot.\
name $name
>Give me all of that power...@
>I'll suck it all out, until you're completely dry...\
name ""
name "Luka"
>I won't give you anything!@> Here I come!\
name ""
goto *common_main



*c_homunculus_v

gosub *face3
name $name
>My... Power...@
>My... Magic...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Chimera is sealed in the form of a flask!\
mov %viclose,1:gosub *victory
mov %getexp,170000:gosub *lvup
mov %2380,1
goto *sean0346



*c_homunculus_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Did you surrender...?@>But I won't go easy on you...@
>I'll take all of your semen...\
name ""
goto *c_homunculus_a



*c_homunculus_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *c_homunculus_kousan
if %cmd1=16 goto *c_homunculus_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *c_homunculus_main



*c_homunculus_a

if %kousoku=1 gosub *c_homunculus_a6:goto *common_main
rnd2 %ransu,1,5
if %ransu=1 gosub *c_homunculus_a1:goto *common_main
if %ransu=2 gosub *c_homunculus_a2:goto *common_main
if %ransu=3 gosub *c_homunculus_a3:goto *common_main
if %ransu=4 && %owaza_count3a>5 gosub *c_homunculus_a4:goto *common_main
if %ransu=5 && %owaza_count1a>5 gosub *c_homunculus_a5:goto *common_main
skip -6



*c_homunculus_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Even these tentacles can give men pleasure..."
if %ransu=2 mov $sel1,"I'll squeeze out the male's semen with this tentacle."
if %ransu=3 mov $sel1,"Give pleasure with tentacles, and force an ejaculation..."
name $name
eng $sel1:$sel6\
name ""
skillname "EX Tentacle"
dwave 1,"se\ero_syokusyu1.ogg"
>The Chimera Homunculus' tentacles stroke Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3849
if %nanido<2 damage 380,410
if %nanido=2 damage 410,440
if %nanido=3 damage 440,470
skillname ""
if %mylife=0 sub %stack,1:return *c_homunculus_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_homunculus_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll put your penis between these synthetic breasts..."
if %ransu=2 mov $sel1,"I'll squeeze your semen out with these breasts..."
if %ransu=3 mov $sel1,"I'll sandwich your penis between these to make you ejaculate..."
name $name
eng $sel1:$sel6\
name ""
skillname "EX Bust"
dwave 1,"se\ero_sigoki1.ogg"
>The Chimera Homunculus squeeze Luka's penis between her breasts!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3850
if %nanido<2 damage 390,420
if %nanido=2 damage 420,450
if %nanido=3 damage 450,480
skillname ""
if %mylife=0 sub %stack,1:return *c_homunculus_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_homunculus_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My mouth was designed to suck out a man's energy..."
if %ransu=2 mov $sel1,"This is how I can draw out a man's semen..."
if %ransu=3 mov $sel1,"I can absorb a man's energy with my magic mouth..."
name $name
eng $sel1:$sel6\
name ""
skillname "EX Drain Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>The Chimera Homunculus sucks Luka's penis into her mouth!\
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
>The sweet sensation of her mouth draws out Luka's energy into her mouth!
skillcount3 3851
if %nanido<2 damage 400,430
if %nanido=2 damage 430,460
if %nanido=3 damage 460,490
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *c_homunculus_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_homunculus_a4

add %stack,1
mov %owaza_count3a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll use this tentacle to violate you..."
if %ransu=2 mov $sel1,"I'll use this tentacle to toy with you..."
if %ransu=3 mov $sel1,"I'll torment you until you ejaculate with my tentacle..."
name $name
eng $sel1:$sel6\
name ""
skillname "Alchemist Tentacle"
dwave 1,"se\ero_syokusyu1.ogg"
>The Chimera Homunculus' tentacle violently strokes Luka's penis up and down!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3852
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
dwave 1,"se\ero_syokusyu1.ogg"
>Countless tentacles coil around his penis from the root to tip!
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
dwave 1,"se\ero_syokusyu1.ogg"
>The tip of the tentacles rub around under the neck of Luka's penis!
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
dwave 1,"se\ero_syokusyu1.ogg"
>Smaller tentacles rub against the glans of his penis!
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
dwave 1,"se\ero_syokusyu1.ogg"
>Innumerable suckers latch onto his glans and back muscle, sucking and pulling on his penis!
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
skillname ""
if %mylife=0 sub %stack,1:return *c_homunculus_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_homunculus_a5

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 4
name $name
>Seal your movements...\
name ""
skillname "Alchemist Bind"
dwave 1,"se\ero_makituki3.ogg"
eng "The Chimera Homunculus' tentacles wrap around Luka's body!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<70 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
@
mov %kousoku,1:gosub *status_print
>Luka has been bound by countless tentacles!\
skillname ""
if %kousan=2 sub %stack,1:return
name $name
>Now to milk you with my tentacles...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,2
if %earth=0 && %nanido=2 mov %genmogaku,2
if %earth=0 && %nanido=3 mov %genmogaku,3
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
sub %stack,1
return



*c_homunculus_a6

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll squeeze out your semen with my tentacles..."
if %ransu=2 mov $sel1,"Ejaculate as you're covered in my tentacles..."
if %ransu=3 mov $sel1,"Shoot out your semen as you're played with by my tentacles..."
name $name
eng $sel1:$sel6\
name ""
skillname "Alchemist Euria"
dwave 1,"se\ero_makituki3.ogg"
>Countless tentacles crawl all over Luka's body!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3853
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
dwave 1,"se\ero_makituki2.ogg"
>More tentacles coil around Luka's penis!
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
dwave 1,"se\ero_chupa6.ogg"
>A pipe-shaped tentacle latches onto Luka's penis, and sucks hard!
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *c_homunculus_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*c_homunculus_onedari

mov $list1,"EX Tentacle"
if %3849>0 mov %list_num1,1
mov $list2,"EX Bust"
if %3850>0 mov %list_num2,1
mov $list3,"EX Drain Blowjob"
if %3851>0 mov %list_num3,1
mov $list4,"Alchemist Tentacle"
if %3852>0 mov %list_num4,1
mov $list5,"Alchemist Euria"
if %3853>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *c_homunculus_onedari1
if %cmd1=12 goto *c_homunculus_onedari2
if %cmd1=13 goto *c_homunculus_onedari3
if %cmd1=14 goto *c_homunculus_onedari4
if %cmd1=15 goto *c_homunculus_onedari5
if %cmd1=-1 goto *c_homunculus_main
goto *c_homunculus_onedari



*c_homunculus_onedari1

gosub *onedari_syori
name $name
>You want to finish on these tentacles?@
>Then I'll do as you desire...\
name ""
gosub *c_homunculus_a1
skip -1



*c_homunculus_onedari2

gosub *onedari_syori
name $name
>You want to finish on these breasts?@
>Then I'll do as you desire...\
name ""
gosub *c_homunculus_a2
skip -1



*c_homunculus_onedari3

gosub *onedari_syori
name $name
>You want to finish in my mouth?@
>Then I'll do as you desire...\
name ""
gosub *c_homunculus_a3
skip -1



*c_homunculus_onedari4

gosub *onedari_syori
name $name
>You want to be squeezed dry by these tentacles?@
>Then I'll do as you desire...\
name ""
gosub *c_homunculus_a4
skip -1



*c_homunculus_onedari5

gosub *onedari_syori
name $name
>You want to be wrapped in tentacles and violated?@
>Then I'll do as you desire...\
name ""
if %kousoku=0 gosub *c_homunculus_a5
gosub *c_homunculus_a6
skip -1



*c_homunculus_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\c_homunculus_bk03.bmp",0,0
gosub *syasei2
>As the Chimera's tentacles strokes his penis, Luka comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2680,%2680+1:if %2680=1 mov %count_koenemy,%count_koenemy+1
if %2680>%count_most mov %count_most,%2680:mov $count_mostname,$name
count 10,4
mov $bad1,"The Chimera Homunculus forced Luka to come with her tentacles."
gosub *face2
name $name
>My tentacles finished you off...@
>I'll extract the rest of your semen...\
name ""
goto *c_homunculus_h



*c_homunculus_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\c_homunculus_bk02.bmp",0,0
gosub *syasei2
>Sandwiched between the Chimera's breasts, Luka comes, covering her chest in semen.\
mov %viclose,1:gosub *lose
mov %2680,%2680+1:if %2680=1 mov %count_koenemy,%count_koenemy+1
if %2680>%count_most mov %count_most,%2680:mov $count_mostname,$name
count 7,4
mov $bad1,"The Chimera Homunculus forced Luka to come with her breasts."
gosub *face2
name $name
>My breasts finished you off...@
>I'll extract the rest of your semen...\
name ""
goto *c_homunculus_h



*c_homunculus_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\c_homunculus_bk01.bmp",0,0
gosub *syasei2
>As the Chimera sucks on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2680,%2680+1:if %2680=1 mov %count_koenemy,%count_koenemy+1
if %2680>%count_most mov %count_most,%2680:mov $count_mostname,$name
count 4,4
mov $bad1,"The Chimera Homunculus forced Luka to come with her mouth."
gosub *face2
name $name
>My mouth finished you off...@
>I'll extract the rest of your semen...\
name ""
goto *c_homunculus_h



*c_homunculus_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\c_homunculus_bk03.bmp",0,0
gosub *syasei2
>As the Chimera's tentacles run all over his body, Luka comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2680,%2680+1:if %2680=1 mov %count_koenemy,%count_koenemy+1
if %2680>%count_most mov %count_most,%2680:mov $count_mostname,$name
count 10,4
mov $bad1,"The Chimera Homunculus forced Luka to come with her tentacles."
gosub *face2
name $name
>My tentacles finished you off...@
>I'll extract the rest of your semen...\
name ""
goto *c_homunculus_h



*c_homunculus_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\c_homunculus_bk03.bmp",0,0
gosub *syasei2
>With his body bound and violated by her tentacles, Luka comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2680,%2680+1:if %2680=1 mov %count_koenemy,%count_koenemy+1
if %2680>%count_most mov %count_most,%2680:mov $count_mostname,$name
count 10,4
mov $bad1,"The Chimera Homunculus forced Luka to come with her tentacles."
gosub *face2
name $name
>Did you leak with my tentacles all over you...?@
>I'll extract the rest of your semen...\
name ""
goto *c_homunculus_h



*c_homunculus_h

mov $bad2,"Luka's semen was absorbed as nutrients until his death."
if %2680=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahhh...\
name ""
>A strange opening, filled with countless tentacles is pushed toward me as the Chimera draws closer...@
>Some of the tentacles reach out toward my penis.\
name "Luka"
>S...Stop... Stop...\
name ""
name $name
>This is a special tentacle for extracting male semen.@
>It's much more efficient than a normal one for extracting...\
name ""
dwave 1,"se\ero_makituki3.ogg"
mov %hseanwave,14:hseanwave
cspl 690,699
lsp 700,":a;chara\c_homunculus_h1.bmp",0,0:print 10,500
>The strange tentacle coils around my penis.@
>It wraps around my shaft, all the way up to my glans.\
>At the same time, my lower body is taken by a strange sensation, as if I could melt away into nothing.\
name "Luka"
>Haaa... What is this...?\
name ""
>My waist shakes in the oddly comfortable sensation.\
>The pleasure wasn't from the tentacle tightening, or even stroking my penis...@
>Rather, it was coming just from the act of being held by the tentacle.\
>The slimy texture of the tentacle seems to spread into my penis, almost like osmosis...\
name "Luka"
>Ahh... That feels good...\
name ""
>The strange touch, numbing my lower body, suddenly makes my penis pulse in pleasure.\
gosub *syasei1
lsp 700,":a;chara\c_homunculus_h2.bmp",0,0
gosub *syasei2
name "Luka"
>Haa...\
name ""
>Semen starts to drip out of my penis in slow drops.@
>It was so unexpected, I don't even know if I can call it an ejaculation...\
name "Luka"
>Ahh... What's going on...?\
name ""
>The pleasure that brought me to that orgasm was different from a physical stimulation...@
>It's almost like her tentacles used some strange magic on my penis to make me incontinent.\
>But the drain of energy I feel is much more powerful than a normal ejaculation...@
>Along with the semen, it feels like my life energy itself was leaked out.\
name $name
>Once this tentacle captures a male's penis, it can immediately force an ejaculation.@
>With that, I can easily extract their life energy...\
>I'll extract out all of your vitality.@
>I'll wind your genitals up in this tentacle, and milk it all out...\
name ""
name "Luka"
>Stop... Don't do that...!\
name ""
>Just by coiling around my penis, she was able to force an ejaculation...@
>If she really wrapped it all the way up and tried, I'd be drained dry in no time.\
name $name
>I'll take your semen as nutrients...@
>Give me everything.\
name ""
name "Luka"
>Stop, I'm going to die...@
>Ahhh!\
name ""
mov %hseanwave,15:hseanwave
lsp 700,":a;chara\c_homunculus_h3.bmp",0,0:print 10,500
>Countless tentacles surge and wrap around my penis.@
>The intense pleasure being forced into me makes it feel like I could melt away in it.\
name "Luka"
>Haa... Aiee!\
name ""
>My body trembles from the overpowering stimulation.@
>An eroding weakness fills me, making it feel like my body itself is being stolen from me.\
gosub *syasei1
lsp 700,":a;chara\c_homunculus_h4.bmp",0,0
gosub *syasei2
>Without knowing the exact trigger, I come again.@
>There's no buildup to the ejaculation, it just comes... Almost like peeing on accident.\
>There's no direct physical stimulation from the tentacles, either... They're just coiled around my penis, holding it.\
name $name
>You can't resist it any longer...@
>Just be obedient and let out the rest of your semen.\
name ""
name "Luka"
>No... Don't...@
>Ahh... Stop, it won't stop...\
name ""
gosub *syasei1
lsp 700,":a;chara\c_homunculus_h5.bmp",0,0
gosub *syasei2
>Regardless of my own will, my penis keeps leaking out more and more semen...@
>It's almost like it isn't even a part of my body.\
>Every pulse of semen leaves me weaker and weaker... After only a few moments of that, I'm already unable to move my fingers.\
>By some devilish force, my life itself is being leaked out...\
name "Luka"
>Help me... I'm going to die...\
name ""
>Any more than this, and I'll be in real danger...\
gosub *syasei1
lsp 700,":a;chara\c_homunculus_h6.bmp",0,0
gosub *syasei2
>But even still, I continue to leak out.@
>Ignoring the despair in my brain, my body continues soaking in strange pleasure, feeding my life to the Chimera.\
name $name
>You have more life energy than a normal human...@
>But it's almost empty.\
>You're lucky, you get to taste this pleasure longer than most humans...\
name ""
name "Luka"
>Ahh... Ahh!\
name ""
gosub *syasei1:gosub *syasei2
>Despite the crisis I'm in, my body is completely at the Chimera's mercy.\
name "Luka"
>Haaa... H...Help me...\
name ""
>Crying, I beg for her to stop... But she simply ignores me, and continues draining away my life.@
>This strange Homunculus is just going to kill me for food...\
name $name
>Almost...@
>You only have a little bit left for me to extract.\
name ""
name $name
>Hyaaa...\
name ""
gosub *syasei1:gosub *syasei2
>The weakness gets more and more intense, until I can't even keep my eyes open any longer.\
gosub *syasei1:gosub *syasei2
name "Luka"
>Ah...\
name ""
>The last bits of my semen and life are mercilessly drained out...\
gosub *syasei1:gosub *syasei2
name "Luka"
>A...aaa...\
name ""
>Even though I can barely breathe, my penis continues leaking...\
gosub *syasei1:gosub *syasei2
name "Luka"
>.............\
name ""
>At last, my body itself erodes away from the pleasure.\
mov %hseanwave,0:hseanwave
name $name
>Finished...\
name ""
>All that is left of the Hero is a simple corpse.@
>Standing over it, the Chimera Homunculus doesn't even look satiated.\
>Thus, the Hero Luka became simple food for a Chimera.\
gosub *anten
>.............\
goto *badend



*ironmaiden_k_start

mov $name,"Iron Maiden v2"
mov $name2,"Iron Maiden"
mov $lavel,"ironmaiden_k"
mov $tatie1,"ironmaiden_k_st01"
mov $tatie2,"ironmaiden_k_st02"
mov $tatie3,"ironmaiden_k_st03"
mov $tatie4,"ironmaiden_k_st11"
mov $haikei,"bg072"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,18000
if %nanido=2 mov %max_enemylife,21000
if %nanido=3 mov %max_enemylife,24000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,40
if %nanido=3 mov %earth_keigen,20
mov %alice_skill,1
mov %alice_skill1,100
mov %alice_skill2,100
mov %alice_skill3,100
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free from the Iron Maiden!"
mov $mogaku_anno2,"Luka broke free from the Iron Maiden!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Sinners... Never escape..."
mov $mogaku_sel2,"Sinners... Will be finished..."
mov $mogaku_sel3,"Struggle... Sinner..."
mov $mogaku_sel4,"There's no point doing that... There's no escape for you."
mov $mogaku_sel5,"My body is a shackle for sinners..."
mov $mogaku_dassyutu1,"He escaped from my punishment...?"
mov $mogaku_dassyutu2,""
mov $mogaku_earth_dassyutu1,"That power is too much for a sinner..."
mov $mogaku_earth_dassyutu2,""
mov $half_s1,"Sinner, give in to the pleasure."
mov $half_s2,"And meet your miserable end..."
mov $kiki_s1,"You will be finished..."
mov $kiki_s2,"Cover me... In your dirty Sinner semen."
mov %end_n,12
mov %exp_minus,170000
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,4
mov $name,"Iron Maiden"
name "Luka"
>Come on!@> I'm your opponent!\
name ""
name $name
>...Are you a sinner?\
>If you are, I'll squeeze you inside of me until you're empty.@
>Your life and semen both...\
name ""
name "Luka"
>Does she have her own will...?\
name ""
>She seems to be moving and speaking on her own...@
>Unlike the last time I faced an Iron Maiden, does this one have intelligence?\
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\ironmaiden_k_st01.bmp",160,0:print 10,500
name "Alice"
>Originally, they were supposed to be magic monsters that would only follow orders issued...\
>But after being released into the wild, it seems to have made victims of many men.@
>It looks like that awakened some kind of sense of self in her...\
name ""
csp 701
gosub *face1
name "Luka"
>An Iron Maiden that can think and act on its own...@>How frightening...\
name ""
>Just like last time, if I get stuck inside her it's all over...@
>I have to be careful here...\
goto *common_main



*ironmaiden_k_v

gosub *face3
name $name
>Dispose... Of sinners...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Iron Maiden turns into dust and vanishes!\
mov $name,"Iron Maiden v2"
mov %viclose,1:gosub *victory
mov %getexp,180000:gosub *lvup
mov %2381,1
goto *sean0347



*ironmaiden_k_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>You yourself seek to be executed by torture?@
>Then you have admitted that you are a Sinner...\
name ""
goto *ironmaiden_k_a



*ironmaiden_k_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *ironmaiden_k_kousan
if %cmd1=16 goto *ironmaiden_k_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *ironmaiden_k_main



*ironmaiden_k_a

if %kousoku=2 gosub *ironmaiden_k_a6:goto *common_main
if %kousoku=1 rnd2 %ransu,1,2
if %kousoku=1 && %ransu=1 gosub *ironmaiden_k_a4:goto *common_main
if %kousoku=1 && %ransu=2 gosub *ironmaiden_k_a5:goto *common_main
rnd2 %ransu,1,3
if %ransu=1 gosub *ironmaiden_k_a1:goto *common_main
if %ransu=2 gosub *ironmaiden_k_a2:goto *common_main
if %ransu=3 && %owaza_count1a>5 gosub *ironmaiden_k_a3:goto *common_main
skip -4



*ironmaiden_k_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Sinner... Go mad in agony from my tentacle."
if %ransu=2 mov $sel1,"Be overrun by my tentacles, and scatter your semen..."
if %ransu=3 mov $sel1,"I'll writhe all over your body..."
name $name
eng $sel1:$sel6\
name ""
skillname "Dream Spider"
dwave 1,"se\ero_makituki2.ogg"
>The Iron Maiden's tentacles writhe all over Luka's body, teasing his groin most of all!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3854
if %nanido<2 damage 390,420
if %nanido=2 damage 420,450
if %nanido=3 damage 450,480
skillname ""
if %mylife=0 sub %stack,1:return *ironmaiden_k_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*ironmaiden_k_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll torture your genitals, Sinner."
if %ransu=2 mov $sel1,"Spit out your semen in this..."
if %ransu=3 mov $sel1,"I will use this to collect the Sinner's semen..."
name $name
eng $sel1:$sel6\
name ""
skillname "Sweet Pinchers"
dwave 1,"se\ero_buchu1.ogg"
>The tip of one of the Iron Maiden's tentacles opens up, and sucks on Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3855
if %nanido<2 damage 400,430
if %nanido=2 damage 430,460
if %nanido=3 damage 460,490
skillname ""
if %mylife=0 sub %stack,1:return *ironmaiden_k_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*ironmaiden_k_a3

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 5
name $name
>Now, lay down inside of me.@
>My tentacles will violate your body and exhaust everything of yours...\
name ""
skillname "Cave of Roses"
dwave 1,"se\ero_makituki3.ogg"
>Tentacles coil around Luka's body, and draw him closer to the Iron Maiden's open body!\
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
>Luka's body is right next to the wriggling tentacles!
skillcount3 3856
if %nanido<2 damage 390,410
if %nanido=2 damage 420,440
if %nanido=3 damage 450,470
mov $tatie4,"ironmaiden_k_st11"
mov %kousoku,1:gosub *status_print
>Luka has been bound by the Iron Maiden!\
skillname ""
if %mylife=0 sub %stack,1:return *ironmaiden_k_h3
if %kousan=2 sub %stack,1:return
name $name
>I am a torture device...@
>My insides will play with the Criminal's body...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,2
if %earth=0 && %nanido=2 mov %genmogaku,2
if %earth=0 && %nanido=3 mov %genmogaku,3
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
sub %stack,1
return



*ironmaiden_k_a4

add %stack,1
>Luka is being violated by the Iron Maiden...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My tentacles will play with the Sinners body..."
if %ransu=2 mov $sel1,"Scatter your juices inside my body..."
if %ransu=3 mov $sel1,"The Sinners semen will be exhausted inside me..."
name $name
eng $sel1:$sel6\
name ""
skillname "Cave of Roses"
dwave 1,"se\ero_makituki3.ogg"
mov $tatie4,"ironmaiden_k_st12"
lsp 700,":a;chara\ironmaiden_k_st12.bmp",0,0:print 10,500
>The strange tentacles stroke every inch of Luka's body!
skillcount3 3856
if %nanido<2 damage 130,150
if %nanido=2 damage 140,160
if %nanido=3 damage 150,170
dwave 1,"se\ero_makituki3.ogg"
>More tentacles coil around Luka's penis, stroking it up and down!
if %nanido<2 damage 130,150
if %nanido=2 damage 140,160
if %nanido=3 damage 150,170
dwave 1,"se\ero_makituki3.ogg"
>The tentacles around his penis slowly start to tighten!
if %nanido<2 damage 130,150
if %nanido=2 damage 140,160
if %nanido=3 damage 150,170
skillname ""
if %mylife=0 sub %stack,1:return *ironmaiden_k_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*ironmaiden_k_a5

add %stack,1
name $name
>Now to torture you...\
name ""
skillname "Sadistic Iron Maiden"
dwave 1,"se\door1.ogg"
mov %kousoku,2:gosub *status_print
>The Iron Maiden's doors slowly start to close!\
skillname ""
name $name
>Resign yourself, Sinner...@
>I will squeeze every drop of your semen...\
name ""
sub %stack,1
return



*ironmaiden_k_a6

add %stack,1
name $name
>I am a torture device...@
>I squeeze Sinners to death inside me...@>Now, go mad in agony...\
name ""
skillname "Sadistic Iron Maiden"
dwave 1,"se\door1.ogg"
lsp 700,":a;chara\ironmaiden_k_st14.bmp",0,0:print 10,500
>The Iron Maiden's doors close, trapping Luka inside!\
dwave 2,"se\ero_makituki3.ogg"
mov $tatie4,"ironmaiden_k_h5"
lsp 700,":a;chara\ironmaiden_k_h5.bmp",0,0:print 10,500
>The slimy tentacles cling to every inch of Luka's body!\
skillcount3 3857
mov %damage_kotei,1
damage 500,600
mov %kousoku,3:gosub *status_print
>Luka has been confined inside the Iron Maiden!\
skillname ""
if %mylife=0 sub %stack,1:return *ironmaiden_k_h4
name "Luka"
>Hyaaa!\
name ""
>The tentacles coil and wrap all around Luka's body, driving him mad with the overwhelming stimulation!\
sub %stack,1
goto *ironmaiden_k_a7



*ironmaiden_k_a7

add %stack,1
>Luka has been confined inside the Iron Maiden...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"The meaning of my existence is to dispose of Sinners..."
if %ransu=2 mov $sel1,"Be completely exhausted inside me..."
if %ransu=3 mov $sel1,"Gasp, struggle, and go mad in agony..."
if %ransu=4 mov $sel1,"The Sinner's semen needs to be completely squeezed and disposed of..."
if %ransu=5 mov $sel1,"This is your execution... Hurry up and finish..."
name $name
eng $sel1:$sel6\
name ""
skillname "Sadistic Iron Maiden"
dwave 1,"se\ero_makituki3.ogg"
>The tentacles inside the Iron Maiden violate every inch of Luka's body!
skillcount3 3857
mov %damage_kotei,1
damage 300,400
dwave 1,"se\ero_makituki3.ogg"
>The tentacles overrun his penis, attacking it from every direction!
mov %damage_kotei,1
damage 300,400
skillname ""
if %mylife=0 sub %stack,1:return *ironmaiden_k_h4
sub %stack,1
goto *ironmaiden_k_a7



*ironmaiden_k_onedari

mov $list1,"Dream Spider"
if %3854>0 mov %list_num1,1
mov $list2,"Sweet Pinchers"
if %3855>0 mov %list_num2,1
mov $list3,"Cave of Roses"
if %3856>0 mov %list_num3,1
mov $list4,"Sadistic Iron Maiden"
if %3857>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *ironmaiden_k_onedari1
if %cmd1=12 goto *ironmaiden_k_onedari2
if %cmd1=13 goto *ironmaiden_k_onedari3
if %cmd1=14 goto *ironmaiden_k_onedari4
if %cmd1=-1 goto *ironmaiden_k_main
goto *ironmaiden_k_onedari



*ironmaiden_k_onedari1

gosub *onedari_syori
name $name
>You want to be played with by my tentacles...?\
name ""
gosub *ironmaiden_k_a1
skip -1



*ironmaiden_k_onedari2

gosub *onedari_syori
name $name
>You want to be sucked by my tentacle...?\
name ""
gosub *ironmaiden_k_a2
skip -1



*ironmaiden_k_onedari3

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want to lay inside me, and be violated by my tentacles...?\
name ""
if %kousoku=0 gosub *ironmaiden_k_a3
gosub *ironmaiden_k_a4
skip -1



*ironmaiden_k_onedari4

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want to be executed inside me...?\
name ""
if %kousoku=0 gosub *ironmaiden_k_a3
gosub *ironmaiden_k_a6
skip -1



*ironmaiden_k_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\ironmaiden_k_bk02.bmp",0,0
gosub *syasei2
>As the Iron Maiden's tentacles stroke him all over, Luka comes, covering them with his semen.\
mov %viclose,1:gosub *lose
mov %2681,%2681+1:if %2681=1 mov %count_koenemy,%count_koenemy+1
if %2681>%count_most mov %count_most,%2681:mov $count_mostname,$name
count 10,4
mov $bad1,"The Iron Maiden used her tentacles to force Luka to come."
gosub *face2
name $name
>You finished...@
>My tentacles squeezed out the Sinner's semen...\
name ""
goto *ironmaiden_k_h



*ironmaiden_k_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>As the Iron Maiden's tentacle sucks on Luka's penis, he comes, filling the mouth of it with semen.\
mov %viclose,1:gosub *lose
mov %2681,%2681+1:if %2681=1 mov %count_koenemy,%count_koenemy+1
if %2681>%count_most mov %count_most,%2681:mov $count_mostname,$name
count 10,4
mov $bad1,"The Iron Maiden used her sucking tentacle to force Luka to come."
gosub *face2
name $name
>You finished...@
>My tentacle sucked out the Sinner's semen...\
name ""
goto *ironmaiden_k_h



*ironmaiden_k_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\ironmaiden_k_st13.bmp",0,0
gosub *syasei2
>As Luka's body is overrun by the Iron Maiden's tentacles, he comes, spraying out his semen inside her open body.\
mov %viclose,1:gosub *lose
mov %2681,%2681+1:if %2681=1 mov %count_koenemy,%count_koenemy+1
if %2681>%count_most mov %count_most,%2681:mov $count_mostname,$name
count 10,4
mov $bad1,"The Iron Maiden used her tentacles to force Luka to come."
gosub *face2
name $name
>You scattered your semen inside me...\
name ""
goto *ironmaiden_k_h



*ironmaiden_k_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\ironmaiden_k_h6.bmp",0,0
gosub *syasei2
>Unable to endure the tentacles all around him, Luka comes, spraying out his semen inside her.\
mov %viclose,1:gosub *lose
mov %2681,%2681+1:if %2681=1 mov %count_koenemy,%count_koenemy+1
if %2681>%count_most mov %count_most,%2681:mov $count_mostname,$name
count 28,4
mov $bad1,"Luka was forced to orgasm as he was violated inside the Iron Maiden."
gosub *face2
name $name
>Ejaculation confirmed...@
>The tortuous pleasure starts on the Sinner now...\
name ""
goto *ironmaiden_k_h



*ironmaiden_k_h

mov $bad2,"Trapped inside the Iron Maiden, Luka was executed by pleasure."
if %2681=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku=3 goto *ironmaiden_k_hb
name "Luka"
>Ahhh...\
name ""
>The Iron Maiden uses her tentacles to pick up my weakened body, and brings me into her opened body.\
dwave 1,"se\ero_makituki3.ogg"
cspl 690,699
lsp 700,":a;chara\ironmaiden_k_h1.bmp",0,0:print 10,500
>The nightmarish tentacles writhe and squirm around me, as her lid slowly starts to close with me inside...\
name "Luka"
>H...Help me!\
name ""
>I beg the Iron Maiden to stop.\
name $name
>...I will give you pleasurable stimulation now.@
>If you ejaculate within one minute, you will be confirmed as a criminal and executed.\
>If you do not ejaculate within that minute, your innocence will be confirmed, and I will release you at once.\
name ""
name "Luka"
>One minute...!?\
name ""
>Even if she has her own will, that seems more like an instruction given to her by her original creator...\
>Squeeze criminals to death...@
>The original purpose of her creation.\
>And all I have to do is endure it a minute to be released...?\
name "Luka"
>Urhg...!\
name ""
>I clench my teeth and get ready to endure the trial.@
mov %hseanwave,12:hseanwave
lsp 700,":a;chara\ironmaiden_k_h2.bmp",0,0:print 10,500
>At the same time, the countless internal tentacles start to squirm around.\
>Secreting a strange, slimy liquid, they start creeping around over my body.@
>On their tips, the tiny little bumps give particularly intense stimulation wherever they touch.\
name "Luka"
>Ah...\
name ""
>The intense stimulation hits every inch of my body at once.@
>My neck, my ass, my nipples... Everything is touched all at the same time.\
>That alone is almost enough to send me over the edge.\
name "Luka"
>Haa...\
name ""
>In addition, springy tentacles coil around my penis, stroking and squeezing me at varying rates, almost like a powerful massage.\
>The small bumps on the tips of the tentacles rub against my glans, forcing the strange stimulation into my most sensitive part.\
name "Luka"
>Ahh... That feels good...\
name ""
>The intense pleasure makes my body relax...@
>But if I ejaculate here, she's going to execute me.\
>Somehow or another, I have to hold back and not give in.\
name $name
>Biological reaction to pleasure confirmed.@
>Continuing the stimulation...\
name ""
>The tentacles crawl all over my body, as if trying to make sure they know every part of me.@
>At the same time, they stroke and massage my penis, trying to force an orgasm.\
>It's not a violent or intense stimulation, but it's hitting every inch of my body at once.@
>When aroused, the pleasure is almost too much to take.\
name "Luka"
>Ahhh...\
name ""
>Not even a minute, it hasn't even been thirty seconds yet...@
>But I can already feel my penis wanting to blow in this pleasure.\
>My instinct as a male is wanting to come, and bask in this pleasure.\
name "Luka"
>Ahh... I can't come...\
name ""
>Focusing more and more on my penis, the tips of the tentacles start stroking my glans with more and more intensity.\
>As they massage me, the weakness and desire to release get ever more overpowering.\
name "Luka"
>No... Coming...\
name ""
>If I ejaculate, a torture of pleasure will start...@
>But the desire to taste it is starting to take hold in me.\
>If I ejaculate, something even more intense will start.@
>As the stimulation gets ever more intense, I can't push away the almost suicidal thoughts...\
name "Luka"
>Ah...a...\
name ""
>I'm going to give up and come.@
>Then I can experience even more intense pleasure.\
>Giving up to that devilish whisper echoing through my head, I relax my body and give myself over.\
name "Luka"
>I...it feels so good! Ahhh!\
name ""
>Since I surrendered mentally, the physical surrender was quick to come.@
>My lower body explodes in release, as my penis pulses in joy.\
gosub *syasei1
lsp 700,":a;chara\ironmaiden_k_h3.bmp",0,0
gosub *syasei2
name "Luka"
>Haaa...\
name ""
>With numbing pleasure spreading through me, I explode, showering my semen all over the writhing tentacles.\
mov %hseanwave,0:hseanwave
name "Luka"
>Ah... Urhg...\
name ""
>After the temporary pleasure starts to fade, I'm hit by a deep sense of regret.@
>I came all over these tentacles...\
>This torture device forced so much pleasure into me, that I willingly became its prey.\
name $name
>Ejaculation confirmed...@
>You have been confirmed as a criminal, and your execution by pleasure will now begin.\
name ""
goto *ironmaiden_k_hb



*ironmaiden_k_hb

name "Luka"
>S...Stop!@>Ahhh!\
name ""
mov %hseanwave,13:hseanwave
cspl 690,699
lsp 700,":a;chara\ironmaiden_k_h5.bmp",0,0:print 10,500
>The tentacles inside her all start moving at once, coiling around my entire body.@
>All at once, they start to squirm and wriggle around with an intensity unlike before.\
>It's like I'm simple prey, being attacked and devoured by thousands of tentacles all around me.\
name "Luka"
>Ahhhh!@
>Help me! Hyaaa!\
name ""
>At the same time, many layers of tentacles all coil and wrap around my penis, torturing my most sensitive place the same time as the rest of my body.\
name "Luka"
>Stop!@>Aiieee!\
name ""
>Still wrapped around my penis, the mass of tentacles starts to stroke and pump my penis up and down, quickly.@
>The incredible increase in stimulation sends me into a mad agony of pleasure.\
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\ironmaiden_k_h6.bmp",0,0
gosub *syasei2
>Unable to endure the torture at all, I come in almost an instant.@
>Even during my ejaculation, the intense stimulation isn't slowed down for a moment.\
>Almost like a machine, the pleasure isn't let up for even a moment.@
>This Iron Maiden really is going to break me at this rate.\
name "Luka"
>Hyaaa!!@
>Stop, help me!\
name ""
>This torture device was designed to execute a man without mercy.@
>Begging her won't stop this hell of pleasure...\
>Stuck inside her, she will just squeeze out my semen until I die.@
>Wallowing in misery and despair, I start crying.\
name "Luka"
>Hyaaa!@
>Help!\
name ""
gosub *syasei1:gosub *syasei2
>I'm forced to another powerful height in seconds.@
>But just as before, the Iron Maiden doesn't slow down for even a moment.\
>No matter how much I come, this assault won't stop.@
>Until I'm executed, I won't escape from this hell of pleasure...\
gosub *syasei1:gosub *syasei2
name "Luka"
>Hyaaa!\
name ""
>Mobbed by the tentacles, I scream as semen and tears shoot out of my body.@
>Stuck inside the Iron Maiden's body, my semen is forcibly squeezed out one orgasm after another.\
gosub *syasei1:gosub *syasei2
name "Luka"
>Ahhg... Aiee!\
name ""
>My body spasms in the storm of pleasure.@
>I can't even think clearly any longer, my vision just blinking white as my reason is destroyed.\
gosub *syasei1:gosub *syasei2
name "Luka"
>Ah... Hyaa...\
name ""
>As my body rejoices, my mind is destroyed.@
>This pleasure hell is killing me...\
>I can't even think anymore...@
>I can't focus on anything but the overwhelming pleasure.\
gosub *syasei1:gosub *syasei2
name "Luka"
>Ahg... Urhg...\
name ""
>Suddenly, it feels like the part of my brain that processes pleasure snaps.@
>At the same time, I lost all control of my body, and my vision starts to go dark.\
>Even then, I can sense that my body is still ejaculating...@
>But fading into the darkness, it stops mattering...\
mov %hseanwave,0:hseanwave
gosub *anten
name $name
>Pleasure tolerance has been exceeded...@
>Criminal's death has been confirmed.\
name ""
>Another man was killed by the torture device.@
>His last moments were of pleasure so intense, it fried his brain...\
>..................\
goto *badend



*lusia_start

mov $name,"Lucia"
mov $name2,"Lucia"
mov $lavel,"lusia"
mov $tatie1,"lusia_st01"
mov $tatie2,"lusia_st02"
mov $tatie3,"lusia_st03"
mov $tatie4,"lusia_hb1"
mov $haikei,"bg075"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,20000
if %nanido=2 mov %max_enemylife,21000
if %nanido=3 mov %max_enemylife,22000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,20
if %nanido=3 mov %earth_keigen,10
mov %alice_skill,1
mov %alice_skill1,30
mov %alice_skill2,30
mov %alice_skill3,60
mov %music,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free from Lucia!"
mov $mogaku_anno2,"Luka broke away from Lucia!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"There's no use struggling... You'll be eaten anyway."
mov $mogaku_sel2,"Even if you struggle, you won't escape my preying worm."
mov $mogaku_sel3,"You would be better off giving up and being eaten in comfort."
mov $mogaku_sel4,"There's no escape. Just surrender to the pleasure."
mov $mogaku_sel5,"No man can escape struggling like that."
mov $mogaku_dassyutu1,"You escaped from my worm...?"
mov $mogaku_dassyutu2,"As expected, the Hero is quite good."
mov $mogaku_earth_dassyutu1,"What power..."
mov $mogaku_earth_dassyutu2,"As expected, the Hero is quite exceptional."
mov $half_s1,"How does my worm taste?"
mov $half_s2,"I'll squeeze your semen just like any other man."
mov $kiki_s1,"Haha... You seem to be nearing your limit."
mov $kiki_s2,"My worm will play with you, and bring you to a miserable finish."
mov %end_n,12
mov %exp_minus,350000
mov %zmonster_x,-300
mov %%owaza_count1a,8
mov %%owaza_count2a,8
mov %%owaza_count2b,8
mov %%owaza_count3a,8
name $name
>...Well then, perhaps I will cruelly squeeze you to death first.\
>I'll use the humiliating defeat of the Hero as the proof of my dominance over this village.\
name ""
>With a cold-blooded smile, Lucia slowly approaches me with her tentacles waving around her.\
name $name
>Well then...@> Do you want my tentacles to coil around you, tightening and squeezing out all of your semen?\
>Or perhaps you want to be swallowed whole, slowly digested?\
>With my body, I can do anything you desire...@
>If you have any requests, just make them.\
name ""
name "Luka"
>There's no choice...@
>I'll have to seal you right now!\
name ""
>I really want to persuade Lucia...@
>But if this drags on, then some of the villagers may die in their fighting.\
>I have to deal with Lucia as soon as possible to neutralize the other monsters!\
goto *common_main



*lusia_v

gosub *face3
name $name
>My magic power is still not enough...\
name ""
>Lucia loses the will to fight...\
mov %viclose,1:gosub *victory
mov %getexp,200000:gosub *lvup
mov %2382,1
goto *sean0348



*lusia_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>You wish to give me all of your semen?@
>How miserable... Giving everything up for pleasure.\
name ""
goto *lusia_a



*lusia_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *lusia_kousan
if %cmd1=16 goto *lusia_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *lusia_main



*lusia_a

if %kousoku=1 rnd2 %ransu,1,2
if %kousoku=1 && %ransu=1 gosub *lusia_a7:goto *common_main
if %kousoku=1 && %ransu=2 && %enemy_wind>0 gosub *lusia_a8:goto *common_main
if %kousoku=1 skip -3
rnd2 %ransu,1,10
if %ransu=1 gosub *lusia_a1:goto *common_main
if %ransu=2 gosub *lusia_a2:goto *common_main
if %ransu=3 gosub *lusia_a3:goto *common_main
if %ransu=4 && %owaza_count2a>9 && %status=0 && %enemy_wind=0 gosub *lusia_a4:goto *common_main
if %ransu=5 && %owaza_count2b>9 && %status=0 && %enemy_earth=0 gosub *lusia_a5:goto *common_main
if %ransu=6 && %owaza_count1a>9 gosub *lusia_a6:goto *common_main
if %ransu<9 && %owaza_count3a>9 && %enemy_wind=0 && %enemy_earth=0 gosub *lusia_el1:goto *common_main
if %ransu>8 && %owaza_count3a>9 && %enemy_wind=0 && %enemy_earth=0 && %status=0 gosub *lusia_el2:goto *common_main
skip -9



*lusia_el1

add %stack,1
mov %owaza_count3a,0
name $name
>Come, Zylphe!\
name ""
skillname "Wind Spirit Summon"
mov %enemy_wind,6
mov %kaihi_el,50
dwave 2,"se\wind2.ogg"
lsp2 0,":a;chara\zylphe_st02.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *enemy_elm_print
>Lucia summons a spirit of wind!\
skillname ""
sub %stack,1
return



*lusia_el2

add %stack,1
mov %owaza_count3a,0
name $name
>Come, Gnomaren!\
name ""
skillname "Summon Earth Spirit"
mov %enemy_earth,6
mov %damage_keigen_el,50
dwave 2,"se\earth1.ogg"
lsp2 0,":a;chara\gnomaren_st01.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *enemy_elm_print
>Lucia summons a spirit of earth!\
skillname ""
sub %stack,1
return



*lusia_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"These worms are designed to coil around your penis and force an ejaculation..."
if %ransu=2 mov $sel1,"How happy will you be when my tentacles coil around your penis...?"
if %ransu=3 mov $sel1,"These tentacles have forced many men to ejaculate..."
name $name
eng $sel1:$sel6\
name ""
skillname "Tentacle Worm"
dwave 1,"se\ero_makituki1.ogg"
>Lucia's tentacles coil around Luka's penis!
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,5
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3858
mov %earth_keigen_el,70
if %nanido<2 damage 320,340
if %nanido=2 damage 350,370
if %nanido=3 damage 380,400
if %enemy_wind=0 skip 13
dwave 1,"se\ero_makituki1.ogg"
>The tentacles around his penis slowly start to tighten!
mov %earth_keigen_el,70
if %nanido<2 damage 320,340
if %nanido=2 damage 350,370
if %nanido=3 damage 380,400
dwave 1,"se\ero_makituki1.ogg"
>The squeezing tentacles start to vibrate against Luka's penis, massaging him!
mov %earth_keigen_el,70
if %nanido<2 damage 320,340
if %nanido=2 damage 350,370
if %nanido=3 damage 380,400
skillname ""
if %mylife=0 sub %stack,1:return *lusia_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*lusia_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"This type of worm is designed to suck out semen..."
if %ransu=2 mov $sel1,"Now... Let this worm make your semen its nourishment."
if %ransu=3 mov $sel1,"Indeed... Just like all men, you wish to have your semen sucked out."
name $name
eng $sel1:$sel6\
name ""
skillname "Drain Worm"
dwave 1,"se\ero_chupa6.ogg"
>One of Lucia's tentacles latches onto Luka's penis, and starts to suck!
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,5
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3859
mov %earth_keigen_el,70
if %nanido<2 damage 330,350
if %nanido=2 damage 360,380
if %nanido=3 damage 390,410
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
if %enemy_wind=0 skip 17
dwave 1,"se\ero_chupa6.ogg"
>The tentacles mouth starts to crawl and squirm, stimulating his penis!
mov %earth_keigen_el,70
if %nanido<2 damage 330,350
if %nanido=2 damage 360,380
if %nanido=3 damage 390,410
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
dwave 1,"se\ero_chupa6.ogg"
>The tentacle sucks harder and harder on Luka's penis!
mov %earth_keigen_el,70
if %nanido<2 damage 330,350
if %nanido=2 damage 360,380
if %nanido=3 damage 390,410
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *lusia_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*lusia_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"A man's ass... It's surprisingly undefended, and so easy to suck out energy from."
if %ransu=2 mov $sel1,"Is it humiliating to be sucked on from here?"
if %ransu=3 mov $sel1,"Absorbing energy from the ass... An interesting idea, don't you think?"
name $name
eng $sel1:$sel6\
name ""
skillname "Anal Drain"
dwave 1,"se\ero_chupa6.ogg"
>Lucia's tentacles slip into Luka's ass, and start to suck his energy!
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,5
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3860
mov %earth_keigen_el,70
if %nanido<2 damage 340,360
if %nanido=2 damage 370,390
if %nanido=3 damage 400,420
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
if %enemy_wind=0 skip 17
dwave 1,"se\ero_chupa6.ogg"
>The tentacles press on his prostate, forcing a bizarre pleasure into Luka's body!
mov %earth_keigen_el,70
if %nanido<2 damage 340,360
if %nanido=2 damage 370,390
if %nanido=3 damage 400,420
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
dwave 1,"se\ero_chupa6.ogg"
>Energy is drained directly from Luka's ass!
mov %earth_keigen_el,70
if %nanido<2 damage 340,360
if %nanido=2 damage 370,390
if %nanido=3 damage 400,420
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *lusia_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*lusia_a4

add %stack,1
mov %owaza_count2a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Any man would be charmed by this sensation..."
if %ransu=2 mov $sel1,"This worm of ecstasy will suck on your penis..."
if %ransu=3 mov $sel1,"If this sucks on your penis, you'll go mad with ecstasy..."
name $name
eng $sel1:$sel6\
name ""
skillname "Ecstasy Worm"
dwave 1,"se\ero_syokusyu3.ogg"
>One of Lucia's tentacles latches onto Luka's penis. As it sucks, it starts to send him into a trance!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3861
if %nanido<2 damage 310,330
if %nanido=2 damage 340,360
if %nanido=3 damage 370,390
if %status=0 mov $sel1,"Luka has been immersed in ecstasy!"
if %status=1 mov $sel1,"Luka has been immersed in ecstasy..."
mov %status,1:gosub *status_print
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *lusia_h4
rnd2 %status_turn,1,2
if %nanido=2 rnd2 %status_turn,1,2
if %nanido=3 rnd2 %status_turn,2,3
sub %stack,1
return



*lusia_a5

add %stack,1
mov %owaza_count2b,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"The pleasure this worm gives paralyzes prey..."
if %ransu=2 mov $sel1,"Taste the electrifying pleasure..."
if %ransu=3 mov $sel1,"If you orgasm while numb, the pleasure is so powerful it will make you faint."
name $name
eng $sel1:$sel6\
name ""
skillname "Paralyzing Worm"
dwave 1,"se\ero_syokusyu3.ogg"
eng "One of Lucia's tentacles sucks Luka's penis into its mouth, its creases rubbing against his glans!":$sel6/
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
>The pleasure spreads through his body, sending sparks of electricity through him!
skillcount3 3862
mov %earth_keigen_el,70
if %nanido<2 damage 310,330
if %nanido=2 damage 340,360
if %nanido=3 damage 370,390
if %status=0 mov $sel1,"Luka has been paralyzed!"
if %status=2 mov $sel1,"Luka has been paralyzed..."
mov %status,2:gosub *status_print
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *lusia_h5
rnd2 %status_turn,1,2
if %nanido=2 rnd2 %status_turn,1,2
if %nanido=3 rnd2 %status_turn,2,3
sub %stack,1
return



*lusia_a6

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 8
name $name
>This tentacle is for devouring human flesh...@
if %first_sel1=1 skip 3
>Of course, it loves male semen as well.\
skip 2
>This time, you will become its prey.\
name ""
skillname "Boa Worm"
dwave 1,"se\ero_makituki3.ogg"
eng "Lucia's predation tentacle closes around Luka's body!":$sel6/
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,20
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
>Luka has been sucked into Lucia's predation mouth!
skillcount3 3863
mov %earth_keigen_el,70
if %nanido<2 damage 310,330
if %nanido=2 damage 340,360
if %nanido=3 damage 370,390
mov %kousoku,1:gosub *status_print
>Luka has been bound by Lucia's predation tentacle!\
skillname ""
if %mylife=0 sub %stack,1:return *lusia_h6
name $name
>Now I will swallow you whole...@
if %first_sel1=1 skip 3
>But before that, shall I squeeze out your semen...?\
skip 2
>This time you won't escape...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,2
if %earth=0 && %nanido=2 mov %genmogaku,2
if %earth=0 && %nanido=3 mov %genmogaku,3
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
if %enemy_earth>0 mov %genmogaku,99
sub %stack,1
return



*lusia_a7

add %stack,1
>Luka's body is being held inside Lucia's predation tentacle...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Come on, hurry up and come... Once you do, I'll quickly swallow you."
if %ransu=2 mov $sel1,"Does it feel good having it squirm all around you?"
if %ransu=3 mov $sel1,"Any man squeezed by me would be happy..."
name $name
eng $sel1:$sel6\
name ""
skillname "Boa Worm"
dwave 1,"se\ero_makituki3.ogg"
>Lucia's tentacle sucks on Luka's entire body!
skillcount3 3863
mov %earth_keigen_el,70
if %nanido<2 damage 310,330
if %nanido=2 damage 340,360
if %nanido=3 damage 370,390
if %enemy_wind=0 skip 13
dwave 1,"se\ero_makituki3.ogg"
>The predation tentacle chews on Luka's body!
mov %earth_keigen_el,70
if %nanido<2 damage 310,330
if %nanido=2 damage 340,360
if %nanido=3 damage 370,390
dwave 1,"se\ero_makituki3.ogg"
>The soft flesh inside the tentacle chews on Luka's penis!
mov %earth_keigen_el,70
if %nanido<2 damage 310,330
if %nanido=2 damage 340,360
if %nanido=3 damage 370,390
skillname ""
if %mylife=0 sub %stack,1:return *lusia_h6
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*lusia_a8

add %stack,1
mov %owaza_count3b,0
>Luka's body is being held inside Lucia's predation tentacle...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck you from hole to hole..."
if %ransu=2 mov $sel1,"I'll even suck on you like I would a girl..."
if %ransu=3 mov $sel1,"Hehe... I'll dry you up like this."
name $name
eng $sel1:$sel6\
name ""
skillname "Meltick Drain"
dwave 1,"se\ero_chupa6.ogg"
skillcount3 3864
>A tentacle slips into Luka's mouth, and sucks out his energy!
mov %earth_keigen_el,70
if %nanido<2 damage 310,330
if %nanido=2 damage 340,360
if %nanido=3 damage 370,390
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
dwave 1,"se\ero_chupa6.ogg"
>Tiny tentacles latch onto Luka's nipples, and suck!
mov %earth_keigen_el,70
if %nanido<2 damage 310,330
if %nanido=2 damage 340,360
if %nanido=3 damage 370,390
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
dwave 1,"se\ero_chupa6.ogg"
>A tentacle slips into Luka's ass, and starts to suck!
mov %earth_keigen_el,70
if %nanido<2 damage 310,330
if %nanido=2 damage 340,360
if %nanido=3 damage 370,390
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
dwave 1,"se\ero_chupa6.ogg"
>Another tentacle latches onto Luka's penis, and sucks!
mov %earth_keigen_el,70
if %nanido<2 damage 310,330
if %nanido=2 damage 340,360
if %nanido=3 damage 370,390
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *lusia_h7
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*lusia_onedari

mov $list1,"Tentacle Worm"
if %3858>0 mov %list_num1,1
mov $list2,"Drain Worm"
if %3859>0 mov %list_num2,1
mov $list3,"Anal Drain"
if %3860>0 mov %list_num3,1
mov $list4,"Ecstasy Worm"
if %3861>0 mov %list_num4,1
mov $list5,"Paralyzing Worm"
if %3862>0 mov %list_num5,1
mov $list6,"Boa Worm"
if %3863>0 mov %list_num6,1
mov $list7,"Meltick Drain"
if %3864>0 mov %list_num7,1
gosub *cmd_onedari
if %cmd1=11 goto *lusia_onedari1
if %cmd1=12 goto *lusia_onedari2
if %cmd1=13 goto *lusia_onedari3
if %cmd1=14 goto *lusia_onedari4
if %cmd1=15 goto *lusia_onedari5
if %cmd1=16 goto *lusia_onedari6
if %cmd1=17 goto *lusia_onedari7
if %cmd1=-1 goto *lusia_main
goto *lusia_onedari



*lusia_onedari1

gosub *onedari_syori
name $name
>You want my tentacles to coil around you penis, and force an ejaculation?\
>Then I will do as you desire... Drown in the pleasure of my tentacles.\
name ""
gosub *lusia_el1
gosub *lusia_a1
skip -1



*lusia_onedari2

gosub *onedari_syori
name $name
>You want my tentacle to suck your penis, and force an ejaculation?\
>Then I will do as you desire... Drown in the pleasure of my tentacles.\
name ""
gosub *lusia_el1
gosub *lusia_a2
skip -1



*lusia_onedari3

gosub *onedari_syori
name $name
>You want my tentacles to violate your ass, and force an ejaculation?\
>Then I will do as you desire... Drown in the pleasure of my tentacles.\
name ""
gosub *lusia_el1
gosub *lusia_a3
skip -1



*lusia_onedari4

gosub *onedari_syori
name $name
>You want to stick your penis into my worm, and drown in ecstasy?\
>Then I will do as you desire... Drown in the pleasure of my tentacles.\
name ""
gosub *lusia_a4
skip -1



*lusia_onedari5

gosub *onedari_syori
name $name
>You want to stick your penis into my worm, and be paralyzed in pleasure?\
>Then I will do as you desire... Drown in the pleasure of my tentacles.\
name ""
gosub *lusia_a5
skip -1



*lusia_onedari6

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want to be preyed on by my worm?@
>Then I'll swallow you nice and slowly...\
name ""
gosub *lusia_el1
if %kousoku=0 gosub *lusia_a6
gosub *lusia_a7
skip -1



*lusia_onedari7

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want my predatory tentacle to suck out your semen?@
>Then I'll suck you from hole to hole...\
name ""
gosub *lusia_el1
if %kousoku=0 gosub *lusia_a6
gosub *lusia_a8
skip -1



*lusia_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 697,":a;chara\lusia_bk07.bmp",0,0
gosub *syasei2
>As Lucia's tentacles coil around Luka's penis, he comes, covering them in semen.\
mov %viclose,1:gosub *lose
mov %2682,%2682+1:if %2682=1 mov %count_koenemy,%count_koenemy+1
if %2682>%count_most mov %count_most,%2682:mov $count_mostname,$name
count 10,4
mov $bad1,"Lucia forced Luka to come with her tentacles."
gosub *face2
name $name
>Haha... You couldn't endure my tentacles?@
>You are disgusting... Look at how much semen you shot everywhere.\
name ""
goto *lusia_h



*lusia_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 696,":a;chara\lusia_bk06.bmp",0,0
gosub *syasei2
>As Lucia's tentacle sucks on Luka's penis, he comes, filling it with semen.\
mov %viclose,1:gosub *lose
mov %2682,%2682+1:if %2682=1 mov %count_koenemy,%count_koenemy+1
if %2682>%count_most mov %count_most,%2682:mov $count_mostname,$name
count 10,4
mov $bad1,"Lucia forced Luka to come with her tentacles."
gosub *face2
name $name
>Haha... You couldn't endure my tentacles?@
>You are disgusting... Look at how much semen you shot everywhere.\
name ""
goto *lusia_h



*lusia_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\lusia_bk03.bmp",0,0
gosub *syasei2
>As Lucia's tentacle sucks out Luka's energy from his ass, he comes, covering her stomach in semen.\
mov %viclose,1:gosub *lose
mov %2682,%2682+1:if %2682=1 mov %count_koenemy,%count_koenemy+1
if %2682>%count_most mov %count_most,%2682:mov $count_mostname,$name
count 9,4
mov $bad1,"Lucia forced Luka to come with her tentacles."
gosub *face2
name $name
>Haha... You couldn't endure my tentacles?@
>You are disgusting... Look at how much semen you shot everywhere.\
name ""
goto *lusia_h



*lusia_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 696,":a;chara\lusia_bk06.bmp",0,0
gosub *syasei2
>As Lucia's tentacle sucks on Luka's penis and immerses him in ecstasy, he comes, filling it with semen.\
mov %viclose,1:gosub *lose
mov %2682,%2682+1:if %2682=1 mov %count_koenemy,%count_koenemy+1
if %2682>%count_most mov %count_most,%2682:mov $count_mostname,$name
count 10,4
mov $bad1,"Lucia forced Luka to come with her tentacles."
gosub *face2
name $name
>Haha... You couldn't endure my tentacles?@
>You are disgusting... Look at how much semen you shot everywhere.\
name ""
goto *lusia_h



*lusia_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 696,":a;chara\lusia_bk06.bmp",0,0
gosub *syasei2
>As Lucia's tentacle sucks on Luka's penis and paralyzes his body, he comes, filling it with semen.\
mov %viclose,1:gosub *lose
mov %2682,%2682+1:if %2682=1 mov %count_koenemy,%count_koenemy+1
if %2682>%count_most mov %count_most,%2682:mov $count_mostname,$name
count 10,4
mov $bad1,"Lucia forced Luka to come with her tentacles."
gosub *face2
name $name
>Haha... You couldn't endure my tentacles?@
>You are disgusting... Look at how much semen you shot everywhere.\
name ""
goto *lusia_h



*lusia_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\lusia_hb2.bmp",0,0
gosub *syasei2
>As Luka's entire body is sucked into Lucia's predation tentacle, Luka comes, spraying his semen all over.\
mov %viclose,1:gosub *lose2
mov %2682,%2682+1:if %2682=1 mov %count_koenemy,%count_koenemy+1
if %2682>%count_most mov %count_most,%2682:mov $count_mostname,$name
count 33,4
mov $bad1,"Lucia forced Luka to come with her tentacles."
gosub *face2
name "Luka"
>Ahhh...\
name ""
name $name
>Haha... Did my predation worm feel good?@
>I'll have you scatter much more semen out than that...\
goto *lusia_h8



*lusia_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\lusia_hb2.bmp",0,0
gosub *syasei2
>As the predatory tentacle overruns Luka's body, he comes, spraying his semen into the worm.\
mov %viclose,1:gosub *lose2
mov %2682,%2682+1:if %2682=1 mov %count_koenemy,%count_koenemy+1
if %2682>%count_most mov %count_most,%2682:mov $count_mostname,$name
count 10,4
mov $bad1,"Lucia forced Luka to come with her tentacles."
gosub *face2
name "Luka"
>Ahhh...\
name ""
name $name
>It's a special type of pleasure when your whole body is stimulated.@
>But to shoot off so much... Haha.\
goto *lusia_h8



*lusia_h8

>I'll have you give me all of your semen as I devour you.\
>Do your best to make my worm's stomach inflate with your semen.\
name ""
skillcount3 3863
skillname "Boa Worm"
dwave 1,"se\ero_makituki3.ogg"
lsp 700,":a;chara\lusia_hb3.bmp",0,0
>Lucia's predation tentacle swallows Luka's body whole!
mov %damage_kotei,1
damage 310,330
dwave 1,"se\ero_makituki3.ogg"
>The walls wriggle and squirm around his entire body as he's drug inside!
mov %damage_kotei,1
damage 310,330
skillname ""
name "Luka"
>Hyaaa!\
name ""
name $name
>The predation has begun...@
>If you don't come quickly, you'll be swallowed...\
name ""
skillcount3 3863
skillname "Boa Worm"
dwave 1,"se\ero_makituki3.ogg"
>The walls of the worm vibrate against Luka's body, massaging him!
mov %damage_kotei,1
damage 310,330
dwave 1,"se\ero_makituki3.ogg"
>Digestive juices spew out, covering Luka's body in the warm liquid!
mov %damage_kotei,1
damage 310,330
skillname ""
name "Luka"
>Hyaaa... D...Don't eat me!\
name ""
name $name
>If you don't want to be eaten, then offer up your semen instead of your flesh...\
>Hehe, shall I help you?\
name ""
skillcount3 3863
skillname "Boa Worm"
dwave 1,"se\ero_makituki3.ogg"
lsp 690,":a;chara\lusia_ct01.bmp",0,0:print 10,500
>The mucus inside the worm rubs against Luka's penis, stimulating him!
mov %damage_kotei,1
damage 310,330
dwave 1,"se\ero_makituki3.ogg"
>The vertical stroking forces sweet pleasure into Luka's body!
mov %damage_kotei,1
damage 310,330
skillname ""
name "Luka"
>Ahh... Ahh...\
name ""
gosub *syasei1
lsp 700,":a;chara\lusia_hb4.bmp",0,0
lsp 690,":a;chara\lusia_ct02.bmp",0,0
gosub *syasei2
>Not resisting at all, Luka gives into the orgasm, fearful of being swallowed whole instead.\
name $name
>Hehe... You lost to the feeling of being preyed on.@
>My worm is also happy at being able to taste your semen...\
>But I can't help you any longer.@
>From here on, you have to do your best to come on your own.\
name "Luka"
>Haaa...\
name ""
>Fearful of being swallowed, Luka starts to move!\
skillcount3 3863
skillname "Boa Worm"
dwave 1,"se\ero_makituki3.ogg"
>Luka moves his waist, rubbing his penis against the worm's walls!
mov %damage_kotei,1
damage 310,330
dwave 1,"se\ero_makituki3.ogg"
>The bumpy, uneven texture stimulates him!
mov %damage_kotei,1
damage 310,330
skillname ""
name "Luka"
>Ah... Ahh...\
name ""
name $name
>Hahaha... Do your best.@
>If you don't want to be swallowed and digested...\
name ""
skillcount3 3863
skillname "Boa Worm"
dwave 1,"se\ero_makituki3.ogg"
>Luka desperately presses his penis harder against the worm's soft flesh!
mov %damage_kotei,1
damage 310,330
dwave 1,"se\ero_makituki3.ogg"
>The wet sensation inside of the worm bring Luka close to another orgasm!
mov %damage_kotei,1
damage 310,330
skillname ""
name "Luka"
>Haa... Ah...ahh...\
name ""
name $name
>Haha, it feels good, doesn't it?@
>If you ejaculate, you'll prolong your life...\
name ""
skillcount3 3863
skillname "Boa Worm"
dwave 1,"se\ero_makituki3.ogg"
>Luka rubs his penis against the worm's walls, pleasuring himself!
mov %damage_kotei,1
damage 310,330
dwave 1,"se\ero_makituki3.ogg"
>The warm mucus rubs against his body, sending him over the edge!
mov %damage_kotei,1
damage 310,330
skillname ""
name "Luka"
>Ahhhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\lusia_ct03.bmp",0,0
gosub *syasei2
>Letting himself come as soon as he's able, Luka sighs in ecstasy as the worm greedily drinks his semen.\
csp 690
gosub *clear_sprite
gosub *setwindow_01p
name "Luka"
>Haaa...\
name ""
>But he can't move any longer...@
>After his repeated orgasms, Luka isn't able to move his waist any longer.\
name $name
>Hehehe... That's the end, then.@
>It was your destiny to be swallowed here.\
name ""
name "Luka"
>Ahhh!\
name ""
>The predation sensation that originally made him come starts to move again...@
>Only this time, it's to swallow his body whole.\
>The digestive juices it secreted are rubbed into his whole body, filling him with its warmth.\
name "Luka"
>Haaa... No...\
name ""
name $name
>Hehe... Goodbye.\
name ""
>Luka's body dissolves, his senses replaced by an overpowering bliss as more and more of his being fades away.\
name "Luka"
>Ah... Haaa...\
name ""
>Overcome by ecstasy, Luka is eaten and digested by Lucia.\
mov %battle,0
gosub *anten
>.............\
mov $bad2,"Luka was mercilessly preyed on."
goto *badend



*lusia_h

mov $bad2,"Luka's semen was continually squeezed until his death."
if %2682=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahhh...\
name ""
name $name
>You can't resist any longer, can you?@
>I'll squeeze out both your semen and your life now, then...\
name ""
csp 690
lsp 700,":a;chara\lusia_st04.bmp",0,0:print 10,500
>A strange, long tentacle extends from Lucia's mouth, dripping saliva.\
name $name
>This magical tongue can absorb the energy from men...@
>I'll force you to come over and over with this, and swallow up both your life and semen.\
name ""
name "Luka"
>S...Stop!\
name ""
>No matter how much I struggle, I can't break free of her tentacles.@
>As I pitifully resist, she just buries her head between my legs.\
mov %hseanvoice,1:hseanvoice
cspl 690,699
lsp 700,":a;chara\lusia_ha1.bmp",0,0:print 10,500
>The devilish tongue coils up my penis from the base, the slimy tip of her tentacle-like tongue brushing against my glans.\
name "Luka"
>Ahh...\
name ""
>Below my glans, her tongue is fully coiled around me...@
>Her tip runs back and forth across my glans.\
>Little suckers on her tongue latch onto me when she runs her tip over my glans, dripping slimy bits of saliva on me at the same time.\
>In a moment, I'm enraptured by the incredible tongue filling me with pleasure.\
name "Luka"
>Haaa...@
>T...That feels good...\
name ""
name $name
>My tongue is the best, isn't it?@
>No man has lasted more than a minute against it so far...\
>Everyone willingly offers up their semen to me.@>You will too, haha.\
name ""
>With a smile, Lucia continues using her tongue to play with my penis, gently squeezing it.@
>All the while, the tip of her tongue continues rubbing my glans, every so often pressing against my urethral opening itself.\
name "Luka"
>Ahhh...!\
name ""
name $name
>Haha, you've already got pre-come leaking out.@
>Then let me finish you off quickly...\
name ""
>At the same time her tongue squeezes my shaft, her tip rubs hard against my glans.@
>The sudden intensity is an instant killing blow, making my body spasm in pleasure as I go over the edge.\
name "Luka"
>Ahhh...\
name ""
gosub *syasei1
lsp 700,":a;chara\lusia_ha2.bmp",0,0
gosub *syasei2
>My penis pulses inside Lucia's tongue wrap, shooting out my semen onto her and mixing with her saliva.\
name "Luka"
>Ah... Ahh!\
name ""
>Her coiled tongue squeezes down in a wave, forcing out the last bits of semen still in my urethra.\
>At the same time, an intense weakness flows over my body, far more than I should feel after one ejaculation.\
name $name
>When this tongue makes you ejaculate, it takes more than fifty times the normal amount of energy.@
>For a normal human, three orgasms are enough to send them to the next world.\
>Even someone as powerful as you won't last more than ten times.@
>Hehe... How does it feel knowing my tongue will toy with you until your death?\
name ""
name "Luka"
>Hya... Stop...\
name ""
>Lucia's tongue extends even further, covering my glans itself this time.@
mov %hseanvoice,5:hseanvoice
lsp 700,":a;chara\lusia_ha3.bmp",0,0:print 10,500
>With that, my entire penis is inside her wrap...\
>From the root to the tip, my whole penis is firmly inside her tongue's grasp.@
>The odd pleasure makes my lower body writhe around.\
name $name
>I went easy on you for the first one...@
>But from here on out, I'm serious.\
>I'll squeeze out everything of yours, so get ready...@
>I won't stop until you're a dried out corpse.\
name ""
name "Luka"
>Ahhh!\
name ""
>Her tongue suddenly starts contracting in a wave, exactly like a milking motion.\
>At the same time, her tongue moves back and forth.@
>Covered in saliva, it feels like her whole tongue is scrubbing my sensitive penis clean.\
name "Luka"
>Stop...@
>Or I'm going to come again...\
name ""
name $name
>Don't you like this?@
>You'll get to experience intense pleasure all during the last moments of your life...\
name ""
>Lucia's tight tongue wrap moves up and down, pumping me.@
>Inside her wet wrap, it feels almost like I'm inside a vagina...\
name "Luka"
>Ah... Ahhh!\
name ""
name $name
>Come on, let it out.@
>It will feel like you're coming inside a pussy...\
name ""
name "Luka"
>N...No... Ah...\
name ""
>The up and down piston movements get even more intense.@
>Overcome by the stimulation, I can't help but feel like she really is raping me with her vagina itself.\
name "Luka"
>I...I'm coming... Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\lusia_ha4.bmp",0,0
gosub *syasei2
>With that, I'm led to another tragic ejaculation.@
>My penis pulses inside her slimy vagina-like tongue.\
name $name
>Hahaha... So you finished?@
>Did it feel good coming inside of my tongue like that?\
>Well, it's not like I expected anything else from a miserable man like you.\
name ""
name "Luka"
>Ahhh...\
name ""
>It felt exactly like I was having sex with her tongue...@
>The humiliation from having my male instinct toyed with makes my face go bright red.\
>But even more horrifying, the intense weakness from after my ejaculation...@
>I can barely even move my hands and feet any longer.\
name $name
>Now then, let's continue.@
>If you were a normal person, the next ejaculation would kill you...\
>But you can still go a lot more, can't you?@
>Come now, and devote your everything to me...\
name ""
>Her tongue coil suddenly shrinks down even more, forcing out another quick orgasm!\
name "Luka"
>Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\lusia_ha5.bmp",0,0
gosub *syasei2
name $name
>One ejaculation after another...@
>Each time you do that, your life itself is ticking down you know?\
name ""
>As my penis pulses and shoots out semen, her tongue rubs my glans.\
>Not just that, the rest of her tongue is rubbing and stroking my shaft too.@
>The winding, wet tongue forces me to orgasm after orgasm, with no rest in between.\
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1:gosub *syasei2
name $name
>That's incredible! You're still alive.@
>But that vitality of yours will only last so long...\
>Is that shaking of your body happiness at being able to prolong this pleasure?@
>Since I'm not a man, I can't quite understand what goes through your mind...\
name ""
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1:gosub *syasei2
>Coming one time after another, my energy is quickly drained.@
>Unable to even move any longer, I can feel my consciousness fading at the same time.\
>At this rate, everything really will be squeezed out of me...@
>The horrifying thoughts paralyze me in fear.\
name "Luka"
>Ah...a...\
name ""
gosub *syasei1:gosub *syasei2
name $name
>You must be at your limit now.@
>How does it feel, so close to your end?\
name ""
name "Luka"
>A...uh...\
name ""
gosub *syasei1:gosub *syasei2
>My glans twitches, leaking out more semen.@
>It's my life itself, slowly trickling away...\
name $name
>Oh my, how pitiful.@
>Now to end you...\
>Please die now.\
name ""
>Her sweet tongue squeezes me one final time.\
name "Luka"
>A...a...\
name ""
gosub *syasei1:gosub *syasei2
>The last bit of life leaks out of me into her coiled tongue.@
>At the same time, my eyes close as my soul itself is pulled out.\
name "Luka"
>.........\
name $name
>Hehe, thanks for the meal.@
>Your life tasted delicious.\
name ""
>Lucia wipes her mouth with the back of her hand, looking down at the dried up corpse at her feet.\
mov %hseanvoice,0:hseanvoice
gosub *anten
>............\
goto *badend



*silkiel_start

mov $name,"Virtue Silkiel"
mov $name2,"Silkiel"
mov $lavel,"silkiel"
mov $tatie1,"silkiel_st01"
mov $tatie2,"silkiel_st02"
mov $tatie3,"silkiel_st03"
mov $tatie4,"silkiel_st21"
mov $haikei,"bg076"
mov %monster_x,90
mov %monster_y,0
if %nanido=1 mov %max_enemylife,20000
if %nanido=2 mov %max_enemylife,23000
if %nanido=3 mov %max_enemylife,26000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,20
if %nanido=3 mov %earth_keigen,10
mov %alice_skill,1
mov %alice_skill1,0
mov %alice_skill2,0
mov %alice_skill3,0
mov %music,9
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free from Silkiel's bind!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"You think you can escape from my wings...?"
mov $mogaku_sel2,"Even if you struggle, I won't let go..."
mov $mogaku_sel3,"How rude... Trying to break free of an angel's wings?"
mov $mogaku_sel4,"Humans are so violent..."
mov $mogaku_sel5,"I'll have to dispel that rebellious attitude in my cocoon..."
mov $mogaku_dassyutu1,"What power..."
mov $mogaku_dassyutu2,""
mov $mogaku_earth_dassyutu1,"This is the power of the spirits..."
mov $mogaku_earth_dassyutu2,"Not even the power of an angel is enough."
mov $half_s1,"There's no point resisting."
mov $half_s2,"Once you're wrapped up in my cocoon, you'll meet a pleasurable end."
mov $kiki_s1,"Come, I'll purify you."
mov $kiki_s2,"Ascend to Heaven as you're covered in my sticky threads..."
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-200
mov %tukix,300
mov %owaza_count1a,6
mov %owaza_count3a,6
mov $name,"Silkiel"
name $name
>Hehe...@>I am Virtue Silkiel, the angel in charge of the threads of life.\
>It's my role to wrap those who have passed on through this life in my cocoon, and offer up their soul to the Heavens.\
>I do not normally do it to flesh and blood humans like you, but...@
>Ilias specially ordered me to handle your life.\
name ""
name "Luka"
>Sorry, but I'm not dead.@
>I won't be wrapped up in your cocoon or whatever and sent to Heaven!\
name ""
>I draw my blade in front of the strange angel.\
name $name
>Hehe, this will be the first time I'll send a human's soul to Heaven as his body still lives...\
>Either way, it will feel absolutely amazing...\
>Your semen will slowly be squeezed from you by the sticky threads as you writhe in agony inside my cocoon...\
name ""
>A sick smile crosses her face as she describes her cocoon...\
>It seems this angel in charge of the souls of the dead has quite the cruel nature to her...\
name ""
goto *common_main



*silkiel_v

gosub *face3
name $name
>How could I...@> To a ground dweller...!?\
name ""
dwave 1,"se\bun.ogg"
csp 700:print 99,1000,"system\breakup.dll/lrB"
>Virtue Silkiel fades away into particles, then vanishes!\
mov $name,"Virtue Silkiel"
mov %viclose,1:gosub *victory
mov %getexp,240000:gosub *lvup
mov %2383,1
goto *sean0350



*silkiel_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>You will behave and ascend in my cocoon?@
>That's no fun... Resist a little more.\
name ""
goto *silkiel_a



*silkiel_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *silkiel_kousan
if %cmd1=16 goto *silkiel_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *silkiel_main



*silkiel_a

if %kousoku=1 gosub *silkiel_a4:goto *common_main
if %counter>0 add %counter,1
if %counter>3 gosub *silkiel_x2:goto *common_main
if %counter>0 gosub *silkiel_a7:goto *common_main
if %kousan=1 skip 3
mov %hanyo2,%hanyo2+1
if %hanyo2>3 gosub *silkiel_x1:goto *common_main
rnd2 %ransu,1,4
if %ransu=1 gosub *silkiel_a1:goto *common_main
if %ransu=2 gosub *silkiel_a2:goto *common_main
if %ransu=3 && %owaza_count1a>7 gosub *silkiel_a3:goto *common_main
if %ransu=4 && %owaza_count3a>7 gosub *silkiel_a5:goto *common_main
skip -5



*silkiel_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Why not try releasing in my mouth? It will feel heavenly..."
if %ransu=2 mov $sel1,"I don't deal with genitals in my mouth much, but..."
if %ransu=3 mov $sel1,"Please spray out your dirty juice in my mouth."
name $name
eng $sel1:$sel6\
name ""
skillname "Flowing Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>Silkiel puts Luka's penis into her mouth, and starts to suck hard!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3865
if %nanido<2 damage 350,380
if %nanido=2 damage 380,410
if %nanido=3 damage 410,440
skillname ""
if %mylife=0 sub %stack,1:return *silkiel_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*silkiel_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Haha... Putting you between these and squeezing could be amusing, too."
if %ransu=2 mov $sel1,"Come on... Try coming while being wrapped up in my breasts."
if %ransu=3 mov $sel1,"Finish between my breasts."
name $name
eng $sel1:$sel6\
name ""
skillname "Flowing Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>Silkiel sandwiches Luka's penis between her breasts, and slowly starts to squeeze it!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3866
if %nanido<2 damage 360,390
if %nanido=2 damage 390,420
if %nanido=3 damage 420,450
skillname ""
if %mylife=0 sub %stack,1:return *silkiel_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*silkiel_a3

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 5
name $name
>I'll embrace you with these soft feathers.@
>Please finish inside my embrace...\
name ""
skillname "Feather Hold"
eng "Silkiel's feathers wrap around Luka's body!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
mov $tatie4,"silkiel_st31"
mov %kousoku,1:gosub *status_print
>Luka has been bound by Silkiel's feathers!\
skillname ""
name $name
>My feathers feel nice and soft, don't they?@
>I'll let your genitals get a good taste of their softness...\
name ""
if %earth=0 && %nanido<2 mov %genmogaku,2
if %earth=0 && %nanido=2 mov %genmogaku,2
if %earth=0 && %nanido=3 mov %genmogaku,3
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
sub %stack,1
return



*silkiel_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"These soft feathers will show love to your body..."
if %ransu=2 mov $sel1,"My holy wings will cleanse your dirty body..."
if %ransu=3 mov $sel1,"Come now, taste my wings..."
name $name
eng $sel1:$sel6\
name ""
skillname "Feather Feel"
dwave 1,"se\umaru.ogg"
lsp 700,":a;chara\silkiel_st32.bmp",90,0:print 10,500
>Silkiel's feathers tickle Luka's body!
>His penis is stroked at the same time!
skillcount3 3867
if %nanido<2 damage 310,340
if %nanido=2 damage 340,370
if %nanido=3 damage 370,400
skillname ""
if %mylife=0 sub %stack,1:return *silkiel_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*silkiel_a5

add %stack,1
mov %owaza_count3a,0
if %kousan=2 skip 6
name $name
>I'll also cleanse your genitals.\
>This organ is usually used for ejecting string to make my cocoons, but...@
>Just for you, I'll let you insert your penis into it.\
name ""
skillname "Silk-Spinning Intercourse"
lsp 700,":a;chara\silkiel_st31.bmp",90,0:print 10,500
eng "Silkiel uses her feathers to grab hold of Luka's body!":$sel6/
if %daten>0 gosub *face1:goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *face1:gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *face1:gosub *wind_guard:sub %stack,1:return
\
dwave 1,"se\ero_pyu1.ogg"
lsp 700,":a;chara\silkiel_st34.bmp",90,0:print 10,500
>Embracing Luka tightly, Silkiel forces his penis into her silk-spinning organ!
skillcount3 3868
mov %damage_kotei,1
damage 400,500
mov $tatie4,"silkiel_st34"
mov %kousoku,1:gosub *status_print
>Luka is being raped by Silkiel!\
skillname ""
if %mylife=0 sub %stack,1:return *silkiel_h4
name "Luka"
>Ahhhh!!\
name ""
>As soon as Luka is forced into Silkiel, the warm, sticky sensation of her organ fills his body.\
sub %stack,1
goto *silkiel_a6



*silkiel_a6

add %stack,1
>Luka is being raped by Silkiel...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"How does this organ feel? Releasing now would be very sinful...":mov $sel2,"Silkiel's organ contracts around Luka's penis!"
if %ransu=2 mov $sel1,"Be happy, for you get to taste these holy threads directly...":mov $sel2,"The sticky silk inside her rubs against Luka's penis!"
if %ransu=3 mov $sel1,"Here... The sticky silk will wrap around your penis.":mov $sel2,"The sticky silk latches onto Luka's penis inside her, stimulating him!"
if %ransu=4 mov $sel1,"Ejaculate inside me, and be cleansed of some of your dirt...":mov $sel2,"Silkiel's silk-spinning organ tightens around Luka's penis!"
if %ransu=5 mov $sel1,"It's very sticky inside me... Doesn't it feel good?":mov $sel2,"The sticky sensation of her silk attacks Luka's penis from every direction!"
name $name
eng $sel1:$sel6\
name ""
skillname "Silk-Spinning Intercourse"
dwave 1,"se\ero_name2.ogg"
eng $sel2:$sel6
skillcount3 3868
mov %damage_kotei,1
damage 400,500
skillname ""
if %mylife=0 sub %stack,1:return *silkiel_h5
sub %stack,1
goto *silkiel_a6



*silkiel_x1

add %stack,1
if %kousan=2 skip 5
name $name
>I'll give you a taste of my highest quality silk...@
>Reach your climax in the embrace of my silk.\
name ""
skillname "Silk Jet Preparation"
mov $tatie1,"silkiel_st11"
mov $tatie2,"silkiel_st12"
mov $tatie3,"silkiel_st13"
mov $tatie4,"silkiel_st21"
gosub *face1
>Silkiel's lower body starts to mysteriously pulse!\
skillname ""
mov %counter,1
sub %stack,1
return



*silkiel_a7

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Haha... Finish as my sticky thread coils around you..."
if %ransu=2 mov $sel1,"I'll cover you in lots of sticky threads..."
if %ransu=3 mov $sel1,"I'll cleanse your dirty body with my sticky silk..."
name $name
eng $sel1:$sel6\
name ""
skillname "Silky Tide"
dwave 1,"se\ero_ito.ogg"
eng "Silkiel sprays sticky silk threads from her lower body!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
>The sticky silk sprays all over Luka's body, bringing a strange sense of ecstasy everywhere they touch!
skillcount3 3869
if %nanido<2 damage 300,330
if %nanido=2 damage 330,360
if %nanido=3 damage 360,390
skillname ""
if %mylife=0 sub %stack,1:return *silkiel_h6
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*silkiel_x2

add %stack,1
if %kousan=2 skip 4
name $name
>I was going to do you a favor in letting you feel that...\
name ""
mov $tatie1,"silkiel_st01"
mov $tatie2,"silkiel_st02"
mov $tatie3,"silkiel_st03"
mov $tatie4,"silkiel_st21"
gosub *face1
>Silkiel's lower body returns to its normal state!\
mov %counter,0
mov %hanyo2,0
sub %stack,1
return



*silkiel_counter

add %stack,1
mov %counter,0
if %kousan=2 skip 5
gosub *face2
name $name
>Hehe... Caught you.\
name ""
skillname "Silky Rose Heaven"
>Silkiel's wings wrap around Luka's body!@
mov $tatie4,"silkiel_st21"
mov %kousoku,2:gosub *status_print
>Luka has been bound by Silkiel's feathers!\
skillname ""
name $name
>Your dirtiest place...@
>I'll completely cleanse it with my sticky silk.\
name ""
sub %stack,1
goto *silkiel_a8



*silkiel_a8

add %stack,1
>Luka has been bound by Silkiel...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll pour my silk on you, and cleanse that dirtiness...":mov $sel2,"The strange touch of Silkiel's sticky silk attacks Luka!"
if %ransu=2 mov $sel1,"Climax as your penis bathes in my silk...":mov $sel2,"The sticky silk covers Luka's groin!"
if %ransu=3 mov $sel1,"What's wrong? Are you going to ejaculate will being bathed in my silk?":mov $sel2,"Sweet pleasure is forced into Luka everywhere the silk touches!"
if %ransu=4 mov $sel1,"Haha... What kind of feeling is it, having your genitals humiliated like this?":mov $sel2,"The sticky silk covers every inch of Luka's penis!"
if %ransu=5 mov $sel1,"The sensation of my silk will leave you bereft of control... Haha.":mov $sel2,"The sticky silk around Luka's penis tightens!"
name $name
eng $sel1:$sel6\
name ""
skillname "Silky Rose Heaven"
dwave 1,"se\ero_ito.ogg"
lsp 700,":a;chara\silkiel_st22.bmp",90,0:print 10,500
>Silkiel pours more sticky silk on Luka's penis!\
eng $sel2:$sel6
skillcount3 3870
mov %damage_kotei,1
damage 500,600
skillname ""
if %mylife=0 sub %stack,1:return *silkiel_h7
sub %stack,1
goto *silkiel_a8



*silkiel_onedari

mov $list1,"Flowing Blowjob"
if %3865>0 mov %list_num1,1
mov $list2,"Flowing Tit Fuck"
if %3866>0 mov %list_num2,1
mov $list3,"Feather Feel"
if %3867>0 mov %list_num3,1
mov $list4,"Silk-Spinning Intercourse"
if %3868>0 mov %list_num4,1
mov $list5,"Silky Tide"
if %3869>0 mov %list_num5,1
mov $list6,"Silky Rose Heaven"
if %3870>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *silkiel_onedari1
if %cmd1=12 goto *silkiel_onedari2
if %cmd1=13 goto *silkiel_onedari3
if %cmd1=14 goto *silkiel_onedari4
if %cmd1=15 goto *silkiel_onedari5
if %cmd1=16 goto *silkiel_onedari6
if %cmd1=-1 goto *silkiel_main
goto *silkiel_onedari



*silkiel_onedari1

gosub *onedari_syori
name $name
>Ahaha... You want to come inside my mouth?@
>To actually be able to come inside an angel's mouth... A true luxury, isn't it?\
name ""
if %counter>0 gosub *silkiel_x2
gosub *silkiel_a1
skip -1



*silkiel_onedari2

gosub *onedari_syori
name $name
>Ahaha... You want to come on my breasts?@
>To actually be able to come on an angel's breasts... A true luxury, isn't it?\
name ""
if %counter>0 gosub *silkiel_x2
gosub *silkiel_a2
skip -1



*silkiel_onedari3

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>Ahaha... You want to come on my wings?@
>To actually be able to come on an angel's wings... A true luxury, isn't it?\
name ""
if %counter>0 gosub *silkiel_x2
if %kousoku=0 gosub *silkiel_a3
gosub *silkiel_a4
skip -1



*silkiel_onedari4

gosub *onedari_syori
name $name
>Ahaha... You want to stick your penis into my silk-spinning organ?@
>To want to stick it in there... You're a real pervert.\
name ""
if %counter>0 gosub *silkiel_x2
gosub *silkiel_a5



*silkiel_onedari5

if %counter=0 gosub *onedari_syori
if %counter>0 gosub *onedari_syori_k
name $name
>You want to come while being bathed in my sticky silk?@
>Good... Then I'll cover you.\
name ""
if %counter=0 gosub *silkiel_x1
gosub *silkiel_a7
skip -1



*silkiel_onedari6

if %counter=0 gosub *onedari_syori
if %counter>0 gosub *onedari_syori_k
name $name
>You want my sticky silk all over your penis?@
>To actually want to come like that... You're a real pervert.\
name ""
if %counter=0 gosub *silkiel_x1
gosub *silkiel_counter



*silkiel_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\silkiel_bk01.bmp",90,0
gosub *syasei2
>As Silkiel sucks on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2683,%2683+1:if %2683=1 mov %count_koenemy,%count_koenemy+1
if %2683>%count_most mov %count_most,%2683:mov $count_mostname,$name
count 4,6
mov $bad1,"Silkiel forced Luka to come with her mouth."
gosub *face2
name $name
>Ahaha... Already leaking out?@
>Even though you're a sinner, you dared to eject your semen onto an angel...\
name ""
goto *silkiel_h



*silkiel_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\silkiel_bk02.bmp",90,0
gosub *syasei2
>As Silkiel's soft breasts press against Luka's penis, he comes, covering her chest in semen.\
mov %viclose,1:gosub *lose
mov %2683,%2683+1:if %2683=1 mov %count_koenemy,%count_koenemy+1
if %2683>%count_most mov %count_most,%2683:mov $count_mostname,$name
count 7,6
mov $bad1,"Silkiel used her breasts to force Luka to come."
gosub *face2
name $name
>Ahaha... Already leaking out?@
>Even though you're a sinner, you dared to eject your semen onto an angel...\
name ""
goto *silkiel_h



*silkiel_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\silkiel_st33.bmp",90,0
gosub *syasei2
>As Silkiel's soft feathers play with Luka's penis, he comes, covering her wings in semen.\
mov %viclose,1:gosub *lose
mov %2683,%2683+1:if %2683=1 mov %count_koenemy,%count_koenemy+1
if %2683>%count_most mov %count_most,%2683:mov $count_mostname,$name
count 13,6
mov $bad1,"Silkiel used her feathers to force Luka to come."
gosub *face2
name $name
>Ahaha... Already leaking out?@
>Even though you're a sinner, you dared to eject your semen onto an angel...\
name ""
goto *silkiel_h



*silkiel_h4

mov %ikigoe,3:gosub *ikigoe
name $name
>Already?@> Human males are so pitiful...\
name ""
gosub *syasei1
lsp 700,":a;chara\silkiel_st35.bmp",90,0
gosub *syasei2
>As soon as Luka is forced into Silkiel's organ, he comes, filling up her sticky hole with semen.\
mov %viclose,1:gosub *lose
mov %2683,%2683+1:if %2683=1 mov %count_koenemy,%count_koenemy+1
if %2683>%count_most mov %count_most,%2683:mov $count_mostname,$name
count 2,6
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come the moment of insertion into Silkiel's organ."
lsp 700,":a;chara\silkiel_st36.bmp",90,0:print 10,500
name $name
>Did it feel good to mate with a silk-spinning organ?@
>Human males really are the most pitiful creature of all...\
name ""
goto *silkiel_h



*silkiel_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\silkiel_st35.bmp",90,0
gosub *syasei2
>As Silkiel's sticky organ squeezes down on Luka's penis, he comes, filling her sticky hole with semen.\
mov %viclose,1:gosub *lose
mov %2683,%2683+1:if %2683=1 mov %count_koenemy,%count_koenemy+1
if %2683>%count_most mov %count_most,%2683:mov $count_mostname,$name
count 2,6
mov $bad1,"Silkiel forced Luka to come by raping him with her silk-spinning organ."
lsp 700,":a;chara\silkiel_st36.bmp",90,0:print 10,500
name $name
>Did it feel good to mate with a silk-spinning organ?@
>Human males really are the most pitiful creature of all...\
name ""
goto *silkiel_h



*silkiel_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>As Silkiel's sticky silk covers Luka's body, he comes, unable to take the sweet sensation of her threads.\
mov %viclose,1:gosub *lose
mov %2683,%2683+1:if %2683=1 mov %count_koenemy,%count_koenemy+1
if %2683>%count_most mov %count_most,%2683:mov $count_mostname,$name
count 20,6
mov $bad1,"Silkiel used her sticky silk to force Luka to come."
gosub *face2
name $name
>Males ejaculate when I pour my sticky silk on them when they are still alive...@
>Did it feel that good? Haha.\
name ""
goto *silkiel_h



*silkiel_h7

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\silkiel_st23.bmp",90,0:print 10,500
gosub *syasei2
>As Silkiel's sticky silk covers every inch of Luka's penis, he comes, unable to take the sweet sensation of her threads.\
mov %viclose,1:gosub *lose
mov %2683,%2683+1:if %2683=1 mov %count_koenemy,%count_koenemy+1
if %2683>%count_most mov %count_most,%2683:mov $count_mostname,$name
count 20,6
mov $bad1,"Silkiel used her sticky silk to force Luka to come."
gosub *face2
name $name
>Ahaha... Did it feel good having silk shot at your penis?@
>To actually ejaculate from that... How miserable.\
name ""
goto *silkiel_h



*silkiel_h

mov $bad2,"Wrapped in Silkiel's cocoon, Luka met his death due to overwhelming pleasure."
if %2683=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku=2 mov %hseanwave,11:hseanwave:goto *silkiel_hb
name "Luka"
>Ahhh...\
name ""
name $name
>Then I'll make you into a cocoon.@
>I'll wind my silky threads around you while you still live...\
>To make a real flesh and blood human into a cocoon...@
>Hehe how will you react?@> I'm really looking forward to seeing...\
name ""
cspl 690,699
lsp 700,":a;chara\silkiel_st21.bmp",90,0:print 10,500
>Silkiel pins me to the ground with her wings, and orients the opening to her silk-spinning organ at my body.\
name "Luka"
>S...Stop...\
name ""
name $name
>I think I'll play with you a little before I make you into a cocoon...@
>In the most wretched way possible for a male.\
name ""
>Pointing her twitching hole at my groin...@
dwave 1,"se\ero_ito.ogg"
mov %hseanwave,11:hseanwave
lsp 700,":a;chara\silkiel_st22.bmp",90,0:print 10,500
>She sprays sticky threads all over it!\
name "Luka"
>Ahhhh!!\
name ""
>The sticky threads pour all over my groin, sticking and clinging to my penis.\
name $name
>Ahaha... How do you like my penis sniping?@
>Isn't my sticky silk great?\
name ""
goto *silkiel_hb



*silkiel_hb

name "Luka"
>Ah...\
name ""
>The gooey, soft sensation of the silk on my penis attacks me all at once.@
>Wrapped around my penis, it almost tickles me as she sprays more and more on me.\
name "Luka"
>Ahh... No...!@
>Stop this, stop!\
name ""
>I twist my body and struggle, but I can't escape.@
>All the while, Silkiel continues spraying the sticky silk at me, laughing.\
>Layer after layer of gooey silk covers my penis.@
>My erect penis is covered in moments, my head going white from the strange pleasure being forced into me from it.\
name "Luka"
>Haaa...@>No... I'm going to come!\
name ""
>The sudden rise of my climax makes me jump in response.@
>My penis pulses under her shower of silk as I go over the edge.\
name "Luka"
>Ahhh...\
name ""
gosub *syasei1
lsp 700,":a;chara\silkiel_st23.bmp",90,0
gosub *syasei2
>Silkiel laughs down at me as I come all over the silk being sprayed on my penis.\
name $name
>Ahahahaha... Why are you coming!?@
>Did it feel that good just having your penis turned into a cocoon!?\
>You're pathetic!@
>Now it's time for your whole body...@> What are you going to do this time?\
name ""
name "Luka"
>Stop... Stop...@
>Ahhh!\
name ""
lsp 700,":a;chara\silkiel_st24.bmp",90,0:print 10,500
>Even more silk is shot out of her organ, this time covering the rest of my body.@
>The pleasure I only felt in my penis quickly extends to the rest of my body.\
>The mix of disgust from the sticky texture and the pleasure from the unnatural silk tear my senses apart.\
name "Luka"
>Ah... Haaa...\
name ""
name $name
>Haha... It feels good, doesn't it?@
>You want to relax and turn into a cocoon, having your life energy absorbed, don't you?\
>It would be horrible to just be on the edge of an orgasm inside the cocoon, right?@
>You better struggle some more, or you'll just die in an instant!\
name ""
name "Luka"
>Stop... Help me...\
name ""
>I feebly struggle against her wings, pinning down my limbs.@
>But after a few more seconds of being covered in silk, I slowly lose my ability to even do that.\
>As more of the silk covers me, the ecstasy from its touch takes over more of my body.\
name "Luka"
>Stop... Ahh...\
name ""
>As my body shakes in surrender to the sensations...@
gosub *syasei1:gosub *syasei2
>My penis twitches as I ejaculate.\
>Playing with me, Silkiel sprays more silk on my penis even as I ejaculate.\
>My penis is covered by layer after layer of sticky thread, each one increasing the intensity of pleasure racing through me.\
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1:gosub *syasei2
>I scream and moan uncontrollably as I come.@
>Looking down at me, Silkiel just laughs.\
name $name
>Come on, I want to hear more of that miserable voice.@
>Go insane as you die in the cocoon.\
>This is your reward for going against Ilias!\
name ""
name "Luka"
>Hyaaa!\
name ""
lsp 700,":a;chara\silkiel_st25.bmp",90,0:print 10,500
>Even more sticky silk covers my body.@
>Even if I had my strength back, there's no way I could break free from this much.\
>As my body melts in ecstasy from its touch, it feels like I could dissolve away.\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>My penis pulses again, releasing more semen even as it's wrapped up.@
>Even as I risk dying, my body is still climaxing and ejaculating...\
name $name
>Is that... That thing?@
>When in a crisis for your life, your body desires to leave offspring?\
>Wrapped in a cocoon, are you trying to leave behind children?@
>Well too bad... Even your little sperm will die in the cocoon.\
name ""
mov %hseanwave,12:hseanwave
lsp 700,":a;chara\silkiel_st26.bmp",90,0:print 10,500
>Giggling, Silkiel sprays even more silk on me.@
>With so many layers over my body, I really am in a cocoon now...\
>But even still, she continues toying with me...@
>Trapped inside this cocoon, there's no escape from the hell of pleasure.\
>A powerful weakness comes over me...@
>Inside this cocoon, I feel my life itself slowly being leeched out of me.\
name "Luka"
>Haaa... H...Help...\
name ""
name $name
>Oh dear, you can speak?@
>But you're no more than a lowly caterpillar now.\
>Here, I'll give your penis some extra service...@
>This is what you wanted in the end anyway, isn't it?\
name ""
>With a scornful look, Silkiel continues spraying more silk on me.\
name "Luka"
>Ha... Ahh...\
name ""
gosub *syasei1:gosub *syasei2
>My penis pulses, letting off semen to outside the cocoon.@
>At the same time, the rest of my body is encased in the silk.\
lsp 700,":a;chara\silkiel_st27.bmp",90,0:print 10,500
name "Luka"
>ahh...\
name ""
>The cocoon to send restless souls to the afterlife is finally completed.@
>But I'm still alive inside of it...\
name $name
>Ahaha, you're a living cocoon.@
>Your vitality is going to be leeched out now...\
>Then meet your end as you writhe in pleasure!\
name ""
name "Luka"
>Ahhhh!\
name ""
>More and more of my energy is leeched out into the cocoon...@
>My body jumps and spasms as I'm brought to another height.\
gosub *syasei1:gosub *syasei2
name "Luka"
>Ahh...\
name ""
>Surrendering myself to the pleasure, I let the ejaculation come without resistance.\
name $name
>You're still ejaculating?@
>Even though you're about to die, you're still doing that...@>Males really are the worst.\
>Hurry up and die.\
name ""
name "Luka"
>Ah...aa...\
name ""
>My body spasms in pleasure as my life fades inside the cocoon.@
>My semen and energy both are easily squeezed out...\
name "Luka"
>Ah...a...\
name ""
>Going mad from the pleasure, at last I faint away inside the cocoon meant to send the dead to rest.\
name $name
>Aha, he finally died.@
>Well then, now the cocoon can perform its original function...\
>It will suck up the dregs of his life and dispose of it.@
>His soul won't even be able to reincarnate in another life...\
name ""
>Overlooking the corpse inside her cocoon, Silkiel laughs.\
mov %hseanwave,0:hseanwave
gosub *anten
>.................\
goto *badend



*endiel_start

mov $name,"Dominion Endiel"
mov $name2,"Endiel"
mov $lavel,"endiel"
mov $tatie1,"endiel_st01"
mov $tatie2,"endiel_st02"
mov $tatie3,"endiel_st03"
mov $tatie4,"endiel_st02"
mov $haikei,"bg076"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,21000
if %nanido=2 mov %max_enemylife,24000
if %nanido=3 mov %max_enemylife,27000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,1
mov %alice_skill1,0
mov %alice_skill2,0
mov %alice_skill3,0
mov %music,9
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free of Endiel's restraint!"
mov $mogaku_anno2,"Luka broke away from Endiel!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"I'll take you inside this tent, and cross with you..."
mov $mogaku_sel2,"I'll take you inside this tent, and cross with you..."
mov $mogaku_sel3,"You can't escape from my tent by struggling..."
mov $mogaku_sel4,"You can't escape from my tent by struggling..."
mov $mogaku_sel5,"You can't escape from my tent by struggling..."
mov $mogaku_dassyutu1,"You escaped from my tent...?"
mov $mogaku_dassyutu2,"But don't you want to taste the unmatched pleasure of crossing with me?"
mov $mogaku_earth_dassyutu1,"You escaped from my tent...?"
mov $mogaku_earth_dassyutu2,"But don't you want to taste the unmatched pleasure of crossing with me?"
mov $half_s1,"How are my sexual techniques?"
mov $half_s2,"If there's one you particularly like, just tell me..."
mov $kiki_s1,"You're almost at your limit, aren't you?"
mov $kiki_s2,"Go ahead and request what way you want to be finished off by..."
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,4
mov $name,"Endiel"
name $name
>I am Dominion Endiel.@
>I am called the Angel Whore.\
name ""
name "Luka"
>Angel... Whore?@
>That seems a rather... Unusual combination...\
name ""
>And she looks far from what you'd expect a holy being to look like.@
>She is more what you would picture a fallen angel to be.\
name $name
>It is my duty to repay those who die for the Goddess with pleasure.@
>Inside this tent, I take them in and give them the sexual techniques of the Heavens...\
>With that, I truly send them to Heaven...@
>That is why I have been called the Angel Whore.\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\endiel_st01.bmp",160,0:print 10,500
name "Alice"
>According to you stupid angels, Luka is a great sinner, right?@
>Then why did an angel like you show up?\
name ""
csp 701
gosub *face1
name $name
>Bury the disgraced Hero in pleasure...@> That was Goddess Ilias' command.\
>I'll take you into my tent just like the Saints...@
>And after you enjoy the techniques, you'll be sent to Heaven...\
name ""
name "Luka"
>Sorry, but I have no intention of going to Heaven yet!\
name ""
>Apparently that tent is part of her main body...@
>If she catches me, she'll drag me in there by force.\
goto *common_main



*endiel_v

gosub *face3
name $name
>I should be giving a proper funeral... To Saints...\
name ""
dwave 1,"se\bun.ogg"
csp 700:print 99,1000,"system\breakup.dll/lrB"
>Dominion Endiel fades away into particles, then vanishes!\
mov $name,"Dominion Endiel"
mov %viclose,1:gosub *victory
mov %getexp,260000:gosub *lvup
mov %2384,1
goto *sean0351



*endiel_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>So you want to taste all of my sexual skills...@
>Then please enjoy yourself to your heart's content.\
name ""
goto *endiel_a



*endiel_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *endiel_kousan
if %cmd1=16 goto *endiel_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *endiel_main



*endiel_a

if %kousoku=2 gosub *endiel_a6:goto *common_main
if %counter>0 add %counter,1
if %counter>4 gosub *endiel_x2:goto *common_main
if %counter>0 gosub *endiel_a10:goto *common_main
if %kousan=1 skip 3
mov %hanyo2,%hanyo2+1
if %hanyo2>6 gosub *endiel_x1:goto *common_main
rnd2 %ransu,1,6
if %ransu=1 gosub *endiel_a1:goto *common_main
if %ransu=2 gosub *endiel_a2:goto *common_main
if %ransu=3 gosub *endiel_a3:goto *common_main
if %ransu=4 gosub *endiel_a4:goto *common_main
if %ransu>4 && %owaza_count1a>5 gosub *endiel_a5:goto *common_main
skip -6



*endiel_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My footwork will finish you..."
if %ransu=2 mov $sel1,"I can even use my foot like this."
if %ransu=3 mov $sel1,"No man can resist this foot."
name $name
eng $sel1:$sel6\
name ""
skillname "Mystic Whore's Foot"
dwave 1,"se\ero_koki1.ogg"
>Endiel steps on Luka's penis, rubbing the sole against his shaft!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3871
if %nanido<2 damage 110,120
if %nanido=2 damage 120,130
if %nanido=3 damage 130,140
dwave 1,"se\ero_koki1.ogg"
>Twisting her foot side to side, she forces pleasure into Luka!
if %nanido<2 damage 110,120
if %nanido=2 damage 120,130
if %nanido=3 damage 130,140
dwave 1,"se\ero_koki1.ogg"
>Wiggling her toes, she rubs and strokes Luka's glans!
if %nanido<2 damage 110,120
if %nanido=2 damage 120,130
if %nanido=3 damage 130,140
skillname ""
if %mylife=0 sub %stack,1:return *endiel_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*endiel_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"The use of my breasts is one of my fortes..."
if %ransu=2 mov $sel1,"Come now, dye my chest white."
if %ransu=3 mov $sel1,"These breasts are able to force any male to orgasm."
name $name
eng $sel1:$sel6\
name ""
skillname "Mystic Whore's Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>Endiel squeezes Luka's penis between her soft breasts!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3872
if %nanido<2 damage 120,130
if %nanido=2 damage 130,140
if %nanido=3 damage 140,150
dwave 1,"se\ero_sigoki1.ogg"
>She slowly squeezes them tighter and tighter together!
if %nanido<2 damage 120,130
if %nanido=2 damage 130,140
if %nanido=3 damage 140,150
dwave 1,"se\ero_sigoki1.ogg"
>Moving them up and down, she squeezes Luka's penis as she rubs her breasts against it!
if %nanido<2 damage 120,130
if %nanido=2 damage 130,140
if %nanido=3 damage 140,150
skillname ""
if %mylife=0 sub %stack,1:return *endiel_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*endiel_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Many men love this ass of mine the most."
if %ransu=2 mov $sel1,"Shower your semen all over my ass..."
if %ransu=3 mov $sel1,"More than one or two men have forced to orgasm by this ass..."
name $name
eng $sel1:$sel6\
name ""
skillname "Mystic Whore's Ass"
dwave 1,"se\ero_sigoki1.ogg"
>Endiel squeezes Luka's penis between her ass cheeks!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3873
if %nanido<2 damage 130,140
if %nanido=2 damage 140,150
if %nanido=3 damage 150,160
dwave 1,"se\ero_sigoki1.ogg"
>With his penis held between her cheeks, Endiel sways her hips side to side!
if %nanido<2 damage 130,140
if %nanido=2 damage 140,150
if %nanido=3 damage 150,160
dwave 1,"se\ero_sigoki1.ogg"
>Rotating her waist around, Endiel tosses Luka's penis around as she squeezes it!
if %nanido<2 damage 130,140
if %nanido=2 damage 140,150
if %nanido=3 damage 150,160
skillname ""
if %mylife=0 sub %stack,1:return *endiel_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*endiel_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"The instant you orgasm, my tongue will attack you extra hard..."
if %ransu=2 mov $sel1,"Enjoy my tongue techniques..."
if %ransu=3 mov $sel1,"No man can resist this tongue of mine."
name $name
eng $sel1:$sel6\
name ""
skillname "Mystic Whore's Blowjob"
dwave 1,"se\ero_pyu1.ogg"
>While dripping saliva on Luka's penis, Endiel greedily licks Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3874
if %nanido<2 damage 140,150
if %nanido=2 damage 150,160
if %nanido=3 damage 160,170
dwave 1,"se\ero_pyu2.ogg"
>Endiel's tongue slowly coils around Luka's penis, as she slowly brings him into her mouth!
if %nanido<2 damage 140,150
if %nanido=2 damage 150,160
if %nanido=3 damage 160,170
dwave 1,"se\ero_buchu2.ogg"
>Moving her head back and forth, Endiel pumps Luka's penis like a piston!
if %nanido<2 damage 140,150
if %nanido=2 damage 150,160
if %nanido=3 damage 160,170
skillname ""
if %mylife=0 sub %stack,1:return *endiel_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*endiel_a5

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 4
name $name
>Now then, let me welcome you past this curtain...\
name ""
skillname "Mystic Whore's Invitation"
eng "Endiel starts to draw Luka into her tent!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
>Endiel jumps on top of Luka and straddles him!\
mov $tatie4,"endiel_st20"
mov %kousoku,2:gosub *status_print
>Luka has been bound by Endiel!\
skillname ""
if %kousan=2 sub %stack,1:return
name $name
if %first_sel1=1 skip 3
>Now, let us intersect.@
skip 2
>This till we will intersect.@
>I'll teach you the bliss my pussy can bring.\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,99
if %earth=0 && %nanido=2 mov %genmogaku,99
if %earth=0 && %nanido=3 mov %genmogaku,99
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
sub %stack,1
return



*endiel_a6

add %stack,1
if %kousan=2 skip 5
name $name
>Then... I shall welcome you inside me.@
>Have a taste of Heaven.\
name ""
skillname "Mystic Whore's Vagina"
dwave 1,"se\ero_pyu1.ogg"
mov $tatie4,"endiel_st21"
lsp 700,":a;chara\endiel_st21.bmp",0,0:print 10,500
>Endiel drops her waist, forcing Luka into her!
skillcount3 3875
mov %damage_kotei,1
damage 300,400
mov %kousoku,3:gosub *status_print
>Luka is being raped by Endiel!\
skillname ""
if %mylife=0 sub %stack,1:return *endiel_h5
name "Luka"
>Uwaaa!\
name ""
>The hot, tight sensation of Endiel's vagina makes Luka gasp in pleasure right away.\
if %kousan=2 sub %stack,1:return
add %stack,1
rnd2 %ransu,1,2
if %ransu=1 goto *endiel_a7
if %ransu=2 goto *endiel_a8



*endiel_a7

add %stack,1
>Luka is being raped by Endiel...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll clench down on it...":mov $sel2,"Endiel squeezes her vagina down hard on Luka's penis!"
if %ransu=2 mov $sel1,"How about I move a little more?":mov $sel2,"Endiel slowly moves back and forth, grinding against Luka's penis inside her vagina!"
if %ransu=3 mov $sel1,"If I just move a little bit like this...":mov $sel2,"Endiel moves back and forth, and side to side, tossing Luka's penis around inside her vagina!"
if %ransu=4 mov $sel1,"I can even control the muscles to do this...":mov $sel2,"The walls of Endiel's vagina start to wave around, massaging Luka's penis!"
if %ransu=5 mov $sel1,"Come now, pour out all of your semen inside me...":mov $sel2,"Endiel's warm vaginal walls rub and stroke Luka's penis as she rides him!"
name $name
eng $sel1:$sel6\
name ""
skillname "Mystic Whore's Vagina"
dwave 1,"se\ero_chupa4.ogg"
eng $sel2:$sel6
skillcount3 3875
mov %damage_kotei,1
damage 300,400
skillname ""
if %mylife=0 sub %stack,1:return *endiel_h6
if %kousan=2 sub %stack,1:return
sub %stack,1
goto *endiel_a7



*endiel_a8

add %stack,1
name $name
>I'll wrap you up, and make you go mad...@
>Now melt away in the pleasure...\
name ""
skillname "Hold of Sexual Pleasures"
lsp 700,":a;chara\endiel_st24.bmp",0,0:print 10,500
dwave 1,"se\ero_makituki3.ogg"
skillcount3 3876
>Luka's body is enveloped by a black membrane!
>Intense pleasure fills every inch of his body!
mov %damage_kotei,1
damage 400,500
mov $tatie4,"endiel_st24"
mov %kousoku,3:gosub *status_print
>Luka's body has been enveloped by a black membrane!\
skillname ""
if %mylife=0 sub %stack,1:return *endiel_h7
sub %stack,1
goto *endiel_a9



*endiel_a9

add %stack,1
>Luka is being raped inside Endiel's black membrane...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Well? Are you seeing Heaven now?":mov $sel2,"Endiel squeezes Luka's penis as the black membrane crawls all over his body!"
if %ransu=2 mov $sel1,"I'll wrap you up in my body... And have you finish over and over...":mov $sel2,"Sweet pleasure is forced into Luka's body from every direction!"
if %ransu=3 mov $sel1,"You'll erode away inside of me, you know?":mov $sel2,"The black membrane squirms around Luka's body the same time Endiel's vagina does!"
if %ransu=4 mov $sel1,"Men break down in despair inside this membrane...":mov $sel2,"Endiel's vagina squeezes Luka's penis as the black membrane squeezes his body!"
if %ransu=5 mov $sel1,"Shall I make it a little tighter? Haha...":mov $sel2,"While moving her hips back and forth, Endiel's vagina and membrane both tighten around Luka!"
name $name
eng $sel1:$sel6\
name ""
skillname "Hold of Sexual Pleasures"
dwave 1,"se\ero_makituki3.ogg"
eng $sel2:$sel6
skillcount3 3876
mov %damage_kotei,1
damage 400,500
skillname ""
if %mylife=0 sub %stack,1:return *endiel_h7
sub %stack,1
goto *endiel_a9



*endiel_x1

add %stack,1
if %kousan=2 skip 5
name $name
>If you're going to resist that much...@
>Then I'll have to get a little bit forceful.\
name ""
skillname "Dance of the Membrane"
mov $tatie1,"endiel_st11"
mov $tatie2,"endiel_st12"
mov $tatie3,"endiel_st13"
mov $tatie4,"endiel_st12"
gosub *face1
>Endiel's tent forms into two large mouths!\
skillname ""
if %kousan=2 skip 5
name $name
>This black membrane is a part of my body, too...@
>Of course it's able to bring delight to any man, too.\
name ""
mov %counter,1
sub %stack,1
return



*endiel_a10

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"This membrane is a part of my body, too..."
if %ransu=2 mov $sel1,"I can tighten it around your penis like this..."
if %ransu=3 mov $sel1,"I'll use this membrane to bring pleasure..."
name $name
eng $sel1:$sel6\
name ""
skillname "Dance of the Membrane"
dwave 1,"se\ero_makituki2.ogg"
>Endiel's black membrane vibrates and squirms around Luka's body!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3877
if %nanido<2 damage 500,550
if %nanido=2 damage 510,560
if %nanido=3 damage 520,570
dwave 1,"se\ero_makituki2.ogg"
>The movement makes it rub against Luka's groin!
if %nanido<2 damage 500,550
if %nanido=2 damage 510,560
if %nanido=3 damage 520,570
dwave 1,"se\ero_makituki2.ogg"
>Closing around his penis, the waving motions massage Luka's penis!
if %nanido<2 damage 500,550
if %nanido=2 damage 510,560
if %nanido=3 damage 520,570
dwave 1,"se\ero_makituki2.ogg"
>The black membrane slips into Luka's ass, still vibrating!
if %nanido<2 damage 500,550
if %nanido=2 damage 510,560
if %nanido=3 damage 520,570
dwave 1,"se\ero_makituki2.ogg"
>The membrane tightens around Luka's penis, stimulating him!
if %nanido<2 damage 500,550
if %nanido=2 damage 510,560
if %nanido=3 damage 520,570
skillname ""
if %mylife=0 sub %stack,1:return *endiel_h8
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*endiel_x2

add %stack,1
if %kousan=2 skip 4
name $name
>So you don't wish to come in?@>A pity...\
name ""
mov $tatie1,"endiel_st01"
mov $tatie2,"endiel_st02"
mov $tatie3,"endiel_st03"
mov $tatie4,"endiel_st02"
gosub *face1
>Endiel's tent goes back to its normal state!\
mov %counter,0
mov %hanyo2,0
sub %stack,1
return



*endiel_counter

add %stack,1
mov %counter,0
if %kousan=2 skip 5
name $name
>I'll embrace you in this membrane.@
>Expel out everything once you can't take it any longer...\
name ""
skillname "Membrane's Requiem"
dwave 1,"se\ero_makituki3.ogg"
lsp 690,":a;chara\endiel_ct01.bmp",400,0:print 10,500
>Endiel's membrane surrounds Luka's body!@
lsp 690,":a;chara\endiel_ct02.bmp",400,0
mov %kousoku,1:gosub *status_print
>Luka has been bound by Endiel!\
skillname ""
name $name
>Doesn't it feel even better than you thought?@
>This entire membrane is the same as a female's vagina...\
name ""
sub %stack,1
goto *endiel_a11



*endiel_a11

add %stack,1
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Does it feel good being squeezed inside me?"
if %ransu=2 mov $sel1,"I don't care if you leak at any time..."
if %ransu=3 mov $sel1,"Any man's semen would flow freely in here..."
if %ransu=4 mov $sel1,"Does it feel so good you're going to ejaculate?"
if %ransu=5 mov $sel1,"Some men cry, some men faint, some men are incontinent... Which one will you be?"
name $name
eng $sel1:$sel6\
name ""
skillname "Membrane's Requiem"
dwave 1,"se\ero_makituki3.ogg"
>Endiel's membrane squeezes Luka's entire body!
if %daten>0 goto *skill22x
skillcount3 3878
if %nanido<2 damage 500,600
if %nanido=2 damage 530,630
if %nanido=3 damage 560,660
skillname ""
if %mylife=0 sub %stack,1:return *endiel_h9
sub %stack,1
goto *endiel_a11



*endiel_onedari

mov $list1,"Mystic Whore's Foot"
if %3871>0 mov %list_num1,1
mov $list2,"Mystic Whore's Tit Fuck"
if %3872>0 mov %list_num2,1
mov $list3,"Mystic Whore's Ass"
if %3873>0 mov %list_num3,1
mov $list4,"Mystic Whore's Blowjob"
if %3874>0 mov %list_num4,1
mov $list5,"Mystic Whore's Vagina"
if %3875>0 mov %list_num5,1
mov $list6,"Hold of Sexual Pleasures"
if %3876>0 mov %list_num6,1
mov $list7,"Dance of the Membrane"
if %3877>0 mov %list_num7,1
mov $list8,"Membrane's Requiem"
if %3878>0 mov %list_num8,1
gosub *cmd_onedari
if %cmd1=11 goto *endiel_onedari1
if %cmd1=12 goto *endiel_onedari2
if %cmd1=13 goto *endiel_onedari3
if %cmd1=14 goto *endiel_onedari4
if %cmd1=15 goto *endiel_onedari5
if %cmd1=16 goto *endiel_onedari6
if %cmd1=17 goto *endiel_onedari7
if %cmd1=18 goto *endiel_onedari8
if %cmd1=-1 goto *endiel_main
goto *endiel_onedari



*endiel_onedari1

gosub *onedari_syori
name $name
>You wish to enjoy my footwork?@
>Then I'll lead you to climax with my foot...\
name ""
if %counter>0 gosub *endiel_x2
gosub *endiel_a1
skip -1



*endiel_onedari2

gosub *onedari_syori
name $name
>You wish to enjoy my breasts?@
>Then I'll lead you to climax with my breasts...\
name ""
if %counter>0 gosub *endiel_x2
gosub *endiel_a2
skip -1



*endiel_onedari3

gosub *onedari_syori
name $name
>You wish to enjoy my ass?@
>Then I'll lead you to climax with my ass...\
name ""
if %counter>0 gosub *endiel_x2
gosub *endiel_a3
skip -1



*endiel_onedari4

gosub *onedari_syori
name $name
>You wish to enjoy my mouth?@
>Then I'll lead you to climax with my mouth...\
name ""
if %counter>0 gosub *endiel_x2
gosub *endiel_a4
skip -1



*endiel_onedari5

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want me to rape you, and show you the pleasures an angel can bring?@
>Then I'll let you enjoy it...\
name ""
if %counter>0 gosub *endiel_x2
if %kousoku=0 gosub *endiel_a5
gosub *endiel_a6
gosub *endiel_a7



*endiel_onedari6

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want me to rape you, and wrap your entire body in my membrane?@
>Then I'll let you enjoy it...\
name ""
if %counter>0 gosub *endiel_x2
if %kousoku=0 gosub *endiel_a5
gosub *endiel_a6
gosub *endiel_a8



*endiel_onedari7

if %counter=0 gosub *onedari_syori
if %counter>0 gosub *onedari_syori_k
name $name
>You want to feel the pleasure of my membrane?@
>Then I'll lead you to climax in an instant...\
name ""
if %counter=0 gosub *endiel_x1
gosub *endiel_a10
skip -1



*endiel_onedari8

if %counter=0 gosub *onedari_syori
if %counter>0 gosub *onedari_syori_k
name $name
>You want to feel the comfort of my membrane?@
>Then I'll lead you to climax in an instant...\
name ""
if %counter=0 gosub *endiel_x1
gosub *endiel_counter



*endiel_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\endiel_bk04.bmp",0,0
gosub *syasei2
>As Endiel's soft foot steps on his penis, Luka comes, covering her feet in semen.\
mov %viclose,1:gosub *lose
mov %2684,%2684+1:if %2684=1 mov %count_koenemy,%count_koenemy+1
if %2684>%count_most mov %count_most,%2684:mov $count_mostname,$name
count 6,11
mov $bad1,"Endiel forced Luka to come with her foot."
gosub *face2
name $name
>Well? Did you enjoy it?@
>Forget everything of this world, and feel only the pleasure...\
name ""
goto *endiel_h



*endiel_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\endiel_bk02.bmp",0,0
gosub *syasei2
>As Endiel's soft breasts press against his penis, Luka comes, covering Endiel's chest in semen.\
mov %viclose,1:gosub *lose
mov %2684,%2684+1:if %2684=1 mov %count_koenemy,%count_koenemy+1
if %2684>%count_most mov %count_most,%2684:mov $count_mostname,$name
count 7,11
mov $bad1,"Endiel used her breasts to force Luka to come."
gosub *face2
name $name
>Well? Did you enjoy it?@
>Forget everything of this world, and feel only the pleasure...\
name ""
goto *endiel_h



*endiel_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\endiel_bk03.bmp",0,0
gosub *syasei2
>As Luka's penis is squeezed between Endiel's ass cheeks, he comes, spraying his semen all over her ass.\
mov %viclose,1:gosub *lose
mov %2684,%2684+1:if %2684=1 mov %count_koenemy,%count_koenemy+1
if %2684>%count_most mov %count_most,%2684:mov $count_mostname,$name
count 34,11
mov $bad1,"Endiel forced Luka to come with her ass."
gosub *face2
name $name
>Well? Did you enjoy it?@
>Forget everything of this world, and feel only the pleasure...\
name ""
goto *endiel_h



*endiel_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\endiel_bk01.bmp",0,0
gosub *syasei2
>As Endiel sucks on Luka's penis, he comes, filling her warm mouth with semen.\
mov %viclose,1:gosub *lose
mov %2684,%2684+1:if %2684=1 mov %count_koenemy,%count_koenemy+1
if %2684>%count_most mov %count_most,%2684:mov $count_mostname,$name
count 4,11
mov $bad1,"Endiel forced Luka to come with her mouth."
gosub *face2
name $name
>Well? Did you enjoy it?@
>Forget everything of this world, and feel only the pleasure...\
name ""
goto *endiel_h



*endiel_h5

mov %ikigoe,3:gosub *ikigoe
name $name
>Hehe, you sure are quick...@
>Are you really satisfied with just that?\
name ""
gosub *syasei1
lsp 700,":a;chara\endiel_st22.bmp",0,0
gosub *syasei2
>The moment Luka is forced into Endiel, he comes, filling her warm vagina with semen.\
mov %viclose,1:gosub *lose
mov %2684,%2684+1:if %2684=1 mov %count_koenemy,%count_koenemy+1
if %2684>%count_most mov %count_most,%2684:mov $count_mostname,$name
count 1,11
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come the moment of insertion into Endiel."
gosub *face2
name $name
>How pitiful... Ah, no, that was rude of me.@
>I forget just how amazing my pussy is sometimes.\
name ""
goto *endiel_h



*endiel_h6

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\endiel_st22.bmp",0,0
gosub *syasei2
>As Endiel rapes him, Luka comes, filling her warm vagina with semen.\
mov %viclose,1:gosub *lose
mov %2684,%2684+1:if %2684=1 mov %count_koenemy,%count_koenemy+1
if %2684>%count_most mov %count_most,%2684:mov $count_mostname,$name
count 1,11
mov $bad1,"Endiel forced Luka to come as she raped him."
gosub *face2
name $name
>Haha... You scattered so much semen inside me.@
>Does my pussy feel absolutely heavenly?\
name ""
goto *endiel_h



*endiel_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\endiel_st25.bmp",0,0
gosub *syasei2
>With the membrane surrounding his body as he's raped by Endiel, Luka comes, filling her warm vagina with semen.\
mov %viclose,1:gosub *lose
mov %2684,%2684+1:if %2684=1 mov %count_koenemy,%count_koenemy+1
if %2684>%count_most mov %count_most,%2684:mov $count_mostname,$name
count 1,11
mov $bad1,"Endiel forced Luka to come as she raped him, wrapped in her membrane."
gosub *face2
name $name
>Haha... You scattered so much semen inside me.@
>Does my pussy feel absolutely heavenly?\
name ""
goto *endiel_h



*endiel_h8

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\endiel_bk05.bmp",0,0
gosub *syasei2
>As Endiel's membrane rubs Luka's penis, he comes, spraying out his semen all over.\
mov %viclose,1:gosub *lose
mov %2684,%2684+1:if %2684=1 mov %count_koenemy,%count_koenemy+1
if %2684>%count_most mov %count_most,%2684:mov $count_mostname,$name
count 27,11
mov $bad1,"Endiel forced Luka to come with her membrane."
gosub *face2
name $name
>Well? Did you enjoy it?@
>Forget everything of this world, and feel only the pleasure...\
name ""
goto *endiel_h



*endiel_h9

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\endiel_bk05.bmp",0,0
lsp 690,":a;chara\endiel_ct03.bmp",400,0
gosub *syasei2
>Wrapped in Endiel's membrane, Luka comes, spraying out his semen all over.\
mov %viclose,1:gosub *lose2
name "Luka"
>Ahhh...\
name ""
name $name
>This membrane can suck out any man's semen...@
>Shall I have it take some more of yours?\
name ""
skillcount3 3878
skillname "Membrane's Requiem"
dwave 1,"se\ero_makituki3.ogg"
>The membrane wraps around Luka's penis!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_makituki3.ogg"
>It squeezes and squirms around Luka's body!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>Haaa... No more...\
name ""
name $name
>Even if you say you don't want it...@
>Your penis sure seems to want more.\
name ""
skillcount3 3878
skillname "Membrane's Requiem"
dwave 1,"se\ero_makituki3.ogg"
>The membrane rubs against Luka's penis!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_makituki3.ogg"
>The strange ribbed membrane massages Luka's penis!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>Hyaaa... No... I'm going to come again!\
name ""
name $name
>Don't be ashamed...@
>Any man would come as you did in this situation.\
name ""
skillcount3 3878
skillname "Membrane's Requiem"
dwave 1,"se\ero_makituki3.ogg"
>The membrane squeezes down on Luka's penis!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_makituki3.ogg"
>It pulls on Luka's penis, as if sucking him!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>T...To good.. Ahh...\
name ""
gosub *syasei1
lsp 690,":a;chara\endiel_ct04.bmp",400,0
gosub *syasei2
>While wrapped up in Endiel's membrane, Luka comes again.\
>Every drop of semen he spurts out is sucked up and absorbed by her membrane.\
name $name
>Well? Did you enjoy it?@
>I'll make you forget everything of this world...\
name ""
gosub *clear_sprite
gosub *setwindow_01p
>Endiel looks down at me with a smile.@
>What is she going to do next...?\
mov %battle,0
mov %hsean,1
mov %2684,%2684+1:if %2684=1 mov %count_koenemy,%count_koenemy+1
if %2684>%count_most mov %count_most,%2684:mov $count_mostname,$name
count 27,11
mov $bad1,"Endiel forced Luka to come with her membrane."
goto *endiel_h



*endiel_h

mov $bad2,"After receiving her sexual service, Luka's body was absorbed into hers."
if %2684=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku=3 mov %hseanwave,3:lsp 700,":c;chara\endiel_h1.bmp",0,0:print 10,500:hseanwave:goto *endiel_hb
name "Luka"
>Ahhh...\
name ""
name $name
>I'll have you taste even more of the pleasures I can provide.@
>Get a good taste of the skills from one known as the Angel Whore...\
name ""
>With that, Endiel pushes me down, and mounts on top of me.\
mov %hseanwave,3:hseanwave
cspl 690,699
lsp 700,":c;chara\endiel_h1.bmp",0,0:print 10,500
>And with a quick motion, she forces my penis into her.\
name "Luka"
>Ah... Urhg!\
name ""
>Her hot flesh wraps me up, swallowing my penis all the way to my root.\
>Endiel's flesh shrinks and loosens, as if her vagina itself was breathing.@
>Just the feeling of being inside her is almost enough to make me come instantly.\
name $name
>Mating with an angel is absolute bliss, isn't it?@
>Now let me squeeze you a little...\
name ""
goto *endiel_hb



*endiel_hb

name "Luka"
>Ahhh...!\
name ""
>Her vagina slowly gets smaller, as if it was a hand grabbing hold of my penis.@
>The unexpected tightness makes me gasp in pleasure.\
name "Luka"
>Haaa... You're so tight... It feels good...\
name ""
name $name
>Hehehe... Get a good taste of the pleasure from my sexual skills.@
>When you can't take it any longer, just ejaculate as much as you want.\
name ""
>Putting power into her lower body, Endiel rhythmically squeezes and loosens her vagina around my penis.@
>My male instinct is completely enraptured by the stimulation.\
>Each time she tightens, I feel her innumerable folds rub and press against my penis, as if I was being massaged.\
name "Luka"
>So good... Ahh...\
name ""
>Just using her tightness to make me feel this good...@
>Without even moving, Endiel is able to completely seduce me with her skills.\
name $name
>Hehe, it feels good, doesn't it?@
>Now let me shake my waist some...\
>You surely won't be able to endure it.@
>So just give in and come inside me.\
name ""
>With a seductive smile, Endiel starts to sway her hips on top of me.@
>Sliding her waist up and down, she gently grinds against my body.\
>Just that simple movement is enough to leave me gasping.@
>Each movement makes her folds and flesh rub against my penis and glans.\
>At the same time, she continues her rhythmic tightening and loosening.@
>The combined stimulations are too much, as I can't stop myself from ejaculating any longer.\
name "Luka"
>Ahh... Incredible...@
>I'm going to come...!\
name ""
name $name
>Hehe, are you about to come then?@
>Go ahead and come inside me.\
name ""
>Endiel pushes down, forcing my penis deep inside her for the finishing blow.@
>Relaxing my body at the same time, I give in to the melting pleasure.\
name "Luka"
>Ahhhh...\
name ""
gosub *syasei1
lsp 700,":c;chara\endiel_h2.bmp",0,0
gosub *syasei2
>The sweet pleasure from my release washes over me as I erupt inside her.\
>All during my orgasm, she continues squeezing me, torturing me with further pleasure during a man's weakest moment.\
>I sigh in bliss as the last of my semen leaks out into her.@
>It feels like my soul itself was offered up to her.\
name $name
>Hehe, so you came...@
>And I can tell that you gave off quite a large amount of semen, too.\
name ""
name "Luka"
>Haa...\
name ""
>An angel pushed me down, raped me, and forced me to come so easily...@
>The lingering feelings of pleasure from my orgasm mix with the shame of the act.\
>And all at the same time, the weakness from my orgasm leaves me powerless.\
lsp 700,":c;chara\endiel_h3.bmp",0,0:print 10,500
name $name
>You seem to be completely helpless now...@
>My sexual skills are the best, aren't they?\
>My duty is to give good people the ultimate in pleasure.@
>Then, after that, to offer up their souls to the Heavens.\
name ""
name "Luka"
>Eh...?@> Ahhh!\
name ""
mov %hseanwave,13:hseanwave
lsp 700,":c;chara\endiel_h4.bmp",0,0:print 10,500
>The surrounding membrane suddenly comes down, and wraps me completely up.\
>It's like I was swallowed by a living being.@
>With it, a bizarre sense of ecstasy and sense of loss.\
name $name
>This is an irregular situation, so I'm going to take your body.@
>Become one with me, and taste everlasting pleasure.\
name ""
name "Luka"
>N...No...\
name ""
>The black membrane wraps around me, swallowing more of my body as I try to feebly resist.\
name "Luka"
>Stop... Help me...\
name ""
name $name
>...Are you scared?@
>Then let me give you an offering of pleasure one more time.\
>This is the last time, so enjoy it.@
>As soon as you finish, I'll take your body and soul...\
name ""
>Endiel suddenly starts moving again.@
>Riding me hard and without mercy, my penis is tossed around inside her soft vagina.\
>Dropping her waist hard and squeezing me, there's no way I could endure her sexual skills.\
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1
lsp 700,":c;chara\endiel_h5.bmp",0,0
gosub *syasei2
>I explode inside Endiel in moments, unable to endure her incredible abilities for even a few moments.\
name $name
>Oh dear... I said that would be your last time.@
>I'm surprised you were satisfied so quickly.\
name ""
name "Luka"
>S...Stop...\
name ""
name $name
>I won't give you any more service.@
>Now become one with me...\
name ""
dwave 1,"se\ero_makituki2.ogg"
lsp 700,":c;chara\endiel_h6.bmp",0,0:print 10,500
>Endiel's right arm reaches out toward me, and...\
name "Luka"
>Ahhh...@
>Stop, help!\
name ""
name $name
>Goodbye.\
name ""
dwave 1,"se\ero_slime3.ogg"
lsp 700,":c;chara\endiel_h7.bmp",0,0:print 10,500
name "Luka"
>Ahhhh!!\
name ""
>The squirming membrane covers up my entire body.@
>It feels like I'm sinking into a living swamp...\
>Little by little, I feel myself getting weaker as my body indulges in the bizarre ecstasy.\
name "Luka"
>Ah...aa...\
name ""
>My body is slowly dissolved and absorbed by the black membrane.@
>Like that, my mind and body are taken by Endiel.\
mov %hseanwave,0:hseanwave
gosub *anten
>..............\
goto *badend



*lamianloid_start

mov $name,"Lamiaroid"
mov $name2,"Lamiaroid"
mov $lavel,"lamianloid"
mov $tatie1,"lamianloid_st01"
mov $tatie2,"lamianloid_st02"
mov $tatie3,"lamianloid_st03"
mov $tatie4,"lamianloid_st02"
mov $haikei,"bg190"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,18000
if %nanido=2 mov %max_enemylife,22000
if %nanido=3 mov %max_enemylife,26000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,20
if %nanido=3 mov %earth_keigen,10
mov %alice_skill,1
mov %alice_skill1,100
mov %alice_skill2,130
mov %alice_skill3,100
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $half_s1,"Ahaha... My body is incredible, isn't it?"
mov $half_s2,"I've got lots of functions left to make a man cry out... "
mov $kiki_s1,"You're about to come, I see..."
mov $kiki_s2,"Do you have a specific function of mine you want me to make you come with...?"
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-300
mov %tukix,300
name "Luka"
>I'm your opponent!@> I won't let you get to the Queen!\
name ""
>I take my ready stance with my sword out, facing the half machine monster.\
name $name
>Oh...@>I've heard the rumors, but you're a lot cuter than I was hoping for.@
>And you look so delicious... \
name ""
>The Lamiaroid looks at me with a distorted smile.\
name $name
>Well, I guess it's fine to give the Queen to her... \
>I'm thinking this prey in front of me will taste a lot better. \
name ""
name "Luka"
>...Her?@
>So there's someone else here with you?\
name ""
name $name
>Ahaha...@> Just think of me right now.@
>I'll squeeze out your semen with every function I have installed.\
>You'll get to feel first hand how incredible each one is as I make you come over and over again... \
name ""
goto *common_main



*lamianloid_v

gosub *face3
name $name
>...I was inferior...?@
>So I'm the decoy... So she'll win after all...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Lamiaroid is sealed in the form of a snake!\
mov %viclose,1:gosub *victory
mov %getexp,220000:gosub *lvup
mov %2401,1
goto *sean0354



*lamianloid_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Aha, you want to taste my installed abilities?@
>Then I'll serve you a full course...\
name ""
name ""
goto *lamianloid_a



*lamianloid_main

gosub *cmd_main
if %cmd1=11 goto *common_attack
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *lamianloid_kousan
if %cmd1=16 goto *lamianloid_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *lamianloid_main



*lamianloid_a

rnd2 %ransu,1,6
if %ransu=1 gosub *lamianloid_a1:goto *common_main
if %ransu=2 gosub *lamianloid_a2:goto *common_main
if %ransu=3 gosub *lamianloid_a3:goto *common_main
if %ransu=4 gosub *lamianloid_a4:goto *common_main
if %ransu=5 gosub *lamianloid_a5:goto *common_main
if %ransu=6 gosub *lamianloid_a6:goto *common_main



*lamianloid_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Even flesh and blood were improved for my tail... "
if %ransu=2 mov $sel1,"I have lots of confidence in my tail. "
if %ransu=3 mov $sel1,"The small bumps on the surface are the secret to why this feels so good. "
name $name
eng $sel1:$sel6\
name ""
skillname "Lamiatail"
dwave 1,"se\ero_makituki1.ogg"
>Lamiaroid's tail coils around Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<70 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3879
if %nanido<2 damage 200,220
if %nanido=2 damage 210,230
if %nanido=3 damage 220,240
dwave 1,"se\ero_makituki1.ogg"
>She slowly tightens it, squeezing Luka's penis!
if %nanido<2 damage 200,220
if %nanido=2 damage 210,230
if %nanido=3 damage 220,240
dwave 1,"se\ero_makituki2.ogg"
>The tail moves up and down, stroking Luka's penis!
if %nanido<2 damage 200,220
if %nanido=2 damage 210,230
if %nanido=3 damage 220,240
skillname ""
if %mylife=0 sub %stack,1:return *lamianloid_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*lamianloid_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"These breasts are mostly flesh and blood. "
if %ransu=2 mov $sel1,"I'm proud of these breasts... Aren't they nice and soft?"
if %ransu=3 mov $sel1,"Ejaculate all over these breasts, it's alright. "
name $name
eng $sel1:$sel6\
name ""
skillname "Super Bust"
dwave 1,"se\ero_sigoki1.ogg"
>Lamiaroid sandwiches Luka's penis between her soft breasts!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<70 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3880
if %nanido<2 damage 210,230
if %nanido=2 damage 220,240
if %nanido=3 damage 230,250
dwave 1,"se\ero_sigoki1.ogg"
>Her smooth skin rubs against Luka's penis!
if %nanido<2 damage 210,230
if %nanido=2 damage 220,240
if %nanido=3 damage 230,250
dwave 1,"se\ero_sigoki1.ogg"
>She uses them to squeeze Luka's penis!
if %nanido<2 damage 210,230
if %nanido=2 damage 220,240
if %nanido=3 damage 230,250
skillname ""
if %mylife=0 sub %stack,1:return *lamianloid_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*lamianloid_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"This disgusting tongue will lick your penis all over. "
if %ransu=2 mov $sel1,"No human can resist coming from my tongue. "
if %ransu=3 mov $sel1,"I'll lick out an orgasm. "
name $name
eng $sel1:$sel6\
name ""
skillname "Snake Tongue"
dwave 1,"se\ero_sigoki1.ogg"
>Lamiaroid's snake-like tongue extends, coiling around Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<70 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3881
if %nanido<2 damage 220,240
if %nanido=2 damage 230,250
if %nanido=3 damage 240,260
dwave 1,"se\ero_makituki1.ogg"
>Her tongue finishes spiraling around Luka's penis!
if %nanido<2 damage 220,240
if %nanido=2 damage 230,250
if %nanido=3 damage 240,260
dwave 1,"se\ero_koki1.ogg"
>Spiraled around Luka's penis, she moves it quickly up and down!
if %nanido<2 damage 220,240
if %nanido=2 damage 230,250
if %nanido=3 damage 240,260
skillname ""
if %mylife=0 sub %stack,1:return *lamianloid_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*lamianloid_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll rub my whole arm against your penis! "
if %ransu=2 mov $sel1,"This arm will process your orgasm in less than ten seconds... "
if %ransu=3 mov $sel1,"All of these tentacles can move on their own..."
name $name
eng $sel1:$sel6\
name ""
skillname "Rube Arm"
dwave 1,"se\ero_pyu1.ogg"
lsp 690,":a;chara\lamianloid_ct11.bmp",0,0:print 10,500
>Lamiaroid's strange arm, covered with small tentacles, grabs hold of Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<70 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3882
if %nanido<2 damage 230,250
if %nanido=2 damage 240,260
if %nanido=3 damage 250,270
dwave 1,"se\ero_koki1.ogg"
>Shaking it up and down, countless tentacles rub against his penis!
if %nanido<2 damage 230,250
if %nanido=2 damage 240,260
if %nanido=3 damage 250,270
dwave 1,"se\ero_koki1.ogg"
>Moving even faster, the intense movements stimulate Luka!
if %nanido<2 damage 230,250
if %nanido=2 damage 240,260
if %nanido=3 damage 250,270
skillname ""
if %mylife=0 sub %stack,1:return *lamianloid_h4
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*lamianloid_a5

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"This arm uses two tentacles to operate... "
if %ransu=2 mov $sel1,"Do you want to try being squeezed from inside a tentacle?"
if %ransu=3 mov $sel1,"This feels so much better than normal sex... "
name $name
eng $sel1:$sel6\
name ""
skillname "Plant Arm"
dwave 1,"se\ero_makituki1.ogg"
lsp 690,":a;chara\lamianloid_ct21.bmp",0,0:print 10,500
>The tip of a tentacle coils around Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<70 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3883
if %nanido<2 damage 240,260
if %nanido=2 damage 250,270
if %nanido=3 damage 260,280
if %mylife=0 skillname "":mov %hanyo1,1:sub %stack,1:return *lamianloid_h5
dwave 1,"se\ero_pyu1.ogg"
lsp 690,":a;chara\lamianloid_ct31.bmp",0,0:print 10,500
>The other tentacle opens up a hole, sucking Luka's penis inside!
if %nanido<2 damage 240,260
if %nanido=2 damage 250,270
if %nanido=3 damage 260,280
dwave 1,"se\ero_kyuin1.ogg"
>Sucking on Luka's penis, the tentacle forces intense stimulation into Luka!
if %nanido<2 damage 240,260
if %nanido=2 damage 250,270
if %nanido=3 damage 260,280
skillname ""
if %mylife=0 mov %hanyo1,2:sub %stack,1:return *lamianloid_h5
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*lamianloid_a6

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll step on it. "
if %ransu=2 mov $sel1,"My foot has a vibration feature... "
if %ransu=3 mov $sel1,"How does it feel to have your cock trampled on?"
name $name
eng $sel1:$sel6\
name ""
skillname "Pleasure Foot"
dwave 1,"se\ero_koki1.ogg"
lsp 690,":a;chara\lamianloid_ct01.bmp",0,0:print 10,500
>Lamiaroid steps on Luka's penis with her mechanical foot!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<70 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4132
if %nanido<2 damage 230,250
if %nanido=2 damage 240,260
if %nanido=3 damage 250,270
dwave 1,"se\ero_koki1.ogg"
>She twists her leg, pressing her sole into Luka's penis at the same time!
if %nanido<2 damage 230,250
if %nanido=2 damage 240,260
if %nanido=3 damage 250,270
dwave 1,"se\ero_koki1.ogg"
>Her foot starts to vibrate against his penis at the same time!
if %nanido<2 damage 230,250
if %nanido=2 damage 240,260
if %nanido=3 damage 250,270
skillname ""
if %mylife=0 sub %stack,1:return *lamianloid_h6
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*lamianloid_onedari

mov $list1,"Lamiatail"
if %3879>0 mov %list_num1,1
mov $list2,"Super Bust"
if %3880>0 mov %list_num2,1
mov $list3,"Snake Tongue"
if %3881>0 mov %list_num3,1
mov $list4,"Pleasure Foot"
if %4132>0 mov %list_num4,1
mov $list5,"Rube Arm"
if %3882>0 mov %list_num5,1
mov $list6,"Plant Arm"
if %3883>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *lamianloid_onedari1
if %cmd1=12 goto *lamianloid_onedari2
if %cmd1=13 goto *lamianloid_onedari3
if %cmd1=14 goto *lamianloid_onedari6
if %cmd1=15 goto *lamianloid_onedari4
if %cmd1=16 goto *lamianloid_onedari5
if %cmd1=-1 goto *lamianloid_main
goto *lamianloid_onedari



*lamianloid_onedari1

gosub *onedari_syori
name $name
>You want to test out my tail...?@
>Then I'll give you a powerful ejaculation.\
name ""
gosub *lamianloid_a1
skip -1



*lamianloid_onedari2

gosub *onedari_syori
name $name
>You want to test out my breasts...?@
>Then I'll give you a powerful ejaculation.\
name ""
gosub *lamianloid_a2
skip -1



*lamianloid_onedari3

gosub *onedari_syori
name $name
>You want to test out my tongue...?@
>Then I'll give you a powerful ejaculation.\
name ""
gosub *lamianloid_a3
skip -1



*lamianloid_onedari4

gosub *onedari_syori
name $name
>You want to test out my tentacle arm...?@
>Then I'll give you a powerful ejaculation.\
name ""
gosub *lamianloid_a4
skip -1



*lamianloid_onedari5

gosub *onedari_syori
name $name
>You want to test out my onahole arm...?@
>Then I'll give you a powerful ejaculation.\
name ""
gosub *lamianloid_a5
skip -1



*lamianloid_onedari6

gosub *onedari_syori
name $name
>You want me to trample your penis...?@
>Then I'll give you a powerful ejaculation.\
name ""
gosub *lamianloid_a6
skip -1



*lamianloid_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 696,":a;chara\lamianloid_bk06.bmp",0,0
gosub *syasei2
>As Lamiaroid uses her tail to play with Luka's penis, he comes, covering her tail in semen.\
mov %viclose,1:gosub *lose
mov %2701,%2701+1:if %2701=1 mov %count_koenemy,%count_koenemy+1
if %2701>%count_most mov %count_most,%2701:mov $count_mostname,$name
count 19,3
mov $bad1,"Lamiaroid used her tail to force Luka to come."
gosub *face2
name $name
>There we go, ejaculation achieved! @
>My tail is the best, isn't it? \
name ""
goto *lamianloid_ha



*lamianloid_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\lamianloid_bk02.bmp",0,0
gosub *syasei2
>As Lamiaroid's soft breasts press against his penis, Luka comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2701,%2701+1:if %2701=1 mov %count_koenemy,%count_koenemy+1
if %2701>%count_most mov %count_most,%2701:mov $count_mostname,$name
count 7,3
mov $bad1,"Lamiaroid used her breasts to force Luka to come."
gosub *face2
name $name
>There we go, ejaculation achieved! @
>My breasts are the best, aren't they? \
name ""
goto *lamianloid_ha



*lamianloid_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\lamianloid_bk01.bmp",0,0
gosub *syasei2
>As Lamiaroid's long snake-like tongue toys with Luka's penis, he comes, covering her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2701,%2701+1:if %2701=1 mov %count_koenemy,%count_koenemy+1
if %2701>%count_most mov %count_most,%2701:mov $count_mostname,$name
count 4,11
mov $bad1,"Lamiaroid forced Luka to come using her tongue."
gosub *face2
name $name
>There we go, ejaculation achieved! @
>My tongue is the best, isn't it? \
name ""
goto *lamianloid_hb



*lamianloid_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\lamianloid_ct12.bmp",0,0
gosub *syasei2
>As Lamiaroid's tentacle arm strokes Luka's penis, he comes, covering her arm in semen.\
mov %viclose,1:gosub *lose
mov %2701,%2701+1:if %2701=1 mov %count_koenemy,%count_koenemy+1
if %2701>%count_most mov %count_most,%2701:mov $count_mostname,$name
count 10,3
mov $bad1,"Lamiaroid forced Luka to come with her tentacle arm."
gosub *face2
name $name
>There we go, ejaculation achieved! @
>My tentacle arm is the best, isn't it? \
name ""
csp 690:print 10,500
goto *lamianloid_ha



*lamianloid_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
if %hanyo1=1 lsp 690,":a;chara\lamianloid_ct22.bmp",0,0
if %hanyo1=2 lsp 690,":a;chara\lamianloid_ct32.bmp",0,0
gosub *syasei2
>As Lamiaroid uses her arm to suck on Luka's penis, he comes, filling her arm's opening with semen.\
mov %viclose,1:gosub *lose
mov %2701,%2701+1:if %2701=1 mov %count_koenemy,%count_koenemy+1
if %2701>%count_most mov %count_most,%2701:mov $count_mostname,$name
count 10,3
mov $bad1,"Lamiaroid used her semen sucking arm to force Luka to come."
gosub *face2
name $name
>There we go, ejaculation achieved! @
>My tentacle arm is the best, isn't it? \
name ""
csp 690:print 10,500
goto *lamianloid_ha



*lamianloid_h6

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\lamianloid_ct02.bmp",0,0
gosub *syasei2
>As Lamiaroid tramples Luka's penis with her mechanical foot, he comes, covering it with semen.\
mov %viclose,1:gosub *lose
mov %2701,%2701+1:if %2701=1 mov %count_koenemy,%count_koenemy+1
if %2701>%count_most mov %count_most,%2701:mov $count_mostname,$name
count 6,3
mov $bad1,"Lamiaroid used her mechanical foot to force Luka to come."
csp 690
name $name
>There we go, ejaculation achieved! @
>My mechanical foot is the best, isn't it? \
name ""
csp 690:print 10,500
goto *lamianloid_ha



*lamianloid_ha

mov $bad2,"Now considered a mere sex slave, Luka is raped in every possible way."
if %2855=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2855,1
name "Luka"
>Ahh...\
name ""
name $name
>Unable to resist anymore?@>Well then...\
name ""
cspl 690,699
lsp 700,":c;chara\lamianloid_ha01.bmp",0,0:print 10,500
>Lamiaroid comes up from behind me, coiling her tail around my right foot.@
>Her hand reaches around and tickles the tip of my penis with her fingertips.\
name $name
>Ahaha, you leaked it out, didn't you? @
>Right in the middle of fighting for the good of everyone...@>You spurted out that white liquid.\
>Come on... Get a good look at your penis, covered in your white stuff.@
>You felt so good, so you let this defeat you.\
name ""
name "Luka"
>...........\
name ""
>Humiliated, I look away.\
name $name
>Oh?@>Looking away?@
>Are you ashamed?\
lsp 700,":c;chara\lamianloid_ha02.bmp",0,0:print 10,500
>And look... Even here.@
>Even though you're a boy, your nipples are all hard.\
name ""
>Lamiaroid presses her breasts against me, rubbing her nipples against mine.\
name $name
>Ahaha... Look at you twitching from that, even though you're a boy!@
>Well then, these nipple fuck holes...\
name ""
lsp 700,":c;chara\lamianloid_ha03.bmp",0,0:print 10,500
name "Luka"
>Ah...!\
name ""
>Suddenly, a tiny opening sucks in my left nipple where one of Lamiaroid's nipples was!\
name $name
>Aha... How does it feel to have your nipples raped?@
>Look at your penis... It's trembling in joy again already!\
name ""
>Lamiaroid lightly fingers my twitching penis as she taunts me.\
name "Luka"
>Ahh... It doesn't feel good...\
name ""
name $name
>Haha... So you're denying it?@
>Then I'll tease you more...\
>Do your best to endure it, if that's what you want to do...@
>Because I'll give you a full course meal of everything I have to offer regardless. \
name ""
name "Luka"
>N...No... Stop this...\
name ""
name $name
>First... I'll wrap your penis up with my tail.@
>Don't worry, it feels very good.\
name ""
mov %hseanwave,20:hseanwave
lsp 700,":c;chara\lamianloid_ha04.bmp",0,0:print 10,500
>Lamiaroid's tail slowly starts coiling around my penis.@
>As the odd texture of her rubs against my penis, my lower body twitches with each touch.\
name "Luka"
>Ahh...!\
name ""
name $name
>Alright!@> Penis capture complete! \
>You felt it, didn't you?@
>Those tiny little bumps on the back of my tail...\
name ""
lsp 700,":c;chara\lamianloid_ha05.bmp",0,0:print 10,500
>The tiny little bumps lining her tail latch onto my glans and balls.\
>Even though they're just holding onto me, it already feels too good to endure...\
name $name
>If I started rubbing you now...@>You wouldn't be able to endure it, would you?\
>My tiny little bumps will rub and caress your weakest points all at once...@
>And if I squeezed it at the same time...@
>Oh, you would come so fast you would go crazy. \
name ""
name "Luka"
>S...Stop!\
name ""
name $name
>Haha... Look at you quaking in so much expectation.@
>What kind of feeling are you imagining?\
>Let me make you feel it... It will be even better than you imagine.@
>Do your best to see how long you can hold out. \
name ""
lsp 700,":c;chara\lamianloid_ha06.bmp",0,0:print 10,500
>With that, Lamiaroid starts moving her tail up and down.@
>The tiny little bumps lining her tail all start rubbing against me in one intense jolt of pleasure.\
name "Luka"
>Ahhh!\
name ""
name $name
>Ahaha, already crying out?@
>Does it feel that good to be stroked by my tail?\
>More... Give me more of that pathetic voice! \
name ""
>Her tail continues slowly stroking me up and down, the bumps rubbing intensely against me all the while.\
>At the same time, she squeezes my penis, forcing an intense stimulation into me.\
name $name
>Hey, can you hear it?@>That squelching noise...@
>That's the sound of my tail dominating your penis.\
name ""
name "Luka"
>Haa... Ahhh!\
name ""
>Her strokes slowly pick up in intensity.@
>Squeezing tighter, rubbing faster... The skilled movements are too much for any man to endure.\
name $name
>You realize it, don't you?@> That I'm just slowly bringing you to your finish...@
>You can try whatever you want, but I can make anyone finish...\
name ""
>The forcible pleasure brings me right before a climax.\
name $name
>Good... Relax your waist like that.@
>It will feel oh so good as you pew pew out that semen. \
name ""
>Lamiaroid softly invites me to let go and finish...@
>All the while, her tail doesn't stop stroking me.\
name $name
>If I squeeze it really tight...@
>Will you let go of that semen you're holding back?\
name ""
name "Luka"
>Ah...Ahh...@
>No... I'm coming!\
name ""
>Finally reaching my limit, my waist jerks up as I explode.\
gosub *syasei1
lsp 700,":c;chara\lamianloid_ha07.bmp",0,0
gosub *syasei2
name "Luka"
>Ahh...\
name ""
name $name
>Ahahaha... You came. @
>Even though you were trying so hard, you leaked it out. \
name ""
>My semen shot out all over her tail, all while she kept stroking me, encouraging more semen during my orgasm.\
mov %hseanwave,0:hseanwave
lsp 700,":c;chara\lamianloid_ha08.bmp",0,0:print 10,500
name $name
>Aha, isn't that just pathetic?@
>You said you didn't feel anything, but you came anyway. \
>You endured with everything you could...@> But it was impossible, wasn't it?@
>Despite everything you had, you couldn't stop yourself from coming.\
name ""
name "Luka"
>..........\
name ""
>Too ashamed of myself to speak, I just stay silent.@
>Lamiaroid looks at me with dissatisfaction.\
name $name
>Why aren't you saying anything?@
>Do you not want to talk to me?\
>...If you aren't going to talk, then how about this?\
name ""
>Lamiaroid suddenly moves strange tentacles toward me!@
lsp 700,":c;chara\lamianloid_ha09.bmp",0,0:print 10,500
>And sandwiches my penis between them!\
name "Luka"
>Ahh... Nnng!\
name ""
>As I open my mouth to gasp, she covers my mouth with her hand!\
name $name
>You didn't want to talk, right?@
>Then I'll help shut you up with this...\
>Look down in silence and watch your penis be dominated... \
name ""
name "Luka"
>Nnnnn!\
name ""
mov %hseanwave,11:hseanwave
lsp 700,":c;chara\lamianloid_ha10.bmp",0,0:print 10,500
name $name
>Now I'll rub it all nice and clean... \
name ""
>The scissor-like tentacles slowly start to move, gently pressing and squeezing my penis between them.\
name "Luka"
>Nnnnnn!!\
name ""
name $name
>Hahaha... Oh, so now you're trying to open your mouth?@
>You're wanting to speak now that your penis is being brushed by my tentacles?\
>How does it feel having your penis played with like this? @
>The tiny bumps can fit right against your penis, right into any gap. \
>They'll make sure that dirty, dirty penis of yours is cleaned up. \
name ""
lsp 700,":c;chara\lamianloid_ha11.bmp",0,0:print 10,500
>The tentacles start to move more violently, rubbing hard against my penis.\
name $name
>Look, look!@>I'm brushing your penis, haha. @
>I'll scrub your cock until it's nice and shiny. \
name ""
name "Luka"
>Nnnn!@>Nnnnnn!!\
name ""
lsp 700,":c;chara\lamianloid_ha12.bmp",0,0:print 10,500
>The tiny tentacles crawl all over my sensitive glans, rubbing and seemingly brushing it clean.\
>Lamiaroid keeps holding her hand over my mouth as I writhe around and try to moan, blocking any sound from coming out.\
name $name
>Haha, does it feel good having your penis brushed? @
>Your dirty place is getting an extra special cleaning...\
>I'll make sure to clean the back of it, too. @
>Your dick will be nice and sparkling clean! \
name ""
name "Luka"
>Nnnnn!@> Nnnn...!\
name ""
gosub *syasei1
lsp 700,":c;chara\lamianloid_ha13.bmp",0,0
gosub *syasei2
>In the next instant, a blast of pleasure courses through my body as I explode, spraying my semen straight into the air as she polishes my penis.\
mov %hseanwave,0:hseanwave
lsp 700,":c;chara\lamianloid_ha14.bmp",0,0:print 10,500
name $name
>Ehhh?@>Making it dirty again!?@
>And here I just made it all clean! What are you thinking, getting semen all over it...?\
>Aren't you ashamed at coming while having your dick cleaned?@
>If you're going to keep coming so quickly, I'll never be able to wash it, you know?\
name ""
mov %hseanwave,13:hseanwave
lsp 700,":c;chara\lamianloid_ha15.bmp",0,0:print 10,500
>Lamiaroid continues brushing and cleaning my penis, even as she admonishes me.@
>The intense stimulation is like a torture of pleasure attacking me.\
name "Luka"
>Nnnnnn!!\
name ""
name $name
>It's time to resume the cleaning! @
>I'll just have to clean this dirty-again penis extra hard. \
>This is all your fault, you know?@
>We wouldn't be doing this right now if you hadn't have gone ahead and came in the middle of your scrubbing. \
name ""
name "Luka"
>Nnnnn!!\
name ""
>My body jumps around in unbearable pleasure.@
>But my screaming and moaning won't do anything to get me free from her...\
name $name
>Scrub, scrub...@
>Look, it's all clean and pretty! \
>Come on, stop struggling! @
>Just be still, I'm almost done here!\
name ""
name "Luka"
>Nnngg... Nnnn!\
name ""
gosub *syasei1
lsp 700,":c;chara\lamianloid_ha16.bmp",0,0
gosub *syasei2
>I explode again, even as she's still brushing my penis.@
>But despite my semen shooting everywhere, she still doesn't stop her intense movements.\
name $name
>Ahaha, what are you doing!?@
>If you do that, I'll just have to scrub even harder! \
>If you want this cleaning to stop, you just have to stop coming all over the place!@
>Haha, you better stop being so unreasonable! \
name ""
name "Luka"
>Nnnng!@> Nnnnn!!\
name ""
>I writhe in agony as Lamiaroid's scrubbing continues even during my ejaculation.\
>My extra sensitive penis leaks out more and more semen, getting all over the place as my body spasms.\
name $name
>Hahaha... Did your semen faucet break?@
>Right after I wash it clean... It just keeps on leaking, doesn't it?\
name ""
name "Luka"
>Nnnn...!@> Nnn!\
name ""
name $name
>Eh... Are you... Crying?@
>Crying just from having it washed?\
>That's pretty pathetic, don't you think? @
>The brave Hero crying from having his dick washed a little! \
name ""
>Lamiaroid laughs out loud as she continues toying with my penis.@
>Suffering from overwhelming pleasure, I can barely catch my breath between spasms.\
mov %hseanwave,0:hseanwave
lsp 700,":c;chara\lamianloid_ha09.bmp",0,0:print 10,500
name "Luka"
>Nnn... Nnng...\
name ""
name $name
>If we keep this up, you'll die...@
>So next, I'll treat your penis nice and gently.\
>I'll spoil you so much, you'll be like putty. \
name ""
lsp 700,":c;chara\lamianloid_ha17.bmp",0,0:print 10,500
>Her scissors-like arm suddenly changes, stretching out.@
>The skin looks thin and stretched...\
name $name
>Aha... It looks good, doesn't it?@
>This organ is made of ultra thin fibers, designed to squeeze out semen. \
>You use it like this...\
name ""
>With a strange smile on her face, Lamiaroid brings the thin fiber close to my penis...@
lsp 700,":c;chara\lamianloid_ha18.bmp",0,0:print 10,500
>And covers my penis with it!\
name "Luka"
>Ahhh!\
name ""
name $name
>I put it over your dick, and rub it like this...@
>The small meat fibers cling to it, and...\
>While feeling amazing as a boy, you'll have a powerful orgasm. \
name ""
name "Luka"
>S...Stop!\
name ""
name $name
>Don't look away...@
>Watch closely as your penis is given some tender love.\
name ""
>Grabbing hold of my head, Lamiaroid forces open my eyes.@
>Making me look at my crotch, I can't even look away from her raping me.\
name $name
>Now, I'll move it...@> It'll feel really good in a second.\
name ""
mov %hseanwave,23:hseanwave
lsp 700,":c;chara\lamianloid_ha19.bmp",0,0:print 10,500
>With that, Lamiaroid slowly starts to move it.@
>The thin fibers inside stick to my penis, pulling on me as she moves.\
name "Luka"
>Ahh...!\
name ""
name $name
>Hahaha... Is the stimulation too much?@
>Until just now, your dick was being washed, right?\
>This organ is usually for being gentle and inducing a slow orgasm, but...@
>Just for you, should I make it a little faster?\
name ""
>While laughing, she continues rubbing me with her strange organ, almost like she was scrubbing my penis again...\
>But unlike the brush-like organ from before, this thin film feels soft and gentle.\
name "Luka"
>Ha...!@> Ahhh!\
name ""
name $name
>Haha, you're leaking again! @
>This is what boys love feeling, right...?\
>You love shooting out your semen in bliss as these kinds of things rub against you...@
>With your face all loose, and your eyes going all blank...\
name ""
>Even though she's moving slow, the stimulation slowly builds up into something unbearable.\
>She's ever so slowly moving faster, too...@
>At this rate, she's going to bring me to another orgasm in no time.\
lsp 700,":c;chara\lamianloid_ha20.bmp",0,0:print 10,500
name $name
>Hahaha, take this and this... @
>It's all wet and slimy at your tip, can you feel it?\
name ""
name "Luka"
>Ha... Ahhhh!@
>C...Coming...!\
name ""
>As the thin fibers rub my penis, I finally reach another climax.@
>I feel my penis spasm as it also jumps closer to her.\
gosub *syasei1:gosub *syasei2
name "Luka"
>What... Is this!?\
name ""
>Even though I felt an orgasm, I didn't ejaculate.@
>Something sprayed out of my penis that wasn't semen.\
name $name
>Haha, your penis squirted! @
>Due to all the cleaning from before, your semen faucet broke! \
name ""
name "Luka"
>S...Stop... No more...@
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":c;chara\lamianloid_ha21.bmp",0,0
gosub *syasei2
>Surrendering to the thin fibers rubbing against me, I reach another quick climax.@
>But she doesn't stop for a moment, continuing the slow, hellish rubbing motions.\
name $name
>Haha, I'm bullying the ejaculating penis! @
>Look at him, squirting like a girl! \
name ""
name "Luka"
>Ahhhg!@> Ahhh!\
name ""
>Shaking in agonized pleasure, I continue squirting something out of my penis.@
>Lamiaroid continues teasing my penis, laughing and smiling as she enjoys my reactions.\
name "Luka"
>Haaa!@>I...I'm going to die! Ahh!\
name ""
name $name
>Haha, what are you talking about? \
>Don't you want to continue?@>To have me polish and rub that squirting penis of yours?\
>I'll do just as you want, see. @
>I'll break your penis all the way. \
name ""
name "Luka"
>Ahhg...!\
name ""
>I let out a scream as she forces me to squirt out even more.@
>Like that, she continues mercilessly toying with me, until I can barely even breathe...\
lsp 700,":c;chara\lamianloid_ha22.bmp",0,0:print 10,500
name "Luka"
>Ah...uh...\
name ""
name $name
>Haha, sorry, sorry. @
>I was just going to spoil you gently for a little, but I got carried away. \
>I made you experience orgasm hell, didn't I?@
>Let me make it up for you... I'll really reward you this time, so relax alright?\
name ""
lsp 700,":c;chara\lamianloid_ha23.bmp",0,0:print 10,500
name "Luka"
>Ahhh!!\
name ""
>Lamiaroid brings her tentacle arm toward me, coiling her tentacles around my sensitive penis.\
name $name
>Here, I won't be violent this time, alright?\
>I'll just gently wind my tentacles around your penis, and stroke you.@
>Then, as you're relaxing, I'll bring you to a nice, calming orgasm. \
name ""
>Her soft tentacles wrap around me, gently stroking me.@
>Completely different from the past stimulus, I sigh in the gentle pleasure.\
name $name
>See... I'll spoil you like this.@
>This time it will be a relaxing orgasm. \
name ""
name "Luka"
>Ah...ah...@
>Ahh...\
name ""
>The strength fades from my waist as her soft tentacles knead and massage my penis, like they were lovingly caressing me.\
mov %hseanwave,0:hseanwave
lsp 700,":c;chara\lamianloid_ha24.bmp",0,0:print 10,500
name $name
>Eh...?@> What's leaking out?\
name ""
name "Luka"
>Ahh... I leaked...\
name $name
>You're in a daze, and you leaked...@
>But it isn't semen, it's urine!\
>After the intense scrubbing, the gentle tentacles made you... Incontinent?\
name $name
>Geez... You got my new equipment all covered in urine!@
>That was naughty of you... Good children should apologize.\
name ""
name "Luka"
>Uh...urhg...\
name ""
>Too humiliated, I just remain silent.@
>Lamiaroid looks at me with a crooked smile as I avert my eyes.\
lsp 700,":c;chara\lamianloid_ha25.bmp",0,0:print 10,500
name $name
>For peeing in silence like that, you need to be punished.@
>I wasn't originally planning on using this, but...\
name ""
>Lamiaroid brings her left arm forward, showing off some strange opening.\
lsp 700,":c;chara\lamianloid_ha26.bmp",0,0:print 10,500
name $name
>Here, get a good look.@
>This hole is where I'm going to install your penis. \
>This unit is designed to squeeze out semen...@
>Once you're in here, I'll be squeezing all of yours out. \
>You don't want to put your penis in here, do you?@
>But I'm sorry... Since you were so naughty, there's no other choice. \
name ""
name "Luka"
>N...No!\
name ""
name $name
>Look, the opening is getting closer! @
>It's going to swallow your penis!\
name ""
>Lamiaroid slowly brings it closer to my penis...\
name "Luka"
>Ahhhh!!\
name ""
mov %hseanwave,15:hseanwave
lsp 700,":c;chara\lamianloid_ha27.bmp",0,0:print 10,500
>And with that, it sucks up my penis all the way inside!\
name $name
>Aha, it went in.@
>How does it feel inside?\
>It's going to suck out your semen very fast now. @
>It will feel soooo good, so get ready! \
name ""
name "Luka"
>Ahhh!\
name ""
>The lukewarm flesh inside of her hole instantly latches onto my penis, and starts massaging me.@
>My lower body spasms and jumps in pleasure, as I'm left lost for words.\
>There's no denying this stimulus...@
>With my penis inside, I'm left helpless as I'm brought to a powerful orgasm.\
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":c;chara\lamianloid_ha28.bmp",0,0
gosub *syasei2
>Feeling too good, I explode in moments inside her.\
name $name
>Ahaha... An instant extraction!@
>Does my organ feel that good?\
>Then I'll show you everything that it can do.@
>First, if I move my arm like this...\
name ""
lsp 700,":c;chara\lamianloid_ha29.bmp",0,0:print 10,500
name "Luka"
>Ahhhh!!\
name ""
>As Lamiaroid starts quickly pulling and pushing her arm, the lukewarm flesh rubs and strokes even harder against my penis.@
>Each push and pull attacks my glans and neck, bringing torrents of pleasure through my helpless body.\
name $name
>Haha, well?@>It's already the best thing you've ever felt, isn't it?@
>Go ahead and come now. \
name ""
name "Luka"
>Ahh!\
name ""
gosub *syasei1
lsp 700,":c;chara\lamianloid_ha30.bmp",0,0
gosub *syasei2
>Screaming in pleasure, I explode again inside her.@
>But far from slowing down, her movements only pick up speed.\
name "Luka"
>Hyaaa!@
>No, stop, help me! Ahhh!\
name ""
gosub *syasei1
lsp 700,":c;chara\lamianloid_ha31.bmp",0,0
gosub *syasei2
>The intense piston movements force out another orgasm.@
>Gasping, I'm given no choice but to shoot more semen into her hole.\
name $name
>Haha... I'm slowly extracting your semen, bit by bit. @
>At this rate, all of your semen will go into this disgusting hole. \
name ""
name "Luka"
>Hyaaa!@> N...No... I'm coming again!\
name ""
lsp 700,":c;chara\lamianloid_ha32.bmp",0,0:print 10,500
>But instead of another ejaculation, I feel something warmer leak out.@
>Losing all control of my lower body, I couldn't help but leak out urine into her hole.\
lsp 700,":c;chara\lamianloid_ha33.bmp",0,0:print 10,500
name $name
>Ahhh geez... You peed inside my semen sucking unit?@
>Is this part of some sort of plan to try to break it?\
name ""
name "Luka"
>Ah...\
name ""
lsp 700,":c;chara\lamianloid_ha34.bmp",0,0:print 10,500
name $name
>This time, properly give me your semen.@
>Stop peeing all over everything, like some sort of baby...\
name ""
>Before I can say anything back, Lamiaroid covers my mouth with her hand again.@
>At the same time, she starts moving her arm again.\
name $name
>This time, it will be something really amazing.@
>I'll put it on full operation mode, and put the vacuum to maximum force.\
>You'll scream and cry like crazy, so I'll block your mouth beforehand.@
>Are you ready? Here I go... \
name ""
lsp 700,":c;chara\lamianloid_ha35.bmp",0,0:print 10,500
name "Luka"
>Nnnn!@>Nnnnnnnnngggggg!!\
name ""
>A loud noise fills the air, as the flesh inside her suddenly shrinks.@
>A powerful suction is pulling my penis from deep inside her, causing intense vibrations through her arm at the same time.\
>My lower body goes numb in pleasure, as my vision starts to go white.\
name "Luka"
>Nnnn!@>Nnnnnn!!\
name ""
gosub *syasei1:gosub *syasei2
>Moaning as I explode inside her, the intense vacuum doesn't give me a moments rest.@
>Even during my orgasm, I feel another one being sucked out of me.\
name "Luka"
>Nnnng!@> Nnnn!\
name ""
gosub *syasei1
lsp 700,":c;chara\lamianloid_ha36.bmp",0,0
gosub *syasei2
>More semen shoots out of me into her, almost like my penis was a leaky faucet.\
name "Luka"
>Nnnnn!@> Nnnnnnnn!!\
name ""
>My body shakes in ecstasy as more and more is sucked out of me.@
>Orgasm after orgasm blows through me, wracking my body in a hell of seemingly never ending pleasure.\
name "Luka"
>Nnn....\
name ""
>My vision slowly starts to go dark, as it feels like something fries inside my brain.\
mov %hseanwave,0:hseanwave
>...........\
gosub *anten
name $name
>Hey, get up.@
>How long do you plan on sleeping?\
name ""
name "Luka"
>Ah... Ahh...\
name ""
lsp 700,":c;chara\lamianloid_ha37.bmp",0,0:print 10,500
name $name
>Look at how much semen you gave me...@
>You filled me all up! \
name ""
>As I open my eyes, Lamiaroid shows off a strange cavity, full of my cloudy semen.\
name "Luka"
>Ahh...\
name ""
name $name
>Look at all this!@>Aren't you embarrassed? @
>And you even fainted while coming! Haha!\
>How does it feel to be so dishonored?@
>And don't worry, I'll give you this same experience over and over again! \
name ""
name "Luka"
>.............\
name ""
>After the repeated rapes, my body and soul starts to crumble.@
>After a while, completely exhausted, I entrust everything of myself to Lamiaroid...\
gosub *anten
>.............\
goto *badend



*lamianloid_hb

mov $bad2,"After being overpowered by Lamiaroid's mouth, Luka is preyed on."
if %2856=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2856,1
name "Luka"
>Ahh...\
name ""
>Too weak to stand any longer, I fall back onto my ass.@
>Lamiaroid eagerly comes up closer to me, her face near my groin.\
cspl 690,699
lsp 700,":c;chara\lamianloid_hb01.bmp",0,0:print 10,500
name $name
>Nnnnhehehe. You're quite cute, you know? @
>Should I keep you alive...?\
>Hey, do you know what the most lewd, indecent hole is on a girl's body?\
name ""
name "Luka"
>Eh...?\
name ""
>Lamiaroid licks her lips as she stares closely at my face.\
lsp 700,":c;chara\lamianloid_hb02.bmp",0,0:print 10,500
name $name
>It's super sensitive...@>And always wet.@
>There's also so much freedom in its movement...\
>It's how they can really taste a man...@
>Feel every part of them more clearly than any other way. \
name ""
>Lamiaroid almost whispers that in my mouth, nearly salivating as she describes something to me.\
name $name
>Ahaha, you've been staring at it for a while now. \
>It's usually left closed... But when a cock is in front of it...@
>It opens wide, wanting to take it all inside. \
>Hey... Do you know what it is?\
name ""
lsp 700,":c;chara\lamianloid_hb03.bmp",0,0:print 10,500
>The strange description she gives, so seductively and close to my face makes my penis rise in response.@
>Looking straight at me, Lamiaroid smiles at my reaction.\
name $name
>Nnn... Did your penis figure out the right answer? @
>The answer is...@> You know it even without me saying, right?\
>Aha... Your dick is giving off a really perverted smell right now.@
>I'm going to get a good taste of it. \
name ""
mov %hseanvoice,1:hseanvoice
lsp 700,":c;chara\lamianloid_hb04.bmp",0,0:print 10,500
name $name
>Nnn... *Slurp*\
name ""
name "Luka"
>Haaa...\
name ""
>Lamiaroid's tongue reaches out, and starts to coil around my penis like it was a snake.\
name $name
>I'll check out your penis with my tongue... \
>The size and thickness are just above the passing mark...@
>But the taste...@> Your long journey has given it an exquisite taste.\
>Your glans is all squishy... And super weak.@
>It looks like there is plenty here for me to tease. \
name ""
>Her long tongue runs up and down my penis, exploring every inch of me as she describes it.\
name "Luka"
>Ahh...\
name ""
name $name
>Hey, wait... Are you already about to leak?@
>You aren't allowed to yet...@
>You haven't even really tasted anything yet.\
name ""
lsp 700,":c;chara\lamianloid_hb05.bmp",0,0:print 10,500
>Lamiaroid pulls away her tongue, and instead presses her lips against my glans!\
name $name
>Here... My snake tongue will give a kiss to your turtle head inside my mouth. \
>You're going to have sex with my mouth pussy now. @
>Let's start the real thing now. \
name ""
name "Luka"
>.............\
name ""
>I silently stare at Lamiaroid's mouth.@
>She's going to rape me with it...\
>Despite the fear at what's happening, I can't help but feel a sort of excitement.@
>She's going to use that long tongue and wet mouth to force me to come...\
name $name
>Aha, I'll break in your penis as I suck on it.@
>Now then, it's time to feast. \
name ""
lsp 700,":c;chara\lamianloid_hb06.bmp",0,0:print 10,500
>With a kissing noise, Lamiaroid takes the tip of my penis into her mouth.@
>The touch of her warm saliva fills my senses, as I relax and sigh in pleasure.\
name "Luka"
>Ah... Haaa...\
name ""
name $name
>Nnn... Delicious. @
>It really is best to taste a dick directly.\
>Nnnnn...\
name ""
>Lamiaroid sucks on my tip, making happy slurping noises as she seemingly devours it.\
lsp 700,":c;chara\lamianloid_hb07.bmp",0,0:print 10,500
name $name
>Hehe... Do you want to push it all the way inside at once?@
>But I want to get a good taste of your tip...\
>I'll give it a good cleaning with my tongue and gums...\
name ""
name "Luka"
>Ha... Ahhh!\
name ""
>Wrapping her tongue around my tip, Lamiaroid presses me against her gums as she continues sucking.\
name $name
>I'll cover it with saliva... @
>Mmm, I can even taste your pre-come. \
>I'll rub it against my cheeks to get off that extra hard to clean dirt... \
name ""
name "Luka"
>Haa!\
name ""
>As it feels like she's cleaning the tip of my penis with her entire mouth, it becomes too much to take.@
>Relaxing my waist, I give myself over to the sensations.\
name "Luka"
>Ah...!@> C...Coming!\
name ""
name $name
>Wait, it's far too early!\
name ""
gosub *syasei1
lsp 700,":c;chara\lamianloid_hb08.bmp",0,0
gosub *syasei2
name "Luka"
>Haaa...\
name ""
>I explode into her mouth, even as she continues her intense blowjob.@
>Even as I spurt semen, she doesn't stop rubbing my penis against her gums.\
name $name
>Nnnn... Spilling any would be such a waste.@
>Nnnnn... *Slurp* \
name ""
name "Luka"
>Ha... Ahh!\
name ""
>I softly moan as her tongue runs over my tip, licking up all of the semen that didn't already go into her mouth.\
lsp 700,":c;chara\lamianloid_hb09.bmp",0,0:print 10,500
name $name
>Nnnn... I swallowed it all.@
>Now, now... Don't come so fast next time, alright?\
>I've only just started on the tip, after all.@
>You may be a premature ejaculator, but try to have some sort of patience, okay? \
name ""
name "Luka"
>Haa...\
name ""
>I tremble in shame as Lamiaroid ridicules me.\
name $name
>This time, I'll give you some extra service.@
>I'll press your dick against my cheeks as I suck on it. \
name ""
name "Luka"
>Ahh...\
name ""
>Lamiaroid brings my penis back to her mouth.@
>It looks like she really does just consider me simple prey now...\
lsp 700,":c;chara\lamianloid_hb10.bmp",0,0:print 10,500
name $name
>Mmmm...\
name ""
name "Luka"
>Ah...\
name ""
>She slowly starts bringing my penis deeper into her mouth.@
>After wrapping her lips around my glans, she presses it against one of her cheeks.\
name $name
>Hehehe... Well?@
>My cheeks and the back of my lips feel good, don't they?\
>Haha... While I press it against them, I'll suck on you. \
name ""
>Lamiaroid starts to move her face as she presses my tip against her cheek.@
>The strange feeling of her wet flesh attacks me with new stimulations.\
name "Luka"
>Haaa!\
name ""
name $name
>Ahaha... Are you losing strength in your waist?@
>Here, get a good taste of this naughty mouth of mine. \
name ""
>Slowly bringing my penis in and out of her mouth, Lamiaroid lets her lips catch on my tip as she pulls it out.@
>Then pushing it back in, she rubs my glans against her smooth cheek.\
name $name
>Nnnhehe... As I slowly suck on it, I can feel your body trembling. @
>Shall I get a little serious now...?\
name ""
>Lamiaroid smiles as she brings my penis back into her mouth.\
name $name
>I won't let this out of my mouth until you come. @
>So if you can't hold out any longer, just let it go.\
>I already know everything about this cock...@
>So enjoy this blowjob. \
name ""
mov %hseanvoice,2:hseanvoice
lsp 700,":c;chara\lamianloid_hb11.bmp",0,0:print 10,500
name $name
>Nnnngg!@>Nnnnmmff!\
name ""
name "Luka"
>Ahhh!!\
name ""
>Lamiaroid purses her lips and starts to suck like a vacuum!@
>The intense pressure causes her lips to press down hard, as her cheeks push inward and press against my tip from both sides.\
>Sucking harder and harder, the pressure inside her mouth makes it get incredibly tight.\
name $name
>Nnnn... Mmmm...\
name ""
name "Luka"
>S...Stop... Ahhh!\
name ""
>Her lips glide up and down my penis as she sucks, the intense stimulation making me yell out.@
>Unable to do anything, I just moan as I feel another intense climax about to come out.\
name "Luka"
>C...Coming...!\
name ""
>Even as I shout out my surrender to the pleasure, Lamiaroid doesn't stop sucking for a moment.@
>Giving in to her mouth, I relax my waist.\
name "Luka"
>Haa... Ahh...\
name ""
gosub *syasei1
lsp 700,":c;chara\lamianloid_hb12.bmp",0,0
gosub *syasei2
name $name
>Nnn... Nnng!\
name ""
>Lamiaroid's lips eagerly glide up and down my penis as I come, extracting all of my semen right into her sucking mouth.\
name "Luka"
>Haa...\
name ""
>I lean back and moan right after my ejaculation, my semen flowing into her mouth as she continues sucking.\
name "Luka"
>Haaa... I just came... Stop sucking...!\
name ""
name $name
>Nnnn... *Suck*\
name ""
>It's like she is trying to torture my penis with pleasure...@
>Even though I'm coming, she's still sucking on me like she's trying to make me come again.\
name "Luka"
>Haaa!\
name ""
>My ejaculation is finally over, but her mouth still doesn't stop.\
name $name
>*Suck*\
name ""
name "Luka"
>Ha... Ahhh!\
name ""
>My arms and feet helplessly flail around as she sucks on me, bringing me further and further into a pleasure filled haze.\
name $name
>*Suck* *Slurp*\
name ""
name "Luka"
>N...No... Ahhh!\
name ""
gosub *syasei1
lsp 700,":c;chara\lamianloid_hb15.bmp",0,0
gosub *syasei2
>And with that, I'm brought to another quick ejaculation.@
>Sucking on me like a vacuum, she forced two fast shots out of me.\
>It felt different than being brought to an orgasm with pleasure...@
>It was more like a forcible ejaculation, like my body had no choice but to release into the suction.\
lsp 700,":c;chara\lamianloid_hb16.bmp",0,0:print 10,500
name $name
>Nnng... *Slurp*\
name ""
>Lamiaroid swallows my semen with a happy slurping noise.@
>Exhausted, I let the sweet malaise fill my body as her mouth continues gently sucking out the last of my semen.\
mov %hseanvoice,0:hseanvoice
name "Luka"
>Haaa... Y...Your cheeks...?\
name ""
>Looking up at her, I see a deep cut in her cheek.@
>Semen is spilling out of it...\
lsp 700,":c;chara\lamianloid_hb18.bmp",0,0:print 10,500
name $name
>Nnn? What's with the strange face?@
>Ah, my cheeks... So you noticed.\
>I got a little too into it, and I let my face get loose...\
name ""
name "Luka"
>Eh...?\
name ""
name $name
>Shall I show you my true face...?\
name ""
>As I look at her in confusion, Lamiaroid's face suddenly starts to part open!@
lsp 700,":c;chara\lamianloid_hb19.bmp",0,0:print 10,500
>With her jaws fully open, she looks just like a giant snake!\
name "Luka"
>Ah...Ahhh!\
name ""
name $name
>Aha, what's wrong?@
>It's rude to act all scared, you know.\
>Didn't you just use this mouth?@
>I swallowed all of that semen, you know?\
name ""
name "Luka"
>N...No way...\
name ""
>Fear and horror mix in my mind as I stare at her face.\
name $name
>Hmph... You're feeling disgusted, aren't you?@
>Is my snake mouth really that horrible?\
>But because of this mouth, I can make your penis feel so good...@
>Far more than any human woman could.\
name ""
>Lamiaroid slowly brings her strange face closer to my penis...\
name "Luka"
>Ahh... No, stop...\
name ""
name $name
>I'll show you...@
>Just how good this mouth can make you feel!\
name ""
name "Luka"
>Ah...!@> Ahhhh!!\
name ""
mov %hseanvoice,5:hseanvoice
lsp 700,":c;chara\lamianloid_hb20.bmp",0,0:print 10,500
>Opening her mouth wide, Lamiaroid takes my penis deep into her now unhinged mouth!\
name "Luka"
>Hyaaa... Stoooop!\
name ""
>With her wide mouth open, it's like a python swallowing my penis whole...@
>I feel the tip of my penis rubbing against the back of her throat as she easily takes me all the way in.\
name $name
>I'll swallow it all...@
>Your penis, all the way down...\
name ""
name "Luka"
>Ah...!@> Ahhh!\
name ""
lsp 700,":c;chara\lamianloid_hb21.bmp",0,0:print 10,500
>I yell out as my glans catches inside her throat, pressing hard against her wet flesh.@
>The soft flesh constricts and presses down on my penis, the stimulation varying every time she says something.\
name $name
>A snake's able to swallow prey much larger than a normal creature...@
>The muscles in our throats let us work the prey slowly into our stomaches.\
>And if I use those same muscles here...@
>Your penis stands no chance, just like my prey.\
name ""
>The muscles inside her throat start to compress, pressing against my penis.@
>Lamiaroid's soft flesh massages and presses against me, as her throat works to draw me deeper in.\
>Throat muscles designed to swallow prey whole...@
>Instead, she's using them to massage my penis inside her throat itself.\
name "Luka"
>Ha... Ahhh!\
name ""
name $name
>Haha, shall I crush your tip with my throat muscles?@
>Here... Squeeze! \
name ""
>Her throat constricts so tightly, it feels like she really could crush me inside it...\
name "Luka"
>Ahhh...\
name ""
gosub *syasei1
lsp 700,":c;chara\lamianloid_hb22.bmp",0,0
gosub *syasei2
>The crushing pleasure was too much for me to take, forcing me to another quick orgasm.@
>Already deep inside her throat, my squirting semen shoots straight into her stomach.\
lsp 700,":c;chara\lamianloid_hb23.bmp",0,0:print 10,500
name $name
>Nnnn... Nnngg... Delicious. \
name ""
name "Luka"
>No more... Please stop...\
name ""
>Struggling, I try to pull my waist back away from her mouth.@
>But her throat muscles tighten, keeping me trapped inside her.\
name $name
>Not yet... There's still a lot more in those balls I need to slurp out!\
name ""
name "Luka"
>Haa... Ahhhh!\
name ""
>Her muscles squeeze hard against my penis again, already starting to work out my next orgasm.\
>Moving in a rhythm designed to swallow prey, the tightness flows from the base of my penis all the way to my tip, as if milking me.\
name "Luka"
>Ah... Hyaa!\
name ""
gosub *syasei1
lsp 700,":c;chara\lamianloid_hb24.bmp",0,0
gosub *syasei2
>With a helpless cry, I reach another climax, spraying more semen down Lamiaroid's throat.\
name $name
>Nnng... You shot out more.@
>Your semen is really delicious...\
name ""
name "Luka"
>Haaa...\
name ""
>She swallowed my penis deep, and is squeezing it with her throat...@
>My penis really is just like prey, swallowed by a snake...\
lsp 700,":c;chara\lamianloid_hb25.bmp",0,0:print 10,500
name $name
>Hey, please... Give me more.@
>Keep giving it to me, until nothing more comes out.\
>I'll keep teasing you to help you shoot it all out! \
name ""
name "Luka"
>S...Stop... Hyaaa!\
name ""
>The stimulation only gets more and more intense.@
>The muscles in her throat get more and more violent, almost chewing on my penis inside her.\
>The wet flesh presses hard against my penis, her warm breath hitting my groin area as she works.\
name "Luka"
>Ah...!@> Ahhhhh!\
name ""
gosub *syasei1
lsp 700,":c;chara\lamianloid_hb26.bmp",0,0
gosub *syasei2
>I explode again, shooting my semen against the back of her throat.@
>It feels like I've shot everything that's in me down her throat already...\
name "Luka"
>Haa...\
name ""
name $name
>Nnngg.... *Slurp*\
name ""
>Her tight, squeezing throat milks out the last drops.@
>As she wanted, she squeezed out everything from me...\
mov %hseanvoice,0:hseanvoice
lsp 700,":c;chara\lamianloid_hb32.bmp",0,0:print 10,500
name $name
>Mmm... I drank it all. @
>Isn't being squeezed dry by a snake's mouth the best feeling ever?\
name ""
>Finally freeing me from her mouth, Lamiaroid shows off some of my semen still in her mouth as she teases me.\
name $name
>Well, since you don't seem to have any more in you...@
>I guess I'll eat you. \
name ""
name "Luka"
>Eh...?\
name ""
name $name
>Ahaha, are you surprised?@
>I'm not going to eat just your penis.@>I'm going to eat you.\
>Don't you remember me saying it before?@>My mouth can swallow prey much larger than normal...@
>Even your body is easily swallowed whole. \
name ""
name "Luka"
>No!@>Stop!\
name ""
lsp 700,":c;chara\lamianloid_hb35.bmp",0,0:print 10,500
name $name
>Well then, time to eat!\
name ""
name "Luka"
>Ah...!@> Ahhhhhh!!\
name ""
>Lamiaroid's mouth opens even wider, moving closer to my face.@
>I catch a glimpse of her cold-blooded eyes, absent of even a fragment of mercy.\
>It was the last thing I ever saw.\
gosub *anten
>Thus, the young Hero was swallowed whole by Lamiaroid after having been drained of semen.\
>............\
goto *badend



*knightloid_start

mov $name,"Knightroid"
mov $name2,"Knightroid"
mov $lavel,"knightloid"
mov $tatie1,"knightloid_st21"
mov $tatie2,"knightloid_st22"
mov $tatie3,"knightloid_st23"
mov $tatie4,"knightloid_st22"
mov $haikei,"bg225"
mov %monster_x,-50
mov %monster_y,0
if %nanido=1 mov %max_enemylife,30000
if %nanido=2 mov %max_enemylife,32000
if %nanido=3 mov %max_enemylife,34000
if %nanido=0 mov %max_enemylife,2
if %nanido=1 mov %henkahp1,20000
if %nanido=2 mov %henkahp1,22000
if %nanido=3 mov %henkahp1,24000
if %nanido=0 mov %henkahp1,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,35
if %nanido=3 mov %earth_keigen,18
mov %alice_skill,0
mov %music,2
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free of Knightroid!"
mov $mogaku_anno2,"Luka broke free of Knightroid!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"You can't break free of my restraint with that power..."
mov $mogaku_sel2,"Why not just drown yourself in my breasts?"
mov $mogaku_sel3,"Stop struggling... You're going to come!"
mov $mogaku_sel4,"Hmph... How sad."
mov $mogaku_sel5,"Is that it? Try a little harder, why don't you?"
mov $mogaku_dassyutu1,"I see... So you can break free of my restraint after all."
mov $mogaku_dassyutu2,"A force appropriate for a Hero."
mov $mogaku_earth_dassyutu1,"That's the power of the earth..."
mov $mogaku_earth_dassyutu2,"I will overcome that strange power of yours!"
mov $half_s1,"My sexual techniques aren't weak, either."
mov $half_s2,"Spray that semen on my spear!"
mov $kiki_s1,"Hmph... Is that it?"
mov $kiki_s2,"Your semen will stain my spear shortly."
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-350
mov %tukix,300
mov %owaza_count3a,6
name $name
>I am Knightroid.@
>A part machine stalwart follower of Arc-En-Ciel!\
name ""
>A half monster, half machine who calls herself Knightroid...@
>Despite her heavy looking body, she seems light on her feet.\
name "Luka"
>Arc-En-Ciel... Huh?\
name ""
>The one who beat up Granberia and the Giganto Weapon at the castle.@
>She does give off a similar vibe as her...\
name $name
>Conflict is the reason I exist.@
>So I prepared this for you.\
name ""
name "Luka"
>What's going to happen...?\
name ""
name $name
>Can't you see just from looking?@> We shall fight here.\
>If you win, I'll release all of the prisoners, including the Queen.@
>But if I win...\
name ""
name "Luka"
>You'll kill everyone...?\
name ""
>I fix my eyes on Knightroid, as she also picks up her spear.\
name "Luka"
>But this is in very bad taste...@
>And why are they all young women?\
name ""
name $name
>Hmph... It's a service from me to you.@
>Aren't men inspired by women cheering them on?\
>Now, come!@
>Show me the blade of the rumored Hero!\
name ""
mov %sinkou,1
goto *common_main



*knightloid001

name $name
>To think you'd be this skilled...@
>Attacking you with a thirst for blood is not enough to secure victory, I see that.\
>I'm not a big fan of this style of fighting, but...@
>I'll erase my blood thirst, and instead attack you with pleasure!\
name ""
mov $tatie1,"knightloid_st11"
mov $tatie2,"knightloid_st12"
mov $tatie3,"knightloid_st13"
mov $tatie4,"knightloid_st12"
gosub *face1
>Knightroid exposes her large breasts!\
mov %sinkou,2
goto *knightloid_b



*knightloid_v

gosub *face3
name $name
>I have no regrets... I gave it everything I had.@
>But... Arc-En-Ciel is much stronger than me...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Knightroid is sealed in the form of a lizard!\
mov %viclose,1:gosub *victory
mov %getexp,240000:gosub *lvup
mov %2386,1
goto *sean0355



*knightloid_kousan1

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
name $name
>Already surrendering? How cowardly...@
>I'll trample down everything of yours to show you how worthless you are!\
name ""
mov $tatie1,"knightloid_st11"
mov $tatie2,"knightloid_st12"
mov $tatie3,"knightloid_st13"
mov $tatie4,"knightloid_st12"
gosub *face1
>Knightroid exposes her large breasts!\
mov %sinkou,2
goto *knightloid_a



*knightloid_kousan2

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Already surrendering? How cowardly...@
>I'll trample down everything of yours to show you how worthless you are!\
name ""
goto *knightloid_a



*knightloid_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 && %sinkou=1 goto *knightloid_kousan1
if %cmd1=15 && %sinkou=2 goto *knightloid_kousan2
if %cmd1=16 goto *knightloid_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *knightloid_main



*knightloid_a

if %sinkou=2 goto *knightloid_b
if %enemylife<%henkahp1 && %sinkou=1 goto *knightloid001
rnd2 %ransu,1,4
if %ransu=1 gosub *knightloid_a9:goto *common_main
if %ransu=2 && %enemy_fire=0 gosub *knightloid_a10:goto *common_main
if %ransu=2 && %enemy_fire>0 gosub *knightloid_a11:goto *common_main
if %ransu>2 && %owaza_count3a>7 gosub *knightloid_el4:goto *common_main
skip -5



*knightloid_b

if %kousoku=1 && %earth>0 gosub *knightloid_a6:goto *common_main
if %kousoku=1 && %earth=0 gosub *knightloid_a7:goto *common_main
rnd2 %ransu,1,8
if %ransu=1 gosub *knightloid_a1:goto *common_main
if %ransu=2 gosub *knightloid_a2:goto *common_main
if %ransu=3 gosub *knightloid_a3:goto *common_main
if %ransu=4 gosub *knightloid_a4:goto *common_main
if %ransu<7 && %owaza_count1a>5 && %enemy_fire=0 gosub *knightloid_a5:goto *common_main
if %ransu>6 && %owaza_count3a>7 && %enemy_fire=0 gosub *knightloid_el4:goto *common_main
skip -7



*knightloid_el4

add %stack,1
mov %owaza_count3a,0
name $name
>Come, Gigamander!\
name ""
skillname "Fire Spirit Summon"
mov %enemy_fire,5
dwave 2,"se\fire2.ogg"
lsp2 0,":a;chara\gigamander_st01.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *enemy_elm_print
>Knightroid summons a spirit of fire!\
skillname ""
sub %stack,1
return



*knightloid_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My oral techniques are a little rough..."
if %ransu=2 mov $sel1,"Your shaft will be a toy for my mouth!"
if %ransu=3 mov $sel1,"Pour your semen inside my mouth!"
name $name
eng $sel1:$sel6\
name ""
skillname "Oral Drills"
dwave 1,"se\ero_pyu2.ogg"
lsp 690,":a;chara\knightloid_ct21.bmp",0,0:print 10,500
>Knightroid's tongue runs all over Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99
if %enemy_fire=0 && %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %enemy_fire>0 && %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3884
if %nanido<2 damage 330,350
if %nanido=2 damage 370,390
if %nanido=3 damage 410,430
if %enemy_fire=0 skip 11
dwave 1,"se\ero_pyu1.ogg"
>Her tongue licks around his glans!
if %nanido<2 damage 330,350
if %nanido=2 damage 370,390
if %nanido=3 damage 410,430
dwave 1,"se\ero_pyu2.ogg"
>The tip of her tongue runs up and down the back of Luka's penis!
if %nanido<2 damage 330,350
if %nanido=2 damage 370,390
if %nanido=3 damage 410,430
skillname ""
if %mylife=0 sub %stack,1:return *knightloid_h1
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*knightloid_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I can use my spear like this, too..."
if %ransu=2 mov $sel1,"Don't move..."
if %ransu=3 mov $sel1,"I'm very skilled with my spear... Haha."
name $name
eng $sel1:$sel6\
name ""
skillname "Chivalric Spear Rub"
dwave 1,"se\ero_koki1.ogg"
>Knightroid uses her spear to tickle Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99
if %enemy_fire=0 && %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %enemy_fire>0 && %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3885
if %nanido<2 damage 340,360
if %nanido=2 damage 380,400
if %nanido=3 damage 420,440
if %enemy_fire=0 skip 11
dwave 1,"se\ero_koki1.ogg"
>Her spear runs up and down the back of Luka's penis!
if %nanido<2 damage 340,360
if %nanido=2 damage 380,400
if %nanido=3 damage 420,440
dwave 1,"se\ero_koki1.ogg"
>She uses the tip of it to rub against Luka's urethral opening!
if %nanido<2 damage 340,360
if %nanido=2 damage 380,400
if %nanido=3 damage 420,440
skillname ""
if %mylife=0 sub %stack,1:return *knightloid_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*knightloid_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll crush the proof of your manhood."
if %ransu=2 mov $sel1,"How does it feel having your genitals played with by a weapon?"
if %ransu=3 mov $sel1,"Only a pathetic man would react to this..."
name $name
eng $sel1:$sel6\
name ""
skillname "Chivalric Spear Handling"
dwave 1,"se\ero_koki1.ogg"
>Knightroid presses her spear against Luka's penis, stimulating him!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99
if %enemy_fire=0 && %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %enemy_fire>0 && %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3886
if %nanido<2 damage 350,370
if %nanido=2 damage 390,420
if %nanido=3 damage 430,470
if %enemy_fire=0 skip 11
dwave 1,"se\ero_koki1.ogg"
>She presses her spear against his balls at the same time!
if %nanido<2 damage 350,370
if %nanido=2 damage 390,420
if %nanido=3 damage 430,470
dwave 1,"se\ero_koki1.ogg"
>Pushing down, she rubs it against the glans of Luka's penis!
if %nanido<2 damage 350,370
if %nanido=2 damage 390,420
if %nanido=3 damage 430,470
skillname ""
if %mylife=0 sub %stack,1:return *knightloid_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*knightloid_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Haha... I'll hit your penis!"
if %ransu=2 mov $sel1,"Can you withstand my whip!?"
if %ransu=3 mov $sel1,"Does this give you pain? Or pleasure?"
name $name
eng $sel1:$sel6\
name ""
skillname "Chivalric Whip"
dwave 1,"se\spank.ogg"
if %kousan<2 lsp 690,":a;chara\knightloid_ct11.bmp",0,0:print 10,500
lsp 690,":a;chara\knightloid_ct12.bmp",0,0:print 10,500
>Brandishing her whip-like organ, she aims it at Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99
if %enemy_fire=0 && %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %enemy_fire>0 && %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3887
if %nanido<2 damage 120,130
if %nanido=2 damage 130,140
if %nanido=3 damage 140,150
dwave 1,"se\spank.ogg"
>Whipping it again, her organ coils around Luka's penis!
if %nanido<2 damage 120,130
if %nanido=2 damage 130,140
if %nanido=3 damage 140,150
dwave 1,"se\ero_simetuke1.ogg"
>The whip tightens around Luka's penis!
if %nanido<2 damage 120,130
if %nanido=2 damage 130,140
if %nanido=3 damage 140,150
if %enemy_fire=0 skip 16
dwave 1,"se\spank.ogg"
>She pulls her whip back, and slaps his penis again!
if %nanido<2 damage 120,130
if %nanido=2 damage 130,140
if %nanido=3 damage 140,150
dwave 1,"se\ero_simetuke1.ogg"
>The whip tightens around Luka's penis!
if %nanido<2 damage 120,130
if %nanido=2 damage 130,140
if %nanido=3 damage 140,150
dwave 1,"se\ero_simetuke1.ogg"
>Shaking her wrist, Knightroid stimulates Luka's penis with her whip!
if %nanido<2 damage 120,130
if %nanido=2 damage 130,140
if %nanido=3 damage 140,150
skillname ""
if %mylife=0 sub %stack,1:return *knightloid_h4
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*knightloid_a5

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 4
name $name
>I'll show you the power of my other weapons... These breasts!\
name ""
skillname "Knightly Breast Force"
dwave 1,"se\ero_sigoki1.ogg"
eng "Knightroid pushes Luka down, and presses her big breasts against his groin!":$sel6/
if %daten>0 goto *skill22x
if %enemy_fire=0 && %aqua>0 && %ransu<10 gosub *aqua_guard:sub %stack,1:return
if %enemy_fire>0 && %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
>Her soft breasts press hard against his penis!
skillcount3 3888
if %nanido<2 damage 300,320
if %nanido=2 damage 340,360
if %nanido=3 damage 380,400
lsp 690,":c;chara\knightloid_ha01.bmp",0,0
mov %kousoku,1:gosub *status_print
>Luka has been bound by Knightroid!\
skillname ""
if %mylife=0 sub %stack,1:return *knightloid_h5
name $name
>Haha... They are surprisingly soft, aren't they?@
>No man can escape from a woman's ultimate weapons!\
name ""
if %earth=0 && %nanido<2 mov %genmogaku,99
if %earth=0 && %nanido=2 mov %genmogaku,99
if %earth=0 && %nanido=3 mov %genmogaku,99
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
sub %stack,1
return



*knightloid_a6

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Bury yourself in my breasts!"
if %ransu=2 mov $sel1,"Spray out your semen between my breasts!"
if %ransu=3 mov $sel1,"Feel the power of my weapons!"
name $name
eng $sel1:$sel6\
name ""
skillname "Knightly Breast Force"
dwave 1,"se\ero_sigoki1.ogg"
>Knightroid's soft breasts press harder against Luka's penis!
skillcount3 3888
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
dwave 1,"se\ero_sigoki1.ogg"
>Pressing them together, Knightroid squeezes Luka's penis between her breasts!
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
dwave 1,"se\ero_sigoki1.ogg"
>The soft pressure overwhelms Luka!
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
skillname ""
if %mylife=0 sub %stack,1:return *knightloid_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*knightloid_a7

add %stack,1
if %kousan=2 skip 5
name $name
>But what makes these weapons powerful is not just their softness...@
>I can even rape a man with my nipples!\
name ""
skillname "Knightly Breast Milking"
dwave 1,"se\ero_pyu1.ogg"
>Knightroid's nipple opens up, taking Luka's penis inside her breast!\
lsp 690,":c;chara\knightloid_ha19.bmp",0,0:print 10,500
>Her nipple takes Luka's penis deep inside her breast!
skillcount3 3889
mov %damage_kotei,1
damage 400,500
mov %kousoku,1:gosub *status_print
>Luka is being raped by Knightroid's nipples!\
skillname ""
if %mylife=0 sub %stack,1:return *knightloid_h6
name "Luka"
>Ah...Ahhh!\
name ""
lsp 690,":c;chara\knightloid_ha21.bmp",0,0:print 10,500
>The soft pressure of Knightroid's breast squeezes down around Luka's penis, now inside one!\
name $name
>Haha... There's no pulling out until you come.@
>You will not be free until you come inside my breast!\
name ""
sub %stack,1
goto *knightloid_a8



*knightloid_a8

add %stack,1
>Luka is being raped by Knightroid's nipples...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"There's no escape now... Resign yourself.":mov $sel2,"Luka's penis is tossed side to side as Knightroid shakes her chest!"
if %ransu=2 mov $sel1,"I'll crush your penis inside my breast.":mov $sel2,"The soft flesh inside Knightroid's breast crushes Luka's penis!"
if %ransu=3 mov $sel1,"This stimulation feels the best, doesn't it?":mov $sel2,"The wavy walls inside Knightroid's nipple stimulates Luka's penis!"
if %ransu=4 mov $sel1,"Spit out your semen inside my breast!":mov $sel2,"The nipple hole tightens around Luka's penis!"
if %ransu=5 mov $sel1,"How does it feel, being raped by a nipple?":mov $sel2,"Tossing her breasts side to side, Luka's penis grinds hard against Knightroid's nipple walls!"
name $name
eng $sel1:$sel6\
name ""
skillname "Knightly Breast Milking"
dwave 1,"se\ero_kyuin2.ogg"
eng $sel2:$sel6
skillcount3 3889
mov %damage_kotei,1
damage 400,500
skillname ""
if %mylife=0 sub %stack,1:return *knightloid_h6
sub %stack,1
goto *knightloid_a8



*knightloid_a9

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Haa!"
if %ransu=2 mov $sel1,"Ha!"
if %ransu=3 mov $sel1,"Eat this!"
name $name
eng $sel1:$sel6\
name ""
dwave 1,"se\tuki.ogg"
>Knightroid attacks!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
if %enemy_fire=0 damage 400,500
if %enemy_fire>0 damage 800,1000
skillname ""
if %mylife=0 sub %stack,1:return *knightloid_h7
sub %stack,1
return



*knightloid_a10

add %stack,1
if %enemy_fire>0 gosub *knightloid_a11:sub %stack,1:return
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"How about this technique!?"
if %ransu=2 mov $sel1,"My spear will pierce you!"
if %ransu=3 mov $sel1,"If you lose focus, you'll die!"
name $name
eng $sel1:$sel6\
name ""
skillname "Galeforce Decapitation"
dwave 1,"se\karaburi.ogg"
lsp 690,":a;chara\knightloid_ct31.bmp",0,0:print 10,500
>Knightroid thrusts her spear at Luka's neck, fast as a gale!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
mov %a_effect1,1
damage 800,1000
skillname ""
csp 690:print 10,500
if %mylife=0 sub %stack,1:return *knightloid_h7
sub %stack,1
return



*knightloid_a11

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Taste my skill!"
if %ransu=2 mov $sel1,"This technique will destroy you!"
if %ransu=3 mov $sel1,"Imbued with the power of flame...!"
name $name
eng $sel1:$sel6\
name ""
skillname "Conflagrating Decapitation"
dwave 1,"se\karaburi.ogg"
lsp 690,":a;chara\knightloid_ct31.bmp",0,0:print 10,500
>Knightroid thrusts her spear at Luka's neck!
dwave 2,"se\fire2.ogg"
>As it shoots forward, flames lick up and down her spear!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
mov %a_effect1,1
if %nanido<2 damage 800,1000
if %nanido=2 damage 800,1000
if %nanido=3 damage 800,1000
skillname ""
csp 690:print 10,500
if %mylife=0 sub %stack,1:return *knightloid_h7
sub %stack,1
return



*knightloid_onedari

mov $list1,"Oral Drills"
if %3884>0 mov %list_num1,1
mov $list2,"Chivalric Spear Rub"
if %3885>0 mov %list_num2,1
mov $list3,"Chivalric Spear Handling"
if %3886>0 mov %list_num3,1
mov $list4,"Chivalric Whip"
if %3887>0 mov %list_num4,1
mov $list5,"Knightly Breast Force"
if %3888>0 mov %list_num5,1
mov $list6,"Knightly Breast Milking"
if %3889>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *knightloid_onedari1
if %cmd1=12 goto *knightloid_onedari2
if %cmd1=13 goto *knightloid_onedari3
if %cmd1=14 goto *knightloid_onedari4
if %cmd1=15 goto *knightloid_onedari5
if %cmd1=16 goto *knightloid_onedari6
if %cmd1=-1 goto *knightloid_main
goto *knightloid_onedari



*knightloid_onedari1

mov $tatie2,"knightloid_st12"
gosub *onedari_syori
name $name
>You want to taste my oral skills...?@
>I'll be sure to punish a coward who surrenders in a suitable fashion...\
name ""
gosub *knightloid_el4
gosub *knightloid_a1
skip -1



*knightloid_onedari2

mov $tatie2,"knightloid_st12"
gosub *onedari_syori
name $name
>You want me to stroke your penis with my spear...?@
>I'll be sure to punish a coward who surrenders in a suitable fashion...\
name ""
gosub *knightloid_el4
gosub *knightloid_a2
skip -1



*knightloid_onedari3

mov $tatie2,"knightloid_st12"
gosub *onedari_syori
name $name
>You want me to crush your penis with my spear...?@
>I'll be sure to punish a coward who surrenders in a suitable fashion...\
name ""
gosub *knightloid_el4
gosub *knightloid_a3
skip -1



*knightloid_onedari4

mov $tatie2,"knightloid_st12"
gosub *onedari_syori
name $name
>You want me to whip your penis...?@
>I'll be sure to punish a coward who surrenders in a suitable fashion...\
name ""
gosub *knightloid_el4
gosub *knightloid_a4
skip -1



*knightloid_onedari5

mov $tatie2,"knightloid_st12"
if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want to be humiliated by my breasts...?@
>I'll be sure to punish a coward who surrenders in a suitable fashion...\
name ""
if %kousoku=0 gosub *knightloid_a5
gosub *knightloid_a6
skip -1



*knightloid_onedari6

mov $tatie2,"knightloid_st12"
if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want me to rape you with my breasts...?@
>I'll be sure to punish a coward who surrenders in a suitable fashion...\
name ""
if %kousoku=0 gosub *knightloid_a5
gosub *knightloid_a7
skip -1



*knightloid_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\knightloid_ct22.bmp",0,0
gosub *syasei2
>As Knightroid sucks on Luka's penis, he comes, pouring his semen down her throat.\
mov %viclose,1:gosub *lose
mov %2686,%2686+1:if %2686=1 mov %count_koenemy,%count_koenemy+1
if %2686>%count_most mov %count_most,%2686:mov $count_mostname,$name
count 4,5
mov $bad1,"Knightroid forced Luka to come with her mouth."
lsp 690,":a;chara\knightloid_ct23.bmp",0,0
gosub *face2
name $name
>You shot the proof of your defeat into my mouth...@
>To be finished so easily... You're more pathetic than I thought.\
name ""
goto *knightloid_h



*knightloid_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\knightloid_bk05.bmp",-50,0
gosub *syasei2
>As Knightroid skillfully strokes Luka's penis with the tip of her spear, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2686,%2686+1:if %2686=1 mov %count_koenemy,%count_koenemy+1
if %2686>%count_most mov %count_most,%2686:mov $count_mostname,$name
count 27,5
mov $bad1,"Knightroid used the tip of her spear to force Luka to come."
gosub *face2
name $name
>You covered my spear with the proof of your defeat...@
>To be finished so easily... You're more pathetic than I thought.\
name ""
goto *knightloid_h



*knightloid_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\knightloid_bk05.bmp",-50,0
gosub *syasei2
>As Knightroid presses down on Luka's penis with her spear, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2686,%2686+1:if %2686=1 mov %count_koenemy,%count_koenemy+1
if %2686>%count_most mov %count_most,%2686:mov $count_mostname,$name
count 27,5
mov $bad1,"Knightroid used the tip of her spear to force Luka to come."
gosub *face2
name $name
>You covered my spear with the proof of your defeat...@
>To be finished so easily... You're more pathetic than I thought.\
name ""
goto *knightloid_h



*knightloid_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\knightloid_bk03.bmp",-50,0
lsp 690,":a;chara\knightloid_ct13.bmp",0,0
gosub *syasei2
>As Knightroid whips Luka's penis, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2686,%2686+1:if %2686=1 mov %count_koenemy,%count_koenemy+1
if %2686>%count_most mov %count_most,%2686:mov $count_mostname,$name
count 27,5
mov $bad1,"Knightroid used her whip to force Luka to come."
gosub *face2
name $name
>You covered my whip with the proof of your defeat...@
>To be finished so easily... You're more pathetic than I thought.\
name ""
goto *knightloid_h



*knightloid_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":c;chara\knightloid_ha04.bmp",0,0
gosub *syasei2
>As Luka is squeezed between Knightroid's big breasts, he comes, covering her chest in semen.\
mov %viclose,1:gosub *lose
mov %2686,%2686+1:if %2686=1 mov %count_koenemy,%count_koenemy+1
if %2686>%count_most mov %count_most,%2686:mov $count_mostname,$name
count 7,5
mov $bad1,"Knightroid used her breasts to force Luka to come."
gosub *face2
name $name
>You covered my breasts with the proof of your defeat...@
>To be finished so easily... You're more pathetic than I thought.\
name ""
goto *knightloid_h



*knightloid_h6

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":c;chara\knightloid_ha22.bmp",0,0
gosub *syasei2
>Raped by Knightroid's nipples, Luka comes, spraying his semen directly into her breasts.\
mov %viclose,1:gosub *lose
mov %2686,%2686+1:if %2686=1 mov %count_koenemy,%count_koenemy+1
if %2686>%count_most mov %count_most,%2686:mov $count_mostname,$name
count 7,5
mov $bad1,"Knightroid used her nipples to force Luka to come."
gosub *face2
name $name
>You came inside my breasts...?@
>To be finished so easily... You're more pathetic than I thought.\
name ""
goto *knightloid_h



*knightloid_h7

name "Luka"
>Is this the end...!?\
name ""
>Overwhelmed by Knightroid's attacks, I fall to my knees.\
mov %viclose,2:gosub *lose
mov %2686,%2686+1:if %2686=1 mov %count_koenemy,%count_koenemy+1
if %2686>%count_most mov %count_most,%2686:mov $count_mostname,$name
count 14,5
mov $bad1,"Knightroid forced Luka to his knees with her physical abilities."
name $name
>...Hmph. Is that it?@
>The disgraced Hero isn't anything close to what I hoped for.\
name ""
goto *knightloid_h



*knightloid_h

mov $bad2,"After being raped in public, Luka is tossed aside."
if %2686=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahhh...\
name ""
name $name
>But ending it now would be a disappointment...@
>I'll battle you some more with my female weapons!\
name ""
cspl 690,699
lsp 700,":c;chara\knightloid_hb01.bmp",0,0:print 10,500
>Knightroid grabs hold of my body, and presses me hard against her body.@
>Our waists press against each other, her hold too powerful for me to break free from.\
name "Luka"
>Ahh... Let go...\
name ""
name $name
>Is it humiliating as a man to be raped by a woman?@
>If so, then this should be a good disgrace as well...\
name ""
lsp 700,":c;chara\knightloid_hb02.bmp",0,0:print 10,500
>Knightroid's tongue presses into my mouth.@
>Her tongue swirls around inside my mouth, licking and pressing my tongue aside wherever I try to stop her.\
name "Luka"
>Nnnng!@> Nnnnn!\
name ""
name $name
>Well? Frustrating, isn't it?@
>You should just give up and accept your helpless position...\
name ""
>I try to pull away, but she just grabs my chin and holds me in place.@
>Unable to escape, I just helplessly accept her tongue as it violates my mouth.\
lsp 690,":a;chara\knightloid_ct41.bmp",0,0:print 10,500
name "Town Girl"
>Wh...What the...?@
>Is he kissing the monster...?\
name ""
name "Sister"
>Keep fighting, Hero!@
>If you give up... We'll all...!\
name ""
csp 690:print 10,500
name $name
>Haha... Can you hear them, Hero?@
>They're all cheering for you. You better not disappoint them.\
>Now I'll really rape you...@
>I'll destroy your pride as a man with my ultimate weapon!\
name ""
name "Luka"
>S...Stop... Ahhhh!\
name ""
mov %hseanwave,2:hseanwave
lsp 700,":c;chara\knightloid_hb03.bmp",0,0:print 10,500
>Pressing me against her, Knightroid forces me deep into her vagina.\
name "Luka"
>Ah...!@> Ahhhh!\
name ""
>Her wet hole brings me in, the thick flesh inside her almost sucking me deeper into her.@
>Tiny bumps and folds line her insides, her intense tightness pressing them hard against my shaft.\
name $name
>Haha... We're mating now.@
>How does my vagina feel, Hero?\
name ""
name "Luka"
>Ahh... T...Too tight...\
name ""
lsp 690,":a;chara\knightloid_ct41.bmp",0,0
lsp 700,":c;chara\knightloid_hb04.bmp",0,0:print 10,500
name "Town Girl"
>R...Rape...@
>The monster is raping a human...@
>D...Disgusting!\
name ""
name "Sister"
>A real Hero would never let a monster do that to him!\
name ""
csp 690:print 10,500
name $name
>...Haha, that's right, isn't it?@
>Why don't you push me away, Hero?\
name ""
name "Luka"
>Ahhh...!\
name ""
>Far from being able to push her off, I can barely manage to breathe as her tight vagina squeezes down on me.@
>Knightroid is flexing her vaginal muscles on purpose, teasing me with the powerful pleasure.\
name $name
>What's wrong?@>Are you going to betray your fans?@
>Then allow me to attack this place...\
name ""
lsp 700,":c;chara\knightloid_hb05.bmp",0,0:print 10,500
name "Luka"
>Ah...!@> Ahhh!\
name ""
>Knightroid starts to move her waist.@
>Forcing me in and out of her, the bumps and folds inside her rub hard against my penis with each cycle.\
>Squeezing her vaginal muscles at the same time, it's like her vagina is a tight vice, grabbing hold of my penis, unwilling to let it escape from her hold.\
name "Luka"
>S...Stop... Ahhh!\
name ""
lsp 700,":c;chara\knightloid_hb06.bmp",0,0:print 10,500
name $name
>Look at you, being raped so one-sidedly by a woman...@
>Here, let me even take away that mouth of yours.\
name ""
>Knightroid's tongue presses back into my mouth, pushing around and running all over my tongue as she takes control again.\
>Even as she violates my mouth, her actual rape doesn't slow down for even a moment.\
name "Luka"
>Haa... Ahh!\
name ""
name $name
>Haha, it looks like you can't counter against me.\
>Now, come inside me.@
>Let all of these women watching know just how completely you have surrendered to me.\
name ""
name "Luka"
>Ah...!@> Ahhh!\
name ""
>Knightroid starts to move faster, trying to finish me off quickly.\
>Her vaginal muscles squeeze much tighter, as if ironing my penis inside her as she pumps me.@
>My lower body starts to ache as I feel her tight vagina defeating the last of my resistance.\
lsp 700,":c;chara\knightloid_hb05.bmp",0,0:print 10,500
lsp 690,":a;chara\knightloid_ct41.bmp",0,0:print 10,500
name "Town Girl"
>D...Disgusting...@
>He's actually having sex with that monster.\
name ""
name "Sister"
>Keep fighting, Hero...@
>I believe in you...!\
name ""
csp 690:print 10,500
>The women watch, some commenting with disgust, and others still praying...@
>Their words echo in my ears right before I feel myself on the verge of orgasm.\
name $name
>Now for the finishing blow!@
>Spray out your white seed everywhere!\
name ""
name "Luka"
>Ahhhh!!\
name ""
>With a final blow, Knightroid presses down hard, bringing me all the way inside her.@
>At the same time, her muscles tense up far tighter than ever before.\
gosub *syasei1
lsp 700,":c;chara\knightloid_hb07.bmp",0,0
gosub *syasei2
name "Luka"
>Ahhh...\
name ""
>The tight squeeze forces an instant orgasm out of me.@
>I moan as my semen spurts into her tight vagina.\
lsp 690,":a;chara\knightloid_ct42.bmp",0,0:print 10,500
name "Town Girl"
>He...He came...@
>What a loser!\
name ""
name "Sister"
>Ahh... Hero... What have you done...?\
name ""
csp 690:print 10,500
>Disappointment races through the crowd of women in a big wave.@
>The girls all watch with horror and scorn in their eyes as I come inside Knightroid.\
name $name
>Haha, so you came inside me?@
>Right in the middle of this Colosseum, you were so easily raped...\
>Hah! There's a lot more to come!@
>If you have any pride as a soldier, you should fight!\
name ""
mov %hseanwave,9:hseanwave
lsp 700,":c;chara\knightloid_hb08.bmp",0,0:print 10,500
>Knightroid starts bouncing with even more power up and down on me.@
>Helpless, I can only flail and moan as she overpowers me.\
name "Luka"
>Ahhhh!!\
name ""
>Far more intense than before, there's no way I can hope to fight against this one-sided rape.\
>With her muscles constricting against my tip and pulling at my neck, any power to endure another orgasm is quickly blown away.\
name "Luka"
>Ahhhh...!\
name ""
gosub *syasei1
lsp 700,":c;chara\knightloid_hb09.bmp",0,0
gosub *syasei2
>Helpless under her intense rape, I explode for a second time inside her tight vagina.\
lsp 690,":a;chara\knightloid_ct42.bmp",0,0:print 10,500
name "Town Girl"
>..........\
name ""
name "Sister"
>H...Hero...\
name ""
csp 690:print 10,500
>The eyes of the girls staring at me all narrow as their disappointment starts to turn into mutual contempt.\
name $name
>Haha... It looks like the women have all started to look down on you.@
>Let me give you even further disgrace...\
name ""
name "Luka"
>Eh...?@> Ahhh!\
name ""
>Her vaginal flesh squirms, rubbing against my sensitive glans.@
>The strange sensation causes my waist to tingle, as if wanting to release something besides semen.\
name $name
>Well? It feels interesting, doesn't it?@
>When I concentrate this motion on the glans...\
>It leads a man to incontinence.\
name ""
lsp 700,":c;chara\knightloid_hb10.bmp",0,0:print 10,500
>In the next moment, Knightroid pulls her waist away, exposing my penis to the air.@
>The sensation that I was feeling is shown out for everyone to see.\
name "Luka"
>Ahh...\
name ""
>I was squirting urine, not semen...@
>Sighing, I can't help but let the stream continue.\
lsp 700,":c;chara\knightloid_hb11.bmp",0,0:print 10,500
>It awkwardly streams out, as if the strange movements she did took away a stopper holding it in.\
lsp 690,":a;chara\knightloid_ct42.bmp",0,0:print 10,500
name "Town Girl"
>Y...You're kidding!?@
>He's... Peeing...?\
name ""
name "Sister"
>A... Disgusting pervert...@
>He's peeing in front of everyone...\
name ""
csp 690:print 10,500
>The girls mutter all around me, feeling nothing but hatred and contempt.@
>None of them are looking at me with hope in their eyes any longer.\
name $name
>...You are truly pathetic.@
>But your humiliation isn't over yet.\
>I must expose to the world how utterly powerless their Hero is.\
name ""
lsp 700,":c;chara\knightloid_hb13.bmp",0,0:print 10,500
>She presses her waist against me again, taking me back inside her for another insult to my pride.\
name "Luka"
>Ahh... Ah...!\
name ""
lsp 690,":a;chara\knightloid_ct42.bmp",0,0:print 10,500
name "Town Girl"
>That disgusting man...@> That monster should just kill him already...\
name ""
name "Sister"
>I can't believe I supported him...@> He's the worst...\
name ""
csp 690:print 10,500
>The girls look on in disgust as Knightroid continues raping me.@
>All I see in their once hopeful eyes is hatred.\
name "Luka"
>Ah...!@> Ahhhh!!\
name ""
name $name
>Raping the weak like this is amazing...@
>I see now what all of the other monsters were talking about.\
name ""
>Ahhhh!\
name ""
gosub *syasei1
lsp 700,":c;chara\knightloid_hb14.bmp",0,0
gosub *syasei2
>While being violently raped, I come inside her.@
>But even as I ejaculate, she doesn't stop moving even a bit.\
name $name
>Well, how is it?@
>I'll rape you dry at this rate!\
>Take this!\
name ""
name "Luka"
>Ahhh!!\
name ""
>Grinding hard against me, the violent rape only increases in intensity.@
>Every so often she squeezes my penis with her vaginal muscles as she tortures me with pleasure.\
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1
lsp 700,":c;chara\knightloid_hb15.bmp",0,0
gosub *syasei2
>And I'm forced to ejaculation after ejaculation.@
>Humiliated, I try to avoid looking at the women glaring at me all in the stands.\
lsp 690,":a;chara\knightloid_ct42.bmp",0,0:print 10,500
name "Town Girl"
>He's enjoying himself with that monster before we're all murdered!?@
>What a horrible Hero...\
name ""
name "Sister"
>Giving so much semen to a monster's womb...@
>How can he sin so openly...?\
name ""
csp 690:print 10,500
lsp 700,":c;chara\knightloid_hb16.bmp",0,0:print 10,500
name $name
>Haha... How does it feel to see all the women feeling betrayed by you?@
>You're forever disqualified as a Hero now... No, as a human!\
name ""
name "Luka"
>Ahhh!!\
name ""
>Her piston like movements continue, her machine body seemingly existing only to violate me.\
name "Luka"
>Ahhyaaa!\
name ""
gosub *syasei1:gosub *syasei2
>Clinging helplessly to Knightroid's body, my body spasms as I spray out more semen into her body.\
lsp 700,":c;chara\knightloid_hb17.bmp",0,0:print 10,500
>Before I knew what I was doing, my feet wrapped around her waist.\
>Am I trying to stop her movements...?@>Or am I just trying to pull myself closer to her body?@
>At this point, I don't even know...\
name "Luka"
>Ah... ahh...\
name ""
lsp 700,":c;chara\knightloid_hb18.bmp",0,0:print 10,500
name $name
>Moron... What are you doing?@
>Are you trying to feed your semen directly to my womb now?\
name ""
>She lets out a laugh at my reaction.\
lsp 690,":a;chara\knightloid_ct42.bmp",0,0:print 10,500
name "Town Girl"
>Disgusting... Disgusting...!\
name ""
name "Sister"
>He's pulling himself closer to the monster...@
>The Hero is... Enjoying mating with her...?\
name ""
csp 690:print 10,500
name $name
>Haha... The gallery seems to be heating up.@
>Perhaps we should show everyone the moment of your ejaculation!\
name ""
>Knightroid starts to squeeze my penis inside her, without moving.@
>The tight pressure around my glans induces an ejaculation almost right away...\
gosub *syasei1
lsp 700,":c;chara\knightloid_hb19.bmp",0,0
gosub *syasei2
name "Luka"
>Ahhh...\
name ""
name $name
>Haha, the girls are all watching.@
>Watching as your semen is flooding into my inhuman womb...\
name ""
lsp 690,":a;chara\knightloid_ct42.bmp",0,0:print 10,500
name "Town Girl"
>...........\
name ""
name "Sister"
>...........\
name ""
csp 690:print 10,500
>The woman aren't even saying anything any longer...@
>They're just staring at me, as if I was some disgusting garbage laying on the side of the road.\
lsp 700,":c;chara\knightloid_hb20.bmp",0,0:print 10,500
name $name
>I said I would kill all of the girls here if you lost...@
>But perhaps keeping a couple alive would be good.\
>So that they can go and tell everyone just how pathetic you were, and how you failed everyone.\
name ""
name "Luka"
>Haa... Ahhhh!\
name ""
lsp 700,":c;chara\knightloid_hb21.bmp",0,0:print 10,500
>With a laugh, she starts the intense piston movements again.@
>Moaning, I can only accept the rape as the girls in the stands coldly glare at me.\
name $name
>Haha, it isn't over yet!@
>I'm not stopping until you can't stand again!\
name ""
name "Luka"
>No...Ahhh...\
name ""
gosub *syasei1:gosub *syasei2
>My lower body goes numb as the near continuous ejaculations continue pouring into her.\
name "Luka"
>Ahh... No... Coming...\
name ""
lsp 700,":c;chara\knightloid_hb22.bmp",0,0:print 10,500
name $name
>Ejaculating again?@
>No wait, this is...\
name ""
name "Luka"
>Haaa...\
name ""
lsp 700,":c;chara\knightloid_hb23.bmp",0,0:print 10,500
name $name
>...Haha, urine again?@
>So your thing is breaking...\
>Is this your end as a human being?\
name ""
lsp 700,":c;chara\knightloid_hb24.bmp",0,0:print 10,500
name "Luka"
>Haaa...\
name ""
>My head goes white as my urine leaks out of my numb body, the mist of pleasure fogging up my thoughts.\
name $name
>Hmph... Miserable.@
>Take a good look at your own incontinence.\
>You, the only hope of these people, are laying on the floor pissing helplessly.\
name ""
lsp 690,":a;chara\knightloid_ct42.bmp",0,0:print 10,500
name "Town Girl"
>He's peeing again...\
name ""
name "Sister"
>T...The lowest of lows...\
name ""
csp 690:print 10,500
>The girls glare at me as I pee with a look of ecstasy on my face.@
>But I'm past the point of caring...\
name $name
>Are you done peeing?@
>Then let's continue the rape...\
name ""
name "Luka"
>Ahhhh!!\
name ""
lsp 700,":c;chara\knightloid_hb25.bmp",0,0:print 10,500
>And just like that, the intense rape begins again.@
>Her quick, powerful piston movements in full view of all the watching girls...\
gosub *syasei1
lsp 700,":c;chara\knightloid_hb26.bmp",0,0
gosub *syasei2
name "Luka"
>Hyaaa!\
name ""
name $name
>Haha, I can still squeeze out more!\
name ""
>One after another, she forces me to come.@
>With my lower body numb, all I can feel are the sparks of ecstasy as my penis continues to spit out semen into her.\
gosub *syasei1
lsp 700,":c;chara\knightloid_hb27.bmp",0,0
gosub *syasei2
lsp 690,":a;chara\knightloid_ct42.bmp",0,0:print 10,500
name "Town Girl"
>...........\
name ""
name "Sister"
>...........\
name ""
csp 690:print 10,500
>No light at all is left in the girl's eyes.@
>Their hope has been completely crushed, right in front of them.\
name "Luka"
>Ahh...\
name ""
>Left incredibly weak after the repeated rape, I feel my thoughts slow as my vision starts to go dark.\
name $name
>Are you fainting?@
>Coming, then peeing, and now fainting...\
name ""
name "Luka"
>Ahh...\
name ""
gosub *syasei1
lsp 700,":c;chara\knightloid_hb28.bmp",0,0
gosub *syasei2
>While being forced to continue coming, my vision goes dark.\
name "Luka"
>Ah...ah...\
name ""
mov %hseanwave,0:hseanwave
gosub *anten
name $name
>...It looks like my complete victory.@
>Now to execute the women...\
name ""
name "Town Girl"
>N...Nooo!\
name ""
name "Sister"
>Help us!\
name ""
name "Luka"
>...........\
name ""
>I can't even comprehend what's going on around me any longer.@
>All that awaits me is a life as a sex slave to these strange machine-like monsters...\
>...........\
goto *badend



*akaname_start

mov $name,"Akaname Girls"
mov $name2,"Akaname"
mov $lavel,"akaname"
mov $tatie1,"akaname_st01"
mov $tatie2,"akaname_st02"
mov $tatie3,"akaname_st03"
mov $tatie4,"akaname_h1"
mov $haikei,"bg088"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,15000
if %nanido=2 mov %max_enemylife,19000
if %nanido=3 mov %max_enemylife,23000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,20
if %nanido=3 mov %earth_keigen,10
mov %alice_skill,1
mov %alice_skill1,100
mov %alice_skill2,100
mov %alice_skill3,100
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen_plural
mov $mogaku_anno1,"But Luka can't break free of the Akaname Girls restraint!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"I won't let goooo!"
mov $mogaku_sel2,"Wahwahwah! Don't struggle around like that!"
mov $mogaku_sel3,"If you struggle, we'll just lick you more!"
mov $mogaku_sel4,"We won't let you go even if you struggle!"
mov $mogaku_sel5,"No! We want to lick you more!"
mov $mogaku_dassyutu1,"Arere? You ran...?"
mov $mogaku_dassyutu2,""
mov $mogaku_earth_dassyutu1,"Hyaa... You're so strong!"
mov $mogaku_earth_dassyutu2,""
mov %end_n,13
mov %exp_minus,0
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,4
mov %owaza_count2a,4
mov %owaza_count3a,4
name "Akaname A"
>Wah... He looks so delicious.@
>Ehehehe... It's alright to lick him, right?\
name ""
name "Akaname B"
>Don't lick him all by yourself...@
>I want to get a good taste too.\
name ""
name "Akaname C"
>Hey, I thought the next prey was mine!@
>I want to lick his penis clean!\
name ""
name "Luka"
>..........\
name ""
>What poor teamwork...@
>They're already fighting among themselves.\
name "Luka"
>Why did you attack the village!?@
>Why are you following Black Alice!?\
name ""
name "Akaname A"
>Well, I mean... We love licking men, you know?\
name ""
name "Akaname B"
>She said we could have as many men as we wanted...\
name ""
name "Akaname C"
>I don't really get it all... But I just love licking men. \
name ""
name "Luka"
>S...So simplistic...\
name ""
>They don't seem evil or ambitious...@
>They just simply gave in to Black Alice telling them they could have what they wanted.\
name "Akaname A"
>That's enough talking...@
>It's licking time!\
name ""
name "Akaname B"
>After we make you come a few times we'll let you go.@
>But... If we really like you, we might keep you as a tongue slave.\
name ""
name "Akaname C"
>You'll come like a madman with our licking techniques. @
>Get ready, because we're going to lick you completely clean. \
name ""
goto *common_main



*akaname_v

gosub *face3
name "Akaname A"
>Kya!\
name ""
name "Akaname B"
>What is this!?\
name ""
name "Akaname C"
>H...Hey, this is crazy!\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Akaname Girls are sealed in the form of midgets!\
mov %viclose,1:gosub *victory_plural
mov %getexp,150000:gosub *lvup
mov %2387,1
goto *sean0357



*akaname_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name "Akaname A"
>Aha, so you give up?@
>We'll clean you up as your reward. \
name ""
goto *akaname_a



*akaname_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *akaname_kousan
if %cmd1=16 goto *akaname_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *akaname_main



*akaname_a

if %kousoku=1 rnd2 %ransu,1,2
if %kousoku=1 && %ransu=1 gosub *akaname_a10:goto *common_main
if %kousoku=1 && %ransu=2 gosub *akaname_a11:goto *common_main
rnd2 %ransu,1,5
if %ransu=1 gosub *akaname_a1:gosub *akaname_a2:gosub *akaname_a3:goto *common_main
if %ransu=2 gosub *akaname_a4:gosub *akaname_a5:gosub *akaname_a6:goto *common_main
if %ransu=3 && %owaza_count3a>5 gosub *akaname_a7:goto *common_main
if %ransu=4 && %owaza_count2a>5 && %status=0 gosub *akaname_a8:goto *common_main
if %ransu=5 && %owaza_count1a>5 gosub *akaname_a9:goto *common_main
skip -6



*akaname_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Ehehe... Does it feel good?"
if %ransu=2 mov $sel1,"Your penis is very delicious! "
if %ransu=3 mov $sel1,"You know it's alright to come even while we lick you, right?"
name "Akaname A"
eng $sel1:$sel6\
name ""
skillname "Akaname Entangling"
dwave 1,"se\ero_makituki1.ogg"
lsp 690,":a;chara\akaname_ct01.bmp",0,0:print 10,500
>Akaname A's tongue coils around Luka's penis, and strokes him up and down!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3890
if %nanido<2 damage 120,130
if %nanido=2 damage 130,140
if %nanido=3 damage 140,150
skillname ""
if %mylife=0 sub %stack,1:return *akaname_h1
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *akaname_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *akaname_s2
sub %stack,1
return



*akaname_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll take care of your penis with my tongue."
if %ransu=2 mov $sel1,"How about I squeeze your penis with my tongue...?"
if %ransu=3 mov $sel1,"You can come while my tongue's wrapped around you, you know?"
name "Akaname B"
eng $sel1:$sel6\
name ""
skillname "Akaname Squeeze"
dwave 1,"se\ero_makituki1.ogg"
lsp 690,":a;chara\akaname_ct11.bmp",0,0:print 10,500
>Akaname B's tongue coils around Luka's penis, and squeezes!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3891
if %nanido<2 damage 120,130
if %nanido=2 damage 130,140
if %nanido=3 damage 140,150
skillname ""
if %mylife=0 sub %stack,1:return *akaname_h2
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *akaname_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *akaname_s2
sub %stack,1
return



*akaname_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll lick and suck... Aha, how delicious. "
if %ransu=2 mov $sel1,"Ahaha... Dirty penises are fine too. "
if %ransu=3 mov $sel1,"I'll pay special attention to the tip! "
name "Akaname C"
eng $sel1:$sel6\
name ""
skillname "Akaname Sucking"
dwave 1,"se\ero_makituki1.ogg"
lsp 690,":a;chara\akaname_ct21.bmp",0,0:print 10,500
>Akaname C's tongue coils around Luka's penis, and draws it into her mouth to suck on!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3892
if %nanido<2 damage 120,130
if %nanido=2 damage 130,140
if %nanido=3 damage 140,150
skillname ""
if %mylife=0 sub %stack,1:return *akaname_h3
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *akaname_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *akaname_s2
sub %stack,1
return



*akaname_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll lick your nipples, too. "
if %ransu=2 mov $sel1,"Even though you're a man, do you like having your nipples licked?"
if %ransu=3 mov $sel1,"I'll lick your nipples! "
name "Akaname A"
eng $sel1:$sel6\
name ""
skillname "Akaname Nipple Crawl"
dwave 1,"se\ero_makituki1.ogg"
>Akaname A's tongue crawls all over Luka's nipples!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3893
if %nanido<2 damage 130,140
if %nanido=2 damage 140,150
if %nanido=3 damage 150,160
skillname ""
if %mylife=0 sub %stack,1:return *akaname_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *akaname_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *akaname_s2
sub %stack,1
return



*akaname_a5

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll lick your balls, too."
if %ransu=2 mov $sel1,"I'll use my tongue to play with your weak point..."
if %ransu=3 mov $sel1,"Does it feel good when my tongue crawls around here?"
name "Akaname B"
eng $sel1:$sel6\
name ""
skillname "Akaname Ball Lick"
dwave 1,"se\ero_makituki1.ogg"
>Akaname B's tongue runs over Luka's balls, massaging them!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3894
if %nanido<2 damage 130,140
if %nanido=2 damage 140,150
if %nanido=3 damage 150,160
skillname ""
if %mylife=0 sub %stack,1:return *akaname_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *akaname_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *akaname_s2
sub %stack,1
return



*akaname_a6

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll even lick your hole..."
if %ransu=2 mov $sel1,"Is it humiliating having this hole licked? "
if %ransu=3 mov $sel1,"Ahaha... I'll take good care of this hole. "
name "Akaname C"
eng $sel1:$sel6\
name ""
skillname "Akaname Anal Lick"
dwave 1,"se\ero_makituki1.ogg"
>Akaname C's tongue licks around Luka's anus!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3895
if %nanido<2 damage 130,140
if %nanido=2 damage 140,150
if %nanido=3 damage 150,160
skillname ""
if %mylife=0 sub %stack,1:return *akaname_h6
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *akaname_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *akaname_s2
sub %stack,1
return



*akaname_a7

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Ehehe... Licking heaven! ":mov $sel2,"Hehe, it may be a little too much..."
if %ransu=2 mov $sel1,"We'll all lick your penis at the same time! ":mov $sel2,"Haha, do you like it?"
if %ransu=3 mov $sel1,"Lick Lick...":mov $sel2,"All three of us will lick you at the same time!"
name "Akaname A"
eng $sel1:$sel6\
name ""
name "Akaname B"
eng $sel2:$sel6\
name ""
skillname "Akaname Triple Entanglement"
dwave 1,"se\ero_makituki1.ogg"
lsp 690,":a;chara\akaname_ct31.bmp",0,0:print 10,500
>The Akaname Girls three tongues coil around Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3896
if %nanido<2 damage 140,150
if %nanido=2 damage 150,160
if %nanido=3 damage 160,170
dwave 1,"se\ero_makituki1.ogg"
>The three tongues fully cover Luka's penis!
if %nanido<2 damage 140,150
if %nanido=2 damage 150,160
if %nanido=3 damage 160,170
dwave 1,"se\ero_makituki1.ogg"
>The mob of tongues attacks Luka with intense pleasure!
if %nanido<2 damage 140,150
if %nanido=2 damage 150,160
if %nanido=3 damage 160,170
skillname ""
if %mylife=0 sub %stack,1:return *akaname_h7
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *akaname_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *akaname_s2
sub %stack,1
return



*akaname_a8

add %stack,1
mov %owaza_count2a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Give me a kiss... "
if %ransu=2 mov $sel1,"I'll even clean inside your mouth..."
if %ransu=3 mov $sel1,"I'll even lick you inside your mouth! "
name $name
eng $sel1:$sel6\
name ""
skillname "Akaname Licking Kiss"
dwave 1,"se\ero_makituki1.ogg"
lsp 690,":a;chara\akaname_ct41.bmp",0,0:print 10,500
eng "Akaname A's tongue runs all over Luka's mouth!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount3 3897
>As she forces her tongue into his mouth, ecstasy spreads through Luka's body!
if %nanido<2 damage 200,250
if %nanido=2 damage 240,290
if %nanido=3 damage 280,330
if %status=0 mov $sel1,"Luka has been immersed in ecstasy!"
if %status=1 mov $sel1,"Luka has been immersed in ecstasy..."
mov %status,1:gosub *status_print
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *akaname_h8
if %kousan<2 csp 690:print 10,500
if %kousan=2 sub %stack,1:return
name "Luka"
>Haaa...\
name ""
name $name
>Ehehe... An Akaname's kiss is amazing, isn't it?@
>You're already in a trance. \
name ""
rnd2 %status_turn,1,2
if %nanido=2 rnd2 %status_turn,1,2
if %nanido=3 rnd2 %status_turn,2,3
sub %stack,1
return



*akaname_a9

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 4
name "Akaname A"
>Get him, everyone!\
name ""
skillname "Akaname Tongue Garden"
eng "The three Akaname Girls push and hold Luka down!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount3 3898
dwave 1,"se\ero_makituki1.ogg"
>Luka is being held down by the three girls!
if %nanido<2 damage 300,320
if %nanido=2 damage 340,360
if %nanido=3 damage 380,400
mov $tatie4,"akaname_h1"
mov %kousoku,1:gosub *status_print
>Luka has been bound by the Akaname Girls!\
skillname ""
if %mylife=0 sub %stack,1:return *akaname_h9
name "Akaname A"
>Ehehe... Now you can't move. \
name ""
name "Akaname B"
>We'll lick you all over with our tongues!\
name ""
if %earth=0 && %nanido<2 mov %genmogaku,2
if %earth=0 && %nanido=2 mov %genmogaku,2
if %earth=0 && %nanido=3 mov %genmogaku,3
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,1
sub %stack,1
return



*akaname_a10

add %stack,1
>Luka is being held down by the three Akaname Girls...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll lick you all over your body! ":mov $sel2,"Hole to hole, I'll taste everything. "
if %ransu=2 mov $sel1,"I'll even lick inside your mouth...":mov $sel2,"I'll lick your penis too! "
if %ransu=3 mov $sel1,"Hehe, come, come! ":mov $sel2,"Can you stand having your whole body licked?"
name "Akaname A"
eng $sel1:$sel6\
name ""
name "Akaname C"
eng $sel2:$sel6\
name ""
skillname "Akaname Tongue Garden"
dwave 1,"se\ero_makituki1.ogg"
mov $tatie4,"akaname_h1"
lsp 700,":a;chara\akaname_h1.bmp",0,0:print 10,500
>Akaname B licks Luka's ear clean!
skillcount3 3898
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
dwave 1,"se\ero_makituki1.ogg"
>Akaname A's tongue runs around the inside of Luka's mouth!
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
dwave 1,"se\ero_makituki1.ogg"
>Akaname C's tongue coils around Luka's penis!
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
skillname ""
if %mylife=0 sub %stack,1:return *akaname_h9
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *akaname_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *akaname_s2
sub %stack,1
return



*akaname_a11

add %stack,1
>Luka is being held down by the three Akaname Girls...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"All of our tongues are going to wind around your penis! ":mov $sel2,"With all of us on it, will you come quickly?"
if %ransu=2 mov $sel1,"Everyone's going to lick it at once! ":mov $sel2,"Ahaha, I'll salivate all over it! "
if %ransu=3 mov $sel1,"Launch a concentrated tongue attack on his penis! ":mov $sel2,"Ahaha, come, come! "
name "Akaname A"
eng $sel1:$sel6\
name ""
name "Akaname C"
eng $sel2:$sel6\
name ""
skillname "Akaname Tongue Hell"
dwave 1,"se\ero_makituki1.ogg"
mov $tatie4,"akaname_h3"
lsp 700,":a;chara\akaname_h3.bmp",0,0:print 10,500
>The three Akaname Girls tongues coil around Luka's penis!
skillcount3 3899
if %nanido<2 damage 120,140
if %nanido=2 damage 130,150
if %nanido=3 damage 140,160
dwave 1,"se\ero_makituki1.ogg"
>They tighten around his penis!
if %nanido<2 damage 120,140
if %nanido=2 damage 130,150
if %nanido=3 damage 140,160
dwave 1,"se\ero_makituki1.ogg"
>Moving back and forth, all three tongues stroke Luka's penis!
if %nanido<2 damage 120,140
if %nanido=2 damage 130,150
if %nanido=3 damage 140,160
skillname ""
if %mylife=0 sub %stack,1:return *akaname_h10
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *akaname_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *akaname_s2
sub %stack,1
return



*akaname_s1

add %stack,1
if %max_mylife>%mylife*5 mov %sel_hphalf,1:gosub *akaname_s2:sub %stack,1:return
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Guh..."
if %ransu=2 mov $sel1,"Uhg..."
if %ransu=3 mov $sel1,"Urhg..."
name "Luka"
eng $sel1:$sel6\
name ""
gosub *face2
name "Akaname A"
>It feels good being licked by us, doesn't it?\
name ""
name "Akaname B"
>If you surrender, we'll show you a bit of heaven...\
name ""
name "Akaname C"
>We'll all be licking you as you come! \
name ""
gosub *face1
mov %sel_hphalf,1
sub %stack,1
return



*akaname_s2

add %stack,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ahh..."
if %ransu=2 mov $sel1,"Aaaaa..."
if %ransu=3 mov $sel1,"Haa..."
name "Luka"
eng $sel1:$sel6\
name ""
gosub *face2
name "Akaname A"
>Our licking skills have almost finished you off! \
name ""
name "Akaname B"
>Even though you're a Hero, do you like being licked this much?\
name ""
name "Akaname C"
>All you'll be able to do after this is come... \
name ""
mov %sel_kiki,1
sub %stack,1
return



*akaname_onedari

mov $list1,"Akaname Entangling"
if %3890>0 mov %list_num1,1
mov $list2,"Akaname Squeeze"
if %3891>0 mov %list_num2,1
mov $list3,"Akaname Sucking"
if %3892>0 mov %list_num3,1
mov $list4,"Akaname Nipple Crawl"
if %3893>0 mov %list_num4,1
mov $list5,"Akaname Ball Lick"
if %3894>0 mov %list_num5,1
mov $list6,"Akaname Anal Lick"
if %3895>0 mov %list_num6,1
mov $list7,"Akaname Triple Entanglement"
if %3896>0 mov %list_num7,1
mov $list8,"Akaname Licking Kiss"
if %3897>0 mov %list_num8,1
mov $list9,"Akaname Tongue Garden"
if %3898>0 mov %list_num9,1
mov $list10,"Akaname Tongue Hell"
if %3899>0 mov %list_num10,1
gosub *cmd_onedari
if %cmd1=11 goto *akaname_onedari1
if %cmd1=12 goto *akaname_onedari2
if %cmd1=13 goto *akaname_onedari3
if %cmd1=14 goto *akaname_onedari4
if %cmd1=15 goto *akaname_onedari5
if %cmd1=16 goto *akaname_onedari6
if %cmd1=17 goto *akaname_onedari7
if %cmd1=18 goto *akaname_onedari8
if %cmd1=19 goto *akaname_onedari9
if %cmd1=20 goto *akaname_onedari10
if %cmd1=-1 goto *akaname_main
goto *akaname_onedari



*akaname_onedari1

gosub *onedari_syori
name "Akaname A"
>You want me to use my tongue to lick that penis clean?@
>Then I won't hold back. \
name ""
gosub *akaname_a1
skip -1



*akaname_onedari2

gosub *onedari_syori
name "Akaname B"
>You want me to lick your penis clean?@
>Then as much as you can stand...\
name ""
gosub *akaname_a2
skip -1



*akaname_onedari3

gosub *onedari_syori
name "Akaname C"
>You want me to wrap my tongue around your penis?@
>Then I'll show you lots and lots of love. \
name ""
gosub *akaname_a3
skip -1



*akaname_onedari4

gosub *onedari_syori
name "Akaname A"
>You want me to use my tongue to lick your nipples?@
>Then I won't hold back. \
name ""
gosub *akaname_a4
skip -1



*akaname_onedari5

gosub *onedari_syori
name "Akaname B"
>You want me to use my tongue to play with your balls?@
>Then as much as you can stand...\
name ""
gosub *akaname_a5
skip -1



*akaname_onedari6

gosub *onedari_syori
name "Akaname C"
>You want me to lick your anus...?@
>Then I'll show you lots and lots of love. \
name ""
gosub *akaname_a6
skip -1



*akaname_onedari7

gosub *onedari_syori
name "Akaname A"
>Do you want our tongues to clean up that dirty penis of yours?@
>Even if you cry, we won't stop you know? \
name ""
gosub *akaname_a7
skip -1



*akaname_onedari8

gosub *onedari_syori
name "Akaname A"
>You want a wet kiss from me?@
>Then let's not hold back... \
name ""
gosub *akaname_a8
skip -1



*akaname_onedari9

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name "Akaname A"
>Do you want our tongues to run all over your body?@
>Even if you cry, we won't stop you know? \
name ""
if %kousoku=0 gosub *akaname_a9
gosub *akaname_a10
skip -1



*akaname_onedari10

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name "Akaname A"
>Do you want our tongues all around your penis?@
>Even if you cry, we won't stop you know? \
name ""
if %kousoku=0 gosub *akaname_a9
gosub *akaname_a11
skip -1



*akaname_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\akaname_ct02.bmp",0,0
lsp 691,":a;chara\akaname_bk01.bmp",0,0
gosub *syasei2
>As Akaname A licks Luka's penis, he comes, covering her pink tongue with his semen.\
mov %viclose,1:gosub *lose
mov %2687,%2687+1:if %2687=1 mov %count_koenemy,%count_koenemy+1
if %2687>%count_most mov %count_most,%2687:mov $count_mostname,$name
count 4,7
mov $bad1,"The Akaname used her tongue to force Luka to come."
gosub *face2
name "Akaname A"
>Ehehe, you leaked so much.@
>We'll lick up all of this semen of yours, don't worry. \
name ""
csp 690:print 10,500
goto *akaname_h



*akaname_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\akaname_ct12.bmp",0,0
lsp 691,":a;chara\akaname_bk01.bmp",0,0
gosub *syasei2
>As Akaname B licks Luka's penis, he comes, covering her pink tongue with his semen.\
mov %viclose,1:gosub *lose
mov %2687,%2687+1:if %2687=1 mov %count_koenemy,%count_koenemy+1
if %2687>%count_most mov %count_most,%2687:mov $count_mostname,$name
count 4,7
mov $bad1,"The Akaname used her tongue to force Luka to come."
gosub *face2
name "Akaname B"
>Haha, you sure leaked quite a lot...@
>We'll lick up all of this semen of yours.\
name ""
csp 690:print 10,500
goto *akaname_h



*akaname_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\akaname_ct22.bmp",0,0
lsp 691,":a;chara\akaname_bk01.bmp",0,0
gosub *syasei2
>As Akaname C licks Luka's penis, he comes, covering her pink tongue with his semen.\
mov %viclose,1:gosub *lose
mov %2687,%2687+1:if %2687=1 mov %count_koenemy,%count_koenemy+1
if %2687>%count_most mov %count_most,%2687:mov $count_mostname,$name
count 4,7
mov $bad1,"The Akaname used her tongue to force Luka to come."
gosub *face2
name "Akaname C"
>Ahaha, you came! @
>Now we're gonna lick up all of that semen you spat out! \
name ""
csp 690:print 10,500
goto *akaname_h



*akaname_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\akaname_bk01.bmp",0,0
gosub *syasei2
>As Akaname A licks Luka's nipples, he comes, covering her pink tongue with his semen.\
mov %viclose,1:gosub *lose
mov %2687,%2687+1:if %2687=1 mov %count_koenemy,%count_koenemy+1
if %2687>%count_most mov %count_most,%2687:mov $count_mostname,$name
count 23,7
mov $bad1,"The Akaname used her tongue to force Luka to come."
gosub *face2
name "Akaname A"
>Ehehe, you leaked so much.@
>We'll lick up all of this semen of yours, don't worry. \
name ""
goto *akaname_h



*akaname_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\akaname_bk01.bmp",0,0
gosub *syasei2
>As Akaname B licks Luka's balls, he comes, covering her pink tongue with his semen.\
mov %viclose,1:gosub *lose
mov %2687,%2687+1:if %2687=1 mov %count_koenemy,%count_koenemy+1
if %2687>%count_most mov %count_most,%2687:mov $count_mostname,$name
count 4,7
mov $bad1,"The Akaname used her tongue to force Luka to come."
gosub *face2
name "Akaname B"
>Haha, you sure leaked quite a lot...@
>We'll lick up all of this semen of yours.\
name ""
goto *akaname_h



*akaname_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\akaname_bk01.bmp",0,0
gosub *syasei2
>As Akaname C licks Luka's anus, he comes, covering her pink tongue with his semen.\
mov %viclose,1:gosub *lose
mov %2687,%2687+1:if %2687=1 mov %count_koenemy,%count_koenemy+1
if %2687>%count_most mov %count_most,%2687:mov $count_mostname,$name
count 9,7
mov $bad1,"The Akaname used her tongue to force Luka to come."
gosub *face2
name "Akaname C"
>Ahaha, you came from having your ass licked! @
>Now we're gonna lick up all of that semen you spat out! \
name ""
goto *akaname_h



*akaname_h7

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\akaname_ct32.bmp",0,0
lsp 691,":a;chara\akaname_bk01.bmp",0,0
gosub *syasei2
>As the three Akaname Girls attack Luka's penis with their tongues, he comes, covering their pink tongues with his semen.\
mov %viclose,1:gosub *lose
mov %2687,%2687+1:if %2687=1 mov %count_koenemy,%count_koenemy+1
if %2687>%count_most mov %count_most,%2687:mov $count_mostname,$name
count 4,7
mov $bad1,"The Akanames used their tongues to force Luka to come."
gosub *face2
name "Akaname A"
>Ehehe, you leaked so much.@
>We'll lick up all of this semen of yours, don't worry. \
name ""
csp 690:print 10,500
goto *akaname_h



*akaname_h8

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\akaname_bk01.bmp",0,0
gosub *syasei2
>As Akaname A gives Luka a deep tonguing kiss, he comes, covering her pink tongue with semen.\
mov %viclose,1:gosub *lose
mov %2687,%2687+1:if %2687=1 mov %count_koenemy,%count_koenemy+1
if %2687>%count_most mov %count_most,%2687:mov $count_mostname,$name
count 18,7
mov $bad1,"The Akaname used her tonguing kiss to force Luka to come."
gosub *face2
name "Akaname A"
>Ehehe, you leaked so much.@
>We'll lick up all of this semen of yours, don't worry. \
name ""
goto *akaname_h



*akaname_h9

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\akaname_h2.bmp",0,0
gosub *syasei2
>As the three Akaname Girls lick Luka all over his body, he comes, covering their pink tongues with semen.\
mov %viclose,1:gosub *lose
mov %2687,%2687+1:if %2687=1 mov %count_koenemy,%count_koenemy+1
if %2687>%count_most mov %count_most,%2687:mov $count_mostname,$name
count 4,7
mov $bad1,"The Akanames used their tongues to force Luka to come."
gosub *face2
name "Akaname A"
>Ehehe, you leaked so much.@
>We'll lick up all of this semen of yours, don't worry. \
name ""
goto *akaname_h



*akaname_h10

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\akaname_h4.bmp",0,0
gosub *syasei2
>As the three Akaname Girls attack Luka's penis with their tongues, he comes, covering their pink tongues with his semen.\
mov %viclose,1:gosub *lose
mov %2687,%2687+1:if %2687=1 mov %count_koenemy,%count_koenemy+1
if %2687>%count_most mov %count_most,%2687:mov $count_mostname,$name
count 4,7
mov $bad1,"The Akanames used their tongues to force Luka to come."
gosub *face2
name "Akaname A"
>Ehehe, you leaked so much.@
>We'll lick up all of this semen of yours, don't worry. \
name ""
goto *akaname_h



*akaname_h

mov $bad2,"Having his body continually licked clean, Luka is stuck in a hell of licking."
if %2687=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 goto *akaname_hb
name "Luka"
>Ahh...\
name ""
>I fall to my knees in front of the Akaname Girls.@
>With that, I can't resist any longer...\
name "Akaname A"
>Aha, already surrendering?@
>Then we'll lick you lots and lots. \
name ""
>The three Akaname Girls push me down, and crowd around my groin.@
>With that, all three of their tongues extend out closer to my penis.\
goto *akaname_hb



*akaname_hb

name "Luka"
>Ah.... Ahhh!\
name ""
name "Akaname A"
>There's no point screaming.@
>I'll block that loud mouth of yours with my tongue. \
name ""
dwave 1,"se\ero_makituki3.ogg"
mov %hseanvoice,3:hseanvoice
cspl 690,699
lsp 700,":a;chara\akaname_h1.bmp",0,0:print 10,500
>Akaname A's tongue reaches out, and forces itself into my mouth.@
>As her tongue licks and moves around, it feels like she's raping my mouth itself.\
name "Akaname B"
>An Akaname's kiss is amazing, isn't it?@
>Let me get his ear...\
>Nnn... *Lick*\
name ""
>Akaname B's tongue reaches out toward my ear.@
>As her long tongue eagerly licks me, all I can hear is the wet noises from the two tongues attacking me.\
>The ticklish sensation from my ear is already making my body jump in response.\
name "Akaname C"
>Then I'll lick his penis...\
name ""
>The last Akaname moves her face right next to my exposed penis.@
>With a smile, her tongue shoots out and coils around my penis!\
name "Akaname C"
>*Lick*\
name ""
name "Luka"
>Nnnnn!!\
name ""
>With her tongue running around my mouth, I can't even let out a word of protest.@
>Looking down at me with a smile, Akaname A starts teasing me.\
name "Akaname A"
>Ahaha, what a lewd face.@
>Does it feel good having your penis licked clean like this?\
name ""
name "Akaname C"
>Nnn... *Lick*\
name ""
>Her tongue, wrapped around my penis, starts to violently move up and down.@
>As if trying to lick my penis raw, her sweet tongue's movements get faster and faster.\
>In only moments, my penis is glistening wet with her warm saliva.\
>The intense pleasure makes my head go numb as I'm left on the verge of an orgasm in moments.\
name "Luka"
>Nnnn...\
name ""
name "Akaname A"
>Ahaha, his face is getting more and more loose!@
>I'll get a good look at your face as you come everywhere. \
>One of the best things in the world is watching a boy's face as he spurts everywhere. \
name ""
name "Akaname C"
>*Slurp* *Lick*\
name ""
>The tip of her quick tongue runs around my glans, around my neck, and down the back...@
>Feeling like my penis is just a piece of candy for her to savor, my lower body spasms as I feel the pleasure take me over.\
name "Luka"
>Nnn!@> Nnnnnggg!!\
name ""
gosub *syasei1
lsp 700,":a;chara\akaname_h2.bmp",0,0
gosub *syasei2
name "Akaname A"
>Nnnhahaha! He's spurting, he's spurting! @
>And look at his face... He's feeling so good! \
name ""
>While still forcing her tongue around in my mouth, Akaname A's eyes bore into mine as she smiles.@
>The other two tongues eagerly work on my ear and penis, both licking me even during my orgasm.\
name "Luka"
>Nnn...nn...\
name ""
>Finally, my ejaculation finishes as I sigh in a surge of relaxing ecstasy.@
>But it doesn't look like the licking assault is over...\
name "Akaname A"
>Well then, I believe the next one up for his penis is me. \
name ""
name "Akaname B"
>That's no fair! I was next...\
name ""
mov %hseanvoice,4:hseanvoice
lsp 700,":a;chara\akaname_h3.bmp",0,0:print 10,500
>Akaname A and B's tongues rub and press against each other as they both try to coil around my penis at the same time.\
>At the same time, Akaname C jostles against them, unwilling to give up her already claimed position around my penis.\
>The three long, warm tongues all squeeze on me as they find their places around my penis.\
name "Luka"
>Ah...ahhh...@
>That feels good...\
name ""
name "Akaname A"
>Ahaha... He's melting away.@
>I'll be watching you very closely when you come again. \
name ""
>Even with her tongue coiled around my penis, Akaname A keeps looking straight into my eyes.\
>The three tongues lick me from base to tip, each moving at different pressures and speeds.\
>My whole body trembles in pleasure as it feels like I'm being enveloped by ecstasy.\
name "Luka"
>Ah... Haaa...\
name ""
name "Akaname A"
>Ahaha, what a pathetic look!@
>Hey, let's finish him off right away!\
name ""
name "Akaname B"
>Yes, let's finish him off...@
>I want to taste his semen now, hehe.\
name ""
name "Akaname C"
>*Slurp* *Lick*\
name ""
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\akaname_h4.bmp",0,0
gosub *syasei2
>As if on cue, I come, spraying my semen onto their eagerly licking tongues.\
lsp 700,":a;chara\akaname_h5.bmp",0,0:print 10,500
name "Akaname A"
>*Lick*\
name ""
name "Akaname B"
>*Slurp*\
name ""
name "Akaname C"
>Nnn... *Gulp*\
name ""
name "Luka"
>Stop!@>Don't lick my tip as I come!@
>Ahhhnnn!\
name ""
>The intense pleasure as they lick my tip even during my orgasm is too much for me.@
>Spasming in excessive ecstasy, I feel my vision going dark as they continue licking my penis clean.\
mov %hseanvoice,0:hseanvoice
gosub *anten
>.........@
>Ever since...\
mov %hseanvoice,1:hseanvoice
lsp 700,":a;chara\akaname_h7.bmp",0,0
bg "bg\bg088.bmp",10,1500
name "Akaname A"
>Nnn... *Lick*@
>Your body tastes so delicious...\
name ""
name "Akaname B"
>*Lick* *Slurp*\
name ""
name "Akaname C"
>Come on, spit out some more semen...\
name ""
>The three of their tongues crawl all over my body.@
>One of them latches onto my penis, and starts to slowly stroke me.\
>Powerless before her tongue, I sigh as her warm tongue brings me to a quick orgasm.\
name "Luka"
>Ahhh...\
name ""
>Covered in saliva from head to toe, I can only fearfully tremble as I'm licked to a climax.\
>Ever since a few days ago, they haven't released me once.@
>The only breaks I get are for the few moments when they feed me...\
name "Luka"
>Nnn... Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\akaname_h8.bmp",0,0
gosub *syasei2
>Licked over the edge, I explode on their tongues again.@
>The three of them eagerly lick up the semen, smiling as their tongues make quick work of me.\
lsp 700,":a;chara\akaname_h9.bmp",0,0:print 10,500
name "Akaname A"
>Aha, there's lots of licking still left. @
>*Slurp* *Lick* \
name ""
name "Akaname C"
>You can't escape now.@
>From now and until forever, you're just going to be our group's licking slave. \
>*Lick*\
name ""
name "Luka"
>Hyaaa...\
name ""
>Thus, I was caught by the Akaname Girls and turned into their licking slave.@
>Every day, my body is completely licked clean by their long tongues.\
>Going mad with pleasure, I continue dedicating all of my semen to their lusting tongues.\
mov %hseanvoice,0:hseanvoice
>.............\
goto *badend



*mikolamia_start

mov $name,"Miko Lamia"
mov $name2,"Miko Lamia"
mov $lavel,"mikolamia"
mov $tatie1,"mikolamia_st01"
mov $tatie2,"mikolamia_st02"
mov $tatie3,"mikolamia_st03"
mov $tatie4,"mikolamia_ha1"
mov $haikei,"bg191"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,16000
if %nanido=2 mov %max_enemylife,20000
if %nanido=3 mov %max_enemylife,24000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,35
if %nanido=3 mov %earth_keigen,18
mov %alice_skill,1
mov %alice_skill1,100
mov %alice_skill2,100
mov %alice_skill3,130
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free of Miko Lamia's coil!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"There's no point struggling..."
mov $mogaku_sel2,"Once you're in this position, there's no escape."
mov $mogaku_sel3,"Stop resisting, and devote your semen to me..."
mov $mogaku_sel4,"It's just a waste of energy to struggle now."
mov $mogaku_sel5,"If you get too violent, I'll just tighten more."
mov $mogaku_dassyutu1,"To be able to escape from my snake body..."
mov $mogaku_dassyutu2,"I must indeed be very cautious with you..."
mov $mogaku_earth_dassyutu1,"To be able to manage the power of the earth that much..."
mov $mogaku_earth_dassyutu2,"I must indeed be very cautious with you..."
mov $half_s1,"My sexual techniques are quite something, aren't they?"
mov $half_s2,"I'll let you taste them until your finish..."
mov $kiki_s1,"Now, finish."
mov $kiki_s2,"Offer up your semen to me, the Shrine Maiden."
mov %end_n,13
mov %exp_minus,150000
mov %zmonster_x,-260
mov %tukix,300
mov %owaza_count1a,6
mov %owaza_count3a,9
name $name
>Hehe... The best of prey came right to me.@
>I'll squeeze out all of your thick semen, too.\
>I hate killing, so I won't end your life...@
>I'll simply debilitate you with pleasure, and leave you unable to do anything else but offer your semen...\
name ""
name "Luka"
>I'll never allow that to happen!@
>I'll make you release everyone here!\
name ""
>I point my sword at the Shrine Maiden.@
>I feel powerful magic coming off her... I can't let my guard down here!\
goto *common_main



*mikolamia_v

gosub *face3
name $name
>Master Shirohebi... Forgive me.@
>My power... Was not enough...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Miko Lamia is sealed in the form of a snake!\
mov %viclose,1:gosub *victory
mov %getexp,180000:gosub *lvup
mov %2388,1
goto *sean0358



*mikolamia_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>So you wish to become my prey...@
>But I am persistent in my dislike of killing, so I will keep you alive...\
name ""
goto *mikolamia_a



*mikolamia_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *mikolamia_kousan
if %cmd1=16 goto *mikolamia_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *mikolamia_main



*mikolamia_a

if %kousoku=1 gosub *mikolamia_a6:goto *common_main
if %enemy_earth=2 gosub *mikolamia_a5:goto *common_main
rnd2 %ransu,1,8
if %ransu=1 gosub *mikolamia_a1:goto *common_main
if %ransu=2 gosub *mikolamia_a2:goto *common_main
if %ransu=3 gosub *mikolamia_a3:goto *common_main
if %ransu=4 gosub *mikolamia_a4:goto *common_main
if %ransu<7 && %owaza_count1a>7 gosub *mikolamia_a5:goto *common_main
if %ransu>6 && %owaza_count3a>10 && %enemy_earth=0 gosub *mikolamia_el2:goto *common_main
skip -7



*mikolamia_el2

add %stack,1
mov %owaza_count3a,0
name $name
>Come, Gnomaren!\
name ""
skillname "Summon Earth Spirit"
mov %enemy_earth,3
mov %damage_keigen_el,50
dwave 2,"se\earth1.ogg"
lsp2 0,":a;chara\gnomaren_st01.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *enemy_elm_print
>Miko Lamia summons a spirit of earth!\
skillname ""
sub %stack,1
return



*mikolamia_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll rub you nice and slow with these fingers..."
if %ransu=2 mov $sel1,"Just lay back and feel my hand..."
if %ransu=3 mov $sel1,"Let me hear your voice cry out..."
name $name
eng $sel1:$sel6\
name ""
skillname "Ten Finger Masturbation"
dwave 1,"se\ero_koki1.ogg"
>All ten of Miko Lamia's fingers stroke and rub against Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,5
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3900
if %nanido<2 damage 320,340
if %nanido=2 damage 360,380
if %nanido=3 damage 400,420
skillname ""
if %mylife=0 sub %stack,1:return *mikolamia_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*mikolamia_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My tongue techniques are top class..."
if %ransu=2 mov $sel1,"I'll use my tongue to lick out your semen."
if %ransu=3 mov $sel1,"My tongue will coil around you, just like a snake..."
name $name
eng $sel1:$sel6\
name ""
skillname "Snake Tongue"
dwave 1,"se\ero_pyu1.ogg"
>Miko Lamia's tongue coils around Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,5
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3901
if %nanido<2 damage 330,350
if %nanido=2 damage 370,390
if %nanido=3 damage 410,430
skillname ""
if %mylife=0 sub %stack,1:return *mikolamia_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*mikolamia_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Do my soft breasts feel good?"
if %ransu=2 mov $sel1,"Offer up your semen to my breasts..."
if %ransu=3 mov $sel1,"I'll show you the bliss that awaits between my breasts..."
name $name
eng $sel1:$sel6\
name ""
skillname "Abundant Breasts"
dwave 1,"se\ero_sigoki1.ogg"
>Miko Lamia sandwiches Luka's penis between her large breasts, and squeezes!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,5
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3902
if %nanido<2 damage 340,360
if %nanido=2 damage 380,400
if %nanido=3 damage 420,440
skillname ""
if %mylife=0 sub %stack,1:return *mikolamia_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*mikolamia_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My tail is as nimble as a finger..."
if %ransu=2 mov $sel1,"I'll use my tail to lead you to orgasm."
if %ransu=3 mov $sel1,"If I do it like this, can you stand it?"
name $name
eng $sel1:$sel6\
name ""
skillname "Divining Tail"
dwave 1,"se\ero_koki1.ogg"
>Miko Lamia's tail winds around Luka's penis, stroking it slowly!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,5
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3903
if %nanido<2 damage 350,370
if %nanido=2 damage 390,410
if %nanido=3 damage 430,450
skillname ""
if %mylife=0 sub %stack,1:return *mikolamia_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*mikolamia_a5

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 8
name $name
if %first_sel1=1 skip 3
>Now, let me wrap around you...@
skip 2
>I'll coil around you again...@
>After I seal away your movement, I'll bring you to a slow ejaculation.\
name ""
skillname "Ninety Inch Tongue Wrap"
dwave 1,"se\ero_makituki3.ogg"
eng "Miko Lamia's lower snake body coils around Luka!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,5
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
>At the same time, her tongue coils around Luka's penis!
skillcount3 3904
if %nanido<2 damage 250,280
if %nanido=2 damage 290,320
if %nanido=3 damage 330,360
mov %kousoku,1:gosub *status_print
>Luka has been bound by Miko Lamia!\
skillname ""
if %mylife=0 sub %stack,1:return *mikolamia_h5
name $name
if %first_sel1=1 skip 3
>Now you can't resist any longer...@
skip 2
>This time you won't be able to resist...@
>Now, offer your fresh semen to me.\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,99
if %earth=0 && %nanido=2 mov %genmogaku,99
if %earth=0 && %nanido=3 mov %genmogaku,99
if %earth>0 && %nanido<2 mov %genmogaku,2
if %earth>0 && %nanido=2 mov %genmogaku,2
if %earth>0 && %nanido=3 mov %genmogaku,3
if %enemy_earth>0 mov %genmogaku,99
sub %stack,1
return



*mikolamia_a6

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Both your body and penis are bound... Isn't this pure happiness for a male?"
if %ransu=2 mov $sel1,"Shall I tighten some more? Hahaha..."
if %ransu=3 mov $sel1,"I won't let you loose until you've ejaculated one hundred times..."
name $name
eng $sel1:$sel6\
name ""
skillname "Ninety Inch Tongue Wrap"
dwave 1,"se\ero_simetuke1.ogg"
>Miko Lamia's snake body coils tighter around Luka!
skillcount3 3904
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
dwave 1,"se\ero_koki1.ogg"
>Her tongue, coiled around Luka's penis, moves up and down!
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
dwave 1,"se\ero_pyu1.ogg"
>The tip of her tongue runs up and down the back of Luka's penis!
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
skillname ""
if %mylife=0 sub %stack,1:return *mikolamia_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*mikolamia_onedari

mov $list1,"Ten Finger Masturbation"
if %3900>0 mov %list_num1,1
mov $list2,"Snake Tongue"
if %3901>0 mov %list_num2,1
mov $list3,"Abundant Breasts"
if %3902>0 mov %list_num3,1
mov $list4,"Divining Tail"
if %3903>0 mov %list_num4,1
mov $list5,"Ninety Inch Tongue Wrap"
if %3904>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *mikolamia_onedari1
if %cmd1=12 goto *mikolamia_onedari2
if %cmd1=13 goto *mikolamia_onedari3
if %cmd1=14 goto *mikolamia_onedari4
if %cmd1=15 goto *mikolamia_onedari5
if %cmd1=-1 goto *mikolamia_main
goto *mikolamia_onedari



*mikolamia_onedari1

gosub *onedari_syori
name $name
>You want my fingers to lead you to come?@
>Then offer up all of your semen in exchange...\
name ""
gosub *mikolamia_a1
skip -1



*mikolamia_onedari2

gosub *onedari_syori
name $name
>You want my tongue to lead you to come?@
>Then offer up all of your semen in exchange...\
name ""
gosub *mikolamia_a2
skip -1



*mikolamia_onedari3

gosub *onedari_syori
name $name
>You want my breasts to lead you to come?@
>Then offer up all of your semen in exchange...\
name ""
gosub *mikolamia_a3
skip -1



*mikolamia_onedari4

gosub *onedari_syori
name $name
>You want my tail to lead you to come?@
>Then offer up all of your semen in exchange...\
name ""
gosub *mikolamia_a4
skip -1



*mikolamia_onedari5

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want me to coil around you, and overrun you with my tongue?@
>Then offer up all of your semen in exchange...\
name ""
if %kousoku=0 gosub *mikolamia_a5
gosub *mikolamia_a6
skip -1



*mikolamia_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\mikolamia_bk03.bmp",0,0
lsp 694,":a;chara\mikolamia_bk04.bmp",0,0
gosub *syasei2
>As Miko Lamia's fingers nimbly stroke Luka's penis, he comes, covering her hands in semen.\
mov %viclose,1:gosub *lose
mov %2688,%2688+1:if %2688=1 mov %count_koenemy,%count_koenemy+1
if %2688>%count_most mov %count_most,%2688:mov $count_mostname,$name
count 5,3
mov $bad1,"Miko Lamia forced Luka to come with her fingers."
gosub *face2
name $name
>The skill of a Miko is unmatched.@
>I'll have you offer up far more in compensation for tasting it...\
name ""
goto *mikolamia_h



*mikolamia_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\mikolamia_bk01.bmp",0,0
gosub *syasei2
>As Miko Lamia's snake tongue coils around Luka's penis, he comes, spraying his semen on her face.\
mov %viclose,1:gosub *lose
mov %2688,%2688+1:if %2688=1 mov %count_koenemy,%count_koenemy+1
if %2688>%count_most mov %count_most,%2688:mov $count_mostname,$name
count 4,3
mov $bad1,"Miko Lamia forced Luka to come with her tongue."
gosub *face2
name $name
>The skill of a Miko is unmatched.@
>I'll have you offer up far more in compensation for tasting it...\
name ""
goto *mikolamia_h



*mikolamia_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\mikolamia_bk02.bmp",0,0
gosub *syasei2
>As the soft pressure from her large breasts presses against Luka's penis, he comes, covering her chest in semen.\
mov %viclose,1:gosub *lose
mov %2688,%2688+1:if %2688=1 mov %count_koenemy,%count_koenemy+1
if %2688>%count_most mov %count_most,%2688:mov $count_mostname,$name
count 7,3
mov $bad1,"Miko Lamia forced Luka to come with her breasts."
gosub *face2
name $name
>The skill of a Miko is unmatched.@
>I'll have you offer up far more in compensation for tasting it...\
name ""
goto *mikolamia_h



*mikolamia_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 697,":a;chara\mikolamia_bk07.bmp",0,0
gosub *syasei2
>As Miko Lamia's nimble tail strokes Luka's penis, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2688,%2688+1:if %2688=1 mov %count_koenemy,%count_koenemy+1
if %2688>%count_most mov %count_most,%2688:mov $count_mostname,$name
count 19,3
mov $bad1,"Miko Lamia forced Luka to come with her tail."
gosub *face2
name $name
>The skill of a Miko is unmatched.@
>I'll have you offer up far more in compensation for tasting it...\
name ""
goto *mikolamia_h



*mikolamia_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\mikolamia_ha2.bmp",0,0
gosub *syasei2
>Overrun by Miko Lamia's tongue as he's caught in her wrap, Luka comes, covering her face with semen.\
mov %viclose,1:gosub *lose2
name "Luka"
>Haa...\
name ""
name $name
>Being able to finish inside a Lamia's coil is the highest of pleasures...@
>Here, shall I let you enjoy some more?\
name ""
skillcount3 3904
skillname "Ninety Inch Tongue Wrap"
dwave 1,"se\ero_simetuke1.ogg"
>Miko Lamia's coil slowly gets tighter!
mov %damage_kotei,1
damage 100,110
dwave 1,"se\ero_simetuke1.ogg"
>Pain shoots through Luka's body as her powerful muscles squeeze him!
mov %damage_kotei,1
damage 100,110
skillname ""
name "Luka"
>Ahg!@> Ahhh!\
name ""
name $name
>Hehehe, it's painful, isn't it?@
>But at the same time, there's pleasure here...\
name ""
skillcount3 3904
skillname "Ninety Inch Tongue Wrap"
dwave 1,"se\ero_pyu1.ogg"
lsp 700,":a;chara\mikolamia_ha3.bmp",0,0:print 10,500
>Miko Lamia's snake tongue coils around Luka's penis!
mov %damage_kotei,1
damage 100,110
dwave 1,"se\ero_pyu1.ogg"
>Her wet tongue squeezes down on his penis!
mov %damage_kotei,1
damage 100,110
skillname ""
name "Luka"
>Ah...!@> Ahh!\
name ""
name $name
>Even though you're in pain, you're also feeling good, aren't you?@
>Writhe around in confusion as the two feelings attack at once...\
name ""
skillcount3 3904
skillname "Ninety Inch Tongue Wrap"
dwave 1,"se\ero_simetuke1.ogg"
>Miko Lamia squeezes Luka's body even tighter!
mov %damage_kotei,1
damage 100,110
dwave 1,"se\ero_pyu1.ogg"
>At the same time, her tongue licks his penis all over!
mov %damage_kotei,1
damage 100,110
skillname ""
name "Luka"
>Haaa...!@> N...No!\
name ""
name $name
>You're almost at your limit, aren't you?@
>I'll make you come as I squeeze you to your limit...\
name ""
skillcount3 3904
skillname "Ninety Inch Tongue Wrap"
dwave 1,"se\ero_simetuke1.ogg"
>Miko Lamia's powerful snake body crushes Luka's!
mov %damage_kotei,1
damage 100,110
dwave 1,"se\ero_pyu1.ogg"
>At the same time, the tip of her tongue rubs hard against his glans!
mov %damage_kotei,1
damage 100,110
skillname ""
name "Luka"
>Ahg... Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\mikolamia_ha4.bmp",0,0
gosub *syasei2
>The mix of agony and ecstasy hit Luka at the same time, bringing forth a screaming orgasm as his semen covers Miko Lamia's tongue!\
name $name
>Hehe, being wrapped by a Lamia is the best, isn't it?@
>But there's far more to go...\
name ""
gosub *clear_sprite
gosub *setwindow_01p
mov %battle,0
mov %hsean,1
mov %2688,%2688+1:if %2688=1 mov %count_koenemy,%count_koenemy+1
if %2688>%count_most mov %count_most,%2688:mov $count_mostname,$name
count 4,3
mov $bad1,"Miko Lamia forced Luka to come as she wrapped around him with her body and tongue."
goto *mikolamia_h



*mikolamia_h

mov $bad2,"Caught in her coil, Luka's semen is squeezed endlessly."
if %2688=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahhh...\
name ""
name $name
>I'll coil around you, and tease you for a long time...@
>Hehe, how do you want to end up in the end?\
name ""
cspl 690,699
lsp 700,":a;chara\mikolamia_hb1.bmp",0,0:print 10,500
>Miko Lamia's snake body slowly coils around my body, completely sealing off my movements.\
name "Luka"
>L...Let go!\
name ""
>No matter how much I struggle, it's useless.@
>With my body so tightly coiled up, there's no escape.\
name $name
>Snakes coil up their prey like this, and tighten as they slowly weaken them...@
>You will be treated in the same way.\
name ""
dwave 1,"se\ero_simetuke1.ogg"
>Her tail slowly tightens up, squeezing me with increasing pressure.@
>Miko Lamia's numerous, powerful muscles all clamp against me, making it feel like I'm inside her body itself.\
name "Luka"
>Ah...!@> Ahhg!\
name ""
name $name
>Hahaha... Is it painful?\
name ""
name "Luka"
>Ahhhgg!!\
name ""
name $name
>Good answer...@
>Let me squeeze even tighter.\
name ""
>Her tail tightens even further, making my body scream out in pain.@
>I'm just like simple prey, being toyed with by a superior snake...\
name "Luka"
>Urhhgg...\
name ""
>I feebly twitch inside her embrace.@
>After toying with me for a few more moments, she turns her cold-blooded eyes onto me.\
name $name
>It's time for me to prey on you.@
>But I'm not so vulgar as to eat you for meat.\
>I'll mate with you, and squeeze out your semen.@
>I'll tighten your penis with my lower mouth...\
name ""
name "Luka"
>N...No... Ahh...\
name ""
>I can't see it, but I feel something wet push against the tip of my penis.@
mov %hseanwave,2:hseanwave
>Before I can react, my penis sinks deep into that hot hole.\
name "Luka"
>Ahh...!\
name ""
>Right away, the wet flesh surrounded by muscles clamps down on my penis.\
name $name
>Now then, let me tighten around this, too.@
>Just like it was more prey for a snake...\
name ""
name "Luka"
>Ahhhh!\
name ""
>The powerful muscles in her vagina suddenly contract, squeezing down with incredible power around my penis.\
>The intense stimulation causes my hips to buck into her in surprise, bringing forth a sudden desire to ejaculate.\
name "Luka"
>Ahhhh!\
name ""
>The strength in my waist fades all at once, as I give myself over to the sweet feeling of release.\
gosub *syasei1
lsp 700,":a;chara\mikolamia_hb2.bmp",0,0
gosub *syasei2
>I explode inside of Miko Lamia's tight vagina.\
>My body trembles as I shoot out spurt after spurt of semen into her accepting vagina.@
>As the pleasure runs through me, it feels like I offered up my soul itself to her.\
name "Luka"
>Haaa...\
name ""
name $name
>Oh my, you already let it out?@
>I thought you would hold on a little longer than that...@> That was quite a bit more pathetic than I was expecting...\
name ""
>She so effortlessly forced me to a climax...@
>Despite feeling defeated as a man, the sense of ecstasy from release fills my body.\
name $name
>It's not over with just that...@
>This will continue until you can't even stand on your own two legs any longer.\
name ""
mov %hseanwave,8:hseanwave
>With a merciless smile, she starts squeezing my penis inside her again.@
>At the same time, her powerful snake body presses harder against my body.\
name "Luka"
>Ahh...\
name ""
>I let out a cry of pain as she squeezes me.@
>But at the same time, my penis twitches in unbearable pleasure.\
>The disconnect in the sensations sends my body into a whirlwind of confused sensations.\
name $name
>I'll have you offer up all of your semen to me.@
>I'll forcibly milk it all out of you...\
name ""
>Her muscles start contracting and loosening in an intense rhythm.@
>The movements are clearly made to force me to come right away.\
>With the pain the rest of my body is feeling, I can't bring myself to even try resisting the feeling of release trying to explode out.\
name "Luka"
>Ahh... I'm going to come again...\
name ""
name $name
>Now finish...@
>Offer up everything to my pussy.\
name ""
>Deep inside of her, a muscle squeezes down on my glans.@
>Putting me over the edge, I sigh as I release into her.\
name "Luka"
>Ahh...\
name ""
gosub *syasei1
lsp 700,":a;chara\mikolamia_hb3.bmp",0,0
gosub *syasei2
>Even as I spurt my semen into her, the rhythmic contractions don't stop.@
>Each squeeze milks out more of my semen into her accepting body.\
name "Luka"
>Ahh... Stop...\
name ""
name $name
>You're already crying about this?@
>That's pathetic...@> You need to give far, far more semen...\
name ""
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\mikolamia_hb4.bmp",0,0
gosub *syasei2
>Without being allowed to rest, she forces another ejaculation out of me.@
>The continual ejaculations are forced out of me again and again.\
>Trapped in her coil, I continue offering my semen to Miko Lamia.@
>I can't do anything but helplessly spurt more and more semen into her vagina...\
name "Luka"
>Ah...ahh...\
name ""
name $name
>Hehe, did your mind break?@
>Humans are so fragile...\
name ""
mov %hseanwave,0:hseanwave
>After losing my sanity, she finally parts from me.\
>But it doesn't mean I'll escape from her.@
>With my heart and soul broken, I'm now simply a source of semen for her to milk.\
name $name
>Aren't you happy you get to be my prey?@
>You'll be able to give me fresh semen all throughout the days now. Hehehe.\
name ""
name "Luka"
>...........\
name ""
>I can't even think any longer...@> All I do is wait for more stimulation to make me ejaculate, and offer my semen to Miko Lamia.\
>After fighting so hard, it's a miserable fate...\
gosub *anten
>...........\
goto *badend



*kezyorou_start

mov $name,"Kejourou"
mov $name2,"Kejourou"
mov $lavel,"kezyorou"
mov $tatie1,"kezyorou_st01"
mov $tatie2,"kezyorou_st02"
mov $tatie3,"kezyorou_st03"
mov $tatie4,"kezyorou_ha1"
mov $haikei,"bg159"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,18000
if %nanido=2 mov %max_enemylife,22000
if %nanido=3 mov %max_enemylife,26000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,20
if %nanido=3 mov %earth_keigen,10
mov %alice_skill,1
mov %alice_skill1,100
mov %alice_skill2,100
mov %alice_skill3,100
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free from Kejourou!"
mov $mogaku_anno2,"Luka broke free from Kejourou!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"It's pointless to fight..."
mov $mogaku_sel2,"You can't escape from my hair so easily."
mov $mogaku_sel3,"My hair is very tough."
mov $mogaku_sel4,"If you struggle, my hair will only tighten..."
mov $mogaku_sel5,"Fighting against me is so pathetic..."
mov $mogaku_dassyutu1,"You are quite powerful..."
mov $mogaku_dassyutu2,"But also very worth squeezing."
mov $mogaku_earth_dassyutu1,"You are quite powerful..."
mov $mogaku_earth_dassyutu2,"But also very worth squeezing."
mov $half_s1,"How many men do you think I've made come already?"
mov $half_s2,"You too will succumb to my hair..."
mov $kiki_s1,"It's almost time for you to come..."
mov $kiki_s2,"I'll make you shoot your semen all over... Hehe."
mov %end_n,13
mov %exp_minus,330000
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,4
mov %owaza_count3a,8
mov %owaza_count3b,4
name $name
>Oh my... A little boy, next to a little Goblin.@
>Strange ones keep appearing one after another...\
name ""
name "Luka"
>Why did you attack the Nekomata!?@
>Isn't she a fellow monster like you!?\
name ""
name $name
>In this village, only the Snake Shrine should be recognized.@
>It was an order from master Shirohebi.\
name ""
name "Luka"
>Not only are you attacking the village, but you're persecuting against other monsters, too?@
>I won't forgive this!\
name ""
name $name
>Hmph... You're a cheeky little boy, aren't you?@
>It looks like I'll need to discipline you with my hair...\
name ""
goto *common_main



*kezyorou_v

gosub *face3
name $name
>How could I lose to such a little boy...!?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Kejourou fades away into particles, then vanishes!\
mov %viclose,1:gosub *victory
mov %getexp,180000:gosub *lvup
mov %2429,1
goto *sean0358a



*kezyorou_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Ahaha, do you want me to make you come right away?@
>Then get ready to spray your white stuff without holding back...\
name ""
goto *kezyorou_a



*kezyorou_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *kezyorou_kousan
if %cmd1=16 goto *kezyorou_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *kezyorou_main



*kezyorou_a

if %kousoku=1 rnd2 %ransu,1,3
if %kousoku=1 && %ransu<3 gosub *kezyorou_a6:goto *common_main
if %kousoku=1 && %ransu=3 && %owaza_count3c>3 && %enemy_wind=0 gosub *kezyorou_a7:goto *common_main
if %kousoku=1 skip -3
rnd2 %ransu,1,8
if %ransu=1 gosub *kezyorou_a1:goto *common_main
if %ransu=2 gosub *kezyorou_a2:goto *common_main
if %ransu=3 gosub *kezyorou_a3:goto *common_main
if %ransu=4 && %owaza_count3b>5 gosub *kezyorou_a4:goto *common_main
if %ransu<7 && %owaza_count1a>5 gosub *kezyorou_a5:goto *common_main
if %ransu>6 && %owaza_count3a>9 && %enemy_wind=0 gosub *kezyorou_el1:goto *common_main
skip -7



*kezyorou_el1

add %stack,1
mov %owaza_count3a,0
name $name
>Come, Zylphe!\
name ""
skillname "Wind Spirit Summon"
mov %enemy_wind,5
mov %kaihi_el,50
dwave 2,"se\wind2.ogg"
lsp2 0,":a;chara\zylphe_st02.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *enemy_elm_print
>Kejourou summons a spirit of wind!\
skillname ""
sub %stack,1
return



*kezyorou_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I don't mind if you come in my hand..."
if %ransu=2 mov $sel1,"No man can resist having their penis handled like this..."
if %ransu=3 mov $sel1,"I'll make a tube with my hands, and you can stick your penis inside."
name $name
eng $sel1:$sel6\
name ""
skillname "Geisha's Masturbation"
dwave 1,"se\ero_koki1.ogg"
>Kejourou grabs Luka's penis with both hands, creating a tube!
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3905
mov %earth_keigen_el,70
if %nanido<2 damage 280,300
if %nanido=2 damage 320,340
if %nanido=3 damage 360,380
if %enemy_wind=0 skip 13
dwave 1,"se\ero_koki1.ogg"
>She softly moves her tube-shaped hands up and down!
mov %earth_keigen_el,70
if %nanido<2 damage 280,300
if %nanido=2 damage 320,340
if %nanido=3 damage 360,380
dwave 1,"se\ero_koki1.ogg"
>Sandwiching his penis between her palms, she skillfully massages him!
mov %earth_keigen_el,70
if %nanido<2 damage 280,300
if %nanido=2 damage 320,340
if %nanido=3 damage 360,380
skillname ""
if %mylife=0 sub %stack,1:return *kezyorou_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kezyorou_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I've sucked many men dry with this mouth..."
if %ransu=2 mov $sel1,"No penis can resist my suction."
if %ransu=3 mov $sel1,"I'll coil my tongue around your penis..."
name $name
eng $sel1:$sel6\
name ""
skillname "Flutist's Playing"
dwave 1,"se\ero_buchu2.ogg"
>Kejourou's tongue coils around Luka's penis as she draws it into her mouth!
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3906
mov %earth_keigen_el,70
if %nanido<2 damage 290,310
if %nanido=2 damage 330,350
if %nanido=3 damage 370,390
if %enemy_wind=0 skip 13
dwave 1,"se\ero_buchu2.ogg"
>Her lips lock underneath the neck of Luka's glans!
mov %earth_keigen_el,70
if %nanido<2 damage 290,310
if %nanido=2 damage 330,350
if %nanido=3 damage 370,390
dwave 1,"se\ero_buchu2.ogg"
>While sucking Luka's penis, the tip of her tongue skillfully flicks across his tip!
mov %earth_keigen_el,70
if %nanido<2 damage 290,310
if %nanido=2 damage 330,350
if %nanido=3 damage 370,390
skillname ""
if %mylife=0 sub %stack,1:return *kezyorou_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kezyorou_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"How about squeezing you between my breasts?"
if %ransu=2 mov $sel1,"Come on... It's bliss between my breasts."
if %ransu=3 mov $sel1,"Thrust your penis between my breasts, and shoot it all out..."
name $name
eng $sel1:$sel6\
name ""
skillname "Flower Girl's Breasts"
dwave 1,"se\ero_sigoki1.ogg"
>Kejourou sandwiches Luka's penis between her breasts, and gently massages his penis!
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3907
mov %earth_keigen_el,70
if %nanido<2 damage 300,320
if %nanido=2 damage 340,360
if %nanido=3 damage 380,400
if %enemy_wind=0 skip 13
dwave 1,"se\ero_sigoki1.ogg"
>She slowly increases the pressure on Luka's penis!
mov %earth_keigen_el,70
if %nanido<2 damage 300,320
if %nanido=2 damage 340,360
if %nanido=3 damage 380,400
dwave 1,"se\ero_sigoki1.ogg"
>Raising and lowering her breasts in alternate movements, she uses them to stroke Luka's penis!
mov %earth_keigen_el,70
if %nanido<2 damage 300,320
if %nanido=2 damage 340,360
if %nanido=3 damage 380,400
skillname ""
if %mylife=0 sub %stack,1:return *kezyorou_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kezyorou_a4

add %stack,1
mov %owaza_count3b,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Don't be ashamed, just come quickly..."
if %ransu=2 mov $sel1,"Even my hair feels good, doesn't it?"
if %ransu=3 mov $sel1,"No man can resist my hair."
name $name
eng $sel1:$sel6\
name ""
skillname "Indecent Hair"
dwave 1,"se\umaru.ogg"
>Kejourou's flowing hair coils around Luka's penis!
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3908
mov %earth_keigen_el,70
if %nanido<2 damage 150,160
if %nanido=2 damage 170,180
if %nanido=3 damage 190,200
dwave 1,"se\umaru.ogg"
mov %earth_keigen_el,70
>Her hair tickles Luka's penis!
if %nanido<2 damage 150,160
if %nanido=2 damage 170,180
if %nanido=3 damage 190,200
dwave 1,"se\umaru.ogg"
mov %earth_keigen_el,70
>The coiled hair tightens around him!
if %nanido<2 damage 150,160
if %nanido=2 damage 170,180
if %nanido=3 damage 190,200
if %enemy_wind=0 skip 13
dwave 1,"se\umaru.ogg"
>Bunches of hair coil around Luka's penis, squeezing him!
mov %earth_keigen_el,70
if %nanido<2 damage 150,160
if %nanido=2 damage 170,180
if %nanido=3 damage 190,200
dwave 1,"se\umaru.ogg"
>Her silky hair strokes Luka's penis!
mov %earth_keigen_el,70
if %nanido<2 damage 150,160
if %nanido=2 damage 170,180
if %nanido=3 damage 190,200
skillname ""
if %mylife=0 sub %stack,1:return *kezyorou_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kezyorou_a5

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 7
name $name
if %first_sel1=1 skip 3
>I'll bind you like this...\
skip 2
>I'll take away your freedom again...\
name ""
skillname "Hair Restraint"
dwave 1,"se\umaru.ogg"
eng "Kejourou's hair coils around Luka's body!":$sel6/
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
@
mov $tatie4,"kezyorou_ha1"
mov %kousoku,1:gosub *status_print
>Luka has been bound by Kejourou's hair!\
skillname ""
if %kousan=2 sub %stack,1:return
name $name
>What an unsightly appearance... Now you're at my mercy.@
if %first_sel1=1 skip 3
>Now then, how shall I play with you...?\
skip 2
>This time, you won't escape.\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,2
if %earth=0 && %nanido=2 mov %genmogaku,2
if %earth=0 && %nanido=3 mov %genmogaku,3
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
sub %stack,1
return



*kezyorou_a6

add %stack,1
>Luka has been bound by Kejourou's hair...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You're at my mercy..."
if %ransu=2 mov $sel1,"I can control my hair however I want..."
if %ransu=3 mov $sel1,"No man can resist this ultimate technique of mine."
name $name
eng $sel1:$sel6\
name ""
skillname "Ultimate Hair Charm"
dwave 1,"se\umaru.ogg"
mov $tatie4,"kezyorou_ha2"
lsp 700,":a;chara\kezyorou_ha2.bmp",0,0:print 10,500
>Kejourou's hair coils around Luka's penis!
skillcount3 3909
mov %earth_keigen_el,70
if %nanido<2 damage 200,230
if %nanido=2 damage 240,270
if %nanido=3 damage 280,310
if %enemy_wind=0 skip 13
dwave 1,"se\umaru.ogg"
>The hair around him squeezes his penis!
mov %earth_keigen_el,70
if %nanido<2 damage 200,230
if %nanido=2 damage 240,270
if %nanido=3 damage 280,310
dwave 1,"se\umaru.ogg"
>While squeezing him, her hair strokes him back and forth!
mov %earth_keigen_el,70
if %nanido<2 damage 200,230
if %nanido=2 damage 240,270
if %nanido=3 damage 280,310
skillname ""
if %mylife=0 sub %stack,1:return *kezyorou_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kezyorou_a7

add %stack,1
>Luka has been bound by Kejourou...\
mov %owaza_count3c,0
mov %owaza_num1,1
if %kousan=2 skip 6
name $name
>Just for you, shall I let you taste my vagina...?\
>Hehehe... You are quite the lucky one.@
>Very few men get to taste my body itself.\
name ""
skillname "Courtesan's Pride"
dwave 1,"se\ero_pyu1.ogg"
mov $tatie4,"kezyorou_hb1"
lsp 700,":a;chara\kezyorou_hb1.bmp",0,0:print 10,500
eng "Kejourou forces the bound Luka's penis into her vagina!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<1000 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka manages to swing his body to the side in time!":gosub *wind_guard:sub %stack,1:return
\
>Luka's penis sinks deep into Kejourou's vagina!
skillcount3 3910
mov %damage_kotei,1
damage 500,600
mov %kousoku,2:gosub *status_print
>Luka is being raped by Kejourou!\
skillname ""
if %mylife=0 sub %stack,1:return *kezyorou_h6
name "Luka"
>Ahhhh!\
name ""
>Her wet vagina easily takes me all the way inside.@
>Just from the way its moving around me, I almost feel like I could come...\
sub %stack,1
goto *kezyorou_a8



*kezyorou_a8

add %stack,1
>Luka is being raped by Kejourou...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My first rate skills leave all men helpless.":mov $sel2,"Kejourou slowly moves up and down, forcing Luka in and out of her!"
if %ransu=2 mov $sel1,"Are you trying to endure it...? Hehe, how silly.":mov $sel2,"Kejourou slowly tightens her small vagina!"
if %ransu=3 mov $sel1,"Are you trying to endure it...? Hehe, there's no point.":mov $sel2,"Kejourou's vagina moves around Luka's penis, stimulating him!"
if %ransu=4 mov $sel1,"Just pour your semen into my warm vagina.":mov $sel2,"The soft flesh of Kejourou's vagina forces pleasure into Luka!"
if %ransu=5 mov $sel1,"How about I squeeze on it?":mov $sel2,"Kejourou squeezes her vagina around Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Courtesan's Pride"
dwave 1,"se\ero_chupa4.ogg"
mov $tatie4,"kezyorou_hb2"
lsp 700,":a;chara\kezyorou_hb2.bmp",0,0:print 10,500
eng $sel2:$sel6
skillcount3 3910
mov %damage_kotei,1
damage 500,600
skillname ""
if %mylife=0 sub %stack,1:return *kezyorou_h7
sub %stack,1
goto *kezyorou_a8



*kezyorou_onedari

mov $list1,"Geisha's Masturbation"
if %3905>0 mov %list_num1,1
mov $list2,"Flutist's Playing"
if %3906>0 mov %list_num2,1
mov $list3,"Flower Girl's Breasts"
if %3907>0 mov %list_num3,1
mov $list4,"Indecent Hair"
if %3908>0 mov %list_num4,1
mov $list5,"Ultimate Hair Charm"
if %3909>0 mov %list_num5,1
mov $list6,"Courtesan's Pride"
if %3910>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *kezyorou_onedari1
if %cmd1=12 goto *kezyorou_onedari2
if %cmd1=13 goto *kezyorou_onedari3
if %cmd1=14 goto *kezyorou_onedari4
if %cmd1=15 goto *kezyorou_onedari5
if %cmd1=16 goto *kezyorou_onedari6
if %cmd1=-1 goto *kezyorou_main
goto *kezyorou_onedari



*kezyorou_onedari1

gosub *onedari_syori
name $name
>You want to try my hand skills?@
>You are quite a greedy little boy... You need some punishment.\
name ""
gosub *kezyorou_el1
gosub *kezyorou_a1
skip -1



*kezyorou_onedari2

gosub *onedari_syori
name $name
>You want to try my oral skills?@
>You are quite a greedy little boy... You need some punishment.\
name ""
gosub *kezyorou_el1
gosub *kezyorou_a2
skip -1



*kezyorou_onedari3

gosub *onedari_syori
name $name
>You want to try my breast skills?@
>You are quite a greedy little boy... You need some punishment.\
name ""
gosub *kezyorou_el1
gosub *kezyorou_a3
skip -1



*kezyorou_onedari4

gosub *onedari_syori
name $name
>You want to try my hair skills?@
>You are quite a greedy little boy... You need some punishment.\
name ""
gosub *kezyorou_el1
gosub *kezyorou_a4
skip -1



*kezyorou_onedari5

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want to try my hair skills while being bound?@
>You are quite a greedy little boy... You need some punishment.\
name ""
gosub *kezyorou_el1
if %kousoku=0 gosub *kezyorou_a5
gosub *kezyorou_a6
skip -1



*kezyorou_onedari6

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want me to rape you...?@
>You are quite a greedy little boy... You need some punishment.\
name ""
if %kousoku=0 gosub *kezyorou_a5
gosub *kezyorou_a7
skip -1



*kezyorou_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\kezyorou_bk03.bmp",0,0
gosub *syasei2
>Unable to take Kejourou's hand techniques any longer, Luka comes, covering her fingers with semen.\
mov %viclose,1:gosub *lose
mov %2729,%2729+1:if %2729=1 mov %count_koenemy,%count_koenemy+1
if %2729>%count_most mov %count_most,%2729:mov $count_mostname,$name
count 5,3
mov $bad1,"Kejourou used her hand techniques to force Luka to come."
gosub *face2
name $name
>Aha, you sure did come a lot...@
>Did my hand techniques feel that amazing?\
name ""
goto *kezyorou_h



*kezyorou_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\kezyorou_bk01.bmp",0,0
gosub *syasei2
>Unable to endure Kejourou's oral techniques any longer, Luka comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2729,%2729+1:if %2729=1 mov %count_koenemy,%count_koenemy+1
if %2729>%count_most mov %count_most,%2729:mov $count_mostname,$name
count 4,3
mov $bad1,"Kejourou used her oral techniques to force Luka to come."
gosub *face2
name $name
>Aha, you sure did come a lot...@
>Did my oral techniques feel that amazing?\
name ""
goto *kezyorou_h



*kezyorou_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\kezyorou_bk02.bmp",0,0
gosub *syasei2
>Unable to endure Kejourou's breast techniques any longer, Luka comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2729,%2729+1:if %2729=1 mov %count_koenemy,%count_koenemy+1
if %2729>%count_most mov %count_most,%2729:mov $count_mostname,$name
count 7,3
mov $bad1,"Kejourou forced Luka to come with her breasts."
gosub *face2
name $name
>Aha, you sure did come a lot...@
>Did my breast techniques feel that amazing?\
name ""
goto *kezyorou_h



*kezyorou_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\kezyorou_bk04.bmp",0,0
gosub *syasei2
>Unable to endure Kejourou's hair techniques any longer, Luka comes, covering her hair with semen.\
mov %viclose,1:gosub *lose
mov %2729,%2729+1:if %2729=1 mov %count_koenemy,%count_koenemy+1
if %2729>%count_most mov %count_most,%2729:mov $count_mostname,$name
count 22,3
mov $bad1,"Kejourou forced Luka to come with her hair."
gosub *face2
name $name
>Aha, you sure did come a lot...@
>Did my hair techniques feel that amazing?\
name ""
goto *kezyorou_h



*kezyorou_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\kezyorou_ha4.bmp",0,0
gosub *syasei2
>Bound, Luka is unable to endure Kejourou's hair techniques, coming all over her hair.\
mov %viclose,1:gosub *lose
mov %2729,%2729+1:if %2729=1 mov %count_koenemy,%count_koenemy+1
if %2729>%count_most mov %count_most,%2729:mov $count_mostname,$name
count 22,3
mov $bad1,"Kejourou used her hair to force Luka to come as he was bound."
gosub *face2
name $name
>Coming while bound? You're quite the pervert...@
>What a precocious little boy, shooting your semen all over the place like that.\
name ""
goto *kezyorou_h



*kezyorou_h6

mov %ikigoe,3:gosub *ikigoe
name $name
>You're already done?@
>Even if you're a virgin little boy... That's still too fast.\
name ""
gosub *syasei1
lsp 700,":a;chara\kezyorou_hb3.bmp",0,0
gosub *syasei2
>The moment Luka is forced inside Kejourou, Luka comes, spraying his semen inside her.\
mov %viclose,1:gosub *lose2
mov %2729,%2729+1:if %2729=1 mov %count_koenemy,%count_koenemy+1
if %2729>%count_most mov %count_most,%2729:mov $count_mostname,$name
count 1,3
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come the moment of insertion."
lsp 700,":a;chara\kezyorou_hb4.bmp",0,0:print 10,500
name $name
>Ahahaha, that was way too quick!@
>How embarrassing, was that your first time, little boy?\
name ""
goto *kezyorou_h8



*kezyorou_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\kezyorou_hb3.bmp",0,0
gosub *syasei2
>While being raped by Kejourou, Luka comes, filling her with semen.\
mov %viclose,1:gosub *lose2
mov %2729,%2729+1:if %2729=1 mov %count_koenemy,%count_koenemy+1
if %2729>%count_most mov %count_most,%2729:mov $count_mostname,$name
count 1,3
mov $bad1,"Luka was forced to come as Kejourou raped him."
lsp 700,":a;chara\kezyorou_hb4.bmp",0,0:print 10,500
name $name
>Ahaha, you sure came a lot inside me...@
>Are you trying to get me pregnant, little boy?\
name ""
goto *kezyorou_h8



*kezyorou_h8

name "Luka"
>Ahh...\
name ""
name $name
>But I'm not satisfied with just that...@
>You want more too, don't you?\
>Come on, it's time for round two...@
>Do your best to please me, little boy!\
name ""
skillcount3 3910
skillname "Courtesan's Pride"
dwave 1,"se\ero_chupa4.ogg"
>Kejourou wiggles her waist, squeezing Luka's penis inside her!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_chupa4.ogg"
>Squeezing him, Kejourou grinds against Luka's body!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>Hyaaa!\
name ""
name $name
>Don't you love being raped like this?@
>Here, I'll make it tighter for you.\
name ""
skillcount3 3910
skillname "Courtesan's Pride"
dwave 1,"se\ero_chupa4.ogg"
>Kejourou slowly rides Luka as she tightens her vagina around him!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_chupa4.ogg"
>Luka's penis is squeezed by her soft vaginal flesh!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>Ahhh!@>I'm going to come again!\
name ""
name $name
>Aha... What a pitiful little boy.@
>Just a little movement, and you're about to surrender again?\
>Then for the finishing move...\
name ""
skillcount3 3910
skillname "Courtesan's Pride"
dwave 1,"se\ero_chupa4.ogg"
>Kejourou slightly twists her waist as she grinds against Luka's body!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_chupa4.ogg"
>Twisting and grinding, she squeezes her vagina at the same time!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>C...Coming...!@> Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\kezyorou_hb5.bmp",0,0
gosub *syasei2
>Succumbing to Kejourou's skills, Luka comes, filling her warm vagina with semen.\
name $name
>Haha... Your semen tastes delicious.@
>You seem to love this, too...\
>Come on, let out more.@
>You love my waist movements, don't you?\
name ""
name "Luka"
>Ah...!@> N...No more!\
name ""
skillcount3 3910
skillname "Courtesan's Pride"
dwave 1,"se\ero_chupa4.ogg"
>Kejourou bounces up and down on top of Luka!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_chupa4.ogg"
>She tightens her vagina around Luka's penis!
mov %damage_kotei,1
damage 500,600
skillname ""
name $name
>What do you mean no more?@
>Your cock is still hard, you must want more.\
>Haha, I'll make you come over and over again with my techniques!\
name ""
skillcount3 3910
skillname "Courtesan's Pride"
dwave 1,"se\ero_chupa4.ogg"
>Kejourou pushes down, sinking Luka's penis deeper inside her!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_chupa4.ogg"
>Kejourou grinds against Luka as she twists her waist side to side!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>Please stop... Or I'll come again...\
name ""
name $name
>Aha, already at your limit again?@
>Then let me finish you off at once...\
name ""
skillcount3 3910
skillname "Courtesan's Pride"
dwave 1,"se\ero_chupa4.ogg"
>Putting all her power in, Kejourou squeezes hard down on Luka's penis!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_chupa4.ogg"
>Crushing Luka's penis with her soft flesh, Kejourou finishes Luka off!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>Ah!@>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\kezyorou_hb6.bmp",0,0
gosub *syasei2
>Unable to endure her incredibly tight vagina, Luka comes, filling her with more semen.\
name $name
>Hehe... You sure can come a lot, boy.@
>My lower mouth is satisfied with that, but...\
name ""
gosub *clear_sprite
gosub *setwindow_01p
mov %battle,0
mov %hsean,1
goto *kezyorou_h



*kezyorou_h

mov $bad2,"Played with by Kejourou's hair, Luka's semen is squeezed for the rest of his life."
if %2729=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku=1 mov %hseanwave,17:goto *kezyorou_hb
name "Luka"
>Haaa...\
name ""
name $name
>Haha, what a loose looking face...@
>Now it's time to play with you...\
name ""
dwave 1,"se\ero_makituki1.ogg"
cspl 690,699
lsp 700,":a;chara\kezyorou_ha1.bmp",0,0:print 10,500
name "Luka"
>Urhg...!\
name ""
>Kejourou's hair wraps around my body and limbs, lifting me forcibly into the air.\
name "Luka"
>G...Get off!\
name ""
>I try to struggle, but her hair's hold is far too strong.@
>Despite my best efforts, I can barely manage to shake side to side.\
name $name
>Now then, shall I make you show me the proof of your manhood?@
>Just be obedient and spit it out...\
name ""
>Kejourou's hair moves into my pants, and slips out my penis.\
mov %hseanwave,17:hseanwave
lsp 700,":a;chara\kezyorou_ha2.bmp",0,0:print 10,500
>At the same time, her hair coils around my penis!\
name "Luka"
>Wh...What are you doing!?\
name ""
name $name
>Why... I'm going to make you come, of course.@
>I'll use my hair to play with your penis...\
name ""
>Starting from the root of my penis, her hair slowly winds around me as it heads for my tip.@
>The surprising silky feel of her hair makes my waist shake in surprised pleasure.\
goto *kezyorou_hb



*kezyorou_hb

name "Luka"
>Ahh...\
name ""
name $name
>Now... Where is your weak point at?@
>Shall I try... Here first?\
name ""
>Some of her hair gently rubs right under the neck of my penis.\
>Pressing gently against the tip of my glans from underneath, my lower body twitches uncontrollably from the sudden stimulation.\
name "Luka"
>Ah...!\
name ""
name $name
>That was a nice reaction...@
>Here, I'll stroke the shaft too.\
name ""
>At the same time, her hair starts to stroke my shaft, up and down.@
>The smooth, controlled movements cause my body to shake with more and more pleasure.\
lsp 700,":a;chara\kezyorou_ha3.bmp",0,0:print 10,500
>In response to her movements, pre-come starts to leak from my tip.\
name $name
>Ahaha, are you already feeling it?@
>You're going to come so soon, when I'm still just gently rubbing it?\
name ""
name "Luka"
>S...Stop...\
name ""
>More of her hair slowly moves to the tip of my penis, the tips of her silky hair tickling me as they move.\
>Their smooth strands rub against my urethral opening, and against every sensitive exposed area of my tip.\
name "Luka"
>Ah... Coming...!@
>Ahhhh!\
name ""
name $name
>Hah... Surrendering to this already?@
>Then spray it all out.\
name ""
>Her silky smooth hair, like a brush rubbing against me, continues to gently stroke me, leading me to a sweet ejaculation.\
name "Luka"
>Ahhh...!\
name ""
gosub *syasei1
lsp 700,":a;chara\kezyorou_ha4.bmp",0,0
gosub *syasei2
>My penis pulses, shooting semen out as her silky hair continues stroking and rubbing my weakest points as a man.\
name $name
>Ahaha... You came.@
>Look at all that shameful semen you sprayed everywhere...\
name ""
mov %hseanwave,0:hseanwave
lsp 700,":a;chara\kezyorou_ha5.bmp",0,0:print 10,500
>Kejourou uses her hair to rub the semen I shot out, and brings it to her mouth.@
>Sticking her tongue out, she eagerly licks up my semen.\
name $name
>Hehehe... Such delicious nectar.@
>When I think of all the semen swimming around in your balls... It leaves me in such a good mood.\
>Your semen, existing to make children...@
>How does it feel to see them being eaten by me, instead?\
name ""
>Her eyes are locked on mine as she continues licking up my semen.\
name $name
>Hehe, I know how it is...@>As long as your dick feels good, you don't care, do you?\
>Here, I'll make you feel good again...@> So hurry up and spit out more.\
name ""
mov %hseanwave,17:hseanwave
>Her hair starts moving again.@
>Playing with my penis, the tips of her silky hair focus especially on my tip.\
>At the same time, the rest of it coiled around me slowly starts to tighten more and more...\
name "Luka"
>Ah... Urhg!\
name ""
name $name
>I won't let you hold back.@
>Here, can you endure this?\
name ""
>Kejourou skillfully uses her silky hair to tickle my tip, seemingly able to hit every sensitive point on me.\
>Sometimes massaging me, other times squeezing me... Her skilled techniques leave me gasping and on edge in moments.\
name "Luka"
>No... I'm going to come...\
name ""
name $name
>Hahaha, you really don't have any endurance...@
>Then now for the killing blow!\
name ""
>The same time her hair massages my balls, the silky tips of some other hair rubs my urethral opening.@
>Unable to take it any longer, I erupt with a scream.\
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\kezyorou_ha6.bmp",0,0
gosub *syasei2
>I explode on her hair, my semen spraying all over the place.@
>But even during my orgasm, her hair doesn't stop stimulating me.\
name "Luka"
>Hyaaa!@
>I'm coming, so stop!\
name ""
name $name
>Hahaha... Even though you're a man, you're begging so pathetically.@
>How does it feel, being stroked while you come?\
name ""
name "Luka"
>Hyaaa!\
name ""
>Her ruthless torture of pleasure continues, leaving my body shaking in a hell of ecstasy moments after my orgasm.\
>After only a few moments, my waist goes numb as another climax rocks my body.\
gosub *syasei1
lsp 700,":a;chara\kezyorou_ha7.bmp",0,0
gosub *syasei2
name "Luka"
>Haaa...\
name ""
>Feeling far different than a normal ejaculation, it's almost like I peed out semen.\
mov %hseanwave,0:hseanwave
name "Luka"
>Haaa...\
name ""
name $name
>Ahaha, are you about to pee?@
>What a pitiful little boy...\
name ""
>Kejourou laughs at me as my semen drips out, tears in my eyes from the humiliation at the same time.\
>Whether she kills me like this or keeps it up forever...@> Either way, my future is misery.\
>While tasting the ultimate of humiliation as a man, I have to accept my fate.\
gosub *anten
>.............\
goto *badend



*sirohebisama_start

mov $name,"Shirohebi"
mov $name2,"Shirohebi"
mov $lavel,"sirohebisama"
mov $tatie1,"sirohebisama_st01"
mov $tatie2,"sirohebisama_st02"
mov $tatie3,"sirohebisama_st03"
mov $tatie4,"sirohebisama_ha1"
mov $haikei,"bg090"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,21000
if %nanido=2 mov %max_enemylife,25000
if %nanido=3 mov %max_enemylife,29000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,35
if %nanido=3 mov %earth_keigen,18
mov %alice_skill,1
mov %alice_skill1,100
mov %alice_skill2,130
mov %alice_skill3,100
mov %music,2
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free from Shirohebi!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Haha, what's wrong? Did you think you'd escape with just that?"
mov $mogaku_sel2,"Did you think you could escape from my coil?"
mov $mogaku_sel3,"Hahaha... A snake doesn't release their prey that easily."
mov $mogaku_sel4,"No matter how you struggle, you can't escape from me."
mov $mogaku_sel5,"Do you want me to tighten even more?"
mov $mogaku_dassyutu1,"Oh... That's quite some power there."
mov $mogaku_dassyutu2,"Let me see you struggle even more. Hehe."
mov $mogaku_earth_dassyutu1,"It's like the Earth itself..."
mov $mogaku_earth_dassyutu2,"That is a power humans shouldn't use."
mov $half_s1,"Hahaha, you seem to be enjoying my sexual techniques."
mov $half_s2,"Now go ahead and come..."
mov $kiki_s1,"Hahaha, you're nearly at your limit."
mov $kiki_s2,"Go ahead and cover my body with your semen."
mov %end_n,13
mov %exp_minus,510000
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,4
mov %owaza_count3a,5
name "Luka"
>You're Shirohebi!\
name ""
name $name
>...Indeed, I am the new ruler of Yamatai Village, Shirohebi.@
>You have been acting as quite a nuisance here...\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\sirohebisama_st01.bmp",160,0:print 10,500
name "Alice"
>You're just a slave to Black Alice.@
>Do you honestly think Ilias will allow monsters to rule anything?\
name ""
name $name
>Who knows... I don't know what to believe about that stuff.@
>But I believe firmly in this power Black Alice bestowed upon me!\
name ""
csp 701
gosub *face1
name "Luka"
>Then use it for a good purpose!@
>The only one winning when monsters fight each other is Ilias!\
name ""
name $name
>Haha... I won't forgive a nuisance like you.@
>I'll squeeze you completely dry.\
>No... Prey of your quality would be a waste to squeeze and discard.@
>I'll keep you forever as my toy!\
name ""
>She's drunk on her own power...@
>I don't think persuading her is possible unless I break her confidence!\
goto *common_main



*sirohebisama_v

gosub *face3
name $name
>No... My power...!@
>Black Alice... This is not what you promised!\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Shirohebi is sealed in the form of a snake!\
mov %viclose,1:gosub *victory
mov %getexp,220000:gosub *lvup
mov %2389,1
goto *sean0359



*sirohebisama_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Haha, so you wish to dedicate yourself to me?@
>Then I'll squeeze you plenty...\
name ""
goto *sirohebisama_a



*sirohebisama_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *sirohebisama_kousan
if %cmd1=16 goto *sirohebisama_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *sirohebisama_main



*sirohebisama_a

if %kousoku=1 rnd2 %ransu,1,5
if %kousoku=1 && %ransu<3 gosub *sirohebisama_a5:goto *common_main
if %kousoku=1 && %ransu<5 gosub *sirohebisama_a6:goto *common_main
if %kousoku=1 && %ransu=5 && %owaza_count3b>3 gosub *sirohebisama_a7:goto *common_main
if %kousoku=1 skip -4
if %enemy_earth=3 gosub *sirohebisama_a4:goto *common_main
rnd2 %ransu,1,6
if %ransu=1 gosub *sirohebisama_a1:goto *common_main
if %ransu=2 gosub *sirohebisama_a2:goto *common_main
if %ransu=3 gosub *sirohebisama_a3:goto *common_main
if %ransu=4 && %owaza_count1a>5 gosub *sirohebisama_a4:goto *common_main
if %ransu=5 && %owaza_count3a>6 && %enemy_wind=0 && %enemy_earth=0 gosub *sirohebisama_el1:goto *common_main
if %ransu=6 && %owaza_count3a>6 && %enemy_wind=0 && %enemy_earth=0 gosub *sirohebisama_el2:goto *common_main
skip -7



*sirohebisama_el1

add %stack,1
mov %owaza_count3a,0
name $name
>Come, Zylphe!\
name ""
skillname "Wind Spirit Summon"
mov %enemy_wind,4
mov %kaihi_el,50
dwave 2,"se\wind2.ogg"
lsp2 0,":a;chara\zylphe_st02.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *enemy_elm_print
>Shirohebi summons a spirit of Wind!\
skillname ""
sub %stack,1
return



*sirohebisama_el2

add %stack,1
mov %owaza_count3a,0
name $name
>Come, Gnomaren!\
name ""
skillname "Summon Earth Spirit"
mov %enemy_earth,4
mov %damage_keigen_el,50
dwave 2,"se\earth1.ogg"
lsp2 0,":a;chara\gnomaren_st01.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *enemy_elm_print
>Shirohebi summons a spirit of Earth!\
skillname ""
sub %stack,1
return



*sirohebisama_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I shall squeeze your semen personally..."
if %ransu=2 mov $sel1,"All of the village's boys know my hand techniques... You will know them too."
if %ransu=3 mov $sel1,"How do my hand techniques feel?"
name $name
eng $sel1:$sel6\
name ""
skillname "Boy Squeezing"
dwave 1,"se\ero_koki1.ogg"
>Shirohebi grabs Luka's penis underhanded, and squeezes it!
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,5
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3911
mov %earth_keigen_el,70
if %nanido<2 damage 270,290
if %nanido=2 damage 310,330
if %nanido=3 damage 350,370
if %enemy_wind=0 skip 13
dwave 1,"se\ero_koki1.ogg"
>She slowly moves her hand from root to tip, squeezing all the while!
mov %earth_keigen_el,70
if %nanido<2 damage 270,290
if %nanido=2 damage 310,330
if %nanido=3 damage 350,370
dwave 1,"se\ero_koki1.ogg"
>She skillfully strokes him, as if milking his penis!
mov %earth_keigen_el,70
if %nanido<2 damage 270,290
if %nanido=2 damage 310,330
if %nanido=3 damage 350,370
skillname ""
if %mylife=0 sub %stack,1:return *sirohebisama_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*sirohebisama_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I shall take a good taste of your penis..."
if %ransu=2 mov $sel1,"All men leak when I suck like this."
if %ransu=3 mov $sel1,"I'll take a good suck on your penis."
name $name
eng $sel1:$sel6\
name ""
skillname "Ascending Suck"
dwave 1,"se\ero_buchu2.ogg"
>Shirohebi's tongue coils around Luka's penis as she sucks on him!
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,5
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3912
mov %earth_keigen_el,70
if %nanido<2 damage 280,300
if %nanido=2 damage 320,340
if %nanido=3 damage 360,380
if %enemy_wind=0 skip 13
dwave 1,"se\ero_pyu1.ogg"
>Her tongue licks every inch of his penis!
mov %earth_keigen_el,70
if %nanido<2 damage 280,300
if %nanido=2 damage 320,340
if %nanido=3 damage 360,380
dwave 1,"se\ero_buchu2.ogg"
>Shirohebi sucks hard on Luka's penis as she licks him!
mov %earth_keigen_el,70
if %nanido<2 damage 280,300
if %nanido=2 damage 320,340
if %nanido=3 damage 360,380
skillname ""
if %mylife=0 sub %stack,1:return *sirohebisama_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*sirohebisama_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I shill give you comfort with my breasts..."
if %ransu=2 mov $sel1,"Hehehe... Spit your semen out onto my breasts."
if %ransu=3 mov $sel1,"I'll let you taste my breasts, as I can see you want to..."
name $name
eng $sel1:$sel6\
name ""
skillname "Breast Pressure"
dwave 1,"se\ero_sigoki1.ogg"
>Shirohebi squeezes Luka's penis between her breasts!
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,5
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3913
mov %earth_keigen_el,70
if %nanido<2 damage 290,310
if %nanido=2 damage 330,350
if %nanido=3 damage 370,390
if %enemy_wind=0 skip 13
dwave 1,"se\ero_sigoki1.ogg"
>Squeezing hard, she moves her breasts up and down to stroke Luka!
mov %earth_keigen_el,70
if %nanido<2 damage 290,310
if %nanido=2 damage 330,350
if %nanido=3 damage 370,390
dwave 1,"se\ero_sigoki1.ogg"
>Her delicate clothes rub against Luka's penis, stimulating him further!
mov %earth_keigen_el,70
if %nanido<2 damage 290,310
if %nanido=2 damage 330,350
if %nanido=3 damage 370,390
skillname ""
if %mylife=0 sub %stack,1:return *sirohebisama_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*sirohebisama_a4

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 5
name $name
>Many men wish to have a Lamia coil around them...@
>You're one of those types, aren't you?\
name ""
skillname "The White Snake's Bind"
dwave 1,"se\ero_makituki3.ogg"
>Shirohebi coils around Luka's body!
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,5
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
mov $tatie4,"sirohebisama_ha1"
mov %kousoku,1:gosub *status_print
>Luka has been bound by Shirohebi!\
skillname ""
name $name
if %first_sel1=1 skip 4
>Many men get erect when a Lamia coils around them...@
>I see you're one of those types, hehe.\
skip 3
>I've bound you again.@
>Aren't you lucky? Being bound more than once by me...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,2
if %earth=0 && %nanido=2 mov %genmogaku,2
if %earth=0 && %nanido=3 mov %genmogaku,3
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,1
if %enemy_earth>0 mov %genmogaku,99
sub %stack,1
return



*sirohebisama_a5

add %stack,1
>Luka has been bound by Shirohebi...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll tighten it as much as you want..."
if %ransu=2 mov $sel1,"Some men lose control when I tighten too much..."
if %ransu=3 mov $sel1,"Shall I tighten until you faint?"
name $name
eng $sel1:$sel6\
name ""
skillname "Snake Squeeze"
dwave 1,"se\ero_simetuke1.ogg"
>Shirohebi squeezes Luka's body tighter!
skillcount3 3914
mov %earth_keigen_el,70
if %nanido<2 damage 200,240
if %nanido=2 damage 240,280
if %nanido=3 damage 280,320
if %enemy_wind=0 skip 13
dwave 1,"se\ero_simetuke1.ogg"
>She wiggles her body as she tightens!
mov %earth_keigen_el,70
if %nanido<2 damage 200,240
if %nanido=2 damage 240,280
if %nanido=3 damage 280,320
dwave 1,"se\ero_simetuke1.ogg"
>Pressure attacks Luka from every side!
mov %earth_keigen_el,70
if %nanido<2 damage 200,240
if %nanido=2 damage 240,280
if %nanido=3 damage 280,320
skillname ""
if %mylife=0 sub %stack,1:return *sirohebisama_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*sirohebisama_a6

add %stack,1
>Luka has been bound by Shirohebi...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll use my tail to play with your penis..."
if %ransu=2 mov $sel1,"Haha... Allow my tail to play with it."
if %ransu=3 mov $sel1,"Let it out on my tail."
name $name
eng $sel1:$sel6\
name ""
skillname "Shirohebi's Comforting"
dwave 1,"se\ero_makituki1.ogg"
mov $tatie4,"sirohebisama_ha2"
lsp 700,":a;chara\sirohebisama_ha2.bmp",0,0:print 10,500
>Shirohebi's tail coils around Luka's penis!
skillcount3 3915
mov %earth_keigen_el,70
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
dwave 1,"se\ero_makituki1.ogg"
>She tightens her tail around his penis!
mov %earth_keigen_el,70
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
dwave 1,"se\ero_makituki2.ogg"
>The tip of her tail rubs Luka's glans!
mov %earth_keigen_el,70
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
if %enemy_wind=0 skip 13
dwave 1,"se\ero_makituki2.ogg"
>Keeping her tail in a coil, she moves it up and down Luka's penis!
mov %earth_keigen_el,70
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
dwave 1,"se\ero_makituki2.ogg"
>Shirohebi strokes Luka's penis even faster with her tail!
mov %earth_keigen_el,70
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
skillname ""
if %mylife=0 sub %stack,1:return *sirohebisama_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*sirohebisama_a7

add %stack,1
mov %owaza_count3b,0
mov %owaza_num1,1
if %kousan=2 skip 5
name $name
>Shall I taste your semen more directly?@
>Here, I'll swallow you with my lower mouth...\
name ""
skillname "Snake Mating"
lsp 690,":a;chara\sirohebisama_ct01.bmp",0,0:print 10,500
>While coiled around Luka, Shirohebi brings his waist next to hers!\
dwave 1,"se\ero_pyu1.ogg"
mov $tatie4,"sirohebisama_hb2"
lsp 700,":a;chara\sirohebisama_hb2.bmp",0,0
lsp 690,":a;chara\sirohebisama_ct02.bmp",0,0:print 10,500
>And forces his penis deep inside her vagina!
skillcount3 3916
mov %damage_kotei,1
damage 500,600
mov %kousoku,2:gosub *status_print
>Luka is being raped by Shirohebi!\
skillname ""
if %mylife=0 sub %stack,1:return *sirohebisama_h6
name "Luka"
>Ahhh!\
name ""
>As soon as I'm inside her soft vagina, her powerful muscles instantly clamp down, locking me inside her!\
sub %stack,1
goto *sirohebisama_a8



*sirohebisama_a8

add %stack,1
>Luka is being raped by Shirohebi...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll finish you in no time...":mov $sel2,"Shirohebi grinds back and forth against Luka!"
if %ransu=2 mov $sel1,"I'll squeeze it out with my vagina...":mov $sel2,"The soft flesh inside Shirohebi stimulates Luka!"
if %ransu=3 mov $sel1,"Mating with a snake is simply exquisite, isn't it?":mov $sel2,"Shirohebi's vaginal walls squirm around Luka's penis!"
if %ransu=4 mov $sel1,"It feels good when I tighten, doesn't it?":mov $sel2,"Shirohebi squeezes down hard on Luka's penis!"
if %ransu=5 mov $sel1,"Go ahead and pour your semen into me...":mov $sel2,"Luka's glans presses against Shirohebi's deepest part!"
name $name
eng $sel1:$sel6\
name ""
skillname "Snake Mating"
dwave 1,"se\ero_chupa4.ogg"
mov $tatie4,"sirohebisama_hb3"
lsp 700,":a;chara\sirohebisama_hb3.bmp",0,0
lsp 690,":a;chara\sirohebisama_ct03.bmp",0,0:print 10,500
eng $sel2:$sel6
skillcount3 3916
mov %damage_kotei,1
damage 500,600
skillname ""
if %mylife=0 sub %stack,1:return *sirohebisama_h7
sub %stack,1
goto *sirohebisama_a8



*sirohebisama_onedari

mov $list1,"Boy Squeezing"
if %3911>0 mov %list_num1,1
mov $list2,"Ascending Suck"
if %3912>0 mov %list_num2,1
mov $list3,"Breast Pressure"
if %3913>0 mov %list_num3,1
mov $list4,"Snake Squeeze"
if %3914>0 mov %list_num4,1
mov $list5,"Shirohebi's Comforting"
if %3915>0 mov %list_num5,1
mov $list6,"Snake Mating"
if %3916>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *sirohebisama_onedari1
if %cmd1=12 goto *sirohebisama_onedari2
if %cmd1=13 goto *sirohebisama_onedari3
if %cmd1=14 goto *sirohebisama_onedari4
if %cmd1=15 goto *sirohebisama_onedari5
if %cmd1=16 goto *sirohebisama_onedari6
if %cmd1=-1 goto *sirohebisama_main
goto *sirohebisama_onedari



*sirohebisama_onedari1

gosub *onedari_syori
name $name
>You want to finish in my hands?@
>Then I'll squeeze you as you desire...\
name ""
gosub *sirohebisama_el1
gosub *sirohebisama_a1
skip -1



*sirohebisama_onedari2

gosub *onedari_syori
name $name
>You want to finish in my mouth?@
>Then I'll squeeze you as you desire...\
name ""
gosub *sirohebisama_el1
gosub *sirohebisama_a2
skip -1



*sirohebisama_onedari3

gosub *onedari_syori
name $name
>You want to finish on my breasts?@
>Then I'll squeeze you as you desire...\
name ""
gosub *sirohebisama_el1
gosub *sirohebisama_a3
skip -1



*sirohebisama_onedari4

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want me to wrap around you?@
>Then I'll make it nice and tight...\
name ""
gosub *sirohebisama_el1
if %kousoku=0 gosub *sirohebisama_a4
gosub *sirohebisama_a5
skip -1



*sirohebisama_onedari5

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want me to play with you with my tail?@
>Then I'll wrap around you, and play with you...\
name ""
gosub *sirohebisama_el1
if %kousoku=0 gosub *sirohebisama_a4
gosub *sirohebisama_a6
skip -1



*sirohebisama_onedari6

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want to come inside me?@
>Then I'll coil around you and rape you...\
name ""
if %kousoku=0 gosub *sirohebisama_a4
gosub *sirohebisama_a7
skip -1



*sirohebisama_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\sirohebisama_bk03.bmp",0,0
gosub *syasei2
>As Shirohebi strokes Luka, he comes, covering her hands with semen.\
mov %viclose,1:gosub *lose
mov %2689,%2689+1:if %2689=1 mov %count_koenemy,%count_koenemy+1
if %2689>%count_most mov %count_most,%2689:mov $count_mostname,$name
count 5,3
mov $bad1,"Shirohebi used her hands to force Luka to come."
gosub *face2
name $name
>Hehehe... You covered my hands with so much.@
>Due to your bad behavior, I'll need to punish you personally...\
name ""
goto *sirohebisama_h



*sirohebisama_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\sirohebisama_bk01.bmp",0,0
gosub *syasei2
>As Shirohebi sucks on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2689,%2689+1:if %2689=1 mov %count_koenemy,%count_koenemy+1
if %2689>%count_most mov %count_most,%2689:mov $count_mostname,$name
count 4,3
mov $bad1,"Shirohebi forced Luka to come with her mouth."
gosub *face2
name $name
>Nnnn... You shot so much into my mouth.@
>Due to your bad behavior, I'll need to punish you personally...\
name ""
goto *sirohebisama_h



*sirohebisama_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\sirohebisama_bk02.bmp",0,0
gosub *syasei2
>As Shirohebi's soft breasts squeeze Luka's penis, he comes, covering her chest in semen.\
mov %viclose,1:gosub *lose
mov %2689,%2689+1:if %2689=1 mov %count_koenemy,%count_koenemy+1
if %2689>%count_most mov %count_most,%2689:mov $count_mostname,$name
count 7,3
mov $bad1,"Shirohebi used her breasts to force Luka to come."
gosub *face2
name $name
>Hehehe... You covered my breasts with so much.@
>Due to your bad behavior, I'll need to punish you personally...\
name ""
goto *sirohebisama_h



*sirohebisama_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\sirohebisama_ha1s.bmp",0,0
gosub *syasei2
>While being squeezed tight, Luka comes, accidentally ejaculation as the pain hits him.\
mov %viclose,1:gosub *lose
mov %2689,%2689+1:if %2689=1 mov %count_koenemy,%count_koenemy+1
if %2689>%count_most mov %count_most,%2689:mov $count_mostname,$name
count 16,3
mov $bad1,"Shirohebi forced Luka to come as she squeezed his whole body."
gosub *face2
name $name
>Hahaha, so you came from being squeezed?@
>Due to your bad behavior, I'll need to punish you personally...\
name ""
goto *sirohebisama_h



*sirohebisama_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\sirohebisama_ha4.bmp",0,0
gosub *syasei2
>As Shirohebi's tail rubs Luka's penis, he comes, covering her tail with semen.\
mov %viclose,1:gosub *lose2
lsp 700,":a;chara\sirohebisama_ha5.bmp",0,0:print 10,500
name "Luka"
>Ahh...\
name ""
name $name
>Hehe... Did you leak all over my tail?@
>What poor manners... I'll need to discipline you some more.\
name ""
skillcount3 3915
skillname "Shirohebi's Comforting"
dwave 1,"se\ero_makituki2.ogg"
lsp 700,":a;chara\sirohebisama_ha6.bmp",0,0:print 10,500
>Shirohebi's tail, coiled around Luka's penis, tightens!
mov %damage_kotei,1
damage 100,110
dwave 1,"se\ero_makituki2.ogg"
>Shirohebi slowly squeezes tighter and tighter!
mov %damage_kotei,1
damage 100,110
skillname ""
name "Luka"
>Ah...!@> Haa!\
name ""
name $name
>Hehe... I'll tighten it nice and slowly.@
>Enjoy feeling like prey caught by a snake...\
name ""
skillcount3 3915
skillname "Shirohebi's Comforting"
dwave 1,"se\ero_makituki2.ogg"
>Pressure attacks Luka's penis from all sides!
mov %damage_kotei,1
damage 100,110
dwave 1,"se\ero_makituki2.ogg"
>Shirohebi's tail squeezes harder and harder!
mov %damage_kotei,1
damage 100,110
skillname ""
name "Luka"
>Ahh... Stop...!\
name ""
name $name
>Hehe, is it painful?@
>But if I play with the tip like this...\
name ""
skillcount3 3915
skillname "Shirohebi's Comforting"
dwave 1,"se\ero_makituki2.ogg"
>Shirohebi gently tickles the tip of Luka's penis with the tip of her tail!
mov %damage_kotei,1
damage 100,110
dwave 1,"se\ero_makituki2.ogg"
>She skillfully massages his tip!
mov %damage_kotei,1
damage 100,110
skillname ""
name "Luka"
>N...No... Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\sirohebisama_ha7.bmp",0,0
gosub *syasei2
>While being squeezed from root to tip, Luka comes all over her tail as she uses the tip to massage him.\
name $name
>Haha... You came from just a little rubbing as I squeezed you.@
>Now what if I stroked it...?\
name ""
name "Luka"
>S...Stop... Haaa!\
name ""
skillcount3 3915
skillname "Shirohebi's Comforting"
dwave 1,"se\ero_makituki2.ogg"
>Still squeezing Luka's penis, Shirohebi starts to stroke him up and down!
mov %damage_kotei,1
damage 100,110
dwave 1,"se\ero_makituki2.ogg"
>At the same time, Shirohebi squeezes him tighter!
mov %damage_kotei,1
damage 100,110
skillname ""
name "Luka"
>Haa... No more...\
name ""
name $name
>Haha, you're already moaning.@
>Let me hear more of that...\
name ""
skillcount3 3915
skillname "Shirohebi's Comforting"
dwave 1,"se\ero_makituki2.ogg"
>Shirohebi squeezes Luka's penis as she strokes him up and down!
mov %damage_kotei,1
damage 100,110
dwave 1,"se\ero_makituki2.ogg"
>At the same time, she massages his tip!
mov %damage_kotei,1
damage 100,110
skillname ""
name "Luka"
>Ahhh... I'm going to come again...\
name ""
name $name
>Hehe, you really are pathetic.@
>Then go ahead and finish as my tail plays with you...\
name ""
skillcount3 3915
skillname "Shirohebi's Comforting"
dwave 1,"se\ero_makituki2.ogg"
>Shirohebi's tail moves even faster!
mov %damage_kotei,1
damage 100,110
dwave 1,"se\ero_makituki2.ogg"
>Massaging his tip as she strokes and squeezes his penis, Shirohebi finishes Luka off!
mov %damage_kotei,1
damage 100,110
skillname ""
name "Luka"
>Haa... Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\sirohebisama_ha8.bmp",0,0
gosub *syasei2
>Unable to endure Shirohebi's assault with her tail, Luka comes, covering her tail with even more semen.\
lsp 700,":a;chara\sirohebisama_ha9.bmp",0,0:print 10,500
name $name
>Hahaha... Just look at how much is on my tail now.@
>Due to your bad behavior, I'll need to punish you personally...\
name ""
gosub *clear_sprite
gosub *setwindow_01p
mov %battle,0
mov %hsean,1
mov %2689,%2689+1:if %2689=1 mov %count_koenemy,%count_koenemy+1
if %2689>%count_most mov %count_most,%2689:mov $count_mostname,$name
count 19,3
mov $bad1,"Shirohebi forced Luka to come with her tail as he was bound."
goto *sirohebisama_h



*sirohebisama_h6

mov %ikigoe,3:gosub *ikigoe
name $name
>Mmm?@> But all I did was put it in...\
name ""
gosub *syasei1
lsp 700,":a;chara\sirohebisama_hb4.bmp",0,0
lsp 690,":a;chara\sirohebisama_ct04.bmp",0,0
gosub *syasei2
>The instant Luka is forced into Shirohebi's tight vagina, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2689,%2689+1:if %2689=1 mov %count_koenemy,%count_koenemy+1
if %2689>%count_most mov %count_most,%2689:mov $count_mostname,$name
count 1,3
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Shirohebi forced Luka to come the moment of insertion."
gosub *face2
name $name
>Haha, you didn't even last a few seconds.@
>Due to your bad behavior, I'll need to punish you personally...\
name ""
goto *sirohebisama_h



*sirohebisama_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\sirohebisama_hb4.bmp",0,0
lsp 690,":a;chara\sirohebisama_ct04.bmp",0,0
gosub *syasei2
>As Shirohebi rapes Luka, he finally comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2689,%2689+1:if %2689=1 mov %count_koenemy,%count_koenemy+1
if %2689>%count_most mov %count_most,%2689:mov $count_mostname,$name
count 1,3
mov $bad1,"Shirohebi forced Luka to come as she raped him."
gosub *face2
name $name
>Haha, you sure shot a lot into me...@
>Due to your bad behavior, I'll need to punish you personally...\
name ""
goto *sirohebisama_h



*sirohebisama_h

mov $bad2,"Luka was endlessly raped, his semen thoroughly squeezed for the rest of his life."
if %2689=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku=2 mov %hseanwave,4:hseanwave:goto *sirohebisama_hb
name "Luka"
>Ahh...\
name ""
name $name
>Haha, can you not resist any longer?@
>Then I'm going to play with you a lot, so prepare yourself...\
name ""
dwave 1,"se\ero_makituki3.ogg"
cspl 690,699
lsp 700,":a;chara\sirohebisama_hb1.bmp",0,0:print 10,500
>Shirohebi coils around me, easily taking away my freedom.\
name "Luka"
>Guh... Get off!\
name ""
name $name
>I won't let you go...@
>I'll humiliate you as I play with you.\
name ""
lsp 690,":a;chara\sirohebisama_ct01.bmp",0,0:print 10,500
>Shirohebi presses my penis against her hot, wet vagina.@
>Just the feeling of it instantly makes me get erect in response.\
name "Luka"
>Ahh...\
name ""
name $name
>Haha... You seem to be ready to mate with me.@
>I'll squeeze your semen completely dry...\
name ""
name "Luka"
>S...Stop... Ahhh!\
name ""
mov %hseanwave,4:hseanwave
lsp 700,":a;chara\sirohebisama_hb2.bmp",0,0
lsp 690,":a;chara\sirohebisama_ct02.bmp",0,0:print 10,500
>Shirohebi presses against me, forcing me deep into her.@
>With my freedom taken away, I can't do anything to stop her from raping me.\
>Her soft, hot vaginal walls slowly press down on me, almost as if forming to my shape inside her.\
name "Luka"
>N...No... Ahhh!\
name ""
name $name
>Hehe... You're already moaning?@
>Do I feel that good?\
name ""
lsp 700,":a;chara\sirohebisama_hb3.bmp",0,0
lsp 690,":a;chara\sirohebisama_ct03.bmp",0,0:print 10,500
goto *sirohebisama_hb



*sirohebisama_hb

>With a smile of superiority, Shirohebi starts to move her body.@
>My penis is tossed around inside her tight, hot vagina.\
>It almost feels like a mouth, sucking and pulling on me.@
>On my back with no way to resist, I can only moan as the pleasure assaults me.\
name "Luka"
>Ah...ahh...\
name ""
>I put all of my power into trying to stop myself, but I can't deny the pleasure attacking me.\
name "Luka"
>I...I'm going to come...\
name ""
name $name
>Already? What a pathetic man...@
>Come on, try to show a little more backbone.\
name ""
>Giggling as she looks down at me, Shirohebi gives me a squeeze with her vagina.@
>The quick burst of pleasure just leads me closer to my climax.\
name $name
>Haha, that's it, then?@
>Are you already leaking?\
>Fine, then come inside me!@
>Spray everything out into me!\
name "Luka"
>N...Nooo... Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\sirohebisama_hb4.bmp",0,0
lsp 690,":a;chara\sirohebisama_ct04.bmp",0,0
gosub *syasei2
>Unable to endure it any longer, I explode inside her as she squeezes me.\
lsp 700,":a;chara\sirohebisama_hb5.bmp",0,0
lsp 690,":a;chara\sirohebisama_ct05.bmp",0,0:print 10,500
name "Luka"
>Haaa...\
name ""
>Still bound, my body untenses as the pleasure from the orgasm washes over me.\
name $name
>Haha... You already look like you're in a trance of ecstasy.\
>But I'm not nearly so satisfied...@
>I'm going to keep squeezing you until I've had enough!\
name ""
>Shirohebi stares at me with the eyes of a predator taunting its prey.\
name $name
>I would like for you to taste much more of my skills...@
>But with how quick you ejaculate, I think I'm too much for you.\
name ""
lsp 700,":a;chara\sirohebisama_hb6.bmp",0,0
lsp 690,":a;chara\sirohebisama_ct06.bmp",0,0:print 10,500
name "Luka"
>Ahhh!\
name ""
mov %hseanwave,8:hseanwave
>Shirohebi's vaginal muscles suddenly start tensing, forcing a strange vibration sensation into me.\
>Rather than the squeezing stimulations from before, this feels like every inch of her flesh is massaging and rubbing me as it quickly moves.\
name $name
>Hehe... You can feel it, can't you?@
>My insides are wriggling and squirming quickly...\
>I can control my own muscles however I want there.@
>Aren't you glad you get to taste something like this?\
name ""
name "Luka"
>Haa... It feels good...\
name ""
>Her soft, warm flesh rubs especially hard against my glans inside her, making me breathe out a sigh of ecstasy.\
name $name
>Haha... Just look at you.@
>Do I feel that amazing?\
>Let me hear that pitiful male moan you have.\
name ""
name "Luka"
>Ah...Ahhh!\
name ""
>Her soft flesh suddenly tightens, squeezing down hard on me like before.@
>At her mercy as she toys with my penis, I can only feebly moan as her skills bring me to the edge again in no time.\
name "Luka"
>Ah...!@> Hyaa!\
name ""
name $name
>Hehehe... Well? Do you want me to toy with you more?@
>Or finish you off in one shot?\
name ""
name "Luka"
>Please... Just let me come...\
name ""
name $name
>Haha... Look at you now, begging to ejaculate.@
>Then I'll grant your wish...\
name ""
>With a strong squeeze, her flesh tightens on all sides as it continues vibrating against my penis.\
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\sirohebisama_hb7.bmp",0,0
lsp 690,":a;chara\sirohebisama_ct07.bmp",0,0
gosub *syasei2
>I explode inside her again, my resistance crushed in an instant by her technique.@
>And even during my ejaculation, she doesn't let up.\
name $name
>Hehe... I'll devour all of your semen...\
name ""
lsp 700,":a;chara\sirohebisama_hb8.bmp",0,0
lsp 690,":a;chara\sirohebisama_ct08.bmp",0,0:print 10,500
>Her vagina pulses little by little, hitting me with a strange stimulation as she milks out all of the semen from my last ejaculation.\
name "Luka"
>Ahhh!\
name ""
name $name
>Hehe... You understand that your semen is being devoured, right?\
>Your delicious semen is shooting into me, to be consumed...@
>Reflect on the joy you get to experience at being able to offer me your semen.\
name ""
>Almost as if sucking out my soul, her vagina continues to pulse and squeeze out my semen.\
name "Luka"
>Ahh... Please, let me go...@
>I'm going to come again... Let me go...!\
name ""
name $name
>Haha... Why would I let you go?@
>Just go mad in my embrace of endless pleasure...\
name ""
name "Luka"
>Ahhh!\
name ""
>As her vaginal stimulation continues, my lower body goes numb again as my resistance is crushed.\
gosub *syasei1
lsp 700,":a;chara\sirohebisama_hb9.bmp",0,0
lsp 690,":a;chara\sirohebisama_ct09.bmp",0,0
gosub *syasei2
>And with another spurt, more semen erupts into her greedy vagina.\
name $name
>Haha, another ejaculation.@
>Now I'll get another good taste...\
name ""
name "Luka"
>Ah...Ahhh!\
name ""
>Her vagina shrinks smaller as it starts the pulsing, sucking motion to draw out my semen.\
name $name
>There's lots more to squeeze out...\
name ""
name "Luka"
>Ahh... Please, no more!@
>I can't come any more!\
name ""
name $name
>Haha... You can't come any more?@
>But you won't escape from my vagina just with that.\
>Don't worry, your semen is too appetizing for me to simply kill you.@
>I'll keep you alive, and keep squeezing you dry.\
name ""
name "Luka"
>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>My semen shoots out, sucked up by her devilish vagina.@
>Completely at her mercy, I have no choice but to continue shooting off inside her...\
name $name
>Haha... Do you want me to rub your penis more?@
>Or perhaps suck on it?\
>Which do you want next?@>How do you want me to make you come?\
name ""
name "Luka"
>No more... Please stop!@
>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>The merciless rape only continues.@
>But as she said, she doesn't kill me.\
>Stuck in Shirohebi's coil, this hell of pleasure never ends.\
name "Luka"
>N...No... Ah...\
name ""
name $name
>Come on, let more out!@
>I'll suck it all up...\
name ""
gosub *syasei1:gosub *syasei2
mov %hseanwave,0:hseanwave
gosub *anten
>...............\
goto *badend



*walraune_start

mov $name,"Walraune"
mov $name2,"Walraune"
mov $lavel,"walraune"
mov $tatie1,"walraune_st01"
mov $tatie2,"walraune_st02"
mov $tatie3,"walraune_st03"
mov $tatie4,"walraune_st02"
mov $haikei,"bg093"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,17000
if %nanido=2 mov %max_enemylife,21000
if %nanido=3 mov %max_enemylife,25000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,20
if %nanido=3 mov %earth_keigen,10
mov %alice_skill,1
mov %alice_skill1,130
mov %alice_skill2,100
mov %alice_skill3,100
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $half_s1,"You're no big deal..."
mov $half_s2,"I'll hurry up and finish you off!"
mov $kiki_s1,"Hmph... How pathetic."
mov $kiki_s2,"Now to force your finish..."
mov %end_n,13
mov %exp_minus,0
mov %zmonster_x,-300
mov %tukix,300
name $name
>Found you...@> Eh? Why is there a human?@
>The order for human disposal wasn't given yet...\
>Now, please hand over those two.@
>If you do, I'll overlook you this time.\
name ""
name "Luka"
>And what will happen to these two?\
name ""
name $name
>For the insect, I'll slowly suck up her nutrients as food, nice and slowly.\
>For Arum... Since she's a traitor who went to the insects, I'll dispose of her.\
name ""
name "Luka"
>I won't ever let that happen!\
name ""
name $name
>Are you sure that's a wise thing to say?@
>I'm no mere Alraune...\
>I'll suck your nutrients first, then deal with the other two!\
name ""
goto *common_main



*walraune_v

gosub *face3
name $name
>This isn't funny...@
>How could a human be so strong...!?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Walraune is sealed in the form of a flower!\
mov %viclose,1:gosub *victory
mov %getexp,170000:gosub *lvup
mov %2390,1
goto *sean0361



*walraune_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>You want me to suck up your nutrients?@
>Good... I'll suck them all up then!\
name ""
goto *walraune_a



*walraune_main

if %status=7 goto *walraune_konran_a
gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *walraune_kousan
if %cmd1=16 goto *walraune_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *walraune_main



*walraune_yuwaku_a

rnd2 %ransu,1,2
if %ransu=1 gosub *walraune_yuwaku_a1:goto *common_main
if %ransu=2 gosub *walraune_yuwaku_a2:goto *common_main



*walraune_yuwaku_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"L...Lick it..."
if %ransu=2 mov $sel1,"Lips... So good..."
if %ransu=3 mov $sel1,"Haaa..."
name "Luka"
eng $sel1:$sel6\
name ""
>Luka pushes his penis against Walraune's mouth!
if %nanido<2 damage 150,200
if %nanido=2 damage 190,240
if %nanido=3 damage 230,280
if %mylife=0 mov %hanyo1,1:sub %stack,1:return *walraune_h5
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll lick your smelly penis..."
if %ransu=2 mov $sel1,"You want me to use my mouth?"
if %ransu=3 mov $sel1,"If you press it against my mouth, I guess I have to lick..."
name $name
eng $sel1:$sel6\
name ""
dwave 1,"se\ero_pyu1.ogg"
>Walraune eagerly licks Luka's penis!
if %nanido<2 damage 250,280
if %nanido=2 damage 300,400
if %nanido=3 damage 400,500
if %mylife=0 mov %hanyo1,1:sub %stack,1:return *walraune_h5
sub %stack,1
return



*walraune_yuwaku_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"B...Breasts..."
if %ransu=2 mov $sel1,"So soft..."
if %ransu=3 mov $sel1,"Haa..."
name "Luka"
eng $sel1:$sel6\
name ""
>Luka sticks his penis between Walraune's breasts!
if %nanido<2 damage 150,200
if %nanido=2 damage 190,240
if %nanido=3 damage 230,280
if %mylife=0 mov %hanyo1,2:sub %stack,1:return *walraune_h5
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You want to sandwich your penis between these?"
if %ransu=2 mov $sel1,"What do you want to do with my breasts?"
if %ransu=3 mov $sel1,"Wanting to use a girl's breasts like this... You're the worst."
name $name
eng $sel1:$sel6\
name ""
dwave 1,"se\ero_sigoki1.ogg"
>Walraune squeezes Luka's penis between her breasts!
if %nanido<2 damage 250,280
if %nanido=2 damage 300,400
if %nanido=3 damage 400,500
if %mylife=0 mov %hanyo1,2:sub %stack,1:return *walraune_h5
sub %stack,1
return



*walraune_konran_a

rnd2 %ransu,1,3
if %ransu=1 goto *common_attack
if %ransu=2 goto *walraune_konran_a1
if %ransu=3 goto *walraune_konran_a2



*walraune_konran_a1

rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ha!"
if %ransu=2 mov $sel1,"Hya!"
if %ransu=3 mov $sel1,"Orya!"
name "Luka"
eng $sel1:$sel6\
name ""
>Luka attacks himself!
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\slash.ogg"
if %nanido<2 damage 200,230
if %nanido=2 damage 260,290
if %nanido=3 damage 320,350
if %mylife=0 goto *walraune_h7
goto *walraune_a



*walraune_konran_a2

rnd2 %ransu,1,6
if %ransu=1 mov $sel1,"I'm a true Hero!"
if %ransu=2 mov $sel1,"Purupurupuru. I'm a goooood slime!"
if %ransu=3 mov $sel1,"Hehehe... So full..."
if %ransu=4 mov $sel1,"Uwaa... Flowers!"
if %ransu=5 mov $sel1,"Where am I!?"
if %ransu=6 mov $sel1,"My mother was an angel, you know!"
name "Luka"
eng $sel1:$sel6\
name ""
>Luka babbles strange things!\
goto *walraune_a



*walraune_a

rnd2 %ransu,1,5
if %ransu=1 && %status=0 gosub *walraune_a1:goto *common_main
if %ransu=2 && %status=0 gosub *walraune_a2:goto *common_main
if %ransu=3 && %status=0 gosub *walraune_a3:goto *common_main
if %ransu=4 && %status=0 gosub *walraune_a4:goto *common_main
if %ransu=5 gosub *walraune_a5:goto *common_main
skip -6



*walraune_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll give you a handjob, full of pollen."
if %ransu=2 mov $sel1,"I'll stroke you with my pollen covered hands."
if %ransu=3 mov $sel1,"I'll make you come quickly with my hand!"
name $name
eng $sel1:$sel6\
name ""
skillname "Confusing Pollen Handjob"
dwave 1,"se\ero_koki1.ogg"
>Walraune strokes Luka's penis with her pollen-covered hands!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3924
if %nanido<2 damage 250,270
if %nanido=2 damage 290,310
if %nanido=3 damage 330,340
if %status=0 mov $sel1,"Luka became confused!"
if %status=7 mov $sel1,"Luka is confused..."
mov %status,7:gosub *status_print
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *walraune_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,2,3
if %nanido=3 rnd2 %status_turn,3,4
sub %stack,1
return



*walraune_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"With poison sap in my mouth, I'll suck on you..."
if %ransu=2 mov $sel1,"My saliva is slightly poisonous..."
if %ransu=3 mov $sel1,"I'll suck on you with my poison sap..."
name $name
eng $sel1:$sel6\
name ""
skillname "Paralyzing Sap Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>With her mouth dripping sap, Walraune sucks on Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,60
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3925
if %nanido<2 damage 250,270
if %nanido=2 damage 290,310
if %nanido=3 damage 330,350
if %status=0 mov $sel1,"Luka has been paralyzed!"
if %status=2 mov $sel1,"Luka has been paralyzed..."
mov %status,2:gosub *status_print
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *walraune_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
rnd2 %status_turn,1,2
if %nanido=2 rnd2 %status_turn,1,2
if %nanido=3 rnd2 %status_turn,2,3
sub %stack,1
return



*walraune_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll sandwich it, covered in sap..."
if %ransu=2 mov $sel1,"My breasts are covered in special sap..."
if %ransu=3 mov $sel1,"I'll plunge you into ecstasy between my breasts!"
name $name
eng $sel1:$sel6\
name ""
skillname "Ecstasy Sap Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>Walraune sandwiches Luka's penis between her sap-covered breasts!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,60
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3926
if %nanido<2 damage 250,270
if %nanido=2 damage 290,310
if %nanido=3 damage 330,350
if %status=0 mov $sel1,"Luka has been immersed in ecstasy!"
if %status=1 mov $sel1,"Luka has been immersed in ecstasy..."
mov %status,1:gosub *status_print
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *walraune_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
rnd2 %status_turn,1,2
if %nanido=2 rnd2 %status_turn,1,2
if %nanido=3 rnd2 %status_turn,2,3
sub %stack,1
return



*walraune_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll use the pollen in my hair to disturb your heart..."
if %ransu=2 mov $sel1,"I'll use my pollen covered hair to play with your penis..."
if %ransu=3 mov $sel1,"You won't be able to think anymore after my hair touches you!"
name $name
eng $sel1:$sel6\
name ""
skillname "Seduction Pollen Hair"
dwave 1,"se\umaru.ogg"
>Covered in pollen, Walraune's hair coils around Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3927
if %nanido<2 damage 250,270
if %nanido=2 damage 290,310
if %nanido=3 damage 330,350
if %status=0 mov $sel1,"Luka has been seduced!"
if %status=5 mov $sel1,"Luka has been seduced..."
mov %status,5:gosub *status_print
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *walraune_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,2,3
if %nanido=3 rnd2 %status_turn,3,4
sub %stack,1
return



*walraune_a5

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My vine will make you come!"
if %ransu=2 mov $sel1,"I'll play with you with my vine!"
if %ransu=3 mov $sel1,"Cover my vine with your semen!"
name $name
eng $sel1:$sel6\
name ""
skillname "Hell Tentacle"
dwave 1,"se\ero_makituki1.ogg"
>Walraune's vine wraps around Luka's body!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<80 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3928
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
dwave 1,"se\ero_makituki2.ogg"
>Walraune's vines caress Luka's body and penis!
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
dwave 1,"se\ero_makituki3.ogg"
>One of her vines quickly strokes Luka's penis!
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
skillname ""
if %mylife=0 sub %stack,1:return *walraune_h6
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*walraune_onedari

mov $list1,"Confusing Pollen Handjob"
if %3924>0 mov %list_num1,1
mov $list2,"Paralyzing Sap Blowjob"
if %3925>0 mov %list_num2,1
mov $list3,"Ecstasy Sap Tit Fuck"
if %3926>0 mov %list_num3,1
mov $list4,"Seduction Pollen Hair"
if %3927>0 mov %list_num4,1
mov $list5,"Hell Tentacle"
if %3928>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *walraune_onedari1
if %cmd1=12 goto *walraune_onedari2
if %cmd1=13 goto *walraune_onedari3
if %cmd1=14 goto *walraune_onedari4
if %cmd1=15 goto *walraune_onedari5
if %cmd1=-1 goto *walraune_main
goto *walraune_onedari



*walraune_onedari1

gosub *onedari_syori
name $name
>You want to come in my hand?@
>Then I'll finish you quickly...\
name ""
gosub *walraune_a1
skip -1



*walraune_onedari2

gosub *onedari_syori
name $name
>You want to come in my mouth?@
>Then I'll finish you quickly...\
name ""
gosub *walraune_a2
skip -1



*walraune_onedari3

gosub *onedari_syori
name $name
>You want to come on my breasts?@
>Then I'll finish you quickly...\
name ""
gosub *walraune_a3
skip -1



*walraune_onedari4

gosub *onedari_syori
name $name
>You want to come on my hair?@
>Then I'll finish you quickly...\
name ""
gosub *walraune_a4
skip -1



*walraune_onedari5

gosub *onedari_syori
name $name
>You want to come on my vines?@
>Then I'll finish you quickly...\
name ""
gosub *walraune_a5
skip -1



*walraune_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\walraune_bk04.bmp",0,0
gosub *syasei2
>As Walraune strokes him, Luka comes, covering her hands in semen.\
mov %viclose,1:gosub *lose
mov %2690,%2690+1:if %2690=1 mov %count_koenemy,%count_koenemy+1
if %2690>%count_most mov %count_most,%2690:mov $count_mostname,$name
count 5,3
mov $bad1,"Walraune forced Luka to come with her hands."
gosub *face2
name $name
>Ahaha, how disappointing.@
>I'll squeeze a lot more semen from you, so prepare yourself!\
name ""
goto *walraune_h



*walraune_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\walraune_bk01.bmp",0,0
gosub *syasei2
>As Walraune sucks on his penis, Luka comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2690,%2690+1:if %2690=1 mov %count_koenemy,%count_koenemy+1
if %2690>%count_most mov %count_most,%2690:mov $count_mostname,$name
count 5,3
mov $bad1,"Walraune forced Luka to come with her mouth."
gosub *face2
name $name
>Ahaha, how disappointing.@
>I'll squeeze a lot more semen from you, so prepare yourself!\
name ""
goto *walraune_h



*walraune_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\walraune_bk03.bmp",0,0
gosub *syasei2
>As Walraune's soft breasts squeeze Luka's penis, he comes, covering her chest in semen.\
mov %viclose,1:gosub *lose
mov %2690,%2690+1:if %2690=1 mov %count_koenemy,%count_koenemy+1
if %2690>%count_most mov %count_most,%2690:mov $count_mostname,$name
count 7,3
mov $bad1,"Walraune forced Luka to come with her breasts."
gosub *face2
name $name
>Ahaha, how disappointing.@
>I'll squeeze a lot more semen from you, so prepare yourself!\
name ""
goto *walraune_h



*walraune_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\walraune_bk02.bmp",0,0
gosub *syasei2
>As Walraune's hair strokes Luka's penis, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2690,%2690+1:if %2690=1 mov %count_koenemy,%count_koenemy+1
if %2690>%count_most mov %count_most,%2690:mov $count_mostname,$name
count 22,3
mov $bad1,"Walraune forced Luka to come with her hair."
gosub *face2
name $name
>Ahaha, how disappointing.@
>I'll squeeze a lot more semen from you, so prepare yourself!\
name ""
goto *walraune_h



*walraune_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
if %hanyo1=1 lsp 691,":a;chara\walraune_bk01.bmp",0,0
if %hanyo1=2 lsp 693,":a;chara\walraune_bk03.bmp",0,0
gosub *syasei2
>Tempted by Walraune, Luka gave in to his own desires.\
mov %viclose,1:gosub *lose
mov %2690,%2690+1:if %2690=1 mov %count_koenemy,%count_koenemy+1
if %2690>%count_most mov %count_most,%2690:mov $count_mostname,$name
count 31,3
mov $bad1,"Tempted by Walraune, Luka brought about his own defeat."
gosub *face2
name $name
>Ahaha, how pathetic.@
>I'll squeeze a lot more semen from you, so prepare yourself!\
name ""
goto *walraune_h



*walraune_h6

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 696,":a;chara\walraune_bk06.bmp",0,0
gosub *syasei2
>As the vines stroke and rub his body, Luka comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2690,%2690+1:if %2690=1 mov %count_koenemy,%count_koenemy+1
if %2690>%count_most mov %count_most,%2690:mov $count_mostname,$name
count 12,3
mov $bad1,"Walraune forced Luka to come with her vines."
gosub *face2
name $name
>Ahaha, how disappointing.@
>I'll squeeze a lot more semen from you, so prepare yourself!\
name ""
goto *walraune_h



*walraune_h7

name "Luka"
>Ahg... Urhg...\
name ""
>Damaging himself too much, Luka falls to his knees defeated.\
mov %viclose,2:gosub *lose
mov %2690,%2690+1:if %2690=1 mov %count_koenemy,%count_koenemy+1
if %2690>%count_most mov %count_most,%2690:mov $count_mostname,$name
count 31,3
mov $bad1,"Confused by Walraune, Luka dealt the finishing blow to himself."
gosub *face2
name $name
>Ahaha, how disappointing.@
>I'll be squeezing your semen out this time, so prepare yourself...\
name ""
goto *walraune_h



*walraune_h

mov $bad2,"Seized by her petals, Luka was used to provide her nourishment for the rest of his life."
if %2690=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
name $name
>I'll suck out all of your semen.@
>Just miserably writhe as you go mad in pleasure...\
name ""
dwave 1,"se\ero_makituki3.ogg"
>Petals wrap around my body, completely sealing off my movement.@
>After only a moment, only my head is left not surrounded.\
>With all the ivy around my body, I can't move an inch as Walraune's head buries in my groin.\
mov %hseanvoice,1:hseanvoice
cspl 690,699
lsp 700,":a;chara\walraune_h1.bmp",0,0:print 10,500
>Like that, she sucks my penis into her mouth!\
name "Luka"
>Ahh...!\
name ""
>The warm feeling of her mouth spreads through my body.@
>Before I can stop myself, a moan leaks out.\
name $name
>Hehe... What a pathetic voice.@
>Nnn... *Lick*\
name ""
>Her seductive tongue crawls all over my penis.@
>Licking the tip and around my glans, I'm left stunned by the intense pleasure.\
>Her slightly rough tongue almost tickles...@
>The saliva from her mouth covers my penis, and starts to drip.\
>The sweet pleasure makes it feel like my penis could melt in her mouth.\
name "Luka"
>Haaa...\
name ""
name $name
>Nnn... *Suck* *Lick*\
name ""
>Walraune continues using her tongue and lips to give me an intense blowjob.@
>She uses her lips to rub against the neck under my glans, as her tongue rubs all over the tip.\
name "Luka"
>Haa...\
name ""
>Gasping from her intense oral skills, I unconsciously try to pull my waist back to escape.\
name $name
>Mmm... Do you think you can escape?@
>*Suck*\
name ""
>Even if I try to pull back, I'm too tightly bound to escape.@
>I can only hang here, taking her oral skills without being able to defend.\
>As her quick tongue continues licking me, a sweet ache spreads through my body.@
>After a few more moments, all I can focus on is her tongue.\
name "Luka"
>Ah...ah...@
>It feels good...\
name ""
>I relax my body, accepting the pleasure.@
>Instead of fighting it, I give myself over, wanting to surrender to that ecstasy.\
name $name
>Surrendering so soon?@>How easy...@
>Then hurry up and come!\
>Nnn... *Lick*\
name ""
>Sensing me relax, Walraune moves to finish me off.@
>Her tongue movements suddenly get far more intense.\
>The tip of her tongue moves from my urethral opening down my back muscle.@
>Driven to the cliff, the slightest touch will set me off inside her mouth.\
name "Luka"
>Ahh... I...Incredible...@
>I'm coming...!\
name ""
name $name
>*Suck* *Lick*\
name ""
>Pushed over my limit, I yell as I erupt inside her mouth.\
gosub *syasei1
lsp 700,":a;chara\walraune_h1.bmp",0,0
gosub *syasei2
name $name
>Nnn... *Suck*\
name ""
>The moment I ejaculate, I feel a suction on my penis.@
>Making a seal with her lips, Walraune sucks down my semen as I come inside her mouth.\
name "Luka"
>D...Don't suck... Ahh...\
name ""
>It almost feels like she's sucking the semen straight out of my penis.@
>She doesn't stop sucking until after my ejaculation is over.\
>Sucked dry, it feels like my body could melt away in ecstasy.\
name "Luka"
>Ah... Haa...\
name ""
name $name
>Did it feel so good that you can't even think?@
>Normally I'd suck you dry until you died...\
>But your semen is very high quality.@
>I'll keep you with me forever as a pet.\
name ""
name "Luka"
>No way... Uwa!\
name ""
name $name
>You have no right to refuse.@> Your semen belongs to me.@
>Nnn... *Suck*\
name ""
mov %hseanvoice,2:hseanvoice
>Sucking my penis deep inside her mouth, Walraune starts to move.@
>Pushing her head back and forth, she presses down with her lips as she moves.\
>The neck of my glans catches on her lips as she pulls her head back, licking me all the while.\
name "Luka"
>Ahh... That's amazing...\
name ""
name $name
>*Suck* *Suck*\
name ""
>Her tongue licks quickly as she pumps me, bringing me close to another ejaculation.@
>Helpless in her hold, I can only moan as her blowjob continues getting more and more intense.\
name "Luka"
>Haa... I'm going to come...\
name ""
name $name
>Disappointing...@
>You can't endure any more of my fellatio?\
>Then I'll make you finish.@
>Be sure to spit it all out in my mouth...\
>Nnnn *Suck* *Lick*\
name ""
>Walraune suddenly increases her speed, trying to finish me off at once.\
>Her tongue darts all over my glans, bringing me over the edge just as fast as she said she would.\
name "Luka"
>So good... I'm coming!@> Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\walraune_h2.bmp",0,0
gosub *syasei2
name $name
>Nnnn... *Suck* *Suck*\
name ""
name "Luka"
>Haa... Don't suck...!\
name ""
>As soon as I came, Walraune sealed her lips and started sucking down my semen again.\
name $name
>Nnn... You came a lot...@
>*Suck*\
name ""
>And without a rest, she resumes her head movements.@
>Writhing helplessly, I can only moan as her tongue attacks my sensitive penis.\
name "Luka"
>Ahh... No more...\
name ""
>I feel my lower body start to ache again, as I feel another climax coming.\
name $name
>*Suck* Mmm... Your reactions have slowed a little.@
>Is it because I made you come too much, that a light stimulus won't make you come again?\
>Hehe... Then I'll suck it out forcibly.@
>Writhe in agony from my oral techniques!\
name ""
name "Luka"
>Ha...!@> Ahhh!\
name ""
>Walraune seals her lips around the base of my penis, and starts to suck like a vacuum.@
>The intense stimulation forces me to scream as the desire to ejaculate bubbles up in moments.\
name "Luka"
>No... I can't... Endure this...!\
name ""
name $name
>Who said you were allowed to endure it?@
>Hurry up and come...\
>*Suck* *Suck*\
name ""
name "Luka"
>Hyaaa!!\
name ""
gosub *syasei1
lsp 700,":a;chara\walraune_h3.bmp",0,0
gosub *syasei2
>Her intense vacuum quickly sucks out my semen.@
>Rather than spurting into her mouth, it feels more like the semen is sucked straight out of my penis.\
name "Luka"
>Ah...!\
name ""
name $name
>*Suck*\
name ""
>My penis continues pulsing in her mouth, the intense vacuum not letting the flow of semen stop.\
>After what seems like an eternity, the ejaculation ends.@
>Feeling incredibly weak, I fall back in her bind, the echo of ecstasy bouncing around my body.\
mov %hseanvoice,0:hseanvoice
name "Luka"
>Ah... I can't come... Any more...\
name ""
name $name
>Your balls can't produce faster than I can suck...@
>I'll give you a short rest.\
>As soon as you produce more, I'll suck it all back out.@
>Hehehe... Look forward to it.\
name ""
name "Luka"
>N...No way...\
name ""
>Thus, I live the rest of my life bound in Walraune's petals.@
>My existence serves only for her to suck out my semen all day.\
>A miserable fate for a human...\
gosub *anten
>...........\
goto *badend



*dryad_start

mov $name,"Dryad"
mov $name2,"Dryad"
mov $lavel,"dryad"
mov $tatie1,"dryad_st01"
mov $tatie2,"dryad_st02"
mov $tatie3,"dryad_st03"
mov $tatie4,"dryad_hb2"
mov $haikei,"bg094"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,22000
if %nanido=2 mov %max_enemylife,26000
if %nanido=3 mov %max_enemylife,30000
if %nanido=0 mov %max_enemylife,2
if %nanido=1 mov %henkahp1,10000
if %nanido=2 mov %henkahp1,12000
if %nanido=3 mov %henkahp1,14000
if %nanido=0 mov %henkahp1,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,20
if %nanido=3 mov %earth_keigen,10
mov %alice_skill,1
mov %alice_skill1,130
mov %alice_skill2,100
mov %alice_skill3,100
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free from the Dryad!"
mov $mogaku_anno2,"Luka broke free from the Dryad!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"No running away!"
mov $mogaku_sel2,"My ivy is quite strong!"
mov $mogaku_sel3,"I won't let you go until you spray your semen on my ass!"
mov $mogaku_sel4,"Struggling just makes my ass massage you more!"
mov $mogaku_sel5,"Even if you struggle, I won't let you go!"
mov $mogaku_dassyutu1,"Arere... You got away?"
mov $mogaku_dassyutu2,"But I wanted your semen on my ass..."
mov $mogaku_earth_dassyutu1,"Waah... What power..."
mov $mogaku_earth_dassyutu2,"But I wanted your semen on my ass..."
mov $half_s1,"Ahaha, it feels good, doesn't it?"
mov $half_s2,"I'll make it even better!"
mov $kiki_s1,"You're about to come..."
mov $kiki_s2,"Give me all of your fresh semen... "
mov %end_n,13
mov %exp_minus,170000
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,4
mov %owaza_count2a,4
mov %owaza_count3a,4
name $name
>Eh? Why is there a human here?@
>The Queen said not to let anyone through.\
>So, I can't let you proceed.@
>If you don't head back, I'll have to suck out your nutrients...\
name ""
name "Luka"
>Sorry, but I'm not turning back!\
name ""
name $name
>Then there's no other choice.@
>I'm not really in the mood for it, but...\
name ""
>Unlike Walraune from before, I don't feel any real evil intent from her.\
>But if I'm going to get to Queen Alraune, I have no choice but to defeat her!\
mov %sinkou,1
goto *common_main



*dryad001

name $name
>Eh...?@
>My head...\
name ""
>The Dryad suddenly staggers back...@
dwave 1,"se\yami.ogg"
mov $tatie1,"dryad_st11"
mov $tatie2,"dryad_st12"
mov $tatie3,"dryad_st13"
mov $tatie4,"dryad_hc1"
mov $mogaku_sel1,"Ahaha, you won't escape!"
mov $mogaku_sel2,"It's too late, you'll never break free!"
mov $mogaku_sel3,"Ahaha, you won't escape!"
mov $mogaku_sel4,"It's too late, you'll never break free!"
mov $mogaku_sel5,"Ahaha, you won't escape!"
mov $mogaku_dassyutu1,"This is the power of the earth...?"
mov $mogaku_dassyutu2,"To think there are humans with that sort of power..."
mov $mogaku_earth_dassyutu1,"This is the power of the earth...?"
mov $mogaku_earth_dassyutu2,"To think there are humans with that sort of power..."
mov $half_s1,"Hmph... Does it feel good?"
mov $half_s2,"You're pitiful."
mov $kiki_s1,"Hmph... Already about to come?"
mov $kiki_s2,"Shoot out all that juice from your cock."
gosub *face1
>And a devilish air surrounds her, as her body turns purple!\
name $name
>...You sure have been going wild, haven't ya?@
>I hope you're ready to be really tortured now!\
name ""
name "Luka"
>Wh...What the!?\
name ""
>It's like she's suddenly a whole different person!@
>Her body color, her facial expression, her tone...\
name "Luka"
>What happened!?\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\dryad_st11.bmp",160,0:print 10,500
name "Alice"
>...Something has disturbed her heart, and allowed a wicked spirit to take hold in her.\
name ""
name "Luka"
>Something disturbed her heart?@
>Who did something like that!?\
name ""
lsp 700,":a;chara\alice_st73.bmp",-170,50:print 10,500
name "Alice"
>How would I know!?@> Focus on the danger in front of you!\
name ""
name "Luka"
>Yeah, I know!\
name ""
csp 701
gosub *face1
mov %sinkou,2
goto *common_main



*dryad_v

mov $tatie3,"dryad_st13"
gosub *face3
name $name
if %sinkou=2 skip 3
>Ehhh...?\
skip 2
>To someone like you...!?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Dryad is sealed in the form of a small tree!\
mov %viclose,1:gosub *victory
mov %getexp,180000:gosub *lvup
mov %2391,1
goto *sean0362



*dryad_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
if %sinkou=2 skip 4
>Hehe, so you surrender?@
>Then I'll make you feel really good now. \
skip 3
>Ahaha, so you're bowing before me?@
>But I won't go easy on you, so prepare yourself!\
name ""
goto *dryad_a



*dryad_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *dryad_kousan
if %cmd1=16 goto *dryad_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *dryad_main



*dryad_yuwaku_a

gosub *dryad_yuwaku_a1:goto *dryad_a



*dryad_yuwaku_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Ahh..."
if %ransu=2 mov $sel1,"Come... On your ass..."
if %ransu=3 mov $sel1,"Ahh... Ass... So soft..."
name "Luka"
eng $sel1:$sel6\
name ""
dwave 1,"se\ero_sigoki1.ogg"
>Moving back and forth, Luka rubs his penis against the Dryad's ass!
if %nanido<2 damage 100,150
if %nanido=2 damage 120,170
if %nanido=3 damage 140,190
if %mylife=0 sub %stack,1:return *dryad_h5
sub %stack,1
return



*dryad_a

if %enemylife<%henkahp1 && %sinkou=1 goto *dryad001
if %status=5 gosub *dryad_a7:goto *common_main
if %kousoku=1 gosub *dryad_a7:goto *common_main
if %kousoku=2 gosub *dryad_a10:goto *common_main
if %sinkou=1 rnd2 %ransu,1,5
if %sinkou=2 rnd2 %ransu,1,6
if %ransu=1 gosub *dryad_a1:goto *common_main
if %ransu=2 gosub *dryad_a2:goto *common_main
if %ransu=3 gosub *dryad_a3:goto *common_main
if %ransu=4 && %owaza_count3a>5 gosub *dryad_a4:goto *common_main
if %ransu=5 && %sinkou=1 && %owaza_count2a>5 && %status=0 gosub *dryad_a5:goto *common_main
if %ransu=5 && %sinkou=2 && %owaza_count2a>5 && %status=0 gosub *dryad_a8:goto *common_main
if %ransu=6 && %owaza_count1a>5 && %status=0 gosub *dryad_a9:goto *common_main
skip -9



*dryad_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 && %sinkou=1 mov $sel1,"I'll step on your penis, so please ejaculate."
if %ransu=2 && %sinkou=1 mov $sel1,"Does it feel good when I step on it?"
if %ransu=3 && %sinkou=1 mov $sel1,"Does it feel better if I step harder?"
if %ransu=1 && %sinkou=2 mov $sel1,"I'll step all over your dick!"
if %ransu=2 && %sinkou=2 mov $sel1,"I'll make you come with my foot!"
if %ransu=3 && %sinkou=2 mov $sel1,"How does it feel to have your cock trampled on!?"
name $name
eng $sel1:$sel6\
name ""
skillname "Arc Foot"
dwave 1,"se\ero_koki1.ogg"
if %sinkou=2 skip 3
>The Dryad steps on Luka's penis, slowly increasing the pressure!
skip 2
>Pressing hard on Luka's foot, the Dryad steps on his penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3917
if %nanido<2 damage 270,290
if %nanido=2 damage 310,330
if %nanido=3 damage 350,370
skillname ""
if %mylife=0 sub %stack,1:return *dryad_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*dryad_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 && %sinkou=1 mov $sel1,"I'll suck it with my mouth..."
if %ransu=2 && %sinkou=1 mov $sel1,"I like the taste of your penis..."
if %ransu=3 && %sinkou=1 mov $sel1,"Please come in my mouth..."
if %ransu=1 && %sinkou=2 mov $sel1,"I'll make you come in my mouth!"
if %ransu=2 && %sinkou=2 mov $sel1,"You can't endure my oral techniques!"
if %ransu=3 && %sinkou=2 mov $sel1,"My blowjob will make you come."
name $name
eng $sel1:$sel6\
name ""
skillname "Arc Blowjob"
dwave 1,"se\ero_buchu2.ogg"
if %sinkou=2 skip 3
>The Dryad sucks softly on Luka's penis!
skip 2
>The Dryad sucks on Luka's penis, her head moving back and forth like a piston!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3918
if %nanido<2 damage 280,300
if %nanido=2 damage 320,340
if %nanido=3 damage 360,380
skillname ""
if %mylife=0 sub %stack,1:return *dryad_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*dryad_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 && %sinkou=1 mov $sel1,"My breasts are nice and soft, aren't they?"
if %ransu=2 && %sinkou=1 mov $sel1,"When you squeeze it like this, men always come..."
if %ransu=3 && %sinkou=1 mov $sel1,"Uhmf... Uhmf... Does it feel good?"
if %ransu=1 && %sinkou=2 mov $sel1,"I'll squeeze it out with my breasts!"
if %ransu=2 && %sinkou=2 mov $sel1,"I'll rub out your semen with my tits!"
if %ransu=3 && %sinkou=2 mov $sel1,"I'll make you come with my breasts!"
name $name
eng $sel1:$sel6\
name ""
skillname "Arc Bust"
dwave 1,"se\ero_sigoki1.ogg"
if %sinkou=2 skip 3
>The Dryad softly squeezes Luka's penis between her breasts!
skip 2
>Sandwiching Luka's penis between her breasts, the Dryad squeezes down hard on him!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3919
if %nanido<2 damage 290,310
if %nanido=2 damage 330,350
if %nanido=3 damage 370,390
skillname ""
if %mylife=0 sub %stack,1:return *dryad_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*dryad_a4

add %stack,1
mov %owaza_count3a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 && %sinkou=1 mov $sel1,"I'll show your penis some love from my ivy. "
if %ransu=2 && %sinkou=1 mov $sel1,"I'll wrap your penis in my ivy... "
if %ransu=3 && %sinkou=1 mov $sel1,"Men sometimes come all over my ivy..."
if %ransu=1 && %sinkou=2 mov $sel1,"I'll toy with your penis with my ivy!"
if %ransu=2 && %sinkou=2 mov $sel1,"Are you pathetic enough to come all over my ivy!?"
if %ransu=3 && %sinkou=2 mov $sel1,"I'll squeeze out your semen with my ivy!"
name $name
eng $sel1:$sel6\
name ""
skillname "Arc Ivy"
dwave 1,"se\ero_makituki1.ogg"
if %sinkou=2 skip 3
>The Dryad's ivy stretches out and gently strokes Luka's penis!
skip 2
>The Dryad's ivy stretches out and strokes Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3920
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
dwave 1,"se\ero_makituki1.ogg"
>The ivy forces pleasure into Luka!
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
dwave 1,"se\ero_makituki1.ogg"
>Crawling all over his tip, the stimulation attacks Luka!
if %nanido<2 damage 100,120
if %nanido=2 damage 110,130
if %nanido=3 damage 120,140
skillname ""
if %mylife=0 sub %stack,1:return *dryad_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*dryad_a5

add %stack,1
mov %owaza_count2a,0
name $name
>Time for some seduction. \
name ""
skillname "Pollen of Seduction"
dwave 1,"se\gas.ogg"
eng "Sweet pollen wafts from the Dryad's body!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But a gust of wind blows it away!":gosub *wind_guard:sub %stack,1:return
\
mov %status,5:gosub *status_print
>Luka has been seduced by the Dryad!\
skillname ""
name $name
>Ehehe, how is it?@
>Do you want to do lewd things to me?\
name ""
name "Luka"
>Ahh...\
name ""
lsp 700,":a;chara\dryad_ha1.bmp",0,0:print 10,500
>Luka clings to the Dryad from behind!\
dwave 1,"se\ero_sigoki1.ogg"
>Like that, he starts rubbing his penis against her ass!
if %nanido<2 damage 100,150
if %nanido=2 damage 140,190
if %nanido=3 damage 180,230
if %mylife=0 sub %stack,1:return *dryad_h5
rnd2 %status_turn,1,2
if %nanido=2 rnd2 %status_turn,1,2
if %nanido=3 rnd2 %status_turn,2,3
sub %stack,1
goto *dryad_a6



*dryad_a6

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 5
name $name
>Do you like my ass that much?@
>Then I'll make sure you never part from it... \
name ""
skillname "Ivy Restraint"
dwave 1,"se\ero_makituki3.ogg"
>Ivy wraps around Luka's body, and pulls him closer to the Dryad!\
mov %kousoku,1:gosub *status_print
>Luka has been bound by the Dryad!\
skillname ""
name $name
>Now you won't leave it again.@
>Rub against my ass as much as you want. \
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,1
if %earth=0 && %nanido=2 mov %genmogaku,1
if %earth=0 && %nanido=3 mov %genmogaku,2
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,1
sub %stack,1
return



*dryad_a7

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You can come all over my ass. "
if %ransu=2 mov $sel1,"Spit it out all over my ass. "
if %ransu=3 mov $sel1,"Do my ass cheeks feel good?"
if %ransu=4 mov $sel1,"Everyone comes when they feel my ass. "
if %ransu=5 mov $sel1,"I don't mind if you come all over my ass."
name $name
eng $sel1:$sel6\
name ""
skillname "Arc Hip Heaven"
dwave 1,"se\ero_sigoki1.ogg"
>The Dryad presses against Luka, rubbing her ass against his penis!
skillcount3 3921
if %nanido<2 damage 200,220
if %nanido=2 damage 240,260
if %nanido=3 damage 280,300
skillname ""
if %mylife=0 sub %stack,1:return *dryad_h6
sub %stack,1
return



*dryad_a8

add %stack,1
mov %owaza_count2a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll give you some of my special milk...!"
if %ransu=2 mov $sel1,"Take a deep drink of my sweet milk..."
if %ransu=3 mov $sel1,"Drink my milk, and let your mind melt..."
name $name
eng $sel1:$sel6\
name ""
skillname "Sap of Ecstasy"
eng "The Dryad presses one of her breasts against Luka's mouth!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
>She forces him to drink milk from her nipple!
skillcount3 3922
if %nanido<2 damage 200,220
if %nanido=2 damage 240,260
if %nanido=3 damage 280,300
if %status=0 mov $sel1,"Luka has been immersed in ecstasy!"
if %status=1 mov $sel1,"Luka has been immersed in ecstasy..."
mov %status,1:gosub *status_print
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *dryad_h7
if %kousan=2 sub %stack,1:return
name "Luka"
>Haa...\
name ""
name $name
>Hehe... How does my milk taste?@
>Does it make you feel so good you want more?\
name ""
rnd2 %status_turn,1,2
if %nanido=2 rnd2 %status_turn,1,2
if %nanido=3 rnd2 %status_turn,2,3
sub %stack,1
return



*dryad_a9

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 5
name $name
>It's time to make you my prey...@
>I'll squeeze out all of your semen!\
name ""
skillname "Bloom of the Tree"
dwave 1,"se\ero_makituki3.ogg"
eng "The Dryad waves her hands, causing a tree to wrap around Luka's body!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
@
mov %kousoku,2:gosub *status_print
>Luka has been bound by the Dryad!\
skillname ""
name $name
>Prepare yourself...@
>I'll suck you empty for nutrients to give to this tree...\
name ""
if %earth=0 && %nanido<2 mov %genmogaku,99
if %earth=0 && %nanido=2 mov %genmogaku,99
if %earth=0 && %nanido=3 mov %genmogaku,99
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
sub %stack,1
return



*dryad_a10

add %stack,1
name $name
>Hehe, are you ready?@
>Then it's time to rape you...\
name ""
skillname "Bloom of the Tree"
dwave 1,"se\ero_pyu1.ogg"
>The Dryad sinks her waist down, and forces Luka's penis into her!
if %daten>0 goto *skill22x
skillcount3 3923
mov %damage_kotei,1
damage 400,500
mov %kousoku,2:gosub *status_print
>Luka is being raped by the Dryad!\
skillname ""
if %mylife=0 sub %stack,1:return *dryad_h8
name "Luka"
>Ahhh!\
name ""
>Her insides feel warm and slimy, as if filled with sap.@
>But at the same time, it feels like she's pulling my penis deeper inside...\
name $name
>Ahaha, you're in. @
>There's no saving you now.@> You're just going to be squeezed to death by me... \
name ""
sub %stack,1
goto *dryad_a11



*dryad_a11

add %stack,1
>Luka is being raped by the Dryad...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You'll be dried up soon...":mov $sel2,"The Dryad's vagina squeezes down on Luka's penis!"
if %ransu=2 mov $sel1,"You're going to be raped until you die. Hehe.":mov $sel2,"The Dryad's vagina pulls on Luka's penis, as if to suck out his semen by force!"
if %ransu=3 mov $sel1,"I'll take all of your semen, until you die...":mov $sel2,"The sticky sap inside the Dryad sticks to Luka's penis!"
if %ransu=4 mov $sel1,"Well? Does it feel good? But it's going to kill you...":mov $sel2,"The Dryad squeezes down on Luka!"
if %ransu=5 mov $sel1,"It feels good, doesn't it? Being drained dry is the best, isn't it?":mov $sel2,"The Dryad's vagina pulls on Luka's penis, as if to suck out his semen by force!"
name $name
eng $sel1:$sel6\
name ""
skillname "Bloom of the Tree"
dwave 1,"se\ero_chupa4.ogg"
eng $sel2:$sel6
skillcount3 3923
mov %damage_kotei,1
damage 400,500
skillname ""
if %mylife=0 sub %stack,1:return *dryad_h9
sub %stack,1
goto *dryad_a11



*dryad_onedari

mov $list1,"Arc Foot"
if %3917>0 mov %list_num1,1
mov $list2,"Arc Blowjob"
if %3918>0 mov %list_num2,1
mov $list3,"Arc Bust"
if %3919>0 mov %list_num3,1
mov $list4,"Arc Ivy"
if %3920>0 mov %list_num4,1
mov $list5,"Arc Hip Heaven"
if %3921>0 mov %list_num5,1
mov $list6,"Sap of Ecstasy"
if %3922>0 mov %list_num6,1
mov $list7,"Bloom of the Tree"
if %3923>0 mov %list_num7,1
gosub *cmd_onedari
if %cmd1=11 goto *dryad_onedari1
if %cmd1=12 goto *dryad_onedari2
if %cmd1=13 goto *dryad_onedari3
if %cmd1=14 goto *dryad_onedari4
if %cmd1=15 goto *dryad_onedari5
if %cmd1=16 goto *dryad_onedari6
if %cmd1=17 goto *dryad_onedari7
if %cmd1=-1 goto *dryad_main
goto *dryad_onedari



*dryad_onedari1

gosub *onedari_syori
name $name
if %sinkou=2 skip 4
>Aha, you want me to make you come with my foot?@
>Then please come a lot. \
skip 3
>You want me to use my foot...?@
>Then let me see your pathetic face as you come!\
name ""
gosub *dryad_a1
skip -1



*dryad_onedari2

gosub *onedari_syori
name $name
if %sinkou=2 skip 4
>Aha, you want me to make you come with my mouth?@
>Then please come a lot. \
skip 3
>You want me to use my mouth...?@
>Then let me see your pathetic face as you come!\
name ""
gosub *dryad_a2
skip -1



*dryad_onedari3

gosub *onedari_syori
name $name
if %sinkou=2 skip 4
>Aha, you want me to make you come with my breasts?@
>Then please come a lot. \
skip 3
>You want me to use my breasts...?@
>Then let me see your pathetic face as you come!\
name ""
gosub *dryad_a3
skip -1



*dryad_onedari4

gosub *onedari_syori
name $name
if %sinkou=2 skip 4
>Aha, you want me to make you come with my ivy?@
>Then please come a lot. \
skip 3
>You want me to use my ivy...?@
>Then let me see your pathetic face as you come!\
name ""
gosub *dryad_a4
skip -1



*dryad_onedari5

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
if %sinkou=1 skip 6
dwave 1,"se\yami.ogg"
mov $tatie2,"dryad_st02"
mov $tatie4,"dryad_hb2"
gosub *face2
>The Dryad returns to normal!\
name $name
>Aha, you want me to make you come with my ass?@
>Then please come a lot. \
name ""
if %kousoku=0 gosub *dryad_a6
gosub *dryad_a7
skip -1



*dryad_onedari6

gosub *onedari_syori
if %sinkou=2 skip 6
dwave 1,"se\yami.ogg"
mov $tatie2,"dryad_st12"
mov $tatie4,"dryad_hc1"
gosub *face2
>The Dryad's body turns purple as evil spirits take hold!\
name $name
>You want to taste my milk...?@
>Very well... Get a good taste!\
name ""
gosub *dryad_a8
skip -1



*dryad_onedari7

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
if %sinkou=2 skip 6
dwave 1,"se\yami.ogg"
mov $tatie2,"dryad_st12"
mov $tatie4,"dryad_hc1"
gosub *face2
>The Dryad's body turns purple as evil spirits take hold!\
name $name
>You want me to rape you dry?@
>Very well... Then meet your miserable end!\
name ""
if %kousoku=0 gosub *dryad_a9
gosub *dryad_a10
skip -1



*dryad_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
if %sinkou=1 lsp 694,":a;chara\dryad_bk04.bmp",0,0
if %sinkou=2 lsp 694,":a;chara\dryad_bk14.bmp",0,0
gosub *syasei2
>As the Dryad's soft foot presses against Luka's penis, he comes, covering her foot with semen.\
mov %viclose,1:gosub *lose
mov %2691,%2691+1:if %2691=1 mov %count_koenemy,%count_koenemy+1
if %2691>%count_most mov %count_most,%2691:mov $count_mostname,$name
if %sinkou=1 count 6,3
if %sinkou=2 count 6,4
mov $bad1,"The Dryad forced Luka to come with her foot."
gosub *face2
name $name
if %sinkou=2 skip 4
>Wah... It's all over my foot! @
>Ehehe... Did it feel good?\
skip 3
>Look at how dirty you got my foot...@
>Now, are you ready to meet your end?\
name ""
if %sinkou=1 goto *dryad_ha
if %sinkou=2 goto *dryad_hb



*dryad_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
if %sinkou=1 lsp 691,":a;chara\dryad_bk01.bmp",0,0
if %sinkou=2 lsp 691,":a;chara\dryad_bk11.bmp",0,0
gosub *syasei2
>As the Dryad's sticky mouth sucks on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2691,%2691+1:if %2691=1 mov %count_koenemy,%count_koenemy+1
if %2691>%count_most mov %count_most,%2691:mov $count_mostname,$name
if %sinkou=1 count 6,3
if %sinkou=2 count 6,4
mov $bad1,"The Dryad forced Luka to come with her mouth."
gosub *face2
name $name
if %sinkou=2 skip 4
>Nnnn... So much in my mouth! @
>Ehehe... Did it feel good?\
skip 3
>Look at how dirty you got my mouth...@
>Now, are you ready to meet your end?\
name ""
if %sinkou=1 goto *dryad_ha
if %sinkou=2 goto *dryad_hb



*dryad_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
if %sinkou=1 lsp 692,":a;chara\dryad_bk02.bmp",0,0
if %sinkou=2 lsp 692,":a;chara\dryad_bk12.bmp",0,0
gosub *syasei2
>As the Dryad's soft breasts press against Luka's penis, he comes, covering her chest in semen.\
mov %viclose,1:gosub *lose
mov %2691,%2691+1:if %2691=1 mov %count_koenemy,%count_koenemy+1
if %2691>%count_most mov %count_most,%2691:mov $count_mostname,$name
if %sinkou=1 count 6,3
if %sinkou=2 count 6,4
mov $bad1,"The Dryad forced Luka to come with her breasts."
gosub *face2
name $name
if %sinkou=2 skip 4
>Wah... It's all over my breasts! @
>Ehehe... Did it feel good?\
skip 3
>Look at how dirty you got my breasts...@
>Now, are you ready to meet your end?\
name ""
if %sinkou=1 goto *dryad_ha
if %sinkou=2 goto *dryad_hb



*dryad_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
if %sinkou=1 lsp 693,":a;chara\dryad_bk03.bmp",0,0
if %sinkou=2 lsp 693,":a;chara\dryad_bk13.bmp",0,0
gosub *syasei2
>As the Dryad's ivy plays with his penis, Luka comes, covering her ivy with semen.\
mov %viclose,1:gosub *lose
mov %2691,%2691+1:if %2691=1 mov %count_koenemy,%count_koenemy+1
if %2691>%count_most mov %count_most,%2691:mov $count_mostname,$name
if %sinkou=1 count 6,3
if %sinkou=2 count 6,4
mov $bad1,"The Dryad forced Luka to come with her ivy."
gosub *face2
name $name
if %sinkou=2 skip 4
>Wah... It's all over my ivy! @
>Ehehe... Did it feel good?\
skip 3
>Look at how dirty you got my ivy...@
>Now, are you ready to meet your end?\
name ""
if %sinkou=1 goto *dryad_ha
if %sinkou=2 goto *dryad_hb



*dryad_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
if %kousoku=0 lsp 700,":a;chara\dryad_ha3.bmp",0,0
if %kousoku>0 lsp 700,":a;chara\dryad_hb3.bmp",0,0
gosub *syasei2
>Rubbing his penis against the Dryad's ass himself, Luka comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2691,%2691+1:if %2691=1 mov %count_koenemy,%count_koenemy+1
if %2691>%count_most mov %count_most,%2691:mov $count_mostname,$name
count 31,3
mov $bad1,"Tempted by the Dryad, Luka rubbed his penis against her ass until he came."
gosub *face2
name $name
>Waah... You shot so much all over my ass. @
>Ehehe... Did it feel good?\
name ""
goto *dryad_ha



*dryad_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\dryad_hb3.bmp",0,0
gosub *syasei2
>As the Dryad's soft ass presses against his penis, Luka comes, shooting his semen out all over her back.\
mov %viclose,1:gosub *lose
mov %2691,%2691+1:if %2691=1 mov %count_koenemy,%count_koenemy+1
if %2691>%count_most mov %count_most,%2691:mov $count_mostname,$name
count 34,3
mov $bad1,"The Dryad forced Luka to come with her ass cheeks."
gosub *face2
name $name
>Waah... You shot so much all over my ass. @
>If you shot out so much, it must have felt amazing! \
name ""
goto *dryad_ha



*dryad_h7

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\dryad_bk13.bmp",0,0
gosub *syasei2
>As he's forced to drink the Dryad's sweet milk, Luka comes, shooting his semen all over her body.\
mov %viclose,1:gosub *lose
mov %2691,%2691+1:if %2691=1 mov %count_koenemy,%count_koenemy+1
if %2691>%count_most mov %count_most,%2691:mov $count_mostname,$name
count 32,4
mov $bad1,"The Dryad forced Luka to come as she made him drink her milk."
gosub *face2
name $name
>How pathetic... You came while drinking my milk?@
>Now, are you ready to meet your end?\
name ""
goto *dryad_hb



*dryad_h8

mov %ikigoe,3:gosub *ikigoe
name $name
>What? But it's only just gone in...\
name ""
gosub *syasei1
lsp 693,":a;chara\dryad_bk13.bmp",0,0
gosub *syasei2
>The moment Luka is forced into the Dryad's sap filled vagina, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2691,%2691+1:if %2691=1 mov %count_koenemy,%count_koenemy+1
if %2691>%count_most mov %count_most,%2691:mov $count_mostname,$name
count 1,4
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come the moment of insertion."
gosub *face2
name $name
>You couldn't even last a couple seconds...@
>You're worse than pathetic.\
name ""
goto *dryad_hb



*dryad_h9

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\dryad_bk13.bmp",0,0
gosub *syasei2
>As the Dryad rapes Luka with her sap filled vagina, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2691,%2691+1:if %2691=1 mov %count_koenemy,%count_koenemy+1
if %2691>%count_most mov %count_most,%2691:mov $count_mostname,$name
count 1,4
mov $bad1,"The Dryad forced Luka to come as she raped him."
gosub *face2
name $name
>You sure did come a lot inside my vagina...@
>It's a shame that its only use is for nutrients.\
name ""
goto *dryad_hb



*dryad_ha

mov $bad2,"Caught by the Dryad, Luka continues giving her nourishment for the rest of his life."
if %2839=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2839,1
name "Luka"
>Ahhh...\
name ""
name $name
>Then, let me give you a whiff of an aphrodisiac pollen... \
name ""
name "Luka"
>Haa...\
name ""
>A mysterious smell wafts into my nose.@
>Even though it feels soft and comfortable, there's something off about it.\
>My penis instantly gets erect.@
>Desire takes me, turning all my thoughts into the desire to insert my penis in something.\
name "Luka"
>Ahh... What... Is this...?\
name ""
name $name
>Ahaha... Do you want to mate now?@
>Do you want to stick your penis in here?\
name ""
>The Dryad presses her ass out toward me, showing off her pubic area, as if taunting me.\
name "Luka"
>I want to put it in... Let me put it in...\
name ""
cspl 690,699
lsp 700,":a;chara\dryad_hb1.bmp",0,0:print 10,500
>I grab hold of the Dryad from behind, and press my penis between her soft ass cheeks.\
name $name
>Ahaha... Shall we play a little first? \
name ""
>The Dryad wiggles her ass side to side, dodging my attempts to stick my penis inside her.\
name "Luka"
>Ahh... Why...?\
name ""
>The sensation of her soft cheeks on my penis feels good, but all I want to do is stick it in.@
>The irritation at being unable to insert inside her starts to grind away at me.\
name $name
>Hahaha... Nooope. \
name ""
>She continues wiggling her ass, dodging all my attempts at sticking inside her, and making me rub my penis helplessly against her cheeks instead.\
name "Luka"
>Ahh... Let me put it in...\
name ""
name $name
>Hahaha... If you don't get it in soon, you're just going to come outside on my cheeks! \
name ""
>Shaking side to side, her soft ass cheeks continue rubbing against my penis as I miss sticking it in.\
>I sometimes manage to stick it inside and feel an amazing tight pressure, but she easily forces me back out of her.\
name "Luka"
>Ah... Ahhh...\
name ""
>Irritated at being unable to get inside her ass, I start to push toward her vagina instead.@
>But even then, she dodges and forces my penis to rub against her ass cheeks instead.\
>I feel an ejaculation welling up, even though I'm feeling pathetic and irritated at being unable to be inside her.\
lsp 700,":a;chara\dryad_hb2.bmp",0,0:print 10,500
>Pre-come starts to leak from my penis, rubbing all over her cheeks.\
name $name
>Hahaha, you can't take it any longer?@
>If you stuck it in, would you come right away?\
name ""
name "Luka"
>Haa... Let me stick it in...\
name ""
>I thrust with everything I have, but I can't get it in.@
>Instead, I rub hard against her soft skin.\
name $name
>Hahaha, there, there! \
name ""
>As my penis presses hard against her cheeks as she rotates her hips, forcing me over the edge.\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\dryad_hb3.bmp",0,0
gosub *syasei2
>My penis pulses as I spray my semen out onto her ass.@
>A miserable ejaculation, having been unable to stick it inside her like I wanted.\
>Seeing my semen pointlessly outside her, a miserable feeling of defeat takes hold.\
name "Luka"
>Ahh... Please, I'm begging you... Let me put it in...\
name ""
name $name
>Aha, you aren't satisfied with just one orgasm?@
>Then what if I give you another whiff of my pollen...?\
name ""
name "Luka"
>Ahh...\
name ""
>My brain continues to erode away due to the sweet smelling aroma.@
>Unable to control myself, my waist starts to move back and forth in a thrusting motion.\
>Even though I'm not inside her, I'm moving on pure male instinct.\
name "Luka"
>Haa... I can't stop...\
name ""
name $name
>Haha, how embarrassing! @
>You're not even in anything, and you're thrusting away! \
name ""
>My penis pushes pointlessly into her cheeks, unable to get inside.\
>I feel so pathetic, but I can't stop myself.@
>After only a few moments, she soft feeling of her cheeks is already too much to take.\
name "Luka"
>Ahh... I'm going to come...@
>I don't want to...!\
name ""
name $name
>Haha... If you don't want to, just stop moving your waist! \
name ""
name "Luka"
>Ahh... I can't stop...\
name ""
>Unable to stop, I keep thrusting against her ass, bringing myself closer to an inevitable climax.@
>Until...\
name "Luka"
>Ahhh...\
name ""
gosub *syasei1
lsp 700,":a;chara\dryad_hb4.bmp",0,0
gosub *syasei2
>Another miserable ejaculation, my semen shooting through the air onto her ass.\
name $name
>Awww... You leaked again.@
>I feel sorry for you, so I think I'll let you put it in. \
name ""
name "Luka"
>Eh...?\
name ""
>The Dryad wiggles her waist, and presses her vagina against my penis.@
mov %hseanwave,3:hseanwave
>Pressing against me, my penis sinks deep inside her warm entrance.\
name "Luka"
>Ahhh!\
name ""
name $name
>Hehe... Well?@
>This is what you wanted for sooo long, right?\
name ""
>Her warm, soft flesh envelopes my sensitive penis.@
>Squeezing me as soon as I'm all the way inside her, my body shakes in pure bliss at finally being inside her.\
name "Luka"
>Ahh...\
name ""
gosub *syasei1
lsp 700,":a;chara\dryad_hb5.bmp",0,0
gosub *syasei2
>I erupt inside her, drowning in pure ecstasy at finally realizing my desires.\
name "Luka"
>Haa...\
name ""
name $name
>Haha, he looks so dreamy.\
name ""
>The Dryad strokes my body with her fingers as she giggles.@
>With just this one insertion, I'm left completely at her mercy.\
>After the torture of pleasure was finished, my body and soul were hers.\
mov %hseanwave,0:hseanwave
>Thus, my heart was trampled on by the Dryad.@
>My days only involve clinging to her back and giving her my semen.\
>With a whiff of her pollen, all I want to do is ejaculate inside her, giving her my semen for nutrients.\
>As a human, my life was over...@
>But I still felt happy and satisfied at being able to act on my desires...\
gosub *anten
>..............\
goto *badend



*dryad_hb

mov $bad2,"Incorporated into the tree, Luka's semen was squeezed completely dry."
if %2840=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2840,1
if %kousoku=2 mov %hseanwave,3:hseanwave:goto *dryad_hb2
name "Luka"
>Ahhh...\
name ""
name $name
>Hehehe... It's finally time for some fun.@
>First I'll rape you until you're dry.\
>After that, I'll cover you with roots and draw out your life energy directly... Until you die.\
name ""
name "Luka"
>N...No... Don't do that...\
name ""
name $name
>There's no need to be afraid...@
>It feels amazing.@>The only cost is your life.\
>Now to rape you...@
>First I'll squeeze out your semen.\
name ""
name "Luka"
>S...Stop!\
name ""
>Helpless to resist, I can't stop her from leaning over me...\
mov %hseanwave,3:hseanwave
cspl 690,699
lsp 700,":a;chara\dryad_hc1.bmp",0,0:print 10,500
>She forces me deep into her vagina.\
goto *dryad_hb2



*dryad_hb2

name "Luka"
>Ahhh!\
name ""
>I can feel the tiny folds inside of her soft vagina, tickling my glans with each movement.\
>Her walls are covered in tiny waves, making it feel like I could come inside of her just from insertion.\
name $name
>Hehe, well?@
>How does it feel being raped by a woman just for your semen?\
>Even though it's pathetic... Do you still feel pleasure?\
name ""
>The Dryad starts to slowly move her waist as she looks down at me.@
>The movements against her wavy flesh bring waves of pleasure.\
name "Luka"
>Ahhh!@
>Stop! Don't move!\
name ""
name $name
>Hahaha, what a voice!@
>Does it feel that good inside me?\
>Let me give you a special present...@> In order to finish this quickly.\
name ""
lsp 700,":a;chara\dryad_hc2.bmp",0,0:print 10,500
>A liquid, the color of dark honey, drips from her nipples onto my chest.\
name "Luka"
>What... Is this... Ahhh...\
name ""
>As soon as it touches my skin, a strange sensation comes over me.@
>A burning sensation floods from my chest to my groin.\
name $name
>It's an aphrodisiac sap to make men go wild...@> But it also drastically increases the amount of semen in an ejaculation.\
>With a single orgasm, you should be able to shoot out everything in those balls of yours.\
name ""
>With eyes of a master over her slave, the Dryad stares at me as she suddenly starts moving far faster than before.\
>She tenses up her vagina at the same time, squeezing my penis hard in her soft flesh.\
name "Luka"
>Hya!@> S...So tight...!\
name ""
name $name
>Hehe, I'm making it tight on purpose, to make you come faster.@
>Now hurry up and come, give your semen to me!\
name ""
name "Luka"
>Ah...!@> Ahh!\
name ""
>As she moves quicker and quicker, her squeezing motions get more intense.@
>The rub and pressure of her soft flesh brings me to the edge in no time.\
>With the pleasure being forced into me, I feel the desire to release welling up.@
>Unable to hold it back, I give in to it with a yell.\
name "Luka"
>Ahh... It feels too good!@
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\dryad_hc3.bmp",0,0
gosub *syasei2
>Exploding inside her, my penis spasms and spurts far longer than usual due to the sap.\
name "Luka"
>Haa...\
name ""
>Feeling like my orgasm is going on forever, fresh waves of ecstasy hit me with each pulse.@
>After feeling like I could melt away, it finally ends.\
name "Luka"
>Ahh...\
name ""
name $name
>Oh...?@> There's still semen left?@
>You're quite stubborn, to not shoot out all your semen in one ejaculation...\
name ""
>The Dryad looks down at me and lets out a loud sigh of disgust.\
name $name
>...You're a lucky one.@
>Before you're squeezed dry, I'll pleasure you one more time.\
name ""
lsp 700,":a;chara\dryad_hc4.bmp",0,0:print 10,500
>With a cold blooded smile, the Dryad squeezes her breasts, pouring out a huge amount of the sap onto my body.\
name "Luka"
>Haaa...\
name ""
name $name
>Now I'll make you come!\
name ""
>The Dryad starts her intense movements again.\
>Bouncing up and down and side to side, she squeezes me at random intervals, using my penis like a toy.@
>The desire to release wells up in no time, the ache of desire taking over my lower body.\
name "Luka"
>Ahhh!@>I'm going to come again...!\
name ""
name $name
>As I thought, you had one more in you...@
>With this next one, your semen will be squeezed dry.\
>After that, I'll suck up your life energy.@
>Everything you have will be taken by me...\
name ""
name "Luka"
>Ahh... No...\
name ""
>I writhe in agonized pleasure under her bouncing body.@
>After I come, she's going to suck my energy...\
>Not wanting to die, I try to deny the pleasure.@
>But it's too much... I can't stop the sensations from her intense rape.\
name $name
>Hahaha, already at your limit?@
>Then blow inside of me!\
name ""
name "Luka"
>No... No...\
name ""
>While I fight against it, the moment comes at last.@
>With a spasm, my penis explodes in pleasure as my body releases everything.\
gosub *syasei1
lsp 700,":a;chara\dryad_hc5.bmp",0,0
gosub *syasei2
name "Luka"
>Ahhhhh...\
name ""
>My penis spasms and shoots into her with pulse after pulse, the effect of the sap increasing my ejaculation again.\
>All during it, the Dryad squeezes my penis with her vagina, milking out every drop into her.\
name "Luka"
>Ah...ah...\
name ""
>As the last trickle shoots into her, an overwhelming weakness takes me over.@
>She drew out everything...\
name $name
>Hahaha... Empty, I see.@
>First was draining you of semen...\
>Next will be sucking up your energy.@
>It will feel good... So enjoy it until your death.\
name ""
mov %hseanwave,13:hseanwave
lsp 700,":a;chara\dryad_hc6.bmp",0,0:print 10,500
>The Dryad's roots grow around my body.@
>The plant's merciless corrosion is starting...@
>As the roots take hold into my body itself, I feel connected to the Dryad herself.\
>Rather than feeling pain, it feels good...\
name "Luka"
>Haa... Stop... Stop...\
name ""
>My life itself is going to be drained now...@
>Out of fear, I try to fight against it.\
>But after the fatigue of having my semen drained, I can't even move.\
lsp 700,":a;chara\dryad_hc7.bmp",0,0:print 10,500
name $name
>The preparations are finished... I'll start sucking now.@
>I'll take all of you...\
name ""
name "Luka"
>Ahhhh!!\
name ""
>Each of the roots attached to me suddenly shrinks.@
>Like a pump, they start sucking up my life energy itself.\
name "Luka"
>Aiiiieee!!\
name ""
name $name
>Hehehe... It feels amazing, doesn't it?@
>All the men who died this way died happy...\
name ""
name "Luka"
>Ahhhh!!\
name ""
>Each time the roots suck on me, it feels like a powerful sensation of release rocks my body, like an orgasm.@
>My penis, unable to ejaculate any longer, just spasms pointlessly inside the Dryad's vagina.\
name "Luka"
>Aiiiee!\
name ""
name $name
>Hehe... Your life tastes delicious...\
name ""
name "Luka"
>Ah... haa...\
name ""
>Little by little, my consciousness fades away...@
>Replacing my thoughts and fears is just pure ecstasy.\
>The Dryad is taking everything, and I'm becoming part of her body...@
>Immersed in ecstasy, I give everything over to her.\
mov %hseanwave,0:hseanwave
name $name
>Hehe, he's gone.@
>He tasted really delicious...\
name ""
>After being sucked dry, all that remains of the boy is a dried corpse.@
>Above that dried corpse, the monster laughs with satisfaction.\
gosub *anten
>.............\
goto *badend



*queenalraune_start

mov $name,"Queen Alraune"
mov $name2,"Queen Alraune"
mov $lavel,"queenalraune"
mov $tatie1,"queenalraune_st21"
mov $tatie2,"queenalraune_st02"
mov $tatie3,"queenalraune_st03"
mov $tatie4,"queenalraune_st02"
mov $haikei,"bg095"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,25000
if %nanido=2 mov %max_enemylife,29000
if %nanido=3 mov %max_enemylife,33000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,20
if %nanido=3 mov %earth_keigen,10
mov %alice_skill,1
mov %alice_skill1,130
mov %alice_skill2,100
mov %alice_skill3,100
mov %music,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Struggling is useless..."
mov $mogaku_sel2,"Do you think you can escape from my embrace?"
mov $mogaku_sel3,"Men in my flower should just relax..."
mov $mogaku_sel4,"My petals and ivy don't want to let you go..."
mov $mogaku_sel5,"I won't release you until I've sucked your semen dry..."
mov $mogaku_dassyutu1,"You escaped before I could suck you..."
mov $mogaku_dassyutu2,""
mov $mogaku_earth_dassyutu1,"The power of the earth can break even the hold of a Queen?"
mov $mogaku_earth_dassyutu2,""
mov $half_s1,"Hehe... Don't underestimate the power of the plant Queen."
mov $half_s2,"I can make any species of male come..."
mov $kiki_s1,"Already at your limit?"
mov $kiki_s2,"Forcing you to come is easier than I thought it would be..."
mov %end_n,13
mov %exp_minus,350000
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,4
mov %owaza_count2a,4
mov %owaza_count3a,4
mov %owaza_count3b,4
name $name
>Oh my...@> What business does a human have here?@
>There's no way you wandered here by mistake, is there?\
name ""
>Overwhelming magic pours from her body.@
>As I thought, Queen Alraune won't be an easy foe...\
name "Luka"
>Queen Alraune, you've been brainwashed!\
name ""
lsp 700,":a;chara\alice_st73.bmp",-170,50
lsp 701,":a;chara\queenalraune_st21.bmp",160,0:print 10,500
name "Alice"
>...It's useless, Luka.@
>Someone who has been brainwashed won't ever believe they've been brainwashed.\
>You need to seal her, and then look for a way to cure her.@
>The captured monsters don't have too much time left...\
name ""
name "Luka"
>There's no choice, then...@
>I'm sorry, but I'll need to seal you!\
name ""
csp 701
lsp 700,":a;chara\queenalraune_st21.bmp",0,0:print 10,500
name $name
>Boy...@> Appearing out of nowhere, and saying such strange things.@
>I'll suck up your semen as nutrients for that.\
mov $tatie1,"queenalraune_st01"
lsp 700,":a;chara\queenalraune_st01.bmp",0,0:print 10,500
>Quivering with desire, the Queen moves toward me as she accepts my challenge!\
name ""
goto *common_main



*queenalraune_v

gosub *face3
name $name
>Urhg... I...@
>What was I...?\
name ""
>Queen Alraune falters, as the dimness in her eyes fades!@
>Was her brainwashing cured...?\
mov %viclose,1:gosub *victory
mov %getexp,220000:gosub *lvup
mov %2392,1
goto *sean0363



*queenalraune_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>You wish to give me your body?@
>Then I'll squeeze you to the last drop...\
name ""
goto *queenalraune_a



*queenalraune_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *queenalraune_kousan
if %cmd1=16 goto *queenalraune_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *queenalraune_main



*queenalraune_a

if %kousoku=1 rnd2 %ransu,1,4
if %kousoku=1 && %ransu<3 gosub *queenalraune_a7:goto *common_main
if %kousoku=1 && %ransu=3 && %owaza_count2b>3 && %status=0 gosub *queenalraune_a8:goto *common_main
if %kousoku=1 && %ransu=4 && %owaza_count3b>3 gosub *queenalraune_a9:goto *common_main
if %kousoku=1 skip -4
rnd2 %ransu,1,6
if %ransu=1 gosub *queenalraune_a1:goto *common_main
if %ransu=2 gosub *queenalraune_a2:goto *common_main
if %ransu=3 && %owaza_count3a>5 gosub *queenalraune_a3:goto *common_main
if %ransu=4 && %owaza_count3b>5 gosub *queenalraune_a4:goto *common_main
if %ransu=5 && %owaza_count2a>5 && %status=0 gosub *queenalraune_a5:goto *common_main
if %ransu=6 && %owaza_count1a>5 gosub *queenalraune_a6:goto *common_main
skip -7



*queenalraune_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Dye this hand white..."
if %ransu=2 mov $sel1,"I'll show you some love with this hand."
if %ransu=3 mov $sel1,"Spit out your seed into my palm."
name $name
eng $sel1:$sel6\
name ""
skillname "Cardinal Hands"
dwave 1,"se\ero_koki1.ogg"
>Queen Alraune grabs Luka's penis, and gently rolls it between her palms!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3929
if %nanido<2 damage 300,320
if %nanido=2 damage 340,360
if %nanido=3 damage 380,400
skillname ""
if %mylife=0 sub %stack,1:return *queenalraune_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*queenalraune_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Why do you think a plant needs breasts? Why for this of course..."
if %ransu=2 mov $sel1,"I'll crush your penis between these breasts..."
if %ransu=3 mov $sel1,"Leak all over these breasts..."
name $name
eng $sel1:$sel6\
name ""
skillname "Laurean Press"
dwave 1,"se\ero_sigoki1.ogg"
>Queen Alraune sandwiches Luka's penis between her huge breasts!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3930
if %nanido<2 damage 310,330
if %nanido=2 damage 350,370
if %nanido=3 damage 390,410
skillname ""
if %mylife=0 sub %stack,1:return *queenalraune_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*queenalraune_a3

add %stack,1
mov %owaza_count3a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll absorb your semen with my flower... Isn't that one of every man's dreams?"
if %ransu=2 mov $sel1,"This flower will suck up your semen with delight..."
if %ransu=3 mov $sel1,"The flower is the sexual organ of a plant..."
name $name
eng $sel1:$sel6\
name ""
skillname "Queen Flower Squeeze"
dwave 1,"se\ero_buchu1.ogg"
>Petals wrap around Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3931
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
dwave 1,"se\ero_chupa6.ogg"
>Latched onto him, the flower sucks on Luka's penis!
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
dwave 1,"se\ero_chupa6.ogg"
>The flower sucks with even more force!
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
skillname ""
if %mylife=0 sub %stack,1:return *queenalraune_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*queenalraune_a4

add %stack,1
mov %owaza_count3b,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"This ivy just loves men..."
if %ransu=2 mov $sel1,"Ejaculate as my ivy plays with your penis..."
if %ransu=3 mov $sel1,"This ivy will massage you..."
name $name
eng $sel1:$sel6\
name ""
skillname "Squeezing Ivy Dance"
dwave 1,"se\ero_makituki3.ogg"
lsp 699,":a;chara\queenalraune_st11.bmp",0,0:print 10,500
eng "Countless branches of ivy race toward Luka's penis!":$sel6/
if %daten>0 csp 699:goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 csp 699:gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,70
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":csp 699:gosub *wind_guard:sub %stack,1:return
\
>Ivy coils around Luka's penis!
skillcount3 3932
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
dwave 1,"se\ero_makituki1.ogg"
>The ivy tightens, squeezing Luka's penis!
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
dwave 1,"se\ero_makituki1.ogg"
>Covered in sap, they stroke Luka's penis!
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
dwave 1,"se\ero_koki1.ogg"
>The ivy strokes even faster, squeezing down at the same time!
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
skillname ""
if %mylife=0 sub %stack,1:return *queenalraune_h4
if %kousan<2 csp 699:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*queenalraune_a5

add %stack,1
mov %owaza_count2a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Drink some of this flower's nectar..."
if %ransu=2 mov $sel1,"If you drink this nectar, you'll be in heaven..."
if %ransu=3 mov $sel1,"Let my nectar melt you away..."
name $name
eng $sel1:$sel6\
name ""
skillname "Nectar of Ecstasy"
eng "A pink flower latches to Luka's face, and starts to drip nectar!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount3 3933
>A sweet feeling spreads through Luka's body as he's force fed nectar...
if %nanido<2 damage 200,230
if %nanido=2 damage 240,270
if %nanido=3 damage 280,310
if %status=0 mov $sel1,"Luka has been immersed in ecstasy!"
if %status=1 mov $sel1,"Luka has been immersed in ecstasy..."
mov %status,1:gosub *status_print
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *queenalraune_h5
if %kousan=2 sub %stack,1:return
name "Luka"
>Urhg...\
name ""
name $name
>Hehe, what a lewd face.@
>Now, let me play with you...\
name ""
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,2,3
if %nanido=3 rnd2 %status_turn,3,4
sub %stack,1
return



*queenalraune_a6

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 8
name $name
if %first_sel1=1 skip 3
>Let me give you a gentle hug...@
skip 2
>I'll hug you again...@
>Immerse yourself in pleasure in my petals.\
name ""
skillname "Queen's Flower Embrace"
dwave 1,"se\ero_makituki3.ogg"
eng "Queen Alraune hugs Luka with her voluptuous body!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,30
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
@
>Petals wrap around his lower body, encasing it in a flower!\
lsp 690,":c;chara\queenalraune_h2.bmp",0,0
mov %kousoku,1:gosub *status_print
>Luka has been bound by Queen Alraune!\
skillname ""
name $name
if %first_sel1=1 skip 3
>Hehe... Isn't being embraced the best?@
skip 2
>You're back in the best position...@
>Reach a climax while you taste the sweetest of pleasures.\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,2
if %earth=0 && %nanido=2 mov %genmogaku,2
if %earth=0 && %nanido=3 mov %genmogaku,3
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,1
sub %stack,1
return



*queenalraune_a7

add %stack,1
>Luka has been bound by Queen Alraune...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"This ivy will touch you all over... Of course, your penis as well."
if %ransu=2 mov $sel1,"Are you overjoyed at the thought of being wrapped in petals?"
if %ransu=3 mov $sel1,"I'll squeeze out your semen with my ivy..."
name $name
eng $sel1:$sel6\
name ""
skillname "Playful Vines"
dwave 1,"se\ero_makituki2.ogg"
lsp 690,":c;chara\queenalraune_h3.bmp",0,0:print 10,500
>Ivy crawls all over Luka's body!
skillcount3 3934
if %nanido<2 damage 150,160
if %nanido=2 damage 170,180
if %nanido=3 damage 190,200
dwave 1,"se\ero_makituki2.ogg"
>The ivy around Luka's penis strokes him slowly!
if %nanido<2 damage 150,160
if %nanido=2 damage 170,180
if %nanido=3 damage 190,200
skillname ""
if %mylife=0 sub %stack,1:return *queenalraune_h6
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*queenalraune_a8

add %stack,1
mov %owaza_count2b,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll give you a treat..."
if %ransu=2 mov $sel1,"Drink this sweet milk from my breast..."
if %ransu=3 mov $sel1,"Get a good drink..."
name $name
eng $sel1:$sel6\
name ""
skillname "Milk of Ecstasy"
>Queen Alraune pushes one of her giant breasts into Luka's face!\
skillcount3 3935
>A sweet feeling flows through Luka's body as he's forced to drink her milk!
if %nanido<2 damage 200,230
if %nanido=2 damage 240,270
if %nanido=3 damage 280,310
if %status=0 mov $sel1,"Luka has been immersed in ecstasy!"
if %status=1 mov $sel1,"Luka has been immersed in ecstasy..."
mov %status,1:gosub *status_print
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *queenalraune_h7
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,2,3
if %nanido=3 rnd2 %status_turn,3,4
sub %stack,1
return



*queenalraune_a9

add %stack,1
mov %owaza_count3b,0
mov %owaza_num1,1
if %kousan=2 skip 5
name $name
>Now, it's time to mate.@
>I'll take your dick into my female organ...\
name ""
skillname "Ecstasy Caress"
eng "Queen Alraune hugs Luka tighter, bringing him next to her body!":$sel6/
if %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
dwave 1,"se\ero_pyu1.ogg"
lsp 690,":c;chara\queenalraune_h6.bmp",0,0:print 10,500
>Luka's penis slips into her female organ!
skillcount3 3936
mov %damage_kotei,1
damage 500,600
mov %kousoku,2:gosub *status_print
>Luka is being raped by Queen Alraune!\
skillname ""
if %mylife=0 sub %stack,1:return *queenalraune_h8
name "Luka"
>Ahhh!\
name ""
>It feels like I've been forced into a sticky flower, covered in honey and soft, flesh like petals...\
name $name
>Hehe... It's just like being inserted into a flower, isn't it?@
>Now give all of your seed to me.\
name ""
sub %stack,1
goto *queenalraune_a10



*queenalraune_a10

add %stack,1
>Luka is being raped by Queen Alraune...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"It's similar to how humans mate, like this...":mov $sel2,"The slimy petal membrane stimulates Luka's penis!"
if %ransu=2 mov $sel1,"My female vagina and your male penis... How does it feel mating with a monster?":mov $sel2,"Queen Alraune's organ squeezes down on Luka's penis!"
if %ransu=3 mov $sel1,"My vagina is tingling... It wants to your semen to fertilize me...":mov $sel2,"Tiny bumps inside Queen Alraune's organ rub against Luka's penis!"
if %ransu=4 mov $sel1,"Shoot off all your seed into my female organ...":mov $sel2,"Innumerable folds rub against Luka's penis inside Queen Alraune!"
if %ransu=5 mov $sel1,"How does it feel to mate with a plant? Ejaculate as much as you want...":mov $sel2,"The inner membrane inside Queen Alraune vibrates, stimulating Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Ecstasy Caress"
dwave 1,"se\ero_chupa4.ogg"
eng $sel2:$sel6
skillcount3 3936
mov %damage_kotei,1
damage 500,600
skillname ""
if %mylife=0 sub %stack,1:return *queenalraune_h9
sub %stack,1
goto *queenalraune_a10



*queenalraune_onedari

mov $list1,"Cardinal Hands"
if %3929>0 mov %list_num1,1
mov $list2,"Laurean Press"
if %3930>0 mov %list_num2,1
mov $list3,"Queen Flower Squeeze"
if %3931>0 mov %list_num3,1
mov $list4,"Squeezing Ivy Dance"
if %3932>0 mov %list_num4,1
mov $list5,"Nectar of Ecstasy"
if %3933>0 mov %list_num5,1
mov $list6,"Playful Vines"
if %3934>0 mov %list_num6,1
mov $list7,"Milk of Ecstasy"
if %3935>0 mov %list_num7,1
mov $list8,"Ecstasy Caress"
if %3936>0 mov %list_num8,1
gosub *cmd_onedari
if %cmd1=11 goto *queenalraune_onedari1
if %cmd1=12 goto *queenalraune_onedari2
if %cmd1=13 goto *queenalraune_onedari3
if %cmd1=14 goto *queenalraune_onedari4
if %cmd1=15 goto *queenalraune_onedari5
if %cmd1=16 goto *queenalraune_onedari6
if %cmd1=17 goto *queenalraune_onedari7
if %cmd1=18 goto *queenalraune_onedari8
if %cmd1=-1 goto *queenalraune_main
goto *queenalraune_onedari



*queenalraune_onedari1

gosub *onedari_syori
name $name
>You want me to finish you off with my hand?@
>Then let me build you up to a powerful finish...\
name ""
gosub *queenalraune_a1
skip -1



*queenalraune_onedari2

gosub *onedari_syori
name $name
>You want me to finish you off with my breasts?@
>Then let me build you up to a powerful finish...\
name ""
gosub *queenalraune_a2
skip -1



*queenalraune_onedari3

gosub *onedari_syori
name $name
>You want me to finish you off with my flower?@
>Then let me build you up to a powerful finish...\
name ""
gosub *queenalraune_a3
skip -1



*queenalraune_onedari4

gosub *onedari_syori
name $name
>You want me to finish you off with my ivy?@
>Then let me build you up to a powerful finish...\
name ""
gosub *queenalraune_a4
skip -1



*queenalraune_onedari5

gosub *onedari_syori
name $name
>You want to taste my nectar?@
>Then let your heart itself melt away from the taste...\
name ""
gosub *queenalraune_a5
skip -1



*queenalraune_onedari6

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want to embrace me and be overrun by ivy?@
>Then let me build you up to a powerful finish...\
name ""
if %kousoku=0 gosub *queenalraune_a6
gosub *queenalraune_a7
skip -1



*queenalraune_onedari7

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want me to embrace you, and feed you my milk?@
>Then let your heart itself melt away from the taste...\
name ""
if %kousoku=0 gosub *queenalraune_a6
gosub *queenalraune_a8
skip -1



*queenalraune_onedari8

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>So you wish to mate with me?@
>Then I'll give you a taste of the ultimate pleasure...\
name ""
if %kousoku=0 gosub *queenalraune_a6
gosub *queenalraune_a9
skip -1



*queenalraune_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\queenalraune_bk03.bmp",0,0
gosub *syasei2
>Unable to take Queen Alraune's hand techniques any longer, Luka comes, covering her hands in semen.\
mov %viclose,1:gosub *lose
mov %2692,%2692+1:if %2692=1 mov %count_koenemy,%count_koenemy+1
if %2692>%count_most mov %count_most,%2692:mov $count_mostname,$name
count 5,3
mov $bad1,"Queen Alraune forced Luka to come with her hands."
gosub *face2
name $name
>This body is my pistil itself...@
>You know what it means to have covered it in semen, don't you?\
name ""
goto *queenalraune_h



*queenalraune_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\queenalraune_bk02.bmp",0,0
gosub *syasei2
>Unable to take Queen Alraune's breast techniques any longer, Luka comes, covering her chest in semen.\
mov %viclose,1:gosub *lose
mov %2692,%2692+1:if %2692=1 mov %count_koenemy,%count_koenemy+1
if %2692>%count_most mov %count_most,%2692:mov $count_mostname,$name
count 7,3
mov $bad1,"Queen Alraune forced Luka to come with her breasts."
gosub *face2
name $name
>This body is my pistil itself...@
>You know what it means to have covered it in semen, don't you?\
name ""
goto *queenalraune_h



*queenalraune_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\queenalraune_bk04.bmp",0,0
gosub *syasei2
>As Queen Alraune flower sucks on Luka's penis, he comes, filling her flower with semen.\
mov %viclose,1:gosub *lose
mov %2692,%2692+1:if %2692=1 mov %count_koenemy,%count_koenemy+1
if %2692>%count_most mov %count_most,%2692:mov $count_mostname,$name
count 12,3
mov $bad1,"Queen Alraune forced Luka to come with her flower."
gosub *face2
name $name
>This body is my pistil itself...@
>You know what it means to have covered it in semen, don't you?\
name ""
goto *queenalraune_h



*queenalraune_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\queenalraune_bk05.bmp",0,0
gosub *syasei2
>As the ivy strokes Luka's penis, he comes, covering her ivy in semen.\
mov %viclose,1:gosub *lose
mov %2692,%2692+1:if %2692=1 mov %count_koenemy,%count_koenemy+1
if %2692>%count_most mov %count_most,%2692:mov $count_mostname,$name
count 12,3
mov $bad1,"Queen Alraune's ivy forced Luka to come."
gosub *face2
name $name
>This body is my pistil itself...@
>You know what it means to have covered it in semen, don't you?\
name ""
goto *queenalraune_h



*queenalraune_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\queenalraune_bk01.bmp",0,0
gosub *syasei2
>Forced to drink her sweet nectar, Luka comes all over Queen Alraune's body.\
mov %viclose,1:gosub *lose
mov %2692,%2692+1:if %2692=1 mov %count_koenemy,%count_koenemy+1
if %2692>%count_most mov %count_most,%2692:mov $count_mostname,$name
count 12,3
mov $bad1,"Queen Alraune forced Luka to come as he drank her nectar."
gosub *face2
name $name
>This body is my pistil itself...@
>You know what it means to have covered it in semen, don't you?\
name ""
goto *queenalraune_h



*queenalraune_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":c;chara\queenalraune_h4.bmp",0,0
gosub *syasei2
>As Queen Alraune's ivy strokes Luka's penis, he comes, covering her ivy in semen.\
mov %viclose,1:gosub *lose
mov %2692,%2692+1:if %2692=1 mov %count_koenemy,%count_koenemy+1
if %2692>%count_most mov %count_most,%2692:mov $count_mostname,$name
count 12,3
mov $bad1,"Queen Alraune forced Luka to come as her ivy stroked his penis."
gosub *face2
name $name
>This body is my pistil itself...@
>You know what it means to have covered it in semen, don't you?\
name ""
goto *queenalraune_h



*queenalraune_h7

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":c;chara\queenalraune_h4.bmp",0,0
gosub *syasei2
>With Queen Alraune's nipple in his mouth, Luka comes as he's forced to drink her milk.\
mov %viclose,1:gosub *lose
mov %2692,%2692+1:if %2692=1 mov %count_koenemy,%count_koenemy+1
if %2692>%count_most mov %count_most,%2692:mov $count_mostname,$name
count 12,3
mov $bad1,"Queen Alraune forced Luka to come as he drank her milk."
gosub *face2
name $name
>This body is my pistil itself...@
>You know what it means to have covered it in semen, don't you?\
name ""
goto *queenalraune_h



*queenalraune_h8

mov %ikigoe,3:gosub *ikigoe
name $name
>Isn't that a bit too fast? Hehe.\
name ""
gosub *syasei1
lsp 690,":c;chara\queenalraune_h7.bmp",0,0
gosub *syasei2
>The moment Luka slips into Queen Alraune's sticky vagina, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2692,%2692+1:if %2692=1 mov %count_koenemy,%count_koenemy+1
if %2692>%count_most mov %count_most,%2692:mov $count_mostname,$name
count 1,3
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come the moment of insertion."
gosub *face2
name $name
>Isn't that dishonor for a man?@
>To think you would come so quickly...\
name ""
goto *queenalraune_h



*queenalraune_h9

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":c;chara\queenalraune_h7.bmp",0,0
gosub *syasei2
>As Queen Alraune rapes Luka, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2692,%2692+1:if %2692=1 mov %count_koenemy,%count_koenemy+1
if %2692>%count_most mov %count_most,%2692:mov $count_mostname,$name
count 1,3
mov $bad1,"Queen Alraune forced Luka to come as she raped him."
gosub *face2
name $name
>You mated with a Queen, giving her your seed...@
>Or did you just leak on accident, without intending to make children...?\
name ""
goto *queenalraune_h



*queenalraune_h

mov $tatie2,"queenalraune_st22"
mov $bad2,"Incorporated into Queen Alraune's giant flower, Luka's semen is extracted for the rest of his life."
if %2692=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku=1 skip 26
if %kousoku=2 mov %hseanwave,10:hseanwave:goto *queenalraune_hc
name "Luka"
>Ahhh...\
name ""
name $name
>You have such high quality semen...@
>With that, I'd be able to leave as many powerful offspring as I want.\
>Mate with me, and give me your seed.@
>Then we can fill the world full of a Queen's own offspring!\
name ""
>Queen Alraune moves closer to me, spreading her arms wide.@
>Her female form, looking like it was covered in sticky mucus, moves closer to me.\
name "Luka"
>S...Stay away...\
name ""
name $name
>This female body is my pistil.\
>Fertilization is still possible if semen touches any part of my body...@
>But it's more efficient this way to mate with humans.\
name ""
name "Luka"
>Ahh...\
name ""
dwave 1,"se\ero_makituki3.ogg"
cspl 690,699
lsp 700,":c;chara\queenalraune_h1.bmp",0,0:print 10,500
>The Queen draws me into a close embrace, pressing me against her mucus covered body.\
>My face presses against her huge breasts, causing a powerfully sweet smell to fill my head.@
>Just from holding her warm body, I'm already shaking in pleasure.\
>I feel myself relaxing, weak in her arms.\
name $name
>Hehe... You look comfortable, nestled in my pistil.@
>It's an organ solely to mate with men, so that's to be expected...\
lsp 700,":c;chara\queenalraune_h2.bmp",0,0:print 10,500
>Look, it can even do this...@
>Before we mate in earnest, let me fill that penis with some energy.\
name ""
name "Luka"
>Ha... Ahh...\
name ""
mov %hseanwave,20:hseanwave
>Tentacle-like ivy reaches out from her flowers, and wraps around my body.@
>Their slimy touch makes me shiver with each movement.\
name $name
>Oh my, your penis is already so big...@
>Do you want to stick it in me that badly already?\
name ""
lsp 700,":c;chara\queenalraune_h3.bmp",0,0:print 10,500
>Even more tentacles reach out and coil around my now erect penis.\
>They squeeze me, and stroke me up and down... Almost as if checking out my male functions.\
name "Luka"
>Haaa...!\
name ""
>I stiffen in her embrace, as I feel a climax coming on from her tentacles toying with me.\
name $name
>Oh? Some liquid is already leaking out...@
>And you're already pulsing so much.\
name ""
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":c;chara\queenalraune_h4.bmp",0,0
gosub *syasei2
>In the next moment, I erupt, spraying semen out all over her slimy body.\
name "Luka"
>Ahh...\
name ""
name $name
>Oh my... I was just checking out your organ, and you already released?@
>We haven't even started mating yet... Hehe.\
>As I said before, this body itself is a pistil.@
>Any semen shot onto this is the same as going into a vagina...\
>It doesn't matter to me, but wouldn't you rather be in my female organ...?\
name ""
name "Luka"
>Ahh...\
name ""
>Instead of answering, my penis just twitches.@
>The Queen giggles as she notices.\
name $name
>Then let me invite you inside...@
>I'll squeeze out your semen with this female organ...\
name ""
>Queen Alraune spreads open a hole that looks like a human female vagina.@
>The pink insides look wavy, and covered with ribbed walls.\
>Deep inside, tiny little tips of vines are wiggling around.\
name "Luka"
>..........\
name ""
>I look at it and swallow.@
>My penis is going to go in there... And I'll be feeling everything inside.\
name $name
>Hehehe, you seem to like it.@
>Then let me invite you inside...\
name ""
mov %hseanwave,10:hseanwave
lsp 700,":c;chara\queenalraune_h6.bmp",0,0:print 10,500
>The Queen pulls me closer, bringing my penis slowly inside.\
name "Luka"
>Ha... ahhh...\
name ""
>The sudden burst of pleasure from insertion is far more powerful than what I was expecting.\
goto *queenalraune_hc



*queenalraune_hc

>The tiny bumps along her vaginal walls rub and stroke every inch of my penis, as my tip pushes against wavy walls as I slip deeper inside.\
>My tip rubs against some bumps, leading me to a disappointingly fast climax.\
name "Luka"
>Ah... I'm coming...!\
name ""
name $name
>Haha... You sure are quick, after all.@
>But I don't mind... It just means you'll be a good stud.\
name ""
name "Luka"
>Ahh...\
name ""
gosub *syasei1
lsp 700,":c;chara\queenalraune_h7.bmp",0,0
gosub *syasei2
>Pressing deep inside Queen Alraune, I explode.@
>The feeling of release rocks my body, as it feels like my heart and soul both leak out into her.\
>My instinct as a man wants to give all of my body over to this sensation.\
name "Luka"
>Haaa...\
name ""
name $name
>Haha... You sure did come a lot.@
>But it's not nearly enough to fill the world with the Queen's flowers.\
>So spray all of your semen inside me...\
name ""
name "Luka"
>Ahhh!!\
name ""
>Her vagina suddenly shrinks far tighter.\
>Contractions start, making a suction that feels like it could draw me all the way inside her.\
>The male desire to ejaculate takes over my thoughts, as the joy of doing nothing but mating with Queen Alraune's hole fills my body.\
name "Luka"
>Haa... Ahh...\
name ""
gosub *syasei1
lsp 700,":c;chara\queenalraune_h8.bmp",0,0
gosub *syasei2
>And in only moments, I'm forced to come again.@
>My semen pours into her, my penis happily spitting it out.\
name $name
>What excellent quality semen...@
>But I need far more.\
>At this rate, to fill the world, we'll have to continue this for around one hundred years.\
name ""
name "Luka"
>N...No way... I'll die...\
name ""
name $name
>Did you think a Queen's genitals would allow her partner to die?@
>As long as we continue mating, both dying of old age and weakness won't happen.\
>You will only be permitted to continue giving me your semen...\
name ""
name "Luka"
>Ahhh...\
name ""
>Even while being given a hopeless sentence, ecstasy courses through my body as I climax.\
gosub *syasei1:gosub *syasei2
>And I shoot even more of my semen into the Queen's vagina.@
>In return, I get to indulge in even more pleasure.\
name $name
>Hehe... You'll get to enjoy this pleasure for a hundred years.@
>After that, you'll just be a cripple.\
>Enjoy being able to mate with a Queen...@
>The bliss at being able to keep giving seed to my vagina.\
name ""
name "Luka"
>Ah...\
name ""
gosub *syasei1:gosub *syasei2
>Stuck in Queen Alraune's embrace, I plunge into the throes of ecstasy, resigning myself to be her reproductive slave.\
>My semen will continue to be extracted by the Queen for the rest of my life...@
>But I'm not even given the luxury of despair, I'm only allowed to forever indulge in pleasure.\
mov %hseanwave,0:hseanwave
gosub *anten
>...............\
goto *badend



*slimelord_start

mov $name,"Slime Bess"
mov $name2,"Slime Bess"
mov $lavel,"slimelord"
mov $tatie1,"slimelord_st01"
mov $tatie2,"slimelord_st02"
mov $tatie3,"slimelord_st03"
mov $tatie4,"slimelord_ha1"
mov $haikei,"bg097"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,21000
if %nanido=2 mov %max_enemylife,25000
if %nanido=3 mov %max_enemylife,29000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,40
if %nanido=3 mov %earth_keigen,20
mov %alice_skill,1
mov %alice_skill1,130
mov %alice_skill2,130
mov %alice_skill3,130
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Toooooo bad! You can't escape! "
mov $mogaku_sel2,"Ahaha... Are you drowning inside me?"
mov $mogaku_sel3,"Even if you struggle, you can't escape. "
mov $mogaku_sel4,"Stop struggling. "
mov $mogaku_sel5,"Ahaha, how pitiful! "
mov $mogaku_dassyutu1,"Oh dear... You escaped."
mov $mogaku_dassyutu2,"Even though I was going to make you feel so good..."
mov $mogaku_earth_dassyutu1,"Oh dear... You escaped."
mov $mogaku_earth_dassyutu2,"Even though I was going to make you feel so good..."
mov $half_s1,"Ehehe, it feels good, doesn't it?"
mov $half_s2,"I'll squeeze out a lot..."
mov $kiki_s1,"You're about to spout, right?"
mov $kiki_s2,"I'll absorb it all, so let out a lot. "
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-200
mov %tukix,300
mov %owaza_count1a,4
mov %owaza_count3a,8
name $name
>Hahaha, so the Hero is my opponent?@
>I'm so happy... You look so delicious. \
name ""
name "Luka"
>Why would you do this!?@
>Erubetie had so much trust in you!\
name ""
name $name
>Trust isn't delicious...@
>If I follow Black Alice, I can eat all the humans I want. \
>I'll digest you right now, actually. @
>I'll melt you to nothing, and feed on you. \
name ""
name "Luka"
>I'll never forgive you!\
name ""
goto *common_main



*slimelord_v

gosub *face3
name $name
>Why... Did I lose...?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Slime Bess is sealed in the form of a puddle!\
mov %viclose,1:gosub *victory
mov %getexp,170000:gosub *lvup
mov %2393,1
goto *sean0365



*slimelord_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Ehehe, you gave up. @
>I'll dissolve you to nothing and feed on you. \
name ""
goto *slimelord_a



*slimelord_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *slimelord_kousan
if %cmd1=16 goto *slimelord_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *slimelord_main



*slimelord_a

if %kousoku=2 gosub *slimelord_a7:goto *common_main
if %kousoku=1 rnd2 %ransu,1,2
if %kousoku=1 && %ransu=1 gosub *slimelord_a6:goto *common_main
if %kousoku=1 && %ransu=2 gosub *slimelord_a7:goto *common_main
if %enemy_earth=5 gosub *slimelord_a5:goto *common_main
rnd2 %ransu,1,8
if %ransu=1 gosub *slimelord_a1:goto *common_main
if %ransu=2 gosub *slimelord_a2:goto *common_main
if %ransu=3 gosub *slimelord_a3:goto *common_main
if %ransu=4 gosub *slimelord_a4:goto *common_main
if %ransu<7 && %owaza_count1a>5 && %enemy_fire=0 gosub *slimelord_a5:goto *common_main
if %ransu=7 && %owaza_count3a>9 && %enemy_earth=0 && %enemy_fire=0 gosub *slimelord_el2:goto *common_main
if %ransu=8 && %owaza_count3a>9 && %enemy_earth=0 && %enemy_fire=0 gosub *slimelord_el4:goto *common_main
skip -8



*slimelord_el2

add %stack,1
mov %owaza_count3a,0
name $name
>Gnomaren, assist me!\
name ""
skillname "Summon Earth Spirit"
mov %enemy_earth,6
mov %damage_keigen_el,50
dwave 2,"se\earth1.ogg"
lsp2 0,":a;chara\gnomaren_st01.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *enemy_elm_print
>Slime Bess summons a spirit of earth!\
skillname ""
sub %stack,1
return



*slimelord_el4

add %stack,1
mov %owaza_count3a,0
name $name
>Gigamander, assist me!\
name ""
skillname "Summon Fire Spirit"
mov %enemy_fire,6
dwave 2,"se\fire2.ogg"
lsp2 0,":a;chara\gigamander_st01.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *enemy_elm_print
>Slime Bess summons a spirit of fire!\
skillname ""
sub %stack,1
return



*slimelord_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll give you a slime handjob. "
if %ransu=2 mov $sel1,"Only a slime can give a handjob like this. "
if %ransu=3 mov $sel1,"I'll squeeze your penis like only a slime can do! "
name $name
eng $sel1:$sel6\
name ""
skillname "Jelly Hands"
dwave 1,"se\ero_koki1.ogg"
>Slime Bess grabs Luka's penis with her slimy hands!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99
if %enemy_fire=0 && %aqua>0 && %ransu<10 gosub *aqua_guard:sub %stack,1:return
if %enemy_fire>0 && %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,10
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3937
if %nanido<2 damage 350,380
if %nanido=2 damage 390,420
if %nanido=3 damage 430,460
if %enemy_fire=0 skip 11
dwave 1,"se\ero_koki1.ogg"
>Luka's penis sinks into her slime hands!
if %nanido<2 damage 350,380
if %nanido=2 damage 390,420
if %nanido=3 damage 430,460
dwave 1,"se\ero_koki1.ogg"
>Stroking him hard, Luka's penis goes in and out of her slime hands!
if %nanido<2 damage 350,380
if %nanido=2 damage 390,420
if %nanido=3 damage 430,460
skillname ""
if %mylife=0 sub %stack,1:return *slimelord_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*slimelord_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Well? Your penis feels good, doesn't it? "
if %ransu=2 mov $sel1,"I'll violate you with my slime breasts. "
if %ransu=3 mov $sel1,"Only a slime can give a feeling like this! "
name $name
eng $sel1:$sel6\
name ""
skillname "Melty Bust"
dwave 1,"se\ero_sigoki1.ogg"
>Slime Bess sandwiches Luka's penis between her slimy breasts!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99
if %enemy_fire=0 && %aqua>0 && %ransu<10 gosub *aqua_guard:sub %stack,1:return
if %enemy_fire>0 && %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,10
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3938
if %nanido<2 damage 360,390
if %nanido=2 damage 400,430
if %nanido=3 damage 440,470
if %enemy_fire=0 skip 11
dwave 1,"se\ero_sigoki1.ogg"
>Luka's penis sinks into her breasts!
if %nanido<2 damage 360,390
if %nanido=2 damage 400,430
if %nanido=3 damage 440,470
dwave 1,"se\ero_sigoki1.ogg"
>Stuck in her breasts, Luka's penis is tossed around as she bounces them up and down!
if %nanido<2 damage 360,390
if %nanido=2 damage 400,430
if %nanido=3 damage 440,470
skillname ""
if %mylife=0 sub %stack,1:return *slimelord_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*slimelord_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Haha, I'll crush your penis with my ass. "
if %ransu=2 mov $sel1,"My slime will take you over. "
if %ransu=3 mov $sel1,"Taste my slimy ass. "
name $name
eng $sel1:$sel6\
name ""
skillname "Slimy Hips"
dwave 1,"se\ero_sigoki1.ogg"
>Slime Bess presses her slimy ass against Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99
if %enemy_fire=0 && %aqua>0 && %ransu<10 gosub *aqua_guard:sub %stack,1:return
if %enemy_fire>0 && %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,10
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3939
if %nanido<2 damage 370,400
if %nanido=2 damage 410,440
if %nanido=3 damage 450,480
if %enemy_fire=0 skip 11
dwave 1,"se\ero_sigoki1.ogg"
>Luka's penis sinks into her slimy ass cheek!
if %nanido<2 damage 370,400
if %nanido=2 damage 410,440
if %nanido=3 damage 450,480
dwave 1,"se\ero_sigoki1.ogg"
>Stuck inside her ass cheek, Luka's penis is squeezed by her internal pressure!
if %nanido<2 damage 370,400
if %nanido=2 damage 410,440
if %nanido=3 damage 450,480
skillname ""
if %mylife=0 sub %stack,1:return *slimelord_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*slimelord_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Can you take a slime's blowjob?"
if %ransu=2 mov $sel1,"I'll get a good taste of your penis. "
if %ransu=3 mov $sel1,"Your dick will melt in my mouth. "
name $name
eng $sel1:$sel6\
name ""
skillname "Slime Girl's Slimy Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>Slime Bess sucks Luka's penis into her slimy mouth!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99
if %enemy_fire=0 && %aqua>0 && %ransu<10 gosub *aqua_guard:sub %stack,1:return
if %enemy_fire>0 && %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,10
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3940
if %nanido<2 damage 380,410
if %nanido=2 damage 420,450
if %nanido=3 damage 460,490
if %enemy_fire=0 skip 11
dwave 1,"se\ero_buchu3.ogg"
>Her slime tongue coils around Luka's penis!
if %nanido<2 damage 380,410
if %nanido=2 damage 420,450
if %nanido=3 damage 460,490
dwave 1,"se\ero_buchu2.ogg"
>Her elastic mouth presses and sucks on Luka's penis!
if %nanido<2 damage 380,410
if %nanido=2 damage 420,450
if %nanido=3 damage 460,490
skillname ""
if %mylife=0 sub %stack,1:return *slimelord_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*slimelord_a5

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 7
name $name
if %first_sel1=1 skip 3
>I'm going to catch you. \
skip 2
>I'm going to catch you again. \
name ""
skillname "Amoeba Hold"
dwave 1,"se\ero_slime3.ogg"
eng "Slime Bess leans into Luka's body, wrapping him up in her slime body!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99
if %enemy_fire=0 && %aqua>0 && %ransu<10 gosub *aqua_guard:sub %stack,1:return
if %enemy_fire>0 && %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,10
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
@
mov $tatie4,"slimelord_ha1"
mov %kousoku,1:gosub *status_print
>Luka has been bound by Slime Bess!\
skillname ""
name $name
if %first_sel1=1 skip 4
>Ahahaha, you're stuck. @
>Now I'll squeeze you plenty... \
skip 3
>Ahahaha, you're stuck again. @
>This time, I'll really squeeze you. \
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,99
if %earth=0 && %nanido=2 mov %genmogaku,99
if %earth=0 && %nanido=3 mov %genmogaku,99
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
if %enemy_earth>0 mov %genmogaku,99
sub %stack,1
return



*slimelord_a6

add %stack,1
>Luka is stuck inside Slime Bess...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"It's slime time! "
if %ransu=2 mov $sel1,"I'll tease you with my slime. "
if %ransu=3 mov $sel1,"Ehehehe, doesn't my slime feel good? "
name $name
eng $sel1:$sel6\
name ""
skillname "Amoeba Haze"
dwave 1,"se\ero_slime1.ogg"
>Slime Bess' slime swirls around in her body, running all across Luka!
skillcount3 3941
if %nanido<2 damage 180,200
if %nanido=2 damage 190,210
if %nanido=3 damage 200,220
dwave 1,"se\ero_slime2.ogg"
>Her slime clings to Luka's penis!
if %nanido<2 damage 180,200
if %nanido=2 damage 190,210
if %nanido=3 damage 200,220
dwave 1,"se\ero_slime3.ogg"
>Dense slime squeezes hard on Luka's penis inside of Slime Bess' body!
if %nanido<2 damage 180,200
if %nanido=2 damage 190,210
if %nanido=3 damage 200,220
skillname ""
if %mylife=0 sub %stack,1:return *slimelord_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*slimelord_a7

add %stack,1
>Luka is stuck inside Slime Bess...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll squeeze it all nice and slowly... "
if %ransu=2 mov $sel1,"Many men digest away like this... "
if %ransu=3 mov $sel1,"Do you want to be drained dry like this...?"
name $name
eng $sel1:$sel6\
name ""
skillname "Amoeba Drain"
dwave 1,"se\ero_chupa6.ogg"
lsp 700,":a;chara\slimelord_hb1.bmp",0,0
lsp 690,":a;chara\slimelord_ct01.bmp",0,0:print 10,500
>The slime around Luka's body swells around him!
skillcount3 3942
if %nanido<2 damage 180,200
if %nanido=2 damage 190,210
if %nanido=3 damage 200,220
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
dwave 1,"se\ero_chupa6.ogg"
>The slime around his penis sucks on it!
if %nanido<2 damage 180,200
if %nanido=2 damage 190,210
if %nanido=3 damage 200,220
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
dwave 1,"se\ero_chupa6.ogg"
>Energy flows out of Luka's body everywhere her slime touches!
if %nanido<2 damage 180,200
if %nanido=2 damage 190,210
if %nanido=3 damage 200,220
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
mov $tatie4,"slimelord_hb1"
mov %kousoku,2
skillname ""
if %mylife=0 sub %stack,1:return *slimelord_h6
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*slimelord_onedari

mov $list1,"Jelly Hands"
if %3937>0 mov %list_num1,1
mov $list2,"Melty Bust"
if %3938>0 mov %list_num2,1
mov $list3,"Slimy Hips"
if %3939>0 mov %list_num3,1
mov $list4,"Slime Girl's Slimy Blowjob"
if %3940>0 mov %list_num4,1
mov $list5,"Amoeba Haze"
if %3941>0 mov %list_num5,1
mov $list6,"Amoeba Drain"
if %3942>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *slimelord_onedari1
if %cmd1=12 goto *slimelord_onedari2
if %cmd1=13 goto *slimelord_onedari3
if %cmd1=14 goto *slimelord_onedari4
if %cmd1=15 goto *slimelord_onedari5
if %cmd1=16 goto *slimelord_onedari6
if %cmd1=-1 goto *slimelord_main
goto *slimelord_onedari



*slimelord_onedari1

gosub *onedari_syori
name $name
>You want me to make you come with my slime hand?@
>Then please shoot out lots of your white stuff. \
name ""
gosub *slimelord_el3
gosub *slimelord_a1
skip -1



*slimelord_onedari2

gosub *onedari_syori
name $name
>You want me to make you come with my slime breasts?@
>Then please shoot out lots of your white stuff. \
name ""
gosub *slimelord_el3
gosub *slimelord_a2
skip -1



*slimelord_onedari3

gosub *onedari_syori
name $name
>You want me to make you come with my slime ass?@
>Then please shoot out lots of your white stuff. \
name ""
gosub *slimelord_el3
gosub *slimelord_a3
skip -1



*slimelord_onedari4

gosub *onedari_syori
name $name
>You want me to make you come with my slime mouth?@
>Then please shoot out lots of your white stuff. \
name ""
gosub *slimelord_el3
gosub *slimelord_a4
skip -1



*slimelord_onedari5

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want me to wrap you up, and run my slime all over you?@
>Then I'll squeeze out lots of your white stuff. \
name ""
if %kousoku=0 gosub *slimelord_a5
gosub *slimelord_a6
skip -1



*slimelord_onedari6

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want me to wrap you up, and absorb all of your energy?@
>Then I'll squeeze out lots of your white stuff. \
name ""
if %kousoku=0 gosub *slimelord_a5
gosub *slimelord_a7
skip -1



*slimelord_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\slimelord_bk03.bmp",0,0
gosub *syasei2
>As Slime Bess' slime hands stroke Luka's penis, he comes, covering her hands with semen.\
mov %viclose,1:gosub *lose
mov %2693,%2693+1:if %2693=1 mov %count_koenemy,%count_koenemy+1
if %2693>%count_most mov %count_most,%2693:mov $count_mostname,$name
count 5,11
mov $bad1,"Slime Bess forced Luka to come with her hands."
gosub *face2
name $name
>Aha, you shot out so much white stuff. @
>It's like you're peeing it... How embarrassing. \
name ""
goto *slimelord_h



*slimelord_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\slimelord_bk02.bmp",0,0
gosub *syasei2
>As Slime Bess' slime breasts squeeze Luka's penis, he comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2693,%2693+1:if %2693=1 mov %count_koenemy,%count_koenemy+1
if %2693>%count_most mov %count_most,%2693:mov $count_mostname,$name
count 7,11
mov $bad1,"Slime Bess forced Luka to come with her breasts."
gosub *face2
name $name
>Aha, you shot out so much white stuff. @
>It's like you're peeing it... How embarrassing. \
name ""
goto *slimelord_h



*slimelord_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\slimelord_bk04.bmp",0,0
gosub *syasei2
>As Slime Bess presses her ass against Luka's penis, he comes, covering her back with semen.\
mov %viclose,1:gosub *lose
mov %2693,%2693+1:if %2693=1 mov %count_koenemy,%count_koenemy+1
if %2693>%count_most mov %count_most,%2693:mov $count_mostname,$name
count 34,11
mov $bad1,"Slime Bess forced Luka to come with her ass."
gosub *face2
name $name
>Aha, you shot out so much white stuff. @
>It's like you're peeing it... How embarrassing. \
name ""
goto *slimelord_h



*slimelord_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\slimelord_bk01.bmp",0,0
gosub *syasei2
>As Slime Bess sucks on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2693,%2693+1:if %2693=1 mov %count_koenemy,%count_koenemy+1
if %2693>%count_most mov %count_most,%2693:mov $count_mostname,$name
count 4,11
mov $bad1,"Slime Bess forced Luka to come with her mouth."
gosub *face2
name $name
>Aha, you shot out so much white stuff. @
>It's like you're peeing it... How embarrassing. \
name ""
goto *slimelord_h



*slimelord_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\slimelord_ha2.bmp",0,0
gosub *syasei2
>Stuck inside Slime Bess' body as her slime runs all over him, Luka comes, filling her body with semen.\
mov %viclose,1:gosub *lose
mov %2693,%2693+1:if %2693=1 mov %count_koenemy,%count_koenemy+1
if %2693>%count_most mov %count_most,%2693:mov $count_mostname,$name
count 11,11
mov $bad1,"Slime Bess forced Luka to come as she wrapped him in her body."
gosub *face2
name $name
>Aha... You shot so much inside me. @
>It's like you're peeing it... How embarrassing. \
name ""
goto *slimelord_h



*slimelord_h6

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\slimelord_hb2.bmp",0,0
lsp 690,":a;chara\slimelord_ct03.bmp",0,0
gosub *syasei2
>Squeezed inside Slime Bess' body, Luka comes, filling her body with his semen.\
mov %viclose,1:gosub *lose2
csp 690
lsp 700,":a;chara\slimelord_hb3.bmp",0,0:print 10,500
name "Luka"
>Ahh...\
name ""
name $name
>Aha, you filled me with your white stuff. @
>It's like you're peeing it... How embarrassing. \
>I'll absorb a lot more semen than that.@
>I'll wrap you up with my slime breasts, and squeeze it all out. \
name ""
skillcount3 3942
skillname "Amoeba Drain"
dwave 1,"se\ero_slime3.ogg"
lsp 700,":a;chara\slimelord_hb4.bmp",0,0:print 10,500
>Slime Bess' breasts wrap around Luka's penis!
mov %damage_kotei,1
damage 180,200
dwave 1,"se\ero_chupa6.ogg"
>The slime tightens around Luka's penis!
mov %damage_kotei,1
damage 180,200
skillname ""
name "Luka"
>Ah!@>Ahhh!\
name ""
name $name
>I'll suck it all out. @
>Before I dissolve you inside my body, I'll draw it all out. \
name ""
skillcount3 3942
skillname "Amoeba Drain"
dwave 1,"se\ero_chupa6.ogg"
>The slime wraps extra tight around Luka's glans!
mov %damage_kotei,1
damage 180,200
dwave 1,"se\ero_chupa6.ogg"
>The slime swirls in a circle around Luka's penis!
mov %damage_kotei,1
damage 180,200
skillname ""
name "Luka"
>Haa... I'm going to come again...\
name ""
name $name
>Hahaha, come! @
>Spurt it all out inside my body! \
name ""
skillcount3 3942
skillname "Amoeba Drain"
dwave 1,"se\ero_chupa6.ogg"
>The slime around Luka's penis squeezes tighter!
mov %damage_kotei,1
damage 180,200
dwave 1,"se\ero_chupa6.ogg"
>Dark slime attaches to Luka's glans, and rubs it hard!
mov %damage_kotei,1
damage 180,200
skillname ""
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\slimelord_hb5.bmp",0,0
gosub *syasei2
>Encased in her slime, Luka comes again.@
>The white semen slowly drifts through her body, clearly visible.\
name $name
>Ahaha, more white stuff. @
>Doesn't it look nice, floating around inside my body?\
>All of your semen will dissolve away, too. @
>Before you're melted away, your semen will be devoured first. \
name ""
name "Luka"
>Stop... Ahh...\
name ""
skillcount3 3942
skillname "Amoeba Drain"
dwave 1,"se\ero_chupa6.ogg"
>The slime starts massaging his penis again!
mov %damage_kotei,1
damage 180,200
dwave 1,"se\ero_chupa6.ogg"
>Wrapping tighter around his penis, she continues massaging his tip!
mov %damage_kotei,1
damage 180,200
skillname ""
name "Luka"
>Stop... I can't come any more...\
name ""
name $name
>You really can't come any more?@
>We'll find out for sure if I make you feel even better. \
name ""
skillcount3 3942
skillname "Amoeba Drain"
dwave 1,"se\ero_chupa6.ogg"
>More dark slime presses against Luka's penis!
mov %damage_kotei,1
damage 180,200
dwave 1,"se\ero_chupa6.ogg"
>The elastic slime presses hard against Luka's penis!
mov %damage_kotei,1
damage 180,200
skillname ""
name "Luka"
>Haaa... Ahhh!\
name ""
name $name
>Now come! \
name ""
skillcount3 3942
skillname "Amoeba Drain"
dwave 1,"se\ero_chupa6.ogg"
>Caught in a vortex of slime, Luka is attacked by pleasure!
mov %damage_kotei,1
damage 180,200
dwave 1,"se\ero_chupa6.ogg"
>Flowing around his penis at an incredible speed, the slime rubs his penis hard!
mov %damage_kotei,1
damage 180,200
skillname ""
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\slimelord_hb6.bmp",0,0
gosub *syasei2
>As the slime swirls around his penis, Luka comes, the pleasure from his orgasm mixing with the stimulation from the slime.\
name $name
>Eh eh eh?@>More came out, didn't it?@
>You liar.@>You'll be eaten as punishment. \
name ""
cspl 690,699
lsp 700,":a;chara\slimelord_ha1.bmp",0,0:print 10,500
gosub *clear_sprite
gosub *setwindow_01p
mov %battle,0
mov %hsean,1
mov %2693,%2693+1:if %2693=1 mov %count_koenemy,%count_koenemy+1
if %2693>%count_most mov %count_most,%2693:mov $count_mostname,$name
count 11,11
mov $bad1,"Slime Bess forced Luka to come as she drained his energy."
gosub *face2
goto *slimelord_h



*slimelord_h

mov $bad2,"Luka is incorporated into Slime Bess, and is digested as his semen is squeezed."
if %2693=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,18:hseanwave:goto *slimelord_hb
name "Luka"
>Ahh...\
name ""
name $name
>Eh eh eh?@>I thought you were a Hero... But you gave in?@
>Well then, I'll make you into my nutrients. \
name ""
dwave 1,"se\ero_slime3.ogg"
mov %hseanwave,18:hseanwave
cspl 690,699
lsp 700,":a;chara\slimelord_ha1.bmp",0,0:print 10,500
>Bess starts to slowly move over me as I lay on my back.@
>Too weak from my orgasm, I can't do anything as she slowly wraps me inside her body.\
>A strange feeling flows through me as her sticky slime covers more and more of my body.@
>After a few moments, it feels like I'm completely a part of her...\
goto *slimelord_hb



*slimelord_hb

name "Luka"
>Ahhh...\
name ""
>I feel her sticky slime pulling at every inch of my body, now touching my bare skin.\
>The feel of her body against mine makes my penis get erect in seconds.@
>As soon as it gets hard, her sticky slime quickly consumes it.\
name $name
>Hehe, you're ready hard.@
>First I'll squeeze out your semen.@
>After that, I'll dissolve your body and eat you. @
>Your semen... Your body... Everything will be mine. \
name ""
name "Luka"
>No... Don't do it...\
name ""
name $name
>Here, I'll make you come. @
>Shoot all of that semen out into me. \
name ""
>The sticky slime that's surrounding my body starts to squirm and wriggle all at once.@
>Her elastic body presses against me from every direction, focusing especially hard against my penis.\
>She's using her body's properties to make me feel pleasure from everywhere at once...\
name "Luka"
>Ahhh!!\
name ""
name $name
>Ehehe... How many seconds will you last?@
>When I wrap them like this, nobody lasts longer than thirty seconds...\
>Hehe, it's time to tease your penis!\
name ""
>Extra dense slime suddenly forms around my penis, and starts to rub against me.@
>It feels almost like an elastic hand is stroking me inside her body.\
>Each time the slime hand strokes me, other slime rubs around the neck of my penis.@
>At the same time, more slime rubs against my tip and back muscle.\
>The powerful stimulus brings me near to a climax in only seconds.@
>Tensing my lower body, I manage to stop myself from coming somehow.\
name "Luka"
>Ah...\
name ""
name $name
>Even if you hold back, it will come out anyway. @
>Here, I'll play with the tip some more. \
name ""
>Her sticky slime wraps around my tip, and squeezes me.@
>Losing all of my endurance with that one move, I relax as the climax takes me over.\
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\slimelord_ha2.bmp",0,0
gosub *syasei2
>As I spurt inside Bess, I can see my white semen floating through her semi transparent body.@
>Seeing the proof of my defeat so clearly only makes my feeling of helplessness all the more powerful.\
name "Luka"
>Ah... Urhg...\
name ""
>My white semen is floating in her pink slime...@
>Unable to take my eyes off of it, the feeling of misery wells up in me.\
name $name
>Hehehe, you leaked out a lot.@
>Your fresh squeezed semen is now my food. \
>It's time to feast on your body itself, too.@
>I'll dissolve your body into mush. \
name ""
name "Luka"
>Hya!@> Ahhh!\
name ""
mov %hseanwave,19:hseanwave
>The slime all around me starts to flow and move.@
>Different from before, now it feels like her whole body is rubbing against me!\
name $name
>A meat eating slime digests their prey like this.@
>I usually dissolve my food in ten seconds, but I'll take my time eating you. \
name ""
name "Luka"
>S...Stop!@>Ahhh!\
name ""
>The sticky slime crawls all over my body.@
>Unlike before, this isn't about pleasure... She's just trying to digest me.\
>The horror at the thought of slowly being dissolved and digested while alive causes me to panic.\
name $name
>I'm even going to dissolve your penis. @
>I'll pack lots of slime around it, and...\
name ""
>Dark slime moves toward my penis, and starts to swirl around it.@
>Moving faster and faster, it's like my penis is caught in a whirlpool.\
name "Luka"
>Ahhh!!\
name ""
>My body shakes in crazed pleasure.@
>Even though she's dissolving me, it feels good...\
name $name
>Haha... Does it feel good having your penis digested?@
>If you came like this, it would be the lowest of the low...\
name ""
name "Luka"
>Haa...\
name ""
>The slime torture around my penis gets even more intense.@
>Wrapped by horrifying digestive slime, I can't stop the pleasure from assaulting me.\
>As it tightens and flows around the tip of my penis, I lose control of myself.\
name "Luka"
>Ahh...\
name ""
gosub *syasei1
lsp 700,":a;chara\slimelord_ha3.bmp",0,0
gosub *syasei2
>Surrendering to the digestive slime, I come, spraying more of my white semen into her body.\
name $name
>Ahaha, you came while your penis was being dissolved and digested away! \
name ""
name "Luka"
>Ahh...\
name ""
>I tremble with misery after coming while being digested.@
>All during my orgasm, the slime continued rubbing against my body.\
>She's just toying with me as she eats me...\
name $name
>Haha, isn't it just pathetic?@
>You're the great Hero, but you're being eaten by such a weak type of monster like me. \
name ""
>Bess taunts me as her slime rubs against me.@
>Stuck inside her body, I can't put up any resistance.\
name "Luka"
>Urhg...\
name ""
>Tears flow from my eyes as the digestion continues.\
>The horror at feeling pleasure as I die assaults me, as another climax races through my body.\
gosub *syasei1:gosub *syasei2
>Unable to stop my male reactions, more semen shoots into the slime as she digests me.\
name "Luka"
>Ahh... ah...\
name ""
name $name
>Hahaha, is even your brain melting away inside me?@
>You should be happy to meet your end inside my body. \
name ""
name "Luka"
>Haa... It feels so good...\
name ""
>I had accepted her predation before I knew it.@
>Leaving my body to the sensations, I bask in joy as I dissolve away.\
>My consciousness slowly fades away into pleasure.@
>My body and mind are dissolving away, to become a part of Bess' body.\
name $name
>Haha... Your body is delicious. \
name ""
name "Luka"
>Ah...ah...\
name ""
>My body will melt away and become one with this slime.@
>While immersed in that joy, my existence is consumed by Bess...\
mov %hseanwave,0:hseanwave
gosub *anten
>...........\
goto *badend



*eggel_start

mov $name,"Throne Eggiel"
mov $name2,"Eggiel"
mov $lavel,"eggel"
mov $tatie1,"eggel_st01"
mov $tatie2,"eggel_st02"
mov $tatie3,"eggel_st03"
mov $tatie4,"eggel_ha1"
mov $haikei,"bg097"
mov %monster_x,50
mov %monster_y,0
if %nanido=1 mov %max_enemylife,20000
if %nanido=2 mov %max_enemylife,24000
if %nanido=3 mov %max_enemylife,28000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,20
if %nanido=3 mov %earth_keigen,10
mov %alice_skill,1
mov %alice_skill1,0
mov %alice_skill2,0
mov %alice_skill3,0
mov %music,9
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Why are you fighting so much?"
mov $mogaku_sel2,"Don't you want to fertilize it?"
mov $mogaku_sel3,"There's no point struggling..."
mov $mogaku_sel4,"Fertilizing this egg is pure happiness."
mov $mogaku_sel5,"Don't resist... Dedicate yourself to this egg."
mov $mogaku_dassyutu1,"Why would you run from my egg?"
mov $mogaku_dassyutu2,"Fertilizing this sacred egg is the ultimate pleasure..."
mov $mogaku_earth_dassyutu1,"Why would you run from my egg?"
mov $mogaku_earth_dassyutu2,"Fertilizing this sacred egg is the ultimate pleasure..."
mov $half_s1,"Hehe, does it feel good?"
mov $half_s2,"Just a little more, and you'll be able to fertilize this egg in peace..."
mov $kiki_s1,"You seem to almost be ready."
mov $kiki_s2,"Now let me have you fertilize this egg..."
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-250
mov %tukix,300
mov %owaza_count1a,4
mov $name,"Eggiel"
name $name
>I am Throne Eggiel.@
>My role is to hatch new angels in my sacred egg.\
name ""
name "Luka"
>...Angels are born in eggs?@
>I thought angels were split off of Ilias herself?\
name ""
name $name
>In the ancient times, angels were created from Ilias herself.@
>...But that is long in the past.\
>In recent times, angels are born by fertilizing sacred eggs with semen.\
>For better results, a human body acts as the fertilizer.@
>With the man's body and soul itself, they fertilize the egg.\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\eggel_st01.bmp",210,0:print 10,500
name "Alice"
>A human body itself is the sperm?@>That's insanity.\
name ""
csp 701
gosub *face1
name $name
>I've made this egg just for you, Hero Luka.@>You'll fertilize it with your body.\
>You'll dissolve inside, and your genetic information will be captured by the egg.\
>Now, devote yourself to my egg.@
>Bring about a new life with me...\
name ""
name "Luka"
>I'll never do something that horrifying!\
name ""
>I don't have any time to mess around here.@
>I need to help Erubetie as fast as possible!\
goto *common_main



*eggel_v

gosub *face3
name $name
>I must not...@>Lose my egg...\
name ""
dwave 1,"se\bun.ogg"
csp 700:print 99,1000,"system\breakup.dll/lrB"
>Throne Eggiel fades away into particles, then vanishes!\
mov $name,"Throne Eggiel"
mov %viclose,1:gosub *victory
mov %getexp,270000:gosub *lvup
mov %2394,1
goto *sean0366



*eggel_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>So you decided to give yourself to my egg?@
>Then let me prepare for you to fertilize it...\
name ""
goto *eggel_a



*eggel_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *eggel_kousan
if %cmd1=16 goto *eggel_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *eggel_main



*eggel_a

if %kousoku=1 && %status=1 gosub *eggel_a7:goto *common_main
if %kousoku=1 rnd2 %ransu,1,3
if %kousoku=1 && %ransu<3 gosub *eggel_a5:goto *common_main
if %kousoku=1 && %ransu=3 && %owaza_count2a>3 gosub *eggel_a6:goto *common_main
if %kousoku=1 skip -3
rnd2 %ransu,1,5
if %ransu=1 gosub *eggel_a1:goto *common_main
if %ransu=2 gosub *eggel_a2:goto *common_main
if %ransu=3 gosub *eggel_a3:goto *common_main
if %ransu>3 && %owaza_count1a>5 gosub *eggel_a4:goto *common_main
skip -5



*eggel_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll make you feel good with my hair..."
if %ransu=2 mov $sel1,"We must prepare a little before fertilization..."
if %ransu=3 mov $sel1,"I'll make you feel good as you fertilize..."
name $name
eng $sel1:$sel6\
name ""
skillname "Angel Hair"
dwave 1,"se\umaru.ogg"
>Eggiel's hair gently strokes Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,40
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3943
if %nanido<2 damage 300,320
if %nanido=2 damage 340,360
if %nanido=3 damage 380,400
skillname ""
if %mylife=0 sub %stack,1:return *eggel_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*eggel_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll need to make you feel good before fertilization..."
if %ransu=2 mov $sel1,"To be caressed by an angel's wings... What luck you have."
if %ransu=3 mov $sel1,"Immerse yourself in the joy of my feathers."
name $name
eng $sel1:$sel6\
name ""
skillname "Angel Feathers"
dwave 1,"se\umaru.ogg"
>Eggiel's feathers gently stroke Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,40
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3944
if %nanido<2 damage 310,330
if %nanido=2 damage 350,370
if %nanido=3 damage 390,410
skillname ""
if %mylife=0 sub %stack,1:return *eggel_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*eggel_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hehe... What an energetic penis you have."
if %ransu=2 mov $sel1,"You seem to be hoarding a lot of high quality semen in there..."
if %ransu=3 mov $sel1,"Let's have a little foreplay before fertilization..."
name $name
eng $sel1:$sel6\
name ""
skillname "Angel Mouth"
dwave 1,"se\ero_buchu2.ogg"
>Eggiel sucks on Luka's penis with her warm mouth!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,40
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3945
if %nanido<2 damage 320,340
if %nanido=2 damage 360,380
if %nanido=3 damage 400,420
skillname ""
if %mylife=0 sub %stack,1:return *eggel_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*eggel_a4

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 8
name $name
if %first_sel1=1 skip 3
>It's fertilization time!@
skip 2
>This time, you'll fertilize it!@
>Now, please come inside my egg...\
name ""
skillname "Angel's Egg"
eng "A strange power draws Luka into the egg!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
@
mov %kousoku,1:gosub *status_print
>Luka is stuck inside the egg!\
skillname ""
mov %hanyo1,0
name $name
>Now, please relax...@
>Your life itself will fertilize this sacred egg.\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,4
if %earth=0 && %nanido=2 mov %genmogaku,4
if %earth=0 && %nanido=3 mov %genmogaku,5
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
sub %stack,1
return



*eggel_a5

add %stack,1
>Luka is stuck inside Eggiel's egg...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Oh... Why not give a little nutrition to the egg?"
if %ransu=2 mov $sel1,"Why don't we supply a little nutrition for the egg?"
if %ransu=3 mov $sel1,"My egg will suck up some of your energy..."
name $name
eng $sel1:$sel6\
name ""
skillname "Meltick Bubble"
dwave 1,"se\ero_slime3.ogg"
>Bubbles cling to Luka's groin, giving him pleasure!
skillcount3 3946
if %nanido<2 damage 180,200
if %nanido=2 damage 200,220
if %nanido=3 damage 220,240
dwave 1,"se\ero_slime3.ogg"
>The bubbles froth around his penis, giving him relaxing pleasure!
if %nanido<2 damage 180,200
if %nanido=2 damage 200,220
if %nanido=3 damage 220,240
skillname ""
if %mylife=0 sub %stack,1:return *eggel_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*eggel_a6

add %stack,1
>Luka is stuck inside Eggiel's egg...\
mov %owaza_count2a,0
name $name
>I'll activate the egg.@
>Why don't you immerse yourself in ecstasy...?\
name ""
skillname "Felty Bubble"
dwave 1,"se\ero_slime3.ogg"
>Strange bubbles drip all over Luka's body!\
skillcount3 3947
lsp 700,":a;chara\eggel_ha3.bmp",50,0:print 10,500
>A rush of sweet pleasure attacks Luka as the bubbles wash over him!
if %nanido<2 damage 180,200
if %nanido=2 damage 220,240
if %nanido=3 damage 260,280
if %status=0 mov $sel1,"Luka has been immersed in ecstasy!"
if %status=1 mov $sel1,"Luka has been immersed in ecstasy..."
mov $tatie4,"eggel_ha3"
mov %status,1:gosub *status_print
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *eggel_h5
if %kousan=2 sub %stack,1:return
name "Luka"
>Haaa...\
name ""
name $name
>It feels amazing, doesn't it?@
>Become one with the egg, as you melt away in pleasure...\
name ""
mov %hanyo1,1
rnd2 %status_turn,1,2
if %nanido=2 rnd2 %status_turn,1,2
if %nanido=3 rnd2 %status_turn,2,3
sub %stack,1
return



*eggel_a7

add %stack,1
>Luka is stuck inside Eggiel's egg...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hehe... Finish in a dreamy state."
if %ransu=2 mov $sel1,"Doesn't getting ready to fertilize feel amazing?"
if %ransu=3 mov $sel1,"Immerse yourself in the mind melting pleasure of these bubbles..."
name $name
eng $sel1:$sel6\
name ""
skillname "Felty Bubble"
dwave 1,"se\ero_slime3.ogg"
>Strange bubbles continue to drip onto Luka's body, giving him a rush of pleasure!
skillcount3 3947
if %nanido<2 damage 180,200
if %nanido=2 damage 220,240
if %nanido=3 damage 260,280
skillname ""
if %mylife=0 sub %stack,1:return *eggel_h5
sub %stack,1
return



*eggel_onedari

mov $list1,"Angel Hair"
if %3943>0 mov %list_num1,1
mov $list2,"Angel Feathers"
if %3944>0 mov %list_num2,1
mov $list3,"Angel Mouth"
if %3945>0 mov %list_num3,1
mov $list4,"Meltick Bubble"
if %3946>0 mov %list_num4,1
mov $list5,"Felty Bubble"
if %3947>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *eggel_onedari1
if %cmd1=12 goto *eggel_onedari2
if %cmd1=13 goto *eggel_onedari3
if %cmd1=14 goto *eggel_onedari4
if %cmd1=15 goto *eggel_onedari5
if %cmd1=16 goto *eggel_onedari6
if %cmd1=17 goto *eggel_onedari7
if %cmd1=18 goto *eggel_onedari8
if %cmd1=-1 goto *eggel_main
goto *eggel_onedari



*eggel_onedari1

gosub *onedari_syori
name $name
>You want me to make you feel good with my hair?@
>If you agree to fertilize my egg, I'll do it...\
name ""
gosub *eggel_a1
skip -1



*eggel_onedari2

gosub *onedari_syori
name $name
>You want me to make you feel good with my wings?@
>If you agree to fertilize my egg, I'll do it...\
name ""
gosub *eggel_a2
skip -1



*eggel_onedari3

gosub *onedari_syori
name $name
>You want me to make you feel good with my mouth?@
>If you agree to fertilize my egg, I'll do it...\
name ""
gosub *eggel_a3
skip -1



*eggel_onedari4

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want to give yourself to my egg?@
>Then I'll get it ready at once...\
name ""
if %kousoku=0 gosub *eggel_a4
gosub *eggel_a5
skip -1



*eggel_onedari5

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want to give yourself to my egg?@
>Then I'll get it ready at once...\
name ""
if %kousoku=0 gosub *eggel_a4
gosub *eggel_a6
gosub *eggel_a7
skip -1



*eggel_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\eggel_bk02.bmp",50,0
gosub *syasei2
>As Eggiel gently strokes Luka's penis with her hair, he comes, covering her head with semen.\
mov %viclose,1:gosub *lose
mov %2694,%2694+1:if %2694=1 mov %count_koenemy,%count_koenemy+1
if %2694>%count_most mov %count_most,%2694:mov $count_mostname,$name
count 22,15
mov $bad1,"Eggiel forced Luka to come with her hair."
gosub *face2
name $name
>I didn't need your semen to fertilize my egg...\
>Well, I guess the protein will only supply some extra nutrients.\
name ""
goto *eggel_h



*eggel_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\eggel_bk03.bmp",50,0
gosub *syasei2
>As Eggiel strokes Luka's penis with her soft wings, he comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2694,%2694+1:if %2694=1 mov %count_koenemy,%count_koenemy+1
if %2694>%count_most mov %count_most,%2694:mov $count_mostname,$name
count 13,15
mov $bad1,"Eggiel forced Luka to come with her wings."
gosub *face2
name $name
>I didn't need your semen to fertilize my egg...\
>Well, I guess the protein will only supply some extra nutrients.\
name ""
goto *eggel_h



*eggel_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\eggel_bk01.bmp",50,0
gosub *syasei2
>As Eggiel sucks on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2694,%2694+1:if %2694=1 mov %count_koenemy,%count_koenemy+1
if %2694>%count_most mov %count_most,%2694:mov $count_mostname,$name
count 4,15
mov $bad1,"Eggiel forced Luka to come with her mouth."
gosub *face2
name $name
>I didn't need your semen to fertilize my egg...\
>Well, I guess the protein will only supply some extra nutrients.\
name ""
goto *eggel_h



*eggel_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
if %hanyo1=0 lsp 700,":a;chara\eggel_ha2.bmp",50,0
if %hanyo1=1 lsp 700,":a;chara\eggel_ha4.bmp",50,0
gosub *syasei2
>As the bubbles cover Luka's penis, he comes, spraying his semen all over.\
mov %viclose,1:gosub *lose
mov %2694,%2694+1:if %2694=1 mov %count_koenemy,%count_koenemy+1
if %2694>%count_most mov %count_most,%2694:mov $count_mostname,$name
count 33,15
mov $bad1,"Eggiel forced Luka to come with her bubbles."
gosub *face2
name $name
>I didn't need your semen to fertilize my egg...\
>Well, I guess the protein will only supply some extra nutrients.\
name ""
goto *eggel_h



*eggel_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\eggel_ha4.bmp",50,0
gosub *syasei2
>Drowning in ecstasy inside the egg, Luka comes, spraying his semen out all over the bubbles.\
mov %viclose,1:gosub *lose2
name $name
>I didn't need your semen to fertilize my egg...\
>Well, I guess the protein will only supply some extra nutrients.\
name ""
name "Luka"
>Haaa...\
name ""
name $name
>But the egg's growth is a little bit slow...@
>Will you please provide it some more protein?\
>I'll pleasure you to coax it out, of course.\
name ""
skillcount3 3947
skillname "Felty Bubble"
dwave 1,"se\ero_slime3.ogg"
lsp 700,":a;chara\eggel_ha5.bmp",50,0:print 10,500
>Bubbles pour out into the egg, covering more of Luka's body!
mov %damage_kotei,1
damage 180,200
dwave 1,"se\ero_slime3.ogg"
>As the bubbles cover him, Luka's thoughts dim!
mov %damage_kotei,1
damage 180,200
skillname ""
name "Luka"
>S...Stop... Ahhh!\
name ""
name $name
>It's pointless to resist.@
>Your sanity will fade as they cover you.\
name ""
skillcount3 3947
skillname "Felty Bubble"
dwave 1,"se\ero_slime3.ogg"
>Bubbles soak Luka's body, making his heart waver!
mov %damage_kotei,1
damage 180,200
dwave 1,"se\ero_slime3.ogg"
>More bubbles cover Luka's penis, forcing intense pleasure into him!
mov %damage_kotei,1
damage 180,200
skillname ""
name "Luka"
>Haaa... It feels good...\
name ""
name $name
>It's a good feeling, right?@
>Please provide your protein to the egg...\
name ""
skillcount3 3947
skillname "Felty Bubble"
dwave 1,"se\ero_slime3.ogg"
>Luka is immersed in ecstasy inside the bubbles!
mov %damage_kotei,1
damage 180,200
dwave 1,"se\ero_slime3.ogg"
>Everywhere the bubbles touch is accompanied by a powerful sense of ecstasy!\
mov %damage_kotei,1
damage 180,200
skillname ""
name "Luka"
>Ah... Coming...@
>Ahhh...\
name ""
gosub *syasei1:gosub *syasei2
>Immersed in the ecstasy of the bubbles, Luka comes, his semen mixing inside the egg.\
name $name
>You sure shot out a lot...@
>Now the amount of nutrients is perfect.\
name ""
gosub *clear_sprite
gosub *setwindow_01p
>My whole body loosens in ecstasy.@
>All that's left is the horrible ceremony...\
mov %battle,0
mov %hsean,1
mov %2694,%2694+1:if %2694=1 mov %count_koenemy,%count_koenemy+1
if %2694>%count_most mov %count_most,%2694:mov $count_mostname,$name
count 33,15
mov $bad1,"Eggiel forced Luka to come with her bubbles."
goto *eggel_h



*eggel_h

mov $bad2,"Forced to fertilize Eggiel's ovum, Luka is reincarnated into a new life."
if %2694=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
name $name
>Now then, let's create a new life together.@
>Fertilize this ovum, and nurture a new being...\
name ""
dwave 1,"se\ero_slime3.ogg"
mov %hseanwave,18:hseanwave
cspl 690,699
lsp 700,":a;chara\eggel_hb1.bmp",50,0:print 10,500
>A huge egg, covered in mucus is pressed against my body.@
>Wherever the strange, warm mucus touches my skin, a strange sense of ecstasy radiates.\
name ""
name "Luka"
>Haaa... What... Is this...?\
name ""
name $name
>To fertilize this ovum, it requires your whole body.@
>Basically, you yourself are the sperm, fertilizing the egg...\
>Taking in your genetic information, you'll be reborn as a new life.\
name ""
name "Luka"
>N...No... Don't...\
name ""
name $name
>In order to do that, you need to be cleaned.@
>These bubbles of purification will clean your dirt...\
name ""
name "Luka"
>Ah...\
name ""
lsp 700,":a;chara\eggel_hb2.bmp",50,0:print 10,500
>Bubbles pour out onto my body, clinging around me and moving as if they had their own will.\
>The strange feeling of ecstasy gets even more powerful as they touch me.\
name "Luka"
>Ah...\
name ""
>The bubbles cover me from head to toe, and are especially dense around my groin.@
>Feeling too good, my penis starts to pulse as I let out a moan of pleasure.\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\eggel_hb3.bmp",50,0
gosub *syasei2
>The bubbles around my penis mix with my white semen.@
>The feeling of release was far more intense than a normal ejaculation, making it feel like I could melt away in bliss.\
name $name
>Oh my, did you come?@
>But there was no meaning to it...\
name ""
>Eggiel looks down at me and chuckles, my face stuck in a look of ecstasy.\
name "Luka"
>Ah...ah...\
name ""
name $name
>I was worried because of your ejaculation for a moment...@
>But it looks like the bubbles cleaned it away.\
>Now then, I'll have you intersect with the ovum.@
>You and it will become one.\
name ""
mov %hseanwave,19:hseanwave
lsp 700,":a;chara\eggel_hb4.bmp",50,0:print 10,500
>The strange egg comes down and presses against my body.@
>Feeling like jelly, it bends a little as it presses against me.\
name "Luka"
>Haa...\
name ""
>The moment I touched it, everything else becomes pointless.@
>An incredible sense of ecstasy washes over me.\
>My penis slips inside the egg, filling me with a sense of intense pleasure.\
name "Luka"
>What... The... Ahh...\
name ""
gosub *syasei1:gosub *syasei2
>Trembling, I explode inside the ovum, my semen squirting inside the jelly-like walls.\
name $name
>Oh dear... You can't fertilize this ovum with your semen.@
>It requires your actual body.\
name ""
name "Luka"
>Ha... Ahh...\
name ""
>Weighing against my body, I slowly start to sink inside the ovum.@
>The more I sink, the more intense the pleasure gets.\
>As the pleasure grows, so does my desire to unite with the ovum.@
>All I can think about is wanting to be one with it.\
lsp 700,":a;chara\eggel_hb5.bmp",50,0:print 10,500
>Almost completely inside the egg, tears of happiness spill from my eyes.\
name "Luka"
>Ahh...ah...\
name ""
>My body is already slowly dissolving away inside the ovum, even as I'm still being pulled inside.\
>As my body slips all the way inside, all I can think about is how this must be the best feeling in the world...\
lsp 700,":a;chara\eggel_hb6.bmp",50,0:print 10,500
name "Luka"
>Ah...\
name ""
>Completely inside the egg, I'm isolated from the outside world.@
>The fertilization process has begun...\
>My body will be dissolved away inside, and incorporated into the ovum, creating a new life...\
name "Luka"
>...Ah...\
name ""
mov %hseanwave,0:hseanwave
>Thus, my body is taken by the egg and used to create a new life.\
name $name
>Hehe... The fertilization is complete.@
>Use your new life to serve Ilias well...\
name ""
>Eggiel embraces the egg, and strokes it like a mother lovingly caressing her newborn child.\
gosub *anten
>...........\
goto *badend



*tutigumo_start

mov $name,"Tsuchigumo"
mov $name2,"Tsuchigumo"
mov $lavel,"tutigumo"
mov $tatie1,"tutigumo_st01"
mov $tatie2,"tutigumo_st12"
mov $tatie3,"tutigumo_st13"
mov $tatie4,"tutigumo_st12"
mov $haikei,"bg100"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,19000
if %nanido=2 mov %max_enemylife,22000
if %nanido=3 mov %max_enemylife,25000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,1
mov %alice_skill1,60
mov %alice_skill2,60
mov %alice_skill3,60
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free from Tsuchigumo!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"You can't escape from my web..."
mov $mogaku_sel2,"There's no use struggling..."
mov $mogaku_sel3,"If you're obedient, I'll make it feel even better..."
mov $mogaku_sel4,"More prey in my web..."
mov $mogaku_sel5,"Do you think that prey can escape from my web?"
mov $mogaku_dassyutu1,"You escaped from my web...?"
mov $mogaku_dassyutu2,""
mov $mogaku_earth_dassyutu1,"You have the power of earth too..."
mov $mogaku_earth_dassyutu2,""
mov $half_s1,"Being the prey of a spider feels good..."
mov $half_s2,"All men I prey on scream in joy."
mov $kiki_s1,"I'll suck everything of yours up."
mov $kiki_s2,"Look forward to it... Hehe."
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-280
mov %tukix,300
mov %owaza_count1a,4
mov %owaza_count2a,4
mov %owaza_count3a,9
name "Luka"
>I'm your opponent this time!\
name ""
name $name
>Oh... You're the famous disgraced Hero.@
>More appetizing prey has come right into my web.\
>But I know you've defeated many monsters up until now.@
>So I'll fight you in my own territory to the best of my ability...\
name ""
name "Luka"
>Territory...?\
name ""
name $name
>Yes... I'll invite you to a world of my own.\
name ""
dwave 1,"se\bun.ogg"
mov $haikei,"bg092"
bg "BG\bg092.bmp",99,1000,"system\lngtwave.dll/vwi"
>Suddenly, the space around me warps!@
>In the next moment, I'm standing inside a gloomy cave!\
name "Luka"
>What the...?\
name ""
name "Alice"
>This appears to be a barrier she created.\
>Top ranking Arachne have the ability to spin webs of space-time.@
>With Black Alice strengthening them, it seems their ability has gotten even more powerful...\
name ""
name $name
>In a confined place like this, spider monsters can show their true strength...@
>I'll suck you dry nice and slowly, as you twitch in my web...\
name ""
mov $tatie1,"tutigumo_st11"
lsp 700,":a;chara\tutigumo_st11.bmp",0,0:print 10,500
>Tsuchigumo opens her lower hole!\
name "Alice"
>To break through this barrier...@
>The method should be obvious, Luka!\
name ""
name "Luka"
>Just knock down the caster, right!?\
name ""
goto *common_main



*tutigumo_v

gosub *face3
name $name
>No... A human like this exists...?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Tsuchigumo is sealed in the form of a spider!\
mov %viclose,1:gosub *victory
mov %getexp,190000:gosub *lvup
mov %2378,1
goto *sean0369



*tutigumo_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Hehe... You should have just been obedient from the start.@
>Now to suck you dry...\
name ""
goto *tutigumo_a



*tutigumo_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *tutigumo_kousan
if %cmd1=16 goto *tutigumo_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *tutigumo_main



*tutigumo_a

if %kousoku=1 && %earth>0 gosub *tutigumo_a6:goto *common_main
if %kousoku=1 && %earth=0 gosub *tutigumo_a7:goto *common_main
if %enemy_earth=4 gosub *tutigumo_a5:goto *common_main
rnd2 %ransu,1,7
if %ransu=1 gosub *tutigumo_a1:goto *common_main
if %ransu=2 gosub *tutigumo_a2:goto *common_main
if %ransu=3 gosub *tutigumo_a3:goto *common_main
if %ransu=4 && %owaza_count2a>5 && %status=0 gosub *tutigumo_a4:goto *common_main
if %ransu=5 && %owaza_count1a>5 gosub *tutigumo_a5:goto *common_main
if %ransu>5 && %owaza_count3a>10 && %status=0 && %enemy_earth=0 gosub *tutigumo_el2:goto *common_main
skip -7



*tutigumo_el2

add %stack,1
mov %owaza_count3a,0
name $name
>Come, Gnomaren!\
name ""
skillname "Summon Earth Spirit"
mov %enemy_earth,5
mov %damage_keigen_el,50
dwave 2,"se\earth1.ogg"
lsp2 0,":a;chara\gnomaren_st01.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *enemy_elm_print
>Tsuchigumo summons a spirit of earth!\
skillname ""
sub %stack,1
return



*tutigumo_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll stroke you with these legs..."
if %ransu=2 mov $sel1,"Does this feel good?"
if %ransu=3 mov $sel1,"I'll keep stroking it until you come..."
name $name
eng $sel1:$sel6\
name ""
skillname "Eight Foot Stroke"
dwave 1,"se\umaru.ogg"
>Tsuchigumo uses her eight feet to stroke Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,5
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3948
if %nanido<2 damage 320,340
if %nanido=2 damage 360,380
if %nanido=3 damage 400,420
skillname ""
if %mylife=0 sub %stack,1:return *tutigumo_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*tutigumo_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You'll finish with a look of pure ecstasy if I use my breasts..."
if %ransu=2 mov $sel1,"Human men are so strange... Wanting to have sex with breasts..."
if %ransu=3 mov $sel1,"I'll rub you with these organs that attract men..."
name $name
eng $sel1:$sel6\
name ""
skillname "Pinching Monster Breasts"
dwave 1,"se\ero_sigoki1.ogg"
lsp 690,":a;chara\tutigumo_ct21.bmp",0,0:print 10,500
>Tsuchigumo squeezes Luka's penis with her large breasts!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,5
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3949
if %nanido<2 damage 330,350
if %nanido=2 damage 370,390
if %nanido=3 damage 410,430
skillname ""
if %mylife=0 sub %stack,1:return *tutigumo_h2
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*tutigumo_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I can spin silk in this mouth of mine... I'll coil it all around your penis, too."
if %ransu=2 mov $sel1,"I can even spin silk from my mouth, you know."
if %ransu=3 mov $sel1,"I'll cover your penis with silk inside my mouth..."
name $name
eng $sel1:$sel6\
name ""
skillname "Silky Blowjob"
dwave 1,"se\ero_buchu2.ogg"
if %kousan<2 lsp 690,":a;chara\tutigumo_ct01.bmp",300,0:print 10,500
if %kousan<2 lsp 690,":a;chara\tutigumo_ct02.bmp",300,0:print 10,500
lsp 690,":a;chara\tutigumo_ct03.bmp",300,0:print 10,500
eng "Tsuchigumo coils her tongue around Luka's penis, spinning sticky spider silk around him at the same time!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,5
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
>The sticky thread pulls and rubs Luka's penis!
skillcount3 3950
if %nanido<2 damage 340,360
if %nanido=2 damage 380,400
if %nanido=3 damage 420,440
skillname ""
if %mylife=0 sub %stack,1:return *tutigumo_h3
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*tutigumo_a4

add %stack,1
mov %owaza_count2a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My milk brings a man ecstasy..."
if %ransu=2 mov $sel1,"Drink this and melt away..."
if %ransu=3 mov $sel1,"Do you want to drink my milk...?"
name $name
eng $sel1:$sel6\
name ""
skillname "Breast Milk of Passion"
dwave 1,"se\ero_koki1.ogg"
eng "Tsuchigumo presses her breast against Luka's mouth!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount3 3951
>Forced to drink milk from her nipple, a sweet sensation floods through Luka's body!
if %nanido<2 damage 300,320
if %nanido=2 damage 340,360
if %nanido=3 damage 380,400
if %status=0 mov $sel1,"Luka has been immersed in ecstasy!"
if %status=1 mov $sel1,"Luka has been immersed in ecstasy..."
mov %status,1:gosub *status_print
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *tutigumo_h4
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,2,3
if %nanido=3 rnd2 %status_turn,3,4
sub %stack,1
return



*tutigumo_a5

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 7
name $name
if %first_sel1=1 skip 3
>I'll catch you...\
skip 2
>I'll catch you again...\
name ""
skillname "Tsuchigumo Capture"
dwave 1,"se\ero_makituki3.ogg"
eng "Tsuchigumo clings to Luka, and covers him in spider silk!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,5
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
@
>Sticky spider silk covers Luka's entire body!\
lsp 690,":c;chara\tutigumo_h1.bmp",0,0
mov %kousoku,1:gosub *status_print
>Luka has been bound by Tsuchigumo!\
skillname ""
name $name
if %first_sel1=1 skip 3
>Doesn't it feel good inside my spider silk?@
skip 2
>You're back in my spider silk...@
>Now be still, and become my prey...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,99
if %earth=0 && %nanido=2 mov %genmogaku,99
if %earth=0 && %nanido=3 mov %genmogaku,99
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
if %enemy_earth>0 mov %genmogaku,99
sub %stack,1
return



*tutigumo_a6

add %stack,1
>Luka has been bound by Tsuchigumo...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Do you want me to spin my silk here, too?"
if %ransu=2 mov $sel1,"I'll wrap my silk around your penis..."
if %ransu=3 mov $sel1,"If I spin my silk around your penis, you'll spurt out your own white stuff..."
name $name
eng $sel1:$sel6\
name ""
skillname "Male Binding Silk"
dwave 1,"se\ero_ito.ogg"
lsp 690,":c;chara\tutigumo_h2.bmp",0,0:print 10,500
>Tsuchigumo coils more of her spider silk around Luka's penis!\
>The sticky touch stimulates Luka!
skillcount3 3952
if %nanido<2 damage 350,370
if %nanido=2 damage 390,410
if %nanido=3 damage 430,450
skillname ""
if %mylife=0 sub %stack,1:return *tutigumo_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*tutigumo_a7

add %stack,1
mov %owaza_count3a,0
mov %owaza_num1,1
if %kousan=2 skip 5
name $name
>Now, mate with me...@
>I'll wrap your penis up in my vagina.\
name ""
skillname "Male Slurping Vagina"
dwave 1,"se\ero_pyu1.ogg"
lsp 690,":c;chara\tutigumo_h4.bmp",0,0:print 10,500
>Tsuchigumo presses her vagina against Luka, taking his penis deep inside her!
skillcount3 3953
mov %damage_kotei,1
damage 500,600
mov %kousoku,2:gosub *status_print
>Luka is being raped by Tsuchigumo!\
skillname ""
if %mylife=0 sub %stack,1:return *tutigumo_h6
name "Luka"
>Ahhh!!\
name ""
>Her vagina squirms and wriggles around me, forcing the unnatural pleasure through me!\
sub %stack,1
goto *tutigumo_a8



*tutigumo_a8

add %stack,1
>Luka is being raped by Tsuchigumo...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Of course, there's a lot more silk in here...":mov $sel2,"Sticky silk coils around Luka's penis inside Tsuchigumo!"
if %ransu=2 mov $sel1,"Does my vagina feel good?":mov $sel2,"Tsuchigumo rocks her body back and forth, tossing Luka's penis around inside her!"
if %ransu=3 mov $sel1,"Pour all of your semen inside...":mov $sel2,"Tsuchigumo squeezes down hard on Luka's penis!"
if %ransu=4 mov $sel1,"How does it feel to mate with a spider?":mov $sel2,"Tsuchigumo's vaginal walls squirm and wriggle around Luka's penis!"
if %ransu=5 mov $sel1,"Do you like it when I tighten it?":mov $sel2,"Tsuchigumo tightens her vagina around Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Male Slurping Vagina"
dwave 1,"se\ero_chupa4.ogg"
eng $sel2:$sel6
skillcount3 3953
mov %damage_kotei,1
damage 500,600
skillname ""
if %mylife=0 sub %stack,1:return *tutigumo_h7
sub %stack,1
goto *tutigumo_a8



*tutigumo_onedari

mov $list1,"Eight Foot Stroke"
if %3948>0 mov %list_num1,1
mov $list2,"Pinching Monster Breasts"
if %3949>0 mov %list_num2,1
mov $list3,"Silky Blowjob"
if %3950>0 mov %list_num3,1
mov $list4,"Breast Milk of Passion"
if %3951>0 mov %list_num4,1
mov $list5,"Male Binding Silk"
if %3952>0 mov %list_num5,1
mov $list6,"Male Slurping Vagina"
if %3953>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *tutigumo_onedari1
if %cmd1=12 goto *tutigumo_onedari2
if %cmd1=13 goto *tutigumo_onedari3
if %cmd1=14 goto *tutigumo_onedari4
if %cmd1=15 goto *tutigumo_onedari5
if %cmd1=16 goto *tutigumo_onedari6
if %cmd1=-1 goto *tutigumo_main
goto *tutigumo_onedari



*tutigumo_onedari1

gosub *onedari_syori
name $name
>You want me to stimulate your penis with my spider legs?@
>Then make sure you give me lots of semen in return...\
name ""
gosub *tutigumo_a1
skip -1



*tutigumo_onedari2

gosub *onedari_syori
name $name
>You want me to stimulate your penis with my spider breasts?@
>Then make sure you give me lots of semen in return...\
name ""
gosub *tutigumo_a2
skip -1



*tutigumo_onedari3

gosub *onedari_syori
name $name
>You want me to stimulate your penis with my spider mouth?@
>Then make sure you give me lots of semen in return...\
name ""
gosub *tutigumo_a3
skip -1



*tutigumo_onedari4

gosub *onedari_syori
name $name
>You want to drink my milk?@
>Then make sure you give me lots of semen to drink in return...\
name ""
gosub *tutigumo_a4
skip -1



*tutigumo_onedari5

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want me to spin my silk around your penis?@
>Then make sure you give me lots of semen in return...\
name ""
if %kousoku=0 gosub *tutigumo_a5
gosub *tutigumo_a6
skip -1



*tutigumo_onedari6

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want me to rape you?@
>Then make sure you give me lots of semen in return...\
name ""
if %kousoku=0 gosub *tutigumo_a5
gosub *tutigumo_a7
skip -1



*tutigumo_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\tutigumo_bk04.bmp",0,0
gosub *syasei2
>As Tsuchigumo strokes Luka's penis with her eight feet, Luka comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2678,%2678+1:if %2678=1 mov %count_koenemy,%count_koenemy+1
if %2678>%count_most mov %count_most,%2678:mov $count_mostname,$name
count 6,4
mov $bad1,"Tsuchigumo forced Luka to come with her feet."
gosub *face2
name $name
>Hehe... You shot out quite a lot.@
>Next, shall I take your semen in my vagina itself?\
name ""
goto *tutigumo_h



*tutigumo_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\tutigumo_ct22.bmp",0,0
lsp 692,":a;chara\tutigumo_bk02.bmp",0,0
gosub *syasei2
>Sandwiched between Tsuchigumo's large breasts, Luka comes, covering her chest with semen.\
mov %viclose,1:gosub *lose2
name "Luka"
>Ahhh...\
name ""
name $name
>You shot out quite a lot...@
>And it tastes quite delicious.\
>Shall I have you treat me to a little more?\
name ""
skillcount3 3949
skillname "Pinching Monster Breasts"
dwave 1,"se\ero_ito.ogg"
lsp 690,":a;chara\tutigumo_ct23.bmp",0,0:print 10,500
>Spider silk shoots from Tsuchigumo, covering Luka's penis!
mov %damage_kotei,1
damage 330,350
dwave 1,"se\ero_sigoki1.ogg"
>Sticky silk latches onto Luka's penis!
mov %damage_kotei,1
damage 330,350
skillname ""
name "Luka"
>Haa...!\
name ""
name $name
>Hehe, your little penis looks happy to be covered in sticky silk...@
>Does it feel like it's squeezed in paradise?\
name ""
skillcount3 3949
skillname "Pinching Monster Breasts"
dwave 1,"se\ero_sigoki1.ogg"
>Tsuchigumo presses her breasts together!
mov %damage_kotei,1
damage 330,350
dwave 1,"se\ero_sigoki1.ogg"
>The sticky silk rubs against Luka's penis as she moves her breasts!
mov %damage_kotei,1
damage 330,350
skillname ""
name "Luka"
>I...It feels good...@
>I'm going to come again...\
name ""
name $name
>What do you like better?@> My silk, or my breasts?@
>I won't make you choose...@> Come as you feel them both!\
name ""
skillcount3 3949
skillname "Pinching Monster Breasts"
dwave 1,"se\ero_sigoki1.ogg"
>The sticky silk tangled around Luka's penis rubs against him!
mov %damage_kotei,1
damage 330,350
dwave 1,"se\ero_sigoki1.ogg"
>Tsuchigumo's soft breasts massage Luka's penis!
mov %damage_kotei,1
damage 330,350
skillname ""
name "Luka"
>No... Coming...@
>Ahhhh!!!\
name ""
gosub *syasei1
lsp 690,":a;chara\tutigumo_ct24.bmp",0,0
gosub *syasei2
>Pulsing, Luka's penis spits out semen between Tsuchigumo's breasts, the white seed mixing with her white silk.\
name $name
>Wow, look at all that.@
>If it felt that good, do you want to feel more?\
>I'll keep weaving more silk on it between my breasts.@
>You'll get a nice taste of heaven...\
name ""
name "Luka"
>Ahh... S...So good...\
name ""
skillcount3 3949
skillname "Pinching Monster Breasts"
dwave 1,"se\ero_sigoki1.ogg"
>More silk covers Luka's penis between Tsuchigumo's breasts!
mov %damage_kotei,1
damage 330,350
dwave 1,"se\ero_sigoki1.ogg"
>It slowly covers more and more of him!
mov %damage_kotei,1
damage 330,350
skillname ""
name $name
>I'll weave your penis together with my breasts...@
>Wrap it up more and more in my silk...\
name ""
skillcount3 3949
skillname "Pinching Monster Breasts"
dwave 1,"se\ero_ito.ogg"
>More silk covers Luka's penis!
mov %damage_kotei,1
damage 330,350
dwave 1,"se\ero_sigoki1.ogg"
>Tsuchigumo skillfully puts Luka's penis in a cocoon!
mov %damage_kotei,1
damage 330,350
skillname ""
name "Luka"
>Ahh... So sticky...@
>It feels too good... I'm going to come again...\
name ""
name $name
>Do you want to come from feeling my breasts?@
>Or come from the touch of my silk?\
>...Or do you want to feel both again?@
>Then as you wish...\
name ""
skillcount3 3949
skillname "Pinching Monster Breasts"
dwave 1,"se\ero_sigoki1.ogg"
>A sweet feeling of pressure fills Luka's penis as the silk tightens around him!
mov %damage_kotei,1
damage 330,350
dwave 1,"se\ero_sigoki1.ogg"
>At the same time, his penis is crushed between her huge breasts!
mov %damage_kotei,1
damage 330,350
skillname ""
name "Luka"
>Haaa... Coming...!\
name ""
gosub *syasei1
lsp 690,":a;chara\tutigumo_ct25.bmp",0,0
gosub *syasei2
>Semen shoots out of Luka's penis, squirting through her silk wrapping and covering Tsuchigumo's body.\
name $name
>I'm honored you liked my silk so much...@
>It must have felt amazing, if it made you come this much.\
name ""
gosub *clear_sprite
gosub *setwindow_01p
>Luka's penis twitches between her breasts, like a pitiful caterpillar that was caught as simple prey for a spider.\
mov %battle,0
mov %hsean,1
mov %2678,%2678+1:if %2678=1 mov %count_koenemy,%count_koenemy+1
if %2678>%count_most mov %count_most,%2678:mov $count_mostname,$name
count 7,4
mov $bad1,"Tsuchigumo forced Luka to come with her breasts."
csp 690:print 10,500
goto *tutigumo_h



*tutigumo_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\tutigumo_ct04.bmp",300,0
lsp 691,":a;chara\tutigumo_bk01.bmp",0,0
gosub *syasei2
>Covered with silk inside Tsuchigumo's mouth as she sucks on him, Luka comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose2
name "Luka"
>Ahhh...\
name ""
name $name
>You shot out quite a lot...@
>And it tastes quite delicious.\
>Shall I have you treat me to a little more?\
name ""
skillcount3 3950
skillname "Silky Blowjob"
dwave 1,"se\ero_buchu2.ogg"
lsp 690,":a;chara\tutigumo_ct12.bmp",300,0:print 10,500
>Tsuchigumo sucks harder on Luka's penis!
mov %damage_kotei,1
damage 340,360
dwave 1,"se\ero_buchu2.ogg"
>At the same time, she spins more silk around his penis!
mov %damage_kotei,1
damage 340,360
skillname ""
name "Luka"
>Ahh... Sticky...\
name ""
name $name
>Does it feel good when it wraps around your penis?@
>I'll keep sucking like this...\
name ""
skillcount3 3950
skillname "Silky Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>Tsuchigumo sucks even harder on Luka's penis!
mov %damage_kotei,1
damage 340,360
dwave 1,"se\ero_buchu2.ogg"
>More spider silk shoots out, covering Luka's penis!
mov %damage_kotei,1
damage 340,360
skillname ""
name "Luka"
>No... I'm going to come again...\
name ""
name $name
>Go ahead... Come in my mouth.\
name ""
skillcount3 3950
skillname "Silky Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>Tsuchigumo moves her head back and forth!
mov %damage_kotei,1
damage 340,360
dwave 1,"se\ero_buchu2.ogg"
>The sticky silk pulls on Luka's penis inside her mouth!
mov %damage_kotei,1
damage 340,360
skillname ""
name "Luka"
>C...Coming...!@
>Ahhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\tutigumo_ct12.bmp",300,0
gosub *syasei2
>Shooting inside Tsuchigumo's mouth, Luka's semen mixes with the silk as it squirts out.\
name $name
>Did my spider silk fell good?@
>Here, I'll thread even more around it for next time...\
name ""
name "Luka"
>Haa... Stop...\
name ""
skillcount3 3950
skillname "Silky Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>More silk wraps around Luka's penis inside her mouth!
mov %damage_kotei,1
damage 340,360
dwave 1,"se\ero_buchu2.ogg"
>The sticky thread covers every part of Luka's penis!
mov %damage_kotei,1
damage 340,360
skillname ""
name $name
>Does it feel good being wrapped up?@
>I won't forget the extra sensitive tip, either...\
name ""
skillcount3 3950
skillname "Silky Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>More sticky spider silk wraps around Luka's tip!
mov %damage_kotei,1
damage 340,360
dwave 1,"se\ero_buchu2.ogg"
>The sticky thread tightens around Luka's tip!
mov %damage_kotei,1
damage 340,360
skillname ""
name "Luka"
>No... The tip feels too good...@
>I'm going to come again...!\
name ""
name $name
>Men really love being wrapped up...@
>No man can control their ejaculation when I do this.\
name ""
skillcount3 3950
skillname "Silky Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>Luka's penis is completely cocooned inside her mouth!
mov %damage_kotei,1
damage 340,360
dwave 1,"se\ero_buchu2.ogg"
>At the same time, she sucks on his penis, pulling it deeper into her mouth!
mov %damage_kotei,1
damage 340,360
skillname ""
name "Luka"
>Ahh... C...Coming...!\
name ""
gosub *syasei1
lsp 690,":a;chara\tutigumo_ct13.bmp",300,0
gosub *syasei2
>Luka's cocooned penis pulses, exploding inside her mouth.@
>The sticky silk covering his tip mixes with the semen as it shoots out.\
name $name
>Hehe... It's like a caterpillar oozing out its fluid.@
>Your penis is pathetic...\
name ""
gosub *clear_sprite
gosub *setwindow_01p
>Luka's penis twitches inside her mouth, like a pitiful caterpillar that was caught as simple prey for a spider.\
mov %battle,0
mov %hsean,1
mov %2678,%2678+1:if %2678=1 mov %count_koenemy,%count_koenemy+1
if %2678>%count_most mov %count_most,%2678:mov $count_mostname,$name
count 4,4
mov $bad1,"Tsuchigumo forced Luka to come with her mouth."
csp 690:print 10,500
goto *tutigumo_h



*tutigumo_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\tutigumo_bk02.bmp",0,0
gosub *syasei2
>Forced to drink Tsuchigumo's milk, Luka comes, covering her body with semen.\
mov %viclose,1:gosub *lose
mov %2678,%2678+1:if %2678=1 mov %count_koenemy,%count_koenemy+1
if %2678>%count_most mov %count_most,%2678:mov $count_mostname,$name
count 32,4
mov $bad1,"Tsuchigumo forced Luka to come as he drank her milk."
gosub *face2
name $name
>Hehe... You shot out quite a lot.@
>Next, shall I take your semen in my vagina itself?\
name ""
goto *tutigumo_h



*tutigumo_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":c;chara\tutigumo_h3.bmp",0,0
gosub *syasei2
>As Tsuchigumo's spider silk coils around Luka's penis, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2678,%2678+1:if %2678=1 mov %count_koenemy,%count_koenemy+1
if %2678>%count_most mov %count_most,%2678:mov $count_mostname,$name
count 20,4
mov $bad1,"Tsuchigumo forced Luka to come with her spider silk."
gosub *face2
name $name
>Hehe... You shot out quite a lot.@
>Next, shall I take your semen in my vagina itself?\
name ""
goto *tutigumo_h



*tutigumo_h6

mov %ikigoe,3:gosub *ikigoe
name $name
>Oh?@>But I only just put it in... How pitiful.@
>Hehe.\
name ""
gosub *syasei1
lsp 690,":c;chara\tutigumo_h5.bmp",0,0
gosub *syasei2
>As soon as Luka is forced into Tsuchigumo's vagina, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2678,%2678+1:if %2678=1 mov %count_koenemy,%count_koenemy+1
if %2678>%count_most mov %count_most,%2678:mov $count_mostname,$name
count 1,4
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka is forced to come the moment of insertion."
gosub *face2
name $name
>I can't believe you came so quickly...@
>If you can't even mate correctly, you're a failure as a man...\
name ""
goto *tutigumo_h



*tutigumo_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":c;chara\tutigumo_h5.bmp",0,0
gosub *syasei2
>As Tsuchigumo rapes Luka, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2678,%2678+1:if %2678=1 mov %count_koenemy,%count_koenemy+1
if %2678>%count_most mov %count_most,%2678:mov $count_mostname,$name
count 1,4
mov $bad1,"Tsuchigumo forced Luka to come as she raped him."
gosub *face2
name $name
>Hehe... You shot out quite a lot.@
>My vagina feels amazing, doesn't it?\
name ""
goto *tutigumo_h



*tutigumo_h

mov $bad2,"Luka was raped until he completely dried out."
if %2678=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku=2 mov %hseanwave,14:hseanwave:goto *tutigumo_hb
name "Luka"
>Ahhh...\
name ""
>Too weak to resist, I'm caught in a spider web.@
>The sticky silk threads leave me unable to move a muscle.\
cspl 690,699
lsp 700,":c;chara\tutigumo_h1.bmp",0,0:print 10,500
>Tsuchigumo leans over my helpless body.@
>Using her weight behind her, she forces one of her large nipples into my mouth!\
name "Luka"
>Mmmg...\
name ""
name $name
>Hehe... Why don't you drink my milk?@
>It won't harm you... It will only make your body more sensitive.\
name ""
name "Luka"
>Nnn...\
name ""
>Sweet, lukewarm liquid pours from her nipple into my mouth.@
>After swallowing it, a soft feeling spreads through my body.\
name $name
>Now you can't resist any longer.@
>Let me use my lower mouth to devour you...\
name ""
>The outer shell of her groin area opens up, revealing a hole.@
>Inside, I can see sticky threads spreading out between the lips, pink flesh visible inside.\
>The soft looking flesh seems to invite me inside...@
>Unable to tear my eyes away, I nervously swallow.\
name $name
>I'll suck your penis inside, and make you ejaculate over and over again...@
>I'll squeeze you until you're completely dry.\
name ""
name "Luka"
>Ahh... Stop... Stop!\
name ""
mov %hseanwave,14:hseanwave
lsp 700,":c;chara\tutigumo_h4.bmp",0,0:print 10,500
>My appeals in vain, Tsuchigumo forces me into her hole!\
goto *tutigumo_hb



*tutigumo_hb

name "Luka"
>Ahhh!\
name ""
>Her wet, ribbed flesh rubs against my sensitive penis as I slip inside her.@
>The strange shape of her insides fascinates my mind, as the warmth takes away my strength.\
name "Luka"
>Hyaaa!\
name ""
>Her flesh squirms and moves, as if she was chewing on my penis.@
>My waist shakes in surprise, as the fear of her hole actually eating my penis fills my body.\
name "Luka"
>Ahh... Don't eat it...\
name ""
name $name
>Hehehe... I'm not really eating it.@
>Didn't you hear me before?@
>I'll suck you dry, until you die.\
name ""
name "Luka"
>Don't do that either...@>H...Help me...\
name ""
>I struggle for my life, desperate to get away.\
name $name
>My, aren't you a sore loser?@
>Do you want me to roll you up more?\
name ""
cspl 690,699
lsp 700,":c;chara\tutigumo_h6.bmp",0,0:print 10,500
>Tsuchigumo sprays more spider silk from her mouth, covering me nearly head to toe in layers of sticky silk.\
name "Luka"
>Ahhh...\
name ""
>Not only is it sealing off my movements, but wherever the sticky silk touches, sparks of pleasure radiate out from.\
name $name
>I'll roll you up more as I squeeze out your semen...@
>By the time you're dry, you'll be completely cocooned.\
name ""
name "Luka"
>Haa... Ahhh!\
name ""
>As she wraps me up in silk, her vagina continues chewing on my penis.@
>Helpless under her assault, I can't hold off the desire to ejaculate any longer.\
name "Luka"
>Ahh... Coming... Coming...\
name ""
name $name
>Now come...@
>Release it all inside me.\
name ""
name "Luka"
>Ahhhh!!\
name ""
gosub *syasei1
lsp 700,":c;chara\tutigumo_h7.bmp",0,0
gosub *syasei2
>As her warm flesh chews and squirms around my penis, I come, exploding inside her.\
>As my penis spasms, her chewing motions only get more intense, sucking my semen deep into her as I shoot it out.\
name "Luka"
>Ahh... Stop...@
>I'm coming, so stop sucking...\
name ""
name $name
>Hehehe... But if I continue stimulating it, you'll ejaculate quicker.@
>You'll be dried out in no time...\
name ""
name "Luka"
>S...Sto... Hyaaa...\
name ""
gosub *syasei1:gosub *syasei2
>Before my first ejaculation has even finished, another orgasm already comes over me.@
>It's almost like my semen is being drawn out by force.\
>The sucking stimulation from her vagina doesn't stop, either.@
>Trembling, my body continues shooting off more semen into her.\
name "Luka"
>Hyaa!@>Stop... I'm going to die!\
name ""
>I use all of my strength in a desperate push to escape.@
>But with the spider silk all around me, I can barely even manage to squirm.\
>But even that tiny show of rebellion sets Tsuchigumo off.\
name $name
>Do you really want to be completely bound that badly?@
>Fine then...@> I'll treat you like the pitiful prey you are.\
name ""
name "Luka"
>Hyaaa!!\
name ""
mov %hseanwave,15:hseanwave
lsp 700,":c;chara\tutigumo_h8.bmp",0,0:print 10,500
>Tsuchigumo covers me with even more spider silk.@
>The sticky threads pull and rub against my flesh, sending more sparks of pleasure wherever they touch.\
>At the same time, her chewing motions on my penis keep torturing me with pleasure.\
name "Luka"
>Haa...\
name ""
gosub *syasei1
lsp 700,":c;chara\tutigumo_h9.bmp",0,0
gosub *syasei2
>Almost like being stuck in a continual orgasm, a third one blows through me.\
name "Luka"
>H...Help me... I'm going to die...\
name ""
>The forced consecutive ejaculations leave me incredibly weak.@
>Feeling drained of strength, my body goes limp as my vision slowly dims dark.\
name $name
>More... Shoot more into me...@
>Let it flow like blood from a mortal wound...\
name ""
name "Luka"
>He...lp...@
>Ah...\
name ""
gosub *syasei1:gosub *syasei2
>Semen continues to shoot helplessly into her.@
>Orgasm after orgasm, my power quickly flees from me.\
>A relaxing ecstasy fills the void in my body as my energy fades.\
name "Luka"
>Ah...aaa...\
name ""
>My life itself slowly fades away inside her wrap of spider silk.\
name $name
>The next ejaculation will finish you.@
>Hehehe... Give your life to me, and dry out...\
name ""
name "Luka"
>Ah...a...\
name ""
gosub *syasei1:gosub *syasei2
>With a final spurt, a few drops of semen leak out.@
>With that, my world goes dark.\
name "Luka"
>.............\
name ""
>With all my semen exhausted, I run out of energy.@
>Thus my journey ends as Tsuchigumo's prey...\
mov %hseanwave,0:hseanwave
gosub *anten
>.............\
goto *badend



*alakneload_start

mov $name,"Arachne Lord"
mov $name2,"Arachne Lord"
mov $lavel,"alakneload"
mov $tatie1,"alakneload_st01"
mov $tatie2,"alakneload_st02"
mov $tatie3,"alakneload_st03"
mov $tatie4,"alakneload_ha1"
mov $haikei,"bg193"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,20000
if %nanido=2 mov %max_enemylife,23000
if %nanido=3 mov %max_enemylife,26000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,1
mov %alice_skill1,60
mov %alice_skill2,60
mov %alice_skill3,60
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free from Arachne Lord!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Pathetic struggling... Just like an insect."
mov $mogaku_sel2,"Did you think you could escape from a spider's web?"
mov $mogaku_sel3,"There's no point struggling... Give up and become prey."
mov $mogaku_sel4,"The more you struggle, the more my web binds you..."
mov $mogaku_sel5,"No matter how much you struggle, you won't escape from my web..."
mov $mogaku_dassyutu1,"You escaped from my web...?"
mov $mogaku_dassyutu2,"Apparently you won't be my prey through normal means..."
mov $mogaku_dassyutu1,"You escaped from my web...?"
mov $mogaku_dassyutu2,"Apparently you won't be my prey through normal means..."
mov $half_s1,"It feels good, doesn't it?"
mov $half_s2,"Now let me suck your fresh semen..."
mov $kiki_s1,"Almost done?"
mov $kiki_s2,"I'll slurp up your male bodily fluids..."
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-230
mov %tukix,300
mov %owaza_count1a,6
mov %owaza_count3a,6
name $name
>After the hulking monster...@> A little boy and a little girl.@
>I've been fighting on an empty stomach for a while now...\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\alakneload_st01.bmp",200,0:print 10,500
name "Alice"
>Hmph...@>Sorry, but you still won't be eating anytime soon.@
>You're going to be sealed away!\
name ""
csp 701
gosub *face1
name $name
>Oh... So it's the brave little Hero and the sealed Monster Lord?@
>Isn't this just a fun sight to feast on!\
>I'll go full force, right from the start!\
name ""
dwave 1,"se\bun.ogg"
mov $haikei,"bg092"
bg "BG\bg092.bmp",99,1000,"system\lngtwave.dll/vwi"
>The space around us distorts, bringing us somewhere else!\
>When the distortion stops, we're in a gloomy cave, with webs all around.@
>Human corpses are hanging randomly throughout the web.\
name "Luka"
>You couldn't have...!\
name ""
name $name
>All of these dried corpses were alive a few hours ago.@
>Thirty or so Knights...@>Now just nutrients in my body.\
name ""
name "Luka"
>...I'll never forgive you!\
name ""
name $name
>Hehe... Since you'll be my prey, I won't give you a proper death.\
>You'll die covered in spider silk, sucked completely dry.@
>Now, let me hear what your last desire is...\
name ""
goto *common_main



*alakneload_v

gosub *face3
name $name
>No matter how strong you are...@
>You aren't a match for the Spider Princess...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Arachne Lord is sealed in the form of a spider!\
mov %viclose,1:gosub *victory
mov %getexp,200000:gosub *lvup
mov %2377,1
goto *sean0370



*alakneload_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>You want to become my prey?@
>Pathetic male...@> You willingly wish to be sucked dry?\
name ""
goto *alakneload_a



*alakneload_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *alakneload_kousan
if %cmd1=16 goto *alakneload_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *alakneload_main



*alakneload_a

if %kousoku=1 rnd2 %ransu,1,3
if %kousoku=1 && %ransu<3 gosub *alakneload_a5:goto *common_main
if %kousoku=1 && %ransu=3 && %owaza_count3b>3 && %enemy_wind=0 gosub *alakneload_a6:goto *common_main
if %kousoku=1 skip -3
rnd2 %ransu,1,7
if %ransu=1 gosub *alakneload_a1:goto *common_main
if %ransu=2 gosub *alakneload_a2:goto *common_main
if %ransu=3 gosub *alakneload_a3:goto *common_main
if %ransu<6 && %owaza_count1a>7 gosub *alakneload_a4:goto *common_main
if %ransu>5 && %owaza_count3a>7 && %enemy_wind=0 gosub *alakneload_el1:goto *common_main
skip -6



*alakneload_el1

add %stack,1
mov %owaza_count3a,0
name $name
>Come, Zylphe!\
name ""
skillname "Wind Spirit Summon"
mov %enemy_wind,6
mov %kaihi_el,50
dwave 2,"se\wind2.ogg"
lsp2 0,":a;chara\zylphe_st02.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *enemy_elm_print
>Arachne Lord summons a spirit of wind!\
skillname ""
sub %stack,1
return



*alakneload_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll indulge in your penis with my mouth..."
if %ransu=2 mov $sel1,"I'll cover it with my saliva..."
if %ransu=3 mov $sel1,"Finish in my mouth..."
name $name
eng $sel1:$sel6\
name ""
skillname "Arachne Fellatio"
dwave 1,"se\ero_buchu2.ogg"
>Arachne Lord sucks Luka's penis into her mouth!
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3954
mov %earth_keigen_el,70
if %nanido<2 damage 300,320
if %nanido=2 damage 340,360
if %nanido=3 damage 380,400
if %enemy_wind=0 skip 13
dwave 1,"se\ero_buchu2.ogg"
>Her tongue runs up and down Luka's shaft!
mov %earth_keigen_el,70
if %nanido<2 damage 300,320
if %nanido=2 damage 340,360
if %nanido=3 damage 380,400
dwave 1,"se\ero_buchu2.ogg"
>Like a vacuum, she sucks Luka's penis all the way into her throat!
mov %earth_keigen_el,70
if %nanido<2 damage 300,320
if %nanido=2 damage 340,360
if %nanido=3 damage 380,400
skillname ""
if %mylife=0 sub %stack,1:return *alakneload_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*alakneload_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Why are breasts on an insect monster? Why... To do this."
if %ransu=2 mov $sel1,"I'll make you come between my breasts..."
if %ransu=3 mov $sel1,"Isn't being squeezed between breasts bliss for a man?"
name $name
eng $sel1:$sel6\
name ""
skillname "Arachne Bust"
dwave 1,"se\ero_sigoki1.ogg"
>Arachne Lord slowly presses Luka's penis between her breasts!
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3955
mov %earth_keigen_el,70
if %nanido<2 damage 310,330
if %nanido=2 damage 350,370
if %nanido=3 damage 390,410
if %enemy_wind=0 skip 13
dwave 1,"se\ero_sigoki1.ogg"
>Putting more strength in, she tightens around Luka's penis!
mov %earth_keigen_el,70
if %nanido<2 damage 310,330
if %nanido=2 damage 350,370
if %nanido=3 damage 390,410
dwave 1,"se\ero_sigoki1.ogg"
>Raising and lowering her breasts, she uses them to massage his penis!
mov %earth_keigen_el,70
if %nanido<2 damage 310,330
if %nanido=2 damage 350,370
if %nanido=3 damage 390,410
skillname ""
if %mylife=0 sub %stack,1:return *alakneload_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*alakneload_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"If you stick it into my spinneret, it will feel incredible..."
if %ransu=2 mov $sel1,"My spinneret will squirm around your penis..."
if %ransu=3 mov $sel1,"Do you want to pour semen into my spinneret?"
name $name
eng $sel1:$sel6\
name ""
skillname "Arachne Spinneret"
dwave 1,"se\ero_buchu1.ogg"
>Arachne Lord forces Luka's penis into her silk filled spinneret!
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3956
mov %earth_keigen_el,70
if %nanido<2 damage 320,340
if %nanido=2 damage 360,380
if %nanido=3 damage 400,420
if %enemy_wind=0 skip 13
dwave 1,"se\ero_buchu1.ogg"
>Sticky spider silk coils around Luka's penis!
mov %earth_keigen_el,70
if %nanido<2 damage 320,340
if %nanido=2 damage 360,380
if %nanido=3 damage 400,420
dwave 1,"se\ero_buchu1.ogg"
>The silk squeezes Luka's penis inside her!
mov %earth_keigen_el,70
if %nanido<2 damage 320,340
if %nanido=2 damage 360,380
if %nanido=3 damage 400,420
skillname ""
if %mylife=0 sub %stack,1:return *alakneload_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*alakneload_a4

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 5
name $name
>I can make a new web in seconds...@
>I'll catch you like an insect!\
name ""
skillname "Arachne Web"
dwave 1,"se\ero_ito.ogg"
eng "Arachne Lord quickly creates a web around Luka!":$sel6/
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
@
>Luka gets entangled in her web!\
mov %kousoku,1:gosub *status_print
>Luka has been bound by Arachne Lord's web!\
skillname ""
name $name
if %first_sel1=1 skip 3
>Now you're just a poor bug in a web...@
skip 2
>You won't escape this time...@
>I'll take my time sucking you of your fluids...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,2
if %earth=0 && %nanido=2 mov %genmogaku,2
if %earth=0 && %nanido=3 mov %genmogaku,3
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
sub %stack,1
return



*alakneload_a5

add %stack,1
>Luka has been bound by Arachne Lord's web...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll squeeze it out by hand..."
if %ransu=2 mov $sel1,"How does it feel to be milked in a spider's web?"
if %ransu=3 mov $sel1,"I've made many men into prey like this..."
name $name
eng $sel1:$sel6\
name ""
skillname "Arachne Dibble"
dwave 1,"se\ero_koki1.ogg"
>Arachne Lord massages Luka's penis with her hands!
skillcount3 3957
mov %earth_keigen_el,70
if %nanido<2 damage 320,340
if %nanido=2 damage 360,380
if %nanido=3 damage 400,420
if %enemy_wind=0 skip 13
dwave 1,"se\ero_koki1.ogg"
>She uses her index and thumb finger to rub underneath the neck of his penis!
mov %earth_keigen_el,70
if %nanido<2 damage 320,340
if %nanido=2 damage 360,380
if %nanido=3 damage 400,420
dwave 1,"se\ero_koki1.ogg"
>She uses the palm of her hand to massage his tip!
mov %earth_keigen_el,70
if %nanido<2 damage 320,340
if %nanido=2 damage 360,380
if %nanido=3 damage 400,420
skillname ""
if %mylife=0 sub %stack,1:return *alakneload_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*alakneload_a6

add %stack,1
mov %owaza_count3b,0
if %kousan=2 skip 5
name $name
>Hehe... You look delicious.@
>I'll wrap up that penis of yours, too...\
name ""
skillname "Arachne Ruin"
dwave 1,"se\ero_ito.ogg"
eng "Arachne Lord shoots more spider silk onto Luka's groin!":$sel6/
rnd2 %ransu,0,99:if %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
@
>Luka's penis is completely wound in spider silk!
skillcount3 3958
mov %damage_kotei,1
damage 400,500
lsp 700,":a;chara\alakneload_ha6.bmp",0,0:print 10,500
skillname ""
if %mylife=0 sub %stack,1:return *alakneload_h5
name "Luka"
>Ahhh!\
name ""
name $name
>Look, your penis is wound in sticky silk.@
>Get a good taste of having your genitals played with...\
name ""
sub %stack,1
goto *alakneload_a7



*alakneload_a7

add %stack,1
>Luka is being raped by Arachne Lord...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"The proof of your manhood is wrapped in silk..."
if %ransu=2 mov $sel1,"Get a good taste of my sticky thread."
if %ransu=3 mov $sel1,"Coming like this would be truly pathetic..."
name $name
eng $sel1:$sel6\
name ""
skillname "Arachne Ruin"
dwave 1,"se\ero_ito.ogg"
>Arachne Lord threads more spider silk around Luka's penis!
skillcount3 3958
mov %damage_kotei,1
damage 200,250
dwave 1,"se\ero_koki1.ogg"
>She strokes his penis as she winds the spider silk around him even tighter!
mov %damage_kotei,1
damage 200,250
skillname ""
if %mylife=0 sub %stack,1:return *alakneload_h5
sub %stack,1
goto *alakneload_a7



*alakneload_onedari

mov $list1,"Arachne Fellatio"
if %3954>0 mov %list_num1,1
mov $list2,"Arachne Bust"
if %3955>0 mov %list_num2,1
mov $list3,"Arachne Spinneret"
if %3956>0 mov %list_num3,1
mov $list4,"Arachne Dibble"
if %3957>0 mov %list_num4,1
mov $list5,"Arachne Ruin"
if %3958>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *alakneload_onedari1
if %cmd1=12 goto *alakneload_onedari2
if %cmd1=13 goto *alakneload_onedari3
if %cmd1=14 goto *alakneload_onedari4
if %cmd1=15 goto *alakneload_onedari5
if %cmd1=-1 goto *alakneload_main
goto *alakneload_onedari



*alakneload_onedari1

gosub *onedari_syori
name $name
>Do you want to ejaculate inside my mouth?@
>Then let me see you struggle as you come...\
name ""
gosub *alakneload_el1
gosub *alakneload_a1
skip -1



*alakneload_onedari2

gosub *onedari_syori
name $name
>Do you want to ejaculate on my breasts?@
>Then let me see you struggle as you come...\
name ""
gosub *alakneload_el1
gosub *alakneload_a2
skip -1



*alakneload_onedari3

gosub *onedari_syori
name $name
>Do you want to ejaculate inside my spinneret?@
>Then let me see you struggle as you come...\
name ""
gosub *alakneload_el1
gosub *alakneload_a3
skip -1



*alakneload_onedari4

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>Do you want to be caught in my web, and milked?@
>Then let me see you struggle as you come...\
name ""
gosub *alakneload_el1
if %kousoku=0 gosub *alakneload_a4
gosub *alakneload_a5
skip -1



*alakneload_onedari5

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>Do you want to be caught in my web, and have your penis toyed with by my silk?@
>Then let me see you struggle as you come...\
name ""
if %kousoku=0 gosub *alakneload_a4
gosub *alakneload_a6
skip -1



*alakneload_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\alakneload_bk01.bmp",0,0
gosub *syasei2
>As Arachne Lord sucks on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2677,%2677+1:if %2677=1 mov %count_koenemy,%count_koenemy+1
if %2677>%count_most mov %count_most,%2677:mov $count_mostname,$name
count 4,3
mov $bad1,"Arachne Lord forced Luka to come with her mouth."
gosub *face2
name $name
>Hehe... That's the first one.@
>It's so easy to milk semen from men...\
name ""
goto *alakneload_ha



*alakneload_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\alakneload_bk02.bmp",0,0
gosub *syasei2
>As Arachne Lord squeezes Luka's penis between her breasts, he comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2677,%2677+1:if %2677=1 mov %count_koenemy,%count_koenemy+1
if %2677>%count_most mov %count_most,%2677:mov $count_mostname,$name
count 7,3
mov $bad1,"Arachne Lord forced Luka to come with her breasts."
gosub *face2
name $name
>Hehe... That's the first one.@
>It's so easy to milk semen from men...\
name ""
goto *alakneload_ha



*alakneload_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\alakneload_bk04.bmp",0,0
gosub *syasei2
>As Arachne Lord's spinneret stimulates Luka's penis, he comes, shooting his semen inside her.\
mov %viclose,1:gosub *lose
mov %2677,%2677+1:if %2677=1 mov %count_koenemy,%count_koenemy+1
if %2677>%count_most mov %count_most,%2677:mov $count_mostname,$name
count 2,3
mov $bad1,"Arachne Lord forced Luka to come with her spinneret."
gosub *face2
name $name
>Hehe... That's the first one.@
>It's so easy to milk semen from men...\
name ""
goto *alakneload_ha



*alakneload_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\alakneload_ha2.bmp",0,0
gosub *syasei2
>As Arachne Lord strokes Luka, bound in her web, he comes, shooting his semen all over her palm.\
mov %viclose,1:gosub *lose2
lsp 700,":a;chara\alakneload_ha3.bmp",0,0:print 10,500
name "Luka"
>Ahh...\
name ""
name $name
>With that, you're finished...@
>How pitiful... You were satisfied simply by my hand?\
>If you had endured a little longer, I could have done something even better.@
>...Do you still want that to happen?\
name ""
name "Luka"
>N...No...!\
name ""
name $name
>My spider silk gives pleasure to whatever it's threaded around.\
>I'm sure you've already noticed the sensation, already being in my web.\
>What if you felt it on your penis, too?@
>The feeling of my sticky spider silk, threaded around it...\
name ""
name "Luka"
>...........\
name ""
>I don't want to admit it, but the spider silk does feel good...@
>What would it feel like around my penis...?\
name $name
>Hehehe... So you want to taste it?@
>Then let me thread it around your penis...\
name ""
skillcount3 3957
skillname "Arachne Dibble"
dwave 1,"se\ero_ito.ogg"
lsp 700,":a;chara\alakneload_ha4.bmp",0,0:print 10,500
>Arachne Lord shoots spider silk from her mouth onto Luka's penis!
mov %damage_kotei,1
damage 320,340
dwave 1,"se\ero_koki1.ogg"
>The sticky silk wraps around Luka's penis!
mov %damage_kotei,1
damage 320,340
skillname ""
name "Luka"
>Ahhh!!\
name ""
>Without even fighting it, I let the spider silk coil around my penis as she shoots it out of her mouth.\
name $name
>Hehehe... You're not struggling anymore.@
>Are you indulging in the pleasure of being my prey?\
name ""
skillcount3 3957
skillname "Arachne Dibble"
dwave 1,"se\ero_koki1.ogg"
>Arachne Lord uses her palm to thread more silk around Luka's penis!
mov %damage_kotei,1
damage 320,340
dwave 1,"se\ero_koki1.ogg"
>The spider silk slowly coils tighter around his penis!
mov %damage_kotei,1
damage 320,340
skillname ""
name "Luka"
>T...This... I'm going to come...!\
name ""
name $name
>Do you like the sticky feeling?@
>Or perhaps the tightness?\
name ""
skillcount3 3957
skillname "Arachne Dibble"
dwave 1,"se\ero_koki1.ogg"
>Arachne Lord squeezes Luka's silk covered penis!
mov %damage_kotei,1
damage 320,340
dwave 1,"se\ero_koki1.ogg"
>His entire penis is cocooned in spider silk!
mov %damage_kotei,1
damage 320,340
skillname ""
name "Luka"
>T...Too good...!@> Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\alakneload_ha5.bmp",0,0
gosub *syasei2
>As the spider silk squeezes his cocooned penis, Luka comes, his semen mixing with the silk.\
count 5,4
mov $bad1,"Arachne Lord forced Luka to come as she covered his penis with silk."
goto *alakneload_h5b



*alakneload_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\alakneload_ha7.bmp",0,0
gosub *syasei2
>As the sticky thread coils around Luka's penis, he comes, mixing his semen with the spider silk.\
mov %viclose,1:gosub *lose2
count 20,4
mov $bad1,"Arachne Lord forced Luka to come with her spider silk."
goto *alakneload_h5b



*alakneload_h5b

name $name
>Hehehe... How does it feel to come while covered in spider silk?@
>I'll give you an even better taste, too.\
>Your penis is just prey to my silk...\
name ""
skillcount3 3958
skillname "Arachne Ruin"
dwave 1,"se\ero_koki1.ogg"
lsp 700,":a;chara\alakneload_ha8.bmp",0,0:print 10,500
>More silk shoots out, covering Luka's penis!
mov %damage_kotei,1
damage 200,250
dwave 1,"se\ero_koki1.ogg"
>Layer after layer of spider silk cocoons Luka's penis!
mov %damage_kotei,1
damage 200,250
skillname ""
name "Luka"
>Hyaa!@
>It's so sticky and tight...\
name ""
name $name
>Hehehe... Your symbol of manhood is being wrapped up...\
name ""
skillcount3 3958
skillname "Arachne Ruin"
dwave 1,"se\ero_koki1.ogg"
>The silk around Luka's penis tightens!
mov %damage_kotei,1
damage 200,250
dwave 1,"se\ero_koki1.ogg"
>The sweet feeling of pressure increases!
mov %damage_kotei,1
damage 200,250
skillname ""
name "Luka"
>I can't take it...@
>I'm going to come again...!\
name ""
name $name
>Then finish...@
>Finish while being wrapped up.\
name ""
skillcount3 3958
skillname "Arachne Ruin"
dwave 1,"se\ero_koki1.ogg"
>The sticky spider silk squeezes Luka's penis!
mov %damage_kotei,1
damage 200,250
dwave 1,"se\ero_koki1.ogg"
>The sticky feeling attacks Luka!
mov %damage_kotei,1
damage 200,250
skillname ""
name "Luka"
>Ahh... Too good...!\
name ""
gosub *syasei1:gosub *syasei2
>Luka comes, his semen squirting through the layers of spider silk, barely able to leak out.\
name $name
>Hehe... You leaked out quite a lot.@
>Does my spider silk feel better than mating with an actual female?\
name ""
name "Luka"
>Haa...\
name ""
gosub *clear_sprite
gosub *setwindow_01p
>Weakened by my repeated orgasms, my body goes limp as exhaustion takes me over.\
mov %battle,0
mov %hsean,1
mov %2677,%2677+1:if %2677=1 mov %count_koenemy,%count_koenemy+1
if %2677>%count_most mov %count_most,%2677:mov $count_mostname,$name
goto *alakneload_hb



*alakneload_ha

mov $bad2,"Caught in her spiderweb, Luka's semen was feasted on endlessly."
if %2849=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2849,1
name "Luka"
>Ahhh...\
name ""
name $name
>Now to prey on you...@
>I'm going to completely draw out your semen, so prepare yourself...\
name ""
>Turning around, she starts spraying spider silk all over me, skillfully encasing my body in her webbing.\
>In only seconds, I'm left completely unable to move.@
>Like that, she slowly walks up to me.\
name $name
>I'm going to stick your penis into me, and squeeze out your semen.\
>But which hole do you want?@
>My mouth? My abdomen?@>Or... Here?\
name ""
>With a wet noise, holes open up from the Arachne's nipples, spitting out tiny strands of webbing.@
>It looks just like she was shooting milk from her breasts...\
name $name
>I can spin thread from my nipples...@
>With these breasts, I'll squeeze your semen dry.\
name ""
name "Luka"
>S...Stop this...\
name ""
mov %hseanwave,15:hseanwave
cspl 690,699
lsp 700,":a;chara\alakneload_hc1.bmp",0,0:print 10,500
>The Arachne grabs my erect penis, and pushes it to her chest.@
>The feel of her nipple against the tip of my penis almost feels ticklish at first.\
>The soft touch of her breasts themselves flow through my body, filling me with her touch.\
name "Luka"
>Ahhh...\
name ""
name $name
>Hehe... It feels good, doesn't it?@
>Human men are so pitiful...@>They become helpless, just by touching their genitals a little bit.\
name ""
lsp 690,":a;chara\alakneload_ct01.bmp",0,0:print 10,500
>She starts moving her hand a little faster, rubbing my penis against her breasts.@
>Each time her nipples flick over my penis, a surge of pleasure races through my body.\
>At the same time, sticky threads are still leaking from her nipples, covering my glans with each pass.\
>Within a few moments, I'm left unable to endure it any longer.\
name "Luka"
>Ah... I'm going to come...\
name ""
name $name
>I haven't even put it in yet... How pitiful.@
>Go ahead and come on my chest, then.\
name ""
>Not stopping her movements, she keeps rubbing my penis against her nipples.@
>As the sticky web pulls at my glans, my body relaxes as I go over the edge.\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\alakneload_hc2.bmp",0,0
lsp 690,":a;chara\alakneload_ct02.bmp",0,0
gosub *syasei2
>With a few spurts, my semen shoots out onto her chest, covering her breasts in my white semen.@
>I relax with a sigh after my ejaculation, the release making it feel like I could melt away.\
>With my mouth hanging half open, I let the pleasure drift through me.\
name $name
>You can't be tired out already, before I put it in!@>You can't be that pathetic.@
>Now, come directly inside me...\
name ""
name "Luka"
>Stop... Stop... Ahhh...\
name ""
mov %hseanwave,16:hseanwave
lsp 690,":a;chara\alakneload_ct03.bmp",0,0:print 10,500
>Her nipple opens up again, slowly swallowing my penis.@
>With the Arachne guiding me into her, my penis is deep inside her breast in a few seconds.\
name $name
>Hehe... Your penis was swallowed by my nipple spinneret.@
>How does it feel?\
name ""
name "Luka"
>Ahh... It feels sticky... And so good...\
name ""
>I can feel the sticky webbing inside her breasts moving around my penis, as if I was inside a living mixer.\
>As soon as I was forced inside her, the spinning has slowly been getting faster, feeling far more intense than any sort of normal sex.\
name $name
>Now come inside my nipple spinnerette...@
>Show me your face when it makes you come.\
name ""
name "Luka"
>Haaa... No...\
name ""
>The sticky webbing rolls up my penis inside her as it rotates around, causing my body to tremble.@
>Bound by her other webbing, I can't even try to escape, either.\
>I can't endure this any longer...@
>Giving up, I give in to the rising desire to ejaculate.\
name "Luka"
>Ah...!@> Coming!\
name ""
name $name
>Hehe... Good, come.@
>Pour your milk into me.\
name ""
name "Luka"
>Ahhh!!\
name ""
gosub *syasei1
lsp 700,":a;chara\alakneload_hc3.bmp",0,0
lsp 690,":a;chara\alakneload_ct04.bmp",0,0
gosub *syasei2
>My semen explodes into her breast, as if being squeezed out by a mixer.@
>As the pleasure washes over me, a wave of weakness hits me, making it feel like my soul itself is leaking out into her breasts.\
name "Luka"
>Haa...\
name ""
name $name
>Did it feel good giving your seed to an organ that has no use for reproduction?@
>Such a pitiful creature... Mating with whatever makes you feel good.\
name ""
>The rotating thread inside her breasts keeps mixing, stimulating my already too sensitive penis.\
>The intense stimulation barely lets me get out a moan before paralyzing me with more pleasure.\
name "Luka"
>S...Stop... Hyaa!\
name ""
>I try to pull my penis out of her breast, but the webbing just makes me bounce right back in.@
>I can't do anything but just accept whatever she does to me...\
>And all too fast, I feel another climax coming.\
name "Luka"
>Ahh... Coming again...\
name ""
name $name
>Haha... Are you so happy to give your semen to something that isn't a vagina?@
>All you're doing is feeding me, you pitiful male...\
name ""
name "Luka"
>Ahh...\
name ""
gosub *syasei1
lsp 690,":a;chara\alakneload_ct05.bmp",0,0
gosub *syasei2
>While trembling, I spurt out more semen into her breasts.@
>The sense of humiliation and defeat mixes together with the incredible ecstasy of orgasm.\
name "Luka"
>Haa...\
name ""
name $name
>Your semen tastes better than any other man's...@
>It would be such a shame to squeeze you to death here.\
>Alright.@> I'll keep you here.@
>Aren't you happy? I won't take your life away.\
name ""
>Even as she speaks, the incredible mixing movements don't stop.@
>My waist shakes in tormenting pleasure as the next orgasm slowly builds.\
name $name
>You will never return to the outside world again.@
>You will just continue feeding me your semen, trapped in my webbing.\
>But you don't mind, do you?@
>Because you can come in here as much as you like...\
name ""
name "Luka"
>Ahhhh!!!\
name ""
gosub *syasei1:gosub *syasei2
>Instead of a reply, I can only come inside her breast again.@
>Stuck in this web, I'll be forced to continually come inside her...\
>Never allowed outside, and kept as a simple pet for the rest of my life.@
>Realizing I'll be a sex slave until my death, I fall into despair.\
mov %hseanwave,0:hseanwave
gosub *anten
>.................\
goto *badend



*alakneload_hb

mov $bad2,"Luka was raped until his death."
if %2850=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2850,1
name $name
>Hehe... You can't resist any longer, can you.@
>I was going to squeeze out all of your semen now, but...\
>Which hole do you want me to use?@
>My mouth?@>My vagina?@> My nipples?@> My spinneret?@> There are a lot of usable holes...\
name ""
name "Luka"
>I don't want... Any...\
name ""
name $name
>If you don't have a preference...@>Then I'll use my vagina.@
>I'm sure a man would want to at least mate before he dies.\
name ""
cspl 690,699
lsp 700,":a;chara\alakneload_hb1.bmp",0,0:print 10,500
>Left helpless, I can't stop the Arachne as she bends over my helpless body.\
>Her ugly spider feet lock around my back, and pull me to her soft female body.\
name $name
>I'll bring your penis into my spider vagina, and squeeze your semen out until you die.@
>Enjoy the last of your life mating as much as you can.\
name ""
name "Luka"
>Hyaa... Stop...!\
name ""
mov %hseanwave,12:hseanwave
lsp 700,":a;chara\alakneload_hb2.bmp",0,0:print 10,500
>With that, she pulls me closer to her, forcing my penis into the small open hole on her abdomen.\
name "Luka"
>Ha... Ah...\
name ""
>The moment I'm inside her, my body goes limp.@
>The warm feeling of her vagina fills me, feeling incredible to the touch.\
>Tiny folds and bumps inside her squirm and rub against my penis as she takes me inside her.\
>Deep inside her, tiny little strands stroke and tickle my glans.@
>Being inside her is enough to make me stop struggling right away.\
name $name
>Hehe... How does it feel to be raped by a spider's vagina?\
>I've raped so many with this...@
>But they all dry out in only a few minutes.\
name ""
name "Luka"
>Ah... Haa...\
name ""
>The horror at mating with a spider's vagina rocks through me.@
>Not only that, but this will continue until my death...?\
>But through it all, the intense ecstasy fills my body with pleasure.@
>I tremble in her embrace, helpless to stop this rape.\
name "Luka"
>Ah...!\
name ""
gosub *syasei1
lsp 700,":a;chara\alakneload_hb3.bmp",0,0
gosub *syasei2
>And in no time at all, my penis pulses as I reach an orgasm inside her.\
name "Luka"
>Haa...\
name ""
name $name
>Hehehe... Did you already release?@
>At this rate, you won't even last a couple minutes...\
name ""
>The sense of immorality at having come inside a non human vagina fills me.@
>And the fear... The fear of being raped to death.\
>But I can only tremble in her embrace, her inhuman vagina forcing pleasure into me against my will.\
name "Luka"
>Ahhh!!!\
name ""
mov %hseanwave,13:hseanwave
>Her vaginal walls squirm and wriggle as if they were their own creature.@
>The close contact feels like an intense massage on my penis.\
>And the tiny bumps and folds... Each move back and forth, up and down, rubbing me all over with their own will.\
>As they rub, stroke and lick me, I feel my body trembling as another orgasm comes on.\
name "Luka"
>Haa... Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\alakneload_hb4.bmp",0,0
gosub *syasei2
>With that, I'm led to another all too quick ejaculation.@
>The weakness from it hits me at the same time as the pleasure.\
>Each time I come inside her, I feel a large amount of energy drained from me.@
>At this rate, I really will die in a few more minutes...\
name "Luka"
>Stop... Help me...\
name ""
name $name
>You think you can escape now?@
>Besides, isn't it every man's dream to die while mating?\
>Here, I'll make you feel better with my vagina...@
>Spit out your semen as you give me your life.\
name ""
name "Luka"
>Haa...!@>Ahhh!\
name ""
>The movements of her vagina get even more intense, breaking down all my resistance.@
>Despite mating with something inhuman, my body rejoices in pleasure.\
gosub *syasei1
lsp 700,":a;chara\alakneload_hb5.bmp",0,0
gosub *syasei2
>And in no time, a third ejaculation rocks my body.@
>My penis pulses as even more semen is spurted into her spider vagina.\
name "Luka"
>Ha... Ah...\
name ""
name $name
>You've gotten quite weak...@
>But you're still alive.@>You're tough for prey.\
name ""
name "Luka"
>Ahhh!!\
name ""
>The folds inside her vagina rub hard against my glans... A nightmarish stimulation designed to take my life.\
>But despite my will, my body rejoices in it, my penis happily succumbing to the pleasure.\
gosub *syasei1:gosub *syasei2
>Along with a feeling of intense weakness, I reach another climax.\
name "Luka"
>Ah...\
name ""
>It's almost like my penis itself is broken... The slightest stimulation is enough to set me off.\
>I can barely even breathe any more.@
>One more ejaculation, and I'll be dead...\
name $name
>Are you at your end, then?@
>How does it feel to meet the end of your life while mating?\
>Now, give me your last...\
name ""
name "Luka"
>Ahhh...\
name ""
>Her vagina suddenly contracts, causing her bumps to rub extra hard against my glans.@
>The inhuman vagina attacks me with intense pleasure, bringing about my finish.\
mov %hseanwave,0:hseanwave
gosub *syasei1:gosub *syasei2
>Along with my semen, my life itself slowly leaks out from me.@
>The lingering pleasure of orgasm fades as my consciousness does.\
name "Luka"
>.................\
name ""
>With that, my eyes close in the Arachne's embrace.@
>Tasting pleasure while mating with her, until my end...\
gosub *anten
name $name
>Hehe... Thanks for the treat.@
>Your semen was delicious...\
name ""
>Holding the dead boy's body, the Arachne laughs with pleasure.\
>...........\
goto *badend



*kumonomiko_start

mov $name,"Spider Princess"
mov $name2,"Spider Princess"
mov $lavel,"kumonomiko"
mov $tatie1,"kumonomiko_st11"
mov $tatie2,"kumonomiko_st12"
mov $tatie3,"kumonomiko_st13"
mov $tatie4,"kumonomiko_ha1"
mov $haikei,"bg105"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,23000
if %nanido=2 mov %max_enemylife,27000
if %nanido=3 mov %max_enemylife,31000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,1
mov %alice_skill1,0
mov %alice_skill2,50
mov %alice_skill3,50
mov %music,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Did you think you could escape from my web?"
mov $mogaku_sel2,"No insect can escape, no matter how much they struggle..."
mov $mogaku_sel3,"Just like an insect..."
mov $mogaku_sel4,"Hehe... You look pitiful."
mov $mogaku_sel5,"Look at you, struggling like that... Hehe, how interesting."
mov $mogaku_dassyutu1,"You escaped from my web..."
mov $mogaku_dassyutu2,"It appears the title of Hero is no falsehood."
mov $mogaku_earth_dassyutu1,"You escaped from my web..."
mov $mogaku_earth_dassyutu2,"It appears the title of Hero is no falsehood."
mov $half_s1,"Hehe, are you feeling good?"
mov $half_s2,"Now just become my prey..."
mov $kiki_s1,"Are you almost done? Hehe."
mov $kiki_s2,"I'll suck all of your juices dry..."
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-500
mov %tukix,300
mov %owaza_count1a,3
mov %owaza_count2a,3
mov %owaza_count3a,7
name $name
>Haha... Keep on prattling.@
>I'll suck your bodily fluids dry like everyone else...\
name ""
dwave 1,"se\bun.ogg"
mov $haikei,"bg092"
bg "BG\bg092.bmp",99,1000,"system\lngtwave.dll/vwi"
>The atmosphere around us warps, as the Spider Princess puts up another barrier like the others.\
>As if a reflection of her heart itself, she takes us to a dark, damp place.\
name $name
>Disgraced Hero...@
>I'll swallow you whole inside my vagina.\
>After that, I'll completely devour you.\
name ""
name "Luka"
>I won't let you damage Grangold any more!@
>I'll defeat you, and save the Grangold King and the Queen Ant!\
name ""
name $name
>Humans are always boasting of things they can't do...@
>But I like that energy you have.\
>As a small show of respect for that, I'll rape you before I devour you.@
>You'll cry out in pleasure soon enough.\
>Be happy... For you will taste heaven before hell.\
name ""
goto *common_main



*kumonomiko_v

gosub *face3
name $name
>This can't be...@
>How could my ambition end here!?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Spider Princess was sealed in the form of a spider!\
mov %viclose,1:gosub *victory
mov %getexp,230000:gosub *lvup
mov %2379,1
goto *sean0371



*kumonomiko_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>You know what it means to give up resistance in front of me, don't you?\
>Whether or not you regret this, you'll be screaming soon...\
name ""
goto *kumonomiko_a



*kumonomiko_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *kumonomiko_kousan
if %cmd1=16 goto *kumonomiko_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *kumonomiko_main



*kumonomiko_a

if %kousoku=1 rnd2 %ransu,1,2
if %kousoku=1 && %ransu=1 gosub *kumonomiko_a5:goto *common_main
if %kousoku=1 && %ransu=2 gosub *kumonomiko_a6:goto *common_main
rnd2 %ransu,1,10
if %ransu<6 gosub *kumonomiko_a1:goto *common_main
if %ransu=6 && %owaza_count2a>4 && %status=0 gosub *kumonomiko_a2:goto *common_main
if %ransu=7 && %owaza_count2a>4 && %status=0 gosub *kumonomiko_a3:goto *common_main
if %ransu=8 && %owaza_count1a>4 && %enemy_fire=0 gosub *kumonomiko_a4:goto *common_main
if %ransu>8 && %owaza_count3a>8 && %enemy_fire=0 gosub *kumonomiko_el4:goto *common_main
skip -6



*kumonomiko_el4

add %stack,1
mov %owaza_count3a,0
name $name
>Come, Gigamander!\
name ""
skillname "Fire Spirit Summon"
mov %enemy_fire,6
dwave 2,"se\fire2.ogg"
lsp2 0,":a;chara\gigamander_st01.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *enemy_elm_print
>Spider Princess summons a spirit of fire!\
skillname ""
sub %stack,1
return



*kumonomiko_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll show you some love with my foot..."
if %ransu=2 mov $sel1,"I'll feel your thing with my feet."
if %ransu=3 mov $sel1,"Finish off in my caress..."
name $name
eng $sel1:$sel6\
name ""
skillname "Arachne Thread"
dwave 1,"se\umaru.ogg"
>The Spider Princess uses her foot to stroke Luka's penis!
if %daten>0 goto *skill22x
if %enemy_fire=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %enemy_fire>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3959
if %nanido<2 damage 150,180
if %nanido=2 damage 170,200
if %nanido=3 damage 190,220
dwave 1,"se\ero_koki1.ogg"
>She presses his penis between two of her spider leg tips!
if %nanido<2 damage 150,180
if %nanido=2 damage 170,200
if %nanido=3 damage 190,220
if %enemy_fire=0 skip 16
dwave 1,"se\umaru.ogg"
>Feet rub his penis from every side!
if %nanido<2 damage 150,180
if %nanido=2 damage 170,200
if %nanido=3 damage 190,220
dwave 1,"se\ero_koki1.ogg"
>Her soft tips rub hard against Luka's penis!
if %nanido<2 damage 150,180
if %nanido=2 damage 170,200
if %nanido=3 damage 190,220
dwave 1,"se\ero_koki1.ogg"
>She uses her feet to milk his penis!
if %nanido<2 damage 150,180
if %nanido=2 damage 170,200
if %nanido=3 damage 190,220
skillname ""
if %mylife=0 sub %stack,1:return *kumonomiko_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kumonomiko_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck you away..."
if %ransu=2 mov $sel1,"Any man I suck instantly gets weak..."
if %ransu=3 mov $sel1,"Slip into a dream of ecstasy..."
name $name
eng $sel1:$sel6\
name ""
skillname "Ecstasy Blow"
dwave 1,"se\ero_buchu2.ogg"
eng "The Spider Princess sucks hard on Luka's penis!":$sel6/
if %daten>0 goto *skill22x
if %enemy_fire=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %enemy_fire>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount3 3960
>A sweet sensation of pleasure slowly fills Luka's body...
if %nanido<2 damage 300,330
if %nanido=2 damage 340,370
if %nanido=3 damage 380,410
if %status=0 mov $sel1,"Luka has been immersed in ecstasy!"
if %status=1 mov $sel1,"Luka has been immersed in ecstasy..."
mov %status,1:gosub *status_print
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *kumonomiko_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
rnd2 %status_turn,1,2
if %nanido=2 rnd2 %status_turn,1,2
if %nanido=3 rnd2 %status_turn,2,3
sub %stack,1
return



*kumonomiko_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"The poison from my breasts can paralyze men..."
if %ransu=2 mov $sel1,"Haha... Taste some of my milk..."
if %ransu=3 mov $sel1,"You'll go numb between my breasts!"
name $name
eng $sel1:$sel6\
name ""
skillname "Poison Breasts"
eng "Poison bleeds out from the Spider Princess' breasts!":$sel6/
if %daten>0 goto *skill22x
if %enemy_fire=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %enemy_fire>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount3 3961
dwave 1,"se\ero_sigoki1.ogg"
>Luka's penis is sandwiched between her poison covered breasts!
if %nanido<2 damage 300,330
if %nanido=2 damage 340,370
if %nanido=3 damage 380,410
if %status=0 mov $sel1,"Luka has been paralyzed!"
if %status=2 mov $sel1,"Luka has been paralyzed..."
mov %status,2:gosub *status_print
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *kumonomiko_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
rnd2 %status_turn,1,2
if %nanido=2 rnd2 %status_turn,2,3
if %nanido=3 rnd2 %status_turn,2,3
sub %stack,1
return



*kumonomiko_a4

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 4
name $name
>I'll wind you up like an insect...\
name ""
skillname "Thread Hold"
dwave 1,"se\ero_ito.ogg"
eng "The Spider Princess sprays spider silk from her spinneret!":$sel6/
if %daten>0 goto *skill22x
if %enemy_fire=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %enemy_fire>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<60 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
mov $tatie4,"kumonomiko_ha1"
mov %kousoku,1:gosub *status_print
>Luka has been bound in webbing!\
skillname ""
name $name
if %first_sel1=1 skip 3
>Hehe... Another prey captured.@
skip 2
>Hehe... This time, I'll prey on you.@
>Now to enjoy you nice and slowly...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,2
if %earth=0 && %nanido=2 mov %genmogaku,2
if %earth=0 && %nanido=3 mov %genmogaku,3
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,1
sub %stack,1
return



*kumonomiko_a5

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll wrap up that energetic penis of yours, too..."
if %ransu=2 mov $sel1,"Your penis will be wrapped up, too..."
if %ransu=3 mov $sel1,"Shoot it out as I wrap it up..."
name $name
eng $sel1:$sel6\
name ""
skillname "Rust Thread"
dwave 1,"se\ero_ito.ogg"
mov $tatie4,"kumonomiko_ha3"
if %kousan<2 lsp 700,":a;chara\kumonomiko_ha2.bmp",0,0:print 10,500
lsp 700,":a;chara\kumonomiko_ha3.bmp",0,0:print 10,500
>The Spider Princess sprays more spider silk onto Luka's penis!\
dwave 1,"se\ero_koki1.ogg"
>The webbing around his penis gets tighter!
skillcount3 3962
if %nanido<2 damage 140,160
if %nanido=2 damage 150,170
if %nanido=3 damage 160,180
dwave 1,"se\ero_koki1.ogg"
>The silk rubs against his penis!
if %nanido<2 damage 140,160
if %nanido=2 damage 150,170
if %nanido=3 damage 160,180
dwave 1,"se\ero_koki1.ogg"
>The sticky silk pulls on Luka's penis, stimulating him!
if %nanido<2 damage 140,160
if %nanido=2 damage 150,170
if %nanido=3 damage 160,180
skillname ""
if %mylife=0 sub %stack,1:return *kumonomiko_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*kumonomiko_a6

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 5
name $name
>Hehe... It's about time to really devour you.@
>First, I'll swallow up your semen with my female mouth...\
name ""
skillname "Arachne Repro"
>The Spider Princess hugs Luka close, bringing his penis next to her vagina!\
dwave 1,"se\ero_pyu1.ogg"
mov $tatie4,"kumonomiko_hb01"
lsp 700,":a;chara\kumonomiko_hb01.bmp",0,0
lsp 690,":a;chara\kumonomiko_ct01.bmp",0,0:print 10,500
lsp 690,":a;chara\kumonomiko_ct02.bmp",0,0:print 10,500
>With one push, she forces Luka deep into her warm vagina!
skillcount3 3963
mov %damage_kotei,1
damage 500,600
mov %kousoku,2:gosub *status_print
>Luka is being raped by the Spider Princess!\
skillname ""
if %mylife=0 sub %stack,1:return *kumonomiko_h5
name "Luka"
>Ahhh!!\
name ""
sub %stack,1
goto *kumonomiko_a7



*kumonomiko_a7

add %stack,1
>Luka is being raped by the Spider Princess...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Come inside me...":mov $sel2,"The wavy walls of the Spider Princess' vagina stimulate Luka!"
if %ransu=2 mov $sel1,"Give up all of your juices to me.":mov $sel2,"Luka's penis is pulled deeper inside the Spider Princess!"
if %ransu=3 mov $sel1,"You'll spit it out if I rub it, won't you?":mov $sel2,"The Spider Princess' vaginal walls rub against Luka's penis!"
if %ransu=4 mov $sel1,"When you can't endure it, just inseminate me...":mov $sel2,"The Spider Princess' vaginal walls move side to side!"
if %ransu=5 mov $sel1,"Do you like it tight? Or massaged?":mov $sel2,"The Spider Princess alternates between squeezing and rubbing Luka's penis with her vaginal walls!"
name $name
eng $sel1:$sel6\
name ""
skillname "Arachne Repro"
dwave 1,"se\ero_chupa4.ogg"
lsp 700,":a;chara\kumonomiko_hb02.bmp",0,0
lsp 690,":a;chara\kumonomiko_ct03.bmp",0,0:print 10,500
eng $sel2:$sel6
skillcount3 3963
mov %damage_kotei,1
damage 500,600
skillname ""
if %mylife=0 sub %stack,1:return *kumonomiko_h6
sub %stack,1
goto *kumonomiko_a7



*kumonomiko_onedari

mov $list1,"Arachne Thread"
if %3959>0 mov %list_num1,1
mov $list2,"Ecstasy Blow"
if %3960>0 mov %list_num2,1
mov $list3,"Poison Breasts"
if %3961>0 mov %list_num3,1
mov $list4,"Rust Thread"
if %3962>0 mov %list_num4,1
mov $list5,"Arachne Repro"
if %3963>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *kumonomiko_onedari1
if %cmd1=12 goto *kumonomiko_onedari2
if %cmd1=13 goto *kumonomiko_onedari3
if %cmd1=14 goto *kumonomiko_onedari4
if %cmd1=15 goto *kumonomiko_onedari5
if %cmd1=-1 goto *kumonomiko_main
goto *kumonomiko_onedari



*kumonomiko_onedari1

gosub *onedari_syori
name $name
>Hehe... You want to finish by my feet?@
>Then present your dirty genitals to me.\
name ""
gosub *kumonomiko_el4
gosub *kumonomiko_a1
skip -1



*kumonomiko_onedari2

gosub *onedari_syori
name $name
>Hehe... You want to finish by my mouth?@
>Then present your dirty genitals to me.\
name ""
gosub *kumonomiko_a2
skip -1



*kumonomiko_onedari3

gosub *onedari_syori
name $name
>Hehe... You want to finish by my breasts?@
>Then present your dirty genitals to me.\
name ""
gosub *kumonomiko_a3
skip -1



*kumonomiko_onedari4

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>Hehe... You want to finish by my webbing?@
>Then present your dirty genitals to me.\
name ""
if %kousoku=0 gosub *kumonomiko_a4
gosub *kumonomiko_a5
skip -1



*kumonomiko_onedari5

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>Hehe... You want me to rape you?@
>Then present your dirty genitals to me.\
name ""
if %kousoku=0 gosub *kumonomiko_a4
gosub *kumonomiko_a6
skip -1



*kumonomiko_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\kumonomiko_bk04.bmp",0,0
lsp 695,":a;chara\kumonomiko_bk05.bmp",0,0
gosub *syasei2
>As the Spider Princess' relentless feet rub Luka's penis, he comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2679,%2679+1:if %2679=1 mov %count_koenemy,%count_koenemy+1
if %2679>%count_most mov %count_most,%2679:mov $count_mostname,$name
count 5,11
mov $bad1,"The Spider Princess forced Luka to come with her feet."
gosub *face2
name $name
>Good... Devote all of your semen to me.@
>If you work hard as a man, I'll show you a world of pleasure...\
name ""
goto *kumonomiko_h



*kumonomiko_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\kumonomiko_bk01.bmp",0,0
gosub *syasei2
>As the sweet pleasure of the Spider Princess' blowjob flows through Luka, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2679,%2679+1:if %2679=1 mov %count_koenemy,%count_koenemy+1
if %2679>%count_most mov %count_most,%2679:mov $count_mostname,$name
count 4,11
mov $bad1,"The Spider Princess forced Luka to come with her mouth."
gosub *face2
name $name
>Good... Devote all of your semen to me.@
>If you work hard as a man, I'll show you a world of pleasure...\
name ""
goto *kumonomiko_h



*kumonomiko_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\kumonomiko_bk02.bmp",0,0
gosub *syasei2
>As the paralyzing pleasure of the Spider Princess' breasts fills Luka, he comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2679,%2679+1:if %2679=1 mov %count_koenemy,%count_koenemy+1
if %2679>%count_most mov %count_most,%2679:mov $count_mostname,$name
count 7,11
mov $bad1,"The Spider Princess used her poisoned breasts to force Luka to come."
gosub *face2
name $name
>Good... Devote all of your semen to me.@
>If you work hard as a man, I'll show you a world of pleasure...\
name ""
goto *kumonomiko_h



*kumonomiko_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\kumonomiko_ha4.bmp",0,0
gosub *syasei2
>As the webbing wraps around his penis, Luka comes, spraying his semen all over.\
mov %viclose,1:gosub *lose2
lsp 700,":a;chara\kumonomiko_ha5.bmp",0,0:print 10,500
name "Luka"
>Ahh...\
name ""
name $name
>Good... Devote all of your semen to me.@
>If you work hard as a man, I'll show you a world of pleasure...\
>Do you want to feel more of my webbing?@
>Then I'll keep playing with you like this...\
name ""
skillcount3 3962
skillname "Rust Thread"
dwave 1,"se\ero_koki1.ogg"
>The Spider Princess skillfully moves her hand, wrapping more webbing around Luka's penis
lsp 700,":a;chara\kumonomiko_ha6.bmp",0,0:print 10,500
mov %damage_kotei,1
damage 140,160
dwave 1,"se\ero_koki1.ogg"
>The sticky thread playing with Luka's penis injects him with pleasure!
mov %damage_kotei,1
damage 140,160
skillname ""
name "Luka"
>Haaa!\
name ""
name $name
>Hehe... Your thing is looking like a caterpillar.@
>Now spit it out while looking pathetic like that...\
name ""
skillcount3 3962
skillname "Rust Thread"
dwave 1,"se\ero_koki1.ogg"
>The webbing slowly tightens around Luka's penis!
mov %damage_kotei,1
damage 140,160
dwave 1,"se\ero_koki1.ogg"
>While the webbing tightens, the Spider Princess uses her hand to stroke Luka's penis!
mov %damage_kotei,1
damage 140,160
skillname ""
name "Luka"
>Ahh...!@>I'm going to come again!\
name ""
name $name
>Hehe... You're just like a puppet.@
>I can freely manipulate you with my string until you come.\
>Now finish...\
name ""
skillcount3 3962
skillname "Rust Thread"
dwave 1,"se\ero_koki1.ogg"
>Reacting to the Spider Princess' fingers, the webbing around Luka's glans tightens!
mov %damage_kotei,1
damage 140,160
dwave 1,"se\ero_koki1.ogg"
>The dexterous finger work forces Luka over the edge!
mov %damage_kotei,1
damage 140,160
skillname ""
name "Luka"
>Haa... Ahhhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\kumonomiko_ha7.bmp",0,0
gosub *syasei2
>Luka explodes, the semen spurting out from his cocooned penis all over the Spider Princess' threads.\
name $name
>Haha... Just look at you spurting all over the place.@
>I'll make you come over and over with my threads...\
name ""
name "Luka"
>S...Stop... Ahh!\
name ""
skillcount3 3962
skillname "Rust Thread"
dwave 1,"se\ero_koki1.ogg"
>Like a puppet, Luka reacts to the Spider Princess' spider silk!
mov %damage_kotei,1
damage 140,160
dwave 1,"se\ero_koki1.ogg"
>As they rub against his glans, he moans!
mov %damage_kotei,1
damage 140,160
skillname ""
name "Luka"
>Ahh... I...it feels good...\
name ""
name $name
>Hehe... I rarely do things like this.@
>You should count yourself lucky to have me playing with you...\
name ""
skillcount3 3962
skillname "Rust Thread"
dwave 1,"se\ero_koki1.ogg"
>The sticky thread strokes Luka's penis up and down!
mov %damage_kotei,1
damage 140,160
dwave 1,"se\ero_koki1.ogg"
>Winding more around the tip, it squeezes Luka's glans!
mov %damage_kotei,1
damage 140,160
skillname ""
name "Luka"
>Haa... Coming... Again!\
name ""
name $name
>Then this is the finish...@
>I'll attack your weakest point.\
name ""
skillcount3 3962
skillname "Rust Thread"
dwave 1,"se\ero_koki1.ogg"
>Concentrating on the tip of Luka's penis, the Spider Princess moves to finish Luka off!
mov %damage_kotei,1
damage 140,160
dwave 1,"se\ero_koki1.ogg"
>The spider silk all rubs hard against Luka's glans!
mov %damage_kotei,1
damage 140,160
skillname ""
name "Luka"
>Hyaaa!\
name ""
gosub *syasei1
lsp 700,":a;chara\kumonomiko_ha8.bmp",0,0
gosub *syasei2
>The focused assault on his tip forces Luka to come, spraying more semen out all over the spider silk.\
name $name
>Hehe... It looks like you enjoyed my webbing.@
>Now I'll enjoy you myself...\
name ""
gosub *clear_sprite
gosub *setwindow_01p
mov %battle,0
mov %hsean,1
mov %2679,%2679+1:if %2679=1 mov %count_koenemy,%count_koenemy+1
if %2679>%count_most mov %count_most,%2679:mov $count_mostname,$name
count 20,11
mov $bad1,"The Spider Princess forced Luka to come with her spider silk."
goto *kumonomiko_h



*kumonomiko_h5

mov %ikigoe,3:gosub *ikigoe
name $name
>Haha... How pathetic...\
name ""
gosub *syasei1
lsp 700,":a;chara\kumonomiko_hb03.bmp",0,0
lsp 690,":a;chara\kumonomiko_ct04.bmp",0,0
gosub *syasei2
>The moment Luka is forced inside the Spider Princess, he comes, exploding inside her.\
mov %viclose,1:gosub *lose
mov %2679,%2679+1:if %2679=1 mov %count_koenemy,%count_koenemy+1
if %2679>%count_most mov %count_most,%2679:mov $count_mostname,$name
count 1,11
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come the moment of insertion."
gosub *face2
name $name
>Sheesh, what a horrible excuse for a male.@
>You couldn't even entertain me for a moment?\
name ""
goto *kumonomiko_h



*kumonomiko_h6

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\kumonomiko_hb03.bmp",0,0
lsp 690,":a;chara\kumonomiko_ct04.bmp",0,0
gosub *syasei2
>As the Spider Princess rapes Luka, she forces him to come inside her, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2679,%2679+1:if %2679=1 mov %count_koenemy,%count_koenemy+1
if %2679>%count_most mov %count_most,%2679:mov $count_mostname,$name
count 1,11
mov $bad1,"The Spider Princess forced Luka to come as she raped him."
gosub *face2
name $name
>Hehe... You sure shot a lot into me.@
>But that isn't nearly enough.\
>My vagina isn't just for mating and swallowing a male's semen, either.\
>It's also a predatory organ...@
>Even more, I can shoot webbing from it.\
>Now get a good taste of just how amazing it is...\
name ""
goto *kumonomiko_h



*kumonomiko_h

mov $tatie2,"kumonomiko_st22"
mov $bad2,"After being forced to mate with the Spider Princess, Luka was preyed on."
if %2679=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku=2 mov %hseanwave,15:hseanwave:goto *kumonomiko_hb
name "Luka"
>Ahhh...\
name ""
name $name
>Hehehe... So you have no more energy to fight, I see.@
>Then it's time for some fun...\
name ""
cspl 690,699
lsp 700,":a;chara\kumonomiko_hb01.bmp",0,0:print 10,500
>The Spider Princess pulls me onto her huge abdomen, and locks me in place with an arm around my back.\
name $name
>Hahaha... How does it feel to be embraced by the Queen of the Spiders?@
>I'll give you plenty of love like this...\
name ""
lsp 690,":a;chara\kumonomiko_ct01.bmp",0,0:print 10,500
>An organ similar to a female vagina opens up in her abdomen with a wet noise.@
>Its pink insides wriggle and eagerly squirm, as if waiting for me to enter.\
>I nervously swallow as I stare at it.\
name $name
>A Queen's vagina... Where I squeeze out male semen.@
>Also, of course, used for reproduction...\
>Even more, it can devour prey and spin spider silk.\
>For a male like yourself, it's truly a piece of heaven.@
>You want to feel what it's like with your penis, don't you?\
name ""
name "Luka"
>S...Stop it...\
name ""
>Even though the fear is echoing through my head, I can't stop the slight tinge of expectation.@
>Even though this is her vagina, it's also able to devour prey...\
>That hole is going to swallow my penis...@>And there's nothing I can do but watch and take it.\
name $name
>Now look, your penis is going in...@
>Give me plenty of semen as you taste a bit of heaven.\
name ""
name "Luka"
>S...St...Ahhh!\
name ""
mov %hseanwave,15:hseanwave
lsp 700,":a;chara\kumonomiko_hb02.bmp",0,0
lsp 690,":a;chara\kumonomiko_ct02.bmp",0,0:print 10,500
>With a wet noise, my penis slips in.@
>As soon as I'm inside, the squirming flesh wraps around my penis, inviting me deeper in.\
goto *kumonomiko_hb



*kumonomiko_hb

>The innumerable folds inside her all pull and rub against me.@
>The structure itself is clearly designed to force men to ejaculate in seconds inside her.\
name "Luka"
>Ahh... It feels good...@
>It's moving inside...\
name ""
name $name
>Hehe... Your penis tastes delicious.@
>I'll keep sucking on it with my vagina.\
name ""
name "Luka"
>Ah...ah...\
name ""
lsp 690,":a;chara\kumonomiko_ct03.bmp",0,0:print 10,500
>The wavy vaginal walls rub and stroke against me, as if they were tongues licking my penis clean.@
>She might not be exaggerating when she says she "tastes" it...\
name $name
>How pitiful... To be sent into such a state with only this much stimulation.@
>Here, I'll play with your glans and finish you in an instant...\
name ""
name "Luka"
>Ahhh!\
name ""
>Her wet flesh pushes against my penis, running up and down my shaft as if they were fingers.@
>At the same time, the folds deep inside her rub extra hard around my tip.\
name "Luka"
>Ahh!@> Not my tip...!@
>I'm going to come...!\
name ""
>Unable to hide my impending orgasm, my body twists and shakes in her embrace.@
>The Spider Princess just looks down at me with a sensual smile on her face.\
name $name
>Go ahead and come inside me.@
>I'll slurp all of your semen up...\
name ""
name "Luka"
>No... Coming...\
name ""
>Succumbing to the desire, I relax my body, letting the powerful ejaculation take over my senses.\
name "Luka"
>Ahh...\
name ""
gosub *syasei1
lsp 700,":a;chara\kumonomiko_hb03.bmp",0,0
lsp 690,":a;chara\kumonomiko_ct04.bmp",0,0
gosub *syasei2
>At last, I explode inside her vagina.@
>My body shakes with pleasure as my penis pulses inside, spurting out semen.\
name "Luka"
>Haa...\
name ""
name $name
>Hahaha... You came inside me.@
>Now to drink up your semen...\
name ""
name "Luka"
>Ha... Ah...Ahh!\
name ""
>Her vaginal walls suddenly start moving, shrinking, and pulling at my penis all at once.\
>Even as my penis continues pulsing from my orgasm, the incredible drinking motion of her vagina blasts me with pure ecstasy, as everything I shoot into her is gulped down.\
lsp 700,":a;chara\kumonomiko_hb04.bmp",0,0
lsp 690,":a;chara\kumonomiko_ct05.bmp",0,0:print 10,500
name "Luka"
>Ah...ah...\
name ""
name $name
>My... How delicious.@
>I'll need to extract every bit of your delicious semen.\
name ""
>The Spider Princess hugs me tighter to her abdomen, the wavy motions of her vagina only getting ever stronger.\
name $name
>I said it before, but my vagina can also spin spider silk.@
>I'll spin it inside now...\
>With your penis inside as I do it, it will feel absolutely incredible.@
>Enough to make any man faint...\
name ""
name "Luka"
>No... Stop, stop!\
name ""
name $name
>When I do this, it also makes me feel incredibly good.@
>Because my own silk gets entangled around you, pulling at my own flesh...\
>Most males I rape do not get to taste this pleasure, so you should feel honored.@
>Now come, let us feel the sweet pleasure together.\
name ""
name "Luka"
>Stop... Ahhh!\
name ""
lsp 700,":a;chara\kumonomiko_hb05.bmp",0,0
lsp 690,":a;chara\kumonomiko_ct06.bmp",0,0:print 10,500
>Her vaginal walls start to swell and move as her silk spinning starts.@
>With my penis already inside her, I can feel it slowly building up speed...\
>After only a few moments, I can feel the sticky threads latching onto my penis and the folds of her vagina.\
name "Luka"
>Hyaa... It feels good!@
>Ahhh!\
name ""
>The sticky thread wraps around my penis from tip to root, the silk threads pulling and rubbing against me.@
>It's truly a devilish pleasure that could never be felt anywhere else...\
name $name
>Haha... How does a Queen's weaving taste?@
>It's feeling quite good for me, too...\
name ""
>The Spider Princess' breath is slowly getting rougher.@
>She clings me tighter to her abdomen as her voice gets lower, and almost passionate.\
name $name
>Don't misunderstand...@> I'm only doing this to give myself pleasure.@
>Your stimulation is simply a byproduct of my own.\
>So if I feel better, then you'll feel better too.\
name ""
name "Luka"
>Haaa!!!\
name ""
>As her vagina continues spinning thread around my penis, I scream in pleasure.\
>At the same time, the Spider Princess' vaginal walls start moving even faster as she's taken over by the throes of pleasure as well.\
name $name
>Hehe... This is feeling good...@
>Let me change it up a little bit to lead us to a world of pleasure...\
name ""
name "Luka"
>N...No... Ahh!\
name ""
>Something inside of her vagina starts to spin around, her vaginal walls rubbing my penis as if there was a mixer inside.\
>The closer to an orgasm the Spider Princess gets, the more intense the pleasure gets...@
>What will happen if she actually reaches an orgasm...?\
name "Luka"
>Hyaa! Stop, stop!\
name ""
name $name
>I won't stop... I'm almost there...@
>I'll coil it all the way up inside me...\
>Ah... That feels good...@
>You're almost there too, aren't you?\
name ""
>Her breath gets rougher and rougher.@
>At the same time, the movements of her vagina get far more intense.\
name "Luka"
>Hyaa... Stop!@
>It's moving too much inside!\
name ""
name $name
>Me too... No more... Ah...@
>I'm coming... I'm coming! Nnnnn!!!\
name ""
name "Luka"
>Hyaaa!\
name ""
>The moment she reaches her climax, her vagina suddenly sharply contracts.@
>Tightening hard around me, the intense mixing motion still doesn't let up.\
>Fitting like a glove around my penis, I can feel every inch of her vagina around my penis, leading me to an intense orgasm.\
name "Luka"
>Ahhhh!!!\
name ""
gosub *syasei1
lsp 700,":a;chara\kumonomiko_hb06.bmp",0,0
lsp 690,":a;chara\kumonomiko_ct07.bmp",0,0
gosub *syasei2
>Right after the Spider Princess' orgasm, I reach my own.@
>My semen explodes into her twitching, squirming hole.\
name $name
>Hehe... My orgasming vagina forced you to come too...@
>Now to drink down your delicious semen...\
name ""
name "Luka"
>Wh...What is this...@> Ahh!\
name ""
gosub *syasei1
lsp 700,":a;chara\kumonomiko_hb07.bmp",0,0
lsp 690,":a;chara\kumonomiko_ct08.bmp",0,0
gosub *syasei2
>Her vagina suddenly contracts, gulping down my semen and triggering another orgasm at the same time.\
name "Luka"
>Ahhh!\
name ""
>In defiance of my mind, my body continues to ejaculate one time after another.@
>It's more of a merciless milking than any sort of pleasure filled orgasm.\
>While clinging to the Queen Spider's body and writhing, I continue to explode inside her.\
name "Luka"
>Hyaaa!\
name ""
gosub *syasei1:gosub *syasei2
>No matter how much I come, it doesn't stop.@
>One ejaculation after another is sucked out of me.\
>Each time my penis pulses, ecstasy arcs through my body.@
>After writhing in the intense pleasure for too long, I slowly feel my consciousness fading away...\
gosub *syasei1:gosub *syasei2
name "Luka"
>Ah... Uh...\
name ""
>While spurting endlessly inside her, I look up.@
>The last thing I see before my world goes dark is a cold blooded smile on the Spider Princess' face...\
mov %hseanwave,0:hseanwave
gosub *anten
>............\
wait 1000
name "Luka"
>Ah...\
name ""
mov %hseanwave,13:hseanwave
>My lower body feels warm...@
>As if I'm being wrapped up in a warm blanket.\
>I slowly open my eyes...\
lsp 700,":a;chara\kumonomiko_hb08.bmp",0,0
bg "bg\bg092.bmp",10,1500
name "Luka"
>Ahhhh!!!\
name ""
name $name
>Haha... So you woke up now?@
>I had intended to end it while you still slept...\
name ""
>The bottom half of my body is completely inside her vagina.@
>I can feel her vaginal walls all on my body, slowly moving around and pulling me deeper.\
name $name
>I know you remember, but I said my vagina can also devour prey...@
>I didn't mean just semen as prey, either.\
name ""
name "Luka"
>Ahhh... Stop, stop!\
name ""
if %hosyoku_cut=1 goto *hosyoku_cut
name $name
>Hehehe... There's no escape.@
>Once you're this far, there's no way out.\
>Just resign yourself to being eaten by me.\
name ""
>The folds of her vagina gently move and pull at me, causing me to sink ever so slowly into her vagina.@
>At the same time, the spinneret inside her vagina is wrapping up my body with silk.\
name $name
>I'll wrap you up in a cocoon and swallow you whole, slowly digesting you as I savor your bodily fluids inside me.\
>But there's no need to be afraid...@
>Males feel pleasure when I eat them.\
name ""
name "Luka"
>N...No... Ah...\
name ""
>Strangely, a feeling of relaxation and ecstasy fills my body from where I'm inside her.@
>The fear slowly fades, as the desire to be fed on increases...\
>My thoughts slowly get twisted, as the desire for her to eat me increases.\
name $name
>Hehe... What honest prey.@
>Are you coming around to your true instinct of wanting to be devoured by me?\
>Come on, enjoy the feeling until your end...@
>I'll digest you nice and slowly.\
name ""
name "Luka"
>Haaa...\
name ""
lsp 700,":a;chara\kumonomiko_hb09.bmp",0,0:print 10,500
>My body sinks further inside, until only my head is outside.@
>The warmth of her body fills me, soaking me in ecstasy.\
>As her spider silk wraps tighter around me, the intense feeling of pleasure takes over my body.\
name "Luka"
>Ahh...\
name ""
gosub *syasei1:gosub *syasei2
>While being eaten by the Spider Princess, I accidentally climax.\
>Even the humiliation of being forced to orgasm while being eaten is overpowered by the sensation of ecstasy.\
name $name
>Hehehe... You climaxed while being swallowed whole?@
>Do you want me to take all of you now?\
name ""
name "Luka"
>Ah...aa...\
name ""
lsp 700,":a;chara\kumonomiko_hb10.bmp",0,0:print 10,500
>With a wet noise, my head slips into her vagina.@
>At last, I've been completely swallowed by her.\
name "Luka"
>Ah...a...\
name ""
>The sticky thread around me feels like it's slowly squeezing out my life itself, ever so slowly dissolving my body away.\
>I immerse myself in the pleasure as her predatory organ slowly digests me away.\
name "Luka"
>.............\
name ""
>With that, my body and soul itself will be devoured by the Spider Princess...\
mov %hseanwave,0:hseanwave
name $name
>Hehehe... What a delicious human.@
>You really satisfied me... Haha.\
name ""
>The Spider Princess dreamily pats her swollen belly.@
>Thus, the Hero became simple food to the new Queen of Spiders...\
gosub *anten
>.............\
goto *badend



*narcubus_start

mov $name,"Naccubus"
mov $name2,"Naccubus"
mov $lavel,"narcubus"
mov $tatie1,"narcubus_st11"
mov $tatie2,"narcubus_st02"
mov $tatie3,"narcubus_st03"
mov $tatie4,"narcubus_st02"
mov $haikei,"bg103"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,19000
if %nanido=2 mov %max_enemylife,23000
if %nanido=3 mov %max_enemylife,27000
if %nanido=0 mov %max_enemylife,1
mov %kousoku_maxhp,10
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,15
if %nanido=3 mov %earth_keigen,8
mov %alice_skill,1
mov %alice_skill1,100
mov %alice_skill2,100
mov %alice_skill3,100
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno4,"But in this awkward position, Luka can't put his full strength behind the blow!"
mov $mogaku_sel1,"Sheesh... Stop struggling!"
mov $mogaku_sel2,"You should relax, you know?"
mov $mogaku_sel3,"It won't hurt, don't worry. "
mov $mogaku_sel4,"You aren't too strong, are you? Hehe."
mov $mogaku_sel5,"The medical examination isn't over yet..."
mov $mogaku_dassyutu1,"Sheesh... Such a violent patient."
mov $mogaku_dassyutu2,"If you rage around that much, I won't be able to examine you..."
mov $mogaku_earth_dassyutu1,"Sheesh... Such a violent patient."
mov $mogaku_earth_dassyutu2,"If you rage around that much, I won't be able to examine you..."
mov $half_s1,"Hey... We're still in the middle of the test."
mov $half_s2,"Please refrain from ejaculating just yet."
mov $kiki_s1,"Eh? You're already about to come?"
mov $kiki_s2,"I want you to hold on for a little but longer though..."
mov %end_n,14
mov %exp_minus,0
mov %zmonster_x,-330
mov %tukix,300
mov %owaza_count1a,3
mov %owaza_count1b,4
mov %owaza_count3a,3
name $name
>It's time for a checkup. @
>Does anyone here still have leftover energy?\
name ""
>The Succubus is wandering around the village, walking around the fallen villagers.\
lsp 700,":a;chara\mob_sensi1.bmp",-160,0
lsp 701,":a;chara\narcubus_st11.bmp",160,0:print 10,500
name "Soldier"
>Urhg... Uh...\
name ""
>A soldier tries to stand up as he sees her.\
name $name
>Alright, please just relax.@
>I'm just going to collect your semen...\
name ""
dwave 1,"se\ero_chupa6.ogg"
>She presses her large syringe against his groin, and pulls the plunger.@
>A mass of cloudy liquid quickly fills the syringe.\
name "Soldier"
>Ah... Haa...\
name ""
dwave 1,"se\down.ogg"
csp 701
gosub *face1
>With a look of ecstasy on his face, the soldier collapses back onto the ground.\
name $name
>Here's some freshly collected semen!\
name ""
>She raises the syringe into the air, pointed at the Magic Circle in the sky...\
dwave 1,"se\power.ogg"
mov $tatie1,"narcubus_st01"
gosub *face1
>And with a press of the plunger, the semen shoots out of the syringe, heading straight into the circle!\
name "Luka"
>Is she trying to strengthen the barrier like that!?\
name ""
name $name
>Eh...?@> Someone's still able to walk around?\
name ""
dwave 1,"se\asioto2.ogg"
>Finally noticing me, the Succubus heads over to me.\
name $name
>That's not good, you need to be lying down.@
>That way I can gather up all your semen. \
name ""
>Naccubus moves to attack me before I can say anything else!\
goto *common_main



*narcubus_v

gosub *face3
name $name
>I had more work I needed to do...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Naccubus is sealed in the form of a bat!\
mov %viclose,1:gosub *victory
mov %getexp,180000:gosub *lvup
mov %2399,1
goto *sean0373



*narcubus_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>That's good, patients need to relax!@
>I'll suck up all your semen in one pull! \
name ""
goto *narcubus_a



*narcubus_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 mov %abairitu,50:goto *common_miss2
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *narcubus_kousan
if %cmd1=16 goto *narcubus_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *narcubus_main



*narcubus_kaihou

name $name
>Sheesh... Such a violent patient!@
>I can't examine you if you're struggling like that...\
name ""
dwave 1,"se\dassyutu.ogg"
lsp 700,":a;chara\"+$tatie3+".bmp",%monster_x,%monster_y
mov %kousoku,0:gosub *status_print
>Luka resists, and throws Naccubus off him!\
gosub *face1
mov %owaza_count1a,0
goto *common_main



*narcubus_a

if %kousoku=1 && %kousoku_hp<0 goto *narcubus_kaihou
if %kousoku=1 gosub *narcubus_a7:goto *common_main
if %kousoku=2 gosub *narcubus_a11:goto *common_main
if %kousoku=3 gosub *narcubus_a12:goto *common_main
rnd2 %ransu,1,7
if %ransu=1 gosub *narcubus_a1:goto *common_main
if %ransu=2 gosub *narcubus_a2:goto *common_main
if %ransu=3 gosub *narcubus_a3:goto *common_main
if %ransu=4 gosub *narcubus_a4:goto *common_main
if %ransu=5 && %owaza_count3a>4 gosub *narcubus_a5:goto *common_main
if %ransu=6 && %owaza_count1a>4 gosub *narcubus_a6:goto *common_main
if %ransu=7 && %owaza_count1b>5 gosub *narcubus_a10:goto *common_main
skip -8



*narcubus_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Good, it erected properly! "
if %ransu=2 mov $sel1,"Rub rub... Hehe, it's quite hard, isn't it?"
if %ransu=3 mov $sel1,"Your penis seems to be normal, and quite energetic."
name $name
eng $sel1:$sel6\
name ""
skillname "Erection Check"
dwave 1,"se\ero_koki1.ogg"
>Naccubus rubs Luka's penis as she inspects it!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3964
if %nanido<2 damage 320,340
if %nanido=2 damage 360,380
if %nanido=3 damage 400,420
skillname ""
if %mylife=0 sub %stack,1:return *narcubus_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*narcubus_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Alright, open wiiiide! Me, I mean."
if %ransu=2 mov $sel1,"Mmm... It looks like the taste and smell are normal. "
if %ransu=3 mov $sel1,"Mmm... Your penis is nice and energetic. "
name $name
eng $sel1:$sel6\
name ""
skillname "Oral Penis Examination"
dwave 1,"se\ero_buchu2.ogg"
>Naccubus carefully sucks and licks Luka's penis, making sure to check every inch!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3965
if %nanido<2 damage 330,350
if %nanido=2 damage 370,390
if %nanido=3 damage 410,430
skillname ""
if %mylife=0 sub %stack,1:return *narcubus_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*narcubus_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"It's time for a penis reaction check! "
if %ransu=2 mov $sel1,"I won't step too hard, so relax."
if %ransu=3 mov $sel1,"Step, step... Good, it seems to be nice and stiff. "
name $name
eng $sel1:$sel6\
name ""
skillname "Stepping Reaction Check"
dwave 1,"se\ero_koki1.ogg"
if %kousan<2 lsp 700,":a;chara\narcubus_hb1.bmp",0,0:print 10,500
lsp 700,":a;chara\narcubus_hb2.bmp",0,0:print 10,500
>Naccubus carefully squeezes Luka's penis between the soles of her feet!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *face1:gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *face1:gosub *wind_guard:sub %stack,1:return
skillcount3 3966
if %nanido<2 damage 340,360
if %nanido=2 damage 380,400
if %nanido=3 damage 420,440
skillname ""
if %mylife=0 sub %stack,1:return *narcubus_h3
if %kousan<2 gosub *face1
sub %stack,1
return



*narcubus_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck on your penis with my tail, so please ejaculate. "
if %ransu=2 mov $sel1,"I must make sure your semen is able to properly eject."
if %ransu=3 mov $sel1,"Does it feel good? Hehe, your penis is quite sensitive. "
name $name
eng $sel1:$sel6\
name ""
skillname "Tail Extraction Method"
dwave 1,"se\ero_buchu1.ogg"
>Naccubus sucks Luka's penis into the tip of her tail, and uses it to suck on him!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3967
if %nanido<2 damage 350,370
if %nanido=2 damage 390,410
if %nanido=3 damage 430,450
skillname ""
if %mylife=0 sub %stack,1:return *narcubus_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*narcubus_a5

add %stack,1
mov %owaza_count3a,0
if %kousan=2 skip 5
name $name
>Ooof... There we go.@
>This won't hurt, so please relax.\
name ""
lsp 700,":a;chara\narcubus_st12.bmp",0,0:print 10,500
>Naccubus pulls out a huge syringe!\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Now to collect your semen. "
if %ransu=2 mov $sel1,"It will all come out in one suck! "
if %ransu=3 mov $sel1,"Are you ready for the semen extraction? "
name $name
eng $sel1:$sel6\
name ""
skillname "Syringe Extraction Method"
dwave 1,"se\ero_pyu1.ogg"
lsp 700,":a;chara\narcubus_ha1.bmp",0,0:print 10,500
>Naccubus slips Luka's penis into the tip of her syringe!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *face1:gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *face1:gosub *wind_guard:sub %stack,1:return
skillcount3 3968
if %nanido<2 damage 120,130
if %nanido=2 damage 130,140
if %nanido=3 damage 140,150
dwave 1,"se\ero_kyuin1.ogg"
>Pulling back the plunger, an intense suction pulls on Luka's penis!
if %nanido<2 damage 120,130
if %nanido=2 damage 130,140
if %nanido=3 damage 140,150
dwave 1,"se\ero_kyuin1.ogg"
>The incredible suction makes it feel like Luka's semen itself will be pulled out!
if %nanido<2 damage 120,130
if %nanido=2 damage 130,140
if %nanido=3 damage 140,150
skillname ""
if %mylife=0 sub %stack,1:return *narcubus_h5
if %kousan<2 gosub *face1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*narcubus_a6

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 4
name $name
>Now, I need to check your male reproductive functions.\
name ""
skillname "Vaginal Male Reproductive Test"
eng "Naccubus aggressively pushes Luka down!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<10 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
mov $tatie4,"narcubus_st02"
mov %kousoku,1:gosub *status_print
>Luka's lower body is being held down by Naccubus!\
skillname ""
name $name
if %first_sel1=1 skip 3
>Ehehe... Don't be scared.@
skip 2
>Ehehe... Don't run away this time.@
>It will feel so good, it will be over in only a couple seconds. \
name ""
mov %first_sel1,1
mov %kousoku_hp,%kousoku_maxhp
mov %genmogaku,99
sub %stack,1
return



*narcubus_a7

add %stack,1
name $name
>Now, I'll put it into my pussy...@
>Make sure you spurt out that semen properly!\
name ""
skillname "Vaginal Male Reproductive Test"
dwave 1,"se\ero_pyu1.ogg"
lsp 700,":a;chara\narcubus_hd1.bmp",0,0:print 10,500
>Naccubus sinks her waist down, bringing Luka inside her!
mov %damage_kotei,1
damage 400,500
mov $tatie4,"narcubus_hd1"
mov %kousoku,2:gosub *status_print
>Luka is being raped by Naccubus!\
skillname ""
if %mylife=0 sub %stack,1:return *narcubus_h6
name "Luka"
>Ahhh!\
name ""
>The warm, soft flesh eagerly invites me deep inside her body, making me writhe in a pleasure filled agony.\
if %kousan=2 sub %stack,1:return
sub %stack,1
rnd2 %ransu,1,2
if %ransu=1 goto *narcubus_a8
if %ransu=2 goto *narcubus_a9



*narcubus_a8

add %stack,1
>Luka is being raped by Naccubus...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll move a little faster, but it's still alright to ejaculate.":mov $sel2,"Naccubus grinds hard against Luka!"
if %ransu=2 mov $sel1,"It seems your healthy penis is also able to properly have sex. ":mov $sel2,"Naccubus gently shakes her waist, rubbing Luka's penis against her vaginal walls!"
if %ransu=3 mov $sel1,"Mmmf... Mmmf... Are you properly feeling the pleasure?":mov $sel2,"Naccubus bounces up and down on top of Luka!"
name $name
eng $sel1:$sel6\
name ""
skillname "Vaginal Male Examination Method A"
dwave 1,"se\ero_chupa3.ogg"
eng $sel2:$sel6
skillcount3 3969
mov %damage_kotei,1
damage 400,500
skillname ""
if %mylife=0 sub %stack,1:return *narcubus_h7
if %kousan=2 sub %stack,1:return
sub %stack,1
rnd2 %ransu,1,2
if %ransu=1 goto *narcubus_a8
if %ransu=2 goto *narcubus_a9



*narcubus_a9

add %stack,1
>Luka is being raped by Naccubus...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll squeeze it nice and tight, so let go when you can't take it any longer!":mov $sel2,"Naccubus clenches her lower abdomen, squeezing Luka's penis!"
if %ransu=2 mov $sel1,"Do you feel any pain when I tighten?":mov $sel2,"Naccubus squeezes her vaginal muscles, clenching down on Luka's penis!"
if %ransu=3 mov $sel1,"I'll squeeze it nice and tight, so let me know when you're going to come. ":mov $sel2,"Naccubus' vagina suddenly gets far narrower than before!"
name $name
eng $sel1:$sel6\
name ""
skillname "Vaginal Male Examination Method B"
dwave 1,"se\ero_chupa3.ogg"
eng $sel2:$sel6
skillcount3 3970
mov %damage_kotei,1
damage 400,500
skillname ""
if %mylife=0 sub %stack,1:return *narcubus_h8
if %kousan=2 sub %stack,1:return
sub %stack,1
rnd2 %ransu,1,2
if %ransu=1 goto *narcubus_a8
if %ransu=2 goto *narcubus_a9



*narcubus_a10

add %stack,1
mov %owaza_count1b,0
mov %owaza_num1,2
if %kousan=2 skip 4
name $name
>Now, I'll check your penis' functions with my tail.\
name ""
skillname "Tail Semen Ejection Test"
eng "Naccubus pushes Luka down!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<10 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
dwave 1,"se\ero_buchu1.ogg"
lsp 700,":a;chara\narcubus_hc1.bmp",0,0:print 10,500
>The tip of Naccubus' tail presses against Luka's glans!
skillcount3 4135
if %nanido<2 damage 200,220
if %nanido=2 damage 230,250
if %nanido=3 damage 260,280
mov $tatie4,"narcubus_hc1"
mov %kousoku,2:gosub *status_print
>Luka has been bound by Naccubus!\
skillname ""
if %mylife=0 sub %stack,1:return *narcubus_h9
if %kousan=2 sub %stack,1:return
name $name
if %first_sel2=1 skip 3
>Please just relax.@
skip 2
>This time, please relax.@
>Don't be afraid, it will feel very good.\
name ""
mov %first_sel2,1
if %earth=0 && %nanido<2 mov %genmogaku,1
if %earth=0 && %nanido=2 mov %genmogaku,1
if %earth=0 && %nanido=3 mov %genmogaku,1
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
sub %stack,1
return



*narcubus_a11

add %stack,1
>Luka has been bound by Naccubus...\
name $name
>Now watch closely as it slips into my tail.\
name ""
skillname "Tail Semen Ejection Test"
dwave 1,"se\ero_buchu1.ogg"
lsp 700,":a;chara\narcubus_hc3.bmp",0,0:print 10,500
>Naccubus' tail slowly starts sucking Luka's penis inside!
skillcount3 4135
if %nanido<2 damage 200,220
if %nanido=2 damage 230,250
if %nanido=3 damage 260,280
mov $tatie4,"narcubus_hc3"
mov %kousoku,3
skillname ""
if %mylife=0 sub %stack,1:return *narcubus_h10
name $name
>Very good, just a little bit more.@
>It won't hurt at all, so there's no reason to struggle. \
name ""
sub %stack,1
return



*narcubus_a12

add %stack,1
>Luka has been bound by Naccubus...\
if %kousan=2 skip 4
name $name
>Good, now to get it all the way inside. \
name ""
skillname "Tail Semen Ejection Test"
dwave 1,"se\ero_buchu1.ogg"
lsp 700,":a;chara\narcubus_hc5.bmp",0,0:print 10,500
>Naccubus' tail sucks Luka's penis even deeper inside!
skillcount3 4135
if %nanido<2 damage 200,220
if %nanido=2 damage 230,250
if %nanido=3 damage 260,280
mov $tatie4,"narcubus_hc5"
skillname ""
if %mylife=0 sub %stack,1:return *narcubus_h11
name $name
>Ehe, my tail swallowed it.@
>Now make sure to spurt out a lot inside. \
name ""
sub %stack,1
goto *narcubus_a13



*narcubus_a13

add %stack,1
>Luka has been bound by Naccubus...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Suck suck. "
if %ransu=2 mov $sel1,"Can you feel the inside of my tail properly?"
if %ransu=3 mov $sel1,"Make sure to eject lots inside my tail. "
name $name
eng $sel1:$sel6\
name ""
skillname "Tail Semen Ejection Test"
dwave 1,"se\ero_buchu1.ogg"
>Naccubus' tail sucks hard on Luka's penis!
skillcount3 4135
mov %damage_kotei,1
damage 300,330
skillname ""
if %mylife=0 sub %stack,1:return *narcubus_h11
sub %stack,1
goto *narcubus_a13



*narcubus_onedari

mov $list1,"Erection Check"
if %3964>0 mov %list_num1,1
mov $list2,"Oral Penis Examination"
if %3965>0 mov %list_num2,1
mov $list3,"Stepping Reaction Check"
if %3966>0 mov %list_num3,1
mov $list4,"Tail Extraction Method"
if %3967>0 mov %list_num4,1
mov $list5,"Syringe Extraction Method"
if %3968>0 mov %list_num5,1
mov $list6,"Vaginal Male Examination Method A"
if %3969>0 mov %list_num6,1
mov $list7,"Vaginal Male Examination Method B"
if %3970>0 mov %list_num7,1
mov $list8,"Tail Semen Ejection Test"
if %4135>0 mov %list_num8,1
gosub *cmd_onedari
if %cmd1=11 goto *narcubus_onedari1
if %cmd1=12 goto *narcubus_onedari2
if %cmd1=13 goto *narcubus_onedari3
if %cmd1=14 goto *narcubus_onedari4
if %cmd1=15 goto *narcubus_onedari5
if %cmd1=16 goto *narcubus_onedari6
if %cmd1=17 goto *narcubus_onedari7
if %cmd1=18 goto *narcubus_onedari8
if %cmd1=-1 goto *narcubus_main
goto *narcubus_onedari



*narcubus_onedari1

gosub *onedari_syori
name $name
>You want me to test your penis with my hand?@
>If that's what you want, then it proves you're a healthy young boy. \
name ""
gosub *narcubus_a1
skip -1



*narcubus_onedari2

gosub *onedari_syori
name $name
>You want me to test your penis with my mouth?@
>If that's what you want, then it proves you're a healthy young boy. \
name ""
gosub *narcubus_a2
skip -1



*narcubus_onedari3

gosub *onedari_syori
name $name
>You want me to test your penis with my foot?@
>If that's what you want, then it proves you're a healthy young boy. \
name ""
gosub *narcubus_a3
skip -1



*narcubus_onedari4

gosub *onedari_syori
name $name
>You want me to test your penis with my tail?@
>If that's what you want, then it proves you're a healthy young boy. \
name ""
gosub *narcubus_a4
skip -1



*narcubus_onedari5

gosub *onedari_syori
name $name
>You want me to test your penis with my syringe?@
>If that's what you want, then it proves you're a healthy young boy. \
name ""
gosub *narcubus_a5
skip -1



*narcubus_onedari6

if %kousoku<>1 gosub *onedari_syori
if %kousoku=1 gosub *onedari_syori_k
name $name
>You want me to rape you nice and hard?@
>If that's what you want, then it proves you're a healthy young boy. \
name ""
if %kousoku<>1 gosub *narcubus_a6
gosub *narcubus_a7
gosub *narcubus_a8
skip -1



*narcubus_onedari7

if %kousoku<>1 gosub *onedari_syori
if %kousoku=0 gosub *onedari_syori_k
name $name
>You want me to rape you with my tight pussy?@
>If that's what you want, then it proves you're a healthy young boy. \
name ""
if %kousoku<>1 gosub *narcubus_a6
gosub *narcubus_a7
gosub *narcubus_a9
skip -1



*narcubus_onedari8

if %kousoku<2 gosub *onedari_syori
if %kousoku>1 gosub *onedari_syori_k
name $name
>You want me to suck all your semen up with my tail?@
>If that's what you want, then it proves you're a healthy young boy. \
name ""
if %kousoku<2 gosub *narcubus_a10
if %kousoku=2 gosub *narcubus_a11
if %kousoku=3 gosub *narcubus_a12
skip -1



*narcubus_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\narcubus_bk02.bmp",0,0
gosub *syasei2
>As Naccubus gently examines Luka's penis, he comes, covering her hands with semen.\
mov %viclose,1:gosub *lose
mov %2699,%2699+1:if %2699=1 mov %count_koenemy,%count_koenemy+1
if %2699>%count_most mov %count_most,%2699:mov $count_mostname,$name
count 5,3
mov $bad1,"Naccubus forced Luka to come with her hands."
gosub *face2
name $name
>Aha... So your properly ejaculated, I see. @
>And your semen is nice and healthy, too!@> Good boy! \
name ""
goto *narcubus_h



*narcubus_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\narcubus_bk01.bmp",0,0
gosub *syasei2
>As Naccubus examines Luka's penis with her mouth and tongue, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2699,%2699+1:if %2699=1 mov %count_koenemy,%count_koenemy+1
if %2699>%count_most mov %count_most,%2699:mov $count_mostname,$name
mov $bad1,"Naccubus forced Luka to come with her mouth."
count 4,3
gosub *face2
name $name
>Aha... So your properly ejaculated, I see. @
>And your semen is nice and healthy, too!@> Good boy! \
name ""
goto *narcubus_h



*narcubus_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\narcubus_hb3.bmp",0,0
gosub *syasei2
>As Naccubus rubs Luka's penis between her two feet, he comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2699,%2699+1:if %2699=1 mov %count_koenemy,%count_koenemy+1
if %2699>%count_most mov %count_most,%2699:mov $count_mostname,$name
count 6,3
mov $bad1,"Naccubus used her feet to force Luka to come."
lsp 700,":a;chara\narcubus_hb4.bmp",0,0:print 10,500
name $name
>Aha... So your properly ejaculated, I see. @
>And your semen is nice and healthy, too!@> Good boy! \
name ""
lsp 694,":a;chara\narcubus_bk04.bmp",0,0
gosub *face2
goto *narcubus_h



*narcubus_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 696,":a;chara\narcubus_bk06.bmp",0,0
gosub *syasei2
>As Naccubus' tail sucks on Luka's penis, he comes, filling her tail with semen.\
mov %viclose,1:gosub *lose
mov %2699,%2699+1:if %2699=1 mov %count_koenemy,%count_koenemy+1
if %2699>%count_most mov %count_most,%2699:mov $count_mostname,$name
count 19,3
mov $bad1,"Naccubus used her tail to force Luka to come."
gosub *face2
name $name
>Aha... So your properly ejaculated, I see. @
>And your semen is nice and healthy, too!@> Good boy! \
name ""
goto *narcubus_h



*narcubus_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\narcubus_ha2.bmp",0,0
gosub *syasei2
>As the syringe sucks hard on Luka's penis, he comes, filling it with semen.\
mov %viclose,1:gosub *lose
mov %2699,%2699+1:if %2699=1 mov %count_koenemy,%count_koenemy+1
if %2699>%count_most mov %count_most,%2699:mov $count_mostname,$name
count 27,3
mov $bad1,"Naccubus used her syringe to force Luka to come."
gosub *face2
name $name
>Aha... So your properly ejaculated, I see. @
>And just look at how full it is... \
>Shall I draw out one more batch...?\
name ""
goto *narcubus_h



*narcubus_h6

mov %ikigoe,3:gosub *ikigoe
name $name
>Eh eh?@> You're already spurting?\
name ""
gosub *syasei1
lsp 690,":a;chara\narcubus_bk07.bmp",0,0
lsp 700,":a;chara\narcubus_hd2.bmp",0,0:print 10,500
gosub *syasei2
>The moment Luka is forced into Naccubus, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2699,%2699+1:if %2699=1 mov %count_koenemy,%count_koenemy+1
if %2699>%count_most mov %count_most,%2699:mov $count_mostname,$name
count 1,3
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka is forced to come the moment of insertion."
gosub *face2
name $name
>Hehe, there's no need to be shy. @
>You just have a very sensitive little penis, so you couldn't help it.\
name ""
goto *narcubus_h



*narcubus_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\narcubus_bk07.bmp",0,0
lsp 700,":a;chara\narcubus_hd2.bmp",0,0:print 10,500
gosub *syasei2
>As Naccubus shakes her waist hard against Luka, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2699,%2699+1:if %2699=1 mov %count_koenemy,%count_koenemy+1
if %2699>%count_most mov %count_most,%2699:mov $count_mostname,$name
count 1,3
mov $bad1,"Naccubus forced Luka to come as she raped him hard."
gosub *face2
name $name
>Aha... You properly came inside my pussy, I see. @
>And so much, too...@>Your penis is nice and healthy! \
name ""
goto *narcubus_h



*narcubus_h8

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\narcubus_bk07.bmp",0,0
lsp 700,":a;chara\narcubus_hd2.bmp",0,0:print 10,500
gosub *syasei2
>As Naccubus squeezes Luka's penis with her vagina, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2699,%2699+1:if %2699=1 mov %count_koenemy,%count_koenemy+1
if %2699>%count_most mov %count_most,%2699:mov $count_mostname,$name
count 1,3
mov $bad1,"Naccubus forced Luka to come as she tightened her vagina around his penis."
gosub *face2
name $name
>Aha... You properly came inside my pussy, I see. @
>And so much, too...@>Your penis is nice and healthy! \
name ""
goto *narcubus_h



*narcubus_h9

mov %ikigoe,3:gosub *ikigoe
name $name
>Eh eh?@> You're already spurting?\
name ""
gosub *syasei1
lsp 700,":a;chara\narcubus_hc2.bmp",0,0
gosub *syasei2
>The moment Naccubus' soft tail touches Luka's penis, he comes.\
mov %viclose,1:gosub *lose
mov %2699,%2699+1:if %2699=1 mov %count_koenemy,%count_koenemy+1
if %2699>%count_most mov %count_most,%2699:mov $count_mostname,$name
mov %count_bouhatu,%count_bouhatu+1
count 19,3
mov $bad1,"Naccubus forced Luka to come just by touching his penis with her tail."
gosub *face2
name $name
>Hehe, there's no need to be shy. @
>You just have a very sensitive little penis, so you couldn't help it.\
name ""
goto *narcubus_h



*narcubus_h10

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\narcubus_hc4.bmp",0,0
gosub *syasei2
>As Naccubus' tail sucks in the tip of Luka's penis, he comes, filling her tail with semen.\
mov %viclose,1:gosub *lose
mov %2699,%2699+1:if %2699=1 mov %count_koenemy,%count_koenemy+1
if %2699>%count_most mov %count_most,%2699:mov $count_mostname,$name
count 19,3
mov $bad1,"Naccubus forced Luka to come with her tail."
gosub *face2
name $name
>Aha... You properly came inside my tail, I see. @
>And so much, too...@>Your penis is nice and healthy! \
name ""
goto *narcubus_h



*narcubus_h11

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\narcubus_hc6.bmp",0,0
gosub *syasei2
>As Naccubus' tail sucks on Luka's penis, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2699,%2699+1:if %2699=1 mov %count_koenemy,%count_koenemy+1
if %2699>%count_most mov %count_most,%2699:mov $count_mostname,$name
count 19,3
mov $bad1,"Naccubus forced Luka to come with her tail."
gosub *face2
name $name
>Aha... You properly came inside my tail, I see. @
>And so much, too...@>Your penis is nice and healthy! \
name ""
goto *narcubus_h



*narcubus_h

mov $bad2,"After having his semen extracted, Luka became helpless semen livestock for the village."
if %2699=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
>Made completely helpless, I fall to my knees.@
>With a smile, Naccubus walks up to me.\
name $name
>Now to suuuuck up all your semen.@
>Don't be afraid, it will feel really good. \
name ""
cspl 690,699
lsp 700,":a;chara\narcubus_ha1.bmp",0,0:print 10,500
>Naccubus presses her huge syringe to my penis, slipping me inside.@
>The fleshy hole of the syringe seems to fit my penis exactly, latching onto me like a glove.\
name "Luka"
>S...Stop!\
name ""
name $name
>Now to collect your semen. @
>Please relax your body. \
name ""
mov %hseanwave,14:hseanwave
>With that, she starts to pull on the syringe's plunger.@
>The strange sense of suction pulls at my entire penis.\
>Despite the appearance, it doesn't seem to be sucking by air pressure...@
>More like it's slowly and gradually pulling something out from my body itself.\
name "Luka"
>Ah... Haa...\
name ""
>I don't feel any pain at all from it...@
>Rather, the feeling of being sucked fills my body.\
>Unable to help it, I let out a weak sigh.@
>Looking over me, Naccubus giggles as she stares into my eyes.\
name $name
>Aha, does it feel good?@
>Then it's okay to let it out now. \
name ""
>She continues pulling slowly at the plunger.@
>The incredible feeling of suction brings me near to an ejaculation already.\
>Without fighting against it any longer, I relax my body as I give in to the rising desire.\
name $name
>Ah... Already going to come?@
>Then spew it out! \
name ""
name "Luka"
>Haa...\
name ""
gosub *syasei1
lsp 700,":a;chara\narcubus_ha2.bmp",0,0
gosub *syasei2
>Led by the sweet suction, I explode inside the syringe.\
name $name
>Ehe... You're coming, you're coming! @
>So when I suck on your penis during your ejaculation like this... \
name ""
mov %hseanwave,16:hseanwave
>Suddenly, Naccubus pulls back hard on the syringe as I ejaculate!\
name "Luka"
>Ah...!@> Hyaaa!!!\
name ""
>Way faster than my penis spitting it out, the syringe draws large pulls of semen out with each pulse.@
>The oversized pulses of semen cause intense pleasure to assault my body with each spurt.\
name "Luka"
>Ahhyyaaa!!!\
name ""
>The forced sensation of ejaculation seems to continue forever.@
>After it finally feels like it's going to stop, suddenly...\
gosub *syasei1
lsp 700,":a;chara\narcubus_ha3.bmp",0,0
gosub *syasei2
>Huge amounts of semen shoot out in surges, a second forced ejaculation starting before the first one completely stopped.\
>The overlapping orgasms double the amount of pleasure, leaving me a panting mess.\
name $name
>Ahaha, you came again?@
>Usually I get it all in one batch, that's incredible! \
name ""
name "Luka"
>Ah... Ahhg... Gaa...\
name ""
>My entire body shakes as the doubled ejaculation continues.@
>An incredible amount flows into her syringe.\
>After a while, I'm left laying on the ground, unable to even move a single finger.@
>It feels like my soul itself was sucked out into the syringe... Like nothing is left in my body.\
mov %hseanwave,0:hseanwave
lsp 700,":a;chara\narcubus_st14.bmp",0,0:print 10,500
name "Luka"
>Ah... Urhg...\
name ""
name $name
>Ahaha, are your testicles empty now?@
>Then once your semen has built up, I'll suck it all back out. \
name ""
name "Luka"
>Ah...ah...\
name ""
csp 700:print 10,500
>After that, she walks away and starts inspecting the other men on the floor.@
>I'm now just the same as them...\
>Helpless and weak on the floor, just semen to be drawn out to maintain the barrier.\
name "Luka"
>.............\
name ""
>Unable to move on the ground, the horrible feeling of helplessness washes over me.\
gosub *anten
>After that, I was kept as simple livestock inside the Succubus Village.@
>They continually keep milking me for semen, making sure my power never returns.\
>After a while, my mind and soul break, causing me to lose my sanity and truly become livestock.\
>...............\
goto *badend



*inps_start

mov $name,"Imp Girls"
mov $name2,"Imp"
mov $lavel,"inps"
mov $tatie1,"inp_st21"
mov $tatie2,"inp_st22"
mov $tatie3,"inp_st23"
mov $tatie4,"inp_st22"
mov $haikei,"bg103"
mov %monster_x,280
mov %monster_y,0
mov $tatie1b,"inp_st01"
mov $tatie2b,"inp_st02"
mov $tatie3b,"inp_st03"
mov %monster_xb,0
mov %monster_yb,0
mov $tatie1c,"inp_st11"
mov $tatie2c,"inp_st12"
mov $tatie3c,"inp_st13"
mov %monster_xc,-250
mov %monster_yc,0
if %nanido=1 mov %max_enemylife,50
if %nanido=2 mov %max_enemylife,50
if %nanido=3 mov %max_enemylife,50
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,100
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,0
mov %music,1
gosub *maxmp:mov %mp,%max_mp
mov %tekikazu,3
gosub *syutugen_plural
mov %end_n,14
mov %exp_minus,180000
mov %zmonster_x,-300
mov %tukix,300
mov %tekikazu,3
mov $name,"Imp"
lsp 702,":a;chara\inp_st03.bmp",0,0:print 10,500
name $name
>Hyaa!@>The Hero from before!@
>Why is he here!?\
>I haven't finished my revenge special training yet either...\
name ""
name "Luka"
>You were the one in the Monster Lord's Castle...@
>Have you been seduced by Black Alice, too!?\
name ""
lsp 702,":a;chara\inp_st04.bmp",0,0:print 10,500
name $name
>Who is Black Alice?@
>I only came here to train...\
name ""
name "Luka"
>I...Is that so?\
name ""
>I guess she isn't a subordinate of Black Alice then.\
lsp 702,":a;chara\inp_st03.bmp",0,0:print 10,500
name $name
>Do you know what that thingy in the sky is?@
>It's kinda scary...\
name ""
name "Luka"
>..........\
name ""
>It looks like she was just caught here by chance.@
>This little Imp sure does have a lot of bad luck, doesn't she?\
lsp 702,":a;chara\inp_st01.bmp",0,0:print 10,500
name $name
>But I won't give up!@
>I have reliable friends with me!\
name ""
name "Remi"
>He...heh... Y...Ye...ah...\
name ""
name "Rumi"
>Uhm...\
name ""
name "Luka"
>.........\
name ""
>They don't seem that reliable...\
lsp 702,":a;chara\inp_st02.bmp",0,0:print 10,500
name $name
>Now, Rumi!@> Show him your surefire killing handjob technique!\
name ""
name "Rumi"
>Y...Y...Y..ou sure...?\
name ""
name $name
>Rumi doesn't have much motivation...@> But she's super dexterous with her fingers!\
>If she gets her magic fingers on your penis, you'll come in no time!\
>But she's a little timid so...@> Try not to move so much, okay!?\
name ""
name "Rumi"
>Oh no...\
name ""
name "Luka"
>...........\
name ""
gosub *face1
mov %sinkou,1
goto *common_main



*inps001

gosub *face3
name "Rumi"
>Nooooo... I knew it...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Rumi is sealed in the form of a bat!\
mov $tatie1,"inp_st11"
mov $tatie2,"inp_st12"
mov $tatie3,"inp_st13"
mov $tatie4,"inp_st12"
mov $haikei,"bg103"
mov %monster_x,-125
mov %monster_y,0
mov $tatie1b,"inp_st01"
mov $tatie2b,"inp_st02"
mov $tatie3b,"inp_st03"
mov %monster_xb,125
mov %monster_yb,0
mov %tekikazu,2
csp 704
lsp 700,":a;chara\inp_st11.bmp",-125,0
lsp 702,":a;chara\inp_st03.bmp",125,0:print 10,500
name $name
>Ruuuummiiiii!!!\
name ""
name "Remi"
>Oh no oh no...\
name ""
name "Bat"
>Nooo...\
name ""
>Rumi looks timid and sheepish even as a bat...\
name "Luka"
>Hey, let's not fight, okay?@
>There's no reason to...\
name ""
lsp 702,":a;chara\inp_st01.bmp",125,0:print 10,500
name $name
>Then...@>It's your turn, Remi!\
name ""
lsp 700,":a;chara\inp_st13.bmp",-125,0:print 10,500
name "Remi"
>...Urp!?\
name ""
name $name
>At this rate, the villainous Hero is going to kill us all!@
>So quick, Remi!@>Make him helpless with your ultimate blowjob!\
name "Remi"
>..............\
lsp 700,":a;chara\inp_st11.bmp",-125,0:print 10,500
>...Ok... Got it...\
name ""
name $name
>Ehehe... You're going to taste Remi's ultimate blowjob!
>She's a timid girl, but her mouth technique is incredible! \
>I'm sure no man would be able to take even a minute of it! \
name ""
name "Luka"
>...........\
name ""
mov %enemylife,50
if %enemylife>%max_enemylife mov %enemylife,%max_enemylife
mov %gage,%enemylife*100/%max_enemylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
print 10,500
mov %sinkou,2
goto *common_main



*inps002

gosub *face3
name "Remi"
>I knew it...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Remi is sealed in the form of a bat!\
mov $tatie1,"inp_st01"
mov $tatie2,"inp_st02"
mov $tatie3,"inp_st03"
mov $tatie4,"inp_st02"
mov %monster_x,0
mov %monster_y,0
mov %tekikazu,1
csp 702
lsp 700,":a;chara\inp_st03.bmp",0,0:print 10,500
name $name
>Reeeemiiiii!!!\
name ""
name "Bat A"
>Mmmm...\
name ""
name "Bat B"
>Waaah...\
name ""
name "Luka"
>Now it's down to one.@
>...Come on, stop this already and surrender, please?\
name ""
name $name
>There will be no surrender!@
>It's revenge time!\
name ""
>She doesn't seem to be willing to give up yet...\
lsp 700,":a;chara\inp_st01.bmp",0,0:print 10,500
name $name
>If it's come to this, then I'll make you cry out with my breasts!@
>My breasts are super soft and smooth! \
>I'll sandwich your penis between them!@> If you behave yourself...\
>It will feel incredible, so just try feeling it for a little bit, ok?\
name ""
name "Luka"
>.............\
name ""
mov %enemylife,50
if %enemylife>%max_enemylife mov %enemylife,%max_enemylife
mov %gage,%enemylife*100/%max_enemylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
print 10,500
mov %sinkou,3
goto *common_main



*inps_v

if %sinkou=1 goto *inps001
if %sinkou=2 goto *inps002
gosub *face3
name $name
>Fugyan!\
name ""
dwave 1,"se\syometu.ogg"
cspl 700,702:print 99,4500,"system\breakup.dll/urb"
>Imp is sealed in the form of a bat!\
mov $name,"Imp Girls"
mov %viclose,1:gosub *victory_plural
mov %getexp,45:gosub *lvup
mov %2398,1
goto *sean0374



*inps_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
if %sinkou=1 && %hanyo1=0 gosub *inps_a1_1:goto *common_main
if %sinkou=1 && %hanyo1=1 gosub *inps_a1_2:goto *common_main
if %sinkou=1 && %hanyo1=2 gosub *inps_a1_3:goto *common_main
if %sinkou=1 && %hanyo1=3 gosub *inps_a1_4:goto *common_main
if %sinkou=2 && %hanyo2=0 gosub *inps_a2_1:goto *common_main
if %sinkou=2 && %hanyo2=1 gosub *inps_a2_2:goto *common_main
if %sinkou=2 && %hanyo2=2 gosub *inps_a2_3:goto *common_main
if %sinkou=2 && %hanyo2=3 gosub *inps_a2_4:goto *common_main
if %sinkou=3 && %hanyo3=0 gosub *inps_a3_1:goto *common_main
if %sinkou=3 && %hanyo3=1 gosub *inps_a3_2:goto *common_main
if %sinkou=3 && %hanyo3=2 gosub *inps_a3_3:goto *common_main
if %sinkou=3 && %hanyo3=3 gosub *inps_a3_4:goto *common_main



*inps_main

mov %stopcmd7,1
gosub *cmd_main
if %cmd1=11 csp 690:goto *common_attack
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *inps_kousan
if %cmd1=16 goto *inps_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *inp_main



*inps_a

if %sinkou=1 && %hanyo1=0 gosub *inps_a1_1:goto *common_main
if %sinkou=1 && %hanyo1=1 gosub *inps_a1_2:goto *common_main
if %sinkou=1 && %hanyo1=2 gosub *inps_a1_3:goto *common_main
if %sinkou=1 && %hanyo1=3 gosub *inps_a1_4:goto *common_main
if %sinkou=2 && %hanyo2=0 gosub *inps_a2_1:goto *common_main
if %sinkou=2 && %hanyo2=1 gosub *inps_a2_2:goto *common_main
if %sinkou=2 && %hanyo2=2 gosub *inps_a2_3:goto *common_main
if %sinkou=2 && %hanyo2=3 gosub *inps_a2_4:goto *common_main
if %sinkou=3 && %hanyo3=0 gosub *inps_a3_1:goto *common_main
if %sinkou=3 && %hanyo3=1 gosub *inps_a3_2:goto *common_main
if %sinkou=3 && %hanyo3=2 gosub *inps_a3_3:goto *common_main
if %sinkou=3 && %hanyo3=3 gosub *inps_a3_4:goto *common_main



*inps_a1_1

add %stack,1
if %kousan=2 skip 7
name $name
>Alllright! Rumi, get him! \
name ""
name "Rumi"
>Ok...\
name ""
skillname "Imp Handjob"
lsp 690,":a;chara\inp_ct21.bmp",0,0:print 10,500
>Rumi slowly holds out her hand, and grabs Luka's penis!
skillcount3 4129
mov %damage_kotei,1
damage 210,220
skillname ""
if %mylife=0 sub %stack,1:return *inps_h1
name "Luka"
>Ah...!\
name ""
>Even though she only grabbed it, it feels so good...@
>She uses her palm to rub the back muscle, and rubs my tip with her small fingers.\
>She knows just where a man's weak points are...\
name $name
>Hahaha, doesn't it feel amazing, just from a small touch? \
>If you let her rub it some, it will feel even better you know?@
>So just stay still for a bit, and she'll rub really good!\
name ""
mov %hanyo1,1
sub %stack,1
return



*inps_a1_2

add %stack,1
name $name
>Ahaha, he wants a handjob! @
>Show him your skills, Rumi! \
name ""
name "Rumi"
>Rub, rub... Stroke, stroke...\
name ""
skillname "Imp Handjob"
dwave 1,"se\ero_koki1.ogg"
>Rumi slowly strokes Luka's penis up and down!
skillcount3 4129
mov %damage_kotei,1
damage 210,220
dwave 1,"se\ero_koki1.ogg"
>She rubs her small palms against his back muscle, as her fingertips massage his tip while she strokes!
mov %damage_kotei,1
damage 210,220
skillname ""
name "Rumi"
>Is it good...?\
name ""
skillname "Imp Handjob"
dwave 1,"se\ero_koki1.ogg"
>Rumi gently uses her palm to rub Luka's tip!
skillcount3 4129
mov %damage_kotei,1
damage 210,220
dwave 1,"se\ero_koki1.ogg"
>Her tiny fingers squeezes Luka's shaft as she strokes him up and down!
mov %damage_kotei,1
damage 210,220
skillname ""
if %mylife=0 sub %stack,1:return *inps_h1
name $name
>Well?@>She doesn't look too motivated, but she's skilled, isn't she?\
>Don't you want to come on handjob machine Rumi's paaaalm? \
name ""
mov %hanyo1,2
sub %stack,1
return



*inps_a1_3

add %stack,1
name $name
>Ehh?@> What are you doooing?@
>Do you want to come on little Rumi's hand?\
name ""
name "Rumi"
>Rub rub...\
name ""
skillname "Imp Handjob"
dwave 1,"se\ero_koki1.ogg"
>Rumi slowly strokes Luka's penis!
skillcount3 4129
mov %damage_kotei,1
damage 210,220
dwave 1,"se\ero_koki1.ogg"
>She skillfully presses his back muscle with her small palm as she rubs him!
mov %damage_kotei,1
damage 210,220
skillname ""
name "Rumi"
>Please come...@> Before my hand cramps...\
name ""
skillname "Imp Handjob"
dwave 1,"se\ero_koki1.ogg"
>Making a circle with her thumb and little finger, Rumi rubs right under the neck of Luka's penis!
skillcount3 4129
mov %damage_kotei,1
damage 210,220
dwave 1,"se\ero_koki1.ogg"
>She gently presses on Luka's tip, stimulating him!
mov %damage_kotei,1
damage 210,220
skillname ""
if %mylife=0 sub %stack,1:return *inps_h1
name $name
>Ahaha... It looks like the Hero can't resist it any longer!@
>Rumi! Make him come! \
name ""
name "Rumi"
>...Come.\
name ""
mov %hanyo1,3
sub %stack,1
return



*inps_a1_4

add %stack,1
name "Rumi"
>Hurry up and come...\
name ""
skillname "Imp Handjob"
dwave 1,"se\ero_koki1.ogg"
>Rumi slowly strokes Luka's penis up and down even faster!
skillcount3 4129
mov %damage_kotei,1
damage 210,220
dwave 1,"se\ero_koki1.ogg"
>She uses her nimble fingers to rub his tip, encouraging him to orgasm!
mov %damage_kotei,1
damage 210,220
skillname ""
sub %stack,1
return *inps_h1



*inps_a2_1

add %stack,1
if %kousan=2 skip 8
name $name
>Oh, it looks like he wants a blowjob. @
>Get him, Remi! \
name ""
name "Remi"
>...Mmf.\
name ""
skillname "Imp Blowjob"
dwave 1,"se\ero_pyu2.ogg"
lsp 690,":a;chara\inp_ct11.bmp",0,0:print 10,500
>Remi takes the tip of Luka's penis into her tiny mouth!
skillcount3 4130
mov %damage_kotei,1
damage 210,220
skillname ""
if %mylife=0 sub %stack,1:return *inps_h2
name $name
>Remi's mouth feels nice and warm, doesn't it?@
>If you don't move, she'll even lick it! \
name ""
mov %hanyo2,1
sub %stack,1
return



*inps_a2_2

add %stack,1
name $name
>Ahaha... He's not resisting. @
>Ok Remi, reward him with your tongue! \
name ""
name "Remi"
>Then I'll lick it...@
>...*Lick* *Lick*\
name ""
skillname "Imp Blowjob"
dwave 1,"se\ero_pyu2.ogg"
>Remi's tongue slowly extends, licking around the tip of Luka's penis!
skillcount3 4130
mov %damage_kotei,1
damage 210,220
dwave 1,"se\ero_pyu2.ogg"
>Her small tongue licks Luka's glans clean!
mov %damage_kotei,1
damage 210,220
skillname ""
name $name
>Hehehe... Is she licking your tip?@
>If it's feeling good, it's alright to moan you know. \
name ""
name "Remi"
>*Lick* *Lick*\
name ""
skillname "Imp Blowjob"
dwave 1,"se\ero_pyu2.ogg"
>Remi gently presses her lips down on Luka's penis as she licks him!
skillcount3 4130
mov %damage_kotei,1
damage 210,220
dwave 1,"se\ero_pyu2.ogg"
>Her tongue crawls around the tip of Luka's penis, covering him with her warm saliva!
mov %damage_kotei,1
damage 210,220
skillname ""
if %mylife=0 sub %stack,1:return *inps_h2
name $name
>It felt good when she licked you, didn't it?@
>But it feels way better when she sucks... \
>Someone like you would come right away, I'm sure. @
>If you want to taste Remi's serious blowjob technique, then just stay still... \
name "Remi"
>Please stay still...\
name ""
mov %hanyo2,2
sub %stack,1
return



*inps_a2_3

add %stack,1
name $name
>Hehe, he really wants you to suck him. @
>Give him a taste of your serious blowjob, Remi! \
name ""
name "Remi"
>Ok... Here I go...@
>*Suck*... *Suuuuck*\
name ""
skillname "Imp Blowjob"
dwave 1,"se\ero_pyu2.ogg"
>Remi's lips lock onto Luka's penis, as she starts sucking on him!
skillcount3 4130
mov %damage_kotei,1
damage 210,220
dwave 1,"se\ero_pyu2.ogg"
>At the same time, her tongue wraps around the tip of his penis!
mov %damage_kotei,1
damage 210,220
skillname ""
name "Remi"
>*Lick* *Lick*@
>*Suck* *Suck*\
name ""
skillname "Imp Blowjob"
dwave 1,"se\ero_pyu2.ogg"
>A sweet pleasure fills Luka's body as Remi sucks on him with her tiny mouth!
skillcount3 4130
mov %damage_kotei,1
damage 210,220
dwave 1,"se\ero_pyu2.ogg"
>Remi slowly moves her head back and forth, her lips gliding up and down Luka's shaft!
mov %damage_kotei,1
damage 210,220
skillname ""
if %mylife=0 sub %stack,1:return *inps_h2
name "Luka"
>Haa...!\
name ""
name $name
>Are you almost ready to give up and come?@
>If you just stay still, you'll get to come reeeeally hard in her mouth. \
name ""
name "Remi"
>Nnnmm... It's almost over...@
>So please... Don't move...\
name ""
mov %hanyo2,3
sub %stack,1
return



*inps_a2_4

add %stack,1
name $name
>Aha, so you're ready?@
>Then make him come, Remi! \
name ""
name "Remi"
>This is the last one... So...@
>*Suuuuuuck*\
name ""
skillname "Imp Blowjob"
dwave 1,"se\ero_pyu2.ogg"
>Remi sucks harder on Luka's penis as she moves her head back and forth!
skillcount3 4130
mov %damage_kotei,1
damage 210,220
skillname "Imp Blowjob"
dwave 1,"se\ero_pyu2.ogg"
>Her small lips squeeze down on Luka's glans as she forces him to come!
mov %damage_kotei,1
damage 210,220
skillname ""
sub %stack,1
return *inps_h2



*inps_a3_1

add %stack,1
if %kousan=2 skip 5
name $name
>Your penis wants to feel my breasts?@
>Then... Squeeze! \
name ""
skillname "Imp Paizuri"
dwave 1,"se\ero_paizuri.ogg"
lsp 690,":a;chara\inp_ct01.bmp",0,0:print 10,500
>Imp sandwiches Luka's penis between her large breasts!
skillcount3 4131
mov %damage_kotei,1
damage 210,220
skillname ""
if %mylife=0 sub %stack,1:return *inps_h3
name $name
>My boobs are nice and soft, aren't they?@
>If I squeeze them together some, you'll come really quick... \
name ""
mov %hanyo3,1
sub %stack,1
return



*inps_a3_2

add %stack,1
name $name
>Aha, you want me to squeeze it. @
>Then I'll make you feel reeeeally good! \
name ""
skillname "Imp Paizuri"
dwave 1,"se\ero_paizuri.ogg"
>Imp gently rocks her chest side to side, pressing her breasts against Luka's penis in turn!
skillcount3 4131
mov %damage_kotei,1
damage 210,220
skillname "Imp Paizuri"
dwave 1,"se\ero_paizuri.ogg"
>Luka's penis is squeezed between her warm breasts!
mov %damage_kotei,1
damage 210,220
skillname ""
name $name
>My soft breasts feel good, don't they?@
>I'll rub it slowly, and bring you to a gradual orgasm... \
name ""
skillname "Imp Paizuri"
dwave 1,"se\ero_paizuri.ogg"
>Imp slowly moves her breasts up and down!
skillcount3 4131
mov %damage_kotei,1
damage 210,220
skillname "Imp Paizuri"
dwave 1,"se\ero_paizuri.ogg"
>In time with her slow strokes, she uses her small hands to press her large breasts together!
mov %damage_kotei,1
damage 210,220
skillname ""
if %mylife=0 sub %stack,1:return *inps_h3
name $name
>Ehehe... Your penis is happy between these, isn't he?@
>If you stay still for a little bit, I'll do even better things. \
name ""
mov %hanyo3,2
sub %stack,1
return



*inps_a3_3

add %stack,1
name $name
>Ahaha... You're already totally captivated by an Imp's breasts. @
>Should I make you come already I wooonder?\
name ""
skillname "Imp Paizuri"
dwave 1,"se\ero_paizuri.ogg"
>Imp slowly rocks her breasts back and forth!
skillcount3 4131
mov %damage_kotei,1
damage 210,220
skillname "Imp Paizuri"
dwave 1,"se\ero_paizuri.ogg"
>Luka's penis sinks into her soft, elastic breasts!
mov %damage_kotei,1
damage 210,220
skillname ""
name $name
>You're free to come between my breasts whenever you want. \
name ""
skillname "Imp Paizuri"
dwave 1,"se\ero_paizuri.ogg"
>Imp slowly builds up speed, rubbing her breasts harder against Luka's penis!
skillcount3 4131
mov %damage_kotei,1
damage 210,220
skillname "Imp Paizuri"
dwave 1,"se\ero_paizuri.ogg"
>The sweet pleasure of her soft breasts races up Luka's body from his penis!
mov %damage_kotei,1
damage 210,220
skillname ""
if %mylife=0 sub %stack,1:return *inps_h3
name $name
>Your penis is twitching between my breasts... @
>It wants to explode, doesn't it?\
>Ehehe... Do you want me to finish you off?@
>You want to come between a weak Imp's breasts, don't you?\
name ""
mov %hanyo3,3
sub %stack,1
return



*inps_a3_4

add %stack,1
name $name
>Then I'll make you come...@
>Spurt out between my breasts! \
name ""
skillname "Imp Paizuri"
dwave 1,"se\ero_paizuri.ogg"
>Imp wiggles her upper body, tossing Luka's penis around between her breasts!
skillcount3 4131
mov %damage_kotei,1
damage 210,220
skillname "Imp Paizuri"
dwave 1,"se\ero_paizuri.ogg"
>Her small hands press against her large breasts, squeezing Luka's penis between them!
mov %damage_kotei,1
damage 210,220
skillname ""
sub %stack,1
return *inps_h3



*inps_onedari

mov $list1,"Imp Handjob"
if %4129>0 mov %list_num1,1
mov $list2,"Imp Blowjob"
if %4130>0 mov %list_num2,1
mov $list3,"Imp Paizuri"
if %4131>0 mov %list_num3,1
gosub *cmd_onedari
if %cmd1=11 && %sinkou=1 goto *inps_onedari1
if %cmd1=11 && %sinkou>1 goto *inps_onedari1m
if %cmd1=12 && %sinkou<3 goto *inps_onedari2
if %cmd1=12 && %sinkou=3 goto *inps_onedari2m
if %cmd1=13 goto *inps_onedari3
if %cmd1=-1 goto *inps_main
goto *inps_onedari



*inps_onedari1

gosub *onedari_syori
name $name
>Ahaha, so you want to feel Rumi's handjob? @
>What will you do, Rumi?\
name ""
name "Rumi"
>........Ok.@
>But come quickly, please...?\
name ""
if %hanyo1=0 gosub *inps_a1_1
if %hanyo1>1 skip 2
>Luka remains motionless...\
if %hanyo1=1 gosub *inps_a1_2
if %hanyo1>2 skip 2
>Luka remains motionless...\
if %hanyo1=2 gosub *inps_a1_3
if %hanyo1>3 skip 2
>Luka remains motionless...\
if %hanyo1=3 gosub *inps_a1_4



*inps_onedari1m

gosub *face3
name "Bat"
>Urp...\
name ""
name $name
>Ruuumiii!\
name ""
gosub *face1
goto *inps_main



*inps_onedari2

gosub *onedari_syori
name $name
>Ahaha, so you want to feel Remi's blowjob? @
>What will you do, Remi?\
name ""
name "Remi"
>...Ok... I'll suck it...\
name ""
if %hanyo2=0 gosub *inps_a2_1
if %hanyo2>1 skip 2
>Luka remains motionless...\
if %hanyo2=1 gosub *inps_a2_2
if %hanyo2>2 skip 2
>Luka remains motionless...\
if %hanyo2=2 gosub *inps_a2_3
if %hanyo2>3 skip 2
>Luka remains motionless...\
if %hanyo2=3 gosub *inps_a2_4



*inps_onedari2m

gosub *face3
name "Bat"
>Nooo...\
name ""
name $name
>Reeemiii!\
name ""
gosub *face1
goto *inps_main



*inps_onedari3

gosub *onedari_syori
name $name
>Ahahaha, so you want to feel my breasts?@
>Then I'll give your penis a good stroking with my these! \
name ""
if %hanyo3=0 gosub *inps_a3_1
if %hanyo3>1 skip 2
>Luka remains motionless...\
if %hanyo3=1 gosub *inps_a3_2
if %hanyo3>2 skip 2
>Luka remains motionless...\
if %hanyo3=2 gosub *inps_a3_3
if %hanyo3>3 skip 2
>Luka remains motionless...\
if %hanyo3=3 gosub *inps_a3_4



*inps_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\inp_bk23.bmp",280,0
lsp 690,":a;chara\inp_ct22.bmp",0,0
gosub *syasei2
>As Rumi skillfully strokes Luka's penis, he comes, finally exploding all over her small hands.\
mov %viclose,1:gosub *lose
mov %2698,%2698+1:if %2698=1 mov %count_koenemy,%count_koenemy+1
if %2698>%count_most mov %count_most,%2698:mov $count_mostname,$name+" (2)"
count 5,5
mov $bad1,"Rumi forced Luka to come with her handjob."
gosub *face2
name "Rumi"
>...He came.\
name ""
csp 690:print 10,500
name $name
>Haha, he already came?@
>Did Rumi's handjob feel that good? \
name ""
goto *inps_hb



*inps_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\inp_bk11.bmp",-250,0
lsp 690,":a;chara\inp_ct12.bmp",0,0
gosub *syasei2
>As Remi sucks on Luka's penis, he comes, filling her small mouth with semen.\
mov %viclose,1:gosub *lose
mov %2698,%2698+1:if %2698=1 mov %count_koenemy,%count_koenemy+1
if %2698>%count_most mov %count_most,%2698:mov $count_mostname,$name+" (2)"
count 4,5
mov $bad1,"Remi forced Luka to come with her blowjob."
gosub *face2
name "Remi"
>Nnng... Mmm...\
name ""
csp 690:print 10,500
name $name
>Hahaha, how does his semen taste, Remi?@
>Did her blowjob feel that good, Hero? \
name ""
name "Remi"
>Nnn...\
name ""
name $name
>This time, I'll try tasting some...@
>I'll squeeze out a whole lot! \
name ""
goto *inps_ha



*inps_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\inp_bk02.bmp",0,0
lsp 690,":a;chara\inp_ct02.bmp",0,0
gosub *syasei2
>Sandwiched between Imp's large, soft breasts, Luka comes, covering her chest in semen.\
mov %viclose,1:gosub *lose
mov %2698,%2698+1:if %2698=1 mov %count_koenemy,%count_koenemy+1
if %2698>%count_most mov %count_most,%2698:mov $count_mostname,$name+" (2)"
count 7,5
mov $bad1,"Imp forced Luka to come with her breasts."
gosub *face2
name $name
>Ahaha... You leaked out between my breasts. @
>Aren't you ashamed that a weak little Imp like me made you come?\
name ""
csp 690:print 10,500
goto *inps_ha



*inps_ha

mov $bad2,"After that, Luka was played with by the Imps like a simple toy."
if %2841=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2841,1
name "Luka"
>Ahhh...\
name ""
name $name
>Now I'll squeeze the rest out! \
>...Up we go!\
name ""
>Imp happily runs behind me, and pushes me down.@
>Too weak from my ejaculation, I fall helplessly down on all fours.\
mov %hseanwave,17:hseanwave
cspl 690,706
lsp 700,":a;chara\inp_he1.bmp",0,0:print 10,500
>Like that, Imp quickly slips my penis between her huge, soft breasts.\
name "Luka"
>Ahh...\
name ""
>With my penis wrapped between her large, soft breasts, I feel my body weaken.@
>She uses her small hands to push her huge breasts together, causing her soft skin to rub against my shaft.\
>The soft, elastic feeling of her breasts causes my penis to sink in a little bit.@
>It feels so good, you would think her breasts were designed to be genitals themselves.\
>Even in this humiliating position, I can't stop myself from leaking a moan.\
name $name
>Ehehe... My breasts feel good, don't they?@
>And look at you, moaning in this position! \
>Hahaha, I can see your butt hole from here you know!@
>I'm going to lick it. \
name ""
lsp 700,":a;chara\inp_he2.bmp",0,0:print 10,500
name "Luka"
>Ah... Ahhh!@
>Not there!\
name ""
>Suddenly, I feel Imp's tongue against my anus!@
>Her small, wet tongue licks and rubs around my sensitive hole.\
>She carefully licks all around the entrance, sometimes rubbing me hard with her tongue, other times small, quick licks.\
name $name
>Ehehe... My killer move is a two part weakness assault. @
>If I do it like this, you'll go mad with pleasure in no time. \
name ""
name "Luka"
>S...Stop... Ah!\
name ""
>The ticklish pleasure makes me go limp in seconds.@
>I try to pull away, but my penis is firmly lodged between her huge breasts.\
>Using her hands, she alternates between rubbing me with her right and left breasts.\
>At times, she shakes her chest side to side, making my penis bounce around between the two of them.\
>And all the while, her quick tongue keeps licking around my anus, now completely wet with her saliva.\
name "Luka"
>Ahh... Haa...\
name ""
>Feeling too much pleasure, my waist starts jerking back and forth.@
>My body is reacting too strongly, acting against my mind's wishes.\
name $name
>Ahaha, your waist is shaking. @
>Are you trying to have sex with my breasts?\
>Then you better properly come inside, don't you think?@
>Come on, if you're going to have sex with my breasts, you need to properly come inside them. \
name ""
>Imp presses her face closer to my ass, making her tongue movements get even faster.@
>At the same time, her small hands work her breasts, massaging my penis.\
>With the pleasure attacking me from both ends, I feel like I'm stuck in a cloud of pleasure.\
name "Luka"
>Ahh... I'm going to come...\
name ""
name $name
>Ahaha, hurry up and come! @
>Now you're just a little Imp's prey. \
name ""
>Imp giggles as she presses her breasts together even harder, and licks my anus even faster.\
name "Luka"
>Ahhh!!!\
name ""
gosub *syasei1
lsp 700,":a;chara\inp_he3.bmp",0,0
gosub *syasei2
>Wrapped up in her soft breasts, I explode.@
>As my penis pulses between them, I let out a sigh of pure ecstasy.\
name $name
>Aha, you came, you came! @
>*Lick* *Lick*\
name ""
>Even during my ejaculation, she continues licking my anus, and uses her breasts to squeeze out all of my semen.\
name "Luka"
>Ahh...\
name ""
>She forced me to come in this embarrassing position, milking me with her own breasts...@
>But Imp still isn't even close to stopping...\
name $name
>Ehehe, you leaked out between my breasts. @
>But I still need to squeeze out a lot more penis milk! \
name ""
name "Luka"
>No more... Haa!\
name ""
>Already feeling humiliated at this position, I can't stop myself from crying out as Imp flexes her tongue, and forces it into my anus.\
>The tongue that was only licking around my anus finally was pushed inside...\
name "Luka"
>Ah... Hyaaa!\
name ""
>My body twists and spasms in pleasure as her small tongue invades my body, sending waves of strange pleasure through me.\
>Suddenly, a familiar numbness rises through my body...\
gosub *syasei1
lsp 700,":a;chara\inp_he4.bmp",0,0
gosub *syasei2
name $name
>Haaa...\
name ""
>In only moments, I explode between her breasts again.@
>My semen spurts out and drips to the ground, like I accidentally came.\
name $name
>Ahah, you came in no time once I played with your ass. @
>Even though you're a man!@>How embaaarassing. \
name ""
>Imp chuckles as she continues toying with me.@
>This little Imp is enjoying teasing me wherever she can...\
>Her tongue, still inside me, continues licking and rubbing all over the place.@
>At the same time, my penis is being crushed between her huge, soft breasts.\
>I drown in the ecstasy of having my two weakest points played with at the same time.@
>Giving myself over, I relax my body as the sensations swarm over me.\
name "Luka"
>I...It feels so good... Ahhh...\
name ""
gosub *syasei1
lsp 700,":a;chara\inp_he5.bmp",0,0
gosub *syasei2
>I'm led to another ejaculation in moments, my body shaking as I come between her seductive breasts.\
>After coming between her breasts so many times, they're dripping with my semen.@
>Just looking at it is humiliating...\
>The important seed I should be using for having a child, just pointlessly dripping to the ground...\
mov %hseanwave,0:hseanwave
name $name
>Awww... You're leaking all over the place.@> What a naughty boy.@
>It looks like I need to give some discipline to this ill mannered penis of yours. \
name ""
name "Luka"
>Ahh...\
name ""
name $name
>You're my slave from now on.@
>I'm going to squeeze out your male milk for ever and ever. \
name ""
name "Luka"
>...............\
name ""
>I can't defy this weak Imp any longer.@
>Humiliatingly milking me of semen in this posture, I slowly break.\
>This Imp, far weaker than me, continues squeezing out my semen like I was a simple toy of hers for the rest of my life...\
gosub *anten
>...............\
goto *badend



*inps_hb

mov $bad2,"After that, Luka was played with by the Imps like a simple toy."
if %2842=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2842,1
name "Luka"
>Ahh...\
name ""
name $name
>Alright, get him! \
name ""
name "Luka"
>Wh...What are... Stop!\
name ""
>Too weak to resist, I just look on in surprise as the Imps push their faces towards my groin!\
mov %hseanvoice,3:hseanvoice
cspl 690,706
lsp 700,":a;chara\inp_hf1.bmp",0,0:print 10,500
>One of them sticks their tongue out toward my ass...@
>And the other one swallows my penis!\
name "Luka"
>Ahh...\
name ""
>I moan in surprise as the sudden stimulation comes over me.\
>Remi's small mouth drips with saliva as she eagerly sucks on me.\
>Her small lips rub and press against my penis, as if she was trying to chew on me without using her teeth.\
name "Rumi"
>Nnn... *Lick*\
name ""
name "Luka"
>Ah!@>Don't lick there!\
name ""
>Rumi starts licking at my anus, her tongue racing around the hole.@
>Her quick tongue darts around the outside, only invading inside for a second...\
name "Luka"
>Ah...\
name ""
name $name
>Ehehe... Rumi's ass licking is amazing, isn't it?\
>All of us love licking a little bit...@> But she loves it the most.\
>When she licks people, they always feel so good they can't stop themselves from peeing. \
name ""
name "Rumi"
>*Lick* *Lick*\
name ""
>Her small tongue runs around my anus, slowly building up her saliva with pass after pass.@
>Every so often, her quick tongue darts in and out of my anus, so fast it's like a tiny piston.\
name "Luka"
>Ahh!\
name ""
>The sudden movements make my waist push forward into the back of Remi's throat as she sucks on me from the front.@
>Far from being surprised, she uses the thrusts to suck on my tip even harder.\
name "Luka"
>Ahh...\
name ""
name $name
>Ehe... Remi's mouth techniques are unbearable, aren't they?@
>She won't let go until she's made you come at least five times, too.\
>She'll suck up your semen, straight from your roots. @
>Ahaha, you look so pitiful! \
name ""
name "Remi"
>Mmm... *Suck*\
name ""
>Remi slowly sucks harder, pulling my penis deeper into her small mouth.@
>The vacuum like suction washes pleasure over me like a wave.\
>Her quick tongue movements feel like another creature entirely in her mouth, skillfully licking every inch of my tip as she sucks.\
name "Luka"
>Ahh!\
name ""
>With the two of them licking my penis and ass at the same time, my body rocks back and forth, stuck between the two sources of pleasure.\
>My body twitches and spasms, as I'm left unable to hold back my rising desire any longer.\
name "Luka"
>Ahh... I'm going to come...\
name ""
name "Remi"
>Nnn... *Lick*\
name ""
>The moment I cry out about my coming orgasm, Remi sucks far harder than before, drawing me all the way inside her tight mouth.\
>Her tiny mouth narrows as she sucks as hard as she can, her tongue licking rapidly back and forth across my glans.\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\inp_hf2.bmp",0,0
gosub *syasei2
>Feeling like she's sucking out my semen itself, I moan in ecstasy as I explode in her mouth.\
name "Remi"
>Nnn... *Gulp* *Gulp*\
name ""
>Remi eagerly swallows my semen, gulping down each time I spurt inside her mouth.@
>Her cheeks narrow inward and rub against my glans with each swallow, eliciting a moan from me.\
name "Luka"
>Ahhh!\
name ""
name "Rumi"
>*Lick* *Lick*\
name ""
>All during my ejaculation, Rumi continues licking my ass.@
>The two little Imps keep toying with me until my ejaculation is over.\
name "Luka"
>Ahh...\
name ""
>Since the two of them were attacking me, I feel twice as drained as usual.@
>Feeling even weaker than before, there's nothing I can do to resist...\
name $name
>Ahaha, she drank it all.@
>But there's a lot more to swallow still... \
name ""
name "Luka"
>S...Stop...@
>Ahhh!\
name ""
name "Remi"
>*Lick* *Suck*\
name ""
name "Rumi"
>*Lick*\
name ""
>Without letting me rest, the two Imps continue teasing me.@
>If I try to pull out of Remi's mouth, then Rumi's tongue pushes me back in.\
>Their warm saliva is covering both my penis and ass now, filling me with a strange warmth.@
>When Rumi's tongue darts into my ass itself, my waist jumps, bringing me deeper inside Remi's mouth.\
name "Luka"
>Ahh!@> Stop, stop!\
name ""
name $name
>You're still saying that?@
>Ok girls, finish him off in an instant! \
name ""
name "Remi"
>...*Suck* *Lick*\
name ""
name "Rumi"
>*Lick* *Lick* *Lick*\
name ""
name "Luka"
>Ahhh!\
name ""
mov %hseanvoice,4:hseanvoice
>As their double attack suddenly increases in intensity, my eyes roll in the back of my head for a moment.\
>Remi's vacuum like mouth pulls even harder, causing my glans to rub against the back of her throat.\
>At the same time, Rumi's tongue starts pushing in and out of my ass, the tiny thing acting almost like a piston raping me.\
name "Remi"
>*Suck* *Suck*\
name ""
name "Rumi"
>*Lick* *Lick* *Lick*\
name ""
name "Luka"
>Hyaaa! Stop!@
>I'm going to come!\
name ""
>I helplessly writhe between the two small girls, unable to stop my body from reacting.@
>In only seconds of it, I'm already at the cliff of another orgasm.\
name $name
>Ahaha, you really did finish him off in an instant.@
>Ok, finish him! \
name ""
>At Imp's command, the two of them bring their torture of pleasure to the climax.\
>Remi sucks me all the way in, and Rumi's tongue presses against my prostate...\
name "Luka"
>Aiiieee!!\
name ""
gosub *syasei1
lsp 700,":a;chara\inp_hf3.bmp",0,0
gosub *syasei2
name "Remi"
>Nnn...\
name ""
>Remi happily drinks the semen I spurt into her mouth, small droplets falling out of her tiny mouth as she gulps.\
name "Luka"
>Haa...\
name ""
>I feel so weak...@>It's like she's drinking down my soul itself.\
name "Remi"
>Nnn... *Suck*\
name ""
name "Rumi"
>*Lick* *Lick*\
name ""
name "Luka"
>N...No... No more...@
>Stop... Ah...\
name ""
>But the little Imps don't give me any time to breathe.@
>Their tongues, toying with me, don't stop for even a moment.\
>My body is helplessly shaking between them, unable to do anything against their mouth's onslaught.\
name "Luka"
>Stop... No... Ahh...@
>C...Coming...!\
name ""
gosub *syasei1
lsp 700,":a;chara\inp_hf4.bmp",0,0
gosub *syasei2
name "Remi"
>Nnn... *Gulp* *Gulp*\
name ""
>I erupt again inside her mouth.@
>Remi tries to drink it down as I spurt inside her, but some still drips out of the side of her mouth.\
name "Rumi"
>*Lick* *Lick*\
name ""
>Some of the semen that splashed out of her mouth is eagerly licked up by Rumi.@
>The two little Imps are so happily feeding on my semen...\
name $name
>Ahaha... You're just our prey now.@
>We'll keep you as a pet, and milk you all the time. \
name ""
name "Remi"
>*Suck* *Suck*\
name ""
name "Rumi"
>*Lick* *Lick*\
name ""
name "Luka"
>Ah...\
name ""
>Thus, I'm kept as a simple sex slave for the Imps...@
>They keep me as a pet, and continue milking me all day.\
>These small monsters, far weaker than myself, keep forcing me to ejaculate...@
>Like that, I live out the rest of my life at the mercy of these small girls.\
mov %hseanvoice,0:hseanvoice
gosub *anten
>...........\
goto *badend



*eva_start

mov $name,"Eva"
mov $name2,"Eva"
mov $lavel,"eva"
mov $tatie1,"eva_st01"
mov $tatie2,"eva_st02"
mov $tatie3,"eva_st03"
mov $tatie4,"eva_ha1"
mov $haikei,"bg106"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,20000
if %nanido=2 mov %max_enemylife,24000
if %nanido=3 mov %max_enemylife,28000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,20
if %nanido=3 mov %earth_keigen,10
mov %alice_skill,1
mov %alice_skill1,100
mov %alice_skill2,100
mov %alice_skill3,100
mov %music,2
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_dassyutu1,"That's too bad... I was going to rape you."
mov $mogaku_dassyutu2,""
mov $mogaku_earth_dassyutu1,"Guh... Is this Gnome's power?"
mov $mogaku_earth_dassyutu2,""
mov $half_s1,"Isn't a Succubus' techniques the best?"
mov $half_s2,"Now, please finish..."
mov $kiki_s1,"Are you nearly at your limit?"
mov $kiki_s2,"In the end... You want to come inside me, don't you?"
mov %end_n,14
mov %exp_minus,180045
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,5
mov %owaza_count1b,5
mov %owaza_count3a,9
mov %owaza_count3b,5
name "Luka"
>Stop it!\
name ""
>I jump into the Mayor's house and stop Eva moments before she was about to kick the Succubus.\
>This magic power...@>She must be the one who set up that barrier!\
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\eva_st01.bmp",160,0:print 10,500
name "Alice"
>Sheesh... So you made it in time?@
>I was just about to use the word of dispel, too.\
name ""
>It looks like Alice was watching, about to jump in if I didn't make it in time.\
csp 701
gosub *face1
name $name
>Heh...@> So you're the famous disgraced Hero, huh?@
>A feast the former Me would never have been able to taste.\
name ""
>Eva looks me up and down with a leering smile.\
name $name
>Good... I'll suck up all your semen.@
>I'll drink it all down, and leave you a withered husk.\
name ""
goto *common_main



*eva_v

gosub *face3
name $name
>Why me...!?@
>How could this...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Eva is sealed in the form of a bat!\
mov %viclose,1:gosub *victory
mov %getexp,210000:gosub *lvup
mov %2400,1
goto *sean0375



*eva_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Yes...@> You made the right choice, obediently becoming my prey.@
>You'll be finished in the dreamlike pleasure...\
name ""
goto *eva_a



*eva_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *eva_kousan
if %cmd1=16 goto *eva_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *eva_main



*eva_a

if %kousoku=1 gosub *eva_a6:goto *common_main
if %kousoku=2 rnd2 %ransu,1,3
if %kousoku=2 && %ransu<3 gosub *eva_a8:goto *common_main
if %kousoku=2 && %ransu=3 && %owaza_count3c>3 && %enemy_wind=0 gosub *eva_a9:goto *common_main
if %kousoku=2 skip -3
if %kousoku=3 rnd2 %ransu,1,2
if %kousoku=3 && %ransu=1 gosub *eva_a10:goto *common_main
if %kousoku=3 && %ransu=2 gosub *eva_a11:goto *common_main
if %counter>0 add %counter,1
if %counter>4 gosub *eva_x2:goto *common_main
if %counter>0 rnd2 %ransu,1,2
if %counter>0 && %ransu=1 gosub *eva_a12:goto *common_main
if %counter>0 && %ransu=2 gosub *eva_a13:goto *common_main
if %kousan=1 skip 5
if %enemy_wind>0 skip 4
if %enemy_earth>0 skip 3
mov %hanyo2,%hanyo2+1
if %hanyo2>4 gosub *eva_x1:goto *common_main
if %enemy_earth=5 gosub *eva_a5:goto *common_main
rnd2 %ransu,1,10
if %ransu=1 gosub *eva_a1:goto *common_main
if %ransu=2 gosub *eva_a2:goto *common_main
if %ransu=3 gosub *eva_a3:goto *common_main
if %ransu=4 && %owaza_count3b>6 gosub *eva_a4:goto *common_main
if %ransu=5 && %owaza_count1a>6 gosub *eva_a5:goto *common_main
if %ransu=6 && %owaza_count1b>6 gosub *eva_a7:goto *common_main
if %ransu>6 && %ransu<9 && %owaza_count3a>10 && %enemy_wind=0 && %enemy_earth=0 gosub *eva_el1:goto *common_main
if %ransu>8 && %owaza_count3a>10 && %enemy_wind=0 && %enemy_earth=0 gosub *eva_el2:goto *common_main
skip -9



*eva_el1

add %stack,1
mov %owaza_count3a,0
name $name
>Come, Zylphe!\
name ""
skillname "Wind Spirit Summon"
mov %enemy_wind,6
mov %kaihi_el,50
dwave 2,"se\wind2.ogg"
lsp2 0,":a;chara\zylphe_st02.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *enemy_elm_print
>Eva summons a spirit of wind!\
skillname ""
sub %stack,1
return



*eva_el2

add %stack,1
mov %owaza_count3a,0
name $name
>Come, Gnomaren!\
name ""
skillname "Summon Earth Spirit"
mov %enemy_earth,6
mov %damage_keigen_el,50
dwave 2,"se\earth1.ogg"
lsp2 0,":a;chara\gnomaren_st01.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *enemy_elm_print
>Eva summons a spirit of earth!\
skillname ""
sub %stack,1
return



*eva_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll milk it out with my own hands..."
if %ransu=2 mov $sel1,"Spray it out all over my hands."
if %ransu=3 mov $sel1,"Hehe... Cover my hands with semen."
name $name
eng $sel1:$sel6\
name ""
skillname "Succubus Handjob"
dwave 1,"se\ero_koki1.ogg"
>Eva rhythmically strokes Luka's penis with her soft hands!
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,10
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3971
mov %earth_keigen_el,70
if %nanido<2 damage 280,300
if %nanido=2 damage 320,340
if %nanido=3 damage 360,380
if %enemy_wind=0 skip 13
dwave 1,"se\ero_koki1.ogg"
>She uses her fingers to rub underneath the neck of his penis at the same time!
mov %earth_keigen_el,70
if %nanido<2 damage 280,300
if %nanido=2 damage 320,340
if %nanido=3 damage 360,380
dwave 1,"se\ero_koki1.ogg"
>Eva rubs the tip of Luka's penis with her soft palm!
mov %earth_keigen_el,70
if %nanido<2 damage 280,300
if %nanido=2 damage 320,340
if %nanido=3 damage 360,380
skillname ""
if %mylife=0 sub %stack,1:return *eva_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*eva_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"If I sandwich it like this..."
if %ransu=2 mov $sel1,"Do my soft breasts feel good?"
if %ransu=3 mov $sel1,"Your penis will melt in pleasure between these..."
name $name
eng $sel1:$sel6\
name ""
skillname "Succubus Tit Fuck"
lsp 690,":a;chara\eva_ct01.bmp",0,0:print 10,500
dwave 1,"se\ero_sigoki1.ogg"
>Eva sandwiches Luka's penis between her breasts!
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,10
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3972
mov %earth_keigen_el,70
if %nanido<2 damage 290,310
if %nanido=2 damage 330,350
if %nanido=3 damage 370,390
if %enemy_wind=0 skip 13
dwave 1,"se\ero_sigoki1.ogg"
>Eva slowly presses her breasts together harder and harder!
mov %earth_keigen_el,70
if %nanido<2 damage 290,310
if %nanido=2 damage 330,350
if %nanido=3 damage 370,390
dwave 1,"se\ero_sigoki1.ogg"
>She bounces her left and right breasts up and down in alternate motions!
mov %earth_keigen_el,70
if %nanido<2 damage 290,310
if %nanido=2 damage 330,350
if %nanido=3 damage 370,390
skillname ""
if %mylife=0 sub %stack,1:return *eva_h2
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*eva_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Let me see that pathetic face of yours..."
if %ransu=2 mov $sel1,"I'll suck hard, so shoot out a lot."
if %ransu=3 mov $sel1,"Finish inside my mouth... Mmm..."
name $name
eng $sel1:$sel6\
name ""
skillname "Succubus Blowjob"
lsp 690,":a;chara\eva_ct11.bmp",0,0:print 10,500
dwave 1,"se\ero_buchu2.ogg"
>Eva sucks Luka's penis into her mouth, coiling her tongue around it at the same time!
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,10
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3973
mov %earth_keigen_el,70
if %nanido<2 damage 300,320
if %nanido=2 damage 340,360
if %nanido=3 damage 380,400
if %enemy_wind=0 skip 13
dwave 1,"se\ero_buchu2.ogg"
>Eva sucks on Luka's penis like a vacuum!
mov %earth_keigen_el,70
if %nanido<2 damage 300,320
if %nanido=2 damage 340,360
if %nanido=3 damage 380,400
dwave 1,"se\ero_buchu2.ogg"
>Taking him deep inside her mouth, Luka's tip rubs against the back of her throat!
mov %earth_keigen_el,70
if %nanido<2 damage 300,320
if %nanido=2 damage 340,360
if %nanido=3 damage 380,400
skillname ""
if %mylife=0 sub %stack,1:return *eva_h3
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*eva_a4

add %stack,1
mov %owaza_count3b,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Does it feel good when I step on it? Haha."
if %ransu=2 mov $sel1,"Can you endure having it trampled on?"
if %ransu=3 mov $sel1,"Are you going to come from being stepped on? How pitiful."
name $name
eng $sel1:$sel6\
name ""
skillname "Succubus Footjob"
dwave 1,"se\ero_koki1.ogg"
lsp 690,":a;chara\eva_ct31.bmp",0,0:print 10,500
>Eva presses the soft sole of her foot against Luka's penis!
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,10
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3974
mov %earth_keigen_el,70
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
dwave 1,"se\ero_koki1.ogg"
>Eva slowly puts more and more pressure on her foot!
mov %earth_keigen_el,70
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
dwave 1,"se\ero_koki1.ogg"
>She moves her foot up and down quickly, massaging Luka's penis!
mov %earth_keigen_el,70
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
if %enemy_wind=0 skip 13
dwave 1,"se\ero_koki1.ogg"
>Eva uses her toes to grab and play with the tip of Luka's penis!
mov %earth_keigen_el,70
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
dwave 1,"se\ero_koki1.ogg"
>At the same time, she twists her foot side to side, pressing her heel against Luka's shaft!
mov %earth_keigen_el,70
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
skillname ""
if %mylife=0 sub %stack,1:return *eva_h4
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*eva_a5

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 4
name $name
>Have you ever had it squeezed here?\
name ""
skillname "Succubus Armpit"
dwave 1,"se\ero_koki1.ogg"
lsp 690,":a;chara\eva_ct21.bmp",0,0:print 10,500
>Eva locks Luka's penis underneath her armpit!
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,10
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3975
mov %earth_keigen_el,70
if %nanido<2 damage 180,200
if %nanido=2 damage 220,240
if %nanido=3 damage 260,280
mov $tatie4,"eva_st02"
mov %kousoku,1:gosub *status_print
>Luka has been bound by Eva!\
skillname ""
if %mylife=0 sub %stack,1:return *eva_h5
name $name
>Now you can't escape.@
>I'll squeeze out your semen with my armpit...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,1
if %earth=0 && %nanido=2 mov %genmogaku,1
if %earth=0 && %nanido=3 mov %genmogaku,2
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,1
if %enemy_earth>0 mov %genmogaku,99
mov $mogaku_sel1,"You can't escape anymore..."
mov $mogaku_sel2,"Give up and become my prey."
mov $mogaku_sel3,"Do you want to come while you struggle?"
mov $mogaku_sel4,"No matter how much you struggle, you can't escape from my armpit."
mov $mogaku_sel5,"Do you want me to squeeze you even tighter?"
sub %stack,1
return



*eva_a6

add %stack,1
>Luka has been bound by Eva...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Let me make you come with my armpit..."
if %ransu=2 mov $sel1,"Does it feel good in there?"
if %ransu=3 mov $sel1,"Haha... Can you feel my sweat?"
name $name
eng $sel1:$sel6\
name ""
skillname "Succubus Armpit"
dwave 1,"se\ero_koki1.ogg"
>Eva squeezes Luka's penis with her sweaty armpit!
skillcount3 3975
mov %earth_keigen_el,70
if %nanido<2 damage 180,200
if %nanido=2 damage 220,240
if %nanido=3 damage 260,280
if %enemy_wind=0 skip 13
dwave 1,"se\ero_koki1.ogg"
>Eva moves her upper arm, rubbing Luka's penis with her armpit!
mov %earth_keigen_el,70
if %nanido<2 damage 180,200
if %nanido=2 damage 220,240
if %nanido=3 damage 260,280
dwave 1,"se\ero_koki1.ogg"
>Eva squeezes Luka's penis even tighter with her armpit!
mov %earth_keigen_el,70
if %nanido<2 damage 180,200
if %nanido=2 damage 220,240
if %nanido=3 damage 260,280
skillname ""
if %mylife=0 sub %stack,1:return *eva_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*eva_a7

add %stack,1
mov %owaza_count1b,0
mov %owaza_num1,2
if %kousan=2 skip 4
name $name
>It's time to prey on you...\
name ""
skillname "Succubus Hold"
eng "Eva pushes Luka down, and grabs hold of him!":$sel6/
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,10
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
mov $tatie4,"eva_ha1"
mov %kousoku,2:gosub *status_print
>Luka has been bound by Eva!\
skillname ""
name $name
>Haha... You're at my mercy, now.@
>How does it feel in the moments before I rape you?\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,2
if %earth=0 && %nanido=2 mov %genmogaku,2
if %earth=0 && %nanido=3 mov %genmogaku,3
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
if %enemy_earth>0 mov %genmogaku,99
mov $mogaku_sel1,"I won't let go... Hehe."
mov $mogaku_sel2,"Did you think I would let you escape that easily?"
mov $mogaku_sel3,"Haha... What weak resistance."
mov $mogaku_sel4,"You can't even break free from a woman's hold?"
mov $mogaku_sel5,"In truth, you actually want me to rape you, don't you?"
sub %stack,1
return



*eva_a8

add %stack,1
>Luka has been bound by Eva...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Just a little preparations..."
if %ransu=2 mov $sel1,"Haha, do you want to stick it in already? Or be squeezed some more?"
if %ransu=3 mov $sel1,"Even though you're not in me yet, are you already going to come?"
name $name
eng $sel1:$sel6\
name ""
skillname "Succubus Intercrural"
dwave 1,"se\ero_koki1.ogg"
>Eva rubs Luka's penis against the outside of her vagina!
skillcount3 3976
mov %earth_keigen_el,70
if %nanido<2 damage 200,220
if %nanido=2 damage 240,260
if %nanido=3 damage 280,300
if %enemy_wind=0 skip 13
dwave 1,"se\ero_koki1.ogg"
>She uses her thighs to squeeze Luka's penis!
mov %earth_keigen_el,70
if %nanido<2 damage 200,220
if %nanido=2 damage 240,260
if %nanido=3 damage 280,300
dwave 1,"se\ero_koki1.ogg"
>Eva wiggles her waist, skillfully tossing Luka's penis around!
mov %earth_keigen_el,70
if %nanido<2 damage 200,220
if %nanido=2 damage 240,260
if %nanido=3 damage 280,300
skillname ""
if %mylife=0 sub %stack,1:return *eva_h6
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*eva_a9

add %stack,1
mov %owaza_count3c,0
if %kousan=2 skip 5
name $name
>Now to rape you.@
>I'll squeeze your dick in my pussy, and send you to heaven...\
name ""
skillname "Succubus Vagina"
dwave 1,"se\ero_pyu1.ogg"
lsp 700,":a;chara\eva_ha3.bmp",0,0:print 10,500
>Eva presses her waist against Luka's, forcing him into her!
rnd2 %ransu,0,99:if %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
mov %damage_kotei,1
damage 500,600
mov $tatie4,"eva_ha3"
mov %kousoku,3:gosub *status_print
>Luka is being raped by Eva!\
skillname ""
if %mylife=0 sub %stack,1:return *eva_h7
name "Luka"
>Ahhh!!\
name ""
>Her warm vaginal walls invite me inside, the wet touch of her flesh sending shivers of pleasure through me.\
mov %genmogaku,99
mov $mogaku_sel1,"Now you can't run away any longer..."
mov $mogaku_sel2,"Just give up and become my prey..."
mov $mogaku_sel3,"Do you want to come as you struggle?"
mov $mogaku_sel4,"Look at you... Struggling as a woman tries to ride you."
mov $mogaku_sel5,"I'll keep raping you until you're dried up..."
sub %stack,1
return



*eva_a10

add %stack,1
>Luka is being raped by Eva...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Shall I move my hips some?":mov $sel2,"Eva moves up and down, and back and forth!"
if %ransu=2 mov $sel1,"Come inside me!":mov $sel2,"Eva grinds hard against Luka!"
if %ransu=3 mov $sel1,"Can you withstand my hip movements?":mov $sel2,"Eva bounces up and down at an incredible speed!"
name $name
eng $sel1:$sel6\
name ""
skillname "Succubus Hip Swing"
dwave 1,"se\ero_chupa3.ogg"
eng $sel2:$sel6
skillcount3 3977
mov %damage_kotei,1
damage 500,600
skillname ""
if %mylife=0 sub %stack,1:return *eva_h8
sub %stack,1
return



*eva_a11

add %stack,1
>Luka is being raped by Eva...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll squeeze you dry, nice and slowly..."
if %ransu=2 mov $sel1,"Your semen is merely food for me, you know?"
if %ransu=3 mov $sel1,"Hehe... I'll sip up your spirit with my pussy."
name $name
eng $sel1:$sel6\
name ""
skillname "Energy Drain"
dwave 1,"se\ero_chupa6.ogg"
>Eva's vagina squeezes Luka's penis, the pleasure draining him of energy!
skillcount3 3978
mov %damage_kotei,1
damage 500,600
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *eva_h9
sub %stack,1
return



*eva_x1

add %stack,1
if %kousan=2 skip 4
name $name
>Hehe... Do you like my ass?\
name ""
mov $tatie1,"eva_st11"
mov $tatie2,"eva_st11"
mov $tatie3,"eva_st11"
gosub *face1
skillname "Succubus Invitation"
>Eva sticks out her ass, inviting Luka to her!\
skillname ""
mov %counter,1
sub %stack,1
return



*eva_a12

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My ass is nice and soft..."
if %ransu=2 mov $sel1,"Cover my ass with semen."
if %ransu=3 mov $sel1,"Are you going to come as I squeeze your dick with my ass?"
name $name
eng $sel1:$sel6\
name ""
skillname "Succubus Ass Press"
dwave 1,"se\ero_koki1.ogg"
>Eva pushes her ass against Luka's penis, squeezing it between her cheeks!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3979
if %nanido<2 damage 250,270
if %nanido=2 damage 290,310
if %nanido=3 damage 330,350
skillname ""
if %mylife=0 sub %stack,1:return *eva_h10
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*eva_a13

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll squeeze out your semen with my tail."
if %ransu=2 mov $sel1,"I'll milk it all out with my tail."
if %ransu=3 mov $sel1,"I'll suck your dick with my tail."
name $name
eng $sel1:$sel6\
name ""
skillname "Tail Drain"
dwave 1,"se\ero_chupa6.ogg"
>Eva's tail sucks hard on Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3980
if %nanido<2 damage 260,280
if %nanido=2 damage 300,320
if %nanido=3 damage 340,360
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *eva_h11
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*eva_x2

add %stack,1
if %kousan=2 skip 4
name $name
>It's rude of a man to ignore a woman's invitation...\
name ""
mov $tatie1,"eva_st01"
mov $tatie2,"eva_st02"
mov $tatie3,"eva_st03"
gosub *face1
>Eva turns back around!\
mov %counter,0
mov %hanyo2,0
sub %stack,1
return



*eva_counter

add %stack,1
mov %counter,0
if %kousan=2 skip 5
name $name
>Too bad...@
>I'll crush you with my ass.\
name ""
skillname "Hip Hold"
mov $tatie4,"eva_hb1"
lsp 700,":a;chara\eva_hb1.bmp",0,0:print 10,500
>Eva jumps back the moment of Luka's attack, and presses her ass into his face!@
mov %kousoku,4:gosub *status_print
>Luka has been bound by Eva!\
skillname ""
name "Luka"
>Ahhh!\
name ""
name $name
>Hehe... You can't move, can you?@
>Now I'll just play with you...\
name ""
mov $mogaku_sel1,"I won't let you go."
mov $mogaku_sel2,"Did you think you could get away from me that easily?"
mov $mogaku_sel3,"Haha... What weak resistance."
mov $mogaku_sel4,"Even if you struggle, you won't get away from my ass."
mov $mogaku_sel5,"Do you want me to press my ass even harder against your face?"
if %kousan=2 sub %stack,1:return
sub %stack,1
rnd2 %ransu,1,2
if %ransu=1 goto *eva_a14
if %ransu=2 goto *eva_a15



*eva_a14

add %stack,1
>Eva is sitting on Luka's face, holding him down...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll stroke your dick until you come..."
if %ransu=2 mov $sel1,"I'll milk you like a cow."
if %ransu=3 mov $sel1,"Let's see you orgasm with my ass in your face."
name $name
eng $sel1:$sel6\
name ""
skillname "Succubus Facesitting Milking"
dwave 1,"se\ero_sigoki1.ogg"
mov $tatie4,"eva_hb1"
lsp 700,":a;chara\eva_hb1.bmp",0,0:print 10,500
>Eva rubs her ass hard against Luka's face!
skillcount3 3981
mov %damage_kotei,1
if %nanido<2 damage 200,300
if %nanido=2 damage 220,320
if %nanido=3 damage 240,340
dwave 1,"se\ero_koki1.ogg"
>At the same time, she skillfully strokes Luka's penis, as if milking him!
mov %damage_kotei,1
if %nanido<2 damage 200,300
if %nanido=2 damage 220,320
if %nanido=3 damage 240,340
skillname ""
if %mylife=0 sub %stack,1:return *eva_h12
if %kousan=2 sub %stack,1:return
sub %stack,1
rnd2 %ransu,1,2
if %ransu=1 goto *eva_a14
if %ransu=2 goto *eva_a15



*eva_a15

add %stack,1
>Eva is sitting on Luka's face, holding him down...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"How does it feel being sucked like this?"
if %ransu=2 mov $sel1,"I'll suck you until you're dry... Hehe."
if %ransu=3 mov $sel1,"Don't hold back a single drop..."
name $name
eng $sel1:$sel6\
name ""
skillname "Succubus Facesitting Sucking"
dwave 1,"se\ero_sigoki1.ogg"
mov $tatie4,"eva_hb4"
lsp 700,":a;chara\eva_hb4.bmp",0,0:print 10,500
>Eva rubs her ass hard against Luka's face!
skillcount3 3982
mov %damage_kotei,1
if %nanido<2 damage 200,300
if %nanido=2 damage 220,320
if %nanido=3 damage 240,340
dwave 1,"se\ero_chupa6.ogg"
>At the same time, Eva's tail sucks hard on Luka's penis!
mov %damage_kotei,1
if %nanido<2 damage 200,300
if %nanido=2 damage 220,320
if %nanido=3 damage 240,340
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *eva_h13
if %kousan=2 sub %stack,1:return
sub %stack,1
rnd2 %ransu,1,2
if %ransu=1 goto *eva_a14
if %ransu=2 goto *eva_a15



*eva_onedari

mov $list1,"Succubus Handjob"
if %3971>0 mov %list_num1,1
mov $list2,"Succubus Tit Fuck"
if %3972>0 mov %list_num2,1
mov $list3,"Succubus Blowjob"
if %3973>0 mov %list_num3,1
mov $list4,"Succubus Footjob"
if %3974>0 mov %list_num4,1
mov $list5,"Succubus Armpit"
if %3975>0 mov %list_num5,1
mov $list6,"Succubus Intercrural"
if %3976>0 mov %list_num6,1
mov $list7,"Succubus Hip Swing"
if %3977>0 mov %list_num7,1
mov $list8,"Energy Drain"
if %3978>0 mov %list_num8,1
mov $list9,"Succubus Ass Press"
if %3979>0 mov %list_num9,1
mov $list10,"Tail Drain"
if %3980>0 mov %list_num10,1
mov $list11,"Succubus Facesitting Milking"
if %3981>0 mov %list_num11,1
mov $list12,"Succubus Facesitting Sucking"
if %3982>0 mov %list_num12,1
gosub *cmd_onedari
if %cmd1=11 goto *eva_onedari1
if %cmd1=12 goto *eva_onedari2
if %cmd1=13 goto *eva_onedari3
if %cmd1=14 goto *eva_onedari4
if %cmd1=15 goto *eva_onedari5
if %cmd1=16 goto *eva_onedari6
if %cmd1=17 goto *eva_onedari7
if %cmd1=18 goto *eva_onedari8
if %cmd1=19 goto *eva_onedari9
if %cmd1=20 goto *eva_onedari10
if %cmd1=21 goto *eva_onedari11
if %cmd1=22 goto *eva_onedari12
if %cmd1=-1 goto *eva_main
goto *eva_onedari



*eva_onedari1

csp 690
gosub *onedari_syori
name $name
>You want to taste my hand techniques?@
>Alright... I'll pleasure you to squeeze out a lot.\
name ""
if %counter>0 gosub *eva_x2
if %enemy_wind+%enemy_earth=0 gosub *eva_el1
gosub *eva_a1
skip -1



*eva_onedari2

csp 690
gosub *onedari_syori
name $name
>You want to taste my breast techniques?@
>Alright... I'll pleasure you to squeeze out a lot.\
name ""
if %counter>0 gosub *eva_x2
if %enemy_wind+%enemy_earth=0 gosub *eva_el1
gosub *eva_a2
skip -1



*eva_onedari3

csp 690
gosub *onedari_syori
name $name
>You want to taste my mouth techniques?@
>Alright... I'll pleasure you to squeeze out a lot.\
name ""
if %counter>0 gosub *eva_x2
if %enemy_wind+%enemy_earth=0 gosub *eva_el1
gosub *eva_a3
skip -1



*eva_onedari4

csp 690
gosub *onedari_syori
name $name
>You want to taste my foot techniques?@
>Alright... I'll pleasure you to squeeze out a lot.\
name ""
if %counter>0 gosub *eva_x2
if %enemy_wind+%enemy_earth=0 gosub *eva_el1
gosub *eva_a4
skip -1



*eva_onedari5

if %kousoku<>1 gosub *onedari_syori
if %kousoku=1 gosub *onedari_syori_k
name $name
>You want to taste my armpit techniques?@
>Alright... I'll pleasure you to squeeze out a lot.\
name ""
if %counter>0 gosub *eva_x2
if %kousoku=0 && %enemy_wind+%enemy_earth=0 gosub *eva_el1
if %kousoku=0 gosub *eva_a5
gosub *eva_a6
skip -1



*eva_onedari6

if %kousoku<>2 csp 690:gosub *onedari_syori
if %kousoku=2 gosub *onedari_syori_k
name $name
>You want to taste my intercrural techniques?@
>Alright... I'll pleasure you to squeeze out a lot.\
name ""
if %counter>0 gosub *eva_x2
if %kousoku=0 && %enemy_wind+%enemy_earth=0 gosub *eva_el1
if %kousoku=0 gosub *eva_a7
gosub *eva_a8
skip -1



*eva_onedari7

if %kousoku<2 csp 690:gosub *onedari_syori
if %kousoku>1 gosub *onedari_syori_k
name $name
>You want me to rape you?@
>Alright... I'll pleasure you to squeeze out a lot.\
name ""
if %counter>0 gosub *eva_x2
if %kousoku=0 gosub *eva_a7
if %kousoku=2 gosub *eva_a9
gosub *eva_a10
skip -1



*eva_onedari8

if %kousoku<2 csp 690:gosub *onedari_syori
if %kousoku>1 gosub *onedari_syori_k
name $name
>You want me to drain your energy as I rape you?@
>Alright... I'll pleasure you to squeeze out a lot.\
name ""
if %counter>0 gosub *eva_x2
if %kousoku=0 gosub *eva_a7
if %kousoku=2 gosub *eva_a9
gosub *eva_a11
skip -1



*eva_onedari9

csp 690
gosub *onedari_syori
name $name
>You want to taste a piece of my ass?@
>Alright... I'll pleasure you to squeeze out a lot.\
name ""
if %counter=0 gosub *eva_x1
gosub *eva_a12
skip -1



*eva_onedari10

csp 690
gosub *onedari_syori
name $name
>You want me to suck up your energy through my tail?@
>Alright... I'll pleasure you to squeeze out a lot.\
name ""
if %counter=0 gosub *eva_x1
gosub *eva_a13
skip -1



*eva_onedari11

csp 690
gosub *onedari_syori
name $name
>You want me to give you a handjob as I sit on your face?@
>Alright... I'll pleasure you to squeeze out a lot.\
name ""
if %counter=0 gosub *eva_x1
gosub *eva_counter
gosub *eva_a14
skip -1



*eva_onedari12

csp 690
gosub *onedari_syori
name $name
>You want me to suck on your penis with my tail as I sit on your face?@
>Alright... I'll pleasure you to squeeze out a lot.\
name ""
if %counter=0 gosub *eva_x1
gosub *eva_counter
gosub *eva_a15
skip -1



*eva_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\eva_bk05.bmp",0,0
gosub *syasei2
>As Eva strokes Luka's penis with her experienced hand, he comes, covering her hand in semen.\
mov %viclose,1:gosub *lose
mov %2700,%2700+1:if %2700=1 mov %count_koenemy,%count_koenemy+1
if %2700>%count_most mov %count_most,%2700:mov $count_mostname,$name
count 5,4
mov $bad1,"Eva forced Luka to come with her hand."
gosub *face2
name $name
>Hehe... The Hero was pretty disappointing.@
>Well... With my skill, he's the same as any other man, I suppose.\
name ""
goto *eva_h



*eva_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\eva_ct02.bmp",0,0
lsp 693,":a;chara\eva_bk03.bmp",0,0
gosub *syasei2
>As Eva squeezes Luka's penis between her soft breasts, he comes, covering her chest with semen.\
mov %viclose,1:gosub *lose2
name "Luka"
>Ahh...\
name ""
name $name
>Hehe... The Hero was pretty disappointing.@
>Well... With my skill, he's the same as any other man, I suppose.\
>I'll make you taste more of my Succubus techniques...@
>Drown in the pleasure of my breasts, and give me all of your semen...\
name ""
skillcount3 3972
skillname "Succubus Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>Eva squeezes her breasts together around Luka's penis!
mov %damage_kotei,1
damage 290,310
dwave 1,"se\ero_sigoki1.ogg"
>She slowly increases the power, making Luka's penis sink into her soft breasts!
mov %damage_kotei,1
damage 290,310
skillname ""
name "Luka"
>Ahh... I...It feels good...\
name ""
name $name
>Haha... Just listen to that pitiful moan.@
>Let me hear more of it...\
name ""
skillcount3 3972
skillname "Succubus Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>Eva shakes her chest side to side, tossing Luka's penis around!
mov %damage_kotei,1
damage 290,310
dwave 1,"se\ero_sigoki1.ogg"
>Sweet pleasure races through Luka's body, as his penis is tossed back and forth between her breasts!
mov %damage_kotei,1
damage 290,310
skillname ""
name "Luka"
>Haa... I'm going to come...\
name ""
name $name
>Hehe... Fine, then let me finish you off...@
>Finish between my breasts...\
name ""
skillcount3 3972
skillname "Succubus Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>Eva presses hard on her two breasts, crushing Luka's penis between them!
mov %damage_kotei,1
damage 290,310
dwave 1,"se\ero_sigoki1.ogg"
>She slowly increases the pleasure, making Luka's penis sink into her soft skin!
mov %damage_kotei,1
damage 290,310
skillname ""
name "Luka"
>Haa... Too good...@> Ahhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\eva_ct03.bmp",0,0
gosub *syasei2
>As Luka is helplessly attacked by Eva's breasts, he comes, covering her chest in semen as he shakes in ecstasy.\
name $name
>Hahaha... You really were disappointing.@
>With such a weak penis as that, I'm surprised you ever dared to call yourself a Hero.\
>How does it feel to end up as simple prey to a Succubus?@
>Pathetic?@>Horrifying?@>Or... Are you happy?\
name ""
name "Luka"
>S...Stop... Haa!\
name ""
skillcount3 3972
skillname "Succubus Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>Eva squeezes Luka's penis between her breasts again, cutting off his yell!
mov %damage_kotei,1
damage 290,310
dwave 1,"se\ero_sigoki1.ogg"
>She squeezes him tighter and tighter!
mov %damage_kotei,1
damage 290,310
skillname ""
name "Luka"
>Incredible... It feels so good...\
name ""
name $name
>Haha... Are you satisfied just with this?@
>If I use some other techniques, it will feel even better...\
name ""
skillcount3 3972
skillname "Succubus Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>Eva uses her hands to move her breasts up and down!
mov %damage_kotei,1
damage 290,310
dwave 1,"se\ero_sigoki1.ogg"
>She presses down hard on the shaft of Luka's penis while she continues rubbing him with her breasts!
mov %damage_kotei,1
damage 290,310
skillname ""
name "Luka"
>N...No more... I'm going to come again...\
name ""
name $name
>With just a little extra technique, I can make you surrender in seconds...@
>Here, I'll make you come in an instant.\
name ""
skillcount3 3972
skillname "Succubus Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>Eva raises and lowers her breasts in an alternate motion!
mov %damage_kotei,1
damage 290,310
dwave 1,"se\ero_sigoki1.ogg"
>Her soft breasts rub hard against Luka's penis, tossing it side to side between them!
mov %damage_kotei,1
damage 290,310
skillname ""
name "Luka"
>To good... Ahh...\
name ""
gosub *syasei1
lsp 690,":a;chara\eva_ct04.bmp",0,0
gosub *syasei2
>Completely overcome by Eva's sexual skills, Luka cries out as he comes, covering her chest with even more semen.\
name $name
>Hehe... Are you satisfied?@
>Now it's your turn to satisfy me...@>Of course, it will feel like heaven for you as well.\
name ""
gosub *clear_sprite
gosub *setwindow_01p
>The semen I shot out even dirtied Eva's face a little bit...\
>Wearing the proof of my surrender on her face, Eva looks at me with a cold-blooded smile.\
mov %battle,0
mov %hsean,1
mov %2700,%2700+1:if %2700=1 mov %count_koenemy,%count_koenemy+1
if %2700>%count_most mov %count_most,%2700:mov $count_mostname,$name
count 7,4
mov $bad1,"Eva used her breasts to force Luka to come."
goto *eva_h



*eva_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\eva_ct12.bmp",0,0
lsp 691,":a;chara\eva_bk01.bmp",0,0
gosub *syasei2
>As Eva skillfully sucks Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose2
name "Luka"
>Ahh...\
name ""
name $name
>Hehe... The Hero was pretty disappointing.@
>Well... With my skill, he's the same as any other man, I suppose.\
>I'll make you taste more of my Succubus techniques...@
>Drown in the pleasure of my mouth, and give me all of your semen...\
name ""
skillcount3 3973
skillname "Succubus Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>Eva sucks harder on Luka's penis!
mov %damage_kotei,1
damage 300,320
dwave 1,"se\ero_buchu2.ogg"
>She presses down with her lips as she sucks, using them to rub his shaft!
mov %damage_kotei,1
damage 300,320
skillname ""
name "Luka"
>Ahh... I...It feels good...\
name ""
name $name
>Haha... Just listen to that moan of yours...@
>Let me hear more of it...\
name ""
skillcount3 3973
skillname "Succubus Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>Eva's tongue runs up and down the back of Luka's penis!
mov %damage_kotei,1
damage 300,320
dwave 1,"se\ero_buchu2.ogg"
>At the same time, she sucks hard on his tip!
mov %damage_kotei,1
damage 300,320
skillname ""
name "Luka"
>Haa... I'm going to come...\
name ""
name $name
>Hehe... Fine, then let me finish you off...@
>Finish off in my mouth... *Suck*\
name ""
skillcount3 3973
skillname "Succubus Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>Eva slowly starts to move her head back and forth!
mov %damage_kotei,1
damage 300,320
dwave 1,"se\ero_buchu2.ogg"
>While pumping him with her head, Eva licks Luka's glans all over!
mov %damage_kotei,1
damage 300,320
skillname ""
name "Luka"
>Haa... It's too good...@
>Ahhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\eva_ct13.bmp",0,0
gosub *syasei2
>Unable to endure her blowjob, Luka comes, exploding inside Eva's mouth.\
>The semen that she couldn't swallow slowly dribbles out of her mouth as she smiles.\
name $name
>Nnn... I couldn't even drink that much all at once.\
>I didn't think the famous Hero would come in such large amounts...\
>How does it feel to be preyed on by a Succubus?@
>Pitiful?@> Horrified?@>Or... Happy?\
name ""
name "Luka"
>S...Stop it... Haa!\
name ""
skillcount3 3973
skillname "Succubus Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>Eva sucks on Luka's penis, licking out the remaining drops of semen inside him!
mov %damage_kotei,1
damage 300,320
dwave 1,"se\ero_buchu2.ogg"
>She uses the tip of her tongue to lick at Luka's urethral opening!
mov %damage_kotei,1
damage 300,320
skillname ""
name "Luka"
>Incredible... It feels too good...\
name ""
name $name
>Hehe... Are you satisfied with just that?@
>Let me use a few more techniques to make it even better...\
name ""
skillcount3 3973
skillname "Succubus Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>Eva starts moving her head back and forth as she sucks on Luka's penis!
mov %damage_kotei,1
damage 300,320
dwave 1,"se\ero_buchu2.ogg"
>Her tongue coils around his shaft, as she uses it to stroke him as she sucks!
mov %damage_kotei,1
damage 300,320
skillname ""
name "Luka"
>N...No... I'm going to come again...\
name ""
name $name
>With just a little extra technique, I can make you surrender in seconds...@
>Here, I'll make you come in an instant.\
>Nnn... *Suck* *Suuuuck*\
name ""
skillcount3 3973
skillname "Succubus Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>Eva's head moves even faster, pumping Luka like a piston!
mov %damage_kotei,1
damage 300,320
dwave 1,"se\ero_buchu2.ogg"
>At the same time, she sucks Luka even harder, causing the tip of his penis to rub the back of her throat!
mov %damage_kotei,1
damage 300,320
skillname ""
name "Luka"
>A...Amazing... Haa...\
name ""
gosub *syasei1
lsp 690,":a;chara\eva_ct14.bmp",0,0
gosub *syasei2
>Luka is driven to another powerful ejaculation, helpless in front of Eva's blowjob.\
>With his body twitching as he comes, he fills Eva's mouth with semen.\
name $name
>Hehe... Are you satisfied?@
>Now it's your turn to satisfy me...@>Of course, it will feel like heaven for you as well.\
name ""
gosub *clear_sprite
gosub *setwindow_01p
>The semen I shot out even dirtied Eva's face a little bit...\
>Wearing the proof of my surrender on her face, Eva looks at me with a cold-blooded smile.\
mov %battle,0
mov %hsean,1
mov %2700,%2700+1:if %2700=1 mov %count_koenemy,%count_koenemy+1
if %2700>%count_most mov %count_most,%2700:mov $count_mostname,$name
count 4,4
mov $bad1,"Eva forced Luka to come with her mouth."
goto *eva_h



*eva_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\eva_ct32.bmp",0,0
lsp 699,":a;chara\eva_bk09.bmp",0,0
gosub *syasei2
>As Eva steps on Luka's penis, he comes, covering her foot in semen.\
mov %viclose,1:gosub *lose2
lsp 690,":a;chara\eva_ct33.bmp",0,0:print 10,500
name "Luka"
>Ahh...\
name ""
name $name
>You got my feet all dirty with your semen.@
>Come on, just look at them.@>They're covered in it.\
>I think you need to be punished for that, little boy...@
>Spurt out all that semen of yours as I step on you...\
name ""
skillcount3 3974
skillname "Succubus Footjob"
dwave 1,"se\ero_koki1.ogg"
>Eva steps on Luka's penis, slowly increasing the weight!
mov %damage_kotei,1
damage 100,110
dwave 1,"se\ero_koki1.ogg"
>She slowly leans forward, increasing the pressure!
mov %damage_kotei,1
damage 100,110
skillname ""
name "Luka"
>S...Stop! Ahhh!\
name ""
name $name
>Haha... Just listen to that moan of yours...@
>Let me hear more of it...\
name ""
skillcount3 3974
skillname "Succubus Footjob"
dwave 1,"se\ero_koki1.ogg"
>Eva twists her foot side to side!
mov %damage_kotei,1
damage 100,110
dwave 1,"se\ero_koki1.ogg"
>While twisting her foot, she presses down harder!
mov %damage_kotei,1
damage 100,110
skillname ""
name "Luka"
>S...Stop... I'm going to come...!\
name ""
name $name
>So you're going to come as I step on you again?@
>Then let me see it!\
name ""
skillcount3 3974
skillname "Succubus Footjob"
dwave 1,"se\ero_koki1.ogg"
>Eva starts to shake her foot up and down!
mov %damage_kotei,1
damage 100,110
dwave 1,"se\ero_koki1.ogg"
>She presses down with the sole of her foot on Luka's penis!
mov %damage_kotei,1
damage 100,110
skillname ""
name "Luka"
>Ah!@>Hyaa!\
name ""
gosub *syasei1
lsp 690,":a;chara\eva_ct34.bmp",0,0
gosub *syasei2
>As Eva steps on Luka's penis, he comes again, covering her feet with even more semen.\
name $name
>Just look at that...@> You got even more of it on me.\
>Now it's your turn to satisfy me...@>Of course, it will feel like heaven for you as well.\
name ""
gosub *clear_sprite
gosub *setwindow_01p
>Eva looks down at me and her semen-covered feet, with a cold-blooded smile on her face.\
mov %battle,0
mov %hsean,1
mov %2700,%2700+1:if %2700=1 mov %count_koenemy,%count_koenemy+1
if %2700>%count_most mov %count_most,%2700:mov $count_mostname,$name
count 6,4
mov $bad1,"Eva forced Luka to come with her feet."
goto *eva_h



*eva_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\eva_ct22.bmp",0,0
lsp 694,":a;chara\eva_bk04.bmp",0,0
gosub *syasei2
>As Eva squeezes Luka's penis with her armpit, he comes, covering her armpit with semen.\
mov %viclose,1:gosub *lose2
name "Luka"
>Ahh...\
name ""
name $name
>Aha... You don't need a pussy, a mouth, or a hand.@
>I can just use something as simple as my armpit, and make you come whenever I want.\
>Here, shall I do it again just to show you?@
>With this armpit you love so much...\
name ""
skillcount3 3975
skillname "Succubus Armpit"
dwave 1,"se\ero_koki1.ogg"
>Eva squeezes Luka's penis harder with her armpit!
mov %damage_kotei,1
damage 180,200
dwave 1,"se\ero_koki1.ogg"
>The warmth flows into Luka from her armpit!
mov %damage_kotei,1
damage 180,200
skillname ""
name "Luka"
>Ahh... I...It feels good...\
name ""
name $name
>Haha... Just listen to that moan of yours...@
>Let me hear more of it...\
name ""
skillcount3 3975
skillname "Succubus Armpit"
dwave 1,"se\ero_koki1.ogg"
>Eva squeezes Luka's penis even harder!
mov %damage_kotei,1
damage 180,200
dwave 1,"se\ero_koki1.ogg"
>The close contact with her sweaty skin sends goosebumps up Luka's body!
mov %damage_kotei,1
damage 180,200
skillname ""
name "Luka"
>Haa... I'm going to come...\
name ""
name $name
>I've never seen someone pathetic enough to come from an armpit before you...\
>But do it again, come inside my armpit!\
name ""
skillcount3 3975
skillname "Succubus Armpit"
dwave 1,"se\ero_koki1.ogg"
>Eva puts even more power into her arms!
mov %damage_kotei,1
damage 180,200
dwave 1,"se\ero_koki1.ogg"
>Her wet skin rubs against Luka's sensitive penis as she squeezes!
mov %damage_kotei,1
damage 180,200
skillname ""
name "Luka"
>Haa... Too good...@
>Ahhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\eva_ct23.bmp",0,0
gosub *syasei2
>While being squeezed in Eva's armpit, Luka comes, squirting out his semen onto her arm.\
name $name
>Aren't you ashamed at coming from something like an armpit...?\
>How could you ever dare to call yourself a Hero, with a weak penis like that?\
>How does it feel to be preyed on by a Succubus?@
>Pitiful?@> Horrified?@>Or... Happy?\
name ""
name "Luka"
>S...Stop... Ahhh!\
name ""
skillcount3 3975
skillname "Succubus Armpit"
dwave 1,"se\ero_koki1.ogg"
>Eva gradually increases the pressure she's using to squeeze Luka's penis!
mov %damage_kotei,1
damage 180,200
dwave 1,"se\ero_koki1.ogg"
>Her warm sweat leaks out onto his penis!
mov %damage_kotei,1
damage 180,200
skillname ""
name "Luka"
>Incredible... It feels so good...\
name ""
name $name
>What a huge pervert...@> An armpit is good enough for you?@
>Then come inside this armpit you love so much...\
name ""
skillcount3 3975
skillname "Succubus Armpit"
dwave 1,"se\ero_koki1.ogg"
>Eva slowly starts to move her arm around, with Luka's penis still firmly in her armpit!
mov %damage_kotei,1
damage 180,200
dwave 1,"se\ero_koki1.ogg"
>Moving her arm back and forth, she rubs Luka's penis inside her armpit!
mov %damage_kotei,1
damage 180,200
skillname ""
name "Luka"
>N...No more... I'm going to come again...\
name ""
name $name
>So you're going to come inside my armpit again?@
>It's not even a challenge to make you come, is it?\
>Then fine, go ahead...@
>Hurry up and come.\
name ""
skillcount3 3975
skillname "Succubus Armpit"
dwave 1,"se\ero_koki1.ogg"
>Eva moves her arm back and forth quickly, rubbing Luka's penis with her armpit!
mov %damage_kotei,1
damage 180,200
dwave 1,"se\ero_koki1.ogg"
>At the same time, she squeezes down hard on his penis!
mov %damage_kotei,1
damage 180,200
skillname ""
name "Luka"
>T...To good... Ahhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\eva_ct24.bmp",0,0
gosub *syasei2
>In no time at all, Luka is forced to come inside her armpit again.@
>His semen drips out onto her chest as Eva laughs.\
name $name
>Hehe... Are you satisfied?@
>Now it's your turn to satisfy me...@>Of course, it will feel like heaven for you as well.\
name ""
gosub *clear_sprite
gosub *setwindow_01p
>The semen I shot out even dirtied Eva's cheek a little bit...\
>Wearing the proof of my surrender on her face, Eva looks at me with a cold-blooded smile.\
mov %battle,0
mov %hsean,1
mov %2700,%2700+1:if %2700=1 mov %count_koenemy,%count_koenemy+1
if %2700>%count_most mov %count_most,%2700:mov $count_mostname,$name
count 32,4
mov $bad1,"Eva forced Luka to come with her armpit."
goto *eva_h



*eva_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\eva_ha2.bmp",0,0
gosub *syasei2
>As Eva rubs Luka's penis against her vagina, and squeezes it with her thighs, he comes, covering her lower body with semen.\
mov %viclose,1:gosub *lose
mov %2700,%2700+1:if %2700=1 mov %count_koenemy,%count_koenemy+1
if %2700>%count_most mov %count_most,%2700:mov $count_mostname,$name
count 3,4
mov $bad1,"Eva forced Luka to come with her intercrural sex."
gosub *face2
name $name
>Hehe... The Hero was pretty disappointing.@
>Well... With my skill, he's the same as any other man, I suppose.\
name ""
goto *eva_h



*eva_h7

mov %ikigoe,3:gosub *ikigoe
name $name
>A Hero could really finish with just that...?\
name ""
gosub *syasei1
lsp 700,":a;chara\eva_ha4.bmp",0,0
gosub *syasei2
>The moment Eva forces Luka inside of her, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2700,%2700+1:if %2700=1 mov %count_koenemy,%count_koenemy+1
if %2700>%count_most mov %count_most,%2700:mov $count_mostname,$name
count 1,4
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Eva forced Luka to come the moment of insertion."
gosub *face2
name $name
>Haha... Another man finished off in an instant.@
>Did it feel heavenly?\
name ""
goto *eva_h



*eva_h8

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\eva_ha4.bmp",0,0
gosub *syasei2
>Unable to withstand Eva's intense rape, Luka comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2700,%2700+1:if %2700=1 mov %count_koenemy,%count_koenemy+1
if %2700>%count_most mov %count_most,%2700:mov $count_mostname,$name
count 1,4
mov $bad1,"Eva forced Luka to come as she raped him."
gosub *face2
name $name
>Already came?@>Humans are so simple, aren't they?@
>Well... With my skill, he's the same as any other man, I suppose.\
>And now, I'll squeeze out even more...@
>Until you're completely dried up. Hehe.\
name ""
goto *eva_h



*eva_h9

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\eva_ha4.bmp",0,0
gosub *syasei2
>Unable to withstand Eva's energy drain, Luka comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2700,%2700+1:if %2700=1 mov %count_koenemy,%count_koenemy+1
if %2700>%count_most mov %count_most,%2700:mov $count_mostname,$name
count 1,4
mov $bad1,"Eva forced Luka to come as she raped him and drained his energy."
gosub *face2
name $name
>Already came?@>Humans are so simple, aren't they?@
>Well... With my skill, he's the same as any other man, I suppose.\
>And now, I'll squeeze out even more...@
>Until you're completely dried up. Hehe.\
name ""
goto *eva_h



*eva_h10

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\eva_bk12.bmp",0,0
gosub *syasei2
>As Eva crushes Luka's penis with her soft ass, he comes, covering her back with semen.\
mov %viclose,1:gosub *lose
mov %2700,%2700+1:if %2700=1 mov %count_koenemy,%count_koenemy+1
if %2700>%count_most mov %count_most,%2700:mov $count_mostname,$name
count 34,4
mov $bad1,"Eva forced Luka to come with her ass."
gosub *face2
name $name
>Hehe... The Hero was pretty disappointing.@
>Well... With my skill, he's the same as any other man, I suppose.\
name ""
goto *eva_h



*eva_h11

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\eva_bk14.bmp",0,0
gosub *syasei2
>As Eva's tail sucks on Luka's penis, he comes, filling it with semen.\
mov %viclose,1:gosub *lose
mov %2700,%2700+1:if %2700=1 mov %count_koenemy,%count_koenemy+1
if %2700>%count_most mov %count_most,%2700:mov $count_mostname,$name
count 19,4
mov $bad1,"Eva forced Luka to come with her tail."
gosub *face2
name $name
>Hehe... The Hero was pretty disappointing.@
>Well... With my skill, he's the same as any other man, I suppose.\
name ""
goto *eva_h



*eva_h12

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\eva_hb2.bmp",0,0
gosub *syasei2
>As Eva presses her ass against Luka's face and strokes his penis, he comes, covering her hands with semen.\
mov %viclose,1:gosub *lose2
name "Luka"
>Ahh...\
name ""
name $name
>Hehe... The Hero was pretty disappointing.@
>Well... With my skill, he's the same as any other man, I suppose.\
>I'll make you taste more of my Succubus techniques...@
>Drown in the pleasure of my hands...\
name ""
skillcount3 3981
skillname "Succubus Facesitting Milking"
dwave 1,"se\ero_koki1.ogg"
>Eva squeezes Luka's penis with her hands!
mov %damage_kotei,1
damage 200,300
dwave 1,"se\ero_koki1.ogg"
>She uses the palm of her hand to rub the glans of Luka's penis!
mov %damage_kotei,1
damage 200,300
skillname ""
name "Luka"
>Incredible... That feels so good...\
name ""
name $name
>Haha... Are you satisfied with just that?@
>Let me add a couple techniques to it...\
name ""
skillcount3 3981
skillname "Succubus Facesitting Milking"
dwave 1,"se\ero_koki1.ogg"
>Eva uses her hands to squeezes Luka's penis like she was twisting a towel!
mov %damage_kotei,1
damage 200,300
dwave 1,"se\ero_koki1.ogg"
>At the same time, her fingers rub against the tip of his penis!
mov %damage_kotei,1
damage 200,300
skillname ""
name "Luka"
>N...No more... I'm going to come...\
name ""
name $name
>If I just use a simple little technique, you surrender in moments...@
>Come on now, finish in my hand.\
name ""
skillcount3 3981
skillname "Succubus Facesitting Milking"
dwave 1,"se\ero_koki1.ogg"
>Eva rolls Luka's penis between her two hands!
mov %damage_kotei,1
damage 200,300
dwave 1,"se\ero_koki1.ogg"
>She strokes him fast with her soft hands!
mov %damage_kotei,1
damage 200,300
skillname ""
name "Luka"
>T...Too good... Ahh...\
name ""
gosub *syasei1
lsp 700,":a;chara\eva_hb3.bmp",0,0
gosub *syasei2
>Eva's skilled hands bring Luka to another ejaculation, his body spasms as he covers her hands in semen.\
name $name
>Hehe... Are you satisfied?@
>Now it's your turn to satisfy me...@>Of course, it will feel like heaven for you as well.\
name ""
gosub *clear_sprite
gosub *setwindow_01p
>Eva lifts up her hands, covered in the proof of my surrender to her face...\
>With a cold-blooded smile, she stares right into my eyes.\
mov %battle,0
mov %hsean,1
mov %2700,%2700+1:if %2700=1 mov %count_koenemy,%count_koenemy+1
if %2700>%count_most mov %count_most,%2700:mov $count_mostname,$name
count 17,4
mov $bad1,"Eva forced Luka to come as she sat on his face and gave him a handjob."
goto *eva_h



*eva_h13

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\eva_hb5.bmp",0,0
gosub *syasei2
>As Eva presses her ass against Luka's face and sucks on his penis with her tail, he comes, filling her tail with semen.\
mov %viclose,1:gosub *lose2
name "Luka"
>Ahh...\
name ""
name $name
>Hehe... The Hero was pretty disappointing.@
>Well... With my skill, he's the same as any other man, I suppose.\
>I'll make you taste more of my Succubus techniques...@
>I'll suck up all of your semen with my tail.\
name ""
skillcount3 3982
skillname "Succubus Facesitting Sucking"
dwave 1,"se\ero_chupa6.ogg"
>Eva uses her tail to suck out the remaining semen inside Luka's penis!
mov %damage_kotei,1
damage 200,300
dwave 1,"se\ero_chupa6.ogg"
>Sweet pleasure washes over Luka as her tail sucks on him!
mov %damage_kotei,1
damage 200,300
skillname ""
name "Luka"
>Incredible... It feels so good...\
name ""
name $name
>I'll make it even better, too...@
>A Succubus' tail is the same as another pussy, after all.\
name ""
skillcount3 3982
skillname "Succubus Facesitting Sucking"
dwave 1,"se\ero_chupa6.ogg"
>Eva's tail shrinks around Luka's penis!
mov %damage_kotei,1
damage 200,300
dwave 1,"se\ero_chupa6.ogg"
>The walls inside of it vibrate quickly against Luka's penis!
mov %damage_kotei,1
damage 200,300
skillname ""
name "Luka"
>N...No more... I'm going to come again...\
name ""
name $name
>You're going to come inside my tail again?@
>Then I'll suck on it with everything I've got...\
name ""
skillcount3 3982
skillname "Succubus Facesitting Sucking"
dwave 1,"se\ero_chupa6.ogg"
>Eva's tail sucks harder on Luka's penis!
mov %damage_kotei,1
damage 200,300
dwave 1,"se\ero_chupa6.ogg"
>The intense suction causes her tail to shrink, squeezing Luka's penis hard!
mov %damage_kotei,1
damage 200,300
skillname ""
name "Luka"
>Too good... Ahh...!\
name ""
gosub *syasei1
lsp 700,":a;chara\eva_hb6.bmp",0,0
gosub *syasei2
>Luka spasms as Eva forces him to come inside her tail again, his semen sucked up into her.\
name $name
>Hehe... Are you satisfied?@
>Now it's your turn to satisfy me...@>Of course, it will feel like heaven for you as well.\
name ""
gosub *clear_sprite
gosub *setwindow_01p
>Eva's tail parts from my penis, small droplets of semen dripping off its entrance.\
>Eva looks down at me with a cold-blooded smile.\
mov %battle,0
mov %hsean,1
mov %2700,%2700+1:if %2700=1 mov %count_koenemy,%count_koenemy+1
if %2700>%count_most mov %count_most,%2700:mov $count_mostname,$name
count 17,4
mov $bad1,"Eva forced Luka to come as she sat on his face, and sucked on his penis with her tail."
goto *eva_h



*eva_h

mov $bad2,"Luka had his energy drained until his death."
if %2700=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku=3 mov %hseanwave,1:hseanwave:goto *eva_hb
name "Luka"
>Ahh...\
name ""
name $name
>Now then... I'm going to squeeze you dry.@
>In trade for your life, I'll give you the best of pleasures...\
name ""
cspl 690,699
lsp 700,":a;chara\eva_ha1.bmp",0,0:print 10,500
>Eva presses me down, and sits on top of me.@
>Like that, she slowly starts dropping her waist down.\
name "Luka"
>S...Stop...\
name ""
name $name
>If you don't want to, then resist.\
name ""
name "Luka"
>Guh...!\
name ""
>I try to struggle loose, but she's pinning my arms.@
>There's no way I can break free of this incredible power...\
name $name
>That's your resistance?@
>Hahaha... Pathetic!\
>Now I'm going to rape you...@
>Let me see you fade away as you scream in pleasure.\
name ""
name "Luka"
>S...St...@>Ahh!\
name ""
mov %hseanwave,1:hseanwave
lsp 700,":a;chara\eva_ha3.bmp",0,0:print 10,500
>Cutting my scream short, Eva drops down.@
>My penis pushes into her devilish vagina, spreading apart the folds and wet flesh of her insides as I pierce deep into her.\
>Her soft flesh rubs against my glans as I enter her, the feeling alone almost enough to make me orgasm on the spot.\
name "Luka"
>Ahh!\
name ""
name $name
>Hehe... You can't resist it, can you?@
>This is where I absorb men's semen... And life.\
>I'll squeeze out everything of yours, and feed on it.@
>You should feel honored... Hehe.\
name ""
goto *eva_hb



*eva_hb

name "Luka"
>Ahh...@
>N...No... I don't want that...\
name ""
name $name
>If you don't want me to squeeze you dry, then just don't ejaculate.@
>...If you can manage to do that, of course.\
name ""
>Eva laughs at me, and wiggles her hips at the same time.\
>With just that small movement, her vaginal walls rub hard against my penis, sending a shock of pleasure through my lower body.\
name "Luka"
>Ah...\
name ""
>Even though I grit my teeth, a moan still leaks out.@
>If I come, she's going to make me keep coming until I'm dead...\
name $name
>You're already feeling it...?@
>Then you won't even last a minute.\
name ""
>Eva starts to slowly grind her waist against mine.@
>Feeling like my penis is being massaged inside her, I already feel like I could melt away in pleasure.\
>No matter how hard I try to deny it, I can tell there's no way I can resist her.@
>In the face of a Succubus' vagina, no man can endure.\
name "Luka"
>Ahh... I...It feels so good...\
name ""
>My male instinct takes over my body as the touch of her incredible vagina washes through me.@
>I'm already unable to suppress the desire to come inside her.\
name $name
>Hehe... It's time for the finish.@
>I'll finish it off by tightening the insides...\
name ""
>Eva looks down at me in triumph as she moves to finish me off.@
>Clenching her muscles, she suddenly squeezes my penis hard inside her vagina.\
name "Luka"
>Ah... Ah...\
name ""
>My head goes pure white as my penis pulses in complete surrender.\
gosub *syasei1
lsp 700,":a;chara\eva_ha4.bmp",0,0
gosub *syasei2
>As the melting pleasure takes over my body, I explode inside her tight vagina.@
>I came so quickly inside her...@
>Now she's going to squeeze me dry.\
name "Luka"
>S...Stop... Stop...\
name ""
name $name
>Hehe, are you scared?@
>Don't worry, it will feel good...\
>Here, I'm going to start sucking now...@
>Both your semen, and your life.\
name ""
name "Luka"
>N...No... Stop...\
name ""
>Eva looks straight into my eyes as a sadistic smile crosses her face.\
name $name
>Here I go... Energy Drain...\
name ""
name "Luka"
>Ah... Aiieee!!\
name ""
mov %hseanwave,16:hseanwave
>Announcing my execution out loud, her vaginal walls suddenly start to squirm around my penis.\
>Contracting around me as they rub my penis, it feels like her entire vagina is starting to suck and pull at my penis.\
name "Luka"
>St... Help me!@
>Ahh!\
name ""
gosub *syasei1
lsp 700,":a;chara\eva_ha5.bmp",0,0
gosub *syasei2
>I explode inside of her, my life and semen both flooding into her.@
>With my arms and legs being held down, there's nothing I can do to stop the flood of ecstasy from taking over my body.\
name $name
>Hehe, now dry up...@
>You should be happy at meeting your end by being sucked dry by a Succubus...\
name ""
name "Luka"
>Stop... Stop...@
>Hyaa!\
name ""
>Squirming, shrinking, and sucking...@
>Her vagina continues the rhythmic motion, forcibly drawing out my semen and life itself.\
>This is a Succubus' predation...@
>Taking everything from a man, and feeding on his life itself.\
>The man being preyed on has no choice but to be paralyzed in ecstasy as he's fed on.@
>The realization of my coming fate hits me at the same time as another orgasm.\
name "Luka"
>Ahhhh!!!\
name ""
gosub *syasei1
lsp 700,":a;chara\eva_ha6.bmp",0,0
gosub *syasei2
>Each time I explode inside her, my thoughts dim as I feel my body getting weaker.@
>After a few moments, even my vision starts to slowly flicker black.\
name "Luka"
>Ah... Haa...\
name ""
>Before I was even aware of it, I had completely surrendered to her.@
>Laying underneath her, I just wait for the next burst of pleasure to hit me.\
name $name
>Hehe, so you broke.@
>With one more ejaculation, I'll have taken everything...\
>With this, I'll take your soul itself...@
>Now die inside me...\
name ""
name "Luka"
>Ah...aa...\
name ""
>Her vagina contracts, pulling at my penis again...\
gosub *syasei1:gosub *syasei2
>With a single weak pulse, a tiny drop of semen leaks out of my penis.@
>With it, the last of my life is taken by Eva.\
mov %hseanwave,0:hseanwave
name "Luka"
>Ah...\
name ""
>All that's left under Eva's body is the lifeless corpse of a boy.\
name $name
>Hehe... Thanks for the meal.@
>Don't worry, I sucked every drop of you up.\
name ""
>Eva looks down at the dried up Hero with a satisfied smile.\
gosub *anten
>..............\
goto *badend



*trooperloid_start

mov $name,"Trooperoid"
mov $name2,"Trooperoid"
mov $lavel,"trooperloid"
mov $tatie1,"trooperloid_st01"
mov $tatie2,"trooperloid_st02"
mov $tatie3,"trooperloid_st03"
mov $tatie4,"trooperloid_st02"
mov $haikei,"bg122"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,20000
if %nanido=2 mov %max_enemylife,24000
if %nanido=3 mov %max_enemylife,28000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,1
mov %alice_skill1,100
mov %alice_skill2,100
mov %alice_skill3,100
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Haha, there's no use struggling!"
mov $mogaku_sel2,"The Hero ain't anything special after all!"
mov $mogaku_sel3,"Haha, there's no use struggling!"
mov $mogaku_sel4,"The Hero ain't anything special after all!"
mov $mogaku_sel5,"Haha, there's no use struggling!"
mov $mogaku_dassyutu1,"Aww, you got away?"
mov $mogaku_dassyutu2,"I was just about to let ya taste my special pussy, too..."
mov $mogaku_earth_dassyutu1,"Tch... What crazy strength!"
mov $mogaku_earth_dassyutu2,""
mov $half_s1,"Hehe, it feels good, doesn't it?"
mov $half_s2,"Give up, and give your semen to me!"
mov $kiki_s1,"You're about to leak soon, aren't ya?"
mov $kiki_s2,"I'm ready to gather it up whenever!"
mov %end_n,14
mov %exp_minus,0
mov %zmonster_x,-250
mov %tukix,300
mov %owaza_count1a,4
mov %owaza_count2a,6
mov %owaza_count3a,4
name $name
>You pests keep coming one after another...@
>But it's fine, you look like you'd have better semen than the old man.\
>I'll finish today's quota with you if things go well!\
name ""
>Her body looks incredibly durable, and I can see sparks of electricity moving between her body parts...\
>She was clearly created for battle.\
name "Luka"
>A machine monster soldier...@
>To produce monsters like you in such huge quantities...\
name ""
name $name
>Haha... I'll suck up your semen with my vacuum, too!@
>Until you fill this tank of mine!\
name ""
goto *common_main



*trooperloid_v

gosub *face3
name $name
>No...!@> I lost to a flesh and blood human!?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Trooperoid is sealed in the form of a mechanical gear!\
mov %viclose,1:gosub *victory
mov %getexp,200000:gosub *lvup
mov %2385,1
goto *sean0377



*trooperloid_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Even if ya surrender, I won't go easy on you!@
>Now whip out your penis!\
name ""
goto *trooperloid_a



*trooperloid_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *trooperloid_kousan
if %cmd1=16 goto *trooperloid_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *trooperloid_main



*trooperloid_a

if %kousoku=1 gosub *trooperloid_a6:goto *common_main
rnd2 %ransu,1,5
if %ransu=1 gosub *trooperloid_a1:goto *common_main
if %ransu=2 gosub *trooperloid_a2:goto *common_main
if %ransu=3 && %owaza_count3a>5 gosub *trooperloid_a3:goto *common_main
if %ransu=4 && %owaza_count2a>7 && %status=0 gosub *trooperloid_a4:goto *common_main
if %ransu=5 && %owaza_count1a>5 gosub *trooperloid_a5:goto *common_main
skip -6



*trooperloid_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Spurt it out in my mouth!"
if %ransu=2 mov $sel1,"So I'll have to suck out your semen by force?"
if %ransu=3 mov $sel1,"If ya don't hurry up and come, I might bite it off!"
name $name
eng $sel1:$sel6\
name ""
skillname "Exploitative Fellatio"
dwave 1,"se\ero_buchu2.ogg"
lsp 690,":a;chara\trooperloid_ct21.bmp",0,0:print 10,500
>The Trooperoid puts Luka's penis into her mouth, and sucks hard!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3985
if %nanido<2 damage 320,340
if %nanido=2 damage 360,380
if %nanido=3 damage 400,420
skillname ""
if %mylife=0 sub %stack,1:return *trooperloid_h1
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*trooperloid_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"These fake tits feel pretty good, huh?"
if %ransu=2 mov $sel1,"Men love fake tits!"
if %ransu=3 mov $sel1,"Shoot your semen all over these fake tits!"
name $name
eng $sel1:$sel6\
name ""
skillname "Soft Breast Units"
dwave 1,"se\ero_sigoki1.ogg"
>The Trooperoid squeezes Luka's penis between her breasts, rubbing it up and down!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3986
if %nanido<2 damage 330,350
if %nanido=2 damage 370,390
if %nanido=3 damage 410,430
skillname ""
if %mylife=0 sub %stack,1:return *trooperloid_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*trooperloid_a3

add %stack,1
mov %owaza_count3a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck out your semen!"
if %ransu=2 mov $sel1,"I'll vacuum out all your dirty juice!"
if %ransu=3 mov $sel1,"Taste my cock vacuum!"
name $name
eng $sel1:$sel6\
name ""
skillname "Vacuum Unit"
dwave 1,"se\ero_vacum.ogg"
lsp 690,":a;chara\trooperloid_ct11.bmp",0,0:print 10,500
>The Trooperoid sucks Luka's penis into her arm vacuum unit!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3987
if %nanido<2 damage 110,130
if %nanido=2 damage 120,140
if %nanido=3 damage 130,150
dwave 1,"se\ero_vacum.ogg"
>The incredible suction stimulates Luka's penis!
if %nanido<2 damage 110,130
if %nanido=2 damage 120,140
if %nanido=3 damage 130,150
dwave 1,"se\ero_vacum.ogg"
>The intensity increases, almost like it will forcibly pull Luka's semen out!
if %nanido<2 damage 110,130
if %nanido=2 damage 120,140
if %nanido=3 damage 130,150
skillname ""
if %mylife=0 sub %stack,1:return *trooperloid_h3
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*trooperloid_a4

add %stack,1
mov %owaza_count2a,0
name $name
>Go numb!\
name ""
skillname "Shock Pulse"
dwave 1,"se\laser.ogg"
lsp 690,":a;chara\trooperloid_ct01.bmp",0,0:print 10,500
eng "The Trooperoid shoots off an electric pulse from her arm!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %status,2:gosub *status_print
>Luka has been paralyzed!\
skillname ""
if %kousan<2 csp 690:print 10,500
name "Luka"
>Uh...Urhg...\
name ""
name $name
>Haha, now I can play with you all I want!@
>Time to collect your semen!\
name ""
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,2,3
if %nanido=3 rnd2 %status_turn,3,4
sub %stack,1
return



*trooperloid_a5

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 4
name $name
>I'll finish you off with my specially crafted pussy!\
name ""
skillname "Push"
eng "The Trooperoid rushes at Luka, and pushes him to the ground!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
lsp 690,":c;chara\trooperloid_hb01.bmp",0,0
mov %kousoku,1:gosub *status_print
>Luka has been bound by the Trooperoid!\
skillname ""
name $name
>My pussy's already wet...@
>Your penis is about to go inside, you know?\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,99
if %earth=0 && %nanido=2 mov %genmogaku,99
if %earth=0 && %nanido=3 mov %genmogaku,99
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
sub %stack,1
return



*trooperloid_a6

add %stack,1
name $name
>Now to rape ya...@
>I'll give you a good taste of my specially made pussy!\
name ""
skillname "Trooper Rape"
dwave 1,"se\ero_pyu1.ogg"
lsp 690,":c;chara\trooperloid_hb02.bmp",0,0:print 10,500
>The Trooperoid drops her waist, taking Luka deep inside her!
skillcount3 3988
mov %damage_kotei,1
damage 500,600
mov %kousoku,1:gosub *status_print
>Luka is being raped by the Trooperoid!\
skillname ""
if %mylife=0 sub %stack,1:return *trooperloid_h4
name "Luka"
>Ahhh!!\
name ""
>The Trooperoid's vagina clamps down on me as soon as I'm inside, the multiple layers all wriggling at different speeds!\
name $name
>My specially made pussy feels great, doesn't it?@
>Come on, fill me with your semen!\
name ""
sub %stack,1
goto *trooperloid_a7



*trooperloid_a7

add %stack,1
>Luka is being raped by the Trooperoid...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Take that, and that! Come on, come on!!!":mov $sel2,"The Trooperoid violently moves her body as she rapes Luka!"
if %ransu=2 mov $sel1,"It feels best when I move it inside, doesn't it?":mov $sel2,"The Trooperoid makes her vaginal walls vibrate around Luka's penis!"
if %ransu=3 mov $sel1,"I'm raping you with my pussy! Hahaha!":mov $sel2,"The Trooperoid bounces violently up and down on top of Luka!"
if %ransu=4 mov $sel1,"Go on and come inside my special pussy...":mov $sel2,"The Trooperoid moves slowly, grinding against Luka!"
if %ransu=5 mov $sel1,"It's just wasted effort if you try to endure it!":mov $sel2,"The Trooperoid squeezes down hard on Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Trooper Rape"
dwave 1,"se\ero_chupa4.ogg"
eng $sel2:$sel6
skillcount3 3988
mov %damage_kotei,1
damage 500,600
skillname ""
if %mylife=0 sub %stack,1:return *trooperloid_h5
sub %stack,1
goto *trooperloid_a7



*trooperloid_onedari

mov $list1,"Exploitative Fellatio"
if %3985>0 mov %list_num1,1
mov $list2,"Soft Breast Units"
if %3986>0 mov %list_num2,1
mov $list3,"Vacuum Unit"
if %3987>0 mov %list_num3,1
mov $list4,"Trooper Rape"
if %3988>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *trooperloid_onedari1
if %cmd1=12 goto *trooperloid_onedari2
if %cmd1=13 goto *trooperloid_onedari3
if %cmd1=14 goto *trooperloid_onedari4
if %cmd1=-1 goto *trooperloid_main
goto *trooperloid_onedari



*trooperloid_onedari1

gosub *onedari_syori
name $name
>You want me to suck out your semen with my mouth?@
>Hahaha!@>What a disgusting Hero!\
name ""
gosub *trooperloid_a1
skip -1



*trooperloid_onedari2

gosub *onedari_syori
name $name
>You want me to squeeze out your semen with my breasts?@
>Hahaha!@>What a disgusting Hero!\
name ""
gosub *trooperloid_a2
skip -1



*trooperloid_onedari3

gosub *onedari_syori
name $name
>You want me to suck out your semen with my vacuum?@
>Hahaha!@>What a disgusting Hero!\
name ""
gosub *trooperloid_a3
skip -1



*trooperloid_onedari4

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want me to force out your semen by rape?@
>Hahaha!@>What a disgusting Hero!\
name ""
if %kousoku=0 gosub *trooperloid_a5
gosub *trooperloid_a6
skip -1



*trooperloid_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\trooperloid_ct22.bmp",0,0
lsp 691,":a;chara\trooperloid_bk01.bmp",0,0
gosub *syasei2
>As the Trooperoid sucks hard on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2685,%2685+1:if %2685=1 mov %count_koenemy,%count_koenemy+1
if %2685>%count_most mov %count_most,%2685:mov $count_mostname,$name
count 4,8
mov $bad1,"Luka was forced to come by the Trooperoid's blowjob."
gosub *face2
name $name
>Haha... So this is your white flag of defeat, eh?@
>Look at you, spraying your white stuff all over the place!\
name ""
csp 690:print 10,500
goto *trooperloid_h



*trooperloid_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\trooperloid_bk02.bmp",0,0
gosub *syasei2
>As the Trooperoid squeezes Luka's penis between her soft breasts, he comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2685,%2685+1:if %2685=1 mov %count_koenemy,%count_koenemy+1
if %2685>%count_most mov %count_most,%2685:mov $count_mostname,$name
count 7,8
mov $bad1,"The Trooperoid forced Luka to come with her breasts."
gosub *face2
name $name
>Haha... So this is your white flag of defeat, eh?@
>Look at you, spraying your white stuff all over the place!\
name ""
goto *trooperloid_h



*trooperloid_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\trooperloid_bk04.bmp",0,0
lsp 690,":a;chara\trooperloid_ct12.bmp",0,0
gosub *syasei2
>As the Trooperoids vacuum unit sucks hard on Luka's penis, he comes, filling it with semen.\
mov %viclose,1:gosub *lose
mov %2685,%2685+1:if %2685=1 mov %count_koenemy,%count_koenemy+1
if %2685>%count_most mov %count_most,%2685:mov $count_mostname,$name
count 27,8
mov $bad1,"The Trooperoid used her vacuum unit to force Luka to come."
gosub *face2
name $name
>Haha... So this is your white flag of defeat, eh?@
>I'm going to suck up alllll your white stuff!\
name ""
csp 690:print 10,500
goto *trooperloid_h



*trooperloid_h4

mov %ikigoe,3:gosub *ikigoe
name $name
>Hahaha!@>You couldn't even last five seconds!@
>Is that really even possible?\
name ""
gosub *syasei1
lsp 690,":c;chara\trooperloid_hb05.bmp",0,0
gosub *syasei2
>The moment Luka is forced into the Trooperoid's wet vagina, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2685,%2685+1:if %2685=1 mov %count_koenemy,%count_koenemy+1
if %2685>%count_most mov %count_most,%2685:mov $count_mostname,$name
count 1,8
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka is forced to come the moment of insertion."
gosub *face2
name $name
>How could you come that fast!?@> What a pathetic Hero!@
>Aren't you ashamed at your useless little dick?\
name ""
goto *trooperloid_h



*trooperloid_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":c;chara\trooperloid_hb05.bmp",0,0
gosub *syasei2
>As the Trooperoid violently rapes Luka, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2685,%2685+1:if %2685=1 mov %count_koenemy,%count_koenemy+1
if %2685>%count_most mov %count_most,%2685:mov $count_mostname,$name
count 1,8
mov $bad1,"The Trooperoid forced Luka to come as she raped him."
gosub *face2
name $name
>Haha... So this is your white flag of defeat, eh?@
>And you spurted out so much inside me, too!\
name ""
goto *trooperloid_h



*trooperloid_h

mov $bad2,"Luka was gang-raped by the Trooperoids until his death."
if %2685=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ah... Ah...\
name ""
name $name
>Alright then, time to squeeze out the Hero's semen.@
>My quota is quite high, so I'll need a lot.\
name ""
name "Luka"
>S...Stop... Urhg!\
name ""
cspl 690,699
lsp 700,":c;chara\trooperloid_ha01.bmp",0,0:print 10,500
>The Trooperoid steps over my body as I'm left unable to resist.\
name $name
>Now I'm going to absorb all of your semen. @
>With my special vacuum unit! \
name ""
lsp 700,":c;chara\trooperloid_ha03.bmp",0,0:print 10,500
>She attaches something that looks like a nozzle to her arm...\
lsp 700,":c;chara\trooperloid_ha04.bmp",0,0:print 10,500
name $name
>I'll suck it all up with this nozzle.@
>Turning on the vacuum on full power, I'll suck it all straight from the roots.\
>Your semen tank will become empty...@
>And my tank will be nice and full! \
name ""
name "Luka"
>S...Stop... Don't do that!\
name ""
>Her nozzle, already wet with semen, fills me with revulsion.@
>That thing is going to suck on me...?\
name $name
>Eh?@>You don't like it because the previous guy got it dirty?@
>Well, I just sucked him completely dry a moment ago, after all. \
>It was really funny too...@> He was a grown man, but he cried like a kid!@
>Here, let me give you a demonstration... \
name ""
dwave 1,"se\ero_vacum.ogg"
lsp 700,":c;chara\trooperloid_ha05.bmp",0,0:print 10,500
>The Trooperoid flicks some sort of switch...@
>And as the nozzle sucks in air, a loud whirring noise fills the area.\
name $name
>See? Amazing, right?@
>It's so powerful, it sucked in all of the leftover semen right away.\
name ""
lsp 700,":c;chara\trooperloid_ha06.bmp",0,0:print 10,500
name $name
>See, it's all beautiful now, right?@
>Your stuff will all be sucked up like that too, ya know?\
>I'm sure you'll be crying like a little girl in a few seconds.@
>It's not going to stop until you're empty, so get ready! \
name ""
name "Luka"
>S...Stop...\
name ""
lsp 700,":c;chara\trooperloid_ha07.bmp",0,0:print 10,500
name $name
>Oi, oi... You're still being defiant?@
>I can't let you be struggling around everywhere, after all...\
>Then I'll just need to exploit a man's weakness...\
name ""
name "Luka"
>Ah... Ah!\
name ""
lsp 700,":c;chara\trooperloid_ha08.bmp",0,0:print 10,500
>The Trooperoid uses her foot like an arm, and grabs hold of my balls!@
>She isn't squeezing, but she could crush them at any time if she put some power into her foot...\
name $name
>Since you're being such a brat about it, you get a punishment game.@
>The moment you come, it'll be a BANG!\
>I'll fire a bullet while your penis is inside this nozzle.@
>It'll split your penis right open.\
name ""
name "Luka"
>Ah...Ah!!!@> No, don't!\
name ""
>The Trooperoid's horrifying game leaves me panicked.@
>But if I try to fight back, I don't know what she'll do to my balls...\
name $name
>Doesn't this kind of erotic game just thrill you?@
>Alright, here we go...\
name ""
lsp 700,":c;chara\trooperloid_ha09.bmp",0,0:print 10,500
>The Trooperoid slowly puts the nozzle over my penis.@
>It isn't turned on yet, so it just feels like a cold tube, but...\
name "Luka"
>S...Stop, please...\
name ""
name $name
>Haha... Vacuum start!\
name ""
mov %hseanwave,27:hseanwave
lsp 700,":c;chara\trooperloid_ha10.bmp",0,0:print 10,500
name "Luka"
>Ahhhh!!!\
name ""
>Activating the vacuum, the sudden suction is so powerful, I can feel the nozzle vibrating my penis at an incredible rate.\
name $name
>Ahaha, is your dick trembling?@
>Such a simple little machine is making you feel that good?\
>But I wonder if you'll be able to endure it...?@
>If you come, your penis is gonna get blown up. \
name ""
name "Luka"
>Ahg... Ahh!\
name ""
>If I come, something horrible is going to happen...@
>I can't let something like that happen.\
>But the stimulation from the intense vacuum and the vibrations are getting to be too much.@
>Even if I don't want to, I don't know if my body will hold out.\
name "Luka"
>N...No... C...Coming...!\
name ""
name $name
>Oi, oi... Didn't you understand the rules?@
>If you come, I'm gonna shoot it.\
name ""
name "Luka"
>Haa... Ahhh!\
name ""
>I grit my teeth, trying to stop it...@
>But the intense vacuum seems to draw out my orgasm by pure force.\
gosub *syasei1
lsp 700,":c;chara\trooperloid_ha11.bmp",0,0
gosub *syasei2
name "Luka"
>Haa...\
name ""
>The incredible feeling of release as the semen is ripped out of me is amazing.@
>But I'm not in a state of mind where I can enjoy the pleasure...\
mov %hseanwave,0:hseanwave
name $name
>Aww... You gave up so quickly.@
>Alright, it's punishment time!\
name ""
name "Luka"
>Ahh!@> S...Stop!\
name ""
name $name
>I won't stop. @
>Alright... Fire!\
name ""
dwave 1,"se\laser.ogg"
lsp 700,":c;chara\trooperloid_ha16.bmp",0,0:print 10,500
name "Luka"
>Hyaaaa!!!\
name ""
>Suddenly, an intense shock hits my penis!@
>My whole body spasms in surprise at the sudden burst of electricity.\
name $name
>Ahaha, did you think I would shoot with live ammunition?@
>I shot it with a special electric current. \
>See, it feels all tingly, doesn't it?\
name ""
name "Luka"
>Ahhg... Hyaa!\
name ""
>My penis feels numb, the pleasure from moments before somehow being magnified by the current, and spreading to the rest of my body.\
>As the shock spreads through my body, another sensation I didn't expect comes rising out.\
name "Luka"
>Ah...!@> Ahhh!\
name ""
gosub *syasei1
lsp 700,":c;chara\trooperloid_ha19.bmp",0,0
gosub *syasei2
>Semen spurts out of my shocked penis, clearly not triggered by pleasure.@
>The intense electric current somehow triggered my body to ejaculate.\
>Forced into an orgasm by the shock, my body falls back limp and weak.\
lsp 700,":c;chara\trooperloid_ha21.bmp",0,0:print 10,500
name $name
>Oi, oi... What are you doing?@
>Did your dick come just from a little shock?\
>You're a huge pervert, aren't you? \
name ""
>The Trooperoid looks down at my weak body and laughs.@
lsp 700,":c;chara\trooperloid_ha22.bmp",0,0:print 10,500
>And sticks a finger into my ass!\
name "Luka"
>Ah!@>Hya!\
name ""
lsp 700,":c;chara\trooperloid_ha23.bmp",0,0:print 10,500
name $name
>The fun and games are over now.@
>It's time for me to really collect your semen.\
>We've got things we need to do you, you know?@
>So first I'll use your testicles a little... \
name ""
name "Luka"
>Haa!\
name ""
lsp 700,":c;chara\trooperloid_ha24.bmp",0,0:print 10,500
>The Trooperoid's finger slowly invades deeper and deeper inside me.@
>As she presses and explores around, she sometimes twists her finger in a circle.\
name $name
>Now to turn on the vacuum at the same time.@
>The double attack will send you to paradise. \
name "Luka"
>Stop... Stoop...!@
>Ahhh!\
name ""
mov %hseanwave,27:hseanwave
gosub *syasei1
lsp 700,":c;chara\trooperloid_ha25.bmp",0,0
gosub *syasei2
>As soon as she turns on the vacuum, I orgasm.\
>With her finger pressing against my prostate at the same time, my semen shoots out, sucked up quickly into the vacuum.\
>The stimulation that runs all the way from my ass to my penis...@
>It was like a piece of paradise itself.\
name $name
>Ahaha, it felt different from normal, didn't it?\
>I pushed it out by force from behind... @
>And also sucked it out from the front. \
name ""
lsp 700,":c;chara\trooperloid_ha26.bmp",0,0:print 10,500
name "Luka"
>Aiee!\
name ""
>The whirring of her vacuum gets even louder, as the suction gets more intense.@
>At the same time, her soft finger presses against my prostate from behind.\
name $name
>Press around in your ass... @
lsp 700,":c;chara\trooperloid_ha27.bmp",0,0:print 10,500
>And put the vacuum on maximum power! \
>Ahaha, look at your penis twitching like crazy in my nozzle!\
name $name
name "Luka"
>Hyaaa!\
name ""
>In response to the intense suction, my penis is bouncing around and vibrating inside the nozzle.@
>The incredible combinations of stimulation overcome any resistance I could hope to give.\
gosub *syasei1
lsp 700,":c;chara\trooperloid_ha28.bmp",0,0
gosub *syasei2
>Drawn out by the mechanical nozzle, my semen is quickly sucked up the machine monster's arm.\
name $name
>Hahaha! @
>I'll suck out all your semen, straight from your testicles! \
>Keep it up, and do your best shooting it alllll out! @
>You and your semen are both going to die in the end, after all! \
name ""
name "Luka"
>Aieee!\
name ""
gosub *syasei1:gosub *syasei2
>Without a break, she forces me to orgasm after orgasm...@
>After a while, only a little bit of semen is still trickling out.\
name $name
>Oi, oi... You getting tired?@
>Then I'll give you a little bit of your favorite snack...!\
name ""
dwave 1,"se\laser.ogg"
lsp 700,":c;chara\trooperloid_ha32.bmp",0,0:print 10,500
name "Luka"
>Aiiiieeeee!!!\
name ""
>The current of electricity slams into my penis again.@
>As the shock goes through my body, more semen leaks out.\
lsp 700,":c;chara\trooperloid_ha34.bmp",0,0:print 10,500
name "Luka"
>Stop... Stop already...\
name ""
name $name
>There's no point complaining.@
>Come on, spurt it all out! \
name ""
name "Luka"
>Hyaa!\
name ""
>My penis spasms as I keep shooting out shot after shot of semen...@
lsp 700,":c;chara\trooperloid_ha35.bmp",0,0:print 10,500
>Until finally, nothing more came out.\
>My penis just twitches and spasms inside her nozzle, with nothing coming out.@
>In complete exhaustion, I go limp.\
mov %hseanwave,0:hseanwave
name $name
>What, is that it?@
>I'll use my vacuum to confirm it...\
name ""
mov %hseanwave,27:hseanwave
name "Luka"
>Hyaa!\
name ""
>The intense suction attacks my glans again...@
gosub *syasei1
lsp 700,":c;chara\trooperloid_ha36.bmp",0,0
gosub *syasei2
>But with a couple twitches, barely even a drop drips out.\
mov %hseanwave,0:hseanwave
name $name
>And now your balls are empty. @
>How do you feel now, with your semen tank empty?\
name ""
lsp 700,":c;chara\trooperloid_ha37.bmp",0,0:print 10,500
>The Trooperoid takes her nozzle away with a laugh.@
>My dried out, limp penis flops pointlessly down after she releases me.\
lsp 700,":c;chara\trooperloid_ha38.bmp",0,0:print 10,500
name "Luka"
>Urhg... Are you letting me go now?\
name ""
name $name
>Ah, you filled my quota for the day. @
>Just enough... For me.\
name ""
name "Luka"
>Eh...?\
name ""
lsp 700,":c;chara\trooperloid_ha39.bmp",0,0:print 10,500
>Countless eyes shine around me.@
>Innumerable Trooperoids are slowly approaching us from the sides...\
name "Luka"
>N...No way!@
>Ahh!\
name ""
name $name
>Well then, do your best to fill everyone else's quotas too. @
>Ahaha, thanks for my share. \
name ""
>This vacuum hell is far from over...@
>The cruel fate awaiting me leads me into despair.\
gosub *anten
>..............\
goto *badend



*assassinloid_start

mov $name,"Assassinroid"
mov $name2,"Assassinroid"
mov $lavel,"assassinloid"
mov $tatie1,"assassinloid_st01"
mov $tatie2,"assassinloid_st02"
mov $tatie3,"assassinloid_st03"
mov $tatie4,"assassinloid_st02"
mov $haikei,"bg122"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,25000
if %nanido=2 mov %max_enemylife,29000
if %nanido=3 mov %max_enemylife,33000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,1
mov %alice_skill1,100
mov %alice_skill2,100
mov %alice_skill3,100
mov %music,2
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke away!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"You can't break my grapple with that!"
mov $mogaku_sel2,"There's no point! You won't break free!"
mov $mogaku_sel3,"You can't break my grapple with that!"
mov $mogaku_sel4,"There's no point! You won't break free!"
mov $mogaku_sel5,"You can't break my grapple with that!"
mov $mogaku_dassyutu1,"Guh... You broke free of my martial arts!?"
mov $mogaku_dassyutu2,""
mov $mogaku_earth_dassyutu1,"Guh... You broke free of my martial arts!?"
mov $mogaku_earth_dassyutu2,""
mov $half_s1,"Are you feeling my sexual skills?"
mov $half_s2,"I'll bring you into a corner, nice and slowly..."
mov $kiki_s1,"At your limit?"
mov $kiki_s2,"If that's all you've got, you won't be able to satisfy me..."
mov %end_n,14
mov %exp_minus,200000
mov %zmonster_x,-250
mov %tukix,300
mov %owaza_count1a,4
mov %owaza_count3a,8
mov %owaza_count3b,2
name $name
>I am Assassinroid...@
>As my name implies, I specialize in surprise and assassination.\
>I was getting bored with having command of this troop of Trooperoids...@
>But now I have some interesting prey to play with.\
name ""
name "Luka"
>If you were entrusted to lead, are you sure it's a good idea to enter the fight yourself?\
name ""
>Though I can tell from that previous attack that she's very skilled...@
>She didn't attack with the thought she could lose.\
name $name
>If your skill satisfies me, I'll rape you as a reward.@
>I'll gather your semen as some valuable data...\
>But if you bore me, I'll just feed on your semen as simple food.@
>If you don't want that, then come at me seriously!\
name ""
goto *common_main



*assassinloid_v

gosub *face3
name $name
>What skill...@
>To think I would be overwhelmed...!\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Assassinroid is sealed in the form of a small tentacled creature!\
mov %viclose,1:gosub *victory
mov %getexp,230000:gosub *lvup
mov %2402,1
goto *sean0378



*assassinloid_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>How pathetic...@>You're giving up already?@
>Are you ready to receive the loser's insult?\
name ""
goto *assassinloid_a



*assassinloid_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 && %hanyo1=1 goto *assassinloid_attack
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *assassinloid_kousan
if %cmd1=16 goto *assassinloid_onedari
if %cmd1=17 && %hanyo1<>1 goto *common_skill
if %cmd1=17 && %hanyo1=1 goto *assassinloid_skill
if %cmd1=18 goto *common_alice_skill
goto *assassinloid_main



*assassinloid_attack

mov %before_action,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ha!"
if %ransu=2 mov $sel1,"Hya!"
if %ransu=3 mov $sel1,"Orya!"
name "Luka"
eng $sel1:$sel6\
name ""
mov %skill_sub,1
gosub *common_attack2
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\miss.ogg"
delay 90
>Miss!\
goto *assassinloid_a



*assassinloid_skill

gosub *cmd_skill
if %cmd1=24 goto *skill4
if %cmd1=29 goto *skill15
if %cmd1=31 goto *skill7d
if %cmd1=32 goto *skill8d
if %cmd1=33 goto *skill10d
if %cmd1=34 goto *skill14d
if %cmd1=35 goto *skill17
if %cmd1=36 goto *skill18
if %cmd1=37 goto *assassinloid_skillx1
if %cmd1=38 goto *assassinloid_skillx1
if %cmd1=39 goto *assassinloid_skillx1
if %cmd1=44 goto *skill22
if %cmd1=45 goto *skill23
if %cmd1=-1 goto *assassinloid_main
goto *assassinloid_skill



*assassinloid_skillx1

if %cmd1=37 mov %skill_sub,1:gosub *skill19:skip 3
if %cmd1=38 mov %skill_sub,1:gosub *skill20:skip 2
if %cmd1=39 mov %skill_sub,1:gosub *skill21
mov %skill_sub,0
dwave 1,"se\miss.ogg"
>But it misses Assassinroid!\
skillname ""
goto *assassinloid_a



*assassinloid_a

if %hanyo1=1 && %hanyo2<3 gosub *assassinloid_a10:goto *common_main
if %hanyo1=1 && %hanyo2=3 gosub *assassinloid_a12:goto *common_main
if %hanyo1=2 && %hanyo6<2 gosub *assassinloid_a13:goto *common_main
if %hanyo1=2 && %hanyo6=2 gosub *assassinloid_a14:goto *common_main
if %kousoku=1 gosub *assassinloid_a8:goto *common_main
rnd2 %ransu,1,14
if %ransu=1 gosub *assassinloid_a1:goto *common_main
if %ransu=2 gosub *assassinloid_a2:goto *common_main
if %ransu=3 gosub *assassinloid_a3:goto *common_main
if %ransu=4 gosub *assassinloid_a4:goto *common_main
if %ransu=5 gosub *assassinloid_a5:goto *common_main
if %ransu=6 gosub *assassinloid_a6:goto *common_main
if %ransu<9 && %owaza_count1a>5 && %enemy_fire=0 gosub *assassinloid_a7:goto *common_main
if %ransu<12 && %ransu>8 && %owaza_count3a>9 && %enemy_fire=0 gosub *assassinloid_el4:goto *common_main
if %ransu>11 && %owaza_count3b>3 && %kousan=0 gosub *assassinloid_a11:goto *common_main
skip -10



*assassinloid_el4

add %stack,1
mov %owaza_count3a,0
name $name
>Come, Gigamander!\
name ""
skillname "Fire Spirit Summon"
mov %enemy_fire,6
dwave 2,"se\fire2.ogg"
lsp2 0,":a;chara\gigamander_st01.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *enemy_elm_print
>Assassinroid summons a spirit of fire!\
skillname ""
sub %stack,1
return



*assassinloid_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"As you can tell from looking, this hand is well suited to caressing men..."
if %ransu=2 mov $sel1,"My hands are so soft, you'll get addicted..."
if %ransu=3 mov $sel1,"Hehe, are you going to dye my hand white?"
name $name
eng $sel1:$sel6\
name ""
skillname "Assassin's Hand"
dwave 1,"se\ero_koki1.ogg"
>Assassinroid gently strokes Luka's penis with her soft hand!
if %daten>0 goto *skill22x
if %enemy_fire=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %enemy_fire>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4134
if %nanido<2 damage 300,320
if %nanido=2 damage 310,330
if %nanido=3 damage 320,340
if %enemy_fire=0 skip 11
dwave 1,"se\ero_koki1.ogg"
>She uses both hands to stimulate Luka even more!
if %nanido<2 damage 300,320
if %nanido=2 damage 310,330
if %nanido=3 damage 320,340
dwave 1,"se\ero_koki1.ogg"
>Sandwiching his penis between both hands, she squeezes Luka's penis!
if %nanido<2 damage 300,320
if %nanido=2 damage 310,330
if %nanido=3 damage 320,340
skillname ""
if %mylife=0 sub %stack,1:return *assassinloid_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*assassinloid_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My tongue is as fast as my hands!"
if %ransu=2 mov $sel1,"I'll finish you off in seconds with my mouth!"
if %ransu=3 mov $sel1,"I'm quite confident in my oral skills, too!"
name $name
eng $sel1:$sel6\
name ""
skillname "Assassin's Blowjob"
dwave 1,"se\ero_pyu2.ogg"
lsp 690,":a;chara\assassinloid_ct11.bmp",0,0:print 10,500
>Assassinroid violently licks Luka's penis!
if %daten>0 goto *skill22x
if %enemy_fire=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %enemy_fire>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
>At the same time, she spins her finger around inside Luka's ass!
skillcount3 3989
if %nanido<2 damage 310,330
if %nanido=2 damage 320,340
if %nanido=3 damage 330,350
if %enemy_fire=0 skip 11
dwave 1,"se\ero_pyu1.ogg"
>Saliva drips from her mouth as she sucks on Luka's penis!
if %nanido<2 damage 310,330
if %nanido=2 damage 320,340
if %nanido=3 damage 330,350
dwave 1,"se\ero_pyu2.ogg"
>At the same time, her tongue licks every inch of Luka's penis!
if %nanido<2 damage 310,330
if %nanido=2 damage 320,340
if %nanido=3 damage 330,350
skillname ""
if %mylife=0 sub %stack,1:return *assassinloid_h2
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*assassinloid_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Men finish in moments between these..."
if %ransu=2 mov $sel1,"These are also a woman's weapon..."
if %ransu=3 mov $sel1,"Cover my chest in semen!"
name $name
eng $sel1:$sel6\
name ""
skillname "Assassin's Bust"
dwave 1,"se\ero_sigoki1.ogg"
>Assassinroid sandwiches Luka's penis between her breasts!
if %daten>0 goto *skill22x
if %enemy_fire=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %enemy_fire>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3990
if %nanido<2 damage 320,340
if %nanido=2 damage 330,350
if %nanido=3 damage 340,360
if %enemy_fire=0 skip 11
dwave 1,"se\ero_sigoki1.ogg"
>Moving them up and down, she pumps Luka's penis with her breasts!
if %nanido<2 damage 320,340
if %nanido=2 damage 330,350
if %nanido=3 damage 340,360
dwave 1,"se\ero_sigoki1.ogg"
>Sticking her tongue out, she licks the tip of Luka's penis at the same time!
if %nanido<2 damage 320,340
if %nanido=2 damage 330,350
if %nanido=3 damage 340,360
skillname ""
if %mylife=0 sub %stack,1:return *assassinloid_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*assassinloid_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Cover my ass with your seed..."
if %ransu=2 mov $sel1,"Hehe... Could you drown in this soft feeling?"
if %ransu=3 mov $sel1,"Do you love asses? Here, I'll give you a taste of mine..."
name $name
eng $sel1:$sel6\
name ""
skillname "Assassin's Ass"
dwave 1,"se\ero_sigoki1.ogg"
>Assassinroid presses her ass against Luka's penis!
if %daten>0 goto *skill22x
if %enemy_fire=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %enemy_fire>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3991
if %nanido<2 damage 330,350
if %nanido=2 damage 340,360
if %nanido=3 damage 350,370
if %enemy_fire=0 skip 11
dwave 1,"se\ero_sigoki1.ogg"
>Moving side to side, she rubs her ass against Luka's penis!
if %nanido<2 damage 330,350
if %nanido=2 damage 340,360
if %nanido=3 damage 350,370
dwave 1,"se\ero_sigoki1.ogg"
>She crushes Luka's penis with her ass as she rubs it!
if %nanido<2 damage 330,350
if %nanido=2 damage 340,360
if %nanido=3 damage 350,370
skillname ""
if %mylife=0 sub %stack,1:return *assassinloid_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*assassinloid_a5

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Can you withstand my footwork?"
if %ransu=2 mov $sel1,"I'll trample your weak point with my foot."
if %ransu=3 mov $sel1,"For powerful men like you, crushing you with a foot is usually effective..."
name $name
eng $sel1:$sel6\
name ""
skillname "Assassin's Foot"
dwave 1,"se\ero_koki1.ogg"
>Assassinroid steps down on Luka's penis with her foot!
if %daten>0 goto *skill22x
if %enemy_fire=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %enemy_fire>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3992
if %nanido<2 damage 340,360
if %nanido=2 damage 350,370
if %nanido=3 damage 360,380
if %enemy_fire=0 skip 11
dwave 1,"se\ero_koki1.ogg"
>She slowly moves her leg back and forth, rubbing Luka's penis!
if %nanido<2 damage 340,360
if %nanido=2 damage 350,370
if %nanido=3 damage 360,380
dwave 1,"se\ero_koki1.ogg"
>Moving even faster, she massages Luka's penis with her foot!
if %nanido<2 damage 340,360
if %nanido=2 damage 350,370
if %nanido=3 damage 360,380
skillname ""
if %mylife=0 sub %stack,1:return *assassinloid_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*assassinloid_a6

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"This organ is like a secondary set of genitals... I don't mind if you enjoy it."
if %ransu=2 mov $sel1,"I'll suck out your semen with my second set of genitals!"
if %ransu=3 mov $sel1,"I'll draw out your semen with this organ!"
name $name
eng $sel1:$sel6\
name ""
skillname "Second Genital Suck"
dwave 1,"se\ero_pyu1.ogg"
lsp 690,":a;chara\assassinloid_ct01.bmp",0,0:print 10,500
>The mouth of a tentacle sucks in Luka's penis!
if %daten>0 goto *skill22x
if %enemy_fire=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %enemy_fire>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3993
if %nanido<2 damage 180,200
if %nanido=2 damage 200,220
if %nanido=3 damage 220,240
dwave 1,"se\ero_chupa6.ogg"
>The internal suction pulls hard on Luka's penis!
if %nanido<2 damage 180,200
if %nanido=2 damage 200,220
if %nanido=3 damage 220,240
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
if %enemy_fire=0 skip 15
dwave 1,"se\ero_chupa6.ogg"
>As the tentacle sucks on Luka's penis, intense pleasure runs through Luka's body!
if %nanido<2 damage 180,200
if %nanido=2 damage 200,220
if %nanido=3 damage 220,240
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
dwave 1,"se\ero_chupa6.ogg"
>The tentacle's inner walls squirm around Luka's penis!
if %nanido<2 damage 180,200
if %nanido=2 damage 200,220
if %nanido=3 damage 220,240
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *assassinloid_h6
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*assassinloid_a7

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 4
name $name
>Now for a big move!\
name ""
skillname "Mating Pin Martial Arts"
eng "Assassinroid jumps on Luka, and pins him to the ground!":$sel6/
if %daten>0 goto *skill22x
if %enemy_fire=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %enemy_fire>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
lsp 690,":c;chara\assassinloid_hc21.bmp",0,0
mov %kousoku,1:gosub *status_print
>Luka has been pinned by Assassinroid!\
skillname ""
if %kousan=2 sub %stack,1:return
name $name
>Hehe... Do you think you can escape from this pin?@
>If you can't, your penis will be preyed on by me...\
name ""
if %earth=0 && %nanido<2 mov %genmogaku,99
if %earth=0 && %nanido=2 mov %genmogaku,99
if %earth=0 && %nanido=3 mov %genmogaku,99
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
sub %stack,1
return



*assassinloid_a8

add %stack,1
if %kousan=2 skip 5
name $name
>So you weren't able to break free...@
>Then lament your helplessness while you taste a hell of pleasure!\
name ""
skillname "First Genital Mating"
dwave 1,"se\ero_pyu1.ogg"
lsp 690,":c;chara\assassinloid_hc22.bmp",0,0:print 10,500
>Assassinroid drops her waist, forcing Luka into her!
skillcount3 3994
mov %damage_kotei,1
damage 500,600
mov %kousoku,1:gosub *status_print
>Luka is being raped by Assassinroid!\
skillname ""
if %mylife=0 sub %stack,1:return *assassinloid_h7
name "Luka"
>Ahhh!\
name ""
>Tiny little bumps rub against my penis as she forces me deep into her hot vagina.\
name $name
>This is what my first set of genitals feels like...@
>You like the bumps, don't you?\
name ""
sub %stack,1
goto *assassinloid_a9



*assassinloid_a9

add %stack,1
>Luka is being raped by Assassinroid...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Are you going to finish in an instant!?":mov $sel2,"Assassinroid presses her body hard against Luka's!"
if %ransu=2 mov $sel1,"If I squeeze it, you won't be able to hold out any longer!":mov $sel2,"Assassinroid tightens her vagina!"
if %ransu=3 mov $sel1,"You can't take these movements!":mov $sel2,"Assassinroid bounces quickly on top of Luka!"
if %ransu=4 mov $sel1,"Does my pussy feel good? Then come inside me!":mov $sel2,"Assassinroid wiggles her waist side to side, causing the bumps to rub hard against Luka's penis!"
if %ransu=5 mov $sel1,"If I move like this, you'll be done in an instant!":mov $sel2,"Assassinroid makes the little bumps inside of her vagina rub against Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "First Genital Mating"
dwave 1,"se\ero_chupa4.ogg"
eng $sel2:$sel6
skillcount3 3994
mov %damage_kotei,1
damage 500,600
skillname ""
if %mylife=0 sub %stack,1:return *assassinloid_h8
sub %stack,1
goto *assassinloid_a9



*assassinloid_a10

add %stack,1
add %hanyo2,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Go, blade of shadows!"
if %ransu=2 mov $sel1,"Can you dodge this!?"
if %ransu=3 mov $sel1,"I'll take your life!"
name $name
eng $sel1:$sel6\
name ""
skillname "Stealth Attack"
dwave 1,"se\tume.ogg"
lsp 690,":a;chara\assassinloid_ct21.bmp",0,0:print 10,500
>Assassinroid attacks with sharp claws from the darkness!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
mov %a_effect1,1
if %nanido<2 damage 800,900
if %nanido=2 damage 900,1000
if %nanido=3 damage 1000,1100
if %enemy_fire=0 skip 8
dwave 1,"se\fire1.ogg"
dwave 2,"se\tume.ogg"
>A burst of flame slams into Luka at the same time!
mov %a_effect1,1
if %nanido<2 damage 800,900
if %nanido=2 damage 900,1000
if %nanido=3 damage 1000,1100
skillname ""
csp 690:print 10,500
if %mylife=0 sub %stack,1:return *assassinloid_h9
sub %stack,1
return



*assassinloid_a11

add %stack,1
name $name
>I'll show you my special ability!
name ""
skillname "Stealth"
mov $tatie1,"assassinloid_st41"
mov $tatie2,"assassinloid_st41"
mov $tatie3,"assassinloid_st41"
mov $tatie4,"assassinloid_st41"
dwave 3,"se\bun.ogg"
gosub *face1
>Assassinroid vanishes!\
skillname ""
mov %hanyo1,1
mov %hanyo2,0
if %first_sel1=1 sub %stack,1:return
name "Luka"
>S...She's gone!?\
name ""
>No... I can still sense her thirst for blood!@
>She just did something to hide...\
mov %first_sel1,1
sub %stack,1
return



*assassinloid_a12

add %stack,1
name $name
>I'm at my limit...\
name ""
dwave 3,"se\bun.ogg"
lsp 700,":a;chara\assassinloid_st13.bmp",0,0:print 10,500
>Assassinroid reappears!\
name $name
>Time to vent the heat!\
name ""
skillname "Venting Heat"
mov $tatie1,"assassinloid_st21"
mov $tatie2,"assassinloid_st22"
mov $tatie3,"assassinloid_st23"
mov $tatie4,"assassinloid_st22"
gosub *face1
>Heat radiates out from Assassinroid's body!\
skillname ""
mov %hanyo1,2
if %nanido<2 mov %hanyo6,0
if %nanido=2 mov %hanyo6,1
if %nanido=3 mov %hanyo6,2
sub %stack,1
return



*assassinloid_a13

add %stack,1
name $name
>..........\
name ""
skillname "Venting Heat"
>Heat radiates out from Assassinroid's body...\
skillname ""
add %hanyo6,1
sub %stack,1
return



*assassinloid_a14

add %stack,1
mov %owaza_count3b,0
name $name
>Alright, back in action!\
name ""
mov $tatie1,"assassinloid_st01"
mov $tatie2,"assassinloid_st02"
mov $tatie3,"assassinloid_st03"
mov $tatie4,"assassinloid_st02"
gosub *face1
>Assassinroid takes a battle stance again!\
mov %hanyo1,0
sub %stack,1
return



*assassinloid_onedari

mov $list1,"Assassin's Hand"
if %4134>0 mov %list_num1,1
mov $list2,"Assassin's Blowjob"
if %3989>0 mov %list_num2,1
mov $list3,"Assassin's Bust"
if %3990>0 mov %list_num3,1
mov $list4,"Assassin's Ass"
if %3991>0 mov %list_num4,1
mov $list5,"Assassin's Foot"
if %3992>0 mov %list_num5,1
mov $list6,"Second Genital Suck"
if %3993>0 mov %list_num6,1
mov $list7,"First Genital Mating"
if %3994>0 mov %list_num7,1
gosub *cmd_onedari
if %cmd1=11 goto *assassinloid_onedari1
if %cmd1=12 goto *assassinloid_onedari2
if %cmd1=13 goto *assassinloid_onedari3
if %cmd1=14 goto *assassinloid_onedari4
if %cmd1=15 goto *assassinloid_onedari5
if %cmd1=16 goto *assassinloid_onedari6
if %cmd1=17 goto *assassinloid_onedari7
if %cmd1=-1 goto *assassinloid_main
goto *assassinloid_onedari



*assassinloid_onedari1

mov $tatie1,"assassinloid_st01"
mov $tatie2,"assassinloid_st02"
mov $tatie3,"assassinloid_st03"
mov $tatie4,"assassinloid_st02"
gosub *onedari_syori
name $name
>You want to finish in my hand?@
>You abandon the match in search of pleasure? Fool!\
name ""
gosub *assassinloid_el4
gosub *assassinloid_a1
skip -1



*assassinloid_onedari2

mov $tatie1,"assassinloid_st01"
mov $tatie2,"assassinloid_st02"
mov $tatie3,"assassinloid_st03"
mov $tatie4,"assassinloid_st02"
gosub *onedari_syori
name $name
>You want to finish in my mouth?@
>You abandon the match in search of pleasure? Fool!\
name ""
gosub *assassinloid_el4
gosub *assassinloid_a2
skip -1



*assassinloid_onedari3

mov $tatie1,"assassinloid_st01"
mov $tatie2,"assassinloid_st02"
mov $tatie3,"assassinloid_st03"
mov $tatie4,"assassinloid_st02"
gosub *onedari_syori
name $name
>You want to finish on my breasts?@
>You abandon the match in search of pleasure? Fool!\
name ""
gosub *assassinloid_el4
gosub *assassinloid_a3
skip -1



*assassinloid_onedari4

mov $tatie1,"assassinloid_st01"
mov $tatie2,"assassinloid_st02"
mov $tatie3,"assassinloid_st03"
mov $tatie4,"assassinloid_st02"
gosub *onedari_syori
name $name
>You want to finish on my ass?@
>You abandon the match in search of pleasure? Fool!\
name ""
gosub *assassinloid_el4
gosub *assassinloid_a4
skip -1



*assassinloid_onedari5

mov $tatie1,"assassinloid_st01"
mov $tatie2,"assassinloid_st02"
mov $tatie3,"assassinloid_st03"
mov $tatie4,"assassinloid_st02"
gosub *onedari_syori
name $name
>You want to finish on my foot?@
>You abandon the match in search of pleasure? Fool!\
name ""
gosub *assassinloid_el4
gosub *assassinloid_a5
skip -1



*assassinloid_onedari6

mov $tatie1,"assassinloid_st01"
mov $tatie2,"assassinloid_st02"
mov $tatie3,"assassinloid_st03"
mov $tatie4,"assassinloid_st02"
gosub *onedari_syori
name $name
>You want to finish in my tentacle?@
>You abandon the match in search of pleasure? Fool!\
name ""
gosub *assassinloid_el4
gosub *assassinloid_a6
skip -1



*assassinloid_onedari7

mov $tatie1,"assassinloid_st01"
mov $tatie2,"assassinloid_st02"
mov $tatie3,"assassinloid_st03"
mov $tatie4,"assassinloid_st02"
if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want me to rape you?@
>You abandon the match in search of pleasure? Fool!\
name ""
if %kousoku=0 gosub *assassinloid_a7
gosub *assassinloid_a8
skip -1



*assassinloid_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\assassinloid_bk03.bmp",0,0
gosub *syasei2
>As Assassinroid strokes Luka's penis with her soft hands, he comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2702,%2702+1:if %2702=1 mov %count_koenemy,%count_koenemy+1
if %2702>%count_most mov %count_most,%2702:mov $count_mostname,$name
count 5,5
mov $bad1,"Assassinroid forced Luka to come with her hands."
gosub *face2
name $name
>Hmph... You so easily just spurted all over my hand.@
>Aren't you ashamed to have been defeated so easily?\
name ""
goto *assassinloid_h



*assassinloid_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\assassinloid_ct12.bmp",0,0
gosub *syasei2
>As Assassinroid sucks and licks Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2702,%2702+1:if %2702=1 mov %count_koenemy,%count_koenemy+1
if %2702>%count_most mov %count_most,%2702:mov $count_mostname,$name
count 4,5
mov $bad1,"Assassinroid forced Luka to come with her mouth."
gosub *face2
name $name
>Hmph... You so easily just spurted in my mouth.@
>Aren't you ashamed to have been defeated so easily?\
name ""
csp 690:print 10,500
goto *assassinloid_h



*assassinloid_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\assassinloid_bk02.bmp",0,0
gosub *syasei2
>As Assassinroid squeezes Luka's penis with her soft breasts, he comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2702,%2702+1:if %2702=1 mov %count_koenemy,%count_koenemy+1
if %2702>%count_most mov %count_most,%2702:mov $count_mostname,$name
count 7,5
mov $bad1,"Assassinroid forced Luka to come with her breasts."
gosub *face2
name $name
>Hmph... You so easily just spurted all over my chest.@
>Aren't you ashamed to have been defeated so easily?\
name ""
goto *assassinloid_h



*assassinloid_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\assassinloid_bk04.bmp",0,0
gosub *syasei2
>As Assassinroid presses against Luka's penis with her ass, he comes, covering her back with semen.\
mov %viclose,1:gosub *lose
mov %2702,%2702+1:if %2702=1 mov %count_koenemy,%count_koenemy+1
if %2702>%count_most mov %count_most,%2702:mov $count_mostname,$name
count 34,5
mov $bad1,"Assassinroid forced Luka to come with her ass."
gosub *face2
name $name
>Hmph... You so easily just spurted all over my ass.@
>Aren't you ashamed to have been defeated so easily?\
name ""
goto *assassinloid_h



*assassinloid_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\assassinloid_bk05.bmp",0,0
gosub *syasei2
>As Assassinroid steps on Luka's penis, he comes, covering her feet in semen.\
mov %viclose,1:gosub *lose
mov %2702,%2702+1:if %2702=1 mov %count_koenemy,%count_koenemy+1
if %2702>%count_most mov %count_most,%2702:mov $count_mostname,$name
count 6,5
mov $bad1,"Assassinroid forced Luka to come with her feet."
gosub *face2
name $name
>Hmph... You so easily just spurted all over my feet.@
>Aren't you ashamed to have been defeated so easily?\
name ""
goto *assassinloid_h



*assassinloid_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\assassinloid_ct02.bmp",0,0
lsp 696,":a;chara\assassinloid_bk06.bmp",0,0
gosub *syasei2
>As Assassinroid's tentacle sucks on Luka's penis, he comes, filling it with semen.\
mov %viclose,1:gosub *lose
mov %2702,%2702+1:if %2702=1 mov %count_koenemy,%count_koenemy+1
if %2702>%count_most mov %count_most,%2702:mov $count_mostname,$name
count 2,5
mov $bad1,"Assassinroid forced Luka to come with her tentacle."
gosub *face2
name $name
>Hmph... That was awfully fast, don't you think?@
>Aren't you ashamed to have been defeated so easily?\
name ""
csp 690:print 10,500
goto *assassinloid_h



*assassinloid_h7

mov %ikigoe,3:gosub *ikigoe
name $name
>Hah... An instant finish?\
name ""
gosub *syasei1
lsp 690,":c;chara\assassinloid_hc27.bmp",0,0
gosub *syasei2
>The moment Luka is forced into Assassinroid, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2702,%2702+1:if %2702=1 mov %count_koenemy,%count_koenemy+1
if %2702>%count_most mov %count_most,%2702:mov $count_mostname,$name
count 1,5
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Assassinroid forced Luka to come the moment of insertion into her."
gosub *face2
name $name
>You couldn't even last a few seconds...@
>How pitiful.\
name ""
goto *assassinloid_h



*assassinloid_h8

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":c;chara\assassinloid_hc27.bmp",0,0
gosub *syasei2
>As Assassinroid rapes Luka, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2702,%2702+1:if %2702=1 mov %count_koenemy,%count_koenemy+1
if %2702>%count_most mov %count_most,%2702:mov $count_mostname,$name
count 1,5
mov $bad1,"Assassinroid forced Luka to come as she rapes him."
gosub *face2
name $name
>Hmm... You sure did spurt a lot inside me.@
>You should be ashamed of giving in so easily.\
name ""
goto *assassinloid_h



*assassinloid_h9

name "Luka"
>Is this it...!?\
name ""
>Overwhelmed by her hidden attacks, I fall to my knees.\
mov %viclose,2:gosub *lose
mov %2702,%2702+1:if %2702=1 mov %count_koenemy,%count_koenemy+1
if %2702>%count_most mov %count_most,%2702:mov $count_mostname,$name
count 14,5
mov $bad1,"Luka was brought to his knees by Assassinroid's stealth attacks."
name $name
>...Hmph, already too injured to fight?@
>You should be ashamed of losing to attacks of this level.\
name ""
goto *assassinloid_h



*assassinloid_h

mov $bad2,"Forced to continually mate with a low class biological monster, Luka becomes the same as a cripple."
if %2702=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
cspl 690,699
lsp 700,":a;chara\assassinloid_st23.bmp",0,0:print 10,500
name $name
>Sheesh, you're already done fighting?@>How disappointing...@
>I thought you'd be an opponent I could fight with everything I had.\
>It looks like I just wasted my time, though.@
>...I'll just feed your semen to a low level monster, then.\
name ""
lsp 700,":a;chara\assassinloid_st24.bmp",0,0:print 10,500
>The tentacles on the end of Assassinroid's head tail suddenly start to squirm...@
dwave 1,"se\ero_makituki3.ogg"
lsp 700,":a;chara\assassinloid_st25.bmp",0,0:print 10,500
>Disconnecting, a wriggling mass of flesh falls to the ground.\
lsp 700,":c;chara\assassinloid_st31.bmp",0,0:print 10,500
name "Luka"
>Wh...What is that!?\
name ""
name $name
>Hehe... This is your new partner.@
>She loves semen from every animal.\
>But her favorite food is human semen.\
name ""
>The separated piece of flush slowly starts to change...@
lsp 700,":c;chara\assassinloid_st32.bmp",0,0:print 10,500
>A tiny organ rises out of it, looking slightly like an insect.\
>A hole opens up, looking almost like a female's vagina...@
>No way... She can't be thinking of putting my penis in there!?\
name "Luka"
>N...No!@>Stop!\
name ""
>I scream out in horror.\
name $name
>Hehe... You think you can get away?\
name ""
lsp 700,":c;chara\assassinloid_hb01.bmp",0,0:print 10,500
>Assassinroid grabs me from behind.@
>Held firmly by her warm body, she completely deprives me of my freedom.\
>The strange organism slowly crawls toward my penis, flaccid from horror.\
lsp 700,":c;chara\assassinloid_hb02.bmp",0,0:print 10,500
name "Luka"
>D...Don't come any closer!@> Urhg...\
name ""
name $name
>Hmph, that's so rude...@
>You're going to be mating with her from now on.\
>And your penis isn't even hard yet!@
>Fine... I'll help out a little bit.\
name ""
name "Luka"
>S...Stop...\
name ""
lsp 700,":c;chara\assassinloid_hb03.bmp",0,0:print 10,500
>Her hand, tipped with sharp claws, comes across my chest.@
>She slowly traces the tip of a sharp claw around one of my nipples.\
name "Luka"
>Wh...What are...?\
name ""
name $name
>Oho... Don't move.@
>You wouldn't want me to cut off one of your nipples on accident, would you?\
name ""
name "Luka"
>Aie!\
name ""
>Terrified, I stiffen and stop moving.\
name $name
>Good, that's right.@
>I'll carve the sexual excitement you can feel from disgrace right into you...\
name ""
>She skillfully traces her sharp claw around my nipples, never actually hurting me...@
>I can't help but react to the slightly ticklish stimulation.\
name "Luka"
>Ha... Ah...\
name ""
name $name
>Your breath is getting rough...@>Are you already starting to go into heat?@
>Good, let's keep going until you're ready to breed...\
>Once you're erect, that base monster will deal with you.\
name ""
name "Luka"
>N...Nooo... Ahh!\
name ""
lsp 700,":c;chara\assassinloid_hb04.bmp",0,0:print 10,500
>She starts using her fingers to pinch my nipples, and gently traces them across my stomach.\
name $name
>Just like a girl...@
>You're getting so excited from having your nipples played with.\
name ""
name "Luka"
>Haa... Ah...\
name ""
>Rubbing, squeezing, and flicking... She keeps changing the stimulation she's using on my nipples to get reactions out of me.\
>Unable to stop it, my body pitifully reacts...@
lsp 700,":c;chara\assassinloid_hb05.bmp",0,0:print 10,500
>And my penis slowly gets erect.\
name $name
>Hehe... How miserable.@
>Now finally, your well suited base organism can start sucking on your penis.\
>She'll suck out all of that semen you've built up...\
name ""
name "Luka"
>N...No... Stop!\
name ""
>I plead to her as the creature slowly moves forward, my body shivering in horror.\
name $name
>If you're so set against it, then I'll give you one more chance...@
>You need to prove your strong will, and show that this base creature isn't a good match for you.\
name ""
lsp 700,":c;chara\assassinloid_hb06.bmp",0,0:print 10,500
>Assassinroid slowly reaches out, and softly grabs hold of my penis.\
name $name
>I'm going to slowly stroke you now.@
>If you can last for one hundred strokes, then I won't make you mate with her.\
>Hehe... Steel yourself, and don't give in to your base desires.@
>If you can show me that, then you won't need to mate with her...\
name ""
name "Luka"
>Ahh...\
name ""
mov %hseanwave,17:hseanwave
lsp 700,":c;chara\assassinloid_hb07.bmp",0,0:print 10,500
>Gently squeezing me, she starts to slowly stroke me up and down.@
>Her slow, skilled handling leaves me gasping in no time.\
>Her nimble fingers squeeze and massage me as her hand moves, the warm sweat from her body acting as a powerful lubricant.\
name "Luka"
>S...Stop... Slower...\
name ""
name $name
>You're already complaining...?@
>At this rate, you'll never survive a hundred times.\
>Sorry, but I'm going to finish this quickly.\
name ""
name "Luka"
>N...No way... Ahh!\
name ""
>Suddenly, her hand and arm starts moving up and down with incredible speed.@
>In the tight grip of her soft hand, her fingers rub and pull at me as she strokes with almost blinding speed.\
>The deadly assault leaves me screaming in no time, cornering me in only seconds.\
name "Luka"
>Ahh... No... I'm going to come!\
name ""
name $name
>Let me see you come, right into the air!!\
name ""
name "Luka"
>Ahhh!!!\
name ""
>Surrendering to her onslaught, my body relaxes as my penis starts to pulse in ecstasy.\
gosub *syasei1
lsp 700,":c;chara\assassinloid_hb08.bmp",0,0
gosub *syasei2
name "Luka"
>Haa...\
name ""
>I writhe in her embrace as I come straight ahead of me.@
>In the end, I was far off from lasting a hundred strokes...\
mov %hseanwave,0:hseanwave
name $name
>It wasn't possible for you, after all...@
>You're well suited to this lower organism.\
name ""
name "Luka"
>Hyaa!\
name ""
lsp 700,":c;chara\assassinloid_hb09.bmp",0,0:print 10,500
>The strange organism finally stops, right in front of my penis.@
>Her wet mouth opens and closes, as if begging for something to go inside.\
name $name
>Hehe... She seems to have reacted to the smell of your semen.@
>She wants it so bad...\
>I'll let her deal with you now.@
>But don't worry, I'll help out a little...\
name ""
name "Luka"
>N...No!@>Ahhh!\
name ""
dwave 1,"se\ero_makituki3.ogg"
mov %hseanwave,21:hseanwave
lsp 700,":c;chara\assassinloid_hb10.bmp",0,0:print 10,500
>Innumerable little tentacles reach out of the creature's mouth, slowly winding around my penis.\
name "Luka"
>Ah...!@> Ahh!\
name ""
name $name
>Hehe... This is the start of her mating ritual.@
>Once she finds male genitals, she uses those to trigger the first ejaculation.\
>After she confirms that it's truly a penis, she moves on to the real mating...\
name ""
name "Luka"
>Hyaa... Stop... Stop!\
name ""
>I try to pull my waist back, but Assassinroid's body behind me just bounces me back to the creature.\
>Her tentacles rub and stroke my penis, as if inspecting it...@
>My sensitive tip is slowly covered in her soft tentacles.\
name $name
>Well, just think of it as fun foreplay.@
>After you ejaculate, she'll suck you in, and really start.\
name ""
name "Luka"
>Haa!\
name ""
>It feels like my penis is stuck in a vortex of tentacles...\
>After a few moments, my penis starts twitching in response.\
>The more my penis pulses, the more frenzied her tentacles get.@
>I can't hold back the pleasure any longer...\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":c;chara\assassinloid_hb11.bmp",0,0
gosub *syasei2
>Unable to take it, I explode as her tentacles explore my penis.@
>My semen shoots out, covering the strange insect-like organism.\
mov %hseanwave,14:hseanwave
name $name
>Hehe... Now you've confirmed yourself to be a "male" to her.@
>Now the real thing starts...\
>She will slowly suck in your penis, and start sucking out all your semen...\
name ""
name "Luka"
>S...Stop... No more...\
name ""
>Assassinroid pushes my waist forward at the creature, as my body shakes in disgust.@
mov %hseanwave,16:hseanwave
lsp 700,":c;chara\assassinloid_hb12.bmp",0,0:print 10,500
>And as she opens wide, the tip of my penis is sucked into her mouth!\
name "Luka"
>Hyaa... No... No...\
name ""
>The soft, warm feeling inside of her attacks me all at once.@
>Recoiling in horror, I try to pull back, but...\
name $name
>Come on, push it all the way inside...@
>Let her take your penis deep in, so you can enjoy mating with her.\
name ""
>Holding my waist, Assassinroid pushes me further forward...@
>Unable to go against her power, I slowly push deeper into the creature.\
name "Luka"
>Stop... Ah...!\
name ""
>Despite my resistance, I'm slowly swallowed all the way inside her...\
name "Luka"
>I...it's inside...\
name ""
lsp 700,":c;chara\assassinloid_hb13.bmp",0,0:print 10,500
>I'm now mating with a strange creature...@
>Despite the horror, my body can't deny the stimulation.\
>The soft flesh squeezes my penis, as tiny tentacles inside of her rub my shaft.\
lsp 700,":c;chara\assassinloid_hb14.bmp",0,0:print 10,500
name "Luka"
>Ahg... Urhg...\
name ""
>I grit my teeth, resisting the rising desire to ejaculate.@
>I'm too horrified at the thought of coming inside this disgusting thing.\
name $name
>Hehe... How does it feel inside her?@
>Her body evolved purely to make men ejaculate, after all...\
>Come on, you should enjoy mating with her!@
>Here, I'll help you out!\
name ""
>With a sadistic smile, Assassinroid starts moving her body back and forth...@
>With my body nestled up against hers, I don't have any choice but to move with her.\
>Following her movements, I start thrusting in and out of the strange creature.\
lsp 700,":c;chara\assassinloid_hb15.bmp",0,0:print 10,500
name "Luka"
>Ahh!!!\
name ""
>The complicated folds inside her body rub against my penis as I pull out, and the small bumps massage my glans as I push back in.\
name $name
>Haha come on, you both want to come!@
>Come inside her, and satisfy the both of you!\
name ""
name "Luka"
>Hyaa... Nooo...\
name ""
>No matter how much I try to deny it, my body is rejoicing in the feeling.@
>Both my tip and back muscle are rubbed by the strange bumps inside her body as Assassinroid forces me in and out.\
name "Luka"
>No... I'm going to come...\
name ""
>At last, I'm brought to right before my climax...@
>There's no way to stop myself from coming inside this disgusting creature any longer.\
name $name
>Hehe, at your limit?@
>Then give her a lot!\
name ""
name "Luka"
>Haa... Ahh!\
name ""
>I relax my body, letting the sensations of her strange body wash over me.\
gosub *syasei1
lsp 700,":c;chara\assassinloid_hb16.bmp",0,0
gosub *syasei2
name "Luka"
>Haaa...\
name ""
>As soon as she feels my semen rush into her, the creature's little bumps and tentacles pull and stroke me, as if encouraging out even more semen.\
name "Luka"
>Haa... That feels good...\
name ""
>An evolution to encourage the most semen possible...@
>This base creature is operating purely on instinct.\
lsp 700,":c;chara\assassinloid_hb17.bmp",0,0:print 10,500
name $name
>Haha, you came inside her...@
>And she seems to really like you.\
>She produces a huge amount of eggs, too.@
>Right now, your semen is washing over them...\
name ""
name "Luka"
>Hiee!@>N...No way...\
name ""
lsp 700,":c;chara\assassinloid_hb32.bmp",0,0:print 10,500
>Suddenly, something like a pair of lips deep inside her latch onto my glans, and starts to pull at my tip.\
name "Luka"
>Hyaa... Don't suck...\
name ""
name $name
>There's no use fighting against her.@
>Once she gets a taste, she's merciless in squeezing the man's semen.\
>Just give up, and become her personal stallion.@
>Lots of little insect organisms are going to be born with your genes... Hehe.\
name ""
name "Luka"
>N...No... I don't want that!\
name ""
name $name
>Come on, what's wrong? Move your waist!@
>Back and forth, like you were screwing a real woman!\
name ""
>Grabbing hold of my waist again, Assassinroid forces me to pump in out and out of the creature.@
>My tip pushes up and into her cervix with each pump, pulling at my glans as I get pulled back out.\
name "Luka"
>N...No...\
name ""
>The horrifying pleasure takes over my body, betraying my mind as it spasms in pleasure again.\
gosub *syasei1
lsp 700,":c;chara\assassinloid_hb33.bmp",0,0
gosub *syasei2
name "Luka"
>Ahh...\
name ""
>My resistance destroyed, I explode inside of her, spurting my semen deep into the creature's womb.\
lsp 700,":c;chara\assassinloid_hb34.bmp",0,0:print 10,500
name "Luka"
>Haa... She's sucking...\
name ""
>As soon as I came inside her, the interior lips locked onto my glans and started sucking.@
>Reacting purely on instinct, the base creature ensures to suck up all of my semen for her eggs.\
>My body twitches in pure ecstasy, not caring where the semen it's shooting is going.\
name $name
>Hehehe... Well?@
>How do you feel, as a human?\
>You just got this base organism pregnant.\
name ""
name "Luka"
>N...No... Ah...\
name ""
>Later...@
lsp 700,":c;chara\assassinloid_hb35.bmp",0,0:print 10,500
>I've filled the creature's womb, full of eggs, to the brim with my semen.\
name $name
>That's the end of mating...@
>In the end, she is your best partner.\
>Your low level penis is suited just well to that base organism.\
name ""
name "Luka"
>Haa... Ahh...\
name ""
lsp 700,":c;chara\assassinloid_hb36.bmp",0,0:print 10,500
>After that, she kept making me mate with this creature while ridiculing me.\
name "Luka"
>Hyaa... Ahh...\
name ""
name $name
>Has your mind already broken?@
>In the end, your semen was only good for a low level organism...\
name ""
>She forces me to continually mate with this base creature.@
>Unable to take it, I slowly lose my sanity.\
>I'm forced to accept the fate of the loser, and continue this insult forever...\
mov %hseanwave,0:hseanwave
gosub *anten
>.............\
goto *badend



*yomotu_start

mov $name,"Yomotsu-Shikome"
mov $name2,"Yomotsu-Shikome"
mov $lavel,"yomotu"
mov $tatie1,"yomotu_st01"
mov $tatie2,"yomotu_st01"
mov $tatie3,"yomotu_st01"
mov $tatie4,"yomotu_h1"
mov $haikei,"bg115"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,19000
if %nanido=2 mov %max_enemylife,23000
if %nanido=3 mov %max_enemylife,27000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,20
if %nanido=3 mov %earth_keigen,10
mov %alice_skill,1
mov %alice_skill1,50
mov %alice_skill2,50
mov %alice_skill3,50
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"You can't escape from my hair..."
mov $mogaku_sel2,"Do you want me to make it tighter...?"
mov $mogaku_sel3,"If you struggle, I'll just make it tighter..."
mov $mogaku_sel4,"Ejaculate without struggling..."
mov $mogaku_sel5,"No matter how much you struggle, you won't escape..."
mov $mogaku_dassyutu1,"You escaped from my hair...?"
mov $mogaku_dassyutu2,""
mov $mogaku_earth_dassyutu1,"You escaped from my hair...?"
mov $mogaku_earth_dassyutu2,""
mov $half_s1,"I'll make you ejaculate with my hair..."
mov $half_s2,""
mov $kiki_s1,"Just come already..."
mov $kiki_s2,""
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,4
mov %owaza_count3a,4
name $name
>...You won't pass...\
name ""
>Her body looks like it's made of hair.@
>A strange magical power flows from her as her strands of hair squirm around...\
name "Luka"
>She feels like the Chimeric Monsters... But...@
>She's really odd.\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\yomotu_st01.bmp",190,0:print 10,500
name "Alice"
>She's similar to a ghost monster...@
>Why did Promestein make someone like her?\
name ""
name "Luka"
>Aren't you afraid of ghosts, Alice?\
name ""
name "Alice"
>She's not a ghost, she's a ghost monster.@
>There's no reason to be afraid of her!\
name ""
name "Luka"
>..............\
name ""
csp 701
gosub *face1
>I still don't get the difference...\
goto *common_main



*yomotu_v

gosub *face3
name $name
>...........\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Yomotsu is sealed in the form of a bundle of hair!\
mov %viclose,1:gosub *victory
mov %getexp,240000:gosub *lvup
mov %2403,1
goto *sean0380



*yomotu_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>You willingly want to become a prisoner...?@>Foolish...\
name ""
goto *yomotu_a



*yomotu_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *yomotu_kousan
if %cmd1=16 goto *yomotu_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *yomotu_main



*yomotu_a

if %kousoku=1 gosub *yomotu_a6:goto *common_main
rnd2 %ransu,1,5
if %ransu=1 gosub *yomotu_a1:goto *common_main
if %ransu=2 gosub *yomotu_a2:goto *common_main
if %ransu=3 gosub *yomotu_a3:goto *common_main
if %ransu=4 && %owaza_count3a>5 gosub *yomotu_a4:goto *common_main
if %ransu=5 && %owaza_count1a>5 gosub *yomotu_a5:goto *common_main
skip -6



*yomotu_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Tighten... Penis..."
if %ransu=2 mov $sel1,"Does it hurt...?"
if %ransu=3 mov $sel1,"Finish... From tightness..."
name $name
eng $sel1:$sel6\
name ""
skillname "Lewd Hair Tighten"
dwave 1,"se\ero_simetuke1.ogg"
>Yomotsu's hair coils around Luka's penis, and tightens!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3995
if %nanido<2 damage 350,370
if %nanido=2 damage 390,410
if %nanido=3 damage 430,450
skillname ""
if %mylife=0 sub %stack,1:return *yomotu_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*yomotu_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Stroke it with my hair..."
if %ransu=2 mov $sel1,"Stroke and ejaculate..."
if %ransu=3 mov $sel1,"Stimulate to force ejaculation..."
name $name
eng $sel1:$sel6\
name ""
skillname "Lewd Hair Stroke"
dwave 1,"se\ero_koki1.ogg"
>Yomotsu's hair coils around Luka's penis, and strokes him in a milking motion!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3996
if %nanido<2 damage 360,380
if %nanido=2 damage 400,420
if %nanido=3 damage 440,460
skillname ""
if %mylife=0 sub %stack,1:return *yomotu_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*yomotu_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"This hair drains energy..."
if %ransu=2 mov $sel1,"I'll squeeze out your semen..."
if %ransu=3 mov $sel1,"How does it feel?"
name $name
eng $sel1:$sel6\
name ""
skillname "Lewd Hair Draining"
dwave 1,"se\ero_chupa6.ogg"
>Yomotsu's hair coils around Luka's penis, and quickly moves up and down his shaft!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3997
if %nanido<2 damage 370,390
if %nanido=2 damage 410,430
if %nanido=3 damage 450,470
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *yomotu_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*yomotu_a4

add %stack,1
mov %owaza_count3a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll play with you with my hair..."
if %ransu=2 mov $sel1,"Cover my hair in semen..."
if %ransu=3 mov $sel1,"I'll wind it up and squeeze out your semen..."
name $name
eng $sel1:$sel6\
name ""
skillname "3,000 Lewd Strands"
dwave 1,"se\umaru.ogg"
>Yomotsu's hair slowly coils around Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 3998
if %nanido<2 damage 130,140
if %nanido=2 damage 140,150
if %nanido=3 damage 150,160
dwave 1,"se\umaru.ogg"
>While coiling around him, the hair slowly tightens!
if %nanido<2 damage 130,140
if %nanido=2 damage 140,150
if %nanido=3 damage 150,160
dwave 1,"se\umaru.ogg"
>At the same time, her hair vibrates, massaging Luka's penis!
if %nanido<2 damage 130,140
if %nanido=2 damage 140,150
if %nanido=3 damage 150,160
skillname ""
if %mylife=0 sub %stack,1:return *yomotu_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*yomotu_a5

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 4
name $name
>Be entangled in my hair...\
name ""
skillname "Lewd Hair Entangling"
dwave 1,"se\ero_makituki3.ogg"
eng "Yomotsu's hair coils around Luka's body!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<10 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>Luka has been entangled by Yomotsu's hair!\
skillname ""
name $name
>Now you're prey for my hair...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,2
if %earth=0 && %nanido=2 mov %genmogaku,2
if %earth=0 && %nanido=3 mov %genmogaku,3
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,1
sub %stack,1
return



*yomotu_a6

add %stack,1
>Luka has been entangled by Yomotsu's hair...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Be buried in my hair as you ejaculate..."
if %ransu=2 mov $sel1,"Finish while bound by my hair..."
if %ransu=3 mov $sel1,"You can't endure my hair..."
name $name
eng $sel1:$sel6\
name ""
skillname "Lewd Hair Hell"
dwave 1,"se\ero_makituki3.ogg"
>Yomotsu's hair squirms around Luka's body, tightening around him!
skillcount3 4128
if %nanido<2 damage 200,220
if %nanido=2 damage 220,240
if %nanido=3 damage 240,260
dwave 1,"se\ero_makituki2.ogg"
>Her hair tightens around his penis as it strokes him!
if %nanido<2 damage 200,220
if %nanido=2 damage 220,240
if %nanido=3 damage 240,260
skillname ""
if %mylife=0 sub %stack,1:return *yomotu_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*yomotu_onedari

mov $list1,"Lewd Hair Tighten"
if %3995>0 mov %list_num1,1
mov $list2,"Lewd Hair Stroke"
if %3996>0 mov %list_num2,1
mov $list3,"Lewd Hair Draining"
if %3997>0 mov %list_num3,1
mov $list4,"3,000 Lewd Strands"
if %3998>0 mov %list_num4,1
mov $list5,"Lewd Hair Hell"
if %4128>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *yomotu_onedari1
if %cmd1=12 goto *yomotu_onedari2
if %cmd1=13 goto *yomotu_onedari3
if %cmd1=14 goto *yomotu_onedari4
if %cmd1=15 goto *yomotu_onedari5
if %cmd1=-1 goto *yomotu_main
goto *yomotu_onedari



*yomotu_onedari1

gosub *onedari_syori
name $name
>You want my hair tight around your penis...?@
>Then please finish quickly...\
name ""
gosub *yomotu_a1
skip -1



*yomotu_onedari2

gosub *onedari_syori
name $name
>You want my hair to stroke your penis...?@
>Then please finish quickly...\
name ""
gosub *yomotu_a2
skip -1



*yomotu_onedari3

gosub *onedari_syori
name $name
>You want my hair to drain your energy?@
>Then please finish quickly...\
name ""
gosub *yomotu_a3
skip -1



*yomotu_onedari4

gosub *onedari_syori
name $name
>You want my hair to overrun your penis?@
>Then please finish quickly...\
name ""
gosub *yomotu_a4
skip -1



*yomotu_onedari5

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want to be entangled by my hair, and be forced to come?@
>Then I'll take all of your semen...\
name ""
if %kousoku=0 gosub *yomotu_a5
gosub *yomotu_a6
skip -1



*yomotu_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\yomotu_bk02.bmp",0,0
gosub *syasei2
>As Yomotsu's hair tightens around Luka's penis, he comes, covering her hair with semen.\
mov %viclose,1:gosub *lose
mov %2703,%2703+1:if %2703=1 mov %count_koenemy,%count_koenemy+1
if %2703>%count_most mov %count_most,%2703:mov $count_mostname,$name
count 22,11
mov $bad1,"Yomotsu-Shikome forced Luka to come by tightening her hair around his penis."
gosub *face2
name $name
>You finished...@
>Now to suck the man's energy...\
name ""
goto *yomotu_h



*yomotu_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\yomotu_bk03.bmp",0,0
gosub *syasei2
>As Yomotsu's hair strokes Luka's penis, he comes, covering her hair with semen.\
mov %viclose,1:gosub *lose
mov %2703,%2703+1:if %2703=1 mov %count_koenemy,%count_koenemy+1
if %2703>%count_most mov %count_most,%2703:mov $count_mostname,$name
count 22,11
mov $bad1,"Yomotsu-Shikome forced Luka to come by stroking his penis with her hair."
gosub *face2
name $name
>You finished...@
>Now to suck the man's energy...\
name ""
goto *yomotu_h



*yomotu_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\yomotu_bk01.bmp",0,0
gosub *syasei2
>As Yomotsu's hair squeezes Luka's penis, draining him of energy, he comes, covering her hair with semen.\
mov %viclose,1:gosub *lose
mov %2703,%2703+1:if %2703=1 mov %count_koenemy,%count_koenemy+1
if %2703>%count_most mov %count_most,%2703:mov $count_mostname,$name
count 22,11
mov $bad1,"Yomotsu-Shikome forced Luka to come by draining his energy with her hair."
gosub *face2
name $name
>You finished...@
>Now to suck the man's energy...\
name ""
goto *yomotu_h



*yomotu_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\yomotu_bk04.bmp",0,0
gosub *syasei2
>As Yomotsu's hair overruns Luka's penis, he comes, covering her hair with semen.\
mov %viclose,1:gosub *lose
mov %2703,%2703+1:if %2703=1 mov %count_koenemy,%count_koenemy+1
if %2703>%count_most mov %count_most,%2703:mov $count_mostname,$name
count 22,11
mov $bad1,"Yomotsu-Shikome forced Luka to come with her hair."
gosub *face2
name $name
>You finished...@
>Now to suck the man's energy...\
name ""
goto *yomotu_h



*yomotu_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\yomotu_h2.bmp",0,0
gosub *syasei2
>While entangled around Luka's body, Yomotsu's hair strokes Luka's penis even as he comes.\
mov %viclose,1:gosub *lose
mov %2703,%2703+1:if %2703=1 mov %count_koenemy,%count_koenemy+1
if %2703>%count_most mov %count_most,%2703:mov $count_mostname,$name
count 22,11
mov $bad1,"Yomotsu-Shikome bound Luka with her hair, and forced him to come."
gosub *face2
name $name
>You finished...@
>Now I'll take you in as I squeeze out your semen...\
name ""
goto *yomotu_h



*yomotu_h

mov $bad2,"While having his semen sucked out, Luka was incorporated into Yomotsu-Shikome's body."
if %2703=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,2:hseanwave:goto *yomotu_hb
name "Luka"
>Ahhh...\
name ""
>As I fall to my knees, a huge mass of hair wraps around my body.\
>Binding my arms and legs, she leaves me unable to move.@
cspl 690,699
lsp 700,":a;chara\yomotu_h1.bmp",0,0:print 10,500
>And suddenly starts to drag me into her body of hair!\
goto *yomotu_hb



*yomotu_hb

name "Luka"
>S...Stop!\
name ""
>I struggle, but I can't break free of her hair's restraint.@
>The more I flail around, the more I get entangled in her hair.\
>As I squirm, her hair coils around my penis, tying it up...\
name "Luka"
>Ah...!\
name ""
>The unique sensation of her silky hair around my penis causes me to stop in surprise.\
>More than the slight shock of pressure, the free flowing feeling of her hair rubbing against my penis fills my senses.\
name $name
>I'll take all your semen... With my hair...\
name ""
name "Luka"
>Ah...!@> Ahh!\
name ""
mov %hseanwave,17:hseanwave
>As Yomotsu's hair rubs every inch of my body, she slowly pulls me into her body.\
>Each strand of her is moving and stroking me like it was some sort of tentacle, coiling and winding around every body part.\
name "Luka"
>Haa...\
name ""
>I strop struggling as a strange weakness comes over me.@
>The more her hair rubs against me, the more the calming pleasure fills me.\
name $name
>Your male thing grew so big...@
>I'll take your semen from here...\
name ""
name "Luka"
>N...Not there!@
>Ahh!\
name ""
>Her tentacle like hair surges towards my penis.@
>Layer after layer of silky hair coils and tightens around my penis, absorbing my energy as she squeezes.\
>The intense pleasure is far beyond being stroked by a body part...@
>I spasm in mad agony as the ecstasy washes over me.\
name "Luka"
>S...Stop... Let me go...\
name ""
>I try to pull my waist back, but her free flowing hair just extends with me, not letting me part from her for a second.\
>The silky strands of her hair squeeze my glans, making my body jump in pleasure filled joy.\
name "Luka"
>Hyaa... St...Stop...\
name ""
>Helpless under her assault of pleasure, my penis is pulsing as it's on the verge of bursting.@
>The ecstasy and shame of being driven to this mix inside me.\
>After a while, I can't hold down the urge to release.\
name "Luka"
>No... Coming...!@
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\yomotu_h2.bmp",0,0
gosub *syasei2
>I explode on her hair, my male instinct rejoicing in the act of shooting my semen onto her body.\
name "Luka"
>Ahh...\
name ""
>Semen flows out of my penis, covering her silky hair.@
>I look on in a trance as my white semen rubs pointlessly into her flowing hair.\
name $name
>You came...@
>All nutrients for me...\
name ""
name "Luka"
>Ah... Ahhh!\
name ""
>But my trance of ecstasy doesn't last long.@
>Soon after my ejaculation finishes, her hair starts stroking me again.\
>Yomotsu layers even more hair around my penis, as if she was completely taking it for her own.\
name "Luka"
>Hyaa!\
name ""
>Her silky strands start moving up and down at once, each individually stroking me.@
>At the same time, the intense weakness I felt earlier is magnified even further.\
>This devilish hair is draining my energy at the same time...@
>If this keeps up, I'll be in real danger.\
name "Luka"
>S...Stop... Ahh!\
name ""
gosub *syasei1
lsp 700,":a;chara\yomotu_h3.bmp",0,0
gosub *syasei2
>But despite knowing that, I can't stop myself.@
>The stimulation is too intense for me to control my own body against.\
>My semen drips out onto her hair, more food for her to absorb...\
name "Luka"
>Stop... I'll die...\
name ""
name $name
>I'll incorporate your own body into mine...@
>After squeezing your semen dry...\
name ""
name "Luka"
>N...No way...\
name ""
>She finally voices her intent.@
>After squeezing me dry, she's going to take my body...\
name "Luka"
>Stop, let go!@
>Ahh...\
name ""
>Even though I cry and struggle, I can't escape from this nightmare.@
>As my mind panics, my body rejoices in pleasure.\
gosub *syasei1:gosub *syasei2
>Like that, I'm forced to another orgasm.@
>The intense weakness washes over me again, dulling my struggles.\
name "Luka"
>Ah...ah...\
name ""
gosub *syasei1:gosub *syasei2
>Violating my soul itself, my will is trampled down.@
>Forced to orgasm after orgasm, I feel like a towel being wrung dry.\
name $name
>That's the last of your semen...@
>Now for your body...\
name ""
name "Luka"
>Ah...ah...\
name ""
>After squeezing me dry, her hair slowly covers the rest of my body.@
>She's going to take me into her body, and prey on me...\
>Already losing the will to fight, I just helplessly moan as she draws me inside.\
name "Luka"
>...ah...\
name ""
>Sucking and chewing on my body, I slowly fade away and become one with Yomotsu.\
name "Luka"
>..........\
name ""
>Stuck in a trance of ecstasy, my body is absorbed.@
>Thus my body and soul both become prey to Yomotsu-Shikome...\
mov %hseanwave,0:hseanwave
gosub *anten
>..............\
goto *badend



*wormiel_start

mov $name,"Cherub Wormiel"
mov $name2,"Wormiel"
mov $lavel,"wormiel"
mov $tatie1,"wormiel_st01"
mov $tatie2,"wormiel_st02"
mov $tatie3,"wormiel_st03"
mov $tatie4,"wormiel_ha02"
mov $haikei,"bg115"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,23000
if %nanido=2 mov %max_enemylife,27000
if %nanido=3 mov %max_enemylife,31000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,1
mov %alice_skill1,0
mov %alice_skill2,0
mov %alice_skill3,0
mov %music,9
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Do you think you can escape from my worm?"
mov $mogaku_sel2,"No matter how much you struggle, I'll squeeze you dry..."
mov $mogaku_sel3,"There's no use struggling..."
mov $mogaku_sel4,"Give up and enjoy the pleasure from my worm."
mov $mogaku_sel5,"I won't let you go, no matter how you struggle..."
mov $mogaku_dassyutu1,"You escaped from my worm?"
mov $mogaku_dassyutu2,"Hahaha... You are worth toying with..."
mov $mogaku_earth_dassyutu1,"What tremendous power..."
mov $mogaku_earth_dassyutu2,"Hahaha... You are worth toying with..."
mov $half_s1,"Does my worm feel good?"
mov $half_s2,"I'll let you enjoy it some more before taking you in..."
mov $kiki_s1,"Now just ejaculate..."
mov $kiki_s2,"Because after I wring it all out, I'll take you in..."
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,4
mov %owaza_count1b,6
mov %owaza_count3a,4
mov $name,"Wormiel"
name "Luka"
>W...What is that!?\
name ""
lsp 699,":a;chara\alice_st81.bmp",-240,50:print 10,500
name "Alice"
>She eroded away space itself!?@
>Is something like that even possible?\
name ""
csp 699:print 10,500
name $name
>I am Cherub Wormiel...@
>I am a being who can eat up space itself, and assimilate it as part of me.\
>It is not normally my duty to dispose of sinners...@
>But Eden gave me a special mission, and so I descended to this dirty world.\
name ""
name "Luka"
>No matter who my opponent is, I'll keep going forward!\
name ""
name $name
>...Now, how should I dispose of you?@
>Since I was made to come here, it won't be a peaceful death.\
>Then I shall encase you in an eternity of hellish pleasure.\
>In that hell of pleasure, you can lament your choice to rebel against Ilias for an eternity...\
name ""
goto *common_main



*wormiel_v

gosub *face3
name $name
>Such a dangerous human...@
>Not since... Heinrich...\
name ""
dwave 1,"se\bun.ogg"
csp 700:print 99,1000,"system\breakup.dll/lrB"
>Cherub Wormiel fades away into particles, then vanishes!\
mov $name,"Cherub Wormiel"
mov %viclose,1:gosub *victory
mov %getexp,280000:gosub *lvup
mov %2404,1
goto *sean0381



*wormiel_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>It is admirable of you to surrender.@
>But it's too late... You will not be saved.\
name ""
goto *wormiel_a



*wormiel_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *wormiel_kousan
if %cmd1=16 goto *wormiel_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *wormiel_main



*wormiel_a

if %kousoku=1 rnd2 %ransu,1,3
if %kousoku=1 && %ransu<3 gosub *wormiel_a4:goto *common_main
if %kousoku=1 && %ransu=3 && %owaza_count3b>3 gosub *wormiel_a5:goto *common_main
if %kousoku=1 skip -3
if %kousoku=2 gosub *wormiel_a8:goto *common_main
rnd2 %ransu,1,4
if %ransu=1 gosub *wormiel_a1:goto *common_main
if %ransu=2 && %owaza_count3a>5 gosub *wormiel_a2:goto *common_main
if %ransu=3 && %owaza_count1a>5 gosub *wormiel_a3:goto *common_main
if %ransu=4 && %owaza_count1b>7 gosub *wormiel_a7:goto *common_main
skip -5



*wormiel_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hehe... I'll love you with my body."
if %ransu=2 mov $sel1,"At the least, I have a female shaped portion..."
if %ransu=3 mov $sel1,"I'll gently caress you with my female body..."
name $name
eng $sel1:$sel6\
name ""
skillname "Worm Surface"
dwave 1,"se\ero_koki1.ogg"
>Wormiel gently strokes Luka's penis with her hands!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<10 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,40
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4000
if %nanido<2 damage 350,370
if %nanido=2 damage 390,410
if %nanido=3 damage 430,450
skillname ""
if %mylife=0 sub %stack,1:return *wormiel_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*wormiel_a2

add %stack,1
mov %owaza_count3a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll use these tentacles..."
if %ransu=2 mov $sel1,"I'll make you ejaculate with my tentacles."
if %ransu=3 mov $sel1,"How does it feel to be forced to orgasm from a tentacle?"
name $name
eng $sel1:$sel6\
name ""
skillname "Worm Ceres"
dwave 1,"se\ero_makituki1.ogg"
eng "Countless tentacles race toward Luka's groin!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<10 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,40
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
>Tentacles coil around Luka's penis!
skillcount3 4001
if %nanido<2 damage 180,200
if %nanido=2 damage 190,210
if %nanido=3 damage 200,220
dwave 1,"se\ero_makituki1.ogg"
>Squirming around his glans, they stimulate Luka!
if %nanido<2 damage 180,200
if %nanido=2 damage 190,210
if %nanido=3 damage 200,220
dwave 1,"se\ero_makituki1.ogg"
>They tighten around Luka's penis!
if %nanido<2 damage 180,200
if %nanido=2 damage 190,210
if %nanido=3 damage 200,220
skillname ""
if %mylife=0 sub %stack,1:return *wormiel_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*wormiel_a3

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 4
name $name
>Let me hold you down...\
name ""
skillname "Tentacle of Restraint"
dwave 1,"se\ero_makituki3.ogg"
eng "A tentacle coils around Luka's body!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<10 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
mov $tatie4,"wormiel_ha02"
mov %kousoku,1:gosub *status_print
>Luka has been bound by Wormiel!\
skillname ""
name $name
>Before I take you in, I'll squeeze out your semen...@
>Enjoy this last pleasure.\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,2
if %earth=0 && %nanido=2 mov %genmogaku,2
if %earth=0 && %nanido=3 mov %genmogaku,3
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,1
sub %stack,1
return



*wormiel_a4

add %stack,1
>Luka has been bound by Wormiel...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll squeeze it with my tentacles..."
if %ransu=2 mov $sel1,"If I do it like this, any man would come..."
if %ransu=3 mov $sel1,"I'm going to squeeze out your semen..."
name $name
eng $sel1:$sel6\
name ""
skillname "Prey Play"
dwave 1,"se\ero_makituki3.ogg"
>The tentacles coiled around Luka's penis stroke him!
skillcount3 4002
if %nanido<2 damage 200,250
if %nanido=2 damage 220,270
if %nanido=3 damage 240,290
dwave 1,"se\ero_makituki3.ogg"
>They alternate between squeezing and stroking him even harder!
if %nanido<2 damage 200,250
if %nanido=2 damage 220,270
if %nanido=3 damage 240,290
skillname ""
if %mylife=0 sub %stack,1:return *wormiel_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*wormiel_a5

add %stack,1
>Luka has been bound by Wormiel...\
mov %owaza_count3b,0
mov %owaza_num1,1
if %kousan=2 skip 5
name $name
>Hehe... Do you want something a little more direct?@
>Then with this worm...\
name ""
skillname "Lewd Tentacle Hell"
dwave 1,"se\ero_makituki3.ogg"
mov $tatie4,"wormiel_ha04"
lsp 700,":a;chara\wormiel_ha04.bmp",0,0:print 10,500
>Tentacles grow from Wormiel's breasts, and latch onto Luka's penis and mouth!
skillcount3 4003
mov %damage_kotei,1
damage 500,600
skillname ""
if %mylife=0 sub %stack,1:return *wormiel_h4
sub %stack,1
goto *wormiel_a6



*wormiel_a6

add %stack,1
>Luka has been bound by Wormiel...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll squeeze out all your semen with this worm...":mov $sel2,"The tentacle coiled around Luka's penis vibrates!"
if %ransu=2 mov $sel1,"I'll give you some stimulation, so please ejaculate...":mov $sel2,"The tentacles coiled around Luka's penis stroke him up and down!"
if %ransu=3 mov $sel1,"Are you happy at the thought of my tentacles absorbing your semen?":mov $sel2,"The tentacles around Luka's penis squirm around him, stimulating him!"
if %ransu=4 mov $sel1,"I'll squeeze you to the last drop... Once you're empty, I'll take you in...":mov $sel2,"The tentacles stroke Luka in a milking motion!"
if %ransu=5 mov $sel1,"My tentacles feel good, don't they?":mov $sel2,"The tentacles coiled around Luka's penis squirm and wriggle in a strange way!"
name $name
eng $sel1:$sel6\
name ""
skillname "Lewd Tentacle Hell"
dwave 1,"se\ero_makituki3.ogg"
eng $sel2:$sel6
skillcount3 4003
mov %damage_kotei,1
damage 500,600
skillname ""
if %mylife=0 sub %stack,1:return *wormiel_h4
sub %stack,1
goto *wormiel_a6



*wormiel_a7

add %stack,1
mov %owaza_count1b,0
mov %owaza_num1,2
if %kousan=2 skip 4
name $name
>I'll entertain you with these breasts...\
name ""
skillname "Breast Wrapping"
dwave 1,"se\ero_makituki3.ogg"
eng "A tentacle coils around Luka's body!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<10 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
lsp 700,":a;chara\wormiel_hb1.bmp",0,0:print 10,500
>Luka's penis is sandwiched between Wormiel's breasts!
skillcount3 4133
if %nanido<2 damage 200,250
if %nanido=2 damage 220,270
if %nanido=3 damage 240,290
mov $tatie4,"wormiel_hb1"
mov %kousoku,2:gosub *status_print
>Luka has been bound by Wormiel!\
skillname ""
if %mylife=0 sub %stack,1:return *wormiel_h5
mov $tatie4,"wormiel_hb2"
lsp 700,":a;chara\wormiel_hb2.bmp",0,0:print 10,500
name $name
>At the least, you want to finish in a woman's embrace, don't you?@
>Then enjoy these soft breasts of mine...\
name ""
if %earth=0 && %nanido<2 mov %genmogaku,3
if %earth=0 && %nanido=2 mov %genmogaku,3
if %earth=0 && %nanido=3 mov %genmogaku,4
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
sub %stack,1
return



*wormiel_a8

add %stack,1
>Luka has been bound by Wormiel...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My breasts are soft, aren't they?"
if %ransu=2 mov $sel1,"Even this female body is just an assembly of worms you know? Hehe."
if %ransu=3 mov $sel1,"Men are so pathetic... They become so helpless just from simple breasts."
name $name
eng $sel1:$sel6\
name ""
skillname "Breast Wrapping"
dwave 1,"se\ero_sigoki1.ogg"
lsp 690,":a;chara\wormiel_ct01.bmp",0,0:print 10,500
>Wormiel's soft breasts rub against Luka's penis!
skillcount3 4133
if %nanido<2 damage 200,250
if %nanido=2 damage 220,270
if %nanido=3 damage 240,290
skillname ""
if %mylife=0 sub %stack,1:return *wormiel_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*wormiel_onedari

mov $list1,"Worm Surface"
if %4000>0 mov %list_num1,1
mov $list2,"Worm Ceres"
if %4001>0 mov %list_num2,1
mov $list3,"Prey Play"
if %4002>0 mov %list_num3,1
mov $list4,"Lewd Tentacle Hell"
if %4003>0 mov %list_num4,1
mov $list5,"Breast Wrapping"
if %4133>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *wormiel_onedari1
if %cmd1=12 goto *wormiel_onedari2
if %cmd1=13 goto *wormiel_onedari3
if %cmd1=14 goto *wormiel_onedari4
if %cmd1=15 goto *wormiel_onedari5
if %cmd1=-1 goto *wormiel_main
goto *wormiel_onedari



*wormiel_onedari1

gosub *onedari_syori
name $name
>When faced with my tentacles, you lust after my female body...@
>I see, so that's how it is.\
name ""
gosub *wormiel_a1
skip -1



*wormiel_onedari2

gosub *onedari_syori
name $name
>You want me to use my tentacles to play with your penis?@
>A man who knows just what he wants... How rare.\
name ""
gosub *wormiel_a2
skip -1



*wormiel_onedari3

if %kousoku<>1 gosub *onedari_syori
if %kousoku=1 gosub *onedari_syori_k
name $name
>You want to be wrapped in my tentacles and toyed with?@
>A man who knows just what he wants... How rare.\
name ""
if %kousoku<>1 gosub *wormiel_a3
gosub *wormiel_a4
skip -1



*wormiel_onedari4

if %kousoku<>1 gosub *onedari_syori
if %kousoku=1 gosub *onedari_syori_k
name $name
>You want to be overrun by my tentacles?@
>A man who knows just what he wants... How rare.\
name ""
if %kousoku<>1 gosub *wormiel_a3
gosub *wormiel_a5
skip -1



*wormiel_onedari5

if %kousoku<>2 gosub *onedari_syori
if %kousoku=2 gosub *onedari_syori_k
name $name
>You want me to squeeze your penis between my breasts?@
>So you prefer them more than my tentacles...?\
name ""
if %kousoku<>2 gosub *wormiel_a7
gosub *wormiel_a8
skip -1



*wormiel_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\wormiel_bk02.bmp",0,0
gosub *syasei2
>As Wormiel caresses Luka's penis with her smooth hand, he comes, covering it with semen.\
mov %viclose,1:gosub *lose
mov %2704,%2704+1:if %2704=1 mov %count_koenemy,%count_koenemy+1
if %2704>%count_most mov %count_most,%2704:mov $count_mostname,$name
count 5,3
mov $bad1,"Wormiel forced Luka to come with her hand."
gosub *face2
name $name
>You came in my hand...@
>Well? Are you satisfied?\
name ""
goto *wormiel_h



*wormiel_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\wormiel_bk03.bmp",0,0
gosub *syasei2
>As Wormiel caresses Luka's penis with her tentacle, he comes, covering it with semen.\
mov %viclose,1:gosub *lose
mov %2704,%2704+1:if %2704=1 mov %count_koenemy,%count_koenemy+1
if %2704>%count_most mov %count_most,%2704:mov $count_mostname,$name
count 10,3
mov $bad1,"Wormiel forced Luka to come with her tentacle."
gosub *face2
name $name
>You came on my tentacle...@
>Well? Are you satisfied?\
name ""
goto *wormiel_h



*wormiel_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\wormiel_ha03.bmp",0,0
gosub *syasei2
>As Wormiel's tentacles wrap around Luka's entire body, he comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2704,%2704+1:if %2704=1 mov %count_koenemy,%count_koenemy+1
if %2704>%count_most mov %count_most,%2704:mov $count_mostname,$name
count 10,3
mov $bad1,"Wormiel forced Luka to come with her tentacles as he was bound."
gosub *face2
name $name
>You came on my tentacle...@
>Well? Are you satisfied?\
name ""
goto *wormiel_h



*wormiel_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\wormiel_ha05.bmp",0,0
gosub *syasei2
>Overrun by the numerous tentacles, Luka comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2704,%2704+1:if %2704=1 mov %count_koenemy,%count_koenemy+1
if %2704>%count_most mov %count_most,%2704:mov $count_mostname,$name
count 10,3
mov $bad1,"Wormiel forced Luka to come with her numerous tentacles."
gosub *face2
name $name
>You came on my tentacle...@
>Well? Are you satisfied?\
name ""
goto *wormiel_h



*wormiel_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\wormiel_ct02.bmp",0,0
lsp 700,":a;chara\wormiel_hb3.bmp",0,0
gosub *syasei2
>As Luka's penis rubs against Wormiel's soft breasts, he comes, covering her chest with semen.\
mov %viclose,1:gosub *lose2
lsp 690,":a;chara\wormiel_ct03.bmp",0,0
lsp 700,":a;chara\wormiel_hb4.bmp",0,0:print 10,500
name $name
>Did you come between my breasts?@
>This sweet fragrance...\
name ""
dwave 1,"se\ero_makituki2.ogg"
lsp 700,":a;chara\wormiel_hb5.bmp",0,0:print 10,500
>Countless tentacles extend from Wormiel's nipples, and collect all of Luka's semen!\
name $name
>Human semen is so delicious...\
>Since I came down to the ground world...@> Allow me to feast more on it.\
name ""
name "Luka"
>Hyaa... Stop...\
name ""
skillcount3 4133
skillname "Breast Wrapping"
dwave 1,"se\ero_makituki2.ogg"
lsp 690,":a;chara\wormiel_ct04.bmp",0,0
lsp 700,":a;chara\wormiel_hb6.bmp",0,0:print 10,500
>Innumerable tentacles coil around Luka's penis, still between Wormiel's breasts!
mov %damage_kotei,1
damage 200,250
dwave 1,"se\ero_sigoki1.ogg"
>The soft flesh slowly tightens around Luka's penis!
mov %damage_kotei,1
damage 200,250
skillname ""
name "Luka"
>Haa... Stop...\
name ""
name $name
>You don't have a say in this... Give it to me.@
>A Cherub came all the way down here for you, after all.\
name ""
skillcount3 4133
skillname "Breast Wrapping"
dwave 1,"se\ero_makituki2.ogg"
>The tentacles stroke Luka's penis between her breasts!
mov %damage_kotei,1
damage 200,250
dwave 1,"se\ero_sigoki1.ogg"
>At the same time, Luka's penis rubs against her soft breasts!
mov %damage_kotei,1
damage 200,250
skillname ""
name "Luka"
>Haa... I'm going to come again...\
name ""
name $name
>Hehe, that's good...@
>Release your semen, and let me feed on it.\
name ""
skillcount3 4133
skillname "Breast Wrapping"
dwave 1,"se\ero_makituki2.ogg"
>The tentacles coil around Luka's penis!
mov %damage_kotei,1
damage 200,250
dwave 1,"se\ero_sigoki1.ogg"
>At the same time, Wormiel's large breasts crush Luka's penis between them!
mov %damage_kotei,1
damage 200,250
skillname ""
name "Luka"
>Ahh... Ahhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\wormiel_ct05.bmp",0,0
lsp 700,":a;chara\wormiel_hb7.bmp",0,0
gosub *syasei2
>Squeezed and stroked between Wormiel's breasts, Luka comes, covering her chest with more semen.\
lsp 690,":a;chara\wormiel_ct06.bmp",0,0
lsp 700,":a;chara\wormiel_hb8.bmp",0,0:print 10,500
name $name
>Your semen tastes incredible...@
>This was worth the journey down.\
name ""
gosub *clear_sprite
gosub *setwindow_01p
mov %battle,0
mov %hsean,1
mov %2704,%2704+1:if %2704=1 mov %count_koenemy,%count_koenemy+1
if %2704>%count_most mov %count_most,%2704:mov $count_mostname,$name
count 7,3
mov $bad1,"Wormiel forced Luka to come with her breasts."
goto *wormiel_h



*wormiel_h

mov $bad2,"Trapped in her tentacle space, Luka's semen was squeezed for an eternity."
if %2704=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku=1 mov %hseanwave,12:hseanwave:goto *wormiel_hb
name "Luka"
>Ahh...\
name ""
name $name
>Now to squeeze your semen...@
>I'll take you inside me... And do it for thousands and thousands of years...\
name ""
dwave 1,"se\ero_makituki3.ogg"
mov %hseanwave,12:hseanwave
cspl 690,699
lsp 700,":a;chara\wormiel_ha02.bmp",0,0:print 10,500
>A worm-like tentacle slowly coils around my body, and brings me into the red wall...@
>The writhing tentacle completely covers my lower body, and prevents me from moving my upper body.\
goto *wormiel_hb



*wormiel_hb

name "Luka"
>Ahh... L...Let go!\
name ""
name $name
>I'll take you into my body now...@
>No... More accurately, this space itself will become my body.\
>Either way, it's the same thing to you.@>You'll be trapped in this tentacle space, violated for an eternity...\
name ""
name "Luka"
>Ahhh!!\
name ""
>Her writhing tentacles coil around my penis at last.\
>The soft, mucus covered worm rubs against my sensitive penis.@
>The disgusting thing triggers instinctual dislike in my mind.\
name "Luka"
>T...This is disgusting... Let go!\
name ""
name $name
>Men always hate it at first, but they always ejaculate anyway...@
>You'll start squirming in pleasure soon enough, even as you hate it.\
name ""
>The tentacles twist and squirm around my penis, rubbing against my glans.@
>At the same time, they slowly start to tighten around me, pressing their mucus-covered flesh harder against my penis.\
name "Luka"
>Ahh...\
name ""
name $name
>Hehe, it's good, isn't it?@
>These tentacles are only for stimulating genitals...\
>Any man...@> No, any creature would come.@
>Someone like you could never endure it, so just give up...\
name ""
name "Luka"
>N...No way... Ah...\
name ""
>The tentacles, treating my penis like its prey, continue stroking me.@
>The tip of one of the tentacles starts to rub around underneath my glans as the rest tighten around my penis.\
name "Luka"
>Ah...ahh... That feels good...\
name ""
>Before I had noticed it, I had stopped struggling.@
>Even though my mind is feeling disgust, my body is paralyzed in the pleasure.\
name $name
>You're already leaking... It looks like you're about to come.@
>Now let me watch as you explode all over the place.\
name ""
name "Luka"
>Ahh...\
name ""
>The disgusting tentacles slowly lead me to an inevitable ejaculation, my body drunk on the immorality of the act.\
>Writhing around, I give in, unable to take it any longer.\
name "Luka"
>C...Coming...!@> Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\wormiel_ha03.bmp",0,0
gosub *syasei2
>As the mucus covered tentacles continue to rub against me, I explode, shooting my white semen all over the writhing mass.@
>My body starts to tremble as the ecstasy of release mixes with the humiliation of being forced to this.\
name "Luka"
>Ahhh...\
name ""
name $name
>So you came from these disgusting tentacles you were crying about before?@
>Just look at all the semen you shot out...@> It proves you actually love them, doesn't it?\
>Now, I'll take you into my own body, and cover you with these tentacles...\
name ""
name "Luka"
>S...St... Ahh!\
name ""
mov %hseanwave,13:hseanwave
cspl 690,699
lsp 700,":a;chara\wormiel_ha07.bmp",0,0:print 10,500
>Her tentacles swarm over every part of my body, squirming around me as they drag me into her.@
>Exhausted from my previous orgasm, I'm too weak to even lift a finger to stop her.\
name "Luka"
>Ah... Hyaa!\
name ""
>Her tentacles swarm around my penis, the many layers of them feeling like I'm inside a tube of tentacle flesh.\
name "Luka"
>Hyaa!\
name ""
gosub *syasei1
lsp 700,":a;chara\wormiel_ha08.bmp",0,0
gosub *syasei2
>I orgasm in seconds, her stroking tentacles not letting up even as I come.\
name "Luka"
>Aiiee!\
name ""
name $name
>You'll come over and over inside my body, stuck in a vortex of tentacles...\
name ""
lsp 700,":a;chara\wormiel_ha09.bmp",0,0:print 10,500
>More and more tentacles close in around me.@
>After a few seconds, all sight of the volcano from before is gone.\
name "Luka"
>H...Help... Hyaa!\
name ""
gosub *syasei1:gosub *syasei2
>As my body twitches and ejaculates, I'm swallowed by the vortex of tentacles.@
lsp 700,":a;chara\wormiel_ha10.bmp",0,0:print 10,500
>And I'm taken into what seems like a dimension of tentacles.\
>I'm inside Wormiel's body...\
>Buried in her tentacles, she's incorporating me into her body.\
name "Luka"
>Ah...\
name ""
gosub *syasei1:gosub *syasei2
>But she doesn't let me die.@
>Keeping me here in this tentacle space, she just continually forces me to orgasm for her.\
gosub *syasei1:gosub *syasei2
name "Luka"
>Ah...a...\
name ""
>After a few days, my mind breaks.@
>Stuck inside her, I continue climaxing one time after another, buried in her tentacles.\
mov %hseanwave,0:hseanwave
gosub *anten
>.............\
goto *badend



*drainplant_start

mov $name,"Drain Plant"
mov $name2,"Drain Plant"
mov $lavel,"drainplant"
mov $tatie1,"drainplant_st01"
mov $tatie2,"drainplant_st02"
mov $tatie3,"drainplant_st03"
mov $tatie4,"drainplant_st02"
mov $haikei,"bg197"
mov %monster_x,200
mov %monster_y,0
if %nanido=1 mov %max_enemylife,18000
if %nanido=2 mov %max_enemylife,23000
if %nanido=3 mov %max_enemylife,28000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,1
mov %alice_skill1,50
mov %alice_skill2,50
mov %alice_skill3,50
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"It's no use struggling."
mov $mogaku_sel2,"No matter how you struggle, you'll go inside me anyway..."
mov $mogaku_sel3,"Don't struggle... Just enter me."
mov $mogaku_sel4,"There's no escape..."
mov $mogaku_sel5,"I won't let you go... I'll process your semen."
mov $mogaku_dassyutu1,"Just because you broke free, nothing has changed."
mov $mogaku_dassyutu2,"Why are you struggling in vain?"
mov $mogaku_earth_dassyutu1,"What power..."
mov $mogaku_earth_dassyutu2,"I want to pass that power down..."
mov $half_s1,"Don't hold back..."
mov $half_s2,"Your duty is to spit out semen."
mov $kiki_s1,"Now, please ejaculate..."
mov $kiki_s2,"Please fertilize all of the eggs I provide."
mov %end_n,15
mov %exp_minus,0
mov %zmonster_x,-100
mov %tukix,300
mov %owaza_count1a,4
name $name
>Why is a human walking around?@
>A sample that escaped from a plant?\
name ""
name "Luka"
>They can move on their own...?\
name ""
>And they even seem to possess a consciousness.\
name $name
>If you have high quality semen, you belong here.@
>Otherwise, you'll be returned to the other room to be squeezed and disposed of.\
>...Now, come back inside.@
>Spray your semen all over our eggs.\
name ""
name "Luka"
>...I'm not an escaped sample!@
>I came here to rescue everyone!\
name ""
name $name
>Oh, an intruder?@
>Then I'll take you inside first, and decide your punishment later...\
name ""
goto *common_main



*drainplant_v

gosub *face3
name $name
>I... Was destroyed...?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Drain Plant fades away into particles, then vanishes!\
mov %viclose,1:gosub *victory
mov %getexp,220000:gosub *lvup
mov %2410,1
goto *sean0385



*drainplant_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>So you wish to be housed inside me?@
>Good... Stop thinking, and surrender yourself to pleasure.\
name ""
goto *drainplant_a



*drainplant_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *drainplant_kousan
if %cmd1=16 goto *drainplant_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *drainplant_main



*drainplant_a

if %kousoku=1 gosub *drainplant_a3:goto *common_main
rnd2 %ransu,1,2
if %ransu=1 gosub *drainplant_a1:goto *common_main
if %ransu=2 && %owaza_count1a>5 gosub *drainplant_a2:goto *common_main
skip -3



*drainplant_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Your genitals are healthy. No issue with fertilization..."
if %ransu=2 mov $sel1,"Now for intense stimulation..."
if %ransu=3 mov $sel1,"Hehe... You seem energetic enough."
name $name
eng $sel1:$sel6\
name ""
skillname "Plant Flirtation"
dwave 1,"se\ero_koki1.ogg"
>The Drain Plant strokes Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4004
if %nanido<2 damage 320,340
if %nanido=2 damage 370,390
if %nanido=3 damage 420,440
skillname ""
if %mylife=0 sub %stack,1:return *drainplant_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*drainplant_a2

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 5
name $name
>It's fertilization time.@
>Now, please come inside me...\
name ""
skillname "Plant Invitation"
eng "The Drain Plant embraces Luka, and starts to draw him inside!"
$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>Luka has been bound by the Drain Plant!\
skillname ""
name $name
>If you come inside, you'll be released from all suffering.@
>Your semen will be endlessly squeezed, leaving you in permanent ecstasy.\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,99
if %earth=0 && %nanido=2 mov %genmogaku,99
if %earth=0 && %nanido=3 mov %genmogaku,99
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
sub %stack,1
return



*drainplant_a3

add %stack,1
if %kousan=2 skip 4
name $name
>Now, please come inside...\
name ""
skillname "Infinite Plant Fertilization"
dwave 1,"se\ero_makituki3.ogg"
lsp 700,":a;chara\drainplant_st11.bmp",200,0:print 10,500
>Luka's body is drawn inside the Drain Plant!
>Her inner tube latches onto his penis!
mov $tatie4,"drainplant_st11"
mov %kousoku,1:gosub *status_print
>Luka has been bound by the Drain Plant!\
skillname ""
name $name
>It feels good inside me, doesn't it?@
>Now to begin the exploitation...\
name ""
sub %stack,1
goto *drainplant_a4



*drainplant_a4

add %stack,1
>Luka has been bound by the Drain Plant...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Now to draw out your semen...":mov $sel2,"The Drain Plant's tube sucks on Luka's penis!"
if %ransu=2 mov $sel1,"Just let it out once you can't endure it...":mov $sel2,"The unending suction keeps on pulling on Luka's penis!"
if %ransu=3 mov $sel1,"You'll ejaculate one time after another, there's no need to hold out...":mov $sel2,"The tube rubs the back of his penis as it sucks!"
if %ransu=4 mov $sel1,"Please ejaculate and fertilize my eggs.":mov $sel2,"The tube sucks hard on Luka's penis!"
if %ransu=5 mov $sel1,"Now, please come... I won't waste your semen.":mov $sel2,"The tube contracts around Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Infinite Plant Fertilization"
dwave 1,"se\ero_makituki3.ogg"
eng $sel2:$sel6
skillcount3 4005
mov %damage_kotei,1
damage 500,600
skillname ""
if %mylife=0 sub %stack,1:return *drainplant_h2
sub %stack,1
goto *drainplant_a4



*drainplant_onedari

mov $list1,"Plant Flirtation"
if %4004>0 mov %list_num1,1
mov $list2,"Infinite Plant Fertilization"
if %4005>0 mov %list_num2,1
gosub *cmd_onedari
if %cmd1=11 goto *drainplant_onedari1
if %cmd1=12 goto *drainplant_onedari2
if %cmd1=-1 goto *drainplant_main
goto *drainplant_onedari



*drainplant_onedari1

gosub *onedari_syori
name $name
>You want to ejaculate inside my hand?@
>Then just once...@>I'll take you into me after that.\
name ""
gosub *drainplant_a1
skip -1



*drainplant_onedari2

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You wish to enter inside me?@
>Good... There's nothing wrong with abandoning everything and indulging in pleasure.\
name ""
gosub *drainplant_a3
skip -1



*drainplant_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\drainplant_bk02.bmp",200,0
gosub *syasei2
>As the Drain Plant gently strokes Luka's penis, he comes, covering her hand in semen.\
mov %viclose,1:gosub *lose
mov %2710,%2710+1:if %2710=1 mov %count_koenemy,%count_koenemy+1
if %2710>%count_most mov %count_most,%2710:mov $count_mostname,$name
count 5,3
mov $bad1,"The Drain Plant used her hand to force Luka to come."
gosub *face2
name $name
>What a waste of semen in my hand...@
>Next, I'll suck you up inside me.\
name ""
goto *drainplant_h



*drainplant_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>While stuck inside the Drain Plant's body, Luka comes, his semen spitting out into her tube.\
mov %viclose,1:gosub *lose
mov %2710,%2710+1:if %2710=1 mov %count_koenemy,%count_koenemy+1
if %2710>%count_most mov %count_most,%2710:mov $count_mostname,$name
count 5,3
mov $bad1,"The Drain Plant forced Luka to come inside her body."
gosub *face2
name $name
>Good, shoot out lots of semen.@
>I'll suck you more and more inside me...\
name ""
goto *drainplant_h



*drainplant_h

mov $bad2,"Captive inside the Drain Plant, Luka's semen is exploited endlessly."
if %2710=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,11:hseanwave:goto *drainplant_hb
name "Luka"
>Ahh...\
name ""
name $name
>Now to store you inside my body.@
>I'll slowly process all of your semen...\
name ""
dwave 1,"se\ero_makituki3.ogg"
cspl 690,699
lsp 700,":a;chara\drainplant_st11.bmp",200,0
lsp 690,":a;chara\drainplant_ct01.bmp",480,0:print 10,500
>Left helpless, I'm easily brought inside her body...@
mov %hseanwave,11:hseanwave
>My four limbs are locked down, and my penis is slipped inside a tube of flesh.\
goto *drainplant_hb



*drainplant_hb

name "Luka"
>Ah...\
name ""
>The soft touch of her flesh wraps around my penis, the stimulation more gentle than forceful.\
>Not just my penis, my entire body is enveloped in warm liquid.@
>It feels like I was a baby, safe and warm inside a womb...\
name $name
>Your semen quality is very high... At S rank.\
>It has been approved for fertilization use, not just energy harvesting.@
>Rejoice, for you will leave offspring...\
name ""
name "Luka"
>O...offspring!?\
name ""
lsp 700,":a;chara\drainplant_st12.bmp",200,0:print 10,500
>Strange lumps of pink appear in the tube of flesh, latched onto my penis.\
name $name
>These are angel eggs.@
>You will fertilize them, and give birth to new life...\
name ""
name "Luka"
>N...No!@>Stop!\
name ""
>Angel eggs...@>The horrifying thought of fathering an angel causes me to shiver.\
>I try to break free...@> But with my limbs bound, even slight resistance isn't allowed.\
>As I pointlessly struggle, more of those eggs come into the tube...@
lsp 690,":a;chara\drainplant_ct02.bmp",480,0:print 10,500
>And wrap around my penis!\
name "Luka"
>Ah!@>Ahhh!\
name ""
>My sensitive tip is pressed against the soft tissue.@
>My body shakes in instinctual pleasure, the desire to ejaculate hitting me all at once.\
name $name
>Now, do your duty as a male.@
>Release your semen, and fertilize these eggs...\
name ""
name "Luka"
>I...I don't want to...@
>Ah...\
name ""
>I don't want to fertilize anything like this...@
>I grit my teeth, trying to hold back an orgasm.\
>But despite my will, my lower body slowly goes numb as my body takes over.@
>My penis starts to pulse in surrender as my will is broken down.\
name "Luka"
>Ahhh...@
>Even though I shouldn't... C...Coming...\
name ""
gosub *syasei1
lsp 690,":a;chara\drainplant_ct03.bmp",480,0
gosub *syasei2
>Despite giving it everything I had, my body relaxes and lets go.@
>I sigh in pleasure as the wave of ecstasy washes over me.\
name "Luka"
>Ahh... I came...\
name ""
name $name
>Hehe... You covered them in semen.@
>Look... Meiosis is starting.\
name ""
lsp 690,":a;chara\drainplant_ct04.bmp",480,0:print 10,500
>The eggs which got covered in my seed start to divide.@
>Because of me, new life is forming...\
>The immorality of what I've done echoes through me.\
name "Luka"
>Ahh...\
name ""
name $name
>Are you satisfied at having fulfilled your role as a male?@
>But your work isn't over yet...\
>As an S rank sample, you have more eggs to fertilize.@
>You'll keep seeding new life until your genitals cease to function...\
name ""
name "Luka"
>N...No way... Ahh!\
name ""
name ""
lsp 690,":a;chara\drainplant_ct05.bmp",480,0:print 10,500
>Even more eggs flood the tube, covering the tip of my penis.@
>Everywhere their soft tissue touches explodes in pleasure.\
>Compared to before, the ecstasy is completely overwhelming.\
name "Luka"
>Ahhh!!!\
name ""
gosub *syasei1
lsp 690,":a;chara\drainplant_ct06.bmp",480,0
gosub *syasei2
>As if forcibly sucked out, my semen washes over the horrible eggs.\
>Despite the ecstasy, I feel humiliated.@
>I'm no more than a tool to fertilize eggs...\
name $name
>There are many more eggs to go...@
>Keep coming.\
>Forget everything inside of me...@>Indulge in pleasure, and be a stallion forever.\
name ""
name "Luka"
>Ahh...\
name ""
gosub *syasei1:gosub *syasei2
>How many times will she make me come and fertilize eggs?@
>I slowly stop thinking as I'm brought to climax after climax...\
mov %hseanwave,0:hseanwave
gosub *anten
>............\
mov %hseanwave,11:hseanwave
lsp 700,":a;chara\drainplant_st13.bmp",200,0
bg "bg\bg197.bmp",10,1500
>It has been one week since then.@
>I'm still being forced to continual orgasms.\
name "Luka"
>Haaa... It feels good...\
name ""
name $name
>Hehe, you're completely obedient now.@
>Here, I'll make you feel good again...\
name ""
>More eggs cover the tip of my penis...\
name "Luka"
>Ahh... Good...@
>Coming more...!\
name ""
gosub *syasei1:gosub *syasei2
>I leak more semen onto the eggs.@
>I have no idea how many times I've come the past week now...\
name "Luka"
>Ahhh...\
name ""
name $name
>F rank samples have gone bad after about thirty years.\
>An excellent sample like you will last at least twice as long.@
>Rejoice, for you'll soak in this pleasure for the rest of your life...\
name ""
name "Luka"
>Haa...\
name ""
gosub *syasei1:gosub *syasei2
>I'm just a piece of this Drain Lab now, my only role to discharge semen...@
>All I have to do is fulfill my duty as a male.\
name "Luka"
>Ahh... Coming again...\
name ""
gosub *syasei1:gosub *syasei2
>The continual orgasms slowly erode away my sanity.@
>Before long, I live only to come.\
>My life ends as a simple stallion to create new life.\
name "Luka"
>Ah... Ah...\
name ""
gosub *syasei1:gosub *syasei2
mov %hseanwave,0:hseanwave
gosub *anten
>..........\
goto *badend



*drainloid_start

mov $name,"Drainroid"
mov $name2,"Drainroid"
mov $lavel,"drainloid"
mov $tatie1,"drainloid_st11"
mov $tatie2,"drainloid_st02"
mov $tatie3,"drainloid_st03"
mov $tatie4,"drainloid_st21"
mov $haikei,"bg199"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,23000
if %nanido=2 mov %max_enemylife,27000
if %nanido=3 mov %max_enemylife,31000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,0
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Target resisting. Continuing..."
mov $mogaku_sel2,"Give up. Escape impossible."
mov $mogaku_sel3,"Target resisting. Increase power."
mov $mogaku_sel4,"Resistant is futile. Ejaculate."
mov $mogaku_sel5,"Target resisting. Increase force."
mov $mogaku_dassyutu1,"Target escaped..."
mov $mogaku_dassyutu2,"Recapture imminent."
mov $mogaku_earth_dassyutu1,"Target escaped..."
mov $mogaku_earth_dassyutu2,"Supernatural power levels above measuring potential!"
mov $half_s1,"Pre-come confirmed."
mov $half_s2,"Carry out precision squeezing mode."
mov $kiki_s1,"Target limit detected."
mov $kiki_s2,"Enter final processing stage."
mov %end_n,15
mov %exp_minus,220000
mov %zmonster_x,-200
mov %tukix,300
mov %owaza_count1a,7
mov %owaza_count1b,7
name "Boy"
>Ahh... It feels good...@
>But I don't want to die...\
name ""
name "Young Boy"
>No... I can't come any more...\
name ""
>A single machine monster is harvesting semen from multiple boys!\
name "Luka"
>Stop! Let them go!\
name ""
name $name
>Intruder detected.@
>Squeezing mode, off.\
>Shifting into intercept mode.@
>Target confirmed, moving to eliminate.\
name ""
mov $tatie1,"drainloid_st01"
gosub *face1
>The Drainroid releases the boys, and turns toward me.@
>Another unique looking artificial monster...\
name "Luka"
>Everyone, run away!@
>Leave her to me!\
name ""
name "Boy"
>H...Hurry!@> Before everyone's squeezed to death!\
name ""
name "Young Boy"
>Good luck, Hero!\
name ""
>The men cheer and run to a corner of the room, getting out of the way.@
>For their sakes, I can't lose!\
goto *common_main



*drainloid_v

gosub *face3
name $name
>Functions... Stopping...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Drainroid is sealed in the form of a gear!\
mov %viclose,1:gosub *victory
mov %getexp,250000:gosub *lvup
mov %2411,1
goto *sean0386



*drainloid_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Target surrender confirmed.@
>Squeezing mode activate.\
name ""
goto *drainloid_a



*drainloid_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *drainloid_kousan
if %cmd1=16 goto *drainloid_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *drainloid_main



*drainloid_a

if %kousoku=1 gosub *drainloid_a5:goto *common_main
rnd2 %ransu,1,5
if %ransu=1 gosub *drainloid_a1:goto *common_main
if %ransu=2 gosub *drainloid_a2:goto *common_main
if %ransu=3 gosub *drainloid_a3:goto *common_main
if %ransu=4 && %owaza_count1a>8 gosub *drainloid_a4:goto *common_main
if %ransu=5 && %owaza_count1b>8 gosub *drainloid_a6:goto *common_main
skip -6



*drainloid_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Arm selected."
if %ransu=2 mov $sel1,"Finger units entering independent mode."
if %ransu=3 mov $sel1,"Encouraging ejaculation with arm."
name $name
eng $sel1:$sel6\
name ""
skillname "Handjob Arm"
lsp 690,":a;chara\drainloid_ct01.bmp",0,0:print 10,500
dwave 1,"se\ero_koki1.ogg"
>The Drainroid's nimble fingers run up and down Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4006
if %nanido<2 damage 320,340
if %nanido=2 damage 350,370
if %nanido=3 damage 380,400
skillname ""
if %mylife=0 sub %stack,1:return *drainloid_h1
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*drainloid_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Mouth selected."
if %ransu=2 mov $sel1,"Adjusting tongue for maximum stimulation."
if %ransu=3 mov $sel1,"Enable vacuum mode."
name $name
eng $sel1:$sel6\
name ""
skillname "Semen Sucking Mouth Unit"
dwave 1,"se\ero_buchu2.ogg"
>The Drainroid's wet mouth sucks hard on Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4007
if %nanido<2 damage 330,350
if %nanido=2 damage 360,380
if %nanido=3 damage 390,410
skillname ""
if %mylife=0 sub %stack,1:return *drainloid_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*drainloid_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Breasts selected."
if %ransu=2 mov $sel1,"Attempting to capture semen on breasts."
if %ransu=3 mov $sel1,"Utilizing pressure."
name $name
eng $sel1:$sel6\
name ""
skillname "Artificial Breast Units"
dwave 1,"se\ero_sigoki1.ogg"
>Luka's penis is squeezed between the Drainroid's soft, fake breasts!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4008
if %nanido<2 damage 340,360
if %nanido=2 damage 370,390
if %nanido=3 damage 400,420
skillname ""
if %mylife=0 sub %stack,1:return *drainloid_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*drainloid_a4

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 5
name $name
>Squeezing unit, engaged.@
>Target binding initiated.\
name ""
skillname "Multiple Sucking Unit"
eng "The Drainroid grabs hold of Luka's body!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
dwave 1,"se\ero_buchu1.ogg"
mov $tatie4,"drainloid_st21"
lsp 700,":a;chara\drainloid_st21.bmp",0,0:print 10,500
>His penis is sucked into one of her semen sucking holes!
skillcount3 4009
if %nanido<2 damage 230,260
if %nanido=2 damage 250,280
if %nanido=3 damage 270,300
mov %kousoku,1:gosub *status_print
>Luka has been bound by the Drainroid!\
skillname ""
if %mylife=0 sub %stack,1:return *drainloid_h4
name $name
>Target bound. Semen extraction begun.@
>Unit operation set to full power.\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,2
if %earth=0 && %nanido=2 mov %genmogaku,2
if %earth=0 && %nanido=3 mov %genmogaku,3
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,1
sub %stack,1
return



*drainloid_a5

add %stack,1
>Luka has been bound by the Drainroid...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Engaging internal air pump."
if %ransu=2 mov $sel1,"Engaging vibration mode."
if %ransu=3 mov $sel1,"Increase power."
name $name
eng $sel1:$sel6\
name ""
skillname "Multiple Sucking Unit"
dwave 1,"se\ero_buchu1.ogg"
>The Drainroid's unit vibrates as it sucks on Luka's penis!
skillcount3 4009
if %nanido<2 damage 230,260
if %nanido=2 damage 250,280
if %nanido=3 damage 270,300
skillname ""
if %mylife=0 sub %stack,1:return *drainloid_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*drainloid_a6

add %stack,1
mov %owaza_count1b,0
mov %owaza_num1,2
if %kousan=2 skip 5
name $name
>Engaging sex simulation unit.@
>Restricting target...\
name ""
skillname "Sex Simulation Unit"
eng "A wire coils around Luka's body!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
dwave 1,"se\ero_pyu1.ogg"
mov $tatie4,"drainloid_st31"
lsp 700,":a;chara\drainloid_st31.bmp",0,0:print 10,500
>The Drainroid's artificial genitals press against Luka's penis!
skillcount3 4010
mov %damage_kotei,1
damage 400,500
mov %kousoku,1:gosub *status_print
>Luka is being raped by the Drainroid!\
skillname ""
if %mylife=0 sub %stack,1:return *drainloid_h5
name "Luka"
>Ahh!\
name ""
>The wet, soft insides envelope my penis.@
>Despite her hard mechanical appearance, it feels so soft...\
name $name
>Penis inserted into artificial genitals.@
>Begin sex simulation...\
name ""
sub %stack,1
goto *drainloid_a7



*drainloid_a7

add %stack,1
>Luka is being raped by the Drainroid!\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Succubus derived vagina engaged.":mov $sel2,"The Drainroid's artificial vaginal walls rub against Luka's penis!"
if %ransu=2 mov $sel1,"Increasing pressure.":mov $sel2,"The Drainroid's artificial vagina tightens around Luka's penis!"
if %ransu=3 mov $sel1,"Inducing ejaculation...":mov $sel2,"The soft walls of the Drainroid's vagina rub against Luka's penis!"
if %ransu=4 mov $sel1,"Engage vibration function.":mov $sel2,"The Drainroid's artificial vagina starts to vibrate against the tip of Luka's penis!"
if %ransu=5 mov $sel1,"Change movements...":mov $sel2,"The Drainroid's artificial vagina starts to rotate around Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Sex Simulation Unit"
dwave 1,"se\ero_chupa4.ogg"
eng $sel2:$sel6
skillcount3 4010
mov %damage_kotei,1
damage 400,500
skillname ""
if %mylife=0 sub %stack,1:return *drainloid_h6
sub %stack,1
goto *drainloid_a7



*drainloid_onedari

mov $list1,"Handjob Arm"
if %4006>0 mov %list_num1,1
mov $list2,"Semen Sucking Mouth Unit"
if %4007>0 mov %list_num2,1
mov $list3,"Artificial Breast Units"
if %4008>0 mov %list_num3,1
mov $list4,"Multiple Sucking Unit"
if %4009>0 mov %list_num4,1
mov $list5,"Sex Simulation Unit"
if %4010>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *drainloid_onedari1
if %cmd1=12 goto *drainloid_onedari2
if %cmd1=13 goto *drainloid_onedari3
if %cmd1=14 goto *drainloid_onedari4
if %cmd1=15 goto *drainloid_onedari5
if %cmd1=-1 goto *drainloid_main
goto *drainloid_onedari



*drainloid_onedari1

gosub *onedari_syori
name $name
>Handjob unit selected.@
>Processing target until ejaculation...\
name ""
gosub *drainloid_a1
skip -1



*drainloid_onedari2

gosub *onedari_syori
name $name
>Blowjob unit selected.@
>Processing target until ejaculation...\
name ""
gosub *drainloid_a2
skip -1



*drainloid_onedari3

gosub *onedari_syori
name $name
>Breast units selected.@
>Processing target until ejaculation...\
name ""
gosub *drainloid_a3
skip -1



*drainloid_onedari4

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>Sack units selected.@
>Binding target...\
name ""
if %kousoku=0 gosub *drainloid_a4
gosub *drainloid_a5
skip -1



*drainloid_onedari5

gosub *onedari_syori
name $name
>Sex simulation selected.@
>Rape mode engaged.\
name ""
gosub *drainloid_a6
skip -1



*drainloid_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\drainloid_ct02.bmp",0,0
lsp 693,":a;chara\drainloid_bk03.bmp",0,0
gosub *syasei2
>As the Drainroid's hands stroke Luka's penis, he comes, covering her hands in semen.\
mov %viclose,1:gosub *lose
mov %2711,%2711+1:if %2711=1 mov %count_koenemy,%count_koenemy+1
if %2711>%count_most mov %count_most,%2711:mov $count_mostname,$name
count 5,13
mov $bad1,"The Drainroid used her hands to force Luka to come."
gosub *face2
name $name
>Ejaculation confirmed.@
>Target resistance ceased.@>Capturing...\
name ""
name "Luka"
>Guh...\
name ""
csp 690:print 10,500
>Too weak to resist, I'm easily captured by the Drainroid.\
>Giving me a whiff of some strange medicine, I fade into darkness...\
gosub *anten
goto *drainloid_h



*drainloid_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\drainloid_ct11.bmp",0,0
lsp 691,":a;chara\drainloid_bk01.bmp",0,0
gosub *syasei2
>As the Drainroid sucks on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2711,%2711+1:if %2711=1 mov %count_koenemy,%count_koenemy+1
if %2711>%count_most mov %count_most,%2711:mov $count_mostname,$name
count 4,13
mov $bad1,"The Drainroid forced Luka to come with her mouth."
gosub *face2
name $name
>Ejaculation confirmed.@
>Target resistance ceased.@>Capturing...\
name ""
csp 690:print 10,500
>Too weak to resist, I'm easily captured by the Drainroid.\
>Giving me a whiff of some strange medicine, I fade into darkness...\
gosub *anten
goto *drainloid_h



*drainloid_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\drainloid_bk02.bmp",0,0
gosub *syasei2
>As the Drainroid squeezes Luka's penis between her fake breasts, he comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2711,%2711+1:if %2711=1 mov %count_koenemy,%count_koenemy+1
if %2711>%count_most mov %count_most,%2711:mov $count_mostname,$name
count 7,13
mov $bad1,"The Drainroid used her fake breasts to force Luka to come."
gosub *face2
name $name
>Ejaculation confirmed.@
>Target resistance ceased.@>Capturing...\
name ""
>Too weak to resist, I'm easily captured by the Drainroid.\
>Giving me a whiff of some strange medicine, I fade into darkness...\
gosub *anten
goto *drainloid_h



*drainloid_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\drainloid_st22.bmp",0,0
gosub *syasei2
>As the Drainroid's unit sucks on Luka's penis, he comes, shooting his semen inside.\
mov %viclose,1:gosub *lose
mov %2711,%2711+1:if %2711=1 mov %count_koenemy,%count_koenemy+1
if %2711>%count_most mov %count_most,%2711:mov $count_mostname,$name
count 2,13
mov $bad1,"The Drainroid forced Luka to come with her semen sucking unit."
gosub *face2
name $name
>Ejaculation confirmed.@
>Target resistance ceased.@>Capture successful.\
name ""
>Too weak to resist, I'm easily captured by the Drainroid.\
>Giving me a whiff of some strange medicine, I fade into darkness...\
gosub *anten
goto *drainloid_h



*drainloid_h5

mov %ikigoe,3:gosub *ikigoe
name $name
>Sex simulation aborted.@>Target resistance ending before expected time.\
name ""
gosub *syasei1
lsp 700,":a;chara\drainloid_st32.bmp",0,0
gosub *syasei2
>The instant Luka is forced inside the Drainroid's artificial vagina, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2711,%2711+1:if %2711=1 mov %count_koenemy,%count_koenemy+1
if %2711>%count_most mov %count_most,%2711:mov $count_mostname,$name
count 2,13
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come the moment of insertion into the Drainroid."
gosub *face2
name $name
>Ejaculation too quick, sample measurement unable to be attained.\
>Target resistance ceased.@>Capture successful.\
name ""
>Too weak to resist, I'm easily captured by the Drainroid.\
>Giving me a whiff of some strange medicine, I fade into darkness...\
gosub *anten
goto *drainloid_h



*drainloid_h6

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\drainloid_st32.bmp",0,0
gosub *syasei2
>As the Drainroid rapes Luka with her artificial vagina, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2711,%2711+1:if %2711=1 mov %count_koenemy,%count_koenemy+1
if %2711>%count_most mov %count_most,%2711:mov $count_mostname,$name
count 2,13
mov $bad1,"The Drainroid forced Luka to come as she raped him."
gosub *face2
name $name
>Ejaculation confirmed.@
>Target resistance ceased.@>Capture successful.\
name ""
>Too weak to resist, I'm easily captured by the Drainroid.\
>Giving me a whiff of some strange medicine, I fade into darkness...\
gosub *anten
goto *drainloid_h



*drainloid_h

mov $bad2,"Treated like a guinea pig, Luka's semen is squeezed endlessly."
if %2711=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Urhg...\
name ""
cspl 690,699
lsp 700,":c;chara\drainloid_ha02.bmp",0,0:print 10,500
mov %hseanwave,17:hseanwave
>When I wake up, I'm inside a dungeon.@
>The Drainroid from before is in the middle of extracting semen from numerous boys and men...\
name $name
>Sample has awakened.@
>All holes currently in use.\
>Please await your turn.\
name ""
name "Luka"
>Urhg... Uhg...\
name ""
>I try to struggle, but no energy enters my body.@
>Helpless, I can only await my turn at what I see before me...\
lsp 700,":c;chara\drainloid_ha03.bmp",0,0:print 10,500
name $name
>Processing continuing...\
name ""
name "Young Boy"
>Hya!@> S...Stop!\
name ""
>The Drainroid lifts up a young boy, his penis already completely erect.\
>And as if an afterthought, another man's penis is stuck inside her other arm, the emitted semen flowing through her body to somewhere else.\
name "Man A"
>Hyaaa!!!\
name ""
>The man's body spasms as he shouts in pleasure filled agony.@
>Is that going to be me soon...?\
lsp 700,":c;chara\drainloid_ha04.bmp",0,0:print 10,500
name "Man B"
>Ha... Ahh!\
name ""
>Another man's penis is attached to another vibrating device.\
>She's forcing multiple men to ejaculate at the same time.@
>It's like a horrifying orgasm assembly line.\
lsp 700,":c;chara\drainloid_ha05.bmp",0,0:print 10,500
name "Youth A"
>Ahh... S...Stop...\
name ""
>A boy is held right in front of Drainroid's eyes, his penis already erect.\
name $name
>Oral capacity set to two.\
name ""
lsp 700,":c;chara\drainloid_ha06.bmp",0,0:print 10,500
>The Drainroid's long tongue reaches out, and coils around his penis.\
name "Youth A"
>Ahh!\
name ""
>The young man clenches his teeth, his waist rocking back and forth in sudden pleasure.\
lsp 700,":c;chara\drainloid_ha07.bmp",0,0:print 10,500
name $name
>Number two...\
name ""
>This time, her tongue reaches out to the young boy's penis, focusing especially closely on his tip.\
name "Young Boy"
>Ahh...\
name ""
>A sweet moan leaks out of the young boy's mouth as he instantly surrenders to her tongue.@
>At the same time, the other youth attached to a different unit moans in pleasure.\
lsp 700,":c;chara\drainloid_ha08.bmp",0,0:print 10,500
name "Youth A"
>Ahhh...\
name ""
name "Young Boy"
>It feels so good...\
name ""
>Skillfully using her tongue to lick both men, she forced them to stop struggling in moments.@
>Both of their faces go slack as her tongue attacks them.\
>I can't help but think of myself feeling that tongue...@>As the thoughts bounce around my head, my penis slowly reacts.\
name $name
>Surrender confirmed.@
>Moving toward finish...\
name ""
lsp 700,":c;chara\drainloid_ha09.bmp",0,0:print 10,500
>The Drainroid's tongue coils around both of their penises...\
name "Youth A"
>Ahh... I'm coming...\
name ""
name "Young Boy"
>Ahh... Lick it more...\
name ""
>Their bodies start to twitch as they reach their limit almost in unison.\
gosub *syasei1
lsp 700,":c;chara\drainloid_ha10.bmp",0,0
gosub *syasei2
name "Youth A"
>Uwaa...\
name ""
name "Young Boy"
>Ahh...\
name ""
>Both of them erupt, their semen splattering all over the Drainroid's face.\
name $name
>Semen ejected.@> Starting absorption...\
name ""
lsp 700,":c;chara\drainloid_ha11.bmp",0,0:print 10,500
>The semen splashed onto her face seems to sink into her skin...\
name $name
>Ejaculation confirmed in unit three.\
name ""
>The man with his penis stuck between her breasts lets out a moan.\
>It really is an assembly line...@
>A chill goes through my body as I think of myself being disposed of like this, too.\
lsp 700,":c;chara\drainloid_ha12.bmp",0,0:print 10,500
>Tossing away the two men who were licked, she brings up another.\
name $name
>Next samples selected.@
>Begin processing...\
name ""
name "Youth B"
>Aiee!\
name ""
>Her long tongue quickly reaches out, and coils around his penis.@
>At the same time, another man forced into what looks like her ass moans.\
name "Man C"
>C...Coming!@>Ahh!\
name ""
gosub *syasei1
lsp 700,":c;chara\drainloid_ha13.bmp",0,0
gosub *syasei2
>The man climaxes, exploding inside her ass.\
name $name
>Ejaculation confirmed.@
>New sample required.\
name ""
>After licking the youth's penis clean, she sucks it into her mouth.@
>Her big lips press on his penis as she sucks.\
name "Youth B"
>N...No... Too much!\
name ""
gosub *syasei1
lsp 700,":c;chara\drainloid_ha14.bmp",0,0
gosub *syasei2
>Her oral techniques quickly force him to come, his semen quickly absorbed into her skin like the others.\
name $name
>Next...\
name ""
lsp 700,":c;chara\drainloid_ha16.bmp",0,0:print 10,500
>Another man is brought up to her face, his penis quickly swallowed.\
name $name
>Nnnnn....\
name ""
name "Man D"
>Hyaaa!\
name ""
>Her powerful mouth sucks on the man hard, his body jerking in spasms of pleasure.@
lsp 700,":c;chara\drainloid_ha17.bmp",0,0:print 10,500
>At the same time, another man explodes on her chest.\
name $name
>Ejaculation confirmed...@
>Excessive amount, absorption delayed.\
name ""
>Her artificial breasts are covered in semen.@
>It seems like she got so much on her, that she can't absorb it fast enough...\
name $name
>Mouth capacity still under limit.\
name ""
name "Man D"
>Ahhh!\
name ""
>Slowly absorbing the semen on her chest, she brings the man in her mouth to orgasm in less than thirty seconds...\
gosub *syasei1
lsp 700,":c;chara\drainloid_ha18.bmp",0,0
gosub *syasei2
>The man softly moans as his semen is swallowed by the Drainroid.\
name $name
>Additional Semen confirmed.@
>Resuming processing...\
name ""
lsp 700,":c;chara\drainloid_ha19.bmp",0,0:print 10,500
>Without releasing the man, she starts to suck on him even harder.@
>Her head starts bobbing back and forth at the same time, pumping the dangling man like a piston.\
name "Man D"
>Ahhgg... S...Stop it please!\
name ""
>The man screams as the sounds of her oral vacuum fill the room.@
lsp 700,":c;chara\drainloid_ha20.bmp",0,0:print 10,500
>At the same time, her head picks up in speed.\
name "Man D"
>Ah!@>Aiee!\
name ""
>The man's eyes roll up as his body jerks.@
gosub *syasei1
lsp 700,":c;chara\drainloid_ha21.bmp",0,0
gosub *syasei2
>And he's brought to a second, fast orgasm.\
>The man's mouth gapes open as his facial features melt in ecstasy.\
lsp 700,":c;chara\drainloid_ha22.bmp",0,0:print 10,500
name $name
>Nnn...\
name ""
>With a slurping noise, she swallows the last of his semen.@
>Pulling him out, the man's withered penis drops down.\
name $name
>Semen extracted.@
>Next...\
name ""
lsp 700,":c;chara\drainloid_ha23.bmp",0,0:print 10,500
name "Young Boy B"
>Ahh...\
name ""
>She pulls out a young boy who looks even younger than me.@
>As she does, her eyes pass over my already erect penis.\
name $name
>Hero Luka, you are next.@
>Please await your turn.\
name ""
name "Luka"
>Aiee!\
name ""
>I'll finally be preyed on next...@
>But still too weak from before, I can't break free.\
>I can only lay here and watch the men being processed before me...\
name $name
>Tongue use engaged.\
name ""
lsp 700,":c;chara\drainloid_ha24.bmp",0,0:print 10,500
>Drainroid's tongue runs up and down the child's penis.@
>The tip of her tongue runs back and forth against the young boy's glans, popping out from his foreskin.\
name "Young Boy B"
>Hyaa!\
name ""
>The boy's body shakes in pleasure as her tongue focuses on his tip.@
>At the same time, the man squeezed between her breasts lets out a scream.\
name "Man E"
>Ah!@>Coming!\
name ""
lsp 700,":c;chara\drainloid_ha25.bmp",0,0:print 10,500
>As he comes on her front breasts, another man comes on her breasts from behind...\
name "Youth C"
>N...No more!@> Uhg!\
name ""
lsp 700,":c;chara\drainloid_ha26.bmp",0,0:print 10,500
>The double ejaculations cover her body in semen from both directions.\
name $name
>Ejaculations confirmed.@
>Oral sample remains.\
name ""
>Her tongue movements get even quicker on the boy's penis, encouraging him to ejaculate too.\
name "Young Boy B"
>Hyaaa...@
>No... No...\
name ""
>The boy moans as his small body jerks and twitches.\
gosub *syasei1
lsp 700,":c;chara\drainloid_ha27.bmp",0,0
gosub *syasei2
>And with a spasm, his tiny penis shoots out a jet of semen into her mouth.\
name $name
>Semen confirmed.@
>Vacuum initiated...\
name ""
lsp 700,":c;chara\drainloid_ha28.bmp",0,0:print 10,500
>The Drainroid's mouth closes around his penis, a loud sucking noise filling the area.@
>As the boy comes, she sucks on him with full power.\
name "Young Boy B"
>Hyaaa!!!\
name ""
>The boy's body writhes around helplessly as every drop of semen is quickly sucked out of him.\
mov %hseanwave,0:hseanwave
name $name
>Sample dry.@
>Vacuuming complete.\
name ""
lsp 700,":c;chara\drainloid_ha29.bmp",0,0:print 10,500
>The boy's body is tossed away.@
>Her eyes turn toward me...\
name $name
>Thank you for waiting.@
>It is your turn.\
name ""
name "Luka"
>Aiee!\
name ""
>It's finally my turn...@
>She's going to "process" me like those other men.\
name "Luka"
>Noo!@> Stop!\
name ""
lsp 700,":c;chara\drainloid_ha30.bmp",0,0:print 10,500
>Despite my refusal, my penis is already completely erect.@
>I couldn't help but think of being sucked by that mouth of hers...\
>Those men were writhing in ecstasy in less than thirty seconds.@
>And now I'll be sucked in too...\
name "Luka"
>S...Stop! Let go!\
name ""
>My body is held in midair by her arm.@
>She's treating me the same as those other boys...\
name "Luka"
>Noooo!\
name ""
name $name
>Resistance is futile.@
>Processing starting...\
name ""
>Drainroid's mouth opens wide as she pulls my penis closer...@
mov %hseanvoice,3:hseanvoice
lsp 700,":c;chara\drainloid_ha31.bmp",0,0:print 10,500
>And closing her soft lips around my shaft, my penis is sucked into her warm mouth!\
name "Luka"
>Haa...\
name ""
>I'm enraptured in moments by the unique touch of her mouth.\
>Her tongue quickly coils around my penis as her cheeks rub against the sides of my penis.\
>The mouth I could only think about while watching from the outside...@
>This taste made all those men come in moments.\
name $name
>Samples must be processed quickly.@
>The backlog allows no time for enjoyment.\
name ""
name "Luka"
>Ah!@>Hyaa!\
name ""
>My penis is pulled deeper inside her mouth as the powerful suction pulls on me.@
>The warm flesh of her throat constricts and squeezes my tip inside her.\
>My thoughts are blown away as my body twitches in her embrace.@
>In only seconds, I'm left wanting nothing more than to explode inside her mouth.\
gosub *syasei1
lsp 700,":c;chara\drainloid_ha32.bmp",0,0
gosub *syasei2
>Haaa...\
name ""
>I explode inside her with a moan.@
>The quick ejaculation almost feels like an accidental orgasm.\
lsp 700,":c;chara\drainloid_ha33.bmp",0,0:print 10,500
>Her tongue rubs and licks my glans as I come, lapping up all of my semen.@
>Everyone else felt this ecstasy, too...\
name $name
>Hero Luka selected as special sample.@
>Complete semen processing authorized.\
name ""
name "Luka"
>Haa... Ahhh!\
name ""
>The tip of her tongue runs up and down my back muscle.@
>At the same time, her throat closes up and squeezes my tip.\
name "Luka"
>No... Coming again...\
name ""
name $name
>Moving toward second ejaculation.@
>Sample requested to relax.\
name ""
>As I twitch on the edge of orgasm, the tip of her tongue suddenly starts to flick back and forth across my urethral opening.\
name "Luka"
>Haa...\
name ""
>Just as she requested, my body goes limp as I surrender to the pleasure.\
gosub *syasei1
lsp 700,":c;chara\drainloid_ha34.bmp",0,0
gosub *syasei2
>I explode inside her mouth, my squirting semen landing on her tongue as she licks my tip during it.\
lsp 700,":c;chara\drainloid_ha35.bmp",0,0:print 10,500
name "Luka"
>Haaa... That feels so good...\
name ""
>My semen mixes with her saliva, as she keeps sucking on me.@
>The processing I was so terrified of before...@> Now I'm just twitching in happiness.\
>I want to feel more of this...@> My body goes slack as I completely surrender, giving my whole body over to the Drainroid.\
name $name
>Processing continuing...\
name ""
lsp 700,":c;chara\drainloid_ha36.bmp",0,0:print 10,500
>As if meeting my expectations, the Drainroid's tongue starts to move even faster, tracing around all of my weakest points.\
name "Luka"
>Haa... Ah...\
name ""
>Sucking on my penis as if it was sweet candy, she brings me deeper inside, causing my glans to rub against her throat again.\
name "Luka"
>No... Coming...! Ahhh!\
name ""
gosub *syasei1
lsp 700,":c;chara\drainloid_ha37.bmp",0,0
gosub *syasei2
>I come inside her for a third time, my white semen filling her mouth.\
lsp 700,":c;chara\drainloid_ha38.bmp",0,0:print 10,500
>Her tongue eagerly starts licking my penis again as I come.@
>This monster, able to force multiple men to come so quickly, is forcing me to orgasm after orgasm...\
name $name
>You have been selected for special treatment.@
>I have been assigned as your handler.\
name ""
name "Luka"
>Haa... Ah...\
name ""
>As her tongue coils around my penis, it pulses in pure joy.\
gosub *syasei1
lsp 700,":c;chara\drainloid_ha39.bmp",0,0
gosub *syasei2
>She forces me to another fast orgasm.@
>But her tongue doesn't stop for a moment...\
name "Luka"
>Haa... Ahh...\
name ""
name $name
>Rest time has not been granted yet.@
>Ten ejaculations remain before allocated one hour break.\
name ""
name "Luka"
>Ah!@>Haaa...\
name ""
mov %hseanvoice,0:hseanvoice
lsp 700,":c;chara\drainloid_ha40.bmp",0,0:print 10,500
>Thus, the Drainroid continues sucking me to multiple orgasms...\
>Once she sucks me dry, I'm given a short rest as she processes the other men.\
>After my energy is restored, she sucks me completely dry again.@
>Like that, I live out the rest of my life as a guinea pig in this laboratory...\
gosub *anten
>...........\
goto *badend



*replicant_start

mov $name,"Replicant"
mov $name2,"Replicant"
mov $lavel,"replicant"
mov $tatie1,"replicant_st01"
mov $tatie2,"replicant_st01"
mov $tatie3,"replicant_st01"
mov $tatie4,"replicant_h1"
mov $haikei,"bg199"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,20000
if %nanido=2 mov %max_enemylife,25000
if %nanido=3 mov %max_enemylife,30000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,0
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Once in this state, the male has no right to refuse mating."
mov $mogaku_sel2,"Once in this state, the male has no right to refuse mating."
mov $mogaku_sel3,"When a female initiates a desire to mate, how can the male refuse?"
mov $mogaku_sel4,"When a female initiates a desire to mate, how can the male refuse?"
mov $mogaku_sel5,"When a female initiates a desire to mate, how can the male refuse?"
mov $mogaku_dassyutu1,"You refused the mating invitation..."
mov $mogaku_dassyutu2,"The previous generation's males have no manners, it seems."
mov $mogaku_earth_dassyutu1,"You refused the mating invitation..."
mov $mogaku_earth_dassyutu2,"The previous generation's males have no manners, it seems."
mov $half_s1,"Having your genitals played with for pleasure..."
mov $half_s2,"The previous generation's humans mating rituals are so shameful."
mov $kiki_s1,"Are you about to shoot off your semen?"
mov $kiki_s2,"Let me see the previous generation's semen..."
mov %end_n,15
mov %exp_minus,470000
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,5
mov %owaza_count3a,5
name $name
>A previous generation human...@
>Can I... Prey on this male?\
name ""
name "Luka"
>S...She spoke!?\
name ""
>I can't see a mouth on her, but she spoke...@
>She also seems to be intelligent...\
name "Laplace"
>Of course she can speak.@
>As the Monster Lord said, she's a complete human being.\
>The next generation of humans, created to populate the world after the re-creation.@
>That is who this Replicant is.\
name ""
name "Luka"
>She's the next generation of human!?\
name ""
>All of the current beings on the ground will be destroyed, and replaced with these Replicants...?\
>The plan sends chills down my spine.\
name "Laplace"
>...Replicant, mate with that human.@
>Get a good taste of how the previous generations bred.\
name ""
name $name
>Understood.\
name ""
name "Luka"
>Gah...!\
name ""
>I take up my sword!\
goto *common_main



*replicant_v

gosub *face3
name $name
>To a previous generation human...!?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Replicant is sealed in the form of a small creature!\
mov %viclose,1:gosub *victory
mov %getexp,280000:gosub *lvup
mov %2412,1
goto *sean0387



*replicant_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>So you wish to obediently mate with me?@
>Then let me take in your genes...\
name ""
goto *replicant_a



*replicant_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *replicant_kousan
if %cmd1=16 goto *replicant_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *replicant_main



*replicant_a

if %kousoku=1 gosub *replicant_a5:goto *common_main
rnd2 %ransu,1,4
if %ransu=1 gosub *replicant_a1:goto *common_main
if %ransu=2 gosub *replicant_a2:goto *common_main
if %ransu=3 && %owaza_count3a>6 gosub *replicant_a3:goto *common_main
if %ransu=4 && %owaza_count1a>6 gosub *replicant_a4:goto *common_main
skip -5



*replicant_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll use my chest this time..."
if %ransu=2 mov $sel1,"Would you shoot it between these breasts?"
if %ransu=3 mov $sel1,"Releasing semen from this... The previous generation was so strange."
name $name
eng $sel1:$sel6\
name ""
skillname "Flats Chest"
dwave 1,"se\ero_sigoki1.ogg"
>The Replicant squeezes Luka's penis between her unique breasts!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4011
if %nanido<2 damage 350,370
if %nanido=2 damage 400,420
if %nanido=3 damage 450,470
skillname ""
if %mylife=0 sub %stack,1:return *replicant_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*replicant_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"What an irrational response... Giving off seed when not even mating?"
if %ransu=2 mov $sel1,"Will a male from the previous generation derive pleasure from a tentacle...?"
if %ransu=3 mov $sel1,"Let me try this..."
name $name
eng $sel1:$sel6\
name ""
skillname "Enigma Tentacle"
dwave 1,"se\ero_makituki1.ogg"
>The Replicant's tentacles coil around Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4012
if %nanido<2 damage 360,380
if %nanido=2 damage 410,430
if %nanido=3 damage 460,480
skillname ""
if %mylife=0 sub %stack,1:return *replicant_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*replicant_a3

add %stack,1
mov %owaza_count3a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Show me the previous generation's ejaculation..."
if %ransu=2 mov $sel1,"I don't get it... This can make old males come?"
if %ransu=3 mov $sel1,"All I need to do is this? How... Simple."
name $name
eng $sel1:$sel6\
name ""
skillname "Tristram Hands"
dwave 1,"se\ero_koki1.ogg"
>The Replicant squeezes Luka's penis between her soft hands!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4013
if %nanido<2 damage 120,130
if %nanido=2 damage 140,150
if %nanido=3 damage 160,170
dwave 1,"se\ero_koki1.ogg"
>Tentacles coil around Luka's penis between her palms!
if %nanido<2 damage 120,130
if %nanido=2 damage 140,150
if %nanido=3 damage 160,170
dwave 1,"se\ero_koki1.ogg"
>The soft flesh of her palm rubs against the tip of Luka's penis!
if %nanido<2 damage 120,130
if %nanido=2 damage 140,150
if %nanido=3 damage 160,170
skillname ""
if %mylife=0 sub %stack,1:return *replicant_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*replicant_a4

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 5
name $name
>I'll give you a taste of how the next generation will mate.@
>First, the female captures the male's body...\
name ""
skillname "Predatory Mating"
dwave 1,"se\ero_makituki3.ogg"
eng "The Replicant's tentacles coil around Luka's body, and pull him toward her!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>Luka has been bound by the Replicant!\
skillname ""
name $name
>We draw in the male's body into our genitals, and dissolve them away.\
>Thus we take in their genetic information, and renew our own bodies in the process.\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,99
if %earth=0 && %nanido=2 mov %genmogaku,99
if %earth=0 && %nanido=3 mov %genmogaku,99
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
sub %stack,1
return



*replicant_a5

add %stack,1
>Luka is being drawn into the Replicant's genitals...\
name $name
>The females draw in the male's body like this.\
>Even a male from the old generation should still feel pleasure from it.\
name ""
skillname "Predatory Mating"
dwave 1,"se\ero_makituki3.ogg"
>The Replicant's tentacles draw Luka closer!\
>Innumerable tentacles inside the Replicant's vagina squirm around Luka's body!
skillcount3 4014
mov %damage_kotei,1
damage 500,600
mov %kousoku,2:gosub *status_print
>Luka is being raped by the Replicant!\
skillname ""
if %mylife=0 sub %stack,1:return *replicant_h4
name $name
>This is how we mate...@> Now to take your genes.@
>This is when my generation's males melt in extreme pleasure.\
name ""
sub %stack,1
goto *replicant_a6



*replicant_a6

add %stack,1
>Luka is being raped by the Replicant...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"It looks like the previous generation's males enjoy this, too...":mov $sel2,"Countless tentacles rub Luka's penis inside her!"
if %ransu=2 mov $sel1,"We dissolve away the male's body, and capture their genetic information...":mov $sel2,"The Replicant's inner walls rub against Luka's penis!"
if %ransu=3 mov $sel1,"Dissolve away as I take your genetic information...":mov $sel2,"The squirming tentacles rub all over Luka's body!"
if %ransu=4 mov $sel1,"So the next generation can mate with the previous generation...":mov $sel2,"The Replicant's vagina contracts, squeezing Luka's body!"
if %ransu=5 mov $sel1,"How does it feel to mate with the new generation? Even you old types recognize it's superior, don't you?":mov $sel2,"Digestive liquid squirts out all over Luka's body!"
name $name
eng $sel1:$sel6\
name ""
skillname "Predatory Mating"
dwave 1,"se\ero_makituki3.ogg"
eng $sel2:$sel6
skillcount3 4014
mov %damage_kotei,1
damage 500,600
skillname ""
if %mylife=0 sub %stack,1:return *replicant_h5
sub %stack,1
goto *replicant_a6



*replicant_onedari

mov $list1,"Flats Chest"
if %4011>0 mov %list_num1,1
mov $list2,"Enigma Tentacle"
if %4012>0 mov %list_num2,1
mov $list3,"Tristram Hands"
if %4013>0 mov %list_num3,1
mov $list4,"Predatory Mating"
if %4014>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *replicant_onedari1
if %cmd1=12 goto *replicant_onedari2
if %cmd1=13 goto *replicant_onedari3
if %cmd1=14 goto *replicant_onedari4
if %cmd1=-1 goto *replicant_main
goto *replicant_onedari



*replicant_onedari1

gosub *onedari_syori
name $name
>You want to be stimulated by my breasts?\
>How irrational... You're wasting precious genetic information in the pursuit of mindless pleasure?\
name ""
gosub *replicant_a1
skip -1



*replicant_onedari2

gosub *onedari_syori
name $name
>You want to be stimulated by my tentacles?\
>How irrational... You're wasting precious genetic information in the pursuit of mindless pleasure?\
name ""
gosub *replicant_a2
skip -1



*replicant_onedari3

gosub *onedari_syori
name $name
>You want to be stimulated by my hands?\
>How irrational... You're wasting precious genetic information in the pursuit of mindless pleasure?\
name ""
gosub *replicant_a3
skip -1



*replicant_onedari4

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You wish to experience my predatory mating?@
>How strange... The old generation desires the new generation?\
name ""
if %kousoku=0 gosub *replicant_a4
gosub *replicant_a5
skip -1



*replicant_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\replicant_bk02.bmp",0,0
gosub *syasei2
>Sandwiched between the Replicant's breasts, Luka comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2712,%2712+1:if %2712=1 mov %count_koenemy,%count_koenemy+1
if %2712>%count_most mov %count_most,%2712:mov $count_mostname,$name
count 7,11
mov $bad1,"The Replicant used her breasts to force Luka to come."
gosub *face2
name $name
>So that's an ejaculation, huh?@
>Look at it squirting... What a pathetic looking bodily function.\
name ""
goto *replicant_h



*replicant_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\replicant_bk04.bmp",0,0
gosub *syasei2
>As the Replicant's tentacle strokes Luka's penis, he comes, covering it with semen.\
mov %viclose,1:gosub *lose
mov %2712,%2712+1:if %2712=1 mov %count_koenemy,%count_koenemy+1
if %2712>%count_most mov %count_most,%2712:mov $count_mostname,$name
count 10,11
mov $bad1,"The Replicant forced Luka to come with her tentacle."
gosub *face2
name $name
>So that's an ejaculation, huh?@
>Look at it squirting... What a pathetic looking bodily function.\
name ""
goto *replicant_h



*replicant_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\replicant_bk03.bmp",0,0
gosub *syasei2
>As the Replicant strokes Luka's penis with her hands, he comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2712,%2712+1:if %2712=1 mov %count_koenemy,%count_koenemy+1
if %2712>%count_most mov %count_most,%2712:mov $count_mostname,$name
count 5,11
mov $bad1,"The Replicant used her hands to force Luka to come."
gosub *face2
name $name
>So that's an ejaculation, huh?@
>Look at it squirting... What a pathetic looking bodily function.\
name ""
goto *replicant_h



*replicant_h4

mov %ikigoe,3:gosub *ikigoe
name $name
>That's how quick males finish?\
name ""
gosub *syasei1
lsp 700,":a;chara\replicant_h3.bmp",0,0
gosub *syasei2
>As soon as the tentacles latch onto him inside her vagina, Luka comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2712,%2712+1:if %2712=1 mov %count_koenemy,%count_koenemy+1
if %2712>%count_most mov %count_most,%2712:mov $count_mostname,$name
count 33,11
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come the moment he was brought inside the Replicant."
gosub *face2
name $name
>Our genitals dissolve men to get their genetic information.\
>Even if you come inside me... It doesn't mean anything.\
name ""
goto *replicant_h



*replicant_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\replicant_h3.bmp",0,0
gosub *syasei2
>As the countless tentacles squirm and rub against Luka's penis inside the Replicant's vagina, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2712,%2712+1:if %2712=1 mov %count_koenemy,%count_koenemy+1
if %2712>%count_most mov %count_most,%2712:mov $count_mostname,$name
count 33,11
mov $bad1,"The Replicant forced Luka to come as she mated with him."
gosub *face2
name $name
>Our genitals dissolve men to get their genetic information.\
>Even if you come inside me... It doesn't mean anything.\
name ""
goto *replicant_h



*replicant_h

mov $bad2,"Taken inside her body, Luka is dissolved away for his genetic information."
if %2712=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,12:hseanwave:goto *replicant_hb
name "Luka"
>Ahh...\
name ""
name $name
>Now to mate.@
>Since we are both humans, we can easily breed together.\
name ""
name "Luka"
>S...Stop... Uwa!\
name ""
dwave 1,"se\ero_makituki3.ogg"
mov %hseanwave,12:hseanwave
cspl 690,699
lsp 700,":a;chara\replicant_h1.bmp",0,0:print 10,500
>Tentacles reach out from the Replicant's body, and coil around me.@
>They start to pull me into her lower body, opening up in an umbrella shape, easily big enough to take me inside...\
>The tentacles slowly pull me into her open vagina...\
goto *replicant_hb



*replicant_hb

name $name
>Our breeding style is called predatory mating.\
>We take males into our vagina, and dissolve away their body as we read their genetic information.\
>Using their body itself, we breed and reproduce...\
name ""
name "Luka"
>N...No way... Stop...\
name ""
lsp 700,":a;chara\replicant_h2.bmp",0,0:print 10,500
>Sticky liquid starts to drip out from inside her vagina, covering every inch of my body.\
>At the same time, tentacles reach out and cover my body, their soft touches spreading the liquid even more.\
name $name
>Analyze your genes... And dissolve your body...@
>But there's no need to fear, as there's no pain.\
name ""
name "Luka"
>Stop... I don't want this!\
name ""
>This is how the next generation will mate?@
>My body trembles at how horrible it is.\
>As the tentacles rub against my body, my penis slowly gets bigger.@
>As if inspecting it, the tentacles coil around it, and stroke it.\
name "Luka"
>Ahh...!\
name ""
name $name
>This is the old generation's sexual organ...@
>As you already know, I was taught how it worked.\
>There's no need for such a primitive organ in the next generation.@
>No reason for such a waste of energy in that "sex" ritual.\
name ""
name "Luka"
>Ahhh!!!\
name ""
>Her tentacles keep stroking and rubbing my penis, as if inspecting the shape inside her.@
>The soft, wet tentacles rubbing against it cause my body to shake in response.\
name "Luka"
>Stop... D...Don't touch it...\
name ""
>My breath gets rougher as she keeps toying with it.@
>A few moments later, my lower body starts to ache as my body reacts.\
name "Luka"
>C...Coming... Ahh...\
name ""
gosub *syasei1
lsp 700,":a;chara\replicant_h3.bmp",0,0
gosub *syasei2
>Unable to endure the pleasure, I come inside the Replicant, even as she's drawing my body into her vagina.\
name $name
>...So you ejaculated?@
>There's no need for that, when we mate.\
>Orgasming only from pleasure is such an inefficient bodily reaction.@
>And this just proves it.@> You wasted all of that semen for no reason just now.\
name ""
name "Luka"
>Ahhh...\
name ""
name $name
>Though, it does appear that you approve of the new generation's mating style.@
>After all, you ejaculated rather quickly into it.\
>But our generation's reproduction is on a whole different dimension than yours.@
>You should get a good taste of the absolute unity that comes from giving your body to a female...\
name ""
name "Luka"
>H...Help... Ah...\
name ""
mov %hseanwave,13:hseanwave
lsp 700,":a;chara\replicant_h4.bmp",0,0:print 10,500
>The Replicant draws me even deeper into her vagina, my whole body now surrounded by her juices and tentacles.\
name $name
>Now, our mating has reached its climax.@
>I'll dissolve away your body, and take it into my own...\
name "Luka"
>S...Stop... Hyaa!\
name ""
if %hosyoku_cut=1 goto *hosyoku_cut
lsp 700,":a;chara\replicant_h5.bmp",0,0:print 10,500
>Warm liquid squirts out all over my body, the viscous fluid covering my skin.@
>Everywhere the sweet liquid touches, explosions of ecstasy radiate outward.\
>Immersed in it, my body squirms and writhes in unbearable bliss.\
name "Luka"
>Ahhhh!!!@
>S...S...Hyaaa!\
name ""
name $name
>Our reproductive methods are absolutely amazing.@
>Dissolved inside the female and becoming one with her to create new life.\
>There's no need to do something as barbaric as injecting semen...\
name ""
>Her tentacles rub the warm liquid against my penis, as if she was intentionally causing it to be covered the most.\
name $name
>I'll dissolve away this primitive male organ, too...\
name ""
name "Luka"
>Stop... That feels good...\
name ""
>Her tentacles coil around my penis as my thoughts are paralyzed by the pleasure of the sticky liquid.@
>She's dissolving my penis inside her...@>Even though it's a horrifying thought, I can't deny the sensations.\
name "Luka"
>Ahhh!!!\
name ""
gosub *syasei1:gosub *syasei2
>My trembling body sprays more semen into her vagina.\
name $name
>Another ejaculation?@
>Don't you know there's no meaning to it with me?\
>It's a more primitive organ than I thought...@>Is it broken, or something?\
name ""
lsp 700,":a;chara\replicant_h6.bmp",0,0:print 10,500
>Even more liquid is sprayed onto my body.@
>Relaxing in the sensations, I can't fight against it any longer.\
name "Luka"
>Haaa...\
name ""
>It's not just my penis that will dissolve away...@
>My whole body will melt away inside her vagina like this.\
>She'll take me in, and make me become one with her in order to reproduce...\
name $name
>It feels comfortable, doesn't it?@
>Isn't the new generation's mating style superior to yours?\
name ""
name "Luka"
>Ah...ah...\
name ""
>It feels like my mind itself is melting away with my body.@
>Even though I should be horrified, my body is trembling in joy.\
>She will take my body, and my mind will become one with hers.@
>The sense of unity expands to both my mind and body.\
name "Luka"
>...Ah...\
name ""
>Thus, I slowly melt away inside her, my everything becoming one with her.\
mov %hseanwave,0:hseanwave
gosub *anten
name $name
>The ultimate sense of unity, in exchange for a life...@> The biggest joy a male can experience.@
>Even a male from the previous generation can understand it...\
name ""
>After taking in the boy's body, the Replicant finishes mating with him.@
>Thus, the next generation's female uses the male's body as a source to create offspring...\
>...............\
goto *badend



*laplace_start

mov $name,"Laplace"
mov $name2,"Laplace"
mov $lavel,"laplace"
mov $tatie1,"laplace_st01"
mov $tatie2,"laplace_st02"
mov $tatie3,"laplace_st03"
mov $tatie4,"laplace_st02"
mov $haikei,"bg199"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,24000
if %nanido=2 mov %max_enemylife,29000
if %nanido=3 mov %max_enemylife,34000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,60
if %nanido=3 mov %earth_keigen,30
mov %alice_skill,0
mov %music,8
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Resistance is useless... Become a victim to my artificial genitals."
mov $mogaku_sel2,"You cannot break free with just that little force..."
mov $mogaku_sel3,"Resistance is useless... Become a victim to my artificial genitals."
mov $mogaku_sel4,"You cannot break free with just that little force..."
mov $mogaku_sel5,"Resistance is useless... Become a victim to my artificial genitals."
mov $mogaku_dassyutu1,"To be able to exceed the force of my body..."
mov $mogaku_dassyutu2,"Indeed, I can't deal with you using ordinary means, can I?"
mov $mogaku_earth_dassyutu1,"To be able to exceed the force of my body..."
mov $mogaku_earth_dassyutu2,"Indeed, I can't deal with you using ordinary means, can I?"
mov $half_s1,"My unmatched stimulation will bring you to orgasm."
mov $half_s2,"Resign yourself, and come in my hands..."
mov $kiki_s1,"You seem to be nearing your limit."
mov $kiki_s2,"I shall take your semen as a sample."
mov %end_n,15
mov %exp_minus,750000
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,29
name $name
>This is the first time an outsider has seen my body...\
>I am the manager of this Drain Lab, Laplace.\
name ""
name "Luka"
>No way... Your whole body is a machine?\
name ""
>I've seen a few machine monsters before...@
>But they were monsters at their core, with machine parts added.\
>Even Drainroid, who was mostly machine, still had some real flesh and blood in her.\
>But the girl in front of me...\
name "Luka"
>I don't feel any sensation of life from you.@
>Are you a complete machine...?\
name ""
name $name
>Yes... I am the first ever android created completely from scratch.@
>I am a complete machine.@> There is no living part in my body.\
>My brain and my OS is linked with this laboratory.@
>Everything here is under my control.\
name ""
>The machines on the wall move as she speaks, clearly reacting to her commands...\
name "Luka"
>In other words...@>You're the Drain Lab itself!\
name ""
name $name
>Despite your dimwitted look, you are quick.@
>I myself am this Drain Lab.\
name ""
goto *common_main



*laplace_v

gosub *face3
name $name
>It can't be...@
>In the end, it was as Promestein said...\
name ""
>Laplace loses the will to fight!\
mov %viclose,1:gosub *victory
mov %getexp,400000:gosub *lvup
mov %2413,1
goto *sean0388



*laplace_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>So you surrender?@
>Very well then...@>First, shall I collect your semen?\
name ""
goto *laplace_a



*laplace_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *laplace_kousan
if %cmd1=16 goto *laplace_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *laplace_main



*laplace_a

if %hanyo6=1 gosub *laplace_a6:goto *common_main
if %kousoku=1 gosub *laplace_a7:goto *common_main
rnd2 %ransu,1,7
if %ransu=1 gosub *laplace_a1:goto *common_main
if %ransu=2 gosub *laplace_a2:goto *common_main
if %ransu=3 gosub *laplace_a3:goto *common_main
if %ransu=4 gosub *laplace_a4:goto *common_main
if %ransu=5 gosub *laplace_a5:goto *common_main
if %ransu>5 && %owaza_count1a>30 gosub *laplace_a6m:goto *common_main
skip -7



*laplace_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My fingers can easily bring men to climax."
if %ransu=2 mov $sel1,"Give your semen to my finger units."
if %ransu=3 mov $sel1,"My finger skills have excellent programming."
name $name
eng $sel1:$sel6\
name ""
skillname "Laplace's Fingers"
dwave 1,"se\ero_koki1.ogg"
lsp 690,":a;chara\laplace_ct01.bmp",0,0:print 10,500
>Laplace's delicate fingers slowly stroke Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4015
if %nanido<2 damage 200,220
if %nanido=2 damage 225,245
if %nanido=3 damage 250,270
dwave 1,"se\ero_koki1.ogg"
>All ten fingertips stroke the tip of Luka's penis!
if %nanido<2 damage 200,220
if %nanido=2 damage 225,245
if %nanido=3 damage 250,270
skillname ""
if %mylife=0 sub %stack,1:return *laplace_h1
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*laplace_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My mouth was designed to please men, as well."
if %ransu=2 mov $sel1,"Pour your semen in my mouth unit."
if %ransu=3 mov $sel1,"Can you withstand my mouth programming?"
name $name
eng $sel1:$sel6\
name ""
skillname "Three Lip Style"
dwave 1,"se\ero_buchu2.ogg"
>Laplace sucks in Luka's penis, and coils her tongue around it!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4016
if %nanido<2 damage 210,230
if %nanido=2 damage 235,255
if %nanido=3 damage 260,280
dwave 1,"se\ero_buchu2.ogg"
>The intense suction of her mouth is like a vacuum!
if %nanido<2 damage 210,230
if %nanido=2 damage 235,255
if %nanido=3 damage 260,280
skillname ""
if %mylife=0 sub %stack,1:return *laplace_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*laplace_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Due to design issues, the breasts were scaled back some..."
if %ransu=2 mov $sel1,"Some men enjoy these types of breasts."
if %ransu=3 mov $sel1,"The size makes it difficult, but rubbing should be enough."
name $name
eng $sel1:$sel6\
name ""
skillname "Ultrasmall Breast Units"
dwave 1,"se\ero_sigoki1.ogg"
>Laplace rubs Luka's penis against her ultra small breasts!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4017
if %nanido<2 damage 220,240
if %nanido=2 damage 245,265
if %nanido=3 damage 270,290
dwave 1,"se\ero_sigoki1.ogg"
>She rubs the tip of his penis against her nipples!
if %nanido<2 damage 220,240
if %nanido=2 damage 245,265
if %nanido=3 damage 270,290
skillname ""
if %mylife=0 sub %stack,1:return *laplace_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*laplace_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I shall stimulate you from behind with a male insertion device."
if %ransu=2 mov $sel1,"This alone can bring forth orgasms."
if %ransu=3 mov $sel1,"I shall violate you from behind."
name $name
eng $sel1:$sel6\
name ""
skillname "S-Type Mellow Enema"
dwave 1,"se\ero_pyu1.ogg"
lsp 690,":a;chara\laplace_ct21.bmp",0,0:print 10,500
>Laplace pushes a vibration instrument into Luka's ass!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4018
if %nanido<2 damage 230,250
if %nanido=2 damage 255,275
if %nanido=3 damage 280,300
dwave 1,"se\ero_pyu1.ogg"
>An intense vibration is pushed against Luka's prostate!
if %nanido<2 damage 230,250
if %nanido=2 damage 255,275
if %nanido=3 damage 280,300
skillname ""
if %mylife=0 sub %stack,1:return *laplace_h4
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*laplace_a5

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I shall use this hole to forcibly extract semen."
if %ransu=2 mov $sel1,"This drain hole has exceeded all performance tests in my Drain Lab."
if %ransu=3 mov $sel1,"Devote your semen to my hole."
name $name
eng $sel1:$sel6\
name ""
skillname "L-Type Drain Hole"
dwave 1,"se\ero_buchu1.ogg"
lsp 690,":a;chara\laplace_ct11.bmp",0,0:print 10,500
>Laplace pushes a semen squeezing device onto Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4019
if %nanido<2 damage 240,260
if %nanido=2 damage 265,285
if %nanido=3 damage 290,310
dwave 1,"se\ero_syokusyu2.ogg"
>Activating the hole, the inner walls wriggle around Luka's penis!
if %nanido<2 damage 240,260
if %nanido=2 damage 265,285
if %nanido=3 damage 290,310
skillname ""
if %mylife=0 sub %stack,1:return *laplace_h5
if %kousan<2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*laplace_a6m

add %stack,1
name $name
>Starting restriction program...@
>Charging to full power.\
name ""
skillname "Power Charge"
dwave 1,"se\power.ogg"
>Laplace draws up the power from the Laboratory!\
skillname ""
name $name
>...Charge complete.@
>Booting up artificial genitals...\
name ""
mov %hanyo6,1
sub %stack,1
return



*laplace_a6

add %stack,1
mov %hanyo6,0
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 5
name $name
>I shall take your freedom, and then violate you.@
>Even the most powerful of monsters cannot match the horsepower I can put out!\
name ""
skillname "Forcible Restriction"
lsp 690,":c;chara\laplace_ha11.bmp",0,0:print 10,500
eng "Laplace forces Luka down, and sits on top of him!":$sel6/
if %daten>0 mov %tamek,1:goto *skill22x
\
mov %kousoku,1:gosub *status_print
>Laplace is holding Luka down!\
skillname ""
name $name
>Now I shall use my artificial vagina.@
>It's optimized for reverse cowgirl style sex.@>Prepare yourself...\
name ""
mov %genmogaku,99
sub %stack,1
return



*laplace_a7

add %stack,1
>Luka is being held down by Laplace...\
name $name
>Now, shall I force you to ejaculate inside my artificial vagina?\
name ""
skillname "Artificial Pussy: LO-LI"
dwave 1,"se\ero_pyu1.ogg"
lsp 690,":c;chara\laplace_ha12.bmp",0,0:print 10,500
lsp 690,":c;chara\laplace_ha13.bmp",0,0:print 10,500
>Laplace drops down, forcing Luka into her!
skillcount3 4020
mov %damage_kotei,1
damage 500,600
mov %kousoku,1:gosub *status_print
>Luka is being raped by Laplace!\
skillname ""
if %mylife=0 sub %stack,1:return *laplace_h6
name "Luka"
>Ah...!@> Ahh!\
name ""
>Laplace's tight vagina clamps down around me, sending sparks of pleasure through my body!\
name $name
>My artificial vagina was created using the heights of modern technology.\
>Even a high level Succubus' vagina is inferior compared to mine.\
name ""
sub %stack,1
goto *laplace_a8



*laplace_a8

add %stack,1
>Luka is being raped by Laplace...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I can freely control my vagina.":mov $sel2,"Laplace's artificial vaginal walls rub against Luka's penis!"
if %ransu=2 mov $sel1,"Shall I increase my tightness?":mov $sel2,"Laplace's artificial vagina tightens around Luka's penis!"
if %ransu=3 mov $sel1,"Shall I vibrate it?":mov $sel2,"Laplace's artificial vagina vibrates around Luka's penis!"
if %ransu=4 mov $sel1,"Please, feel every inch of my vagina.":mov $sel2,"Laplace's artificial vaginal walls start to move, massaging Luka's penis!"
if %ransu=5 mov $sel1,"Shall I secrete some lubrication? It will feel nice and warm.":mov $sel2,"Liquid leaks from Laplace's artificial vagina, lubricating her movements!"
name $name
eng $sel1:$sel6\
name ""
skillname "Artificial Pussy: LO-LI"
dwave 1,"se\ero_chupa4.ogg"
eng $sel2:$sel6
skillcount3 4020
mov %damage_kotei,1
damage 500,600
skillname ""
if %mylife=0 sub %stack,1:return *laplace_h7
sub %stack,1
goto *laplace_a8



*laplace_onedari

mov $list1,"Laplace's Fingers"
if %4015>0 mov %list_num1,1
mov $list2,"Three Lip Style"
if %4016>0 mov %list_num2,1
mov $list3,"Ultrasmall Breast Units"
if %4017>0 mov %list_num3,1
mov $list4,"S-Type Mellow Enema"
if %4018>0 mov %list_num4,1
mov $list5,"L-Type Drain Hole"
if %4019>0 mov %list_num5,1
mov $list6,"Artificial Pussy: LO-LI"
if %4020>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *laplace_onedari1
if %cmd1=12 goto *laplace_onedari2
if %cmd1=13 goto *laplace_onedari3
if %cmd1=14 goto *laplace_onedari4
if %cmd1=15 goto *laplace_onedari5
if %cmd1=16 goto *laplace_onedari6
if %cmd1=-1 goto *laplace_main
goto *laplace_onedari



*laplace_onedari1

gosub *onedari_syori
name $name
>You want me to bring you to climax with my fingers?@
>Then I shall induce an orgasm.\
name ""
gosub *laplace_a1
skip -1



*laplace_onedari2

gosub *onedari_syori
name $name
>You want me to bring you to climax with my lips?@
>Then I shall induce an orgasm.\
name ""
gosub *laplace_a2
skip -1



*laplace_onedari3

gosub *onedari_syori
name $name
>You want me to bring you to climax with my breasts?@
>Then I shall induce an orgasm.\
name ""
gosub *laplace_a3
skip -1



*laplace_onedari4

gosub *onedari_syori
name $name
>You want me to bring you to climax with my anal vibrator?@
>Then I shall induce an orgasm.\
name ""
gosub *laplace_a4
skip -1



*laplace_onedari5

gosub *onedari_syori
name $name
>You want me to bring you to climax with my drain hole?@
>Then I shall induce an orgasm.\
name ""
gosub *laplace_a5
skip -1



*laplace_onedari6

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You wish to try my artificial vagina?@
>Then I shall induce an orgasm.\
name ""
if %kousoku=0 gosub *laplace_a6
gosub *laplace_a7
skip -1



*laplace_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\laplace_ct02.bmp",0,0
lsp 693,":a;chara\laplace_bk03.bmp",0,0
lsp 694,":a;chara\laplace_bk04.bmp",0,0
gosub *syasei2
>As Laplace's deft fingers stroke Luka's penis, he comes, covering her small hands with semen.\
mov %viclose,1:gosub *lose
mov %2713,%2713+1:if %2713=1 mov %count_koenemy,%count_koenemy+1
if %2713>%count_most mov %count_most,%2713:mov $count_mostname,$name
count 5,13
mov $bad1,"Laplace used her fingers to force Luka to come."
gosub *face2
name $name
>I've confirmed your ejaculation with my hand.\
>The time required to induce your ejaculation is below average.@> But the semen quality is high.\
name ""
csp 690:print 10,500
goto *laplace_h



*laplace_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\laplace_bk01.bmp",0,0
gosub *syasei2
>As Laplace sucks on Luka's penis with her mouth unit, he comes, filling it with semen.\
mov %viclose,1:gosub *lose
mov %2713,%2713+1:if %2713=1 mov %count_koenemy,%count_koenemy+1
if %2713>%count_most mov %count_most,%2713:mov $count_mostname,$name
count 4,13
mov $bad1,"Laplace used her mouth to force Luka to come."
gosub *face2
name $name
>I've confirmed your ejaculation with my mouth.\
>The time required to induce your ejaculation is below average.@> But the semen quality is high.\
name ""
goto *laplace_h



*laplace_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\laplace_bk02.bmp",0,0
gosub *syasei2
>As Laplace rubs Luka's penis against her smooth breasts, he comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2713,%2713+1:if %2713=1 mov %count_koenemy,%count_koenemy+1
if %2713>%count_most mov %count_most,%2713:mov $count_mostname,$name
count 7,13
mov $bad1,"Laplace used her breasts to force Luka to come."
gosub *face2
name $name
>I've confirmed your ejaculation with my breasts.\
>The time required to induce your ejaculation is below average.@> But the semen quality is high.\
name ""
goto *laplace_h



*laplace_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\laplace_bk05.bmp",0,0
lsp 690,":a;chara\laplace_ct22.bmp",0,0
gosub *syasei2
>As the vibrator presses against Luka's prostate, he comes, covering Laplace's stomach with his semen.\
mov %viclose,1:gosub *lose
mov %2713,%2713+1:if %2713=1 mov %count_koenemy,%count_koenemy+1
if %2713>%count_most mov %count_most,%2713:mov $count_mostname,$name
count 9,13
mov $bad1,"Laplace used her anal vibrator to force Luka to come."
gosub *face2
name $name
>I've confirmed your ejaculation with my prostate stimulation unit.\
>The time required to induce your ejaculation is below average.@> But the semen quality is high.\
name ""
csp 690:print 10,500
goto *laplace_h



*laplace_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 697,":a;chara\laplace_bk07.bmp",0,0
lsp 690,":a;chara\laplace_ct12.bmp",0,0
gosub *syasei2
>As the drain hole sucks on Luka's penis, he comes, filling it with semen.\
mov %viclose,1:gosub *lose
mov %2713,%2713+1:if %2713=1 mov %count_koenemy,%count_koenemy+1
if %2713>%count_most mov %count_most,%2713:mov $count_mostname,$name
count 27,13
mov $bad1,"Laplace forced Luka to come with her drain hole."
gosub *face2
name $name
>I've confirmed your ejaculation with my drain hole.\
>The time required to induce your ejaculation is below average.@> But the semen quality is high.\
name ""
csp 690:print 10,500
goto *laplace_h



*laplace_h6

mov %ikigoe,3:gosub *ikigoe
name $name
>A climax already?@>This is unprecedented speed...\
name ""
gosub *syasei1
lsp 690,":c;chara\laplace_ha14.bmp",0,0
gosub *syasei2
>The moment Luka is forced into Laplace's tiny vagina, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2713,%2713+1:if %2713=1 mov %count_koenemy,%count_koenemy+1
if %2713>%count_most mov %count_most,%2713:mov $count_mostname,$name
count 2,13
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Laplace forced Luka to come the moment of insertion."
gosub *face2
name $name
>Orgasm after insertion was achieved in three seconds.@>This is now the lowest time recorded.\
>Both your sexual techniques and endurance are staggeringly low.\
name ""
csp 690:print 10,500
goto *laplace_h



*laplace_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":c;chara\laplace_ha14.bmp",0,0
gosub *syasei2
>Unable to take Laplace's tiny vagina any longer, Luka comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2713,%2713+1:if %2713=1 mov %count_koenemy,%count_koenemy+1
if %2713>%count_most mov %count_most,%2713:mov $count_mostname,$name
count 2,13
mov $bad1,"Laplace forced Luka to come with her artificial vagina."
gosub *face2
name $name
>I've confirmed your ejaculation with my artificial vagina.\
>Your semen is quite dense, with high volume.\
name ""
csp 690:print 10,500
goto *laplace_h



*laplace_h

mov $tatie2,"laplace_st21"
mov $bad2,"Luka is trapped in the Drain Lab and treated as a guinea pig for the rest of his life."
if %2713=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
name $name
>Now then, let us begin the full scale extraction.@
>First I will restrict your movement...\
name ""
>One of her arms grabs my body, and places me on all fours on the ground.@
>Coming up from behind, Laplace stares at my embarrassing position.\
name "Luka"
>S...Stop!@
>Get off me!\
name ""
name $name
>If you struggle, you'll interfere with my work.@
>Please settle down.@>Otherwise...\
name ""
name "Luka"
>Ahh!\
name ""
>Laplace's finger gently pushes into my ass.@
>I instantly tense up, and stop struggling.\
name $name
>From now on, if you struggle, I'll move my finger around inside your ass.\
>Now then... Parallel to the semen extraction, I wish to experiment some.@
>I was given some strange items from a tool shop in a conquered town...\
name ""
cspl 690,699
lsp 700,":c;chara\laplace_hb11.bmp",0,0:print 10,500
>Laplace pulls out a pink masturbation device called an onahole.@
>It's an artificial vagina sold in shady shops...\
name $name
>As I was created solely to extract male semen, these other types of extraction devices have piqued my interest.\
>But could such a primitive device as this truly be effective...?@
>I'll test it out on your body.\
name ""
name "Luka"
>S...Stop... Ah...\
name ""
mov %hseanwave,1:hseanwave
lsp 700,":c;chara\laplace_hb12.bmp",0,0:print 10,500
>Laplace slowly presses my penis into the onahole.\
>The soft texture rubs against my penis, the lubricating liquid inside easily letting me slip inside.\
name "Luka"
>Ah!\
name ""
name $name
>It seems to just be grooved rubber...@
>Does it still feel enjoyable?\
name ""
lsp 700,":c;chara\laplace_hb14.bmp",0,0:print 10,500
>Laplace starts to slowly move the onahole back and forth.@
>The light friction against the ribbed rubber slowly heats up the lubricating liquid.\
>As her smooth hand movements continue, I unconsciously shake my waist in response.\
name "Luka"
>Ahh!\
name ""
name $name
>I see now...@
>So these primitive instruments are good enough for a baser creature's genitals.\
name ""
>Laplace keeps on slowly moving the onahole back and forth, all while her indifferent face looks on.\
name "Luka"
>Ahhh!!!\
name ""
gosub *syasei1
lsp 700,":c;chara\laplace_hb15.bmp",0,0
gosub *syasei2
>Almost like an accidental ejaculation, I come inside the rubber sex toy.\
mov %hseanwave,0:hseanwave
name $name
>You came inside this simple toy...@
>I see, it's good enough for a man.\
name ""
name "Luka"
>Ah...\
name ""
lsp 700,":c;chara\laplace_hb16.bmp",0,0:print 10,500
>Laplace unceremoniously takes off the onahole, and throws it onto the ground.@
>In its place, she brings forth one of the pieces of equipment in the lab.\
name $name
>But it's far from efficient.@
>I'll use my own equipment, after all.\
>It's clearly far better than a low level penis like yours requires, but this is the quickest way.\
name ""
lsp 700,":c;chara\laplace_hb17.bmp",0,0:print 10,500
>Without another word, Laplace slowly forces my penis into one of the holes at the end of a piece of equipment.\
name "Luka"
>Ahh...\
name ""
>The wet, ribbed interior flesh rubs against my penis as she forces me in.@
>Even though she hasn't done anything yet, it already feels incredible...\
name $name
>...This is a milking machine for semen processing.@
>It comes equipped with vibration and rotation functions.\
>It is tuned to induce sixty ejaculations per hour.@
>Though males generally break before that threshold is reached.\
name ""
name "Luka"
>N...No way...\
name ""
name $name
>That's why we call it a milking machine.\
>Normally that term is used for cows...@> But here, you are the same as a domestic animal.\
>But unlike cows, you humans get pleasure from this.@
>What a great side benefit for you as cattle, don't you agree?\
name ""
name "Luka"
>Aiee!\
name ""
>Being treated as nothing but cattle for my semen...@
>The horrifying thought makes my body shake.\
name $name
>...Mounting completed.@
>You're ready to be milked.\
>The moment the milking begins, your life as a human is over.@
>Are you prepared to start your new life as livestock?\
name ""
name "Luka"
>Ahh...\
name ""
>Completely inside the device, I can feel my glans pressing against the soft, elastic interior walls.@
>The soft fleshy material gently squeezes, as if forming to my shape.\
name $name
>Now to start...\
name ""
>Before Laplace even starts the machine, my waist starts to shake as my lower body goes numb.\
name "Luka"
>Ahh... It feels good...@
>Ah...!\
name ""
gosub *syasei1
lsp 700,":c;chara\laplace_hb18.bmp",0,0
gosub *syasei2
>Unable to stop myself, I ejaculate.@
>Just the feeling of having the milking machine attached was too much for me to take.\
name $name
>...I haven't even started the milking yet.@
>Your low grade penis is very impatient.\
>You've already contaminated it with semen, just from the mounting...\
name ""
name "Luka"
>Ahh...\
name ""
>A sensation of misery washes through me as I get a taste of my new life as livestock...\
name $name
>Now then, it's time to start the milking.@
>Your life as livestock begins now, so get ready...\
>Milking, start...\
name ""
mov %hseanwave,24:hseanwave
lsp 700,":c;chara\laplace_hb19.bmp",0,0:print 10,500
name "Luka"
>Ahhh!!!\
name ""
>A slow whirr fills the air after she flips the switch.@
>The soft fleshy walls start to move up and down, stroking my penis.\
>Picking up speed, it turns into an incredible piston movement.\
name $name
>The unit that houses your tip has its own method of operation.@
>It's programmed to change stimulations to induce maximum amount of ejaculations.\
name ""
name "Luka"
>Ahyaa!\
name ""
>The wet flesh around my glans starts to rotate, the tiny bumps stroking and massaging my sensitive tip at an incredible speed.\
name "Luka"
>Ahhh!!!\
name ""
gosub *syasei1:gosub *syasei2
>The intense stimulation forces me to come in an instant.@
>A wave of shame rolls through me at a machine making me come so fast.\
name $name
>As I thought, you still didn't last.@
>Your low grade penis doesn't deserve this advanced equipment.\
>Though it is good that collecting your semen is so easy.\
name ""
>Laplace continues operating the machine without any mercy.\
>The piston movements and rotation around my glans continue at an intense rate, right after my orgasm.\
name $name
>Now that I think about it...@> That rubber toy was a failure.@
>It imitated a female's vagina, but it missed the true essence.\
>This is completely different from that toy.\
>Rotational movement, varying pressure, self lubricating...@
>Everything is designed for managing the male sexual function, not to replicate a female.\
name ""
name "Luka"
>Ah!@>Ahh!\
name ""
gosub *syasei1:gosub *syasei2
>The incredible stimulation leads me to another orgasm.@
>This devilish machine is able to make me climax without rest...\
name "Luka"
>Please stop... Help me...!\
name ""
name $name
>You still think you're human?@
>The crying of livestock doesn't influence their treatment.\
name ""
name "Luka"
>Hyaa!\
name ""
gosub *syasei1:gosub *syasei2
>The machine leads me to another quick orgasm.@
>Completely helpless, I can't do anything but entrust myself to this milking machine...\
>When my penis slowly withers, the forced rotational movement makes it hard again.@
>And as soon as it's erect, the rotation around my glans leads me to another orgasm...\
name "Luka"
>Stop... Aiee!\
name ""
gosub *syasei1:gosub *syasei2
>I explode inside the machine again.@
>It won't allow me to go soft... As soon as I go limp, it makes me forcibly hard again.\
name "Luka"
>Hyaaa! Stop already!@
>I'm going to die!\
name ""
name $name
>I've seen many livestock broken before.@
>When they are still able to cry human words, they're still in the safety zone.\
name ""
name "Luka"
>Hya!@> Aiieee!\
name ""
gosub *syasei1:gosub *syasei2
>I don't even know how many times I've been forced to come now.@
>This machine keeps forcibly bringing me to orgasm and milking out semen, as if I was livestock.\
>After a while, my penis pulses, but nothing comes out.\
name "Luka"
>Stop... No more is coming out...\
name ""
>The machine keeps moving and stimulating me, even though nothing is coming out.\
name $name
>...Are you truly empty?@
>I will need to inspect it.\
name ""
mov %hseanwave,0:hseanwave
lsp 700,":c;chara\laplace_hb22.bmp",0,0:print 10,500
>Laplace pulls away the milking machine.@
>At the same time, she pokes an extremely thin tube into my urethral hole.\
name $name
>This is a special catheter I'll use to check your testicular state.@
>If you're unable to produce more semen, you'll be disposed of.\
name ""
name "Luka"
>Ah!@>N...No way...!\
name ""
>The inhumane treatment sends chills down my spine.@
>This is just more misery in being livestock...\
>My body squirms as the indescribable feeling of my penis being stimulated from the inside runs through me.\
lsp 700,":c;chara\laplace_hb23.bmp",0,0:print 10,500
name $name
>After searching, I've confirmed there's still more semen.@
>You don't need to be disposed of yet.\
name ""
name "Luka"
>Ahh...@> I feel strange...\
name ""
>The feeling of her small tube fascinates my mind.@
>It feels like the semen moving through my penis during an ejaculation, only it's an unending sensation.\
name "Luka"
>Haa... Ahh...\
name ""
name $name
>...This is just an inspection, not semen processing.@
>That role is handled by the milking machine.\
name ""
name "Luka"
>No... I'm coming...@
>Ahh!\
name ""
gosub *syasei1
lsp 700,":c;chara\laplace_hb24.bmp",0,0
gosub *syasei2
>My body twitches as I reach another climax, my white semen pushing against the thin tube inside my penis.\
name "Luka"
>Ahh...\
name ""
name $name
>A waste of semen...@>And you dirtied up my special catheter.@
>Misbehaving cattle don't deserve any sort of restraint in their discipline.\
name ""
name "Luka"
>S...Stop... Ahh!\
name ""
>Laplace pulls out the catheter, and attaches multiple instruments to my lower body.\
lsp 700,":c;chara\laplace_hb25.bmp",0,0:print 10,500
>The nightmarish milking machine sucks in my penis.@
>At the same time, something like a tube is screwed into my ass.\
name $name
>This specialized equipment is for stimulating your prostate.@> It isn't used for semen processing that often, though...\
>I believe humans would normally say it's reserved for "Discipline".\
name ""
name "Luka"
>S...Stop... Ahyaaa!\
name ""
mov %hseanwave,15:hseanwave
lsp 700,":c;chara\laplace_hb26.bmp",0,0:print 10,500
>A strange feeling attacks me from behind as the tube presses against my prostate.@
>I can't see what's going on, but the powerful waves of pleasure run through me from behind.\
name "Luka"
>Aiee!\
name ""
gosub *syasei1:gosub *syasei2
>I'm brought to a forced orgasm in no time.@
>The fear mixes with shame as the unknown stimulation keeps attacking me.\
name "Luka"
>Stop... Hyaaa!@
>Aiieee!!!\
name ""
name $name
>You're still acting as if you were human?@
>You're just simple livestock.@>Livestock that stained my expensive equipment with semen...\
name ""
name "Luka"
>Hyaaaa!!!\
name ""
lsp 700,":c;chara\laplace_hb27.bmp",0,0:print 10,500
>Laplace sticks her own finger inside my ass, pressing against my prostate!\
name "Luka"
>Hyaaaaa!!!\
name ""
gosub *syasei1:gosub *syasei2
>It's as if it's an ejaculation switch.@
>As soon as she presses against it, I come into the milking machine.\
name $name
>Make sure you learn your lesson during this milking.\
>You are livestock.@
>You exist only to have your semen milked.\
name ""
name "Luka"
>Ah... Hyaaa!!!\
name ""
>As the milking machine starts to rotate, the intense stimulation forces me to another ejaculation.\
gosub *syasei1:gosub *syasei2
name "Luka"
>Hyaa...\
name ""
>I'm completely helpless...@> There's nothing I can do against this milking.\
name $name
>Have you realized it yet?@>You are livestock.\
name ""
name "Luka"
>Aieeee!!!\
name ""
gosub *syasei1:gosub *syasei2
name $name
>He seems to have lost his human reason.@
>Only a little more until he's completely an animal...\
name ""
name "Luka"
>Aieeeeeeeeee!!!\
name ""
gosub *syasei1:gosub *syasei2
>Ejaculating one time after another, I slowly lose my mind and become livestock.@
>A pitiful existence that only exists to be milked of semen.\
>Giving up all thoughts of being human, I entrust everything to this milking machine in the Drain Lab...\
mov %hseanwave,0:hseanwave
gosub *anten
>.............\
goto *badend



*fermesara_start

mov $name,"Ferme Sara"
mov $name2,"Ferme Sara"
mov $lavel,"fermesara"
mov $tatie1,"fermesara_st01"
mov $tatie2,"fermesara_st01"
mov $tatie3,"fermesara_st01"
mov $tatie4,"fermesara_h1"
mov $haikei,"bg202"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,22000
if %nanido=2 mov %max_enemylife,27000
if %nanido=3 mov %max_enemylife,32000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,1
mov %alice_skill1,100
mov %alice_skill2,50
mov %alice_skill3,50
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"You won't escape from my coffin..."
mov $mogaku_sel2,"There's no point struggling..."
mov $mogaku_sel3,"I'll suck as you struggle and gasp..."
mov $mogaku_sel4,"You aren't allowed to resist..."
mov $mogaku_sel5,"Do you wish to finish while you struggle?"
mov $mogaku_dassyutu1,"You escaped from my coffin...?"
mov $mogaku_dassyutu2,"That power isn't human..."
mov $mogaku_earth_dassyutu1,"You escaped from my coffin...?"
mov $mogaku_earth_dassyutu2,"That power isn't human..."
mov $half_s1,"My sexual techniques make all men helpless..."
mov $half_s2,"You, too, will be intoxicated by it."
mov $kiki_s1,"Your endurance is nearly done with..."
mov $kiki_s2,"Now, I'll finish you."
mov %end_n,15
mov %exp_minus,0
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,4
mov %owaza_count2a,3
mov %owaza_count2b,3
name $name
>Intruders... You will die here...\
name ""
name "Luka"
>What a chilling feeling...@
>She doesn't look like a normal mummy...\
name ""
>The eerie feeling of her magic power is leagues above other zombies I've felt.\
>This must be a powerful undead monster girl created by La Croix...\
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\fermesara_st01.bmp",180,0:print 10,500
name "Alice"
>This mummy... Seems to have been made from the corpse of a powerful human.\
>Her magic power is above even senior monsters!\
name ""
name "Luka"
>Yes, I know...\
name ""
>I can't think of her as some mere zombie, and lower my guard!\
csp 701
gosub *face1
goto *common_main



*fermesara_v

gosub *face3
name $name
>Finally...@
>A long sleep...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Particles radiate off Ferme Sara's body as she goes limp on the ground!\
mov %viclose,1:gosub *victory
mov %getexp,220000:gosub *lvup
mov %2405,1
goto *sean0390



*fermesara_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>You surrendered...?@
>Then I will suck out your semen...\
name ""
goto *fermesara_a



*fermesara_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *fermesara_kousan
if %cmd1=16 goto *fermesara_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *fermesara_main



*fermesara_a

if %kousoku=1 rnd2 %ransu,1,3
if %kousoku=1 && %ransu<3 gosub *fermesara_a5:goto *common_main
if %kousoku=1 && %ransu=3 && %owaza_count3a>3 gosub *fermesara_a6:goto *common_main
if %kousoku=1 skip -3
rnd2 %ransu,1,5
if %ransu<3 gosub *fermesara_a1:goto *common_main
if %ransu=3 && %owaza_count2a>4 && %status=0 gosub *fermesara_a2:goto *common_main
if %ransu=4 && %owaza_count2b>4 && %status=0 gosub *fermesara_a3:goto *common_main
if %ransu=5 && %owaza_count1a>5 gosub *fermesara_a4:goto *common_main
skip -5



*fermesara_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Be finished..."
if %ransu=2 mov $sel1,"Give your semen to my hand..."
if %ransu=3 mov $sel1,"No man can resist my hand techniques..."
name $name
eng $sel1:$sel6\
name ""
skillname "Gaia's Handjob"
dwave 1,"se\ero_koki1.ogg"
>Ferme Sara grabs hold of Luka's penis with a firm grip!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4021
if %nanido<2 damage 110,120
if %nanido=2 damage 130,140
if %nanido=3 damage 150,160
dwave 1,"se\ero_koki1.ogg"
>Her bandages coil and tighten around his penis as she strokes!
if %nanido<2 damage 110,120
if %nanido=2 damage 130,140
if %nanido=3 damage 150,160
dwave 1,"se\ero_koki1.ogg"
>Her bandage covered palm rubs the tip of his penis!
if %nanido<2 damage 110,120
if %nanido=2 damage 130,140
if %nanido=3 damage 150,160
skillname ""
if %mylife=0 sub %stack,1:return *fermesara_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*fermesara_a2

add %stack,1
mov %owaza_count2a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Be defeated in my mouth..."
if %ransu=2 mov $sel1,"You'll finish in my mouth..."
if %ransu=3 mov $sel1,"Burst in pleasure..."
name $name
eng $sel1:$sel6\
name ""
skillname "Judgement Fellatio"
dwave 1,"se\ero_buchu2.ogg"
>Ferme Sara sucks on Luka's penis through a gap in her bandages!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4022
if %nanido<2 damage 120,130
if %nanido=2 damage 140,150
if %nanido=3 damage 160,170
dwave 1,"se\ero_pyu1.ogg"
>Her tongue licks Luka's penis clean!
if %nanido<2 damage 120,130
if %nanido=2 damage 140,150
if %nanido=3 damage 160,170
dwave 1,"se\ero_pyu1.ogg"
>Magic filled saliva covers Luka's penis, spreading a numbing sensation through his body!
if %nanido<2 damage 120,130
if %nanido=2 damage 140,150
if %nanido=3 damage 160,170
if %status=0 mov $sel1,"Luka has been paralyzed!"
if %status=2 mov $sel1,"Luka is paralyzed..."
mov %status,2:gosub *status_print
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *fermesara_h2
rnd2 %status_turn,1,2
if %nanido=2 rnd2 %status_turn,1,2
if %nanido=3 rnd2 %status_turn,2,3
sub %stack,1
return



*fermesara_a3

add %stack,1
mov %owaza_count2b,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"This forbidden technique will make you swoon..."
if %ransu=2 mov $sel1,"Become another captive of these breasts..."
if %ransu=3 mov $sel1,"Cover my chest in your semen..."
name $name
eng $sel1:$sel6\
name ""
skillname "Isis' Lovemaking"
dwave 1,"se\ero_sigoki1.ogg"
>Ferme Sara sandwiches Luka's penis between her breasts!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4023
if %nanido<2 damage 120,130
if %nanido=2 damage 140,150
if %nanido=3 damage 160,170
dwave 1,"se\ero_sigoki1.ogg"
>Her bandages wrap around his penis as she squeezes him!
if %nanido<2 damage 120,130
if %nanido=2 damage 140,150
if %nanido=3 damage 160,170
dwave 1,"se\ero_sigoki1.ogg"
>The soft feeling of her breasts immerse Luka in ecstasy!
if %nanido<2 damage 120,130
if %nanido=2 damage 140,150
if %nanido=3 damage 160,170
if %status=0 mov $sel1,"Luka has been immersed in ecstasy!"
if %status=1 mov $sel1,"Luka has been immersed in ecstasy..."
mov %status,1:gosub *status_print
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *fermesara_h3
rnd2 %status_turn,1,2
if %nanido=2 rnd2 %status_turn,1,2
if %nanido=3 rnd2 %status_turn,2,3
sub %stack,1
return



*fermesara_a4

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 8
name $name
if %first_sel1=1 skip 3
>I'll squeeze you to nothing with my ancient technique...@
skip 2
>I'll try this again...@
>Now, finish in my coffin...\
name ""
skillname "Ancient Sexual Style: Burial"
dwave 1,"se\ero_makituki3.ogg"
eng "Luka is pushed into Ferme Sara's coffin as bandages wrap around him!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>Luka has been bound by Ferme Sara!\
skillname ""
name $name
if %first_sel1=1 skip 3
>Only your withered corpse will leave this coffin...@
skip 2
>This time, you won't escape...@
>I won't even leave a drop...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,2
if %earth=0 && %nanido=2 mov %genmogaku,2
if %earth=0 && %nanido=3 mov %genmogaku,3
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,1
sub %stack,1
return



*fermesara_a5

add %stack,1
>Luka is being pushed into the coffin...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll leave you a dried up corpse..."
if %ransu=2 mov $sel1,"I'll squeeze out your life..."
if %ransu=3 mov $sel1,"I'll keep squeezing it out until you die..."
name $name
eng $sel1:$sel6\
name ""
skillname "Ancient Sexual Style: Burial"
dwave 1,"se\ero_chupa6.ogg"
lsp 690,":a;chara\fermesara_ct01.bmp",410,210:print 10,500
>Bandages wrap around Luka's penis and tighten!
>His energy is drained in exchange for pleasure!
skillcount3 4024
if %nanido<2 damage 200,220
if %nanido=2 damage 250,270
if %nanido=3 damage 300,320
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *fermesara_h4
if %kousan<>2 csp 690:print 10,500
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*fermesara_a6

add %stack,1
>Luka is being pushed into Ferme Sara's coffin...\
mov %owaza_count3a,0
if %kousan=2 skip 5
name $name
>I'll squeeze your semen right into me...@
>Wither away as you writhe in pleasure...\
name ""
skillname "Ancient Sexual Style: Rape"
eng "Ferme Sara presses her waist against Luka's, and bring his penis into a gap between her bandages!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
dwave 1,"se\ero_pyu1.ogg"
lsp 690,":a;chara\fermesara_ct11.bmp",0,210:print 10,500
>Luka's penis sinks inside Ferme Sara's vagina!\
skillcount3 4025
mov %damage_kotei,1
damage 500,600
mov %kousoku,2:gosub *status_print
>Luka is being raped by Ferme Sara!\
skillname ""
if %mylife=0 sub %stack,1:return *fermesara_h5
name "Luka"
>Ahhh!\
name ""
>Ferme Sara's surprisingly warm vagina squeezes down on my penis as soon as I'm inside her.\
>Her squirming flesh pulls and sucks on me, as if her vagina was a siphon...\
sub %stack,1
goto *fermesara_a7



*fermesara_a7

add %stack,1
>Luka is being raped by Ferme Sara...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Dry out in my vagina..."
if %ransu=2 mov $sel1,"All men die with a smile as they dry out..."
if %ransu=3 mov $sel1,"You can't withstand my vagina..."
if %ransu=4 mov $sel1,"My vagina will suck up your life..."
if %ransu=5 mov $sel1,"How lucky... To meet your end while being raped..."
name $name
eng $sel1:$sel6\
name ""
skillname "Ancient Sexual Style: Rape"
skillcount3 4025
dwave 1,"se\ero_chupa6.ogg"
>Luka's energy is drained by Ferme Sara's vagina!
mov %damage_kotei,1
damage 500,600
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *fermesara_h6
sub %stack,1
goto *fermesara_a7



*fermesara_onedari

mov $list1,"Gaia's Handjob"
if %4021>0 mov %list_num1,1
mov $list2,"Judgement Fellatio"
if %4022>0 mov %list_num2,1
mov $list3,"Isis' Lovemaking"
if %4023>0 mov %list_num3,1
mov $list4,"Ancient Sexual Style: Burial"
if %4024>0 mov %list_num4,1
mov $list5,"Ancient Sexual Style: Rape"
if %4025>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *fermesara_onedari1
if %cmd1=12 goto *fermesara_onedari2
if %cmd1=13 goto *fermesara_onedari3
if %cmd1=14 goto *fermesara_onedari4
if %cmd1=15 goto *fermesara_onedari5
if %cmd1=-1 goto *fermesara_main
goto *fermesara_onedari



*fermesara_onedari1

gosub *onedari_syori
name $name
>You want to die by my hand?@
>Then stay right there...\
name ""
gosub *fermesara_a1
skip -1



*fermesara_onedari2

gosub *onedari_syori
name $name
>You want to die by my mouth?@
>Then stay right there...\
name ""
gosub *fermesara_a2
skip -1



*fermesara_onedari3

gosub *onedari_syori
name $name
>You want to die by my breasts?@
>Then stay right there...\
name ""
gosub *fermesara_a3
skip -1



*fermesara_onedari4

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want to die by my bandages?@
>Then come inside my coffin...\
name ""
if %kousoku=0 gosub *fermesara_a4
gosub *fermesara_a5
skip -1



*fermesara_onedari5

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want to die by my vagina?@
>Then come inside my coffin...\
name ""
if %kousoku=0 gosub *fermesara_a4
gosub *fermesara_a6
skip -1



*fermesara_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\fermesara_bk03.bmp",0,0
gosub *syasei2
>As Ferme Sara's bandage covered hands stroke Luka's penis, he comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2705,%2705+1:if %2705=1 mov %count_koenemy,%count_koenemy+1
if %2705>%count_most mov %count_most,%2705:mov $count_mostname,$name
count 5,4
mov $bad1,"Ferme Sara forced Luka to come with her hands."
gosub *face2
name $name
>Already finished?@
>Now to drain you dry...\
name ""
goto *fermesara_h



*fermesara_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\fermesara_bk01.bmp",0,0
gosub *syasei2
>As Ferme Sara sucks on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2705,%2705+1:if %2705=1 mov %count_koenemy,%count_koenemy+1
if %2705>%count_most mov %count_most,%2705:mov $count_mostname,$name
count 4,4
mov $bad1,"Ferme Sara forced Luka to come with her mouth."
gosub *face2
name $name
>Already finished?@
>Now to drain you dry...\
name ""
goto *fermesara_h



*fermesara_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\fermesara_bk02.bmp",0,0
gosub *syasei2
>Pressed between Ferme Sara's soft, bandage covered breasts, Luka comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2705,%2705+1:if %2705=1 mov %count_koenemy,%count_koenemy+1
if %2705>%count_most mov %count_most,%2705:mov $count_mostname,$name
count 7,4
mov $bad1,"Ferme Sara forced Luka to come with her breasts."
gosub *face2
name $name
>Already finished?@
>Now to drain you dry...\
name ""
goto *fermesara_h



*fermesara_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\fermesara_ct02.bmp",410,210
gosub *syasei2
>As Ferme Sara's bandages squeeze Luka's penis as he's pushed into her coffin, he comes, covering them with semen.\
mov %viclose,1:gosub *lose2
name "Luka"
>Ahh...\
name ""
name $name
>You still seem to have more in you...@
>Shall I squeeze some more out?\
name ""
skillcount3 4024
skillname "Ancient Sexual Style: Burial"
dwave 1,"se\ero_chupa6.ogg"
>The bandages squeeze tighter around Luka's penis!
mov %damage_kotei,1
damage 200,220
dwave 1,"se\ero_chupa6.ogg"
>The ribbed surface of her bandages stimulates Luka!
mov %damage_kotei,1
damage 200,220
skillname ""
name "Luka"
>Ahhh!\
name ""
name $name
>Finish again quickly...@
>Do you want a little more variety?\
name ""
skillcount3 4024
skillname "Ancient Sexual Style: Burial"
dwave 1,"se\ero_chupa6.ogg"
>The bandages start to vibrate around Luka's penis!
mov %damage_kotei,1
damage 200,220
dwave 1,"se\ero_chupa6.ogg"
>At the same time, they squeeze tighter around his glans!
mov %damage_kotei,1
damage 200,220
skillname ""
name "Luka"
>Haa... G...Going to come...\
name ""
name $name
>Then shall I finish you off?@
>I'll squeeze your weak point...\
name ""
skillcount3 4024
skillname "Ancient Sexual Style: Burial"
dwave 1,"se\ero_chupa6.ogg"
>The many layers of bandages squeeze Luka's penis!
mov %damage_kotei,1
damage 200,220
dwave 1,"se\ero_chupa6.ogg"
>The silky bandages rub against the tip of Luka's penis!
mov %damage_kotei,1
damage 200,220
skillname ""
name "Luka"
>N...No... Ahhh!\
name ""
gosub *syasei1
lsp 690,":a;chara\fermesara_ct03.bmp",410,210
gosub *syasei2
>As the silky bandages rub against his tip, Luka comes, covering her bandages with semen.\
name $name
>There's still more...@
>I need to drain it all out.\
name ""
csp 690
gosub *clear_sprite
gosub *setwindow_01p
>After forcing me to come twice, she still wants more?@
>What is she going to do now...?\
mov %battle,0
mov %hsean,1
mov %2705,%2705+1:if %2705=1 mov %count_koenemy,%count_koenemy+1
if %2705>%count_most mov %count_most,%2705:mov $count_mostname,$name
count 27,4
mov $bad1,"Ferme Sara forced Luka to come with her bandages."
goto *fermesara_h



*fermesara_h5

mov %ikigoe,3:gosub *ikigoe
name $name
>Finished already? But I only just put it in...\
name ""
gosub *syasei1
lsp 690,":a;chara\fermesara_ct12.bmp",0,210
lsp 700,":a;chara\fermesara_h2.bmp",0,0
gosub *syasei2
>The moment Luka is forced into her warm vagina, he comes, filling Ferme Sara with semen.\
mov %viclose,1:gosub *lose
mov %2705,%2705+1:if %2705=1 mov %count_koenemy,%count_koenemy+1
if %2705>%count_most mov %count_most,%2705:mov $count_mostname,$name
count 27,4
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Ferme Sara forced Luka to come the moment of insertion"
gosub *face2
name $name
>How fast...@
>Now to drain you dry...\
name ""
goto *fermesara_h



*fermesara_h6

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\fermesara_ct12.bmp",0,210
lsp 700,":a;chara\fermesara_h2.bmp",0,0
gosub *syasei2
>As Ferme Sara rapes Luka, he comes, filling her warm vagina with semen.\
mov %viclose,1:gosub *lose
mov %2705,%2705+1:if %2705=1 mov %count_koenemy,%count_koenemy+1
if %2705>%count_most mov %count_most,%2705:mov $count_mostname,$name
count 27,4
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Ferme Sara forced Luka to come as she raped him."
gosub *face2
name $name
>So you offered your semen to my vagina...@
>Now I'll squeeze out everything else...\
name ""
goto *fermesara_h



*fermesara_h

mov $bad2,"Luka was pushed into the coffin, and had his semen sucked until his death."
if %2705=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku=1 goto *fermesara_hb
if %kousoku=2 mov %hseanwave,3:hseanwave:goto *fermesara_hc
name "Luka"
>Ahh...\
name ""
cspl 690,699
lsp 700,":a;chara\fermesara_h1.bmp",0,0:print 10,500
>Ferme Sara easily brings me into her coffin, and wraps me in her bandages.@
>The pulling bandages bring our waists together.\
goto *fermesara_hb



*fermesara_hb

name $name
>When I was living, my pussy was able to make any man come.@
>After dying, it became a way to suck out male energy...\
>I'll let you taste my pussy, too.@
>You'll writhe in pleasure filled agony as you die...\
name ""
name "Luka"
>I...I don't want this...\
name ""
>With her bandages around me, I can't even feebly struggle.@
>Even worse, this narrow coffin is keeping me locked in place.\
>Ferme Sara mercilessly presses her waist against me...@
mov %hseanwave,3:hseanwave
lsp 690,":a;chara\fermesara_ct11.bmp",0,210:print 10,500
>And brings my penis deep inside!\
name $name
>You're inside my vagina...\
name ""
goto *fermesara_hc



*fermesara_hc

name "Luka"
>Wh...What is this!?@>Ahh!\
name ""
>Her pulsing flesh moves, as if it was a hot whirlpool around me.@
>The sensation is far different than the undead vagina I was expecting.\
name "Luka"
>I...Incredible... It feels so good...\
name ""
>Just the feeling of insertion into her hot vagina is enough to make me melt away in surrender.\
>Bound and locked inside her coffin, I can't fight back.@
>I can only shake helplessly as she rapes me...\
>But her devilish vagina won't even allow me to endure it.\
name $name
>Well? How is my pussy?@
>Are you enjoying the pussy that was able to make any man come in an instant?\
name ""
name ""
name "Luka"
>N...No... I can't take this...@
>Ahh!\
name ""
>The touch of her flesh fills my mind, as her vaginal walls start to move around my penis.@
>Cornered in a moment, I can't suppress the desire to release inside her any longer.\
>Coming inside a corpse...@
>Despite my disgust at the thought, I can't hold back the pleasure any longer.\
name "Luka"
>C...Coming!@>Ahh!\
name ""
gosub *syasei1
lsp 700,":a;chara\fermesara_h2.bmp",0,0
lsp 690,":a;chara\fermesara_ct12.bmp",0,210
gosub *syasei2
>I explode inside Ferme Sara, unable to deny the pleasure any longer.\
name $name
>You finished inside me...@
>Now to absorb up all of your energy...\
name ""
name "Luka"
>Haa... Ahh!\
name ""
mov %hseanwave,9:hseanwave
>My energy is being sucked out along with my ejaculation...@
>The intense weakness running through me is evidence enough.\
>Even after my orgasm should have ended, my ejaculation doesn't stop.@
>My penis continues to pulse inside her, spitting out spurt after spurt of semen.\
name "Luka"
>What... It's not... Stopping...\
name ""
>The more I come inside her, the weaker I feel.@
>At the same time, the longer the orgasm lasts, the more intense the ecstasy of release gets.\
name $name
>I'll suck up your semen and energy until you're completely dry...@
>You'll be buried as a mummy inside this coffin.\
name ""
name "Luka"
>N...No... Stop...@
>I don't want to come any more!\
name ""
gosub *syasei1
lsp 700,":a;chara\fermesara_h3.bmp",0,0
lsp 690,":a;chara\fermesara_ct13.bmp",0,210
gosub *syasei2
>No matter how hard I fight against her, I can't stop coming inside her.@
>As the pleasure rises and rises, the energy quickly fades from my body.\
>Her vagina is truly a devilish organ, drawing out my life itself...\
name "Luka"
>H...Help me... Ah...\
name ""
name $name
>Wasted words...@>You'll be dried up by my vagina, having even your soul sucked out.\
name ""
name "Luka"
>Ah...ahh...\
name ""
gosub *syasei1:gosub *syasei2
>The amount of semen shooting into her slowly decreases, but the sucking doesn't stop.@
>My life itself is slowly trickling away into her.@>A little bit more, and I really will die.\
name "Luka"
>I...I'm going to die... Stop...\
name ""
>I moan as I beg her to stop...@> I can already see my end approaching.\
name $name
>Are you almost out of energy?@>I'll be taking everything...@
>Now, meet your finish...\
name ""
name "Luka"
>Haa...\
name ""
gosub *syasei1:gosub *syasei2
>Barely even a drop is spurting out into her now.@
>But even still, my life is slowly fading...\
>I can barely even keep my eyes open any longer, as the calming ecstasy finally takes hold of my thoughts.\
name "Luka"
>Ah... Uh...\
name ""
name $name
>The next one will be your last.@>I'll take the last bits of you now...\
name ""
name "Luka"
>Haa... Uh...\
name ""
gosub *syasei1:gosub *syasei2
>Her vaginal walls contract and rub against me, ushering out the last spurt of my life.@
>My penis weakly pulses as I shoot the last of myself into her.\
name "Luka"
>Ah...aa...\
name ""
>The last moment of my life is a final explosion of pleasure.@
>With a sigh of ecstasy, my vision goes dark.\
mov %hseanwave,0:hseanwave
name $name
>Dead...\
name ""
>All that remains in the coffin with the ancient Queen is the dried up corpse of a boy.\
gosub *anten
>...............\
goto *badend



*angelghoul_start

mov $name,"Angel Ghoul"
mov $name2,"Angel Ghoul"
mov $lavel,"angelghoul"
mov $tatie1,"angelghoul_st01"
mov $tatie2,"angelghoul_st01"
mov $tatie3,"angelghoul_st01"
mov $tatie4,"angelghoul_h1"
mov $haikei,"bg204"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,22000
if %nanido=2 mov %max_enemylife,27000
if %nanido=3 mov %max_enemylife,32000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,20
if %nanido=3 mov %earth_keigen,10
mov %alice_skill,0
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"I won't let go..."
mov $mogaku_sel2,"You won't escape..."
mov $mogaku_sel3,"I won't let go..."
mov $mogaku_sel4,"You won't escape..."
mov $mogaku_sel5,"I won't let go..."
mov $mogaku_dassyutu1,"You don't want me to suck out your semen...?"
mov $mogaku_dassyutu2,"Let me suck... Please let me suck it out..."
mov $mogaku_earth_dassyutu1,"You don't want me to suck out your semen...?"
mov $mogaku_earth_dassyutu2,"Let me suck... Please let me suck it out..."
mov $half_s1,"Is it good...?"
mov $half_s2,"Hurry... And come..."
mov $kiki_s1,"I can smell you..."
mov $kiki_s2,"You're going to come... Very soon..."
mov %end_n,15
mov %exp_minus,220000
mov %zmonster_x,-200
mov %tukix,300
mov %owaza_count1a,3
name $name
>Delicious looking prey...@
>I'll enjoy this.\
name ""
name "Luka"
>Angel...@> An undead one?\
name ""
>But she gives off a different feeling than Frederika did a few minutes ago.\
>The eerie atmosphere and the holy aura seem to have completely fused together.\
>If Frederika is a prototype, then this is the completed model...@
>The strength isn't even comparable.\
name $name
>I'll rape you...@
>And leave you a slobbering mess.\
name ""
name "Luka"
>Gah!\
name ""
>There's no reasoning with her...@
>I've no choice but to fight!\
goto *common_main



*angelghoul_v

gosub *face3
name $name
>I... Finally...@
>Return... To heaven...\
name ""
dwave 1,"se\bun.ogg"
csp 700:print 99,1000,"system\breakup.dll/lrB"
>Angel Ghoul fades away into particles, and vanishes!\
mov %viclose,1:gosub *victory
mov %getexp,250000:gosub *lvup
mov %2406,1
goto *sean0391



*angelghoul_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Not fighting any longer?@
>Then I'll take everything from you...\
name ""
goto *angelghoul_a



*angelghoul_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *angelghoul_kousan
if %cmd1=16 goto *angelghoul_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *angelghoul_main



*angelghoul_a

if %kousoku=1 gosub *angelghoul_a7:goto *common_main
rnd2 %ransu,1,8
if %ransu=1 gosub *angelghoul_a1:goto *common_main
if %ransu=2 gosub *angelghoul_a2:goto *common_main
if %ransu=3 gosub *angelghoul_a3:goto *common_main
if %ransu=4 gosub *angelghoul_a4:goto *common_main
if %ransu=5 gosub *angelghoul_a5:goto *common_main
if %ransu>5 && %owaza_count1a>4 gosub *angelghoul_a6:goto *common_main
skip -7



*angelghoul_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Even in handcuffs, I can make a man come..."
if %ransu=2 mov $sel1,"Dump it all over my hands..."
if %ransu=3 mov $sel1,"Even in handcuffs, I'm skilled at handjobs..."
name $name
eng $sel1:$sel6\
name ""
skillname "Fallen Hand"
dwave 1,"se\ero_koki1.ogg"
>Angel Ghoul wraps both hands around Luka's penis, and strokes him!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,30
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4026
if %nanido<2 damage 320,340
if %nanido=2 damage 370,390
if %nanido=3 damage 420,440
skillname ""
if %mylife=0 sub %stack,1:return *angelghoul_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*angelghoul_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Let me suck on your penis..."
if %ransu=2 mov $sel1,"Mmm... Shoot it all out in my mouth."
if %ransu=3 mov $sel1,"I'll use my mouth... So come inside it..."
name $name
eng $sel1:$sel6\
name ""
skillname "Hungry Mouth"
dwave 1,"se\ero_buchu2.ogg"
>Angel Ghoul sucks Luka's penis deep into her mouth!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,30
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4027
if %nanido<2 damage 330,350
if %nanido=2 damage 380,400
if %nanido=3 damage 430,450
skillname ""
if %mylife=0 sub %stack,1:return *angelghoul_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*angelghoul_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll use my breasts... So cover them..."
if %ransu=2 mov $sel1,"My boobs are still soft..."
if %ransu=3 mov $sel1,"You can use my breasts as much as you like..."
name $name
eng $sel1:$sel6\
name ""
skillname "Discarded Breasts"
dwave 1,"se\ero_sigoki1.ogg"
>Angel Ghoul sandwiches Luka's penis between her large, soft breasts!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,30
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4028
if %nanido<2 damage 340,360
if %nanido=2 damage 390,410
if %nanido=3 damage 440,460
skillname ""
if %mylife=0 sub %stack,1:return *angelghoul_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*angelghoul_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Shall I use my hair?"
if %ransu=2 mov $sel1,"I'll make it nice and tight... So cover my hair with your semen..."
if %ransu=3 mov $sel1,"I can use my hair just like I could a hand..."
name $name
eng $sel1:$sel6\
name ""
skillname "Roasting Hair"
dwave 1,"se\umaru.ogg"
>Angel Ghoul's hair coils around Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,30
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4029
if %nanido<2 damage 350,370
if %nanido=2 damage 400,420
if %nanido=3 damage 450,470
skillname ""
if %mylife=0 sub %stack,1:return *angelghoul_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*angelghoul_a5

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Dump your semen all over my ass..."
if %ransu=2 mov $sel1,"Get a good feel of my soft ass..."
if %ransu=3 mov $sel1,"Cover my ass in your semen..."
name $name
eng $sel1:$sel6\
name ""
skillname "Concealing Ass"
dwave 1,"se\ero_sigoki1.ogg"
>Angel Ghoul presses her soft ass cheeks against Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,30
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4030
if %nanido<2 damage 360,380
if %nanido=2 damage 410,430
if %nanido=3 damage 460,480
skillname ""
if %mylife=0 sub %stack,1:return *angelghoul_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*angelghoul_a6

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 5
name $name
>I'll rape you...@
>You'll be the prey of my corrupted vagina...\
name ""
skillname "Embrace"
eng "Angel Ghoul embraces Luka close to her body!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>Luka has been bound by Angel Ghoul!\
skillname ""
name $name
>My pussy is hot and wet...@
>Come on, push it inside...\
name ""
if %earth=0 && %nanido<2 mov %genmogaku,0
if %earth=0 && %nanido=2 mov %genmogaku,0
if %earth=0 && %nanido=3 mov %genmogaku,0
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
sub %stack,1
return



*angelghoul_a7

add %stack,1
>Luka has been bound by Angel Ghoul...\
name $name
>Hurry up and come inside... It will feel amazing...\
name ""
skillname "Immoral Necrophilia"
dwave 1,"se\ero_pyu1.ogg"
lsp 690,":a;chara\angelghoul_ct01.bmp",0,0:print 10,500
>Angel Ghoul pulls on Luka's waist, bringing him inside her!
skillcount3 4031
mov %damage_kotei,1
damage 500,600
mov %kousoku,2:gosub *status_print
>Luka is being raped by Angel Ghoul!\
skillname ""
if %mylife=0 sub %stack,1:return *angelghoul_h6
name "Luka"
>Ahh!\
name ""
>Tiny little grains of flesh rub against my penis as she forces me deep into her vagina...\
name $name
>You're in...@> I'm raping you...@
>My pussy is devouring your penis...\
name ""
sub %stack,1
goto *angelghoul_a8



*angelghoul_a8

add %stack,1
>Luka is being raped by Angel Ghoul...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll make you come over and over...":mov $sel2,"Angel Ghoul's vaginal walls vibrate around Luka's penis!"
if %ransu=2 mov $sel1,"Does it feel good when I move like this?":mov $sel2,"Angel Ghoul pushes her waist up and down, forcing Luka in and out of her!"
if %ransu=3 mov $sel1,"I'll squeeze your penis...":mov $sel2,"Angel Ghoul tightens her vagina around Luka's penis!"
if %ransu=4 mov $sel1,"I love mating with humans...":mov $sel2,"Angel Ghoul rhythmically squeezes Luka's penis!"
if %ransu=5 mov $sel1,"Come inside me...":mov $sel2,"Angel Ghoul's vaginal walls rub against Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Immoral Necrophilia"
dwave 1,"se\ero_chupa4.ogg"
eng $sel2:$sel6
skillcount3 4031
mov %damage_kotei,1
damage 500,600
skillname ""
if %mylife=0 sub %stack,1:return *angelghoul_h7
sub %stack,1
goto *angelghoul_a8



*angelghoul_onedari

mov $list1,"Fallen Hand"
if %4026>0 mov %list_num1,1
mov $list2,"Hungry Mouth"
if %4027>0 mov %list_num2,1
mov $list3,"Discarded Breasts"
if %4028>0 mov %list_num3,1
mov $list4,"Roasting Hair"
if %4029>0 mov %list_num4,1
mov $list5,"Concealing Ass"
if %4030>0 mov %list_num5,1
mov $list6,"Immoral Necrophilia"
if %4031>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *angelghoul_onedari1
if %cmd1=12 goto *angelghoul_onedari2
if %cmd1=13 goto *angelghoul_onedari3
if %cmd1=14 goto *angelghoul_onedari4
if %cmd1=15 goto *angelghoul_onedari5
if %cmd1=16 goto *angelghoul_onedari6
if %cmd1=-1 goto *angelghoul_main
goto *angelghoul_onedari



*angelghoul_onedari1

gosub *onedari_syori
name $name
>You want to taste my hand skills?@
>Good... I'll make you come over and over...\
name ""
gosub *angelghoul_a1
skip -1



*angelghoul_onedari2

gosub *onedari_syori
name $name
>You want to taste my mouth skills?@
>Good... I'll make you come over and over...\
name ""
gosub *angelghoul_a2
skip -1



*angelghoul_onedari3

gosub *onedari_syori
name $name
>You want to taste my breast skills?@
>Good... I'll make you come over and over...\
name ""
gosub *angelghoul_a3
skip -1



*angelghoul_onedari4

gosub *onedari_syori
name $name
>You want to taste my hair skills?@
>Good... I'll make you come over and over...\
name ""
gosub *angelghoul_a4
skip -1



*angelghoul_onedari5

gosub *onedari_syori
name $name
>You want to taste my ass skills?@
>Good... I'll make you come over and over...\
name ""
gosub *angelghoul_a5
skip -1



*angelghoul_onedari6

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want me to rape you?@
>Good... I'll make you come over and over...\
name ""
if %kousoku=0 gosub *angelghoul_a6
gosub *angelghoul_a7
skip -1



*angelghoul_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\angelghoul_bk04.bmp",0,0
gosub *syasei2
>As Angel Ghoul strokes Luka's penis her soft hands, he comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2706,%2706+1:if %2706=1 mov %count_koenemy,%count_koenemy+1
if %2706>%count_most mov %count_most,%2706:mov $count_mostname,$name
count 5,3
mov $bad1,"Angel Ghoul forced Luka to come with her hands."
gosub *face2
name $name
>Aha... What a feast.@
>*Slurp* Mmm...\
name ""
goto *angelghoul_h



*angelghoul_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\angelghoul_bk01.bmp",0,0
gosub *syasei2
>As Angel Ghoul sucks on Luka's penis with her warm mouth, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2706,%2706+1:if %2706=1 mov %count_koenemy,%count_koenemy+1
if %2706>%count_most mov %count_most,%2706:mov $count_mostname,$name
count 4,3
mov $bad1,"Angel Ghoul forced Luka to come with her mouth."
gosub *face2
name $name
>Aha... What a feast.@
>*Slurp* Mmm...\
name ""
goto *angelghoul_h



*angelghoul_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\angelghoul_bk03.bmp",0,0
gosub *syasei2
>As Angel Ghoul squeezes Luka's penis between her soft breasts, he comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2706,%2706+1:if %2706=1 mov %count_koenemy,%count_koenemy+1
if %2706>%count_most mov %count_most,%2706:mov $count_mostname,$name
count 7,3
mov $bad1,"Angel Ghoul forced Luka to come with her breasts."
gosub *face2
name $name
>Aha... What a feast.@
>*Slurp* Mmm...\
name ""
goto *angelghoul_h



*angelghoul_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\angelghoul_bk02.bmp",0,0
gosub *syasei2
>As Angel Ghoul's silky hair coils around Luka's penis, he comes, covering her head with semen.\
mov %viclose,1:gosub *lose
mov %2706,%2706+1:if %2706=1 mov %count_koenemy,%count_koenemy+1
if %2706>%count_most mov %count_most,%2706:mov $count_mostname,$name
count 22,3
mov $bad1,"Angel Ghoul forced Luka to come with her hair."
gosub *face2
name $name
>Aha... What a feast.@
>*Slurp* Mmm...\
name ""
goto *angelghoul_h



*angelghoul_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 696,":a;chara\angelghoul_bk06.bmp",0,0
gosub *syasei2
>As Angel Ghoul's soft ass presses against Luka's penis, he comes, covering her back with semen.\
mov %viclose,1:gosub *lose
mov %2706,%2706+1:if %2706=1 mov %count_koenemy,%count_koenemy+1
if %2706>%count_most mov %count_most,%2706:mov $count_mostname,$name
count 34,3
mov $bad1,"Angel Ghoul forced Luka to come with her ass."
gosub *face2
name $name
>Aha... What a feast.@
>*Slurp* Mmm...\
name ""
goto *angelghoul_h



*angelghoul_h6

mov %ikigoe,3:gosub *ikigoe
name $name
>Aha, already?@
>But I only just put it in...\
name ""
gosub *syasei1
lsp 690,":a;chara\angelghoul_ct02.bmp",0,0
gosub *syasei2
>The moment Luka is forced into Angel Ghoul's hot vagina, Luka comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2706,%2706+1:if %2706=1 mov %count_koenemy,%count_koenemy+1
if %2706>%count_most mov %count_most,%2706:mov $count_mostname,$name
count 1,3
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Luka was forced to come the moment of insertion."
gosub *face2
name $name
>You're the first male who has come this fast...\
>I'm not satisfied at all yet.@>I want more...\
name ""
goto *angelghoul_h



*angelghoul_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\angelghoul_ct02.bmp",0,0
gosub *syasei2
>As Angel Ghoul rapes Luka with her hot, rough vagina, Luka comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2706,%2706+1:if %2706=1 mov %count_koenemy,%count_koenemy+1
if %2706>%count_most mov %count_most,%2706:mov $count_mostname,$name
count 1,3
mov $bad1,"Angel Ghoul forced Luka to come as she raped him."
gosub *face2
name $name
>Aha, you came so much inside me...@
>Your semen is delicious...@> More... More...\
name ""
goto *angelghoul_h



*angelghoul_h

mov $bad2,"After being raped until he fainted, Luka's semen was squeezed out endlessly..."
if %2706=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku=2 mov %hseanwave,2:hseanwave:goto *angelghoul_hb
name "Luka"
>Ahh...\
name ""
name $name
>Now, give me your dick...@
>Stick it inside, and stir me up.\
name ""
>Angel Ghoul spreads open her vagina with her fingers, showing off her wet pink flesh.@
>I nervously swallow as her twitching flesh seems to invite me inside.\
name $name
>Your thick white stuff will explode inside here...@
>Give me your dick, and I'll squeeze it nice and tight...\
name ""
name "Luka"
>S...Stop... Stay back...@
>Ah!\
name ""
cspl 690,699
lsp 700,":a;chara\angelghoul_h1.bmp",0,0:print 10,500
>Embracing me close, Angel Ghoul wraps her legs around my waist and pulls me against her.\
name "Luka"
>G...Get off... Ah...\
name ""
>I tense in surprise at feeling her warm body so close.@
>Her legs pull at my body, pressing my face harder against her soft breasts.\
name $name
>My pussy will swallow up your penis...@
>I'll tighten it inside, and ride you...\
>I'll rape you until your balls are empty...@>Not stopping, no matter how you struggle or cry.\
name ""
name "Luka"
>S...Stop...@
>Ahh!\
name ""
mov %hseanwave,2:hseanwave
lsp 690,":a;chara\angelghoul_ct01.bmp",0,0:print 10,500
>Ignoring my pleas, Angel Ghoul pulls on my body, forcing me into her warm insides.@
>The unexpected sensation of her vagina makes my body jerk in surprise.\
name "Luka"
>Ahh... What... Is this?\
name ""
name $name
>Aha... It feels incredible inside me, doesn't it?\
name ""
>Tiny bumps line her vaginal walls, her already wet vagina easily accepting me deep inside.@
>The bumps of flesh in her deepest parts rub against my glans, making my body already twist in ecstasy.\
goto *angelghoul_hb



*angelghoul_hb

name "Luka"
>Ahhh!@>It's moving inside...!\
name ""
>The feeling of the grainy bumps of flesh rubbing against my penis is unbearable.@
>I jerk my waist back and forth trying to escape, but the movements only serve to stimulate me further.\
>Her legs tense around my waist, locking me inside her, helpless against her rape.\
name $name
>Aren't you going to come?@
>Most men come in seconds...\
>Then I'll do this...@> Don't hold back, just let loose...\
name ""
>With her feet locked around my back, Angel Ghoul starts to slowly move her own waist.\
name "Luka"
>D...Don't move like that!\
name ""
>As she moves, my penis is slowly tossed side to side inside her.@
>The grains of flesh rub even harder against my penis, shocks of pleasure running through me every time she moves.\
>My body starts to tingle as the desire to release inside her runs up my spine, filling my every thought.\
name "Luka"
>No... I'm going to come...!\
name ""
name $name
>Come, come... Come inside me!@
>Fill my pussy up with your white semen!\
name ""
>Angel Ghoul gets more incensed as I'm near orgasm, her own movements drastically increasing in intensity.@
>Unable to take it any longer, I surrender to her waist movements.\
name "Luka"
>Ahh... T...Too good!\
name ""
gosub *syasei1
lsp 690,":a;chara\angelghoul_ct02.bmp",0,0
gosub *syasei2
>I cling to Angel Ghoul as my body shakes in ecstasy as I explode inside her.\
name "Luka"
>Haa...\
name ""
>Angel Ghoul's embrace gets tighter as my body trembles in post orgasm ecstasy.@
>But her movements don't stop, even after my climax.\
name $name
>Aha... So much rushing into me...@
>Your semen is delicious.\
>Give me more, please...@>Shoot more of your delicious semen into my pussy!\
name ""
name "Luka"
>Ahh... Ah!\
name ""
mov %hseanwave,4:hseanwave
>Angel Ghoul's movements slowly become more and more violent.@
>With her feet wrapped around my waist, she starts pushing up and down like a piston.\
>She pulls me out of her until the tip of my penis is just against her entrance.@
>Then, using her feet, she pulls me all the way back inside.\
name $name
>Come, come...@
>I'll move faster, so give me more!\
>Come on, it feels good inside me, doesn't it!?\
name ""
name "Luka"
>N...No... Go slower!@
>Ahh!\
name ""
>The bumps of flesh inside her rub hard against me as she continues pulling me in and out of her warm insides.@
>I cry out helplessly, but her rape is only getting more intense as time goes on.\
>If she wasn't so wet, the friction would be painful.@
>But as she gets more and more crazed, her vagina gets wetter to match.\
name "Luka"
>I...It feels so good... Ahh...\
name ""
>As my body trembles in bliss, I surrender to my male instinct.\
gosub *syasei1
lsp 690,":a;chara\angelghoul_ct03.bmp",0,0
gosub *syasei2
>I explode inside her warm vagina for a second time, less than a minute after my last one.@
>But Angel Ghoul is far from satisfied...@> Her rough rape doesn't slow down at all.\
name "Luka"
>Hyaa!@
>Stop, stop!\
name ""
>I writhe at the endless stimulation, but with her legs locked around me, there's no escape.\
name $name
>I haven't had enough...@
>I want more... More...\
>I want more of your semen.@
>Give all of it to my pussy...!\
name ""
name "Luka"
>Hyaaa!\
name ""
>Her greedy waist movements continue to get more intense, as if she's trying to devour my penis with her vagina.@
>Helpless in her embrace, I can't do anything but take it.\
>The grainy bumps of flesh inside her polish my penis, the forced pleasure bringing me to surrender yet again.\
name "Luka"
>I'm coming again...@
>Ahh!\
name ""
gosub *syasei1
lsp 690,":a;chara\angelghoul_ct04.bmp",0,0
gosub *syasei2
>Her vagina is already full of my semen, the whiteness overflowing from her as she slams me in and out of her.@
>But even still, she doesn't stop...\
name $name
>Come more... More... More...\
name ""
name "Luka"
>Stop... Ah...\
name ""
gosub *syasei1:gosub *syasei2
>The intense rape doesn't stop...@
>Her greedy desire is endless, forcing me to climax after climax.\
name "Luka"
>Ah...ah...\
name ""
>I slowly fall unconscious with my head resting on her soft breasts.\
mov %hseanwave,0:hseanwave
name $name
>Your semen is delicious...@
>I'll never let you go...\
name ""
name "Luka"
>............\
name ""
>There's no escape from this rape.@
>I'm just prey to this greedy undead angel, forced to continually feed her my semen...\
>I slowly come to accept my horrible fate...\
gosub *anten
>............\
goto *badend



*dragonzonbe_start

mov $name,"Zombie Dragon Girl"
mov $name2,"Zombie Dragon Girl"
mov $lavel,"dragonzonbe"
mov $tatie1,"dragonzonbe_st01"
mov $tatie2,"dragonzonbe_st02"
mov $tatie3,"dragonzonbe_st03"
mov $tatie4,"dragonzonbe_ha1"
mov $haikei,"bg205"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,24000
if %nanido=2 mov %max_enemylife,28000
if %nanido=3 mov %max_enemylife,32000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,0
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"There's no point struggling..."
mov $mogaku_sel2,"Did you think you would escape with that?"
mov $mogaku_sel3,"There's no point... You're already finished."
mov $mogaku_sel4,"No human can escape from me."
mov $mogaku_sel5,"No matter how you struggle, you won't escape..."
mov $mogaku_dassyutu1,"To be able to break free from me..."
mov $mogaku_dassyutu2,"You seem to be quite strong indeed."
mov $mogaku_earth_dassyutu1,"Strength above even mine?"
mov $mogaku_earth_dassyutu2,"You seem to be quite strong indeed."
mov $half_s1,"Even with this large body, my sexual skills are potent, aren't they?"
mov $half_s2,"Now, hurry up and come..."
mov $kiki_s1,"You seem to be nearing your limit..."
mov $kiki_s2,"Give up, and take your place inside me..."
mov %end_n,15
mov %exp_minus,470000
mov %zmonster_x,-50
mov %tukix,300
mov %owaza_count1a,4
name $name
>I can't let you advance into the Lab past here...@
>It's my duty to devour any foolish trespassers like you.\
>But this is the first time a human has stood before me.\
>The only ones who have managed to get this far were monster samples...\
name ""
name "Luka"
>An undead dragon!?\
name ""
>Dragons are known as some of the strongest among monsters...@
>La Croix made a zombie out of one of them...?\
>If she's considered the guard here, then she must be extremely powerful.\
name $name
>I haven't tasted a human since I was alive...@
>I'll enjoy feasting on you and that body of yours...\
name ""
goto *common_main



*dragonzonbe_v

gosub *face3
name $name
>This isn't possible!@
>How could I be bested by a human!?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Zombie Dragon Girl turns back into a Dragon Girl's corpse...\
mov %viclose,1:gosub *victory
mov %getexp,280000:gosub *lvup
mov %2407,1
goto *sean0392



*dragonzonbe_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Hehe, already giving up?@
>So you wish for me to devour you?\
name ""
goto *dragonzonbe_a



*dragonzonbe_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *dragonzonbe_kousan
if %cmd1=16 goto *dragonzonbe_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *dragonzonbe_main



*dragonzonbe_a

if %kousoku=1 gosub *dragonzonbe_a7:goto *common_main
mov %hanyo2,%hanyo2+1
if %hanyo1=0 && %hanyo2=6 gosub *dragonzonbe_a8:goto *common_main
if %hanyo1=1 && %hanyo2=6 gosub *dragonzonbe_a9:goto *common_main
rnd2 %ransu,1,3
if %hanyo1=0 && %ransu=1 gosub *dragonzonbe_a1:goto *common_main
if %hanyo1=0 && %ransu=2 gosub *dragonzonbe_a2:goto *common_main
if %hanyo1=0 && %ransu=3 gosub *dragonzonbe_a3:goto *common_main
if %hanyo1=1 && %ransu=1 gosub *dragonzonbe_a4:goto *common_main
if %hanyo1=1 && %ransu=2 gosub *dragonzonbe_a5:goto *common_main
if %hanyo1=1 && %ransu=3 && %owaza_count1a>5 gosub *dragonzonbe_a6:goto *common_main
skip -7



*dragonzonbe_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'm quite skilled with this mouth, too..."
if %ransu=2 mov $sel1,"Do you want to come in my dragon mouth, or this mouth?"
if %ransu=3 mov $sel1,"Give me your semen..."
name $name
eng $sel1:$sel6\
name ""
skillname "Dead Dragon's Fellatio"
dwave 1,"se\ero_koki1.ogg"
>The zombie uses the mouth on her female body to suck on Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<60 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4032
if %nanido<2 damage 340,360
if %nanido=2 damage 390,410
if %nanido=3 damage 440,460
skillname ""
if %mylife=0 sub %stack,1:return *dragonzonbe_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*dragonzonbe_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My breasts feel good..."
if %ransu=2 mov $sel1,"I'll make you come on my breasts in no time..."
if %ransu=3 mov $sel1,"I'll use these soft breasts..."
name $name
eng $sel1:$sel6\
name ""
skillname "Dead Dragon's Horny Chest"
dwave 1,"se\ero_sigoki1.ogg"
>The zombie uses the breasts on her female body to squeeze Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<60 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4033
if %nanido<2 damage 350,370
if %nanido=2 damage 400,420
if %nanido=3 damage 450,470
skillname ""
if %mylife=0 sub %stack,1:return *dragonzonbe_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*dragonzonbe_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I won't bite hard..."
if %ransu=2 mov $sel1,"Unless you come soon, I'll devour you..."
if %ransu=3 mov $sel1,"My dragon mouth is quite good too, isn't it?"
name $name
eng $sel1:$sel6\
name ""
skillname "Dead Dragon's Sweet Bite"
dwave 1,"se\ero_sigoki1.ogg"
eng "The zombie sucks Luka's body into her huge mouth!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<60 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
>Without using her teeth, her soft gums chew on Luka's body!
skillcount3 4034
if %nanido<2 damage 360,380
if %nanido=2 damage 410,430
if %nanido=3 damage 460,480
skillname ""
if %mylife=0 sub %stack,1:return *dragonzonbe_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*dragonzonbe_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"This fake female stomach feels good, doesn't it?"
if %ransu=2 mov $sel1,"Stupid males are tempted by this body..."
if %ransu=3 mov $sel1,"This fake female stomach wants to feel you..."
name $name
eng $sel1:$sel6\
name ""
skillname "Male Lure: Hair"
dwave 1,"se\ero_sigoki1.ogg"
>The zombie rubs Luka's penis against the fake female body's slimy stomach!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4035
if %nanido<2 damage 200,220
if %nanido=2 damage 230,250
if %nanido=3 damage 260,280
dwave 1,"se\ero_sigoki1.ogg"
>The fake body's hair coils around Luka's penis!
if %nanido<2 damage 200,220
if %nanido=2 damage 230,250
if %nanido=3 damage 260,280
skillname ""
if %mylife=0 sub %stack,1:return *dragonzonbe_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*dragonzonbe_a5

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"This female body is designed to pleasure men..."
if %ransu=2 mov $sel1,"Get a good taste of this fake female's body..."
if %ransu=3 mov $sel1,"Come all over this fake female body!"
name $name
eng $sel1:$sel6\
name ""
skillname "Male Lure: Chest"
dwave 1,"se\ero_sigoki1.ogg"
>The fake female body squeezes Luka's penis between her breasts!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4036
if %nanido<2 damage 210,230
if %nanido=2 damage 230,250
if %nanido=3 damage 250,270
dwave 1,"se\ero_sigoki1.ogg"
>She uses her hands to rub her soft breasts against Luka's penis!
if %nanido<2 damage 210,230
if %nanido=2 damage 230,250
if %nanido=3 damage 250,270
skillname ""
if %mylife=0 sub %stack,1:return *dragonzonbe_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*dragonzonbe_a6

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 5
name $name
>Hehe... My fake female body wants more.@
>She wants to taste you directly...\
name ""
skillname "Male Lure: Hold"
dwave 1,"se\ero_makituki3.ogg"
eng "The fake female body grabs hold of Luka!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
>His penis is pushed against her chest!@
mov %kousoku,1:gosub *status_print
>Luka has been bound by the Dragon Zombie Girl!\
skillname ""
name $name
>Now I'll prey on your genitals...@
>Shall I have you spit all of your semen out before I feast?\
name ""
if %earth=0 && %nanido<2 mov %genmogaku,99
if %earth=0 && %nanido=2 mov %genmogaku,99
if %earth=0 && %nanido=3 mov %genmogaku,99
if %earth>0 && %nanido<2 mov %genmogaku,2
if %earth>0 && %nanido=2 mov %genmogaku,2
if %earth>0 && %nanido=3 mov %genmogaku,3
sub %stack,1
return



*dragonzonbe_a7

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Come... I'll digest it later..."
if %ransu=2 mov $sel1,"This fake female body loves semen, too... The more you come, the longer you'll live..."
if %ransu=3 mov $sel1,"Give up, and enjoy the pleasure of predation..."
name $name
eng $sel1:$sel6\
name ""
skillname "Male Lure: Double"
dwave 1,"se\ero_sigoki1.ogg"
>The two fake females' breasts press against Luka's penis!
skillcount3 4037
if %nanido<2 damage 210,230
if %nanido=2 damage 230,250
if %nanido=3 damage 250,270
dwave 1,"se\ero_pyu1.ogg"
mov $tatie4,"dragonzonbe_ha2"
lsp 700,":a;chara\dragonzonbe_ha2.bmp",0,0:print 10,500
>Her long tongue reaches out and licks the tip of Luka's penis!
if %nanido<2 damage 210,230
if %nanido=2 damage 230,250
if %nanido=3 damage 250,270
skillname ""
if %mylife=0 sub %stack,1:return *dragonzonbe_h6
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*dragonzonbe_a8

add %stack,1
mov %hanyo1,1
mov %hanyo2,0
name $name
>I'll dissolve your body away...\
name ""
skillname "Fake Female Stomach"
dwave 1,"se\ero_makituki3.ogg"
lsp 700,":a;chara\dragonzonbe_st11.bmp",0,0:print 10,500
mov $tatie1,"dragonzonbe_st21"
mov $tatie2,"dragonzonbe_st22"
mov $tatie3,"dragonzonbe_st23"
gosub *face1
>A digestive system in the shape of a woman is discharged from the Zombie Dragon Girl's mouth!\
skillname ""
if %first_sel2=1 sub %stack,1:return
name "Luka"
>Wh...What the!?\
name ""
name $name
>This is my fake female stomach...@
>It's a digestive system with a low level will of her own.\
>Of course, she gives prey pleasure as she digests them...@
>You'll become another one of her victims!\
name ""
mov %first_sel2,1
sub %stack,1
return



*dragonzonbe_a9

add %stack,1
mov %hanyo1,0
mov %hanyo2,0
name $name
>She can't fight for too long outside...\
name ""
skillname "Fake Female Stomach"
dwave 1,"se\ero_makituki3.ogg"
mov $tatie1,"dragonzonbe_st01"
mov $tatie2,"dragonzonbe_st02"
mov $tatie3,"dragonzonbe_st03"
gosub *face1
>The female-formed stomach goes back inside the Zombie Dragon Girl's mouth!\
skillname ""
sub %stack,1
return



*dragonzonbe_onedari

mov $list1,"Dead Dragon's Fellatio"
if %4032>0 mov %list_num1,1
mov $list2,"Dead Dragon's Horny Chest"
if %4033>0 mov %list_num2,1
mov $list3,"Dead Dragon's Sweet Bite"
if %4034>0 mov %list_num3,1
mov $list4,"Male Lure: Hair"
if %4035>0 mov %list_num4,1
mov $list5,"Male Lure: Chest"
if %4036>0 mov %list_num5,1
mov $list6,"Male Lure: Double"
if %4037>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *dragonzonbe_onedari1
if %cmd1=12 goto *dragonzonbe_onedari2
if %cmd1=13 goto *dragonzonbe_onedari3
if %cmd1=14 goto *dragonzonbe_onedari4
if %cmd1=15 goto *dragonzonbe_onedari5
if %cmd1=16 goto *dragonzonbe_onedari6
if %cmd1=-1 goto *dragonzonbe_main
goto *dragonzonbe_onedari



*dragonzonbe_onedari1

gosub *onedari_syori
name $name
>You want to taste my mouth skills?@
>Then it's time for a little amusement before I feast...\
name ""
gosub *dragonzonbe_a1
skip -1



*dragonzonbe_onedari2

gosub *onedari_syori
name $name
>You want to taste my breast skills?@
>Then it's time for a little amusement before I feast...\
name ""
gosub *dragonzonbe_a2
skip -1



*dragonzonbe_onedari3

gosub *onedari_syori
name $name
>You want to taste my mouth skills?@
>Then it's time for a little amusement before I feast...\
name ""
if %hanyo1=0 skip 5
dwave 1,"se\ero_makituki3.ogg"
mov $tatie2,"dragonzonbe_st02"
gosub *face1
>The fake female stomach goes back into the dragon's mouth!\
gosub *dragonzonbe_a3
skip -1



*dragonzonbe_onedari4

gosub *onedari_syori
name $name
>You want to feel my fake female stomach?@
>Hehe... How foolish, wanting to play with a digestive system...\
name ""
if %hanyo1=1 skip 5
dwave 1,"se\ero_makituki3.ogg"
mov $tatie2,"dragonzonbe_st22"
gosub *face1
>The fake female stomach comes out of the dragon's mouth!\
gosub *dragonzonbe_a4
skip -1



*dragonzonbe_onedari5

gosub *onedari_syori
name $name
>You want to play with my fake female stomach?@
>Hehe... How foolish, wanting to play with a digestive system...\
name ""
if %hanyo1=1 skip 5
dwave 1,"se\ero_makituki3.ogg"
mov $tatie2,"dragonzonbe_st22"
gosub *face1
>The fake female stomach comes out of the dragon's mouth!\
gosub *dragonzonbe_a5
skip -1



*dragonzonbe_onedari6

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want to be wrapped up by my fake female stomach?@
>Hehe... How foolish, wanting to play with a digestive system...\
name ""
if %hanyo1=1 skip 5
dwave 1,"se\ero_makituki3.ogg"
mov $tatie2,"dragonzonbe_st22"
gosub *face1
>The fake female stomach comes out of the dragon's mouth!\
if %kousoku=0 gosub *dragonzonbe_a6
gosub *dragonzonbe_a7
skip -1



*dragonzonbe_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\dragonzonbe_bk01.bmp",0,0
gosub *syasei2
>As the Dragon Zombie Girl sucks on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2707,%2707+1:if %2707=1 mov %count_koenemy,%count_koenemy+1
if %2707>%count_most mov %count_most,%2707:mov $count_mostname,$name
count 4,11
mov $bad1,"The Dragon Zombie Girl forced Luka to come with her mouth."
gosub *face2
name $name
>First I'll feast on your semen...@
>Then, I'll devour that body...\
name ""
goto *dragonzonbe_h



*dragonzonbe_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\dragonzonbe_bk02.bmp",0,0
gosub *syasei2
>As the Dragon Zombie Girl sandwiches Luka's penis between her soft breasts, he comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2707,%2707+1:if %2707=1 mov %count_koenemy,%count_koenemy+1
if %2707>%count_most mov %count_most,%2707:mov $count_mostname,$name
count 7,11
mov $bad1,"The Dragon Zombie Girl forced Luka to come with her breasts."
gosub *face2
name $name
>First I'll feast on your semen...@
>Then, I'll devour that body...\
name ""
goto *dragonzonbe_h



*dragonzonbe_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\dragonzonbe_bk03.bmp",0,0
gosub *syasei2
>As her huge mouth bites on Luka's body, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2707,%2707+1:if %2707=1 mov %count_koenemy,%count_koenemy+1
if %2707>%count_most mov %count_most,%2707:mov $count_mostname,$name
count 32,11
mov $bad1,"The Dragon Zombie Girl forced Luka to come with her mouth."
gosub *face2
name $name
>First I'll feast on your semen...@
>Then, I'll devour that body...\
name ""
goto *dragonzonbe_h



*dragonzonbe_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\dragonzonbe_bk04.bmp",0,0
gosub *syasei2
>As Luka's penis rubs against the fake female's stomach, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2707,%2707+1:if %2707=1 mov %count_koenemy,%count_koenemy+1
if %2707>%count_most mov %count_most,%2707:mov $count_mostname,$name
count 32,11
mov $bad1,"The Dragon Zombie Girl used her fake female stomach to force Luka to come."
gosub *face2
name $name
>First I'll feast on your semen...@
>Then, I'll devour that body...\
name ""
goto *dragonzonbe_h



*dragonzonbe_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\dragonzonbe_bk05.bmp",0,0
gosub *syasei2
>As Luka's penis rubs against the fake female's breasts, he comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2707,%2707+1:if %2707=1 mov %count_koenemy,%count_koenemy+1
if %2707>%count_most mov %count_most,%2707:mov $count_mostname,$name
count 32,11
mov $bad1,"The Dragon Zombie Girl used her fake female stomach to force Luka to come."
gosub *face2
name $name
>First I'll feast on your semen...@
>Then, I'll devour that body...\
name ""
goto *dragonzonbe_h



*dragonzonbe_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\dragonzonbe_ha3.bmp",0,0
gosub *syasei2
>As Luka's penis rubs against the fake female's breasts while she licks his tip, he comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2707,%2707+1:if %2707=1 mov %count_koenemy,%count_koenemy+1
if %2707>%count_most mov %count_most,%2707:mov $count_mostname,$name
count 32,11
mov $bad1,"The Dragon Zombie Girl used her fake female stomach to force Luka to come."
gosub *face2
name $name
>First I'll feast on your semen...@
>Then, I'll devour that body...\
name ""
goto *dragonzonbe_h



*dragonzonbe_h

mov $bad2,"Luka was digested as she squeezed out the rest of his semen."
if %2707=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
name $name
>But it would be a shame to just prey on you...@
>I'll squeeze out all of your semen as I digest you.\
>You're a lucky one...@>You'll get to drown in pleasure as you meet your end.\
name ""
name "Luka"
>No... Don't... Ah!\
name ""
dwave 1,"se\ero_makituki3.ogg"
mov %hseanwave,11:hseanwave
cspl 690,699
lsp 700,":c;chara\dragonzonbe_hb1.bmp",0,0:print 10,500
>Too weak to resist, I'm easily brought into her giant mouth.\
>Her female body embraces me inside her mouth.@
>At the same time, that fake female stomach hugs me from behind.\
>Stuck inside this tiny space, the touch and smell of the two female bodies fill my senses.\
name "Luka"
>Ahh...\
name ""
>The humid air around me, combined with the wet saliva and juices...@>It's truly like I'm inside a horrible digestive organ.\
>A strange, pleasurable feeling radiates through me from where the fake female stomach's sticky body touches me.\
>And from the main female form in front of me...\
name $name
>Now to rape you.@
>I'll extract all of your semen as I digest you...\
name ""
name "Luka"
>Stop! Ahh...!\
name ""
>Pulling on my waist, the Zombie Dragon Girl's female body pulls my penis deep inside her own vagina.\
name "Luka"
>Ahh... Wh...What is this...?\
name ""
>Her small, sticky vagina is curved, her vaginal walls wavy all the way inside.@
>Deep inside of her, the flesh around my tip squirms and moves, massaging my tip.\
name "Luka"
>Uwa... It feels good...\
name ""
>The intense mix of stimulations blow away my reason all at once, as I cling to her body and gasp.\
name $name
>This body's vagina is closer to intestines than genitals...@
>I'm just a more evolved form of that fake female stomach from my main body...\
>I can control it like it was a stomach, moving food through...@
>Here, this will make you come in no time.\
name ""
name "Luka"
>Haaa...\
name ""
>Her vaginal walls suddenly start to compress and move, rubbing against my penis.\
>The soft walls rub especially hard against my neck, the movements feeling like they're trying to pull my penis deeper inside her vagina.\
name "Luka"
>Haa... That feels good...@
>I can't take this...\
name ""
>Just as she said, it's like digestive movements itself.@
>Treating my penis as food to be moved through her vagina, deeper into her body...\
>Attacked by this stimulus, I'm brought to the edge of orgasm.@
>I try to pull back and endure, but I can't even do that any longer.\
name "Luka"
>Ahh... No... Coming...\
name ""
name $name
>Good, let it all out.@
>Your semen shall feed me...\
name ""
name "Luka"
>Ahhh!!!\
name ""
gosub *syasei1
lsp 700,":c;chara\dragonzonbe_hb2.bmp",0,0
gosub *syasei2
>I lean forward on instinct as I come, the ecstasy of orgasm running through me.@
>All during my climax, the pulling motions of her vagina don't stop.\
name "Luka"
>Haa...\
name ""
>As my penis pulses inside her, my body relaxes as I focus on the pleasure.@
>At the same time, my face presses against her breasts, my mouth against one of her nipples.\
name $name
>Hehe, just like a child...@
>Here, little children like this, don't they?\
name ""
name "Luka"
>Nnnn?\
name ""
lsp 700,":c;chara\dragonzonbe_hb3.bmp",0,0:print 10,500
>Sweet milk drips from her nipple into my mouth.@
>Still enraptured in ecstasy, I mindlessly swallow it as it fills my mouth.\
name $name
>It's a digestive juice that calms prey down with feelings of intense ecstasy.@
>I usually have to forcibly inject it...@>But this is a first. Hehe.\
name ""
name "Luka"
>Nnn...\
name ""
>Having already lost my ability to think, I keep sucking on her nipples and drinking her milk.@
>The warm feeling of ecstasy wraps around me, as if I was safe inside my mother's womb.\
>At the same time, my penis is still being pulled on by her vagina, a continual stream of pleasure as it massages and strokes against my sensitive glans.\
name "Luka"
>Haa... It feels good...\
name ""
mov %hseanwave,12:hseanwave
name $name
>Hehe, my movements are getting faster...\
>As I said before, my body is just an evolved form of a stomach.@
>Of course, my vagina is part of that process, too...\
>...Do you know what that means?@
>Just where is your penis now?\
name ""
name "Luka"
>Ahh...\
name ""
>My penis is inside a digestive organ...@
>But even if it's obvious to me, I'm beyond caring now.\
name "Luka"
>More... More...\
name ""
>Far from fighting against it, I start seeking more.@
>As her vagina continues pulling on me with its contractions, I start thrusting in and out of her.\
name $name
>Hehe... Is that your answer?@
>You wish to trade your genitals for pleasure?\
name ""
name "Luka"
>Haa... That feels good...\
name ""
>Losing my sanity, I let the feeling of her vagina fill all of my senses.@
>As I thrust harder into her, her contractions get even more powerful.\
>I want to come inside as I feel this...@>My male desires take over, dominating everything.\
>No matter how miserable a fate awaits, I want to feel more.\
name $name
>Haha... You're beyond stupid.@
>Trading everything for some pleasure...\
name ""
name "Luka"
>Haaa...\
name ""
>I immerse myself in the ecstasy, as I feel myself nearing another orgasm.@
>I'm going to come as I feel this...\
>Pushing myself all the way inside, I relax my body as I reach a new height.\
name "Luka"
>Ahh... I'm going to come...\
name ""
name $name
>Good, come inside me...@>Get your once in a lifetime pleasure...\
name ""
name "Luka"
>Ahhhnn!\
name ""
gosub *syasei1
lsp 700,":c;chara\dragonzonbe_hb4.bmp",0,0
gosub *syasei2
>I explode inside her squirming, contracting vagina.@
>The ecstasy that I traded everything for washes over me.\
if %hosyoku_cut=1 goto *hosyoku_cut
name "Luka"
>Haa... It feels so good...\
name ""
name $name
>Haha, are you happy with that?@
>The intra-vaginal digestion has advanced far, too...\
>Just what kind of state do you think your penis is in now?\
name ""
name "Luka"
>Haa... My penis is melting...\
name ""
>I'm already completely addicted to this.@
>I don't even care what's happening any longer.\
>Even the thought of my penis dissolving away fills me with joy, as long as it feels good.\
name $name
>Sheesh... Already a complete captive?@
>Was my Ecstasy Milk too powerful?@>Or was he just this way from the start?\
>Here, it's time to digest your body itself now...\
name ""
name "Luka"
>Haa... I'm dissolving...@
>It feels good...\
name ""
>Digestive juices splash over my body, the warm sensations making me literally melt away in ecstasy.\
name "Luka"
>Ah... Hya!\
name ""
gosub *syasei1:gosub *syasei2
>I erupt inside her again, the endless pleasure leaving me on a permanent high.\
name "Luka"
>Ahh... uh...\
name ""
>My whole body slowly dissolves away, turning into mere food for the Dragon Zombie Girl...@
>At last, my consciousness fades away...\
mov %hseanwave,0:hseanwave
gosub *anten
>Writhing in ecstasy until the very end, I'm eaten by the Zombie Dragon Girl.@
>Trading my life for pleasure, I lose even my human dignity at the end...\
>..................\
goto *badend



*cirque_start

mov $name,"Cirque du Croix"
mov $name2,"Queen Harpy"
mov $lavel,"cirque"
mov $tatie1,"shirom_st11"
mov $tatie2,"shirom_st11"
mov $tatie3,"shirom_st11"
mov $tatie4,"shirom_st11"
mov $haikei,"bg206"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,25000
if %nanido=2 mov %max_enemylife,31000
if %nanido=3 mov %max_enemylife,37000
if %nanido=0 mov %max_enemylife,3
if %nanido=1 mov %henkahp1,15000
if %nanido=2 mov %henkahp1,19000
if %nanido=3 mov %henkahp1,23000
if %nanido=0 mov %henkahp1,2
if %nanido=1 mov %henkahp2,17000
if %nanido=2 mov %henkahp2,21000
if %nanido=3 mov %henkahp2,23000
if %nanido=0 mov %henkahp2,2
if %nanido=1 mov %henkahp3,18000
if %nanido=2 mov %henkahp3,22000
if %nanido=3 mov %henkahp3,26000
if %nanido=0 mov %henkahp3,2
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,0
mov %music,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov %end_n,15
mov %exp_minus,750000
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,2
mov %owaza_count3a,4
name "La Croix"
>Don't be so cold, disgraced Hero.@
>I prepared this show, just for you.\
>Now, get a good view of La Croix's artistic spectacle!@
>Come, Fernandez and Queen Harpy!\
name ""
name "Luka"
>Guh...!\
name ""
dwave 1,"se\kanoke.ogg"
mov $name2,"Queen Harpy"
lsp 700,":a;chara\cirque_st41.bmp",180,0
lsp 702,":a;chara\cirque_st01.bmp",-190,0:print 10,500
mov $tatie1,"cirque_st41"
mov $tatie2,"cirque_st42"
mov $tatie3,"cirque_st43"
mov $tatie4,"assassinloid_st41"
mov %monster_x,180
mov %monster_y,0
mov $tatie1b,"cirque_st01"
mov $tatie2b,"cirque_st02"
mov $tatie3b,"cirque_st03"
mov %monster_xb,-190
mov %monster_yb,0
mov %tekikazu,2
>Two powerful undead monsters appear from her coffin...@
>Two of the members of La Croix's sick "Cirque du Croix".\
name "Fernandez"
>I only wish to match sword skills with you...@
>But since I was ordered, I must use sexual techniques.\
name ""
name "Queen Harpy"
>Ahaha, I'll make you go insane with my pussy!\
name ""
>Even if they both attack at once, I won't fall here!\
mov %sinkou,1
goto *common_main



*cirque001

name "La Croix"
>Oho...@> So your skills are more than just rumors.@
>Lets change the script before it gets too boring.\
>...Return Fernandez, Queen Harpy.\
name ""
name "Fernandez"
>Understood...\
name ""
name "Queen Harpy"
>Too bad...@> I wanted to crush him with my own talons...\
name ""
cspl 700,702:print 10,500
>The coffin opens up, taking the two of them back inside.\
name "La Croix"
>...Now for the next actors.@
>Come out Titania, Queen Scylla!\
name ""
dwave 1,"se\kanoke.ogg"
lsp 700,":a;chara\cirque_st51.bmp",-160,0
lsp 702,":a;chara\cirque_st11.bmp",180,0:print 10,500
mov $name2,"Queen Scylla"
mov $tatie1,"cirque_st51"
mov $tatie2,"cirque_st52"
mov $tatie3,"cirque_st53"
mov $tatie4,"cirque_st52"
mov %monster_x,-160
mov %monster_y,0
mov $tatie1b,"cirque_st11"
mov $tatie2b,"cirque_st12"
mov $tatie3b,"cirque_st13"
mov %monster_xb,180
mov %monster_yb,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"You won't escape..."
mov $mogaku_sel2,"You can't escape my tentacles..."
mov $mogaku_sel3,"There's no meaning to your resistance..."
mov $mogaku_sel4,"Struggling is pointless... Just surrender."
mov $mogaku_sel5,"Prey caught in my tentacles isn't allowed to escape..."
mov $mogaku_dassyutu1,"To be able to escape from my tentacles..."
mov $mogaku_dassyutu2,"Did my power slip after dying? Or..."
mov $mogaku_earth_dassyutu1,"To be able to escape from tentacles..."
mov $mogaku_earth_dassyutu2,"What power in a flesh and blood human...!"
mov %zmonster_x,-300
mov %tukix,300
mov %enemylife,%max_enemylife
lsp 561,":a;system\gagee100.bmp",421,556:print 1
>Replacing them, Queen Scylla and the brutal Queen Fairy appear.@
>Formidable enemies, one after another...\
name "Titania"
>Ahaha, it's my turn to play. \
name ""
name "Queen Scylla"
>I'll squeeze you dry with my tentacles...\
name ""
mov %sinkou,2
goto *common_main



*cirque002

name "La Croix"
>Oho... Still no curtain call?@
>I don't like repeating lines too often... It's time to move to the final act.\
>...Return Titania, Queen Scylla.\
name ""
name "Titania"
>Ehhh? Playtime is already over?\
name ""
name "Queen Scylla"
>But he hasn't fallen to my tentacles yet...\
name ""
cspl 700,702:print 10,500
>The two return to her coffin again...\
name "La Croix"
>Now for the next performers.@
>Come out Roza, Queen Lamia!\
name ""
dwave 1,"se\kanoke.ogg"
lsp 700,":a;chara\cirque_st31.bmp",180,0
lsp 702,":a;chara\cirque_st21.bmp",-220,0:print 10,500
mov $name2,"Queen Lamia"
mov $tatie1,"cirque_st31"
mov $tatie2,"cirque_st32"
mov $tatie3,"cirque_st33"
mov $tatie4,"cirque_st32"
mov %monster_x,180
mov %monster_y,0
mov $tatie1b,"cirque_st21"
mov $tatie2b,"cirque_st22"
mov $tatie3b,"cirque_st23"
mov %monster_xb,-220
mov %monster_yb,0
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Useless... Do you think you could escape from the Queen of all Lamias?"
mov $mogaku_sel2,"I won't let you go... You will be my prey."
mov $mogaku_sel3,"Useless... Do you think you could escape from the Queen of all Lamias?"
mov $mogaku_sel4,"I won't let you go... You will be my prey."
mov $mogaku_sel5,"Useless... Do you think you could escape from the Queen of all Lamias?"
mov $mogaku_dassyutu1,"To throw even my restriction aside..."
mov $mogaku_dassyutu2,"What incredible power!"
mov $mogaku_earth_dassyutu1,"To throw even my restriction aside..."
mov $mogaku_earth_dassyutu2,"What incredible power!"
mov %zmonster_x,-300
mov %tukix,300
mov %enemylife,%max_enemylife
lsp 561,":a;system\gagee100.bmp",421,556:print 1
>The next two coming out is the Pirate Queen Roza and the Queen Lamia...@
>I don't think I can keep fighting these battles!\
name "Roza"
>Are you ready?@
>You'll be my plaything...\
name ""
name "Queen Lamia"
>I'll coil around you...@
>Hehe, you'll be my prey.\
name ""
mov %sinkou,3
goto *common_main



*cirque_v

if %nanido=0 goto *cirque_v2
if %sinkou=1 goto *cirque001
if %sinkou=2 goto *cirque002
name "La Croix"
>It can't be... The show is still going?@
>You are an incredible actor, I see.\
>If we take too much time in this showing, we'll trouble the other audience members soon to arrive.@
>There's no choice, we'll have to make a quick change in script.\
>...Return Roza, Queen Lamia.\
name ""
name "Roza"
>Despite how he looks, he's a tough one.@
>You'll be my lover next time.\
name ""
name "Queen Lamia"
>Even my snake body couldn't bind him...\
name ""
goto *cirque_v2



*cirque_v2

cspl 700,702:print 10,500
>The two of them are brought back into the coffin...\
name "La Croix"
>It wasn't on the original program...@> But I'll show you something special.\
>Come out... Alipheese the Fifteenth.\
name ""
dwave 1,"se\kanoke.ogg"
>An overwhelming feeling of pressure and magic explodes from her coffin.\
>The previous Monster Lord descends back to the world from the deep darkness she was sleeping in...\
if %battle_auto=1 skipoff
mov %battle,0
mov %count_ko,%count_ko+1
if %viclose=3 skip 7
if %nanido=0 skip 6
if %mylife=%max_mylife && %nodamage=0 mov %count_hpfull,1
if %nanido=3 mov %count_hellvic,1
if %status=7 mov %count_vickonran,1
if %counter>0 mov %counterk,1
if %alice_skill=1 mov %alicek,1
if %zukanon=1 return *zukan_commonkaisou0
mov %2430,1
mov %2432,1
mov %2433,1
goto *alice15th_start



*cirque_kousana

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name "Queen Harpy"
>Ahaha, already surrendering?\
name ""
name "Fernandez"
>Cowardly!@>Receive your just punishment!\
name ""
goto *cirque_a



*cirque_kousanb

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name "Queen Scylla"
>Did you succumb to pleasure?\
name ""
name "Titania"
>Then I'll make you into a great toy. \
name ""
goto *cirque_a



*cirque_kousanc

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name "Queen Lamia"
>So you won't fight any longer...\
name ""
name "Roza"
>The law of the sea demands the loser to be violated.\
name ""
goto *cirque_a



*cirque_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 && %sinkou=1 goto *cirque_kousana
if %cmd1=15 && %sinkou=2 goto *cirque_kousanb
if %cmd1=15 && %sinkou=3 goto *cirque_kousanc
if %cmd1=16 goto *cirque_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *cirque_main



*cirque_a

if %enemylife<%henkahp1 && %sinkou=1 goto *cirque001
if %enemylife<%henkahp2 && %sinkou=2 goto *cirque002
if %enemylife<%henkahp3 && %sinkou=3 goto *cirque_v
if %sinkou=1 goto *cirque_aa
if %sinkou=2 goto *cirque_ab
if %sinkou=3 goto *cirque_ac



*cirque_aa

rnd2 %ransu,1,12
if %ransu=1 gosub *cirque_a1:gosub *cirque_a5:goto *common_main
if %ransu=2 gosub *cirque_a2:gosub *cirque_a5:goto *common_main
if %ransu=3 gosub *cirque_a3:gosub *cirque_a5:goto *common_main
if %ransu=4 gosub *cirque_a1:gosub *cirque_a6:goto *common_main
if %ransu=5 gosub *cirque_a2:gosub *cirque_a6:goto *common_main
if %ransu=6 gosub *cirque_a3:gosub *cirque_a6:goto *common_main
if %ransu<9 && %owaza_count3a>5 gosub *cirque_a4:goto *common_main
if %ransu>8 && %owaza_count1a>3 gosub *cirque_a7:goto *common_main
skip -9



*cirque_ab

if %kousoku=1 gosub *cirque_a15:goto *common_main
rnd2 %ransu,1,8
if %ransu=1 gosub *cirque_a9:gosub *cirque_a12:goto *common_main
if %ransu=2 gosub *cirque_a10:gosub *cirque_a12:goto *common_main
if %ransu=3 gosub *cirque_a9:gosub *cirque_a13:goto *common_main
if %ransu=4 gosub *cirque_a10:gosub *cirque_a13:goto *common_main
if %ransu=5 && %owaza_count3a>5 gosub *cirque_a11:gosub *cirque_a12:goto *common_main
if %ransu=6 && %owaza_count3a>5 gosub *cirque_a11:gosub *cirque_a13:goto *common_main
if %ransu>6 && %owaza_count1a>5 gosub *cirque_a14:goto *common_main
skip -8



*cirque_ac

if %kousoku=1 gosub *cirque_a24:goto *common_main
rnd2 %ransu,1,13
if %ransu=1 gosub *cirque_a16:gosub *cirque_a20:goto *common_main
if %ransu=2 gosub *cirque_a17:gosub *cirque_a20:goto *common_main
if %ransu=3 gosub *cirque_a18:gosub *cirque_a20:goto *common_main
if %ransu=4 gosub *cirque_a16:gosub *cirque_a21:goto *common_main
if %ransu=5 gosub *cirque_a17:gosub *cirque_a21:goto *common_main
if %ransu=6 gosub *cirque_a18:gosub *cirque_a21:goto *common_main
if %ransu=7 gosub *cirque_a16:gosub *cirque_a22:goto *common_main
if %ransu=8 gosub *cirque_a17:gosub *cirque_a22:goto *common_main
if %ransu=9 gosub *cirque_a18:gosub *cirque_a22:goto *common_main
if %ransu<12 && %owaza_count3a>5 gosub *cirque_a19:goto *common_main
if %ransu<14 && %owaza_count1a>5 gosub *cirque_a23:goto *common_main
skip -12



*cirque_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My mouth techniques haven't lost their edge..."
if %ransu=2 mov $sel1,"I've brought many men to their knees..."
if %ransu=3 mov $sel1,"Now, finish inside my mouth..."
name "Fernandez"
eng $sel1:$sel6\
name ""
skillname "Elf Fellatio"
dwave 1,"se\ero_buchu2.ogg"
>Fernandez sucks hard on Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,40
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4038
if %nanido<2 damage 160,170
if %nanido=2 damage 190,200
if %nanido=3 damage 220,230
skillname ""
if %mylife=0 sub %stack,1:return *cirque_h1
sub %stack,1
return



*cirque_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll massage you with these breasts..."
if %ransu=2 mov $sel1,"Scatter your semen across my chest..."
if %ransu=3 mov $sel1,"They're nice and soft..."
name "Fernandez"
eng $sel1:$sel6\
name ""
skillname "Elf Paizuri"
dwave 1,"se\ero_sigoki1.ogg"
>Fernandez sandwiches Luka's penis between her breasts, and uses them to massage him!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,40
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4039
if %nanido<2 damage 170,180
if %nanido=2 damage 200,210
if %nanido=3 damage 230,240
skillname ""
if %mylife=0 sub %stack,1:return *cirque_h2
sub %stack,1
return



*cirque_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My footwork is top class, of course..."
if %ransu=2 mov $sel1,"Finish beneath my feet."
if %ransu=3 mov $sel1,"Do you want to be kicked? Or stepped on?"
name "Fernandez"
eng $sel1:$sel6\
name ""
skillname "Elf Footjob"
dwave 1,"se\ero_koki1.ogg"
>Fernandez steps down hard on Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,40
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4040
if %nanido<2 damage 180,190
if %nanido=2 damage 210,220
if %nanido=3 damage 240,250
skillname ""
if %mylife=0 sub %stack,1:return *cirque_h3
sub %stack,1
return



*cirque_a4

add %stack,1
mov %owaza_count3a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll crush you with my ass..."
if %ransu=2 mov $sel1,"My ass is nice and soft, too..."
if %ransu=3 mov $sel1,"Cover my ass with your semen..."
name "Fernandez"
eng $sel1:$sel6\
name ""
skillname "Ass Press"
dwave 1,"se\ero_koki1.ogg"
lsp 690,":a;chara\cirque_ct01.bmp",0,0:print 10,500
>Fernandez turns around and presses her ass against Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,40
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4041
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
dwave 1,"se\ero_koki1.ogg"
>She squeezes his penis between her ass cheeks!
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
dwave 1,"se\ero_koki1.ogg"
>Moving side to side, she rubs her ass against his penis!
if %nanido<2 damage 100,110
if %nanido=2 damage 110,120
if %nanido=3 damage 120,130
skillname ""
if %mylife=0 sub %stack,1:return *cirque_h4
if %kousan<2 csp 690:print 10,500
sub %stack,1
return



*cirque_a5

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck on the tip..."
if %ransu=2 mov $sel1,"All men come in seconds to my tongue..."
if %ransu=3 mov $sel1,"I'll make you come with my mouth..."
name "Queen Harpy"
eng $sel1:$sel6\
name ""
skillname "Harpy's Horny Mouth"
dwave 1,"se\ero_buchu2.ogg"
>Queen Harpy sucks hard on Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,40
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4042
if %nanido<2 damage 160,170
if %nanido=2 damage 190,200
if %nanido=3 damage 220,230
skillname ""
if %mylife=0 sub %stack,1:return *cirque_h5
sub %stack,1
return



*cirque_a6

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I may not have hands... But I have breasts."
if %ransu=2 mov $sel1,"All men are helpless between my breasts."
if %ransu=3 mov $sel1,"Do you want your penis sandwiched between these?"
name "Queen Harpy"
eng $sel1:$sel6\
name ""
skillname "Queen's Tit Fuck"
dwave 1,"se\ero_koki1.ogg"
>Queen Harpy squeezes Luka's penis between her large breasts!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,40
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4043
if %nanido<2 damage 170,180
if %nanido=2 damage 200,210
if %nanido=3 damage 230,240
skillname ""
if %mylife=0 sub %stack,1:return *cirque_h6
sub %stack,1
return



*cirque_a7

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 5
name "Queen Harpy"
>Hehe... Too slow.@
>I'll prey on that penis with my vagina...\
name ""
skillname "Happiness Rondo"
eng "Queen Harpy grabs hold of Luka, and presses her waist against his!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
dwave 1,"se\ero_pyu1.ogg"
cspl 700,702
lsp 690,":a;chara\cirque_ct42.bmp",0,0:print 10,500
>Luka's penis sinks inside her hot vagina!
skillcount3 4044
mov %damage_kotei,1
damage 500,600
mov %kousoku,1:gosub *status_print
>Luka is being raped by Queen Harpy!\
skillname ""
if %mylife=0 sub %stack,1:return *cirque_h7
name "Luka"
>Ahh!\
name ""
>Before I knew what hit me, I was inside Queen Harpy's wet vagina, the soft bumps rubbing against my penis with every flap of her wings.\
name "Queen Harpy"
>My vagina is just as good, even after death...\
name ""
sub %stack,1
goto *cirque_a8



*cirque_a8

add %stack,1
>Luka is being raped by Queen Harpy...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Don't hold back... Ejaculate inside me.":mov $sel2,"Queen Harpy moves side to side, grinding Luka's penis against her vaginal walls!"
if %ransu=2 mov $sel1,"You can't endure this, can you?":mov $sel2,"Queen Harpy bounces up and down, riding Luka!"
if %ransu=3 mov $sel1,"Hurry up and come... Don't hold back.":mov $sel2,"Queen Harpy pushes down hard, forcing Luka's penis all the way inside her!"
if %ransu=4 mov $sel1,"It feels good when I squeeze like this, doesn't it?":mov $sel2,"Queen Harpy slowly tightens her vagina around Luka's penis!"
if %ransu=5 mov $sel1,"Hurry up and come!":mov $sel2,"Queen Harpy rapes Luka hard!"
name "Queen Harpy"
eng $sel1:$sel6\
name ""
skillname "Happiness Rondo"
dwave 1,"se\ero_chupa4.ogg"
eng $sel2:$sel6
skillcount3 4044
mov %damage_kotei,1
damage 500,600
skillname ""
if %mylife=0 sub %stack,1:return *cirque_h8
sub %stack,1
goto *cirque_a8



*cirque_a9

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll kiss the little hole. "
if %ransu=2 mov $sel1,"I'll kiss him where he leaks. "
if %ransu=3 mov $sel1,"Just like sucking nectar from a flower. "
name "Titania"
eng $sel1:$sel6\
name ""
skillname "Urethra Kiss"
dwave 1,"se\ero_chupa2.ogg"
>Titania clings to Luka's penis, and kisses the tip!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<60 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4045
if %nanido<2 damage 80,90
if %nanido=2 damage 100,110
if %nanido=3 damage 120,130
dwave 1,"se\ero_pyu2.ogg"
>Her tiny tongue runs back and forth across his urethral hole!
if %nanido<2 damage 80,90
if %nanido=2 damage 100,110
if %nanido=3 damage 120,130
skillname ""
if %mylife=0 sub %stack,1:return *cirque_h9
sub %stack,1
return



*cirque_a10

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll hug your penis!"
if %ransu=2 mov $sel1,"Does it like being hugged?"
if %ransu=3 mov $sel1,"I'll hug you until you come!"
name "Titania"
eng $sel1:$sel6\
name ""
skillname "Fairy Hug"
dwave 1,"se\ero_koki1.ogg"
>Titania clings to Luka's penis, and hugs it tight!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<60 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4046
if %nanido<2 damage 90,100
if %nanido=2 damage 110,120
if %nanido=3 damage 130,140
dwave 1,"se\ero_koki1.ogg"
>While embracing Luka's penis, Titania massages his tip with her arms!
if %nanido<2 damage 90,100
if %nanido=2 damage 110,120
if %nanido=3 damage 130,140
skillname ""
if %mylife=0 sub %stack,1:return *cirque_h10
sub %stack,1
return



*cirque_a11

add %stack,1
mov %owaza_count3a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll play with your penis... "
if %ransu=2 mov $sel1,"Hurry up and come! "
if %ransu=3 mov $sel1,"If I do this, your penis will come right away! "
name "Titania"
eng $sel1:$sel6\
name ""
skillname "A Midsummer Night's Dream"
vsp 700,0
vsp 702,0
lsp 690,":a;chara\cirque_ct11.bmp",0,0:print 10,500
>Titania hugs Luka's penis, and puts her tiny panties on his tip!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<60 csp 690:vsp 700,1:vsp 702,1:gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":csp 690:vsp 700,1:vsp 702,1:gosub *wind_guard:sub %stack,1:return
skillcount3 4047
if %nanido<2 damage 80,90
if %nanido=2 damage 90,100
if %nanido=3 damage 100,110
dwave 1,"se\ero_koki1.ogg"
>At the same time, she rubs her bare vagina against his shaft!
if %nanido<2 damage 80,90
if %nanido=2 damage 90,100
if %nanido=3 damage 100,110
dwave 1,"se\ero_koki1.ogg"
>Using her small hands, she massages his tip with her silky panties!
if %nanido<2 damage 80,90
if %nanido=2 damage 90,100
if %nanido=3 damage 100,110
skillname ""
if %mylife=0 sub %stack,1:return *cirque_h11
if %kousan<2 csp 690:vsp 700,1:vsp 702,1:print 10,500
sub %stack,1
return



*cirque_a12

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll show your body some love with my tentacles..."
if %ransu=2 mov $sel1,"Now, immerse yourself in my caress..."
if %ransu=3 mov $sel1,"I'll caress you all over."
name "Queen Scylla"
eng $sel1:$sel6\
name ""
skillname "Queen's Tentacle Caress"
dwave 1,"se\ero_makituki2.ogg"
>Queen Scylla's tentacles caress Luka all over!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<60 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4048
if %nanido<2 damage 170,180
if %nanido=2 damage 200,210
if %nanido=3 damage 230,240
skillname ""
if %mylife=0 sub %stack,1:return *cirque_h12
sub %stack,1
return



*cirque_a13

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Get a good taste of my tentacles..."
if %ransu=2 mov $sel1,"I know how to handle a man's penis."
if %ransu=3 mov $sel1,"You can ejaculate whenever you want..."
name "Queen Scylla"
eng $sel1:$sel6\
name ""
skillname "Queen's Tentacle Squeeze"
dwave 1,"se\ero_makituki2.ogg"
>Queen Scylla's tentacles coil around Luka's penis and squeeze!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<60 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4049
if %nanido<2 damage 180,190
if %nanido=2 damage 210,220
if %nanido=3 damage 240,250
skillname ""
if %mylife=0 sub %stack,1:return *cirque_h13
sub %stack,1
return



*cirque_a14

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 4
name "Queen Scylla"
>I'll give you a good taste of my mouth skills...\
name ""
skillname "Inferno-de-Scylla"
dwave 1,"se\ero_makituki3.ogg"
eng "Queen Scylla's tentacles coil around Luka's body!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
dwave 2,"se\ero_buchu2.ogg"
\
lsp 690,":a;chara\cirque_ct51.bmp",0,0:print 10,500
>Binding Luka in tentacles, she sucks his penis into her mouth!
skillcount3 4050
if %nanido<2 damage 200,220
if %nanido=2 damage 260,280
if %nanido=3 damage 320,340
mov %kousoku,1:gosub *status_print
>Luka has been bound by Queen Scylla!\
skillname ""
if %mylife=0 sub %stack,1:return *cirque_h14
name "Queen Scylla"
>Can you feel the tentacles even inside my mouth?\
name ""
if %earth=0 && %nanido<2 mov %genmogaku,2
if %earth=0 && %nanido=2 mov %genmogaku,2
if %earth=0 && %nanido=3 mov %genmogaku,3
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,1
sub %stack,1
return



*cirque_a15

add %stack,1
>Luka has been bound by Queen Scylla...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Do my mouth tentacles feel good?"
if %ransu=2 mov $sel1,"How does it feel to be sucked like this?"
if %ransu=3 mov $sel1,"You can come inside my mouth whenever you want..."
name "Queen Scylla"
eng $sel1:$sel6\
name ""
skillname "Inferno-de-Scylla"
dwave 1,"se\ero_buchu2.ogg"
>Queen Scylla sucks hard on Luka's penis!
skillcount3 4050
if %nanido<2 damage 100,120
if %nanido=2 damage 130,150
if %nanido=3 damage 160,180
dwave 1,"se\ero_makituki2.ogg"
>The countless tentacles inside her mouth coil around his penis!
if %nanido<2 damage 100,120
if %nanido=2 damage 130,150
if %nanido=3 damage 160,180
skillname ""
if %mylife=0 sub %stack,1:return *cirque_h14
sub %stack,1
return



*cirque_a16

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll rub it with my flipper..."
if %ransu=2 mov $sel1,"I'll coil this flipper around it..."
if %ransu=3 mov $sel1,"Cover my hands in semen..."
name "Roza"
eng $sel1:$sel6\
name ""
skillname "Roza's Hands"
dwave 1,"se\ero_koki1.ogg"
>Roza skillfully strokes Luka's penis between her hand and flipper!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4051
if %nanido<2 damage 150,160
if %nanido=2 damage 180,190
if %nanido=3 damage 210,220
skillname ""
if %mylife=0 sub %stack,1:return *cirque_h15
sub %stack,1
return



*cirque_a17

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck it hard, so come a lot..."
if %ransu=2 mov $sel1,"My oral techniques are unrivaled..."
if %ransu=3 mov $sel1,"I'll suck it out... By force..."
name "Roza"
eng $sel1:$sel6\
name ""
skillname "Roza's Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>Roza sucks hard on Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4052
if %nanido<2 damage 160,170
if %nanido=2 damage 190,200
if %nanido=3 damage 220,230
skillname ""
if %mylife=0 sub %stack,1:return *cirque_h16
sub %stack,1
return



*cirque_a18

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"A mermaid's tail is soft..."
if %ransu=2 mov $sel1,"I'm more skilled with my tail than with my hands..."
if %ransu=3 mov $sel1,"I'll squeeze you with my tail..."
name "Roza"
eng $sel1:$sel6\
name ""
skillname "Roza's Firetta"
dwave 1,"se\ero_koki1.ogg"
>Roza squeezes Luka's penis with her tail, and strokes him!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4053
if %nanido<2 damage 170,180
if %nanido=2 damage 200,210
if %nanido=3 damage 230,240
skillname ""
if %mylife=0 sub %stack,1:return *cirque_h17
sub %stack,1
return



*cirque_a19

add %stack,1
mov %owaza_count3a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Drown in my breasts..."
if %ransu=2 mov $sel1,"You'll be one of many who have succumbed to these..."
if %ransu=3 mov $sel1,"No man can resist these..."
name "Roza"
eng $sel1:$sel6\
name ""
skillname "Roza's Breasts"
lsp 690,":a;chara\cirque_ct21.bmp",0,0:print 10,500
dwave 1,"se\ero_sigoki1.ogg"
>Roza sandwiches Luka's penis between her large breasts!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4054
if %nanido<2 damage 100,120
if %nanido=2 damage 120,140
if %nanido=3 damage 140,160
dwave 1,"se\ero_sigoki1.ogg"
>She uses her hands to move her breasts up and down!
if %nanido<2 damage 100,120
if %nanido=2 damage 120,140
if %nanido=3 damage 140,160
dwave 1,"se\ero_sigoki1.ogg"
>Luka's penis is massaged between her soft, large breasts!
if %nanido<2 damage 100,120
if %nanido=2 damage 120,140
if %nanido=3 damage 140,160
skillname ""
if %mylife=0 sub %stack,1:return *cirque_h18
if %kousan<2 csp 690:print 10,500
sub %stack,1
return



*cirque_a20

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"The touch of my hand is unique..."
if %ransu=2 mov $sel1,"I'll stroke it as I coil around..."
if %ransu=3 mov $sel1,"Come from my snake hands..."
name "Queen Lamia"
eng $sel1:$sel6\
name ""
skillname "Snake Hands"
dwave 1,"se\ero_koki1.ogg"
>Queen Lamia's long snake-like hands coil around Luka's penis as she strokes him!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4055
if %nanido<2 damage 150,160
if %nanido=2 damage 180,190
if %nanido=3 damage 210,220
skillname ""
if %mylife=0 sub %stack,1:return *cirque_h19
sub %stack,1
return



*cirque_a21

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll get a good taste of you with my tongue..."
if %ransu=2 mov $sel1,"I'll wind my tongue around you, and make you come in no time..."
if %ransu=3 mov $sel1,"I'll wind my tongue around you nice and slowly..."
name "Queen Lamia"
eng $sel1:$sel6\
name ""
skillname "Snake Mouth"
dwave 1,"se\ero_buchu2.ogg"
>Queen Lamia coils her long tongue around Luka's penis as she sucks on him!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4056
if %nanido<2 damage 160,170
if %nanido=2 damage 190,200
if %nanido=3 damage 220,230
skillname ""
if %mylife=0 sub %stack,1:return *cirque_h20
sub %stack,1
return



*cirque_a22

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Enjoy this chest as much as you like..."
if %ransu=2 mov $sel1,"Pour your semen on my chest..."
if %ransu=3 mov $sel1,"All men like to be squeezed between breasts, don't they?"
name "Queen Lamia"
eng $sel1:$sel6\
name ""
skillname "Snake Bust"
dwave 1,"se\ero_sigoki1.ogg"
>Queen Lamia squeezes Luka's penis between her breasts!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4057
if %nanido<2 damage 170,180
if %nanido=2 damage 200,210
if %nanido=3 damage 230,240
skillname ""
if %mylife=0 sub %stack,1:return *cirque_h21
sub %stack,1
return



*cirque_a23

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
name "Queen Lamia"
>I wind around my partner before I mate.@
>Just like a snake about to devour their prey...\
name ""
skillname "Snake Hold"
dwave 1,"se\ero_makituki3.ogg"
eng "Queen Lamia's snake body coils around Luka!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>Luka has been bound by Queen Lamia!\
skillname ""
name "Queen Lamia"
>I'll wrap around you like this...@
>And then take you inside my pussy, nice and slowly...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,99
if %earth=0 && %nanido=2 mov %genmogaku,99
if %earth=0 && %nanido=3 mov %genmogaku,99
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
sub %stack,1
return



*cirque_a24

add %stack,1
name "Queen Lamia"
>I'll swallow your genitals.@
>I'm very tight, so get ready...\
name ""
skillname "Snake End"
dwave 1,"se\ero_pyu1.ogg"
lsp 690,":a;chara\cirque_ct31.bmp",0,0:print 10,500
>Queen Lamia pushes forward, taking Luka inside her warm vagina!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4058
mov %damage_kotei,1
damage 500,600
mov %kousoku,1:gosub *status_print
>Luka is being raped by Queen Lamia!\
skillname ""
if %mylife=0 sub %stack,1:return *cirque_h22
name "Luka"
>Ahhhh!\
name ""
>Queen Lamia forces me into her tight vagina, instantly causing me to go weak in her embrace.\
sub %stack,1
goto *cirque_a25



*cirque_a25

add %stack,1
>Luka is being raped by Queen Lamia...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"How does it feel when I move?":mov $sel2,"Queen Lamia shakes her waist back and forth, tossing Luka's penis side to side!"
if %ransu=2 mov $sel1,"Well? My pussy is incredible, isn't it?":mov $sel2,"Queen Lamia squeezes down hard on Luka's penis!"
if %ransu=3 mov $sel1,"You won't forget this, even after you're dead...":mov $sel2,"Queen Lamia rubs her lower body against Luka's!"
if %ransu=4 mov $sel1,"How about like this?":mov $sel2,"Queen Lamia's vaginal walls start to move, massaging Luka's penis!"
if %ransu=5 mov $sel1,"Shall I tease you a little more?":mov $sel2,"Queen Lamia rhythmically squeezes Luka's penis with her vagina!"
name "Queen Lamia"
eng $sel1:$sel6\
name ""
skillname "Snake End"
dwave 1,"se\ero_chupa5.ogg"
eng $sel2:$sel6
skillcount3 4058
mov %damage_kotei,1
damage 500,600
skillname ""
if %mylife=0 sub %stack,1:return *cirque_h23
sub %stack,1
goto *cirque_a25



*cirque_onedari

if %sinkou=1 goto *cirque_onedaria
if %sinkou=2 goto *cirque_onedarib
if %sinkou=3 goto *cirque_onedaric



*cirque_onedaria

mov $list1,"Elf Fellatio"
if %4038>0 mov %list_num1,1
mov $list2,"Elf Paizuri"
if %4039>0 mov %list_num2,1
mov $list3,"Elf Footjob"
if %4040>0 mov %list_num3,1
mov $list4,"Ass Press"
if %4041>0 mov %list_num4,1
mov $list5,"Harpy's Horny Mouth"
if %4042>0 mov %list_num5,1
mov $list6,"Queen's Tit Fuck"
if %4043>0 mov %list_num6,1
mov $list7,"Happiness Rondo"
if %4044>0 mov %list_num7,1
gosub *cmd_onedari
if %cmd1=11 goto *cirque_onedari1
if %cmd1=12 goto *cirque_onedari2
if %cmd1=13 goto *cirque_onedari3
if %cmd1=14 goto *cirque_onedari4
if %cmd1=15 goto *cirque_onedari5
if %cmd1=16 goto *cirque_onedari6
if %cmd1=17 goto *cirque_onedari7
if %cmd1=-1 goto *cirque_main
goto *cirque_onedari



*cirque_onedarib

mov %list_num1,0
mov %list_num2,0
mov %list_num3,0
mov %list_num4,0
mov %list_num5,0
mov %list_num6,0
mov %list_num7,0
mov $list1,"Urethra Kiss"
if %4045>0 mov %list_num1,1
mov $list2,"Fairy Hug"
if %4046>0 mov %list_num2,1
mov $list3,"A Midsummer Night's Dream"
if %4047>0 mov %list_num3,1
mov $list4,"Queen's Tentacle Caress"
if %4048>0 mov %list_num4,1
mov $list5,"Queen's Tentacle Squeeze"
if %4049>0 mov %list_num5,1
mov $list6,"Inferno-de-Scylla"
if %4050>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *cirque_onedari8
if %cmd1=12 goto *cirque_onedari9
if %cmd1=13 goto *cirque_onedari10
if %cmd1=14 goto *cirque_onedari11
if %cmd1=15 goto *cirque_onedari12
if %cmd1=16 goto *cirque_onedari13
if %cmd1=-1 goto *cirque_main
goto *cirque_onedari



*cirque_onedaric

mov %list_num1,0
mov %list_num2,0
mov %list_num3,0
mov %list_num4,0
mov %list_num5,0
mov %list_num6,0
mov %list_num7,0
mov %list_num8,0
mov $list1,"Roza's Hands"
if %4051>0 mov %list_num1,1
mov $list2,"Roza's Blowjob"
if %4052>0 mov %list_num2,1
mov $list3,"Roza's Firetta"
if %4053>0 mov %list_num3,1
mov $list4,"Roza's Breasts"
if %4054>0 mov %list_num4,1
mov $list5,"Snake Hands"
if %4055>0 mov %list_num5,1
mov $list6,"Snake Mouth"
if %4056>0 mov %list_num6,1
mov $list7,"Snake Bust"
if %4057>0 mov %list_num7,1
mov $list8,"Snake End"
if %4058>0 mov %list_num8,1
gosub *cmd_onedari
if %cmd1=11 goto *cirque_onedari14
if %cmd1=12 goto *cirque_onedari15
if %cmd1=13 goto *cirque_onedari16
if %cmd1=14 goto *cirque_onedari17
if %cmd1=15 goto *cirque_onedari18
if %cmd1=16 goto *cirque_onedari19
if %cmd1=17 goto *cirque_onedari20
if %cmd1=18 goto *cirque_onedari21
if %cmd1=-1 goto *cirque_main
goto *cirque_onedari



*cirque_onedari1

gosub *onedari_syori
name "Fernandez"
>You want to finish in my mouth?@
>I won't let you off lightly, then...\
name ""
gosub *cirque_a1
skip -1



*cirque_onedari2

gosub *onedari_syori
name "Fernandez"
>You want to finish on my breasts?@
>I won't let you off lightly, then...\
name ""
gosub *cirque_a2
skip -1



*cirque_onedari3

gosub *onedari_syori
name "Fernandez"
>You want to finish on my foot?@
>I won't let you off lightly, then...\
name ""
gosub *cirque_a3
skip -1



*cirque_onedari4

gosub *onedari_syori
name "Fernandez"
>You want to finish on my ass?@
>I won't let you off lightly, then...\
name ""
gosub *cirque_a4
skip -1



*cirque_onedari5

gosub *onedari_syori
name "Queen Harpy"
>You want me to suck on your penis?@
>Then I'll give you a taste of a Queen's sexual skills!\
name ""
gosub *cirque_a5
skip -1



*cirque_onedari6

gosub *onedari_syori
name "Queen Harpy"
>You want me to squeeze your penis with my breasts?@
>Then I'll give you a taste of a Queen's sexual skills!\
name ""
gosub *cirque_a6
skip -1



*cirque_onedari7

gosub *onedari_syori
name "Queen Harpy"
>You want me to rape you?@
>Then I'll give you a taste of a Queen's sexual skills!\
name ""
gosub *cirque_a7
skip -1



*cirque_onedari8

gosub *onedari_syori
name "Titania"
>Ahaha, you want me to kiss your penis?@
>Ok, I'll kiss it a lot! \
name ""
gosub *cirque_a9
skip -1



*cirque_onedari9

gosub *onedari_syori
name "Titania"
>Ahaha, you want me to hug your penis?@
>Ok, I'll hug it a lot! \
name ""
gosub *cirque_a10
skip -1



*cirque_onedari10

gosub *onedari_syori
name "Titania"
>Ahaha, you want me to toy with your penis?@
>Ok, I'll turn it into a good toy! \
name ""
gosub *cirque_a11
skip -1



*cirque_onedari11

gosub *onedari_syori
name "Queen Scylla"
>You want to feel my tentacles all over your body?@
>Then, as you wish...\
name ""
gosub *cirque_a12
skip -1



*cirque_onedari12

gosub *onedari_syori
name "Queen Scylla"
>You want me to tease you with my tentacles?@
>Then, as you wish...\
name ""
gosub *cirque_a13
skip -1



*cirque_onedari13

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name "Queen Scylla"
>You want me to suck on you?@
>Then, as you wish...\
name ""
if %kousoku=0 gosub *cirque_a14
gosub *cirque_a15
skip -1



*cirque_onedari14

gosub *onedari_syori
name "Roza"
>You want to taste my handjob?@
>Then let's see how long you can last...\
name ""
gosub *cirque_a16
skip -1



*cirque_onedari15

gosub *onedari_syori
name "Roza"
>You want to taste my blowjob?@
>Then let's see how long you can last...\
name ""
gosub *cirque_a17
skip -1



*cirque_onedari16

gosub *onedari_syori
name "Roza"
>You want to taste my tailjob?@
>Then let's see how long you can last...\
name ""
gosub *cirque_a18
skip -1



*cirque_onedari17

gosub *onedari_syori
name "Roza"
>You want to taste my tit fuck?@
>Then let's see how long you can last...\
name ""
gosub *cirque_a19
skip -1



*cirque_onedari18

gosub *onedari_syori
name "Queen Lamia"
>You want me to pleasure you with my hands?@
>Then I'll give you a good taste...\
name ""
gosub *cirque_a20
skip -1



*cirque_onedari19

gosub *onedari_syori
name "Queen Lamia"
>You want me to pleasure you with my mouth?@
>Then I'll give you a good taste...\
name ""
gosub *cirque_a21
skip -1



*cirque_onedari20

gosub *onedari_syori
name "Queen Lamia"
>You want me to pleasure you with my breasts?@
>Then I'll give you a good taste...\
name ""
gosub *cirque_a22
skip -1



*cirque_onedari21

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name "Queen Lamia"
>You want me to wrap you up and rape you?@
>Then let's enjoy mating together...\
name ""
if %kousoku=0 gosub *cirque_a23
gosub *cirque_a24
skip -1



*cirque_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\cirque_bk01.bmp",-190,0
gosub *syasei2
>As Fernandez sucks on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2730,%2730+1:if %2730=1 mov %count_koenemy,%count_koenemy+1
if %2730>%count_most mov %count_most,%2730:mov $count_mostname,$name
count 4,8
mov $bad1,"Fernandez forced Luka to come with her mouth."
gosub *face2
name "Fernandez"
>Hmph, pitiful...@
>You defiled my mouth with so much so easily?\
name ""
mov $tatie2,"cirque_st02"
mov %zmonster_x,-300
goto *cirque_h



*cirque_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\cirque_bk02.bmp",-190,0
gosub *syasei2
>As Fernandez squeezes Luka's penis between her breasts, he comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2730,%2730+1:if %2730=1 mov %count_koenemy,%count_koenemy+1
if %2730>%count_most mov %count_most,%2730:mov $count_mostname,$name
count 4,7
mov $bad1,"Fernandez forced Luka to come with her breasts."
gosub *face2
name "Fernandez"
>Hmph, pitiful...@
>You defiled my breasts with so much so easily?\
name ""
mov $tatie2,"cirque_st02"
mov %zmonster_x,-300
goto *cirque_h



*cirque_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\cirque_bk04.bmp",-190,0
gosub *syasei2
>As Fernandez steps on Luka's penis, he comes, covering her foot with semen.\
mov %viclose,1:gosub *lose
mov %2730,%2730+1:if %2730=1 mov %count_koenemy,%count_koenemy+1
if %2730>%count_most mov %count_most,%2730:mov $count_mostname,$name
count 6,7
mov $bad1,"Fernandez forced Luka to come with her foot."
gosub *face2
name "Fernandez"
>Hmph, pitiful...@
>You defiled my foot with so much so easily?\
name ""
mov $tatie2,"cirque_st02"
mov %zmonster_x,-300
goto *cirque_h



*cirque_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\cirque_ct02.bmp",0,0
lsp 693,":a;chara\cirque_bk03.bmp",-190,0
gosub *syasei2
>As Fernandez squeezes Luka's penis between her soft ass cheeks, he comes, covering her back with semen.\
mov %viclose,1:gosub *lose
mov %2730,%2730+1:if %2730=1 mov %count_koenemy,%count_koenemy+1
if %2730>%count_most mov %count_most,%2730:mov $count_mostname,$name
count 34,7
mov $bad1,"Fernandez forced Luka to come with her ass."
gosub *face2
name "Fernandez"
>Hmph, pitiful...@
>You defiled my ass with so much so easily?\
name ""
csp 690:print 10,500
mov $tatie2,"cirque_st02"
mov %zmonster_x,-300
goto *cirque_h



*cirque_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\cirque_bk41.bmp",180,0
gosub *syasei2
>As Queen Harpy sucks on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2730,%2730+1:if %2730=1 mov %count_koenemy,%count_koenemy+1
if %2730>%count_most mov %count_most,%2730:mov $count_mostname,$name
count 4,7
mov $bad1,"Queen Harpy forced Luka to come with her mouth."
gosub *face2
name "Queen Harpy"
>Ahaha, how simple.@
>Did a Queen's mouth techniques overpower you so easily?\
name ""
mov $tatie2,"cirque_st42"
mov %zmonster_x,-300
goto *cirque_h



*cirque_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\cirque_bk42.bmp",180,0
gosub *syasei2
>As Queen Harpy massages Luka's penis between her breasts, he comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2730,%2730+1:if %2730=1 mov %count_koenemy,%count_koenemy+1
if %2730>%count_most mov %count_most,%2730:mov $count_mostname,$name
count 7,7
mov $bad1,"Queen Harpy forced Luka to come with her breasts."
gosub *face2
name "Queen Harpy"
>Ahaha, how simple.@
>Did a Queen's breast techniques overpower you so easily?\
name ""
mov $tatie2,"cirque_st42"
mov %zmonster_x,-300
goto *cirque_h



*cirque_h7

mov %ikigoe,3:gosub *ikigoe
name "Queen Harpy"
>Ahaha, already?\
name ""
gosub *syasei1
lsp 690,":a;chara\cirque_ct43.bmp",0,0
gosub *syasei2
>The moment Luka is forced into Queen Harpy's rough vagina, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2730,%2730+1:if %2730=1 mov %count_koenemy,%count_koenemy+1
if %2730>%count_most mov %count_most,%2730:mov $count_mostname,$name
count 7,7
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Queen Harpy forced Luka to come the moment of insertion."
name "Queen Harpy"
>That was incredibly fast...@
>Even if my vagina is Queen class, you should have endured a little longer...\
name ""
mov $tatie2,"cirque_st42"
mov %zmonster_x,-300
goto *cirque_h



*cirque_h8

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\cirque_ct43.bmp",0,0
gosub *syasei2
>As Queen Harpy rapes Luka, he comes, filling her rough vagina with semen.\
mov %viclose,1:gosub *lose
mov %2730,%2730+1:if %2730=1 mov %count_koenemy,%count_koenemy+1
if %2730>%count_most mov %count_most,%2730:mov $count_mostname,$name
count 7,7
mov $bad1,"Queen Harpy forced Luka to come as she raped him."
name "Queen Harpy"
>Aha, you shot so much inside...@
>Isn't a Queen's vagina the best?\
name ""
mov $tatie2,"cirque_st42"
mov %zmonster_x,-300
goto *cirque_h



*cirque_h9

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\cirque_bk11.bmp",180,0
gosub *syasei2
>As Titania kisses and licks Luka's urethral hole, Luka comes, covering her tiny body in semen.\
mov %viclose,1:gosub *lose
mov %2730,%2730+1:if %2730=1 mov %count_koenemy,%count_koenemy+1
if %2730>%count_most mov %count_most,%2730:mov $count_mostname,$name
count 4,8
mov $bad1,"Titania forced Luka to come as she kissed his penis."
gosub *face2
name "Titania"
>Ahaha, he came! @
>Having a Fairy make your penis feel good is the best, isn't it?\
name ""
mov $tatie2,"cirque_st12"
mov %zmonster_x,-300
goto *cirque_h



*cirque_h10

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\cirque_bk12.bmp",180,0
gosub *syasei2
>As Titania hugs Luka's penis with her small body, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2730,%2730+1:if %2730=1 mov %count_koenemy,%count_koenemy+1
if %2730>%count_most mov %count_most,%2730:mov $count_mostname,$name
count 24,8
mov $bad1,"Titania forced Luka to come as she hugged his penis."
gosub *face2
name "Titania"
>Ahaha, he came! @
>Having a Fairy make your penis feel good is the best, isn't it?\
name ""
mov $tatie2,"cirque_st12"
mov %zmonster_x,-300
goto *cirque_h



*cirque_h11

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\cirque_ct12.bmp",0,0
gosub *syasei2
>As Titania plays with Luka's penis using her panties, he comes, covering her small body with semen.\
mov %viclose,1:gosub *lose
mov %2730,%2730+1:if %2730=1 mov %count_koenemy,%count_koenemy+1
if %2730>%count_most mov %count_most,%2730:mov $count_mostname,$name
count 24,8
mov $bad1,"Titania forced Luka to come as she rubbed his tip with her panties."
name "Titania"
>Ahaha, he came! @
>Having a Fairy make your penis feel good is the best, isn't it?\
name ""
mov $tatie2,"cirque_st12"
mov %zmonster_x,-300
goto *cirque_h



*cirque_h12

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\cirque_bk54.bmp",-160,0
gosub *syasei2
>As Queen Scylla caresses Luka's body with her tentacles, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2730,%2730+1:if %2730=1 mov %count_koenemy,%count_koenemy+1
if %2730>%count_most mov %count_most,%2730:mov $count_mostname,$name
count 10,8
mov $bad1,"Queen Scylla forced Luka to come with her tentacles."
gosub *face2
name "Queen Scylla"
>Did you enjoy my tentacles?@
>Now, please treat us all to your semen...\
name ""
mov $tatie2,"cirque_st52"
mov %zmonster_x,-250
goto *cirque_h



*cirque_h13

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\cirque_bk53.bmp",-160,0
gosub *syasei2
>As Queen Scylla strokes Luka's penis with her tentacles, he comes, cover them with semen.\
mov %viclose,1:gosub *lose
mov %2730,%2730+1:if %2730=1 mov %count_koenemy,%count_koenemy+1
if %2730>%count_most mov %count_most,%2730:mov $count_mostname,$name
count 10,8
mov $bad1,"Queen Scylla forced Luka to come with her tentacles."
gosub *face2
name "Queen Scylla"
>Did you enjoy my tentacles?@
>Now, please treat us all to your semen...\
name ""
mov $tatie2,"cirque_st52"
mov %zmonster_x,-250
goto *cirque_h



*cirque_h14

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\cirque_ct52.bmp",0,0
lsp 692,":a;chara\cirque_bk52.bmp",-160,0
gosub *syasei2
>As Queen Scylla sucks on Luka's penis with her mouth of tentacles, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2730,%2730+1:if %2730=1 mov %count_koenemy,%count_koenemy+1
if %2730>%count_most mov %count_most,%2730:mov $count_mostname,$name
count 4,8
mov $bad1,"Queen Scylla forced Luka to come with her mouth."
gosub *face2
name "Queen Scylla"
>Did you enjoy my mouth?@
>Now, please treat us all to your semen...\
name ""
mov $tatie2,"cirque_st52"
mov %zmonster_x,-250
goto *cirque_h



*cirque_h15

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\cirque_bk24.bmp",-220,0
gosub *syasei2
>As Roza strokes Luka's penis with her flipper and hands, he comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2730,%2730+1:if %2730=1 mov %count_koenemy,%count_koenemy+1
if %2730>%count_most mov %count_most,%2730:mov $count_mostname,$name
count 5,8
mov $bad1,"Roza forced Luka to come with her handjob."
gosub *face2
name "Roza"
>Already satisfied...?@
>No different from any other man...\
name ""
mov $tatie2,"cirque_st22"
mov %zmonster_x,-330
goto *cirque_h



*cirque_h16

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\cirque_bk21.bmp",-220,0
gosub *syasei2
>As Roza sucks on his penis, Luka comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2730,%2730+1:if %2730=1 mov %count_koenemy,%count_koenemy+1
if %2730>%count_most mov %count_most,%2730:mov $count_mostname,$name
count 4,8
mov $bad1,"Roza forced Luka to come with her mouth."
gosub *face2
name "Roza"
>Already satisfied...?@
>No different from any other man...\
name ""
mov $tatie2,"cirque_st22"
mov %zmonster_x,-330
goto *cirque_h



*cirque_h17

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\cirque_bk23.bmp",-220,0
gosub *syasei2
>As Roza strokes Luka's penis with her tail, he comes, covering it with semen.\
mov %viclose,1:gosub *lose
mov %2730,%2730+1:if %2730=1 mov %count_koenemy,%count_koenemy+1
if %2730>%count_most mov %count_most,%2730:mov $count_mostname,$name
count 19,8
mov $bad1,"Roza forced Luka to come with her tail."
gosub *face2
name "Roza"
>Already satisfied...?@
>No different from any other man...\
name ""
mov $tatie2,"cirque_st22"
mov %zmonster_x,-330
goto *cirque_h



*cirque_h18

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\cirque_ct22.bmp",0,0
lsp 692,":a;chara\cirque_bk22.bmp",-220,0
gosub *syasei2
>As Roza squeezes Luka's penis between her breasts, he comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2730,%2730+1:if %2730=1 mov %count_koenemy,%count_koenemy+1
if %2730>%count_most mov %count_most,%2730:mov $count_mostname,$name
count 7,8
mov $bad1,"Roza forced Luka to come with her breasts."
gosub *face2
name "Roza"
>Already satisfied...?@
>No different from any other man...\
name ""
mov $tatie2,"cirque_st22"
mov %zmonster_x,-330
goto *cirque_h



*cirque_h19

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\cirque_bk33.bmp",180,0
gosub *syasei2
>As Queen Lamia strokes Luka's penis with her snake-like hands, he comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2730,%2730+1:if %2730=1 mov %count_koenemy,%count_koenemy+1
if %2730>%count_most mov %count_most,%2730:mov $count_mostname,$name
count 5,8
mov $bad1,"Queen Lamia forced Luka to come with her handjob."
gosub *face2
name "Queen Lamia"
>This is quite a lot...@
>Did my sexual techniques feel that great?\
name ""
mov $tatie2,"cirque_st32"
mov %zmonster_x,-300
goto *cirque_h



*cirque_h20

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\cirque_bk31.bmp",180,0
gosub *syasei2
>As Queen Lamia's long tongue coils around Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2730,%2730+1:if %2730=1 mov %count_koenemy,%count_koenemy+1
if %2730>%count_most mov %count_most,%2730:mov $count_mostname,$name
count 4,8
mov $bad1,"Queen Lamia forced Luka to come with her blowjob."
gosub *face2
name "Queen Lamia"
>This is quite a lot...@
>Did my sexual techniques feel that great?\
name ""
mov $tatie2,"cirque_st32"
mov %zmonster_x,-300
goto *cirque_h



*cirque_h21

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\cirque_bk32.bmp",180,0
gosub *syasei2
>As Queen Lamia massages Luka's penis with her soft breasts, he comes, covering her chest in semen.\
mov %viclose,1:gosub *lose
mov %2730,%2730+1:if %2730=1 mov %count_koenemy,%count_koenemy+1
if %2730>%count_most mov %count_most,%2730:mov $count_mostname,$name
count 7,8
mov $bad1,"Queen Lamia forced Luka to come with breasts."
gosub *face2
name "Queen Lamia"
>This is quite a lot...@
>Did my sexual techniques feel that great?\
name ""
mov $tatie2,"cirque_st32"
mov %zmonster_x,-300
goto *cirque_h



*cirque_h22

mov %ikigoe,3:gosub *ikigoe
name "Queen Lamia"
>It hasn't even been ten seconds yet...\
name ""
gosub *syasei1
lsp 694,":a;chara\cirque_bk34.bmp",180,0
lsp 690,":a;chara\cirque_ct32.bmp",0,0
gosub *syasei2
>The instant Luka is forced into Queen Lamia's tight vagina, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2730,%2730+1:if %2730=1 mov %count_koenemy,%count_koenemy+1
if %2730>%count_most mov %count_most,%2730:mov $count_mostname,$name
count 1,8
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Queen Lamia forced Luka to come the moment of insertion."
gosub *face2
name "Queen Lamia"
>That was rather fast...@
>Did my pussy truly feel that good?\
name ""
mov $tatie2,"cirque_st32"
mov %zmonster_x,-300
goto *cirque_h



*cirque_h23

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\cirque_bk34.bmp",180,0
lsp 690,":a;chara\cirque_ct32.bmp",0,0
gosub *syasei2
>As Queen Lamia's tight vagina squeezes Luka, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2730,%2730+1:if %2730=1 mov %count_koenemy,%count_koenemy+1
if %2730>%count_most mov %count_most,%2730:mov $count_mostname,$name
count 1,8
mov $bad1,"Queen Lamia forced Luka to come as she raped him."
gosub *face2
name "Queen Lamia"
>You came quite a lot...@
>My pussy is nice and tight, isn't it?\
name ""
mov $tatie2,"cirque_st32"
mov %zmonster_x,-300
goto *cirque_h



*cirque_h

mov $bad2,"Luka was gang-raped until his death."
if %2730=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahhh...\
name ""
>After being defeated by the Cirque du Croix, I was captured.@
>Then...\
mov %hseanwave,17:hseanwave
cspl 690,706
lsp 700,":c;chara\cirque_h01.bmp",0,0:print 10,500
>Ever since then, I was the zombie monsters' toy.@
>They rape me one after another, forcing me to give them energy.\
name "Queen Harpy"
>Here, I'll lick his balls...@
lsp 700,":c;chara\cirque_h02.bmp",0,0:print 10,500
>*Lick* *Lick*\
name ""
name "Roza"
>My breasts are soft, aren't they?\
name ""
name "Luka"
>Ah... Ahh...\
name ""
>Roza's massive breasts press against my penis, as the Queen Harpy's tongue runs across my balls.@
>After a couple licks, she gently sucks one of my balls into her mouth, savoring it like candy.\
>After only a few seconds of that, my balls are glistening wet with her saliva.\
name "Queen Harpy"
>Hehe... Delicious.@
>*Lick* *Lick*\
name ""
name "Roza"
>Well?@>Do you want to be sandwiched between them?\
name ""
>Her huge, warm breasts press against the root of my penis.@
>Even though the stimulation isn't directly on my penis, I'm already leaking pre-come.\
>The overpowering smell of the females doubles the sensations.@
>As the Queen Harpy's tongue runs over my balls, I can't stop a rising desire to come.\
name "Luka"
>N...No...!@> Coming!\
name ""
mov %hseanwave,0:hseanwave
gosub *syasei1
lsp 700,":c;chara\cirque_h03.bmp",0,0
gosub *syasei2
>My penis suddenly trembles, as I shoot semen into the air.@
lsp 700,":c;chara\cirque_h04.bmp",0,0:print 10,500
>The semen shoots out, and lands on Queen Scylla's face.\
name "Queen Scylla"
>You... Gave me your semen?\
name ""
>The Queen Scylla licks the semen I shot onto her face.@
>While still choking on the intense smell, I indulge in the afterglow.\
name "Luka"
>Ahh...\
name ""
>The ejaculation causes me to feel extremely weak.@
>Does something about them drain more energy from me than a normal ejaculation...?\
name "Queen Harpy"
>Ahaha, did you enjoy my ball licking?\
name ""
name "Roza"
>Next, shall I squeeze it between my breasts?@
>You're not satisfied just looking at them, are you?\
name ""
name "Queen Harpy"
>You aren't allowed to hog him.@
>I'll use my breasts too.\
name ""
mov %hseanwave,17:hseanwave
lsp 700,":c;chara\cirque_h05.bmp",0,0:print 10,500
>Roza and the Queen Harpy both push their breasts together around my penis.@
>The sudden soft feeling of them causes my waist to jerk upward.\
>As the four breasts press against my penis and hold me down, I let out a moan.\
name "Luka"
>Haa...\
name ""
name "Titania"
>Ahaha, he's feeling good. \
name ""
>Titania giggles as she stares at my penis, locked between their breasts.\
name "Roza"
>You're feeling good?@> Then just come...\
name ""
>Roza puts more pressure on her breasts, pressing her soft skin hard against my penis.\
name "Queen Harpy"
>We'll squeeze out your male milk...@
>Cover my breasts with your semen...\
name ""
>On the other side, Queen Harpy starts moving her breasts up and down, stroking my penis with her smooth skin.\
name "Luka"
>Ah...\
name ""
name "Queen Scylla"
>As thanks for the semen, a present...\
name ""
lsp 700,":c;chara\cirque_h06.bmp",0,0:print 10,500
>Queen Scylla presses her face against me, giving me a deep kiss.@
>Despite the bittersweet taste, it doesn't feel bad...\
>Her long tongue pushes into my mouth and races around, as if she was raping me with it.\
name "Luka"
>Nnnn...\
name ""
>Even though she's raping my mouth with her own tongue, I relax in the deep kiss.@
>At the same time, my penis trembles between their four breasts.\
>Attacking from everywhere at once, my body is writhing in total pleasure.\
name "Roza"
>Now finish on my breasts...\
name ""
name "Queen Harpy"
>It's time for the finishing blow?@
>Alright then...\
name ""
>The two of them start to move at the same time.@
>Roza presses far harder against me with her elastic breasts, while Queen Harpy's movements get far more intense.\
>With Queen Scylla still forcefully kissing me, my whole body spasms in pure ecstasy as I'm forced over the edge.\
name "Luka"
>Nnnnn!!!\
name ""
gosub *syasei1
lsp 700,":c;chara\cirque_h07.bmp",0,0
gosub *syasei2
>My semen shoots into the air, and falls back down on their bodies.@
lsp 700,":c;chara\cirque_h08.bmp",0,0:print 10,500
>Roza and Queen Harpy's breasts get covered in my semen.\
mov %hseanwave,0:hseanwave
name "Titania"
>Aha, he even covered my body with semen. @
>Look at all of it that he peed out!@>How embarrassing! \
name ""
name "Luka"
>Haa...\
name ""
>As I thought, the weakness that comes with an orgasm is far more than normal.@
>If this keeps up, I'll die...\
lsp 700,":c;chara\cirque_h09.bmp",0,0:print 10,500
>Roza and the Queen Harpy finally move away.@
>Are they giving me a break so that I won't die...?\
name "Queen Scylla"
>Now then, shall I go next with my tentacles?\
name ""
name "Luka"
>N...No!@>I'll die!\
name ""
name "Queen Scylla"
>We have no concern for your body.@
>We'll squeeze and wring you, until you die...\
name ""
name "Titania"
>Ahaha, die! \
name ""
name "Luka"
>Ahh!@> S...Stop!\
name ""
mov %hseanwave,20:hseanwave
lsp 700,":c;chara\cirque_h10.bmp",0,0:print 10,500
>My twitching penis is slowly coiled up by her tentacles.@
>Forming a tube with them, it's like she brought me into a vagina made of tentacles.\
>The slimy, elastic feeling of them presses against my sensitive shaft.\
name "Luka"
>Ah!@>Ahhh!\
name ""
name "Fernandez"
>Next, kiss me...\
name ""
lsp 700,":c;chara\cirque_h11.bmp",0,0:print 10,500
>Before I can object, Fernandez's lips lock with mine.@
>A sweeter kiss than the Queen Scylla's causes me to relax.\
name "Fernandez"
>Hehe... Kiss of Ecstasy...\
name ""
name "Luka"
>Nnn...\
name ""
>Her tongue races around my mouth, the magical sense of ecstasy flooding even more of my body.@
>Instead of the rape like kiss of Queen Scylla, Fernandez's is almost loving...\
name "Luka"
>Mmm... Nnn...\
name ""
name "Queen Scylla"
>...You seem to like hers a lot more than mine.@
>But don't forget that your penis is under my control.\
name ""
name "Luka"
>Nnnn!@>Nnnnn!\
name ""
>The tube of tentacles around my penis suddenly squeezes down hard, as her soft flesh rubs up and down against me.\
name "Queen Scylla"
>I'll end this right away... Now come!\
name ""
>Her soft tube of tentacles races up and down my penis with almost blinding speed, rubbing my tip and underneath my neck with the tips of her tentacles as she goes.\
name "Luka"
>Nnnn!!!\
name ""
>A movement to force an orgasm, without mercy.@
>Responding to it, my body shakes as I come.\
gosub *syasei1
lsp 700,":c;chara\cirque_h12.bmp",0,0
gosub *syasei2
>And as if at her command, I come, my semen covering her tentacles.@
>Even though ejaculating more is dangerous, I couldn't stop it...\
mov %hseanwave,0:hseanwave
name "Luka"
>Ahh...\
name ""
>After the repeated orgasms, I can't even move a finger.@
>My gasps are getting weaker, and I'm barely able to remain conscious.\
name "Titania"
>He's going to die soon, isn't he? @
>Then I'll give him the final blow. \
name ""
mov %hseanwave,17:hseanwave
lsp 700,":c;chara\cirque_h13.bmp",0,0:print 10,500
>Titania clings to my penis, and holds on tight.@
>The strange feeling of her small body on my penis causes me to shake my waist in feeble resistance.\
name "Luka"
>N...No!@>If you do any more... Then...\
name ""
name "Titania"
>Teehee... If you come, you'll die, right?@
>I wonder how long you'll last...?\
name ""
>Titania's small body squeezes my penis tight as she giggles.@
>She's mercilessly trying to make me ejaculate, and kill me...\
>The small Fairy is toying with my penis, and leading me to death...@
>Gritting my teeth, I do everything I can to endure it.\
name "Queen Scylla"
>What a sore loser.\
name ""
name "Fernandez"
>We'll send you to the next world...\
name ""
lsp 700,":c;chara\cirque_h14.bmp",0,0:print 10,500
>Queen Scylla and Fernandez move to my side, and stick their wet tongues into my right and left ears.\
name "Queen Scylla"
>Nnn... *Lick*\
name ""
name "Fernandez"
>*Lick* *Lick*\
name ""
name "Luka"
>Haa... Ah...\
name ""
>The wet noises of their licks drown out everything else, making it feel like they're raping my brain itself.\
lsp 700,":c;chara\cirque_h15.bmp",0,0:print 10,500
>Pre-come slowly leaks out, staining Titania's clothes.@
>I can't endure it at this rate...\
name "Luka"
>Haa... No...\
name ""
name "Titania"
>Teehee... There's no running away. @
>You're going to die. \
name ""
>Titania rubs my penis with her entire body, as her small tongue licks across my glans...\
name "Luka"
>N...Nooo! Ahhh!\
name ""
gosub *syasei1
lsp 700,":c;chara\cirque_h17.bmp",0,0
gosub *syasei2
>Explosions of ecstasy race through me in my final moments, my semen shooting out and covering the zombies who are gang raping me.\
lsp 700,":c;chara\cirque_h18.bmp",0,0:print 10,500
name "Luka"
>Ah...\
name ""
>Weakness floods through my body as my vision dims.@
>I finally meet my end while still twitching in ecstasy.\
name "Titania"
>Ahaha... Goodbye. \
name ""
>My last view is of the giggling Titania and the sadistic smiles of the zombie girls who raped me to death...\
mov %hseanwave,0:hseanwave
gosub *anten
>...............\
goto *badend



*alice15th_start

mov $name,"Alipheese the Fifteenth"
mov $name2,"Alipheese the Fifteenth"
mov $lavel,"alice15th"
mov $tatie1,"alice15th_st11"
mov $tatie2,"alice15th_st11"
mov $tatie3,"alice15th_st12"
mov $tatie4,"alice15th_st11"
mov $haikei,"bg206"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,40000
if %nanido=2 mov %max_enemylife,45000
if %nanido=3 mov %max_enemylife,50000
if %nanido=0 mov %max_enemylife,2
if %nanido=1 mov %henkahp1,20000
if %nanido=2 mov %henkahp1,20000
if %nanido=3 mov %henkahp1,20000
if %nanido=0 mov %henkahp1,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %music,5
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Haha... Pointless."
mov $mogaku_sel2,"Did you think you could escape from my coil?"
mov $mogaku_sel3,"You aren't allowed to part from me..."
mov $mogaku_sel4,"What pathetic struggling..."
mov $mogaku_sel5,"If you struggle, I'll just crush you."
mov $mogaku_dassyutu1,"You escaped from my restraint?"
mov $mogaku_dassyutu2,"Haha... An interesting man."
mov $mogaku_earth_dassyutu1,"Oho... Gnome's power?"
mov $mogaku_earth_dassyutu2,"I didn't think there was a human living that the spirits trusted."
mov $half_s1,"My sexual skills can bring any man to their knees."
mov $half_s2,"Now, shoot out your semen before me."
mov $kiki_s1,"Haha... At your limit, I see."
mov $kiki_s2,"Let us see just how thick that semen of yours is."
mov %end_n,15
mov %exp_minus,750000
mov %zmonster_x,-250
mov %tukix,300
mov %owaza_count1a,5
name $name
>You called me...?@
>I'll destroy them...\
name ""
name "Luka"
>Gah... What power!\
name ""
>Overpowering malice and corruption flow from her.\
>This incredible aura of magical power and intimidation...\
>I can't help but take a step back away from her.@
>This is the previous Monster Lord, Alipheese the Fifteenth...\
lsp 700,":a;chara\shirom_st11.bmp",0,0:print 10,500
name "La Croix"
>The plans have changed, but this is interesting too.\
>The Fallen Hero against the once noble late Monster Lord...@>Doesn't it just leave you on the edge of your seat?\
name ""
name "Luka"
>Alice's mother...@>You...@
>...I'll never forgive you!\
name ""
gosub *face1
>I don't want Alice to fight against her own mother.@
>In some ways, this is actually ideal.\
>I'll deal with this undead monster before Alice gets here...@
>With that, Alice won't have to suffer the pain of fighting her mother!\
mov %sinkou,1
goto *common_main



*alice15th_v

name "Luka"
>Gah...!@
>She's strong...\
name ""
>I shrink back from her overwhelming power.\
>Without being able to showcase the true power of the spirits, do I have any chance of winning?\
lsp 700,":a;chara\shirom_st11.bmp",0,0:print 10,500
name "La Croix"
>It's almost time for the curtain call.@
>You seem to have enjoyed the show, though!\
name ""
name "Luka"
>Guh...\
name ""
dwave 1,"se\karaburi.ogg"
>Alipheese's tail looms near my body...\
name "Alice"
>Ha!\
name ""
lsp 700,":a;chara\alice_st73.bmp",-170,50
lsp 701,":a;chara\alice15th_st31b.bmp",160,0:print 10,500
>Suddenly, a small shadow darts between us!@
dwave 1,"se\earth3.ogg"
>Propelling herself off the ceiling, Alice slams against Alipheese, knocking her back!\
name $name
>Oho... Who's this?\
name ""
name "Luka"
>A...Alice!?\
name ""
>Alice finally arrived...@
>I wanted to finish this with her undead mother before she got here, but...\
if %battle_auto=1 skipoff
wait 1000
mov %battle,0
cspl 0,611
gosub *setwindow_01p
mov %count_ko,%count_ko+1
if %nanido=0 skip 6
if %mylife=%max_mylife && %nodamage=0 mov %count_hpfull,1
if %nanido=3 mov %count_hellvic,1
if %status=7 mov %count_vickonran,1
if %counter>0 mov %counterk,1
if %alice_skill=1 mov %alicek,1
if %zukanon=1 return *zukan_commonkaisou0
mov %2431,1
goto *sean0392a



*alice15th_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Haha... How cowardly.@
>Kneel before me, and I shall give you pleasure.\
name ""
goto *alice15th_a



*alice15th_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *alice15th_kousan
if %cmd1=16 goto *alice15th_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *alice15th_main



*alice15th_a

if %enemylife<%henkahp1 goto *alice15th_v
if %kousoku=1 rnd2 %ransu,1,3
if %kousoku=1 && %ransu<3 gosub *alice15th_a6:goto *common_main
if %kousoku=1 && %ransu=3 && %owaza_count3a>3 && %aqua=0 gosub *alice15th_a7:goto *common_main
if %kousoku=1 skip -3
rnd2 %ransu,1,5
if %ransu=1 gosub *alice15th_a1:goto *common_main
if %ransu=2 gosub *alice15th_a2:goto *common_main
if %ransu=3 gosub *alice15th_a3:goto *common_main
if %ransu=4 gosub *alice15th_a4:goto *common_main
if %ransu=5 && %owaza_count1a>6 gosub *alice15th_a5:goto *common_main
skip -6



*alice15th_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Come in my hand..."
if %ransu=2 mov $sel1,"My hand shall make you writhe in pleasure."
if %ransu=3 mov $sel1,"Your seed shall sprinkle over my hand."
name $name
eng $sel1:$sel6\
name ""
skillname "Embracing Hand"
dwave 1,"se\ero_koki1.ogg"
>Alipheese grabs hold of Luka's penis, slowly increasing the pressure!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<70 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,30
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4059
if %nanido<2 damage 140,150
if %nanido=2 damage 160,170
if %nanido=3 damage 180,190
dwave 1,"se\ero_koki1.ogg"
>Her fingers wrap around his glans, and start to stroke!
if %nanido<2 damage 140,150
if %nanido=2 damage 160,170
if %nanido=3 damage 180,190
dwave 1,"se\ero_koki1.ogg"
>Using the tips of her fingers, she massages his tip!
if %nanido<2 damage 140,150
if %nanido=2 damage 160,170
if %nanido=3 damage 180,190
skillname ""
if %mylife=0 sub %stack,1:return *alice15th_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*alice15th_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Go crazy inside my mouth..."
if %ransu=2 mov $sel1,"Shall I have a drink?"
if %ransu=3 mov $sel1,"No man can tolerate my tongue..."
name $name
eng $sel1:$sel6\
name ""
skillname "Greedy Lips"
dwave 1,"se\ero_buchu2.ogg"
>Alipheese sucks hard on Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<70 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,30
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4060
if %nanido<2 damage 150,160
if %nanido=2 damage 170,180
if %nanido=3 damage 190,200
dwave 1,"se\ero_buchu3.ogg"
>Her long tongue coils around Luka's penis!
if %nanido<2 damage 150,160
if %nanido=2 damage 170,180
if %nanido=3 damage 190,200
dwave 1,"se\ero_pyu1.ogg"
>Alipheese strokes Luka's penis with her coiled tongue!
if %nanido<2 damage 150,160
if %nanido=2 damage 170,180
if %nanido=3 damage 190,200
skillname ""
if %mylife=0 sub %stack,1:return *alice15th_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*alice15th_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll abuse your penis with these breasts..."
if %ransu=2 mov $sel1,"Now, bury yourself in my breasts..."
if %ransu=3 mov $sel1,"I'll have you offer up all your semen to my breasts..."
name $name
eng $sel1:$sel6\
name ""
skillname "Royal Breasts"
dwave 1,"se\ero_sigoki1.ogg"
>Alipheese sandwiches Luka's penis between her breasts!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<70 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,30
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4061
if %nanido<2 damage 160,170
if %nanido=2 damage 180,190
if %nanido=3 damage 200,210
dwave 1,"se\ero_sigoki1.ogg"
>Like that, she squeezes his penis hard between them!
if %nanido<2 damage 160,170
if %nanido=2 damage 180,190
if %nanido=3 damage 200,210
dwave 1,"se\ero_sigoki1.ogg"
>Using her hands, she rubs her breasts against his penis!
if %nanido<2 damage 160,170
if %nanido=2 damage 180,190
if %nanido=3 damage 200,210
skillname ""
if %mylife=0 sub %stack,1:return *alice15th_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*alice15th_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My tentacles will make you cry out in pleasure!"
if %ransu=2 mov $sel1,"Do you wish to feel my tentacles? Haha... Do I even need to ask?"
if %ransu=3 mov $sel1,"Get a good taste of my tentacles..."
name $name
eng $sel1:$sel6\
name ""
skillname "Demento Nagi"
dwave 1,"se\ero_makituki1.ogg"
lsp 700,":a;chara\alice15th_st21.bmp",0,0:print 10,500
>Alipheese's slimy tentacles coil around Luka's penis!
if %daten>0 gosub *face1:goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<70 gosub *face1:gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,30
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *face1:gosub *wind_guard:sub %stack,1:return
skillcount3 4062
if %nanido<2 damage 170,180
if %nanido=2 damage 190,200
if %nanido=3 damage 210,220
dwave 1,"se\ero_makituki2.ogg"
>Wrapped around him, they start to squeeze his penis!
if %nanido<2 damage 170,180
if %nanido=2 damage 190,200
if %nanido=3 damage 210,220
dwave 1,"se\ero_makituki2.ogg"
>The tip of her tentacles rubs Luka's glans!
if %nanido<2 damage 170,180
if %nanido=2 damage 190,200
if %nanido=3 damage 210,220
skillname ""
if %mylife=0 sub %stack,1:return *alice15th_h4
if %kousan<2 gosub *face1
sub %stack,1
return



*alice15th_a5

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 8
name $name
>I'll coil you in my snake body and toy with you...@
if %first_sel1=1 skip 3
>You'll be in a hell of pleasure in my embrace...\
skip 2
>This time, you won't get away...\
name ""
skillname "Nephilim Magia"
dwave 1,"se\ero_makituki3.ogg"
lsp 690,":c;chara\alice15th_ha01.bmp",0,0:print 10,500
eng "Alipheese's snake body coils around Luka!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
dwave 1,"se\ero_buchu1.ogg"
lsp 690,":c;chara\alice15th_ha02.bmp",0,0:print 10,500
lsp 690,":c;chara\alice15th_ha03.bmp",0,0:print 10,500
>A tentacle opens and sucks Luka's penis inside!
skillcount3 4063
if %nanido<2 damage 350,400
if %nanido=2 damage 410,460
if %nanido=3 damage 470,520
mov %kousoku,1:gosub *status_print
>Luka has been bound by Alipheese!\
skillname ""
if %mylife=0 sub %stack,1:return *alice15th_h5
name $name
>Shall I have my tentacles suck you until you dry up?@
if %first_sel1=1 skip 3
>Or perhaps should I finish you all at once...?\
skip 2
>If you can't repeat that strength from before, your life is over...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,2
if %earth=0 && %nanido=2 mov %genmogaku,2
if %earth=0 && %nanido=3 mov %genmogaku,3
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,1
sub %stack,1
return



*alice15th_a6

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll draw it out, nice and slow..."
if %ransu=2 mov $sel1,"Hehe, come inside my tentacle..."
if %ransu=3 mov $sel1,"Finish off in my embrace..."
name $name
eng $sel1:$sel6\
name ""
skillname "Nephilim Magia"
dwave 1,"se\ero_chupa6.ogg"
>The tentacle sucks hard on Luka's penis!
skillcount3 4063
if %nanido<2 damage 170,200
if %nanido=2 damage 200,230
if %nanido=3 damage 230,260
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
dwave 1,"se\ero_chupa6.ogg"
>Her tentacle's internal walls massage Luka's penis!
if %nanido<2 damage 170,200
if %nanido=2 damage 200,230
if %nanido=3 damage 230,260
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *alice15th_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*alice15th_a7

add %stack,1
mov %owaza_count3a,0
name $name
>Are you ready?@
>My vagina will drown any man in instant pleasure...\
name ""
skillname "Nephilim End"
>Luka's wound up body is forced into Alipheese's vagina!\
dwave 1,"se\ero_pyu1.ogg"
lsp 690,":c;chara\alice15th_ha05.bmp",0,0:print 10,500
lsp 690,":c;chara\alice15th_ha06.bmp",0,0:print 10,500
>Luka's lower body is inside Alipheese's vagina!
skillcount3 4064
mov %damage_kotei,1
damage 600,700
mov %kousoku,2:gosub *status_print
>Luka is being raped by Alipheese!\
skillname ""
if %mylife=0 sub %stack,1:return *alice15th_h6
name $name
>Haha, what a delicious taste...@
>Let me savor your flavor...\
name ""
sub %stack,1
goto *alice15th_a8



*alice15th_a8

add %stack,1
>Luka is being raped by Alipheese...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"It has been a long time since I've tasted a man here...":mov $sel2,"The tentacles inside Alipheese squirm around Luka's body!"
if %ransu=2 mov $sel1,"I'll dissolve you away...":mov $sel2,"Alipheese's vagina sucks on Luka's body!"
if %ransu=3 mov $sel1,"This is how I can prey on men... Hehe.":mov $sel2,"The vaginal flesh chews and rubs against Luka's lower body!"
if %ransu=4 mov $sel1,"You'll just be another man preyed on with my vagina...":mov $sel2,"Luka's penis is rubbed against Alipheese's vaginal wall!"
if %ransu=5 mov $sel1,"I can control this lower mouth as easily as my actual mouth...":mov $sel2,"Alipheese's vagina sucks on Luka's body!"
name $name
eng $sel1:$sel6\
name ""
skillname "Nephilim End"
dwave 1,"se\ero_chupa4.ogg"
lsp 690,":c;chara\alice15th_ha07.bmp",0,0:print 10,500
eng $sel2:$sel6
skillcount3 4064
mov %damage_kotei,1
damage 600,700
skillname ""
if %mylife=0 sub %stack,1:return *alice15th_h7
sub %stack,1
goto *alice15th_a8



*alice15th_onedari

mov $list1,"Embracing Hand"
if %4059>0 mov %list_num1,1
mov $list2,"Greedy Lips"
if %4060>0 mov %list_num2,1
mov $list3,"Royal Breasts"
if %4061>0 mov %list_num3,1
mov $list4,"Demento Nagi"
if %4062>0 mov %list_num4,1
mov $list5,"Nephilim Magia"
if %4063>0 mov %list_num5,1
mov $list6,"Nephilim End"
if %4064>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *alice15th_onedari1
if %cmd1=12 goto *alice15th_onedari2
if %cmd1=13 goto *alice15th_onedari3
if %cmd1=14 goto *alice15th_onedari4
if %cmd1=15 goto *alice15th_onedari5
if %cmd1=16 goto *alice15th_onedari6
if %cmd1=-1 goto *alice15th_main
goto *alice15th_onedari



*alice15th_onedari1

gosub *onedari_syori
name $name
>Haha... You want to finish on my hands?@
>Then kneel before me, and accept the pleasure.\
name ""
gosub *alice15th_a1
skip -1



*alice15th_onedari2

gosub *onedari_syori
name $name
>Haha... You want to finish in my mouth?@
>Then kneel before me, and accept the pleasure.\
name ""
gosub *alice15th_a2
skip -1



*alice15th_onedari3

gosub *onedari_syori
name $name
>Haha... You want to finish on my breasts?@
>Then kneel before me, and accept the pleasure.\
name ""
gosub *alice15th_a3
skip -1



*alice15th_onedari4

gosub *onedari_syori
name $name
>Haha... You want to finish on my tentacles?@
>Then kneel before me, and accept the pleasure.\
name ""
gosub *alice15th_a4
skip -1



*alice15th_onedari5

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want my tentacle to sucks on your penis?@
>Then I'll wrap you up...\
name ""
if %kousoku=0 gosub *alice15th_a5
gosub *alice15th_a6
skip -1



*alice15th_onedari6

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want me to rape you...?@
>Then I'll wrap you up...\
name ""
skillname "Nephilim Magia"
dwave 1,"se\ero_makituki3.ogg"
lsp 690,":c;chara\alice15th_ha01.bmp",0,0:print 10,500
>Luka is wrapped up by Alipheese's snake body!@
mov %kousoku,1:gosub *status_print
>Luka has been bound by Alipheese!\
skillname ""
gosub *alice15th_a7
skip -1



*alice15th_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\alice15th_bk03.bmp",0,0
gosub *syasei2
>As Alipheese strokes Luka's penis, he comes, covering her hands in semen.\
mov %viclose,1:gosub *lose
mov %2731,%2731+1:if %2731=1 mov %count_koenemy,%count_koenemy+1
if %2731>%count_most mov %count_most,%2731:mov $count_mostname,$name
count 5,11
mov $bad1,"Alipheese forced Luka to come with her hands."
gosub *face2
name $name
>Haha, you covered my hands...@
>Now you belong to me...\
name ""
goto *alice15th_h



*alice15th_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\alice15th_bk01.bmp",0,0
gosub *syasei2
>As Alipheese sucks on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2731,%2731+1:if %2731=1 mov %count_koenemy,%count_koenemy+1
if %2731>%count_most mov %count_most,%2731:mov $count_mostname,$name
count 4,11
mov $bad1,"Alipheese forced Luka to come with her mouth."
gosub *face2
name $name
>Haha, you filled my mouth...@
>Now you belong to me...\
name ""
goto *alice15th_h



*alice15th_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\alice15th_bk02.bmp",0,0
gosub *syasei2
>As Alipheese squeezes Luka's penis between her large breasts, he comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2731,%2731+1:if %2731=1 mov %count_koenemy,%count_koenemy+1
if %2731>%count_most mov %count_most,%2731:mov $count_mostname,$name
count 7,11
mov $bad1,"Alipheese forced Luka to come with her breasts."
gosub *face2
name $name
>Haha, you covered my breasts...@
>Now you belong to me...\
name ""
goto *alice15th_h



*alice15th_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\alice15th_bk04.bmp",0,0
gosub *syasei2
>As Alipheese strokes Luka's penis with her slimy tentacles, he comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2731,%2731+1:if %2731=1 mov %count_koenemy,%count_koenemy+1
if %2731>%count_most mov %count_most,%2731:mov $count_mostname,$name
count 10,11
mov $bad1,"Alipheese forced Luka to come with her tentacles."
name $name
>Haha, you covered my tentacles...@
>Now you belong to me...\
name ""
goto *alice15th_h



*alice15th_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":c;chara\alice15th_ha04.bmp",0,0
gosub *syasei2
>Bound by Alipheese, Luka comes as her tentacle sucks on his penis.\
mov %viclose,1:gosub *lose
mov %2731,%2731+1:if %2731=1 mov %count_koenemy,%count_koenemy+1
if %2731>%count_most mov %count_most,%2731:mov $count_mostname,$name
count 10,11
mov $bad1,"Alipheese forced Luka to come with her tentacles."
gosub *face2
name $name
>Haha, so you're giving my tentacles a drink?@
>Now you belong to me...\
name ""
goto *alice15th_h



*alice15th_h6

mov %ikigoe,3:gosub *ikigoe
name $name
>Haha, how miserable...@> Have you no pride as a man?\
name ""
gosub *syasei1
lsp 690,":c;chara\alice15th_ha08.bmp",0,0
gosub *syasei2
>The moment Luka is pulled into Alipheese's warm vagina, he comes, filling her with semen.\
mov %viclose,1:gosub *lose2
mov %2731,%2731+1:if %2731=1 mov %count_koenemy,%count_koenemy+1
if %2731>%count_most mov %count_most,%2731:mov $count_mostname,$name
count 2,11
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Alipheese forced Luka to come the moment she pulled him inside her."
gosub *face2
name $name
>You surrendered in only seconds...@
>I know my vagina is top class, but that is still too pathetic...\
name ""
goto *alice15th_h8



*alice15th_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":c;chara\alice15th_ha08.bmp",0,0
gosub *syasei2
>As Alipheese's vagina sucks on Luka's body, he comes, filling her with semen.\
mov %viclose,1:gosub *lose2
mov %2731,%2731+1:if %2731=1 mov %count_koenemy,%count_koenemy+1
if %2731>%count_most mov %count_most,%2731:mov $count_mostname,$name
count 2,11
mov $bad1,"Alipheese forced Luka to come as she raped him."
gosub *face2
name $name
>Haha, look at how much delicious semen you're giving me...\
>Do you want to get me, the Monster Lord, pregnant that badly?\
name ""
goto *alice15th_h8



*alice15th_h8

name "Luka"
>Ahh...\
name ""
name $name
>Since you're a special male, shall I squeeze you some more?@
>Here, I'll tighten it some...\
name ""
skillcount3 4064
skillname "Nephilim End"
dwave 1,"se\ero_pyu1.ogg"
lsp 700,":a;chara\alice15th_ha09.bmp",0,0:print 10,500
>Alipheese's vagina squeezes down on Luka's penis!
mov %damage_kotei,1
damage 600,700
dwave 1,"se\ero_pyu1.ogg"
>The soft flesh presses against him from every direction, forcing pleasure into him!
mov %damage_kotei,1
damage 600,700
skillname ""
name "Luka"
>Haa!\
name ""
name $name
>Haha, you seem to be feeling it.@
>You won't escape from me until I've squeezed out everything...\
name ""
skillcount3 4064
skillname "Nephilim End"
dwave 1,"se\ero_pyu1.ogg"
>The soft flesh squeezes hard around Luka's penis!
mov %damage_kotei,1
damage 600,700
dwave 1,"se\ero_pyu1.ogg"
>Her wriggling vaginal walls massage his penis!
mov %damage_kotei,1
damage 600,700
skillname ""
name "Luka"
>No... I'm going to come...!\
name ""
name $name
>You're already giving up? How disappointing...@
>Now go ahead and come inside me!\
name ""
skillcount3 4064
skillname "Nephilim End"
dwave 1,"se\ero_pyu1.ogg"
>Alipheese's flesh rubs against the tip of Luka's penis!
mov %damage_kotei,1
damage 600,700
dwave 1,"se\ero_pyu1.ogg"
>Her entire vagina contracts, forcing Luka over the edge!
mov %damage_kotei,1
damage 600,700
skillname ""
name "Luka"
>Ah!@>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice15th_ha10.bmp",0,0
gosub *syasei2
>With his lower body wrapped up by Alipheese's vagina, he comes, filling her with semen.\
name $name
>Haha, you let out so much...@> But this is far from over.\
>This time, I'll embrace you from the front.\
>While trapped in my hug, I'll extract every drop of semen from you...\
name ""
name ""
gosub *clear_sprite
gosub *setwindow_01p
mov %battle,0
mov %hsean,1
mov %2731,%2731+1:if %2731=1 mov %count_koenemy,%count_koenemy+1
if %2731>%count_most mov %count_most,%2731:mov $count_mostname,$name
count 2,11
mov $bad1,"Alipheese forced Luka to come as she raped him."
goto *alice15th_h



*alice15th_h

mov $tatie2,"alice15th_st31b"
mov $bad2,"Luka was raped until he ran out of energy."
if %2731=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku=2 mov %hseanwave,1:hseanwave:csp 690:lsp 700,":c;chara\alice15th_hc1.bmp",0,0:goto *alice15th_hb
name "Luka"
>Ahh...\
name ""
name $name
>Now, you shall become an offering for me.@
>Let me taste your high quality semen...\
name ""
>Tentacles extend from her lower body and wrap around me.@
>Pulling me close, they bring my waist right next to hers.\
name $name
>Rejoice, for you shall mate with me.@
>Your pathetic little penis will get to taste the vagina of a Monster Lord.\
name ""
name "Luka"
>N...No... Don't do this...\
name ""
>I absolutely can't have sex with Alice's mother...@
>I struggle with everything I've got, but I still can't break free of her tentacles.\
name "Luka"
>Ah...\
name ""
cspl 690,699
lsp 700,":c;chara\alice15th_hc0.bmp",0,0:print 10,500
>She keeps bringing me closer to her genital area.@
>Feeling the heat from her vagina, my penis slowly gets erect in response.\
name $name
>Haha... You seem ready to mate.\
name ""
name "Luka"
>Ah... No!@
>Not this...!\
name ""
>The immoral thought of having sex with Alice's mother...@
>Despite my horror, my penis is already erect.\
>Alipheese presses my tip against her opening, the warm feeling of her vagina already all around my glans.\
name $name
>Haha... It seems to want to go inside me.@
>Well then, push it in...\
name ""
>Her tentacles around my waist pull on me, forcing me inside her...@
mov %hseanwave,1:hseanwave
lsp 700,":c;chara\alice15th_hc1.bmp",0,0:print 10,500
>My erect penis slowly sinks into her warm, wet hole.\
name "Luka"
>N...No!\
name ""
>With that, she brings me all the way inside.@
>Unable to resist her, Alice's mother is raping me...\
goto *alice15th_hb



*alice15th_hb

name "Luka"
>Ahhh!\
name ""
>Her vagina is unexpectedly soft and tight, her wet flesh eagerly grabbing at my penis.@
>Rather than being intensely tight or forceful, the almost gentle stimulation makes me relax.\
name "Luka"
>Haa... Not this...\
name ""
name $name
>Haha... I've already given birth once with this vagina.@
>But it still feels incredible inside, doesn't it?\
name ""
name "Luka"
>Ahh...\
name ""
>The vagina Alice was born from...@
>Right now, my penis is inside it.\
>I'm polluting the place Alice's life came from.@
>Just the immoral thought is enough to bring out a sick form of excitement.\
name $name
>First I'll bring you to a nice, slow climax...@
>Then, I'll be forceful and finish you all at once.\
name ""
name "Luka"
>N...No... Ah!\
name ""
>Her warm flesh squeezes against my glans as I protest, cutting off my refusal with a moan.\
name $name
>How about some tip teasing?@
>You wouldn't finish with just this, would you?\
name ""
>Her soft flesh squeezes and rubs against my tip, the targeted teasing hitting my weakest part.@
>As she tightens around my shaft at the same time, I can't hold back a sweet moan.\
>Rather than being aggressive, this stimulation almost feels tender...\
name "Luka"
>Haa... Ahh...\
name ""
name $name
>Good... You should enjoy it more.@
>After the end of your pleasure, give all of your semen to my womb...\
name ""
name "Luka"
>T...That... Not that...\
name ""
>Coming inside Alice's mother...@>I can't allow that to happen!\
>Tensing up my lower body, I try to stop feeling the pleasure she's forcing into me.@
>I absolutely can't defile the body of Alice's mother!\
name $name
>Haha... Are you trying to endure it?@
>Do you believe you can deny a Monster Lord what she wants?\
>You won't be allowed to pull out of my vagina until you come.@
>I'll extract all of your semen, until you're completely dry...\
name ""
name "Luka"
>Haa...\
name ""
>Her soft flesh starts to move in a wave, massaging my penis from the base to the tip inside her.@
>At the same time, she gently squeezes me tighter.\
>In front of this intense assault of pleasure, there's no way I can resist for long...\
name $name
>Haha... Do you still want to hold back?@
>Don't you want to come inside me with everything you have?\
name ""
name "Luka"
>No... Coming... I must not... Never... Ah...\
name ""
>As the pressure and stimulation only increases, my endurance reaches its limit.@
>Already leaking pre-come, I can't hold back my male desire much longer.\
name $name
>Now come inside my womb.@
>Surrender to lust, and spray your seed inside the Monster Lord...\
name ""
name "Luka"
>No more... C...Coming...!\
name ""
>As the pleasure runs through my body, I finally give up.@
>Relaxing my tensed up body, the wave of ecstasy finally is unleashed.\
gosub *syasei1
lsp 700,":c;chara\alice15th_hc2.bmp",0,0
gosub *syasei2
name "Luka"
>Haa...\
name ""
>My penis pulses as I explode inside her, each spurt sending fresh waves of shame and bliss.\
name "Luka"
>Haaaa....@
>Alice... I'm sorry...\
name ""
>Unable to hold on any longer, I came inside Alice's mother.@
>My body goes loose in shame and pleasure.\
name $name
>Haha... You seem to have really enjoyed a Monster Lord's vagina.@
>Now then, shall I take my payment?\
>I'll suck up all of your semen at once.@
>But don't be afraid... You'll be able to taste supreme pleasure until your end.\
name "Luka"
>N...No... Ahh!\
name ""
mov %hseanwave,15:hseanwave
lsp 700,":c;chara\alice15th_hc3.bmp",0,0:print 10,500
>More tentacles reach out from her lower body and wrap around my body.\
name "Luka"
>S...Stop... Hyaa!\
name ""
>At the same time, her vaginal walls suddenly contract and start sucking on me.@
>The once gentle stimulation suddenly gets far more intense.\
>Countless tentacles inside her vagina also reach out and pull on my penis, making it feel like my entire body is being played with by tentacles.\
name "Luka"
>Haa... Ahhh!\
name ""
gosub *syasei1
lsp 700,":c;chara\alice15th_hc4.bmp",0,0
gosub *syasei2
>In only seconds, I'm forced to another orgasm.@
>Even more semen shoots out into her greedy vagina.\
name $name
>Haha... I'll draw out even more.@
>Drown in my body!\
name ""
name "Luka"
>Hyaa... Ahh!\
name ""
gosub *syasei1:gosub *syasei2
>My penis continues pulsing, another climax reached before the previous one even finished.\
>Squeezing me from my base to my tip and back again, it feels as if her vagina is forcefully milking out my semen.\
gosub *syasei1:gosub *syasei2
name "Luka"
>Hyaa!@>Ahh!\
name ""
name $name
>Haha... That's a good scream.@
>I'll suck up even your life with my vagina...\
>Rejoice, for you will give everything to a Monster Lord...\
name ""
name "Luka"
>Haa... Ah...\
name ""
gosub *syasei1:gosub *syasei2
>It's as if she's forcibly wringing semen from my penis inside her.@
>My vision flickers in and out as the overwhelming pleasure makes my body spasm and jerk around.\
>It really is like she's squeezing out my life itself...\
name "Luka"
>Haa... Ah...\
name ""
gosub *syasei1:gosub *syasei2
name $name
>Your semen is barely coming out now...@
>Are you almost finished?\
>Meet your end in my embrace...@> Reach the next life in my vagina.\
name ""
name "Luka"
>Ah...\
name ""
gosub *syasei1:gosub *syasei2
>My life itself is being squeezed out by the vagina that gave birth to Alice...@
>The place where a female should give life is instead taking mine...\
>And...\
name "Luka"
>Aa...aa...\
name ""
gosub *syasei1:gosub *syasei2
>My penis pulses for a final time, a single drop of semen leaking out.@
>At the same time, my vision goes dark as I fade into unconsciousness...\
mov %hseanwave,0:hseanwave
name "Luka"
>.........\
name ""
name $name
>Haha... So he's gone.@
>Did you enjoy it till the end?\
name ""
>With a laugh, Alipheese the Fifteenth looks down at the boy's corpse, his face loose in pure ecstasy.\
gosub *anten
>..........\
goto *badend



*shirom_start

mov $name,"La Croix"
mov $name2,"La Croix"
mov $lavel,"shirom"
mov $tatie1,"shirom_st01"
mov $tatie2,"shirom_st02"
mov $tatie3,"shirom_st03"
mov $tatie4,"shirom_st02"
mov $haikei,"bg206"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,24000
if %nanido=2 mov %max_enemylife,29000
if %nanido=3 mov %max_enemylife,34000
if %nanido=0 mov %max_enemylife,2
if %nanido=1 mov %henkahp1,12000
if %nanido=2 mov %henkahp1,14500
if %nanido=3 mov %henkahp1,17000
if %nanido=0 mov %henkahp1,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,15
if %nanido=3 mov %earth_keigen,8
mov %alice_skill,0
mov %music,8
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Pointless... You'll be my prey..."
mov $mogaku_sel2,"You won't escape, no matter how pathetically you struggle."
mov $mogaku_sel3,"Pointless... You'll be my prey..."
mov $mogaku_sel4,"You won't escape, no matter how pathetically you struggle."
mov $mogaku_sel5,"Pointless... You'll be my prey..."
mov $mogaku_dassyutu1,"To exceed even my own power..."
mov $mogaku_dassyutu2,"You really will be a good sample."
mov $mogaku_earth_dassyutu1,"To exceed even my own power..."
mov $mogaku_earth_dassyutu2,"You really will be a good sample."
mov $half_s1,"This body is quite something..."
mov $half_s2,"Your semen will make excellent samples, too."
mov $kiki_s1,"Are you already at your limit?"
mov $kiki_s2,"I'm ready to collect your semen as a sample..."
mov %end_n,15
mov %exp_minus,750000
mov %zmonster_x,-320
mov %tukix,300
mov %owaza_count1a,4
name $name
>Do you think to overwhelm me with your words, disgraced Hero?\
name ""
>La Croix's cold eyes bore into me.\
name $name
>If you think I am weaker than my own slaves, you are sorely mistaken.\
>My own body has been strengthened...\
name ""
name "Luka"
>...I'm tired of hearing that.@
>You remodeled your own body or something, right?\
>You types are always the same.@
>You don't respect anything in this world!@>Even your own bodies are just toys!\
name ""
name $name
>So?@
>Even replacing my own body is a necessary step to push forward my studies.\
>Someone like you would never understand!\
name ""
name "Luka"
>Damn straight I'd never understand your madness!@
>Anyway, it ends here!\
name ""
mov %sinkou,1
goto *common_main



*shirom001

if %enemylife>%henkahp1 goto *common_main
if %sinkou=2 goto *common_main
lsp 700,":a;chara\shirom_st01.bmp",-190,0
lsp 701,":a;chara\chrom_st27.bmp",190,0:print 10,500
>In the middle of our battle, La Croix looks over to where Chrome is fighting.\
name $name
>Tch...@> They're struggling against Chrome?\
name ""
name "Chrome"
>You underestimated me, Sister.@> Another failure of yours!\
>Frederika, now!\
name ""
lsp 701,":a;chara\frederika_st31.bmp",70,0
lsp 700,":a;chara\cirque_st01.bmp",-200,50:print 10,500
name "Frederika"
>Capture, start!\
name ""
name "Fernandez"
>Guh, let go!@> What are you doing!?\
name ""
>Fernandez is bound by Frederika's sturdy limbs...@
lsp 700,":a;chara\chromg_st02.bmp",-160,0
lsp 701,":a;chara\cirque_st01.bmp",200,0:print 10,500
>Spi slowly slips inside her body!\
lsp 700,":a;chara\shirom_st03.bmp",-190,0
lsp 701,":a;chara\chrom_st25.bmp",190,0:print 10,500
name "Chrome"
>So you didn't give her anti hacking measures, Sister?\
>Did you think so highly of yourself, that you thought no one else could match your controlling skills?\
name ""
name $name
>Impossible...@>You're rewriting her control!?\
name ""
lsp 700,":a;chara\cirque_st01.bmp",-160,0
lsp 701,":a;chara\chrom_st25.bmp",190,0:print 10,500
name "Fernandez"
>Your orders, Master Chrome?\
name ""
name "Chrome"
>Good... Your master commands you!@>Take down that mermaid!\
name ""
lsp 700,":a;chara\cirque_st01.bmp",-160,0
lsp 701,":a;chara\cirque_st21.bmp",140,0:print 10,500
name "Fernandez"
>Understood, Master!\
name ""
name "Roza"
>Guh... She's being manipulated by the enemy!\
name ""
>Fernandez barrages Roza with a series of powerful thrusts!@
>The Queen of Pirates is unable to do anything but defend.\
lsp 700,":a;chara\frederika_st31.bmp",70,0
lsp 701,":a;chara\cirque_st31.bmp",-160,0:print 10,500
>At the same time, Frederika and Queen Lamia are slamming their powerful bodies against each other in intense blows!\
>Their battle is far from over, too!\
cspl 700,701
gosub *face1
mov %sinkou,2
if %enemylife>0 skip 5
mov %enemylife,1
mov %gage,%enemylife*100/%max_enemylife+1
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556:print 1
goto *common_main



*shirom_v

if %sinkou=1 && %nanido<>0 goto *shirom001
gosub *face3
name $name
>Gah...!@
>Can this body not last any longer...?\
name ""
dwave 1,"se\down.ogg"
>La Croix staggers back, and falls down.@
lsp 700,":a;chara\shirom_st07.bmp",0,0:print 10,500
>Her bandages tear open, revealing her abdomen.\
bgm "bgm\kiki2.ogg"
name "Luka"
>La Croix...@>Your body!?\
name ""
>Her abdomen is empty, lacking even internal organs.@
>Even if she remodeled her own body, that can't be.\
>La Croix... She herself is...\
lsp 700,":a;chara\shirom_st08.bmp",0,0:print 10,500
name $name
>...I told you.@> Shirome is dead.@
>I am undead...@> I'm controlling my own corpse.\
name ""
>La Croix loses the will to fight...\
mov %viclose,1:gosub *victory
mov %getexp,400000:gosub *lvup
mov %2409,1
goto *sean0393



*shirom_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Sheesh, you surrendered?@
>How anti-climactic...@>You deserve harsher punishment for this!\
name ""
goto *shirom_a



*shirom_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *shirom_kousan
if %cmd1=16 goto *shirom_onedari
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *shirom_main



*shirom_a

if %kousoku=1 gosub *shirom_a5:goto *common_main
rnd2 %ransu,1,4
if %ransu=1 gosub *shirom_a1:goto *shirom001
if %ransu=2 gosub *shirom_a2:goto *shirom001
if %ransu=3 gosub *shirom_a3:goto *shirom001
if %ransu=4 && %owaza_count1a>5 gosub *shirom_a4:goto *common_main
skip -5



*shirom_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I know every weak point on a man... Don't forget, I'm a Doctor."
if %ransu=2 mov $sel1,"Extracting semen is a simple affair..."
if %ransu=3 mov $sel1,"My fingers are quite nimble from practicing my art..."
name $name
eng $sel1:$sel6\
name ""
skillname "Necrophase"
dwave 1,"se\ero_koki1.ogg"
>La Croix strokes Luka's penis with her nimble fingers!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<10 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4065
if %nanido<2 damage 300,320
if %nanido=2 damage 360,380
if %nanido=3 damage 420,440
skillname ""
if %mylife=0 sub %stack,1:return *shirom_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*shirom_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Suck on it like this, and induce pleasure in the male..."
if %ransu=2 mov $sel1,"Don't underestimate my oral techniques."
if %ransu=3 mov $sel1,"Shall I extract your semen with my mouth?"
name $name
eng $sel1:$sel6\
name ""
skillname "Necroreim"
dwave 1,"se\ero_buchu2.ogg"
>La Croix sucks on Luka's penis hard, her cheeks rubbing against his glans!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<10 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4066
if %nanido<2 damage 310,330
if %nanido=2 damage 370,390
if %nanido=3 damage 430,450
skillname ""
if %mylife=0 sub %stack,1:return *shirom_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*shirom_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll never understand why men lust after a body part for motherhood."
if %ransu=2 mov $sel1,"Men love large breasts, don't they?"
if %ransu=3 mov $sel1,"Such simple stimulations induce pleasure in males..."
name $name
eng $sel1:$sel6\
name ""
skillname "Necrofaun"
dwave 1,"se\ero_sigoki1.ogg"
>La Croix massages Luka's penis between her large breasts!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4067
if %nanido<2 damage 320,340
if %nanido=2 damage 380,400
if %nanido=3 damage 440,460
skillname ""
if %mylife=0 sub %stack,1:return *shirom_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*shirom_a4

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 8
name $name
if %first_sel1=1 skip 3
>It's time to deal with you for good.@
skip 2
>This time, I'll deal with you.@
>I'll use this special vagina...\
name ""
skillname "Necrohold"
dwave 1,"se\ero_makituki3.ogg"
eng "La Croix pushes Luka down, and sits on top of him!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
lsp 690,":c;chara\shirom_h1.bmp",0,0
mov %kousoku,1:gosub *status_print
>Luka is being held down by La Croix!\
skillname ""
name $name
>I redesigned my pussy to maximize the extraction of male semen...\
if %first_sel1=1 skip 3
>Lucky you, for you get to taste it...\
skip 2
>This time, you will taste it...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,99
if %earth=0 && %nanido=2 mov %genmogaku,99
if %earth=0 && %nanido=3 mov %genmogaku,99
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
sub %stack,1
return



*shirom_a5

add %stack,1
>Luka is being held down by La Croix...\
name $name
>Now, give yourself to me...@
>Prepare yourself!\
name ""
skillname "La Croix's Mod"
dwave 1,"se\ero_pyu1.ogg"
lsp 690,":c;chara\shirom_h2.bmp",0,0:print 10,500
>La Croix presses down, forcing Luka into her!
skillcount3 4068
mov %damage_kotei,1
damage 500,600
mov %kousoku,2:gosub *status_print
>Luka is being raped by La Croix!\
skillname ""
if %mylife=0 sub %stack,1:return *shirom_h4
name "Luka"
>Hyaaa!!!\
name ""
>Her soft, warm vagina squeezes on me as soon as I'm inside her...\
name $name
>Well? I feel good, don't I?@
>Now come inside me...\
name ""
sub %stack,1
goto *shirom_a6



*shirom_a6

add %stack,1
>Luka is being raped by La Croix...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hurry up and come!":mov $sel2,"La Croix raises and lowers herself, riding Luka hard!"
if %ransu=2 mov $sel1,"It would be better for you to just give up and come...":mov $sel2,"La Croix shakes side to side, grinding against Luka!"
if %ransu=3 mov $sel1,"I can use my own muscles like this...":mov $sel2,"La Croix squeezes down hard on Luka's penis!"
if %ransu=4 mov $sel1,"I can control my vagina like it was my own hand...":mov $sel2,"La Croix's vaginal flesh rubs and presses against Luka's penis!"
if %ransu=5 mov $sel1,"I'll extract your semen with this...":mov $sel2,"La Croix contracts and loosens her vaginal muscles, making it feel like it was sucking on him!"
name $name
eng $sel1:$sel6\
name ""
skillname "La Croix's Mod"
dwave 1,"se\ero_chupa4.ogg"
eng $sel2:$sel6
skillcount3 4068
mov %damage_kotei,1
damage 500,600
skillname ""
if %mylife=0 sub %stack,1:return *shirom_h5
sub %stack,1
goto *shirom_a6



*shirom_onedari

mov $list1,"Necrophase"
if %4065>0 mov %list_num1,1
mov $list2,"Necroreim"
if %4066>0 mov %list_num2,1
mov $list3,"Necrofaun"
if %4067>0 mov %list_num3,1
mov $list4,"La Croix's Mod"
if %4068>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *shirom_onedari1
if %cmd1=12 goto *shirom_onedari2
if %cmd1=13 goto *shirom_onedari3
if %cmd1=14 goto *shirom_onedari4
if %cmd1=-1 goto *shirom_main
goto *shirom_onedari



*shirom_onedari1

gosub *onedari_syori
name $name
>You want to come in my hand?@
>Then feel the power of my hand techniques...\
name ""
gosub *shirom_a1
skip -1



*shirom_onedari2

gosub *onedari_syori
name $name
>You want to come in my mouth?@
>Then feel the power of my oral techniques...\
name ""
gosub *shirom_a2
skip -1



*shirom_onedari3

gosub *onedari_syori
name $name
>You want to come on my chest?@
>Then feel the power of my breast techniques...\
name ""
gosub *shirom_a3
skip -1



*shirom_onedari4

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want to come inside me?@
>Then be finished as I rape you...\
name ""
if %kousoku=0 gosub *shirom_a4
gosub *shirom_a5
skip -1



*shirom_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\shirom_bk03.bmp",0,0
gosub *syasei2
>As La Croix strokes Luka's penis, he comes, covering her hands with semen.\
mov %viclose,1:gosub *lose
mov %2709,%2709+1:if %2709=1 mov %count_koenemy,%count_koenemy+1
if %2709>%count_most mov %count_most,%2709:mov $count_mostname,$name
count 5,4
mov $bad1,"La Croix used her hands to force Luka to come."
gosub *face2
name $name
>Ha... You covered my hands.@
>I thought you would last a little longer, but I guess this is your limit.\
name ""
goto *shirom_h



*shirom_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\shirom_bk01.bmp",0,0
gosub *syasei2
>As La Croix sucks on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2709,%2709+1:if %2709=1 mov %count_koenemy,%count_koenemy+1
if %2709>%count_most mov %count_most,%2709:mov $count_mostname,$name
count 4,4
mov $bad1,"La Croix forced Luka to come with her mouth."
gosub *face2
name $name
>Nnnn... You filled my mouth.@
>I thought you would last a little longer, but I guess this is your limit.\
name ""
goto *shirom_h



*shirom_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\shirom_bk02.bmp",0,0
gosub *syasei2
>As La Croix squeezes Luka's penis between her soft breasts, he comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2709,%2709+1:if %2709=1 mov %count_koenemy,%count_koenemy+1
if %2709>%count_most mov %count_most,%2709:mov $count_mostname,$name
count 7,4
mov $bad1,"La Croix forced Luka to come with her breasts."
gosub *face2
name $name
>Ha... You covered my breasts.@
>I thought you would last a little longer, but I guess this is your limit.\
name ""
goto *shirom_h



*shirom_h4

mov %ikigoe,3:gosub *ikigoe
name $name
>Already? Really...?\
name ""
gosub *syasei1
lsp 690,":c;chara\shirom_h4.bmp",0,0
gosub *syasei2
>As soon as Luka is forced into La Croix's modified vagina, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2709,%2709+1:if %2709=1 mov %count_koenemy,%count_koenemy+1
if %2709>%count_most mov %count_most,%2709:mov $count_mostname,$name
count 1,4
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"La Croix forced Luka to come the moment of insertion."
gosub *face2
name $name
>Coming within only seconds...@
>Congratulations, you now hold the new record for fastest time.\
name ""
goto *shirom_h



*shirom_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 690,":c;chara\shirom_h4.bmp",0,0
gosub *syasei2
>As La Croix rapes Luka with her modified vagina, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2709,%2709+1:if %2709=1 mov %count_koenemy,%count_koenemy+1
if %2709>%count_most mov %count_most,%2709:mov $count_mostname,$name
count 1,4
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"La Croix forced Luka to come with her modified vagina."
gosub *face2
name $name
>Ha... I can feel you spurting inside me.@
>If you came this much, it must have felt quite good.\
name ""
goto *shirom_h



*shirom_h

mov $tatie2,"shirom_st02"
mov $bad2,"After that, Luka was raped to death."
if %2709=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku=2 mov %hseanwave,4:hseanwave:goto *shirom_hb
name "Luka"
>Ahh...\
name ""
name $name
>This body itself is the perfect zombie...@
>Of course, there's no flaw with my vagina.\
>As a man, do you want to taste it?@
>Come here and give me a try...\
name ""
name "Luka"
>S...Stop... Ah...\
name ""
cspl 690,699
lsp 700,":c;chara\shirom_h1.bmp",0,0:print 10,500
>La Croix forcibly holds me down, straddling on top of me.@
>With that, she uses her fingers to stretch open her own entrance.\
name $name
>I created my own vagina with the various organs of different monsters.@
>I've tested it on a few males now, and the results were excellent.\
>They all kept coming over and over until they were exhausted, with looks of bliss on their faces.\
name ""
name "Luka"
>S...Stop...\
name ""
>She's going to rape me with her modified vagina...@
>My body shakes in horror and fear at the thought.\
>With a smile, La Croix starts to lower herself on me.@
>My already erect penis slowly pierces into her...\
name "Luka"
>Ahhh!\
name ""
mov %hseanwave,4:hseanwave
cspl 690,699
lsp 700,":c;chara\shirom_h2.bmp",0,0:print 10,500
>I'm brought all the way inside her vagina, suddenly attacked by strange stimulations I wasn't expecting.\
goto *shirom_hb



*shirom_hb

name "Luka"
>Ah...\
name ""
name $name
>Well? It's amazing, isn't it?@
>I created it by combining the best parts of various other monsters.\
>A creation of extreme beauty, able to extract semen in the most efficient way...\
name ""
name "Luka"
>I...It's moving inside...\
name ""
>Her vaginal flesh swells and moves, causing her wet flesh to rub against my penis in varying motions.\
>The seductive movements of her flesh leave me breathless just from insertion.@
>Without even moving, I'm already moaning.\
name "Luka"
>Ah... Haa...\
name ""
name $name
>That's a function of the mollusk species of monsters...@
>My vaginal walls are composed of the same material that a Slug Girl is made of.\
>Just from being inside, they rub and pull on you like it was some sort of stomach.@
>Just being inside me is unbearable, isn't it?\
name ""
name "Luka"
>I...Incredible... It feels so good...\
name ""
>My disgust at being inside of her is blown away by the pleasure.@
>Leaning back in ecstasy, I let the sensations soak over me.\
lsp 700,":c;chara\shirom_h3.bmp",0,0:print 10,500
name $name
>Hehe, you seem to like it.@
>I can even do this...\
name ""
name "Luka"
>Ahhh!!!\
name ""
>Three places inside her vagina suddenly shrink down.@
>Around my tip, the middle of my shaft, and right at my root...\
>The three points of pressure attack me with a mad sense of pleasure.@
>My waist bounces up as my sensitive areas are squeezed hard.\
name $name
>This is taken from the Lamia family...@
>With extra muscles, I can squeeze and move my vagina however I want.\
>But there's far more to me than just those two...\
name ""
>Numerous ribbed edges slowly push out inside her vagina.@
>It's like she can even change the form of her vagina itself at will...\
>Small folds start to rub against my glans and shaft as her slug-like walls continue pulling and rubbing against me.\
name "Luka"
>Ahhh!!!\
name ""
>It's as if my penis is being licked by hundreds of tiny little tongues inside her...\
name $name
>Being able to move the folds inside me is a feature from the Succubi...@
>Using them, I can even get a good taste of your penis and semen from inside my vagina.\
>Of course, I can freely move them as I wish...@
>And the bumps lining the interior flesh is something found in the Harpy family...\
name ""
name "Luka"
>Haa... They're rubbing against my tip...\
name ""
>Tiny little bumps rub against my tip deep inside her, the rough stimulation sending my body into new spasms.\
>The combination of sensations leave me completely helpless.@
>Just how good would it feel to come inside her...?\
name "Luka"
>Ah... Haa...\
name ""
name $name
>It's not just folds and bumps inside my vagina, either.@
>This was something I took from the Scylla family...\
name ""
name "Luka"
>Ah!@>Hyaa!\
name ""
>I feel something start to move inside her vagina...@
>A soft, thin tentacle coils around my penis, and starts to rub underneath the neck of my glans.\
>The stimulation sends me over the edge, leaving me wanting nothing more than to come inside her.\
name "Luka"
>Haa... That feels good...@
>I'm going to come...\
name ""
>Unable to hold back any longer, I give in to desire.@
>There's no way I can stop this pleasure...\
name $name
>At your limit? Then...\
name ""
mov %hseanwave,0:hseanwave
lsp 700,":c;chara\shirom_h1.bmp",0,0:print 10,500
>La Croix slowly stands up, and pulls me out of her.@
>My penis, now erect in the air, trembles outside of her.\
name "Luka"
>W...Why...?\
name ""
>My body spasms in confusion at having been pulled away from the pleasure.@
>A feeling of irritation and something being left incomplete gnaws at my body.\
name $name
>Hehehe... Do you want to come inside me?@
>If so, you need to do it yourself.\
>As I said before, my vagina is able to efficiently extract all of a male's semen.@
>If a man ejaculates, I'll suck out all of your semen in moments.\
name ""
name "Luka"
>N...No way...\
name ""
name $name
>If you come inside me, you'll keep going until you're dry...@
>Do you still want to come inside me?@
>Even if it will draw everything out, killing you?\
name ""
name "Luka"
>............\
name ""
>The vagina in front of me truly is a demon's...@
>Coming inside it just once will make me keep going until I die.\
>I shudder in horror and fear at the thought...@
>But another part of my mind can't help but instinctually want to feel it.\
>A pleasure so powerful that it would make me reach climax after climax...@
>I can't forget that ecstasy I was feeling before.\
>Letting desire and greed take over my thoughts for a moment, my male instinct takes over my better judgement.\
name "Luka"
>I...I want to put it in...\
name ""
>Giving in, I beg La Croix.@
>I want to feel her vagina again, and come inside her...\
name $name
>Hehe... So the true nature of the Hero is just another pitiful male.@
>Wanting to stick it in, even if it means his end.\
>Then as you wish...@
>Taste the ultimate pleasure that you're trading your life for...\
name ""
>With a contempt smile, La Croix slowly drops her waist back down.\
>I stare at where we're connected with expectation...@
mov %hseanwave,4:hseanwave
lsp 700,":c;chara\shirom_h2.bmp",0,0:print 10,500
>My penis slowly sinks back into her modified vagina.\
name $name
>This is the pleasure you've been waiting for, isn't it?\
>But don't worry, I won't pull out again.@
>Enjoy it to your heart's content...\
name "Luka"
>Haa... Ahhh!\
name ""
>My body explodes again in joy as her warm flesh wraps around me.@
>Her tight, squeezing flesh latches back onto me as it pulls and rubs against my penis.\
>The folds start to lick me like tongues, the bumps deep inside her rubbing against my glans.@
>At the end, the tentacle inside her slowly starts to coil back around me...\
>The combination of incredible stimuli bring me back to the edge in moments.\
name "Luka"
>I...Incredible... I'm going to come!\
name ""
name $name
>Hehe... At your limit again so soon?@
>You should enjoy it more before the true extraction starts...\
name ""
name "Luka"
>B...But I can't take it any longer...\
name ""
>Once I come, this vagina will suck me dry...@
>Even if I know that, I can't stop myself.\
>My male instinct wants to surrender right away.@
>As my penis starts to pulse inside her, I relax my body, bathing in the climax.\
name "Luka"
>Ahh...\
name ""
gosub *syasei1
lsp 700,":c;chara\shirom_h4.bmp",0,0
gosub *syasei2
>Throbbing inside her vagina, my penis spits out jet after jet of semen into her.@
>Each spurt sends waves of ecstasy through me.\
name "Luka"
>Haa...\
name ""
>Slightly drooling, my entire being focuses on the pleasure from my orgasm.\
name $name
>Hehe, you came.@
>Now your life is over...\
>Your semen and energy will all be extracted at once now.@
>Enjoy the last of your life while inside my vagina...\
name ""
name "Luka"
>Ahhh!!!\
name ""
mov %hseanwave,10:hseanwave
>The modified vagina I just exploded inside suddenly changes.@
>Her flesh suddenly contracts, stimulating my sensitive penis even further.\
name "Luka"
>Hyaaa!\
name ""
>The sudden, intense pleasure causes my body to spasm in surprise.@
>Unlike the slow, gradual buildup before, this touch is closer to a forcible milking.\
gosub *syasei1
lsp 700,":c;chara\shirom_h5.bmp",0,0
gosub *syasei2
name "Luka"
>Ahh...\
name ""
>In only seconds, I'm brought to another ejaculation inside her.\
>At the same time, a powerful weakness comes over me.@
>As she makes me come, my energy is being sucked out...\
name $name
>Until you're out of energy, this won't stop...@
>Well, it's not like it will take long anyway.\
name ""
name "Luka"
>Haa... Ahh!\
name ""
>La Croix's vagina continues to contract and suck on my penis, drawing out my energy in orgasm after orgasm...\
gosub *syasei1
lsp 700,":c;chara\shirom_h6.bmp",0,0
gosub *syasei2
>My penis continues pulsing inside her, happily delighting in the unnatural pleasure.@
>It's like her modified vagina is a pump, drawing my semen out into her...\
gosub *syasei1:gosub *syasei2
name "Luka"
>Ahh...\
name ""
>My gasps are getting weaker as my body goes limp.@
>La Croix, still on top of me, looks down at my face in triumph.\
name $name
>Well? It feels good, doesn't it?@
>This kind of treatment isn't that bad, huh?\
>Now, I'll pull the curtain on your life.@
>You'll be in the next world soon enough...\
name ""
>Along with her announcing the end of my life, she squeezes me with her vagina...\
name "Luka"
>Ah...a...\
name ""
gosub *syasei1:gosub *syasei2
>And reacting to it, my penis pulses as a few drops of semen drip into her.\
mov %hseanwave,0:hseanwave
name $name
>And you're empty...@
>Haha, it was good for you too, wasn't it?\
name ""
name "Luka"
>.............\
name ""
>With the last drop of semen squeezed out of me into La Croix's vagina, so too was my life itself.\
gosub *anten
>.............\
goto *badend



*alice8th1_start

mov $name,"Black Alice"
mov $name2,"Black Alice"
mov $lavel,"alice8th1"
mov $tatie1,"alice8th_st01"
mov $tatie2,"alice8th_st02"
mov $tatie3,"alice8th_st03"
mov $tatie4,"alice8th_hb1"
mov $haikei,"bg145"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,33000
if %nanido=2 mov %max_enemylife,38000
if %nanido=3 mov %max_enemylife,43000
if %nanido=0 mov %max_enemylife,2
if %nanido=1 mov %henkahp1,10000
if %nanido=2 mov %henkahp1,10000
if %nanido=3 mov %henkahp1,10000
if %nanido=0 mov %henkahp1,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,0
mov %music,5
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Oh my... You aren't allowed to refuse my invitation."
mov $mogaku_sel2,"You can't run... You'll be my prey."
mov $mogaku_sel3,"Oh my... You aren't allowed to refuse my invitation."
mov $mogaku_sel4,"You can't run... You'll be my prey."
mov $mogaku_sel5,"Oh my... You aren't allowed to refuse my invitation."
mov $mogaku_dassyutu1,"Oh my... How boring."
mov $mogaku_dassyutu2,""
mov $mogaku_earth_dassyutu1,"You're as strong as always, Gnome."
mov $mogaku_earth_dassyutu2,"You were just as annoying last time, too."
mov $half_s1,"You seem to enjoy my body."
mov $half_s2,"If you would like, you can try me out some more?"
mov $kiki_s1,"Oh my, my... Is that all?"
mov $kiki_s2,"I won't let you bore me..."
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-280
mov %tukix,300
mov %owaza_count1a,4
name $name
>...You really do look just like Heinrich.\
>I only intended to play a little bit here...@> But should I just break you instead?\
name ""
name "Luka"
>Gah...!\
name ""
>The intense thirst for blood coming from her chills my blood itself.\
>Just how much power is hidden in that small body of hers...?\
name $name
>Shall we dance?@
>The moment you misstep...@>It will be your end.\
name ""
mov %sinkou,1
goto *common_main



*alice8th1_v

gosub *face2
name $name
>I see...@> You're quite skilled.@
>It looks like the Heinrich bloodline hasn't weakened over the years.\
name ""
name "Luka"
>........!?\
name ""
>Black Alice suddenly stops attacking.@
>It looks like she isn't going to keep fighting...\
mov %viclose,1:gosub *victory
mov %getexp,500000:gosub *lvup
mov %2414,1
goto *sean0395



*alice8th1_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Oh my... You want me to play with you that badly?@
>Then let's have some fun...\
name ""
goto *alice8th1_a



*alice8th1_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *alice8th1_kousan
if %cmd1=16 goto *alice8th1_onedari
if %cmd1=17 goto *common_skill
goto *alice8th1_main



*alice8th1_a

if %enemylife<%henkahp1 && %sinkou=1 goto *alice8th1_v
if %kousoku=1 gosub *alice8th1_a6:goto *common_main
rnd2 %ransu,1,6
if %ransu=1 gosub *alice8th1_a1:goto *common_main
if %ransu=2 gosub *alice8th1_a2:goto *common_main
if %ransu=3 gosub *alice8th1_a3:goto *common_main
if %ransu=4 gosub *alice8th1_a4:goto *common_main
if %ransu>4 && %owaza_count1a>5 gosub *alice8th1_a5:goto *common_main
skip -6



*alice8th1_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll use my fingertips to tickle your penis... Hehe."
if %ransu=2 mov $sel1,"I don't mind if you come on my hands..."
if %ransu=3 mov $sel1,"Look at it twitching... Hehe, I'll rub it."
name $name
eng $sel1:$sel6\
name ""
skillname "Tickling Finger Caress"
dwave 1,"se\ero_koki1.ogg"
>Black Alice gently grabs hold of Luka's penis with one hand, and uses the fingertips of her other to lightly tickle his glans!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4069
if %nanido<2 damage 400,430
if %nanido=2 damage 460,490
if %nanido=3 damage 520,550
skillname ""
if %mylife=0 sub %stack,1:return *alice8th1_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*alice8th1_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"How about my mouth? *Lick* *Suck*"
if %ransu=2 mov $sel1,"I don't mind if you come inside... *Suck*"
if %ransu=3 mov $sel1,"I'll drive you crazy with my mouth skills... *Lick*"
name $name
eng $sel1:$sel6\
name ""
skillname "Sucking Small Mouth"
dwave 1,"se\ero_buchu2.ogg"
>Black Alice sucks on Luka's penis with her small mouth!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4070
if %nanido<2 damage 410,440
if %nanido=2 damage 470,500
if %nanido=3 damage 530,560
skillname ""
if %mylife=0 sub %stack,1:return *alice8th1_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*alice8th1_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Would you please give your semen to my breasts?"
if %ransu=2 mov $sel1,"They aren't that big, but they're good enough for some men..."
if %ransu=3 mov $sel1,"They're still getting bigger, but... They still feel good, don't they?"
name $name
eng $sel1:$sel6\
name ""
skillname "Young Girl's Modest Breasts"
dwave 1,"se\ero_sigoki1.ogg"
>Black Alice rubs Luka's penis against her breasts over her clothes!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4071
if %nanido<2 damage 420,450
if %nanido=2 damage 480,510
if %nanido=3 damage 540,570
skillname ""
if %mylife=0 sub %stack,1:return *alice8th1_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*alice8th1_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My hair has some magical powers to it..."
if %ransu=2 mov $sel1,"Would you like me to squeeze your penis with my hair?"
if %ransu=3 mov $sel1,"Does it feel good? When I suck your energy with my hair?"
name $name
eng $sel1:$sel6\
name ""
skillname "Devilish Draining Hair"
dwave 1,"se\umaru.ogg"
>Black Alice's hair moves like tentacles, and wraps around Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4072
if %nanido<2 damage 250,270
if %nanido=2 damage 280,300
if %nanido=3 damage 310,330
dwave 1,"se\ero_chupa6.ogg"
>Magical power flows from her hair into Luka, draining his energy!
if %nanido<2 damage 250,270
if %nanido=2 damage 280,300
if %nanido=3 damage 310,330
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *alice8th1_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*alice8th1_a5

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 8
name $name
if %first_sel1=1 skip 3
>Now then, would you please mate with me?@
skip 2
>Would you please try mating with me again?@
>Don't worry about it, just follow my lead...\
name ""
skillname "Push"
eng "Black Alice pushes Luka down, and straddles him!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
@
mov %kousoku,1:gosub *status_print
>Luka is being held down by Black Alice!\
skillname ""
if %kousan=2 sub %stack,1:return
name $name
>Hehe, we're ready to start.@
if %first_sel1=1 skip 3
>I'll violate you underneath this skirt...\
skip 2
>This time, I won't let you get away...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,1
if %earth=0 && %nanido=2 mov %genmogaku,1
if %earth=0 && %nanido=3 mov %genmogaku,1
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
sub %stack,1
return



*alice8th1_a6

add %stack,1
>Black Alice is on top of Luka...\
name $name
>Hehe... It feels amazing inside of me.@
>Please try not to let your penis melt away inside...\
name ""
skillname "Monster Lord's All-Night Vigil"
dwave 1,"se\ero_makituki2.ogg"
>Black Alice sinks her waist down, taking Luka inside her!
skillcount3 4073
mov %damage_kotei,1
damage 500,600
mov %kousoku,1:gosub *status_print
>Luka is being raped by Black Alice!\
skillname ""
if %mylife=0 sub %stack,1:return *alice8th1_h5
name "Luka"
>Ahhh!!!\
name ""
>Her flesh squeezes against me, squirming around my penis as I slip inside.\
>The swelling, moving flesh feels more like a mouth than a vagina...\
name $name
>Aha, I swallowed your penis up.@
>It feels incredible inside me, doesn't it?\
name ""
sub %stack,1
goto *alice8th1_a7



*alice8th1_a7

add %stack,1
>Luka is being raped by Black Alice...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Enjoy my vagina...":mov $sel2,"Her vaginal walls squirm around Luka's penis, massaging him!"
if %ransu=2 mov $sel1,"Hehe... You're already leaking.":mov $sel2,"Black Alice shakes her waist back and forth, grinding against Luka!"
if %ransu=3 mov $sel1,"How do you want me to finish you? Hehehe...":mov $sel2,"Her vagina pulls and sucks on Luka's penis!"
if %ransu=4 mov $sel1,"Does it feel better when I tighten?":mov $sel2,"Black Alice tightens her vagina round Luka's penis!"
if %ransu=5 mov $sel1,"You can't endure it, so go ahead and come...":mov $sel2,"Black Alice rhythmically squeezes Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Monster Lord's All-Night Vigil"
dwave 1,"se\ero_makituki3.ogg"
eng $sel2:$sel6
skillcount3 4073
mov %damage_kotei,1
damage 500,600
skillname ""
if %mylife=0 sub %stack,1:return *alice8th1_h6
sub %stack,1
goto *alice8th1_a7



*alice8th1_onedari

mov $list1,"Tickling Finger Caress"
if %4069>0 mov %list_num1,1
mov $list2,"Sucking Small Mouth"
if %4070>0 mov %list_num2,1
mov $list3,"Young Girl's Modest Breasts"
if %4071>0 mov %list_num3,1
mov $list4,"Devilish Draining Hair"
if %4072>0 mov %list_num4,1
mov $list5,"Monster Lord's All-Night Vigil"
if %4073>0 mov %list_num5,1
gosub *cmd_onedari
if %cmd1=11 goto *alice8th1_onedari1
if %cmd1=12 goto *alice8th1_onedari2
if %cmd1=13 goto *alice8th1_onedari3
if %cmd1=14 goto *alice8th1_onedari4
if %cmd1=15 goto *alice8th1_onedari5
if %cmd1=-1 goto *alice8th1_main
goto *alice8th1_onedari



*alice8th1_onedari1

gosub *onedari_syori
name $name
>Uhaha...@> You want to come in my hand?@
>Then I'll show you plenty of my love...\
name ""
gosub *alice8th1_a1
skip -1



*alice8th1_onedari2

gosub *onedari_syori
name $name
>Uhaha...@> You want to come in my mouth?@
>Then I'll show you plenty of my love...\
name ""
gosub *alice8th1_a2
skip -1



*alice8th1_onedari3

gosub *onedari_syori
name $name
>Uhaha...@> You want to come on my breasts?@
>Then I'll show you plenty of my love...\
name ""
gosub *alice8th1_a3
skip -1



*alice8th1_onedari4

gosub *onedari_syori
name $name
>Uhaha...@> You want to come on my hair?@
>Then I'll show you plenty of my love...\
name ""
gosub *alice8th1_a4
skip -1



*alice8th1_onedari5

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>Uhaha...@> You want me to rape you?@
>Then I'll show you plenty of my love...\
name ""
if %kousoku=0 gosub *alice8th1_a5
gosub *alice8th1_a6
skip -1



*alice8th1_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\alice8th_bk04.bmp",0,0
gosub *syasei2
>As Black Alice's fingertips gently stroke Luka's penis, he comes, covering her hands with semen.\
mov %viclose,1:gosub *lose
mov %2714,%2714+1:if %2714=1 mov %count_koenemy,%count_koenemy+1
if %2714>%count_most mov %count_most,%2714:mov $count_mostname,$name
count 5,11
mov $bad1,"Black Alice used her hands to force Luka to come."
gosub *face2
name $name
>How ungraceful...@>You covered my hands in semen!@
>Teehee... Did it feel good?\
name ""
goto *alice8th1_ha



*alice8th1_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\alice8th_bk01.bmp",0,0
gosub *syasei2
>As Black Alice sucks on Luka's penis, he comes, filling her small mouth with semen.\
mov %viclose,1:gosub *lose
mov %2714,%2714+1:if %2714=1 mov %count_koenemy,%count_koenemy+1
if %2714>%count_most mov %count_most,%2714:mov $count_mostname,$name
count 4,11
mov $bad1,"Black Alice forced Luka to come with her mouth."
gosub *face2
name $name
>How ungraceful...@>You filled my mouth with semen!@
>Teehee... Did it feel good?\
name ""
goto *alice8th1_ha



*alice8th1_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\alice8th_bk03.bmp",0,0
gosub *syasei2
>As Black Alice rubs Luka's penis against her small breasts, he comes, covering her clothes with semen.\
mov %viclose,1:gosub *lose
mov %2714,%2714+1:if %2714=1 mov %count_koenemy,%count_koenemy+1
if %2714>%count_most mov %count_most,%2714:mov $count_mostname,$name
count 7,11
mov $bad1,"Black Alice forced Luka to come with her breasts."
gosub *face2
name $name
>How ungraceful...@>You covered my clothes in semen!@
>Teehee... Did it feel good?\
name ""
goto *alice8th1_ha



*alice8th1_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\alice8th_bk02.bmp",0,0
gosub *syasei2
>As Black Alice's magic hair drains Luka's energy through his penis, he comes, covering her hair with semen.\
mov %viclose,1:gosub *lose
mov %2714,%2714+1:if %2714=1 mov %count_koenemy,%count_koenemy+1
if %2714>%count_most mov %count_most,%2714:mov $count_mostname,$name
count 22,11
mov $bad1,"Black Alice forced Luka to come with her hair."
gosub *face2
name $name
>How ungraceful...@>You covered my hair in semen!@
>Teehee... Did it feel good?\
name ""
goto *alice8th1_ha



*alice8th1_h5

mov %ikigoe,3:gosub *ikigoe
name $name
>Oh my... Really?@
>You're satisfied with just that?\
name ""
gosub *syasei1
lsp 700,":a;chara\alice8th_hb2.bmp",0,0
gosub *syasei2
>The moment Luka feels Black Alice's strange vagina, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2714,%2714+1:if %2714=1 mov %count_koenemy,%count_koenemy+1
if %2714>%count_most mov %count_most,%2714:mov $count_mostname,$name
count 1,11
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Black Alice forced Luka to come the moment of insertion."
name $name
>You came in only seconds...@
>Hehe, aren't you ashamed of yourself, as a man?\
name ""
goto *alice8th1_ha



*alice8th1_h6

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\alice8th_hb2.bmp",0,0
gosub *syasei2
>As Black Alice rapes Luka with her strange vagina, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2714,%2714+1:if %2714=1 mov %count_koenemy,%count_koenemy+1
if %2714>%count_most mov %count_most,%2714:mov $count_mostname,$name
count 1,11
mov $bad1,"Black Alice forced Luka to come as she raped him."
name $name
>Look at you... Spurting off so much semen.@
>Teehee... Did it feel good?\
name ""
goto *alice8th1_hb2



*alice8th1_ha

mov $bad2,"Luka was swallowed by Black Alice's bear, and eaten."
if %2851=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2851,1
name "Luka"
>Ahh...\
name ""
>I fall to my knees, too weak to keep fighting Black Alice any longer.@
>Stepping closer, she looks down at me with a smile on her face.\
name $name
>Just as I thought, you were no big deal...@
>I'm not really hungry at the moment, either.\
name ""
>Black Alice begins to chant some sort of spell...@
>The magic flows around my body as my skin starts to tingle!\
name "Luka"
>W...What the...?\
name ""
dwave 1,"se\down4.ogg"
>Black Alice slowly grows bigger and bigger in front of me...@
>No, wait, I'm getting smaller!\
>She must have cast magic to shrink me somehow...@
>Her strange magic leaves me palm sized...\
name "Alice"
>Hehe, you're so small.@
>Like a little doll...\
name ""
name "Luka"
>Guh!\
name ""
>Black Alice is like a giant in front of me...@
>What is this brutal girl going to do...?@> I can't help but shiver at the thought.\
name $name
>Hehe, are you wondering what I'm going to do?@
>Will I torture you?@>Or step on you...?\
name ""
name "Luka"
>Ah...\
name ""
>If I'm this small, there's no running...@
>I'm too weak to resist, anyway.\
name $name
>Honestly, my interest with you is gone.@
>I'd just get bored torturing or raping you.\
>So I think I'll just let one of my pets feed on you.@
>Hey, Beary...\
name ""
>Black Alice sets down her stuffed animal in front of me.@
>Since I'm so small, I have to look up to see its looming face...\
>A crack suddenly opens up in its chest, opening as if it was some sort of mouth...\
>Reaching out of that chest...@
dwave 1,"se\ero_makituki3.ogg"
cspl 690,699
lsp 700,":a;chara\alice8th_ha1.bmp",0,0:print 10,500
>Was hundreds of tentacles!\
name "Luka"
>Hya!\
name ""
>I fall down in surprise at the horrible sight before me.@
>And I instantly realize what's about to happen...\
name $name
>You can eat him, Beary.\
name ""
lsp 700,":a;chara\alice8th_ha2.bmp",0,0:print 10,500
>The countless tentacles from the bear reach out and coil around me.@
>Raising me up by my feet, they slowly bring me closer to its opening...\
name "Luka"
>H...Help...@
>Ahhh!\
name ""
mov %hseanwave,11:hseanwave
lsp 700,":a;chara\alice8th_ha3.bmp",0,0:print 10,500
>The tentacles around me bring me into the bear's gaping mouth, burying my lower body in a whirlpool of tentacles.\
>The wriggling, squirming tentacles rub against every inch of my lower body, focusing especially closely on my penis.\
lsp 700,":a;chara\alice8th_ha4.bmp",0,0:print 10,500
name "Luka"
>S...Sto... Ah...\
name ""
>Responding to that stimulation, my penis quickly gets erect.@
>Sensing that, the tentacles coil around my penis, slowly increasing the pressure on it.\
name $name
>Oh my, what bad manners...@
>You're letting your penis get larger while being eaten?\
name ""
name "Luka"
>N...No... Stop...\
name ""
>The tentacles all start to eagerly toy with my penis inside the bear's mouth.@
>Coiled all the way around my penis, their tips rub and massage my glans and back muscle.\
>As the innumerable thin tentacles attack me from every direction, I can only writhe as their slimy touch takes away my other thoughts.\
name "Luka"
>Haaa... No... Coming...\
name ""
name $name
>Beary, I think he's going to come soon.@
>Human semen is very delicious, you know...\
name ""
name "Luka"
>Ah...\
name ""
>The bear's tentacles start to rub and stroke my penis even faster, as if trying to encourage my ejaculation.@
>Finally, I'm left unable to stop my body's greedy desire for release...\
name "Luka"
>Ah... Coming!@>Ahh!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice8th_ha5.bmp",0,0
gosub *syasei2
>With my lower body slowly being swallowed into the bear's vortex of tentacles, I come.\
>Even during my orgasm, the groping tentacles don't start grabbing and rubbing against my penis.\
name $name
>Oh my, you leaked out...@
>How crude... All Ms. Beary is trying to do is eat you...\
name ""
name "Luka"
>Haa...\
name ""
>Now even weaker, the bear is easily able to draw me deeper into her mouth...@
>Of course, her groping tentacles don't stop attacking my penis for even a moment.\
>The tentacles squeeze my glans tight, as others run quickly up and down my back muscle.@
>My mouth half open in ecstasy, I can feel my body surrendering to these tentacles again...\
name "Luka"
>Ahh...\
name ""
gosub *syasei1
lsp 700,":a;chara\alice8th_ha6.bmp",0,0
gosub *syasei2
>And just like that, I'm brought to another orgasm...@
>While basking in my afterglow, the bear easily pulls me deeper into her mouth...\
lsp 700,":a;chara\alice8th_ha7.bmp",0,0:print 10,500
>And now only my head is left outside.@
>Inside the bear, the rest of my body is being attacked by her slimy tentacles...\
>Even though my body is exploding in pleasure, my mind is terrified of the predation.\
name "Luka"
>S...Stop... Don't eat me...\
name ""
>But the one eating me doesn't react in the slightest...@
>Meanwhile, Black Alice has a cruel smile on her face as she watches.\
name $name
>Ok... Go ahead and eat him, Beary.\
name ""
>And coldly orders her stuffed animal to eat me.\
name "Luka"
>St... Hyaa!\
name ""
lsp 700,":a;chara\alice8th_ha8.bmp",0,0:print 10,500
>Even while I struggle, the bear easily slurps me up into her body.@
>Swallowed whole into the stuffed animal's body, the horrible predation is starting...\
if %hosyoku_cut=1 goto *hosyoku_cut
name "Luka"
>Hyaa... Ahhh!\
name ""
mov %hseanwave,12:hseanwave
>A vortex of tentacles swirls around my body, pressing and stroking me...@
>The flesh pushing against me from all sides makes it feel like the bear's whole body is chewing on me.\
>Melting in agonized pleasure, I writhe in ecstasy as the bear's whole body preys on me...\
name "Luka"
>Ahhh!\
name ""
>My body slowly dissolves away inside her body, my flesh becoming mere nutrients for Black Alice's pet bear...\
mov %hseanwave,0:hseanwave
lsp 700,":a;chara\alice8th_ha9.bmp",0,0:print 10,500
name "Luka"
>...........\
name ""
>The stuffed bear's mouth closes, having finished digesting the boy's body.\
name $name
>Teehee... Did he taste good, Beary?\
name ""
>Black Alice pets the bear's head with a smile.@
>Carrying the stuffed animal in her arms, she leaves the area.\
gosub *anten
>...........\
goto *badend



*alice8th1_hb

name "Luka"
>Ahh...\
name ""
name $name
>Now to mate with you...@
>I'll give you a taste of heaven inside me.\
>Now then, excuse me...\
name ""
cspl 690,699
lsp 700,":a;chara\alice8th_hb1.bmp",0,0:print 10,500
>Black Alice steps over me, while I'm too weak to resist.@
>Like that, she daintily sits down, sitting on top of me.\
>Her large skirt is covering most of my body, leaving me unable to see what's going on under it.\
name $name
>Hehe... I'm riding you like a horse.@
>Now to bring you inside...\
name ""
>Black Alice wiggles her small waist back and forth.@
>I feel the tip of my penis pressing against something wet under her skirt.\
>The warm, wet hole feels good, just from touching it...\
name "Luka"
>Haa...\
name ""
name $name
>Now, come inside...@
>I'll show you plenty of love.\
name ""
>With a thin smile on her face, Black Alice presses her body against mine.@
>My penis slowly slips into that warm hole, her vaginal flesh squeezing me as I enter.\
name "Luka"
>Ahhh!!!\
name ""
mov %hseanwave,1:hseanwave
>Her flesh wriggles against my penis, as her warm wetness flows out, covering my penis.\
>Just the touch of her warm vagina is enough to cause my body to go loose, my mind exploding with the sensations.\
name $name
>Hehe... What do you think of mating with me?\
name ""
name "Luka"
>Haa... It feels good...\
name ""
>Her flesh wriggles and squirms against my penis, feeling like her vagina was giving me a powerful massage.\
>And the tightness is incredible... It's like I'm being attacked by pleasure from every direction inside her.\
name "Luka"
>You're so wet... And tight...@
>Ahh...\
name ""
name $name
>Then... Allow me to bring you to orgasm.@
>If I do this, then you'll come right away...\
name ""
name "Luka"
>Haa... It's moving inside...\
name ""
>She suddenly tightens up, pressing her warm flesh even harder against my penis.@
>With the increased pressure, the gentle movements of her flesh increase in intensity.\
>Overwhelmed by the increase in sensation, I moan as my body goes loose, completely surrendering to the ecstasy.\
name "Luka"
>Ah...\
name ""
gosub *syasei1
lsp 700,":a;chara\alice8th_hb2.bmp",0,0
gosub *syasei2
>My penis pulses inside of her, spurting out semen into her wet hole.@
>Still being squeezed by her sweet touch during my orgasm, I moan in ecstasy all during my ejaculation.\
mov %hseanwave,0:hseanwave
name $name
>Hehe... Did it feel good?\
name ""
goto *alice8th1_hb2



*alice8th1_hb2

mov $bad2,"After being raped, Luka is preyed on."
if %2852=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2852,1
>Black Alice smiles as she stares down into my loose face.@
>Contracting her muscles, she milks out every drop while staring into my eyes.\
name $name
>You seem to have really enjoyed that...@
>Do you want to see what made your penis feel so good?\
name ""
name "Luka"
>Eh...?\
name ""
>While giggling, Black Alice lifts up her skirt...\
lsp 700,":a;chara\alice8th_hb3.bmp",0,0:print 10,500
name $name
>Hehe, too bad.@
>Your penis was being toyed with by a horrible predatory organ.\
>Not any sort of vagina...\
name ""
name "Luka"
>Ah!@>Ahhyaa!\
name ""
>With her lower body exposed, I can see my penis stuck inside a strange organ, with countless tentacles attached to it...\
>The touch I felt from before was this... Not any sort of vagina!\
name "Luka"
>Ahh... D...Disgusting...\
name ""
name $name
>Oh dear... But you were just saying how good it felt?@
>And you just came inside here, you know?\
name ""
>The strange organ is covered with my semen...@
>The mix of horror and humiliation runs through me as I stare at my semen, covering this horrifying organ.\
name "Luka"
>S...Stop... Let me go!\
name ""
>My penis is inside a predatory organ...@
>Even as I panic, the tentacles continue stroking and stimulating me.\
>I twist my body, trying everything I can to escape.\
name $name
>Hehehe... Did you think you could escape now?\
name ""
mov %hseanwave,12:hseanwave
lsp 700,":a;chara\alice8th_hb4.bmp",0,0:print 10,500
>The gaping mouth where her vagina should be clamps down, completely taking my penis inside!\
name "Luka"
>Ahhh!!!\
name ""
>The horrifying tentacles latch onto my penis, and all start stroking and squirming against it...\
name $name
>Hehehe... I swallowed up your penis.@
>But I'll play with you one more time...\
>I'll bring you to one more orgasm before I eat you.@
>So enjoy this last moment of pleasure before your death...\
name ""
name "Luka"
>No... Stop...@
>Ahhh!\
name ""
>The hideous predatory organ chews on my penis, the soft flesh pressing and squeezing my penis with every bite...\
>At the same time, the tentacles rub and stroke me, covering my penis with liquid that must be some sort of digestive juice.\
name "Luka"
>Hyaaa!\
name ""
name $name
>This is clearly motions used to digest food...@
>But your male organ is interpreting it as pleasure, isn't it?\
>And in response to that, you'll come...@
>Hehe, truly pitiful.\
name ""
>Just as Black Alice said, my body is squirming in pleasure.@
>And in response to that, my lower body aches as I give in to the rising desire.\
name "Luka"
>Ahhh!!!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice8th_hb5.bmp",0,0
gosub *syasei2
>I explode inside her predatory mouth, pouring my semen inside.@
>The physiological response that I can't fight against, coupled with the pleasure...\
>In tears, I writhe under her in a mix of pleasure and misery.\
name "Luka"
>Haa...\
name ""
name $name
>Your penis, that can't even tell the difference between genitals and predatory organs...@
>Say goodbye to it.\
>Your penis will dissolve away.@
>It won't take that long, so I'll eat it quickly.\
name ""
name "Luka"
>Help me... Ah...\
name ""
mov %hseanwave,13:hseanwave
>And finally, the ruthless digestion is starting...@
>My proof of manhood is going to be a victim to her predatory organ.\
>Her organ chews and squeezes my penis, as the tentacles pour more digestive juices onto me...\
name "Luka"
>Noo... Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice8th_hb6.bmp",0,0
gosub *syasei2
>As the digestive movements get more intense, it turns into pleasure, forcing me to a disappointing orgasm.\
>My face goes bright red at the shame of reaching orgasm while being digested.\
name "Luka"
>Ha... Ahyaaa!!!\
name ""
>My body relaxes in pleasure, as my penis literally melts away in pleasure...\
>My male instinct overpowers the rest of my thoughts, the overpowering stimulation from my ejaculation dominating my mind.\
name $name
>Haha... It's like you're truly in a paradise of pleasure.@
>Your face is so loose and enraptured, just from your penis being dissolved in my mouth...\
>Your glans is already mostly melted away...@
>Shall I open my mouth and show it to you?\
name ""
name "Luka"
>Haahh... Haa...\
name ""
name $name
>Oh my... Have you lost your mind from the pleasure?@
>Very well then, I'll digest away the last of your penis...\
name ""
name "Luka"
>Hyaaa!!!\
name ""
>The sensations from having my penis sucked and absorbed fill my senses.@
>Despite the horror at having the proof of my manhood dissolved away for food, I can't deny this ecstasy being forced into me...\
mov %hseanwave,0:hseanwave
name $name
>Alright... I ate it all.@
>You realize that I swallowed up your penis, right?\
>How does it feel? Teehee.\
name ""
name "Luka"
>Haa... Ah...\
name ""
>It's like I'm in paradise itself...@
>Pure bliss exists where my penis was...\
name $name
>Oh my, you seem to have completely lost your mind.@
>This isn't any fun...\
>Oh well, I'll finish this quickly then.@
>I'll feast on your body now...\
name ""
name "Luka"
>Ah...ahh...\
name ""
mov %hseanwave,13:hseanwave
gosub *anten
>The slimy touch surrounds the rest of my body.@
>I'm completely surrounded by soft, pulsing flesh.\
>I moan in pleasure to my last breath, digested away inside Black Alice's body...\
mov %hseanwave,0:hseanwave
>.............\
goto *badend



*traptemis_start

mov $name,"Themis Trap"
mov $name2,"Themis Trap"
mov $lavel,"traptemis"
mov $tatie1,"traptemis_st01"
mov $tatie2,"traptemis_st01"
mov $tatie3,"traptemis_st01"
mov $tatie4,"traptemis_st01"
mov $haikei,"bg207"
mov %monster_x,20
mov %monster_y,0
if %nanido=1 mov %max_enemylife,10000
if %nanido=2 mov %max_enemylife,10000
if %nanido=3 mov %max_enemylife,10000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,0
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-250
mov %tukix,300
name "Luka"
>So they're enemies!?\
name ""
>I jump back, pulling out my sword...@
>But there's no sign of the statue attacking.\
name $name
>This is sacred ground, leave...@
>Otherwise the wrath of the Heavens will fall upon you.\
name ""
name "Luka"
>...She isn't attacking?\
name ""
>Is this statue just here to warn people?@
>Or is there some kind of trap to it...?\
goto *common_main



*traptemis_v

gosub *face3
name $name
>.............\
name ""
dwave 1,"se\bun.ogg"
csp 700:print 99,1000,"system\breakup.dll/lrB"
>Themis Trap fades away into particles, and vanishes!\
mov %viclose,1:gosub *victory
mov %getexp,270000:gosub *lvup
mov %2371,1
goto *sean0400



*traptemis_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
goto *traptemis_a



*traptemis_main

gosub *cmd_main
if %cmd1=11 goto *common_attack
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *traptemis_kousan
if %cmd1=16 goto *traptemis_onedari
if %cmd1=17 goto *common_skill
goto *traptemis_main



*traptemis_a

gosub *traptemis_a1:goto *common_main



*traptemis_a1

add %stack,1
name $name
>............\
name ""
skillname "Themis' Rose"
dwave 1,"se\gas.ogg"
lsp 690,":a;chara\traptemis_st11.bmp",20,0:print 10,500
>Strange gas gushes out of the statue's body!\
if %daten>0 goto *skill22x
if %wind>0 mov %wind_kakuritu,100:gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But a gust of wind blows the gas away!":csp 690:print 10,500:gosub *wind_guard:sub %stack,1:return
>Breathing in the gas, Luka is deprived of his sanity!@
mov %status,1:gosub *status_print
>Luka has been put into a trance!\
csp 690
skillname ""
mov %viclose,2:gosub *lose
mov %2671,%2671+1:if %2671=1 mov %count_koenemy,%count_koenemy+1
if %2671>%count_most mov %count_most,%2671:mov $count_mostname,$name
count 31,16
mov $bad1,"Breathing in Themis Trap's gas, Luka lost his mind."
sub %stack,1
return *traptemis_h



*traptemis_onedari

name $name
>..............\
name ""
>It doesn't look like she understands what Luka's trying to do...\
goto *traptemis_main



*traptemis_h

mov $bad2,"Luka was petrified while clinging to the statue..."
if %2671=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
>As I breathe in the strange gas, I feel myself becoming light-headed.@
>At the same time, my sexual desire increases to an unbearable amount.\
>My erect penis pulses, the desire for pleasure overpowering all of my thoughts.@
>My eyes are drawn to the statue's groin, a small hole visible.\
name "Luka"
>I...Inside there...\
name ""
cspl 690,699
lsp 700,":a;chara\traptemis_st02.bmp",20,0:print 10,500
>I cling to the stone statue, and press my waist against her.@
>Pressing hard, I screw my penis into her open hole.\
mov %hseanwave,2:hseanwave
>With that, I push myself deep inside the stone statue's vagina...\
name "Luka"
>Ahhh...@
>A...Amazing...\
name ""
>A touch far better than I was expecting fills my senses.@
>This vagina can't truly be a stone statue's...\
>The soft, warm flesh squeezes my penis as I push in.@
>Her wet liquid flows out, covering my penis and making my insertion easy.\
name "Luka"
>Ahh...\
name ""
>The incredibly pleasurable stimulation confirms it.@
>This statue is a trap to force men to lose their mind and come...\
>If I come, it will trigger some sort of switch...@
>All those statues of men hugging these statues must have met the same end!\
name "Luka"
>N...No... I have to endure it...!\
name ""
>Summoning all of my strength, I try to pull out of the statue.@
>But her wet flesh grabs hold of me, keeping me inside.\
>Even the act of trying to pull out of her is forcing more pleasure into me.\
name "Luka"
>Ahh... I must not come...\
name ""
>I can't come inside this stone statue...@
>If I do, I'll become stone myself.\
>I try to endure it as long as I can, but the dull ache flowing through my body slowly picks up in strength.\
name "Luka"
>Ahhh!@
>I...I can't take this...!\
name ""
>This horrible statue determined my end as soon as I pushed inside her.\
>Her warm, wet flesh squeezes and massages my penis as I try to pull out...@
>There's no man alive that could endure this for long.\
name "Luka"
>Haaa... It feels so good...\
name ""
>Finally surrendering to the pleasure, I let her touch fill my thoughts.@
>My waist shakes back and forth as the waves of pleasure roll through me.\
>Her vagina leads to my finish...@
>Once I was inside this trap, there was no escape for me anyway.\
name "Luka"
>Ahh...\
name ""
>Unable to resist at all, I'm slowly led to my moment of ruin...\
gosub *syasei1
lsp 700,":a;chara\traptemis_st03.bmp",20,0
gosub *syasei2
>At least, I explode in the statue's vagina.@
>Unable to endure the pleasure, I completely surrendered to the stimulation.\
>My penis pulses inside her, squirting out every drop of semen into her.\
mov %hseanwave,0:hseanwave
name "Luka"
>Ahhh...\
name ""
>I cling to the stone statue's body in a mix of despair and ecstasy.@
>I exchanged a moment of pleasure for ruin...\
name "Luka"
>Hya!@> Ahhh!\
name ""
>And finally, that sensation came...@
>My power flees me, as my skin solidifies into stone.\
name "Luka"
>Ahhh...\
name ""
dwave 1,"se\stone.ogg"
>I lose feeling first in my feet...@
>As the petrification continues up my body, I slowly lose sensation in the rest of my body, too.\
lsp 700,":a;chara\traptemis_st04.bmp",20,0:print 10,500
>And at last, my body is completely petrified.@
>Completely frozen, I'm left as a strange piece of art here for the rest of my life...\
gosub *anten
>..............\
goto *badend



*gargoyle_start

mov $name,"Gargoyle Girl"
mov $name2,"Gargoyle Girl"
mov $lavel,"gargoyle"
mov $tatie1,"gargoyle_st01"
mov $tatie2,"gargoyle_st02"
mov $tatie3,"gargoyle_st03"
mov $tatie4,"gargoyle_st31"
mov $haikei,"bg208"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,25000
if %nanido=2 mov %max_enemylife,30000
if %nanido=3 mov %max_enemylife,35000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,35
if %nanido=3 mov %earth_keigen,18
mov %alice_skill,0
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Hehe... I won't let you escape!"
mov $mogaku_sel2,"Useless struggling..."
mov $mogaku_sel3,"Hehe, how long can you fight against it?"
mov $mogaku_sel4,"Turn to stone as you struggle!"
mov $mogaku_sel5,"Just look at you... Hehe."
mov $mogaku_earth_dassyutu1,"You escaped?"
mov $mogaku_earth_dassyutu2,"Then only... I... Will be... Petrified..."
mov $half_s1,"Hehe, are you feeling good?"
mov $half_s2,"When you finish, I'll take you between my breasts..."
mov $kiki_s1,"Hehehe, almost at your limit?"
mov $kiki_s2,"Now, cover my body with your seed..."
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,3
name $name
>Hehe... So the Hero came all the way here?\
name ""
>Suddenly, a stone statue in front of me opens her eyes!\
name "Luka"
>A Monster!?@
>But I didn't feel any presence...\
name ""
>If she can suppress her power that much, she must be strong...\
name $name
>I am the guard over the "Gate of Heaven".@
>I've been standing guard ever since the Great Monster Wars...\
>As time went on, my mission slowly ceased to matter.@
>But then Black Alice called out to me...@
>Rather then sit around here, I should live a more free life...\
name ""
name "Luka"
>And so you went over to Ilias' side!?\
name ""
>So, bored of watching the "Gate of Heaven", she was enticed by Black Alice and now guards it?@>How silly...\
name $name
>...But don't think of me as some normal monster.@
>I was assigned as the watcher of the Heavens for generations.\
>The power required for that role is nothing small!\
name ""
mov %hanyo1,1
goto *common_main



*gargoyle_v

gosub *face3
name $name
>So the times have changed while I've stood here.\
>To think a tough human like you could appear on the surface world...\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Gargoyle Girl is sealed in the form of a statue!\
mov %viclose,1:gosub *victory
mov %getexp,270000:gosub *lvup
mov %2415,1
goto *sean0401



*gargoyle_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Hehe, so you give up?@
>But I won't let you go...@>You'll be my prey!\
name ""
goto *gargoyle_a



*gargoyle_main

if %status=7 goto *gargoyle_konran_a
gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *gargoyle_mogaku2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *gargoyle_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *gargoyle_kousan
if %cmd1=16 goto *gargoyle_onedari
if %cmd1=17 goto *common_skill
goto *gargoyle_main



*gargoyle_mogaku2

mov %before_action,8
if %nanido=2 && %earth=0 rnd2 %ransu,1,10:if %ransu=5 goto *common_mogaku
if %nanido=3 && %earth=0 rnd2 %ransu,1,2:if %ransu=2 goto *common_mogaku
if %nanido=3 && %earth>0 rnd2 %ransu,1,2:if %ransu=2 goto *mogaku_earth1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Uooo!"
if %ransu=2 mov $sel1,"Damn you!"
if %ransu=3 mov $sel1,"Get off!"
name "Luka"
eng $sel1:$sel6\
name ""
dwave 1,"se\dassyutu.ogg"
lsp 700,":a;chara\"+$tatie3+".bmp",%monster_x,%monster_y
mov %kousoku,0:mov %status,0:gosub *status_print
>Luka struggles violently, and breaks free of Gargoyle Girl!\
mov %owaza_count1a,0
mov %owaza_num1,0
name $name
>You escaped?@
>Then only... I... Will be... Petrified...\
name ""
dwave 1,"se\stone.ogg"
>The Gargoyle Girl turns to stone!\
gosub *face1
goto *common_main



*gargoyle_konran_a

rnd2 %ransu,1,3
if %ransu=1 goto *common_attack
if %ransu=2 goto *gargoyle_konran_a1
if %ransu=3 goto *gargoyle_konran_a2



*gargoyle_konran_a1

rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ha!"
if %ransu=2 mov $sel1,"Hya!"
if %ransu=3 mov $sel1,"Orya!"
name "Luka"
eng $sel1:$sel6\
name ""
>Luka attacks himself!
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\slash.ogg"
if %nanido<2 damage 200,230
if %nanido=2 damage 260,290
if %nanido=3 damage 320,350
if %mylife=0 goto *gargoyle_h5
goto *gargoyle_a



*gargoyle_konran_a2

rnd2 %ransu,1,6
if %ransu=1 mov $sel1,"I'm a true Hero!"
if %ransu=2 mov $sel1,"Purupurupuru. I'm a goooood slime!"
if %ransu=3 mov $sel1,"Hehehe... So full..."
if %ransu=4 mov $sel1,"Uwaa... Flowers!"
if %ransu=5 mov $sel1,"Where am I!?"
if %ransu=6 mov $sel1,"My mother was an angel, you know!"
name "Luka"
eng $sel1:$sel6\
name ""
>Luka babbles incoherently!\
goto *gargoyle_a



*gargoyle_a

if %status=4 gosub *gargoyle_a4:goto *common_main
if %kousoku=1 gosub *gargoyle_a8:goto *common_main
if %kousoku=2 gosub *gargoyle_a9:goto *common_main
if %kousoku=3 gosub *gargoyle_a10:goto *common_main
if %hanyo1=2 && %status=0 mov %hanyo2,%hanyo2+1
if %hanyo2>4 && %status=0 gosub *gargoyle_a12:goto *common_main
rnd2 %ransu,1,3
if %ransu=1 && %hanyo1=2 gosub *gargoyle_a1:goto *common_main
if %ransu=2 && %hanyo1=2 && %owaza_count2a>3 && %status=0 gosub *gargoyle_a2:goto *common_main
if %ransu=3 && %hanyo1=2 && %owaza_count2b>3 && %status=0 gosub *gargoyle_a3:goto *common_main
if %ransu=1 && %hanyo1=1 gosub *gargoyle_a5:goto *common_main
if %ransu=2 && %hanyo1=1 gosub *gargoyle_a6:goto *common_main
if %ransu=3 && %hanyo1=1 && %owaza_count1a>4 gosub *gargoyle_a7:goto *common_main
skip -7



*gargoyle_a1

add %stack,1
name $name
>..........\
name ""
>The Gargoyle Girl is quietly enshrined on her pedestal.\
sub %stack,1
return



*gargoyle_a2

add %stack,1
mov %owaza_count2a,0
name $name
>...........\
name ""
skillname "Eyes of Confusion"
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
eng "The Gargoyle Girl's eyes flash!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %status,7:gosub *status_print
>Luka is confused!\
skillname ""
name "Luka"
>Wahwahwah...\
name ""
rnd2 %status_turn,3,4
if %nanido=2 rnd2 %status_turn,4,5
if %nanido=3 rnd2 %status_turn,5,6
sub %stack,1
return



*gargoyle_a3

add %stack,1
mov %owaza_count2b,0
name $name
>..........\
name ""
skillname "Eyes of Submission"
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
eng "The Gargoyle Girl's eyes flash!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
skillcount3 4074
mov %status,4:gosub *status_print
>Luka is unable to disobey Gargoyle Girl's orders!\
skillname ""
name "Luka"
>Urhg...\
name ""
name $name
>Hehehe... Now you're my slave.@
>Now then... Shall I have you cover my body with your semen?\
>Come on, take out your penis.@
>Start stroking it yourself...\
name ""
>Following her orders, Luka starts stroking his own penis!
if %nanido<2 damage 300,350
if %nanido=2 damage 360,410
if %nanido=3 damage 420,470
if %mylife=0 sub %stack,1:return *gargoyle_h1
rnd2 %status_turn,3,4
if %nanido=2 rnd2 %status_turn,4,5
if %nanido=3 rnd2 %status_turn,5,6
sub %stack,1
return



*gargoyle_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Come on, keep stroking!"
if %ransu=2 mov $sel1,"Shoot your semen over my body with your own hands..."
if %ransu=3 mov $sel1,"Hehehe... Bring about your own finish."
name $name
eng $sel1:$sel6\
name ""
name "Luka"
>Haa...\
name ""
dwave 1,"se\ero_koki1.ogg"
>Following her orders, Luka continues to masturbate...
if %nanido<2 damage 300,350
if %nanido=2 damage 350,400
if %nanido=3 damage 400,450
if %mylife=0 sub %stack,1:return *gargoyle_h1
sub %stack,1
return



*gargoyle_a5

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck your penis..."
if %ransu=2 mov $sel1,"I'll give you a good taste of my oral techniques."
if %ransu=3 mov $sel1,"Hehe, go ahead and come inside my mouth..."
name $name
eng $sel1:$sel6\
name ""
skillname "Gargoyle Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>The Gargoyle Girl sucks on Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4075
if %nanido<2 damage 330,350
if %nanido=2 damage 390,410
if %nanido=3 damage 450,470
skillname ""
if %mylife=0 sub %stack,1:return *gargoyle_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*gargoyle_a6

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My breasts are soft, you know?"
if %ransu=2 mov $sel1,"Finish between my breasts!"
if %ransu=3 mov $sel1,"Hehehe... I'll milk you with my breasts..."
name $name
eng $sel1:$sel6\
name ""
skillname "Gargoyle Paizuri"
dwave 1,"se\ero_sigoki1.ogg"
>The Gargoyle Girl sandwiches Luka's penis between her large breasts, and squeezes!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4076
if %nanido<2 damage 340,360
if %nanido=2 damage 400,420
if %nanido=3 damage 460,480
skillname ""
if %mylife=0 sub %stack,1:return *gargoyle_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*gargoyle_a7

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 4
name $name
>Hehe... Caught you!\
name ""
skillname "Gargoyle Bosom"
eng "The Gargoyle Girl grabs hold of Luka's legs!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
dwave 1,"se\ero_sigoki1.ogg"
>Locking his lower body under her, the Gargoyle Girl slips Luka's penis between her large breasts!
skillcount3 4077
if %nanido<2 damage 330,360
if %nanido=2 damage 390,420
if %nanido=3 damage 450,480
mov $tatie4,"gargoyle_st31"
mov %kousoku,1:gosub *status_print
>Luka has been bound by Gargoyle Girl!\
skillname ""
if %mylife=0 sub %stack,1:return *gargoyle_h4
if %earth=0 && %nanido<2 mov %genmogaku,99
if %earth=0 && %nanido=2 mov %genmogaku,99
if %earth=0 && %nanido=3 mov %genmogaku,99
if %earth>0 && %nanido<2 mov %genmogaku,2
if %earth>0 && %nanido=2 mov %genmogaku,2
if %earth>0 && %nanido=3 mov %genmogaku,2
sub %stack,1
return



*gargoyle_a8

add %stack,1
name $name
>Now turn to stone with me...@
>Of course, the parts that make us both feel good will stay flesh and blood... Hehe.\
name ""
skillname "Gargoyle Bosom"
dwave 1,"se\stone.ogg"
mov $tatie4,"gargoyle_st32"
lsp 700,":a;chara\gargoyle_st32.bmp",0,0:print 10,500
>The Gargoyle Girl's body slowly turns to stone, along with Luka's feet!\
dwave 2,"se\ero_sigoki1.ogg"
>Her soft breasts continue squeezing his penis at the same time!
skillcount3 4077
if %nanido<2 damage 330,360
if %nanido=2 damage 390,420
if %nanido=3 damage 450,480
mov %kousoku,2
skillname ""
if %mylife=0 sub %stack,1:return *gargoyle_h4
sub %stack,1
return



*gargoyle_a9

add %stack,1
name $name
>We'll both become stone.@
>Then I'll be able to continue squeezing you with my breasts for an eternity...\
name ""
skillname "Gargoyle Bosom"
dwave 1,"se\stone.ogg"
mov $tatie4,"gargoyle_st33"
lsp 700,":a;chara\gargoyle_st33.bmp",0,0:print 10,500
>More of her body is petrified, besides her breasts!@
>The petrification slowly moves up Luka's body!\
dwave 2,"se\ero_sigoki1.ogg"
>The Gargoyle Girl's soft breasts continue pressing against Luka's penis!
skillcount3 4077
if %nanido<2 damage 330,360
if %nanido=2 damage 390,420
if %nanido=3 damage 450,480
mov %kousoku,3
skillname ""
if %mylife=0 sub %stack,1:return *gargoyle_h4
mov $tatie1,"gargoyle_st21"
mov $tatie2,"gargoyle_st21"
mov $tatie3,"gargoyle_st21"
mov %hanyo1,2
mov %hanyo2,0
sub %stack,1
return



*gargoyle_a10

add %stack,1
name $name
>Hehe, and now it's over.@
>An eternal life of pleasure with my breasts is starting...\
name ""
skillname "Gargoyle Bosom"
dwave 1,"se\stone.ogg"
mov $tatie4,"gargoyle_st34"
lsp 700,":a;chara\gargoyle_st34.bmp",0,0:print 10,500
>Everything besides the Gargoyle Girl's breasts and Luka's penis has been petrified!\
dwave 2,"se\ero_sigoki1.ogg"
>Her soft breasts continue squeezing Luka's penis!
skillcount3 4077
mov %damage_kotei,1
damage 330,360
mov %kousoku,4
skillname ""
if %mylife=0 sub %stack,1:return *gargoyle_h4
sub %stack,1
goto *gargoyle_a11



*gargoyle_a11

add %stack,1
>The Gargoyle Girl has been petrified...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"The Gargoyle Girl's flesh and blood breasts pinch Luka's penis between them!"
if %ransu=2 mov $sel1,"The warm pressure between her breasts attacks Luka!"
if %ransu=3 mov $sel1,"Her soft breasts press against Luka's penis!"
if %ransu=4 mov $sel1,"The Gargoyle Girl's smooth breasts stimulate Luka's immobile body!"
if %ransu=5 mov $sel1,"The tight pressure stimulates Luka!"
name $name
>............\
name ""
skillname "Gargoyle Bosom"
dwave 1,"se\ero_sigoki1.ogg"
eng $sel1:$sel6
skillcount3 4077
mov %damage_kotei,1
damage 330,360
skillname ""
if %mylife=0 sub %stack,1:return *gargoyle_h4
sub %stack,1
goto *gargoyle_a11



*gargoyle_a12

add %stack,1
name $name
>Hehe... What should I do next?\
name ""
skillname "Petrification Release"
dwave 1,"se\stone.ogg"
mov $tatie1,"gargoyle_st01"
mov $tatie2,"gargoyle_st02"
mov $tatie3,"gargoyle_st03"
gosub *face1
>The Gargoyle Girl breaks free of her petrification!\
skillname ""
mov %hanyo1,1
mov %hanyo2,0
mov %owaza_count1a,0
sub %stack,1
return



*gargoyle_onedari

mov $list1,"Eyes of Submission"
if %4074>0 mov %list_num1,1
mov $list2,"Gargoyle Blowjob"
if %4075>0 mov %list_num2,1
mov $list3,"Gargoyle Paizuri"
if %4076>0 mov %list_num3,1
mov $list4,"Gargoyle Bosom"
if %4077>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *gargoyle_onedari1
if %cmd1=12 goto *gargoyle_onedari2
if %cmd1=13 goto *gargoyle_onedari3
if %cmd1=14 goto *gargoyle_onedari4
if %cmd1=-1 goto *gargoyle_main
goto *gargoyle_onedari



*gargoyle_onedari1

gosub *onedari_syori
name $name
>You want me to force you to surrender...?\
name ""
if %hanyo1=2 skip 6
dwave 1,"se\stone.ogg"
mov $tatie2,"gargoyle_st21"
mov $tatie2,"gargoyle_st22"
gosub *face1
>The Gargoyle Girl has been petrified...\
gosub *gargoyle_a3
gosub *gargoyle_a4
skip -1



*gargoyle_onedari2

gosub *onedari_syori
name $name
>You want to give your semen to my mouth?\
name ""
if %hanyo1=1 skip 6
dwave 1,"se\stone.ogg"
mov $tatie1,"gargoyle_st01"
mov $tatie2,"gargoyle_st02"
gosub *face1
>The Gargoyle Girl breaks free of her petrification!\
gosub *gargoyle_a5
skip -1



*gargoyle_onedari3

gosub *onedari_syori
name $name
>You want to give your semen to my breasts?\
name ""
if %hanyo1=1 skip 6
dwave 1,"se\stone.ogg"
mov $tatie1,"gargoyle_st01"
mov $tatie2,"gargoyle_st02"
gosub *face1
>The Gargoyle Girl breaks free of her petrification!\
gosub *gargoyle_a6
skip -1



*gargoyle_onedari4

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want to be petrified with me, and be eternally squeezed?\
name ""
if %hanyo1=1 skip 6
dwave 1,"se\stone.ogg"
mov $tatie1,"gargoyle_st01"
mov $tatie2,"gargoyle_st02"
gosub *face1
>The Gargoyle Girl breaks free of her petrification!\
if %kousoku=0 gosub *gargoyle_a7
if %kousoku=1 gosub *gargoyle_a8
if %kousoku=2 gosub *gargoyle_a9
if %kousoku=3 gosub *gargoyle_a10
skip -1



*gargoyle_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\gargoyle_bk21.bmp",0,0
gosub *syasei2
>Unable to defy her orders, Luka strokes himself until he comes all over the Gargoyle Girl's body.\
mov %viclose,1:gosub *lose
mov %2715,%2715+1:if %2715=1 mov %count_koenemy,%count_koenemy+1
if %2715>%count_most mov %count_most,%2715:mov $count_mostname,$name
count 31,5
mov $bad1,"Under the Gargoyle Girl's control, Luka brought himself to orgasm."
gosub *face2
name $name
>You gave it to me yourself?@
>How pitiful... Hehe.\
name ""
goto *gargoyle_h



*gargoyle_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\gargoyle_bk01.bmp",0,0
gosub *syasei2
>As the Gargoyle Girl sucks on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2715,%2715+1:if %2715=1 mov %count_koenemy,%count_koenemy+1
if %2715>%count_most mov %count_most,%2715:mov $count_mostname,$name
count 4,5
mov $bad1,"The Gargoyle Girl forced Luka to come with her mouth."
gosub *face2
name $name
>So you gave me your semen?@
>Hehe, how miserable...\
name ""
goto *gargoyle_h



*gargoyle_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\gargoyle_st35.bmp",0,0
gosub *syasei2
>As Luka's penis is squeezed between her large breasts, he comes, covering the Gargoyle Girl's chest with semen.\
mov %viclose,1:gosub *lose
mov %2715,%2715+1:if %2715=1 mov %count_koenemy,%count_koenemy+1
if %2715>%count_most mov %count_most,%2715:mov $count_mostname,$name
count 7,5
mov $bad1,"The Gargoyle Girl forced Luka to come with her breasts."
gosub *face2
name $name
>So you gave me your semen?@
>Hehe, how miserable...\
name ""
goto *gargoyle_h



*gargoyle_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\gargoyle_st35.bmp",0,0
gosub *syasei2
>While slowly turning to stone with the Gargoyle Girl, Luka comes, shooting his semen between her breasts.\
mov %viclose,1:gosub *lose
mov %2715,%2715+1:if %2715=1 mov %count_koenemy,%count_koenemy+1
if %2715>%count_most mov %count_most,%2715:mov $count_mostname,$name
count 7,5
mov $bad1,"Luka was forced to orgasm while being turned to stone."
gosub *face2
name $name
>Hehehe... You can't escape any longer.@
>You'll be prey to my breasts...\
name ""
goto *gargoyle_h



*gargoyle_h5

name "Luka"
>Ahg... Urhg...\
name ""
>Damaging himself too much, Luka falls to the ground, too weak to resist any longer.\
mov %viclose,2:gosub *lose
mov %2715,%2715+1:if %2715=1 mov %count_koenemy,%count_koenemy+1
if %2715>%count_most mov %count_most,%2715:mov $count_mostname,$name
count 31,5
mov $bad1,"After being confused, Luka damaged himself into surrender."
gosub *face2
name $name
>What are you doing?@>What a fool...\
name ""
goto *gargoyle_h



*gargoyle_h

mov $bad2,"Imprisoned in stone, Luka is subjected to an eternal paizuri..."
if %2715=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 goto *gargoyle_hb
name "Luka"
>Ahh...\
name ""
>Losing my strength to fight, I fall to the ground.@
>Seeing her chance, the Gargoyle Girl looms over me.\
name $name
>Here... If I do this, you can't escape...\
name ""
name "Luka"
>Ahh... M...My body...\
name ""
dwave 1,"se\stone.ogg"
>My arms and back slowly turn into stone.@
>With this, I can't even attempt to move...\
name $name
>Hehehe... Now you can never escape.@
>I'll make you into the prey of my breasts...\
name ""
cspl 690,699
lsp 700,":a;chara\gargoyle_h1.bmp",0,0:print 10,500
>The Gargoyle Girl smiles a crude smile...@
mov %hseanwave,17:hseanwave
>And sandwiches my penis between her huge breasts!\
goto *gargoyle_hb



*gargoyle_hb

name "Luka"
>Ahhh!!!\
name ""
>Her soft breasts press against my penis, the warm temperature making it feel like I could melt away between them.\
>The touch of her smooth skin fills my senses, as the pressure attacks me from every direction at once.\
name "Luka"
>Haaa... So soft...\
name ""
name $name
>Hehehe... Then finish between them.@
>Sprinkle that semen of yours on my chest!\
name ""
>With a squeeze, the Gargoyle Girl presses my penis between her breasts.@
>Completely buried inside them, my glans sinks into her soft flesh.\
>The tighter she squeezes, the deeper my penis sinks into her flesh.@
>The soft breasts push back, crushing my penis between them.\
name "Luka"
>Haaa...\
name ""
name $name
>Hehe, already going loose?@
>You look like you're in paradise...\
name ""
name "Luka"
>Ahhh!!!\
name ""
>Attacked by the tightness, my body explodes in pleasure.@
>But completely immobile, I can't do anything to resist or get away.\
>It's like I'm truly being raped by her breasts.\
name "Luka"
>Ah!@>No!\
name ""
>Caught in the sweet pressure, I can feel my penis starting to pulse.@
>Unable to do anything against her, my body succumbs to a quick orgasm.\
name "Luka"
>C...Coming... Ahh!\
name ""
gosub *syasei1
lsp 700,":a;chara\gargoyle_h2.bmp",0,0
gosub *syasei2
>Almost on accident, I explode between her breasts.\
>As my twitching penis shoots semen on her chest, the soft tightness continues pressing against me, increasing the sensations from my orgasm.\
name "Luka"
>Ah...\
name ""
>Surrounded by her soft, smooth flesh, it's like I actually came inside her body itself.\
name $name
>Look at you, coming all of a sudden like that...@
>It seems a little punishment is necessary for your rudeness.\
name ""
>Putting strength into both of her arms, the Gargoyle Girl squeezes hard against my penis in the middle of my ejaculation!\
name "Luka"
>Ahh!@
>I'm still coming, don't squeeze it!\
name ""
>Completely ignoring me, the Gargoyle Girl continues squeezing me far tighter than before.\
>Even after my previous ejaculation stopped, I'm already leaking pre-come for my next orgasm.\
>This punishment is forcing more pleasure than my body can handle into me...\
name "Luka"
>Ahh... Stop... Stop!\
name ""
name $name
>Haha... Your previous orgasm was just from being inserted between my breasts.@
>If I used a skill or two... Just how pathetically fast would you come, I wonder?\
name ""
name "Luka"
>Ah... Hyaaa!\
name ""
>The Gargoyle Girl starts to move her breasts up and down in alternative motions, rubbing my penis between them.\
>The tight, intense massage overpowers my body again... There's no way I can endure this.\
>This merciless handling is clearly aimed to force me to orgasm against my will.@
>Frozen in stone beneath her, all I can do is scream and moan in protest.\
name "Luka"
>Haa... Ahhh!\
name ""
name $name
>Hehe, since you're a premature ejaculator, you can't hold on.@
>Now go ahead and come between my breasts...\
name ""
>She really is raping me with her breasts...@
>As I near my climax, the Gargoyle Girl's movements pick up in speed.\
>The up and down, intense massage...@
>As my penis is tossed back and forth between her soft breasts, an unmatched ecstasy fills my body.\
name "Luka"
>No... This...@
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\gargoyle_h3.bmp",0,0
gosub *syasei2
>I helplessly explode between her breasts again, screaming in pleasure.@
>After coming so much, my semen is even spilling outside her breasts.\
name "Luka"
>Haa... Let me go already...\
name ""
name $name
>Hehe... I won't listen to that request.\
>I'll continue watching over this Gate for an eternity.@
>And you'll be my eternal snack...\
name ""
name "Luka"
>Haa...\
name ""
>I continue spurting out semen, abused by her breasts...@
>No, not abused... More like a gentle caress...\
>As the overwhelming pleasure attacks my mind, my heart slowly slips away.\
name "Luka"
>Haa... It feels so good...\
name ""
name $name
>I'll keep raping you with my breasts.@
>All the way until you're dry, and on the verge of death...\
name ""
name "Luka"
>Ahh...\
name ""
gosub *syasei1
lsp 700,":a;chara\gargoyle_h4.bmp",0,0
gosub *syasei2
>Her breasts are completely covered in my semen, but she still doesn't release me from them.\
name "Luka"
>Haa... So good...\
name ""
>After a few more orgasms, I'm turned into a complete slave to her breasts.\
>With my body petrified and immobile, every thought and sensation is focused on my penis between her soft breasts...\
name $name
>Hehe, enjoy it as much as you want...@
>You'll spend an eternity here with me...\
name ""
name "Luka"
>Ahhh...\
name ""
gosub *syasei1:gosub *syasei2
mov %hseanwave,0:hseanwave
gosub *anten
>After that, she continues to rape me with her breasts, until just before I'm exhausted.@
>Like that, I become her slave...\
lsp 700,":a;chara\gargoyle_st34.bmp",0,0
bg "bg\bg208.bmp",10,1500
name $name
>..........\
name ""
name "Luka"
>Ah...ah...\
name ""
>I'm a statue, together with the Gargoyle Girl.@
>Every part of me is frozen, except for my penis and her breasts.\
>Her warm breasts continue squeezing me, the sweet touch an endless pleasure to my stone body.\
gosub *syasei1:gosub *syasei2
>Like that, I'm forced to come over and over again...\
name "Luka"
>A...uh...\
name ""
name $name
>..................\
name ""
>At times, she releases the petrification and toys with me in other ways.@
>But most of the time is spent as statues like this, squeezed between her breasts...\
name "Luka"
>Haa... Uh...\
name ""
gosub *syasei1:gosub *syasei2
>My stone body doesn't age or weaken.@
>The only thing that changes are the years, as this endless breast rape continues on for an eternity...\
gosub *anten
>..................\
goto *badend



*doppele_start

mov $name,"Doppel Luka"
mov $name2,"Doppel Luka"
mov $lavel,"doppele"
mov $tatie1,"doppele_st01"
mov $tatie2,"doppele_st02"
mov $tatie3,"doppele_st03"
mov $tatie4,"doppele_ha1"
mov $haikei,"bg208"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,25000
if %nanido=2 mov %max_enemylife,30000
if %nanido=3 mov %max_enemylife,35000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,0
mov %music,1
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't push the Doppel Girl off him!"
mov $mogaku_anno2,"Luka pushed away the Doppel Girl!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"You won't escape, hehehe."
mov $mogaku_sel2,"You won't escape, hehehe."
mov $mogaku_sel3,"What are you doing? How stupid... Hehehe."
mov $mogaku_sel4,"What are you doing? How stupid... Hehehe."
mov $mogaku_sel5,"What are you doing? How stupid... Hehehe."
mov $mogaku_dassyutu1,"Aww... You got away."
mov $mogaku_dassyutu2,"And I wanted to rape you so much, too..."
mov $mogaku_dassyutu1,"Aww... You got away."
mov $mogaku_dassyutu2,"And I wanted to rape you so much, too..."
mov $mogaku_earth_dassyutu1,"You used Gnome's power, right?"
mov $mogaku_earth_dassyutu2,"And I wanted to rape you so much, too..."
mov $half_s1,"Hehehe, does it feel good?"
mov $half_s2,"Since I'm you, I know everywhere that feels good..."
mov $kiki_s1,"Are you going to come soon?"
mov $kiki_s2,"You're going to make yourself come... How embarrassing. "
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,2
name $name
>Hehe... This gives me an advantage.@
>Because in addition to my sword skills, I can do naughty things...\
name ""
name "Luka"
>Am I hallucinating?@
>What's going on...?\
name ""
name $name
>It's no hallucination, I'm your clone.@
>Your cells were gathered in the fight against Wormiel, and I was created.\
>I have your skills and memories, and am a perfect match to you with them...@
>In addition, I was given a woman's weapons...\
name ""
name "Luka"
>Guh... I'm fighting against myself?\
name ""
mov %sinkou,1
goto *common_main



*doppele_v

if %sinkou<3 mov %dopple_wet,1
gosub *face3
name $name
>No...@>Then why was I...?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>The Doppel Girl is sealed in the form of a child!\
mov %viclose,1:gosub *victory
mov %getexp,350000:gosub *lvup
mov %2408,1
mov %skill01,20
if %sinkou<3 mov %dopple_wet,1
goto *sean0402



*doppele_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Aha, so you surrender to me?@
>I know just what you want... Since I'm you, after all. \
name ""
goto *doppele_a



*doppele_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *doppele_kousan
if %cmd1=16 goto *doppele_onedari
if %cmd1=17 && %nanido=0 goto *common_skill
if %cmd1=17 && %sinkou<3 goto *doppele_skill
if %cmd1=17 && %sinkou=3 goto *common_skill
goto *doppele_main



*doppele_skill

gosub *cmd_skill
if %cmd1=24 goto *skill4
if %cmd1=29 goto *skill15
if %cmd1=31 && %skill02=4 goto *skill7d
if %cmd1=32 && %skill03=4 goto *skill8d
if %cmd1=33 && %skill04=4 goto *skill10d
if %cmd1=34 && %skill05=4 goto *skill14d
if %cmd1=35 goto *skill17
if %cmd1=36 goto *skill18
if %cmd1=37 goto *doppele_skill19
if %cmd1=38 goto *doppele_skill20
if %cmd1=39 goto *doppele_skill21
if %cmd1=42 goto *doppele_skill24
if %cmd1=44 goto *doppele_skill22
if %cmd1=45 goto *skill23
if %cmd1=-1 goto "*"+$lavel+"_main"
goto *doppele_skill



*doppele_skill19

rnd2 %ransu,1,2
if %ransu=1 mov $sel1,"The blade of judgement comes for you!"
if %ransu=2 mov $sel1,"Cutting through space, time and reason!"
name "Luka"
eng $sel1:$sel6\
name ""
name $name
>I can use that one, too!\
name ""
mov %mp,%mp-2
gosub *mp
skillname "Flash Kill"
dwave 3,"se\tuki.ogg"
lsp 2,":c;effect\007.bmp",0,0:print 1
wait 100
csp 2:print 18,300,"system\mask01.jpg"
dwave 1,"se\break.ogg"
>Luka and the Doppel Girl's skills clash, offsetting each other!\
skillname ""
if %sinkou=2 goto *common_main
name "Luka"
>Gah...!@>The skills cancelled each other out!?\
name ""
name $name
>Didn't you hear me?@>I'm you.@
>Of course I can use your skills just as well as you...\
name ""
mov %skill01,20
mov %sinkou,2
goto *common_main



*doppele_skill20

mov %before_action,31
name "Luka"
>The jaws of the Rakshasa come to make the wicked pay!\
name ""
name $name
>I can use that skill, too!\
name ""
mov %mp,%mp-6
gosub *mp
skillname "Ninefold Rakshasa"
wait 500
dwave 1,"se\slash3.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
dwave 2,"se\slash3.ogg"
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
dwave 3,"se\slash3.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
dwave 4,"se\slash3.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
dwave 5,"se\slash3.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
dwave 6,"se\slash3.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
dwave 7,"se\slash3.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
csp 2:print 10,1000
dwave 1,"se\break.ogg"
>Luka and Doppel Girl's skills clash, offsetting each other!\
skillname ""
if %sinkou=2 goto *common_main
name "Luka"
>Gah...!@>The skills cancelled each other out!?\
name ""
name $name
>Didn't you hear me?@>I'm you.@
>Of course I can use your skills just as well as you...\
name ""
mov %skill01,20
mov %sinkou,2
goto *common_main



*doppele_skill21

mov %before_action,32
name "Luka"
>All life returns to the nature from whence it came!\
name ""
name $name
>I can use that skill, too!\
name ""
mov %mp,%mp-4
gosub *mp
skillname "Heavenly Demon Revival"
wait 300
dwave 1,"se\bom2.ogg"
lsp 2,":c;effect\001.bmp",0,0:print 18,1000,"system\mask01.jpg"
csp 2:print 18,500,"system\mask01.jpg"
dwave 1,"se\break.ogg"
>Luka and Doppel Girl's magic clash, offsetting each other!\
skillname ""
if %sinkou=2 goto *common_main
name "Luka"
>Gah...!@>The skills cancelled each other out!?\
name ""
name $name
>Didn't you hear me?@>I'm you.@
>Of course I can use your skills just as well as you...\
name ""
mov %skill01,20
mov %sinkou,2
goto *common_main



*doppele_skill22

mov %before_action,33
name "Luka"
>............\
name ""
mov %mp,%mp-8
gosub *mp
skillname "Magic Concentration"
dwave 1,"se\power.ogg"
>Luka's eyes close as overwhelming magical energy fills the air!\
skillname ""
name $name
>I know how that skill works.@> Do you seriously think I'd attack?\
name ""
>The Doppel Girl calmly watches and waits.\
goto *common_main



*doppele_skill24

mov %before_action,34
name "Luka"
>You said you were cloned from me with cells collected during the fight with Wormiel, right?\
>Then you don't know this skill...\
name ""
>I only saw it used once before, but it was done with my own body...@
>My body remembers how to do it!\
dwave 3,"se\earth1.ogg"
lsp 2,":a;effect\029_01.bmp",0,0
lsp 2,":a;effect\029_02.bmp",0,0
lsp 2,":a;effect\029_03.bmp",0,0
lsp 2,":a;effect\029_04.bmp",0,0
csp 2
>First, infuse my arm with the strength of the earth...\
dwave 1,"se\aqua4.ogg"
wait 200
dwave 5,"se\fire2.ogg"
wait 200
dwave 2,"se\wind2.ogg"
lsp 2,":a;effect\029_05.bmp",0,0
lsp 2,":a;effect\029_06.bmp",0,0
lsp 2,":a;effect\029_07.bmp",0,0
lsp 2,":a;effect\029_08.bmp",0,0
csp 2
>Sharpen the blade with my fire, speed up my movement with the wind, and still my thoughts with water...\
gosub *face3
name $name
>What's that technique!?@
>How come I don't know about it!?\
name ""
mov %mp,%mp-9
gosub *mp
skillname1 "Element Spica"
vspl 3,650,0
dwave 2,"se\wind2.ogg"
lsp2 2,":c;effect\cutin_wind.bmp",100,150,100,100,0,10
for %move=0 to 200 step 20
msp2 2,0,20,0,0,0,24
print 1:wait 5
next
csp2 2
lsp 10,":c;effect\cutin_wind.bmp",0,0:print 1
dwave 3,"se\earth1.ogg"
lsp2 2,":c;effect\cutin_earth.bmp",300,150,100,100,0,10
for %move=0 to 200 step 20
msp2 2,0,20,0,0,0,24
print 1:wait 5
next
csp2 2
lsp 11,":c;effect\cutin_earth.bmp",200,0:print 1
dwave 4,"se\aqua2.ogg"
lsp2 3,":c;effect\cutin_aqua.bmp",500,150,100,100,0,10
for %move=0 to 200 step 20
msp2 3,0,20,0,0,0,24
print 1:wait 5
next
csp2 3
lsp 12,":c;effect\cutin_aqua.bmp",400,0:print 1
dwave 5,"se\fire2.ogg"
lsp2 4,":c;effect\cutin_fire.bmp",700,150,100,100,0,10
for %move=0 to 200 step 20
msp2 4,0,20,0,0,0,24
print 1:wait 5
next
csp2 4
lsp 13,":c;effect\cutin_fire.bmp",600,0:print 1
cspl 10,13:print 10,600
vspl 3,650,1
csp 0:csp 1
skillname "Element Spica"
>The power of the four elements infuse Luka's right arm, and lash out at the Doppel Girl!\
wait 500
dwave 1,"se\karaburi.ogg"
lsp 2,":a;effect\029_01.bmp",0,0:print 10,40
lsp 2,":a;effect\029_02.bmp",0,0:print 10,40
dwave 3,"se\earth1.ogg"
lsp 2,":a;effect\029_03.bmp",0,0:print 10,40
lsp 2,":a;effect\029_04.bmp",0,0:print 10,40
dwave 5,"se\fire2.ogg"
lsp 2,":a;effect\029_05.bmp",0,0:print 10,40
lsp 2,":a;effect\029_06.bmp",0,0:print 10,40
dwave 2,"se\wind2.ogg"
lsp 2,":a;effect\029_07.bmp",0,0:print 10,40
lsp 2,":a;effect\029_08.bmp",0,0:print 10,40
csp 2:print 10,10
dwave 1,"se\damage2.ogg"
mov %abairitu,2000+%mylv*20
gosub *enemylife
skillname ""
name $name
>A...A new technique!?\
name ""
>Element Spica...@
>Heinrich taught it to me by using it at the Sealed Sinner's Prison.\
name $name
>But... It's just one skill.@
>Do you think you can turn this around with just a single move?\
name ""
name "Luka"
>No, you're wrong.@>You're missing the most important thing.@
>I inherited something even more important from Heinrich!\
>The Hero's Soul!@
>Even now, his soul burns on in me!\
name ""
name $name
>W...What!?@
>Heinrich's... Soul is inside you!?\
name ""
>A normal opponent would probably just laugh at that proclamation.@
>But if she's me, then...\
name $name
>S...So what...?@
>I...I'm not jealous at all!\
name ""
>As I thought, her internal turmoil is eating away at her.@
>As I stare on, she slowly strips off her clothes...\
mov $tatie1,"doppele_st31"
mov $tatie2,"doppele_st32"
mov $tatie3,"doppele_st33"
mov $tatie4,"doppele_he1"
dwave 1,"se\escape.ogg"
gosub *face1
name $name
>Then I'll defeat you with sexual skills.@
>That's harder for you to deal with, isn't it?\
name ""
name "Luka"
>............\
name ""
>That's true...@
>But now she shouldn't be able to offset my own techniques!\
mov %sinkou,3
goto *common_main



*doppele_a

if %sinkou=3 goto *doppele_ab
if %kousoku>0 gosub *doppele_a7b:goto *common_main
rnd2 %ransu,1,7
if %ransu=1 gosub *doppele_a1:goto *common_main
if %ransu=2 gosub *doppele_a2:goto *common_main
if %ransu=3 gosub *doppele_a3:goto *common_main
if %ransu=4 gosub *doppele_a4:goto *common_main
if %ransu=5 gosub *doppele_a5:goto *common_main
if %ransu>5 && %owaza_count1a>3 gosub *doppele_a7:goto *common_main
skip -7



*doppele_ab

if %kousoku>0 gosub *doppele_a9:goto *common_main
rnd2 %ransu,1,5
if %ransu=1 gosub *doppele_a2:goto *common_main
if %ransu=2 gosub *doppele_a3:goto *common_main
if %ransu=3 gosub *doppele_a5:goto *common_main
if %ransu=4 gosub *doppele_a6:goto *common_main
if %ransu=5 && %owaza_count1a>5 gosub *doppele_a8:goto *common_main
skip -6



*doppele_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Here... You remember how you touch yourself, right?"
if %ransu=2 mov $sel1,"I'll make you come with your own hand techniques..."
if %ransu=3 mov $sel1,"You like doing it like this, don't you?"
name $name
eng $sel1:$sel6\
name ""
skillname "Doppel Handjob"
dwave 1,"se\ero_koki1.ogg"
>The Doppel Girl strokes Luka's penis like he does to himself!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4078
if %nanido<2 damage 320,340
if %nanido=2 damage 360,380
if %nanido=3 damage 400,420
skillname ""
if %mylife=0 sub %stack,1:return *doppele_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*doppele_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"How does it feel to step on your own penis?"
if %ransu=2 mov $sel1,"I'll make you come with my foot!"
if %ransu=3 mov $sel1,"Shall I step on you until you come?"
name $name
eng $sel1:$sel6\
name ""
skillname "Doppel Footjob"
dwave 1,"se\ero_sigoki1.ogg"
>The Doppel Girl steps on Luka's penis, and twists her foot side to side!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4079
if %nanido<2 damage 330,350
if %nanido=2 damage 370,390
if %nanido=3 damage 410,430
skillname ""
if %mylife=0 sub %stack,1:return *doppele_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*doppele_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You like it when your dick is licked, don't you?"
if %ransu=2 mov $sel1,"Come as hard as you can inside my mouth..."
if %ransu=3 mov $sel1,"It's your own tongue... Nnnn *Lick*"
name $name
eng $sel1:$sel6\
name ""
skillname "Doppel Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>The Doppel Girl sucks on Luka's penis, her tongue licking his glans at the same time!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4080
if %nanido<2 damage 340,360
if %nanido=2 damage 380,400
if %nanido=3 damage 420,440
skillname ""
if %mylife=0 sub %stack,1:return *doppele_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*doppele_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You really love boobs... Hehe."
if %ransu=2 mov $sel1,"My breasts are great, aren't they?"
if %ransu=3 mov $sel1,"I'll tease you with my tits..."
name $name
eng $sel1:$sel6\
name ""
skillname "Doppel Tit Fuck"
dwave 1,"se\ero_sigoki1.ogg"
>The Doppel Girl sandwiches Luka's penis between her breasts, massaging him with them!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4081
if %nanido<2 damage 350,370
if %nanido=2 damage 390,410
if %nanido=3 damage 430,450
skillname ""
if %mylife=0 sub %stack,1:return *doppele_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*doppele_a5

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"How about my thighs?"
if %ransu=2 mov $sel1,"You like this feeling, too, I know..."
if %ransu=3 mov $sel1,"Are your own thighs going to make you come?"
name $name
eng $sel1:$sel6\
name ""
skillname "Doppel Intercrural"
dwave 1,"se\ero_sigoki1.ogg"
>The Doppel Girl squeezes Luka's penis with her thighs, above her spats!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4082
if %nanido<2 damage 360,380
if %nanido=2 damage 400,420
if %nanido=3 damage 440,460
skillname ""
if %mylife=0 sub %stack,1:return *doppele_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*doppele_a6

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I know you... You like this too, don't you?"
if %ransu=2 mov $sel1,"Do you want to rub your dick on my ass?"
if %ransu=3 mov $sel1,"Do you want me to crush your dick with my sooooft ass?"
name $name
eng $sel1:$sel6\
name ""
skillname "Doppel Assjob"
dwave 1,"se\ero_sigoki1.ogg"
>The Doppel Girl presses her ass against Luka's penis, crushing him with her soft cheeks!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4083
if %nanido<2 damage 370,390
if %nanido=2 damage 410,430
if %nanido=3 damage 450,470
skillname ""
if %mylife=0 sub %stack,1:return *doppele_h6
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*doppele_a7

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 8
name $name
if %first_sel2=1 skip 3
>This sword can extract semen...@
skip 2
>This sword feels amazing, doesn't it?@
>I'll suck your semen with this sword...\
name ""
skillname "Sword Semen Drain"
eng "The Doppel Girl pushes Luka down, and brings her semen sucking sword to his groin!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
dwave 1,"se\ero_buchu1.ogg"
>The mouth of the tentacle sword sucks in Luka's penis!
skillcount3 4084
if %nanido<2 damage 180,200
if %nanido=2 damage 210,230
if %nanido=3 damage 240,260
mov %kousoku,1:gosub *status_print
>Luka has been bound by the Doppel Girl!\
skillname ""
if %mylife=0 sub %stack,1:return *doppele_h7
name $name
if %first_sel2=1 skip 3
>I'll suck up your semen now...@
skip 2
>This time, I'll suck up your semen...@
>Just stay still, and don't run.\
name ""
mov %first_sel2,1
if %earth=0 && %nanido<2 mov %genmogaku,2
if %earth=0 && %nanido=2 mov %genmogaku,2
if %earth=0 && %nanido=3 mov %genmogaku,3
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,1
sub %stack,1
return



*doppele_a7b

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck up your semen with this sword..."
if %ransu=2 mov $sel1,"You don't really hate this, do you?"
if %ransu=3 mov $sel1,"This sword is made out of the same material as a Succubus' vagina..."
name $name
eng $sel1:$sel6\
name ""
skillname "Sword Semen Drain"
dwave 1,"se\ero_chupa6.ogg"
skillcount3 4084
>The mouth of the sword sucks on Luka's penis!
if %nanido<2 damage 180,200
if %nanido=2 damage 210,230
if %nanido=3 damage 240,260
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
dwave 1,"se\ero_chupa6.ogg"
>Sucking and pulling on his penis, it drains his energy!
if %nanido<2 damage 180,200
if %nanido=2 damage 210,230
if %nanido=3 damage 240,260
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *doppele_h7
sub %stack,1
return



*doppele_a8

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 8
name $name
if %first_sel1=1 skip 3
>You want to be raped now, don't you?@
skip 2
>You want to be raped this time, don't you?@
>I'll rape you!\
name ""
skillname "Doppel Mount"
eng "The Doppel Girl pushes Luka down, and jumps on top of him!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>Luka has been bound by the Doppel Girl!\
skillname ""
name $name
>Hehehe... Now to rape you.@
if %first_sel1=1 skip 3
>You wanted this, didn't you?@> I know well...\
skip 2
>Don't run away this time, be honest with yourself...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,0
if %earth=0 && %nanido=2 mov %genmogaku,0
if %earth=0 && %nanido=3 mov %genmogaku,0
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
sub %stack,1
return



*doppele_a9

add %stack,1
if %kousan=2 skip 4
name $name
>Now I'm going to rape you!\
name ""
skillname "Doppel Rape"
dwave 1,"se\ero_pyu1.ogg"
lsp 700,":a;chara\doppele_hd1.bmp",0,0:print 10,500
>The Doppel Girl drops her waist, bringing Luka into her!\
>Her wet flesh squeezes Luka's penis!
skillcount3 4085
mov %damage_kotei,1
damage 500,600
mov $tatie4,"doppele_hd1"
mov %kousoku,2:gosub *status_print
>Luka is being raped by the Doppel Girl!\
skillname ""
if %mylife=0 sub %stack,1:return *doppele_h8
name "Luka"
>Ahh!!!\
name ""
>Her hot, wet vagina clamps down on me as soon as I'm inside.@
>It feels so good, I don't think I can hold back...\
name $name
>How does my pussy feel?@
>I'm sure it's perfectly suited to your penis. \
name ""
sub %stack,1
goto *doppele_a10



*doppele_a10

add %stack,1
>Luka is being raped by the Doppel Girl...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Haha... How does it feel to be raped by yourself?":mov $sel2,"The Doppel Girl bounces up and down on top of Luka!"
if %ransu=2 mov $sel1,"Look at you, enjoying being raped by yourself... ":mov $sel2,"The Doppel Girl slowly grinds against Luka!"
if %ransu=3 mov $sel1,"I can feel you in my pussy...":mov $sel2,"The Doppel Girl's tight vagina squeezes on Luka's penis!"
if %ransu=4 mov $sel1,"Do you want me to move like this?":mov $sel2,"The Doppel Girl forces Luka in and out of her like a piston!"
if %ransu=5 mov $sel1,"Haha... Are you going to come inside yourself?":mov $sel2,"The Doppel Girl squeezes down hard on Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Doppel Rape"
dwave 1,"se\ero_chupa4.ogg"
eng $sel2:$sel6
skillcount3 4085
mov %damage_kotei,1
damage 500,600
skillname ""
if %mylife=0 sub %stack,1:return *doppele_h9
sub %stack,1
goto *doppele_a10



*doppele_onedari

mov $list1,"Doppel Handjob"
if %4078>0 mov %list_num1,1
mov $list2,"Doppel Footjob"
if %4079>0 mov %list_num2,1
mov $list3,"Doppel Blowjob"
if %4080>0 mov %list_num3,1
mov $list4,"Doppel Tit Fuck"
if %4081>0 mov %list_num4,1
mov $list5,"Doppel Intercrural"
if %4082>0 mov %list_num5,1
mov $list6,"Doppel Assjob"
if %4083>0 mov %list_num6,1
mov $list7,"Sword Semen Drain"
if %4084>0 mov %list_num7,1
mov $list8,"Doppel Mount"
if %4085>0 mov %list_num8,1
gosub *cmd_onedari
if %cmd1=11 goto *doppele_onedari1
if %cmd1=12 goto *doppele_onedari2
if %cmd1=13 goto *doppele_onedari3
if %cmd1=14 goto *doppele_onedari4
if %cmd1=15 goto *doppele_onedari5
if %cmd1=16 goto *doppele_onedari6
if %cmd1=17 goto *doppele_onedari7
if %cmd1=18 goto *doppele_onedari8
if %cmd1=-1 goto *doppele_main
goto *doppele_onedari



*doppele_onedari1

gosub *onedari_syori
name $name
>You want me to give you a handjob?@
>Sheesh, alright...\
name ""
gosub *doppele_a1
skip -1



*doppele_onedari2

gosub *onedari_syori
name $name
>You want me to give you a footjob?@
>Sheesh, alright...\
name ""
gosub *doppele_a2
skip -1



*doppele_onedari3

gosub *onedari_syori
name $name
>You want me to give you a blowjob?@
>Sheesh, alright...\
name ""
gosub *doppele_a3
skip -1



*doppele_onedari4

gosub *onedari_syori
name $name
>You want me to give you a tit fuck?@
>Sheesh, alright...\
name ""
gosub *doppele_a4
skip -1



*doppele_onedari5

gosub *onedari_syori
name $name
>You want me to squeeze you with my thighs?@
>Sheesh, alright...\
name ""
gosub *doppele_a5
skip -1



*doppele_onedari6

gosub *onedari_syori
name $name
>You want me to give you an assjob?@
>Sheesh, alright...\
name ""
if %sinkou=3 skip 6
mov %sinkou,3
mov $tatie2,"doppele_st32"
dwave 1,"se\escape.ogg"
gosub *face2
>The Doppel Girl takes off her clothes!\
gosub *doppele_a6
skip -1



*doppele_onedari7

gosub *onedari_syori
name $name
>You want me to suck out your semen with my sword...?@
>Sheesh, alright...\
name ""
mov $tatie1,"doppele_st01"
mov $tatie2,"doppele_st02"
mov $tatie3,"doppele_st03"
mov $tatie4,"doppele_ha1"
gosub *doppele_a7
gosub *doppele_a7b
skip -1



*doppele_onedari8

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want me to rape you...?@
>Sheesh, alright...\
name ""
if %sinkou=3 skip 7
mov %sinkou,3
mov $tatie2,"doppele_st32"
mov $tatie4,"doppele_he1"
dwave 1,"se\escape.ogg"
gosub *face2
>The Doppel Girl takes off her clothes!\
if %kousoku=0 gosub *doppele_a8
gosub *doppele_a9
skip -1



*doppele_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\doppele_bk03.bmp",0,0
gosub *syasei2
>As the Doppel Girl strokes Luka's penis with her hands, he comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2708,%2708+1:if %2708=1 mov %count_koenemy,%count_koenemy+1
if %2708>%count_most mov %count_most,%2708:mov $count_mostname,$name
count 5,1
mov $bad1,"The Doppel Girl forced Luka to come with her hands."
gosub *face2
name $name
>Ahaha, that was so easy.@
>Look, your semen is all over my hands...\
name ""
goto *doppele_h



*doppele_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 696,":a;chara\doppele_bk06.bmp",0,0
gosub *syasei2
>As the Doppel Girl steps on Luka's penis, he comes, covering her foot with semen.\
mov %viclose,1:gosub *lose
mov %2708,%2708+1:if %2708=1 mov %count_koenemy,%count_koenemy+1
if %2708>%count_most mov %count_most,%2708:mov $count_mostname,$name
count 6,1
mov $bad1,"The Doppel Girl forced Luka to come with her feet."
gosub *face2
name $name
>Ahaha, that was so easy.@
>Look, your semen is all over my foot...\
name ""
goto *doppele_h



*doppele_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\doppele_bk01.bmp",0,0
gosub *syasei2
>As the Doppel Girl sucks on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2708,%2708+1:if %2708=1 mov %count_koenemy,%count_koenemy+1
if %2708>%count_most mov %count_most,%2708:mov $count_mostname,$name
count 4,1
mov $bad1,"The Doppel Girl forced Luka to come with her mouth."
gosub *face2
name $name
>Ahaha, that was so easy.@
>Look... You got my face all dirty with your semen.\
name ""
goto *doppele_h



*doppele_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\doppele_bk02.bmp",0,0
gosub *syasei2
>As the Doppel Girl squeezes Luka's penis between her breasts, he comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2708,%2708+1:if %2708=1 mov %count_koenemy,%count_koenemy+1
if %2708>%count_most mov %count_most,%2708:mov $count_mostname,$name
count 7,1
mov $bad1,"The Doppel Girl forced Luka to come with her breasts."
gosub *face2
name $name
>Ahaha, that was so easy.@
>Look... You got my breasts all dirty with your semen.\
name ""
goto *doppele_h



*doppele_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 695,":a;chara\doppele_bk05.bmp",0,0
gosub *syasei2
>As the Doppel Girl squeezes Luka's penis between her soft thighs, he comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2708,%2708+1:if %2708=1 mov %count_koenemy,%count_koenemy+1
if %2708>%count_most mov %count_most,%2708:mov $count_mostname,$name
count 3,1
mov $bad1,"The Doppel Girl forced Luka to come with her thighs."
gosub *face2
name $name
>Ahaha, that was so easy.@
>Look... You got my thighs all dirty with your semen.\
name ""
goto *doppele_h



*doppele_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 698,":a;chara\doppele_bk38.bmp",0,0
gosub *syasei2
>As the Doppel Girl crushes Luka's penis with her soft ass, he comes, covering her back with semen.\
mov %viclose,1:gosub *lose
mov %2708,%2708+1:if %2708=1 mov %count_koenemy,%count_koenemy+1
if %2708>%count_most mov %count_most,%2708:mov $count_mostname,$name
count 34,1
mov $bad1,"The Doppel Girl forced Luka to come with her ass."
gosub *face2
name $name
>Ahaha, that was so easy.@
>Look... You got my ass all dirty with your semen.\
name ""
goto *doppele_h



*doppele_h7

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\doppele_ha2.bmp",0,0
gosub *syasei2
>As the tentacle sword sucks on Luka's penis, he comes, filling it with semen.\
mov %viclose,1:gosub *lose
mov %2708,%2708+1:if %2708=1 mov %count_koenemy,%count_koenemy+1
if %2708>%count_most mov %count_most,%2708:mov $count_mostname,$name
count 27,1
mov $bad1,"The Doppel Girl used her sword tentacle to force Luka to come."
gosub *face2
name $name
>Ahaha, that was so easy.@
>Look... Your semen is being sucked up by my sword.\
name ""
goto *doppele_h



*doppele_h8

mov %ikigoe,3:gosub *ikigoe
name $name
>Heh... Already? \
name ""
gosub *syasei1
lsp 700,":a;chara\doppele_hd2.bmp",0,0
gosub *syasei2
>The moment Luka is forced into the Doppel Girl's tight vagina, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2708,%2708+1:if %2708=1 mov %count_koenemy,%count_koenemy+1
if %2708>%count_most mov %count_most,%2708:mov $count_mostname,$name
count 1,1
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"The Doppel Girl forced Luka to come the moment of insertion."
gosub *face2
name $name
>Aha, an instant loss?@
>A premature ejaculation even when you're being raped by yourself...\
name ""
goto *doppele_h



*doppele_h9

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\doppele_hd2.bmp",0,0
gosub *syasei2
>As the Doppel Girl squeezes Luka with her vagina as she rapes him, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2708,%2708+1:if %2708=1 mov %count_koenemy,%count_koenemy+1
if %2708>%count_most mov %count_most,%2708:mov $count_mostname,$name
count 1,1
mov $bad1,"The Doppel Girl forced Luka to come as she raped him."
gosub *face2
name $name
>Aha, you came so much inside me...@
>How does it feel to inseminate yourself?\
name ""
goto *doppele_h



*doppele_h

mov %skill01,19
mov $bad2,"Luka was forced to continue mating with the Doppel Girl, and continually impregnate her."
if %2708=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku=2 mov %hseanwave,1:hseanwave:goto *doppele_hb
name "Luka"
>Ahh...\
name ""
name $name
>Hehe... So you know now that you can't beat me, right?@
>Now... Make children with me.\
>I'll have you impregnate me, so I can give birth to strong soldiers... \
name ""
name "Luka"
>N...No way... Ah!\
name ""
cspl 690,699
if %sinkou<3 lsp 700,":a;chara\doppele_hb1.bmp",0,0:print 10,500
if %sinkou=3 lsp 700,":a;chara\doppele_hd1.bmp",0,0:print 10,500
>The Doppel Girl pushes me down, and jumps astride me.@
mov %hseanwave,1:hseanwave
>Before I can object, she presses down, forcing me into her.\
>In seconds, I'm deep inside her hot, wet vagina...@
>The sudden start of the rape surprises me, leaving me only able to moan in surprise.\
name "Luka"
>Ahh!\
name ""
name $name
>Haha... How does it feel to have your own body rape you to make children?\
name ""
name "Luka"
>C...Children... You can't!\
name ""
name $name
>If you don't want to get me pregnant, then just endure it.@
>But I know everything that makes you feel good... \
name ""
goto *doppele_hb



*doppele_hb

>While giggling, the Doppel Girl slowly tenses her muscles, making her vagina get tighter, little by little...\
name "Luka"
>Ahh!\
name ""
name $name
>Hehe... It feels good when I tighten it like this, doesn't it?@
>Since I'm you, I know everything you like.@> Just resign yourself to being my stallion...\
name ""
name "Luka"
>Ah... No...\
name ""
name $name
>Haha... Hurry up and come! \
name ""
>The Doppel Girl stares into my eyes with a smile, as she squeezes even harder.@
>My body, reacting against my mind, starts to ache as the desire to come inside her grows and grows.\
name "Luka"
>Ahh... No... I'm going to come...\
name ""
name $name
>Ahaha, you really are a premature ejaculator, aren't you?@
>Now come inside yourself. \
name ""
>Moving to finish me off, the Doppel Girl tightens and releases her vagina with a rhythmic sort of pressure.@
>Her wet, seductive flesh rubs me as I squirm under her, helplessly led to a climax.\
name "Luka"
>Ahhh!!!\
name ""
gosub *syasei1
if %sinkou<3 lsp 700,":a;chara\doppele_hb2.bmp",0,0
if %sinkou=3 lsp 700,":a;chara\doppele_hd2.bmp",0,0
gosub *syasei2
>I explode inside her vagina, writhing in pleasure as she continues squeezing me, even as I come.\
name "Luka"
>Haa... I came...\
name ""
name $name
>Hehe, you came so much inside me...@>Your semen is spurting out deep inside me.@
>As we both know, you're a huge pervert who loves anything that makes you feel good. \
name ""
mov %hseanwave,4:hseanwave
>The Doppel Girl rubs her waist against me as she laughs, bringing forth more moans of pleasure from me right after my orgasm.\
name "Luka"
>Ahh!\
name ""
name $name
>Ahaha, take this!@
>I'll make you come inside me again... \
name ""
>Grinding against my body, the Doppel Girl starts to move back and forth...@
>My penis rubs hard against her vaginal walls as her body rubs against mine, bringing forth new waves of pleasure.\
>At times, she even twists her body side to side, tossing my penis around inside her.\
name "Luka"
>Ahhh!\
name ""
name $name
>Haha, you love it when it's tight, don't you?@
>You can't endure this at all...\
name ""
>As she moves, the Doppel Girl also starts to squeeze her vagina...@
>Slowly grinding against me, the desire to explode in her tight vagina takes over all of my thoughts.\
name "Luka"
>Ahh...\
name ""
>Overwhelmed with her on top of me, I loosen my body as I let go into her.\
gosub *syasei1
if %sinkou<3 lsp 700,":a;chara\doppele_hb3.bmp",0,0
if %sinkou=3 lsp 700,":a;chara\doppele_hd3.bmp",0,0
gosub *syasei2
>Gasping in pleasure, I explode inside her warm vagina, my penis pulsing in ecstasy as it spurts into her.\
name "Luka"
>Haa...\
name ""
name $name
>...Aww, geez.@
>Was having your own body raping you enough to make you come right away?\
>Just a little moving, and you give up right away?@>How sad...@
>If you're frustrated at it, why not fight back? \
name ""
name "Luka"
>Urhg!\
name ""
>Taunted by her, I thrust up into the Doppel Girl.@
>Arching my back upwards, I push into her with everything I can manage.\
name $name
>Ahaha, what the heck is that?@
>This is how you move your waist... \
name ""
name "Luka"
>Ahh...\
name ""
>Pressing back down into me, my feeble counterattack is shut down.@
>Without stopping, the Doppel Girl starts bouncing quickly up and down on top of me.\
>My own counterattack was countered, leaving me helpless under her intense piston rape...\
name "Luka"
>Ahhh!!!\
name ""
>Helpless against her assault, my body loosens as the intense rape continues.\
name $name
>Take it, take this!\
name ""
name "Luka"
>Haa...\
name ""
gosub *syasei1:gosub *syasei2
>Moaning in defeat, I shoot more of my semen into her warm vagina.\
name $name
>Ahaha... You came so much.@
>After coming so much inside me, I'm sure you got me pregnant. \
>Does it feel good having children with me?\
name ""
>The Doppel Girl looks down at me in triumph, laughing.\
name $name
>But... Ilias requires more soldiers.@
>You'll need to keep doing your best. Hehe.\
name ""
name "Luka"
>Ah...\
name ""
>After that, I'm considered no more than a tool to create more children.@
>I'm forced to continually mate with my Doppelganger, getting her pregnant over and over.\
>Forced to reproduce without stop, I'm creating Ilias' own army...\
mov %hseanwave,0:hseanwave
gosub *anten
>............\
goto *badend



*hainu_start

mov %player,2
mov $name,"Hainuwele"
mov $name2,"Hainuwele"
mov $lavel,"hainu"
mov $tatie1,"hainu_st01"
mov $tatie2,"hainu_st02"
mov $tatie3,"hainu_st03"
mov $tatie4,"hainu_st01"
mov $haikei,"bg213"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,23000
if %nanido=2 mov %max_enemylife,23000
if %nanido=3 mov %max_enemylife,23000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,0
mov %music,13
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-300
mov %tukix,300
name $name
>Ahahaha... Didn't you realize it in the battle at the Monster Lord's Castle?\
>Hahaha... You can't beat me!\
name ""
lsp 699,":a;chara\arumaeruma_st11.bmp",-200,0
lsp 700,":a;chara\hainu_st12.bmp",-120,0:print 10,500
name "Alma Elma"
>Oh, I apologize...@> I was sleepy before, you see.\
name ""
name $name
>Hahaha... You can't use that excuse!@
>You couldn't even lay a finger on me, I beat you senseless!\
>A complete loss, Alma Elma!@
>You're helpless against my speed! Hahaha!\
name ""
bgm "bgm\sitenno.ogg"
name "Alma Elma"
>Sorry, but I don't enjoy fighting without a large audience.@
>I'll finish this quickly...\
name ""
csp 699
gosub *face1
mov %sinkou,1
goto *common_main



*hainu_v

if %nanido=0 goto *hainu_v2
gosub *face2
name $name
>You see now, don't you?@
>Your skills are as nothing to me.\
>You can't lay a single finger on me.@
>Hahaha... You're helpless!\
name ""
name "Alma Elma"
>You're right...@>It has been a shutout until now.@
>To think a Queen Succubus' skills wouldn't work...\
name ""
>Alma Elma sighs as she mumbles to herself.@
>Stepping back, it appears as though her fighting spirit is gone...\
name $name
>It looks like you've given up.@
>Now then, I suppose I'll give up on tearing you limb from limb for now.\
>Instead, I'll cut off your head!\
name ""
dwave 1,"se\karaburi.ogg"
>Hainuwele approaches Alma Elma, her claws aiming at her neck!\
name "Alma Elma"
>Sheesh...@>I'm glad there isn't an audience now.\
name ""
skillname "Diamond Plated Fist"
dwave 10,"se\dageki2.ogg"
lsp 2,":a;effect\017_01.bmp",250,150:print 10,10
lsp 2,":a;effect\017_02.bmp",250,150:print 10,10
lsp 2,":a;effect\017_03.bmp",250,150:print 10,10
lsp 2,":a;effect\017_04.bmp",250,150:print 10,10
lsp 2,":a;effect\017_05.bmp",250,150:print 10,10
csp 2:print 1
>Alma Elma's fist slams into Hainuwele's stomach!
dwave 2,"se\damage2.ogg"
rnd2 %damage,5000,5200:gosub *enemylife2
skillname ""
gosub *face3
name $name
>Eh...?\
name ""
>Hainuwele's eyes go wide in surprise.\
name $name
>Impossible... You... Hit me?\
name ""
>Alma Elma's single punch fractures Hainuwele's armor.@
>Staggering back, she stumbles in confusion as she tries to come to terms with what happened.\
name $name
>My speed is completely above yours...\
>And... What's with this power?@
>You're hiding your power, Queen Succubus!?\
name ""
name "Alma Elma"
>This isn't the power of a Queen Succubus...@
>It's just... Mere violence.\
name ""
>Alma Elma puts her left leg slightly forward, bending her right leg behind her as she puts more weight on it.\
>Holding both arms up in front of her, palms out, she changes her stance.\
>She takes a pose suited for pure martial arts, with the calmness of a Karate master.\
name $name
>Martial Arts!?@
>I don't have data on you using this fighting style!?\
name ""
>There are records of her using rudimentary martial arts moves, mostly when playing with people in the Colosseum.\
>But it was never truly serious, so it was considered a minor point overwhelmed by her preference for Queen Succubus style skills.\
>This type of stance is completely unexpected for Hainuwele...\
name "Alma Elma"
>I didn't really want to do this...@
>But it's your fault.@> You're making me use violence...\
name ""
name $name
>Quit screwing around.@>Don't pretend like you can turn this around just from-\
name ""
dwave 1,"se\karaburi.ogg"
>Hainuwele raises her wings as she charges at Alma Elma!\
skillname "Lightning Arm Crush"
dwave 1,"se\dageki3.ogg"
>Alma Elma grabs one of Hainuwele's wings, and uses her own momentum to throw her to the ground!
dwave 2,"se\damage.ogg"
rnd2 %damage,2000,2200:gosub *enemylife2
skillname ""
name $name
>Ahhh!@
>My wing!!!\
name ""
name "Alma Elma"
>Now your right wing's bones have been smashed...\
name ""
>After fighting against her until now, she figured out the Chimera's basic body structure.\
>Her joints, skeletal structure, and gaps in the armor...@
>And if she knows all of these weak spots, she knows how to break her.\
name "Alma Elma"
>...Did you know?@
>Harpy type monsters have 40% of their muscles in their chest...\
name ""
skillname "Dragon Knee"
dwave 1,"se\dageki2.ogg"
lsp 2,":a;effect\016_01.bmp",230,150:print 10,10
lsp 2,":a;effect\016_02.bmp",230,150:print 10,10
lsp 2,":a;effect\016_03.bmp",230,150:print 10,10
lsp 2,":a;effect\016_04.bmp",230,150:print 10,10
lsp 2,":a;effect\016_05.bmp",230,150:print 10,10
csp 2:print 10,10
>Alma Elma jumps forward, slamming her knee into Hainuwele's chest!
dwave 2,"se\damage2.ogg"
rnd2 %damage,2000,2200:gosub *enemylife2
skillname ""
name $name
>Ahhg!@>Ghhhggg!\
name ""
name "Alma Elma"
>Oh, are you having trouble breathing now?@
>Now you can't use most of the muscles in your upper body, either.\
name ""
name $name
>T...This can't...\
name ""
dwave 1,"se\karaburi.ogg"
>Hainuwele raises her right wing, and tries to bring it down on Alma Elma!\
lsp 2,":a;effect\025_01.bmp",0,0
lsp 2,":a;effect\025_02.bmp",0,0
lsp 2,":a;effect\025_03.bmp",0,0
lsp 2,":a;effect\025_04.bmp",0,0
lsp 2,":a;effect\025_05.bmp",0,0
lsp 2,":a;effect\025_06.bmp",0,0
lsp 2,":a;effect\025_07.bmp",0,0
lsp 2,":a;effect\025_08.bmp",0,0
csp 2
gosub *counter
skillname "Knockout Palm"
dwave 1,"se\dageki2.ogg"
lsp 2,":a;effect\025_01.bmp",0,0:print 10,20
lsp 2,":a;effect\025_02.bmp",0,0:print 10,20
lsp 2,":a;effect\025_03.bmp",0,0:print 10,20
dwave 2,"se\light.ogg"
lsp 2,":a;effect\025_04.bmp",0,0:print 10,60
lsp 2,":a;effect\025_05.bmp",0,0:print 10,60
lsp 2,":a;effect\025_06.bmp",0,0:print 10,60
lsp 2,":a;effect\025_07.bmp",0,0:print 10,60
lsp 2,":a;effect\025_08.bmp",0,0:print 10,60
csp 2:print 10,10
>Alma Elma catches Hainuwele's left wing, and jams her palm into her elbow!
dwave 2,"se\damage2.ogg"
rnd2 %damage,3000,3200:gosub *enemylife2
skillname ""
name $name
>Gaaahhh!!!\
name ""
>Hainuwele's left elbow has been smashed, and her right arm is twisted in the wrong direction.\
name $name
>T...This is absurd!@
>Why did you hide this fighting ability!?\
name ""
name "Alma Elma"
>Why, I'd be disqualified as Queen Succubus.@
>What would people think if they thought I preferred violence over pleasure skills?\
name ""
skillname "Killing Flow"
dwave 1,"se\dageki3.ogg"
>Alma Elma jumps forward and stomps on Hainuwele's left knee, shattering her bones!
dwave 2,"se\damage.ogg"
rnd2 %damage,2000,2200:gosub *enemylife2
skillname ""
name $name
>Gyaaa!!!\
name ""
>Alma Elma stands in front of Hainuwele as she rolls in agony on the ground.@
>Seeing the state her own body is in, Hainuwele shivers in fear.\
name "Alma Elma"
>Even if your speed is unmatched, your movements are all linear.@
>I can use your own momentum against you with my martial arts techniques.\
>Not to mention how fragile your body structure is, to give you that speed.\
>...It seems as though your creators sacrificed your defense and your intelligence just to make you faster.\
>You're a poor opponent for me...\
name ""
skillname "Violent Stomp"
dwave 1,"se\dageki3.ogg"
>Alma Elma stomps on Hainuwele's right foot, shattering it!
dwave 2,"se\damage.ogg"
rnd2 %damage,2000,2200:gosub *enemylife2
skillname ""
name $name
>Hyaaa!!!\
name ""
name "Alma Elma"
>Unlike you, I don't like torturing my opponents with pain.@
>Sorry, I'll break you quickly.\
name ""
name $name
>N...No... This...@
>I am the next generation of monster!\
name ""
>Hainuwele struggles to rise on her broken limbs...\
skillname "Diamond Plated Fist"
dwave 10,"se\dageki2.ogg"
lsp 2,":a;effect\017_01.bmp",250,150:print 10,10
lsp 2,":a;effect\017_02.bmp",250,150:print 10,10
lsp 2,":a;effect\017_03.bmp",250,150:print 10,10
lsp 2,":a;effect\017_04.bmp",250,150:print 10,10
lsp 2,":a;effect\017_05.bmp",250,150:print 10,10
csp 2:print 10,10
>Alma Elma slams her fist into Hainuwele's stomach with every ounce of strength she has!
dwave 2,"se\damage2.ogg"
rnd2 %damage,5000,5200:gosub *enemylife2
skillname ""
name $name
>Ahg... Gggg...\
name ""
>Countless cracks spread across Hainuwele's body as her wings pointlessly spasm on the ground.\
name "Alma Elma"
>Your spine has been broken, so you can't feel anything below your waist anymore, can you?\
>I won't let you suffer any longer.@> I'll finish you off with this next blow.\
name ""
name $name
>T...Too strong...@
>S...So you held back in your fight against the Hero?\
name ""
name "Alma Elma"
>No, I fought seriously.@
>I used everything I had... As Queen Succubus.\
name ""
name $name
>You did well, hiding this power...\
name ""
name "Alma Elma"
>...Even I'm able to see what's going on sometimes.@
>If I broke him apart then, I would have killed the mood.\
>Besides...@> I have no desire to crush him with violence.@
>...Unlike you.\
name ""
>Alma Elma raises her foot above Hainuwele's head...\
skillname "Violent Stomp"
dwave 1,"se\dageki3.ogg"
>And stomps as hard as she can with her right foot!
dwave 2,"se\damage.ogg"
rnd2 %damage,2000,2200:gosub *enemylife2
skillname ""
goto *hainu_v2



*hainu_v2

name $name
>H...How could I...?\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,500
>Hainuwele was killed!\
mov %viclose,1:gosub *victory
mov %2416,1
mov %player,0
goto *sean0403



*hainu_kousan

gosub *kousan_syori
>Alma Elma surrenders to Hainuwele...\
gosub *face2
name $name
>Ahaha, so you surrender in the face of my speed?@
>Then I'll finish you off!\
name ""
goto *hainu_a



*hainu_main

gosub *cmd_main
if %cmd1=11 && %nanido>0 goto *hainu_attack1
if %cmd1=11 && %nanido=0 goto *hainu_attack2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *hainu_kousan
if %cmd1=16 goto *hainu_onedari
if %cmd1=17 goto *hainu_skill
goto *hainu_main



*hainu_attack1

mov %before_action,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ha!"
if %ransu=2 mov $sel1,"Hya!"
if %ransu=3 mov $sel1,"Eiiya!"
name "Alma Elma"
eng $sel1:$sel6\
name ""
>Alma Elma attacks!
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\miss.ogg"
gosub *kaihi
>But Hainuwele dodges!\
if %hanyo1=1 goto *hainu_a
name $name
>Ahaha... Did you think something like that would hit me?@
>It's like you're in slow motion!\
name ""
mov %hanyo1,1
if %hanyo1+%hanyo2+%hanyo3=3 goto *hainu_v
goto *hainu_a



*hainu_attack2

mov %before_action,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ha!"
if %ransu=2 mov $sel1,"Hya!"
if %ransu=3 mov $sel1,"Eiiya!"
name "Alma Elma"
eng $sel1:$sel6\
name ""
>Alma Elma attacks!
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\dageki.ogg"
rnd2 %damage,800,1000
gosub *enemylife2
goto *hainu_v2



*hainu_skill

saveoff
textoff
cspl 3,7:cspl 601,608
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
gosub *setwindow_04
if %mp>1 strsp 601,"Flying Knee - 2",70,418,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 601,21
if %mp<2 strsp 601,"Flying Knee - 2",70,418,9,1,20,20,0,0,1,1,#bbbbbb
if %mp>2 strsp 602,"Roundhouse Kick - 3",70,445,11,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 602,22
if %mp<3 strsp 602,"Roundhouse Kick - 3",70,445,11,1,20,20,0,0,1,1,#bbbbbb
if %mp>1 strsp 603,"Melty Hand - 2",70,472,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,23
if %mp<2 strsp 603,"Melty Hand - 2",70,472,8,1,20,20,0,0,1,1,#bbbbbb
if %mp>4 strsp 604,"Shamshir - 5",70,499,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 604,24
if %mp<5 strsp 604,"Shamshir - 5",70,499,7,1,20,20,0,0,1,1,#bbbbbb
btnwait2 %cmd1
if %mon_labo_on=1 && %cmd1=4 textoff:screen_clear:return *monster_labo
if %zukanon>0 && %cmd1=4 textoff:return *zukan_commonkaisou0
if %cmd1=0 skip -3
if %cmd1<=-2 skip -4
cspl 3,7
cspl 601,610
gosub *setwindow_02p
if %cmd1=21 goto *hainu_skill1
if %cmd1=22 goto *hainu_skill2
if %cmd1=23 goto *hainu_skill3
if %cmd1=24 goto *hainu_skill4
texton
btndef clear
if %cmd1=-1 goto *hainu_main



*hainu_skill1

rnd2 %ransu,1,2
if %ransu=1 mov $sel1,"How about this?"
if %ransu=2 mov $sel1,"Hya!"
name "Alma Elma"
eng $sel1:$sel6\
name ""
mov %mp,%mp-2
gosub *mp
skillname "Flying Knee"
>Alma Elma lightly jumps forward, her knee aiming for Hainuwele's face!
dwave 10,"se\karaburi.ogg"
lsp 2,":a;effect\016_01.bmp",180,80:print 10,10
lsp 2,":a;effect\016_02.bmp",180,80:print 10,10
lsp 2,":a;effect\016_03.bmp",180,80:print 10,10
lsp 2,":a;effect\016_04.bmp",180,80:print 10,10
lsp 2,":a;effect\016_05.bmp",180,80:print 10,10
csp 2:print 10,10
dwave 1,"se\miss.ogg"
gosub *kaihi
>But Hainuwele dodges!\
skillname ""
if %hanyo1=1 goto *hainu_a
name $name
>Ahaha... Did you think that would hit me!?@
>It's like you're in slow motion!\
name ""
mov %hanyo1,1
if %hanyo1+%hanyo2+%hanyo3=3 goto *hainu_v
goto *hainu_a



*hainu_skill2

rnd2 %ransu,1,2
if %ransu=1 mov $sel1,"Haa!"
if %ransu=2 mov $sel1,"Take this!"
name "Alma Elma"
eng $sel1:$sel6\
name ""
mov %mp,%mp-3
gosub *mp
skillname "Roundhouse Kick"
>Alma Elma suddenly spins, a powerful roundhouse kick flying toward Hainuewele's body!
dwave 10,"se\karaburi.ogg"
lsp 2,":a;effect\015_01.bmp",150,50:print 10,10
lsp 2,":a;effect\015_02.bmp",150,50:print 10,10
lsp 2,":a;effect\015_03.bmp",150,50:print 10,10
lsp 2,":a;effect\015_04.bmp",150,50:print 10,10
csp 2:print 10,10
dwave 1,"se\miss.ogg"
gosub *kaihi
>But Hainuwele dodges!\
skillname ""
if %hanyo1=1 goto *hainu_a
name $name
>Ahaha... Did you think that would hit me!?@
>It's like you're in slow motion!\
name ""
mov %hanyo1,1
if %hanyo1+%hanyo2+%hanyo3=3 goto *hainu_v
goto *hainu_a



*hainu_skill3

rnd2 %ransu,1,2
if %ransu=1 mov $sel1,"How about a taste of pleasure?"
if %ransu=2 mov $sel1,"How about this caress?"
name "Alma Elma"
eng $sel1:$sel6\
name ""
mov %mp,%mp-2
gosub *mp
skillname "Melty Hand"
dwave 1,"se\ero_koki1.ogg"
>Alma Elma seductively caresses Hainuwele's body!
>But it doesn't effect Hainuwele!\
skillname ""
if %hanyo2=1 goto *hainu_a
name $name
>Aha... Pleasure attacks don't work on me at all.@
>I've been created with defenses against every type of Succubus pleasure attack.\
>With my brain and nerves rewired, this body is immune to pleasure.@
>Isn't it amazing? Hahaha!\
name ""
name "Alma Elma"
>What... That's horrible...@
>How can you stand living in that body?\
name ""
name $name
>You seem to be at a loss against my lack of sensations.\
>Thanks to you, I'm missing all sorts of important feelings and emotions...\
>I receive no joy from sexual pleasure, or from food.@
>I have no sense of satisfaction, or sense of accomplishment.@> But I was made that way, because of you.\
>One of the few times I can have fun is when ripping off other creature's arms and legs, though...\
>So that's how I'll have fun with you, Alma Elma!\
name ""
name "Alma Elma"
>So your body knows no joy...@> That's messed up.@
>I really do need to destroy you, don't I?\
name ""
mov %hanyo2,1
if %hanyo1+%hanyo2+%hanyo3=3 goto *hainu_v
goto *hainu_a



*hainu_skill4

name "Alma Elma"
>Wind, rage as you please!\
name ""
mov %mp,%mp-5
gosub *mp
skillname "Shamshir"
dwave 1,"se\wind1.ogg"
>Alma Elma summons a squall of wind blades!
dwave 1,"se\miss.ogg"
gosub *kaihi
>But Hainuwele dodges them!\
skillname ""
if %hanyo3=1 goto *hainu_a
name $name
>Ahaha, a soft breeze.@
>Didn't you hear me? Your skills won't work at all on me!\
name ""
name "Alma Elma"
>So they completely studied every inch of me, didn't they?@
>Naughty...\
name ""
mov %hanyo3,1
if %hanyo1+%hanyo2+%hanyo3=3 goto *hainu_v
goto *hainu_a



*hainu_a

rnd2 %ransu,1,4
if %ransu=1 gosub *hainu_a1:goto *common_main
if %ransu=2 gosub *hainu_a2:goto *common_main
if %ransu=3 gosub *hainu_a3:goto *common_main
if %ransu=4 && %owaza_count3a>3 gosub *hainu_a4:goto *common_main
skip -5



*hainu_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Ahaha, does it hurt?"
if %ransu=2 mov $sel1,"Hey... Does it hurt? Haha!"
if %ransu=3 mov $sel1,"My nails are sharp!"
name $name
eng $sel1:$sel6\
name ""
skillname "Scratch"
dwave 1,"se\slash5.ogg"
>Hainuwele's sharp claws rake across Alma Elma's body!
damage 1000,1500
skillname ""
if %mylife=0 sub %stack,1:return *hainu_h1
sub %stack,1
return



*hainu_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You can't match my speed!"
if %ransu=2 mov $sel1,"Ahaha, too slow!"
if %ransu=3 mov $sel1,"I'm a hundred times faster than you!"
name $name
eng $sel1:$sel6\
name ""
skillname "Glider Spike"
dwave 1,"se\wind4.ogg"
wait 1000
dwave 2,"se\dageki2.ogg"
>Gliding at an incredible speed, Hainuwele slashes Alma Elma as she flies by!
mov %a_effect1,1
damage 1500,2000
skillname ""
if %mylife=0 sub %stack,1:return *hainu_h1
sub %stack,1
return



*hainu_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Eat this! I'll rip you to shreds!"
if %ransu=2 mov $sel1,"I'll rip open your spine, you weak Succubus!"
if %ransu=3 mov $sel1,"I'm not a power type... But this will still rip you apart!"
name $name
eng $sel1:$sel6\
name ""
skillname "Wings of Destruction"
dwave 2,"se\dageki4.ogg"
>Summoning all of her strength into her wing, Hainuwele slams it against Alma Elma at top speed!
mov %a_effect1,1
damage 2000,2500
skillname ""
if %mylife=0 sub %stack,1:return *hainu_h1
sub %stack,1
return



*hainu_a4

add %stack,1
mov %owaza_count3a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You can't handle this at all!"
if %ransu=2 mov $sel1,"Your wind doesn't compare to mine!"
if %ransu=3 mov $sel1,"My wind will send you to the next world!"
name $name
eng $sel1:$sel6\
name ""
skillname "Super Wind"
dwave 1,"se\wind3.ogg"
lsp 2,":a;effect\wind.bmp",0,0:print 10,400
csp 2:print 10,400
>Hainuwele creates a powerful tornado of slicing wind, cutting everything around her!
mov %a_effect1,1
damage 3000,4000
skillname ""
if %mylife=0 sub %stack,1:return *hainu_h1
sub %stack,1
return



*hainu_onedari

>There is nothing to request!\
goto *hainu_main



*hainu_h1

name "Alma Elma"
>I'm worn out...\
name ""
if %battle_auto=1 skipoff
wait 1000
mov %battle,0
cspl 0,611
gosub *setwindow_01p
>Alma Elma has been defeated by Hainuwele!\
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov %hsean,1
mov %2716,%2716+1:if %2716=1 mov %count_koenemy,%count_koenemy+1
if %2716>%count_most mov %count_most,%2716:mov $count_mostname,$name
count 14,4
mov $bad1,"Hainuwele raped Luka to his death."
gosub *face2
name $name
>Ahaha, no big deal.@
>Now then...\
name ""
>After defeating Alma Elma, Hainuwele quickly leaves the tower...\
csp 700
sean_change "bg208"
goto *hainu_h



*hainu_h

mov %player,0
mov $bad2,""
if %2716=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>............\
name ""
>I'm still waiting in the garden, praying for the Four Heavenly Knights to succeed.@
>Suddenly, a voice calls out from behind me...\
lsp 700,":a;chara\hainu_st02.bmp",0,0:print 10,500
name $name
>Ahaha... There you are, Hero!@
>I'll have a lot of fun with you!\
name ""
name "Luka"
>Guh... Crap!\
name ""
>I jump up, and try to draw my sword... But I'm too slow!\
name $name
>Ahahaha, too slow!@
>You'll be my prey!\
name ""
>Hainuwele binds me underneath her, using her feet to guide my penis to her groin.\
name "Luka"
>Guh... Get off!\
name ""
>I struggle as hard as I can, but she's already bound my limbs...@
>With a sadistic smile on her face, Hainuwele tears off all my clothes.\
name $name
>My pussy is an incredible combination of Succubus and Harpy.@
>I'll rape you with it until you die...\
name ""
name "Luka"
>S...Stop!\
name ""
>Hainuwele uses her feet to bring my exposed penis into her...\
mov %hseanwave,14:hseanwave
cspl 690,699
lsp 700,":a;chara\hainu_h1.bmp",0,0:print 10,500
>And, just like that, my erect member is taken all the way inside.\
name "Luka"
>St...Ahh...\
name ""
>Taking me all the way inside in one push, my screams of rejection turn instantly into moans.@
>As she said, her insides are incredible...\
>From her entrance all the way to her deepest part, there are tiny little bumps that each move and rub against me.\
name "Luka"
>I...Incredible... It's moving inside...\
name ""
name $name
>I can control every one of them like a finger...@
>And all the way inside...\
name ""
>Hainuwele presses down harder on me, forcing me even deeper into her.\
name "Luka"
>Ahh!\
name ""
>Innumerable little bumps run all over my glans, bringing forth an excited pant from me.\
name $name
>Aha, welcome to all the way inside me.@
>The bumps here are all tailored to attack your tip...\
>Even if you try to endure it now, there's no man who could stop an orgasm at this point.\
name ""
name "Luka"
>Hyaa!\
name ""
>Even if I try to pull back, with Hainuwele's legs wrapped around me, I just get pushed back in.\
name $name
>Even though I know you would come just from being inserted...@
>I'll give you a finishing blow anyway.\
name ""
name "Luka"
>Ahhh!\
name ""
>The flesh around her entrance tightens, locking my penis inside her.@
>At the same time, the soft flesh deep inside her starts to squeeze harder on my glans.\
name $name
>Ahaha, just like a Succubus, I can control my vagina as I wish.@
>And if I use my muscles like this...\
name ""
name "Luka"
>T...Too tight!@> Ahh!\
name ""
>From the base to the tip, she tightens and loosens her vagina in a wave.@
>At the same time, the bumps deep inside her rub and massage my tip.\
name "Luka"
>T...That feels good...@
>I'm going to come...\
name ""
name $name
>Good... Now come!\
name ""
>Hainuwele squeezes hard, pressing those bumps against my glans from every direction.@
>As the stimulation explodes in me, my vision goes pure white.\
name "Luka"
>Ahhh!!!\
name ""
gosub *syasei1
lsp 700,":a;chara\hainu_h2.bmp",0,0
gosub *syasei2
>In the next moment, I explode inside Hainuwele, my semen spurting into her even as her bumps continue rubbing my glans.\
name $name
>Aha, so you came?@
>You're already finished...\
name ""
name "Luka"
>Eh...?@> Ahh!\
name ""
mov %hseanwave,15:hseanwave
>Something that feels like a pair of lips latched around my tip during my climax.\
name "Luka"
>What... Is this...?\
name ""
name $name
>It's the entrance to my womb, can't you tell?@
>I'll suck up all of your semen with it, until you're dry...\
>My vagina has the same abilities as a Succubus', remember?@
>Now I'll suck you dry!\
name ""
name "Luka"
>N...Noo... Ah!\
name ""
>Her womb starts to suck and pull on my penis, like an extra mouth inside of her.@
>Even though I just came, the powerful stimulation is already causing my body to ache for another.\
>And it's not just her womb, either...@>The rest of her vagina is contracting and releasing, making it feel like her whole vagina is sucking on me.\
name "Luka"
>Hyaaa!!!\
name ""
>The multiple layers of pressure and suction attack me, leading me to an all too quick surrender.\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\hainu_h3.bmp",0,0
gosub *syasei2
>I explode again inside her, my semen shooting straight into her womb as it sucks on me.\
name $name
>I don't want to waste too much time, so I'll just suck it out by force.@
>Hurry up and shoot it all out!\
name ""
name "Luka"
>Ahh... Haa!\
name ""
>The contractions inside her vagina start to get even more intense, leaving me no time after my ejaculation until the next.\
>My penis continues pulsing in her, spurting semen continuously as the weakness spreads through my body.\
name "Luka"
>Haa... Ahh...\
name ""
name $name
>Aha, are you already getting weak?@
>Humans are fragile after all, aren't they?\
>I'll keep raping you until you die, so hurry up and give your life to my pussy.\
name ""
name "Luka"
>Hyaa... Ah...\
name ""
gosub *syasei1
lsp 700,":a;chara\hainu_h4.bmp",0,0
gosub *syasei2
>Climax after climax, my life itself is shot into her vagina.@
>As the weakness spreads, I feel my vision start to go dark.\
name $name
>Come on, hurry up and die.@
>I'll squeeze out the last of your semen and life...\
name ""
name "Luka"
>Ah...aa...\
name ""
>Everything of mine is squeezed out into her.@
>With a final weak moan, I fade away.\
mov %hseanwave,0:hseanwave
gosub *anten
name $name
>He died after only a minute of being squeezed dry!@
>Haha... Humans are so weak!\
name ""
>After raping the boy to his death, Hainuwele tosses his corpse aside with a laugh.\
>...............\
goto *badend



*amphis_start

mov %player,3
mov $name,"Amphisbaena"
mov $name2,"Amphisbaena"
mov $lavel,"amphis"
mov $tatie1,"amphis_st01"
mov $tatie2,"amphis_st02"
mov $tatie3,"amphis_st03"
mov $tatie4,"amphis_st02"
mov $haikei,"bg214"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,30000
if %nanido=2 mov %max_enemylife,30000
if %nanido=3 mov %max_enemylife,30000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,100
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,0
mov %music,4
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-300
mov %tukix,300
name $name
>Now, let's continue from Undine's Spring.@
>I'll cut you to pieces with this super vibration claw.\
name ""
>The artificial monster stands across from Erubetie with a cruel smile on her face.\
>Her machine-like body gives off a loud whirring noise, filling the tower with sound.\
lsp 701,":a;chara\erbetie_st01.bmp",45,0
lsp 700,":a;chara\amphis_st12.bmp",160,0:print 10,500
name "Erubetie"
>...Do you think it will go that easily...?\
name ""
name $name
>Hehe, it will be simple.@
>Don't you remember what happened last time?\
name ""
name "Erubetie"
>Things will be different this time...@
>I realized something last time!\
name ""
name $name
>You're a weakling who can't even touch me!\
name ""
csp 701
gosub *face1
mov %sinkou,1
goto *common_main



*amphis001

add %stack,1
if %nanido=0 && %enemylife<1 sub %stack,1:return *amphis_v2
wait 500
skillname "Vibration Armor"
dwave 1,"se\denpa1.ogg"
bg "bg\bg214.bmp",99,100,"system\lngtwave.dll/vwi"
>Amphisbaena's armor vibrates at an incredible rate!
damage 1000,1500
skillname ""
if %mylife=0 return *amphis_h1
mov %hanyo1,%hanyo1+1
if %hanyo1>4 && %sinkou=2 goto *amphis002
if %sinkou>1 sub %stack,1:return
name $name
>Ahaha, what was that?@
>Did you forget that you take damage from even touching me?\
>Is it too difficult for a simple Slime to figure out?@
>You can't touch me!\
name ""
name "Erubetie"
>...........\
name ""
name $name
>...It seems like you understand.@
>Did you go stupid in your desperation?\
name ""
mov %sinkou,2
sub %stack,1
return



*amphis002

name "Erubetie"
>It's about time...\
name ""
name $name
>Oh, time for what?@
>Did the fool finally realize she's about to die?\
name ""
name "Erubetie"
>..............\
name ""
>Erubetie silently continues the fight.@
>If her estimates are right, it's almost time...\
mov %sinkou,3
sub %stack,1
return



*amphis_v

if %nanido=0 goto *amphis_v2
name "Erubetie"
>..............\
name ""
skillname "Heaven's Prison"
dwave 10,"se\ero_slime3.ogg"
lsp 2,":a;effect\013_01.bmp",0,0:print 10,70
lsp 2,":a;effect\013_02.bmp",0,0:print 10,70
csp 2:print 10,70
>Erubetie's viscous slime wraps around Amphisbaena!
>Amphisbaena has been bound by Erubetie!\
skillname ""
name $name
>What are you doing?@
>You're covering me with your body? Have you lost your mind?\
name ""
skillname "Vibration Armor"
dwave 1,"se\denpa1.ogg"
bg "bg\bg214.bmp",99,100,"system\lngtwave.dll/vwi"
>Amphisbaena's armor vibrates!
damage 1000,1500
skillname ""
if %mylife=0 goto *amphis_h1
name "Erubetie"
>Guh...!\
name ""
>Despite the painful vibration, Erubetie keeps covering Amphisbaena!\
name $name
>Are you suicidal?@
>No... This is...\
gosub *face3
>The aborted explosive move from the Monster Lord's Castle!?\
name ""
name "Erubetie"
>Yes... My final attack.@
>I create a nuclear fusion reaction inside my body, and obliterate everything.\
name ""
skillname "Fusion Reaction Start"
dwave 1,"se\power.ogg"
>The slime making up Erubetie's body reaches an incredibly high temperature!\
skillname ""
name $name
>G...Get off me!\
name ""
skillname "Vibration Armor"
dwave 1,"se\denpa1.ogg"
bg "bg\bg214.bmp",99,100,"system\lngtwave.dll/vwi"
>Amphisbaena's armor vibrates!
damage 100,150
skillname ""
if %mylife=0 goto *amphis_h1
name $name
>N...Not enough power...@
>Is it because I've used it too much?\
>...W...Was this on purpose!?\
name ""
name "Erubetie"
>That intense vibration all over your body...@
>And your unusual, quick retreat in Undine's Spring...\
>I realized that you can't fight for a long duration.\
name ""
skillname "D-T Reaction"
dwave 1,"se\power.ogg"
>The deuterium and tritium inside Erubetie's body begin to condense...\
skillname ""
name $name
>R...Release me!@
>You're going to destroy yourself along with me!?\
>You're just trying to fake me out like you did to the Hero, right!?@
>You're faking, so just release me already!\
name ""
name "Erubetie"
>No matter what you say, it's useless.@>You are different from Luka.@
>...You'll disappear here, along with my life.\
name ""
>The fusion inside Erubetie's body begins at last!\
name $name
>Get off, get off, get off!@
>S...Stooop!!!\
name ""
skillname "Colony Fusion"
>The nuclear reaction kicks off, creating a devastating explosion!\
dwave 1,"se\bom3.ogg"
lsp 2,":c;effect\019.bmp",0,0:print 10,1000
flushout 1000
csp 700
csp 2
bg white,1
rnd2 %damage,32000,35000
dwave 3,"se\damage2.ogg"
gosub *enemylife2
skillname ""
bg "bg\bg214.bmp",10,3000
lsp 700,":a;chara\amphis_st03.bmp",0,0:print 10,500
name $name
>You coward, Erubetie...\
name ""
>Amphisbaena is in pieces in the center of the explosion.\
lsp 701,":a;chara\erbetie_st01.bmp",45,0
lsp 700,":a;chara\amphis_st13.bmp",160,0:print 10,500
name $name
>You called it a suicidal explosion...@>But you're uninjured...\
name ""
name "Erubetie"
>No, I am not uninjured.@
>Some of the lives in my body have died...\
name ""
goto *amphis_v2



*amphis_v2

name $name
>An error... I couldn't...\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,500
>Amphisbaena dies...\
mov %viclose,1:gosub *victory
mov %2417,1
mov %player,0
goto *sean0404



*amphis_kousan

gosub *kousan_syori
>Erubetie surrenders to Amphisbaena...\
gosub *face2
name $name
>So you realized you can't win.@
>Then I'll take care of you quickly, and then deal with that Hero...\
name ""
goto *amphis_a



*amphis_main

gosub *cmd_main
if %cmd1=11 goto *amphis_attack
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *amphis_kousan
if %cmd1=16 goto *amphis_onedari
if %cmd1=17 goto *amphis_skill
goto *amphis_main



*amphis_attack

mov %before_action,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Here I come..."
if %ransu=2 mov $sel1,"Eat this..."
if %ransu=3 mov $sel1,"You...!"
name "Erubetie"
eng $sel1:$sel6\
name ""
>Erubetie attacks!
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\slash2.ogg"
rnd2 %damage,700,800
gosub *enemylife2
gosub *amphis001
goto *amphis_a



*amphis_skill

saveoff
textoff
cspl 3,7:cspl 601,608
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
gosub *setwindow_04
if %mp>1 strsp 601,"Arcadia Spread - 2",70,418,10,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 601,21
if %mp<2 strsp 601,"Arcadia Spread - 2",70,418,10,1,20,20,0,0,1,1,#bbbbbb
if %mp>3 lsp 602,":s/20,20,0;#FFFFFF#FF4444Melty Storm - 4 ",70,445:spbtn 602,22
if %mp<4 lsp 602,":s/20,20,0;#bbbbbbMelty Storm - 4 ",70,445
if %sinkou=3 strsp 603,"Colony Fusion - 0",70,472,10,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,23
btnwait2 %cmd1
if %mon_labo_on=1 && %cmd1=4 textoff:screen_clear:return *monster_labo
if %zukanon>0 && %cmd1=4 textoff:return *zukan_commonkaisou0
if %cmd1=0 skip -3
if %cmd1<=-2 skip -4
cspl 3,7
cspl 601,610
gosub *setwindow_02p
if %cmd1=21 goto *amphis_skill1
if %cmd1=22 goto *amphis_skill2
if %cmd1=23 goto *amphis_v
texton
btndef clear
if %cmd1=-1 goto *amphis_main



*amphis_skill1

rnd2 %ransu,1,2
if %ransu=1 mov $sel1,"...How about this?"
if %ransu=2 mov $sel1,"Be crushed..."
name "Erubetie"
eng $sel1:$sel6\
name ""
mov %mp,%mp-2
gosub *mp
skillname "Arcadia Spread"
>Erubetie's slimy body crashes against Amphisbaena!
dwave 1,"se\ero_slime1.ogg"
lsp 2,":a;effect\011_01.bmp",0,0:print 10,30
lsp 2,":a;effect\011_02.bmp",0,0:print 10,30
lsp 2,":a;effect\011_03.bmp",0,0:print 10,30
lsp 2,":a;effect\011_04.bmp",0,0:print 10,30
lsp 2,":a;effect\011_05.bmp",0,0:print 10,30
csp 2:print 10,30
rnd2 %damage,1300,1500
dwave 3,"se\damage.ogg"
gosub *enemylife2
skillname ""
gosub *amphis001
goto *amphis_a



*amphis_skill2

rnd2 %ransu,1,2
if %ransu=1 mov $sel1,"Come, my tsunami of slime!"
if %ransu=2 mov $sel1,"Drown in a whirlpool of slime!"
name "Erubetie"
eng $sel1:$sel6\
name ""
mov %mp,%mp-4
gosub *mp
skillname "Melty Storm"
>A raging tsunami of slime slams into Amphisbaena!
dwave 10,"se\ero_slime3.ogg"
lsp 2,":a;effect\012_01.bmp",0,0:print 10,70
lsp 2,":a;effect\012_02.bmp",0,0:print 10,70
lsp 2,":a;effect\012_03.bmp",0,0:print 10,70
lsp 2,":a;effect\012_04.bmp",0,0:print 10,70
lsp 2,":a;effect\012_05.bmp",0,0:print 10,70
lsp 2,":a;effect\012_06.bmp",0,0:print 10,70
csp 2:print 10,70
rnd2 %damage,2000,2500
dwave 3,"se\damage.ogg"
gosub *enemylife2
skillname ""
gosub *amphis001
goto *amphis_a



*amphis_a

rnd2 %ransu,1,4
if %ransu=1 gosub *amphis_a1:goto *common_main
if %ransu=2 gosub *amphis_a2:goto *common_main
if %ransu=3 gosub *amphis_a3:goto *common_main
if %ransu=4 && %owaza_count3a>4 gosub *amphis_a4:goto *common_main
skip -5



*amphis_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"If I cut you with this claw, you can't recombine!"
if %ransu=2 mov $sel1,"This high frequency claw will destroy your cells!"
if %ransu=3 mov $sel1,"Ahaha, your body is like paper!"
name $name
eng $sel1:$sel6\
name ""
skillname "High Frequency Claw"
dwave 1,"se\denpa1.ogg"
>Amphisbaena's high frequency claw cuts into Erubetie's body!
damage 1300,1800
skillname ""
if %mylife=0 sub %stack,1:return *amphis_h1
sub %stack,1
return



*amphis_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"A slime is weak against this..."
if %ransu=2 mov $sel1,"I'll vibrate the very air!"
if %ransu=3 mov $sel1,"Your body will be torn to shreds with this!"
name $name
eng $sel1:$sel6\
name ""
skillname "Vibration Wave"
dwave 1,"se\denpa1.ogg"
bg "bg\bg214.bmp",99,500,"system\lngtwave.dll/vwi"
>Vibrating her own armor at an incredible rate, the waves of pressure radiate out from Amphisbaena!
damage 1800,2300
skillname ""
if %mylife=0 sub %stack,1:return *amphis_h1
sub %stack,1
return



*amphis_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll shoot this shock wave into your face!"
if %ransu=2 mov $sel1,"If I direct all of the vibrations to the same location...!"
if %ransu=3 mov $sel1,"An impact at the speed of sound is more painful than any type of weapon!"
name $name
eng $sel1:$sel6\
name ""
skillname "Sonic Burst"
>Amphisbaena concentrates all of her vibrations to a single point, blasting a wave into Erubetie at the speed of sound!
dwave 1,"se\bom5.ogg"
vsp 700,0
bg white,10,1000
vsp 700,1
bg "bg\bg214.bmp",10,1000
mov %a_effect1,1
damage 2300,2800
skillname ""
if %mylife=0 sub %stack,1:return *amphis_h1
sub %stack,1
return



*amphis_a4

add %stack,1
mov %owaza_count3a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll destroy you on a cellular level!"
if %ransu=2 mov $sel1,"Vanish!"
if %ransu=3 mov $sel1,"I won't leave a single cell of you!"
name $name
eng $sel1:$sel6\
name ""
skillname "Pulse Field"
dwave 1,"se\laser.ogg"
lsp 2,":c;effect\020.bmp",0,0:print 10,400
csp 2:print 10,100
>Amphisbaena expands an electromagnetic field around her, microwaving everything!
mov %a_effect1,1
damage 2800,3500
skillname ""
if %mylife=0 sub %stack,1:return *amphis_h1
sub %stack,1
return



*amphis_onedari

>There is nothing to request!\
goto *amphis_main



*amphis_h1

name "Erubetie"
>I...I couldn't do it...\
name ""
if %battle_auto=1 skipoff
wait 1000
mov %battle,0
cspl 0,611
gosub *setwindow_01p
>Erubetie has been defeated by Amphisbaena...\
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov %hsean,1
mov %2717,%2717+1:if %2717=1 mov %count_koenemy,%count_koenemy+1
if %2717>%count_most mov %count_most,%2717:mov $count_mostname,$name
count 14,6
mov $bad1,"After being toyed with by Amphisbaena, Luka was killed."
gosub *face2
name $name
>And that's the end of the Queen of Slimes.@
>Next is...\
name ""
>After defeating Erubetie, Amphisbaena quickly leaves the tower...\
csp 700
sean_change "bg208"
goto *amphis_h



*amphis_h

mov %player,0
mov $bad2,""
if %2717=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>............\
name ""
>I'm still waiting in the garden, praying for the Four Heavenly Knights to succeed.@
>Suddenly, a voice calls out from behind me...\
lsp 700,":a;chara\amphis_st02.bmp",0,0:print 10,500
name $name
>I'll take the best prey...@
>Play with him, then kill him...\
name ""
name "Luka"
>Guh... Crap!\
name ""
>I jump up, and try to draw my sword...@
>But Amphisbaena binds me with her huge scissors before I can draw my blade.\
name $name
>Hehe... Now, I'll play with you.@
>And you know how females play with males, right...?\
name ""
name "Luka"
>Guh...!@>Get off!\
name ""
name $name
>I'll take you inside my oviduct...@
>And let you enjoy an imitation mating session!\
name ""
>A hole opens up in the center of her insect-like abdomen, revealing a fleshy interior unlike her metallic body.\
>She's going to bring my penis into that...?\
name "Luka"
>S...Sto... Ah!\
name ""
mov %hseanwave,16:hseanwave
cspl 690,699
lsp 700,":a;chara\amphis_h1.bmp",0,0:print 10,500
>With a wet noise, she slips me into her, raping me before I can manage to push her off me.\
>Her soft flesh wraps around my penis as I slip in, the wet walls letting me slip all the way inside.\
name "Luka"
>Ahh... No...\
name ""
name $name
>Hehehe... You're a human mating with an insect.@
>You must be feeling pathetic...@>But let me toy with you even more.\
>You know that my whole body is able to vibrate at incredible speeds, right?@
>If I use it like this...\
name ""
name "Luka"
>Ah... Eh...?\
name ""
mov %hseanwave,24:hseanwave
>In the next instant, Amphisbaena's body starts to vibrate!@
>The vibrations surround my penis, causing my lower body to tremble from the stimulation.\
name ""
name "Luka"
>Ahh!!\
name ""
name $name
>Ahaha... What an interesting reaction.@
>Just vibrate around your penis a little bit, and you scream!\
name ""
>With a laugh, she increases the speed of the vibration around my penis.@
>I feel my penis going numb with pleasure inside her oviduct.\
>The dull numbness spreads through the rest of my body, making it feel like I could leak inside her at any second.\
name "Luka"
>Ahhh!!!\
name ""
gosub *syasei1
lsp 700,":a;chara\amphis_h2.bmp",0,0
gosub *syasei2
>Unable to fight against the vibrations, she forces me to explode inside her.\
name "Luka"
>Ahh...\
name ""
name $name
>Ahaha... Did you come right away?@>No man can resist this, after all...@
>You'll be just like the others... Coming inside my oviduct, until you die from exhaustion!\
name ""
name "Luka"
>Noo... Hyaaa!\
name ""
>The vibrations in her oviduct get even more intense, sending the numbing pleasure into the rest of my body, paralyzing me.@
>Pulsing inside her, I can barely manage to moan as I reach another orgasm.\
gosub *syasei1:gosub *syasei2
>The numbing vibration dulls the pleasure, making my orgasm feel more like a forced ejaculation than anything else.@
>No sense of fulfillment...@> Just a humiliating milking into her oviduct.\
name $name
>Ahaha... Already pouring more inside?@
>Fill up my oviduct all the way, now...\
name ""
name "Luka"
>Ah... Hyaa!\
name ""
gosub *syasei1
lsp 700,":a;chara\amphis_h3.bmp",0,0
gosub *syasei2
>Yelling, my body continues climaxing against my will, shooting off more semen into her.@
>Unable to do anything with my paralyzed body, I'm just absorbed in the agonized pleasure.\
name "Luka"
>Hyaa!!!\
name ""
name $name
>Hehe... I love this...@
>Forcing men to come inside me as I vibrate...@>Watch them twist away under me as they exhaust themselves...\
name ""
name "Luka"
>Ahhh!!!\
name ""
gosub *syasei1
lsp 700,":a;chara\amphis_h4.bmp",0,0
gosub *syasei2
>My numb penis continues pulsing, ejaculating again after again in her.@
>The vibration doesn't stop, even during my climaxes.@> There's no escape...\
name "Luka"
>S...Stop... I'll die!\
name ""
gosub *syasei1:gosub *syasei2
>Despite my cries, I explode inside her oviduct again...\
>This isn't reproduction, or even her feeding on me...@
>She's just forcing me to orgasm to death.\
name $name
>Ahaha, you're going to die already?\
>But it feels good, doesn't it?@
>Haven't you always dreamed of orgasming to death?\
name ""
name "Luka"
>Hyaa!!!\
name ""
>My penis continues pulsing inside her...@
>But after so many ejaculations, nothing more comes out.\
name $name
>Oh my, already empty...@
>That just means the next world is ready for you.\
>Now come on... Hurry up and die!\
name ""
name "Luka"
>Aiie!!!\
name ""
>Even with nothing coming out, she doesn't stop the vibration...@
>At the same time, my body starts to spasm and convulse, overwhelmed by the ruthless vibration stimulus.\
name "Luka"
>Hyaa... Ah...\
name ""
>Then, as if a thread was cut, I suddenly lose feeling in my body.\
name "Luka"
>Ah...aa...\
name ""
>Unable to feel my hands or feet, my vision slowly dims black.@
>My thoughts slow, as my paralyzed self slips into an endless sleep.\
mov %hseanwave,0:hseanwave
name $name
>Ahaha, he died!@
>And he filled me up first, too...\
>Killing men is so fun! Hehehe.\
name ""
>Amphisbaena looks down on the corpse beneath her, and laughs.\
gosub *anten
>...............\
goto *badend



*tukuyomi_start

mov %player,4
mov $name,"Tsukuyomi"
mov $name2,"Tsukuyomi"
mov $lavel,"tukuyomi"
mov $tatie1,"tukuyomi_st01"
mov $tatie2,"tukuyomi_st02"
mov $tatie3,"tukuyomi_st03"
mov $tatie4,"tukuyomi_st02"
mov $haikei,"bg209"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,30000
if %nanido=2 mov %max_enemylife,30000
if %nanido=3 mov %max_enemylife,30000
if %nanido=0 mov %max_enemylife,2
if %nanido=1 mov %henkahp1,23000
if %nanido=2 mov %henkahp1,23000
if %nanido=3 mov %henkahp1,23000
if %nanido=0 mov %henkahp1,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,0
mov %music,13
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-260
mov %tukix,300
name "Tamamo"
>.........\
name ""
>Tamamo stares at the artificial monster in front of her.\
lsp 700,":a;chara\tamamo_st01.bmp",-200,0
lsp 701,":a;chara\tukuyomi_st12.bmp",260,0:print 10,500
name "Tamamo"
>I see...@
>You truly were created with my cells, weren't you?\
>Your magic energy is just like mine...\
name ""
name $name
>In that case, then you should also know that you can't beat me.@
>The bionics in my body increased the power, leaving me above you...\
name ""
lsp 700,":a;chara\tamamo_st04.bmp",-200,0:print 10,500
name "Tamamo"
>But!@> My tails are fluffier!\
name ""
name $name
>Hmph...@>Just a stupid fox, after all.@
>It seems like you'll need to feel some pain before you acknowledge it.\
bgm "bgm\sitenno.ogg"
>Also... There's one more attendee to this party that needs to be dealt with.@
>I'll dispose of you quickly, then take care of him...\
name ""
mov %sinkou,1
csp 701
gosub *face1
goto *common_main



*tukuyomi001

lsp 700,":a;chara\tamamo_st03.bmp",-200,0
lsp 701,":a;chara\tukuyomi_st12.bmp",260,0:print 10,500
name "Tamamo"
>Hum hum...\
name ""
name $name
>Have you realized that you're no match for me?@
>Shall I deliver the final blow soon?\
name ""
lsp 700,":a;chara\tamamo_st01.bmp",-200,0:print 10,500
name "Tamamo"
>You wouldn't want to be late, would you?@
>...To Promestein's rebellion.\
name ""
lsp 701,":a;chara\tukuyomi_st11.bmp",260,0:print 10,500
name $name
>...How do you know about that?\
name ""
name "Tamamo"
>I've been decoding the discs from one of Promestein's laboratories.@
>In absolute secret, she has been developing an anti-angel weapon.\
>From the very start, Promestein has been planning to rebel against Ilias.\
>You Next Dolls and the Chimeric Beasts were all created for that purpose...\
name ""
name $name
>Well, that's about it.\
>...Our main purpose was to destroy you Four Heavenly Knights.@
>But after that, we were also developed to participate in war against the Heavens.\
name ""
name "Tamamo"
>Hmph...@>Internal strife about what happens next, before even finishing your current fight?\
>You Heavenly fools haven't changed at all since the Great Monster Wars.\
>Repeating the mistakes of the past, and suffering numerous defeats because of it?\
>Neither Ilias nor the other angels seem to pay attention to history...\
name ""
name $name
>Great Monster Wars?@
>They were a thousand years ago...@>You act like you were a part of them.\
name ""
name "Tamamo"
>...Well, before I finish you, I'll admit that you're strong.\
>I was hoping to save this until the fight with Ilias, but you're leaving me no other choice...\
name ""
name $name
>...Trying to bluff at this point?@
>Do you think I'll go on the defense and let you slip away?\
>You don't have anything left.@
>I was made from your cells, I know best.\
name ""
lsp 700,":a;chara\tamamo_st05.bmp",-100,20:print 10,500
name "Tamamo"
>No, you're the one who doesn't understand.\
>You're just an inferior copy...@
>I pity you...@>A sacrificial pawn, without even knowing it.\
name ""
name $name
>I'm tired of listening to your bluffs.\
name ""
mov %sinkou,2
csp 701
gosub *face1
goto *common_main



*tukuyomi_v

if %nanido=0 goto *tukuyomi_v2
gosub *mp
skillname "Word of Dispel"
lsp 700,":a;chara\tamamo_st05.bmp",-100,20
lsp 701,":a;chara\tukuyomi_st11.bmp",260,0:print 10,500
name "Tamamo"
>I ask thee, eternal time...\
name ""
lsp 701,":a;chara\tukuyomi_st13.bmp",260,0:print 10,500
name $name
>That's...@>Alice's Word of Dispel?@
>Why are you using that?\
name ""
name "Tamamo"
>My body, shackled by the powers of creation, I beseech thee.\
name ""
name $name
>N...No!@
>Y...You can't truly be!?\
name ""
name "Tamamo"
>Return my true body to me--\
name ""
skillname ""
>A dazzling light fills the tower...\
dwave 1,"se\flash.ogg"
csp 700
lsp 2,":c;system\ef_white.jpg",0,0:print 10,500
lsp 701,":a;chara\tamamo_st51.bmp",-200,0
lsp 700,":a;chara\tukuyomi_st13.bmp",260,0
lsp 2,":a;effect\014_01.bmp",0,0
lsp 2,":a;effect\014_02.bmp",0,0
lsp 2,":a;effect\014_03.bmp",0,0
lsp 2,":a;effect\014_04.bmp",0,0
lsp 2,":a;effect\014_05.bmp",0,0
lsp 2,":a;effect\014_06.bmp",0,0
lsp 2,":a;effect\014_07.bmp",0,0
csp 2
print 10,500
>An incredible magic power descends on Tamamo.\
name $name
>W...What the... What is that power?\
name ""
dwave 1,"se\kodou.ogg"
>An overwhelming pressure assaults Tsukuyomi's very being, forcing her to take a step back.\
name $name
>W...When were you sealed by the Six Ancestors' Great Seal?@
>No... Are you one of--\
name ""
lsp 701,":a;chara\tamamo_st52.bmp",-200,0:print 10,500
name "Tamamo no Mae"
>...I am one of the Six Ancestors, Tamamo no Mae.@
>One of the original six monsters, the beautiful golden fur Kitsune...\
name ""
name $name
>S...Six Ancestors!?\
name ""
>The legendary monsters who served the original Monster Lord...\
>After the Great Monster Wars, the six of them were sealed away along with her!\
name $name
>W...Why didn't Promestein tell me!?@
>If that's true, then I'm just a...\
name ""
name "Tamamo no Mae"
>A sacrifice.@
>Oh pitiful pawn, I shall annihilate you.\
lsp 701,":a;chara\tamamo_st51.bmp",-200,0:print 10,500
>--Disappear.\
name ""
csp 701
lsp 700,":a;chara\tukuyomi_st03.bmp",0,0:print 10,500
skillname "Nine Tails Funeral Pyre"
lsp 2,":a;effect\014_08.bmp",0,0
lsp 2,":a;effect\014_09.bmp",0,0
lsp 2,":a;effect\014_10.bmp",0,0
lsp 2,":a;effect\014_11.bmp",0,0
lsp 2,":a;effect\014_12.bmp",0,0
lsp 2,":a;effect\014_13.bmp",0,0
lsp 2,":a;effect\014_14.bmp",0,0
dwave 10,"se\fire4.ogg"
lsp 2,":a;effect\014_01.bmp",0,0:print 10,10
lsp 2,":a;effect\014_02.bmp",0,0:print 10,10
lsp 2,":a;effect\014_03.bmp",0,0:print 10,10
lsp 2,":a;effect\014_04.bmp",0,0:print 10,10
lsp 2,":a;effect\014_05.bmp",0,0:print 10,10
lsp 2,":a;effect\014_06.bmp",0,0:print 10,10
lsp 2,":a;effect\014_07.bmp",0,0:print 10,10
lsp 2,":a;effect\014_08.bmp",0,0:print 10,10
lsp 2,":a;effect\014_09.bmp",0,0:print 10,10
lsp 2,":a;effect\014_10.bmp",0,0:print 10,10
lsp 2,":a;effect\014_11.bmp",0,0:print 10,10
lsp 2,":a;effect\014_12.bmp",0,0:print 10,10
lsp 2,":a;effect\014_13.bmp",0,0:print 10,10
lsp 2,":a;effect\014_14.bmp",0,0:print 10,10
csp 700
csp 2
bg black,10,500
>The crimson flames incinerate everything!
dwave 2,"se\damage2.ogg"
quake 10,600
rnd2 %damage,40000,50000:gosub *enemylife2
skillname ""
lsp 700,":a;chara\tukuyomi_st03.bmp",0,0
bg "bg\bg209.bmp",10,2000
goto *tukuyomi_v2



*tukuyomi_v2

dwave 1,"se\escape.ogg"
csp 700:print 10,500
>Tsukuyomi disintegrates, all trace of her gone.\
mov %viclose,1:gosub *victory
mov %2418,1
mov %player,0
goto *sean0405



*tukuyomi_kousan

gosub *kousan_syori
>Tamamo surrenders to Tsukuyomi...\
gosub *face2
name $name
>Of course, you had no other choice.@
>I'm above you in all ways, after all...\
name ""
goto *tukuyomi_a



*tukuyomi_main

gosub *cmd_main
if %cmd1=11 goto *tukuyomi_attack
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *tukuyomi_kousan
if %cmd1=16 goto *tukuyomi_onedari
if %cmd1=17 goto *tukuyomi_skill
goto *tukuyomi_main



*tukuyomi_attack

mov %before_action,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Dorya!"
if %ransu=2 mov $sel1,"Hore!"
if %ransu=3 mov $sel1,"Haa!"
name "Tamamo"
eng $sel1:$sel6\
name ""
>Tamamo attacks!
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\dageki.ogg"
rnd2 %damage,600,700
gosub *enemylife2
goto *tukuyomi_a



*tukuyomi_skill

saveoff
textoff
cspl 3,7:cspl 601,608
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
gosub *setwindow_04
if %mp>1 strsp 601,"Tail Attack - 2",70,418,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 601,21
if %mp<2 strsp 601,"Tail Attack - 2",70,418,9,1,20,20,0,0,1,1,#bbbbbb
if %mp>2 strsp 602,"Tamamo Punch - 3",70,445,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 602,22
if %mp<3 strsp 602,"Tamamo Punch - 3",70,445,9,1,20,20,0,0,1,1,#bbbbbb
if %mp>4 strsp 603,"Nine Moons - 5",70,472,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,23
if %mp<5 strsp 603,"Nine Moons - 5",70,472,8,1,20,20,0,0,1,1,#bbbbbb
if %mp>7 strsp 604,"Moonlight Cannon - 8",70,499,11,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 604,24
if %mp<8 strsp 604,"Moonlight Cannon - 8",70,499,11,1,20,20,0,0,1,1,#bbbbbb
if %sinkou=2 strsp 605,"Word of Dispel - 0",400,418,10,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 605,25
btnwait2 %cmd1
if %mon_labo_on=1 && %cmd1=4 textoff:screen_clear:return *monster_labo
if %zukanon>0 && %cmd1=4 textoff:return *zukan_commonkaisou0
if %cmd1=0 skip -3
if %cmd1<=-2 skip -4
cspl 3,7
cspl 601,610
gosub *setwindow_02p
if %cmd1=21 goto *tukuyomi_skill1
if %cmd1=22 goto *tukuyomi_skill2
if %cmd1=23 goto *tukuyomi_skill3
if %cmd1=24 goto *tukuyomi_skill4
if %cmd1=25 goto *tukuyomi_v
texton
btndef clear
if %cmd1=-1 goto *tukuyomi_main



*tukuyomi_skill1

rnd2 %ransu,1,2
if %ransu=1 mov $sel1,"Take this! My fluffy tail!"
if %ransu=2 mov $sel1,"Have a taste of my tail!"
name "Tamamo"
eng $sel1:$sel6\
name ""
mov %mp,%mp-2
gosub *mp
skillname "Tail Attack"
>Filling her tail with the power of the earth, Tamamo slams it into Tsukuyomi!
dwave 1,"se\tuki.ogg"
lsp 2,":a;effect\023_01.bmp",0,0:print 10,50
lsp 2,":a;effect\023_02.bmp",0,0:print 10,50
lsp 2,":a;effect\023_03.bmp",0,0:print 10,50
lsp 2,":a;effect\023_04.bmp",0,0:print 10,50
csp 2:print 10,50
rnd2 %damage,1000,1200
dwave 1,"se\damage2.ogg"
gosub *enemylife2
skillname ""
goto *tukuyomi_a



*tukuyomi_skill2

rnd2 %ransu,1,2
if %ransu=1 mov $sel1,"I'll crush you with the power of the earth!"
if %ransu=2 mov $sel1,"Dorya! A true punch!"
name "Tamamo"
eng $sel1:$sel6\
name ""
mov %mp,%mp-3
gosub *mp
skillname "Tamamo Punch"
>Filling her fist with the power of the earth, Tamamo slams it into Tsukuyomi!
dwave 1,"se\dageki.ogg"
lsp 2,":a;effect\016_01.bmp",180,80:print 10,50
lsp 2,":a;effect\016_02.bmp",180,80:print 10,50
lsp 2,":a;effect\016_03.bmp",180,80:print 10,50
lsp 2,":a;effect\016_04.bmp",180,80:print 10,50
lsp 2,":a;effect\016_05.bmp",180,80:print 10,50
csp 2:print 10,50
rnd2 %damage,1200,1500
dwave 1,"se\damage2.ogg"
gosub *enemylife2
skillname ""
goto *tukuyomi_a



*tukuyomi_skill3

rnd2 %ransu,1,2
if %ransu=1 mov $sel1,"This is my killer move!"
if %ransu=2 mov $sel1,"I'll blast you with my powerful move!"
name "Tamamo"
eng $sel1:$sel6\
name ""
mov %mp,%mp-5
gosub *mp
skillname "Nine Moons"
eng "All nine of Tamamo's tails race toward Tsukuyomi!":$sel6/
wait 100
dwave 1,"se\tuki.ogg"
lsp 2,":a;effect\023_01.bmp",0,0:print 10,50
lsp 2,":a;effect\023_02.bmp",0,0:print 10,50
lsp 2,":a;effect\023_03.bmp",0,0:print 10,50
lsp 2,":a;effect\023_04.bmp",0,0:print 10,50
dwave 1,"se\tuki.ogg"
lsp 2,":a;effect\023_01.bmp",200,100:print 10,50
lsp 2,":a;effect\023_02.bmp",200,100:print 10,50
lsp 2,":a;effect\023_03.bmp",200,100:print 10,50
lsp 2,":a;effect\023_04.bmp",200,100:print 10,50
dwave 1,"se\tuki.ogg"
lsp 2,":a;effect\023_01.bmp",50,-50:print 10,50
lsp 2,":a;effect\023_02.bmp",50,-50:print 10,50
lsp 2,":a;effect\023_03.bmp",50,-50:print 10,50
lsp 2,":a;effect\023_04.bmp",50,-50:print 10,50
dwave 1,"se\tuki.ogg"
lsp 2,":a;effect\023_01.bmp",-200,100:print 10,50
lsp 2,":a;effect\023_02.bmp",-200,100:print 10,50
lsp 2,":a;effect\023_03.bmp",-200,100:print 10,50
lsp 2,":a;effect\023_04.bmp",-200,100:print 10,50
dwave 1,"se\tuki.ogg"
lsp 2,":a;effect\023_01.bmp",-50,-50:print 10,50
lsp 2,":a;effect\023_02.bmp",-50,-50:print 10,50
lsp 2,":a;effect\023_03.bmp",-50,-50:print 10,50
lsp 2,":a;effect\023_04.bmp",-50,-50:print 10,50
csp 2:print 10,50
\
dwave 1,"se\damage.ogg"
rnd2 %damage,200,250
mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\damage.ogg"
rnd2 %damage,200,250
mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\damage.ogg"
rnd2 %damage,200,250
mov %damage_nobr,2:gosub *enemylife2
textclear
dwave 1,"se\damage.ogg"
rnd2 %damage,200,250
mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\damage.ogg"
rnd2 %damage,200,250
mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\damage.ogg"
rnd2 %damage,200,250
mov %damage_nobr,2:gosub *enemylife2
textclear
dwave 1,"se\damage.ogg"
rnd2 %damage,200,250
mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\damage.ogg"
rnd2 %damage,200,250
mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\damage.ogg"
rnd2 %damage,200,250
mov %damage_nobr,2:gosub *enemylife2
\
skillname ""
goto *tukuyomi_a



*tukuyomi_skill4

name "Tamamo"
>Charge with the power of the moon...@
>This is my final skill!\
name ""
mov %mp,%mp-8
gosub *mp
skillname "Moonlight Cannon"
>A laser of moonlight energy shoots off from the tip of Tamamo's tail!
dwave 1,"se\laser2.ogg"
lsp 2,":c;effect\019.bmp",0,0:print 10,500
flushout 1000
vsp 700,0
csp 2
vsp 700,1
bg "bg\bg209.bmp",10,1000
dwave 1,"se\damage2.ogg"
rnd2 %damage,2000,3000
gosub *enemylife2
skillname ""
goto *tukuyomi_a



*tukuyomi_a

if %nanido=0 && %enemylife<1 goto *tukuyomi_v2
rnd2 %ransu,1,4
if %ransu=1 gosub *tukuyomi_a1:goto *common_main
if %ransu=2 gosub *tukuyomi_a2:goto *common_main
if %ransu=3 gosub *tukuyomi_a3:goto *common_main
if %ransu=4 && %owaza_count3a>4 gosub *tukuyomi_a4:goto *common_main
skip -5



*tukuyomi_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Can you even see these attacks?"
if %ransu=2 mov $sel1,"My claws can pierce through your earth defenses!"
if %ransu=3 mov $sel1,"This is the power of the earth? It's awfully vulnerable..."
name $name
eng $sel1:$sel6\
name ""
skillname "Random Claw Attack"
>Tsukuyomi lashes out randomly with her claws and fangs!
damage 2500,3000
skillname ""
if %mylife=0 sub %stack,1:return *tukuyomi_h1
if %enemylife<%henkahp1 && %sinkou=1 sub %stack,1:return *tukuyomi001
sub %stack,1
return



*tukuyomi_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Can I blow that tiny body away with a single attack?"
if %ransu=2 mov $sel1,"Can your frail little body even withstand this?"
if %ransu=3 mov $sel1,"My roar can smash the earth itself!"
name $name
eng $sel1:$sel6\
name ""
skillname "Roar of Destruction"
dwave 1,"se\bom1.ogg"
>Tsukuyomi creates a wave of destruction with her roar!
wait 300
flushout 1000
vsp 700,0
bg white,10,1000
wait 1000
vsp 700,1
bg "bg\bg209.bmp",10,1000
mov %a_effect1,1
damage 2500,3000
skillname ""
if %mylife=0 sub %stack,1:return *tukuyomi_h1
if %enemylife<%henkahp1 && %sinkou=1 sub %stack,1:return *tukuyomi001
sub %stack,1
return



*tukuyomi_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Ancient magics that have faded from this world... Surprisingly easy to reproduce."
if %ransu=2 mov $sel1,"How does it feel to be attacked by one of your own skills?"
if %ransu=3 mov $sel1,"I can even borrow the power of the earth..."
name $name
eng $sel1:$sel6\
name ""
skillname "Yin-yang: Moonlit Night"
dwave 1,"se\earth1.ogg"
quake 10,1500
>Tsukuyomi's magic causes a violent earthquake!
mov %a_effect1,1
damage 3000,3500
skillname ""
if %mylife=0 sub %stack,1:return *tukuyomi_h1
if %enemylife<%henkahp1 && %sinkou=1 sub %stack,1:return *tukuyomi001
sub %stack,1
return



*tukuyomi_a4

add %stack,1
mov %owaza_count3a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Sorry... But I'm better than the original."
if %ransu=2 mov $sel1,"I'll burn you to ashes with your own skill!"
if %ransu=3 mov $sel1,"Become ashes!"
name $name
eng $sel1:$sel6\
name ""
skillname "Kitsune Arts: Roaring Flame Ring"
dwave 1,"se\fire1.ogg"
>A ring of hellfire burns around Tamamo!
mov %a_effect1,1
damage 3500,4000
skillname ""
if %mylife=0 sub %stack,1:return *tukuyomi_h1
if %enemylife<%henkahp1 && %sinkou=1 sub %stack,1:return *tukuyomi001
sub %stack,1
return



*tukuyomi_onedari

>There is nothing to request!\
goto *tukuyomi_main



*tukuyomi_h1

name "Tamamo"
>No more...\
name ""
if %battle_auto=1 skipoff
wait 1000
mov %battle,0
cspl 0,611
gosub *setwindow_01p
>Tamamo has been defeated by Tsukuyomi...\
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov %hsean,1
mov %2718,%2718+1:if %2718=1 mov %count_koenemy,%count_koenemy+1
if %2718>%count_most mov %count_most,%2718:mov $count_mostname,$name
count 14,4
mov $bad1,"After being raped by Tsukuyomi, Luka's semen is squeezed until his death."
gosub *face2
name $name
>A worthless opponent...@
>Oh, I still have another one left...\
name ""
>After defeating Tamamo, Tsukuyomi quickly leaves the tower...\
csp 700
sean_change "bg208"
goto *tukuyomi_h



*tukuyomi_h

mov %player,0
mov $bad2,""
if %2718=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>..............\
name ""
>I'm still waiting in the garden, praying for the Four Heavenly Knights to succeed.@
>Suddenly, a voice calls out from behind me...\
lsp 700,":a;chara\tukuyomi_st02.bmp",0,0:print 10,500
name $name
>Now... It's time for the climax of tonight's party.@
>I'll have you give me a feast...\
name ""
name "Luka"
>Guh... Crap!\
name ""
>I jump up, and try to draw my sword...@
>But before I can draw my sword, Tsukuyomi pins me to the ground.\
name $name
>I was forced to use a little power tonight...@
>Shall I have you replenish it for me?\
name ""
name "Luka"
>S...Stop!\
name ""
>She tears open my pants, revealing my naked lower body.@
>With a sadistic smile, Tsukuyomi inspects my defenseless body.\
name $name
>Now, allow me to extract your semen...\
name ""
dwave 1,"se\ero_makituki3.ogg"
mov %hseanwave,20:hseanwave
cspl 690,699
lsp 700,":a;chara\tukuyomi_h1.bmp",0,0:print 10,500
>A strange looking organ reaches out from Tsukuyomi's inorganic body.@
>From it, a mass of squirming tentacles covers my penis!\
name "Luka"
>Haa... W...What is this...?\
name ""
>The squishy tentacles wrap up my penis, sending shivers up my spine from the touch of their unique texture.\
name $name
>This... It's my slightly unique semen extraction organ.@
>I can draw out all of a male's semen with these tentacles.\
>I guarantee it will feel amazing, so please ejaculate without holding back.\
name ""
name "Luka"
>Ahhh!!!\
name ""
>The innumerable tentacles rub and stroke my penis from every direction.@
>My body spasms under her as the pleasure hits me to my very core.\
>After only a few moments, I can already feel my body desiring release.\
name $name
>Now, hurry up and come.@
>I'm hungry...\
name ""
name "Luka"
>Ah...!\
name ""
>The tentacles' assault gets even more intense, this time focusing most on my tip...@
>At the same time, the tentacles stroke and massage my shaft.\
>The double assault on my penis leaves me at my threshold after what seems like only seconds...\
name "Luka"
>Ah... Haa...\
name ""
gosub *syasei1
lsp 700,":a;chara\tukuyomi_h2.bmp",0,0
gosub *syasei2
>Still drowning in the sensations from the squirming tentacles, I come, exploding into the writhing mass.\
name "Luka"
>Ahh...\
name ""
>Tsukuyomi looks down on me with a cold gaze as my body twitches in the afterglow.\
name $name
>The human reproduction system is so strange...@
>Even when not being used for it's purpose, it will still react just from other various stimuli.\
>Due to that, it's easy to feed on their semen.\
>The only reason you're in this position is because of that thing dangling between your legs, you know?\
name ""
name "Luka"
>Haa!!!\
name ""
mov %hseanwave,22:hseanwave
>Tsukuyomi's tentacles continue stroking my penis.@
>Their touch on my sensitive glans elicits an instant moan from me.\
name $name
>Oh, that was rude of me...@
>I forgot that even if a man is being fed on, it's still their ultimate joy to be stimulated like so.\
>Well? It feels good, doesn't it?@
>Are you overjoyed at being milked like this?\
name ""
name "Luka"
>Ahhh!!!\
name ""
>More tentacles swarm around my penis.@
>As they rub and stroke me with their soft tips, I feel my body relaxing in surrender to her touch.\
name $name
>It's too much, isn't' it?@
>Stop resisting, and let it go...\
name ""
name "Luka"
>N...No... Ahh...\
name ""
gosub *syasei1
lsp 700,":a;chara\tukuyomi_h3.bmp",0,0
gosub *syasei2
>As if prompted by Tsukuyomi, I come again.@
>The release of orgasm fills my slack body, the touch of her tentacles dominating my mind.\
name "Luka"
>Ahh...\
name ""
>My vision suddenly starts to blur after my orgasm.@
>This merciless stroking is taking more energy than usual from me...@>If this goes on much longer, I could die.\
name "Luka"
>S...Stop...\
name ""
name $name
>After looking so happy coming, you ask to stop now?@
>Males are so silly...\
>Now let me see more of that disgraceful behavior as I milk you dry...\
name "Luka"
>No... Stop...!\
name ""
>As her ruthless tentacles continue their assault, I try to resist...@
>But despite my will, the only thing I accomplish is reaching another climax.\
gosub *syasei1
lsp 700,":a;chara\tukuyomi_h4.bmp",0,0
gosub *syasei2
name "Luka"
>Haa...\
name ""
name $name
>Hehe... Your semen is just food to me now.@
>There's no reproduction going to happen...\
>Far from leaving any children, everything of you ends here, swallowed by me...\
name ""
name "Luka"
>Ahh...\
name ""
gosub *syasei1:gosub *syasei2
>The ruthless milking leaves me unable to move a finger...@
>On the verge of passing out, I can't even think coherently any longer.\
name $name
>Hehe, you're just like a cripple.@
>Unable to do anything but moan and come.\
>With one more, you'll be dead...@
>Allow me to send you off nicely.\
name ""
name "Luka"
>Haa...\
name ""
>Her tentacles squeeze and rub my tip, clearly aiming to finish me off...\
gosub *syasei1:gosub *syasei2
>Responding to her, a few drops of semen leak out as I fade into darkness...\
mov %hseanwave,0:hseanwave
name $name
>Hehehe... Humans are so stupid.@
>Dying just from touching their genitals some...\
>If you want to hate something, hate that penis of yours.@
>If it wasn't so easy to manipulate, this wouldn't have happened to you...\
name ""
>With a smile, Tsukuyomi leaves the area with the corpse.\
gosub *anten
>..............\
goto *badend



*arcen_start

mov %player,5
mov $name,"Arc-En-Ciel"
mov $name2,"Arc-En-Ciel"
mov $lavel,"arcen"
mov $tatie1,"arcen_st01"
mov $tatie2,"arcen_st02"
mov $tatie3,"arcen_st03"
mov $tatie4,"arcen_st02"
mov $haikei,"bg215"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,45000
if %nanido=2 mov %max_enemylife,45000
if %nanido=3 mov %max_enemylife,45000
if %nanido=0 mov %max_enemylife,4
if %nanido=1 mov %henkahp1,40000
if %nanido=2 mov %henkahp1,40000
if %nanido=3 mov %henkahp1,40000
if %nanido=0 mov %henkahp1,3
if %nanido=1 mov %henkahp2,35000
if %nanido=2 mov %henkahp2,35000
if %nanido=3 mov %henkahp2,35000
if %nanido=0 mov %henkahp2,2
if %nanido=1 mov %henkahp3,30000
if %nanido=2 mov %henkahp3,30000
if %nanido=3 mov %henkahp3,30000
if %nanido=0 mov %henkahp3,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,0
mov %music,4
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-270
mov %tukix,300
name $name
>Oh, that's some good spirit you're showing.@
>It looks like you truly weren't at your best in the Monster Lord's Castle.\
>Even still, my strength is greater. Even when you're in perfect condition!\
>I'll prove it to you, Granberia!\
name ""
name "Granberia"
>Come, Arc-En-Ciel!@
>I'll show you the power of a Cursed Sword master!\
name ""
mov %sinkou,1
csp 701
gosub *face1
goto *common_main



*arcen001

lsp 700,":a;chara\granberia_st01.bmp",-200,0
lsp 701,":a;chara\arcen_st12.bmp",-160,0:print 10,500
name $name
>Look upon my power!\
>The most advanced of bionics have improved my strength!@
>My re-engineered synapses have increased my speed beyond anything you can match!\
>Everything of mine is greater than yours!\
name ""
lsp 700,":a;chara\granberia_st04.bmp",-200,0:print 10,500
name "Granberia"
>Are you so proud of your artificial body...?@
>You didn't earn any of that power, it was simply given to you.\
name ""
name $name
>...Yes, I am proud!@
>I was created simply to fight!\
>This is the meaning of my existence!@
>I was created to fight, I was created to win!\
name ""
mov %sinkou,2
csp 701
gosub *face1
goto *common_main



*arcen002

lsp 700,":a;chara\granberia_st01.bmp",-200,0
lsp 701,":a;chara\arcen_st12.bmp",-160,0:print 10,500
name $name
>Do you understand the splendor of this power?@
>The ultimate nature of my body!?\
name ""
name "Granberia"
>...Quit with the acting.\
name ""
name $name
>Acting... You say?\
name ""
lsp 700,":a;chara\granberia_st04.bmp",-200,0:print 10,500
name "Granberia"
>I can tell...@>You aren't proud of anything.@
>Your strength, your body...@>Both were just handed to you.\
name ""
lsp 701,":a;chara\arcen_st11.bmp",-160,0:print 10,500
name $name
>..........\
>...Why do you think that?\
name ""
lsp 700,":a;chara\granberia_st01.bmp",-200,0:print 10,500
name "Granberia"
>I've fought against many opponents with this sword of mine.@
>Naturally, I've come up against many who were just as boastful of themselves.\
>But I've never heard such empty words as the ones coming from you.@
>Far from being proud of your body...@> You hate it.\
name ""
name $name
>You're wrong, Granberia.@
>I thought you fought with your sword, not your words.\
name ""
lsp 700,":a;chara\granberia_st04.bmp",-200,0:print 10,500
name "Granberia"
>Oh, just a new hobby...\
name ""
>It's true this isn't like me...@
>Perhaps Luka is rubbing off on me.\
mov %sinkou,3
csp 701
gosub *face1
goto *common_main



*arcen003

lsp 700,":a;chara\granberia_st01.bmp",-200,0
lsp 701,":a;chara\arcen_st11.bmp",-160,0:print 10,500
name "Granberia"
>...You said you were born with the strongest of bodies, right?@
>You think yourself already perfect, with no need to train and grow stronger...\
>But in truth, your body has no potential. You can't grow any stronger than you are now.@
>As a warrior, your circumstances are horrible.\
name ""
name $name
>...What are you blabbering about?\
name ""
lsp 700,":a;chara\granberia_st02.bmp",-200,0:print 10,500
name "Granberia"
>...A horrible misfortune, as you were given the soul of a warrior.\
>Forced to suffer the emptiness that comes when further progression in strength is impossible...\
>You suffer every day, knowing you are stuck as you are, eternally stagnant.\
name ""
name $name
>............\
name ""
name "Granberia"
>...Are you jealous?@
>Of life that is weak and powerless... But filled with infinite potential?\
>Honing and training your body and skills, so that you can grow stronger and fight even more powerful enemies...\
lsp 700,":a;chara\granberia_st04.bmp",-200,0:print 10,500
>No matter how much you want it, you'll never have it.\
name ""
lsp 701,":a;chara\arcen_st13.bmp",-160,0:print 10,500
name $name
>...How could I be jealous!?@
>My body is already perfect!\
>You cannot do a thing against me!\
name ""
lsp 700,":a;chara\granberia_st01.bmp",-200,0:print 10,500
name "Granberia"
>...Still trying to fool yourself.@
>As a warrior, you're pathetic.\
>If you're so intent on denying it, I'll show you...\
lsp 700,":a;chara\granberia_st02.bmp",-200,0:print 10,500
>The power of a warrior who grows, striving to ever higher heights to beat the powerful foes before them!\
name ""
name $name
>Yes, show it to me.@
>If such a thing is even possible!\
name ""
mov %sinkou,4
csp 701
gosub *face1
goto *common_main



*arcen_v

if %nanido=0 goto *arcen_v2
name "Granberia"
>First, infuse wind...\
name ""
dwave 2,"se\wind2.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,200
csp 2:print 10,200
>Granberia condenses the power of wind into her sword.@
>Though she's only seen it once, she should be able to imitate it...\
name $name
>A basic magic sword attack?@
>Do you think you can pierce my armor with a blade of wind?\
name ""
name "Granberia"
>Next is earth...\
name ""
dwave 2,"se\earth1.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,200
csp 2:print 10,200
>Infusing earth into her sword next, Granberia's sword starts to shake.@
>She grabs hold of it, restraining it as she continues...\
name $name
>A double magic sword skill?@
>No... This skill...\
name ""
>Of course Arc-En-Ciel has data from the battles in the Monster Lord's Castle.\
>But this skill isn't assigned to Granberia...\
name "Granberia"
eng "Then water...":$sel6/
dwave 2,"se\aqua2.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,200
csp 2:print 10,200
@
>Guh... Damn it, it's already difficult to control...!\
name ""
name $name
>Fool... As if I'd let you!\
name ""
dwave 1,"se\miss_aqua.ogg"
>Granberia dodges with her serene state as Arc-En-Ciel attacks!\
name $name
>Tch...!\
name ""
>Since she already summoned the power of water, she was able to evade the attack.\
>If she was still on earth and wind, she wouldn't have been able to dodge...\
name "Granberia"
eng "Last is fire...!":$sel6/
dwave 2,"se\fire2.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,200
csp 2:print 10,200
\
>Luka... You really are incredible.@
>Mastering this skill as a human...!\
name ""
name $name
>I'll pulverize you first!\
name ""
name "Granberia"
>I'll borrow your skill, Luka...!\
name ""
skillname "Quadruple Giga"
>The power of the four spirits overlap and amplify each other, exploding in a torrent of power!\
wait 500
dwave 1,"se\karaburi.ogg"
lsp 2,":c;effect\003.bmp",0,0:print 1
wait 300
dwave 3,"se\earth1.ogg"
lsp 2,":a;effect\earth.bmp",0,0:print 1
wait 100
dwave 5,"se\fire2.ogg"
lsp 2,":a;effect\fire.bmp",0,0:print 1
wait 100
dwave 4,"se\aqua2.ogg"
lsp 2,":a;effect\aqua.bmp",0,0:print 1
wait 100
dwave 2,"se\wind2.ogg"
lsp 2,":a;effect\wind.bmp",0,0:print 1
wait 100
csp 2:print 18,500,"system\mask01.jpg"
dwave 1,"se\bom3.ogg"
quake 10,2000
>The power to crush anything slams into Arc-En-Ciel!
dwave 1,"se\damage2.ogg"
rnd2 %damage,40000,50000:gosub *enemylife2
skillname ""
wait 500
name $name
>Guh... Splendid!\
name ""
dwave 1,"se\down.ogg"
csp 700:print 10,500
>Arc-En-Ciel collapses to the floor.\
bgm "bgm\hutuu2.ogg"
lsp 700,":a;chara\granberia_st01.bmp",-200,0
lsp 701,":a;chara\arcen_st11.bmp",-160,0:print 10,500
name $name
>...It's as you said.@
>I hate this stunted body.\
name ""
>There's no need to finish her off, her body is already destroyed.@
>But Granberia still brings forth her sword.\
name $name
>It would be better to have been as Rapunzel and Hainuwele, with broken minds.\
>But to infuse me with a warrior's soul...?@
>Nothing but suffering...\
name ""
name "Granberia"
>In that case, why not find a new path in life?\
name ""
name $name
>No, that's impossible.@
>I only have five years until this body ceases to operate.\
>No matter what, my life would be short.@
>The price paid for this ultimate body...\
name ""
lsp 700,":a;chara\granberia_st04.bmp",-200,0:print 10,500
name "Granberia"
>I see...@> A further cruelness.\
name ""
name $name
>Honing your body and mind, overcoming strong opponents and becoming stronger yourself...\
>I wanted to taste it, just once.\
>But once I finally admitted it to myself, I realized it was impossible.@
>...I am utterly cursed.\
name ""
lsp 700,":a;chara\granberia_st01.bmp",-200,0:print 10,500
name "Granberia"
>............\
name ""
lsp 701,":a;chara\arcen_st12.bmp",-160,0:print 10,500
name $name
>But I was blessed, right at the end.@
>That was splendid, Granberia.\
>My wish was to fight the Hero Luka...\
name ""
name "Granberia"
>...If you had fought him first, you may have been able to find salvation.\
name ""
name $name
>No...@>That's all in the past...@
>I don't want anything any longer...@>I'm...\
name ""
goto *arcen_v2



*arcen_v2

dwave 1,"se\escape.ogg"
csp 701:print 10,500
>Arc-En-Ciel dies...\
csp 700:print 10,500
mov %viclose,1:gosub *victory
mov %2419,1
mov %player,0
goto *sean0406



*arcen_kousan

gosub *kousan_syori
>Granberia surrenders to Arc-En-Ciel...\
gosub *face2
name $name
>In the end, that's all you had.@
>I doubt I'll be able to expect anything from Hero Luka, either.\
name ""
goto *arcen_a



*arcen_main

gosub *cmd_main
if %cmd1=11 goto *arcen_attack
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *arcen_kousan
if %cmd1=16 goto *arcen_onedari
if %cmd1=17 goto *arcen_skill
goto *arcen_main



*arcen_attack

mov %before_action,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Here I come!"
if %ransu=2 mov $sel1,"Haa!"
if %ransu=3 mov $sel1,"...!"
name "Granberia"
eng $sel1:$sel6\
name ""
>Granberia attacks!
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\slash.ogg"
rnd2 %damage,900,1100
gosub *enemylife2
goto *arcen_a



*arcen_skill

saveoff
textoff
cspl 3,7:cspl 601,608
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
gosub *setwindow_04
if %mp>1 strsp 601,"Dragon Butcher Attack - 2",70,418,14,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 601,21
if %mp<2 strsp 601,"Dragon Butcher Attack - 2",70,418,14,1,20,20,0,0,1,1,#bbbbbb
if %mp>1 strsp 602,"Bloody Fissure Thunder Thrust * Gale - 2",70,445,21,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 602,22
if %mp<2 strsp 602,"Bloody Fissure Thunder Thrust * Gale - 2",70,445,21,1,20,20,0,0,1,1,#bbbbbb
if %mp>2 strsp 603,"Death Sword Chaos Star - 3",70,472,14,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,23
if %mp<3 strsp 603,"Death Sword Chaos Star - 3",70,472,14,1,20,20,0,0,1,1,#bbbbbb
if %mp>3 strsp 604,"Vaporizing Rebellion Sword - 4",70,499,16,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 604,24
if %mp<4 strsp 604,"Vaporizing Rebellion Sword - 4",70,499,16,1,20,20,0,0,1,1,#bbbbbb
if %sinkou=4 && %mp>0 strsp 605,"Quadruple Giga - 1",400,418,10,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 605,25
if %sinkou=4 && %mp<1 strsp 605,"Quadruple Giga - 1",400,418,10,1,20,20,0,0,1,1,#bbbbbb
btnwait2 %cmd1
if %mon_labo_on=1 && %cmd1=4 textoff:screen_clear:return *monster_labo
if %zukanon>0 && %cmd1=4 textoff:return *zukan_commonkaisou0
if %cmd1=0 skip -3
if %cmd1<=-2 skip -4
cspl 3,7
cspl 601,610
gosub *setwindow_02p
if %cmd1=21 goto *arcen_skill1
if %cmd1=22 goto *arcen_skill2
if %cmd1=23 goto *arcen_skill3
if %cmd1=24 goto *arcen_skill4
if %cmd1=25 goto *arcen_v
texton
btndef clear
if %cmd1=-1 goto *arcen_main



*arcen_skill1

rnd2 %ransu,1,2
if %ransu=1 mov $sel1,"Taste the blow that can cleave a dragon in two!"
if %ransu=2 mov $sel1,"Taste my blade!"
name "Granberia"
eng $sel1:$sel6\
name ""
mov %mp,%mp-2
gosub *mp
skillname "Dragon Butcher Attack"
>Granberia swings down her sword in an overhead arch!
dwave 1,"se\karaburi.ogg"
lsp 2,":a;effect\010_01.bmp",150,30:print 10,30
lsp 2,":a;effect\010_02.bmp",150,30:print 10,30
lsp 2,":a;effect\010_03.bmp",150,30:print 10,30
lsp 2,":a;effect\010_04.bmp",150,30:print 10,30
csp 2:print 10,30
rnd2 %damage,1500,1800
dwave 1,"se\damage2.ogg"
gosub *enemylife2
skillname ""
goto *arcen_a



*arcen_skill2

rnd2 %ransu,1,2
if %ransu=1 mov $sel1,"Fast as lightning!"
if %ransu=2 mov $sel1,"Can you see this step?"
name "Granberia"
eng $sel1:$sel6\
name ""
mov %mp,%mp-2
gosub *mp
skillname "Bloody Fissure Thunder Thrust * Gale"
>Granberia steps forward like lightning, her thrust booming like thunder!
dwave 1,"se\slash3.ogg"
lsp 2,":a;effect\009b_01.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009b_02.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009b_03.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009b_04.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009b_05.bmp",%tukix,%tukiy:print 10,12
csp 2:print 10,12
rnd2 %damage,1500,1800
dwave 1,"se\damage.ogg"
gosub *enemylife2
skillname ""
goto *arcen_a



*arcen_skill3

name "Granberia"
>A random barrage!\
name ""
mov %mp,%mp-3
gosub *mp
skillname "Death Sword Chaos Star"
>Granberia attacks with countless slashes!
wait 500
dwave 1,"se\slash.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
dwave 2,"se\slash.ogg"
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
dwave 3,"se\slash.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
csp 2:print 10,1000
dwave 1,"se\slash.ogg"
rnd2 %damage,400,500
mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\slash.ogg"
rnd2 %damage,400,500
mov %damage_nobr,2:gosub *enemylife2
textclear
dwave 1,"se\slash.ogg"
rnd2 %damage,400,500
mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\slash.ogg"
rnd2 %damage,400,500
mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\slash.ogg"
rnd2 %damage,400,500
mov %damage_nobr,2:gosub *enemylife2
\
skillname ""
goto *arcen_a



*arcen_skill4

name "Granberia"
>My secret skill - Vaporizing Rebellion Sword!\
name ""
mov %mp,%mp-4
gosub *mp
skillname "Vaporizing Rebellion Sword"
gosub *skill16a
>Granberia attacks with countless slashes!
dwave 1,"se\slash.ogg"
rnd2 %damage,700,1000
mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\slash.ogg"
rnd2 %damage,700,1000
mov %damage_nobr,2:gosub *enemylife2
textclear
dwave 1,"se\slash.ogg"
rnd2 %damage,700,1000
mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\slash.ogg"
rnd2 %damage,700,1000
mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\slash.ogg"
rnd2 %damage,700,1000
mov %damage_nobr,2:gosub *enemylife2
\
skillname ""
goto *arcen_a



*arcen_a

if %nanido=0 && %enemylife<1 goto *arcen_v2
if %enemylife<%henkahp1 && %sinkou=1 goto *arcen001
if %enemylife<%henkahp2 && %sinkou=2 goto *arcen002
if %enemylife<%henkahp3 && %sinkou=3 goto *arcen003
rnd2 %ransu,1,4
if %ransu=1 gosub *arcen_a1:goto *common_main
if %ransu=2 gosub *arcen_a2:goto *common_main
if %ransu=3 gosub *arcen_a3:goto *common_main
if %ransu=4 && %owaza_count3a>4 gosub *arcen_a4:goto *common_main
skip -5



*arcen_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Haa!"
if %ransu=2 mov $sel1,"Now fall!"
if %ransu=3 mov $sel1,"Take this!"
name $name
eng $sel1:$sel6\
name ""
skillname "Dragon Palm"
dwave 1,"se\dageki.ogg"
>Arc-En-Ciel slams her palm into Granberia!
mov %a_effect1,1
damage 2500,3000
skillname ""
if %mylife=0 sub %stack,1:return *arcen_h1
sub %stack,1
return



*arcen_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Feel my strength with your body!"
if %ransu=2 mov $sel1,"Shall we see if my fist can shatter your sword!?"
if %ransu=3 mov $sel1,"This fist of mine can shatter anything!"
name $name
eng $sel1:$sel6\
name ""
skillname "Explosive Fist"
dwave 1,"se\dageki2.ogg"
>Wreathed in flames, Arc-En-Ciel's fist slams into Granberia!
mov %a_effect1,1
damage 3000,3500
skillname ""
if %mylife=0 sub %stack,1:return *arcen_h1
sub %stack,1
return



*arcen_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Can you even see this, Granberia!?"
if %ransu=2 mov $sel1,"The secret technique of the Dragon race... So simple!"
if %ransu=3 mov $sel1,"There may not even be a Dragon race monster left alive who can use this skill!"
name $name
eng $sel1:$sel6\
name ""
skillname "Sixteen Palm Black Flames"
dwave 1,"se\dageki2.ogg"
>Wreathed in black flames, Arc-En-Ciel's palms slam into Granberia one after another!
mov %a_effect1,1
damage 3500,4000
skillname ""
if %mylife=0 sub %stack,1:return *arcen_h1
sub %stack,1
return



*arcen_a4

add %stack,1
mov %owaza_count3a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"If I use all of my power, the air itself can become a weapon!"
if %ransu=2 mov $sel1,"Eat this storm of destruction!"
if %ransu=3 mov $sel1,"My breath itself is a weapon!"
name $name
eng $sel1:$sel6\
name ""
skillname "Magnetic Storm"
>Arc-En-Ciel's breath charges the air with destructive magnetism, ripping everything to shreds!
dwave 1,"se\denpa1.ogg"
lsp 2,":c;effect\018.bmp",0,0:print 10,500
csp 2:print 10,500
mov %a_effect1,1
damage 4500,5500
skillname ""
if %mylife=0 sub %stack,1:return *arcen_h1
sub %stack,1
return



*arcen_onedari

>There is nothing to request!\
goto *arcen_main



*arcen_h1

name "Granberia"
>Regret...\
name ""
if %battle_auto=1 skipoff
wait 1000
mov %battle,0
cspl 0,611
gosub *setwindow_01p
>Granberia has been defeated by Arc-En-Ciel...\
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov %hsean,1
mov %2719,%2719+1:if %2719=1 mov %count_koenemy,%count_koenemy+1
if %2719>%count_most mov %count_most,%2719:mov $count_mostname,$name
count 14,6
mov $bad1,"After Arc-En-Ciel toys with Luka, she kills him."
gosub *face2
name $name
>That ends it...@
>No, there's some more cleanup to do...\
name ""
>After defeating Granberia, Arc-En-Ciel leaves the tower...\
csp 700
sean_change "bg208"
goto *arcen_h



*arcen_h

mov %player,0
mov $bad2,""
if %2719=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>.............\
name ""
>I'm still waiting in the garden, praying for the Four Heavenly Knights to succeed.@
>Suddenly, a voice calls out from behind me...\
lsp 700,":a;chara\arcen_st02.bmp",0,0:print 10,500
name $name
>You're next, Hero Luka!@
>Succumb to my power!\
name ""
name "Luka"
>Guh... Crap!\
name ""
>I jump up, and try to draw my sword...@
>But she grabs hold of me before I can, and pins me to the ground.\
name $name
>Hmph... An instant defeat?@
>Rather anti-climactic from what I was hoping for.@>But I suppose this is all that can be expected from a human.\
>Then, shall I kill a human as a human deserves?@
>I'll rape you senseless, until you die.\
name ""
name "Luka"
>S...Stop!\
name ""
>Arc-En-Ciel opens up her protected vagina, and presses it against my already erect penis!\
mov %hseanwave,4:hseanwave
cspl 690,699
lsp 700,":a;chara\arcen_h1.bmp",0,0:print 10,500
>My penis sinks deep into her artificially created vagina...\
name "Luka"
>Ahhh!!!\
name ""
>Her vagina is so hot, it feels like my penis could burn.\
>Once I'm taken deep inside of her, her vagina clamps down on me, crushing my penis from every direction.\
name "Luka"
>Ahhgg!!!\
name ""
>Feeling something close to pain, I let out a scream.@
>This monster's vagina is too violent...\
>The heat and pressure are going to damage my penis...\
name $name
>Hehehe... My vagina also works as a torture device.@
>I can incinerate or crush a man's penis with it.\
>Do you want me to burn your penis...?\
name ""
name "Luka"
>Ah... Hyaa!!!\
name ""
>The temperature inside of her rapidly starts to rise, a comforting heat assaulting my senses.@
>If she makes it any hotter, it will turn tortuous though!\
name "Luka"
>Ah... It's hot! Stop...\
name ""
name $name
>Then would you rather I crush it?@>Like this...?\
name ""
name "Luka"
>Hyaa!\
name ""
>As the intense heat starts to subside, the pressure starts to increase.@
>Like being caught in a vise of flesh, her vagina clamps down on me.\
name "Luka"
>Ahhh!!!\
name ""
name $name
>I can use my vagina to torture you however I like...@
>But perhaps male pigs like you prefer this?\
name ""
>The heat cools down to a comforting temperature, and the vise like clamp loosens.\
>But then her flesh starts to squeeze and loosen her vagina at a rapid pace.\
name "Luka"
>Ah...Ahh!\
name ""
>This time, I'm screaming in pleasure instead of fear...@
>As her vagina squeezes down rhythmically on me, I'm left unable to stop my natural reactions.\
name "Luka"
>Haa... Not this...\
name ""
name $name
>Oh... So you don't like this either?@
>Would you prefer it crushed or burned like before?\
name ""
name "Luka"
>N...No... No more...\
name ""
>At the end of my refusal, a moan leaks out.@
>My body reacts in ecstasy, despite my words.\
name $name
gosub *syasei1
lsp 700,":a;chara\arcen_h2.bmp",0,0
gosub *syasei2
name "Luka"
>Ahh...\
name ""
>With a cry, I explode inside her, my penis pulsing inside as my body twitches in shame from the forced ejaculation.\
name $name
>Hehe... I'm quite skilled, aren't I?@
>Since you're going to die anyway, I'll let you pick the method.\
>Do you want your penis to be burned into charcoal?@
>Or crushed and broken?\
>Or perhaps simply have your semen wrung dry, until you die of debilitation?@
>...Come now, make your choice.\
name ""
name "Luka"
>N...No way...\
name ""
name $name
>After all the men I've assaulted during the town invasions...@
>Every one chose the same thing in the end.\
name ""
>There's no way out of this situation...@>If I'm going to die anyway, then rather than pain...\
name "Luka"
>I...I want to be wrung dry...\
name ""
name $name
>Hmph... Even though you're called a Hero, you're the same as every other man.@
>You're willing to throw away your pride for pleasure, in the end?\
>But don't worry, I won't go back on my promise...@
>Now, just as you want, I'll wring your semen dry, and finish you off...\
name ""
name "Luka"
>Ahhh!!!\
name ""
mov %hseanwave,9:hseanwave
>She starts to squeeze me again like before.@
>But not painful like her vise... Her movements are seductive and controlled this time.\
>The warm heat and massage like squeezing bring forth an incredible ecstasy, causing me to surrender wholly.\
name "Luka"
>Ahhh!!!\
name ""
gosub *syasei1
lsp 700,":a;chara\arcen_h3.bmp",0,0
gosub *syasei2
>And like that, I explode inside her again, the weakness from my ejaculation making me relax even further.@
>Just that single ejaculation made me feel so weak...\
name $name
>Hmph... Just a few shots, and you humans die from weakness.@
>You creatures truly are pitiful, aren't you?\
>You'll be no different from the other men who died inside my vagina...\
name ""
name "Luka"
>Ahhh!!!\
name ""
gosub *syasei1
lsp 700,":a;chara\arcen_h4.bmp",0,0
gosub *syasei2
>As my body weakens, I continue coming inside her hot, tight vagina.@
>Each spurt brings new waves of weakness, as if my life force itself is shooting into her.\
>I'm forced to come over and over like this, my own body bringing about my end...\
name "Luka"
>Haa...\
name ""
name $name
>Out of energy already?@> How fragile...\
name ""
>With a final squeeze inside her...\
gosub *syasei1:gosub *syasei2
name "Luka"
>Ah...aa...\
name ""
>A final flash of pleasure runs through me as my penis pulses in her, before my world goes dark...\
mov %hseanwave,0:hseanwave
gosub *anten
>.....................\
goto *badend



*rapun_start

mov $name,"Rapunzel"
mov $name2,"Rapunzel"
mov $lavel,"rapun"
mov $tatie1,"rapun_st01"
mov $tatie2,"rapun_st02"
mov $tatie3,"rapun_st03"
mov $tatie4,"rapun_h1"
mov $haikei,"bg208"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,32000
if %nanido=2 mov %max_enemylife,47000
if %nanido=3 mov %max_enemylife,62000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,0
mov %music,3
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Did you think you could run away from mating with me?"
mov $mogaku_sel2,"Ahaha, I won't let you go..."
mov $mogaku_sel3,"Did you think you could run away from mating with me?"
mov $mogaku_sel4,"Ahaha, I won't let you go..."
mov $mogaku_sel5,"Did you think you could run away from mating with me?"
mov $mogaku_dassyutu1,"You don't want to mate with me...?"
mov $mogaku_dassyutu2,"But our genitals were almost connected..."
mov $mogaku_earth_dassyutu1,"You don't want to mate with me...?"
mov $mogaku_earth_dassyutu2,"But our genitals were almost connected..."
mov $half_s1,"Hehehe, my sexual skills are the best."
mov $half_s2,"I'll let you enjoy yourself more and more..."
mov $kiki_s1,"Aha, you're almost there."
mov $kiki_s2,"You'll pour your semen into my oviduct..."
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,4
mov %owaza_count2a,4
mov %owaza_count2b,4
mov %owaza_count3a,5
mov %owaza_count3b,5
name $name
>Oh dear... It seems I came too late.@
>To think all four of them would lose!\
>Each and every one of them, useless!@
>But at least I'll be able to feast on the ultimate of prey...\
name ""
>One of those Next Dolls appears.@
>Flapping her tiny wings to fly, she gently lands in front of me.\
name "Luka"
>...Stop already.@
>You can't beat me now...\
name ""
name $name
>Ahaha, big words, little boy.@
>That rude mouth of yours will be gasping soon enough.\
>You'll be connected to me for the rest of your life, stuck in a mating hell...\
name ""
>An incredible power has taken root in my body.@
>Rapunzel doesn't realize she has no chance yet...\
goto *common_main



*rapun_v

gosub *face3
name $name
>This... Can't be...@
>Are you... Truly human?\
name ""
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
>Rapunzel fades away into particles, and vanishes!\
mov %viclose,1:gosub *victory
mov %getexp,450000:gosub *lvup
mov %2420,1
goto *sean0407



*rapun_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Aha, so you want to mate?@
>I've been preparing eggs, so please fertilize them...\
name ""
goto *rapun_a



*rapun_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *rapun_kousan
if %cmd1=16 goto *rapun_onedari
if %cmd1=17 goto *common_skill
goto *rapun_main



*rapun_a

if %kousoku>0 gosub *rapun_a6:goto *common_main
rnd2 %ransu,1,10
if %ransu=1 gosub *rapun_a1:goto *common_main
if %ransu=2 gosub *rapun_a2:goto *common_main
if %ransu=3 && %owaza_count2a>5 && %status=0 gosub *rapun_a3:goto *common_main
if %ransu=4 && %owaza_count2b>5 && %status=0 gosub *rapun_a4:goto *common_main
if %ransu<7 && %owaza_count1a>5 gosub *rapun_a5:goto *common_main
if %ransu<9 && %owaza_count3a>6 && %enemy_wind=0 && %enemy_earth=0 gosub *rapun_el1:goto *common_main
if %ransu<11 && %owaza_count3a>6 && %enemy_wind=0 && %enemy_earth=0 && %status=0 gosub *rapun_el2:goto *common_main
skip -8



*rapun_el1

add %stack,1
mov %owaza_count3a,0
name $name
>Come, Zylphe!\
name ""
skillname "Wind Spirit Summon"
mov %enemy_wind,5
mov %kaihi_el,50
dwave 2,"se\wind2.ogg"
lsp2 0,":a;chara\zylphe_st02.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *enemy_elm_print
>Rapunzel summons a spirit of wind!\
skillname ""
sub %stack,1
return



*rapun_el2

add %stack,1
mov %owaza_count3a,0
name $name
>Come, Gnomaren!\
name ""
skillname "Summon Earth Spirit"
mov %enemy_earth,5
mov %damage_keigen_el,50
dwave 2,"se\earth1.ogg"
lsp2 0,":a;chara\gnomaren_st01.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *enemy_elm_print
>Rapunzel summons a spirit of earth!\
skillname ""
sub %stack,1
return



*rapun_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I can even get pregnant by swallowing semen with my mouth..."
if %ransu=2 mov $sel1,"Hurry up and come in my mouth!"
if %ransu=3 mov $sel1,"You can even impregnate me by coming in my mouth... Isn't that amazing?"
name $name
eng $sel1:$sel6\
name ""
skillname "Lewd Bug's Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>Rapunzel sucks hard on Luka's penis!
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,30
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4086
mov %earth_keigen_el,70
if %nanido<2 damage 400,430
if %nanido=2 damage 430,460
if %nanido=3 damage 460,490
if %enemy_wind=0 skip 13
dwave 1,"se\ero_pyu1.ogg"
>Her tongue licks and crawls all over Luka's penis!
mov %earth_keigen_el,70
if %nanido<2 damage 400,430
if %nanido=2 damage 430,460
if %nanido=3 damage 460,490
dwave 1,"se\ero_buchu2.ogg"
>Her lips close around his glans as she sucks even harder!
mov %earth_keigen_el,70
if %nanido<2 damage 400,430
if %nanido=2 damage 430,460
if %nanido=3 damage 460,490
skillname ""
if %mylife=0 sub %stack,1:return *rapun_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*rapun_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Even my breasts are sexual organs... Do you want to inseminate me here?"
if %ransu=2 mov $sel1,"You want to try getting me pregnant with my breasts? Then just get some semen on my nipples..."
if %ransu=3 mov $sel1,"I'll squeeze your semen with my breasts!"
name $name
eng $sel1:$sel6\
name ""
skillname "Lewd Bug's Paizuri"
dwave 1,"se\ero_sigoki1.ogg"
>Rapunzel sandwiches Luka's penis between her breasts, and massages him between them!
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,30
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4087
mov %earth_keigen_el,70
if %nanido<2 damage 410,440
if %nanido=2 damage 440,470
if %nanido=3 damage 470,500
if %enemy_wind=0 skip 13
dwave 1,"se\ero_sigoki1.ogg"
>Breast milk flows from her nipples, lubricating Luka's penis!
mov %earth_keigen_el,70
if %nanido<2 damage 410,440
if %nanido=2 damage 440,470
if %nanido=3 damage 470,500
dwave 1,"se\ero_sigoki1.ogg"
>She moves her breasts up and down in an alternative rhythm, massaging Luka's milk covered penis!
mov %earth_keigen_el,70
if %nanido<2 damage 410,440
if %nanido=2 damage 440,470
if %nanido=3 damage 470,500
skillname ""
if %mylife=0 sub %stack,1:return *rapun_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*rapun_a3

add %stack,1
mov %owaza_count2a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Taste my milk, and indulge in ecstasy!"
if %ransu=2 mov $sel1,"My milk is sweet..."
if %ransu=3 mov $sel1,"I'll treat you to my honey..."
name $name
eng $sel1:$sel6\
name ""
skillname "Lewd Bug's Lewd Honey"
dwave 1,"se\ero_slime2.ogg"
eng "Sticky honey sprays out of Rapunzel's abdomen!":$sel6/
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
>The sticky honey covers Luka's body, bringing him sweet ecstasy...
skillcount3 4088
mov %earth_keigen_el,70
if %nanido<2 damage 400,420
if %nanido=2 damage 500,520
if %nanido=3 damage 600,620
if %status=0 mov $sel1,"Luka has been immersed in ecstasy!"
if %status=1 mov $sel1,"Luka has been immersed in ecstasy..."
mov %status,1:gosub *status_print
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *rapun_h3
if %kousan=2 sub %stack,1:return
name "Luka"
>Haa...\
name ""
name $name
>Are you feeling good?@
>While you're in that dreamy state, I'll finish making a child with you...\
name ""
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,2,3
if %nanido=3 rnd2 %status_turn,3,4
sub %stack,1
return



*rapun_a4

add %stack,1
mov %owaza_count2b,0
name $name
>Shall I try making you numb?\
name ""
skillname "Lewd Bug's Numbing Needle"
eng "A poison needle shoots out from Rapunzel's abdomen toward Luka!":$sel6/
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<30 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
>The needle hits Luka, spreading the poison!\
mov %status,2:gosub *status_print
>Luka has been paralyzed!\
skillname ""
name "Luka"
>Ahh...!\
name ""
name $name
>Now you can't resist...@
>Do you want to enjoy some more foreplay?@> Or go right to making children...?\
name ""
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,2,3
if %nanido=3 rnd2 %status_turn,3,4
sub %stack,1
return



*rapun_a5

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 8
name $name
if %first_sel1=1 skip 3
>Let's mate...@
skip 2
>This time, let's mate...@
>First I'll embrace you.\
name ""
skillname "Lewd Bug's Restraint"
eng "Rapunzel grabs hold of Luka, sealing off his movements!":$sel6/
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<40 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,30
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>Luka has been bound by Rapunzel!\
skillname ""
if %kousan=2 sub %stack,1:return
name $name
>Since you're a man, you really do want to mate, don't you?@
if %first_sel1=1 skip 3
>Good, then I'll let you inseminate me as much as you want...\
skip 2
>This time you won't run... Now inseminate me!\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,99
if %earth=0 && %nanido=2 mov %genmogaku,99
if %earth=0 && %nanido=3 mov %genmogaku,99
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
if %enemy_earth>0 mov %genmogaku,99
sub %stack,1
return



*rapun_a6

add %stack,1
>Luka has been bound by Rapunzel...\
name $name
>Now, let's mate...@
>I'll bring your penis into my oviduct...\
name ""
skillname "Lewd Bug's Mating"
dwave 1,"se\ero_pyu1.ogg"
>Rapunzel pushes Luka's body against hers, bringing him into her oviduct!
skillcount3 4089
mov %damage_kotei,1
damage 500,600
mov %kousoku,2:gosub *status_print
>Luka is being raped by Rapunzel!\
skillname ""
if %mylife=0 sub %stack,1:return *rapun_h4
name "Luka"
>Ahhh!!!\
name ""
>Her oviduct sucks in my penis and tightens, as if latching on to me.\
>The wet, bumpy flesh rubs against me as soon as I'm inside her.\
name $name
>Aha... My genitals are amazing, aren't they?@
>I can change the internal structure freely, so I can mate with any organism...\
>Right now, it's in the shape that will feel best for your penis.@
>With this, I can make you come over and over...\
name ""
sub %stack,1
goto *rapun_a7



*rapun_a7

add %stack,1
>Luka is being raped by Rapunzel...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Does it feel good inside? Hehe.":mov $sel2,"Tiny bumps rub against the tip of Luka's penis!"
if %ransu=2 mov $sel1,"Ahaha, I'll drive you even crazier!":mov $sel2,"The folds inside of her oviduct rub against Luka's penis!"
if %ransu=3 mov $sel1,"I'll squeeze out your semen like this...":mov $sel2,"Rapunzel tightens her oviduct around Luka's penis!"
if %ransu=4 mov $sel1,"No male can endure this!":mov $sel2,"Rapunzel's oviduct rhythmically contracts and loosens!"
if %ransu=5 mov $sel1,"Come inside me, and fill me with your seed...":mov $sel2,"Rapunzel's oviduct vibrates around Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Lewd Bug's Mating"
dwave 1,"se\ero_chupa4.ogg"
eng $sel2:$sel6
skillcount3 4089
mov %damage_kotei,1
damage 500,600
skillname ""
if %mylife=0 sub %stack,1:return *rapun_h5
sub %stack,1
goto *rapun_a7



*rapun_onedari

mov $list1,"Lewd Bug's Blowjob"
if %4086>0 mov %list_num1,1
mov $list2,"Lewd Bug's Paizuri"
if %4087>0 mov %list_num2,1
mov $list3,"Lewd Bug's Lewd Honey"
if %4088>0 mov %list_num3,1
mov $list4,"Lewd Bug's Mating"
if %4089>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *rapun_onedari1
if %cmd1=12 goto *rapun_onedari2
if %cmd1=13 goto *rapun_onedari3
if %cmd1=14 goto *rapun_onedari4
if %cmd1=-1 goto *rapun_main
goto *rapun_onedari



*rapun_onedari1

gosub *onedari_syori
name $name
>Aha, you want me to give you a blowjob?@
>Then after that, you'll properly mate with me...\
name ""
gosub *rapun_el1
gosub *rapun_a1
skip -1



*rapun_onedari2

gosub *onedari_syori
name $name
>Aha, you want me to give you a tit fuck?@
>Then after that, you'll properly mate with me...\
name ""
gosub *rapun_el1
gosub *rapun_a2
skip -1



*rapun_onedari3

gosub *onedari_syori
name $name
>Aha, you want to taste my honey?@
>Then I'll cover you with it...\
name ""
gosub *rapun_a3
skip -1



*rapun_onedari4

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>Aha, you want to mate with me?@
>Then let's start right away...\
name ""
if %kousoku=0 gosub *rapun_a5
gosub *rapun_a6
skip -1



*rapun_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>As Rapunzel sucks on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2720,%2720+1:if %2720=1 mov %count_koenemy,%count_koenemy+1
if %2720>%count_most mov %count_most,%2720:mov $count_mostname,$name
count 4,1
mov $bad1,"Rapunzel forced Luka to come with her mouth."
gosub *face2
name $name
>Ahaha, you got it all over my face...@
>This time, come inside my oviduct!\
name ""
goto *rapun_h



*rapun_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>As Rapunzel squeezes Luka's penis between her soft breasts, he comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2720,%2720+1:if %2720=1 mov %count_koenemy,%count_koenemy+1
if %2720>%count_most mov %count_most,%2720:mov $count_mostname,$name
count 7,1
mov $bad1,"Rapunzel forced Luka to come with her breasts."
gosub *face2
name $name
>Ahaha, you got it all over my breasts...@
>This time, come inside my oviduct!\
name ""
goto *rapun_h



*rapun_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>As the ecstasy inducing honey covers Luka's body, he comes, covering Rapunzel's body with semen.\
mov %viclose,1:gosub *lose
mov %2720,%2720+1:if %2720=1 mov %count_koenemy,%count_koenemy+1
if %2720>%count_most mov %count_most,%2720:mov $count_mostname,$name
count 32,1
mov $bad1,"Rapunzel forced Luka to come with her honey."
gosub *face2
name $name
>Ahaha, you came, all covered in honey!@
>This time, come inside my oviduct!\
name ""
goto *rapun_h



*rapun_h4

mov %ikigoe,3:gosub *ikigoe
name $name
>Ahaha, already?\
name ""
gosub *syasei1
lsp 700,":a;chara\rapun_h2.bmp",0,0
gosub *syasei2
>The moment Luka is forced into Rapunzel's oviduct, he comes, quickly filling her with semen.\
mov %viclose,1:gosub *lose
mov %2720,%2720+1:if %2720=1 mov %count_koenemy,%count_koenemy+1
if %2720>%count_most mov %count_most,%2720:mov $count_mostname,$name
count 2,1
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Rapunzel forced Luka to come the moment of insertion."
gosub *face2
name $name
>An instant orgasm?@
>Does my oviduct feel that good?\
>But I'm not satisfied with just that...\
name ""
goto *rapun_h



*rapun_h5

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\rapun_h2.bmp",0,0
gosub *syasei2
>As Rapunzel rapes Luka, he comes, filling her oviduct with semen.\
mov %viclose,1:gosub *lose
mov %2720,%2720+1:if %2720=1 mov %count_koenemy,%count_koenemy+1
if %2720>%count_most mov %count_most,%2720:mov $count_mostname,$name
count 2,1
mov $bad1,"Rapunzel forced Luka to come as she raped him."
gosub *face2
name $name
>Ahaha, you came so much inside me...@
>But I'm not satisfied with just that...\
name ""
goto *rapun_h



*rapun_h

mov $bad2,"Luka was forced to mate with Rapunzel until his death..."
if %2720=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku=2 mov %hseanwave,15:hseanwave:goto *rapun_hb
name "Luka"
>Ahh...\
name ""
>Looming over me, Rapunzel a wet hole opens up in her huge abdomen.\
name $name
>I'm a Chimera similar to a Queen Bee...@>I was created to reproduce.@
>So I love mating more than anything...\
name ""
>With a giggle, Rapunzel shows off her pink entrance.\
name $name
>You want to feel it too, don't you?@
>It's better than being wrung dry like a rag, after all.\
>It will feel incredible inside me...@
>You want to mate with me... Right?\
name ""
>Rapunzel embraces my weak body, bringing me closer to her hole.\
name $name
>Do you want to stick yourself inside, and come inside me with your own movements?@
>Or would you rather I violate you, and wring it out myself?\
name ""
name "Luka"
>N...No...\
name ""
>I mumble, paralyzed in horror at the situation.\
name $name
>Hehe, so you want me to wring it out, it seems.@
>Then I'll rape you lots and lots...\
name ""
dwave 1,"se\ero_makituki3.ogg"
mov %hseanwave,15:hseanwave
cspl 690,699
lsp 700,":a;chara\rapun_h1.bmp",0,0:print 10,500
>With a quick movement, Rapunzel brings me into her oviduct!\
name $name
>Ahaha, now we're connected.@
>We're going to mate...@> Your penis is deep inside my oviduct...\
name ""
goto *rapun_hb



*rapun_hb

name "Luka"
>Ahh...\
name ""
>The sensations from her warm, tight oviduct run through me.\
name $name
>Hehe... Your penis is warm... And I can feel it twitching.@
>Does it feel good to mate with me?@> Hehe... You know you're just a reproductive slave now, right?\
name ""
>As Rapunzel giggles, her oviduct starts to wriggle and pulse around my penis.\
name "Luka"
>Ah!@>That feels good...!\
name ""
name $name
>Ahaha, you're moaning...@> And in such a delicious voice, too.@
>You're going to come soon, aren't you?@> You're twitching even more...\
name ""
name "Luka"
>Ahh...\
name ""
>Seemingly able to control her oviduct's motions, the incredible sensations get even stronger as the movements get more intense.\
>There's no way I can endure this... No matter how much I try to clench my body, the pleasure is breaking me down.\
name "Luka"
>Ahh... I'm going to come...\
name ""
name $name
>Hehe, hurry, faster!\
name ""
>My head goes blank as her oviduct starts to squirm and pulse even faster.\
gosub *syasei1
lsp 700,":a;chara\rapun_h2.bmp",0,0
gosub *syasei2
name "Luka"
>Haaa...!\
name ""
>Melting pleasure washes over my body as I explode inside her, my body twitching with each spurt.\
name $name
>Aha... Your penis is squirting inside me...@
>Each time it pulses, I can feel your hot stuff shoot into me...\
name ""
>Rapunzel looks down and giggles, as I come inside her.\
name $name
>Your thick semen is flowing into me, towards my eggs...@
>And that pathetic look on your face as you came... Hehe, I don't think I'll ever get tired of that.\
name ""
name "Luka"
>Stop... Don't look...\
name ""
>Rapunzel stares into my eyes as I moan, my face loose from orgasm.@
>I feel my face go red in shame as her eyes bore into me.\
name $name
>So this is how you rape a male...@
>Ruling and controlling him as you want.\
>It feels incredible...@> But I'm not satisfied yet.\
name ""
name "Luka"
>Hyaa!\
name ""
mov %hseanwave,16:hseanwave
>Rapunzel's oviduct starts to move again, wriggling around my sensitive penis.\
name $name
>Now come inside me again...@
>When you do, it feels incredible for me too, after all.\
>So there's no reason to hold back, is there?\
name ""
name "Luka"
>Ahhh!\
name ""
>Her oviduct shrinks down, as if forming itself to my penis' shape.@
>The seductive movements of her flesh are too much for me to take...\
name "Luka"
>Ahh...\
name ""
gosub *syasei1
lsp 700,":a;chara\rapun_h3.bmp",0,0
gosub *syasei2
>I'm brought to another quick orgasm, spurting more semen into her oviduct.\
name $name
>Ahaha... Your warm stuff is filling me again...@
>Hey, come on... Give me more!\
name ""
name "Luka"
>Ahh... No more...@
>It's not possi... Ahh!\
name ""
gosub *syasei1:gosub *syasei2
>In the middle of my refusal, the movements of her oviduct bring forth another orgasm.@
>No matter how many times I come inside her, she greedily sucks up my semen...\
name $name
>More... Give me more.@
>Spit out all of your semen into my oviduct...\
name ""
name "Luka"
>S...Sto... Hyaa!\
name ""
>With no escape, I'm forced to keep mating with her...@
>Brought to orgasm after orgasm, it's almost like I'm continually coming inside her oviduct.\
name $name
>Ehh...?@>There isn't as much as before...@
>Hey, what are you doing?@> Keep coming!\
name ""
name "Luka"
>Ahg... Urhg...\
name ""
>After the repeated orgasms, I'm barely conscious.@
>But even still, Rapunzel's oviduct continues to stimulate me, demanding more.\
gosub *syasei1
lsp 700,":a;chara\rapun_h4.bmp",0,0
gosub *syasei2
name "Luka"
>Ah...uh...\
name ""
>At last, the final spurt of semen shoots out of me.\
>Still mating with Rapunzel, I feel my body fading from exhaustion, even as she demands more...\
name $name
>Eh? Are you dying already?@
>No... Come on, give me more...\
name ""
>With a frown, Rapunzel shakes the boy's corpse.@
>After this, hundreds more men are to lose their lives to this insatiable insect monster...\
mov %hseanwave,0:hseanwave
gosub *anten
>.................\
goto *badend



*heavensgate_start

mov $name,"Heaven's Gate"
mov $name2,"Heaven's Gate"
mov $lavel,"heavensgate"
mov $tatie1,"heavensgate_st01"
mov $tatie2,"heavensgate_st02"
mov $tatie3,"heavensgate_st03"
mov $tatie4,"heavensgate_h1"
mov $haikei,"bg208"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,40000
if %nanido=2 mov %max_enemylife,55000
if %nanido=3 mov %max_enemylife,70000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,40
if %nanido=3 mov %earth_keigen,20
mov %alice_skill,0
mov %music,9
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"You can't escape from my gate..."
mov $mogaku_sel2,"Receive your judgement..."
mov $mogaku_sel3,"Give up, and be squeezed..."
mov $mogaku_sel4,"No matter how you struggle, you can't escape from my gate..."
mov $mogaku_sel5,"Useless... You will be exhausted..."
mov $mogaku_dassyutu1,"You must receive judgement..."
mov $mogaku_dassyutu2,""
mov $mogaku_earth_dassyutu1,"You escaped with sheer force...?"
mov $mogaku_earth_dassyutu2,""
mov $half_s1,"I'll never let you pass..."
mov $half_s2,"Give up, and become my sacrifice..."
mov $kiki_s1,"You are near your limit..."
mov $kiki_s2,"You are fated to be exhausted inside my gate..."
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,4
name $name
>...I am the angel that connects the Heavens and the surface world.\
>A gate that serves as her own gatekeeper.\
name ""
>So the "Gate of Heaven" is herself an angel...@
>And I won't get through unless I defeat her!\
name "Luka"
>Then you leave me no choice...@> I'll have to break through with force!\
name ""
name $name
>No enemy shall pass.@
>You will be sent to the underworld, not the Heavens.\
>No... Perhaps I'll simply keep your soul forever to play with...\
name ""
goto *common_main



*heavensgate_v

gosub *face3
name $name
>To think... You could destroy this gate...\
name ""
dwave 1,"se\bun.ogg"
csp 700:print 99,1000,"system\breakup.dll/lrB"
>Particles radiate off of Heaven's Gate, and reform into a normal gate!\
mov %viclose,1:gosub *victory
mov %getexp,300000:gosub *lvup
mov %2421,1
goto *sean0408



*heavensgate_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Surrendering?@
>You shouldn't have stepped in front of this gate to begin with...\
name ""
goto *heavensgate_a



*heavensgate_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *heavensgate_kousan
if %cmd1=16 goto *heavensgate_onedari
if %cmd1=17 goto *common_skill
goto *heavensgate_main



*heavensgate_a

if %kousoku=1 gosub *heavensgate_a5:goto *common_main
rnd2 %ransu,1,4
if %ransu=1 gosub *heavensgate_a1:goto *common_main
if %ransu=2 gosub *heavensgate_a2:goto *common_main
if %ransu=3 gosub *heavensgate_a3:goto *common_main
if %ransu=4 && %owaza_count1a>5 gosub *heavensgate_a4:goto *common_main
skip -5



*heavensgate_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Hehe... Do you prefer this mouth?"
if %ransu=2 mov $sel1,"I'll suck out your semen with my mouth..."
if %ransu=3 mov $sel1,"Now, be finished as I suck..."
name $name
eng $sel1:$sel6\
name ""
skillname "Seraphic Blowjob"
dwave 1,"se\ero_buchu2.ogg"
>Heaven's Gate sucks on Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<10 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4090
if %nanido<2 damage 600,700
if %nanido=2 damage 700,800
if %nanido=3 damage 800,900
skillname ""
if %mylife=0 sub %stack,1:return *heavensgate_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*heavensgate_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll use my tentacles..."
if %ransu=2 mov $sel1,"I'll toy with your penis with my tentacles..."
if %ransu=3 mov $sel1,"Well...? How does it feel to be toyed with by tentacles?"
name $name
eng $sel1:$sel6\
name ""
skillname "Male Teasing Tentacles"
dwave 1,"se\ero_makituki1.ogg"
>Heaven's Gate's tentacles crawl all over Luka's body!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<10 gosub *aqua_guard:sub %stack,1:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:sub %stack,1:return
skillcount3 4091
if %nanido<2 damage 300,400
if %nanido=2 damage 350,450
if %nanido=3 damage 400,500
dwave 1,"se\ero_makituki2.ogg"
>The tentacles coil around his penis, stroking it!
if %nanido<2 damage 300,400
if %nanido=2 damage 350,450
if %nanido=3 damage 400,500
skillname ""
if %mylife=0 sub %stack,1:sub %stack,1:return *heavensgate_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
sub %stack,1
return



*heavensgate_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll make you feel good with this tongue..."
if %ransu=2 mov $sel1,"Come on... Let me see you writhe."
if %ransu=3 mov $sel1,"I'll get a good taste of your body..."
name $name
eng $sel1:$sel6\
name ""
skillname "Great Gate's Lusting Tongue"
dwave 1,"se\ero_pyu1.ogg"
>Heaven's Gate's huge tongue licks Luka's body!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<10 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4092
if %nanido<2 damage 350,450
if %nanido=2 damage 400,500
if %nanido=3 damage 450,550
dwave 1,"se\ero_pyu2.ogg"
>The tip of her tongue focuses on his penis!
if %nanido<2 damage 350,450
if %nanido=2 damage 400,500
if %nanido=3 damage 450,550
skillname ""
if %mylife=0 sub %stack,1:return *heavensgate_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*heavensgate_a4

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 5
name $name
>I'll take you into my gate now.@
>Where I wring males until they're completely exhausted...\
name ""
skillname "Gate of Judgement"
dwave 1,"se\ero_makituki3.ogg"
>Heaven's Gate's tongue coils around Luka's body, dragging him inside her mouth!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<10 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4093
mov %damage_kotei,1
damage 600,700
mov %kousoku,1:gosub *status_print
>Luka has been bound by Heaven's Gate!\
skillname ""
if %mylife=0 sub %stack,1:return *heavensgate_h4
name $name
>Hehe... You can't go to the Heavens, but I'll show you a piece of it...\
name ""
sub %stack,1
goto *heavensgate_a5



*heavensgate_a5

add %stack,1
>Luka is being raped by Heaven's Gate...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Taste my judgement...":mov $sel2,"Her huge tongues licks every inch of Luka's penis!"
if %ransu=2 mov $sel1,"I'll stimulate your genitals...":mov $sel2,"Heaven's Gate's tentacles rub against Luka's penis!"
if %ransu=3 mov $sel1,"Will you finish quickly if I do this...?":mov $sel2,"Heaven's Gate's tentacles rub Luka's balls and penis!"
if %ransu=4 mov $sel1,"What's wrong? I'd prefer it if you came quickly...":mov $sel2,"Heaven's Gate's tentacles stroke Luka's penis like a hand!"
if %ransu=5 mov $sel1,"If I do this, you'll keep coming until you're exhausted...":mov $sel2,"Heaven's Gate's huge tongue licks Luka's body, as her tentacles stroke his penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Gate of Judgement"
dwave 1,"se\ero_makituki3.ogg"
eng $sel2:$sel6
skillcount3 4093
mov %damage_kotei,1
damage 600,700
skillname ""
if %mylife=0 sub %stack,1:return *heavensgate_h4
sub %stack,1
goto *heavensgate_a5



*heavensgate_onedari

mov $list1,"Seraphic Blowjob"
if %4090>0 mov %list_num1,1
mov $list2,"Male Teasing Tentacles"
if %4091>0 mov %list_num2,1
mov $list3,"Great Gate's Lusting Tongue"
if %4092>0 mov %list_num3,1
mov $list4,"Gate of Judgement"
if %4093>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *heavensgate_onedari1
if %cmd1=12 goto *heavensgate_onedari2
if %cmd1=13 goto *heavensgate_onedari3
if %cmd1=14 goto *heavensgate_onedari4
if %cmd1=-1 goto *heavensgate_main
goto *heavensgate_onedari



*heavensgate_onedari1

gosub *onedari_syori
name $name
>You want to finish in my mouth?@
>Then I'll end you here...\
name ""
gosub *heavensgate_a1
skip -1



*heavensgate_onedari2

gosub *onedari_syori
name $name
>You want to finish on my tentacles?@
>Then I'll end you here...\
name ""
gosub *heavensgate_a2
skip -1



*heavensgate_onedari3

gosub *onedari_syori
name $name
>You want to finish on my tongue?@
>Then I'll end you here...\
name ""
gosub *heavensgate_a3
skip -1



*heavensgate_onedari4

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want to finish in my gate?@
>Then I'll end you here...\
name ""
if %kousoku=0 gosub *heavensgate_a4
gosub *heavensgate_a5
skip -1



*heavensgate_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\heavensgate_bk01.bmp",0,0
gosub *syasei2
>As Heaven's Gate sucks on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2721,%2721+1:if %2721=1 mov %count_koenemy,%count_koenemy+1
if %2721>%count_most mov %count_most,%2721:mov $count_mostname,$name
count 4,16
mov $bad1,"Heaven's Gate used her mouth to force Luka to come."
gosub *face2
name $name
>Now you can no longer resist.@
>Receive your eternal punishment inside my gate...\
name ""
goto *heavensgate_h



*heavensgate_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\heavensgate_bk04.bmp",0,0
gosub *syasei2
>As Heaven's Gate's tentacles toy with Luka's penis, he comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2721,%2721+1:if %2721=1 mov %count_koenemy,%count_koenemy+1
if %2721>%count_most mov %count_most,%2721:mov $count_mostname,$name
count 10,16
mov $bad1,"Heaven's Gate forced Luka to come with her tentacles."
gosub *face2
name $name
>Now you can no longer resist.@
>Receive your eternal punishment inside my gate...\
name ""
goto *heavensgate_h



*heavensgate_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\heavensgate_bk03.bmp",0,0
gosub *syasei2
>As Heaven's Gate's huge tongue licks Luka's penis, he comes, covering it with semen.\
mov %viclose,1:gosub *lose
mov %2721,%2721+1:if %2721=1 mov %count_koenemy,%count_koenemy+1
if %2721>%count_most mov %count_most,%2721:mov $count_mostname,$name
count 4,16
mov $bad1,"Heaven's Gate forced Luka to come with her tongue."
gosub *face2
name $name
>Now you can no longer resist.@
>Receive your eternal punishment inside my gate...\
name ""
goto *heavensgate_h



*heavensgate_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\heavensgate_h2.bmp",0,0
gosub *syasei2
>As Heaven's Gate licked and played with Luka's entire body, he comes, covering everything with semen.\
mov %viclose,1:gosub *lose
mov %2721,%2721+1:if %2721=1 mov %count_koenemy,%count_koenemy+1
if %2721>%count_most mov %count_most,%2721:mov $count_mostname,$name
count 28,16
mov $bad1,"Heaven's Gate forced Luka to take her punishment."
gosub *face2
name $name
>Now you can no longer resist.@
>Receive your eternal punishment inside my gate...\
name ""
goto *heavensgate_h



*heavensgate_h

mov $bad2,"Trapped inside Heaven's Gate, Luka was punished with eternal semen extraction."
if %2721=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku>0 mov %hseanwave,12:hseanwave:goto *heavensgate_hb
name "Luka"
>Ahh...\
name ""
>Countless tentacles latch onto my body, pulling me toward her...@
>Numerous breasts line every direction, surrounding the interior space.\
name "Luka"
>Ahhh!\
name ""
dwave 1,"se\ero_makituki3.ogg"
mov %hseanwave,12:hseanwave
cspl 690,699
lsp 700,":a;chara\heavensgate_h1.bmp",0,0:print 10,500
>Pulled inside, those soft breasts press against me from every direction.@
>The innumerable breasts press against me, keeping me from moving.\
>But buried in the soft, warm breasts feels surprisingly good...@
>Enraptured by the feeling, I feel my body relax as I'm brought inside.\
name $name
>You can never exit from here again.@
>You will writhe in an eternity of tormenting pleasure here...\
name ""
name "Luka"
>Ahhh!\
name ""
>One of her tentacles latches onto my penis, and begins stroking it slowly up and down.\
>At the same time, her huge tongue licks up and down my body.@
>After a few passes, my body is dripping in her warm saliva.\
goto *heavensgate_hb



*heavensgate_hb

name "Luka"
>Hyaa... S... Stop...\
name ""
>Her tentacle's up and down movement is almost mechanical...@
>Slow, and deliberately stroking me just to force me to come.\
>I writhe around, trying to break free...@
>But her soft breasts press back against me, keeping me motionless.\
name "Luka"
>Ahh... L...Let me go...\
name $name
>There's no point resisting...@
>You will simply be led to climax over and over from now on.\
>Not allowed to die, only to ejaculate without end for an eternity.@
>This is your punishment for trying to enter the Heavens with that dirty body of yours.\
name ""
name "Luka"
>S...St... Ahh!\
name ""
>The deliberate stroking of her tentacles gets to be too much.@
>As her mechanical movements continue, my body starts to go numb in pleasure.\
>My lower body loosens as her continual up and down motion finally overpowers me...\
gosub *syasei1
lsp 700,":a;chara\heavensgate_h2.bmp",0,0
gosub *syasei2
name "Luka"
>Haa...\
name ""
>My semen shoots out, covering the tentacle stroking me, my face going bright red at this simple movement causing me to react like this.\
name $name
>Have you already come?@
>That's just the first of an eternity...\
>It may feel good now...@
>But soon it will be an unbearable torture.\
name ""
name "Luka"
>Ahh...\
name ""
>Her tentacles continue stroking, as if they were lifeless machines just operating as programmed.\
>Even though I just came, they show no mercy, and continue at the exact same pace as before.\
name "Luka"
>Haa... Stop... Stop...\
name ""
>I writhe as my sensitive penis is assaulted with even more pleasure, as her huge tongue licks the rest of me.\
>But my flailing limbs only serve to rub against the soft breasts around me, her smooth skin rubbing against my own.\
name $name
>Hurry and come again.@
>Your proof of manhood is now just your instrument of torture...\
name ""
name "Luka"
>No... Ahhh...\
name ""
gosub *syasei1
lsp 700,":a;chara\heavensgate_h3.bmp",0,0
gosub *syasei2
>With a feeble moan, I reach another orgasm to this mechanical pleasure.\
name "Luka"
>Haa... Ahh!\
name ""
>But no matter if I cry or come, her movements don't stop or slow at all.\
name "Luka"
>S...Stoooop... Ahh!\
name ""
gosub *syasei1
lsp 700,":a;chara\heavensgate_h4.bmp",0,0
gosub *syasei2
>Only moments after my last orgasm, she forces me to another.@
>The burning pleasure races through my body, flooding me in a hell of over-stimulation.\
name "Luka"
>H...Help me... This is too much...!\
name ""
name $name
>You're already whining? How pitiful...@
>This will continue for all eternity.\
name ""
name "Luka"
>N...No way... Ahh...\
name ""
gosub *syasei1:gosub *syasei2
>Even as my mind soars in grief, my body pulses in ecstasy.@
>This will continue forever...@>I can only despair as this continues on.\
name "Luka"
>Ah...ahh...\
name ""
gosub *syasei1:gosub *syasei2
>This eternal stroking has only just begun.@
>While leaking both tears and semen, I moan as this endless torture of pleasure continues...\
mov %hseanwave,0:hseanwave
>................\
goto *badend



*eden_start

mov $name,"Seraph Eden"
mov $name2,"Eden"
mov $lavel,"eden"
mov $tatie1,"eden_st01"
mov $tatie2,"eden_st01"
mov $tatie3,"eden_st01"
mov $tatie4,"eden_st11"
mov $haikei,"bg210"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,50000
if %nanido=2 mov %max_enemylife,70000
if %nanido=3 mov %max_enemylife,90000
if %nanido=0 mov %max_enemylife,2
if %nanido=1 mov %henkahp1,25000
if %nanido=2 mov %henkahp1,35000
if %nanido=3 mov %henkahp1,45000
if %nanido=0 mov %henkahp1,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,50
if %nanido=3 mov %earth_keigen,25
mov %alice_skill,0
mov %music,14
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"You can't escape..."
mov $mogaku_sel2,"There's no point struggling now."
mov $mogaku_sel3,"Why struggle in vain? Just give up and enjoy it."
mov $mogaku_sel4,"There's no point struggling now. Give up."
mov $mogaku_sel5,"There's no meaning in struggling now. Give up."
mov $mogaku_dassyutu1,"Escaping from this pleasure... You are a danger, after all."
mov $mogaku_dassyutu2,"I will end you with everything I have."
mov $mogaku_earth_dassyutu1,"Escaping from this pleasure... You are a danger, after all."
mov $mogaku_earth_dassyutu2,"I will end you with everything I have."
mov $half_s1,"You seem to be getting weaker."
mov $half_s2,"Give in, and succumb to this paradise of pleasure..."
mov $kiki_s1,"You're approaching paradise."
mov $kiki_s2,"Soon, you will step foot into its garden..."
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,4
mov %owaza_count1b,4
mov $name,"Eden"
name $name
>...It has been a long time since I've shown my true form.\
>Not since the Great Monster Wars against the Ancestors...\
name ""
name "Luka"
>...Just like a monster...\
name ""
>It's not just her form that's staggering.\
>The power flowing from her is enough to shake the very ground itself.\
name $name
>You are dangerous...@> There will be no reincarnation for you.\
>You will be weakened, and eliminated.\
>With that in mind, you will be imprisoned for an eternity.\
>Rather than letting that heretical soul free, it will be something much safer...\
name ""
name "Luka"
>Guh...!\
name ""
>I take up my blade as Eden seethes with rage.@
>This hatred against me is clearly from something deeper than I can understand...\
name $name
>Prepare yourself for the eternity to come.\
>The humiliation I've endured will be inflicted upon you, thousands of times over...\
name ""
mov %sinkou,1
goto *common_main



*eden001

name "Luka"
>Haa... Haa...\
name ""
>As expected of the highest ranking angel, she's really powerful.\
>I can't help but shrink back before her violent onslaught.\
name $name
>You're quite skilled, son of Lucifina.@
>But you're only human.@> You cannot stand against a Seraphim!\
name ""
name "Luka"
>Guh...!\
name ""
dwave 1,"se\ero_makituki1.ogg"
>Countless tentacles race toward me...\
>But a vortex of fire suddenly fills the air in front of me!
skillname "Omega Blaze"
delay 500
if %effectspeed=2 dwave 1,"se\fire1.ogg":skip 2
mpegplay "effect\movie01.mpg",1
dwave 2,"se\damage2.ogg"
rnd2 %damage,3000,3600
gosub *alice_enemylife2
skillname ""
lsp 699,":a;chara\alice_st02b.bmp",-160,0:print 10,500
name "Alice"
>...Sorry for the delay, Luka.\
name ""
name "Luka"
>...Alice!\
name ""
>Fresh, powerful magic flows from her body...@
>It looks like she got her original form back!\
lsp 699,":a;chara\alice_st01b.bmp",-160,0:print 10,500
name "Alice"
>But... Is she even an angel?@
>If a hideous figure like that descended, children would just cry.\
name ""
name $name
>Monster Lord Alipheese...@
>Even if you show up, the outcome won't change.\
>The two diseases that have been plaguing Ilias...@
>I'll eradicate you both at once!\
name ""
lsp 699,":a;chara\alice_st03b.bmp",-160,0:print 10,500
name "Alice"
>Luka, let's take her down quickly!@
>A more powerful foe awaits us, after all!\
name ""
name "Luka"
>Yes, you're right!\
name ""
>Just from being beside Alice again, I can feel fresh power entering my body.\
>I felt overwhelmed before...@> But with her at my side, there's no way I can lose!\
>With Alice by my side, I can defeat any enemy!\
csp 699:print 10,500
mov %sinkou,2
goto *common_main



*eden_v

gosub *face3
name $name
>I... Can't lose...!@
>I am not... Inferior... To Lucifina!\
name ""
dwave 1,"se\bun.ogg"
csp 700:print 99,1000,"system\breakup.dll/lrB"
>Eden fades away into particles, and vanishes!\
mov $name,"Seraph Eden"
mov %viclose,1:gosub *victory
mov %getexp,460000:gosub *lvup
mov %2422,1
goto *sean0409



*eden_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>You wish to surrender to a world of pleasure?@
>Then I shall invite you to my paradise...\
name ""
goto *eden_a



*eden_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *eden_kousan
if %cmd1=16 goto *eden_onedari
if %cmd1=17 goto *common_skill
goto *eden_main



*eden_a

if %enemylife<%henkahp1 && %sinkou=1 goto *eden001
if %kousan=0 && %sinkou=2 && %kousoku=0 gosub *alice_skillx
rnd2 %ransu,1,4
if %ransu=1 gosub *eden_a1:goto *common_main
if %ransu=2 gosub *eden_a2:goto *common_main
if %ransu=3 && %owaza_count1a>5 gosub *eden_a3:goto *common_main
if %ransu=4 && %owaza_count1b>5 gosub *eden_a5:goto *common_main
skip -5



*eden_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"These serpents are a piece of my paradise..."
if %ransu=2 mov $sel1,"Once deprived of your energy, a miserable fate awaits..."
if %ransu=3 mov $sel1,"This serpent will draw out your semen quickly..."
name $name
eng $sel1:$sel6\
name ""
skillname "Eden's Serpent"
dwave 1,"se\ero_syokusyu2.ogg"
>Eden's serpent-like tentacles caress Luka's body!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4094
if %nanido<2 damage 300,400
if %nanido=2 damage 350,450
if %nanido=3 damage 400,500
dwave 1,"se\ero_syokusyu1.ogg"
>They coil around his penis, stroking him!
if %nanido<2 damage 300,400
if %nanido=2 damage 350,450
if %nanido=3 damage 400,500
dwave 1,"se\ero_buchu1.ogg"
>One of the tentacles tips opens up, and sucks on Luka's penis!
if %nanido<2 damage 300,400
if %nanido=2 damage 350,450
if %nanido=3 damage 400,500
skillname ""
if %mylife=0 sub %stack,1:return *eden_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*eden_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"My wings are so soft..."
if %ransu=2 mov $sel1,"Stroked by an angel's wings... There is no greater happiness for a man."
if %ransu=3 mov $sel1,"Feel my wings upon your body..."
name $name
eng $sel1:$sel6\
name ""
skillname "Seraph's Wings"
dwave 1,"se\umaru.ogg"
>Eden's wings stroke Luka's body!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<10 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4095
if %nanido<2 damage 300,400
if %nanido=2 damage 350,450
if %nanido=3 damage 400,500
dwave 1,"se\umaru.ogg"
>Her soft feathers tickle and rub against his penis!
if %nanido<2 damage 300,400
if %nanido=2 damage 350,450
if %nanido=3 damage 400,500
dwave 1,"se\umaru.ogg"
>Eden's feathers wrap around his penis, stimulating him!
if %nanido<2 damage 300,400
if %nanido=2 damage 350,450
if %nanido=3 damage 400,500
skillname ""
if %mylife=0 sub %stack,1:return *eden_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*eden_a3

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 5
name $name
>Those who were tempted by the serpent were cast out from paradise.\
>I wonder if you can withstand her temptations?\
name ""
skillname "Paradise Lost"
dwave 1,"se\ero_makituki3.ogg"
eng "Eden's serpent-like tentacles coil around Luka's body!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,5
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
>The tentacles rub against his body and penis!
skillcount3 4096
mov %damage_kotei,1
damage 600,700
mov %kousoku,1:gosub *status_print
>Luka has been bound by Eden!\
skillname ""
if %mylife=0 sub %stack,1:return *eden_h3
name $name
>If you're overwhelmed by this pleasure, and come...@
>You will not be allowed into paradise, and instead will be prey to my snake.\
>Given over, you will be trapped in a hell of eternal squeezing.@
>But if you can endure...@> Then an eternal paradise of pleasure awaits.\
name ""
sub %stack,1
goto *eden_a4



*eden_a4

add %stack,1
>Luka has been bound by Eden...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Can you endure the temptation? Or will you give in?":mov $sel2,"Eden's tentacles stroke Luka all over!"
if %ransu=2 mov $sel1,"If you come here, only hell awaits...":mov $sel2,"Eden's tentacles open up at their tips, and suck on Luka's penis!"
if %ransu=3 mov $sel1,"Someone who would give in to this is not qualified for paradise...":mov $sel2,"Eden's tentacles tighten around Luka's penis!"
if %ransu=4 mov $sel1,"Can you stand this stimulus?":mov $sel2,"Eden's writhing tentacles stimulate Luka all over his body!"
if %ransu=5 mov $sel1,"If you come to this, you will receive eternal damnation...":mov $sel2,"Eden's tentacles suck on Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Paradise Lost"
dwave 1,"se\ero_makituki3.ogg"
mov $tatie4,"eden_ha1"
lsp 700,":a;chara\eden_ha1.bmp",0,0:print 10,500
eng $sel2:$sel6
skillcount3 4096
mov %damage_kotei,1
damage 600,700
skillname ""
if %mylife=0 sub %stack,1:return *eden_h3
sub %stack,1
goto *eden_a4



*eden_a5

add %stack,1
mov %owaza_count1b,0
mov %owaza_num1,2
if %kousan=2 skip 5
name $name
>Now, I'll invite you to paradise...@
>Surrender to your baser instincts, and indulge in the finest of pleasures.\
name ""
skillname "Garden of Eden"
eng "Innumerable angels grab hold of Luka's body!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
mov $tatie4,"eden_hb1"
lsp 700,":a;chara\eden_hb1.bmp",0,0:print 10,500
>They caress Luka's body as they draw him closer to Eden!
skillcount3 4097
mov %damage_kotei,1
damage 600,700
mov %kousoku,2:gosub *status_print
>Luka has been bound by Eden!\
skillname ""
if %mylife=0 sub %stack,1:return *eden_h4
name $name
>These angels are a part of my body...@
>In other words, the garden of pleasure is my own being.\
name ""
sub %stack,1
goto *eden_a6



*eden_a6

add %stack,1
>Luka has been bound by Eden...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll invite you to paradise...":mov $sel2,"The angels stroke Luka all over his body!"
if %ransu=2 mov $sel1,"Please come as my angels cover you in saliva...":mov $sel2,"The angels lick every inch of Luka's body!"
if %ransu=3 mov $sel1,"Surrender to my angels' sexual skills...":mov $sel2,"The angels all take turns sucking on Luka's penis!"
if %ransu=4 mov $sel1,"This warm softness is paradise itself.":mov $sel2,"The angels all rub their breasts against Luka's body!"
if %ransu=5 mov $sel1,"Hehe... Enjoy the love my angels can bring.":mov $sel2,"The angels cling to Luka, rubbing their bodies against his!"
name $name
eng $sel1:$sel6\
name ""
skillname "Garden of Eden"
dwave 1,"se\ero_koki1.ogg"
eng $sel2:$sel6
skillcount3 4097
mov %damage_kotei,1
damage 600,700
skillname ""
if %mylife=0 sub %stack,1:return *eden_h4
sub %stack,1
goto *eden_a6



*eden_onedari

mov $list1,"Eden's Serpent"
if %4094>0 mov %list_num1,1
mov $list2,"Seraph's Wings"
if %4095>0 mov %list_num2,1
mov $list3,"Paradise Lost"
if %4096>0 mov %list_num3,1
mov $list4,"Garden of Eden"
if %4097>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *eden_onedari1
if %cmd1=12 goto *eden_onedari2
if %cmd1=13 goto *eden_onedari3
if %cmd1=14 goto *eden_onedari4
if %cmd1=-1 goto *eden_main
goto *eden_onedari



*eden_onedari1

gosub *onedari_syori
name $name
>You wish to be tempted by my serpent?@
>Humans are so foolish...\
name ""
gosub *eden_a1
skip -1



*eden_onedari2

gosub *onedari_syori
name $name
>You want to be embraced by my wings?@
>Then please taste them...\
name ""
gosub *eden_a2
skip -1



*eden_onedari3

if %kousoku<>1 gosub *onedari_syori
if %kousoku=1 gosub *onedari_syori_k
name $name
>You wish to abandon a paradise of pleasure, and instead receive my serpent hell?\
>Humans are beyond saving...\
name ""
if %kousoku<>1 gosub *eden_a3
gosub *eden_a4
skip -1



*eden_onedari4

if %kousoku<>2 gosub *onedari_syori
if %kousoku=2 gosub *onedari_syori_k
name $name
>You wish to soak in an eternity of pleasure?@
>Then I'll make your wish come true...\
name ""
if %kousoku<>2 gosub *eden_a5
gosub *eden_a6
skip -1



*eden_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>As Eden's tentacles overrun Luka's penis, he comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2722,%2722+1:if %2722=1 mov %count_koenemy,%count_koenemy+1
if %2722>%count_most mov %count_most,%2722:mov $count_mostname,$name
count 10,16
mov $bad1,"Eden forced Luka to come with her tentacles."
gosub *face2
name $name
>So you offered your semen to my serpents.@
>After all that, you succumbed to temptation anyway...\
name ""
goto *eden_ha



*eden_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>As Eden's soft wings caress Luka's penis, he comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2722,%2722+1:if %2722=1 mov %count_koenemy,%count_koenemy+1
if %2722>%count_most mov %count_most,%2722:mov $count_mostname,$name
count 13,16
mov $bad1,"Eden forced Luka to come with her wings."
gosub *face2
name $name
>Hehe... You got my feathers all dirty.@
>Next, I'll invite you to paradise...\
name ""
goto *eden_hb



*eden_h3

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>As Eden's tentacles overrun Luka's body, he comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2722,%2722+1:if %2722=1 mov %count_koenemy,%count_koenemy+1
if %2722>%count_most mov %count_most,%2722:mov $count_mostname,$name
count 10,16
mov $bad1,"Eden forced Luka to come with her tentacles."
gosub *face2
name $name
>So you offered your semen to my serpents.@
>After all that, you succumbed to temptation anyway...\
name ""
goto *eden_ha



*eden_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\eden_hb2.bmp",0,0
gosub *syasei2
>As the countless angels caress his body, Luka comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2722,%2722+1:if %2722=1 mov %count_koenemy,%count_koenemy+1
if %2722>%count_most mov %count_most,%2722:mov $count_mostname,$name
count 28,16
mov $bad1,"Eden forced Luka to his finish by inviting him to a garden of pleasure."
gosub *face2
name $name
>Hehe, it's simply divine, isn't it?@
>Next, I'll invite you to paradise...\
name ""
goto *eden_hb



*eden_ha

mov $bad2,"Raped by her tentacles, Luka was subjected to an eternity of milking."
if %2847=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2847,1
if %kousoku=1 mov %hseanwave,22:hseanwave:cspl 690,699:lsp 700,":a;chara\eden_ha2.bmp",0,0:print 10,500:goto *eden_ha2
name "Luka"
>Ahh...\
name ""
>Overrun by her tentacles, I'm brought to my knees.@
>Weak after my climax, I can't summon any more energy to resist.\
name $name
>You cannot enter paradise any longer.@
>Instead, you will be subjected to an eternity of torture from these snakes.\
name ""
name "Luka"
>S...St... Hyaa!\
name ""
dwave 1,"se\ero_makituki3.ogg"
mov %hseanwave,22:hseanwave
cspl 690,699
lsp 700,":a;chara\eden_ha2.bmp",0,0:print 10,500
>Eden's tentacles wrap around my body, sealing off my movements.@
>Their strange, squishy touch fills my senses as they latch on to me.\
>A horrifying shiver runs through me, as their warm slimy skin touches against my naked flesh.\
goto *eden_ha2



*eden_ha2

name "Luka"
>Ahh!\
name ""
name $name
>My snakes' favorite toy is a man's penis.@
>They'll focus on it, and corrupt him...\
name ""
>The tips of the snake-like tentacles open up, and bite down on my penis, bringing me deep into their tight, wet holes.\
>The tentacle's inner shaft is covered in big bumps, rubbing against my glans as it sucks me in.\
name "Luka"
>Haa... Ahh!\
name ""
name $name
>You poor human...@
>Crying out from having your reproductive organ swallowed.\
>That dirty organ of yours will need extra abuse heaped upon it.@
>You shall regret being born a male...\
name ""
name "Luka"
>S...St... Haa!\
name ""
>The tentacles continues sucking on my penis, the bumps rubbing hard against me as I'm forced to rub against the inner walls.\
>My body shakes in uncontrolled pleasure as the sucking tentacle moves me in and out of its mouth.\
name $name
>Oh my... Are you feeling joy at this?@
>At having your penis be devoured by my tentacle?\
>This is no service to you.@
>It's simple stimulation to kill all of your semen.\
name ""
name "Luka"
>Ahhh!!!\
name ""
>The tentacle continues sucking on my penis as she speaks.@
>Something like a tongue reaches out inside it, and starts to lick my penis inside at the same time.\
>With a powerful suck, it pulls me all the way inside, the vacuum seal causing her bumps to rub hard against me.\
>The desire to come overpowers me, as my body relaxes in ecstasy before the climax.\
name "Luka"
>N...No... Ah!\
name ""
gosub *syasei1
lsp 700,":a;chara\eden_ha3.bmp",0,0
gosub *syasei2
>My penis pulses inside the tentacle as I come.@
>Each spurt of semen is sucked up by the tentacle, pulling hard on me to get out every drop.\
name "Luka"
>Haa...\
name ""
name $name
>Did you come? Then I'll kill all of your semen...@
>I can feed on Lucifina's genes like this... Hehe.\
name ""
>The tentacle sucks harder, drawing out the last drops of semen still inside.@
>Even during my orgasm, the milking-like stimulation doesn't stop for a moment...\
name "Luka"
>Stooop... Haa...\
name ""
name $name
>I'll force you to spit out all of your semen with my serpent.@
>Any semen remaining in those balls of yours will be handled right away.\
name ""
>Eden's gaze turns cruel as she laughs.\
name $name
>How does it feel, son of Lucifina?@
>Your semen, full of potential and power... Simply fed on.\
>You cannot hand down your genes to another generation.@
>For it will all be simply fed on by me...\
>A truly pathetic end for your line.@
>I'm sure your mother would be horrified.\
>Her beloved son...@> Now simply my eternal toy.\
name ""
>With a sadistic smile, Eden continues to trample me under her tentacles.@
>Its slimy mouth continues sucking hard on me, drawing out another orgasm.\
name "Luka"
>Haa... Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\eden_ha4.bmp",0,0
gosub *syasei2
>And, almost immediately after my last orgasm, I'm forced to a second.@
>Unable to withstand this stimulus, I'm forced to climax after climax without rest.\
name $name
>Hehehe, so you came again...@
>I can taste Lucifina herself through you...\
>Her genetic line ends right now.@
>Ends as simple food for me...\
name ""
>Her tentacle continues sucking hard on me, swallowing all of my semen, embracing me in unbearable ecstasy.\
name "Luka"
>Ahh... Stop already...\
name ""
name $name
>Now, keep coming...@
>I'll supply you with more pleasure for that purpose.\
>If I suck you like this, you'll come even more...@
>I'm going to take my time to enjoy this.\
name ""
name "Luka"
>Ah... Ahh...@
>Hyaa!\
name ""
>The tentacle sucks even harder, the tight seal rubbing her bumps even harder against my glans.\
gosub *syasei1:gosub *syasei2
>And, completely at her mercy, I explode inside Eden's tentacle again.\
name $name
>Hehe... Your semen is absolutely delicious.@
>The taste of Lucifina's life itself...\
>And I have an eternity to enjoy this.@
>I'll suck everything out of you, without rest...\
name ""
name "Luka"
>Hyaa!\
name ""
gosub *syasei1:gosub *syasei2
>Drunk on her hatred and bliss of revenge, Eden continues greedily sucking up my semen.\
>She will never release me, or allow me to die...@
>There's nothing more to my future, except an eternity of being milked of semen for her to feed on.\
mov %hseanwave,0:hseanwave
gosub *anten
>.............\
goto *badend



*eden_hb

mov $bad2,"Taking every angels sexual techniques in turn, Luka drowns in eternal pleasure."
if %2848=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2848,1
if %kousoku=2 goto *eden_hb2
name "Luka"
>Ahh...\
name ""
>Embracing me in her huge wing, Eden brings me closer.@
>The innumerable bodies of Eden surround me from every direction, holding me motionless.\
name "Luka"
>Guh... Get off!\
name ""
cspl 690,699
lsp 700,":a;chara\eden_hb1.bmp",0,0:print 10,500
>The soft, warm touch of her female body fills me as I struggle.\
name "Eden A"
>Welcome to paradise, Hero Luka.@
>Now have a taste of it...\
name ""
goto *eden_hb2



*eden_hb2

name "Luka"
>Ah...\
name ""
mov %hseanvoice,1:hseanvoice
>One of her body's heads presses against my groin, and sucks in my penis!\
name "Eden B"
>Nnn... *Suck*\
name ""
>Her tongue runs all around the tip of my penis, cleaning it.@
>At the same time, her lips press down right under the neck of my penis.\
name "Eden B"
>Does it feel good?@
>Nnn... *Lick*\
name ""
name "Luka"
>Ahh... That feels good...\
name ""
>My resistance vanishes in a moment, as my senses are fixed on the feeling of my penis inside this angel's mouth.\
>Her tongue relentlessly flicks my tip, as her sucking motions stimulate the rest of my penis.\
name "Luka"
>Haa... The tip... Feels so good...\
name ""
name "Eden B"
>Hehe... Come whenever you want.@
>*Lick* *Suck*\
name ""
>My thoughts flow away as I'm left unable to focus on anything but her mouth.@
>Pre-come leaks from my tip, causing the angel to eagerly lap it up.\
name "Eden B"
>Nnn... *Lick*\
name ""
>Her skilled tongue quickly licks up and down my urethral hole, licking up my pre-come as it leaks.@
>The direct assault on my most sensitive point leaves me gasping.\
name "Luka"
>Ah... That's...\
name ""
>The very tip of her tongue pokes and presses against my opening.@
>As the ticklish pleasure fills me, my lower body tingles as the desire to release comes crashing into me.\
name "Luka"
>Ahh... I'm going to come...\
name ""
gosub *syasei1
lsp 700,":a;chara\eden_hb2.bmp",0,0
gosub *syasei2
>As the angel's tongue licks up and down my tip, I come, exploding into her mouth.\
name "Luka"
>Haa...\
name ""
>The angel eagerly drinks up my semen as I indulge in the ecstasy of my orgasm.\
mov %hseanvoice,0:hseanvoice
name "Eden B"
>Oh dear, you came already, with just that?\
name ""
name "Eden C"
>He seems to be an awfully quick shot, hehe.\
name ""
name "Eden D"
>Did he enjoy it on his urethra the most?@
>I'll lick it for hours, if you want... Hehe.\
name ""
>The angels around me stare and laugh, as I quiver in a mixture of shame and ecstasy.\
name "Eden A"
>You came so fast... But there's no helping it now, I guess.@
>Try to last longer next time...\
name ""
>With a soft smile, the first angel stands up...\
name "Eden C"
>Mmm... *Suck* *Lick*\
name ""
mov %hseanvoice,5:hseanvoice
>While another angel quickly steps forward, and starts sucking on my penis again.\
>Her gentle tongue movements slowly lick up and down my shaft, as her soft lips press down around my base.\
>With her lips locked around my penis, she slowly brings her head back and forth, sliding me in and out of her mouth.\
>Unlike the aggressive stimulation of before, she's much more careful with her technique.\
name "Luka"
>Haa... That feels good...\
name ""
name "Eden C"
>I won't let you come right away, so take your time and enjoy it.@
>*Suck* *Lick*\
name ""
>Her deft tongue licks around my tip, and slides down my back muscle, bringing forth a sigh of ecstasy from me.\
name "Luka"
>Ah... Incredible...\
name ""
name "Eden C"
>I won't finish you off yet...@
>*Suck*\
name ""
>But right before I reach a climax, she slows down, bringing me back from the edge.@
>Like that, she uses her mouth to keep me right on the brink of release.\
name "Eden C"
>Hehe, did you settle down some?@
>*Lick*\
name ""
name "Luka"
>Ah... Ahh!\
name ""
>My entire being focuses on her tongue, gently licking my penis inside her mouth.\
>As her lips slowly make their round trip back and forth, my waist starts to shake in unbearable desire, wanting nothing more than to release.\
name "Luka"
>Ahh... I'm going to come...\
name ""
name "Eden C"
>Nnn... Not yet...\
name ""
>But right before I was about to finally come, she slows down...@
>Her tongue is barely moving now, only doing the bare minimum to keep me from reaching orgasm.\
>A horrifying oral technique, designed to keep me from ever finishing...\
name "Luka"
>Ahh...@
>L...Let me come...\
name ""
>Frustrated, I start to beg the angel.@
>I've been completely hooked by this paradise of pleasure.\
name "Eden A"
>Has he already given up?@
>Then perhaps we can let him come...\
name ""
name "Eden C"
>Understood... Well then...@
>*Suck* *Lick*\
name ""
>Suddenly, the angel's movements become almost violent.@
>Her head bounces back and forth like a piston, her pressed lips rubbing my penis hard.\
>At the same time, her tongue attacks my glans, overwhelming me in a lightning bolt of sudden bliss.\
name "Luka"
>Ahhhh!!!\
name ""
gosub *syasei1
lsp 700,":a;chara\eden_hb3.bmp",0,0
gosub *syasei2
>The moment I reach a climax, the angel starts sucking on me like a vacuum.@
>As my penis pulses inside her, the tight seal pulls on me, sucking out every drop as I spurt it inside her.\
>My entire body is frozen in pleasure, my every sense focused on nothing but the ecstasy of release.@
>I've been completely watered down by these angels...\
name "Luka"
>Haa... So good...\
name ""
lsp 700,":a;chara\eden_hb4.bmp",0,0:print 10,500
name "Eden A"
>Hehe... He has completely melted away.@
>Though he acts as if he has a strong will, he's surprisingly weak to pleasure.\
>You'll be able to taste this forever.@
>Forget everything else, and drown in it...\
name ""
name "Luka"
>Haa... Incredible...\
name ""
>Losing my sanity, I become a slave to this paradise...\
>Every day, I go mad with pleasure as the various angels indulge me in pleasure.\
>Keeping me mindless in eternal pleasure...@
>Eden's strategy to keep me helpless forever.\
name "Eden A"
>It's too early to be satisfied.@
>Every angel is waiting for their turn with you...\
name ""
name "Luka"
>So good... Ah...\
name ""
>I'm not allowed to die...@>My soul is kept in this paradise of pleasure for the rest of eternity.\
mov %hseanvoice,0:hseanvoice
gosub *anten
>...........\
goto *badend



*stein2_start

mov $name,"Promestein"
mov $name2,"Promestein"
mov $lavel,"stein2"
mov $tatie1,"stein2_st01"
mov $tatie2,"stein2_st01"
mov $tatie3,"stein2_st01"
mov $tatie4,"stein2_h1"
mov $haikei,"bg211"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,60000
if %nanido=2 mov %max_enemylife,80000
if %nanido=3 mov %max_enemylife,100000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,50
if %nanido=3 mov %earth_keigen,25
mov %alice_skill,0
mov %music,15
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"I won't release you."
mov $mogaku_sel2,"Just be my food..."
mov $mogaku_sel3,"Don't act like you hate it so much... You'll enjoy it."
mov $mogaku_sel4,"Just give yourself over to me."
mov $mogaku_sel5,"Did you truly think you could escape?"
mov $mogaku_dassyutu1,""
mov $mogaku_dassyutu2,""
mov $mogaku_earth_dassyutu1,"As expected, Gnome's power..."
mov $mogaku_earth_dassyutu2,"You barely managed to escape..."
mov $half_s1,"Don't make me waste my time here."
mov $half_s2,"Hurry up and finish..."
mov $kiki_s1,"Hurry up and finish."
mov $kiki_s2,"Be my food..."
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,3
mov %owaza_count3a,4
>It's like a giant tree of flesh.@
>Disgusting looking petals line her trunk, all the way up...\
name $name
>This is the reason I incorporated that ancient seaweed into my body.\
>That ancient seaweed was more closely linked to Dark God Alipheese than any other monster existing today.\
>Due to that, my affinity for "White Rabbit" is also extremely high!@
>The result... Is this!\
name ""
name "Luka"
>Guh... !@
>What a monstrous body...\
name ""
>An intense feeling of intimidation fills the air.@
>Promestein has turned into something even more horrible than Eden...\
lsp 699,":a;chara\alice_st51b.bmp",-160,0:print 10,500
name "Alice"
>This is the power of the Founder...?\
name ""
name $name
>But even this doesn't reach Black Alice as she is now.@
>That's because she also absorbed Ilias.\
>It was the fusion of holy energy with dark energy that created the ultimate existence.@
>So at the moment, she is the strongest being...\
name ""
csp 699:print 10,500
name "Luka"
>So she ate Ilias for that...?\
name ""
>Black Alice...@> She's become more than just a monster!@
>An existence even more of a threat than Ilias herself was!\
name $name
>But there's something to counter her!@
>And you, Hero Luka, are the key!\
name ""
name "Luka"
>I am!?\
name ""
name $name
>You were born from one of the original angels, an offshoot of Ilias herself.\
>If I take you in, then I will fuse with your holy power...\
>The exact same situation as Black Alice and Ilias.@
>The fusion of Dark and Holy energy will transform me into the ultimate of existences as well!\
name ""
lsp 699,":a;chara\alice_st03b.bmp",-160,0:print 10,500
name "Alice"
>Sheesh... Worthless plans!@
>Do you think we'll let any of that come to pass!?\
name ""
name "Luka"
>Yeah... I won't be eaten by you!\
name ""
name $name
>My explanation was simply an act of kindness.\
>I thought you should know what your death will accomplish, as you are swallowed.\
>No more talk!@
>I shall swallow you whole, your body food for my power!\
name ""
name "Luka"
>No... This is the end for you, Promestein!\
name ""
name "Alice"
>The Founder's power...@> I won't let you use it for evil!\
name ""
csp 699:print 10,500
mov %sinkou,1
goto *common_main



*stein2_v

lsp 700,":a;chara\stein2_st11.bmp",0,0:print 10,500
name $name
>My body... I threw away everything...@
>But I was still unable to reach it...?\
name ""
>Promestein loses all strength to fight...\
mov %viclose,1:gosub *victory
mov %getexp,700000:gosub *lvup
mov %2423,1
goto *sean0410



*stein2_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>So you want to be eaten?@
>Then I'll take every piece of you as energy for me...\
name ""
goto *stein2_a



*stein2_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *stein2_kousan
if %cmd1=16 goto *stein2_onedari
if %cmd1=17 goto *common_skill
goto *stein2_main



*stein2_a

if %kousan=0 && %kousoku=0 gosub *alice_skillx
if %kousoku=1 gosub *stein2_a4:goto *common_main
if %kousoku=2 gosub *stein2_a5:goto *common_main
if %enemy_earth=3 gosub *stein2_a3:goto *common_main
rnd2 %ransu,1,6
if %ransu=1 gosub *stein2_a1:goto *common_main
if %ransu=2 gosub *stein2_a2:goto *common_main
if %ransu<5 && %owaza_count1a>4 gosub *stein2_a3:goto *common_main
if %ransu=5 && %owaza_count3a>5 && %enemy_wind=0 && %enemy_earth=0 gosub *stein2_el1:goto *common_main
if %ransu=6 && %owaza_count3a>5 && %enemy_wind=0 && %enemy_earth=0 gosub *stein2_el2:goto *common_main
skip -6



*stein2_el1

add %stack,1
mov %owaza_count3a,0
name $name
>Come, Zylphe...\
name ""
skillname "Wind Spirit Summon"
mov %enemy_wind,4
mov %kaihi_el,50
dwave 2,"se\wind2.ogg"
lsp2 0,":a;chara\zylphe_st02.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *enemy_elm_print
>Promestein summons a spirit of wind!\
skillname ""
sub %stack,1
return



*stein2_el2

add %stack,1
mov %owaza_count3a,0
name $name
>Come, Gnomaren...\
name ""
skillname "Summon Earth Spirit"
mov %enemy_earth,4
mov %damage_keigen_el,50
dwave 2,"se\earth1.ogg"
lsp2 0,":a;chara\gnomaren_st01.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *enemy_elm_print
>Promestein summons a spirit of earth!\
skillname ""
sub %stack,1
return



*stein2_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Even with this enlarged body..."
if %ransu=2 mov $sel1,"Taste my tentacles..."
if %ransu=3 mov $sel1,"Can you withstand this?"
name $name
eng $sel1:$sel6\
name ""
skillname "Swede Demosu"
dwave 1,"se\ero_syokusyu3.ogg"
>Promestein's tentacles run all over Luka's body!
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,5
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4098
mov %earth_keigen_el,70
if %nanido<2 damage 300,400
if %nanido=2 damage 350,450
if %nanido=3 damage 400,500
dwave 1,"se\ero_syokusyu2.ogg"
>Her tentacles coil around his penis!
mov %earth_keigen_el,70
if %nanido<2 damage 300,400
if %nanido=2 damage 350,450
if %nanido=3 damage 400,500
dwave 1,"se\ero_koki1.ogg"
>They stroke him hard, up and down!
mov %earth_keigen_el,70
if %nanido<2 damage 300,400
if %nanido=2 damage 350,450
if %nanido=3 damage 400,500
if %enemy_wind=0 skip 13
dwave 1,"se\ero_koki1.ogg"
>More tentacles envelope his penis!
mov %earth_keigen_el,70
if %nanido<2 damage 300,400
if %nanido=2 damage 350,450
if %nanido=3 damage 400,500
dwave 1,"se\ero_koki1.ogg"
>They overrun him!
mov %earth_keigen_el,70
if %nanido<2 damage 300,400
if %nanido=2 damage 350,450
if %nanido=3 damage 400,500
skillname ""
if %mylife=0 sub %stack,1:return *stein2_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*stein2_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Shall I partake of your energy?"
if %ransu=2 mov $sel1,"Pour your semen inside..."
if %ransu=3 mov $sel1,"These tentacles are for semen harvesting... You can't endure them."
name $name
eng $sel1:$sel6\
name ""
skillname "Stipe Suck"
dwave 1,"se\ero_buchu1.ogg"
>One of Promestein's tentacles sucks in Luka's penis!
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,5
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4099
mov %earth_keigen_el,70
if %nanido<2 damage 350,450
if %nanido=2 damage 400,500
if %nanido=3 damage 450,550
dwave 1,"se\ero_chupa6.ogg"
>The tentacle sucks hard on him, drawing out his energy!
mov %earth_keigen_el,70
if %nanido<2 damage 350,450
if %nanido=2 damage 400,500
if %nanido=3 damage 450,550
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
if %enemy_wind=0 skip 9
dwave 1,"se\ero_chupa6.ogg"
>The vacuum-like suction forcefully draws out his energy!
mov %earth_keigen_el,70
if %nanido<2 damage 350,450
if %nanido=2 damage 400,500
if %nanido=3 damage 450,550
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
if %enemy_wind=0 skip 17
dwave 1,"se\ero_chupa6.ogg"
>The tentacles interior walls vibrate at the same time!
mov %earth_keigen_el,70
if %nanido<2 damage 350,450
if %nanido=2 damage 400,500
if %nanido=3 damage 450,550
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
dwave 1,"se\ero_chupa6.ogg"
>The soft flesh chews on him as it sucks, drawing out his energy!
mov %earth_keigen_el,70
if %nanido<2 damage 350,450
if %nanido=2 damage 400,500
if %nanido=3 damage 450,550
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *stein2_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*stein2_a3

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 7
name $name
if %first_sel1=1 skip 3
>Now, it's time to prey on your body...\
skip 2
>This time, I'll prey on you...\
name ""
skillname "Swede Gigantea"
dwave 1,"se\ero_makituki3.ogg"
eng "Countless tentacles coil around Luka's body, drawing him toward Promestein's mouth!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,5
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
mov $tatie4,"stein2_h1"
mov %kousoku,1:gosub *status_print
>Luka has been bound by Promestein!\
skillname ""
name $name
>Hehe, there's no need to be afraid.@
>You'll taste unmatched pleasure as you bring me to ultimate power...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,99
if %earth=0 && %nanido=2 mov %genmogaku,99
if %earth=0 && %nanido=3 mov %genmogaku,99
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,1
if %enemy_earth>0 mov %genmogaku,99
sub %stack,1
return



*stein2_a4

add %stack,1
>Luka has been bound by Promestein...\
name $name
>Don't move.@
>Just leave it all to my mouth...\
name ""
skillname "Swede Gigantea"
dwave 1,"se\ero_makituki3.ogg"
mov $tatie4,"stein2_h2"
lsp 700,":a;chara\stein2_h2.bmp",0,0:print 10,500
>Promestein's wide open mouth is in front of Luka's eyes!\
mov %kousoku,2
skillname ""
name $name
>I'll swallow you whole now...@
>You'll be swallowed by this mouth.\
name ""
name "Luka"
>Ah...\
name ""
>Tentacles are wriggling all over the place, dripping saliva-like mucus.\
>Her horrible mouth is right in front of me.@>If I don't escape now, I'll be eaten...\
sub %stack,1
return



*stein2_a5

add %stack,1
>Luka has been bound by Promestein...\
name $name
>Now to eat you...\
name ""
skillname "Swede Gigantea"
dwave 1,"se\ero_makituki3.ogg"
mov $tatie4,"stein2_h3"
lsp 700,":a;chara\stein2_h3.bmp",0,0
lsp 690,":a;chara\stein2_ct01.bmp",0,0:print 10,500
skillcount3 4100
>Promestein's mouth closes around Luka!\
>Luka's penis rubs against the sides of Promestein's mouth, stimulating him!
mov %damage_kotei,1
damage 600,700
mov %kousoku,3
skillname ""
if %mylife=0 sub %stack,1:return *stein2_h3
name "Luka"
>Hyaa!\
name ""
name $name
>I thought about swallowing you whole right away...@
>But this body is craving your semen.\
>First, I'll have you come inside my mouth.@
>But don't worry... It will feel good for you, too.\
name ""
sub %stack,1
goto *stein2_a6



*stein2_a6

add %stack,1
>Luka is trapped inside Promestein's predatory mouth...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll draw out every drop of your semen...":mov $sel2,"Luka's penis is sucked on inside Promestein's mouth!"
if %ransu=2 mov $sel1,"Do you want to be sucked? Or squeezed?":mov $sel2,"Promestein sucks on Luka's body with her huge predation mouth!"
if %ransu=3 mov $sel1,"Hehe... How does it feel, moments before being swallowed?":mov $sel2,"The wavy walls of Promestein's mouth rub against Luka's penis!"
if %ransu=4 mov $sel1,"Has it always been your desire to be swallowed?":mov $sel2,"Promestein chews on Luka's penis with her toothless flesh!"
if %ransu=5 mov $sel1,"Every one of my tentacles is like a tongue...":mov $sel2,"Countless tentacles, dripping with mucus, rub Luka's body!"
name $name
eng $sel1:$sel6\
name ""
skillname "Swede Gigantea"
dwave 1,"se\ero_makituki3.ogg"
eng $sel2:$sel6
skillcount3 4100
mov %damage_kotei,1
damage 600,700
skillname ""
if %mylife=0 sub %stack,1:return *stein2_h3
sub %stack,1
goto *stein2_a6



*stein2_onedari

mov $list1,"Swede Demosu"
if %4098>0 mov %list_num1,1
mov $list2,"Stipe Suck"
if %4099>0 mov %list_num2,1
mov $list3,"Swede Gigantea"
if %4100>0 mov %list_num3,1
gosub *cmd_onedari
if %cmd1=11 goto *stein2_onedari1
if %cmd1=12 goto *stein2_onedari2
if %cmd1=13 goto *stein2_onedari3
if %cmd1=-1 goto *stein2_main
goto *stein2_onedari



*stein2_onedari1

gosub *onedari_syori
name $name
>You want to feel my tentacles on your penis?@
>Then I'll swallow you after that...\
name ""
gosub *stein2_el1
gosub *stein2_a1
skip -1



*stein2_onedari2

gosub *onedari_syori
name $name
>So you want me to suck you with this tentacle?@
>Then I'll swallow you after that...\
name ""
gosub *stein2_el1
gosub *stein2_a2
skip -1



*stein2_onedari3

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want to be swallowed right away?@
>Then I shall let you taste the joy of a man, at the very least...\
name ""
if %kousoku=0 gosub *stein2_a3
if %kousoku=1 gosub *stein2_a4
if %kousoku=2 gosub *stein2_a5
gosub *stein2_a6
skip -1



*stein2_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\stein2_bk01.bmp",0,0
gosub *syasei2
>As the tentacles run all over his body, Luka comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2723,%2723+1:if %2723=1 mov %count_koenemy,%count_koenemy+1
if %2723>%count_most mov %count_most,%2723:mov $count_mostname,$name+" (Final)"
count 10,11
mov $bad1,"Promestein forced Luka to come with her tentacles."
gosub *face2
name $name
>Already? Such a short pleasure...@
>No... I suppose the true fun still awaits.\
name ""
goto *stein2_h



*stein2_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\stein2_bk02.bmp",0,0
gosub *syasei2
>As Promestein's tentacle sucks on Luka's penis, he comes, filling it with semen.\
mov %viclose,1:gosub *lose
mov %2723,%2723+1:if %2723=1 mov %count_koenemy,%count_koenemy+1
if %2723>%count_most mov %count_most,%2723:mov $count_mostname,$name+" (Final)"
count 10,11
mov $bad1,"Promestein forced Luka to come with her tentacles."
gosub *face2
name $name
>Already? Such a short pleasure...@
>No... I suppose the true fun still awaits.\
name ""
goto *stein2_h



*stein2_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\stein2_ct02.bmp",0,0
gosub *syasei2
>As Luka's entire body is sucked on inside her mouth, he comes, covering her tentacles with semen.\
mov %viclose,1:gosub *lose
mov %2723,%2723+1:if %2723=1 mov %count_koenemy,%count_koenemy+1
if %2723>%count_most mov %count_most,%2723:mov $count_mostname,$name+" (Final)"
count 33,11
mov $bad1,"Luka was forced to come while stuck inside Promestein's mouth."
gosub *face2
name $name
>The digestion hasn't even started yet... And you've already come?@
>I'll just have to make this last longer, then...\
name ""
goto *stein2_h



*stein2_h

mov $bad2,"After his semen was sucked dry, Luka was swallowed whole."
if %2723=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku=3 mov %hseanwave,11:hseanwave:goto *stein2_hb
name "Luka"
>Ahh...\
name ""
dwave 1,"se\ero_makituki2.ogg"
cspl 690,699
lsp 700,":a;chara\stein2_h1.bmp",0,0:print 10,500
>Promestein's tentacles reach out, and grab hold of my body.@
>And easily moves me closer to her body...\
name "Luka"
>Guh... Stop...!\
name ""
name $name
>I'll swallow you, and use you as food.@
>But before that, I need to punish you for humiliating me before...\
name ""
dwave 1,"se\ero_makituki3.ogg"
lsp 700,":a;chara\stein2_h2.bmp",0,0:print 10,500
>Promestein's mouth looms right in front of my eyes...@
>Her mouth opens, and takes me inside...\
name "Luka"
>Ahhh!!!\
name ""
mov %hseanwave,11:hseanwave
lsp 700,":a;chara\stein2_h3.bmp",0,0:print 10,500
>But she doesn't swallow me all at once.@
>The tentacles hold me from behind, pushing me against her gaping mouth.\
>My penis is all the way inside her...@
>Her wet, saliva filled mouth is all around my sensitive organ...\
goto *stein2_hb



*stein2_hb

name "Luka"
>Hya!@> Ahh!\
name ""
lsp 690,":a;chara\stein2_ct01.bmp",0,0:print 10,500
>It's like her entire mouth is chewing on me...@> The soft flesh rubs and bites into my penis.\
>Countless tongue-like feelers rub against me, causing my penis to get erect in seconds.\
name $name
>Hehehe... How does it feel, having your penis sucked by the mouth that will swallow you whole?\
>And look... You're feeling pleasure from it.@> So humiliating...\
>But I'll make you experience further shame than this.@
>At the least, I'll force you to come inside the mouth that will eat you.\
name ""
name "Luka"
>N...No... Ah...\
name ""
>The soft, wet walls chew and rub against my penis, wrapping me up in sweet pleasure.@
>The tiny projections inside her mouth attack my penis at the same time, leading me to the edge in only seconds.\
name "Luka"
>Ahh... I'm going to come...\
name ""
>The thought of coming inside her mouth freezes my mind in horror.@
>But with her holding me so tightly, I can't pull out.\
>No matter how I struggle and try to endure it, the numbing sensation only grows stronger...\
name "Luka"
>N...No more... Ahh!\
name ""
gosub *syasei1
lsp 690,":a;chara\stein2_ct02.bmp",0,0
gosub *syasei2
>Unable to hold on any longer, my body shakes as I explode inside her.@
>The humiliation and pleasure mix together as I spurt my white semen inside...\
name $name
>Haha... So you can even come there, can you?@
>It isn't even a female's genitals... It's just a mouth to eat with!\
name ""
name "Luka"
>Ahhh...\
name ""
>Promestein laughs as her giant mouth continues to suck on me, drawing out the last bits of semen.\
name $name
>Now that you've shot out all of your semen, it's time to eat you.@
>But don't worry, being swallowed whole isn't something to be afraid of.\
>Actually, it will take a while to digest you.@
>You'll come over and over as you go mad in pleasure, while you dissolve away...\
name ""
name "Luka"
>Stop... Help me...@
>Ahh!\
name ""
mov %hseanwave,13:hseanwave
lsp 690,":a;chara\stein2_ct03.bmp",0,0
lsp 700,":a;chara\stein2_h4.bmp",0,0:print 10,500
>My body is helplessly drawn inside.@
>Tentacles from inside her body reach out and latch onto me, drawing me deeper...\
name "Luka"
>Ahhh!\
name ""
>Soft, fleshy meat squirms around my penis as I'm pulled inside...\
gosub *syasei1
lsp 690,":a;chara\stein2_ct04.bmp",0,0
lsp 700,":a;chara\stein2_h5.bmp",0,0:print 10,500
gosub *syasei2
>And even while being swallowed, I'm brought to another orgasm.@
>The shame of the situation is enough to make me stop struggling.\
name $name
>Another climax? Really?@
>Coming while being swallowed...@>How can you live with yourself?\
>...Well, your life will be over soon enough, anyway.\
name ""
name "Luka"
>Ahhh!\
name ""
csp 690
lsp 700,":a;chara\stein2_h6.bmp",0,0:print 10,500
>With that last insult, I'm taken all the way inside.@
>Still in a daze from my orgasm, I'm swallowed alive by Promestein...\
if %hosyoku_cut=1 goto *hosyoku_cut
lsp 690,":a;chara\stein2_ct11.bmp",0,0:print 10,500
name "Luka"
>Ah...uh...\
name ""
>...Am I inside her stomach?@
>Wrapped in warm pleasure, I can't bring myself to resist.\
>Walls of meat surround me in every direction, as tentacles stroke my body...@
>I'm able to see my own body slowly dissolve away.\
name "Luka"
>Haaa...\
name ""
>But I merely sigh in ecstasy.@
>I never thought this would feel so good...\
name "Luka"
>Ahh... Am I dissolving here, too...?\
name ""
>Tentacles, dripping with digestive juices, stroke my penis without stopping.@
>The comforting ecstasy only gets more powerful...\
name "Luka"
>Ahh... I'm going to come again...\
name ""
gosub *syasei1
lsp 690,":a;chara\stein2_ct12.bmp",0,0
gosub *syasei2
lsp 690,":a;chara\stein2_ct13.bmp",0,0:print 10,500
>The same time I come, more digestive juices are pumped into her stomach, raising the level.@
>Even though I'm in a trance of ecstasy, I still can't escape my fear of being eaten...\
name "Luka"
>Ahh... Help...\
name ""
lsp 690,":a;chara\stein2_ct14.bmp",0,0:print 10,500
>As more fluids are pumped in, more tentacles reach out to caress my body.@
>Their pleasure causes my male instinct to rejoice...\
gosub *syasei1:gosub *syasei2
>And along with another powerful orgasm, the last of my fear finally vanishes.\
name "Luka"
>Haa... I'm being digested...\
name ""
lsp 690,":a;chara\stein2_ct15.bmp",0,0:print 10,500
>As I writhe around in bliss, I'm at last fully immersed in her digestive juices.\
name "Luka"
>It feels so good... Ahh...\
name ""
gosub *syasei1
lsp 690,":a;chara\stein2_ct16.bmp",0,0
gosub *syasei2
>I come over and over again, as my body melts away.@
>All of my semen is simply dissolved by her juices, and treated as extra nutrients...\
name "Luka"
>Ah...ah...\
name ""
>Like that, I'm digested away, brought to repeated orgasms even as I'm consumed for food...\
name "Luka"
>.............\
name ""
>In his last moments, Luka was overwhelmed by the ecstasy of being preyed on by Promestein...\
mov %hseanwave,0:hseanwave
gosub *anten
>.............\
goto *badend



*alice8th2_start

mov $name,"Black Alice"
mov $name2,"Black Alice"
mov $lavel,"alice8th2"
mov $tatie1,"alice8th2_st01"
mov $tatie2,"alice8th2_st02"
mov $tatie3,"alice8th2_st03"
mov $tatie4,"alice8th2_st21"
mov $haikei,"bg212"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,65000
if %nanido=2 mov %max_enemylife,85000
if %nanido=3 mov %max_enemylife,95000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,50
if %nanido=3 mov %earth_keigen,25
mov %alice_skill,0
mov %music,5
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free from Black Alice!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Sucking men dry... Wonderful."
mov $mogaku_sel2,"You should just surrender to pleasure..."
mov $mogaku_sel3,"Hehe... You are helpless before me."
mov $mogaku_sel4,"I love your wretched struggling..."
mov $mogaku_sel5,"How pathetic... You should accept a woman's invitation."
mov $mogaku_dassyutu1,"Refusing my invitation? How rude..."
mov $mogaku_dassyutu2,""
mov $mogaku_earth_dassyutu1,"Gnome... Tactless power."
mov $mogaku_earth_dassyutu2,"She should learn not to interrupt things..."
mov $half_s1,"This body is wonderful..."
mov $half_s2,"If you would like, I'll show you all of its pleasures..."
mov $kiki_s1,"Oh my, are you already going to come?"
mov $kiki_s2,"And so fast, too... Hehe, you need more punishment."
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,7
mov %owaza_count3a,4
mov %owaza_count3b,19
name $name
>Hehe... This is my power.@
>The ultimate power... A fusion of the Dark God and Ilias...\
name ""
name "Luka"
>Guh...!\
name ""
lsp 700,":a;chara\alice_st51b.bmp",-160,0
lsp 701,":a;chara\alice8th2_st01.bmp",160,0:print 10,500
name "Alice"
>You abomination...@
>We will bring you down for the sake of the world!\
name ""
>Her body wriggles as the abominable aura of power fills the atmosphere.\
>She is by far the strongest enemy I've ever faced...\
csp 701
gosub *face1
name $name
>Now let's dance, my beloved partner.@
>If you embarrass me, I'll eat you in a flash...\
name ""
mov %sinkou,1
goto *common_main



*alice8th2_v

mov $tatie1,"alice8th2_st01"
mov $tatie2,"alice8th2_st02"
mov $tatie3,"alice8th2_st03"
gosub *face1
name "Luka"
>Haa... Haa...\
name ""
>Even though I'm being overwhelmed, I managed to drive her into a corner!@
>If I attack now, I should be able to win!\
name ""
bgm "bgm\maou2.ogg"
name $name
>Hehe... What an energetic man.@
>You're even more lovely than Heinrich was...\
>You leave me no choice.@
>Shall I show you my true form?\
name ""
name "Luka"
>True form?@> You can't seriously be...\
name ""
>Black Alice wasn't showing her true power yet?@
>Her horrifying body starts to undergo even more changes...\
dwave 1,"se\ero_makituki4.ogg"
>Her body expands, tearing apart all her clothes.@
>The countless tentacles expand, filling more of the area.\
>That leech like organ in her lower body grows, and turns into a huge snake body...\
if %battle_auto=1 skipoff
mov %battle,0
mov %count_ko,%count_ko+1
if %nanido=0 skip 6
if %mylife=%max_mylife && %nodamage=0 mov %count_hpfull,1
if %nanido=3 mov %count_hellvic,1
if %status=7 mov %count_vickonran,1
if %counter>0 mov %counterk,1
if %alice_skill=1 mov %alicek,1
if %zukanon=1 return *zukan_commonkaisou0
mov %2424,1
goto *alice8th3_start



*alice8th2_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>Hehe... Do want to mate with this body?@
>I will fulfill your immoral desire...\
name ""
goto *alice8th2_a



*alice8th2_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *alice8th2_kousan
if %cmd1=16 goto *alice8th2_onedari
if %cmd1=17 goto *common_skill
goto *alice8th2_main



*alice8th2_a

if %kousan=0 && %kousoku=0 && %hanyo6=0 gosub *alice_skillx
if %hanyo6=1 gosub *alice8th2_a9:goto *common_main
if %kousoku=1 gosub *alice8th2_a6:goto *common_main
rnd2 %ransu,1,7
if %ransu=1 gosub *alice8th2_a1:goto *common_main
if %ransu=2 gosub *alice8th2_a2:goto *common_main
if %ransu=3 gosub *alice8th2_a3:goto *common_main
if %ransu=4 && %owaza_count3a>5 gosub *alice8th2_a4:goto *common_main
if %ransu=5 && %owaza_count1a>8 gosub *alice8th2_a5:goto *common_main
if %ransu>5 && %owaza_count3b>20 gosub *alice8th2_a7:goto *common_main
skip -7



*alice8th2_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Melt away in this caress..."
if %ransu=2 mov $sel1,"Will you finish just from having it played with a little?"
if %ransu=3 mov $sel1,"Come all over this hand..."
name $name
eng $sel1:$sel6\
name ""
skillname "Sweet Demonic Palm"
dwave 1,"se\ero_koki1.ogg"
>Black Alice strokes Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4101
if %nanido<2 damage 700,800
if %nanido=2 damage 800,900
if %nanido=3 damage 900,1000
skillname ""
if %mylife=0 sub %stack,1:return *alice8th2_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*alice8th2_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Shall I suck it directly out?"
if %ransu=2 mov $sel1,"I'll suck out your energy and semen both..."
if %ransu=3 mov $sel1,"I'll make you feel good as I draw out your energy..."
name $name
eng $sel1:$sel6\
name ""
skillname "Sweet Demonic Lips"
dwave 1,"se\ero_buchu2.ogg"
>Black Alice sucks hard on Luka's penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4102
if %nanido<2 damage 730,830
if %nanido=2 damage 830,930
if %nanido=3 damage 930,1030
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *alice8th2_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*alice8th2_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You may not have been able to tell because of my clothes, but I can do this too..."
if %ransu=2 mov $sel1,"It's hard to see under my clothes, but they're actually quite big..."
if %ransu=3 mov $sel1,"Isn't it every man's dream to give their semen to a woman's breasts?"
name $name
eng $sel1:$sel6\
name ""
skillname "Sweet Demonic Breasts"
dwave 1,"se\ero_sigoki1.ogg"
>Black Alice presses Luka's penis against her breasts over her clothes, rubbing them against him!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4103
if %nanido<2 damage 750,850
if %nanido=2 damage 850,950
if %nanido=3 damage 950,1050
skillname ""
if %mylife=0 sub %stack,1:return *alice8th2_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*alice8th2_a4

add %stack,1
mov %owaza_count3a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Enjoying my tentacles... How shameful."
if %ransu=2 mov $sel1,"How does it feel to be toyed with here?"
if %ransu=3 mov $sel1,"I'll take my time in toying with you..."
name $name
eng $sel1:$sel6\
name ""
skillname "Sweet Demonic Tentacles"
dwave 1,"se\ero_syokusyu1.ogg"
>Black Alice's tentacles caress Luka all over his body!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4104
if %nanido<2 damage 300,400
if %nanido=2 damage 350,450
if %nanido=3 damage 400,500
dwave 1,"se\ero_syokusyu2.ogg"
>The tentacles around his penis massage him!
if %nanido<2 damage 300,400
if %nanido=2 damage 350,450
if %nanido=3 damage 400,500
dwave 1,"se\ero_buchu1.ogg"
>The tentacles with openings take turns sucking on his penis!
if %nanido<2 damage 300,400
if %nanido=2 damage 350,450
if %nanido=3 damage 400,500
skillname ""
if %mylife=0 sub %stack,1:return *alice8th2_h4
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*alice8th2_a5

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 5
name $name
>I'll have you treat me to your semen.@
>Right inside the mouths of my tentacles...\
name ""
skillname "Sweet Demonic Prison"
dwave 1,"se\ero_syokusyu3.ogg"
eng "Black Alice's tentacles coil around Luka's body!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
dwave 2,"se\ero_buchu1.ogg"
lsp 700,":a;chara\alice8th2_st21.bmp",0,0
lsp 690,":a;chara\alice8th2_ct01.bmp",0,0:print 10,500
lsp 690,":a;chara\alice8th2_ct02.bmp",0,0:print 10,500
>One of her tentacles sucks in Luka's penis!
skillcount3 4105
if %nanido<2 damage 500,600
if %nanido=2 damage 600,700
if %nanido=3 damage 700,800
mov %kousoku,1:gosub *status_print
>Luka has been bound by Black Alice!\
skillname ""
if %mylife=0 sub %stack,1:return *alice8th2_h5
name $name
>You don't need to do anything, for I'll suck it all out.\
>Just keep coming until you're dried out...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,99
if %earth=0 && %nanido=2 mov %genmogaku,99
if %earth=0 && %nanido=3 mov %genmogaku,99
if %earth>0 && %nanido<2 mov %genmogaku,2
if %earth>0 && %nanido=2 mov %genmogaku,2
if %earth>0 && %nanido=3 mov %genmogaku,3
sub %stack,1
return



*alice8th2_a6

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll suck it out nice and slowly..."
if %ransu=2 mov $sel1,"Give your semen to my tentacle..."
if %ransu=3 mov $sel1,"This tentacle was created for this purpose... Doesn't it feel good?"
name $name
eng $sel1:$sel6\
name ""
skillname "Sweet Demonic Prison"
dwave 1,"se\ero_buchu1.ogg"
>Black Alice's tentacle sucks hard on Luka's penis!
skillcount3 4105
if %nanido<2 damage 200,250
if %nanido=2 damage 250,300
if %nanido=3 damage 300,350
dwave 1,"se\ero_syokusyu2.ogg"
>The tentacle moves back and forth as it sucks!
if %nanido<2 damage 200,250
if %nanido=2 damage 250,300
if %nanido=3 damage 300,350
dwave 1,"se\ero_buchu1.ogg"
>The wavy walls of the tentacle rub against Luka's glans, as the vacuum sucks on him!
if %nanido<2 damage 200,250
if %nanido=2 damage 250,300
if %nanido=3 damage 300,350
skillname ""
if %mylife=0 sub %stack,1:return *alice8th2_h5
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*alice8th2_a7

add %stack,1
name $name
>This is slightly disgraceful...@
>But perhaps I'll show my other mouth to you...\
name ""
skillname "Predatory Mouth Release"
mov $tatie1,"alice8th2_st11"
mov $tatie2,"alice8th2_st11"
mov $tatie3,"alice8th2_st11"
gosub *face1
>Black Alice rolls up her skirt, and prepares to attack!\
skillname ""
name $name
>Isn't it simply fascinating?@
>Well? Do you want to be swallowed here...?\
name ""
mov %hanyo6,1
sub %stack,1
return



*alice8th2_a9

add %stack,1
mov %hanyo6,0
mov %owaza_count3b,0
name $name
>Then I'll partake of you...\
name ""
skillname "Demonic Predation"
dwave 1,"se\ero_syokusyu3.ogg"
eng "Black Alice's tentacles coil around Luka's body!":$sel6/
if %daten>0 mov $tatie1,"alice8th2_st01":mov $tatie2,"alice8th2_st02":mov $tatie3,"alice8th2_st03":gosub *face1:mov %tamek,1:goto *skill22x
\
>They draw him into her mouth!
skillcount3 4106
mov %damage_kotei,1
damage 700,800
mov $tatie4,"alice8th2_st23"
lsp 700,":a;chara\alice8th2_st23.bmp",0,0:print 10,500
mov %kousoku,2:gosub *status_print
>Luka's body is stuck in Black Alice's predatory mouth!\
skillname ""
if %mylife=0 sub %stack,1:return *alice8th2_h6
name "Luka"
>Ahhh!!!\
name ""
name $name
>Hehehe... Normally I'd swallow you whole right away...\
>But shall I toy with you a little before I eat?\
name ""
sub %stack,1
goto *alice8th2_a10



*alice8th2_a10

add %stack,1
>Luka is being raped by Black Alice...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll tease it like this...":mov $sel2,"Black Alice's predatory mouth sucks on Luka's lower body!"
if %ransu=2 mov $sel1,"Hehehe... You can come inside my mouth whenever you want...":mov $sel2,"The soft flesh inside her mouth chews on Luka's penis!"
if %ransu=3 mov $sel1,"I'll eat your body like this...":mov $sel2,"The inner walls of her mouth moves and chews on Luka's body!"
if %ransu=4 mov $sel1,"Get a good taste of my tentacles...":mov $sel2,"Countless tentacles inside Black Alice's mouth rub against Luka's body!"
if %ransu=5 mov $sel1,"Wouldn't it feel good to be digested away like this?":mov $sel2,"Black Alice's toothless mouth chews on Luka's body!"
name $name
eng $sel1:$sel6\
name ""
skillname "Demonic Predation"
dwave 1,"se\ero_chupa4.ogg"
eng $sel2:$sel6
skillcount3 4106
mov %damage_kotei,1
damage 700,800
skillname ""
if %mylife=0 sub %stack,1:return *alice8th2_h6
sub %stack,1
goto *alice8th2_a10



*alice8th2_onedari

mov $list1,"Sweet Demonic Palm"
if %4101>0 mov %list_num1,1
mov $list2,"Sweet Demonic Lips"
if %4102>0 mov %list_num2,1
mov $list3,"Sweet Demonic Breasts"
if %4103>0 mov %list_num3,1
mov $list4,"Sweet Demonic Tentacles"
if %4104>0 mov %list_num4,1
mov $list5,"Sweet Demonic Prison"
if %4105>0 mov %list_num5,1
mov $list6,"Demonic Predation"
if %4106>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *alice8th2_onedari1
if %cmd1=12 goto *alice8th2_onedari2
if %cmd1=13 goto *alice8th2_onedari3
if %cmd1=14 goto *alice8th2_onedari4
if %cmd1=15 goto *alice8th2_onedari5
if %cmd1=16 goto *alice8th2_onedari6
if %cmd1=-1 goto *alice8th2_main
goto *alice8th2_onedari



*alice8th2_onedari1

gosub *onedari_syori
name $name
>You want to be finished by my hands?@
>Then I'll have you come in my palm...\
name ""
gosub *alice8th2_a1
skip -1



*alice8th2_onedari2

gosub *onedari_syori
name $name
>You want to be finished by my mouth?@
>Then I'll have you come in my mouth...\
name ""
gosub *alice8th2_a2
skip -1



*alice8th2_onedari3

gosub *onedari_syori
name $name
>You want to be finished by my breasts?@
>Then I'll have you come on my chest...\
name ""
gosub *alice8th2_a3
skip -1



*alice8th2_onedari4

gosub *onedari_syori
name $name
>You want to be finished by my tentacles?@
>Then I'll have you come all over them...\
name ""
gosub *alice8th2_a4
skip -1



*alice8th2_onedari5

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>Teehee... You want to be bound by my tentacles, and stroked?@
>Then I'll have you give your semen to them...\
name ""
if %kousoku=0 gosub *alice8th2_a5
gosub *alice8th2_a6
skip -1



*alice8th2_onedari6

gosub *onedari_syori
name $name
>Teehee... You want me to eat you?@
>Then I'll give you the pleasure of being prey...\
name ""
gosub *alice8th2_a9
skip -1



*alice8th2_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\alice8th2_bk03.bmp",0,0
gosub *syasei2
>As Black Alice strokes his penis, Luka comes, covering her hands with semen.\
mov %viclose,1:gosub *lose
mov %2724,%2724+1:if %2724=1 mov %count_koenemy,%count_koenemy+1
if %2724>%count_most mov %count_most,%2724:mov $count_mostname,$name+" (2)"
count 5,5
mov $bad1,"Black Alice forced Luka to come with her hands."
gosub *face2
name $name
>Hehe, so you got my hands dirty with your semen...@
>Are you satisfied?@> But I'm not, yet...\
name ""
goto *alice8th2_h



*alice8th2_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\alice8th2_bk01.bmp",0,0
gosub *syasei2
>As Black Alice sucks on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2724,%2724+1:if %2724=1 mov %count_koenemy,%count_koenemy+1
if %2724>%count_most mov %count_most,%2724:mov $count_mostname,$name+" (2)"
count 5,4
mov $bad1,"Black Alice forced Luka to come with her mouth."
gosub *face2
name $name
>Hehe, so you got my mouth dirty with your semen...@
>Are you satisfied?@> But I'm not, yet...\
name ""
goto *alice8th2_h



*alice8th2_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\alice8th2_bk02.bmp",0,0
gosub *syasei2
>As Black Alice squeezes Luka's penis between her soft breasts, he comes, covering her chest with semen.\
mov %viclose,1:gosub *lose
mov %2724,%2724+1:if %2724=1 mov %count_koenemy,%count_koenemy+1
if %2724>%count_most mov %count_most,%2724:mov $count_mostname,$name+" (2)"
count 7,4
mov $bad1,"Black Alice forced Luka to come with her breasts."
gosub *face2
name $name
>Hehe, so you got my chest dirty with your semen...@
>Are you satisfied?@> But I'm not, yet...\
name ""
goto *alice8th2_h



*alice8th2_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\alice8th2_bk04.bmp",0,0
gosub *syasei2
>As Black Alice's tentacles overrun Luka's penis, he comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2724,%2724+1:if %2724=1 mov %count_koenemy,%count_koenemy+1
if %2724>%count_most mov %count_most,%2724:mov $count_mostname,$name+" (2)"
count 10,4
mov $bad1,"Black Alice used her tentacles to force Luka to come."
gosub *face2
name $name
>Hehe, so you got my tentacles dirty with your semen...@
>Are you satisfied?@> But I'm not, yet...\
name ""
goto *alice8th2_h



*alice8th2_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\alice8th2_ct03.bmp",0,0
gosub *syasei2
>As Black Alice's tentacle sucks on Luka's penis, he comes, filling it with semen.\
mov %viclose,1:gosub *lose
mov %2724,%2724+1:if %2724=1 mov %count_koenemy,%count_koenemy+1
if %2724>%count_most mov %count_most,%2724:mov $count_mostname,$name+" (2)"
count 10,4
mov $bad1,"Black Alice forced Luka to come with her sucking tentacle."
gosub *face2
name $name
>Hehe, you came so much inside my tentacle...@
>Are you satisfied?@> But I'm not, yet...\
>Now, let's come together.@
>We'll show each other some love for a nice, long time...\
name ""
goto *alice8th2_h



*alice8th2_h6

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\alice8th2_st24.bmp",0,0
gosub *syasei2
>As Luka's body is sucked on by Black Alice's predatory mouth, he comes, shooting his semen inside her.\
mov %viclose,1:gosub *lose2
name "Luka"
>Haa...\
name ""
name $name
>Hehe, did it feel good?@
>Now I'll really devour you...\
>While getting a nice, good taste of you.@> Of course, it will feel good for you, too.\
name ""
skillcount3 4106
skillname "Demonic Predation"
dwave 1,"se\ero_chupa4.ogg"
lsp 700,":a;chara\alice8th2_st25.bmp",0,0:print 10,500
>Luka's pulled deeper inside her mouth, up to his head!
mov %damage_kotei,1
damage 700,800
skillname ""
name "Luka"
>Hyaaa!@> H...Help me!\
name ""
name $name
>Oh my, my... It's too late now.@
>The only thing you can do now is drown in pleasure.\
name ""
skillcount3 4106
skillname "Demonic Predation"
dwave 1,"se\ero_chupa4.ogg"
>Warm digestive juices cover Luka's body!
mov %damage_kotei,1
damage 700,800
dwave 1,"se\ero_chupa4.ogg"
>Her soft flesh rubs against Luka's body as it pulls him deeper inside!
mov %damage_kotei,1
damage 700,800
skillname ""
name "Luka"
>Haa... No... No...\
name ""
name $name
>Teehee... Just give up and enjoy it.@
>These are your final moments, after all...\
name ""
skillcount3 4106
skillname "Demonic Predation"
dwave 1,"se\ero_chupa4.ogg"
>The digestive organ's soft flesh rubs against Luka's body!
mov %damage_kotei,1
damage 700,800
dwave 1,"se\ero_chupa4.ogg"
>The massage gives a melting stimulation to Luka!
mov %damage_kotei,1
damage 700,800
skillname ""
name "Luka"
>Haaa!\
name ""
name $name
>Hehehe... I'll digest you, just like this.@
>The ultimate reward in life is to be eaten by me, after all...\
name ""
skillcount3 4106
skillname "Demonic Predation"
dwave 1,"se\ero_chupa4.ogg"
>Caught inside her mouth, Luka's body is attacked by the stimulation!
mov %damage_kotei,1
damage 700,800
dwave 1,"se\ero_chupa4.ogg"
>The squirming flesh rubs against Luka's penis!
mov %damage_kotei,1
damage 700,800
skillname ""
name "Luka"
>Eating me...@> It feels so good...@
>Ahhh!\
name ""
gosub *syasei1:gosub *syasei2
>While being swallowed whole, Luka lets loose another orgasm.@
>Unable to fight against it any longer, he sighs in pleasure.\
name "Luka"
>Haa...\
name ""
name $name
>Hehe, it feels like heaven, doesn't it?@
>Well then, let me send you to the true afterlife...\
name ""
dwave 1,"se\ero_chupa4.ogg"
lsp 700,":a;chara\alice8th2_st26.bmp",0,0:print 10,500
>Luka is completely swallowed!\
gosub *clear_sprite
gosub *setwindow_01p
name "Luka"
>Ah...aa...\
name ""
>I'm stuck inside her warm flesh, with her digestive juices covering every inch of my body.\
>I'm slowly dissolving away, stuck in a trance of ecstasy...\
name $name
>Hehehe... You must be feeling incredible right now.@
>Your body will melt away, your heart and soul turning into simple nutrients for my body.\
>This is a true honor for a man...@
>Meet your end in bliss.\
name ""
name "Luka"
>A...ah...\
name ""
>My consciousness slowly fades away with my body itself...\
name $name
>Hehe... Thanks for the meal.\
name ""
>Thus, the Hero is completely consumed by Black Alice.@
>His adventure ends as mere food for the new Goddess...\
mov %battle,0
gosub *anten
>................\
mov %2724,%2724+1:if %2724=1 mov %count_koenemy,%count_koenemy+1
if %2724>%count_most mov %count_most,%2724:mov $count_mostname,$name+" (2)"
count 33,4
mov $bad1,"Luka was eaten by Black Alice."
mov $bad2,""
goto *badend



*alice8th2_h

mov $bad2,"Luka was swallowed while being raped."
if %2724=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku=1 csp 690:goto *alice8th2_hb
if %kousoku=2 mov %hseanwave,12:hseanwave:lsp 700,":a;chara\alice8th2_h1.bmp",0,0:print 10,500:goto *alice8th2_hc
name "Luka"
>Ahh...\
name ""
>Tentacles coil around my body, and pull me closer to her.\
cspl 690,699
lsp 700,":a;chara\alice8th2_st11.bmp",0,0:print 10,500
>Black Alice pulls up her skirt, and shows herself off...\
name $name
>Now, let's mate.@
>We'll show each other our love for a good, long time...\
name ""
goto *alice8th2_hb



*alice8th2_hb

name "Luka"
>H...Hyaa!\
name ""
>My body is slowly drawn towards that open hole...\
dwave 1,"se\ero_makituki3.ogg"
mov %hseanwave,12:hseanwave
lsp 700,":a;chara\alice8th2_h1.bmp",0,0:print 10,500
>And forced into her vagina!@
>My lower body is sucked inside, all the way up to my shoulder!\
goto *alice8th2_hc



*alice8th2_hc

name "Luka"
>Ahhh!\
name ""
>Something that feels like tentacles reaches up from inside her body, and wraps around my own.\
>At the same time, her vaginal flesh starts to squeeze down on my body even tighter.\
>Is this really her vagina...?@>Or is it just a mouth she uses to feed with...?\
name "Luka"
>H...Help me... Ah...\
name ""
name $name
>Oh my, my...@> Even though we're mating, you're trying to escape?@
>What a rude man... Should I just crush you, then?\
name ""
>Black Alice's eyes narrow as she giggles.\
name $name
>Or... Will you just give in to the pleasure?\
name ""
name "Luka"
>Ah... Hyaa!\
name ""
>Inside, her flesh starts to press hard against my penis.@
>Despite the tightness of the flesh around me, she's putting extra focus on my weakest point...\
>Even though this mouth is big enough to swallow a human, she's still able to stimulate me like this...@
>My body shakes in surprise at the sudden intense stimulation.\
name "Luka"
>Ahh... I...It feels good...\
name ""
name $name
>Hehe... Well? It's good, isn't it?@
>I can make your little penis feel good, just like this...\
>Please, try to endure as long as possible...@> Because I want to enjoy this for a long time...\
name ""
name "Luka"
>It's... Moving inside... Ah... Amazing...\
name ""
>The flesh lets my penis sink in, rubbing and vibrating as it does.@
>I can feel the little bumps and projections rubbing against my penis, from root to tip.\
name "Luka"
>Haa... It feels so good...@
>You're going to make me come...\
name ""
name $name
>...Oh my, already?@
>I didn't think a little toying would make you come that fast.\
>So you're even more pitiful than you look...@
>I can't enjoy it like this.\
name ""
>Black Alice's ruthless gaze pierces into me as she giggles.\
name $name
>If you can't amuse me, then you'll need to please me in some other way.@
>Perhaps I'll just swallow you whole, and enjoy your taste...\
name ""
name "Luka"
>Hya... N...No...\
name ""
>She isn't joking...@
>If I come, she's going to swallow me!\
name $name
>If you don't want that, then you better amuse me.@
>Your life will continue if you please me...\
name ""
name "Luka"
>Urhg...\
name ""
>Driven by fear, I try to push the stimulation out of my mind.@
>But her flesh feels so good... I don't think I can do this.\
>The feel of her folds as she rubs against my penis...@
>And the squirming, vibrating wet walls against me...@
>There's no way I can endure.\
name "Luka"
>No... I can't take this...\
name ""
>It's as if my body is melting in pleasure...@
>With the digestive juices, that may not be too far from the truth, too.\
>My male body is screaming with desire to release.@
>Losing my reason, I can't hold it back any longer.\
name "Luka"
>Ahh... No...@> Even though I can't come...!\
name ""
>Finally, my penis starts to pulse in pleasure...\
gosub *syasei1
lsp 700,":a;chara\alice8th2_h2.bmp",0,0
gosub *syasei2
name "Luka"
>Haa...\
name ""
>My whole body melts with ecstasy, as I come inside her mouth.@
>Black Alice watches me as I come, her ruthless gaze not moving until I'm finished.\
name $name
>...Oh my, my... Too bad.@
>You decided to give up your life.\
name ""
name "Luka"
>Hyaa... S...Stop... No!\
name ""
mov %hseanwave,13:hseanwave
>As soon as my orgasm is over, Black Alice puts her threat into action.@
>A tentacle grabs hold of me, and pulls me inside her mouth!\
if %hosyoku_cut=1 goto *hosyoku_cut
lsp 700,":a;chara\alice8th2_h3.bmp",0,0:print 10,500
>In only a second, I'm sucked in up to past my shoulders, my entire lower body squeezed by her flesh.\
name $name
>Hehehe... I'll digest you alive as I squeeze you.\
>Mating with you wasn't amusing at all.@
>So at least, delight me with your screams...\
name ""
name "Luka"
>Ah... Ahhh!!!\
name ""
>My body is completely wrapped up in her flesh...@
>The pulling motions is clearly a digestive one.\
>She's going to digest me alive...@
>The horror of that realization causes me to scream in fear.\
name $name
>Hehe, that's a nice scream...\
>But it's no different from any other man's scream.@
>You can't satisfy me with just that...\
name ""
name "Luka"
>Ahh...@> Stop... Help...\
name ""
lsp 700,":a;chara\alice8th2_h4.bmp",0,0:print 10,500
>Sucked deeper inside, now only my head is outside of her mouth.@
>I can hear the wet, slurping noises as her digestive juices already start to dissolve away my body.\
name "Luka"
>Hyaa!@>Ahhh!\
name ""
>The fear of being eaten alive...@
>And the pleasure being forced into me from that action.\
>I scream and moan as the two emotions mix inside me, all while Black Alice watches with amusement.\
name "Luka"
>Ahh... Hyaa!\
name ""
>But over time, the fear gradually fades as it's replaced by pure pleasure.@
>In the end, my male desire for pleasure won out over my fear of being digested...\
name "Luka"
>Haa... Ah...\
name ""
name $name
>Oh my, my...@> You aren't even screaming anymore.@
>Well then... Goodbye.\
name ""
name "Luka"
>Ah...\
name ""
>And...\
lsp 700,":a;chara\alice8th2_h5.bmp",0,0:print 10,500
>I'm completely swallowed, at last.\
name "Luka"
>Ahh...\
name ""
>Her tentacles and stomach lining press against my body from every direction, as I'm immersed in digestive juices.@
>The squirming walls push and press against me, as she works to digest me away...\
name "Luka"
>Ah...a...\
name ""
>In a trance of pleasure, I can barely even moan as I melt away.@
>After a while, my consciousness starts to fade...\
name "Luka"
>............\
name ""
>Immersed in pure ecstasy, I meet my end, eaten by Black Alice...\
mov %hseanwave,0:hseanwave
gosub *anten
>..................\
goto *badend



*alice8th3_start

mov $name,"Black Alice"
mov $name2,"Black Alice"
mov $lavel,"alice8th3"
mov $tatie1,"alice8th3_st01"
mov $tatie2,"alice8th3_st02"
mov $tatie3,"alice8th3_st03"
mov $tatie4,"alice8th3_st11"
mov $haikei,"bg212"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,65000
if %nanido=2 mov %max_enemylife,85000
if %nanido=3 mov %max_enemylife,105000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,50
if %nanido=3 mov %earth_keigen,25
mov %alice_skill,0
mov %music,16
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Hehe... If you struggle too much, I might just crush you."
mov $mogaku_sel2,"Oh, are you resisting? I thought you were just squirming in agony..."
mov $mogaku_sel3,"If you want to struggle so much... Should I just crush your hands and feet?"
mov $mogaku_sel4,"Look at you, like an insect..."
mov $mogaku_sel5,"That isn't enough to break free from me..."
mov $mogaku_dassyutu1,""
mov $mogaku_dassyutu2,""
mov $mogaku_earth_dassyutu1,"Gnome again..."
mov $mogaku_earth_dassyutu2,"How many times will you annoy me before you've had enough, Spirit?"
mov $half_s1,"Hehe... Have you realized my power?"
mov $half_s2,"I'll have you taste more of this body of mine..."
mov $kiki_s1,"It seems to be about over."
mov $kiki_s2,"I'll finish you with a cloud of white fluid..."
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,4
mov %owaza_count3a,6
name $name
>Hehe... This is my true power.@
>The appearance of a new God, who will rule over all of creation!\
name ""
name "Luka"
>Guh...\
name ""
lsp 699,":a;chara\alice_st51b.bmp",-160,0:print 10,500
name "Alice"
>This is ridiculous...\
name ""
>The catastrophic power overwhelms us.\
>But just a little more...@
>Given what's on our shoulders, we can't afford to fall here!\
name "Luka"
>Can you still fight, Alice?\
name ""
lsp 699,":a;chara\alice_st02b.bmp",-160,0:print 10,500
name "Alice"
>Of course.@
>Don't tell me you've lost your nerve?\
name ""
name "Luka"
>Not a chance.@>We'll win for sure!\
name ""
csp 699:print 10,500
name $name
>Witness to this power, your spirits haven't broken?@
>Hehe... Strong partners really are the best.\
>I'll embrace you, and slowly finish you off...@
>Then I'll eat your corpse, leaving nothing behind.\
>Or... Would you rather I eat you while I ravish you?@
>If you have a specific preference, by all means let me know... Hehehe.\
name ""
mov %sinkou,1
goto *common_main



*alice8th3_v

bgm "bgm\maou2.ogg"
gosub *face3
name $name
>This can't be...@
>I cannot lose!\
name ""
>Black Alice's body shakes and trembles.@
>Did we finally beat her...?\
name $name
>I will never lose!@
>I will rule over everything!\
name ""
>Her body's form wavers as her magical power surges...@
>In the next moment, her body expands like a balloon!\
dwave 1,"se\ero_makituki4.ogg"
>Huge lumps of flesh grow from her body...@
>All the while, her magical power continues to explode in torrents of unrestrained power!\
name "Luka"
>No!@>She's still getting stronger!?\
name ""
>But this isn't a normal strengthening...@
>Her body is growing and expanding at an incredible rate...@> It doesn't look like she's really in control of it.\
name "Alice"
>Her power is going berserk!\
name ""
name $name
>The power of the Dark God that sleeps in this body...@
>I'll release it all...\
>Even if I'm no longer myself...@
>Even if I can't hold the world in my own hand...\
name ""
dwave 1,"se\ero_slime3.ogg"
lsp 690,":c;bg\bg232.bmp",0,0:print 10,500
>Her expanding flesh continues to fill up the area...\
>She can't even be called a monster any longer... This growth is something else entirely!\
if %battle_auto=1 skipoff
mov %battle,0
mov %count_ko,%count_ko+1
if %nanido=0 skip 6
if %mylife=%max_mylife && %nodamage=0 mov %count_hpfull,1
if %nanido=3 mov %count_hellvic,1
if %status=7 mov %count_vickonran,1
if %counter>0 mov %counterk,1
if %alice_skill=1 mov %alicek,1
if %zukanon=1 return *zukan_commonkaisou0
mov %2425,1
csp 690
lsp 700,":a;chara\alice8th4_st01.bmp",0,0:print 10,1500
goto *alice8th4_start



*alice8th3_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>You want to dedicate yourself to this body?@
>Then in return, I'll give you some pleasure...\
name ""
goto *alice8th3_a



*alice8th3_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *alice8th3_kousan
if %cmd1=16 goto *alice8th3_onedari
if %cmd1=17 goto *common_skill
goto *alice8th3_main



*alice8th3_a

if %kousan=0 && %kousoku=0 gosub *alice_skillx
if %kousoku=1 rnd2 %ransu,1,3
if %kousoku=1 && %ransu<3 gosub *alice8th3_a4:goto *common_main
if %kousoku=1 && %ransu=3 && %owaza_count3a>3 gosub *alice8th3_a5:goto *common_main
if %kousoku=1 skip -3
if %enemy_earth=4 gosub *alice8th3_a3:goto *common_main
rnd2 %ransu,1,5
if %ransu=1 gosub *alice8th3_a1:goto *common_main
if %ransu=2 gosub *alice8th3_a2:goto *common_main
if %ransu=3 && %owaza_count1a>5 gosub *alice8th3_a3:goto *common_main
if %ransu=4 && %owaza_count3a>7 && %enemy_wind=0 && %enemy_earth=0 gosub *alice8th3_el1:goto *common_main
if %ransu=5 && %owaza_count3a>7 && %enemy_wind=0 && %enemy_earth=0 gosub *alice8th3_el2:goto *common_main
skip -6



*alice8th3_el1

add %stack,1
mov %owaza_count3a,0
name $name
>Come, Zylphe...\
name ""
skillname "Wind Spirit Summon"
mov %enemy_wind,5
mov %kaihi_el,50
dwave 2,"se\wind2.ogg"
lsp2 0,":a;chara\zylphe_st02.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *enemy_elm_print
>Black Alice summons a spirit of wind!\
skillname ""
sub %stack,1
return



*alice8th3_el2

add %stack,1
mov %owaza_count3a,0
name $name
>Come, Gnomaren...\
name ""
skillname "Summon Earth Spirit"
mov %enemy_earth,5
mov %damage_keigen_el,50
dwave 2,"se\earth1.ogg"
lsp2 0,":a;chara\gnomaren_st01.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *enemy_elm_print
>Black Alice summons a spirit of earth!\
skillname ""
sub %stack,1
return



*alice8th3_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"This tentacle... I'll give it a try."
if %ransu=2 mov $sel1,"This sucker will work well..."
if %ransu=3 mov $sel1,"Let me show you some love with this tentacle..."
name $name
eng $sel1:$sel6\
name ""
skillname "Octopus Pat"
dwave 1,"se\ero_makituki3.ogg"
>Black Alice's tentacle caresses Luka's body!
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,5
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4107
mov %earth_keigen_el,70
if %nanido<2 damage 300,400
if %nanido=2 damage 350,450
if %nanido=3 damage 400,500
dwave 1,"se\ero_makituki2.ogg"
>It strokes his penis hard!
mov %earth_keigen_el,70
if %nanido<2 damage 300,400
if %nanido=2 damage 350,450
if %nanido=3 damage 400,500
dwave 1,"se\ero_makituki3.ogg"
>Countless tentacles coil around him, and tighten!
mov %earth_keigen_el,70
if %nanido<2 damage 300,400
if %nanido=2 damage 350,450
if %nanido=3 damage 400,500
if %enemy_wind=0 skip 13
dwave 1,"se\ero_makituki3.ogg"
>Countless suckers latch onto his penis!
mov %earth_keigen_el,70
if %nanido<2 damage 300,400
if %nanido=2 damage 350,450
if %nanido=3 damage 400,500
dwave 1,"se\ero_makituki3.ogg"
>The tentacles all stroke and massage him at the same time!
mov %earth_keigen_el,70
if %nanido<2 damage 300,400
if %nanido=2 damage 350,450
if %nanido=3 damage 400,500
skillname ""
if %mylife=0 sub %stack,1:return *alice8th3_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*alice8th3_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"These tentacles can absorb energy..."
if %ransu=2 mov $sel1,"It's just like a leech... Do you want to give it a try?"
if %ransu=3 mov $sel1,"I'll let this tentacle stick to your penis..."
name $name
eng $sel1:$sel6\
name ""
skillname "Leech Suck"
dwave 1,"se\ero_buchu1.ogg"
>Black Alice's energy sucking tentacles latch onto Luka's penis!
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<50 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,5
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4108
mov %earth_keigen_el,70
if %nanido<2 damage 330,430
if %nanido=2 damage 380,480
if %nanido=3 damage 430,530
dwave 1,"se\ero_chupa6.ogg"
>It sucks hard on Luka's penis!
mov %earth_keigen_el,70
if %nanido<2 damage 330,430
if %nanido=2 damage 380,480
if %nanido=3 damage 430,530
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
dwave 1,"se\ero_chupa6.ogg"
>The energy squeezing tentacle tightens around his penis!
mov %earth_keigen_el,70
if %nanido<2 damage 330,430
if %nanido=2 damage 380,480
if %nanido=3 damage 430,530
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
if %enemy_wind=0 skip 17
dwave 1,"se\ero_chupa6.ogg"
>The leeching tentacle melts Luka with pleasure!
mov %earth_keigen_el,70
if %nanido<2 damage 330,430
if %nanido=2 damage 380,480
if %nanido=3 damage 430,530
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
dwave 1,"se\ero_chupa6.ogg"
>Luka's energy is absorbed as the tentacle sucks on him!
mov %earth_keigen_el,70
if %nanido<2 damage 330,430
if %nanido=2 damage 380,480
if %nanido=3 damage 430,530
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *alice8th3_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*alice8th3_a3

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 5
name $name
>It's time to stop your scurrying about...@
>I'm going to coil up your penis and body both...!\
name ""
skillname "Trampling Shackles"
dwave 1,"se\ero_makituki3.ogg"
eng "Black Alice's tentacles coil around Luka's body!":$sel6/
if %daten>0 goto *skill22x
if %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<10 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,5
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>Luka has been bound by Black Alice!\
skillname ""
if %kousan=2 sub %stack,1:return
name $name
>Should I give you pleasure?@>Or just squeeze you?@> Or... Swallow you whole?@
>How do you want to be dealt with...?\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,99
if %earth=0 && %nanido=2 mov %genmogaku,99
if %earth=0 && %nanido=3 mov %genmogaku,99
if %earth>0 && %nanido<2 mov %genmogaku,2
if %earth>0 && %nanido=2 mov %genmogaku,2
if %earth>0 && %nanido=3 mov %genmogaku,3
if %enemy_earth>0 mov %genmogaku,99
sub %stack,1
return



*alice8th3_a4

add %stack,1
>Luka has been bound by Black Alice...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll play with that body of yours..."
if %ransu=2 mov $sel1,"Let me see you come all over the place... Hehe."
if %ransu=3 mov $sel1,"How do you like my tentacles? Don't you want to just come already?"
name $name
eng $sel1:$sel6\
name ""
skillname "Trampling Shackles"
dwave 1,"se\ero_simetuke1.ogg"
>Black Alice's tentacles rub and squeeze Luka's body!
skillcount3 4109
mov %earth_keigen_el,70
if %nanido<2 damage 300,400
if %nanido=2 damage 350,450
if %nanido=3 damage 400,500
dwave 1,"se\ero_makituki3.ogg"
>Luka's penis is massaged at the same time!
mov %earth_keigen_el,70
if %nanido<2 damage 300,400
if %nanido=2 damage 350,450
if %nanido=3 damage 400,500
if %enemy_wind=0 skip 13
dwave 1,"se\ero_makituki3.ogg"
>Multiple tentacles coil around Luka's penis!
mov %earth_keigen_el,70
if %nanido<2 damage 300,400
if %nanido=2 damage 350,450
if %nanido=3 damage 400,500
dwave 1,"se\ero_makituki3.ogg"
>The tentacles stroke him hard!
mov %earth_keigen_el,70
if %nanido<2 damage 300,400
if %nanido=2 damage 350,450
if %nanido=3 damage 400,500
skillname ""
if %mylife=0 sub %stack,1:return *alice8th3_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*alice8th3_a5

add %stack,1
mov %owaza_count3a,0
mov %owaza_num1,1
if %kousan=2 skip 5
name $name
>Shall I swallow you whole, now?@
>I'll take you in with this mouth...\
name ""
skillname "Swallow Prey"
dwave 1,"se\ero_makituki3.ogg"
lsp 700,":a;chara\alice8th3_st12.bmp",0,0:print 10,500
>Black Alice's tentacles bring Luka into her mouth!
rnd2 %ransu,0,99:if %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
skillcount3 4110
mov %damage_kotei,1
damage 700,800
mov $tatie4,"alice8th3_st12"
mov %kousoku,2:gosub *status_print
>Luka's body has been brought into Black Alice's mouth!\
skillname ""
if %mylife=0 sub %stack,1:return *alice8th3_h4
name $name
>Hehe... You're in my mouth now.@
>Now... Go mad and scream...\
name ""
sub %stack,1
goto *alice8th3_a6



*alice8th3_a6

add %stack,1
>Luka's stuck inside Black Alice's predatory mouth...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Do you want to be digested already?":mov $sel2,"Black Alice's mouth squirms, covering Luka's body with digestive juices!"
if %ransu=2 mov $sel1,"You're going to melt away in this fluid...":mov $sel2,"The wriggling flesh secretes more juices on Luka's body!"
if %ransu=3 mov $sel1,"I'll get a good taste of every inch of your body...":mov $sel2,"Countless tongues lick every inch of Luka's body!"
if %ransu=4 mov $sel1,"I'll soften and digest your body like this...":mov $sel2,"Black Alice's mouth chews on Luka's body!"
if %ransu=5 mov $sel1,"You're going to be digested and eaten...":mov $sel2,"Black Alice's flesh squirms against Luka's body, stimulating him!"
name $name
eng $sel1:$sel6\
name ""
skillname "Swallow Prey"
dwave 1,"se\ero_makituki3.ogg"
eng $sel2:$sel6
skillcount3 4110
mov %damage_kotei,1
damage 700,800
skillname ""
if %mylife=0 sub %stack,1:return *alice8th3_h4
sub %stack,1
goto *alice8th3_a6



*alice8th3_onedari

mov $list1,"Octopus Pat"
if %4107>0 mov %list_num1,1
mov $list2,"Leech Suck"
if %4108>0 mov %list_num2,1
mov $list3,"Trampling Shackles"
if %4109>0 mov %list_num3,1
mov $list4,"Swallow Prey"
if %4110>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *alice8th3_onedari1
if %cmd1=12 goto *alice8th3_onedari2
if %cmd1=13 goto *alice8th3_onedari3
if %cmd1=14 goto *alice8th3_onedari4
if %cmd1=-1 goto *alice8th3_main
goto *alice8th3_onedari



*alice8th3_onedari1

gosub *onedari_syori
name $name
>Do you want to be finished by my tentacles?@
>Then, as you desire...\
name ""
gosub *alice8th3_el1
gosub *alice8th3_a1
skip -1



*alice8th3_onedari2

gosub *onedari_syori
name $name
>Do you want to be finished by my tentacles?@
>Then, as you desire...\
name ""
gosub *alice8th3_el1
gosub *alice8th3_a2
skip -1



*alice8th3_onedari3

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>Do you want to be finished by my tentacles?@
>Then, as you desire...\
name ""
gosub *alice8th3_el1
if %kousoku=0 gosub *alice8th3_a3
gosub *alice8th3_a4
skip -1



*alice8th3_onedari4

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want to be devoured by me?@
>Then, as you desire...\
name ""
if %kousoku=0 gosub *alice8th3_a3
gosub *alice8th3_a5
skip -1



*alice8th3_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 694,":a;chara\alice8th3_bk04.bmp",0,0
gosub *syasei2
>As Black Alice's overrun Luka's penis, he comes, covering her tentacles with semen.\
mov %viclose,1:gosub *lose
mov %2725,%2725+1:if %2725=1 mov %count_koenemy,%count_koenemy+1
if %2725>%count_most mov %count_most,%2725:mov $count_mostname,$name+" (3)"
count 10,4
mov $bad1,"Black Alice forced Luka to come with her tentacles."
gosub *face2
name $name
>How pitiful... Did you come?@
>Now to squeeze you to death...\
name ""
goto *alice8th3_h



*alice8th3_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\alice8th3_bk03.bmp",0,0
gosub *syasei2
>As Black Alice's tentacle suck on Luka's penis, he comes, filling it with semen.\
mov %viclose,1:gosub *lose
mov %2725,%2725+1:if %2725=1 mov %count_koenemy,%count_koenemy+1
if %2725>%count_most mov %count_most,%2725:mov $count_mostname,$name+" (3)"
count 10,4
mov $bad1,"Black Alice forced Luka to come with her tentacle."
gosub *face2
name $name
>How pitiful... Did you come?@
>Now to squeeze you to death...\
name ""
goto *alice8th3_h



*alice8th3_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\alice8th3_bk02.bmp",0,0
gosub *syasei2
>As Black Alice's tentacles caress every inch of Luka's body, he comes, covering her with semen!\
mov %viclose,1:gosub *lose
mov %2725,%2725+1:if %2725=1 mov %count_koenemy,%count_koenemy+1
if %2725>%count_most mov %count_most,%2725:mov $count_mostname,$name+" (3)"
count 10,4
mov $bad1,"Black Alice forced Luka to come with her tentacle."
gosub *face2
name $name
>How pitiful... Did you come?@
>Now to squeeze you to death...\
name ""
goto *alice8th3_h



*alice8th3_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>As Black Alice's mouth chews and sucks on Luka's body, he comes, filling her mouth with semen!\
mov %viclose,1:gosub *lose
mov %2725,%2725+1:if %2725=1 mov %count_koenemy,%count_koenemy+1
if %2725>%count_most mov %count_most,%2725:mov $count_mostname,$name+" (3)"
count 33,4
mov $bad1,"Black Alice forced Luka to come as she started to swallow him."
gosub *face2
name $name
>How pitiful... Did you come?@
>It wouldn't be that interesting to simply swallow you all at once...\
>Before I eat you... Shall I squeeze out all of your semen?\
name ""
>Still bound by her tentacles, Black Alice pulls me out of her mouth.\
>Leech-like organs, growing from her lower body, reach out to me instead.\
goto *alice8th3_h



*alice8th3_h

mov $bad2,"Luka's semen was squeezed until his death."
if %2725=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
if %kousoku=2 goto *alice8th3_hb
name "Luka"
>Ahh...\
name ""
>Too weak to resist, Black Alice's tentacles coil around me, and bring me to her.@
>Leech-like organs, growing from her lower body, reach out to me.\
>The wavy, mucus covered walls look exactly like some kind of digestive organ...@
>I can't help but tremble at their horrifying look.\
name $name
>Teehee... It looks comfortable, doesn't it?\
>Your semen will be squeezed dry in here.@
>You'll drown in pleasure as every drop is leeched from you...\
name ""
name "Luka"
>S...Stop!@
>Ahhh!\
name ""
dwave 1,"se\ero_makituki3.ogg"
mov %hseanwave,15:hseanwave
cspl 690,699
lsp 700,":a;chara\alice8th3_h1.bmp",0,0:print 10,500
>Unable to do anything to resist, the strange leech-like organ sucks me in, its walls rubbing against me as I'm brought inside.\
>The sudden stimulation brings a moan from me before I can hold myself back.\
goto *alice8th3_hb



*alice8th3_hb

name "Luka"
>Ahh... What... is this...?\
name ""
name $name
>Hehe... It's nice, isn't it?@
>This will drink up all of a man's semen, until he's dry.\
>It won't permit you to hold back.@
>So just go ahead and come inside...\
name ""
name "Luka"
>Haa... Ahhh!\
name ""
>The strange organ pulls on me, its squirming flesh creating a pulling motion, just like it was a stomach trying to pull food inside...\
>But the intense sucking movements also drive pleasure into me, causing me to writhe around.\
name "Luka"
>Haaa...@
>Amazing... It feels so good...\
name ""
name $name
>Teehee... You look so happy.@
>Even though your life itself is going to be sucked up...\
>Please, just come like that.@
>It will feel really good...\
name ""
name "Luka"
>T...That... I can't... Ah...\
name ""
>I try to hold back, but it's a wasted effort.@
>This isn't something a man can endure...\
>The tingling desire to release is taking control of my body.@> If I relaxed for even an instant, I'd explode.@
>I clench my body, trying to hold on, but...\
name $name
>Coming inside here will feel amazing...@
>You truly are blessed, to be a man right now.\
>You'll taste pure joy at being lucky enough to be born a man.@
>Now, come...\
name ""
name "Luka"
>No... No... Ah...\
name ""
>My body trembles in ecstasy as it sucks on me.@
>At last, my male instinct overpowers my mind, surrendering my body to her tentacle.\
name "Luka"
>Ahh... Even though I shouldn't...!@
>Ahhhnn!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice8th3_h2.bmp",0,0
gosub *syasei2
>Surrendering, my white flag of defeat explodes inside the leech-like tentacle.@
>The sucking motions get even stronger as I come, drawing out my semen in waves of pleasure.\
name "Luka"
>Ahh... It's sucking...\
name ""
name $name
>Hehe, didn't I say so?@
>Coming inside here will feel amazing...\
name ""
>The melting pleasure runs through my body, as if leaking out my soul itself.@
>I'm immersed in the pleasure of a man until every drop is sucked out...\
name "Luka"
>Ahhh...@
>S...Stop...\
name ""
mov %hseanwave,16:hseanwave
>But the sucking, digestion like motions continue without mercy on my sensitive penis.@
>It felt amazing before, but now extra sensitive after my orgasm, it's unbearable.\
name "Luka"
>Ahh...@> No... Stop sucking...!\
name ""
name $name
>Hehe... No.@
>I'll keep going, until you're dry.\
>This pleasure won't end until you die.@
>Please enjoy it... Hehe.\
name ""
name "Luka"
>N...No...!@> Ahh!\
name ""
>Black Alice watches as I writhe in pleasure, her leech-like organ mercilessly sucking me dry.\
name "Luka"
>No... I'm going to come again...\
name ""
>The pulling, sucking walls make it feel like I'm endlessly being pulled inside her.@
>Sucked, squeezed and massaged inside her organ, I can't help but cry as I'm forced to another height.\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice8th3_h3.bmp",0,0
gosub *syasei2
>My semen is steadily sucked out, making me feel weak.@
>Despite the horror in my mind about what's happening, my body is drowning in pleasure.\
>My male desire wants to feel more... To be sucked dry.@
>The greedy desire breaks down my mind, causing me to give myself over to the next orgasm...\
name "Luka"
>No... Coming again...\
name ""
gosub *syasei1
lsp 700,":a;chara\alice8th3_h4.bmp",0,0
gosub *syasei2
name $name
>Hehe... You seem to be enjoying the happiness of a man.@
>Isn't being squeezed like this just the best?\
>Just as you wanted, I'll be squeezing you dry soon.@
>Your semen and life will both be given to me... Teehee.\
name ""
>Knowing what my body now desires, Black Alice stares at me and giggles as I moan.\
name "Luka"
>Haa... Ahh...\
name ""
gosub *syasei1:gosub *syasei2
>Unable to do anything else, I continue coming inside her.@
>As I do, I feel my thoughts slow as my vision goes dark...\
name "Luka"
>Ah...a...\
name ""
name $name
>Hehehe... Already running out of life?@
>Thank you for entertaining me...\
name ""
name "Luka"
>Ah...\
name ""
>A faint moan leaks from me, as the final spurt of life and semen are both sucked out...\
gosub *syasei1:gosub *syasei2
name "Luka"
>...........\
name ""
name $name
>Now then... Good bye.\
name ""
>With the last of my life squeezed out, my world fades into darkness...\
mov %hseanwave,0:hseanwave
gosub *anten
>..............\
goto *badend



*alice8th4_start

mov $name,"Black Alice"
mov $name2,"Black Alice"
mov $lavel,"alice8th4"
mov $tatie1,"alice8th4_st01"
mov $tatie2,"alice8th4_st01"
mov $tatie3,"alice8th4_st01"
mov $tatie4,"alice8th4_st01"
mov $haikei,"bg232"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,195000
if %nanido=2 mov %max_enemylife,240000
if %nanido=3 mov %max_enemylife,285000
if %nanido=0 mov %max_enemylife,1
mov %kousoku_maxhp,10
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,0
mov %music,17
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_anno4,"Luka's power weakens in this position!"
mov $mogaku_sel1,"Did you think you could escape?"
mov $mogaku_sel2,"I won't let go... I'll kill you..."
mov $mogaku_sel3,"Yes... Struggle..."
mov $mogaku_sel4,"It's too early to cry... Something worse awaits..."
mov $mogaku_sel5,"Your agony only makes me happier..."
mov $mogaku_dassyutu1,"You're fighting to the very end..."
mov $mogaku_dassyutu2,"All you're doing is prolonging your suffering."
mov $mogaku_earth_dassyutu1,"Gnome... Still being summoned."
mov $mogaku_earth_dassyutu2,"After I've killed this Hero, you're next."
mov $half_s1,"Pathetic..."
mov $half_s2,"You angered me. This is what you deserve."
mov $kiki_s1,"I won't let you die easily."
mov $kiki_s2,"You will only meet your death after being humiliated and exhausted..."
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,0
mov %tukix,300
mov %owaza_count1a,4
mov %owaza_count1b,4
mov %owaza_count1c,4
mov %owaza_count3a,5
name $name
>I am Alipheese...@
>The Monster Lord who will consume everything...\
>I will consume the world itself... Starting with you two...\
name ""
name "Luka"
>Guh...!\
name ""
>She can't control her power.@
>Her body is going berserk, her flesh expanding and consuming everything around her.\
>Even now, she's still expanding...\
lsp 699,":a;chara\alice_st51b.bmp",-160,0:print 10,500
name "Alice"
>...This is insane.@
>At this rate, she really will consume the world!\
name ""
name "Luka"
>Then we have to stop her now!\
name ""
>We have to defeat her somehow, before she swallows the entire world!\
csp 699:print 10,500
name $name
>You shouldn't have driven me this far...@
>Your deaths won't be easy now.\
>I'll toy with you until you regret ever being born.@
>Let me see you cry as I digest you alive...\
name ""
mov %sinkou,1
goto *common_main



*alice8th4_v

lsp 700,":a;chara\alice8th4_st21.bmp",0,0
bg "bg\bg212.bmp",10,500
name $name
>I am... The Monster Lord...@
>I will... Consume the world...\
name ""
>Running out of energy, Black Alice's body starts to disintegrate ...\
mov %viclose,1:gosub *victory
mov %getexp,800000:gosub *lvup
mov %2426,1
goto *sean0411



*alice8th4_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>You surrender now...?@
>I wanted to see you struggle in despair more...\
name ""
goto *alice8th4_a



*alice8th4_main

gosub *cmd_main
if %cmd1=11 && %kousoku=2 mov %abairitu,50:goto *common_miss2
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %kousoku=2 goto *mogaku_earth1
if %cmd1=12 && %kousoku=2 goto *common_mogaku
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *alice8th4_kousan
if %cmd1=16 goto *alice8th4_onedari
if %cmd1=17 goto *common_skill
goto *alice8th4_main



*alice8th4_kaihou

dwave 1,"se\dassyutu.ogg"
csp 690
lsp 700,":a;chara\"+$tatie3+".bmp",%monster_x,%monster_y
mov %kousoku,0:gosub *status_print
>Luka cuts off the venus flytrap, and breaks free!\
gosub *face1
name $name
>You're going to resist until the very end?\
name ""
mov %owaza_count1b,0
goto *common_main



*alice8th4_a

if %kousan=0 && %kousoku=0 gosub *alice_skillx
if %wind+%earth+%aqua+%fire>5 gosub *alice8th4_el0:goto *common_main
if %hanyo6=1 && %bougyo=1 gosub *alice8th4_a7a:goto *common_main
if %hanyo6=1 && %bougyo=0 gosub *alice8th4_a7b:goto *common_main
if %kousoku=1 gosub *alice8th4_a4:goto *common_main
if %kousoku=2 && %kousoku_hp<0 goto *alice8th4_kaihou
if %kousoku=2 gosub *alice8th4_a6:goto *common_main
if %kousoku=4 gosub *alice8th4_a10:goto *common_main
if %enemy_wind=3 gosub *alice8th4_a9:goto *common_main
if %enemy_earth=3 gosub *alice8th4_a11:goto *common_main
if %enemy_aqua=3 gosub *alice8th4_a13:goto *common_main
if %enemy_fire=3 gosub *alice8th4_a15:goto *common_main
rnd2 %ransu,1,9
if %ransu=1 gosub *alice8th4_a1:goto *common_main
if %ransu=2 gosub *alice8th4_a2:goto *common_main
if %ransu=3 && %owaza_count1a>5 && %enemy_wind=0 && %enemy_earth=0 && %enemy_aqua=0 && %enemy_fire=0 gosub *alice8th4_a3:goto *common_main
if %ransu=4 && %owaza_count1b>5 && %enemy_wind=0 && %enemy_earth=0 && %enemy_aqua=0 && %enemy_fire=0 gosub *alice8th4_a5:goto *common_main
if %ransu=5 && %owaza_count1c>5 && %enemy_wind=0 && %enemy_earth=0 && %enemy_aqua=0 && %enemy_fire=0 gosub *alice8th4_a7:goto *common_main
if %ransu=6 && %owaza_count3a>6 && %enemy_wind=0 && %enemy_earth=0 && %enemy_aqua=0 && %enemy_fire=0 gosub *alice8th4_el1:goto *common_main
if %ransu=7 && %owaza_count3a>6 && %enemy_wind=0 && %enemy_earth=0 && %enemy_aqua=0 && %enemy_fire=0 gosub *alice8th4_el2:goto *common_main
if %ransu=8 && %owaza_count3a>6 && %enemy_wind=0 && %enemy_earth=0 && %enemy_aqua=0 && %enemy_fire=0 gosub *alice8th4_el3:goto *common_main
if %ransu=9 && %owaza_count3a>6 && %enemy_wind=0 && %enemy_earth=0 && %enemy_aqua=0 && %enemy_fire=0 gosub *alice8th4_el4:goto *common_main
skip -10



*alice8th4_el0

add %stack,1
if %kousan>0 sub %stack,1:return
name $name
>Recede inmundissimi spiritus!\
name ""
skillname "Element Cancel"
dwave 1,"se\cancelar.ogg"
>An eerie wave of magic radiates out from Black Alice!
bg "bg\bg232.bmp",99,1000,"system\lngtwave.dll/vwi"
mov %wind,0:mov %wind_turn,0
mov %earth,0:mov %earth_turn,0
mov %aqua,0:mov %aqua_turn,0
mov %fire,0:mov %fire_turn,0
gosub *elm_print
>The power of the four spirits is nullified!\
skillname ""
if %first_sel1=1 skip 8
name "Luka"
>They've been sealed again!?@
>No... She just un-summoned them!\
name ""
>Even still, this isn't good...@
>I didn't think something like that was even possible!\
mov %first_sel1,1
sub %stack,1
return



*alice8th4_el1

add %stack,1
gosub *alice8th4_el0
mov %owaza_count3a,0
name $name
>Come, Zylphe...\
name ""
skillname "Wind Spirit Summon"
mov %enemy_wind,4
mov %kaihi_el,50
dwave 2,"se\wind2.ogg"
lsp2 0,":a;chara\zylphe_st02.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *enemy_elm_print
>Black Alice summons a spirit of wind!\
skillname ""
sub %stack,1
return



*alice8th4_el2

add %stack,1
gosub *alice8th4_el0
mov %owaza_count3a,0
name $name
>Come, Gnomaren...\
name ""
skillname "Summon Earth Spirit"
mov %enemy_earth,4
mov %damage_keigen_el,50
dwave 2,"se\earth1.ogg"
lsp2 0,":a;chara\gnomaren_st01.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *enemy_elm_print
>Black Alice summons a spirit of earth!\
skillname ""
sub %stack,1
return



*alice8th4_el3

add %stack,1
gosub *alice8th4_el0
mov %owaza_count3a,0
name $name
>Come, Grandine...\
name ""
skillname "Summon Water Spirit"
mov %enemy_aqua,4
mov %damage_keigen_el,70
dwave 2,"se\aqua2.ogg"
lsp2 0,":a;chara\grandine_st01.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *enemy_elm_print
>Black Alice summons a spirit of water!\
skillname ""
sub %stack,1
return



*alice8th4_el4

add %stack,1
gosub *alice8th4_el0
mov %owaza_count3a,0
name $name
>Come, Gigamander...\
name ""
skillname "Fire Spirit Summon"
mov %enemy_fire,4
mov %fire_keigen_el,30
dwave 2,"se\fire2.ogg"
lsp2 0,":a;chara\gigamander_st01.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *enemy_elm_print
>Black Alice summons a spirit of fire!\
skillname ""
sub %stack,1
return



*alice8th4_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll make you scream with this tentacle..."
if %ransu=2 mov $sel1,"Please scream..."
if %ransu=3 mov $sel1,"Let me see you squirm."
name $name
eng $sel1:$sel6\
name ""
skillname "Octopus Pat"
dwave 1,"se\ero_makituki3.ogg"
>Black Alice's tentacles coil around Luka's body!
if %daten>0 goto *skill22x
if %enemy_fire=0 && %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<60 gosub *aqua_guard:sub %stack,1:return
if %enemy_fire>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,5
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
mov %earth_keigen_el,70
if %nanido<2 damage 200,250
if %nanido=2 damage 250,300
if %nanido=3 damage 300,350
dwave 1,"se\ero_makituki2.ogg"
>They stroke and rub his penis!
mov %earth_keigen_el,70
if %nanido<2 damage 200,250
if %nanido=2 damage 250,300
if %nanido=3 damage 300,350
dwave 1,"se\ero_makituki3.ogg"
>Countless tentacles tighten around his penis!
mov %earth_keigen_el,70
if %nanido<2 damage 200,250
if %nanido=2 damage 250,300
if %nanido=3 damage 300,350
if %enemy_fire+%enemy_wind+%enemy_aqua=0 skip 13
dwave 1,"se\ero_makituki3.ogg"
>Suckers latch onto Luka's penis!
mov %earth_keigen_el,70
if %nanido<2 damage 200,250
if %nanido=2 damage 250,300
if %nanido=3 damage 300,350
dwave 1,"se\ero_makituki3.ogg"
>Black Alice's swarm of tentacles attack every inch of Luka's body!
mov %earth_keigen_el,70
if %nanido<2 damage 200,250
if %nanido=2 damage 250,300
if %nanido=3 damage 300,350
skillname ""
if %mylife=0 sub %stack,1:return *alice8th4_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*alice8th4_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Even if you cry, I won't stop..."
if %ransu=2 mov $sel1,"I'll suck you until you die..."
if %ransu=3 mov $sel1,"You'll be dry in no time..."
name $name
eng $sel1:$sel6\
name ""
skillname "Leech Suck"
dwave 1,"se\ero_buchu1.ogg"
>Black Alice's leech-like tentacle latches onto Luka's penis!
if %daten>0 goto *skill22x
if %enemy_fire=0 && %enemy_wind=0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<60 gosub *aqua_guard:sub %stack,1:return
if %enemy_fire>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %enemy_wind>0 rnd2 %ransu,0,99:if %aqua>0 && %ransu<5 gosub *aqua_guard:sub %stack,1:return
if %enemy_earth=0 && %wind>0 mov %wind_kakuritu,5
if %enemy_earth>0 && %wind>0 mov %wind_kakuritu,80
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
mov %earth_keigen_el,70
if %nanido<2 damage 200,250
if %nanido=2 damage 250,300
if %nanido=3 damage 300,350
dwave 1,"se\ero_chupa6.ogg"
>The tentacle sucks on his penis!
mov %earth_keigen_el,70
if %nanido<2 damage 200,250
if %nanido=2 damage 250,300
if %nanido=3 damage 300,350
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
dwave 1,"se\ero_chupa6.ogg"
>The tentacle contracts, sucking even harder on Luka's penis!
mov %earth_keigen_el,70
if %nanido<2 damage 200,250
if %nanido=2 damage 250,300
if %nanido=3 damage 300,350
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
if %enemy_fire+%enemy_wind+%enemy_aqua=0 skip 17
dwave 1,"se\ero_chupa6.ogg"
>Luka's energy is drained by the sweet stimulus!
mov %earth_keigen_el,70
if %nanido<2 damage 200,250
if %nanido=2 damage 250,300
if %nanido=3 damage 300,350
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
dwave 1,"se\ero_chupa6.ogg"
>Pleasure spreads through Luka's body as his energy is drained!
mov %earth_keigen_el,70
if %nanido<2 damage 200,250
if %nanido=2 damage 250,300
if %nanido=3 damage 300,350
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *alice8th4_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*alice8th4_a3

add %stack,1
mov %owaza_num1,1
if %kousan=2 skip 5
name $name
>I'll embrace you...@
>Then I'll kill you...\
name ""
skillname "Body of Sticky Suffering"
dwave 1,"se\ero_slime3.ogg"
eng "Sticky organs wrap around Luka's body!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<10 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
mov $tatie4,"alice8th4_h1"
mov %kousoku,1:gosub *status_print
>Luka has been bound by Black Alice!\
name $name
>I'll stroke you with this tentacle, until you die.@
>Taste pure humiliation as you meet your death.\
name ""
skillname "Elimination: Squeeze"
dwave 1,"se\ero_makituki3.ogg"
mov $tatie4,"alice8th4_ha1"
lsp 700,":a;chara\alice8th4_ha1.bmp",0,0:print 10,500
>Squishy tentacles coil around Luka's penis!\
>Wrapped around him, they start to tighten!
skillcount3 4111
if %nanido<2 damage 200,300
if %nanido=2 damage 300,400
if %nanido=3 damage 400,500
skillname ""
if %mylife=0 sub %stack,1:return *alice8th4_h3
if %earth=0 && %nanido<2 mov %genmogaku,2
if %earth=0 && %nanido=2 mov %genmogaku,2
if %earth=0 && %nanido=3 mov %genmogaku,3
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,1
sub %stack,1
return



*alice8th4_a4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I won't stop until you're exhausted..."
if %ransu=2 mov $sel1,"I'll make it even tighter..."
if %ransu=3 mov $sel1,"Before I kill you, I'll squeeze you dry."
name $name
eng $sel1:$sel6\
name ""
skillname "Elimination: Squeeze"
dwave 1,"se\ero_makituki3.ogg"
>Black Alice's tentacles tighten around Luka's penis!
skillcount3 4111
if %nanido<2 damage 200,300
if %nanido=2 damage 300,400
if %nanido=3 damage 400,500
skillname ""
if %mylife=0 sub %stack,1:return *alice8th4_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*alice8th4_a5

add %stack,1
mov %kousoku_hp,%kousoku_maxhp
if %kousan=2 skip 5
name $name
>I'll embrace you...@
>Then I'll kill you...\
name ""
skillname "Body of Sticky Suffering"
dwave 1,"se\ero_slime3.ogg"
eng "Sticky organs wrap around Luka's body!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<10 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
mov $tatie4,"alice8th4_h1"
mov %kousoku,2:gosub *status_print
>Luka has been partially bound by Black Alice!\
name $name
>Your penis will melt away inside this venus flytrap.@
>A horrible death, don't you think?\
name ""
skillname "Elimination: Chew"
dwave 1,"se\ero_makituki3.ogg"
mov $tatie4,"alice8th4_hb1"
lsp 690,":a;chara\alice8th4_ct21.bmp",0,0
lsp 700,":a;chara\alice8th4_hb1.bmp",0,0:print 10,500
>Black Alice's venus flytrap moves toward Luka's groin!\
skillname ""
name "Luka"
>Guh... Get off!\
name ""
name $name
>Give up, and let it chew on you.@
>You'll be able to feel good until your death...\
name ""
sub %stack,1
return



*alice8th4_a6

add %stack,1
name $name
>Are you ready?@
>Now to prey on your penis...\
name ""
skillname "Elimination: Chew"
dwave 1,"se\ero_makituki3.ogg"
mov $tatie4,"alice8th4_hb2"
lsp 690,":a;chara\alice8th4_ct22.bmp",0,0
lsp 700,":a;chara\alice8th4_hb2.bmp",0,0:print 10,500
>Black Alice's venus flytrap's mouth opens, and clamps down on Luka's penis!\
>It bites down, and chews on his penis!
skillcount3 4112
mov %damage_kotei,1
damage 500,600
skillname ""
if %mylife=0 sub %stack,1:return *alice8th4_h4
sub %stack,1
goto *alice8th4_a6b



*alice8th4_a6b

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Let me hear you scream as it's dissolved..."
if %ransu=2 mov $sel1,"It won't dissolve right away... So try to enjoy it."
if %ransu=3 mov $sel1,"How does it feel to have your penis preyed on?"
name $name
eng $sel1:$sel6\
name ""
skillname "Elimination: Chew"
dwave 1,"se\ero_makituki3.ogg"
>Each toothless bite sends sweet pleasure through Luka's body!
skillcount3 4112
mov %damage_kotei,1
damage 500,600
skillname ""
if %mylife=0 sub %stack,1:return *alice8th4_h4
sub %stack,1
goto *alice8th4_a6b



*alice8th4_a7

add %stack,1
name $name
>Let me give you a taste of something amazing...\
name ""
skillname "Elimination: Suck"
dwave 1,"se\ero_slime3.ogg"
>Black Alice's morphing body sprouts a worm-like organ!\
skillname ""
name $name
>This girl is an ancient semen sucking creature.\
>She'll suck you so hard, you'll be dry in no time...\
name ""
mov %hanyo6,1
sub %stack,1
return



*alice8th4_a7a

add %stack,1
name $name
>Now, let's suck you dry.@
>Every drop of your delicious semen will be consumed...\
name ""
skillname "Body of Sticky Suffering"
dwave 1,"se\ero_slime3.ogg"
>Sticky organs try to wrap around Luka's body!
delay 1000
dwave 1,"se\miss.ogg"
>But Luka nimbly dodges!\
skillname ""
mov %hanyo6,0
mov %owaza_count1c,0
sub %stack,1
return



*alice8th4_a7b

add %stack,1
mov %hanyo6,0
if %kousan=2 skip 5
name $name
>Now, let's suck you dry.@
>Every drop of your delicious semen will be consumed...\
name ""
skillname "Body of Sticky Suffering"
dwave 1,"se\ero_slime3.ogg"
eng "Sticky organs wrap around Luka's body!":$sel6/
if %daten>0 mov %tamek,1:goto *skill22x
\
mov $tatie4,"alice8th4_he1"
mov %kousoku,3:gosub *status_print
>Luka has been bound by Black Alice!\
name "Luka"
>Ahh...\
name ""
name $name
>Well?@>It feels amazing, doesn't it?@
>Any man would go insane in no time...\
>But I won't let you die that easily.@
>I'll take my time, and slowly dry you up...\
name ""
skillname "Elimination: Suck"
dwave 1,"se\ero_buchu1.ogg"
mov $tatie4,"alice8th4_he2"
lsp 690,":a;chara\alice8th4_ct51.bmp",0,0
lsp 700,":a;chara\alice8th4_he2.bmp",0,0:print 10,500
>The semen sucking worm takes in Luka's penis!\
>As soon as he's inside, the worm-like tentacle starts to suck hard on Luka's penis!
skillcount3 4113
mov %damage_kotei,1
damage 500,600
skillname ""
if %mylife=0 sub %stack,1:return *alice8th4_h5
sub %stack,1
goto *alice8th4_a8



*alice8th4_a8

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"No man can take this for long..."
if %ransu=2 mov $sel1,"The interior is filled with muscles..."
if %ransu=3 mov $sel1,"Now, dry up as I suck everything out..."
name $name
eng $sel1:$sel6\
name ""
skillname "Elimination: Suck"
dwave 1,"se\ero_buchu1.ogg"
>The worm-like tentacle squirms as it sucks on Luka's penis!
skillcount3 4113
mov %damage_kotei,1
damage 500,600
skillname ""
if %mylife=0 sub %stack,1:return *alice8th4_h5
sub %stack,1
goto *alice8th4_a8



*alice8th4_a9

add %stack,1
if %kousan=2 skip 5
name $name
>I'll embrace you...@
>Then I'll kill you...\
name ""
skillname "Body of Sticky Suffering"
dwave 1,"se\ero_slime3.ogg"
eng "Sticky organs wrap around Luka's body!":$sel6/
if %daten>0 goto *skill22x
\
mov $tatie4,"alice8th4_h1"
mov %kousoku,4:gosub *status_print
>Luka has been bound by Black Alice!\
skillname ""
lsp 690,":a;chara\alice8th4_ct41.bmp",0,0
lsp 700,":a;chara\alice8th4_hd1.bmp",0,0:print 10,500
name $name
>Shall I lick your penis clean?\
>Hehe... How do you think I'll do that?@
>I'll use these tongues...\
name ""
skillname "Elimination: Lick"
dwave 1,"se\ero_pyu1.ogg"
mov $tatie4,"alice8th4_hd2"
csp 690
lsp 700,":a;chara\alice8th4_hd2.bmp",0,0:print 10,500
>Countless tongue-like tentacles reach toward Luka's penis!\
>The thick tongues all lick his penis in turn!
skillcount3 4114
mov %earth_keigen_el,70
if %nanido<2 damage 300,400
if %nanido=2 damage 400,500
if %nanido=3 damage 500,600
skillname ""
if %mylife=0 sub %stack,1:return *alice8th4_h6
if %earth=0 && %nanido<2 mov %genmogaku,99
if %earth=0 && %nanido=2 mov %genmogaku,99
if %earth=0 && %nanido=3 mov %genmogaku,99
if %earth>0 && %nanido<2 mov %genmogaku,2
if %earth>0 && %nanido=2 mov %genmogaku,2
if %earth>0 && %nanido=3 mov %genmogaku,3
sub %stack,1
return



*alice8th4_a10

add %stack,1
mov %owaza_count3a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"They'll keep licking you until you come..."
if %ransu=2 mov $sel1,"Do you want to be finished with my tongues, then?"
if %ransu=3 mov $sel1,"Let me see your face as you come from my tongues..."
name $name
eng $sel1:$sel6\
name ""
skillname "Elimination: Lick"
dwave 1,"se\ero_pyu1.ogg"
>Black Alice's tongue-like tentacles continue to lick Luka's penis!
skillcount3 4114
mov %earth_keigen_el,70
if %nanido<2 damage 300,400
if %nanido=2 damage 400,500
if %nanido=3 damage 500,600
dwave 1,"se\ero_pyu1.ogg"
>Tongues continue to stimulate Luka!
mov %earth_keigen_el,70
if %nanido<2 damage 300,400
if %nanido=2 damage 400,500
if %nanido=3 damage 500,600
dwave 1,"se\ero_pyu1.ogg"
>Luka is licked by Black Alice's tongues!
mov %earth_keigen_el,70
if %nanido<2 damage 300,400
if %nanido=2 damage 400,500
if %nanido=3 damage 500,600
skillname ""
if %mylife=0 sub %stack,1:return *alice8th4_h6
sub %stack,1
return



*alice8th4_a11

add %stack,1
if %kousan=2 skip 5
name $name
>I'll embrace you...@
>Then I'll kill you...\
name ""
skillname "Body of Sticky Suffering"
dwave 1,"se\ero_slime3.ogg"
eng "Sticky organs wrap around Luka's body!":$sel6/
if %daten>0 goto *skill22x
if %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
mov $tatie4,"alice8th4_h1"
mov %kousoku,5:gosub *status_print
>Luka has been bound by Black Alice!\
skillname ""
lsp 690,":a;chara\alice8th4_ct31.bmp",0,0
lsp 700,":a;chara\alice8th4_hc1.bmp",0,0:print 10,500
name $name
>When I reformed my body, I made these...@
>Custom-made organs just to milk you to death.\
name ""
skillname "Elimination: Milk"
dwave 1,"se\ero_buchu1.ogg"
mov $tatie4,"alice8th4_hc2"
lsp 690,":a;chara\alice8th4_ct32.bmp",0,0
lsp 700,":a;chara\alice8th4_hc2.bmp",0,0:print 10,500
>A semen milking tube sucks in Luka's penis!\
>Formed exactly to his penis, the vacuum seal sucks hard on Luka's penis!
skillcount3 4115
mov %damage_kotei,1
damage 500,600
skillname ""
if %mylife=0 sub %stack,1:return *alice8th4_h7
mov %genmogaku,99
sub %stack,1
goto *alice8th4_a12



*alice8th4_a12

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"This special milking organ will milk you to death..."
if %ransu=2 mov $sel1,"The vacuum seal won't give you a choice but to come."
if %ransu=3 mov $sel1,"This was made just for you... A biological machine that only exists to milk you."
name $name
eng $sel1:$sel6\
name ""
skillname "Elimination: Milk"
dwave 1,"se\ero_buchu1.ogg"
>The biological milking machine organ sucks hard on Luka's penis!
skillcount3 4115
mov %damage_kotei,1
damage 500,600
skillname ""
if %mylife=0 sub %stack,1:return *alice8th4_h7
sub %stack,1
goto *alice8th4_a12



*alice8th4_a13

add %stack,1
if %kousan=2 skip 5
name $name
>I'll toy with you with my own hands.@
>Of course, not my original ones...@> Special ones made just for this.\
name ""
skillname "Elimination: Stroke"
dwave 1,"se\ero_koki1.ogg"
skillcount3 4116
>Arms formed of flesh reach out toward Luka's groin!\
>The mucus covered hands stroke Luka's penis!
if %nanido<2 damage 300,400
if %nanido=2 damage 400,500
if %nanido=3 damage 500,600
if %fire>0 sub %stack,1:goto *alice8th4_a13m
mov $tatie4,"alice8th4_hg1"
mov %kousoku,6:gosub *status_print
>Luka has been bound by Black Alice!\
skillname ""
if %mylife=0 sub %stack,1:return *alice8th4_h8
mov %genmogaku,99
sub %stack,1
goto *alice8th4_a14



*alice8th4_a13m

add %stack,1
skillname ""
if %mylife=0 sub %stack,1:return *alice8th4_h8
>Salamander's fiery aura have destroyed these arms!\
sub %stack,1
return



*alice8th4_a14

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll squeeze you with this hand until you die."
if %ransu=2 mov $sel1,"Do you want me to touch it directly? Too bad, you only get these..."
if %ransu=3 mov $sel1,"The mucus covered, fleshy hands feel better than a real woman's, doesn't it?"
name $name
eng $sel1:$sel6\
name ""
skillname "Elimination: Stroke"
dwave 1,"se\ero_koki1.ogg"
>The fleshy, mucus covered hands stroke Luka's penis!
skillcount3 4116
mov %damage_kotei,1
damage 500,600
skillname ""
if %mylife=0 sub %stack,1:return *alice8th4_h8
sub %stack,1
goto *alice8th4_a14



*alice8th4_a15

add %stack,1
if %kousan=2 skip 5
name $name
>I'll embrace you...@
>Then I'll kill you...\
name ""
skillname "Body of Sticky Suffering"
dwave 1,"se\ero_slime3.ogg"
eng "Sticky organs wrap around Luka's body!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
\
mov $tatie4,"alice8th4_h1"
mov %kousoku,7:gosub *status_print
>Luka has been bound by Black Alice!\
skillname ""
name $name
>All men love breasts, don't they?@
>Then you should rejoice at the chance to die between mine...\
name ""
skillname "Elimination: Crush"
dwave 1,"se\ero_sigoki1.ogg"
mov $tatie4,"alice8th4_hf1"
lsp 700,":a;chara\alice8th4_hf1.bmp",0,0:print 10,500
>Countless breasts wrap around Luka's penis!\
>Soft pressure attacks Luka's penis from every direction!
skillcount3 4117
mov %damage_kotei,1
damage 500,600
skillname ""
if %mylife=0 sub %stack,1:return *alice8th4_h9
mov %genmogaku,99
sub %stack,1
goto *alice8th4_a16



*alice8th4_a16

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"What's wrong? You're surrounded by breasts... Just come already."
if %ransu=2 mov $sel1,"What a rare luxury... Being able to be buried in breasts like this."
if %ransu=3 mov $sel1,"Do you want to taste my actual breasts? Too bad."
name $name
eng $sel1:$sel6\
name ""
skillname "Elimination: Crush"
dwave 1,"se\ero_sigoki1.ogg"
>Luka's penis is crushed by the countless breasts pressing against him!
skillcount3 4117
mov %damage_kotei,1
damage 500,600
skillname ""
if %mylife=0 sub %stack,1:return *alice8th4_h9
sub %stack,1
goto *alice8th4_a16



*alice8th4_onedari

mov $list1,"Elimination: Squeeze"
if %4111>0 mov %list_num1,1
mov $list2,"Elimination: Chew"
if %4112>0 mov %list_num2,1
mov $list3,"Elimination: Suck"
if %4113>0 mov %list_num3,1
mov $list4,"Elimination: Lick"
if %4114>0 mov %list_num4,1
mov $list5,"Elimination: Milk"
if %4115>0 mov %list_num5,1
mov $list6,"Elimination: Stroke"
if %4116>0 mov %list_num6,1
mov $list7,"Elimination: Crush"
if %4117>0 mov %list_num7,1
gosub *cmd_onedari
if %cmd1=11 goto *alice8th4_onedari1
if %cmd1=12 goto *alice8th4_onedari2
if %cmd1=13 goto *alice8th4_onedari3
if %cmd1=14 goto *alice8th4_onedari4
if %cmd1=15 goto *alice8th4_onedari5
if %cmd1=16 goto *alice8th4_onedari6
if %cmd1=17 goto *alice8th4_onedari7
if %cmd1=-1 goto *alice8th4_main
goto *alice8th4_onedari



*alice8th4_onedari1

if %kousoku=1 gosub *onedari_syori
if %kousoku<>1 gosub *onedari_syori_k
name $name
>You want me to play with you with my tentacles?@
>Of course, I'll finish you off just as you desire...\
name ""
gosub *alice8th4_el4
if %kousoku<>1 gosub *alice8th4_a3
gosub *alice8th4_a4
skip -1



*alice8th4_onedari2

if %kousoku=2 gosub *onedari_syori
if %kousoku<>2 gosub *onedari_syori_k
name $name
>You want to become the prey of my venus flytrap?@
>Of course, I'll finish you off just as you desire...\
name ""
gosub *alice8th4_el4
if %kousoku<>2 gosub *alice8th4_a5
gosub *alice8th4_a6
skip -1



*alice8th4_onedari3

gosub *onedari_syori
name $name
>You want to be sucked by my tentacles?@
>Of course, I'll finish you off just as you desire...\
name ""
gosub *alice8th4_a7b
skip -1



*alice8th4_onedari4

if %kousoku=4 gosub *onedari_syori
if %kousoku<>4 gosub *onedari_syori_k
name $name
>You want to be toyed with by my tongues?@
>Of course, I'll finish you off just as you desire...\
name ""
if %enemy_wind=0 gosub *alice8th4_el1
if %kousoku<>4 gosub *alice8th4_a9
gosub *alice8th4_a10
skip -1



*alice8th4_onedari5

gosub *onedari_syori
name $name
>You want to be milked by my custom made organ?@
>Of course, I'll finish you off just as you desire...\
name ""
if %enemy_earth=0 gosub *alice8th4_el2
gosub *alice8th4_a11
skip -1



*alice8th4_onedari6

gosub *onedari_syori
name $name
>You want me to toy with you with my hand?@
>Of course, I'll finish you off just as you desire...\
name ""
if %enemy_aqua=0 gosub *alice8th4_el3
gosub *alice8th4_a13
skip -1



*alice8th4_onedari7

gosub *onedari_syori
name $name
>You want to be crushed under my breasts?@
>Of course, I'll finish you off just as you desire...\
name ""
if %enemy_fire=0 gosub *alice8th4_el4
gosub *alice8th4_a15
skip -1



*alice8th4_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>Overrun by Black Alice's tentacles, Luka comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2726,%2726+1:if %2726=1 mov %count_koenemy,%count_koenemy+1
if %2726>%count_most mov %count_most,%2726:mov $count_mostname,$name+" (Final)"
count 10,11
mov $bad1,"Black Alice forced Luka to come with her tentacles."
gosub *face2
name $name
>Hehe, now you can't resist any longer.@
>Now to take my time in killing you...\
name ""
goto *alice8th4_h



*alice8th4_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>As Black Alice sucks on Luka's penis with her tentacles, he comes, filling them with semen.\
mov %viclose,1:gosub *lose
mov %2726,%2726+1:if %2726=1 mov %count_koenemy,%count_koenemy+1
if %2726>%count_most mov %count_most,%2726:mov $count_mostname,$name+" (Final)"
count 10,11
mov $bad1,"Black Alice forced Luka to come with her tentacles."
gosub *face2
name $name
>Hehe, now you can't resist any longer.@
>Now to take my time in killing you...\
name ""
goto *alice8th4_h



*alice8th4_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\alice8th4_ha2.bmp",0,0
gosub *syasei2
>Overrun by her tentacles, Luka is forced to come, covering Black Alice with semen.\
mov %viclose,1:gosub *lose2
name "Luka"
>Ahhh...\
name ""
name $name
>You already came, I see...@
>But I won't stop with just this much.\
>I'm going to toy with you much more...@
>I'll make you taste a hell of pleasure and humiliation...\
name ""
skillname "Elimination: Squeeze"
skillcount3 4111
dwave 1,"se\ero_makituki3.ogg"
>Black Alice's tentacles squeeze Luka's penis!
mov %damage_kotei,1
damage 200,300
dwave 1,"se\ero_makituki3.ogg"
>While secreting mucus, they focus on the neck of his penis!
mov %damage_kotei,1
damage 200,300
skillname ""
name "Luka"
>Stop already...@
>Haa... Ahhh...\
name ""
name $name
>You heard me... I'm going to kill you.@
>Since you humiliated me like that, it's just what you deserve.\
>Be filled with the sense of despair and helpless pleasure...@
>Taste it as you die...\
name ""
skillname "Elimination: Squeeze"
skillcount3 4111
dwave 1,"se\ero_makituki3.ogg"
>Black Alice's tentacles squeeze Luka's penis tighter!
mov %damage_kotei,1
damage 200,300
dwave 1,"se\ero_makituki3.ogg"
>Focusing on his tip, they squeeze his most sensitive part!
mov %damage_kotei,1
damage 200,300
skillname ""
name "Luka"
>Ahh... I'm going to come again...\
name ""
name $name
>Hehe, truly pathetic.@
>Already crying and moaning, just from being toyed with a little?\
>Now, shoot out the proof of your humiliation.\
>Regret your mistakes as you writhe before me...\
name ""
skillname "Elimination: Squeeze"
skillcount3 4111
dwave 1,"se\ero_makituki3.ogg"
>Black Alice's tentacles focus on the tip of Luka's penis!
mov %damage_kotei,1
damage 200,300
dwave 1,"se\ero_makituki3.ogg"
>Stroking him up and down, they force him over without mercy!
mov %damage_kotei,1
damage 200,300
skillname ""
name "Luka"
>No... Coming...!@
>Ahhh...!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice8th4_ha3.bmp",0,0
gosub *syasei2
>Squeezed by Black Alice's tentacles, Luka is brought to another fast orgasm.\
name $name
>So pitiful...@
>You're moments away from dying, but you're still able to come?\
>Do you love being abused that much?@
>Is this what you wanted?@> Toyed with before your death?\
name ""
skillname "Elimination: Squeeze"
skillcount3 4111
dwave 1,"se\ero_makituki3.ogg"
>Black Alice's tentacles tighten around Luka's penis again!
mov %damage_kotei,1
damage 200,300
dwave 1,"se\ero_makituki3.ogg"
>They squeeze his sensitive penis hard!
mov %damage_kotei,1
damage 200,300
skillname ""
name "Luka"
>Hyaaa...!@
>It feels too good...\
name ""
name $name
>Hehe, what a nice voice...@
>But I still haven't had enough.\
>Let me hear more of that pitiful voice.@
>Satisfy me by going crazy until your death...\
name ""
skillname "Elimination: Squeeze"
skillcount3 4111
dwave 1,"se\ero_makituki3.ogg"
>Black Alice's tentacle strokes Luka's penis!
mov %damage_kotei,1
damage 200,300
dwave 1,"se\ero_makituki3.ogg"
>It squeezes him tighter as it toys with him!
mov %damage_kotei,1
damage 200,300
skillname ""
name "Luka"
>Ahhhh!@
>No... I'm going to come again...!\
name ""
name $name
>Let me hear a good squeal as you come.@
>If you're able to satisfy me, I'll make your death come a little quicker.\
name ""
skillname "Elimination: Squeeze"
skillcount3 4111
dwave 1,"se\ero_makituki3.ogg"
>Black Alice's tentacles stroke him quickly up and down!
mov %damage_kotei,1
damage 200,300
dwave 1,"se\ero_makituki3.ogg"
>Her intense assault forces Luka over the edge!
mov %damage_kotei,1
damage 200,300
skillname ""
name "Luka"
>Ah...!@> Hyaaa!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice8th4_ha4.bmp",0,0
gosub *syasei2
>As Black Alice squeezes and toys with his penis, Luka comes, spraying semen everywhere.\
gosub *clear_sprite
gosub *setwindow_01p
name $name
>Coming and moaning like a pervert, right before your death.@
>And right after humiliating yourself, you're going to die...\
name ""
mov %battle,0
mov %hsean,1
mov %2726,%2726+1:if %2726=1 mov %count_koenemy,%count_koenemy+1
if %2726>%count_most mov %count_most,%2726:mov $count_mostname,$name+" (Final)"
count 10,11
mov $bad1,"Black Alice finished Luka off by squeezing his penis."
goto *alice8th4_h



*alice8th4_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\alice8th4_ct23.bmp",0,0
lsp 700,":a;chara\alice8th4_hb3.bmp",0,0
gosub *syasei2
>As the venus flytrap's sweet bite overwhelms Luka, he comes, filling it with semen.\
mov %viclose,1:gosub *lose2
name "Luka"
>Ahhh...\
name ""
name $name
>You already came, I see...@
>But I won't stop with just this much.\
>I'm going to toy with you much more...@
>I'll make you taste a hell of pleasure and humiliation...\
name ""
skillname "Elimination: Chew"
skillcount3 4112
dwave 1,"se\ero_makituki3.ogg"
>The venus flytrap continues to chew on Luka's penis!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_makituki3.ogg"
>The mucus inside of it rubs against Luka's penis!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>Stop already...@
>Haa... Ahhh...\
name ""
name $name
>You heard me... I'm going to kill you.@
>Since you humiliated me like that, it's just what you deserve.\
>Be filled with the sense of despair and helpless pleasure...@
>Taste it as you die...\
name ""
skillname "Elimination: Chew"
skillcount3 4112
dwave 1,"se\ero_makituki3.ogg"
>The flytrap's mouth, covered in mucus, chews on Luka's penis!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_makituki3.ogg"
>Powerful stimulation floods Luka from the digestive juices!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>Ahh... I'm going to come again...\
name ""
name $name
>Hehe, truly pathetic.@
>Already crying and moaning, just from being toyed with a little?\
>Now, shoot out the proof of your humiliation.\
>Regret your mistakes as you writhe before me...\
name ""
skillname "Elimination: Chew"
skillcount3 4112
dwave 1,"se\ero_makituki3.ogg"
>The venus flytrap continues chewing on Luka's penis!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_makituki3.ogg"
>The soft inner walls rub against his tip!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>No... Coming...!@
>Ahhh...!\
name ""
gosub *syasei1
lsp 690,":a;chara\alice8th4_ct24.bmp",0,0
lsp 700,":a;chara\alice8th4_hb4.bmp",0,0
gosub *syasei2
>As the venus flytrap's toothless mouth chews on him, Luka comes, filling it with even more semen.\
name $name
>So pitiful...@
>You're moments away from dying, but you're still able to come?\
>Do you love being abused that much?@
>Is this what you wanted?@> Toyed with before your death?\
name ""
skillname "Elimination: Chew"
skillcount3 4112
dwave 1,"se\ero_makituki3.ogg"
>The venus flytrap greedily devours Luka's penis!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_makituki3.ogg"
>The wavy inner walls massage his penis with every bite!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>Hyaaa...!@
>It feels too good...\
name ""
name $name
>Hehe, what a nice voice...@
>But I still haven't had enough.\
>Let me hear more of that pitiful voice.@
>Satisfy me by going crazy until your death...\
name ""
skillname "Elimination: Chew"
skillcount3 4112
dwave 1,"se\ero_makituki3.ogg"
>The warm liquid stimulates him at the same time!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_makituki3.ogg"
>The digestive juices melt away his penis with pleasure!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>Ahhhh!@
>No... I'm going to come again...!\
name ""
name $name
>Let me hear a good squeal as you come.@
>If you're able to satisfy me, I'll make your death come a little quicker.\
name ""
skillname "Elimination: Chew"
skillcount3 4112
dwave 1,"se\ero_makituki3.ogg"
>The flytrap bites down on his tip!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_makituki3.ogg"
>The chewing motions get even more intense, crushing his penis!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>Ah...!@> Hyaaa!\
name ""
gosub *syasei1
lsp 690,":a;chara\alice8th4_ct25.bmp",0,0
lsp 700,":a;chara\alice8th4_hb5.bmp",0,0
gosub *syasei2
>As the flytrap chews on him, Luka comes a third time, humiliation flooding his body along with the pleasure.\
gosub *clear_sprite
gosub *setwindow_01p
name $name
>Coming and moaning like a pervert, right before your death.@
>And right after humiliating yourself, you're going to die...\
name ""
mov %battle,0
mov %hsean,1
mov %2726,%2726+1:if %2726=1 mov %count_koenemy,%count_koenemy+1
if %2726>%count_most mov %count_most,%2726:mov $count_mostname,$name+" (Final)"
count 12,11
mov $bad1,"Black Alice finished Luka off by chewing on his penis with her venus flytrap."
goto *alice8th4_h



*alice8th4_h5

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\alice8th4_ct52.bmp",0,0
lsp 700,":a;chara\alice8th4_he3.bmp",0,0
gosub *syasei2
>As the tentacle sucks on Luka's penis, he comes, filling it with semen.\
mov %viclose,1:gosub *lose2
name "Luka"
>Ahhh...\
name ""
name $name
>You already came, I see...@
>But I won't stop with just this much.\
>I'm going to toy with you much more...@
>I'll make you taste a hell of pleasure and humiliation...\
name ""
skillname "Elimination: Suck"
skillcount3 4113
dwave 1,"se\ero_buchu1.ogg"
>The inner walls squirm around Luka's penis!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_buchu1.ogg"
>The vibrating tentacle massages Luka's penis!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>Stop already...@
>Haa... Ahhh...\
name ""
name $name
>You heard me... I'm going to kill you.@
>Since you humiliated me like that, it's just what you deserve.\
>Be filled with the sense of despair and helpless pleasure...@
>Taste it as you die...\
name ""
skillname "Elimination: Suck"
skillcount3 4113
dwave 1,"se\ero_buchu1.ogg"
>The tentacle shrinks inside!@
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_buchu1.ogg"
>The tentacle sucks even harder on Luka's penis!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>Ahh... I'm going to come again...\
name ""
name $name
>Hehe, truly pathetic.@
>Already crying and moaning, just from being toyed with a little?\
>Now, shoot out the proof of your humiliation.\
>Regret your mistakes as you writhe before me...\
name ""
skillname "Elimination: Suck"
skillcount3 4113
dwave 1,"se\ero_buchu1.ogg"
>The soft inner walls tighten around Luka's penis!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_buchu1.ogg"
>As if milking him, the tentacle sucks extra hard on his tip!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>No... Coming...!@
>Ahhh...!\
name ""
gosub *syasei1
lsp 690,":a;chara\alice8th4_ct53.bmp",0,0
lsp 700,":a;chara\alice8th4_he4.bmp",0,0
gosub *syasei2
>As the tentacle sucks and pulls on Luka's penis, he comes, filling it with even more semen.\
name $name
>So pitiful...@
>You're moments away from dying, but you're still able to come?\
>Do you love being abused that much?@
>Is this what you wanted?@> Toyed with before your death?\
name ""
skillname "Elimination: Suck"
skillcount3 4113
dwave 1,"se\ero_buchu1.ogg"
>The folds inside of the tentacle rub against Luka's penis!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_buchu1.ogg"
>The tentacle tightens around Luka's tip!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>Hyaaa...!@
>It feels too good...\
name ""
name $name
>Hehe, what a nice voice...@
>But I still haven't had enough.\
>Let me hear more of that pitiful voice.@
>Satisfy me by going crazy until your death...\
name ""
skillname "Elimination: Suck"
skillcount3 4113
dwave 1,"se\ero_buchu1.ogg"
>The fleshy tentacle stimulates Luka!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_buchu1.ogg"
>The tentacle starts to get narrower deeper inside!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>Ahhhh!@
>No... I'm going to come again...!\
name ""
name $name
>Let me hear a good squeal as you come.@
>If you're able to satisfy me, I'll make your death come a little quicker.\
name ""
skillname "Elimination: Suck"
skillcount3 4113
dwave 1,"se\ero_buchu1.ogg"
>The tentacle sucks even harder on Luka's penis!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_buchu1.ogg"
>The inner walls massage him as it sucks Luka like a vacuum!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>Ah...!@> Hyaaa!\
name ""
gosub *syasei1
lsp 690,":a;chara\alice8th4_ct54.bmp",0,0
lsp 700,":a;chara\alice8th4_he5.bmp",0,0
gosub *syasei2
>As the tight tentacle sucks on Luka's penis, he comes again, filling it with even more semen.\
gosub *clear_sprite
gosub *setwindow_01p
name $name
>Coming and moaning like a pervert, right before your death.@
>And right after humiliating yourself, you're going to die...\
name ""
mov %battle,0
mov %hsean,1
mov %2726,%2726+1:if %2726=1 mov %count_koenemy,%count_koenemy+1
if %2726>%count_most mov %count_most,%2726:mov $count_mostname,$name+" (Final)"
count 10,11
mov $bad1,"Black Alice finished Luka off by sucking on him with her tentacle."
goto *alice8th4_h



*alice8th4_h6

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\alice8th4_hd3.bmp",0,0
gosub *syasei2
>As the tentacles lick Luka, he comes, covering them with semen.\
mov %viclose,1:gosub *lose2
name "Luka"
>Ahhh...\
name ""
name $name
>You already came, I see...@
>But I won't stop with just this much.\
>I'm going to toy with you much more...@
>I'll make you taste a hell of pleasure and humiliation...\
name ""
skillname "Elimination: Lick"
skillcount3 4114
lsp 700,":a;chara\alice8th4_hd4.bmp",0,0:print 10,500
dwave 1,"se\ero_pyu1.ogg"
>More tongues reach out, and lick his penis!
mov %damage_kotei,1
damage 300,400
dwave 1,"se\ero_pyu1.ogg"
>They coil around his penis from every direction!
mov %damage_kotei,1
damage 300,400
skillname ""
name "Luka"
>Stop already...@
>Haa... Ahhh...\
name ""
name $name
>You heard me... I'm going to kill you.@
>Since you humiliated me like that, it's just what you deserve.\
>Be filled with the sense of despair and helpless pleasure...@
>Taste it as you die...\
name ""
skillname "Elimination: Lick"
skillcount3 4114
dwave 1,"se\ero_pyu1.ogg"
>The rough tongues lick his glans!
mov %damage_kotei,1
damage 300,400
dwave 1,"se\ero_pyu1.ogg"
>Saliva drips from them as they lick!
mov %damage_kotei,1
damage 300,400
skillname ""
name "Luka"
>Ahh... I'm going to come again...\
name ""
name $name
>Hehe, truly pathetic.@
>Already crying and moaning, just from being toyed with a little?\
>Now, shoot out the proof of your humiliation.\
>Regret your mistakes as you writhe before me...\
name ""
skillname "Elimination: Lick"
skillcount3 4114
dwave 1,"se\ero_pyu1.ogg"
>They start to focus on his glans!
mov %damage_kotei,1
damage 300,400
dwave 1,"se\ero_pyu1.ogg"
>One starts to lick up and down his back muscle!
mov %damage_kotei,1
damage 300,400
skillname ""
name "Luka"
>No... Coming...!@
>Ahhh...!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice8th4_hd5.bmp",0,0
gosub *syasei2
>As the tongues attack him from every direction, Luka comes, covering them with more semen.\
name $name
>So pitiful...@
>You're moments away from dying, but you're still able to come?\
>Do you love being abused that much?@
>Is this what you wanted?@> Toyed with before your death?\
name ""
skillname "Elimination: Lick"
skillcount3 4114
dwave 1,"se\ero_pyu1.ogg"
>The tongues lick up the semen!
mov %damage_kotei,1
damage 300,400
dwave 1,"se\ero_pyu1.ogg"
>They lick across his urethral hole, trying to get it all!
mov %damage_kotei,1
damage 300,400
skillname ""
name "Luka"
>Hyaaa...!@
>It feels too good...\
name ""
name $name
>Hehe, what a nice voice...@
>But I still haven't had enough.\
>Let me hear more of that pitiful voice.@
>Satisfy me by going crazy until your death...\
name ""
skillname "Elimination: Lick"
skillcount3 4114
dwave 1,"se\ero_pyu1.ogg"
>One of the tongues coils around the neck of his penis!
mov %damage_kotei,1
damage 300,400
dwave 1,"se\ero_pyu1.ogg"
>Wrapped around him, it starts to move up and down!
mov %damage_kotei,1
damage 300,400
skillname ""
name "Luka"
>Ahhhh!@
>No... I'm going to come again...!\
name ""
name $name
>Let me hear a good squeal as you come.@
>If you're able to satisfy me, I'll make your death come a little quicker.\
name ""
skillname "Elimination: Lick"
skillcount3 4114
dwave 1,"se\ero_pyu1.ogg"
>More tongues coil around his penis!
mov %damage_kotei,1
damage 300,400
dwave 1,"se\ero_pyu1.ogg"
>Forming a tube of wet tongues, they stroke him up and down at an incredible speed!
mov %damage_kotei,1
damage 300,400
skillname ""
name "Luka"
>Ah...!@> Hyaaa!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice8th4_hd6.bmp",0,0
gosub *syasei2
>As the tube of tongues strokes him, Luka comes again, covering them with semen.\
gosub *clear_sprite
gosub *setwindow_01p
name $name
>Coming and moaning like a pervert, right before your death.@
>And right after humiliating yourself, you're going to die...\
name ""
mov %battle,0
mov %hsean,1
mov %2726,%2726+1:if %2726=1 mov %count_koenemy,%count_koenemy+1
if %2726>%count_most mov %count_most,%2726:mov $count_mostname,$name+" (Final)"
count 4,11
mov $bad1,"Black Alice finished Luka off with her tongue-like tentacles."
goto *alice8th4_h



*alice8th4_h7

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 690,":a;chara\alice8th4_ct33.bmp",0,0
lsp 700,":a;chara\alice8th4_hc3.bmp",0,0
gosub *syasei2
>As the biological milking organ sucks on Luka's penis, he comes, filling it with semen.\
mov %viclose,1:gosub *lose2
name "Luka"
>Ahhh...\
name ""
name $name
>You already came, I see...@
>But I won't stop with just this much.\
>I'm going to toy with you much more...@
>I'll make you taste a hell of pleasure and humiliation...\
name ""
skillname "Elimination: Milk"
skillcount3 4115
dwave 1,"se\ero_buchu1.ogg"
>The milking organ continues sucking on him!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_buchu1.ogg"
>It pulls on his penis like a vacuum!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>Stop already...@
>Haa... Ahhh...\
name ""
name $name
>You heard me... I'm going to kill you.@
>Since you humiliated me like that, it's just what you deserve.\
>Be filled with the sense of despair and helpless pleasure...@
>Taste it as you die...\
name ""
skillname "Elimination: Milk"
skillcount3 4115
dwave 1,"se\ero_buchu1.ogg"
>The inner walls press against his glans as it sucks!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_buchu1.ogg"
>The sucking motions get even more intense as it tightens!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>Ahh... I'm going to come again...\
name ""
name $name
>Hehe, truly pathetic.@
>Already crying and moaning, just from being toyed with a little?\
>Now, shoot out the proof of your humiliation.\
>Regret your mistakes as you writhe before me...\
name ""
skillname "Elimination: Milk"
skillcount3 4115
dwave 1,"se\ero_buchu1.ogg"
>The soft flesh rubs against his penis as it sucks!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_buchu1.ogg"
>The vacuum focuses on his glans, pulling hard on his penis!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>No... Coming...!@
>Ahhh...!\
name ""
gosub *syasei1
lsp 690,":a;chara\alice8th4_ct34.bmp",0,0
lsp 700,":a;chara\alice8th4_hc4.bmp",0,0
gosub *syasei2
>As the organ milks Luka, he comes, shooting his semen into the waiting hole.\
name $name
>So pitiful...@
>You're moments away from dying, but you're still able to come?\
>Do you love being abused that much?@
>Is this what you wanted?@> Toyed with before your death?\
name ""
skillname "Elimination: Milk"
skillcount3 4115
dwave 1,"se\ero_buchu1.ogg"
>The vacuum continues sucking on Luka!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_buchu1.ogg"
>The semen still inside his urethra is sucked out!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>Hyaaa...!@
>It feels too good...\
name ""
name $name
>Hehe, what a nice voice...@
>But I still haven't had enough.\
>Let me hear more of that pitiful voice.@
>Satisfy me by going crazy until your death...\
name ""
skillname "Elimination: Milk"
skillcount3 4115
dwave 1,"se\ero_buchu1.ogg"
>The soft walls tighten around Luka's tip!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_buchu1.ogg"
>At the same time, the vacuum gets even more intense!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>Ahhhh!@
>No... I'm going to come again...!\
name ""
name $name
>Let me hear a good squeal as you come.@
>If you're able to satisfy me, I'll make your death come a little quicker.\
name ""
skillname "Elimination: Milk"
skillcount3 4115
dwave 1,"se\ero_buchu1.ogg"
>The wavy walls rub against his penis!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_buchu1.ogg"
>The incredible suction pulls out his semen by force!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>Ah...!@> Hyaaa!\
name ""
gosub *syasei1
lsp 690,":a;chara\alice8th4_ct35.bmp",0,0
lsp 700,":a;chara\alice8th4_hc5.bmp",0,0
gosub *syasei2
>As the organ milks Luka, he comes again, shooting more semen into it.\
gosub *clear_sprite
gosub *setwindow_01p
name $name
>Coming and moaning like a pervert, right before your death.@
>And right after humiliating yourself, you're going to die...\
name ""
mov %battle,0
mov %hsean,1
mov %2726,%2726+1:if %2726=1 mov %count_koenemy,%count_koenemy+1
if %2726>%count_most mov %count_most,%2726:mov $count_mostname,$name+" (Final)"
count 10,11
mov $bad1,"Black Alice finished Luka off by milking him."
goto *alice8th4_h



*alice8th4_h8

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\alice8th4_hg2.bmp",0,0
gosub *syasei2
>As the fleshy hands stroke him, Luka comes, covering them with semen.\
mov %viclose,1:gosub *lose2
name "Luka"
>Ahhh...\
name ""
name $name
>You already came, I see...@
>But I won't stop with just this much.\
>I'm going to toy with you much more...@
>I'll make you taste a hell of pleasure and humiliation...\
name ""
skillname "Elimination: Stroke"
skillcount3 4116
dwave 1,"se\ero_koki1.ogg"
>Multiple hands grab hold of Luka's penis!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_koki1.ogg"
>They slowly stroke him up and down!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>Stop already...@
>Haa... Ahhh...\
name ""
name $name
>You heard me... I'm going to kill you.@
>Since you humiliated me like that, it's just what you deserve.\
>Be filled with the sense of despair and helpless pleasure...@
>Taste it as you die...\
name ""
skillname "Elimination: Stroke"
skillcount3 4116
dwave 1,"se\ero_koki1.ogg"
>Making a small circle, she strokes him right under his neck!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_koki1.ogg"
>Another palm rubs the tip of his penis!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>Ahh... I'm going to come again...\
name ""
name $name
>Hehe, truly pathetic.@
>Already crying and moaning, just from being toyed with a little?\
>Now, shoot out the proof of your humiliation.\
>Regret your mistakes as you writhe before me...\
name ""
skillname "Elimination: Stroke"
skillcount3 4116
dwave 1,"se\ero_koki1.ogg"
>Countless hands squeeze Luka's penis at the same time!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_koki1.ogg"
>Two palms massage his glans, sending him over the edge!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>No... Coming...!@
>Ahhh...!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice8th4_hg3.bmp",0,0
gosub *syasei2
>As the hands stroke him all at once, Luka comes, covering them with semen.\
name $name
>So pitiful...@
>You're moments away from dying, but you're still able to come?\
>Do you love being abused that much?@
>Is this what you wanted?@> Toyed with before your death?\
name ""
skillname "Elimination: Stroke"
skillcount3 4116
dwave 1,"se\ero_koki1.ogg"
>Right after his orgasm, the hands continue stroking him!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_koki1.ogg"
>The mucus covered hands stroke him faster and faster!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>Hyaaa...!@
>It feels too good...\
name ""
name $name
>Hehe, what a nice voice...@
>But I still haven't had enough.\
>Let me hear more of that pitiful voice.@
>Satisfy me by going crazy until your death...\
name ""
skillname "Elimination: Stroke"
skillcount3 4116
dwave 1,"se\ero_koki1.ogg"
>Several fingers gently massage his tip!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_koki1.ogg"
>A finger runs up and down the back of his penis!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>Ahhhh!@
>No... I'm going to come again...!\
name ""
name $name
>Let me hear a good squeal as you come.@
>If you're able to satisfy me, I'll make your death come a little quicker.\
name ""
skillname "Elimination: Stroke"
skillcount3 4116
dwave 1,"se\ero_koki1.ogg"
>Multiple hands rub his glans!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_koki1.ogg"
>The hands all mob him at once, forcing him to a powerful climax!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>Ah...!@> Hyaaa!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice8th4_hg4.bmp",0,0
gosub *syasei2
>As the hands overrun his penis, Luka comes, covering them with semen.\
gosub *clear_sprite
gosub *setwindow_01p
name $name
>Coming and moaning like a pervert, right before your death.@
>And right after humiliating yourself, you're going to die...\
name ""
mov %battle,0
mov %hsean,1
mov %2726,%2726+1:if %2726=1 mov %count_koenemy,%count_koenemy+1
if %2726>%count_most mov %count_most,%2726:mov $count_mostname,$name+" (Final)"
count 5,11
mov $bad1,"Black Alice finished Luka off with her grown hands."
goto *alice8th4_h



*alice8th4_h9

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\alice8th4_hf2.bmp",0,0
gosub *syasei2
>Pressed under countless breasts, Luka comes, covering Black Alice with semen.\
mov %viclose,1:gosub *lose2
name "Luka"
>Ahhh...\
name ""
name $name
>You already came, I see...@
>But I won't stop with just this much.\
>I'm going to toy with you much more...@
>I'll make you taste a hell of pleasure and humiliation...\
name ""
skillname "Elimination: Crush"
skillcount3 4117
dwave 1,"se\ero_sigoki1.ogg"
>The soft breasts press against Luka's penis!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_sigoki1.ogg"
>They squeeze his penis from every direction!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>Stop already...@
>Haa... Ahhh...\
name ""
name $name
>You heard me... I'm going to kill you.@
>Since you humiliated me like that, it's just what you deserve.\
>Be filled with the sense of despair and helpless pleasure...@
>Taste it as you die...\
name ""
skillname "Elimination: Crush"
skillcount3 4117
dwave 1,"se\ero_sigoki1.ogg"
>The breasts start to shake, one by one!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_sigoki1.ogg"
>The pressure increases as they push against him harder!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>Ahh... I'm going to come again...\
name ""
name $name
>Hehe, truly pathetic.@
>Already crying and moaning, just from being toyed with a little?\
>Now, shoot out the proof of your humiliation.\
>Regret your mistakes as you writhe before me...\
name ""
skillname "Elimination: Crush"
skillcount3 4117
dwave 1,"se\ero_sigoki1.ogg"
>Black Alice's breasts start to rub against his glans!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_sigoki1.ogg"
>The soft breasts crush Luka's penis between them!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>No... Coming...!@
>Ahhh...!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice8th4_hf3.bmp",0,0
gosub *syasei2
>Buried in her breasts, Luka explodes, covering them with his semen.\
name $name
>So pitiful...@
>You're moments away from dying, but you're still able to come?\
>Do you love being abused that much?@
>Is this what you wanted?@> Toyed with before your death?\
name ""
skillname "Elimination: Crush"
skillcount3 4117
dwave 1,"se\ero_sigoki1.ogg"
>They continue rubbing him, right after his orgasm!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_sigoki1.ogg"
>The countless breasts press harder against his sensitive penis!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>Hyaaa...!@
>It feels too good...\
name ""
name $name
>Hehe, what a nice voice...@
>But I still haven't had enough.\
>Let me hear more of that pitiful voice.@
>Satisfy me by going crazy until your death...\
name ""
skillname "Elimination: Crush"
skillcount3 4117
dwave 1,"se\ero_sigoki1.ogg"
>The crowding breasts crush his penis!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_sigoki1.ogg"
>Luka's penis sinks into their soft skin!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>Ahhhh!@
>No... I'm going to come again...!\
name ""
name $name
>Let me hear a good squeal as you come.@
>If you're able to satisfy me, I'll make your death come a little quicker.\
name ""
skillname "Elimination: Crush"
skillcount3 4117
dwave 1,"se\ero_sigoki1.ogg"
>They crush him from everywhere at once!
mov %damage_kotei,1
damage 500,600
dwave 1,"se\ero_sigoki1.ogg"
>Rubbing and massaging his penis, Luka is forced over the edge!
mov %damage_kotei,1
damage 500,600
skillname ""
name "Luka"
>Ah...!@> Hyaaa!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice8th4_hf4.bmp",0,0
gosub *syasei2
>Crushed by countless breasts, Luka is forced to come again, covering them with even more semen.\
gosub *clear_sprite
gosub *setwindow_01p
name $name
>Coming and moaning like a pervert, right before your death.@
>And right after humiliating yourself, you're going to die...\
name ""
mov %battle,0
mov %hsean,1
mov %2726,%2726+1:if %2726=1 mov %count_koenemy,%count_koenemy+1
if %2726>%count_most mov %count_most,%2726:mov $count_mostname,$name+" (Final)"
count 7,11
mov $bad1,"Black Alice finished Luka off with her breasts."
goto *alice8th4_h



*alice8th4_h

mov $bad2,"After being raped and humiliated, Luka is preyed on."
if %2726=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
dwave 1,"se\ero_makituki3.ogg"
cspl 690,699
lsp 700,":a;chara\alice8th4_hh1.bmp",0,0:print 10,500
>Black Alice's main body sits on top of me.@
mov %hseanwave,15:hseanwave
>In seconds, she forces my penis into her wet hole.\
name "Luka"
>Ahhh!\
name ""
>Her walls squeeze me, the tightness massaging my penis.@
>The intense pleasure is far from gentle...@> Going full steam right from the start, it's enough to take away any man's reason.\
name "Luka"
>Ahh...@> Inside... Incredible...\
name ""
>Her vagina is on another level...@>As if created just to steal a man's soul.\
name $name
>What a quick scream...@
>But it's to be expected, as I'll kill you with my vagina.\
name ""
>A cruel smile fills Black Alice's face as she starts to grind her waist against me.\
name "Luka"
>Ah...!@> Ahhh!\
name ""
>The quick movements force my penis to rub hard against her soft, wet flesh.@
>The intense stimulation tosses me side to side under her, like she really is trying to rape me to death.\
name $name
>How utterly pitiful...@
>Once I started moving, you became completely helpless.\
name ""
name "Luka"
>Haaa... Ah...\
name ""
>With Black Alice glaring at me, I continue to moan underneath her intense assault.@
>Even though she's trying to kill me with this rape, I can't bring myself to resist.\
name "Luka"
>Ahh... I'm going to come...\
name ""
name $name
>...Already surrendering?@
>After all that, to have you finish in only a minute...\
>I'll squeeze you right as you come.@
>Now finish.\
name ""
name "Luka"
>Ah...!@> Ahhh!\
name ""
>Her vagina tightens harder, causing my head to melt with pleasure.@
>It's like she's using herself to override my will, and force me to ejaculate on her command...\
gosub *syasei1
lsp 700,":a;chara\alice8th4_hh2.bmp",0,0
gosub *syasei2
name "Luka"
>Haa...\
name ""
>As she tightens around me during my orgasm, I go loose in pleasure.@
>Her devilish vagina sucks up my semen as I surrender to the ecstasy of release.\
name $name
>So you came...@
>That leaves two.\
name ""
>With a wet noise, I feel myself sink a little deeper into her vagina.@
>At the same time, the pleasure from my orgasm starts to fade.\
name "Luka"
>T...Two...?\
name ""
>I don't know what she's referring to...@
>But it can't be good.\
name $name
>Now, I'll rape you further.@
>You'll taste pure humiliation as you meet your end.\
name ""
name "Luka"
>Haa... Ahh!\
name ""
mov %hseanwave,16:hseanwave
>Her vaginal walls start to squirm around my penis, the merciless rape continuing with no break.@
>Deep inside her, I feel her womb itself open up and suck in my tip, as if it was mouth sucking on me.\
name "Luka"
>Ah...!\
name ""
name $name
>Let me hear more...@
>More of that pitiful scream.\
name ""
>The soft flesh of her womb opens and closes, almost chewing on my tip.@
>Its lips rub and pull on the neck of my penis, sending fresh waves of pleasure through me.\
name "Luka"
>Ahhh!\
name ""
>Black Alice's eyes widen in joy as she watches me squirm under her assault.\
name $name
>I'll tighten again...@>You should try to endure it.@
>For if you don't, the end of your life will draw nearer...\
name ""
>Black Alice giggles as she starts to squeeze down on my penis again...@
>Waves of pleasure race up my spine, as I feel my penis start to pulse inside her.\
>Despite the sweet stimulation, the time of my execution is getting closer...\
name "Luka"
>Ahhh!!!\
name ""
gosub *syasei1
lsp 700,":a;chara\alice8th4_hh3.bmp",0,0
gosub *syasei2
>But instead of blood, semen shoots from me.@
>All of it explodes into Black Alice's body, as I writhe in the throes of ecstasy beneath her.\
name $name
>You can't endure it at all...@
>One left.\
name ""
name "Luka"
>Ahh...\
name ""
>The same strange countdown as before...@
>And like before, after my orgasm, I sink a little deeper into her body.\
>This... Can't be...\
name "Luka"
>N...No...\
name ""
name $name
>Did you finally notice it?@
>Each time you come, I swallow a little more of you.\
>If you don't want me to prey on you, then just don't come.@
>Your life is in your own hands.\
name ""
name "Luka"
>N...No... Don't...@
>Help...!\
name ""
>I tremble in fear, trying to break away...\
name $name
>Do you think I'd let you escape?@
>You can't do anything now...\
name ""
>Her vaginal walls start to move, massaging me inside her.@
>No matter how I struggle or resist, there's no escape from this...\
name "Luka"
>Ah...\
name ""
>Giving up resisting, I slowly come to accept it.@
>Trading my life itself for this pleasure...\
>Even though I know it's horrible...@>I can't fight it.@
>No matter how I try, I can't stop myself from coming.\
>Even now, through my gritted teeth, I could come at any second...\
name "Luka"
>No... Coming... Going to...\
name ""
name $name
>Well then, say goodbye to your life.@
>After you come, I'll eat you...\
name ""
name "Luka"
>Nooo... No...@
>Ah...\
name ""
>Crying and moaning, I feel my penis start to pulse inside her...\
name "Luka"
>Ahh...\
name ""
gosub *syasei1
lsp 700,":a;chara\alice8th4_hh4.bmp",0,0
gosub *syasei2
>And mixed in with the despair, an explosion of pure ecstasy.@
>And my body sinking deeper into hers...\
if %hosyoku_cut=1 goto *hosyoku_cut
name "Luka"
>Ahh...\
name ""
>Wanting to be saved, I reach out with my arm...\
name $name
>Such poor behavior...\
name ""
lsp 700,":a;chara\alice8th4_hh5.bmp",0,0:print 10,500
>But even my arm is swallowed up by Black Alice.@
>Buried inside her flesh, my body is already starting to be digested...\
name $name
>I got some enjoyment out of that...@
>So as thanks, I'll digest you right away.\
>You'll be gone in a second, so say your goodbyes.\
name ""
name "Luka"
>Ah...a....\
name ""
>Wrapped in her flesh, I feel my body being dissolved away in seconds...@
>In no time, my world itself goes dark.\
name "Luka"
>Ah...@
>............\
name ""
mov %hseanwave,0:hseanwave
name $name
>Already gone?@
>Now to swallow the world itself...\
name ""
>The Hero is quickly consumed.@
>The only good outcome is that he didn't have to watch the world itself be consumed...\
gosub *anten
>....................\
goto *badend



*irias1_start

mov $name,"Goddess Ilias"
mov $name2,"Ilias"
mov $lavel,"irias1"
mov $tatie1,"iriasu_st01"
mov $tatie2,"iriasu_st02"
mov $tatie3,"iriasu_st06"
mov $tatie4,"iriasu_h1"
mov $haikei,"bg001"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,50000
if %nanido=2 mov %max_enemylife,70000
if %nanido=3 mov %max_enemylife,90000
if %nanido=0 mov %max_enemylife,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,0
mov %music,18
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"You wish to pull away from me?"
mov $mogaku_sel2,"You can't resist a Goddess."
mov $mogaku_sel3,"You wish to pull away from me?"
mov $mogaku_sel4,"You can't resist a Goddess."
mov $mogaku_sel5,"You wish to pull away from me?"
mov $mogaku_dassyutu1,"You resist a Goddess?"
mov $mogaku_dassyutu2,"One sin after another from you..."
mov $mogaku_earth_dassyutu1,"You resist a Goddess?"
mov $mogaku_earth_dassyutu2,"One sin after another from you..."
mov $half_s1,"How is a Goddess' pleasure?"
mov $half_s2,"If you surrender obediently, I shall show you mercy."
mov $kiki_s1,"Are you nearly finished?"
mov $kiki_s2,"Now... Give your semen to my sacred body."
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,-250
mov %tukix,300
mov %owaza_count1a,4
mov %owaza_count2a,4
mov %owaza_count2b,4
mov $name,"Ilias"
name "Luka"
>You're unforgivable, Ilias!@
>I'll never let you destroy humans or monsters!\
name ""
lsp 700,":a;chara\alice_st03b.bmp",-140,0
lsp 701,":a;chara\iriasu_st01.bmp",200,0:print 10,500
name "Alice"
>I understand too...@>You're nothing but a petty bitch!@
>This world isn't your toy to play with!\
name ""
>Alice and I stand side by side against Ilias at last...\
name $name
>Hero Luka...@> This is your reward.@
>I shall grant you my body, that you broke free from Black Alice.\
>As for Monster Lord Alipheese...@> She will fall into hell.@
>You will suffer in agony for an eternity, as you lament ever rising against me.\
name ""
csp 701
gosub *face1
mov %sinkou,1
goto *common_main



*irias1_v

name $name
>I see...@> Great power, indeed.@
>As expected of the one I entrusted to defeat Black Alice.\
>If you're going to resist this much, then I suppose you don't wish to be rewarded.@
>I shall have to show you my true power, then.\
name ""
>With a soft smile, Ilias begins to radiate with new power...@
dwave 1,"se\ero_makituki4.ogg"
>Her holy form slowly breaks apart, as countless organs grow from her body!\
name "Luka"
>Gah... She's finally serious!?\
name ""
>I could tell she wasn't using her full power yet...@
>I was prepared for this, but still...!\
lsp 700,":a;chara\alice_st03b.bmp",-140,0
lsp 701,":a;chara\iriasu_st01.bmp",200,0:print 10,500
name "Alice"
>Don't falter, Luka.@
>We'll defeat her!\
name ""
name "Luka"
>Yes... No more holding back.@> This is it, the true end to it all!\
name ""
>The towering enemy in front of us.@> The strongest opponent there is...@>Ilias in her most powerful form.\
>Holy and Dark magic mixing together, unmatched power flowing from her...\
cspl 700,701
if %battle_auto=1 skipoff
mov %battle,0
mov %count_ko,%count_ko+1
if %nanido=0 skip 6
if %mylife=%max_mylife && %nodamage=0 mov %count_hpfull,1
if %nanido=3 mov %count_hellvic,1
if %status=7 mov %count_vickonran,1
if %counter>0 mov %counterk,1
if %alice_skill=1 mov %alicek,1
if %zukanon=1 return *zukan_commonkaisou0
mov %2427,1
goto *irias2_start



*irias1_kousan

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
gosub *face2
name $name
>After all this time, you finally surrender?@
>Then enjoy your everlasting pleasure...\
name ""
goto *irias1_a



*irias1_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *irias1_kousan
if %cmd1=16 goto *irias1_onedari
if %cmd1=17 goto *common_skill
goto *irias1_main



*irias1_a

if %kousan=0 && %kousoku=0 gosub *alice_skillx
if %kousoku=1 gosub *irias1_a7:goto *common_main
rnd2 %ransu,1,6
if %ransu=1 gosub *irias1_a1:goto *common_main
if %ransu=2 gosub *irias1_a2:goto *common_main
if %ransu=3 gosub *irias1_a3:goto *common_main
if %ransu=4 && %owaza_count2a>5 && %status=0 gosub *irias1_a4:goto *common_main
if %ransu=5 && %owaza_count2b>5 && %status=0 gosub *irias1_a5:goto *common_main
if %ransu=6 && %owaza_count1a>5 gosub *irias1_a6:goto *common_main
skip -7



*irias1_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Now, come in my hand."
if %ransu=2 mov $sel1,"You should be honored to have a Goddess use her own hand."
if %ransu=3 mov $sel1,"If you submit to me, I'll stroke you whenever you want."
name $name
eng $sel1:$sel6\
name ""
skillname "Goddess' Handjob"
dwave 1,"se\ero_koki1.ogg"
>Ilias lightly grasps Luka's penis, and strokes him!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4118
if %nanido<2 damage 200,300
if %nanido=2 damage 250,350
if %nanido=3 damage 300,400
dwave 1,"se\ero_koki1.ogg"
>She uses her fingertips to lightly tickle his tip!
if %nanido<2 damage 200,300
if %nanido=2 damage 250,350
if %nanido=3 damage 300,400
dwave 1,"se\ero_koki1.ogg"
>She uses two fingers to rub underneath the neck of his penis!
if %nanido<2 damage 200,300
if %nanido=2 damage 250,350
if %nanido=3 damage 300,400
skillname ""
if %mylife=0 sub %stack,1:return *irias1_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*irias1_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I shall pleasure you with this mouth..."
if %ransu=2 mov $sel1,"Allow me to get a taste of you."
if %ransu=3 mov $sel1,"With these lips, and my tongue..."
name $name
eng $sel1:$sel6\
name ""
skillname "Goddess' Blowjob"
dwave 1,"se\ero_pyu1.ogg"
>Ilias presses her face against Luka's groin, and licks his penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4119
if %nanido<2 damage 220,320
if %nanido=2 damage 270,370
if %nanido=3 damage 320,420
dwave 1,"se\ero_buchu2.ogg"
>She lets his tip slip between her soft lips!
if %nanido<2 damage 220,320
if %nanido=2 damage 270,370
if %nanido=3 damage 320,420
dwave 1,"se\ero_pyu2.ogg"
>Moving her tongue, she licks every inch of his penis inside her mouth!
if %nanido<2 damage 220,320
if %nanido=2 damage 270,370
if %nanido=3 damage 320,420
skillname ""
if %mylife=0 sub %stack,1:return *irias1_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*irias1_a3

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"You want to come on my breasts... You've been thinking that for a long time, yes?"
if %ransu=2 mov $sel1,"Will you cover my chest with semen?"
if %ransu=3 mov $sel1,"Well? A Goddess' breasts are soft, you know."
name $name
eng $sel1:$sel6\
name ""
skillname "Goddess' Breasts"
dwave 1,"se\ero_sigoki1.ogg"
>Ilias sandwiches Luka's penis between her breasts!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4120
if %nanido<2 damage 240,340
if %nanido=2 damage 290,390
if %nanido=3 damage 340,440
dwave 1,"se\ero_sigoki1.ogg"
>She uses her hands to squeeze Luka's penis between them!
if %nanido<2 damage 240,340
if %nanido=2 damage 290,390
if %nanido=3 damage 340,440
dwave 1,"se\ero_sigoki1.ogg"
>Moving her breasts up and down, she massages Luka's penis between them!
if %nanido<2 damage 240,340
if %nanido=2 damage 290,390
if %nanido=3 damage 340,440
skillname ""
if %mylife=0 sub %stack,1:return *irias1_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*irias1_a4

add %stack,1
mov %owaza_count2a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Nestle in the wings of a Goddess..."
if %ransu=2 mov $sel1,"I shall embrace you in my sacred wings."
if %ransu=3 mov $sel1,"Your dirty body will be embraced with my clean wings..."
name $name
eng $sel1:$sel6\
name ""
skillname "Wings of Love and Tolerance"
dwave 1,"se\umaru.ogg"
>Ilias' pure white feathers wrap around Luka's body, lightly brushing against his penis!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<10 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4121
if %nanido<2 damage 400,500
if %nanido=2 damage 500,600
if %nanido=3 damage 600,700
if %status=0 mov $sel1,"Luka has been immersed in ecstasy!"
if %status=1 mov $sel1,"Luka has been immersed in ecstasy..."
mov %status,1:gosub *status_print
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *irias1_h4
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,2,3
if %nanido=3 rnd2 %status_turn,3,4
sub %stack,1
return



*irias1_a5

add %stack,1
mov %owaza_count2b,0
name $name
>Taste my judgement!\
name ""
skillname "Thunder of Judgement"
dwave 2,"se\damage2.ogg"
quake 10,600
eng "Ilias brings down the thunder of judgement!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
>A powerful wave of sound and electricity slams into Luka's body!@
mov %status,2:gosub *status_print
>Luka has been paralyzed!\
skillname ""
name "Luka"
>Ah...Guh...\
name ""
name $name
>After the whip, a carrot is needed.@
>And your carrot is extra sweet...\
name ""
rnd2 %status_turn,2,3
if %nanido=2 rnd2 %status_turn,2,3
if %nanido=3 rnd2 %status_turn,3,4
sub %stack,1
return



*irias1_a6

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 5
name $name
>Now, come to my embrace.@
>Unfortunately, I can't embrace you gently...\
name ""
skillname "Goddess' Restraint"
eng "Ilias pushes Luka down, and holds him!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
mov %kousoku,1:gosub *status_print
>Luka has been bound by Ilias!\
skillname ""
name $name
>I will accept your dirty thing in my most sacred place.\
>Get a good taste of this pleasure, far too good for even you...\
name ""
mov %first_sel1,1
if %earth=0 && %nanido<2 mov %genmogaku,99
if %earth=0 && %nanido=2 mov %genmogaku,99
if %earth=0 && %nanido=3 mov %genmogaku,99
if %earth>0 && %nanido<2 mov %genmogaku,0
if %earth>0 && %nanido=2 mov %genmogaku,0
if %earth>0 && %nanido=3 mov %genmogaku,0
sub %stack,1
return



*irias1_a7

add %stack,1
if %kousan=2 skip 5
name $name
>Now, Luka... I shall rape you.@
>You should be honored to cross with a Goddess.\
name ""
skillname "Goddess' Intercourse"
dwave 1,"se\ero_pyu1.ogg"
>Ilias drops her waist, bringing Luka inside her!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,20
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
mov %damage_kotei,1
damage 500,600
mov %kousoku,1:gosub *status_print
>Luka is being raped by Ilias!\
skillname ""
if %mylife=0 sub %stack,1:return *irias1_h5
name "Luka"
>Ahhh!!!\
name ""
>Her soft, warm vagina is enough to make me melt away just from insertion.\
>As her flesh welcomes me inside, my mind explodes in pure ecstasy.\
name $name
>Well? It's like being in paradise itself, isn't it?\
>Now, finish...\
name ""
if %kousan=2 sub %stack,1:return
sub %stack,1
rnd2 %ransu,1,2
if %ransu=1 goto *irias1_a8
if %ransu=2 goto *irias1_a9



*irias1_a8

add %stack,1
>Luka is being raped by Ilias...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Shall I move myself?"
if %ransu=2 mov $sel1,"Being able to taste this... Hehe, you should feel honored."
if %ransu=3 mov $sel1,"You're getting violated so one-sidedly..."
if %ransu=4 mov $sel1,"What's wrong? Not resisting? Or can you simply not resist?"
if %ransu=5 mov $sel1,"Shoot out your dirty semen into my sacredness..."
name $name
eng $sel1:$sel6\
name ""
skillname "Goddess' Riding"
dwave 1,"se\ero_chupa3.ogg"
>Ilias raises and lowers herself violently on top of Luka!
skillcount3 4122
mov %damage_kotei,1
damage 300,400
dwave 1,"se\ero_chupa3.ogg"
>Her vaginal walls rub against Luka as he's brought in and out!
mov %damage_kotei,1
damage 300,400
dwave 1,"se\ero_chupa3.ogg"
>The folds of her vagina rub hard against his glans with every movement!
mov %damage_kotei,1
damage 300,400
skillname ""
if %mylife=0 sub %stack,1:return *irias1_h6
if %kousan=2 sub %stack,1:return
sub %stack,1
rnd2 %ransu,1,2
if %ransu=1 goto *irias1_a8
if %ransu=2 goto *irias1_a9



*irias1_a9

add %stack,1
>Luka is being raped by Ilias...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"If I tighten it... It will feel good."
if %ransu=2 mov $sel1,"A Goddess' vagina is quite tight..."
if %ransu=3 mov $sel1,"If it feels too good, go ahead and cry out..."
if %ransu=4 mov $sel1,"This will make you come quickly..."
if %ransu=5 mov $sel1,"Can you endure my sexual techniques? I suppose not..."
name $name
eng $sel1:$sel6\
name ""
skillname "Goddess' Tightening"
dwave 1,"se\ero_chupa5.ogg"
>Ilias' vagina slowly gets tighter around Luka's penis!
skillcount3 4123
mov %damage_kotei,1
damage 300,400
dwave 1,"se\ero_chupa5.ogg"
>Her soft flesh squeezes him from every direction!
mov %damage_kotei,1
damage 300,400
dwave 1,"se\ero_chupa5.ogg"
>She squeezes Luka harder and harder!
mov %damage_kotei,1
damage 300,400
skillname ""
if %mylife=0 sub %stack,1:return *irias1_h7
if %kousan=2 sub %stack,1:return
sub %stack,1
rnd2 %ransu,1,2
if %ransu=1 goto *irias1_a8
if %ransu=2 goto *irias1_a9



*irias1_onedari

mov $list1,"Goddess' Handjob"
if %4118>0 mov %list_num1,1
mov $list2,"Goddess' Blowjob"
if %4119>0 mov %list_num2,1
mov $list3,"Goddess' Breasts"
if %4120>0 mov %list_num3,1
mov $list4,"Wings of Love and Tolerance"
if %4121>0 mov %list_num4,1
mov $list5,"Goddess' Riding"
if %4122>0 mov %list_num5,1
mov $list6,"Goddess' Tightening"
if %4123>0 mov %list_num6,1
gosub *cmd_onedari
if %cmd1=11 goto *irias1_onedari1
if %cmd1=12 goto *irias1_onedari2
if %cmd1=13 goto *irias1_onedari3
if %cmd1=14 goto *irias1_onedari4
if %cmd1=15 goto *irias1_onedari5
if %cmd1=16 goto *irias1_onedari6
if %cmd1=-1 goto *irias1_main
goto *irias1_onedari



*irias1_onedari1

gosub *onedari_syori
name $name
>Do you want to come on my holy hand?@
>Hehe... Just for you, then.\
name ""
gosub *irias1_a1
skip -1



*irias1_onedari2

gosub *onedari_syori
name $name
>Do you want to come in my holy mouth?@
>Hehe... Just for you, then.\
name ""
gosub *irias1_a2
skip -1



*irias1_onedari3

gosub *onedari_syori
name $name
>Do you want to come on my holy breasts?@
>Hehe... Just for you, then.\
name ""
gosub *irias1_a3
skip -1



*irias1_onedari4

gosub *onedari_syori
name $name
>You wish to be embraced by my sacred wings?@
>Hehe... Just for you, then.\
name ""
gosub *irias1_a4
skip -1



*irias1_onedari5

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want me to ride you as I violate you?@
>Hehe... Just for you, then.\
name ""
if %kousoku=0 gosub *irias1_a6
gosub *irias1_a7
gosub *irias1_a8
skip -1



*irias1_onedari6

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want me to squeeze you as I violate you?@
>Hehe... Just for you, then.\
name ""
if %kousoku=0 gosub *irias1_a6
gosub *irias1_a7
gosub *irias1_a9
skip -1



*irias1_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\iriasu_bk01.bmp",0,0
gosub *syasei2
>As Ilias' gentle hand strokes Luka, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2727,%2727+1:if %2727=1 mov %count_koenemy,%count_koenemy+1
if %2727>%count_most mov %count_most,%2727:mov $count_mostname,$name
count 5,16
mov $bad1,"Ilias used her hands to force Luka to come."
gosub *face2
name $name
>You soiled my sacred hand with your dirty seed...@
>Hehe, look at it all...\
name ""
goto *irias1_h



*irias1_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\iriasu_bk02.bmp",0,0
gosub *syasei2
>As Ilias sucks on Luka's penis, he comes, filling her mouth with semen.\
mov %viclose,1:gosub *lose
mov %2727,%2727+1:if %2727=1 mov %count_koenemy,%count_koenemy+1
if %2727>%count_most mov %count_most,%2727:mov $count_mostname,$name
count 4,16
mov $bad1,"Ilias forced Luka to come with her mouth."
gosub *face2
name $name
>You soiled my sacred mouth with your dirty seed...@
>Hehe, look at it all...\
name ""
goto *irias1_h



*irias1_h3

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 693,":a;chara\iriasu_bk03.bmp",0,0
gosub *syasei2
>As Ilias squeezes Luka's penis between her breasts, he comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2727,%2727+1:if %2727=1 mov %count_koenemy,%count_koenemy+1
if %2727>%count_most mov %count_most,%2727:mov $count_mostname,$name
count 7,16
mov $bad1,"Ilias forced Luka to come with her breasts."
gosub *face2
name $name
>You soiled my sacred breasts with your dirty seed...@
>Hehe, look at it all...\
name ""
goto *irias1_h



*irias1_h4

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 697,":a;chara\iriasu_bk07.bmp",0,0
gosub *syasei2
>Embraced in Ilias' soft wings, Luka comes, covering her with semen.\
mov %viclose,1:gosub *lose
mov %2727,%2727+1:if %2727=1 mov %count_koenemy,%count_koenemy+1
if %2727>%count_most mov %count_most,%2727:mov $count_mostname,$name
count 13,16
mov $bad1,"Ilias forced Luka to come as she embraced him with her wings."
gosub *face2
name $name
>You soiled my sacred wings with your dirty seed...@
>Hehe, look at it all...\
name ""
goto *irias1_h



*irias1_h5

mov %ikigoe,3:gosub *ikigoe
name $name
>Already?@
>What a disappointing end...\
name ""
gosub *syasei1
lsp 700,":a;chara\iriasu_h2.bmp",0,0
gosub *syasei2
>The moment Luka is forced into Ilias' vagina, Luka comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2727,%2727+1:if %2727=1 mov %count_koenemy,%count_koenemy+1
if %2727>%count_most mov %count_most,%2727:mov $count_mostname,$name
count 1,16
mov %count_bouhatu,%count_bouhatu+1
mov $bad1,"Ilias forced Luka to come the moment of insertion."
gosub *face2
name $name
>So you came in only seconds...@
>What a pitiful finish to your long journey...\
name ""
goto *irias1_h



*irias1_h6

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\iriasu_h2.bmp",0,0
gosub *syasei2
>As Ilias rapes Luka hard, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2727,%2727+1:if %2727=1 mov %count_koenemy,%count_koenemy+1
if %2727>%count_most mov %count_most,%2727:mov $count_mostname,$name
count 1,16
mov $bad1,"Ilias forced Luka to come as she raped him."
gosub *face2
name $name
>You soiled my sacred vagina with your dirty seed...@
>Hehe... And you filled me with so much, too...\
name ""
goto *irias1_h



*irias1_h7

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1
lsp 700,":a;chara\iriasu_h2.bmp",0,0
gosub *syasei2
>As Ilias tightens her vagina around Luka's penis, he comes, filling her with semen.\
mov %viclose,1:gosub *lose
mov %2727,%2727+1:if %2727=1 mov %count_koenemy,%count_koenemy+1
if %2727>%count_most mov %count_most,%2727:mov $count_mostname,$name
count 1,16
mov $bad1,"Ilias forced Luka to come as she raped him."
gosub *face2
name $name
>You soiled my sacred vagina with your dirty seed...@
>Hehe... And you filled me with so much, too...\
name ""
goto *irias1_h



*irias1_h

mov $bad2,"Overwhelmed by pleasure from Ilias' breasts, Luka is then soaked in an eternity of pleasure..."
if %2727=1 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
name "Luka"
>Ahh...\
name ""
>I fall to me knees before the Goddess, still dripping semen.@
>She looks down at me, and starts to speak softly.\
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu3_01.ogg"
>What an unsightly look, Luka.
>Have you lost any intention of striking back at me now?\
name ""
dwavestop 0
name "Luka"
>I...I would never...!\
name ""
>I try to struggle to my feet, but I can't.@
>Even though I can't physically resist, I still shout in refusal.\
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu3_02.ogg"
>Oh... How sad...
>Even though you were so faithful and devout before...\
if %con_hvoice=0 dwave 0,"voice\iriasu3_03.ogg"
>I'll bring you back to those days, before you knew this corruption.
>Luka... Starting now, I'll be training you.\
name ""
dwavestop 0
>Ilias steps toward me, and removes both of our clothes.@
cspl 690,699
lsp 700,":a;chara\iriasu_hb1.bmp",0,0:print 10,500
>Like that, she presses her breasts against my exposed penis.\
name "Luka"
>Ahhh!\
name ""
mov %hseanwave,17:hseanwave
>My penis is softly pressed between her breasts.@
>Just the feeling of her soft, warm skin against me sends shivers of pleasure up my spine.\
>I twist in refusal of it, but I can't break free.\
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu3_04.ogg"
>Well, Luka?
>My breasts feel good, don't they?\
if %con_hvoice=0 dwave 0,"voice\iriasu3_05.ogg"
>If you show respect to me as you did before, then I will let you come.
>Being able to ejaculate between my breasts is a wonderful thing...\
name ""
dwavestop 0
name "Luka"
>I...I would never!\
name ""
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu3_06.ogg"
>...Still taking such a rebellious attitude?
>Do you not comprehend the position you're in?\
name ""
dwavestop 0
>Ilias uses her hands to press her breasts together, squeezing my penis between them.@
>Sparks of heavenly pleasure run through my body, feeling like I could melt between her breasts.\
name "Luka"
>Ahh...!\
name ""
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu3_07.ogg"
>Hehe... You let out a moan just then.
>No matter how much of a defiant attitude you take, I can see right through you.\
if %con_hvoice=0 dwave 0,"voice\iriasu3_08.ogg"
>You're weak to pleasure like this, aren't you?
>You want to leak while being played with like this, don't you?\
name ""
dwavestop 0
name "Luka"
>Ahh...\
name ""
>Ilias gradually puts more strength into her arms, crushing me in pleasure.\
>Wrapped in her smooth, warm skin... I can feel pre-come already leaking out on her chest.@
>Electricity runs through my waist, as I feel the desire to release on her take over my thoughts and body.\
name "Luka"
>Ahh... I'm going to come...\
name ""
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu3_09.ogg"
>You're about to ejaculate? Well then...\
name ""
dwavestop 0
>Ilias loosens the pressure, taking away the sweet pressure moments before my climax.@
>The tingling sensation of being drawn from my orgasm rages through my body.\
name "Luka"
>Ahh...\
name ""
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu3_10.ogg"
>...I told you, Luka.
>If you don't sincerely submit to me, I won't let you ejaculate.\
name ""
dwavestop 0
name "Luka"
>N...No...\
name ""
>After cooling off, she starts to squeeze me again...@
>The pleasure rises back up to the edge it was at before.\
name "Luka"
>Ahhh!\
name ""
>A moan of pleasure leaks out, as my thoughts all go empty in pleasure.@
>Losing reason itself, I want nothing more than to come between her breasts...\
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu3_11.ogg"
>Hehe... You look like you're feeling very good.
>Well then... How about this?\
name ""
dwavestop 0
>Ilias starts to slowly move her left and right breasts in an alternating motion, massaging me.@
>Her soft skin rubs against me, as my penis is tossed side to side between her breasts.\
>At times she stops, and focuses the pressure on my tip.\
name "Luka"
>Haaa... Amazing...!\
name ""
>It's enough to make any man want to come...@
>My body starts to seek more, wanting to come between her breasts as that sensation fills me.\
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu3_12.ogg"
>Hehe... Already at your limit? How easy...
>But I won't let you off that easy...\
name ""
dwavestop 0
>Ilias' hands stop right as I was on the verge of orgasm, leaving my body screaming in frustration.\
name "Luka"
>Ah...Ahh...\
name ""
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu3_13.ogg"
>Hehe... Do you feel like obeying me?
>You want to come on my chest like this, don't you?\
name ""
dwavestop 0
>I want to come on the Goddess' breasts...@
>That desire starts to flood my mind.\
>But my body doesn't have complete control yet...@> I still summon the mental fortitude to deny her.\
name "Luka"
>N...No way...\
name ""
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu3_14.ogg"
>...Sheesh, so you're still being obstinate.
>But I can see through to your true heart.\
if %con_hvoice=0 dwave 0,"voice\iriasu3_15.ogg"
>You want to come on my chest like this, don't you?
>Giving over to lust, and shooting out your semen all over...\
name ""
dwavestop 0
>As Ilias describes it, she starts to slowly massage me with her breasts again.@
>I writhe in pleasure under her assault, nearing orgasm...\
>But just before I'm about to come, she stops again.@
>The roar of frustration inside me only gets louder.\
name "Luka"
>Urhg... Ah...\
name ""
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu3_16.ogg"
>You know what you should do.
>If you swear to obey me, you'll be able to taste supreme bliss, you know?\
if %con_hvoice=0 dwave 0,"voice\iriasu3_17.ogg"
>I'll toy with you with my breasts until you ejaculate...
>I'll make you feel good until your last drop...\
name ""
dwavestop 0
name "Luka"
>Haa...!\
name ""
>With a seductive voice, Ilias starts rubbing her soft breasts against me again...@
>Her smooth skin rubs against me, sending me into crazed pleasure as I'm on the verge of coming...\
>But just like before, she stops right before release.\
name "Luka"
>Ahh...\
name ""
>...I want to come.@
>I want to come as she squeezes me with her breasts.\
>My male desire finally takes control, overpowering the rest of my thoughts.\
name "Luka"
>I...I'll obey you...@> So let me come...\
name ""
>The desire to come taking over everything else, I beg Ilias to release me.@
>My heart has finally been broken.\
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu3_18.ogg"
>Hehe, so you finally admit defeat.
>Now then, come between my breasts...\
name ""
dwavestop 0
>Unlike before, she keeps up the pressure past my threshold.@
>Squeezing me in her heavenly embrace, I feel my penis go numb in ecstasy.\
name "Luka"
>Haaa...\
name ""
>Ilias uses her hands to rub her breasts hard against me, crushing me in her sweet massage.@
>The intense pleasure brings me to surrender in an instant, as I desire nothing more than to come between her breasts.\
name "Luka"
>Ahhhh!!!\
name ""
gosub *syasei1
lsp 700,":a;chara\iriasu_hb2.bmp",0,0
gosub *syasei2
>My body trembles in pure ecstasy as I come between her breasts, my mind melting in release as my semen shoots onto her.\
name "Luka"
>Haa...@> Goddess Ilias...\
name ""
>My body and soul are a slave to Ilias...@
>With drool hanging off my mouth, I weakly say her name.\
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu3_19.ogg"
>Did it feel good, Luka?
>Now, you're a faithful servant of mine like before.\
if %con_hvoice=0 dwave 0,"voice\iriasu3_20.ogg"
>For your reward, I'll grant you everlasting joy.
>Your body shall soak in pleasure in the Heavens...\
name ""
dwavestop 0
name "Luka"
>Ah... Hyaa!\
name ""
>Ilias presses her breasts together again, squeezing me in their sweet softness.\
gosub *syasei1
lsp 700,":a;chara\iriasu_hb3.bmp",0,0
gosub *syasei2
>And in seconds, I'm brought to another powerful orgasm.@
>My body shakes as I come, my reason completely blown away.\
name "Luka"
>Goddess Ilias... Ahh...\
name ""
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu3_21.ogg"
>Hehe... After coming only a couple times, you're already crippled.
>Drowning in pleasure is nice, isn't it?\
name ""
dwavestop 0
name "Luka"
>Ahh...\
name ""
gosub *syasei1
lsp 700,":a;chara\iriasu_hb4.bmp",0,0
gosub *syasei2
>I'm unable to think about anything except the pleasure any longer.@
>Far from escaping, I'm not even allowed to regain my sanity.\
>All I'm allowed to do is soak in this eternal pleasure...\
mov %hseanwave,0:hseanwave
gosub *anten
>............\
goto *badend



*irias2_start

mov $name,"Goddess Ilias"
mov $name2,"Ilias"
mov $lavel,"irias2"
mov $tatie1,"iriasu2_st01"
mov $tatie2,"iriasu2_st01"
mov $tatie3,"iriasu2_st01"
mov $tatie4,"iriasu2_st22"
mov $haikei,"bg001"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,600000
if %nanido=2 mov %max_enemylife,640000
if %nanido=3 mov %max_enemylife,680000
if %nanido=0 mov %max_enemylife,3
if %nanido=1 mov %henkahp1,590000
if %nanido=2 mov %henkahp1,590000
if %nanido=3 mov %henkahp1,590000
if %nanido=0 mov %henkahp1,2
if %nanido=1 mov %henkahp2,50000
if %nanido=2 mov %henkahp2,50000
if %nanido=3 mov %henkahp2,50000
if %nanido=0 mov %henkahp2,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,90
if %nanido=3 mov %earth_keigen,90
mov %alice_skill,0
mov %music,19
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Don't resist... Nestle in my embrace..."
mov $mogaku_sel2,"Please don't struggle..."
mov $mogaku_sel3,"Don't you wish to be here for an eternity?"
mov $mogaku_sel4,"There's no resisting before a Goddess."
mov $mogaku_sel5,"You want to be apart from me that badly?"
mov $mogaku_dassyutu1,"Don't you like my embrace?"
mov $mogaku_dassyutu2,"I intended to send you off in peace... This is a shame."
mov $mogaku_earth_dassyutu1,"Don't you like my embrace?"
mov $mogaku_earth_dassyutu2,"I intended to send you off in peace... This is a shame."
mov $half_s1,"It's quite easy to water you down with sexual techniques."
mov $half_s2,"Now... Finish in my chest."
mov $kiki_s1,"Your adventure was long, but this is the end."
mov $kiki_s2,"You were my puppet all the way until the end."
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,0
mov %tukix,300
mov $temp_name,""
mov $name,"Ilias"
name $name
>Look upon my sacred form.@
>This is the appearance of a true God!\
name ""
>Ugly organs are growing from her body.@
>A powerful, oppressive aura is pressing against me just from being near her.\
name "Luka"
>...Sacred form?@
>No matter how you look at it...@>You don't look like a Goddess.\
name ""
lsp 700,":a;chara\iriasu2_st01.bmp",160,0
lsp 699,":a;chara\alice_st01b.bmp",-160,0:print 10,500
name "Alice"
>Hmph...@>Like a primitive monster.@
>If you hate monsters, you should hate yourself.\
name ""
>There's no reason to be afraid now.@
>I won't be daunted, no matter how strong she is.\
>I would be lying if I said I wasn't scared.@
>But this is it.@>Everything that's on our shoulders...@>We must... We will win!\
name "Luka"
>Everyone...@>Lend me your power...\
name ""
>Everyone on the surface is fighting.@
>They're fighting with everything they have, holding off hordes of enemies, all to give me time.\
>So I cannot lose here.@
>Even if I die, I'll take her with me!\
lsp 699,":a;chara\alice_st04b.bmp",-160,0:print 10,500
name "Alice"
>Mother... Lend me strength...@
>The strength to protect our future!\
name ""
>Alice is the same...@
>We fight with the weight of the world behind our blows!\
lsp 699,":a;chara\alice_st01b.bmp",-160,0:print 10,500
name $name
>Despair!@
>Lament your fate as ones who would resist a Goddess!\
name ""
name "Luka"
>Alice, we're going all out right from the start!\
name ""
lsp 699,":a;chara\alice_st02b.bmp",-160,0:print 10,500
name "Alice"
>Yes... Try to keep up, Luka!\
name ""
csp 699
gosub *face1
>My heart, infused with the soul of a Hero, and the thoughts of the world...\
>With Alice at my side, I charge into the final battle!\
mov %sinkou,1
goto *common_main



*irias2_002

name $name
>Hehe, splendid.@
>The power of the Dark God, who plagued me...@> In my own hand!\
name ""
dwave 1,"se\earth1.ogg"
quake 10,1000
>Ilias' power flashes, shaking the very ground itself.\
name "Luka"
>What power...\
name ""
name "Gnome"
>..............\
name ""
name "Luka"
>I know, Gnome.@
>You're protecting me!\
name ""
>If I took a single blow from Ilias, I'd be dead.@
>Without Gnome's physical defense, there's no way I could win!\
mov %sinkou,2
goto *common_main



*irias2_011

name "Luka"
>What strength... Hmm?@
>This feeling...\
name ""
dwave 1,"se\wind1.ogg"
>A powerful gust of wind...@
>And along with it...\
dwave 1,"se\escape.ogg"
lsp 700,":a;chara\iriasu2_st01.bmp",250,0
lsp 699,":a;chara\arumaeruma_st11.bmp",-200,0:print 10,500
name "Alma Elma"
>Aha, I'm the first of the Knights to arrive. \
name ""
name "Luka"
>Alma... You came!\
name ""
name "Alice"
>Watch out, Alma.@
>Her attacks are fierce!\
name ""
lsp 699,":a;chara\arumaeruma_st13.bmp",-200,0:print 10,500
name "Alma Elma"
>Really? Shall I take a look?\
name ""
>The next instant, the air around Alma Elma changes.@
>She drops her stance, and charges in!\
csp 699
lsp 700,":a;chara\iriasu2_st01.bmp",0,0:print 10,500
name $name
>The Queen Succubus, is it?@
>What does a weak Succubus think she can do here?\
name ""
skillname "Tentacle Blast"
dwave 1,"se\karaburi.ogg"
>Ilias' huge tentacles rush out toward Alma Elma!
lsp 2,":a;effect\025_01.bmp",0,0
lsp 2,":a;effect\025_02.bmp",0,0
lsp 2,":a;effect\025_03.bmp",0,0
lsp 2,":a;effect\025_04.bmp",0,0
lsp 2,":a;effect\025_05.bmp",0,0
lsp 2,":a;effect\025_06.bmp",0,0
lsp 2,":a;effect\025_07.bmp",0,0
lsp 2,":a;effect\025_08.bmp",0,0
csp 2
gosub *counter
skillname "Knockout Palm"
dwave 1,"se\dageki2.ogg"
lsp 2,":a;effect\025_01.bmp",0,0:print 10,20
lsp 2,":a;effect\025_02.bmp",0,0:print 10,20
lsp 2,":a;effect\025_03.bmp",0,0:print 10,20
dwave 2,"se\light.ogg"
lsp 2,":a;effect\025_04.bmp",0,0:print 10,60
lsp 2,":a;effect\025_05.bmp",0,0:print 10,60
lsp 2,":a;effect\025_06.bmp",0,0:print 10,60
lsp 2,":a;effect\025_07.bmp",0,0:print 10,60
lsp 2,":a;effect\025_08.bmp",0,0:print 10,60
csp 2:print 10,10
>Alma Elma catches the tentacle, and drives her palm into it!
dwave 2,"se\damage2.ogg"
mov $ori_name,"Alma Elma"
rnd2 %damage,3000,3500:gosub *enemylife2
mov $ori_name,"Luka"
skillname ""
lsp 700,":a;chara\iriasu2_st01.bmp",250,0
lsp 699,":a;chara\arumaeruma_st13.bmp",-200,0:print 10,500
name "Alma Elma"
>Wow... Heavy...\
name ""
name "Luka"
>A...Amazing!\
name ""
name "Alice"
>Alma Elma...@> When did you learn martial arts like that?\
name ""
name "Alma Elma"
>Aha...@> It has been a violent sort of day, that's all. \
name ""
>Even though it sounded like a joke, her serious stance and gaze didn't falter for a moment.\
>At the height of a serene state, and in a ready stance, Alma Elma joins the fight!\
csp 699
lsp 700,":a;chara\iriasu2_st01.bmp",0,0:print 10,500
mov %hanyo4,15000
mov %sinkou,11
goto *common_main



*irias2_012

lsp 700,":a;chara\iriasu2_st01.bmp",250,0
lsp 699,":a;chara\arumaeruma_st11.bmp",-200,0:print 10,500
name $name
>Succubus...@>Among all monsters, I detest your kind the most.@
>You drown in pleasure, and make a mockery of life itself.\
name ""
lsp 699,":a;chara\arumaeruma_st13.bmp",-200,0:print 10,500
name "Alma Elma"
>Oh my...@> But isn't pleasure the source of all life?@
>What reason would there be to live, if there was no joy?\
name ""
>Alma Elma cautiously edges forward in her ready stance.\
lsp 699,":a;chara\arumaeruma_st11.bmp",-200,0:print 10,500
name "Alma Elma"
>It's foolish to disavow pleasure.@
>That's what caused relations between humans and monsters to warp and distort.\
>They rejected us just because some Goddess said so?@
>If you're really their Goddess, you should fix your outlook.\
name ""
name $name
>You arrogant whore!@>You dare give advice to a Goddess!?@
>Queen Succubus...@>I shall send you to Hell!\
name ""
csp 699
lsp 700,":a;chara\iriasu2_st01.bmp",0,0:print 10,500
mov %sinkou,12
rnd2 %ransu,1,6
if %ransu=1 gosub *irias2_x1:goto *common_main
if %ransu=2 gosub *irias2_x2:goto *common_main
if %ransu=3 && %owaza_count3a>3 gosub *irias2_x3:goto *common_main
if %ransu=4 gosub *irias2_x4:goto *common_main
if %ransu=5 gosub *irias2_x11:goto *common_main
if %ransu=6 gosub *irias2_x12:goto *common_main
skip -7



*irias2_013

name "Luka"
>As I thought, this will be a long fight...\
name ""
>But Alice and I are still full of energy.@
>But after taking all those hits, Alma Elma is faltering...\
lsp 700,":a;chara\iriasu2_st01.bmp",250,0
lsp 699,":a;chara\arumaeruma_st12.bmp",-200,0:print 10,500
name "Alma Elma"
>Guh... She's strong...\
name ""
>After taking so much damage, she's near her limit.@
>Any more, and her life itself will be in danger.\
name "Alice"
>Alma, pull back already!\
name ""
name "Alma Elma"
>No... I can go for more...\
name ""
name "Alice"
>...This is an order from your Monster Lord!@
>I forbid you to die in front of us!\
>Fall back, and live in the peaceful world to come!\
name ""
lsp 699,":a;chara\arumaeruma_st11.bmp",-200,0:print 10,500
name "Alma Elma"
>If you're going to go that far, then I'll have to comply...@
>...Monster Lord, I wish you well in your fight.\
>And Luka...@
>I'll give you a reward once you're back safely. \
name ""
skillname "Succubus' Kiss"
>Alma Elma blows a kiss towards Luka!\
dwave 2,"se\kaihuku.ogg"
mov %damage,%max_mylife
eng "Luka has completely recovered!":$sel6/
mov %mylife,%mylife+%damage
if %mylife>%max_mylife mov %mylife,%max_mylife
mov %gage,%mylife*100/%max_mylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 560,":a;system\gager"+$gagenum+".bmp",114,556
gosub *hp
print 10,500
\
skillname ""
dwave 1,"se\escape.ogg"
csp 699
lsp 700,":a;chara\iriasu2_st01.bmp",0,0:print 10,500
>Alma Elma withdraws!\
mov %sinkou,13
goto *common_main



*irias2_021

name $name
>This fight will end now.@
>Be purified, you evil being.\
name ""
skillname "Titus' Wave"
dwave 1,"se\aqua2.ogg"
>Summoning the power of water, Ilias lets forth a tsunami of crashing water!\
wait 1000
skillname "Aqua Pentagon"
if %effectspeed=2 dwave 1,"se\aqua3.ogg":skip 2
mpegplay "effect\movie03.mpg",1
>The wave of water is blocked by a wall of magic!@
dwave 1,"se\aqua4.ogg"
>Protected by the barrier, Luka is unharmed!\
skillname ""
lsp 700,":a;chara\iriasu2_st01.bmp",160,0
lsp 699,":a;chara\erbetie_st01.bmp",0,0:print 10,500
name "Erubetie"
>So I made it in time.@
>I'll assist now...\
name ""
name "Luka"
>Erubetie!@>You came!\
name ""
name "Alice"
>Let's fight together, Erubetie!@
>We'll entrust you with defense!\
name ""
name "Erubetie"
>Understood, Monster Lord.@
>No attack of hers will get through me...\
name ""
csp 699
lsp 700,":a;chara\iriasu2_st01.bmp",0,0:print 10,500
mov %hanyo4,22000
mov %sinkou,21
goto *common_main



*irias2_022a

name $name
>Luka, did you really think this protection will give you the time to charge?\
name ""
gosub *alice_skillx
goto *irias2_022



*irias2_022

name $name
>Now then...@
>Should I crush this annoying defender of yours!?\
name ""
skillname "Holy Flare"
vsp 700,0
bg black,10,300
dwave 1,"se\fire2.ogg"
lsp 2,":c;effect\021.bmp",0,0:print 10,500
vsp 700,1
csp 2
bg "bg\bg001.bmp",10,1000
>Ilias' holy magic condenses, and explodes!
dwave 1,"se\break8.ogg"
quake 10,600
>Erubetie's Aqua Pentagon shatters!\
skillname ""
lsp 700,":a;chara\iriasu2_st01.bmp",160,0
lsp 699,":a;chara\erbetie_st01.bmp",0,0:print 10,500
name "Erubetie"
>It can't be... With a single blow?\
name ""
name "Alice"
>This is a God's power...@
>Even an ability of perfect defense can't stand against it.\
name ""
name "Erubetie"
>Then I shall protect you with my own body.\
name ""
name "Alice"
>...What?@
>What are you thinking, Erubetie!?\
name ""
csp 699
lsp 700,":a;chara\iriasu2_st01.bmp",0,0:print 10,500
mov %sinkou,22
goto *common_main



*irias2_023a

name $name
>The cunning plan have failed.@
>Well, let's finish this rebellion.\
gosub *irias2_x35x



*irias2_023

gosub *irias2_x21
lsp 700,":a;chara\iriasu2_st01.bmp",160,0
lsp 699,":a;chara\erbetie_st01.bmp",0,0:print 10,500
name $name
>Erubetie...@>Did you not hate humans?@
>Why are you protecting this boy with your own life?\
name ""
name "Erubetie"
>I am protecting the hope of our world.@
>You won't lay a finger on him while I live!\
name ""
csp 699
lsp 700,":a;chara\iriasu2_st01.bmp",0,0:print 10,500
mov %sinkou,23
goto *common_main



*irias2_024

gosub *irias2_x22
lsp 700,":a;chara\iriasu2_st01.bmp",160,0
lsp 699,":a;chara\erbetie_st01.bmp",0,0:print 10,500
name "Erubetie"
>Guh...!\
name ""
name $name
>You cannot block my attacks forever.@
>It seems you will be the first to fall into hell.\
name ""
name "Alice"
>Erubetie, no more!@
>You've done enough, withdraw!\
name ""
name "Erubetie"
>No... More...@
>For my brethren...@> I can continue...\
name ""
csp 699
lsp 700,":a;chara\iriasu2_st01.bmp",0,0:print 10,500
mov %sinkou,24
goto *common_main



*irias2_025

gosub *irias2_x21
lsp 700,":a;chara\iriasu2_st01.bmp",160,0
lsp 699,":a;chara\erbetie_st01.bmp",0,0:print 10,500
name "Erubetie"
>More...@>You won't get past me...\
name ""
>She's way past her limit...@
>Just standing there, her body is already collapsing in on itself!\
name "Alice"
>...Stop this, now!@
>You are dismissed, Erubetie!\
name ""
name "Erubetie"
>Even should I lose my life...@
>I will defend it...@>I will defend the hope of our future...\
name ""
csp 699
lsp 700,":a;chara\iriasu2_st01.bmp",0,0:print 10,500
mov %sinkou,25
goto *common_main



*irias2_026

gosub *irias2_x22
lsp 700,":a;chara\iriasu2_st01.bmp",160,0
lsp 699,":a;chara\erbetie_st01.bmp",0,0:print 10,500
name "Erubetie"
>Uh...@>Uhg...@
>I...@> More...@> Not yet...\
name ""
name "Alice"
>I said you were dismissed!@
>Neither of us want your sacrifice!\
>If you wish to protect hope for the future, you must survive!@
>Don't abandon your responsibility to lead your brethren!@> You cannot indulge in self sacrifice here!\
name ""
name "Luka"
>Please...@>For everyone's sake, retreat!@
>Don't you believe in us!?@>Then fall back!\
name ""
name "Erubetie"
>............\
name ""
>Erubetie falls silent for a moment.\
name "Erubetie"
>...I hate my own lack of power...@
>Please...@>May the fortune of war be with you...\
name ""
dwave 1,"se\escape.ogg"
csp 699
lsp 700,":a;chara\iriasu2_st01.bmp",0,0:print 10,500
>With that, Erubetie staggers away.\
name $name
>Oh my... Your shield of slime seems to have vanished.@
>And here I was hoping she would shield you to her death.\
name ""
name "Alice"
>Hmph...@>I don't treat my followers as pawns to be sacrificed.@
>Erubetie's strength is above any who would ever follow you.\
name ""
mov %sinkou,26
goto *common_main



*irias2_031

gosub *irias2_x31
name $name
>This has gone on long enough.@
>After I eliminate you two, I will remake the world...\
name ""
lsp 700,":a;chara\iriasu2_st01.bmp",270,0
lsp 699,":a;chara\tamamo_st51.bmp",-250,0:print 10,500
lsp 2,":a;effect\014_01.bmp",0,0
lsp 2,":a;effect\014_02.bmp",0,0
lsp 2,":a;effect\014_03.bmp",0,0
lsp 2,":a;effect\014_04.bmp",0,0
csp 2
name "Tamamo no Mae"
>You're breaking our agreement, Ilias!\
name ""
lsp 2,":a;effect\014_05.bmp",0,0
lsp 2,":a;effect\014_06.bmp",0,0
lsp 2,":a;effect\014_07.bmp",0,0
lsp 2,":a;effect\014_08.bmp",0,0
lsp 2,":a;effect\014_09.bmp",0,0
csp 2
csp 699
lsp 700,":a;chara\iriasu2_st01.bmp",0,0:print 10,500
skillname "Nine Tails Funeral Pyre"
>Crimson flames incinerate everything!
lsp 2,":a;effect\014_10.bmp",0,0
lsp 2,":a;effect\014_11.bmp",0,0
lsp 2,":a;effect\014_12.bmp",0,0
lsp 2,":a;effect\014_13.bmp",0,0
lsp 2,":a;effect\014_14.bmp",0,0
csp 2
dwave 10,"se\fire4.ogg"
lsp 2,":a;effect\014_01.bmp",0,0:print 10,10
lsp 2,":a;effect\014_02.bmp",0,0:print 10,10
lsp 2,":a;effect\014_03.bmp",0,0:print 10,10
lsp 2,":a;effect\014_04.bmp",0,0:print 10,10
lsp 2,":a;effect\014_05.bmp",0,0:print 10,10
lsp 2,":a;effect\014_06.bmp",0,0:print 10,10
lsp 2,":a;effect\014_07.bmp",0,0:print 10,10
lsp 2,":a;effect\014_08.bmp",0,0:print 10,10
lsp 2,":a;effect\014_09.bmp",0,0:print 10,10
lsp 2,":a;effect\014_10.bmp",0,0:print 10,10
lsp 2,":a;effect\014_11.bmp",0,0:print 10,10
lsp 2,":a;effect\014_12.bmp",0,0:print 10,10
lsp 2,":a;effect\014_13.bmp",0,0:print 10,10
lsp 2,":a;effect\014_14.bmp",0,0:print 10,10
csp 700
csp 2
bg black,10,500
dwave 2,"se\damage2.ogg"
quake 10,600
mov $ori_name,"Tamamo"
rnd2 %damage,40000,50000:gosub *enemylife2
mov $ori_name,"Luka"
skillname ""
lsp 700,":a;chara\iriasu2_st01.bmp",0,0
bg "bg\bg001.bmp",10,1000
lsp 700,":a;chara\iriasu2_st01.bmp",270,0
lsp 699,":a;chara\tamamo_st51.bmp",-250,0:print 10,500
name $name
>Guh... So it's you, Tamamo...@
>You snuck from your seal, and served as guardian to generations of Monster Lords...\
>Hiding on the surface world, pulling strings from the shadows...@
>As expected of a fox...@>Vulgar and sneaky...\
name ""
>Arriving in an explosion of flame, it's... Tamamo?@
>But both her appearance and power seem to have drastically changed.\
name "Luka"
>Tamamo... What's with your body...?\
name ""
name "Alice"
>Y...You were sealed?\
name ""
lsp 699,":a;chara\tamamo_st52.bmp",-250,0:print 10,500
name "Tamamo no Mae"
>I didn't intend to lie to you...@> It's an order from the original Monster Lord.\
>After the horrors of Alipheese the Eighth, I must teach them.@
>Monitor from the shadows, and guide new Monster Lords to a better path.\
name ""
name $name
>This is quite a central role for a monitor, don't you think?@
>Allow me to free you of these burdens...\
name ""
lsp 699,":a;chara\tamamo_st51.bmp",-250,0:print 10,500
name "Tamamo no Mae"
>Oh my...@> And here I was thinking you were getting tired of your role as a Goddess.\
>Allow me to release you from your duties, and give you a long rest!\
name ""
csp 699
lsp 700,":a;chara\iriasu2_st01.bmp",0,0:print 10,500
mov %hanyo4,22000
mov %sinkou,31
goto *common_main



*irias2_032

gosub *irias2_x33
lsp 700,":a;chara\iriasu2_st01.bmp",270,0
lsp 699,":a;chara\tamamo_st51.bmp",-250,0:print 10,500
name $name
>You are pathetic, Tamamo.@
>Your Master, and all of your friends are sealed.@> Leaving you all alone.\
>Don't you yearn for your friends of old?@
>Why not arrive in Hell first, and greet them as they join you?\
name ""
name "Tamamo no Mae"
>Hmph.@>I'm not alone.@
>My master's blood has flowed down unbroken, and now runs through Alipheese the Sixteenth's veins.\
>The Hero Luka... Alice... The three other Knights...@
>The current generation has risen up against you, and we fight together!\
>Of course I miss my siblings and master...@
>But right now, I'm fighting alongside my beloved friends and allies!\
name ""
name "Alice"
>Tamamo...\
name ""
lsp 699,":a;chara\tamamo_st52.bmp",-250,0:print 10,500
name "Tamamo no Mae"
>And how about you, Ilias?@
>Lucifina and Micaela... They've abandoned you.\
>Promestein and Black Alice betrayed you, too.@
>Nobody has come to your aid.\
>You're alone and pathetic, Ilias.\
name ""
name $name
>...I am a unique existence.@
>Unlike you, I have no need to group together with others!\
name ""
csp 699
lsp 700,":a;chara\iriasu2_st01.bmp",0,0:print 10,500
mov %sinkou,32
goto *common_main



*irias2_041

lsp 700,":a;chara\iriasu2_st01.bmp",270,0
lsp 699,":a;chara\tamamo_st53.bmp",-250,0:print 10,500
name "Tamamo no Mae"
>Guh... My time's up!\
name ""
>Tamamo's body suddenly starts to shrink!\
dwave 1,"se\down4.ogg"
lsp 699,":a;chara\tamamo_st03.bmp",-250,0:print 10,500
>And turns back into her familiar form!\
>At the same time, the overwhelming magic vanishes!@
>After running out of power, she's left completely helpless!\
name "Tamamo"
>...But I won't fall back.@
>I'll settle the score from the war long ago!\
name ""
name ""
name "Alice"
>...No, fall back!@
>You have no power left to fight!\
name ""
name "Tamamo"
>...I will not listen to that order, Monster Lord.@
>This is no time to argue, we must-\
name ""
name "Alice"
>Tamamo...@>I've always thought of you as my second mother.@
>I don't want to lose another mother before my very eyes.\
>...So please, fall back.\
name ""
name "Tamamo"
>But...\
name ""
dwave 1,"se\escape.ogg"
lsp 699,":a;chara\granberia_st11.bmp",-250,0:print 10,500
name "Granberia"
>That's right...@>Leave them to me.\
name ""
name "Luka"
>Granberia!\
name ""
>Granberia rushes into the area, the last of the four to arrive!\
lsp 699,":a;chara\tamamo_st01.bmp",-250,0:print 10,500
name "Tamamo"
>...Then I'll leave it to you young ones.@
>Monster Lord, you aren't allowed to fight to the death either.\
>Luka...@>You must swear to survive, no matter what.@
>Understood?@>You all must live, and come back safely!\
name ""
dwave 1,"se\escape.ogg"
csp 699:print 10,500
>With that said, Tamamo withdraws.@
lsp 699,":a;chara\granberia_st11.bmp",-250,0:print 10,500
>Granberia steps up to my side in her place...\
name "Granberia"
>Now then...@>The Cursed Sword user Granberia challenges you!\
name ""
name $name
>Another sword waving barbarian.\
name ""
name "Granberia"
>I won't deny it...@
>I've lived for the sword ever since I was born.\
lsp 699,":a;chara\granberia_st12.bmp",-250,0:print 10,500
>I'll show you the results of my lifetime of training!\
name ""
csp 699
lsp 700,":a;chara\iriasu2_st01.bmp",0,0:print 10,500
mov %hanyo4,24000
mov %sinkou,41
goto *common_main



*irias2_042

name $name
>Your body is at its limit, Granberia.@
>Wouldn't it be easier to just give up and die?\
name ""
skillname "Thunder of Judgement"
dwave 1,"se\ikazuti.ogg"
quake 10,1500
>A roar of thunder slams into Granberia!
dwave 2,"se\damage2.ogg"
quake 10,600
mov %hanyo3,7000:gosub *irias2_p
\
skillname ""
lsp 700,":a;chara\iriasu2_st01.bmp",250,0
lsp 699,":a;chara\granberia_st07.bmp",-200,0:print 10,500
name "Granberia"
>Guh...\
name ""
>Even after taking her attack, Granberia doesn't budge an inch!\
name "Granberia"
>Now it's my turn...@
>...Vaporizing Rebellion Sword!\
name ""
csp 699
lsp 700,":a;chara\iriasu2_st01.bmp",0,0:print 10,500
gosub *gran_skillx5
lsp 700,":a;chara\iriasu2_st01.bmp",250,0
lsp 699,":a;chara\granberia_st07.bmp",-200,0:print 10,500
name "Granberia"
>Guh... Not yet...@
>I can still fight!\
name ""
>After taking so many attacks, she can barely stand.@
>But she's still holding her sword, ready to attack again...\
name "Luka"
>Granberia, you've done enough!@
>No more!\
name ""
name "Granberia"
>Did you think I would just fall back like that?@
>You've fought against me...@>You should know better than that.\
name ""
name "Luka"
>..............\
name ""
>But any more than this, and...\
csp 699
lsp 700,":a;chara\iriasu2_st01.bmp",0,0:print 10,500
mov %sinkou,42
goto *common_main



*irias2_043

gosub *irias2_x33
lsp 700,":a;chara\iriasu2_st01.bmp",250,0
lsp 699,":a;chara\granberia_st07.bmp",-200,0:print 10,500
name "Granberia"
>Guh...!\
name ""
>Even with her whole body burnt in flames, Granberia doesn't lose her grip on her sword.\
name "Granberia"
>...Vaporizing Rebellion Sword!\
name ""
csp 699
lsp 700,":a;chara\iriasu2_st01.bmp",0,0:print 10,500
gosub *gran_skillx5
lsp 700,":a;chara\iriasu2_st01.bmp",250,0
lsp 699,":a;chara\granberia_st07.bmp",-200,0:print 10,500
name $name
>Gah... You stubborn little lizard!\
name ""
name "Luka"
>Granberia, fall back!\
name ""
name "Alice"
>...Yes, withdraw already!@
>Your Monster Lord orders you!\
name ""
name "Granberia"
>...I cannot, Monster Lord.@
>Forgive me.@>I am refusing your orders for the first time...\
name ""
>Granberia remains standing between us, grip tight on her sword.\
csp 699
lsp 700,":a;chara\iriasu2_st01.bmp",0,0:print 10,500
mov %sinkou,43
goto *common_main



*irias2_044

name $name
>Die already!\
name ""
gosub *irias2_x33
lsp 700,":a;chara\iriasu2_st01.bmp",250,0
lsp 699,":a;chara\granberia_st07.bmp",-200,0:print 10,500
name "Granberia"
>Uooooohhhh!!!\
name ""
csp 699
lsp 700,":a;chara\iriasu2_st01.bmp",0,0:print 10,500
gosub *gran_skillx5
>Fighting on pure will alone, Granberia launches another attack at Ilias.\
>It's as if she's burning her life energy itself to continue fighting...\
csp 699
lsp 700,":a;chara\iriasu2_st01.bmp",0,0:print 10,500
mov %sinkou,44
goto *common_main



*irias2_051

lsp 700,":a;chara\iriasu2_st01.bmp",250,0
lsp 699,":a;chara\granberia_st07.bmp",-200,0:print 10,500
name "Granberia"
>Guh... I can still fight!\
name ""
csp 699
lsp 700,":a;chara\iriasu2_st01.bmp",0,0:print 10,500
gosub *gran_skillx5
lsp 700,":a;chara\iriasu2_st01.bmp",250,0
lsp 699,":a;chara\granberia_st07.bmp",-200,0:print 10,500
name $name
>Insanity...@>How much strength do you hold?\
name ""
name "Granberia"
>............\
name ""
>But... That last attack was launched with the last of her energy itself!\
dwave 1,"se\down.ogg"
csp 699:print 10,500
>Dropping her sword at last, Granberia collapses.\
lsp 700,":a;chara\iriasu2_st01.bmp",0,0:print 10,500
name $name
>Ha... Hahahaha!@
>One dead at last!\
>No... Is she still breathing?@
>Then allow me to finish her off...\
name ""
dwave 1,"se\karaburi.ogg"
>Ilias' tentacles race toward the collapsed Granberia...\
dwave 1,"se\escape.ogg"
lsp 700,":a;chara\iriasu2_st01.bmp",270,0
lsp 699,":a;chara\micaela_st22.bmp",-250,0:print 10,500
>When the flash of a white wing cuts across between them!\
name "Micaela"
>...Come, you face my holy blade!\
name ""
csp 699
lsp 700,":a;chara\iriasu2_st01.bmp",0,0:print 10,500
skillname "Sword of the Heavens"
>Micaela's sword annihilates any trace of dark power!
dwave 1,"se\slash4.ogg"
lsp 2,":c;effect\003.bmp",0,0:print 18,500,"system\mask01.jpg"
dwave 3,"se\bom6.ogg"
flushout 1500
csp 700
csp 2
bg white,10,500
dwave 2,"se\damage2.ogg"
quake 10,600
mov $ori_name,"Micaela"
rnd2 %damage,60000,70000:gosub *enemylife2
mov $ori_name,"Luka"
skillname ""
lsp 700,":a;chara\iriasu2_st01.bmp",0,0
bg "bg\bg001.bmp",10,1000
name $name
>This technique!@
>Why are you...!?\
name ""
lsp 700,":a;chara\iriasu2_st01.bmp",270,0
lsp 699,":a;chara\micaela_st21.bmp",-250,0:print 10,500
name "Micaela"
>It has been a while, Ilias.\
name ""
name "Luka"
>Micaela... You came?@
>I thought you lost your power...\
name ""
>She said so in Enrika...@> That her Sword of the Heavens had already rusted.\
lsp 699,":a;chara\micaela_st23.bmp",-250,0:print 10,500
name "Micaela"
>My words...@>Well, I was lying.@
>I had enough left for one more attack...\
>I figured Ilias was listening in from the Heavens, so I had to lie.\
name ""
name $name
>You deceived me!?@
>Not only have you fallen, but you dare to lie to your Goddess!?\
name ""
>It seems like that blow was damaging both physically and mentally...\
>Her body itself is reeling from that hit.\
lsp 699,":a;chara\micaela_st21.bmp",-250,0:print 10,500
name "Micaela"
>I was drawn into countless crusades due to you.@
>When it comes to planning for a war, you don't even compare to me.\
name ""
>Micaela turns toward me.\
lsp 699,":a;chara\micaela_st23.bmp",-250,0:print 10,500
name "Micaela"
>That blow took the last of my power.@
>...Luka, we're counting on you!\
name ""
name "Luka"
>Yes, leave it to me!\
name ""
csp 699
lsp 700,":a;chara\iriasu2_st01.bmp",0,0:print 10,500
mov %sinkou,51
goto *common_main



*irias2_061

name $name
>It's true that was a powerful attack...@
>But I still have enough to defeat both you and Luka!\
name ""
lsp 700,":a;chara\iriasu2_st01.bmp",270,0
lsp 699,":a;chara\micaela_st22.bmp",-250,0:print 10,500
name "Micaela"
>...Fall before my sacred blade!\
name ""
csp 699
lsp 700,":a;chara\iriasu2_st01.bmp",0,0:print 10,500
skillname "Sword of the Heavens"
>Micaela's sword annihilates any trace of dark power!
dwave 1,"se\slash4.ogg"
lsp 2,":c;effect\003.bmp",0,0:print 18,500,"system\mask01.jpg"
dwave 3,"se\bom6.ogg"
flushout 1500
csp 700
csp 2
bg white,10,500
dwave 2,"se\damage2.ogg"
quake 10,600
mov $ori_name,"Micaela"
rnd2 %damage,60000,70000:gosub *enemylife2
mov $ori_name,"Luka"
skillname ""
lsp 700,":a;chara\iriasu2_st01.bmp",0,0
bg "bg\bg001.bmp",10,1000
name $name
>Guh...!@>Impossible!@
>You had run out of power!\
name ""
lsp 700,":a;chara\iriasu2_st01.bmp",270,0
lsp 699,":a;chara\micaela_st21.bmp",-250,0:print 10,500
name "Micaela"
>Ilias...@> You truly are poor when it comes to war.@
>You believed me twice, and took two blows as a result.\
name ""
>Micaela calmly explains as she stares at Ilias.@
>So her words to me were lies then, too?\
>Micaela bends down and picks up Granberia.\
lsp 699,":a;chara\micaela_st23.bmp",-250,0:print 10,500
name "Micaela"
>...This time, I'm truly out of energy.@
>I'll bring her to safety.\
name ""
>Micaela's truly out of energy now.@
>I don't think she's bluffing anyway...@> I can't feel any power from her.\
lsp 699,":a;chara\micaela_st21.bmp",-250,0:print 10,500
name "Micaela"
>Luka... Alipheese...@> I'm leaving it up to you two, now.@
>Our future is in your hands.\
name ""
name "Luka"
>Yes... Leave it to us!\
name ""
name "Alice"
>Thank you for your aid.@
>We will finish her off!\
name ""
name "Micaela"
>Then... Obtain victory!\
name ""
dwave 1,"se\escape.ogg"
csp 699
lsp 700,":a;chara\iriasu2_st01.bmp",0,0:print 10,500
>Carrying Granberia, Micaela withdraws.@
>Now it's just Alice and I...\
>We've taken damage, but Ilias has been hit even worse.\
>She's taken the attacks from the Four Heavenly Knights, and two blows from Micaela's ultimate attack.@
>This fight won't go on for much longer...\
name "Alice"
>Luka, be careful.@
>She doesn't have enough power left to launch any huge attacks.\
>So in that case...\
name ""
name "Luka"
>Yes...@> She'll try to disturb my heart.\
name ""
>If she can't use any big attack skills, she's going to switch to pleasure skills.@
>I have to stay strong now more than ever.\



*irias2_061x

name $name
>You two are all that is left.@
>It's time to end this fight...\
name ""
lsp 700,":a;chara\iriasu2_st01.bmp",200,0
lsp 699,":a;chara\alice_st03b.bmp",-160,0:print 10,500
name "Alice"
>I agree...@
>Let's finish this!\
name ""
name "Luka"
>This is the end.@
>Our long adventure will be over!\
name ""
>At last, the final moments...\
>I have no regrets.@
>I'll take her down, with everything I have!\
csp 699
lsp 700,":a;chara\iriasu2_st01.bmp",0,0:print 10,500
mov %sinkou,61
mov %skill01,22
mov %earth_keigen,50
if %nanido=3 mov %earth_keigen,25
if %enemylife>50000 skip 6
mov %enemylife,80000
if %enemylife>%max_enemylife mov %enemylife,%max_enemylife
mov %gage,%enemylife*100/%max_enemylife+1
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556:print 1
goto *common_main



*irias2_062

name $name
>How...?@
>How is a Goddess being pushed into a corner like this!?\
>Two surface dwellers are pushing me this far!?\
name ""
name "Luka"
>Ilias... We have a reason to defeat you.@
>Quit thinking that it's just the two of us bringing you down!\
>Everyone I have ever met...@
>And everyone you have trampled on!\
>All of their thoughts and hopes are imbued in this blade!\
name ""
lsp 700,":a;chara\iriasu2_st01.bmp",200,0
lsp 699,":a;chara\alice_st03b.bmp",-160,0:print 10,500
name "Alice"
>Ilias... You'll lose for one reason alone!\
>All because this idiot was spouting off those embarrassing speeches of coexistence all through the world!\
>Now face the result of those words!\
name ""
csp 699
lsp 700,":a;chara\iriasu2_st01.bmp",0,0:print 10,500
mov %sinkou,62
goto *common_main



*irias2_063

name $name
>I refuse.@>I will not accept this!@
>I am a Goddess!@>This cannot happen!\
name ""
dwave 1,"se\earth1.ogg"
quake 10,1000
>Ilias is summoning the last of her strength...@
>The mighty surge of power is shaking the earth itself!\
name "Luka"
>Guh...!@
>We've come too far, we can't lose!\
name ""
lsp 700,":a;chara\iriasu2_st01.bmp",200,0
lsp 699,":a;chara\alice_st03b.bmp",-160,0:print 10,500
name "Alice"
>Luka, use it!@
>End it with Quadruple Giga!\
name ""
name "Luka"
>I can't!@
>She'll attack me while I use it!\
name ""
name "Alice"
>Don't worry, I'll guard you!@
>Just focus on using it!\
name ""
name "Luka"
>I can't do that!\
name ""
name "Alice"
>We won't win if we don't take a risk!@
>If you don't, we'll both die here!\
>Don't misunderstand me, I'm not planning on dying!@
>We have to do it... We have to win... So we can live together in a peaceful world!\
name ""
name "Luka"
>Then promise me you won't die!\
name ""
lsp 699,":a;chara\alice_st02b.bmp",-160,0:print 10,500
name "Alice"
>Yes... I'll survive, for your sake!\
name ""
>There's no other way to finish her off...@
>Believing in Alice's determination, I'm prepared to finish this!\
csp 699
lsp 700,":a;chara\iriasu2_st01.bmp",0,0:print 10,500
mov %sinkou,63
goto *common_main



*irias2_v

if %nanido=0 goto *irias2_v2
mov %wind,0:mov %wind_turn,0:mov %earth,0:mov %earth_turn,0
mov %aqua,0:mov %aqua_turn,0:mov %fire,0:mov %fire_turn,0
gosub *elm_print
name "Luka"
>Come, Sylph!\
name ""
dwave 2,"se\wind2.ogg"
lsp 700,":a;chara\sylph_st01.bmp",0,0
bg "bg\bg061.bmp",10,1500
>Along with the power of wind, Sylph speaks in my head.\
name "Sylph"
>...Hey, Luka.@
>I've had fun on our journey until now.\
>I was the first Spirit that you met.@
>So among the four of us, I've been with you for the longest. \
lsp 700,":a;chara\sylph_st02.bmp",0,0:print 10,500
>And I'll be the first to be a part of your final blow, too!\
>Here we go, Luka! \
name ""
name "Luka"
>Yes... Let's finish this together, Sylph!\
name ""
dwave 2,"se\wind2.ogg"
csp 700
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
>The power of wind takes hold in Luka's sword!\
lsp 700,":a;chara\iriasu2_st01.bmp",0,0
bg "bg\bg001.bmp",10,1500
name $name
>Did you think I'd do nothing as you used that?\
name ""
skillname "Thunder of Judgement"
dwave 1,"se\ikazuti.ogg"
quake 10,1500
>A strike of thunder crashes down!
>But Alice guards Luka!
rnd2 %ransu,6500,7500
dwave 2,"se\damage2.ogg"
quake 10,600
itoa $sel1,%ransu
mov $temp_name,"Alice"
eng $temp_name+" takes "+$sel1+" damage!"
$sel6\
skillname ""
mov $temp_name,""
lsp 700,":a;chara\iriasu2_st01.bmp",200,0
lsp 699,":a;chara\alice_st03b.bmp",-160,0:print 10,500
name "Alice"
>Gah...!@
>I won't let you interfere!\
name ""
name "Luka"
>...Alice!\
name ""
name "Alice"
>Don't worry about me!@
>Focus on your skill!\
name ""
csp 699
lsp 700,":a;chara\iriasu2_st01.bmp",0,0:print 10,500
name "Luka"
>Got it!@>Stay strong, Alice!@
>Come, Gnome!\
name ""
dwave 2,"se\earth1.ogg"
lsp 700,":a;chara\gnome_st12.bmp",0,0
bg "bg\bg076.bmp",10,1500
>Along with the breath of the earth, Gnome emerges in my mind.\
name "Gnome"
>..........\
lsp 700,":a;chara\gnome_st11.bmp",0,0:print 10,1500
>...It has been fun...\
>Because we've been together...\
>.............\
name ""
name "Luka"
>Yes, and we'll stay together, Gnome!\
name ""
dwave 2,"se\earth1.ogg"
csp 700
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
>The power of earth takes hold in Luka's sword!\
lsp 700,":a;chara\iriasu2_st01.bmp",0,0
bg "bg\bg001.bmp",10,1500
name $name
>Then I'll destroy the Spirits themselves!\
name ""
skillname "Ultimate Messiah"
vsp 700,0
bg black,10,100
dwave 1,"se\laser2.ogg"
lsp 2,":c;effect\022.bmp",0,0:print 10,500
csp 2
bg black,10,1000
>A sacred wave of salvation tears apart everything!
>But Alice guards Luka!
rnd2 %ransu,7500,8500
dwave 2,"se\damage2.ogg"
quake 10,600
itoa $sel1,%ransu
mov $temp_name,"Alice"
eng $temp_name+" takes "+$sel1+" damage!"
$sel6/
vsp 700,1
bg "bg\bg001.bmp",10,1000
\
skillname ""
mov $temp_name,""
lsp 700,":a;chara\iriasu2_st01.bmp",200,0
lsp 699,":a;chara\alice_st03b.bmp",-160,0:print 10,500
name "Alice"
>I told you, Ilias...@
>I won't let you lay a finger on Luka!\
name ""
name $name
>Curse you, Monster Lord Alipheese!@
>I'll tear you to pieces!\
name ""
dwave 1,"se\earth1.ogg"
quake 10,1000
>Ilias attacks in a frenzied rage.@
>Alice can't hold on much longer!\
csp 699
lsp 700,":a;chara\iriasu2_st01.bmp",0,0:print 10,500
name "Luka"
>Come, Undine!\
name ""
dwave 2,"se\aqua2.ogg"
lsp 700,":a;chara\undine_st02.bmp",0,0
bg "bg\bg097.bmp",10,1500
>Along with the flow of water, Undine speaks in my mind.\
name "Undine"
>Erubetie hated humans...@
>But you were the one who changed her.\
>Your frank, direct nature changed the hearts of many, Luka.@
>...Of course, mine as well.\
>And so I believe that we can live together now.@
>That's why we must win this battle...\
name ""
name "Luka"
>Yes... Lend me your power!\
name ""
dwave 2,"se\aqua2.ogg"
csp 700
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
>The power of water takes hold in Luka's sword!\
lsp 700,":a;chara\iriasu2_st01.bmp",0,0
bg "bg\bg001.bmp",10,1500
name $name
>You!@
>The power of a Goddess will erase you!\
name ""
skillname "Big Bang"
>A wave of creation energy radiates out from Ilias!
dwave 1,"se\bom3.ogg"
lsp 2,":c;effect\002.bmp",0,0:print 18,1000,"system\mask01.jpg"
vsp 700,0
flushout 1000
csp 2
bg white,10,1000
>But Alice guards Luka!
rnd2 %ransu,10000,12000
dwave 2,"se\damage2.ogg"
quake 10,600
itoa $sel1,%ransu
mov $temp_name,"Alice"
eng $temp_name+" takes "+$sel1+" damage!"
$sel6/
vsp 700,1
bg "bg\bg001.bmp",10,1000
\
skillname ""
mov $temp_name,""
lsp 700,":a;chara\iriasu2_st01.bmp",200,0
lsp 699,":a;chara\alice_st03b.bmp",-160,0:print 10,500
name "Alice"
>What's wrong, Ilias?@
>You'll never defeat me, if that's all you've got...\
name ""
name $name
>You suicidal, stubborn mortal!\
name ""
>Alice can't take any more!@
>But I'm almost done!\
csp 699
lsp 700,":a;chara\iriasu2_st01.bmp",0,0:print 10,500
name "Luka"
>Come, Salamander!\
name ""
dwave 2,"se\fire2.ogg"
lsp 700,":a;chara\salamander_st01.bmp",0,0
bg "bg\bg115.bmp",10,1500
>Along with the power of fire, Salamander speaks in my mind...\
name "Salamander"
>Luka... You've wielded your sword for the sake of others.@
>Once this fight is over, try to live for yourself.\
>Don't forget about Heinrich's isolation.@
>You aren't allowed to follow in his path!\
>...Now, use my power!@
>And put an end to this!\
name ""
name "Luka"
>Yes, we'll finish this together!\
name ""
dwave 2,"se\fire2.ogg"
csp 700
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
>The power of fire takes hold in Luka's sword!\
lsp 700,":a;chara\iriasu2_st01.bmp",0,0
bg "bg\bg001.bmp",10,1500
name "Luka"
>Alright, now...\
name ""
>Now, the power of the spirits is in my blade...@
>I just have to attack Ilias!\
lsp 700,":a;chara\iriasu2_st01.bmp",200,0
lsp 699,":a;chara\alice_st03b.bmp",-160,0:print 10,500
name "Alice"
>No, not yet!@
>The technique is increased exponentially with the amount of attributes imbued into it!\
>Earth, Fire, Wind, and Water...@>It should also work with Holy power!\
name ""
name "Luka"
>I see...@> So imbue it with Holy power as well!\
name ""
dwave 2,"se\bun.ogg"
lsp 701,":a;chara\granberia_st11.bmp",0,0
lsp 701,":a;chara\arumaeruma_st11.bmp",0,0
lsp 701,":a;chara\tamamo_st01.bmp",0,0
lsp 701,":a;chara\erbetie_st01.bmp",225,0
lsp 701,":a;chara\gob_st01.bmp",0,0
lsp 701,":a;chara\pramia_st01.bmp",0,0
lsp 701,":a;chara\vgirl_st01.bmp",0,0
lsp 701,":a;chara\dragonp_st01.bmp",0,0
lsp 701,":a;chara\queenhapy_st11.bmp",0,0
lsp 701,":a;chara\saniria_n_st01.bmp",0,0
csp 701
>I draw forth the Holy aura from my body, and move it toward my blade.\
>As the Holy energy takes hold, my blade vibrates with power.\
name "Alice"
>And I'll add in the power of Darkness!\
name ""
>Alice puts her hand on my sword...\
dwave 2,"se\yami.ogg"
lsp 701,":a;chara\fairys_st01.bmp",260,75
lsp 701,":a;chara\meia_st02.bmp",50,50
lsp 701,":a;chara\kraken_st01.bmp",0,0
lsp 701,":a;chara\chrom_st21.bmp",0,0
lsp 701,":a;chara\sabasa_st01.bmp",0,0
lsp 701,":a;chara\sara_st02r.bmp",0,0
lsp 701,":a;chara\sphinx_st01.bmp",0,0
lsp 701,":a;chara\grandnoa_st02.bmp",0,0
lsp 701,":a;chara\gob_st01.bmp",0,0
lsp 701,":a;chara\nekomata_st04.bmp",0,0
csp 701
>As her power of Darkness flows into my blade, the explosive power sings in the air.\
>With six different attributes, my blade is radiating with dazzling light.\
>Now to launch it at Ilias!\
csp 699
lsp 700,":a;chara\iriasu2_st01.bmp",0,0:print 10,500
name $name
>I am a God!@
>You cannot defeat a God with that!\
name ""
dwave 1,"se\earth1.ogg"
quake 10,1000
>The world itself trembles as Ilias approaches us.@
>With Alice and I holding my dazzling sword, we charge forward!\
bgm "bgm\title.ogg"
lsp 700,":a;chara\alice_iv03.bmp",0,0:print 10,500
name "Alice"
>Here we go, Luka!\
lsp 701,":a;chara\sirohebi_st11.bmp",0,0
lsp 701,":a;chara\a_emp_st22.bmp",140,30
lsp 701,":a;chara\grangold_st01.bmp",0,0
lsp 701,":a;chara\queenant_st01.bmp",0,0
lsp 701,":a;chara\succubus_st01.bmp",0,0
lsp 701,":a;chara\poseidones_st01.bmp",0,0
lsp 701,":a;chara\serene_st11.bmp",0,0
lsp 701,":a;chara\queenelf_st01.bmp",0,0
lsp 701,":a;chara\queenfairy_st01.bmp",0,0
lsp 701,":a;chara\queenmermaid_st11.bmp",0,0
lsp 701,":a;chara\amira_st01.bmp",0,0
lsp 701,":a;chara\lazarus_st11.bmp",0,0
lsp 701,":a;chara\heinrich_st01.bmp",0,0
lsp 701,":a;chara\micaela_st21.bmp",0,0
csp 701
lsp 700,":a;chara\alice_iv03.bmp",0,0
print 1
>This is the final blow!\
name ""
name "Luka"
>...Yes, let's finish this together!@
>The end to our journey!\
name ""
name "Alice"
>Uooooooo!!!\
name ""
name "Luka"
>Haaaaaaa!!!\
name ""
csp 700:print 10,500
>At that moment, they flashed in front of me...@
eng "All of the people and monsters I've met until now...":$sel6/
wait 1000
if %check06=0 skip 5
lsp 700,":a;chara\granberia_st11.bmp",0,0:print 10,70
lsp 700,":a;chara\arumaeruma_st11.bmp",0,0:print 10,70
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,70
lsp 700,":a;chara\erbetie_st01.bmp",225,0:print 10,70
if %ivent01<2 skip 5
lsp 700,":a;chara\gob_st01.bmp",0,0:print 10,70
lsp 700,":a;chara\pramia_st01.bmp",0,0:print 10,70
lsp 700,":a;chara\vgirl_st01.bmp",0,0:print 10,70
lsp 700,":a;chara\dragonp_st01.bmp",0,0:print 10,70
if %ivent02=2 lsp 700,":a;chara\queenhapy_st11.bmp",0,0:print 10,70
if %ivent18=2 lsp 700,":a;chara\saniria_n_st01.bmp",0,0:print 10,70
if %ivent18=2 lsp 700,":a;chara\fairys_st01.bmp",260,75:print 10,70
if %ivent04=2 lsp 700,":a;chara\meia_st02.bmp",50,50:print 10,70
if %ivent04=2 lsp 700,":a;chara\kraken_st01.bmp",0,0:print 10,70
if %ivent05=3 lsp 700,":a;chara\chrom_st21.bmp",0,0:print 10,70
if %ivent06=2 lsp 700,":a;chara\sabasa_st01.bmp",0,0:print 10,70
if %ivent06=2 lsp 700,":a;chara\sara_st02r.bmp",0,0:print 10,70
if %ivent06=2 lsp 700,":a;chara\sphinx_st01.bmp",0,0:print 10,70
if %ivent08=2 lsp 700,":a;chara\grandnoa_st02.bmp",0,0:print 10,70
if %ivent09=2 lsp 700,":a;chara\nekomata_st04.bmp",0,0:print 10,70
if %ivent09=2 lsp 700,":a;chara\sirohebi_st11.bmp",0,0:print 10,70
if %ivent10=2 lsp 700,":a;chara\a_emp_st22.bmp",140,30:print 10,70
if %ivent11=2 lsp 700,":a;chara\grangold_st01.bmp",0,0:print 10,70
if %ivent11=2 lsp 700,":a;chara\queenant_st01.bmp",0,0:print 10,70
if %ivent12=2 lsp 700,":a;chara\succubus_st01.bmp",0,0:print 10,70
if %ivent17=2 lsp 700,":a;chara\poseidones_st01.bmp",0,0:print 10,70
if %ivent17=2 lsp 700,":a;chara\serene_st11.bmp",0,0:print 10,70
if %ivent14=3 lsp 700,":a;chara\queenelf_st01.bmp",0,0:print 10,70
if %ivent14=3 lsp 700,":a;chara\queenfairy_st01.bmp",0,0:print 10,70
if %ivent04=2 lsp 700,":a;chara\queenmermaid_st11.bmp",0,0:print 10,70
lsp 700,":a;chara\amira_st01.bmp",0,0:print 10,70
if %ivent17=2 lsp 700,":a;chara\lazarus_st11.bmp",0,0:print 10,70
if %ivent16=1 lsp 700,":a;chara\heinrich_st01.bmp",0,0:print 10,70
if %ivent03=1 lsp 700,":a;chara\micaela_st21.bmp",0,0:print 10,70
csp 700:print 10,500
if %check06=0 && %ivent01<2 && %ivent02<2 && %ivent03<1 && %ivent04<2 && %ivent05<3 && %ivent06<2 && %ivent07<2 && %ivent08<2 && %ivent09<2 && %ivent10<2 && %ivent11<2 && %ivent12<2 && %ivent14<3 && %ivent16<1 && %ivent17<2 && %ivent18<2 mov %lonely,1
\
>Because of everyone I've met, I am who I am today.@
>Because of everyone I've met, I'm able to fight today!\
>And...\
lsp 700,":a;chara\marcellus_st01.bmp",0,0
lsp 701,":a;chara\rucyfina_st11.bmp",160,0:print 10,500
name "Lucifina"
>Luka... My beloved son.\
name ""
name "Marcellus"
>The world we've always dreamed of... You'll see it first.\
name ""
>Father...@
>Mother...\
csp 701
lsp 700,":a;chara\alice_iv03.bmp",0,0:print 10,500
name "Luka"
>This is my!@>And Alice's!@> And everyone's!\
name ""
>Quadruple Giga---\
wait 1000
textclear
dwave 1,"se\bom6.ogg"
goto *irias2_v2



*irias2_v2

bgmstop
csp -1
bg white,10,2000
if %battle_auto=1 skipoff
mov %battle,0
mov %count_ko,%count_ko+1
if %viclose=3 skip 7
if %nanido=0 skip 6
if %mylife=%max_mylife && %nodamage=0 mov %count_hpfull,1
if %nanido=3 mov %count_hellvic,1
if %status=7 mov %count_vickonran,1
if %counter>0 mov %counterk,1
if %alice_skill=1 mov %alicek,1
if %zukanon=1 return *zukan_commonkaisou0
mov %2428,1
mov %skill01,22
goto *sean0412



*irias2_kousan0

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
name "Alice"
>Have you lost your mind!?@
>Luka, what are you thinking!?\
name ""
gosub *face2
name $name
>Hehe... So he will bow at my feet.@
>Now, allow me to give you pleasure as your reward...\
name ""
goto *irias2_z5



*irias2_kousan1

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
name "Alice"
>Have you lost your mind!?@
>Luka, what are you thinking!?\
name ""
name "Alma Elma"
>Hey, you're giving up here...?@
>I'll never forgive this, Luka-boy...\
name ""
gosub *face2
name $name
>Hehe... So he will bow at my feet.@
>Now, allow me to give you pleasure as your reward...\
name ""
goto *irias2_z5



*irias2_kousan2

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
name "Alice"
>Have you lost your mind!?@
>Luka, what are you thinking!?\
name ""
name "Erubetie"
>To lose hope at this point...@
>I was a fool to have believed in you.\
name ""
gosub *face2
name $name
>Hehe... So he will bow at my feet.@
>Now, allow me to give you pleasure as your reward...\
name ""
goto *irias2_z5



*irias2_kousan3

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
name "Alice"
>Have you lost your mind!?@
>Luka, what are you thinking!?\
name ""
name "Tamamo no Mae"
>Why are you giving up, fool!?\
name ""
gosub *face2
name $name
>Hehe... So he will bow at my feet.@
>Now, allow me to give you pleasure as your reward...\
name ""
goto *irias2_z5



*irias2_kousan4

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
name "Alice"
>Have you lost your mind!?@
>Luka, what are you thinking!?\
name ""
name "Granberia"
>You dare show such disgraceful behavior before me!?\
name ""
gosub *face2
name $name
>Hehe... So he will bow at my feet.@
>Now, allow me to give you pleasure as your reward...\
name ""
goto *irias2_z5



*irias2_kousan5

gosub *kousan_syori
>Luka succumbs to temptation, and stops resisting.\
name "Alice"
>Have you lost your mind!?@
>Luka, what are you thinking!?\
name ""
name "Micaela"
>Ah, how truly foolish...@
>Even though the fate of the world rests on your blade...\
name ""
mov %micaela_batou,1
gosub *face2
name $name
>Hehe... So he will bow at my feet.@
>Now, allow me to give you pleasure as your reward...\
name ""
goto *irias2_z5



*irias2_main

gosub *cmd_main
if %cmd1=11 && %kousoku>0 goto *common_mogaku
if %cmd1=11 goto *common_attack
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 goto *common_bougyo
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 && %sinkou>10 && %sinkou<13 goto *irias2_kousan1
if %cmd1=15 && %sinkou>20 && %sinkou<26 goto *irias2_kousan2
if %cmd1=15 && %sinkou>30 && %sinkou<33 goto *irias2_kousan3
if %cmd1=15 && %sinkou>40 && %sinkou<45 goto *irias2_kousan4
if %cmd1=15 && %sinkou=51 goto *irias2_kousan5
if %cmd1=15 goto *irias2_kousan0
if %cmd1=16 goto *irias2_onedari
if %sinkou>62 && %cmd1=17 goto *irias2_skill
if %sinkou<63 && %cmd1=17 goto *common_skill
goto *irias2_main



*irias2_skill

gosub *cmd_skill
if %cmd1=24 goto *skill4
if %cmd1=29 goto *irias2_v
if %cmd1=31 goto *skill7e
if %cmd1=32 goto *skill8e
if %cmd1=33 goto *skill10e
if %cmd1=34 goto *skill14e
if %cmd1=35 goto *skill17
if %cmd1=36 goto *skill18
if %cmd1=37 goto *skill19
if %cmd1=38 goto *skill20
if %cmd1=39 goto *skill21
if %cmd1=42 goto *skill24
if %cmd1=43 goto *skill25
if %cmd1=44 goto *skill22
if %cmd1=45 goto *skill23
if %cmd1=-1 goto "*"+$lavel+"_main"
goto *irias2_skill



*irias2_p

add %stack,1
if %sinkou<10 sub %stack,1:return
if %sinkou>10 && %sinkou<13 mov $ori_name,"Alma Elma"
if %sinkou>20 && %sinkou<26 mov $ori_name,"Erubetie"
if %sinkou>30 && %sinkou<33 mov $ori_name,"Tamamo no Mae"
if %sinkou>40 && %sinkou<45 mov $ori_name,"Granberia"
if %sinkou>50 sub %stack,1:return
rnd2 %ransu,%hanyo3*9/10,%hanyo3*9/11
mov %hanyo4,%hanyo4-%ransu
itoa $sel1,%ransu
if $temp_name="" skip 2
>
eng $ori_name+" takes "+$sel1+" damage!"
$sel6/
mov $ori_name,"Luka"
sub %stack,1
return



*irias2_a

if %kousan>0 goto *irias2_z5
if %before_action=47 && %sinkou=21 goto *irias2_022a
if %before_action=47 && %sinkou=22 goto *irias2_023a
if %before_action=47 gosub *irias2_x35x
if %sinkou<10 goto *irias2_z0
if %sinkou>10 && %sinkou<13 goto *irias2_z1
if %sinkou=13 gosub *alice_skillx:goto *irias2_021
if %sinkou>20 && %sinkou<26 goto *irias2_z2
if %sinkou=26 gosub *alice_skillx:goto *irias2_031
if %sinkou>30 && %sinkou<33 goto *irias2_z3
if %sinkou>40 && %sinkou<45 goto *irias2_z4
if %sinkou=51 gosub *alice_skillx:goto *irias2_061
if %sinkou>60 goto *irias2_z5



*irias2_z0

gosub *alice_skillx
if %sinkou=1 goto *irias2_002
if %sinkou=2 && %enemylife<%henkahp1 goto *irias2_011
rnd2 %ransu,1,3
if %ransu=1 gosub *irias2_x1:goto *common_main
if %ransu=2 gosub *irias2_x2:goto *common_main
if %ransu=3 gosub *irias2_x3:goto *common_main



*irias2_z1

gosub *alice_skillx
if %hanyo4<0 goto *irias2_013
gosub *aruma_skillx
if %sinkou=11 goto *irias2_012
rnd2 %ransu,1,6
if %ransu=1 gosub *irias2_x1:goto *common_main
if %ransu=2 gosub *irias2_x2:goto *common_main
if %ransu=3 && %owaza_count3a>3 gosub *irias2_x3:goto *common_main
if %ransu=4 gosub *irias2_x4:goto *common_main
if %ransu=5 gosub *irias2_x11:goto *common_main
if %ransu=6 gosub *irias2_x12:goto *common_main
skip -7



*irias2_z2

gosub *alice_skillx
if %sinkou=21 goto *irias2_022
>Erubetie creates a defensive shield with her own body...\
if %sinkou=22 goto *irias2_023
if %sinkou=23 goto *irias2_024
if %hanyo4<0 && %sinkou=24 goto *irias2_025
if %sinkou=25 goto *irias2_026
rnd2 %ransu,1,2
if %ransu=1 gosub *irias2_x21:goto *common_main
if %ransu=2 gosub *irias2_x22:goto *common_main



*irias2_z3

gosub *alice_skillx
if %hanyo4<0 && %sinkou=32 goto *irias2_041
gosub *tamamo_skillx
if %sinkou=31 goto *irias2_032
rnd2 %ransu,1,5
if %ransu=1 gosub *irias2_x31:goto *common_main
if %ransu=2 gosub *irias2_x32:goto *common_main
if %ransu=3 gosub *irias2_x33:goto *common_main
if %ransu=4 gosub *irias2_x34:goto *common_main
if %ransu=5 && %owaza_count3a>3 gosub *irias2_x35:goto *common_main
skip -6



*irias2_z4

gosub *alice_skillx
if %hanyo4<0 && %sinkou=41 goto *irias2_042
if %sinkou=42 goto *irias2_043
if %sinkou=43 goto *irias2_044
if %sinkou=44 goto *irias2_051
gosub *gran_skillx
rnd2 %ransu,1,5
if %ransu=1 gosub *irias2_x31:goto *common_main
if %ransu=2 gosub *irias2_x32:goto *common_main
if %ransu=3 gosub *irias2_x33:goto *common_main
if %ransu=4 && %owaza_count3a>3 gosub *irias2_x35:goto *common_main
if %ransu=5 && %owaza_count3b>3 gosub *irias2_x41:goto *common_main
skip -6



*irias2_z5

if %kousan>0 skip 6
if %sinkou=61 && %enemylife<%henkahp2 && %kousoku=0 goto *irias2_062
if %sinkou=62 goto *irias2_063
if %sinkou=63 gosub *irias2_x41b:goto *common_main
if %sinkou=64 gosub *irias2_x41c:goto *common_main
if %kousoku=0 gosub *alice_skillx
if %kousoku=1 gosub *irias2_a4:goto *common_main
rnd2 %ransu,1,4
if %ransu=1 gosub *irias2_a1:goto *common_main
if %ransu=2 gosub *irias2_a2:goto *common_main
if %ransu=3 && %owaza_count1a>3 && %sinkou=61 gosub *irias2_a3:goto *common_main
if %ransu=4 && %owaza_count1b>3 && %sinkou=61 gosub *irias2_a5:goto *common_main
skip -5



*irias2_x1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"This is the true power of wind. I'll cut you to pieces!"
if %ransu=2 mov $sel1,"I'll chop you up with the power of wind!"
if %ransu=3 mov $sel1,"Wind, I command you to tear them to pieces!"
name $name
eng $sel1:$sel6\
name ""
skillname "Shamshir"
dwave 1,"se\wind1.ogg"
>Powerful gusts of wind cut through everything!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua=3 && %ransu<10 gosub *aqua_guard:sub %stack,1:return
if %wind=3 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
mov %a_effect1,1
if %nanido<2 damage 2500,3000
if %nanido=2 damage 3500,4000
if %nanido=3 damage 4500,5000
skillname ""
if %mylife=0 sub %stack,1:return *irias2_h5
sub %stack,1
return



*irias2_x2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"This is the true power of water. Be drowned."
if %ransu=2 mov $sel1,"After I wipe you out, I'll drown the surface world with this!"
if %ransu=3 mov $sel1,"The torrent of cleansing water shall purify all evil!"
name $name
eng $sel1:$sel6\
name ""
skillname "Titus' Wave"
dwave 1,"se\aqua2.ogg"
>Ilias summons forth the power of water, creating a violent tsunami!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua=3 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
if %wind=3 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
mov %a_effect1,1
if %nanido<2 damage 2500,3000
if %nanido=2 damage 3500,4000
if %nanido=3 damage 4500,5000
skillname ""
if %mylife=0 sub %stack,1:return *irias2_h5
sub %stack,1
return



*irias2_x3

add %stack,1
mov %owaza_count3a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Those who defy their God shall vanish."
if %ransu=2 mov $sel1,"Disappear."
if %ransu=3 mov $sel1,"I'll pound you to dust."
name $name
eng $sel1:$sel6\
name ""
skillname "Tentacle Blast"
dwave 1,"se\karaburi.ogg"
>Ilias' huge tentacles rampage around, destroying everything they touch!
if %daten>0 goto *skill22x
mov %a_effect1,1
if %nanido<2 damage 4000,5000
if %nanido=2 damage 5000,6000
if %nanido=3 damage 6000,7000
rnd2 %ransu,4000,5000
dwave 2,"se\damage2.ogg"
quake 10,600
itoa $sel1,%ransu
mov $temp_name,"Alice"
eng $temp_name+" takes "+$sel1+" damage!"
$sel6/
notif %sinkou<10 dwave 2,"se\damage2.ogg"
mov %hanyo3,4500:gosub *irias2_p
\
skillname ""
mov $temp_name,""
if %mylife=0 sub %stack,1:return *irias2_h5
sub %stack,1
return



*irias2_x4

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Those who defy their God shall vanish."
if %ransu=2 mov $sel1,"Disappear."
if %ransu=3 mov $sel1,"I'll pound you to dust."
name $name
eng $sel1:$sel6\
name ""
skillname "Tentacle Blast"
dwave 1,"se\karaburi.ogg"
>Ilias' huge tentacles rampage around, destroying everything they touch!
wait 500
gosub *counter
skillname "Knockout Palm"
dwave 1,"se\dageki2.ogg"
lsp 2,":a;effect\025_01.bmp",0,0:print 10,20
lsp 2,":a;effect\025_02.bmp",0,0:print 10,20
lsp 2,":a;effect\025_03.bmp",0,0:print 10,20
dwave 2,"se\light.ogg"
lsp 2,":a;effect\025_04.bmp",0,0:print 10,60
lsp 2,":a;effect\025_05.bmp",0,0:print 10,60
lsp 2,":a;effect\025_06.bmp",0,0:print 10,60
lsp 2,":a;effect\025_07.bmp",0,0:print 10,60
lsp 2,":a;effect\025_08.bmp",0,0:print 10,60
csp 2:print 10,10
textclear
>But Alma Elma sidesteps, and slams her palm into Ilias' tentacle!
dwave 2,"se\damage2.ogg"
mov $ori_name,"Alma Elma"
rnd2 %damage,3000,3500:gosub *enemylife2
mov $ori_name,"Luka"
skillname ""
sub %stack,1
return



*irias2_x11

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Taste the wrath of your God."
if %ransu=2 mov $sel1,"Vanish!"
if %ransu=3 mov $sel1,"Repent your sins through pain!"
name $name
eng $sel1:$sel6\
name ""
skillname "Thunder of Judgement"
dwave 1,"se\ikazuti.ogg"
quake 10,1500
>A roar of thunder crashes down upon all sinners!
dwave 2,"se\damage2.ogg"
quake 10,600
mov %hanyo3,7000:gosub *irias2_p
\
skillname ""
sub %stack,1
return



*irias2_x12

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"The flames of Hell Alipheese herself thinks she can use!"
if %ransu=2 mov $sel1,"As I am now, I can even summon forth dark power!"
if %ransu=3 mov $sel1,"Hehe... Even the power of the Dark God is mine now."
name $name
eng $sel1:$sel6\
name ""
skillname "Flame of Judgement"
dwave 1,"se\fire4.ogg"
quake 10,1500
>The hellfire of the netherworld incinerates everything!
dwave 2,"se\damage2.ogg"
quake 10,600
mov %hanyo3,7000:gosub *irias2_p
\
skillname ""
sub %stack,1
return



*irias2_x21

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Taste the wrath of your God."
if %ransu=2 mov $sel1,"Vanish!"
if %ransu=3 mov $sel1,"Repent your sins through pain!"
name $name
eng $sel1:$sel6\
name ""
skillname "Thunder of Judgement"
dwave 1,"se\ikazuti.ogg"
quake 10,1500
>A roar of thunder crashes down upon all sinners!
if %daten>0 goto *skill22x
>But Erubetie protects Luka!
dwave 2,"se\damage2.ogg"
quake 10,600
mov %hanyo3,7000:gosub *irias2_p
\
skillname ""
sub %stack,1
return



*irias2_x22

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"The flames of Hell Alipheese herself thinks she can use!"
if %ransu=2 mov $sel1,"As I am now, I can even summon forth dark power!"
if %ransu=3 mov $sel1,"Hehe... Even the power of the Dark God is mine now."
name $name
eng $sel1:$sel6\
name ""
skillname "Flame of Judgement"
dwave 1,"se\fire4.ogg"
quake 10,1500
>The hellfire of the netherworld incinerates everything!
if %daten>0 goto *skill22x
>But Erubetie protects Alice!
dwave 2,"se\damage2.ogg"
quake 10,600
mov %hanyo3,7000:gosub *irias2_p
\
skillname ""
sub %stack,1
return



*irias2_x31

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Taste the wrath of your God."
if %ransu=2 mov $sel1,"Vanish!"
if %ransu=3 mov $sel1,"Repent your sins through pain!"
name $name
eng $sel1:$sel6\
name ""
skillname "Thunder of Judgement"
dwave 1,"se\ikazuti.ogg"
quake 10,1500
>A roar of thunder crashes down upon all sinners!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua=3 && %ransu<10 gosub *aqua_guard:sub %stack,1:return
if %wind=3 mov %wind_kakuritu,100
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind=3 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
mov %a_effect1,1
if %nanido<2 damage 6500,7500
if %nanido=2 damage 7500,8500
if %nanido=3 damage 8500,9500
skillname ""
if %mylife=0 sub %stack,1:return *irias2_h5
sub %stack,1
return



*irias2_x32

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"The flames of Hell Alipheese herself thinks she can use!"
if %ransu=2 mov $sel1,"As I am now, I can even summon forth dark power!"
if %ransu=3 mov $sel1,"Hehe... Even the power of the Dark God is mine now."
name $name
eng $sel1:$sel6\
name ""
skillname "Flame of Judgement"
dwave 1,"se\fire4.ogg"
quake 10,1500
>The hellfire of the netherworld incinerates everything!
dwave 2,"se\damage2.ogg"
quake 10,600
rnd2 %ransu,6500,7500
itoa $sel1,%ransu
mov $temp_name,"Alice"
eng $temp_name+" takes "+$sel1+" damage!"
$sel6\
skillname ""
mov $temp_name,""
sub %stack,1
return



*irias2_x33

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Be purified by fire."
if %ransu=2 mov $sel1,"I will disintegrate you."
if %ransu=3 mov $sel1,"Evil shall be purified by fire!"
name $name
eng $sel1:$sel6\
name ""
skillname "Holy Flare"
vsp 700,0
bg black,10,300
dwave 1,"se\fire2.ogg"
lsp 2,":c;effect\021.bmp",0,0:print 10,500
vsp 700,1
csp 2
bg "bg\bg001.bmp",10,1000
>Sacred power condenses, and explodes in a brilliant flash of fire!
dwave 2,"se\damage2.ogg"
quake 10,600
mov %hanyo3,8000:gosub *irias2_p
\
skillname ""
if %mylife=0 sub %stack,1:return *irias2_h5
sub %stack,1
return



*irias2_x34

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I shall crush you like the insect you are."
if %ransu=2 mov $sel1,"Suffer in agony."
if %ransu=3 mov $sel1,"You are just a mere worm."
name $name
eng $sel1:$sel6\
name ""
skillname "Inferno Bind"
dwave 1,"se\ero_simetuke1.ogg"
>Ilias' tentacles wound around Tamamo, crushing her!
dwave 2,"se\damage2.ogg"
quake 10,600
mov %hanyo3,4000:gosub *irias2_p
\
skillname ""
if %mylife=0 sub %stack,1:return *irias2_h5
sub %stack,1
return



*irias2_x35

add %stack,1
mov %owaza_count3a,0
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"The apocalypse awaits."
if %ransu=2 mov $sel1,"There is no salvation for sinners."
if %ransu=3 mov $sel1,"You shall not be saved. Be extinct, along with the very world itself."
name $name
eng $sel1:$sel6\
name ""
skillname "Ultimate Messiah"
vsp 700,0
bg black,10,100
dwave 1,"se\laser2.ogg"
lsp 2,":c;effect\022.bmp",0,0:print 10,500
csp 2
bg black,10,1000
>A holy wave of ultimate destruction radiates outward from Ilias!
if %daten>0 goto *skill22x
mov %a_effect1,1
if %nanido<2 damage 6500,7500
if %nanido=2 damage 7500,8500
if %nanido=3 damage 8500,9500
rnd2 %ransu,6500,7500
dwave 2,"se\damage2.ogg"
quake 10,600
itoa $sel1,%ransu
mov $temp_name,"Alice"
eng $temp_name+" takes "+$sel1+" damage!"
$sel6/
dwave 2,"se\damage2.ogg"
mov %hanyo3,7000:gosub *irias2_p
vsp 700,1
bg "bg\bg001.bmp",10,1000
\
skillname ""
mov $temp_name,""
if %mylife=0 sub %stack,1:return *irias2_h5
sub %stack,1
return



*irias2_x35x

add %stack,1
name $name
>I won't let you use that!\
name ""
skillname "Ultimate Messiah"
vsp 700,0
bg black,10,100
dwave 1,"se\laser2.ogg"
lsp 2,":c;effect\022.bmp",0,0:print 10,500
csp 2
bg black,10,1000
>A holy wave of ultimate destruction radiates outward from Ilias!
if %daten>0 goto *skill22x
mov %a_effect1,1
if %nanido<2 damage 6500,7500
if %nanido=2 damage 7500,8500
if %nanido=3 damage 8500,9500
rnd2 %ransu,6500,7500
dwave 2,"se\damage2.ogg"
quake 10,600
itoa $sel1,%ransu
mov $temp_name,"Alice"
eng $temp_name+" takes "+$sel1+" damage!"
$sel6/
if %sinkou<10 | %sinkou>50 skip 3
dwave 2,"se\damage2.ogg"
mov %hanyo3,7000:gosub *irias2_p
vsp 700,1
bg "bg\bg001.bmp",10,1000
\
skillname ""
mov $temp_name,""
if %mylife=0 sub %stack,1:return *irias2_h5
sub %stack,1
return



*irias2_x41

add %stack,1
mov %owaza_count3b,0
name $name
>Shall we begin the recreation?\
name ""
skillname "Big Bang"
wait 300
dwave 1,"se\bom3.ogg"
lsp 2,":c;effect\002.bmp",0,0:print 18,1000,"system\mask01.jpg"
vsp 700,0
flushout 1000
csp 2
bg white,10,1000
>A wave of genesis power annihilates everything!
if %daten>0 goto *skill22x
mov %a_effect1,1
if %nanido<2 damage 8000,9000
if %nanido=2 damage 9000,10000
if %nanido=3 damage 10000,11000
rnd2 %ransu,10000,12000
dwave 2,"se\damage2.ogg"
quake 10,600
itoa $sel1,%ransu
mov $temp_name,"Alice"
eng $temp_name+" takes "+$sel1+" damage!"
$sel6/
dwave 2,"se\damage2.ogg"
mov %hanyo3,11000:gosub *irias2_p
vsp 700,1
bg "bg\bg001.bmp",10,1000
\
skillname ""
mov $temp_name,""
if %mylife=0 sub %stack,1:return *irias2_h5
sub %stack,1
return



*irias2_x41b

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"The flames of Hell Alipheese herself thinks she can use!"
if %ransu=2 mov $sel1,"As I am now, I can even summon forth dark power!"
if %ransu=3 mov $sel1,"Hehe... Even the power of the Dark God is mine now."
name $name
eng $sel1:$sel6\
name ""
skillname "Flame of Judgement"
dwave 1,"se\fire4.ogg"
quake 10,1500
>The hellfire of the netherworld incinerates everything!
dwave 2,"se\damage2.ogg"quake 10,1500
quake 10,600
rnd2 %ransu,6500,7500
itoa $sel1,%ransu
mov $temp_name,"Alice"
eng $temp_name+" takes "+$sel1+" damage!"
$sel6/
\
skillname ""
mov $temp_name,""
mov %sinkou,64
sub %stack,1
return



*irias2_x41c

add %stack,1
name $name
>Receive your reward for rebelling against your God!\
name ""
skillname "Big Bang"
wait 300
dwave 1,"se\bom3.ogg"
lsp 2,":c;effect\002.bmp",0,0:print 18,1000,"system\mask01.jpg"
vsp 700,0
flushout 1000
csp 2
bg white,10,1000
>A wave of genesis power annihilates everything!
mov %a_effect1,1
mov %damage_kotei,1
if %nanido<2 damage 8000,9000
if %nanido=2 damage 9000,10000
if %nanido=3 damage 10000,11000
rnd2 %ransu,10000,12000
dwave 2,"se\damage2.ogg"
quake 10,600
itoa $sel1,%ransu
mov $temp_name,"Alice"
eng $temp_name+" takes "+$sel1+" damage!"
$sel6/
vsp 700,1
bg "bg\bg001.bmp",10,1000
\
skillname ""
mov $temp_name,""
sub %stack,1
return *irias2_h5



*irias2_a1

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I'll pleasure you with my hair..."
if %ransu=2 mov $sel1,"Pleasure a man could never dream of tasting..."
if %ransu=3 mov $sel1,"Forget everything, and drown in pleasure..."
name $name
eng $sel1:$sel6\
name ""
skillname "Holy Hair"
dwave 1,"se\umaru.ogg"
>Ilias' hair coils around Luka's penis, stroking him!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4124
if %nanido<2 damage 600,700
if %nanido=2 damage 700,800
if %nanido=3 damage 800,900
skillname ""
if %mylife=0 sub %stack,1:return *irias2_h1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*irias2_a2

add %stack,1
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"Have a taste of paradise in my wings..."
if %ransu=2 mov $sel1,"I'll stroke you with my sacred wings..."
if %ransu=3 mov $sel1,"Repent your sins in my embrace..."
name $name
eng $sel1:$sel6\
name ""
skillname "Holy Feathers"
dwave 1,"se\umaru.ogg"
>Ilias embraces Luka in her sacred wings, and caresses his penis with her feathers!
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<20 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,50
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
skillcount3 4125
if %nanido<2 damage 650,750
if %nanido=2 damage 750,850
if %nanido=3 damage 850,950
skillname ""
if %mylife=0 sub %stack,1:return *irias2_h2
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*irias2_a3

add %stack,1
mov %owaza_count1a,0
mov %owaza_num1,1
if %kousan=2 skip 4
name $name
>In the end, I'll at least send you off with a gentle embrace...\
name ""
skillname "Embrace of the Goddess"
eng "Ilias gently embraces Luka!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<10 gosub *aqua_guard:sub %stack,1:return
if %wind>0 mov %wind_kakuritu,10
gosub *wind_guard_kakuritu:if %wind_guard_on=0 skip 2
if %wind>0 mov $sel1,"But Luka nimbly dodges!":gosub *wind_guard:sub %stack,1:return
\
dwave 1,"se\ero_chupa6.ogg"
>Energy flows out of Luka's body wherever Ilias touches!
skillcount3 4126
if %nanido<2 damage 300,350
if %nanido=2 damage 400,450
if %nanido=3 damage 500,550
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
mov $tatie4,"iriasu2_st22"
mov %kousoku,1:gosub *status_print
>Luka has been bound by Ilias!\
skillname ""
if %mylife=0 sub %stack,1:return *irias2_h3
name $name
>I shall drain your energy until nothing is left.@
>Now, please meet your end in my embrace...\
name ""
if %earth=0 && %nanido<2 mov %genmogaku,3
if %earth=0 && %nanido=2 mov %genmogaku,3
if %earth=0 && %nanido=3 mov %genmogaku,4
if %earth>0 && %nanido<2 mov %genmogaku,1
if %earth>0 && %nanido=2 mov %genmogaku,1
if %earth>0 && %nanido=3 mov %genmogaku,2
sub %stack,1
return



*irias2_a4

add %stack,1
>Luka has been bound by Ilias...\
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"How does it feel to be finished in a Goddess' embrace?"
if %ransu=2 mov $sel1,"It's quite simple to drain humans of energy..."
if %ransu=3 mov $sel1,"Luka... Your energy tastes delicious."
name $name
eng $sel1:$sel6\
name ""
skillname "Embrace of the Goddess"
dwave 1,"se\ero_chupa6.ogg"
>Ilias hugs Luka tighter, draining his energy!
skillcount3 4126
if %nanido<2 damage 300,350
if %nanido=2 damage 400,450
if %nanido=3 damage 500,550
gosub *enemylife_kaihuku
mov %count_drainhp,%count_drainhp+%damage
skillname ""
if %mylife=0 sub %stack,1:return *irias2_h3
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*irias2_a5

add %stack,1
mov %owaza_count1b,0
mov %owaza_num1,1
if %kousan=2 skip 5
name $name
>The ultimate semen sucking organ that Dark God Alipheese created...\
>I wish to try it out.\
name ""
skillname "Dark Goddess' Semen Extraction"
eng "A huge semen sucking organ grows from Ilias' body, its mouth opening wide!":$sel6/
if %daten>0 goto *skill22x
rnd2 %ransu,0,99:if %aqua>0 && %ransu<100 gosub *aqua_guard:sub %stack,1:return
\
dwave 1,"se\ero_makituki3.ogg"
>It swallows Luka's lower body!
skillcount3 4127
mov %damage_kotei,1
damage 800,1000
mov $tatie4,"iriasu2_st21"
mov %kousoku,2:gosub *status_print
>Luka's lower body is stuck inside the semen sucking organ!\
skillname ""
if %mylife=0 sub %stack,1:return *irias2_h4
name "Luka"
>Ahhh!!!\
name ""
>The soft flesh squirms and sucks on me.\
>Squeezing... Rubbing... Squirming... Vibrating...@
>The nightmarish mixture of stimulations take away my sanity all at once.\
name $name
>Now, let's try it out.@
>I'm not used to it, so I may suck you dry in an instant...\
name ""
sub %stack,1
goto *irias2_a6



*irias2_a6

add %stack,1
>Luka's lower body is stuck inside the semen sucking organ...\
rnd2 %ransu,1,5
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"If you moan louder, I'll make it feel better...":mov $sel2,"The organ sucks hard on Luka's body!"
if %ransu=2 mov $sel1,"Does it feel like you'll climax to death?":mov $sel2,"The organ forcibly sucks semen straight from Luka's body!"
if %ransu=3 mov $sel1,"You'll be sucked dry...":mov $sel2,"The mad pleasure forced into Luka causes him to moan!"
if %ransu=4 mov $sel1,"How does it feel to be overpowered by an organ like this?":mov $sel2,"The flesh tightens around Luka's penis!"
if %ransu=5 mov $sel1,"Oh... Do you like this?":mov $sel2,"The inner walls rub and massage Luka's penis!"
name $name
eng $sel1:$sel6\
name ""
skillname "Dark Goddess' Semen Extraction"
dwave 1,"se\ero_makituki3.ogg"
eng $sel2:$sel6
skillcount3 4127
mov %damage_kotei,1
damage 800,1000
skillname ""
if %mylife=0 sub %stack,1:return *irias2_h4
sub %stack,1
goto *irias2_a6



*irias2_onedari

mov $list1,"Holy Hair"
if %4124>0 mov %list_num1,1
mov $list2,"Holy Feathers"
if %4125>0 mov %list_num2,1
mov $list3,"Embrace of the Goddess"
if %4126>0 mov %list_num3,1
mov $list4,"Dark Goddess' Semen Extraction"
if %4127>0 mov %list_num4,1
gosub *cmd_onedari
if %cmd1=11 goto *irias2_onedari1
if %cmd1=12 goto *irias2_onedari2
if %cmd1=13 goto *irias2_onedari3
if %cmd1=14 goto *irias2_onedari4
if %cmd1=-1 goto *irias2_main
goto *irias2_onedari



*irias2_onedari1

gosub *onedari_syori
name $name
>You want to come in my sacred hair?@
>Then immerse yourself...\
name ""
gosub *irias2_a1
skip -1



*irias2_onedari2

gosub *onedari_syori
name $name
>You want to come on my sacred wings?@
>Then immerse yourself...\
name ""
gosub *irias2_a2
skip -1



*irias2_onedari3

if %kousoku=0 gosub *onedari_syori
if %kousoku>0 gosub *onedari_syori_k
name $name
>You want to have your energy sucked in my embrace?@
>Then immerse yourself...\
name ""
if %kousoku=0 gosub *irias2_a3
gosub *irias2_a4
skip -1



*irias2_onedari4

gosub *onedari_syori
name $name
>You want to taste the ultimate semen squeezing organ from the Dark Goddess herself?@
>Then immerse yourself...\
name ""
gosub *irias2_a5
skip -1



*irias2_h1

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 691,":a;chara\iriasu2_bk01.bmp",0,0
gosub *syasei2
>As Ilias' hair strokes Luka's penis, he comes, covering her head with semen.\
mov %viclose,1:gosub *lose
mov %2728,%2728+1:if %2728=1 mov %count_koenemy,%count_koenemy+1
if %2728>%count_most mov %count_most,%2728:mov $count_mostname,$name+" (Final)"
count 22,4
mov $bad1,"Ilias forced Luka to come with her hair."
gosub *face2
name $name
>Does it feel good?@
>In the end, it was your fate to simply be my pawn...\
name ""
goto *irias2_ha



*irias2_h2

mov %ikigoe,1:gosub *ikigoe
gosub *syasei1
lsp 692,":a;chara\iriasu2_bk02.bmp",0,0
gosub *syasei2
>As Ilias strokes Luka's penis with her wings, he comes, covering them with semen.\
mov %viclose,1:gosub *lose
mov %2728,%2728+1:if %2728=1 mov %count_koenemy,%count_koenemy+1
if %2728>%count_most mov %count_most,%2728:mov $count_mostname,$name+" (Final)"
count 13,4
mov $bad1,"Ilias forced Luka to come with her wings."
gosub *face2
name $name
>Does it feel good?@
>In the end, it was your fate to simply be my pawn...\
name ""
goto *irias2_ha



*irias2_h3

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>As Ilias hugs Luka and drains his energy, he comes, covering her sacred body with his semen.\
mov %viclose,1:gosub *lose
mov %2728,%2728+1:if %2728=1 mov %count_koenemy,%count_koenemy+1
if %2728>%count_most mov %count_most,%2728:mov $count_mostname,$name+" (Final)"
count 29,4
mov $bad1,"Ilias forced Luka to come as she drained his energy."
gosub *face2
name $name
>Does it feel good?@
>In the end, it was your fate to simply be my pawn...\
name ""
goto *irias2_ha



*irias2_h4

mov %ikigoe,2:gosub *ikigoe
gosub *syasei1:gosub *syasei2
>As the huge organ sucks on Luka's lower body, he comes, filling it with semen.\
mov %viclose,1:gosub *lose
mov %2728,%2728+1:if %2728=1 mov %count_koenemy,%count_koenemy+1
if %2728>%count_most mov %count_most,%2728:mov $count_mostname,$name+" (Final)"
count 2,4
mov $bad1,"Ilias forced Luka to come with the Dark Goddess' semen sucking organ."
gosub *face2
name $name
>Does it feel good?@
>In the end, it was your fate to simply be my pawn...\
name ""
goto *irias2_hb



*irias2_h5

name "Luka"
>I'm sorry everyone...\
name ""
>Overwhelmed by Ilias' power, Luka falls to his knees.\
mov %viclose,2:gosub *lose
mov %2728,%2728+1:if %2728=1 mov %count_koenemy,%count_koenemy+1
if %2728>%count_most mov %count_most,%2728:mov $count_mostname,$name+" (Final)"
count 14,4
mov $bad1,"Luka succumbed to Ilias' mighty power."
name $name
>Before my power, you are no more than dirt.@
>Now, how shall I dispose of you?\
name ""
goto *irias2_hb



*irias2_ha

mov %skill01,21
mov $bad2,"Luka was forced to continually mate with Ilias, giving her his seed for eternity."
if %2843=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2843,1
name "Luka"
>Ahh...\
name ""
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu4_01.ogg"
>You're quite tenacious, Luka...
>It would be dangerous to release your soul to the cycle of reincarnation.\
if %con_hvoice=0 dwave 0,"voice\iriasu4_02.ogg"
>So I'll link your soul to me, and keep you docile for an eternity.
>And besides... It was no lie that I liked you.\
name ""
dwavestop 0
cspl 690,699
lsp 700,":a;chara\iriasu2_hb1.bmp",0,0:print 10,500
>Ilias holds down my body, and brings her waist over me.\
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu4_03.ogg"
>Rejoice, Luka...
>You can live for an eternity, connected to me...\
name ""
dwavestop 0
name "Luka"
>S...Stop...!@
>Ahh!\
name ""
>A flesh and blood vagina is right where it should be on her body...@
mov %hseanwave,1:hseanwave
>And my thing slowly sinks into her!\
name "Luka"
>Ahhh!\
name ""
>Ilias' vagina is hot, and surprisingly soft.@
>Her soft folds rub against me as I'm brought inside her.\
>All thoughts of resistance fade at once, as my head goes white in ecstasy.@
>The intense pleasure causes me to surrender in an instant.\
name "Luka"
>Haa... That feels so good...\
name ""
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu4_04.ogg"
>Hehe... As pathetic as ever, I see.
>If you get just a little pleasure, your voice leaks out right away, doesn't it?\
if %con_hvoice=0 dwave 0,"voice\iriasu4_05.ogg"
>You love being violated like this, don't you?\
name ""
dwavestop 0
name "Luka"
>Ahh...\
name ""
>Her warm, soft flesh envelopes me, squeezing me from tip to root.@
>Feeling like I'm being wrapped by Heaven itself, I can only pant and moan.\
>Even though I know I must look pathetic, I can't go against these feelings...\
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu4_06.ogg"
>Do you want to enjoy the first one for a long time?
>Or would you rather finish quickly, right away?\
if %con_hvoice=0 dwave 0,"voice\iriasu4_07.ogg"
>Oh, excuse me...
>For a premature ejaculator like you, enjoying this for a long time simply isn't possible.\
name ""
dwavestop 0
>While sitting on top of me, Ilias laughs.@
>At the same time, she starts to gently squeeze her vagina around me.\
>It's as if her flesh is a hand, squeezing me inside her...\
name "Luka"
>Ah...!@> Ahh!\
name ""
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu4_08.ogg"
>Hehe, I know it... You're weak to this kind of stimulation, aren't you?
>If I tighten it like this, you can't even last a minute, can you?\
name ""
dwavestop 0
name "Luka"
>No... Don't... Ah...\
name ""
>As her soft flesh tightens around me, she pushes me into a corner in seconds.@
>The desire to release takes over all of my other thoughts and senses.\
>My body quivers with desire to come inside this tightness...@
>Clenching my body, I summon up the last of my strength to fight against her.\
name "Luka"
>Stop... I'm going to come...\
name ""
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu4_09.ogg"
>Hehehe... As fast as ever.
>In the end, you couldn't even last five minutes, could you?\
if %con_hvoice=0 dwave 0,"voice\iriasu4_10.ogg"
>Then go ahead and perform your awkward finish.
>Pour your dirty fluid into this sacred hole...\
name ""
dwavestop 0
name "Luka"
>Ahh...!\
name ""
>Her tight vagina squeezes down even more, as one of her folds starts to rub against my tip.@
>My penis pulses inside her, as the last of my defenses come crumbling down from desire.\
gosub *syasei1
lsp 700,":a;chara\iriasu2_hb2.bmp",0,0
gosub *syasei2
name "Luka"
>Haa...\
name ""
>I explode inside her, as if I'm giving my soul itself over.@
>Each pulse of my penis sends waves of pleasure through my body.\
>Unable to fight against Ilias, I came inside her...@
>It felt like I truly ascended to Heaven.\
name "Luka"
>Haa...\
name ""
>Clinging to Ilias, I finally finish coming inside her.@
>She looks down at me with a lewd smile.\
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu4_11.ogg"
>Did it feel good, Luka?
>Though since you came so much, I suppose I don't need to ask...\
if %con_hvoice=0 dwave 0,"voice\iriasu4_12.ogg"
>As expected, you love being raped.
>To be violated so one-sidedly... Aren't you ashamed as a man?\
name ""
dwavestop 0
>Ilias starts to slowly move her waist as she taunts me.@
>Still tight inside, I can feel her flesh rubbing and moving against me from every direction as she slowly moves.\
>The tiny folds inside of her all rub against me in new movements, as if playing with me.\
name "Luka"
>Ah...!@> Ahhh!\
name ""
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu4_13.ogg"
>Arara, what a pitiful voice.
>Are you only able to enjoy yourself when teased like this?\
name ""
dwavestop 0
mov %hseanwave,4:hseanwave
>Ilias continues moving, completely in control as she rapes me.\
>My back arches in pure pleasure as she moves, her vaginal walls rubbing and massaging me with every slight movement she makes.\
>A Goddess' vagina...@> No man could resist, if forced inside.\
name "Luka"
>Ahhh...\
name ""
gosub *syasei1
lsp 700,":a;chara\iriasu2_hb3.bmp",0,0
gosub *syasei2
>And just like that, I come inside her again.@
>Once the Goddess started to move, any hope of resisting was completely destroyed.\
name "Luka"
>Ah...ahhh...\
name ""
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu4_14.ogg"
>...Oh my, an instant finish for the second time, too?
>I wasn't even planning on doing that... That's quite pathetic.\
if %con_hvoice=0 dwave 0,"voice\iriasu4_15.ogg"
>Well, this will continue for eternity.
>We shall enjoy this for a lot longer...\
name ""
dwavestop 0
name "Luka"
>S...Stop...@
>Ahhh...\
name ""
>Ilias starts to move again as she taunts me.@
>And just as easily, I'm brought to another powerful finish.\
name "Luka"
>I'm coming again... Ahh!\
name ""
gosub *syasei1:gosub *syasei2
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu4_16.ogg"
>Hehe, how silly.
>You're getting my vagina all messy with your dirty fluids...\
name ""
dwavestop 0
name "Luka"
>Ah...\
name ""
>No matter how many times I come, she doesn't stop.@
>This rape will continue for an eternity like this...\
mov %hseanwave,0:hseanwave
gosub *anten
>...How much time has passed since then?@
>A few days?@>Months?@>Years?\
>I've completely lost all sense of time...\
mov %hseanwave,4:hseanwave
lsp 700,":a;chara\iriasu2_hb4.bmp",0,0
bg "bg\bg001.bmp",10,1500
name "Luka"
>Ahh...\
name ""
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu4_17.ogg"
>Hehe, you seem to have completely lost your reason.
>But I won't allow you to die.\
if %con_hvoice=0 dwave 0,"voice\iriasu4_18.ogg"
>Your soul won't be released to reincarnation, and will be bound by pleasure for eternity.
>You're happy at that too, aren't you?\
name ""
dwavestop 0
name "Luka"
>Haa... Ahh...\
name ""
gosub *syasei1:gosub *syasei2
>Ilias' vagina contracts, bringing me to orgasm right away.@
>I'm already unable to think about anything but having sex with Ilias...\
>I have no idea how many times she has made me come...@
>All I know is that this will last forever.\
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu4_19.ogg"
>Hoora, keep coming over and over.
>You can use my vagina forever...\
name ""
dwavestop 0
name "Luka"
>Haaa...@>It feels so good...\
name ""
gosub *syasei1:gosub *syasei2
>My body and soul drown in pleasure, as I continue to come inside the Goddess.\
>I have no choice but to continue having sex with her...@
>For being defeated, the Hero's fate is to endlessly mate with the Goddess herself...\
mov %hseanwave,0:hseanwave
gosub *anten
>...........\
goto *badend



*irias2_hb

mov %skill01,21
mov $bad2,"Becoming prey to Ilias' semen sucking organ, Luka was killed."
if %2844=0 skip 3
if %hsean_cut=1 gosub *hsean_cut2
if %hsean_cut=2 gosub *hsean_cut
mov %2844,1
if %kousoku=2 mov %hseanwave,12:hseanwave:lsp 700,":a;chara\iriasu2_ha1.bmp",0,0:print 10,500:goto *irias2_hc
name "Luka"
>Ahh...\
name ""
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu5_01.ogg"
>You gave me quite a bit of trouble...
>You will no longer receive one piece of pity from me.\
name ""
dwavestop 0
>With a cold glare, Ilias brings forward her tail, with a huge gaping hole at the end of it.\
>The horrifying tentacle, looking big enough to even swallow a human whole moves right in front of my face...\
name "Luka"
>Hya!@> N...No...!\
name ""
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu5_02.ogg"
>Both your body and soul will be a sacrifice for this ultimate semen squeezing organ.
>I shall squeeze out all of your semen, and use it as seed for the new world.\
name ""
dwavestop 0
name "Luka"
>S...Stop!\
name ""
>I struggle, but there's no escape.@
>I can't help but stare at the gaping hole as it moves toward me...\
name "Luka"
>Ahhh!\
name ""
dwave 1,"se\ero_makituki3.ogg"
mov %hseanwave,12:hseanwave
cspl 690,699
lsp 700,":a;chara\iriasu2_ha1.bmp",0,0:print 10,500
>And with a slurping noise, sucks in my entire lower body!@
>A strange, sticky warmth fills my lower body as she wraps around me.\
name "Luka"
>Ahhh!\
name ""
>Her soft, slimy flesh rubs against me.@
>As the strange touch runs through me, I feel my body unconsciously loosen.\
goto *irias2_hc



*irias2_hc

name "Luka"
>L...Let me go...\
name ""
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu5_03.ogg"
>I haven't even started it.
>Once I set it into motion, any man would be squeezed empty in seconds.\
if %con_hvoice=0 dwave 0,"voice\iriasu5_04.ogg"
>Mercilessly... Ruthlessly... Wrung dry like a rag.
>Naturally, your life itself will be exhausted in moments as well.\
if %con_hvoice=0 dwave 0,"voice\iriasu5_05.ogg"
>Now then... Are you ready?\
name ""
dwavestop 0
name "Luka"
>Ahh... S...Stop...!\
name ""
>I tremble in fear, my lower body still stuck in this strange organ.@
>As soon as she starts to use it, I'll be squeezed dry...\
>An explosion of pure pleasure, at the cost of my life itself.\
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu5_06.ogg"
>Now then, I'll start using it.
>Run out of energy as you go insane in pleasure and disgrace...\
name ""
dwavestop 0
name "Luka"
>S...Sto...@> Ahhhh!!!\
name ""
mov %hseanwave,13:hseanwave
>In the next instant, her semen squeezing organ starts to move.@
>The flesh inside of it starts to squirm and rub against my body, as tentacles reach up and coil around my waist.\
name "Luka"
>Hyaaa!!!\
name ""
lsp 690,":c;chara\iriasu2_ct01.bmp",572,0:print 10,500
>The tentacles coil around my penis, and start to stroke it at an incredible speed.@
>Her soft walls also tighten down, squeezing me in her flesh.\
>The shrinking walls squeeze my whole lower body, destroying my sanity all at once.\
name "Luka"
>Ahhhg!@> Ahhh!!!\
name ""
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu5_07.ogg"
>Sheesh, what an unshapely, agonized appearance.
>Even though your life itself is being squeezed out, are you feeling delighted?\
name ""
dwavestop 0
name "Luka"
>Ah... Ahhh!!\
name ""
>It's truly like a nightmare of never-ending pleasure...@
>As the organ sucks ever harder on me, my body spasms.\
gosub *syasei1
lsp 700,":a;chara\iriasu2_ha2.bmp",0,0
lsp 690,":c;chara\iriasu2_ct02.bmp",572,0
gosub *syasei2
name "Luka"
>Ahhh!\
name ""
>And in only seconds, I explode inside of her organ as she squeezes me.@
>I relax in bliss as the sweet feeling of release washes over me...\
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu5_08.ogg"
>Sheesh, already finished?
>As expected, the pleasure from the ultimate semen squeezing organ is too fine for you.\
if %con_hvoice=0 dwave 0,"voice\iriasu5_09.ogg"
>Well then, I'll have you be dried up inside there now.
>Shoot out all of your semen as you taste a piece of paradise...\
name ""
dwavestop 0
name "Luka"
>Nooo... Nooo...@
>Ahh!\
name ""
>Assaulted by ruthless pleasure, tears start to spill from my eyes.@
>Just as she said, this organ is forcibly wringing me dry...\
>The intense stimulus leaves me no choice but to come, writhing in pleasure.\
name "Luka"
>Ahhh!\
name ""
>A small membrane of soft flesh suddenly clamps around my glans.\
>Covered in tiny little bumps, the slightest of movements sends shocks of pleasure through me as they rub and massage my sensitive tip.\
>The soft flesh... The rubbing folds... The small bumps...@
>The combination of stimulations lead me to forget everything else.\
>This horrible organ is attacking every weak point on my body...@
>As soon as I was brought inside, my fate was sealed.\
name "Luka"
>Hyaaa!@
>Help me... Help!\
name ""
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu5_10.ogg"
>Hehe, unsightly floundering in agony...
>I'll keep squeezing out your semen, until you die like that...\
name ""
dwavestop 0
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\iriasu2_ha3.bmp",0,0
lsp 690,":c;chara\iriasu2_ct03.bmp",572,0
gosub *syasei2
>Overwhelmed by the nightmarish pleasure, I reach another forced orgasm.@
>My body itself is being wrung dry...@> There's no resistance allowed.\
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu5_11.ogg"
>Hehe, how is it?
>Like this, your semen will be squeezed until your death...\
if %con_hvoice=0 dwave 0,"voice\iriasu5_12.ogg"
>This is your punishment for pointing your sword at me.
>Cross over to the next world, as you lament your folly...\
name ""
dwavestop 0
name "Luka"
>Hyaaa!\
name ""
gosub *syasei1
lsp 700,":a;chara\iriasu2_ha4.bmp",0,0
gosub *syasei2
>As I reach another intense orgasm, a catastrophic desire takes over my mind.@
>I want to feel more...@> To be sucked dry, until nothing is left.\
>With my mind broken down, it's all I can think of...\
name "Luka"
>Ahh... Suck more...@
>Hya...\
name ""
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu5_13.ogg"
>Whether you desire it or not, the result will be the same.
>This will continue until you're dead...\
name ""
dwavestop 0
name "Luka"
>Ahh...\
name ""
gosub *syasei1:gosub *syasei2
>Completely subservient to her, my body continues climaxing over and over again.@
>Until at last, I was on the last of my energy...\
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu5_14.ogg"
>Sheesh, barely anything is coming out.
>With one more ejaculation, your life itself will be lost, too.\
name ""
dwavestop 0
>Ilias glares at me with cold eyes.\
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu5_15.ogg"
>...Now, I'll squeeze you to death.
>Get a good taste of this final pleasure.\
name ""
dwavestop 0
name "Luka"
>Urhg... Ah...\
name ""
>Even though my life is almost over, I can't help but look forward to the pleasure to come.@
>As the organ sucks and squeezes me, I feel my penis pulse as my body goes stiff in ecstasy.\
gosub *syasei1:gosub *syasei2
>And with another powerful orgasm, a few drops of semen drip out.@
>I've been squeezed dry... Both my spirit and my life.\
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu5_16.ogg"
>I'll use all of the semen I squeezed from you to create new life.
>You should feel honored at providing nourishment to the new world...\
name ""
dwavestop 0
name "Luka"
>Ah...Uh...\
name ""
name $name
if %con_hvoice=0 dwave 0,"voice\iriasu5_17.ogg"
>Thank you for your hard work until now.
>Good night, Luka...\
name ""
dwavestop 0
name "Luka"
>...........\
name ""
>With that, my eyes close in exhaustion.\
>A cruel death...@> My mind fried by pleasure, and my body wrung dry...\
mov %hseanwave,0:hseanwave
gosub *anten
>............\
goto *badend



*eng

getparam $sub9
len %name_count,$sub9
mid $sel6,$sub9,%name_count-1,1
if $sel6=" " mid $sub9,$sub9,0,%name_count-1
len %name_count,$sub9
if %name_count/2<(%name_count+1)/2 mov $sub9,$sub9+" "
mov $sel6,$sub9
return



*nobel

getparam $teigi3
if $teigi3="" mov $sel6,"":return
len %teigi1,$teigi3
for %move=1 to %teigi1
mid $teigi1,$teigi3,%move-1,1
if $teigi1<>"" skip 5
mid $teigi1,$teigi3,0,%move-1
add $teigi1," "
mid $teigi2,$teigi3,%move,%teigi1-%move
mov $teigi3,$teigi1+$teigi2
next
mov $sel6,$teigi3
return



*name

getparam $platename
if $platename="" csp 599:print 1:return
len %name_count,$platename
strsp 599,$platename,155-%name_count*5,408,(%name_count+1)/2+1,1,20,20,0,0,1,1:print 1
return



*vspl

getparam %teigi2,%teigi3,%teigi1
if %teigi2>%teigi3 mov %sub1,%teigi2:mov %teigi2,%teigi3:mov %teigi3,$sub1
for %sub1=%teigi2 to %teigi3
vsp %sub1,%teigi1
next
return



*cspl

getparam %teigi2,%teigi3
if %teigi2>%teigi3 mov %sub1,%teigi2:mov %teigi2,%teigi3:mov %teigi3,$sub1
for %sub1=%teigi2 to %teigi3
csp %sub1
next
return



*damage

add %stack,1
if %mon_labo_on=0 && %player=0 mov $ori_name,"Luka"
if %mon_labo_on=0 && %player=1 mov $ori_name,"Alice"
if %mon_labo_on=0 && %player=2 mov $ori_name,"Alma Elma"
if %mon_labo_on=0 && %player=3 mov $ori_name,"Erubetie"
if %mon_labo_on=0 && %player=4 mov $ori_name,"Tamamo"
if %mon_labo_on=0 && %player=5 mov $ori_name,"Granberia"
delay 300
getparam %teigi1,%teigi2
if %teigi1=%teigi2 mov %damage,%teigi1
if %teigi2<%teigi1 mov %teigi3,%teigi1:mov %teigi1,%teigi2:mov %teigi2,%teigi3
notif %teigi1=%teigi2 rnd2 %damage,%teigi1,%teigi2
if %a_effect1=0 dwave 2,"se\damage.ogg":quakex 2,440
if %a_effect1=1 dwave 2,"se\damage2.ogg":quake 10,600
if %a_effect1=2 dwave 2,"se\ikazuti.ogg":quake 10,1500
mov %a_effect1,0
if %damage_kotei=2 mov %damage_kotei,0:skip 13
if %damage_kotei=1 mov %damage_kotei,0:skip 11
if %enemylv>0 mov %damage,%damage+%enemylv*3
if %bougyo=1 mov %damage,%damage/2
if %earth>1 mov %damage,%damage*(100-%earth_keigen)/100
if %aqua=1 mov %damage,%damage*4/5
if %enemy_wind>0 && %earth>1 mov %damage,%damage*(100-%earth_keigen_el)/100
if %enemy_wind>0 && %earth>1 && $lavel<>"tuika" mov %earth_keigen_el,0
if %enemy_aqua>0 && %fire>1 mov %damage,%damage*(100-%fire_keigen_el)/100
if %enemy_fire=0 | $lavel<>"tuika" skip 3
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_gigamander_bonus":eng $sub1
if $sel6="1 " mov %damage,%damage*2
mov %damage,%damage*(100-%99)/100
if %damage=0 mov %damage,1
itoa $sel1,%damage
eng $ori_name+" takes "+$sel1+" damage!"
if %damage_nobr=1 skip 3
$sel6/
skip 2
$sel6
mov %mylife,%mylife-%damage
if %mylife>%max_mylife mov %mylife,%max_mylife
if %mylife<0 mov %mylife,0
if %mylife=0 mov %gage,0 skip 3
mov %gage,%mylife*100/%max_mylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 560,":a;system\gager"+$gagenum+".bmp",114,556
gosub *hp
mov %kadora_damage,1
print 10,500
if %damage_nobr>0 mov %damage_nobr,0:sub %stack,1:return
\
sub %stack,1
return



*skillname

getparam $skillname
if $skillname="" csp 590:csp 591:print 1:return
lsp 591,":a/2,0,3;system\select_window2.jpg",150,20
len %name_count,$skillname
strsp 590,$skillname,400-%name_count*6,33,(%name_count+1)/2+1,1,24,24,0,0,1,1
print 1
return



*skillname1

getparam $skillname
if $skillname="" csp 0:csp 1:print 1:return
lsp 1,":a/2,0,3;system\select_window2.jpg",150,20
len %name_count,$skillname
strsp 0,$skillname,400-%name_count*6,33,(%name_count+1)/2+1,1,24,24,0,0,1,1
print 1
return



*sean_change

saveoff
getparam $haikei
cspl 3,7
csp 611
cspl 699,705
bg black,7,1500
bg "bg\"+$haikei+".bmp",7,1500
wait 500
gosub *setwindow_01p
return



*count

saveoff
getparam %finish1,%finish2
mov %count_end,%count_end+1
if %finish1=1 mov %count_nakadashi,%count_nakadashi+1
if %finish1=2 mov %count_sakuseikikan,%count_sakuseikikan+1
if %finish1=3 mov %count_sumata,%count_sumata+1
if %finish1=4 mov %count_fera,%count_fera+1
if %finish1=5 mov %count_tekoki,%count_tekoki+1
if %finish1=6 mov %count_ashikoki,%count_ashikoki+1
if %finish1=7 mov %count_paizuri,%count_paizuri+1
if %finish1=8 mov %count_analsex,%count_analsex+1
if %finish1=9 mov %count_analseme,%count_analseme+1
if %finish1=10 mov %count_syokusyu,%count_syokusyu+1
if %finish1=11 mov %count_slime,%count_slime+1
if %finish1=12 mov %count_plant,%count_plant+1
if %finish1=13 mov %count_wing,%count_wing+1
if %finish1=14 mov %count_buturi,%count_buturi+1
if %finish1=15 mov %count_nenmaku,%count_nenmaku+1
if %finish1=16 mov %count_role,%count_role+1
if %finish1=17 mov %count_ganmenkizyou,%count_ganmenkizyou+1
if %finish1=18 mov %count_kiss,%count_kiss+1
if %finish1=19 mov %count_sipppo,%count_sipppo+1
if %finish1=20 mov %count_ito,%count_ito+1
if %finish1=21 mov %count_onani,%count_onani+1
if %finish1=22 mov %count_kami,%count_kami+1
if %finish1=23 mov %count_tikubi,%count_tikubi+1
if %finish1=24 mov %count_zenshin,%count_zenshin+1
if %finish1=25 mov %count_kusuguri,%count_kusuguri+1
if %finish1=26 mov %count_kaze,%count_kaze+1
if %finish1=27 mov %count_ihuku,%count_ihuku+1
if %finish1=28 mov %count_zensin,%count_zensin+1
if %finish1=29 mov %count_houyou,%count_houyou+1
if %finish1=30 mov %count_tissoku,%count_tissoku+1
if %finish1=31 mov %count_yuuwaku,%count_yuuwaku+1
if %finish1=32 mov %count_sonota,%count_sonota+1
if %finish1=33 mov %count_marunomi,%count_marunomi+1
if %finish1=34 mov %count_sirikoki,%count_sirikoki+1
if %kousoku>0 mov %count_kousoku,%count_kousoku+1
if %status=1 mov %count_koukotu,%count_koukotu+1
if %status=2 mov %count_mahi,%count_mahi+1
if %status=4 mov %count_yuwaku,%count_yuwaku+1
if %status=5 mov %count_kuppuku,%count_kuppuku+1
if %status=6 mov %count_sekika,%count_sekika+1
if %status=7 mov %count_konran,%count_konran+1
if %finish2=1 mov %count_b001,%count_b001+1
if %finish2=2 mov %count_b002,%count_b002+1
if %finish2=3 mov %count_b003,%count_b003+1
if %finish2=4 mov %count_b004,%count_b004+1
if %finish2=5 mov %count_b005,%count_b005+1
if %finish2=6 mov %count_b006,%count_b006+1
if %finish2=7 mov %count_b007,%count_b007+1
if %finish2=8 mov %count_b008,%count_b008+1
if %finish2=9 mov %count_b009,%count_b009+1
if %finish2=10 mov %count_b010,%count_b010+1
if %finish2=11 mov %count_b011,%count_b011+1
if %finish2=12 mov %count_b012,%count_b012+1
if %finish2=13 mov %count_b013,%count_b013+1
if %finish2=14 mov %count_b014,%count_b014+1
if %finish2=15 mov %count_b015,%count_b015+1
if %finish2=16 mov %count_b016,%count_b016+1
if %finish2=17 mov %count_b017,%count_b017+1
if %skill_num=0 return
mov %skill_num,%skill_num+2000
inc %%skill_num
return



*screen_clear

btndef clear
barclear
cspl 0,550
return



*screen_clear2

btndef clear
barclear
cspl 551,710
return



*screen_vanish

btndef clear
barclear
vspl 551,710,0
return



*screen_appear

btndef clear
barclear
vspl 551,710,1
return



*hseanwave

if %con_hse=1 return
saveoff
if %hseanwave=0 dwavestop 0:dwavestop 5:dwavestop 13
if %hseanwave=1 dwaveloop 5,"se\hsean01_innerworks_a1.ogg"
if %hseanwave=2 dwaveloop 5,"se\hsean02_innerworks_a2.ogg"
if %hseanwave=3 dwaveloop 5,"se\hsean03_innerworks_a3.ogg"
if %hseanwave=4 dwaveloop 5,"se\hsean04_innerworks_a4.ogg"
if %hseanwave=5 dwaveloop 5,"se\hsean05_innerworks_a5.ogg"
if %hseanwave=6 dwaveloop 5,"se\hsean06_innerworks_a6.ogg"
if %hseanwave=7 dwaveloop 5,"se\hsean07_innerworks_a7.ogg"
if %hseanwave=8 dwaveloop 5,"se\hsean08_innerworks_a8.ogg"
if %hseanwave=9 dwaveloop 5,"se\hsean09_innerworks_b1.ogg"
if %hseanwave=10 dwaveloop 5,"se\hsean10_innerworks_b2.ogg"
if %hseanwave=11 dwaveloop 5,"se\hsean11_innerworks_c1.ogg"
if %hseanwave=12 dwaveloop 5,"se\hsean12_innerworks_c2.ogg"
if %hseanwave=13 dwaveloop 5,"se\hsean13_innerworks_c3.ogg"
if %hseanwave=14 dwaveloop 5,"se\hsean14_kyuin1.ogg"
if %hseanwave=15 dwaveloop 5,"se\hsean15_kyuin2.ogg"
if %hseanwave=16 dwaveloop 5,"se\hsean16_kyuin3.ogg"
if %hseanwave=17 dwaveloop 5,"se\hsean17_sigoki.ogg"
if %hseanwave=18 dwaveloop 5,"se\hsean18_slime1.ogg"
if %hseanwave=19 dwaveloop 5,"se\hsean19_slime2.ogg"
if %hseanwave=20 dwaveloop 5,"se\hsean20_tentacle1.ogg"
if %hseanwave=21 dwaveloop 5,"se\hsean21_tentacle2.ogg"
if %hseanwave=22 dwaveloop 5,"se\hsean22_tentacle3.ogg"
if %hseanwave=23 dwaveloop 5,"se\hsean23_wash.ogg"
if %hseanwave=24 dwaveloop 5,"se\hsean24_machine1.ogg"
if %hseanwave=25 dwaveloop 5,"se\hsean25_machine2.ogg"
if %hseanwave=26 dwaveloop 5,"se\hsean26_machine3.ogg"
if %hseanwave=27 dwaveloop 5,"se\hsean27_vacum.ogg"
return



*hseanvoice

if %con_hvoice=1 return
saveoff
if %hseanvoice=0 dwavestop 0:dwavestop 13
if %hseanvoice=1 dwaveloop 13,"voice\fera_zyuru1.ogg"
if %hseanvoice=2 dwaveloop 13,"voice\fera_zyuru2.ogg"
if %hseanvoice=3 dwaveloop 13,"voice\fera_zyubu1.ogg"
if %hseanvoice=4 dwaveloop 13,"voice\fera_zyubu2.ogg"
if %hseanvoice=5 dwaveloop 13,"voice\fera_gutyu.ogg"
if %hseanvoice=6 dwaveloop 13,"voice\alice7_x1.ogg"
if %hseanvoice=7 dwaveloop 13,"voice\alice7_x2.ogg"
if %hseanvoice=8 dwaveloop 13,"voice\granberia3_x1.ogg"
if %hseanvoice=9 dwaveloop 13,"voice\granberia3_x2.ogg"
return



*skillcount1

getparam %skill_num
if %%skill_num=0 mov %count_oskill1,%count_oskill1+1
inc %%skill_num
return



*skillcount2

getparam %skill_num
if %%skill_num=0 mov %count_oskill2,%count_oskill2+1
inc %%skill_num
return



*skillcount3

getparam %skill_num
if %%skill_num=0 mov %count_oskill3,%count_oskill3+1
inc %%skill_num
return



*evalset

getparam %teigi2
if $eval1="seen" return
if %teigi2<12 skip 6
if %teigi2>11 && %teigi2<23 sub %teigi2,11:skip 9
if %teigi2>22 && %teigi2<34 sub %teigi2,22:skip 12
if %teigi2>33 && %teigi2<45 sub %teigi2,33:skip 15
if %teigi2>44 && %teigi2<56 sub %teigi2,44:skip 18
if %teigi2>55 sub %teigi2,55:skip 21
mid $sub1,$eval1,0,%teigi2-1
mid $sub2,$eval1,%teigi2,11-%teigi2
mov $eval1,$sub1+"1"+$sub2
skip 20
mid $sub1,$eval2,0,%teigi2-1
mid $sub2,$eval2,%teigi2,11-%teigi2
mov $eval2,$sub1+"1"+$sub2
skip 16
mid $sub1,$eval3,0,%teigi2-1
mid $sub2,$eval3,%teigi2,11-%teigi2
mov $eval3,$sub1+"1"+$sub2
skip 12
mid $sub1,$eval4,0,%teigi2-1
mid $sub2,$eval4,%teigi2,11-%teigi2
mov $eval4,$sub1+"1"+$sub2
skip 8
mid $sub1,$eval5,0,%teigi2-1
mid $sub2,$eval5,%teigi2,11-%teigi2
mov $eval5,$sub1+"1"+$sub2
skip 4
mid $sub1,$eval6,0,%teigi2-1
mid $sub2,$eval6,%teigi2,11-%teigi2
mov $eval6,$sub1+"1"+$sub2
mov %sub1,0
for %sub2=0 to 10
mid $sub1,$eval1,%sub2,1
if $sub1="1" add %sub1,1
next
for %sub2=0 to 10
mid $sub1,$eval2,%sub2,1
if $sub1="1" add %sub1,1
next
for %sub2=0 to 10
mid $sub1,$eval3,%sub2,1
if $sub1="1" add %sub1,1
next
for %sub2=0 to 10
mid $sub1,$eval4,%sub2,1
if $sub1="1" add %sub1,1
next
for %sub2=0 to 10
mid $sub1,$eval5,%sub2,1
if $sub1="1" add %sub1,1
next
for %sub2=0 to 10
mid $sub1,$eval6,%sub2,1
if $sub1="1" add %sub1,1
next
if %sub1>49 return *hansei_h
return



*vanish_sprite

for %sub1=3 to 611 step 1
vsp %sub1,0
next
return



*appear_sprite

for %sub1=3 to 611 step 1
vsp %sub1,1
next
return



*clear_sprite

for %sub1=3 to 611 step 1
csp %sub1
next
return



*hp

itoa2 $mylifeh,%mylife
itoa2 $max_mylifeh,%max_mylife
mov $hp_hyouzi,$mylifeh+"^"+$max_mylifeh
len %name_count,$hp_hyouzi
lsp 559,":s/12,12,0;#FFFFFF"+$hp_hyouzi,264-%name_count*3,557
return



*lvup_check

if %exp<10 mov %mylv,1:gosub *maxhp:gosub *maxmp:return
if %exp<20 mov %mylv,2:gosub *maxhp:gosub *maxmp:return
if %exp<40 mov %mylv,3:gosub *maxhp:gosub *maxmp:return
if %exp<80 mov %mylv,4:gosub *maxhp:gosub *maxmp:return
if %exp<160 mov %mylv,5:gosub *maxhp:gosub *maxmp:return
if %exp<320 mov %mylv,6:gosub *maxhp:gosub *maxmp:return
if %exp<530 mov %mylv,7:gosub *maxhp:gosub *maxmp:return
if %exp<800 mov %mylv,8:gosub *maxhp:gosub *maxmp:return
if %exp<1200 mov %mylv,9:gosub *maxhp:gosub *maxmp:return
if %exp<1800 mov %mylv,10:gosub *maxhp:gosub *maxmp:return
if %exp<2800 mov %mylv,11:gosub *maxhp:gosub *maxmp:return
if %exp<4000 mov %mylv,12:gosub *maxhp:gosub *maxmp:return
if %exp<6000 mov %mylv,13:gosub *maxhp:gosub *maxmp:return
if %exp<9000 mov %mylv,14:gosub *maxhp:gosub *maxmp:return
if %exp<12000 mov %mylv,15:gosub *maxhp:gosub *maxmp:return
if %exp<15000 mov %mylv,16:gosub *maxhp:gosub *maxmp:return
if %exp<19000 mov %mylv,17:gosub *maxhp:gosub *maxmp:return
if %exp<24000 mov %mylv,18:gosub *maxhp:gosub *maxmp:return
if %exp<29000 mov %mylv,19:gosub *maxhp:gosub *maxmp:return
if %exp<35000 mov %mylv,20:gosub *maxhp:gosub *maxmp:return
if %exp<41000 mov %mylv,21:gosub *maxhp:gosub *maxmp:return
if %exp<47000 mov %mylv,22:gosub *maxhp:gosub *maxmp:return
if %exp<53000 mov %mylv,23:gosub *maxhp:gosub *maxmp:return
if %exp<61000 mov %mylv,24:gosub *maxhp:gosub *maxmp:return
if %exp<70000 mov %mylv,25:gosub *maxhp:gosub *maxmp:return
if %exp<81000 mov %mylv,26:gosub *maxhp:gosub *maxmp:return
if %exp<93000 mov %mylv,27:gosub *maxhp:gosub *maxmp:return
if %exp<105000 mov %mylv,28:gosub *maxhp:gosub *maxmp:return
if %exp<117000 mov %mylv,29:gosub *maxhp:gosub *maxmp:return
if %exp<130000 mov %mylv,30:gosub *maxhp:gosub *maxmp:return
if %exp<145000 mov %mylv,31:gosub *maxhp:gosub *maxmp:return
if %exp<160000 mov %mylv,32:gosub *maxhp:gosub *maxmp:return
if %exp<180000 mov %mylv,33:gosub *maxhp:gosub *maxmp:return
if %exp<210000 mov %mylv,34:gosub *maxhp:gosub *maxmp:return
if %exp<240000 mov %mylv,35:gosub *maxhp:gosub *maxmp:return
if %exp<270000 mov %mylv,36:gosub *maxhp:gosub *maxmp:return
if %exp<300000 mov %mylv,37:gosub *maxhp:gosub *maxmp:return
if %exp<340000 mov %mylv,38:gosub *maxhp:gosub *maxmp:return
if %exp<380000 mov %mylv,39:gosub *maxhp:gosub *maxmp:return
if %exp<430000 mov %mylv,40:gosub *maxhp:gosub *maxmp:return
if %exp<480000 mov %mylv,41:gosub *maxhp:gosub *maxmp:return
if %exp<540000 mov %mylv,42:gosub *maxhp:gosub *maxmp:return
if %exp<600000 mov %mylv,43:gosub *maxhp:gosub *maxmp:return
if %exp<670000 mov %mylv,44:gosub *maxhp:gosub *maxmp:return
if %exp<740000 mov %mylv,45:gosub *maxhp:gosub *maxmp:return
if %exp<810000 mov %mylv,46:gosub *maxhp:gosub *maxmp:return
if %exp<880000 mov %mylv,47:gosub *maxhp:gosub *maxmp:return
if %exp<960000 mov %mylv,48:gosub *maxhp:gosub *maxmp:return
if %exp<1040000 mov %mylv,49:gosub *maxhp:gosub *maxmp:return
if %exp<1120000 mov %mylv,50:gosub *maxhp:gosub *maxmp:return
if %exp<1200000 mov %mylv,51:gosub *maxhp:gosub *maxmp:return
if %exp<1300000 mov %mylv,52:gosub *maxhp:gosub *maxmp:return
if %exp<1400000 mov %mylv,53:gosub *maxhp:gosub *maxmp:return
if %exp<1500000 mov %mylv,54:gosub *maxhp:gosub *maxmp:return
if %exp<1650000 mov %mylv,55:gosub *maxhp:gosub *maxmp:return
if %exp<1800000 mov %mylv,56:gosub *maxhp:gosub *maxmp:return
if %exp<1950000 mov %mylv,57:gosub *maxhp:gosub *maxmp:return
if %exp<2100000 mov %mylv,58:gosub *maxhp:gosub *maxmp:return
if %exp<2300000 mov %mylv,59:gosub *maxhp:gosub *maxmp:return
if %exp<2500000 mov %mylv,60:gosub *maxhp:gosub *maxmp:return
if %exp<2700000 mov %mylv,61:gosub *maxhp:gosub *maxmp:return
if %exp<3000000 mov %mylv,62:gosub *maxhp:gosub *maxmp:return
if %exp<3400000 mov %mylv,63:gosub *maxhp:gosub *maxmp:return
if %exp<3800000 mov %mylv,64:gosub *maxhp:gosub *maxmp:return
if %exp<4200000 mov %mylv,65:gosub *maxhp:gosub *maxmp:return
if %exp<4600000 mov %mylv,66:gosub *maxhp:gosub *maxmp:return
if %exp<5000000 mov %mylv,67:gosub *maxhp:gosub *maxmp:return
if %exp<5500000 mov %mylv,68:gosub *maxhp:gosub *maxmp:return
if %exp<6100000 mov %mylv,69:gosub *maxhp:gosub *maxmp:return
if %exp<6800000 mov %mylv,70:gosub *maxhp:gosub *maxmp:return
if %exp<7600000 mov %mylv,71:gosub *maxhp:gosub *maxmp:return
if %exp<8500000 mov %mylv,72:gosub *maxhp:gosub *maxmp:return
if %exp<9500000 mov %mylv,73:gosub *maxhp:gosub *maxmp:return
if %exp<11000000 mov %mylv,74:gosub *maxhp:gosub *maxmp:return
if %exp<12500000 mov %mylv,75:gosub *maxhp:gosub *maxmp:return
if %exp<14000000 mov %mylv,76:gosub *maxhp:gosub *maxmp:return
if %exp<16000000 mov %mylv,77:gosub *maxhp:gosub *maxmp:return
if %exp<18000000 mov %mylv,78:gosub *maxhp:gosub *maxmp:return
if %exp<20000000 mov %mylv,79:gosub *maxhp:gosub *maxmp:return
if %exp<22000000 mov %mylv,80:gosub *maxhp:gosub *maxmp:return



*maxhp

if %mylv=1 mov %max_mylife,30:return
if %mylv=2 mov %max_mylife,40:return
if %mylv=3 mov %max_mylife,50:return
if %mylv=4 mov %max_mylife,60:return
if %mylv=5 mov %max_mylife,70:return
if %mylv=6 mov %max_mylife,80:return
if %mylv=7 mov %max_mylife,90:return
if %mylv=8 mov %max_mylife,100:return
if %mylv=9 mov %max_mylife,110:return
if %mylv=10 mov %max_mylife,120:return
if %mylv=11 mov %max_mylife,130:return
if %mylv=12 mov %max_mylife,140:return
if %mylv=13 mov %max_mylife,150:return
if %mylv=14 mov %max_mylife,160:return
if %mylv=15 mov %max_mylife,170:return
if %mylv=16 mov %max_mylife,180:return
if %mylv=17 mov %max_mylife,190:return
if %mylv=18 mov %max_mylife,200:return
if %mylv=19 mov %max_mylife,215:return
if %mylv=20 mov %max_mylife,230:return
if %mylv=21 mov %max_mylife,245:return
if %mylv=22 mov %max_mylife,260:return
if %mylv=23 mov %max_mylife,275:return
if %mylv=24 mov %max_mylife,290:return
if %mylv=25 mov %max_mylife,305:return
if %mylv=26 mov %max_mylife,320:return
if %mylv=27 mov %max_mylife,335:return
if %mylv=28 mov %max_mylife,350:return
if %mylv=29 mov %max_mylife,370:return
if %mylv=30 mov %max_mylife,390:return
if %mylv=31 mov %max_mylife,410:return
if %mylv=32 mov %max_mylife,430:return
if %mylv=33 mov %max_mylife,450:return
if %mylv=34 mov %max_mylife,470:return
if %mylv=35 mov %max_mylife,490:return
if %mylv=36 mov %max_mylife,510:return
if %mylv=37 mov %max_mylife,530:return
if %mylv=38 mov %max_mylife,550:return
if %mylv=39 mov %max_mylife,580:return
if %mylv=40 mov %max_mylife,610:return
if %mylv=41 mov %max_mylife,640:return
if %mylv=42 mov %max_mylife,670:return
if %mylv=43 mov %max_mylife,700:return
if %mylv=44 mov %max_mylife,730:return
if %mylv=45 mov %max_mylife,760:return
if %mylv=46 mov %max_mylife,790:return
if %mylv=47 mov %max_mylife,820:return
if %mylv=48 mov %max_mylife,860:return
if %mylv=49 mov %max_mylife,900:return
if %mylv=50 mov %max_mylife,940:return
if %mylv=51 mov %max_mylife,980:return
if %mylv=52 mov %max_mylife,1020:return
if %mylv=53 mov %max_mylife,1060:return
if %mylv=54 mov %max_mylife,1100:return
if %mylv=55 mov %max_mylife,1150:return
if %mylv=56 mov %max_mylife,1200:return
if %mylv=57 mov %max_mylife,1250:return
if %mylv=58 mov %max_mylife,1300:return
if %mylv=59 mov %max_mylife,1350:return
if %mylv=60 mov %max_mylife,1400:return
if %mylv=61 mov %max_mylife,1450:return
if %mylv=62 mov %max_mylife,1500:return
if %mylv=63 mov %max_mylife,1550:return
if %mylv=64 mov %max_mylife,1600:return
if %mylv=65 mov %max_mylife,1650:return
if %mylv=66 mov %max_mylife,1700:return
if %mylv=67 mov %max_mylife,1750:return
if %mylv=68 mov %max_mylife,1800:return
if %mylv=69 mov %max_mylife,1850:return
if %mylv=70 mov %max_mylife,1900:return
if %mylv=71 mov %max_mylife,1950:return
if %mylv=72 mov %max_mylife,2000:return
if %mylv=73 mov %max_mylife,2050:return
if %mylv=74 mov %max_mylife,2100:return
if %mylv=75 mov %max_mylife,2150:return
if %mylv=76 mov %max_mylife,2200:return
if %mylv=77 mov %max_mylife,2250:return
if %mylv=78 mov %max_mylife,2300:return
if %mylv=79 mov %max_mylife,2350:return
if %mylv=80 mov %max_mylife,2400:return
if %mylv=81 mov %max_mylife,2450:return
if %mylv=83 mov %max_mylife,2500:return
if %mylv=84 mov %max_mylife,2550:return
if %mylv=85 mov %max_mylife,2600:return
if %mylv=86 mov %max_mylife,2650:return
if %mylv=87 mov %max_mylife,2700:return
if %mylv=88 mov %max_mylife,2750:return
if %mylv=89 mov %max_mylife,2800:return
if %mylv=90 mov %max_mylife,2850:return
if %mylv=91 mov %max_mylife,2900:return
if %mylv=93 mov %max_mylife,2950:return
if %mylv=94 mov %max_mylife,3000:return
if %mylv=95 mov %max_mylife,3050:return
if %mylv=96 mov %max_mylife,3100:return
if %mylv=97 mov %max_mylife,3150:return
if %mylv=98 mov %max_mylife,3200:return
if %mylv=99 mov %max_mylife,3250:return
mov %max_mylife,3300:return



*maxmp

if %player=2 mov %max_mp,13:return
if %player=3 mov %max_mp,10:return
if %player=4 mov %max_mp,15:return
if %player=5 mov %max_mp,13:return
if %skill01=0 mov %max_mp,0:return
if %mylv<8 mov %max_mp,2:return
if %mylv<15 mov %max_mp,3:return
if %mylv<23 mov %max_mp,4:return
if %mylv<30 mov %max_mp,5:return
if %mylv<37 mov %max_mp,6:return
if %mylv<44 mov %max_mp,7:return
if %mylv<51 mov %max_mp,8:return
if %mylv<58 mov %max_mp,9:return
if %mylv<65 mov %max_mp,10:return
if %mylv<72 mov %max_mp,11:return
if %mylv<79 mov %max_mp,12:return
mov %max_mp,13
return



*syokika

mov %hanyo1,0
mov %hanyo2,0
mov %hanyo3,0
mov %hanyo4,0
mov %hanyo5,0
mov %hanyo6,0
mov %kousoku,0
mov %status,0
mov %sinkou,0
mov %sel_hphalf,0
mov %sel_kiki,0
mov %bougyo,0
mov %kousan,0
mov %stopcmd1,0
mov %stopcmd2,0
mov %stopcmd3,0
mov %stopcmd4,0
mov %stopcmd5,0
mov %stopcmd6,0
mov %stopcmd7,0
mov %counter,0
mov %owaza_count1a,1
mov %owaza_count1b,1
mov %owaza_count1c,1
mov %owaza_count1d,1
mov %owaza_count2a,1
mov %owaza_count2b,1
mov %owaza_count2c,1
mov %owaza_count2d,1
mov %owaza_count3a,1
mov %owaza_count3b,1
mov %owaza_count3c,1
mov %owaza_count3d,1
mov %owaza_count3e,1
mov %owaza_count3f,1
mov %owaza_count3g,1
mov %owaza_count3h,1
mov %ren,0
mov %list_num1,0
mov %list_num2,0
mov %list_num3,0
mov %list_num4,0
mov %list_num5,0
mov %list_num6,0
mov %list_num7,0
mov %list_num8,0
mov %list_num9,0
mov %list_num10,0
mov %list_num11,0
mov %list_num12,0
mov %list_num13,0
mov %list_num14,0
mov %list_num15,0
mov %list_num16,0
mov %turn,0
mov %first_sel1,0
mov %first_sel2,0
mov %first_sel3,0
mov %first_sel4,0
mov %wind,0
mov %wind_turn,0
mov %fire,0
mov %fire_turn,0
mov %earth,0
mov %earth_turn,0
mov %aqua,0
mov %aqua_turn,0
mov %continue,0
mov %kousoku_hp,0
mov %stuck,0
mov $list1,""
mov $list2,""
mov $list3,""
mov $list4,""
mov $list5,""
mov $list6,""
mov $list7,""
mov $list8,""
mov $list9,""
mov $list10,""
mov $list11,""
mov $list12,""
mov $list13,""
mov $list14,""
mov $list15,""
mov $list16,""
mov $hanlist1,""
mov $hanlist2,""
mov $hanlist3,""
mov $hanlist4,""
mov $hanlist5,""
mov $hanlist6,""
mov $hanlist7,""
mov $hanlist8,""
mov %wind_kakuritu,0
mov %wind_guard_on,0
mov %nodamage,0
mov %enemylv,0
mov %owaza_num1,0
mov %owaza_num2,0
mov %before_action,0
mov %skill_sub,0
mov %nowmusic,0
mov %hsean,0
mov %hseanwave,0
mov %hseanvoice,0
mov $mogaku_anno1,""
mov $mogaku_anno2,""
mov $mogaku_anno3,""
mov $mogaku_anno4,""
mov $mogaku_sel1,""
mov $mogaku_sel2,""
mov $mogaku_sel3,""
mov $mogaku_sel4,""
mov $mogaku_sel5,""
mov $mogaku_dassyutu1,""
mov $mogaku_dassyutu2,""
mov $mogaku_earth_dassyutu1,""
mov $mogaku_earth_dassyutu2,""
mov $mogaku_kaisin1,""
mov $mogaku_kaisin2,""
mov $half_s1,""
mov $half_s2,""
mov $kiki_s1,""
mov $kiki_s2,""
mov $kousan,""
mov $status_mid,""
mov $status_end,""
mov %tukix,320
mov %tukiy,50
mov %tekikazu,1
mov %kadora,0
mov %earth_keigen_el,0
mov %fire_keigen_el,0
mov %kaihi_el,100
mov %damage_keigen_el,100
mov %enemy_wind,0
mov %enemy_earth,0
mov %enemy_aqua,0
mov %enemy_fire,0
mov %tuika_owaza_count1a,0
mov %tuika_owaza_count1b,0
mov %tuika_owaza_count1c,0
mov %tuika_owaza_count1d,0
mov %tuika_owaza_count1e,0
mov %tuika_owaza_count1f,0
mov %tuika_owaza_count1g,0
mov %tuika_owaza_count1h,0
mov %tuika_owaza_count2a,0
mov %tuika_owaza_count2b,0
mov %tuika_owaza_count2c,0
mov %tuika_owaza_count2d,0
mov %tuika_owaza_count3a,0
mov %tuika_owaza_count3b,0
mov %tuika_owaza_count3c,0
mov %tuika_owaza_count3d,0
mov %tuika_owaza_count4a,0
mov %tuika_owaza_count4b,0
mov %bougyo_attack,0
mov %hit,0
return



*check_haikei

mov $teigi1,$haikei
len %teigi1,$teigi1
mid $teigi2,$teigi1,0,1
if $teigi2="\" mov $teigi3,"":mid $teigi1,$teigi1,1,%teigi1-1:skip 6
if $teigi2<>"." mov $teigi3,$mon_labo_mon_folder:skip 5
itoa $teigi2,%mon_labo_select_no
getini $teigi3,".\mod\list.ini","monster",$teigi2
mov $teigi3,"mod\"+$teigi3+"\"
mid $teigi1,$teigi1,1,%teigi1-1
split $teigi1,".",$teigi4,$teigi5
if $teigi5="bmp" | $teigi5="png" | $teigi5="jpg" return
if $teigi5="" mov $teigi3,"bg\":add $teigi1,".bmp":return
mov $teigi2,"skip"
return



*syutugen

add %stack,1
wait 500
saveoff
bgmstop
bgmonce "bgm\battlestart.ogg"
if %mon_labo_on=0 && %player>0 skip 9
if %mon_labo_on=0 mov $ori_name,"Luka":mov %player,0:skip 13
if $ori_name="" mov $ori_name,"Luka":mov %player,0:skip 12
if $ori_name="1" mov %player,1:skip 6
if $ori_name="2" mov %player,2:skip 5
if $ori_name="3" mov %player,3:skip 4
if $ori_name="4" mov %player,4:skip 3
if $ori_name="5" mov %player,5:skip 2
mov %player,99
if %player=1 mov $ori_name,"Alice"
if %player=2 mov $ori_name,"Alma Elma"
if %player=3 mov $ori_name,"Erubetie"
if %player=4 mov $ori_name,"Tamamo"
if %player=5 mov $ori_name,"Granberia"
gosub *setwindow_02
cspl 592,595
cspl 700,706
gosub *face1n
if %mon_labo_on<>1 bg "BG\"+$haikei+".bmp",10,500:skip 3
gosub *check_haikei:if $teigi2="skip" skip 2
bg $teigi3+$teigi1,10,500
lsp 561,":a;system\gagee100.bmp",421,556
if %player=0 lsp 598,":a;system\face_00.bmp",34,534
if %player=1 lsp 598,":a;system\face_a00.bmp",37,540
if %player=2 lsp 598,":a;system\face_b00.bmp",35,543
if %player=3 lsp 598,":a;system\face_c00.bmp",35,543
if %player=4 lsp 598,":a;system\face_d00.bmp",35,543
if %player=5 lsp 598,":a;system\face_e00.bmp",35,543
if %player=99 lsp 598,":a;system\face_x00.bmp",37,540
mov %mylv_sin,%mylv
if %player=0 gosub *maxhp
if %player=1 mov %max_mylife,32000
if %player=2 mov %max_mylife,15000
if %player=3 mov %max_mylife,22000
if %player=4 mov %max_mylife,22000
if %player=5 mov %max_mylife,24000
if %player=99 gosub *maxhp
if %mon_labo_on=0 skip 3
getini $sub7,$mon_labo_mon_ini,"ruka","hp"
if $sub7<>"" atoi %sub7,$sub7:mov %max_mylife,%sub7
mov %mylife,%max_mylife
if %mon_labo_on=1 getini $sub7,$mon_labo_mon_ini,"ruka","hp_minus":atoi %sub7,$sub7:sub %mylife,%sub7
mov %gage,%mylife*100/%max_mylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 560,":a;system\gager"+$gagenum+".bmp",114,556
gosub *hp
if %mon_labo_on=0 skip 4
gosub *maxmp
getini $sub7,$mon_labo_mon_ini,"ruka","sp"
if $sub7<>"" atoi %sub7,$sub7:mov %max_mp,%sub7
mov %mp,%max_mp
if %mon_labo_on=1 getini $sub7,$mon_labo_mon_ini,"ruka","sp_minus":atoi %sub7,$sub7:sub %mp,%sub7
gosub *mp
eng $name+" appears!"
$sel6/
mov %enemylife,%max_enemylife
wait 1000
delay 4500
if %music<>%nowmusic gosub *musicplay
gosub *syokika
\
sub %stack,1
return



*syutugen_plural

add %stack,1
wait 500
saveoff
bgmstop
bgmonce "bgm\battlestart.ogg"
if %mon_labo_on=0 && %player>0 skip 9
if %mon_labo_on=0 mov $ori_name,"Luka":mov %player,0:skip 13
if $ori_name="" mov $ori_name,"Luka":mov %player,0:skip 12
if $ori_name="1" mov %player,1:skip 6
if $ori_name="2" mov %player,2:skip 5
if $ori_name="3" mov %player,3:skip 4
if $ori_name="4" mov %player,4:skip 3
if $ori_name="5" mov %player,5:skip 2
mov %player,99
if %player=1 mov $ori_name,"Alice"
if %player=2 mov $ori_name,"Alma Elma"
if %player=3 mov $ori_name,"Erubetie"
if %player=4 mov $ori_name,"Tamamo"
if %player=5 mov $ori_name,"Granberia"
gosub *setwindow_02
cspl 592,595
cspl 700,706
gosub *face1n
if %mon_labo_on<>1 bg "BG\"+$haikei+".bmp",10,500:skip 3
gosub *check_haikei:if $teigi2="skip" skip 2
bg $teigi3+$teigi1,10,500
lsp 561,":a;system\gagee100.bmp",421,556
if %player=0 lsp 598,":a;system\face_00.bmp",34,534
if %player=1 lsp 598,":a;system\face_a00.bmp",37,540
if %player=2 lsp 598,":a;system\face_b00.bmp",35,543
if %player=3 lsp 598,":a;system\face_c00.bmp",35,543
if %player=4 lsp 598,":a;system\face_d00.bmp",35,543
if %player=5 lsp 598,":a;system\face_e00.bmp",35,543
if %player=99 lsp 598,":a;system\face_x00.bmp",37,540
mov %mylv_sin,%mylv
if %player=0 gosub *maxhp
if %player=1 mov %max_mylife,32000
if %player=2 mov %max_mylife,15000
if %player=3 mov %max_mylife,22000
if %player=4 mov %max_mylife,22000
if %player=5 mov %max_mylife,24000
if %player=99 gosub *maxhp
if %mon_labo_on=0 skip 3
getini $sub7,$mon_labo_mon_ini,"ruka","hp"
if $sub7<>"" atoi %sub7,$sub7:mov %max_mylife,%sub7
mov %mylife,%max_mylife
if %mon_labo_on=1 getini $sub7,$mon_labo_mon_ini,"ruka","hp_minus":atoi %sub7,$sub7:sub %mylife,%sub7
mov %gage,%mylife*100/%max_mylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 560,":a;system\gager"+$gagenum+".bmp",114,556
gosub *hp
if %mon_labo_on=0 skip 4
gosub *maxmp
getini $sub7,$mon_labo_mon_ini,"ruka","sp"
if $sub7<>"" atoi %sub7,$sub7:mov %max_mp,%sub7
mov %mp,%max_mp
if %mon_labo_on=1 getini $sub7,$mon_labo_mon_ini,"ruka","sp_minus":atoi %sub7,$sub7:sub %mp,%sub7
gosub *mp
eng $name+" appear!"
$sel6/
mov %enemylife,%max_enemylife
wait 1000
delay 4500
if %music<>%nowmusic gosub *musicplay
gosub *syokika
\
sub %stack,1
return



*syutugen2

add %stack,1
saveoff
if %music<>%nowmusic gosub *musicplay
if %mon_labo_on=0 && %player>0 skip 9
if %mon_labo_on=0 mov $ori_name,"Luka":mov %player,0:skip 13
if $ori_name="" mov $ori_name,"Luka":mov %player,0:skip 12
if $ori_name="1" mov %player,1:skip 6
if $ori_name="2" mov %player,2:skip 5
if $ori_name="3" mov %player,3:skip 4
if $ori_name="4" mov %player,4:skip 3
if $ori_name="5" mov %player,5:skip 2
mov %player,99
if %player=1 mov $ori_name,"Alice"
if %player=2 mov $ori_name,"Alma Elma"
if %player=3 mov $ori_name,"Erubetie"
if %player=4 mov $ori_name,"Tamamo"
if %player=5 mov $ori_name,"Granberia"
gosub *setwindow_02
cspl 592,595
cspl 700,706
gosub *face1n
if %mon_labo_on<>1 bg "BG\"+$haikei+".bmp",10,500:skip 3
gosub *check_haikei:if $teigi2="skip" skip 2
bg $teigi3+$teigi1,10,500
lsp 560,":a;system\gager100.bmp",114,556
lsp 561,":a;system\gagee100.bmp",421,556
if %player=0 lsp 598,":a;system\face_00.bmp",34,534
if %player=1 lsp 598,":a;system\face_a00.bmp",37,540
if %player=2 lsp 598,":a;system\face_b00.bmp",35,543
if %player=3 lsp 598,":a;system\face_c00.bmp",35,543
if %player=4 lsp 598,":a;system\face_d00.bmp",35,543
if %player=5 lsp 598,":a;system\face_e00.bmp",35,543
if %player=99 lsp 598,":a;system\face_x00.bmp",37,540
mov %mylv_sin,%mylv
if %player=0 gosub *maxhp
if %player=1 mov %max_mylife,32000
if %player=2 mov %max_mylife,15000
if %player=3 mov %max_mylife,22000
if %player=4 mov %max_mylife,22000
if %player=5 mov %max_mylife,24000
if %player=99 gosub *maxhp
if %mon_labo_on=0 skip 3
getini $sub7,$mon_labo_mon_ini,"ruka","hp"
if $sub7<>"" atoi %sub7,$sub7:mov %max_mylife,%sub7
mov %mylife,%max_mylife
if %mon_labo_on=1 getini $sub7,$mon_labo_mon_ini,"ruka","hp_minus":atoi %sub7,$sub7:sub %mylife,%sub7
gosub *hp
if %mon_labo_on=0 skip 4
gosub *maxmp
getini $sub7,$mon_labo_mon_ini,"ruka","sp"
if $sub7<>"" atoi %sub7,$sub7:mov %max_mp,%sub7
mov %mp,%max_mp
if %mon_labo_on=1 getini $sub7,$mon_labo_mon_ini,"ruka","sp_minus":atoi %sub7,$sub7:sub %mp,%sub7
gosub *mp
mov %enemylife,%max_enemylife
gosub *syokika
sub %stack,1
return



*syutugen_doppel

wait 500
saveoff
bgmstop
bgmonce "bgm\battlestart.ogg"
if %mon_labo_on=0 mov $ori_name,"Luka":mov %player,0:skip 3
if %mon_labo_on=1 && $ori_name="" mov $ori_name,"Luka":mov %player,0:skip 2
if %mon_labo_on=1 && $ori_name<>"" mov %player,99
gosub *setwindow_02
cspl 592,595
lsp 700,":l;Doppel/doppelstand.png",%monster_x,%monster_y
bg "BG\"+$haikei+".bmp",10,500
lsp 561,":a;system\gagee100.bmp",421,556
if %player=0 lsp 598,":a;system\face_00.bmp",34,534
if %player=1 lsp 598,":a;system\face_a00.bmp",37,540
if %player=99 lsp 598,":a;system\face_x00.bmp",37,540
mov %mylv_sin,%mylv
if %player=0 gosub *maxhp
if %player=1 mov %max_mylife,32000
if %player=99 gosub *maxhp
mov %mylife,%max_mylife
if %mon_labo_on=1 getini $sub7,$mon_labo_mon_ini,"ruka","hp_minus":atoi %sub7,$sub7:sub %mylife,%sub7
mov %gage,%mylife*100/%max_mylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 560,":a;system\gager"+$gagenum+".bmp",114,556
gosub *hp
gosub *mp
eng $name+" appears!"
$sel6/
mov %max_enemylife,1600
mov %enemylife,%max_enemylife
wait 1000
delay 4500
bgm "Doppel\doppel.ogg"
gosub *syokika
\
return



*musicplay

if %music=1 bgm "bgm\battle.ogg"
if %music=2 bgm "bgm\boss1.ogg"
if %music=3 bgm "bgm\boss2.ogg"
if %music=4 bgm "bgm\sitenno.ogg"
if %music=5 bgm "bgm\maou.ogg"
if %music=6 bgm "bgm\comi1.ogg"
if %music=7 bgm "bgm\ruka.ogg"
if %music=8 bgm "bgm\boss3.ogg"
if %music=9 bgm "bgm\boss4.ogg"
if %music=10 bgm "bgm\yonseirei.ogg"
if %music=11 bgm "bgm\yonseirei2.ogg"
if %music=12 bgm "bgm\tamamo.ogg"
if %music=13 bgm "bgm\boss0.ogg"
if %music=14 bgm "bgm\eden.ogg"
if %music=15 bgm "bgm\stein2.ogg"
if %music=16 bgm "bgm\maou3.ogg"
if %music=17 bgm "bgm\maou4.ogg"
if %music=18 bgm "bgm\irias2.ogg"
if %music=19 bgm "bgm\irias3.ogg"
if %music<>99 return
mov $sub2,$tuika_bgm
gosub *check_dir2
split $sub2,".",$sub3,$sub1
if $sub1="wav" mov $sub1,$teigi1:add $sub1,$sub2:waveloop $sub1:return
if $sub1="ogg" mov $sub1,$teigi1:add $sub1,$sub2:bgm $sub1:return
if $sub1="mp3" mov $sub1,$teigi1:add $sub1,$sub2:mp3loop $sub1:return
if $sub1="" mov $sub1,"bgm\"+$sub2+".ogg":bgm $sub1:return
return



*cmd_main

add %stack,1
saveoff
textoff
isskip %sinkouonoff
csp 3:csp 4:csp 5:csp 6:csp 7:print 1
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
gosub *setwindow_04
if %100=1 && %zukanon=1 itoa $sel6,%stack:csp 10:strsp 10,$sel6,750,5,2,1,20,20,0,0,1,0,#FF0000
if %100=1 && %zukanon=3 itoa $sel6,%stack:csp 10:strsp 10,$sel6,750,5,2,1,20,20,0,0,1,0,#FF0000
if %stopcmd1=0 lsp 601,":s/20,20,0;#FFFFFF#FF4444Attack ",50,418:spbtn 601,11
if %stopcmd1=1 lsp 601,":s/20,20,0;#bbbbbbAttack ",50,418
if %stopcmd7=0 && %kousoku=0 lsp 607,":s/20,20,0;#FFFFFF#FF4444Skill ",50,445:spbtn 607,17
if %stopcmd7=0 && %kousoku>0 lsp 607,":s/20,20,0;#bbbbbbSkill ",50,445
if %stopcmd7=1 lsp 607,":s/20,20,0;#bbbbbbSkill ",50,445
if %stopcmd2=0 && %kousoku>0 lsp 602,":s/20,20,0;#FFFFFF#FF4444Struggle ",50,472:spbtn 602,12
if %stopcmd2=0 && %kousoku=0 lsp 602,":s/20,20,0;#bbbbbbStruggle ",50,472
if %stopcmd2=1 lsp 602,":s/20,20,0;#bbbbbbStruggle ",50,472
if %stopcmd3=0 && %kousoku=0 lsp 603,":s/20,20,0;#FFFFFF#FF4444Guard ",50,499:spbtn 603,13
if %stopcmd3=0 && %kousoku>0 lsp 603,":s/20,20,0;#bbbbbbGuard ",50,499
if %stopcmd3=1 lsp 603,":s/20,20,0;#bbbbbbGuard ",50,499
if %stopcmd4=0 lsp 604,":s/20,20,0;#FFFFFF#FF4444Wait ",285,418:spbtn 604,14
if %stopcmd4=1 lsp 604,":s/20,20,0;#bbbbbbWait ",285,418
if %stopcmd5=0 lsp 605,":s/20,20,0;#FFFFFF#FF4444Surrender ",285,445:spbtn 605,15
if %stopcmd5=1 lsp 605,":s/20,20,0;#bbbbbbSurrender ",285,445
if %stopcmd6=0 lsp 606,":s/20,20,0;#FFFFFF#FF4444Request ",285,472:spbtn 606,16
if %stopcmd6=1 lsp 606,":s/20,20,0;#bbbbbbRequest ",285,472
if %alice_skill=1 && %kousoku=0 lsp 608,":s/20,20,0;#FFFFFF#FF4444Alice ",285,499:spbtn 608,18
if %alice_skill=1 && %kousoku>0 lsp 608,":s/20,20,0;#bbbbbbAlice ",285,499
goto *cmd_main2



*cmd_main2

btnwait2 %cmd1
if %mon_labo_on=1 && %cmd1=4 textoff:screen_clear:sub %stack,1:return *monster_labo
if %zukanon>0 && %cmd1=4 textoff:sub %stack,1:return *zukan_commonkaisou0
if %cmd1=3 mov %saveorload,0:gosub *saveload:sub %stack,1:goto *cmd_main
if %cmd1=4 mov %saveorload,1:gosub *saveload:sub %stack,1:goto *cmd_main
if %cmd1=7 gosub *window_delete2:sub %stack,1:goto *cmd_main
if %cmd1=0 goto *cmd_main2
if %cmd1=-1 && %mon_labo_on=0 mov %sel2,%hanyo1:gosub *menu:sub %stack,1:goto *cmd_main
if %cmd1=-10 && %mon_labo_on=0 mov %sel2,%hanyo1:gosub *menu:sub %stack,1:goto *cmd_main
if %cmd1=-11 && %mon_labo_on=0 mov %sel2,%hanyo1:gosub *menu:sub %stack,1:goto *cmd_main
if %cmd1=-2 cspl 601,610:print 1:gosub *backlog:sub %stack,1:goto *cmd_main
if %cmd1<=-1 goto *cmd_main2
csp 3:csp 4:csp 7
csp 601:csp 602:csp 603:csp 604:csp 605:csp 606:csp 607:csp 608
gosub *setwindow_02p
texton
btndef clear
if %zukanon=3 && %sinkouonoff=2 automode_time %autotime:systemcall automode
if %zukanon=1 && %sinkouonoff=2 automode_time %autotime:systemcall automode
sub %stack,1
return



*cmd_hanyo

add %stack,1
saveoff
textoff
csp 3:csp 4:csp 5:csp 6:csp 7:print 1
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
gosub *setwindow_04
len %name_count,$hanlist1:strsp 601,$hanlist1,50,418,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444
spbtn 601,11
if $hanlist2="" goto *cmd_hanyo2
len %name_count,$hanlist2:strsp 602,$hanlist2,50,445,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444
spbtn 602,12
if $hanlist3="" goto *cmd_hanyo2
len %name_count,$hanlist3:strsp 603,$hanlist3,50,472,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444
spbtn 603,13
if $hanlist4="" goto *cmd_hanyo2
len %name_count,$hanlist4:strsp 604,$hanlist4,50,499,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444
spbtn 604,14
if $hanlist5="" goto *cmd_hanyo2
len %name_count,$hanlist5:strsp 605,$hanlist5,350,418,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444
spbtn 605,15
if $hanlist6="" goto *cmd_hanyo2
len %name_count,$hanlist6:strsp 606,$hanlist6,350,445,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444
spbtn 606,16
if $hanlist7="" goto *cmd_hanyo2
len %name_count,$hanlist7:strsp 607,$hanlist7,350,472,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444
spbtn 607,17
if $hanlist8="" goto *cmd_hanyo2
len %name_count,$hanlist8:strsp 608,$hanlist8,350,599,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444
spbtn 608,18
goto *cmd_hanyo2



*cmd_hanyo2

btnwait2 %cmd1
if %mon_labo_on=1 && %cmd1=4 textoff:screen_clear:sub %stack,1:return *monster_labo
if %zukanon>0 && %cmd1=4 textoff:sub %stack,1:return *zukan_commonkaisou0
if %cmd1=3 mov %saveorload,0:gosub *saveload:sub %stack,1:goto *cmd_hanyo
if %cmd1=4 mov %saveorload,1:gosub *saveload:sub %stack,1:goto *cmd_hanyo
if %cmd1=7 gosub *window_delete2:sub %stack,1:goto *cmd_hanyo
if %cmd1=0 goto *cmd_hanyo2
if %cmd1<=-2 goto *cmd_hanyo2
csp 3:csp 4:csp 7
csp 601:csp 602:csp 603:csp 604:csp 605:csp 606:csp 607:csp 608
gosub *setwindow_02p
texton
btndef clear
sub %stack,1
return



*cmd_onedari

add %stack,1
saveoff
textoff
cspl 3,7:print 1
btndef clear
mov %onedari_page,1
mov %sinkoumode,0:skipoff:autoclick 0
gosub *setwindow_04
if %100=1 && %zukanon=1 itoa $sel6,%stack:csp 10:strsp 10,$sel6,750,5,2,1,20,20,0,0,1,0,#FF0000
if %100=1 && %zukanon=3 itoa $sel6,%stack:csp 10:strsp 10,$sel6,750,5,2,1,20,20,0,0,1,0,#FF0000
split $list1,",",$sub1,$sub2:if $sub2="" mov $sub1,$list1
if %list_num1=1 len %name_count,$sub1:strsp 501,$sub1,50,418,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 501,11
if %list_num1=0 len %name_count,$sub1:strsp 501,$sub1,50,418,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
split $list2,",",$sub1,$sub2:if $sub2="" mov $sub1,$list2
if %list_num2=1 len %name_count,$sub1:strsp 502,$sub1,50,445,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 502,12
if %list_num2=0 len %name_count,$sub1:strsp 502,$sub1,50,445,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
split $list3,",",$sub1,$sub2:if $sub2="" mov $sub1,$list3
if %list_num3=1 len %name_count,$sub1:strsp 503,$sub1,50,472,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 503,13
if %list_num3=0 len %name_count,$sub1:strsp 503,$sub1,50,472,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
split $list4,",",$sub1,$sub2:if $sub2="" mov $sub1,$list4
if %list_num4=1 len %name_count,$sub1:strsp 504,$sub1,50,499,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 504,14
if %list_num4=0 len %name_count,$sub1:strsp 504,$sub1,50,499,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
split $list5,",",$sub1,$sub2:if $sub2="" mov $sub1,$list5
if %list_num5=1 len %name_count,$sub1:strsp 505,$sub1,400,418,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 505,15
if %list_num5=0 len %name_count,$sub1:strsp 505,$sub1,400,418,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
split $list6,",",$sub1,$sub2:if $sub2="" mov $sub1,$list6
if %list_num6=1 len %name_count,$sub1:strsp 506,$sub1,400,445,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 506,16
if %list_num6=0 len %name_count,$sub1:strsp 506,$sub1,400,445,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
split $list7,",",$sub1,$sub2:if $sub2="" mov $sub1,$list7
if %list_num7=1 len %name_count,$sub1:strsp 507,$sub1,400,472,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 507,17
if %list_num7=0 len %name_count,$sub1:strsp 507,$sub1,400,472,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
split $list8,",",$sub1,$sub2:if $sub2="" mov $sub1,$list8
if %list_num8=1 len %name_count,$sub1:strsp 508,$sub1,400,499,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 508,18
if %list_num8=0 len %name_count,$sub1:strsp 508,$sub1,400,499,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
notif $list9="" lsp 509,":c/2,0,3;system\menu_prev.jpg",32,515:spbtn 509,27
notif $list9="" lsp 510,":c/2,0,3;system\menu_next.jpg",748,515:spbtn 510,28
goto *cmd_onedari2



*cmd_onedarib

saveoff
textoff
cspl 3,7:print 1
btndef clear
mov %onedari_page,2
mov %sinkoumode,0:skipoff:autoclick 0
gosub *setwindow_04
lsp 509,":c/2,0,3;system\menu_prev.jpg",32,515:spbtn 509,27
lsp 510,":c/2,0,3;system\menu_next.jpg",748,515:spbtn 510,28
split $list9,",",$sub1,$sub2:if $sub2="" mov $sub1,$list9
if %list_num9=1 len %name_count,$sub1:strsp 501,$sub1,50,418,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 501,19
if %list_num9=0 len %name_count,$sub1:strsp 501,$sub1,50,418,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
split $list10,",",$sub1,$sub2:if $sub2="" mov $sub1,$list10
if %list_num10=1 len %name_count,$sub1:strsp 502,$sub1,50,445,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 502,20
if %list_num10=0 len %name_count,$sub1:strsp 502,$sub1,50,445,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
split $list11,",",$sub1,$sub2:if $sub2="" mov $sub1,$list11
if %list_num11=1 len %name_count,$sub1:strsp 503,$sub1,50,472,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 503,21
if %list_num11=0 len %name_count,$sub1:strsp 503,$sub1,50,472,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
split $list12,",",$sub1,$sub2:if $sub2="" mov $sub1,$list12
if %list_num12=1 len %name_count,$sub1:strsp 504,$sub1,50,499,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 504,22
if %list_num12=0 len %name_count,$sub1:strsp 504,$sub1,50,499,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
split $list13,",",$sub1,$sub2:if $sub2="" mov $sub1,$list13
if %list_num13=1 len %name_count,$sub1:strsp 505,$sub1,400,418,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 505,23
if %list_num13=0 len %name_count,$sub1:strsp 505,$sub1,400,418,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
split $list14,",",$sub1,$sub2:if $sub2="" mov $sub1,$list14
if %list_num14=1 len %name_count,$sub1:strsp 506,$sub1,400,445,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 506,24
if %list_num14=0 len %name_count,$sub1:strsp 506,$sub1,400,445,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
split $list15,",",$sub1,$sub2:if $sub2="" mov $sub1,$list15
if %list_num15=1 len %name_count,$sub1:strsp 507,$sub1,400,472,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 507,25
if %list_num15=0 len %name_count,$sub1:strsp 507,$sub1,400,472,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
split $list16,",",$sub1,$sub2:if $sub2="" mov $sub1,$list16
if %list_num16=1 len %name_count,$sub1:strsp 508,$sub1,400,499,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 508,26
if %list_num16=0 len %name_count,$sub1:strsp 508,$sub1,400,499,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
goto *cmd_onedari2



*cmd_onedari2

btnwait2 %cmd1
if %mon_labo_on=1 && %cmd1=4 textoff:screen_clear:sub %stack,1:return *monster_labo
if %zukanon>0 && %cmd1=4 textoff:sub %stack,1:return *zukan_commonkaisou0
if %cmd1=3 mov %saveorload,0:gosub *saveload:sub %stack,1:goto *cmd_onedari
if %cmd1=4 mov %saveorload,1:gosub *saveload:sub %stack,1:goto *cmd_onedari
if %cmd1=7 gosub *window_delete2:sub %stack,1:goto *cmd_onedari
if %cmd1=0 goto *cmd_onedari2
if %cmd1<=-2 goto *cmd_onedari2
if %cmd1=27 && %onedari_page=1 goto *cmd_onedarib
if %cmd1=27 && %onedari_page=2 sub %stack,1:goto *cmd_onedari
if %cmd1=28 && %onedari_page=1 goto *cmd_onedarib
if %cmd1=28 && %onedari_page=2 sub %stack,1:goto *cmd_onedari
csp 3:csp 4:csp 7
cspl 501,512
gosub *setwindow_02p
texton
btndef clear
if %zukanon=3 && %sinkouonoff=2 automode_time %autotime:systemcall automode
if %zukanon=1 && %sinkouonoff=2 automode_time %autotime:systemcall automode
sub %stack,1
return



*mp

cspl 571,576
if %mp=1 lsp 571,":a;system\sp.bmp",140,578
if %mp=2 lsp 571,":a;system\sp.bmp",140,578:lsp 572,":a;system\sp.bmp",155,578
if %mp=3 lsp 571,":a;system\sp.bmp",140,578:lsp 572,":a;system\sp.bmp",155,578:lsp 573,":a;system\sp.bmp",170,578
if %mp=4 lsp 571,":a;system\sp.bmp",140,578:lsp 572,":a;system\sp.bmp",155,578:lsp 573,":a;system\sp.bmp",170,578:lsp 574,":a;system\sp.bmp",185,578
if %mp=5 lsp 571,":a;system\sp5.bmp",139,576
if %mp=6 lsp 571,":a;system\sp5.bmp",139,576:lsp 572,":a;system\sp.bmp",159,578
if %mp=7 lsp 571,":a;system\sp5.bmp",139,576:lsp 572,":a;system\sp.bmp",159,578:lsp 573,":a;system\sp.bmp",174,578
if %mp=8 lsp 571,":a;system\sp5.bmp",139,576:lsp 572,":a;system\sp.bmp",159,578:lsp 573,":a;system\sp.bmp",174,578:lsp 574,":a;system\sp.bmp",189,578
if %mp=9 lsp 571,":a;system\sp5.bmp",139,576:lsp 572,":a;system\sp.bmp",159,578:lsp 573,":a;system\sp.bmp",174,578:lsp 574,":a;system\sp.bmp",189,578:lsp 575,":a;system\sp.bmp",204,578
if %mp=10 lsp 571,":a;system\sp5.bmp",139,576:lsp 572,":a;system\sp5.bmp",158,576
if %mp=11 lsp 571,":a;system\sp5.bmp",139,576:lsp 572,":a;system\sp5.bmp",158,576:lsp 573,":a;system\sp.bmp",178,578
if %mp=12 lsp 571,":a;system\sp5.bmp",139,576:lsp 572,":a;system\sp5.bmp",158,576:lsp 573,":a;system\sp.bmp",178,578:lsp 574,":a;system\sp.bmp",193,578
if %mp=13 lsp 571,":a;system\sp5.bmp",139,576:lsp 572,":a;system\sp5.bmp",158,576:lsp 573,":a;system\sp.bmp",178,578:lsp 574,":a;system\sp.bmp",193,578:lsp 575,":a;system\sp.bmp",208,578
if %mp=14 lsp 571,":a;system\sp5.bmp",139,576:lsp 572,":a;system\sp5.bmp",158,576:lsp 573,":a;system\sp.bmp",178,578:lsp 574,":a;system\sp.bmp",193,578:lsp 575,":a;system\sp.bmp",208,578:lsp 576,":a;system\sp.bmp",223,578
if %mp=15 lsp 571,":a;system\sp5.bmp",139,576:lsp 572,":a;system\sp5.bmp",158,576:lsp 573,":a;system\sp5.bmp",177,576
if %mp>15 itoa $sub7,%mp:len %sub7,$sub7:lsp 571,":s/14,14,0;#0077FF"+$sub7,139,576:lsp 572,":a;system\sp.bmp",145+%sub7*7,578
print 1
return



*mp_kaihuku

if %skill01=0 return
mov %mp,%mp+1
if %mp>%max_mp mov %mp,%max_mp
return



*status_print

gosub *status_printn
print 10,500
return



*status_printn

mov %bougyo,0
itoa $statusnum,%status
if $statusnum="6" && %status_turn>-1 mov $statusnum,"0"
if %player>0 goto *status_printn1
if %kousoku=0 lsp 598,":a;system\face_0"+$statusnum+".bmp",34,534
if %kousoku>0 lsp 598,":a;system\face_1"+$statusnum+".bmp",34,534
if %kousoku>0 | %stuck=1 skip 2
csp 690
if %kousoku=0 skip 7
if %mon_labo_on<>1 lsp 700,":a;chara\"+$tatie4+".bmp",%monster_x,%monster_y:skip 6
mov $sub1,$tatie4
gosub *check_dir1
split $sub1,".",$sub3,$sub2
if $sub2="bmp" | $sub2="jpg" | $sub2="png" lsp 700,":a;"+$teigi1+$sub1,%monster_x,%monster_y:skip 2
if $sub2="" lsp 700,":a;chara\"+$tatie4+".bmp",%monster_x,%monster_y
mov %stuck,0
return



*status_printn1

cspl 596,597
if %status>0 lsp 596,":a;system\face_x0"+$statusnum+".bmp",34,534
if %kousoku>0 | %stuck=1 skip 2
csp 690
if %kousoku=0 skip 8
lsp 597,":a;system\face_x10.bmp",34,534
if %mon_labo_on<>1 lsp 700,":a;chara\"+$tatie4+".bmp",%monster_x,%monster_y:skip 6
mov $sub1,$tatie4
gosub *check_dir1
split $sub1,".",$sub3,$sub2
if $sub2="bmp" | $sub2="jpg" | $sub2="png" lsp 700,":a;"+$teigi1+$sub1,%monster_x,%monster_y:skip 2
if $sub2="" lsp 700,":a;chara\"+$tatie4+".bmp",%monster_x,%monster_y
mov %stuck,0
return



*elm_print

gosub *elm_printn
print 1
return



*elm_printn

if %windiconlock>0 skip 9
if %wind>4 lsp 592,":a;system\elm_wind3.bmp",5,436
if %wind=1 lsp 592,":a;system\elm_wind.bmp",5,436
if %wind=2 lsp 592,":a;system\elm_wind.bmp",5,436
if %wind=3 && %skill02<4 lsp 592,":a;system\elm_wind.bmp",5,436
if %wind=3 && %skill02>3 lsp 592,":a;system\elm_wind3.bmp",5,436
if %wind=4 && %before_action=56 lsp 592,":a;system\elm_wind2.bmp",5,436:skip 3
if %wind=4 && %skill02=0 lsp 592,":a;system\elm_wind2.bmp",5,436
if %wind=4 && %skill02>0 lsp 592,":a;system\elm_wind3.bmp",5,436
if %wind=0 mov %windiconlock,0:csp 592
if %earth>0 lsp 593,":a;system\elm_earth.bmp",5,461
if %earth=0 csp 593
if %aquaiconlock>0 skip 5
if %aqua>0 && %aqua<>4 lsp 594,":a;system\elm_aqua.bmp",5,486
if %aqua=4 && %before_action=60 lsp 594,":a;system\elm_aqua2.bmp",5,486:skip 3
if %aqua=4 && %skill04=0 lsp 594,":a;system\elm_aqua2.bmp",5,486
if %aqua=4 && %skill04>0 lsp 594,":a;system\elm_aqua.bmp",5,486
if %aqua=0 mov %aquaiconlock,0:csp 594
if %fire>0 lsp 595,":a;system\elm_fire.bmp",5,511
if %fire=0 csp 595
return



*enemy_elm_print

if %enemy_wind>0 lsp 586,":a;system\elm_wind.bmp",776,436
if %enemy_wind=0 csp 586
if %enemy_earth>0 lsp 587,":a;system\elm_earth.bmp",776,461
if %enemy_earth=0 csp 587
if %enemy_aqua>0 lsp 588,":a;system\elm_aqua.bmp",776,486
if %enemy_aqua=0 csp 588
if %enemy_fire>0 lsp 589,":a;system\elm_fire.bmp",776,511
if %enemy_fire=0 csp 589
print 1
return



*enemy_element_sel1

add %stack,1
gosub *enemy_elm_print
eng "The power of wind fades!":$sel6/
wait 1000
\
sub %stack,1
return



*enemy_element_sel2

add %stack,1
gosub *enemy_elm_print
eng "The power of earth fades!":$sel6/
wait 1000
\
sub %stack,1
return



*enemy_element_sel3

add %stack,1
gosub *enemy_elm_print
eng "The power of water fades!":$sel6/
wait 1000
\
sub %stack,1
return



*enemy_element_sel4

add %stack,1
gosub *enemy_elm_print
eng "The power of fire fades!":$sel6/
wait 1000
\
sub %stack,1
return



*enemylife

add %stack,1
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
mov %damage,%abairitu*%mylv*%damage_keigen/2000
if %enemy_earth+%enemy_aqua>0 mov %damage,%damage*%damage_keigen_el/100
rnd2 %damage,%damage*9/10,%damage*11/10
if %damage=0 mov %damage,1
itoa $damage,%damage
eng $ori_name+" deals "+$damage+" damage!"
if %damage_nobr=1 skip 3
$sel6/
skip 2
$sel6
if %skill_sub=2 skip 10
mov %enemylife,%enemylife-%damage
if %enemylife>%max_enemylife mov %enemylife,%max_enemylife
if %enemylife<0 mov %enemylife,0
if %enemylife=0 mov %gage,0 skip 3
mov %gage,%enemylife*100/%max_enemylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
print 10,500
if %damage_nobr>0 mov %damage_nobr,0:sub %stack,1:return
\
sub %stack,1
return



*enemylife2

add %stack,1
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
if %enemy_earth+%enemy_aqua>0 mov %damage,%damage*%damage_keigen_el/100
if %damage=0 mov %damage,1
itoa $damage,%damage
eng $ori_name+" deals "+$damage+" damage!"
if %damage_nobr=1 skip 3
$sel6/
skip 2
$sel6
mov %enemylife,%enemylife-%damage
if %enemylife>%max_enemylife mov %enemylife,%max_enemylife
if %enemylife<0 mov %enemylife,0
if %enemylife=0 mov %gage,0 skip 3
mov %gage,%enemylife*100/%max_enemylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
print 10,500
if %damage_nobr>0 mov %damage_nobr,0:sub %stack,1:return
\
sub %stack,1
return



*alice_enemylife2

add %stack,1
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
if %enemy_earth+%enemy_aqua>0 mov %damage,%damage*%damage_keigen_el/100
if %damage=0 mov %damage,1
itoa $damage,%damage
eng "Alice deals "+$damage+" damage!"
if %damage_nobr=1 skip 3
$sel6/
skip 2
$sel6
mov %enemylife,%enemylife-%damage
if %enemylife>%max_enemylife mov %enemylife,%max_enemylife
if %enemylife<0 mov %enemylife,0
if %enemylife=0 mov %gage,0 skip 3
mov %gage,%enemylife*100/%max_enemylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
print 10,500
if %damage_nobr>0 mov %damage_nobr,0:sub %stack,1:return
\
sub %stack,1
return



*tamamo_enemylife2

add %stack,1
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
itoa $damage,%damage
eng "Tamamo deals "+$damage+" damage!"
if %damage_nobr=1 skip 3
$sel6/
skip 2
$sel6
mov %enemylife,%enemylife-%damage
if %enemylife>%max_enemylife mov %enemylife,%max_enemylife
if %enemylife<0 mov %enemylife,0
if %enemylife=0 mov %gage,0 skip 3
mov %gage,%enemylife*100/%max_enemylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
print 10,500
if %damage_nobr>0 mov %damage_nobr,0:sub %stack,1:return
\
sub %stack,1
return



*sara_enemylife2

add %stack,1
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
itoa $damage,%damage
eng "Sara deals "+$damage+" damage!"
if %damage_nobr=1 skip 3
$sel6/
skip 2
$sel6
mov %enemylife,%enemylife-%damage
if %enemylife>%max_enemylife mov %enemylife,%max_enemylife
if %enemylife<0 mov %enemylife,0
if %enemylife=0 mov %gage,0 skip 3
mov %gage,%enemylife*100/%max_enemylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
print 10,500
if %damage_nobr>0 mov %damage_nobr,0:sub %stack,1:return
\
sub %stack,1
return



*enemylife_kaihuku

add %stack,1
dwave 2,"se\kaihuku.ogg"
if %damage=0 mov %damage,1
itoa $damage,%damage
eng $name2+" recovered "+$damage+" HP!"
$sel6/
mov %enemylife,%enemylife+%damage
if %enemylife>%max_enemylife mov %enemylife,%max_enemylife
if %enemylife=0 mov %gage,0 skip 3
mov %gage,%enemylife*100/%max_enemylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
print 10,500
\
sub %stack,1
return



*doppel_recover

mov %gage,1
mov $gagenum,"1"
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
mov %enemylife,1
print 10,500
return



*syoukan_effect

for %move=0 to 100 step 1
msp2 0,10,0,0,0,0,-3
print 1:wait 3
next
csp2 0:print 1
return



*skill_cutin

for %move=0 to 200 step 10
msp2 0,0,10,0,0,0,12
print 1:wait 5
next
for %move=0 to 200 step 10
msp2 1,0,10,0,0,0,12
print 1:wait 5
next
csp2 0:print 10,300
csp2 1:print 10,300
return



*kaihi

for %move=0 to 80 step 10
amsp 700,%monster_x+%move,%monster_y
print 1:wait 10
next
for %move=80 to 0 step -10
amsp 700,%monster_x+%move,%monster_y
print 1:wait 10
next
return



*counter

dwave 1,"se\counter.ogg"
lsp2 0,":s/70,70,0;#ff0000bntmsdqII",400,300,100,100,0,255
print 1
for %move=0 to 350 step 10
msp2 0,0,0,0,0,10
print 1
wait 1
next
wait 500
for %move=0 to 350 step 10
msp2 0,0,0,10,10,0
print 1
wait 1
next
csp2 0:print 10,500
return



*lvdrain

add %stack,1
mov %mylv,%mylv-5
if %mylv<1 mov %mylv,1
if %mylv=1 mov %count_mylv0,1
gosub *maxhp
gosub *maxmp
if %max_mylife<%mylife mov %mylife,%max_mylife
mov %gage,%mylife*100/%max_mylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 560,":a;system\gager"+$gagenum+".bmp",114,556
gosub *hp
gosub *mp
dwave 1,"se\lvdown.ogg"
eng $ori_name+"'s level decreases by five!"
$sel6
mov %enemylv,%enemylv+5
mov %count_drainlv,%count_drainlv+5
eng $name+"'s level increases by five!"
$sel6\
sub %stack,1
return



*face1

if %kousoku>0 return
if %kousan>0 gosub *face2n:print 10,500:return
if %max_mylife>%mylife*5 && %sel_kiki=1 gosub *face2n:print 10,500:return
gosub *face1n
print 10,500
return



*face1n

if %mon_labo_on<>1 lsp 700,":a;chara\"+$tatie1+".bmp",%monster_x,%monster_y:skip 6
mov $sub1,$tatie1
gosub *check_dir1
split $sub1,".",$sub3,$sub2
if $sub2="bmp" | $sub2="jpg" | $sub2="png" lsp 700,":a;"+$teigi1+$sub1,%monster_x,%monster_y:skip 2
if $sub2="" lsp 700,":a;chara\"+$sub1+".bmp",%monster_x,%monster_y
if %tekikazu<2 skip 7
if %mon_labo_on<>1 lsp 702,":a;chara\"+$tatie1b+".bmp",%monster_xb,%monster_yb:skip 6
mov $sub1,$tatie1b
gosub *check_dir1
split $sub1,".",$sub3,$sub2
if $sub2="bmp" | $sub2="jpg" | $sub2="png" lsp 702,":a;"+$teigi1+$sub1,%monster_xb,%monster_yb:skip 2
if $sub2="" lsp 702,":a;chara\"+$sub1+".bmp",%monster_xb,%monster_yb
if %tekikazu<3 skip 7
if %mon_labo_on<>1 lsp 704,":a;chara\"+$tatie1c+".bmp",%monster_xc,%monster_yc:skip 6
mov $sub1,$tatie1c
gosub *check_dir1
split $sub1,".",$sub3,$sub2
if $sub2="bmp" | $sub2="jpg" | $sub2="png" lsp 704,":a;"+$teigi1+$sub1,%monster_xc,%monster_yc:skip 2
if $sub2="" lsp 704,":a;chara\"+$sub1+".bmp",%monster_xc,%monster_yc
if %tekikazu<4 skip 7
if %mon_labo_on<>1 lsp 706,":a;chara\"+$tatie1d+".bmp",%monster_xd,%monster_yd:skip 6
mov $sub1,$tatie1d
gosub *check_dir1
split $sub1,".",$sub3,$sub2
if $sub2="bmp" | $sub2="jpg" | $sub2="png" lsp 706,":a;"+$teigi1+$sub1,%monster_xd,%monster_yd:skip 2
if $sub2="" lsp 706,":a;chara\"+$sub1+".bmp",%monster_xd,%monster_yd
return



*face2

if %kousoku>0 return
gosub *face2n
print 10,500
return



*face2n

if %mon_labo_on<>1 lsp 700,":a;chara\"+$tatie2+".bmp",%monster_x,%monster_y:skip 6
mov $sub1,$tatie2
gosub *check_dir1
split $sub1,".",$sub3,$sub2
if $sub2="bmp" | $sub2="jpg" | $sub2="png" lsp 700,":a;"+$teigi1+$sub1,%monster_x,%monster_y:skip 2
if $sub2="" lsp 700,":a;chara\"+$sub1+".bmp",%monster_x,%monster_y
if %tekikazu<2 skip 7
if %mon_labo_on<>1 lsp 702,":a;chara\"+$tatie2b+".bmp",%monster_xb,%monster_yb:skip 6
mov $sub1,$tatie2b
gosub *check_dir1
split $sub1,".",$sub3,$sub2
if $sub2="bmp" | $sub2="jpg" | $sub2="png" lsp 702,":a;"+$teigi1+$sub1,%monster_xb,%monster_yb:skip 2
if $sub2="" lsp 702,":a;chara\"+$sub1+".bmp",%monster_xb,%monster_yb
if %tekikazu<3 skip 7
if %mon_labo_on<>1 lsp 704,":a;chara\"+$tatie2c+".bmp",%monster_xc,%monster_yc:skip 6
mov $sub1,$tatie2c
gosub *check_dir1
split $sub1,".",$sub3,$sub2
if $sub2="bmp" | $sub2="jpg" | $sub2="png" lsp 704,":a;"+$teigi1+$sub1,%monster_xc,%monster_yc:skip 2
if $sub2="" lsp 704,":a;chara\"+$sub1+".bmp",%monster_xc,%monster_yc
if %tekikazu<4 skip 7
if %mon_labo_on<>1 lsp 706,":a;chara\"+$tatie2d+".bmp",%monster_xd,%monster_yd:skip 6
mov $sub1,$tatie2d
gosub *check_dir1
split $sub1,".",$sub3,$sub2
if $sub2="bmp" | $sub2="jpg" | $sub2="png" lsp 706,":a;"+$teigi1+$sub1,%monster_xd,%monster_yd:skip 2
if $sub2="" lsp 706,":a;chara\"+$sub1+".bmp",%monster_xd,%monster_yd
return



*face3

csp 690
gosub *face3n
print 10,500
return



*face3n

if %mon_labo_on<>1 lsp 700,":a;chara\"+$tatie3+".bmp",%monster_x,%monster_y:skip 6
mov $sub1,$tatie3
gosub *check_dir1
split $sub1,".",$sub3,$sub2
if $sub2="bmp" | $sub2="jpg" | $sub2="png" lsp 700,":a;"+$teigi1+$sub1,%monster_x,%monster_y:skip 2
if $sub2="" lsp 700,":a;chara\"+$sub1+".bmp",%monster_x,%monster_y
if %tekikazu<2 skip 7
if %mon_labo_on<>1 lsp 702,":a;chara\"+$tatie3b+".bmp",%monster_xb,%monster_yb:skip 6
mov $sub1,$tatie3b
gosub *check_dir1
split $sub1,".",$sub3,$sub2
if $sub2="bmp" | $sub2="jpg" | $sub2="png" lsp 702,":a;"+$teigi1+$sub1,%monster_xb,%monster_yb:skip 2
if $sub2="" lsp 702,":a;chara\"+$sub1+".bmp",%monster_xb,%monster_yb
if %tekikazu<3 skip 7
if %mon_labo_on<>1 lsp 704,":a;chara\"+$tatie3c+".bmp",%monster_xc,%monster_yc:skip 6
mov $sub1,$tatie3c
gosub *check_dir1
split $sub1,".",$sub3,$sub2
if $sub2="bmp" | $sub2="jpg" | $sub2="png" lsp 704,":a;"+$teigi1+$sub1,%monster_xc,%monster_yc:skip 2
if $sub2="" lsp 704,":a;chara\"+$sub1+".bmp",%monster_xc,%monster_yc
if %tekikazu<4 skip 7
if %mon_labo_on<>1 lsp 706,":a;chara\"+$tatie3d+".bmp",%monster_xd,%monster_yd:skip 6
mov $sub1,$tatie3d
gosub *check_dir1
split $sub1,".",$sub3,$sub2
if $sub2="bmp" | $sub2="jpg" | $sub2="png" lsp 706,":a;"+$teigi1+$sub1,%monster_xd,%monster_yd:skip 2
if $sub2="" lsp 706,":a;chara\"+$sub1+".bmp",%monster_xd,%monster_yd
return



*kousan_syori

mov %before_action,53
mov %kousan,1
if %zukanon<>3 mov %count_kousan,%count_kousan+1
if %aqua<>2 skip 4
if %mon_labo_on<>1 bg "BG\"+$haikei+".bmp",10,1500:skip 3
gosub *check_haikei:if $teigi2="skip" skip 2
bg $teigi3+$teigi1,10,1500
if %aqua=2 gosub *musicplay
mov %wind,0:mov %earth,0:mov %aqua,0
cspl 592,595:print 1
return



*onedari_syori

mov %before_action,54
mov %kousan,2
if %zukanon<>3 mov %count_onedari,%count_onedari+1
if %aqua<>2 skip 4
if %mon_labo_on<>1 bg "BG\"+$haikei+".bmp",10,1500:skip 3
gosub *check_haikei:if $teigi2="skip" skip 2
bg $teigi3+$teigi1,10,1500
if %aqua=2 gosub *musicplay
mov %wind,0:mov %earth,0:mov %aqua,0:mov %fire,0
cspl 592,595:print 1
mov %kousoku,0:gosub *status_print
cspl 691,697
gosub *face2n
print 10,500
return



*onedari_syori_k

mov %before_action,54
mov %kousan,2
if %zukanon<>3 mov %count_onedari,%count_onedari+1
if %aqua<>2 skip 4
if %mon_labo_on<>1 bg "BG\"+$haikei+".bmp",10,1500:skip 3
gosub *check_haikei:if $teigi2="skip" skip 2
bg $teigi3+$teigi1,10,1500
if %aqua=2 gosub *musicplay
mov %wind,0:mov %earth,0:mov %aqua,0:mov %fire,0
cspl 592,595:print 1
if %kousoku>0 return
cspl 690,699
gosub *face2n
print 10,500
return



*ikigoe

add %stack,1
rnd2 %ransu,1,4
if %ikigoe<2 && %ransu=1 mov $sel1,"Aaa... coming!"
if %ikigoe<2 && %ransu=2 mov $sel1,"Fuuaaaa!"
if %ikigoe<2 && %ransu=3 mov $sel1,"Aaaaaa!"
if %ikigoe<2 && %ransu=4 mov $sel1,"Uuuuuu!"
if %ikigoe=2 && %ransu=1 mov $sel1,"Ahhhhhh!"
if %ikigoe=2 && %ransu=2 mov $sel1,"Aaaa!"
if %ikigoe=2 && %ransu=3 mov $sel1,"No... I can't take it anymore!"
if %ikigoe=2 && %ransu=4 mov $sel1,"Ah... too good..."
if %ikigoe=3 && %ransu=1 mov $sel1,"Ahg! I'm going to come!"
if %ikigoe=3 && %ransu=2 mov $sel1,"Co.. coming!"
if %ikigoe=3 && %ransu=3 mov $sel1,"Uhg! N.. no more!"
if %ikigoe=3 && %ransu=4 mov $sel1,"I... can't hold it anymore!"
if %ikigoe=4 && %ransu=1 mov $sel1,"Urhg...!"
if %ikigoe=4 && %ransu=2 mov $sel1,"Ahhg..."
if %ikigoe=4 && %ransu=3 mov $sel1,"Ah... Ahh..."
if %ikigoe=4 && %ransu=4 mov $sel1,"Uhg... Ahh..."
if %ikigoe=4 skip 5
if %status=1 && %ransu=1 mov $sel1,"Fuu..."
if %status=1 && %ransu=2 mov $sel1,"Aaa..."
if %status=1 && %ransu=3 mov $sel1,"Haaa..."
if %status=1 && %ransu=4 mov $sel1,"Too... too good..."
if $lavel="tuika" && %ikigoe<2 getini $sel6,$mon_labo_mon_ini,"hero_sel","hero_lose1_1":if $sel6="" skip 6
if %ransu=1 && %ikigoe<2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_lose1_1"
if %ransu=2 && %ikigoe<2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_lose1_2"
if %ransu=3 && %ikigoe<2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_lose1_3"
if %ransu=4 && %ikigoe<2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_lose1_4"
if $sel1="" rnd2 %ransu,1,4:skip -4
if $lavel="tuika" && %ikigoe=2 getini $sel6,$mon_labo_mon_ini,"hero_sel","hero_lose2_1":if $sel6="" skip 6
if %ransu=1 && %ikigoe=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_lose2_1"
if %ransu=2 && %ikigoe=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_lose2_2"
if %ransu=3 && %ikigoe=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_lose2_3"
if %ransu=4 && %ikigoe=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_lose2_4"
if $sel1="" rnd2 %ransu,1,4:skip -4
if $lavel="tuika" && %ikigoe=3 getini $sel6,$mon_labo_mon_ini,"hero_sel","hero_lose3_1":if $sel6="" skip 6
if %ransu=1 && %ikigoe=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_lose3_1"
if %ransu=2 && %ikigoe=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_lose3_2"
if %ransu=3 && %ikigoe=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_lose3_3"
if %ransu=4 && %ikigoe=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_lose3_4"
if $sel1="" rnd2 %ransu,1,4:skip -4
if $lavel="tuika" && %ikigoe=4 getini $sel6,$mon_labo_mon_ini,"hero_sel","hero_lose4_1":if $sel6="" skip 6
if %ransu=1 && %ikigoe=4 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_lose4_1"
if %ransu=2 && %ikigoe=4 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_lose4_2"
if %ransu=3 && %ikigoe=4 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_lose4_3"
if %ransu=4 && %ikigoe=4 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_lose4_4"
if $sel1="" rnd2 %ransu,1,4:skip -4
if $lavel="tuika" && %ikigoe=4 skip 7
if %status=1 && $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_sel","hero_lose5_1":if $sel6="" skip 6
if %status=1 && %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_lose5_1"
if %status=1 && %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_lose5_1"
if %status=1 && %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_lose5_1"
if %status=1 && %ransu=4 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_lose5_1"
if $sel1="" rnd2 %ransu,1,4:skip -4
if %zukanon=3 && %ikigoe=0 skip 5
if %zukanon=3 && %ikigoe=5 skip 4
name $ori_name
eng $sel1:$sel6\
name ""
sub %stack,1
return



*victory

add %stack,1
mov %tekikazu,1
if %battle_auto=1 skipoff
wait 1000
mov %battle,0
if %aqua=2 bg "BG\"+$haikei+".bmp",10,1500
bgmonce "bgm\fanfale.ogg"
cspl 0,611
gosub *setwindow_01p
if %viclose=1 mov $sel1," was defeated!"
if %viclose=2 mov $sel1," was chased away!"
eng $name+$sel1
$sel6\
mov %count_ko,%count_ko+1
if %nanido=0 skip 6
if %mylife=%max_mylife && %nodamage=0 mov %count_hpfull,1
if %nanido=3 mov %count_hellvic,1
if %status=7 mov %count_vickonran,1
if %counter>0 mov %counterk,1
if %alice_skill=1 mov %alicek,1
if %zukanon=1 sub %stack,1:return *zukan_commonkaisou0
if %mylv_sin=%mylv skip 3
mov %mylv,%mylv_sin
>Upon defeating her, Luka's levels return!\
sub %stack,1
return



*victory_plural

add %stack,1
mov %tekikazu,1
if %battle_auto=1 skipoff
wait 1000
mov %battle,0
if %aqua=2 bg "BG\"+$haikei+".bmp",10,1500
bgmonce "bgm\fanfale.ogg"
cspl 0,611
gosub *setwindow_01p
if %viclose=1 mov $sel1," were defeated!"
if %viclose=2 mov $sel1," were chased away!"
eng $name+$sel1
$sel6\
mov %count_ko,%count_ko+1
if %nanido=0 skip 6
if %mylife=%max_mylife && %nodamage=0 mov %count_hpfull,1
if %nanido=3 mov %count_hellvic,1
if %status=7 mov %count_vickonran,1
if %counter>0 mov %counterk,1
if %alice_skill=1 mov %alicek,1
if %zukanon=1 sub %stack,1:return *zukan_commonkaisou0
if %mylv_sin=%mylv skip 3
mov %mylv,%mylv_sin
>Level up!\
sub %stack,1
return



*lose

add %stack,1
mov %tekikazu,1
if %battle_auto=1 skipoff
wait 1000
mov %battle,0
if %aqua=2 bg "BG\"+$haikei+".bmp",10,1500
cspl 0,611
gosub *setwindow_01p
if %viclose=1 mov $sel1,$ori_name+" was defeated..."
if %viclose=2 mov $sel1,$ori_name+" surrenders..."
eng $sel1:$sel6/
if %con_hbgm=0 && %music<>20 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %before_action<>55 && %turn<2 && %kousan=0 mov %count_onekill,1
if %enemy_wind>0 mov %count_enemy_wind,1
if %enemy_earth>0 mov %count_enemy_earth,1
if %enemy_aqua>0 mov %count_enemy_aqua,1
if %enemy_fire>0 mov %count_enemy_fire,1
\
mov %hsean,1
sub %stack,1
return



*lose2

add %stack,1
mov %tekikazu,1
if %battle_auto=1 skipoff
wait 1000
if %aqua=2 bg "BG\"+$haikei+".bmp",10,1500
mov %wind,0:mov %earth,0:mov %aqua,0:mov %fire,0
gosub *elm_print
mov %bougyo,0
if %viclose=1 mov $sel1,$ori_name+" was defeated..."
if %viclose=2 mov $sel1,$ori_name+" surrenders..."
eng $sel1:$sel6/
mov %sel_hphalf,1
mov %sel_kiki,1
mov %mylife,0
lsp 560,":a;system\gager0.bmp",114,556
gosub *hp
if %con_hbgm=0 && %music<>20 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %before_action<>55 && %turn<2 && %kousan=0 mov %count_onekill,1
if %enemy_wind>0 mov %count_enemy_wind,1
if %enemy_earth>0 mov %count_enemy_earth,1
if %enemy_aqua>0 mov %count_enemy_aqua,1
if %enemy_fire>0 mov %count_enemy_fire,1
mov %kousan,3
\
sub %stack,1
return



*lvup

saveoff
mov %exp,%exp+%getexp
mov %mylv_before,%mylv
gosub *lvup_check
itoa $getexp,%getexp
itoa $mylv,%mylv
mov $sel1,"Luka earned "+$getexp+" experience points!"
mov $sel2,"Luka is now level "+$mylv+"!"
notif %mylv=%mylv_before skip 3
eng $sel1:$sel6\
skip 4
eng $sel1:$sel6\
dwave 1,"se\lvup.ogg"
eng $sel2:$sel6\
wait 1000:return



*syasei1

gosub *vanish_sprite
textoff
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
return



*syasei2

dwave 1,"se\syasei.ogg"
vsp 2,0:print 10,400
vsp 2,1:print 10,300
vsp 2,0:print 10,300
vsp 2,1:print 10,100
csp 2:print 10,1000
texton
gosub *appear_sprite
print 1
return



*anten

cspl 3,7
gosub *clear_sprite
monocro #000000
print 10,3000
csp -1
monocro off
bg black,1
gosub *setwindow_01p
return



*hsean_cut

add %stack,1
if %zukanon>1 sub %stack,1:return
sub %stack,1
csel "Watch h-scene",*hsean_cut1,"Skip h-scene",*hsean_cut2



*hsean_cut1

return



*hsean_cut2

add %stack,1
if %zukanon>1 sub %stack,1:return
mov %hseanwave,0:hseanwave
gosub *anten
lsp 200,":s/50,50,0;#ff0000The H-Scene was skipped. ",100,200:print 10,500
>......\
sub %stack,1
return *badend



*hosyoku_cut

mov %hseanwave,0:hseanwave
gosub *anten
strsp 200,"The vore scene was skipped...",50,200,16,1,50,50,0,0,1,1,#FF0000:print 10,500
>And so ends Luka's adventure, slowly being digested by a monster...\
mov %zukanreturnoff,1
>....\
mov %zukanreturnoff,0
goto *badend



*hosyoku_cut2

mov %hseanwave,0:hseanwave
gosub *anten
strsp 200,"The vore scene was skipped...",50,200,16,1,50,50,0,0,1,1,#FF0000:print 10,500
>And so ends Luka's adventure, slowly being digested by a monster...\
mov %zukanreturnoff,1
>....\
mov %zukanreturnoff,0
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
goto *badend2



*savegloval1

mov %gloval1_mylv,%mylv
mov %gloval1_exp,%exp
mov %gloval1_ivent01,%ivent01
mov %gloval1_ivent02,%ivent02
mov %gloval1_ivent03,%ivent03
mov %gloval1_ivent04,%ivent04
mov %gloval1_ivent05,%ivent05
mov %gloval1_ivent06,%ivent06
mov %gloval1_ivent07,%ivent07
mov %gloval1_ivent08,%ivent08
mov %gloval1_ivent09,%ivent09
mov %gloval1_ivent10,%ivent10
mov %gloval1_ivent11,%ivent11
mov %gloval1_ivent12,%ivent12
mov %gloval1_ivent13,%ivent13
mov %gloval1_ivent14,%ivent14
mov %gloval1_ivent15,%ivent15
mov %gloval1_ivent16,%ivent16
mov %gloval1_ivent17,%ivent17
mov %gloval1_ivent18,%ivent18
mov %gloval1_ivent19,%ivent19
mov %gloval1_ivent20,%ivent20
mov %gloval1_check01,%check01
mov %gloval1_check02,%check02
mov %gloval1_check03,%check03
mov %gloval1_check04,%check04
mov %gloval1_check05,%check05
mov %gloval1_check06,%check06
mov %gloval1_check07,%check07
mov %gloval1_check08,%check08
mov %gloval1_check09,%check09
mov %gloval1_check10,%check10
mov %gloval1_check11,%check11
mov %gloval1_check12,%check12
mov %gloval1_check13,%check13
mov %gloval1_check14,%check14
mov %gloval1_check15,%check15
mov %gloval1_check16,%check16
mov %gloval1_check17,%check17
mov %gloval1_check18,%check18
mov %gloval1_check19,%check19
mov %gloval1_check20,%check20
mov %gloval1_skill01,%skill01
mov %gloval1_skill02,%skill02
mov %gloval1_skill03,%skill03
mov %gloval1_skill04,%skill04
mov %gloval1_skill05,%skill05
mov %gloval1_skill06,%skill06
mov %gloval1_skill07,%skill07
mov %gloval1_skill08,%skill08
mov %gloval1_skill09,%skill09
mov %gloval1_skill10,%skill10
mov %gloval1_item01,%item01
mov %gloval1_item02,%item02
mov %gloval1_item03,%item03
mov %gloval1_item04,%item04
mov %gloval1_item05,%item05
mov %gloval1_item06,%item06
mov %gloval1_item07,%item07
mov %gloval1_item08,%item08
mov %gloval1_item09,%item09
mov %gloval1_item10,%item10
mov %gloval1_item11,%item11
mov %gloval1_item12,%item12
mov %gloval1_item13,%item13
mov %gloval1_item14,%item14
mov %gloval1_item15,%item15
mov %gloval1_item16,%item16
mov %gloval1_item17,%item17
mov %gloval1_item18,%item18
mov %gloval1_item19,%item19
mov %gloval1_item20,%item20
mov %gloval1_item21,%item21
mov %gloval1_item22,%item22
mov %gloval1_item23,%item23
mov %gloval1_item24,%item24
mov %gloval1_item25,%item25
mov %gloval1_item26,%item26
mov %gloval1_item27,%item27
mov %gloval1_item28,%item28
mov %gloval1_item29,%item29
mov %gloval1_item30,%item30
mov %gloval1_nanido,%nanido
return



*genzaiti_bg

if %genzaiti=1 bg "bg\bg019.bmp",1
if %genzaiti=3 bg "bg\bg011.bmp",1
if %genzaiti=4 bg "bg\bg004.bmp",1
if %genzaiti=5 bg "bg\bg041.bmp",1
if %genzaiti=6 bg "bg\bg039.bmp",1
if %genzaiti=7 bg "bg\bg062.bmp",1
if %genzaiti=8 bg "bg\bg020.bmp",1
if %genzaiti=9 bg "bg\bg019.bmp",1
if %genzaiti=10 bg "bg\bg086.bmp",1
if %genzaiti=11 bg "bg\bg095.bmp",1
if %genzaiti=12 bg "bg\bg041.bmp",1
if %genzaiti=13 bg "bg\bg041.bmp",1
if %genzaiti=14 bg "bg\bg041.bmp",1
if %genzaiti=15 bg "bg\bg021.bmp",1
if %genzaiti=16 bg "bg\bg142.bmp",1
if %genzaiti=17 bg "bg\bg142.bmp",1
if %genzaiti=18 bg "bg\bg142.bmp",1
if %genzaiti=19 bg "bg\bg099.bmp",1
gosub *setwindow_01p
return



*reset_name

if %hit=0 skip 4
mov $name,$name3
mov $name2,$name
mov %hit,0
return



*doppel_common_main
*common_main

gosub *reset_name
if %kousoku>0 skip 5
if %enemy_wind>0 mov %enemy_wind,%enemy_wind-1:if %enemy_wind=0 gosub *enemy_element_sel1
if %enemy_earth>0 mov %enemy_earth,%enemy_earth-1:if %enemy_earth=0 gosub *enemy_element_sel2
if %enemy_aqua>0 mov %enemy_aqua,%enemy_aqua-1:if %enemy_aqua=0 gosub *enemy_element_sel3
if %enemy_fire>0 mov %enemy_fire,%enemy_fire-1:if %enemy_fire=0 gosub *enemy_element_sel4
mov %battle,1
mov %turn,%turn+1
mov %before_action,0
mov %owaza_count1a,%owaza_count1a+1
mov %owaza_count1b,%owaza_count1b+1
mov %owaza_count1c,%owaza_count1c+1
mov %owaza_count1d,%owaza_count1d+1
if %nanido=3 mov %owaza_count1a,20
if %nanido=3 mov %owaza_count1b,20
if %nanido=3 mov %owaza_count1c,20
if %nanido=3 mov %owaza_count1d,20
mov %owaza_count2a,%owaza_count2a+1
mov %owaza_count2b,%owaza_count2b+1
mov %owaza_count2c,%owaza_count2c+1
mov %owaza_count2d,%owaza_count2d+1
if %nanido=3 mov %owaza_count2a,20
if %nanido=3 mov %owaza_count2b,20
if %nanido=3 mov %owaza_count2c,20
if %nanido=3 mov %owaza_count2d,20
mov %owaza_count3a,%owaza_count3a+1
mov %owaza_count3b,%owaza_count3b+1
mov %owaza_count3c,%owaza_count3c+1
mov %owaza_count3d,%owaza_count3d+1
mov %owaza_count3e,%owaza_count3e+1
mov %owaza_count3f,%owaza_count3f+1
mov %owaza_count3g,%owaza_count3g+1
mov %owaza_count3h,%owaza_count3h+1
if %nanido=3 mov %owaza_count3a,20
if %nanido=3 mov %owaza_count3b,20
if %nanido=3 mov %owaza_count3c,20
if %nanido=3 mov %owaza_count3d,20
if %nanido=3 mov %owaza_count3e,20
if %nanido=3 mov %owaza_count3f,20
if %nanido=3 mov %owaza_count3g,20
mov %tuika_owaza_count1a,%tuika_owaza_count1a+1
mov %tuika_owaza_count1b,%tuika_owaza_count1b+1
mov %tuika_owaza_count1c,%tuika_owaza_count1c+1
mov %tuika_owaza_count1d,%tuika_owaza_count1d+1
mov %tuika_owaza_count1e,%tuika_owaza_count1e+1
mov %tuika_owaza_count1f,%tuika_owaza_count1f+1
mov %tuika_owaza_count1g,%tuika_owaza_count1g+1
mov %tuika_owaza_count1h,%tuika_owaza_count1h+1
mov %tuika_owaza_count2a,%tuika_owaza_count2a+1
mov %tuika_owaza_count2b,%tuika_owaza_count2b+1
mov %tuika_owaza_count2c,%tuika_owaza_count2c+1
mov %tuika_owaza_count2d,%tuika_owaza_count2d+1
mov %tuika_owaza_count3a,%tuika_owaza_count3a+1
mov %tuika_owaza_count3b,%tuika_owaza_count3b+1
mov %tuika_owaza_count3c,%tuika_owaza_count3c+1
mov %tuika_owaza_count3d,%tuika_owaza_count3d+1
mov %tuika_owaza_count4a,%tuika_owaza_count4a+1
if %query_new=1 && %kousoku>0 skip 2
mov %tuika_owaza_count4b,%tuika_owaza_count4b+1
mov %bougyo,0
mov %daten,0
mov %skill_sub,0
mov %skill_num,0
notif %max_mylife=%mylife mov %nodamage,1
if %max_mylife>%mylife*5 && %kousoku=0 && %sel_kiki=1 gosub *face2
if %kousoku>0 skip 5
mov %wind_turn,%wind_turn-1
if %wind>0 && %wind_turn<0 gosub *element_sel
mov %earth_turn,%earth_turn-1
if %earth>0 && %earth_turn<0 gosub *element_sel
if %aqua=1 mov %aqua_turn,%aqua_turn-1
if %aqua=1 && %aqua_turn<0 gosub *element_sel
if %aqua=3 mov %aqua_turn,%aqua_turn-1
if %aqua=3 && %aqua_turn<0 gosub *element_sel
if %aqua=4 mov %aqua_turn,%aqua_turn-1
if %aqua=4 && %aqua_turn<0 gosub *element_sel
if %aqua=5 mov %aqua_turn,%aqua_turn-1
if %aqua=5 && %aqua_turn<0 gosub *element_sel
if %aqua=2 && %aqua_end=1 gosub *aqua_sel
if %aqua=2 mov %mp,%mp-1:gosub *mp
if %aqua=2 && %mp<0 gosub *aqua_sel
mov %aqua_end,0
if %kousoku>0 skip 3
mov %fire_turn,%fire_turn-1
if %fire>0 && %fire_turn<0 gosub *element_sel
if %status=0 skip 18
if %status<>8 mov %status_turn,%status_turn-1
if %status=1 && %status_turn>-1 goto *status_sel1
if %status=1 && %status_turn<0 goto *status_sel2
if %status=2 && %status_turn>-1 goto *status_sel1
if %status=2 && %status_turn<0 goto *status_sel2
if %status=4 && %status_turn>-1 goto *status_sel1
if %status=4 && %status_turn<0 goto *status_sel2
if %status=5 && %status_turn>-1 goto *status_sel1
if %status=5 && %status_turn<0 goto *status_sel2
if %status=6 && %status_turn>-1 goto *status_sel3
if %status=6 && %status_turn<0 goto *status_sel5
if %status=7 && %status_turn>-1 goto *status_sel1
if %status=7 && %status_turn<0 goto *status_sel2
if %status=8 && %status_turn>0 goto *status_sel4
if %status=8 && %status_turn<1 goto *status_sel5
if %status=9 && %status_turn>-1 goto *status_sel6
if %status=9 && %status_turn<0 goto *status_sel2
if %kadora=0 skip 8
if %kadora_damage=0 && %kousoku=0 && %status=0 skip 3
mov %kadora_damage,0:mov %kadora,0
>The power infused in Luka's sword vanishes!\
if %kadora=1 goto *skill15a
if %kadora=2 goto *skill15b
if %kadora=3 goto *skill15c
if %kadora=4 goto *skill15dcheck
if %kousan>0 goto "*"+$lavel+"_a"
goto "*"+$lavel+"_main"



*element_sel

add %stack,1
if %wind>0 && %wind<4 && %wind_turn<0 mov %wind,0:mov $sel1,"The power of wind fades!"
if %wind=4 && %wind_turn<0 mov %wind,0:mov $sel1,"The dance of the fallen angel ceases!"
if %earth>0 && %earth_turn<0 mov %earth,0:mov $sel1,"The power of earth fades!"
if %aqua>0 && %aqua_turn<0 && %skill04>0 mov %aqua,0:mov $sel1,"The power of water fades!"
if %aqua>0 && %aqua_turn<0 && %skill04=0 mov %aqua,0:mov $sel1,"The serene state fades!"
if %fire=1 && %fire_turn<0 mov %fire,0:mov $sel1,"The power of fire fades!"
if %fire=2 && %fire_turn<0 mov %fire,0:mov $sel1,"The power of fire fades!":mov %mp,0:gosub *mp
if %fire=3 && %fire_turn<0 mov %fire,0:mov $sel1,"The power of fire fades!"
gosub *elm_print
eng $sel1
$sel6/
wait 1000
\
sub %stack,1
return



*aqua_sel

add %stack,1
if %mp<0 mov %mp,0
bgmstop
if %mon_labo_on<>1 bg "BG\"+$haikei+".bmp",10,1500:skip 3
gosub *check_haikei:if $teigi2="skip" skip 2
bg $teigi3+$teigi1,10,1500
mov %aqua,0
mov %aqua_end,0
gosub *elm_print
gosub *musicplay
eng "The power of Water fades!"
$sel6/
wait 1000
\
sub %stack,1
return



*status_sel1

if %status=1 mov $sel1,$ori_name+" is stuck in a trance..."
if %status=2 mov $sel1,$ori_name+"'s body is paralyzed..."
if %status=4 mov $sel1,$ori_name+" can't resist the monster's words..."
if %status=5 mov $sel1,$ori_name+" is mesmerized..."
if %status=7 mov $sel1,$ori_name+" is confused..."
if $status_mid<>"" && $status_mid<>" " mov $sel1,$status_mid:gosub *line_print:skip 2
if $status_mid<>" " eng $sel1:$sel6\
if %status_turn>97 mov %status_turn,100
if %status=5 goto "*"+$lavel+"_yuwaku_a"
if %status=7 goto "*"+$lavel+"_main"
goto "*"+$lavel+"_a"



*status_sel2

if %kousan>0 goto *status_sel1
if %nanido=3 rnd2 %ransu,1,2:if %ransu=2 goto *status_sel1
if %status=1 mov $sel1,$ori_name+" broke free of the trance!"
if %status=2 mov $sel1,$ori_name+" shook off the paralysis!"
if %status=4 mov $sel1,$ori_name+" regains his senses!"
if %status=5 mov $sel1,$ori_name+" broke the mesmerization!"
if %status=7 mov $sel1,$ori_name+" is no longer confused!"
if %status=9 mov $sel1,$ori_name+" is no longer poisoned!":mov %poison,0
mov %status,0:gosub *status_print
if $status_end<>"" && $status_end<>" " mov $sel1,$status_end:gosub *line_print:skip 2
if $status_end<>" " eng $sel1:$sel6\
if $lavel="tuika" mov $status_mid,"":mov $status_end,"":gosub *tuika_count_reset3:skip 5
if %owaza_num2<2 mov %owaza_count2a,0
if %owaza_num2=2 mov %owaza_count2b,0
if %owaza_num2=3 mov %owaza_count2c,0
if %owaza_num2=4 mov %owaza_count2d,0
mov %owaza_num2,0
goto "*"+$lavel+"_main"



*status_sel3

itoa $sel1,%status_turn+1
if %status_turn>0 eng $sel1+" turns until complete petrification!"
if %status_turn=0 eng "Only one turn until complete petrification!"
$sel6\
if %kousan>0 goto "*"+$lavel+"_a"
goto "*"+$lavel+"_main"



*status_sel4

mov $sel1,"A part of "+$ori_name+"'s body is petrified..."
eng $sel1:$sel6\
if %kousan=0 goto "*"+$lavel+"_main"
if %kousan>0 goto "*"+$lavel+"_a"



*status_sel5

if %status=8 sub %status_turn,1
if %status=6 && %status_turn=-1 mov $sel1,$ori_name+"'s body has turned completely to stone!"
if %status=6 && %status_turn<-1 mov $sel1,$ori_name+"'s body has turned to stone..."
if %status=8 && %status_turn=-1 mov $sel1,$ori_name+"'s body is petrified!"
if %status=8 && %status_turn<-1 mov $sel1,$ori_name+" has been petrified..."
if %status_turn=-1 && $status_end<>"" && $status_end<>" " mov $sel1,$status_end:gosub *line_print:skip 4
if %status_turn=-1 && $status_end<>" " eng $sel1:$sel6\
if %status_turn<-1 && $status_mid<>"" && $status_mid<>" " mov $sel1,$status_mid:gosub *line_print:skip 2
if %status_turn<-1 && $status_mid<>" " eng $sel1:$sel6\
if %status_turn=-1 mov %sel_hphalf,1:mov %sel_kiki,1
if %status=8 skip 2
if %status_turn=-1 gosub *status_print
if %status_turn<-1 mov %status_turn,-2
goto "*"+$lavel+"_a"



*status_sel6

mov $sel1,$ori_name+" is poisoned..."
if $status_mid<>"" && $status_mid<>" " mov $sel1,$status_mid:gosub *line_print:skip 2
if $status_mid<>" " eng $sel1:$sel6
if %status_turn>97 mov %status_turn,100
if %poison=0 mov %poison,%max_mylife/20
rnd2 %damage,%poison*9/10,%poison*11/10
dwave 2,"se\damage.ogg"
quakex 2,440
itoa $damage,%damage
eng $ori_name+" takes "+$damage+" damage!":$sel6/
mov %mylife,%mylife-%damage
if %mylife>%max_mylife mov %mylife,%max_mylife
if %mylife<0 mov %mylife,0
if %mylife=0 mov %gage,0 skip 3
mov %gage,%mylife*100/%max_mylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 560,":a;system\gager"+$gagenum+".bmp",114,556
gosub *hp
print 10,500
\
if $lavel="tuika" skip 3
if %mylife=0 goto "*"+$lavel+"_hpoison"
goto "*"+$lavel+"_poison"
mov %message_mode,0
getini $sub1,$mon_labo_mon_ini,"poison","skill_message_mode"
if $sub1="" skip 2
skip 2
getini $sub1,$mon_labo_mon_ini,$poison_skill,"skill_message_mode":if $sub1="" skip 2
split $sub1,",",$sub1,$sub2:if $sub1="1" | $sub1="2" | $sub1="3" atoi %message_mode,$sub1
if %message_mode=0 | %message_mode=2 gosub *tuika_half
if %mylife>0 goto *tuika_main
getini $sub1,$mon_labo_mon_ini,"poison","skill_rukalose":if $sub1="" mov $skill_tag,$poison_skill:goto *tuika_h
mov $skill_tag,"poison"
goto *tuika_h



*line_print

add %stack,1
if $lavel="tuika" gosub *check_custom_dialog:if $sel2="custom" gosub *custom_dialog_start:sub %stack,1:return
len %name_count,$sel1
mid $sel2,$sel1,%name_count-1,1
if $sel2=" " mid $sel1,$sel1,0,%name_count-1:skip -2
if $sel2<>"@" :skip 4
mid $sel1,$sel1,0,%name_count-1
eng $sel1:$sel6@
sub %stack,1:return
if $sel2<>"~" skip 5
mid $sel1,$sel1,0,%name_count-1
eng $sel1:$sel6/
>
sub %stack,1:return
if $sel2="\" mid $sel1,$sel1,0,%name_count-1
eng $sel1:$sel6\
sub %stack,1
return



*skill15dcheck

if $lavel<>"tuika" | %hanyo3=0 goto *skill15d
itoa $sub2,%hanyo3:mov $sub2,"customskill"+$sub2
getini $sel6,$mon_labo_mon_ini,$sub2,"skill15d"
if $sel6="" | $sel6=" " goto *skill15d
mov %mon_labo_mon_ini_ky,0
mov $mon_labo_mon_ini_sc,$sel6
gosub *custom_dialog
goto *common_attack_end



*common_attack

mov %nikaime,0
if %aqua>1 gosub *attack_aqua:goto *common_attack_end
if %wind=3 && %earth=0 rnd2 %ransu,1,100
if %wind=3 && %earth=0 && %ransu=1 gosub *attack_kaisin:mov %nikaime,1:gosub *attack_kaisin:mov %nikaime,0:goto *common_attack_end
if %wind=3 && %earth=0 && %ransu<11 gosub *attack:mov %nikaime,1:gosub *attack_kaisin:mov %nikaime,0:goto *common_attack_end
if %wind=3 && %earth=0 && %ransu<20 gosub *attack_kaisin:mov %nikaime,1:gosub *attack:mov %nikaime,0:goto *common_attack_end
if %wind=3 && %earth=0 gosub *attack:mov %nikaime,1:gosub *attack:mov %nikaime,0:goto *common_attack_end
if %wind=3 && %earth=2 rnd2 %ransu,1,25
if %wind=3 && %earth=2 && %ransu=1 gosub *attack_kaisin:mov %nikaime,1:gosub *attack_kaisin:mov %nikaime,0:goto *common_attack_end
if %wind=3 && %earth=2 && %ransu<6 gosub *attack:mov %nikaime,1:gosub *attack_kaisin:mov %nikaime,0:goto *common_attack_end
if %wind=3 && %earth=2 && %ransu<11 gosub *attack_kaisin:mov %nikaime,1:gosub *attack:mov %nikaime,0:goto *common_attack_end
if %wind=3 && %earth=2 gosub *attack:mov %nikaime,1:gosub *attack:mov %nikaime,0:goto *common_attack_end
if %wind=3 && %earth=3 gosub *attack_kaisin:mov %nikaime,1:gosub *attack_kaisin:mov %nikaime,0:goto *common_attack_end
rnd2 %ransu,1,100
if %ransu>%kaihi && %wind<2 gosub *attack_miss:goto *common_attack_end
if %ransu>%kaihi && %wind=4 && %skill02=0 gosub *attack_miss:goto *common_attack_end
if %ransu>%kaihi_el && %enemy_wind>0 gosub *attack_miss:goto *common_attack_end
if %earth=3 gosub *attack_kaisin:goto *common_attack_end
rnd2 %ransu,1,10
if %ransu=9 && %earth=2 gosub *attack_kaisin:goto *common_attack_end
if %ransu>7 && %max_mylife<%mylife*5 gosub *attack_kaisin:goto *common_attack_end
if %ransu=10 gosub *attack_kaisin:goto *common_attack_end
gosub *attack
goto *common_attack_end



*common_attack1

add %stack,1
mov %nikaime,0
goto *common_attack_a



*common_attack2

add %stack,1
mov %nikaime,1
goto *common_attack_a



*common_attack_a

if %aqua>1 gosub *attack_aqua:mov %nikaime,0:sub %stack,1:return
if %skill_sub=1 skip 16
if %wind=3 && %earth=0 && %before_action=0 rnd2 %ransu,1,100
if %wind=3 && %earth=0 && %before_action=1 rnd2 %ransu,11,100
if %wind=3 && %earth=0 && %before_action=2 rnd2 %ransu,1,10
if %wind=3 && %earth=0 && %ransu=1 gosub *attack_kaisin:mov %nikaime,1:gosub *attack_kaisin:mov %nikaime,0:sub %stack,1:return
if %wind=3 && %earth=0 && %ransu<11 gosub *attack_kaisin:mov %nikaime,1:gosub *attack:mov %nikaime,0:sub %stack,1:return
if %wind=3 && %earth=0 && %ransu<20 gosub *attack:mov %nikaime,1:gosub *attack_kaisin:mov %nikaime,0:sub %stack,1:return
if %wind=3 && %earth=0 gosub *attack:mov %nikaime,1:gosub *attack:mov %nikaime,0:sub %stack,1:return
if %wind=3 && %earth=2 && %before_action=0 rnd2 %ransu,1,25
if %wind=3 && %earth=2 && %before_action=1 rnd2 %ransu,6,25
if %wind=3 && %earth=2 && %before_action=2 rnd2 %ransu,1,5
if %wind=3 && %earth=2 && %ransu=1 gosub *attack_kaisin:mov %nikaime,1:gosub *attack_kaisin:mov %nikaime,0:sub %stack,1:return
if %wind=3 && %earth=2 && %ransu<6 gosub *attack_kaisin:mov %nikaime,1:gosub *attack:mov %nikaime,0:sub %stack,1:return
if %wind=3 && %earth=2 && %ransu<10 gosub *attack:mov %nikaime,1:gosub *attack_kaisin:mov %nikaime,0:sub %stack,1:return
if %wind=3 && %earth=2 gosub *attack:mov %nikaime,1:gosub *attack:mov %nikaime,0:sub %stack,1:return
if %wind=3 && %earth=3 gosub *attack_kaisin:mov %nikaime,1:gosub *attack_kaisin:mov %nikaime,0:sub %stack,1:return
if %before_action=1 gosub *attack:mov %nikaime,0:sub %stack,1:return
if %before_action=2 gosub *attack_kaisin:mov %nikaime,0:sub %stack,1:return
if %before_action=3 gosub *attack_miss:mov %nikaime,0:sub %stack,1:return
if %before_action=-3 skip 4
rnd2 %ransu,1,100
if %ransu>%kaihi && %wind<2 gosub *attack_miss:mov %nikaime,0:sub %stack,1:return
if %ransu>%kaihi && %wind=4 && %skill02=0 gosub *attack_miss:mov %nikaime,0:sub %stack,1:return
if %ransu>%kaihi_el && %enemy_wind>0 gosub *attack_miss:mov %nikaime,0:sub %stack,1:return
if %earth=3 gosub *attack_kaisin:mov %nikaime,0:sub %stack,1:return
rnd2 %ransu,1,10
if %ransu=9 && %earth=2 gosub *attack_kaisin:mov %nikaime,0:sub %stack,1:return
if %ransu>7 && %max_mylife<%mylife*5 gosub *attack_kaisin:mov %nikaime,0:sub %stack,1:return
if %ransu=10 gosub *attack_kaisin:mov %nikaime,0:sub %stack,1:return
gosub *attack
mov %nikaime,0
sub %stack,1
return



*attack

add %stack,1
mov %before_action,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Haa!"
if %ransu=2 mov $sel1,"Ora!"
if %ransu=3 mov $sel1,"Take this!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_sel","hero_attack1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_attack1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_attack2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_attack3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 4
name $ori_name
eng $sel1:$sel6\
name ""
eng $ori_name+" attacks!"
$sel6
if %nikaime=0 gosub *mp_kaihuku:gosub *mp
if %skill_sub=1 mov %skill_sub,0:sub %stack,1:return
dwave 1,"se\slash.ogg"
if %fire=0 mov %abairitu,100+%mylv
if %fire=1 mov %abairitu,120+%mylv*6/5
if %fire=2 mov %abairitu,170+%mylv*17/10
if %fire=3 mov %abairitu,200+%mylv*2
gosub *enemylife
sub %stack,1
return



*attack_kaisin

add %stack,1
mov %before_action,2
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"An opening!"
if %ransu=2 mov $sel1,"SUPER ATTACCCK!"
if %ransu=3 mov $sel1,"I got you now!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_sel","hero_kaisin1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_kaisin1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_kaisin2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_kaisin3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 4
name $ori_name
eng $sel1:$sel6\
name ""
>Critical hit!
if %nikaime=0 gosub *mp_kaihuku:gosub *mp
if %skill_sub=1 mov %skill_sub,0:sub %stack,1:return
dwave 1,"se\slash3.ogg"
if %fire=0 mov %abairitu,170+%mylv*17/10
if %fire=1 mov %abairitu,200+%mylv*2
if %fire=2 mov %abairitu,250+%mylv*5/2
if %fire=3 mov %abairitu,300+%mylv*3
gosub *enemylife
sub %stack,1
return



*attack_miss

add %stack,1
mov %before_action,3
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ack!"
if %ransu=2 mov $sel1,"Oof!"
if %ransu=3 mov $sel1,"Crap!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_sel","hero_miss1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_miss1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_miss2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_miss3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 4
name $ori_name
eng $sel1:$sel6\
name ""
eng $ori_name+" attacks!"
$sel6
if %nikaime=0 gosub *mp_kaihuku:gosub *mp
if %skill_sub=1 mov %skill_sub,0:sub %stack,1:return
dwave 1,"se\miss.ogg"
>Miss!\
sub %stack,1
return



*attack_aqua

add %stack,1
mov %before_action,4
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,".............."
if %ransu=2 mov $sel1,"I see it!"
if %ransu=3 mov $sel1,"Entrust my sword to the flow...!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_sel","hero_stblade1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_stblade1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_stblade2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_stblade3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 4
name $ori_name
eng $sel1:$sel6\
name ""
skillname "Blade of Still Water"
eng $ori_name+"'s sword flashes, following the flow toward its opponent!"
$sel6
if %aqua>2 && %nikaime=0 gosub *mp_kaihuku:gosub *mp
if %skill_sub=1 mov %skill_sub,0:sub %stack,1:return
dwave 1,"se\slash4.ogg"
mov %abairitu,140+%mylv*7/5
if %earth=3 mov %abairitu,%abairitu*3/2
if %fire=3 mov %abairitu,%abairitu*3/2
gosub *enemylife
if %wind<>3 skillname "":sub %stack,1:return
eng "Like a bolt of lightning, "+$ori_name+"'s sword flashes back to its sheath!"
$sel6
dwave 1,"se\slash4.ogg"
mov %abairitu,140+%mylv*7/5
if %earth=3 mov %abairitu,%abairitu*3/2
if %fire=3 mov %abairitu,%abairitu*3/2
gosub *enemylife
skillname ""
sub %stack,1
return



*common_attack_end

if %enemylife=0 goto "*"+$lavel+"_v"
if %before_action=3:skip 3
if %before_action=59:skip 2
if %counter>0 gosub *counter:gosub "*"+$lavel+"_counter":goto *common_main
goto "*"+$lavel+"_a"



*common_bougyo

if %player=0 mov $ori_name,"Luka"
if %player=1 mov $ori_name,"Alice"
if %player=2 mov $ori_name,"Alma Elma"
if %player=3 mov $ori_name,"Erubetie"
if %player=4 mov $ori_name,"Tamamo"
if %player=5 mov $ori_name,"Granberia"
mov %before_action,51
mov %bougyo,1
eng $ori_name+" takes a defensive stance!"
$sel6\
goto "*"+$lavel+"_a"



*common_nasugamama

if %player=0 mov $ori_name,"Luka"
if %player=1 mov $ori_name,"Alice"
if %player=2 mov $ori_name,"Alma Elma"
if %player=3 mov $ori_name,"Erubetie"
if %player=4 mov $ori_name,"Tamamo"
if %player=5 mov $ori_name,"Granberia"
mov %before_action,52
eng $ori_name+" remains motionless."
$sel6\
goto "*"+$lavel+"_a"



*common_mogaku

mov %before_action,7
rnd2 %ransu,1,3
if %cmd1=11 && %ransu=1 mov $sel1,"Uhg..."
if %cmd1=11 && %ransu=2 mov $sel1,"Grr... Damn it!"
if %cmd1=11 && %ransu=3 mov $sel1,"Quit it!"
if %cmd1=12 && %ransu=1 mov $sel1,"Guh..."
if %cmd1=12 && %ransu=2 mov $sel1,"Ge... get off!"
if %cmd1=12 && %ransu=3 mov $sel1,"Grr... Let go!"
if %cmd1=11 && $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_sel","hero_mogaku_hit1":if $sel6="" skip 5
if %cmd1=11 && %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_mogaku_hit1"
if %cmd1=11 && %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_mogaku_hit2"
if %cmd1=11 && %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_mogaku_hit3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %cmd1=12 && $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_sel","hero_mogaku1":if $sel6="" skip 5
if %cmd1=12 && %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_mogaku1"
if %cmd1=12 && %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_mogaku2"
if %cmd1=12 && %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_mogaku3"
if $sel1="" rnd2 %ransu,1,3:skip -3
name $ori_name
eng $sel1:$sel6\
name ""
if %cmd1=11 mov $sel1,$ori_name+" tries to attack!"
if %cmd1=12 mov $sel1,$ori_name+" starts to struggle!"
eng $sel1:$sel6/
if %cmd1=11 gosub *mp_kaihuku:gosub *mp
if %genmogaku=99 skip 2
if %cmd1=12 mov %genmogaku,%genmogaku-1:if %genmogaku<0 mov %genmogaku,0
if %cmd1=11 mov $sel1,$mogaku_anno3
if %cmd1=12 mov $sel1,$mogaku_anno1
if $sel1="" | $sel1=" " skip 6
>
if $lavel="tuika" gosub *check_custom_dialog
if $lavel="tuika" && $sel2="custom" gosub *custom_dialog_start:skip 2
eng $sel1:$sel6\
skip 2
\
rnd2 %ransu,1,5
if %ransu=1 mov $sel1,$mogaku_sel1
if %ransu=2 mov $sel1,$mogaku_sel2
if %ransu=3 mov $sel1,$mogaku_sel3
if %ransu=4 mov $sel1,$mogaku_sel4
if %ransu=5 mov $sel1,$mogaku_sel5
if $sel1="" | $sel1=" " skip 5
if $lavel="tuika" gosub *check_custom_dialog:if $sel2="custom" gosub *custom_dialog_start:skip 4
name $name2
eng $sel1:$sel6\
name ""
goto "*"+$lavel+"_a"



*common_mogaku2

mov %before_action,8
if %nanido=3 rnd2 %ransu,1,2:if %ransu=2 goto *common_mogaku
if %nanido<>2 goto *common_mogaku2b
if $lavel<>"tuika" goto *common_mogaku2a
if %hanyo6=0 goto *common_mogaku2a
itoa $sub1,%hanyo6:mov $sub1,"customstruggle"+$sub1
getini $sel1,$mon_labo_mon_ini,$sub1,"mogaku2success"
if $sel1<>"" && $sel1<>" " goto *common_mogaku2b
getini $sel1,$mon_labo_mon_ini,$sub1,"mogaku1"
if $sel1="" | $sel1=" " goto *common_mogaku2a
rnd2 %ransu,1,10:if %ransu<>5 goto *common_mogaku2b
mov %before_action,7
mov %mon_labo_mon_ini_ky,0
mov $mon_labo_mon_ini_sc,$sel1
mov %allcommandsenable,4
gosub *custom_dialog
mov %allcommandsenable,0
goto *tuika_a



*common_mogaku2a

rnd2 %ransu,1,10:if %ransu=5 goto *common_mogaku
goto *common_mogaku2b



*common_mogaku2b

rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Grr....!"
if %ransu=2 mov $sel1,"Damn you...!"
if %ransu=3 mov $sel1,"Le... let go!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_sel","hero_mogaku_win1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_mogaku_win1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_mogaku_win2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_mogaku_win3"
if $sel1="" rnd2 %ransu,1,3:skip -3
name $ori_name
eng $sel1
$sel6\
name ""
dwave 1,"se\dassyutu.ogg"
gosub *face3n
mov %kousoku,0:gosub *status_print
if $mogaku_anno2="" | $mogaku_anno2=" " skip 4
if $lavel="tuika" mov $sel1,$mogaku_anno2:gosub *check_custom_dialog
if $lavel="tuika" && $sel2="custom" gosub *custom_dialog_start:skip 2
eng $mogaku_anno2:$sel6\
if $lavel="tuika" gosub *tuika_count_reset1:skip 5
if %owaza_num1<2 mov %owaza_count1a,0
if %owaza_num1=2 mov %owaza_count1b,0
if %owaza_num1=3 mov %owaza_count1c,0
if %owaza_num1=4 mov %owaza_count1d,0
mov %owaza_num1,0
mov $sel1,$mogaku_dassyutu1
mov $sel2,$mogaku_dassyutu2
mov $sel3,""
gosub *selprintname
gosub *face1
if $lavel="tuika" getini $mogaku_anno1,$mon_labo_mon_ini,"anno","mogaku_anno1"
if $lavel="tuika" getini $mogaku_anno2,$mon_labo_mon_ini,"anno","mogaku_anno2"
if $lavel="tuika" getini $mogaku_anno3,$mon_labo_mon_ini,"anno","mogaku_anno3"
if $lavel="tuika" getini $mogaku_anno4,$mon_labo_mon_ini,"anno","mogaku_anno4"
if $lavel="tuika" getini $mogaku_sel1,$mon_labo_mon_ini,"sel","mogaku_sel1"
if $lavel="tuika" getini $mogaku_sel2,$mon_labo_mon_ini,"sel","mogaku_sel2"
if $lavel="tuika" getini $mogaku_sel3,$mon_labo_mon_ini,"sel","mogaku_sel3"
if $lavel="tuika" getini $mogaku_sel4,$mon_labo_mon_ini,"sel","mogaku_sel4"
if $lavel="tuika" getini $mogaku_sel5,$mon_labo_mon_ini,"sel","mogaku_sel5"
if $lavel="tuika" getini $mogaku_dassyutu1,$mon_labo_mon_ini,"sel","mogaku_dassyutu1"
if $lavel="tuika" getini $mogaku_dassyutu2,$mon_labo_mon_ini,"sel","mogaku_dassyutu2"
if $lavel="tuika" getini $mogaku_earth_dassyutu1,$mon_labo_mon_ini,"sel","mogaku_earth_dassyutu1"
if $lavel="tuika" getini $mogaku_earth_dassyutu2,$mon_labo_mon_ini,"sel","mogaku_earth_dassyutu2"
if $lavel="tuika" getini $mogaku_kaisin1,$mon_labo_mon_ini,"sel","mogaku_kaisin1"
if $lavel="tuika" getini $mogaku_kaisin2,$mon_labo_mon_ini,"sel","mogaku_kaisin2"
goto *common_main



*mogaku_earth1

mov %before_action,7
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Guh...!"
if %ransu=2 mov $sel1,"G...Get off!"
if %ransu=3 mov $sel1,"Damn you!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_sel","hero_mogaku_earth1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_mogaku_earth1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_mogaku_earth2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_mogaku_earth3"
if $sel1="" rnd2 %ransu,1,3:skip -3
name $ori_name
eng $sel1:$sel6\
name ""
if %genmogaku=99 skip 2
mov %genmogaku,%genmogaku-1:if %genmogaku<0 mov %genmogaku,0
dwave 1,"se\power.ogg"
eng $ori_name+"'s body is filled with the power of the Earth, giving incredible strength!"
$sel6\
if $mogaku_anno1="" | $mogaku_anno1=" " skip 4
if $lavel="tuika" mov $sel1,$mogaku_anno1:gosub *check_custom_dialog
if $lavel="tuika" && $sel2="custom" gosub *custom_dialog_start:skip 2
eng $mogaku_anno1:$sel6\
rnd2 %ransu,1,5
if %ransu=1 mov $sel1,$mogaku_sel1
if %ransu=2 mov $sel1,$mogaku_sel2
if %ransu=3 mov $sel1,$mogaku_sel3
if %ransu=4 mov $sel1,$mogaku_sel4
if %ransu=5 mov $sel1,$mogaku_sel5
if $sel1="" | $sel1=" " skip 5
if $lavel="tuika" gosub *check_custom_dialog:if $sel2="custom" gosub *custom_dialog_start:skip 4
name $name2
eng $sel1:$sel6\
name ""
goto "*"+$lavel+"_a"



*mogaku_earth2

mov %before_action,8
if %nanido=3 rnd2 %ransu,1,2:if %ransu=2 goto *mogaku_earth1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"With this power...!"
if %ransu=2 mov $sel1,"With Gnome's power...!"
if %ransu=3 mov $sel1,"With the Earth's power...!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_sel","hero_mogaku_earth_win1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_mogaku_earth_win1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_mogaku_earth_win2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_mogaku_earth_win3"
if $sel1="" rnd2 %ransu,1,3:skip -3
name $ori_name
eng $sel1:$sel6\
name ""
dwave 1,"se\power.ogg"
eng $ori_name+"'s body is filled with the power of the Earth, giving incredible strength!"
$sel6\
dwave 2,"se\dassyutu.ogg"
gosub *face3n
mov %kousoku,0:gosub *status_print
if $mogaku_anno2="" | $mogaku_anno2=" " skip 4
if $lavel="tuika" mov $sel1,$mogaku_anno2:gosub *check_custom_dialog
if $lavel="tuika" && $sel2="custom" gosub *custom_dialog_start:skip 2
eng $mogaku_anno2:$sel6\
if $lavel="tuika" gosub *tuika_count_reset1:skip 5
if %owaza_num1<2 mov %owaza_count1a,0
if %owaza_num1=2 mov %owaza_count1b,0
if %owaza_num1=3 mov %owaza_count1c,0
if %owaza_num1=4 mov %owaza_count1d,0
mov %owaza_num1,0
mov $sel1,$mogaku_earth_dassyutu1
mov $sel2,$mogaku_earth_dassyutu2
mov $sel3,""
gosub *selprintname
gosub *face1
if $lavel="tuika" getini $mogaku_anno1,$mon_labo_mon_ini,"anno","mogaku_anno1"
if $lavel="tuika" getini $mogaku_anno2,$mon_labo_mon_ini,"anno","mogaku_anno2"
if $lavel="tuika" getini $mogaku_anno3,$mon_labo_mon_ini,"anno","mogaku_anno3"
if $lavel="tuika" getini $mogaku_anno4,$mon_labo_mon_ini,"anno","mogaku_anno4"
if $lavel="tuika" getini $mogaku_sel1,$mon_labo_mon_ini,"sel","mogaku_sel1"
if $lavel="tuika" getini $mogaku_sel2,$mon_labo_mon_ini,"sel","mogaku_sel2"
if $lavel="tuika" getini $mogaku_sel3,$mon_labo_mon_ini,"sel","mogaku_sel3"
if $lavel="tuika" getini $mogaku_sel4,$mon_labo_mon_ini,"sel","mogaku_sel4"
if $lavel="tuika" getini $mogaku_sel5,$mon_labo_mon_ini,"sel","mogaku_sel5"
if $lavel="tuika" getini $mogaku_dassyutu1,$mon_labo_mon_ini,"sel","mogaku_dassyutu1"
if $lavel="tuika" getini $mogaku_dassyutu2,$mon_labo_mon_ini,"sel","mogaku_dassyutu2"
if $lavel="tuika" getini $mogaku_earth_dassyutu1,$mon_labo_mon_ini,"sel","mogaku_earth_dassyutu1"
if $lavel="tuika" getini $mogaku_earth_dassyutu2,$mon_labo_mon_ini,"sel","mogaku_earth_dassyutu2"
if $lavel="tuika" getini $mogaku_kaisin1,$mon_labo_mon_ini,"sel","mogaku_kaisin1"
if $lavel="tuika" getini $mogaku_kaisin2,$mon_labo_mon_ini,"sel","mogaku_kaisin2"
goto *common_main



*common_miss2

mov %before_action,9
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Haa!"
if %ransu=2 mov $sel1,"Ora!"
if %ransu=3 mov $sel1,"Take this!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_sel","hero_uncharge1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_uncharge1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_uncharge2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_uncharge3"
if $sel1="" rnd2 %ransu,1,3:skip -3
name $ori_name
eng $sel1:$sel6\
name ""
eng $ori_name+" attacks!":$sel6
if $mogaku_anno4="" | $mogaku_anno4=" " skip 4
if $lavel="tuika" mov $sel1,$mogaku_anno4:gosub *check_custom_dialog
if $lavel="tuika" && $sel2="custom" gosub *custom_dialog_start:skip 2
eng $mogaku_anno4:$sel6\
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\slash.ogg"
gosub *enemylife
mov %kousoku_hp,%kousoku_hp-%damage
if %enemylife=0 mov %kousoku,0:gosub *status_print:goto "*"+$lavel+"_v"
goto *common_attack_end



*common_miss3

mov %before_action,10
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"LUKA ATTAAACK!"
if $lavel="tuika" && %ransu=1 && $ori_name<>"Luka" mov $sel1,$ori_name+" ATTAAACK!"
if %ransu=2 mov $sel1,"An opening!"
if %ransu=3 mov $sel1,"Get... off... of... me!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_sel","hero_freedom1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_freedom1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_freedom2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_freedom3"
if $sel1="" rnd2 %ransu,1,3:skip -3
name $ori_name
eng $sel1:$sel6\
name ""
;eng $ori_name+" attacks!":$sel6											;patch
if $mogaku_anno4="" | $mogaku_anno4=" " skip 4
if $lavel="tuika" mov $sel1,$mogaku_anno4:gosub *check_custom_dialog
if $lavel="tuika" && $sel2="custom" gosub *custom_dialog_start:skip 2
eng $mogaku_anno4:$sel6
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\slash3.ogg"
mov %abairitu,200:gosub *enemylife
dwave 1,"se\dassyutu.ogg"
mov %kousoku,0:gosub *status_print
if %enemylife=0 goto "*"+$lavel+"_v"
if $mogaku_anno2="" | $mogaku_anno2=" " skip 4
if $lavel="tuika" mov $sel1,$mogaku_anno2:gosub *check_custom_dialog
if $lavel="tuika" && $sel2="custom" gosub *custom_dialog_start:skip 2
eng $mogaku_anno2:$sel6\
gosub *face3
mov $sel1,$mogaku_kaisin1
mov $sel2,$mogaku_kaisin2
mov $sel3,""
gosub *selprintname
if $lavel="tuika" gosub *tuika_count_reset2:skip 5
mov %owaza_count1a,0
mov %owaza_count1b,0
mov %owaza_count1c,0
mov %owaza_count1d,0
mov %owaza_num1,0
gosub *face1
if $lavel="tuika" getini $mogaku_anno1,$mon_labo_mon_ini,"anno","mogaku_anno1"
if $lavel="tuika" getini $mogaku_anno2,$mon_labo_mon_ini,"anno","mogaku_anno2"
if $lavel="tuika" getini $mogaku_anno3,$mon_labo_mon_ini,"anno","mogaku_anno3"
if $lavel="tuika" getini $mogaku_anno4,$mon_labo_mon_ini,"anno","mogaku_anno4"
if $lavel="tuika" getini $mogaku_sel1,$mon_labo_mon_ini,"sel","mogaku_sel1"
if $lavel="tuika" getini $mogaku_sel2,$mon_labo_mon_ini,"sel","mogaku_sel2"
if $lavel="tuika" getini $mogaku_sel3,$mon_labo_mon_ini,"sel","mogaku_sel3"
if $lavel="tuika" getini $mogaku_sel4,$mon_labo_mon_ini,"sel","mogaku_sel4"
if $lavel="tuika" getini $mogaku_sel5,$mon_labo_mon_ini,"sel","mogaku_sel5"
if $lavel="tuika" getini $mogaku_dassyutu1,$mon_labo_mon_ini,"sel","mogaku_dassyutu1"
if $lavel="tuika" getini $mogaku_dassyutu2,$mon_labo_mon_ini,"sel","mogaku_dassyutu2"
if $lavel="tuika" getini $mogaku_earth_dassyutu1,$mon_labo_mon_ini,"sel","mogaku_earth_dassyutu1"
if $lavel="tuika" getini $mogaku_earth_dassyutu2,$mon_labo_mon_ini,"sel","mogaku_earth_dassyutu2"
if $lavel="tuika" getini $mogaku_kaisin1,$mon_labo_mon_ini,"sel","mogaku_kaisin1"
if $lavel="tuika" getini $mogaku_kaisin2,$mon_labo_mon_ini,"sel","mogaku_kaisin2"
goto *common_attack_end



*wind_guard_kakuritu

if %wind=0 mov %wind_guard_on,0:return
if %status=1 mov %wind_guard_on,0:return
if %status=2 mov %wind_guard_on,0:return
if %status=4 mov %wind_guard_on,0:return
if %status=5 mov %wind_guard_on,0:return
if %status=7 mov %wind_guard_on,0:return
if %zukanon<>3 skip 6
if $wind_kakuritu<>"1" skip 4
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_damage"+$move+"_1":atoi %sub1,$sub1
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_damage"+$move+"_2":atoi %sub2,$sub1
if %sub1=0 && %sub2=0 mov %wind_guard_on,0:return
if %enemy_earth>0 && %wind>1 && %kousoku=0 goto *wind_guard_kakuritu1
rnd2 %ransu2,1,100
if %ransu2<%wind_kakuritu+1 mov %wind_guard_on,1:return
mov %wind_guard_on,0
return



*wind_guard_kakuritu1

if %tuika_skill_kouka>1 && %tuika_skill_kouka<7 mov %wind_guard_on,1:return
rnd2 %ransu2,1,100
if %ransu2<81 mov %wind_guard_on,1:return
mov %wind_guard_on,0
return



*wind_guard

add %stack,1
wait 500
if %wind=1 skillname "Wind Guard"
if %wind=2 skillname "Wind Dance"
if %wind=3 && %skill02=5 skillname "Fallen Angel Dance: Gale":skip 2
if %wind=3 skillname "Extreme Wind"
if %wind=4 skillname "Fallen Angel Dance"
if %wind=1 dwave 3,"se\wind2.ogg"
if %wind=2 dwave 3,"se\miss.ogg"
if %wind=3 && %skill02=5 dwave 3,"se\bun.ogg":skip 2
if %wind=3 dwave 3,"se\miss_wind.ogg"
if %wind>3 dwave 3,"se\bun.ogg"
if %stuck=1 mov %stuck,0:skip 9
if %kousoku=0 gosub *face1n:skip 7
if %mon_labo_on<>1 lsp 700,":a;chara\"+$tatie4+".bmp",%monster_x,%monster_y:skip 6
mov $sub1,$tatie4
gosub *check_dir1
split $sub1,".",$sub3,$sub2
if $sub2="bmp" | $sub2="jpg" | $sub2="png" lsp 700,":a;"+$teigi1+$sub1,%monster_x,%monster_y:skip 2
if $sub2="" lsp 700,":a;chara\"+$tatie4+".bmp",%monster_x,%monster_y
csp 690
if %wind=3 && %skill02=5 skip 3
if %wind>3 skip 2
skip 5
if %mon_labo_on<>1 bg "BG\"+$haikei+".bmp",99,700,"system\lngtwave.dll/vwi":skip 3
gosub *check_haikei:if $teigi2="skip" skip 2
bg $teigi3+$teigi1,99,700,"system\lngtwave.dll/vwi"
skip 2
if %wind<4 print 10,500
textclear
gosub *check_custom_dialog:if $sel2="custom" goto *wind_guard_anno_cd
eng $sel1:$sel6\
skillname ""
sub %stack,1
return



*wind_guard_anno_cd

mov $mon_labo_mon_ini_sc,$sel1
mov %mon_labo_mon_ini_ky,0
gosub *custom_dialog_start
sub %stack,1
return



*aqua_guard

add %stack,1
wait 500
skillname "Serene Movement"
dwave 3,"se\miss_aqua.ogg"
if %stuck=1 mov %stuck,0:skip 9
if %kousoku=0 gosub *face1n:skip 7
if %mon_labo_on<>1 lsp 700,":a;chara\"+$tatie4+".bmp",%monster_x,%monster_y:skip 6
mov $sub1,$tatie4
gosub *check_dir1
split $sub1,".",$sub3,$sub2
if $sub2="bmp" | $sub2="jpg" | $sub2="png" lsp 700,":a;"+$teigi1+$sub1,%monster_x,%monster_y:skip 2
if $sub2="" lsp 700,":a;chara\"+$tatie4+".bmp",%monster_x,%monster_y
csp 690
print 10,500
textclear
eng "But like water flowing around an obstacle, "+$ori_name+" evades it!"
$sel6\
skillname ""
sub %stack,1
return



*common_s1

add %stack,1
if %max_mylife>%mylife*5 mov %sel_hphalf,1:gosub *common_s2:sub %stack,1:return
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Guh..."
if %ransu=2 mov $sel1,"Ohh..."
if %ransu=3 mov $sel1,"Uguh..."
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_sel","hero_kiki1_1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_kiki1_1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_kiki1_2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_kiki1_3"
if $sel1="" rnd2 %ransu,1,3:skip -3
name $ori_name
eng $sel1:$sel6\
name ""
gosub *face2
mov $sel1,$half_s1
mov $sel2,$half_s2
mov $sel3,""
gosub *selprintname
gosub *face1
mov %sel_hphalf,1
sub %stack,1
return



*common_s2

add %stack,1
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ahhh..."
if %ransu=2 mov $sel1,"Ahhh..."
if %ransu=3 mov $sel1,"Fuuu..."
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_sel","hero_kiki2_1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_kiki2_1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_kiki2_2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_kiki2_3"
if $sel1="" rnd2 %ransu,1,3:skip -3
name $ori_name
eng $sel1
$sel6\
name ""
gosub *face2
mov $sel1,$kiki_s1
mov $sel2,$kiki_s2
mov $sel3,""
gosub *selprintname
mov %sel_kiki,1
sub %stack,1
return



*selprint

add %stack,1
if $sel1="" sub %stack,1:return
if $sel2="" gosub *selprint1:sub %stack,1:return
if $sel3="" gosub *selprint2:sub %stack,1:return
if %rnd_ev=1 && %ransu>3 mov %rnd_ev,0:skip 3
if %rnd_ev=1 && %ransu=0 mov %rnd_ev,0:skip 2
if %rnd_ev=1 mov %rnd_ev,0:skip 4
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=2 mov $sel1,$sel2
if %ransu=3 mov $sel1,$sel3
mov $sel2,""
if $lavel="tuika" gosub *check_custom_dialog
if $lavel="tuika"&& $sel2="custom" gosub *custom_dialog_start:sub %stack,1:return
eng $sel1:$sel6\
mov $sel2,""
sub %stack,1
return



*selprint1

add %stack,1
mov %ransu,0
if $lavel="tuika" gosub *check_custom_dialog
if $lavel="tuika"&& $sel2="custom" gosub *custom_dialog_start:sub %stack,1:return
eng $sel1:$sel6\
mov $sel2,""
sub %stack,1
return



*selprint2

add %stack,1
mov %ransu,0
eng $sel1:$sel6@
eng $sel2:$sel6\
mov $sel2,""
sub %stack,1
return



*selprintname

add %stack,1
if $sel1="" sub %stack,1:return
if $sel2="" mov %ransu,0:skip 11
if $sel3="" name $name:gosub *selprint2:name "":sub %stack,1:return
if %rnd_ev=1 && %ransu>3 mov %rnd_ev,0:skip 3
if %rnd_ev=1 && %ransu=0 mov %rnd_ev,0:skip 2
if %rnd_ev=1 mov %rnd_ev,0:skip 4
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=2 mov $sel1,$sel2
if %ransu=3 mov $sel1,$sel3
mov $sel2,""
if $lavel="tuika" gosub *check_custom_dialog
if $lavel="tuika"&& $sel2="custom" gosub *custom_dialog_start:sub %stack,1:return
name $name
eng $sel1:$sel6\
mov $sel2,""
name ""
sub %stack,1
return



*sel10printname

add %stack,1
if $sel1="" mov %ransu,0:sub %stack,1:return
if $sel2="" mov %ransu,0:skip 8
if $sel3="" name $name:gosub *selprint2:name "":sub %stack,1:return
rnd2 %ransu,1,12
if %ransu=%ren skip -1
itoa $sel2,%ransu
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_sel"+$sel2
if $sel1="" skip -4
mov %ren,%ransu
gosub *check_custom_dialog:if $sel2="custom" gosub *custom_dialog_start:skip 4
name $name
eng $sel1:$sel6\
name ""
sub %stack,1
return



*selprinthero

add %stack,1
gosub *check_custom_dialog
if $sel2="custom" gosub *custom_dialog_start:sub %stack,1:return
name $ori_name
eng $sel1:$sel6\
mov $sel2,""
name ""
sub %stack,1
return



*selprintn

add %stack,1
mov %anno_mode,0
if $sel1="" mov %anno_mode,1:sub %stack,1:return
if $sel2="" gosub *selprint1n:sub %stack,1:return
if $sel3="" gosub *selprint2n:sub %stack,1:return
if %rnd_ev=1 && %ransu>3 mov %rnd_ev,0:skip 3
if %rnd_ev=1 && %ransu=0 mov %rnd_ev,0:skip 2
if %rnd_ev=1 mov %rnd_ev,0:skip 4
rnd2 %ransu,1,3
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=2 mov $sel1,$sel2
if %ransu=3 mov $sel1,$sel3
gosub *check_custom_dialog
if $sel2="custom" gosub *custom_dialog_start:sub %stack,1:return
mov $sel2,""
eng $sel1:$sel6/
sub %stack,1
return



*selprint1n

add %stack,1
mov %ransu,0
gosub *check_custom_dialog
if $sel2="custom" gosub *custom_dialog_start:sub %stack,1:return
mov $sel2,""
eng $sel1:$sel6/
sub %stack,1
return



*selprint2n

add %stack,1
mov %ransu,0
eng $sel1:$sel6
eng $sel2:$sel6/
mov $sel2,""
sub %stack,1
return



*sel10printn

add %stack,1
mov %anno_mode,0
if $sel4=" " mov %ren,0:gosub *selprintn:sub %stack,1:return
if %ransu=0 goto *sel10printnrnd
itoa $sel4,%ransu
getini $sel5,$mon_labo_mon_ini,$skill_tag,"skill_"+$sel5+"_"+$sel4
if $sel5="" mov %ren,0:gosub *selprintn:sub %stack,1:return
mov $sel1,$sel5:mov $sel2,""
gosub *check_custom_dialog:if $sel2="custom" gosub *custom_dialog_start:skip 3
mov $sel2,""
eng $sel5:$sel6/
sub %stack,1
return



*sel10printnrnd

rnd2 %ransu,1,12
if %ransu=%ren skip -1
itoa $sel4,%ransu
getini $sel5,$mon_labo_mon_ini,$skill_tag,"skill_"+$sel5+"_"+$sel4
if $sel5="" skip -4
mov %ren,%ransu
mov $sel1,$sel5:mov $sel2,""
gosub *check_custom_dialog:if $sel2="custom" gosub *custom_dialog_start:skip 3
mov $sel2,""
eng $sel5:$sel6/
sub %stack,1
return



*cmd_skill

add %stack,1
saveoff
textoff
cspl 3,7:cspl 601,608
btndef clear
mov %skill_page,1
mov %sinkoumode,0:skipoff:autoclick 0
gosub *setwindow_04
if %100=1 && %zukanon=1 itoa $sel6,%stack:csp 10:strsp 10,$sel6,750,5,2,1,20,20,0,0,1,0,#FF0000
if %100=1 && %zukanon=3 itoa $sel6,%stack:csp 10:strsp 10,$sel6,750,5,2,1,20,20,0,0,1,0,#FF0000
if %skill01>18 goto *cmd_skillx1
if %skill01>13 && %skill01<17 mov $menu_list1,"Serene Demon Sword - 2":mov $sub1,"skill13":mov %sub3,1:skip 2
if %skill01>1 mov $menu_list1,"Demon Decapitation - 2":mov $sub1,"skill1":mov %sub3,1
if %skill01>1 gosub *skill_remap_check:if %sub4=1 skip 4
if %skill01>1 strsp 601,$menu_list1,70,418,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %skill01>13 && %skill01<17 && %mp>%sub3 strsp 601,$menu_list1,70,418,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 601,28:skip 2
if %skill01>1 && %mp>%sub3 strsp 601,$menu_list1,70,418,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 601,21
if %skill01>10 && %skill01<17 mov $menu_list1,"Lighnting Sword Flash - 2":mov $sub1,"skill11":mov %sub3,1:skip 2
if %skill01>2 mov $menu_list1,"Thunder Thrust - 2":mov $sub1,"skill3":mov %sub3,1
if %skill01>2 gosub *skill_remap_check:if %sub4=1 skip 4
if %skill01>2 strsp 602,$menu_list1,70,445,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %skill01>10 && %skill01<17 && %mp>%sub3 strsp 602,$menu_list1,70,445,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 602,26:skip 2
if %skill01>2 && %mp>%sub3 strsp 602,$menu_list1,70,445,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 602,23
if %skill01>11 && %skill01<17 mov $menu_list1,"Earth Rumbling Decapitation - 3":mov $sub1,"skill12":mov %sub3,2:skip 2
if %skill01>4 mov $menu_list1,"Demon Skull Beheading - 3":mov $sub1,"skill5":mov %sub3,2
if %skill01>4 gosub *skill_remap_check:if %sub4=1 skip 4
if %skill01>4 strsp 603,$menu_list1,70,472,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %skill01>11 && %skill01<17 && %mp>%sub3 strsp 603,$menu_list1,70,472,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,27:skip 2
if %skill01>4 && %mp>%sub3 && %tikei>0 strsp 603,$menu_list1,70,472,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,25
if %skill01>0 && %skill01<6 mov $menu_list1,"Flail Wildly - 2":mov $sub1,"skill2":mov %sub3,1:skip 3
if %skill01=16 mov $menu_list1,"Vaporizing Rebellion Sword - 4":mov $sub1,"skill16":mov %sub3,3:skip 2
if %skill01>5 mov $menu_list1,"Death Sword Chaos Star - 4":mov $sub1,"skill6":mov %sub3,3
if %skill01>0 gosub *skill_remap_check:if %sub4=1 skip 5
if %skill01>0 strsp 604,$menu_list1,70,499,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %skill01>0 && %skill01<6 && %mp>%sub3 strsp 604,$menu_list1,70,499,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 604,22:skip 3
if %skill01=16 && %mp>%sub3 strsp 604,$menu_list1,70,499,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 604,30:skip 2
if %skill01>5 && %mp>%sub3 strsp 604,$menu_list1,70,499,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 604,22
if %skill01>3 mov $menu_list1,"Meditation - 3":mov $sub1,"skill4":mov %sub3,2
if %skill01>3 gosub *skill_remap_check:if %sub4=1 skip 3
if %skill01>3 strsp 605,$menu_list1,400,418,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %skill01>3 && %mp>%sub3 && %fire<>1 && %fire<>2 strsp 605,$menu_list1,400,418,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 605,24
mov $menu_list1,"Edging - 0":mov $sub1,"skill17":mov %sub3,-1
gosub *skill_remap_check:if %sub4=1 skip 3
strsp 606,$menu_list1,400,445,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %mylife>1 && %mp>%sub3 strsp 606,$menu_list1,400,445,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 606,35
if %skill01>14 && %skill01<17 mov $menu_list1,"Quadruple Giga - 1":mov $sub1,"skill15":mov %sub3,0
if %skill01>14 && %skill01<17 gosub *skill_remap_check:if %sub4=1 skip 3
if %skill01>14 && %skill01<17 strsp 608,$menu_list1,400,499,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %skill01>14 && %skill01<17 && %mp>%sub3 strsp 608,$menu_list1,400,499,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 608,29
if %skill01=18 mov $menu_list1,"Serene Mind - 2":mov $sub1,"skill18":mov %sub3,1
if %skill01=18 gosub *skill_remap_check:if %sub4=1 skip 3
if %skill01=18 strsp 608,$menu_list1,400,499,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %skill01=18 && %mp>%sub3 && %aqua=0 && %fire<>1 && %fire<>2 strsp 608,$menu_list1,400,499,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 608,36
if %skill02>3 && %skill03>3 && %skill04>3 && %skill05>3 skip 3
if %skill01>6 && %skill01<17 lsp 609,":c/2,0,3;system\menu_prev.jpg",32,515:spbtn 609,40
if %skill01>6 && %skill01<17 lsp 610,":c/2,0,3;system\menu_next.jpg",748,515:spbtn 610,41
goto *cmd_skill3



*cmd_skill2

saveoff
textoff
cspl 3,7:cspl 601,608
btndef clear
mov %skill_page,2
mov %sinkoumode,0:skipoff:autoclick 0
gosub *setwindow_04
if %skill01>18 goto *cmd_skillx2
if %skill01>6 && %skill02<2 mov $menu_list1,"Sylph - 2":mov $sub1,"skill7":mov %sub3,1
if %skill01>6 && %skill02<2 gosub *skill_remap_check:if %sub4=1 skip 3
if %skill01>6 && %skill02<2 strsp 601,$menu_list1,70,418,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %skill01>6 && %skill02<2 && %mp>%sub3 && %wind=0 && %aqua<>2 && %fire<>1 && %fire<>2 strsp 601,$menu_list1,70,418,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 601,31
if %skill01>6 && %skill02=2 mov $menu_list1,"Sylph - 2":mov $sub1,"skill7b":mov %sub3,1
if %skill01>6 && %skill02=2 gosub *skill_remap_check:if %sub4=1 skip 3
if %skill01>6 && %skill02=2 strsp 601,$menu_list1,70,418,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %skill01>6 && %skill02=2 && %mp>%sub3 && %wind=0 && %aqua<>2 && %fire<>1 && %fire<>2 strsp 601,$menu_list1,70,418,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 601,31
if %skill01>6 && %skill02=3 mov $menu_list1,"Sylph - 1":mov $sub1,"skill7c":mov %sub3,0
if %skill01>6 && %skill02=3 gosub *skill_remap_check:if %sub4=1 skip 3
if %skill01>6 && %skill02=3 strsp 601,$menu_list1,70,418,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %skill01>6 && %skill02=3 && %mp>%sub3 && %wind=0 && %aqua<>2 && %fire<>1 && %fire<>2 strsp 601,$menu_list1,70,418,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 601,31
if %skill01>7 && %skill03<2 mov $menu_list1,"Gnome - 2":mov $sub1,"skill8":mov %sub3,1
if %skill01>7 && %skill03<2 gosub *skill_remap_check:if %sub4=1 skip 3
if %skill01>7 && %skill03<2 strsp 602,$menu_list1,70,445,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %skill01>7 && %skill03<2 && %mp>%sub3 && %earth=0 && %aqua<>2 && %fire<>1 && %fire<>2 strsp 602,$menu_list1,70,445,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 602,32
if %skill01>7 && %skill03=2 mov $menu_list1,"Gnome - 2":mov $sub1,"skill8b":mov %sub3,1
if %skill01>7 && %skill03=2 gosub *skill_remap_check:if %sub4=1 skip 3
if %skill01>7 && %skill03=2 strsp 602,$menu_list1,70,445,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %skill01>7 && %skill03=2 && %mp>%sub3 && %earth=0 && %aqua<>2 && %fire<>1 && %fire<>2 strsp 602,$menu_list1,70,445,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 602,32
if %skill01>7 && %skill03=3 mov $menu_list1,"Gnome - 1":mov $sub1,"skill8c":mov %sub3,0
if %skill01>7 && %skill03=3 gosub *skill_remap_check:if %sub4=1 skip 3
if %skill01>7 && %skill03=3 strsp 602,$menu_list1,70,445,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %skill01>7 && %skill03=3 && %mp>%sub3 && %earth=0 && %aqua<>2 && %fire<>1 && %fire<>2 strsp 602,$menu_list1,70,445,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 602,32
if %skill01>9 && %skill04<2 mov $menu_list1,"Undine - 2":mov $sub1,"skill10":mov %sub3,1
if %skill01>9 && %skill04<2 gosub *skill_remap_check:if %sub4=1 skip 3
if %skill01>9 && %skill04<2 strsp 603,$menu_list1,70,472,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %skill01>9 && %skill04<2 && %mp>%sub3 && %aqua=0 && %fire<>1 && %fire<>2 strsp 603,$menu_list1,70,472,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,33
if %skill01>9 && %skill04=2 mov $menu_list1,"Undine - All":mov $sub1,"skill10b":mov %sub3,0
if %skill01>9 && %skill04=2 gosub *skill_remap_check:if %sub4=1 skip 3
if %skill01>9 && %skill04=2 strsp 603,$menu_list1,70,472,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %skill01>9 && %skill04=2 && %mp>%sub3 && %aqua=0 && %fire<>1 && %fire<>2 strsp 603,$menu_list1,70,472,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,33
if %skill01>9 && %skill04=3 mov $menu_list1,"Undine - 4":mov $sub1,"skill10c":mov %sub3,3
if %skill01>9 && %skill04=3 gosub *skill_remap_check:if %sub4=1 skip 3
if %skill01>9 && %skill04=3 strsp 603,$menu_list1,70,472,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %skill01>9 && %skill04=3 && %mp>%sub3 && %aqua=0 && %fire<>1 && %fire<>2 strsp 603,$menu_list1,70,472,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,33
if %skill01>12 && %skill05<2 mov $menu_list1,"Salamander - 2":mov $sub1,"skill14":mov %sub3,1
if %skill01>12 && %skill05<2 gosub *skill_remap_check:if %sub4=1 skip 3
if %skill01>12 && %skill05<2 strsp 604,$menu_list1,70,499,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %skill01>12 && %skill05<2 && %mp>%sub3 && %aqua<>2 && %fire=0 strsp 604,$menu_list1,70,499,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 604,34
if %skill01>12 && %skill05=2 mov $menu_list1,"Salamander - 2":mov $sub1,"skill14b":mov %sub3,1
if %skill01>12 && %skill05=2 gosub *skill_remap_check:if %sub4=1 skip 3
if %skill01>12 && %skill05=2 strsp 604,$menu_list1,70,499,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %skill01>12 && %skill05=2 && %mp>%sub3 && %aqua<>2 && %fire=0 strsp 604,$menu_list1,70,499,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 604,34
if %skill01>12 && %skill05=3 mov $menu_list1,"Salamander - 4":mov $sub1,"skill14c":mov %sub3,3
if %skill01>12 && %skill05=3 gosub *skill_remap_check:if %sub4=1 skip 3
if %skill01>12 && %skill05=3 strsp 604,$menu_list1,70,499,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %skill01>12 && %skill05=3 && %mp>%sub3 && %aqua<>2 && %fire=0 strsp 604,$menu_list1,70,499,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 604,34
lsp 609,":c/2,0,3;system\menu_prev.jpg",32,515:spbtn 609,40
lsp 610,":c/2,0,3;system\menu_next.jpg",748,515:spbtn 610,41
goto *cmd_skill3



*cmd_skillx1

if %skill02=5 && %wind>0 mov $menu_list1,"Flash Kill: Destructive Wind - 2":skip 2
mov $menu_list1,"Flash Kill - 2"
mov $sub1,"skill19":mov %sub3,1
gosub *skill_remap_check:if %sub4=1 skip 3
strsp 601,$menu_list1,70,418,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %mp>%sub3 strsp 601,$menu_list1,70,418,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 601,37
if %skill03=5 && %earth>0 mov $menu_list1,"Heavenly Demon Revival: Gaia - 4":skip 2
mov $menu_list1,"Heavenly Demon Revival - 4"
mov $sub1,"skill21":mov %sub3,3
gosub *skill_remap_check:if %sub4=1 skip 3
strsp 602,$menu_list1,70,445,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %mp>%sub3 strsp 602,$menu_list1,70,445,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 602,39
if %skill05=5 && %fire>0 mov $menu_list1,"Ninefold Rakshasa: Asura - 6":skip 2
mov $menu_list1,"Ninefold Rakshasa - 6"
mov $sub1,"skill20":mov %sub3,5
gosub *skill_remap_check:if %sub4=1 skip 3
strsp 603,$menu_list1,70,472,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %mp>%sub3 strsp 603,$menu_list1,70,472,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,38
if %skill04=5 && %aqua>0 mov $menu_list1,"Infallible Daystar - 8":skip 2
mov $menu_list1,"Daystar - 8"
mov $sub1,"skill22":mov %sub3,7
gosub *skill_remap_check:if %sub4=1 skip 3
strsp 604,$menu_list1,70,499,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %mp>%sub3 strsp 604,$menu_list1,70,499,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 604,44
mov $menu_list1,"Meditation - 3":mov $sub1,"skill4":mov %sub3,2
gosub *skill_remap_check:if %sub4=1 skip 3
strsp 605,$menu_list1,400,418,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %mp>%sub3 && %fire<>1 && %fire<>2 strsp 605,$menu_list1,400,418,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 605,24
mov $menu_list1,"Edging - 0":mov $sub1,"skill17":mov %sub3,0
gosub *skill_remap_check:if %sub4=1 skip 3
strsp 606,$menu_list1,400,445,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %mylife>1 && %mp>%sub3 strsp 606,$menu_list1,400,445,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 606,35
if %skill02>0 skip 5
mov $menu_list1,"Fallen Angel Dance - 2":mov $sub1,"skill23":mov %sub3,1
gosub *skill_remap_check:if %sub4=1 skip 3
strsp 607,$menu_list1,400,472,12,1,20,20,0,0,1,1,#bbbbbb
if %mp>%sub3 && %wind=0 && %aqua<>2 && %fire<>1 && %fire<>2 strsp 607,$menu_list1,400,472,12,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 607,45
if %skill02=0 skip 5
if %skill01>19 mov $menu_list1,"Element Spica - 9":mov $sub1,"skill24":mov %sub3,8
if %skill01>19 gosub *skill_remap_check:if %sub4=1 skip 3
if %skill01>19 strsp 607,$menu_list1,400,472,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %skill01>19 && %mp>%sub3 strsp 607,$menu_list1,400,472,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 607,42
if %skill04>0 skip 5
mov $menu_list1,"Serene Mind - 2":mov $sub1,"skill18":mov %sub3,1
gosub *skill_remap_check:if %sub4=1 skip 3
strsp 608,$menu_list1,400,499,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %mp>%sub3 && %aqua=0 && %fire<>1 && %fire<>2 strsp 608,$menu_list1,400,499,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 608,36
if %skill04=0 skip 5
if %skill01>20 mov $menu_list1,"Quadruple Giga - 1":mov $sub1,"skill15":mov %sub3,0
if %skill01>20 gosub *skill_remap_check:if %sub4=1 skip 3
if %skill01>20 strsp 608,$menu_list1,400,499,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %skill01>20 && %mp>%sub3 strsp 608,$menu_list1,400,499,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 608,29
if %skill02<4 && %skill03<4 && %skill04<4 && %skill05<4 skip 3
if %skill03>0 lsp 609,":c/2,0,3;system\menu_prev.jpg",32,515:spbtn 609,40
if %skill03>0 lsp 610,":c/2,0,3;system\menu_next.jpg",748,515:spbtn 610,41
goto *cmd_skill3



*cmd_skillx2

if %skill02=4 mov $menu_list1,"Sylph - 2":mov $sub1,"skill7d":mov %sub3,1
if %skill02=4 gosub *skill_remap_check:if %sub4=1 skip 3
if %skill02=4 strsp 601,$menu_list1,70,418,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %skill02=4 && %mp>%sub3 && %wind=0 && %aqua<>2 && %fire<>1 && %fire<>2 strsp 601,$menu_list1,70,418,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 601,31
if %skill02=5 mov $menu_list1,"Sylph - 1":mov $sub1,"skill7e":mov %sub3,0
if %skill02=5 gosub *skill_remap_check:if %sub4=1 skip 3
if %skill02=5 strsp 601,$menu_list1,70,418,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %skill02=5 && %mp>%sub3 && %wind=0 && %aqua<>2 && %fire<>1 && %fire<>2 strsp 601,$menu_list1,70,418,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 601,31
if %skill03=4 mov $menu_list1,"Gnome - 2":mov $sub1,"skill8d":mov %sub3,1
if %skill03=4 gosub *skill_remap_check:if %sub4=1 skip 3
if %skill03=4 strsp 602,$menu_list1,70,445,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %skill03=4 && %mp>%sub3 && %earth=0 && %aqua<>2 && %fire<>1 && %fire<>2 strsp 602,$menu_list1,70,445,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 602,32
if %skill03=5 mov $menu_list1,"Gnome - 1":mov $sub1,"skill8e":mov %sub3,0
if %skill03=5 gosub *skill_remap_check:if %sub4=1 skip 3
if %skill03=5 strsp 602,$menu_list1,70,445,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %skill03=5 && %mp>%sub3 && %earth=0 && %aqua<>2 && %fire<>1 && %fire<>2 strsp 602,$menu_list1,70,445,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 602,32
if %skill04=4 mov $menu_list1,"Undine - 2":mov $sub1,"skill10d":mov %sub3,1
if %skill04=4 gosub *skill_remap_check:if %sub4=1 skip 3
if %skill04=4 strsp 603,$menu_list1,70,472,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %skill04=4 && %mp>%sub3 && %aqua=0 && %fire<>1 && %fire<>2 strsp 603,$menu_list1,70,472,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,33
if %skill04=5 mov $menu_list1,"Undine - 2":mov $sub1,"skill10e":mov %sub3,1
if %skill04=5 gosub *skill_remap_check:if %sub4=1 skip 3
if %skill04=5 strsp 603,$menu_list1,70,472,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %skill04=5 && %mp>%sub3 && %aqua=0 && %fire<>1 && %fire<>2 strsp 603,$menu_list1,70,472,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,33
if %skill05=4 mov $menu_list1,"Salamander - 4":mov $sub1,"skill14d":mov %sub3,3
if %skill05=4 gosub *skill_remap_check:if %sub4=1 skip 3
if %skill05=4 strsp 604,$menu_list1,70,499,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %skill05=4 && %mp>%sub3 && %aqua<>2 && %fire=0 strsp 604,$menu_list1,70,499,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 604,34
if %skill05=5 mov $menu_list1,"Salamander - 4":mov $sub1,"skill14e":mov %sub3,3
if %skill05=5 gosub *skill_remap_check:if %sub4=1 skip 3
if %skill05=5 strsp 604,$menu_list1,70,499,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %skill05=5 && %mp>%sub3 && %aqua<>2 && %fire=0 strsp 604,$menu_list1,70,499,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 604,34
if %skill01>21 mov $menu_list1,"Quad Spirit Summon - 10":mov $sub1,"skill25":mov %sub3,9
if %skill01>21 gosub *skill_remap_check:if %sub4=1 skip 3
if %skill01>21 strsp 605,$menu_list1,400,418,(%name_count+1)/2+1,1,20,20,0,0,1,1,#bbbbbb
if %skill01>21 && %mp>%sub3 strsp 605,$menu_list1,400,418,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 605,43
lsp 609,":c/2,0,3;system\menu_prev.jpg",32,515:spbtn 609,40
lsp 610,":c/2,0,3;system\menu_next.jpg",748,515:spbtn 610,41
goto *cmd_skill3



*skill_remap_check

mov %sub4,0
if $lavel<>"tuika" | %hanyo3=0 len %name_count,$menu_list1:return
itoa $sub2,%hanyo3:mov $sub2,"customskill"+$sub2
getini $sel6,$mon_labo_mon_ini,$sub2,$sub1+"off"
if $sel6="1" mov %sub4,1:len %name_count,$menu_list1:return
getini $sel6,$mon_labo_mon_ini,$sub2,$sub1+"name"
if $sel6<>"" && $sel6<>" " mov $menu_list1,$sel6
len %name_count,$menu_list1
getini $sel6,$mon_labo_mon_ini,$sub2,$sub1+"mp"
if $sel6<>"" && $sel6<>" " atoi %sub3,$sel6:sub %sub3,1
return



*cmd_skill3

btnwait2 %cmd1
if %mon_labo_on=1 && %cmd1=4 textoff:screen_clear:sub %stack,1:return *monster_labo
if %zukanon>0 && %cmd1=4 textoff:sub %stack,1:return *zukan_commonkaisou0
if %cmd1=3 && %skill_page=1 mov %saveorload,0:gosub *saveload:sub %stack,1:goto *cmd_skill
if %cmd1=3 && %skill_page=2 mov %saveorload,0:gosub *saveload:goto *cmd_skill2
if %cmd1=4 && %skill_page=1 mov %saveorload,1:gosub *saveload:sub %stack,1:goto *cmd_skill
if %cmd1=4 && %skill_page=2 mov %saveorload,1:gosub *saveload:goto *cmd_skill2
if %cmd1=7 && %skill_page=1 gosub *window_delete2:sub %stack,1:goto *cmd_skill
if %cmd1=7 && %skill_page=2 gosub *window_delete2:goto *cmd_skill2
if %cmd1=0 goto *cmd_skill3
if %cmd1<=-2 goto *cmd_skill3
if %cmd1=40 && %skill_page=1 goto *cmd_skill2
if %cmd1=40 && %skill_page=2 sub %stack,1:goto *cmd_skill
if %cmd1=41 && %skill_page=1 goto *cmd_skill2
if %cmd1=41 && %skill_page=2 sub %stack,1:goto *cmd_skill
cspl 3,7
cspl 601,610
gosub *setwindow_02p
texton
btndef clear
if %zukanon=3 && %sinkouonoff=2 automode_time %autotime:systemcall automode
if %zukanon=1 && %sinkouonoff=2 automode_time %autotime:systemcall automode
sub %stack,1
return



*common_skill

gosub *cmd_skill
if %cmd1=21 goto *skill1
if %cmd1=22 && %skill01>0 && %skill01<6 goto *skill2
if %cmd1=22 && %skill01>5 goto *skill6
if %cmd1=23 goto *skill3
if %cmd1=24 goto *skill4
if %cmd1=25 goto *skill5
if %cmd1=26 goto *skill11
if %cmd1=27 goto *skill12
if %cmd1=28 goto *skill13
if %cmd1=29 goto *skill15
if %cmd1=30 goto *skill16
if %cmd1=31 && %skill02<2 goto *skill7
if %cmd1=31 && %skill02=2 goto *skill7b
if %cmd1=31 && %skill02=3 goto *skill7c
if %cmd1=31 && %skill02=4 goto *skill7d
if %cmd1=31 && %skill02=5 goto *skill7e
if %cmd1=32 && %skill03<2 goto *skill8
if %cmd1=32 && %skill03=2 goto *skill8b
if %cmd1=32 && %skill03=3 goto *skill8c
if %cmd1=32 && %skill03=4 goto *skill8d
if %cmd1=32 && %skill03=5 goto *skill8e
if %cmd1=33 && %skill04<2 goto *skill10
if %cmd1=33 && %skill04=2 goto *skill10b
if %cmd1=33 && %skill04=3 goto *skill10c
if %cmd1=33 && %skill04=4 goto *skill10d
if %cmd1=33 && %skill04=5 goto *skill10e
if %cmd1=34 && %skill05<2 goto *skill14
if %cmd1=34 && %skill05=2 goto *skill14b
if %cmd1=34 && %skill05=3 goto *skill14c
if %cmd1=34 && %skill05=4 goto *skill14d
if %cmd1=34 && %skill05=5 goto *skill14e
if %cmd1=35 goto *skill17
if %cmd1=36 goto *skill18
if %cmd1=37 goto *skill19
if %cmd1=38 goto *skill20
if %cmd1=39 goto *skill21
if %cmd1=44 goto *skill22
if %cmd1=45 goto *skill23
if %cmd1=42 goto *skill24
if %cmd1=43 goto *skill25
if %cmd1=-1 goto "*"+$lavel+"_main"
goto *common_skill



*common_skill1

add %stack,1
if %skill_sub=0 mov %skill_sub,3
goto *common_skill_a



*common_skill2

add %stack,1
mov %nikaime,1
if %skill_sub=0 mov %skill_sub,3
goto *common_skill_a



*common_skill_a

if %before_action=21 gosub *skill1:goto *common_skill_a_end
if %before_action=22 gosub *skill3:goto *common_skill_a_end
if %before_action=23 gosub *skill5:goto *common_skill_a_end
if %before_action=24 gosub *skill6:goto *common_skill_a_end
if %before_action=25 gosub *skill11:goto *common_skill_a_end
if %before_action=26 gosub *skill12:goto *common_skill_a_end
if %before_action=27 gosub *skill13:goto *common_skill_a_end
if %before_action=28 gosub *skill15d:goto *common_skill_a_end
if %before_action=29 gosub *skill16:goto *common_skill_a_end
if %before_action=30 gosub *skill19:goto *common_skill_a_end
if %before_action=31 gosub *skill20:goto *common_skill_a_end
if %before_action=32 gosub *skill21:goto *common_skill_a_end
if %before_action=34 gosub *skill24:goto *common_skill_a_end
if %before_action=41 gosub *skill2:goto *common_skill_a_end
if %before_action=42 gosub *skill4:goto *common_skill_a_end
if %before_action=43 && %skill02<2 gosub *skill7:goto *common_skill_a_end
if %before_action=43 && %skill02=2 gosub *skill7b:goto *common_skill_a_end
if %before_action=43 && %skill02=3 gosub *skill7c:goto *common_skill_a_end
if %before_action=43 && %skill02=4 gosub *skill7d:goto *common_skill_a_end
if %before_action=43 && %skill02=5 gosub *skill7e:goto *common_skill_a_end
if %before_action=44 && %skill03<2 gosub *skill8:goto *common_skill_a_end
if %before_action=44 && %skill03=2 gosub *skill8b:goto *common_skill_a_end
if %before_action=44 && %skill03=3 gosub *skill8c:goto *common_skill_a_end
if %before_action=44 && %skill03=4 gosub *skill8d:goto *common_skill_a_end
if %before_action=44 && %skill03=5 gosub *skill8e:goto *common_skill_a_end
if %before_action=45 && %skill04<2 gosub *skill10:goto *common_skill_a_end
if %before_action=45 && %skill04=2 gosub *skill10b:goto *common_skill_a_end
if %before_action=45 && %skill04=3 gosub *skill10c:goto *common_skill_a_end
if %before_action=45 && %skill04=4 gosub *skill10d:goto *common_skill_a_end
if %before_action=45 && %skill04=5 gosub *skill10e:goto *common_skill_a_end
if %before_action=46 && %skill05<2 gosub *skill14:goto *common_skill_a_end
if %before_action=46 && %skill05=2 gosub *skill14b:goto *common_skill_a_end
if %before_action=46 && %skill05=3 gosub *skill14c:goto *common_skill_a_end
if %before_action=46 && %skill05=4 gosub *skill14d:goto *common_skill_a_end
if %before_action=46 && %skill05=5 gosub *skill14e:goto *common_skill_a_end
if %before_action=47 gosub *skill15:goto *common_skill_a_end
if %before_action=55 gosub *skill17:goto *common_skill_a_end
if %before_action=56 gosub *skill23:goto *common_skill_a_end
if %before_action=57 gosub *skill25:goto *common_skill_a_end
if %before_action=59 gosub *skill22:goto *common_skill_a_end
if %before_action=60 gosub *skill18:goto *common_skill_a_end
goto *common_skill_a_end



*common_skill_a_end

mov %nikaime,0
if %skill_sub=3 mov %skill_sub,0
sub %stack,1
return



*skill1

if %skill_sub>0 add %stack,1
mov %before_action,21
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Here I come! Demon Decapitation!"
if %ransu=2 mov $sel1,"I got you now! Demon Decapitation!"
if %ransu=3 mov $sel1,"Take this! Demon Decapitation!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill1","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill1","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill1","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill1","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%mp-2:gosub *mp
mov $sel1,"Demon Decapitation":mov $sel2,"skill1"
gosub *custom_tag_check
skillname $sel1
eng $ori_name+" jumps in, and slashes at the neck!"
$sel6
if %skill_sub=1 skip 2
dwave 1,"se\tuki.ogg"
lsp 2,":a;effect\009_01.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009_02.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009_03.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009_04.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009_05.bmp",%tukix,%tukiy:print 10,12
csp 2
if %skill_sub=1 print 10,15:sub %stack,1:return
mov %abairitu,150+%mylv*3/2
gosub *enemylife
skillname ""
if %skill_sub>1 sub %stack,1:return
goto *common_attack_end



*skill2

if %skill_sub>0 add %stack,1
mov %before_action,41
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Take this and this and that!"
if %ransu=2 mov $sel1,"At least one will hit!"
if %ransu=3 mov $sel1,"Ahhhh!!!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill2","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill2","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill2","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill2","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%mp-2:gosub *mp
mov $sel1,"Flail Wildly":mov $sel2,"skill2"
gosub *custom_tag_check
skillname $sel1
eng $ori_name+" begins to rapidly swing around in random directions!"
$sel6\
dwave 1,"se\miss.ogg"
>Miss!
wait 500
dwave 1,"se\miss.ogg"
>Miss!
wait 1000
textclear
dwave 1,"se\miss.ogg"
>Miss!
wait 500
dwave 1,"se\miss.ogg"
>Miss!\
>....It's not very effective.\
skillname ""
if %skill_sub>0 sub %stack,1:return
goto *common_attack_end



*skill3

if %skill_sub>0 add %stack,1
mov %before_action,22
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Take this! Thunder Thrust!"
if %ransu=2 mov $sel1,"Ha! Thunder Thrust!"
if %ransu=3 mov $sel1,"Here I come! Thunder Thrust!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill3","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill3","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill3","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill3","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%mp-2:gosub *mp
mov $sel1,"Thunder Thrust":mov $sel2,"skill3"
gosub *custom_tag_check
skillname $sel1
eng $ori_name+" steps in like thunder, and sharply thrusts!"
$sel6/
if %skill_sub=1 gosub *skill3a:sub %stack,1:return
if %turn>1 gosub *skill3a
if %turn=1 gosub *skill3b
gosub *enemylife
skillname ""
if %skill_sub>1 sub %stack,1:return
goto *common_attack_end



*skill3a

>
if %skill_sub=1 skip 2
dwave 1,"se\tuki.ogg":mov %abairitu,120+%mylv*6/5
lsp 2,":a;effect\009a_01.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009a_02.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009a_03.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009a_04.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009a_05.bmp",%tukix,%tukiy:print 10,12
csp 2:print 1
return



*skill3b

add %stack,1
\
>The early attack gives a satisfying blow!
dwave 1,"se\slash3.ogg":mov %abairitu,200+%mylv*2
lsp 2,":a;effect\009b_01.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009b_02.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009b_03.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009b_04.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009b_05.bmp",%tukix,%tukiy:print 10,12
csp 2:print 1
sub %stack,1
return



*skill4

if %skill_sub>0 add %stack,1
mov %before_action,42
rnd2 %ransu,1,3
mov $sel1,"............."
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill4","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill4","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill4","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill4","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%mp-3:gosub *mp
mov $sel1,"Meditation":mov $sel2,"skill4"
gosub *custom_tag_check
skillname $sel1
eng $ori_name+" quietly meditates."
$sel6
if %skill_sub=1 sub %stack,1:return
dwave 2,"se\kaihuku.ogg"
mov %damage,%max_mylife/2
itoa $damage,%damage
eng $ori_name+" recovers "+$damage+" HPs!"
$sel6/
mov %mylife,%mylife+%damage
if %mylife>%max_mylife mov %mylife,%max_mylife
mov %gage,%mylife*100/%max_mylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 560,":a;system\gager"+$gagenum+".bmp",114,556
gosub *hp
print 10,500
\
skillname ""
if %max_mylife<%mylife*5 gosub *face1
if %skill_sub>1 sub %stack,1:return
goto "*"+$lavel+"_a"



*skill5

if %skill_sub>0 add %stack,1
mov %before_action,23
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Uooohhh! Demon Skull Beheading!"
if %ransu=2 mov $sel1,"How's this!? Demon Skull Beheading!"
if %ransu=3 mov $sel1,"I got you now! Demon Skull Beheading!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill5","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill5","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill5","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill5","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%mp-3:gosub *mp
mov $sel1,"Demon Skull Beheading":mov $sel2,"skill5"
gosub *custom_tag_check
skillname $sel1
if %tikei=1 mov $sel1,$ori_name+" climbs the mast and jumps off from the top!"
if %tikei=2 mov $sel1,$ori_name+" climbs a tree and jumps off from the top!"
if %tikei=3 mov $sel1,$ori_name+" climbs onto the ceiling and jumps off!"
if %tikei=4 mov $sel1,$ori_name+" climbs a pillar and jumps off from the top!"
if %tikei=5 mov $sel1,$ori_name+" climbs a building and jumps off from the top!"
if %tikei=6 getini $sel6,$mon_labo_mon_ini,"hero_skill5","skill_tikei":mov $sel1,$ori_name+$sel6
eng $sel1:$sel6\
eng $ori_name+" delivers a crushing blow to the head!"
$sel6
wait 500
dwave 1,"se\karaburi.ogg"
lsp 2,":c;effect\003.bmp",0,0:print 1
wait 300
csp 2:print 18,500,"system\mask01.jpg"
dwave 1,"se\bom2.ogg"
quake 10,1000
if %skill_sub=1 sub %stack,1:return
dwave 1,"se\damage2.ogg"
mov %abairitu,300+%mylv*3
gosub *enemylife
skillname ""
if %skill_sub>1 sub %stack,1:return
goto *common_attack_end



*skill6

if %skill_sub>0 add %stack,1
mov %before_action,24
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Death Sword Chaos Star!"
if %ransu=2 mov $sel1,"Eat this! Death Sword Chaos Star!"
if %ransu=3 mov $sel1,"Here I come! Death Sword Chaos Star!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill6","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill6","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill6","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill6","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%mp-4:gosub *mp
mov $sel1,"Death Sword Chaos Star":mov $sel2,"skill6"
gosub *custom_tag_check
skillname $sel1
eng $ori_name+"'s sword flashes like a chaotic shooting star!"
$sel6
wait 500
dwave 1,"se\slash.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
dwave 2,"se\slash.ogg"
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
dwave 3,"se\slash.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
csp 2:print 10,1000
if %skill_sub=1 sub %stack,1:return
textclear
dwave 1,"se\slash.ogg"
if %fire<2 rnd2 %abairitu,50+%mylv*1/2,150+%mylv*3/2
if %fire>1 rnd2 %abairitu,100+%mylv,225+%mylv*9/4
mov %damage_nobr,1:gosub *enemylife
dwave 1,"se\slash.ogg"
if %fire<2 rnd2 %abairitu,50+%mylv*1/2,150+%mylv*3/2
if %fire>1 rnd2 %abairitu,100+%mylv,225+%mylv*9/4
mov %damage_nobr,2:gosub *enemylife
textclear
dwave 1,"se\slash.ogg"
if %fire<2 rnd2 %abairitu,50+%mylv*1/2,150+%mylv*3/2
if %fire>1 rnd2 %abairitu,100+%mylv,225+%mylv*9/4
mov %damage_nobr,1:gosub *enemylife
dwave 1,"se\slash.ogg"
if %fire<2 rnd2 %abairitu,50+%mylv*1/2,150+%mylv*3/2
if %fire>1 rnd2 %abairitu,100+%mylv,225+%mylv*9/4
mov %damage_nobr,1:gosub *enemylife
dwave 1,"se\slash.ogg"
if %fire<2 rnd2 %abairitu,50+%mylv*1/2,150+%mylv*3/2
if %fire>1 rnd2 %abairitu,100+%mylv,225+%mylv*9/4
mov %damage_nobr,2:gosub *enemylife
\
skillname ""
if %skill_sub>1 sub %stack,1:return
goto *common_attack_end



*skill7

if %skill_sub>0 add %stack,1
mov %before_action,43
mov %count_wind,%count_wind+1
rnd2 %ransu,1,3
mov $sel1,"Sylph, lend me your power!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill7","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill7","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill7","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill7","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%mp-2:gosub *mp
mov $sel1,"Wind Protection":mov $sel2,"skill7"
gosub *custom_tag_check
skillname $sel1
mov %wind,1:mov %wind_turn,8
if %skill01<9 mov %earth,0:mov %earth_turn,0
if %skill02=4 mov %earth,0:mov %earth_turn,0
mov %aqua,0:mov %aqua_turn,0:mov %fire,0:mov %fire_turn,0
dwave 2,"se\wind2.ogg"
rnd2 %ransu,1,100
notif %ransu=100 lsp2 0,":a;chara\sylph_st12.bmp",200,300,100,100,0,200
if %ransu=100 lsp2 0,":a;chara\sylph_st07.bmp",200,300,100,100,0,200:mov %g_sylph,1
gosub *syoukan_effect
mov %windiconlock,0:gosub *elm_print
eng "Powerful winds blow around "+$ori_name+"!"
$sel6\
skillname ""
if %skill_sub>1 sub %stack,1:return
goto "*"+$lavel+"_a"



*skill7b

if %skill_sub>0 add %stack,1
mov %before_action,43
mov %count_wind,%count_wind+1
rnd2 %ransu,1,3
mov $sel1,"Summon a gale itself into my body...!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill7","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill7","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill7","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill7","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%mp-2:gosub *mp
mov $sel1,"Playful Wind":mov $sel2,"skill7b"
gosub *custom_tag_check
skillname $sel1
mov %wind,2:mov %wind_turn,12
if %skill01<9 mov %earth,0:mov %earth_turn,0
if %skill02=4 mov %earth,0:mov %earth_turn,0
mov %aqua,0:mov %aqua_turn,0:mov %fire,0:mov %fire_turn,0
dwave 2,"se\wind2.ogg"
rnd2 %ransu,1,100
notif %ransu=100 lsp2 0,":a;chara\sylph_st12.bmp",200,300,100,100,0,200
if %ransu=100 lsp2 0,":a;chara\sylph_st07.bmp",200,300,100,100,0,200:mov %g_sylph,1
gosub *syoukan_effect
mov %windiconlock,0:gosub *elm_print
eng "Powerful winds infuse "+$ori_name+"'s body, dramatically increasing its speed!"
$sel6\
skillname ""
if %skill_sub>1 sub %stack,1:return
goto "*"+$lavel+"_a"



*skill7c

if %skill_sub>0 add %stack,1
mov %before_action,43
mov %count_wind,%count_wind+1
rnd2 %ransu,1,3
mov $sel1,"Sylph, rage around as you please!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill7","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill7","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill7","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill7","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%mp-1:gosub *mp
mov $sel1,"Devastating Gale":mov $sel2,"skill7c"
gosub *custom_tag_check
skillname $sel1
mov %wind,3:mov %wind_turn,16
dwave 2,"se\wind3.ogg"
rnd2 %ransu,1,100
notif %ransu=100 lsp2 0,":a;chara\sylph_st12.bmp",200,300,100,100,0,200
if %ransu=100 lsp2 0,":a;chara\sylph_st07.bmp",200,300,100,100,0,200:mov %g_sylph,1
gosub *syoukan_effect
mov %windiconlock,0:gosub *elm_print
eng $ori_name+"'s movements become as fast and powerful as a devastating gale!"
$sel6\
skillname ""
if %skill_sub>1 sub %stack,1:return
goto "*"+$lavel+"_a"



*skill7d

if %skill_sub>0 add %stack,1
mov %before_action,43
mov %count_wind,%count_wind+1
rnd2 %ransu,1,3
mov $sel1,"Infallible and unfailing... The Dance of the Fallen!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill7","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill7","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill7","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill7","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%mp-2:gosub *mp
mov $sel1,"Fallen Angel Dance":mov $sel2,"skill7d"
gosub *custom_tag_check
skillname $sel1
mov %wind,4:mov %wind_turn,12
mov %earth,0:mov %earth_turn,0
mov %aqua,0:mov %aqua_turn,0
mov %fire,0:mov %fire_turn,0
dwave 2,"se\wind2.ogg"
rnd2 %ransu,1,100
notif %ransu=100 lsp2 0,":a;chara\sylph_st12.bmp",200,300,100,100,0,200
if %ransu=100 lsp2 0,":a;chara\sylph_st07.bmp",200,300,100,100,0,200:mov %g_sylph,1
gosub *syoukan_effect
if %mon_labo_on<>1 bg "BG\"+$haikei+".bmp",99,700,"system\lngtwave.dll/vwi":skip 3
gosub *check_haikei:if $teigi2="skip" skip 2
bg $teigi3+$teigi1,99,700,"system\lngtwave.dll/vwi"
mov %windiconlock,0:gosub *elm_print
eng $ori_name+" becomes one with a sacred wave!"
$sel6\
skillname ""
if %skill_sub>1 sub %stack,1:return
goto "*"+$lavel+"_a"



*skill7e

if %skill_sub>0 add %stack,1
mov %before_action,43
mov %count_wind,%count_wind+1
rnd2 %ransu,1,3
mov $sel1,"Infallible and unfailing... The Dance of the Fallen!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill7","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill7","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill7","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill7","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%mp-1:gosub *mp
mov $sel1,"Fallen Angel Dance: Gale":mov $sel2,"skill7e"
gosub *custom_tag_check
skillname $sel1
mov %wind,3:mov %wind_turn,16
dwave 2,"se\wind3.ogg"
rnd2 %ransu,1,100
notif %ransu=100 lsp2 0,":a;chara\sylph_st12.bmp",200,300,100,100,0,200
if %ransu=100 lsp2 0,":a;chara\sylph_st07.bmp",200,300,100,100,0,200:mov %g_sylph,1
gosub *syoukan_effect
if %mon_labo_on<>1 bg "BG\"+$haikei+".bmp",99,700,"system\lngtwave.dll/vwi":skip 3
gosub *check_haikei:if $teigi2="skip" skip 2
bg $teigi3+$teigi1,99,700,"system\lngtwave.dll/vwi"
mov %windiconlock,0:gosub *elm_print
eng $ori_name+" becomes one with a sacred wave!"
$sel6\
skillname ""
if %skill_sub>1 sub %stack,1:return
goto "*"+$lavel+"_a"



*skill8

if %skill_sub>0 add %stack,1
mov %before_action,44
mov %count_earth,%count_earth+1
rnd2 %ransu,1,3
mov $sel1,"Gnome, lend me your power!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill8","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill8","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill8","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill8","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%mp-2:gosub *mp
mov $sel1,"Strength of the Earth":mov $sel2,"skill8"
gosub *custom_tag_check
skillname $sel1
mov %earth,1:mov %earth_turn,8
if %skill01<9 mov %wind,0:mov %wind_turn,0
if %skill03=4 mov %wind,0:mov %wind_turn,0
mov %aqua,0:mov %aqua_turn,0:mov %fire,0:mov %fire_turn,0
dwave 2,"se\earth4.ogg"
rnd2 %ransu,1,100
notif %ransu=100 lsp2 0,":a;chara\gnome_st21.bmp",200,300,100,100,0,200
if %ransu=100 lsp2 0,":a;chara\gnome_st12.bmp",200,300,100,100,0,200:mov %z_gnome,1
gosub *syoukan_effect
gosub *elm_print
eng "The power of the Earth floods into "+$ori_name+"'s body!"
$sel6\
skillname ""
if %skill_sub>1 sub %stack,1:return
goto "*"+$lavel+"_a"



*skill8b

if %skill_sub>0 add %stack,1
mov %before_action,44
mov %count_earth,%count_earth+1
rnd2 %ransu,1,3
mov $sel1,"Take the breath of the earth into my body...!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill8","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill8","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill8","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill8","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%mp-2:gosub *mp
mov $sel1,"Breath of the Earth":mov $sel2,"skill8b"
gosub *custom_tag_check
skillname $sel1
mov %earth,2:mov %earth_turn,12
if %skill01<9 mov %wind,0:mov %wind_turn,0
if %skill03=4 mov %wind,0:mov %wind_turn,0
mov %aqua,0:mov %aqua_turn,0:mov %fire,0:mov %fire_turn,0
dwave 2,"se\earth1.ogg"
rnd2 %ransu,1,100
notif %ransu=100 lsp2 0,":a;chara\gnome_st21.bmp",200,300,100,100,0,200
if %ransu=100 lsp2 0,":a;chara\gnome_st12.bmp",200,300,100,100,0,200:mov %z_gnome,1
gosub *syoukan_effect
gosub *elm_print
eng "The breath of the Earth takes hold in "+$ori_name+"'s body!"
$sel6\
skillname ""
if %skill_sub>1 sub %stack,1:return
goto "*"+$lavel+"_a"



*skill8c

if %skill_sub>0 add %stack,1
mov %before_action,44
mov %count_earth,%count_earth+1
rnd2 %ransu,1,3
mov $sel1,"Gnome, infuse me with the unmoving power of the earth!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill8","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill8","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill8","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill8","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%mp-1:gosub *mp
mov $sel1,"Wild Lands":mov $sel2,"skill8c"
gosub *custom_tag_check
skillname $sel1
mov %earth,3:mov %earth_turn,16
dwave 2,"se\earth2.ogg"
rnd2 %ransu,1,100
notif %ransu=100 lsp2 0,":a;chara\gnome_st21.bmp",200,300,100,100,0,200
if %ransu=100 lsp2 0,":a;chara\gnome_st12.bmp",200,300,100,100,0,200:mov %z_gnome,1
gosub *syoukan_effect
gosub *elm_print
eng "The unmoving power of the Earth takes hold in "+$ori_name+"'s body!"
$sel6\
skillname ""
if %skill_sub>1 sub %stack,1:return
goto "*"+$lavel+"_a"



*skill8d

if %skill_sub>0 add %stack,1
mov %before_action,44
mov %count_earth,%count_earth+1
rnd2 %ransu,1,3
mov $sel1,"Take the breath of the earth into my body...!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill8","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill8","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill8","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill8","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%mp-2:gosub *mp
mov $sel1,"Breath of the Earth":mov $sel2,"skill8d"
gosub *custom_tag_check
skillname $sel1
mov %earth,2:mov %earth_turn,12
mov %wind,0:mov %wind_turn,0
mov %aqua,0:mov %aqua_turn,0
mov %fire,0:mov %fire_turn,0
dwave 2,"se\earth1.ogg"
rnd2 %ransu,1,100
notif %ransu=100 lsp2 0,":a;chara\gnome_st21.bmp",200,300,100,100,0,200
if %ransu=100 lsp2 0,":a;chara\gnome_st12.bmp",200,300,100,100,0,200:mov %z_gnome,1
gosub *syoukan_effect
gosub *elm_print
eng "The breath of the Earth takes hold in "+$ori_name+"'s body!"
$sel6\
skillname ""
if %skill_sub>1 sub %stack,1:return
goto "*"+$lavel+"_a"



*skill8e

if %skill_sub>0 add %stack,1
mov %before_action,44
mov %count_earth,%count_earth+1
rnd2 %ransu,1,3
mov $sel1,"Gnome, infuse me with the unmoving power of the earth!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill8","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill8","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill8","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill8","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%mp-1:gosub *mp
mov $sel1,"Wild Lands":mov $sel2,"skill8e"
gosub *custom_tag_check
skillname $sel1
mov %earth,3:mov %earth_turn,16
dwave 2,"se\earth2.ogg"
rnd2 %ransu,1,100
notif %ransu=100 lsp2 0,":a;chara\gnome_st21.bmp",200,300,100,100,0,200
if %ransu=100 lsp2 0,":a;chara\gnome_st12.bmp",200,300,100,100,0,200:mov %z_gnome,1
gosub *syoukan_effect
gosub *elm_print
eng "The unmoving power of the Earth takes hold in "+$ori_name+"'s body!"
$sel6\
skillname ""
if %skill_sub>1 sub %stack,1:return
goto "*"+$lavel+"_a"



*skill10

if %skill_sub>0 add %stack,1
mov %before_action,45
mov %count_aqua,%count_aqua+1
rnd2 %ransu,1,3
mov $sel1,"Undine, lend me your power!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill10","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill10","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill10","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill10","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%mp-2:gosub *mp
mov $sel1,"Water Wall":mov $sel2,"skill10"
gosub *custom_tag_check
skillname $sel1
mov %aqua,1:mov %aqua_turn,8
mov %wind,0:mov %wind_turn,0:mov %earth,0:mov %earth_turn,0:mov %fire,0:mov %fire_turn,0
dwave 2,"se\aqua2.ogg"
lsp2 0,":a;chara\undine_st11.bmp",200,300,100,100,0,200
gosub *syoukan_effect
mov %aquaiconlock,0:gosub *elm_print
eng "A thin wall of water surrounds "+$ori_name+"!"
$sel6\
skillname ""
if %skill_sub>1 sub %stack,1:return
goto "*"+$lavel+"_a"



*skill10b

if %skill_sub>0 add %stack,1
mov %before_action,45
mov %count_aqua,%count_aqua+1
rnd2 %ransu,1,3
mov $sel1,"Take the flow into my heart...!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill10","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill10","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill10","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill10","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 2
gosub *selprinthero
mov $sel1,"Serene Mind":mov $sel2,"skill10b"
gosub *custom_tag_check
skillname $sel1
mov %aqua,2
mov %wind,0:mov %wind_turn,0
mov %earth,0:mov %earth_turn,0
mov %fire,0:mov %fire_turn,0
dwave 2,"se\aqua.ogg"
lsp2 0,":a;chara\undine_st11.bmp",200,300,100,100,0,200
gosub *syoukan_effect
mov %aquaiconlock,0:gosub *elm_print
bgmstop
bg black,10,1500
bgm "bgm\aqua.ogg"
eng $ori_name+" entrusts the heart to the flow of water!"
$sel6\
skillname ""
if %skill_sub>1 sub %stack,1:return
goto "*"+$lavel+"_a"



*skill10c

if %skill_sub>0 add %stack,1
mov %before_action,45
mov %count_aqua,%count_aqua+1
rnd2 %ransu,1,3
mov $sel1,"Calm my heart and mind..."
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill10","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill10","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill10","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill10","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%mp-4:gosub *mp
mov $sel1,"Serene Mind":mov $sel2,"skill10c"
gosub *custom_tag_check
skillname $sel1
mov %aqua,3:mov %aqua_turn,16
dwave 2,"se\aqua.ogg"
lsp2 0,":a;chara\undine_st11.bmp",200,300,100,100,0,200
gosub *syoukan_effect
mov %aquaiconlock,0:gosub *elm_print
eng $ori_name+" clears the mind and connects with the flow of the world!"
$sel6\
skillname ""
if %skill_sub>1 sub %stack,1:return
goto "*"+$lavel+"_a"



*skill10d

if %skill_sub>0 add %stack,1
mov %before_action,45
rnd2 %ransu,1,3
mov $sel1,"Calm my heart and mind..."
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill10","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill10","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill10","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill10","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%mp-2:gosub *mp
mov $sel1,"Serene Mind":mov $sel2,"skill10d"
gosub *custom_tag_check
skillname $sel1
mov %aqua,4:mov %aqua_turn,12
mov %wind,0:mov %wind_turn,0
mov %earth,0:mov %earth_turn,0
mov %fire,0:mov %fire_turn,0
dwave 2,"se\aqua.ogg"
mov %count_aqua,%count_aqua+1
lsp2 0,":a;chara\undine_st11.bmp",200,300,100,100,0,200
gosub *syoukan_effect
mov %aquaiconlock,0:gosub *elm_print
eng "Through a calm heart and mind,"+$ori_name+" achieves a serene state!"
$sel6\
skillname ""
if %skill_sub>1 sub %stack,1:return
goto "*"+$lavel+"_a"



*skill10e

if %skill_sub>0 add %stack,1
mov %before_action,45
mov %count_aqua,%count_aqua+1
rnd2 %ransu,1,3
mov $sel1,"Calm my heart and mind..."
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill10","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill10","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill10","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill10","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%mp-2:gosub *mp
mov $sel1,"Serene Mind":mov $sel2,"skill10e"
gosub *custom_tag_check
skillname $sel1
mov %aqua,3:mov %aqua_turn,16
dwave 2,"se\aqua.ogg"
lsp2 0,":a;chara\undine_st11.bmp",200,300,100,100,0,200
gosub *syoukan_effect
mov %aquaiconlock,0:gosub *elm_print
eng $ori_name+" clears the mind and connects with the flow of the world!"
$sel6\
skillname ""
if %skill_sub>1 sub %stack,1:return
goto "*"+$lavel+"_a"



*skill11

if %skill_sub>0 add %stack,1
mov %before_action,25
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"With the wind guiding my sword... Lightning Sword Flash!"
if %ransu=2 mov $sel1,"With Sylph's power...! Lightning Sword Flash!"
if %ransu=3 mov $sel1,"Here I come! Lightning Sword Flash!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill11","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill11","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill11","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill11","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%mp-2:gosub *mp
mov $sel1,"Lightning Sword Flash":mov $sel2,"skill11"
gosub *custom_tag_check
skillname $sel1
eng "Moving like a powerful gale, "+$ori_name+" thrusts forward as fast as lightning!"
$sel6/
if %wind=0 skip 18
delay 500
csp 590:csp 591
mov $sel1,"Lightning Sword Flash":mov $sel2,"skill11"
gosub *custom_tag_check
skillname1 $sel1
textoff
vspl 3,650,0
dwave 2,"se\wind2.ogg"
lsp2 0,":c;effect\cutin_ruka_wind.bmp",600,150,100,100,0,10
lsp2 1,":c;effect\cutin_wind.bmp",200,150,100,100,0,10
gosub *skill_cutin
vspl 3,650,1
texton
csp 0:csp 1
mov $sel1,"Lightning Sword Flash":mov $sel2,"skill11"
gosub *custom_tag_check
skillname $sel1
if %turn>1 && %wind=0 gosub *skill11a
if %turn=1 gosub *skill11b
if %wind>0 gosub *skill11c
if %skill_sub=1 sub %stack,1:return
gosub *enemylife
skillname ""
if %skill_sub>1 sub %stack,1:return
goto *common_attack_end



*skill11a

>
dwave 1,"se\tuki.ogg":mov %abairitu,220+%mylv*11/5
if %fire>1 mov %abairitu,%abairitu*3/2
lsp 1,":a;effect\wind.bmp",0,0:print 10,12
lsp 2,":a;effect\009a_01.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009a_02.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009a_03.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009a_04.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009a_05.bmp",%tukix,%tukiy:print 10,12
csp 1:print 10,12
csp 2:print 1
return



*skill11b

add %stack,1
\
>The early attack lands a powerful blow!
dwave 1,"se\slash3.ogg":mov %abairitu,350+%mylv*7/2
if %fire>1 mov %abairitu,%abairitu*3/2
lsp 1,":a;effect\wind.bmp",0,0:print 10,12
lsp 2,":a;effect\009b_01.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009b_02.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009b_03.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009b_04.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009b_05.bmp",%tukix,%tukiy:print 10,12
csp 1:print 10,12
csp 2:print 1
sub %stack,1
return



*skill11c

>
dwave 1,"se\slash3.ogg":mov %abairitu,350+%mylv*7/2
if %fire>1 mov %abairitu,%abairitu*3/2
lsp 1,":a;effect\wind.bmp",0,0:print 10,12
lsp 2,":a;effect\009b_01.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009b_02.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009b_03.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009b_04.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009b_05.bmp",%tukix,%tukiy:print 10,12
csp 1:print 10,12
csp 2:print 1
return



*skill12

if %skill_sub>0 add %stack,1
mov %before_action,26
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Oh Earth, infuse my sword with your weight! Earth Rumbling Decapitation!"
if %ransu=2 mov $sel1,"Gnome, lend me your power! Earth Rumbling Decapitation!"
if %ransu=3 mov $sel1,"Feel the weight of the Earth itself! Earth Rumbling Decapitation!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill12","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill12","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill12","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill12","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%mp-3:gosub *mp
mov $sel1,"Earth Rumbling Decapitation":mov $sel2,"skill12"
gosub *custom_tag_check
skillname $sel1
eng $ori_name+" jumps in the air and infuses the body with the power of the Earth!"
$sel6\
eng $ori_name+" slams down, shaking the Earth itself upon landing!"
$sel6
if %earth=0 skip 18
delay 500
csp 590:csp 591
mov $sel1,"Earth Rumbling Decapitation":mov $sel2,"skill12"
gosub *custom_tag_check
skillname1 $sel1
textoff
vspl 3,650,0
dwave 2,"se\earth1.ogg"
lsp2 0,":c;effect\cutin_ruka_earth.bmp",600,150,100,100,0,10
lsp2 1,":c;effect\cutin_earth.bmp",200,150,100,100,0,10
gosub *skill_cutin
vspl 3,650,1
texton
csp 0:csp 1
mov $sel1,"Earth Rumbling Decapitation":mov $sel2,"skill12"
gosub *custom_tag_check
skillname $sel1
dwave 1,"se\karaburi.ogg"
lsp 2,":c;effect\earth.bmp",0,0:print 1
wait 300
csp 2:print 18,500,"system\mask01.jpg"
dwave 1,"se\bom2.ogg"
quake 10,1000
if %skill_sub=1 sub %stack,1:return
dwave 1,"se\damage2.ogg"
mov %abairitu,450+%mylv*9/2
if %earth>0 mov %abairitu,%abairitu*4/3
if %fire>1 mov %abairitu,%abairitu*4/3
gosub *enemylife
skillname ""
if %skill_sub>1 sub %stack,1:return
goto *common_attack_end



*skill13

if %skill_sub>0 add %stack,1
mov %before_action,27
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Along the flow... Serene Demon Sword!"
if %ransu=2 mov $sel1,"Undine, lend me your power... Serene Demon Sword!"
if %ransu=3 mov $sel1,"I shall cut everything in my path... Serene Demon Sword!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill13","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill13","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill13","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill13","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%mp-2:gosub *mp
mov %aqua_end,1
mov $sel1,"Serene Demon Sword":mov $sel2,"skill13"
gosub *custom_tag_check
skillname $sel1
eng $ori_name+" sheathes the sword, and rests the hand on the hilt!"
$sel6\
eng "Drawing it in a fluid slash, "+$ori_name+" slices straight through everything in his path!"
$sel6
if %aqua=0 skip 18
delay 500
csp 590:csp 591
mov $sel1,"Serene Demon Sword":mov $sel2,"skill13"
gosub *custom_tag_check
skillname1 $sel1
textoff
vspl 3,650,0
dwave 2,"se\aqua2.ogg"
lsp2 0,":c;effect\cutin_ruka_aqua.bmp",600,150,100,100,0,10
lsp2 1,":c;effect\cutin_aqua.bmp",200,150,100,100,0,10
gosub *skill_cutin
vspl 3,650,1
texton
csp 0:csp 1
mov $sel1,"Serene Demon Sword":mov $sel2,"skill13"
gosub *custom_tag_check
skillname $sel1
dwave 3,"se\karaburi.ogg"
lsp 2,":c;effect\006a.bmp",0,0:print 1
wait 300
csp 2:print 18,500,"system\mask01.jpg"
if %skill_sub=1 sub %stack,1:return
dwave 4,"se\slash4.ogg"
mov %abairitu,300+%mylv*3
if %aqua>0 mov %abairitu,%abairitu*2
if %fire>1 mov %abairitu,%abairitu*3/2
gosub *enemylife
skillname ""
if %skill_sub>1 sub %stack,1:return
goto *common_attack_end



*skill14

if %skill_sub>0 add %stack,1
mov %before_action,46
mov %count_fire,%count_fire+1
rnd2 %ransu,1,3
mov $sel1,"Salamander, lend me your power...!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill14","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill14","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill14","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill14","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%mp-2:gosub *mp
mov $sel1,"Blade of Flame":mov $sel2,"skill14"
gosub *custom_tag_check
skillname $sel1
mov %fire,1:mov %fire_turn,5
mov %wind,0:mov %wind_turn,0:mov %earth,0:mov %earth_turn,0
dwave 2,"se\fire1.ogg"
lsp2 0,":a;chara\salamander_st02.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *elm_print
eng "Flames spread across "+$ori_name+"'s sword!"
$sel6\
skillname ""
if %skill_sub>1 sub %stack,1:return
goto "*"+$lavel+"_a"



*skill14b

if %skill_sub>0 add %stack,1
mov %before_action,46
mov %count_fire,%count_fire+1
rnd2 %ransu,1,3
mov $sel1,"Infuse my sword with the flames of hell itself!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill14","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill14","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill14","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill14","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%max_mp:gosub *mp
mov $sel1,"Hellfire Sword":mov $sel2,"skill14b"
gosub *custom_tag_check
skillname $sel1
mov %wind,0:mov %wind_turn,0:mov %earth,0:mov %earth_turn,0:mov %aqua,0:mov %aqua_turn,0
mov %fire,2:mov %fire_turn,5
dwave 2,"se\fire2.ogg"
lsp2 0,":a;chara\salamander_st02.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *elm_print
eng "Licks of flame run up and down "+$ori_name+"'s sword, ready to ignite with any skill!"
$sel6\
skillname ""
if %skill_sub>1 sub %stack,1:return
goto "*"+$lavel+"_a"



*skill14c

if %skill_sub>0 add %stack,1
mov %before_action,46
mov %count_fire,%count_fire+1
rnd2 %ransu,1,3
mov $sel1,"Salamander, purify everything with the flames of purgatory!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill14","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill14","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill14","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill14","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%max_mp:gosub *mp
mov $sel1,"Purgatory Flame":mov $sel2,"skill14c"
gosub *custom_tag_check
skillname $sel1
mov %fire,3:mov %fire_turn,5
dwave 2,"se\fire4.ogg"
lsp2 0,":a;chara\salamander_st02.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *elm_print
eng "Licks of flame run up and down "+$ori_name+"'s sword, ready to ignite with any skill!"
$sel6\
skillname ""
if %skill_sub>1 sub %stack,1:return
goto "*"+$lavel+"_a"



*skill14d

if %skill_sub>0 add %stack,1
mov %before_action,46
mov %count_fire,%count_fire+1
rnd2 %ransu,1,3
mov $sel1,"Infuse my sword with the flames of hell itself!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill14","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill14","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill14","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill14","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%max_mp:gosub *mp
mov $sel1,"Hellfire Sword":mov $sel2,"skill14d"
gosub *custom_tag_check
skillname $sel1
mov %wind,0:mov %wind_turn,0:mov %earth,0:mov %earth_turn,0:mov %aqua,0:mov %aqua_turn,0
mov %fire,2:mov %fire_turn,5
dwave 2,"se\fire2.ogg"
lsp2 0,":a;chara\salamander_st02.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *elm_print
eng "Licks of flame run up and down "+$ori_name+"'s sword, ready to ignite with any skill!"
$sel6\
skillname ""
if %skill_sub>1 sub %stack,1:return
goto "*"+$lavel+"_a"



*skill14e

if %skill_sub>0 add %stack,1
mov %before_action,46
mov %count_fire,%count_fire+1
rnd2 %ransu,1,3
mov $sel1,"Salamander, purify everything with the flames of purgatory!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill14","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill14","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill14","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill14","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%max_mp:gosub *mp
mov $sel1,"Purgatory Flame":mov $sel2,"skill14e"
gosub *custom_tag_check
skillname $sel1
mov %fire,3:mov %fire_turn,5
dwave 2,"se\fire4.ogg"
lsp2 0,":a;chara\salamander_st02.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *elm_print
eng "Licks of flame run up and down "+$ori_name+"'s sword, ready to ignite with any skill!"
$sel6\
skillname ""
if %skill_sub>1 sub %stack,1:return
goto "*"+$lavel+"_a"



*skill15

if %skill_sub>0 add %stack,1
mov %before_action,47
mov %kadora,1
mov %kadora_damage,0
if %aqua<>2 skip 5
if %mon_labo_on<>1 bg "BG\"+$haikei+".bmp",10,1500:skip 3
gosub *check_haikei:if $teigi2="skip" skip 2
bg $teigi3+$teigi1,10,1500
gosub *musicplay
mov %wind,0:mov %wind_turn,0:mov %earth,0:mov %earth_turn,0:mov %aqua,0:mov %aqua_turn,0:mov %fire,0:mov %fire_turn,0
gosub *elm_print
if %nikaime=1 skip 2
mov %mp,%mp-1:gosub *mp
name $ori_name
>Come, Sylph!\
name ""
mov $sel1,"Sylph":mov $sel2,"skill15"
gosub *custom_tag_check
skillname $sel1
dwave 2,"se\wind2.ogg"
lsp2 0,":a;chara\sylph_st12.bmp",200,300,100,100,0,200
gosub *syoukan_effect
eng "The power of wind takes hold in "+$ori_name+"'s sword!"
$sel6\
skillname ""
if %skill_sub>1 sub %stack,1:return
goto "*"+$lavel+"_a"



*skill15a

mov %before_action,47
mov %kadora,2
name $ori_name
>Come, Gnome!\
name ""
skillname "Gnome"
dwave 2,"se\earth1.ogg"
lsp2 0,":a;chara\gnome_st21.bmp",200,300,100,100,0,200
gosub *syoukan_effect
eng "The power of earth takes hold in "+$ori_name+"'s sword!"
$sel6\
skillname ""
goto "*"+$lavel+"_a"



*skill15b

mov %before_action,47
mov %kadora,3
name $ori_name
>Come, Undine!\
name ""
skillname "Undine"
dwave 2,"se\aqua2.ogg"
lsp2 0,":a;chara\undine_st11.bmp",200,300,100,100,0,200
gosub *syoukan_effect
eng "The power of water takes hold in "+$ori_name+"'s sword!"
$sel6\
skillname ""
goto "*"+$lavel+"_a"



*skill15c

mov %before_action,47
mov %kadora,4
name $ori_name
>Come, Salamander!\
name ""
skillname "Salamander"
dwave 2,"se\fire2.ogg"
lsp2 0,":a;chara\salamander_st02.bmp",200,300,100,100,0,200
gosub *syoukan_effect
eng "The power of fire takes hold in "+$ori_name+"'s sword!"
$sel6\
skillname ""
goto "*"+$lavel+"_a"



*skill15d

if %skill_sub>0 add %stack,1
mov %before_action,28
mov %kadora,0
mov %count_kadora,1
rnd2 %ransu,1,3
mov $sel1,"It's over! Quadruple Giga!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill15","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill15","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill15","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill15","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 2
gosub *selprinthero
mov $sel1,"Quadruple Giga":mov $sel2,"skill15d"
gosub *custom_tag_check
skillname $sel1
>The power of the four spirits amplify each other, and explode in a torrent of magical energy!\
eng "The power to smash anything is thrown off of "+$ori_name+"'s sword!"
$sel6
delay 500
csp 590:csp 591
mov $sel1,"Quadruple Giga":mov $sel2,"skill15d"
gosub *custom_tag_check
skillname1 $sel1
textoff
vspl 3,650,0
dwave 2,"se\wind2.ogg"
lsp2 2,":c;effect\cutin_wind.bmp",100,150,100,100,0,10
for %move=0 to 200 step 20
msp2 2,0,20,0,0,0,24
print 1:wait 5
next
csp2 2
lsp 10,":c;effect\cutin_wind.bmp",0,0:print 1
dwave 3,"se\earth1.ogg"
lsp2 2,":c;effect\cutin_earth.bmp",300,150,100,100,0,10
for %move=0 to 200 step 20
msp2 2,0,20,0,0,0,24
print 1:wait 5
next
csp2 2
lsp 11,":c;effect\cutin_earth.bmp",200,0:print 1
dwave 4,"se\aqua2.ogg"
lsp2 3,":c;effect\cutin_aqua.bmp",500,150,100,100,0,10
for %move=0 to 200 step 20
msp2 3,0,20,0,0,0,24
print 1:wait 5
next
csp2 3
lsp 12,":c;effect\cutin_aqua.bmp",400,0:print 1
dwave 5,"se\fire2.ogg"
lsp2 4,":c;effect\cutin_fire.bmp",700,150,100,100,0,10
for %move=0 to 200 step 20
msp2 4,0,20,0,0,0,24
print 1:wait 5
next
csp2 4
lsp 13,":c;effect\cutin_fire.bmp",600,0:print 1
cspl 10,13:print 10,600
vspl 3,650,1
texton
csp 0:csp 1
mov $sel1,"Quadruple Giga":mov $sel2,"skill15d"
gosub *custom_tag_check
skillname $sel1
wait 500
dwave 1,"se\karaburi.ogg"
lsp 2,":c;effect\003.bmp",0,0:print 1
wait 300
dwave 3,"se\earth1.ogg"
lsp 2,":a;effect\earth.bmp",0,0:print 1
wait 100
dwave 5,"se\fire2.ogg"
lsp 2,":a;effect\fire.bmp",0,0:print 1
wait 100
dwave 4,"se\aqua2.ogg"
lsp 2,":a;effect\aqua.bmp",0,0:print 1
wait 100
dwave 2,"se\wind2.ogg"
lsp 2,":a;effect\wind.bmp",0,0:print 1
wait 100
csp 2:print 18,500,"system\mask01.jpg"
dwave 1,"se\bom3.ogg"
quake 10,2000
if %skill_sub=1 sub %stack,1:return
dwave 1,"se\damage2.ogg"
rnd2 %damage,40000,50000:gosub *enemylife2
skillname ""
if %skill_sub>1 sub %stack,1:return
goto *common_attack_end



*skill16

if %skill_sub>0 add %stack,1
mov %before_action,29
rnd2 %ransu,1,2
if %ransu=1 mov $sel1,"I'll purify you in the flames of purgatory... Vaporizing Rebellion Sword!"
if %ransu=2 mov $sel1,"Lend me your power, Salamander! Vaporizing Rebellion Sword!"
if $lavel="tuika" rnd2 %ransu,1,3
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill16","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill16","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill16","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill16","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%mp-4:gosub *mp
mov $sel1,"Vaporizing Rebellion Sword":mov $sel2,"skill16"
gosub *custom_tag_check
skillname $sel1
eng "Burning with the flames of purgatory, "+$ori_name+" slashes in a whirlwind of fire!"
$sel6
if %fire=0 skip 18
delay 500
csp 590:csp 591
mov $sel1,"Vaporizing Rebellion Sword":mov $sel2,"skill16"
gosub *custom_tag_check
skillname1 $sel1
textoff
vspl 3,650,0
dwave 2,"se\fire2.ogg"
lsp2 0,":c;effect\cutin_ruka_fire.bmp",600,150,100,100,0,10
lsp2 1,":c;effect\cutin_fire.bmp",200,150,100,100,0,10
gosub *skill_cutin
texton
vspl 3,650,1
csp 0:csp 1
mov $sel1,"Vaporizing Rebellion Sword":mov $sel2,"skill16"
gosub *custom_tag_check
skillname $sel1
gosub *skill16a
if %skill_sub=1 sub %stack,1:return
textclear
dwave 1,"se\slash.ogg"
if %fire<2 rnd2 %abairitu,150+%mylv*3/2,200+%mylv*2
if %fire>1 rnd2 %abairitu,200+%mylv*2,300+%mylv*3
mov %damage_nobr,1:gosub *enemylife
dwave 1,"se\slash.ogg"
if %fire<2 rnd2 %abairitu,150+%mylv*3/2,200+%mylv*2
if %fire>1 rnd2 %abairitu,200+%mylv*2,300+%mylv*3
mov %damage_nobr,2:gosub *enemylife
textclear
dwave 1,"se\slash.ogg"
if %fire<2 rnd2 %abairitu,150+%mylv*3/2,200+%mylv*2
if %fire>1 rnd2 %abairitu,200+%mylv*2,300+%mylv*3
mov %damage_nobr,1:gosub *enemylife
dwave 1,"se\slash.ogg"
if %fire<2 rnd2 %abairitu,150+%mylv*3/2,200+%mylv*2
if %fire>1 rnd2 %abairitu,200+%mylv*2,300+%mylv*3
mov %damage_nobr,1:gosub *enemylife
dwave 1,"se\slash.ogg"
if %fire<2 rnd2 %abairitu,150+%mylv*3/2,200+%mylv*2
if %fire>1 rnd2 %abairitu,200+%mylv*2,300+%mylv*3
mov %damage_nobr,2:gosub *enemylife
\
skillname ""
if %skill_sub>1 sub %stack,1:return
goto *common_attack_end



*skill16a

dwave 1,"se\slash.ogg"
dwave 9,"se\fire2.ogg"
skipoff
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":a;effect\fire.bmp",0,0:print 1
dwave 2,"se\slash.ogg"
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":a;effect\fire.bmp",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":a;effect\fire.bmp",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
lsp 2,":a;effect\fire.bmp",0,0:print 1
dwave 3,"se\slash.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":a;effect\fire.bmp",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":a;effect\fire.bmp",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":a;effect\fire.bmp",0,0:print 1
dwave 4,"se\slash.ogg"
lsp 2,":c;effect\005_04.jpg",0,0:print 1
lsp 2,":a;effect\fire.bmp",0,0:print 1
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":a;effect\fire.bmp",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":a;effect\fire.bmp",0,0:print 1
dwave 5,"se\slash.ogg"
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":a;effect\fire.bmp",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
lsp 2,":a;effect\fire.bmp",0,0:print 1
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":a;effect\fire.bmp",0,0:print 1
dwave 6,"se\slash.ogg"
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":a;effect\fire.bmp",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":a;effect\fire.bmp",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
lsp 2,":a;effect\fire.bmp",0,0:print 1
dwave 7,"se\slash.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":a;effect\fire.bmp",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":a;effect\fire.bmp",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":a;effect\fire.bmp",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
lsp 2,":a;effect\fire.bmp",0,0:print 1
csp 2:print 10,1000
return



*skill17

if %skill_sub>0 add %stack,1
mov %before_action,55
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Drive myself into a corner...!"
if %ransu=2 mov $sel1,"This is my way of fighting...!"
if %ransu=3 mov $sel1,"Even at the edge, I won't falter!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill17","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill17","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill17","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill17","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 2
gosub *selprinthero
mov $sel1,"Edging":mov $sel2,"skill17"
gosub *custom_tag_check
skillname $sel1
eng $ori_name+" focuses the mind carefully..."
$sel6@
dwave 2,"se\down2.ogg"
eng $ori_name+"'s vitality sharply decreases!"
$sel6/
mov %mylife,1
mov %gage,%mylife*100/%max_mylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 560,":a;system\gager"+$gagenum+".bmp",114,556
gosub *hp
print 10,500
\
skillname ""
gosub *face2
if %skill_sub>1 sub %stack,1:return
goto "*"+$lavel+"_main"



*skill18

if %skill_sub>0 add %stack,1
mov %before_action,45
if $lavel="tuika" mov %before_action,60
rnd2 %ransu,1,3
mov $sel1,"Calm my heart and mind..."
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill18","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill18","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill18","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill18","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%mp-2:gosub *mp
mov $sel1,"Serene Mind":mov $sel2,"skill18"
gosub *custom_tag_check
skillname $sel1
mov %aqua,4:mov %aqua_turn,12
mov %wind,0:mov %wind_turn,0
mov %earth,0:mov %earth_turn,0
mov %fire,0:mov %fire_turn,0
dwave 2,"se\aqua.ogg"
mov %aquaiconlock,0:gosub *elm_print
eng "Through a calm heart and mind, "+$ori_name+" achieves a serene state!"
$sel6\
skillname ""
if %skill_sub>1 sub %stack,1:return
goto "*"+$lavel+"_a"



*skill19

if %skill_sub>0 add %stack,1
mov %before_action,30
rnd2 %ransu,1,2
if %ransu=1 mov $sel1,"The blade of judgement comes for you!"
if %ransu=2 mov $sel1,"Cutting through space, time and reason!"
if $lavel="tuika" rnd2 %ransu,1,3
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill19","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill19","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill19","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill19","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%mp-2:gosub *mp
if %wind<>3 mov $sel1,"Flash Kill"
if %wind=3 mov $sel1,"Flash Kill: Destructive Wind"
mov $sel2,"skill19"
gosub *custom_tag_check
skillname $sel1
eng $ori_name+"'s blade cuts through even space and time!"
$sel6
if %wind<>3 skip 18
delay 500
csp 590:csp 591
mov $sel1,"Flash Kill: Destructive Wind":mov $sel2,"skill19"
gosub *custom_tag_check
skillname1 $sel1
textoff
vspl 3,650,0
dwave 2,"se\wind2.ogg"
lsp2 0,":c;effect\cutin_ruka_wind.bmp",600,150,100,100,0,10
lsp2 1,":c;effect\cutin_wind.bmp",200,150,100,100,0,10
gosub *skill_cutin
texton
vspl 3,650,1
csp 0:csp 1
if %wind=3 mov $sel1,"Flash Kill: Destructive Wind":mov $sel2,"skill19"
gosub *custom_tag_check
skillname $sel1
dwave 3,"se\tuki.ogg"
lsp 2,":c;effect\007.bmp",0,0:print 1
wait 100
csp 2:print 18,300,"system\mask01.jpg"
if %skill_sub=1 sub %stack,1:return
dwave 1,"se\slash4.ogg"
if %wind<>3 && %fire<2 mov %abairitu,250+%mylv*5/2
if %wind=3 && %fire<2 mov %abairitu,350+%mylv*7/2
if %wind<>3 && %fire>1 mov %abairitu,350+%mylv*7/2
if %wind=3 && %fire>1 mov %abairitu,450+%mylv*9/2
gosub *enemylife
skillname ""
if %skill_sub>1 sub %stack,1:return
goto *common_attack_end



*skill20

if %skill_sub>0 add %stack,1
mov %before_action,31
rnd2 %ransu,1,3
mov $sel1,"The jaws of the Rakshasa come to make the wicked pay!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill20","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill20","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill20","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill20","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%mp-6:gosub *mp
if %fire<3 mov $sel1,"Ninefold Rakshasa"
if %fire=3 mov $sel1,"Ninefold Rakshasa: Asura"
mov $sel2,"skill20"
gosub *custom_tag_check
skillname $sel1
eng $ori_name+" attacks in a deadly dance!"
$sel6
if %fire<3 skip 18
delay 500
csp 590:csp 591
mov $sel1,"Ninefold Rakshasa: Asura":mov $sel2,"skill20"
gosub *custom_tag_check
skillname1 $sel1
textoff
vspl 3,650,0
dwave 2,"se\fire2.ogg"
lsp2 0,":c;effect\cutin_ruka_fire.bmp",600,150,100,100,0,10
lsp2 1,":c;effect\cutin_fire.bmp",200,150,100,100,0,10
gosub *skill_cutin
texton
vspl 3,650,1
csp 0:csp 1
mov $sel1,"Ninefold Rakshasa: Asura":mov $sel2,"skill20"
gosub *custom_tag_check
skillname $sel1
wait 500
dwave 1,"se\slash3.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
dwave 2,"se\slash3.ogg"
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
dwave 3,"se\slash3.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
dwave 4,"se\slash3.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
dwave 5,"se\slash3.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
dwave 6,"se\slash3.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
dwave 7,"se\slash3.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
csp 2:print 10,1000
wait 100
if %skill_sub=1 sub %stack,1:return
textclear
dwave 1,"se\slash.ogg"
if %fire<2 rnd2 %abairitu,100+%mylv,130+%mylv*13/10
if %fire=2 rnd2 %abairitu,120+%mylv*6/5,150+%mylv*3/2
if %fire=3 rnd2 %abairitu,140+%mylv*7/5,170+%mylv*17/10
mov %damage_nobr,1:gosub *enemylife
dwave 1,"se\slash.ogg"
if %fire<2 rnd2 %abairitu,100+%mylv,130+%mylv*13/10
if %fire=2 rnd2 %abairitu,120+%mylv*6/5,150+%mylv*3/2
if %fire=3 rnd2 %abairitu,140+%mylv*7/5,170+%mylv*17/10
mov %damage_nobr,1:gosub *enemylife
dwave 1,"se\slash.ogg"
if %fire<2 rnd2 %abairitu,100+%mylv,130+%mylv*13/10
if %fire=2 rnd2 %abairitu,120+%mylv*6/5,150+%mylv*3/2
if %fire=3 rnd2 %abairitu,140+%mylv*7/5,170+%mylv*17/10
mov %damage_nobr,2:gosub *enemylife
textclear
dwave 1,"se\slash.ogg"
if %fire<2 rnd2 %abairitu,100+%mylv,130+%mylv*13/10
if %fire=2 rnd2 %abairitu,120+%mylv*6/5,150+%mylv*3/2
if %fire=3 rnd2 %abairitu,140+%mylv*7/5,170+%mylv*17/10
mov %damage_nobr,1:gosub *enemylife
dwave 1,"se\slash.ogg"
if %fire<2 rnd2 %abairitu,100+%mylv,130+%mylv*13/10
if %fire=2 rnd2 %abairitu,120+%mylv*6/5,150+%mylv*3/2
if %fire=3 rnd2 %abairitu,140+%mylv*7/5,170+%mylv*17/10
mov %damage_nobr,1:gosub *enemylife
dwave 1,"se\slash.ogg"
if %fire<2 rnd2 %abairitu,100+%mylv,130+%mylv*13/10
if %fire=2 rnd2 %abairitu,120+%mylv*6/5,150+%mylv*3/2
if %fire=3 rnd2 %abairitu,140+%mylv*7/5,170+%mylv*17/10
mov %damage_nobr,2:gosub *enemylife
textclear
dwave 1,"se\slash.ogg"
if %fire<2 rnd2 %abairitu,100+%mylv,130+%mylv*13/10
if %fire=2 rnd2 %abairitu,120+%mylv*6/5,150+%mylv*3/2
if %fire=3 rnd2 %abairitu,140+%mylv*7/5,170+%mylv*17/10
mov %damage_nobr,1:gosub *enemylife
dwave 1,"se\slash.ogg"
if %fire<2 rnd2 %abairitu,100+%mylv,130+%mylv*13/10
if %fire=2 rnd2 %abairitu,120+%mylv*6/5,150+%mylv*3/2
if %fire=3 rnd2 %abairitu,140+%mylv*7/5,170+%mylv*17/10
mov %damage_nobr,1:gosub *enemylife
dwave 1,"se\slash.ogg"
if %fire<2 rnd2 %abairitu,100+%mylv,130+%mylv*13/10
if %fire=2 rnd2 %abairitu,120+%mylv*6/5,150+%mylv*3/2
if %fire=3 rnd2 %abairitu,140+%mylv*7/5,170+%mylv*17/10
mov %damage_nobr,2:gosub *enemylife
\
skillname ""
if %skill_sub>1 sub %stack,1:return
goto *common_attack_end



*skill21

if %skill_sub>0 add %stack,1
mov %before_action,32
rnd2 %ransu,1,3
mov $sel1,"All life returns to the nature from whence it came!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill21","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill21","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill21","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill21","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%mp-4:gosub *mp
if %earth<3 mov $sel1,"Heavenly Demon Revival"
if %earth=3 mov $sel1,"Heavenly Demon Revival: Gaia"
mov $sel2,"skill21"
gosub *custom_tag_check
skillname $sel1
eng $ori_name+" condenses powerful magic energy!"
$sel6
if %earth<3 skip 18
delay 500
csp 590:csp 591
mov $sel1,"Heavenly Demon Revival: Gaia":mov $sel2,"skill21"
gosub *custom_tag_check
skillname1 $sel1
textoff
vspl 3,650,0
dwave 2,"se\earth1.ogg"
lsp2 0,":c;effect\cutin_ruka_earth.bmp",600,150,100,100,0,10
lsp2 1,":c;effect\cutin_earth.bmp",200,150,100,100,0,10
gosub *skill_cutin
texton
vspl 3,650,1
csp 0:csp 1
mov $sel1,"Heavenly Demon Revival: Gaia":mov $sel2,"skill21"
gosub *custom_tag_check
skillname $sel1
wait 300
dwave 1,"se\bom2.ogg"
lsp 2,":c;effect\001.bmp",0,0:print 18,1000,"system\mask01.jpg"
csp 2:print 18,500,"system\mask01.jpg"
if %skill_sub=1 sub %stack,1:return
dwave 1,"se\damage2.ogg"
if %earth<3 && %fire<2 mov %abairitu,600+%mylv*6
if %earth=3 && %fire<2 mov %abairitu,800+%mylv*8
if %earth<3 && %fire>1 mov %abairitu,800+%mylv*8
if %earth=3 && %fire>1 mov %abairitu,1000+%mylv*10
gosub *enemylife
skillname ""
if %skill_sub>1 sub %stack,1:return
goto *common_attack_end



*skill22

if %skill_sub>0 add %stack,1
mov %before_action,59
if %nikaime=1 skip 5
name $ori_name
>...........\
name ""
mov %mp,%mp-8:gosub *mp
mov $sel1,"Magic Concentration":mov $sel2,"skill22"
gosub *custom_tag_check
skillname $sel1
dwave 1,"se\power.ogg"
eng $ori_name+"'s eyes close as overwhelming magical energy fills the air!"
$sel6\
skillname ""
if %skill_sub>1 && $lavel<>"tuika" sub %stack,1:return
if %skill_sub>1 && $lavel="tuika" && %hanyo3=0 sub %stack,1:return
mov %daten,1
if %skill_sub>1 sub %stack,1:return
goto *common_attack_end



*skill22x

mov %daten,0
csp 690
gosub *face3
gosub *counter
textclear
if $lavel<>"tuika" | %hanyo3=0 skip 7
itoa $sub2,%hanyo3:mov $sub2,"customskill"+$sub2
getini $sel6,$mon_labo_mon_ini,$sub2,"skill22x"
if $sel6="" | $sel6=" " skip 4
mov %mon_labo_mon_ini_ky,0
mov $mon_labo_mon_ini_sc,$sel6
gosub *custom_dialog:sub %stack,1:return
skillname ""
rnd2 %ransu,1,3
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill22","skill_sel1":if $sel6="" skip 6
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill22","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill22","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill22","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if $lavel="tuika" && $sel6<>"" skip 7
if %nikaime=1 skip 5
name $ori_name
>My mother is the Star of Morning, the child of dawn.
>The star thrown to the Earth shall obtain victory!\
name ""
skip 3
if %nikaime=1 skip 2
gosub *selprinthero
if %aqua<>3 mov $sel1,"Daystar"
if %aqua=3 mov $sel1,"Infallible Daystar"
mov $sel2,"skill22x"
gosub *custom_tag_check
skillname $sel1
>A dazzling star falls into hell!
if %aqua<>3 skip 18
delay 500
csp 590:csp 591
mov $sel1,"Infallible Daystar":mov $sel2,"skill22x"
gosub *custom_tag_check
skillname1 $sel1
textoff
vspl 3,650,0
dwave 2,"se\aqua2.ogg"
lsp2 0,":c;effect\cutin_ruka_aqua.bmp",600,150,100,100,0,10
lsp2 1,":c;effect\cutin_aqua.bmp",200,150,100,100,0,10
gosub *skill_cutin
texton
vspl 3,650,1
csp 0:csp 1
mov $sel1,"Infallible Daystar":mov $sel2,"skill22x"
gosub *custom_tag_check
skillname $sel1
wait 300
dwave 1,"se\bom3.ogg"
lsp 2,":c;effect\002.bmp",0,0:print 18,1000,"system\mask01.jpg"
flushout 1000
csp 2
bg white,10,1000
if %mon_labo_on<>1 bg "BG\"+$haikei+".bmp",10,1000:skip 3
gosub *check_haikei:if $teigi2="skip" skip 2
bg $teigi3+$teigi1,10,1000
textclear
dwave 1,"se\damage2.ogg"
if %aqua<>3 && %fire<2 mov %abairitu,450+%mylv*9/2
if %aqua=3 && %fire<2 mov %abairitu,600+%mylv*6
if %aqua<>3 && %fire>1 mov %abairitu,600+%mylv*6
if %aqua=3 && %fire>1 mov %abairitu,700+%mylv*7
mov %damage_nobr,1:gosub *enemylife
dwave 1,"se\damage2.ogg"
if %aqua<>3 && %fire<2 mov %abairitu,450+%mylv*9/2
if %aqua=3 && %fire<2 mov %abairitu,600+%mylv*6
if %aqua<>3 && %fire>1 mov %abairitu,600+%mylv*6
if %aqua=3 && %fire>1 mov %abairitu,700+%mylv*7
mov %damage_nobr,1:gosub *enemylife
dwave 1,"se\damage2.ogg"
if %aqua<>3 && %fire<2 mov %abairitu,450+%mylv*9/2
if %aqua=3 && %fire<2 mov %abairitu,600+%mylv*6
if %aqua<>3 && %fire>1 mov %abairitu,600+%mylv*6
if %aqua=3 && %fire>1 mov %abairitu,700+%mylv*7
mov %damage_nobr,2:gosub *enemylife
\
skillname ""
if %enemylife=0 sub %stack,1:return "*"+$lavel+"_v"
gosub *face1
if %zukanon<>3 skip 5
getini $sub1,$mon_labo_mon_ini,$skill_tag,"followup_always":if $sub1="" | $sub1=" " skip 2
mov $skill_tag,"fllw"+$sub1:skip 3
getini $sub1,$mon_labo_mon_ini,$skill_tag,"followup_counter":if $sub1="" | $sub1=" " sub %stack,1:return
mov $skill_tag,"fllw"+$sub1
sub %stack,1
return



*skill23

if %skill_sub>0 add %stack,1
mov %before_action,56
rnd2 %ransu,1,3
mov $sel1,"Infallible and unfailing... The Dance of the Fallen!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill23","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill23","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill23","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill23","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%mp-2:gosub *mp
mov $sel1,"Fallen Angel Dance":mov $sel2,"skill23"
gosub *custom_tag_check
skillname $sel1
mov %wind,4:mov %wind_turn,12
mov %earth,0:mov %earth_turn,0
mov %aqua,0:mov %aqua_turn,0
mov %fire,0:mov %fire_turn,0
dwave 1,"se\bun.ogg"
if %mon_labo_on<>1 bg "BG\"+$haikei+".bmp",99,700,"system\lngtwave.dll/vwi":skip 3
gosub *check_haikei:if $teigi2="skip" skip 2
bg $teigi3+$teigi1,99,700,"system\lngtwave.dll/vwi"
mov %windiconlock,0:gosub *elm_print
eng $ori_name+" becomes one with a sacred wave!"
$sel6\
skillname ""
if %skill_sub>1 sub %stack,1:return
goto "*"+$lavel+"_a"



*skill24

if %skill_sub>0 add %stack,1
mov %before_action,34
rnd2 %ransu,1,3
mov $sel1,"The power of the Four Spirits, in my hand!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill24","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill24","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill24","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill24","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%mp-9:gosub *mp
mov $sel1,"Element Spica":mov $sel2,"skill24"
gosub *custom_tag_check
skillname $sel1
eng "Infused with the power of the Four Spirits, "+$ori_name+"'s arm swings down and hits the opponent with devastating force!"
$sel6
delay 500
csp 590:csp 591
mov $sel1,"Element Spica":mov $sel2,"skill24"
gosub *custom_tag_check
skillname1 $sel1
textoff
vspl 3,650,0
dwave 2,"se\wind2.ogg"
lsp2 2,":c;effect\cutin_wind.bmp",100,150,100,100,0,10
for %move=0 to 200 step 20
msp2 2,0,20,0,0,0,24
print 1:wait 5
next
csp2 2
lsp 10,":c;effect\cutin_wind.bmp",0,0:print 1
dwave 3,"se\earth1.ogg"
lsp2 2,":c;effect\cutin_earth.bmp",300,150,100,100,0,10
for %move=0 to 200 step 20
msp2 2,0,20,0,0,0,24
print 1:wait 5
next
csp2 2
lsp 11,":c;effect\cutin_earth.bmp",200,0:print 1
dwave 4,"se\aqua2.ogg"
lsp2 3,":c;effect\cutin_aqua.bmp",500,150,100,100,0,10
for %move=0 to 200 step 20
msp2 3,0,20,0,0,0,24
print 1:wait 5
next
csp2 3
lsp 12,":c;effect\cutin_aqua.bmp",400,0:print 1
dwave 5,"se\fire2.ogg"
lsp2 4,":c;effect\cutin_fire.bmp",700,150,100,100,0,10
for %move=0 to 200 step 20
msp2 4,0,20,0,0,0,24
print 1:wait 5
next
csp2 4
lsp 13,":c;effect\cutin_fire.bmp",600,0:print 1
cspl 10,13:print 10,600
texton
vspl 3,650,1
csp 0:csp 1
mov $sel1,"Element Spica":mov $sel2,"skill24"
gosub *custom_tag_check
skillname $sel1
dwave 1,"se\karaburi.ogg"
lsp 2,":a;effect\029_01.bmp",0,0:print 10,40
lsp 2,":a;effect\029_02.bmp",0,0:print 10,40
dwave 3,"se\earth1.ogg"
lsp 2,":a;effect\029_03.bmp",0,0:print 10,40
lsp 2,":a;effect\029_04.bmp",0,0:print 10,40
dwave 5,"se\fire2.ogg"
lsp 2,":a;effect\029_05.bmp",0,0:print 10,40
lsp 2,":a;effect\029_06.bmp",0,0:print 10,40
dwave 2,"se\wind2.ogg"
lsp 2,":a;effect\029_07.bmp",0,0:print 10,40
lsp 2,":a;effect\029_08.bmp",0,0:print 10,40
csp 2:print 10,10
if %skill_sub=1 sub %stack,1:return
dwave 1,"se\damage2.ogg"
mov %abairitu,2000+%mylv*20
gosub *enemylife
skillname ""
if %skill_sub>1 sub %stack,1:return
goto *common_attack_end



*skill25

if %skill_sub>0 add %stack,1
mov %before_action,57
mov %count_wind,%count_wind+1
mov %count_earth,%count_earth+1
mov %count_aqua,%count_aqua+1
mov %count_fire,%count_fire+1
rnd2 %ransu,1,3
mov $sel1,"Here we go, everyone!"
if $lavel="tuika" getini $sel6,$mon_labo_mon_ini,"hero_skill25","skill_sel1":if $sel6="" skip 5
if %ransu=1 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill25","skill_sel1"
if %ransu=2 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill25","skill_sel2"
if %ransu=3 && $lavel="tuika" getini $sel1,$mon_labo_mon_ini,"hero_skill25","skill_sel3"
if $sel1="" rnd2 %ransu,1,3:skip -3
if %nikaime=1 skip 3
gosub *selprinthero
mov %mp,%mp-10:gosub *mp
mov $sel1,"Quad Spirit Summon":mov $sel2,"skill25"
gosub *custom_tag_check
skillname1 $sel1
mov %wind,3:mov %wind_turn,16
mov %earth,3:mov %earth_turn,16
mov %aqua,3:mov %aqua_turn,16
mov %fire,3:mov %fire_turn,16
vspl 3,650,0
dwave 2,"se\wind2.ogg"
lsp2 2,":c;effect\cutin_wind.bmp",100,150,100,100,0,10
for %move=0 to 200 step 20
msp2 2,0,20,0,0,0,24
print 1:wait 5
next
csp2 2
lsp 10,":c;effect\cutin_wind.bmp",0,0:print 1
dwave 3,"se\earth1.ogg"
lsp2 2,":c;effect\cutin_earth.bmp",300,150,100,100,0,10
for %move=0 to 200 step 20
msp2 2,0,20,0,0,0,24
print 1:wait 5
next
csp2 2
lsp 11,":c;effect\cutin_earth.bmp",200,0:print 1
dwave 4,"se\aqua2.ogg"
lsp2 3,":c;effect\cutin_aqua.bmp",500,150,100,100,0,10
for %move=0 to 200 step 20
msp2 3,0,20,0,0,0,24
print 1:wait 5
next
csp2 3
lsp 12,":c;effect\cutin_aqua.bmp",400,0:print 1
dwave 5,"se\fire2.ogg"
lsp2 4,":c;effect\cutin_fire.bmp",700,150,100,100,0,10
for %move=0 to 200 step 20
msp2 4,0,20,0,0,0,24
print 1:wait 5
next
csp2 4
lsp 13,":c;effect\cutin_fire.bmp",600,0:print 1
cspl 10,13:print 10,600
vspl 3,650,1
csp 0:csp 1
mov $sel1,"Quad Spirit Summon":mov $sel2,"skill25"
gosub *custom_tag_check
skillname $sel1
mov %windiconlock,0:mov %aquaiconlock,0:gosub *elm_print
eng $ori_name+" summons all four spirits at once!"
$sel6\
skillname ""
if %skill_sub>1 sub %stack,1:return
goto "*"+$lavel+"_a"



*common_alice_skill

gosub *cmd_skill_alice
if %cmd1=21 goto *skill_al1
if %cmd1=22 goto *skill_al2
if %cmd1=23 goto *skill_al3
if %cmd1=24 goto *skill_al4
if %cmd1=-1 goto "*"+$lavel+"_main"
goto *common_alice_skill



*cmd_skill_alice

saveoff
textoff
cspl 3,7:cspl 601,608
btndef clear
mov %skill_page,1
mov %sinkoumode,0:skipoff:autoclick 0
gosub *setwindow_04
lsp 601,":s/20,20,0;#FFFFFF#FF4444Omega Blaze ",70,418:spbtn 601,21
lsp 602,":s/20,20,0;#FFFFFF#FF4444Frost Ozma ",70,445:spbtn 602,22
strsp 603,"Monster Lord's Cruelty",70,472,12,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,23
strsp 604,"Eyes of Recovery",70,499,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 604,24
goto *cmd_skill_alice3



*cmd_skill_alice3

btnwait2 %cmd1
if %mon_labo_on=1 && %cmd1=4 textoff:screen_clear:return *monster_labo
if %zukanon>0 && %cmd1=4 textoff:return *zukan_commonkaisou0
if %cmd1=3 mov %saveorload,0:gosub *saveload:goto *cmd_skill_alice
if %cmd1=4 mov %saveorload,1:gosub *saveload:goto *cmd_skill_alice
if %cmd1=7 gosub *window_delete2:goto *cmd_skill_alice
if %cmd1=0 goto *cmd_skill_alice3
cspl 3,7
cspl 601,610
gosub *setwindow_02p
texton
btndef clear
return



*skill_al1

mov %alice_skill,0
mov %before_action,35
skillname "Word of Dispel"
lsp 690,":a;chara\alice_st74.bmp",-240,50:print 10,500
name "Alice"
>I ask thee, eternal time...
>Reveal my body, yoked in twilight...\
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
lsp 690,":a;chara\alice_st03b.bmp",-163,0
csp 2:print 10,300
>Return my true body to me!\
name ""
skillname ""
csp 690:print 10,500
skillname "Omega Blaze"
>Alice unleashes a storm of fire!
delay 500
if %effectspeed=2 dwave 1,"se\fire1.ogg":skip 2
mpegplay "effect\movie01.mpg",1
if %alice_skill1=0 goto *skill_al_miss
dwave 2,"se\damage2.ogg"
rnd2 %damage,30*%alice_skill1,36*%alice_skill1
if %enemy_earth+%enemy_aqua>0 mov %damage,%damage*%damage_keigen_el/100
if %damage=0 mov %damage,1
gosub *alice_enemylife2
skillname ""
if %enemylife=0 mov %count_alice1,1:goto "*"+$lavel+"_v"
goto "*"+$lavel+"_a"



*skill_al2

mov %alice_skill,0
mov %before_action,36
skillname "Word of Dispel"
lsp 690,":a;chara\alice_st74.bmp",-240,50:print 10,500
name "Alice"
>I ask thee, eternal time...
>Reveal my body, yoked in twilight...\
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
lsp 690,":a;chara\alice_st03b.bmp",-163,0
csp 2:print 10,300
>Return my true body to me!\
name ""
csp 690:print 10,500
skillname "Frost Ozma"
>Pure magic flows off of Alice, freezing the air around her!
delay 500
if %effectspeed=2 dwave 1,"se\wind3.ogg":skip 2
mpegplay "effect\movie02.mpg",1
if %alice_skill1=0 goto *skill_al_miss
dwave 2,"se\damage2.ogg"
rnd2 %damage,30*%alice_skill2,36*%alice_skill2
if %enemy_earth+%enemy_aqua>0 mov %damage,%damage*%damage_keigen_el/100
if %damage=0 mov %damage,1
gosub *alice_enemylife2
skillname ""
if %enemylife=0 mov %count_alice1,1:goto "*"+$lavel+"_v"
goto "*"+$lavel+"_a"



*skill_al3

mov %alice_skill,0
mov %before_action,37
skillname "Word of Dispel"
lsp 690,":a;chara\alice_st74.bmp",-240,50:print 10,500
name "Alice"
>I ask thee, eternal time...
>Reveal my body, yoked in twilight...\
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
lsp 690,":a;chara\alice_st03b.bmp",-163,0
csp 2:print 10,300
>Return my true body to me!\
name ""
csp 690:print 10,500
skillname "Monster Lord's Cruelty"
dwave 1,"se\bom1.ogg"
>The power of darkness radiates from Alice!
wait 300
flushout 1000
vsp 700,0
vsp 702,0
vsp 704,0
vsp 706,0
bg white,10,1000
if %alice_skill3=0 goto *skill_al_miss
dwave 2,"se\damage2.ogg"
quake 10,600
rnd2 %damage,10*%alice_skill3,12*%alice_skill3
if %enemy_earth+%enemy_aqua>0 mov %damage,%damage*%damage_keigen_el/100
if %damage=0 mov %damage,1
itoa $sel1,%damage
eng "Alice deals "+$sel1+" damage!":$sel6
mov %enemylife,%enemylife-%damage
if %enemylife>%max_enemylife mov %enemylife,%max_enemylife
if %enemylife<0 mov %enemylife,0
if %enemylife=0 mov %gage,0 skip 3
mov %gage,%enemylife*100/%max_enemylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
print 10,500
dwave 2,"se\damage2.ogg"
quake 10,600
rnd2 %damage,10*%alice_skill3,12*%alice_skill3
if %enemy_earth+%enemy_aqua>0 mov %damage,%damage*%damage_keigen_el/100
if %damage=0 mov %damage,1
itoa $sel1,%damage
eng "Alice deals "+$sel1+" damage!":$sel6/
mov %enemylife,%enemylife-%damage
if %enemylife>%max_enemylife mov %enemylife,%max_enemylife
if %enemylife<0 mov %enemylife,0
if %enemylife=0 mov %gage,0 skip 3
mov %gage,%enemylife*100/%max_enemylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
print 10,500
textclear
dwave 2,"se\damage2.ogg"
quake 10,600
rnd2 %damage,10*%alice_skill3,12*%alice_skill3
if %enemy_earth+%enemy_aqua>0 mov %damage,%damage*%damage_keigen_el/100
if %damage=0 mov %damage,1
itoa $sel1,%damage
eng "Alice deals "+$sel1+" damage!":$sel6
mov %enemylife,%enemylife-%damage
if %enemylife>%max_enemylife mov %enemylife,%max_enemylife
if %enemylife<0 mov %enemylife,0
if %enemylife=0 mov %gage,0 skip 3
mov %gage,%enemylife*100/%max_enemylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
print 10,500
dwave 2,"se\damage2.ogg"
quake 10,600
rnd2 %damage,10*%alice_skill3,12*%alice_skill3
if %enemy_earth+%enemy_aqua>0 mov %damage,%damage*%damage_keigen_el/100
if %damage=0 mov %damage,1
itoa $sel1,%damage
eng "Alice deals "+$sel1+" damage!":$sel6/
mov %enemylife,%enemylife-%damage
if %enemylife>%max_enemylife mov %enemylife,%max_enemylife
if %enemylife<0 mov %enemylife,0
if %enemylife=0 mov %gage,0 skip 3
mov %gage,%enemylife*100/%max_enemylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
print 10,500
vsp 700,1
vsp 702,1
vsp 704,1
vsp 706,1
if %mon_labo_on<>1 bg "BG\"+$haikei+".bmp",10,2000:skip 3
gosub *check_haikei:if $teigi2="skip" skip 2
bg $teigi3+$teigi1,10,2000
\
skillname ""
if %enemylife=0 mov %count_alice1,1:goto "*"+$lavel+"_v"
goto "*"+$lavel+"_a"



*skill_al_miss

vsp 700,1
vsp 702,1
vsp 704,1
vsp 706,1
if %mon_labo_on<>1 bg "BG\"+$haikei+".bmp",10,500:skip 3
gosub *check_haikei:if $teigi2="skip" skip 2
bg $teigi3+$teigi1,10,500
>But Alice's attack had no effect!\
skillname ""
goto "*"+$lavel+"_a"



*skill_al4

mov %alice_skill,0
mov %before_action,58
skillname "Word of Dispel"
lsp 690,":a;chara\alice_st74.bmp",-240,50:print 10,500
name "Alice"
>I ask thee, eternal time...
>Reveal my body, yoked in twilight...\
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
lsp 690,":a;chara\alice_st03b.bmp",-163,0
csp 2:print 10,300
>Return my true body to me!\
name ""
csp 690:print 10,500
skillname "Eyes of Recovery"
wait 200
>The power of restoration fills Alice's eyes!@
dwave 2,"se\kaihuku.ogg"
if %status=6 | %status=8 | %status=9 mov %status,0
mov %damage,%max_mylife
eng "Luka has been completely healed!":$sel6/
mov %mylife,%mylife+%damage
if %mylife>%max_mylife mov %mylife,%max_mylife
mov %gage,%mylife*100/%max_mylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 560,":a;system\gager"+$gagenum+".bmp",114,556
gosub *hp
gosub *status_print
\
skillname ""
if %max_mylife<%mylife*5 gosub *face1
goto "*"+$lavel+"_a"



*alice_skillx

add %stack,1
rnd2 %ransu,1,4
if %ransu=1 goto *alice_skillx1
if %ransu=2 goto *alice_skillx2
if %ransu=3 goto *alice_skillx3
if %ransu=4 && %owaza_count3h>3 goto *alice_skillx4
skip -5



*alice_skillx1

rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Haa!"
if %ransu=2 mov $sel1,"Eat this!"
if %ransu=3 mov $sel1,"Hya!"
name "Alice"
eng $sel1:$sel6\
name ""
>Alice attacks!
dwave 1,"se\dageki.ogg"
mov $ori_name,"Alice"
rnd2 %damage,1000,1200
gosub *enemylife2
mov $ori_name,"Luka"
if %enemylife=0 mov %count_alice2,1:sub %stack,1:return "*"+$lavel+"_v"
sub %stack,1
return



*alice_skillx2

rnd2 %ransu,1,6
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I call forth the fires of hell!"
if %ransu=2 mov $sel1,"Can you endure this scorching heat!?"
if %ransu=3 mov $sel1,"Eat the flames of the Monster Lord!"
if %ransu=4 mov $sel1,"Burn in my flames!"
if %ransu=5 mov $sel1,"Taste the hellfire of a Monster Lord!"
if %ransu=6 mov $sel1,"Burn to ashes!"
name "Alice"
eng $sel1:$sel6\
name ""
skillname "Omega Blaze"
>Alice creates a storm of fire!
delay 500
if %effectspeed=2 dwave 1,"se\fire1.ogg":skip 2
mpegplay "effect\movie01.mpg",1
dwave 2,"se\damage2.ogg"
rnd2 %damage,3000,3600
gosub *alice_enemylife2
skillname ""
if %enemylife=0 mov %count_alice2,1:sub %stack,1:return "*"+$lavel+"_v"
sub %stack,1
return



*alice_skillx3

rnd2 %ransu,1,6
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"I call forth the icy touch of death!"
if %ransu=2 mov $sel1,"Go numb to your very bones!"
if %ransu=3 mov $sel1,"Freeze in a block of ice!"
if %ransu=4 mov $sel1,"Can you endure the chill of death!?"
if %ransu=5 mov $sel1,"I'll freeze even the air itself!"
if %ransu=6 mov $sel1,"Freeze!"
name "Alice"
eng $sel1:$sel6\
name ""
skillname "Frost Ozma"
>Alice's magical power freezes the air!
delay 500
if %effectspeed=2 dwave 1,"se\wind3.ogg":skip 2
mpegplay "effect\movie02.mpg",1
dwave 2,"se\damage2.ogg"
rnd2 %damage,3000,3600
gosub *alice_enemylife2
skillname ""
if %enemylife=0 mov %count_alice2,1:sub %stack,1:return "*"+$lavel+"_v"
sub %stack,1
return



*alice_skillx4

mov %owaza_count3h,0
rnd2 %ransu,1,6
if %ransu=%ren skip -1
mov %ren,%ransu
if %ransu=1 mov $sel1,"This is the power of a Monster Lord!"
if %ransu=2 mov $sel1,"Taste my power!"
if %ransu=3 mov $sel1,"I'll show you the power of darkness!"
if %ransu=4 mov $sel1,"Taste the secret art of my family!"
if %ransu=5 mov $sel1,"The power of darkness shall destroy everything!"
if %ransu=6 mov $sel1,"Perish in the darkness!"
name "Alice"
eng $sel1:$sel6\
name ""
skillname "Monster Lord's Cruelty"
dwave 1,"se\bom1.ogg"
>Alice lets loose the power of darkness!
delay 300
flushout 1000
vsp 700,0
bg white,10,1000
dwave 2,"se\damage2.ogg"
quake 10,600
rnd2 %damage,1000,1200
if %enemy_earth+%enemy_aqua>0 mov %damage,%damage*%damage_keigen_el/100
if %damage=0 mov %damage,1
itoa $sel1,%damage
eng "Alice deals "+$sel1+" damage!":$sel6
mov %enemylife,%enemylife-%damage
if %enemylife>%max_enemylife mov %enemylife,%max_enemylife
if %enemylife<0 mov %enemylife,0
if %enemylife=0 mov %gage,0 skip 3
mov %gage,%enemylife*100/%max_enemylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
print 10,500
dwave 2,"se\damage2.ogg"
quake 10,600
rnd2 %damage,1000,1200
if %enemy_earth+%enemy_aqua>0 mov %damage,%damage*%damage_keigen_el/100
if %damage=0 mov %damage,1
itoa $sel1,%damage
eng "Alice deals "+$sel1+" damage!":$sel6/
mov %enemylife,%enemylife-%damage
if %enemylife>%max_enemylife mov %enemylife,%max_enemylife
if %enemylife<0 mov %enemylife,0
if %enemylife=0 mov %gage,0 skip 3
mov %gage,%enemylife*100/%max_enemylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
print 10,500
textclear
dwave 2,"se\damage2.ogg"
quake 10,600
rnd2 %damage,1000,1200
if %enemy_earth+%enemy_aqua>0 mov %damage,%damage*%damage_keigen_el/100
if %damage=0 mov %damage,1
itoa $sel1,%damage
eng "Alice deals "+$sel1+" damage!":$sel6
mov %enemylife,%enemylife-%damage
if %enemylife>%max_enemylife mov %enemylife,%max_enemylife
if %enemylife<0 mov %enemylife,0
if %enemylife=0 mov %gage,0 skip 3
mov %gage,%enemylife*100/%max_enemylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
print 10,500
dwave 2,"se\damage2.ogg"
quake 10,600
rnd2 %damage,1000,1200
if %enemy_earth+%enemy_aqua>0 mov %damage,%damage*%damage_keigen_el/100
if %damage=0 mov %damage,1
itoa $sel1,%damage
eng "Alice deals "+$sel1+" damage!":$sel6/
mov %enemylife,%enemylife-%damage
if %enemylife>%max_enemylife mov %enemylife,%max_enemylife
if %enemylife<0 mov %enemylife,0
if %enemylife=0 mov %gage,0 skip 3
mov %gage,%enemylife*100/%max_enemylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
print 10,500
vsp 700,1
bg "bg\"+$haikei+".bmp",10,2000
\
skillname ""
if %enemylife=0 mov %count_alice2,1:sub %stack,1:return "*"+$lavel+"_v"
sub %stack,1
return



*aruma_skillx

add %stack,1
rnd2 %ransu,1,4
if %ransu=1 goto *aruma_skillx1
if %ransu=2 goto *aruma_skillx2
if %ransu=3 goto *aruma_skillx3
if %ransu=4 goto *aruma_skillx4



*aruma_skillx1

rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Haa!"
if %ransu=2 mov $sel1,"Ha!"
if %ransu=3 mov $sel1,"Hya!"
name "Alma Elma"
eng $sel1:$sel6\
name ""
>Alma Elma attacks!
dwave 1,"se\dageki.ogg"
mov $ori_name,"Alma Elma"
rnd2 %damage,800,1000
gosub *enemylife2
mov $ori_name,"Luka"
sub %stack,1
return



*aruma_skillx2

rnd2 %ransu,1,4
if %ransu=1 mov $sel1,"Take this!"
if %ransu=2 mov $sel1,"Prepare for violence!"
if %ransu=3 mov $sel1,"My fist... Taste it!"
if %ransu=4 mov $sel1,"I'll pound you to dust!"
name "Alma Elma"
eng $sel1:$sel6\
name ""
skillname "Diamond Plated Fist"
dwave 10,"se\dageki2.ogg"
lsp 2,":a;effect\017_01.bmp",180,80:print 10,10
lsp 2,":a;effect\017_02.bmp",180,80:print 10,10
lsp 2,":a;effect\017_03.bmp",180,80:print 10,10
lsp 2,":a;effect\017_04.bmp",180,80:print 10,10
lsp 2,":a;effect\017_05.bmp",180,80:print 10,10
csp 2:print 10,10
>Alma Elma's fist slams into Ilias!
dwave 2,"se\damage2.ogg"
mov $ori_name,"Alma Elma"
rnd2 %damage,4000,4500:gosub *enemylife2
mov $ori_name,"Luka"
skillname ""
sub %stack,1
return



*aruma_skillx3

rnd2 %ransu,1,4
if %ransu=1 mov $sel1,"Eat this!"
if %ransu=2 mov $sel1,"Break!"
if %ransu=3 mov $sel1,"Hiiiya!"
if %ransu=4 mov $sel1,"This knee can even destroy a Dragon!"
name "Alma Elma"
eng $sel1:$sel6\
name ""
skillname "Dragon Knee"
dwave 1,"se\dageki2.ogg"
lsp 2,":a;effect\016_01.bmp",180,80:print 10,10
lsp 2,":a;effect\016_02.bmp",180,80:print 10,10
lsp 2,":a;effect\016_03.bmp",180,80:print 10,10
lsp 2,":a;effect\016_04.bmp",180,80:print 10,10
lsp 2,":a;effect\016_05.bmp",180,80:print 10,10
csp 2:print 10,10
>Alma Elma jumps forward as fast as lightning, kneeing Ilias!
dwave 2,"se\damage2.ogg"
mov $ori_name,"Alma Elma"
rnd2 %damage,2000,2500:gosub *enemylife2
mov $ori_name,"Luka"
skillname ""
sub %stack,1
return



*aruma_skillx4

rnd2 %ransu,1,4
if %ransu=1 mov $sel1,"With my very heart and soul!"
if %ransu=2 mov $sel1,"My final attack!"
if %ransu=3 mov $sel1,"With all of my fighting spirit...!"
if %ransu=4 mov $sel1,"With everything I've got...!"
name "Alma Elma"
eng $sel1:$sel6\
name ""
skillname "Palm of Pure Violence"
dwave 1,"se\dageki2.ogg"
lsp 2,":a;effect\025_01.bmp",0,0:print 10,20
lsp 2,":a;effect\025_02.bmp",0,0:print 10,20
lsp 2,":a;effect\025_03.bmp",0,0:print 10,20
dwave 2,"se\light.ogg"
lsp 2,":a;effect\025_04.bmp",0,0:print 10,60
lsp 2,":a;effect\025_05.bmp",0,0:print 10,60
lsp 2,":a;effect\025_06.bmp",0,0:print 10,60
lsp 2,":a;effect\025_07.bmp",0,0:print 10,60
lsp 2,":a;effect\025_08.bmp",0,0:print 10,60
csp 2:print 10,10
>With all of her strength and spirit, Alma Elma slams her palm into Ilias!
dwave 2,"se\damage2.ogg"
mov $ori_name,"Alma Elma"
rnd2 %damage,5000,5500:gosub *enemylife2
mov $ori_name,"Luka"
skillname ""
sub %stack,1
return



*tamamo_skillx

add %stack,1
rnd2 %ransu,1,3
if %ransu=1 goto *tamamo_skillx1
if %ransu=2 goto *tamamo_skillx2
if %ransu=3 goto *tamamo_skillx3



*tamamo_skillx1

rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ha!"
if %ransu=2 mov $sel1,"Hya!"
if %ransu=3 mov $sel1,"Haa!"
name "Tamamo no Mae"
eng $sel1:$sel6\
name ""
>Tamamo attacks!
dwave 1,"se\dageki.ogg"
mov $ori_name,"Tamamo"
rnd2 %damage,2000,2500
gosub *enemylife2
mov $ori_name,"Luka"
sub %stack,1
return



*tamamo_skillx2

rnd2 %ransu,1,4
if %ransu=1 mov $sel1,"Taste my power!"
if %ransu=2 mov $sel1,"It has been a while since the last time I punched you!"
if %ransu=3 mov $sel1,"It has been a thousand years... But taste the power of my tails!"
if %ransu=4 mov $sel1,"I know you haven't forgotten the power of my tails!"
name "Tamamo no Mae"
eng $sel1:$sel6\
name ""
gosub *mp
skillname "Nine Moons"
eng "All nine of Tamamo's tails slam into Ilias!":$sel6/
wait 100
dwave 1,"se\tuki.ogg"
lsp 2,":a;effect\023_01.bmp",0,0:print 10,50
lsp 2,":a;effect\023_02.bmp",0,0:print 10,50
lsp 2,":a;effect\023_03.bmp",0,0:print 10,50
lsp 2,":a;effect\023_04.bmp",0,0:print 10,50
dwave 1,"se\tuki.ogg"
lsp 2,":a;effect\023_01.bmp",200,100:print 10,50
lsp 2,":a;effect\023_02.bmp",200,100:print 10,50
lsp 2,":a;effect\023_03.bmp",200,100:print 10,50
lsp 2,":a;effect\023_04.bmp",200,100:print 10,50
dwave 1,"se\tuki.ogg"
lsp 2,":a;effect\023_01.bmp",50,-50:print 10,50
lsp 2,":a;effect\023_02.bmp",50,-50:print 10,50
lsp 2,":a;effect\023_03.bmp",50,-50:print 10,50
lsp 2,":a;effect\023_04.bmp",50,-50:print 10,50
dwave 1,"se\tuki.ogg"
lsp 2,":a;effect\023_01.bmp",-200,100:print 10,50
lsp 2,":a;effect\023_02.bmp",-200,100:print 10,50
lsp 2,":a;effect\023_03.bmp",-200,100:print 10,50
lsp 2,":a;effect\023_04.bmp",-200,100:print 10,50
dwave 1,"se\tuki.ogg"
lsp 2,":a;effect\023_01.bmp",-50,-50:print 10,50
lsp 2,":a;effect\023_02.bmp",-50,-50:print 10,50
lsp 2,":a;effect\023_03.bmp",-50,-50:print 10,50
lsp 2,":a;effect\023_04.bmp",-50,-50:print 10,50
csp 2:print 10,50
\
mov $ori_name,"Tamamo"
dwave 1,"se\damage.ogg"
rnd2 %damage,900,1100
mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\damage.ogg"
rnd2 %damage,900,1100
mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\damage.ogg"
rnd2 %damage,900,1100
mov %damage_nobr,2:gosub *enemylife2
textclear
dwave 1,"se\damage.ogg"
rnd2 %damage,900,1100
mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\damage.ogg"
rnd2 %damage,900,1100
mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\damage.ogg"
rnd2 %damage,900,1100
mov %damage_nobr,2:gosub *enemylife2
textclear
dwave 1,"se\damage.ogg"
rnd2 %damage,900,1100
mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\damage.ogg"
rnd2 %damage,900,1100
mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\damage.ogg"
rnd2 %damage,900,1100
mov %damage_nobr,2:gosub *enemylife2
\
skillname ""
mov $ori_name,"Luka"
sub %stack,1
return



*tamamo_skillx3

rnd2 %ransu,1,4
if %ransu=1 mov $sel1,"I'll remind you of the pain I can bring."
if %ransu=2 mov $sel1,"You shall never forget the pain of my claws again!"
if %ransu=3 mov $sel1,"I'll slice you to pieces!"
if %ransu=4 mov $sel1,"A dance of death!"
name "Tamamo no Mae"
eng $sel1:$sel6\
name ""
skillname "Dance of Death"
>Tamamo begins a dance of death, her claws slicing everything around her!
wait 100
dwave 1,"se\slash5.ogg"
lsp 2,":a;effect\024_01.bmp",0,0:print 10,10
lsp 2,":a;effect\024_02.bmp",0,0:print 10,10
dwave 2,"se\slash5.ogg"
lsp 2,":a;effect\024_03.bmp",0,0:print 10,10
lsp 2,":a;effect\024_04.bmp",0,0:print 10,10
dwave 3,"se\slash5.ogg"
lsp 2,":a;effect\024_05.bmp",0,0:print 10,10
lsp 2,":a;effect\024_06.bmp",0,0:print 10,10
dwave 4,"se\slash5.ogg"
lsp 2,":a;effect\024_07.bmp",0,0:print 10,10
lsp 2,":a;effect\024_08.bmp",0,0:print 10,10
dwave 1,"se\slash5.ogg"
lsp 2,":a;effect\024_01.bmp",0,0:print 10,10
lsp 2,":a;effect\024_02.bmp",0,0:print 10,10
dwave 2,"se\slash5.ogg"
lsp 2,":a;effect\024_03.bmp",0,0:print 10,10
lsp 2,":a;effect\024_04.bmp",0,0:print 10,10
dwave 3,"se\slash5.ogg"
lsp 2,":a;effect\024_05.bmp",0,0:print 10,10
lsp 2,":a;effect\024_06.bmp",0,0:print 10,10
dwave 4,"se\slash5.ogg"
lsp 2,":a;effect\024_07.bmp",0,0:print 10,10
lsp 2,":a;effect\024_08.bmp",0,0:print 10,10
csp 2:print 10,30
textclear
mov $ori_name,"Tamamo"
dwave 1,"se\damage2.ogg"
rnd2 %damage,2500,3000
mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\damage2.ogg"
rnd2 %damage,2500,3000
mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\damage2.ogg"
rnd2 %damage,2500,3000
mov %damage_nobr,2:gosub *enemylife2
\
skillname ""
mov $ori_name,"Luka"
sub %stack,1
return



*gran_skillx

add %stack,1
rnd2 %ransu,1,4
if %ransu=1 goto *gran_skillx1
if %ransu=2 goto *gran_skillx2
if %ransu=3 goto *gran_skillx3
if %ransu=4 goto *gran_skillx4



*gran_skillx1

rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Here I come!"
if %ransu=2 mov $sel1,"Haa!"
if %ransu=3 mov $sel1,"Hya!"
name "Granberia"
eng $sel1:$sel6\
name ""
>Granberia attacks!
dwave 1,"se\slash.ogg"
mov $ori_name,"Granberia"
rnd2 %damage,1000,1100
gosub *enemylife2
mov $ori_name,"Luka"
sub %stack,1
return



*gran_skillx2

rnd2 %ransu,1,4
if %ransu=1 mov $sel1,"Taste the power of a Dragon!"
if %ransu=2 mov $sel1,"How about this!?"
if %ransu=3 mov $sel1,"Break!"
if %ransu=4 mov $sel1,"Cut into pieces!"
name "Granberia"
eng $sel1:$sel6\
name ""
skillname "Dragon Butcher Attack"
>Granberia swings down her huge sword!
dwave 1,"se\karaburi.ogg"
lsp 2,":a;effect\010_01.bmp",150,30:print 10,30
lsp 2,":a;effect\010_02.bmp",150,30:print 10,30
lsp 2,":a;effect\010_03.bmp",150,30:print 10,30
lsp 2,":a;effect\010_04.bmp",150,30:print 10,30
csp 2:print 10,30
dwave 2,"se\damage2.ogg"
mov $ori_name,"Granberia"
rnd2 %damage,2500,2800
gosub *enemylife2
mov $ori_name,"Luka"
skillname ""
sub %stack,1
return



*gran_skillx3

rnd2 %ransu,1,4
if %ransu=1 mov $sel1,"I'll pierce you through!"
if %ransu=2 mov $sel1,"Can you keep up!?"
if %ransu=3 mov $sel1,"I'll cut you through!"
if %ransu=4 mov $sel1,"A flurry of pierces!"
name "Granberia"
eng $sel1:$sel6\
name ""
skillname "Bloody Fissure Thunder Thrust * Gale"
>Granberia steps forward like lightning, her sword creating a thunderous boom!
dwave 1,"se\slash3.ogg"
lsp 2,":a;effect\009b_01.bmp",200,80:print 10,12
lsp 2,":a;effect\009b_02.bmp",200,80:print 10,12
lsp 2,":a;effect\009b_03.bmp",200,80:print 10,12
lsp 2,":a;effect\009b_04.bmp",200,80:print 10,12
lsp 2,":a;effect\009b_05.bmp",200,80:print 10,12
csp 2:print 10,12
dwave 2,"se\damage.ogg"
mov $ori_name,"Granberia"
rnd2 %damage,2500,2800
gosub *enemylife2
mov $ori_name,"Luka"
skillname ""
sub %stack,1
return



*gran_skillx4

rnd2 %ransu,1,4
if %ransu=1 mov $sel1,"A speed greater than the Gods!"
if %ransu=2 mov $sel1,"I'll cut you to bits!"
if %ransu=3 mov $sel1,"I'll attack faster than you can defend!"
if %ransu=4 mov $sel1,"Haaaaaaaaaaaaaaa!!!"
name "Granberia"
eng $sel1:$sel6\
name ""
skillname "Death Sword Chaos Star"
>Granberia slashes out with countless blows, too many to see!
wait 500
dwave 1,"se\slash.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
dwave 2,"se\slash.ogg"
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
dwave 3,"se\slash.ogg"
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
lsp 2,":c;effect\005_01.jpg",0,0:print 1
lsp 2,":c;effect\005_02.jpg",0,0:print 1
lsp 2,":c;effect\005_03.jpg",0,0:print 1
lsp 2,":c;effect\005_04.jpg",0,0:print 1
csp 2:print 10,1000
dwave 1,"se\slash.ogg"
mov $ori_name,"Granberia"
rnd2 %damage,600,700
mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\slash.ogg"
rnd2 %damage,600,700
mov %damage_nobr,2:gosub *enemylife2
textclear
dwave 1,"se\slash.ogg"
rnd2 %damage,600,700
mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\slash.ogg"
rnd2 %damage,600,700
mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\slash.ogg"
rnd2 %damage,600,700
mov %damage_nobr,2:gosub *enemylife2
\
mov $ori_name,"Luka"
skillname ""
sub %stack,1
return



*gran_skillx5

add %stack,1
skillname "Vaporizing Rebellion Sword"
gosub *skill16a
>Wreathed in flames, Granberia lets loose an endless flurry of attacks!
wait 500
textclear
mov $ori_name,"Granberia"
dwave 1,"se\slash.ogg"
rnd2 %damage,1200,1500
mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\slash.ogg"
rnd2 %damage,1200,1500
mov %damage_nobr,2:gosub *enemylife2
textclear
dwave 1,"se\slash.ogg"
rnd2 %damage,1200,1500
mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\slash.ogg"
rnd2 %damage,1200,1500
mov %damage_nobr,1:gosub *enemylife2
dwave 1,"se\slash.ogg"
rnd2 %damage,1200,1500
mov %damage_nobr,2:gosub *enemylife2
\
skillname ""
mov $ori_name,"Luka"
sub %stack,1
return



*badend

mov %hsean,0
bgmstop
csp -1
skipoff
monocro #000000
print 10,2000
wait 1000
monocro off
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
lsp 700,":a;chara\"+$tatie2+".bmp",%zmonster_x,%monster_y
bg black,10,2000
gosub *setwindow_03
if %100=1 && %zukanon=1 itoa $sel6,%stack:csp 10:strsp 10,$sel6,750,5,2,1,20,20,0,0,1,0,#FF0000:print 1
itoa $sel1,%count_end
eng "Times Defeated: "+$sel1
$sel6
eng $bad1
$sel6
eng $bad2
$sel6
wait 2000
lrclick
textoff
textclear
csp -1
bg black,10,2000
if %zukanon=1 mov %end_n,100
if %mylv_sin>%mylv mov %mylv,%mylv_sin:gosub *maxhp:gosub *maxmp
gosub *syokika
goto *badend_b



*badend_b

mov %nobtn,0
gosub *vanish_sprite
btndef clear
exbtn_d "P553,0P555,0P557,0P559,0P561,0P563,0"
if %end_n=0 lsp 553,":s/24,24,1;#FFFFFF#FF4444Retry ",172,153
if %end_n=0 lsp 554,":a/2,0,3;system\select_window2.jpg",150,140:exbtn 554,554,"P553,1"
if %end_n=0 lsp 559,":s/24,24,1;#FFFFFF#FF4444Title ",172,213
if %end_n=0 lsp 560,":a/2,0,3;system\select_window2.jpg",150,200:exbtn 560,560,"P559,1"
if %end_n=1 lsp 553,":s/24,24,1;#FFFFFF#FF4444Retry ",172,153
if %end_n=1 lsp 554,":a/2,0,3;system\select_window2.jpg",150,140:exbtn 554,554,"P553,1"
if %end_n=1 lsp 555,":s/24,24,1;#FFFFFF#FF4444Evaluation ",172,213
if %end_n=1 lsp 556,":a/2,0,3;system\select_window2.jpg",150,200:exbtn 556,556,"P555,1"
if %end_n=1 strsp 561,"Change Difficulty",172,273,10,1,24,24,1,0,1,1,#FFFFFF,#FF4444
if %end_n=1 lsp 562,":a/2,0,3;system\select_window2.jpg",150,260:exbtn 562,562,"P561,1"
if %end_n=1 lsp 559,":s/24,24,1;#FFFFFF#FF4444Title ",172,333
if %end_n=1 lsp 560,":a/2,0,3;system\select_window2.jpg",150,320:exbtn 560,560,"P559,1"
if %end_n=2 lsp 553,":s/24,24,1;#FFFFFF#FF4444Re-Fight ",172,153
if %end_n=2 lsp 554,":a/2,0,3;system\select_window2.jpg",150,140:exbtn 554,554,"P553,1"
if %end_n=2 lsp 555,":s/24,24,1;#FFFFFF#FF4444Evaluation ",172,213
if %end_n=2 lsp 556,":a/2,0,3;system\select_window2.jpg",150,200:exbtn 556,556,"P555,1"
if %end_n=2 strsp 561,"Change Difficulty",172,273,10,1,24,24,1,0,1,1,#FFFFFF,#FF4444
if %end_n=2 lsp 562,":a/2,0,3;system\select_window2.jpg",150,260:exbtn 562,562,"P561,1"
if %end_n=2 lsp 559,":s/24,24,1;#FFFFFF#FF4444Title ",172,333
if %end_n=2 lsp 560,":a/2,0,3;system\select_window2.jpg",150,320:exbtn 560,560,"P559,1"
if %end_n>2 && %end_n<100 lsp 553,":s/24,24,1;#FFFFFF#FF4444Re-Fight ",172,153
if %end_n>2 && %end_n<100 lsp 554,":a/2,0,3;system\select_window2.jpg",150,140:exbtn 554,554,"P553,1"
if %end_n>2 && %end_n<100 lsp 555,":s/24,24,1;#FFFFFF#FF4444Evaluation ",172,213
if %end_n>2 && %end_n<100 lsp 556,":a/2,0,3;system\select_window2.jpg",150,200:exbtn 556,556,"P555,1"
if %end_n>2 && %end_n<100 strsp 557,"Go back one decision",172,273,11,1,24,24,1,0,1,1,#FFFFFF,#FF4444
if %end_n>2 && %end_n<100 lsp 558,":a/2,0,3;system\select_window2.jpg",150,260:exbtn 558,558,"P557,1"
if %end_n>2 && %end_n<100 strsp 561,"Change Difficulty",172,333,10,1,24,24,1,0,1,1,#FFFFFF,#FF4444
if %end_n>2 && %end_n<100 lsp 562,":a/2,0,3;system\select_window2.jpg",150,320:exbtn 562,562,"P561,1"
if %end_n>2 && %end_n<100 lsp 559,":s/24,24,1;#FFFFFF#FF4444Title ",172,393
if %end_n>2 && %end_n<100 lsp 560,":a/2,0,3;system\select_window2.jpg",150,380:exbtn 560,560,"P559,1"
if %end_n=100 lsp 553,":s/24,24,1;#FFFFFF#FF4444Re-Fight ",172,153
if %end_n=100 lsp 554,":a/2,0,3;system\select_window2.jpg",150,140:exbtn 554,554,"P553,1"
if %end_n=100 lsp 555,":s/24,24,1;#FFFFFF#FF4444Evaluation ",172,213
if %end_n=100 lsp 556,":a/2,0,3;system\select_window2.jpg",150,200:exbtn 556,556,"P555,1"
if %end_n=100 strsp 563,"Back to Monsterpedia",172,273,11,1,24,24,1,0,1,1,#FFFFFF,#FF4444
if %end_n=100 lsp 564,":a/2,0,3;system\select_window2.jpg",150,260:exbtn 564,564,"P563,1"
print 10,100
btnwait %bwait
if %bwait=554 btndef clear:barclear:cspl 553,564:print 1:goto *afterend_return
if %bwait=556 btndef clear:barclear:cspl 553,564:print 1:gosub *hansei:goto *afterend_return
if %bwait=558 btndef clear:barclear:cspl 553,564:print 1:goto *afterend_goback
if %bwait=560 btndef clear:barclear:cspl 553,564:print 1:goto *afterend_reset
if %bwait=562 btndef clear:barclear:cspl 553,564:print 1:goto *nanido_henkou
if %bwait=564 btndef clear:barclear:cspl 553,564:print 1:goto *zukan_commonkaisou0
goto *badend_b



*doppel_badend

mov $zlavel,"irias2"
mov %hseanwave,0:hseanwave
mov %hsean,0
bgmstop
csp -1
skipoff
monocro #000000
print 10,2000
wait 1000
monocro off
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
lsp 700,":l;Doppel\doppelstand.png",0,0
bg black,10,2000
gosub *setwindow_03
itoa $sel1,%count_end
eng "Times Defeated: "+$sel1
$sel6
eng $bad1
$sel6
eng $bad2
$sel6
wait 2000
lrclick
textoff
textclear
csp -1
bg black,10,2000
mov %end_n,100
if %mylv_sin>%mylv mov %mylv,%mylv_sin:gosub *maxhp:gosub *maxmp
gosub *syokika
goto *badend_b



*badend2

bgmstop
textoff
textclear
skipoff
monocro off
csp -1
bg black,10,2000
gosub *syokika
mov %end_n,0
goto *badend_b



*afterend_return

gosub *setwindow_01
mov %continue,1
if %end_n<2 goto "*"+$end_go
goto "*"+$lavel+"_start"



*afterend_goback

mov %exp,%exp-%exp_minus
gosub *lvup_check
gosub *setwindow_01
if %ivent04=0 mov %item04,0
if %end_n=7 && %item15=1 mov %item11,1:mov %item15,0
if %end_n=8 && %item08=0 mov %item04,0:mov %item07,0
if %end_n=3 mov %skill01,2:mov %genzaiti,1:bgm "bgm\field1.ogg":goto *map1
if %end_n=4 mov %skill01,5:mov %item12,0:mov %genzaiti,5:bgm "bgm\field3.ogg":goto *map2
if %end_n=5 mov %genzaiti,7:bgm "bgm\sabaku.ogg":goto *map3
if %end_n=6 mov %genzaiti,9:bgm "bgm\field3.ogg":goto *map4
if %end_n=7 mov %genzaiti,12:bgm "bgm\field3.ogg":goto *map5
if %end_n=8 mov %genzaiti,19:bgm "bgm\field3.ogg":goto *map6
if %end_n=9 mov %skill01,14:mov %skill02,2:mov %skill03,2:mov %skill04,2:mov %skill05,2:mov %genzaiti,16:bgm "bgm\manotairiku.ogg":goto *map7
if %end_n=10 bgm "bgm\field4.ogg":goto *map8
if %end_n=11 bgm "bgm\field4.ogg":goto *map9
if %end_n=12 bgm "bgm\field4.ogg":goto *map10
if %end_n=13 bgm "bgm\field4.ogg":goto *map11
if %end_n=14 bgm "bgm\field4.ogg":goto *map12
if %end_n=15 bgm "bgm\field4.ogg":goto *map13



*nanido_henkou

bg black,1
wait 500
strsp 700,"Difficulty?",172,143,7,1,24,24,0,0,1,1
csel "Normal",*nanido_henkou1,"Hard",*nanido_henkou1
if %game_clear=3 csel "Normal",*nanido_henkou1,"Hard",*nanido_henkou1,"EX (One-hit-kills)",*nanido_henkou1



*nanido_henkou1

if %sentaku=1 mov %nanido,1
if %sentaku=2 mov %nanido,2
if %sentaku=3 mov %nanido,0
csp 700:print 10,500
wait 500
gosub *setwindow_01
mov %continue,1
if %end_n<2 goto "*"+$end_go
goto "*"+$lavel+"_start"



*afterend_reset

gosub *setwindow_01
gosub *reset
goto *badend_b



*hansei

add %stack,1
screen_clear
screen_clear2
gosub *setwindow_01
bgm "BGM\irias.ogg"
gosub *setwindow_01
bg "BG\bg001.bmp",10,3000
mov %manuoff,1
gosub *evalinit
gosub "*"+$lavel+"_hansei"
name ""
mov %manuoff,0
bgmstop
screen_clear
screen_clear2
bg black,10,3000
sub %stack,1
return



*evalinit

if $eval1="" mov $eval1,"00000000000"
if $eval2="" mov $eval2,"00000000000"
if $eval3="" mov $eval3,"00000000000"
if $eval4="" mov $eval4,"00000000000"
if $eval5="" mov $eval5,"00000000000"
if $eval6="" mov $eval6,"00000000000"
return



*slime_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Oh come on, you're already here?@
>Losing to the first enemy... how pathetic!\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Beaten by a Slime... the punching bag enemy of RPGs!\
>Remember to use [Struggle] if you are bound.@
>As long as you are able to move, it's an easy fight.\
>If you are bound when your HP is below half, the Slime has a small chance of using [Slime Heaven].\
>But if you fight normally, this situation shouldn't occur...\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Well then, Luka, it's time to try again.@
>I will always watch over you.\
sub %stack,1
return



*alice1_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 2
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Defeated effortlessly, huh?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>As you are now, you have no chance of victory.@
>If you can't find a way to avoid fighting her, you will never be able to move on.\
>Never forget the disgrace you suffered here.@
>Sooner or later, you must defeat this person.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>I shall wait for the day you destroy the Monster Lord...\
sub %stack,1
return



*name_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 3
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Beaten by a slug...\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>As long as you keep struggling, you should be ok.\
>Even if you can't get her off of you too quickly, she isn't that powerful.@
>As long as you don't hesitate, and continue attacking, you should be fine.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh Brave Luka.@
>Don't lose again to such a weak monster...\
sub %stack,1
return



*mdg_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 4
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>So you became a Mandragora's food source...@
>Losing the fight and being treated such a way... how pathetic.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>In this fight, never doubt yourself, and never give up. Just continue to attack single-mindedly.\
>If you do so, you will open your route to victory.\
>Even more, you can avoid the battle completely by a previous choice.\
>Completely avoiding a fight isn't something a Hero would do, though...\
>In addition, on [Normal], this enemy won't use a certain technique.\
>With [Normal], it's only a scripted battle.@
>On [Hard], it will also become a normal battle.\
>Make sure you check the Monsterpedia to ensure you've learned everything about your opponent...\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Wield your sword of justice in my name.\
sub %stack,1
return



*granberia1_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 5
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>You were beaten by Granberia, one of the Four Heavenly Knights...?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Unfortunately, there is no way you can beat her.@
>However, if you use your strongest technique, you might open a road.\
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
>...I can't easily forgive a Hero who uses the skill of a Monster, though.@
>Only for you, Luka, will I overlook it.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Someday you will be able to defeat those four...\
sub %stack,1
return



*mimizu_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 6
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>You lost to an earthworm...@
>How disgraceful.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>If you don't struggle, you will surely lose.\
>If she coils around you when you are below half health, there's a 50% chance she will use [Sweet Worm].\
>If you get caught in that attack, there is no escape.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Do not be beaten by the earthworm again...\
sub %stack,1
return



*gob_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 7
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Beaten by such a tiny Goblin... how miserable!\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>You must remember to guard when you see your enemy use their strongest attack.@
>If you do so, you will evade the attack.\
>Make sure you keep the lessons you learned in this defeat in mind for future battles.\
>In addition, the Goblin Girl uses different attacks on [Hard].@
>If you want to fill out the Monsterpedia, take heed.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Smash down even monster children with your hammer of justice.\
sub %stack,1
return



*pramia_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 8
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Violated by a Tiny Lamia like that...\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>As long as you struggle when restrained, you shouldn't lose.@
>Since you did not struggle, did you simply surrender to a monster...?\
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
>If you do not try, you cannot win.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>In addition, on [Hard] there will be a normal fight.@
>Pay attention to her moves if you face her in this way.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>You mustn't allow monster bandits to go unpunished.\
sub %stack,1
return



*vgirl_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 9
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>You became a vampire's prey?@
>How embarrassing for a Hero...\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>When bound, Struggle.@
>When you sense your enemy using a powerful attack, Guard.\
>As long as you remember this, you will surely win.\
>There are two ways that this enemy can defeat you...@
>One by her clinging to you, and the other through forced obedience...\
>You'll probably see both...@>Oh what am I saying...?@
>I believe in you.\
>In addition, the Vampire Girl has attacks she will only use on [Hard].\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Evil beings like vampires... Slay them with your sword.\
sub %stack,1
return



*dragonp_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 10
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Violated by a dragon like that... how pathetic.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>If a normal attack doesn't connect, why not try your strongest?\
>Surely, it's a horrible monster's technique...@
>But it's still very powerful.\
>It may just be the fate of the [Non-Blessed Hero]...\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>For the people of Iliasburg, you must defeat the bandits!\
sub %stack,1
return



*mitubati_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 11
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Indulging in the pleasures of a Bee Girl licking you...@
>What a shameless Hero.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>As long as your level is 6 or higher, it should be an easy fight.\
>Just struggle when bound, and you should win with no effort.\
>By the way, there are two ways to lose to the Bee Girl.@
>Depending on what move she beats you with, the scene may change...\
>...But you wouldn't be thinking such lewd things, would you?\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>The people of Happiness Village are waiting for your help...\
sub %stack,1
return



*hapy_a_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 12
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Did you enjoy mating with the Harpy?@
>Having a child with a monster... What a pathetic Hero.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>When the Harpy flies in the air, you won't be able to hit her.\
>But don't give up.@
>If you wait, you will surely find your chance.\
>You only have a moment, don't miss it.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Destroy the monsters with your sword of justice.\
sub %stack,1
return



*hapy_bc_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 13
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>So you were made into their prey...@
>Do you really want to be a slave to monsters so badly?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>This fight is similar to the previous Harpy.@
>You need to wait for your chance to hit them.\
>There's no way you couldn't have figured that out by yourself...@
>Did you lose on purpose to play with the sisters...?\
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
>...What a shameless Hero...\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Don't lose to pests like these harpies again.\
sub %stack,1
return



*queenhapy_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 14
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Was mating with the Queen Harpy amazing?@
>Drowning in lust and tossing away your mission... how miserable.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Queen Harpy is a very powerful enemy.@
>You will need to collect SP and use your best moves if you want to win.\
>Like with the other harpies, you need to time your attacks carefully if you want to hit.\
>Moreover, if you attack at a bad time, she will counterattack.@
>Make sure you pay attention to avoid this.\
>It's a long fight, but if you pay attention you should be able to win.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Show the power of your justice to the leader of the harpies.\
sub %stack,1
return



*delh_a_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 15
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>A Hero becoming corrupted...@
>Can you see how sad this makes me?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The only troublesome ability of the Dark Elf is her [Kiss of Ecstasy].@
>If you take this attack, you will be unable to attack for a few turns.\
>Unfortunately, there is no way to prevent this...@
>The best way to win is to go all out from the start.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Defeat those who have fallen to the dark, and send them to where they belong...\
sub %stack,1
return



*delh_b_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 16
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
name "Ilias"
>Were you satisfied having all your energy taken by that tentacle?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>If you are restrained, the monster shall absorb your energy.@
>Not only will you be injured, but she will recover.\
>You must escape immediately.@
>Like the last fight, you must end this quickly...\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>I am always watching over you...\
sub %stack,1
return



*hiru_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 17
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Being sucked dry by a Leech Girl...@
>What a pitiful end...\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>If you are bound by this enemy, she will absorb your energy.@
>As much as you are damaged, she will recover.\
>If you don't finish the fight quickly, you will surely be overwhelmed.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>A true Hero would not be beaten by such a monster.\
sub %stack,1
return



*rahure_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 18
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Inseminating a plant and breaking the taboo...@
>That's a serious crime, you know?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Rafflesia Girl will intoxicate you with her aroma and drag you in.\
>Try to avoid taking damage, and finish the fight as quickly as possible.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Make such a disgusting plant monster wither.\
sub %stack,1
return



*ropa_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 19
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Preyed on by a horrible monster like that... Were you satisfied?@
>Soaking up the pleasure as she eats your body... How sad.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Though the Roper doesn't have a special attack, her restraint is very powerful.\
>Just fight as you do normally, and you should win.\
>The more skills you learn, the more varied your strategies will be.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Do not allow yourself to be eaten by the Roper again...\
sub %stack,1
return



*youko_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 20
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Violated by such a weak little fox...@
>Have you already lost the will of a Hero...?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Kitsune doesn't use many strong attacks.\
>If you don't mess up too many times when she clones herself, you won't take too much damage.\
>As long as you closely watch what's happening, you should be fine.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Never let such a tiny fox beat you again...\
sub %stack,1
return



*meda_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 21
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Falling prey to a cave monster...@
>Were you happy at being squeezed to death?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>If the Meda grabs you with her tentacle and brings you into her mouth, there is no escape.@
>Before that happens, you must struggle and break free.\
>As long as you avoid her mouth and continue to attack, you should win.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>As a Hero, you are never to bend your knee to a monster...\
sub %stack,1
return



*kumo_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 22
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Did you become the Spider Girl's prey?@
>Feeling good while your whole body is wrapped in her silk... pathetic.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>During the battle, the Spider Girl will start to wrap your body in her web.@
>There is no way to break her web, so it's useless to struggle.\
>If you are wound four times, you will be unable to move, and fated to be her prey.\
>Before that happens, you must keep attacking, and defeat her!\
>Moreover, the Spider Girl has two ending scenes depending on how she defeats you...\
>Are you going to lose on purpose to see the other scene?@
>If so, I'll get angry...\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Defeat that Spider Girl in one go...\
sub %stack,1
return



*mimic_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 23
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>You became the Mimic's prey? Pathetic...@
>Did you enjoy being eaten by such a hateful monster?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Mimic has a very specific attack pattern.\
>The most important point is to hold your attacks while the chest is closed. If you attack when she's in that state, she's sure to counter.\
>If you hold your attack, you will surely find an opening sooner or later.\
>Additionally, she will try to draw you into her chest... You must struggle with all of your might at that point.\
>The Mimic has two defeat scenes, as well...@
>But if you tried to see both of them on purpose, you wouldn't be a Hero, would you?\
>Anyway, the Mimic is a formidable enemy.@
>You can always avoid the fight by not opening the chest in the first place.\
>If you're unable to win no matter what, that's also an option...@
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
>But whether it's an acceptable choice for a Hero is another story...\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Crush that insidious monster who tricks travelers...\
sub %stack,1
return



*nanabi_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 24
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Played with by the fox monster? How pathetic...\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>...But she is an enemy too formidable for you to fight at the moment.@
>There are several things you must keep in mind.\
>She has too much HP for you to deal with as you are now, but there's no need to deal with all of it.\
>Once you reduce it to a certain amount, something might happen...\
>In addition, she deals a lot of damage, so you must take care of your SP so you can use it when it's important.\
>This is a long fight, so using your SP for healing yourself may be a wise move...\
>Lastly, the most annoying move, [Seven Moons].\
>If you don't have enough HP and [Guard], you will surely be defeated by it.\
>However, it takes several turns for Nanabi to accumulate enough power to use this ability, so you can heal yourself and prepare.\
>After she uses the ability, she won't take any action for a few turns, so you have a chance to rebuild your defenses.\
>To achieve victory, you will have to be careful with your timing.\
>Though a trivial, useless point, there are two defeat scenes.@
>Not something a Hero would pursue, but do with the information what you wish.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Even against an enemy more powerful than you, never yield.\
sub %stack,1
return



*tamamo1_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 25
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>It looks like the queen of the Kitsunes defeated you...\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>As you are now, you cannot defeat this opponent.@
>You need to find a way to avoid this fight.\
>One day you will be able to face her on equal footing...\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>One day you will be able to fight her...\
sub %stack,1
return



*arumaeruma1_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 26
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Abused by the succubus queen...@
>How pitiful.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>She's too powerful for you as you are now.@
>However, if she's only using her tail, you may have a chance.\
>You must be vigilant in your defense.@
>Attacking is good, but be careful not to be left without a way to heal yourself.\
>She has a lot of HP, but you don't need to take it all down.@
>Once you injure her, a path may open itself.\
>Also if the battle extends too long, she may use an unusual technique...\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Give your judgement to such an indecent monster.\
sub %stack,1
return



*namako_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 27
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
name "Ilias"
>Defeated by a Sea Cucumber Girl...@
>How pitiful.\
>She follows a predictable pattern.@
>As long as you struggle when bound, you should be fine.\
>She has a dangerous attack that puts you into a trance, but she doesn't use it too often.\
>Stick to the basics of combat, and you will come out on top.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Don't let the Sea Cucumber Girl squeeze you like that again...\
sub %stack,1
return



*kai_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 28
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Forced into marriage...@
>Are you a Hero or a wimp!?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Shellfish Girl has a strong binding attack.@
>She will attack two turns for every one turn you get while bound.\
>As long as you struggle when bound, you should come out on top.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Get rid of that annoying monster...\
sub %stack,1
return



*lamia_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 29
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Did you become the prey of a Lamia?@
>How pathetic...\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Lamia is strong, but as you are now, you should be able to win.\
>If she constricts around you too tightly, you will never be able to escape.\
>You must struggle as soon as you can, or you will surely lose.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Bring your justice to that hideous snake.\
sub %stack,1
return



*lamiab_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 30
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Did you become the prey of a Lamia?@
>Mating endlessly... Are you happy at your end?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>There really is no point to the Lamia taking off her clothes.@
>But she's still a troublesome enemy.\
>If you are constricted four times, you will lose.@
>Struggling is useless, so you must go all out in your attack!\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Bring your justice to that hideous snake.\
sub %stack,1
return



*granberia2_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 31
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>You were defeated by Granberia?@
>She wasn't even trying... How pathetic.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>As you are now, you cannot defeat Granberia.@
>But you should be able to drive her off.\
>All she wants to do is see your abilities.@
>Show everything you've learned to her.\
>If the fight lasts too long, she'll use a unique ability.@
>If you want to complete the encyclopedia, make sure to note that.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Eventually you will be able to defeat Granberia...\
sub %stack,1
return



*page17_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 32
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Losing to a monster like that...@
>Were you trying to fight normally, or something?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>You can't fight Page 17 in a normal way.@
>The only way to damage a slippery monster like that is with your fastest attack.\
>In addition, she has a troublesome paralysis attack...@
>She has very low HP, so you must finish the fight quickly!\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Though you don't need to read such a book...@
>Still, you must not let a monster get the best of you.\
sub %stack,1
return



*page257_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 33
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Surrendering to a monster's hands...@
>Then coming to me with such a composed face?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Page 257's huge arms are troublesome...@
>But she doesn't use any other attack, so it's a very easy fight.\
>If you use [Struggle] properly, you can't be defeated.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Educate that horrible monster with your justice.\
sub %stack,1
return



*page65537_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 34
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Did it feel good to be squeezed to death by her?@
>Was that really your desire?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Page 65537 is a formidable enemy with a lot of attacks.\
>You'll want to save your SP for recovery, and slowly whittle down her health.\
>Once you lower her HP, she may use a move that causes paralysis.@
>It takes a few turns to prepare, so recover your HP in the meantime.\
>If her HP gets even lower, she may use a move that forces you to submit to her.\
>It deals a lot of damage, so take the time to prepare.\
>You cannot guard through either of those skills, so don't waste a valuable turn in futility..\
>If you take care of your own HP and fight normally, you should be fine.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Destroy that monster who lives in a book.\
sub %stack,1
return



*kani_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 35
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
name "Ilias"
>Did it feel good being washed by the Crab Girl?@
>Stuck forever as a slave to her technique...@
>Do I need to look for a different Hero?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>But... If you still have the motivation to pick up your sword again...\
>When bound by the Crab Girl, she deals a lot of damage.@
>You need to immediately start to struggle if you hope to win.\
>However, you need to be careful when she offers you her special course.@
>When she begins her preparations, you need to attack her.\
>Otherwise, you will surely be defeated.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>While I look for a replacement Hero...\
sub %stack,1
return



*kurage_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 36
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
name "Ilias"
>Toyed with by the Jellyfish Girl until your death...@
>Were the thousands of tentacles in her umbrella pleasant?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Jellyfish Girl can bind and paralyze you.@
>There's no way to evade them, so you need to win as quickly as possible.\
>Also, if you're being dragged into her umbrella, you need to attack instead of struggle.\
>As long as you remember that, the fight should be easy.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>While I look for a replacement Hero...\
sub %stack,1
return



*iso_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 37
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
name "Ilias"
>Did it feel good to be swallowed alive by the Sea Anemone Girl?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>This battle is special in that you start bound.@
>In addition, you cannot escape no matter how much you struggle.\
>Saying that, you have to fight while restrained.@
>Don't waste any turns struggling when you don't need to.\
>However, if she tries to drag you into her mouth, at that point you do need to struggle, otherwise she will drag you into her.\
>If you follow those instructions, you should win.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>At least, don't let another Hero take your place...\
sub %stack,1
return



*ankou_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 38
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>You were absorbed by the Anglerfish Girl?@
>Was it alright as long as you felt good in the end?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Like the last fight, this fight is special.\
>First of all, a normal attack doesn't work.@
>If you try to attack, you will see another method, though.\
>In addition, special attacks don't work either.\
>If she starts to absorb you, you must struggle.@
>Before too much of your body sinks into her, you must escape.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>It's difficult finding a Hero to replace you...\
sub %stack,1
return



*kraken_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 39
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Played with in your dirty hole by the Kraken... What a pathetic Hero.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Kraken is a particularly powerful enemy.@
>She's able to attack two times every turn, and deal considerable damage.\
>Be careful with your health, and use SP to recover.\
>Most importantly, when you're restrained, you must struggle.@
>If you're caught too long, you will take massive damage from her attacks.\
>Lastly, after she uses [Targeting], you must [Guard].\
>If you don't [Guard], you will take crippling damage.@
>Continue to steadily damage her while being defensive.\
>Though her HP is huge, you only need to decrease it a certain amount.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>There is no one who can take your place in this world...\
sub %stack,1
return



*ghost_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 40
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Violated by a ghost?@> Such a pathetic Hero...\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Though the Ghost has strong attacks, she doesn't have any special moves.\
>If you fight as you usually do, you can steadily win.\
>But if you are restrained, you must struggle immediately.@
>If you don't, you will lose any chance at victory in a single turn.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Send that Ghost Girl back to the afterlife...\
sub %stack,1
return



*doll_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 41
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Did it really feel good to be raped by a doll?@
>How shameful.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>If you're restrained by her hair, she can use an ability that drains your HP.\
>So if you are bound, you need to struggle right away.@
>Her moves are damaging, so don't neglect your own HP.\
>By the way, there are two different ways this doll can beat you...@
>But as a Hero, you don't really need to worry about that.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>You must destroy strange dolls like that...\
sub %stack,1
return



*zonbe_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 42
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Delighted by being raped by a Zombie Girl? How disgusting...\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Even though the Zombie Girl has a lot of HP, she isn't dangerous.@
>As long as you struggle immediately, you won't be defeated.\
>If you're playing on Normal, the only way to lose is on purpose.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Turn that moving corpse into an actual corpse...\
sub %stack,1
return



*zonbes_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 43
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>A zombie orgy...@
>Are you really happy at that outcome?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Even if there are three of them, they're still just zombies.@
>Use your SP wisely for attack and defense, and defeat them one after another.\
>If only one zombie remains, you must get her off of you as quickly as possible, or you will surely lose.\
>When there are two or more, just fight normally.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>No matter how many zombies there are, cut them down.\
sub %stack,1
return



*frederika_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 44
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Enjoying having sex with a corpse...@
>How miserable.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Frederika is quite powerful, and her moves are unavoidable.\
>Save your SP for recovery, and always try to keep more than half of your health.\
>It may be a long fight, but you must be careful.\
>If you are bound and about to be violated, you must [Attack] to deal with it.\
>If you choose to [Struggle] instead, you will surely be raped.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Mercy is not needed for a zombie.\
sub %stack,1
return



*chrom_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 45
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Violated by a necromancer...@
>I'm too disgusted to even try to say something witty.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Though Chrome has low HP, she is quite powerful.@
>She also wields some troubling techniques...\
>Even the names of them are pretty embarrassing...\
>If she gives you an injection, you will take major damage and become paralyzed.@
>In addition, she can still bind you while you're paralyzed.\
>When you're about to be violated, you have to [Attack] to get her off.\
>Since her HP is low, you need to defeat her quickly.@
>Being too defensive will lead to defeat...\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Slam your iron hammer of justice on that evil scientist.\
sub %stack,1
return



*fairy_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 46
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Sheesh.@>What kind of Hero gets beaten by a tiny Fairy?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Fairy is very weak.@
>Even her embarrassing binding move just needs to be peeled off.\
>But she does have a higher avoidance rate.@
>Use your skills as much as possible to make sure you hit.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Why don't you try punishing that trickster with your new technique?\
sub %stack,1
return



*elf_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 47
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Violated by an Elf...@>Are you going to quit your adventure now?\
>Is your only purpose on this journey to end up as a monster's prey?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Elf will take her time to fire off a paralyzing arrow.@
>Once you're hit, she will approach and attack.\
>Once you recover, she'll take her distance and start over.@
>Even though she's a monster, she has a strategy.\
>When she's away from you, you won't be able to hit her.@
>But any skill that you have that closes the distance between the two of you quickly will hit.\
>You can also hit her right after recovering from the paralysis.@
>You need to time your attacks well.\
>In addition, the Elf may throw you down and try to violate you.@
>If this happens, you need to struggle or attack her right away.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Cut down that arrogant self-proclaimed "Guardian of the Forest".\
sub %stack,1
return



*tfairy_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 48
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Made into the fairies toy...@
>What a pathetic Hero!\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Even though they're weak, facing two of them can be troublesome.\
>Since they're fairies, their avoidance is also annoyingly high.@
>If you want to ensure you hit, you must use your skills.\
>But you'll need to keep enough SP for recovery, so be careful.@
>It's dangerous when they grab on to you, so peel them off at once!\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Eradicate those fairy pests with your sword of justice!\
sub %stack,1
return



*fairys_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 49
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>No matter what, defeat isn't allowed for a Hero.@
>It looks like you don't understand this.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>When fairies collect like flies, they become threatening.@
>This fight may be rather difficult...\
>You may have no choice but to attack slowly as you use SP for recovery.\
>It's also extremely dangerous when you're bound.@
>It may be too late already, but you must struggle right away.\
>In addition, it's possible to avoid this fight altogether.@
>If you can't win no matter what you try, it's always a choice to skip it.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>The interior of the forest is only a small ways ahead...\
sub %stack,1
return



*sylph_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 50
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Is blindly rushing forward all you can do?@
>A stupid hero losing to a stupid monster. Bah!\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>There are two important things to know about this fight.@
>If you attack Sylph when her wall is up, she will use a devastating counterattack.\
>The other important thing...@
>Sylph's defensive wall doesn't last forever.\
>If you keep those two in mind, the method to win should be clear.@
>Even the dumbest of Heroes can figure it out.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Bring harm to that strange spirit.\
sub %stack,1
return



*c_dryad_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 51
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>...................\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Your opponent is very powerful, so you must fight carefully.@
>It would be wise to save your SP for recovery.\
>It's extremely dangerous when you're restrained, so you must break free right away.\
>If the Chimera Dryad uses [Floral Funeral Preparations] while you're bound, you have to attack right away to interrupt it.\
>There's a small chance that it can put you in a trance, but there's no way to stop it, so keep your HP high.\
>Lastly, you must avoid the [Rose of Strangulation] at all costs.@
>You get a warning before it's used, so use that to prepare.\
>If you decrease the enemy's HP a certain amount, you may awaken a new power as well...\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>No matter how powerful the enemy, never yield!\
sub %stack,1
return



*taran_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 52
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
name "Ilias"
>Did you enjoy becoming a large spider's food?@
>Being raped like that... Are you happy with that outcome?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Her most dangerous attack is the [Viscous Silk Spray]@
>Once you take this attack, your fate is sealed.\
>The only way to stop it is to summon Sylph and create a wall of wind.@
>If you do that, you can blow away her attack...\
>...Even if she's a spirit, she's still a monster.@
>It is outrageous to have to rely on her power...\
>But if you use it to crush monsters, I'll tolerate it.@
>Handle her like a rag, and throw her away when she's no longer useful.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>The new land is waiting for your assistance...\
sub %stack,1
return



*mino_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 53
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Defeated by an enemy whose only feature is her muscles...@
>Don't you feel pathetic being endlessly milked by a cow?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Her most dangerous attack is with that giant ax...@
>If she hits you with it, you're sure to lose.\
>But you can nullify it with your wind.@
>At the beginning of combat, be sure to protect yourself with it...\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Don't allow a monster with muscles for a brain to defeat you...\
sub %stack,1
return



*sasori_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 54
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>You were made into the Scorpion Girl's food? How miserable...@
>Did you enjoy being sucked dry?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>She only has two annoying moves.@
>Her [Venom Tail] and [Petra Scorpio].\
>You can nullify her tail with Sylph.@
>As for the other, you need to struggle as soon as she climbs on top of you.\
>If you delay for even a turn, you will be raped.@
>If you are paralyzed when this happens... Well, you can guess at the result.\
>Another tactic could be to overwhelm her with your skills before she has a chance to counter attack.\
>A little bit riskier, but it may work out.\
>The chance of a quick loss is high, so choose wisely...@
>The safest plan may be to use Sylph.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Don't be defeated by the heat, or an insect...\
sub %stack,1
return



*lamp_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 55
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Seduced so easily like that...@
>I'm so frustrated, I don't even really want to talk to you.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Her most frightening move is the [Heavenly Kamasutra].@
>If she rapes you with that, your fate will be sealed.\
>But if you call Sylph, you can prevent this technique.@
>If you want to live, be sure to summon Sylph.\
>In addition, her [Fingers of Ecstasy] can put you into a trance.@
>Though not guaranteed, Sylph may be able to block this too.\
>Her HP is rather high, so a blitz attack may not be wise.@
>Just overwork Sylph, and have a careful battle.\
>She's a tough enemy, but it's possible to avoid her.@
>If you can't win no matter what you try, you can always choose that path.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>You must drink water to prevent heat stroke!\
sub %stack,1
return



*mummy_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 56
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Squeezed as dry as a dried fish...@
>Shall I call you [Dried Fish Hero] from now on?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>First of all, Sara is useless.@
>Pretend like she isn't even there.\
>Sylph is very useful against someone like the Mummy Girl.@
>Since many of her attacks are bandage based, the wind can cut them up.\
>In addition, you must prevent the [Mummy Package] technique at all costs.\
>If you take the attack, you will surely lose.@
>Sylph can protect you against it.\
>Work her as hard as you can, until she becomes worn out.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>...A trial is meant for a god to test the spirit of man.\
>But those monsters in the Pyramid are trying to give a trial as if they were gods...\
>Give conceited monsters like that your judgement.\
sub %stack,1
return



*kobura_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 57
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>...You're here again?@
>Sheesh, this has become too frequent...\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>As usual, Sara is useless.@
>Pretend as if she isn't there.\
>When bound by the Cobra Girl, she will use [Cobra Anal].@
>If you take this attack, you will be defeated. Be careful.\
>If you call Sylph beforehand, it's likely she will prevent it.@
>In addition, her paralysis attack can be nullified by Sylph.\
>If you wish to be safe, you should call Sylph right away.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Eradicate the monsters who lurk in the Pyramid.\
sub %stack,1
return



*lamias_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 58
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
name "Ilias"
>Was it fun to be played with by a group of Lamias?@
>Given your record, I wouldn't be surprised if you would have rather been eaten...\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Now you don't even have to pretend like Sara isn't there.@
>...It's not like she's useful, anyway.\
>You will take continuous damage in this battle, so don't neglect your health, especially after being restrained.\
>Sylph isn't particularly effective here...@
>But it may be more efficient to use your SP to end the battle quickly.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>You're almost to the deepest part of the Pyramid...\
sub %stack,1
return



*sphinx_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 59
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>As expected, you came here.@
>As soon as you answered her riddle like that, I knew I would be seeing you.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>You cannot win this fight.@
>Even if you bring her health to zero, she will revive.\
>Sphinx uses a variety of nasty abilities.\
>[Isis' Lovemaking] will both damage and put you in a trance.@
>Sylph can block the attack, so be sure sure to use her.\
>[Kiss of Death] will kill you in a single blow.@
>Sylph cannot block it, so you must protect yourself as she charges up.\
>If you reduce her HP to zero, she may use a new ability...\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Your only choice to continue your quest is to avoid this fight...\
sub %stack,1
return



*suckvore_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 60
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Were you satisfied being sucked by even a strange creature like that?@
>You're quite the miserable pervert.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Suck Vore has a troublesome restraint attack.@
>Not only is it damaging, but it heals her too.\
>You may want to call Sylph to mitigate some damage.@
>Along the way, try to use your SP on strong offensive skills.\
>But you may need to save enough to recover once or twice...@
>It seems as though your SP may be spread a bit thin...\
>But if you adapt to the situation and do your best, you should be fine.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Bring your justice to the woman who's a plague on her own village.\
sub %stack,1
return



*wormv_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 61
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Losing to a villager... What a miserable Hero.@
>Do you really want to be pleasured by monsters that badly?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Worm Villager is almost the same as the Suck Vore.@
>However, her restriction attack is stronger.\
>Her attacks are pretty powerful, and she can drain your energy.@
>Since she can recover her HP, you may not want to drag this fight on too long.\
>You may want to try raising your defense with Sylph and going on the attack.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Don't allow any more victims like her to be created.\
sub %stack,1
return



*ironmaiden_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 62
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
name "Ilias"
>Did you enjoy being tortured with pleasure?@
>If you liked it so much, do you want me to make something similar for you?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Iron Maiden will wait for a moment to counterattack.@
>If she is ever able to counter, your defeat is assured.@
>Therefore, you must never attack when her lid is open.\
>To complicate things, she can confuse you.@
>If you're confused, you may attack her even when the lid is open...\
>You must have Sylph's protection to guard you, or you risk losing.@
>While ensuring you never lose her protection, just be patient and slowly whittle down her health.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Don't allow a torture device like that to live.\
sub %stack,1
return



*lily_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 63
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
name "Ilias"
>Did you enjoy living as her guinea pig?@
>The next world, and the one after that... Do you want to keep living as a guinea pig?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Lily is a very dangerous opponent.@
>Her attacks are powerful, and she can put you into a trance.\
>Her restraining attack and her trance inducing attack can both be blocked by Sylph, so be sure to summon her.\
>You may not have enough SP to spare on attack skills, so be sure to always have enough to recover in case of an emergency.\
>The fight may be difficult because she can heal herself...@
>But as long as you're careful and don't take too many risks, you should be fine.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Destroy the ringleader of evil and save the village!\
sub %stack,1
return



*arizigoku_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 64
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Squeezed dry by the Antlion Girl?@
>How disgraceful...\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>It isn't possible to escape from her quicksand.@
>The only thing you can do is attack her.\
>You have to defeat her before she sucks you in.@
>A single useless action will cause your defeat.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Destroy that monster who traps unsuspecting travelers...\
sub %stack,1
return



*sandw_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 65
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Dried up again?@
>You really like being left dry...\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Sandworm has a lot of HP, and her restraining attack is damaging.@
>In addition, when you're in her mouth you can't escape by struggling.\
>The only way to escape is to attack her and force her to spit you out.\
>Sylph can block her mouth from sucking you up...@
>But the probability is low, so I wouldn't depend on it.\
>The best way to fight should be to use your SP on attack skills, and then recovering after you escape from her mouth.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Destroy every desert monster that attacks unsuspecting travelers...\
sub %stack,1
return



*gnome_hansei

add %stack,1
mov %count_hanseikai,%count_hanseikai+1
evalset 66
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Even if it's called a great spirit, it's still a monster.@
>Don't you feel pathetic at being made into a little girl's toy?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Gnome is a powerful enemy, but Sylph is quite effective.@
>If you wish to survive her onslaught, Sylph will be critical.\
>In other words, force the spirits to fight each other.\
>Although her HP is huge, you don't need to take it all away.@
>Once you lower it enough, something may happen...\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Destroy Gnome, and put an end to the belief in animism.\
sub %stack,1
return



*hansei_h

lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %con_hvoice=0 dwave 0,"voice\iriasu1_01a.ogg"
name "Ilias"
>Do you remember how many pieces of bread you have eaten so far?
>I don't eat bread, but I remember how many times you have come here.\
if %con_hvoice=0 dwave 0,"voice\iriasu1_01b.ogg"
>It's the fiftieth time... What a miserable Hero!\
dwavestop 0
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
if %con_hvoice=0 dwave 0,"voice\iriasu1_02.ogg"
>I shall humiliate you as punishment.\
name ""
dwavestop 0
>Ilias suddenly lowers my pants and underwear!\
name "Luka"
>Eh...? Ilias? What are you doing...?\
name ""
if %con_hvoice=0 dwave 0,"voice\iriasu1_03.ogg"
name "Ilias"
>I said I'm going to humiliate you.
>While I force you to come with my hand, reflect on your actions.\
name ""
dwavestop 0
name "Luka"
>A... No...@
>Ilias... Doing something like that is...\
name ""
lsp 690,":a;chara\iriasu_ct01.bmp",478,0
lsp 700,":a;chara\iriasu_st02.bmp",-100,0:print 10,500
>Ilias' pure hand grips my penis.@
>Her soft, warm palm firmly holds onto me.\
name "Luka"
>Auu...\
name ""
>I can feel her thin fingers holding on to me.@
>The holy Ilias is tightly grasping my dirty part...@
>As if being corrupted, the immoral act makes me excited.\
if %con_hvoice=0 dwave 0,"voice\iriasu1_04.ogg"
name "Ilias"
>Now, I'll shame you...\
name ""
dwavestop 0
mov %hseanwave,1:hseanwave
>Ilias starts to slowly move her hand.@
>Her thin fingers slowly move up and down as she loosely holds onto my penis.\
>A finger touches the tip as she continues to slowly pump me.\
name "Luka"
>Aaa... This isn't...\
name ""
>Slowly moving, she's being very gentle.@
>It's as if her pure white fingers are playing with my pink rod.\
>But even with that slow movement, the pleasure is incredible.@
>This can't be... Is Ilias really playing with my penis...?\
if %con_hvoice=0 dwave 0,"voice\iriasu1_05.ogg"
name "Ilias"
>Does it feel good, Luka?
>However if you're a Hero, you have to endure this...\
name ""
dwavestop 0
name "Luka"
>Y...Yes... Ahh...\
name ""
>I clench my teeth and try to silently endure.@
>But the movements of her fingers seem to laugh at my effort.\
>Slowly moving up and down, the tip of her pinky strokes the back of my penis.\
>Another finger traces around the tip of my urethral opening, as pre-come starts to leak out.\
if %con_hvoice=0 dwave 0,"voice\iriasu1_06.ogg"
name "Ilias"
>Your dirty juice is coming out...
>Such a shameful Hero.\
name ""
dwavestop 0
>One of Ilias' fingers wipes up the pre-come and spreads it over the tip of my penis.\
>The slippery feeling was enough to make me unconsciously thrust my waist up.\
name "Luka"
>Hauu...@>I can't take much more...\
name ""
if %con_hvoice=0 dwave 0,"voice\iriasu1_07.ogg"
name "Ilias"
>Defeated by just this much? How miserable.
>But I won't go easy on you...\
name ""
dwavestop 0
>Ilias' loose hand on my penis starts to increase her pumping speed as she tightens her grip.\
>The increased pressure and speed gives immediate pleasure.\
name "Luka"
>Aaa!@> Incredible!\
name ""
>Ilias' handjob forces me to the edge of ejaculation.@
>The tingling of the impending orgasm starts from my penis and starts to flow through my body.\
>If this keeps up, I'm going to come on her hand...@
>The hand of the sacred goddess... Making it dirty with my semen...\
name "Luka"
>No... Ilias' hand... I'll make it dirty...\
name ""
if %con_hvoice=0 dwave 0,"voice\iriasu1_08.ogg"
name "Ilias"
>Luka... I'll make you come.\
name ""
dwavestop 0
>Ilias says in a firm tone.@
>Hearing that, I realize that I'm allowed to come.\
>At the same time, she tightens her grip on my penis.@
>Increasing her speed, she's trying to quickly force me to come.\
>I surrender my body and mind to Ilias as she finishes me off.\
name "Luka"
>Ahhh!!\
name ""
>Held by the pure hand of the sacred goddess, I finally come.\
gosub *syasei1
lsp 690,":a;chara\iriasu_ct02.bmp",478,0
lsp 691,":a;chara\iriasu_bk01.bmp",-100,0
gosub *syasei2
name "Luka"
>Auuu...\
name ""
>Throbbing, my semen shoots out and covers Ilias' hand.@
>Her pure white hand... Now dirty with my semen...\
if %con_hvoice=0 dwave 0,"voice\iriasu1_09.ogg"
name "Ilias"
>You made my hand dirty with your seed...
>Such a corrupt Hero, Luka.\
name ""
dwavestop 0
>Even though she says that, she continues to milk the rest of my semen out of my penis.\
>The pleasant pumping forces out the rest of my come still in my urethra.\
mov %hseanwave,0:hseanwave
if %con_hvoice=0 dwave 0,"voice\iriasu1_10.ogg"
name "Ilias"
>Your shaming ends with this...
>Did you reflect on your actions, Luka?\
name ""
dwavestop 0
csp 690
lsp 691,":a;chara\iriasu_bk01.bmp",0,0
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>While saying that, Ilias releases my penis.\
name "Luka"
>Auuu...\
name ""
>Ilias looks at her hand, covered in my semen.@
>Flooded with the lingering feelings of my orgasm, my strength is drained.\
if %zukanon=2 goto *zukan_commonkaisou0
name "Ilias"
>Now go, oh brave Luka.@
>After learning from this experience, don't be defeated by another monster.\
name ""
mov $eval1,"seen"
sub %stack,1
return



*centa_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Well now, you showed up here awfully quick.@
>Raped by a horse in a forest... How pathetic.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Moving on...@> Being held down by a Centaur is no laughing matter.@
>With her heavy body weight, you will never be able to get her off.\
>Essentially... Once you're held down, under normal circumstances, your defeat would be assured.\
>However, with Gnome, you should be able to be imbued with enough power to break free.\
>Forced to use the power of Elemental Spirits is pathetic for a Hero...@
>But being raped in a forest by a horse is even more so.\
>As one further point, be careful about using your SP for recovery.@
>Powerful sword skills may be the way to go.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Defeat that monster before she attacks an innocent...\
sub %stack,1
return



*kaeru_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>You got licked by a bunch of frogs.@>I'm so happy for you.@
>Really, what a pathetic Hero...\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Now then, if you're captured by the Frog Girls, you'll suffer very damaging attacks.\
>You can escape normally, but her bind will severely hurt you first.\
>But with Gnome, you can escape from them much quicker.\
>In the future, when it looks like you may be overpowered and held with no escape, you may want to borrow Gnome's power.\
>If you break through all their binds, and still lose... There may be another pathetic fate for you to succumb to.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Peel off that swarm of Frog Girls, and trample them underfoot.\
sub %stack,1
return



*alraune_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>This time, sucked dry by a flower...@
>Really, you are quite pitiful...\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Alraune uses the ecstasy status effect to leave you helpless while she abuses you.@
>If you use Sylph, you will be able to nullify that move, and any plant-based moves she may have.\
>If you use Gnome, you'll be able to break out of any restraints... But Sylph may be a better bet.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Make Alraune's next blooming be a shower of blood.\
sub %stack,1
return



*durahan_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Raped in front of a huge crowd?@>That disqualifies you as a Hero.\
>How did it feel to be humiliated in front of a huge crowd of people?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Dullahan is able to attack twice every round.@
>She can also put you into a trance, making her quite troublesome.\
>Sylph will protect you against the trance, but won't do much against her other moves.@
>On the other hand, Gnome will let you break out of her binds right away.\
>Either one will help, but I think trance is more troublesome.\
>Please use those elemental spirits like slaves, then toss them away like useless rags.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Show her a death even worse than decapitation.\
sub %stack,1
return



*kerberos_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Preyed on by a dog, does that make you even lower than a pet?@
>A Hero whom is even lower than a dog is useless...\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Cerberus has powerful attacks, but her restraint is the most worrisome.@
>If you can't get her off in one turn, she will rape you.\
>Gnome's power will let you escape, so that is the way to go.@
>In addition, there are two ways to lose to her...\
>But surely you wouldn't lower yourself again in trying to experience both...\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Send that hell hound back to hell.\
sub %stack,1
return



*arumaeruma2_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>It seems as though you've suffered an embarrassing defeat against Alma Elma...@
>Indeed, having to fight such a powerful opponent is bad...\
>But to be defeated when she isn't even trying from the start...@>Shame on you.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>In fact, she almost seems like she's intrigued by you...@
>I think she actually wants to help you...\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>...Such as how to use the wind.\
dwave 1,"se\ikazuti.ogg"
quake 10,1500
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>...But I will say nothing nice about her.\
>At any rate, it doesn't seem like you can win fair and square.@
>Perhaps this is a fight that can be won with words?\
>Usually she would not stop to talk to her prey...@
>But it looks like she makes a special case for you.\
>It also seems like she has two different ways to humiliate you should you begin to bore her...\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>One day for sure, you will destroy that Succubus Queen with your own hands.\
sub %stack,1
return



*yukionna_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Made into the prey of Yuki-onna?@> That's just cold...@
>But the thought of me depending on a Hero like you is even more chilling...\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>She has a variety of skills, which make this fight annoying.@
>Yuki-onna has the ability to both paralyze and drain your HP.\
>With Gnome you can escape from her embrace easy enough...@
>But with Sylph, you can protect yourself against the paralysis.\
>Sylph may be the better bet.@
>In either case, at least summon one of them.\
>In addition, there are multiple endings she can put you through...@
>I know you'll be trying them both anyway.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Do not allow yourself to be defeated by the cold.\
sub %stack,1
return



*nekomata_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Beaten by a bizarre little cat... How pitiful.@
>Do you really get that much enjoyment out of betraying my expectations?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>If you're bound by the Nekomata, you'll be defeated in an instant.@
>If you try to struggle normally, you won't escape.\
>You must always be using Gnome's power, or you may lose at any time.\
>Sylph may prevent some damage...@
>But Gnome is the only way to prevent the surefire loss.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Erase any existence of that bizarre beast.\
sub %stack,1
return



*waelf_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Did you enjoy the Kimono wearing elves' techniques?@
>Are you having fun in your quest to be played with by every monster skill?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>In this battle, you have to fight two enemies at once.@
>When they're together, their power is quite high.\
>If you're bound, you will take serious damage.@
>With Gnome, you can break out at once.\
>In the first half of the fight, Gnome may be safer.\
>When it's just the Kunoichi Elf alone, her attacks are weaker.@
>But she makes up with it for a devastating pin attack.\
>If she managed to pin you, she will defeat you without even allowing you to struggle once.@
>Because of that, Gnome is completely useless.\
>However, Sylph can prevent you from even being bound in the first place.@
>Since it's a complicated pin, the protection from the wind will let you avoid it quite easily.\
>So when you reach the point where it's just the Kunoichi Elf, you should switch to Sylph.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Finish off those annoying elven creatures.\
sub %stack,1
return



*yamatanooroti_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Not only did you not get rid of her, but you ended up as the sacrifice...@
>...Are you sure you didn't go into that trying to be the sacrifice?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Now then, Yamata is quite difficult.@
>Under normal circumstances, victory would be impossible.\
>All you need to do is reduce her health a little...@
>But even then, that will be difficult.\
>The most important thing is to escape from her restraint, so Gnome should always be summoned.\
>After that, you should focus on recovery.@
>It's a long battle, so make sure not to get overwhelmed.\
>Take care while recovering, and don't let the fight drag on too long.@
>In addition, that powerful blow that attacks at random won't work...\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Destroy that evil being that torments the villagers.\
sub %stack,1
return



*insects_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Sucked dry by a bunch of insects...@
>You're really trying to give all your semen to monsters, aren't you?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Because of the intense damage from the group of them, you should use Gnome.@
>Both the damage reduction and the ability to break out of binds will be crucial.\
>Since your opponents are insects, Sylph won't be very useful.@
>This time, stick with Gnome.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Though it's interesting to see monsters kill each other, go ahead and kill them yourself.\
sub %stack,1
return



*mukade_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Allowing a Centipede Girl to suck up all your body juices... Sheesh.@
>Are your body juices really that delicious?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Centipede Girl has such a high attack power, it's almost mandatory to summon Gnome.@
>In addition, her restraint needs to be broken quickly.\
>If you summon Gnome and fight normally, it shouldn't be too hard.@
>She has a lot of defense though, so it will be a long fight.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Crush that disgusting Centipede Girl under your foot.\
sub %stack,1
return



*kaiko_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Did it feel good inside a Silkworm Girl's cocoon?@
>Did it feel good to fill that cocoon with your semen?@
>...Sheesh.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Silkworm Girl has both powerful attacks and an annoying cocoon attack.@
>If you're turned into a cocoon, you'll be met with an instant loss.\
>If you call Sylph, you may avoid it altogether, but it isn't guaranteed.@
>With Gnome you'll take more damage, but can avoid a forced loss.\
>Gnome is the safest bet.@
>Just be sure to watch your HP.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>If you become a cocoon again and return here, I'll punish you.\
sub %stack,1
return



*suzumebati_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>A sex slave of simple worker bees... How pathetic.@
>The fact you accepted it with glee is even worse.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Hornet Girl is powerful, and can attack twice.@
>In addition her paralysis is deadly.\
>With Gnome, you can mitigate some damage.@
>But Sylph will let you dodge the paralysis, which might be better.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>If you win this battle, you will meet with the insect boss.\
sub %stack,1
return



*queenbee_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Mating with the Queen, and offering up your semen so happily...@
>Luka, your corruption prone behavior is too sickening for words.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Queen Bee is similar to the Hornet Girl, only with higher attack power.@
>She also has a pesky seduction ability.\
>Normal attacks can be handled by Gnome, but Sylph will provide protection against the seduction attack.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>If you eliminate the Queen, the simple minded insects will be thrown into disorder.\
sub %stack,1
return



*plants1_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>This time, losing to a couple of plants...@
>Sheesh, you have no taste in partners.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>These monsters are not too powerful alone.@
>But together, they are quite troublesome.\
>But with that said, since they are plants, Sylph is quite effective.@
>If you summon her, you will be able to avoid many of their attacks.\
>Gnome has been quite useful until now, but Sylph shines against plant types.\
>It may also be a good idea to quickly unleash powerful sword skills to bring the fight down to a more manageable one versus one.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>This time bring your blade of justice down on the Alraunes.\
sub %stack,1
return



*plants2_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Sheesh, fertilizer for plants now?@
>You really love using your semen to feed monsters, don't you?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The three Alraunes are very annoying.@
>Without the power of the spirits, this battle may be completely impossible.\
>Sylph is the best choice to use.@
>Since they're plants, you have a high avoidance chance.\
>In addition, you must always "Guard" to avoid the Parasol's embrace.@
>If you don't, you'll be defeated the next turn.\
>In addition, once you get down to the final plant, you need to switch to Gnome to break out of her binding attack.\
>There are many things to avoid, but if you take care, you will win.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Make your sword rip through those plants like a scythe through wheat.\
sub %stack,1
return



*a_emp_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Falling in love with a flower, and offering it semen of your own free will?@
>My, my.@>Aren't you just a lovely human being?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The plant monster leader is quite powerful herself.@
>As expected of a plant monster, she has both restraining and trance inducing abilities.\
>The "Intoxicating Fragrance" ability is quite dangerous.@
>It lasts for a long time, so taking it may just finish you off.\
>Sylph will protect you from that, so she is crucial in this fight.\
>In addition, if that flower clasps around you, your defeat is certain.@
>Neither Gnome nor Sylph will be able to stop your loss.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>There are still more enemies to deal with, so don't let your guard down...\
sub %stack,1
return



*dorothy_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Food for a plant...@
>Do you want to give up your humanity to become an insect?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Dorothy's most annoying attack is "Philia Melt".@
>If you take this, you will instantly lose.\
>But Sylph will let you avoid this attack and others, so be sure to use her.\
>Gnome will help you break from other binds...@
>But you'll be helpless against Philia Melt, so use Sylph.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>They're called Sisters, so be prepared for the enemies ahead...\
sub %stack,1
return



*rafi_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>You dissolved in her pitcher?@
>Good for you.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Raffia's pitcher is very dangerous.@
>As soon as you're in there, there's no escape.\
>The only way to protect yourself from her trance inducing ability is to use Sylph.@
>With Sylph, you should be able to achieve victory.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Even after you defeat this enemy, don't let your guard down.\
sub %stack,1
return



*dina_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>My, who would have seen this coming?@
>Do you want me to keep reincarnating you as a bug so you can let plants eat you endlessly?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Like the other sisters, Deana has an annoying trance move that will be your death if it hits you.\
>If you don't want to be eaten, summon Sylph right away.\
>Without Sylph, your defeat is almost guaranteed.@
>Just watch your health as you whittle hers down.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>With your sword, obliterate the last of that horrible village of monsters.\
sub %stack,1
return



*jelly_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Were you able to enjoy the feeling of being submerged in slime?@
>I'm glad to see a glimpse of your true self again.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Jelly Girl is a slime monster, so Gnome is effective.@
>With Gnome, you can break out of binds and reduce damage.\
>Slimes use binds and physical moves most often, so Sylph is not very effective.\
>If you call Gnome, this battle shouldn't be particularly tough.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>If you come back here again, I'll drown you in slime.\
sub %stack,1
return



*blob_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>This time you were actually eaten by a slime...@
>It seems you enjoy being treated as nothing but a food supply.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Gnome is required for this fight.@
>If you're captured in her sticky body, your normal strength is not good enough to break free.\
>Since it's an instant loss if she grabs you without Gnome, you must make sure Gnome is always summoned.\
>Like the other slime, Sylph's evasion chance is too low for her to be worthwhile.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Eradicate all those slimes that would eat humans.\
sub %stack,1
return



*slime_green_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>This time you drowned in the slime...@
>Raped by a slime, eaten by a slime, drowned by a slime...@>Are you satisfied yet?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Green Slime's slime fills up the area, so there's no point struggling.\
>Just attack her.@> Once you deal enough damage, the way forward will be shown to you.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>This fight is only the first half...\
sub %stack,1
return



*slimes_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>This time you were raped by a group of slimes...@
>For a slime maniac like you, that must have been paradise.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Four slimes at once are as annoying as you would expect...@
>They deal a lot of damage, so don't let Gnome's power go away.\
>In addition, Gnome can deal with the binds.@>She's essential.@
>Sylph? Oh, I almost forgot she existed.\
>They deal a lot of damage, so a long fight isn't good.@
>Use some bold moves right from the start, and grasp victory.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Destroy that group of slimes that have made their nest in this dungeon.\
sub %stack,1
return



*erbetie1_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>A pathetic defeat at the hand of one of the Four Heavenly Knights?@
>Even though she's far stronger than you, it's still quite pitiful to watch you be eaten.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>You still can't defeat one of the Heavenly Knights.@
>You should know that better than anyone.\
>Try to survive a single blow, and a path will open up.@
>Use every means possible that you know of to reduce damage.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>One day you'll have the power to defeat her...\
sub %stack,1
return



*undine_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>You escaped Erubetie... And ended up being melted away anyway.@
>The digestion lovers thank you for your hard work.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Undine is another opponent you can't fight on equal terms.@
>If you try to fight normally, you'll be overwhelmed sooner or later.\
>But Undine seems to want something from you.@
>Perhaps if you listen to what she says, you might see the path.\
>But you should summon Gnome the very first turn to protect yourself from damage, and to break out of a pesky bind attack.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Once you get tired of being eaten, please try to remember your quest.\
sub %stack,1
return



*kamakiri_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Mating with a Mantis Girl so she can reproduce...@
>What sort of Hero are you if you're creating monsters rather than destroying them?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Due to her high offensive ability and binding move, Gnome is basically required.\
>Sylph won't let you evade much, so refrain from using her.\
>In addition, Undine isn't useful yet.@
>She reduces less damage than Gnome, so refrain from using her at all.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Destroy that disgusting monster that tries to mate with humans.\
sub %stack,1
return



*scylla_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Were you happy being coiled in tentacles?@
>You're quite the perverted Hero to enjoy such humiliation.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Scylla's restriction attack, as you might expect, is very powerful.@
>If she catches you, she can attack twice every turn.\
>Gnome is essential in breaking out of it.\
>In addition, she has a low chance of using a special move while you're bound, causing your defeat to be ensured.\
>You can use Sylph to protect yourself from it...@
>If you wish to use the SP, you can summon both Sylph and Gnome.\
>You can summon both to be safe...@
>Or you can risk it with just Gnome.\
>Do whichever you please to win.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Cut off every one of those disgusting tentacles.\
sub %stack,1
return



*medusa_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Raped by a bunch of snakes, you met another unsightly end.@
>I agree with her, you are quite pitiful.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Her damage output is high, so Gnome may be useful for that.@
>But she has no binding attack, so Gnome isn't required.\
>The most troublesome ability she has is petrification.@
>If you can't beat her in three turns after being hit by that attack, you will lose.\
>Sylph will let you avoid that move, so she is essential.@
>In addition, with Sylph you can power up the new skill you just learned.\
>It's up to you to decide what to do.@
>You could leave it up to luck and go all out, too.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Cut off her scalp and deprive that monster of her unique trait.\
sub %stack,1
return



*golem_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Used as a power supply for a synthetic monster...@>That's a new one.@
>So you've been a toy,@>eaten,@> sex slave,@>sucked dry,@>a breeding slave,@>a power source...@
>I must say, I'm quite surprised by the variety you enjoy.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Golem Girl is very powerful, but there are many turns where she doesn't attack.\
>Gnome will let you break from her bind, so she should be summoned.\
>In addition, your defeat is certain if she uses you as her "power supply".@
>Sylph can prevent this, so she should be summoned.\
>It takes a lot of SP, but it would be safest to summon both of them.@
>With Sylph active, you can also power up your new sword skill.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Don't bother meeting with humans who would create monsters.\
sub %stack,1
return



*madgolem_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Squeezed by a man made mud doll this time...@
>You're quite... Liberal in your selection of partners, aren't you?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>You might want to call Gnome because of her restriction attack.@
>Her damage is fairly high, too.\
>If you're bound when she uses her "Mud Shake" move, you will face certain defeat.@
>Ideally you would break free with Gnome before she can use it.\
>Sylph is not very useful in this battle.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Turn that mud monster back into normal mud.\
sub %stack,1
return



*artm_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>My, my, you sure seemed to enjoy that sex toy.@
>Would you like to continue using that toy in your next life, too?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Her restriction attack and damage are both annoying, so Gnome is quite useful.\
>You can avoid her ecstasy attack with Sylph as well.@
>In addition, you can avoid her restriction attack while bound if you have Sylph summoned.\
>If you want to be safe, summon both.@
>Sticking just with Sylph and using your new sword technique should work fine, though.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Destroy that doll, whose existence itself is a sin.\
sub %stack,1
return



*ant_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>A slave to worker ants, who are already basically slaves of the Queen Ant.@> That's got to be the lowest of the low.@
>Would you like to be reincarnated as a toilet in your next life, by any chance?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Ant Girls deal a lot of damage as a group, so Gnome would be a wise choice.\
>You can also shake off their restriction, so she's doubly useful.\
>Sylph is not very effective for this fight...@
>The best plan would be to call Gnome and use sword skills.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Eradicate these violent monsters who dared to turn their fangs toward the gentle citizens.\
sub %stack,1
return



*queenant_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Reproducing with the Ant Queen to create thousands more monsters...@
>Just to make sure...@> You really aren't trying to destroy humanity, right?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Queen Ant's most dangerous move is her "Eyes of Seduction".@
>Sylph will protect you, so be sure to use her.\
>Outside of that, she has no status or restriction inducing skills.\
>Gnome is not a requirement for the fight...@
>But since her attacks are pretty damaging, she could be useful.\
>Using Sylph and your Lightning Sword Flash is a good way to defeat her, though.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Destroy this ringleader of evil and bring peace back to Grangold!\
sub %stack,1
return



*maccubus_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>I knew it.@> You went to the Succubus Village just to be raped by a Succubus, didn't you?@
>I should have expected it from you by now...\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>If she binds you, you will be raped the next turn and lose.@
>The only way out is by using Gnome, so she is required.\
>Outside of that, there's nothing special about this fight.@
>Just watch your HP and fight normally.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Defeat those humans who have turned into Succubi without mercy, and protect the innocent humans.\
sub %stack,1
return



*minccubus_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Are you happy with being a little Succubus girl's toy?@
>Though I guess your penis is quite like a toy.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Mincubus' offensive ability is quite high.@
>If she gets on top of you, you will lose a lot of HP quickly.\
>Call Gnome as soon as you can to break out of it quickly.@
>Unfortunately, Sylph is not very effective.\
>In addition, it seems like she might get a little overeager and continue two attacks even after you're defeated...\
>But only worthless human beings would actually attempt to experience that.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Even though your opponent is a little girl, now that she's a Succubus, don't hold anything back.\
sub %stack,1
return



*renccubus_hansei

add %stack,1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Having all of your Heroic power stolen by a Succubus...@
>It was really embarrassing to watch you being drained like that...\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The special ability of the Lencubus is to use [Level Drain] while you're bound.\
>But as long as you [Struggle], you won't suffer from this technique.\
>In other words, if you actually try to fight, you cannot lose.@
>Don't give in to the desire for pleasure like some people...\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Destroy the Succubi, and return peace to the village!\
sub %stack,1
return



*succubus_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Sheesh, lost to another Succubus...@
>Are you a Hero, or are you simply food?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>This Succubus is an annoying opponent, with multiple binding moves, and a status inflicting attack.\
>If you can't shake off her restraints right away, you will lose instantly.@
>Therefore, Gnome must always be summoned.\
>In addition, both her trance attack and another instant kill move can be avoided only with Sylph.\
>It's annoying, but you must fight with both Sylph and Gnome.@
>With Sylph summoned, feel free to abuse her with the upgraded thrust move.\
>In addition, it seems that the Succubus might get a little eager after beating you with two of her attacks...@
>...Originally that would be a warning... But since it's you, I'm sure you're taking it as a suggestion.\
>Please, don't misunderstand me.@
>No true Hero would voluntarily let a monster play with him just to see what happens.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh Wandering Foodstuff Luka.@
>Please, try to fight seriously for once...\
sub %stack,1
return



*witchs_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Do you like becoming a Succubus' food that much?@
>Did you come to the Succubus Village to let them devour you, or to seal them?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Witch Succubus has less HP and offensive power than normal Succubi.@
>But her special skills are quite troublesome.\
>You need Sylph to protect against her Level Drain, seduction, and trance attacks.@
>But it isn't a guaranteed evasion chance... So they can still be troublesome.\
>In addition, if her Minimum Phantasm skill hits you, your defeat is assured.@
>Sylph can protect you from that, so be sure to summon her.\
>In addition, if she lands "Energy Drain" on you after you're bound, your defeat is certain.@
>Thus, Gnome is also required...\
>It takes time and SP to summon both... But it's the only way to safely fight.\
>In addition, if she beats you with either her hat or her breasts, she may continue toying with you...@
>I hope that wasn't a glint of expectation I just saw in your eyes.\
>In addition, she may continue playing with you if defeated by either of her Minimum Phantasm skills.@
>For one who loses by choice to such an attack, an end fitting them awaits...\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>You must never allow the revival of Lilith to come about!\
sub %stack,1
return



*lilith_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>My, my.@>As soon as you saw that Lilith had been revived, you sure jumped at the chance.@
>I congratulate you on being the first to be raped by the now revived sisters.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Lilith and Lilim are quite powerful enemies.@
>You won't be able to endure their powerful offensive abilities without the protection of Gnome.\
>In addition, Sylph is required to protect yourself from her special attacks.@
>To even stand toe to toe with those sisters, you'll need both spirits protecting you.\
>Since it's a long fight, your SP will be needed for recovery, so be careful on overusing your sword skills.\
>If they absorb your SP, they will use it in a powerful followup attack, so be sure to defend yourself...\
>The sisters are quite formidable, but you should be able to defeat them as you are now.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>You must never allow the unsealed Lilith to escape back into the world...\
sub %stack,1
return



*madaminsect_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Sucked dry by that disgusting insect...@
>Being dry is bad for your skin, Luka.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>You cannot break free from her bind without Gnome, so summoning her is required.\
>Sylph won't let you evade many attacks, so it may be better to not summon her.@
>Other than summoning Gnome, just fight her normally.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Bring the wrath of the heavens down on those who would attack travelers.\
sub %stack,1
return



*madamumbrella_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Even being forced to come by disgusting tentacles like that...@
>Don't you have any shame? How could you let that happen?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Just as it would appear, her binding attack is very strong.@
>Without Gnome, there is no way to break free.\
>Sylph can help you dodge her most powerful attack with a high degree of chance, but isn't really necessary.\
>But if you do choose to summon her, make use of the powered up sword skill.@
>If you just stick with Gnome, it should be an easy fight however.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>A village such as this should be burnt to the ground.\
sub %stack,1
return



*maidscyulla_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Prey to tentacles yet again...@
>You have quite a thing for tentacles, don't you?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>As expected, Scylla Maid's binding attack is fearsome.@
>If you don't break free, she will surely prey on you.\
>A normal human cannot ever escape from her binding, so you must have Gnome available at all times to free yourself.\
>But even with Gnome, it will take a lot of time and energy to escape, so you should always be ready for taking large amounts of damage.\
>Again, Sylph is not very useful.@
>Honestly, she may as well be dead to you for a while.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Some tentacle play is fine, but please, try to fight seriously for once...\
sub %stack,1
return



*emily_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Killed by a young girl's tentacles this time?@
>If you love tentacles that much, would you like me to reincarnate you as an octopus?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Emily is very tough, and has some powerful binding moves.@
>Due to that, Gnome is required again.\
>Even if you like Sylph, she really isn't that useful here.@
>But if you're struggling against her, you could attempt to depend on the low evasion chance and upgraded sword skill.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>You must defeat the mother and daughter to stop any more people from becoming victims.\
sub %stack,1
return



*cassandra_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>..............@> At the very least, it wasn't tentacles this time.@
>...But it doesn't seem like that stopped you from enjoying it.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Cassandra is too powerful for you at the moment.@
>But if you lower her HP enough, a chance should appear.\
>Gnome is essential in reducing the damage so you can last longer, in addition to breaking out of her binding attack.\
>You will not be able to out recover her attacks, so you may want to go all out in attacking with your SP.\
>Let Gnome be your only defensive use of SP, and the rest go toward powerful attacks.\
>Especially since if you're bound and lose, a horrifying fate awaits...\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Even if she is stronger than you, never lose hope.\
sub %stack,1
return



*yougan_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Wh...What?@> Stuck inside a Lava Girl's womb and giving her semen?@
>H...How is that even possible?@
>Well, I guess you're slightly special in that regard...\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Gnome is effective against her, so be sure to summon her.@
>In addition, the new skill is quite powerful, so make use of that.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Remember that magma is dangerous to play with.\
sub %stack,1
return



*basilisk_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st03.bmp",0,0:print 10,500
name "Ilias"
>Turning the penis into stone...@>Indeed, you could rape a male endlessly like that.@
>Is that why you look so happy?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Her most dangerous attack is her petrifying one.@
>If you take that three times, you will instantly lose.\
>Sylph will let you dodge the attack with a high probability, so you should call her.@
>The Basilisk doesn't use a binding attack, so Gnome isn't required.\
>Using the powered up sword skills, you should be able to quickly take down her HP.@
>As long as you keep the protection from her petrification in mind, it should be an easy fight.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>If you come back here after being turned to stone again, I'll set you up in my garden.\
sub %stack,1
return



*dragon_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>A victim of a Dragon?@
>Well isn't that nice...@>You treated her to a five star meal, apparently.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Dragon Girl is a powerful enemy, with high HP, high defense, and high offensive power.@
>Her restriction attack is powerful as well.\
>The only saving grace is that she has no status inducing skills...\
>Her binding attack is fatal, so you should summon Gnome.@
>Sylph won't give great evasion chances, so you can ignore her for this battle if you wish.\
>Just keep bringing her HP down as you focus on recovery.@
>The flow of the battle should change once you reduce her by about two thirds of her health...\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Since it's you, I have faith you can defeat a legendary Dragon...\
sub %stack,1
return



*salamander_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>It seems like disappointing me is a hobby of yours.@
>If you're instead simply testing my patience... It's quickly wearing thin.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Salamander is a powerful monster, proud of her binding attacks.@
>First of all, Gnome is required to protect yourself from her powerful holds.\
>She has a lot of HP, but a path will open before it's all depleted.@
>So focus on attacking over recovery, and try to bring her HP down quickly.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Quench that flame spirit's flames.\
sub %stack,1
return



*granberia3_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>How pathetic, dying like that.\
>...What do you mean you didn't die?@
>After pulling off an act like that, you're dead to me.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Use Undine's power right at the start if you wish to challenge Granberia.@
>If you don't do that, I'm sorry to say, but it won't be much of a fight.\
>From now on, you cannot waste SP on careless actions.@
>If you're out of SP at a critical point, your life will be forfeit...\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Now is the time to show her your justice.\
sub %stack,1
return



*kani2_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Having your sexual organs washed by someone else... Are you an infant?@
>Are you happy now that your penis is nice and clean?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>She uses a paralyzing move on the first turn that paralyzes you for a long time.\
>You will take fatal damage if that hits you, so you must use Sylph to dodge it.\
>In addition, she has a powerful restriction technique that can finish you off.@
>To protect yourself, be sure to summon Gnome as well.\
>Her defense is fairly high, but her HP isn't.@
>You could just rush her down with techniques.\
>In addition, her torture will go on for quite a while with a certain washing move, so be careful not to be defeated by it...\
>...But why do I get the feeling like you'll be defeated by it anyway?\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Seal that monster, and steam her alive in a pot.\
sub %stack,1
return



*dagon_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>My, how nice it must be to do nothing but live a life of heresy.@
>Surely giving in to pleasure isn't worth becoming a slave, right?@
>Right?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Her restriction attack is very powerful, so don't neglect summoning Gnome.@
>If you're bound without her, your defeat is certain.\
>Sylph's evasion rate isn't very high, so you're better off ignoring her.@
>Also, the enemy's evasion rate is high, so you may want to use sword skills.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>...Certainly there is nobody dumb enough to be tricked by a Dagon, right?\
sub %stack,1
return



*poseidones_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
itoa $sel1,%count_end
name "Ilias"
mov $sel2," times people have watched you... Sheesh."
eng $sel1+$sel2:$sel6@
>Ah, no, don't be worried about what I mean by that.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Poseidoness is a very powerful enemy that uses both status attacks and binding moves.@
>Taking either of them will leave you hurting.\
>Having both Sylph and Gnome active will go a long way in reducing damage.\
>Sylph will let you avoid paralysis, and Gnome will let you break free of her binds.@
>There's an instant kill move with her bind, so Gnome is particularly good...\
>It's a long fight, so you may want to shy away from sword skills.@
>Focus on recovery, and take her down.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Give your judgement to that stupid monster posing as some sort of Queen.\
sub %stack,1
return



*seiren_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>It looks like you really enjoyed that Siren's song.@
>How odd...@> Since you keep ignoring my scolding, I thought you went deaf.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Siren's scariest ability is her song.@
>If her opponent hears that, they'll be doomed.\
>You can protect yourself from her song with Sylph.@
>Gnome isn't really needed for this fight.\
>As long as you protect yourself from her song, there isn't much to be afraid of.@
>Just fight normally and you'll win.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>For the security of all those who travel on the sea, destroy that monster.\
sub %stack,1
return



*hitode_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Even though you knew you were going to be eaten, you still managed to ejaculate...@
>You really are a pathetic premature ejaculator, aren't you?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Starfish Girl's binding attack is strong.@
>You need Gnome to break free, so make sure you call her.\
>Sylph won't let you evade many attacks, so you can ignore her.@
>If you just use Gnome and the powered up sword move, this will be an easy fight.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>This time, let her feast on your blade.\
sub %stack,1
return



*beelzebub_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st14.bmp",0,0:print 10,500
>...............@
>...........................................\
lsp 700,":a;chara\iriasu_st06.bmp",0,0:print 10,500
>.....................................................@
>............\
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
>*Sigh*\
name "Ilias"
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Their attacks are powerful and dangerous.@
>You will want both Sylph's evasion and Gnome's reduction to reduce as much damage as possible.\
>In addition, Gnome is essential due to their powerful binds.@
>Sylph isn't required, but dodging attacks every so often will help a lot.\
>The path forward will open if you can just manage to defeat one of them...\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>You must not allow those disgusting fly monsters to reach the outside world.\
sub %stack,1
return



*trickfairy_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>A little Fairy's toy... Pathetic as ever, I see.@
>I'm ashamed at myself for having become used to your pathetic behavior.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Trick Fairy doesn't have any special skills or binding moves.@
>Due to that, you should use your SP on offensive skills.\
>She's able to pierce through the defenses of some spirits, so Sylph and Gnome aren't that useful.\
>Perhaps using Undine will be effective.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Please stop disappointing me.\
sub %stack,1
return



*queenfairy_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>The Queen Fairy made you nourish the forest?@
>I've been thinking it for a while now, but...@>To think you really were the same as manure...\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Queen Fairy has some difficult skills.@
>It will be hard to fight her head on.\
>Many of her moves are plant based, so Sylph will go a long way in helping you avoid them.\
>Gnome will be helpful for her binds and the extra defense.@
>Summon both of them to have a more manageable time.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Exterminate all the wicked monsters hiding away on this island.\
sub %stack,1
return



*queenelf_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
name "Ilias"
>Oh, how kind of her.@
>Perhaps now that you can't make any more semen, you'll finally be able to fight seriously.\
>The Queen Elf uses a variety of rape attacks.@
>She's a twisted, lustful monster that only thinks about raping men.\
>If you try to fight without Gnome and Sylph, you will surely be raped.\
>Be very careful about not losing Gnome and Sylph.@
>You may want to just be careful and be on the defensive most of the fight.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Show those monsters that they aren't even welcome on this island.\
sub %stack,1
return



*saraevil_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Did you enjoy Sara's vagina now that she's a Succubus?@
>...Sheesh, what reason did you set out on an adventure for, anyway?@
>Is your quest to make sure you're raped by every girl you come across?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Sara has two types of restriction moves that will both defeat you right away if you don't break free with Gnome.\
>She uses a trance ability, but Sylph's evasion isn't guaranteed.@
>Sara has high offensive power, so any defensive help would be useful, though.\
>Since Sara deals a lot of damage and you have both spirits active, a long fight may be unavoidable as you spend most of your SP on recovery.\
>Lastly, Sara may decide to alter your fate a little bit if she defeats you with two certain moves.@
>Don't disgrace me by finding out which two, though.\
>...Heed my warning for once.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Show no mercy to a monster, even if they used to be human.\
sub %stack,1
return



*wyvern_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Raped while flying in the air...@> That's certainly a new one.@
>Were you able to enjoy entering that exclusive club?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Your enemy is an offshoot of the dragon race.@
>As such, your attacks won't do much damage to her.\
>But you should be able to use a new power in this fight...@
>You should save your SP until a path opens up.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Land on that continent, and exterminate all the monsters that live there.\
sub %stack,1
return



*kyoryuu_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>This is the first time I've had a Hero retire to become a piece of candy.@
>Your bizarre interests never cease to amaze me.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>You cannot struggle out of her restriction move.@
>The only way to escape is to attack her from the inside.\
>Sylph can help you avoid her paralyzing move, so she is helpful.@
>In addition, the Kyoryuu's damage output is huge, so Gnome will be useful.\
>Fighting carefully with Sylph and Gnome can be good, but trying to go all out with powerful moves may bring victory, too.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>The monsters of Hellgondo may be strong, but you must not lose heart.\
sub %stack,1
return



*c_beast_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>...............\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Chimera Beast uses a skill that will bring your instant loss.@
>Sylph will let you avoid it, so you must make sure to call her.\
>Her offensive ability is high, so Gnome may be useful...@
>But she has no binding moves, so you could always go for an all out attack.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Never forget your original mission.\
sub %stack,1
return



*c_dryad_vore_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>...Just what did you want to do in Remina, anyway?@
>Your destination is the Monster Lord's castle.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Chimera Dryad Vore is a plant based monster, so Sylph is quite effective.\
>Gnome isn't required, but she can be useful in escaping from binds quicker.@
>In addition, her offensive output is fairly high, so the increase in defense will be helpful.\
>Her different binding moves require different ways to escape.@
>You'll want to struggle as normal to escape from her ivy.\
>But the venus flytrap won't let you go no matter how hard you struggle, so you'll want to attack it instead.\
>In addition, you'll want to guard and prepare yourself if she looks to use her pitcher plant.@
>If you don't guard that attack, your fate will be sealed.\
>In addition, there are three different fates you can be doomed to with this monster...@
>They all lead to you being eaten though, so you should avoid them.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>You have no business here, leave quickly.\
sub %stack,1
return



*vampire_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>As soon as you saw that Vampire, you got excited at the thought of her sucking your blood.@
>That's why you're on this journey after all, isn't it?\
>If that wasn't right, then you wouldn't have appeared before me like this.@
>Ahh... Why have you forgotten your mission...?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Vampire is a powerful enemy, with lots of special skills.\
>Her most dangerous skill is her eyes of obedience...@
>Without Sylph, you'll easily be taken down.\
>In addition, Gnome will help you escape from her binding move.@
>You'll want to summon both Sylph and Gnome to fight safely.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Exterminate that wicked monster known as a Vampire.\
sub %stack,1
return



*behemoth_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Oh my, was that really rape?@
>It seemed as though you really enjoy that sort of wild, animalistic sex.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Her damage output is huge, so Gnome is useful.@
>In addition, you won't escape from her bind without Gnome.\
>She uses a horrible technique if you're bound...@
>But Sylph will let you dodge it, so you'll want to summon her to be careful.\
>With Gnome, you might break out of the bind before she uses it...@
>But if you're unlucky...\
>Just use those spirits like rags, then throw them away when they're not needed any longer.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Don't lose heart just because strong monsters are appearing one after another.\
sub %stack,1
return



*esuccubus_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>You march into the Monster Lord's Castle.@>You see a Succubus.@>You instantly lose.@
>Why am I not surprised by this any longer?@
>Just why did you even bother to come here?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>A powerful Succubus, she can use various techniques that will instantly defeat you.\
>Summon Sylph to evade these quick losses.@
>In addition, if you don't break free right away from her bind, you will be defeated by an embarrassing move.\
>If you don't have Sylph and Gnome both up, you're risking an instant death at any point.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Only powerful enemies await in the Monster Lord's Castle, so never let your guard down.\
sub %stack,1
return



*hatibi_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Thank you for all your hard work!@
>Congratulations, you're now a perverted Kitsune's toy!\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Despite her dangerous eyes of seduction, her binding move can kill you in one turn without Gnome.\
>You can protect yourself from her eye with Sylph, but she isn't required.\
>In addition, when she starts to charge her magical power, a strong attack will follow...@
>If you hope to win the fight, you should guard the next turn.\
>In addition, there's a different ending if you're finished in a bound state...@
>Knowing you, I'm sure I'll see you back before me in a few moments after learning about that.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Turn that Kitsune into Inarizushi.\
sub %stack,1
return



*inp_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>To an Imp...?@>A weak Imp?@>You could have tapped her and she would have lost...@
>To let yourself be seduced so easily... Have you no shame?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>There is nothing to be careful about in this fight.@
>The only way to lose is if you are a failure as a Hero.\
>There are two ways to be defeated by her, though.@
>But I wouldn't recommend angering me any further.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>The wrath of heaven will be brought down upon you soon if you don't get a little serious.\
sub %stack,1
return



*gigantweapon_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Giganto Weapon...@
>That prototype was still able to move...?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Her attack power is extremely high, so you'll need Sylph and Gnome to mitigate as much damage as possible.\
>In addition, Sylph will help you avoid a status inducing attack.@
>There's no bind, but her attacks will be too painful to endure without Gnome.\
>If you see her charging up a move, make sure you guard.@
>Otherwise your death will be assured the next turn.\
>Her HP is enormous, so a long battle can't be avoided.@
>But since you were able to make it all the way here, you should be able to beat her.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Dispose of that biological weapon.\
sub %stack,1
return



*arumaeruma3_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Have you been left dry by the Queen Succubus?@
>You can't hide your satisfied face from me...@
>And I'm not even going to try hiding my disappointment.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Until she takes off her clothes, she isn't fighting seriously.@
>You shouldn't need any help until that point.\
>Once she gets serious, her attacks become fierce.@
>You must have Sylph summoned at all times to stand a chance.\
>In addition, you run the risk of an instant loss at anytime without Gnome summoned.\
>A powered up Sylph will let you attack twice per turn.@
>In addition, Gnome will increase your critical hit chance, granting a nice synergy.\
>Using that barrage of attacks, make sure you use your SP for recovery.@
>If you waste them trying to shorten the fight, you'll just be shortening your own life instead.\
>Lastly, the fickle Alma Elma may decide to do something else with you if you lose to a certain attack.\
>Go ahead and try to find it. I know you'll be doing it no matter what I say.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>As you are now, you should be able to defeat the Four Heavenly Knights.\
sub %stack,1
return



*tamamo2_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Defeated by the Kitsune leader, and content with a life as her lover...?@
>Your failures as a Hero continue to pile up right at the end of your quest.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>At the start, Tamamo isn't fighting seriously at all.@
>Just summon spirits as the situation calls for.\
>But once Tamamo takes off her clothes, her attacks become a lot more serious.\
>Her damage output is extreme, so Gnome is required.@
>In addition, you risk an instant loss if you can't break free of her bind.\
>She is able to rape you in an instant, but you can avoid it with Sylph.@
>In addition, many of her tail attacks have a high avoidance chance with Sylph.\
>Fighting with Gnome and Sylph together is the best method.@
>In addition, the double criticals will go a long way.\
>Lastly, she uses a unique skill to bring you to your end if you lose before she becomes serious.@
>Go ahead and shame me by viewing it, since I know you will anyway.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Destroy the leader of the Kitsunes, and throw their entire race into confusion.\
sub %stack,1
return



*erbetie2_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
name "Ilias"
>Now I know you've enjoyed Slimes ever since being a child...@
>How did it feel turning back into a child, to a time before you started to disappoint me?\
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
>...Oh, silly me.@> Your first thought was about how you could disappoint me.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Both her offensive power and ability to bind are quite strong, so Gnome is a must.\
>Erubetie is a slime, so Sylph isn't very effective...@
>But she will let you dodge one incredibly powerful move when you're in a bind state.\
>Gnome is essential, and Sylph should be summoned as much as possible.\
>In addition, her Melt Storm ability will deal up to 800 damage even with Gnome summoned.\
>If your HP is less than 800, you risk an instant loss.\
>Next, "Heaven's Prison" can't be broken from normally.@
>You'll have to attack to escape.\
>She's a difficult enemy, with many things to watch out for...@
>But you should be able to beat her as you are now.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Destroy the Queen of the Slimes, and defile their homeland, too.\
sub %stack,1
return



*granberia4_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>You came so far, only to end up as Granberia's plaything...@
>I see you couldn't help but disappoint me one final time.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>First, show her the power of the four spirits.@
>Then you should be able to fix what you are lacking...\
>After that, the real battle will start.@
>As you already know, her offensive power is tremendous.\
>Make full use of the spirits, and you should be able to reach victory after a difficult fight.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>I believe that your sword can overcome Granberia's.\
sub %stack,1
return



*alice2_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Did you think it would be funny for a Hero to lose to the Monster Lord?@
>Though I cannot say I particularly dislike this ending, since she sealed herself away for eternity...\
>I'll give you one more chance.@
>Don't fail my expectations.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Naturally, the Monster Lord is the most powerful monster you've faced.@
>If you don't use all four spirits, you cannot win.\
>Gnome is required to break free of her bind, and Sylph is required to evade her temptation attack.\
>If you aren't both guarding and in a serene state of mind when she unleashes a charged attack, evasion will be impossible.\
>Without Earth, Water and Wind, your defeat is all but guaranteed.@
>Make sure you always have enough SP to keep those summons up.\
>In addition, her magical power is extremely strong.@
>Wind and Water will raise your evasion rate, but it isn't guaranteed...\
>As a precaution, don't let your HP drop below 900.@
>You should try to be fighting at full HP as much as possible.\
>When you reach the end, she may begin to prattle or something.@
>Make sure you give her a decisive blow at that point.\
>...Do you understand, Luka?@
>A True Hero would use their strongest attack to give their finishing blow to the Monster Lord.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>At the time of your victory, I shall offer half the world to you.\
sub %stack,1
return



*first_hansei

add %stack,1
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
name "Ilias"
>So you have come, Luka... Now then, on to the evaluation...@
lsp 700,":a;chara\iriasu_st06.bmp",0,0:print 10,500
>...Oh my, what's with that angry glare?\
lsp 700,":a;chara\iriasu_st05.bmp",0,0:print 10,500
>I may appear the same, but I am different from the Ilias you have seen until now.@
>You could call me Ilias' conscience, if you so wish...\
lsp 700,":a;chara\iriasu_st03.bmp",0,0:print 10,500
>In the dirty, polluted river of filth that is her heart...@
>A tiny glimmer of conscience that still exists, still free of the filth.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>...That is me.@
>I will guide you from now on. Surely you don't object?\
>Now then, let us begin with the evaluation meeting...\
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
>...To begin with you...@
>You are really pathetic.\
name ""
mov %hansei_first,1
sub %stack,1
return



*cupid_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
name "Ilias"
>You gave the orgasm treatment to an angel drowning in lust...@
>How would you like to be reincarnated with a vibration feature this time?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>You, the master of the Four Spirits, should have no issues with Cupid.@
>But make sure you keep up appropriate defenses, as she has some nasty tricks.\
>If she mounts you, you cannot escape her unless you have Gnome summoned.@
>As the danger of guaranteed loss is always there, make sure Gnome is always available.\
>In addition, the abnormal status she inflicts is avoidable with either Sylph or Undine.@
>Either works, so just make sure one is up.\
>After that, she should be easy with just your normal techniques.@
>As always, watch your HP to ensure it stays above half.\
>Lastly, if you should lose to her Temptation skill, she may perform a special insult to you.@
>The reason for me telling you... Surely you realize it.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Dye that pink-brained lustful angel's face into one of blood red.\
sub %stack,1
return



*valkyrie_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>20,000 years of punishment?@
>I'm sure that is more of a great reward, to you.\
>Rather, I think the only one being punished here is Valkyrie...@
>Spending twenty thousand years thinking she's punishing someone, when in fact he's enjoying it.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Undine is very effective against Valkyrie.@
>In particular, it has a high chance of evading her Breast Comfort move.\
>In addition, Gnome is needed for escaping from her restraints.@
>If you don't break free of her binds when she's nude, you could lose in one turn.\
>If you fight safely, you shouldn't run into an issue.@
>Just don't neglect to recover as needed.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>You should rape Valkyrie and punish her for the next 20,000 years now.\
>...Forgive me. That's a rather long time to gloat just for getting revenge.\
sub %stack,1
return



*ariel_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Even when your opponent is an Archangel, the result is the same.@
>Food to be consumed again... It seems you simply will never escape from that designation.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Sylph will help with evading Ariel's attacks, especially the electric shock.\
>On the other hand, Undine is not effective at all.@
>She is not a transient being, so sensing her with Undine will not be easy.\
>In addition, her attack power is very high. Gnome should be used to reduce the damage.\
>Use up those spirits before you toss them away like garbage.@
>Kill two birds with one stone, and overwork Gnome and Sylph while you defeat Ariel.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>You yourself should bring the wrath of Heaven to that arrogant Archangel.\
sub %stack,1
return



*c_s2_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Prey of an experimental animal this time...@
>I know you love both tentacles and mucus, so you must be very happy with yourself.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Without the spirits, you'll run into a little trouble.@
>Make sure you keep an eye on your health so you can recover.\
>It's basic, but make sure to escape from her bind right away.@
>If you wait, her Bubble Heaven will make short work of you.\
>She's an irritating opponent, but shouldn't pose any trouble for you.@
>Those spirits were annoying anyway.\
>If you lose to Bubble Heaven, she'll continue playing with you even after you lose.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Hurry up and dispose of that failure of an organism.\
sub %stack,1
return



*c_a3_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Squeezed to death by that failure of an angel...@
>You yourself are like an experimental organism, aren't you?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Your tactics are still limited at this moment.@
>Just fight carefully, keeping an eye on your health.\
>But watch out if she prepares a move...@
>If you don't guard it, you will surely lose.\
>In addition, if you lose to a certain move, she'll continue violating you even after your loss...\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>An ugly angel like that is not needed.@> Dispose of her.\
sub %stack,1
return



*stein1_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Research like that is complete heresy.@
>There's some use for it, but...\
>...Excuse me, you don't need to hear about that.@
>I, the pure Ilias, shall guide you.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>During this fight, you should regain your serene state of mind.@
>Once you do, make sure to never lose it.\
>With that, you'll be able to avoid most attacks...@
>But if they hit, they are painful, so always keep an eye on your health.\
>In addition, after she summons the wind spirit, she will use a powerful attack.@
>Make sure to guard if you wish to survive it.\
>Since your opponent has a large amount of health, expect a long fight.@
>Keep an eye on your SP, and make sure you always have enough to recover and keep your serene state.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Don't hesitate to beat that great sinner to a pulp.\
sub %stack,1
return



*ranael_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Failures.@>Failures everywhere, all over the place.@
>And the damn Hero is the biggest failure of all.@> How many times will he come here before he's satisfied?\
>...Oh no, just ignore that.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>In this fight, a new power will awaken in you.@
>You may particularly like the counter skill.\
>But your serene state may not work too well, since Ranael is an angel.@
>Instead, you should use your new Fallen Angel Dance.\
>It's avoidance is particularly effective against angels.@
>If you face more in the future, you should keep this in mind.\
>In addition, if you are bound you must struggle right away.@
>Any delay will lead to your doom.\
>You must also be sure to guard if you sense her powering up her special skill.@
>Again, if you don't, you will surely lose.\
>There's an additional insulting scene if you lose by that move, but...@
>Actually, at this point, I don't even care if you see it.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Use that hideous being as a guinea pig for your new skills.\
sub %stack,1
return



*c_tangh_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Retiring so you can play with some tongues and saliva?@
>Didn't your parents ever tell you not to mouth off?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Your serene state of mind is very effective against her.\
>The Fallen Angel Dance is more effective against angels...@
>Keep this distinction in mind for the future battles.\
>Chimera Tongue's binding attacks are very strong.@
>You have a high chance of evading it with your serene state, so make sure to keep it up at all times.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh melts-in-your-mouth Luka.@
>Rip off every one of those tongues of hers.\
sub %stack,1
return



*angels_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Gang-raped by angels...@
>For a breast-lover like you, that must have been quite an unexpected reward.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The angels cooperative attacks can be very powerful.@
>Large damage is likely, but you should be able to survive with fallen angel dance.\
>But their HP isn't too high either...@
>You may be able to simply power through them before they defeat you.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Breasts are meant to be milked, not be the milkers...\
sub %stack,1
return



*nagael_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Did you enjoy your torment by snakes?@
>I know how much you love things coiling around you, after all...\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Since your opponent is an angel, use fallen angel dance.@
>You'll be able to avoid her binding attacks with a high probability.\
>Her HP is high, however, so plan for a drawn out fight.@
>Keep an eye on your SP to make sure you can always recover.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Turn that evil angel back into raw holy energy.\
sub %stack,1
return



*c_tentacle_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Prey to tentacles yet again...@
>Do you have some innate desire to be wound up whenever you see tentacles?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Since your opponent is a monster, you should use serene mind.@
>If you fight carefully, you shouldn't have any issues.\
>Her restraint is powerful, and there's no Gnome to break free quickly.@
>You'll just have to keep struggling to get free...\
>In addition, you're now able to employ the Monster Lord as your ally in battle.@
>Once per fight, she can use a recovery move or one of three attack moves.\
>Use them on a case-by-case basis, depending on the enemy.@
>For the Chimera Tentacle, any of her skills are effective.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Cut off every tentacle from that hideous monster.\
sub %stack,1
return



*mariel_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Defeated by a loli angel like that...@
>...Wait, you didn't lose BECAUSE she was a loli angel, did you!?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Mariel's high HP means this will be a drawn out fight.@
>Make sure to never lose your fallen angel dance.\
>Since she's an angel, the Monster Lord's attacks won't work.@
>Just stick to her recovery move.\
>In addition, if you're defeated while bound, a different defeat scene will occur.@
>Since you love lolis so much, I'm sure you'll find it.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh lolicon lover Luka.@
>You should also get rid of those lolicon soldiers, too.\
sub %stack,1
return



*c_medulahan_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>A Medusa and a Dullahan combined?@>How horrifying.@
>But I know how you love those things that slither...\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Her double attacks are quite strong.@
>Since she is a monster, you should use the serene state to avoid damage.\
>In addition, if she petrifies you, you will lose for sure.@
>You can avoid that for sure with a serene state, so make sure to always have it up.\
>In addition, since she is part snake she is weak to cold.@>Use the Monster Lord's ice attack.@
>And in the future, you should remember that snakes are weak to cold attacks.\
>In addition, something extra may happen if you lose in a certain way...@
>Though I don't know what.@>And I don't recommend you find out.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Try not to let ugly monster's blood like that rust your sword.\
sub %stack,1
return



*trinity_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Did the cross of pleasure feel good?@
>I'm sure the gospel of your stupidity will be spread to the world.@> That's what usually happens with those who ascend on the cross, right?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Their combination plays are powerful, so fallen angel dance is necessary.@
>Their restraint technique is very powerful, but there's no way around it but to struggle.\
>In addition, since your opponent is an angel, the Monster Lord's attacks won't do any good.@
>Just use her ability for restoration.\
>Lastly, there is an additional insult performed if you lose to their restraint combination...@
>If you purposefully lose and pledge yourself to me that way, it would make me happy.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>To be perfectly honest, I don't mind if the harpy's village is destroyed.\
sub %stack,1
return



*c_bug_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Was it fun making children with an insect like that?@
>I hear having a large family makes a man happy...\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Since she's a monster, the serene state is most effective.@
>In addition, make sure to struggle right away if bound.\
>Since she's an insect-type monster, flame is very effective.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Eradicate every insect you see on the surface.\
sub %stack,1
return



*sisterlamia_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Did it feel good to die in a Lamia's embrace?@
>It looked so good, my mouth was agape the whole time.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Since she is a monster, a serene state is effective.@
>But her attack patterns are very troublesome, unlike most monsters...\
>First, you must never attack when her breasts are exposed.@
>If you do, you'll be guaranteed a loss.\
>In addition, she has a chance of using a troublesome magical eye move.@
>If you want to avoid that, you'll need to switch to fallen angel dance right away.\
>Another problem arises if she summons an earth spirit.@
>If she gets you in a bind after summoning her, then you won't be able to break free.\
>The opposite to earth is wind...@
>But you don't have Sylph at the moment.\
>So you'll have to use the next best thing, fallen angel dance.@
>It has a wind property to it, so it will let you dodge her binding move.\
>I'll tell you more about opposite attributes later...@
>The battles will only get more and more difficult from here on out.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>In the end, monsters will always simply be monsters.@> The only thing they deserve is the wrath of the Heavens.\
sub %stack,1
return



*muzukiel_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Ahh, what an ugly angel.@
>I really thought she was a monster the first time I laid eyes on her.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Muzukiel's attack power is high, so be sure to use fallen angel dance.@
>Her binding skill is also very damaging, but there's nothing you can do but struggle out of it.\
>Also, if she prepares something, make sure you guard.@
>If you're in fallen angel dance and guarding, you'll be able to dodge it every time.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>I think that angel is ugly.@>So destroy her without mercy.\
sub %stack,1
return



*mermaid_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Did you become the Mermaid's toy?@
>I guess you're already mostly everyone's toy at this point, though.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Since the Mermaid is a monster, use serene mind.@
>The problems come in when she summons that water spirit...\
>For a number of turns, her attacks become twice as powerful.@
>There's nothing you can do at this point but to Guard through it.\
>In addition, after she summons the spirit she can try to sing a song.@
>Fallen angel dance will let you completely evade it.\
>She can only summon the spirit for a short while, so you could also try to power through it.@
>It's a risky tactic, but it could work out.\
>Since she is a water-based monster, the Monster Lord's fire magic is very effective.@
>If you get a chance, turn her into grilled seafood.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Mermaids are fish after all.@> I recommend grilling or frying her.\
sub %stack,1
return



*g_mermaid_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Made helpless by a Mermaid?@
>Who am I kidding, even when you're not helpless you still love being used like a pet.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Basically, the Mermaid General is just an enhanced version of the previous enemy.@
>A serene state is pretty much required to have any chance of avoiding her thunder attack, too.\
>If you're bound, make sure to struggle for sure.@
>If you don't, you will be raped and lose the following turn.\
>Just as before, this Mermaid can summon a spirit of water.@
>She can't maintain it for long, so perhaps powering through it may work?\
>But if all else fails, Guard through it.@
>And don't forget to grill her in the Monster Lord's fire.\
>In addition, there's an additional scene if you lose to her rape attack.@
>The wrath of the Heavens will come down on those who immediately go to view it.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh helpless Luka.@
>By the way, you should also kill the other Mermaids in Natalia Port while you're at it.\
sub %stack,1
return



*ningyohime_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Prey to the Mermaid Princess now...@
>You were fertilizer before, now you're fish food.@>An all-purpose Hero, aren't you?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>El is not too powerful of a monster...@
>But the effect of your serene state isn't as powerful against her, either.\
>Though that doesn't mean not to use it at all.@
>The trigger rate is low, but it's better than nothing.\
>Also, make sure to struggle if bound.@
>If not you will be raped.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh multi-use Luka.@
>Please, every once in a while show me an ending that doesn't result in you being preyed on...\
sub %stack,1
return



*queenmermaid_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Hero Luka...@> You decided to take a new role as a young girl's learning toy?@
>How wonderful...@> I didn't realize you cared so deeply about the education of this generation's youths.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Queen Mermaid's attack power is very high.@
>Without your serene state, you won't be able to hold out.\
>In addition, she gets even more powerful when she summons her water spirit.@
>Abandon your gung-ho style, and focus on defense in those cases.\
>She is weak to fire, so baking her may be good...@
>But saving the Monster Lord for an emergency heal may be wise, too.\
>In addition, there's a separate scene for losing as she rapes you.@
>I hope that raises your tension for battle a little higher.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh learning toy Luka.@
>Kill the Mermaid Queen, and send the rest of the Mermaids into despair.\
sub %stack,1
return



*shadow_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>So you were incorporated into that strange shadow's body...@
>Congratulations on your debut in the world of spirits.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Due to her nature, the serene state isn't too effective against the Shadow Girl...@
>Since her attack power is also rather high, she's a fairly difficult opponent.\
>But due to her low HP, an all-out attack is your best bet for beating her.\
>Her defense against magic is high, too, so the Monster Lord's attacks won't do much.\
>Flame is the most effective of the three, but using her for emergency recovery may be the best use.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Turn that shadow monster back into a normal shadow.\
sub %stack,1
return



*gaistvine_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>This time it's your art debut.@
>Shall I display you in a museum, so everyone can point and laugh at your stupidity?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Since your opponent is a monster, use your serene state.@
>But hold back when she goes into her picture.\
>You'll lose instantly if you attack when she does this.@
>When she's in her picture, she will also still use eye magic...\
>But this status effect is completely avoidable with fallen angel dance.@
>When she goes into her picture, make sure to change to that.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>A painting like that needs to be completely destroyed.\
sub %stack,1
return



*chrom2_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>A victim to the Necromancer again...@
>You really love zombies and ghosts, don't you?\
>I'm pretty sure that they are your best friends at this point.@
>And friendship is a beautiful thing...\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Since they are monsters, your serene state is most effective.@
>You can also avoid their instant kill attack with it.\
>Her troublesome skill is her injection...@
>Not only is it damaging, but the name is pretty embarrassing.\
>Fallen angel dance will let you avoid it completely...@
>But since the instant kill attack is more troublesome, you should keep serene state up.\
>So just accept that you'll have to take that attack.@
>In preparation, keep your HP up and your SP ready to heal after.\
>Lastly, if you lose while being raped by the ghosts, there's an additional insulting scene.\
>I'll just make another Luka, so go ahead and do whatever. I don't care.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>If you lose again this time, I'll give you an injection.\
sub %stack,1
return



*berryel_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>So you were preyed upon by a greedy angel I see.@
>Just who turns into prey for a fruit to eat?@> I mean honestly.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Since your opponent is an angel, fallen angel dance is a given.@
>The troubles come in with her multiple binding moves.\
>Her milking move is a normal bind, and should be dealt with as usual.\
>But when she is about to swallow you whole, you must attack her to break free.\
>Be sure to pay close attention to the moment you are bound to see the distinction between them.\
>Lastly, she's an angel, so the Monster Lord's attacks won't work.@
>Use her like a cheap generic medicine herb.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Pluck that sweet fruit's life without mercy.\
sub %stack,1
return



*revel_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>You who should have been reborn, instead came here without being reborn?@
>I am surprised myself.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Revel only has powerful binding techniques, so you must escape as quick as you can.\
>Her most powerful move that requires preparation can only be avoided with fallen angel dance and guarding.@
>Also, your counter skill is not very good for this battle.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>...By the way, what do you want to be in the next world?\
sub %stack,1
return



*carmilla_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Sheesh, I let my eyes off of you for a moment, and you dry up like a fish.@
>You're just like a worm on the side of the road.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Since Carmilla is a monster, serene state is useful.@
>Once bound, struggle right away.\
>You can completely evade her ecstasy attack with fallen angel dance...@
>But due to the large effects of your serene state on other attacks, that is preferable.\
>The problem comes in when she summons a wind spirit...@
>When she summons it, she will attack multiple times for large damage.\
>This is the start of a new basic trend for your future battles.@
>If an enemy summons a spirit of a type, you generally want to summon the opposite spirit attribute.\
>In this case, Gnome is the opposite attribute, and will significantly reduce the damage you take.\
>But once her spirit fades, don't forget to go back to your serene state, as that will have a larger damage reduction effect.\
>In general, vampires are weak to fire.@> So don't forget to roast her in fire.\
>Lastly, if you're defeated while being raped, some additional insult may occur...@>Of course that isn't important.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh dried fish Luka.@
>Deliver divine justice to that hideous Vampire with your sword.\
sub %stack,1
return



*elisabeth_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Dried up like a fish?@>Again!?@
>Do you wish to just skip to the end and be reincarnated as a beached fish from now on?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Though she's a monster and you may want to use a serene state...@
>Her binding move is very strong, and is hard to break free in a normal state.\
>With Gnome, you can break free more easily from it.@
>Fallen angel dance will let you dodge her ecstasy move, but Gnome should take precedence.\
>But watch out when she herself summons the spirit of earth.@
>In that case, not even Gnome will let you break free of her bind.\
>You will want to use the opposite wind-based fallen angel dance to completely avoid it.\
>In addition, if you are beaten by her special skill, you will be subjected to further insults...@
>It would be rather unbecoming to be played with by such a small girl, though.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh dried fish Luka.@
>Remove the vampires from Sabasa, and bring harmony to the land.\
sub %stack,1
return



*queenvanpire_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>With your opponent as the Queen Vampire...@> Of course you would end up as a dried fish again.@
>I see a beached whale near Port Natalia that wants to be your friend.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Queen Vampire is a powerful enemy with a large variance in attack patterns.@
>For normal states, a serene state is best to avoid her attacks.\
>When she opens her cloak, make sure never to attack.@
>If you do, you will instantly lose.\
>In addition, she can also summon the spirits of wind and earth.@
>When she does, counter with the opposite attributes of each.\
>Make sure you avoid her powerful binding technique with the power of wind when she summons the earth spirit.\
>Furthermore, there are additional insults to be suffered from two attacks of hers...@
>Why not see them?@>I mean, you're going to end up a dried fish no matter what, I've noticed.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh dried fish.@
>Defeat the Queen Vampire, and annihilate that disgusting race.\
sub %stack,1
return



*c_homunculus_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Today's youth has been avoiding the sciences too much...@> But that seems to be no issue for you.@
>I'm glad you were able to get along so well with the product of a biology experiment.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The opponent is a monster, but a serene state won't do much to avoid the damage.\
>Since her offensive ability is high, Gnome will do well in reducing damage.@
>Gnome will also let you break free of binds quickly, so she is the most useful.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>It's fine to be interested in the sciences, but please fight properly some of the time.\
sub %stack,1
return



*ironmaiden_k_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>So you are a torture device lover.@> But don't normal people hate those kinds of things?\
>...Of course I know you are far from normal.@> But please, try to act like a sensible person at least some of the time?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The serene state doesn't have much of an effect on this monster.@
>Since her attack power and binds are strong, Gnome should be used.\
>In addition, if she uses her sadistic move when you are bound, you will surely lose.@
>Make sure you always have Gnome up so you can escape as quick as possible.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Do not let any more people be executed by a torture device.\
>...Perhaps that saddens you, but normal people will be happy about that.\
sub %stack,1
return



*lusia_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Yes, good job.@> How does it feel coming here after that happened, acting like nothing is wrong?@
>You may be embarrassed, but I'm too ashamed for you to say anything else on the matter.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Since she's a monster, a serene state is most effective in her normal state.@
>The trouble comes in with the other attributes.@>Don't forget to adjust as she summons spirits.\
>In addition, the Monster Lord's attacks aren't too powerful here.@
>You may want to save her for recovery.\
>Lastly, if you are beaten by her predation move, there is a different result...@
>If you're going to lose, I really don't care whether you're burned, roasted or whatever.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Destroy that disgusting girl and save the village.\
sub %stack,1
return



*silkiel_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>An angel wrapped you up in a cocoon?@> You sure do manage to find a variety of ways to die, don't you?@
>Do you realize just how hard it was to reclaim all the bits of your soul that cocoon dissipated?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Your opponent is an angel, so fallen angel dance is effective.@
>An instant loss technique is also avoidable with it, so be sure it's up.\
>You can more easily break from her binds with Gnome, but her instant kill technique is more dangerous.\
>In addition, watch for a counterattack pose being taken. If you attack her during it, you can expect to lose.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Knock that angel down into hell.\
sub %stack,1
return



*endiel_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Prey to a horrible, indecent angel...@
>Shall I send you and Endiel both to hell instead...?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Your opponent is an angel, so fallen angel dance is effective...@
>But without Gnome, you risk losing to her binding move.\
>Gnome would be the safer way to go, so you should summon her first thing.\
>When she takes up a counter stance she can use an incredibly powerful move that can only be dodged with fallen angel dance.@
>Make sure to use it, and not to attack her until she is back to normal.\
>In addition, if you lose to her requiem move, you will be further insulted.@
>...Do whatever you want, I don't care anymore.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Drop that fallen angel into hell.\
sub %stack,1
return



*lamianloid_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>You seem to be enthralled by her forty-eight squeezing units.@
>Since you went to such effort to feel them all, by all means don't be in any hurry to finish up.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Her attack damage is high, so be sure to avoid it with a serene state.@
>As long as you keep that up, there's no other skill to be particularly careful of.\
>In addition, she is an ugly snake monster, so ice is effective.\
>There is also an additional ending scene if you are defeated by a certain attack...@
>I don't particularly care how you meet your end...\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Fight against her forty-eight units with your forty-eight genital...\
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
>...I feel sick just from imagining something like that.@
>Go on, get out of here.\
sub %stack,1
return



*knightloid_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Defeated by a man made monster, right in public view?\
>How did you like being a public spectacle?@
>Perhaps you need a ring name...@>How does Luka Magnum sound?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The first half of the battle is primarily physical in nature.@
>If you challenge her head on, you'll lose in no time.\
>But if you use your serene state, you should be able to avoid most attacks.@
>Save your SP for later as you slowly chip away at her health for the first half.\
>In addition, you won't have any issue if she uses a fire spirit, as serene state is water based.\
>The problems arise in the second half, where she uses pleasure attacks.@
>If she binds you without Gnome, your defeat is assured.\
>But if she summons a fire spirit again, you will need to go back to a serene state to survive.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, Luka Magnum.@
>Defeat that foolish Knight in full view of the public.\
sub %stack,1
return



*akaname_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Oh, so you became the prey of a low class group of monsters...@
>No matter where you go, you never change, do you?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Since there are three of them, you'll take a lot of damage by sheer number of attacks.@
>Use your serene state to limit it, even if just a little bit.\
>Her ecstasy attack can be completely avoided with Sylph, and her bind broken with Gnome...@
>But using a serene state to avoid damage is probably the best route to take.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Once you get tired of being licked, please fight properly.\
sub %stack,1
return



*mikolamia_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
name "Ilias"
>You love Miko!@
>I love Miko!@
>Everyone loves Miko!\
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
>The disguise that Lamia took for herself... Disgusts me.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Her restraint attack is very powerful.@
>Without Gnome, your defeat is assured if she catches you.\
>But if she herself calls a spirit of earth, you won't be able to escape even with Gnome.@
>You'll have to call Sylph, to avoid it altogether.\
>In addition, you will be insulted further if you are defeated by a certain attack...@
>Do whatever you want.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>It's a time-honored tradition to cut off the head of a fallen medium.\
sub %stack,1
return



*kezyorou_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Sheesh, coiled in hair this time?@
>It's nice to see you continuing your trend of being wound up in anything of sufficient length...\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>If you're bound in her hair, she can use an instant kill move.@
>It takes time to escape from even with Gnome, so be aware.\
>It's avoidable altogether with Sylph or a serene state, though.@
>Since she's a monster, serene state would be preferred.\
>If she calls a spirit of wind herself, she'll launch continuous attacks.@
>Make sure to summon Gnome to protect yourself from her barrage.\
>Lastly, if you're defeated as she rapes you, she'll insult you even further...@
>You may be delighted, but it's a headache for me.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, Long-Thing-Lover Luka.@
>Pull off all her hair, and turn her into a wig.\
sub %stack,1
return



*sirohebisama_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>My, you sure do love Lamias.@> Any shape, size or color does it for you, I see.@
>Do you prefer albinos the most, now?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Since she's a monster, serene state should be good...@>But since her binding attack is powerful, Gnome is preferred.\
>In addition, she can summon spirits of earth and wind.@> When she does, counter it with the opposite spirit.\
>Since she's a disgusting snake, ice is effective.@>Exploit that Monster Lord's ice magic to freeze her.\
>In addition, if you lose to a specific attack, she will insult you further...@
>Not that you care, I'm sure.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>By the way, don't forget to kill the sister too.\
sub %stack,1
return



*walraune_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Why is she called Walraune?@>Because she's a bad (warui) Alraune.@
>What horrible naming sense...\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>She's a powerful enemy, who has numerous status effect attacks.@
>You can avoid most of them with Sylph.\
>Since her HP is low, protecting yourself from status effects and launching a full offensive is the way to go.\
>Also, since she is a plant, she is weak to fire.@
>I'm sure it would be fun to burn her to ashes.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>No matter what kind of Alraune it is, destroy them with your sword.\
sub %stack,1
return



*dryad_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Are you seeing if you can grow a plant simply with your semen?@
>I don't think they accept that as a record in Guinness...\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Dryad's attack patterns change from the first half to the second half.@
>The method to counter them changes, too, so be careful.\
>Since she's a plant, be sure to call Sylph quickly to avoid status effects.\
>In the second half, she will use a powerful restraint technique.@
>Make sure to call Gnome in order to avoid it.\
>Since she's a plant, she burns well...@> But you may be better off saving your slave for recovery purposes.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Destroy all the monsters haunting Plansect forest.\
sub %stack,1
return



*queenalraune_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Did you enjoy having sex with a pistil?@
>You seem to have misplaced your human dignity in the previous chapter...\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Since she's a plant, Sylph is the best spirit to use.@
>With Gnome, you can easily escape from her bind...@> But her status effects are quite potent, too.\
>Since she has a lot of HP, you're in for a lengthy fight.@
>Saving the Monster Lord's skill for emergency healing may be the best route to take.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Crush that plant, pluck her flowers, and press them between a book to preserve her death for all time.\
sub %stack,1
return



*slimelord_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>I heard there's a new food on the market called Slimebait.@
>...Of course, I am referring to you.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>With both high attack power, and a strong bind, Gnome is your best choice here.\
>If she summons a spirit of fire or earth, her power will further increase.@
>Use serene state or Sylph to evade the damage.\
>In addition, if you lose to her draining move, she will continue to insult you.@
>Not that your end result will be any different...\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh Slimebait.@
>You aren't allowed to lose to a Slime at this point.\
sub %stack,1
return



*eggel_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Sheesh... Losing to that egg thing?@
>Did you want to experience being an egg yolk that badly?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Since she's an angel, fallen angel dance is effective...@
>But due to her powerful bind, Gnome may be the better choice.\
>She can use an ecstasy inducing effect during her bind, so make sure to use Gnome to escape as quick as possible.\
>In addition, don't lose to a specific move...@
>Or you'll be stuck in a hell of bubbles.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Turn her into a fried egg.\
sub %stack,1
return



*tutigumo_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Look at that pitiful insect, squirming on a spider's web...@
>Oh my, that's you.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Her binding techniques are very powerful.@
>Without Gnome, your defeat is assured.\
>So you should always keep Gnome up, to prevent an instant loss.@
>You can avoid her string attacks with Sylph, but you run that risk.\
>But if she herself summons a spirit of earth, switch to Sylph right away.\
>Furthermore, the Monster Lord's attacks don't do much.@
>It would be best to use her for recovery.\
>Lastly, there are additional insults awaiting a loss to certain moves.@
>It might matter to you, but I don't care.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Destroy these evil Ants and Spiders bringing horror to the citizens of Grangold.\
sub %stack,1
return



*alakneload_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Have you heard the tale of The Spider's Thread?@
>If you have, I bet you were too focused on the spider's thread to understand the rest of the story...\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Arachne has an instant kill move she can use when you're bound.@
>You can't break loose right away, even with Gnome, so it's particularly dangerous.\
>You can avoid it fully with a serene state, so be sure to keep it up.@
>If she summons a spirit of wind, then you must counter it with Gnome.\
>Like the last spider, the Monster Lord's skills don't do much damage.@>Recovery is a better use for her.\
>If you're defeated while caught in her web...@>Then you know what will probably happen.\
>I am already disgusted, since I can tell you're going to go see what happens.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>All spiders should be eradicated from the earth.@> Including every subspecies.\
sub %stack,1
return



*kumonomiko_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Not just being squeezed dry, but eaten too?@
>I'm happy to see you grow in the complexities of ways to die.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>As expected of the new Queen of Spiders, her restraint techniques are very strong.@
>Since you can't break free without Gnome, make sure to always have her on hand.\
>You can avoid some status effects with Sylph, but the instant loss of her bind is more dangerous.\
>In addition, she can summon a spirit of fire, which will overwhelm you.@
>Since you don't have Undine yet, make sure to use your serene state.\
>Just like before, the Monster Lord's skills should be used for recovery.\
>Lastly, if you lose to a certain move, additional insults await.@
>But please, try to fight seriously.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Destroy that new Queen, and exterminate those ugly spiders.\
sub %stack,1
return



*narcubus_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
name "Ilias"
>Thanks for coooming!@
>Please lay down over there, I'll be with you in a moment!\
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
>...Is that what you wanted me to say?@
>Do you need me to role play as a nurse now to recover your fighting spirit?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Since she's a monster, a serene state is useful.\
>She has two types of restraint techniques as well.@
>If you don't break out of them fast, it's an instant loss.\
>If she uses her tail in her restraint, then you can break free simply by struggling, even without Gnome.\
>However, you can't escape by struggling when she tries to examine you with her vagina...@
>If you don't attack her right away, you will lose.\
>Don't panic and struggle when you should attack.@
>Her attack power isn't high, so as long as you are calm and careful, you will win.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Make that shameless Succubus herself be in need of some nursing.\
sub %stack,1
return



*inps_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>You gave in to such a low level monster?\
>You're doing this on purpose, aren't you?@
>You're doing it on purpose...?@
>You're doing it on purpose.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Swing your sword.@
>That's it.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Make sure you deal with those weak-willed men laying on the ground, too.\
sub %stack,1
return



*eva_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Since your opponent was a Succubus, you don't seem too unhappy about being sucked dry.@
>Feeding her on a silver platter like that...@> You've disgusted me yet again today.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Since your opponent is a monster, use a serene state.@
>She also has an instant kill move that can be dodged with a serene state.\
>If she turns around, do not attack...@
>In addition, she uses spirits of earth and wind.@> Be sure to summon their counter.\
>Lastly, she will continue to insult you if she defeats you with many different moves...@
>Blowjob, facesitting, footjob, armpit sex...\
>Oh dear, I'm a Goddess... What's with the indecent language?\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Destroy that disgusting Succubus, and restore calm to the village.\
sub %stack,1
return



*trooperloid_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Do you have any pride left after having your semen gathered so easily?@
>You seem to be as good as livestock...@> Good enough for milking.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Her restraint attack is very strong, be sure to summon Gnome to escape from it.\
>You can avoid the paralysis with Sylph...@>But Gnome is a better choice.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Remodel that monster into a cleaner, and use her to vacuum up the dirt in that town.\
sub %stack,1
return



*assassinloid_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>If your opponent is an assassin, at least be assassinated like a man.@
>Why come here after acting like such a pathetic creature...?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Her restraint is very powerful, make sure to always have Gnome summoned.@
>But when she summons a spirit of fire, counter with a serene state.\
>There are also times when she goes into a stealthy state, and becomes immune to attacks.@
>You can completely avoid these attacks with a serene state...@>But you may also be able to survive by just defending through it.\
>When she returns to normal after her stealth state, she will be completely defenseless.@>Use those turns for some free hits.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Assassinate the assassin and restore peace to the town.\
sub %stack,1
return



*yomotu_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>You're the same as ever, aren't you?@> Look at you, becoming one with that monster...@
>As soon as I take my eyes off you, you keep trying to get yourself assimilated by strange creatures...@> Such a strange Hero.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Her attack patterns are simple, so use a serene state to avoid many of them.\
>You can escape from her bind fast with Gnome, but it isn't that powerful to begin with.@
>The Monster Lord's attacks aren't too powerful.@>Using her for recovery is your best bet.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Aren't you interested in seeing what happens if you pull on that monster's hair...?\
sub %stack,1
return



*wormiel_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Oh, what an ugly thing...@
>Having that thing be in a Goddess' service is a sin unto itself.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>She's an angel, so fallen angel dance is useful...@> But since she has an instant kill bind attack, Gnome is better.\
>The damage you take will be higher, but it's better than taking a chance on a random loss.\
>There's additional insults that await if you lose to a certain move.@
>But she's just a disgusting mass of worms anyway, I'm sure you wouldn't want to see it.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Destroy that disgusting angel before others are able to see her.\
sub %stack,1
return



*drainplant_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Remodeling a divine angel into that thing...@
>I wish to tear both the plant and the one inside it to pieces right now...\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Always have Gnome available due to her restraint.@
>Other than that, there's nothing of note.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>If you enter that monster again, I will smite you both.\
sub %stack,1
return



*drainloid_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Was it fun being squeezed along with those other boys?@
>So many hole brothers...@> Oh, sorry... That was a little vulgar.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Without Undine, you risk losing to an instant death move.@
>Gnome will let you escape from her bind quicker...@> But the instant death risk takes priority.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Save your hole broth...@>I mean, the other trapped humans.\
sub %stack,1
return



*replicant_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
name "Ilias"
>What is a man, Luka?@
>A miserable lit...@> I mean.@> Humans are animals that have come to know the meaning of love.\
>I'll never recognize a creation that doesn't acknowledge that.@
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>...See, I can say good things sometimes, too.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Your opponent can use an instant death move.@
>You must always have Gnome summoned to allow yourself to escape.\
>Outside of that, there's nothing to note.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Show her the strength of humans with your blade.\
sub %stack,1
return



*laplace_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>A machine without a soul...@>And you allow her to dominate you?@
>Ashes to ashes, dust to dust, and scrap iron into the trash.@> Those are my teachings.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Since your opponent is a machine, she's very hard to read.@
>Thus, Undine and Sylph's effects are both small.\
>You should call Gnome to reduce the damage.\
>In addition, when she uses her charged up move, not even the spirits and guarding will let you avoid it.\
>You must instead use your counter move.@>Always ensure you have enough SP to protect yourself.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Cut her up into scrap metal to be recycled.\
sub %stack,1
return



*fermesara_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>The one who dried you up, is herself dried up...@
>Dry, dry, dry...@> Is everything in this world drying up?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Ferme Sara can use an instant kill technique when you're bound.@
>The probability is low, but having Gnome to break free is a good idea.\
>Abnormal statuses can be avoided with Sylph though, so the choice is yours.\
>Also, outside of fire, the Monster Lord's skills aren't that effective.\
>In addition, if you lose to a certain skill then there are additional insults awaiting...@
>Why not go for some extra bandage service?\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>It's your mission to prevent the drying out of anyone else...\
sub %stack,1
return



*angelghoul_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Another abomination made of a heavenly messenger...@
>And you, pleased to be raped by this creation...@> Sins everywhere.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>She's undead, but also an angel... So Sylph is an effective choice.@
>The evasion rate isn't quite as high as normal, but it's still better than nothing.\
>If you don't struggle right away, you will lose.@
>But you can break away without Gnome, so she isn't necessary.\
>Other than that, there isn't anything special.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Since she has turned into this, she must be put down.\
sub %stack,1
return



*dragonzonbe_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>To be eaten and digested by a zombie...@
>You're just a snack for a corpse, I see.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>When she sends out that body of hers, her attack pattern changes.@
>At the start, a serene state with Undine is the best course of action.\
>But when that other body part comes out, she starts to use restraint techniques.@
>At that time, switch to Gnome.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Send that dead dragon back to where she belongs.\
sub %stack,1
return



*cirque_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>An abhorrent circus of corpses...@>How disgusting.@
>And you looked so happy as they gang-raped you...@>You're disgusting, too.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>For the first round, your opponent is the Harpy and the Elf.@
>Their instant kill move is dangerous, so you need to protect yourself with Sylph.\
>Round two is Scylla and the Fairy.@
>A serene state is effective, but Gnome is also helpful to break from binds.@>The choice is yours.\
>The third round is the Lamia and the Mermaid...@
>The Lamia's binding move is troublesome, so Gnome is a great help.\
>It may seem dizzying at first, but adapt your spirits to your opponents.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Tear down that circus with your own hands.\
sub %stack,1
return



*alice15th_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>The previous Monster Lord!@> How horrifying!@> What a disgusting creature!@
>And the first thing you did was let her feed on you!\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Both Gnome and Sylph are useful...@
>But Undine's serene state will probably do the most.\
>Also, she has an instant kill move that can be completely avoided with a serene state.\
>You'll avoid most of her attacks...@>But her attack power is very high, so it will still hurt.@
>Make sure you always keep enough in reserve to heal yourself.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Send that monster back to hell where she belongs.\
sub %stack,1
return



*shirom_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Having a subordinate like that...@
>Promestein, this isn't over yet...@> Ah, excuse me.@>Don't worry about that...\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Sylph and Undine don't have much effect on evasion.@
>Since her restraint moves are also a threat, you should use Gnome here.\
>Since you won't be able to avoid any damage, you should save some SP for healing at all times.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Destroy that horrible necromancer, and bring calm back.\
sub %stack,1
return



*alice8th1_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>So you were defeated by Black Alice, and came here...@
>For some reason, I'm starting to get nostalgic about Heinrich's time...\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Her attacks are very strong, but you can avoid many of them with a serene state.@
>Still, her painful attacks will hit every so often.@>Keep some SP available for healing.\
>In addition, if you're defeated while she rapes you, there will be an additional insult.\
>I won't say you should watch it...\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Heinr...@>I mean, Luka.@
>Like the ancient legendary Hero, you should be able to win as well.\
sub %stack,1
return



*traptemis_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Who would lay such a horrible trap!?@
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>...Ah. I would.\
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
>Well, you see, I would be greatly troubled to have humans wandering around carelessly near the Gate...@
>...But those that were captured are quite pathetic, wouldn't you agree?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>If you don't summon Sylph right away, you will be tempted by the gas.\
>Just defeat her after that.@>As long as you have Sylph, you can't lose.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Please don't break all of my statues...\
sub %stack,1
return



*gargoyle_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>She has been watching that gate for centuries.@> She must be quite bored.@
>But now she has you as a toy to pass the time with.@>You're such a nice guy.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The Gargoyle is a powerful enemy who changes up her attack patterns.@
>In her normal state, Gnome is required to break free of her restraint.\
>When she goes back into her statue form, summon Sylph to avoid her status effect inducing skills.\
>When she is in her statue state, you can continue attacking her.@
>Don't be worried about some sort of counter.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>End the endless shift of that Gate Guard.\
sub %stack,1
return



*doppele_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>You raped yourself...?@
>Couldn't this just be said to be some elaborate form of masturbation?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Doppel Luka can offset all of your sword skills.@
>You can't fight her directly without addressing that.\
>You should check each of your skills against her, and perhaps try to find one she doesn't know...\
>After she strips, you can fight normally...@>But you should give priority to rebuilding your SP.\
>After she strips, Undine is effective.\
>In addition, depending on when you lose, it will change whether she's dressed or not during the rape scene after.\
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
>Oh I wonder what you're going to try now!?\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>No go, oh elaborate masturbator Luka.@
>Because you disappointed me, I can tell you're the real one.\
sub %stack,1
return



*hainu_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Since I would never help a Monster, I came to you instead.@
>For once, I'm not criticizing you.@> But you should still pay attention.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>It seems like she can nullify any attack...@
>Physical, pleasure, magic...@> Why not try everything?\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>It's regrettable, but you must pray that the disgusting Succubus wins.\
sub %stack,1
return



*amphis_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>That moving puddle lost, I see.@
>I know you didn't lose directly, but you shall undergo the evaluation anyway.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>It seems like that vibrating toy is slowly losing her energy.@
>To get her to be fully drained, you need to have her keep using her armor.\
>Of course, it will damage you as well...@
>But I don't really care.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>This time, pray that the puddle wins.\
sub %stack,1
return



*tukuyomi_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>That damn fox...@
>Did she send you here just to harass us both?\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>The difference in power is clear...@>But that damn fox is holding a trump card.@
>Perhaps if she just lowers the enemy's HP a bit...\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Kill that wicked fox later on, too.\
sub %stack,1
return



*arcen_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>I wonder if her brain itself is composed of useless muscle?@
>Sheesh, that lizard is useless during the only time she's needed.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Since she's nothing but muscle, she might as well just swing her sword.@
>In that case, she could at least reduce the enemy's HP a little bit.\
>If it goes on long enough, she might even try something new.@
>Even monkeys figure out how to do things after enough time, after all.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Pray that the muscle lizard manages to actually win.\
sub %stack,1
return



*rapun_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Mating with an artificial monster this time...@
>I wouldn't be surprised to see you mate with stray dogs you find now...\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Starting with this fight, you can unlock the true power of the spirits.@
>With them usable, this shouldn't be a hard fight.\
>Your evasion and defense will both be sky high...@
>Since you can stack them on top of each other, you aren't bound by picking a good one for each situation any longer.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Once you're tired of mating with everything you see, how about trying to save the world?\
sub %stack,1
return



*heavensgate_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>To think you would even be raped by the gate...@>You managed to surprise me... Surprisingly.@
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>...Though I made that gate, so I knew it was possible.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Your enemy is an angel, so fallen angel dance is useful.@
>Gnome will also help with defense, of course.\
>Undine isn't as effective, so you can skip her.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>I want to use that gate again later, so don't break her too badly.\
sub %stack,1
return



*eden_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Even my trusted confidant turned into something horrible...@
>Her appearance itself is a sin.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Wielding great strength and magic, each of Eden's attacks can bring about instant death.\
>You will need both evasion and defense to have any hope of surviving.@
>So be ready to challenge her using all of the spirits.\
>Also, if you lose to a certain attack, a different horrible fate awaits.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Correct that foolish angel with your blade of divine justice.\
sub %stack,1
return



*stein2_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
if %hansei_first=0 gosub *first_hansei
lsp 700,":a;chara\iriasu_st04.bmp",0,0:print 10,500
name "Ilias"
>Promestein...@>Just how far did your horrible research go?@
>You've become a true demon, at last.@> Divine punishment awaits.\
lsp 700,":a;chara\iriasu_st01.bmp",0,0:print 10,500
>Close in form to a monster now, a serene state is effective.@
>Fallen angel dance isn't too effective, so Sylph need not be called.\
>Her restraints are also powerful, so Gnome is required.@
>The damage reduction will help a lot, too.\
>As before, make sure to summon the opposite attribute if she summons a spirit.@
>Her HP is very high, so prepare for a long fight.\
lsp 700,":a;chara\iriasu_st02.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Make her taste the thousands of years of my anger...\
sub %stack,1
return



*alice8th2_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st01m.bmp",0,0:print 10,500
name "Ilias"
>...Don't mind the slightly ugly appearance.\
>Since your opponent was once a Monster Lord, a serene state is effective.@
>Without Gnome, you also can't break free of her restraint.\
>Therefore, summoning Gnome and Undine is mandatory.\
>When she uses her charge move to prey on you, you cannot evade or guard.@
>You must use your Counter, or you will be eaten.\
>If she defeats you with that, you will simply be preyed on.@
>There won't be any other end for you...\
lsp 700,":a;chara\iriasu_st01m.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Slay the evil Monster Lord with your blade of justice.\
sub %stack,1
return



*alice8th3_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st01m.bmp",0,0:print 10,500
name "Ilias"
>Welcome back, Luka.@
>I will give you my secret plan for victory...\
>Like before, Undine and Gnome are both required.@
>But in this form, she's also using spirits.@
>Be sure to counter them.\
lsp 700,":a;chara\iriasu_st01m.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Settle this long battle of Light and Darkness...\
sub %stack,1
return



*alice8th4_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st01m.bmp",0,0:print 10,500
name "Ilias"
>This will probably be the last evaluation meeting.@
>Your quest will be finished at last...\
>Her behavior patterns are complex, and tough to deal with.\
>Even the names of her skills are filled with dread...\
>Like before, you need to counter her spirits with your own.@
>But if you summon more than one, she will cancel them out.\
>Undine will help your evasion, and Gnome will let you break free faster...@
>When she's fighting in a normal state, one should always be summoned.\
>In addition, she has two types of binds.@
>Pay attention to what part of your body is bound to see if you should struggle or attack...\
>In addition, if she looks like she's going to charge something up, you must use your counter or guard.\
>Also, she is able to use all four fake spirits herself.@
>And, in the same turn, she can cancel out your own!\
>Do not forget to counter those spirits.@
>A mistake here will mean your instant loss.\
>She is indeed the culmination of every opponent you've ever faced.@
>Obtain victory with your own hand!\
>In addition, every way she can eliminate you leads to further insults.@
>But surely you wouldn't go through all of them...?\
lsp 700,":a;chara\iriasu_st01m.bmp",0,0:print 10,500
>Now go, oh brave Luka.@
>Destroy the ancient evil, and become a True Hero.\
sub %stack,1
return



*irias1_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\iriasu_st12.bmp",0,0:print 10,500
name "Ilias"
>Heh...@> Hahahaha!@
>You're pathetic, Luka.@> You know that?\
>Did you really think I was some piece of Ilias that was still good?@
>I am the one and only Goddess!@> I transcend Good and Evil!\
>...That's right, I've been deceiving you this entire time.@
>You have no idea how difficult it was...@
>To stifle my laughter as you danced in my palm, that is.\
>Everything has been to lead you to defeat Black Alice after she absorbed me.@
>To that end, I provided you with this assistance.\
>Haha... I bet you never thought that was the reason for these, did you?@
>You've been doing exactly what I've wanted, this whole time.\
lsp 700,":a;chara\iriasu_st13.bmp",0,0:print 10,500
>Ah, yes, there's no more evaluation meetings.@
>I'll defeat you no matter how many times you try!\
sub %stack,1
return



*irias2_hansei

add %stack,1
mov %count_hanseikai2,%count_hanseikai2+1
lsp 700,":a;chara\rucyfina_st01.bmp",50,0:print 10,500
name "???"
>Luka... I forced a difficult fate upon you.@
>My imprudent actions have tormented you for so long...\
>No... I did not come to beg your forgiveness.@
>I wish to lend my power to help defeat the true evil.\
>First... Focus on healing yourself during the first phase.@
>Gnome is required to avoid taking fatal damage.\
>You must also summon both Sylph and Undine to help avoid damage, if even a little.@
>Aside from recovery and spirits, don't waste your SP on anything else.\
>And for the final phase...@
>It will be a fight just between you, Ilias, and Alice.\
>Make sure to always have Undine summoned to avoid a fatal instant kill attack.@
>Also, Sylph can help you evade her other attacks, so summon her as well.\
>Gnome can help you break free of her binds quicker, but isn't required.\
>And in the end...@>You must strike her down with everything you've got.@
>Join together with Alice, and you cannot fail.\
lsp 700,":a;chara\rucyfina_st02.bmp",50,0:print 10,500
>Luka...@>Even though my body may be gone, I am still watching over you.\
>Please, triumph...@
>And after, be happy in the peace you've obtained...\
sub %stack,1
return



*define

caption "Monster Girl Quest! Final Chapter "
english
nsa
filelog
labellog
textgosub *text_btn
globalon
usewheel
;useescspc
;defaultfont "lr "
defaultspeed 20,10,2
maxkaisoupage 200
rubyon 10,10
shadedistance 1,2
automode
deletemenu
savedir "save"
humanz 600
windowback
autosaveoff
kidokuskip
bgmfadeout 1000
loadgosub *load_config
effectcut
mode_wave_demo
exec_dll "NSFont.dll/gaiji,,system/hurt.bmp"

defsub name
defsub vspl
defsub cspl
defsub damage
defsub skillname
defsub skillname1
defsub sean_change
defsub count
defsub screen_clear
defsub screen_clear2
defsub screen_vanish
defsub screen_appear
defsub hseanwave
defsub hseanvoice
defsub skillcount1
defsub skillcount2
defsub skillcount3
defsub evalset
defsub eng
defsub nobel

numalias textkai,0
numalias textlastx,1
numalias textlasty,2
numalias bwait,3
numalias menux,4													;not used
numalias menuy,5													;not used
numalias sinkoumode,6													;?
numalias sinkouonoff,7													;isskip target

numalias creditnow,11
numalias creditx,12
numalias credity,13
numalias creditscroll,14

numalias sub1,101
numalias sub2,102
numalias sub3,103
numalias sub4,104
numalias sub5,105
numalias sub6,106
numalias sub7,107
numalias sub8,108
numalias sub9,109
numalias sub10,110
numalias vstr1,111

numalias saveorload,201
numalias savedatanow,202
numalias save0or1,203
numalias savescreen,204
numalias savetextget,205
numalias savenum,206
numalias savetime,207
numalias savetext,208
numalias savemonth,209
numalias saveday,210
numalias savehour,211
numalias saveminute,212

numalias savepicx,214
numalias savepicy,215
numalias savetotal,216
numalias savebarone,217
numalias savebarone2,218
numalias savebary,219

numalias backlognow,241
numalias backloglook,242
numalias backlogtotal,243
numalias backlogbarone,244
numalias backlogbarone2,245
numalias backlogbary,246

numalias cgtotal,261
numalias allcommandsenable,261
numalias cgpagetotal,262
numalias windiconlock,262
numalias cgpage,263
numalias aquaiconlock,263
numalias cgbarone,264
numalias stack,264
numalias cgbarone2,265
numalias hit,265
numalias name3,265
numalias cgbary,266
numalias cgname,267
numalias cgsabun,268

numalias bgmtotal,281
numalias bgmpage,282
numalias bgmbarone,283
numalias bgmbarone2,284
numalias bgmbary,285
numalias bgmplaynow,286

numalias cgdata001,301
numalias cgdata002,302
numalias cgdata003,303
numalias cgdata004,304
numalias cgdata005,305
numalias cgdata006,306
numalias cgdata007,307
numalias cgdata008,308
numalias cgdata009,309
numalias cgdata010,310
numalias cgdata011,311
numalias cgdata012,312
numalias cgdata013,313
numalias cgdata014,314
numalias cgdata015,315
numalias cgdata016,316
numalias cgdata017,317
numalias cgdata018,318
numalias cgdata019,319
numalias cgdata020,320
numalias cgdata021,321
numalias cgdata022,322
numalias cgdata023,323
numalias cgdata024,324
numalias cgdata025,325
numalias cgdata026,326
numalias cgdata027,327
numalias cgdata028,328
numalias cgdata029,329
numalias cgdata030,330
numalias cgdata031,331
numalias cgdata032,332
numalias cgdata033,333
numalias cgdata034,334
numalias cgdata035,335
numalias cgdata036,336
numalias cgdata037,337
numalias cgdata038,338
numalias cgdata039,339
numalias cgdata040,340
numalias cgdata041,341
numalias cgdata042,342
numalias cgdata043,343
numalias cgdata044,344
numalias cgdata045,345
numalias cgdata046,346
numalias cgdata047,347
numalias cgdata048,348
numalias cgdata049,349
numalias cgdata050,350
numalias cgdata051,351
numalias cgdata052,352
numalias cgdata053,353
numalias cgdata054,354
numalias cgdata055,355
numalias cgdata056,356
numalias cgdata057,357
numalias cgdata058,358
numalias cgdata059,359
numalias cgdata060,360
numalias cgdata061,361
numalias cgdata062,362
numalias cgdata063,363
numalias cgdata064,364
numalias cgdata065,365
numalias cgdata066,366
numalias cgdata067,367
numalias cgdata068,368
numalias cgdata069,369
numalias cgdata070,370
numalias cgdata071,371
numalias cgdata072,372
numalias cgdata073,373
numalias cgdata074,374
numalias cgdata075,375
numalias cgdata076,376
numalias cgdata077,377
numalias cgdata078,378
numalias cgdata079,379
numalias cgdata080,380
numalias cgdata081,381
numalias cgdata082,382
numalias cgdata083,383
numalias cgdata084,384
numalias cgdata085,385
numalias cgdata086,386
numalias cgdata087,387
numalias cgdata088,388
numalias cgdata089,389
numalias cgdata090,390
numalias cgdata091,391
numalias cgdata092,392
numalias cgdata093,393
numalias cgdata094,394
numalias cgdata095,395
numalias cgdata096,396
numalias cgdata097,397
numalias cgdata098,398
numalias cgdata099,399
numalias cgdata100,400
numalias bgmname001,401
numalias bgmname002,402
numalias bgmname003,403
numalias bgmname004,404
numalias bgmname005,405
numalias bgmname006,406
numalias bgmname007,407
numalias bgmname008,408
numalias bgmname009,409
numalias bgmname010,410
numalias bgmname011,411
numalias bgmname012,412
numalias bgmname013,413
numalias bgmname014,414
numalias bgmname015,415
numalias bgmname016,416
numalias bgmname017,417
numalias bgmname018,418
numalias bgmname019,419
numalias bgmname020,420
numalias bgmname021,421
numalias bgmname022,422
numalias bgmname023,423
numalias bgmname024,424
numalias bgmname025,425
numalias bgmname026,426
numalias bgmname027,427
numalias bgmname028,428
numalias bgmname029,429
numalias bgmname030,430
numalias bgmname031,431
numalias bgmname032,432
numalias bgmname033,433
numalias bgmname034,434
numalias bgmname035,435
numalias bgmname036,436
numalias bgmname037,437
numalias bgmname038,438
numalias bgmname039,439
numalias bgmname040,440
numalias bgmname041,441
numalias bgmname042,442
numalias bgmname043,443
numalias bgmname044,444
numalias bgmname045,445
numalias bgmname046,446
numalias bgmname047,447
numalias bgmname048,448
numalias bgmname049,449
numalias bgmname050,450
numalias bgmname051,451
numalias bgmname052,452
numalias bgmname053,453
numalias bgmname054,454
numalias bgmname055,455
numalias bgmname056,456
numalias bgmname057,457
numalias bgmname058,458
numalias bgmname059,459
numalias bgmname060,460
numalias bgmname061,461
numalias bgmname062,462
numalias bgmname063,463
numalias bgmname064,464
numalias bgmname065,465
numalias bgmname066,466
numalias bgmname067,467
numalias bgmname068,468
numalias bgmname069,469
numalias bgmname070,470
numalias bgmname071,471
numalias bgmname072,472
numalias bgmname073,473
numalias bgmname074,474
numalias bgmname075,475
numalias bgmname076,476
numalias bgmname077,477
numalias bgmname078,478
numalias bgmname079,479
numalias bgmname080,480
numalias bgmname081,481
numalias bgmname082,482
numalias bgmname083,483
numalias bgmname084,484
numalias bgmname085,485
numalias bgmname086,486
numalias bgmname087,487
numalias bgmname088,488
numalias bgmname089,489
numalias bgmname090,490

numalias bgmdata001,501
numalias bgmdata002,502
numalias bgmdata003,503
numalias bgmdata004,504
numalias bgmdata005,505
numalias bgmdata006,506
numalias bgmdata007,507
numalias bgmdata008,508
numalias bgmdata009,509
numalias bgmdata010,510
numalias bgmdata011,511
numalias bgmdata012,512
numalias bgmdata013,513
numalias bgmdata014,514
numalias bgmdata015,515
numalias bgmdata016,516
numalias bgmdata017,517
numalias bgmdata018,518
numalias bgmdata019,519
numalias bgmdata020,520
numalias bgmdata021,521
numalias bgmdata022,522
numalias bgmdata023,523
numalias bgmdata024,524
numalias bgmdata025,525
numalias bgmdata026,526
numalias bgmdata027,527
numalias bgmdata028,528
numalias bgmdata029,529
numalias bgmdata030,530
numalias bgmdata031,531
numalias bgmdata032,532
numalias bgmdata033,533
numalias bgmdata034,534
numalias bgmdata035,535
numalias bgmdata036,536
numalias bgmdata037,537
numalias bgmdata038,538
numalias bgmdata039,539
numalias bgmdata040,540
numalias bgmdata041,541
numalias bgmdata042,542
numalias bgmdata043,543
numalias bgmdata044,544
numalias bgmdata045,545
numalias bgmdata046,546
numalias bgmdata047,547
numalias bgmdata048,548
numalias bgmdata049,549
numalias bgmdata050,550
numalias bgmdata051,551
numalias bgmdata052,552
numalias bgmdata053,553
numalias bgmdata054,554
numalias bgmdata055,555
numalias bgmdata056,556
numalias bgmdata057,557
numalias bgmdata058,558
numalias bgmdata059,559
numalias bgmdata060,560
numalias bgmdata061,561
numalias bgmdata062,562
numalias bgmdata063,563
numalias bgmdata064,564
numalias bgmdata065,565
numalias bgmdata066,566
numalias bgmdata067,567
numalias bgmdata068,568
numalias bgmdata069,569
numalias bgmdata070,570
numalias bgmdata071,571
numalias bgmdata072,572
numalias bgmdata073,573
numalias bgmdata074,574
numalias bgmdata075,575
numalias bgmdata076,576
numalias bgmdata077,577
numalias bgmdata078,578
numalias bgmdata079,579
numalias bgmdata080,580
numalias bgmdata081,581
numalias bgmdata082,582
numalias bgmdata083,583
numalias bgmdata084,584
numalias bgmdata085,585
numalias bgmdata086,586
numalias bgmdata087,587
numalias bgmdata088,588
numalias bgmdata089,589
numalias bgmdata090,590

numalias scenetotal,601
numalias stuck,601
numalias scenepagetotal,602
numalias scenepage,603
numalias scenebarone,604
numalias scenebarone2,605
numalias scenebary,606
numalias sceneon,607

numalias selectnum,681
numalias selecttext,682
numalias select00,683
numalias select01,684
numalias select02,685
numalias select03,686

numalias mylife,801
numalias enemylife,802
numalias damage,803
numalias hanyo1,804
numalias hanyo2,805
numalias hanyo3,806
numalias hanyo4,807
numalias hanyo5,808
numalias hanyo6,809
numalias monster_x,810
numalias monster_y,811
numalias sentaku,812
numalias cmd1,813
numalias kousoku,814
numalias status,815
numalias sinkou,816
numalias ransu,817
numalias ren,818
numalias sel_hphalf,819
numalias sel_kiki,820
numalias max_mylife,821
numalias max_enemylife,822
numalias bougyo,823
numalias gage,824
numalias kousan,825
numalias move,826
numalias zmonster_x,827
numalias battlebgm,828
numalias mylv,829
numalias abairitu,830
numalias stopcmd1,831
numalias stopcmd2,832
numalias stopcmd3,833
numalias stopcmd4,834
numalias stopcmd5,835
numalias stopcmd6,836
numalias stopcmd7,837
numalias exp,838
numalias getexp,839
numalias mylv_before,840
numalias mp,841
numalias max_mp,842
numalias music,843
numalias end_n,844
numalias exp_minus,845
numalias genzaiti,846
numalias a_effect1,847
numalias a_effect2,848
numalias mogaku,849
numalias counter,850
numalias tikei,851
numalias player,852
numalias ransu2,853
numalias name_count,854
numalias viclose,855
numalias owaza_count1a,856
numalias owaza_count1b,857
numalias owaza_count1c,858
numalias owaza_count2a,859
numalias owaza_count2b,860
numalias owaza_count2c,861
numalias owaza_count3a,862
numalias owaza_count3b,863
numalias owaza_count3c,864
numalias damage_keigen,865
numalias teigi1,866
numalias teigi2,867
numalias teigi3,868
numalias teigi4,869
numalias teigi5,870
numalias teigi6,871
numalias teigi7,872
numalias teigi8,873
numalias teigi9,874
numalias list_num1,875
numalias list_num2,876
numalias list_num3,877
numalias list_num4,878
numalias list_num5,879
numalias list_num6,880
numalias list_num7,881
numalias list_num8,882
numalias list_num9,883
numalias list_num10,884
numalias list_num11,885
numalias list_num12,886
numalias finish1,887
numalias finish2,888
numalias page,889
numalias zukan_hyouzyo,890
numalias zukan_pozu,891
numalias saveloadoff,892
numalias zukan_bukkake1,893
numalias zukan_bukkake2,894
numalias zukan_bukkake3,895
numalias zukan_bukkake4,896
numalias zukan_bukkake5,897
numalias zukan_bukkake6,898
numalias zukan_bukkake7,899
numalias zukan_bukkake8,900
numalias battle,901
numalias zukan_bukkakenum,902
numalias zukan_hyouzyonum,903
numalias zukan_pozunum,904
numalias zukan_sentounum,905
numalias zukan_ryozyokunum,906
numalias zukanon,907
numalias storyon,908
numalias manuoff,909
numalias nanido,910
numalias genmogaku,911
numalias henkahp1,912
numalias henkahp2,913
numalias henkahp3,914
numalias status_turn,915
numalias turn,916
numalias nobtn,917
numalias first_sel1,918
numalias first_sel2,919
numalias first_sel3,920
numalias first_sel4,921
numalias zukan_x0,922
numalias zukan_x1,923
numalias zukan_x2,924
numalias zukan_koumoku,925
numalias zukan_skillc1,926
numalias zukan_skillc2,927
numalias zukan_skillc3,928
numalias zukan_skillc4,929
numalias zukan_skillc5,930
numalias zukan_skillc6,931
numalias zukan_skillc7,932
numalias zukan_skillc8,933
numalias zukan_skillc9,934
numalias zukan_skillc10,935
numalias zukan_skillc11,936
numalias zukan_skillc12,937
numalias skill_page,938
numalias wind_turn,939
numalias earth_turn,940
numalias aqua_turn,941
numalias fire_turn,942
numalias wind,943
numalias earth,944
numalias aqua,945
numalias fire,946
numalias continue,947
numalias kousoku_maxhp,948
numalias kousoku_hp,949
numalias story_sinkou,950
numalias damage_nobr,951
numalias wind_kakuritu,952
numalias wind_guard_on,953
numalias ikigoe,954
numalias nodamage,955
numalias aqua_end,956
numalias kaihi,957
numalias kadora,958
numalias kadora_damage,959
numalias earth_keigen,960
numalias mylv_sin,961
numalias enemylv,962
numalias damage_kotei,963
numalias owaza_num1,964
numalias owaza_num2,965
numalias before_action,966
numalias skill_sub,967
numalias nikaime,968
numalias nowmusic,969
numalias hsean,970
numalias hseanwave,971
numalias txtwindow,972
numalias hseanvoice,973
numalias tukix,974
numalias tukiy,975
numalias ryozyoku1,976
numalias ryozyoku2,977
numalias ryozyoku3,978
numalias zukancg,979
numalias zukanreturnoff,980
numalias tekikazu,981
numalias monster_xb,982
numalias monster_yb,983
numalias monster_xc,984
numalias monster_yc,985
numalias monster_xd,986
numalias monster_yd,987
numalias onedari_page,988
numalias onedari,988
numalias list_num13,989
numalias list_num14,990
numalias list_num15,991
numalias list_num16,992
numalias skill_num,993
numalias ruka_tati,994
numalias owaza_count3d,995
numalias owaza_count3e,996
numalias owaza_count3f,997
numalias owaza_count3g,998
numalias owaza_count3h,999
numalias owaza_count1d,1000
numalias owaza_count2d,1001
numalias zukan_bukkake9,1002
numalias daten,1003
numalias alice_skill,1004
numalias alice_skill1,1005
numalias alice_skill2,1006
numalias alice_skill3,1007
numalias enemy_wind,1008
numalias enemy_earth,1009
numalias enemy_aqua,1010
numalias enemy_fire,1011
numalias earth_keigen_el,1012
numalias kaihi_el,1013
numalias damage_keigen_el,1014
numalias bougyo_attack,1015
numalias rnd_ev,1016
numalias fire_keigen_el,1017
numalias opacity,1018

numalias ivent01,1101
numalias ivent02,1102
numalias ivent03,1103
numalias ivent04,1104
numalias ivent05,1105
numalias ivent06,1106
numalias ivent07,1107
numalias ivent08,1108
numalias ivent09,1109
numalias ivent10,1110
numalias ivent11,1111
numalias ivent12,1112
numalias ivent13,1113
numalias ivent14,1114
numalias ivent15,1115
numalias ivent16,1116
numalias ivent17,1117
numalias ivent18,1118
numalias ivent19,1119
numalias ivent20,1120

numalias check01,1151
numalias check02,1152
numalias check03,1153
numalias check04,1154
numalias check05,1155
numalias check06,1156
numalias check07,1157
numalias check08,1158
numalias check09,1159
numalias check10,1160
numalias check11,1161
numalias check12,1162
numalias check13,1163
numalias check14,1164
numalias check15,1165
numalias check16,1166
numalias check17,1167
numalias check18,1168
numalias check19,1169
numalias check20,1170

numalias skill01,1201
numalias skill02,1202
numalias skill03,1203
numalias skill04,1204
numalias skill05,1205
numalias skill06,1206
numalias skill07,1207
numalias skill08,1208
numalias skill09,1209
numalias status_end,1209
numalias skill10,1210
numalias status_mid,1210

numalias name,1300

numalias item01,1301
numalias haikei,1301
numalias item02,1302
numalias skillname,1302
numalias item03,1303
numalias gagenum,1303
numalias item04,1304
numalias bad1,1304
numalias item05,1305
numalias bad2,1305
numalias item06,1306
numalias sel1,1306
numalias item07,1307
numalias sel2,1307
numalias item08,1308
numalias sel3,1308
numalias item09,1309
numalias sel4,1309
numalias item10,1310
numalias sel5,1310
numalias item11,1311
numalias sel6,1311
numalias item12,1312
numalias list1,1312
numalias item13,1313
numalias list2,1313
numalias item14,1314
numalias list3,1314
numalias item15,1315
numalias list4,1315
numalias item16,1316
numalias list5,1316
numalias item17,1317
numalias list6,1317
numalias item18,1318
numalias list7,1318
numalias item19,1319
numalias list8,1319
numalias item20,1320
numalias list9,1320
numalias item21,1321
numalias list10,1321
numalias item22,1322
numalias list11,1322
numalias item23,1323
numalias list12,1323
numalias item24,1324
numalias tatie1,1324
numalias item25,1325
numalias tatie2,1325
numalias item26,1326
numalias tatie3,1326
numalias item27,1327
numalias tatie4,1327
numalias item28,1328
numalias platename,1328
numalias item29,1329
numalias statusnum,1329
numalias item30,1330
numalias hp_hyouzi,1330
numalias query_new,1331
numalias max_mylifeh,1331
numalias poison,1332
numalias mylifeh,1332
numalias message_mode,1333
numalias menu_mylv,1333
numalias anno_mode,1334
numalias menu_hp,1334

numalias menu_at,1335
numalias menu_sp,1336
numalias lavel,1337
numalias page_h,1338
numalias menu_list1,1339
numalias menu_list2,1340
numalias menu_list3,1341
numalias menu_list4,1342
numalias menu_list5,1343
numalias menu_list6,1344
numalias menu_list7,1345
numalias menu_list8,1346
numalias menu_list9,1347
numalias menu_list10,1348
numalias menu_list11,1349
numalias menu_list12,1350
numalias menu_list13,1351
numalias half_s1,1352
numalias half_s2,1353
numalias kiki_s1,1354
numalias kiki_s2,1355
numalias zlavel,1356
numalias zname,1357
numalias mogaku_anno1,1358
numalias mogaku_anno2,1359
numalias mogaku_anno3,1360
numalias mogaku_sel1,1361
numalias mogaku_sel2,1362
numalias mogaku_sel3,1363
numalias mogaku_sel4,1364
numalias mogaku_sel5,1365
numalias mogaku_dassyutu1,1366
numalias mogaku_dassyutu2,1367
numalias mogaku_earth_dassyutu1,1368
numalias mogaku_earth_dassyutu2,1369
numalias mogaku_kaisin1,1370
numalias mogaku_kaisin2,1371
numalias zukan_lv,1372
numalias zukan_hp,1373
numalias zukan_skill1,1374
numalias zukan_skill2,1375
numalias zukan_skill3,1376
numalias zukan_skill4,1377
numalias zukan_skill5,1378
numalias zukan_skill6,1379
numalias zukan_skill7,1380
numalias zukan_skill8,1381
numalias zukan_skill9,1382
numalias zukan_skill10,1383
numalias zukan_skill11,1384
numalias zukan_skill12,1385
numalias zukan_ko,1386
numalias end_go,1387
numalias hanlist1,1388
numalias hanlist2,1389
numalias hanlist3,1390
numalias hanlist4,1391
numalias hanlist5,1392
numalias hanlist6,1393
numalias hanlist7,1394
numalias hanlist8,1395
numalias name2,1396
numalias tatie1b,1397
numalias tatie2b,1398
numalias tatie3b,1399
numalias tatie1c,1400
numalias tatie2c,1401
numalias mon_labo_last_label,1401
numalias tatie3c,1402
numalias call_tuika_monster_labo,1402
numalias tatie1d,1403
numalias tatie2d,1404
numalias tatie3d,1405
numalias menu_list14,1406
numalias menu_list15,1407
numalias menu_list16,1408
numalias list13,1409
numalias mon_labo_on,1410
numalias list14,1410
numalias mon_labo_page_no,1411
numalias list15,1411
numalias mon_labo_page,1412
numalias list16,1412
numalias mon_labo_mon_num,1413
numalias mogaku_anno4,1413
numalias mon_labo_select_no,1414
numalias mon_labo_mon_folder,1415
numalias mon_labo_mon_ini,1416
numalias mon_labo_mon_ini_sc,1417
numalias mon_labo_mon_ini_ky,1418
numalias mon_labo_mon_ini_cmd,1419
numalias tuika_skill_kouka,1420
numalias poison_skill,1420
numalias tuika_skilla1,1421
numalias tuika_skilla2,1422
numalias tuika_skilla3,1423
numalias tuika_skilla4,1424
numalias tuika_skilla5,1425
numalias tuika_skilla6,1426
numalias tuika_skilla7,1427
numalias tuika_skilla8,1428
numalias tuika_skillb1,1429
numalias tuika_skillb2,1430
numalias tuika_skillb3,1431
numalias tuika_skillb4,1432
numalias tuika_skillc1,1433
numalias tuika_skillc2,1434
numalias tuika_skillc3,1435
numalias tuika_skillc4,1436
numalias tuika_skilld1,1437
numalias tuika_skilld2,1438
numalias tuika_skilld3,1439
numalias tuika_skilld4,1440
numalias tuika_skille1,1441
numalias tuika_skillf1,1442
numalias tuika_owaza_count1a,1443
numalias tuika_owaza_count1b,1444
numalias tuika_owaza_count1c,1445
numalias tuika_owaza_count1d,1446
numalias tuika_owaza_count1e,1447
numalias tuika_owaza_count1f,1448
numalias tuika_owaza_count1g,1449
numalias tuika_owaza_count1h,1450
numalias skill_tag,1450
numalias tuika_owaza_count2a,1451
numalias skillname_a1,1451
numalias tuika_owaza_count2b,1452
numalias skillname_a2,1452
numalias tuika_owaza_count2c,1453
numalias skillname_a3,1453
numalias tuika_owaza_count2d,1454
numalias skillname_a4,1454
numalias tuika_owaza_count3a,1455
numalias skillname_a5,1455
numalias tuika_owaza_count3b,1456
numalias skillname_a6,1456
numalias tuika_owaza_count3c,1457
numalias skillname_a7,1457
numalias tuika_owaza_count3d,1458
numalias skillname_a8,1458
numalias tuika_owaza_count4a,1459
numalias skillname_b1,1459
numalias mon_labo_var,1460
numalias skillname_b2,1460
numalias skillname_b3,1461
numalias skillname_b4,1462
numalias skillname_c1,1463
numalias skillname_c2,1464
numalias skillname_c3,1465
numalias skillname_c4,1466
numalias skillname_d1,1467
numalias skillname_d2,1468
numalias skillname_d3,1469
numalias tuika_owaza_count4b,1470
numalias skillname_d4,1470
numalias chara_ori,1471
numalias tuika_bgm,1471
numalias cut_ori,1472
numalias ori_name,1472
numalias bg_ori,1473
numalias mon_labo_var_flag,1474
numalias kousoku_type,1475
numalias max_owaza_count1a,1476
numalias max_owaza_count1b,1477
numalias max_owaza_count1c,1478
numalias max_owaza_count1d,1479
numalias max_owaza_count1e,1480
numalias max_owaza_count1f,1481
numalias max_owaza_count1g,1482
numalias max_owaza_count1h,1483
numalias max_owaza_count2a,1484
numalias max_owaza_count2b,1485
numalias max_owaza_count2c,1486
numalias max_owaza_count2d,1487
numalias max_owaza_count3a,1488
numalias max_owaza_count3b,1489
numalias max_owaza_count3c,1490
numalias max_owaza_count3d,1491
numalias max_owaza_count4a,1492
numalias max_owaza_count4b,1493

numalias gamefirst,1501
numalias gameclear,1502
numalias savepagenow,1503
numalias savenew,1504

numalias textspeed,1511
numalias autotime,1512
numalias bgmvol,1513
numalias sevol,1514
numalias click,1515
numalias skip,1516
numalias effectspeed,1517
numalias windowsize,1518

numalias temp_name,1592

numalias count_mostname,1600
numalias gloval1_story_sinkou,1601
numalias gloval1_mylv,1602
numalias gloval1_exp,1603
numalias gloval1_ivent01,1604
numalias gloval1_ivent02,1605
numalias gloval1_ivent03,1606
numalias gloval1_ivent04,1607
numalias gloval1_ivent05,1608
numalias gloval1_ivent06,1609
numalias gloval1_ivent07,1610
numalias gloval1_ivent08,1611
numalias gloval1_ivent09,1612
numalias gloval1_ivent10,1613
numalias gloval1_ivent11,1614
numalias gloval1_ivent12,1615

numalias gloval1_ivent13,1617
numalias gloval1_ivent14,1618
numalias gloval1_ivent15,1619
numalias gloval1_ivent16,1620
numalias gloval1_ivent17,1621
numalias gloval1_ivent18,1622
numalias gloval1_ivent19,1623
numalias gloval1_ivent20,1624
numalias gloval1_check01,1625
numalias gloval1_check02,1626
numalias gloval1_check03,1627
numalias gloval1_check04,1628
numalias gloval1_check05,1629
numalias gloval1_check06,1630
numalias gloval1_check07,1631
numalias gloval1_check08,1632
numalias gloval1_check09,1633
numalias gloval1_check10,1634
numalias gloval1_check11,1635
numalias gloval1_check12,1636
numalias gloval1_check13,1637
numalias gloval1_check14,1638
numalias gloval1_check15,1639
numalias gloval1_check16,1640
numalias gloval1_check17,1641
numalias gloval1_check18,1642
numalias gloval1_check19,1643
numalias gloval1_check20,1644
numalias gloval1_skill01,1645
numalias gloval1_skill02,1646
numalias gloval1_skill03,1647
numalias gloval1_skill04,1648
numalias gloval1_skill05,1649
numalias gloval1_skill06,1650
numalias gloval1_skill07,1651
numalias gloval1_skill08,1652
numalias gloval1_skill09,1653
numalias gloval1_skill10,1654
numalias gloval1_item01,1655
numalias gloval1_item02,1656
numalias gloval1_item03,1657
numalias gloval1_item04,1658
numalias gloval1_item05,1659
numalias gloval1_item06,1660
numalias gloval1_item07,1661
numalias gloval1_item08,1662
numalias gloval1_item09,1663
numalias gloval1_item10,1664
numalias gloval1_item11,1665
numalias gloval1_item12,1666
numalias gloval1_item13,1667
numalias gloval1_item14,1668
numalias gloval1_item15,1669
numalias gloval1_item16,1670
numalias gloval1_item17,1671
numalias gloval1_item18,1672
numalias gloval1_item19,1673
numalias gloval1_item20,1674
numalias gloval1_item21,1675
numalias gloval1_item22,1676
numalias gloval1_item23,1677
numalias gloval1_item24,1678
numalias gloval1_item25,1679
numalias gloval1_item26,1680
numalias gloval1_item27,1681
numalias gloval1_item28,1682
numalias gloval1_item29,1683
numalias gloval1_item30,1684
numalias gloval1_nanido,1685

numalias gloval2_story_sinkou,1701
numalias gloval2_mylv,1702
numalias gloval2_exp,1703
numalias gloval2_ivent01,1704
numalias gloval2_ivent02,1705
numalias gloval2_ivent03,1706
numalias gloval2_ivent04,1707
numalias gloval2_ivent05,1708
numalias gloval2_ivent06,1709
numalias gloval2_ivent07,1710
numalias gloval2_ivent08,1711
numalias gloval2_ivent09,1712
numalias gloval2_ivent10,1713
numalias gloval2_ivent11,1714
numalias gloval2_ivent12,1715

numalias gloval2_ivent13,1717
numalias gloval2_ivent14,1718
numalias gloval2_ivent15,1719
numalias gloval2_ivent16,1720
numalias gloval2_ivent17,1721
numalias gloval2_ivent18,1722
numalias gloval2_ivent19,1723
numalias gloval2_ivent20,1724
numalias gloval2_check01,1725
numalias gloval2_check02,1726
numalias gloval2_check03,1727
numalias gloval2_check04,1728
numalias gloval2_check05,1729
numalias gloval2_check06,1730
numalias gloval2_check07,1731
numalias gloval2_check08,1732
numalias gloval2_check09,1733
numalias gloval2_check10,1734
numalias gloval2_check11,1735
numalias gloval2_check12,1736
numalias gloval2_check13,1737
numalias gloval2_check14,1738
numalias gloval2_check15,1739
numalias gloval2_check16,1740
numalias gloval2_check17,1741
numalias gloval2_check18,1742
numalias gloval2_check19,1743
numalias gloval2_check20,1744
numalias gloval2_skill01,1745
numalias gloval2_skill02,1746
numalias gloval2_skill03,1747
numalias gloval2_skill04,1748
numalias gloval2_skill05,1749
numalias gloval2_skill06,1750
numalias gloval2_skill07,1751
numalias gloval2_skill08,1752
numalias gloval2_skill09,1753
numalias gloval2_skill10,1754
numalias gloval2_item01,1755
numalias gloval2_item02,1756
numalias gloval2_item03,1757
numalias gloval2_item04,1758
numalias gloval2_item05,1759
numalias gloval2_item06,1760
numalias gloval2_item07,1761
numalias gloval2_item08,1762
numalias gloval2_item09,1763
numalias gloval2_item10,1764
numalias gloval2_item11,1765
numalias gloval2_item12,1766
numalias gloval2_item13,1767
numalias gloval2_item14,1768
numalias gloval2_item15,1769
numalias gloval2_item16,1770
numalias gloval2_item17,1771
numalias gloval2_item18,1772
numalias gloval2_item19,1773
numalias gloval2_item20,1774
numalias gloval2_item21,1775
numalias gloval2_item22,1776
numalias gloval2_item23,1777
numalias gloval2_item24,1778
numalias gloval2_item25,1779
numalias gloval2_item26,1780
numalias gloval2_item27,1781
numalias gloval2_item28,1782
numalias gloval2_item29,1783
numalias gloval2_item30,1784
numalias gloval2_nanido,1785

numalias game_clear,1800
numalias taiken_check,1801												;not used
numalias hsean_alice2,1802
numalias hsean_alice3,1803
numalias hsean_alice4,1804
numalias hsean_alice5,1805
numalias hsean_meia1,1806
numalias hsean_sara1,1807
numalias hsean_alice6,1808
numalias hsean_alice7,1809
numalias hsean_alice8,1810
numalias hsean_irias1,1811
numalias hsean_alice10,1812
numalias hsean_alice11,1813
numalias hsean_alice12,1814
numalias hsean_seirei1,1815
numalias hsean_seirei2,1816
numalias hsean_seirei3,1817
numalias hsean_seirei4,1818
numalias hsean_etc1,1819
numalias hsean_etc2,1820
numalias hsean_etc3,1821
numalias hsean_etc4,1822
numalias hsean_etc5,1823
numalias hsean_etc6,1824
numalias hsean_etc7,1825
numalias hsean_end1,1826
numalias hsean_end2,1827
numalias hsean_end3,1828
numalias hsean_end4,1829
numalias hsean_end5,1830
numalias hsean_end6,1831
numalias hsean_end7,1832
numalias hsean_shitenno1,1833
numalias hsean_shitenno2,1834
numalias hsean_shitenno3,1835
numalias hsean_shitenno4,1836
numalias hsean_shitenno5,1837
numalias hsean_labo,1838

numalias eval1,1840
numalias eval2,1841
numalias eval3,1842
numalias eval4,1843
numalias eval5,1844
numalias eval6,1845

numalias battle_auto,1850
numalias hosyoku_cut,1851
numalias hsean_cut,1852
numalias zukan_page,1853
numalias window_type,1854
numalias count_mylv0,1855
numalias con_hbgm,1856
numalias con_hse,1857
numalias con_hvoice,1858
numalias tougou,1859
numalias hansei_first,1860
numalias micaela_batou,1861
numalias dopple_wet,1862
numalias ruka_book,1863

numalias savedata,2000
numalias count_ko,2001
numalias count_end,2002
numalias count_kousan,2003
numalias count_onedari,2004

numalias count_drainhp,2006
numalias count_drainlv,2007
numalias count_bouhatu,2008
numalias count_most,2009
numalias count_nakadashi,2010
numalias count_sakuseikikan,2011
numalias count_sumata,2012
numalias count_fera,2013
numalias count_tekoki,2014
numalias count_ashikoki,2015
numalias count_paizuri,2016
numalias count_analsex,2017
numalias count_analseme,2018
numalias count_syokusyu,2019
numalias count_slime,2020
numalias count_plant,2021
numalias count_wing,2022
numalias count_buturi,2023
numalias count_nenmaku,2024
numalias count_role,2025
numalias count_ganmenkizyou,2026
numalias count_kiss,2027
numalias count_sipppo,2028
numalias count_ito,2029
numalias count_onani,2030
numalias count_kami,2031
numalias count_tikubi,2032
numalias count_zenshin,2033
numalias count_kusuguri,2034
numalias count_kaze,2035
numalias count_ihuku,2036
numalias count_zensin,2037
numalias count_houyou,2038
numalias count_tissoku,2039
numalias count_yuuwaku,2040
numalias count_sonota,2041
numalias count_marunomi,2042
numalias count_sirikoki,2043

numalias count_kousoku,2051
numalias count_koukotu,2052
numalias count_mahi,2053
numalias count_yuwaku,2054
numalias count_kuppuku,2055
numalias count_sekika,2056
numalias count_konran,2057

numalias count_b001,2061
numalias count_b003,2062
numalias count_b002,2063
numalias count_b004,2064
numalias count_b005,2065
numalias count_b006,2066
numalias count_b007,2067
numalias count_b008,2068
numalias count_b009,2069
numalias count_b010,2070
numalias count_b011,2071
numalias count_b012,2072
numalias count_b013,2073
numalias count_b014,2074
numalias count_b015,2075
numalias count_b016,2076
numalias count_b017,2077

numalias count_wind,2080
numalias count_earth,2081
numalias count_aqua,2082
numalias count_fire,2083
numalias count_granhigi,2084
numalias count_hpfull,2085
numalias count_onekill,2086
numalias count_hellvic,2087
numalias count_vickonran,2088
numalias count_koenemy,2089
numalias count_sara,2090
numalias count_kadora,2091
numalias count_hanseikai,2092
numalias g_sylph,2093
numalias z_gnome,2094
numalias buturisyasei,2095												;free
numalias yuusyaakasi,2096
numalias count_hanseikai2,2097
numalias count_alice1,2098
numalias count_alice2,2099
numalias lonely,2100
numalias count_enemy_wind,2101
numalias count_enemy_earth,2102
numalias count_enemy_aqua,2103
numalias count_enemy_fire,2104
numalias counterk,2105
numalias alicek,2106
numalias tamek,2107

;2201-2265 - Chapter 1 Monsterpedia
;2266-2322, 2324-2331, 2333-2342, 2349 - Chapter 2 Monsterpedia
;2350-2433 - Chapter 3 Monsterpedia

;2801-2819 - Chapter 1 rape counters
;2820-2838 - Chapter 2 rape counters
;2839-2858 - Chapter 3 rape counters
;2859,2860 - Arumaeruma (3) rape scene counters
;2861,2862 - Tamammo (2) rape scene counters

numalias count_zukan3,2995
numalias count_zukan2,2996
numalias count_zukan1,2997
numalias count_oskill3,2998

numalias count_oskill1,3000

;3001-3262 - Chapter 1 requestable skills
;3263-3382, 3384-3659, 3661-3668 - Chapter 2 requestable skills
;3383,3660, 3669-3738, 3763-3982, 3985-3998 - Chapter 3 requestable skills

numalias count_oskill2,3999

;4000-4136 - Chapter 3 requestable skills

numalias tuika_cut,8000

numalias first_sel16,9987
numalias first_sel15,9988
numalias first_sel14,9989
numalias first_sel13,9990
numalias first_sel12,9991
numalias first_sel11,9992
numalias first_sel10,9993
numalias first_sel9,9994
numalias first_sel8,9995
numalias first_sel7,9996
numalias first_sel6,9997
numalias first_sel5,9998
numalias doppel_mp,9999

dim ?mon_labo_var[19]



game

*start

gosub *debug_main
if %gamefirst=0 mov %textspeed,15
if %gamefirst=0 mov %autotime,1000
if %gamefirst=0 mov %bgmvol,50
if %gamefirst=0 mov %sevol,80
mov %gamefirst,1
if %gamefirst=1 textspeed %textspeed
if %gamefirst=1 bgmvol %bgmvol
if %gamefirst=1 sevol %sevol
if %gamefirst=1 voicevol %sevol
erasetextwindow 0
lookbackflush
goto *title



*title

saveoff
if %tougou<2 lsp 107,":a;system\logo.bmp",79,100
if %tougou=2 lsp 107,":a;system\logox.bmp",79,100
if %game_clear<3 bg "bg\bg001.bmp",10,100
if %game_clear=3 bg "bg\bg140.bmp",10,100
bgm "bgm\title.ogg"
wait 1000
goto *title_logo



*title_logo

lsp 102,":c/2,0,3;system\title_start.jpg",340,380
print 10,400
lsp 103,":c/2,0,3;system\title_load.jpg",340,410
print 10,400
lsp 104,":c/2,0,3;system\title_config.jpg",340,440
print 10,400
lsp 105,":c/2,0,3;system\title_extra.jpg",340,470
print 10,400
lsp 106,":c/2,0,3;system\title_exit.jpg",340,500
print 10,400
goto *title_menu



*title_menu

btndef clear
if %tougou<2 lsp 107,":a;system\logo.bmp",79,100
if %tougou=2 lsp 107,":a;system\logox.bmp",79,100
if %game_clear<3 bg "bg\bg001.bmp",1
if %game_clear=3 bg "bg\bg140.bmp",1
lsp 102,":c/2,0,3;system\title_start.jpg",340,380
lsp 103,":c/2,0,3;system\title_load.jpg",340,410
lsp 104,":c/2,0,3;system\title_config.jpg",340,440
lsp 105,":c/2,0,3;system\title_extra.jpg",340,470
lsp 106,":c/2,0,3;system\title_exit.jpg",340,500
print 1
spbtn 102,102
spbtn 103,103
spbtn 104,104
spbtn 105,105
spbtn 106,106
btnwait %bwait
if %bwait=102 csp -1:bgmstop:bg black,10,2000:waittimer 2000:saveon:goto *game_start
if %bwait=103 csp -1:mov %saveorload,1:gosub *saveload
if %bwait=104 csp -1:gosub *config
if %bwait=105 csp -1:bgm "bgm\zukan.ogg":gosub *extra
if %bwait=106 csp -1:gosub *game_end
if %bwait=10 return
goto *title_menu



*setwindow_01

mov %txtwindow,1
setwindow3 50,445,35,4,20,20,0,10,10,1,1,#FFFFFF,50,445,799,599:textspeed %textspeed
if %window_type=0 lsp 611,":a;system\window1.bmp",25,400
if %window_type=1 lsp 611,":a;system\window1a.bmp",25,400
if %window_type=2 lsp 611,":a;system\window1b.bmp",25,400
if %window_type=3 lsp 611,":a;system\window1c.bmp",25,400
if %window_type=4 lsp 611,":a;system\window1d.bmp",25,400
if %window_type=5 lsp 611,":a;system\window1e.bmp",25,400
return



*setwindow_01p

mov %txtwindow,1
setwindow3 50,445,35,4,20,20,0,10,10,1,1,#FFFFFF,50,445,799,599:textspeed %textspeed
if %window_type=0 lsp 611,":a;system\window1.bmp",25,400
if %window_type=1 lsp 611,":a;system\window1a.bmp",25,400
if %window_type=2 lsp 611,":a;system\window1b.bmp",25,400
if %window_type=3 lsp 611,":a;system\window1c.bmp",25,400
if %window_type=4 lsp 611,":a;system\window1d.bmp",25,400
if %window_type=5 lsp 611,":a;system\window1e.bmp",25,400
print 1
return



*setwindow_02

mov %txtwindow,2
setwindow3 50,435,35,3,20,20,0,10,10,1,1,#FFFFFF,50,435,799,599:textspeed %textspeed
if %window_type=0 && %player=0 lsp 611,":a;system\window2.bmp",25,400
if %window_type=1 && %player=0 lsp 611,":a;system\window2a.bmp",25,400
if %window_type=2 && %player=0 lsp 611,":a;system\window2b.bmp",25,400
if %window_type=3 && %player=0 lsp 611,":a;system\window2c.bmp",25,400
if %window_type=4 && %player=0 lsp 611,":a;system\window2d.bmp",25,400
if %window_type=5 && %player=0 lsp 611,":a;system\window2e.bmp",25,400
if %window_type=0 && %player=1 lsp 611,":a;system\window2_al.bmp",25,400
if %window_type=1 && %player=1 lsp 611,":a;system\window2a_al.bmp",25,400
if %window_type=2 && %player=1 lsp 611,":a;system\window2b_al.bmp",25,400
if %window_type=3 && %player=1 lsp 611,":a;system\window2c_al.bmp",25,400
if %window_type=4 && %player=1 lsp 611,":a;system\window2d_al.bmp",25,400
if %window_type=5 && %player=1 lsp 611,":a;system\window2e_al.bmp",25,400
if %window_type=0 && %player=2 lsp 611,":a;system\window2_ar.bmp",25,400
if %window_type=1 && %player=2 lsp 611,":a;system\window2a_ar.bmp",25,400
if %window_type=2 && %player=2 lsp 611,":a;system\window2b_ar.bmp",25,400
if %window_type=3 && %player=2 lsp 611,":a;system\window2c_ar.bmp",25,400
if %window_type=4 && %player=2 lsp 611,":a;system\window2d_ar.bmp",25,400
if %window_type=5 && %player=2 lsp 611,":a;system\window2e_ar.bmp",25,400
if %window_type=0 && %player=3 lsp 611,":a;system\window2_er.bmp",25,400
if %window_type=1 && %player=3 lsp 611,":a;system\window2a_er.bmp",25,400
if %window_type=2 && %player=3 lsp 611,":a;system\window2b_er.bmp",25,400
if %window_type=3 && %player=3 lsp 611,":a;system\window2c_er.bmp",25,400
if %window_type=4 && %player=3 lsp 611,":a;system\window2d_er.bmp",25,400
if %window_type=5 && %player=3 lsp 611,":a;system\window2e_er.bmp",25,400
if %window_type=0 && %player=4 lsp 611,":a;system\window2_ta.bmp",25,400
if %window_type=1 && %player=4 lsp 611,":a;system\window2a_ta.bmp",25,400
if %window_type=2 && %player=4 lsp 611,":a;system\window2b_ta.bmp",25,400
if %window_type=3 && %player=4 lsp 611,":a;system\window2c_ta.bmp",25,400
if %window_type=4 && %player=4 lsp 611,":a;system\window2d_ta.bmp",25,400
if %window_type=5 && %player=4 lsp 611,":a;system\window2e_ta.bmp",25,400
if %window_type=0 && %player=5 lsp 611,":a;system\window2_gr.bmp",25,400
if %window_type=1 && %player=5 lsp 611,":a;system\window2a_gr.bmp",25,400
if %window_type=2 && %player=5 lsp 611,":a;system\window2b_gr.bmp",25,400
if %window_type=3 && %player=5 lsp 611,":a;system\window2c_gr.bmp",25,400
if %window_type=4 && %player=5 lsp 611,":a;system\window2d_gr.bmp",25,400
if %window_type=5 && %player=5 lsp 611,":a;system\window2e_gr.bmp",25,400
if %window_type=0 && %player=99 lsp 611,":a;system\window2_x.bmp",25,400
if %window_type=1 && %player=99 lsp 611,":a;system\window2a_x.bmp",25,400
if %window_type=2 && %player=99 lsp 611,":a;system\window2b_x.bmp",25,400
if %window_type=3 && %player=99 lsp 611,":a;system\window2c_x.bmp",25,400
if %window_type=4 && %player=99 lsp 611,":a;system\window2d_x.bmp",25,400
if %window_type=5 && %player=99 lsp 611,":a;system\window2e_x.bmp",25,400
return



*setwindow_02p

mov %txtwindow,2
setwindow3 50,435,35,3,20,20,0,10,10,1,1,#FFFFFF,50,435,799,599:textspeed %textspeed
if %window_type=0 && %player=0 lsp 611,":a;system\window2.bmp",25,400
if %window_type=1 && %player=0 lsp 611,":a;system\window2a.bmp",25,400
if %window_type=2 && %player=0 lsp 611,":a;system\window2b.bmp",25,400
if %window_type=3 && %player=0 lsp 611,":a;system\window2c.bmp",25,400
if %window_type=4 && %player=0 lsp 611,":a;system\window2d.bmp",25,400
if %window_type=5 && %player=0 lsp 611,":a;system\window2e.bmp",25,400
if %window_type=0 && %player=1 lsp 611,":a;system\window2_al.bmp",25,400
if %window_type=1 && %player=1 lsp 611,":a;system\window2a_al.bmp",25,400
if %window_type=2 && %player=1 lsp 611,":a;system\window2b_al.bmp",25,400
if %window_type=3 && %player=1 lsp 611,":a;system\window2c_al.bmp",25,400
if %window_type=4 && %player=1 lsp 611,":a;system\window2d_al.bmp",25,400
if %window_type=5 && %player=1 lsp 611,":a;system\window2e_al.bmp",25,400
if %window_type=0 && %player=2 lsp 611,":a;system\window2_ar.bmp",25,400
if %window_type=1 && %player=2 lsp 611,":a;system\window2a_ar.bmp",25,400
if %window_type=2 && %player=2 lsp 611,":a;system\window2b_ar.bmp",25,400
if %window_type=3 && %player=2 lsp 611,":a;system\window2c_ar.bmp",25,400
if %window_type=4 && %player=2 lsp 611,":a;system\window2d_ar.bmp",25,400
if %window_type=5 && %player=2 lsp 611,":a;system\window2e_ar.bmp",25,400
if %window_type=0 && %player=3 lsp 611,":a;system\window2_er.bmp",25,400
if %window_type=1 && %player=3 lsp 611,":a;system\window2a_er.bmp",25,400
if %window_type=2 && %player=3 lsp 611,":a;system\window2b_er.bmp",25,400
if %window_type=3 && %player=3 lsp 611,":a;system\window2c_er.bmp",25,400
if %window_type=4 && %player=3 lsp 611,":a;system\window2d_er.bmp",25,400
if %window_type=5 && %player=3 lsp 611,":a;system\window2e_er.bmp",25,400
if %window_type=0 && %player=4 lsp 611,":a;system\window2_ta.bmp",25,400
if %window_type=1 && %player=4 lsp 611,":a;system\window2a_ta.bmp",25,400
if %window_type=2 && %player=4 lsp 611,":a;system\window2b_ta.bmp",25,400
if %window_type=3 && %player=4 lsp 611,":a;system\window2c_ta.bmp",25,400
if %window_type=4 && %player=4 lsp 611,":a;system\window2d_ta.bmp",25,400
if %window_type=5 && %player=4 lsp 611,":a;system\window2e_ta.bmp",25,400
if %window_type=0 && %player=5 lsp 611,":a;system\window2_gr.bmp",25,400
if %window_type=1 && %player=5 lsp 611,":a;system\window2a_gr.bmp",25,400
if %window_type=2 && %player=5 lsp 611,":a;system\window2b_gr.bmp",25,400
if %window_type=3 && %player=5 lsp 611,":a;system\window2c_gr.bmp",25,400
if %window_type=4 && %player=5 lsp 611,":a;system\window2d_gr.bmp",25,400
if %window_type=5 && %player=5 lsp 611,":a;system\window2e_gr.bmp",25,400
if %window_type=0 && %player=99 lsp 611,":a;system\window2_x.bmp",25,400
if %window_type=1 && %player=99 lsp 611,":a;system\window2a_x.bmp",25,400
if %window_type=2 && %player=99 lsp 611,":a;system\window2b_x.bmp",25,400
if %window_type=3 && %player=99 lsp 611,":a;system\window2c_x.bmp",25,400
if %window_type=4 && %player=99 lsp 611,":a;system\window2d_x.bmp",25,400
if %window_type=5 && %player=99 lsp 611,":a;system\window2e_x.bmp",25,400
print 1
return



*setwindow_03

setwindow3 210,175,28,8,20,20,0,10,10,1,1,#999999,190,165,780,435:textspeed %textspeed
return



*setwindow_04

if %window_type=0 lsp 7,":c/2,0,3;system\mini_menu_screen.jpg",634,387
if %window_type=1 lsp 7,":c/2,0,3;system\mini_menu_screen.jpg",634,387
if %window_type=2 lsp 7,":c/2,0,3;system\mini_menub_screen.jpg",634,387
if %window_type=3 lsp 7,":c/2,0,3;system\mini_menuc_screen.jpg",634,387
if %window_type=4 lsp 7,":c/2,0,3;system\mini_menud_screen.jpg",634,387
if %window_type=5 lsp 7,":c/2,0,3;system\mini_menue_screen.jpg",634,387
spbtn 7,7
if %saveloadoff=0 && %window_type=0 lsp 3,":c/2,0,3;system\mini_menu_save.jpg",679,387
if %saveloadoff=0 && %window_type=1 lsp 3,":c/2,0,3;system\mini_menu_save.jpg",679,387
if %saveloadoff=0 && %window_type=2 lsp 3,":c/2,0,3;system\mini_menub_save.jpg",679,387
if %saveloadoff=0 && %window_type=3 lsp 3,":c/2,0,3;system\mini_menuc_save.jpg",679,387
if %saveloadoff=0 && %window_type=4 lsp 3,":c/2,0,3;system\mini_menud_save.jpg",679,387
if %saveloadoff=0 && %window_type=5 lsp 3,":c/2,0,3;system\mini_menue_save.jpg",679,387
if %saveloadoff=0 spbtn 3,3
if %saveloadoff=0 && %window_type=0 lsp 4,":c/2,0,3;system\mini_menu_load.jpg",724,387
if %saveloadoff=0 && %window_type=1 lsp 4,":c/2,0,3;system\mini_menu_load.jpg",724,387
if %saveloadoff=0 && %window_type=2 lsp 4,":c/2,0,3;system\mini_menub_load.jpg",724,387
if %saveloadoff=0 && %window_type=3 lsp 4,":c/2,0,3;system\mini_menuc_load.jpg",724,387
if %saveloadoff=0 && %window_type=4 lsp 4,":c/2,0,3;system\mini_menud_load.jpg",724,387
if %saveloadoff=0 && %window_type=5 lsp 4,":c/2,0,3;system\mini_menue_load.jpg",724,387
if %saveloadoff=0 spbtn 4,4
if %zukanon>0 && %window_type=0 lsp 4,":c/2,0,3;system\mini_menu_return.jpg",724,387
if %zukanon>0 && %window_type=1 lsp 4,":c/2,0,3;system\mini_menu_return.jpg",724,387
if %zukanon>0 && %window_type=2 lsp 4,":c/2,0,3;system\mini_menub_return.jpg",724,387
if %zukanon>0 && %window_type=3 lsp 4,":c/2,0,3;system\mini_menuc_return.jpg",724,387
if %zukanon>0 && %window_type=4 lsp 4,":c/2,0,3;system\mini_menud_return.jpg",724,387
if %zukanon>0 && %window_type=5 lsp 4,":c/2,0,3;system\mini_menue_return.jpg",724,387
if %zukanon>0 spbtn 4,4
if %window_type=0 && %player=0 lsp 611,":a;system\window3.bmp",25,370
if %window_type=1 && %player=0 lsp 611,":a;system\window3a.bmp",25,370
if %window_type=2 && %player=0 lsp 611,":a;system\window3b.bmp",25,370
if %window_type=3 && %player=0 lsp 611,":a;system\window3c.bmp",25,370
if %window_type=4 && %player=0 lsp 611,":a;system\window3d.bmp",25,370
if %window_type=5 && %player=0 lsp 611,":a;system\window3e.bmp",25,370
if %window_type=0 && %player=1 lsp 611,":a;system\window3_al.bmp",25,370
if %window_type=1 && %player=1 lsp 611,":a;system\window3a_al.bmp",25,370
if %window_type=2 && %player=1 lsp 611,":a;system\window3b_al.bmp",25,370
if %window_type=3 && %player=1 lsp 611,":a;system\window3c_al.bmp",25,370
if %window_type=4 && %player=1 lsp 611,":a;system\window3d_al.bmp",25,370
if %window_type=5 && %player=1 lsp 611,":a;system\window3e_al.bmp",25,370
if %window_type=0 && %player=2 lsp 611,":a;system\window3_ar.bmp",25,370
if %window_type=1 && %player=2 lsp 611,":a;system\window3a_ar.bmp",25,370
if %window_type=2 && %player=2 lsp 611,":a;system\window3b_ar.bmp",25,370
if %window_type=3 && %player=2 lsp 611,":a;system\window3c_ar.bmp",25,370
if %window_type=4 && %player=2 lsp 611,":a;system\window3d_ar.bmp",25,370
if %window_type=5 && %player=2 lsp 611,":a;system\window3e_ar.bmp",25,370
if %window_type=0 && %player=3 lsp 611,":a;system\window3_er.bmp",25,370
if %window_type=1 && %player=3 lsp 611,":a;system\window3a_er.bmp",25,370
if %window_type=2 && %player=3 lsp 611,":a;system\window3b_er.bmp",25,370
if %window_type=3 && %player=3 lsp 611,":a;system\window3c_er.bmp",25,370
if %window_type=4 && %player=3 lsp 611,":a;system\window3d_er.bmp",25,370
if %window_type=5 && %player=3 lsp 611,":a;system\window3e_er.bmp",25,370
if %window_type=0 && %player=4 lsp 611,":a;system\window3_ta.bmp",25,370
if %window_type=1 && %player=4 lsp 611,":a;system\window3a_ta.bmp",25,370
if %window_type=2 && %player=4 lsp 611,":a;system\window3b_ta.bmp",25,370
if %window_type=3 && %player=4 lsp 611,":a;system\window3c_ta.bmp",25,370
if %window_type=4 && %player=4 lsp 611,":a;system\window3d_ta.bmp",25,370
if %window_type=5 && %player=4 lsp 611,":a;system\window3e_ta.bmp",25,370
if %window_type=0 && %player=5 lsp 611,":a;system\window3_gr.bmp",25,370
if %window_type=1 && %player=5 lsp 611,":a;system\window3a_gr.bmp",25,370
if %window_type=2 && %player=5 lsp 611,":a;system\window3b_gr.bmp",25,370
if %window_type=3 && %player=5 lsp 611,":a;system\window3c_gr.bmp",25,370
if %window_type=4 && %player=5 lsp 611,":a;system\window3d_gr.bmp",25,370
if %window_type=5 && %player=5 lsp 611,":a;system\window3e_gr.bmp",25,370
if %window_type=0 && %player=99 lsp 611,":a;system\window3_x.bmp",25,370
if %window_type=1 && %player=99 lsp 611,":a;system\window3a_x.bmp",25,370
if %window_type=2 && %player=99 lsp 611,":a;system\window3b_x.bmp",25,370
if %window_type=3 && %player=99 lsp 611,":a;system\window3c_x.bmp",25,370
if %window_type=4 && %player=99 lsp 611,":a;system\window3d_x.bmp",25,370
if %window_type=5 && %player=99 lsp 611,":a;system\window3e_x.bmp",25,370
return



*setwindow_05

if %window_type=0 lsp 550,":a;system\window4.bmp",25,50
if %window_type=1 lsp 550,":a;system\window4a.bmp",25,50
if %window_type=2 lsp 550,":a;system\window4b.bmp",25,50
if %window_type=3 lsp 550,":a;system\window4c.bmp",25,50
if %window_type=4 lsp 550,":a;system\window4d.bmp",25,50
if %window_type=5 lsp 550,":a;system\window4e.bmp",25,50
return



*customsel

gosub *vanish_sprite
btndef clear
saveoff
textoff
mov %sinkoumode,0:skipoff:autoclick 0
getcselnum %selectnum
getcselstr $select00,0
getcselstr $select01,1
getcselstr $select02,2
getcselstr $select03,3
exbtn_d "P553,0P555,0P557,0P551,0"
if %selectnum>=1 len %name_count,$select00:strsp 553,$select00,172,203,(%name_count+1)/2+1,1,24,24,1,0,1,1,#FFFFFF,#FF4444
if %selectnum>=1 lsp 554,":a/2,0,3;system\select_window2.jpg",150,190
exbtn 554,554,"P553,1"
if %selectnum>=2 len %name_count,$select01:strsp 555,$select01,172,263,(%name_count+1)/2+1,1,24,24,1,0,1,1,#FFFFFF,#FF4444
if %selectnum>=2 lsp 556,":a/2,0,3;system\select_window2.jpg",150,250
exbtn 556,556,"P555,1"
if %selectnum>=3 len %name_count,$select02:strsp 557,$select02,172,323,(%name_count+1)/2+1,1,24,24,1,0,1,1,#FFFFFF,#FF4444
if %selectnum>=3 lsp 558,":a/2,0,3;system\select_window2.jpg",150,310
exbtn 558,558,"P557,1"
if %selectnum>=4 len %name_count,$select03:strsp 551,$select03,172,383,(%name_count+1)/2+1,1,24,24,1,0,1,1,#FFFFFF,#FF4444
if %selectnum>=4 lsp 552,":a/2,0,3;system\select_window2.jpg",150,370
exbtn 552,552,"P551,1"
print 10,100
btnwait %bwait
if %bwait=554 btndef clear:barclear:cspl 551,558:print 1:texton:gosub *appear_sprite:print 1:mov %sentaku,1:cselgoto 0
if %bwait=556 btndef clear:barclear:cspl 551,558:print 1:texton:gosub *appear_sprite:print 1:mov %sentaku,2:cselgoto 1
if %bwait=558 btndef clear:barclear:cspl 551,558:print 1:texton:gosub *appear_sprite:print 1:mov %sentaku,3:cselgoto 2
if %bwait=552 btndef clear:barclear:cspl 551,558:print 1:texton:gosub *appear_sprite:print 1:mov %sentaku,4:cselgoto 3
if %bwait=-1 && %manuoff=0 mov %sel2,%hanyo1:gosub *menu
if %bwait=-10 && %manuoff=0 mov %sel2,%hanyo1:gosub *menu
if %bwait=-11 && %manuoff=0 mov %sel2,%hanyo1:gosub *menu
if %bwait=-2 gosub *backlog
if %bwait=-12 gosub *backlog
if %bwait=-40 gosub *backlog
goto *customsel



*text_btn

isskip %sinkouonoff
if %sinkouonoff=1 skip 2
if %battle=1 && %battle_auto=1 automode_time %autotime:systemcall automode
btndef clear
texton
saveon
if %nobtn=1 vspl 3,7,0
if %nobtn=0 && %window_type=0 lsp 7,":c/2,0,3;system\mini_menu_screen.jpg",544,419
if %nobtn=0 && %window_type=1 lsp 7,":c/2,0,3;system\mini_menu_screen.jpg",544,419
if %nobtn=0 && %window_type=2 lsp 7,":c/2,0,3;system\mini_menub_screen.jpg",544,419
if %nobtn=0 && %window_type=3 lsp 7,":c/2,0,3;system\mini_menuc_screen.jpg",544,419
if %nobtn=0 && %window_type=4 lsp 7,":c/2,0,3;system\mini_menud_screen.jpg",544,419
if %nobtn=0 && %window_type=5 lsp 7,":c/2,0,3;system\mini_menue_screen.jpg",544,419
if %nobtn=0 spbtn 7,2
if %nobtn=0 && %saveloadoff=0 && %window_type=0 lsp 3,":c/2,0,3;system\mini_menu_save.jpg",679,419
if %nobtn=0 && %saveloadoff=0 && %window_type=1 lsp 3,":c/2,0,3;system\mini_menu_save.jpg",679,419
if %nobtn=0 && %saveloadoff=0 && %window_type=2 lsp 3,":c/2,0,3;system\mini_menub_save.jpg",679,419
if %nobtn=0 && %saveloadoff=0 && %window_type=3 lsp 3,":c/2,0,3;system\mini_menuc_save.jpg",679,419
if %nobtn=0 && %saveloadoff=0 && %window_type=4 lsp 3,":c/2,0,3;system\mini_menud_save.jpg",679,419
if %nobtn=0 && %saveloadoff=0 && %window_type=5 lsp 3,":c/2,0,3;system\mini_menue_save.jpg",679,419
if %nobtn=0 && %saveloadoff=0 spbtn 3,3
if %nobtn=0 && %saveloadoff=0 && %window_type=0 lsp 4,":c/2,0,3;system\mini_menu_load.jpg",724,419
if %nobtn=0 && %saveloadoff=0 && %window_type=1 lsp 4,":c/2,0,3;system\mini_menu_load.jpg",724,419
if %nobtn=0 && %saveloadoff=0 && %window_type=2 lsp 4,":c/2,0,3;system\mini_menub_load.jpg",724,419
if %nobtn=0 && %saveloadoff=0 && %window_type=3 lsp 4,":c/2,0,3;system\mini_menuc_load.jpg",724,419
if %nobtn=0 && %saveloadoff=0 && %window_type=4 lsp 4,":c/2,0,3;system\mini_menud_load.jpg",724,419
if %nobtn=0 && %saveloadoff=0 && %window_type=5 lsp 4,":c/2,0,3;system\mini_menue_load.jpg",724,419
if %nobtn=0 && %saveloadoff=0 spbtn 4,4
if %nobtn=0 && %mon_labo_on=1 && %window_type=0 lsp 4,":c/2,0,3;system\mini_menu_return.jpg",724,419
if %nobtn=0 && %mon_labo_on=1 && %window_type=1 lsp 4,":c/2,0,3;system\mini_menu_return.jpg",724,419
if %nobtn=0 && %mon_labo_on=1 && %window_type=2 lsp 4,":c/2,0,3;system\mini_menub_return.jpg",724,419
if %nobtn=0 && %mon_labo_on=1 && %window_type=3 lsp 4,":c/2,0,3;system\mini_menuc_return.jpg",724,419
if %nobtn=0 && %mon_labo_on=1 && %window_type=4 lsp 4,":c/2,0,3;system\mini_menud_return.jpg",724,419
if %nobtn=0 && %mon_labo_on=1 && %window_type=5 lsp 4,":c/2,0,3;system\mini_menue_return.jpg",724,419
if %100=1 && %nobtn=0 && %mon_labo_on=1 itoa $sel6,%stack:csp 10:strsp 10,$sel6,750,5,2,1,20,20,0,0,1,0,#FF0000
if %nobtn=0 && %mon_labo_on=1 spbtn 4,4
if %nobtn=0 && %zukanon=1 && %zukanreturnoff=0 && %window_type=0 lsp 4,":c/2,0,3;system\mini_menu_return.jpg",724,419
if %nobtn=0 && %zukanon=1 && %zukanreturnoff=0 && %window_type=1 lsp 4,":c/2,0,3;system\mini_menu_return.jpg",724,419
if %nobtn=0 && %zukanon=1 && %zukanreturnoff=0 && %window_type=2 lsp 4,":c/2,0,3;system\mini_menub_return.jpg",724,419
if %nobtn=0 && %zukanon=1 && %zukanreturnoff=0 && %window_type=3 lsp 4,":c/2,0,3;system\mini_menuc_return.jpg",724,419
if %nobtn=0 && %zukanon=1 && %zukanreturnoff=0 && %window_type=4 lsp 4,":c/2,0,3;system\mini_menud_return.jpg",724,419
if %nobtn=0 && %zukanon=1 && %zukanreturnoff=0 && %window_type=5 lsp 4,":c/2,0,3;system\mini_menue_return.jpg",724,419
if %100=1 && %nobtn=0 && %zukanon=1 && %zukanreturnoff=0 itoa $sel6,%stack:csp 10:strsp 10,$sel6,750,5,2,1,20,20,0,0,1,0,#FF0000
if %nobtn=0 && %zukanon=1 && %zukanreturnoff=0 spbtn 4,4
if %nobtn=0 && %zukanon=2 && %window_type=0 lsp 4,":c/2,0,3;system\mini_menu_return.jpg",724,419
if %nobtn=0 && %zukanon=2 && %window_type=1 lsp 4,":c/2,0,3;system\mini_menu_return.jpg",724,419
if %nobtn=0 && %zukanon=2 && %window_type=2 lsp 4,":c/2,0,3;system\mini_menub_return.jpg",724,419
if %nobtn=0 && %zukanon=2 && %window_type=3 lsp 4,":c/2,0,3;system\mini_menuc_return.jpg",724,419
if %nobtn=0 && %zukanon=2 && %window_type=4 lsp 4,":c/2,0,3;system\mini_menud_return.jpg",724,419
if %nobtn=0 && %zukanon=2 && %window_type=5 lsp 4,":c/2,0,3;system\mini_menue_return.jpg",724,419
if %100=1 && %nobtn=0 && %zukanon=2 itoa $sel6,%stack:csp 10:strsp 10,$sel6,750,5,2,1,20,20,0,0,1,0,#FF0000
if %nobtn=0 && %zukanon=2 spbtn 4,4
if %nobtn=0 && %sinkouonoff=1 && %window_type=0 lsp 5,":c;system\mini_menu_skip_on.jpg",589,419
if %nobtn=0 && %sinkouonoff=1 && %window_type=1 lsp 5,":c;system\mini_menu_skip_on.jpg",589,419
if %nobtn=0 && %sinkouonoff=1 && %window_type=2 lsp 5,":c;system\mini_menub_skip_on.jpg",589,419
if %nobtn=0 && %sinkouonoff=1 && %window_type=3 lsp 5,":c;system\mini_menuc_skip_on.jpg",589,419
if %nobtn=0 && %sinkouonoff=1 && %window_type=4 lsp 5,":c;system\mini_menud_skip_on.jpg",589,419
if %nobtn=0 && %sinkouonoff=1 && %window_type=5 lsp 5,":c;system\mini_menue_skip_on.jpg",589,419
if %nobtn=0 && %sinkouonoff=0 && %window_type=0 lsp 5,":c/2,0,3;system\mini_menu_skip.jpg",589,419
if %nobtn=0 && %sinkouonoff=0 && %window_type=1 lsp 5,":c/2,0,3;system\mini_menu_skip.jpg",589,419
if %nobtn=0 && %sinkouonoff=0 && %window_type=2 lsp 5,":c/2,0,3;system\mini_menub_skip.jpg",589,419
if %nobtn=0 && %sinkouonoff=0 && %window_type=3 lsp 5,":c/2,0,3;system\mini_menuc_skip.jpg",589,419
if %nobtn=0 && %sinkouonoff=0 && %window_type=4 lsp 5,":c/2,0,3;system\mini_menud_skip.jpg",589,419
if %nobtn=0 && %sinkouonoff=0 && %window_type=5 lsp 5,":c/2,0,3;system\mini_menue_skip.jpg",589,419
if %nobtn=0 && %sinkouonoff=0 spbtn 5,5
if %nobtn=0 && %sinkouonoff=0 && %window_type=0 lsp 5,":c/2,0,3;system\mini_menu_skip.jpg",589,419
if %nobtn=0 && %sinkouonoff=0 && %window_type=1 lsp 5,":c/2,0,3;system\mini_menu_skip.jpg",589,419
if %nobtn=0 && %sinkouonoff=0 && %window_type=2 lsp 5,":c/2,0,3;system\mini_menub_skip.jpg",589,419
if %nobtn=0 && %sinkouonoff=0 && %window_type=3 lsp 5,":c/2,0,3;system\mini_menuc_skip.jpg",589,419
if %nobtn=0 && %sinkouonoff=0 && %window_type=4 lsp 5,":c/2,0,3;system\mini_menud_skip.jpg",589,419
if %nobtn=0 && %sinkouonoff=0 && %window_type=5 lsp 5,":c/2,0,3;system\mini_menue_skip.jpg",589,419
if %nobtn=0 && %sinkouonoff=2 spbtn 5,5
if %nobtn=0 && %sinkouonoff=2 && %window_type=0 lsp 6,":c;system\mini_menu_auto_on.jpg",634,419
if %nobtn=0 && %sinkouonoff=2 && %window_type=1 lsp 6,":c;system\mini_menu_auto_on.jpg",634,419
if %nobtn=0 && %sinkouonoff=2 && %window_type=2 lsp 6,":c;system\mini_menub_auto_on.jpg",634,419
if %nobtn=0 && %sinkouonoff=2 && %window_type=3 lsp 6,":c;system\mini_menuc_auto_on.jpg",634,419
if %nobtn=0 && %sinkouonoff=2 && %window_type=4 lsp 6,":c;system\mini_menud_auto_on.jpg",634,419
if %nobtn=0 && %sinkouonoff=2 && %window_type=5 lsp 6,":c;system\mini_menue_auto_on.jpg",634,419
if %nobtn=0 && %sinkouonoff=0 && %window_type=0 lsp 6,":c/2,0,3;system\mini_menu_auto.jpg",634,419
if %nobtn=0 && %sinkouonoff=0 && %window_type=1 lsp 6,":c/2,0,3;system\mini_menu_auto.jpg",634,419
if %nobtn=0 && %sinkouonoff=0 && %window_type=2 lsp 6,":c/2,0,3;system\mini_menub_auto.jpg",634,419
if %nobtn=0 && %sinkouonoff=0 && %window_type=3 lsp 6,":c/2,0,3;system\mini_menuc_auto.jpg",634,419
if %nobtn=0 && %sinkouonoff=0 && %window_type=4 lsp 6,":c/2,0,3;system\mini_menud_auto.jpg",634,419
if %nobtn=0 && %sinkouonoff=0 && %window_type=5 lsp 6,":c/2,0,3;system\mini_menue_auto.jpg",634,419
if %nobtn=0 && %sinkouonoff=0 spbtn 6,6
if %nobtn=0 && %sinkouonoff=1 && %window_type=0 lsp 6,":c/2,0,3;system\mini_menu_auto.jpg",634,419
if %nobtn=0 && %sinkouonoff=1 && %window_type=1 lsp 6,":c/2,0,3;system\mini_menu_auto.jpg",634,419
if %nobtn=0 && %sinkouonoff=1 && %window_type=2 lsp 6,":c/2,0,3;system\mini_menub_auto.jpg",634,419
if %nobtn=0 && %sinkouonoff=1 && %window_type=3 lsp 6,":c/2,0,3;system\mini_menuc_auto.jpg",634,419
if %nobtn=0 && %sinkouonoff=1 && %window_type=4 lsp 6,":c/2,0,3;system\mini_menud_auto.jpg",634,419
if %nobtn=0 && %sinkouonoff=1 && %window_type=5 lsp 6,":c/2,0,3;system\mini_menue_auto.jpg",634,419
if %nobtn=0 && %sinkouonoff=1 spbtn 6,6
gettext $savetextget
getscreenshot 120,90
ispage %textkai
getcursorpos %textlastx,%textlasty
lsph 0,":l/2,160,0;system\cursor0.bmp",0,0
lsph 1,":l/2,160,0;system\cursor1.bmp",0,0
if %textkai=0 amsp 0,%textlastx,%textlasty+10:vsp 0,1:vsp 1,0
if %textkai=1 amsp 1,%textlastx,%textlasty+10:vsp 1,1:vsp 0,0
print 1
getenter
getcursor
getpage
getskipoff
textbtnwait %bwait
if %bwait=0 texec:vsp 0,0:vsp 1,0:print 1:return
if %bwait=-3 texec:vsp 0,0:vsp 1,0:print 1:return
if %bwait=-13 texec:vsp 0,0:vsp 1,0:print 1:return
if %bwait=-19 texec:vsp 0,0:vsp 1,0:print 1:return
if %bwait=-42 texec:vsp 0,0:vsp 1,0:print 1:return
if %bwait=-1 && %manuoff=0 textoff:vsp 0,0:vsp 1,0:print 1:mov %sel2,%hanyo1:gosub *menu
if %bwait=-10 && %manuoff=0 textoff:vsp 0,0:vsp 1,0:print 1:mov %sel2,%hanyo1:gosub *menu
if %bwait=-11 && %manuoff=0 textoff:vsp 0,0:vsp 1,0:print 1:mov %sel2,%hanyo1:gosub *menu
if %bwait=-2 textoff:vsp 0,0:vsp 1,0:print 1:gosub *backlog
if %bwait=2 textoff:gosub *window_delete
if %bwait=3 textoff:mov %saveorload,0:screen_vanish:gosub *saveload:screen_appear:print 1
if %bwait=4 && %mon_labo_on=1 return *stackret1
if %bwait=4 && %zukanon=1 return *stackret
if %bwait=4 && %zukanon=2 mov %zukanon,1:mov %hseanwave,0:return *stackret
if %bwait=4 textoff:mov %saveorload,1:screen_vanish:gosub *saveload:screen_appear:print 1
if %bwait=5 screen_clear:systemcall skip
if %bwait=6 screen_clear:automode_time %autotime:systemcall automode
if %bwait=7 textoff:gosub *backlog
if %bwait=8 textoff:gosub *config
goto *text_btn



*stackret

if %stack>0 sub %stack,1:return *stackret
textclear:textoff:goto *zukan_commonkaisou0



*stackret1

if %stack>0 sub %stack,1:return *stackret1
textoff:screen_clear:goto *monster_labo



*window_delete

textoff
btndef clear
barclear
vspl 0,611,0
print 1
btnwait %bwait
vspl 0,611,1
print 1
return



*window_delete2

textoff
btndef clear
barclear
vspl 2,611,0
print 1
btnwait %bwait
vspl 2,611,1
print 1
return



*reset

yesnobox %sub1,"Return to Title?","Confirmation"
if %sub1=0 return
if %sub1=1 lsp 0,":c;system\ef_black.jpg",0,0
print 10,1000
reset



*game_end

yesnobox %sub1,"Quit Game? ","Confirmation"
if %sub1=0 return
if %sub1=1 lsp 0,":c;system\ef_black.jpg",0,0
print 10,1000
end



*extra

btndef clear:barclear:cspl 2,500:print 1
bg black,1
goto *extra_btn



*extra_btn

mov %saveloadoff,1
btndef clear
lsp 101,":s/15,15,0;#FFFFFF#FF4444Monsterpedia ",330,170:spbtn 101,101
lsp 102,":s/15,15,0;#FFFFFF#FF4444Record ",330,190:spbtn 102,102
if %game_clear=0 lsp 103,":s/15,15,0;#bbbbbbMusic ",330,210
if %game_clear>0 lsp 103,":s/15,15,0;#FFFFFF#FF4444Music ",330,210:spbtn 103,103
lsp 104,":s/15,15,0;#FFFFFF#FF4444Special Config ",330,230:spbtn 104,104
strsp 100,"Spin-Off Stories",330,250,9,1,15,15,0,0,1,1,#FFFFFF,#FF4444:spbtn 100,100
strsp 105,"Autosave Data",330,270,8,1,15,15,0,0,1,1,#FFFFFF,#FF4444:spbtn 105,105
strsp 106,"Save Inherit",330,290,7,1,15,15,0,0,1,1,#bbbbbb
if %tougou=2 && %gloval2_story_sinkou=1 strsp 106,"Save Inherit",330,290,7,1,15,15,0,0,1,1,#FFFFFF,#FF4444:spbtn 106,106
if %gloval2_story_sinkou=2 strsp 106,"Save Inherit",330,290,7,1,15,15,0,0,1,1,#FFFFFF,#FF4444:spbtn 106,106
if %tougou<2 lsp 108,":s/15,15,0;#FFFFFF#FF4444Convert ",330,310:spbtn 108,108
if %tougou=2 lsp 108,":s/15,15,0;#bbbbbbConvert ",330,310
strsp 109,"Patched by Gamecollector, alpha 14.03",10,590,20,1,10,10,0,0,1,0,#FFFFFF
lsp 120,":c/2,0,3;system\menu_title.jpg",330,410:spbtn 120,120
lsp 121,":c;system\menu.jpg",310,150
if %game_clear>1 lsp 125,":s/15,15,0;#FFFFFF#FF4444. ",370,550:spbtn 125,125
print 1
btnwait %bwait
if %bwait=101 mov %saveloadoff,1:mov %stack,0:gosub *menu_zukan:mov %player,0:mov %saveloadoff,0:mov %zukanon,0:goto *extra
if %bwait=102 gosub *menu_kiroku:goto *extra
if %bwait=103 gosub *bgm_mode:goto *extra
if %bwait=104 mov %saveloadoff,1:mov %manuoff,1:gosub *extra_cinfig:goto *extra
if %bwait=100 mov %saveloadoff,1:mov %stack,0:gosub *monster_labo:mov %saveloadoff,0:goto *extra
if %bwait=105 mov %saveloadoff,1:mov %manuoff,1:goto *autoload
if %bwait=106 mov %saveloadoff,1:mov %manuoff,1:goto *hikitugiload
if %bwait=108 mov %saveloadoff,1:mov %manuoff,1:goto *tougou
if %bwait=125 mov %saveloadoff,1:mov %manuoff,1:goto *doppel_pre
if %bwait=120 mov %bgmplaynow,0:bgm "bgm\title.ogg":mov %saveloadoff,0:screen_clear:return *title_menu
if %bwait=-1 mov %bgmplaynow,0:bgm "bgm\title.ogg":mov %saveloadoff,0:screen_clear:return *title_menu
if %bwait=-10 mov %bgmplaynow,0:bgm "bgm\title.ogg":mov %saveloadoff,0:screen_clear:return *title_menu
if %bwait=-11 mov %bgmplaynow,0:bgm "bgm\title.ogg":mov %saveloadoff,0:screen_clear:return *title_menu
goto *extra_btn



*bgm_mode

mov %bgmpage,1
if %game_clear=1 mov %bgmtotal,47
if %game_clear=2 mov %bgmtotal,67
if %game_clear=3 mov %bgmtotal,90
mov %bgmtotal,%bgmtotal+2
btndef clear:barclear:cspl 2,500:print 1
gosub *bgm_data



*bgm_btn

btndef clear
gosub *bgm_index
gosub *bgm_bar
lsp 201,":c;system\m_title_bgm_mode.jpg",20,20
lsp 202,":c/2,0,3;system\return.bmp",20,560
spbtn 202,202
lsp 203,":a/2,0,3;system\system_cursor_up.jpg",760,0
spbtn 203,203
lsp 204,":a/2,0,3;system\system_cursor_down.jpg",760,550
spbtn 204,204
lsp 205,":c;system\system_bar.jpg",760,0
lsp 206,":c;system\system_barx_u.jpg",0,0
lsp 207,":c;system\system_barx_d.jpg",0,560
btndown 1
getpage
btnwait %bwait
if %bwait>400 && %bwait<500 gosub *bgm_click:wait 100:goto *bgm_btn
if %bwait>0 && %bwait<=%bgmtotal-11 mov %bgmpage,%bwait:goto *bgm_btn
if %bwait>%bgmtotal-11 && %bwait<=%bgmtotal mov %bgmpage,%bgmtotal-11:goto *bgm_btn
if %bwait=202 wait 100:screen_clear:return
if %bwait=-1 wait 100:screen_clear:return
if %bwait=-10 wait 100:screen_clear:return
if %bwait=-11 wait 100:screen_clear:return
if %bwait=203 && %bgmpage>1 mov %bgmpage,%bgmpage-1:wait 100
if %bwait=-2 && %bgmpage>1 mov %bgmpage,%bgmpage-1
if %bwait=-12 && %bgmpage>1 mov %bgmpage,%bgmpage-1
if %bwait=204 && %bgmpage<%bgmtotal-11 mov %bgmpage,%bgmpage+1:wait 100
if %bwait=-3 && %bgmpage<%bgmtotal-11 mov %bgmpage,%bgmpage+1
if %bwait=-13 && %bgmpage<%bgmtotal-11 mov %bgmpage,%bgmpage+1
goto *bgm_btn



*bgm_data

mov $bgmname001,"Main Theme"
mov $bgmdata001,"bgm\title.ogg"
mov $bgmname002,"Ilias "
mov $bgmdata002,"bgm\irias.ogg"
mov $bgmname003,"Ilias Village "
mov $bgmdata003,"bgm\mura1.ogg"
mov $bgmname004,"Crisis 1"
mov $bgmdata004,"bgm\kiki1.ogg"
mov $bgmname005,"Normal Battle"
mov $bgmdata005,"bgm\battle.ogg"
mov $bgmname006,"H-Scene "
mov $bgmdata006,"bgm\ero1.ogg"
mov $bgmname007,"Monster Monsterpedia "
mov $bgmdata007,"bgm\zukan.ogg"
mov $bgmname008,"Peace 1 "
mov $bgmdata008,"bgm\hutuu1.ogg"
mov $bgmname009,"Crisis 2"
mov $bgmdata009,"bgm\kiki2.ogg"
mov $bgmname010,"Alice 1 "
mov $bgmdata010,"bgm\sinpi1.ogg"
mov $bgmname011,"Alice 2 "
mov $bgmdata011,"bgm\alice1.ogg"
mov $bgmname012,"Monster Lord Battle"
mov $bgmdata012,"bgm\maou.ogg"
mov $bgmname013,"Comical "
mov $bgmdata013,"bgm\comi1.ogg"
mov $bgmname014,"Field 1 "
mov $bgmdata014,"bgm\field1.ogg"
mov $bgmname015,"Camp "
mov $bgmdata015,"bgm\yaei.ogg"
mov $bgmname016,"Boss Buildup"
mov $bgmdata016,"bgm\boss0.ogg"
mov $bgmname017,"Four Heavenly Knight Battle"
mov $bgmdata017,"bgm\sitenno.ogg"
mov $bgmname018,"Town "
mov $bgmdata018,"bgm\city1.ogg"
mov $bgmname019,"Amira "
mov $bgmdata019,"bgm\amira.ogg"
mov $bgmname020,"Dungeon 1 "
mov $bgmdata020,"bgm\dungeon1.ogg"
mov $bgmname021,"Village "
mov $bgmdata021,"bgm\mura2.ogg"
mov $bgmname022,"Boss 1"
mov $bgmdata022,"bgm\boss1.ogg"
mov $bgmname023,"Dance 1 "
mov $bgmdata023,"bgm\dance.ogg"
mov $bgmname024,"Epilogue "
mov $bgmdata024,"bgm\epilogue.ogg"
mov $bgmname025,"Enrika "
mov $bgmdata025,"bgm\enrika.ogg"
mov $bgmname026,"Tamamo "
mov $bgmdata026,"bgm\tamamo.ogg"
mov $bgmname027,"Peace 2 "
mov $bgmdata027,"bgm\hutuu2.ogg"
mov $bgmname028,"Sea "
mov $bgmdata028,"bgm\umi.ogg"
mov $bgmname029,"Field 2 "
mov $bgmdata029,"bgm\field3.ogg"
mov $bgmname030,"San Ilia Castle"
mov $bgmdata030,"bgm\castle1.ogg"
mov $bgmname031,"Library "
mov $bgmdata031,"bgm\dungeon2.ogg"
mov $bgmname032,"Under the Sea "
mov $bgmdata032,"bgm\umi2.ogg"
mov $bgmname033,"Haunted Mansion "
mov $bgmdata033,"bgm\obakeyasiki.ogg"
mov $bgmname034,"Forest of Spirits"
mov $bgmdata034,"bgm\seireinomori.ogg"
mov $bgmname035,"Four Spirits"
mov $bgmdata035,"bgm\yonseirei2.ogg"
mov $bgmname036,"Four Spirit Battle"
mov $bgmdata036,"bgm\yonseirei.ogg"
mov $bgmname037,"Boss 2"
mov $bgmdata037,"bgm\boss2.ogg"
mov $bgmname038,"Desert "
mov $bgmdata038,"bgm\sabaku.ogg"
mov $bgmname039,"Sabasa Castle Town"
mov $bgmdata039,"bgm\sabasa.ogg"
mov $bgmname040,"Sabasa Castle "
mov $bgmdata040,"bgm\castle2.ogg"
mov $bgmname041,"Pyramid "
mov $bgmdata041,"bgm\dungeon3.ogg"
mov $bgmname042,"Dance 2 "
mov $bgmdata042,"bgm\dance2.ogg"
mov $bgmname043,"Peace 3 "
mov $bgmdata043,"bgm\hutuu3.ogg"
mov $bgmname044,"Witch Hunt Village"
mov $bgmdata044,"bgm\mura3.ogg"
mov $bgmname045,"Lily's Mansion"
mov $bgmdata045,"bgm\madou1.ogg"
mov $bgmname046,"Sadness "
mov $bgmdata046,"bgm\hutuu4.ogg"
mov $bgmname047,"Safaru Ruins"
mov $bgmdata047,"bgm\safar.ogg"
if %game_clear<2 return
mov $bgmname048,"Staff Roll "
mov $bgmdata048,"bgm\ending.ogg"
mov $bgmname049,"Colosseum "
mov $bgmdata049,"bgm\colosseum.ogg"
mov $bgmname050,"Grand Noah Castle"
mov $bgmdata050,"bgm\castle3.ogg"
mov $bgmname051,"Blizzard "
mov $bgmdata051,"bgm\hubuki.ogg"
mov $bgmname052,"Yamatai Village "
mov $bgmdata052,"bgm\yamatai.ogg"
mov $bgmname053,"Plansect Village"
mov $bgmdata053,"bgm\plansect.ogg"
mov $bgmname054,"Luka (Angry)"
mov $bgmdata054,"bgm\ruka.ogg"
mov $bgmname055,"Undine's Spring"
mov $bgmdata055,"bgm\izumi.ogg"
mov $bgmname056,"Grangold Castle"
mov $bgmdata056,"bgm\castle4.ogg"
mov $bgmname057,"Gold Volcano"
mov $bgmdata057,"bgm\kazan.ogg"
mov $bgmname058,"Gold Port"
mov $bgmdata058,"bgm\gordport.ogg"
mov $bgmname059,"Black Alice "
mov $bgmdata059,"bgm\maou2.ogg"
mov $bgmname060,"Serene Mind"
mov $bgmdata060,"bgm\aqua.ogg"
mov $bgmname061,"Alice 3 "
mov $bgmdata061,"bgm\alice2.ogg"
mov $bgmname062,"Galda "
mov $bgmdata062,"bgm\galda.ogg"
mov $bgmname063,"Hellgondo "
mov $bgmdata063,"bgm\manotairiku.ogg"
mov $bgmname064,"Remina "
mov $bgmdata064,"bgm\remina.ogg"
mov $bgmname065,"Monster Lord's Castle"
mov $bgmdata065,"bgm\maouzyou.ogg"
mov $bgmname066,"Boss 3"
mov $bgmdata066,"bgm\boss3.ogg"
mov $bgmname067,"Angel Battle "
mov $bgmdata067,"bgm\boss4.ogg"
if %game_clear<3 return
mov $bgmname068,"Promestein 1"
mov $bgmdata068,"bgm\stein.ogg"
mov $bgmname069,"Promestein's Lab"
mov $bgmdata069,"bgm\labo1.ogg"
mov $bgmname070,"Sorrow 2"
mov $bgmdata070,"bgm\kanasimi1.ogg"
mov $bgmname071,"Sorrow 3"
mov $bgmdata071,"bgm\kanasimi2.ogg"
mov $bgmname072,"Charge "
mov $bgmdata072,"bgm\kiki3.ogg"
mov $bgmname073,"Field 3 "
mov $bgmdata073,"bgm\field4.ogg"
mov $bgmname074,"Deliverance "
mov $bgmdata074,"bgm\epilogue2.ogg"
mov $bgmname075,"Counterattack "
mov $bgmdata075,"bgm\battle2.ogg"
mov $bgmname076,"Monster Lord's Castle 2"
mov $bgmdata076,"bgm\maouzyou2.ogg"
mov $bgmname077,"Sabasa Suppression"
mov $bgmdata077,"bgm\sabasa2.ogg"
mov $bgmname078,"Drain Lab "
mov $bgmdata078,"bgm\labo2.ogg"
mov $bgmname079,"Biolabs "
mov $bgmdata079,"bgm\labo3.ogg"
mov $bgmname080,"World's Navel "
mov $bgmdata080,"bgm\heso.ogg"
mov $bgmname081,"Barrier Tower "
mov $bgmdata081,"bgm\tower.ogg"
mov $bgmname082,"Heaven "
mov $bgmdata082,"bgm\tenkai.ogg"
mov $bgmname083,"Eden "
mov $bgmdata083,"bgm\eden.ogg"
mov $bgmname084,"Promestein 2"
mov $bgmdata084,"bgm\stein2.ogg"
mov $bgmname085,"Black Alice 2 "
mov $bgmdata085,"bgm\maou3.ogg"
mov $bgmname086,"Black Alice 3 "
mov $bgmdata086,"bgm\maou4.ogg"
mov $bgmname087,"Ilias "
mov $bgmdata087,"bgm\irias2.ogg"
mov $bgmname088,"Final Ilias "
mov $bgmdata088,"bgm\irias3.ogg"
mov $bgmname089,"Awakening "
mov $bgmdata089,"bgm\epilogue3.ogg"
mov $bgmname090,"Credit Roll"
mov $bgmdata090,"bgm\ending2.ogg"
return



*bgm_index

if %bgmtotal>=1 lsp 301,":s/20,20,1;#FFFFFF#FF4444Config ",210,70+(40*1)-(40*%bgmpage)
if %bgmtotal>=2 lsp 302,":s/20,20,1;#FFFFFF#FF4444Stop ",210,70+(40*2)-(40*%bgmpage)
if %bgmtotal>=3 len %name_count,$bgmname001:strsp 303,$bgmname001,210,190-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %bgmtotal>=4 lsp 304,":s/20,20,1;#FFFFFF#FF4444"+$bgmname002,210,70+(40*4)-(40*%bgmpage)
if %bgmtotal>=5 lsp 305,":s/20,20,1;#FFFFFF#FF4444"+$bgmname003,210,70+(40*5)-(40*%bgmpage)
if %bgmtotal>=6 len %name_count,$bgmname004:strsp 306,$bgmname004,210,310-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %bgmtotal>=7 len %name_count,$bgmname005:strsp 307,$bgmname005,210,350-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %bgmtotal>=8 lsp 308,":s/20,20,1;#FFFFFF#FF4444"+$bgmname006,210,70+(40*8)-(40*%bgmpage)
if %bgmtotal>=9 lsp 309,":s/20,20,1;#FFFFFF#FF4444"+$bgmname007,210,70+(40*9)-(40*%bgmpage)
if %bgmtotal>=10 lsp 310,":s/20,20,1;#FFFFFF#FF4444"+$bgmname008,210,70+(40*10)-(40*%bgmpage)
if %bgmtotal>=11 len %name_count,$bgmname009:strsp 311,$bgmname009,210,510-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %bgmtotal>=12 lsp 312,":s/20,20,1;#FFFFFF#FF4444"+$bgmname010,210,70+(40*12)-(40*%bgmpage)
if %bgmtotal>=13 lsp 313,":s/20,20,1;#FFFFFF#FF4444"+$bgmname011,210,70+(40*13)-(40*%bgmpage)
if %bgmtotal>=14 len %name_count,$bgmname012:strsp 314,$bgmname012,210,630-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %bgmtotal>=15 lsp 315,":s/20,20,1;#FFFFFF#FF4444"+$bgmname013,210,70+(40*15)-(40*%bgmpage)
if %bgmtotal>=16 lsp 316,":s/20,20,1;#FFFFFF#FF4444"+$bgmname014,210,70+(40*16)-(40*%bgmpage)
if %bgmtotal>=17 lsp 317,":s/20,20,1;#FFFFFF#FF4444"+$bgmname015,210,70+(40*17)-(40*%bgmpage)
if %bgmtotal>=18 len %name_count,$bgmname016:strsp 318,$bgmname016,210,790-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %bgmtotal>=19 len %name_count,$bgmname017:strsp 319,$bgmname017,210,830-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %bgmtotal>=20 lsp 320,":s/20,20,1;#FFFFFF#FF4444"+$bgmname018,210,70+(40*20)-(40*%bgmpage)
if %bgmtotal>=21 lsp 321,":s/20,20,1;#FFFFFF#FF4444"+$bgmname019,210,70+(40*21)-(40*%bgmpage)
if %bgmtotal>=22 lsp 322,":s/20,20,1;#FFFFFF#FF4444"+$bgmname020,210,70+(40*22)-(40*%bgmpage)
if %bgmtotal>=23 lsp 323,":s/20,20,1;#FFFFFF#FF4444"+$bgmname021,210,70+(40*23)-(40*%bgmpage)
if %bgmtotal>=24 len %name_count,$bgmname022:strsp 324,$bgmname022,210,1030-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %bgmtotal>=25 lsp 325,":s/20,20,1;#FFFFFF#FF4444"+$bgmname023,210,70+(40*25)-(40*%bgmpage)
if %bgmtotal>=26 lsp 326,":s/20,20,1;#FFFFFF#FF4444"+$bgmname024,210,70+(40*26)-(40*%bgmpage)
if %bgmtotal>=27 lsp 327,":s/20,20,1;#FFFFFF#FF4444"+$bgmname025,210,70+(40*27)-(40*%bgmpage)
if %bgmtotal>=28 lsp 328,":s/20,20,1;#FFFFFF#FF4444"+$bgmname026,210,70+(40*28)-(40*%bgmpage)
if %bgmtotal>=29 lsp 329,":s/20,20,1;#FFFFFF#FF4444"+$bgmname027,210,70+(40*29)-(40*%bgmpage)
if %bgmtotal>=30 lsp 330,":s/20,20,1;#FFFFFF#FF4444"+$bgmname028,210,70+(40*30)-(40*%bgmpage)
if %bgmtotal>=31 lsp 331,":s/20,20,1;#FFFFFF#FF4444"+$bgmname029,210,70+(40*31)-(40*%bgmpage)
if %bgmtotal>=32 len %name_count,$bgmname030:strsp 332,$bgmname030,210,1350-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %bgmtotal>=33 lsp 333,":s/20,20,1;#FFFFFF#FF4444"+$bgmname031,210,70+(40*33)-(40*%bgmpage)
if %bgmtotal>=34 lsp 334,":s/20,20,1;#FFFFFF#FF4444"+$bgmname032,210,70+(40*34)-(40*%bgmpage)
if %bgmtotal>=35 lsp 335,":s/20,20,1;#FFFFFF#FF4444"+$bgmname033,210,70+(40*35)-(40*%bgmpage)
if %bgmtotal>=36 len %name_count,$bgmname034:strsp 336,$bgmname034,210,1510-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %bgmtotal>=37 len %name_count,$bgmname035:strsp 337,$bgmname035,210,1550-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %bgmtotal>=38 len %name_count,$bgmname036:strsp 338,$bgmname036,210,1590-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %bgmtotal>=39 len %name_count,$bgmname037:strsp 339,$bgmname037,210,1630-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %bgmtotal>=40 lsp 340,":s/20,20,1;#FFFFFF#FF4444"+$bgmname038,210,70+(40*40)-(40*%bgmpage)
if %bgmtotal>=41 len %name_count,$bgmname039:strsp 341,$bgmname039,210,1710-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %bgmtotal>=42 len %name_count,$bgmname040:strsp 342,$bgmname040,210,1750-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %bgmtotal>=43 lsp 343,":s/20,20,1;#FFFFFF#FF4444"+$bgmname041,210,70+(40*43)-(40*%bgmpage)
if %bgmtotal>=44 lsp 344,":s/20,20,1;#FFFFFF#FF4444"+$bgmname042,210,70+(40*44)-(40*%bgmpage)
if %bgmtotal>=45 lsp 345,":s/20,20,1;#FFFFFF#FF4444"+$bgmname043,210,70+(40*45)-(40*%bgmpage)
if %bgmtotal>=46 len %name_count,$bgmname044:strsp 346,$bgmname044,210,1910-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %bgmtotal>=47 len %name_count,$bgmname045:strsp 347,$bgmname045,210,1950-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %bgmtotal>=48 lsp 348,":s/20,20,1;#FFFFFF#FF4444"+$bgmname046,210,70+(40*48)-(40*%bgmpage)
if %bgmtotal>=49 len %name_count,$bgmname047:strsp 349,$bgmname047,210,2030-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %game_clear<2 skip 21
if %bgmtotal>=50 lsp 350,":s/20,20,1;#FFFFFF#FF4444"+$bgmname048,210,70+(40*50)-(40*%bgmpage)
if %bgmtotal>=51 lsp 351,":s/20,20,1;#FFFFFF#FF4444"+$bgmname049,210,70+(40*51)-(40*%bgmpage)
if %bgmtotal>=52 len %name_count,$bgmname050:strsp 352,$bgmname050,210,2150-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %bgmtotal>=53 lsp 353,":s/20,20,1;#FFFFFF#FF4444"+$bgmname051,210,70+(40*53)-(40*%bgmpage)
if %bgmtotal>=54 lsp 354,":s/20,20,1;#FFFFFF#FF4444"+$bgmname052,210,70+(40*54)-(40*%bgmpage)
if %bgmtotal>=55 len %name_count,$bgmname053:strsp 355,$bgmname053,210,2270-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %bgmtotal>=56 len %name_count,$bgmname054:strsp 356,$bgmname054,210,2310-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %bgmtotal>=57 len %name_count,$bgmname055:strsp 357,$bgmname055,210,2350-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %bgmtotal>=58 len %name_count,$bgmname056:strsp 358,$bgmname056,210,2390-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %bgmtotal>=59 len %name_count,$bgmname057:strsp 359,$bgmname057,210,2430-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %bgmtotal>=60 len %name_count,$bgmname058:strsp 360,$bgmname058,210,2470-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %bgmtotal>=61 lsp 361,":s/20,20,1;#FFFFFF#FF4444"+$bgmname059,210,70+(40*61)-(40*%bgmpage)
if %bgmtotal>=62 len %name_count,$bgmname060:strsp 362,$bgmname060,210,2550-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %bgmtotal>=63 lsp 363,":s/20,20,1;#FFFFFF#FF4444"+$bgmname061,210,70+(40*63)-(40*%bgmpage)
if %bgmtotal>=64 lsp 364,":s/20,20,1;#FFFFFF#FF4444"+$bgmname062,210,70+(40*64)-(40*%bgmpage)
if %bgmtotal>=65 lsp 365,":s/20,20,1;#FFFFFF#FF4444"+$bgmname063,210,70+(40*65)-(40*%bgmpage)
if %bgmtotal>=66 lsp 366,":s/20,20,1;#FFFFFF#FF4444"+$bgmname064,210,70+(40*66)-(40*%bgmpage)
if %bgmtotal>=67 len %name_count,$bgmname065:strsp 367,$bgmname065,210,2750-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %bgmtotal>=68 len %name_count,$bgmname066:strsp 368,$bgmname066,210,2790-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %bgmtotal>=69 lsp 369,":s/20,20,1;#FFFFFF#FF4444"+$bgmname067,210,70+(40*69)-(40*%bgmpage)
if %game_clear<3 skip 24
if %bgmtotal>=70 len %name_count,$bgmname068:strsp 370,$bgmname068,210,2870-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %bgmtotal>=71 len %name_count,$bgmname069:strsp 371,$bgmname069,210,2910-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %bgmtotal>=72 len %name_count,$bgmname070:strsp 372,$bgmname070,210,2950-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %bgmtotal>=73 len %name_count,$bgmname071:strsp 373,$bgmname071,210,2990-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %bgmtotal>=74 lsp 374,":s/20,20,1;#FFFFFF#FF4444"+$bgmname072,210,70+(40*74)-(40*%bgmpage)
if %bgmtotal>=75 lsp 375,":s/20,20,1;#FFFFFF#FF4444"+$bgmname073,210,70+(40*75)-(40*%bgmpage)
if %bgmtotal>=76 lsp 376,":s/20,20,1;#FFFFFF#FF4444"+$bgmname074,210,70+(40*76)-(40*%bgmpage)
if %bgmtotal>=77 lsp 377,":s/20,20,1;#FFFFFF#FF4444"+$bgmname075,210,70+(40*77)-(40*%bgmpage)
if %bgmtotal>=78 len %name_count,$bgmname076:strsp 378,$bgmname076,210,3190-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %bgmtotal>=79 len %name_count,$bgmname077:strsp 379,$bgmname077,210,3230-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %bgmtotal>=80 lsp 380,":s/20,20,1;#FFFFFF#FF4444"+$bgmname078,210,70+(40*80)-(40*%bgmpage)
if %bgmtotal>=81 lsp 381,":s/20,20,1;#FFFFFF#FF4444"+$bgmname079,210,70+(40*81)-(40*%bgmpage)
if %bgmtotal>=82 lsp 382,":s/20,20,1;#FFFFFF#FF4444"+$bgmname080,210,70+(40*82)-(40*%bgmpage)
if %bgmtotal>=83 lsp 383,":s/20,20,1;#FFFFFF#FF4444"+$bgmname081,210,70+(40*83)-(40*%bgmpage)
if %bgmtotal>=84 lsp 384,":s/20,20,1;#FFFFFF#FF4444"+$bgmname082,210,70+(40*84)-(40*%bgmpage)
if %bgmtotal>=85 lsp 385,":s/20,20,1;#FFFFFF#FF4444"+$bgmname083,210,70+(40*85)-(40*%bgmpage)
if %bgmtotal>=86 len %name_count,$bgmname084:strsp 386,$bgmname084,210,3510-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %bgmtotal>=87 lsp 387,":s/20,20,1;#FFFFFF#FF4444"+$bgmname085,210,70+(40*87)-(40*%bgmpage)
if %bgmtotal>=88 lsp 388,":s/20,20,1;#FFFFFF#FF4444"+$bgmname086,210,70+(40*88)-(40*%bgmpage)
if %bgmtotal>=89 lsp 389,":s/20,20,1;#FFFFFF#FF4444"+$bgmname087,210,70+(40*89)-(40*%bgmpage)
if %bgmtotal>=90 lsp 390,":s/20,20,1;#FFFFFF#FF4444"+$bgmname088,210,70+(40*90)-(40*%bgmpage)
if %bgmtotal>=91 lsp 391,":s/20,20,1;#FFFFFF#FF4444"+$bgmname089,210,70+(40*91)-(40*%bgmpage)
if %bgmtotal>=92 len %name_count,$bgmname090:strsp 392,$bgmname090,210,3750-(40*%bgmpage),(%name_count+1)/2+1,1,20,20,1,0,1,1,#FFFFFF,#FF4444
if %bgmtotal>=1 lsp 401,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*1)-(40*%bgmpage)
if %bgmtotal>=2 lsp 402,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*2)-(40*%bgmpage)
if %bgmtotal>=3 lsp 403,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*3)-(40*%bgmpage)
if %bgmtotal>=4 lsp 404,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*4)-(40*%bgmpage)
if %bgmtotal>=5 lsp 405,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*5)-(40*%bgmpage)
if %bgmtotal>=6 lsp 406,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*6)-(40*%bgmpage)
if %bgmtotal>=7 lsp 407,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*7)-(40*%bgmpage)
if %bgmtotal>=8 lsp 408,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*8)-(40*%bgmpage)
if %bgmtotal>=9 lsp 409,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*9)-(40*%bgmpage)
if %bgmtotal>=10 lsp 410,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*10)-(40*%bgmpage)
if %bgmtotal>=11 lsp 411,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*11)-(40*%bgmpage)
if %bgmtotal>=12 lsp 412,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*12)-(40*%bgmpage)
if %bgmtotal>=13 lsp 413,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*13)-(40*%bgmpage)
if %bgmtotal>=14 lsp 414,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*14)-(40*%bgmpage)
if %bgmtotal>=15 lsp 415,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*15)-(40*%bgmpage)
if %bgmtotal>=16 lsp 416,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*16)-(40*%bgmpage)
if %bgmtotal>=17 lsp 417,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*17)-(40*%bgmpage)
if %bgmtotal>=18 lsp 418,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*18)-(40*%bgmpage)
if %bgmtotal>=19 lsp 419,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*19)-(40*%bgmpage)
if %bgmtotal>=20 lsp 420,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*20)-(40*%bgmpage)
if %bgmtotal>=21 lsp 421,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*21)-(40*%bgmpage)
if %bgmtotal>=22 lsp 422,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*22)-(40*%bgmpage)
if %bgmtotal>=23 lsp 423,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*23)-(40*%bgmpage)
if %bgmtotal>=24 lsp 424,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*24)-(40*%bgmpage)
if %bgmtotal>=25 lsp 425,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*25)-(40*%bgmpage)
if %bgmtotal>=26 lsp 426,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*26)-(40*%bgmpage)
if %bgmtotal>=27 lsp 427,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*27)-(40*%bgmpage)
if %bgmtotal>=28 lsp 428,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*28)-(40*%bgmpage)
if %bgmtotal>=29 lsp 429,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*29)-(40*%bgmpage)
if %bgmtotal>=30 lsp 430,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*30)-(40*%bgmpage)
if %bgmtotal>=31 lsp 431,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*31)-(40*%bgmpage)
if %bgmtotal>=32 lsp 432,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*32)-(40*%bgmpage)
if %bgmtotal>=33 lsp 433,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*33)-(40*%bgmpage)
if %bgmtotal>=34 lsp 434,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*34)-(40*%bgmpage)
if %bgmtotal>=35 lsp 435,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*35)-(40*%bgmpage)
if %bgmtotal>=36 lsp 436,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*36)-(40*%bgmpage)
if %bgmtotal>=37 lsp 437,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*37)-(40*%bgmpage)
if %bgmtotal>=38 lsp 438,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*38)-(40*%bgmpage)
if %bgmtotal>=39 lsp 439,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*39)-(40*%bgmpage)
if %bgmtotal>=40 lsp 440,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*40)-(40*%bgmpage)
if %bgmtotal>=41 lsp 441,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*41)-(40*%bgmpage)
if %bgmtotal>=42 lsp 442,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*42)-(40*%bgmpage)
if %bgmtotal>=43 lsp 443,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*43)-(40*%bgmpage)
if %bgmtotal>=44 lsp 444,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*44)-(40*%bgmpage)
if %bgmtotal>=45 lsp 445,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*45)-(40*%bgmpage)
if %bgmtotal>=46 lsp 446,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*46)-(40*%bgmpage)
if %bgmtotal>=47 lsp 447,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*47)-(40*%bgmpage)
if %bgmtotal>=48 lsp 448,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*48)-(40*%bgmpage)
if %bgmtotal>=49 lsp 449,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*49)-(40*%bgmpage)
if %game_clear<2 skip 21
if %bgmtotal>=50 lsp 450,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*50)-(40*%bgmpage)
if %bgmtotal>=51 lsp 451,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*51)-(40*%bgmpage)
if %bgmtotal>=52 lsp 452,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*52)-(40*%bgmpage)
if %bgmtotal>=53 lsp 453,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*53)-(40*%bgmpage)
if %bgmtotal>=54 lsp 454,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*54)-(40*%bgmpage)
if %bgmtotal>=55 lsp 455,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*55)-(40*%bgmpage)
if %bgmtotal>=56 lsp 456,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*56)-(40*%bgmpage)
if %bgmtotal>=57 lsp 457,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*57)-(40*%bgmpage)
if %bgmtotal>=58 lsp 458,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*58)-(40*%bgmpage)
if %bgmtotal>=59 lsp 459,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*59)-(40*%bgmpage)
if %bgmtotal>=60 lsp 460,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*60)-(40*%bgmpage)
if %bgmtotal>=61 lsp 461,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*61)-(40*%bgmpage)
if %bgmtotal>=62 lsp 462,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*62)-(40*%bgmpage)
if %bgmtotal>=63 lsp 463,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*63)-(40*%bgmpage)
if %bgmtotal>=64 lsp 464,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*64)-(40*%bgmpage)
if %bgmtotal>=65 lsp 465,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*65)-(40*%bgmpage)
if %bgmtotal>=66 lsp 466,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*66)-(40*%bgmpage)
if %bgmtotal>=67 lsp 467,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*67)-(40*%bgmpage)
if %bgmtotal>=68 lsp 468,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*68)-(40*%bgmpage)
if %bgmtotal>=69 lsp 469,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*69)-(40*%bgmpage)
if %game_clear<3 skip 24
if %bgmtotal>=70 lsp 470,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*70)-(40*%bgmpage)
if %bgmtotal>=71 lsp 471,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*71)-(40*%bgmpage)
if %bgmtotal>=72 lsp 472,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*72)-(40*%bgmpage)
if %bgmtotal>=73 lsp 473,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*73)-(40*%bgmpage)
if %bgmtotal>=74 lsp 474,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*74)-(40*%bgmpage)
if %bgmtotal>=75 lsp 475,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*75)-(40*%bgmpage)
if %bgmtotal>=76 lsp 476,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*76)-(40*%bgmpage)
if %bgmtotal>=77 lsp 477,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*77)-(40*%bgmpage)
if %bgmtotal>=78 lsp 478,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*78)-(40*%bgmpage)
if %bgmtotal>=79 lsp 479,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*79)-(40*%bgmpage)
if %bgmtotal>=80 lsp 480,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*80)-(40*%bgmpage)
if %bgmtotal>=81 lsp 481,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*81)-(40*%bgmpage)
if %bgmtotal>=82 lsp 482,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*82)-(40*%bgmpage)
if %bgmtotal>=83 lsp 483,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*83)-(40*%bgmpage)
if %bgmtotal>=84 lsp 484,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*84)-(40*%bgmpage)
if %bgmtotal>=85 lsp 485,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*85)-(40*%bgmpage)
if %bgmtotal>=86 lsp 486,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*86)-(40*%bgmpage)
if %bgmtotal>=87 lsp 487,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*87)-(40*%bgmpage)
if %bgmtotal>=88 lsp 488,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*88)-(40*%bgmpage)
if %bgmtotal>=89 lsp 489,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*89)-(40*%bgmpage)
if %bgmtotal>=90 lsp 490,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*90)-(40*%bgmpage)
if %bgmtotal>=91 lsp 491,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*91)-(40*%bgmpage)
if %bgmtotal>=92 lsp 492,":a/2,0,3;system\bgm_bookmark.jpg",190,65+(40*92)-(40*%bgmpage)
if %game_clear=1 exbtn_d "P301,0P302,0P303,0P304,0P305,0P306,0P307,0P308,0P309,0P310,0P311,0P312,0P313,0P314,0P315,0P316,0P317,0P318,0P319,0P320,P321,0P322,0P323,0P324,0P325,0P326,0P327,0P328,0P329,0P330,0P331,0P332,0P333,0P334,0P335,0P336,0P337,0P338,0P339,0P340,0P341,0P342,0P343,0P344,0P345,0P346,0P347,0P348,0P349,0"
if %game_clear=2 exbtn_d "P301,0P302,0P303,0P304,0P305,0P306,0P307,0P308,0P309,0P310,0P311,0P312,0P313,0P314,0P315,0P316,0P317,0P318,0P319,0P320,P321,0P322,0P323,0P324,0P325,0P326,0P327,0P328,0P329,0P330,0P331,0P332,0P333,0P334,0P335,0P336,0P337,0P338,0P339,0P340,0P341,0P342,0P343,0P344,0P345,0P346,0P347,0P348,0P349,0P350,0P351,0P352,0P353,0P354,0P355,0P356,0P357,0P358,0P359,0P360,0P361,0P362,0P363,0P364,0P365,0P366,0P367,0P368,0P369,0"
if %game_clear=3 exbtn_d "P301,0P302,0P303,0P304,0P305,0P306,0P307,0P308,0P309,0P310,0P311,0P312,0P313,0P314,0P315,0P316,0P317,0P318,0P319,0P320,P321,0P322,0P323,0P324,0P325,0P326,0P327,0P328,0P329,0P330,0P331,0P332,0P333,0P334,0P335,0P336,0P337,0P338,0P339,0P340,0P341,0P342,0P343,0P344,0P345,0P346,0P347,0P348,0P349,0P350,0P351,0P352,0P353,0P354,0P355,0P356,0P357,0P358,0P359,0P360,0P361,0P362,0P363,0P364,0P365,0P366,0P367,0P368,0P369,0P370,0P371,0P372,0P373,0P374,0P375,0P376,0P377,0P378,0P379,0P380,0P381,0P382,0P383,0P384,0P385,0P386,0P387,0P388,0P389,0P390,0P391,0P392,0"
exbtn 401,401,"P301,1"
exbtn 402,402,"P302,1"
exbtn 403,403,"P303,1"
exbtn 404,404,"P304,1"
exbtn 405,405,"P305,1"
exbtn 406,406,"P306,1"
exbtn 407,407,"P307,1"
exbtn 408,408,"P308,1"
exbtn 409,409,"P309,1"
exbtn 410,410,"P310,1"
exbtn 411,411,"P311,1"
exbtn 412,412,"P312,1"
exbtn 413,413,"P313,1"
exbtn 414,414,"P314,1"
exbtn 415,415,"P315,1"
exbtn 416,416,"P316,1"
exbtn 417,417,"P317,1"
exbtn 418,418,"P318,1"
exbtn 419,419,"P319,1"
exbtn 420,420,"P320,1"
exbtn 421,421,"P321,1"
exbtn 422,422,"P322,1"
exbtn 423,423,"P323,1"
exbtn 424,424,"P324,1"
exbtn 425,425,"P325,1"
exbtn 426,426,"P326,1"
exbtn 427,427,"P327,1"
exbtn 428,428,"P328,1"
exbtn 429,429,"P329,1"
exbtn 430,430,"P330,1"
exbtn 431,431,"P331,1"
exbtn 432,432,"P332,1"
exbtn 433,433,"P333,1"
exbtn 434,434,"P334,1"
exbtn 435,435,"P335,1"
exbtn 436,436,"P336,1"
exbtn 437,437,"P337,1"
exbtn 438,438,"P338,1"
exbtn 439,439,"P339,1"
exbtn 440,440,"P340,1"
exbtn 441,441,"P341,1"
exbtn 442,442,"P342,1"
exbtn 443,443,"P343,1"
exbtn 444,444,"P344,1"
exbtn 445,445,"P345,1"
exbtn 446,446,"P346,1"
exbtn 447,447,"P347,1"
exbtn 448,448,"P348,1"
exbtn 449,449,"P349,1"
if %game_clear<2 skip 21
exbtn 450,450,"P350,1"
exbtn 451,451,"P351,1"
exbtn 452,452,"P352,1"
exbtn 453,453,"P353,1"
exbtn 454,454,"P354,1"
exbtn 455,455,"P355,1"
exbtn 456,456,"P356,1"
exbtn 457,457,"P357,1"
exbtn 458,458,"P358,1"
exbtn 459,459,"P359,1"
exbtn 460,460,"P360,1"
exbtn 461,461,"P361,1"
exbtn 462,462,"P362,1"
exbtn 463,463,"P363,1"
exbtn 464,464,"P364,1"
exbtn 465,465,"P365,1"
exbtn 466,466,"P366,1"
exbtn 467,467,"P367,1"
exbtn 468,468,"P368,1"
exbtn 469,469,"P369,1"
if %game_clear<3 skip 24
exbtn 470,470,"P370,1"
exbtn 471,471,"P371,1"
exbtn 472,472,"P372,1"
exbtn 473,473,"P373,1"
exbtn 474,474,"P374,1"
exbtn 475,475,"P375,1"
exbtn 476,476,"P376,1"
exbtn 477,477,"P377,1"
exbtn 478,478,"P378,1"
exbtn 479,479,"P379,1"
exbtn 480,480,"P380,1"
exbtn 481,481,"P381,1"
exbtn 482,482,"P382,1"
exbtn 483,483,"P383,1"
exbtn 484,484,"P384,1"
exbtn 485,485,"P385,1"
exbtn 486,486,"P386,1"
exbtn 487,487,"P387,1"
exbtn 488,488,"P388,1"
exbtn 489,489,"P389,1"
exbtn 490,490,"P390,1"
exbtn 491,491,"P391,1"
exbtn 492,492,"P392,1"
if %bgmplaynow>=3 lsp 208,":a;system\bgm_on.jpg",610,65+(%bgmplaynow*40)-(%bgmpage*40)
if %bgmplaynow=2 csp 208
return



*bgm_click

if %bwait=401 gosub *config:gosub *bgm_index
if %bwait=402 bgmstop
if %bwait=403 bgm $bgmdata001
if %bwait=404 bgm $bgmdata002
if %bwait=405 bgm $bgmdata003
if %bwait=406 bgm $bgmdata004
if %bwait=407 bgm $bgmdata005
if %bwait=408 bgm $bgmdata006
if %bwait=409 bgm $bgmdata007
if %bwait=410 bgm $bgmdata008
if %bwait=411 bgm $bgmdata009
if %bwait=412 bgm $bgmdata010
if %bwait=413 bgm $bgmdata011
if %bwait=414 bgm $bgmdata012
if %bwait=415 bgm $bgmdata013
if %bwait=416 bgm $bgmdata014
if %bwait=417 bgm $bgmdata015
if %bwait=418 bgm $bgmdata016
if %bwait=419 bgm $bgmdata017
if %bwait=420 bgm $bgmdata018
if %bwait=421 bgm $bgmdata019
if %bwait=422 bgm $bgmdata020
if %bwait=423 bgm $bgmdata021
if %bwait=424 bgm $bgmdata022
if %bwait=425 bgm $bgmdata023
if %bwait=426 bgm $bgmdata024
if %bwait=427 bgm $bgmdata025
if %bwait=428 bgm $bgmdata026
if %bwait=429 bgm $bgmdata027
if %bwait=430 bgm $bgmdata028
if %bwait=431 bgm $bgmdata029
if %bwait=432 bgm $bgmdata030
if %bwait=433 bgm $bgmdata031
if %bwait=434 bgm $bgmdata032
if %bwait=435 bgm $bgmdata033
if %bwait=436 bgm $bgmdata034
if %bwait=437 bgm $bgmdata035
if %bwait=438 bgm $bgmdata036
if %bwait=439 bgm $bgmdata037
if %bwait=440 bgm $bgmdata038
if %bwait=441 bgm $bgmdata039
if %bwait=442 bgm $bgmdata040
if %bwait=443 bgm $bgmdata041
if %bwait=444 bgm $bgmdata042
if %bwait=445 bgm $bgmdata043
if %bwait=446 bgm $bgmdata044
if %bwait=447 bgm $bgmdata045
if %bwait=448 bgm $bgmdata046
if %bwait=449 bgm $bgmdata047
if %game_clear<2 skip 21
if %bwait=450 bgm $bgmdata048
if %bwait=451 bgm $bgmdata049
if %bwait=452 bgm $bgmdata050
if %bwait=453 bgm $bgmdata051
if %bwait=454 bgm $bgmdata052
if %bwait=455 bgm $bgmdata053
if %bwait=456 bgm $bgmdata054
if %bwait=457 bgm $bgmdata055
if %bwait=458 bgm $bgmdata056
if %bwait=459 bgm $bgmdata057
if %bwait=460 bgm $bgmdata058
if %bwait=461 bgm $bgmdata059
if %bwait=462 bgm $bgmdata060
if %bwait=463 bgm $bgmdata061
if %bwait=464 bgm $bgmdata062
if %bwait=465 bgm $bgmdata063
if %bwait=466 bgm $bgmdata064
if %bwait=467 bgm $bgmdata065
if %bwait=468 bgm $bgmdata066
if %bwait=469 bgm $bgmdata067
if %game_clear<3 skip 24
if %bwait=470 bgm $bgmdata068
if %bwait=471 bgm $bgmdata069
if %bwait=472 bgm $bgmdata070
if %bwait=473 bgm $bgmdata071
if %bwait=474 bgm $bgmdata072
if %bwait=475 bgm $bgmdata073
if %bwait=476 bgm $bgmdata074
if %bwait=477 bgm $bgmdata075
if %bwait=478 bgm $bgmdata076
if %bwait=479 bgm $bgmdata077
if %bwait=480 bgm $bgmdata078
if %bwait=481 bgm $bgmdata079
if %bwait=482 bgm $bgmdata080
if %bwait=483 bgm $bgmdata081
if %bwait=484 bgm $bgmdata082
if %bwait=485 bgm $bgmdata083
if %bwait=486 bgm $bgmdata084
if %bwait=487 bgm $bgmdata085
if %bwait=488 bgm $bgmdata086
if %bwait=489 bgm $bgmdata087
if %bwait=490 bgm $bgmdata088
if %bwait=491 bgm $bgmdata089
if %bwait=492 bgm $bgmdata090
if %bwait>=402 mov %bgmplaynow,%bwait-400
return



*bgm_bar

mov %bgmbarone,48000/%bgmtotal
if %bgmtotal=1 mov %bgmbarone2,%bgmbarone*1
if %bgmtotal=2 mov %bgmbarone2,%bgmbarone*2
if %bgmtotal=3 mov %bgmbarone2,%bgmbarone*3
if %bgmtotal=4 mov %bgmbarone2,%bgmbarone*4
if %bgmtotal=5 mov %bgmbarone2,%bgmbarone*5
if %bgmtotal=6 mov %bgmbarone2,%bgmbarone*6
if %bgmtotal=7 mov %bgmbarone2,%bgmbarone*7
if %bgmtotal=8 mov %bgmbarone2,%bgmbarone*8
if %bgmtotal=9 mov %bgmbarone2,%bgmbarone*9
if %bgmtotal=10 mov %bgmbarone2,%bgmbarone*10
if %bgmtotal=11 mov %bgmbarone2,%bgmbarone*11
if %bgmtotal>=12 mov %bgmbarone2,%bgmbarone*12
mov %bgmbary,48000-%bgmbarone*(%bgmtotal-%bgmpage+1)
mov %bgmbary,%bgmbary+6000
bar 0,1,767,%bgmbary/100,16,%bgmbarone2/100,1,#DDDDDD
for %sub1=1 to %bgmtotal step 1
btn %sub1,740,(%bgmbarone*(%sub1-1)+6000)/100,60,%bgmbarone,0,0
next
return



*extra_cinfig

screen_clear
screen_clear2
bg black,1
bgm "bgm\irias.ogg"
gosub *setwindow_01
lsp 700,":a;chara\iriasu_st01.bmp",0,0
bg "BG\bg001.bmp",10,1500
name "Ilias"
>You can change the following settings.\
name ""
saveoff
textoff
mov %sinkoumode,0:skipoff:autoclick 0
goto *extra_cinfig_cmd



*extra_cinfig_cmd

cspl 3,7
csp 611
btndef clear
gosub *setwindow_05
strsp 501,"Battle Message Speed",50,80,11,1,20,20,0,0,1,1,#FFFFFF
if %battle_auto=0 lsp 502,":s/20,20,0;#FFFFFFNormal ",330,80
if %battle_auto=1 lsp 502,":s/20,20,0;#bbbbbb#FF4444Normal ",330,80:spbtn 502,12
if %battle_auto=1 lsp 503,":s/20,20,0;#FFFFFFAuto ",410,80
if %battle_auto=0 lsp 503,":s/20,20,0;#bbbbbb#FF4444Auto ",410,80:spbtn 503,13
strsp 504,"Skip seen H-Scenes?",50,120,11,1,20,20,0,0,1,1,#FFFFFF
if %hsean_cut=0 lsp 505,":s/20,20,0;#FFFFFFOff ",330,120
notif %hsean_cut=0 lsp 505,":s/20,20,0;#bbbbbb#FF4444Off ",330,120:spbtn 505,14
if %hsean_cut=1 lsp 506,":s/20,20,0;#FFFFFFOn ",410,120
notif %hsean_cut=1 lsp 506,":s/20,20,0;#bbbbbb#FF4444On ",410,120:spbtn 506,15
if %hsean_cut=2 lsp 507,":s/20,20,0;#FFFFFFPrompt ",490,120
notif %hsean_cut=2 lsp 507,":s/20,20,0;#bbbbbb#FF4444Prompt ",490,120:spbtn 507,16
strsp 508,"Vore Scenes",50,160,7,1,20,20,0,0,1,1,#FFFFFF
if %hosyoku_cut=0 lsp 509,":s/20,20,0;#FFFFFFOn ",250,160
if %hosyoku_cut=1 lsp 509,":s/20,20,0;#bbbbbb#FF4444On ",250,160:spbtn 509,17
if %hosyoku_cut=1 lsp 510,":s/20,20,0;#FFFFFFOff ",330,160
if %hosyoku_cut=0 lsp 510,":s/20,20,0;#bbbbbb#FF4444Off ",330,160:spbtn 510,18
strsp 514,"Window Type",50,200,7,1,20,20,0,0,1,1,#FFFFFF
if %window_type=0 lsp 515,":s/20,20,0;#FFFFFFP",250,200
notif %window_type=0 lsp 515,":s/20,20,0;#bbbbbb#FF4444P",250,200:spbtn 515,21
if %window_type=1 lsp 516,":s/20,20,0;#FFFFFFQ",310,200
notif %window_type=1 lsp 516,":s/20,20,0;#bbbbbb#FF4444Q",310,200:spbtn 516,22
if %window_type=2 lsp 523,":s/20,20,0;#FFFFFFR",370,200
notif %window_type=2 lsp 523,":s/20,20,0;#bbbbbb#FF4444R",370,200:spbtn 523,27
if %window_type=3 lsp 524,":s/20,20,0;#FFFFFFS",430,200
notif %window_type=3 lsp 524,":s/20,20,0;#bbbbbb#FF4444S",430,200:spbtn 524,28
if %window_type=4 lsp 525,":s/20,20,0;#FFFFFFT",490,200
notif %window_type=4 lsp 525,":s/20,20,0;#bbbbbb#FF4444T",490,200:spbtn 525,29
if %window_type=5 lsp 526,":s/20,20,0;#FFFFFFU",550,200
notif %window_type=5 lsp 526,":s/20,20,0;#bbbbbb#FF4444U",550,200:spbtn 526,30
lsp 517,":s/20,20,0;#FFFFFFH-Scene BGM ",50,240
if %con_hbgm=0 lsp 518,":s/20,20,0;#FFFFFFOn ",250,240
if %con_hbgm=1 lsp 518,":s/20,20,0;#bbbbbb#FF4444On ",250,240:spbtn 518,23
if %con_hbgm=1 lsp 519,":s/20,20,0;#FFFFFFOff ",330,240
if %con_hbgm=0 lsp 519,":s/20,20,0;#bbbbbb#FF4444Off ",330,240:spbtn 519,24
lsp 520,":s/20,20,0;#FFFFFFH-Scene SE ",50,280
if %con_hse=0 lsp 521,":s/20,20,0;#FFFFFFOn ",250,280
if %con_hse=1 lsp 521,":s/20,20,0;#bbbbbb#FF4444On ",250,280:spbtn 521,25
if %con_hse=1 lsp 522,":s/20,20,0;#FFFFFFOff ",330,280
if %con_hse=0 lsp 522,":s/20,20,0;#bbbbbb#FF4444Off ",330,280:spbtn 522,26
lsp 527,":s/20,20,0;#FFFFFFH-Scene Voice ",50,320
if %con_hvoice=0 lsp 528,":s/20,20,0;#FFFFFFOn ",250,320
if %con_hvoice=1 lsp 528,":s/20,20,0;#bbbbbb#FF4444On ",250,320:spbtn 528,31
if %con_hvoice=1 lsp 529,":s/20,20,0;#FFFFFFOff ",330,320
if %con_hvoice=0 lsp 529,":s/20,20,0;#bbbbbb#FF4444Off ",330,320:spbtn 529,32
lsp 512,":s/20,20,0;#FFFFFF#FF4444Explanation ",50,440:spbtn 512,19
lsp 513,":s/20,20,0;#FFFFFF#FF4444Apply ",50,480:spbtn 513,20
goto *extra_cinfig_cmd2



*extra_cinfig_cmd2

btnwait2 %cmd1
if %cmd1=12 mov %battle_auto,0:goto *extra_cinfig_cmd
if %cmd1=13 mov %battle_auto,1:goto *extra_cinfig_cmd
if %cmd1=14 mov %hsean_cut,0:goto *extra_cinfig_cmd
if %cmd1=15 mov %hsean_cut,1:goto *extra_cinfig_cmd
if %cmd1=16 mov %hsean_cut,2:goto *extra_cinfig_cmd
if %cmd1=17 mov %hosyoku_cut,0:goto *extra_cinfig_cmd
if %cmd1=18 mov %hosyoku_cut,1:goto *extra_cinfig_cmd
if %cmd1=21 mov %window_type,0:goto *extra_cinfig_cmd
if %cmd1=22 mov %window_type,1:goto *extra_cinfig_cmd
if %cmd1=27 mov %window_type,2:goto *extra_cinfig_cmd
if %cmd1=28 mov %window_type,3:goto *extra_cinfig_cmd
if %cmd1=29 mov %window_type,4:goto *extra_cinfig_cmd
if %cmd1=30 mov %window_type,5:goto *extra_cinfig_cmd
if %cmd1=23 mov %con_hbgm,0:goto *extra_cinfig_cmd
if %cmd1=24 mov %con_hbgm,1:goto *extra_cinfig_cmd
if %cmd1=25 mov %con_hse,0:goto *extra_cinfig_cmd
if %cmd1=26 mov %con_hse,1:goto *extra_cinfig_cmd
if %cmd1=31 mov %con_hvoice,0:goto *extra_cinfig_cmd
if %cmd1=32 mov %con_hvoice,1:goto *extra_cinfig_cmd
if %cmd1=19 goto *extra_cinfig_kaisetu
if %cmd1=20 goto *extra_cinfig_end
if %cmd1=-1 goto *extra_cinfig_end
if %cmd1=10 goto *extra_cinfig_end
if %cmd1=11 goto *extra_cinfig_end
goto *extra_cinfig_cmd2



*extra_cinfig_kaisetu

cspl 501,600
gosub *setwindow_01p
texton
btndef clear
name "Ilias"
>[Battle Message Speed] Adjusts the text in battle.\
>[Normal] Sets it to act like it does during the story.@
>[Auto] Automatically continues with the text, like a normal RPG.\
>[Skip Seen H-Scene] Will skip scenes you've seen before if set to on, and will prompt you each time if set to prompt.\
>Finally [Vore Scenes].@
>During the game, there are some monsters who want to eat Luka.\
>Though they aren't particularly gory or violent, some may still wish to avoid these scenes altogether.\
>If you set it to [On], the vore scenes will be displayed.@
>If set to off, it will automatically skip them.\
>If you skip the scene, it will still be displayed in the Encyclopedia as if you watched it, so don't worry.\
>That's the end of my explanation.\
name ""
goto *extra_cinfig_cmd



*extra_cinfig_end

cspl 501,600
gosub *setwindow_01p
texton
btndef clear
name "Ilias"
>Remember Luka, I will always be watching over you. Even in the configuration screen.\
name ""
screen_clear
screen_clear2
bg black,10,1000
mov %saveloadoff,0
mov %manuoff,0
bgm "bgm\zukan.ogg"
return



*autoload

screen_clear
screen_clear2
bg black,1
bgm "bgm\irias.ogg"
gosub *setwindow_01
lsp 700,":a;chara\iriasu_st01.bmp",0,0
bg "BG\bg001.bmp",10,1500
name "Ilias"
>This is where you can load data from the autosave location.\
>The current location is...@
if %gloval1_story_sinkou=0 goto *autoload3
if %gloval1_story_sinkou<11 && %tougou<2 goto *autoload4
if %gloval1_story_sinkou=1 && %tougou=2 mov $sel1,"Iliasburg"
if %gloval1_story_sinkou=2 && %tougou=2 mov $sel1,"Port Natalia"
if %gloval1_story_sinkou=3 && %tougou=2 mov $sel1,"San Ilia Castle"
if %gloval1_story_sinkou=4 && %tougou=2 mov $sel1,"Forest of Spirits"
if %gloval1_story_sinkou=5 && %tougou=2 mov $sel1,"Sabasa Castle"
if %gloval1_story_sinkou=6 && %tougou=2 mov $sel1,"Grand Noah Castle"
if %gloval1_story_sinkou=7 && %tougou=2 mov $sel1,"Undine's Spring"
if %gloval1_story_sinkou=8 && %tougou=2 mov $sel1,"Grangold Castle"
if %gloval1_story_sinkou=9 && %tougou=2 mov $sel1,"Gold Port"
if %gloval1_story_sinkou=10 && %tougou=2 mov $sel1,"Hellgondo"
if %gloval1_story_sinkou=11 mov $sel1,"Remina Laboratory"
if %gloval1_story_sinkou=12 mov $sel1,"Ilias Village"
if %gloval1_story_sinkou=13 mov $sel1,"Ilias Continent"
if %gloval1_story_sinkou=14 mov $sel1,"Natalia Region"
if %gloval1_story_sinkou=15 mov $sel1,"Sabasa Region"
if %gloval1_story_sinkou=16 mov $sel1,"Noah Region"
if %gloval1_story_sinkou=17 mov $sel1,"Gold Region"
if %gloval1_story_sinkou=18 mov $sel1,"Monster Lord's Castle"
if %gloval1_story_sinkou=19 mov $sel1,"Monster Lord's Castle"
if %gloval1_story_sinkou=20 mov $sel1,"Heavens"
if %gloval1_story_sinkou=21 mov $sel1,"Ending"
itoa $sel2,%gloval1_mylv
eng $sel1+"at level "+$sel2+"."
$sel6\
>Do you wish to load from this location?\
name ""
csel "No",*autoload2,"Yes",*autoload1



*autoload2

name "Ilias"
>Understood.@
>Then, back to the title screen...\
name ""
screen_clear
screen_clear2
bg black,10,1000
mov %saveloadoff,0
mov %manuoff,0
bgm "bgm\title.ogg"
return



*autoload3

>...It seems as though it doesn't exist yet.\
>Until you advance the story, there won't be any autosave data.@
>Then, back to the title screen...\
name ""
screen_clear
screen_clear2
bg black,10,1000
mov %saveloadoff,0
mov %manuoff,0
bgm "bgm\title.ogg"
return



*autoload4

>This is data in a previous chapter.@
>It cannot be loaded without integrating the chapters.\
>Then, back to the title screen...\
name ""
screen_clear
screen_clear2
bg black,10,1000
mov %saveloadoff,0
mov %manuoff,0
bgm "bgm\title.ogg"
return



*autoload1

name "Ilias"
>Understood.@
>Then, to the auto-save location...\
name ""
bgmstop
screen_clear
screen_clear2
bg black,10,1000
mov %mylv,%gloval1_mylv
mov %exp,%gloval1_exp
mov %ivent01,%gloval1_ivent01
mov %ivent02,%gloval1_ivent02
mov %ivent03,%gloval1_ivent03
mov %ivent04,%gloval1_ivent04
mov %ivent05,%gloval1_ivent05
mov %ivent06,%gloval1_ivent06
mov %ivent07,%gloval1_ivent07
mov %ivent08,%gloval1_ivent08
mov %ivent09,%gloval1_ivent09
mov %ivent10,%gloval1_ivent10
mov %ivent11,%gloval1_ivent11
mov %ivent12,%gloval1_ivent12
mov %ivent13,%gloval1_ivent13
mov %ivent14,%gloval1_ivent14
mov %ivent15,%gloval1_ivent15
mov %ivent16,%gloval1_ivent16
mov %ivent17,%gloval1_ivent17
mov %ivent18,%gloval1_ivent18
mov %ivent19,%gloval1_ivent19
mov %ivent20,%gloval1_ivent20
mov %check01,%gloval1_check01
mov %check02,%gloval1_check02
mov %check03,%gloval1_check03
mov %check04,%gloval1_check04
mov %check05,%gloval1_check05
mov %check06,%gloval1_check06
mov %check07,%gloval1_check07
mov %check08,%gloval1_check08
mov %check09,%gloval1_check09
mov %check10,%gloval1_check10
mov %check11,%gloval1_check11
mov %check12,%gloval1_check12
mov %check13,%gloval1_check13
mov %check14,%gloval1_check14
mov %check15,%gloval1_check15
mov %check16,%gloval1_check16
mov %check17,%gloval1_check17
mov %check18,%gloval1_check18
mov %check19,%gloval1_check19
mov %check20,%gloval1_check20
mov %skill01,%gloval1_skill01
mov %skill02,%gloval1_skill02
mov %skill03,%gloval1_skill03
mov %skill04,%gloval1_skill04
mov %skill05,%gloval1_skill05
mov %skill06,%gloval1_skill06
mov %skill07,%gloval1_skill07
mov %skill08,%gloval1_skill08
mov %skill09,%gloval1_skill09
mov %skill10,%gloval1_skill10
mov %item01,%gloval1_item01
mov %item02,%gloval1_item02
mov %item03,%gloval1_item03
mov %item04,%gloval1_item04
mov %item05,%gloval1_item05
mov %item06,%gloval1_item06
mov %item07,%gloval1_item07
mov %item08,%gloval1_item08
mov %item09,%gloval1_item09
mov %item10,%gloval1_item10
mov %item11,%gloval1_item11
mov %item12,%gloval1_item12
mov %item13,%gloval1_item13
mov %item14,%gloval1_item14
mov %item15,%gloval1_item15
mov %item16,%gloval1_item16
mov %item17,%gloval1_item17
mov %item18,%gloval1_item18
mov %item19,%gloval1_item19
mov %item20,%gloval1_item20
mov %item21,%gloval1_item21
mov %item22,%gloval1_item22
mov %item23,%gloval1_item23
mov %item24,%gloval1_item24
mov %item25,%gloval1_item25
mov %item26,%gloval1_item26
mov %item27,%gloval1_item27
mov %item28,%gloval1_item28
mov %item29,%gloval1_item29
mov %item30,%gloval1_item30
mov %nanido,%gloval1_nanido
mov %saveloadoff,0
mov %manuoff,0
mov %storyon,1
if %gloval1_story_sinkou=1 mov %ruka_tati,0:mov %genzaiti,1:bgm "bgm\field1.ogg":return *map1
if %gloval1_story_sinkou=2 mov %ruka_tati,0:return *sean0090a
if %gloval1_story_sinkou=3 mov %ruka_tati,0:mov %genzaiti,5:bgm "bgm\field3.ogg":return *map2
if %gloval1_story_sinkou=4 mov %ruka_tati,0:bgm "bgm\field3.ogg":return *sean0130
if %gloval1_story_sinkou=5 mov %ruka_tati,0:mov %genzaiti,7:bgm "bgm\sabaku.ogg":return *map3
if %gloval1_story_sinkou=6 mov %ruka_tati,1:mov %genzaiti,9:bgm "bgm\field3.ogg":return *map4
if %gloval1_story_sinkou=7 mov %ruka_tati,1:bgm "bgm\field3.ogg":return *sean0199
if %gloval1_story_sinkou=8 mov %ruka_tati,1:mov %genzaiti,12:bgm "bgm\field3.ogg":return *map5
if %gloval1_story_sinkou=9 mov %ruka_tati,1:mov %genzaiti,19:bgm "bgm\field3.ogg":return *map6
if %gloval1_story_sinkou=10 mov %ruka_tati,1:mov %genzaiti,16:bgm "bgm\manotairiku.ogg":return *map7
if %gloval1_story_sinkou=11 mov %ruka_tati,2:return *sean0308s
if %gloval1_story_sinkou=12 mov %ruka_tati,2:return *sean0311s
if %gloval1_story_sinkou=13 mov %ruka_tati,2:bgm "bgm\field4.ogg":return *map8
if %gloval1_story_sinkou=14 mov %ruka_tati,2:bgm "bgm\field4.ogg":return *map9
if %gloval1_story_sinkou=15 mov %ruka_tati,2:bgm "bgm\field4.ogg":return *map10
if %gloval1_story_sinkou=16 mov %ruka_tati,2:bgm "bgm\field4.ogg":return *map11
if %gloval1_story_sinkou=17 mov %ruka_tati,2:bgm "bgm\field4.ogg":return *map12
if %gloval1_story_sinkou=18 mov %ruka_tati,2:bgm "bgm\field4.ogg":return *map13
if %gloval1_story_sinkou=19 mov %ruka_tati,2:return *sean0398s
if %gloval1_story_sinkou=20 mov %ruka_tati,2:return *sean0408s
if %gloval1_story_sinkou=21 mov %ruka_tati,2:bgm "bgm\field4.ogg":return *maped



*hikitugiload

screen_clear
screen_clear2
bg black,1
gosub *setwindow_01
lsp 700,":a;chara\iriasu_st01.bmp",0,0
bg "BG\bg001.bmp",10,1500
name "Ilias"
if %gloval2_story_sinkou=1 skip 4
>Load cleared data from Part 2.\
>Do you wish to load the stored clear data in the gloval.sav file, and start the game in the final chapter?\
skip 3
>Load cleared data from Part 1.\
>Do you wish to load the stored clear data in the gloval.sav file, and start the game in the second chapter?\
name ""
csel "No",*hikitugiload2,"Yes",*hikitugiload1



*hikitugiload2

name "Ilias"
>Understood.@
>Back to the title screen...\
name ""
screen_clear
screen_clear2
bg black,10,1000
mov %saveloadoff,0
mov %manuoff,0
bgm "bgm\title.ogg"
return



*hikitugiload1

if %gloval2_story_sinkou=1 goto *hikitugiload4
name "Ilias"
>Understood.@
>Now to load the final chapter...\
name ""
bgmstop
screen_clear
screen_clear2
bg black,10,1000
if %tougou=2 goto *hikitugiload3
mov %mylv,%gloval2_mylv
mov %exp,%gloval2_exp
mov %ivent01,%gloval2_ivent01
mov %ivent02,%gloval2_ivent02
mov %ivent03,%gloval2_ivent03
mov %ivent04,%gloval2_ivent04
mov %ivent05,%gloval2_ivent05
mov %ivent06,%gloval2_ivent06
mov %ivent07,%gloval2_ivent07
mov %ivent08,%gloval2_ivent08
mov %ivent09,%gloval2_ivent09
mov %ivent10,%gloval2_ivent10
mov %ivent11,%gloval2_ivent11
mov %ivent12,%gloval2_ivent12
mov %ivent13,%gloval2_ivent13
mov %ivent14,%gloval2_ivent14
mov %ivent15,%gloval2_ivent15
mov %ivent16,%gloval2_ivent16
mov %ivent17,%gloval2_ivent17
mov %ivent18,%gloval2_ivent18
mov %ivent19,%gloval2_ivent19
mov %ivent20,%gloval2_ivent20
mov %check01,%gloval2_check01
mov %check02,%gloval2_check02
mov %check03,%gloval2_check03
mov %check04,%gloval2_check04
mov %check05,%gloval2_check05
mov %check06,%gloval2_check06
mov %check07,%gloval2_check07
mov %check08,%gloval2_check08
mov %check09,%gloval2_check09
mov %check10,%gloval2_check10
mov %check11,%gloval2_check11
mov %check12,%gloval2_check12
mov %check13,%gloval2_check13
mov %check14,%gloval2_check14
mov %check15,%gloval2_check15
mov %check16,%gloval2_check16
mov %check17,%gloval2_check17
mov %check18,%gloval2_check18
mov %check19,%gloval2_check19
mov %check20,%gloval2_check20
mov %skill01,%gloval2_skill01
mov %skill02,%gloval2_skill02
mov %skill03,%gloval2_skill03
mov %skill04,%gloval2_skill04
mov %skill05,%gloval2_skill05
mov %skill06,%gloval2_skill06
mov %skill07,%gloval2_skill07
mov %skill08,%gloval2_skill08
mov %skill09,%gloval2_skill09
mov %skill10,%gloval2_skill10
mov %item01,%gloval2_item01
mov %item02,%gloval2_item02
mov %item03,%gloval2_item03
mov %item04,%gloval2_item04
mov %item05,%gloval2_item05
mov %item06,%gloval2_item06
mov %item07,%gloval2_item07
mov %item08,%gloval2_item08
mov %item09,%gloval2_item09
mov %item10,%gloval2_item10
mov %item11,%gloval2_item11
mov %item12,%gloval2_item12
mov %item13,%gloval2_item13
mov %item14,%gloval2_item14
mov %item15,%gloval2_item15
mov %item16,%gloval2_item16
mov %item17,%gloval2_item17
mov %item18,%gloval2_item18
mov %item19,%gloval2_item19
mov %item20,%gloval2_item20
mov %item21,%gloval2_item21
mov %item22,%gloval2_item22
mov %item23,%gloval2_item23
mov %item24,%gloval2_item24
mov %item25,%gloval2_item25
mov %item26,%gloval2_item26
mov %item27,%gloval2_item27
mov %item28,%gloval2_item28
mov %item29,%gloval2_item29
mov %item30,%gloval2_item30
mov %nanido,%gloval2_nanido
mov %saveloadoff,0
mov %manuoff,0
mov %storyon,1
return *sean_restart2



*hikitugiload3

mov %mylv,%gloval2_mylv
mov %exp,%gloval2_exp
mov %ivent01,%gloval2_ivent01
mov %ivent02,%gloval2_ivent02
mov %ivent03,%gloval2_ivent03
mov %ivent04,%gloval2_ivent04
mov %ivent05,%gloval2_ivent05
mov %ivent06,%gloval2_ivent06
mov %ivent07,%gloval2_ivent07
mov %ivent08,%gloval2_ivent08
mov %ivent09,%gloval2_ivent09
mov %ivent10,%gloval2_ivent10
mov %ivent11,%gloval2_ivent11
mov %ivent12,%gloval2_ivent12
mov %ivent13,%gloval2_ivent13
mov %ivent14,%gloval2_ivent14
mov %ivent15,%gloval2_ivent15
mov %ivent16,%gloval2_ivent16
mov %ivent17,%gloval2_ivent17
mov %ivent18,%gloval2_ivent18
mov %ivent19,%gloval2_ivent19
mov %ivent20,%gloval2_ivent20
mov %check01,%gloval2_check01
mov %check02,%gloval2_check02
mov %check03,%gloval2_check03
mov %check04,%gloval2_check04
mov %check05,%gloval2_check05
mov %check06,%gloval2_check06
mov %check07,%gloval2_check07
mov %check08,%gloval2_check08
mov %check09,%gloval2_check09
mov %check10,%gloval2_check10
mov %check11,%gloval2_check11
mov %check12,%gloval2_check12
mov %check13,%gloval2_check13
mov %check14,%gloval2_check14
mov %check15,%gloval2_check15
mov %check16,%gloval2_check16
mov %check17,%gloval2_check17
mov %check18,%gloval2_check18
mov %check19,%gloval2_check19
mov %check20,%gloval2_check20
mov %skill01,%gloval2_skill01
mov %skill02,%gloval2_skill02
mov %skill03,%gloval2_skill03
mov %skill04,%gloval2_skill04
mov %skill05,%gloval2_skill05
mov %skill06,%gloval2_skill06
mov %skill07,%gloval2_skill07
mov %skill08,%gloval2_skill08
mov %skill09,%gloval2_skill09
mov %skill10,%gloval2_skill10
mov %item01,%gloval2_item01
mov %item02,%gloval2_item02
mov %item03,%gloval2_item03
mov %item04,%gloval2_item04
mov %item05,%gloval2_item05
mov %item06,%gloval2_item06
mov %item07,%gloval2_item07
mov %item08,%gloval2_item08
mov %item09,%gloval2_item09
mov %item10,%gloval2_item10
mov %item11,%gloval2_item11
mov %item12,%gloval2_item12
mov %item13,%gloval2_item13
mov %item14,%gloval2_item14
mov %item15,%gloval2_item15
mov %item16,%gloval2_item16
mov %item17,%gloval2_item17
mov %item18,%gloval2_item18
mov %item19,%gloval2_item19
mov %item20,%gloval2_item20
mov %item21,%gloval2_item21
mov %item22,%gloval2_item22
mov %item23,%gloval2_item23
mov %item24,%gloval2_item24
mov %item25,%gloval2_item25
mov %item26,%gloval2_item26
mov %item27,%gloval2_item27
mov %item28,%gloval2_item28
mov %item29,%gloval2_item29
mov %item30,%gloval2_item30
mov %nanido,%gloval2_nanido
mov %saveloadoff,0
mov %manuoff,0
mov %storyon,1
mov %tougou,2
return *sean_restart2



*hikitugiload4

name "Ilias"
>Understood.@
>Now to load the second chapter...\
name ""
bgmstop
screen_clear
screen_clear2
bg black,10,1000
mov %mylv,%gloval2_mylv
mov %exp,%gloval2_exp
mov %ivent01,%gloval2_ivent01
mov %ivent02,%gloval2_ivent02
mov %ivent03,%gloval2_ivent03
mov %ivent04,%gloval2_ivent04
mov %ivent05,%gloval2_ivent05
mov %ivent06,%gloval2_ivent06
mov %ivent07,%gloval2_ivent07
mov %ivent08,%gloval2_ivent08
mov %ivent09,%gloval2_ivent09
mov %ivent10,%gloval2_ivent10
mov %ivent11,%gloval2_ivent11
mov %ivent12,%gloval2_ivent12
mov %ivent13,%gloval2_ivent13
mov %ivent14,%gloval2_ivent14
mov %ivent15,%gloval2_ivent15
mov %ivent16,%gloval2_ivent16
mov %ivent17,%gloval2_ivent17
mov %ivent18,%gloval2_ivent18
mov %ivent19,%gloval2_ivent19
mov %ivent20,%gloval2_ivent20
mov %check01,%gloval2_check01
mov %check02,%gloval2_check02
mov %check03,%gloval2_check03
mov %check04,%gloval2_check04
mov %check05,%gloval2_check05
mov %check06,%gloval2_check06
mov %check07,%gloval2_check07
mov %check08,%gloval2_check08
mov %check09,%gloval2_check09
mov %check10,%gloval2_check10
mov %check11,%gloval2_check11
mov %check12,%gloval2_check12
mov %check13,%gloval2_check13
mov %check14,%gloval2_check14
mov %check15,%gloval2_check15
mov %check16,%gloval2_check16
mov %check17,%gloval2_check17
mov %check18,%gloval2_check18
mov %check19,%gloval2_check19
mov %check20,%gloval2_check20
mov %skill01,%gloval2_skill01
mov %skill02,%gloval2_skill02
mov %skill03,%gloval2_skill03
mov %skill04,%gloval2_skill04
mov %skill05,%gloval2_skill05
mov %skill06,%gloval2_skill06
mov %skill07,%gloval2_skill07
mov %skill08,%gloval2_skill08
mov %skill09,%gloval2_skill09
mov %skill10,%gloval2_skill10
mov %item01,%gloval2_item01
mov %item02,%gloval2_item02
mov %item03,%gloval2_item03
mov %item04,%gloval2_item04
mov %item05,%gloval2_item05
mov %item06,%gloval2_item06
mov %item07,%gloval2_item07
mov %item08,%gloval2_item08
mov %item09,%gloval2_item09
mov %item10,%gloval2_item10
mov %item11,%gloval2_item11
mov %item12,%gloval2_item12
mov %item13,%gloval2_item13
mov %item14,%gloval2_item14
mov %item15,%gloval2_item15
mov %item16,%gloval2_item16
mov %item17,%gloval2_item17
mov %item18,%gloval2_item18
mov %item19,%gloval2_item19
mov %item20,%gloval2_item20
mov %item21,%gloval2_item21
mov %item22,%gloval2_item22
mov %item23,%gloval2_item23
mov %item24,%gloval2_item24
mov %item25,%gloval2_item25
mov %item26,%gloval2_item26
mov %item27,%gloval2_item27
mov %item28,%gloval2_item28
mov %item29,%gloval2_item29
mov %item30,%gloval2_item30
mov %nanido,%gloval2_nanido
mov %saveloadoff,0
mov %manuoff,0
mov %storyon,1
mov %tougou,2
return *sean_restart1



*tougou

screen_clear
screen_clear2
bg black,1
gosub *setwindow_01
lsp 700,":a;chara\iriasu_st01.bmp",0,0
bg "BG\bg001.bmp",10,1500
name "Ilias"
>This is to integrate the previous two chapters with this one, creating a single game.\
>Make sure you followed the readme directions for copying and moving over the arc.nsa files.\
>Do you wish to proceed with integration?\
name ""
csel "Yes",*tougou1,"No",*hikitugiload2



*tougou1

name "Ilias"
>Now attempting to integrate...@
>If you did it wrong, an error will crash the game.\
>...............\
lsp 701,":a;chara\slime_h1.bmp",0,0
lsp 701,":a;chara\centa_h1.bmp",0,0
wait 1000
csp 701
mov %tougou,2
>Congratulations, it was correct!@
>Back to the title screen...\
name ""
screen_clear
screen_clear2
bg black,10,1000
mov %saveloadoff,0
mov %manuoff,0
bgm "bgm\title.ogg"
return



*backlog

checkpage %sub1,1
if %sub1=0 screen_clear:return
btndef clear:barclear
cspl 0,500
print 1
lsp 501,":a;system\system_bg.jpg",0,0:print 1
mov %backlogtotal,0
mov %backlognow,0
gosub *backlog_page



*backlog_btn

btndef clear
gosub *backlog_scroll
gosub *backlog_bar
lsp 201,":c;system\m_title_backlog.jpg",20,20
lsp 202,":c/2,0,3;system\return.bmp",20,560
spbtn 202,202
lsp 203,":a/2,0,3;system\system_cursor_up.jpg",760,0
spbtn 203,203
lsp 204,":a/2,0,3;system\system_cursor_down.jpg",760,550
spbtn 204,204
lsp 205,":c;system\system_bar.jpg",760,0
lsp 206,":c;system\system_barx_u.jpg",0,0
lsp 207,":c;system\system_barx_d.jpg",0,560
print 1
btndown 1
getpage
btnwait %bwait
if %bwait>0 && %bwait<4 && %backlogtotal<=4 goto *backlog_btn
if %bwait>0 && %bwait<4 && %bwait<=%backlogtotal mov %backlognow,%backlogtotal-4:goto *backlog_btn
if %bwait>=4 && %bwait<=%backlogtotal mov %backlognow,%backlogtotal-%bwait:goto *backlog_btn
if %bwait=202 wait 100:screen_clear:print 1:return
if %bwait=-1 wait 100:screen_clear:print 1:return
if %bwait=-10 wait 100:screen_clear:print 1:return
if %bwait=-11 wait 100:screen_clear:print 1:return
if %bwait=203 && %backlogtotal-4>%backlognow mov %backlognow,%backlognow+1:wait 100
if %bwait=-2 && %backlogtotal-4>%backlognow mov %backlognow,%backlognow+1
if %bwait=-12 && %backlogtotal-4>%backlognow mov %backlognow,%backlognow+1
if %bwait=204 && %backlognow>0 mov %backlognow,%backlognow-1:wait 100
if %bwait=-3 && %backlognow>0 mov %backlognow,%backlognow-1
if %bwait=-13 && %backlognow>0 mov %backlognow,%backlognow-1
goto *backlog_btn



*backlog_page

mov %backlogtotal,%backlogtotal+1
checkpage %sub1,%backlogtotal
if %sub1=1 goto *backlog_page
return



*backlog_scroll

getlog $backloglook,%backlognow
strsp 301,$backloglook,50,430,35,4,20,20,0,10,1,1,#FFFFFF
checkpage %sub1,%backlognow+1
if %sub1=1 getlog $backloglook,%backlognow+1
if %sub1=1 strsp 302,$backloglook,50,310,35,4,20,20,0,10,1,1,#FFFFFF
checkpage %sub1,%backlognow+2
if %sub1=1 getlog $backloglook,%backlognow+2
if %sub1=1 strsp 303,$backloglook,50,180,35,4,20,20,0,10,1,1,#FFFFFF
checkpage %sub1,%backlognow+3
if %sub1=1 getlog $backloglook,%backlognow+3
if %sub1=1 strsp 304,$backloglook,50, 50,35,4,20,20,0,10,1,1,#FFFFFF
return



*backlog_bar

mov %backlogbarone,48000/(%backlogtotal)
if %backlogtotal=1 mov %backlogbarone2,%backlogbarone*1
if %backlogtotal=2 mov %backlogbarone2,%backlogbarone*2
if %backlogtotal=3 mov %backlogbarone2,%backlogbarone*3
if %backlogtotal>=4 mov %backlogbarone2,%backlogbarone*4
mov %backlogbary,48000-%backlogbarone*%backlognow-%backlogbarone2
mov %backlogbary,%backlogbary+6000
bar 0,1,767,%backlogbary/100,16,%backlogbarone2/100,1,#DDDDDD
for %sub1=0 to %backlogtotal step 1
btn %sub1,740,(%backlogbarone*(%sub1-1)+6000)/100,60,%backlogbarone,0,0
next
return



*saveload

mov %savetotal,100
btndef clear:barclear
cspl 0,500
print 1
lsp 501,":a;system\system_bg.jpg",0,0:print 1
goto *save_btn



*save_btn

btndef clear
csp 208
gosub *saveload_screen
gosub *saveload_bar
if %saveorload=0 lsp 201,":c;system\m_title_save.jpg",20,20
if %saveorload=1 lsp 201,":c;system\m_title_load.jpg",20,20
lsp 202,":c/2,0,3;system\return.bmp",20,560
spbtn 202,202
lsp 203,":a/2,0,3;system\system_cursor_up.jpg",760,0
spbtn 203,203
lsp 204,":a/2,0,3;system\system_cursor_down.jpg",760,550
spbtn 204,204
lsp 205,":c;system\system_bar.jpg",760,0
lsp 206,":c;system\system_barx_u.jpg",0,0
lsp 207,":c;system\system_barx_d.jpg",0,560
btndown 1
getpage
btnwait %bwait
if %bwait>0 && %bwait<=%savetotal-5 mov %savepagenow,%bwait-1:goto *save_btn
if %bwait>%savetotal-5 && %bwait<=%savetotal mov %savepagenow,%savetotal-5:goto *save_btn
if %saveorload=0 && %bwait>=301 && %bwait<=400 gosub *save_yesno:wait 100:goto *saveload
if %saveorload=1 && %bwait>=301 && %bwait<=400 gosub *load_yesno:wait 100:goto *save_btn
if %bwait=202 wait 100:screen_clear:return
if %bwait=-1 wait 100:screen_clear:return
if %bwait=-10 wait 100:screen_clear:return
if %bwait=-11 wait 100:screen_clear:return
if %bwait=203 && %savepagenow>0 mov %savepagenow,%savepagenow-1:wait 100
if %bwait=-2 && %savepagenow>0 mov %savepagenow,%savepagenow-1
if %bwait=-12 && %savepagenow>0 mov %savepagenow,%savepagenow-1
if %bwait=204 && %savepagenow<%savetotal-5 mov %savepagenow,%savepagenow+1:wait 100
if %bwait=-3 && %savepagenow<%savetotal-5 mov %savepagenow,%savepagenow+1
if %bwait=-13 && %savepagenow<%savetotal-5 mov %savepagenow,%savepagenow+1
goto *save_btn



*saveload_screen

for %sub10=1 to 5 step 1
mov %savedatanow,%savepagenow+%sub10
savefileexist %save0or1,%savedatanow
if %sub10=1 mov %savepicx,80:mov %savepicy,56
if %save0or1=0 gosub *data_none
if %save0or1=1 gosub *data_make
mov %savepicy,%savepicy+100
next
return



*data_none

mov $sub2,""
mov $savenum,":s/20,20,0,0,0;#FF0000"
itoa2 $sub1,%savedatanow
len %sub1,$sub1
if %sub1<=4 mov $sub2,"O"
if %sub1=2 add $sub2,"O"
add $savenum,$sub2:add $savenum,$sub1
lsp %sub10+10+300,":s/20,20,1;#FFFFFF",%savepicx,%savepicy
lsp %sub10+20+300,$savenum,%savepicx+180,%savepicy+5
lsp %sub10+30+300,":s/20,20,1;#FFFFFF",%savepicx+260,%savepicy+5
lsp %sub10+40+300,":s/20,20,1;#FFFFFF",%savepicx+180,%savepicy+25
lsp %sub10+50+300,":a/2,0,3;system\saveload_dummy.jpg",%savepicx,%savepicy
spbtn %sub10+50+300,%sub10+50+300
return



*data_make

mov $savescreen,":c;save\save"
itoa $sub1,%savedatanow
add $savescreen,$sub1
add $savescreen,".bmp"
mov $sub2,""
mov $savenum,":s/20,20,0,0,0;#FF0000"
itoa2 $sub1,%savedatanow
len %sub1,$sub1
if %sub1<=4 mov $sub2,"O"
if %sub1=2 add $sub2,"O"
add $savenum,$sub2:add $savenum,$sub1
mov %sub1,%savedatanow+2000
split $%sub1,",",$savemonth,$saveday,$savehour,$saveminute,$savetext
mov $savetime,":s/20,20,0,0,0;#FF0000"
add $savetime,$savemonth:add $savetime,""
add $savetime,$saveday:add $savetime,""
add $savetime,$savehour:add $savetime,""
add $savetime,$saveminute:add $savetime,""
lsp %sub10+10+300,$savescreen,%savepicx,%savepicy
lsp %sub10+20+300,$savenum,%savepicx+180,%savepicy+5
lsp %sub10+30+300,$savetime,%savepicx+260,%savepicy+5
strsp %sub10+40+300,$savetext,%savepicx+180,%savepicy+25,22,2,20,20,0,10,1,1,#FFFFFF
lsp %sub10+50+300,":a/2,0,3;system\saveload_bookmark.jpg",%savepicx,%savepicy
spbtn %sub10+50+300,%sub10+50+300
if %savedatanow=%savenew lsp 208,":a;system\save_new.jpg",%savepicx+540,%savepicy+5
return



*saveload_bar

mov %savebarone,48000/%savetotal
if %savetotal=1 mov %savebarone2,%savebarone*1
if %savetotal=2 mov %savebarone2,%savebarone*2
if %savetotal=3 mov %savebarone2,%savebarone*3
if %savetotal=4 mov %savebarone2,%savebarone*4
if %savetotal>=5 mov %savebarone2,%savebarone*5
mov %savebary,48000-%savebarone*(%savetotal-%savepagenow)
mov %savebary,%savebary+6000
bar 0,1,767,%savebary/100,16,%savebarone2/100,1,#DDDDDD
for %sub1=0 to %savetotal step 1
btn %sub1,740,(%savebarone*(%sub1-1)+6000)/100,60,%savebarone,0,0
next
return



*save_yesno

mov %savedatanow,%bwait-50-300+%savepagenow
yesnobox %sub1,"Save Game? ","Save Confirmation"
if %sub1=0 return
mid $savetextget,$savetextget,0,88
mov $sub1,""
mov $sub2,""
mov $sub3,""
mov $sub4,""
mov $sub5,""
mov $sub6,""
mov $sub7,""
mov $sub8,""
mov $sub9,""
mov $sub10,""
split $savetextget,"(",$sub1,$sub2,$sub4,$sub6,$sub8
split $sub2,"/",$sub2,$sub3
split $sub3,")",$sub3,$sub3
split $sub4,"/",$sub4,$sub5
split $sub5,")",$sub5,$sub5
split $sub6,"/",$sub6,$sub7
split $sub7,")",$sub7,$sub7
split $sub8,"/",$sub8,$sub9
split $sub9,")",$sub9,$sub9
mov $savetextget,$sub1+$sub2+$sub3+$sub4+$sub5+$sub6+$sub7+$sub8+$sub9
input $savetextget,"Rg͂ĂB",$savetextget,88,1,300,85,200,20
mov $savescreen,"save\save"
itoa $sub1,%savedatanow
add $savescreen,$sub1
add $savescreen,".bmp"
savescreenshot2 $savescreen
savegame %savedatanow
savetime %savedatanow,%savemonth,%saveday,%savehour,%saveminute
itoa2 $savemonth,%savemonth:len %sub1,$savemonth:if %sub1=2 mov $sub1,"O":add $sub1,$savemonth:mov $savemonth,$sub1
itoa2 $saveday,%saveday:len %sub1,$saveday:if %sub1=2 mov $sub1,"O":add $sub1,$saveday:mov $saveday,$sub1
itoa2 $savehour,%savehour:len %sub1,$savehour:if %sub1=2 mov $sub1,"O":add $sub1,$savehour:mov $savehour,$sub1
itoa2 $saveminute,%saveminute:len %sub1,$saveminute:if %sub1=2 mov $sub1,"O":add $sub1,$saveminute:mov $saveminute,$sub1
mid $savetext,$savetextget,0,88
mov $savedata,$savemonth:add $savedata,","
add $savedata,$saveday:add $savedata,","
add $savedata,$savehour:add $savedata,","
add $savedata,$saveminute:add $savedata,","
add $savedata,$savetext
mov %savedata,%savedatanow+2000
mov $%savedata,$savedata
mov %savenew,%savedatanow
return



*load_yesno

mov %savedatanow,%bwait-50-300+%savepagenow
savefileexist %sub1,%savedatanow
if %sub1=0 return
yesnobox %sub1,"Load Game? ","Load Confirmation"
if %sub1=0 return
barclear
if %sub1=1 lsp 2,":c;system\ef_black.jpg",0,0
print 10,1000
loadgame %savedatanow



*load_config

if %gamefirst=1 textspeed %textspeed
if %gamefirst=1 bgmvol %bgmvol
if %gamefirst=1 sevol %sevol
if %gamefirst=1 && %windowsize=0 menu_window
if %gamefirst=1 && %windowsize=1 menu_full
if %hseanwave>0 hseanwave
if %hseanvoice>0 hseanvoice
if %txtwindow=1 gosub *setwindow_01p
if %txtwindow=2 gosub *setwindow_02p
return



*config

btndef clear:barclear
for %sub1=0 to 500 step 1
csp %sub1
next
print 1
lsp 501,":a;system\system_bg.jpg",0,0:print 1
goto *config_btn



*config_btn

btndef clear
lsp 201,":c;system\m_title_config.jpg",20,20
lsp 202,":c/2,0,3;system\return.bmp",20,560
spbtn 202,202
lsp 203,":c;system\configback.jpg",0,0
if %textspeed=30 lsp 101,":a;system\config_cursor1.jpg",45,100
if %textspeed=27 lsp 101,":a;system\config_cursor1.jpg",75,100
if %textspeed=24 lsp 101,":a;system\config_cursor1.jpg",105,100
if %textspeed=21 lsp 101,":a;system\config_cursor1.jpg",135,100
if %textspeed=18 lsp 101,":a;system\config_cursor1.jpg",165,100
if %textspeed=15 lsp 101,":a;system\config_cursor1.jpg",195,100
if %textspeed=12 lsp 101,":a;system\config_cursor1.jpg",225,100
if %textspeed=9 lsp 101,":a;system\config_cursor1.jpg",255,100
if %textspeed=6 lsp 101,":a;system\config_cursor1.jpg",285,100
if %textspeed=3 lsp 101,":a;system\config_cursor1.jpg",315,100
if %textspeed=0 lsp 101,":a;system\config_cursor1.jpg",345,100
btn 101,35,80,30,60,0,0
btn 102,65,80,30,60,0,0
btn 103,95,80,30,60,0,0
btn 104,125,80,30,60,0,0
btn 105,155,80,30,60,0,0
btn 106,185,80,30,60,0,0
btn 107,215,80,30,60,0,0
btn 108,245,80,30,60,0,0
btn 109,275,80,30,60,0,0
btn 110,305,80,30,60,0,0
btn 111,335,80,30,60,0,0
if %autotime=2000 lsp 102,":a;system\config_cursor1.jpg",45,200
if %autotime=1800 lsp 102,":a;system\config_cursor1.jpg",75,200
if %autotime=1600 lsp 102,":a;system\config_cursor1.jpg",105,200
if %autotime=1400 lsp 102,":a;system\config_cursor1.jpg",135,200
if %autotime=1200 lsp 102,":a;system\config_cursor1.jpg",165,200
if %autotime=1000 lsp 102,":a;system\config_cursor1.jpg",195,200
if %autotime=800 lsp 102,":a;system\config_cursor1.jpg",225,200
if %autotime=600 lsp 102,":a;system\config_cursor1.jpg",255,200
if %autotime=400 lsp 102,":a;system\config_cursor1.jpg",285,200
if %autotime=200 lsp 102,":a;system\config_cursor1.jpg",315,200
if %autotime=1 lsp 102,":a;system\config_cursor1.jpg",345,200
btn 121,35,180,30,60,0,0
btn 122,65,180,30,60,0,0
btn 123,95,180,30,60,0,0
btn 124,125,180,30,60,0,0
btn 125,155,180,30,60,0,0
btn 126,185,180,30,60,0,0
btn 127,215,180,30,60,0,0
btn 128,245,180,30,60,0,0
btn 129,275,180,30,60,0,0
btn 130,305,180,30,60,0,0
btn 131,335,180,30,60,0,0
if %bgmvol=0 lsp 103,":a;system\config_cursor1.jpg",45,300
if %bgmvol=10 lsp 103,":a;system\config_cursor1.jpg",75,300
if %bgmvol=20 lsp 103,":a;system\config_cursor1.jpg",105,300
if %bgmvol=30 lsp 103,":a;system\config_cursor1.jpg",135,300
if %bgmvol=40 lsp 103,":a;system\config_cursor1.jpg",165,300
if %bgmvol=50 lsp 103,":a;system\config_cursor1.jpg",195,300
if %bgmvol=60 lsp 103,":a;system\config_cursor1.jpg",225,300
if %bgmvol=70 lsp 103,":a;system\config_cursor1.jpg",255,300
if %bgmvol=80 lsp 103,":a;system\config_cursor1.jpg",285,300
if %bgmvol=90 lsp 103,":a;system\config_cursor1.jpg",315,300
if %bgmvol=100 lsp 103,":a;system\config_cursor1.jpg",345,300
btn 141,35,280,30,60,0,0
btn 142,65,280,30,60,0,0
btn 143,95,280,30,60,0,0
btn 144,125,280,30,60,0,0
btn 145,155,280,30,60,0,0
btn 146,185,280,30,60,0,0
btn 147,215,280,30,60,0,0
btn 148,245,280,30,60,0,0
btn 149,275,280,30,60,0,0
btn 150,305,280,30,60,0,0
btn 151,335,280,30,60,0,0
if %sevol=0 lsp 104,":a;system\config_cursor1.jpg",45,400
if %sevol=10 lsp 104,":a;system\config_cursor1.jpg",75,400
if %sevol=20 lsp 104,":a;system\config_cursor1.jpg",105,400
if %sevol=30 lsp 104,":a;system\config_cursor1.jpg",135,400
if %sevol=40 lsp 104,":a;system\config_cursor1.jpg",165,400
if %sevol=50 lsp 104,":a;system\config_cursor1.jpg",195,400
if %sevol=60 lsp 104,":a;system\config_cursor1.jpg",225,400
if %sevol=70 lsp 104,":a;system\config_cursor1.jpg",255,400
if %sevol=80 lsp 104,":a;system\config_cursor1.jpg",285,400
if %sevol=90 lsp 104,":a;system\config_cursor1.jpg",315,400
if %sevol=100 lsp 104,":a;system\config_cursor1.jpg",345,400
btn 161,35,380,30,60,0,0
btn 162,65,380,30,60,0,0
btn 163,95,380,30,60,0,0
btn 164,125,380,30,60,0,0
btn 165,155,380,30,60,0,0
btn 166,185,380,30,60,0,0
btn 167,215,380,30,60,0,0
btn 168,245,380,30,60,0,0
btn 169,275,380,30,60,0,0
btn 170,305,380,30,60,0,0
btn 171,335,380,30,60,0,0
if %click=0 lsp 111,":a;system\config_cursor2.jpg",420,110
if %click=1 lsp 111,":a;system\config_cursor2.jpg",610,110
btn 181,420,100,170,40,0,0
btn 182,610,100,170,40,0,0
if %skip=0 lsp 112,":a;system\config_cursor2.jpg",420,210
if %skip=1 lsp 112,":a;system\config_cursor2.jpg",610,210
btn 183,420,200,170,40,0,0
btn 184,610,200,170,40,0,0
if %effectspeed=0 lsp 113,":a;system\config_cursor3.jpg",420,310
if %effectspeed=1 lsp 113,":a;system\config_cursor3.jpg",540,310
if %effectspeed=2 lsp 113,":a;system\config_cursor3.jpg",660,310
btn 185,420,300,120,40,0,0
btn 186,540,300,120,40,0,0
btn 187,660,300,120,40,0,0
if %windowsize=0 lsp 114,":a;system\config_cursor2.jpg",420,410
if %windowsize=1 lsp 114,":a;system\config_cursor2.jpg",610,410
btn 188,420,400,170,40,0,0
btn 189,610,400,170,40,0,0
print 1
btnwait %bwait
if %bwait=101 textspeed 30:mov %textspeed,30:goto *config_btn
if %bwait=102 textspeed 27:mov %textspeed,27:goto *config_btn
if %bwait=103 textspeed 24:mov %textspeed,24:goto *config_btn
if %bwait=104 textspeed 21:mov %textspeed,21:goto *config_btn
if %bwait=105 textspeed 18:mov %textspeed,18:goto *config_btn
if %bwait=106 textspeed 15:mov %textspeed,15:goto *config_btn
if %bwait=107 textspeed 12:mov %textspeed,12:goto *config_btn
if %bwait=108 textspeed 9:mov %textspeed,9:goto *config_btn
if %bwait=109 textspeed 6:mov %textspeed,6:goto *config_btn
if %bwait=110 textspeed 3:mov %textspeed,3:goto *config_btn
if %bwait=111 textspeed 0:mov %textspeed,0:goto *config_btn
if %bwait=121 mov %autotime,2000:goto *config_btn
if %bwait=122 mov %autotime,1800:goto *config_btn
if %bwait=123 mov %autotime,1600:goto *config_btn
if %bwait=124 mov %autotime,1400:goto *config_btn
if %bwait=125 mov %autotime,1200:goto *config_btn
if %bwait=126 mov %autotime,1000:goto *config_btn
if %bwait=127 mov %autotime,800:goto *config_btn
if %bwait=128 mov %autotime,600:goto *config_btn
if %bwait=129 mov %autotime,400:goto *config_btn
if %bwait=130 mov %autotime,200:goto *config_btn
if %bwait=131 mov %autotime,1:goto *config_btn
if %bwait=141 bgmvol 0:mov %bgmvol,0:goto *config_btn
if %bwait=142 bgmvol 10:mov %bgmvol,10:goto *config_btn
if %bwait=143 bgmvol 20:mov %bgmvol,20:goto *config_btn
if %bwait=144 bgmvol 30:mov %bgmvol,30:goto *config_btn
if %bwait=145 bgmvol 40:mov %bgmvol,40:goto *config_btn
if %bwait=146 bgmvol 50:mov %bgmvol,50:goto *config_btn
if %bwait=147 bgmvol 60:mov %bgmvol,60:goto *config_btn
if %bwait=148 bgmvol 70:mov %bgmvol,70:goto *config_btn
if %bwait=149 bgmvol 80:mov %bgmvol,80:goto *config_btn
if %bwait=150 bgmvol 90:mov %bgmvol,90:goto *config_btn
if %bwait=151 bgmvol 100:mov %bgmvol,100:goto *config_btn
if %bwait=161 sevol 0:mov %sevol,0:goto *config_btn
if %bwait=162 sevol 10:mov %sevol,10:goto *config_btn
if %bwait=163 sevol 20:mov %sevol,20:goto *config_btn
if %bwait=164 sevol 30:mov %sevol,30:goto *config_btn
if %bwait=165 sevol 40:mov %sevol,40:goto *config_btn
if %bwait=166 sevol 50:mov %sevol,50:goto *config_btn
if %bwait=167 sevol 60:mov %sevol,60:goto *config_btn
if %bwait=168 sevol 70:mov %sevol,70:goto *config_btn
if %bwait=169 sevol 80:mov %sevol,80:goto *config_btn
if %bwait=170 sevol 90:mov %sevol,90:goto *config_btn
if %bwait=171 sevol 100:mov %sevol,100:goto *config_btn
if %bwait=181 menu_click_def:mov %click,0:goto *config_btn
if %bwait=182 menu_click_page:mov %click,1:goto *config_btn
if %bwait=183 kidokumode 1:mov %skip,0:goto *config_btn
if %bwait=184 kidokumode 0:mov %skip,1:goto *config_btn
if %bwait=185 seteffectspeed 0:mov %effectspeed,0:goto *config_btn
if %bwait=186 seteffectspeed 1:mov %effectspeed,1:goto *config_btn
if %bwait=187 seteffectspeed 2:mov %effectspeed,2:goto *config_btn
if %bwait=188 menu_window:mov %windowsize,0:goto *config_btn
if %bwait=189 menu_full:mov %windowsize,1:goto *config_btn
if %bwait=202 wait 100:screen_clear:return
if %bwait=-1 wait 100:screen_clear:return
if %bwait=-10 wait 100:screen_clear:return
if %bwait=-11 wait 100:screen_clear:return
goto *config_btn



*menu

saveoff
dwavestop 5
vsp 700,0
screen_clear
screen_vanish
lsp 502,":a;system\system_bg.jpg",0,0
lsp 142,":c;system\system_barx_u.jpg",0,0
lsp 143,":c;system\system_barx_d.jpg",0,560
if %player=0 && %ruka_tati=0 lsp 141,":a;chara\ruka_st01.bmp",150,-200
if %player=0 && %ruka_tati=1 lsp 141,":a;chara\ruka_st02.bmp",130,25
if %player=0 && %ruka_tati=2 lsp 141,":a;chara\ruka_st03.bmp",20,25
if %player=1 lsp 141,":a;chara\alice_st01.bmp",250,25
if %player=2 lsp 141,":a;chara\arumaeruma_st21.bmp",100,0
if %player=3 lsp 141,":a;chara\erbetie_st01.bmp",325,0
if %player=4 lsp 141,":a;chara\tamamo_st04.bmp",100,0
if %player=5 lsp 141,":a;chara\granberia_st01.bmp",100,0
if %player=0 gosub *maxhp
if %player=0 gosub *maxmp
if %player=0 itoa2 $menu_mylv,%mylv
if %player=0 itoa2 $menu_hp,%max_mylife
if %player=0 itoa2 $menu_at,%mylv*5
if %player=0 itoa2 $menu_sp,%max_mp
lsp 128,":a;system\window8.bmp",220,350
if %player=0 lsp 120,":s/20,20,0;#FFFFFFLuka ",230,360
if %player=0 lsp 121,":s/20,20,0;#FFFFFFLevel: ",230,390
if %player=0 lsp 126,":s/20,20,0;#FFFFFF"+$menu_mylv,300,390
if %player=0 lsp 122,":s/20,20,0;#FFFFFFMax HP: "+$menu_hp,230,420
if %player=0 lsp 123,":s/20,20,0;#FFFFFFMax SP: "+$menu_sp,230,450
if %player=0 lsp 124,":s/20,20,0;#FFFFFFAttack: "+$menu_at,230,480
if %player=0 lsp 125,":s/20,20,0;#FFFFFFDefense: ",230,510
if %player=0 && %item01<4 lsp 127,":s/20,20,0;#FFFFFFT",320,510
if %player=0 && %item01>3 lsp 127,":s/20,20,0;#FFFFFFQT",320,510
if %player=1 lsp 120,":s/20,20,0;#FFFFFFAlipheese ",230,360
if %player=1 lsp 121,":s/20,20,0;#FFFFFFLevel: ",230,390
if %player=1 lsp 126,":s/20,20,0;#FFFFFFPST",300,390
if %player=1 lsp 122,":s/20,20,0;#FFFFFFMax HP: RQOOO",230,420
if %player=1 lsp 123,":s/20,20,0;#FFFFFFMax SP: QW",230,450
if %player=1 lsp 124,":s/20,20,0;#FFFFFFAttack: RXO",230,480
if %player=1 lsp 125,":s/20,20,0;#FFFFFFDefense: ",230,510
if %player=1 lsp 127,":s/20,20,0;#FFFFFFRTO",320,510
if %player=2 strsp 120,"Alma Elma",230,360,6,1,20,20,0,0,1,1,#FFFFFF
if %player=2 lsp 121,":s/20,20,0;#FFFFFFLevel: ",230,390
if %player=2 lsp 126,":s/20,20,0;#FFFFFFPQT",300,390
if %player=2 lsp 122,":s/20,20,0;#FFFFFFMax HP: PTOOO",230,420
if %player=2 lsp 123,":s/20,20,0;#FFFFFFMax SP: PR",230,450
if %player=2 lsp 124,":s/20,20,0;#FFFFFFAttack: RQO",230,480
if %player=2 lsp 125,":s/20,20,0;#FFFFFFDefense: ",230,510
if %player=2 lsp 127,":s/20,20,0;#FFFFFFROO",320,510
if %player=3 lsp 120,":s/20,20,0;#FFFFFFErubetie ",230,360
if %player=3 lsp 121,":s/20,20,0;#FFFFFFLevel: ",230,390
if %player=3 lsp 126,":s/20,20,0;#FFFFFFPQT",300,390
if %player=3 lsp 122,":s/20,20,0;#FFFFFFMax HP: QQOOO",230,420
if %player=3 lsp 123,":s/20,20,0;#FFFFFFMax SP: PO",230,450
if %player=3 lsp 124,":s/20,20,0;#FFFFFFAttack: RSO",230,480
if %player=3 lsp 125,":s/20,20,0;#FFFFFFDefense: ",230,510
if %player=3 lsp 127,":s/20,20,0;#FFFFFFRWO",320,510
if %player=4 lsp 120,":s/20,20,0;#FFFFFFTamamo ",230,360
if %player=4 lsp 121,":s/20,20,0;#FFFFFFLevel: ",230,390
if %player=4 lsp 126,":s/20,20,0;#FFFFFFPQW",300,390
if %player=4 lsp 122,":s/20,20,0;#FFFFFFMax HP: QQOOO",230,420
if %player=4 lsp 123,":s/20,20,0;#FFFFFFMax SP: PT",230,450
if %player=4 lsp 124,":s/20,20,0;#FFFFFFAttack: RTO",230,480
if %player=4 lsp 125,":s/20,20,0;#FFFFFFDefense: ",230,510
if %player=4 lsp 127,":s/20,20,0;#FFFFFFRSO",320,510
if %player=5 lsp 120,":s/20,20,0;#FFFFFFGranberia ",230,360
if %player=5 lsp 121,":s/20,20,0;#FFFFFFLevel: ",230,390
if %player=5 lsp 126,":s/20,20,0;#FFFFFFPQU",300,390
if %player=5 lsp 122,":s/20,20,0;#FFFFFFMax HP: QSOOO",230,420
if %player=5 lsp 123,":s/20,20,0;#FFFFFFMax SP: PR",230,450
if %player=5 lsp 124,":s/20,20,0;#FFFFFFAttack: RVO",230,480
if %player=5 lsp 125,":s/20,20,0;#FFFFFFDefense: ",230,510
if %player=5 lsp 127,":s/20,20,0;#FFFFFFRSO",320,510
lsp 133,":a;system\window7.bmp",460,350
if %player=0 && %item01<5 strsp 130,"d@Iron Sword",470,363,8,1,20,20,0,0,1,1,#FFFFFF
if %player=0 && %item01>4 lsp 130,":s/20,20,0;#FFFFFFd@Angel Halo ",470,363
if %player=0 && %item01<4 lsp 131,":s/20,20,0;#FFFFFFd@Cloth Shirt ",470,393
if %player=0 && %item01>3 lsp 131,":s/20,20,0;#FFFFFFd@Enrikan Shirt ",470,393
if %player=0 && %item01>0 strsp 132,"d@Keepsake Ring",470,423,10,1,20,20,0,0,1,1,#FFFFFF
if %player=0 && %skill01>18 lsp 132,":s/20,20,0;#FFFFFF@@Empty ",470,423
if %player=1 lsp 130,":s/20,20,0;#FFFFFFd@Hekatonkheires ",470,363
if %player=1 strsp 131,"d@Lamiantine Coating",470,393,12,1,20,20,0,0,1,1,#FFFFFF
if %player=1 lsp 132,":s/20,20,0;#FFFFFF",470,423
if %player=2 lsp 130,":s/20,20,0;#FFFFFFd@Immoral Glory ",470,363
if %player=2 strsp 131,"d@Lilith's Attire",470,393,11,1,20,20,0,0,1,1,#FFFFFF
if %player=2 lsp 132,":s/20,20,0;#FFFFFF",470,423
if %player=3 lsp 130,":s/20,20,0;#FFFFFFd@None ",470,363
if %player=3 lsp 131,":s/20,20,0;#FFFFFFd@None ",470,393
if %player=3 lsp 132,":s/20,20,0;#FFFFFF",470,423
if %player=4 lsp 130,":s/20,20,0;#FFFFFFd@Amaterasu's Fan ",470,363
if %player=4 strsp 131,"d@Kyuubi's Kimono",470,393,11,1,20,20,0,0,1,1,#FFFFFF
if %player=4 lsp 132,":s/20,20,0;#FFFFFF",470,423
if %player=5 lsp 130,":s/20,20,0;#FFFFFFd@Ares ",470,363
if %player=5 strsp 131,"d@Supreme Dragon Armor",470,393,13,1,20,20,0,0,1,1,#FFFFFF
if %player=5 lsp 132,":s/20,20,0;#FFFFFF",470,423
goto *menu_btn



*menu_btn

btndef clear
lsp 112,":a;system\window6.bmp",25,40:print 1
if %zukanon=0 lsp 101,":s/20,20,0;#FFFFFF#FF4444Item ",40,50:spbtn 101,101
if %zukanon>0 lsp 101,":s/20,20,0;#bbbbbbItem ",40,50
if %zukanon=0 lsp 102,":s/20,20,0;#FFFFFF#FF4444Skill ",40,80:spbtn 102,102
if %zukanon>0 lsp 102,":s/20,20,0;#bbbbbbSkill ",40,80
if %zukanon=0 lsp 106,":s/20,20,0;#FFFFFF#FF4444Record ",40,110:spbtn 106,106
if %zukanon>0 lsp 106,":s/20,20,0;#bbbbbbRecord ",40,110
if %zukanon=0 lsp 105,":s/20,20,0;#FFFFFF#FF4444Monsterpedia ",40,140:spbtn 105,105
if %zukanon>0 lsp 105,":s/20,20,0;#bbbbbbMonsterpedia ",40,140
lsp 107,":s/20,20,0;#FFFFFF#FF4444Backlog ",40,170:spbtn 107,107
lsp 108,":s/20,20,0;#FFFFFF#FF4444Config ",40,200:spbtn 108,108
if %zukanon=0 lsp 103,":s/20,20,0;#FFFFFF#FF4444Save ",40,230:spbtn 103,103
if %zukanon>0 lsp 103,":s/20,20,0;#bbbbbbSave ",40,230
if %zukanon=0 lsp 104,":s/20,20,0;#FFFFFF#FF4444Load ",40,260:spbtn 104,104
if %zukanon>0 lsp 104,":s/20,20,0;#bbbbbbLoad ",40,260
lsp 109,":s/20,20,0;#FFFFFF#FF4444Title ",40,290:spbtn 109,109
lsp 110,":s/20,20,0;#FFFFFF#FF4444Quit ",40,320:spbtn 110,110
lsp 111,":c/2,0,3;system\return.bmp",20,560:spbtn 111,111
print 1
btnwait %bwait
if %bwait=101 gosub *menu_item:goto *menu
if %bwait=102 gosub *menu_skill:goto *menu
if %bwait=103 mov %saveorload,0:gosub *saveload:goto *menu
if %bwait=104 mov %saveorload,1:gosub *saveload:goto *menu
if %bwait=105 mov %zukanon,1:gosub *menu_zukan:mov %zukanon,0:goto *menu
if %bwait=106 gosub *menu_kiroku:goto *menu
if %bwait=107 gosub *backlog:goto *menu
if %bwait=108 gosub *config:goto *menu
if %bwait=109 gosub *reset
if %bwait=110 gosub *game_end
if %bwait=111 csp 502:screen_clear:screen_appear:print 1:hseanwave:mov %hanyo1,%sel2:return
if %bwait=-1 csp 502:screen_clear:screen_appear:print 1:hseanwave:mov %hanyo1,%sel2:return
if %bwait=-10 csp 502:screen_clear:screen_appear:print 1:hseanwave:mov %hanyo1,%sel2:return
if %bwait=-11 csp 502:screen_clear:screen_appear:print 1:hseanwave:mov %hanyo1,%sel2:return
goto *menu_btn



*menu_item

saveoff
screen_clear
mov %page,1
lsp 502,":a;system\system_bg.jpg",0,0
lsp 501,":a;system\window5.bmp",25,50
lsp 141,":c;system\m_title_item.jpg",20,20
lsp 142,":c;system\system_barx_u.jpg",0,0
lsp 143,":c;system\system_barx_d.jpg",0,560
goto *menu_item2



*menu_item2

cspl 201,212
if %page=0 mov %page,3
if %page=4 mov %page,1
itoa2 $page_h,%page
if %page=1 goto *menu_item_page1
if %page=2 goto *menu_item_page2
if %page=3 goto *menu_item_page3
print 1
goto *menu_item_page1



*menu_item_page1

btndef clear
lsp 111,":c/2,0,3;system\return.bmp",20,560:spbtn 111,111
lsp 112,":c/2,0,3;system\menu_prev.jpg",330,400:spbtn 112,112
lsp 113,":c/2,0,3;system\menu_next.jpg",450,400:spbtn 113,113
lsp 144,":s/20,20,0;#FFFFFFBattle ",370,400
if %item01<5 strsp 201,"Iron Sword",50,80,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 201,201
if %item01>4 lsp 201,":s/20,20,0;#FFFFFF#FF4444Angel Halo ",50,80:spbtn 201,201
if %item01<4 lsp 202,":s/20,20,0;#FFFFFF#FF4444Cloth Shirt ",400,80:spbtn 202,202
if %item01>3 lsp 202,":s/20,20,0;#FFFFFF#FF4444Enrikan Shirt ",400,80:spbtn 202,202
if %item01>0 && %skill01<19 strsp 203,"Keepsake Ring",50,110,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 203,203
if %item01>0 lsp 204,":s/20,20,0;#FFFFFF#FF4444",400,110:spbtn 204,204
if %item01>0 lsp 205,":s/20,20,0;#FFFFFF#FF4444",50,140:spbtn 205,205
if %item01>0 lsp 206,":s/20,20,0;#FFFFFF#FF4444",50,170:spbtn 206,206
if %item01>0 lsp 207,":s/20,20,0;#FFFFFF#FF4444",400,200:spbtn 207,207
if %item01>0 lsp 208,":s/20,20,0;#FFFFFF#FF4444",50,230:spbtn 208,208
if %item01>0 lsp 209,":s/20,20,0;#FFFFFF#FF4444",400,260:spbtn 209,209
if %item01>0 lsp 210,":s/20,20,0;#FFFFFF#FF4444",50,290:spbtn 210,210
if %item01>0 lsp 211,":s/20,20,0;#FFFFFF#FF4444",50,230:spbtn 211,211
if %item01>0 lsp 212,":s/20,20,0;#FFFFFF#FF4444",400,230:spbtn 212,212
if %item01>0 lsp 213,":s/20,20,0;#FFFFFF#FF4444",50,260:spbtn 210,210
if %item01>0 lsp 214,":s/20,20,0;#FFFFFF#FF4444",400,260:spbtn 211,211
if %item01>0 lsp 215,":s/20,20,0;#FFFFFF#FF4444",50,290:spbtn 212,212
btnwait %bwait
if %bwait=201 gosub *item001
if %bwait=202 gosub *item002
if %bwait=203 gosub *item003
if %bwait=204 gosub *item004
if %bwait=205 gosub *item005
if %bwait=206 gosub *item006
if %bwait=207 gosub *item007
if %bwait=208 gosub *item008
if %bwait=209 gosub *item009
if %bwait=210 gosub *item010
if %bwait=211 gosub *item011
if %bwait=212 gosub *item012
if %bwait=112 mov %page,%page-1:cspl 301,303:goto *menu_item2
if %bwait=113 mov %page,%page+1:cspl 301,303:goto *menu_item2
if %bwait=111 screen_clear:return
if %bwait=-1 screen_clear:return
if %bwait=-10 screen_clear:return
if %bwait=-11 screen_clear:return
goto *menu_item_page1



*menu_item_page2

btndef clear
lsp 111,":c/2,0,3;system\return.bmp",20,560:spbtn 111,111
lsp 112,":c/2,0,3;system\menu_prev.jpg",330,400:spbtn 112,112
lsp 113,":c/2,0,3;system\menu_next.jpg",450,400:spbtn 113,113
lsp 144,":s/20,20,0;#FFFFFFValuables ",355,400
if %item02>0 lsp 201,":s/20,20,0;#FFFFFF#FF4444Red Orb ",50,80:spbtn 201,201
if %item05>0 strsp 202,"Yellow Orb",400,80,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 202,202
if %item06>0 lsp 203,":s/20,20,0;#FFFFFF#FF4444Green Orb ",50,110:spbtn 203,203
if %item07>0 strsp 204,"Blue Orb",400,110,5,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 204,204
if %item08>0 strsp 205,"Silver Orb",50,140,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 205,205
if %item09>0 strsp 206,"Purple Orb",400,140,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 206,206
if %item01>5 strsp 207,"Poseidon's Bell",50,170,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 207,207
if %item04>0 && %item04<3 strsp 208,"Ball of Guidance",400,170,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 208,208
if %item04=4 strsp 208,"Ball of Guidance",400,170,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 208,208
if %item04=1 lsp 209,":s/20,20,0;#FFFFFF#FF4444Written Pledge ",50,200:spbtn 209,209
if %item04=2 strsp 209,"Ring of Promise",50,200,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 209,209
if %item01>0 lsp 210,":s/20,20,0;#FFFFFF#FF4444",400,200:spbtn 210,210
if %item01>0 lsp 211,":s/20,20,0;#FFFFFF#FF4444",50,230:spbtn 211,211
if %item01>0 lsp 212,":s/20,20,0;#FFFFFF#FF4444",400,230:spbtn 212,212
if %item01>0 lsp 213,":s/20,20,0;#FFFFFF#FF4444",50,260:spbtn 210,210
if %item01>0 lsp 214,":s/20,20,0;#FFFFFF#FF4444",400,260:spbtn 211,211
if %item01>0 lsp 215,":s/20,20,0;#FFFFFF#FF4444",50,290:spbtn 212,212
btnwait %bwait
if %bwait=201 gosub *item006
if %bwait=202 gosub *item011
if %bwait=203 gosub *item012
if %bwait=204 gosub *item013
if %bwait=205 gosub *item014
if %bwait=206 gosub *item015
if %bwait=207 gosub *item008
if %bwait=208 gosub *item009
if %bwait=209 gosub *item010
if %bwait=210 gosub *item022
if %bwait=211 gosub *item023
if %bwait=212 gosub *item024
if %bwait=112 mov %page,%page-1:cspl 301,303:goto *menu_item2
if %bwait=113 mov %page,%page+1:cspl 301,303:goto *menu_item2
if %bwait=111 screen_clear:return
if %bwait=-1 screen_clear:return
if %bwait=-10 screen_clear:return
if %bwait=-11 screen_clear:return
goto *menu_item_page2



*menu_item_page3

btndef clear
lsp 111,":c/2,0,3;system\return.bmp",20,560:spbtn 111,111
lsp 112,":c/2,0,3;system\menu_prev.jpg",330,400:spbtn 112,112
lsp 113,":c/2,0,3;system\menu_next.jpg",450,400:spbtn 113,113
lsp 144,":s/20,20,0;#FFFFFFOther ",375,400
if %item01>1 lsp 201,":s/20,20,0;#FFFFFF#FF4444World Traveler ",50,80:spbtn 201,201
if %item01>2 lsp 202,":s/20,20,0;#FFFFFF#FF4444Ama-Ama Dango ",400,80:spbtn 202,202
if %item03>0 lsp 203,":s/20,20,0;#FFFFFF#FF4444Happiness Honey ",50,110:spbtn 203,203
if %item01>6 lsp 204,":s/20,20,0;#FFFFFF#FF4444Grilled Starfish ",400,110:spbtn 204,204
if %item01>7 strsp 205,"Four Animists and their Sources",50,140,17,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 205,205
if %item10=1 strsp 206,"Sacred Anti-Ghost Water",400,140,13,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 206,206
if %item11=1 lsp 207,":s/20,20,0;#FFFFFF#FF4444Grilled Sea Anemone ",50,170:spbtn 207,207
if %item12=1 lsp 208,":s/20,20,0;#FFFFFF#FF4444Fairy Acorn ",400,170:spbtn 208,208
if %item12=2 strsp 208,"Jewel of Friendship",400,170,11,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 208,208
if %item01>8 strsp 209,"Basket of Scorpions",50,200,11,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 209,209
if %item13=1 lsp 210,":s/20,20,0;#FFFFFF#FF4444Genie's Lamp ",400,200:spbtn 210,210
if %item13=2 lsp 210,":s/20,20,0;#FFFFFF#FF4444Lottery Ticket ",400,200:spbtn 210,210
if %item13=3 strsp 210,"Jewel of Fortune",400,200,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 210,210
if %item14=1 lsp 211,":s/20,20,0;#FFFFFF#FF4444Alraune Flower ",50,230:spbtn 211,211
if %item15=1 strsp 212,"Nekomata's Bell",400,230,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 212,212
if %item16=1 strsp 213,"Tamamo Ball",50,260,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 213,213
if %item17=1 strsp 214,"Hero's Proof",50,290,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 214,214
if %item18=1 strsp 215,"Jewel of Victory",400,260,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 215,215
btnwait %bwait
if %bwait=201 gosub *item004
if %bwait=202 gosub *item005
if %bwait=203 gosub *item007
if %bwait=204 gosub *item016
if %bwait=205 gosub *item017
if %bwait=206 gosub *item018
if %bwait=207 gosub *item019
if %bwait=208 gosub *item020
if %bwait=209 gosub *item021
if %bwait=210 gosub *item022
if %bwait=211 gosub *item023
if %bwait=212 gosub *item024
if %bwait=213 gosub *item025
if %bwait=214 gosub *item026
if %bwait=215 gosub *item027
if %bwait=112 mov %page,%page-1:cspl 301,303:goto *menu_item2
if %bwait=113 mov %page,%page+1:cspl 301,303:goto *menu_item2
if %bwait=111 screen_clear:return
if %bwait=-1 screen_clear:return
if %bwait=-10 screen_clear:return
if %bwait=-11 screen_clear:return
goto *menu_item_page3



*item001

if %item01<5 strsp 301,"A sword received from the village blacksmith.",50,450,24,1,20,20,0,0,1,1,#FFFFFF
if %item01<5 strsp 302,"Custom made to fit Luka's small stature.",50,480,21,1,20,20,0,0,1,1,#FFFFFF
if %item01>4 strsp 301,"A creepy sword received from Alice.",50,450,19,1,20,20,0,0,1,1,#FFFFFF
if %item01>4 strsp 302,"Made from 666 melted angels, it can seal monsters.",50,480,26,1,20,20,0,0,1,1,#FFFFFF
return



*item002

if %item01<4 strsp 301,"Clothes made by Betty.",50,450,12,1,20,20,0,0,1,1,#FFFFFF
if %item01<4 strsp 302,"Well made, but not designed for combat.",50,480,21,1,20,20,0,0,1,1,#FFFFFF
if %item01>3 strsp 301,"Protective clothing from Enrika.",50,450,17,1,20,20,0,0,1,1,#FFFFFF
if %item01>3 strsp 302,"Though it's very light, it's very durable.",50,480,22,1,20,20,0,0,1,1,#FFFFFF
return



*item003

strsp 301,"A keepsake of my mother.",50,450,13,1,20,20,0,0,1,1,#FFFFFF
strsp 302,"Nothing special, but it's a precious memory of my mother.",50,480,30,1,20,20,0,0,1,1,#FFFFFF
return



*item004

strsp 301,"The ultimate guide for any adventurer or gourmet.",50,450,26,1,20,20,0,0,1,1,#FFFFFF
strsp 302,"But it's 500 years old, so the information is outdated.",50,480,29,1,20,20,0,0,1,1,#FFFFFF
strsp 303,"...Why is she making me hold it?",50,510,17,1,20,20,0,0,1,1,#FFFFFF
return



*item005

strsp 301,"The ultimate luxury product of the [Sutherland Inn].",50,450,27,1,20,20,0,0,1,1,#FFFFFF
strsp 302,"Made with Happiness Honey, it's very sweet.",50,480,23,1,20,20,0,0,1,1,#FFFFFF
strsp 303,"I'm surprised Alice hasn't eaten it out of my hand.",50,510,27,1,20,20,0,0,1,1,#FFFFFF
return



*item006

if %item02>0 strsp 301,"A beautiful gem received from the bandits.",50,450,22,1,20,20,0,0,1,1,#FFFFFF
if %item02>0 strsp 302,"I don't know what it's used for, but it seems magical.",50,480,28,1,20,20,0,0,1,1,#FFFFFF
if %item02>0 strsp 303,"If I find the owner, I'll return it.",50,510,19,1,20,20,0,0,1,1,#FFFFFF
if %item01>9 strsp 301,"A Red Orb to revive the Holy Wings.",50,450,19,1,20,20,0,0,1,1,#FFFFFF
if %item01>9 strsp 302,"It will revive if six are collected, it seems.",50,480,24,1,20,20,0,0,1,1,#FFFFFF
if %item01>9 lsp 303,":s/20,20,0;#FFFFFF",50,510
return



*item007

strsp 301,"Sweet honey from the Happiness Village.",50,450,21,1,20,20,0,0,1,1,#FFFFFF
strsp 302,"It's good on bread, and to eat from the jar.",50,480,23,1,20,20,0,0,1,1,#FFFFFF
strsp 303,"As expected, Alice makes me carry this too.",50,510,23,1,20,20,0,0,1,1,#FFFFFF
return



*item008

strsp 301,"A treasure of Captain Selene.",50,450,16,1,20,20,0,0,1,1,#FFFFFF
strsp 302,"As long as it's on the bow of a ship, any storm can be weathered.",50,480,34,1,20,20,0,0,1,1,#FFFFFF
lsp 303,":s/20,20,0;#FFFFFF",50,510
return



*item009

strsp 301,"A gem received from Meia.",50,450,14,1,20,20,0,0,1,1,#FFFFFF
strsp 302,"With this, I can get to the sea temple.",50,480,21,1,20,20,0,0,1,1,#FFFFFF
lsp 303,":s/20,20,0;#FFFFFF",50,510
return



*item010

if %item04=1 strsp 301,"A pledge from Meia and her husband.",50,450,19,1,20,20,0,0,1,1,#FFFFFF
if %item04=1 strsp 302,"What kind of ceremony is this, anyway...",50,480,21,1,20,20,0,0,1,1,#FFFFFF
if %item04=2 strsp 301,"Matching rings given by Kraken.",50,450,17,1,20,20,0,0,1,1,#FFFFFF
if %item04=2 strsp 302,"This is their proof of marriage.",50,480,17,1,20,20,0,0,1,1,#FFFFFF
lsp 303,":s/20,20,0;#FFFFFF",50,510
return



*item011

if %item05>0 strsp 301,"A beautiful gem received from Sphinx.",50,450,20,1,20,20,0,0,1,1,#FFFFFF
if %item05>0 strsp 302,"I don't know what it's used for, but it seems magical.",50,480,28,1,20,20,0,0,1,1,#FFFFFF
if %item05>0 lsp 303,":s/20,20,0;#FFFFFF",50,510
if %item01>9 strsp 301,"A Yellow Orb to revive the Holy Wings.",50,450,20,1,20,20,0,0,1,1,#FFFFFF
if %item01>9 strsp 302,"It will revive if six are collected, it seems.",50,480,24,1,20,20,0,0,1,1,#FFFFFF
if %item01>9 lsp 303,":s/20,20,0;#FFFFFF",50,510
return



*item012

if %item06>0 strsp 301,"A beautiful gem received from Queen Noah.",50,450,22,1,20,20,0,0,1,1,#FFFFFF
if %item06>0 strsp 302,"I don't know what it's used for, but it seems magical.",50,480,28,1,20,20,0,0,1,1,#FFFFFF
if %item06>0 lsp 303,":s/20,20,0;#FFFFFF",50,510
if %item01>9 strsp 301,"A Green Orb to revive the Holy Wings.",50,450,20,1,20,20,0,0,1,1,#FFFFFF
if %item01>9 strsp 302,"It will revive if six are collected, it seems.",50,480,24,1,20,20,0,0,1,1,#FFFFFF
if %item01>9 lsp 303,":s/20,20,0;#FFFFFF",50,510
return



*item013

strsp 301,"A Blue Orb to revive the Holy Wings.",50,450,19,1,20,20,0,0,1,1,#FFFFFF
strsp 302,"It will revive if six are collected, it seems.",50,480,24,1,20,20,0,0,1,1,#FFFFFF
lsp 303,":s/20,20,0;#FFFFFF",50,510
return



*item014

strsp 301,"A Silver Orb to revive the Holy Wings.",50,450,20,1,20,20,0,0,1,1,#FFFFFF
strsp 302,"It will revive if six are collected, it seems.",50,480,24,1,20,20,0,0,1,1,#FFFFFF
lsp 303,":s/20,20,0;#FFFFFF",50,510
return



*item015

strsp 301,"A Purple Orb to revive the Holy Wings.",50,450,20,1,20,20,0,0,1,1,#FFFFFF
strsp 302,"It will revive if six are collected, it seems.",50,480,24,1,20,20,0,0,1,1,#FFFFFF
lsp 303,":s/20,20,0;#FFFFFF",50,510
return



*item016

strsp 301,"An inedible food I was forced to buy in Port Natalia.",50,450,28,1,20,20,0,0,1,1,#FFFFFF
strsp 302,"Even Alice doesn't want it...",50,480,16,1,20,20,0,0,1,1,#FFFFFF
lsp 303,":s/20,20,0;#FFFFFF",50,510
return



*item017

strsp 301,"A book [borrowed] from San Ilia castle.",50,450,21,1,20,20,0,0,1,1,#FFFFFF
strsp 302,"I can't return it, so I may have it checked out a while.",50,480,29,1,20,20,0,0,1,1,#FFFFFF
lsp 303,":s/20,20,0;#FFFFFF",50,510
return



*item018

strsp 301,"Anti-ghost water bought in San Ilia.",50,450,19,1,20,20,0,0,1,1,#FFFFFF
strsp 302,"I think it's normal water.",50,480,14,1,20,20,0,0,1,1,#FFFFFF
lsp 303,":s/20,20,0;#FFFFFF",50,510
return



*item019

strsp 301,"An inedible food I was forced to buy in Port Natalia.",50,450,28,1,20,20,0,0,1,1,#FFFFFF
strsp 302,"It seems worse than the starfish.",50,480,18,1,20,20,0,0,1,1,#FFFFFF
strsp 303,"Alice is horrified at it.",50,510,14,1,20,20,0,0,1,1,#FFFFFF
return



*item020

if %item12=1 strsp 301,"A sign of friendship from a cute fairy.",50,450,21,1,20,20,0,0,1,1,#FFFFFF
if %item12=1 strsp 302,"Power flowed through me when I got it.",50,480,20,1,20,20,0,0,1,1,#FFFFFF
if %item12=1 strsp 303,"It's an important treasure of mine.",50,510,19,1,20,20,0,0,1,1,#FFFFFF
if %item12=2 strsp 301,"Created by combining the Fairy Acorn and Nekomata's Bell.",50,450,30,1,20,20,0,0,1,1,#FFFFFF
if %item12=2 strsp 302,"Holding the power of friendship, I can see the Fairies and Nekomata.",50,480,35,1,20,20,0,0,1,1,#FFFFFF
if %item12=2 strsp 303,"It's an important treasure to me.",50,510,18,1,20,20,0,0,1,1,#FFFFFF
return



*item021

lsp 301,":s/20,20,0;#FFFFFFUwaaaaaaaaaaa!! ",50,450
lsp 302,":s/20,20,0;#FFFFFF",50,480
lsp 303,":s/20,20,0;#FFFFFF",50,510
return



*item022

if %item13=1 strsp 301,"A lamp containing a Genie Girl.",50,450,17,1,20,20,0,0,1,1,#FFFFFF
if %item13=1 strsp 302,"It was dangerous to leave her there, so I kept it.",50,480,26,1,20,20,0,0,1,1,#FFFFFF
if %item13=1 strsp 303,"I can't destroy it or dispose of it... How annoying.",50,510,27,1,20,20,0,0,1,1,#FFFFFF
if %item13=2 strsp 301,"A lottery ticket given with gold for the lamp.",50,450,24,1,20,20,0,0,1,1,#FFFFFF
if %item13=2 strsp 302,"Looks like I can use it in Gold Port.",50,480,20,1,20,20,0,0,1,1,#FFFFFF
if %item13=2 lsp 303,":s/20,20,0;#FFFFFF",50,510
if %item13=3 strsp 301,"The first prize from the lottery.",50,450,18,1,20,20,0,0,1,1,#FFFFFF
if %item13=3 strsp 302,"It used to have the power of luck, but it's mostly gone now.",50,480,31,1,20,20,0,0,1,1,#FFFFFF
if %item13=3 lsp 303,":s/20,20,0;#FFFFFFSeems worthless. ",50,510
return



*item023

strsp 301,"A strange flower bought from an Alraune florist.",50,450,25,1,20,20,0,0,1,1,#FFFFFF
strsp 302,"Part of it is wilting...",50,480,13,1,20,20,0,0,1,1,#FFFFFF
strsp 303,"Due to the large bite mark from Alice on it...",50,510,24,1,20,20,0,0,1,1,#FFFFFF
return



*item024

strsp 301,"A bell from a Nekomata.",50,450,13,1,20,20,0,0,1,1,#FFFFFF
strsp 302,"There was some power in it at first, but not any longer.",50,480,29,1,20,20,0,0,1,1,#FFFFFF
strsp 303,"I had to give food to get it. Alice might get angry if she finds out.",50,510,36,1,20,20,0,0,1,1,#FFFFFF
return



*item025

strsp 301,"It's fluffy...",50,450,8,1,20,20,0,0,1,1,#FFFFFF
lsp 302,":s/20,20,0;#FFFFFF",50,480
lsp 303,":s/20,20,0;#FFFFFF",50,510
return



*item026

strsp 301,"A beautiful medal that only a true Hero can hold.",50,450,26,1,20,20,0,0,1,1,#FFFFFF
strsp 302,"Useless medal. I can only look at it and smirk.",50,480,25,1,20,20,0,0,1,1,#FFFFFF
lsp 303,":s/20,20,0;#FFFFFF",50,510
return



*item027

strsp 301,"A jewel obtained from Amira.",50,450,15,1,20,20,0,0,1,1,#FFFFFF
strsp 302,"It held the power of victory, but it's mostly gone now.",50,480,29,1,20,20,0,0,1,1,#FFFFFF
strsp 303,"Seems to be useless.",50,510,11,1,20,20,0,0,1,1,#FFFFFF
return



*menu_skill

saveoff
screen_clear
lsp 502,":a;system\system_bg.jpg",0,0
lsp 501,":a;system\window5.bmp",25,50
lsp 141,":c;system\m_title_skill.jpg",20,20
lsp 142,":c;system\system_barx_u.jpg",0,0
lsp 143,":c;system\system_barx_d.jpg",0,560
goto *menu_skill2



*menu_skill2

btndef clear
lsp 111,":c/2,0,3;system\return.bmp",20,560:spbtn 111,111
if %skill01>0 strsp 201,"Demon Decapitation (SP:2)",50,80,14,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 201,201
if %skill01>12 strsp 201,"Serene Demon Sword (SP:2)",50,80,14,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 201,201
if %skill01>16 strsp 201,"Demon Decapitation (SP:2)",50,80,14,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 201,201
if %skill01>18 strsp 201,"Flash Kill (SP:2)",50,80,10,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 201,201
if %skill01>2 && %skill01<11 strsp 202,"Thunder Thrust (SP:2)",400,80,12,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 202,202
if %skill01>10 lsp 202,":s/20,20,0;#FFFFFF#FF4444Lightning Sword Flash (SP:2) ",400,80:spbtn 202,202
if %skill01>16 strsp 202,"Thunder Thrust (SP:2)",400,80,12,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 202,202
if %skill01>18 strsp 202,"Ninefold Rakshasa (SP:6)",400,80,13,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 202,202
if %skill01>4 lsp 203,":s/20,20,0;#FFFFFF#FF4444Demon Skull Beheading (SP:3) ",50,120:spbtn 203,203
if %skill01>11 strsp 203,"Earth Rumbling Decapitation (SP:3)",50,120,18,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 203,203
if %skill01>16 lsp 203,":s/20,20,0;#FFFFFF#FF4444Demon Skull Beheading (SP:3) ",50,120:spbtn 203,203
if %skill01>18 strsp 203,"Heavenly Demon Revival (SP:4)",50,120,16,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 203,203
if %skill01>1 && %skill01<6 strsp 204,"Flail Wildly (SP:2)",400,120,11,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 204,204
if %skill01>5 strsp 204,"Death Sword Chaos Star (SP:4)",400,120,16,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 204,204
if %skill01>15 strsp 204,"Vaporizing Rebellion Sword (SP:4)",400,120,18,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 204,204
if %skill01>16 strsp 204,"Death Sword Chaos Star (SP:4)",400,120,16,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 204,204
if %skill01>18 lsp 204,":s/20,20,0;#FFFFFF#FF4444Daystar (SP:8) ",400,120:spbtn 204,204
if %skill01>3 strsp 205,"Meditation (SP:3)",50,160,10,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 205,205
strsp 206,"Edging (SP:0)",400,160,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 206,206
if %skill01>17 && %skill04=0 strsp 207,"Serene Mind (SP:2)",50,200,10,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 207,213
if %skill01>19 lsp 207,":s/20,20,0;#FFFFFF#FF4444Element Spica (SP:9) ",50,200:spbtn 207,215
if %skill01>14 && %skill01<17 strsp 208,"Quadruple Giga (SP:1)",400,200,12,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 208,208
if %skill01>20 strsp 208,"Quadruple Giga (SP:1)",400,200,12,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 208,208
if %skill01>6 && %skill01<17 && %skill02=0 lsp 209,":s/20,20,0;#FFFFFF#FF4444Sylph (Lvl:1) (SP:2) ",50,240:spbtn 209,209
if %skill01>6 && %skill02=2 lsp 209,":s/20,20,0;#FFFFFF#FF4444Sylph (Lvl:2) (SP:2) ",50,240:spbtn 209,209
if %skill01>6 && %skill02=3 lsp 209,":s/20,20,0;#FFFFFF#FF4444Sylph (Lvl:3) (SP:1) ",50,240:spbtn 209,209
if %skill01>6 && %skill02=4 lsp 209,":s/20,20,0;#FFFFFF#FF4444Sylph (Lvl:2) (SP:2) ",50,240:spbtn 209,209
if %skill01>6 && %skill02=5 lsp 209,":s/20,20,0;#FFFFFF#FF4444Sylph (Lvl:3) (SP:1) ",50,240:spbtn 209,209
if %skill01>7 && %skill01<17 && %skill03=0 lsp 210,":s/20,20,0;#FFFFFF#FF4444Gnome (Lvl:1) (SP:2) ",400,240:spbtn 210,210
if %skill01>7 && %skill03=2 lsp 210,":s/20,20,0;#FFFFFF#FF4444Gnome (Lvl:2) (SP:2) ",400,240:spbtn 210,210
if %skill01>7 && %skill03=3 lsp 210,":s/20,20,0;#FFFFFF#FF4444Gnome (Lvl:3) (SP:1) ",400,240:spbtn 210,210
if %skill01>7 && %skill03=4 lsp 210,":s/20,20,0;#FFFFFF#FF4444Gnome (Lvl:2) (SP:2) ",400,240:spbtn 210,210
if %skill01>7 && %skill03=5 lsp 210,":s/20,20,0;#FFFFFF#FF4444Gnome (Lvl:3) (SP:1) ",400,240:spbtn 210,210
if %skill01>9 && %skill01<17 && %skill04=0 strsp 211,"Undine (Lvl:1) (SP:2)",50,280,12,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 211,211
if %skill01>9 && %skill04=2 strsp 211,"Undine (Lvl:2) (SP:All)",50,280,13,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 211,211
if %skill01>9 && %skill04=3 strsp 211,"Undine (Lvl:3) (SP:4)",50,280,12,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 211,211
if %skill01>9 && %skill04=4 strsp 211,"Undine (Lvl:2) (SP:2)",50,280,12,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 211,211
if %skill01>9 && %skill04=5 strsp 211,"Undine (Lvl:3) (SP:2)",50,280,12,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 211,211
if %skill01>13 && %skill01<17 && %skill05=0 strsp 212,"Salamander (Lvl:1) (SP:2)",400,280,14,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 212,212
if %skill01>13 && %skill05=2 strsp 212,"Salamander (Lvl:2) (SP:2)",400,280,14,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 212,212
if %skill01>13 && %skill05=3 strsp 212,"Salamander (Lvl:3) (SP:4)",400,280,14,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 212,212
if %skill01>13 && %skill05=4 strsp 212,"Salamander (Lvl:2) (SP:4)",400,280,14,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 212,212
if %skill01>13 && %skill05=5 strsp 212,"Salamander (Lvl:3) (SP:4)",400,280,14,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 212,212
if %skill01>18 && %skill02=0 strsp 213,"Fallen Angel Dance (SP:2)",50,320,14,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 213,214
if %skill01>21 strsp 213,"Quad Spirit Summon (SP:10)",50,320,14,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 213,216
btnwait %bwait
if %bwait=201 gosub *menu_skill01
if %bwait=202 gosub *menu_skill03
if %bwait=203 gosub *menu_skill05
if %bwait=204 gosub *menu_skill02
if %bwait=205 gosub *menu_skill04
if %bwait=206 gosub *menu_skill06
if %bwait=208 gosub *menu_skill17
if %bwait=209 gosub *menu_skill13
if %bwait=210 gosub *menu_skill14
if %bwait=211 gosub *menu_skill15
if %bwait=212 gosub *menu_skill16
if %bwait=213 gosub *menu_skill18
if %bwait=214 gosub *menu_skill19
if %bwait=215 gosub *menu_skill20
if %bwait=216 gosub *menu_skill21
if %bwait=111 screen_clear:return
if %bwait=-1 screen_clear:return
if %bwait=-10 screen_clear:return
if %bwait=-11 screen_clear:return
goto *menu_skill2



*menu_skill01

if %skill01>0 strsp 301,"Jump at the enemy, and slash at their neck.",50,450,23,1,20,20,0,0,1,1,#FFFFFF
if %skill01>0 strsp 302,"An easy technique that compliments Luka's small stature.",50,480,29,1,20,20,0,0,1,1,#FFFFFF
if %skill01>0 lsp 303,":s/20,20,0;#FFFFFF",50,510
if %skill01>12 strsp 301,"An Iai skill used with a serene mind.",50,450,20,1,20,20,0,0,1,1,#FFFFFF
if %skill01>12 strsp 302,"Deals extreme damage when Undine is summoned.",50,480,24,1,20,20,0,0,1,1,#FFFFFF
if %skill01>12 strsp 303,"In addition, it can forcibly end the Undine summon.",50,510,27,1,20,20,0,0,1,1,#FFFFFF
if %skill01>16 strsp 301,"Jump at the enemy, and slash at their neck.",50,450,23,1,20,20,0,0,1,1,#FFFFFF
if %skill01>16 strsp 302,"An easy technique that compliments Luka's small stature.",50,480,29,1,20,20,0,0,1,1,#FFFFFF
if %skill01>16 lsp 303,":s/20,20,0;#FFFFFF",50,510
if %skill01>18 strsp 301,"A secret fallen angel skill to cut through space and time.",50,450,30,1,20,20,0,0,1,1,#FFFFFF
if %skill01>18 strsp 302,"It has very high damage for low SP use.",50,480,21,1,20,20,0,0,1,1,#FFFFFF
if %skill01>18 strsp 303,"It seems to be compatible with the power of wind...",50,510,27,1,20,20,0,0,1,1,#FFFFFF
return



*menu_skill02

if %skill01>1 && %skill01<6 strsp 301,"A horrible technique that involves swinging at random.",50,450,28,1,20,20,0,0,1,1,#FFFFFF
if %skill01>1 && %skill01<6 strsp 302,"A waste of SP, it shouldn't be used.",50,480,19,1,20,20,0,0,1,1,#FFFFFF
if %skill01>1 && %skill01<6 lsp 303,":s/20,20,0;#FFFFFF",50,510
if %skill01>5 strsp 301,"A deadly sword attack that slashes the enemy multiple times.",50,450,31,1,20,20,0,0,1,1,#FFFFFF
if %skill01>5 strsp 302,"Though the power is high, so is the SP consumption.",50,480,27,1,20,20,0,0,1,1,#FFFFFF
if %skill01>5 lsp 303,":s/20,20,0;#FFFFFF",50,510
if %skill01>15 strsp 301,"Innumerable slashes infused with the flames of purgatory.",50,450,30,1,20,20,0,0,1,1,#FFFFFF
if %skill01>15 strsp 302,"An incredibly powerful skill created by Granberia.",50,480,26,1,20,20,0,0,1,1,#FFFFFF
if %skill01>15 strsp 303,"Power is increased when Salamander is summoned at the same time.",50,510,33,1,20,20,0,0,1,1,#FFFFFF
if %skill01>16 strsp 301,"A deadly sword attack that slashes the enemy multiple times.",50,450,31,1,20,20,0,0,1,1,#FFFFFF
if %skill01>16 strsp 302,"Though the power is high, so is the SP consumption.",50,480,27,1,20,20,0,0,1,1,#FFFFFF
if %skill01>16 lsp 303,":s/20,20,0;#FFFFFF",50,510
if %skill01>18 strsp 301,"The ultimate skill of one of the original fallen angels.",50,450,29,1,20,20,0,0,1,1,#FFFFFF
if %skill01>18 strsp 302,"It counters the enemy, and annihilates them.",50,480,23,1,20,20,0,0,1,1,#FFFFFF
if %skill01>18 strsp 303,"It seems to be compatible with the power of water...",50,510,27,1,20,20,0,0,1,1,#FFFFFF
return



*menu_skill03

if %skill01>2 && %skill01<11 strsp 301,"A high-speed attack that involves lunging at the enemy.",50,450,29,1,20,20,0,0,1,1,#FFFFFF
if %skill01>2 && %skill01<11 strsp 302,"If used on the first turn, it will deal bonus damage.",50,480,28,1,20,20,0,0,1,1,#FFFFFF
if %skill01>2 && %skill01<11 lsp 303,":s/20,20,0;#FFFFFF",50,510
if %skill01>10 strsp 301,"Art that uses the wind's movement boost to strike like lightning.",50,450,34,1,20,20,0,0,1,1,#FFFFFF
if %skill01>10 strsp 302,"Deals bonus damage when used on the first turn.",50,480,25,1,20,20,0,0,1,1,#FFFFFF
if %skill01>10 strsp 303,"In addition, power is increased if Sylph is summoned.",50,510,28,1,20,20,0,0,1,1,#FFFFFF
if %skill01>16 strsp 301,"A high-speed attack that involves lunging at the enemy.",50,450,29,1,20,20,0,0,1,1,#FFFFFF
if %skill01>16 strsp 302,"If used on the first turn, it will deal bonus damage.",50,480,28,1,20,20,0,0,1,1,#FFFFFF
if %skill01>16 lsp 303,":s/20,20,0;#FFFFFF",50,510
if %skill01>18 strsp 301,"A flurry of swords that is executed in a dance of death.",50,450,29,1,20,20,0,0,1,1,#FFFFFF
if %skill01>18 strsp 302,"A legendary skill that only the most powerful of angels could use.",50,480,34,1,20,20,0,0,1,1,#FFFFFF
if %skill01>18 strsp 303,"It seems to be compatible with the power of fire...",50,510,27,1,20,20,0,0,1,1,#FFFFFF
return



*menu_skill04

strsp 301,"Concentrating the spirit, HP is restored.",50,450,22,1,20,20,0,0,1,1,#FFFFFF
strsp 302,"Half of Luka's maximum HP is recovered.",50,480,21,1,20,20,0,0,1,1,#FFFFFF
lsp 303,":s/20,20,0;#FFFFFF",50,510
return



*menu_skill05

if %skill01>4 strsp 301,"A deadly attack that involves jumping off somewhere high.",50,450,30,1,20,20,0,0,1,1,#FFFFFF
if %skill01>4 strsp 302,"Incredibly strong, but not usable everywhere.",50,480,24,1,20,20,0,0,1,1,#FFFFFF
if %skill01>4 lsp 303,":s/20,20,0;#FFFFFF",50,510
if %skill01>11 strsp 301,"Bring in the earth's power for a deadly blow from above.",50,450,29,1,20,20,0,0,1,1,#FFFFFF
if %skill01>11 strsp 302,"Incredibly powerful, it's usable without jumping off something.",50,480,33,1,20,20,0,0,1,1,#FFFFFF
if %skill01>11 strsp 303,"Moreover, power is increased if Gnome is summoned.",50,510,26,1,20,20,0,0,1,1,#FFFFFF
if %skill01>16 strsp 301,"A deadly attack that involves jumping off somewhere high.",50,450,30,1,20,20,0,0,1,1,#FFFFFF
if %skill01>16 strsp 302,"Incredibly strong, but not usable everywhere.",50,480,24,1,20,20,0,0,1,1,#FFFFFF
if %skill01>16 lsp 303,":s/20,20,0;#FFFFFF",50,510
if %skill01>18 strsp 301,"A mysterious technique that concentrates magic to destroy enemies.",50,450,34,1,20,20,0,0,1,1,#FFFFFF
if %skill01>18 strsp 302,"None who have witnessed this skill has lived to describe it.",50,480,31,1,20,20,0,0,1,1,#FFFFFF
if %skill01>18 strsp 303,"It seems to be compatible with the power of earth...",50,510,27,1,20,20,0,0,1,1,#FFFFFF
return



*menu_skill06

strsp 301,"A daring move that sharply decreases Luka's HP.",50,450,25,1,20,20,0,0,1,1,#FFFFFF
strsp 302,"The slightest touch might set Luka off when he's on the edge.",50,480,32,1,20,20,0,0,1,1,#FFFFFF
lsp 303,":s/20,20,0;#FFFFFF",50,510
return



*menu_skill13

if %skill02=0 strsp 301,"Borrows Sylph's power to create a strong wind.",50,450,24,1,20,20,0,0,1,1,#FFFFFF
if %skill02=0 strsp 302,"A small chance to nullify attacks. It lasts up to eight turns.",50,480,32,1,20,20,0,0,1,1,#FFFFFF
if %skill02=0 lsp 303,":s/20,20,0;#FFFFFF",50,510
if %skill02=2 strsp 301,"Manipulate the power of the wind, and move like a gale.",50,450,29,1,20,20,0,0,1,1,#FFFFFF
if %skill02=2 strsp 302,"In addition to avoiding enemy attacks, no attack will miss.",50,480,31,1,20,20,0,0,1,1,#FFFFFF
if %skill02=2 lsp 303,":s/20,20,0;#FFFFFF",50,510
if %skill02=3 strsp 301,"Infuse self with a devastating gale to increase movement speed.",50,450,33,1,20,20,0,0,1,1,#FFFFFF
if %skill02=3 strsp 302,"Able to avoid many attacks and attack twice.",50,480,23,1,20,20,0,0,1,1,#FFFFFF
if %skill02=3 lsp 303,":s/20,20,0;#FFFFFF",50,510
if %skill02=4 strsp 301,"Fallen Angel Dance is strengthened by the wind's power.",50,450,29,1,20,20,0,0,1,1,#FFFFFF
if %skill02=4 strsp 302,"In addition to avoiding attacks, yours also no longer miss.",50,480,31,1,20,20,0,0,1,1,#FFFFFF
if %skill02=4 strsp 303,"Shows a large effect when facing angels.",50,510,21,1,20,20,0,0,1,1,#FFFFFF
if %skill02=5 strsp 301,"Infuse self with Sylph's power to strengthen Fallen Angel Dance to max.",50,450,37,1,20,20,0,0,1,1,#FFFFFF
if %skill02=5 strsp 302,"Able to avoid many attacks and attack twice.",50,480,23,1,20,20,0,0,1,1,#FFFFFF
if %skill02=5 strsp 303,"Effect is most visible against angels.",50,510,20,1,20,20,0,0,1,1,#FFFFFF
return



*menu_skill14

if %skill03=0 strsp 301,"Borrows Gnome's power of the Earth.",50,450,19,1,20,20,0,0,1,1,#FFFFFF
if %skill03=0 strsp 302,"With incredible strength, no bind is too strong.",50,480,25,1,20,20,0,0,1,1,#FFFFFF
if %skill03=0 strsp 303,"But it's too difficult to control for attacking for now.",50,510,29,1,20,20,0,0,1,1,#FFFFFF
if %skill03=2 strsp 301,"The ability to take the breath of the earth itself into the body.",50,450,34,1,20,20,0,0,1,1,#FFFFFF
if %skill03=2 strsp 302,"Defense sharply rises, as does the chance for a critical hit.",50,480,32,1,20,20,0,0,1,1,#FFFFFF
if %skill03=2 strsp 303,"In addition, binds are more easily broken.",50,510,22,1,20,20,0,0,1,1,#FFFFFF
if %skill03=3 strsp 301,"The ability to fill your own body with the power of the Earth.",50,450,32,1,20,20,0,0,1,1,#FFFFFF
if %skill03=3 strsp 302,"Nearly immune to physical damage, and pleasure damage is reduced.",50,480,34,1,20,20,0,0,1,1,#FFFFFF
if %skill03=3 strsp 303,"All attacks are critical hits, and binds can be broken easier.",50,510,32,1,20,20,0,0,1,1,#FFFFFF
if %skill03=4 strsp 301,"Due to being weakened, Gnome can't wield her previous powers.",50,450,32,1,20,20,0,0,1,1,#FFFFFF
if %skill03=4 strsp 302,"Defense improves, and so do the odds of delivering a critical strike.",50,480,36,1,20,20,0,0,1,1,#FFFFFF
if %skill03=4 strsp 303,"Of course, binds are more easily broken out of as well.",50,510,29,1,20,20,0,0,1,1,#FFFFFF
if %skill03=5 strsp 301,"The ability to fill your own body with the power of the Earth.",50,450,32,1,20,20,0,0,1,1,#FFFFFF
if %skill03=5 strsp 302,"Nearly immune to physical damage, and pleasure damage is reduced.",50,480,34,1,20,20,0,0,1,1,#FFFFFF
if %skill03=5 strsp 303,"All attacks are critical hits, and binds can be broken easier.",50,510,32,1,20,20,0,0,1,1,#FFFFFF
return



*menu_skill15

if %skill04=0 strsp 301,"Borrows Undine's power to create a barrier of water.",50,450,27,1,20,20,0,0,1,1,#FFFFFF
if %skill04=0 strsp 302,"The damage reduction is not nearly as powerful as the Earth's.",50,480,32,1,20,20,0,0,1,1,#FFFFFF
if %skill04=0 strsp 303,"This isn't the true power of water. Luka just can't use it right.",50,510,34,1,20,20,0,0,1,1,#FFFFFF
if %skill04=2 strsp 301,"Entrust yourself to the flow, and attain a serene mind.",50,450,29,1,20,20,0,0,1,1,#FFFFFF
if %skill04=2 strsp 302,"Offense increased, and almost every attack is evaded.",50,480,28,1,20,20,0,0,1,1,#FFFFFF
if %skill04=2 strsp 303,"SP decreases by one every turn, until reaching zero.",50,510,27,1,20,20,0,0,1,1,#FFFFFF
if %skill04=3 strsp 301,"Entrust yourself to the flow, and attain a completely serene mind.",50,450,34,1,20,20,0,0,1,1,#FFFFFF
if %skill04=3 strsp 302,"Attack power increased, and almost every attack is avoided.",50,480,31,1,20,20,0,0,1,1,#FFFFFF
if %skill04=3 strsp 303,"There is no SP reduction, but it fades eventually.",50,510,26,1,20,20,0,0,1,1,#FFFFFF
if %skill04=4 strsp 301,"Due to being weakened, Undine can't wield her previous powers.",50,450,32,1,20,20,0,0,1,1,#FFFFFF
if %skill04=4 strsp 302,"Normal attack power rises, and attacks can be evaded.",50,480,28,1,20,20,0,0,1,1,#FFFFFF
if %skill04=4 strsp 303,"Very effective against monsters.",50,510,17,1,20,20,0,0,1,1,#FFFFFF
if %skill04=5 strsp 301,"Entrust yourself to the flow, and attain a completely serene mind.",50,450,34,1,20,20,0,0,1,1,#FFFFFF
if %skill04=5 strsp 302,"Attack power increased, and almost every attack is avoided.",50,480,31,1,20,20,0,0,1,1,#FFFFFF
if %skill04=5 strsp 303,"Effect is most visible against monsters.",50,510,21,1,20,20,0,0,1,1,#FFFFFF
return



*menu_skill16

if %skill05=0 strsp 301,"Borrow Salamander's power to ignite your fighting spirit.",50,450,30,1,20,20,0,0,1,1,#FFFFFF
if %skill05=0 strsp 302,"Power is slightly increased, but you can't meditate.",50,480,27,1,20,20,0,0,1,1,#FFFFFF
if %skill05=0 strsp 303,"Not very useful, but isn't indicative of the true power of fire.",50,510,33,1,20,20,0,0,1,1,#FFFFFF
if %skill05=2 strsp 301,"A skill to ignite your fighting spirit to its max.",50,450,26,1,20,20,0,0,1,1,#FFFFFF
if %skill05=2 strsp 302,"SP is maxed out, and attack power is increased.",50,480,25,1,20,20,0,0,1,1,#FFFFFF
if %skill05=2 strsp 303,"When the effect fades, SP goes to zero.",50,510,21,1,20,20,0,0,1,1,#FFFFFF
if %skill05=3 strsp 301,"Infuse self with the purifying flames of purgatory.",50,450,27,1,20,20,0,0,1,1,#FFFFFF
if %skill05=3 strsp 302,"SP completely recovers, and attack power increases.",50,480,27,1,20,20,0,0,1,1,#FFFFFF
if %skill05=3 strsp 303,"Meditation is usable, and SP isn't drained after it fades.",50,510,30,1,20,20,0,0,1,1,#FFFFFF
if %skill05=4 strsp 301,"Due to being weakened, Salamander can't wield her previous powers.",50,450,34,1,20,20,0,0,1,1,#FFFFFF
if %skill05=4 strsp 302,"SP is maxed out, and attack power is increased.",50,480,25,1,20,20,0,0,1,1,#FFFFFF
if %skill05=4 strsp 303,"When the effect fades, SP goes to zero.",50,510,21,1,20,20,0,0,1,1,#FFFFFF
if %skill05=5 strsp 301,"Infuse self with the purifying flames of purgatory.",50,450,27,1,20,20,0,0,1,1,#FFFFFF
if %skill05=5 strsp 302,"SP completely recovers, and attack power increases.",50,480,27,1,20,20,0,0,1,1,#FFFFFF
if %skill05=5 strsp 303,"Meditation is usable, and SP isn't drained after it fades.",50,510,30,1,20,20,0,0,1,1,#FFFFFF
return



*menu_skill17

strsp 301,"An ultimate skill, using all four spirits to destroy an enemy.",50,450,32,1,20,20,0,0,1,1,#FFFFFF
strsp 302,"If an attack is taken during the four turns of charging, it fails.",50,480,34,1,20,20,0,0,1,1,#FFFFFF
strsp 303,"In addition, all summoned spirits vanish when the skill is started.",50,510,35,1,20,20,0,0,1,1,#FFFFFF
return



*menu_skill18

strsp 301,"Even without Undine, a serene state can be obtained.",50,450,27,1,20,20,0,0,1,1,#FFFFFF
strsp 302,"Normal attack power rises, and avoidance increases.",50,480,27,1,20,20,0,0,1,1,#FFFFFF
strsp 303,"It seems particularly effective against monsters.",50,510,26,1,20,20,0,0,1,1,#FFFFFF
return



*menu_skill19

strsp 301,"A secret skill to unify with a holy wave and avoid attacks.",50,450,31,1,20,20,0,0,1,1,#FFFFFF
strsp 302,"It seems particularly effective against angels.",50,480,25,1,20,20,0,0,1,1,#FFFFFF
lsp 303,":s/20,20,0;#FFFFFF",50,510
return



*menu_skill20

strsp 301,"Concentrate the power of the Four Spirits into your right arm.",50,450,32,1,20,20,0,0,1,1,#FFFFFF
strsp 302,"A devastating technique taught by Heinrich.",50,480,23,1,20,20,0,0,1,1,#FFFFFF
lsp 303,":s/20,20,0;#FFFFFF",50,510
return



*menu_skill21

strsp 301,"Consumes a lot of SP, but able to summon all four spirits at once.",50,450,34,1,20,20,0,0,1,1,#FFFFFF
strsp 302,"Costs more SP, but much faster.",50,480,17,1,20,20,0,0,1,1,#FFFFFF
lsp 303,":s/20,20,0;#FFFFFF",50,510
return



*menu_kiroku

saveoff
screen_clear
mov %count_zukan1,0
mov %count_zukan2,0
mov %count_zukan3,0
if %2501>0 && %2502>0 && %2503>0 && %2504>0 && %2505>0 && %2506>0 && %2507>0 && %2508>0 && %2509>0 && %2510>0 && %2511>0 && %2512>0 && %2513>0 && %2514>0 && %2515>0 && %2516>0 && %2517>0 && %2518>0 && %2519>0 && %2520>0 && %2521>0 && %2522>0 && %2523>0 && %2524>0 && %2525>0 && %2526>0 && %2527>0 && %2528>0 && %2529>0 && %2530>0 && %2531>0 && %2532>0 && %2533>0 && %2534>0 && %2535>0 && %2536>0 && %2537>0 && %2538>0 && %2539>0 && %2540>0 && %2541>0 && %2542>0 && %2543>0 && %2544>0 && %2545>0 && %2546>0 && %2547>0 && %2548>0 && %2549>0 && %2550>0 && %2551>0 && %2552>0 && %2553>0 && %2554>0 && %2555>0 && %2556>0 && %2557>0 && %2558>0 && %2559>0 && %2560>0 && %2561>0 && %2562>0 && %2563>0 && %2564>0 && %2565>0 && %2801>0 && %2802>0 && %2803>0 && %2804>0 && %2805>0 && %2806>0 && %2807>0 && %2808>0 && %2809>0 && %2810>0 && %2811>0 && %2812>0 && %2813>0 && %2814>0 && %2815>0 && %2816>0 && %2817>0 && %2818>0 && %2819>0 && %game_clear>0 && %hsean_alice3=1 && %hsean_meia1=1 && %hsean_sara1=1 && $eval1="seen" mov %count_zukan1,1
if %2566>0 && %2567>0 && %2568>0 && %2569>0 && %2570>0 && %2571>0 && %2572>0 && %2573>0 && %2574>0 && %2575>0 && %2576>0 && %2577>0 && %2578>0 && %2579>0 && %2580>0 && %2581>0 && %2582>0 && %2583>0 && %2584>0 && %2585>0 && %2586>0 && %2587>0 && %2588>0 && %2589>0 && %2590>0 && %2591>0 && %2592>0 && %2593>0 && %2594>0 && %2595>0 && %2596>0 && %2597>0 && %2598>0 && %2599>0 && %2600>0 && %2601>0 && %2602>0 && %2603>0 && %2604>0 && %2605>0 && %2606>0 && %2607>0 && %2608>0 && %2609>0 && %2610>0 && %2611>0 && %2612>0 && %2613>0 && %2614>0 && %2615>0 && %2616>0 && %2617>0 && %2618>0 && %2619>0 && %2620>0 && %2621>0 && %2622>0 && %2624>0 && %2625>0 && %2626>0 && %2627>0 && %2628>0 && %2629>0 && %2630>0 && %2631>0 && %2633>0 && %2634>0 && %2635>0 && %2636>0 && %2637>0 && %2638>0 && %2639>0 && %2640>0 && %2641>0 && %2642>0 && %2643>0 && %2644>0 && %2645>0 && %2646>0 && %2647>0 && %2648>0 && %2649>0 && %2820>0 && %2821>0 && %2822>0 && %2823>0 && %2824>0 && %2825>0 && %2826>0 && %2827>0 && %2828>0 && %2829>0 && %2830>0 && %2831>0 && %2832>0 && %2833>0 && %2834>0 && %2835>0 && %2836>0 && %2837>0 && %2838>0 && %game_clear>1 && %hsean_irias1=1 mov %count_zukan2,1
if %2650>0 && %2651>0 && %2652>0 && %2653>0 && %2654>0 && %2655>0 && %2656>0 && %2657>0 && %2658>0 && %2659>0 && %2660>0 && %2661>0 && %2662>0 && %2663>0 && %2664>0 && %2665>0 && %2666>0 && %2667>0 && %2668>0 && %2669>0 && %2670>0 && %2671>0 && %2672>0 && %2673>0 && %2674>0 && %2675>0 && %2676>0 && %2677>0 && %2678>0 && %2679>0 && %2680>0 && %2681>0 && %2682>0 && %2683>0 && %2684>0 && %2685>0 && %2686>0 && %2687>0 && %2688>0 && %2689>0 && %2690>0 && %2691>0 && %2692>0 && %2693>0 && %2694>0 && %2695>0 && %2696>0 && %2697>0 && %2698>0 && %2699>0 && %2700>0 && %2701>0 && %2702>0 && %2703>0 && %2704>0 && %2705>0 && %2706>0 && %2707>0 && %2708>0 && %2709>0 && %2710>0 && %2711>0 && %2712>0 && %2713>0 && %2714>0 && %2715>0 && %2716>0 && %2717>0 && %2718>0 && %2719>0 && %2720>0 && %2721>0 && %2722>0 && %2723>0 && %2724>0 && %2725>0 && %2726>0 && %2727>0 && %2728>0 && %2729>0 && %2730>0 && %2731>0 && %2839>0 && %2840>0 && %2841>0 && %2842>0 && %2843>0 && %2844>0 && %2845>0 && %2846>0 && %2847>0 && %2848>0 && %2849>0 && %2850>0 && %2851>0 && %2852>0 && %2853>0 && %2854>0 && %2855>0 && %2856>0 && %2857>0 && %2858>0 && %game_clear=3 && %hsean_shitenno1>0 && %hsean_shitenno2>0 && %hsean_shitenno3>0 && %hsean_shitenno4>0 && %hsean_shitenno5>0 && %hsean_end1>0 && %hsean_end2>0 && %hsean_end3>0 && %hsean_end4>0 && %hsean_end5>0 && %hsean_end6>0 && %hsean_end7>0 && %hsean_labo>0 mov %count_zukan3,1
mov %name_count,0
for %move=3001 to 3262
if %%move>0 inc %name_count
next
if %count_oskill1<>%name_count mov %count_oskill1,%name_count
mov %name_count,0
for %move=3263 to 3382
if %%move>0 inc %name_count
next
for %move=3384 to 3659
if %%move>0 inc %name_count
next
for %move=3661 to 3668
if %%move>0 inc %name_count
next
if %count_oskill2<>%name_count mov %count_oskill2,%name_count
mov %name_count,0
if %3383>0 inc %name_count
if %3660>0 inc %name_count
for %move=3669 to 3738
if %%move>0 inc %name_count
next
for %move=3763 to 3982
if %%move>0 inc %name_count
next
for %move=3985 to 3998
if %%move>0 inc %name_count
next
for %move=4000 to 4136
if %%move>0 inc %name_count
next
if %count_oskill3<>%name_count mov %count_oskill3,%name_count
mov %page,1
lsp 502,":a;system\system_bg.jpg",0,0
lsp 501,":a;system\window10.bmp",25,50
lsp 141,":c;system\m_title_mem.jpg",20,20
lsp 142,":c;system\system_barx_u.jpg",0,0
lsp 143,":c;system\system_barx_d.jpg",0,560
itoa $sub1,%name_count:itoa $sub2,%buturisyasei:add $sub1," ":add $sub1,$sub2
goto *menu_kiroku2



*menu_kiroku2

if %page=0 mov %page,9
if %page=10 mov %page,1
itoa2 $page_h,%page
lsp 144,":s/20,20,0;#FFFFFF"+$page_h+"^X",385,500
if %page=1 gosub *menu_kiroku_page1
if %page=2 gosub *menu_kiroku_page2
if %page=3 gosub *menu_kiroku_page3
if %page=4 gosub *menu_kiroku_page4
if %page=5 gosub *menu_kiroku_page5
if %page=6 gosub *menu_kiroku_page6
if %page=7 gosub *menu_kiroku_page7
if %page=8 gosub *menu_kiroku_page8
if %page=9 gosub *menu_kiroku_page9
print 1
goto *menu_kiroku_btn



*menu_kiroku_btn

btndef clear
lsp 111,":c/2,0,3;system\return.bmp",20,560:spbtn 111,111
lsp 112,":c/2,0,3;system\menu_prev.jpg",330,500:spbtn 112,112
lsp 113,":c/2,0,3;system\menu_next.jpg",480,500:spbtn 113,113
btnwait %bwait
if %bwait=112 mov %page,%page-1:goto *menu_kiroku2
if %bwait=113 mov %page,%page+1:goto *menu_kiroku2
if %bwait=111 screen_clear:return
if %bwait=-1 screen_clear:return
if %bwait=-10 screen_clear:return
if %bwait=-11 screen_clear:return
goto *menu_kiroku_btn



*menu_kiroku_page1

itoa2 $menu_list1,%count_ko
itoa2 $menu_list2,%count_end
itoa2 $menu_list3,%count_kousan
itoa2 $menu_list4,%count_onedari
itoa2 $menu_list5,%count_hanseikai+%count_hanseikai2
itoa2 $menu_list6,%count_drainhp
itoa2 $menu_list7,%count_drainlv
itoa2 $menu_list8,%count_bouhatu
itoa2 $menu_list9,%count_most
itoa2 $menu_list10,%count_wind
itoa2 $menu_list11,%count_earth
itoa2 $menu_list12,%count_aqua
itoa2 $menu_list13,%count_fire
lsp 201,":s/20,20,0;#FFFFFFEnemies Defeated: "+$menu_list1+" ",50,80
strsp 202,"Num of Orgasms:",50,110,9,1,20,20,0,0,1,1,#FFFFFF:lsp 214,":s/20,20,0;#FFFFFF"+$menu_list2,210,110
strsp 203,"Num of Surrenders:",50,140,10,1,20,20,0,0,1,1,#FFFFFF:lsp 215,":s/20,20,0;#FFFFFF"+$menu_list3,240,140
strsp 204,"Num of Requests:",50,170,9,1,20,20,0,0,1,1,#FFFFFF:lsp 216,":s/20,20,0;#FFFFFF"+$menu_list4,220,170
strsp 205,"Num of Evaluations:",50,200,11,1,20,20,0,0,1,1,#FFFFFF:lsp 217,":s/20,20,0;#FFFFFF"+$menu_list5,250,200
strsp 206,"HP Drained in Attacks:",50,230,12,1,20,20,0,0,1,1,#FFFFFF:lsp 218,":s/20,20,0;#FFFFFF"+$menu_list6,280,230
strsp 207,"Levels Drained:",50,260,9,1,20,20,0,0,1,1,#FFFFFF:lsp 219,":s/20,20,0;#FFFFFF"+$menu_list7,210,260
strsp 208,"Num of Accidental Ejaculations:",50,290,17,1,20,20,0,0,1,1,#FFFFFF:lsp 220,":s/20,20,0;#FFFFFF"+$menu_list8,370,290
if $count_mostname="" strsp 209,"Most Lost to the Monster: None",50,320,16,1,20,20,0,0,1,1,#FFFFFF:skip 4
notif $count_mostname="" len %name_count,$count_mostname
strsp 209,"Most Lost to the Monster: "+$count_mostname+" (",50,320,(%name_count+29)/2+1,1,20,20,0,0,1,1,#FFFFFF
lsp 221,":s/20,20,0;#FFFFFF"+$menu_list9+"j ",330+%name_count*10,320
strsp 210,"Num of Sylph Summons:",50,350,12,1,20,20,0,0,1,1,#FFFFFF:lsp 222,":s/20,20,0;#FFFFFF"+$menu_list10,270,350
if %count_earth>0 strsp 211,"Num of Gnome Summons:",50,380,12,1,20,20,0,0,1,1,#FFFFFF:lsp 223,":s/20,20,0;#FFFFFF"+$menu_list11,270,380
if %count_earth=0 csp 211
if %count_aqua>0 strsp 212,"Num of Undine Summons:",50,410,12,1,20,20,0,0,1,1,#FFFFFF:lsp 224,":s/20,20,0;#FFFFFF"+$menu_list12,280,410
if %count_aqua=0 csp 212
if %count_fire>0 strsp 213,"Num of Salamander Summons:",50,440,14,1,20,20,0,0,1,1,#FFFFFF:lsp 225,":s/20,20,0;#FFFFFF"+$menu_list13,320,440
if %count_fire=0 csp 213
csp 226
return



*menu_kiroku_page2

itoa2 $menu_list1,%count_nakadashi
itoa2 $menu_list2,%count_sakuseikikan
itoa2 $menu_list3,%count_sumata
itoa2 $menu_list4,%count_fera
itoa2 $menu_list5,%count_paizuri
itoa2 $menu_list6,%count_tekoki
itoa2 $menu_list7,%count_ashikoki
itoa2 $menu_list8,%count_kami
itoa2 $menu_list9,%count_zenshin
itoa2 $menu_list10,%count_kiss
itoa2 $menu_list11,%count_analsex
itoa2 $menu_list12,%count_tikubi
itoa2 $menu_list13,%count_analseme
lsp 201,":s/20,20,0;#FFFFFFVaginal Ejaculations: "+$menu_list1+" ",50,80
lsp 202,":s/20,20,0;#FFFFFFSpecial Mouth Ejaculations: "+$menu_list2+" ",50,110
lsp 203,":s/20,20,0;#FFFFFFIntercrural Ejaculations: "+$menu_list3+" ",50,140
strsp 204,"Fellatio Ejaculations: ",50,170,13,1,20,20,0,0,1,1,#FFFFFF:lsp 214,":s/20,20,0;#FFFFFF"+$menu_list4,280,170
strsp 205,"Tit Fuck Ejaculations: ",50,200,13,1,20,20,0,0,1,1,#FFFFFF:lsp 215,":s/20,20,0;#FFFFFF"+$menu_list5,280,200
lsp 206,":s/20,20,0;#FFFFFFHandjob Ejaculations: "+$menu_list6+" ",50,230
lsp 207,":s/20,20,0;#FFFFFFFootjob Ejaculations: "+$menu_list7+" ",50,260
lsp 208,":s/20,20,0;#FFFFFFHairjob Ejaculations: "+$menu_list8+" ",50,290
lsp 209,":s/20,20,0;#FFFFFFFull-Body-Job Ejaculations: "+$menu_list9+" ",50,320
strsp 210,"Kiss Ejaculations: ",50,350,11,1,20,20,0,0,1,1,#FFFFFF:lsp 216,":s/20,20,0;#FFFFFF"+$menu_list10,240,350
strsp 211,"Anal Sex Ejaculations: ",50,380,13,1,20,20,0,0,1,1,#FFFFFF:lsp 217,":s/20,20,0;#FFFFFF"+$menu_list11,280,380
strsp 212,"Num of Nipple Torture Ejaculations: ",50,410,19,1,20,20,0,0,1,1,#FFFFFF:lsp 218,":s/20,20,0;#FFFFFF"+$menu_list12,410,410
strsp 213,"Anal Tease Ejaculations: ",50,440,13,1,20,20,0,0,1,1,#FFFFFF:lsp 219,":s/20,20,0;#FFFFFF"+$menu_list13,300,440
cspl 220,226
return



*menu_kiroku_page3

itoa2 $menu_list1,%count_zensin
itoa2 $menu_list2,%count_kusuguri
itoa2 $menu_list3,%count_ganmenkizyou
itoa2 $menu_list4,%count_tissoku
itoa2 $menu_list5,%count_onani
itoa2 $menu_list6,%count_syokusyu
itoa2 $menu_list7,%count_slime
itoa2 $menu_list8,%count_nenmaku
itoa2 $menu_list9,%count_sipppo
itoa2 $menu_list10,%count_ito
itoa2 $menu_list11,%count_role
itoa2 $menu_list12,%count_plant
itoa2 $menu_list13,%count_wing
strsp 201,"Num of Full Body Massage Ejaculations: ",50,80,20,1,20,20,0,0,1,1,#FFFFFF:lsp 214,":s/20,20,0;#FFFFFF"+$menu_list1,440,80
strsp 202,"Tickle Attack Ejaculations: ",50,110,15,1,20,20,0,0,1,1,#FFFFFF:lsp 215,":s/20,20,0;#FFFFFF"+$menu_list2,330,110
strsp 203,"Face Ride Ejaculations: ",50,140,13,1,20,20,0,0,1,1,#FFFFFF:lsp 216,":s/20,20,0;#FFFFFF"+$menu_list3,290,140
strsp 204,"Suffocation Attack Ejaculations: ",50,170,17,1,20,20,0,0,1,1,#FFFFFF:lsp 217,":s/20,20,0;#FFFFFF"+$menu_list4,380,170
strsp 205,"Forced Masturbation Ejaculations: ",50,200,18,1,20,20,0,0,1,1,#FFFFFF:lsp 218,":s/20,20,0;#FFFFFF"+$menu_list5,390,200
strsp 206,"Tentacle Attack Ejaculations: ",50,230,16,1,20,20,0,0,1,1,#FFFFFF:lsp 219,":s/20,20,0;#FFFFFF"+$menu_list6,350,230
strsp 207,"Mucus Attack Ejaculations: ",50,260,15,1,20,20,0,0,1,1,#FFFFFF:lsp 220,":s/20,20,0;#FFFFFF"+$menu_list7,320,260
strsp 208,"Mucus Membrane Attack Ejaculations: ",50,290,19,1,20,20,0,0,1,1,#FFFFFF:lsp 221,":s/20,20,0;#FFFFFF"+$menu_list8,410,290
strsp 209,"Tail Tease Attack Ejaculations: ",50,320,17,1,20,20,0,0,1,1,#FFFFFF:lsp 222,":s/20,20,0;#FFFFFF"+$menu_list9,370,320
strsp 210,"String Attack Ejaculations: ",50,350,15,1,20,20,0,0,1,1,#FFFFFF:lsp 223,":s/20,20,0;#FFFFFF"+$menu_list10,330,350
strsp 211,"Binding Attack Ejaculations: ",50,380,16,1,20,20,0,0,1,1,#FFFFFF:lsp 224,":s/20,20,0;#FFFFFF"+$menu_list11,340,380
strsp 212,"Plant Attack Ejaculations: ",50,410,15,1,20,20,0,0,1,1,#FFFFFF:lsp 225,":s/20,20,0;#FFFFFF"+$menu_list12,320,410
strsp 213,"Wing Attack Ejaculations: ",50,440,14,1,20,20,0,0,1,1,#FFFFFF:lsp 226,":s/20,20,0;#FFFFFF"+$menu_list13,310,440
return



*menu_kiroku_page4

itoa2 $menu_list1,%count_ihuku
itoa2 $menu_list2,%count_kaze
itoa2 $menu_list3,%count_marunomi
itoa2 $menu_list4,%count_buturi
itoa2 $menu_list5,%count_yuuwaku
itoa2 $menu_list6,%count_sonota
itoa2 $menu_list7,%count_kousoku
itoa2 $menu_list8,%count_koukotu
itoa2 $menu_list9,%count_mahi
itoa2 $menu_list10,%count_kuppuku
itoa2 $menu_list11,%count_yuwaku
itoa2 $menu_list12,%count_sekika
itoa2 $menu_list13,%count_konran
strsp 201,"Clotches Attack Ejaculations: ",50,80,16,1,20,20,0,0,1,1,#FFFFFF:lsp 214,":s/20,20,0;#FFFFFF"+$menu_list1,350,80
strsp 202,"Wind Attack Ejaculations: ",50,110,14,1,20,20,0,0,1,1,#FFFFFF:lsp 215,":s/20,20,0;#FFFFFF"+$menu_list2,310,110
strsp 203,"Devouring Attack Ejaculations: ",50,140,16,1,20,20,0,0,1,1,#FFFFFF:lsp 216,":s/20,20,0;#FFFFFF"+$menu_list3,360,140
strsp 204,"Downed by Physical Attacks: ",50,170,15,1,20,20,0,0,1,1,#FFFFFF:lsp 217,":s/20,20,0;#FFFFFF"+$menu_list4,330,170
strsp 205,"Defeated Self in Confusion: ",50,200,15,1,20,20,0,0,1,1,#FFFFFF:lsp 218,":s/20,20,0;#FFFFFF"+$menu_list5,330,200
strsp 206,"Other Attack Ejaculations: ",50,230,15,1,20,20,0,0,1,1,#FFFFFF:lsp 219,":s/20,20,0;#FFFFFF"+$menu_list6,320,230
strsp 207,"Num of Orgasms While Bound: ",50,260,15,1,20,20,0,0,1,1,#FFFFFF:lsp 220,":s/20,20,0;#FFFFFF"+$menu_list7,330,260
strsp 208,"Num of Orgasms While in Trance: ",50,290,17,1,20,20,0,0,1,1,#FFFFFF:lsp 221,":s/20,20,0;#FFFFFF"+$menu_list8,370,290
strsp 209,"Num of Orgasms While Paralyzed: ",50,320,17,1,20,20,0,0,1,1,#FFFFFF:lsp 222,":s/20,20,0;#FFFFFF"+$menu_list9,370,320
strsp 210,"Num of Orgasms While Seduced: ",50,350,16,1,20,20,0,0,1,1,#FFFFFF:lsp 223,":s/20,20,0;#FFFFFF"+$menu_list10,350,350
strsp 211,"Num of Orgasms While Forced to Surrender: ",50,380,22,1,20,20,0,0,1,1,#FFFFFF:lsp 224,":s/20,20,0;#FFFFFF"+$menu_list11,470,380
strsp 212,"Num of Orgasms While Petrified: ",50,410,17,1,20,20,0,0,1,1,#FFFFFF:lsp 225,":s/20,20,0;#FFFFFF"+$menu_list12,370,410
strsp 213,"Num of Orgasms While Confused: ",50,440,17,1,20,20,0,0,1,1,#FFFFFF:lsp 226,":s/20,20,0;#FFFFFF"+$menu_list13,360,440
return



*menu_kiroku_page5

itoa2 $menu_list1,%count_b001
itoa2 $menu_list2,%count_b002
itoa2 $menu_list3,%count_b003
itoa2 $menu_list4,%count_b004
itoa2 $menu_list5,%count_b005
itoa2 $menu_list6,%count_b006
itoa2 $menu_list7,%count_b007
itoa2 $menu_list8,%count_b008
itoa2 $menu_list9,%count_b009
itoa2 $menu_list10,%count_b010
itoa2 $menu_list11,%count_b011
itoa2 $menu_list12,%count_b013
itoa2 $menu_list13,%count_b014
strsp 201,"Times Kept as a Reproductive Partner: ",50,80,20,1,20,20,0,0,1,1,#FFFFFF:lsp 214,":s/20,20,0;#FFFFFF"+$menu_list1,430,80
strsp 202,"Times Mated With for Reproduction: ",50,110,19,1,20,20,0,0,1,1,#FFFFFF:lsp 215,":s/20,20,0;#FFFFFF"+$menu_list2,400,110
strsp 203,"Times Endlessly Sucked as a Food: ",50,140,18,1,20,20,0,0,1,1,#FFFFFF:lsp 216,":s/20,20,0;#FFFFFF"+$menu_list3,390,140
strsp 204,"Times Killed by Being Sucked Dry: ",50,170,18,1,20,20,0,0,1,1,#FFFFFF:lsp 217,":s/20,20,0;#FFFFFF"+$menu_list4,390,170
strsp 205,"Times Turned Into a Toy: ",50,200,14,1,20,20,0,0,1,1,#FFFFFF:lsp 218,":s/20,20,0;#FFFFFF"+$menu_list5,300,200
strsp 206,"Times Toyed With for Fun, then Killed: ",50,230,21,1,20,20,0,0,1,1,#FFFFFF:lsp 219,":s/20,20,0;#FFFFFF"+$menu_list6,440,230
strsp 207,"Times Made Into a Group Toy: ",50,260,16,1,20,20,0,0,1,1,#FFFFFF:lsp 220,":s/20,20,0;#FFFFFF"+$menu_list7,340,260
strsp 208,"Times Killed by a Group Squeezing Dry: ",50,290,21,1,20,20,0,0,1,1,#FFFFFF:lsp 221,":s/20,20,0;#FFFFFF"+$menu_list8,440,290
strsp 209,"Times Made Into a Monster's Slave: ",50,320,19,1,20,20,0,0,1,1,#FFFFFF:lsp 222,":s/20,20,0;#FFFFFF"+$menu_list9,400,320
strsp 210,"Times Forced to Marry a Monster: ",50,350,17,1,20,20,0,0,1,1,#FFFFFF:lsp 223,":s/20,20,0;#FFFFFF"+$menu_list10,380,350
strsp 211,"Times Eaten by a Monster: ",50,380,14,1,20,20,0,0,1,1,#FFFFFF:lsp 224,":s/20,20,0;#FFFFFF"+$menu_list11,310,380
strsp 212,"Times Made Into a Research Guinea Pig: ",50,410,21,1,20,20,0,0,1,1,#FFFFFF:lsp 225,":s/20,20,0;#FFFFFF"+$menu_list12,440,410
strsp 213,"Num of Times Invited to Death: ",50,440,16,1,20,20,0,0,1,1,#FFFFFF:lsp 226,":s/20,20,0;#FFFFFF"+$menu_list13,360,440
return



*menu_kiroku_page6

itoa2 $menu_list1,%count_b012
itoa2 $menu_list2,%count_b015
itoa2 $menu_list3,%count_b016
itoa2 $menu_list4,%count_b017
strsp 201,"Times Put Into a Monster's Nursery: ",50,80,19,1,20,20,0,0,1,1,#FFFFFF:lsp 205,":s/20,20,0;#FFFFFF"+$menu_list1,410,80
strsp 202,"Times Reincarnated Into a New Existence: ",50,110,22,1,20,20,0,0,1,1,#FFFFFF:lsp 206,":s/20,20,0;#FFFFFF"+$menu_list2,460,110
strsp 203,"Times Endlessly Squeezed of Semen as Punishment: ",50,140,26,1,20,20,0,0,1,1,#FFFFFF:lsp 207,":s/20,20,0;#FFFFFF"+$menu_list3,540,140
strsp 204,"Times Squeezed of Semen as Punishment, then Killed: ",50,170,27,1,20,20,0,0,1,1,#FFFFFF:lsp 208,":s/20,20,0;#FFFFFF"+$menu_list4,570,170
cspl 209,226
return



*menu_kiroku_page7

lsp 201,":s/20,20,0;#bbbbbbFirst Chapter Cleared ",50,80
if %game_clear>0 && %2265=1 lsp 201,":s/20,20,0;#FFFFFFFirst Chapter Cleared ",50,80
strsp 202,"Second Chapter Cleared",50,110,12,1,20,20,0,0,1,1,#bbbbbb
if %game_clear>1 && %2342=1 strsp 202,"Second Chapter Cleared",50,110,12,1,20,20,0,0,1,1,#FFFFFF
if %game_clear=3 lsp 203,":s/20,20,0;#FFFFFFFinal Chapter Cleared ",50,140
if %game_clear<3 lsp 203,":s/20,20,0;#bbbbbbFinal Chapter Cleared ",50,140
if %count_zukan1=0 lsp 204,":s/20,20,0;#bbbbbbCompleted First Chapter Monsterpedia ",50,170
if %count_zukan1=1 lsp 204,":s/20,20,0;#FFFFFFCompleted First Chapter Monsterpedia ",50,170
if %count_zukan2=0 strsp 205,"Completed Second Chapter Monsterpedia",50,200,20,1,20,20,0,0,1,1,#bbbbbb
if %count_zukan2=1 strsp 205,"Completed Second Chapter Monsterpedia",50,200,20,1,20,20,0,0,1,1,#FFFFFF
if %count_zukan3=0 lsp 206,":s/20,20,0;#bbbbbbCompleted Final Chapter Monsterpedia ",50,230
if %count_zukan3=1 lsp 206,":s/20,20,0;#FFFFFFCompleted Final Chapter Monsterpedia ",50,230
strsp 207,"Hit by All Requestable First Chapter Techniques",50,260,25,1,20,20,0,0,1,1,#bbbbbb
if %count_oskill1=262 strsp 207,"Hit by All Requestable First Chapter Techniques",50,260,25,1,20,20,0,0,1,1,#FFFFFF
strsp 208,"Hit by All Requestable Second Chapter Techniques",50,290,25,1,20,20,0,0,1,1,#bbbbbb
if %count_oskill2=404 strsp 208,"Hit by All Requestable Second Chapter Techniques",50,290,25,1,20,20,0,0,1,1,#FFFFFF
strsp 209,"Hit by All Requestable Final Chapter Techniques",50,320,25,1,20,20,0,0,1,1,#bbbbbb
if %count_oskill3=443 strsp 209,"Hit by All Requestable Final Chapter Techniques",50,320,25,1,20,20,0,0,1,1,#FFFFFF
lsp 210,":s/20,20,0;#bbbbbbCompleted Monsterpedia ",50,350
if %count_zukan1=1 && %count_zukan2=1 && %count_zukan3=1 && %count_oskill1+%count_oskill2+%count_oskill3=1109 lsp 210,":s/20,20,0;#FFFFFFCompleted Monsterpedia ",50,350
if %count_hpfull=1 strsp 211,"Won Without Taking Damage",50,380,14,1,20,20,0,0,1,1,#FFFFFF
if %count_hpfull=0 strsp 211,"Won Without Taking Damage",50,380,14,1,20,20,0,0,1,1,#bbbbbb
if %count_onekill=1 strsp 212,"Defeated on the First Turn",50,410,14,1,20,20,0,0,1,1,#FFFFFF
if %count_onekill=0 strsp 212,"Defeated on the First Turn",50,410,14,1,20,20,0,0,1,1,#bbbbbb
if %count_vickonran=1 lsp 213,":s/20,20,0;#FFFFFFWon While Confused ",50,440
if %count_vickonran=0 lsp 213,":s/20,20,0;#bbbbbbWon While Confused ",50,440
cspl 214,226
return



*menu_kiroku_page8

if %count_hellvic=1 strsp 201,"Won a Fight on HELL Mode",50,80,13,1,20,20,0,0,1,1,#FFFFFF
if %count_hellvic=0 strsp 201,"Won a Fight on HELL Mode",50,80,13,1,20,20,0,0,1,1,#bbbbbb
if %count_granhigi=1 strsp 202,"Took Flames of Granberia's Demon Skull Beheading * Blaze",50,110,29,1,20,20,0,0,1,1,#FFFFFF
if %count_granhigi=0 && %game_clear=0 strsp 202,"Took Flames of ??????'s ??????",50,110,16,1,20,20,0,0,1,1,#bbbbbb
if %count_granhigi=0 && %game_clear>0 strsp 202,"Took Flames of Granberia's Demon Skull Beheading * Blaze",50,110,29,1,20,20,0,0,1,1,#bbbbbb
if %3173>0 strsp 203,"Took Alma Elma's Tail Drain Attack",50,140,18,1,20,20,0,0,1,1,#FFFFFF
if %3173=0 && %game_clear=0 strsp 203,"Took ??????'s ?????? Attack",50,140,15,1,20,20,0,0,1,1,#bbbbbb
if %3173=0 && %game_clear>0 strsp 203,"Took Alma Elma's Tail Drain Attack",50,140,18,1,20,20,0,0,1,1,#bbbbbb
if %3237>0 strsp 204,"Took Sphinx's Ancient Law of Ecstasy",50,170,19,1,20,20,0,0,1,1,#FFFFFF
if %3237=0 && %game_clear=0 strsp 204,"Took ??????'s ?????? of ??????",50,170,16,1,20,20,0,0,1,1,#bbbbbb
if %3237=0 && %game_clear>0 strsp 204,"Took Sphinx's Ancient Law of Ecstasy",50,170,19,1,20,20,0,0,1,1,#bbbbbb
if %count_sara=1 strsp 205,"Sara Defeated a Monster",50,200,13,1,20,20,0,0,1,1,#FFFFFF
if %count_sara=0 && %game_clear=0 strsp 205,"?????? Defeated a Monster",50,200,14,1,20,20,0,0,1,1,#bbbbbb
if %count_sara=0 && %game_clear>0 strsp 205,"Sara Defeated a Monster",50,200,13,1,20,20,0,0,1,1,#bbbbbb
if %count_mylv0=1 strsp 206,"Drained to Level 1",50,230,10,1,20,20,0,0,1,1,#FFFFFF
if %count_mylv0=0 strsp 206,"Drained to Level 1",50,230,10,1,20,20,0,0,1,1,#bbbbbb
if %count_kadora=1 strsp 207,"Forced an Enemy to Eat Quadruple Giga",50,260,20,1,20,20,0,0,1,1,#FFFFFF
if %count_kadora=0 && %game_clear<2 strsp 207,"Forced an Enemy to ??????",50,260,14,1,20,20,0,0,1,1,#bbbbbb
if %count_kadora=0 && %game_clear>1 strsp 207,"Forced an Enemy to Eat Quadruple Giga",50,260,20,1,20,20,0,0,1,1,#bbbbbb
if %yuusyaakasi=1 strsp 208,"Hero's Proof Obtained",50,290,12,1,20,20,0,0,1,1,#FFFFFF
if %yuusyaakasi=0 strsp 208,"Hero's Proof Obtained",50,290,12,1,20,20,0,0,1,1,#bbbbbb
if %g_sylph=1 strsp 209,"Sylph Was Summoned Tired Out",50,320,15,1,20,20,0,0,1,1,#FFFFFF
if %g_sylph=0 && %game_clear=0 strsp 209,"?????? Was Summoned Tired Out",50,320,16,1,20,20,0,0,1,1,#bbbbbb
if %g_sylph=0 && %game_clear>0 strsp 209,"Sylph Was Summoned Tired Out",50,320,15,1,20,20,0,0,1,1,#bbbbbb
if %z_gnome=1 strsp 210,"Gnome Was Summoned Sleeping",50,350,15,1,20,20,0,0,1,1,#FFFFFF
if %z_gnome=0 && %game_clear<2 strsp 210,"?????? Was Summoned Sleeping",50,350,15,1,20,20,0,0,1,1,#bbbbbb
if %z_gnome=0 && %game_clear>1 strsp 210,"Gnome Was Summoned Sleeping",50,350,15,1,20,20,0,0,1,1,#bbbbbb
if %count_alice1=1 strsp 211,"Alice Defeated an Enemy in Her Sealed State",50,380,23,1,20,20,0,0,1,1,#FFFFFF
if %count_alice1=0 && %game_clear<3 strsp 211,"?????? Sealed State",50,380,11,1,20,20,0,0,1,1,#bbbbbb
if %count_alice1=0 && %game_clear=3 strsp 211,"Alice Defeated an Enemy in Her Sealed State",50,380,23,1,20,20,0,0,1,1,#bbbbbb
if %count_alice2=1 strsp 212,"Alice Defeated an Enemy",50,410,13,1,20,20,0,0,1,1,#FFFFFF
if %count_alice2=0 && %game_clear<3 strsp 212,"?????? Defeated an Enemy",50,410,13,1,20,20,0,0,1,1,#bbbbbb
if %count_alice2=0 && %game_clear=3 strsp 212,"Alice Defeated an Enemy",50,410,13,1,20,20,0,0,1,1,#bbbbbb
if %alicek=1 strsp 213,"Defeated an Enemy Without Transforming Alice",50,440,23,1,20,20,0,0,1,1,#FFFFFF
if %alicek=0 && %game_clear<3 strsp 213,"?????? Without Transforming ??????",50,440,18,1,20,20,0,0,1,1,#bbbbbb
if %alicek=0 && %game_clear=3 strsp 213,"Defeated an Enemy Without Transforming Alice",50,440,23,1,20,20,0,0,1,1,#bbbbbb
cspl 214,226
return



*menu_kiroku_page9

if %count_enemy_wind=1 strsp 201,"Defeated by an Enemy Strengthened by Zylphe",50,80,23,1,20,20,0,0,1,1,#FFFFFF
if %count_enemy_wind=0 strsp 201,"Defeated by an Enemy Strengthened by Zylphe",50,80,23,1,20,20,0,0,1,1,#bbbbbb
if %count_enemy_earth=1 strsp 202,"Defeated by an Enemy Strengthened by Gnomaren",50,110,24,1,20,20,0,0,1,1,#FFFFFF
if %count_enemy_earth=0 strsp 202,"Defeated by an Enemy Strengthened by Gnomaren",50,110,24,1,20,20,0,0,1,1,#bbbbbb
if %count_enemy_aqua=1 strsp 203,"Defeated by an Enemy Strengthened by Grandine",50,140,24,1,20,20,0,0,1,1,#FFFFFF
if %count_enemy_aqua=0 strsp 203,"Defeated by an Enemy Strengthened by Grandine",50,140,24,1,20,20,0,0,1,1,#bbbbbb
if %count_enemy_fire=1 strsp 204,"Defeated by an Enemy Strengthened by Gigamander",50,170,25,1,20,20,0,0,1,1,#FFFFFF
if %count_enemy_fire=0 strsp 204,"Defeated by an Enemy Strengthened by Gigamander",50,170,25,1,20,20,0,0,1,1,#bbbbbb
if %counterk=1 strsp 205,"Defeated an Enemy in a Counter Stance",50,200,20,1,20,20,0,0,1,1,#FFFFFF
if %counterk=0 strsp 205,"Defeated an Enemy in a Counter Stance",50,200,20,1,20,20,0,0,1,1,#bbbbbb
if %tamek=1 strsp 206,"Countered an Enemy's Charged Skill",50,230,18,1,20,20,0,0,1,1,#FFFFFF
if %tamek=0 strsp 206,"Countered an Enemy's Charged Skill",50,230,18,1,20,20,0,0,1,1,#bbbbbb
if %dopple_wet=1 strsp 207,"Defeated Doppel Luka Without Her Unclothing",50,260,23,1,20,20,0,0,1,1,#FFFFFF
if %dopple_wet=0 && %game_clear<3 strsp 207,"?????? Without Her Unclothing",50,260,16,1,20,20,0,0,1,1,#bbbbbb
if %dopple_wet=0 && %game_clear=3 strsp 207,"Defeated Doppel Luka Without Her Unclothing",50,260,23,1,20,20,0,0,1,1,#bbbbbb
if %hsean_shitenno5=1 strsp 208,"Seen Something Incredible",50,290,14,1,20,20,0,0,1,1,#FFFFFF
if %hsean_shitenno5=0 && %game_clear<3 strsp 208,"?????? Incredible",50,290,10,1,20,20,0,0,1,1,#bbbbbb
if %hsean_shitenno5=0 && %game_clear=3 strsp 208,"Seen Something Incredible",50,290,14,1,20,20,0,0,1,1,#bbbbbb
if %micaela_batou=1 strsp 209,"Disparaged by Micaela",50,320,12,1,20,20,0,0,1,1,#FFFFFF
if %micaela_batou=0 && %game_clear<3 strsp 209,"Disparaged by ??????",50,320,11,1,20,20,0,0,1,1,#bbbbbb
if %micaela_batou=0 && %game_clear=3 strsp 209,"Disparaged by Micaela",50,320,12,1,20,20,0,0,1,1,#bbbbbb
if %lonely=1 strsp 210,"Only Remembered Amira",50,350,12,1,20,20,0,0,1,1,#FFFFFF
if %lonely=0 && %game_clear<3 strsp 210,"Only Remembered ??????",50,350,12,1,20,20,0,0,1,1,#bbbbbb
if %lonely=0 && %game_clear=3 strsp 210,"Only Remembered Amira",50,350,12,1,20,20,0,0,1,1,#bbbbbb
if %ruka_book=1 strsp 211,"The Author of The Legend of the Hero Luka is Discovered",50,380,29,1,20,20,0,0,1,1,#FFFFFF
if %ruka_book=0 && %game_clear<3 strsp 211,"The Author ?????? is Discovered",50,380,17,1,20,20,0,0,1,1,#bbbbbb
if %ruka_book=0 && %game_clear=3 strsp 211,"The Author of The Legend of the Hero Luka is Discovered",50,380,29,1,20,20,0,0,1,1,#bbbbbb
cspl 212,226
return



*menu_zukan

saveoff
mov %zukanreturnoff,0
if %zukan_page=0 mov %zukan_page,1
screen_clear
goto *menu_zukan2



*menu_zukan2

shadedistance 1,2
lsp 502,":a;system\system_bg.jpg",0,0
lsp 501,":a;system\window10.bmp",25,50
lsp 141,":c;system\m_title_monster.jpg",20,20
lsp 142,":c;system\system_barx_u.jpg",0,0
lsp 143,":c;system\system_barx_d.jpg",0,560
if %100=1 itoa $sel6,%stack:csp 10:strsp 10,$sel6,750,5,2,1,20,20,0,0,1,0,#FF0000
goto *menu_zukan3



*menu_zukan3

mov %zukan_hyouzyo,1
mov %zukan_pozu,1
mov %zukan_bukkake1,0
mov %zukan_bukkake2,0
mov %zukan_bukkake3,0
mov %zukan_bukkake4,0
mov %zukan_bukkake5,0
mov %zukan_bukkake6,0
mov %zukan_bukkake7,0
mov %zukan_bukkake8,0
mov %zukan_skillc1,0
mov %zukan_skillc2,0
mov %zukan_skillc3,0
mov %zukan_skillc4,0
mov %zukan_skillc5,0
mov %zukan_skillc6,0
mov %zukan_skillc7,0
mov %zukan_skillc8,0
mov %zukan_skillc9,0
mov %zukan_skillc10,0
mov %zukan_skillc11,0
mov %zukan_skillc12,0
cspl 201,226
if %zukan_page=0 mov %zukan_page,10
if %zukan_page=11 mov %zukan_page,1
itoa2 $page_h,%zukan_page
if %zukan_page<10 lsp 144,":s/20,20,0;#FFFFFF"+$page_h+"^PO",375,500
if %zukan_page=10 lsp 144,":s/20,20,0;#FFFFFF"+$page_h+"^PO",365,500
if %zukan_page=1 && %tougou<2 goto *menu_zukan_pagex
if %zukan_page=1 && %tougou=2 goto *menu_zukan_page1
if %zukan_page=2 && %tougou<2 goto *menu_zukan_pagex
if %zukan_page=2 && %tougou=2 goto *menu_zukan_page2
if %zukan_page=3 && %tougou<2 goto *menu_zukan_pagey
if %zukan_page=3 && %tougou=2 goto *menu_zukan_page3
if %zukan_page=4 && %tougou<2 goto *menu_zukan_pagez
if %zukan_page=4 && %tougou=2 goto *menu_zukan_page4
if %zukan_page=5 && %tougou<2 goto *menu_zukan_pagez
if %zukan_page=5 && %tougou=2 goto *menu_zukan_page5
if %zukan_page=6 && %tougou<2 goto *menu_zukan_pagew
if %zukan_page=6 && %tougou=2 goto *menu_zukan_page6
if %zukan_page=7 goto *menu_zukan_page7
if %zukan_page=8 goto *menu_zukan_page8
if %zukan_page=9 goto *menu_zukan_page9
if %zukan_page=10 goto *menu_zukan_page10
goto *menu_zukan_page1



*menu_zukan_page1

btndef clear
lsp 111,":c/2,0,3;system\return.bmp",20,560:spbtn 111,111
lsp 112,":c/2,0,3;system\menu_prev.jpg",330,500:spbtn 112,112
lsp 113,":c/2,0,3;system\menu_next.jpg",480,500:spbtn 113,113
if %2201=1 lsp 201,":s/20,20,0;#FFFFFF#FF4444Slime Girl ",50,80:spbtn 201,201
if %2201=0 lsp 201,":s/20,20,0;#bbbbbbHHH",50,80
if %2250=1 lsp 202,":s/20,20,0;#FFFFFF#FF4444Monster Girl ",50,110:spbtn 202,202
if %2250=2 lsp 202,":s/20,20,0;#FFFFFF#FF4444Alice ",50,110:spbtn 202,202
if %2250>0 && %2266=1 lsp 202,":s/20,20,0;#FFFFFF#FF4444Alice (1) ",50,110:spbtn 202,202
if %2250=0 lsp 202,":s/20,20,0;#bbbbbbHHH",50,110
if %2202=1 strsp 203,"Slug Girl",50,140,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 203,203
if %2202=0 lsp 203,":s/20,20,0;#bbbbbbHHH",50,140
if %2203=1 lsp 204,":s/20,20,0;#FFFFFF#FF4444Mandragora ",50,170:spbtn 204,204
if %2203=0 lsp 204,":s/20,20,0;#bbbbbbHHH",50,170
if %2204=1 lsp 205,":s/20,20,0;#FFFFFF#FF4444Granberia ",50,200:spbtn 205,205
if %2204=1 && %2229=1 lsp 205,":s/20,20,0;#FFFFFF#FF4444Granberia (1) ",50,200:spbtn 205,205
if %2204=0 lsp 205,":s/20,20,0;#bbbbbbHHH",50,200
if %2205=1 lsp 206,":s/20,20,0;#FFFFFF#FF4444Earthworm Girl ",50,230:spbtn 206,206
if %2205=0 lsp 206,":s/20,20,0;#bbbbbbHHH",50,230
if %2206=1 strsp 207,"Goblin Girl",50,260,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 207,207
if %2206=0 lsp 207,":s/20,20,0;#bbbbbbHHH",50,260
if %2207=1 strsp 208,"Tiny Lamia",50,290,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 208,208
if %2207=0 lsp 208,":s/20,20,0;#bbbbbbHHH",50,290
if %2208=1 lsp 209,":s/20,20,0;#FFFFFF#FF4444Vampire Girl ",50,320:spbtn 209,209
if %2208=0 lsp 209,":s/20,20,0;#bbbbbbHHH",50,320
if %2209=1 strsp 210,"Dragon Pup",50,350,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 210,210
if %2209=0 lsp 210,":s/20,20,0;#bbbbbbHHH",50,350
if %2210=1 lsp 211,":s/20,20,0;#FFFFFF#FF4444Bee Girl ",50,380:spbtn 211,211
if %2210=0 lsp 211,":s/20,20,0;#bbbbbbHHH",50,380
if %2211=1 lsp 212,":s/20,20,0;#FFFFFF#FF4444Harpy ",50,410:spbtn 212,212
if %2211=0 lsp 212,":s/20,20,0;#bbbbbbHHH",50,410
if %2212=1 lsp 213,":s/20,20,0;#FFFFFF#FF4444Harpy Twins ",50,440:spbtn 213,213
if %2212=0 lsp 213,":s/20,20,0;#bbbbbbHHH",50,440
if %2213=1 lsp 214,":s/20,20,0;#FFFFFF#FF4444Queen Harpy ",400,80:spbtn 214,214
if %2213=0 lsp 214,":s/20,20,0;#bbbbbbHHH",400,80
if %2214=1 strsp 215,"Dark Elf Fencer",400,110,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 215,215
if %2214=0 lsp 215,":s/20,20,0;#bbbbbbHHH",400,110
if %2215=1 strsp 216,"Dark Elf Mage",400,140,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 216,216
if %2215=0 lsp 216,":s/20,20,0;#bbbbbbHHH",400,140
if %2216=1 lsp 217,":s/20,20,0;#FFFFFF#FF4444Leech Girl ",400,170:spbtn 217,217
if %2216=0 lsp 217,":s/20,20,0;#bbbbbbHHH",400,170
if %2217=1 lsp 218,":s/20,20,0;#FFFFFF#FF4444Rafflesia Girl ",400,200:spbtn 218,218
if %2217=0 lsp 218,":s/20,20,0;#bbbbbbHHH",400,200
if %2218=1 lsp 219,":s/20,20,0;#FFFFFF#FF4444Roper Girl ",400,230:spbtn 219,219
if %2218=0 lsp 219,":s/20,20,0;#bbbbbbHHH",400,230
if %2219=1 lsp 220,":s/20,20,0;#FFFFFF#FF4444Kitsune ",400,260:spbtn 220,220
if %2219=0 lsp 220,":s/20,20,0;#bbbbbbHHH",400,260
if %2220=1 lsp 221,":s/20,20,0;#FFFFFF#FF4444Meda ",400,290:spbtn 221,221
if %2220=0 lsp 221,":s/20,20,0;#bbbbbbHHH",400,290
if %2221=1 strsp 222,"Spider Girl",400,320,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 222,222
if %2221=0 lsp 222,":s/20,20,0;#bbbbbbHHH",400,320
if %2222=1 lsp 223,":s/20,20,0;#FFFFFF#FF4444Mimic ",400,350:spbtn 223,223
if %2222=0 lsp 223,":s/20,20,0;#bbbbbbHHH",400,350
if %2223=1 lsp 224,":s/20,20,0;#FFFFFF#FF4444Nanabi ",400,380:spbtn 224,224
if %2223=0 lsp 224,":s/20,20,0;#bbbbbbHHH",400,380
if %2224=1 lsp 225,":s/20,20,0;#FFFFFF#FF4444Tamamo ",400,410:spbtn 225,225
if %2224=1 && %2339=1 strsp 225,"Tamamo (1)",400,410,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 225,225:spbtn 225,225
if %2224=0 lsp 225,":s/20,20,0;#bbbbbbHHH",400,410
if %2225=1 strsp 226,"Alma Elma",400,440,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 226,226
if %2225=1 && %2271=1 strsp 226,"Alma Elma (1)",400,440,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 226,226:spbtn 226,226
if %2225=0 lsp 226,":s/20,20,0;#bbbbbbHHH",400,440
btnwait %bwait
if %bwait=112 mov %zukan_page,%zukan_page-1:cspl 301,303:goto *menu_zukan3
if %bwait=113 mov %zukan_page,%zukan_page+1:cspl 301,303:goto *menu_zukan3
if %bwait=201 goto *zukan_slime
if %bwait=202 goto *zukan_alice1
if %bwait=203 goto *zukan_name
if %bwait=204 goto *zukan_mdg
if %bwait=205 goto *zukan_granberia1
if %bwait=206 goto *zukan_mimizu
if %bwait=207 goto *zukan_gob
if %bwait=208 goto *zukan_pramia
if %bwait=209 goto *zukan_vgirl
if %bwait=210 goto *zukan_dragonp
if %bwait=211 goto *zukan_mitubati
if %bwait=212 goto *zukan_hapy_a
if %bwait=213 goto *zukan_hapy_bc
if %bwait=214 goto *zukan_queenhapy
if %bwait=215 goto *zukan_delh_a
if %bwait=216 goto *zukan_delh_b
if %bwait=217 goto *zukan_hiru
if %bwait=218 goto *zukan_rahure
if %bwait=219 goto *zukan_ropa
if %bwait=220 goto *zukan_youko
if %bwait=221 goto *zukan_meda
if %bwait=222 goto *zukan_kumo
if %bwait=223 goto *zukan_mimic
if %bwait=224 goto *zukan_nanabi
if %bwait=225 goto *zukan_tamamo1
if %bwait=226 goto *zukan_arumaeruma1
if %bwait=111 screen_clear:return
if %bwait=-1 screen_clear:return
if %bwait=-10 screen_clear:return
if %bwait=-11 screen_clear:return
goto *menu_zukan_page1



*menu_zukan_page2

btndef clear
lsp 111,":c/2,0,3;system\return.bmp",20,560:spbtn 111,111
lsp 112,":c/2,0,3;system\menu_prev.jpg",330,500:spbtn 112,112
lsp 113,":c/2,0,3;system\menu_next.jpg",480,500:spbtn 113,113
if %2226=1 strsp 201,"Sea Cucumber Girl",50,80,10,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 201,201
if %2226=0 lsp 201,":s/20,20,0;#bbbbbbHHH",50,80
if %2227=1 lsp 202,":s/20,20,0;#FFFFFF#FF4444Shellfish Girl ",50,110:spbtn 202,202
if %2227=0 lsp 202,":s/20,20,0;#bbbbbbHHH",50,110
if %2228=1 lsp 203,":s/20,20,0;#FFFFFF#FF4444Lamia ",50,140:spbtn 203,203
if %2228=0 lsp 203,":s/20,20,0;#bbbbbbHHH",50,140
if %2229=1 lsp 204,":s/20,20,0;#FFFFFF#FF4444Granberia (2) ",50,170:spbtn 204,204
if %2229=0 lsp 204,":s/20,20,0;#bbbbbbHHH",50,170
if %2230=1 strsp 205,"Page 17",50,200,5,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 205,205
if %2230=0 lsp 205,":s/20,20,0;#bbbbbbHHH",50,200
if %2231=1 strsp 206,"Page 257",50,230,5,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 206,206
if %2231=0 lsp 206,":s/20,20,0;#bbbbbbHHH",50,230
if %2232=1 strsp 207,"Page 65537",50,260,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 207,207
if %2232=0 lsp 207,":s/20,20,0;#bbbbbbHHH",50,260
if %2233=1 strsp 208,"Crab Girl",50,290,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 208,208
if %2233=1 && %2316=1 strsp 208,"Crab Girl (1)",50,290,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 208,208
if %2233=0 lsp 208,":s/20,20,0;#bbbbbbHHH",50,290
if %2234=1 lsp 209,":s/20,20,0;#FFFFFF#FF4444Jellyfish Girl ",50,320:spbtn 209,209
if %2234=0 lsp 209,":s/20,20,0;#bbbbbbHHH",50,320
if %2235=1 lsp 210,":s/20,20,0;#FFFFFF#FF4444Sea Anemone Girl ",50,350:spbtn 210,210
if %2235=0 lsp 210,":s/20,20,0;#bbbbbbHHH",50,350
if %2236=1 strsp 211,"Anglerfish Girl",50,380,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 211,211
if %2236=0 lsp 211,":s/20,20,0;#bbbbbbHHH",50,380
if %2237=1 lsp 212,":s/20,20,0;#FFFFFF#FF4444Kraken ",50,410:spbtn 212,212
if %2237=0 lsp 212,":s/20,20,0;#bbbbbbHHH",50,410
if %hsean_meia1=1 lsp 213,":s/20,20,0;#FFFFFF#FF4444Meia ",50,440:spbtn 213,213
if %hsean_meia1=0 lsp 213,":s/20,20,0;#bbbbbbHHH",50,440
if %2238=1 lsp 214,":s/20,20,0;#FFFFFF#FF4444Ghost Girl ",400,80:spbtn 214,214
if %2238=0 lsp 214,":s/20,20,0;#bbbbbbHHH",400,80
if %2239=1 strsp 215,"Cursed Doll",400,110,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 215,215
if %2239=0 lsp 215,":s/20,20,0;#bbbbbbHHH",400,110
if %2240=1 strsp 216,"Zombie Girl",400,140,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 216,216
if %2240=0 lsp 216,":s/20,20,0;#bbbbbbHHH",400,140
if %2241=1 strsp 217,"Zombie Girls (Group)",400,170,11,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 217,217
if %2241=0 lsp 217,":s/20,20,0;#bbbbbbHHH",400,170
if %2242=1 lsp 218,":s/20,20,0;#FFFFFF#FF4444Frederika ",400,200:spbtn 218,218
if %2242=0 lsp 218,":s/20,20,0;#bbbbbbHHH",400,200
if %2243=1 lsp 219,":s/20,20,0;#FFFFFF#FF4444Chrome ",400,230:spbtn 219,219
if %2243=1 && %2374=1 strsp 219,"Chrome (1)",400,230,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 219,219
if %2243=0 lsp 219,":s/20,20,0;#bbbbbbHHH",400,230
if %2244=1 lsp 220,":s/20,20,0;#FFFFFF#FF4444Fairy ",400,260:spbtn 220,220
if %2244=0 lsp 220,":s/20,20,0;#bbbbbbHHH",400,260
if %2245=1 lsp 221,":s/20,20,0;#FFFFFF#FF4444Elf ",400,290:spbtn 221,221
if %2245=0 lsp 221,":s/20,20,0;#bbbbbbHHH",400,290
if %2246=1 strsp 222,"Twin Fairies",400,320,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 222,222
if %2246=0 lsp 222,":s/20,20,0;#bbbbbbHHH",400,320
if %2247=1 lsp 223,":s/20,20,0;#FFFFFF#FF4444Fairies ",400,350:spbtn 223,223
if %2247=0 lsp 223,":s/20,20,0;#bbbbbbHHH",400,350
if %2248=1 lsp 224,":s/20,20,0;#FFFFFF#FF4444Sylph ",400,380:spbtn 224,224
if %2248=1 && %hsean_seirei2=1 lsp 224,":s/20,20,0;#FFFFFF#FF4444Sylph (1) ",400,380:spbtn 224,224
if %2248=0 lsp 224,":s/20,20,0;#bbbbbbHHH",400,380
if %2249=1 lsp 225,":s/20,20,0;#FFFFFF#FF4444Chimera Dryad ",400,410:spbtn 225,225
if %2249=0 lsp 225,":s/20,20,0;#bbbbbbHHH",400,410
if %2251=1 lsp 226,":s/20,20,0;#FFFFFF#FF4444Tarantula Girl ",400,440:spbtn 226,226
if %2251=0 lsp 226,":s/20,20,0;#bbbbbbHHH",400,440
btnwait %bwait
if %bwait=112 mov %zukan_page,%zukan_page-1:cspl 301,303:goto *menu_zukan3
if %bwait=113 mov %zukan_page,%zukan_page+1:cspl 301,303:goto *menu_zukan3
if %bwait=201 goto *zukan_namako
if %bwait=202 goto *zukan_kai
if %bwait=203 goto *zukan_lamia
if %bwait=204 goto *zukan_granberia2
if %bwait=205 goto *zukan_page17
if %bwait=206 goto *zukan_page257
if %bwait=207 goto *zukan_page65537
if %bwait=208 goto *zukan_kani
if %bwait=209 goto *zukan_kurage
if %bwait=210 goto *zukan_iso
if %bwait=211 goto *zukan_ankou
if %bwait=212 goto *zukan_kraken
if %bwait=213 goto *zukan_meia
if %bwait=214 goto *zukan_ghost
if %bwait=215 goto *zukan_doll
if %bwait=216 goto *zukan_zonbe
if %bwait=217 goto *zukan_zonbes
if %bwait=218 goto *zukan_frederika
if %bwait=219 goto *zukan_chrom
if %bwait=220 goto *zukan_fairy
if %bwait=221 goto *zukan_elf
if %bwait=222 goto *zukan_tfairy
if %bwait=223 goto *zukan_fairys
if %bwait=224 goto *zukan_sylph
if %bwait=225 goto *zukan_c_dryad
if %bwait=226 goto *zukan_taran
if %bwait=111 screen_clear:return
if %bwait=-1 screen_clear:return
if %bwait=-10 screen_clear:return
if %bwait=-11 screen_clear:return
goto *menu_zukan_page2



*menu_zukan_page3

btndef clear
lsp 111,":c/2,0,3;system\return.bmp",20,560:spbtn 111,111
lsp 112,":c/2,0,3;system\menu_prev.jpg",330,500:spbtn 112,112
lsp 113,":c/2,0,3;system\menu_next.jpg",480,500:spbtn 113,113
if %2252=1 lsp 201,":s/20,20,0;#FFFFFF#FF4444Minotauros ",50,80:spbtn 201,201
if %2252=0 lsp 201,":s/20,20,0;#bbbbbbHHH",50,80
if %2253=1 strsp 202,"Scorpion Girl",50,110,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 202,202
if %2253=0 lsp 202,":s/20,20,0;#bbbbbbHHH",50,110
if %2254=1 strsp 203,"Lamp Genie",50,140,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 203,203
if %2254=0 lsp 203,":s/20,20,0;#bbbbbbHHH",50,140
if %2255=1 lsp 204,":s/20,20,0;#FFFFFF#FF4444Mummy Girl ",50,170:spbtn 204,204
if %2255=0 lsp 204,":s/20,20,0;#bbbbbbHHH",50,170
if %2256=1 lsp 205,":s/20,20,0;#FFFFFF#FF4444Cobra Girl ",50,200:spbtn 205,205
if %2256=0 lsp 205,":s/20,20,0;#bbbbbbHHH",50,200
if %2257=1 lsp 206,":s/20,20,0;#FFFFFF#FF4444Nefertiti Lamias ",50,230:spbtn 206,206
if %2257=0 lsp 206,":s/20,20,0;#bbbbbbHHH",50,230
if %2258=1 lsp 207,":s/20,20,0;#FFFFFF#FF4444Sphinx ",50,260:spbtn 207,207
if %2258=0 lsp 207,":s/20,20,0;#bbbbbbHHH",50,260
if %hsean_sara1=1 lsp 208,":s/20,20,0;#FFFFFF#FF4444Sara ",50,290:spbtn 208,208
if %hsean_sara1=0 lsp 208,":s/20,20,0;#bbbbbbHHH",50,290
if %2259=1 strsp 209,"Suck Vore",50,320,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 209,209
if %2259=0 lsp 209,":s/20,20,0;#bbbbbbHHH",50,320
if %2260=1 strsp 210,"Worm Villager",50,350,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 210,210
if %2260=0 lsp 210,":s/20,20,0;#bbbbbbHHH",50,350
if %2261=1 strsp 211,"Iron Maiden",50,380,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 211,211
if %2261=0 lsp 211,":s/20,20,0;#bbbbbbHHH",50,380
if %2262=1 lsp 212,":s/20,20,0;#FFFFFF#FF4444Lily ",50,410:spbtn 212,212
if %2262=0 lsp 212,":s/20,20,0;#bbbbbbHHH",50,410
if %2263=1 lsp 213,":s/20,20,0;#FFFFFF#FF4444Antlion Girl ",50,440:spbtn 213,213
if %2263=0 lsp 213,":s/20,20,0;#bbbbbbHHH",50,440
if %2264=1 lsp 214,":s/20,20,0;#FFFFFF#FF4444Sandworm ",400,80:spbtn 214,214
if %2264=0 lsp 214,":s/20,20,0;#bbbbbbHHH",400,80
if %2265=1 lsp 215,":s/20,20,0;#FFFFFF#FF4444Gnome ",400,110:spbtn 215,215
if %2265=1 && %hsean_seirei1=1 lsp 215,":s/20,20,0;#FFFFFF#FF4444Gnome (1) ",400,110:spbtn 215,215
if %2265=0 lsp 215,":s/20,20,0;#bbbbbbHHH",400,110
if $eval1="seen" lsp 216,":s/20,20,0;#FFFFFF#FF4444Goddess Ilias ",400,140:spbtn 216,216
if $eval1="seen" && %hsean_irias1=1 && %game_clear>1 lsp 216,":s/20,20,0;#FFFFFF#FF4444Goddess Ilias (1) ",400,140:spbtn 216,216
if $eval1<>"seen" lsp 216,":s/20,20,0;#bbbbbbHHH",400,140
if %2266=1 lsp 217,":s/20,20,0;#FFFFFF#FF4444Alice (2) ",400,170:spbtn 217,217
if %2266=0 lsp 217,":s/20,20,0;#bbbbbbHHH",400,170
if %2266=1 lsp 218,":s/20,20,0;#FFFFFF#FF4444Centaur Girl ",400,200:spbtn 218,218
if %2266=0 lsp 218,":s/20,20,0;#bbbbbbHHH",400,200
if %2267=1 strsp 219,"Frog Girls",400,230,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 219,219
if %2267=0 lsp 219,":s/20,20,0;#bbbbbbHHH",400,230
if %2268=1 lsp 220,":s/20,20,0;#FFFFFF#FF4444Alraune ",400,260:spbtn 220,220
if %2268=0 lsp 220,":s/20,20,0;#bbbbbbHHH",400,260
if %2269=1 lsp 221,":s/20,20,0;#FFFFFF#FF4444Dullahan ",400,290:spbtn 221,221
if %2269=0 lsp 221,":s/20,20,0;#bbbbbbHHH",400,290
if %2270=1 lsp 222,":s/20,20,0;#FFFFFF#FF4444Cerberus ",400,320:spbtn 222,222
if %2270=0 lsp 222,":s/20,20,0;#bbbbbbHHH",400,320
if %2271=1 strsp 223,"Alma Elma (2)",400,350,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 223,223
if %2271=0 lsp 223,":s/20,20,0;#bbbbbbHHH",400,350
if %2272=1 lsp 224,":s/20,20,0;#FFFFFF#FF4444Yuki-onna ",400,380:spbtn 224,224
if %2272=0 lsp 224,":s/20,20,0;#bbbbbbHHH",400,380
if %2273=1 lsp 225,":s/20,20,0;#FFFFFF#FF4444Nekomata ",400,410:spbtn 225,225
if %2273=0 lsp 225,":s/20,20,0;#bbbbbbHHH",400,410
if %2274=1 lsp 226,":s/20,20,0;#FFFFFF#FF4444Samurai Elf ",400,440:spbtn 226,226
if %2274=0 lsp 226,":s/20,20,0;#bbbbbbHHH",400,440
btnwait %bwait
if %bwait=112 mov %zukan_page,%zukan_page-1:cspl 301,303:goto *menu_zukan3
if %bwait=113 mov %zukan_page,%zukan_page+1:cspl 301,303:goto *menu_zukan3
if %bwait=201 goto *zukan_mino
if %bwait=202 goto *zukan_sasori
if %bwait=203 goto *zukan_lamp
if %bwait=204 goto *zukan_mummy
if %bwait=205 goto *zukan_kobura
if %bwait=206 goto *zukan_lamias
if %bwait=207 goto *zukan_sphinx
if %bwait=208 goto *zukan_sara
if %bwait=209 goto *zukan_suckvore
if %bwait=210 goto *zukan_wormv
if %bwait=211 goto *zukan_ironmaiden
if %bwait=212 goto *zukan_lily
if %bwait=213 goto *zukan_arizigoku
if %bwait=214 goto *zukan_sandw
if %bwait=215 goto *zukan_gnome
if %bwait=216 goto *zukan_irias1
if %bwait=217 goto *zukan_alice2
if %bwait=218 goto *zukan_centa
if %bwait=219 goto *zukan_kaeru
if %bwait=220 goto *zukan_alraune
if %bwait=221 goto *zukan_durahan
if %bwait=222 goto *zukan_kerberos
if %bwait=223 goto *zukan_arumaeruma2
if %bwait=224 goto *zukan_yukionna
if %bwait=225 goto *zukan_nekomata
if %bwait=226 goto *zukan_samuraielf
if %bwait=111 screen_clear:return
if %bwait=-1 screen_clear:return
if %bwait=-10 screen_clear:return
if %bwait=-11 screen_clear:return
goto *menu_zukan_page3



*menu_zukan_page4

btndef clear
lsp 111,":c/2,0,3;system\return.bmp",20,560:spbtn 111,111
lsp 112,":c/2,0,3;system\menu_prev.jpg",330,500:spbtn 112,112
lsp 113,":c/2,0,3;system\menu_next.jpg",480,500:spbtn 113,113
if %2274=1 strsp 201,"Kunoichi Elf",50,80,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 201,201
if %2274=0 lsp 201,":s/20,20,0;#bbbbbbHHH",50,80
if %2275=1 strsp 202,"Yamata no Orochi",50,110,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 202,202
if %2275=0 lsp 202,":s/20,20,0;#bbbbbbHHH",50,110
if %2276=1 strsp 203,"Moth Girl",50,140,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 203,203
if %2276=0 lsp 203,":s/20,20,0;#bbbbbbHHH",50,140
if %2276=1 strsp 204,"Mosquito Girl",50,170,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 204,204
if %2276=0 lsp 204,":s/20,20,0;#bbbbbbHHH",50,170
if %2276=1 lsp 205,":s/20,20,0;#FFFFFF#FF4444Caterpillar Girl ",50,200:spbtn 205,205
if %2276=0 lsp 205,":s/20,20,0;#bbbbbbHHH",50,200
if %2277=1 lsp 206,":s/20,20,0;#FFFFFF#FF4444Centipede Girl ",50,230:spbtn 206,206
if %2277=0 lsp 206,":s/20,20,0;#bbbbbbHHH",50,230
if %2278=1 strsp 207,"Silkworm Girl",50,260,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 207,207
if %2278=0 lsp 207,":s/20,20,0;#bbbbbbHHH",50,260
if %2279=1 strsp 208,"Hornet Girl",50,290,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 208,208
if %2279=0 lsp 208,":s/20,20,0;#bbbbbbHHH",50,290
if %2280=1 lsp 209,":s/20,20,0;#FFFFFF#FF4444Queen Bee ",50,320:spbtn 209,209
if %2280=0 lsp 209,":s/20,20,0;#bbbbbbHHH",50,320
if %2281=1 strsp 210,"Alra Arum",50,350,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 210,210
if %2281=0 lsp 210,":s/20,20,0;#bbbbbbHHH",50,350
if %2281=1 strsp 211,"Alra Rooty",50,380,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 211,211
if %2281=0 lsp 211,":s/20,20,0;#bbbbbbHHH",50,380
if %2282=1 strsp 212,"Alra Vore",50,410,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 212,212
if %2282=0 lsp 212,":s/20,20,0;#bbbbbbHHH",50,410
if %2282=1 strsp 213,"Alra Parasol",50,440,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 213,213
if %2282=0 lsp 213,":s/20,20,0;#bbbbbbHHH",50,440
if %2282=1 strsp 214,"Alra Prison",400,80,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 214,214
if %2282=0 lsp 214,":s/20,20,0;#bbbbbbHHH",400,80
if %2283=1 strsp 215,"Alra Priestess",400,110,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 215,215
if %2283=0 lsp 215,":s/20,20,0;#bbbbbbHHH",400,110
if %2284=1 lsp 216,":s/20,20,0;#FFFFFF#FF4444Dorothy ",400,140:spbtn 216,216
if %2284=0 lsp 216,":s/20,20,0;#bbbbbbHHH",400,140
if %2285=1 lsp 217,":s/20,20,0;#FFFFFF#FF4444Raffia ",400,170:spbtn 217,217
if %2285=0 lsp 217,":s/20,20,0;#bbbbbbHHH",400,170
if %2286=1 lsp 218,":s/20,20,0;#FFFFFF#FF4444Deana ",400,200:spbtn 218,218
if %2286=0 lsp 218,":s/20,20,0;#bbbbbbHHH",400,200
if %2287=1 lsp 219,":s/20,20,0;#FFFFFF#FF4444Jelly Girl ",400,230:spbtn 219,219
if %2287=0 lsp 219,":s/20,20,0;#bbbbbbHHH",400,230
if %2288=1 strsp 220,"Blob Girl",400,260,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 220,220
if %2288=0 lsp 220,":s/20,20,0;#bbbbbbHHH",400,260
if %2289=1 lsp 221,":s/20,20,0;#FFFFFF#FF4444Green Slime ",400,290:spbtn 221,221
if %2289=0 lsp 221,":s/20,20,0;#bbbbbbHHH",400,290
if %2349=1 strsp 222,"Blue Slime",400,320,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 222,222
if %2349=0 lsp 222,":s/20,20,0;#bbbbbbHHH",400,320
if %2349=1 lsp 223,":s/20,20,0;#FFFFFF#FF4444Red Slime ",400,350:spbtn 223,223
if %2349=0 lsp 223,":s/20,20,0;#bbbbbbHHH",400,350
if %2349=1 strsp 224,"Purple Slime",400,380,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 224,224
if %2349=0 lsp 224,":s/20,20,0;#bbbbbbHHH",400,380
if %2290=1 lsp 225,":s/20,20,0;#FFFFFF#FF4444Erubetie ",400,410:spbtn 225,225
if %2290=1 && %2340=1 strsp 225,"Erubetie (1)",400,410,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 225,225
if %2290=0 lsp 225,":s/20,20,0;#bbbbbbHHH",400,410
if %2291=1 lsp 226,":s/20,20,0;#FFFFFF#FF4444Undine ",400,440:spbtn 226,226
if %2291=1 && %hsean_seirei4=1 strsp 226,"Undine (1)",400,440,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 226,226
if %2291=0 lsp 226,":s/20,20,0;#bbbbbbHHH",400,440
btnwait %bwait
if %bwait=112 mov %zukan_page,%zukan_page-1:cspl 301,303:goto *menu_zukan3
if %bwait=113 mov %zukan_page,%zukan_page+1:cspl 301,303:goto *menu_zukan3
if %bwait=201 goto *zukan_kunoitielf
if %bwait=202 goto *zukan_yamatanooroti
if %bwait=203 goto *zukan_moss
if %bwait=204 goto *zukan_mosquito
if %bwait=205 goto *zukan_imomusi
if %bwait=206 goto *zukan_mukade
if %bwait=207 goto *zukan_kaiko
if %bwait=208 goto *zukan_suzumebati
if %bwait=209 goto *zukan_queenbee
if %bwait=210 goto *zukan_a_alm
if %bwait=211 goto *zukan_a_looty
if %bwait=212 goto *zukan_a_vore
if %bwait=213 goto *zukan_a_parasol
if %bwait=214 goto *zukan_a_prison
if %bwait=215 goto *zukan_a_emp
if %bwait=216 goto *zukan_dorothy
if %bwait=217 goto *zukan_rafi
if %bwait=218 goto *zukan_dina
if %bwait=219 goto *zukan_jelly
if %bwait=220 goto *zukan_blob
if %bwait=221 goto *zukan_slime_green
if %bwait=222 goto *zukan_slime_blue
if %bwait=223 goto *zukan_slime_red
if %bwait=224 goto *zukan_slime_purple
if %bwait=225 goto *zukan_erbetie1
if %bwait=226 goto *zukan_undine
if %bwait=111 screen_clear:return
if %bwait=-1 screen_clear:return
if %bwait=-10 screen_clear:return
if %bwait=-11 screen_clear:return
goto *menu_zukan_page4



*menu_zukan_page5

btndef clear
lsp 111,":c/2,0,3;system\return.bmp",20,560:spbtn 111,111
lsp 112,":c/2,0,3;system\menu_prev.jpg",330,500:spbtn 112,112
lsp 113,":c/2,0,3;system\menu_next.jpg",480,500:spbtn 113,113
if %2292=1 strsp 201,"Mantis Girl",50,80,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 201,201
if %2292=0 lsp 201,":s/20,20,0;#bbbbbbHHH",50,80
if %2293=1 lsp 202,":s/20,20,0;#FFFFFF#FF4444Scylla ",50,110:spbtn 202,202
if %2293=0 lsp 202,":s/20,20,0;#bbbbbbHHH",50,110
if %2294=1 lsp 203,":s/20,20,0;#FFFFFF#FF4444Medusa ",50,140:spbtn 203,203
if %2294=0 lsp 203,":s/20,20,0;#bbbbbbHHH",50,140
if %2295=1 lsp 204,":s/20,20,0;#FFFFFF#FF4444Golem Girl ",50,170:spbtn 204,204
if %2295=0 lsp 204,":s/20,20,0;#bbbbbbHHH",50,170
if %2296=1 lsp 205,":s/20,20,0;#FFFFFF#FF4444Mud Golem Girl ",50,200:spbtn 205,205
if %2296=0 lsp 205,":s/20,20,0;#bbbbbbHHH",50,200
if %2297=1 strsp 206,"Automata Girl",50,230,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 206,206
if %2297=0 lsp 206,":s/20,20,0;#bbbbbbHHH",50,230
if %2298=1 lsp 207,":s/20,20,0;#FFFFFF#FF4444Ant Girls ",50,260:spbtn 207,207
if %2298=0 lsp 207,":s/20,20,0;#bbbbbbHHH",50,260
if %2299=1 lsp 208,":s/20,20,0;#FFFFFF#FF4444Queen Ant ",50,290:spbtn 208,208
if %2299=0 lsp 208,":s/20,20,0;#bbbbbbHHH",50,290
if %2300=1 lsp 209,":s/20,20,0;#FFFFFF#FF4444Maccubus ",50,320:spbtn 209,209
if %2300=0 lsp 209,":s/20,20,0;#bbbbbbHHH",50,320
if %2301=1 lsp 210,":s/20,20,0;#FFFFFF#FF4444Mincubus ",50,350:spbtn 210,210
if %2301=0 lsp 210,":s/20,20,0;#bbbbbbHHH",50,350
if %2302=1 lsp 211,":s/20,20,0;#FFFFFF#FF4444Lencubus ",50,380:spbtn 211,211
if %2302=0 lsp 211,":s/20,20,0;#bbbbbbHHH",50,380
if %2303=1 lsp 212,":s/20,20,0;#FFFFFF#FF4444Succubus ",50,410:spbtn 212,212
if %2303=0 lsp 212,":s/20,20,0;#bbbbbbHHH",50,410
if %2304=1 strsp 213,"Succubus Witch",50,440,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 213,213
if %2304=0 lsp 213,":s/20,20,0;#bbbbbbHHH",50,440
if %2305=1 strsp 214,"Lilith & Lilim",400,80,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 214,214
if %2305=0 lsp 214,":s/20,20,0;#bbbbbbHHH",400,80
if %2306=1 strsp 215,"Madame Insect",400,110,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 215,215
if %2306=0 lsp 215,":s/20,20,0;#bbbbbbHHH",400,110
if %2307=1 strsp 216,"Madame Umbrella",400,140,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 216,216
if %2307=0 lsp 216,":s/20,20,0;#bbbbbbHHH",400,140
if %2308=1 strsp 217,"Scylla Maid",400,170,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 217,217
if %2308=0 lsp 217,":s/20,20,0;#bbbbbbHHH",400,170
if %2309=1 lsp 218,":s/20,20,0;#FFFFFF#FF4444Emily ",400,200:spbtn 218,218
if %2309=0 lsp 218,":s/20,20,0;#bbbbbbHHH",400,200
if %2310=1 lsp 219,":s/20,20,0;#FFFFFF#FF4444Cassandra ",400,230:spbtn 219,219
if %2310=0 lsp 219,":s/20,20,0;#bbbbbbHHH",400,230
if %2311=1 strsp 220,"Lava Girl",400,260,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 220,220
if %2311=0 lsp 220,":s/20,20,0;#bbbbbbHHH",400,260
if %2312=1 lsp 221,":s/20,20,0;#FFFFFF#FF4444Basilisk ",400,290:spbtn 221,221
if %2312=0 lsp 221,":s/20,20,0;#bbbbbbHHH",400,290
if %2313=1 strsp 222,"Dragon Girl",400,320,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 222,222
if %2313=0 lsp 222,":s/20,20,0;#bbbbbbHHH",400,320
if %2314=1 lsp 223,":s/20,20,0;#FFFFFF#FF4444Salamander ",400,350:spbtn 223,223
if %2314=1 && %hsean_seirei3=1 strsp 223,"Salamander (1)",400,350,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 223,223
if %2314=0 lsp 223,":s/20,20,0;#bbbbbbHHH",400,350
if %2315=1 lsp 224,":s/20,20,0;#FFFFFF#FF4444Granberia (3) ",400,380:spbtn 224,224
if %2315=0 lsp 224,":s/20,20,0;#bbbbbbHHH",400,380
if %2316=1 strsp 225,"Crab Girl (2)",400,410,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 225,225
if %2316=0 lsp 225,":s/20,20,0;#bbbbbbHHH",400,410
if %2318=1 lsp 226,":s/20,20,0;#FFFFFF#FF4444Dagon ",400,440:spbtn 226,226
if %2318=0 lsp 226,":s/20,20,0;#bbbbbbHHH",400,440
btnwait %bwait
if %bwait=112 mov %zukan_page,%zukan_page-1:cspl 301,303:goto *menu_zukan3
if %bwait=113 mov %zukan_page,%zukan_page+1:cspl 301,303:goto *menu_zukan3
if %bwait=201 goto *zukan_kamakiri
if %bwait=202 goto *zukan_scylla
if %bwait=203 goto *zukan_medusa
if %bwait=204 goto *zukan_golem
if %bwait=205 goto *zukan_madgolem
if %bwait=206 goto *zukan_artm
if %bwait=207 goto *zukan_ant
if %bwait=208 goto *zukan_queenant
if %bwait=209 goto *zukan_maccubus
if %bwait=210 goto *zukan_minccubus
if %bwait=211 goto *zukan_renccubus
if %bwait=212 goto *zukan_succubus
if %bwait=213 goto *zukan_witchs
if %bwait=214 goto *zukan_lilith
if %bwait=215 goto *zukan_madaminsect
if %bwait=216 goto *zukan_madamumbrella
if %bwait=217 goto *zukan_maidscyulla
if %bwait=218 goto *zukan_emily
if %bwait=219 goto *zukan_cassandra
if %bwait=220 goto *zukan_yougan
if %bwait=221 goto *zukan_basilisk
if %bwait=222 goto *zukan_dragon
if %bwait=223 goto *zukan_salamander
if %bwait=224 goto *zukan_granberia3
if %bwait=225 goto *zukan_kani2
if %bwait=226 goto *zukan_dagon
if %bwait=111 screen_clear:return
if %bwait=-1 screen_clear:return
if %bwait=-10 screen_clear:return
if %bwait=-11 screen_clear:return
goto *menu_zukan_page5



*menu_zukan_page6

btndef clear
lsp 111,":c/2,0,3;system\return.bmp",20,560:spbtn 111,111
lsp 112,":c/2,0,3;system\menu_prev.jpg",330,500:spbtn 112,112
lsp 113,":c/2,0,3;system\menu_next.jpg",480,500:spbtn 113,113
if %2320=1 lsp 201,":s/20,20,0;#FFFFFF#FF4444Poseidoness ",50,80:spbtn 201,201
if %2320=0 lsp 201,":s/20,20,0;#bbbbbbHHH",50,80
if %2321=1 lsp 202,":s/20,20,0;#FFFFFF#FF4444Siren ",50,110:spbtn 202,202
if %2321=0 lsp 202,":s/20,20,0;#bbbbbbHHH",50,110
if %2317=1 strsp 203,"Starfish Girl",50,140,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 203,203
if %2317=0 lsp 203,":s/20,20,0;#bbbbbbHHH",50,140
if %2324=1 lsp 204,":s/20,20,0;#FFFFFF#FF4444Beelzebubs ",50,170:spbtn 204,204
if %2324=0 lsp 204,":s/20,20,0;#bbbbbbHHH",50,170
if %2325=1 lsp 205,":s/20,20,0;#FFFFFF#FF4444Trick Fairy ",50,200:spbtn 205,205
if %2325=0 lsp 205,":s/20,20,0;#bbbbbbHHH",50,200
if %2326=1 lsp 206,":s/20,20,0;#FFFFFF#FF4444Queen Fairy ",50,230:spbtn 206,206
if %2326=0 lsp 206,":s/20,20,0;#bbbbbbHHH",50,230
if %2327=1 lsp 207,":s/20,20,0;#FFFFFF#FF4444Queen Elf ",50,260:spbtn 207,207
if %2327=0 lsp 207,":s/20,20,0;#bbbbbbHHH",50,260
if %2328=1 strsp 208,"Sara (Succubization)",50,290,11,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 208,208
if %2328=0 lsp 208,":s/20,20,0;#bbbbbbHHH",50,290
if %2329=1 lsp 209,":s/20,20,0;#FFFFFF#FF4444Wyvern ",50,320:spbtn 209,209
if %2329=0 lsp 209,":s/20,20,0;#bbbbbbHHH",50,320
if %2330=1 lsp 210,":s/20,20,0;#FFFFFF#FF4444Kyoryuu ",50,350:spbtn 210,210
if %2330=0 lsp 210,":s/20,20,0;#bbbbbbHHH",50,350
if %2331=1 lsp 211,":s/20,20,0;#FFFFFF#FF4444Chimera Beast ",50,380:spbtn 211,211
if %2331=0 lsp 211,":s/20,20,0;#bbbbbbHHH",50,380
if %2333=1 lsp 212,":s/20,20,0;#FFFFFF#FF4444Chimera Dryad Vore ",50,410:spbtn 212,212
if %2333=0 lsp 212,":s/20,20,0;#bbbbbbHHH",50,410
if %2335=1 lsp 213,":s/20,20,0;#FFFFFF#FF4444Vampire ",50,440:spbtn 213,213
if %2335=0 lsp 213,":s/20,20,0;#bbbbbbHHH",50,440
if %2334=1 lsp 214,":s/20,20,0;#FFFFFF#FF4444Behemoth ",400,80:spbtn 214,214
if %2334=0 lsp 214,":s/20,20,0;#bbbbbbHHH",400,80
if %2336=1 lsp 215,":s/20,20,0;#FFFFFF#FF4444Elder Succubus ",400,110:spbtn 215,215
if %2336=0 lsp 215,":s/20,20,0;#bbbbbbHHH",400,110
if %2319=1 lsp 216,":s/20,20,0;#FFFFFF#FF4444Yao ",400,140:spbtn 216,216
if %2319=0 lsp 216,":s/20,20,0;#bbbbbbHHH",400,140
if %2322=1 lsp 217,":s/20,20,0;#FFFFFF#FF4444Imp ",400,170:spbtn 217,217
if %2322=1 && %2398=1 lsp 217,":s/20,20,0;#FFFFFF#FF4444Imp (1) ",400,170:spbtn 217,217
if %2322=0 lsp 217,":s/20,20,0;#bbbbbbHHH",400,170
if %2337=1 lsp 218,":s/20,20,0;#FFFFFF#FF4444Giganto Weapon ",400,200:spbtn 218,218
if %2337=0 lsp 218,":s/20,20,0;#bbbbbbHHH",400,200
if %2338=1 strsp 219,"Alma Elma (3)",400,230,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 219,219
if %2338=0 lsp 219,":s/20,20,0;#bbbbbbHHH",400,230
if %2339=1 strsp 220,"Tamamo (2)",400,260,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 220,220
if %2339=0 lsp 220,":s/20,20,0;#bbbbbbHHH",400,260
if %2340=1 strsp 221,"Erubetie (2)",400,290,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 221,221
if %2340=0 lsp 221,":s/20,20,0;#bbbbbbHHH",400,290
if %2341=1 lsp 222,":s/20,20,0;#FFFFFF#FF4444Granberia (4) ",400,320:spbtn 222,222
if %2341=0 lsp 222,":s/20,20,0;#bbbbbbHHH",400,320
if %2342=1 lsp 223,":s/20,20,0;#FFFFFF#FF4444Alice (3) ",400,350:spbtn 223,223
if %2342=0 lsp 223,":s/20,20,0;#bbbbbbHHH",400,350
if %hsean_irias1=1 && %game_clear>1 lsp 224,":s/20,20,0;#FFFFFF#FF4444Goddess Ilias (2) ",400,380:spbtn 224,224
if %hsean_irias1=0 lsp 224,":s/20,20,0;#bbbbbbHHH",400,380
if %game_clear<2 lsp 224,":s/20,20,0;#bbbbbbHHH",400,380
if %2350=1 lsp 225,":s/20,20,0;#FFFFFF#FF4444Cupid ",400,410:spbtn 225,225
if %2350=0 lsp 225,":s/20,20,0;#bbbbbbHHH",400,410
if %2351=1 lsp 226,":s/20,20,0;#FFFFFF#FF4444Valkyrie ",400,440:spbtn 226,226
if %2351=0 lsp 226,":s/20,20,0;#bbbbbbHHH",400,440
btnwait %bwait
if %bwait=112 mov %zukan_page,%zukan_page-1:cspl 301,303:goto *menu_zukan3
if %bwait=113 mov %zukan_page,%zukan_page+1:cspl 301,303:goto *menu_zukan3
if %bwait=201 goto *zukan_poseidones
if %bwait=202 goto *zukan_seiren
if %bwait=203 goto *zukan_hitode
if %bwait=204 goto *zukan_beelzebub
if %bwait=205 goto *zukan_trickfairy
if %bwait=206 goto *zukan_queenfairy
if %bwait=207 goto *zukan_queenelf
if %bwait=208 goto *zukan_saraevil
if %bwait=209 goto *zukan_wyvern
if %bwait=210 goto *zukan_kyoryuu
if %bwait=211 goto *zukan_c_beast
if %bwait=212 goto *zukan_c_dryad_vore
if %bwait=213 goto *zukan_vampire
if %bwait=214 goto *zukan_behemoth
if %bwait=215 goto *zukan_esuccubus
if %bwait=216 goto *zukan_hatibi
if %bwait=217 goto *zukan_inp
if %bwait=218 goto *zukan_gigantweapon
if %bwait=219 goto *zukan_arumaeruma3
if %bwait=220 goto *zukan_tamamo2
if %bwait=221 goto *zukan_erbetie2
if %bwait=222 goto *zukan_granberia4
if %bwait=223 goto *zukan_alice3
if %bwait=224 goto *zukan_irias2
if %bwait=225 goto *zukan_cupid
if %bwait=226 goto *zukan_valkyrie
if %bwait=111 screen_clear:return
if %bwait=-1 screen_clear:return
if %bwait=-10 screen_clear:return
if %bwait=-11 screen_clear:return
goto *menu_zukan_page6



*menu_zukan_page7

btndef clear
lsp 111,":c/2,0,3;system\return.bmp",20,560:spbtn 111,111
lsp 112,":c/2,0,3;system\menu_prev.jpg",330,500:spbtn 112,112
lsp 113,":c/2,0,3;system\menu_next.jpg",480,500:spbtn 113,113
if %2352=1 lsp 201,":s/20,20,0;#FFFFFF#FF4444Archangel Ariel ",50,80:spbtn 201,201
if %2352=0 lsp 201,":s/20,20,0;#bbbbbbHHH",50,80
if %2353=1 strsp 202,"Experimental Organism S-2",50,110,14,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 202,202
if %2353=0 lsp 202,":s/20,20,0;#bbbbbbHHH",50,110
if %2354=1 strsp 203,"Experimental Organism A-3",50,140,14,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 203,203
if %2354=0 lsp 203,":s/20,20,0;#bbbbbbHHH",50,140
if %2355=1 lsp 204,":s/20,20,0;#FFFFFF#FF4444Promestein ",50,170:spbtn 204,204
if %2355=1 && %2423=1 strsp 204,"Promestein (1)",50,170,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 204,204
if %2355=0 lsp 204,":s/20,20,0;#bbbbbbHHH",50,170
if %2357=1 lsp 205,":s/20,20,0;#FFFFFF#FF4444Archangel Ranael ",50,200:spbtn 205,205
if %2357=0 lsp 205,":s/20,20,0;#bbbbbbHHH",50,200
if %2358=1 lsp 206,":s/20,20,0;#FFFFFF#FF4444Chimera Tongue ",50,230:spbtn 206,206
if %2358=0 lsp 206,":s/20,20,0;#bbbbbbHHH",50,230
if %2361=1 lsp 207,":s/20,20,0;#FFFFFF#FF4444Angel Soldiers ",50,260:spbtn 207,207
if %2361=0 lsp 207,":s/20,20,0;#bbbbbbHHH",50,260
if %2359=1 strsp 208,"Principality Nagael",50,290,11,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 208,208
if %2359=0 lsp 208,":s/20,20,0;#bbbbbbHHH",50,290
if %hsean_etc6=1 lsp 209,":s/20,20,0;#FFFFFF#FF4444Chimera Slug ",50,320:spbtn 209,209
if %hsean_etc6=0 lsp 209,":s/20,20,0;#bbbbbbHHH",50,320
if %2362=1 lsp 210,":s/20,20,0;#FFFFFF#FF4444Chimera Tentacle ",50,350:spbtn 210,210
if %2362=0 lsp 210,":s/20,20,0;#bbbbbbHHH",50,350
if %2360=1 lsp 211,":s/20,20,0;#FFFFFF#FF4444Archangel Mariel ",50,380:spbtn 211,211
if %2360=0 lsp 211,":s/20,20,0;#bbbbbbHHH",50,380
if %hsean_etc1=1 lsp 212,":s/20,20,0;#FFFFFF#FF4444Chimera Prison ",50,410:spbtn 212,212
if %hsean_etc1=0 lsp 212,":s/20,20,0;#bbbbbbHHH",50,410
if %2363=1 lsp 213,":s/20,20,0;#FFFFFF#FF4444Chimera Medullahan ",50,440:spbtn 213,213
if %2363=0 lsp 213,":s/20,20,0;#bbbbbbHHH",50,440
if %2356=1 lsp 214,":s/20,20,0;#FFFFFF#FF4444Trinity ",400,80:spbtn 214,214
if %2356=0 lsp 214,":s/20,20,0;#bbbbbbHHH",400,80
if %2365=1 lsp 215,":s/20,20,0;#FFFFFF#FF4444Chimera Bug ",400,110:spbtn 215,215
if %2365=0 lsp 215,":s/20,20,0;#bbbbbbHHH",400,110
if %2364=1 strsp 216,"Sister Lamia",400,140,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 216,216
if %2364=0 lsp 216,":s/20,20,0;#bbbbbbHHH",400,140
if %hsean_etc2=1 strsp 217,"Catoblepas Girl",400,170,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 217,217
if %hsean_etc2=0 lsp 217,":s/20,20,0;#bbbbbbHHH",400,170
if %2366=1 lsp 218,":s/20,20,0;#FFFFFF#FF4444Power Muzukiel ",400,200:spbtn 218,218
if %2366=0 lsp 218,":s/20,20,0;#bbbbbbHHH",400,200
if %2367=1 lsp 219,":s/20,20,0;#FFFFFF#FF4444Mermaid ",400,230:spbtn 219,219
if %2367=0 lsp 219,":s/20,20,0;#bbbbbbHHH",400,230
if %2368=1 lsp 220,":s/20,20,0;#FFFFFF#FF4444Mermaid General ",400,260:spbtn 220,220
if %2368=0 lsp 220,":s/20,20,0;#bbbbbbHHH",400,260
if %2369=1 lsp 221,":s/20,20,0;#FFFFFF#FF4444El ",400,290:spbtn 221,221
if %2369=0 lsp 221,":s/20,20,0;#bbbbbbHHH",400,290
if %2370=1 lsp 222,":s/20,20,0;#FFFFFF#FF4444Queen Mermaid ",400,320:spbtn 222,222
if %2370=0 lsp 222,":s/20,20,0;#bbbbbbHHH",400,320
if %hsean_etc3=1 strsp 223,"Experimental Organism XX-7",400,350,14,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 223,223
if %hsean_etc3=0 lsp 223,":s/20,20,0;#bbbbbbHHH",400,350
if %2372=1 strsp 224,"Shadow Girl",400,380,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 224,224
if %2372=0 lsp 224,":s/20,20,0;#bbbbbbHHH",400,380
if %2373=1 lsp 225,":s/20,20,0;#FFFFFF#FF4444Paintgeist ",400,410:spbtn 225,225
if %2373=0 lsp 225,":s/20,20,0;#bbbbbbHHH",400,410
if %2374=1 strsp 226,"Chrome (2)",400,440,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 226,226
if %2374=0 lsp 226,":s/20,20,0;#bbbbbbHHH",400,440
btnwait %bwait
if %bwait=112 mov %zukan_page,%zukan_page-1:cspl 301,303:goto *menu_zukan3
if %bwait=113 mov %zukan_page,%zukan_page+1:cspl 301,303:goto *menu_zukan3
if %bwait=201 goto *zukan_ariel
if %bwait=202 goto *zukan_c_s2
if %bwait=203 goto *zukan_c_a3
if %bwait=204 goto *zukan_stein1
if %bwait=205 goto *zukan_ranael
if %bwait=206 goto *zukan_c_tangh
if %bwait=207 goto *zukan_angels
if %bwait=208 goto *zukan_nagael
if %bwait=209 goto *zukan_c_slag
if %bwait=210 goto *zukan_c_tentacle
if %bwait=211 goto *zukan_mariel
if %bwait=212 goto *zukan_c_prison
if %bwait=213 goto *zukan_c_medulahan
if %bwait=214 goto *zukan_trinity
if %bwait=215 goto *zukan_c_bug
if %bwait=216 goto *zukan_sisterlamia
if %bwait=217 goto *zukan_catoblepas
if %bwait=218 goto *zukan_muzukiel
if %bwait=219 goto *zukan_Mermaid
if %bwait=220 goto *zukan_g_Mermaid
if %bwait=221 goto *zukan_ningyohime
if %bwait=222 goto *zukan_queenMermaid
if %bwait=223 goto *zukan_XX7
if %bwait=224 goto *zukan_shadow
if %bwait=225 goto *zukan_gaistvine
if %bwait=226 goto *zukan_chrom2
if %bwait=111 screen_clear:return
if %bwait=-1 screen_clear:return
if %bwait=-10 screen_clear:return
if %bwait=-11 screen_clear:return
goto *menu_zukan_page7



*menu_zukan_page8

btndef clear
lsp 111,":c/2,0,3;system\return.bmp",20,560:spbtn 111,111
lsp 112,":c/2,0,3;system\menu_prev.jpg",330,500:spbtn 112,112
lsp 113,":c/2,0,3;system\menu_next.jpg",480,500:spbtn 113,113
if %2375=1 lsp 201,":s/20,20,0;#FFFFFF#FF4444Power Berryelle ",50,80:spbtn 201,201
if %2375=0 lsp 201,":s/20,20,0;#bbbbbbHHH",50,80
if %2376=1 strsp 202,"Virtue Revel",50,110,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 202,202
if %2376=0 lsp 202,":s/20,20,0;#bbbbbbHHH",50,110
if %hsean_seirei1=1 lsp 203,":s/20,20,0;#FFFFFF#FF4444Gnome (2) ",50,140:spbtn 203,203
if %hsean_seirei1=0 lsp 203,":s/20,20,0;#bbbbbbHHH",50,140
if %hsean_etc4=1 lsp 204,":s/20,20,0;#FFFFFF#FF4444Chimera Chariot ",50,170:spbtn 204,204
if %hsean_etc4=0 lsp 204,":s/20,20,0;#bbbbbbHHH",50,170
if %2395=1 lsp 205,":s/20,20,0;#FFFFFF#FF4444Carmilla ",50,200:spbtn 205,205
if %2395=0 lsp 205,":s/20,20,0;#bbbbbbHHH",50,200
if %2396=1 lsp 206,":s/20,20,0;#FFFFFF#FF4444Elizabeth ",50,230:spbtn 206,206
if %2396=0 lsp 206,":s/20,20,0;#bbbbbbHHH",50,230
if %2397=1 lsp 207,":s/20,20,0;#FFFFFF#FF4444Queen Vampire ",50,260:spbtn 207,207
if %2397=0 lsp 207,":s/20,20,0;#bbbbbbHHH",50,260
if %2380=1 lsp 208,":s/20,20,0;#FFFFFF#FF4444Chimera Homunculus ",50,290:spbtn 208,208
if %2380=0 lsp 208,":s/20,20,0;#bbbbbbHHH",50,290
if %2381=1 strsp 209,"Iron Maiden v2",50,320,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 209,209
if %2381=0 lsp 209,":s/20,20,0;#bbbbbbHHH",50,320
if %2382=1 lsp 210,":s/20,20,0;#FFFFFF#FF4444Lucia ",50,350:spbtn 210,210
if %2382=0 lsp 210,":s/20,20,0;#bbbbbbHHH",50,350
if %2383=1 strsp 211,"Virtue Silkiel",50,380,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 211,211
if %2383=0 lsp 211,":s/20,20,0;#bbbbbbHHH",50,380
if %2384=1 strsp 212,"Dominion Endiel",50,410,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 212,212
if %2384=0 lsp 212,":s/20,20,0;#bbbbbbHHH",50,410
if %hsean_seirei2=1 lsp 213,":s/20,20,0;#FFFFFF#FF4444Sylph (2) ",50,440:spbtn 213,213
if %hsean_seirei2=0 lsp 213,":s/20,20,0;#bbbbbbHHH",50,440
if %hsean_etc5=1 strsp 214,"Typhoon Girl",400,80,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 214,214
if %hsean_etc5=0 lsp 214,":s/20,20,0;#bbbbbbHHH",400,80
if %2401=1 lsp 215,":s/20,20,0;#FFFFFF#FF4444Lamiaroid ",400,110:spbtn 215,215
if %2401=0 lsp 215,":s/20,20,0;#bbbbbbHHH",400,110
if %2386=1 lsp 216,":s/20,20,0;#FFFFFF#FF4444Knightroid ",400,140:spbtn 216,216
if %2386=0 lsp 216,":s/20,20,0;#bbbbbbHHH",400,140
if %2387=1 lsp 217,":s/20,20,0;#FFFFFF#FF4444Akaname ",400,170:spbtn 217,217
if %2387=0 lsp 217,":s/20,20,0;#bbbbbbHHH",400,170
if %2388=1 strsp 218,"Miko Lamia",400,200,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 218,218
if %2388=0 lsp 218,":s/20,20,0;#bbbbbbHHH",400,200
if %2429=1 lsp 219,":s/20,20,0;#FFFFFF#FF4444Kejourou ",400,230:spbtn 219,219
if %2429=0 lsp 219,":s/20,20,0;#bbbbbbHHH",400,230
if %2389=1 lsp 220,":s/20,20,0;#FFFFFF#FF4444Shirohebi ",400,260:spbtn 220,220
if %2389=0 lsp 220,":s/20,20,0;#bbbbbbHHH",400,260
if %2390=1 lsp 221,":s/20,20,0;#FFFFFF#FF4444Walraune ",400,290:spbtn 221,221
if %2390=0 lsp 221,":s/20,20,0;#bbbbbbHHH",400,290
if %2391=1 lsp 222,":s/20,20,0;#FFFFFF#FF4444Dryad ",400,320:spbtn 222,222
if %2391=0 lsp 222,":s/20,20,0;#bbbbbbHHH",400,320
if %2392=1 lsp 223,":s/20,20,0;#FFFFFF#FF4444Queen Alraune ",400,350:spbtn 223,223
if %2392=0 lsp 223,":s/20,20,0;#bbbbbbHHH",400,350
if %2393=1 lsp 224,":s/20,20,0;#FFFFFF#FF4444Slime Bess ",400,380:spbtn 224,224
if %2393=0 lsp 224,":s/20,20,0;#bbbbbbHHH",400,380
if %2394=1 strsp 225,"Throne Eggiel",400,410,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 225,225
if %2394=0 lsp 225,":s/20,20,0;#bbbbbbHHH",400,410
if %hsean_seirei3=1 strsp 226,"Salamander (2)",400,440,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 226,226
if %hsean_seirei3=0 lsp 226,":s/20,20,0;#bbbbbbHHH",400,440
btnwait %bwait
if %bwait=112 mov %zukan_page,%zukan_page-1:cspl 301,303:goto *menu_zukan3
if %bwait=113 mov %zukan_page,%zukan_page+1:cspl 301,303:goto *menu_zukan3
if %bwait=201 goto *zukan_berryel
if %bwait=202 goto *zukan_revel
if %bwait=203 goto *zukan_gnome2
if %bwait=204 goto *zukan_c_chariot
if %bwait=205 goto *zukan_carmilla
if %bwait=206 goto *zukan_elisabeth
if %bwait=207 goto *zukan_queenvanpire
if %bwait=208 goto *zukan_c_homunculus
if %bwait=209 goto *zukan_ironmaiden_k
if %bwait=210 goto *zukan_lusia
if %bwait=211 goto *zukan_silkiel
if %bwait=212 goto *zukan_endiel
if %bwait=213 goto *zukan_sylph2
if %bwait=214 goto *zukan_typhon
if %bwait=215 goto *zukan_lamianloid
if %bwait=216 goto *zukan_knightloid
if %bwait=217 goto *zukan_akaname
if %bwait=218 goto *zukan_mikolamia
if %bwait=219 goto *zukan_kezyorou
if %bwait=220 goto *zukan_sirohebisama
if %bwait=221 goto *zukan_walraune
if %bwait=222 goto *zukan_dryad
if %bwait=223 goto *zukan_queenalraune
if %bwait=224 goto *zukan_slimelord
if %bwait=225 goto *zukan_eggel
if %bwait=226 goto *zukan_salamander2
if %bwait=111 screen_clear:return
if %bwait=-1 screen_clear:return
if %bwait=-10 screen_clear:return
if %bwait=-11 screen_clear:return
goto *menu_zukan_page8



*menu_zukan_page9

btndef clear
lsp 111,":c/2,0,3;system\return.bmp",20,560:spbtn 111,111
lsp 112,":c/2,0,3;system\menu_prev.jpg",330,500:spbtn 112,112
lsp 113,":c/2,0,3;system\menu_next.jpg",480,500:spbtn 113,113
if %2378=1 lsp 201,":s/20,20,0;#FFFFFF#FF4444Tsuchigumo ",50,80:spbtn 201,201
if %2378=0 lsp 201,":s/20,20,0;#bbbbbbHHH",50,80
if %2377=1 lsp 202,":s/20,20,0;#FFFFFF#FF4444Arachne Lord ",50,110:spbtn 202,202
if %2377=0 lsp 202,":s/20,20,0;#bbbbbbHHH",50,110
if %2379=1 strsp 203,"Spider Princess",50,140,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 203,203
if %2379=0 lsp 203,":s/20,20,0;#bbbbbbHHH",50,140
if %2399=1 lsp 204,":s/20,20,0;#FFFFFF#FF4444Naccubus ",50,170:spbtn 204,204
if %2399=0 lsp 204,":s/20,20,0;#bbbbbbHHH",50,170
if %2398=1 lsp 205,":s/20,20,0;#FFFFFF#FF4444Imp (2) ",50,200:spbtn 205,205
if %2398=0 lsp 205,":s/20,20,0;#bbbbbbHHH",50,200
if %2400=1 lsp 206,":s/20,20,0;#FFFFFF#FF4444Eva ",50,230:spbtn 206,206
if %2400=0 lsp 206,":s/20,20,0;#bbbbbbHHH",50,230
if %2385=1 lsp 207,":s/20,20,0;#FFFFFF#FF4444Trooperoid ",50,260:spbtn 207,207
if %2385=0 lsp 207,":s/20,20,0;#bbbbbbHHH",50,260
if %2402=1 lsp 208,":s/20,20,0;#FFFFFF#FF4444Assassinroid ",50,290:spbtn 208,208
if %2402=0 lsp 208,":s/20,20,0;#bbbbbbHHH",50,290
if %2403=1 lsp 209,":s/20,20,0;#FFFFFF#FF4444Yomotsu-Shikome ",50,320:spbtn 209,209
if %2403=0 lsp 209,":s/20,20,0;#bbbbbbHHH",50,320
if %2404=1 strsp 210,"Cherub Wormiel",50,350,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 210,210
if %2404=0 lsp 210,":s/20,20,0;#bbbbbbHHH",50,350
if %hsean_seirei4=1 strsp 211,"Undine (2)",50,380,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 211,211
if %hsean_seirei4=0 lsp 211,":s/20,20,0;#bbbbbbHHH",50,380
if %hsean_alice10=1 lsp 212,":s/20,20,0;#FFFFFF#FF4444Alice (4) ",50,410:spbtn 212,212
if %hsean_alice10=0 lsp 212,":s/20,20,0;#bbbbbbHHH",50,410
if %2410=1 lsp 213,":s/20,20,0;#FFFFFF#FF4444Drain Plant ",50,440:spbtn 213,213
if %2410=0 lsp 213,":s/20,20,0;#bbbbbbHHH",50,440
if %2411=1 lsp 214,":s/20,20,0;#FFFFFF#FF4444Drainroid ",400,80:spbtn 214,214
if %2411=0 lsp 214,":s/20,20,0;#bbbbbbHHH",400,80
if %2412=1 lsp 215,":s/20,20,0;#FFFFFF#FF4444Replicant ",400,110:spbtn 215,215
if %2412=0 lsp 215,":s/20,20,0;#bbbbbbHHH",400,110
if %2413=1 lsp 216,":s/20,20,0;#FFFFFF#FF4444Laplace ",400,140:spbtn 216,216
if %2413=0 lsp 216,":s/20,20,0;#bbbbbbHHH",400,140
if %hsean_etc7=1 strsp 217,"Experimental Organism AD-5",400,170,14,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 217,217
if %hsean_etc7=0 lsp 217,":s/20,20,0;#bbbbbbHHH",400,170
if %2405=1 lsp 218,":s/20,20,0;#FFFFFF#FF4444Ferme Sara ",400,200:spbtn 218,218
if %2405=0 lsp 218,":s/20,20,0;#bbbbbbHHH",400,200
if %2406=1 lsp 219,":s/20,20,0;#FFFFFF#FF4444Angel Ghoul ",400,230:spbtn 219,219
if %2406=0 lsp 219,":s/20,20,0;#bbbbbbHHH",400,230
if %2407=1 strsp 220,"Zombie Dragon Girl",400,260,10,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 220,220
if %2407=0 lsp 220,":s/20,20,0;#bbbbbbHHH",400,260
if %2430=1 strsp 221,"Cirque du Croix (1)",400,290,11,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 221,221
if %2430=0 lsp 221,":s/20,20,0;#bbbbbbHHH",400,290
if %2432=1 strsp 222,"Cirque du Croix (2)",400,320,11,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 222,222
if %2432=0 lsp 222,":s/20,20,0;#bbbbbbHHH",400,320
if %2433=1 strsp 223,"Cirque du Croix (3)",400,350,11,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 223,223
if %2433=0 lsp 223,":s/20,20,0;#bbbbbbHHH",400,350
if %2431=1 lsp 224,":s/20,20,0;#FFFFFF#FF4444Alipheese the Fifteenth ",400,380:spbtn 224,224
if %2431=0 lsp 224,":s/20,20,0;#bbbbbbHHH",400,380
if %2409=1 strsp 225,"La Croix",400,410,5,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 225,225
if %2409=0 lsp 225,":s/20,20,0;#bbbbbbHHH",400,410
if %2414=1 lsp 226,":s/20,20,0;#FFFFFF#FF4444Black Alice ",400,440:spbtn 226,226
if %2414=1 && %2424=1 lsp 226,":s/20,20,0;#FFFFFF#FF4444Black Alice (1) ",400,440:spbtn 226,226
if %2414=0 lsp 226,":s/20,20,0;#bbbbbbHHH",400,440
btnwait %bwait
if %bwait=112 mov %zukan_page,%zukan_page-1:cspl 301,303:goto *menu_zukan3
if %bwait=113 mov %zukan_page,%zukan_page+1:cspl 301,303:goto *menu_zukan3
if %bwait=201 goto *zukan_tutigumo
if %bwait=202 goto *zukan_alakneload
if %bwait=203 goto *zukan_kumonomiko
if %bwait=204 goto *zukan_narcubus
if %bwait=205 goto *zukan_inps
if %bwait=206 goto *zukan_eva
if %bwait=207 goto *zukan_trooperloid
if %bwait=208 goto *zukan_assassinloid
if %bwait=209 goto *zukan_yomotu
if %bwait=210 goto *zukan_wormiel
if %bwait=211 goto *zukan_undine2
if %bwait=212 goto *zukan_alice4
if %bwait=213 goto *zukan_drainplant
if %bwait=214 goto *zukan_drainloid
if %bwait=215 goto *zukan_replicant
if %bwait=216 goto *zukan_laplace
if %bwait=217 goto *zukan_AD5
if %bwait=218 goto *zukan_fermesara
if %bwait=219 goto *zukan_angelghoul
if %bwait=220 goto *zukan_dragonzonbe
if %bwait=221 goto *zukan_cirque1
if %bwait=222 goto *zukan_cirque2
if %bwait=223 goto *zukan_cirque3
if %bwait=224 goto *zukan_alice15th
if %bwait=225 goto *zukan_shirom
if %bwait=226 goto *zukan_alice8th1
if %bwait=111 screen_clear:return
if %bwait=-1 screen_clear:return
if %bwait=-10 screen_clear:return
if %bwait=-11 screen_clear:return
goto *menu_zukan_page9



*menu_zukan_page10

btndef clear
lsp 111,":c/2,0,3;system\return.bmp",20,560:spbtn 111,111
lsp 112,":c/2,0,3;system\menu_prev.jpg",330,500:spbtn 112,112
lsp 113,":c/2,0,3;system\menu_next.jpg",480,500:spbtn 113,113
if %2371=1 strsp 201,"Themis Trap",50,80,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 201,201
if %2371=0 lsp 201,":s/20,20,0;#bbbbbbHHH",50,80
if %2415=1 strsp 202,"Gargoyle Girl",50,110,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 202,202
if %2415=0 lsp 202,":s/20,20,0;#bbbbbbHHH",50,110
if %2408=1 strsp 203,"Doppel Luka",50,140,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 203,203
if %2408=0 lsp 203,":s/20,20,0;#bbbbbbHHH",50,140
if %2416=1 lsp 204,":s/20,20,0;#FFFFFF#FF4444Hainuwele ",50,170:spbtn 204,204
if %2416=0 lsp 204,":s/20,20,0;#bbbbbbHHH",50,170
if %2417=1 lsp 205,":s/20,20,0;#FFFFFF#FF4444Amphisbaena ",50,200:spbtn 205,205
if %2417=0 lsp 205,":s/20,20,0;#bbbbbbHHH",50,200
if %2418=1 lsp 206,":s/20,20,0;#FFFFFF#FF4444Tsukuyomi ",50,230:spbtn 206,206
if %2418=0 lsp 206,":s/20,20,0;#bbbbbbHHH",50,230
if %2419=1 lsp 207,":s/20,20,0;#FFFFFF#FF4444Arc-En-Ciel ",50,260:spbtn 207,207
if %2419=0 lsp 207,":s/20,20,0;#bbbbbbHHH",50,260
if %2420=1 lsp 208,":s/20,20,0;#FFFFFF#FF4444Rapunzel ",50,290:spbtn 208,208
if %2420=0 lsp 208,":s/20,20,0;#bbbbbbHHH",50,290
if %2421=1 strsp 209,"Heaven's Gate",50,320,11,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 209,209
if %2421=0 lsp 209,":s/20,20,0;#bbbbbbHHH",50,320
if %2422=1 strsp 210,"Seraph Eden",50,350,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 210,210
if %2422=0 lsp 210,":s/20,20,0;#bbbbbbHHH",50,350
if %2423=1 strsp 211,"Promestein (Final Form)",50,380,13,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 211,211
if %2423=0 lsp 211,":s/20,20,0;#bbbbbbHHH",50,380
if %2424=1 lsp 212,":s/20,20,0;#FFFFFF#FF4444Black Alice (2) ",50,410:spbtn 212,212
if %2424=0 lsp 212,":s/20,20,0;#bbbbbbHHH",50,410
if %2425=1 lsp 213,":s/20,20,0;#FFFFFF#FF4444Black Alice (3) ",50,440:spbtn 213,213
if %2425=0 lsp 213,":s/20,20,0;#bbbbbbHHH",50,440
if %2426=1 strsp 214,"Black Alice (Final Form)",400,80,13,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 214,214
if %2426=0 lsp 214,":s/20,20,0;#bbbbbbHHH",400,80
if %2427=1 lsp 215,":s/20,20,0;#FFFFFF#FF4444Goddess Ilias (3) ",400,110:spbtn 215,215
if %2428=1 strsp 216,"Goddess Ilias (Final Form)",400,140,14,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 216,216
if %game_clear=3 lsp 217,":s/20,20,0;#FFFFFF#FF4444Other Endings ",400,170:spbtn 217,217
if %hsean_shitenno1=1 && %game_clear=3 lsp 218,":s/20,20,0;#FFFFFF#FF4444Granberia (END) ",400,200:spbtn 218,218
if %hsean_shitenno1=0 && %game_clear=3 lsp 218,":s/20,20,0;#bbbbbbHHH",400,200
if %hsean_shitenno2=1 && %game_clear=3 strsp 219,"Alma Elma (END)",400,230,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 219,219
if %hsean_shitenno2=0 && %game_clear=3 lsp 219,":s/20,20,0;#bbbbbbHHH",400,230
if %hsean_shitenno3=1 && %game_clear=3 strsp 220,"Tamamo (END)",400,260,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 220,220
if %hsean_shitenno3=0 && %game_clear=3 lsp 220,":s/20,20,0;#bbbbbbHHH",400,260
if %hsean_shitenno4=1 && %game_clear=3 strsp 221,"Erubetie (END)",400,290,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 221,221
if %hsean_shitenno4=0 && %game_clear=3 lsp 221,":s/20,20,0;#bbbbbbHHH",400,290
if %game_clear=3 lsp 222,":s/20,20,0;#FFFFFF#FF4444Alice (END) ",400,320:spbtn 222,222
btnwait %bwait
if %bwait=112 mov %zukan_page,%zukan_page-1:cspl 301,303:goto *menu_zukan3
if %bwait=113 mov %zukan_page,%zukan_page+1:cspl 301,303:goto *menu_zukan3
if %bwait=201 goto *zukan_traptemis
if %bwait=202 goto *zukan_gargoyle
if %bwait=203 goto *zukan_doppele
if %bwait=204 goto *zukan_hainu
if %bwait=205 goto *zukan_amphis
if %bwait=206 goto *zukan_tukuyomi
if %bwait=207 goto *zukan_arcen
if %bwait=208 goto *zukan_rapun
if %bwait=209 goto *zukan_heavensgate
if %bwait=210 goto *zukan_eden
if %bwait=211 goto *zukan_stein2
if %bwait=212 goto *zukan_alice8th2
if %bwait=213 goto *zukan_alice8th3
if %bwait=214 goto *zukan_alice8th4
if %bwait=215 goto *zukan_irias3
if %bwait=216 goto *zukan_irias4
if %bwait=217 goto *zukan_end
if %bwait=218 goto *zukan_granberia5
if %bwait=219 goto *zukan_arumaeruma4
if %bwait=220 goto *zukan_tamamo3
if %bwait=221 goto *zukan_erbetie3
if %bwait=222 goto *zukan_alice5
if %bwait=111 screen_clear:return
if %bwait=-1 screen_clear:return
if %bwait=-10 screen_clear:return
if %bwait=-11 screen_clear:return
goto *menu_zukan_page10



*menu_zukan_pagex

btndef clear
lsp 111,":c/2,0,3;system\return.bmp",20,560:spbtn 111,111
lsp 112,":c/2,0,3;system\menu_prev.jpg",330,500:spbtn 112,112
lsp 113,":c/2,0,3;system\menu_next.jpg",480,500:spbtn 113,113
strsp 201,"Part 1 Monster",50,80,8,1,20,20,0,0,1,1,#bbbbbb
strsp 202,"Part 1 Monster",50,110,8,1,20,20,0,0,1,1,#bbbbbb
strsp 203,"Part 1 Monster",50,140,8,1,20,20,0,0,1,1,#bbbbbb
strsp 204,"Part 1 Monster",50,170,8,1,20,20,0,0,1,1,#bbbbbb
strsp 205,"Part 1 Monster",50,200,8,1,20,20,0,0,1,1,#bbbbbb
strsp 206,"Part 1 Monster",50,230,8,1,20,20,0,0,1,1,#bbbbbb
strsp 207,"Part 1 Monster",50,260,8,1,20,20,0,0,1,1,#bbbbbb
strsp 208,"Part 1 Monster",50,290,8,1,20,20,0,0,1,1,#bbbbbb
strsp 209,"Part 1 Monster",50,320,8,1,20,20,0,0,1,1,#bbbbbb
strsp 210,"Part 1 Monster",50,350,8,1,20,20,0,0,1,1,#bbbbbb
strsp 211,"Part 1 Monster",50,380,8,1,20,20,0,0,1,1,#bbbbbb
strsp 212,"Part 1 Monster",50,410,8,1,20,20,0,0,1,1,#bbbbbb
strsp 213,"Part 1 Monster",50,440,8,1,20,20,0,0,1,1,#bbbbbb
strsp 214,"Part 1 Monster",400,80,8,1,20,20,0,0,1,1,#bbbbbb
strsp 215,"Part 1 Monster",400,110,8,1,20,20,0,0,1,1,#bbbbbb
strsp 216,"Part 1 Monster",400,140,8,1,20,20,0,0,1,1,#bbbbbb
strsp 217,"Part 1 Monster",400,170,8,1,20,20,0,0,1,1,#bbbbbb
strsp 218,"Part 1 Monster",400,200,8,1,20,20,0,0,1,1,#bbbbbb
strsp 219,"Part 1 Monster",400,230,8,1,20,20,0,0,1,1,#bbbbbb
strsp 220,"Part 1 Monster",400,260,8,1,20,20,0,0,1,1,#bbbbbb
strsp 221,"Part 1 Monster",400,290,8,1,20,20,0,0,1,1,#bbbbbb
strsp 222,"Part 1 Monster",400,320,8,1,20,20,0,0,1,1,#bbbbbb
strsp 223,"Part 1 Monster",400,350,8,1,20,20,0,0,1,1,#bbbbbb
strsp 224,"Part 1 Monster",400,380,8,1,20,20,0,0,1,1,#bbbbbb
strsp 225,"Part 1 Monster",400,410,8,1,20,20,0,0,1,1,#bbbbbb
strsp 226,"Part 1 Monster",400,440,8,1,20,20,0,0,1,1,#bbbbbb
btnwait %bwait
if %bwait=112 mov %zukan_page,%zukan_page-1:cspl 301,303:goto *menu_zukan3
if %bwait=113 mov %zukan_page,%zukan_page+1:cspl 301,303:goto *menu_zukan3
if %bwait=111 screen_clear:return
if %bwait=-1 screen_clear:return
if %bwait=-10 screen_clear:return
if %bwait=-11 screen_clear:return
goto *menu_zukan_pagex



*menu_zukan_pagey

btndef clear
lsp 111,":c/2,0,3;system\return.bmp",20,560:spbtn 111,111
lsp 112,":c/2,0,3;system\menu_prev.jpg",330,500:spbtn 112,112
lsp 113,":c/2,0,3;system\menu_next.jpg",480,500:spbtn 113,113
strsp 201,"Part 1 Monster",50,80,8,1,20,20,0,0,1,1,#bbbbbb
strsp 202,"Part 1 Monster",50,110,8,1,20,20,0,0,1,1,#bbbbbb
strsp 203,"Part 1 Monster",50,140,8,1,20,20,0,0,1,1,#bbbbbb
strsp 204,"Part 1 Monster",50,170,8,1,20,20,0,0,1,1,#bbbbbb
strsp 205,"Part 1 Monster",50,200,8,1,20,20,0,0,1,1,#bbbbbb
strsp 206,"Part 1 Monster",50,230,8,1,20,20,0,0,1,1,#bbbbbb
strsp 207,"Part 1 Monster",50,260,8,1,20,20,0,0,1,1,#bbbbbb
strsp 208,"Part 1 Monster",50,290,8,1,20,20,0,0,1,1,#bbbbbb
strsp 209,"Part 1 Monster",50,320,8,1,20,20,0,0,1,1,#bbbbbb
strsp 210,"Part 1 Monster",50,350,8,1,20,20,0,0,1,1,#bbbbbb
strsp 211,"Part 1 Monster",50,380,8,1,20,20,0,0,1,1,#bbbbbb
strsp 212,"Part 1 Monster",50,410,8,1,20,20,0,0,1,1,#bbbbbb
strsp 213,"Part 1 Monster",50,440,8,1,20,20,0,0,1,1,#bbbbbb
strsp 214,"Part 1 Monster",400,80,8,1,20,20,0,0,1,1,#bbbbbb
strsp 215,"Part 1 Monster",400,110,8,1,20,20,0,0,1,1,#bbbbbb
strsp 216,"Part 1 Monster",400,140,8,1,20,20,0,0,1,1,#bbbbbb
strsp 217,"Part 2 Monster",400,170,8,1,20,20,0,0,1,1,#bbbbbb
strsp 218,"Part 2 Monster",400,200,8,1,20,20,0,0,1,1,#bbbbbb
strsp 219,"Part 2 Monster",400,230,8,1,20,20,0,0,1,1,#bbbbbb
strsp 220,"Part 2 Monster",400,260,8,1,20,20,0,0,1,1,#bbbbbb
strsp 221,"Part 2 Monster",400,290,8,1,20,20,0,0,1,1,#bbbbbb
strsp 222,"Part 2 Monster",400,320,8,1,20,20,0,0,1,1,#bbbbbb
strsp 223,"Part 2 Monster",400,350,8,1,20,20,0,0,1,1,#bbbbbb
strsp 224,"Part 2 Monster",400,380,8,1,20,20,0,0,1,1,#bbbbbb
strsp 225,"Part 2 Monster",400,410,8,1,20,20,0,0,1,1,#bbbbbb
strsp 226,"Part 2 Monster",400,440,8,1,20,20,0,0,1,1,#bbbbbb
btnwait %bwait
if %bwait=112 mov %zukan_page,%zukan_page-1:cspl 301,303:goto *menu_zukan3
if %bwait=113 mov %zukan_page,%zukan_page+1:cspl 301,303:goto *menu_zukan3
if %bwait=111 screen_clear:return
if %bwait=-1 screen_clear:return
if %bwait=-10 screen_clear:return
if %bwait=-11 screen_clear:return
goto *menu_zukan_pagey



*menu_zukan_pagez

btndef clear
lsp 111,":c/2,0,3;system\return.bmp",20,560:spbtn 111,111
lsp 112,":c/2,0,3;system\menu_prev.jpg",330,500:spbtn 112,112
lsp 113,":c/2,0,3;system\menu_next.jpg",480,500:spbtn 113,113
strsp 201,"Part 2 Monster",50,80,8,1,20,20,0,0,1,1,#bbbbbb
strsp 202,"Part 2 Monster",50,110,8,1,20,20,0,0,1,1,#bbbbbb
strsp 203,"Part 2 Monster",50,140,8,1,20,20,0,0,1,1,#bbbbbb
strsp 204,"Part 2 Monster",50,170,8,1,20,20,0,0,1,1,#bbbbbb
strsp 205,"Part 2 Monster",50,200,8,1,20,20,0,0,1,1,#bbbbbb
strsp 206,"Part 2 Monster",50,230,8,1,20,20,0,0,1,1,#bbbbbb
strsp 207,"Part 2 Monster",50,260,8,1,20,20,0,0,1,1,#bbbbbb
strsp 208,"Part 2 Monster",50,290,8,1,20,20,0,0,1,1,#bbbbbb
strsp 209,"Part 2 Monster",50,320,8,1,20,20,0,0,1,1,#bbbbbb
strsp 210,"Part 2 Monster",50,350,8,1,20,20,0,0,1,1,#bbbbbb
strsp 211,"Part 2 Monster",50,380,8,1,20,20,0,0,1,1,#bbbbbb
strsp 212,"Part 2 Monster",50,410,8,1,20,20,0,0,1,1,#bbbbbb
strsp 213,"Part 2 Monster",50,440,8,1,20,20,0,0,1,1,#bbbbbb
strsp 214,"Part 2 Monster",400,80,8,1,20,20,0,0,1,1,#bbbbbb
strsp 215,"Part 2 Monster",400,110,8,1,20,20,0,0,1,1,#bbbbbb
strsp 216,"Part 2 Monster",400,140,8,1,20,20,0,0,1,1,#bbbbbb
strsp 217,"Part 2 Monster",400,170,8,1,20,20,0,0,1,1,#bbbbbb
strsp 218,"Part 2 Monster",400,200,8,1,20,20,0,0,1,1,#bbbbbb
strsp 219,"Part 2 Monster",400,230,8,1,20,20,0,0,1,1,#bbbbbb
strsp 220,"Part 2 Monster",400,260,8,1,20,20,0,0,1,1,#bbbbbb
strsp 221,"Part 2 Monster",400,290,8,1,20,20,0,0,1,1,#bbbbbb
strsp 222,"Part 2 Monster",400,320,8,1,20,20,0,0,1,1,#bbbbbb
strsp 223,"Part 2 Monster",400,350,8,1,20,20,0,0,1,1,#bbbbbb
strsp 224,"Part 2 Monster",400,380,8,1,20,20,0,0,1,1,#bbbbbb
strsp 225,"Part 2 Monster",400,410,8,1,20,20,0,0,1,1,#bbbbbb
strsp 226,"Part 2 Monster",400,440,8,1,20,20,0,0,1,1,#bbbbbb
btnwait %bwait
if %bwait=112 mov %zukan_page,%zukan_page-1:cspl 301,303:goto *menu_zukan3
if %bwait=113 mov %zukan_page,%zukan_page+1:cspl 301,303:goto *menu_zukan3
if %bwait=111 screen_clear:return
if %bwait=-1 screen_clear:return
if %bwait=-10 screen_clear:return
if %bwait=-11 screen_clear:return
goto *menu_zukan_pagez



*menu_zukan_pagew

btndef clear
lsp 111,":c/2,0,3;system\return.bmp",20,560:spbtn 111,111
lsp 112,":c/2,0,3;system\menu_prev.jpg",330,500:spbtn 112,112
lsp 113,":c/2,0,3;system\menu_next.jpg",480,500:spbtn 113,113
strsp 201,"Part 2 Monster",50,80,8,1,20,20,0,0,1,1,#bbbbbb
strsp 202,"Part 2 Monster",50,110,8,1,20,20,0,0,1,1,#bbbbbb
strsp 203,"Part 2 Monster",50,140,8,1,20,20,0,0,1,1,#bbbbbb
strsp 204,"Part 2 Monster",50,170,8,1,20,20,0,0,1,1,#bbbbbb
strsp 205,"Part 2 Monster",50,200,8,1,20,20,0,0,1,1,#bbbbbb
strsp 206,"Part 2 Monster",50,230,8,1,20,20,0,0,1,1,#bbbbbb
strsp 207,"Part 2 Monster",50,260,8,1,20,20,0,0,1,1,#bbbbbb
strsp 208,"Part 2 Monster",50,290,8,1,20,20,0,0,1,1,#bbbbbb
strsp 209,"Part 2 Monster",50,320,8,1,20,20,0,0,1,1,#bbbbbb
strsp 210,"Part 2 Monster",50,350,8,1,20,20,0,0,1,1,#bbbbbb
strsp 211,"Part 2 Monster",50,380,8,1,20,20,0,0,1,1,#bbbbbb
strsp 212,"Part 2 Monster",50,410,8,1,20,20,0,0,1,1,#bbbbbb
strsp 213,"Part 2 Monster",50,440,8,1,20,20,0,0,1,1,#bbbbbb
strsp 214,"Part 2 Monster",400,80,8,1,20,20,0,0,1,1,#bbbbbb
strsp 215,"Part 2 Monster",400,110,8,1,20,20,0,0,1,1,#bbbbbb
strsp 216,"Part 2 Monster",400,140,8,1,20,20,0,0,1,1,#bbbbbb
strsp 217,"Part 2 Monster",400,170,8,1,20,20,0,0,1,1,#bbbbbb
strsp 218,"Part 2 Monster",400,200,8,1,20,20,0,0,1,1,#bbbbbb
strsp 219,"Part 2 Monster",400,230,8,1,20,20,0,0,1,1,#bbbbbb
strsp 220,"Part 2 Monster",400,260,8,1,20,20,0,0,1,1,#bbbbbb
strsp 221,"Part 2 Monster",400,290,8,1,20,20,0,0,1,1,#bbbbbb
strsp 222,"Part 2 Monster",400,320,8,1,20,20,0,0,1,1,#bbbbbb
strsp 223,"Part 2 Monster",400,350,8,1,20,20,0,0,1,1,#bbbbbb
strsp 224,"Part 2 Monster",400,380,8,1,20,20,0,0,1,1,#bbbbbb
if %2350=1 lsp 225,":s/20,20,0;#FFFFFF#FF4444Cupid ",400,410:spbtn 225,225
if %2350=0 lsp 225,":s/20,20,0;#bbbbbbHHH",400,410
if %2351=1 lsp 226,":s/20,20,0;#FFFFFF#FF4444Valkyrie ",400,440:spbtn 226,226
if %2351=0 lsp 226,":s/20,20,0;#bbbbbbHHH",400,440
btnwait %bwait
if %bwait=112 mov %zukan_page,%zukan_page-1:cspl 301,303:goto *menu_zukan3
if %bwait=113 mov %zukan_page,%zukan_page+1:cspl 301,303:goto *menu_zukan3
if %bwait=225 goto *zukan_cupid
if %bwait=226 goto *zukan_valkyrie
if %bwait=111 screen_clear:return
if %bwait=-1 screen_clear:return
if %bwait=-10 screen_clear:return
if %bwait=-11 screen_clear:return
goto *menu_zukan_pagew



*zukan_kihonbtn

notif %zukan_koumoku=1 lsp 202,":s/20,20,0;#000000#FF4444Info ",420,550:spbtn 202,202
if %zukan_koumoku=1 lsp 202,":s/20,20,0;#bbbbbbInfo ",420,550
notif %zukan_koumoku=2 lsp 203,":s/20,20,0;#000000#FF4444Data ",490,550:spbtn 203,203
if %zukan_koumoku=2 lsp 203,":s/20,20,0;#bbbbbbData ",490,550
lsp 204,":s/20,20,0;#000000#FF4444Pose ",560,550:spbtn 204,204
if %zukancg=1 lsp 205,":s/20,20,0;#000000#FF4444CG ",630,550:spbtn 205,205
if %zukancg=0 lsp 205,":s/20,20,0;#bbbbbbCG ",630,550
notif %zukan_koumoku=3 lsp 206,":s/20,20,0;#000000#FF4444Recall ",700,550:spbtn 206,206
if %zukan_koumoku=3 lsp 206,":s/20,20,0;#bbbbbbRecall ",700,550:spbtn 206,206
if %100=1 && %zukan_koumoku>0 itoa $sel6,%stack:csp 10:strsp 10,$sel6,750,5,2,1,20,20,0,0,1,0,#FF0000
btnwait %bwait
if %bwait=210 mov %zukanon,1:goto "*zukan_"+$zlavel+"_kaisou"
if %bwait=211 mov %zukanon,1:goto "*zukan_"+$zlavel+"_kaisou"
if %bwait=212 mov %zukanon,1:goto "*zukan_"+$zlavel+"_kaisou"
if %bwait=213 mov %zukanon,2:goto "*zukan_"+$zlavel+"_kaisou"
if %bwait=214 mov %zukanon,2:goto "*zukan_"+$zlavel+"_kaisou"
if %bwait=215 mov %zukanon,2:goto "*zukan_"+$zlavel+"_kaisou"
if %bwait=216 mov %zukanon,2:goto "*zukan_"+$zlavel+"_kaisou"
if %bwait=217 mov %zukanon,2:goto "*zukan_"+$zlavel+"_kaisou"
if %bwait=218 mov %zukanon,2:goto "*zukan_"+$zlavel+"_kaisou"
if %bwait=219 mov %zukanon,2:goto "*zukan_"+$zlavel+"_kaisou"
if %bwait=202 goto "*zukan_"+$zlavel
if %bwait=203 goto *zukan_commondata
if %bwait=204 goto *zukan_commontatie
if %bwait=205 vspl 200,450,0:gosub "*zukan_"+$zlavel+"_cg":cspl 420,430:csp 500:vspl 200,450,1
if %bwait=206 goto *zukan_commonkaisou
if %bwait=304 mov %skill_num,%zukan_skillc1:goto *zukan_wazacount
if %bwait=305 mov %skill_num,%zukan_skillc2:goto *zukan_wazacount
if %bwait=306 mov %skill_num,%zukan_skillc3:goto *zukan_wazacount
if %bwait=307 mov %skill_num,%zukan_skillc4:goto *zukan_wazacount
if %bwait=308 mov %skill_num,%zukan_skillc5:goto *zukan_wazacount
if %bwait=309 mov %skill_num,%zukan_skillc6:goto *zukan_wazacount
if %bwait=310 mov %skill_num,%zukan_skillc7:goto *zukan_wazacount
if %bwait=311 mov %skill_num,%zukan_skillc8:goto *zukan_wazacount
if %bwait=312 mov %skill_num,%zukan_skillc9:goto *zukan_wazacount
if %bwait=313 mov %skill_num,%zukan_skillc10:goto *zukan_wazacount
if %bwait=314 mov %skill_num,%zukan_skillc11:goto *zukan_wazacount
if %bwait=315 mov %skill_num,%zukan_skillc12:goto *zukan_wazacount
if %bwait=-1 screen_clear:goto *menu_zukan2
if %bwait=-10 screen_clear:goto *menu_zukan2
if %bwait=-11 screen_clear:goto *menu_zukan2
goto *zukan_kihonbtn



*zukan_commondata

screen_clear
btndef clear
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,2
mov %zukan_x0,%zukan_x1
gosub "*zukan_"+$zlavel+"_p"
len %name_count,$zname:strsp 318,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#EE0000
lsp 301,":s/20,20,0;#000000Level:",420,100:lsp 317,":s/20,20,0;#000000"+$zukan_lv,490,100
lsp 302,":s/20,20,0;#000000HP: "+$zukan_hp,420,130
lsp 316,":s/20,20,0;#000000Times Defeated: "+$zukan_ko+"",420,160
if $zukan_ko="None " lsp 316,":s/20,20,0;#000000Defeated: "+$zukan_ko,420,160
lsp 303,":s/20,20,0;#000000Skills: ",420,196
if %zukan_skillc1=0 strsp 304,"None Requestable",500,196,9,1,20,20,0,0,1,0,#000000:goto *zukan_kihonbtn
if %%zukan_skillc1>0 len %name_count,$zukan_skill1:strsp 304,$zukan_skill1,430,223,(%name_count+1)/2+1,1,20,20,0,0,1,1,#000000,#FF4444:spbtn 304,304
if %%zukan_skillc1=0 len %name_count,$zukan_skill1:strsp 304,$zukan_skill1,430,223,(%name_count+1)/2+1,1,20,20,0,0,1,0,#bbbbbb
if %zukan_skillc2=0 goto *zukan_kihonbtn
if %%zukan_skillc2>0 len %name_count,$zukan_skill2:strsp 305,$zukan_skill2,430,250,(%name_count+1)/2+1,1,20,20,0,0,1,1,#000000,#FF4444:spbtn 305,305
if %%zukan_skillc2=0 len %name_count,$zukan_skill2:strsp 305,$zukan_skill2,430,250,(%name_count+1)/2+1,1,20,20,0,0,1,0,#bbbbbb
if %zukan_skillc3=0 goto *zukan_kihonbtn
if %%zukan_skillc3>0 len %name_count,$zukan_skill3:strsp 306,$zukan_skill3,430,277,(%name_count+1)/2+1,1,20,20,0,0,1,1,#000000,#FF4444:spbtn 306,306
if %%zukan_skillc3=0 len %name_count,$zukan_skill3:strsp 306,$zukan_skill3,430,277,(%name_count+1)/2+1,1,20,20,0,0,1,0,#bbbbbb
if %zukan_skillc4=0 goto *zukan_kihonbtn
if %%zukan_skillc4>0 len %name_count,$zukan_skill4:strsp 307,$zukan_skill4,430,304,(%name_count+1)/2+1,1,20,20,0,0,1,1,#000000,#FF4444:spbtn 307,307
if %%zukan_skillc4=0 len %name_count,$zukan_skill4:strsp 307,$zukan_skill4,430,304,(%name_count+1)/2+1,1,20,20,0,0,1,0,#bbbbbb
if %zukan_skillc5=0 goto *zukan_kihonbtn
if %%zukan_skillc5>0 len %name_count,$zukan_skill5:strsp 308,$zukan_skill5,430,331,(%name_count+1)/2+1,1,20,20,0,0,1,1,#000000,#FF4444:spbtn 308,308
if %%zukan_skillc5=0 len %name_count,$zukan_skill5:strsp 308,$zukan_skill5,430,331,(%name_count+1)/2+1,1,20,20,0,0,1,0,#bbbbbb
if %zukan_skillc6=0 goto *zukan_kihonbtn
if %%zukan_skillc6>0 len %name_count,$zukan_skill6:strsp 309,$zukan_skill6,430,358,(%name_count+1)/2+1,1,20,20,0,0,1,1,#000000,#FF4444:spbtn 309,309
if %%zukan_skillc6=0 len %name_count,$zukan_skill6:strsp 309,$zukan_skill6,430,358,(%name_count+1)/2+1,1,20,20,0,0,1,0,#bbbbbb
if %zukan_skillc7=0 goto *zukan_kihonbtn
if %%zukan_skillc7>0 len %name_count,$zukan_skill7:strsp 310,$zukan_skill7,430,385,(%name_count+1)/2+1,1,20,20,0,0,1,1,#000000,#FF4444:spbtn 310,310
if %%zukan_skillc7=0 len %name_count,$zukan_skill7:strsp 310,$zukan_skill7,430,385,(%name_count+1)/2+1,1,20,20,0,0,1,0,#bbbbbb
if %zukan_skillc8=0 goto *zukan_kihonbtn
if %%zukan_skillc8>0 len %name_count,$zukan_skill8:strsp 311,$zukan_skill8,430,412,(%name_count+1)/2+1,1,20,20,0,0,1,1,#000000,#FF4444:spbtn 311,311
if %%zukan_skillc8=0 len %name_count,$zukan_skill8:strsp 311,$zukan_skill8,430,412,(%name_count+1)/2+1,1,20,20,0,0,1,0,#bbbbbb
if %zukan_skillc9=0 goto *zukan_kihonbtn
if %%zukan_skillc9>0 len %name_count,$zukan_skill9:strsp 312,$zukan_skill9,430,439,(%name_count+1)/2+1,1,20,20,0,0,1,1,#000000,#FF4444:spbtn 312,312
if %%zukan_skillc9=0 len %name_count,$zukan_skill9:strsp 312,$zukan_skill9,430,430,(%name_count+1)/2+1,1,20,20,0,0,1,0,#bbbbbb
if %zukan_skillc10=0 goto *zukan_kihonbtn
if %%zukan_skillc10>0 len %name_count,$zukan_skill10:strsp 313,$zukan_skill10,430,466,(%name_count+1)/2+1,1,20,20,0,0,1,1,#000000,#FF4444:spbtn 313,313
if %%zukan_skillc10=0 len %name_count,$zukan_skill10:strsp 313,$zukan_skill10,430,466,(%name_count+1)/2+1,1,20,20,0,0,1,0,#bbbbbb
if %zukan_skillc11=0 goto *zukan_kihonbtn
if %%zukan_skillc11>0 len %name_count,$zukan_skill11:strsp 314,$zukan_skill11,430,493,(%name_count+1)/2+1,1,20,20,0,0,1,1,#000000,#FF4444:spbtn 314,314
if %%zukan_skillc11=0 len %name_count,$zukan_skill11:strsp 314,$zukan_skill11,430,493,(%name_count+1)/2+1,1,20,20,0,0,1,0,#bbbbbb
if %zukan_skillc12=0 goto *zukan_kihonbtn
if %%zukan_skillc12>0 len %name_count,$zukan_skill12:strsp 315,$zukan_skill12,430,520,(%name_count+1)/2+1,1,20,20,0,0,1,1,#000000,#FF4444:spbtn 315,315
if %%zukan_skillc12=0 len %name_count,$zukan_skill12:strsp 315,$zukan_skill12,430,520,(%name_count+1)/2+1,1,20,20,0,0,1,0,#bbbbbb
goto *zukan_kihonbtn



*zukan_commontatie

screen_clear
btndef clear
lsp 502,":c;system\ency.jpg",0,0
lsp 410,":a;system\windowz.bmp",640,0
mov %zukan_x0,%zukan_x2
gosub "*zukan_"+$zlavel+"_p"
shadedistance 1,2
if %zukan_hyouzyonum=1 lsp 301,":s/20,20,0;#bbbbbbFace ",680,100
if %zukan_hyouzyonum>1 lsp 301,":s/20,20,0;#FFFFFF#FF4444Face ",680,100:spbtn 301,301
if %zukan_pozunum=1 lsp 302,":s/20,20,0;#bbbbbbPose ",670,130
if %zukan_pozunum>1 lsp 302,":s/20,20,0;#FFFFFF#FF4444Pose ",670,130:spbtn 302,302
if %zukan_bukkakenum>0 lsp 303,":s/20,20,0;#FFFFFF#FF4444Bukkake 1 ",670,160:spbtn 303,303
if %zukan_bukkakenum>1 lsp 304,":s/20,20,0;#FFFFFF#FF4444Bukkake 2 ",670,190:spbtn 304,304
if %zukan_bukkakenum>2 lsp 305,":s/20,20,0;#FFFFFF#FF4444Bukkake 3 ",670,220:spbtn 305,305
if %zukan_bukkakenum>3 lsp 306,":s/20,20,0;#FFFFFF#FF4444Bukkake 4 ",670,250:spbtn 306,306
if %zukan_bukkakenum>4 lsp 307,":s/20,20,0;#FFFFFF#FF4444Bukkake 5 ",670,280:spbtn 307,307
if %zukan_bukkakenum>5 lsp 308,":s/20,20,0;#FFFFFF#FF4444Bukkake 6 ",670,310:spbtn 308,308
if %zukan_bukkakenum>6 lsp 309,":s/20,20,0;#FFFFFF#FF4444Bukkake 7 ",670,340:spbtn 309,309
if %zukan_bukkakenum>7 lsp 310,":s/20,20,0;#FFFFFF#FF4444Bukkake 8 ",670,370:spbtn 310,310
lsp 311,":s/20,20,0;#FFFFFF#FF4444Clear Sidebar ",650,500:spbtn 311,311
lsp 312,":s/20,20,0;#FFFFFF#FF4444Return ",700,530:spbtn 312,312
shadedistance 0,0
btnwait %bwait
if %bwait=301 mov %zukan_hyouzyo,%zukan_hyouzyo+1:gosub "*zukan_"+$zlavel+"_p"
if %bwait=302 mov %zukan_pozu,%zukan_pozu+1:mov %zukan_hyouzyo,1:gosub "*zukan_"+$zlavel+"_p"
if %bwait=303 && %zukan_bukkake1=0 mov %zukan_bukkake1,1:gosub "*zukan_"+$zlavel+"_p":goto *zukan_commontatie
if %bwait=303 && %zukan_bukkake1=1 mov %zukan_bukkake1,0:gosub "*zukan_"+$zlavel+"_p":goto *zukan_commontatie
if %bwait=304 && %zukan_bukkake2=0 mov %zukan_bukkake2,1:gosub "*zukan_"+$zlavel+"_p":goto *zukan_commontatie
if %bwait=304 && %zukan_bukkake2=1 mov %zukan_bukkake2,0:gosub "*zukan_"+$zlavel+"_p":goto *zukan_commontatie
if %bwait=305 && %zukan_bukkake3=0 mov %zukan_bukkake3,1:gosub "*zukan_"+$zlavel+"_p":goto *zukan_commontatie
if %bwait=305 && %zukan_bukkake3=1 mov %zukan_bukkake3,0:gosub "*zukan_"+$zlavel+"_p":goto *zukan_commontatie
if %bwait=306 && %zukan_bukkake4=0 mov %zukan_bukkake4,1:gosub "*zukan_"+$zlavel+"_p":goto *zukan_commontatie
if %bwait=306 && %zukan_bukkake4=1 mov %zukan_bukkake4,0:gosub "*zukan_"+$zlavel+"_p":goto *zukan_commontatie
if %bwait=307 && %zukan_bukkake5=0 mov %zukan_bukkake5,1:gosub "*zukan_"+$zlavel+"_p":goto *zukan_commontatie
if %bwait=307 && %zukan_bukkake5=1 mov %zukan_bukkake5,0:gosub "*zukan_"+$zlavel+"_p":goto *zukan_commontatie
if %bwait=308 && %zukan_bukkake6=0 mov %zukan_bukkake6,1:gosub "*zukan_"+$zlavel+"_p":goto *zukan_commontatie
if %bwait=308 && %zukan_bukkake6=1 mov %zukan_bukkake6,0:gosub "*zukan_"+$zlavel+"_p":goto *zukan_commontatie
if %bwait=309 && %zukan_bukkake7=0 mov %zukan_bukkake7,1:gosub "*zukan_"+$zlavel+"_p":goto *zukan_commontatie
if %bwait=309 && %zukan_bukkake7=1 mov %zukan_bukkake7,0:gosub "*zukan_"+$zlavel+"_p":goto *zukan_commontatie
if %bwait=310 && %zukan_bukkake8=0 mov %zukan_bukkake8,1:gosub "*zukan_"+$zlavel+"_p":goto *zukan_commontatie
if %bwait=310 && %zukan_bukkake8=1 mov %zukan_bukkake8,0:gosub "*zukan_"+$zlavel+"_p":goto *zukan_commontatie
if %bwait=311 goto *zukan_commontatie2
if %bwait=312 goto "*zukan_"+$zlavel
if %bwait=-1 screen_clear:goto "*zukan_"+$zlavel
if %bwait=-10 screen_clear:goto "*zukan_"+$zlavel
if %bwait=-11 screen_clear:goto "*zukan_"+$zlavel
goto *zukan_commontatie



*zukan_commontatie2

vspl 200,410,0
print 1
lrclick
vspl 200,410,1
goto *zukan_commontatie



*zukan_commonkaisou0

saveoff
stop
for %sub1=0 to 49 step 1:dwavestop %sub1:next
textoff:btndef clear:barclear:print 1
for %sub1=0 to 255 step 1:csp2 %sub1:next
csp -1
bg black,1
gosub *syokika
bgm "bgm\zukan.ogg"
mov %skill02,0
mov %skill03,0
mov %skill04,0
mov %skill05,0
goto "*zukan_"+$zlavel



*zukan_commonkaisou

shadedistance 0,0
screen_clear
btndef clear
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,3
mov %zukan_x0,%zukan_x1
gosub "*zukan_"+$zlavel+"_p"
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#EE0000
if %storyon=1 goto *zukan_commonkaisou2
if $zlavel="alice1" goto *zukan_commonkaisou_alice1
if $zlavel="end" goto *zukan_commonkaisou_end
mov $name,$zname
mov %player,0
if %zukan_sentounum=0 strsp 210,"Combat (Normal)",420,100,9,1,20,20,0,0,1,0,#bbbbbb
if %zukan_sentounum=1 strsp 210,"Combat (Normal)",420,100,9,1,20,20,0,0,1,0,#000000,#FF4444:spbtn 210,210
if %zukan_sentounum=2 strsp 210,"Combat (Normal)",420,100,9,1,20,20,0,0,1,0,#000000,#FF4444:spbtn 210,210
if %zukan_sentounum=0 strsp 211,"Combat (Hard)",420,130,8,1,20,20,0,0,1,0,#bbbbbb
if %zukan_sentounum=1 strsp 211,"Combat (Hard)",420,130,8,1,20,20,0,0,1,0,#000000,#FF4444:spbtn 211,211
if %zukan_sentounum=2 strsp 211,"Combat (Hard)",420,130,8,1,20,20,0,0,1,0,#bbbbbb
if %zukan_sentounum=0 strsp 212,"Combat (Hell)",420,160,8,1,20,20,0,0,1,0,#bbbbbb
if %zukan_sentounum=1 strsp 212,"Combat (Hell)",420,160,8,1,20,20,0,0,1,0,#000000,#FF4444:spbtn 212,212
if %zukan_sentounum=2 strsp 212,"Combat (Hell)",420,160,8,1,20,20,0,0,1,0,#bbbbbb
if %zukan_ryozyokunum=0 strsp 213,"Rape Scene",420,190,6,1,20,20,0,0,1,0,#bbbbbb:spbtn 213,213
if %zukan_ryozyokunum=1 && %ryozyoku1=1 strsp 213,"Rape Scene",420,190,6,1,20,20,0,0,1,0,#000000,#FF4444:spbtn 213,213
if %zukan_ryozyokunum=1 && %ryozyoku1=0 strsp 213,"Rape Scene",420,190,6,1,20,20,0,0,1,0,#bbbbbb
if %zukan_ryozyokunum>1 && %ryozyoku1=1 strsp 213,"Rape Scene 1",420,190,7,1,20,20,0,0,1,0,#000000,#FF4444:spbtn 213,213
if %zukan_ryozyokunum>1 && %ryozyoku1=0 strsp 213,"Rape Scene 1",420,190,7,1,20,20,0,0,1,0,#bbbbbb
if %zukan_ryozyokunum>1 && %ryozyoku2=1 strsp 214,"Rape Scene 2",420,220,7,1,20,20,0,0,1,0,#000000,#FF4444:spbtn 214,214
if %zukan_ryozyokunum>1 && %ryozyoku2=0 strsp 214,"Rape Scene 2",420,220,7,1,20,20,0,0,1,0,#bbbbbb
if %zukan_ryozyokunum>2 && %ryozyoku3=1 strsp 215,"Rape Scene 3",420,250,7,1,20,20,0,0,1,0,#000000,#FF4444:spbtn 215,215
if %zukan_ryozyokunum>2 && %ryozyoku3=0 strsp 215,"Rape Scene 3",420,250,7,1,20,20,0,0,1,0,#bbbbbb
goto *zukan_kihonbtn



*zukan_commonkaisou_alice1

mov %player,0
if %2550=0 strsp 210,"Combat (Normal)",420,100,9,1,20,20,0,0,1,0,#bbbbbb
if %2550>0 strsp 210,"Combat (Normal)",420,100,9,1,20,20,0,0,1,0,#000000,#FF4444:spbtn 210,210
strsp 211,"Combat (Hard)",420,130,8,1,20,20,0,0,1,0,#bbbbbb
strsp 212,"Combat (Hell)",420,160,8,1,20,20,0,0,1,0,#bbbbbb
if %2550=0 strsp 213,"Rape Scene",420,190,6,1,20,20,0,0,1,0,#bbbbbb
if %2550=0 && %hsean_alice2=1 strsp 213,"Rape Scene 1",420,190,7,1,20,20,0,0,1,0,#bbbbbb
if %2550>0 strsp 213,"Rape Scene",420,190,6,1,20,20,0,0,1,0,#000000,#FF4444:spbtn 213,213
if %2550>0 && %hsean_alice2=1 strsp 213,"Rape Scene 1",420,190,7,1,20,20,0,0,1,0,#000000,#FF4444:spbtn 213,213
if %hsean_alice2=1 strsp 214,"Rape Scene 2",420,220,7,1,20,20,0,0,1,0,#000000,#FF4444:spbtn 214,214
if %hsean_alice3=0 && %hsean_alice4=1 strsp 215,"Rape Scene 3",420,250,7,1,20,20,0,0,1,0,#bbbbbb
if %hsean_alice3=1 strsp 215,"Rape Scene 3",420,250,7,1,20,20,0,0,1,0,#000000,#FF4444:spbtn 215,215
if %hsean_alice4=1 strsp 216,"Rape Scene 4",420,280,7,1,20,20,0,0,1,0,#000000,#FF4444:spbtn 216,216
if %hsean_alice5=1 strsp 217,"Rape Scene 5",420,310,7,1,20,20,0,0,1,0,#000000,#FF4444:spbtn 217,217
goto *zukan_kihonbtn



*zukan_commonkaisou_end

mov %player,0
if %hsean_end1=1 strsp 213,"Former Thieves",420,100,8,1,20,20,0,0,1,0,#000000,#FF4444:spbtn 213,213
if %hsean_end1=0 strsp 213,"Rape Scene 1",420,100,7,1,20,20,0,0,1,0,#bbbbbb
if %hsean_end2=1 lsp 214,":s/20,20,0;#000000#FF4444Harpy Village ",420,130:spbtn 214,214
if %hsean_end2=0 strsp 214,"Rape Scene 2",420,130,7,1,20,20,0,0,1,0,#bbbbbb
if %hsean_end3=1 lsp 215,":s/20,20,0;#000000#FF4444Angels ",420,160:spbtn 215,215
if %hsean_end3=0 strsp 215,"Rape Scene 3",420,160,7,1,20,20,0,0,1,0,#bbbbbb
if %hsean_end4=1 lsp 216,":s/20,20,0;#000000#FF4444Meia ",420,190:spbtn 216,216
if %hsean_end4=0 strsp 216,"Rape Scene 4",420,190,7,1,20,20,0,0,1,0,#bbbbbb
if %hsean_end5=1 lsp 217,":s/20,20,0;#000000#FF4444Sara ",420,220:spbtn 217,217
if %hsean_end5=0 strsp 217,"Rape Scene 5",420,220,7,1,20,20,0,0,1,0,#bbbbbb
if %hsean_end6=1 strsp 218,"Succubus Village",420,250,9,1,20,20,0,0,1,0,#000000,#FF4444:spbtn 218,218
if %hsean_end6=0 strsp 218,"Rape Scene 6",420,250,7,1,20,20,0,0,1,0,#bbbbbb
if %hsean_end7=1 lsp 219,":s/20,20,0;#000000#FF4444Selena ",420,280:spbtn 219,219
if %hsean_end7=0 strsp 219,"Rape Scene 7",420,280,7,1,20,20,0,0,1,0,#bbbbbb
goto *zukan_kihonbtn



*zukan_commonkaisou2

strsp 210,"You cannot use the recollection while playing through the story.",420,150,17,2,20,20,0,0,1,0,#FF4444
goto *zukan_kihonbtn



*zukan_wazacount

lsp 50,":a;system\window7.bmp",260,245
itoa2 $menu_list1,%%skill_num
mov %hanyo1,%skill_num+2000
itoa2 $menu_list2,%%hanyo1
lsp 40,":s/20,20,0;#FFFFFFTaken:",280,275:lsp 42,":s/20,20,0;#FFFFFF"+$menu_list1+" ",350,275
lsp 41,":s/20,20,0;#FFFFFFOrgasms:",280,305:lsp 43,":s/20,20,0;#FFFFFF"+$menu_list2+" ",370,305
print 1
lrclick
cspl 40,50
print 1
goto *zukan_commondata



*zukan_lamiab

cspl 700,701:print 10,500
strsp 700,"Start from the beginning of the battle?",172,143,24,1,24,24,0,0,1,1
csel "From the start",*lamia_start,"Final phase",*zukan_lamia2



*zukan_iriasu

cspl 700,701:print 10,500
strsp 700,"Start from the beginning of the final battle?",172,143,24,1,24,24,0,0,1,1
csel "From the start",*irias2_start,"Final phase",*zukan_iriasu2



*zukan_lamia2

mov %continue,1
goto *lamiab_start



*zukan_cirqueb2

mov $name,"Cirque du Croix"
mov $name2,"Queen Scylla"
mov $lavel,"cirque"
mov $tatie1,"cirque_st51"
mov $tatie2,"cirque_st52"
mov $tatie3,"cirque_st53"
mov $tatie4,"cirque_st52"
mov $haikei,"bg206"
mov %monster_x,-160
mov %monster_y,0
mov $tatie1b,"cirque_st11"
mov $tatie2b,"cirque_st12"
mov $tatie3b,"cirque_st13"
mov %monster_xb,180
mov %monster_yb,0
if %nanido=1 mov %max_enemylife,25000
if %nanido=2 mov %max_enemylife,31000
if %nanido=3 mov %max_enemylife,37000
if %nanido=0 mov %max_enemylife,3
if %nanido=1 mov %henkahp1,15000
if %nanido=2 mov %henkahp1,19000
if %nanido=3 mov %henkahp1,23000
if %nanido=0 mov %henkahp1,2
if %nanido=1 mov %henkahp2,17000
if %nanido=2 mov %henkahp2,21000
if %nanido=3 mov %henkahp2,23000
if %nanido=0 mov %henkahp2,2
if %nanido=1 mov %henkahp3,18000
if %nanido=2 mov %henkahp3,22000
if %nanido=3 mov %henkahp3,26000
if %nanido=0 mov %henkahp3,2
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,0
mov %music,3
gosub *maxmp:mov %mp,%max_mp
mov %tekikazu,2
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"You won't escape..."
mov $mogaku_sel2,"You can't escape my tentacles..."
mov $mogaku_sel3,"There's no meaning to your resistance..."
mov $mogaku_sel4,"Struggling is pointless... Just surrender."
mov $mogaku_sel5,"Prey caught in my tentacles isn't allowed to escape..."
mov $mogaku_dassyutu1,"To be able to escape from my tentacles..."
mov $mogaku_dassyutu2,"Did my power slip after dying? Or..."
mov $mogaku_earth_dassyutu1,"To be able to escape from tentacles..."
mov $mogaku_earth_dassyutu2,"What power in a flesh and blood human...!"
mov %end_n,15
mov %exp_minus,750000
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,4
mov %owaza_count3a,4
mov %viclose,3
mov %enemylife,%max_enemylife
mov %tekikazu,2
lsp 561,":a;system\gagee100.bmp",421,556:print 1
>Replacing them, Queen Scylla and the brutal Queen Fairy appear.@
>Formidable enemies, one after another...\
name "Titania"
>Ahaha, it's my turn to play. \
name ""
name "Queen Scylla"
>I'll squeeze you dry with my tentacles...\
name ""
mov %sinkou,2
goto *common_main



*zukan_cirqueb3

mov $name,"Cirque du Croix"
mov $name2,"Queen Lamia"
mov $lavel,"cirque"
mov $tatie1,"cirque_st31"
mov $tatie2,"cirque_st32"
mov $tatie3,"cirque_st33"
mov $tatie4,"cirque_st32"
mov $haikei,"bg206"
mov %monster_x,180
mov %monster_y,0
mov $tatie1b,"cirque_st21"
mov $tatie2b,"cirque_st22"
mov $tatie3b,"cirque_st23"
mov %monster_xb,-220
mov %monster_yb,0
if %nanido=1 mov %max_enemylife,25000
if %nanido=2 mov %max_enemylife,31000
if %nanido=3 mov %max_enemylife,37000
if %nanido=0 mov %max_enemylife,3
if %nanido=1 mov %henkahp1,15000
if %nanido=2 mov %henkahp1,19000
if %nanido=3 mov %henkahp1,23000
if %nanido=0 mov %henkahp1,2
if %nanido=1 mov %henkahp2,17000
if %nanido=2 mov %henkahp2,21000
if %nanido=3 mov %henkahp2,23000
if %nanido=0 mov %henkahp2,2
if %nanido=1 mov %henkahp3,18000
if %nanido=2 mov %henkahp3,22000
if %nanido=3 mov %henkahp3,26000
if %nanido=0 mov %henkahp3,2
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,30
if %nanido=3 mov %earth_keigen,15
mov %alice_skill,0
mov %music,3
gosub *maxmp:mov %mp,%max_mp
mov %tekikazu,2
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Useless... Do you think you could escape from the Queen of all Lamias?"
mov $mogaku_sel2,"I won't let you go... You will be my prey."
mov $mogaku_sel3,"Useless... Do you think you could escape from the Queen of all Lamias?"
mov $mogaku_sel4,"I won't let you go... You will be my prey."
mov $mogaku_sel5,"Useless... Do you think you could escape from the Queen of all Lamias?"
mov $mogaku_dassyutu1,"To throw even my restriction aside..."
mov $mogaku_dassyutu2,"What incredible power!"
mov $mogaku_earth_dassyutu1,"To throw even my restriction aside..."
mov $mogaku_earth_dassyutu2,"What incredible power!"
mov %end_n,15
mov %exp_minus,750000
mov %zmonster_x,-300
mov %tukix,300
mov %owaza_count1a,4
mov %owaza_count3a,4
mov %viclose,3
mov %enemylife,%max_enemylife
mov %tekikazu,2
lsp 561,":a;system\gagee100.bmp",421,556:print 1
>The next two coming out is the Pirate Queen Roza and the Queen Lamia...@
>I don't think I can keep fighting these battles!\
name "Roza"
>Are you ready?@
>You'll be my plaything...\
name ""
name "Queen Lamia"
>I'll coil around you...@
>Hehe, you'll be my prey.\
name ""
mov %sinkou,3
goto *common_main



*zukan_iriasu2

mov $name,"Goddess Ilias"
mov $name2,"Ilias"
mov $lavel,"irias2"
mov $tatie1,"iriasu2_st01"
mov $tatie2,"iriasu2_st01"
mov $tatie3,"iriasu2_st01"
mov $tatie4,"iriasu2_st22"
mov $haikei,"bg001"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,600000
if %nanido=2 mov %max_enemylife,640000
if %nanido=3 mov %max_enemylife,680000
if %nanido=0 mov %max_enemylife,3
if %nanido=1 mov %henkahp1,590000
if %nanido=2 mov %henkahp1,590000
if %nanido=3 mov %henkahp1,590000
if %nanido=0 mov %henkahp1,2
if %nanido=1 mov %henkahp2,50000
if %nanido=2 mov %henkahp2,50000
if %nanido=3 mov %henkahp2,50000
if %nanido=0 mov %henkahp2,1
mov %damage_keigen,100
mov %kaihi,95
mov %earth_keigen,90
if %nanido=3 mov %earth_keigen,90
mov %alice_skill,0
mov %music,19
gosub *maxmp:mov %mp,%max_mp
gosub *syutugen2
mov $mogaku_anno1,"But Luka can't break free!"
mov $mogaku_anno2,"Luka broke free!"
mov $mogaku_anno3,"But Luka can't attack like this!"
mov $mogaku_sel1,"Don't resist... Nestle in my embrace..."
mov $mogaku_sel2,"Please don't struggle..."
mov $mogaku_sel3,"Don't you wish to be here for an eternity?"
mov $mogaku_sel4,"There's no resisting before a Goddess."
mov $mogaku_sel5,"You want to be apart from me that badly?"
mov $mogaku_dassyutu1,"Don't you like my embrace?"
mov $mogaku_dassyutu2,"I intended to send you off in peace... This is a shame."
mov $mogaku_earth_dassyutu1,"Don't you like my embrace?"
mov $mogaku_earth_dassyutu2,"I intended to send you off in peace... This is a shame."
mov $half_s1,"It's quite easy to water you down with sexual techniques."
mov $half_s2,"Now... Finish in my chest."
mov $kiki_s1,"Your adventure was long, but this is the end."
mov $kiki_s2,"You were my puppet all the way until the end."
mov %end_n,2
mov %exp_minus,0
mov %zmonster_x,0
mov %tukix,300
mov %viclose,3
mov $name,"Ilias"
if %nanido<2 mov %enemylife,100000
if %nanido=2 mov %enemylife,140000
if %nanido=3 mov %enemylife,180000
mov %gage,%enemylife*100/%max_enemylife+1
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556:print 1
goto *irias2_061x



*zukan_slime

mov $zname,"Slime Girl"
mov $zlavel,"slime"
itoa2 $zukan_ko,%2501
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2501=0 mov %ryozyoku1,0
if %2501>0 mov %ryozyoku1,1
if %2501=0 mov %zukancg,0
if %2501>0 mov %zukancg,1
mov %zukan_x1,50
mov %zukan_x2,244
mov $zukan_lv,"P"
mov $zukan_hp,"QO"
mov $zukan_skill1,"Slime Tentacle"
mov %zukan_skillc1,3001
mov $zukan_skill2,"Slime Handjob"
mov %zukan_skillc2,3002
mov $zukan_skill3,"Slime Heaven"
mov %zukan_skillc3,3003
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_slime_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#EE0000
lsp 301,":c;ency\slime.jpg",400,100
goto *zukan_kihonbtn



*zukan_slime_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\slime_st01.bmp",%zukan_x0,80
if %zukan_hyouzyo=2 lsp 450,":a;chara\slime_st02.bmp",%zukan_x0,80
if %zukan_hyouzyo=3 lsp 450,":a;chara\slime_st03.bmp",%zukan_x0,80
if %zukan_bukkake1=1 lsp 441,":a;chara\slime_bk01.bmp",%zukan_x0,80
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\slime_bk02.bmp",%zukan_x0,80
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\slime_bk03.bmp",%zukan_x0,80
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\slime_bk04.bmp",%zukan_x0,80
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\slime_bk05.bmp",%zukan_x0,80
if %zukan_bukkake5=0 csp 445
return



*zukan_slime_cg

lsp 500,":c;bg\bg004.bmp",0,0
lsp 430,":a;chara\slime_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\slime_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\slime_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\slime_h4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_slime_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,1
mov %skill01,0
mov %item01,1
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *slime_start
if %bwait=211 mov %nanido,2:goto *slime_start
if %bwait=212 mov %nanido,3:goto *slime_start
lsp 700,":a;chara\slime_st02.bmp",244,80
bg "bg\bg004.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *slime_h



*zukan_alice1

if %2250=1 && %2266=0 mov $zname,"Monster Girl"
if %2250=2 | %2266=1 mov $zname,"Alice"
mov $zlavel,"alice1"
itoa2 $zukan_ko,%2550
mov %zukan_hyouzyonum,9
mov %zukan_pozunum,8
mov %zukan_bukkakenum,0
mov %zukan_sentounum,0
mov %zukan_ryozyokunum,0
mov %zukancg,1
mov %zukan_x1,-20
mov %zukan_x2,150
mov $zukan_lv,"PST"
mov $zukan_hp,"RQOOO"
mov %zukan_skillc1,0
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_alice1_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\alice.jpg",400,100
goto *zukan_kihonbtn



*zukan_alice1_p

if %game_clear=0 && %zukan_pozu=3 mov %zukan_pozu,1
if %game_clear=0 && %zukan_pozu=0 mov %zukan_pozu,2
if %game_clear>0 && %zukan_pozu=9 mov %zukan_pozu,1
if %game_clear>0 && %zukan_pozu=0 mov %zukan_pozu,8
if %zukan_pozu<>8 mov %zukan_hyouzyonum,9
if %zukan_pozu=8 mov %zukan_hyouzyonum,1
if %game_clear=0 && %zukan_pozu<3 && %zukan_hyouzyo=5 mov %zukan_hyouzyo,1
if %game_clear=0 && %zukan_pozu<3 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,4
if %game_clear>0 && %zukan_pozu<3 && %zukan_hyouzyo=10 mov %zukan_hyouzyo,1
if %game_clear>0 && %zukan_pozu<3 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,9
if %zukan_pozu=3 && %zukan_hyouzyo=6 mov %zukan_hyouzyo,1
if %zukan_pozu=3 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,5
if %zukan_pozu=4 && %zukan_hyouzyo=6 mov %zukan_hyouzyo,1
if %zukan_pozu=4 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,5
if %zukan_pozu=5 && %zukan_hyouzyo=3 mov %zukan_hyouzyo,1
if %zukan_pozu=5 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,2
if %zukan_pozu=6 && %zukan_hyouzyo=3 mov %zukan_hyouzyo,1
if %zukan_pozu=6 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,2
if %zukan_pozu=7 && %zukan_hyouzyo=3 mov %zukan_hyouzyo,1
if %zukan_pozu=7 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,2
if %zukan_pozu=8 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\alice_st01.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\alice_st01b.bmp",%zukan_x0-80,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\alice_st02.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\alice_st02b.bmp",%zukan_x0-80,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\alice_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\alice_st03b.bmp",%zukan_x0-80,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\alice_st04.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=4 lsp 450,":a;chara\alice_st04b.bmp",%zukan_x0-80,0
if %zukan_pozu=1 && %zukan_hyouzyo=5 lsp 450,":a;chara\alice_st05.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=5 lsp 450,":a;chara\alice_st05b.bmp",%zukan_x0-80,0
if %zukan_pozu=1 && %zukan_hyouzyo=6 lsp 450,":a;chara\alice_st06.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=6 lsp 450,":a;chara\alice_st06b.bmp",%zukan_x0-80,0
if %zukan_pozu=1 && %zukan_hyouzyo=7 lsp 450,":a;chara\alice_st07.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=7 lsp 450,":a;chara\alice_st07b.bmp",%zukan_x0-80,0
if %zukan_pozu=1 && %zukan_hyouzyo=8 lsp 450,":a;chara\alice_st08.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=8 lsp 450,":a;chara\alice_st08b.bmp",%zukan_x0-80,0
if %zukan_pozu=1 && %zukan_hyouzyo=9 lsp 450,":a;chara\alice_st09.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=9 lsp 450,":a;chara\alice_st09b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\alice_st11.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=1 lsp 450,":a;chara\alice_st11b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\alice_st12.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=2 lsp 450,":a;chara\alice_st12b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_hyouzyo=3 lsp 450,":a;chara\alice_st13.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=3 lsp 450,":a;chara\alice_st13b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_hyouzyo=4 lsp 450,":a;chara\alice_st14.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=4 lsp 450,":a;chara\alice_st14b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_hyouzyo=5 lsp 450,":a;chara\alice_st15.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=5 lsp 450,":a;chara\alice_st15b.bmp",%zukan_x0-80,0
if %zukan_pozu=5 && %zukan_hyouzyo=1 lsp 450,":a;chara\alice_st21.bmp",%zukan_x0,0
if %zukan_pozu=6 && %zukan_hyouzyo=1 lsp 450,":a;chara\alice_st21b.bmp",%zukan_x0-80,0
if %zukan_pozu=5 && %zukan_hyouzyo=2 lsp 450,":a;chara\alice_st22.bmp",%zukan_x0,0
if %zukan_pozu=6 && %zukan_hyouzyo=2 lsp 450,":a;chara\alice_st22b.bmp",%zukan_x0-80,0
if %zukan_pozu=7 && %zukan_hyouzyo=1 lsp 450,":a;chara\alice_st23.bmp",%zukan_x0,0
if %zukan_pozu=7 && %zukan_hyouzyo=2 lsp 450,":a;chara\alice_st24.bmp",%zukan_x0,0
if %zukan_pozu=8 lsp 450,":a;chara\alice_st31.bmp",%zukan_x0+80,125
return



*zukan_alice1_cg

lsp 430,":c;chara\alice_iv01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\alice_iv02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %2550=0 skip 10
lsp 500,":c;bg\bg006.bmp",0,0
lsp 430,":a;chara\alice_h01_1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_h01_2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_h01_3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_h01_4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %hsean_alice2=0 return "*zukan_"+$zlavel
lsp 500,":c;bg\bg015.bmp",0,0
lsp 430,":a;chara\alice_h02_1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_h02_2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_h02_3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_h02_4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_h02_5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %hsean_alice3=0 skip 4
lsp 500,":c;bg\bg035.bmp",0,0
lsp 430,":a;chara\alice_h03_1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %hsean_alice4=0 return "*zukan_"+$zlavel
lsp 500,":c;bg\bg038.bmp",0,0
lsp 430,":a;chara\alice_h04_1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_h04_2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_h04_3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_h04_4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %hsean_alice5=0 return "*zukan_"+$zlavel
lsp 500,":c;bg\bg067.bmp",0,0
lsp 430,":a;chara\alice_h05_1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_h05_2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_h05_3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_h05_4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_alice1_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,2
mov %skill01,1
mov %item01,1
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *alice1_start
if %bwait=213 && %con_hbgm=0 bgm "bgm\ero1.ogg":mov $name,"Monster Girl":lsp 700,":a;chara\alice_st02b.bmp",67,0:bg "bg\bg006.bmp",10,1500:goto *alice1_h
if %bwait=213 && %con_hbgm=1 bgmstop:mov $name,"Monster Girl":lsp 700,":a;chara\alice_st02b.bmp",67,0:bg "bg\bg006.bmp",10,1500:goto *alice1_h
if %bwait=214 bgm "bgm\city1.ogg":lsp 700,":a;chara\alice_st02b.bmp",67,0:bg "bg\bg015.bmp",10,1500:goto *sean0050
if %bwait=215 bgm "bgm\sinpi1.ogg":lsp 700,":a;chara\alice_st02.bmp",172,0:bg "bg\bg035.bmp",10,1500:goto *sean0088x
if %bwait=216 bgm "bgm\hutuu1.ogg":lsp 700,":a;chara\alice_st01b.bmp",67,0:bg "bg\bg038.bmp",10,1500:goto *sean0091
if %bwait=217 bgm "bgm\hutuu1.ogg":lsp 700,":a;chara\alice_st04b.bmp",67,0:bg "bg\bg067.bmp",10,1500:goto *sean0135



*zukan_name

mov $zname,"Slug Girl"
mov $zlavel,"name"
itoa2 $zukan_ko,%2502
mov %zukan_hyouzyonum,2
mov %zukan_pozunum,2
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2502=0 mov %ryozyoku1,0
if %2502>0 mov %ryozyoku1,1
if %2502=0 mov %zukancg,0
if %2502>0 mov %zukancg,1
mov %zukan_x1,0
mov %zukan_x2,170
mov $zukan_lv,"Q"
mov $zukan_hp,"RO"
mov $zukan_skill1,"Sticky Mucus"
mov %zukan_skillc1,3004
mov $zukan_skill2,"Sticky Caress"
mov %zukan_skillc2,3005
mov $zukan_skill3,"Slug Rape"
mov %zukan_skillc3,3006
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_name_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\slug.jpg",400,100
goto *zukan_kihonbtn



*zukan_name_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=1 && %zukan_pozu=1 lsp 450,":a;chara\name_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 && %zukan_pozu=1 lsp 450,":a;chara\name_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=1 && %zukan_pozu=2 lsp 450,":a;chara\name_st11.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 && %zukan_pozu=2 lsp 450,":a;chara\name_st12.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\name_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\name_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\name_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_pozu=2 cspl 441,443
return



*zukan_name_cg

lsp 430,":c;chara\name_h01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\name_h02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\name_h03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\name_h04.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_name_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,2
mov %skill01,1
mov %item01,1
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *name_start
if %bwait=211 mov %nanido,2:goto *name_start
if %bwait=212 mov %nanido,3:goto *name_start
lsp 700,":a;chara\name_st02.bmp",183,0
bg "bg\bg008.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *name_h



*zukan_mdg

mov $zname,"Mandragora"
mov $zlavel,"mdg"
itoa2 $zukan_ko,%2503
mov %zukan_hyouzyonum,4
mov %zukan_pozunum,1
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,2
if %2801=0 mov %ryozyoku1,0
if %2801>0 mov %ryozyoku1,1
if %2802=0 mov %ryozyoku2,0
if %2802>0 mov %ryozyoku2,1
if %2503=0 mov %zukancg,0
if %2503>0 mov %zukancg,1
mov %zukan_x1,-230
mov %zukan_x2,0
mov $zukan_lv,"R"
mov $zukan_hp,"SO"
mov $zukan_skill1,"Fellatio"
mov %zukan_skillc1,3181
mov $zukan_skill2,"Tit Fuck"
mov %zukan_skillc2,3182
mov $zukan_skill3,"Monster Hair"
mov %zukan_skillc3,3195
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_mdg_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\mandra.jpg",400,100
goto *zukan_kihonbtn



*zukan_mdg_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\mdg_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\mdg_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\mdg_st03.bmp",%zukan_x0,0
if %zukan_hyouzyo=4 lsp 450,":a;chara\mdg_st04.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\mdg_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\mdg_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\mdg_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\mdg_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\mdg_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_mdg_cg

lsp 500,":c;bg\bg011.bmp",0,0
if %2801=0 skip 12
lsp 420,":a;chara\mdg_ct11.bmp",0,0
lsp 430,":a;chara\mdg_st01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 422,":a;chara\mdg_bk02.bmp",0,0
lsp 420,":a;chara\mdg_ct12.bmp",0,0
lsp 430,":a;chara\mdg_st01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 422,":a;chara\mdg_bk02.bmp",0,0
lsp 420,":a;chara\mdg_ct13.bmp",0,0
lsp 430,":a;chara\mdg_st02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %2802=0 return "*zukan_"+$zlavel
csp 422
lsp 420,":a;chara\mdg_ct21.bmp",0,0
lsp 430,":a;chara\mdg_st01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 423,":a;chara\mdg_bk03.bmp",0,0
lsp 420,":a;chara\mdg_ct22.bmp",0,0
lsp 430,":a;chara\mdg_st01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 423,":a;chara\mdg_bk03.bmp",0,0
lsp 420,":a;chara\mdg_ct23.bmp",0,0
lsp 430,":a;chara\mdg_st02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 423
lsp 420,":a;chara\mdg_ct31.bmp",0,0
lsp 430,":a;chara\mdg_st02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\mdg_ct32.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\mdg_ct33.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\mdg_ct34.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_mdg_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,3
mov %skill01,2
mov %item01,1
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *mdg_start
if %bwait=211 mov %nanido,2:goto *mdg_start
if %bwait=212 mov %nanido,3:goto *mdg_start
lsp 700,":a;chara\mdg_st01.bmp",0,0
if %bwait=213 lsp 690,":a;chara\mdg_ct12.bmp",0,0
if %bwait=213 lsp 692,":a;chara\mdg_bk02.bmp",0,0
if %bwait=214 lsp 693,":a;chara\mdg_bk03.bmp",0,0
bg "bg\bg011.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *mdg_ha
if %bwait=214 goto *mdg_hb



*zukan_granberia1

mov $zname,"Granberia"
mov $zlavel,"granberia1"
itoa2 $zukan_ko,%2504
mov %zukan_hyouzyonum,5
mov %zukan_pozunum,3
mov %zukan_bukkakenum,3
mov %zukan_sentounum,2
mov %zukan_ryozyokunum,1
if %2504=0 mov %ryozyoku1,0
if %2504>0 mov %ryozyoku1,1
if %2504=0 mov %zukancg,0
if %2504>0 mov %zukancg,1
mov %zukan_x1,-185
mov %zukan_x2,0
mov $zukan_lv,"PQU"
mov $zukan_hp,"QSOOO"
mov %zukan_skillc1,0
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_granberia1_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\grand1.jpg",400,100
goto *zukan_kihonbtn



*zukan_granberia1_p

if %zukan_pozu=1 && %zukan_hyouzyo=7 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,6
if %zukan_pozu=2 && %zukan_hyouzyo=4 mov %zukan_hyouzyo,1
if %zukan_pozu=2 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,3
if %zukan_pozu=3 && %zukan_hyouzyo=3 mov %zukan_hyouzyo,1
if %zukan_pozu=3 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,2
if %zukan_pozu=4 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,3
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\granberia_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\granberia_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\granberia_st03.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\granberia_st04.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=5 lsp 450,":a;chara\granberia_st05.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=6 lsp 450,":a;chara\granberia_st06.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\granberia_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\granberia_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\granberia_st13.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\granberia_st41.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\granberia_st42.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\granberia_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\granberia_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\granberia_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_pozu>1 cspl 441,443
return



*zukan_granberia1_cg

lsp 500,":c;bg\bg013.bmp",0,0
lsp 430,":a;chara\granberia_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\granberia_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\granberia_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\granberia_ha4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_granberia1_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,3
mov %skill01,2
mov %item01,1
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *granberia1_start
lsp 700,":a;chara\granberia_ha2.bmp",0,0
bg "bg\bg013.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Granberia"
if %bwait=213 goto *granberia1_h



*zukan_mimizu

mov $zname,"Earthworm Girl"
mov $zlavel,"mimizu"
itoa2 $zukan_ko,%2505
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,2
mov %zukan_bukkakenum,6
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2505=0 mov %ryozyoku1,0
if %2505>0 mov %ryozyoku1,1
if %2505=0 mov %zukancg,0
if %2505>0 mov %zukancg,1
mov %zukan_x1,-185
mov %zukan_x2,0
mov $zukan_lv,"R"
mov $zukan_hp,"TO"
mov $zukan_skill1,"Sticky Mucus"
mov %zukan_skillc1,3007
mov $zukan_skill2,"Tighten"
mov %zukan_skillc2,3008
mov $zukan_skill3,"Sweet Worm"
mov %zukan_skillc3,3009
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_mimizu_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\earth.jpg",400,100
goto *zukan_kihonbtn



*zukan_mimizu_cg

lsp 500,":c;bg\bg019.bmp",0,0
lsp 430,":a;chara\mimizu_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mimizu_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mimizu_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mimizu_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mimizu_h5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mimizu_h6.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_mimizu_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=2 mov %zukan_hyouzyonum,1
if %zukan_pozu<>2 mov %zukan_hyouzyonum,3
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=2 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\mimizu_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\mimizu_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\mimizu_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 lsp 450,":a;chara\mimizu_st11.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\mimizu_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\mimizu_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\mimizu_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\mimizu_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\mimizu_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\mimizu_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
return



*zukan_mimizu_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,3
mov %skill01,2
mov %item01,5
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *mimizu_start
if %bwait=211 mov %nanido,2:goto *mimizu_start
if %bwait=212 mov %nanido,3:goto *mimizu_start
lsp 700,":a;chara\mimizu_st02.bmp",0,0
bg "bg\bg019.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *mimizu_h



*zukan_gob

mov $zname,"Goblin Girl"
mov $zlavel,"gob"
itoa2 $zukan_ko,%2506
mov %zukan_hyouzyonum,5
mov %zukan_pozunum,2
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2506=0 mov %ryozyoku1,0
if %2506>0 mov %ryozyoku1,1
if %2506=0 mov %zukancg,0
if %2506>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"S"
mov $zukan_hp,"VT"
mov $zukan_skill1,"Forceful Handjob"
mov %zukan_skillc1,3185
mov $zukan_skill2,"Forceful Fellatio"
mov %zukan_skillc2,3186
mov $zukan_skill3,"Forceful Intercrural"
mov %zukan_skillc3,3187
mov $zukan_skill4,"Goblin Tighten"
mov %zukan_skillc4,3183
mov $zukan_skill5,"Super Tightening"
mov %zukan_skillc5,3184
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_gob_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\goblin.jpg",400,100
goto *zukan_kihonbtn



*zukan_gob_p

if %zukan_pozu=1 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=2 && %zukan_hyouzyo=4 mov %zukan_hyouzyo,1
if %zukan_pozu=2 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,3
if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\gob_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\gob_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\gob_st03.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\gob_st04.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=5 lsp 450,":a;chara\gob_st05.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\gob_st21.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\gob_st22.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\gob_st23.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\gob_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\gob_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\gob_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\gob_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_pozu=2 cspl 441,444
return



*zukan_gob_cg

lsp 500,":c;bg\bg020.bmp",0,0
lsp 430,":a;chara\gob_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\gob_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\gob_h3.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel




*zukan_gob_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,4
mov %skill01,2
mov %item01,5
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *gob_start
if %bwait=211 mov %nanido,2:goto *gob_start
if %bwait=212 mov %nanido,3:goto *gob_start
lsp 700,":a;chara\gob_st03.bmp",0,0
bg "bg\bg020.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *gob_h



*zukan_pramia

mov $zname,"Tiny Lamia"
mov $zlavel,"pramia"
itoa2 $zukan_ko,%2507
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,2
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2507=0 mov %ryozyoku1,0
if %2507>0 mov %ryozyoku1,1
if %2507=0 mov %zukancg,0
if %2507>0 mov %zukancg,1
mov %zukan_x1,-190
mov %zukan_x2,0
mov $zukan_lv,"S"
mov $zukan_hp,"WO"
mov $zukan_skill1,"Tiny Lick"
mov %zukan_skillc1,3188
mov $zukan_skill2,"Tiny Tit Fuck"
mov %zukan_skillc2,3189
mov $zukan_skill3,"Tiny Tightening"
mov %zukan_skillc3,3190
mov $zukan_skill4,"Tiny Tailjob"
mov %zukan_skillc4,3191
mov $zukan_skill5,"Death by Tightening"
mov %zukan_skillc5,3010
mov $zukan_skill6,"Death by Pumping"
mov %zukan_skillc6,3011
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_pramia_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\tlamia.jpg",400,100
goto *zukan_kihonbtn



*zukan_pramia_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\pramia_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\pramia_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\pramia_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\pramia_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\pramia_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\pramia_st13.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\pramia_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\pramia_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\pramia_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\pramia_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\pramia_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_pozu=2 cspl 441,445
return



*zukan_pramia_cg

lsp 500,":c;bg\bg022.bmp",0,0
lsp 420,":a;chara\pramia_ct01.bmp",0,0
lsp 430,":a;chara\pramia_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\pramia_ct02.bmp",0,0
lsp 430,":a;chara\pramia_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\pramia_ct03.bmp",0,0
lsp 430,":a;chara\pramia_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\pramia_ct04.bmp",0,0
lsp 430,":a;chara\pramia_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\pramia_ct05.bmp",0,0
lsp 430,":a;chara\pramia_h5.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_pramia_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,4
mov %skill01,2
mov %item01,5
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *pramia_start
if %bwait=211 mov %nanido,2:goto *pramia_start
if %bwait=212 mov %nanido,3:goto *pramia_start
lsp 700,":a;chara\pramia_st02.bmp",0,0
bg "bg\bg022.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *pramia_h



*zukan_vgirl

mov $zname,"Vampire Girl"
mov $zlavel,"vgirl"
itoa2 $zukan_ko,%2508
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,2
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,2
if %2803=0 mov %ryozyoku1,0
if %2803>0 mov %ryozyoku1,1
if %2804=0 mov %ryozyoku2,0
if %2804>0 mov %ryozyoku2,1
if %2508=0 mov %zukancg,0
if %2508>0 mov %zukancg,1
mov %zukan_x1,-180
mov %zukan_x2,0
mov $zukan_lv,"T"
mov $zukan_hp,"WT"
mov $zukan_skill1,"Mantle Rub"
mov %zukan_skillc1,3192
mov $zukan_skill2,"Panty Rub"
mov %zukan_skillc2,3193
mov $zukan_skill3,"Energy Steal"
mov %zukan_skillc3,3012
mov $zukan_skill4,"Eyes of Obedience"
mov %zukan_skillc4,3013
mov $zukan_skill5,"Face Ride"
mov %zukan_skillc5,3014
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_vgirl_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\vamp.jpg",400,100
goto *zukan_kihonbtn



*zukan_vgirl_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\vgirl_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\vgirl_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\vgirl_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\vgirl_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\vgirl_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\vgirl_st13.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\vgirl_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\vgirl_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\vgirl_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\vgirl_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_pozu=2 cspl 441,444
return



*zukan_vgirl_cg

lsp 500,":c;bg\bg022.bmp",0,0
if %2803=0 skip 14
lsp 430,":a;chara\vgirl_st02.bmp",0,0
lsp 420,":a;chara\vgirl_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\vgirl_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\vgirl_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\vgirl_ct04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\vgirl_ct05.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\vgirl_ct06.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %2804=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\vgirl_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\vgirl_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\vgirl_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\vgirl_h4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_vgirl_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,5
mov %skill01,2
mov %item01,5
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *vgirl_start
if %bwait=211 mov %nanido,2:goto *vgirl_start
if %bwait=212 mov %nanido,3:goto *vgirl_start
lsp 700,":a;chara\vgirl_st02.bmp",0,0
if %bwait=213 lsp 690,":a;chara\vgirl_ct03.bmp",0,0
bg "bg\bg022.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *vgirl_ha
if %bwait=214 goto *vgirl_hb



*zukan_dragonp

mov $zname,"Dragon Pup"
mov $zlavel,"dragonp"
itoa2 $zukan_ko,%2509
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,2
mov %zukan_bukkakenum,4
mov %zukan_sentounum,2
mov %zukan_ryozyokunum,1
if %2509=0 mov %ryozyoku1,0
if %2509>0 mov %ryozyoku1,1
if %2509=0 mov %zukancg,0
if %2509>0 mov %zukancg,1
mov %zukan_x1,-180
mov %zukan_x2,0
mov $zukan_lv,"T"
mov $zukan_hp,"XO"
mov %zukan_skillc1,0
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_dragonp_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\dragon.jpg",400,100
goto *zukan_kihonbtn



*zukan_dragonp_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\dragonp_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\dragonp_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\dragonp_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\dragonp_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\dragonp_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\dragonp_st13.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\dragonp_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\dragonp_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\dragonp_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\dragonp_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_pozu=2 cspl 441,444
return



*zukan_dragonp_cg

lsp 500,":c;bg\bg022.bmp",0,0
lsp 430,":a;chara\dragonp_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dragonp_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dragonp_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dragonp_h4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_dragonp_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,5
mov %skill01,2
mov %item01,5
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *dragonp_start
lsp 700,":a;chara\dragonp_st01.bmp",0,0
bg "bg\bg022.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *dragonp_h



*zukan_mitubati

mov $zname,"Bee Girl"
mov $zlavel,"mitubati"
itoa2 $zukan_ko,%2510
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,2
if %2805=0 mov %ryozyoku1,0
if %2805>0 mov %ryozyoku1,1
if %2806=0 mov %ryozyoku2,0
if %2806>0 mov %ryozyoku2,1
if %2510=0 mov %zukancg,0
if %2510>0 mov %zukancg,1
mov %zukan_x1,-150
mov %zukan_x2,0
mov $zukan_lv,"U"
mov $zukan_hp,"PTO"
mov $zukan_skill1,"Lick"
mov %zukan_skillc1,3015
mov $zukan_skill2,"Binding Lick"
mov %zukan_skillc2,3016
mov $zukan_skill3,"Nipple Lick"
mov %zukan_skillc3,3221
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_mitubati_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\bee.jpg",400,100
goto *zukan_kihonbtn



*zukan_mitubati_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\mitubati_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\mitubati_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\mitubati_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\mitubati_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\mitubati_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\mitubati_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\mitubati_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\mitubati_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_mitubati_cg

lsp 500,":c;bg\bg011.bmp",0,0
if %2805=0 skip 14
lsp 430,":a;chara\mitubati_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\mitubati_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\mitubati_ct02.bmp",0,0
lsp 430,":a;chara\mitubati_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\mitubati_ct03.bmp",0,0
lsp 430,":a;chara\mitubati_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\mitubati_ct04.bmp",0,0
lsp 430,":a;chara\mitubati_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %2806=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mitubati_h1.bmp",0,0
lsp 420,":a;chara\mitubati_ctb01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mitubati_h2.bmp",0,0
lsp 420,":a;chara\mitubati_ctb02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mitubati_h3.bmp",0,0
lsp 420,":a;chara\mitubati_ctb03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mitubati_h4.bmp",0,0
lsp 420,":a;chara\mitubati_ctb04.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_mitubati_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,6
mov %skill01,2
mov %item01,5
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *mitubati_start
if %bwait=211 mov %nanido,2:goto *mitubati_start
if %bwait=212 mov %nanido,3:goto *mitubati_start
if %bwait=213 lsp 700,":a;chara\mitubati_st02.bmp",0,0
if %bwait=214 lsp 700,":a;chara\mitubati_h2.bmp",0,0
bg "bg\bg011.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *mitubati_ha
if %bwait=214 goto *mitubati_hb



*zukan_hapy_a

mov $zname,"Harpy"
mov $zlavel,"hapy_a"
itoa2 $zukan_ko,%2511
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2511=0 mov %ryozyoku1,0
if %2511>0 mov %ryozyoku1,1
if %2511=0 mov %zukancg,0
if %2511>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"U"
mov $zukan_hp,"PTO"
mov $zukan_skill1,"Harpy Footjob"
mov %zukan_skillc1,3017
mov $zukan_skill2,"Wing Massage"
mov %zukan_skillc2,3018
mov $zukan_skill3,"Harpy Rape"
mov %zukan_skillc3,3019
mov $zukan_skill4,"Harpy Waist Shake"
mov %zukan_skillc4,3020
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_hapy_a_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\harpy.jpg",400,100
goto *zukan_kihonbtn



*zukan_hapy_a_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\hapy_a_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\hapy_a_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\hapy_a_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\hapy_a_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\hapy_a_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\hapy_a_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
return



*zukan_hapy_a_cg

lsp 500,":c;bg\bg024.bmp",0,0
lsp 430,":a;chara\hapy_a_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hapy_a_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hapy_a_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hapy_a_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hapy_a_h5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hapy_a_h6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hapy_a_h7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hapy_a_h8.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_hapy_a_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,6
mov %skill01,2
mov %item01,5
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *hapy_a_start
if %bwait=211 mov %nanido,2:goto *hapy_a_start
if %bwait=212 mov %nanido,3:goto *hapy_a_start
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *hapy_a_h



*zukan_hapy_bc

mov $zname,"Harpy Twins"
mov $zlavel,"hapy_bc"
itoa2 $zukan_ko,%2512
mov %zukan_hyouzyonum,4
mov %zukan_pozunum,1
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2512=0 mov %ryozyoku1,0
if %2512>0 mov %ryozyoku1,1
if %2512=0 mov %zukancg,0
if %2512>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"U"
mov $zukan_hp,"PQO"
mov $zukan_skill1,"Harpy Footjob"
mov %zukan_skillc1,3021
mov $zukan_skill2,"Feather Massage"
mov %zukan_skillc2,3022
mov $zukan_skill3,"Wing Wrap Caress"
mov %zukan_skillc3,3023
mov $zukan_skill4,"Harpy Blowjob"
mov %zukan_skillc4,3024
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_hapy_bc_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\htwins.jpg",400,100
goto *zukan_kihonbtn



*zukan_hapy_bc_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=3 mov %zukan_hyouzyonum,1
if %zukan_pozu<>3 mov %zukan_hyouzyonum,4
if %zukan_pozu=1 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=2 && %zukan_hyouzyo=3 mov %zukan_hyouzyo,1
if %zukan_pozu=2 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,2
if %zukan_pozu=3 mov %zukan_hyouzyo,1
if %zukan_pozu=4 && %zukan_hyouzyo=3 mov %zukan_hyouzyo,1
if %zukan_pozu=4 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,2
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\hapy_bc_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\hapy_bc_st01a.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\hapy_bc_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\hapy_bc_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\hapy_bc_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\hapy_bc_st12.bmp",%zukan_x0,0
if %zukan_pozu=3 lsp 450,":a;chara\hapy_bc_st21.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=1 lsp 450,":a;chara\hapy_bc_st31.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=2 lsp 450,":a;chara\hapy_bc_st32.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\hapy_bc_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\hapy_bc_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\hapy_bc_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_pozu>1 cspl 441,443
return



*zukan_hapy_bc_cg

lsp 500,":c;bg\bg027.bmp",0,0
lsp 430,":a;chara\hapy_bc_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hapy_bc_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hapy_bc_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hapy_bc_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hapy_bc_hc1.bmp",0,0
lsp 420,":a;chara\hapy_bc_ct01.bmp",503,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hapy_bc_hc2.bmp",0,0
lsp 420,":a;chara\hapy_bc_ct02.bmp",503,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\hapy_bc_ct03.bmp",503,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\hapy_bc_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hapy_bc_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hapy_bc_hb3.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_hapy_bc_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,6
mov %skill01,2
mov %item01,5
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *hapy_bc_start
if %bwait=211 mov %nanido,2:goto *hapy_bc_start
if %bwait=212 mov %nanido,3:goto *hapy_bc_start
lsp 700,":a;chara\hapy_bc_st02.bmp",0,0
bg "bg\bg027.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *hapy_bc_h



*zukan_queenhapy

mov $zname,"Queen Harpy"
mov $zlavel,"queenhapy"
itoa2 $zukan_ko,%2513
mov %zukan_hyouzyonum,4
mov %zukan_pozunum,2
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2513=0 mov %ryozyoku1,0
if %2513>0 mov %ryozyoku1,1
if %2513=0 mov %zukancg,0
if %2513>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"TO"
mov $zukan_hp,"ROO"
mov $zukan_skill1,"Harpy Footjob"
mov %zukan_skillc1,3025
mov $zukan_skill2,"Harpy Blowjob"
mov %zukan_skillc2,3026
mov $zukan_skill3,"Feather Massage"
mov %zukan_skillc3,3027
mov $zukan_skill4,"Royal Tit Fuck"
mov %zukan_skillc4,3028
mov $zukan_skill5,"Royal Pussy"
mov %zukan_skillc5,3029
mov $zukan_skill6,"Royal Pumping"
mov %zukan_skillc6,3030
mov $zukan_skill7,"Happiness Rondo"
mov %zukan_skillc7,3031
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_queenhapy_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\hqueen.jpg",400,100
goto *zukan_kihonbtn



*zukan_queenhapy_p

if %zukan_pozu=1 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=2 && %zukan_hyouzyo=4 mov %zukan_hyouzyo,1
if %zukan_pozu=2 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,3
if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=1 && %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\queenhapy_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\queenhapy_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\queenhapy_st03.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\queenhapy_st04.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\queenhapy_st01_2.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\queenhapy_st02_2.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\queenhapy_st03_2.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\queenhapy_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\queenhapy_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\queenhapy_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\queenhapy_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\queenhapy_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_queenhapy_cg

lsp 500,":c;bg\bg027.bmp",0,0
lsp 430,":a;chara\queenhapy_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\queenhapy_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\queenhapy_h2.bmp",0,0
lsp 420,":a;chara\queenhapy_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\queenhapy_h3.bmp",0,0
lsp 420,":a;chara\queenhapy_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\queenhapy_h4.bmp",0,0
lsp 420,":a;chara\queenhapy_ct04.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_queenhapy_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,7
mov %skill01,2
mov %item01,5
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *queenhapy_start
if %bwait=211 mov %nanido,2:goto *queenhapy_start
if %bwait=212 mov %nanido,3:goto *queenhapy_start
lsp 700,":a;chara\queenhapy_st02.bmp",0,0
bg "bg\bg027.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *queenhapy_h



*zukan_delh_a

mov $zname,"Dark Elf Fencer"
mov $zlavel,"delh_a"
itoa2 $zukan_ko,%2514
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2514=0 mov %ryozyoku1,0
if %2514>0 mov %ryozyoku1,1
if %2514=0 mov %zukancg,0
if %2514>0 mov %zukancg,1
mov %zukan_x1,-100
mov %zukan_x2,100
mov $zukan_lv,"W"
mov $zukan_hp,"PWO"
mov $zukan_skill1,"Elf Blowjob"
mov %zukan_skillc1,3032
mov $zukan_skill2,"Elf Handjob"
mov %zukan_skillc2,3033
mov $zukan_skill3,"Elf Tit Fuck"
mov %zukan_skillc3,3034
mov $zukan_skill4,"Kiss of Ecstasy"
mov %zukan_skillc4,3035
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_delh_a_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\fencer.jpg",400,100
goto *zukan_kihonbtn



*zukan_delh_a_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\delh_a_st01.bmp",%zukan_x0,-100
if %zukan_hyouzyo=2 lsp 450,":a;chara\delh_a_st02.bmp",%zukan_x0,-100
if %zukan_hyouzyo=3 lsp 450,":a;chara\delh_a_st03.bmp",%zukan_x0,-100
if %zukan_bukkake1=1 lsp 441,":a;chara\elf_bk01.bmp",%zukan_x0,-100
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\elf_bk02.bmp",%zukan_x0,-100
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\elf_bk03.bmp",%zukan_x0,-100
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\delh_a_bk01.bmp",%zukan_x0,-100
if %zukan_bukkake4=0 csp 444
return



*zukan_delh_a_cg

lsp 500,":c;bg\bg004.bmp",0,0
lsp 430,":a;chara\delh_a_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\delh_a_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\delh_a_h3.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_delh_a_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,8
mov %skill01,2
mov %item01,5
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *delh_a_start
if %bwait=211 mov %nanido,2:goto *delh_a_start
if %bwait=212 mov %nanido,3:goto *delh_a_start
lsp 700,":a;chara\delh_a_st02.bmp",100,-100
bg "bg\bg004.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Dark Elf"
if %bwait=213 goto *delh_a_h



*zukan_delh_b

mov $zname,"Dark Elf Mage"
mov $zlavel,"delh_b"
itoa2 $zukan_ko,%2515
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2515=0 mov %ryozyoku1,0
if %2515>0 mov %ryozyoku1,1
if %2515=0 mov %zukancg,0
if %2515>0 mov %zukancg,1
mov %zukan_x1,-90
mov %zukan_x2,150
mov $zukan_lv,"W"
mov $zukan_hp,"PWT"
mov $zukan_skill1,"Tentacle Caress"
mov %zukan_skillc1,3036
mov $zukan_skill2,"Bound Tentacle Caress"
mov %zukan_skillc2,3037
mov $zukan_skill3,"Tentacle Drain"
mov %zukan_skillc3,3038
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_delh_b_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\mage.jpg",400,100
goto *zukan_kihonbtn



*zukan_delh_b_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\delh_b_st01.bmp",%zukan_x0,30
if %zukan_hyouzyo=2 lsp 450,":a;chara\delh_b_st02.bmp",%zukan_x0,30
if %zukan_hyouzyo=3 lsp 450,":a;chara\delh_b_st03.bmp",%zukan_x0,30
if %zukan_bukkake1=1 lsp 441,":a;chara\delh_b_bk01.bmp",%zukan_x0,30
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\delh_b_bk02.bmp",%zukan_x0,30
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\delh_b_bk03.bmp",%zukan_x0,30
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\delh_b_bk04.bmp",%zukan_x0,30
if %zukan_bukkake4=0 csp 444
return



*zukan_delh_b_cg

lsp 500,":c;bg\bg004.bmp",0,0
lsp 430,":a;chara\delh_b_h1a.bmp",150,30
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\delh_b_h2a.bmp",150,30
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\delh_b_h3a.bmp",150,30
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\delh_b_h4a.bmp",150,30
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\delh_b_h1.bmp",150,30
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\delh_b_h2.bmp",150,30
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\delh_b_h3.bmp",150,30
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\delh_b_h4.bmp",150,30
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\delh_b_h5.bmp",150,30
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_delh_b_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,8
mov %skill01,2
mov %item01,5
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *delh_b_start
if %bwait=211 mov %nanido,2:goto *delh_b_start
if %bwait=212 mov %nanido,3:goto *delh_b_start
lsp 700,":a;chara\delh_b_st02.bmp",150,30
bg "bg\bg004.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Dark Elf"
if %bwait=213 goto *delh_b_h



*zukan_hiru

mov $zname,"Leech Girl"
mov $zlavel,"hiru"
itoa2 $zukan_ko,%2516
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2516=0 mov %ryozyoku1,0
if %2516>0 mov %ryozyoku1,1
if %2516=0 mov %zukancg,0
if %2516>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"X"
mov $zukan_hp,"QPO"
mov $zukan_skill1,"Leech Tail"
mov %zukan_skillc1,3039
mov $zukan_skill2,"Leech Fellatio"
mov %zukan_skillc2,3085
mov $zukan_skill3,"Tentacle Hell"
mov %zukan_skillc3,3040
mov $zukan_skill4,"Semen Suck"
mov %zukan_skillc4,3041
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_hiru_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\leech.jpg",400,100
goto *zukan_kihonbtn



*zukan_hiru_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\hiru_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\hiru_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\hiru_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\hiru_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\hiru_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\hiru_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\hiru_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\hiru_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_hiru_cg

lsp 500,":c;bg\bg019.bmp",0,0
lsp 430,":a;chara\hiru_st11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\hiru_ct01.bmp",0,0
lsp 430,":a;chara\hiru_st11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\hiru_ct02.bmp",0,0
lsp 430,":a;chara\hiru_st12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\hiru_ct03.bmp",0,0
lsp 430,":a;chara\hiru_st13.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\hiru_ct04.bmp",0,0
lsp 430,":a;chara\hiru_st14.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_hiru_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,9
mov %skill01,2
mov %item01,5
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *hiru_start
if %bwait=211 mov %nanido,2:goto *hiru_start
if %bwait=212 mov %nanido,3:goto *hiru_start
lsp 700,":a;chara\hiru_st02.bmp",0,0
bg "bg\bg019.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *hiru_h



*zukan_rahure

mov $zname,"Rafflesia Girl"
mov $zlavel,"rahure"
itoa2 $zukan_ko,%2517
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,7
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2517=0 mov %ryozyoku1,0
if %2517>0 mov %ryozyoku1,1
if %2517=0 mov %zukancg,0
if %2517>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"X"
mov $zukan_hp,"QTO"
mov $zukan_skill1,"Tentacle Caress"
mov %zukan_skillc1,3042
mov $zukan_skill2,"Petal Massage"
mov %zukan_skillc2,3043
mov $zukan_skill3,"Forced Pollination"
mov %zukan_skillc3,3044
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_rahure_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\raff.jpg",400,100
goto *zukan_kihonbtn



*zukan_rahure_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=1 lsp 450,":a;chara\rahure_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\rahure_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\rahure_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\rahure_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\rahure_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\rahure_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\rahure_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\rahure_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\rahure_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
if %zukan_bukkake7=1 lsp 447,":a;chara\rahure_bk07.bmp",%zukan_x0,0
if %zukan_bukkake7=0 csp 447
return



*zukan_rahure_cg

lsp 500,":c;bg\bg030.bmp",0,0
lsp 420,":a;chara\rahure_ct01.bmp",0,0
lsp 430,":a;chara\rahure_st11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\rahure_ct02.bmp",0,0
lsp 430,":a;chara\rahure_st12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\rahure_ct03.bmp",0,0
lsp 430,":a;chara\rahure_st13.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\rahure_ct04.bmp",0,0
lsp 430,":a;chara\rahure_st14.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\rahure_ct11.bmp",0,0
lsp 430,":a;chara\rahure_st11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\rahure_ct12.bmp",0,0
lsp 430,":a;chara\rahure_st12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\rahure_ct13.bmp",0,0
lsp 430,":a;chara\rahure_st13.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\rahure_ct14.bmp",0,0
lsp 430,":a;chara\rahure_st14.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_rahure_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,9
mov %skill01,3
mov %item01,5
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *rahure_start
if %bwait=211 mov %nanido,2:goto *rahure_start
if %bwait=212 mov %nanido,3:goto *rahure_start
lsp 700,":a;chara\rahure_st02.bmp",0,0
bg "bg\bg030.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *rahure_h



*zukan_ropa

mov $zname,"Roper Girl"
mov $zlavel,"ropa"
itoa2 $zukan_ko,%2518
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2518=0 mov %ryozyoku1,0
if %2518>0 mov %ryozyoku1,1
if %2518=0 mov %zukancg,0
if %2518>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PO"
mov $zukan_hp,"QVO"
mov $zukan_skill1,"Tentacle Caress"
mov %zukan_skillc1,3045
mov $zukan_skill2,"Bound Tentacle Caress"
mov %zukan_skillc2,3046
mov $zukan_skill3,"Bound Tentacle Tightening"
mov %zukan_skillc3,3047
mov $zukan_skill4,"Predation"
mov %zukan_skillc4,3048
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_ropa_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\roper.jpg",400,100
goto *zukan_kihonbtn



*zukan_ropa_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\ropa_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\ropa_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\ropa_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\ropa_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\ropa_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\ropa_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\ropa_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\ropa_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_ropa_cg

lsp 500,":c;bg\bg030.bmp",0,0
lsp 430,":a;chara\ropa_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\ropa_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ropa_h2.bmp",0,0
lsp 420,":a;chara\ropa_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ropa_h3.bmp",0,0
lsp 420,":a;chara\ropa_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ropa_h4.bmp",0,0
lsp 420,":a;chara\ropa_ct04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ropa_h5.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_ropa_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,10
mov %skill01,3
mov %item01,5
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *ropa_start
if %bwait=211 mov %nanido,2:goto *ropa_start
if %bwait=212 mov %nanido,3:goto *ropa_start
lsp 700,":a;chara\ropa_st02.bmp",0,0
bg "bg\bg030.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *ropa_h



*zukan_youko

mov $zname,"Kitsune"
mov $zlavel,"youko"
itoa2 $zukan_ko,%2519
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2519=0 mov %ryozyoku1,0
if %2519>0 mov %ryozyoku1,1
if %2519=0 mov %zukancg,0
if %2519>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PQ"
mov $zukan_hp,"RTO"
mov $zukan_skill1,"Fluffy Tail"
mov %zukan_skillc1,3049
mov $zukan_skill2,"Lick Lick"
mov %zukan_skillc2,3050
mov $zukan_skill3,"Rub Rub"
mov %zukan_skillc3,3051
mov $zukan_skill4,"Double Tail"
mov %zukan_skillc4,3052
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_youko_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\kit.jpg",400,100
goto *zukan_kihonbtn



*zukan_youko_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\youko_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\youko_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\youko_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\youko_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\youko_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\youko_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\youko_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\youko_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_youko_cg

lsp 500,":c;bg\bg032.bmp",0,0
lsp 430,":a;chara\youko_st01.bmp",0,0
lsp 420,":a;chara\youko_ct01.bmp",460,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\youko_ct02.bmp",460,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\youko_ct03.bmp",460,0
lsp 424,":a;chara\youko_bk04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\youko_ct04.bmp",460,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
cspl 420,429
lsp 430,":a;chara\youko_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\youko_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\youko_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\youko_h4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_youko_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,10
mov %skill01,4
mov %item01,5
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *youko_start
if %bwait=211 mov %nanido,2:goto *youko_start
if %bwait=212 mov %nanido,3:goto *youko_start
lsp 700,":a;chara\youko_st02.bmp",0,0
bg "bg\bg032.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *youko_h



*zukan_meda

mov $zname,"Meda"
mov $zlavel,"meda"
itoa2 $zukan_ko,%2520
mov %zukan_hyouzyonum,1
mov %zukan_pozunum,1
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2520=0 mov %ryozyoku1,0
if %2520>0 mov %ryozyoku1,1
if %2520=0 mov %zukancg,0
if %2520>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PO"
mov $zukan_hp,"QWO"
mov $zukan_skill1,"Tentacle"
mov %zukan_skillc1,3053
mov $zukan_skill2,"Bound Tentacle"
mov %zukan_skillc2,3054
mov $zukan_skill3,"Thousand Worms"
mov %zukan_skillc3,3055
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_meda_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\medusa.jpg",400,100
goto *zukan_kihonbtn



*zukan_meda_p

if %zukan_hyouzyo=1 lsp 450,":a;chara\meda_st01.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\meda_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\meda_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\meda_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\meda_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
return



*zukan_meda_cg

lsp 500,":c;bg\bg032.bmp",0,0
lsp 430,":a;chara\meda_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\meda_ct01.bmp",0,0
lsp 430,":a;chara\meda_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\meda_ct02.bmp",0,0
lsp 430,":a;chara\meda_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\meda_ct03.bmp",0,0
lsp 430,":a;chara\meda_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\meda_ct04.bmp",0,0
lsp 430,":a;chara\meda_h4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_meda_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,10
mov %skill01,4
mov %item01,5
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *meda_start
if %bwait=211 mov %nanido,2:goto *meda_start
if %bwait=212 mov %nanido,3:goto *meda_start
lsp 700,":a;chara\meda_st01.bmp",0,0
bg "bg\bg032.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *meda_h



*zukan_kumo

mov $zname,"Spider Girl"
mov $zlavel,"kumo"
itoa2 $zukan_ko,%2521
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,2
if %2807=0 mov %ryozyoku1,0
if %2807>0 mov %ryozyoku1,1
if %2808=0 mov %ryozyoku2,0
if %2808>0 mov %ryozyoku2,1
if %2521=0 mov %zukancg,0
if %2521>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PP"
mov $zukan_hp,"ROO"
mov $zukan_skill1,"Eight-Legged Massage"
mov %zukan_skillc1,3056
mov $zukan_skill2,"Penis Cocoon"
mov %zukan_skillc2,3057
mov $zukan_skill3,"Body Wrap"
mov %zukan_skillc3,3058
mov $zukan_skill4,"Forced Violation"
mov %zukan_skillc4,3059
mov $zukan_skill5,"Predation"
mov %zukan_skillc5,3060
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_kumo_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\spider.jpg",400,100
goto *zukan_kihonbtn



*zukan_kumo_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\kumo_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\kumo_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\kumo_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\kumo_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\kumo_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\kumo_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\kumo_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\kumo_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_kumo_cg

lsp 500,":c;bg\bg032.bmp",0,0
lsp 430,":a;chara\kumo_st02.bmp",0,0
lsp 420,":a;chara\kumo_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kumo_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kumo_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kumo_ct04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
if %2807=0 skip 13
lsp 428,":c;chara\kumo_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 428,":c;chara\kumo_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 428,":c;chara\kumo_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 428,":c;chara\kumo_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 428,":c;chara\kumo_ha5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 428,":c;chara\kumo_ha6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %2808=0 return "*zukan_"+$zlavel
lsp 428,":c;chara\kumo_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 428,":c;chara\kumo_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 428,":c;chara\kumo_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 428,":c;chara\kumo_hb4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_kumo_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,11
mov %skill01,4
mov %item01,5
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *kumo_start
if %bwait=211 mov %nanido,2:goto *kumo_start
if %bwait=212 mov %nanido,3:goto *kumo_start
lsp 700,":a;chara\kumo_st02.bmp",0,0
bg "bg\bg032.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov %kousoku,4
if %bwait=213 goto *kumo_ha
if %bwait=214 goto *kumo_hb



*zukan_mimic

mov $zname,"Mimic"
mov $zlavel,"mimic"
itoa2 $zukan_ko,%2522
mov %zukan_hyouzyonum,2
mov %zukan_pozunum,1
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,2
if %2809=0 mov %ryozyoku1,0
if %2809>0 mov %ryozyoku1,1
if %2810=0 mov %ryozyoku2,0
if %2810>0 mov %ryozyoku2,1
if %2522=0 mov %zukancg,0
if %2522>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PT"
mov $zukan_hp,"TOO"
mov $zukan_skill1,"Slow Swallow"
mov %zukan_skillc1,3061
mov $zukan_skill2,"Swallow"
mov %zukan_skillc2,3062
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_mimic_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\mimic.jpg",400,100
goto *zukan_kihonbtn



*zukan_mimic_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\mimic_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\mimic_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\mimic_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\mimic_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\mimic_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\mimic_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
return



*zukan_mimic_cg

lsp 500,":c;bg\bg033.bmp",0,0
lsp 430,":a;chara\mimic_st21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %2809=0 skip 8
lsp 420,":a;chara\mimic_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\mimic_ct02.bmp",0,0
lsp 430,":a;chara\mimic_st22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\mimic_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %2810=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\mimic_ct11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\mimic_ct12.bmp",0,0
lsp 430,":a;chara\mimic_st22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\mimic_ct13.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\mimic_ct14.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_mimic_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,11
mov %skill01,4
mov %item01,5
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *mimic_start
if %bwait=211 mov %nanido,2:goto *mimic_start
if %bwait=212 mov %nanido,3:goto *mimic_start
lsp 700,":a;chara\mimic_st22.bmp",0,0
bg "bg\bg033.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *mimic_ha
if %bwait=214 goto *mimic_hb



*zukan_nanabi

mov $zname,"Nanabi"
mov $zlavel,"nanabi"
itoa2 $zukan_ko,%2523
mov %zukan_hyouzyonum,4
mov %zukan_pozunum,3
mov %zukan_bukkakenum,7
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,2
if %2811=0 mov %ryozyoku1,0
if %2811>0 mov %ryozyoku1,1
if %2812=0 mov %ryozyoku2,0
if %2812>0 mov %ryozyoku2,1
if %2523=0 mov %zukancg,0
if %2523>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"ST"
mov $zukan_hp,"QXOO"
mov $zukan_skill1,"Fox Blowjob"
mov %zukan_skillc1,3063
mov $zukan_skill2,"Fox Tit Fuck"
mov %zukan_skillc2,3064
mov $zukan_skill3,"Tail Massage"
mov %zukan_skillc3,3065
mov $zukan_skill4,"Bound Tail Massage"
mov %zukan_skillc4,3066
mov $zukan_skill5,"Two Moons"
mov %zukan_skillc5,3067
mov $zukan_skill6,"Seven Moons"
mov %zukan_skillc6,3068
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_nanabi_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\nanabi.jpg",400,100
goto *zukan_kihonbtn



*zukan_nanabi_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu>1 mov %zukan_hyouzyonum,1
if %zukan_pozu=1 mov %zukan_hyouzyonum,4
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu>1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\nanabi_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\nanabi_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\nanabi_st03.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\nanabi_st04.bmp",%zukan_x0,0
if %zukan_pozu=2 lsp 450,":a;chara\nanabi_st11.bmp",%zukan_x0,0
if %zukan_pozu=3 lsp 450,":a;chara\nanabi_st21.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\nanabi_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\nanabi_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\nanabi_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\nanabi_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\nanabi_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\nanabi_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
if %zukan_bukkake7=1 lsp 447,":a;chara\nanabi_bk07.bmp",%zukan_x0,0
if %zukan_bukkake7=0 csp 447
if %zukan_pozu=3 cspl 445,447
return



*zukan_nanabi_cg

lsp 500,":c;bg\bg034.bmp",0,0
lsp 430,":a;chara\nanabi_st01.bmp",0,0
lsp 420,":a;chara\nanabi_cta01.bmp",450,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\nanabi_cta02.bmp",450,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 425,":a;chara\nanabi_bk05.bmp",0,0
lsp 420,":a;chara\nanabi_cta03.bmp",450,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\nanabi_cta04.bmp",450,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 425
lsp 420,":a;chara\nanabi_ctb01.bmp",450,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\nanabi_ctb02.bmp",450,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 425,":a;chara\nanabi_bk05.bmp",0,0
lsp 426,":a;chara\nanabi_bk06.bmp",0,0
lsp 427,":a;chara\nanabi_bk07.bmp",0,0
lsp 420,":a;chara\nanabi_ctb03.bmp",450,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\nanabi_ctb04.bmp",450,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
cspl 420,429
if %2811=0 skip 9
lsp 430,":a;chara\nanabi_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\nanabi_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\nanabi_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\nanabi_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %2812=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\nanabi_h5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\nanabi_h6.bmp",0,0
lsp 420,":a;chara\nanabi_ctc01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\nanabi_h7.bmp",0,0
lsp 420,":a;chara\nanabi_ctc02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\nanabi_h8.bmp",0,0
lsp 420,":a;chara\nanabi_ctc03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\nanabi_h9.bmp",0,0
lsp 420,":a;chara\nanabi_ctc04.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_nanabi_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,12
mov %skill01,4
mov %item01,5
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *nanabi_start
if %bwait=211 mov %nanido,2:goto *nanabi_start
if %bwait=212 mov %nanido,3:goto *nanabi_start
lsp 700,":a;chara\nanabi_st02.bmp",0,0
bg "bg\bg034.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *nanabi_ha
if %bwait=214 goto *nanabi_hb



*zukan_tamamo1

mov $zname,"Tamamo"
mov $zlavel,"tamamo1"
itoa2 $zukan_ko,%2524
mov %zukan_hyouzyonum,4
mov %zukan_pozunum,1
mov %zukan_bukkakenum,4
mov %zukan_sentounum,2
mov %zukan_ryozyokunum,1
if %2524=0 mov %ryozyoku1,0
if %2524>0 mov %ryozyoku1,1
if %2524=0 mov %zukancg,0
if %2524>0 mov %zukancg,1
mov %zukan_x1,-180
mov %zukan_x2,0
mov $zukan_lv,"PQW"
mov $zukan_hp,"QQOOO"
mov %zukan_skillc1,0
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_tamamo1_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\tamamo.jpg",400,100
goto *zukan_kihonbtn



*zukan_tamamo1_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\tamamo_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\tamamo_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\tamamo_st03.bmp",%zukan_x0,0
if %zukan_hyouzyo=4 lsp 450,":a;chara\tamamo_st04.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\tamamo_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\tamamo_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\tamamo_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\tamamo_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
return



*zukan_tamamo1_cg

lsp 500,":c;bg\bg035.bmp",0,0
lsp 430,":a;chara\tamamo_st01.bmp",0,0
lsp 420,":a;chara\tamamo_cta01.bmp",490,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\tamamo_cta02.bmp",490,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 424,":a;chara\tamamo_bk04.bmp",0,0
lsp 420,":a;chara\tamamo_cta03.bmp",490,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\tamamo_cta04.bmp",490,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
cspl 420,429
lsp 430,":a;chara\tamamo_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tamamo_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tamamo_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tamamo_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tamamo_h5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tamamo_h6.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_tamamo1_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,130
mov %skill01,4
mov %item01,6
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *tamamo1_start
lsp 700,":a;chara\tamamo_st02.bmp",0,0
bg "bg\bg035.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Tamamo"
if %bwait=213 goto *tamamo1_h



*zukan_arumaeruma1

mov $zname,"Alma Elma"
mov $zlavel,"arumaeruma1"
itoa2 $zukan_ko,%2525
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,4
mov %zukan_bukkakenum,1
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2525=0 mov %ryozyoku1,0
if %2525>0 mov %ryozyoku1,1
if %2525=0 mov %zukancg,0
if %2525>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PQT"
mov $zukan_hp,"PTOOO"
mov $zukan_skill1,"Tail Massage"
mov %zukan_skillc1,3069
mov $zukan_skill2,"Tail Mucus"
mov %zukan_skillc2,3070
mov $zukan_skill3,"Bound Tail Massage"
mov %zukan_skillc3,3071
mov $zukan_skill4,"Tail Suck"
mov %zukan_skillc4,3072
mov $zukan_skill5,"Tail Drain"
mov %zukan_skillc5,3173
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_arumaeruma1_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\aruma.jpg",400,100
goto *zukan_kihonbtn



*zukan_arumaeruma1_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu<4 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu<4 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=4 && %zukan_hyouzyo=3 mov %zukan_hyouzyo,1
if %zukan_pozu=4 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,2
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\arumaeruma_st41.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\arumaeruma_st42.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\arumaeruma_st43.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\arumaeruma_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\arumaeruma_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\arumaeruma_st13.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\arumaeruma_st31.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\arumaeruma_st32.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=3 lsp 450,":a;chara\arumaeruma_st33.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=1 lsp 450,":a;chara\arumaeruma_st21.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=2 lsp 450,":a;chara\arumaeruma_st22.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_bukkake1=1 lsp 441,":a;chara\arumaeruma_bk01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_bukkake1=0 csp 441
if %zukan_pozu=3 && %zukan_bukkake1=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\arumaeruma_st31b.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_bukkake1=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\arumaeruma_st32b.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_bukkake1=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\arumaeruma_st33b.bmp",%zukan_x0,0
return



*zukan_arumaeruma1_cg

lsp 500,":c;bg\bg036.bmp",0,0
lsp 430,":a;chara\arumaeruma_st32.bmp",0,0
lsp 420,":a;chara\arumaeruma_ct01.bmp",500,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\arumaeruma_ct02.bmp",500,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\arumaeruma_ct03.bmp",500,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\arumaeruma_ct04.bmp",500,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\arumaeruma_st32b.bmp",0,0
lsp 420,":a;chara\arumaeruma_ct05.bmp",500,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\arumaeruma_ct06.bmp",500,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\arumaeruma_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\arumaeruma_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\arumaeruma_ha2.bmp",0,0
lsp 420,":a;chara\arumaeruma_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\arumaeruma_ha3.bmp",0,0
lsp 420,":a;chara\arumaeruma_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\arumaeruma_ha4.bmp",0,0
lsp 420,":a;chara\arumaeruma_hb4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\arumaeruma_ha4.bmp",0,0
lsp 420,":a;chara\arumaeruma_hb5.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_arumaeruma1_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,13
mov %skill01,5
mov %item01,6
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *arumaeruma1_start
if %bwait=211 mov %nanido,2:goto *arumaeruma1_start
if %bwait=212 mov %nanido,3:goto *arumaeruma1_start
lsp 700,":a;chara\arumaeruma_st32.bmp",0,0
bg "bg\bg036.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Alma Elma"
if %bwait=213 goto *arumaeruma1_h



*zukan_namako

mov $zname,"Sea Cucumber Girl"
mov $zlavel,"namako"
itoa2 $zukan_ko,%2526
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2526=0 mov %ryozyoku1,0
if %2526>0 mov %ryozyoku1,1
if %2526=0 mov %zukancg,0
if %2526>0 mov %zukancg,1
mov %zukan_x1,-100
mov %zukan_x2,0
mov $zukan_lv,"PS"
mov $zukan_hp,"SOO"
mov $zukan_skill1,"Semen Squeeze"
mov %zukan_skillc1,3073
mov $zukan_skill2,"Ecstasy Rub"
mov %zukan_skillc2,3074
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_namako_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\sea.jpg",400,100
goto *zukan_kihonbtn



*zukan_namako_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\namako_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\namako_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\namako_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\namako_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\namako_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\namako_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
return



*zukan_namako_cg

lsp 500,":c;bg\bg039.bmp",0,0
lsp 430,":a;chara\namako_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\namako_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\namako_h2.bmp",0,0
lsp 420,":a;chara\namako_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\namako_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\namako_ct04.bmp",0,0
lsp 430,":a;chara\namako_h3.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_namako_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,14
mov %skill01,5
mov %item01,7
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *namako_start
if %bwait=211 mov %nanido,2:goto *namako_start
if %bwait=212 mov %nanido,3:goto *namako_start
lsp 700,":a;chara\namako_h1.bmp",0,0
bg "bg\bg039.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *namako_h



*zukan_kai

mov $zname,"Shellfish Girl"
mov $zlavel,"kai"
itoa2 $zukan_ko,%2527
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,2
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2527=0 mov %ryozyoku1,0
if %2527>0 mov %ryozyoku1,1
if %2527=0 mov %zukancg,0
if %2527>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PS"
mov $zukan_hp,"RWO"
mov $zukan_skill1,"Tentacle Suction"
mov %zukan_skillc1,3075
mov $zukan_skill2,"Love Jail Hand"
mov %zukan_skillc2,3076
mov $zukan_skill3,"Love Jail Fellatio"
mov %zukan_skillc3,3077
mov $zukan_skill4,"Love Jail Anal"
mov %zukan_skillc4,3078
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_kai_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\shell.jpg",400,100
goto *zukan_kihonbtn



*zukan_kai_p

if %zukan_pozu=1 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=2 && %zukan_hyouzyo=3 mov %zukan_hyouzyo,1
if %zukan_pozu=2 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,2
if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\kai_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\kai_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\kai_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\kai_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\kai_st12.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\kai_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\kai_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\kai_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\kai_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\kai_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_pozu=2 cspl 441,445
return



*zukan_kai_cg

lsp 500,":c;bg\bg039.bmp",0,0
lsp 430,":a;chara\kai_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kai_ct11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kai_h2.bmp",0,0
lsp 420,":a;chara\kai_ct12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kai_h3.bmp",0,0
lsp 420,":a;chara\kai_ct01.bmp",0,0
lsp 421,":a;chara\kai_ct12.bmp",-520,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kai_ct02.bmp",0,0
lsp 421,":a;chara\kai_ct13.bmp",-520,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kai_ct03.bmp",0,0
lsp 421,":a;chara\kai_ct14.bmp",-520,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_kai_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,14
mov %skill01,5
mov %item01,7
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *kai_start
if %bwait=211 mov %nanido,2:goto *kai_start
if %bwait=212 mov %nanido,3:goto *kai_start
lsp 700,":a;chara\kai_st02.bmp",0,0
bg "bg\bg039.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *kai_h



*zukan_lamia

mov $zname,"Lamia"
mov $zlavel,"lamia"
itoa2 $zukan_ko,%2528
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,2
mov %zukan_bukkakenum,6
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,3
if %2813=0 mov %ryozyoku1,0
if %2813>0 mov %ryozyoku1,1
if %2814=0 mov %ryozyoku2,0
if %2814>0 mov %ryozyoku2,1
if %2815=0 mov %ryozyoku3,0
if %2815>0 mov %ryozyoku3,1
if %2528=0 mov %zukancg,0
if %2528>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PS"
mov $zukan_hp,"TWO"
mov $zukan_skill1,"Tail Massage"
mov %zukan_skillc1,3079
mov $zukan_skill2,"Constrict"
mov %zukan_skillc2,3080
mov $zukan_skill3,"Coiled Handjob"
mov %zukan_skillc3,3081
mov $zukan_skill4,"Coiled Fellatio"
mov %zukan_skillc4,3082
mov $zukan_skill5,"Coiled Tit Fuck"
mov %zukan_skillc5,3083
mov $zukan_skill6,"Swallow Whole"
mov %zukan_skillc6,3084
mov $zukan_skill7,"Lamia Vagina"
mov %zukan_skillc7,3088
mov $zukan_skill8,"Sure-Death Tightening"
mov %zukan_skillc8,3089
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_lamia_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\lamia.jpg",400,100
goto *zukan_kihonbtn



*zukan_lamia_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\lamia_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\lamia_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\lamia_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\lamia_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\lamia_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\lamia_st13.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\lamia_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 && %zukan_pozu=1 lsp 442,":a;chara\lamia_bk02a.bmp",%zukan_x0,0
if %zukan_bukkake2=1 && %zukan_pozu=2 lsp 442,":a;chara\lamia_bk02b.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 && %zukan_pozu=1 lsp 443,":a;chara\lamia_bk03a.bmp",%zukan_x0,0
if %zukan_bukkake3=1 && %zukan_pozu=2 lsp 443,":a;chara\lamia_bk03b.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 && %zukan_pozu=1 csp 444
if %zukan_bukkake4=1 && %zukan_pozu=2 lsp 444,":a;chara\lamia_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\lamia_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\lamia_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
return



*zukan_lamia_cg

lsp 500,":c;bg\bg041.bmp",0,0
if %2813=0 skip 17
lsp 430,":a;chara\lamia_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lamia_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lamia_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lamia_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lamia_ha5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lamia_ha6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lamia_ha7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lamia_ha8.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %2814=0 skip 12
lsp 420,":a;chara\lamia_ct01.bmp",400,0
lsp 430,":a;chara\lamia_st02.bmp",-160,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\lamia_ct02.bmp",400,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\lamia_ct03.bmp",400,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\lamia_ct04.bmp",400,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\lamia_ct05.bmp",400,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %2815=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\lamia_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\lamia_ctb01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lamia_hb2.bmp",0,0
lsp 420,":a;chara\lamia_ctb02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lamia_hb3.bmp",0,0
lsp 420,":a;chara\lamia_ctb03.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_lamia_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,14
mov %skill01,5
mov %item01,7
if %bwait=210 mov %nanido,1:goto *zukan_lamiab
if %bwait=211 mov %nanido,2:goto *zukan_lamiab
if %bwait=212 mov %nanido,3:goto *zukan_lamiab
gosub *setwindow_01
lsp 700,":a;chara\lamia_st02.bmp",0,0
if %bwait=215 lsp 700,":a;chara\lamia_hb1.bmp",0,0
bg "bg\bg041.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *lamia_ha
if %bwait=214 goto *lamia_hb
if %bwait=215 goto *lamiab_h



*zukan_granberia2

mov $zname,"Granberia"
mov $zlavel,"granberia2"
itoa2 $zukan_ko,%2529
mov %zukan_hyouzyonum,5
mov %zukan_pozunum,3
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2529=0 mov %ryozyoku1,0
if %2529>0 mov %ryozyoku1,1
if %2529=0 mov %zukancg,0
if %2529>0 mov %zukancg,1
mov %zukan_x1,-185
mov %zukan_x2,0
mov $zukan_lv,"PQU"
mov $zukan_hp,"QSOOO"
mov %zukan_skillc1,0
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_granberia2_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\grand2.jpg",400,100
goto *zukan_kihonbtn



*zukan_granberia2_p

if %zukan_pozu=1 && %zukan_hyouzyo=7 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,6
if %zukan_pozu=2 && %zukan_hyouzyo=4 mov %zukan_hyouzyo,1
if %zukan_pozu=2 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,3
if %zukan_pozu=3 && %zukan_hyouzyo=3 mov %zukan_hyouzyo,1
if %zukan_pozu=3 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,2
if %zukan_pozu=4 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,3
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\granberia_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\granberia_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\granberia_st03.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\granberia_st04.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=5 lsp 450,":a;chara\granberia_st05.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=6 lsp 450,":a;chara\granberia_st06.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\granberia_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\granberia_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\granberia_st13.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\granberia_st41.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\granberia_st42.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\granberia_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\granberia_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\granberia_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_pozu>1 cspl 441,443
return



*zukan_granberia2_cg

lsp 500,":c;bg\bg044.bmp",0,0
lsp 430,":a;chara\granberia_st03.bmp",11,0
lsp 420,":a;chara\granberia_ct01.bmp",247,-122
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\granberia_ct02.bmp",247,-122
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\granberia_ct03.bmp",247,-122
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\granberia_ct04.bmp",247,-122
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_granberia2_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,14
mov %skill01,5
mov %item01,7
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *granberia2_start
if %bwait=211 mov %nanido,2:goto *granberia2_start
if %bwait=212 mov %nanido,3:goto *granberia2_start
lsp 700,":a;chara\granberia_st03.bmp",11,0
bg "bg\bg044.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Granberia"
if %bwait=213 goto *granberia2_h



*zukan_page17

mov $zname,"Page 17"
mov $zlavel,"page17"
itoa2 $zukan_ko,%2530
mov %zukan_hyouzyonum,1
mov %zukan_pozunum,1
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2530=0 mov %ryozyoku1,0
if %2530>0 mov %ryozyoku1,1
if %2530=0 mov %zukancg,0
if %2530>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PT"
mov $zukan_hp,"PUO"
mov $zukan_skill1,"Sweet Pacifier"
mov %zukan_skillc1,3090
mov $zukan_skill2,"Sweet Tit Fuck"
mov %zukan_skillc2,3091
mov $zukan_skill3,"Pacifier Paralysis"
mov %zukan_skillc3,3092
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_page17_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\p17.jpg",400,100
goto *zukan_kihonbtn



*zukan_page17_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\page17_st01.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\page17_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\page17_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\page17_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
return



*zukan_page17_cg

lsp 500,":c;bg\bg046.bmp",0,0
lsp 420,":a;chara\page17_ct01.bmp",0,0
lsp 430,":a;chara\page17_st01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 423,":a;chara\page17_bk03.bmp",0,0
lsp 420,":a;chara\page17_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\page17_ct03.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_page17_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,15
mov %skill01,5
mov %item01,7
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *page17_start
if %bwait=211 mov %nanido,2:goto *page17_start
if %bwait=212 mov %nanido,3:goto *page17_start
lsp 700,":a;chara\page17_st01.bmp",0,0
bg "bg\bg046.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *page17_h



*zukan_page257

mov $zname,"Page 257"
mov $zlavel,"page257"
itoa2 $zukan_ko,%2531
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,2
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2531=0 mov %ryozyoku1,0
if %2531>0 mov %ryozyoku1,1
if %2531=0 mov %zukancg,0
if %2531>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PT"
mov $zukan_hp,"TOO"
mov $zukan_skill1,"Poke"
mov %zukan_skillc1,3093
mov $zukan_skill2,"Stroke"
mov %zukan_skillc2,3094
mov $zukan_skill3,"Handjob"
mov %zukan_skillc3,3095
mov $zukan_skill4,"Fiddle"
mov %zukan_skillc4,3096
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_page257_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\p257.jpg",400,100
goto *zukan_kihonbtn



*zukan_page257_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\page257_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\page257_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\page257_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\page257_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\page257_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
return



*zukan_page257_cg

lsp 500,":c;bg\bg046.bmp",0,0
lsp 430,":a;chara\page257_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\page257_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\page257_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\page257_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\page257_ct04.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_page257_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,15
mov %skill01,5
mov %item01,7
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *page257_start
if %bwait=211 mov %nanido,2:goto *page257_start
if %bwait=212 mov %nanido,3:goto *page257_start
lsp 700,":a;chara\page257_h1.bmp",0,0
lsp 690,":a;chara\page257_ct02.bmp",0,0
bg "bg\bg046.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *page257_h



*zukan_page65537

mov $zname,"Page 65537"
mov $zlavel,"page65537"
itoa2 $zukan_ko,%2532
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,3
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2532=0 mov %ryozyoku1,0
if %2532>0 mov %ryozyoku1,1
if %2532=0 mov %zukancg,0
if %2532>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"QS"
mov $zukan_hp,"QPOO"
mov $zukan_skill1,"Tentacle Massage"
mov %zukan_skillc1,3097
mov $zukan_skill2,"Tentacle Hell"
mov %zukan_skillc2,3098
mov $zukan_skill3,"Forced Semen Squeeze"
mov %zukan_skillc3,3099
mov $zukan_skill4,"Eyes of Paralysis"
mov %zukan_skillc4,3100
mov $zukan_skill5,"Eyes of Submission"
mov %zukan_skillc5,3101
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_page65537_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\p65537.jpg",400,100
goto *zukan_kihonbtn



*zukan_page65537_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu<3 && %zukan_hyouzyo=3 mov %zukan_hyouzyo,1
if %zukan_pozu<3 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,2
if %zukan_pozu=3 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=3 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\page65537_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\page65537_st02.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\page65537_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\page65537_st12.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\page65537_st21.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\page65537_st22.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=3 lsp 450,":a;chara\page65537_st23.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_bukkake1=1 lsp 441,":a;chara\page65537_bk01a.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake1=1 lsp 441,":a;chara\page65537_bk01b.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_bukkake1=1 lsp 441,":a;chara\page65537_bk01c.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_pozu=1 && %zukan_bukkake2=1 lsp 442,":a;chara\page65537_bk02a.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake2=1 lsp 442,":a;chara\page65537_bk02b.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_bukkake2=1 lsp 442,":a;chara\page65537_bk02c.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_pozu=1 && %zukan_bukkake3=1 lsp 443,":a;chara\page65537_bk03a.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake3=1 lsp 443,":a;chara\page65537_bk03b.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_bukkake3=1 lsp 443,":a;chara\page65537_bk03c.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\page65537_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\page65537_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_page65537_cg

lsp 500,":c;bg\bg046.bmp",0,0
lsp 430,":a;chara\page65537_h1a.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\page65537_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\page65537_h2a.bmp",0,0
lsp 420,":a;chara\page65537_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\page65537_h3a.bmp",0,0
lsp 420,":a;chara\page65537_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\page65537_h1b.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\page65537_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\page65537_h2b.bmp",0,0
lsp 420,":a;chara\page65537_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\page65537_h3b.bmp",0,0
lsp 420,":a;chara\page65537_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\page65537_h1c.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\page65537_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\page65537_h2c.bmp",0,0
lsp 420,":a;chara\page65537_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\page65537_h3c.bmp",0,0
lsp 420,":a;chara\page65537_ct03.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_page65537_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,15
mov %skill01,5
mov %item01,7
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *page65537_start
if %bwait=211 mov %nanido,2:goto *page65537_start
if %bwait=212 mov %nanido,3:goto *page65537_start
mov %sinkou,6
lsp 700,":a;chara\page65537_st22.bmp",0,0
bg "bg\bg046.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *page65537_h



*zukan_kani

mov $zname,"Crab Girl"
mov $zlavel,"kani"
itoa2 $zukan_ko,%2533
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,2
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2533=0 mov %ryozyoku1,0
if %2533>0 mov %ryozyoku1,1
if %2533=0 mov %zukancg,0
if %2533>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PU"
mov $zukan_hp,"STO"
mov $zukan_skill1,"Washwash"
mov %zukan_skillc1,3102
mov $zukan_skill2,"Bubble Wash"
mov %zukan_skillc2,3103
mov $zukan_skill3,"Bubble Scrub"
mov %zukan_skillc3,3104
mov $zukan_skill4,"Bubble Handjob"
mov %zukan_skillc4,3105
mov $zukan_skill5,"Full-Body Bubble Massage"
mov %zukan_skillc5,3106
mov $zukan_skill6,"Melty Wash"
mov %zukan_skillc6,3107
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_kani_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\crab.jpg",400,100
goto *zukan_kihonbtn



*zukan_kani_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=2 mov %zukan_hyouzyonum,1
if %zukan_pozu<>2 mov %zukan_hyouzyonum,3
if %zukan_pozu=1 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=2 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\kani_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\kani_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\kani_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 lsp 450,":a;chara\kani_st00.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\kani_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\kani_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\kani_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\kani_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_pozu=2 csp 444
return



*zukan_kani_cg

lsp 500,":c;bg\bg039.bmp",0,0
lsp 430,":a;chara\kani_st11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kani_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kani_ct02.bmp",0,0
lsp 430,":a;chara\kani_st12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kani_ct03.bmp",0,0
lsp 430,":a;chara\kani_st13.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kani_ct11.bmp",0,0
lsp 430,":a;chara\kani_st11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kani_ct12.bmp",0,0
lsp 430,":a;chara\kani_st12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kani_ct13.bmp",0,0
lsp 430,":a;chara\kani_st13.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_kani_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,16
mov %skill01,5
mov %item01,8
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *kani_start
if %bwait=211 mov %nanido,2:goto *kani_start
if %bwait=212 mov %nanido,3:goto *kani_start
lsp 700,":a;chara\kani_st02.bmp",0,0
bg "bg\bg039.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Crab Girl"
if %bwait=213 goto *kani_h



*zukan_kurage

mov $zname,"Jellyfish Girl"
mov $zlavel,"kurage"
itoa2 $zukan_ko,%2534
mov %zukan_hyouzyonum,2
mov %zukan_pozunum,1
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2534=0 mov %ryozyoku1,0
if %2534>0 mov %ryozyoku1,1
if %2534=0 mov %zukancg,0
if %2534>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PU"
mov $zukan_hp,"TTO"
mov $zukan_skill1,"Tentacle Caress"
mov %zukan_skillc1,3108
mov $zukan_skill2,"Paralytic Tentacle"
mov %zukan_skillc2,3109
mov $zukan_skill3,"Tentacle Penis Torture"
mov %zukan_skillc3,3110
mov $zukan_skill4,"Jelly Prison"
mov %zukan_skillc4,3111
mov $zukan_skill5,"Predation"
mov %zukan_skillc5,3112
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_kurage_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\jelly.jpg",400,100
goto *zukan_kihonbtn



*zukan_kurage_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\kurage_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\kurage_st02.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\kurage_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\kurage_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\kurage_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\kurage_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
return



*zukan_kurage_cg

lsp 500,":c;bg\bg050.bmp",0,0
lsp 430,":a;chara\kurage_st02.bmp",0,0
lsp 420,":a;chara\kurage_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kurage_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kurage_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kurage_ctb01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kurage_ctb02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kurage_ctb03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kurage_ctb04.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_kurage_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,16
mov %skill01,5
mov %item01,8
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *kurage_start
if %bwait=211 mov %nanido,2:goto *kurage_start
if %bwait=212 mov %nanido,3:goto *kurage_start
lsp 700,":a;chara\kurage_st02.bmp",0,0
bg "bg\bg050.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *kurage_h



*zukan_iso

mov $zname,"Sea Anemone Girl"
mov $zlavel,"iso"
itoa2 $zukan_ko,%2535
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2535=0 mov %ryozyoku1,0
if %2535>0 mov %ryozyoku1,1
if %2535=0 mov %zukancg,0
if %2535>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PU"
mov $zukan_hp,"PUO"
mov $zukan_skill1,"Tentacle Penis Caress"
mov %zukan_skillc1,3113
mov $zukan_skill2,"Full-Body Tentacle Caress"
mov %zukan_skillc2,3114
mov $zukan_skill3,"Tentacle Trance"
mov %zukan_skillc3,3115
mov $zukan_skill4,"Semen Squeeze Movement"
mov %zukan_skillc4,3116
mov $zukan_skill5,"Predation"
mov %zukan_skillc5,3117
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_iso_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\anemone.jpg",400,100
goto *zukan_kihonbtn



*zukan_iso_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\iso_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\iso_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\iso_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\iso_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\iso_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\iso_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\iso_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\iso_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_iso_cg

lsp 500,":c;bg\bg051.bmp",0,0
lsp 430,":a;chara\iso_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\iso_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\iso_h2.bmp",0,0
lsp 420,":a;chara\iso_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\iso_h3.bmp",0,0
csp 420
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\iso_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\iso_h4.bmp",0,0
lsp 420,":a;chara\iso_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\iso_h5.bmp",0,0
lsp 420,":a;chara\iso_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\iso_ct04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\iso_h6.bmp",0,0
csp 420
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\iso_ctb01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\iso_ctb02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\iso_ctb03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\iso_ctb04.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_iso_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,16
mov %skill01,5
mov %item01,8
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *iso_start
if %bwait=211 mov %nanido,2:goto *iso_start
if %bwait=212 mov %nanido,3:goto *iso_start
lsp 700,":a;chara\iso_st02.bmp",0,0
bg "bg\bg051.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *iso_h



*zukan_ankou

mov $zname,"Anglerfish Girl"
mov $zlavel,"ankou"
itoa2 $zukan_ko,%2536
mov %zukan_hyouzyonum,1
mov %zukan_pozunum,1
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2536=0 mov %ryozyoku1,0
if %2536>0 mov %ryozyoku1,1
if %2536=0 mov %zukancg,0
if %2536>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PU"
mov $zukan_hp,"QVO"
mov $zukan_skill1,"Absorb"
mov %zukan_skillc1,3118
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_ankou_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\angler.jpg",400,100
goto *zukan_kihonbtn



*zukan_ankou_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\ankou_st01.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\ankou_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\ankou_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\ankou_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
return



*zukan_ankou_cg

lsp 500,":c;bg\bg052.bmp",0,0
lsp 430,":a;chara\ankou_st01.bmp",0,0
lsp 420,":a;chara\ankou_cta01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\ankou_cta02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\ankou_cta03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\ankou_ctb01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\ankou_ctb02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\ankou_ctb03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\ankou_ctb04.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_ankou_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,16
mov %skill01,5
mov %item01,8
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *ankou_start
if %bwait=211 mov %nanido,2:goto *ankou_start
if %bwait=212 mov %nanido,3:goto *ankou_start
lsp 700,":a;chara\ankou_st01.bmp",0,0
bg "bg\bg052.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *ankou_h



*zukan_kraken

mov $zname,"Kraken"
mov $zlavel,"kraken"
itoa2 $zukan_ko,%2537
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2537=0 mov %ryozyoku1,0
if %2537>0 mov %ryozyoku1,1
if %2537=0 mov %zukancg,0
if %2537>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"UO"
mov $zukan_hp,"SVOO"
mov $zukan_skill1,"Tentacle Caress"
mov %zukan_skillc1,3119
mov $zukan_skill2,"Tentacle Raid"
mov %zukan_skillc2,3120
mov $zukan_skill3,"Bound Tentacle Caress"
mov %zukan_skillc3,3121
mov $zukan_skill4,"Bound Tentacle Raid"
mov %zukan_skillc4,3122
mov $zukan_skill5,"Tentacle Smash"
mov %zukan_skillc5,3123
mov $zukan_skill6,"Tentacle Heaven"
mov %zukan_skillc6,3124
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_kraken_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\kraken.jpg",400,100
goto *zukan_kihonbtn



*zukan_kraken_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\kraken_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\kraken_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\kraken_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\kraken_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\kraken_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\kraken_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\kraken_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
return



*zukan_kraken_cg

lsp 500,":c;bg\bg053.bmp",0,0
lsp 430,":a;chara\kraken_st11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kraken_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kraken_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kraken_h2a.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kraken_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kraken_h3a.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kraken_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kraken_h5.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_kraken_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,17
mov %skill01,5
mov %item01,8
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *kraken_start
if %bwait=211 mov %nanido,2:goto *kraken_start
if %bwait=212 mov %nanido,3:goto *kraken_start
lsp 700,":a;chara\kraken_st02.bmp",0,0
bg "bg\bg053.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *kraken_h



*zukan_meia

mov $zname,"Meia"
mov $zlavel,"meia"
mov $zukan_ko,"None "
mov %zukan_hyouzyonum,4
mov %zukan_pozunum,1
mov %zukan_bukkakenum,0
mov %zukan_sentounum,0
mov %zukan_ryozyokunum,1
mov %ryozyoku1,1
mov %zukancg,1
mov %zukan_x1,-150
mov %zukan_x2,0
mov $zukan_lv,"PV"
mov $zukan_hp,"TOO"
mov %zukan_skillc1,0
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_meia_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\meia.jpg",400,100
goto *zukan_kihonbtn



*zukan_meia_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\meia_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\meia_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\meia_st03.bmp",%zukan_x0,0
if %zukan_hyouzyo=4 lsp 450,":a;chara\meia_st04.bmp",%zukan_x0,0
return



*zukan_meia_cg

lsp 500,":c;bg\bg049.bmp",0,0
lsp 430,":a;chara\meia_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\meia_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\meia_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\meia_h4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_meia_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,17
mov %skill01,5
mov %item01,8
gosub *setwindow_01
lsp 700,":a;chara\meia_st02.bmp",0,0
bg "bg\bg049.bmp",10,1500
bgm "bgm\city1.ogg"
if %bwait=213 goto *sean0107a



*zukan_ghost

mov $zname,"Ghost Girl"
mov $zlavel,"ghost"
itoa2 $zukan_ko,%2538
mov %zukan_hyouzyonum,2
mov %zukan_pozunum,1
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2538=0 mov %ryozyoku1,0
if %2538>0 mov %ryozyoku1,1
if %2538=0 mov %zukancg,0
if %2538>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PV"
mov $zukan_hp,"SWO"
mov $zukan_skill1,"Ghost Blowjob"
mov %zukan_skillc1,3125
mov $zukan_skill2,"Ghost Tit Fuck"
mov %zukan_skillc2,3126
mov $zukan_skill3,"Ghost Handjob"
mov %zukan_skillc3,3127
mov $zukan_skill4,"Ghost Rape"
mov %zukan_skillc4,3128
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_ghost_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\ghost.jpg",400,100
goto *zukan_kihonbtn



*zukan_ghost_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\ghost_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\ghost_st02.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\ghost_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\ghost_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\ghost_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\ghost_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
return



*zukan_ghost_cg

lsp 500,":c;bg\bg055.bmp",0,0
lsp 430,":a;chara\ghost_st11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\ghost_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\ghost_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\ghost_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\ghost_ct04.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_ghost_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,17
mov %skill01,5
mov %item01,8
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *ghost_start
if %bwait=211 mov %nanido,2:goto *ghost_start
if %bwait=212 mov %nanido,3:goto *ghost_start
lsp 700,":a;chara\ghost_st02.bmp",0,0
bg "bg\bg055.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *ghost_h



*zukan_doll

mov $zname,"Cursed Doll"
mov $zlavel,"doll"
itoa2 $zukan_ko,%2539
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,2
if %2816=0 mov %ryozyoku1,0
if %2816>0 mov %ryozyoku1,1
if %2817=0 mov %ryozyoku2,0
if %2817>0 mov %ryozyoku2,1
if %2539=0 mov %zukancg,0
if %2539>0 mov %zukancg,1
mov %zukan_x1,-20
mov %zukan_x2,180
mov $zukan_lv,"PV"
mov $zukan_hp,"UWO"
mov $zukan_skill1,"Playful Handjob"
mov %zukan_skillc1,3129
mov $zukan_skill2,"Playful Hug"
mov %zukan_skillc2,3130
mov $zukan_skill3,"Playful Hair"
mov %zukan_skillc3,3131
mov $zukan_skill4,"Soul Sucking Hair"
mov %zukan_skillc4,3132
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_doll_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\doll.jpg",400,100
goto *zukan_kihonbtn



*zukan_doll_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\doll_st01.bmp",%zukan_x0,50
if %zukan_hyouzyo=2 lsp 450,":a;chara\doll_st02.bmp",%zukan_x0,50
if %zukan_hyouzyo=3 lsp 450,":a;chara\doll_st03.bmp",%zukan_x0,50
if %zukan_bukkake1=1 lsp 441,":a;chara\doll_bk01.bmp",%zukan_x0,50
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\doll_bk02.bmp",%zukan_x0,50
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\doll_bk03.bmp",%zukan_x0,50
if %zukan_bukkake3=0 csp 443
return



*zukan_doll_cg

if %2816=0 skip 7
lsp 430,":c;chara\doll_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\doll_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\doll_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %2817=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\doll_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\doll_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\doll_hb3.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_doll_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,17
mov %skill01,5
mov %item01,8
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *doll_start
if %bwait=211 mov %nanido,2:goto *doll_start
if %bwait=212 mov %nanido,3:goto *doll_start
lsp 700,":a;chara\doll_st02.bmp",180,50
bg "bg\bg056.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *doll_ha
if %bwait=214 goto *doll_hb



*zukan_zonbe

mov $zname,"Zombie Girl"
mov $zlavel,"zonbe"
itoa2 $zukan_ko,%2540
mov %zukan_hyouzyonum,1
mov %zukan_pozunum,1
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2540=0 mov %ryozyoku1,0
if %2540>0 mov %ryozyoku1,1
if %2540=0 mov %zukancg,0
if %2540>0 mov %zukancg,1
mov %zukan_x1,45
mov %zukan_x2,245
mov $zukan_lv,"PW"
mov $zukan_hp,"PSOO"
mov $zukan_skill1,"Corrupted Kiss"
mov %zukan_skillc1,3086
mov $zukan_skill2,"Thirsting Mouth"
mov %zukan_skillc2,3087
mov $zukan_skill3,"Pointless Mating"
mov %zukan_skillc3,3133
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_zonbe_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\zombie.jpg",400,100
goto *zukan_kihonbtn



*zukan_zonbe_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\zonbe_st11.bmp",%zukan_x0,82
if %zukan_bukkake1=1 lsp 441,":a;chara\zonbe_bk11.bmp",%zukan_x0,82
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\zonbe_bk12.bmp",%zukan_x0,82
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\zonbe_bk13.bmp",%zukan_x0,82
if %zukan_bukkake3=0 csp 443
return



*zukan_zonbe_cg

lsp 430,":c;chara\zonbe_h0.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\zonbe_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\zonbe_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\zonbe_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\zonbe_h4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_zonbe_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,18
mov %skill01,5
mov %item01,8
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *zonbe_start
if %bwait=211 mov %nanido,2:goto *zonbe_start
if %bwait=212 mov %nanido,3:goto *zonbe_start
lsp 700,":a;chara\zonbe_st11.bmp",245,82
lsp 691,":a;chara\zonbe_bk11.bmp",245,82
bg "bg\bg057.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *zonbe_h



*zukan_zonbes

mov $zname,"Zombie Girls (Group)"
mov $zlavel,"zonbes"
itoa2 $zukan_ko,%2541
mov %zukan_hyouzyonum,2
mov %zukan_pozunum,3
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2541=0 mov %ryozyoku1,0
if %2541>0 mov %ryozyoku1,1
if %2541=0 mov %zukancg,0
if %2541>0 mov %zukancg,1
mov %zukan_x1,80
mov %zukan_x2,280
mov $zukan_lv,"PW"
mov $zukan_hp,"QSOO"
mov $zukan_skill1,"Corrupted Nipple Lick"
mov %zukan_skillc1,3134
mov $zukan_skill2,"Corrupted Bite"
mov %zukan_skillc2,3135
mov $zukan_skill3,"Corrupted Tit Fuck"
mov %zukan_skillc3,3136
mov $zukan_skill4,"Pointless Mating"
mov %zukan_skillc4,3137
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_zonbes_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\group.jpg",400,100
goto *zukan_kihonbtn



*zukan_zonbes_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\zonbe_st21.bmp",%zukan_x0,96
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\zonbe_st22.bmp",%zukan_x0,96
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\zonbe_st31.bmp",%zukan_x0-35,31
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\zonbe_st32.bmp",%zukan_x0-35,31
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\zonbe_st41.bmp",%zukan_x0-61,12
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\zonbe_st42.bmp",%zukan_x0-61,12
if %zukan_bukkake1=1 && %zukan_pozu=1 lsp 441,":a;chara\zonbe_bk21.bmp",%zukan_x0,96
if %zukan_bukkake1=1 && %zukan_pozu=2 lsp 441,":a;chara\zonbe_bk31.bmp",%zukan_x0-35,31
if %zukan_bukkake1=1 && %zukan_pozu=3 lsp 441,":a;chara\zonbe_bk41.bmp",%zukan_x0-61,12
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 && %zukan_pozu=1 lsp 442,":a;chara\zonbe_bk22.bmp",%zukan_x0,96
if %zukan_bukkake2=1 && %zukan_pozu=2 lsp 442,":a;chara\zonbe_bk32.bmp",%zukan_x0-35,31
if %zukan_bukkake2=1 && %zukan_pozu=3 lsp 442,":a;chara\zonbe_bk42.bmp",%zukan_x0-61,12
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 && %zukan_pozu=1 lsp 443,":a;chara\zonbe_bk23.bmp",%zukan_x0,96
if %zukan_bukkake3=1 && %zukan_pozu=2 lsp 443,":a;chara\zonbe_bk33.bmp",%zukan_x0-35,31
if %zukan_bukkake3=1 && %zukan_pozu=3 lsp 443,":a;chara\zonbe_bk43.bmp",%zukan_x0-61,12
if %zukan_bukkake3=0 csp 443
return



*zukan_zonbes_cg

lsp 430,":c;chara\zonbes_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\zonbes_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\zonbes_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\zonbes_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\zonbes_h5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\zonbes_h6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\zonbes_h7.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_zonbes_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,18
mov %skill01,5
mov %item01,8
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *zonbes_start
if %bwait=211 mov %nanido,2:goto *zonbes_start
if %bwait=212 mov %nanido,3:goto *zonbes_start
lsp 700,":a;chara\zonbe_st41.bmp",420,12
lsp 701,":a;chara\zonbe_st31.bmp",0,31
lsp 702,":a;chara\zonbe_st21.bmp",270,96
bg "bg\bg057.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *zonbes_h



*zukan_frederika

mov $zname,"Frederika"
mov $zlavel,"frederika"
itoa2 $zukan_ko,%2542
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,3
mov %zukan_bukkakenum,7
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2542=0 mov %ryozyoku1,0
if %2542>0 mov %ryozyoku1,1
if %2542=0 mov %zukancg,0
if %2542>0 mov %zukancg,1
mov %zukan_x1,-72
mov %zukan_x2,88
mov $zukan_lv,"QV"
mov $zukan_hp,"QPOO"
mov $zukan_skill1,"Corrupted Intercrural"
mov %zukan_skillc1,3138
mov $zukan_skill2,"Corrupted Blowjob"
mov %zukan_skillc2,3139
mov $zukan_skill3,"Corrupted Tit Fuck"
mov %zukan_skillc3,3140
mov $zukan_skill4,"Immoral Trio"
mov %zukan_skillc4,3141
mov $zukan_skill5,"Corrupted Footjob"
mov %zukan_skillc5,3142
mov $zukan_skill6,"Pointless Mating"
mov %zukan_skillc6,3143
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_frederika_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\fred.jpg",400,100
goto *zukan_kihonbtn



*zukan_frederika_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=3 mov %zukan_hyouzyonum,1
if %zukan_pozu<>3 mov %zukan_hyouzyonum,3
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=3 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\frederika_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\frederika_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\frederika_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\frederika_st11.bmp",%zukan_x0+150,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\frederika_st12.bmp",%zukan_x0+150,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\frederika_st13.bmp",%zukan_x0+150,0
if %zukan_pozu=3 lsp 450,":a;chara\frederika_st21.bmp",%zukan_x0+102,0
if %zukan_bukkake1=1 lsp 441,":a;chara\frederika_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\frederika_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\frederika_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\frederika_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\frederika_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\frederika_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
if %zukan_bukkake7=1 lsp 447,":a;chara\frederika_bk07.bmp",%zukan_x0,0
if %zukan_bukkake7=0 csp 447
notif %zukan_pozu=1 cspl 441,447
return



*zukan_frederika_cg

lsp 430,":c;chara\frederika_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\frederika_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\frederika_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\frederika_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\frederika_tuika.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\chrom_tuika.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_frederika_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,18
mov %skill01,5
mov %item01,8
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *frederika_start
if %bwait=211 mov %nanido,2:goto *frederika_start
if %bwait=212 mov %nanido,3:goto *frederika_start
lsp 700,":a;chara\frederika_st02.bmp",88,0
bg "bg\bg055.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *frederika_h



*zukan_chrom

mov $zname,"Chrome"
mov $zlavel,"chrom"
itoa2 $zukan_ko,%2543
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,2
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2543=0 mov %ryozyoku1,0
if %2543>0 mov %ryozyoku1,1
if %2543=0 mov %zukancg,0
if %2543>0 mov %zukancg,1
mov %zukan_x1,-25
mov %zukan_x2,175
mov $zukan_lv,"QP"
mov $zukan_hp,"PQOO"
mov $zukan_skill1,"Thirsting Arms"
mov %zukan_skillc1,3144
mov $zukan_skill2,"Thirsting Mouth"
mov %zukan_skillc2,3145
mov $zukan_skill3,"I'll Give an Injection!"
mov %zukan_skillc3,3146
mov $zukan_skill4,"I'll Give a Handjob!"
mov %zukan_skillc4,3147
mov $zukan_skill5,"I'll Give a Blowjob!"
mov %zukan_skillc5,3148
mov $zukan_skill6,"I'll Rape You!"
mov %zukan_skillc6,3149
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_chrom_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\chrome.jpg",400,100
goto *zukan_kihonbtn



*zukan_chrom_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\chrom_st11.bmp",%zukan_x0,60
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\chrom_st12.bmp",%zukan_x0,60
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\chrom_st13.bmp",%zukan_x0,60
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\chrom_st01.bmp",%zukan_x0+77,150
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\chrom_st02.bmp",%zukan_x0+77,150
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\chrom_st03.bmp",%zukan_x0+77,150
if %zukan_bukkake1=1 lsp 441,":a;chara\chrom_bk01.bmp",%zukan_x0,60
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\chrom_bk02.bmp",%zukan_x0,60
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\chrom_bk03.bmp",%zukan_x0,60
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\chrom_bk04.bmp",%zukan_x0,60
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\chrom_bk05.bmp",%zukan_x0,60
if %zukan_bukkake5=0 csp 445
if %zukan_pozu=2 cspl 441,445
return



*zukan_chrom_cg

lsp 430,":c;chara\chrom_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\chrom_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\chrom_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\chrom_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\chrom_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\chrom_hb3.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_chrom_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,18
mov %skill01,5
mov %item01,8
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *chrom_start
if %bwait=211 mov %nanido,2:goto *chrom_start
if %bwait=212 mov %nanido,3:goto *chrom_start
lsp 700,":a;chara\chrom_st12.bmp",175,60
bg "bg\bg058.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Chrome"
if %bwait=213 goto *chrom_h



*zukan_fairy

mov $zname,"Fairy"
mov $zlavel,"fairy"
itoa2 $zukan_ko,%2544
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2544=0 mov %ryozyoku1,0
if %2544>0 mov %ryozyoku1,1
if %2544=0 mov %zukancg,0
if %2544>0 mov %zukancg,1
mov %zukan_x1,70
mov %zukan_x2,270
mov $zukan_lv,"PV"
mov $zukan_hp,"UOO"
mov $zukan_skill1,"Succubus Flower"
mov %zukan_skillc1,3150
mov $zukan_skill2,"Wing Tickle"
mov %zukan_skillc2,3151
mov $zukan_skill3,"Fairy Pranks"
mov %zukan_skillc3,3152
mov $zukan_skill4,"Fairy Hug"
mov %zukan_skillc4,3153
mov $zukan_skill5,"Fairy Dance"
mov %zukan_skillc5,3154
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_fairy_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\fairy.jpg",400,100
goto *zukan_kihonbtn



*zukan_fairy_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\fairy_st01.bmp",%zukan_x0,130
if %zukan_hyouzyo=2 lsp 450,":a;chara\fairy_st02.bmp",%zukan_x0,130
if %zukan_hyouzyo=3 lsp 450,":a;chara\fairy_st03.bmp",%zukan_x0,130
if %zukan_bukkake1=1 lsp 441,":a;chara\fairy_bk01.bmp",%zukan_x0,130
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\fairy_bk02.bmp",%zukan_x0,130
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\fairy_bk03.bmp",%zukan_x0,130
if %zukan_bukkake3=0 csp 443
return



*zukan_fairy_cg

lsp 500,":c;bg\bg061.bmp",0,0
lsp 420,":a;chara\fairy_ct01.bmp",0,0
lsp 430,":a;chara\fairy_st02.bmp",270,130
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 423,":a;chara\fairy_bk03.bmp",270,130
lsp 420,":a;chara\fairy_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 423
lsp 420,":a;chara\fairy_ct11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\fairy_ct12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 421,":a;chara\fairy_bk01.bmp",270,130
lsp 420,":a;chara\fairy_ct13.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_fairy_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,18
mov %skill01,6
mov %item01,8
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *fairy_start
if %bwait=211 mov %nanido,2:goto *fairy_start
if %bwait=212 mov %nanido,3:goto *fairy_start
lsp 700,":a;chara\fairy_st02.bmp",270,130
bg "bg\bg061.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *fairy_h



*zukan_elf

mov $zname,"Elf"
mov $zlavel,"elf"
itoa2 $zukan_ko,%2545
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2545=0 mov %ryozyoku1,0
if %2545>0 mov %ryozyoku1,1
if %2545=0 mov %zukancg,0
if %2545>0 mov %zukancg,1
mov %zukan_x1,-100
mov %zukan_x2,100
mov $zukan_lv,"PW"
mov $zukan_hp,"VOO"
mov $zukan_skill1,"Elf Handjob"
mov %zukan_skillc1,3155
mov $zukan_skill2,"Elf Blowjob"
mov %zukan_skillc2,3156
mov $zukan_skill3,"Elf Tit Fuck"
mov %zukan_skillc3,3157
mov $zukan_skill4,"Elf Waist Shake"
mov %zukan_skillc4,3158
mov $zukan_skill5,"Elf Tightening"
mov %zukan_skillc5,3159
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_elf_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\elf.jpg",400,100
goto *zukan_kihonbtn



*zukan_elf_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\elf_st01.bmp",%zukan_x0,-100
if %zukan_hyouzyo=2 lsp 450,":a;chara\elf_st02.bmp",%zukan_x0,-100
if %zukan_hyouzyo=3 lsp 450,":a;chara\elf_st03.bmp",%zukan_x0,-100
if %zukan_bukkake1=1 lsp 441,":a;chara\elf_bk01.bmp",%zukan_x0,-100
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\elf_bk02.bmp",%zukan_x0,-100
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\elf_bk03.bmp",%zukan_x0,-100
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\elf_bk04.bmp",%zukan_x0,-100
if %zukan_bukkake4=0 csp 444
return



*zukan_elf_cg

lsp 500,":c;bg\bg061.bmp",0,0
lsp 430,":a;chara\elf_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\elf_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\elf_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\elf_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\elf_h5.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_elf_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,18
mov %skill01,6
mov %item01,8
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *elf_start
if %bwait=211 mov %nanido,2:goto *elf_start
if %bwait=212 mov %nanido,3:goto *elf_start
lsp 700,":a;chara\elf_st02.bmp",100,-100
bg "bg\bg061.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *elf_h



*zukan_tfairy

mov $zname,"Twin Fairies"
mov $zlavel,"tfairy"
itoa2 $zukan_ko,%2546
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2546=0 mov %ryozyoku1,0
if %2546>0 mov %ryozyoku1,1
if %2546=0 mov %zukancg,0
if %2546>0 mov %zukancg,1
mov %zukan_x1,20
mov %zukan_x2,220
mov $zukan_lv,"PX"
mov $zukan_hp,"VOO"
mov $zukan_skill1,"Succubus Flower"
mov %zukan_skillc1,3160
mov $zukan_skill2,"Twin Wing Tickle"
mov %zukan_skillc2,3161
mov $zukan_skill3,"Twin Fairy Pranks"
mov %zukan_skillc3,3162
mov $zukan_skill4,"Twin Fairy Hug"
mov %zukan_skillc4,3163
mov $zukan_skill5,"Twin Fairy Dance"
mov %zukan_skillc5,3164
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_tfairy_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\ftwins.jpg",400,100
goto *zukan_kihonbtn



*zukan_tfairy_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\tfairy_st01.bmp",%zukan_x0,130
if %zukan_hyouzyo=2 lsp 450,":a;chara\tfairy_st02.bmp",%zukan_x0,130
if %zukan_hyouzyo=3 lsp 450,":a;chara\tfairy_st03.bmp",%zukan_x0,130
if %zukan_bukkake1=1 lsp 441,":a;chara\tfairy_bk01.bmp",%zukan_x0,130
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\tfairy_bk02.bmp",%zukan_x0,130
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\tfairy_bk03.bmp",%zukan_x0,130
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\tfairy_bk04.bmp",%zukan_x0,130
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\tfairy_bk05.bmp",%zukan_x0,130
if %zukan_bukkake5=0 csp 445
return



*zukan_tfairy_cg

lsp 500,":c;bg\bg061.bmp",0,0
lsp 420,":a;chara\tfairy_ct01.bmp",0,0
lsp 430,":a;chara\tfairy_st02.bmp",220,130
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\tfairy_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 424,":a;chara\tfairy_bk04.bmp",220,130
lsp 420,":a;chara\tfairy_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 424
lsp 420,":a;chara\tfairy_ct11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\tfairy_ct12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 425,":a;chara\tfairy_bk05.bmp",220,130
lsp 420,":a;chara\tfairy_ct13.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 425
lsp 420,":a;chara\tfairy_ct21.bmp",480,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\tfairy_ct22.bmp",480,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 421,":a;chara\tfairy_bk01.bmp",220,130
lsp 422,":a;chara\tfairy_bk02.bmp",220,130
lsp 420,":a;chara\tfairy_ct23.bmp",480,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_tfairy_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,19
mov %skill01,6
mov %item01,8
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *tfairy_start
if %bwait=211 mov %nanido,2:goto *tfairy_start
if %bwait=212 mov %nanido,3:goto *tfairy_start
lsp 700,":a;chara\tfairy_st02.bmp",220,130
bg "bg\bg061.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *tfairy_h



*zukan_fairys

mov $zname,"Fairies"
mov $zlavel,"fairys"
itoa2 $zukan_ko,%2547
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,3
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2547=0 mov %ryozyoku1,0
if %2547>0 mov %ryozyoku1,1
if %2547=0 mov %zukancg,0
if %2547>0 mov %zukancg,1
mov %zukan_x1,20
mov %zukan_x2,220
mov $zukan_lv,"QQ"
mov $zukan_hp,"XQT"
mov $zukan_skill1,"Group Tickle"
mov %zukan_skillc1,3165
mov $zukan_skill2,"Group Penis Tickle"
mov %zukan_skillc2,3166
mov $zukan_skill3,"Group Pranks"
mov %zukan_skillc3,3167
mov $zukan_skill4,"Group Dance"
mov %zukan_skillc4,3168
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_fairys_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\fairies.jpg",400,100
goto *zukan_kihonbtn



*zukan_fairys_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=1 && %zukan_pozu=1 lsp 450,":a;chara\fairys_st01.bmp",%zukan_x0,100
if %zukan_hyouzyo=2 && %zukan_pozu=1 lsp 450,":a;chara\fairys_st02.bmp",%zukan_x0,100
if %zukan_hyouzyo=3 && %zukan_pozu=1 lsp 450,":a;chara\fairys_st03.bmp",%zukan_x0,100
if %zukan_hyouzyo=1 && %zukan_pozu=2 lsp 450,":a;chara\fairys_st11.bmp",%zukan_x0+10,100
if %zukan_hyouzyo=2 && %zukan_pozu=2 lsp 450,":a;chara\fairys_st12.bmp",%zukan_x0+10,100
if %zukan_hyouzyo=3 && %zukan_pozu=2 lsp 450,":a;chara\fairys_st13.bmp",%zukan_x0+10,100
if %zukan_hyouzyo=1 && %zukan_pozu=3 lsp 450,":a;chara\fairys_st21.bmp",%zukan_x0-20,100
if %zukan_hyouzyo=2 && %zukan_pozu=3 lsp 450,":a;chara\fairys_st22.bmp",%zukan_x0-20,100
if %zukan_hyouzyo=3 && %zukan_pozu=3 lsp 450,":a;chara\fairys_st23.bmp",%zukan_x0-20,100
if %zukan_bukkake1=1 && %zukan_pozu=1 lsp 441,":a;chara\fairys_bk01.bmp",%zukan_x0,100
if %zukan_bukkake1=1 && %zukan_pozu=2 lsp 441,":a;chara\fairys_bk11.bmp",%zukan_x0+10,100
if %zukan_bukkake1=1 && %zukan_pozu=3 lsp 441,":a;chara\fairys_bk21.bmp",%zukan_x0-20,100
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 && %zukan_pozu=1 lsp 442,":a;chara\fairys_bk02.bmp",%zukan_x0,100
if %zukan_bukkake2=1 && %zukan_pozu=2 lsp 442,":a;chara\fairys_bk12.bmp",%zukan_x0+10,100
if %zukan_bukkake2=1 && %zukan_pozu=3 lsp 442,":a;chara\fairys_bk22.bmp",%zukan_x0-20,100
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 && %zukan_pozu=1 lsp 443,":a;chara\fairys_bk03.bmp",%zukan_x0,100
if %zukan_bukkake3=1 && %zukan_pozu=2 lsp 443,":a;chara\fairys_bk13.bmp",%zukan_x0+10,100
if %zukan_bukkake3=1 && %zukan_pozu=3 lsp 443,":a;chara\fairys_bk23.bmp",%zukan_x0-20,100
if %zukan_bukkake3=0 csp 443
return



*zukan_fairys_cg

lsp 430,":c;chara\fairys_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\fairys_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\fairys_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\fairys_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\fairys_h5.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_fairys_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,19
mov %skill01,6
mov %item01,8
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *fairys_start
if %bwait=211 mov %nanido,2:goto *fairys_start
if %bwait=212 mov %nanido,3:goto *fairys_start
lsp 700,":a;chara\fairys_st02.bmp",220,100
lsp 701,":a;chara\fairys_st12.bmp",0,50
lsp 702,":a;chara\fairys_st22.bmp",440,50
bg "bg\bg061.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *fairys_h



*zukan_sylph

mov $zname,"Sylph"
mov $zlavel,"sylph"
itoa2 $zukan_ko,%2548
mov %zukan_hyouzyonum,7
mov %zukan_pozunum,3
mov %zukan_bukkakenum,3
mov %zukan_sentounum,2
mov %zukan_ryozyokunum,1
if %2548=0 mov %ryozyoku1,0
if %2548>0 mov %ryozyoku1,1
if %2548=0 mov %zukancg,0
if %2548>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"TO"
mov $zukan_hp,"SOOO"
mov $zukan_skill1,"Tickling Wind"
mov %zukan_skillc1,3169
mov $zukan_skill2,"Wind of Pleasure"
mov %zukan_skillc2,3170
mov $zukan_skill3,"Wind of Ecstasy"
mov %zukan_skillc3,3171
mov $zukan_skill4,"Wind Serenade"
mov %zukan_skillc4,3172
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_sylph_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\sylph.jpg",400,100
goto *zukan_kihonbtn



*zukan_sylph_p

if %zukan_pozu=1 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=2 && %zukan_hyouzyo=3 mov %zukan_hyouzyo,1
if %zukan_pozu=2 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,2
if %zukan_pozu=3 && %zukan_hyouzyo=3 mov %zukan_hyouzyo,1
if %zukan_pozu=3 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,2
if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\sylph_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\sylph_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\sylph_st03.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\sylph_st04.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=5 lsp 450,":a;chara\sylph_st05.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=6 lsp 450,":a;chara\sylph_st06.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=7 lsp 450,":a;chara\sylph_st07.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\sylph_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\sylph_st12.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\sylph_st21.bmp",%zukan_x0,100
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\sylph_st22.bmp",%zukan_x0+155,100
if %zukan_pozu=1 && %zukan_bukkake1=1 lsp 441,":a;chara\sylph_bk01.bmp",%zukan_x0,0
if %zukan_pozu>1 && %zukan_bukkake1=1 csp 441
if %zukan_bukkake1=0 csp 441
if %zukan_pozu=1 && %zukan_bukkake2=1 lsp 442,":a;chara\sylph_bk02.bmp",%zukan_x0,0
if %zukan_pozu>1 && %zukan_bukkake2=1 csp 442
if %zukan_bukkake2=0 csp 442
if %zukan_pozu=1 && %zukan_bukkake3=1 lsp 443,":a;chara\sylph_bk03.bmp",%zukan_x0,0
if %zukan_pozu>1 && %zukan_bukkake3=1 csp 443
if %zukan_bukkake3=0 csp 443
return



*zukan_sylph_cg

lsp 500,":c;bg\bg061.bmp",0,0
lsp 430,":c;chara\sylph_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\sylph_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\sylph_h3.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_sylph_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,19
mov %skill01,6
mov %item01,8
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *sylph_start
if %bwait=211 mov %nanido,2:goto *sylph_start
if %bwait=212 mov %nanido,3:goto *sylph_start
lsp 700,":a;chara\sylph_st02.bmp",0,0
bg "bg\bg061.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Sylph"
if %bwait=213 goto *sylph_h



*zukan_c_dryad

shadedistance 0,0
mov $zname,"Chimera Dryad"
itoa2 $zukan_ko,%2549
mov $zlavel,"c_dryad"
mov %zukan_hyouzyonum,2
mov %zukan_pozunum,2
mov %zukan_bukkakenum,6
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2818=0 mov %ryozyoku1,0
if %2818>0 mov %ryozyoku1,1
if %2818=0 mov %zukancg,0
if %2818>0 mov %zukancg,1
mov %zukan_x1,-60
mov %zukan_x2,140
mov $zukan_lv,"UT"
mov $zukan_hp,"XTOO"
mov $zukan_skill1,"Ivy Stroking"
mov %zukan_skillc1,3174
mov $zukan_skill2,"Semen Slurping Lily"
mov %zukan_skillc2,3175
mov $zukan_skill3,"Maneating Sunflower"
mov %zukan_skillc3,3194
mov $zukan_skill4,"Rose of Strangulation"
mov %zukan_skillc4,3177
mov $zukan_skill5,"Intoxicating Incense"
mov %zukan_skillc5,3178
mov $zukan_skill6,"Flower Energy Suck"
mov %zukan_skillc6,3179
mov $zukan_skill7,"Floral Funeral"
mov %zukan_skillc7,3180
screen_clear
btndef clear
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_c_dryad_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\dryad.jpg",400,100
goto *zukan_kihonbtn



*zukan_c_dryad_cg

lsp 500,":c;bg\bg061.bmp",0,0
lsp 430,":a;chara\c_dryad_st11.bmp",140,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_dryad_st12.bmp",140,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_dryad_st13.bmp",140,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_dryad_st14.bmp",140,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_dryad_st15.bmp",140,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_c_dryad_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 mov %zukan_hyouzyonum,1
if %zukan_pozu<>1 mov %zukan_hyouzyonum,2
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 lsp 450,":a;chara\c_dryad_st01.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\c_dryad_st21.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\c_dryad_st22.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\c_dryad_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\c_dryad_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\c_dryad_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\c_dryad_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\c_dryad_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\c_dryad_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
if %zukan_pozu=1 cspl 445,446
return



*zukan_c_dryad_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,20
mov %skill01,6
mov %item01,8
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *c_dryad_start
if %bwait=211 mov %nanido,2:goto *c_dryad_start
if %bwait=212 mov %nanido,3:goto *c_dryad_start
lsp 700,":a;chara\c_dryad_st01.bmp",140,0
bg "bg\bg061.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *c_dryad_h



*zukan_taran

mov $zname,"Tarantula Girl"
mov $zlavel,"taran"
itoa2 $zukan_ko,%2551
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2551=0 mov %ryozyoku1,0
if %2551>0 mov %ryozyoku1,1
if %2551=0 mov %zukancg,0
if %2551>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"QO"
mov $zukan_hp,"XOO"
mov $zukan_skill1,"Tarantula Caress"
mov %zukan_skillc1,3196
mov $zukan_skill2,"Tarantula Blowjob"
mov %zukan_skillc2,3197
mov $zukan_skill3,"Breast Pressure Hell"
mov %zukan_skillc3,3176
mov $zukan_skill4,"Restrained Tarantula Caress"
mov %zukan_skillc4,3198
mov $zukan_skill5,"Tarantula Torture"
mov %zukan_skillc5,3199
mov $zukan_skill6,"Tarantula Rape"
mov %zukan_skillc6,3200
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_taran_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\taran.jpg",400,100
goto *zukan_kihonbtn



*zukan_taran_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\taran_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\taran_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\taran_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\taran_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\taran_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\taran_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\taran_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\taran_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_taran_cg

lsp 500,":c;bg\bg030.bmp",0,0
lsp 430,":a;chara\taran_st02.bmp",0,0
lsp 420,":a;chara\kumo_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kumo_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kumo_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kumo_ct04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\taran_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\taran_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\taran_h2.bmp",0,0
lsp 420,":a;chara\taran_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\taran_h3.bmp",0,0
lsp 420,":a;chara\taran_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\taran_h4.bmp",0,0
lsp 420,":a;chara\taran_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\taran_h5.bmp",0,0
lsp 420,":a;chara\taran_ct04.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_taran_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,20
mov %skill01,7
mov %item01,8
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *taran_start
if %bwait=211 mov %nanido,2:goto *taran_start
if %bwait=212 mov %nanido,3:goto *taran_start
lsp 700,":a;chara\taran_st02.bmp",0,0
bg "bg\bg030.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *taran_h



*zukan_mino

mov $zname,"Minotauros"
mov $zlavel,"mino"
itoa2 $zukan_ko,%2552
mov %zukan_hyouzyonum,4
mov %zukan_pozunum,2
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2552=0 mov %ryozyoku1,0
if %2552>0 mov %ryozyoku1,1
if %2552=0 mov %zukancg,0
if %2552>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"QO"
mov $zukan_hp,"PQOO"
mov $zukan_skill1,"Strong Handjob"
mov %zukan_skillc1,3201
mov $zukan_skill2,"Furious Intercrural"
mov %zukan_skillc2,3202
mov $zukan_skill3,"Busty Tit Fuck"
mov %zukan_skillc3,3203
mov $zukan_skill4,"Ferocious Blowjob"
mov %zukan_skillc4,3204
mov $zukan_skill5,"Minotauros Rape"
mov %zukan_skillc5,3205
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_mino_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\mino.jpg",400,100
goto *zukan_kihonbtn



*zukan_mino_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=2 mov %zukan_hyouzyonum,1
if %zukan_pozu<>2 mov %zukan_hyouzyonum,4
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=2 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=1 && %zukan_pozu=1 lsp 450,":a;chara\mino_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 && %zukan_pozu=1 lsp 450,":a;chara\mino_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 && %zukan_pozu=1 lsp 450,":a;chara\mino_st03.bmp",%zukan_x0,0
if %zukan_hyouzyo=4 && %zukan_pozu=1 lsp 450,":a;chara\mino_st04.bmp",%zukan_x0,0
if %zukan_pozu=2 lsp 450,":a;chara\mino_st11.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\mino_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\mino_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\mino_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\mino_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_pozu=1 csp 444
return



*zukan_mino_cg

lsp 500,":c;bg\bg019.bmp",0,0
lsp 430,":a;chara\mino_st02.bmp",0,0
lsp 420,":a;chara\mino_ct11.bmp",503,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\mino_ct12.bmp",503,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\mino_ct13.bmp",503,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\mino_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\mino_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mino_h2.bmp",0,0
lsp 420,":a;chara\mino_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\mino_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mino_h3.bmp",0,0
lsp 420,":a;chara\mino_ct04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\mino_ct05.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_mino_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,20
mov %skill01,7
mov %item01,8
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *mino_start
if %bwait=211 mov %nanido,2:goto *mino_start
if %bwait=212 mov %nanido,3:goto *mino_start
lsp 700,":a;chara\mino_st02.bmp",0,0
bg "bg\bg019.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *mino_h



*zukan_sasori

mov $zname,"Scorpion Girl"
mov $zlavel,"sasori"
itoa2 $zukan_ko,%2553
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,2
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2553=0 mov %ryozyoku1,0
if %2553>0 mov %ryozyoku1,1
if %2553=0 mov %zukancg,0
if %2553>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"QP"
mov $zukan_hp,"PPOO"
mov $zukan_skill1,"Scorpion Blowjob"
mov %zukan_skillc1,3206
mov $zukan_skill2,"Scorpion Tit Fuck"
mov %zukan_skillc2,3207
mov $zukan_skill3,"Venom Tail"
mov %zukan_skillc3,3208
mov $zukan_skill4,"Petra Scorpio"
mov %zukan_skillc4,3209
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_sasori_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\scorp.jpg",400,100
goto *zukan_kihonbtn



*zukan_sasori_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=2 mov %zukan_hyouzyonum,1
if %zukan_pozu<>2 mov %zukan_hyouzyonum,3
if %zukan_pozu=1 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=2 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\sasori_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\sasori_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\sasori_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 lsp 450,":a;chara\sasori_st11.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\sasori_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\sasori_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\sasori_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\sasori_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_pozu=2 && %zukan_bukkake5=1 lsp 445,":a;chara\sasori_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_sasori_cg

lsp 500,":c;bg\bg062.bmp",0,0
lsp 430,":a;chara\sasori_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\sasori_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\sasori_h2.bmp",0,0
lsp 420,":a;chara\sasori_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\sasori_h3.bmp",0,0
lsp 420,":a;chara\sasori_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\sasori_h4.bmp",0,0
lsp 420,":a;chara\sasori_ct04.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_sasori_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,21
mov %skill01,7
mov %item01,8
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *sasori_start
if %bwait=211 mov %nanido,2:goto *sasori_start
if %bwait=212 mov %nanido,3:goto *sasori_start
lsp 700,":a;chara\sasori_st02.bmp",0,0
bg "bg\bg062.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *sasori_h



*zukan_lamp

mov $zname,"Lamp Genie"
mov $zlavel,"lamp"
itoa2 $zukan_ko,%2554
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,4
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2554=0 mov %ryozyoku1,0
if %2554>0 mov %ryozyoku1,1
if %2554=0 mov %zukancg,0
if %2554>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"QS"
mov $zukan_hp,"PUOO"
mov $zukan_skill1,"Hand of Pleasure"
mov %zukan_skillc1,3210
mov $zukan_skill2,"Mouth of Joy"
mov %zukan_skillc2,3211
mov $zukan_skill3,"Chest of Delight"
mov %zukan_skillc3,3212
mov $zukan_skill4,"Intercrural Enjoyment"
mov %zukan_skillc4,3213
mov $zukan_skill5,"Fingers of Ecstasy"
mov %zukan_skillc5,3214
mov $zukan_skill6,"Heavenly Kamasutra"
mov %zukan_skillc6,3215
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_lamp_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\genie.jpg",400,100
goto *zukan_kihonbtn



*zukan_lamp_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=4 mov %zukan_hyouzyonum,1
if %zukan_pozu<>4 mov %zukan_hyouzyonum,3
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=4 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\lamp_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\lamp_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\lamp_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\lamp_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\lamp_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\lamp_st13.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\lamp_st21.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\lamp_st22.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=3 lsp 450,":a;chara\lamp_st23.bmp",%zukan_x0,0
if %zukan_pozu=4 lsp 450,":a;chara\lamp_st31.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\lamp_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\lamp_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\lamp_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\lamp_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\lamp_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_pozu=2 cspl 444,445
if %zukan_pozu=3 cspl 444,445
if %zukan_pozu=4 cspl 441,445
return



*zukan_lamp_cg

lsp 500,":c;bg\bg062.bmp",0,0
lsp 430,":a;chara\lamp_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lamp_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lamp_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lamp_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lamp_h5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lamp_h6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lamp_h7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\lamp_ct01.bmp",400,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\lamp_ct02.bmp",400,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\lamp_ct03.bmp",400,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\lamp_ct04.bmp",400,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_lamp_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,21
mov %skill01,7
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *lamp_start
if %bwait=211 mov %nanido,2:goto *lamp_start
if %bwait=212 mov %nanido,3:goto *lamp_start
lsp 700,":a;chara\lamp_st02.bmp",0,0
bg "bg\bg062.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *lamp_h



*zukan_mummy

mov $zname,"Mummy Girl"
mov $zlavel,"mummy"
itoa2 $zukan_ko,%2555
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2555=0 mov %ryozyoku1,0
if %2555>0 mov %ryozyoku1,1
if %2555=0 mov %zukancg,0
if %2555>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"QP"
mov $zukan_hp,"PROO"
mov $zukan_skill1,"Mummy Handjob"
mov %zukan_skillc1,3216
mov $zukan_skill2,"Mummy Bandage"
mov %zukan_skillc2,3217
mov $zukan_skill3,"Holding Bandage"
mov %zukan_skillc3,3218
mov $zukan_skill4,"Holding Nightmare"
mov %zukan_skillc4,3219
mov $zukan_skill5,"Mummy Package"
mov %zukan_skillc5,3220
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_mummy_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\mummy.jpg",400,100
goto *zukan_kihonbtn



*zukan_mummy_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\mummy_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\mummy_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\mummy_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\mummy_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\mummy_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\mummy_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\mummy_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\mummy_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_mummy_cg

lsp 500,":c;bg\bg068.bmp",0,0
lsp 430,":a;chara\mummy_st11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mummy_st12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mummy_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mummy_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mummy_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mummy_h4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_mummy_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,21
mov %skill01,7
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *mummy_start
if %bwait=211 mov %nanido,2:goto *mummy_start
if %bwait=212 mov %nanido,3:goto *mummy_start
lsp 700,":a;chara\mummy_st01.bmp",0,0
bg "bg\bg068.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *mummy_h



*zukan_kobura

mov $zname,"Cobra Girl"
mov $zlavel,"kobura"
itoa2 $zukan_ko,%2556
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2556=0 mov %ryozyoku1,0
if %2556>0 mov %ryozyoku1,1
if %2556=0 mov %zukancg,0
if %2556>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"QP"
mov $zukan_hp,"PSOO"
mov $zukan_skill1,"Cobra Blowjob"
mov %zukan_skillc1,3222
mov $zukan_skill2,"Cobra Tit Fuck"
mov %zukan_skillc2,3223
mov $zukan_skill3,"Cobra Bite"
mov %zukan_skillc3,3224
mov $zukan_skill4,"Nightmare Tightening"
mov %zukan_skillc4,3225
mov $zukan_skill5,"Mellow Tail"
mov %zukan_skillc5,3226
mov $zukan_skill6,"Cobra Anal"
mov %zukan_skillc6,3227
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_kobura_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\cobra.jpg",400,100
goto *zukan_kihonbtn



*zukan_kobura_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\kobura_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\kobura_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\kobura_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\kobura_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\kobura_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\kobura_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
return



*zukan_kobura_cg

lsp 500,":c;bg\bg068.bmp",0,0
lsp 430,":a;chara\kobura_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kobura_h2.bmp",0,0
lsp 420,":a;chara\kobura_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kobura_h3.bmp",0,0
lsp 420,":a;chara\kobura_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kobura_h4.bmp",0,0
lsp 420,":a;chara\kobura_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kobura_h5.bmp",0,0
lsp 420,":a;chara\kobura_ct04.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_kobura_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,21
mov %skill01,7
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *kobura_start
if %bwait=211 mov %nanido,2:goto *kobura_start
if %bwait=212 mov %nanido,3:goto *kobura_start
lsp 700,":a;chara\kobura_h1.bmp",0,0
bg "bg\bg068.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *kobura_h



*zukan_lamias

mov $zname,"Nefertiti Lamias"
mov $zlavel,"lamias"
itoa2 $zukan_ko,%2557
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2557=0 mov %ryozyoku1,0
if %2557>0 mov %ryozyoku1,1
if %2557=0 mov %zukancg,0
if %2557>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"QQ"
mov $zukan_hp,"PVOO"
mov $zukan_skill1,"Group Handjob"
mov %zukan_skillc1,3228
mov $zukan_skill2,"Group Licking"
mov %zukan_skillc2,3229
mov $zukan_skill3,"Group Tailjob"
mov %zukan_skillc3,3230
mov $zukan_skill4,"Group Tightening"
mov %zukan_skillc4,3231
mov $zukan_skill5,"Group Blowjob"
mov %zukan_skillc5,3232
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_lamias_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\lamias.jpg",400,100
goto *zukan_kihonbtn



*zukan_lamias_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\lamias_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\lamias_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\lamias_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\lamias_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\lamias_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\lamias_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\lamias_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\lamias_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_lamias_cg

lsp 500,":c;bg\bg068.bmp",0,0
lsp 430,":c;chara\lamias_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamias_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamias_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamias_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamias_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamias_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamias_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamias_hb4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamias_hb5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamias_hc1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamias_hc2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamias_hc3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamias_hd1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamias_hd2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamias_hd3.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_lamias_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,22
mov %skill01,7
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *lamias_start
if %bwait=211 mov %nanido,2:goto *lamias_start
if %bwait=212 mov %nanido,3:goto *lamias_start
lsp 700,":a;chara\lamias_st02.bmp",0,0
bg "bg\bg068.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *lamias_h



*zukan_sphinx

mov $zname,"Sphinx"
mov $zlavel,"sphinx"
itoa2 $zukan_ko,%2558
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2819=0 mov %ryozyoku1,0
if %2819>0 mov %ryozyoku1,1
if %2819=0 mov %zukancg,0
if %2819>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"RT"
mov $zukan_hp,"QUOO"
mov $zukan_skill1,"Finger Offering"
mov %zukan_skillc1,3233
mov $zukan_skill2,"Mouth Offering"
mov %zukan_skillc2,3234
mov $zukan_skill3,"Isis' Lovemaking"
mov %zukan_skillc3,3235
mov $zukan_skill4,"Kiss of Death"
mov %zukan_skillc4,3236
mov $zukan_skill5,"Ancient Law of Ecstasy"
mov %zukan_skillc5,3237
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_sphinx_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\sphinx.jpg",400,100
goto *zukan_kihonbtn



*zukan_sphinx_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\sphinx_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\sphinx_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\sphinx_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\sphinx_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\sphinx_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\sphinx_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\sphinx_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
return



*zukan_sphinx_cg

lsp 500,":c;bg\bg069.bmp",0,0
lsp 430,":a;chara\sphinx_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\sphinx_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\sphinx_h2.bmp",0,0
lsp 420,":a;chara\sphinx_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\sphinx_h3.bmp",0,0
lsp 420,":a;chara\sphinx_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\sphinx_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\sphinx_h4.bmp",-160,0
lsp 420,":a;chara\sphinx_cta01.bmp",400,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\sphinx_cta02.bmp",400,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\sphinx_cta03.bmp",400,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\sphinx_cta04.bmp",400,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\sphinx_cta05.bmp",400,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_sphinx_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,22
mov %skill01,7
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *sphinx_start
if %bwait=211 mov %nanido,2:goto *sphinx_start
if %bwait=212 mov %nanido,3:goto *sphinx_start
lsp 700,":a;chara\sphinx_st02.bmp",0,0
bg "bg\bg069.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *sphinx_h



*zukan_sara

mov $zname,"Sara"
mov $zlavel,"sara"
mov $zukan_ko,"None "
mov %zukan_hyouzyonum,4
mov %zukan_pozunum,3
mov %zukan_bukkakenum,0
mov %zukan_sentounum,0
mov %zukan_ryozyokunum,1
mov %ryozyoku1,1
mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PO"
mov $zukan_hp,"WT"
mov %zukan_skillc1,0
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_sara_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\sara.jpg",400,100
goto *zukan_kihonbtn



*zukan_sara_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\sara_st01r.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\sara_st02r.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\sara_st03r.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\sara_st04r.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\sara_st11r.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\sara_st12r.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\sara_st13r.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=4 lsp 450,":a;chara\sara_st14r.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\sara_st21.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\sara_st22.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=3 lsp 450,":a;chara\sara_st23.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=4 lsp 450,":a;chara\sara_st24.bmp",%zukan_x0,0
return



*zukan_sara_cg

lsp 500,":c;bg\bg067.bmp",0,0
lsp 420,":a;chara\sara_ha1r.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\sara_ha2r.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\sara_ha3r.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_sara_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,22
mov %skill01,7
mov %item01,9
gosub *setwindow_01
lsp 700,":a;chara\sara_st14r.bmp",0,0
bg "bg\bg067.bmp",10,1500
bgm "bgm\hutuu3.ogg"
if %bwait=213 goto *sean0146a



*zukan_suckvore

mov $zname,"Suck Vore"
mov $zlavel,"suckvore"
itoa2 $zukan_ko,%2559
mov %zukan_hyouzyonum,2
mov %zukan_pozunum,2
mov %zukan_bukkakenum,2
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2559=0 mov %ryozyoku1,0
if %2559>0 mov %ryozyoku1,1
if %2559=0 mov %zukancg,0
if %2559>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"QQ"
mov $zukan_hp,"PQOO"
mov $zukan_skill1,"Full Body Tentacle Rub"
mov %zukan_skillc1,3238
mov $zukan_skill2,"Groin Tentacle Rub"
mov %zukan_skillc2,3239
mov $zukan_skill3,"Full Body Tentacle Suck"
mov %zukan_skillc3,3240
mov $zukan_skill4,"Genital Energy Suck"
mov %zukan_skillc4,3241
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_suckvore_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\suck.jpg",400,100
goto *zukan_kihonbtn



*zukan_suckvore_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 mov %zukan_hyouzyonum,1
if %zukan_pozu<>1 mov %zukan_hyouzyonum,2
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 lsp 450,":a;chara\suckvore_st01.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\suckvore_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\suckvore_st12.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\suckvore_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\suckvore_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_pozu=2 cspl 441,442
return



*zukan_suckvore_cg

lsp 500,":c;bg\bg071.bmp",0,0
lsp 430,":a;chara\suckvore_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\suckvore_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\suckvore_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\suckvore_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\suckvore_h5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\suckvore_h6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\suckvore_h7.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_suckvore_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,22
mov %skill01,7
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *suckvore_start
if %bwait=211 mov %nanido,2:goto *suckvore_start
if %bwait=212 mov %nanido,3:goto *suckvore_start
lsp 700,":a;chara\suckvore_st01.bmp",0,0
bg "bg\bg071.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *suckvore_h



*zukan_wormv

mov $zname,"Worm Villager"
mov $zlavel,"wormv"
itoa2 $zukan_ko,%2560
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,2
mov %zukan_bukkakenum,2
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2560=0 mov %ryozyoku1,0
if %2560>0 mov %ryozyoku1,1
if %2560=0 mov %zukancg,0
if %2560>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"QQ"
mov $zukan_hp,"PSOO"
mov $zukan_skill1,"Worm Touch"
mov %zukan_skillc1,3242
mov $zukan_skill2,"Worm Caress"
mov %zukan_skillc2,3243
mov $zukan_skill3,"Worm Drain"
mov %zukan_skillc3,3244
mov $zukan_skill4,"Worm Spread"
mov %zukan_skillc4,3245
mov $zukan_skill5,"Anal Stroke"
mov %zukan_skillc5,3246
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_wormv_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\wormv.jpg",400,100
goto *zukan_kihonbtn



*zukan_wormv_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 && %zukan_hyouzyo=4 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,3
if %zukan_pozu=2 && %zukan_hyouzyo=5 mov %zukan_hyouzyo,1
if %zukan_pozu=2 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,4
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\wormv_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\wormv_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\wormv_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\wormv_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\wormv_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\wormv_st13.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=4 lsp 450,":a;chara\wormv_st14.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\wormv_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\wormv_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_pozu=2 cspl 441,442
return



*zukan_wormv_cg

lsp 500,":c;bg\bg071.bmp",0,0
lsp 430,":a;chara\wormv_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\wormv_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\wormv_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\wormv_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\wormv_h5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\wormv_h6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\wormv_h7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\wormv_h8.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\wormv_h9.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_wormv_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,22
mov %skill01,7
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *wormv_start
if %bwait=211 mov %nanido,2:goto *wormv_start
if %bwait=212 mov %nanido,3:goto *wormv_start
lsp 700,":a;chara\wormv_st02.bmp",0,0
bg "bg\bg071.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *wormv_h



*zukan_ironmaiden

mov $zname,"Iron Maiden"
mov $zlavel,"ironmaiden"
itoa2 $zukan_ko,%2561
mov %zukan_hyouzyonum,1
mov %zukan_pozunum,3
mov %zukan_bukkakenum,0
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2561=0 mov %ryozyoku1,0
if %2561>0 mov %ryozyoku1,1
if %2561=0 mov %zukancg,0
if %2561>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"QR"
mov $zukan_hp,"QOOO"
mov $zukan_skill1,"Nightmare Embrace"
mov %zukan_skillc1,3247
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_ironmaiden_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\maiden.jpg",400,100
goto *zukan_kihonbtn



*zukan_ironmaiden_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 lsp 450,":a;chara\ironmaiden_st01.bmp",%zukan_x0,0
if %zukan_pozu=2 lsp 450,":a;chara\ironmaiden_st11.bmp",%zukan_x0,0
if %zukan_pozu=3 lsp 450,":a;chara\ironmaiden_st21.bmp",%zukan_x0,0
return



*zukan_ironmaiden_cg

lsp 500,":c;bg\bg071.bmp",0,0
lsp 430,":a;chara\ironmaiden_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ironmaiden_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ironmaiden_h3.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_ironmaiden_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,23
mov %skill01,7
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *ironmaiden_start
if %bwait=211 mov %nanido,2:goto *ironmaiden_start
if %bwait=212 mov %nanido,3:goto *ironmaiden_start
lsp 700,":a;chara\ironmaiden_st01.bmp",0,0
bg "bg\bg071.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *ironmaiden_h



*zukan_lily

mov $zname,"Lily"
mov $zlavel,"lily"
itoa2 $zukan_ko,%2562
mov %zukan_hyouzyonum,4
mov %zukan_pozunum,2
mov %zukan_bukkakenum,2
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2562=0 mov %ryozyoku1,0
if %2562>0 mov %ryozyoku1,1
if %2562=0 mov %zukancg,0
if %2562>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"RO"
mov $zukan_hp,"QOOO"
mov $zukan_skill1,"Worm Touch"
mov %zukan_skillc1,3248
mov $zukan_skill2,"Worm Drain"
mov %zukan_skillc2,3249
mov $zukan_skill3,"Worm Ecstasy"
mov %zukan_skillc3,3250
mov $zukan_skill4,"Anal Drain"
mov %zukan_skillc4,3251
mov $zukan_skill5,"Worm Spread"
mov %zukan_skillc5,3252
mov $zukan_skill6,"Drain Heaven"
mov %zukan_skillc6,3253
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_lily_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\lily.jpg",400,100
goto *zukan_kihonbtn



*zukan_lily_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=2 && %zukan_hyouzyo=4 mov %zukan_hyouzyo,1
if %zukan_pozu=2 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,3
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\lily_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\lily_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\lily_st03.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\lily_st04.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\lily_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\lily_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\lily_st13.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\lily_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\lily_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_pozu=2 cspl 441,442
return



*zukan_lily_cg

lsp 500,":c;bg\bg075.bmp",0,0
lsp 430,":a;chara\lily_h01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lily_h02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lily_h03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lily_h04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lily_h05.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lily_h06.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lily_h07.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lily_h08.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lily_h09.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lily_h10.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lily_h11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lily_h12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lily_h13.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_lily_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,23
mov %skill01,7
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *lily_start
if %bwait=211 mov %nanido,2:goto *lily_start
if %bwait=212 mov %nanido,3:goto *lily_start
lsp 700,":a;chara\lily_st02.bmp",0,0
bg "bg\bg075.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *lily_h



*zukan_arizigoku

mov $zname,"Antlion Girl"
mov $zlavel,"arizigoku"
itoa2 $zukan_ko,%2563
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,1
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2563=0 mov %ryozyoku1,0
if %2563>0 mov %ryozyoku1,1
if %2563=0 mov %zukancg,0
if %2563>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"QS"
mov $zukan_hp,"TOO"
mov $zukan_skill1,"Fluid Squeezing"
mov %zukan_skillc1,3254
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_arizigoku_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\ant.jpg",400,100
goto *zukan_kihonbtn



*zukan_arizigoku_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\arizigoku_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\arizigoku_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\arizigoku_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\arizigoku_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
return



*zukan_arizigoku_cg

lsp 430,":a;chara\arizigoku_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\arizigoku_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\arizigoku_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\arizigoku_h4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_arizigoku_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,24
mov %skill01,7
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *arizigoku_start
if %bwait=211 mov %nanido,2:goto *arizigoku_start
if %bwait=212 mov %nanido,3:goto *arizigoku_start
lsp 700,":a;chara\arizigoku_h1.bmp",0,0
bg "bg\bg076.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *arizigoku_h



*zukan_sandw

mov $zname,"Sandworm"
mov $zlavel,"sandw"
itoa2 $zukan_ko,%2564
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,1
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2564=0 mov %ryozyoku1,0
if %2564>0 mov %ryozyoku1,1
if %2564=0 mov %zukancg,0
if %2564>0 mov %zukancg,1
mov %zukan_x1,-120
mov %zukan_x2,0
mov $zukan_lv,"QS"
mov $zukan_hp,"QTOO"
mov $zukan_skill1,"Lick"
mov %zukan_skillc1,3255
mov $zukan_skill2,"Suck"
mov %zukan_skillc2,3256
mov $zukan_skill3,"Kiss"
mov %zukan_skillc3,3257
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_sandw_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\worm.jpg",400,100
goto *zukan_kihonbtn



*zukan_sandw_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\sandw_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\sandw_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\sandw_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\sandw_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
return



*zukan_sandw_cg

lsp 500,":c;bg\bg076.bmp",0,0
lsp 430,":a;chara\sandw_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\sandw_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\sandw_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\sandw_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\sandw_h4.bmp",0,0
lsp 420,":a;chara\sandw_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\sandw_h5.bmp",0,0
lsp 420,":a;chara\sandw_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\sandw_ct04.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_sandw_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,24
mov %skill01,7
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *sandw_start
if %bwait=211 mov %nanido,2:goto *sandw_start
if %bwait=212 mov %nanido,3:goto *sandw_start
lsp 700,":a;chara\sandw_h1.bmp",0,0
bg "bg\bg076.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *sandw_h



*zukan_gnome

mov $zname,"Gnome"
mov $zlavel,"gnome"
itoa2 $zukan_ko,%2565
mov %zukan_hyouzyonum,4
mov %zukan_pozunum,4
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2565=0 mov %ryozyoku1,0
if %2565>0 mov %ryozyoku1,1
if %2565=0 mov %zukancg,0
if %2565>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"TO"
mov $zukan_hp,"SOOO"
mov $zukan_skill1,"Mud Doll Caress"
mov %zukan_skillc1,3258
mov $zukan_skill2,"Mud Doll Groin Fondle"
mov %zukan_skillc2,3259
mov $zukan_skill3,"Gnome's Hand Games"
mov %zukan_skillc3,3260
mov $zukan_skill4,"Gnome's Mouth Play"
mov %zukan_skillc4,3261
mov $zukan_skill5,"Gnome's Mud Vagina"
mov %zukan_skillc5,3262
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_gnome_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\gnome.jpg",400,100
goto *zukan_kihonbtn



*zukan_gnome_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=3 mov %zukan_hyouzyonum,1
if %zukan_pozu<>3 mov %zukan_hyouzyonum,4
if %zukan_pozu<3 && %zukan_hyouzyo=3 mov %zukan_hyouzyo,1
if %zukan_pozu<3 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,2
if %zukan_pozu=3 mov %zukan_hyouzyo,1
if %zukan_pozu=4 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=4 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\gnome_st11.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\gnome_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\gnome_st01.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\gnome_st02.bmp",%zukan_x0,0
if %zukan_pozu=3 lsp 450,":a;chara\gnome_st21.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=1 lsp 450,":a;chara\gnome_st31.bmp",%zukan_x0-40,0
if %zukan_pozu=4 && %zukan_hyouzyo=2 lsp 450,":a;chara\gnome_st32.bmp",%zukan_x0-40,0
if %zukan_pozu=4 && %zukan_hyouzyo=3 lsp 450,":a;chara\gnome_st33.bmp",%zukan_x0-40,0
if %zukan_pozu=4 && %zukan_hyouzyo=4 lsp 450,":a;chara\gnome_st34.bmp",%zukan_x0-40,0
if %zukan_bukkake1=1 lsp 441,":a;chara\gnome_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\gnome_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\gnome_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_pozu=2 cspl 442,443
if %zukan_pozu=3 cspl 441,443
if %zukan_pozu=4 cspl 441,443
return



*zukan_gnome_cg

lsp 500,":c;bg\bg076.bmp",0,0
lsp 430,":a;chara\gnome_h0.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\gnome_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\gnome_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\gnome_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\gnome_h4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_gnome_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,24
mov %skill01,7
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *gnome_start
if %bwait=211 mov %nanido,2:goto *gnome_start
if %bwait=212 mov %nanido,3:goto *gnome_start
lsp 700,":a;chara\gnome_st01.bmp",0,0
lsp 701,":a;chara\doro_st01.bmp",230,0
lsp 702,":a;chara\doro_st02.bmp",-120,0
lsp 703,":a;chara\doro_st03.bmp",-180,0
lsp 704,":a;chara\doro_st03.bmp",240,0
bg "bg\bg076.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Gnome"
if %bwait=213 goto *gnome_h



*zukan_irias1

mov $zname,"Goddess Ilias"
mov $zlavel,"irias1"
mov $zukan_ko,"None "
mov %zukan_hyouzyonum,6
mov %zukan_pozunum,2
mov %zukan_bukkakenum,1
mov %zukan_sentounum,0
mov %zukan_ryozyokunum,1
mov %ryozyoku1,1
mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"HHH"
mov $zukan_hp,"HHH"
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_irias1_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 301,":c;ency\iilias.jpg",400,100
goto *zukan_kihonbtn



*zukan_irias1_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=2 mov %zukan_hyouzyonum,1
if %zukan_pozu<>2 mov %zukan_hyouzyonum,6
if %zukan_pozu=1 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=2 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\iriasu_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\iriasu_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\iriasu_st03.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\iriasu_st04.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=5 lsp 450,":a;chara\iriasu_st05.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=6 lsp 450,":a;chara\iriasu_st06.bmp",%zukan_x0,0
if %zukan_pozu=2 lsp 450,":a;chara\iriasu_st14.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\iriasu_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_pozu=2 csp 441
return



*zukan_irias1_cg

lsp 500,":c;bg\bg001.bmp",0,0
lsp 420,":a;chara\iriasu_ct01.bmp",478,0
lsp 430,":a;chara\iriasu_st02.bmp",-100,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\iriasu_ct02.bmp",478,0
lsp 421,":a;chara\iriasu_bk01.bmp",-100,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_irias1_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,0
mov %mylv,24
mov %skill01,7
mov %item01,9
gosub *setwindow_01
lsp 700,":a;chara\iriasu_st04.bmp",0,0
bg "bg\bg001.bmp",10,1500
bgm "BGM\irias.ogg"
if %bwait=213 goto *hansei_h



*zukan_alice2

mov $zname,"Alice"
mov $zlavel,"alice2"
mov $zukan_ko,"None "
mov %zukan_hyouzyonum,10
mov %zukan_pozunum,5
mov %zukan_bukkakenum,0
mov %zukan_sentounum,0
mov %zukan_ryozyokunum,3
if %hsean_alice6=1 mov %ryozyoku1,1
if %hsean_alice6=0 mov %ryozyoku1,0
if %hsean_alice7=1 mov %ryozyoku2,1
if %hsean_alice7=0 mov %ryozyoku2,0
if %hsean_alice8=1 mov %ryozyoku3,1
if %hsean_alice8=0 mov %ryozyoku3,0
if %hsean_alice6=0 mov %zukancg,0
if %hsean_alice6=1 mov %zukancg,1
mov %zukan_x1,-20
mov %zukan_x2,150
mov $zukan_lv,"PST"
mov $zukan_hp,"RQOOO"
mov %zukan_skillc1,0
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_alice2_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\alice2.jpg",400,0
goto *zukan_kihonbtn



*zukan_alice2_p

if %zukan_pozu=6 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,5
if %zukan_pozu=5 mov %zukan_hyouzyonum,1
if %zukan_pozu<>5 mov %zukan_hyouzyonum,10
if %zukan_pozu<5 && %zukan_hyouzyo=11 mov %zukan_hyouzyo,1
if %zukan_pozu<5 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,10
if %zukan_pozu=5 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\alice_st01.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\alice_st01b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\alice_st11.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=1 lsp 450,":a;chara\alice_st11b.bmp",%zukan_x0-80,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\alice_st02.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\alice_st02b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\alice_st12.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=2 lsp 450,":a;chara\alice_st12b.bmp",%zukan_x0-80,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\alice_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\alice_st03b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_hyouzyo=3 lsp 450,":a;chara\alice_st13.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=3 lsp 450,":a;chara\alice_st13b.bmp",%zukan_x0-80,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\alice_st04.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=4 lsp 450,":a;chara\alice_st04b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_hyouzyo=4 lsp 450,":a;chara\alice_st14.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=4 lsp 450,":a;chara\alice_st14b.bmp",%zukan_x0-80,0
if %zukan_pozu=1 && %zukan_hyouzyo=5 lsp 450,":a;chara\alice_st05.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=5 lsp 450,":a;chara\alice_st05b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_hyouzyo=5 lsp 450,":a;chara\alice_st15.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=5 lsp 450,":a;chara\alice_st15b.bmp",%zukan_x0-80,0
if %zukan_pozu=1 && %zukan_hyouzyo=6 lsp 450,":a;chara\alice_st06.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=6 lsp 450,":a;chara\alice_st06b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_hyouzyo=6 lsp 450,":a;chara\alice_st16.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=6 lsp 450,":a;chara\alice_st16bre.bmp",%zukan_x0-80,0
if %zukan_pozu=1 && %zukan_hyouzyo=7 lsp 450,":a;chara\alice_st07.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=7 lsp 450,":a;chara\alice_st07b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_hyouzyo=7 lsp 450,":a;chara\alice_st17.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=7 lsp 450,":a;chara\alice_st17bre.bmp",%zukan_x0-80,0
if %zukan_pozu=1 && %zukan_hyouzyo=8 lsp 450,":a;chara\alice_st08.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=8 lsp 450,":a;chara\alice_st08b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_hyouzyo=8 lsp 450,":a;chara\alice_st18.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=8 lsp 450,":a;chara\alice_st18bre.bmp",%zukan_x0-80,0
if %zukan_pozu=1 && %zukan_hyouzyo=9 lsp 450,":a;chara\alice_st09.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=9 lsp 450,":a;chara\alice_st09b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_hyouzyo=9 lsp 450,":a;chara\alice_st19.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=9 lsp 450,":a;chara\alice_st19bre.bmp",%zukan_x0-80,0
if %zukan_pozu=1 && %zukan_hyouzyo=10 lsp 450,":a;chara\alice_st51.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=10 lsp 450,":a;chara\alice_st51b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_hyouzyo=10 lsp 450,":a;chara\alice_st61.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=10 lsp 450,":a;chara\alice_st61b.bmp",%zukan_x0-80,0
if %zukan_pozu=5 lsp 450,":a;chara\alice_st31.bmp",%zukan_x0+80,125
return



*zukan_alice2_cg

lsp 430,":a;chara\alice_h06_1r.bmp",0,0
lsp 500,":c;bg\bg083.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_h06_2r.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_h06_3r.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_h06_4r.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_h06_5r.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_h06_6r.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_h06_7r.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %hsean_alice7=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_h07_1r.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_h07_2r.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_h07_3r.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_h07_4r.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_h07_5r.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %hsean_alice8=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_h08_1r.bmp",0,0
lsp 500,":c;bg\bg164.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_h08_2r.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_h08_3r.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_h08_4r.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_alice2_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,25
mov %skill01,0
mov %item01,1
gosub *setwindow_01
if %bwait=213 bgm "bgm\hutuu1.ogg":lsp 699,":a;chara\alice_st91b.bmp",67,0:lsp 700,":a;chara\alice_st02b.bmp",67,0:bg "bg\bg083.bmp",10,1500:goto *sean0163a
if %bwait=214 lsp 699,":a;chara\alice_st91b.bmp",67,0:lsp 700,":a;chara\alice_st01b.bmp",67,0:bg "bg\bg083.bmp",10,1500:goto *sean0203a
if %bwait=215 lsp 699,":a;chara\alice_st91b.bmp",67,0:lsp 700,":a;chara\alice_st01b.bmp",67,0:bg "bg\bg164.bmp",10,1500:goto *sean0279a



*zukan_centa

mov $zname,"Centaur Girl"
mov $zlavel,"centa"
itoa2 $zukan_ko,%2566
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2566=0 mov %ryozyoku1,0
if %2566>0 mov %ryozyoku1,1
if %2566=0 mov %zukancg,0
if %2566>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"QT"
mov $zukan_hp,"PTOO"
mov $zukan_skill1,"Centaur Kiss"
mov %zukan_skillc1,3263
mov $zukan_skill2,"Centaur Handjob"
mov %zukan_skillc2,3264
mov $zukan_skill3,"Centaur Blowjob"
mov %zukan_skillc3,3265
mov $zukan_skill4,"Centaur Rape"
mov %zukan_skillc4,3266
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_centa_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\centa.jpg",400,0
goto *zukan_kihonbtn



*zukan_centa_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\centa_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\centa_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\centa_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\centa_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\centa_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\centa_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\centa_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\centa_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_centa_cg

lsp 500,":c;bg\bg077.bmp",0,0
lsp 430,":a;chara\centa_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\centa_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\centa_ct02.bmp",0,0
lsp 430,":a;chara\centa_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\centa_ct03.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_centa_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,25
mov %skill01,7
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *centa_start
if %bwait=211 mov %nanido,2:goto *centa_start
if %bwait=212 mov %nanido,3:goto *centa_start
lsp 700,":a;chara\centa_st02.bmp",0,0
bg "bg\bg077.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *centa_h



*zukan_kaeru

mov $zname,"Frog Girls"
mov $zlavel,"kaeru"
itoa2 $zukan_ko,%2567
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,2
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,2
if %2820=0 mov %ryozyoku1,0
if %2820>0 mov %ryozyoku1,1
if %2821=0 mov %ryozyoku2,0
if %2821>0 mov %ryozyoku2,1
if %2567=0 mov %zukancg,0
if %2567>0 mov %zukancg,1
mov %zukan_x1,-42
mov %zukan_x2,158
mov $zukan_lv,"QU"
mov $zukan_hp,"PUOO"
mov $zukan_skill1,"Frog Handjob"
mov %zukan_skillc1,3267
mov $zukan_skill2,"Frog Footjob"
mov %zukan_skillc2,3268
mov $zukan_skill3,"Frog Tit Fuck"
mov %zukan_skillc3,3269
mov $zukan_skill4,"Full-Body Licking Attack"
mov %zukan_skillc4,3270
mov $zukan_skill5,"Groin Licking Attack"
mov %zukan_skillc5,3271
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_kaeru_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\frog.jpg",400,0
goto *zukan_kihonbtn



*zukan_kaeru_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\kaerua_st01.bmp",%zukan_x0,50
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\kaerua_st02.bmp",%zukan_x0,50
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\kaerua_st03.bmp",%zukan_x0,50
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\kaerub_st01.bmp",%zukan_x0-4,50
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\kaerub_st02.bmp",%zukan_x0-4,50
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\kaerub_st03.bmp",%zukan_x0-4,50
if %zukan_bukkake1=1 && %zukan_pozu=1 lsp 441,":a;chara\kaerua_bk01.bmp",%zukan_x0,50
if %zukan_bukkake1=1 && %zukan_pozu=2 lsp 441,":a;chara\kaerub_bk01.bmp",%zukan_x0-4,50
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 && %zukan_pozu=1 lsp 442,":a;chara\kaerua_bk02.bmp",%zukan_x0,50
if %zukan_bukkake2=1 && %zukan_pozu=2 lsp 442,":a;chara\kaerub_bk02.bmp",%zukan_x0-4,50
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 && %zukan_pozu=1 lsp 443,":a;chara\kaerua_bk03.bmp",%zukan_x0,50
if %zukan_bukkake3=1 && %zukan_pozu=2 lsp 443,":a;chara\kaerub_bk03.bmp",%zukan_x0-4,50
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 && %zukan_pozu=1 lsp 444,":a;chara\kaerua_bk04.bmp",%zukan_x0,50
if %zukan_bukkake4=1 && %zukan_pozu=2 lsp 444,":a;chara\kaerub_bk04.bmp",%zukan_x0-4,50
if %zukan_bukkake4=0 csp 444
return



*zukan_kaeru_cg

lsp 500,":c;bg\bg079.bmp",0,0
if %2820=0 skip 15
lsp 430,":c;chara\kaeru_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\kaeru_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\kaeru_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\kaeru_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\kaeru_ha5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\kaeru_ha6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\kaeru_ha7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %2821=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\kaeru_hb0.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\kaeru_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\kaeru_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\kaeru_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\kaeru_hb4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_kaeru_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,26
mov %skill01,8
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *kaeru_start
if %bwait=211 mov %nanido,2:goto *kaeru_start
if %bwait=212 mov %nanido,3:goto *kaeru_start
if %bwait=213 lsp 700,":c;chara\kaeru_ha1.bmp",0,0:print 10,500
if %bwait=214 lsp 700,":a;chara\kaerua_st02.bmp",0,50
if %bwait=214 lsp 702,":a;chara\kaerub_st02.bmp",360,50
bg "bg\bg079.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *kaeru_ha
if %bwait=214 goto *kaeru_hb



*zukan_alraune

mov $zname,"Alraune"
mov $zlavel,"alraune"
itoa2 $zukan_ko,%2568
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2568=0 mov %ryozyoku1,0
if %2568>0 mov %ryozyoku1,1
if %2568=0 mov %zukancg,0
if %2568>0 mov %zukancg,1
mov %zukan_x1,-53
mov %zukan_x2,147
mov $zukan_lv,"QU"
mov $zukan_hp,"PVOO"
mov $zukan_skill1,"Alraune's Blowjob"
mov %zukan_skillc1,3272
mov $zukan_skill2,"Alraune's Tit Fuck"
mov %zukan_skillc2,3273
mov $zukan_skill3,"Alraune's Fragrance"
mov %zukan_skillc3,3274
mov $zukan_skill4,"Succubus Flower"
mov %zukan_skillc4,3275
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_alraune_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\alraune.jpg",400,0
goto *zukan_kihonbtn



*zukan_alraune_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\alraune_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\alraune_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\alraune_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\alraune_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\alraune_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\alraune_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
return



*zukan_alraune_cg

lsp 500,":c;bg\bg078.bmp",0,0
lsp 430,":a;chara\alraune_st02.bmp",147,0
lsp 420,":a;chara\alraune_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\alraune_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\alraune_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\alraune_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alraune_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alraune_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alraune_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alraune_h5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alraune_h6.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_alraune_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,26
mov %skill01,8
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *alraune_start
if %bwait=211 mov %nanido,2:goto *alraune_start
if %bwait=212 mov %nanido,3:goto *alraune_start
lsp 700,":a;chara\alraune_st02.bmp",147,0
bg "bg\bg078.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *alraune_h



*zukan_durahan

mov $zname,"Dullahan"
mov $zlavel,"durahan"
itoa2 $zukan_ko,%2569
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2569=0 mov %ryozyoku1,0
if %2569>0 mov %ryozyoku1,1
if %2569=0 mov %zukancg,0
if %2569>0 mov %zukancg,1
mov %zukan_x1,28
mov %zukan_x2,228
mov $zukan_lv,"QV"
mov $zukan_hp,"QOOO"
mov $zukan_skill1,"Degeneration: Hand"
mov %zukan_skillc1,3276
mov $zukan_skill2,"Degeneration: Breast"
mov %zukan_skillc2,3277
mov $zukan_skill3,"Degeneration: Hair"
mov %zukan_skillc3,3278
mov $zukan_skill4,"Degeneration: Mouth"
mov %zukan_skillc4,3279
mov $zukan_skill5,"Restraint: Hand"
mov %zukan_skillc5,3280
mov $zukan_skill6,"Restraint: Breast"
mov %zukan_skillc6,3281
mov $zukan_skill7,"Restraint: Hair"
mov %zukan_skillc7,3282
mov $zukan_skill8,"Restraint: Mouth"
mov %zukan_skillc8,3283
mov $zukan_skill9,"Kiss of Ecstasy"
mov %zukan_skillc9,3284
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_durahan_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\dulla.jpg",400,0
goto *zukan_kihonbtn



*zukan_durahan_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\durahan_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\durahan_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\durahan_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\durahan_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\durahan_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\durahan_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\durahan_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\durahan_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_durahan_cg

lsp 500,":c;bg\bg084.bmp",0,0
lsp 430,":a;chara\durahan_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\durahan_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\durahan_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\durahan_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\durahan_h5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\durahan_h6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\durahan_h7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\durahan_h8.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_durahan_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,26
mov %skill01,8
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *durahan_start
if %bwait=211 mov %nanido,2:goto *durahan_start
if %bwait=212 mov %nanido,3:goto *durahan_start
lsp 700,":a;chara\durahan_st02.bmp",228,0
bg "bg\bg084.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *durahan_h



*zukan_kerberos

mov $zname,"Cerberus"
mov $zlavel,"kerberos"
itoa2 $zukan_ko,%2570
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,2
if %2822=0 mov %ryozyoku1,0
if %2822>0 mov %ryozyoku1,1
if %2823=0 mov %ryozyoku2,0
if %2823>0 mov %ryozyoku2,1
if %2570=0 mov %zukancg,0
if %2570>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"QV"
mov $zukan_hp,"QOOO"
mov $zukan_skill1,"Shake Job"
mov %zukan_skillc1,3285
mov $zukan_skill2,"Triple Tit Fuck"
mov %zukan_skillc2,3286
mov $zukan_skill3,"Triple Blowjob"
mov %zukan_skillc3,3287
mov $zukan_skill4,"Evil Dog's Adultery"
mov %zukan_skillc4,3288
mov $zukan_skill5,"Wild Shake"
mov %zukan_skillc5,3289
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_kerberos_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\cerb.jpg",400,0
goto *zukan_kihonbtn



*zukan_kerberos_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\kerberos_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\kerberos_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\kerberos_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\kerberos_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\kerberos_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\kerberos_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\kerberos_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
return



*zukan_kerberos_cg

lsp 500,":c;bg\bg084.bmp",0,0
lsp 430,":a;chara\kerberos_st02.bmp",0,0
lsp 420,":a;chara\kerberos_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kerberos_ct02.bmp",0,0
lsp 421,":a;chara\kerberos_bk04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kerberos_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kerberos_ct04.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_kerberos_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,27
mov %skill01,8
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *kerberos_start
if %bwait=211 mov %nanido,2:goto *kerberos_start
if %bwait=212 mov %nanido,3:goto *kerberos_start
lsp 700,":a;chara\kerberos_st02.bmp",0,0
bg "bg\bg084.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *kerberos_ha
if %bwait=214 goto *kerberos_hb



*zukan_arumaeruma2

mov $zname,"Alma Elma"
mov $zlavel,"arumaeruma2"
itoa2 $zukan_ko,%2571
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,2
mov %zukan_bukkakenum,6
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,2
if %2824=0 mov %ryozyoku1,0
if %2824>0 mov %ryozyoku1,1
if %2825=0 mov %ryozyoku2,0
if %2825>0 mov %ryozyoku2,1
if %2571=0 mov %zukancg,0
if %2571>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PQT"
mov $zukan_hp,"PTOOO"
mov $zukan_skill1,"Melty Hand"
mov %zukan_skillc1,3290
mov $zukan_skill2,"Sweet Blow"
mov %zukan_skillc2,3291
mov $zukan_skill3,"Succubatic Footwork"
mov %zukan_skillc3,3292
mov $zukan_skill4,"Succubus Arts"
mov %zukan_skillc4,3602
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_arumaeruma2_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\alma2.jpg",400,0
goto *zukan_kihonbtn



*zukan_arumaeruma2_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\arumaeruma_st21.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\arumaeruma_st22.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\arumaeruma_st23.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\arumaeruma_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\arumaeruma_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\arumaeruma_st13.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_bukkake1=1 lsp 441,":a;chara\arumaeruma_bk01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_bukkake2=1 lsp 442,":a;chara\arumaeruma_bk02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_bukkake3=1 lsp 443,":a;chara\arumaeruma_bk03.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_bukkake4=1 lsp 444,":a;chara\arumaeruma_bk04.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_bukkake5=1 lsp 445,":a;chara\arumaeruma_bk13.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_bukkake6=1 lsp 446,":a;chara\arumaeruma_bk16.bmp",%zukan_x0,0
return



*zukan_arumaeruma2_cg

lsp 500,":c;bg\bg084.bmp",0,0
if %2824=0 skip 9
lsp 430,":a;chara\arumaeruma_he1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\arumaeruma_he2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\arumaeruma_he3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\arumaeruma_he4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %2825=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\arumaeruma_hf1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\arumaeruma_ct11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\arumaeruma_ct12.bmp",0,0
lsp 430,":a;chara\arumaeruma_hf2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\arumaeruma_ct13.bmp",0,0
lsp 430,":a;chara\arumaeruma_hf3.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_arumaeruma2_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,28
mov %skill01,8
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *arumaeruma2_start
if %bwait=211 mov %nanido,2:goto *arumaeruma2_start
if %bwait=212 mov %nanido,3:goto *arumaeruma2_start
lsp 700,":a;chara\arumaeruma_st22.bmp",0,0
bg "bg\bg084.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Alma Elma"
if %bwait=213 goto *arumaeruma2_ha
if %bwait=214 goto *arumaeruma2_hb



*zukan_yukionna

mov $zname,"Yuki-onna"
mov $zlavel,"yukionna"
itoa2 $zukan_ko,%2572
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,2
if %2826=0 mov %ryozyoku1,0
if %2826>0 mov %ryozyoku1,1
if %2827=0 mov %ryozyoku2,0
if %2827>0 mov %ryozyoku2,1
if %2572=0 mov %zukancg,0
if %2572>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"QW"
mov $zukan_hp,"PWOO"
mov $zukan_skill1,"Icicle Hair"
mov %zukan_skillc1,3293
mov $zukan_skill2,"Ice Handjob"
mov %zukan_skillc2,3294
mov $zukan_skill3,"Freezing Mouth"
mov %zukan_skillc3,3295
mov $zukan_skill4,"Frozen Kiss"
mov %zukan_skillc4,3296
mov $zukan_skill5,"Chilling Embrace"
mov %zukan_skillc5,3297
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_yukionna_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\yuki.jpg",400,0
goto *zukan_kihonbtn



*zukan_yukionna_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\yukionna_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\yukionna_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\yukionna_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\yukionna_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\yukionna_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\yukionna_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\yukionna_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\yukionna_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_yukionna_cg

lsp 500,":c;bg\bg085.bmp",0,0
if %2826=0 skip 13
lsp 430,":a;chara\yukionna_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\yukionna_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\yukionna_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\yukionna_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\yukionna_h5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\yukionna_h6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %2827=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\yukionna_st11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\yukionna_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\yukionna_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\yukionna_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\yukionna_ct04.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_yukionna_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,28
mov %skill01,8
mov %skill02,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *yukionna_start
if %bwait=211 mov %nanido,2:goto *yukionna_start
if %bwait=212 mov %nanido,3:goto *yukionna_start
if %bwait=213 lsp 700,":a;chara\yukionna_st02.bmp",0,0
if %bwait=214 lsp 700,":a;chara\yukionna_st11.bmp",0,0
bg "bg\bg085.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *yukionna_ha
if %bwait=214 goto *yukionna_hb



*zukan_nekomata

mov $zname,"Nekomata"
mov $zlavel,"nekomata"
itoa2 $zukan_ko,%2573
mov %zukan_hyouzyonum,7
mov %zukan_pozunum,1
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2573=0 mov %ryozyoku1,0
if %2573>0 mov %ryozyoku1,1
if %2573=0 mov %zukancg,0
if %2573>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"QW"
mov $zukan_hp,"PWOO"
mov $zukan_skill1,"Bushy Tailjob"
mov %zukan_skillc1,3298
mov $zukan_skill2,"Squishy Pawjob"
mov %zukan_skillc2,3299
mov $zukan_skill3,"Hairy Tit Fuck"
mov %zukan_skillc3,3300
mov $zukan_skill4,"Rough Tongue Blowjob"
mov %zukan_skillc4,3301
mov $zukan_skill5,"Cat in Heat"
mov %zukan_skillc5,3302
mov $zukan_skill6,"Perverted Cat"
mov %zukan_skillc6,3303
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_nekomata_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\neko.jpg",400,0
goto *zukan_kihonbtn



*zukan_nekomata_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\nekomata_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\nekomata_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\nekomata_st03.bmp",%zukan_x0,0
if %zukan_hyouzyo=4 lsp 450,":a;chara\nekomata_st04.bmp",%zukan_x0,0
if %zukan_hyouzyo=5 lsp 450,":a;chara\nekomata_st05.bmp",%zukan_x0,0
if %zukan_hyouzyo=6 lsp 450,":a;chara\nekomata_st06.bmp",%zukan_x0,0
if %zukan_hyouzyo=7 lsp 450,":a;chara\nekomata_st07.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\nekomata_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\nekomata_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\nekomata_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\nekomata_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\nekomata_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_nekomata_cg

lsp 500,":c;bg\bg086.bmp",0,0
lsp 430,":a;chara\nekomata_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\nekomata_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\nekomata_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\nekomata_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\nekomata_h5.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_nekomata_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,28
mov %skill01,8
mov %skill02,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *nekomata_start
if %bwait=211 mov %nanido,2:goto *nekomata_start
if %bwait=212 mov %nanido,3:goto *nekomata_start
lsp 700,":a;chara\nekomata_st02.bmp",0,0
bg "bg\bg086.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *nekomata_h



*zukan_samuraielf

mov $zname,"Samurai Elf"
mov $zlavel,"samuraielf"
itoa2 $zukan_ko,%2574
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2574=0 mov %ryozyoku1,0
if %2574>0 mov %ryozyoku1,1
if %2574=0 mov %zukancg,0
if %2574>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"QX"
mov $zukan_hp,"PQOO"
mov $zukan_skill1,"Double Handjob"
mov %zukan_skillc1,3304
mov $zukan_skill2,"Double Breast Pressure"
mov %zukan_skillc2,3305
mov $zukan_skill3,"Double Mouth Attack"
mov %zukan_skillc3,3306
mov $zukan_skill4,"Choking Breast Pin"
mov %zukan_skillc4,3307
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_samuraielf_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\samu.jpg",400,0
goto *zukan_kihonbtn



*zukan_samuraielf_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\samuraielf_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\samuraielf_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\samuraielf_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\samuraielf_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\samuraielf_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\samuraielf_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\samuraielf_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\samuraielf_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_samuraielf_cg

lsp 500,":c;bg\bg086.bmp",0,0
lsp 430,":a;chara\samuraielf_st02.bmp",0,0
lsp 420,":a;chara\samuraielf_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\samuraielf_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\samuraielf_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\samuraielf_ct04.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_samuraielf_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,29
mov %skill01,8
mov %skill02,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *waelf_start
if %bwait=211 mov %nanido,2:goto *waelf_start
if %bwait=212 mov %nanido,3:goto *waelf_start
lsp 700,":a;chara\samuraielf_st02.bmp",-170,0
lsp 702,":a;chara\kunoitielf_st02.bmp",170,0
bg "bg\bg086.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Samurai Elf"
if %bwait=213 goto *waelf_ha



*zukan_kunoitielf

mov $zname,"Kunoichi Elf"
mov $zlavel,"kunoitielf"
itoa2 $zukan_ko,%2643
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,6
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2643=0 mov %ryozyoku1,0
if %2643>0 mov %ryozyoku1,1
if %2643=0 mov %zukancg,0
if %2643>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"QX"
mov $zukan_hp,"PSOO"
mov $zukan_skill1,"Leg Skill: Trample"
mov %zukan_skillc1,3664
mov $zukan_skill2,"Hand Skill: Spider"
mov %zukan_skillc2,3308
mov $zukan_skill3,"Breast Skill: Pressure"
mov %zukan_skillc3,3309
mov $zukan_skill4,"Mouth Skill: Devour"
mov %zukan_skillc4,3310
mov $zukan_skill5,"Ultimate Skill: Pussy Exhaustion"
mov %zukan_skillc5,3311
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_kunoitielf_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\kuno.jpg",400,0
goto *zukan_kihonbtn



*zukan_kunoitielf_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\kunoitielf_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\kunoitielf_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\kunoitielf_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\kunoitielf_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\kunoitielf_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\kunoitielf_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\kunoitielf_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\kunoitielf_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\kunoitielf_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
return



*zukan_kunoitielf_cg

lsp 500,":c;bg\bg086.bmp",0,0
lsp 430,":a;chara\kunoitielf_st02.bmp",0,0
lsp 420,":a;chara\kunoitielf_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kunoitielf_ct02.bmp",0,0
lsp 421,":a;chara\kunoitielf_bk05.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kunoitielf_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kunoitielf_ct04.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_kunoitielf_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,29
mov %skill01,8
mov %skill02,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *waelf_start
if %bwait=211 mov %nanido,2:goto *waelf_start
if %bwait=212 mov %nanido,3:goto *waelf_start
lsp 700,":a;chara\kunoitielf_st02.bmp",0,0
bg "bg\bg086.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Kunoichi Elf"
if %bwait=213 goto *waelf_hb



*zukan_yamatanooroti

mov $zname,"Yamata no Orochi"
mov $zlavel,"yamatanooroti"
itoa2 $zukan_ko,%2575
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,2
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2575=0 mov %ryozyoku1,0
if %2575>0 mov %ryozyoku1,1
if %2575=0 mov %zukancg,0
if %2575>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"UT"
mov $zukan_hp,"XTOO"
mov $zukan_skill1,"Sacrifice Tasting"
mov %zukan_skillc1,3312
mov $zukan_skill2,"Eight Head Assault"
mov %zukan_skillc2,3313
mov $zukan_skill3,"Unending Licking"
mov %zukan_skillc3,3314
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_yamatanooroti_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\yamata.jpg",400,0
goto *zukan_kihonbtn



*zukan_yamatanooroti_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\yamatanooroti_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\yamatanooroti_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\yamatanooroti_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\yamatanooroti_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\yamatanooroti_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
return



*zukan_yamatanooroti_cg

lsp 500,":c;bg\bg092.bmp",0,0
lsp 430,":a;chara\yamatanooroti_h01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\yamatanooroti_h02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\yamatanooroti_h03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\yamatanooroti_h04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\yamatanooroti_h05.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\yamatanooroti_h06.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\yamatanooroti_h07.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\yamatanooroti_h08.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\yamatanooroti_h09.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\yamatanooroti_h10.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\yamatanooroti_h11.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_yamatanooroti_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,29
mov %skill01,8
mov %skill02,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *yamatanooroti_start
if %bwait=211 mov %nanido,2:goto *yamatanooroti_start
if %bwait=212 mov %nanido,3:goto *yamatanooroti_start
lsp 700,":a;chara\yamatanooroti_st02.bmp",0,0
bg "bg\bg092.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *yamatanooroti_h



*zukan_moss

mov $zname,"Moth Girl"
mov $zlavel,"moss"
itoa2 $zukan_ko,%2576
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2576=0 mov %ryozyoku1,0
if %2576>0 mov %ryozyoku1,1
if %2576=0 mov %zukancg,0
if %2576>0 mov %zukancg,1
mov %zukan_x1,30
mov %zukan_x2,230
mov $zukan_lv,"RO"
mov $zukan_hp,"PQOO"
mov $zukan_skill1,"Six-Legged Caress"
mov %zukan_skillc1,3316
mov $zukan_skill2,"Double Bug Tit Fuck"
mov %zukan_skillc2,3318
mov $zukan_skill3,"Double Bug Blowjob"
mov %zukan_skillc3,3319
mov $zukan_skill4,"Pheromone Scales"
mov %zukan_skillc4,3315
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_moss_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\moth.jpg",400,0
goto *zukan_kihonbtn



*zukan_moss_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\moss_st01.bmp",%zukan_x0,60
if %zukan_hyouzyo=2 lsp 450,":a;chara\moss_st02.bmp",%zukan_x0,60
if %zukan_hyouzyo=3 lsp 450,":a;chara\moss_st03.bmp",%zukan_x0,60
if %zukan_bukkake1=1 lsp 441,":a;chara\moss_bk01.bmp",%zukan_x0,60
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\moss_bk02.bmp",%zukan_x0,60
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\moss_bk03.bmp",%zukan_x0,60
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\moss_bk04.bmp",%zukan_x0,60
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\moss_bk05.bmp",%zukan_x0,60
if %zukan_bukkake5=0 csp 445
return



*zukan_moss_cg

lsp 500,":c;bg\bg093.bmp",0,0
lsp 430,":a;chara\moss_h1.bmp",0,0
lsp 420,":a;chara\moss_ct01.bmp",440,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\moss_h2.bmp",0,0
lsp 420,":a;chara\moss_ct02.bmp",440,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\moss_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\moss_h4.bmp",0,0
lsp 420,":a;chara\moss_ct03.bmp",440,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_moss_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,30
mov %skill01,8
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *insects_start
if %bwait=211 mov %nanido,2:goto *insects_start
if %bwait=212 mov %nanido,3:goto *insects_start
lsp 700,":a;chara\moss_st02.bmp",-50,50
lsp 702,":a;chara\mosquito_st02.bmp",450,50
lsp 704,":a;chara\imomusi_st02.bmp",210,160
bg "bg\bg093.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Moth Girl"
if %bwait=213 goto *insects_ha



*zukan_mosquito

mov $zname,"Mosquito Girl"
mov $zlavel,"mosquito"
itoa2 $zukan_ko,%2644
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2644=0 mov %ryozyoku1,0
if %2644>0 mov %ryozyoku1,1
if %2644=0 mov %zukancg,0
if %2644>0 mov %zukancg,1
mov %zukan_x1,30
mov %zukan_x2,180
mov $zukan_lv,"RO"
mov $zukan_hp,"PQOO"
mov $zukan_skill1,"Mosquito Handjob"
mov %zukan_skillc1,3317
mov $zukan_skill2,"Double Bug Tit Fuck"
mov %zukan_skillc2,3318
mov $zukan_skill3,"Double Bug Blowjob"
mov %zukan_skillc3,3319
mov $zukan_skill4,"Mosquito Tit Fuck"
mov %zukan_skillc4,3320
mov $zukan_skill5,"Double Insect Blowjob"
mov %zukan_skillc5,3321
mov $zukan_skill6,"Mosquito Drain"
mov %zukan_skillc6,3585
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_mosquito_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\mosq.jpg",400,0
goto *zukan_kihonbtn



*zukan_mosquito_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\mosquito_st01.bmp",%zukan_x0,50
if %zukan_hyouzyo=2 lsp 450,":a;chara\mosquito_st02.bmp",%zukan_x0,50
if %zukan_hyouzyo=3 lsp 450,":a;chara\mosquito_st03.bmp",%zukan_x0,50
if %zukan_bukkake1=1 && %zukan_hyouzyo=1 lsp 441,":a;chara\mosquito_bk01a.bmp",%zukan_x0,50
if %zukan_bukkake1=1 && %zukan_hyouzyo=2 lsp 441,":a;chara\mosquito_bk01b.bmp",%zukan_x0,50
if %zukan_bukkake1=1 && %zukan_hyouzyo=3 lsp 441,":a;chara\mosquito_bk01c.bmp",%zukan_x0,50
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\mosquito_bk02.bmp",%zukan_x0,50
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\mosquito_bk03.bmp",%zukan_x0,50
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\mosquito_bk04.bmp",%zukan_x0,50
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\mosquito_bk05.bmp",%zukan_x0,50
if %zukan_bukkake5=0 csp 445
return



*zukan_mosquito_cg

lsp 500,":c;bg\bg093.bmp",0,0
lsp 430,":a;chara\mosquito_h1.bmp",0,0
lsp 420,":a;chara\mosquito_ct01.bmp",440,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mosquito_h2.bmp",0,0
lsp 420,":a;chara\mosquito_ct02.bmp",440,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mosquito_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mosquito_h4.bmp",0,0
lsp 420,":a;chara\mosquito_ct03.bmp",440,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_mosquito_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,30
mov %skill01,8
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *insects_start
if %bwait=211 mov %nanido,2:goto *insects_start
if %bwait=212 mov %nanido,3:goto *insects_start
lsp 700,":a;chara\mosquito_st02.bmp",380,50
lsp 702,":a;chara\imomusi_st02.bmp",0,160
bg "bg\bg093.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Mosquito Girl"
if %bwait=213 goto *insects_hb



*zukan_imomusi

mov $zname,"Caterpillar Girl"
mov $zlavel,"imomusi"
itoa2 $zukan_ko,%2645
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,2
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2645=0 mov %ryozyoku1,0
if %2645>0 mov %ryozyoku1,1
if %2645=0 mov %zukancg,0
if %2645>0 mov %zukancg,1
mov %zukan_x1,-20
mov %zukan_x2,180
mov $zukan_lv,"QQ"
mov $zukan_hp,"WOO"
mov $zukan_skill1,"Double Insect Blowjob"
mov %zukan_skillc1,3321
mov $zukan_skill2,"Sticky Silk"
mov %zukan_skillc2,3322
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_imomusi_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\cater.jpg",400,0
goto *zukan_kihonbtn



*zukan_imomusi_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\imomusi_st01.bmp",%zukan_x0,140
if %zukan_hyouzyo=2 lsp 450,":a;chara\imomusi_st02.bmp",%zukan_x0,140
if %zukan_hyouzyo=3 lsp 450,":a;chara\imomusi_st03.bmp",%zukan_x0,140
if %zukan_bukkake1=1 lsp 441,":a;chara\imomusi_bk01.bmp",%zukan_x0,140
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\imomusi_bk02.bmp",%zukan_x0,140
if %zukan_bukkake2=0 csp 442
return



*zukan_imomusi_cg

lsp 500,":c;bg\bg093.bmp",0,0
lsp 430,":a;chara\imomusi_h1a.bmp",180,160
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\imomusi_h2a.bmp",180,160
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\imomusi_h1.bmp",180,160
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\imomusi_h2.bmp",180,160
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\imomusi_h3.bmp",180,160
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\imomusi_h4.bmp",180,160
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_imomusi_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,30
mov %skill01,8
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *insects_start
if %bwait=211 mov %nanido,2:goto *insects_start
if %bwait=212 mov %nanido,3:goto *insects_start
lsp 700,":a;chara\mosquito_st02.bmp",380,50
lsp 702,":a;chara\imomusi_st02.bmp",0,160
bg "bg\bg093.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Caterpillar Girl"
if %bwait=213 goto *insects_hc



*zukan_mukade

mov $zname,"Centipede Girl"
mov $zlavel,"mukade"
itoa2 $zukan_ko,%2577
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2577=0 mov %ryozyoku1,0
if %2577>0 mov %ryozyoku1,1
if %2577=0 mov %zukancg,0
if %2577>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"RO"
mov $zukan_hp,"PWOO"
mov $zukan_skill1,"Sweet Mouth"
mov %zukan_skillc1,3323
mov $zukan_skill2,"Centipede Attack"
mov %zukan_skillc2,3324
mov $zukan_skill3,"Centipede Trample"
mov %zukan_skillc3,3325
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_mukade_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\centi.jpg",400,0
goto *zukan_kihonbtn



*zukan_mukade_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\mukade_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\mukade_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\mukade_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\mukade_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\mukade_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\mukade_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
return



*zukan_mukade_cg

lsp 500,":c;bg\bg094.bmp",0,0
lsp 430,":a;chara\mukade_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\mukade_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mukade_h2.bmp",0,0
lsp 420,":a;chara\mukade_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\mukade_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\mukade_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mukade_h4.bmp",0,0
lsp 420,":a;chara\mukade_ct04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mukade_h5.bmp",0,0
lsp 420,":a;chara\mukade_ct05.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\mukade_ct06.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_mukade_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,30
mov %skill01,8
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *mukade_start
if %bwait=211 mov %nanido,2:goto *mukade_start
if %bwait=212 mov %nanido,3:goto *mukade_start
lsp 700,":a;chara\mukade_st02.bmp",0,0
bg "bg\bg094.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *mukade_h



*zukan_kaiko

mov $zname,"Silkworm Girl"
mov $zlavel,"kaiko"
itoa2 $zukan_ko,%2578
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2578=0 mov %ryozyoku1,0
if %2578>0 mov %ryozyoku1,1
if %2578=0 mov %zukancg,0
if %2578>0 mov %zukancg,1
mov %zukan_x1,-230
mov %zukan_x2,0
mov $zukan_lv,"RP"
mov $zukan_hp,"QOOO"
mov $zukan_skill1,"Silky Blowjob"
mov %zukan_skillc1,3326
mov $zukan_skill2,"Silky Tit Fuck"
mov %zukan_skillc2,3327
mov $zukan_skill3,"Silky Pleasure"
mov %zukan_skillc3,3328
mov $zukan_skill4,"Intoxicating Cocoon"
mov %zukan_skillc4,3329
mov $zukan_skill5,"Semen Sucking Cocoon"
mov %zukan_skillc5,3330
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_kaiko_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\silk.jpg",400,0
goto *zukan_kihonbtn



*zukan_kaiko_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\kaiko_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\kaiko_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\kaiko_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\kaiko_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\kaiko_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\kaiko_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
return



*zukan_kaiko_cg

lsp 500,":c;bg\bg094.bmp",0,0
lsp 430,":a;chara\kaiko_st01.bmp",0,0
lsp 420,":a;chara\kumo_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kumo_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kumo_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kumo_ct04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\kaiko_h01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kaiko_h11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kaiko_h12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kaiko_h13.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kaiko_h14.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kaiko_h15.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kaiko_h21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kaiko_h22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kaiko_h23.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kaiko_h24.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kaiko_h25.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_kaiko_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,31
mov %skill01,8
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *kaiko_start
if %bwait=211 mov %nanido,2:goto *kaiko_start
if %bwait=212 mov %nanido,3:goto *kaiko_start
lsp 700,":a;chara\kaiko_st02.bmp",0,0
bg "bg\bg094.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *kaiko_h



*zukan_suzumebati

mov $zname,"Hornet Girl"
mov $zlavel,"suzumebati"
itoa2 $zukan_ko,%2579
mov %zukan_hyouzyonum,2
mov %zukan_pozunum,1
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2579=0 mov %ryozyoku1,0
if %2579>0 mov %ryozyoku1,1
if %2579=0 mov %zukancg,0
if %2579>0 mov %zukancg,1
mov %zukan_x1,-180
mov %zukan_x2,0
mov $zukan_lv,"RP"
mov $zukan_hp,"QOOO"
mov $zukan_skill1,"Multiple Handjob"
mov %zukan_skillc1,3331
mov $zukan_skill2,"Honey Blowjob"
mov %zukan_skillc2,3332
mov $zukan_skill3,"Honey Rich Tit Fuck"
mov %zukan_skillc3,3333
mov $zukan_skill4,"Bee Dance"
mov %zukan_skillc4,3334
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_suzumebati_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\hornet.jpg",400,0
goto *zukan_kihonbtn



*zukan_suzumebati_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\suzumebati_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\suzumebati_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\suzumebati_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\suzumebati_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\suzumebati_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\suzumebati_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
return



*zukan_suzumebati_cg

lsp 500,":c;bg\bg022.bmp",0,0
lsp 430,":a;chara\suzumebati_st01.bmp",0,0
lsp 420,":a;chara\suzumebati_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\suzumebati_ct02.bmp",0,0
lsp 421,":a;chara\suzumebati_bk03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\suzumebati_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\suzumebati_ct04.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_suzumebati_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,31
mov %skill01,8
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *suzumebati_start
if %bwait=211 mov %nanido,2:goto *suzumebati_start
if %bwait=212 mov %nanido,3:goto *suzumebati_start
lsp 700,":a;chara\suzumebati_st01.bmp",0,0
bg "bg\bg022.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *suzumebati_h



*zukan_queenbee

mov $zname,"Queen Bee"
mov $zlavel,"queenbee"
itoa2 $zukan_ko,%2580
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2580=0 mov %ryozyoku1,0
if %2580>0 mov %ryozyoku1,1
if %2580=0 mov %zukancg,0
if %2580>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"ST"
mov $zukan_hp,"RQOO"
mov $zukan_skill1,"Queen's Hand"
mov %zukan_skillc1,3335
mov $zukan_skill2,"Queen's Bust"
mov %zukan_skillc2,3336
mov $zukan_skill3,"Queen's Mouth"
mov %zukan_skillc3,3337
mov $zukan_skill4,"Pheromone Kiss"
mov %zukan_skillc4,3338
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_queenbee_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\queen.jpg",400,0
goto *zukan_kihonbtn



*zukan_queenbee_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=1 lsp 450,":a;chara\queenbee_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\queenbee_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\queenbee_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\queenbee_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\queenbee_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\queenbee_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\queenbee_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\queenbee_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_queenbee_cg

lsp 500,":c;bg\bg022.bmp",0,0
lsp 430,":a;chara\queenbee_st02.bmp",0,0
lsp 420,":a;chara\queenbee_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\queenbee_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\queenbee_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\queenbee_ct04.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_queenbee_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,31
mov %skill01,8
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *queenbee_start
if %bwait=211 mov %nanido,2:goto *queenbee_start
if %bwait=212 mov %nanido,3:goto *queenbee_start
lsp 700,":a;chara\queenbee_st02.bmp",0,0
bg "bg\bg022.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *queenbee_h



*zukan_a_alm

mov $zname,"Alra Arum"
mov $zlavel,"a_alm"
itoa2 $zukan_ko,%2581
mov %zukan_hyouzyonum,2
mov %zukan_pozunum,1
mov %zukan_bukkakenum,6
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2581=0 mov %ryozyoku1,0
if %2581>0 mov %ryozyoku1,1
if %2581=0 mov %zukancg,0
if %2581>0 mov %zukancg,1
mov %zukan_x1,0
mov %zukan_x2,200
mov $zukan_lv,"RQ"
mov $zukan_hp,"PUOO"
mov $zukan_skill1,"Arum Tit Fuck"
mov %zukan_skillc1,3343
mov $zukan_skill2,"Arum Blowjob"
mov %zukan_skillc2,3344
mov $zukan_skill3,"Lewd Flowers"
mov %zukan_skillc3,3345
mov $zukan_skill4,"Monster Flower Suck"
mov %zukan_skillc4,3346
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_a_alm_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\arma.jpg",400,0
goto *zukan_kihonbtn



*zukan_a_alm_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\a_alm_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\a_alm_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\a_alm_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\a_alm_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\a_alm_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\a_alm_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\a_alm_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\a_alm_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
return



*zukan_a_alm_cg

lsp 500,":c;bg\bg022.bmp",0,0
lsp 430,":a;chara\a_alm_h1a.bmp",200,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\a_alm_ct01.bmp",480,0
lsp 430,":a;chara\a_alm_h2a.bmp",200,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\a_alm_ct02.bmp",480,0
lsp 430,":a;chara\a_alm_h3a.bmp",200,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\a_alm_ct03.bmp",480,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\a_alm_h1.bmp",200,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\a_alm_ct01.bmp",480,0
lsp 430,":a;chara\a_alm_h2.bmp",200,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\a_alm_ct02.bmp",480,0
lsp 430,":a;chara\a_alm_h3.bmp",200,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\a_alm_ct03.bmp",480,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_a_alm_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,32
mov %skill01,8
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *plants1_start
if %bwait=211 mov %nanido,2:goto *plants1_start
if %bwait=212 mov %nanido,3:goto *plants1_start
lsp 700,":a;chara\a_alm_st01.bmp",200,0
bg "bg\bg022.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Alra Arum"
if %bwait=213 goto *plants1_hb



*zukan_a_looty

mov $zname,"Alra Rooty"
mov $zlavel,"a_looty"
itoa2 $zukan_ko,%2646
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2646=0 mov %ryozyoku1,0
if %2646>0 mov %ryozyoku1,1
if %2646=0 mov %zukancg,0
if %2646>0 mov %zukancg,1
mov %zukan_x1,20
mov %zukan_x2,220
mov $zukan_lv,"RQ"
mov $zukan_hp,"PSOO"
mov $zukan_skill1,"Double Tit Fuck"
mov %zukan_skillc1,3339
mov $zukan_skill2,"Double Blowjob"
mov %zukan_skillc2,3340
mov $zukan_skill3,"Rooty Caress"
mov %zukan_skillc3,3341
mov $zukan_skill4,"Rooty Draw"
mov %zukan_skillc4,3342
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_a_looty_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\rooty.jpg",400,0
goto *zukan_kihonbtn



*zukan_a_looty_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\a_looty_st01.bmp",%zukan_x0,130
if %zukan_hyouzyo=2 lsp 450,":a;chara\a_looty_st02.bmp",%zukan_x0,130
if %zukan_hyouzyo=3 lsp 450,":a;chara\a_looty_st03.bmp",%zukan_x0,130
if %zukan_bukkake1=1 lsp 441,":a;chara\a_looty_bk01.bmp",%zukan_x0,130
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\a_looty_bk02.bmp",%zukan_x0,130
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\a_looty_bk03.bmp",%zukan_x0,130
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\a_looty_bk04.bmp",%zukan_x0,130
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\a_looty_bk05.bmp",%zukan_x0,130
if %zukan_bukkake5=0 csp 445
return



*zukan_a_looty_cg

lsp 500,":c;bg\bg022.bmp",0,0
lsp 430,":a;chara\a_looty_h1a.bmp",220,130
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\a_looty_h2a.bmp",220,130
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\a_looty_h3a.bmp",220,130
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\a_looty_h1.bmp",220,130
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\a_looty_h2.bmp",220,130
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\a_looty_h3.bmp",220,130
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\a_looty_h4.bmp",220,130
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_a_looty_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,32
mov %skill01,8
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *plants1_start
if %bwait=211 mov %nanido,2:goto *plants1_start
if %bwait=212 mov %nanido,3:goto *plants1_start
lsp 700,":a;chara\a_looty_st02.bmp",220,130
bg "bg\bg022.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Alra Rooty"
if %bwait=213 goto *plants1_ha



*zukan_a_vore

mov $zname,"Alra Vore"
mov $zlavel,"a_vore"
itoa2 $zukan_ko,%2582
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2582=0 mov %ryozyoku1,0
if %2582>0 mov %ryozyoku1,1
if %2582=0 mov %zukancg,0
if %2582>0 mov %zukancg,1
mov %zukan_x1,-30
mov %zukan_x2,170
mov $zukan_lv,"RQ"
mov $zukan_hp,"PROO"
mov $zukan_skill1,"Plant Suck"
mov %zukan_skillc1,3347
mov $zukan_skill2,"Plant Vore"
mov %zukan_skillc2,3348
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_a_vore_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\avore.jpg",400,0
goto *zukan_kihonbtn



*zukan_a_vore_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\a_vore_st01.bmp",%zukan_x0,90
if %zukan_hyouzyo=2 lsp 450,":a;chara\a_vore_st02.bmp",%zukan_x0,90
if %zukan_hyouzyo=3 lsp 450,":a;chara\a_vore_st03.bmp",%zukan_x0,90
if %zukan_bukkake1=1 lsp 441,":a;chara\a_vore_bk01.bmp",%zukan_x0,90
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\a_vore_bk02.bmp",%zukan_x0,90
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\a_vore_bk03.bmp",%zukan_x0,90
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\a_vore_bk04.bmp",%zukan_x0,90
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\a_vore_bk05.bmp",%zukan_x0,90
if %zukan_bukkake5=0 csp 445
return



*zukan_a_vore_cg

lsp 500,":c;bg\bg094.bmp",0,0
lsp 430,":a;chara\a_vore_h1a.bmp",170,90
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\a_vore_h2a.bmp",170,90
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\a_vore_ct01.bmp",440,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\a_vore_ct02.bmp",440,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\a_vore_ct03.bmp",440,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\a_vore_ct04.bmp",440,0
lsp 430,":a;chara\a_vore_h3a.bmp",170,90
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\a_vore_h1.bmp",170,90
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\a_vore_h2.bmp",170,90
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\a_vore_ct01.bmp",440,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\a_vore_ct02.bmp",440,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\a_vore_ct03.bmp",440,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\a_vore_ct04.bmp",440,0
lsp 430,":a;chara\a_vore_h3.bmp",170,90
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\a_vore_ct05.bmp",440,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\a_vore_h4.bmp",170,90
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\a_vore_h4.bmp",80,90
lsp 420,":a;chara\a_vore_ct11.bmp",400,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\a_vore_ct12.bmp",400,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\a_vore_ct13.bmp",400,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\a_vore_ct14.bmp",400,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\a_vore_ct15.bmp",400,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_a_vore_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,32
mov %skill01,8
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *plants2_start
if %bwait=211 mov %nanido,2:goto *plants2_start
if %bwait=212 mov %nanido,3:goto *plants2_start
lsp 700,":a;chara\a_vore_st02.bmp",170,130
bg "bg\bg094.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Alra Vore"
if %bwait=213 goto *plants2_ha



*zukan_a_parasol

mov $zname,"Alra Parasol"
mov $zlavel,"a_parasol"
itoa2 $zukan_ko,%2647
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,6
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2647=0 mov %ryozyoku1,0
if %2647>0 mov %ryozyoku1,1
if %2647=0 mov %zukancg,0
if %2647>0 mov %zukancg,1
mov %zukan_x1,50
mov %zukan_x2,250
mov $zukan_lv,"RQ"
mov $zukan_hp,"POOO"
mov $zukan_skill1,"Double Blowjob"
mov %zukan_skillc1,3349
mov $zukan_skill2,"Double Tit Fuck"
mov %zukan_skillc2,3350
mov $zukan_skill3,"Sweet Hand"
mov %zukan_skillc3,3351
mov $zukan_skill4,"Fungal Skirt"
mov %zukan_skillc4,3352
mov $zukan_skill5,"Seedbed Embrace"
mov %zukan_skillc5,3353
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_a_parasol_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\parasol.jpg",400,0
goto *zukan_kihonbtn



*zukan_a_parasol_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\a_parasol_st01.bmp",%zukan_x0,40
if %zukan_hyouzyo=2 lsp 450,":a;chara\a_parasol_st02.bmp",%zukan_x0,40
if %zukan_hyouzyo=3 lsp 450,":a;chara\a_parasol_st03.bmp",%zukan_x0,40
if %zukan_bukkake1=1 lsp 441,":a;chara\a_parasol_bk01.bmp",%zukan_x0,40
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\a_parasol_bk02.bmp",%zukan_x0,40
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\a_parasol_bk03.bmp",%zukan_x0,40
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\a_parasol_bk04.bmp",%zukan_x0,40
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\a_parasol_bk05.bmp",%zukan_x0,40
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\a_parasol_bk06.bmp",%zukan_x0,40
if %zukan_bukkake6=0 csp 446
return



*zukan_a_parasol_cg

lsp 500,":c;bg\bg094.bmp",0,0
lsp 430,":a;chara\a_parasol_h1a.bmp",250,40
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\a_parasol_h2a.bmp",250,40
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\a_parasol_h1.bmp",250,40
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\a_parasol_h2.bmp",250,40
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\a_parasol_h3.bmp",250,40
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\a_parasol_h4.bmp",250,40
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_a_parasol_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,32
mov %skill01,8
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *plants2_start
if %bwait=211 mov %nanido,2:goto *plants2_start
if %bwait=212 mov %nanido,3:goto *plants2_start
lsp 700,":a;chara\a_parasol_st02.bmp",250,30
bg "bg\bg094.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Alra Parasol"
if %bwait=213 goto *plants2_hb



*zukan_a_prison

mov $zname,"Alra Prison"
mov $zlavel,"a_prison"
itoa2 $zukan_ko,%2648
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,7
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2648=0 mov %ryozyoku1,0
if %2648>0 mov %ryozyoku1,1
if %2648=0 mov %zukancg,0
if %2648>0 mov %zukancg,1
mov %zukan_x1,-40
mov %zukan_x2,160
mov $zukan_lv,"RQ"
mov $zukan_hp,"POOO"
mov $zukan_skill1,"Flower Footjob"
mov %zukan_skillc1,3354
mov $zukan_skill2,"Flower Intercrural"
mov %zukan_skillc2,3355
mov $zukan_skill3,"Flower Prison"
mov %zukan_skillc3,3356
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_a_prison_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\prison.jpg",400,0
goto *zukan_kihonbtn



*zukan_a_prison_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\a_prison_st01.bmp",%zukan_x0,70
if %zukan_hyouzyo=2 lsp 450,":a;chara\a_prison_st02.bmp",%zukan_x0,70
if %zukan_hyouzyo=3 lsp 450,":a;chara\a_prison_st03.bmp",%zukan_x0,70
if %zukan_bukkake1=1 lsp 441,":a;chara\a_prison_bk01.bmp",%zukan_x0,70
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\a_prison_bk02.bmp",%zukan_x0,70
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\a_prison_bk03.bmp",%zukan_x0,70
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\a_prison_bk04.bmp",%zukan_x0,70
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\a_prison_bk05.bmp",%zukan_x0,70
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\a_prison_bk06.bmp",%zukan_x0,70
if %zukan_bukkake6=0 csp 446
if %zukan_bukkake7=1 lsp 447,":a;chara\a_prison_bk07.bmp",%zukan_x0,70
if %zukan_bukkake7=0 csp 447
return



*zukan_a_prison_cg

lsp 500,":c;bg\bg094.bmp",0,0
lsp 430,":a;chara\a_prison_h1.bmp",160,70
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\a_prison_ct01.bmp",480,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\a_prison_ct02.bmp",480,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\a_prison_ct03.bmp",480,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\a_prison_ct04.bmp",480,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\a_prison_ct05.bmp",480,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_a_prison_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,32
mov %skill01,8
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *plants2_start
if %bwait=211 mov %nanido,2:goto *plants2_start
if %bwait=212 mov %nanido,3:goto *plants2_start
lsp 700,":a;chara\a_prison_st02.bmp",160,70
bg "bg\bg094.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Alra Prison"
if %bwait=213 goto *plants2_hc



*zukan_a_emp

mov $zname,"Alra Priestess"
mov $zlavel,"a_emp"
itoa2 $zukan_ko,%2583
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,8
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2583=0 mov %ryozyoku1,0
if %2583>0 mov %ryozyoku1,1
if %2583=0 mov %zukancg,0
if %2583>0 mov %zukancg,1
mov %zukan_x1,-50
mov %zukan_x2,150
mov $zukan_lv,"RT"
mov $zukan_hp,"QUOO"
mov $zukan_skill1,"Priestess Hair"
mov %zukan_skillc1,3357
mov $zukan_skill2,"Priestess Foot"
mov %zukan_skillc2,3358
mov $zukan_skill3,"Priestess Bust"
mov %zukan_skillc3,3359
mov $zukan_skill4,"Priestess Mouth"
mov %zukan_skillc4,3360
mov $zukan_skill5,"Queen's Foot Hell"
mov %zukan_skillc5,3361
mov $zukan_skill6,"Queen's Semen Sucking"
mov %zukan_skillc6,3362
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_a_emp_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\prince.jpg",400,0
goto *zukan_kihonbtn



*zukan_a_emp_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\a_emp_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\a_emp_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\a_emp_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\a_emp_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\a_emp_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\a_emp_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\a_emp_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\a_emp_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\a_emp_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
if %zukan_bukkake7=1 lsp 447,":a;chara\a_emp_bk07.bmp",%zukan_x0,0
if %zukan_bukkake7=0 csp 447
if %zukan_bukkake8=1 lsp 448,":a;chara\a_emp_bk08.bmp",%zukan_x0,0
if %zukan_bukkake8=0 csp 448
return



*zukan_a_emp_cg

lsp 500,":c;bg\bg095.bmp",0,0
lsp 430,":a;chara\a_emp_ha1a.bmp",130,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\a_emp_ha2a.bmp",130,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\a_emp_ha3a.bmp",130,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\a_emp_ha1.bmp",130,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\a_emp_ha2.bmp",130,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\a_emp_ha3.bmp",130,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\a_emp_ha4.bmp",130,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\a_emp_hb1a.bmp",130,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\a_emp_hb2a.bmp",130,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\a_emp_hb3a.bmp",130,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\a_emp_hb4a.bmp",130,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\a_emp_hb1.bmp",130,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\a_emp_hb2.bmp",130,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\a_emp_hb3.bmp",130,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\a_emp_hb4.bmp",130,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_a_emp_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,33
mov %skill01,8
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *a_emp_start
if %bwait=211 mov %nanido,2:goto *a_emp_start
if %bwait=212 mov %nanido,3:goto *a_emp_start
lsp 700,":a;chara\a_emp_st02.bmp",150,0
bg "bg\bg095.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *a_emp_h



*zukan_dorothy

mov $zname,"Dorothy"
mov $zlavel,"dorothy"
itoa2 $zukan_ko,%2584
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2584=0 mov %ryozyoku1,0
if %2584>0 mov %ryozyoku1,1
if %2584=0 mov %zukancg,0
if %2584>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"RW"
mov $zukan_hp,"RROO"
mov $zukan_skill1,"Sticky Hairs"
mov %zukan_skillc1,3363
mov $zukan_skill2,"Trichome Penis Torture"
mov %zukan_skillc2,3364
mov $zukan_skill3,"Venus Trap"
mov %zukan_skillc3,3365
mov $zukan_skill4,"Philia Melt"
mov %zukan_skillc4,3366
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_dorothy_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\dorothy.jpg",400,0
goto *zukan_kihonbtn



*zukan_dorothy_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\dorothy_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\dorothy_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\dorothy_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\dorothy_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\dorothy_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\dorothy_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\dorothy_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
return



*zukan_dorothy_cg

lsp 500,":c;bg\bg095.bmp",0,0
lsp 430,":a;chara\dorothy_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\dorothy_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dorothy_h2.bmp",0,0
lsp 420,":a;chara\dorothy_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dorothy_h3.bmp",0,0
csp 420
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\dorothy_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dorothy_h4.bmp",0,0
lsp 420,":a;chara\dorothy_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dorothy_h5.bmp",0,0
lsp 420,":a;chara\dorothy_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dorothy_h6.bmp",0,0
lsp 420,":a;chara\dorothy_ct04.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_dorothy_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,33
mov %skill01,8
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *dorothy_start
if %bwait=211 mov %nanido,2:goto *dorothy_start
if %bwait=212 mov %nanido,3:goto *dorothy_start
lsp 700,":a;chara\dorothy_st02.bmp",0,0
bg "bg\bg095.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *dorothy_h



*zukan_rafi

mov $zname,"Raffia"
mov $zlavel,"rafi"
itoa2 $zukan_ko,%2585
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2585=0 mov %ryozyoku1,0
if %2585>0 mov %ryozyoku1,1
if %2585=0 mov %zukancg,0
if %2585>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"RX"
mov $zukan_hp,"RSOO"
mov $zukan_skill1,"Ivy Caress"
mov %zukan_skillc1,3367
mov $zukan_skill2,"Mini Pitcher"
mov %zukan_skillc2,3368
mov $zukan_skill3,"Intoxicating Pitcher"
mov %zukan_skillc3,3369
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_rafi_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\rafi.jpg",400,0
goto *zukan_kihonbtn



*zukan_rafi_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\rafi_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\rafi_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\rafi_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\rafi_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\rafi_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\rafi_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\rafi_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\rafi_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_rafi_cg

lsp 500,":c;bg\bg095.bmp",0,0
lsp 430,":a;chara\rafi_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\rafi_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\rafi_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\rafi_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\rafi_h5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\rafi_h6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\rafi_h3.bmp",0,0
lsp 420,":a;chara\rafi_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\rafi_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\rafi_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\rafi_ct04.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_rafi_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,33
mov %skill01,8
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *rafi_start
if %bwait=211 mov %nanido,2:goto *rafi_start
if %bwait=212 mov %nanido,3:goto *rafi_start
lsp 700,":a;chara\rafi_st02.bmp",0,0
bg "bg\bg095.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *rafi_h



*zukan_dina

mov $zname,"Deana"
mov $zlavel,"dina"
itoa2 $zukan_ko,%2586
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2586=0 mov %ryozyoku1,0
if %2586>0 mov %ryozyoku1,1
if %2586=0 mov %zukancg,0
if %2586>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"SO"
mov $zukan_hp,"RTOO"
mov $zukan_skill1,"Venus Bend"
mov %zukan_skillc1,3665
mov $zukan_skill2,"Venus Trap"
mov %zukan_skillc2,3666
mov $zukan_skill3,"Philia Melt"
mov %zukan_skillc3,3370
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_dina_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\deana.jpg",400,0
goto *zukan_kihonbtn



*zukan_dina_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\dina_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\dina_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\dina_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\dina_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\dina_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\dina_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
return



*zukan_dina_cg

lsp 500,":c;bg\bg095.bmp",0,0
lsp 430,":a;chara\dina_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dina_h2.bmp",0,0
lsp 420,":a;chara\dina_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dina_h3.bmp",0,0
lsp 420,":a;chara\dina_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dina_h4.bmp",0,0
lsp 420,":a;chara\dina_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dina_h5.bmp",0,0
lsp 420,":a;chara\dina_ct04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dina_h6.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_dina_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,33
mov %skill01,8
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *dina_start
if %bwait=211 mov %nanido,2:goto *dina_start
if %bwait=212 mov %nanido,3:goto *dina_start
lsp 700,":a;chara\dina_st02.bmp",0,0
bg "bg\bg095.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *dina_h



*zukan_jelly

mov $zname,"Jelly Girl"
mov $zlavel,"jelly"
itoa2 $zukan_ko,%2587
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2587=0 mov %ryozyoku1,0
if %2587>0 mov %ryozyoku1,1
if %2587=0 mov %zukancg,0
if %2587>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"RS"
mov $zukan_hp,"QTOO"
mov $zukan_skill1,"Jelly Press"
mov %zukan_skillc1,3371
mov $zukan_skill2,"Jelly Draw"
mov %zukan_skillc2,3372
mov $zukan_skill3,"Jelly Heaven"
mov %zukan_skillc3,3373
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_jelly_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\jellyg.jpg",400,0
goto *zukan_kihonbtn



*zukan_jelly_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\jelly_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\jelly_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\jelly_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\jelly_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\jelly_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\jelly_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
return



*zukan_jelly_cg

lsp 500,":c;bg\bg097.bmp",0,0
lsp 430,":a;chara\jelly_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\jelly_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\jelly_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\jelly_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\jelly_h5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\jelly_h6.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_jelly_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,34
mov %skill01,8
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *jelly_start
if %bwait=211 mov %nanido,2:goto *jelly_start
if %bwait=212 mov %nanido,3:goto *jelly_start
lsp 700,":a;chara\jelly_st02.bmp",0,0
bg "bg\bg097.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *jelly_h



*zukan_blob

mov $zname,"Blob Girl"
mov $zlavel,"blob"
itoa2 $zukan_ko,%2588
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2588=0 mov %ryozyoku1,0
if %2588>0 mov %ryozyoku1,1
if %2588=0 mov %zukancg,0
if %2588>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"RS"
mov $zukan_hp,"QVOO"
mov $zukan_skill1,"Blob Spread"
mov %zukan_skillc1,3374
mov $zukan_skill2,"Blob Draw"
mov %zukan_skillc2,3375
mov $zukan_skill3,"Blob Heaven"
mov %zukan_skillc3,3376
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_blob_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\blob.jpg",400,0
goto *zukan_kihonbtn



*zukan_blob_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\blob_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\blob_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\blob_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\blob_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\blob_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\blob_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
return



*zukan_blob_cg

lsp 500,":c;bg\bg097.bmp",0,0
lsp 430,":a;chara\blob_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\blob_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\blob_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\blob_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\blob_h5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\blob_h6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\blob_h7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\blob_h8.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\blob_h9.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_blob_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,34
mov %skill01,8
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *blob_start
if %bwait=211 mov %nanido,2:goto *blob_start
if %bwait=212 mov %nanido,3:goto *blob_start
lsp 700,":a;chara\blob_st02.bmp",0,0
bg "bg\bg097.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *blob_h



*zukan_slime_green

mov $zname,"Green Slime"
mov $zlavel,"slime_green"
itoa2 $zukan_ko,%2589
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2589=0 mov %ryozyoku1,0
if %2589>0 mov %ryozyoku1,1
if %2589=0 mov %zukancg,0
if %2589>0 mov %zukancg,1
mov %zukan_x1,45
mov %zukan_x2,245
mov $zukan_lv,"RS"
mov $zukan_hp,"PQOO"
mov $zukan_skill1,"Green Spread"
mov %zukan_skillc1,3377
mov $zukan_skill2,"Green Draw"
mov %zukan_skillc2,3378
mov $zukan_skill3,"Green Ecstasy"
mov %zukan_skillc3,3379
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_slime_green_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\gslime.jpg",400,0
goto *zukan_kihonbtn



*zukan_slime_green_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\slime_green_st01.bmp",%zukan_x0,100
if %zukan_hyouzyo=2 lsp 450,":a;chara\slime_green_st02.bmp",%zukan_x0,100
if %zukan_hyouzyo=3 lsp 450,":a;chara\slime_green_st03.bmp",%zukan_x0,100
if %zukan_bukkake1=1 lsp 441,":a;chara\slime_green_bk01.bmp",%zukan_x0,100
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\slime_green_bk02.bmp",%zukan_x0,100
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\slime_green_bk03.bmp",%zukan_x0,100
if %zukan_bukkake3=0 csp 443
return



*zukan_slime_green_cg

lsp 500,":c;bg\bg097.bmp",0,0
lsp 430,":c;chara\slime_green_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\slime_green_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\slime_green_h3.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_slime_green_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,34
mov %skill01,8
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *slime_green_start
if %bwait=211 mov %nanido,2:goto *slime_green_start
if %bwait=212 mov %nanido,3:goto *slime_green_start
lsp 700,":a;chara\slime_green_st02.bmp",245,100
bg "bg\bg097.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *slime_green_h



*zukan_slime_blue

mov $zname,"Blue Slime"
mov $zlavel,"slime_blue"
itoa2 $zukan_ko,%2649
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2649=0 mov %ryozyoku1,0
if %2649>0 mov %ryozyoku1,1
if %2649=0 mov %zukancg,0
if %2649>0 mov %zukancg,1
mov %zukan_x1,15
mov %zukan_x2,218
mov $zukan_lv,"RS"
mov $zukan_hp,"PROO"
mov $zukan_skill1,"Blue Flow"
mov %zukan_skillc1,3381
mov $zukan_skill2,"Double Draw"
mov %zukan_skillc2,3384
mov $zukan_skill3,"Triple Draw"
mov %zukan_skillc3,3385
mov $zukan_skill4,"Special Draw"
mov %zukan_skillc4,3386
mov $zukan_skill5,"Double Spread"
mov %zukan_skillc5,3387
mov $zukan_skill6,"Triple Spread"
mov %zukan_skillc6,3388
mov $zukan_skill7,"Special Spread"
mov %zukan_skillc7,3389
mov $zukan_skill8,"Special Heaven"
mov %zukan_skillc8,3390
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_slime_blue_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\bslime.jpg",400,0
goto *zukan_kihonbtn



*zukan_slime_blue_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\slime_blue_st01.bmp",%zukan_x0,20
if %zukan_hyouzyo=2 lsp 450,":a;chara\slime_blue_st02.bmp",%zukan_x0,20
if %zukan_hyouzyo=3 lsp 450,":a;chara\slime_blue_st03.bmp",%zukan_x0,20
if %zukan_bukkake1=1 lsp 441,":a;chara\slime_blue_bk01.bmp",%zukan_x0,20
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\slime_blue_bk02.bmp",%zukan_x0,20
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\slime_blue_bk03.bmp",%zukan_x0,20
if %zukan_bukkake3=0 csp 443
return



*zukan_slime_blue_cg

lsp 500,":c;bg\bg097.bmp",0,0
lsp 430,":c;chara\slimes_hc1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\slimes_hc2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\slimes_hc3.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_slime_blue_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,34
mov %skill01,8
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:bgm "bgm\battle.ogg":goto *slimes_start
if %bwait=211 mov %nanido,2:bgm "bgm\battle.ogg":goto *slimes_start
if %bwait=212 mov %nanido,3:bgm "bgm\battle.ogg":goto *slimes_start
lsp 700,":a;chara\slime_purple_st02.bmp",70,120
lsp 702,":a;chara\slime_green_st02.bmp",525,155
lsp 704,":a;chara\slime_blue_st02.bmp",-70,20
lsp 706,":a;chara\slime_red_st02.bmp",345,10
bg "bg\bg097.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *slimes_h



*zukan_slime_red

mov $zname,"Red Slime"
mov $zlavel,"slime_red"
itoa2 $zukan_ko,%2589
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2589=0 mov %ryozyoku1,0
if %2589>0 mov %ryozyoku1,1
if %2589=0 mov %zukancg,0
if %2589>0 mov %zukancg,1
mov %zukan_x1,27
mov %zukan_x2,227
mov $zukan_lv,"RS"
mov $zukan_hp,"PROO"
mov $zukan_skill1,"Red Gale"
mov %zukan_skillc1,3382
mov $zukan_skill2,"Double Draw"
mov %zukan_skillc2,3384
mov $zukan_skill3,"Triple Draw"
mov %zukan_skillc3,3385
mov $zukan_skill4,"Special Draw"
mov %zukan_skillc4,3386
mov $zukan_skill5,"Double Spread"
mov %zukan_skillc5,3387
mov $zukan_skill6,"Triple Spread"
mov %zukan_skillc6,3388
mov $zukan_skill7,"Special Spread"
mov %zukan_skillc7,3389
mov $zukan_skill8,"Special Heaven"
mov %zukan_skillc8,3390
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_slime_red_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\rslime.jpg",400,0
goto *zukan_kihonbtn



*zukan_slime_red_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\slime_red_st01.bmp",%zukan_x0,11
if %zukan_hyouzyo=2 lsp 450,":a;chara\slime_red_st02.bmp",%zukan_x0,11
if %zukan_hyouzyo=3 lsp 450,":a;chara\slime_red_st03.bmp",%zukan_x0,11
if %zukan_bukkake1=1 lsp 441,":a;chara\slime_red_bk01.bmp",%zukan_x0,11
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\slime_red_bk02.bmp",%zukan_x0,11
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\slime_red_bk03.bmp",%zukan_x0,11
if %zukan_bukkake3=0 csp 443
return



*zukan_slime_red_cg

lsp 500,":c;bg\bg097.bmp",0,0
lsp 430,":c;chara\slimes_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\slimes_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\slimes_hb3.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_slime_red_kaisou

bgmstop

csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,34
mov %skill01,8
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:bgm "bgm\battle.ogg":goto *slimes_start
if %bwait=211 mov %nanido,2:bgm "bgm\battle.ogg":goto *slimes_start
if %bwait=212 mov %nanido,3:bgm "bgm\battle.ogg":goto *slimes_start
lsp 700,":a;chara\slime_purple_st02.bmp",70,120
lsp 702,":a;chara\slime_green_st02.bmp",525,155
lsp 704,":a;chara\slime_blue_st02.bmp",-70,20
lsp 706,":a;chara\slime_red_st02.bmp",345,10
bg "bg\bg097.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *slimes_h



*zukan_slime_purple

mov $zname,"Purple Slime"
mov $zlavel,"slime_purple"
itoa2 $zukan_ko,%2589
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2589=0 mov %ryozyoku1,0
if %2589>0 mov %ryozyoku1,1
if %2589=0 mov %zukancg,0
if %2589>0 mov %zukancg,1
mov %zukan_x1,13
mov %zukan_x2,213
mov $zukan_lv,"RT"
mov $zukan_hp,"PTOO"
mov $zukan_skill1,"Purple Kiss"
mov %zukan_skillc1,3380
mov $zukan_skill2,"Double Draw"
mov %zukan_skillc2,3384
mov $zukan_skill3,"Triple Draw"
mov %zukan_skillc3,3385
mov $zukan_skill4,"Special Draw"
mov %zukan_skillc4,3386
mov $zukan_skill5,"Double Spread"
mov %zukan_skillc5,3387
mov $zukan_skill6,"Triple Spread"
mov %zukan_skillc6,3388
mov $zukan_skill7,"Special Spread"
mov %zukan_skillc7,3389
mov $zukan_skill8,"Special Heaven"
mov %zukan_skillc8,3390
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_slime_purple_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\pslime.jpg",400,0
goto *zukan_kihonbtn



*zukan_slime_purple_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\slime_purple_st01.bmp",%zukan_x0,40
if %zukan_hyouzyo=2 lsp 450,":a;chara\slime_purple_st02.bmp",%zukan_x0,40
if %zukan_hyouzyo=3 lsp 450,":a;chara\slime_purple_st03.bmp",%zukan_x0,40
if %zukan_bukkake1=1 lsp 441,":a;chara\slime_purple_bk01.bmp",%zukan_x0,40
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\slime_purple_bk02.bmp",%zukan_x0,40
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\slime_purple_bk03.bmp",%zukan_x0,40
if %zukan_bukkake3=0 csp 443
return



*zukan_slime_purple_cg

lsp 500,":c;bg\bg097.bmp",0,0
lsp 430,":c;chara\slimes_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\slimes_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\slimes_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\slimes_hd1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\slimes_hd2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\slimes_hd3.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_slime_purple_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,34
mov %skill01,8
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:bgm "bgm\battle.ogg":goto *slimes_start
if %bwait=211 mov %nanido,2:bgm "bgm\battle.ogg":goto *slimes_start
if %bwait=212 mov %nanido,3:bgm "bgm\battle.ogg":goto *slimes_start
lsp 700,":a;chara\slime_purple_st02.bmp",70,120
lsp 702,":a;chara\slime_green_st02.bmp",525,155
lsp 704,":a;chara\slime_blue_st02.bmp",-70,20
lsp 706,":a;chara\slime_red_st02.bmp",345,10
bg "bg\bg097.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *slimes_h



*zukan_erbetie1

mov $zname,"Erubetie"
mov $zlavel,"erbetie1"
itoa2 $zukan_ko,%2590
mov %zukan_hyouzyonum,1
mov %zukan_pozunum,1
mov %zukan_bukkakenum,1
mov %zukan_sentounum,2
mov %zukan_ryozyokunum,1
if %2590=0 mov %ryozyoku1,0
if %2590>0 mov %ryozyoku1,1
if %2590=0 mov %zukancg,0
if %2590>0 mov %zukancg,1
mov %zukan_x1,25
mov %zukan_x2,225
mov $zukan_lv,"PQT"
mov $zukan_hp,"QQOOO"
mov $zukan_skill1,"Melt Storm"
mov %zukan_skillc1,3391
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_erbetie1_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\eru1.jpg",400,0
goto *zukan_kihonbtn



*zukan_erbetie1_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\erbetie_st01.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\erbetie_bk07.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
return



*zukan_erbetie1_cg

lsp 500,":c;bg\bg097.bmp",0,0
lsp 430,":a;chara\erbetie_ha1r.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\erbetie_ha2r.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\erbetie_ha3r.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\erbetie_ha4r.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_erbetie1_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,35
mov %skill01,8
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *erbetie1_start
if %bwait=211 mov %nanido,2:goto *erbetie1_start
if %bwait=212 mov %nanido,3:goto *erbetie1_start
lsp 700,":a;chara\erbetie_st01.bmp",225,0
bg "bg\bg097.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Erubetie"
if %bwait=213 goto *erbetie1_h



*zukan_undine

mov $zname,"Undine"
mov $zlavel,"undine"
itoa2 $zukan_ko,%2591
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,3
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2591=0 mov %ryozyoku1,0
if %2591>0 mov %ryozyoku1,1
if %2591=0 mov %zukancg,0
if %2591>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"UT"
mov $zukan_hp,"PQOOO"
mov $zukan_skill1,"Aqua Shake"
mov %zukan_skillc1,3392
mov $zukan_skill2,"Aqua Stroke"
mov %zukan_skillc2,3393
mov $zukan_skill3,"Aqua Melty"
mov %zukan_skillc3,3394
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_undine_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\undine.jpg",400,0
goto *zukan_kihonbtn



*zukan_undine_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=2 mov %zukan_hyouzyonum,1
if %zukan_pozu<>2 mov %zukan_hyouzyonum,3
if %zukan_pozu=1 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=2 mov %zukan_hyouzyo,1
if %zukan_pozu=3 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=3 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\undine_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\undine_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\undine_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 lsp 450,":a;chara\undine_st11.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\undine_st21.bmp",%zukan_x0+226,144
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\undine_st22.bmp",%zukan_x0+226,144
if %zukan_pozu=3 && %zukan_hyouzyo=3 lsp 450,":a;chara\undine_st23.bmp",%zukan_x0+226,144
if %zukan_bukkake1=1 lsp 441,":a;chara\undine_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\undine_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\undine_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\undine_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_pozu>1 cspl 441,449
return



*zukan_undine_cg

lsp 500,":c;bg\bg097.bmp",0,0
lsp 430,":a;chara\undine_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\undine_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\undine_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\undine_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\undine_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\undine_ha3.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_undine_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,35
mov %skill01,8
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *undine_start
if %bwait=211 mov %nanido,2:goto *undine_start
if %bwait=212 mov %nanido,3:goto *undine_start
lsp 700,":a;chara\undine_st02.bmp",0,0
bg "bg\bg097.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Undine"
if %bwait=213 goto *undine_h



*zukan_kamakiri

mov $zname,"Mantis Girl"
mov $zlavel,"kamakiri"
itoa2 $zukan_ko,%2592
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2592=0 mov %ryozyoku1,0
if %2592>0 mov %ryozyoku1,1
if %2592=0 mov %zukancg,0
if %2592>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"RU"
mov $zukan_hp,"QWOO"
mov $zukan_skill1,"Mantis Blowjob"
mov %zukan_skillc1,3395
mov $zukan_skill2,"Mantis Tit Fuck"
mov %zukan_skillc2,3396
mov $zukan_skill3,"Mantis Rape"
mov %zukan_skillc3,3397
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_kamakiri_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\kamakiri.jpg",400,0
goto *zukan_kihonbtn



*zukan_kamakiri_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\kamakiri_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\kamakiri_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\kamakiri_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\kamakiri_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\kamakiri_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\kamakiri_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
return



*zukan_kamakiri_cg

lsp 500,":c;bg\bg061.bmp",0,0
lsp 430,":a;chara\kamakiri_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kamakiri_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kamakiri_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kamakiri_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kamakiri_ha5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kamakiri_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kamakiri_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kamakiri_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kamakiri_hb4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_kamakiri_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,36
mov %skill01,9
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *kamakiri_start
if %bwait=211 mov %nanido,2:goto *kamakiri_start
if %bwait=212 mov %nanido,3:goto *kamakiri_start
lsp 700,":a;chara\kamakiri_st02.bmp",0,0
bg "bg\bg061.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *kamakiri_h



*zukan_scylla

mov $zname,"Scylla"
mov $zlavel,"scylla"
itoa2 $zukan_ko,%2593
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2593=0 mov %ryozyoku1,0
if %2593>0 mov %ryozyoku1,1
if %2593=0 mov %zukancg,0
if %2593>0 mov %zukancg,1
mov %zukan_x1,-60
mov %zukan_x2,140
mov $zukan_lv,"RV"
mov $zukan_hp,"ROOO"
mov $zukan_skill1,"Tentacle Body Torture"
mov %zukan_skillc1,3398
mov $zukan_skill2,"Tentacle Nipple Torture"
mov %zukan_skillc2,3399
mov $zukan_skill3,"Tentacle Groin Torture"
mov %zukan_skillc3,3400
mov $zukan_skill4,"Tentacle Anal Torture"
mov %zukan_skillc4,3401
mov $zukan_skill5,"Tentacle Tighten"
mov %zukan_skillc5,3402
mov $zukan_skill6,"Elysion-De-Scylla"
mov %zukan_skillc6,3403
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_scylla_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\scylla.jpg",400,0
goto *zukan_kihonbtn



*zukan_scylla_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\scylla_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\scylla_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\scylla_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\scylla_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\scylla_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\scylla_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
return



*zukan_scylla_cg

lsp 500,":c;bg\bg099.bmp",0,0
lsp 430,":a;chara\scylla_h0.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\scylla_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\scylla_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\scylla_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\scylla_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\scylla_h5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\scylla_h6.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_scylla_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,37
mov %skill01,10
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *scylla_start
if %bwait=211 mov %nanido,2:goto *scylla_start
if %bwait=212 mov %nanido,3:goto *scylla_start
lsp 700,":a;chara\scylla_st02.bmp",140,0
bg "bg\bg099.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *scylla_h



*zukan_medusa

mov $zname,"Medusa"
mov $zlavel,"medusa"
itoa2 $zukan_ko,%2594
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,6
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2594=0 mov %ryozyoku1,0
if %2594>0 mov %ryozyoku1,1
if %2594=0 mov %zukancg,0
if %2594>0 mov %zukancg,1
mov %zukan_x1,28
mov %zukan_x2,218
mov $zukan_lv,"RV"
mov $zukan_hp,"RQOO"
mov $zukan_skill1,"Medusa's Hand"
mov %zukan_skillc1,3404
mov $zukan_skill2,"Medusa's Mouth"
mov %zukan_skillc2,3405
mov $zukan_skill3,"Medusa's Thighs"
mov %zukan_skillc3,3406
mov $zukan_skill4,"Lewd Snake's Hair"
mov %zukan_skillc4,3407
mov $zukan_skill5,"Lewd Snake's Vagina"
mov %zukan_skillc5,3408
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_medusa_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\medusag.jpg",400,0
goto *zukan_kihonbtn



*zukan_medusa_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\medusa_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\medusa_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\medusa_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\medusa_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\medusa_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\medusa_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\medusa_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\medusa_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\medusa_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
return



*zukan_medusa_cg

lsp 500,":c;bg\bg041.bmp",0,0
lsp 430,":a;chara\medusa_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\medusa_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\medusa_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\medusa_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\medusa_h5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\medusa_h6.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_medusa_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,37
mov %skill01,11
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *medusa_start
if %bwait=211 mov %nanido,2:goto *medusa_start
if %bwait=212 mov %nanido,3:goto *medusa_start
lsp 700,":a;chara\medusa_st02.bmp",218,0
bg "bg\bg041.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *medusa_h



*zukan_golem

mov $zname,"Golem Girl"
mov $zlavel,"golem"
itoa2 $zukan_ko,%2595
mov %zukan_hyouzyonum,1
mov %zukan_pozunum,1
mov %zukan_bukkakenum,2
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2595=0 mov %ryozyoku1,0
if %2595>0 mov %ryozyoku1,1
if %2595=0 mov %zukancg,0
if %2595>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"SS"
mov $zukan_hp,"UOOO"
mov $zukan_skill1,"Play"
mov %zukan_skillc1,3409
mov $zukan_skill2,"Power Supply"
mov %zukan_skillc2,3410
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_golem_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\golem.jpg",400,0
goto *zukan_kihonbtn



*zukan_golem_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\golem_st01.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\golem_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\golem_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
return



*zukan_golem_cg

lsp 500,":c;bg\bg161.bmp",0,0
lsp 430,":a;chara\golem_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\golem_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\golem_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\golem_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\golem_h5.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_golem_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,38
mov %skill01,11
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *golem_start
if %bwait=211 mov %nanido,2:goto *golem_start
if %bwait=212 mov %nanido,3:goto *golem_start
lsp 700,":a;chara\golem_st01.bmp",0,0
bg "bg\bg098.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *golem_h



*zukan_madgolem

mov $zname,"Mud Golem Girl"
mov $zlavel,"madgolem"
itoa2 $zukan_ko,%2596
mov %zukan_hyouzyonum,1
mov %zukan_pozunum,1
mov %zukan_bukkakenum,1
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2596=0 mov %ryozyoku1,0
if %2596>0 mov %ryozyoku1,1
if %2596=0 mov %zukancg,0
if %2596>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"RW"
mov $zukan_hp,"RQOO"
mov $zukan_skill1,"Mud Spread"
mov %zukan_skillc1,3411
mov $zukan_skill2,"Mud Draw"
mov %zukan_skillc2,3412
mov $zukan_skill3,"Mud Shake"
mov %zukan_skillc3,3413
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_madgolem_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\mudgolem.jpg",400,0
goto *zukan_kihonbtn



*zukan_madgolem_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\madgolem_st01.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\madgolem_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
return



*zukan_madgolem_cg

lsp 500,":c;bg\bg100.bmp",0,0
lsp 430,":a;chara\madgolem_st01.bmp",0,0
lsp 420,":a;chara\madgolem_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\madgolem_ct02.bmp",0,0
lsp 421,":a;chara\madgolem_bk01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\madgolem_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\madgolem_ct04.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_madgolem_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,38
mov %skill01,11
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *madgolem_start
if %bwait=211 mov %nanido,2:goto *madgolem_start
if %bwait=212 mov %nanido,3:goto *madgolem_start
lsp 700,":a;chara\madgolem_st01.bmp",0,0
bg "bg\bg100.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *madgolem_h



*zukan_artm

mov $zname,"Automata Girl"
mov $zlavel,"artm"
itoa2 $zukan_ko,%2597
mov %zukan_hyouzyonum,2
mov %zukan_pozunum,1
mov %zukan_bukkakenum,6
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2597=0 mov %ryozyoku1,0
if %2597>0 mov %ryozyoku1,1
if %2597=0 mov %zukancg,0
if %2597>0 mov %zukancg,1
mov %zukan_x1,-33
mov %zukan_x2,167
mov $zukan_lv,"RX"
mov $zukan_hp,"ROOO"
mov $zukan_skill1,"Mechanical Handjob"
mov %zukan_skillc1,3414
mov $zukan_skill2,"Mechanical Blowjob"
mov %zukan_skillc2,3415
mov $zukan_skill3,"Mechanical Breast Service"
mov %zukan_skillc3,3416
mov $zukan_skill4,"Bubble Service Trance"
mov %zukan_skillc4,3417
mov $zukan_skill5,"Thigh Service"
mov %zukan_skillc5,3418
mov $zukan_skill6,"Anal Service"
mov %zukan_skillc6,3419
mov $zukan_skill7,"Mechanical Electro-Footjob"
mov %zukan_skillc7,3420
mov $zukan_skill8,"Service Program 666"
mov %zukan_skillc8,3421
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_artm_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\automata.jpg",400,0
goto *zukan_kihonbtn



*zukan_artm_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\artm_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\artm_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\artm_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\artm_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\artm_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\artm_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\artm_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\artm_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
return



*zukan_artm_cg

lsp 500,":c;bg\bg100.bmp",0,0
lsp 430,":a;chara\artm_st01.bmp",167,0
lsp 420,":a;chara\artm_ct01.bmp",172,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\artm_ct02.bmp",172,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\artm_ct11.bmp",172,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\artm_ct12.bmp",172,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\artm_ct13.bmp",172,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\artm_ct14.bmp",172,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":c;chara\artm_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\artm_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\artm_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\artm_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\artm_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\artm_hb3.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_artm_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,38
mov %skill01,11
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *artm_start
if %bwait=211 mov %nanido,2:goto *artm_start
if %bwait=212 mov %nanido,3:goto *artm_start
lsp 700,":a;chara\artm_st01.bmp",167,0
bg "bg\bg100.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *artm_h



*zukan_ant

mov $zname,"Ant Girls"
mov $zlavel,"ant"
itoa2 $zukan_ko,%2598
mov %zukan_hyouzyonum,2
mov %zukan_pozunum,2
mov %zukan_bukkakenum,7
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2598=0 mov %ryozyoku1,0
if %2598>0 mov %ryozyoku1,1
if %2598=0 mov %zukancg,0
if %2598>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"RX"
mov $zukan_hp,"RXOO"
mov $zukan_skill1,"Ant Kiss"
mov %zukan_skillc1,3422
mov $zukan_skill2,"Double Multi-Arm Handjob"
mov %zukan_skillc2,3423
mov $zukan_skill3,"Triple Multi-Arm Handjob"
mov %zukan_skillc3,3424
mov $zukan_skill4,"Double Ant Tit Fuck"
mov %zukan_skillc4,3425
mov $zukan_skill5,"Triple Ant Tit Fuck"
mov %zukan_skillc5,3426
mov $zukan_skill6,"Double Ant Blowjob"
mov %zukan_skillc6,3427
mov $zukan_skill7,"Triple Ant Blowjob"
mov %zukan_skillc7,3428
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_ant_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\antg.jpg",400,0
goto *zukan_kihonbtn



*zukan_ant_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 && %zukan_pozu=1 lsp 450,":a;chara\ant_st11.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 && %zukan_pozu=1 lsp 450,":a;chara\ant_st13.bmp",%zukan_x0,0
if %zukan_hyouzyo=1 && %zukan_pozu=2 lsp 450,":a;chara\ant_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 && %zukan_pozu=2 lsp 450,":a;chara\ant_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\ant_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\ant_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\ant_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\ant_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\ant_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\ant_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
if %zukan_bukkake7=1 lsp 447,":a;chara\ant_bk07.bmp",%zukan_x0,0
if %zukan_bukkake7=0 csp 447
if %zukan_pozu=2 cspl 445,447
return



*zukan_ant_cg

lsp 500,":c;bg\bg101.bmp",0,0
lsp 430,":a;chara\ant_st11.bmp",0,0
lsp 420,":a;chara\ant_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\ant_ct02.bmp",0,0
lsp 421,":a;chara\ant_bk04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\ant_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\ant_ct04.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_ant_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,39
mov %skill01,11
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *ant_start
if %bwait=211 mov %nanido,2:goto *ant_start
if %bwait=212 mov %nanido,3:goto *ant_start
lsp 700,":a;chara\ant_st11.bmp",0,0
bg "bg\bg101.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *ant_h



*zukan_queenant

mov $zname,"Queen Ant"
mov $zlavel,"queenant"
itoa2 $zukan_ko,%2599
mov %zukan_hyouzyonum,2
mov %zukan_pozunum,1
mov %zukan_bukkakenum,2
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2599=0 mov %ryozyoku1,0
if %2599>0 mov %ryozyoku1,1
if %2599=0 mov %zukancg,0
if %2599>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"TO"
mov $zukan_hp,"TOOO"
mov $zukan_skill1,"Queen's Comfortable Mouth"
mov %zukan_skillc1,3429
mov $zukan_skill2,"Queen's Soft Breasts"
mov %zukan_skillc2,3430
mov $zukan_skill3,"Queen's Unmatched Skill"
mov %zukan_skillc3,3431
mov $zukan_skill4,"Eyes of Seduction"
mov %zukan_skillc4,3432
mov $zukan_skill5,"Queen's Stud"
mov %zukan_skillc5,3433
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_queenant_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\queenant.jpg",400,0
goto *zukan_kihonbtn



*zukan_queenant_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\queenant_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\queenant_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\queenant_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\queenant_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
return



*zukan_queenant_cg

lsp 500,":c;bg\bg102.bmp",0,0
lsp 430,":a;chara\queenant_st01.bmp",0,0
lsp 420,":a;chara\queenant_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\queenant_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\queenant_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\queenant_ct04.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_queenant_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,40
mov %skill01,11
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *queenant_start
if %bwait=211 mov %nanido,2:goto *queenant_start
if %bwait=212 mov %nanido,3:goto *queenant_start
lsp 700,":a;chara\queenant_st01.bmp",0,0
bg "bg\bg102.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *queenant_h



*zukan_maccubus

mov $zname,"Maccubus"
mov $zlavel,"maccubus"
itoa2 $zukan_ko,%2600
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,3
mov %zukan_bukkakenum,6
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2600=0 mov %ryozyoku1,0
if %2600>0 mov %ryozyoku1,1
if %2600=0 mov %zukancg,0
if %2600>0 mov %zukancg,1
mov %zukan_x1,-25
mov %zukan_x2,175
mov $zukan_lv,"SO"
mov $zukan_hp,"RTOO"
mov $zukan_skill1,"Succubus Handjob"
mov %zukan_skillc1,3434
mov $zukan_skill2,"Succubus Blowjob"
mov %zukan_skillc2,3435
mov $zukan_skill3,"Succubus Tit Fuck"
mov %zukan_skillc3,3436
mov $zukan_skill4,"Succubus Pussy"
mov %zukan_skillc4,3437
mov $zukan_skill5,"Succubus Grind"
mov %zukan_skillc5,3438
mov $zukan_skill6,"Heavenly Piston"
mov %zukan_skillc6,3439
mov $zukan_skill7,"Energy Drain"
mov %zukan_skillc7,3440
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_maccubus_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\maccubus.jpg",400,0
goto *zukan_kihonbtn



*zukan_maccubus_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=3 mov %zukan_hyouzyonum,1
if %zukan_pozu<>3 mov %zukan_hyouzyonum,3
if %zukan_pozu<3 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu<3 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=3 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\maccubus_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\maccubus_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\maccubus_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\maccubus_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\maccubus_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\maccubus_st13.bmp",%zukan_x0,0
if %zukan_pozu=3 lsp 450,":a;chara\maccubus_st21.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\maccubus_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\maccubus_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\maccubus_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\maccubus_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\maccubus_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\maccubus_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
if %zukan_pozu=3 cspl 441,446
return



*zukan_maccubus_cg

lsp 500,":c;bg\bg107.bmp",0,0
lsp 430,":a;chara\maccubus_st01.bmp",400,0
lsp 420,":a;chara\maccubus_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\maccubus_st02.bmp",400,0
lsp 420,":a;chara\maccubus_ct02.bmp",0,0
lsp 421,":a;chara\maccubus_bk02.bmp",400,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 421
lsp 430,":a;chara\maccubus_st01.bmp",0,0
lsp 420,":a;chara\maccubus_ct21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\maccubus_st02.bmp",0,0
lsp 420,":a;chara\maccubus_ct22.bmp",0,0
lsp 421,":a;chara\maccubus_bk01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
csp 421
lsp 430,":a;chara\maccubus_h21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\maccubus_h22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\maccubus_h00.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\maccubus_h01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\maccubus_h02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\maccubus_h03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\maccubus_h04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\maccubus_h05.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\maccubus_h06.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\maccubus_h07.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_maccubus_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,40
mov %skill01,11
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:bgm "bgm\kiki2.ogg":goto *maccubus_start
if %bwait=211 mov %nanido,2:bgm "bgm\kiki2.ogg":goto *maccubus_start
if %bwait=212 mov %nanido,3:bgm "bgm\kiki2.ogg":goto *maccubus_start
lsp 700,":a;chara\maccubus_st02.bmp",175,0
bg "bg\bg107.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *maccubus_h



*zukan_minccubus

mov $zname,"Mincubus"
mov $zlavel,"minccubus"
itoa2 $zukan_ko,%2601
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,2
mov %zukan_bukkakenum,7
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2601=0 mov %ryozyoku1,0
if %2601>0 mov %ryozyoku1,1
if %2601=0 mov %zukancg,0
if %2601>0 mov %zukancg,1
mov %zukan_x1,-25
mov %zukan_x2,175
mov $zukan_lv,"RW"
mov $zukan_hp,"QUOO"
mov $zukan_skill1,"Soft Handjob"
mov %zukan_skillc1,3441
mov $zukan_skill2,"Wet Blowjob"
mov %zukan_skillc2,3442
mov $zukan_skill3,"Silky Hairjob"
mov %zukan_skillc3,3443
mov $zukan_skill4,"Face Riding"
mov %zukan_skillc4,3444
mov $zukan_skill5,"Panty Stroke"
mov %zukan_skillc5,3445
mov $zukan_skill6,"Sock Stroke"
mov %zukan_skillc6,3446
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_minccubus_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\minccubus.jpg",400,0
goto *zukan_kihonbtn



*zukan_minccubus_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=2 mov %zukan_hyouzyonum,1
if %zukan_pozu<>2 mov %zukan_hyouzyonum,3
if %zukan_pozu=1 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=2 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\minccubus_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\minccubus_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\minccubus_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 lsp 450,":a;chara\minccubus_st11.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\minccubus_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\minccubus_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\minccubus_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\minccubus_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\minccubus_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\minccubus_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
if %zukan_bukkake7=1 lsp 447,":a;chara\minccubus_bk07.bmp",%zukan_x0,0
if %zukan_bukkake7=0 csp 447
if %zukan_pozu=2 cspl 441,447
return



*zukan_minccubus_cg

lsp 500,":c;bg\bg163.bmp",0,0
lsp 430,":a;chara\minccubus_st01.bmp",0,0
lsp 420,":a;chara\minccubus_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\minccubus_st02.bmp",0,0
lsp 420,":a;chara\minccubus_ct02.bmp",0,0
lsp 421,":a;chara\minccubus_bk01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 421
lsp 430,":a;chara\minccubus_st01.bmp",0,0
lsp 420,":a;chara\minccubus_ct11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\minccubus_st02.bmp",0,0
lsp 420,":a;chara\minccubus_ct12.bmp",0,0
lsp 421,":a;chara\minccubus_bk01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 421
lsp 430,":a;chara\minccubus_st01.bmp",0,0
lsp 420,":a;chara\minccubus_ct21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\minccubus_st02.bmp",0,0
lsp 420,":a;chara\minccubus_ct22.bmp",0,0
lsp 421,":a;chara\minccubus_bk02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
csp 421
lsp 430,":a;chara\minccubus_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\minccubus_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\minccubus_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\minccubus_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\minccubus_hc1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\minccubus_hc2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\minccubus_hc3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\minccubus_hc4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\minccubus_hc5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\minccubus_hb01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\minccubus_hb02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\minccubus_hb03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\minccubus_hb04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\minccubus_hb05.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\minccubus_hb06.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\minccubus_hb07.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\minccubus_hb08.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\minccubus_hb09.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\minccubus_hb10.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\minccubus_hb11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\minccubus_hb12.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_minccubus_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,40
mov %skill01,11
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:bgm "bgm\kiki2.ogg":goto *minccubus_start
if %bwait=211 mov %nanido,2:bgm "bgm\kiki2.ogg":goto *minccubus_start
if %bwait=212 mov %nanido,3:bgm "bgm\kiki2.ogg":goto *minccubus_start
lsp 700,":a;chara\minccubus_st02.bmp",175,0
bg "bg\bg163.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *minccubus_h



*zukan_renccubus

mov $zname,"Lencubus"
mov $zlavel,"renccubus"
itoa2 $zukan_ko,%2602
mov %zukan_hyouzyonum,4
mov %zukan_pozunum,2
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2602=0 mov %ryozyoku1,0
if %2602>0 mov %ryozyoku1,1
if %2602=0 mov %zukancg,0
if %2602>0 mov %zukancg,1
mov %zukan_x1,-25
mov %zukan_x2,175
mov $zukan_lv,"QQ"
mov $zukan_hp,"PQOO"
mov $zukan_skill1,"Lust Powered Handjob"
mov %zukan_skillc1,3447
mov $zukan_skill2,"Lust Powered Blowjob"
mov %zukan_skillc2,3448
mov $zukan_skill3,"Lust Powered Tit Fuck"
mov %zukan_skillc3,3449
mov $zukan_skill4,"Level Drain"
mov %zukan_skillc4,3450
mov $zukan_skill5,"Energy Drain"
mov %zukan_skillc5,3451
mov $zukan_skill6,"Life Killing Vagina"
mov %zukan_skillc6,3452
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_renccubus_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\lencubus.jpg",400,0
goto *zukan_kihonbtn



*zukan_renccubus_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=2 mov %zukan_hyouzyonum,1
if %zukan_pozu<>2 mov %zukan_hyouzyonum,4
if %zukan_pozu=1 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=2 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\renccubus_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\renccubus_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\renccubus_st03.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\renccubus_st04.bmp",%zukan_x0,0
if %zukan_pozu=2 lsp 450,":a;chara\renccubus_st11.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\renccubus_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\renccubus_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\renccubus_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\renccubus_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\renccubus_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_pozu=2 cspl 441,445
return



*zukan_renccubus_cg

lsp 500,":c;bg\bg104.bmp",0,0
lsp 430,":a;chara\renccubus_st02.bmp",175,0
lsp 420,":a;chara\renccubus_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\renccubus_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\renccubus_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\renccubus_ct11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\renccubus_ct12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\renccubus_ct13.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\renccubus_ct21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\renccubus_ct22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\renccubus_ct23.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\renccubus_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\renccubus_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\renccubus_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\renccubus_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\renccubus_h5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\renccubus_h6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\renccubus_h7.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_renccubus_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,41
mov %skill01,11
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *renccubus_start
if %bwait=211 mov %nanido,2:goto *renccubus_start
if %bwait=212 mov %nanido,3:goto *renccubus_start
lsp 700,":a;chara\renccubus_st02.bmp",175,0
bg "bg\bg104.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *renccubus_h



*zukan_succubus

mov $zname,"Succubus"
mov $zlavel,"succubus"
itoa2 $zukan_ko,%2603
mov %zukan_hyouzyonum,4
mov %zukan_pozunum,2
mov %zukan_bukkakenum,7
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2603=0 mov %ryozyoku1,0
if %2603>0 mov %ryozyoku1,1
if %2603=0 mov %zukancg,0
if %2603>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"SR"
mov $zukan_hp,"STOO"
mov $zukan_skill1,"Delightful Handjob"
mov %zukan_skillc1,3453
mov $zukan_skill2,"Hecto-Deep Blowjob"
mov %zukan_skillc2,3454
mov $zukan_skill3,"Breast Squeeze"
mov %zukan_skillc3,3455
mov $zukan_skill4,"Tail Drain"
mov %zukan_skillc4,3456
mov $zukan_skill5,"Melting Kiss"
mov %zukan_skillc5,3457
mov $zukan_skill6,"Energy Drain"
mov %zukan_skillc6,3458
mov $zukan_skill7,"Infinite Pussy"
mov %zukan_skillc7,3459
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_succubus_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\succubus.jpg",400,0
goto *zukan_kihonbtn



*zukan_succubus_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=1 && %zukan_pozu=1 lsp 450,":a;chara\succubus_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 && %zukan_pozu=1 lsp 450,":a;chara\succubus_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 && %zukan_pozu=1 lsp 450,":a;chara\succubus_st03.bmp",%zukan_x0,0
if %zukan_hyouzyo=4 && %zukan_pozu=1 lsp 450,":a;chara\succubus_st04.bmp",%zukan_x0,0
if %zukan_hyouzyo=1 && %zukan_pozu=2 lsp 450,":a;chara\succubus_st11.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 && %zukan_pozu=2 lsp 450,":a;chara\succubus_st12.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 && %zukan_pozu=2 lsp 450,":a;chara\succubus_st13.bmp",%zukan_x0,0
if %zukan_hyouzyo=4 && %zukan_pozu=2 lsp 450,":a;chara\succubus_st14.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\succubus_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\succubus_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\succubus_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\succubus_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\succubus_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\succubus_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
if %zukan_bukkake7=1 lsp 447,":a;chara\succubus_bk07.bmp",%zukan_x0,0
if %zukan_bukkake7=0 csp 447
if %zukan_pozu=2 cspl 441,447
return



*zukan_succubus_cg

lsp 500,":c;bg\bg106.bmp",0,0
lsp 430,":a;chara\succubus_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\succubus_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\succubus_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\succubus_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\succubus_ha5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\succubus_ha6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\succubus_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\succubus_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\succubus_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\succubus_hb4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\succubus_hb5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\succubus_hb6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\succubus_hc1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\succubus_hc2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\succubus_hc3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\succubus_hc4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\succubus_hc5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\succubus_hc6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\succubus_hc7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\succubus_hc8.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\succubus_hc9.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\succubus_hd1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\succubus_hd2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\succubus_hd3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\succubus_hd4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_succubus_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,41
mov %skill01,11
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *succubus_start
if %bwait=211 mov %nanido,2:goto *succubus_start
if %bwait=212 mov %nanido,3:goto *succubus_start
lsp 700,":a;chara\succubus_st02.bmp",0,0
bg "bg\bg106.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *succubus_h



*zukan_witchs

mov $zname,"Succubus Witch"
mov $zlavel,"witchs"
itoa2 $zukan_ko,%2604
mov %zukan_hyouzyonum,4
mov %zukan_pozunum,3
mov %zukan_bukkakenum,6
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,2
if %2828=0 mov %ryozyoku1,0
if %2828>0 mov %ryozyoku1,1
if %2829=0 mov %ryozyoku2,0
if %2829>0 mov %ryozyoku2,1
if %2604=0 mov %zukancg,0
if %2604>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"SP"
mov $zukan_hp,"SQOO"
mov $zukan_skill1,"Milking Gloves"
mov %zukan_skillc1,3460
mov $zukan_skill2,"Hat of Pleasure"
mov %zukan_skillc2,3461
mov $zukan_skill3,"Breast Milking"
mov %zukan_skillc3,3462
mov $zukan_skill4,"HP Tail Drain"
mov %zukan_skillc4,3463
mov $zukan_skill5,"Lvl Tail Drain"
mov %zukan_skillc5,3464
mov $zukan_skill6,"Melting Kiss"
mov %zukan_skillc6,3465
mov $zukan_skill7,"Eyes of Seduction"
mov %zukan_skillc7,3466
mov $zukan_skill8,"Energy Drain"
mov %zukan_skillc8,3467
mov $zukan_skill9,"Minimum Phantasm: Heaven"
mov %zukan_skillc9,3598
mov $zukan_skill10,"Minimum Phantasm: Hell"
mov %zukan_skillc10,3599
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_witchs_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\witch.jpg",400,0
goto *zukan_kihonbtn



*zukan_witchs_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\witchs_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\witchs_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\witchs_st03.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\witchs_st04.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\witchs_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\witchs_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\witchs_st13.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=4 lsp 450,":a;chara\witchs_st14.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\witchs_st21.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\witchs_st22.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=3 lsp 450,":a;chara\witchs_st23.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=4 lsp 450,":a;chara\witchs_st24.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\witchs_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\witchs_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\witchs_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\witchs_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\witchs_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\witchs_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
if %zukan_pozu>1 cspl 441,446
return



*zukan_witchs_cg

lsp 500,":c;bg\bg110.bmp",0,0
lsp 430,":a;chara\witchs_hc1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\witchs_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_hc2.bmp",0,0
lsp 420,":a;chara\witchs_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_hc3.bmp",0,0
lsp 420,":a;chara\witchs_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_hc4.bmp",0,0
lsp 420,":a;chara\witchs_ct04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\witchs_hd1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_hd2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_hd3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_hd4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_hd5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_hd6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_hi1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_hi2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_hi3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_hi4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_hh1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_hh2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_hh3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_hh4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_hg1.bmp",0,0
lsp 420,":a;chara\witchs_ct21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_hg2.bmp",0,0
lsp 429,":a;chara\witchs_hgc1.bmp",0,0
lsp 420,":a;chara\witchs_ct22.bmp",0,0
lsp 419,":a;chara\witchs_ctc01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_hg3.bmp",0,0
lsp 429,":a;chara\witchs_hgc2.bmp",0,0
lsp 420,":a;chara\witchs_ct23.bmp",0,0
lsp 419,":a;chara\witchs_ctc02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 419,":a;chara\witchs_ctc03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
cspl 419,429
lsp 430,":a;chara\witchs_hj1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_hj2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_hj3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_hk1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_hk2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_hk3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %2828=0 skip 21
lsp 430,":a;chara\witchs_ha01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_ha02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_ha03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_ha04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_ha05.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_ha06.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_ha07.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_ha08.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_ha09.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_ha10.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %2829=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_hb4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_hb5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_hf1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_hf2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_hf3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_st01.bmp",0,0
lsp 420,":a;chara\witchs_ct11.bmp",-200,-100
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\witchs_he1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_he2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_he3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_he4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\witchs_he5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\witchs_ct12.bmp",-200,-100
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_witchs_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,41
mov %skill01,11
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *witchs_start
if %bwait=211 mov %nanido,2:goto *witchs_start
if %bwait=212 mov %nanido,3:goto *witchs_start
lsp 700,":a;chara\witchs_st02.bmp",0,0
bg "bg\bg110.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *witchs_ha
if %bwait=214 goto *witchs_hb



*zukan_lilith

mov $zname,"Lilith & Lilim"
mov $zlavel,"lilith"
itoa2 $zukan_ko,%2605
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2605=0 mov %ryozyoku1,0
if %2605>0 mov %ryozyoku1,1
if %2605=0 mov %zukancg,0
if %2605>0 mov %zukancg,1
mov %zukan_x1,-62
mov %zukan_x2,138
mov $zukan_lv,"TT"
mov $zukan_hp,"UOOO"
mov $zukan_skill1,"Laughing Gend"
mov %zukan_skillc1,3468
mov $zukan_skill2,"Tin Cyrus"
mov %zukan_skillc2,3469
mov $zukan_skill3,"Melo Sophia"
mov %zukan_skillc3,3470
mov $zukan_skill4,"Ritis Ani"
mov %zukan_skillc4,3471
mov $zukan_skill5,"Twin Tail Drain"
mov %zukan_skillc5,3472
mov $zukan_skill6,"Twin Energy Drain"
mov %zukan_skillc6,3473
mov $zukan_skill7,"Chaos Pleasure"
mov %zukan_skillc7,3474
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_lilith_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\lilith.jpg",400,0
goto *zukan_kihonbtn



*zukan_lilith_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\lilith_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\lilith_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\lilith_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\lilith_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\lilith_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\lilith_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\lilith_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\lilith_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_lilith_cg

lsp 500,":c;bg\bg110.bmp",0,0
lsp 430,":a;chara\lilith_st02.bmp",138,0
lsp 420,":a;chara\lilith_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\lilith_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\lilith_ha0.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lilith_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lilith_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lilith_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lilith_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lilith_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lilith_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lilith_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lilith_hb4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_lilith_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,42
mov %skill01,11
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *lilith_start
if %bwait=211 mov %nanido,2:goto *lilith_start
if %bwait=212 mov %nanido,3:goto *lilith_start
lsp 700,":a;chara\lilith_st02.bmp",138,0
bg "bg\bg110.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *lilith_h



*zukan_madaminsect

mov $zname,"Madame Insect"
mov $zlavel,"madaminsect"
itoa2 $zukan_ko,%2606
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,2
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2606=0 mov %ryozyoku1,0
if %2606>0 mov %ryozyoku1,1
if %2606=0 mov %zukancg,0
if %2606>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"SQ"
mov $zukan_hp,"RQOO"
mov $zukan_skill1,"Lady's Masturbation"
mov %zukan_skillc1,3475
mov $zukan_skill2,"Lady's Blowjob"
mov %zukan_skillc2,3476
mov $zukan_skill3,"Lady's Tit Fuck"
mov %zukan_skillc3,3477
mov $zukan_skill4,"Fluid Sucking"
mov %zukan_skillc4,3478
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_madaminsect_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\minsect.jpg",400,0
goto *zukan_kihonbtn



*zukan_madaminsect_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=2 mov %zukan_hyouzyonum,1
if %zukan_pozu<>2 mov %zukan_hyouzyonum,3
if %zukan_pozu=1 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=2 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=1 && %zukan_pozu=1 lsp 450,":a;chara\madaminsect_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 && %zukan_pozu=1 lsp 450,":a;chara\madaminsect_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 && %zukan_pozu=1 lsp 450,":a;chara\madaminsect_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 lsp 450,":a;chara\madaminsect_st11.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\madaminsect_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\madaminsect_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\madaminsect_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\madaminsect_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_pozu=2 cspl 441,444
return



*zukan_madaminsect_cg

lsp 500,":c;bg\bg111.bmp",0,0
lsp 430,":a;chara\madaminsect_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\madaminsect_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\madaminsect_h2.bmp",0,0
lsp 420,":a;chara\madaminsect_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\madaminsect_h3.bmp",0,0
lsp 420,":a;chara\madaminsect_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\madaminsect_h4.bmp",0,0
lsp 420,":a;chara\madaminsect_ct04.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_madaminsect_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,42
mov %skill01,11
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *madaminsect_start
if %bwait=211 mov %nanido,2:goto *madaminsect_start
if %bwait=212 mov %nanido,3:goto *madaminsect_start
lsp 700,":a;chara\madaminsect_st02.bmp",0,0
bg "bg\bg111.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *madaminsect_h



*zukan_madamumbrella

mov $zname,"Madame Umbrella"
mov $zlavel,"madamumbrella"
itoa2 $zukan_ko,%2607
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,2
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2607=0 mov %ryozyoku1,0
if %2607>0 mov %ryozyoku1,1
if %2607=0 mov %zukancg,0
if %2607>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"SR"
mov $zukan_hp,"RSOO"
mov $zukan_skill1,"Tentacle Play"
mov %zukan_skillc1,3479
mov $zukan_skill2,"Sucker Play"
mov %zukan_skillc2,3480
mov $zukan_skill3,"Sensual Anal Spin"
mov %zukan_skillc3,3481
mov $zukan_skill4,"Lady's Amusement"
mov %zukan_skillc4,3482
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_madamumbrella_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\mumbrella.jpg",400,0
goto *zukan_kihonbtn



*zukan_madamumbrella_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,2
if %zukan_pozu=2 && %zukan_hyouzyo=3 mov %zukan_hyouzyo,1
if %zukan_pozu=2 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 && %zukan_pozu=1 lsp 450,":a;chara\madamumbrella_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 && %zukan_pozu=1 lsp 450,":a;chara\madamumbrella_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 && %zukan_pozu=1 lsp 450,":a;chara\madamumbrella_st03.bmp",%zukan_x0,0
if %zukan_hyouzyo=1 && %zukan_pozu=2 lsp 450,":a;chara\madamumbrella_st11.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 && %zukan_pozu=2 lsp 450,":a;chara\madamumbrella_st12.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\madamumbrella_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\madamumbrella_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\madamumbrella_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_pozu=2 cspl 441,443
return



*zukan_madamumbrella_cg

lsp 500,":c;bg\bg111.bmp",0,0
lsp 430,":a;chara\madamumbrella_h01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\madamumbrella_h02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\madamumbrella_h03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\madamumbrella_h04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\madamumbrella_h05.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\madamumbrella_h06.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\madamumbrella_h07.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\madamumbrella_h08.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\madamumbrella_h09.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\madamumbrella_h10.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\madamumbrella_h11.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_madamumbrella_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,43
mov %skill01,11
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *madamumbrella_start
if %bwait=211 mov %nanido,2:goto *madamumbrella_start
if %bwait=212 mov %nanido,3:goto *madamumbrella_start
lsp 700,":a;chara\madamumbrella_st02.bmp",0,0
bg "bg\bg111.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *madamumbrella_h



*zukan_maidscyulla

mov $zname,"Scylla Maid"
mov $zlavel,"maidscyulla"
itoa2 $zukan_ko,%2608
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,2
mov %zukan_bukkakenum,6
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2608=0 mov %ryozyoku1,0
if %2608>0 mov %ryozyoku1,1
if %2608=0 mov %zukancg,0
if %2608>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"SR"
mov $zukan_hp,"SOOO"
mov $zukan_skill1,"Service: Hand"
mov %zukan_skillc1,3483
mov $zukan_skill2,"Service: Mouth"
mov %zukan_skillc2,3484
mov $zukan_skill3,"Service: Tentacle"
mov %zukan_skillc3,3485
mov $zukan_skill4,"Service: Holding"
mov %zukan_skillc4,3486
mov $zukan_skill5,"Service: Sucking"
mov %zukan_skillc5,3487
mov $zukan_skill6,"Service: Feeding"
mov %zukan_skillc6,3488
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_maidscyulla_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\mscylla.jpg",400,0
goto *zukan_kihonbtn



*zukan_maidscyulla_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=2 mov %zukan_hyouzyonum,1
if %zukan_pozu<>2 mov %zukan_hyouzyonum,3
if %zukan_pozu=1 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=2 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=1 && %zukan_pozu=1 lsp 450,":a;chara\maidscyulla_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 && %zukan_pozu=1 lsp 450,":a;chara\maidscyulla_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 && %zukan_pozu=1 lsp 450,":a;chara\maidscyulla_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 lsp 450,":a;chara\maidscyulla_st11.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\maidscyulla_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\maidscyulla_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\maidscyulla_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\maidscyulla_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\maidscyulla_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\maidscyulla_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
if %zukan_pozu=2 cspl 441,446
return



*zukan_maidscyulla_cg

lsp 500,":c;bg\bg112.bmp",0,0
lsp 430,":a;chara\maidscyulla_h01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\maidscyulla_h02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\maidscyulla_h03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\maidscyulla_h04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\maidscyulla_ct11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\maidscyulla_h05.bmp",0,0
lsp 420,":a;chara\maidscyulla_ct12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\maidscyulla_h06.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\maidscyulla_h07.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\maidscyulla_h08.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\maidscyulla_h09.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\maidscyulla_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\maidscyulla_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\maidscyulla_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\maidscyulla_h10.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_maidscyulla_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,43
mov %skill01,11
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *maidscyulla_start
if %bwait=211 mov %nanido,2:goto *maidscyulla_start
if %bwait=212 mov %nanido,3:goto *maidscyulla_start
lsp 700,":a;chara\maidscyulla_st02.bmp",0,0
bg "bg\bg112.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *maidscyulla_h



*zukan_emily

mov $zname,"Emily"
mov $zlavel,"emily"
itoa2 $zukan_ko,%2609
mov %zukan_hyouzyonum,4
mov %zukan_pozunum,4
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2609=0 mov %ryozyoku1,0
if %2609>0 mov %ryozyoku1,1
if %2609=0 mov %zukancg,0
if %2609>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"TQ"
mov $zukan_hp,"TOOO"
mov $zukan_skill1,"Emily's Handjob"
mov %zukan_skillc1,3489
mov $zukan_skill2,"Emily's Blowjob"
mov %zukan_skillc2,3490
mov $zukan_skill3,"Emily's Toy"
mov %zukan_skillc3,3491
mov $zukan_skill4,"Twin Tail Rondo"
mov %zukan_skillc4,3492
mov $zukan_skill5,"Tentacle Waltz"
mov %zukan_skillc5,3493
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_emily_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\emily.jpg",400,0
goto *zukan_kihonbtn



*zukan_emily_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=4 mov %zukan_hyouzyonum,1
if %zukan_pozu<>4 mov %zukan_hyouzyonum,4
if %zukan_pozu=1 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=2 && %zukan_hyouzyo=3 mov %zukan_hyouzyo,1
if %zukan_pozu=2 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,2
if %zukan_pozu=3 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=3 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=4 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\emily_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\emily_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\emily_st03.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\emily_st04.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\emily_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\emily_st12.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\emily_st21.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\emily_st22.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=3 lsp 450,":a;chara\emily_st23.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=4 lsp 450,":a;chara\emily_st24.bmp",%zukan_x0,0
if %zukan_pozu=4 lsp 450,":a;chara\emily_st31.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\emily_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\emily_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\emily_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\emily_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_pozu=1 csp 444
if %zukan_pozu=2 cspl 442,443
if %zukan_pozu>2 cspl 441,444
return



*zukan_emily_cg

lsp 500,":c;bg\bg113.bmp",0,0
lsp 430,":a;chara\emily_h5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\emily_h6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\emily_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\emily_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\emily_h2.bmp",0,0
lsp 420,":a;chara\emily_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\emily_h3.bmp",0,0
lsp 420,":a;chara\emily_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\emily_ct04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\emily_h4.bmp",0,0
lsp 420,":a;chara\emily_ct05.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_emily_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,43
mov %skill01,11
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *emily_start
if %bwait=211 mov %nanido,2:goto *emily_start
if %bwait=212 mov %nanido,3:goto *emily_start
lsp 700,":a;chara\emily_st02.bmp",0,0
bg "bg\bg113.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *emily_h



*zukan_cassandra

mov $zname,"Cassandra"
mov $zlavel,"cassandra"
itoa2 $zukan_ko,%2610
mov %zukan_hyouzyonum,5
mov %zukan_pozunum,2
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,2
if %2830=0 mov %ryozyoku1,0
if %2830>0 mov %ryozyoku1,1
if %2831=0 mov %ryozyoku2,0
if %2831>0 mov %ryozyoku2,1
if %2610=0 mov %zukancg,0
if %2610>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PPO"
mov $zukan_hp,"PWTOO"
mov $zukan_skill1,"Corrosive Prelude"
mov %zukan_skillc1,3494
mov $zukan_skill2,"Flesh Waltz"
mov %zukan_skillc2,3495
mov $zukan_skill3,"Melting Rondo"
mov %zukan_skillc3,3496
mov $zukan_skill4,"Digestive Tango"
mov %zukan_skillc4,3497
mov $zukan_skill5,"Sticky Symphony"
mov %zukan_skillc5,3498
mov $zukan_skill6,"Black and White Concerto"
mov %zukan_skillc6,3499
mov $zukan_skill7,"Dissolving Sonata"
mov %zukan_skillc7,3500
mov $zukan_skill8,"Prey's Requiem"
mov %zukan_skillc8,3501
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_cassandra_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\cassandra.jpg",400,0
goto *zukan_kihonbtn



*zukan_cassandra_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=2 && %zukan_hyouzyo=3 mov %zukan_hyouzyo,1
if %zukan_pozu=2 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,2
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\cassandra_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\cassandra_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\cassandra_st03.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\cassandra_st04.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=5 lsp 450,":a;chara\cassandra_st05.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\cassandra_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\cassandra_st12.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\cassandra_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\cassandra_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\cassandra_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\cassandra_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_pozu=2 cspl 441,444
return



*zukan_cassandra_cg

lsp 500,":c;bg\bg160.bmp",0,0
lsp 430,":a;chara\cassandra_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\cassandra_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\cassandra_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\cassandra_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\cassandra_ha5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\cassandra_ha6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %2830=0 skip 14
lsp 430,":a;chara\cassandra_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\cassandra_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\cassandra_hb3.bmp",0,0
lsp 420,":a;chara\cassandra_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\cassandra_hb4.bmp",0,0
lsp 420,":a;chara\cassandra_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\cassandra_hb5.bmp",0,0
lsp 420,":a;chara\cassandra_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %2831=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\cassandra_hc1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\cassandra_hc2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\cassandra_hc3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\cassandra_hc4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\cassandra_hc5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\cassandra_hc6.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_cassandra_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,44
mov %skill01,11
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *cassandra_start
if %bwait=211 mov %nanido,2:goto *cassandra_start
if %bwait=212 mov %nanido,3:goto *cassandra_start
if %bwait=213 lsp 700,":a;chara\cassandra_st01.bmp",0,0
if %bwait=214 lsp 700,":a;chara\cassandra_hc1.bmp",0,0
bg "bg\bg160.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *cassandra_ha
if %bwait=214 goto *cassandra_hb



*zukan_yougan

mov $zname,"Lava Girl"
mov $zlavel,"yougan"
itoa2 $zukan_ko,%2611
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2611=0 mov %ryozyoku1,0
if %2611>0 mov %ryozyoku1,1
if %2611=0 mov %zukancg,0
if %2611>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"SS"
mov $zukan_hp,"SWOO"
mov $zukan_skill1,"Magma Shaft"
mov %zukan_skillc1,3502
mov $zukan_skill2,"Magma Draw"
mov %zukan_skillc2,3503
mov $zukan_skill3,"Magma Bath"
mov %zukan_skillc3,3504
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_yougan_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\lavag.jpg",400,0
goto *zukan_kihonbtn



*zukan_yougan_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\yougan_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\yougan_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\yougan_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\yougan_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\yougan_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\yougan_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
return



*zukan_yougan_cg

lsp 500,":c;bg\bg115.bmp",0,0
lsp 430,":a;chara\yougan_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\yougan_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\yougan_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\yougan_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\yougan_h5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\yougan_h6.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_yougan_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,44
mov %skill01,12
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *yougan_start
if %bwait=211 mov %nanido,2:goto *yougan_start
if %bwait=212 mov %nanido,3:goto *yougan_start
lsp 700,":a;chara\yougan_st02.bmp",0,0
bg "bg\bg115.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *yougan_h



*zukan_basilisk

mov $zname,"Basilisk"
mov $zlavel,"basilisk"
itoa2 $zukan_ko,%2612
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2612=0 mov %ryozyoku1,0
if %2612>0 mov %ryozyoku1,1
if %2612=0 mov %zukancg,0
if %2612>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"ST"
mov $zukan_hp,"TQOO"
mov $zukan_skill1,"Bird Handjob"
mov %zukan_skillc1,3505
mov $zukan_skill2,"Ample Tit Fuck"
mov %zukan_skillc2,3506
mov $zukan_skill3,"Petrifying Sucking"
mov %zukan_skillc3,3507
mov $zukan_skill4,"Stone Rape"
mov %zukan_skillc4,3508
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_basilisk_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\basilisk.jpg",400,0
goto *zukan_kihonbtn



*zukan_basilisk_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\basilisk_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\basilisk_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\basilisk_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\basilisk_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\basilisk_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\basilisk_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\basilisk_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\basilisk_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_basilisk_cg

lsp 500,":c;bg\bg115.bmp",0,0
lsp 430,":a;chara\basilisk_st02.bmp",0,0
lsp 420,":a;chara\basilisk_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\basilisk_ct02.bmp",0,0
lsp 421,":a;chara\basilisk_bk05.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\basilisk_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\basilisk_ct04.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_basilisk_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,45
mov %skill01,12
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *basilisk_start
if %bwait=211 mov %nanido,2:goto *basilisk_start
if %bwait=212 mov %nanido,3:goto *basilisk_start
lsp 700,":a;chara\basilisk_st02.bmp",0,0
bg "bg\bg115.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *basilisk_h



*zukan_dragon

mov $zname,"Dragon Girl"
mov $zlavel,"dragon"
itoa2 $zukan_ko,%2613
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2613=0 mov %ryozyoku1,0
if %2613>0 mov %ryozyoku1,1
if %2613=0 mov %zukancg,0
if %2613>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"TO"
mov $zukan_hp,"UOOO"
mov $zukan_skill1,"Dragon Hand"
mov %zukan_skillc1,3509
mov $zukan_skill2,"Dragon Mouth"
mov %zukan_skillc2,3510
mov $zukan_skill3,"Dragon Breasts"
mov %zukan_skillc3,3511
mov $zukan_skill4,"Dragon Tongue"
mov %zukan_skillc4,3512
mov $zukan_skill5,"Oral Fixation"
mov %zukan_skillc5,3513
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_dragon_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\dragong.jpg",400,0
goto *zukan_kihonbtn



*zukan_dragon_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\dragon_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\dragon_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\dragon_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\dragon_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\dragon_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\dragon_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\dragon_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
return



*zukan_dragon_cg

lsp 500,":c;bg\bg115.bmp",0,0
lsp 430,":a;chara\dragon_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dragon_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dragon_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dragon_h4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_dragon_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,45
mov %skill01,12
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *dragon_start
if %bwait=211 mov %nanido,2:goto *dragon_start
if %bwait=212 mov %nanido,3:goto *dragon_start
lsp 700,":a;chara\dragon_st02.bmp",0,0
bg "bg\bg115.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *dragon_h



*zukan_salamander

mov $zname,"Salamander"
mov $zlavel,"salamander"
itoa2 $zukan_ko,%2614
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,3
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2614=0 mov %ryozyoku1,0
if %2614>0 mov %ryozyoku1,1
if %2614=0 mov %zukancg,0
if %2614>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"WT"
mov $zukan_hp,"PUOOO"
mov $zukan_skill1,"Anti Fire Fist"
mov %zukan_skillc1,3514
mov $zukan_skill2,"Fire Spirit's Foot"
mov %zukan_skillc2,3515
mov $zukan_skill3,"Fire Spirit's Embrace"
mov %zukan_skillc3,3516
mov $zukan_skill4,"Flame Steiner"
mov %zukan_skillc4,3517
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_salamander_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\salamander.jpg",400,0
goto *zukan_kihonbtn



*zukan_salamander_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=2 && %zukan_hyouzyo=3 mov %zukan_hyouzyo,1
if %zukan_pozu=2 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,2
if %zukan_pozu=3 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=3 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\salamander_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\salamander_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\salamander_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\salamander_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\salamander_st12.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\salamander_st21.bmp",%zukan_x0+235,85
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\salamander_st22.bmp",%zukan_x0+235,85
if %zukan_pozu=3 && %zukan_hyouzyo=3 lsp 450,":a;chara\salamander_st23.bmp",%zukan_x0+235,85
if %zukan_bukkake1=1 lsp 441,":a;chara\salamander_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\salamander_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\salamander_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\salamander_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_pozu>1 cspl 441,444
return



*zukan_salamander_cg

lsp 500,":c;bg\bg115.bmp",0,0
lsp 430,":a;chara\salamander_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\salamander_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\salamander_ha3.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_salamander_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,45
mov %skill01,12
mov %skill02,2
mov %skill03,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *salamander_start
if %bwait=211 mov %nanido,2:goto *salamander_start
if %bwait=212 mov %nanido,3:goto *salamander_start
lsp 700,":a;chara\salamander_st02.bmp",0,0
bg "bg\bg115.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Salamander"
if %bwait=213 goto *salamander_h



*zukan_granberia3

mov $zname,"Granberia"
mov $zlavel,"granberia3"
itoa2 $zukan_ko,%2615
mov %zukan_hyouzyonum,5
mov %zukan_pozunum,3
mov %zukan_bukkakenum,3
mov %zukan_sentounum,2
mov %zukan_ryozyokunum,1
if %2615=0 mov %ryozyoku1,0
if %2615>0 mov %ryozyoku1,1
if %2615=0 mov %zukancg,0
if %2615>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PQU"
mov $zukan_hp,"QSOOO"
mov %zukan_skillc1,0
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_granberia3_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\granberia3.jpg",400,0
goto *zukan_kihonbtn



*zukan_granberia3_p

if %zukan_pozu=1 && %zukan_hyouzyo=7 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,6
if %zukan_pozu=2 && %zukan_hyouzyo=4 mov %zukan_hyouzyo,1
if %zukan_pozu=2 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,3
if %zukan_pozu=3 && %zukan_hyouzyo=3 mov %zukan_hyouzyo,1
if %zukan_pozu=3 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,2
if %zukan_pozu=4 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,3
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\granberia_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\granberia_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\granberia_st03.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\granberia_st04.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=5 lsp 450,":a;chara\granberia_st05.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=6 lsp 450,":a;chara\granberia_st06.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\granberia_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\granberia_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\granberia_st13.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\granberia_st41.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\granberia_st42.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\granberia_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\granberia_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\granberia_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_pozu>1 cspl 441,443
return



*zukan_granberia3_cg

lsp 500,":c;bg\bg115.bmp",0,0
lsp 430,":a;chara\granberia_hc1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\granberia_hc2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\granberia_hc3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\granberia_hc4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_granberia3_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,46
mov %skill01,12
mov %skill02,2
mov %skill03,2
mov %skill04,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *granberia3_start
if %bwait=211 mov %nanido,2:goto *granberia3_start
if %bwait=212 mov %nanido,3:goto *granberia3_start
lsp 700,":a;chara\granberia_st41.bmp",0,0
bg "bg\bg115.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Granberia"
if %bwait=213 goto *granberia3_h



*zukan_kani2

mov $zname,"Crab Girl"
mov $zlavel,"kani2"
itoa2 $zukan_ko,%2616
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,2
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2616=0 mov %ryozyoku1,0
if %2616>0 mov %ryozyoku1,1
if %2616=0 mov %zukancg,0
if %2616>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"SU"
mov $zukan_hp,"QQOO"
mov $zukan_skill1,"Bubble Bubble"
mov %zukan_skillc1,3518
mov $zukan_skill2,"Bubble Wash Heaven"
mov %zukan_skillc2,3519
mov $zukan_skill3,"Bubble Shake Hell"
mov %zukan_skillc3,3520
mov $zukan_skill4,"Special Bubble Handjob"
mov %zukan_skillc4,3521
mov $zukan_skill5,"Full Body Bubble Hell"
mov %zukan_skillc5,3522
mov $zukan_skill6,"Hellish Penis Washing"
mov %zukan_skillc6,3523
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_kani2_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\crab2.jpg",400,0
goto *zukan_kihonbtn



*zukan_kani2_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=2 mov %zukan_hyouzyonum,1
if %zukan_pozu<>2 mov %zukan_hyouzyonum,3
if %zukan_pozu=1 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=2 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\kani_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\kani_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\kani_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 lsp 450,":a;chara\kani_st00.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\kani_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\kani_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\kani_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\kani_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_pozu=2 csp 444
return



*zukan_kani2_cg

lsp 500,":c;bg\bg039.bmp",0,0
lsp 430,":a;chara\kani_st11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kani_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kani_ct02.bmp",0,0
lsp 430,":a;chara\kani_st12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kani_ct03.bmp",0,0
lsp 430,":a;chara\kani_st13.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kani_ct11.bmp",0,0
lsp 430,":a;chara\kani_st11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kani_ct12.bmp",0,0
lsp 430,":a;chara\kani_st12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kani_ct13.bmp",0,0
lsp 430,":a;chara\kani_st13.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\kani_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kani_ct21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kani_h2.bmp",0,0
lsp 420,":a;chara\kani_ct22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kani_ct23.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kani_ct24.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\kani_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kani_ct21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kani_h4.bmp",0,0
lsp 420,":a;chara\kani_ct22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kani_ct23.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kani_ct24.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_kani2_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,46
mov %skill01,14
mov %skill02,2
mov %skill03,2
mov %skill04,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *kani2_start
if %bwait=211 mov %nanido,2:goto *kani2_start
if %bwait=212 mov %nanido,3:goto *kani2_start
lsp 700,":a;chara\kani_st02.bmp",0,0
bg "bg\bg039.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Crab Girl"
if %bwait=213 goto *kani2_h



*zukan_dagon

mov $zname,"Dagon"
mov $zlavel,"dagon"
itoa2 $zukan_ko,%2618
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,2
mov %zukan_bukkakenum,2
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2618=0 mov %ryozyoku1,0
if %2618>0 mov %ryozyoku1,1
if %2618=0 mov %zukancg,0
if %2618>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"SU"
mov $zukan_hp,"SUOO"
mov $zukan_skill1,"Squirm Squirm"
mov %zukan_skillc1,3528
mov $zukan_skill2,"Suck Suck"
mov %zukan_skillc2,3529
mov $zukan_skill3,"Squish Squish"
mov %zukan_skillc3,3530
mov $zukan_skill4,"Forcible Semen Squeeze"
mov %zukan_skillc4,3531
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_dagon_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\dagon.jpg",400,0
goto *zukan_kihonbtn



*zukan_dagon_p

if %zukan_pozu=2 mov %zukan_hyouzyonum,1
if %zukan_pozu<>2 mov %zukan_hyouzyonum,3
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\dagon_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\dagon_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\dagon_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 lsp 450,":a;chara\dagon_st11.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\dagon_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\dagon_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_pozu=2 cspl 441,442
return



*zukan_dagon_cg

lsp 500,":c;bg\bg050.bmp",0,0
lsp 430,":a;chara\dagon_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\dagon_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\dagon_ct01a.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\dagon_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dagon_h2.bmp",0,0
lsp 420,":a;chara\dagon_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\dagon_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\dagon_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\dagon_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\dagon_ct03.bmp",0,0
lsp 430,":a;chara\dagon_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\dagon_ct04.bmp",0,0
lsp 430,":a;chara\dagon_h5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\dagon_ct05.bmp",0,0
lsp 430,":a;chara\dagon_h6.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_dagon_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,46
mov %skill01,14
mov %skill02,2
mov %skill03,2
mov %skill04,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *dagon_start
if %bwait=211 mov %nanido,2:goto *dagon_start
if %bwait=212 mov %nanido,3:goto *dagon_start
lsp 700,":a;chara\dagon_st02.bmp",0,0
bg "bg\bg050.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Dagon"
if %bwait=213 goto *dagon_h



*zukan_poseidones

mov $zname,"Poseidoness"
mov $zlavel,"poseidones"
itoa2 $zukan_ko,%2620
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2620=0 mov %ryozyoku1,0
if %2620>0 mov %ryozyoku1,1
if %2620=0 mov %zukancg,0
if %2620>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"UT"
mov $zukan_hp,"VTOO"
mov $zukan_skill1,"Tentacle Caress"
mov %zukan_skillc1,3535
mov $zukan_skill2,"Tentacle Raid"
mov %zukan_skillc2,3536
mov $zukan_skill3,"Tentacle Smash"
mov %zukan_skillc3,3537
mov $zukan_skill4,"Bound Caress"
mov %zukan_skillc4,3538
mov $zukan_skill5,"Bound Raid"
mov %zukan_skillc5,3539
mov $zukan_skill6,"Abyss Drain"
mov %zukan_skillc6,3540
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_poseidones_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\posei.jpg",400,0
goto *zukan_kihonbtn



*zukan_poseidones_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\poseidones_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\poseidones_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\poseidones_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\poseidones_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\poseidones_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\poseidones_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\poseidones_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
return



*zukan_poseidones_cg

lsp 500,":c;bg\bg053.bmp",0,0
lsp 430,":a;chara\poseidones_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\poseidones_ha2.bmp",0,0
lsp 420,":a;chara\poseidones_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\poseidones_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\poseidones_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\poseidones_ct04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\poseidones_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\poseidones_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\poseidones_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\poseidones_hb4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_poseidones_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,47
mov %skill01,14
mov %skill02,2
mov %skill03,2
mov %skill04,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *poseidones_start
if %bwait=211 mov %nanido,2:goto *poseidones_start
if %bwait=212 mov %nanido,3:goto *poseidones_start
lsp 700,":a;chara\poseidones_st02.bmp",0,0
bg "bg\bg053.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *poseidones_h



*zukan_seiren

mov $zname,"Siren"
mov $zlavel,"seiren"
itoa2 $zukan_ko,%2621
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,7
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2621=0 mov %ryozyoku1,0
if %2621>0 mov %ryozyoku1,1
if %2621=0 mov %zukancg,0
if %2621>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"SW"
mov $zukan_hp,"TQOO"
mov $zukan_skill1,"Feather Caress"
mov %zukan_skillc1,3541
mov $zukan_skill2,"Feather Wingjob"
mov %zukan_skillc2,3542
mov $zukan_skill3,"Chest of Pleasure"
mov %zukan_skillc3,3543
mov $zukan_skill4,"Mouth of Fascination"
mov %zukan_skillc4,3544
mov $zukan_skill5,"Armpit Squeeze"
mov %zukan_skillc5,3545
mov $zukan_skill6,"Thirsting Vagina"
mov %zukan_skillc6,3546
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_seiren_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\siren.jpg",400,0
goto *zukan_kihonbtn



*zukan_seiren_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\seiren_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\seiren_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\seiren_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\seiren_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\seiren_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\seiren_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\seiren_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\seiren_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\seiren_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
if %zukan_bukkake7=1 lsp 447,":a;chara\seiren_bk07.bmp",%zukan_x0,0
if %zukan_bukkake7=0 csp 447
return



*zukan_seiren_cg

lsp 500,":c;bg\bg125.bmp",0,0
lsp 430,":a;chara\seiren_st02.bmp",0,0
lsp 420,":a;chara\seiren_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\seiren_ct02.bmp",0,0
lsp 421,":a;chara\seiren_bk07.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\seiren_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\seiren_ct04.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_seiren_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,48
mov %skill01,14
mov %skill02,2
mov %skill03,2
mov %skill04,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *seiren_start
if %bwait=211 mov %nanido,2:goto *seiren_start
if %bwait=212 mov %nanido,3:goto *seiren_start
lsp 700,":a;chara\seiren_st02.bmp",0,0
bg "bg\bg125.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *seiren_h



*zukan_hitode

mov $zname,"Starfish Girl"
mov $zlavel,"hitode"
itoa2 $zukan_ko,%2617
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2617=0 mov %ryozyoku1,0
if %2617>0 mov %ryozyoku1,1
if %2617=0 mov %zukancg,0
if %2617>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"SW"
mov $zukan_hp,"SWOO"
mov $zukan_skill1,"Star Blowjob"
mov %zukan_skillc1,3524
mov $zukan_skill2,"Star Caress"
mov %zukan_skillc2,3525
mov $zukan_skill3,"Full-Body Foot Caress"
mov %zukan_skillc3,3526
mov $zukan_skill4,"Penis Foot Caress"
mov %zukan_skillc4,3527
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_hitode_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\starf.jpg",400,0
goto *zukan_kihonbtn



*zukan_hitode_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\hitode_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\hitode_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\hitode_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\hitode_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\hitode_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\hitode_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
return



*zukan_hitode_cg

lsp 500,":c;bg\bg130.bmp",0,0
lsp 430,":a;chara\hitode_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\hitode_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hitode_ha2.bmp",0,0
lsp 420,":a;chara\hitode_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hitode_ha3.bmp",0,0
csp 420
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\hitode_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hitode_ha4.bmp",0,0
lsp 420,":a;chara\hitode_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hitode_ha5.bmp",0,0
lsp 420,":a;chara\hitode_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hitode_ha6.bmp",0,0
lsp 420,":a;chara\hitode_ct04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\hitode_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hitode_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hitode_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hitode_hb4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_hitode_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,48
mov %skill01,14
mov %skill02,2
mov %skill03,2
mov %skill04,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *hitode_start
if %bwait=211 mov %nanido,2:goto *hitode_start
if %bwait=212 mov %nanido,3:goto *hitode_start
lsp 700,":a;chara\hitode_st02.bmp",0,0
bg "bg\bg130.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *hitode_h



*zukan_beelzebub

mov $zname,"Beelzebubs"
mov $zlavel,"beelzebub"
itoa2 $zukan_ko,%2624
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,3
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2624=0 mov %ryozyoku1,0
if %2624>0 mov %ryozyoku1,1
if %2624=0 mov %zukancg,0
if %2624>0 mov %zukancg,1
mov %zukan_x1,-100
mov %zukan_x2,100
mov $zukan_lv,"UT"
mov $zukan_hp,"WOOO"
mov $zukan_skill1,"Flies of Purgatory"
mov %zukan_skillc1,3554
mov $zukan_skill2,"Triple Breast Crush"
mov %zukan_skillc2,3555
mov $zukan_skill3,"Monster Fly Suck"
mov %zukan_skillc3,3556
mov $zukan_skill4,"Black Sabbath"
mov %zukan_skillc4,3557
mov $zukan_skill5,"Monster Fly Handjob"
mov %zukan_skillc5,3603
mov $zukan_skill6,"Monster Fly Breast Squeeze"
mov %zukan_skillc6,3661
mov $zukan_skill7,"Monster Fly Blowjob"
mov %zukan_skillc7,3662
mov $zukan_skill8,"Breast Jail"
mov %zukan_skillc8,3558
mov $zukan_skill9,"Breast Prison"
mov %zukan_skillc9,3587
mov $zukan_skill10,"Breast Confinement"
mov %zukan_skillc10,3588
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_beelzebub_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\beelz.jpg",400,0
goto *zukan_kihonbtn



*zukan_beelzebub_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\beelzebub_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\beelzebub_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\beelzebub_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\beelzebub_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\beelzebub_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\beelzebub_st13.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\beelzebub_st21.bmp",%zukan_x0-200,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\beelzebub_st22.bmp",%zukan_x0-200,0
if %zukan_pozu=3 && %zukan_hyouzyo=3 lsp 450,":a;chara\beelzebub_st23.bmp",%zukan_x0-200,0
if %zukan_pozu=1 && %zukan_bukkake1=1 lsp 441,":a;chara\beelzebub_bk01.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake1=1 lsp 441,":a;chara\beelzebub_bk11.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_bukkake1=1 lsp 441,":a;chara\beelzebub_bk21.bmp",%zukan_x0-200,0
if %zukan_bukkake1=0 csp 441
if %zukan_pozu=1 && %zukan_bukkake2=1 lsp 442,":a;chara\beelzebub_bk02.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake2=1 lsp 442,":a;chara\beelzebub_bk12.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_bukkake2=1 lsp 442,":a;chara\beelzebub_bk22.bmp",%zukan_x0-200,0
if %zukan_bukkake2=0 csp 442
if %zukan_pozu=1 && %zukan_bukkake3=1 lsp 443,":a;chara\beelzebub_bk03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake3=1 lsp 443,":a;chara\beelzebub_bk13.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_bukkake3=1 lsp 443,":a;chara\beelzebub_bk23.bmp",%zukan_x0-200,0
if %zukan_bukkake3=0 csp 443
if %zukan_pozu=1 && %zukan_bukkake4=1 lsp 444,":a;chara\beelzebub_bk04.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake4=1 lsp 444,":a;chara\beelzebub_bk14.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_bukkake4=1 lsp 444,":a;chara\beelzebub_bk24.bmp",%zukan_x0-200,0
if %zukan_bukkake4=0 csp 444
return



*zukan_beelzebub_cg

lsp 500,":c;bg\bg132.bmp",0,0
lsp 430,":a;chara\beelzebub_h01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\beelzebub_h02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\beelzebub_h11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\beelzebub_h12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\beelzebub_h21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\beelzebub_h22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\beelzebub_h31.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\beelzebub_h32.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\beelzebub_h33.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\beelzebub_h34.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_beelzebub_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,48
mov %skill01,14
mov %skill02,2
mov %skill03,2
mov %skill04,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *beelzebub_start
if %bwait=211 mov %nanido,2:goto *beelzebub_start
if %bwait=212 mov %nanido,3:goto *beelzebub_start
lsp 700,":a;chara\beelzebub_st02.bmp",100,50
lsp 702,":a;chara\beelzebub_st12.bmp",-150,-50
lsp 704,":a;chara\beelzebub_st22.bmp",150,-50
bg "bg\bg132.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *beelzebub_h



*zukan_trickfairy

mov $zname,"Trick Fairy"
mov $zlavel,"trickfairy"
itoa2 $zukan_ko,%2625
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2625=0 mov %ryozyoku1,0
if %2625>0 mov %ryozyoku1,1
if %2625=0 mov %zukancg,0
if %2625>0 mov %zukancg,1
mov %zukan_x1,-58
mov %zukan_x2,142
mov $zukan_lv,"SX"
mov $zukan_hp,"TSOO"
mov $zukan_skill1,"Trick Hand"
mov %zukan_skillc1,3559
mov $zukan_skill2,"Trick Chest"
mov %zukan_skillc2,3560
mov $zukan_skill3,"Trick Mouth"
mov %zukan_skillc3,3561
mov $zukan_skill4,"Soft Butt"
mov %zukan_skillc4,3562
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_trickfairy_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\tfairy.jpg",400,0
goto *zukan_kihonbtn



*zukan_trickfairy_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\trickfairy_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\trickfairy_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\trickfairy_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\trickfairy_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\trickfairy_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\trickfairy_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\trickfairy_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\trickfairy_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_trickfairy_cg

lsp 500,":c;bg\bg135.bmp",0,0
lsp 430,":a;chara\trickfairy_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\trickfairy_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\trickfairy_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\trickfairy_h4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_trickfairy_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,49
mov %skill01,14
mov %skill02,2
mov %skill03,2
mov %skill04,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *trickfairy_start
if %bwait=211 mov %nanido,2:goto *trickfairy_start
if %bwait=212 mov %nanido,3:goto *trickfairy_start
lsp 700,":a;chara\trickfairy_st02.bmp",142,0
bg "bg\bg135.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *trickfairy_h



*zukan_queenfairy

mov $zname,"Queen Fairy"
mov $zlavel,"queenfairy"
itoa2 $zukan_ko,%2626
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,2
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2626=0 mov %ryozyoku1,0
if %2626>0 mov %ryozyoku1,1
if %2626=0 mov %zukancg,0
if %2626>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"UO"
mov $zukan_hp,"XTOO"
mov $zukan_skill1,"Ivy Wand"
mov %zukan_skillc1,3570
mov $zukan_skill2,"Ivy Draw"
mov %zukan_skillc2,3571
mov $zukan_skill3,"Sucking Ivy"
mov %zukan_skillc3,3572
mov $zukan_skill4,"Fanatic Dahlia"
mov %zukan_skillc4,3573
mov $zukan_skill5,"Heaven's Dance"
mov %zukan_skillc5,3574
mov $zukan_skill6,"Ecstasy Incense"
mov %zukan_skillc6,3575
mov $zukan_skill7,"Ivy Tighten"
mov %zukan_skillc7,3563
mov $zukan_skill8,"Ivy Caress"
mov %zukan_skillc8,3564
mov $zukan_skill9,"Mellow Rafflesia"
mov %zukan_skillc9,3576
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_queenfairy_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\qfairy.jpg",400,0
goto *zukan_kihonbtn



*zukan_queenfairy_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\queenfairy_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\queenfairy_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\queenfairy_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\queenfairy_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\queenfairy_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
return



*zukan_queenfairy_cg

lsp 500,":c;bg\bg136.bmp",0,0
lsp 430,":a;chara\queenfairy_st02.bmp",0,0
lsp 420,":a;chara\queenfairy_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\queenfairy_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\queenfairy_ct11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\queenfairy_ct12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\queenfairy_ct21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\queenfairy_ct22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\queenfairy_ct31.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\queenfairy_ct32.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_queenfairy_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,50
mov %skill01,14
mov %skill02,2
mov %skill03,2
mov %skill04,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *queenfairy_start
if %bwait=211 mov %nanido,2:goto *queenfairy_start
if %bwait=212 mov %nanido,3:goto *queenfairy_start
lsp 700,":a;chara\queenfairy_st02.bmp",0,0
bg "bg\bg136.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *queenfairy_h



*zukan_queenelf

mov $zname,"Queen Elf"
mov $zlavel,"queenelf"
itoa2 $zukan_ko,%2627
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2627=0 mov %ryozyoku1,0
if %2627>0 mov %ryozyoku1,1
if %2627=0 mov %zukancg,0
if %2627>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"UO"
mov $zukan_hp,"POOOO"
mov $zukan_skill1,"Elven Hand Squeeze"
mov %zukan_skillc1,3577
mov $zukan_skill2,"Elven Mouth Melt"
mov %zukan_skillc2,3578
mov $zukan_skill3,"Elven Breast Drowning"
mov %zukan_skillc3,3579
mov $zukan_skill4,"Kiss of Ecstasy"
mov %zukan_skillc4,3581
mov $zukan_skill5,"Elven Queen's Vagina"
mov %zukan_skillc5,3582
mov $zukan_skill6,"Heavenly Thrusting"
mov %zukan_skillc6,3580
mov $zukan_skill7,"Hellishly Tight Vagina"
mov %zukan_skillc7,3600
mov $zukan_skill8,"Infinite Sucking"
mov %zukan_skillc8,3601
mov $zukan_skill9,"Energy Drain"
mov %zukan_skillc9,3663
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_queenelf_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\qelf.jpg",400,0
goto *zukan_kihonbtn



*zukan_queenelf_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\queenelf_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\queenelf_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\queenelf_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\queenelf_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\queenelf_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\queenelf_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\queenelf_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\queenelf_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_queenelf_cg

lsp 500,":c;bg\bg136.bmp",0,0
lsp 430,":a;chara\queenelf_st02.bmp",0,0
lsp 420,":a;chara\queenelf_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\queenelf_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\queenelf_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\queenelf_ct04.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_queenelf_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,51
mov %skill01,14
mov %skill02,2
mov %skill03,2
mov %skill04,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *queenelf_start
if %bwait=211 mov %nanido,2:goto *queenelf_start
if %bwait=212 mov %nanido,3:goto *queenelf_start
lsp 700,":a;chara\queenelf_st02.bmp",0,0
bg "bg\bg136.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *queenelf_h



*zukan_saraevil

mov $zname,"Sara (Succubization)"
mov $zlavel,"saraevil"
itoa2 $zukan_ko,%2628
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,8
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2628=0 mov %ryozyoku1,0
if %2628>0 mov %ryozyoku1,1
if %2628=0 mov %zukancg,0
if %2628>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"VO"
mov $zukan_hp,"PQOOO"
mov $zukan_skill1,"Earth Mother's Handjob"
mov %zukan_skillc1,3565
mov $zukan_skill2,"Isis' Lovemaking"
mov %zukan_skillc2,3566
mov $zukan_skill3,"Hellish Blowjob"
mov %zukan_skillc3,3567
mov $zukan_skill4,"Ecstasy Press"
mov %zukan_skillc4,3568
mov $zukan_skill5,"Tail Drain"
mov %zukan_skillc5,3569
mov $zukan_skill6,"Penis Choking Vagina"
mov %zukan_skillc6,3583
mov $zukan_skill7,"Overwhelming Grind"
mov %zukan_skillc7,3584
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_saraevil_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\esara.jpg",400,0
goto *zukan_kihonbtn



*zukan_saraevil_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\saraevil_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\saraevil_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\saraevil_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\saraevil_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\saraevil_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\saraevil_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\saraevil_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\saraevil_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\saraevil_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
if %zukan_bukkake7=1 lsp 447,":a;chara\saraevil_bk07.bmp",%zukan_x0,0
if %zukan_bukkake7=0 csp 447
if %zukan_bukkake8=1 lsp 448,":a;chara\saraevil_bk08.bmp",%zukan_x0,0
if %zukan_bukkake8=0 csp 448
return



*zukan_saraevil_cg

lsp 500,":c;bg\bg136.bmp",0,0
lsp 430,":a;chara\saraevil_st02.bmp",0,0
lsp 420,":a;chara\saraevil_cta01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\saraevil_cta02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\saraevil_cta03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\saraevil_cta04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\saraevil_ctb01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\saraevil_ctb02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\saraevil_ctb03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\saraevil_ctb04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\saraevil_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\saraevil_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\saraevil_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\saraevil_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\saraevil_hb4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_saraevil_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,52
mov %skill01,14
mov %skill02,2
mov %skill03,2
mov %skill04,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *saraevil_start
if %bwait=211 mov %nanido,2:goto *saraevil_start
if %bwait=212 mov %nanido,3:goto *saraevil_start
lsp 700,":a;chara\saraevil_st02.bmp",0,0
bg "bg\bg136.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Sara"
if %bwait=213 goto *saraevil_h



*zukan_wyvern

mov $zname,"Wyvern"
mov $zlavel,"wyvern"
itoa2 $zukan_ko,%2629
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2629=0 mov %ryozyoku1,0
if %2629>0 mov %ryozyoku1,1
if %2629=0 mov %zukancg,0
if %2629>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"TT"
mov $zukan_hp,"TTOO"
mov $zukan_skill1,"Aerial Blowjob"
mov %zukan_skillc1,3589
mov $zukan_skill2,"Violent Breast Rape"
mov %zukan_skillc2,3590
mov $zukan_skill3,"Air Rape"
mov %zukan_skillc3,3591
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_wyvern_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\wyvren.jpg",400,0
goto *zukan_kihonbtn



*zukan_wyvern_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\wyvern_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\wyvern_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\wyvern_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\wyvern_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\wyvern_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\wyvern_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\wyvern_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
return



*zukan_wyvern_cg

lsp 500,":c;bg\bg140.bmp",0,0
lsp 430,":a;chara\wyvern_st02.bmp",0,0
lsp 420,":a;chara\wyvern_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\wyvern_ct02.bmp",0,0
lsp 421,":a;chara\wyvern_bk04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\wyvern_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\wyvern_ct04.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_wyvern_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,52
mov %skill01,14
mov %skill02,2
mov %skill03,2
mov %skill04,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *wyvern_start
if %bwait=211 mov %nanido,2:goto *wyvern_start
if %bwait=212 mov %nanido,3:goto *wyvern_start
lsp 700,":a;chara\wyvern_st02.bmp",0,0
bg "bg\bg140.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *wyvern_h



*zukan_kyoryuu

mov $zname,"Kyoryuu"
mov $zlavel,"kyoryuu"
itoa2 $zukan_ko,%2630
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,1
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2630=0 mov %ryozyoku1,0
if %2630>0 mov %ryozyoku1,1
if %2630=0 mov %zukancg,0
if %2630>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"TR"
mov $zukan_hp,"POOOO"
mov $zukan_skill1,"Sticky Saliva"
mov %zukan_skillc1,3667
mov $zukan_skill2,"Wet Lick"
mov %zukan_skillc2,3668
mov $zukan_skill3,"Full-Body Lick"
mov %zukan_skillc3,3592
mov $zukan_skill4,"Full-Body Suck"
mov %zukan_skillc4,3593
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_kyoryuu_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\kyor.jpg",400,0
goto *zukan_kihonbtn



*zukan_kyoryuu_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\kyoryuu_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\kyoryuu_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\kyoryuu_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\kyoryuu_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
return



*zukan_kyoryuu_cg

lsp 500,":c;bg\bg142.bmp",0,0
lsp 420,":a;chara\kyoryuu_ct01.bmp",0,0
lsp 430,":a;chara\kyoryuu_st11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kyoryuu_ct02.bmp",0,0
lsp 430,":a;chara\kyoryuu_st12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kyoryuu_ct03.bmp",0,0
lsp 430,":a;chara\kyoryuu_st11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kyoryuu_ct04.bmp",0,0
lsp 430,":a;chara\kyoryuu_st12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kyoryuu_ct05.bmp",0,0
lsp 430,":a;chara\kyoryuu_st12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kyoryuu_ct06.bmp",0,0
lsp 430,":a;chara\kyoryuu_st12.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_kyoryuu_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,53
mov %skill01,14
mov %skill02,2
mov %skill03,2
mov %skill04,2
mov %skill05,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *kyoryuu_start
if %bwait=211 mov %nanido,2:goto *kyoryuu_start
if %bwait=212 mov %nanido,3:goto *kyoryuu_start
lsp 700,":a;chara\kyoryuu_st02.bmp",0,0
bg "bg\bg142.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *kyoryuu_h



*zukan_c_beast

mov $zname,"Chimera Beast"
mov $zlavel,"c_beast"
itoa2 $zukan_ko,%2631
mov %zukan_hyouzyonum,2
mov %zukan_pozunum,1
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2631=0 mov %ryozyoku1,0
if %2631>0 mov %ryozyoku1,1
if %2631=0 mov %zukancg,0
if %2631>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"TS"
mov $zukan_hp,"WTOO"
mov $zukan_skill1,"Double Breast Rape"
mov %zukan_skillc1,3594
mov $zukan_skill2,"Tongue Splash"
mov %zukan_skillc2,3595
mov $zukan_skill3,"Vacuum Tail"
mov %zukan_skillc3,3596
mov $zukan_skill4,"Piston Rush"
mov %zukan_skillc4,3597
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_c_beast_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\cbeast.jpg",400,0
goto *zukan_kihonbtn



*zukan_c_beast_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\c_beast_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\c_beast_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\c_beast_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\c_beast_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\c_beast_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\c_beast_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
return



*zukan_c_beast_cg

lsp 500,":c;bg\bg143.bmp",0,0
lsp 430,":a;chara\c_beast_st01.bmp",0,0
lsp 420,":a;chara\c_beast_ct11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\c_beast_ct12.bmp",0,0
lsp 421,":a;chara\c_beast_bk04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\c_beast_ct13.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\c_beast_ct14.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
cspl 420,421
lsp 430,":a;chara\c_beast_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_beast_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_beast_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_beast_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\c_beast_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_beast_h5.bmp",0,0
lsp 420,":a;chara\c_beast_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_beast_h6.bmp",0,0
lsp 420,":a;chara\c_beast_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\c_beast_ct04.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_c_beast_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,54
mov %skill01,14
mov %skill02,2
mov %skill03,2
mov %skill04,2
mov %skill05,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *c_beast_start
if %bwait=211 mov %nanido,2:goto *c_beast_start
if %bwait=212 mov %nanido,3:goto *c_beast_start
lsp 700,":a;chara\c_beast_st01.bmp",0,0
bg "bg\bg143.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *c_beast_h



*zukan_c_dryad_vore

mov $zname,"Chimera Dryad Vore"
mov $zlavel,"c_dryad_vore"
itoa2 $zukan_ko,%2633
mov %zukan_hyouzyonum,1
mov %zukan_pozunum,1
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,3
if %2832=0 mov %ryozyoku1,0
if %2832>0 mov %ryozyoku1,1
if %2833=0 mov %ryozyoku2,0
if %2833>0 mov %ryozyoku2,1
if %2834=0 mov %ryozyoku3,0
if %2834>0 mov %ryozyoku3,1
if %2633=0 mov %zukancg,0
if %2633>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"WO"
mov $zukan_hp,"PUOOO"
mov $zukan_skill1,"Ivy Digestion"
mov %zukan_skillc1,3604
mov $zukan_skill2,"Penis Devouring Flytrap"
mov %zukan_skillc2,3605
mov $zukan_skill3,"Semen Slurping Pitcher"
mov %zukan_skillc3,3606
mov $zukan_skill4,"Intoxicating Aroma"
mov %zukan_skillc4,3607
mov $zukan_skill5,"Melty Ivy"
mov %zukan_skillc5,3608
mov $zukan_skill6,"Venus Trap of Pleasure"
mov %zukan_skillc6,3609
mov $zukan_skill7,"Digestive Pitcher"
mov %zukan_skillc7,3610
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_c_dryad_vore_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\cdvore.jpg",400,0
goto *zukan_kihonbtn



*zukan_c_dryad_vore_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\c_dryad_vore_st01.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\c_dryad_vore_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\c_dryad_vore_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\c_dryad_vore_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
return



*zukan_c_dryad_vore_cg

lsp 500,":c;bg\bg144.bmp",0,0
lsp 430,":a;chara\c_dryad_vore_st11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_dryad_vore_st11a.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_dryad_vore_st12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_dryad_vore_st13.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_dryad_vore_st14.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_dryad_vore_st21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_dryad_vore_st21a.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_dryad_vore_st22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_dryad_vore_st23.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_dryad_vore_st24.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_dryad_vore_st25.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_dryad_vore_st31.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_dryad_vore_st32.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_dryad_vore_st33.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_c_dryad_vore_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,55
mov %skill01,14
mov %skill02,2
mov %skill03,2
mov %skill04,2
mov %skill05,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *c_dryad_vore_start
if %bwait=211 mov %nanido,2:goto *c_dryad_vore_start
if %bwait=212 mov %nanido,3:goto *c_dryad_vore_start
lsp 700,":a;chara\c_dryad_vore_st01.bmp",0,0
bg "bg\bg144.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *c_dryad_vore_ha
if %bwait=214 goto *c_dryad_vore_hb
if %bwait=215 goto *c_dryad_vore_hc



*zukan_vampire

mov $zname,"Vampire"
mov $zlavel,"vampire"
itoa2 $zukan_ko,%2635
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2635=0 mov %ryozyoku1,0
if %2635>0 mov %ryozyoku1,1
if %2635=0 mov %zukancg,0
if %2635>0 mov %zukancg,1
mov %zukan_x1,-25
mov %zukan_x2,175
mov $zukan_lv,"TU"
mov $zukan_hp,"XOOO"
mov $zukan_skill1,"Vampire Bust"
mov %zukan_skillc1,3617
mov $zukan_skill2,"Semen Drain"
mov %zukan_skillc2,3618
mov $zukan_skill3,"Bloodsucking"
mov %zukan_skillc3,3619
mov $zukan_skill4,"Dress Drain"
mov %zukan_skillc4,3620
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_vampire_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\vampire.jpg",400,0
goto *zukan_kihonbtn



*zukan_vampire_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\vampire_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\vampire_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\vampire_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\vampire_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\vampire_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\vampire_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
return



*zukan_vampire_cg

lsp 500,":c;bg\bg142.bmp",0,0
lsp 430,":a;chara\vampire_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\vampire_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\vampire_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\vampire_h4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_vampire_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,56
mov %skill01,14
mov %skill02,2
mov %skill03,2
mov %skill04,2
mov %skill05,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *vampire_start
if %bwait=211 mov %nanido,2:goto *vampire_start
if %bwait=212 mov %nanido,3:goto *vampire_start
lsp 700,":a;chara\vampire_st02.bmp",175,0
bg "bg\bg142.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *vampire_h



*zukan_behemoth

mov $zname,"Behemoth"
mov $zlavel,"behemoth"
itoa2 $zukan_ko,%2634
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2634=0 mov %ryozyoku1,0
if %2634>0 mov %ryozyoku1,1
if %2634=0 mov %zukancg,0
if %2634>0 mov %zukancg,1
mov %zukan_x1,-230
mov %zukan_x2,-30
mov $zukan_lv,"TU"
mov $zukan_hp,"POOOO"
mov $zukan_skill1,"Behemoth Shake"
mov %zukan_skillc1,3611
mov $zukan_skill2,"Behemoth Suck"
mov %zukan_skillc2,3612
mov $zukan_skill3,"Behemoth Breasts"
mov %zukan_skillc3,3613
mov $zukan_skill4,"Behemoth Torture"
mov %zukan_skillc4,3614
mov $zukan_skill5,"Behemoth Draw"
mov %zukan_skillc5,3615
mov $zukan_skill6,"Animal Rape"
mov %zukan_skillc6,3616
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_behemoth_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\behemoth.jpg",400,0
goto *zukan_kihonbtn



*zukan_behemoth_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\behemoth_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\behemoth_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\behemoth_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\behemoth_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\behemoth_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\behemoth_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\behemoth_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\behemoth_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_behemoth_cg

lsp 500,":c;bg\bg142.bmp",0,0
lsp 430,":a;chara\behemoth_st02.bmp",0,0
lsp 420,":a;chara\behemoth_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\behemoth_ct02.bmp",0,0
lsp 421,":a;chara\behemoth_bk05.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\behemoth_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\behemoth_ct04.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_behemoth_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,56
mov %skill01,14
mov %skill02,2
mov %skill03,2
mov %skill04,2
mov %skill05,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *behemoth_start
if %bwait=211 mov %nanido,2:goto *behemoth_start
if %bwait=212 mov %nanido,3:goto *behemoth_start
lsp 700,":a;chara\behemoth_st02.bmp",-30,0
bg "bg\bg142.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *behemoth_h



*zukan_esuccubus

mov $zname,"Elder Succubus"
mov $zlavel,"esuccubus"
itoa2 $zukan_ko,%2636
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,7
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2636=0 mov %ryozyoku1,0
if %2636>0 mov %ryozyoku1,1
if %2636=0 mov %zukancg,0
if %2636>0 mov %zukancg,1
mov %zukan_x1,-12
mov %zukan_x2,188
mov $zukan_lv,"TV"
mov $zukan_hp,"XTOO"
mov $zukan_skill1,"Semen Squeezecraft"
mov %zukan_skillc1,3621
mov $zukan_skill2,"Male Dominating Footcraft"
mov %zukan_skillc2,3622
mov $zukan_skill3,"Draining Blowjob"
mov %zukan_skillc3,3623
mov $zukan_skill4,"Male Squeezing Titcraft"
mov %zukan_skillc4,3624
mov $zukan_skill5,"Kiss of Ecstasy"
mov %zukan_skillc5,3625
mov $zukan_skill6,"Energy Drain"
mov %zukan_skillc6,3626
mov $zukan_skill7,"Voracious Monster Bellybutton"
mov %zukan_skillc7,3627
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_esuccubus_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\esuccu.jpg",400,0
goto *zukan_kihonbtn



*zukan_esuccubus_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\esuccubus_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\esuccubus_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\esuccubus_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\esuccubus_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\esuccubus_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\esuccubus_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\esuccubus_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\esuccubus_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\esuccubus_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
if %zukan_bukkake7=1 lsp 447,":a;chara\esuccubus_bk07.bmp",%zukan_x0,0
if %zukan_bukkake7=0 csp 447
return



*zukan_esuccubus_cg

lsp 500,":c;bg\bg148.bmp",0,0
lsp 430,":a;chara\esuccubus_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\esuccubus_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\esuccubus_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\esuccubus_h4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_esuccubus_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,57
mov %skill01,15
mov %skill02,2
mov %skill03,2
mov %skill04,2
mov %skill05,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *esuccubus_start
if %bwait=211 mov %nanido,2:goto *esuccubus_start
if %bwait=212 mov %nanido,3:goto *esuccubus_start
lsp 700,":a;chara\esuccubus_st02.bmp",188,0
bg "bg\bg148.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *esuccubus_h



*zukan_hatibi

mov $zname,"Yao"
mov $zlavel,"hatibi"
itoa2 $zukan_ko,%2619
mov %zukan_hyouzyonum,4
mov %zukan_pozunum,1
mov %zukan_bukkakenum,6
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,2
if %2835=0 mov %ryozyoku1,0
if %2835>0 mov %ryozyoku1,1
if %2836=0 mov %ryozyoku2,0
if %2836>0 mov %ryozyoku2,1
if %2619=0 mov %zukancg,0
if %2619>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"TW"
mov $zukan_hp,"PQOOO"
mov $zukan_skill1,"Tail Comfort"
mov %zukan_skillc1,3548
mov $zukan_skill2,"Playful Hand"
mov %zukan_skillc2,3549
mov $zukan_skill3,"Dancing Tongue"
mov %zukan_skillc3,3550
mov $zukan_skill4,"Breast Valley"
mov %zukan_skillc4,3551
mov $zukan_skill5,"Eight Moons"
mov %zukan_skillc5,3552
mov $zukan_skill6,"Gate of Defilement"
mov %zukan_skillc6,3553
mov $zukan_skill7,"Eyes of Temptation"
mov %zukan_skillc7,3586
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_hatibi_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\yao.jpg",400,0
goto *zukan_kihonbtn



*zukan_hatibi_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\hatibi_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\hatibi_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\hatibi_st03.bmp",%zukan_x0,0
if %zukan_hyouzyo=4 lsp 450,":a;chara\hatibi_st04.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\hatibi_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\hatibi_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\hatibi_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\hatibi_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\hatibi_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\hatibi_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
return



*zukan_hatibi_cg

lsp 500,":c;bg\bg148.bmp",0,0
lsp 430,":a;chara\hatibi_st01.bmp",0,0
lsp 420,":a;chara\hatibi_ct01.bmp",440,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\hatibi_ct02.bmp",440,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\hatibi_ct03.bmp",440,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\hatibi_ct04.bmp",440,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\hatibi_ct11.bmp",440,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\hatibi_ct12.bmp",440,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\hatibi_ct13.bmp",440,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\hatibi_ct14.bmp",440,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %2835=0 skip 16
csp 420
lsp 430,":a;chara\hatibi_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hatibi_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hatibi_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hatibi_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hatibi_ha5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hatibi_ha6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hatibi_ha7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %2836=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hatibi_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hatibi_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hatibi_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hatibi_hb4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hatibi_hb5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hatibi_hb6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hatibi_hb7.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_hatibi_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,58
mov %skill01,15
mov %skill02,2
mov %skill03,2
mov %skill04,2
mov %skill05,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *hatibi_start
if %bwait=211 mov %nanido,2:goto *hatibi_start
if %bwait=212 mov %nanido,3:goto *hatibi_start
lsp 700,":a;chara\hatibi_st02.bmp",0,0
bg "bg\bg148.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *hatibi_ha
if %bwait=214 goto *hatibi_hb



*zukan_inp

mov $zname,"Imp"
mov $zlavel,"inp"
itoa2 $zukan_ko,%2622
mov %zukan_hyouzyonum,4
mov %zukan_pozunum,1
mov %zukan_bukkakenum,6
mov %zukan_sentounum,2
mov %zukan_ryozyokunum,2
if %2837=0 mov %ryozyoku1,0
if %2837>0 mov %ryozyoku1,1
if %2838=0 mov %ryozyoku2,0
if %2838>0 mov %ryozyoku2,1
if %2622=0 mov %zukancg,0
if %2622>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"R"
mov $zukan_hp,"TO"
mov $zukan_skill1,"Imp Handjob"
mov %zukan_skillc1,3532
mov $zukan_skill2,"Imp Fellatio"
mov %zukan_skillc2,3533
mov $zukan_skill3,"Imp Tit Fuck"
mov %zukan_skillc3,3534
mov $zukan_skill4,"Imp Hip Shake"
mov %zukan_skillc4,3547
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_inp_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\imp.jpg",400,0
goto *zukan_kihonbtn



*zukan_inp_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\inp_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\inp_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\inp_st03.bmp",%zukan_x0,0
if %zukan_hyouzyo=4 lsp 450,":a;chara\inp_st04.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\inp_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\inp_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\inp_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\inp_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\inp_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\inp_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
return



*zukan_inp_cg

lsp 500,":c;bg\bg149.bmp",0,0
lsp 430,":a;chara\inp_hd1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\inp_hd2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\inp_hd3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\inp_hd4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\inp_hd5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\inp_hd6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\inp_hd7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\inp_hd8.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\inp_hc1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\inp_hc2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\inp_hc3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\inp_hc4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %2837=0 skip 13
lsp 430,":a;chara\inp_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\inp_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\inp_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\inp_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\inp_ha5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\inp_ha6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %2838=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\inp_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\inp_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\inp_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\inp_hb4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_inp_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,59
mov %skill01,15
mov %skill02,2
mov %skill03,2
mov %skill04,2
mov %skill05,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *inp_start
if %bwait=211 mov %nanido,2:goto *inp_start
if %bwait=212 mov %nanido,3:goto *inp_start
lsp 700,":a;chara\inp_st02.bmp",0,0
bg "bg\bg149.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Imp"
if %bwait=213 goto *inp_ha
if %bwait=214 goto *inp_hb



*zukan_gigantweapon

mov $zname,"Giganto Weapon"
mov $zlavel,"gigantweapon"
itoa2 $zukan_ko,%2637
mov %zukan_hyouzyonum,2
mov %zukan_pozunum,3
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2637=0 mov %ryozyoku1,0
if %2637>0 mov %ryozyoku1,1
if %2637=0 mov %zukancg,0
if %2637>0 mov %zukancg,1
mov %zukan_x1,-100
mov %zukan_x2,0
mov $zukan_lv,"XO"
mov $zukan_hp,"PWOOO"
mov $zukan_skill1,"Tentacle Dance"
mov %zukan_skillc1,3628
mov $zukan_skill2,"Semen Squeezing Program"
mov %zukan_skillc2,3629
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_gigantweapon_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\giganto.jpg",400,0
goto *zukan_kihonbtn



*zukan_gigantweapon_p

if %zukan_pozu<>1 mov %zukan_hyouzyonum,1
if %zukan_pozu=1 mov %zukan_hyouzyonum,2
if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu>1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\gigantweapon_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\gigantweapon_st02.bmp",%zukan_x0,0
if %zukan_pozu=2 lsp 450,":a;chara\gigantweapon_st11.bmp",%zukan_x0,0
if %zukan_pozu=3 lsp 450,":a;chara\gigantweapon_st21.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\gigantweapon_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\gigantweapon_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 && %zukan_pozu=1 lsp 443,":a;chara\gigantweapon_bk05.bmp",%zukan_x0,0
if %zukan_bukkake3=1 && %zukan_pozu=2 lsp 443,":a;chara\gigantweapon_bk04.bmp",%zukan_x0,0
if %zukan_bukkake3=1 && %zukan_pozu=3 lsp 443,":a;chara\gigantweapon_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
return



*zukan_gigantweapon_cg

lsp 500,":c;bg\bg149.bmp",0,0
lsp 430,":a;chara\gigantweapon_st01.bmp",0,0
lsp 420,":a;chara\lilith_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\lilith_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\gigantweapon_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\gigantweapon_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\gigantweapon_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\gigantweapon_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\gigantweapon_h5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\gigantweapon_h6.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_gigantweapon_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,58
mov %skill01,15
mov %skill02,2
mov %skill03,2
mov %skill04,2
mov %skill05,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *gigantweapon_start
if %bwait=211 mov %nanido,2:goto *gigantweapon_start
if %bwait=212 mov %nanido,3:goto *gigantweapon_start
lsp 700,":a;chara\gigantweapon_st01.bmp",0,0
bg "bg\bg149.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *gigantweapon_h



*zukan_arumaeruma3

mov $zname,"Alma Elma"
mov $zlavel,"arumaeruma3"
itoa2 $zukan_ko,%2638
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,3
mov %zukan_bukkakenum,6
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2638=0 mov %ryozyoku1,0
if %2638>0 mov %ryozyoku1,1
if %2638=0 mov %zukancg,0
if %2638>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PQT"
mov $zukan_hp,"PTOOO"
mov $zukan_skill1,"Melty Hand"
mov %zukan_skillc1,3630
mov $zukan_skill2,"Sweet Fellatio"
mov %zukan_skillc2,3631
mov $zukan_skill3,"Tail Caress"
mov %zukan_skillc3,3632
mov $zukan_skill4,"Ancient Succubus Way: Snake"
mov %zukan_skillc4,3633
mov $zukan_skill5,"Romanus Teri Spirit"
mov %zukan_skillc5,3634
mov $zukan_skill6,"Melo Sophie Tellus"
mov %zukan_skillc6,3635
mov $zukan_skill7,"Succubus Ceremony"
mov %zukan_skillc7,3636
mov $zukan_skill8,"Meltic Kiss"
mov %zukan_skillc8,3637
mov $zukan_skill9,"Tail Drain: Reterra"
mov %zukan_skillc9,3638
mov $zukan_skill10,"A Queen's Drain"
mov %zukan_skillc10,3639
mov $zukan_skill11,"Five Step Vaginal Hell"
mov %zukan_skillc11,3640
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_arumaeruma3_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\alma3.jpg",400,0
goto *zukan_kihonbtn



*zukan_arumaeruma3_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\arumaeruma_st51.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\arumaeruma_st52.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\arumaeruma_st53.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\arumaeruma_st21.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\arumaeruma_st22.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\arumaeruma_st23.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\arumaeruma_st11.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\arumaeruma_st12.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=3 lsp 450,":a;chara\arumaeruma_st13.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_bukkake1=1 lsp 441,":a;chara\arumaeruma_bk11.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_bukkake2=1 lsp 442,":a;chara\arumaeruma_bk12.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_bukkake3=1 lsp 443,":a;chara\arumaeruma_bk13.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_bukkake4=1 lsp 444,":a;chara\arumaeruma_bk14.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_bukkake5=1 lsp 445,":a;chara\arumaeruma_bk03.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_bukkake6=1 lsp 446,":a;chara\arumaeruma_bk21.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake1=1 lsp 441,":a;chara\arumaeruma_bk01.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake2=1 lsp 442,":a;chara\arumaeruma_bk02.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake3=1 lsp 443,":a;chara\arumaeruma_bk03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake4=1 lsp 444,":a;chara\arumaeruma_bk04.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake5=1 lsp 445,":a;chara\arumaeruma_bk13.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake6=1 lsp 446,":a;chara\arumaeruma_bk16.bmp",%zukan_x0,0
return



*zukan_arumaeruma3_cg

lsp 500,":c;bg\bg047.bmp",0,0
lsp 430,":a;chara\arumaeruma_st51.bmp",0,0
lsp 420,":a;chara\arumaeruma_ct01.bmp",500,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\arumaeruma_ct02.bmp",500,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\arumaeruma_ct03.bmp",500,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\arumaeruma_ct04.bmp",500,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\arumaeruma_ct05.bmp",500,0
lsp 421,":a;chara\arumaeruma_bk21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\arumaeruma_ct06.bmp",500,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
csp 421
lsp 430,":a;chara\arumaeruma_hc1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\arumaeruma_hc2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\arumaeruma_hc3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\arumaeruma_hc4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\arumaeruma_hd0.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\arumaeruma_hd1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\arumaeruma_hd2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\arumaeruma_hd3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\arumaeruma_hd4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_arumaeruma3_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,60
mov %skill01,16
mov %skill02,2
mov %skill03,2
mov %skill04,2
mov %skill05,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:bgm "bgm\yonseirei2.ogg":goto *arumaeruma3_start
if %bwait=211 mov %nanido,2:bgm "bgm\yonseirei2.ogg":goto *arumaeruma3_start
if %bwait=212 mov %nanido,3:bgm "bgm\yonseirei2.ogg":goto *arumaeruma3_start
lsp 700,":a;chara\arumaeruma_st52.bmp",0,0
bg "bg\bg047.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Alma Elma"
if %bwait=213 goto *arumaeruma3_hb



*zukan_tamamo2

mov $zname,"Tamamo"
mov $zlavel,"tamamo2"
itoa2 $zukan_ko,%2639
mov %zukan_hyouzyonum,4
mov %zukan_pozunum,5
mov %zukan_bukkakenum,7
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2639=0 mov %ryozyoku1,0
if %2639>0 mov %ryozyoku1,1
if %2639=0 mov %zukancg,0
if %2639>0 mov %zukancg,1
mov %zukan_x1,-180
mov %zukan_x2,0
mov $zukan_lv,"PQW"
mov $zukan_hp,"QQOOO"
mov $zukan_skill1,"Kitsune Handling"
mov %zukan_skillc1,3641
mov $zukan_skill2,"Kitsune Mouth Handling"
mov %zukan_skillc2,3642
mov $zukan_skill3,"Flat Breast Rub"
mov %zukan_skillc3,3643
mov $zukan_skill4,"Moonwar Footpound"
mov %zukan_skillc4,3644
mov $zukan_skill5,"Emasculating Amusement"
mov %zukan_skillc5,3645
mov $zukan_skill6,"Moontail Entanglement"
mov %zukan_skillc6,3646
mov $zukan_skill7,"Nine Moons"
mov %zukan_skillc7,3647
mov $zukan_skill8,"Moonlight Rendezvous"
mov %zukan_skillc8,3648
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_tamamo2_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\tamamo2.jpg",400,0
goto *zukan_kihonbtn



*zukan_tamamo2_p

if %zukan_pozu>2 mov %zukan_hyouzyonum,1
if %zukan_pozu<3 mov %zukan_hyouzyonum,4
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu>2 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\tamamo_st11.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\tamamo_st12.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\tamamo_st13.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\tamamo_st14.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\tamamo_st01.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\tamamo_st02.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\tamamo_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=4 lsp 450,":a;chara\tamamo_st04.bmp",%zukan_x0,0
if %zukan_pozu=3 lsp 450,":a;chara\tamamo_st41.bmp",%zukan_x0,0
if %zukan_pozu=4 lsp 450,":a;chara\tamamo_st21.bmp",%zukan_x0,0
if %zukan_pozu=5 lsp 450,":a;chara\tamamo_st31.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\tamamo_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\tamamo_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\tamamo_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\tamamo_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\tamamo_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\tamamo_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
if %zukan_bukkake7=1 lsp 447,":a;chara\tamamo_bk07.bmp",%zukan_x0,0
if %zukan_bukkake7=0 csp 447
if %zukan_pozu>1 cspl 445,447
if %zukan_pozu>2 cspl 441,447
return



*zukan_tamamo2_cg

lsp 500,":c;bg\bg047.bmp",0,0
lsp 430,":a;chara\tamamo_st11.bmp",0,0
lsp 420,":a;chara\tamamo_ctc01.bmp",490,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\tamamo_ctc02.bmp",490,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 423,":a;chara\tamamo_bk03.bmp",0,0
lsp 420,":a;chara\tamamo_ctc03.bmp",490,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\tamamo_ctc04.bmp",490,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 423
lsp 420,":a;chara\tamamo_cta01.bmp",490,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\tamamo_cta02.bmp",490,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 424,":a;chara\tamamo_bk04.bmp",0,0
lsp 420,":a;chara\tamamo_cta03.bmp",490,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\tamamo_cta04.bmp",490,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 424
lsp 420,":a;chara\tamamo_ctb01.bmp",440,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\tamamo_ctb02.bmp",440,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 424,":a;chara\tamamo_bk04.bmp",0,0
lsp 420,":a;chara\tamamo_ctb03.bmp",440,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\tamamo_ctb04.bmp",440,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
cspl 420,429
lsp 430,":a;chara\tamamo_hc1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tamamo_hc2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tamamo_hc3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tamamo_hc4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tamamo_hc5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tamamo_hc6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tamamo_hc7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tamamo_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tamamo_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tamamo_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tamamo_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tamamo_ha5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tamamo_ha6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tamamo_ha7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tamamo_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tamamo_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tamamo_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tamamo_hb4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tamamo_hb5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tamamo_hb6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tamamo_hb7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tamamo_hb8.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_tamamo2_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,61
mov %skill01,16
mov %skill02,3
mov %skill03,2
mov %skill04,2
mov %skill05,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:bgm "bgm\tamamo.ogg":goto *tamamo2_start
if %bwait=211 mov %nanido,2:bgm "bgm\tamamo.ogg":goto *tamamo2_start
if %bwait=212 mov %nanido,3:bgm "bgm\tamamo.ogg":goto *tamamo2_start
lsp 700,":a;chara\tamamo_st12.bmp",0,0
bg "bg\bg047.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Tamamo"
if %bwait=213 goto *tamamo2_hb



*zukan_erbetie2

mov $zname,"Erubetie"
mov $zlavel,"erbetie2"
itoa2 $zukan_ko,%2640
mov %zukan_hyouzyonum,1
mov %zukan_pozunum,1
mov %zukan_bukkakenum,7
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2640=0 mov %ryozyoku1,0
if %2640>0 mov %ryozyoku1,1
if %2640=0 mov %zukancg,0
if %2640>0 mov %zukancg,1
mov %zukan_x1,25
mov %zukan_x2,225
mov $zukan_lv,"PQT"
mov $zukan_hp,"QQOOO"
mov $zukan_skill1,"Agartha Draw"
mov %zukan_skillc1,3649
mov $zukan_skill2,"Arcadia Spread"
mov %zukan_skillc2,3650
mov $zukan_skill3,"Xanadu Stroke"
mov %zukan_skillc3,3651
mov $zukan_skill4,"Shangri-La Screw"
mov %zukan_skillc4,3652
mov $zukan_skill5,"Melt Storm"
mov %zukan_skillc5,3653
mov $zukan_skill6,"Heaven's Prison"
mov %zukan_skillc6,3654
mov $zukan_skill7,"Neverland Frontier"
mov %zukan_skillc7,3655
mov $zukan_skill8,"Divine Destiny"
mov %zukan_skillc8,3656
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_erbetie2_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\eru2.jpg",400,0
goto *zukan_kihonbtn



*zukan_erbetie2_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\erbetie_st01.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\erbetie_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\erbetie_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\erbetie_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\erbetie_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\erbetie_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\erbetie_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
if %zukan_bukkake7=1 lsp 447,":a;chara\erbetie_bk07.bmp",%zukan_x0,0
if %zukan_bukkake7=0 csp 447
return



*zukan_erbetie2_cg

lsp 500,":c;bg\bg047.bmp",0,0
lsp 430,":a;chara\erbetie_hb1r.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\erbetie_hb2r.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\erbetie_hb3r.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\erbetie_hb4r.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\erbetie_hb5r.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_erbetie2_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,62
mov %skill01,16
mov %skill02,3
mov %skill03,3
mov %skill04,2
mov %skill05,2
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *erbetie2_start
if %bwait=211 mov %nanido,2:goto *erbetie2_start
if %bwait=212 mov %nanido,3:goto *erbetie2_start
lsp 700,":a;chara\erbetie_st01.bmp",225,0
bg "bg\bg047.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Erubetie"
if %bwait=213 goto *erbetie2_h



*zukan_granberia4

mov $zname,"Granberia"
mov $zlavel,"granberia4"
itoa2 $zukan_ko,%2641
mov %zukan_hyouzyonum,5
mov %zukan_pozunum,4
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2641=0 mov %ryozyoku1,0
if %2641>0 mov %ryozyoku1,1
if %2641=0 mov %zukancg,0
if %2641>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PQU"
mov $zukan_hp,"QSOOO"
mov %zukan_skillc1,0
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_granberia4_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\gran4.jpg",400,0
goto *zukan_kihonbtn



*zukan_granberia4_p

if %zukan_pozu=1 && %zukan_hyouzyo=7 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,6
if %zukan_pozu=2 && %zukan_hyouzyo=4 mov %zukan_hyouzyo,1
if %zukan_pozu=2 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,3
if %zukan_pozu=3 && %zukan_hyouzyo=3 mov %zukan_hyouzyo,1
if %zukan_pozu=3 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,2
if %zukan_pozu=4 && %zukan_hyouzyo=4 mov %zukan_hyouzyo,1
if %zukan_pozu=4 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,3
if %zukan_pozu=5 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,4
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\granberia_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\granberia_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\granberia_st03.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\granberia_st04.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=5 lsp 450,":a;chara\granberia_st05.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=6 lsp 450,":a;chara\granberia_st06.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\granberia_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\granberia_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\granberia_st13.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\granberia_st41.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\granberia_st42.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=1 lsp 450,":a;chara\granberia_st51.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=2 lsp 450,":a;chara\granberia_st52.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=3 lsp 450,":a;chara\granberia_st53.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\granberia_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\granberia_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\granberia_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_pozu>1 cspl 441,443
return



*zukan_granberia4_cg

lsp 500,":c;bg\bg047.bmp",0,0
lsp 430,":a;chara\granberia_hd1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\granberia_hd2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\granberia_hd3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\granberia_hd4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_granberia4_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,63
mov %skill01,16
mov %skill02,3
mov %skill03,3
mov %skill04,2
mov %skill05,3
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *granberia4_start
if %bwait=211 mov %nanido,2:goto *granberia4_start
if %bwait=212 mov %nanido,3:goto *granberia4_start
bg "bg\bg047.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Granberia"
if %bwait=213 goto *granberia4_h



*zukan_alice3

mov $zname,"Alice"
mov $zlavel,"alice3"
itoa2 $zukan_ko,%2642
mov %zukan_hyouzyonum,10
mov %zukan_pozunum,7
mov %zukan_bukkakenum,8
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2642=0 mov %ryozyoku1,0
if %2642>0 mov %ryozyoku1,1
if %2642=0 mov %zukancg,0
if %2642>0 mov %zukancg,1
mov %zukan_x1,-20
mov %zukan_x2,150
mov $zukan_lv,"PST"
mov $zukan_hp,"RQOOO"
mov $zukan_skill1,"Satanic Pressure"
mov %zukan_skillc1,3657
mov $zukan_skill2,"Pleasure Drain"
mov %zukan_skillc2,3658
mov $zukan_skill3,"Eyes of Temptation"
mov %zukan_skillc3,3659
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_alice3_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\alice3.jpg",400,0
goto *zukan_kihonbtn



*zukan_alice3_p

if %zukan_pozu=8 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,7
if %zukan_pozu<5 && %zukan_hyouzyo=11 mov %zukan_hyouzyo,1
if %zukan_pozu<5 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,10
if %zukan_pozu>4 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\alice_st01.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\alice_st01b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\alice_st11.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=1 lsp 450,":a;chara\alice_st11b.bmp",%zukan_x0-80,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\alice_st02.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\alice_st02b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\alice_st12.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=2 lsp 450,":a;chara\alice_st12b.bmp",%zukan_x0-80,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\alice_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\alice_st03b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_hyouzyo=3 lsp 450,":a;chara\alice_st13.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=3 lsp 450,":a;chara\alice_st13b.bmp",%zukan_x0-80,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\alice_st04.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=4 lsp 450,":a;chara\alice_st04b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_hyouzyo=4 lsp 450,":a;chara\alice_st14.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=4 lsp 450,":a;chara\alice_st14b.bmp",%zukan_x0-80,0
if %zukan_pozu=1 && %zukan_hyouzyo=5 lsp 450,":a;chara\alice_st05.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=5 lsp 450,":a;chara\alice_st05b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_hyouzyo=5 lsp 450,":a;chara\alice_st15.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=5 lsp 450,":a;chara\alice_st15b.bmp",%zukan_x0-80,0
if %zukan_pozu=1 && %zukan_hyouzyo=6 lsp 450,":a;chara\alice_st06.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=6 lsp 450,":a;chara\alice_st06b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_hyouzyo=6 lsp 450,":a;chara\alice_st16.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=6 lsp 450,":a;chara\alice_st16bre.bmp",%zukan_x0-80,0
if %zukan_pozu=1 && %zukan_hyouzyo=7 lsp 450,":a;chara\alice_st07.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=7 lsp 450,":a;chara\alice_st07b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_hyouzyo=7 lsp 450,":a;chara\alice_st17.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=7 lsp 450,":a;chara\alice_st17bre.bmp",%zukan_x0-80,0
if %zukan_pozu=1 && %zukan_hyouzyo=8 lsp 450,":a;chara\alice_st08.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=8 lsp 450,":a;chara\alice_st08b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_hyouzyo=8 lsp 450,":a;chara\alice_st18.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=8 lsp 450,":a;chara\alice_st18bre.bmp",%zukan_x0-80,0
if %zukan_pozu=1 && %zukan_hyouzyo=9 lsp 450,":a;chara\alice_st09.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=9 lsp 450,":a;chara\alice_st09b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_hyouzyo=9 lsp 450,":a;chara\alice_st19.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=9 lsp 450,":a;chara\alice_st19bre.bmp",%zukan_x0-80,0
if %zukan_pozu=1 && %zukan_hyouzyo=10 lsp 450,":a;chara\alice_st51.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=10 lsp 450,":a;chara\alice_st51b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_hyouzyo=10 lsp 450,":a;chara\alice_st61.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=10 lsp 450,":a;chara\alice_st61b.bmp",%zukan_x0-80,0
if %zukan_pozu=5 && %zukan_hyouzyo=1 lsp 450,":a;chara\alice_st21.bmp",%zukan_x0,0
if %zukan_pozu=6 && %zukan_hyouzyo=1 lsp 450,":a;chara\alice_st23.bmp",%zukan_x0,0
if %zukan_pozu=7 && %zukan_hyouzyo=1 lsp 450,":a;chara\alice_st31.bmp",%zukan_x0+80,125
if %zukan_pozu=1 && %zukan_bukkake1=1 lsp 441,":a;chara\alice_bk01.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake1=1 lsp 441,":a;chara\alice_bk01b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_bukkake1=1 lsp 441,":a;chara\alice_bk01.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_bukkake1=1 lsp 441,":a;chara\alice_bk01b.bmp",%zukan_x0-80,0
if %zukan_pozu=5 && %zukan_bukkake1=1 lsp 441,":a;chara\alice_bk11.bmp",%zukan_x0,0
if %zukan_pozu=6 && %zukan_bukkake1=1 lsp 441,":a;chara\alice_bk12.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_pozu=1 && %zukan_bukkake2=1 lsp 442,":a;chara\alice_bk02.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake2=1 lsp 442,":a;chara\alice_bk02b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_bukkake2=1 lsp 442,":a;chara\alice_bk02.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_bukkake2=1 lsp 442,":a;chara\alice_bk02b.bmp",%zukan_x0-80,0
if %zukan_bukkake2=0 csp 442
if %zukan_pozu=1 && %zukan_bukkake3=1 lsp 443,":a;chara\alice_bk03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake3=1 lsp 443,":a;chara\alice_bk03b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_bukkake3=1 lsp 443,":a;chara\alice_bk03.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_bukkake3=1 lsp 443,":a;chara\alice_bk03b.bmp",%zukan_x0-80,0
if %zukan_bukkake3=0 csp 443
if %zukan_pozu=1 && %zukan_bukkake4=1 lsp 444,":a;chara\alice_bk04.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake4=1 lsp 444,":a;chara\alice_bk04b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_bukkake4=1 lsp 444,":a;chara\alice_bk04.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_bukkake4=1 lsp 444,":a;chara\alice_bk04b.bmp",%zukan_x0-80,0
if %zukan_bukkake4=0 csp 444
if %zukan_pozu=1 && %zukan_bukkake5=1 lsp 445,":a;chara\alice_bk05.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake5=1 lsp 445,":a;chara\alice_bk05b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_bukkake5=1 lsp 445,":a;chara\alice_bk05.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_bukkake5=1 lsp 445,":a;chara\alice_bk05b.bmp",%zukan_x0-80,0
if %zukan_bukkake5=0 csp 445
if %zukan_pozu=1 && %zukan_bukkake6=1 lsp 446,":a;chara\alice_bk06.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake6=1 lsp 446,":a;chara\alice_bk06b.bmp",%zukan_x0-80,0
if %zukan_bukkake6=0 csp 446
if %zukan_pozu=1 && %zukan_bukkake7=1 lsp 447,":a;chara\alice_bk07.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake7=1 lsp 447,":a;chara\alice_bk07b.bmp",%zukan_x0-80,0
if %zukan_bukkake7=0 csp 447
if %zukan_pozu=1 && %zukan_bukkake8=1 lsp 448,":a;chara\alice_bk08.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake8=1 lsp 448,":a;chara\alice_bk08b.bmp",%zukan_x0-80,0
if %zukan_bukkake8=0 csp 448
if %zukan_pozu>2 cspl 446,448
if %zukan_pozu>4 cspl 442,445
return



*zukan_alice3_cg

lsp 430,":a;chara\alice_h09_1r.bmp",0,0
lsp 500,":c;bg\bg141.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_h09_2r.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_h09_3r.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_h09_4r.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_alice3_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,64
mov %skill01,16
mov %skill02,3
mov %skill03,3
mov %skill04,3
mov %skill05,3
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *alice2_start
if %bwait=211 mov %nanido,2:goto *alice2_start
if %bwait=212 mov %nanido,3:goto *alice2_start
lsp 700,":a;chara\alice_st02.bmp",172,0
bg "bg\bg141.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Alice"
if %bwait=213 goto *alice2_h



*zukan_irias2

mov $zname,"Goddess Ilias"
mov $zlavel,"irias2"
mov $zukan_ko,"None "
mov %zukan_hyouzyonum,6
mov %zukan_pozunum,3
mov %zukan_bukkakenum,0
mov %zukan_sentounum,0
mov %zukan_ryozyokunum,1
mov %ryozyoku1,1
mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"HHH"
mov $zukan_hp,"HHH"
mov %zukan_skillc1,0
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_irias2_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\ilias2.jpg",400,0
goto *zukan_kihonbtn



*zukan_irias2_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu>1 && %zukan_hyouzyo=3 mov %zukan_hyouzyo,1
if %zukan_pozu>1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,2
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\iriasu_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\iriasu_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\iriasu_st03.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\iriasu_st04.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=5 lsp 450,":a;chara\iriasu_st05.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=6 lsp 450,":a;chara\iriasu_st06.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\iriasu_st13.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\iriasu_st12.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\iriasu_st14.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\iriasu_st16.bmp",%zukan_x0,0
return



*zukan_irias2_cg

lsp 500,":c;bg\bg001.bmp",0,0
lsp 430,":a;chara\iriasu_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\iriasu_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\iriasu_h3.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_irias2_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,64
mov %skill01,16
mov %skill02,3
mov %skill03,3
mov %skill04,3
mov %skill05,3
mov %item01,9
gosub *setwindow_01
lsp 700,":a;chara\iriasu_st02.bmp",0,0
bg "bg\bg001.bmp",10,1500
bgm "BGM\irias.ogg"
if %bwait=213 goto *sean0301a



*zukan_cupid

mov $zname,"Cupid"
mov $zlavel,"cupid"
itoa2 $zukan_ko,%2650
mov %zukan_hyouzyonum,6
mov %zukan_pozunum,1
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2650=0 mov %ryozyoku1,0
if %2650>0 mov %ryozyoku1,1
if %2650=0 mov %zukancg,0
if %2650>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"WO"
mov $zukan_hp,"PROOO"
mov $zukan_skill1,"Eros' Handjob"
mov %zukan_skillc1,3383
mov $zukan_skill2,"Cupid's Blowjob"
mov %zukan_skillc2,3660
mov $zukan_skill3,"Amores' Tit Fuck"
mov %zukan_skillc3,3669
mov $zukan_skill4,"Tit Fuck Temptation"
mov %zukan_skillc4,3670
mov $zukan_skill5,"Love Angel's Lust"
mov %zukan_skillc5,3671
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_cupid_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\cupid.jpg",400,0
goto *zukan_kihonbtn



*zukan_cupid_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\cupid_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\cupid_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\cupid_st03.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\cupid_st04.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=5 lsp 450,":a;chara\cupid_st05.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=6 lsp 450,":a;chara\cupid_st06.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_bukkake1=1 lsp 441,":a;chara\cupid_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_pozu=1 && %zukan_bukkake2=1 lsp 442,":a;chara\cupid_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_pozu=1 && %zukan_bukkake3=1 lsp 443,":a;chara\cupid_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_pozu=1 && %zukan_bukkake4=1 lsp 444,":a;chara\cupid_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
return



*zukan_cupid_cg

lsp 500,":c;bg\bg047.bmp",0,0
lsp 430,":a;chara\cupid_hb1.bmp",133,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\cupid_hb2.bmp",133,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\cupid_hb3.bmp",133,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\cupid_hb4.bmp",133,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\cupid_hb5.bmp",133,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\cupid_hb6.bmp",133,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\cupid_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\cupid_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\cupid_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\cupid_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\cupid_ha5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\cupid_ha6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\cupid_ha7.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_cupid_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,64
mov %skill01,16
mov %skill02,3
mov %skill03,3
mov %skill04,3
mov %skill05,3
mov %item01,9
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *cupid_start
if %bwait=211 mov %nanido,2:goto *cupid_start
if %bwait=212 mov %nanido,3:goto *cupid_start
lsp 700,":a;chara\cupid_st01.bmp",0,0
bg "bg\bg047.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *cupid_h



*zukan_valkyrie

mov $zname,"Valkyrie"
mov $zlavel,"valkyrie"
itoa2 $zukan_ko,%2651
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,4
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2651=0 mov %ryozyoku1,0
if %2651>0 mov %ryozyoku1,1
if %2651=0 mov %zukancg,0
if %2651>0 mov %zukancg,1
mov %zukan_x1,-300
mov %zukan_x2,-50
mov $zukan_lv,"WW"
mov $zukan_hp,"PWOOO"
mov $zukan_skill1,"War Angel's Handjob"
mov %zukan_skillc1,3672
mov $zukan_skill2,"War Angel's Heavenly Wings"
mov %zukan_skillc2,3673
mov $zukan_skill3,"War Angel's Blowjob"
mov %zukan_skillc3,3674
mov $zukan_skill4,"War Angel's Breast Comfort"
mov %zukan_skillc4,3675
mov $zukan_skill5,"War Angel's Embrace"
mov %zukan_skillc5,3676
mov $zukan_skill6,"War Angel's Intercrural"
mov %zukan_skillc6,3677
mov $zukan_skill7,"War Angel's Vagina"
mov %zukan_skillc7,3678
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_valkyrie_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\valk.jpg",400,0
goto *zukan_kihonbtn



*zukan_valkyrie_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\valkyrie_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\valkyrie_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\valkyrie_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\valkyrie_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\valkyrie_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\valkyrie_st13.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\valkyrie_st21.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\valkyrie_st22.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=3 lsp 450,":a;chara\valkyrie_st23.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=1 lsp 450,":a;chara\valkyrie_st31.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=2 lsp 450,":a;chara\valkyrie_st32.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=3 lsp 450,":a;chara\valkyrie_st33.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_bukkake1=1 lsp 441,":a;chara\valkyrie_bk01.bmp",%zukan_x0,0
if %zukan_pozu>1 && %zukan_bukkake1=1 lsp 441,":a;chara\valkyrie_bk11.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_pozu<4 && %zukan_bukkake2=1 lsp 442,":a;chara\valkyrie_bk02.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_bukkake2=1 lsp 442,":a;chara\valkyrie_bk32.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_pozu<4 && %zukan_bukkake3=1 lsp 443,":a;chara\valkyrie_bk03.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_bukkake3=1 lsp 443,":a;chara\valkyrie_bk33.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\valkyrie_bk34.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\valkyrie_bk35.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_valkyrie_cg

lsp 500,":c;bg\bg047.bmp",0,0
lsp 430,":a;chara\valkyrie_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\valkyrie_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\valkyrie_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\valkyrie_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\valkyrie_ha5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\valkyrie_ha6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\valkyrie_ha7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\valkyrie_ha8.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_valkyrie_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,64
mov %skill01,16
mov %skill02,3
mov %skill03,3
mov %skill04,3
mov %skill05,3
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *valkyrie_start
if %bwait=211 mov %nanido,2:goto *valkyrie_start
if %bwait=212 mov %nanido,3:goto *valkyrie_start
lsp 700,":a;chara\valkyrie_st32.bmp",-50,0
bg "bg\bg047.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *valkyrie_h



*zukan_ariel

mov $zname,"Archangel Ariel"
mov $zlavel,"ariel"
itoa2 $zukan_ko,%2652
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,6
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2652=0 mov %ryozyoku1,0
if %2652>0 mov %ryozyoku1,1
if %2652=0 mov %zukancg,0
if %2652>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PPO"
mov $zukan_hp,"QQOOO"
mov $zukan_skill1,"Archangel's Masturbation"
mov %zukan_skillc1,4136
mov $zukan_skill2,"Archangel's Fellatio"
mov %zukan_skillc2,3679
mov $zukan_skill3,"Archangel's Feathers"
mov %zukan_skillc3,3680
mov $zukan_skill4,"Archangel's Tit Fuck"
mov %zukan_skillc4,3681
mov $zukan_skill5,"Archangel's Embrace"
mov %zukan_skillc5,3682
mov $zukan_skill6,"Archangel's Rape"
mov %zukan_skillc6,3683
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_ariel_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\ariel.jpg",400,0
goto *zukan_kihonbtn



*zukan_ariel_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\ariel_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\ariel_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\ariel_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\ariel_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\ariel_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\ariel_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\ariel_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\ariel_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\ariel_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
return



*zukan_ariel_cg

lsp 500,":c;bg\bg047.bmp",0,0
lsp 430,":a;chara\ariel_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ariel_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ariel_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ariel_h4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_ariel_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,64
mov %skill01,16
mov %skill02,3
mov %skill03,3
mov %skill04,3
mov %skill05,3
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *ariel_start
if %bwait=211 mov %nanido,2:goto *ariel_start
if %bwait=212 mov %nanido,3:goto *ariel_start
lsp 700,":a;chara\ariel_st02.bmp",0,0
bg "bg\bg047.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Ariel"
if %bwait=213 goto *ariel_h



*zukan_c_s2

mov $zname,"Experimental Organism S-2"
mov $zlavel,"c_s2"
itoa2 $zukan_ko,%2653
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2653=0 mov %ryozyoku1,0
if %2653>0 mov %ryozyoku1,1
if %2653=0 mov %zukancg,0
if %2653>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"SO"
mov $zukan_hp,"VTOO"
mov $zukan_skill1,"Semen Sucking Pacifier"
mov %zukan_skillc1,3684
mov $zukan_skill2,"Absorbing Tit Fuck"
mov %zukan_skillc2,3685
mov $zukan_skill3,"Semen Sucking Tentacle"
mov %zukan_skillc3,3686
mov $zukan_skill4,"Bubble Shake"
mov %zukan_skillc4,3687
mov $zukan_skill5,"Bubble Heaven"
mov %zukan_skillc5,3688
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_c_s2_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\s2.jpg",400,0
goto *zukan_kihonbtn



*zukan_c_s2_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\c_s2_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\c_s2_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\c_s2_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\c_s2_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\c_s2_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\c_s2_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\c_s2_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\c_s2_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_c_s2_cg

lsp 500,":c;bg\bg184.bmp",0,0
lsp 430,":a;chara\c_s2_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_s2_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_s2_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_s2_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_s2_ha5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_s2_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\c_s2_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\c_s2_ct02.bmp",0,0
lsp 430,":a;chara\c_s2_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\c_s2_ct03.bmp",0,0
lsp 430,":a;chara\c_s2_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\c_s2_ct04.bmp",0,0
lsp 430,":a;chara\c_s2_hb4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_c_s2_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,65
mov %skill01,17
mov %skill02,0
mov %skill03,0
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *c_s2_start
if %bwait=211 mov %nanido,2:goto *c_s2_start
if %bwait=212 mov %nanido,3:goto *c_s2_start
lsp 700,":a;chara\c_s2_st02.bmp",0,0
bg "bg\bg184.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"S-2"
if %bwait=213 goto *c_s2_h



*zukan_c_a3

mov $zname,"Experimental Organism A-3"
mov $zlavel,"c_a3"
itoa2 $zukan_ko,%2654
mov %zukan_hyouzyonum,1
mov %zukan_pozunum,1
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2654=0 mov %ryozyoku1,0
if %2654>0 mov %ryozyoku1,1
if %2654=0 mov %zukancg,0
if %2654>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"SQ"
mov $zukan_hp,"XOOO"
mov $zukan_skill1,"Tongue Stroke"
mov %zukan_skillc1,3689
mov $zukan_skill2,"Breast Press"
mov %zukan_skillc2,3690
mov $zukan_skill3,"Tentacle Rape"
mov %zukan_skillc3,3691
mov $zukan_skill4,"Immoral Raid"
mov %zukan_skillc4,3692
mov $zukan_skill5,"Immoral Feeling"
mov %zukan_skillc5,3693
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_c_a3_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\a3.jpg",400,0
goto *zukan_kihonbtn



*zukan_c_a3_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\c_a3_st01.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\c_a3_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\c_a3_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\c_a3_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\c_a3_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
return



*zukan_c_a3_cg

lsp 500,":c;bg\bg185.bmp",0,0
lsp 430,":a;chara\c_a3_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_a3_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_a3_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_a3_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_a3_ha5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_a3_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_a3_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_a3_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_a3_hb4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_c_a3_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,65
mov %skill01,17
mov %skill02,0
mov %skill03,0
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *c_a3_start
if %bwait=211 mov %nanido,2:goto *c_a3_start
if %bwait=212 mov %nanido,3:goto *c_a3_start
lsp 700,":a;chara\c_a3_st01.bmp",0,0
bg "bg\bg185.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"A-3"
if %bwait=213 goto *c_a3_h



*zukan_stein1

mov $zname,"Promestein"
mov $zlavel,"stein1"
itoa2 $zukan_ko,%2655
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,3
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,2
if %2655=0 mov %ryozyoku1,0
if %2655>0 mov %ryozyoku1,1
if %hsean_labo=0 mov %ryozyoku2,0
if %hsean_labo>0 mov %ryozyoku2,1
if %2655=0 mov %zukancg,0
if %2655>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PPT"
mov $zukan_hp,"QOOOO"
mov $zukan_skill1,"Warmth"
mov %zukan_skillc1,3694
mov $zukan_skill2,"Softness"
mov %zukan_skillc2,3695
mov $zukan_skill3,"Pressure"
mov %zukan_skillc3,3696
mov $zukan_skill4,"Suction"
mov %zukan_skillc4,3697
mov $zukan_skill5,"Tenderness"
mov %zukan_skillc5,3698
mov $zukan_skill6,"Temperance"
mov %zukan_skillc6,3699
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_stein1_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\prome1.jpg",400,0
goto *zukan_kihonbtn



*zukan_stein1_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=3 mov %zukan_hyouzyonum,1
if %zukan_pozu<>3 mov %zukan_hyouzyonum,3
if %zukan_pozu<3 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu<3 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=3 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\stein_st21.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\stein_st22.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\stein_st23.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\stein_st01r.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\stein_st02.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\stein_st03.bmp",%zukan_x0,0
if %zukan_pozu=3 lsp 450,":a;chara\stein_st11.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_bukkake1=1 lsp 441,":a;chara\stein_bk11.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_pozu=1 && %zukan_bukkake2=1 lsp 442,":a;chara\stein_bk12.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_pozu=1 && %zukan_bukkake3=1 lsp 443,":a;chara\stein_bk13.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_pozu=1 && %zukan_bukkake4=1 lsp 444,":a;chara\stein_bk14.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
return



*zukan_stein1_cg

lsp 500,":c;bg\bg186.bmp",0,0
if %2655=0 skip 33
lsp 430,":a;chara\stein_st21.bmp",0,0
lsp 420,":a;chara\stein_ct11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\stein_ct12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\stein_ct13.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\stein_ct14.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\stein_hb0.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\stein_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\stein_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\stein_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\stein_ct02.bmp",0,0
lsp 430,":a;chara\stein_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\stein_ct03.bmp",0,0
lsp 430,":a;chara\stein_hb4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\stein_hb5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\stein_ct04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %hsean_labo=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":c;chara\stein_hc01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc05.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc06.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc07.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc08.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc09.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc10.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc13.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc14.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc15.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc16.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc17.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc18.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc19.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc20.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc23.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc24.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc25.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc26.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc27.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc28.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc29.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc30.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc31.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc32.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc33.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc34.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc35.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc36.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc37.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc38.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc39.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc40.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc41.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc42.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc43.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc44.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc45.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc46.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc47.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc48.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc49.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc50.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\stein_hc51.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_stein1_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,65
mov %skill01,17
mov %skill02,0
mov %skill03,0
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *stein1_start
if %bwait=211 mov %nanido,2:goto *stein1_start
if %bwait=212 mov %nanido,3:goto *stein1_start
if %bwait=213 lsp 700,":a;chara\stein_st22.bmp",0,0
if %bwait=213 bg "bg\bg186.bmp",10,1500
if %bwait=214 bg black,10,1500
if %bwait=213 && %con_hbgm=0 bgm "bgm\ero1.ogg"
if %bwait=213 && %con_hbgm=1 bgmstop
mov $name,"Promestein"
if %bwait=213 goto *stein1_h
if %bwait=214 goto *sean0307a



*zukan_ranael

mov $zname,"Archangel Ranael"
mov $zlavel,"ranael"
itoa2 $zukan_ko,%2657
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,4
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2657=0 mov %ryozyoku1,0
if %2657>0 mov %ryozyoku1,1
if %2657=0 mov %zukancg,0
if %2657>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PPW"
mov $zukan_hp,"QOOOO"
mov $zukan_skill1,"Drain Vine"
mov %zukan_skillc1,3700
mov $zukan_skill2,"Fine Melody"
mov %zukan_skillc2,3701
mov $zukan_skill3,"Medusa Hair"
mov %zukan_skillc3,3702
mov $zukan_skill4,"Menacing Caress"
mov %zukan_skillc4,3703
mov $zukan_skill5,"Ray Heine"
mov %zukan_skillc5,3704
mov $zukan_skill6,"Arna Principality"
mov %zukan_skillc6,3705
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_ranael_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\ran.jpg",400,0
goto *zukan_kihonbtn



*zukan_ranael_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=2 mov %zukan_hyouzyonum,1
if %zukan_pozu<>2 mov %zukan_hyouzyonum,3
if %zukan_pozu=1 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=2 mov %zukan_hyouzyo,1
if %zukan_pozu=3 && %zukan_hyouzyo=3 mov %zukan_hyouzyo,1
if %zukan_pozu=3 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,2
if %zukan_pozu=4 && %zukan_hyouzyo=4 mov %zukan_hyouzyo,1
if %zukan_pozu=4 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,3
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\ranael_st31.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\ranael_st32.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\ranael_st33.bmp",%zukan_x0,0
if %zukan_pozu=2 lsp 450,":a;chara\ranael_st01.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\ranael_st11.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\ranael_st12.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=1 lsp 450,":a;chara\ranael_st21.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=2 lsp 450,":a;chara\ranael_st22.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=3 lsp 450,":a;chara\ranael_st23.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_bukkake1=1 lsp 441,":a;chara\ranael_bk31.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 && %zukan_bukkake1=1 lsp 441,":a;chara\ranael_bk11.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 && %zukan_bukkake1=1 lsp 441,":a;chara\ranael_bk12.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=2 && %zukan_bukkake1=1 lsp 441,":a;chara\ranael_bk22.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=3 && %zukan_bukkake1=1 lsp 441,":a;chara\ranael_bk23.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_pozu=1 && %zukan_bukkake2=1 lsp 442,":a;chara\ranael_bk32.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_pozu=1 && %zukan_bukkake3=1 lsp 443,":a;chara\ranael_bk33.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_pozu=1 && %zukan_bukkake4=1 lsp 444,":a;chara\ranael_bk34.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_pozu=1 && %zukan_bukkake5=1 lsp 445,":a;chara\ranael_bk35.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_ranael_cg

lsp 500,":c;bg\bg187.bmp",0,0
lsp 430,":a;chara\ranael_h0.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ranael_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ranael_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ranael_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ranael_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ranael_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ranael_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ranael_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ranael_hb4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ranael_hc1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ranael_hc2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ranael_hc3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ranael_hc4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ranael_hd1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ranael_hd2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ranael_hd3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ranael_hd4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ranael_he1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ranael_he2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ranael_he3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ranael_he4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ranael_he5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ranael_hf1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\ranael_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\ranael_ct02.bmp",0,0
lsp 430,":a;chara\ranael_hf2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\ranael_ct03.bmp",0,0
lsp 430,":a;chara\ranael_hf3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\ranael_ct04.bmp",0,0
lsp 430,":a;chara\ranael_hf4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_ranael_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,66
mov %skill01,18
mov %skill02,0
mov %skill03,0
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *ranael_start
if %bwait=211 mov %nanido,2:goto *ranael_start
if %bwait=212 mov %nanido,3:goto *ranael_start
lsp 700,":a;chara\ranael_st32.bmp",0,0
bg "bg\bg187.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Ranael"
if %bwait=213 goto *ranael_h



*zukan_c_tangh

mov $zname,"Chimera Tongue"
mov $zlavel,"c_tangh"
itoa2 $zukan_ko,%2658
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2658=0 mov %ryozyoku1,0
if %2658>0 mov %ryozyoku1,1
if %2658=0 mov %zukancg,0
if %2658>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"TV"
mov $zukan_hp,"PTOOO"
mov $zukan_skill1,"Swarm Lick"
mov %zukan_skillc1,3706
mov $zukan_skill2,"Entangled Lick"
mov %zukan_skillc2,3707
mov $zukan_skill3,"Disorder Lick"
mov %zukan_skillc3,3708
mov $zukan_skill4,"Dissolving Lick"
mov %zukan_skillc4,3709
mov $zukan_skill5,"Winding Lick"
mov %zukan_skillc5,3710
mov $zukan_skill6,"Hellish Lick"
mov %zukan_skillc6,3711
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_c_tangh_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\chimtongue.jpg",400,0
goto *zukan_kihonbtn



*zukan_c_tangh_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\c_tangh_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\c_tangh_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\c_tangh_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\c_tangh_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\c_tangh_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\c_tangh_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\c_tangh_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\c_tangh_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_c_tangh_cg

lsp 500,":c;bg\bg029.bmp",0,0
lsp 430,":a;chara\c_tangh_st11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_tangh_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_tangh_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_tangh_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_tangh_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_tangh_h5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_tangh_h6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mob_elf2_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mob_elf2_h2.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_c_tangh_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,66
mov %skill01,19
mov %skill02,0
mov %skill03,0
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *c_tangh_start
if %bwait=211 mov %nanido,2:goto *c_tangh_start
if %bwait=212 mov %nanido,3:goto *c_tangh_start
lsp 700,":a;chara\c_tangh_st02.bmp",0,0
bg "bg\bg029.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *c_tangh_h



*zukan_angels

mov $zname,"Angel Soldiers"
mov $zlavel,"angels"
itoa2 $zukan_ko,%2661
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,5
mov %zukan_bukkakenum,7
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2661=0 mov %ryozyoku1,0
if %2661>0 mov %ryozyoku1,1
if %2661=0 mov %zukancg,0
if %2661>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"WR"
mov $zukan_hp,"PQOOO"
mov $zukan_skill1,"Angel Group Handjob"
mov %zukan_skillc1,3712
mov $zukan_skill2,"Angel Group Footjob"
mov %zukan_skillc2,3713
mov $zukan_skill3,"Angel Group Blowjob"
mov %zukan_skillc3,3714
mov $zukan_skill4,"Angel Group Tit Fuck"
mov %zukan_skillc4,3715
mov $zukan_skill5,"Angel Group Items"
mov %zukan_skillc5,3716
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_angels_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\angsoldier.jpg",400,0
goto *zukan_kihonbtn



*zukan_angels_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\angels_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\angels_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\angels_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\angels_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\angels_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\angels_st13.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\angels_st21.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\angels_st22.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=3 lsp 450,":a;chara\angels_st23.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=1 lsp 450,":a;chara\angels_st31.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=2 lsp 450,":a;chara\angels_st32.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=3 lsp 450,":a;chara\angels_st33.bmp",%zukan_x0,0
if %zukan_pozu=5 && %zukan_hyouzyo=1 lsp 450,":a;chara\angels_st41.bmp",%zukan_x0,0
if %zukan_pozu=5 && %zukan_hyouzyo=2 lsp 450,":a;chara\angels_st42.bmp",%zukan_x0,0
if %zukan_pozu=5 && %zukan_hyouzyo=3 lsp 450,":a;chara\angels_st43.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\angels_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\angels_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\angels_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\angels_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\angels_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_pozu=1 && %zukan_bukkake6=1 lsp 446,":a;chara\angels_bk06.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_bukkake6=1 lsp 446,":a;chara\angels_bk26.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_bukkake6=1 lsp 446,":a;chara\angels_bk36.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
if %zukan_pozu=1 && %zukan_bukkake7=1 lsp 447,":a;chara\angels_bk07.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_bukkake7=1 lsp 447,":a;chara\angels_bk27.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_bukkake7=1 lsp 447,":a;chara\angels_bk37.bmp",%zukan_x0,0
if %zukan_bukkake7=0 csp 447
return



*zukan_angels_cg

lsp 500,":c;bg\bg029.bmp",0,0
lsp 430,":a;chara\angels_h01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\angels_h02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\angels_h03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\angels_h04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\angels_h05.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\angels_h06.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\angels_h07.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\angels_h08.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\angels_h09.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\angels_h10.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_angels_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,66
mov %skill01,19
mov %skill02,0
mov %skill03,0
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *angels_start
if %bwait=211 mov %nanido,2:goto *angels_start
if %bwait=212 mov %nanido,3:goto *angels_start
lsp 700,":a;chara\angels_st02.bmp",-280,0
lsp 701,":a;chara\angels_st22.bmp",-90,0
lsp 702,":a;chara\angels_st32.bmp",90,0
lsp 703,":a;chara\angels_st12.bmp",280,0
bg "bg\bg029.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *angels_h



*zukan_nagael

mov $zname,"Principality Nagael"
mov $zlavel,"nagael"
itoa2 $zukan_ko,%2659
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,7
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2659=0 mov %ryozyoku1,0
if %2659>0 mov %ryozyoku1,1
if %2659=0 mov %zukancg,0
if %2659>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PPT"
mov $zukan_hp,"PVOOO"
mov $zukan_skill1,"Punishing Handjob"
mov %zukan_skillc1,3717
mov $zukan_skill2,"Punishing Blowjob"
mov %zukan_skillc2,3718
mov $zukan_skill3,"Punishing Tit Fuck"
mov %zukan_skillc3,3719
mov $zukan_skill4,"Foot of Divine Punishment"
mov %zukan_skillc4,3720
mov $zukan_skill5,"Judge Snake's Curse"
mov %zukan_skillc5,3721
mov $zukan_skill6,"Judge Snake's Punishment"
mov %zukan_skillc6,3722
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_nagael_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\nag.jpg",400,0
goto *zukan_kihonbtn



*zukan_nagael_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\nagael_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\nagael_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\nagael_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\nagael_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\nagael_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\nagael_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\nagael_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\nagael_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\nagael_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
if %zukan_bukkake7=1 lsp 447,":a;chara\nagael_bk07.bmp",%zukan_x0,0
if %zukan_bukkake7=0 csp 447
return



*zukan_nagael_cg

lsp 500,":c;bg\bg029.bmp",0,0
lsp 430,":a;chara\nagael_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\nagael_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\nagael_h2.bmp",0,0
lsp 420,":a;chara\nagael_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\nagael_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\nagael_h4.bmp",0,0
lsp 420,":a;chara\nagael_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\mob_elf1_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mob_elf1_h2.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_nagael_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,67
mov %skill01,19
mov %skill02,0
mov %skill03,0
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *nagael_start
if %bwait=211 mov %nanido,2:goto *nagael_start
if %bwait=212 mov %nanido,3:goto *nagael_start
lsp 700,":a;chara\nagael_st02.bmp",0,0
bg "bg\bg029.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Nagael"
if %bwait=213 goto *nagael_h



*zukan_c_slag

mov $zname,"Chimera Slug"
mov $zlavel,"c_slag"
mov $zukan_ko,"None "
mov %zukan_hyouzyonum,1
mov %zukan_pozunum,1
mov %zukan_bukkakenum,0
mov %zukan_sentounum,0
mov %zukan_ryozyokunum,1
mov %ryozyoku1,1
mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"SQ"
mov $zukan_hp,"POOOO"
mov %zukan_skillc1,0
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_c_slag_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\chimslug.jpg",400,0
goto *zukan_kihonbtn



*zukan_c_slag_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\c_slag_st01.bmp",%zukan_x0,0
return



*zukan_c_slag_cg

lsp 500,":c;bg\bg018.bmp",0,0
lsp 430,":a;chara\c_slag_h01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\c_slag_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_slag_h02.bmp",0,0
lsp 420,":a;chara\c_slag_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\c_slag_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\c_slag_ct04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\c_slag_ct11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_slag_h03.bmp",0,0
lsp 420,":a;chara\c_slag_ct12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\c_slag_ct13.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\c_slag_ct14.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\c_slag_h04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_slag_h05.bmp",0,0
lsp 420,":a;chara\c_slag_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_slag_h06.bmp",0,0
lsp 420,":a;chara\c_slag_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_slag_h07.bmp",0,0
lsp 420,":a;chara\c_slag_ct11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_slag_h08.bmp",0,0
lsp 420,":a;chara\c_slag_ct12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_slag_h06.bmp",0,0
lsp 420,":a;chara\c_slag_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_slag_h09.bmp",0,0
lsp 420,":a;chara\c_slag_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_slag_h08.bmp",0,0
lsp 420,":a;chara\c_slag_ct12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_slag_h10.bmp",0,0
lsp 420,":a;chara\c_slag_ct13.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_slag_h09.bmp",0,0
lsp 420,":a;chara\c_slag_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_slag_h11.bmp",0,0
lsp 420,":a;chara\c_slag_ct04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_slag_h10.bmp",0,0
lsp 420,":a;chara\c_slag_ct13.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_slag_h12.bmp",0,0
lsp 420,":a;chara\c_slag_ct14.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_c_slag_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,68
mov %skill01,19
mov %skill02,0
mov %skill03,0
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
bg "bg\bg018.bmp",10,1500
bgm "bgm\kiki2.ogg"
if %bwait=213 goto *sean0316a



*zukan_c_tentacle

mov $zname,"Chimera Tentacle"
mov $zlavel,"c_tentacle"
itoa2 $zukan_ko,%2662
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,2
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2662=0 mov %ryozyoku1,0
if %2662>0 mov %ryozyoku1,1
if %2662=0 mov %zukancg,0
if %2662>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"TX"
mov $zukan_hp,"PUOOO"
mov $zukan_skill1,"Tentatrain"
mov %zukan_skillc1,3723
mov $zukan_skill2,"Tentacoil"
mov %zukan_skillc2,3724
mov $zukan_skill3,"Tentatempest"
mov %zukan_skillc3,3725
mov $zukan_skill4,"Tentabind"
mov %zukan_skillc4,3726
mov $zukan_skill5,"Tentafiesta"
mov %zukan_skillc5,3727
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_c_tentacle_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\chimtenta.jpg",400,0
goto *zukan_kihonbtn



*zukan_c_tentacle_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\c_tentacle_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\c_tentacle_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\c_tentacle_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\c_tentacle_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\c_tentacle_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
return



*zukan_c_tentacle_cg

lsp 500,":c;bg\bg018.bmp",0,0
lsp 430,":a;chara\c_tentacle_st11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_tentacle_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_tentacle_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_tentacle_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_tentacle_h4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_c_tentacle_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,68
mov %skill01,19
mov %skill02,0
mov %skill03,0
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *c_tentacle_start
if %bwait=211 mov %nanido,2:goto *c_tentacle_start
if %bwait=212 mov %nanido,3:goto *c_tentacle_start
lsp 700,":a;chara\c_tentacle_st02.bmp",0,0
bg "bg\bg018.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *c_tentacle_h



*zukan_mariel

mov $zname,"Archangel Mariel"
mov $zlavel,"mariel"
itoa2 $zukan_ko,%2660
mov %zukan_hyouzyonum,4
mov %zukan_pozunum,1
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,2
if %2845=0 mov %ryozyoku1,0
if %2845>0 mov %ryozyoku1,1
if %2846=0 mov %ryozyoku2,0
if %2846>0 mov %ryozyoku2,1
if %2660=0 mov %zukancg,0
if %2660>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"POX"
mov $zukan_hp,"PWOOO"
mov $zukan_skill1,"Angel Hand"
mov %zukan_skillc1,3728
mov $zukan_skill2,"Angel Mouth"
mov %zukan_skillc2,3729
mov $zukan_skill3,"Angel Chest"
mov %zukan_skillc3,3730
mov $zukan_skill4,"Heaven's Foot"
mov %zukan_skillc4,3731
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_mariel_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\mariel.jpg",400,0
goto *zukan_kihonbtn



*zukan_mariel_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\mariel_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\mariel_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\mariel_st03.bmp",%zukan_x0,0
if %zukan_hyouzyo=4 lsp 450,":a;chara\mariel_st04.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\mariel_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\mariel_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\mariel_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\mariel_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\mariel_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_mariel_cg

lsp 500,":c;bg\bg017.bmp",0,0
if %2845=0 skip 21
lsp 430,":a;chara\mariel_ha01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mariel_ha02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mariel_ha03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mariel_ha04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mariel_ha05.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mariel_ha06.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mariel_ha07.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mariel_ha08.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mariel_ha09.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mariel_ha10.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %2846=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mariel_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mariel_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mariel_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mariel_hb4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mariel_hb5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mariel_hb6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mariel_hb7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mariel_hb8.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mariel_hb9.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mariel_hc1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mariel_hc2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mariel_hc3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mariel_hc4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mariel_hc5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mariel_hc6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mariel_hc7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mariel_hc8.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mariel_hc9.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_mariel_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,68
mov %skill01,19
mov %skill02,0
mov %skill03,0
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *mariel_start
if %bwait=211 mov %nanido,2:goto *mariel_start
if %bwait=212 mov %nanido,3:goto *mariel_start
lsp 700,":a;chara\mariel_st02.bmp",0,0
bg "bg\bg017.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Mariel"
if %bwait=213 goto *mariel_ha
if %bwait=214 goto *mariel_hb



*zukan_c_prison

mov $zname,"Chimera Prison"
mov $zlavel,"c_prison"
mov $zukan_ko,"None "
mov %zukan_hyouzyonum,1
mov %zukan_pozunum,1
mov %zukan_bukkakenum,0
mov %zukan_sentounum,0
mov %zukan_ryozyokunum,1
mov %ryozyoku1,1
mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"TV"
mov $zukan_hp,"PSOOO"
mov %zukan_skillc1,0
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_c_prison_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\chimprison.jpg",400,0
goto *zukan_kihonbtn



*zukan_c_prison_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\c_prison_st01.bmp",%zukan_x0,0
return



*zukan_c_prison_cg

lsp 500,":c;bg\bg220.bmp",0,0
lsp 430,":a;chara\c_prison_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\c_prison_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\c_prison_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_prison_h2.bmp",0,0
lsp 420,":a;chara\c_prison_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_prison_h3.bmp",0,0
lsp 420,":a;chara\c_prison_ct04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_prison_h4.bmp",0,0
lsp 420,":a;chara\c_prison_ct05.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_c_prison_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,68
mov %skill01,19
mov %skill02,0
mov %skill03,0
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
bgm "bgm\kiki2.ogg"
if %bwait=213 goto *sean0319



*zukan_c_medulahan

mov $zname,"Chimera Medullahan"
mov $zlavel,"c_medulahan"
itoa2 $zukan_ko,%2663
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2663=0 mov %ryozyoku1,0
if %2663>0 mov %ryozyoku1,1
if %2663=0 mov %zukancg,0
if %2663>0 mov %zukancg,1
mov %zukan_x1,-250
mov %zukan_x2,0
mov $zukan_lv,"UP"
mov $zukan_hp,"PWOOO"
mov $zukan_skill1,"Medullahan's Masturbation"
mov %zukan_skillc1,3732
mov $zukan_skill2,"Medullahan's Footjob"
mov %zukan_skillc2,3733
mov $zukan_skill3,"Medullahan's Tit Fuck"
mov %zukan_skillc3,3734
mov $zukan_skill4,"Medusa's Blowjob"
mov %zukan_skillc4,3735
mov $zukan_skill5,"Medusa's Hair"
mov %zukan_skillc5,3736
mov $zukan_skill6,"Snake Violation"
mov %zukan_skillc6,3737
mov $zukan_skill7,"Serpent Rape"
mov %zukan_skillc7,3738
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_c_medulahan_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\chimmedulla.jpg",400,0
goto *zukan_kihonbtn



*zukan_c_medulahan_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\c_medulahan_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\c_medulahan_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\c_medulahan_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\c_medulahan_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\c_medulahan_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\c_medulahan_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\c_medulahan_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\c_medulahan_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_c_medulahan_cg

lsp 500,":c;bg\bg220.bmp",0,0
lsp 430,":a;chara\c_medulahan_st11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_medulahan_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\c_medulahan_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\c_medulahan_ct02.bmp",0,0
lsp 430,":a;chara\c_medulahan_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\c_medulahan_ct03.bmp",0,0
lsp 430,":a;chara\c_medulahan_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\c_medulahan_ct04.bmp",0,0
lsp 430,":a;chara\c_medulahan_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\c_medulahan_hb0.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_medulahan_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\c_medulahan_ct11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\c_medulahan_ct12.bmp",0,0
lsp 430,":a;chara\c_medulahan_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\c_medulahan_ct13.bmp",0,0
lsp 430,":a;chara\c_medulahan_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\c_medulahan_ct14.bmp",0,0
lsp 430,":a;chara\c_medulahan_hb4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\c_medulahan_hb5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\c_medulahan_ct11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\c_medulahan_ct12.bmp",0,0
lsp 430,":a;chara\c_medulahan_hb6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\c_medulahan_ct13.bmp",0,0
lsp 430,":a;chara\c_medulahan_hb7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\c_medulahan_ct14.bmp",0,0
lsp 430,":a;chara\c_medulahan_hb8.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_c_medulahan_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,68
mov %skill01,19
mov %skill02,0
mov %skill03,0
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *c_medulahan_start
if %bwait=211 mov %nanido,2:goto *c_medulahan_start
if %bwait=212 mov %nanido,3:goto *c_medulahan_start
lsp 700,":a;chara\c_medulahan_st02.bmp",0,0
bg "bg\bg220.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *c_medulahan_h



*zukan_trinity

mov $zname,"Trinity"
mov $zlavel,"trinity"
itoa2 $zukan_ko,%2656
mov %zukan_hyouzyonum,4
mov %zukan_pozunum,3
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2656=0 mov %ryozyoku1,0
if %2656>0 mov %ryozyoku1,1
if %2656=0 mov %zukancg,0
if %2656>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"XS"
mov $zukan_hp,"PVOOO"
mov $zukan_skill1,"Blissful Masturbation"
mov %zukan_skillc1,3763
mov $zukan_skill2,"Proselytising Blowjob"
mov %zukan_skillc2,3764
mov $zukan_skill3,"Pleasurable Intercrural"
mov %zukan_skillc3,3765
mov $zukan_skill4,"Ascending Tit Fuck"
mov %zukan_skillc4,3766
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_trinity_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\trinity.jpg",400,0
goto *zukan_kihonbtn



*zukan_trinity_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\trinity_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\trinity_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\trinity_st03.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\trinity_st04.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\trinity_st11.bmp",%zukan_x0+265,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\trinity_st12.bmp",%zukan_x0+265,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\trinity_st13.bmp",%zukan_x0+265,0
if %zukan_pozu=2 && %zukan_hyouzyo=4 lsp 450,":a;chara\trinity_st14.bmp",%zukan_x0+265,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\trinity_st21.bmp",%zukan_x0-260,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\trinity_st22.bmp",%zukan_x0-260,0
if %zukan_pozu=3 && %zukan_hyouzyo=3 lsp 450,":a;chara\trinity_st23.bmp",%zukan_x0-260,0
if %zukan_pozu=3 && %zukan_hyouzyo=4 lsp 450,":a;chara\trinity_st24.bmp",%zukan_x0-260,0
if %zukan_pozu=1 && %zukan_bukkake1=1 lsp 441,":a;chara\trinity_bk01.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake1=1 lsp 441,":a;chara\trinity_bk11.bmp",%zukan_x0+265,0
if %zukan_pozu=3 && %zukan_bukkake1=1 lsp 441,":a;chara\trinity_bk21.bmp",%zukan_x0-260,0
if %zukan_bukkake1=0 csp 441
if %zukan_pozu=1 && %zukan_bukkake2=1 lsp 442,":a;chara\trinity_bk02.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake2=1 lsp 442,":a;chara\trinity_bk12.bmp",%zukan_x0+265,0
if %zukan_pozu=3 && %zukan_bukkake2=1 lsp 442,":a;chara\trinity_bk22.bmp",%zukan_x0-260,0
if %zukan_bukkake2=0 csp 442
if %zukan_pozu=1 && %zukan_bukkake3=1 lsp 443,":a;chara\trinity_bk03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake3=1 lsp 443,":a;chara\trinity_bk13.bmp",%zukan_x0+265,0
if %zukan_pozu=3 && %zukan_bukkake3=1 lsp 443,":a;chara\trinity_bk23.bmp",%zukan_x0-260,0
if %zukan_bukkake3=0 csp 443
if %zukan_pozu=1 && %zukan_bukkake4=1 lsp 444,":a;chara\trinity_bk04.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake4=1 lsp 444,":a;chara\trinity_bk14.bmp",%zukan_x0+265,0
if %zukan_pozu=3 && %zukan_bukkake4=1 lsp 444,":a;chara\trinity_bk24.bmp",%zukan_x0-260,0
if %zukan_bukkake4=0 csp 444
return



*zukan_trinity_cg

lsp 500,":c;bg\bg221.bmp",0,0
lsp 420,":a;chara\trinity_ct01.bmp",0,0
lsp 430,":a;chara\trinity_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\trinity_ct02.bmp",0,0
lsp 430,":a;chara\trinity_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\trinity_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\trinity_ct04.bmp",0,0
lsp 430,":a;chara\trinity_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\trinity_ct05.bmp",0,0
lsp 430,":a;chara\trinity_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\trinity_ct06.bmp",0,0
lsp 430,":a;chara\trinity_ha5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\trinity_ct07.bmp",0,0
lsp 430,":a;chara\trinity_ha6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\trinity_ct08.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\trinity_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\trinity_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\trinity_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\trinity_hb4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\trinity_hb5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\trinity_hb6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\trinity_hb7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\trinity_hb8.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\trinity_hb9.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_trinity_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,69
mov %skill01,19
mov %skill02,0
mov %skill03,0
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *trinity_start
if %bwait=211 mov %nanido,2:goto *trinity_start
if %bwait=212 mov %nanido,3:goto *trinity_start
lsp 700,":a;chara\trinity_st02.bmp",0,0
lsp 701,":a;chara\trinity_st12.bmp",0,0
lsp 702,":a;chara\trinity_st22.bmp",0,0
bg "bg\bg221.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *trinity_h



*zukan_c_bug

mov $zname,"Chimera Bug"
mov $zlavel,"c_bug"
itoa2 $zukan_ko,%2665
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,6
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2665=0 mov %ryozyoku1,0
if %2665>0 mov %ryozyoku1,1
if %2665=0 mov %zukancg,0
if %2665>0 mov %zukancg,1
mov %zukan_x1,-150
mov %zukan_x2,0
mov $zukan_lv,"TS"
mov $zukan_hp,"PWOOO"
mov $zukan_skill1,"Slimy Handjob"
mov %zukan_skillc1,3767
mov $zukan_skill2,"Wet Blowjob"
mov %zukan_skillc2,3768
mov $zukan_skill3,"Sticky Tit Fuck"
mov %zukan_skillc3,3769
mov $zukan_skill4,"Human Stomach Rub"
mov %zukan_skillc4,3770
mov $zukan_skill5,"Insect Stomach Rub"
mov %zukan_skillc5,3771
mov $zukan_skill6,"Forced Oviduct Mating"
mov %zukan_skillc6,3772
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_c_bug_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\chimbug.jpg",400,0
goto *zukan_kihonbtn



*zukan_c_bug_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\c_bug_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\c_bug_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\c_bug_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\c_bug_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\c_bug_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\c_bug_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\c_bug_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\c_bug_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\c_bug_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
return



*zukan_c_bug_cg

lsp 500,":c;bg\bg048.bmp",0,0
lsp 430,":a;chara\c_bug_st02.bmp",0,0
lsp 420,":a;chara\c_bug_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\c_bug_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\c_bug_ct11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\c_bug_ct12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\c_bug_ct21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\c_bug_ct22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\c_bug_ct23.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":c;chara\c_bug_hb01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\c_bug_hb02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\c_bug_hb03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\c_bug_hb04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\c_bug_hb05.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\c_bug_hb06.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\c_bug_hb07.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\c_bug_hb08.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\c_bug_hb09.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\c_bug_hb10.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\c_bug_hb11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\c_bug_hb12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\c_bug_hb13.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\c_bug_hb14.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\c_bug_hb15.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\c_bug_hb16.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\c_bug_hb17.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\c_bug_hb18.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\c_bug_hb19.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\c_bug_hb20.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_c_bug_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,69
mov %skill01,19
mov %skill02,0
mov %skill03,0
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *c_bug_start
if %bwait=211 mov %nanido,2:goto *c_bug_start
if %bwait=212 mov %nanido,3:goto *c_bug_start
lsp 700,":a;chara\c_bug_st02.bmp",0,0
bg "bg\bg048.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *c_bug_h



*zukan_sisterlamia

mov $zname,"Sister Lamia"
mov $zlavel,"sisterlamia"
itoa2 $zukan_ko,%2664
mov %zukan_hyouzyonum,5
mov %zukan_pozunum,3
mov %zukan_bukkakenum,7
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2664=0 mov %ryozyoku1,0
if %2664>0 mov %ryozyoku1,1
if %2664=0 mov %zukancg,0
if %2664>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"TT"
mov $zukan_hp,"PWOOO"
mov $zukan_skill1,"Graceful Blowjob"
mov %zukan_skillc1,3773
mov $zukan_skill2,"Love-Filled Breast Squeeze"
mov %zukan_skillc2,3774
mov $zukan_skill3,"Delightful Masturbation"
mov %zukan_skillc3,3775
mov $zukan_skill4,"Snake Body of Bliss"
mov %zukan_skillc4,3776
mov $zukan_skill5,"Ecstasy Snake Wrap"
mov %zukan_skillc5,3777
mov $zukan_skill6,"Love-Filled Breasts"
mov %zukan_skillc6,3778
mov $zukan_skill7,"Holy Snake's Embrace"
mov %zukan_skillc7,3779
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_sisterlamia_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\sislamia.jpg",400,0
goto *zukan_kihonbtn



*zukan_sisterlamia_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\sisterlamia_st01r.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\sisterlamia_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\sisterlamia_st03.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\sisterlamia_st04.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=5 lsp 450,":a;chara\sisterlamia_st05.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\sisterlamia_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\sisterlamia_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\sisterlamia_st13.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=4 lsp 450,":a;chara\sisterlamia_st14.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=5 lsp 450,":a;chara\sisterlamia_st15.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\sisterlamia_st21.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\sisterlamia_st22.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=3 lsp 450,":a;chara\sisterlamia_st23.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=4 lsp 450,":a;chara\sisterlamia_st24.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=5 lsp 450,":a;chara\sisterlamia_st25.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\sisterlamia_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_pozu=1 && %zukan_bukkake2=1 csp 442
if %zukan_pozu=2 && %zukan_bukkake2=1 lsp 442,":a;chara\sisterlamia_bk12.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_bukkake2=1 lsp 442,":a;chara\sisterlamia_bk22.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_pozu=1 && %zukan_bukkake3=1 csp 443
if %zukan_pozu=2 && %zukan_bukkake3=1 lsp 443,":a;chara\sisterlamia_bk13.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_bukkake3=1 lsp 443,":a;chara\sisterlamia_bk13.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_pozu=1 && %zukan_bukkake4=1 csp 444
if %zukan_pozu=2 && %zukan_bukkake4=1 lsp 444,":a;chara\sisterlamia_bk14.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_bukkake4=1 lsp 444,":a;chara\sisterlamia_bk14.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\sisterlamia_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\sisterlamia_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
if %zukan_bukkake7=1 lsp 447,":a;chara\sisterlamia_bk07.bmp",%zukan_x0,0
if %zukan_bukkake7=0 csp 447
return



*zukan_sisterlamia_cg

lsp 500,":c;bg\bg048.bmp",0,0
lsp 430,":a;chara\sisterlamia_h1.bmp",0,0
lsp 420,":c;chara\sisterlamia_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\sisterlamia_h2.bmp",0,0
lsp 420,":c;chara\sisterlamia_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\sisterlamia_h3.bmp",0,0
lsp 420,":c;chara\sisterlamia_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\sisterlamia_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\sisterlamia_hb2.bmp",0,0
lsp 420,":a;chara\sisterlamia_bk08.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_sisterlamia_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,69
mov %skill01,19
mov %skill02,0
mov %skill03,0
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *sisterlamia_start
if %bwait=211 mov %nanido,2:goto *sisterlamia_start
if %bwait=212 mov %nanido,3:goto *sisterlamia_start
lsp 700,":a;chara\sisterlamia_st02.bmp",0,0
bg "bg\bg048.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *sisterlamia_h



*zukan_catoblepas

mov $zname,"Catoblepas Girl"
mov $zlavel,"catoblepas"
mov $zukan_ko,"None "
mov %zukan_hyouzyonum,1
mov %zukan_pozunum,1
mov %zukan_bukkakenum,0
mov %zukan_sentounum,0
mov %zukan_ryozyokunum,1
mov %ryozyoku1,1
mov %zukancg,1
mov %zukan_x1,-250
mov %zukan_x2,0
mov $zukan_lv,"UO"
mov $zukan_hp,"PUOOO"
mov %zukan_skillc1,0
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_catoblepas_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\catobl.jpg",400,0
goto *zukan_kihonbtn



*zukan_catoblepas_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\catoblepas_st01.bmp",%zukan_x0,0
return



*zukan_catoblepas_cg

lsp 500,":c;bg\bg044.bmp",0,0
lsp 430,":a;chara\catoblepas_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\catoblepas_h2.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_catoblepas_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,70
mov %skill01,19
mov %skill02,0
mov %skill03,0
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
lsp 700,":a;chara\mob_heisi1.bmp",-200,0
lsp 701,":a;chara\catoblepas_st01.bmp",160,0
bg "bg\bg044.bmp",10,1500
bgm "bgm\boss0.ogg"
if %bwait=213 goto *sean0324a



*zukan_muzukiel

mov $zname,"Power Muzukiel"
mov $zlavel,"muzukiel"
itoa2 $zukan_ko,%2666
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,2
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2666=0 mov %ryozyoku1,0
if %2666>0 mov %ryozyoku1,1
if %2666=0 mov %zukancg,0
if %2666>0 mov %zukancg,1
mov %zukan_x1,-130
mov %zukan_x2,0
mov $zukan_lv,"PQQ"
mov $zukan_hp,"PWOOO"
mov $zukan_skill1,"Punishing Handjob"
mov %zukan_skillc1,3780
mov $zukan_skill2,"Punishing Blowjob"
mov %zukan_skillc2,3781
mov $zukan_skill3,"Punishing Tit Fuck"
mov %zukan_skillc3,3782
mov $zukan_skill4,"Punishing Centipede"
mov %zukan_skillc4,3783
mov $zukan_skill5,"Punishing Leech"
mov %zukan_skillc5,3784
mov $zukan_skill6,"Punishing Flesh Hole"
mov %zukan_skillc6,3785
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_muzukiel_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\muzukiel.jpg",400,0
goto *zukan_kihonbtn



*zukan_muzukiel_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=2 mov %zukan_hyouzyonum,1
if %zukan_pozu<>2 mov %zukan_hyouzyonum,3
if %zukan_pozu=1 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=2 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\muzukiel_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\muzukiel_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\muzukiel_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 lsp 450,":a;chara\muzukiel_st11.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\muzukiel_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\muzukiel_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\muzukiel_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_pozu=2 && %zukan_bukkake4=1 lsp 444,":a;chara\muzukiel_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\muzukiel_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_muzukiel_cg

lsp 500,":c;bg\bg157.bmp",0,0
lsp 430,":a;chara\muzukiel_st21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\muzukiel_st22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\muzukiel_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\muzukiel_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\muzukiel_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\muzukiel_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\muzukiel_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\muzukiel_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\muzukiel_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\muzukiel_hb4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_muzukiel_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,70
mov %skill01,19
mov %skill02,0
mov %skill03,0
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *muzukiel_start
if %bwait=211 mov %nanido,2:goto *muzukiel_start
if %bwait=212 mov %nanido,3:goto *muzukiel_start
lsp 700,":a;chara\muzukiel_st02.bmp",0,0
bg "bg\bg157.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Muzukiel"
if %bwait=213 goto *muzukiel_h



*zukan_mermaid

mov $zname,"Mermaid"
mov $zlavel,"mermaid"
itoa2 $zukan_ko,%2667
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,7
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2667=0 mov %ryozyoku1,0
if %2667>0 mov %ryozyoku1,1
if %2667=0 mov %zukancg,0
if %2667>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"TR"
mov $zukan_hp,"PUOOO"
mov $zukan_skill1,"Mermaid Blowjob"
mov %zukan_skillc1,3786
mov $zukan_skill2,"Mermaid Tit Fuck"
mov %zukan_skillc2,3787
mov $zukan_skill3,"Mermaid Hair"
mov %zukan_skillc3,3788
mov $zukan_skill4,"Mermaid Tail"
mov %zukan_skillc4,3789
mov $zukan_skill5,"Gel Blow"
mov %zukan_skillc5,3790
mov $zukan_skill6,"Song of the Mermaid"
mov %zukan_skillc6,3791
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_mermaid_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\mermaid.jpg",400,0
goto *zukan_kihonbtn



*zukan_mermaid_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\mermaid_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\mermaid_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\mermaid_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\mermaid_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\mermaid_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\mermaid_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\mermaid_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\mermaid_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\mermaid_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
if %zukan_bukkake7=1 lsp 447,":a;chara\mermaid_bk07.bmp",%zukan_x0,0
if %zukan_bukkake7=0 csp 447
return



*zukan_mermaid_cg

lsp 500,":c;bg\bg037.bmp",0,0
lsp 430,":a;chara\mermaid_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mermaid_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mermaid_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mermaid_h4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_mermaid_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,70
mov %skill01,19
mov %skill02,0
mov %skill03,0
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *mermaid_start
if %bwait=211 mov %nanido,2:goto *mermaid_start
if %bwait=212 mov %nanido,3:goto *mermaid_start
lsp 700,":a;chara\mermaid_st02.bmp",0,0
bg "bg\bg037.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *mermaid_h



*zukan_g_mermaid

mov $zname,"Mermaid General"
mov $zlavel,"g_mermaid"
itoa2 $zukan_ko,%2668
mov %zukan_hyouzyonum,4
mov %zukan_pozunum,1
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,2
if %2853=0 mov %ryozyoku1,0
if %2853>0 mov %ryozyoku1,1
if %2854=0 mov %ryozyoku2,0
if %2854>0 mov %ryozyoku2,1
if %2668=0 mov %zukancg,0
if %2668>0 mov %zukancg,1
mov %zukan_x1,-250
mov %zukan_x2,0
mov $zukan_lv,"UO"
mov $zukan_hp,"PWOOO"
mov $zukan_skill1,"General's Blowjob"
mov %zukan_skillc1,3792
mov $zukan_skill2,"General's Tit Fuck"
mov %zukan_skillc2,3793
mov $zukan_skill3,"General's Hair"
mov %zukan_skillc3,3794
mov $zukan_skill4,"General's Tail"
mov %zukan_skillc4,3795
mov $zukan_skill5,"General's Rape"
mov %zukan_skillc5,3796
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_g_mermaid_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\mermaidgen.jpg",400,0
goto *zukan_kihonbtn



*zukan_g_mermaid_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\g_mermaid_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\g_mermaid_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\g_mermaid_st03.bmp",%zukan_x0,0
if %zukan_hyouzyo=4 lsp 450,":a;chara\g_mermaid_st04.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\g_mermaid_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\g_mermaid_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\g_mermaid_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\g_mermaid_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\g_mermaid_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_g_mermaid_cg

lsp 500,":c;bg\bg125.bmp",0,0
if %2853=0 skip 7
lsp 430,":a;chara\g_mermaid_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\g_mermaid_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\g_mermaid_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %2854=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\g_mermaid_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\g_mermaid_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\g_mermaid_ct02.bmp",0,0
lsp 430,":a;chara\g_mermaid_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\g_mermaid_ct03.bmp",0,0
lsp 430,":a;chara\g_mermaid_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\g_mermaid_ct04.bmp",0,0
lsp 430,":a;chara\g_mermaid_hb4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_g_mermaid_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,70
mov %skill01,19
mov %skill02,0
mov %skill03,0
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *g_mermaid_start
if %bwait=211 mov %nanido,2:goto *g_mermaid_start
if %bwait=212 mov %nanido,3:goto *g_mermaid_start
lsp 700,":a;chara\g_mermaid_st02.bmp",0,0
bg "bg\bg125.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *g_mermaid_ha
if %bwait=214 goto *g_mermaid_hb



*zukan_ningyohime

mov $zname,"El"
mov $zlavel,"ningyohime"
itoa2 $zukan_ko,%2669
mov %zukan_hyouzyonum,9
mov %zukan_pozunum,3
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2669=0 mov %ryozyoku1,0
if %2669>0 mov %ryozyoku1,1
if %2669=0 mov %zukancg,0
if %2669>0 mov %zukancg,1
mov %zukan_x1,-190
mov %zukan_x2,0
mov $zukan_lv,"TT"
mov $zukan_hp,"PTOOO"
mov $zukan_skill1,"Princess' Blowjob"
mov %zukan_skillc1,3797
mov $zukan_skill2,"Princess' Tit Fuck"
mov %zukan_skillc2,3798
mov $zukan_skill3,"Princess' Stomach Rub"
mov %zukan_skillc3,3799
mov $zukan_skill4,"Princess' Tail Rub"
mov %zukan_skillc4,3800
mov $zukan_skill5,"Princess' Perversion"
mov %zukan_skillc5,3801
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_ningyohime_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\el.jpg",400,0
goto *zukan_kihonbtn



*zukan_ningyohime_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\ningyohime_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\ningyohime_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\ningyohime_st03.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\ningyohime_st04.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=5 lsp 450,":a;chara\ningyohime_st05.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=6 lsp 450,":a;chara\ningyohime_st06.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=7 lsp 450,":a;chara\ningyohime_st07.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=8 lsp 450,":a;chara\ningyohime_st08.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=9 lsp 450,":a;chara\ningyohime_st09.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\ningyohime_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\ningyohime_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\ningyohime_st13.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=4 lsp 450,":a;chara\ningyohime_st14.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=5 lsp 450,":a;chara\ningyohime_st15.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=6 lsp 450,":a;chara\ningyohime_st16.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=7 lsp 450,":a;chara\ningyohime_st17.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=8 lsp 450,":a;chara\ningyohime_st18.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=9 lsp 450,":a;chara\ningyohime_st19.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\ningyohime_st21.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\ningyohime_st22.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=3 lsp 450,":a;chara\ningyohime_st23.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=4 lsp 450,":a;chara\ningyohime_st24.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=5 lsp 450,":a;chara\ningyohime_st25.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=6 lsp 450,":a;chara\ningyohime_st26.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=7 lsp 450,":a;chara\ningyohime_st27.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=8 lsp 450,":a;chara\ningyohime_st28.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=9 lsp 450,":a;chara\ningyohime_st29.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\ningyohime_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_pozu=1 && %zukan_bukkake2=1 lsp 442,":a;chara\ningyohime_bk02.bmp",%zukan_x0,0
if %zukan_pozu>1 && %zukan_bukkake2=1 lsp 442,":a;chara\ningyohime_bk12.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\ningyohime_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\ningyohime_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\ningyohime_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_ningyohime_cg

lsp 500,":c;bg\bg050.bmp",0,0
lsp 430,":a;chara\ningyohime_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ningyohime_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ningyohime_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ningyohime_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ningyohime_h5.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_ningyohime_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,70
mov %skill01,19
mov %skill02,0
mov %skill03,0
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *ningyohime_start
if %bwait=211 mov %nanido,2:goto *ningyohime_start
if %bwait=212 mov %nanido,3:goto *ningyohime_start
lsp 700,":a;chara\ningyohime_st12.bmp",0,0
bg "bg\bg189.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *ningyohime_h



*zukan_queenmermaid

mov $zname,"Queen Mermaid"
mov $zlavel,"queenmermaid"
itoa2 $zukan_ko,%2670
mov %zukan_hyouzyonum,2
mov %zukan_pozunum,2
mov %zukan_bukkakenum,6
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,2
if %2857=0 mov %ryozyoku1,0
if %2857>0 mov %ryozyoku1,1
if %2858=0 mov %ryozyoku2,0
if %2858>0 mov %ryozyoku2,1
if %2670=0 mov %zukancg,0
if %2670>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"VQ"
mov $zukan_hp,"QPOOO"
mov $zukan_skill1,"Mermaid's Sucking Mouth"
mov %zukan_skillc1,3802
mov $zukan_skill2,"Mermaid's Squeezing Breasts"
mov %zukan_skillc2,3803
mov $zukan_skill3,"Mermaid's Slimy Stomach"
mov %zukan_skillc3,3804
mov $zukan_skill4,"Mermaid's Chaotic Tail"
mov %zukan_skillc4,3805
mov $zukan_skill5,"Mermaid's Cleaning Hand"
mov %zukan_skillc5,3806
mov $zukan_skill6,"Mermaid's Tight Pussy"
mov %zukan_skillc6,3807
mov $zukan_skill7,"Mermaid's Vibrating Pussy"
mov %zukan_skillc7,3808
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_queenmermaid_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\mermq.jpg",400,0
goto *zukan_kihonbtn



*zukan_queenmermaid_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\queenmermaid_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\queenmermaid_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\queenmermaid_st11.bmp",%zukan_x0+60,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\queenmermaid_st13.bmp",%zukan_x0+60,0
if %zukan_pozu=1 && %zukan_bukkake1=1 lsp 441,":a;chara\queenmermaid_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_pozu=1 && %zukan_bukkake2=1 lsp 442,":a;chara\queenmermaid_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_pozu=1 && %zukan_bukkake3=1 lsp 443,":a;chara\queenmermaid_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_pozu=1 && %zukan_bukkake4=1 lsp 444,":a;chara\queenmermaid_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_pozu=1 && %zukan_bukkake5=1 lsp 445,":a;chara\queenmermaid_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_pozu=1 && %zukan_bukkake6=1 lsp 446,":a;chara\queenmermaid_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
return



*zukan_queenmermaid_cg

lsp 500,":c;bg\bg050.bmp",0,0
lsp 430,":a;chara\queenmermaid_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\queenmermaid_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\queenmermaid_ct02.bmp",0,0
lsp 430,":a;chara\queenmermaid_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\queenmermaid_ct03.bmp",0,0
lsp 430,":a;chara\queenmermaid_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %2857=0 return "*zukan_"+$zlavel
lsp 500,":c;bg\bg039.bmp",0,0
lsp 430,":a;chara\queenmermaid_hb1.bmp",0,0
lsp 420,":a;chara\queenmermaid_ct11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\queenmermaid_ct12.bmp",0,0
lsp 430,":a;chara\queenmermaid_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\queenmermaid_ct13.bmp",0,0
lsp 430,":a;chara\queenmermaid_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\queenmermaid_ct14.bmp",0,0
lsp 430,":a;chara\queenmermaid_hb4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_queenmermaid_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,71
mov %skill01,19
mov %skill02,0
mov %skill03,0
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *queenmermaid_start
if %bwait=211 mov %nanido,2:goto *queenmermaid_start
if %bwait=212 mov %nanido,3:goto *queenmermaid_start
lsp 700,":a;chara\queenmermaid_st01.bmp",0,0
bg "bg\bg189.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *queenmermaid_ha
if %bwait=214 goto *queenmermaid_hb



*zukan_XX7

mov $zname,"Experimental Organism XX-7"
mov $zlavel,"XX7"
mov $zukan_ko,"None "
mov %zukan_hyouzyonum,1
mov %zukan_pozunum,1
mov %zukan_bukkakenum,0
mov %zukan_sentounum,0
mov %zukan_ryozyokunum,1
mov %ryozyoku1,1
mov %zukancg,1
mov %zukan_x1,-150
mov %zukan_x2,0
mov $zukan_lv,"ST"
mov $zukan_hp,"PPOOO"
mov %zukan_skillc1,0
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_XX7_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\x7.jpg",400,0
goto *zukan_kihonbtn



*zukan_XX7_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\XX-7_st01.bmp",%zukan_x0,0
return



*zukan_XX7_cg

lsp 500,":c;bg\bg055.bmp",0,0
lsp 430,":a;chara\XX-7_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\XX-7_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\XX-7_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\XX-7_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\XX-7_ct04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\XX-7_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\XX-7_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\XX-7_h4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_XX7_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,71
mov %skill01,19
mov %skill02,0
mov %skill03,0
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=213 goto *sean0333



*zukan_shadow

mov $zname,"Shadow Girl"
mov $zlavel,"shadow"
itoa2 $zukan_ko,%2672
mov %zukan_hyouzyonum,1
mov %zukan_pozunum,1
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2672=0 mov %ryozyoku1,0
if %2672>0 mov %ryozyoku1,1
if %2672=0 mov %zukancg,0
if %2672>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"TQ"
mov $zukan_hp,"PSOOO"
mov $zukan_skill1,"Mouth of Shadow"
mov %zukan_skillc1,3809
mov $zukan_skill2,"Breasts of Shadow"
mov %zukan_skillc2,3810
mov $zukan_skill3,"Hair of Shadow"
mov %zukan_skillc3,3811
mov $zukan_skill4,"Cross of Shadow"
mov %zukan_skillc4,3812
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_shadow_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\shadowg.jpg",400,0
goto *zukan_kihonbtn



*zukan_shadow_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\shadow_st01.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\shadow_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\shadow_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\shadow_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\shadow_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
return



*zukan_shadow_cg

lsp 500,":c;bg\bg056.bmp",0,0
lsp 430,":a;chara\shadow_st11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\shadow_st12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\shadow_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\shadow_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\shadow_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\shadow_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\shadow_h5.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_shadow_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,71
mov %skill01,19
mov %skill02,0
mov %skill03,0
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *shadow_start
if %bwait=211 mov %nanido,2:goto *shadow_start
if %bwait=212 mov %nanido,3:goto *shadow_start
lsp 700,":a;chara\shadow_st01.bmp",0,0
bg "bg\bg056.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *shadow_h



*zukan_gaistvine

mov $zname,"Paintgeist"
mov $zlavel,"gaistvine"
itoa2 $zukan_ko,%2673
mov %zukan_hyouzyonum,8
mov %zukan_pozunum,2
mov %zukan_bukkakenum,1
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2673=0 mov %ryozyoku1,0
if %2673>0 mov %ryozyoku1,1
if %2673=0 mov %zukancg,0
if %2673>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"TT"
mov $zukan_hp,"PUOOO"
mov $zukan_skill1,"Kiss of Desire"
mov %zukan_skillc1,3813
mov $zukan_skill2,"Sensual Handjob"
mov %zukan_skillc2,3814
mov $zukan_skill3,"Mouth of Desire"
mov %zukan_skillc3,3815
mov $zukan_skill4,"Ass of Desire"
mov %zukan_skillc4,3816
mov $zukan_skill5,"Eyes of Obedience"
mov %zukan_skillc5,3817
mov $zukan_skill6,"Baroque Orgasm"
mov %zukan_skillc6,3818
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_gaistvine_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\paint.jpg",400,0
goto *zukan_kihonbtn



*zukan_gaistvine_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 && %zukan_hyouzyo=3 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,2
if %zukan_pozu=2 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=2 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\gaistvine_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\gaistvine_st02.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\gaistvine_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\gaistvine_bk11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\gaistvine_bk12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=4 lsp 450,":a;chara\gaistvine_bk13.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=5 lsp 450,":a;chara\gaistvine_bk14.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=6 lsp 450,":a;chara\gaistvine_bk15.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=7 lsp 450,":a;chara\gaistvine_bk16.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=8 lsp 450,":a;chara\gaistvine_bk17.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_bukkake1=1 lsp 441,":a;chara\gaistvine_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
return



*zukan_gaistvine_cg

lsp 500,":c;bg\bg057.bmp",0,0
lsp 430,":a;chara\gaistvine_st21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\gaistvine_st22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\gaistvine_st23.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_gaistvine_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,71
mov %skill01,19
mov %skill02,0
mov %skill03,0
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *gaistvine_start
if %bwait=211 mov %nanido,2:goto *gaistvine_start
if %bwait=212 mov %nanido,3:goto *gaistvine_start
lsp 700,":a;chara\gaistvine_st01.bmp",0,0
bg "bg\bg057.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *gaistvine_h



*zukan_chrom2

mov $zname,"Chrome"
mov $zlavel,"chrom2"
itoa2 $zukan_ko,%2674
mov %zukan_hyouzyonum,7
mov %zukan_pozunum,8
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2674=0 mov %ryozyoku1,0
if %2674>0 mov %ryozyoku1,1
if %2674=0 mov %zukancg,0
if %2674>0 mov %zukancg,1
mov %zukan_x1,-210
mov %zukan_x2,-20
mov $zukan_lv,"TW"
mov $zukan_hp,"PWOOO"
mov $zukan_skill1,"Ghost Handjob"
mov %zukan_skillc1,3819
mov $zukan_skill2,"Ghost Blowjob"
mov %zukan_skillc2,3820
mov $zukan_skill3,"Ghost Tit Fuck"
mov %zukan_skillc3,3821
mov $zukan_skill4,"I'll Give a Handjob!"
mov %zukan_skillc4,3822
mov $zukan_skill5,"I'll Give a Blowjob!"
mov %zukan_skillc5,3823
mov $zukan_skill6,"Phantasmagoria"
mov %zukan_skillc6,3824
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_chrom2_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\chrome2.jpg",400,0
goto *zukan_kihonbtn



*zukan_chrom2_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 && %zukan_hyouzyo=4 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,3
if %zukan_pozu=2 && %zukan_hyouzyo=3 mov %zukan_hyouzyo,1
if %zukan_pozu=2 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,2
if %zukan_pozu=3 && %zukan_hyouzyo=10 mov %zukan_hyouzyo,1
if %zukan_pozu=3 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,9
if %zukan_pozu=4 && %zukan_hyouzyo=4 mov %zukan_hyouzyo,1
if %zukan_pozu=4 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,3
if %zukan_pozu=5 && %zukan_hyouzyo=4 mov %zukan_hyouzyo,1
if %zukan_pozu=5 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,3
if %zukan_pozu=6 && %zukan_hyouzyo=4 mov %zukan_hyouzyo,1
if %zukan_pozu=6 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,3
if %zukan_pozu=7 && %zukan_hyouzyo=4 mov %zukan_hyouzyo,1
if %zukan_pozu=7 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,3
if %zukan_pozu=8 && %zukan_hyouzyo=3 mov %zukan_hyouzyo,1
if %zukan_pozu=8 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,2
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\chrom_st41.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\chrom_st42.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\chrom_st43.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\chrom_st31.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\chrom_st32.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\chrom_st21.bmp",%zukan_x0+20,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\chrom_st22.bmp",%zukan_x0+20,0
if %zukan_pozu=3 && %zukan_hyouzyo=3 lsp 450,":a;chara\chrom_st23.bmp",%zukan_x0+20,0
if %zukan_pozu=3 && %zukan_hyouzyo=4 lsp 450,":a;chara\chrom_st24.bmp",%zukan_x0+20,0
if %zukan_pozu=3 && %zukan_hyouzyo=5 lsp 450,":a;chara\chrom_st25.bmp",%zukan_x0+20,0
if %zukan_pozu=3 && %zukan_hyouzyo=6 lsp 450,":a;chara\chrom_st26.bmp",%zukan_x0+20,0
if %zukan_pozu=3 && %zukan_hyouzyo=7 lsp 450,":a;chara\chrom_st27.bmp",%zukan_x0+20,0
if %zukan_pozu=3 && %zukan_hyouzyo=8 lsp 450,":a;chara\chrom_st28.bmp",%zukan_x0+20,0
if %zukan_pozu=3 && %zukan_hyouzyo=9 lsp 450,":a;chara\chrom_st29.bmp",%zukan_x0+20,0
if %zukan_pozu=4 && %zukan_hyouzyo=1 lsp 450,":a;chara\chrom_st51.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=2 lsp 450,":a;chara\chrom_st52.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=3 lsp 450,":a;chara\chrom_st53.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=4 lsp 450,":a;chara\chrom_st54.bmp",%zukan_x0,0
if %zukan_pozu=5 && %zukan_hyouzyo=1 lsp 450,":a;chara\chrom_st61.bmp",%zukan_x0,0
if %zukan_pozu=5 && %zukan_hyouzyo=2 lsp 450,":a;chara\chrom_st62.bmp",%zukan_x0,0
if %zukan_pozu=5 && %zukan_hyouzyo=3 lsp 450,":a;chara\chrom_st63.bmp",%zukan_x0,0
if %zukan_pozu=5 && %zukan_hyouzyo=4 lsp 450,":a;chara\chrom_st64.bmp",%zukan_x0,0
if %zukan_pozu=6 && %zukan_hyouzyo=1 lsp 450,":a;chara\chrom_st71.bmp",%zukan_x0,0
if %zukan_pozu=6 && %zukan_hyouzyo=2 lsp 450,":a;chara\chrom_st72.bmp",%zukan_x0,0
if %zukan_pozu=6 && %zukan_hyouzyo=3 lsp 450,":a;chara\chrom_st73.bmp",%zukan_x0,0
if %zukan_pozu=6 && %zukan_hyouzyo=4 lsp 450,":a;chara\chrom_st74.bmp",%zukan_x0,0
if %zukan_pozu=7 && %zukan_hyouzyo=1 lsp 450,":a;chara\chromg_st01.bmp",%zukan_x0+10,0
if %zukan_pozu=7 && %zukan_hyouzyo=2 lsp 450,":a;chara\chromg_st02.bmp",%zukan_x0+10,0
if %zukan_pozu=7 && %zukan_hyouzyo=3 lsp 450,":a;chara\chromg_st03.bmp",%zukan_x0+10,0
if %zukan_pozu=8 && %zukan_hyouzyo=1 lsp 450,":a;chara\chromg_st11.bmp",%zukan_x0+10,0
if %zukan_pozu=8 && %zukan_hyouzyo=2 lsp 450,":a;chara\chromg_st12.bmp",%zukan_x0+10,0
if %zukan_pozu=1 && %zukan_bukkake1=1 lsp 441,":a;chara\chrom_bk41.bmp",%zukan_x0,0
if %zukan_pozu=7 && %zukan_bukkake1=1 lsp 441,":a;chara\chromg_bk01.bmp",%zukan_x0+10,0
if %zukan_pozu=8 && %zukan_bukkake1=1 lsp 441,":a;chara\chromg_bk11.bmp",%zukan_x0+10,0
if %zukan_bukkake1=0 csp 441
if %zukan_pozu=1 && %zukan_bukkake2=1 lsp 442,":a;chara\chrom_bk42.bmp",%zukan_x0,0
if %zukan_pozu=7 && %zukan_bukkake2=1 lsp 442,":a;chara\chromg_bk02.bmp",%zukan_x0+10,0
if %zukan_pozu=8 && %zukan_bukkake2=1 lsp 442,":a;chara\chromg_bk12.bmp",%zukan_x0+10,0
if %zukan_bukkake2=0 csp 442
if %zukan_pozu=1 && %zukan_bukkake3=1 lsp 443,":a;chara\chrom_bk43.bmp",%zukan_x0,0
if %zukan_pozu=7 && %zukan_bukkake3=1 lsp 443,":a;chara\chromg_bk03.bmp",%zukan_x0+10,0
if %zukan_pozu=8 && %zukan_bukkake3=1 lsp 443,":a;chara\chromg_bk13.bmp",%zukan_x0+10,0
if %zukan_bukkake3=0 csp 443
return



*zukan_chrom2_cg

lsp 500,":c;bg\bg058.bmp",0,0
lsp 430,":c;chara\chrom_hc01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\chrom_hc02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\chrom_hc03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\chrom_hc04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\chrom_hc05.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\chrom_hc06.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\chrom_hc07.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\chrom_hc08.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\chrom_hc09.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\chrom_hc10.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\chrom_hc11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\chrom_hc12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\chromg_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\chromg_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\chromg_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\chromg_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\chromg_h5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\chromg_h6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\chromg_h7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\chromg_h8.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\chromg_h9.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_chrom2_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,71
mov %skill01,19
mov %skill02,0
mov %skill03,0
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *chrom2_start
if %bwait=211 mov %nanido,2:goto *chrom2_start
if %bwait=212 mov %nanido,3:goto *chrom2_start
lsp 700,":a;chara\chrom_st42.bmp",-50,0
lsp 699,":a;chara\chromg_st02.bmp",-250,0
lsp 698,":a;chara\chromg_st11.bmp",230,40
bg "bg\bg058.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Chrome"
if %bwait=213 goto *chrom2_h



*zukan_berryel

mov $zname,"Power Berryelle"
mov $zlavel,"berryel"
itoa2 $zukan_ko,%2675
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2675=0 mov %ryozyoku1,0
if %2675>0 mov %ryozyoku1,1
if %2675=0 mov %zukancg,0
if %2675>0 mov %zukancg,1
mov %zukan_x1,-140
mov %zukan_x2,60
mov $zukan_lv,"PQR"
mov $zukan_hp,"PVOOO"
mov $zukan_skill1,"Semen Sipping Mouth"
mov %zukan_skillc1,3825
mov $zukan_skill2,"Man Melting Breasts"
mov %zukan_skillc2,3826
mov $zukan_skill3,"Semen Milking Hands"
mov %zukan_skillc3,3827
mov $zukan_skill4,"Man Devouring Pomegranate"
mov %zukan_skillc4,3828
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_berryel_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\berry.jpg",400,0
goto *zukan_kihonbtn



*zukan_berryel_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\berryel_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\berryel_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\berryel_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\berryel_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\berryel_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\berryel_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\berryel_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
return



*zukan_berryel_cg

lsp 500,":c;bg\bg061.bmp",0,0
lsp 430,":a;chara\berryel_st11.bmp",60,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\berryel_st12.bmp",60,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\berryel_st13.bmp",60,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\berryel_st14.bmp",60,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\berryel_st15.bmp",60,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\berryel_st21.bmp",60,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\berryel_st22.bmp",60,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\berryel_st23.bmp",60,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\berryel_st31.bmp",60,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\berryel_st32.bmp",60,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\berryel_st33.bmp",60,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\berryel_st34.bmp",60,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_berryel_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,72
mov %skill01,19
mov %skill02,0
mov %skill03,0
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *berryel_start
if %bwait=211 mov %nanido,2:goto *berryel_start
if %bwait=212 mov %nanido,3:goto *berryel_start
lsp 700,":a;chara\berryel_st02.bmp",60,0
bg "bg\bg061.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Berryelle"
if %bwait=213 goto *berryel_h



*zukan_revel

mov $zname,"Virtue Revel"
mov $zlavel,"revel"
itoa2 $zukan_ko,%2676
mov %zukan_hyouzyonum,1
mov %zukan_pozunum,2
mov %zukan_bukkakenum,0
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2676=0 mov %ryozyoku1,0
if %2676>0 mov %ryozyoku1,1
if %2676=0 mov %zukancg,0
if %2676>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PQX"
mov $zukan_hp,"PWOOO"
mov $zukan_skill1,"Holy Umbilical Bond"
mov %zukan_skillc1,3829
mov $zukan_skill2,"Holy Return"
mov %zukan_skillc2,3830
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_revel_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\revel.jpg",400,0
goto *zukan_kihonbtn



*zukan_revel_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\revel_st01.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\revel_st11.bmp",%zukan_x0,0
return



*zukan_revel_cg

lsp 500,":c;bg\bg061.bmp",0,0
lsp 420,":a;chara\revel_ct11.bmp",0,0
lsp 430,":a;chara\revel_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\revel_ct12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\revel_ct13.bmp",0,0
lsp 430,":a;chara\revel_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\revel_ct14.bmp",0,0
lsp 430,":a;chara\revel_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\revel_ct15.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\revel_ct16.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\revel_ct17.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\revel_st12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\revel_st13.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\revel_ct01.bmp",540,0
lsp 430,":a;chara\revel_st01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\revel_ct02.bmp",540,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\revel_ct03.bmp",540,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\revel_st14.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_revel_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,72
mov %skill01,19
mov %skill02,0
mov %skill03,0
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *revel_start
if %bwait=211 mov %nanido,2:goto *revel_start
if %bwait=212 mov %nanido,3:goto *revel_start
lsp 700,":a;chara\revel_st01.bmp",0,0
bg "bg\bg061.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Revel"
if %bwait=213 goto *revel_h



*zukan_gnome2

mov $zname,"Gnome"
mov $zlavel,"gnome2"
mov $zukan_ko,"None "
mov %zukan_hyouzyonum,9
mov %zukan_pozunum,4
mov %zukan_bukkakenum,0
mov %zukan_sentounum,0
mov %zukan_ryozyokunum,1
mov %ryozyoku1,1
mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"TO"
mov $zukan_hp,"SOOO"
mov %zukan_skillc1,0
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_gnome2_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\gnome2.jpg",400,0
goto *zukan_kihonbtn



*zukan_gnome2_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=3 mov %zukan_hyouzyonum,1
if %zukan_pozu<>3 mov %zukan_hyouzyonum,9
if %zukan_pozu<3 && %zukan_hyouzyo=3 mov %zukan_hyouzyo,1
if %zukan_pozu<3 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,2
if %zukan_pozu=3 mov %zukan_hyouzyo,1
if %zukan_pozu=4 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=4 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\gnome_st11.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\gnome_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\gnome_st01.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\gnome_st02.bmp",%zukan_x0,0
if %zukan_pozu=3 lsp 450,":a;chara\gnome_st21.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=1 lsp 450,":a;chara\gnome_st31.bmp",%zukan_x0-40,0
if %zukan_pozu=4 && %zukan_hyouzyo=2 lsp 450,":a;chara\gnome_st32.bmp",%zukan_x0-40,0
if %zukan_pozu=4 && %zukan_hyouzyo=3 lsp 450,":a;chara\gnome_st33.bmp",%zukan_x0-40,0
if %zukan_pozu=4 && %zukan_hyouzyo=4 lsp 450,":a;chara\gnome_st34.bmp",%zukan_x0-40,0
if %zukan_pozu=4 && %zukan_hyouzyo=5 lsp 450,":a;chara\gnome_st35.bmp",%zukan_x0+256,95
if %zukan_pozu=4 && %zukan_hyouzyo=6 lsp 450,":a;chara\gnome_st36.bmp",%zukan_x0-40,0
if %zukan_pozu=4 && %zukan_hyouzyo=7 lsp 450,":a;chara\gnome_st37.bmp",%zukan_x0-40,0
if %zukan_pozu=4 && %zukan_hyouzyo=8 lsp 450,":a;chara\gnome_st38.bmp",%zukan_x0+256,18
if %zukan_pozu=4 && %zukan_hyouzyo=9 lsp 450,":a;chara\gnome_st39.bmp",%zukan_x0+296,155
return



*zukan_gnome2_cg

lsp 500,":c;bg\bg061.bmp",0,0
lsp 430,":a;chara\gnome_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\gnome_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\gnome_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\gnome_hb4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_gnome2_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,72
mov %skill01,19
mov %skill02,0
mov %skill03,0
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
lsp 700,":a;chara\gnome_st11.bmp",0,0
bg "bg\bg061.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *sean0340



*zukan_c_chariot

mov $zname,"Chimera Chariot"
mov $zlavel,"c_chariot"
mov $zukan_ko,"None "
mov %zukan_hyouzyonum,1
mov %zukan_pozunum,1
mov %zukan_bukkakenum,0
mov %zukan_sentounum,0
mov %zukan_ryozyokunum,1
mov %ryozyoku1,1
mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"UO"
mov $zukan_hp,"PXOOO"
mov %zukan_skillc1,0
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_c_chariot_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\chimchar.jpg",400,0
goto *zukan_kihonbtn



*zukan_c_chariot_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\c_chariot_st01.bmp",%zukan_x0,0
return



*zukan_c_chariot_cg

lsp 500,":c;bg\bg062.bmp",0,0
lsp 430,":a;chara\c_chariot_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_chariot_h2.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_c_chariot_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,72
mov %skill01,19
mov %skill02,0
mov %skill03,4
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=213 goto *sean0340a



*zukan_carmilla

mov $zname,"Carmilla"
mov $zlavel,"carmilla"
itoa2 $zukan_ko,%2695
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,6
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2695=0 mov %ryozyoku1,0
if %2695>0 mov %ryozyoku1,1
if %2695=0 mov %zukancg,0
if %2695>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"TU"
mov $zukan_hp,"PXOOO"
mov $zukan_skill1,"Carmilla's Fingering"
mov %zukan_skillc1,3831
mov $zukan_skill2,"Carmilla's Mouthing"
mov %zukan_skillc2,3832
mov $zukan_skill3,"Carmilla's Milking"
mov %zukan_skillc3,3833
mov $zukan_skill4,"Carmilla's Night Clothing"
mov %zukan_skillc4,3834
mov $zukan_skill5,"Carmilla's Blood Sucking"
mov %zukan_skillc5,3835
mov $zukan_skill6,"Graveyard of Lilies"
mov %zukan_skillc6,3836
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_carmilla_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\carmilla.jpg",400,0
goto *zukan_kihonbtn



*zukan_carmilla_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\carmilla_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\carmilla_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\carmilla_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\carmilla_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\carmilla_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\carmilla_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\carmilla_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\carmilla_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\carmilla_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
return



*zukan_carmilla_cg

lsp 500,":c;bg\bg223.bmp",0,0
lsp 430,":a;chara\carmilla_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\carmilla_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\carmilla_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\carmilla_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\carmilla_ha5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\carmilla_ha6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\carmilla_ha7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\carmilla_ha8.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\carmilla_ha9.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\carmilla_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\carmilla_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\carmilla_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\carmilla_hb4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\carmilla_hb5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\carmilla_hb6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\carmilla_hb7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\carmilla_hb8.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\carmilla_hb9.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_carmilla_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,72
mov %skill01,19
mov %skill02,0
mov %skill03,4
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *carmilla_start
if %bwait=211 mov %nanido,2:goto *carmilla_start
if %bwait=212 mov %nanido,3:goto *carmilla_start
lsp 700,":a;chara\carmilla_st02.bmp",0,0
bg "bg\bg223.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *carmilla_h



*zukan_elisabeth

mov $zname,"Elizabeth"
mov $zlavel,"elisabeth"
itoa2 $zukan_ko,%2696
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,7
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2696=0 mov %ryozyoku1,0
if %2696>0 mov %ryozyoku1,1
if %2696=0 mov %zukancg,0
if %2696>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"TW"
mov $zukan_hp,"PVOOO"
mov $zukan_skill1,"Elizabeth's Captivating Hand"
mov %zukan_skillc1,3837
mov $zukan_skill2,"Elizabeth's Attending Mouth"
mov %zukan_skillc2,3838
mov $zukan_skill3,"Elizabeth's Admiring Breasts"
mov %zukan_skillc3,3839
mov $zukan_skill4,"Elizabeth's Bloodsucking"
mov %zukan_skillc4,3840
mov $zukan_skill5,"Bathory's Cradle"
mov %zukan_skillc5,3841
mov $zukan_skill6,"Transylvania Midnight"
mov %zukan_skillc6,3842
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_elisabeth_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\elizabeth.jpg",400,0
goto *zukan_kihonbtn



*zukan_elisabeth_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\elisabeth_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\elisabeth_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\elisabeth_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\elisabeth_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\elisabeth_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\elisabeth_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\elisabeth_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\elisabeth_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\elisabeth_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
if %zukan_bukkake7=1 lsp 447,":a;chara\elisabeth_bk07.bmp",%zukan_x0,0
if %zukan_bukkake7=0 csp 447
return



*zukan_elisabeth_cg

lsp 500,":c;bg\bg223.bmp",0,0
lsp 430,":a;chara\elisabeth_st02.bmp",0,0
lsp 420,":a;chara\elisabeth_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\elisabeth_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\elisabeth_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\elisabeth_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\elisabeth_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\elisabeth_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\elisabeth_ha5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\elisabeth_ha6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\elisabeth_ha7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\elisabeth_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\elisabeth_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\elisabeth_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\elisabeth_hb4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\elisabeth_hb5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\elisabeth_hb6.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_elisabeth_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,72
mov %skill01,19
mov %skill02,0
mov %skill03,4
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *elisabeth_start
if %bwait=211 mov %nanido,2:goto *elisabeth_start
if %bwait=212 mov %nanido,3:goto *elisabeth_start
lsp 700,":a;chara\elisabeth_st02.bmp",0,0
bg "bg\bg223.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *elisabeth_h



*zukan_queenvanpire

mov $zname,"Queen Vampire"
mov $zlavel,"queenvanpire"
itoa2 $zukan_ko,%2697
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,2
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2697=0 mov %ryozyoku1,0
if %2697>0 mov %ryozyoku1,1
if %2697=0 mov %zukancg,0
if %2697>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"VT"
mov $zukan_hp,"QPOOO"
mov $zukan_skill1,"Erotic Fingers"
mov %zukan_skillc1,3843
mov $zukan_skill2,"Lascivious Tongue"
mov %zukan_skillc2,3844
mov $zukan_skill3,"Dream Milking"
mov %zukan_skillc3,3845
mov $zukan_skill4,"Nocturnal Bloodsucker"
mov %zukan_skillc4,3846
mov $zukan_skill5,"Devilish Membrane"
mov %zukan_skillc5,3847
mov $zukan_skill6,"Moonlight Nocturne"
mov %zukan_skillc6,3848
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_queenvanpire_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\vampq.jpg",400,0
goto *zukan_kihonbtn



*zukan_queenvanpire_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\queenvanpire_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\queenvanpire_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\queenvanpire_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\queenvanpire_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\queenvanpire_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\queenvanpire_st13.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\queenvanpire_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\queenvanpire_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\queenvanpire_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\queenvanpire_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_pozu=2 && %zukan_bukkake5=1 lsp 445,":a;chara\queenvanpire_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_queenvanpire_cg

lsp 500,":c;bg\bg224.bmp",0,0
lsp 430,":a;chara\queenvanpire_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\queenvanpire_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\queenvanpire_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\queenvanpire_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\queenvanpire_ha5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\queenvanpire_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\queenvanpire_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\queenvanpire_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\queenvanpire_hb4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\queenvanpire_hb5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\queenvanpire_hb6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\queenvanpire_hb7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\queenvanpire_hc1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\queenvanpire_hc2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\queenvanpire_hc3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\queenvanpire_hc4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\queenvanpire_hc5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\queenvanpire_hc6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\queenvanpire_hc7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\queenvanpire_hc8.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_queenvanpire_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,73
mov %skill01,19
mov %skill02,0
mov %skill03,4
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *queenvanpire_start
if %bwait=211 mov %nanido,2:goto *queenvanpire_start
if %bwait=212 mov %nanido,3:goto *queenvanpire_start
lsp 700,":a;chara\queenvanpire_st02.bmp",0,0
bg "bg\bg224.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *queenvanpire_h



*zukan_c_homunculus

mov $zname,"Chimera Homunculus"
mov $zlavel,"c_homunculus"
itoa2 $zukan_ko,%2680
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2680=0 mov %ryozyoku1,0
if %2680>0 mov %ryozyoku1,1
if %2680=0 mov %zukancg,0
if %2680>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"TT"
mov $zukan_hp,"PVOOO"
mov $zukan_skill1,"EX Tentacle"
mov %zukan_skillc1,3849
mov $zukan_skill2,"EX Bust"
mov %zukan_skillc2,3850
mov $zukan_skill3,"EX Drain Blowjob"
mov %zukan_skillc3,3851
mov $zukan_skill4,"Alchemist Tentacle"
mov %zukan_skillc4,3852
mov $zukan_skill5,"Alchemist Euria"
mov %zukan_skillc5,3853
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_c_homunculus_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\chimhomu.jpg",400,0
goto *zukan_kihonbtn



*zukan_c_homunculus_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\c_homunculus_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\c_homunculus_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\c_homunculus_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\c_homunculus_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\c_homunculus_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\c_homunculus_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
return



*zukan_c_homunculus_cg

lsp 500,":c;bg\bg072.bmp",0,0
lsp 430,":a;chara\c_homunculus_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_homunculus_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_homunculus_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_homunculus_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_homunculus_h5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\c_homunculus_h6.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_c_homunculus_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,73
mov %skill01,19
mov %skill02,0
mov %skill03,4
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *c_homunculus_start
if %bwait=211 mov %nanido,2:goto *c_homunculus_start
if %bwait=212 mov %nanido,3:goto *c_homunculus_start
lsp 700,":a;chara\c_homunculus_st02.bmp",0,0
bg "bg\bg072.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *c_homunculus_h



*zukan_ironmaiden_k

mov $zname,"Iron Maiden v2"
mov $zlavel,"ironmaiden_k"
itoa2 $zukan_ko,%2681
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2681=0 mov %ryozyoku1,0
if %2681>0 mov %ryozyoku1,1
if %2681=0 mov %zukancg,0
if %2681>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"TV"
mov $zukan_hp,"PWOOO"
mov $zukan_skill1,"Dream Spider"
mov %zukan_skillc1,3854
mov $zukan_skill2,"Sweet Pinchers"
mov %zukan_skillc2,3855
mov $zukan_skill3,"Cave of Roses"
mov %zukan_skillc3,3856
mov $zukan_skill4,"Sadistic Iron Maiden"
mov %zukan_skillc4,3857
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_ironmaiden_k_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\ironmaiden2.jpg",400,0
goto *zukan_kihonbtn



*zukan_ironmaiden_k_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\ironmaiden_k_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\ironmaiden_k_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\ironmaiden_k_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\ironmaiden_k_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\ironmaiden_k_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\ironmaiden_k_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
return



*zukan_ironmaiden_k_cg

lsp 500,":c;bg\bg072.bmp",0,0
lsp 430,":a;chara\ironmaiden_k_st11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ironmaiden_k_st12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ironmaiden_k_st13.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ironmaiden_k_st14.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ironmaiden_k_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ironmaiden_k_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ironmaiden_k_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ironmaiden_k_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ironmaiden_k_h5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\ironmaiden_k_h6.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_ironmaiden_k_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,73
mov %skill01,19
mov %skill02,0
mov %skill03,4
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *ironmaiden_k_start
if %bwait=211 mov %nanido,2:goto *ironmaiden_k_start
if %bwait=212 mov %nanido,3:goto *ironmaiden_k_start
lsp 700,":a;chara\ironmaiden_k_st02.bmp",0,0
bg "bg\bg072.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Iron Maiden"
if %bwait=213 goto *ironmaiden_k_h



*zukan_lusia

mov $zname,"Lucia"
mov $zlavel,"lusia"
itoa2 $zukan_ko,%2682
mov %zukan_hyouzyonum,4
mov %zukan_pozunum,1
mov %zukan_bukkakenum,7
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2682=0 mov %ryozyoku1,0
if %2682>0 mov %ryozyoku1,1
if %2682=0 mov %zukancg,0
if %2682>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"WW"
mov $zukan_hp,"QOOOO"
mov $zukan_skill1,"Tentacle Worm"
mov %zukan_skillc1,3858
mov $zukan_skill2,"Drain Worm"
mov %zukan_skillc2,3859
mov $zukan_skill3,"Anal Drain"
mov %zukan_skillc3,3860
mov $zukan_skill4,"Ecstasy Worm"
mov %zukan_skillc4,3861
mov $zukan_skill5,"Paralyzing Worm"
mov %zukan_skillc5,3862
mov $zukan_skill6,"Boa Worm"
mov %zukan_skillc6,3863
mov $zukan_skill7,"Meltick Drain"
mov %zukan_skillc7,3864
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_lusia_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\lucia.jpg",400,0
goto *zukan_kihonbtn



*zukan_lusia_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\lusia_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\lusia_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\lusia_st03.bmp",%zukan_x0,0
if %zukan_hyouzyo=4 lsp 450,":a;chara\lusia_st04.bmp",%zukan_x0,0
if %zukan_hyouzyo<>4 && %zukan_bukkake1=1 lsp 441,":a;chara\lusia_bk01.bmp",%zukan_x0,0
if %zukan_hyouzyo=4 && %zukan_bukkake1=1 lsp 441,":a;chara\lusia_bk01b.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\lusia_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\lusia_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\lusia_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\lusia_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\lusia_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
if %zukan_bukkake7=1 lsp 447,":a;chara\lusia_bk07.bmp",%zukan_x0,0
if %zukan_bukkake7=0 csp 447
return



*zukan_lusia_cg

lsp 500,":c;bg\bg075.bmp",0,0
lsp 430,":a;chara\lusia_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lusia_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lusia_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lusia_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lusia_ha5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lusia_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\lusia_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\lusia_ct02.bmp",0,0
lsp 430,":a;chara\lusia_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\lusia_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\lusia_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\lusia_ct04.bmp",0,0
lsp 430,":a;chara\lusia_hb4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_lusia_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,73
mov %skill01,19
mov %skill02,0
mov %skill03,4
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *lusia_start
if %bwait=211 mov %nanido,2:goto *lusia_start
if %bwait=212 mov %nanido,3:goto *lusia_start
lsp 700,":a;chara\lusia_st02.bmp",0,0
bg "bg\bg075.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *lusia_h



*zukan_silkiel

mov $zname,"Virtue Silkiel"
mov $zlavel,"silkiel"
itoa2 $zukan_ko,%2683
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,2
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2683=0 mov %ryozyoku1,0
if %2683>0 mov %ryozyoku1,1
if %2683=0 mov %zukancg,0
if %2683>0 mov %zukancg,1
mov %zukan_x1,-110
mov %zukan_x2,90
mov $zukan_lv,"PQW"
mov $zukan_hp,"QOOOO"
mov $zukan_skill1,"Flowing Blowjob"
mov %zukan_skillc1,3865
mov $zukan_skill2,"Flowing Tit Fuck"
mov %zukan_skillc2,3866
mov $zukan_skill3,"Feather Feel"
mov %zukan_skillc3,3867
mov $zukan_skill4,"Silk-Spinning Intercourse"
mov %zukan_skillc4,3868
mov $zukan_skill5,"Silky Tide"
mov %zukan_skillc5,3869
mov $zukan_skill6,"Silky Rose Heaven"
mov %zukan_skillc6,3870
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_silkiel_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\silkiel.jpg",400,0
goto *zukan_kihonbtn



*zukan_silkiel_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\silkiel_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\silkiel_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\silkiel_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\silkiel_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\silkiel_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\silkiel_st13.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\silkiel_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\silkiel_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\silkiel_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\silkiel_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
return



*zukan_silkiel_cg

lsp 500,":c;bg\bg076.bmp",0,0
lsp 430,":a;chara\silkiel_st21.bmp",90,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\silkiel_st22.bmp",90,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\silkiel_st23.bmp",90,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\silkiel_st24.bmp",90,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\silkiel_st25.bmp",90,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\silkiel_st26.bmp",90,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\silkiel_st27.bmp",90,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\silkiel_st31.bmp",90,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\silkiel_st32.bmp",90,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\silkiel_st33.bmp",90,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\silkiel_st34.bmp",90,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\silkiel_st35.bmp",90,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\silkiel_st36.bmp",90,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_silkiel_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,73
mov %skill01,19
mov %skill02,0
mov %skill03,4
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *silkiel_start
if %bwait=211 mov %nanido,2:goto *silkiel_start
if %bwait=212 mov %nanido,3:goto *silkiel_start
lsp 700,":a;chara\silkiel_st02.bmp",90,0
bg "bg\bg076.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Silkiel"
if %bwait=213 goto *silkiel_h



*zukan_endiel

mov $zname,"Dominion Endiel"
mov $zlavel,"endiel"
itoa2 $zukan_ko,%2684
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,2
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2684=0 mov %ryozyoku1,0
if %2684>0 mov %ryozyoku1,1
if %2684=0 mov %zukancg,0
if %2684>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PRQ"
mov $zukan_hp,"QPOOO"
mov $zukan_skill1,"Mystic Whore's Foot"
mov %zukan_skillc1,3871
mov $zukan_skill2,"Mystic Whore's Tit Fuck"
mov %zukan_skillc2,3872
mov $zukan_skill3,"Mystic Whore's Ass"
mov %zukan_skillc3,3873
mov $zukan_skill4,"Mystic Whore's Blowjob"
mov %zukan_skillc4,3874
mov $zukan_skill5,"Mystic Whore's Vagina"
mov %zukan_skillc5,3875
mov $zukan_skill6,"Hold of Sexual Pleasures"
mov %zukan_skillc6,3876
mov $zukan_skill7,"Dance of the Membrane"
mov %zukan_skillc7,3877
mov $zukan_skill8,"Membrane's Requiem"
mov %zukan_skillc8,3878
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_endiel_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\endiel.jpg",400,0
goto *zukan_kihonbtn



*zukan_endiel_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\endiel_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\endiel_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\endiel_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\endiel_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\endiel_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\endiel_st13.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\endiel_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\endiel_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\endiel_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_pozu=1 && %zukan_bukkake4=1 lsp 444,":a;chara\endiel_bk04.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake4=1 lsp 444,":a;chara\endiel_bk14.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_pozu=2 && %zukan_bukkake5=1 lsp 445,":a;chara\endiel_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_endiel_cg

lsp 500,":c;bg\bg076.bmp",0,0
lsp 430,":a;chara\endiel_st11.bmp",0,0
lsp 420,":a;chara\endiel_ct01.bmp",400,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\endiel_ct02.bmp",400,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\endiel_ct03.bmp",400,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\endiel_ct04.bmp",400,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\endiel_st20.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\endiel_st21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\endiel_st22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\endiel_st23.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\endiel_st24.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\endiel_st25.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\endiel_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\endiel_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\endiel_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\endiel_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\endiel_h5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\endiel_h6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\endiel_h7.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_endiel_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,74
mov %skill01,19
mov %skill02,0
mov %skill03,4
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *endiel_start
if %bwait=211 mov %nanido,2:goto *endiel_start
if %bwait=212 mov %nanido,3:goto *endiel_start
lsp 700,":a;chara\endiel_st02.bmp",0,0
bg "bg\bg076.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Endiel"
if %bwait=213 goto *endiel_h



*zukan_sylph2

mov $zname,"Sylph"
mov $zlavel,"sylph2"
mov $zukan_ko,"None "
mov %zukan_hyouzyonum,7
mov %zukan_pozunum,4
mov %zukan_bukkakenum,0
mov %zukan_sentounum,0
mov %zukan_ryozyokunum,1
mov %ryozyoku1,1
mov %zukancg,1
mov %zukan_x1,-300
mov %zukan_x2,0
mov $zukan_lv,"TO"
mov $zukan_hp,"SOOO"
mov %zukan_skillc1,0
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_sylph2_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\sylph2.jpg",400,0
goto *zukan_kihonbtn



*zukan_sylph2_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 && %zukan_hyouzyo=5 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,4
if %zukan_pozu=2 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=2 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=3 && %zukan_hyouzyo=3 mov %zukan_hyouzyo,1
if %zukan_pozu=3 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,2
if %zukan_pozu=4 && %zukan_hyouzyo=12 mov %zukan_hyouzyo,1
if %zukan_pozu=4 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,11
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\sylph_st41.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\sylph_st42.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\sylph_st43.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\sylph_st44.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\sylph_st01.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\sylph_st02.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\sylph_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=4 lsp 450,":a;chara\sylph_st04.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=5 lsp 450,":a;chara\sylph_st05.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=6 lsp 450,":a;chara\sylph_st06.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=7 lsp 450,":a;chara\sylph_st07.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\sylph_st11.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\sylph_st12.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=1 lsp 450,":a;chara\sylph_st23.bmp",%zukan_x0+155,100
if %zukan_pozu=4 && %zukan_hyouzyo=2 lsp 450,":a;chara\sylph_st24.bmp",%zukan_x0+155,100
if %zukan_pozu=4 && %zukan_hyouzyo=3 lsp 450,":a;chara\sylph_st25.bmp",%zukan_x0+155,100
if %zukan_pozu=4 && %zukan_hyouzyo=4 lsp 450,":a;chara\sylph_st26.bmp",%zukan_x0+321,241
if %zukan_pozu=4 && %zukan_hyouzyo=5 lsp 450,":a;chara\sylph_st27.bmp",%zukan_x0+321,241
if %zukan_pozu=4 && %zukan_hyouzyo=6 lsp 450,":a;chara\sylph_st31.bmp",%zukan_x0,100
if %zukan_pozu=4 && %zukan_hyouzyo=7 lsp 450,":a;chara\sylph_st32.bmp",%zukan_x0,100
if %zukan_pozu=4 && %zukan_hyouzyo=8 lsp 450,":a;chara\sylph_st33.bmp",%zukan_x0+310,200
if %zukan_pozu=4 && %zukan_hyouzyo=9 lsp 450,":a;chara\sylph_st34.bmp",%zukan_x0+323,245
if %zukan_pozu=4 && %zukan_hyouzyo=10 lsp 450,":a;chara\sylph_st35.bmp",%zukan_x0+323,200
if %zukan_pozu=4 && %zukan_hyouzyo=11 lsp 450,":a;chara\sylph_st36.bmp",%zukan_x0+323,88
return



*zukan_sylph2_cg

lsp 500,":c;bg\bg076.bmp",0,0
lsp 430,":a;chara\sylph_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\sylph_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\sylph_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\sylph_hb4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_sylph2_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,74
mov %skill01,19
mov %skill02,0
mov %skill03,4
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
lsp 700,":a;chara\sylph_st41.bmp",0,0
bg "bg\bg076.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *sean0352



*zukan_typhon

mov $zname,"Typhon Girl"
mov $zlavel,"typhon"
mov $zukan_ko,"None "
mov %zukan_hyouzyonum,1
mov %zukan_pozunum,1
mov %zukan_bukkakenum,0
mov %zukan_sentounum,0
mov %zukan_ryozyokunum,1
mov %ryozyoku1,1
mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"TV"
mov $zukan_hp,"PWOOO"
mov %zukan_skillc1,0
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_typhon_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\typhon.jpg",400,0
goto *zukan_kihonbtn



*zukan_typhon_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\typhon_st01.bmp",%zukan_x0,0
return



*zukan_typhon_cg

lsp 500,":c;bg\bg065.bmp",0,0
lsp 430,":a;chara\typhon_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\typhon_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\typhon_h3.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_typhon_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,74
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
bg "bg\bg065.bmp",10,1500
if %bwait=213 goto *sean0352a



*zukan_lamianloid

mov $zname,"Lamiaroid"
mov $zlavel,"lamianloid"
itoa2 $zukan_ko,%2701
mov %zukan_hyouzyonum,4
mov %zukan_pozunum,2
mov %zukan_bukkakenum,6
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,2
if %2855=0 mov %ryozyoku1,0
if %2855>0 mov %ryozyoku1,1
if %2856=0 mov %ryozyoku2,0
if %2856>0 mov %ryozyoku2,1
if %2701=0 mov %zukancg,0
if %2701>0 mov %zukancg,1
mov %zukan_x1,-210
mov %zukan_x2,0
mov $zukan_lv,"VT"
mov $zukan_hp,"PWOOO"
mov $zukan_skill1,"Lamiatail"
mov %zukan_skillc1,3879
mov $zukan_skill2,"Super Bust"
mov %zukan_skillc2,3880
mov $zukan_skill3,"Snake Tongue"
mov %zukan_skillc3,3881
mov $zukan_skill4,"Pleasure Foot"
mov %zukan_skillc4,4132
mov $zukan_skill5,"Rube Arm"
mov %zukan_skillc5,3882
mov $zukan_skill6,"Plant Arm"
mov %zukan_skillc6,3883
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_lamianloid_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\lamiaroid.jpg",400,0
goto *zukan_kihonbtn



*zukan_lamianloid_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=2 mov %zukan_hyouzyonum,1
if %zukan_pozu<>2 mov %zukan_hyouzyonum,4
if %zukan_pozu=1 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=2 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\lamianloid_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\lamianloid_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\lamianloid_st03.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\lamianloid_st04.bmp",%zukan_x0,0
if %zukan_pozu=2 lsp 450,":a;chara\lamianloid_st11.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_bukkake1=1 lsp 441,":a;chara\lamianloid_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_pozu=1 && %zukan_bukkake2=1 lsp 442,":a;chara\lamianloid_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_pozu=1 && %zukan_bukkake3=1 lsp 443,":a;chara\lamianloid_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_pozu=1 && %zukan_bukkake4=1 lsp 444,":a;chara\lamianloid_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_pozu=1 && %zukan_bukkake5=1 lsp 445,":a;chara\lamianloid_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_pozu=1 && %zukan_bukkake6=1 lsp 446,":a;chara\lamianloid_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
return



*zukan_lamianloid_cg

lsp 500,":c;bg\bg190.bmp",0,0
lsp 430,":a;chara\lamianloid_st02.bmp",0,0
lsp 420,":a;chara\lamianloid_ct41.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\lamianloid_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\lamianloid_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\lamianloid_ct11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\lamianloid_ct12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\lamianloid_ct21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\lamianloid_ct22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\lamianloid_ct31.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\lamianloid_ct32.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %2855=0 goto *zukan_lamianloid_cg2
csp 420
lsp 430,":c;chara\lamianloid_ha01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha05.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha06.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha07.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha08.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha09.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha10.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha13.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha14.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha15.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha16.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha17.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha18.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha19.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha20.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha23.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha24.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha25.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha26.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha27.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha28.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha29.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha30.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha31.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha32.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha33.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha34.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha35.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha36.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha37.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha38.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_ha39.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %2856=0 return "*zukan_"+$zlavel
goto *zukan_lamianloid_cg2



*zukan_lamianloid_cg2

lsp 430,":c;chara\lamianloid_hb01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_hb02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_hb03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_hb04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_hb05.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_hb06.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_hb07.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_hb08.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_hb09.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_hb10.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_hb11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_hb12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_hb13.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_hb14.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_hb15.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_hb16.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_hb17.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_hb18.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_hb19.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_hb20.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_hb21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_hb22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_hb23.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_hb24.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_hb25.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_hb26.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_hb27.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_hb28.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_hb29.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_hb30.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_hb31.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_hb32.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_hb33.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_hb34.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\lamianloid_hb35.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_lamianloid_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,74
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *lamianloid_start
if %bwait=211 mov %nanido,2:goto *lamianloid_start
if %bwait=212 mov %nanido,3:goto *lamianloid_start
lsp 700,":a;chara\lamianloid_st02.bmp",0,0
bg "bg\bg190.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *lamianloid_ha
if %bwait=214 goto *lamianloid_hb



*zukan_knightloid

mov $zname,"Knightroid"
mov $zlavel,"knightloid"
itoa2 $zukan_ko,%2686
mov %zukan_hyouzyonum,5
mov %zukan_pozunum,4
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2686=0 mov %ryozyoku1,0
if %2686>0 mov %ryozyoku1,1
if %2686=0 mov %zukancg,0
if %2686>0 mov %zukancg,1
mov %zukan_x1,-250
mov %zukan_x2,-50
mov $zukan_lv,"WX"
mov $zukan_hp,"ROOOO"
mov $zukan_skill1,"Oral Drills"
mov %zukan_skillc1,3884
mov $zukan_skill2,"Chivalric Spear Rub"
mov %zukan_skillc2,3885
mov $zukan_skill3,"Chivalric Spear Handling"
mov %zukan_skillc3,3886
mov $zukan_skill4,"Chivalric Whip"
mov %zukan_skillc4,3887
mov $zukan_skill5,"Knightly Breast Force"
mov %zukan_skillc5,3888
mov $zukan_skill6,"Knightly Breast Milking"
mov %zukan_skillc6,3889
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_knightloid_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\knightroid.jpg",400,0
goto *zukan_kihonbtn



*zukan_knightloid_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\knightloid_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\knightloid_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\knightloid_st03.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\knightloid_st04.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=5 lsp 450,":a;chara\knightloid_st05.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\knightloid_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\knightloid_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\knightloid_st13.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=4 lsp 450,":a;chara\knightloid_st14.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=5 lsp 450,":a;chara\knightloid_st15.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\knightloid_st21.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\knightloid_st22.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=3 lsp 450,":a;chara\knightloid_st23.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=4 lsp 450,":a;chara\knightloid_st24.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=5 lsp 450,":a;chara\knightloid_st25.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=1 lsp 450,":a;chara\knightloid_st31.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=2 lsp 450,":a;chara\knightloid_st32.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=3 lsp 450,":a;chara\knightloid_st33.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=4 lsp 450,":a;chara\knightloid_st34.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=5 lsp 450,":a;chara\knightloid_st35.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\knightloid_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_pozu=2 && %zukan_bukkake2=1 lsp 442,":a;chara\knightloid_bk02.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_bukkake2=1 lsp 442,":a;chara\knightloid_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\knightloid_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\knightloid_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\knightloid_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_knightloid_cg

lsp 500,":c;bg\bg225.bmp",0,0
lsp 430,":a;chara\knightloid_st01.bmp",0,0
lsp 420,":a;chara\knightloid_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\knightloid_ct31.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\knightloid_ct11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\knightloid_ct12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\knightloid_ct13.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\knightloid_ct21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\knightloid_ct22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\knightloid_ct23.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":c;chara\knightloid_ha01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\knightloid_ha04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\knightloid_ha19.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\knightloid_ha21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\knightloid_ha22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\knightloid_hb01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\knightloid_hb02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\knightloid_hb03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\knightloid_hb04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\knightloid_hb05.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\knightloid_hb06.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\knightloid_hb07.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\knightloid_hb08.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\knightloid_hb09.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\knightloid_hb10.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\knightloid_hb11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\knightloid_hb12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\knightloid_hb13.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\knightloid_hb14.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\knightloid_hb15.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\knightloid_hb16.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\knightloid_hb17.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\knightloid_hb18.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\knightloid_hb19.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\knightloid_hb20.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\knightloid_hb21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\knightloid_hb22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\knightloid_hb23.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\knightloid_hb24.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\knightloid_hb25.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\knightloid_hb26.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\knightloid_hb27.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\knightloid_hb28.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_knightloid_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,74
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *knightloid_start
if %bwait=211 mov %nanido,2:goto *knightloid_start
if %bwait=212 mov %nanido,3:goto *knightloid_start
lsp 700,":a;chara\knightloid_st02.bmp",-50,0
bg "bg\bg084.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *knightloid_h



*zukan_akaname

mov $zname,"Akaname"
mov $zlavel,"akaname"
itoa2 $zukan_ko,%2687
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,1
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2687=0 mov %ryozyoku1,0
if %2687>0 mov %ryozyoku1,1
if %2687=0 mov %zukancg,0
if %2687>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"TR"
mov $zukan_hp,"PTOOO"
mov $zukan_skill1,"Akaname Entangling"
mov %zukan_skillc1,3890
mov $zukan_skill2,"Akaname Squeeze"
mov %zukan_skillc2,3891
mov $zukan_skill3,"Akaname Sucking"
mov %zukan_skillc3,3892
mov $zukan_skill4,"Akaname Nipple Crawl"
mov %zukan_skillc4,3893
mov $zukan_skill5,"Akaname Ball Lick"
mov %zukan_skillc5,3894
mov $zukan_skill6,"Akaname Anal Lick"
mov %zukan_skillc6,3895
mov $zukan_skill7,"Akaname Triple Entanglement"
mov %zukan_skillc7,3896
mov $zukan_skill8,"Akaname Licking Kiss"
mov %zukan_skillc8,3897
mov $zukan_skill9,"Akaname Tongue Garden"
mov %zukan_skillc9,3898
mov $zukan_skill10,"Akaname Tongue Hell"
mov %zukan_skillc10,3899
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_akaname_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\akaname.jpg",400,0
goto *zukan_kihonbtn



*zukan_akaname_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\akaname_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\akaname_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\akaname_st03.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 && %zukan_bukkake1=1 lsp 441,":a;chara\akaname_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
return



*zukan_akaname_cg

lsp 500,":c;bg\bg088.bmp",0,0
lsp 430,":a;chara\akaname_st02.bmp",100,0
lsp 420,":a;chara\akaname_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\akaname_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\akaname_ct11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\akaname_ct12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\akaname_ct21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\akaname_ct22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\akaname_ct31.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\akaname_ct32.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\akaname_ct41.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\akaname_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\akaname_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\akaname_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\akaname_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\akaname_h5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\akaname_h6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\akaname_h7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\akaname_h8.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\akaname_h9.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_akaname_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,74
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *akaname_start
if %bwait=211 mov %nanido,2:goto *akaname_start
if %bwait=212 mov %nanido,3:goto *akaname_start
lsp 700,":a;chara\akaname_st02.bmp",0,0
bg "bg\bg088.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *akaname_h



*zukan_mikolamia

mov $zname,"Miko Lamia"
mov $zlavel,"mikolamia"
itoa2 $zukan_ko,%2688
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,7
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2688=0 mov %ryozyoku1,0
if %2688>0 mov %ryozyoku1,1
if %2688=0 mov %zukancg,0
if %2688>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"TT"
mov $zukan_hp,"PUOOO"
mov $zukan_skill1,"Ten Finger Masturbation"
mov %zukan_skillc1,3900
mov $zukan_skill2,"Snake Tongue"
mov %zukan_skillc2,3901
mov $zukan_skill3,"Abundant Breasts"
mov %zukan_skillc3,3902
mov $zukan_skill4,"Divining Tail"
mov %zukan_skillc4,3903
mov $zukan_skill5,"Ninety Inch Tongue Wrap"
mov %zukan_skillc5,3904
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_mikolamia_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\mikolamia.jpg",400,0
goto *zukan_kihonbtn



*zukan_mikolamia_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\mikolamia_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\mikolamia_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\mikolamia_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\mikolamia_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\mikolamia_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\mikolamia_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\mikolamia_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\mikolamia_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\mikolamia_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
if %zukan_bukkake7=1 lsp 447,":a;chara\mikolamia_bk07.bmp",%zukan_x0,0
if %zukan_bukkake7=0 csp 447
return



*zukan_mikolamia_cg

lsp 500,":c;bg\bg191.bmp",0,0
lsp 430,":a;chara\mikolamia_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mikolamia_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mikolamia_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mikolamia_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mikolamia_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mikolamia_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mikolamia_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\mikolamia_hb4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_mikolamia_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,74
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *mikolamia_start
if %bwait=211 mov %nanido,2:goto *mikolamia_start
if %bwait=212 mov %nanido,3:goto *mikolamia_start
lsp 700,":a;chara\mikolamia_st02.bmp",0,0
bg "bg\bg191.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *mikolamia_h



*zukan_kezyorou

mov $zname,"Kejourou"
mov $zlavel,"kezyorou"
itoa2 $zukan_ko,%2729
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2729=0 mov %ryozyoku1,0
if %2729>0 mov %ryozyoku1,1
if %2729=0 mov %zukancg,0
if %2729>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"TW"
mov $zukan_hp,"PWOOO"
mov $zukan_skill1,"Geisha's Masturbation"
mov %zukan_skillc1,3905
mov $zukan_skill2,"Flutist's Playing"
mov %zukan_skillc2,3906
mov $zukan_skill3,"Flower Girl's Breasts"
mov %zukan_skillc3,3907
mov $zukan_skill4,"Indecent Hair"
mov %zukan_skillc4,3908
mov $zukan_skill5,"Ultimate Hair Charm"
mov %zukan_skillc5,3909
mov $zukan_skill6,"Courtesan's Pride"
mov %zukan_skillc6,3910
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_kezyorou_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\kejourou.jpg",400,0
goto *zukan_kihonbtn



*zukan_kezyorou_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\kezyorou_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\kezyorou_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\kezyorou_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\kezyorou_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\kezyorou_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\kezyorou_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\kezyorou_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
return



*zukan_kezyorou_cg

lsp 500,":c;bg\bg159.bmp",0,0
lsp 430,":a;chara\kezyorou_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kezyorou_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kezyorou_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kezyorou_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kezyorou_ha5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kezyorou_ha6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kezyorou_ha7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kezyorou_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kezyorou_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kezyorou_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kezyorou_hb4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kezyorou_hb5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kezyorou_hb6.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_kezyorou_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,74
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *kezyorou_start
if %bwait=211 mov %nanido,2:goto *kezyorou_start
if %bwait=212 mov %nanido,3:goto *kezyorou_start
lsp 700,":a;chara\kezyorou_st02.bmp",0,0
bg "bg\bg159.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *kezyorou_h



*zukan_sirohebisama

mov $zname,"Shirohebi"
mov $zlavel,"sirohebisama"
itoa2 $zukan_ko,%2689
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,6
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2689=0 mov %ryozyoku1,0
if %2689>0 mov %ryozyoku1,1
if %2689=0 mov %zukancg,0
if %2689>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"VO"
mov $zukan_hp,"QPOOO"
mov $zukan_skill1,"Boy Squeezing"
mov %zukan_skillc1,3911
mov $zukan_skill2,"Ascending Suck"
mov %zukan_skillc2,3912
mov $zukan_skill3,"Breast Pressure"
mov %zukan_skillc3,3913
mov $zukan_skill4,"Snake Squeeze"
mov %zukan_skillc4,3914
mov $zukan_skill5,"Shirohebi's Comforting"
mov %zukan_skillc5,3915
mov $zukan_skill6,"Snake Mating"
mov %zukan_skillc6,3916
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_sirohebisama_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\shirohebi.jpg",400,0
goto *zukan_kihonbtn



*zukan_sirohebisama_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\sirohebisama_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\sirohebisama_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\sirohebisama_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\sirohebisama_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\sirohebisama_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\sirohebisama_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\sirohebisama_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\sirohebisama_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\sirohebisama_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
return



*zukan_sirohebisama_cg

lsp 500,":c;bg\bg090.bmp",0,0
lsp 430,":a;chara\sirohebisama_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\sirohebisama_ha1s.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\sirohebisama_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\sirohebisama_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\sirohebisama_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\sirohebisama_ha5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\sirohebisama_ha6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\sirohebisama_ha7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\sirohebisama_ha8.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\sirohebisama_ha9.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\sirohebisama_ct01.bmp",0,0
lsp 430,":a;chara\sirohebisama_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\sirohebisama_ct02.bmp",0,0
lsp 430,":a;chara\sirohebisama_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\sirohebisama_ct03.bmp",0,0
lsp 430,":a;chara\sirohebisama_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\sirohebisama_ct04.bmp",0,0
lsp 430,":a;chara\sirohebisama_hb4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\sirohebisama_ct05.bmp",0,0
lsp 430,":a;chara\sirohebisama_hb5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\sirohebisama_ct06.bmp",0,0
lsp 430,":a;chara\sirohebisama_hb6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\sirohebisama_ct07.bmp",0,0
lsp 430,":a;chara\sirohebisama_hb7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\sirohebisama_ct08.bmp",0,0
lsp 430,":a;chara\sirohebisama_hb8.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\sirohebisama_ct09.bmp",0,0
lsp 430,":a;chara\sirohebisama_hb9.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_sirohebisama_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,74
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *sirohebisama_start
if %bwait=211 mov %nanido,2:goto *sirohebisama_start
if %bwait=212 mov %nanido,3:goto *sirohebisama_start
lsp 700,":a;chara\sirohebisama_st02.bmp",0,0
bg "bg\bg090.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *sirohebisama_h



*zukan_walraune

mov $zname,"Walraune"
mov $zlavel,"walraune"
itoa2 $zukan_ko,%2690
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,6
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2690=0 mov %ryozyoku1,0
if %2690>0 mov %ryozyoku1,1
if %2690=0 mov %zukancg,0
if %2690>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"TT"
mov $zukan_hp,"PVOOO"
mov $zukan_skill1,"Confusing Pollen Handjob"
mov %zukan_skillc1,3924
mov $zukan_skill2,"Paralyzing Sap Blowjob"
mov %zukan_skillc2,3925
mov $zukan_skill3,"Ecstasy Sap Tit Fuck"
mov %zukan_skillc3,3926
mov $zukan_skill4,"Seduction Pollen Hair"
mov %zukan_skillc4,3927
mov $zukan_skill5,"Hell Tentacle"
mov %zukan_skillc5,3928
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_walraune_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\walraune.jpg",400,0
goto *zukan_kihonbtn



*zukan_walraune_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\walraune_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\walraune_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\walraune_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\walraune_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\walraune_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\walraune_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\walraune_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\walraune_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\walraune_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
return



*zukan_walraune_cg

lsp 500,":c;bg\bg093.bmp",0,0
lsp 430,":a;chara\walraune_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\walraune_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\walraune_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\walraune_h4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_walraune_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,75
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *walraune_start
if %bwait=211 mov %nanido,2:goto *walraune_start
if %bwait=212 mov %nanido,3:goto *walraune_start
lsp 700,":a;chara\walraune_st02.bmp",0,0
bg "bg\bg093.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *walraune_h



*zukan_dryad

mov $zname,"Dryad"
mov $zlavel,"dryad"
itoa2 $zukan_ko,%2691
mov %zukan_hyouzyonum,4
mov %zukan_pozunum,2
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,2
if %2839=0 mov %ryozyoku1,0
if %2839>0 mov %ryozyoku1,1
if %2840=0 mov %ryozyoku2,0
if %2840>0 mov %ryozyoku2,1
if %2691=0 mov %zukancg,0
if %2691>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"TV"
mov $zukan_hp,"QQOOO"
mov $zukan_skill1,"Arc Foot"
mov %zukan_skillc1,3917
mov $zukan_skill2,"Arc Blowjob"
mov %zukan_skillc2,3918
mov $zukan_skill3,"Arc Bust"
mov %zukan_skillc3,3919
mov $zukan_skill4,"Arc Ivy"
mov %zukan_skillc4,3920
mov $zukan_skill5,"Arc Hip Heaven"
mov %zukan_skillc5,3921
mov $zukan_skill6,"Sap of Ecstasy"
mov %zukan_skillc6,3922
mov $zukan_skill7,"Bloom of the Tree"
mov %zukan_skillc7,3923
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_dryad_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\dryad2.jpg",400,0
goto *zukan_kihonbtn



*zukan_dryad_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\dryad_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\dryad_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\dryad_st03.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\dryad_st04.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\dryad_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\dryad_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\dryad_st13.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=4 lsp 450,":a;chara\dryad_st14.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_bukkake1=1 lsp 441,":a;chara\dryad_bk01.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake1=1 lsp 441,":a;chara\dryad_bk11.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_pozu=1 && %zukan_bukkake2=1 lsp 442,":a;chara\dryad_bk02.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake2=1 lsp 442,":a;chara\dryad_bk12.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_pozu=1 && %zukan_bukkake3=1 lsp 443,":a;chara\dryad_bk03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake3=1 lsp 443,":a;chara\dryad_bk13.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_pozu=1 && %zukan_bukkake4=1 lsp 444,":a;chara\dryad_bk04.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake4=1 lsp 444,":a;chara\dryad_bk14.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
return



*zukan_dryad_cg

lsp 500,":c;bg\bg094.bmp",0,0
if %2839=0 skip 13
lsp 430,":a;chara\dryad_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dryad_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dryad_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dryad_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dryad_ha5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dryad_ha6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %2840=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dryad_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dryad_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dryad_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dryad_hb4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dryad_hb5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dryad_hb6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dryad_hb7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dryad_hb8.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dryad_hc1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dryad_hc2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dryad_hc3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dryad_hc4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dryad_hc5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dryad_hc6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dryad_hc7.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_dryad_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,75
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *dryad_start
if %bwait=211 mov %nanido,2:goto *dryad_start
if %bwait=212 mov %nanido,3:goto *dryad_start
if %bwait=213 lsp 700,":a;chara\dryad_st02.bmp",0,0
if %bwait=214 lsp 700,":a;chara\dryad_st12.bmp",0,0
bg "bg\bg094.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *dryad_ha
if %bwait=214 goto *dryad_hb



*zukan_queenalraune

mov $zname,"Queen Alraune"
mov $zlavel,"queenalraune"
itoa2 $zukan_ko,%2692
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,3
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2692=0 mov %ryozyoku1,0
if %2692>0 mov %ryozyoku1,1
if %2692=0 mov %zukancg,0
if %2692>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"VQ"
mov $zukan_hp,"QTOOO"
mov $zukan_skill1,"Cardinal Hands"
mov %zukan_skillc1,3929
mov $zukan_skill2,"Laurean Press"
mov %zukan_skillc2,3930
mov $zukan_skill3,"Queen Flower Squeeze"
mov %zukan_skillc3,3931
mov $zukan_skill4,"Squeezing Ivy Dance"
mov %zukan_skillc4,3932
mov $zukan_skill5,"Nectar of Ecstasy"
mov %zukan_skillc5,3933
mov $zukan_skill6,"Playful Vines"
mov %zukan_skillc6,3934
mov $zukan_skill7,"Milk of Ecstasy"
mov %zukan_skillc7,3935
mov $zukan_skill8,"Ecstasy Caress"
mov %zukan_skillc8,3936
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_queenalraune_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\queenalraune.jpg",400,0
goto *zukan_kihonbtn



*zukan_queenalraune_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\queenalraune_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\queenalraune_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\queenalraune_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\queenalraune_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\queenalraune_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\queenalraune_st13.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\queenalraune_st21.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\queenalraune_st22.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=3 lsp 450,":a;chara\queenalraune_st23.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\queenalraune_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\queenalraune_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\queenalraune_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\queenalraune_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_pozu=2 && %zukan_bukkake5=1 lsp 445,":a;chara\queenalraune_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_pozu=3 cspl 441,445
return



*zukan_queenalraune_cg

lsp 500,":c;bg\bg095.bmp",0,0
lsp 430,":c;chara\queenalraune_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\queenalraune_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\queenalraune_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\queenalraune_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\queenalraune_h5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\queenalraune_h6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\queenalraune_h7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\queenalraune_h8.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_queenalraune_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,75
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *queenalraune_start
if %bwait=211 mov %nanido,2:goto *queenalraune_start
if %bwait=212 mov %nanido,3:goto *queenalraune_start
lsp 700,":a;chara\queenalraune_st02.bmp",0,0
bg "bg\bg095.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *queenalraune_h



*zukan_slimelord

mov $zname,"Slime Bess"
mov $zlavel,"slimelord"
itoa2 $zukan_ko,%2693
mov %zukan_hyouzyonum,5
mov %zukan_pozunum,1
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2693=0 mov %ryozyoku1,0
if %2693>0 mov %ryozyoku1,1
if %2693=0 mov %zukancg,0
if %2693>0 mov %zukancg,1
mov %zukan_x1,-130
mov %zukan_x2,0
mov $zukan_lv,"TW"
mov $zukan_hp,"QPOOO"
mov $zukan_skill1,"Jelly Hands"
mov %zukan_skillc1,3937
mov $zukan_skill2,"Melty Bust"
mov %zukan_skillc2,3938
mov $zukan_skill3,"Slimy Hips"
mov %zukan_skillc3,3939
mov $zukan_skill4,"Slime Girl's Slimy Blowjob"
mov %zukan_skillc4,3940
mov $zukan_skill5,"Amoeba Haze"
mov %zukan_skillc5,3941
mov $zukan_skill6,"Amoeba Drain"
mov %zukan_skillc6,3942
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_slimelord_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\slimelord.jpg",400,0
goto *zukan_kihonbtn



*zukan_slimelord_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\slimelord_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\slimelord_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\slimelord_st03.bmp",%zukan_x0,0
if %zukan_hyouzyo=4 lsp 450,":a;chara\slimelord_st04.bmp",%zukan_x0,0
if %zukan_hyouzyo=5 lsp 450,":a;chara\slimelord_st05.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\slimelord_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\slimelord_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\slimelord_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\slimelord_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
return



*zukan_slimelord_cg

lsp 500,":c;bg\bg097.bmp",0,0
lsp 430,":a;chara\slimelord_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\slimelord_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\slimelord_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\slimelord_hb4.bmp",0,0
lsp 420,":a;chara\slimelord_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\slimelord_hb5.bmp",0,0
lsp 420,":a;chara\slimelord_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\slimelord_hb6.bmp",0,0
lsp 420,":a;chara\slimelord_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\slimelord_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\slimelord_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\slimelord_ha3.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_slimelord_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,75
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *slimelord_start
if %bwait=211 mov %nanido,2:goto *slimelord_start
if %bwait=212 mov %nanido,3:goto *slimelord_start
lsp 700,":a;chara\slimelord_st02.bmp",0,0
bg "bg\bg097.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *slimelord_h



*zukan_eggel

mov $zname,"Throne Eggiel"
mov $zlavel,"eggel"
itoa2 $zukan_ko,%2694
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2694=0 mov %ryozyoku1,0
if %2694>0 mov %ryozyoku1,1
if %2694=0 mov %zukancg,0
if %2694>0 mov %zukancg,1
mov %zukan_x1,-150
mov %zukan_x2,50
mov $zukan_lv,"PRT"
mov $zukan_hp,"QOOOO"
mov $zukan_skill1,"Angel Hair"
mov %zukan_skillc1,3943
mov $zukan_skill2,"Angel Feathers"
mov %zukan_skillc2,3944
mov $zukan_skill3,"Angel Mouth"
mov %zukan_skillc3,3945
mov $zukan_skill4,"Meltick Bubble"
mov %zukan_skillc4,3946
mov $zukan_skill5,"Felty Bubble"
mov %zukan_skillc5,3947
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_eggel_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\eggel.jpg",400,0
goto *zukan_kihonbtn



*zukan_eggel_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\eggel_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\eggel_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\eggel_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\eggel_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\eggel_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\eggel_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
return



*zukan_eggel_cg

lsp 500,":c;bg\bg097.bmp",0,0
lsp 430,":a;chara\eggel_ha1.bmp",50,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\eggel_ha2.bmp",50,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\eggel_ha3.bmp",50,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\eggel_ha4.bmp",50,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\eggel_ha5.bmp",50,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\eggel_hb1.bmp",50,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\eggel_hb2.bmp",50,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\eggel_hb3.bmp",50,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\eggel_hb4.bmp",50,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\eggel_hb5.bmp",50,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\eggel_hb6.bmp",50,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_eggel_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,75
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *eggel_start
if %bwait=211 mov %nanido,2:goto *eggel_start
if %bwait=212 mov %nanido,3:goto *eggel_start
lsp 700,":a;chara\eggel_st02.bmp",50,0
bg "bg\bg097.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Eggiel"
if %bwait=213 goto *eggel_h



*zukan_salamander2

mov $zname,"Salamander"
mov $zlavel,"salamander2"
mov $zukan_ko,"None "
mov %zukan_hyouzyonum,4
mov %zukan_pozunum,3
mov %zukan_bukkakenum,0
mov %zukan_sentounum,0
mov %zukan_ryozyokunum,1
mov %ryozyoku1,1
mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"WT"
mov $zukan_hp,"PUOOO"
mov %zukan_skillc1,0
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_salamander2_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\salamander2.jpg",400,0
goto *zukan_kihonbtn



*zukan_salamander2_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 && %zukan_hyouzyo=4 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,3
if %zukan_pozu=2 && %zukan_hyouzyo=3 mov %zukan_hyouzyo,1
if %zukan_pozu=2 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,2
if %zukan_pozu=3 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=3 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\salamander_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\salamander_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\salamander_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\salamander_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\salamander_st12.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\salamander_st21.bmp",%zukan_x0+235,85
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\salamander_st22.bmp",%zukan_x0+235,85
if %zukan_pozu=3 && %zukan_hyouzyo=3 lsp 450,":a;chara\salamander_st23.bmp",%zukan_x0+235,85
if %zukan_pozu=3 && %zukan_hyouzyo=4 lsp 450,":a;chara\salamander_st24.bmp",%zukan_x0+240,85
return



*zukan_salamander2_cg

lsp 500,":c;bg\bg097.bmp",0,0
lsp 430,":a;chara\salamander_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\salamander_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\salamander_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\salamander_hb4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_salamander2_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,75
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,0
mov %skill05,0
mov %item01,10
gosub *setwindow_01
lsp 700,":a;chara\salamander_st01.bmp",0,0
bg "bg\bg097.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *sean0367



*zukan_tutigumo

mov $zname,"Tsuchigumo"
mov $zlavel,"tutigumo"
itoa2 $zukan_ko,%2678
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,2
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2678=0 mov %ryozyoku1,0
if %2678>0 mov %ryozyoku1,1
if %2678=0 mov %zukancg,0
if %2678>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"TT"
mov $zukan_hp,"PXOOO"
mov $zukan_skill1,"Eight Foot Stroke"
mov %zukan_skillc1,3948
mov $zukan_skill2,"Pinching Monster Breasts"
mov %zukan_skillc2,3949
mov $zukan_skill3,"Silky Blowjob"
mov %zukan_skillc3,3950
mov $zukan_skill4,"Breast Milk of Passion"
mov %zukan_skillc4,3951
mov $zukan_skill5,"Male Binding Silk"
mov %zukan_skillc5,3952
mov $zukan_skill6,"Male Slurping Vagina"
mov %zukan_skillc6,3953
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_tutigumo_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\tsuchigumo.jpg",400,0
goto *zukan_kihonbtn



*zukan_tutigumo_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\tutigumo_st11.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\tutigumo_st12.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\tutigumo_st13.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\tutigumo_st01.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\tutigumo_st02.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\tutigumo_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\tutigumo_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\tutigumo_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\tutigumo_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\tutigumo_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
return



*zukan_tutigumo_cg

lsp 500,":c;bg\bg092.bmp",0,0
lsp 430,":a;chara\tutigumo_st02.bmp",0,0
lsp 420,":a;chara\tutigumo_ct01.bmp",300,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\tutigumo_ct02.bmp",300,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\tutigumo_ct03.bmp",300,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\tutigumo_ct04.bmp",300,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\tutigumo_ct11.bmp",300,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\tutigumo_ct12.bmp",300,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\tutigumo_ct13.bmp",300,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\tutigumo_ct21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\tutigumo_ct22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\tutigumo_ct23.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\tutigumo_ct24.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\tutigumo_ct25.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":c;chara\tutigumo_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\tutigumo_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\tutigumo_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\tutigumo_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\tutigumo_h5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\tutigumo_h6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\tutigumo_h7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\tutigumo_h8.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\tutigumo_h9.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_tutigumo_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,75
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,0
mov %skill05,4
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *tutigumo_start
if %bwait=211 mov %nanido,2:goto *tutigumo_start
if %bwait=212 mov %nanido,3:goto *tutigumo_start
lsp 700,":a;chara\tutigumo_st02.bmp",-20,0
bg "bg\bg092.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *tutigumo_h



*zukan_alakneload

mov $zname,"Arachne Lord"
mov $zlavel,"alakneload"
itoa2 $zukan_ko,%2677
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,2
if %2849=0 mov %ryozyoku1,0
if %2849>0 mov %ryozyoku1,1
if %2850=0 mov %ryozyoku2,0
if %2850>0 mov %ryozyoku2,1
if %2677=0 mov %zukancg,0
if %2677>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"TX"
mov $zukan_hp,"QOOOO"
mov $zukan_skill1,"Arachne Fellatio"
mov %zukan_skillc1,3954
mov $zukan_skill2,"Arachne Bust"
mov %zukan_skillc2,3955
mov $zukan_skill3,"Arachne Spinneret"
mov %zukan_skillc3,3956
mov $zukan_skill4,"Arachne Dibble"
mov %zukan_skillc4,3957
mov $zukan_skill5,"Arachne Ruin"
mov %zukan_skillc5,3958
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_alakneload_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\arachnelord.jpg",400,0
goto *zukan_kihonbtn



*zukan_alakneload_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\alakneload_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\alakneload_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\alakneload_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\alakneload_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\alakneload_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\alakneload_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\alakneload_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
return



*zukan_alakneload_cg

lsp 500,":c;bg\bg092.bmp",0,0
lsp 430,":a;chara\alakneload_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alakneload_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alakneload_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alakneload_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alakneload_ha5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alakneload_ha6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alakneload_ha7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alakneload_ha8.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %2849=0 skip 14
lsp 430,":a;chara\alakneload_hc1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\alakneload_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\alakneload_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\alakneload_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\alakneload_ct04.bmp",0,0
lsp 430,":a;chara\alakneload_hc2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alakneload_hc3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %2850=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\alakneload_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alakneload_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alakneload_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alakneload_hb4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alakneload_hb5.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_alakneload_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,75
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,0
mov %skill05,4
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *alakneload_start
if %bwait=211 mov %nanido,2:goto *alakneload_start
if %bwait=212 mov %nanido,3:goto *alakneload_start
if %bwait=213 lsp 700,":a;chara\alakneload_st02.bmp",0,0
if %bwait=214 lsp 700,":a;chara\alakneload_ha8.bmp",0,0
bg "bg\bg092.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *alakneload_ha
if %bwait=214 goto *alakneload_hb



*zukan_kumonomiko

mov $zname,"Spider Princess"
mov $zlavel,"kumonomiko"
itoa2 $zukan_ko,%2679
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,2
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2679=0 mov %ryozyoku1,0
if %2679>0 mov %ryozyoku1,1
if %2679=0 mov %zukancg,0
if %2679>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"VT"
mov $zukan_hp,"QROOO"
mov $zukan_skill1,"Arachne Thread"
mov %zukan_skillc1,3959
mov $zukan_skill2,"Ecstasy Blow"
mov %zukan_skillc2,3960
mov $zukan_skill3,"Poison Breasts"
mov %zukan_skillc3,3961
mov $zukan_skill4,"Rust Thread"
mov %zukan_skillc4,3962
mov $zukan_skill5,"Arachne Repro"
mov %zukan_skillc5,3963
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_kumonomiko_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\kumomiko.jpg",400,0
goto *zukan_kihonbtn



*zukan_kumonomiko_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\kumonomiko_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\kumonomiko_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\kumonomiko_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\kumonomiko_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\kumonomiko_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\kumonomiko_st13.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\kumonomiko_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\kumonomiko_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\kumonomiko_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\kumonomiko_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\kumonomiko_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_kumonomiko_cg

lsp 500,":c;bg\bg092.bmp",0,0
lsp 430,":a;chara\kumonomiko_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kumonomiko_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kumonomiko_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kumonomiko_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kumonomiko_ha5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kumonomiko_ha6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kumonomiko_ha7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kumonomiko_ha8.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kumonomiko_hb01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kumonomiko_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kumonomiko_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kumonomiko_ct03.bmp",0,0
lsp 430,":a;chara\kumonomiko_hb02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kumonomiko_ct04.bmp",0,0
lsp 430,":a;chara\kumonomiko_hb03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kumonomiko_ct05.bmp",0,0
lsp 430,":a;chara\kumonomiko_hb04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kumonomiko_ct06.bmp",0,0
lsp 430,":a;chara\kumonomiko_hb05.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kumonomiko_ct07.bmp",0,0
lsp 430,":a;chara\kumonomiko_hb06.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\kumonomiko_ct08.bmp",0,0
lsp 430,":a;chara\kumonomiko_hb07.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\kumonomiko_hb08.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kumonomiko_hb09.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\kumonomiko_hb10.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_kumonomiko_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,75
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,0
mov %skill05,4
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *kumonomiko_start
if %bwait=211 mov %nanido,2:goto *kumonomiko_start
if %bwait=212 mov %nanido,3:goto *kumonomiko_start
lsp 700,":a;chara\kumonomiko_st02.bmp",0,0
bg "bg\bg092.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *kumonomiko_h



*zukan_narcubus

mov $zname,"Naccubus"
mov $zlavel,"narcubus"
itoa2 $zukan_ko,%2699
mov %zukan_hyouzyonum,4
mov %zukan_pozunum,2
mov %zukan_bukkakenum,6
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2699=0 mov %ryozyoku1,0
if %2699>0 mov %ryozyoku1,1
if %2699=0 mov %zukancg,0
if %2699>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"TR"
mov $zukan_hp,"PXOOO"
mov $zukan_skill1,"Erection Check"
mov %zukan_skillc1,3964
mov $zukan_skill2,"Oral Penis Examination"
mov %zukan_skillc2,3965
mov $zukan_skill3,"Stepping Reaction Check"
mov %zukan_skillc3,3966
mov $zukan_skill4,"Tail Extraction Method"
mov %zukan_skillc4,3967
mov $zukan_skill5,"Syringe Extraction Method"
mov %zukan_skillc5,3968
mov $zukan_skill6,"Vaginal Male Examination Method A"
mov %zukan_skillc6,3969
mov $zukan_skill7,"Vaginal Male Examination Method B"
mov %zukan_skillc7,3970
mov $zukan_skill8,"Tail Semen Ejection Test"
mov %zukan_skillc8,4135
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_narcubus_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\naccubus.jpg",400,0
goto *zukan_kihonbtn



*zukan_narcubus_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\narcubus_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\narcubus_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\narcubus_st03.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\narcubus_st04.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\narcubus_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\narcubus_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\narcubus_st13.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=4 lsp 450,":a;chara\narcubus_st14.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_bukkake1=1 lsp 441,":a;chara\narcubus_bk01.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake1=1 lsp 441,":a;chara\narcubus_bk11.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_pozu=1 && %zukan_bukkake2=1 lsp 442,":a;chara\narcubus_bk02.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake2=1 lsp 442,":a;chara\narcubus_bk12.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_pozu=1 && %zukan_bukkake3=1 lsp 443,":a;chara\narcubus_bk03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake3=1 lsp 443,":a;chara\narcubus_bk13.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\narcubus_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\narcubus_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\narcubus_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
return



*zukan_narcubus_cg

lsp 500,":c;bg\bg103.bmp",0,0
lsp 430,":a;chara\narcubus_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\narcubus_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\narcubus_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\narcubus_hb4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\narcubus_hc1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\narcubus_hc2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\narcubus_hc3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\narcubus_hc4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\narcubus_hc5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\narcubus_hc6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\narcubus_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\narcubus_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\narcubus_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\narcubus_hd1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\narcubus_hd2.bmp",0,0
lsp 420,":a;chara\narcubus_bk07.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_narcubus_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,76
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,0
mov %skill05,4
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *narcubus_start
if %bwait=211 mov %nanido,2:goto *narcubus_start
if %bwait=212 mov %nanido,3:goto *narcubus_start
lsp 700,":a;chara\narcubus_st02.bmp",0,0
bg "bg\bg103.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *narcubus_h



*zukan_inps

mov $zname,"Imp"
mov $zlavel,"inps"
itoa2 $zukan_ko,%2698
mov %zukan_hyouzyonum,4
mov %zukan_pozunum,3
mov %zukan_bukkakenum,6
mov %zukan_sentounum,2
mov %zukan_ryozyokunum,2
if %2841=0 mov %ryozyoku1,0
if %2841>0 mov %ryozyoku1,1
if %2842=0 mov %ryozyoku2,0
if %2842>0 mov %ryozyoku2,1
if %2698=0 mov %zukancg,0
if %2698>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"S"
mov $zukan_hp,"TO"
mov $zukan_skill1,"Imp Handjob"
mov %zukan_skillc1,4129
mov $zukan_skill2,"Imp Blowjob"
mov %zukan_skillc2,4130
mov $zukan_skill3,"Imp Paizuri"
mov %zukan_skillc3,4131
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_inps_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\imp2.jpg",400,0
goto *zukan_kihonbtn



*zukan_inps_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu>1 && %zukan_hyouzyo=4 mov %zukan_hyouzyo,1
if %zukan_pozu>1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,3
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\inp_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\inp_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\inp_st03.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\inp_st04.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\inp_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\inp_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\inp_st13.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\inp_st21.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\inp_st22.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=3 lsp 450,":a;chara\inp_st23.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_bukkake1=1 lsp 441,":a;chara\inp_bk01.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake1=1 lsp 441,":a;chara\inp_bk11.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_bukkake1=1 lsp 441,":a;chara\inp_bk21.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_pozu=1 && %zukan_bukkake2=1 lsp 442,":a;chara\inp_bk02.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake2=1 lsp 442,":a;chara\inp_bk12.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_bukkake2=1 lsp 442,":a;chara\inp_bk22.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_pozu=1 && %zukan_bukkake3=1 lsp 443,":a;chara\inp_bk03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake3=1 lsp 443,":a;chara\inp_bk13.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_bukkake3=1 lsp 443,":a;chara\inp_bk23.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_pozu=1 && %zukan_bukkake4=1 lsp 444,":a;chara\inp_bk04.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake4=1 lsp 444,":a;chara\inp_bk14.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_bukkake4=1 lsp 444,":a;chara\inp_bk24.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_pozu=1 && %zukan_bukkake5=1 lsp 445,":a;chara\inp_bk05.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake5=1 lsp 445,":a;chara\inp_bk15.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_bukkake5=1 lsp 445,":a;chara\inp_bk25.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_pozu=1 && %zukan_bukkake6=1 lsp 446,":a;chara\inp_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
return



*zukan_inps_cg

lsp 500,":c;bg\bg103.bmp",0,0
lsp 430,":a;chara\inp_st02.bmp",0,0
lsp 431,":a;chara\inp_st12.bmp",-250,0
lsp 432,":a;chara\inp_st22.bmp",280,0
lsp 420,":a;chara\inp_ct21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\inp_ct22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 432
lsp 420,":a;chara\inp_ct11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\inp_ct12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 431
lsp 420,":a;chara\inp_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\inp_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
if %2841=0 skip 11
lsp 430,":a;chara\inp_he1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\inp_he2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\inp_he3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\inp_he4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\inp_he5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %2842=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\inp_hf1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\inp_hf2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\inp_hf3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\inp_hf4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_inps_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,76
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,0
mov %skill05,4
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *inps_start
if %bwait=211 mov %nanido,2:goto *inps_start
if %bwait=212 mov %nanido,3:goto *inps_start
if %bwait=213 lsp 700,":a;chara\inp_st01.bmp",0,0
if %bwait=214 lsp 698,":a;chara\inp_st01.bmp",0,0
if %bwait=214 lsp 699,":a;chara\inp_st11.bmp",-250,0
if %bwait=214 lsp 700,":a;chara\inp_st21.bmp",280,0
bg "bg\bg103.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *inps_ha
if %bwait=214 goto *inps_hb



*zukan_eva

mov $zname,"Eva"
mov $zlavel,"eva"
itoa2 $zukan_ko,%2700
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,2
mov %zukan_bukkakenum,9
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2700=0 mov %ryozyoku1,0
if %2700>0 mov %ryozyoku1,1
if %2700=0 mov %zukancg,0
if %2700>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"UW"
mov $zukan_hp,"QOOOO"
mov $zukan_skill1,"Succubus Handjob"
mov %zukan_skillc1,3971
mov $zukan_skill2,"Succubus Tit Fuck"
mov %zukan_skillc2,3972
mov $zukan_skill3,"Succubus Blowjob"
mov %zukan_skillc3,3973
mov $zukan_skill4,"Succubus Footjob"
mov %zukan_skillc4,3974
mov $zukan_skill5,"Succubus Armpit"
mov %zukan_skillc5,3975
mov $zukan_skill6,"Succubus Intercrural"
mov %zukan_skillc6,3976
mov $zukan_skill7,"Succubus Hip Swing"
mov %zukan_skillc7,3977
mov $zukan_skill8,"Energy Drain"
mov %zukan_skillc8,3978
mov $zukan_skill9,"Succubus Ass Press"
mov %zukan_skillc9,3979
mov $zukan_skill10,"Tail Drain"
mov %zukan_skillc10,3980
mov $zukan_skill11,"Succubus Facesitting Milking"
mov %zukan_skillc11,3981
mov $zukan_skill12,"Succubus Facesitting Sucking"
mov %zukan_skillc12,3982
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_eva_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\eva.jpg",400,0
goto *zukan_kihonbtn



*zukan_eva_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=2 mov %zukan_hyouzyonum,1
if %zukan_pozu<>2 mov %zukan_hyouzyonum,3
if %zukan_pozu=1 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=2 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\eva_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\eva_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\eva_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 lsp 450,":a;chara\eva_st11.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_bukkake1=1 lsp 441,":a;chara\eva_bk01.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake1=1 lsp 441,":a;chara\eva_bk11.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_pozu=1 && %zukan_bukkake2=1 lsp 442,":a;chara\eva_bk02.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake2=1 lsp 442,":a;chara\eva_bk12.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_pozu=1 && %zukan_bukkake3=1 lsp 443,":a;chara\eva_bk03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake3=1 lsp 443,":a;chara\eva_bk13.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_pozu=1 && %zukan_bukkake4=1 lsp 444,":a;chara\eva_bk04.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake4=1 lsp 444,":a;chara\eva_bk14.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_pozu=1 && %zukan_bukkake5=1 lsp 445,":a;chara\eva_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_pozu=1 && %zukan_bukkake6=1 lsp 446,":a;chara\eva_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
if %zukan_pozu=1 && %zukan_bukkake7=1 lsp 447,":a;chara\eva_bk07.bmp",%zukan_x0,0
if %zukan_bukkake7=0 csp 447
if %zukan_pozu=1 && %zukan_bukkake8=1 lsp 448,":a;chara\eva_bk08.bmp",%zukan_x0,0
if %zukan_bukkake8=0 csp 448
if %zukan_pozu=1 && %zukan_bukkake9=1 lsp 449,":a;chara\eva_bk09.bmp",%zukan_x0,0
if %zukan_bukkake9=0 csp 449
return



*zukan_eva_cg

lsp 500,":c;bg\bg106.bmp",0,0
lsp 430,":a;chara\eva_st02.bmp",0,0
lsp 420,":a;chara\eva_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\eva_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\eva_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\eva_ct04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\eva_ct11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\eva_ct12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\eva_ct13.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\eva_ct14.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\eva_ct21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\eva_ct22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\eva_ct23.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\eva_ct24.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\eva_ct31.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\eva_ct32.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\eva_ct33.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\eva_ct34.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\eva_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\eva_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\eva_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\eva_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\eva_ha5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\eva_ha6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\eva_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\eva_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\eva_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\eva_hb4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\eva_hb5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\eva_hb6.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_eva_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,76
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,0
mov %skill05,4
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *eva_start
if %bwait=211 mov %nanido,2:goto *eva_start
if %bwait=212 mov %nanido,3:goto *eva_start
lsp 700,":a;chara\eva_st02.bmp",0,0
bg "bg\bg106.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *eva_h



*zukan_trooperloid

mov $zname,"Trooperoid"
mov $zlavel,"trooperloid"
itoa2 $zukan_ko,%2685
mov %zukan_hyouzyonum,5
mov %zukan_pozunum,2
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2685=0 mov %ryozyoku1,0
if %2685>0 mov %ryozyoku1,1
if %2685=0 mov %zukancg,0
if %2685>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"WO"
mov $zukan_hp,"QOOOO"
mov $zukan_skill1,"Exploitative Fellatio"
mov %zukan_skillc1,3985
mov $zukan_skill2,"Soft Breast Units"
mov %zukan_skillc2,3986
mov $zukan_skill3,"Vacuum Unit"
mov %zukan_skillc3,3987
mov $zukan_skill4,"Trooper Rape"
mov %zukan_skillc4,3988
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_trooperloid_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\trooperroid.jpg",400,0
goto *zukan_kihonbtn



*zukan_trooperloid_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=2 && %zukan_hyouzyo=5 mov %zukan_hyouzyo,1
if %zukan_pozu=2 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,4
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\trooperloid_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\trooperloid_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\trooperloid_st03.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\trooperloid_st04.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=5 lsp 450,":a;chara\trooperloid_st05.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\trooperloid_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\trooperloid_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\trooperloid_st13.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=4 lsp 450,":a;chara\trooperloid_st14.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\trooperloid_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\trooperloid_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\trooperloid_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\trooperloid_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\trooperloid_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\trooperloid_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
if %zukan_bukkake7=1 lsp 447,":a;chara\trooperloid_bk07.bmp",%zukan_x0,0
if %zukan_bukkake7=0 csp 447
if %zukan_bukkake8=1 lsp 448,":a;chara\trooperloid_bk08.bmp",%zukan_x0,0
if %zukan_bukkake8=0 csp 448
return



*zukan_trooperloid_cg

lsp 500,":c;bg\bg122.bmp",0,0
lsp 430,":a;chara\trooperloid_st01.bmp",0,0
lsp 420,":a;chara\trooperloid_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\trooperloid_ct11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\trooperloid_ct12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\trooperloid_ct21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\trooperloid_ct22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\trooperloid_ct23.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\trooperloid_ct24.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\trooperloid_ct25.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\trooperloid_ct26.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":c;chara\trooperloid_ha01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha05.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha06.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha07.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha08.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha09.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha10.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha13.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha14.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha15.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha16.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha17.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha18.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha19.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha20.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha23.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha24.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha25.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha26.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha27.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha28.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha29.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha30.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha31.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha32.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha33.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha34.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha35.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha36.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha37.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha38.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_ha39.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_hb01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_hb02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\trooperloid_hb05.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_trooperloid_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,76
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,0
mov %skill05,4
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *trooperloid_start
if %bwait=211 mov %nanido,2:goto *trooperloid_start
if %bwait=212 mov %nanido,3:goto *trooperloid_start
lsp 700,":a;chara\trooperloid_st02.bmp",0,0
bg "bg\bg122.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *trooperloid_h



*zukan_assassinloid

mov $zname,"Assassinroid"
mov $zlavel,"assassinloid"
itoa2 $zukan_ko,%2702
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,3
mov %zukan_bukkakenum,6
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2702=0 mov %ryozyoku1,0
if %2702>0 mov %ryozyoku1,1
if %2702=0 mov %zukancg,0
if %2702>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"WW"
mov $zukan_hp,"QTOOO"
mov $zukan_skill1,"Assassin's Hand"
mov %zukan_skillc1,4134
mov $zukan_skill2,"Assassin's Blowjob"
mov %zukan_skillc2,3989
mov $zukan_skill3,"Assassin's Bust"
mov %zukan_skillc3,3990
mov $zukan_skill4,"Assassin's Ass"
mov %zukan_skillc4,3991
mov $zukan_skill5,"Assassin's Foot"
mov %zukan_skillc5,3992
mov $zukan_skill6,"Second Genital Suck"
mov %zukan_skillc6,3993
mov $zukan_skill7,"First Genital Mating"
mov %zukan_skillc7,3994
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_assassinloid_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\assassinroid.jpg",400,0
goto *zukan_kihonbtn



*zukan_assassinloid_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu<3 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu<3 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=3 && %zukan_hyouzyo=5 mov %zukan_hyouzyo,1
if %zukan_pozu=3 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,6
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\assassinloid_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\assassinloid_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\assassinloid_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\assassinloid_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\assassinloid_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\assassinloid_st13.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\assassinloid_st21.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\assassinloid_st22.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=3 lsp 450,":a;chara\assassinloid_st23.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=4 lsp 450,":a;chara\assassinloid_st24.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=5 lsp 450,":a;chara\assassinloid_st25.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_bukkake1=1 lsp 441,":a;chara\assassinloid_bk01.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake1=1 lsp 441,":a;chara\assassinloid_bk11.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_pozu=1 && %zukan_bukkake2=1 lsp 442,":a;chara\assassinloid_bk02.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake2=1 lsp 442,":a;chara\assassinloid_bk12.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_pozu=1 && %zukan_bukkake3=1 lsp 443,":a;chara\assassinloid_bk03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake3=1 lsp 443,":a;chara\assassinloid_bk13.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_pozu=1 && %zukan_bukkake4=1 lsp 444,":a;chara\assassinloid_bk04.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake4=1 lsp 444,":a;chara\assassinloid_bk14.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_pozu=1 && %zukan_bukkake5=1 lsp 445,":a;chara\assassinloid_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_pozu=1 && %zukan_bukkake6=1 lsp 446,":a;chara\assassinloid_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
return



*zukan_assassinloid_cg

lsp 500,":c;bg\bg122.bmp",0,0
lsp 430,":a;chara\assassinloid_st02.bmp",0,0
lsp 420,":a;chara\assassinloid_ct21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\assassinloid_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\assassinloid_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\assassinloid_ct11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\assassinloid_ct12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\assassinloid_ct13.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\assassinloid_ct14.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\assassinloid_st24.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\assassinloid_st25.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_st31.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_st32.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb05.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb06.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb07.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb08.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb09.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb10.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb13.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb14.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb15.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb16.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb17.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb18.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb19.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb20.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb23.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb24.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb25.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb26.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb27.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb28.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb29.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb30.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb31.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb32.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb33.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb34.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb35.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hb36.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hc21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hc22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\assassinloid_hc27.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_assassinloid_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,76
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,0
mov %skill05,4
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *assassinloid_start
if %bwait=211 mov %nanido,2:goto *assassinloid_start
if %bwait=212 mov %nanido,3:goto *assassinloid_start
lsp 700,":a;chara\assassinloid_st02.bmp",0,0
bg "bg\bg122.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *assassinloid_h



*zukan_yomotu

mov $zname,"Yomotsu-Shikome"
mov $zlavel,"yomotu"
itoa2 $zukan_ko,%2703
mov %zukan_hyouzyonum,1
mov %zukan_pozunum,1
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2703=0 mov %ryozyoku1,0
if %2703>0 mov %ryozyoku1,1
if %2703=0 mov %zukancg,0
if %2703>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"UT"
mov $zukan_hp,"PXOOO"
mov $zukan_skill1,"Lewd Hair Tighten"
mov %zukan_skillc1,3995
mov $zukan_skill2,"Lewd Hair Stroke"
mov %zukan_skillc2,3996
mov $zukan_skill3,"Lewd Hair Draining"
mov %zukan_skillc3,3997
mov $zukan_skill4,"3,000 Lewd Strands"
mov %zukan_skillc4,3998
mov $zukan_skill5,"Lewd Hair Hell"
mov %zukan_skillc5,4128
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_yomotu_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\yomotsu.jpg",400,0
goto *zukan_kihonbtn



*zukan_yomotu_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\yomotu_st01.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\yomotu_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\yomotu_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\yomotu_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\yomotu_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
return



*zukan_yomotu_cg

lsp 500,":c;bg\bg115.bmp",0,0
lsp 430,":a;chara\yomotu_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\yomotu_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\yomotu_h3.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_yomotu_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,76
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,0
mov %skill05,4
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *yomotu_start
if %bwait=211 mov %nanido,2:goto *yomotu_start
if %bwait=212 mov %nanido,3:goto *yomotu_start
lsp 700,":a;chara\yomotu_st01.bmp",0,0
bg "bg\bg115.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *yomotu_h



*zukan_wormiel

mov $zname,"Cherub Wormiel"
mov $zlavel,"wormiel"
itoa2 $zukan_ko,%2704
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2704=0 mov %ryozyoku1,0
if %2704>0 mov %ryozyoku1,1
if %2704=0 mov %zukancg,0
if %2704>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PSO"
mov $zukan_hp,"QROOO"
mov $zukan_skill1,"Worm Surface"
mov %zukan_skillc1,4000
mov $zukan_skill2,"Worm Ceres"
mov %zukan_skillc2,4001
mov $zukan_skill3,"Prey Play"
mov %zukan_skillc3,4002
mov $zukan_skill4,"Lewd Tentacle Hell"
mov %zukan_skillc4,4003
mov $zukan_skill5,"Breast Wrapping"
mov %zukan_skillc5,4133
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_wormiel_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\wormiel.jpg",400,0
goto *zukan_kihonbtn



*zukan_wormiel_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\wormiel_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\wormiel_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\wormiel_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\wormiel_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\wormiel_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\wormiel_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
return



*zukan_wormiel_cg

lsp 500,":c;bg\bg115.bmp",0,0
lsp 430,":a;chara\wormiel_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\wormiel_ct01.bmp",0,0
lsp 430,":a;chara\wormiel_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\wormiel_ct02.bmp",0,0
lsp 430,":a;chara\wormiel_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\wormiel_ct03.bmp",0,0
lsp 430,":a;chara\wormiel_hb4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\wormiel_ct04.bmp",0,0
lsp 430,":a;chara\wormiel_hb5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\wormiel_hb6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\wormiel_ct05.bmp",0,0
lsp 430,":a;chara\wormiel_hb7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\wormiel_ct06.bmp",0,0
lsp 430,":a;chara\wormiel_hb8.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\wormiel_ha01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\wormiel_ha02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\wormiel_ha03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\wormiel_ha04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\wormiel_ha05.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\wormiel_ha06.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\wormiel_ha07.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\wormiel_ha08.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\wormiel_ha09.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\wormiel_ha10.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_wormiel_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,76
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,0
mov %skill05,4
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *wormiel_start
if %bwait=211 mov %nanido,2:goto *wormiel_start
if %bwait=212 mov %nanido,3:goto *wormiel_start
lsp 700,":a;chara\wormiel_st02.bmp",0,0
bg "bg\bg115.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Wormiel"
if %bwait=213 goto *wormiel_h



*zukan_undine2

mov $zname,"Undine"
mov $zlavel,"undine2"
mov $zukan_ko,"None "
mov %zukan_hyouzyonum,4
mov %zukan_pozunum,3
mov %zukan_bukkakenum,0
mov %zukan_sentounum,0
mov %zukan_ryozyokunum,1
mov %ryozyoku1,1
mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"UT"
mov $zukan_hp,"PQOOO"
mov %zukan_skillc1,0
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_undine2_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\undine2.jpg",400,0
goto *zukan_kihonbtn



*zukan_undine2_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=2 mov %zukan_hyouzyonum,1
if %zukan_pozu<>2 mov %zukan_hyouzyonum,4
if %zukan_pozu=1 && %zukan_hyouzyo=4 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,3
if %zukan_pozu=2 mov %zukan_hyouzyo,1
if %zukan_pozu=3 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=3 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\undine_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\undine_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\undine_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 lsp 450,":a;chara\undine_st11.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\undine_st21.bmp",%zukan_x0+226,144
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\undine_st22.bmp",%zukan_x0+226,144
if %zukan_pozu=3 && %zukan_hyouzyo=3 lsp 450,":a;chara\undine_st23.bmp",%zukan_x0+226,144
if %zukan_pozu=3 && %zukan_hyouzyo=4 lsp 450,":a;chara\undine_st24.bmp",%zukan_x0+227,145
return



*zukan_undine2_cg

lsp 500,":c;bg\bg115.bmp",0,0
lsp 430,":a;chara\undine_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\undine_ct11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\undine_ct12.bmp",0,0
lsp 430,":a;chara\undine_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\undine_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\undine_ct13.bmp",0,0
lsp 430,":a;chara\undine_hb4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_undine2_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,76
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,0
mov %skill05,4
mov %item01,10
gosub *setwindow_01
lsp 700,":a;chara\undine_st02.bmp",0,0
bg "bg\bg115.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *sean0382



*zukan_alice4

mov $zname,"Alice"
mov $zlavel,"alice4"
mov $zukan_ko,"None "
mov %zukan_hyouzyonum,10
mov %zukan_pozunum,2
mov %zukan_bukkakenum,0
mov %zukan_sentounum,0
mov %zukan_ryozyokunum,1
mov %ryozyoku1,1
mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PST"
mov $zukan_hp,"RQOOO"
mov %zukan_skillc1,0
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_alice4_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\alice4.jpg",400,0
goto *zukan_kihonbtn



*zukan_alice4_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=2 && %zukan_hyouzyo=4 mov %zukan_hyouzyo,1
if %zukan_pozu=2 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,3
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\alice_st71.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\alice_st72.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\alice_st73.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\alice_st74.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=5 lsp 450,":a;chara\alice_st75.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=6 lsp 450,":a;chara\alice_st76.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=7 lsp 450,":a;chara\alice_st77.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=8 lsp 450,":a;chara\alice_st79.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=9 lsp 450,":a;chara\alice_st81.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=10 lsp 450,":a;chara\alice_st82.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\alice_st92.bmp",%zukan_x0+250,150
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\alice_st93.bmp",%zukan_x0+250,115
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\alice_st94.bmp",%zukan_x0+225,200
return



*zukan_alice4_cg

lsp 500,":c;bg\bg195.bmp",0,0
lsp 430,":a;chara\alice_H10_1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_H10_2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_H10_3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_H10_4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_H10_5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_H10_6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_H10_7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_H10_8.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_H10_9.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_alice4_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,77
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,4
mov %skill05,4
mov %item01,10
gosub *setwindow_01
lsp 700,":a;chara\alice_st72.bmp",0,0
bg "bg\bg195.bmp",10,1500
bgm "bgm\hutuu1.ogg"
if %bwait=213 goto *sean0383



*zukan_drainplant

mov $zname,"Drain Plant"
mov $zlavel,"drainplant"
itoa2 $zukan_ko,%2710
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,2
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2710=0 mov %ryozyoku1,0
if %2710>0 mov %ryozyoku1,1
if %2710=0 mov %zukancg,0
if %2710>0 mov %zukancg,1
mov %zukan_x1,0
mov %zukan_x2,200
mov $zukan_lv,"UW"
mov $zukan_hp,"PWOOO"
mov $zukan_skill1,"Plant Flirtation"
mov %zukan_skillc1,4004
mov $zukan_skill2,"Infinite Plant Fertilization"
mov %zukan_skillc2,4005
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_drainplant_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\drainplant.jpg",400,0
goto *zukan_kihonbtn



*zukan_drainplant_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\drainplant_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\drainplant_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\drainplant_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\drainplant_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\drainplant_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
return



*zukan_drainplant_cg

lsp 500,":c;bg\bg197.bmp",0,0
lsp 430,":a;chara\drainplant_st11.bmp",200,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\drainplant_ct01.bmp",480,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\drainplant_ct02.bmp",480,0
lsp 430,":a;chara\drainplant_st12.bmp",200,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\drainplant_ct03.bmp",480,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\drainplant_ct04.bmp",480,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\drainplant_ct05.bmp",480,0
lsp 430,":a;chara\drainplant_st13.bmp",200,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_drainplant_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,77
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,4
mov %skill05,4
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *drainplant_start
if %bwait=211 mov %nanido,2:goto *drainplant_start
if %bwait=212 mov %nanido,3:goto *drainplant_start
lsp 700,":a;chara\drainplant_st02.bmp",200,0
bg "bg\bg197.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *drainplant_h



*zukan_drainloid

mov $zname,"Drainroid"
mov $zlavel,"drainloid"
itoa2 $zukan_ko,%2711
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2711=0 mov %ryozyoku1,0
if %2711>0 mov %ryozyoku1,1
if %2711=0 mov %zukancg,0
if %2711>0 mov %zukancg,1
mov %zukan_x1,-150
mov %zukan_x2,0
mov $zukan_lv,"WT"
mov $zukan_hp,"QROOO"
mov $zukan_skill1,"Handjob Arm"
mov %zukan_skillc1,4006
mov $zukan_skill2,"Semen Sucking Mouth Unit"
mov %zukan_skillc2,4007
mov $zukan_skill3,"Artificial Breast Units"
mov %zukan_skillc3,4008
mov $zukan_skill4,"Multiple Sucking Unit"
mov %zukan_skillc4,4009
mov $zukan_skill5,"Sex Simulation Unit"
mov %zukan_skillc5,4010
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_drainloid_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\drainroid.jpg",400,0
goto *zukan_kihonbtn



*zukan_drainloid_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\drainloid_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\drainloid_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\drainloid_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\drainloid_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\drainloid_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\drainloid_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\drainloid_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\drainloid_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_drainloid_cg

lsp 500,":c;bg\bg199.bmp",0,0
lsp 430,":a;chara\drainloid_st02.bmp",0,0
lsp 420,":a;chara\drainloid_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\drainloid_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\drainloid_ct11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\drainloid_st21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\drainloid_st22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\drainloid_st31.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\drainloid_st32.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\drainloid_st11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\drainloid_st23.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\drainloid_st24.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\drainloid_st33.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\drainloid_st34.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha05.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha06.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha07.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha08.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha09.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha10.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha13.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha14.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha15.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha16.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha17.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha18.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha19.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha20.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha23.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha24.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha25.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha26.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha27.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha28.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha29.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha30.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha31.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha32.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha33.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha34.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha35.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha36.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha37.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha38.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha39.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\drainloid_ha40.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_drainloid_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,77
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,4
mov %skill05,4
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *drainloid_start
if %bwait=211 mov %nanido,2:goto *drainloid_start
if %bwait=212 mov %nanido,3:goto *drainloid_start
bg black,10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *drainloid_h



*zukan_replicant

mov $zname,"Replicant"
mov $zlavel,"replicant"
itoa2 $zukan_ko,%2712
mov %zukan_hyouzyonum,2
mov %zukan_pozunum,2
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2712=0 mov %ryozyoku1,0
if %2712>0 mov %ryozyoku1,1
if %2712=0 mov %zukancg,0
if %2712>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"WW"
mov $zukan_hp,"QOOOO"
mov $zukan_skill1,"Flats Chest"
mov %zukan_skillc1,4011
mov $zukan_skill2,"Enigma Tentacle"
mov %zukan_skillc2,4012
mov $zukan_skill3,"Tristram Hands"
mov %zukan_skillc3,4013
mov $zukan_skill4,"Predatory Mating"
mov %zukan_skillc4,4014
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_replicant_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\replicant.jpg",400,0
goto *zukan_kihonbtn



*zukan_replicant_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=2 mov %zukan_hyouzyonum,1
if %zukan_pozu<>2 mov %zukan_hyouzyonum,2
if %zukan_pozu=1 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=2 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\replicant_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\replicant_st02.bmp",%zukan_x0,0
if %zukan_pozu=2 lsp 450,":a;chara\replicant_st11.bmp",%zukan_x0,0
if %zukan_hyouzyo=1 && %zukan_bukkake1=1 lsp 441,":a;chara\replicant_bk01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 && %zukan_bukkake1=1 lsp 441,":a;chara\replicant_bk11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake1=1 lsp 441,":a;chara\replicant_bk11.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\replicant_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\replicant_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\replicant_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
return



*zukan_replicant_cg

lsp 500,":c;bg\bg199.bmp",0,0
lsp 430,":a;chara\replicant_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\replicant_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\replicant_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\replicant_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\replicant_h5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\replicant_h6.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_replicant_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,77
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,4
mov %skill05,4
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *replicant_start
if %bwait=211 mov %nanido,2:goto *replicant_start
if %bwait=212 mov %nanido,3:goto *replicant_start
lsp 700,":a;chara\replicant_st02.bmp",0,0
bg "bg\bg199.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *replicant_h



*zukan_laplace

mov $zname,"Laplace"
mov $zlavel,"laplace"
itoa2 $zukan_ko,%2713
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,8
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2713=0 mov %ryozyoku1,0
if %2713>0 mov %ryozyoku1,1
if %2713=0 mov %zukancg,0
if %2713>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PPW"
mov $zukan_hp,"QSOOO"
mov $zukan_skill1,"Laplace's Fingers"
mov %zukan_skillc1,4015
mov $zukan_skill2,"Three Lip Style"
mov %zukan_skillc2,4016
mov $zukan_skill3,"Ultrasmall Breast Units"
mov %zukan_skillc3,4017
mov $zukan_skill4,"S-Type Mellow Enema"
mov %zukan_skillc4,4018
mov $zukan_skill5,"L-Type Drain Hole"
mov %zukan_skillc5,4019
mov $zukan_skill6,"Artificial Pussy: LO-LI"
mov %zukan_skillc6,4020
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_laplace_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\laplace.jpg",400,0
goto *zukan_kihonbtn



*zukan_laplace_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\laplace_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\laplace_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\laplace_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\laplace_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\laplace_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\laplace_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\laplace_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\laplace_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\laplace_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
if %zukan_bukkake7=1 lsp 447,":a;chara\laplace_bk07.bmp",%zukan_x0,0
if %zukan_bukkake7=0 csp 447
if %zukan_bukkake8=1 lsp 448,":a;chara\laplace_bk08.bmp",%zukan_x0,0
if %zukan_bukkake8=0 csp 448
return



*zukan_laplace_cg

lsp 500,":c;bg\bg199.bmp",0,0
lsp 430,":a;chara\laplace_st02.bmp",0,0
lsp 420,":a;chara\laplace_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\laplace_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\laplace_ct11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\laplace_ct12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\laplace_ct21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\laplace_ct22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\laplace_ct31.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":c;chara\laplace_ha11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\laplace_ha12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\laplace_ha13.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\laplace_ha14.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\laplace_hb01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\laplace_hb02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\laplace_hb03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\laplace_hb04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\laplace_hb05.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\laplace_hb06.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\laplace_hb07.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\laplace_hb08.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\laplace_hb09.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\laplace_hb10.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\laplace_hb11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\laplace_hb12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\laplace_hb13.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\laplace_hb14.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\laplace_hb15.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\laplace_hb16.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\laplace_hb17.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\laplace_hb18.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\laplace_hb19.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\laplace_hb20.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\laplace_hb21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\laplace_hb22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\laplace_hb23.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\laplace_hb24.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\laplace_hb25.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\laplace_hb26.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\laplace_hb27.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_laplace_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,77
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,4
mov %skill05,4
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *laplace_start
if %bwait=211 mov %nanido,2:goto *laplace_start
if %bwait=212 mov %nanido,3:goto *laplace_start
lsp 700,":a;chara\laplace_st02.bmp",0,0
bg "bg\bg199.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *laplace_h



*zukan_AD5

mov $zname,"Experimental Organism AD-5"
mov $zlavel,"AD5"
mov $zukan_ko,"None "
mov %zukan_hyouzyonum,1
mov %zukan_pozunum,1
mov %zukan_bukkakenum,0
mov %zukan_sentounum,0
mov %zukan_ryozyokunum,1
mov %ryozyoku1,1
mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"SO"
mov $zukan_hp,"VOOO"
mov %zukan_skillc1,0
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_AD5_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\ad5.jpg",400,0
goto *zukan_kihonbtn



*zukan_AD5_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\AD-5_st01.bmp",%zukan_x0,0
return



*zukan_AD5_cg

lsp 500,":c;bg\bg202.bmp",0,0
lsp 430,":a;chara\AD-5_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\AD-5_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\AD-5_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\AD-5_h4.bmp",0,0
lsp 420,":a;chara\AD-5_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\AD-5_h5.bmp",0,0
lsp 420,":a;chara\AD-5_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\AD-5_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\AD-5_ct04.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_AD5_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,77
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,4
mov %skill05,4
mov %item01,10
gosub *setwindow_01
bg "bg\bg201.bmp",10,1500
if %bwait=213 goto *sean0389a



*zukan_fermesara

mov $zname,"Ferme Sara"
mov $zlavel,"fermesara"
itoa2 $zukan_ko,%2705
mov %zukan_hyouzyonum,1
mov %zukan_pozunum,1
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2705=0 mov %ryozyoku1,0
if %2705>0 mov %ryozyoku1,1
if %2705=0 mov %zukancg,0
if %2705>0 mov %zukancg,1
mov %zukan_x1,-180
mov %zukan_x2,0
mov $zukan_lv,"VO"
mov $zukan_hp,"QQOOO"
mov $zukan_skill1,"Gaia's Handjob"
mov %zukan_skillc1,4021
mov $zukan_skill2,"Judgement Fellatio"
mov %zukan_skillc2,4022
mov $zukan_skill3,"Isis' Lovemaking"
mov %zukan_skillc3,4023
mov $zukan_skill4,"Ancient Sexual Style: Burial"
mov %zukan_skillc4,4024
mov $zukan_skill5,"Ancient Sexual Style: Rape"
mov %zukan_skillc5,4025
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_fermesara_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\fermesara.jpg",400,0
goto *zukan_kihonbtn



*zukan_fermesara_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\fermesara_st01.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\fermesara_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\fermesara_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\fermesara_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\fermesara_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
return



*zukan_fermesara_cg

lsp 500,":c;bg\bg202.bmp",0,0
lsp 430,":a;chara\fermesara_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\fermesara_ct01.bmp",410,210
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\fermesara_ct02.bmp",410,210
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\fermesara_ct03.bmp",410,210
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\fermesara_ct11.bmp",0,210
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\fermesara_ct12.bmp",0,210
lsp 430,":a;chara\fermesara_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\fermesara_ct13.bmp",0,210
lsp 430,":a;chara\fermesara_h3.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_fermesara_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,77
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,4
mov %skill05,4
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *fermesara_start
if %bwait=211 mov %nanido,2:goto *fermesara_start
if %bwait=212 mov %nanido,3:goto *fermesara_start
lsp 700,":a;chara\fermesara_st01.bmp",0,0
bg "bg\bg202.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *fermesara_h



*zukan_angelghoul

mov $zname,"Angel Ghoul"
mov $zlavel,"angelghoul"
itoa2 $zukan_ko,%2706
mov %zukan_hyouzyonum,1
mov %zukan_pozunum,1
mov %zukan_bukkakenum,6
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2706=0 mov %ryozyoku1,0
if %2706>0 mov %ryozyoku1,1
if %2706=0 mov %zukancg,0
if %2706>0 mov %zukancg,1
mov %zukan_x1,-180
mov %zukan_x2,0
mov $zukan_lv,"VT"
mov $zukan_hp,"QQOOO"
mov $zukan_skill1,"Fallen Hand"
mov %zukan_skillc1,4026
mov $zukan_skill2,"Hungry Mouth"
mov %zukan_skillc2,4027
mov $zukan_skill3,"Discarded Breasts"
mov %zukan_skillc3,4028
mov $zukan_skill4,"Roasting Hair"
mov %zukan_skillc4,4029
mov $zukan_skill5,"Concealing Ass"
mov %zukan_skillc5,4030
mov $zukan_skill6,"Immoral Necrophilia"
mov %zukan_skillc6,4031
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_angelghoul_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\angelghoul.jpg",400,0
goto *zukan_kihonbtn



*zukan_angelghoul_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\angelghoul_st01.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\angelghoul_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\angelghoul_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\angelghoul_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\angelghoul_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\angelghoul_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\angelghoul_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
return



*zukan_angelghoul_cg

lsp 500,":c;bg\bg204.bmp",0,0
lsp 430,":a;chara\angelghoul_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\angelghoul_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\angelghoul_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\angelghoul_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\angelghoul_ct04.bmp",0,0
return "*zukan_"+$zlavel



*zukan_angelghoul_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,77
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,4
mov %skill05,4
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *angelghoul_start
if %bwait=211 mov %nanido,2:goto *angelghoul_start
if %bwait=212 mov %nanido,3:goto *angelghoul_start
lsp 700,":a;chara\angelghoul_st01.bmp",0,0
bg "bg\bg204.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *angelghoul_h



*zukan_dragonzonbe

mov $zname,"Zombie Dragon Girl"
mov $zlavel,"dragonzonbe"
itoa2 $zukan_ko,%2707
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,3
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2707=0 mov %ryozyoku1,0
if %2707>0 mov %ryozyoku1,1
if %2707=0 mov %zukancg,0
if %2707>0 mov %zukancg,1
mov %zukan_x1,0
mov %zukan_x2,0
mov $zukan_lv,"WV"
mov $zukan_hp,"QSOOO"
mov $zukan_skill1,"Dead Dragon's Fellatio"
mov %zukan_skillc1,4032
mov $zukan_skill2,"Dead Dragon's Horny Chest"
mov %zukan_skillc2,4033
mov $zukan_skill3,"Dead Dragon's Sweet Bite"
mov %zukan_skillc3,4034
mov $zukan_skill4,"Male Lure: Hair"
mov %zukan_skillc4,4035
mov $zukan_skill5,"Male Lure: Chest"
mov %zukan_skillc5,4036
mov $zukan_skill6,"Male Lure: Double"
mov %zukan_skillc6,4037
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_dragonzonbe_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\dragonzombie.jpg",400,0
goto *zukan_kihonbtn



*zukan_dragonzonbe_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=2 mov %zukan_hyouzyonum,1
if %zukan_pozu<>2 mov %zukan_hyouzyonum,3
if %zukan_pozu=1 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=2 mov %zukan_hyouzyo,1
if %zukan_pozu=3 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=3 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\dragonzonbe_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\dragonzonbe_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\dragonzonbe_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 lsp 450,":a;chara\dragonzonbe_st11.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\dragonzonbe_st21.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\dragonzonbe_st22.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=3 lsp 450,":a;chara\dragonzonbe_st23.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\dragonzonbe_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\dragonzonbe_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_pozu<3 && %zukan_bukkake3=1 lsp 443,":a;chara\dragonzonbe_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_pozu=3 && %zukan_bukkake4=1 lsp 444,":a;chara\dragonzonbe_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_pozu=3 && %zukan_bukkake5=1 lsp 445,":a;chara\dragonzonbe_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_dragonzonbe_cg

lsp 500,":c;bg\bg205.bmp",0,0
lsp 430,":a;chara\dragonzonbe_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dragonzonbe_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\dragonzonbe_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\dragonzonbe_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\dragonzonbe_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\dragonzonbe_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\dragonzonbe_hb4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_dragonzonbe_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,77
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,4
mov %skill05,4
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *dragonzonbe_start
if %bwait=211 mov %nanido,2:goto *dragonzonbe_start
if %bwait=212 mov %nanido,3:goto *dragonzonbe_start
lsp 700,":a;chara\dragonzonbe_st02.bmp",0,0
bg "bg\bg205.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *dragonzonbe_h



*zukan_cirque1

mov $zname,"Cirque du Croix (1)"
mov $zlavel,"cirque1"
itoa2 $zukan_ko,%2730
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,2
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2730=0 mov %ryozyoku1,0
if %2730>0 mov %ryozyoku1,1
if %2730=0 mov %zukancg,0
if %2730>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"Average:@80 "
mov $zukan_hp,"Average:@25000 "
mov $zukan_skill1,"Elf Fellatio"
mov %zukan_skillc1,4038
mov $zukan_skill2,"Elf Paizuri"
mov %zukan_skillc2,4039
mov $zukan_skill3,"Elf Footjob"
mov %zukan_skillc3,4040
mov $zukan_skill4,"Ass Press"
mov %zukan_skillc4,4041
mov $zukan_skill5,"Harpy's Horny Mouth"
mov %zukan_skillc5,4042
mov $zukan_skill6,"Queen's Tit Fuck"
mov %zukan_skillc6,4043
mov $zukan_skill7,"Happiness Rondo"
mov %zukan_skillc7,4044
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_cirque1_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\cir1.jpg",400,0
goto *zukan_kihonbtn



*zukan_cirque1_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=4 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,3
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\cirque_st41.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\cirque_st42.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\cirque_st43.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\cirque_st01.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\cirque_st02.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\cirque_st03.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_bukkake1=1 lsp 441,":a;chara\cirque_bk41.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake1=1 lsp 441,":a;chara\cirque_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_pozu=1 && %zukan_bukkake2=1 lsp 442,":a;chara\cirque_bk42.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake2=1 lsp 442,":a;chara\cirque_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_pozu=1 && %zukan_bukkake3=1 lsp 443,":a;chara\cirque_bk43.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake3=1 lsp 443,":a;chara\cirque_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_pozu=1 && %zukan_bukkake4=1 csp 444
if %zukan_pozu=2 && %zukan_bukkake4=1 lsp 444,":a;chara\cirque_bk04.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 444
return



*zukan_cirque1_cg

lsp 500,":c;bg\bg206.bmp",0,0
lsp 420,":a;chara\cirque_ct41.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\cirque_ct42.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\cirque_ct43.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\cirque_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\cirque_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":c;chara\cirque_h01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h05.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h06.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h07.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h08.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h09.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h10.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h13.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h14.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h15.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h16.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h17.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h18.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_cirque1_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,77
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,4
mov %skill05,4
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *cirque_start
if %bwait=211 mov %nanido,2:goto *cirque_start
if %bwait=212 mov %nanido,3:goto *cirque_start
lsp 700,":a;chara\cirque_st42.bmp",180,0
lsp 701,":a;chara\cirque_st02.bmp",-190,0
bg "bg\bg206.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *cirque_h



*zukan_cirque2

mov $zname,"Cirque du Croix (2)"
mov $zlavel,"cirque2"
itoa2 $zukan_ko,%2730
mov %zukan_hyouzyonum,4
mov %zukan_pozunum,2
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2730=0 mov %ryozyoku1,0
if %2730>0 mov %ryozyoku1,1
if %2730=0 mov %zukancg,0
if %2730>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"Average:@80 "
mov $zukan_hp,"Average:@25000 "
mov $zukan_skill1,"Urethra Kiss"
mov %zukan_skillc1,4045
mov $zukan_skill2,"Fairy Hug"
mov %zukan_skillc2,4046
mov $zukan_skill3,"A Midsummer Night's Dream"
mov %zukan_skillc3,4047
mov $zukan_skill4,"Queen's Tentacle Caress"
mov %zukan_skillc4,4048
mov $zukan_skill5,"Queen's Tentacle Squeeze"
mov %zukan_skillc5,4049
mov $zukan_skill6,"Inferno-de-Scylla"
mov %zukan_skillc6,4050
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_cirque2_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\cir2.jpg",400,0
goto *zukan_kihonbtn



*zukan_cirque2_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 && %zukan_hyouzyo=4 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,3
if %zukan_pozu=2 && %zukan_hyouzyo=5 mov %zukan_hyouzyo,1
if %zukan_pozu=2 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,4
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\cirque_st51.bmp",%zukan_x0-30,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\cirque_st52.bmp",%zukan_x0-30,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\cirque_st53.bmp",%zukan_x0-30,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\cirque_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\cirque_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\cirque_st13.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=4 lsp 450,":a;chara\cirque_st14.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_bukkake1=1 lsp 441,":a;chara\cirque_bk51.bmp",%zukan_x0-30,0
if %zukan_pozu=2 && %zukan_bukkake1=1 lsp 441,":a;chara\cirque_bk11.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_pozu=1 && %zukan_bukkake2=1 lsp 442,":a;chara\cirque_bk52.bmp",%zukan_x0-30,0
if %zukan_pozu=2 && %zukan_bukkake2=1 lsp 442,":a;chara\cirque_bk12.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_pozu=1 && %zukan_bukkake3=1 lsp 443,":a;chara\cirque_bk53.bmp",%zukan_x0-30,0
if %zukan_pozu=2 && %zukan_bukkake3=1 lsp 443,":a;chara\cirque_bk13.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_pozu=1 && %zukan_bukkake4=1 lsp 444,":a;chara\cirque_bk54.bmp",%zukan_x0-30,0
if %zukan_pozu=2 && %zukan_bukkake4=1 csp 444
if %zukan_bukkake4=0 csp 444
return



*zukan_cirque2_cg

lsp 500,":c;bg\bg206.bmp",0,0
lsp 420,":a;chara\cirque_ct51.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\cirque_ct52.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\cirque_ct11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\cirque_ct12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":c;chara\cirque_h01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h05.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h06.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h07.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h08.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h09.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h10.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h13.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h14.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h15.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h16.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h17.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h18.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_cirque2_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,77
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,4
mov %skill05,4
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *zukan_cirqueb2
if %bwait=211 mov %nanido,2:goto *zukan_cirqueb2
if %bwait=212 mov %nanido,3:goto *zukan_cirqueb2
lsp 700,":a;chara\cirque_st51.bmp",-160,0
lsp 701,":a;chara\cirque_st12.bmp",180,0
bg "bg\bg206.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *cirque_h



*zukan_cirque3

mov $zname,"Cirque du Croix (3)"
mov $zlavel,"cirque3"
itoa2 $zukan_ko,%2730
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,2
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2730=0 mov %ryozyoku1,0
if %2730>0 mov %ryozyoku1,1
if %2730=0 mov %zukancg,0
if %2730>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"Average:@80 "
mov $zukan_hp,"Average:@25000 "
mov $zukan_skill1,"Roza's Hands"
mov %zukan_skillc1,4051
mov $zukan_skill2,"Roza's Blowjob"
mov %zukan_skillc2,4052
mov $zukan_skill3,"Roza's Firetta"
mov %zukan_skillc3,4053
mov $zukan_skill4,"Roza's Breasts"
mov %zukan_skillc4,4054
mov $zukan_skill5,"Snake Hands"
mov %zukan_skillc5,4055
mov $zukan_skill6,"Snake Mouth"
mov %zukan_skillc6,4056
mov $zukan_skill7,"Snake Bust"
mov %zukan_skillc7,4057
mov $zukan_skill8,"Snake End"
mov %zukan_skillc8,4058
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_cirque3_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\cir3.jpg",400,0
goto *zukan_kihonbtn



*zukan_cirque3_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=4 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,3
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\cirque_st31.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\cirque_st32.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\cirque_st33.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\cirque_st21.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\cirque_st22.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\cirque_st23.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_bukkake1=1 lsp 441,":a;chara\cirque_bk31.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake1=1 lsp 441,":a;chara\cirque_bk21.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_pozu=1 && %zukan_bukkake2=1 lsp 442,":a;chara\cirque_bk32.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake2=1 lsp 442,":a;chara\cirque_bk22.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_pozu=1 && %zukan_bukkake3=1 lsp 443,":a;chara\cirque_bk33.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake3=1 lsp 443,":a;chara\cirque_bk23.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_pozu=1 && %zukan_bukkake4=1 lsp 444,":a;chara\cirque_bk34.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake4=1 csp 444
if %zukan_bukkake4=0 csp 444
return



*zukan_cirque3_cg

lsp 500,":c;bg\bg206.bmp",0,0
lsp 420,":a;chara\cirque_ct31.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\cirque_ct32.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\cirque_ct21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\cirque_ct22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":c;chara\cirque_h01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h05.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h06.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h07.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h08.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h09.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h10.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h13.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h14.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h15.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h16.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h17.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\cirque_h18.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_cirque3_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,77
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,4
mov %skill05,4
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *zukan_cirqueb3
if %bwait=211 mov %nanido,2:goto *zukan_cirqueb3
if %bwait=212 mov %nanido,3:goto *zukan_cirqueb3
lsp 700,":a;chara\cirque_st32.bmp",180,0
lsp 699,":a;chara\cirque_st22.bmp",-220,0
bg "bg\bg206.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *cirque_h



*zukan_alice15th

mov $zname,"Alipheese the Fifteenth"
mov $zlavel,"alice15th"
itoa2 $zukan_ko,%2731
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,5
mov %zukan_bukkakenum,6
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2731=0 mov %ryozyoku1,0
if %2731>0 mov %ryozyoku1,1
if %2731=0 mov %zukancg,0
if %2731>0 mov %zukancg,1
mov %zukan_x1,-400
mov %zukan_x2,0
mov $zukan_lv,"PTO"
mov $zukan_hp,"SOOOO"
mov $zukan_skill1,"Embracing Hand"
mov %zukan_skillc1,4059
mov $zukan_skill2,"Greedy Lips"
mov %zukan_skillc2,4060
mov $zukan_skill3,"Royal Breasts"
mov %zukan_skillc3,4061
mov $zukan_skill4,"Demento Nagi"
mov %zukan_skillc4,4062
mov $zukan_skill5,"Nephilim Magia"
mov %zukan_skillc5,4063
mov $zukan_skill6,"Nephilim End"
mov %zukan_skillc6,4064
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_alice15th_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\alice15.jpg",400,0
goto *zukan_kihonbtn



*zukan_alice15th_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=4 mov %zukan_hyouzyonum,1
if %zukan_pozu<>4 mov %zukan_hyouzyonum,3
if %zukan_pozu<4 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu<4 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=4 mov %zukan_hyouzyo,1
if %zukan_pozu=5 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=5 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\alice15th_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\alice15th_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\alice15th_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\alice15th_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\alice15th_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\alice15th_st13.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\alice15th_st21.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\alice15th_st22.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=3 lsp 450,":a;chara\alice15th_st23.bmp",%zukan_x0,0
if %zukan_pozu=4 lsp 450,":a;chara\alice15th_st31b.bmp",%zukan_x0,0
if %zukan_pozu=5 && %zukan_hyouzyo=1 lsp 450,":a;chara\alice15th_st41.bmp",%zukan_x0,0
if %zukan_pozu=5 && %zukan_hyouzyo=2 lsp 450,":a;chara\alice15th_st42.bmp",%zukan_x0,0
if %zukan_pozu=5 && %zukan_hyouzyo=3 lsp 450,":a;chara\alice15th_st43.bmp",%zukan_x0,0
if %zukan_pozu<4 && %zukan_bukkake1=1 lsp 441,":a;chara\alice15th_bk01.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_bukkake1=1 lsp 441,":a;chara\alice15th_bk31.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_pozu<4 && %zukan_bukkake2=1 lsp 442,":a;chara\alice15th_bk02.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_bukkake2=1 lsp 442,":a;chara\alice15th_bk32.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_pozu<4 && %zukan_bukkake3=1 lsp 443,":a;chara\alice15th_bk03.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_bukkake3=1 lsp 443,":a;chara\alice15th_bk33.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_pozu<4 && %zukan_bukkake4=1 lsp 444,":a;chara\alice15th_bk04.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_bukkake4=1 lsp 444,":a;chara\alice15th_bk34.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_pozu=3 && %zukan_bukkake5=1 lsp 445,":a;chara\alice15th_bk05.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_bukkake5=1 lsp 445,":a;chara\alice15th_bk35.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_pozu<4 && %zukan_bukkake6=1 lsp 446,":a;chara\alice15th_bk06.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_bukkake6=1 lsp 446,":a;chara\alice15th_bk36.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
return



*zukan_alice15th_cg

lsp 500,":c;bg\bg206.bmp",0,0
lsp 430,":c;chara\alice15th_ha01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\alice15th_ha02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\alice15th_ha03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\alice15th_ha04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\alice15th_ha05.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\alice15th_ha06.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\alice15th_ha07.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\alice15th_ha08.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\alice15th_ha09.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\alice15th_ha10.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\alice15th_hc0.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\alice15th_hc1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\alice15th_hc2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\alice15th_hc3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\alice15th_hc4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_alice15th_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,78
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,4
mov %skill05,4
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *alice15th_start
if %bwait=211 mov %nanido,2:goto *alice15th_start
if %bwait=212 mov %nanido,3:goto *alice15th_start
lsp 700,":a;chara\alice15th_st01.bmp",0,0
bg "bg\bg206.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *alice15th_h



*zukan_shirom

mov $zname,"La Croix"
mov $zlavel,"shirom"
itoa2 $zukan_ko,%2709
mov %zukan_hyouzyonum,4
mov %zukan_pozunum,8
mov %zukan_bukkakenum,3
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2709=0 mov %ryozyoku1,0
if %2709>0 mov %ryozyoku1,1
if %2709=0 mov %zukancg,0
if %2709>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PQQ"
mov $zukan_hp,"QSOOO"
mov $zukan_skill1,"Necrophase"
mov %zukan_skillc1,4065
mov $zukan_skill2,"Necroreim"
mov %zukan_skillc2,4066
mov $zukan_skill3,"Necrofaun"
mov %zukan_skillc3,4067
mov $zukan_skill4,"La Croix's Mod"
mov %zukan_skillc4,4068
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_shirom_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\lacroix.jpg",400,0
goto *zukan_kihonbtn



*zukan_shirom_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=7 mov %zukan_hyouzyonum,1
if %zukan_pozu<>7 mov %zukan_hyouzyonum,4
if %zukan_pozu=1 && %zukan_hyouzyo=5 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,4
if %zukan_pozu=2 && %zukan_hyouzyo=5 mov %zukan_hyouzyo,1
if %zukan_pozu=2 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,4
if %zukan_pozu=3 && %zukan_hyouzyo=3 mov %zukan_hyouzyo,1
if %zukan_pozu=3 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,2
if %zukan_pozu=4 && %zukan_hyouzyo=3 mov %zukan_hyouzyo,1
if %zukan_pozu=4 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,2
if %zukan_pozu=5 && %zukan_hyouzyo=3 mov %zukan_hyouzyo,1
if %zukan_pozu=5 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,2
if %zukan_pozu=6 && %zukan_hyouzyo=3 mov %zukan_hyouzyo,1
if %zukan_pozu=6 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,2
if %zukan_pozu=7 mov %zukan_hyouzyo,1
if %zukan_pozu=8 && %zukan_hyouzyo=4 mov %zukan_hyouzyo,1
if %zukan_pozu=8 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,3
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\shirom_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\shirom_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\shirom_st03.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\shirom_st04.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\shirom_st05.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\shirom_st06.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\shirom_st07.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=4 lsp 450,":a;chara\shirom_st08.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\shirom_st11.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\shirom_st12.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=1 lsp 450,":a;chara\shirom_st21.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=2 lsp 450,":a;chara\shirom_st22.bmp",%zukan_x0,0
if %zukan_pozu=5 && %zukan_hyouzyo=1 lsp 450,":a;chara\shirom_st31.bmp",%zukan_x0,0
if %zukan_pozu=5 && %zukan_hyouzyo=2 lsp 450,":a;chara\shirom_st32.bmp",%zukan_x0,0
if %zukan_pozu=6 && %zukan_hyouzyo=1 lsp 450,":a;chara\shirom_st41.bmp",%zukan_x0,0
if %zukan_pozu=6 && %zukan_hyouzyo=2 lsp 450,":a;chara\shirom_st42.bmp",%zukan_x0,0
if %zukan_pozu=7 lsp 450,":a;chara\shirom_st51.bmp",%zukan_x0,0
if %zukan_pozu=8 && %zukan_hyouzyo=1 lsp 450,":a;chara\shirom_st71.bmp",%zukan_x0,0
if %zukan_pozu=8 && %zukan_hyouzyo=2 lsp 450,":a;chara\shirom_st72.bmp",%zukan_x0,0
if %zukan_pozu=8 && %zukan_hyouzyo=3 lsp 450,":a;chara\shirom_st73.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\shirom_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\shirom_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\shirom_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_pozu>2 && %zukan_pozu<8 cspl 441,443
return



*zukan_shirom_cg

lsp 500,":c;bg\bg206.bmp",0,0
lsp 430,":c;chara\shirom_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\shirom_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\shirom_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\shirom_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\shirom_h5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":c;chara\shirom_h6.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_shirom_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,78
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,4
mov %skill05,4
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *shirom_start
if %bwait=211 mov %nanido,2:goto *shirom_start
if %bwait=212 mov %nanido,3:goto *shirom_start
lsp 700,":a;chara\shirom_st02.bmp",0,0
bg "bg\bg206.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *shirom_h



*zukan_alice8th1

mov $zname,"Black Alice"
mov $zlavel,"alice8th1"
itoa2 $zukan_ko,%2714
mov %zukan_hyouzyonum,4
mov %zukan_pozunum,1
mov %zukan_bukkakenum,5
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,2
if %2851=0 mov %ryozyoku1,0
if %2851>0 mov %ryozyoku1,1
if %2852=0 mov %ryozyoku2,0
if %2852>0 mov %ryozyoku2,1
if %2714=0 mov %zukancg,0
if %2714>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PTT"
mov $zukan_hp,"RROOO"
mov $zukan_skill1,"Tickling Finger Caress"
mov %zukan_skillc1,4069
mov $zukan_skill2,"Sucking Small Mouth"
mov %zukan_skillc2,4070
mov $zukan_skill3,"Young Girl's Modest Breasts"
mov %zukan_skillc3,4071
mov $zukan_skill4,"Devilish Draining Hair"
mov %zukan_skillc4,4072
mov $zukan_skill5,"Monster Lord's All-Night Vigil"
mov %zukan_skillc5,4073
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_alice8th1_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\balice1.jpg",400,0
goto *zukan_kihonbtn



*zukan_alice8th1_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\alice8th_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\alice8th_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\alice8th_st03.bmp",%zukan_x0,0
if %zukan_hyouzyo=4 lsp 450,":a;chara\alice8th_st04.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\alice8th_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\alice8th_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\alice8th_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\alice8th_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\alice8th_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
return



*zukan_alice8th1_cg

lsp 500,":c;bg\bg145.bmp",0,0
if %2851=0 skip 19
lsp 430,":a;chara\alice8th_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th_ha5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th_ha6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th_ha7.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th_ha8.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th_ha9.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %2852=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th_hb4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th_hb5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th_hb6.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_alice8th1_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,78
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,4
mov %skill05,4
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *alice8th1_start
if %bwait=211 mov %nanido,2:goto *alice8th1_start
if %bwait=212 mov %nanido,3:goto *alice8th1_start
lsp 700,":a;chara\alice8th_st02.bmp",0,0
bg "bg\bg145.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Black Alice"
if %bwait=213 goto *alice8th1_ha
if %bwait=214 goto *alice8th1_hb



*zukan_traptemis

mov $zname,"Themis Trap"
mov $zlavel,"traptemis"
itoa2 $zukan_ko,%2671
mov %zukan_hyouzyonum,1
mov %zukan_pozunum,1
mov %zukan_bukkakenum,0
mov %zukan_sentounum,2
mov %zukan_ryozyokunum,1
if %2671=0 mov %ryozyoku1,0
if %2671>0 mov %ryozyoku1,1
if %2671=0 mov %zukancg,0
if %2671>0 mov %zukancg,1
mov %zukan_x1,-160
mov %zukan_x2,20
mov $zukan_lv,"ST"
mov $zukan_hp,"POOOO"
mov %zukan_skillc1,0
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_traptemis_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\ttemis.jpg",400,0
goto *zukan_kihonbtn



*zukan_traptemis_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\traptemis_st01.bmp",%zukan_x0,0
return



*zukan_traptemis_cg

lsp 500,":c;bg\bg207.bmp",0,0
lsp 430,":a;chara\traptemis_st02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\traptemis_st03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\traptemis_st04.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_traptemis_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,78
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,4
mov %skill05,4
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *traptemis_start
if %bwait=211 mov %nanido,2:goto *traptemis_start
if %bwait=212 mov %nanido,3:goto *traptemis_start
lsp 700,":a;chara\traptemis_st01.bmp",20,0
bg "bg\bg207.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *traptemis_h



*zukan_gargoyle

mov $zname,"Gargoyle Girl"
mov $zlavel,"gargoyle"
itoa2 $zukan_ko,%2715
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,3
mov %zukan_bukkakenum,2
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2715=0 mov %ryozyoku1,0
if %2715>0 mov %ryozyoku1,1
if %2715=0 mov %zukancg,0
if %2715>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"WO"
mov $zukan_hp,"QTOOO"
mov $zukan_skill1,"Eyes of Submission"
mov %zukan_skillc1,4074
mov $zukan_skill2,"Gargoyle Blowjob"
mov %zukan_skillc2,4075
mov $zukan_skill3,"Gargoyle Paizuri"
mov %zukan_skillc3,4076
mov $zukan_skill4,"Gargoyle Bosom"
mov %zukan_skillc4,4077
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_gargoyle_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\gargoyle.jpg",400,0
goto *zukan_kihonbtn



*zukan_gargoyle_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu<3 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu<3 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=3 && %zukan_hyouzyo=3 mov %zukan_hyouzyo,1
if %zukan_pozu=3 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,2
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\gargoyle_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\gargoyle_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\gargoyle_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\gargoyle_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\gargoyle_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\gargoyle_st13.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\gargoyle_st21.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\gargoyle_st22.bmp",%zukan_x0,0
if %zukan_pozu<3 && %zukan_bukkake1=1 lsp 441,":a;chara\gargoyle_bk01.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_bukkake1=1 lsp 441,":a;chara\gargoyle_bk21.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_pozu<3 && %zukan_bukkake2=1 lsp 442,":a;chara\gargoyle_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
return



*zukan_gargoyle_cg

lsp 500,":c;bg\bg208.bmp",0,0
lsp 430,":a;chara\gargoyle_st31.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\gargoyle_st32.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\gargoyle_st33.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\gargoyle_st34.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\gargoyle_st35.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\gargoyle_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\gargoyle_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\gargoyle_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\gargoyle_h4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_gargoyle_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,78
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,4
mov %skill05,4
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *gargoyle_start
if %bwait=211 mov %nanido,2:goto *gargoyle_start
if %bwait=212 mov %nanido,3:goto *gargoyle_start
lsp 700,":a;chara\gargoyle_st02.bmp",0,0
bg "bg\bg208.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *gargoyle_h



*zukan_doppele

mov $zname,"Doppel Luka"
mov $zlavel,"doppele"
itoa2 $zukan_ko,%2708
mov %zukan_hyouzyonum,4
mov %zukan_pozunum,6
mov %zukan_bukkakenum,7
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2708=0 mov %ryozyoku1,0
if %2708>0 mov %ryozyoku1,1
if %2708=0 mov %zukancg,0
if %2708>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"VW"
mov $zukan_hp,"QTOOO"
mov $zukan_skill1,"Doppel Handjob"
mov %zukan_skillc1,4078
mov $zukan_skill2,"Doppel Footjob"
mov %zukan_skillc2,4079
mov $zukan_skill3,"Doppel Blowjob"
mov %zukan_skillc3,4080
mov $zukan_skill4,"Doppel Tit Fuck"
mov %zukan_skillc4,4081
mov $zukan_skill5,"Doppel Intercrural"
mov %zukan_skillc5,4082
mov $zukan_skill6,"Doppel Assjob"
mov %zukan_skillc6,4083
mov $zukan_skill7,"Sword Semen Drain"
mov %zukan_skillc7,4084
mov $zukan_skill8,"Doppel Mount"
mov %zukan_skillc8,4085
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_doppele_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\doppelluka.jpg",400,0
goto *zukan_kihonbtn



*zukan_doppele_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\doppele_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\doppele_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\doppele_st03.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\doppele_st04.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\doppele_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\doppele_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\doppele_st13.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=4 lsp 450,":a;chara\doppele_st14.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\doppele_st21.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\doppele_st22.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=3 lsp 450,":a;chara\doppele_st23.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=4 lsp 450,":a;chara\doppele_st24.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=1 lsp 450,":a;chara\doppele_st31.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=2 lsp 450,":a;chara\doppele_st32.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=3 lsp 450,":a;chara\doppele_st33.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=4 lsp 450,":a;chara\doppele_st34.bmp",%zukan_x0,0
if %zukan_pozu=5 && %zukan_hyouzyo=1 lsp 450,":a;chara\doppele_st41.bmp",%zukan_x0,0
if %zukan_pozu=5 && %zukan_hyouzyo=2 lsp 450,":a;chara\doppele_st42.bmp",%zukan_x0,0
if %zukan_pozu=5 && %zukan_hyouzyo=3 lsp 450,":a;chara\doppele_st43.bmp",%zukan_x0,0
if %zukan_pozu=5 && %zukan_hyouzyo=4 lsp 450,":a;chara\doppele_st44.bmp",%zukan_x0,0
if %zukan_pozu=6 && %zukan_hyouzyo=1 lsp 450,":a;chara\doppele_st51.bmp",%zukan_x0,0
if %zukan_pozu=6 && %zukan_hyouzyo=2 lsp 450,":a;chara\doppele_st52.bmp",%zukan_x0,0
if %zukan_pozu=6 && %zukan_hyouzyo=3 lsp 450,":a;chara\doppele_st53.bmp",%zukan_x0,0
if %zukan_pozu=6 && %zukan_hyouzyo=4 lsp 450,":a;chara\doppele_st54.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\doppele_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_pozu<3 && %zukan_bukkake2=1 lsp 442,":a;chara\doppele_bk02.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_bukkake2=1 lsp 442,":a;chara\doppele_bk32.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_pozu<4 && %zukan_bukkake3=1 lsp 443,":a;chara\doppele_bk03.bmp",%zukan_x0,0
if %zukan_pozu=6 && %zukan_hyouzyo>2 && %zukan_bukkake3=1 lsp 443,":a;chara\doppele_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_pozu<4 && %zukan_bukkake4=1 lsp 444,":a;chara\doppele_bk04.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_bukkake4=1 lsp 444,":a;chara\doppele_bk34.bmp",%zukan_x0,0
if %zukan_pozu=5 && %zukan_bukkake4=1 lsp 444,":a;chara\doppele_bk34.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\doppele_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\doppele_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
if %zukan_pozu=1 && %zukan_bukkake7=1 lsp 447,":a;chara\doppele_bk07.bmp",%zukan_x0,0
if %zukan_pozu=5 && %zukan_bukkake7=1 lsp 447,":a;chara\doppele_bk07.bmp",%zukan_x0,0
if %zukan_bukkake7=0 csp 447
return



*zukan_doppele_cg

lsp 500,":c;bg\bg208.bmp",0,0
lsp 430,":a;chara\doppele_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\doppele_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\doppele_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\doppele_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\doppele_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\doppele_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\doppele_hc1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\doppele_hc2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\doppele_hc3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\doppele_hd1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\doppele_hd2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\doppele_hd3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\doppele_he1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\doppele_he2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\doppele_he3.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_doppele_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,78
mov %skill01,19
mov %skill02,4
mov %skill03,4
mov %skill04,4
mov %skill05,4
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *doppele_start
if %bwait=211 mov %nanido,2:goto *doppele_start
if %bwait=212 mov %nanido,3:goto *doppele_start
lsp 700,":a;chara\doppele_st02.bmp",0,0
bg "bg\bg208.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov %sinkou,2
if %bwait=213 goto *doppele_h



*zukan_hainu

mov $zname,"Hainuwele"
mov $zlavel,"hainu"
itoa2 $zukan_ko,%2716
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,2
mov %zukan_bukkakenum,0
mov %zukan_sentounum,2
mov %zukan_ryozyokunum,1
if %2716=0 mov %ryozyoku1,0
if %2716>0 mov %ryozyoku1,1
if %2716=0 mov %zukancg,0
if %2716>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PST"
mov $zukan_hp,"QROOO"
mov %zukan_skillc1,0
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_hainu_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\hainu.jpg",400,0
goto *zukan_kihonbtn



*zukan_hainu_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\hainu_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\hainu_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\hainu_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\hainu_st11.bmp",%zukan_x0-320,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\hainu_st12.bmp",%zukan_x0-320,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\hainu_st13.bmp",%zukan_x0-320,0
return



*zukan_hainu_cg

lsp 500,":c;bg\bg208.bmp",0,0
lsp 430,":a;chara\hainu_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hainu_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hainu_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\hainu_h4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_hainu_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,78
mov %skill01,20
mov %skill02,4
mov %skill03,4
mov %skill04,4
mov %skill05,4
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *hainu_start
if %bwait=211 mov %nanido,2:goto *hainu_start
if %bwait=212 mov %nanido,3:goto *hainu_start
bg "bg\bg208.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *hainu_h



*zukan_amphis

mov $zname,"Amphisbaena"
mov $zlavel,"amphis"
itoa2 $zukan_ko,%2717
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,2
mov %zukan_bukkakenum,0
mov %zukan_sentounum,2
mov %zukan_ryozyokunum,1
if %2717=0 mov %ryozyoku1,0
if %2717>0 mov %ryozyoku1,1
if %2717=0 mov %zukancg,0
if %2717>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PSU"
mov $zukan_hp,"ROOOO"
mov %zukan_skillc1,0
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_amphis_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\amphis.jpg",400,0
goto *zukan_kihonbtn



*zukan_amphis_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\amphis_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\amphis_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\amphis_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\amphis_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\amphis_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\amphis_st13.bmp",%zukan_x0,0
return



*zukan_amphis_cg

lsp 500,":c;bg\bg208.bmp",0,0
lsp 430,":a;chara\amphis_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\amphis_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\amphis_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\amphis_h4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_amphis_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,78
mov %skill01,20
mov %skill02,4
mov %skill03,4
mov %skill04,4
mov %skill05,4
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *amphis_start
if %bwait=211 mov %nanido,2:goto *amphis_start
if %bwait=212 mov %nanido,3:goto *amphis_start
bg "bg\bg208.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *amphis_h



*zukan_tukuyomi

mov $zname,"Tsukuyomi"
mov $zlavel,"tukuyomi"
itoa2 $zukan_ko,%2718
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,2
mov %zukan_bukkakenum,0
mov %zukan_sentounum,2
mov %zukan_ryozyokunum,1
if %2718=0 mov %ryozyoku1,0
if %2718>0 mov %ryozyoku1,1
if %2718=0 mov %zukancg,0
if %2718>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PSV"
mov $zukan_hp,"ROOOO"
mov %zukan_skillc1,0
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_tukuyomi_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\tsuku.jpg",400,0
goto *zukan_kihonbtn



*zukan_tukuyomi_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\tukuyomi_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\tukuyomi_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\tukuyomi_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\tukuyomi_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\tukuyomi_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\tukuyomi_st13.bmp",%zukan_x0,0
return



*zukan_tukuyomi_cg

lsp 500,":c;bg\bg208.bmp",0,0
lsp 430,":a;chara\tukuyomi_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tukuyomi_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tukuyomi_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tukuyomi_h4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_tukuyomi_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,78
mov %skill01,20
mov %skill02,4
mov %skill03,4
mov %skill04,4
mov %skill05,4
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *tukuyomi_start
if %bwait=211 mov %nanido,2:goto *tukuyomi_start
if %bwait=212 mov %nanido,3:goto *tukuyomi_start
bg "bg\bg208.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *tukuyomi_h



*zukan_arcen

mov $zname,"Arc-En-Ciel"
mov $zlavel,"arcen"
itoa2 $zukan_ko,%2719
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,2
mov %zukan_bukkakenum,0
mov %zukan_sentounum,2
mov %zukan_ryozyokunum,1
if %2719=0 mov %ryozyoku1,0
if %2719>0 mov %ryozyoku1,1
if %2719=0 mov %zukancg,0
if %2719>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PTO"
mov $zukan_hp,"SOOOO"
mov %zukan_skillc1,0
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_arcen_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\arcen.jpg",400,0
goto *zukan_kihonbtn



*zukan_arcen_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\arcen_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\arcen_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\arcen_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\arcen_st11.bmp",%zukan_x0-320,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\arcen_st12.bmp",%zukan_x0-320,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\arcen_st13.bmp",%zukan_x0-320,0
return



*zukan_arcen_cg

lsp 500,":c;bg\bg208.bmp",0,0
lsp 430,":a;chara\arcen_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\arcen_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\arcen_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\arcen_h4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_arcen_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,78
mov %skill01,20
mov %skill02,4
mov %skill03,4
mov %skill04,4
mov %skill05,4
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *arcen_start
if %bwait=211 mov %nanido,2:goto *arcen_start
if %bwait=212 mov %nanido,3:goto *arcen_start
bg "bg\bg208.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *arcen_h



*zukan_rapun

mov $zname,"Rapunzel"
mov $zlavel,"rapun"
itoa2 $zukan_ko,%2720
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,2
mov %zukan_bukkakenum,0
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2720=0 mov %ryozyoku1,0
if %2720>0 mov %ryozyoku1,1
if %2720=0 mov %zukancg,0
if %2720>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PSU"
mov $zukan_hp,"RQOOO"
mov $zukan_skill1,"Lewd Bug's Blowjob"
mov %zukan_skillc1,4086
mov $zukan_skill2,"Lewd Bug's Paizuri"
mov %zukan_skillc2,4087
mov $zukan_skill3,"Lewd Bug's Lewd Honey"
mov %zukan_skillc3,4088
mov $zukan_skill4,"Lewd Bug's Mating"
mov %zukan_skillc4,4089
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_rapun_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\rapun.jpg",400,0
goto *zukan_kihonbtn



*zukan_rapun_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\rapun_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\rapun_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\rapun_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\rapun_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\rapun_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\rapun_st13.bmp",%zukan_x0,0
return



*zukan_rapun_cg

lsp 500,":c;bg\bg208.bmp",0,0
lsp 430,":a;chara\rapun_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\rapun_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\rapun_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\rapun_h4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_rapun_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,78
mov %skill01,21
mov %skill02,5
mov %skill03,5
mov %skill04,5
mov %skill05,5
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *rapun_start
if %bwait=211 mov %nanido,2:goto *rapun_start
if %bwait=212 mov %nanido,3:goto *rapun_start
lsp 700,":a;chara\rapun_st01.bmp",0,0
bg "bg\bg208.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *rapun_h



*zukan_heavensgate

mov $zname,"Heaven's Gate"
mov $zlavel,"heavensgate"
itoa2 $zukan_ko,%2721
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,1
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2721=0 mov %ryozyoku1,0
if %2721>0 mov %ryozyoku1,1
if %2721=0 mov %zukancg,0
if %2721>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PSW"
mov $zukan_hp,"SOOOO"
mov $zukan_skill1,"Seraphic Blowjob"
mov %zukan_skillc1,4090
mov $zukan_skill2,"Male Teasing Tentacles"
mov %zukan_skillc2,4091
mov $zukan_skill3,"Great Gate's Lusting Tongue"
mov %zukan_skillc3,4092
mov $zukan_skill4,"Gate of Judgement"
mov %zukan_skillc4,4093
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_heavensgate_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\heavengate.jpg",400,0
goto *zukan_kihonbtn



*zukan_heavensgate_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\heavensgate_st01.bmp",%zukan_x0,0
if %zukan_hyouzyo=2 lsp 450,":a;chara\heavensgate_st02.bmp",%zukan_x0,0
if %zukan_hyouzyo=3 lsp 450,":a;chara\heavensgate_st03.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\heavensgate_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\heavensgate_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\heavensgate_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\heavensgate_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
return



*zukan_heavensgate_cg

lsp 500,":c;bg\bg208.bmp",0,0
lsp 430,":a;chara\heavensgate_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\heavensgate_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\heavensgate_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\heavensgate_h4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_heavensgate_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,79
mov %skill01,21
mov %skill02,5
mov %skill03,5
mov %skill04,5
mov %skill05,5
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *heavensgate_start
if %bwait=211 mov %nanido,2:goto *heavensgate_start
if %bwait=212 mov %nanido,3:goto *heavensgate_start
lsp 700,":a;chara\heavensgate_st02.bmp",0,0
bg "bg\bg208.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *heavensgate_h



*zukan_eden

mov $zname,"Seraph Eden"
mov $zlavel,"eden"
itoa2 $zukan_ko,%2722
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,2
mov %zukan_bukkakenum,0
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,2
if %2847=0 mov %ryozyoku1,0
if %2847>0 mov %ryozyoku1,1
if %2848=0 mov %ryozyoku2,0
if %2848>0 mov %ryozyoku2,1
if %2722=0 mov %zukancg,0
if %2722>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PXT"
mov $zukan_hp,"TOOOO"
mov $zukan_skill1,"Eden's Serpent"
mov %zukan_skillc1,4094
mov $zukan_skill2,"Seraph's Wings"
mov %zukan_skillc2,4095
mov $zukan_skill3,"Paradise Lost"
mov %zukan_skillc3,4096
mov $zukan_skill4,"Garden of Eden"
mov %zukan_skillc4,4097
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_eden_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\eden.jpg",400,0
goto *zukan_kihonbtn



*zukan_eden_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 mov %zukan_hyouzyonum,1
if %zukan_pozu<>1 mov %zukan_hyouzyonum,3
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 lsp 450,":a;chara\eden_st01.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\eden_st21.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\eden_st22.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\eden_st23.bmp",%zukan_x0,0
return



*zukan_eden_cg

lsp 500,":c;bg\bg210.bmp",0,0
if %2847=0 skip 9
lsp 430,":a;chara\eden_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\eden_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\eden_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\eden_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %2848=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\eden_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\eden_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\eden_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\eden_hb4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_eden_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,79
mov %skill01,21
mov %skill02,5
mov %skill03,5
mov %skill04,5
mov %skill05,5
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *eden_start
if %bwait=211 mov %nanido,2:goto *eden_start
if %bwait=212 mov %nanido,3:goto *eden_start
lsp 700,":a;chara\eden_st01.bmp",0,0
bg "bg\bg210.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Eden"
if %bwait=213 goto *eden_ha
if %bwait=214 goto *eden_hb



*zukan_stein2

mov $zname,"Promestein"
mov $zlavel,"stein2"
itoa2 $zukan_ko,%2723
mov %zukan_hyouzyonum,1
mov %zukan_pozunum,1
mov %zukan_bukkakenum,2
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2723=0 mov %ryozyoku1,0
if %2723>0 mov %ryozyoku1,1
if %2723=0 mov %zukancg,0
if %2723>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"QRO"
mov $zukan_hp,"UOOOO"
mov $zukan_skill1,"Swede Demosu"
mov %zukan_skillc1,4098
mov $zukan_skill2,"Stipe Suck"
mov %zukan_skillc2,4099
mov $zukan_skill3,"Swede Gigantea"
mov %zukan_skillc3,4100
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_stein2_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\stein2.jpg",400,0
goto *zukan_kihonbtn



*zukan_stein2_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\stein2_st01.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\stein2_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\stein2_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
return



*zukan_stein2_cg

lsp 500,":c;bg\bg211.bmp",0,0
lsp 430,":a;chara\stein2_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\stein2_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\stein2_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\stein2_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\stein2_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\stein2_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\stein2_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\stein2_ct04.bmp",0,0
lsp 430,":a;chara\stein2_h5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\stein2_ct05.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\stein2_h6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\stein2_ct11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\stein2_ct12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\stein2_ct13.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\stein2_ct14.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\stein2_ct15.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\stein2_ct16.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_stein2_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,79
mov %skill01,21
mov %skill02,5
mov %skill03,5
mov %skill04,5
mov %skill05,5
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *stein2_start
if %bwait=211 mov %nanido,2:goto *stein2_start
if %bwait=212 mov %nanido,3:goto *stein2_start
lsp 700,":a;chara\stein2_st01.bmp",0,0
bg "bg\bg211.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Promestein"
if %bwait=213 goto *stein2_h



*zukan_alice8th2

mov $zname,"Black Alice"
mov $zlavel,"alice8th2"
itoa2 $zukan_ko,%2724
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,2
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2724=0 mov %ryozyoku1,0
if %2724>0 mov %ryozyoku1,1
if %2724=0 mov %zukancg,0
if %2724>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"QTU"
mov $zukan_hp,"UTOOO"
mov $zukan_skill1,"Sweet Demonic Palm"
mov %zukan_skillc1,4101
mov $zukan_skill2,"Sweet Demonic Lips"
mov %zukan_skillc2,4102
mov $zukan_skill3,"Sweet Demonic Breasts"
mov %zukan_skillc3,4103
mov $zukan_skill4,"Sweet Demonic Tentacles"
mov %zukan_skillc4,4104
mov $zukan_skill5,"Sweet Demonic Prison"
mov %zukan_skillc5,4105
mov $zukan_skill6,"Demonic Predation"
mov %zukan_skillc6,4106
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_alice8th2_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\balice2.jpg",400,0
goto *zukan_kihonbtn



*zukan_alice8th2_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=2 && %zukan_hyouzyo=3 mov %zukan_hyouzyo,1
if %zukan_pozu=2 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,2
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\alice8th2_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\alice8th2_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\alice8th2_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\alice8th2_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\alice8th2_st12.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\alice8th2_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\alice8th2_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_pozu=1 && %zukan_bukkake3=1 lsp 443,":a;chara\alice8th2_bk03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_bukkake3=1 lsp 443,":a;chara\alice8th2_bk13.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\alice8th2_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
return



*zukan_alice8th2_cg

lsp 500,":c;bg\bg212.bmp",0,0
lsp 430,":a;chara\alice8th2_st21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\alice8th2_ct01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th2_st22.bmp",0,0
lsp 420,":a;chara\alice8th2_ct02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\alice8th2_ct03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\alice8th2_st23.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th2_st24.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th2_st25.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th2_st26.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th2_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th2_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th2_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th2_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th2_h5.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_alice8th2_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,79
mov %skill01,21
mov %skill02,5
mov %skill03,5
mov %skill04,5
mov %skill05,5
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *alice8th2_start
if %bwait=211 mov %nanido,2:goto *alice8th2_start
if %bwait=212 mov %nanido,3:goto *alice8th2_start
lsp 700,":a;chara\alice8th2_st02.bmp",0,0
bg "bg\bg212.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Black Alice"
if %bwait=213 goto *alice8th2_h



*zukan_alice8th3

mov $zname,"Black Alice"
mov $zlavel,"alice8th3"
itoa2 $zukan_ko,%2725
mov %zukan_hyouzyonum,4
mov %zukan_pozunum,1
mov %zukan_bukkakenum,4
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2725=0 mov %ryozyoku1,0
if %2725>0 mov %ryozyoku1,1
if %2725=0 mov %zukancg,0
if %2725>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"QTU"
mov $zukan_hp,"UTOOO"
mov $zukan_skill1,"Octopus Pat"
mov %zukan_skillc1,4107
mov $zukan_skill2,"Leech Suck"
mov %zukan_skillc2,4108
mov $zukan_skill3,"Trampling Shackles"
mov %zukan_skillc3,4109
mov $zukan_skill4,"Swallow Prey"
mov %zukan_skillc4,4110
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_alice8th3_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\balice3.jpg",400,0
goto *zukan_kihonbtn



*zukan_alice8th3_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\alice8th3_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\alice8th3_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\alice8th3_st03.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\alice8th3_st04.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\alice8th3_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\alice8th3_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\alice8th3_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\alice8th3_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
return



*zukan_alice8th3_cg

lsp 500,":c;bg\bg212.bmp",0,0
lsp 430,":a;chara\alice8th3_st11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th3_st12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th3_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th3_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th3_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th3_h4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_alice8th3_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,79
mov %skill01,21
mov %skill02,5
mov %skill03,5
mov %skill04,5
mov %skill05,5
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *alice8th3_start
if %bwait=211 mov %nanido,2:goto *alice8th3_start
if %bwait=212 mov %nanido,3:goto *alice8th3_start
lsp 700,":a;chara\alice8th3_st02.bmp",0,0
bg "bg\bg212.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Black Alice"
if %bwait=213 goto *alice8th3_h



*zukan_alice8th4

mov $zname,"Black Alice"
mov $zlavel,"alice8th4"
itoa2 $zukan_ko,%2726
mov %zukan_hyouzyonum,1
mov %zukan_pozunum,1
mov %zukan_bukkakenum,0
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2726=0 mov %ryozyoku1,0
if %2726>0 mov %ryozyoku1,1
if %2726=0 mov %zukancg,0
if %2726>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"QTU"
mov $zukan_hp,"PXTOOO"
mov $zukan_skill1,"Elimination: Squeeze"
mov %zukan_skillc1,4111
mov $zukan_skill2,"Elimination: Chew"
mov %zukan_skillc2,4112
mov $zukan_skill3,"Elimination: Suck"
mov %zukan_skillc3,4113
mov $zukan_skill4,"Elimination: Lick"
mov %zukan_skillc4,4114
mov $zukan_skill5,"Elimination: Milk"
mov %zukan_skillc5,4115
mov $zukan_skill6,"Elimination: Stroke"
mov %zukan_skillc6,4116
mov $zukan_skill7,"Elimination: Crush"
mov %zukan_skillc7,4117
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_alice8th4_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\balice4.jpg",400,0
goto *zukan_kihonbtn



*zukan_alice8th4_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\alice8th4_st01.bmp",%zukan_x0,0
return



*zukan_alice8th4_cg

lsp 500,":c;bg\bg232.bmp",0,0
lsp 430,":a;chara\alice8th4_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th4_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th4_ha2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th4_ha3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th4_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th4_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\alice8th4_ct21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\alice8th4_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\alice8th4_ct22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\alice8th4_ct23.bmp",0,0
lsp 430,":a;chara\alice8th4_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\alice8th4_ct24.bmp",0,0
lsp 430,":a;chara\alice8th4_hb4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\alice8th4_ct25.bmp",0,0
lsp 430,":a;chara\alice8th4_hb5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\alice8th4_hc1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\alice8th4_ct31.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\alice8th4_hc2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\alice8th4_ct32.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\alice8th4_ct33.bmp",0,0
lsp 430,":a;chara\alice8th4_hc3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\alice8th4_ct34.bmp",0,0
lsp 430,":a;chara\alice8th4_hc4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\alice8th4_ct35.bmp",0,0
lsp 430,":a;chara\alice8th4_hc5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\alice8th4_hd1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\alice8th4_ct41.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\alice8th4_hd2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th4_hd3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th4_hd4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th4_hd5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th4_hd6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th4_he1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th4_he2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\alice8th4_ct51.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\alice8th4_ct52.bmp",0,0
lsp 430,":a;chara\alice8th4_he3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\alice8th4_ct53.bmp",0,0
lsp 430,":a;chara\alice8th4_he4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\alice8th4_ct54.bmp",0,0
lsp 430,":a;chara\alice8th4_he5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\alice8th4_hf1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th4_hf2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th4_hf3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th4_hf4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th4_hg1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th4_hg2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th4_hg3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th4_hg4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th4_hh1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th4_hh2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th4_hh3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th4_hh4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice8th4_hh5.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_alice8th4_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,79
mov %skill01,21
mov %skill02,5
mov %skill03,5
mov %skill04,5
mov %skill05,5
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *alice8th4_start
if %bwait=211 mov %nanido,2:goto *alice8th4_start
if %bwait=212 mov %nanido,3:goto *alice8th4_start
lsp 700,":a;chara\alice8th4_st01.bmp",0,0
bg "bg\bg232.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Black Alice"
if %bwait=213 goto *alice8th4_h



*zukan_irias3

mov $zname,"Goddess Ilias"
mov $zlavel,"irias3"
itoa2 $zukan_ko,%2727
mov %zukan_hyouzyonum,6
mov %zukan_pozunum,3
mov %zukan_bukkakenum,7
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,1
if %2727=0 mov %ryozyoku1,0
if %2727>0 mov %ryozyoku1,1
if %2727=0 mov %zukancg,0
if %2727>0 mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"TOO"
mov $zukan_hp,"TOOOO"
mov $zukan_skill1,"Goddess' Handjob"
mov %zukan_skillc1,4118
mov $zukan_skill2,"Goddess' Blowjob"
mov %zukan_skillc2,4119
mov $zukan_skill3,"Goddess' Breasts"
mov %zukan_skillc3,4120
mov $zukan_skill4,"Wings of Love and Tolerance"
mov %zukan_skillc4,4121
mov $zukan_skill5,"Goddess' Riding"
mov %zukan_skillc5,4122
mov $zukan_skill6,"Goddess' Tightening"
mov %zukan_skillc6,4123
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_irias3_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\ilias3.jpg",400,0
goto *zukan_kihonbtn



*zukan_irias3_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu>1 && %zukan_hyouzyo=3 mov %zukan_hyouzyo,1
if %zukan_pozu>1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,2
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\iriasu_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\iriasu_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\iriasu_st03.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\iriasu_st04.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=5 lsp 450,":a;chara\iriasu_st05.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=6 lsp 450,":a;chara\iriasu_st06.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\iriasu_st13.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\iriasu_st12.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\iriasu_st14.bmp",%zukan_x0,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\iriasu_st16.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\iriasu_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\iriasu_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
if %zukan_bukkake3=1 lsp 443,":a;chara\iriasu_bk03.bmp",%zukan_x0,0
if %zukan_bukkake3=0 csp 443
if %zukan_bukkake4=1 lsp 444,":a;chara\iriasu_bk04.bmp",%zukan_x0,0
if %zukan_bukkake4=0 csp 444
if %zukan_bukkake5=1 lsp 445,":a;chara\iriasu_bk05.bmp",%zukan_x0,0
if %zukan_bukkake5=0 csp 445
if %zukan_bukkake6=1 lsp 446,":a;chara\iriasu_bk06.bmp",%zukan_x0,0
if %zukan_bukkake6=0 csp 446
if %zukan_bukkake7=1 lsp 447,":a;chara\iriasu_bk07.bmp",%zukan_x0,0
if %zukan_bukkake7=0 csp 447
if %zukan_pozu>1 cspl 441,447
return



*zukan_irias3_cg

lsp 500,":c;bg\bg001.bmp",0,0
lsp 430,":a;chara\iriasu_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\iriasu_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\iriasu_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\iriasu_hb4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_irias3_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,80
mov %skill01,21
mov %skill02,5
mov %skill03,5
mov %skill04,5
mov %skill05,5
mov %item01,10
gosub *setwindow_01
if %bwait=210 mov %nanido,1:goto *irias1_start
if %bwait=211 mov %nanido,2:goto *irias1_start
if %bwait=212 mov %nanido,3:goto *irias1_start
lsp 700,":a;chara\iriasu_st02.bmp",0,0
bg "bg\bg001.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Ilias"
if %bwait=213 goto *irias1_h



*zukan_irias4

mov $zname,"Goddess Ilias"
mov $zlavel,"irias4"
itoa2 $zukan_ko,%2728
mov %zukan_hyouzyonum,1
mov %zukan_pozunum,2
mov %zukan_bukkakenum,2
mov %zukan_sentounum,1
mov %zukan_ryozyokunum,2
if %2843=0 mov %ryozyoku1,0
if %2843>0 mov %ryozyoku1,1
if %2844=0 mov %ryozyoku2,0
if %2844>0 mov %ryozyoku2,1
if %2728=0 mov %zukancg,0
if %2728>0 mov %zukancg,1
mov %zukan_x1,-150
mov %zukan_x2,0
mov $zukan_lv,"XXX"
mov $zukan_hp,"UOOOOO"
mov $zukan_skill1,"Holy Hair"
mov %zukan_skillc1,4124
mov $zukan_skill2,"Holy Feathers"
mov %zukan_skillc2,4125
mov $zukan_skill3,"Embrace of the Goddess"
mov %zukan_skillc3,4126
mov $zukan_skill4,"Dark Goddess' Semen Extraction"
mov %zukan_skillc4,4127
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_irias4_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\ilias4.jpg",400,0
goto *zukan_kihonbtn



*zukan_irias4_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\iriasu2_st01.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\iriasu2_st11.bmp",%zukan_x0,0
if %zukan_bukkake1=1 lsp 441,":a;chara\iriasu2_bk01.bmp",%zukan_x0,0
if %zukan_bukkake1=0 csp 441
if %zukan_bukkake2=1 lsp 442,":a;chara\iriasu2_bk02.bmp",%zukan_x0,0
if %zukan_bukkake2=0 csp 442
return



*zukan_irias4_cg

lsp 500,":c;bg\bg001.bmp",0,0
lsp 430,":a;chara\iriasu2_st21.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\iriasu2_st22.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %2843=0 skip 13
lsp 430,":a;chara\iriasu2_ha1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":c;chara\iriasu2_ct01.bmp",572,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\iriasu2_ha2.bmp",0,0
lsp 420,":c;chara\iriasu2_ct02.bmp",572,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\iriasu2_ha3.bmp",0,0
lsp 420,":c;chara\iriasu2_ct03.bmp",572,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\iriasu2_ha4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %2844=0 return "*zukan_"+$zlavel
csp 420
lsp 430,":a;chara\iriasu2_hb1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\iriasu2_hb2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\iriasu2_hb3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\iriasu2_hb4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_irias4_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,80
mov %skill01,21
mov %skill02,5
mov %skill03,5
mov %skill04,5
mov %skill05,5
mov %item01,10
mov %check06,1
mov %ivent01,2
mov %ivent02,2
mov %ivent03,1
mov %ivent04,2
mov %ivent05,3
mov %ivent06,2
mov %ivent08,2
mov %ivent09,2
mov %ivent10,2
mov %ivent11,2
mov %ivent12,2
mov %ivent14,3
mov %ivent16,1
mov %ivent17,2
mov %ivent18,2
if %bwait=210 mov %nanido,1:goto *zukan_iriasu
if %bwait=211 mov %nanido,2:goto *zukan_iriasu
if %bwait=212 mov %nanido,3:goto *zukan_iriasu
gosub *setwindow_01
lsp 700,":a;chara\iriasu2_st01.bmp",0,0
bg "bg\bg001.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov $name,"Ilias"
if %bwait=213 goto *irias2_ha
if %bwait=214 goto *irias2_hb



*zukan_end

mov $zname,"Other Endings"
mov $zlavel,"end"
mov $zukan_ko,"None "
mov %zukan_hyouzyonum,1
mov %zukan_pozunum,1
mov %zukan_bukkakenum,0
mov %zukan_sentounum,0
mov %zukan_ryozyokunum,7
mov %ryozyoku1,1
mov %zukancg,1
mov %zukan_x1,-121
mov %zukan_x2,79
mov $zukan_lv,"None"
mov $zukan_hp,"None"
mov %zukan_skillc1,0
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_end_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\end.jpg",400,0
goto *zukan_kihonbtn



*zukan_end_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
return



*zukan_end_cg

lsp 500,":c;bg\bg179.bmp",0,0
lsp 430,":a;chara\end1_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\end1_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\end1_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\end1_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\end1_h5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\end1_h6.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 500,":c;bg\bg180.bmp",0,0
lsp 430,":a;chara\end2_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\end2_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\end2_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\end2_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\end2_h5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 500,":c;bg\bg060.bmp",0,0
lsp 430,":a;chara\end3_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\end3_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\end3_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\end3_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 500,":c;bg\bg049.bmp",0,0
lsp 430,":a;chara\end4_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\end4_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\end4_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\end4_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 500,":c;bg\bg067.bmp",0,0
lsp 430,":a;chara\end5_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\end5_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\end5_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\end5_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 500,":c;bg\bg181.bmp",0,0
lsp 430,":a;chara\end6_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\end6_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\end6_h3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\end6_h4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\end6_h5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 500,":c;bg\bg123.bmp",0,0
lsp 430,":a;chara\end7_h1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\end7_h2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\end7_h3.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_end_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,80
mov %skill01,21
mov %skill02,5
mov %skill03,5
mov %skill04,5
mov %skill05,5
mov %item01,10
gosub *setwindow_01
if %bwait=214 lsp 700,":a;chara\queenhapy_st11.bmp",0,0
if %bwait=215 lsp 700,":a;chara\cupid_st13.bmp",-160,0
if %bwait=215 lsp 701,":a;chara\valkyrie_st01.bmp",80,0
if %bwait=216 lsp 700,":a;chara\meia_st03.bmp",50,50
if %bwait=217 lsp 700,":a;chara\sara_st12r.bmp",0,0
if %bwait=218 lsp 700,":a;chara\succubus_st02.bmp",0,50
if %bwait=219 lsp 700,":a;chara\serene_st11.bmp",0,0
if %bwait=213 bg "bg\bg178.bmp",10,1500
if %bwait=214 bg "bg\bg023.bmp",10,1500
if %bwait=215 bg "bg\bg060.bmp",10,1500
if %bwait=216 bg "bg\bg049.bmp",10,1500
if %bwait=217 bg "bg\bg067.bmp",10,1500
if %bwait=218 bg "bg\bg106.bmp",10,1500
if %bwait=219 bg "bg\bg123.bmp",10,1500
if %bwait=213 bgm "bgm\city1.ogg"
if %bwait=214 bgm "bgm\mura2.ogg"
if %bwait=215 bgm "bgm\castle1.ogg"
if %bwait=216 bgm "bgm\city1.ogg"
if %bwait=217 bgm "bgm\hutuu1.ogg"
if %bwait=218 bgm "bgm\mura2.ogg"
if %bwait=219 bgm "bgm\gordport.ogg"
if %bwait=213 goto *city52_14a
if %bwait=214 goto *city53_14a
if %bwait=215 goto *city56b_13a
if %bwait=216 goto *city55_14a
if %bwait=217 goto *city57b_11c
if %bwait=218 goto *city63_13a
if %bwait=219 goto *city64_17a



*zukan_granberia5

mov $zname,"Granberia"
mov $zlavel,"granberia5"
mov $zukan_ko,"None "
mov %zukan_hyouzyonum,6
mov %zukan_pozunum,2
mov %zukan_bukkakenum,0
mov %zukan_sentounum,0
mov %zukan_ryozyokunum,2
if %hsean_shitenno5=0 mov %ryozyoku1,0
if %hsean_shitenno5>0 mov %ryozyoku1,1
if %hsean_shitenno1=0 mov %ryozyoku2,0
if %hsean_shitenno1>0 mov %ryozyoku2,1
mov %zukancg,1
mov %zukan_x1,-185
mov %zukan_x2,0
mov $zukan_lv,"PQU"
mov $zukan_hp,"QSOOO"
mov %zukan_skillc1,0
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_granberia5_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\granend.jpg",400,0
goto *zukan_kihonbtn



*zukan_granberia5_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=2 && %zukan_hyouzyo=4 mov %zukan_hyouzyo,1
if %zukan_pozu=2 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,3
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\granberia_st01.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\granberia_st02.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\granberia_st03.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\granberia_st04.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=5 lsp 450,":a;chara\granberia_st05.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=6 lsp 450,":a;chara\granberia_st06.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\granberia_st11.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\granberia_st12.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\granberia_st13.bmp",%zukan_x0,0
return



*zukan_granberia5_cg

if %hsean_shitenno5=0 skip 8
lsp 500,":c;bg\bg218.bmp",0,0
lsp 430,":a;chara\granberia_he1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\granberia_he2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\granberia_he3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
if %hsean_shitenno1=0 return "*zukan_"+$zlavel
lsp 500,":c;bg\bg047.bmp",0,0
lsp 430,":a;chara\granberia_hf1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\granberia_ct11.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\granberia_hf2.bmp",0,0
lsp 420,":a;chara\granberia_ct12.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\granberia_hf3.bmp",0,0
lsp 420,":a;chara\granberia_ct13.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_granberia5_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,80
mov %skill01,21
mov %skill02,5
mov %skill03,5
mov %skill04,5
mov %skill05,5
mov %item01,10
gosub *setwindow_01
if %bwait=213 lsp 700,":a;chara\granberia_st07.bmp",-160,0
if %bwait=213 lsp 701,":a;chara\arumaeruma_st13.bmp",160,0
if %bwait=214 lsp 700,":a;chara\granberia_st03.bmp",0,0
if %bwait=213 bg "bg\bg218.bmp",10,1500
if %bwait=214 bg "bg\bg047.bmp",10,1500
if %bwait=213 bgm "bgm\kiki2.ogg"
if %bwait=214 bgm "bgm\colosseum.ogg"
if %bwait=213 goto *city45_11j
if %bwait=214 goto *city62_15c



*zukan_arumaeruma4

mov $zname,"Alma Elma"
mov $zlavel,"arumaeruma4"
mov $zukan_ko,"None "
mov %zukan_hyouzyonum,3
mov %zukan_pozunum,2
mov %zukan_bukkakenum,0
mov %zukan_sentounum,0
mov %zukan_ryozyokunum,1
mov %ryozyoku1,1
mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PQT"
mov $zukan_hp,"PTOOO"
mov %zukan_skillc1,0
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_arumaeruma4_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\almaend.jpg",400,0
goto *zukan_kihonbtn



*zukan_arumaeruma4_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\arumaeruma_st11.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\arumaeruma_st12.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\arumaeruma_st13.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\arumaeruma_st21.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\arumaeruma_st22.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\arumaeruma_st23.bmp",%zukan_x0,0
return



*zukan_arumaeruma4_cg

lsp 500,":c;bg\bg084.bmp",0,0
lsp 430,":a;chara\arumaeruma_hg1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\arumaeruma_hg2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\arumaeruma_hg3.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_arumaeruma4_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,80
mov %skill01,21
mov %skill02,5
mov %skill03,5
mov %skill04,5
mov %skill05,5
mov %item01,10
gosub *setwindow_01
lsp 700,":a;chara\arumaeruma_hg1.bmp",0,0
bg "bg\bg084.bmp",10,1500
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
if %bwait=213 goto *city59_17c



*zukan_tamamo3

mov $zname,"Tamamo"
mov $zlavel,"tamamo3"
mov $zukan_ko,"None "
mov %zukan_hyouzyonum,5
mov %zukan_pozunum,2
mov %zukan_bukkakenum,0
mov %zukan_sentounum,0
mov %zukan_ryozyokunum,1
mov %ryozyoku1,1
mov %zukancg,1
mov %zukan_x1,-200
mov %zukan_x2,0
mov $zukan_lv,"PQW"
mov $zukan_hp,"QQOOO"
mov %zukan_skillc1,0
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_tamamo3_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\tamamoend.jpg",400,0
goto *zukan_kihonbtn



*zukan_tamamo3_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_pozu=1 && %zukan_hyouzyo=4 mov %zukan_hyouzyo,1
if %zukan_pozu=1 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,3
if %zukan_pozu=2 && %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_pozu=2 && %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\tamamo_st51.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\tamamo_st52.bmp",%zukan_x0,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\tamamo_st53.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\tamamo_st01.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\tamamo_st02.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\tamamo_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=4 lsp 450,":a;chara\tamamo_st04.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=5 lsp 450,":a;chara\tamamo_st05.bmp",%zukan_x0+100,20
return



*zukan_tamamo3_cg

lsp 500,":c;bg\bg176.bmp",0,0
lsp 430,":a;chara\tamamo_hd01.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tamamo_hd02.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tamamo_hd03.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tamamo_hd04.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tamamo_hd05.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tamamo_hd06.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tamamo_hd07.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tamamo_hd08.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tamamo_hd09.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\tamamo_hd10.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_tamamo3_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,80
mov %skill01,21
mov %skill02,5
mov %skill03,5
mov %skill04,5
mov %skill05,5
mov %item01,10
gosub *setwindow_01
lsp 700,":a;chara\tamamo_st02.bmp",0,0
bg "bg\bg159.bmp",10,1500
bgm "bgm\tamamo.ogg"
if %bwait=213 goto *city60_12a



*zukan_erbetie3

mov $zname,"Erubetie"
mov $zlavel,"erbetie3"
mov $zukan_ko,"None "
mov %zukan_hyouzyonum,1
mov %zukan_pozunum,1
mov %zukan_bukkakenum,0
mov %zukan_sentounum,0
mov %zukan_ryozyokunum,1
mov %ryozyoku1,1
mov %zukancg,1
mov %zukan_x1,25
mov %zukan_x2,225
mov $zukan_lv,"PQT"
mov $zukan_hp,"QQOOO"
mov %zukan_skillc1,0
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_erbetie3_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\eruend.jpg",400,0
goto *zukan_kihonbtn



*zukan_erbetie3_p

if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_hyouzyo=1 lsp 450,":a;chara\erbetie_st01.bmp",%zukan_x0,0
return



*zukan_erbetie3_cg

lsp 500,":c;bg\bg177.bmp",0,0
lsp 430,":a;chara\erbetie_hc1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\erbetie_hc2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\erbetie_hc3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\erbetie_hc4.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_erbetie3_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,80
mov %skill01,21
mov %skill02,5
mov %skill03,5
mov %skill04,5
mov %skill05,5
mov %item01,10
gosub *setwindow_01
lsp 700,":a;chara\erbetie_st01.bmp",225,0
bg "bg\bg095.bmp",10,1500
bgm "bgm\plansect.ogg"
if %bwait=213 goto *city61_17a



*zukan_alice5

mov $zname,"Alice"
mov $zlavel,"alice5"
itoa2 $zukan_ko,%27
mov $zukan_ko,"None "
mov %zukan_hyouzyonum,10
mov %zukan_pozunum,4
mov %zukan_bukkakenum,0
mov %zukan_sentounum,0
mov %zukan_ryozyokunum,2
mov %ryozyoku1,1
mov %ryozyoku2,1
mov %zukancg,1
mov %zukan_x1,-20
mov %zukan_x2,150
mov $zukan_lv,"PST"
mov $zukan_hp,"RQOOO"
mov %zukan_skillc1,0
screen_clear
btndef clear
shadedistance 0,0
lsp 502,":c;system\ency.jpg",0,0
lsp 400,":c;system\ency2.jpg",400,0
mov %zukan_koumoku,1
mov %zukan_x0,%zukan_x1
gosub *zukan_alice5_p
len %name_count,$zname:strsp 300,$zname,420,50,(%name_count+1)/2+1,1,25,25,0,0,1,0,#ee0000
lsp 400,":c;ency\aliceend.jpg",400,0
goto *zukan_kihonbtn



*zukan_alice5_p

if %zukan_pozu=%zukan_pozunum+1 mov %zukan_pozu,1
if %zukan_pozu=0 mov %zukan_pozu,%zukan_pozunum
if %zukan_hyouzyo=%zukan_hyouzyonum+1 mov %zukan_hyouzyo,1
if %zukan_hyouzyo=0 mov %zukan_hyouzyo,%zukan_hyouzyonum
if %zukan_pozu=1 && %zukan_hyouzyo=1 lsp 450,":a;chara\alice_st01.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=1 lsp 450,":a;chara\alice_st01b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_hyouzyo=1 lsp 450,":a;chara\alice_st11.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=1 lsp 450,":a;chara\alice_st11b.bmp",%zukan_x0-80,0
if %zukan_pozu=1 && %zukan_hyouzyo=2 lsp 450,":a;chara\alice_st02.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=2 lsp 450,":a;chara\alice_st02b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_hyouzyo=2 lsp 450,":a;chara\alice_st12.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=2 lsp 450,":a;chara\alice_st12b.bmp",%zukan_x0-80,0
if %zukan_pozu=1 && %zukan_hyouzyo=3 lsp 450,":a;chara\alice_st03.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=3 lsp 450,":a;chara\alice_st03b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_hyouzyo=3 lsp 450,":a;chara\alice_st13.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=3 lsp 450,":a;chara\alice_st13b.bmp",%zukan_x0-80,0
if %zukan_pozu=1 && %zukan_hyouzyo=4 lsp 450,":a;chara\alice_st04.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=4 lsp 450,":a;chara\alice_st04b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_hyouzyo=4 lsp 450,":a;chara\alice_st14.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=4 lsp 450,":a;chara\alice_st14b.bmp",%zukan_x0-80,0
if %zukan_pozu=1 && %zukan_hyouzyo=5 lsp 450,":a;chara\alice_st05.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=5 lsp 450,":a;chara\alice_st05b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_hyouzyo=5 lsp 450,":a;chara\alice_st15.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=5 lsp 450,":a;chara\alice_st15b.bmp",%zukan_x0-80,0
if %zukan_pozu=1 && %zukan_hyouzyo=6 lsp 450,":a;chara\alice_st06.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=6 lsp 450,":a;chara\alice_st06b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_hyouzyo=6 lsp 450,":a;chara\alice_st16.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=6 lsp 450,":a;chara\alice_st16bre.bmp",%zukan_x0-80,0
if %zukan_pozu=1 && %zukan_hyouzyo=7 lsp 450,":a;chara\alice_st07.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=7 lsp 450,":a;chara\alice_st07b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_hyouzyo=7 lsp 450,":a;chara\alice_st17.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=7 lsp 450,":a;chara\alice_st17bre.bmp",%zukan_x0-80,0
if %zukan_pozu=1 && %zukan_hyouzyo=8 lsp 450,":a;chara\alice_st08.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=8 lsp 450,":a;chara\alice_st08b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_hyouzyo=8 lsp 450,":a;chara\alice_st18.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=8 lsp 450,":a;chara\alice_st18bre.bmp",%zukan_x0-80,0
if %zukan_pozu=1 && %zukan_hyouzyo=9 lsp 450,":a;chara\alice_st09.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=9 lsp 450,":a;chara\alice_st09b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_hyouzyo=9 lsp 450,":a;chara\alice_st19.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=9 lsp 450,":a;chara\alice_st19bre.bmp",%zukan_x0-80,0
if %zukan_pozu=1 && %zukan_hyouzyo=10 lsp 450,":a;chara\alice_st51.bmp",%zukan_x0,0
if %zukan_pozu=2 && %zukan_hyouzyo=10 lsp 450,":a;chara\alice_st51b.bmp",%zukan_x0-80,0
if %zukan_pozu=3 && %zukan_hyouzyo=10 lsp 450,":a;chara\alice_st61.bmp",%zukan_x0,0
if %zukan_pozu=4 && %zukan_hyouzyo=10 lsp 450,":a;chara\alice_st61b.bmp",%zukan_x0-80,0
return



*zukan_alice5_cg

lsp 500,":c;bg\bg195.bmp",0,0
lsp 430,":a;chara\alice_H11_1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_H11_2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_H11_3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_H11_4.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_H11_5.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 500,":c;bg\bg047.bmp",0,0
lsp 430,":a;chara\alice_H12_1.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_H12_2.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\alice_ct01.bmp",401,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\alice_ct02.bmp",401,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\alice_ct03.bmp",401,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 420,":a;chara\alice_ct04.bmp",401,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 430,":a;chara\alice_H12_3.bmp",0,0
print 10,500:lrclick:getret %hanyo1:if %hanyo1=0 return "*zukan_"+$zlavel
lsp 500,":c;bg\bg001.bmp",0,0
csp 420
lsp 430,":a;chara\alice_iv03.bmp",0,0
print 10,500:lrclick
return "*zukan_"+$zlavel



*zukan_alice5_kaisou

bgmstop
csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,2
mov %mylv,80
mov %skill01,21
mov %skill02,5
mov %skill03,5
mov %skill04,5
mov %skill05,5
mov %item01,10
gosub *setwindow_01
lsp 700,":a;chara\alice_st02b.bmp",67,0
if %bwait=213 bg "bg\bg195.bmp",10,1500
if %bwait=214 bg "bg\bg047.bmp",10,1500
if %bwait=213 bgm "bgm\hutuu1.ogg"
if %bwait=213 goto *sean0399
if %bwait=214 goto *sean0414



*city01_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Man A ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Man B ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Old Man ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Girl ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Elder ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Soldier ",95,310:spbtn 606,606
lsp 607,":s/20,20,0;#FFFFFF#FF4444Knight ",95,340:spbtn 607,607
lsp 610,":s/20,20,0;#FFFFFF#FF4444Betty ",410,160:spbtn 610,610
strsp 611,"Weapon Shop",410,190,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
strsp 612,"Tool Shop ",410,220,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 612,612
lsp 613,":s/20,20,0;#FFFFFF#FF4444Ilias Temple ",410,250:spbtn 613,613
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city01_main
if %cmd1=-1 gosub *menu:goto *city01_main
cspl 600,699
if %cmd1=601 goto *city01_01
if %cmd1=602 goto *city01_02
if %cmd1=603 goto *city01_03
if %cmd1=604 goto *city01_04
if %cmd1=605 goto *city01_05
if %cmd1=606 goto *city01_06
if %cmd1=607 goto *city01_07
if %cmd1=610 goto *city01_10
if %cmd1=611 goto *city01_11
if %cmd1=612 goto *city01_12
if %cmd1=613 goto *city01_13
if %cmd1=619 return
goto *city01_main



*city01_01

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Man A"
>Oh Luka! Wasn't today your baptism?\
>You look completely different from before!@
>Make sure you come back and visit!\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city01_main



*city01_02

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Man B"
>My friend who lives in Iliasburg got kidnapped by a Harpy...@
>It seems like he was forced to become one of their husbands...\
>I feel so bad for him!@
>I hate monsters so much...@
>Please kill as many as you can...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city01_main



*city01_03

lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Old Man"
>Geez... for a monster to show up so close to this village.@
>I was so surprised earlier...\
>Please, Luka, kill the Monster Lord and get rid of all the monsters!@
>I'll be looking forward to it while I wait here!\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city01_main



*city01_04

lsp 700,":a;chara\mob_syouzyo.bmp",0,0:print 10,500
gosub *setwindow_01
name "Girl"
>Big bro! Good luck!@
>Beat all those bad monsters!\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city01_main



*city01_05

lsp 700,":a;chara\mob_rouzin2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Elder"
>Young'uns these days don't have any faith in Ilias...@
>That must be why the monster came to this village...\
>Were you able to be baptized, Luka?@
>Make sure you serve Ilias faithfully.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city01_main



*city01_06

lsp 700,":a;chara\mob_sensi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier"
>Oi, Luka! Finally setting out?@
>You're pretty good for someone so young...\
>It might just be possible for you to beat the Monster Lord!\
>If so, will I go down in history as the person who sent off the Hero?\
>Just kidding... good luck on your journey!\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city01_main



*city01_07

lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Knight"
>Never give in to the temptations of a monster.@
>If you let a monster make you ejaculate, all of your fighting spirit will vanish.\
>I think it was called [Critical Ecstasy].@
>Scholars have concluded that the act of ejaculation drains the magic needed to fight.\
>I still don't really understand it...@
>But in other words, if you come, you will surrender in both mind and spirit.\
>At that point, you won't be able to resist anything that they do to you...\
>However, there are a lot of crazy people who actually desire such a thing...@
>How deplorable...\
>Oh great Ilias, please give your divine punishment to such depraved individuals...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city01_main



*city01_10

bg "bg\bg038.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_obasan.bmp",0,0:print 10,500
name "Betty"
>Luka... I heard you weren't baptized.@
>Is it true?\
name ""
name "Luka"
>Ahh... um...@
>So you found out...\
name ""
name "Betty"
>You're still going out on a journey, though?@
>Going out without Ilias' protection is dangerous...\
name ""
name "Luka"
>I know...\
name ""
name "Betty"
>You aren't really listening, are you?@
>Don't overwork yourself, Luka.@
>You can come back here anytime.\
name ""
name "Luka"
>Thank you.@
>Well, I have to head out!\
>I'll definitely return after I defeat the Monster Lord!\
name ""
dwave 1,"se\asioto2.ogg"
wait 1000
name "Betty"
>Oh great Ilias... please protect that child.\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg003.bmp",7,1000
goto *city01_main



*city01_11

bg "bg\bg150.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan3.bmp",0,0:print 10,500
name "Smith"
>Oh, Luka! You're finally heading out, huh?\
name ""
name "Luka"
>I am... thank you for this sword.\
name ""
>My sword was custom made by the Smith here.@
>It was made so that even someone small like me could use it easily.\
name "Luka"
>I'll cherish this sword that you made for me.\
name ""
name "Smith"
>It's fine if you don't.@
>While traveling, please don't hesitate to use better weapons.\
>If you don't constantly get stronger weapons, you'll never be able to defeat a Monster Lord.\
>It would be very strange to keep using a weak weapon.\
name ""
name "Luka"
>O... of course. Even so, I'll still take care of it.\
name ""
name "Smith"
>Ahh... do what you like!@
>Just don't do something stupid!\
name ""
name "Luka"
>I won't! I'm heading out now!\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg003.bmp",7,1000
goto *city01_main



*city01_12

bg "bg\bg151.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan2.bmp",0,0:print 10,500
name "Owner"
>Oh Luka... you came all the way over here to say goodbye to me?\
>Even though I haven't been in this village for too long, you were a good customer.\
name ""
name "Luka"
>Yea... I got injured a lot, after all.\
name ""
>While training how to fight, it's only natural to get a lot of injuries.@
>Once every three days, I would come here and buy medicinal herbs.\
name "Owner"
>When you come back to this village, my shop may not be here.@
>Recently, sales have been pretty bad...\
name ""
name "Luka"
>Not too many pilgrims have been coming to Ilias temple, after all...@
>There used to be a lot of travelers coming through.\
name ""
name "Owner"
>Have people lost their faith...?@
>Oh well, there's no reason for me to complain to you.\
>Good luck, Luka! I'll be rooting for you!\
name ""
name "Luka"
>Thank you, I'll do my best!\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg003.bmp",7,1000
goto *city01_main



*city01_13

bg "bg\bg007.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_sinkan.bmp",0,0:print 10,500
name "Priest"
>You were unable to receive the baptism.@
>I don't know how she thinks, but Ilias did not descend for your baptism.\
name ""
name "Luka"
>Y... yea...\
name ""
name "Priest"
>The great Ilias is always watching you.@
>I can't even say such a cliche to you.\
>Ilias abandoned you.@
>Even so, you are still going to travel?\
name ""
name "Luka"
>Yes, I will!\
name ""
name "Priest"
>Even if Ilias is not watching you, I shall pray for you.@
>Luka, please be safe.\
name ""
name "Luka"
>Thank you! I'll do my best!\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg003.bmp",7,1000
goto *city01_main



*city02_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Youth ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Girl ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Prostitute ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Man ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Old Woman ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Soldier A ",95,310:spbtn 606,606
lsp 607,":s/20,20,0;#FFFFFF#FF4444Soldier B ",95,340:spbtn 607,607
if %hanyo1=0 strsp 610,"Weapon Shop ",410,160,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
if %hanyo1=1 strsp 610,"Weapon Shop ",410,160,7,1,20,20,0,0,1,1,#bbbbbb
strsp 611,"Tool Shop",410,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Church ",410,220:spbtn 612,612
strsp 613,"Sutherland Inn",410,250,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 613,613
if %hanyo1=0 lsp 619,":s/20,20,0;#bbbbbbLeave City ",410,400
if %hanyo1=1 lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave City ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city02_main
if %cmd1=-1 gosub *menu:goto *city02_main
cspl 600,699
if %cmd1=601 goto *city02_01
if %cmd1=602 goto *city02_02
if %cmd1=603 goto *city02_03
if %cmd1=604 goto *city02_04
if %cmd1=605 goto *city02_05
if %cmd1=606 goto *city02_06
if %cmd1=607 goto *city02_07
if %cmd1=610 goto *city02_10
if %cmd1=611 goto *city02_11
if %cmd1=612 goto *city02_12
if %cmd1=613 goto *city02_13
if %cmd1=619 return
goto *city02_main



*city02_01

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Youth"
>I really thought I was going to die...@
>"Four Heavenly Knights" indeed... she was insanely powerful.\
>She actually stared right at me once...@>and I wet my pants...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city02_main



*city02_02

lsp 700,":a;chara\mob_musume1.bmp",175,0:print 10,500
gosub *setwindow_01
name "Girl"
>Monsters attacking us even here...@
>Are there no Heroes left to drive them out...?\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city02_main



*city02_03

lsp 700,":a;chara\mob_musume2.bmp",175,0:print 10,500
gosub *setwindow_01
name "Prostitute"
>Ara, the Hero who saved the city.@
>You look weak, but you were still able to drive her off...\
>Fufu... I'll give you a special discount.\
name ""
name "Luka"
>Err, sorry...@>That sort of thing is...\
name ""
name "Prostitute"
>Fufu... what a cute boy.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city02_main



*city02_04

lsp 700,":a;chara\mob_seinen2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Man"
>Monsters these days are doing as they please...@
>At this rate, will Humanity be destroyed...?\
>Damn it... can't somebody do something?\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city02_main



*city02_05

lsp 700,":a;chara\mob_rouba.bmp",0,0:print 10,500
gosub *setwindow_01
name "Old Woman"
>Those worthless people who call themselves Heroes.@
>At the first sign of trouble, they all scatter.\
>Running away... pretending they're dead... how pathetic.\
>But I was told that a small boy challenged Granberia, holding some tiny dagger.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city02_main



*city02_06

lsp 700,":a;chara\mob_sensi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier A"
>Granberia was probably going to use this city as a bridgehead to attack the Ilias Temple to the south...\
>Is the temple a threat to the monsters?\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city02_main



*city02_07

lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier B"
>Even though Granberia was a monster, she still had a chivalrous spirit.@
>She didn't fight children or the elderly, and didn't kill anyone.\
>Even though we shouldn't compliment a monster, many of us can't help but yearn for that kind of power...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city02_main



*city02_10

bg "bg\bg152.bmp",7,1000
gosub *setwindow_01
name "Luka"
>Hmm, this armor looks good.@
>A true Hero would wear armor like this...\
name ""
>A really sturdy piece of armor... it's a shame we don't have enough money to buy it.\
name "Luka"
>This piece looks good too...@
>It has jagged spikes all over it and everything.\
name ""
>Alice sighs at me while I stare at the spiked armor.\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Idiot.@
>If you wore that, you wouldn't be able to even move.\
name ""
>Saying that, she dropped her glance to an ordinary looking shirt on the counter.\
name "Alice"
>This looks good.@
>We have enough money to buy this, right?\
name ""
name "Luka"
>This....?\
name ""
>It's plain looking, but it seems pretty well made.\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-120,0
lsp 701,":a;chara\mob_ozisan1.bmp",160,0:print 10,500
name "Shopkeeper"
>Ahh, you have good eyes, Miss.@> That shirt was woven in a special way, for maximum protection.\
name ""
name "Luka"
>Oh really?\
name ""
name "Shopkeeper"
>It's a good piece of protective wear, even if it looks plain.@
>Recently it seems like Heroes have been only caring about looks, though.\
>Those kinds of people don't see how good this piece really is.@
>It looks like you're different, though!\
name ""
name "Luka"
>I see!@> Alright, I'll take it!\
name ""
name "Shopkeeper"
eng "Thanks for your business!":$sel6/
dwave 1,"se\kaimono.ogg"
\
name ""
>With both Alice and the shopkeeper recommending it, it must be pretty good.\
name "Shopkeeper"
>Even though it's a great piece of armor made by Enrika, it hasn't sold well because it just looks too plain.\
name ""
name "Luka"
>Enrika? Is that who made this?\
name ""
name "Shopkeeper"
>Ah, not a person. Enrika is the name of a small village to southwest.\
name ""
name "Shopkeeper"
>Even though they isolate themselves from the rest of the world, they make some pretty good pieces of armor.\
name ""
name "Luka"
>Oh? I didn't know that...\
name ""
>Even though I came from the nearby Ilias Village, I hadn't heard of such a town.\
>I'll keep that village in mind.\
>I put on the shirt and head out of the store.\
mov %item01,4
mov %hanyo1,1
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg018.bmp",7,1000
goto *city02_main



*city02_11

bg "bg\bg151.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
name "Shopkeeper"
>Welcome! Are you looking for anything in particular?\
name ""
name "Luka"
>I'll just look around for a moment...\
name ""
name "Shopkeeper"
>Do you need medicinal herbs, or antidotes?\
name ""
name "Luka"
>I brought a lot with me when I set out, and I haven't used any yet...\
name ""
>I was barely attacked by monsters, and they used pleasure attacks...\
name "Shopkeeper"
>That's true...@
>Monsters these days don't seem to really be injuring people.\
>They just try to tempt them with obscene things.@
>Well then, how about this armor plated jock strap?\
name ""
name "Luka"
>It seems hard to move in...@
>And it looks used...\
name ""
name "Shopkeeper"
>You can use it in various ways though...\
name ""
>Not buying anything, I head out of the shop.\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg018.bmp",7,1000
goto *city02_main



*city02_12

bg "bg\bg153.bmp",7,1000
gosub *setwindow_01
name "Luka"
>Ilias, please watch over me!\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>How boring.\
name ""
name "Luka"
>Really, you...@
>I just want to give my prayers to her in thanks.\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-120,0
lsp 701,":a;chara\mob_sinkan.bmp",160,0:print 10,500
name "Priest"
>Exactly. One should always pray faithfully.\
name ""
name "Alice"
>A boring person came out.\
name ""
name "Luka"
>Really, you...@
>It's true that priests are usually boring...\
name ""
name "Priest"
>...Well I'm sorry for being boring.\
>More importantly, you must remember to pray faithfully.@
>It's one of the five commandments, after all.\
name ""
name "Alice"
>Really, how boring.\
name ""
name "Luka"
>Even if he's boring, I should still listen.\
name ""
name "Priest"
>..........\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg018.bmp",7,1000
goto *city02_main



*city02_13

bg "bg\bg016.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_obasan.bmp",0,0:print 10,500
name "Owner"
>Oh? Are you staying here today?@
>I'll give you a special rate today...\
>But I don't have any more Ama-ama Dangos, because I'm out of Happiness Honey.\
>If a Hero doesn't go to Happiness Village soon, I may never be able to make them again.\
name ""
>She says as she looks at me expectantly.\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg018.bmp",7,1000
goto *city02_main



*map1

saveoff
textoff
csp -1
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
bg "bg\map1.bmp",10,1000
goto *map1_2



*map1_2

lsp 601,":s/20,20,0;#FFFFFF#FF4444Iliasburg ",395,280:spbtn 601,11
lsp 602,":s/20,20,0;#FFFFFF#FF4444Iliasport ",275,40:spbtn 602,12
strsp 607,"Req. Level: 9",255,60,8,1,20,20,0,0,1,1,#FFFFFF
lsp 603,":s/20,20,0;#FFFFFF#FF4444Irina Mountains ",155,240:spbtn 603,13
if %ivent01=0 strsp 608,"Req. Level: 4",165,260,8,1,20,20,0,0,1,1,#FFFFFF
if %ivent01=1 lsp 608,":s/20,20,0;#FFFFFFDone ",210,260
lsp 604,":s/20,20,0;#FFFFFF#FF4444Happiness Village ",615,180:spbtn 604,14
if %ivent02=0 strsp 609,"Req. Level: 6",635,200,8,1,20,20,0,0,1,1,#FFFFFF
if %ivent02=1 lsp 609,":s/20,20,0;#FFFFFFDone ",680,200
lsp 605,":s/20,20,0;#FFFFFF#FF4444Enrika ",260,390:spbtn 605,15
if %ivent03=0 strsp 610,"Req. Level: 8",225,410,8,1,20,20,0,0,1,1,#FFFFFF
if %ivent03=1 lsp 610,":s/20,20,0;#FFFFFFDone ",270,410
lsp 606,":s/20,20,0;#FFFFFF#FF4444Ilias Village ",365,470:spbtn 606,16
print 1
btnwait2 %cmd1
if %cmd1=0 goto *map1_2
if %cmd1=-1 gosub *menu:goto *map1_2
csp -1
btndef clear
if %cmd1=11 gosub *city03_main0:dwave 1,"se\asioto2.ogg":bg black,7,1500:bgm "bgm\field1.ogg":goto *map1
if %cmd1=12 goto *sean0071
if %cmd1=13 && %ivent01=0 goto *sean0054
if %cmd1=13 && %ivent01=1 goto *sean0059
if %cmd1=14 && %ivent02=0 goto *sean0060
if %cmd1=14 && %ivent02=1 gosub *city04_main0:dwave 1,"se\asioto2.ogg":bg black,7,1500:bgm "bgm\field1.ogg":goto *map1
if %cmd1=15 && %ivent03=0 goto *sean0067
if %cmd1=15 && %ivent03=1 goto *sean0070
if %cmd1=16 goto *sean0053
goto *map1_2



*city03_main0

mov %genzaiti,1
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\asioto2.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg018.bmp",7,1500
bgm "bgm\city1.ogg"
goto *city03_main



*city03_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Youth ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Girl ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Prostitute ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Man ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Old Woman ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Soldier A ",95,310:spbtn 606,606
lsp 607,":s/20,20,0;#FFFFFF#FF4444Soldier B ",95,340:spbtn 607,607
if %ivent01=1 strsp 608,"Goblin Girl",95,370,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 608,608
strsp 610,"Weapon Shop",410,160,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
strsp 611,"Tool Shop",410,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Church ",410,220:spbtn 612,612
strsp 613,"Sutherland Inn",410,250,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 613,613
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city03_main
if %cmd1=-1 gosub *menu:goto *city03_main
cspl 600,699
if %cmd1=601 && %ivent01=0 goto *city03_01a
if %cmd1=601 && %ivent01=1 goto *city03_01b
if %cmd1=602 && %ivent01=0 goto *city03_02a
if %cmd1=602 && %ivent01=1 goto *city03_02b
if %cmd1=603 && %ivent01=0 goto *city03_03a
if %cmd1=603 && %ivent01=1 goto *city03_03b
if %cmd1=604 && %ivent01=0 goto *city03_04a
if %cmd1=604 && %ivent01=1 goto *city03_04b
if %cmd1=605 && %ivent01=0 goto *city03_05a
if %cmd1=605 && %ivent01=1 goto *city03_05b
if %cmd1=606 && %ivent01=0 goto *city03_06a
if %cmd1=606 && %ivent01=1 goto *city03_06b
if %cmd1=607 && %ivent01=0 goto *city03_07a
if %cmd1=607 && %ivent01=1 goto *city03_07b
if %cmd1=608 goto *city03_08
if %cmd1=610 && %ivent01=0 goto *city03_10a
if %cmd1=610 && %ivent01=1 goto *city03_10b
if %cmd1=611 && %ivent01=0 goto *city03_11a
if %cmd1=611 && %ivent01=1 goto *city03_11b
if %cmd1=612 && %ivent01=0 goto *city03_12a
if %cmd1=612 && %ivent01=1 goto *city03_12b
if %cmd1=613 && %ivent01=0 && %ivent02=0 goto *city03_13a
if %cmd1=613 && %ivent01=1 && %ivent02=0 goto *city03_13b
if %cmd1=613 && %ivent02=1 goto *city03_13c
if %cmd1=619 return
goto *city03_main



*city03_01a

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Youth"
>The band of thieves...?@
>I heard there was a dragon in it.\
>Last time I left the city I thought I heard its voice, and I wet myself.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city03_main



*city03_01b

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Youth"
>How could I have wet myself from such a little monster...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city03_main



*city03_02a

lsp 700,":a;chara\mob_musume1.bmp",175,0:print 10,500
gosub *setwindow_01
name "Girl"
>Monsters attacking people randomly...@
>The world is terrifying...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city03_main



*city03_02b

lsp 700,":a;chara\mob_musume1.bmp",175,0:print 10,500
gosub *setwindow_01
name "Girl"
>They weren't what I was expecting them to be...@
>I'm only a little scared now.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city03_main



*city03_03a

lsp 700,":a;chara\mob_musume2.bmp",175,0:print 10,500
gosub *setwindow_01
name "Prostitute"
>All those soldiers who were defeated left town...@
>Business isn't as good anymore...\
>Hey, boy... don't you want to play with me a bit?\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-120,0
lsp 701,":a;chara\mob_musume2.bmp",335,0:print 10,500
name "Alice"
>..........\
name ""
name "Prostitute"
>Oh, sorry, I didn't see you were taken...@
>Those clothes... are you in the same line of work as me...?\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city03_main



*city03_03b

lsp 700,":a;chara\mob_musume2.bmp",175,0:print 10,500
gosub *setwindow_01
name "Prostitute"
>I just saw the dragon and the vampire...@
>Is that dragon going to get bigger?\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city03_main



*city03_04a

lsp 700,":a;chara\mob_seinen2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Man"
>Everyone is scared of leaving the city because of the band of thieves.@
>Can you please do something?\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city03_main



*city03_04b

lsp 700,":a;chara\mob_seinen2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Man"
>I don't want monsters in this city...@
>It seems like I'm in the minority, so I won't say anything.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city03_main



*city03_05a

lsp 700,":a;chara\mob_rouba.bmp",0,0:print 10,500
gosub *setwindow_01
name "Old Woman"
>A dragon and a vampire...@
>Knowing they could attack the city at any moment, I'm scared...\
>Did you pray to Ilias today?@
>Oh please protect our defenseless city...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city03_main



*city03_05b

lsp 700,":a;chara\mob_rouba.bmp",0,0:print 10,500
gosub *setwindow_01
name "Old Woman"
>So the band of thieves were just those little things...\
>What are their parents doing? Do monsters not care at all about their children?\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-120,0
lsp 701,":a;chara\mob_rouba.bmp",160,0:print 10,500
name "Alice"
>Monsters raise their children differently depending on the type. Some let their children be independent from birth.\
>Since I'm a Lamia, I don't really know how a dragon or Vampire would raise their kids.\
name ""
name "Luka"
>I hope the people of this city can raise them...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city03_main



*city03_06a

lsp 700,":a;chara\mob_sensi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier A"
>I want to drive out the dragon and the vampire, but I have a stomachache today.\
>Oops! It also seems like I'm scheduled for a cold tomorrow, and a headache after that.@
>Guess I won't be able to do it for a while...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city03_main



*city03_06b

lsp 700,":a;chara\mob_sensi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier A"
>Crap... I'm really sick now...@
>Is this punishment for before?\
>I won't lie anymore, Ilias, I promise!@
>I won't bully my little sister either...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city03_main



*city03_07a

lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier B"
>The band of thieves?@
>I want to drive them away, but I'm afraid I'm too weak...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city03_main



*city03_07b

lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier B"
>You had the courage to go and fight them.@
>But they turned out to be so little...\
>Your courage should still be praised, though.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city03_main



*city03_08

lsp 700,":a;chara\gob_st23.bmp",0,70:print 10,500
gosub *setwindow_01
name "Goblin Girl"
>Move, move, move! \
>Ah! The Hero from before!@
>I'm working hard on this street! \
name ""
name "Luka"
>Yeah, you'll grow up to be a splendid monster.@
>You seem a lot different from the other three.\
name ""
name "Goblin Girl"
>Ah, they were born in the north of Sentora, and I came from the east.\
>I met them when we were all heading south.\
name ""
name "Luka"
>Ah... is that how you met?\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-120,0
lsp 701,":a;chara\gob_st23.bmp",160,70:print 10,500
name "Alice"
>From the east? I didn't think they dressed like you do...\
name ""
name "Goblin Girl"
>I used to dress like they did, but I changed.@
>This is the bandit style from the Natalia area.\
name ""
name "Luka"
>I... see...\
name ""
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city03_main



*city03_10a

bg "bg\bg152.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
name "Shopkeeper"
>The band of thieves? Yeah, they stole five of my knives.\
>Sam had his axe stolen, and then they stole his lunch.@
>They're truly cold-hearted.\
>That's not all, either!@
>Tommy's apple tree had half of its apples eaten, too.\
>When he came back one night, there were only apple cores left lying around.@
>How creepy.\
name "Luka"
>..........\
name ""
>...That doesn't sound like that big of a deal...\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg018.bmp",7,1000
goto *city03_main



*city03_10b

bg "bg\bg152.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan1.bmp",-160,0
lsp 701,":a;chara\dragonp_st13.bmp",160,100:print 10,500
name "Shopkeeper"
>[Strike while the iron is hot] is no ordinary proverb!@
>It's a way of life!\
name ""
dwave 1,"se\kazi.ogg"
name "Dragon Pup"
>Ugaa!\
name ""
>The little dragon seems to be training with the blacksmith.\
name "Shopkeeper"
>Oh, Hero!@
>This little child is giving it her all!\
>Once she can learn a useful skill, I'm sure she won't do bad things anymore.\
name ""
dwave 1,"se\kazi.ogg"
name "Dragon Pup"
>Uga! I'll do my best!@
>I'll grow up to be a good blacksmith!\
name ""
name "Luka"
>Good luck!\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg018.bmp",7,1000
goto *city03_main



*city03_11a

bg "bg\bg151.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
name "Shopkeeper"
>The band of thieves?@
>Yeah, they stole my shipment of honey.\
>A dragon and a vampire...@
>I'm just scared they might attack the city.\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg018.bmp",7,1000
goto *city03_main



*city03_11b

bg "bg\bg151.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_seinen1.bmp",-160,0
lsp 701,":a;chara\vgirl_st13.bmp",160,100:print 10,500
name "Shopkeeper"
>Welcome!\
name ""
name "Vampire Girl"
>Welcome!\
name ""
skillname "Eyes of Obedience"
dwave 1,"se\flash.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
>The Vampire Girl's eyes start to shine!\
skillname ""
name "Vampire Girl"
>Buy 3,000 herbs.\
name ""
name "Shopkeeper"
>Hey! Don't use your eyes like that!\
name ""
>It looks like the Vampire girl is helping the tool shop owner.\
name "Owner"
>Sheesh, I can't take my eyes off this girl for a second.\
name ""
name "Luka"
>Haha, thanks for everything.\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg018.bmp",7,1000
goto *city03_main



*city03_12a

bg "bg\bg153.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_sinkan.bmp",0,0:print 10,500
name "Priest"
>If I pray even harder, I'm sure Ilias will send her judgement on the band of monster thieves.\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg018.bmp",7,1000
goto *city03_main



*city03_12b

bg "bg\bg153.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_sinkan.bmp",0,0:print 10,500
name "Priest"
>We mustn't let monsters live with us in the city.@
>Ilias will surely send her judgement.\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg018.bmp",7,1000
goto *city03_main



*city03_13a

bg "bg\bg016.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_obasan.bmp",0,0:print 10,500
name "Owner"
>Oh, are you staying tonight?@
>I'll give you my special rate!\
>But I don't have any more Ama-ama Dangos, because I'm out of Happiness Honey.\
>If a Hero doesn't go to Happiness Village soon, I may never be able to make them again.\
name ""
>She says as she looks at me expectantly.\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg018.bmp",7,1000
goto *city03_main



*city03_13b

bg "bg\bg016.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_obasan.bmp",-160,0
lsp 701,":a;chara\pramia_st13.bmp",160,100:print 10,500
name "Owner"
>Welcome!\
name ""
name "Tiny Lamia"
>Welcome! \
name ""
name "Luka"
>Oh, are you working here?\
name ""
name "Tiny Lamia"
>Yep! I'm doing my best!\
name ""
name "Owner"
>She's a surprisingly hard worker.@
>I want to teach her how to make Ama-ama Dangos too.\
>But I don't have any Happiness Honey.\
>If a Hero doesn't go to Happiness Village soon, we may never be able to make them again.\
name ""
>She says as she looks at me expectantly.\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg018.bmp",7,1000
goto *city03_main



*city03_13c

bg "bg\bg016.bmp",7,1000
gosub *setwindow_01
if %ivent01=0 lsp 700,":a;chara\mob_obasan.bmp",0,0:print 10,500
if %ivent01=1 lsp 700,":a;chara\mob_obasan.bmp",-160,0:lsp 701,":a;chara\pramia_st13.bmp",160,100:print 10,500
name "Owner"
>Oh! Welcome!\
name ""
if %ivent01=0 skip 4
name "Tiny Lamia"
>Welcome! \
name ""
name "Owner"
>I heard that you resolved the situation at Happiness Village!\
>I'll let you stay here whenever you want!\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg018.bmp",7,1000
goto *city03_main



*city04_main0

mov %genzaiti,3
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\asioto2.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg023.bmp",7,1500
bgm "bgm\mura2.ogg"
goto *city04_main



*city04_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Young Girl ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Woman A ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Woman B ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Girl ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Boy ",95,280:spbtn 605,605
if %ivent02=0 lsp 606,":s/20,20,0;#FFFFFF#FF4444Elder ",95,310:spbtn 606,606
if %ivent02=1 lsp 606,":s/20,20,0;#FFFFFF#FF4444Village Chief ",95,310:spbtn 606,606
if %ivent02=1 lsp 610,":s/20,20,0;#FFFFFF#FF4444Youth ",410,160:spbtn 610,610
if %ivent02=1 lsp 611,":s/20,20,0;#FFFFFF#FF4444Old Man ",410,190:spbtn 611,611
if %ivent02=1 lsp 612,":s/20,20,0;#FFFFFF#FF4444Harpy ",410,220:spbtn 612,612
if %ivent02=1 lsp 613,":s/20,20,0;#FFFFFF#FF4444Harpy Sisters ",410,250:spbtn 613,613
if %ivent02=1 lsp 614,":s/20,20,0;#FFFFFF#FF4444Queen Harpy ",410,280:spbtn 614,614
if %ivent02=0 strsp 619,"Wait until Evening",410,400,10,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 619,619
if %ivent02=1 lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave Village ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city04_main
if %cmd1=-1 gosub *menu:goto *city04_main
cspl 600,699
if %cmd1=601 && %ivent02=0 goto *city04_01a
if %cmd1=601 && %ivent02=1 goto *city04_01b
if %cmd1=602 && %ivent02=0 goto *city04_02a
if %cmd1=602 && %ivent02=1 goto *city04_02b
if %cmd1=603 && %ivent02=0 goto *city04_03a
if %cmd1=603 && %ivent02=1 goto *city04_03b
if %cmd1=604 && %ivent02=0 goto *city04_04a
if %cmd1=604 && %ivent02=1 goto *city04_04b
if %cmd1=605 && %ivent02=0 goto *city04_05a
if %cmd1=605 && %ivent02=1 goto *city04_05b
if %cmd1=606 && %ivent02=0 goto *city04_06a
if %cmd1=606 && %ivent02=1 goto *city04_06b
if %cmd1=610 goto *city04_10
if %cmd1=611 goto *city04_11
if %cmd1=612 goto *city04_12
if %cmd1=613 goto *city04_13
if %cmd1=614 goto *city04_14
if %cmd1=619 return
goto *city04_main



*city04_01a

lsp 700,":a;chara\mob_musume1.bmp",175,0:print 10,500
gosub *setwindow_01
name "Young Girl"
>I can use this stick...@
>The tip is sharp, too.\
>Swinging things that aren't farming tools...@
>But still, I want to rescue my father!\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city04_main



*city04_01b

lsp 700,":a;chara\mob_musume1.bmp",175,0:print 10,500
gosub *setwindow_01
name "Young Girl"
>I'm glad my father's back safely...@
>But I have a new mother-in-law and sister-in-law...@
>It's kind of complicated.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city04_main



*city04_02a

lsp 700,":a;chara\mob_obasan.bmp",0,0:print 10,500
gosub *setwindow_01
name "Woman A"
>I wonder if I can use the bees as weapons, and order them to attack the harpies...@
>No, that would be silly. That sounds like something from some kind of stupid game...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city04_main



*city04_02b

lsp 700,":a;chara\mob_obasan.bmp",-160,0
lsp 701,":a;chara\mob_hapy3.bmp",160,0:print 10,500
gosub *setwindow_01
name "Woman A"
>Hey Pipi, bring that hive over here!@
>It's a little heavy, so be careful.\
name ""
name "Pipi"
>Ok! \
name ""
lsp 701,":a;chara\mob_hapy2.bmp",160,0:print 10,500
name "Piana"
>Is it ok here, stepmother?\
name ""
name "Woman A"
>That's good, thank you.\
csp 701
lsp 700,":a;chara\mob_obasan.bmp",0,0:print 10,500
>I'm glad for all the additional help.@
>We're ok over here, but I've heard that other families are having a lot of issues.\
>It's still better than when all the men were kidnapped, though.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city04_main



*city04_03a

lsp 700,":a;chara\mob_musume2.bmp",175,0:print 10,500
gosub *setwindow_01
name "Woman B"
>Please give me that power from before one last time...@
>The time when I knocked out my husband for cheating on me!\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city04_main



*city04_03b

lsp 700,":a;chara\mob_musume2.bmp",175,0:print 10,500
gosub *setwindow_01
name "Woman B"
>Three wives and twelve children... I divorced him and moved out.@
>I wonder if I should move to Iliasburg...?\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city04_main



*city04_04a

lsp 700,":a;chara\mob_syouzyo.bmp",0,0:print 10,500
gosub *setwindow_01
name "Girl"
>I was told to stay home...@
>I'm going to pray for everyone's safety...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city04_main



*city04_04b

lsp 700,":a;chara\mob_syouzyo.bmp",-160,0
lsp 701,":a;chara\mob_hapy3.bmp",160,0:print 10,500
gosub *setwindow_01
name "Girl"
>I have a new sister! \
name ""
name "Harpy Child"
>I have a new sister! \
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city04_main



*city04_05a

lsp 700,":a;chara\mob_syounen.bmp",0,0:print 10,500
gosub *setwindow_01
name "Boy"
>I want to fight too, but I was told to stay home...@
>When I grow up, I'm going to fight to protect everyone...\
name ""
name "Luka"
>If you feel that way, you're already strong.\
name ""
lsp 700,":a;chara\alice_st14b.bmp",-110,0
lsp 701,":a;chara\mob_syounen.bmp",160,0:print 10,500
name "Alice"
>I hope you won't grow up to be a fake Hero like Luka.\
name ""
name "Luka"
>Leave me alone!\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city04_main



*city04_05b

lsp 700,":a;chara\mob_syounen.bmp",-160,0
lsp 701,":a;chara\mob_hapy3.bmp",160,0:print 10,500
gosub *setwindow_01
name "Boy"
>When I grow up, I'm going to marry this girl!\
name ""
name "Harpy Girl"
>When I grow up, I want at least ten kids!@
>I'm counting on you, darling!\
name ""
name "Luka"
>Uhh... Ilias still forbids that kind of thing...@
>Oh Ilias... What should I do...?\
name ""
csp 701
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>...Idiot.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city04_main



*city04_06a

lsp 700,":a;chara\mob_rouba.bmp",0,0:print 10,500
gosub *setwindow_01
name "Elder"
>Do you think I'm a horrible person...?@
>I had no other choice if I wanted to protect everyone, though...\
>I did such a horrible thing, sending so many to die...@
>How can I ever atone for what I've done...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city04_main



*city04_06b

lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Village Chief"
>Even when I was gone, my wife seems to have held things together.@
>It seems like she was a better chief than I was...\
name ""
lsp 700,":a;chara\mob_rouzin1.bmp",-160,0
lsp 701,":a;chara\mob_hapy2.bmp",160,0:print 10,500
name "Old Harpy"
>Don't be sad.@
>I'll comfort you...\
name ""
name "Village Chief"
>Ohohohoho. \
name ""
lsp 700,":a;chara\mob_rouzin1.bmp",-160,0
lsp 701,":a;chara\mob_rouba.bmp",160,0:print 10,500
name "Village Chief's Wife"
>You idiot!\
name ""
name "Village Chief"
>Gah!\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city04_main



*city04_10

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Youth"
>I want to finish my work early and play with my bride!@
>Uooo! I'll triple my speed!\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city04_main



*city04_11

lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Old Man"
>I haven't worked on the farm so long, I've gotten stiff.@
>But I'll do my best for my cute wife and daughters!\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city04_main



*city04_12

lsp 700,":a;chara\hapy_a_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Harpy"
>Who wants to make a baby with me tonight...?\
name ""
lsp 700,":a;chara\mob_musume1.bmp",-85,0
lsp 701,":a;chara\mob_musume2.bmp",435,0
lsp 702,":a;chara\hapy_a_st03.bmp",0,0:print 10,500
name "Young Woman"
>..........\
name ""
name "Woman"
>..........\
name ""
name "Harpy"
>I... I won't take someone else's husband, I promise!\
name ""
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city04_main



*city04_13

lsp 700,":a;chara\hapy_bc_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Younger Harpy"
>Shall we collect all the honey?\
name ""
name "Older Harpy"
>We'll work hard during the day, and play harder at night!\
name ""
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city04_main



*city04_14

lsp 700,":a;chara\queenhapy_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Queen Harpy"
>It seems like things are going well enough.@
>It appears as though us harpies can help out with the farm and beekeeping work, too.\
>I hope this peace can remain forever...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city04_main



*city05_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Youth ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Young Woman ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Wealthy Woman ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Hooligan ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Soldier ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Boy ",95,310:spbtn 606,606
strsp 610,"Weapon Shop",410,160,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
strsp 611,"Tool Shop",410,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Church ",410,220:spbtn 612,612
lsp 613,":s/20,20,0;#FFFFFF#FF4444Port ",410,250:spbtn 613,613
if %item01=5 strsp 619,"Treasure Cave",410,400,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 619,619
if %item01=6 lsp 619,":s/20,20,0;#bbbbbbLeave Port ",410,400
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city05_main
if %cmd1=-1 gosub *menu:goto *city05_main
cspl 600,699
if %cmd1=601 && %item01=5 goto *city05_01a
if %cmd1=601 && %item01=6 goto *city05_01b
if %cmd1=602 && %item01=5 goto *city05_02a
if %cmd1=602 && %item01=6 goto *city05_02b
if %cmd1=603 && %item01=5 goto *city05_03a
if %cmd1=603 && %item01=6 goto *city05_03b
if %cmd1=604 && %item01=5 goto *city05_04a
if %cmd1=604 && %item01=6 goto *city05_04b
if %cmd1=605 && %item01=5 goto *city05_05a
if %cmd1=605 && %item01=6 goto *city05_05b
if %cmd1=606 && %item01=5 goto *city05_06a
if %cmd1=606 && %item01=6 goto *city05_06b
if %cmd1=610 && %item01=5 goto *city05_10a
if %cmd1=610 && %item01=6 goto *city05_10b
if %cmd1=611 && %item01=5 goto *city05_11a
if %cmd1=611 && %item01=6 goto *city05_11b
if %cmd1=612 && %item01=5 goto *city05_12a
if %cmd1=612 && %item01=6 goto *city05_12b
if %cmd1=613 && %item01=5 goto *city05_13a
if %cmd1=613 && %item01=6 return
if %cmd1=619 return
goto *city05_main



*city05_01a

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Youth"
>I saw a little fox earlier in the port.@
>I was surprised, I didn't think they would be out of the countryside like that.\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-120,0
lsp 701,":a;chara\mob_seinen1.bmp",160,0:print 10,500
name "Alice"
>...Let's find the fox and eat it.\
name ""
name "Luka"
>Do you not like foxes, Alice?\
name ""
name "Alice"
>No... Not particularly.\
name ""
name "Luka"
>......\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city05_main



*city05_01b

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Youth"
>Kitsunes are so fluffy and cute.@
>I'm a prisoner of their cuteness.\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-120,0
lsp 701,":a;chara\mob_seinen1.bmp",160,0:print 10,500
name "Alice"
>I hope a fox finds you and picks out all your hair.\
name ""
>Why does she hate foxes so much...?\
cspl 3,7
csp 611
cspl 700,705
goto *city05_main



*city05_02a

lsp 700,":a;chara\mob_musume1.bmp",175,0:print 10,500
gosub *setwindow_01
name "Young Woman"
>The legendary pirate Selene... She ruled the seas one hundred years ago.@
>Even though she was a woman, she commanded hundreds of crew members.\
>I'm envious...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city05_main



*city05_02b

lsp 700,":a;chara\mob_musume1.bmp",175,0:print 10,500
gosub *setwindow_01
name "Young Woman"
>Selene was attacked by monsters once in the middle of a storm, and she was able to fight them off.\
>For her last voyage, she ventured off in search of some kind of mysterious treasure.@
>Some believe that her ship sank, but I don't know...\
>I'm not a pirate maniac.@
>I just admire her...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city05_main



*city05_03a

lsp 700,":a;chara\mob_madam.bmp",0,0:print 10,500
gosub *setwindow_01
name "Wealthy Woman"
>There were so many luxury shops around here before...@
>Pearls, pottery, paintings... All the fine stuff.\
>Now there's nothing worth buying...\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-120,0
lsp 701,":a;chara\mob_madam.bmp",160,0:print 10,500
name "Alice"
>I'm not interested in inedible things.\
name ""
name "Wealthy Woman"
>There were even delicacies from all over...@
>Fish, sweets, bread... Ahh I was addicted to them all.\
>This is all because of that monster...\
name ""
lsp 700,":a;chara\alice_st13b.bmp",-120,0:print 10,500
name "Alice"
>You damn monsters, I won't forgive you!\
name ""
>You're a monster too...\
cspl 3,7
csp 611
cspl 700,705
goto *city05_main



*city05_03b

lsp 700,":a;chara\mob_madam.bmp",0,0:print 10,500
gosub *setwindow_01
name "Wealthy Woman"
>As usual, there's nothing here worth buying.@
>Even with all my money, there's no use...\
>Should I move to Sentora?@
>But I heard there are a lot of strong monsters that attack settlements there...\
>I may not be able to endure that kind of thing...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city05_main



*city05_04a

lsp 700,":a;chara\mob_gorotuki1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Hooligan"
>They say there's a cave of treasure to the east.@
>Full of gold and silver, enough to live in comfort the rest of your life...\
>Now it's a monster's den.@
>That guy went to look for treasure, but he hasn't come back yet...\
>I'm sorry bro...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city05_main



*city05_04b

lsp 700,":a;chara\mob_gorotuki1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Hooligan"
>Eh!? You went into that cave and came back?@
>You must be kidding...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city05_main



*city05_05a

lsp 700,":a;chara\mob_sensi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier"
>Furthest from the Ilias Temple, the monsters around here are the strongest on the continent.\
>The further north you go, the stronger they will get until you reach the Monster Lord's castle.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city05_main



*city05_05b

lsp 700,":a;chara\mob_sensi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier"
>The monsters around here are at the limit for an ordinary soldier.@
>I wouldn't be able to fight the ones at the southern end of Sentora.\
>The people living there must live a life of fear...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city05_main



*city05_06a

lsp 700,":a;chara\mob_syounen.bmp",0,0:print 10,500
gosub *setwindow_01
name "Boy"
>Because that monster wouldn't let the ship pass, my father's store closed down.@
>Are the monsters so happy in tormenting us...?\
name ""
name "Luka"
>........\
name ""
>I have to do something...\
cspl 3,7
csp 611
cspl 700,705
goto *city05_main



*city05_06b

lsp 700,":a;chara\mob_syounen.bmp",0,0:print 10,500
gosub *setwindow_01
name "Boy"
>If Heinrich was here, he'd be able to stop that monster.\
>But the Heroes today are no good...@
>They just strut around proudly and run away at any sign of trouble.\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Heroes today are only cowardly.@
>Like when Granberia attacked, all of them ran away.\
>They don't even deserve to carry a sword.\
name ""
name "Luka"
>I understand your feelings...@
>Just because they got baptized, they aren't real Heroes.@
>Only by fighting for the weak can you be a true Hero!\
name ""
name "Alice"
>A fake Hero talking about Heroes.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city05_main



*city05_10a

bg "bg\bg152.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
name "Shopkeeper"
>Welcome to the [World Shop], where arms from every country are sold!\
>...But because the sea route is blocked, we don't have much.\
name ""
>...There are a lot of good weapons lining the shelves.@
>But since I don't want to kill my opponent, I'll keep this sword.\
name "Shopkeeper"
>If nothing catches your fancy, I can also sharpen your current sword.\
>Can you show me your sword? It must be dull from your journey.\
name ""
lsp 701,":a;chara\angersword.bmp",-150,0
lsp 700,":a;chara\mob_ozisan1.bmp",160,0:print 10,500
name "Luka"
>Alright... Here.\
name ""
name "Shopkeeper"
>Kyaa! What the hell is this!?\
name ""
>The Shopkeeper is terrified.\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg031.bmp",7,1000
goto *city05_main



*city05_10b

bg "bg\bg152.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
name "Shopkeeper"
>If the sea route doesn't open soon, I'll go out of business.\
>I can't beat a monster who can cause a storm on command like that...@
>Eight generations of owning the [World Shop]...\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg031.bmp",7,1000
goto *city05_main



*city05_11a

bg "bg\bg151.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan3.bmp",0,0:print 10,500
name "Master"
>Welcome to my shop... Unfortunately, I don't have much in stock due to the the sea route being blocked.\
name ""
name "Luka"
>Is that so... It must be tough.\
name ""
>It's really troublesome...@
>I need to do something about that monster...\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg031.bmp",7,1000
goto *city05_main



*city05_11b

bg "bg\bg151.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan3.bmp",0,0:print 10,500
name "Master"
>Welcome! I still don't have much.\
>I wanted to go to Port Natalia this year...@
>I wonder if Mana the Mermaid is in good spirits...\
>Oops! A careless remark in this town...@
>If someone heard that, the priest at the church would give me a lecture for three hours.\
name ""
lsp 700,":a;chara\mob_ozisan3.bmp",-160,0
lsp 701,":a;chara\mob_obasan.bmp",160,0:print 10,500
name "Woman"
>What did you say about a Mermaid?\
name ""
name "Master"
>Err... Nothing... That was...@
>Kyaaaaa!\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg031.bmp",7,1000
goto *city05_main



*city05_12a

bg "bg\bg153.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_sinkan.bmp",0,0:print 10,500
name "Priest"
>Let us pray to Ilias so that she may make the monster go away.@
>Oh Ilias, please grant us your salvation.\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg031.bmp",7,1000
goto *city05_main



*city05_12b

bg "bg\bg153.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_sinkan.bmp",0,0:print 10,500
name "Priest"
>No matter how hard I pray, the storm continues.@
>Oh Ilias, how can I get you to help us...?\
>Ah! It's those people at Port Natalia! They must be having relations with monsters!@
>That's why Ilias must have cut off our route to them!\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg031.bmp",7,1000
goto *city05_main



*city05_13a

bg "bg\bg031.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_hunanori.bmp",0,0:print 10,500
name "Sailor"
>I wonder how long the merchants can hold on...@
>One by one, they've been closing up shop.\
>The only thing we can do is fish all day...\
name ""
name "Luka"
>Really? That must be tough...\
name ""
>I need to do something to help these people...\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg031.bmp",7,1000
goto *city05_main



*city06_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Youth ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Man ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Woman ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Soldier ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Mermaid A ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Mermaid B ",95,310:spbtn 606,606
lsp 607,":s/20,20,0;#FFFFFF#FF4444Mermaid Girl ",95,340:spbtn 607,607
lsp 608,":s/20,20,0;#FFFFFF#FF4444Mermaid Merchant ",95,370:spbtn 608,608
strsp 610,"Weapon Shop",410,160,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
strsp 611,"Tool Shop",410,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Church ",410,220:spbtn 612,612
lsp 613,":s/20,20,0;#FFFFFF#FF4444Mermaid Bar ",410,250:spbtn 613,613
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave City ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city06_main
if %cmd1=-1 gosub *menu:goto *city06_main
cspl 600,699
if %cmd1=601 goto *city06_01
if %cmd1=602 goto *city06_02
if %cmd1=603 goto *city06_03
if %cmd1=604 goto *city06_04
if %cmd1=605 goto *city06_05
if %cmd1=606 goto *city06_06
if %cmd1=607 goto *city06_07
if %cmd1=608 goto *city06_08
if %cmd1=610 goto *city06_10
if %cmd1=611 goto *city06_11
if %cmd1=612 goto *city06_12
if %cmd1=613 goto *city06_13
if %cmd1=619 return
goto *city06_main



*city06_01

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Youth"
>Why does Ilias Kreuz hate monsters so much...@
>Maybe it's because the women are all jealous of monster girls?\
>That's what my cute Mermaid girlfriend says anyway...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city06_main



*city06_02

lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Man"
>I hate Ilias Kreuz's indiscriminate terrorism.\
>If they bomb the Mermaid Bar...@
>I might have to dabble in some terrorist terrorism.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city06_main



*city06_03

lsp 700,":a;chara\mob_musume2.bmp",175,0:print 10,500
gosub *setwindow_01
name "Woman"
>I don't really like Mermaids...@
>But attacking their school is going way too far.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city06_main



*city06_04

lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier"
>I heard that Granberia attacked Iliasburg, but a lone Hero was able to fend her off.\
>To think there was a human who could stand up to Granberia...@
>The world is a huge place, huh?\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city06_main



*city06_05

lsp 700,":a;chara\mob_Mermaid2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Mermaid A"
>Us Mermaids are a lot stronger than humans...@
>Even if they bomb our buildings, more humans always die than monsters.\
>...We're worried that our presence is hurting the other citizens.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city06_main



*city06_06

lsp 700,":a;chara\mob_Mermaid1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Mermaid B"
>Those Ilias Kreuz guys...@
>If they have something against us, why can't they complain normally?\
>Attacking a school full of children...@
>Unforgivable!\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city06_main



*city06_07

lsp 700,":a;chara\mob_Mermaid3.bmp",0,0:print 10,500
gosub *setwindow_01
name "Mermaid Girl"
>I was so surprised yesterday...@
>I was almost turned into Grilled Mermaid!\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city06_main



*city06_08

lsp 700,":a;chara\meia_st21.bmp",50,50:print 10,500
gosub *setwindow_01
name "Mermaid Merchant"
>Why doesn't my baked starfish sell...@
>...Is it a bad product?\
>Hey, what do you think?\
name ""
name "Luka"
>It... Doesn't look too appetizing.\
name ""
name "Mermaid Merchant"
>I see...@
>I'll find something new to sell, then...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city06_main



*city06_10

bg "bg\bg150.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan3.bmp",0,0:print 10,500
name "Shopkeeper"
>Welcome!@
>We have great weapons from all over the world here.\
name ""
name "Luka"
>Hmm... I think I'll keep my current sword.\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-120,0
lsp 701,":a;chara\mob_ozisan3.bmp",160,0:print 10,500
name "Shopkeeper"
>Could I interest the young woman over there in a knife for self-defense?\
name ""
name "Alice"
>My fists are the strongest weapon in the world.\
name ""
name "Shopkeeper"
>I... See...\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg037.bmp",7,1000
goto *city06_main



*city06_11

bg "bg\bg154.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
name "Shopkeeper"
>Welcome!\
name ""
name "Luka"
>...These women's clothes are awfully revealing...\
name ""
name "Shopkeeper"
>It's the new trend.@
>Skimpy clothes are IN!\
>Take this, for example...\
name ""
name "Luka"
>There's almost no fabric at all!\
name ""
name "Shopkeeper"
>...Isn't it crazy?@
>How about this!?\
name ""
name "Luka"
>Uhya!@
>If you wore that in my village, the soldiers from the temple would arrest you!\
name ""
name "Shopkeeper"
>Fufufu... Now get a load of THIS!\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-120,0
lsp 701,":a;chara\mob_seinen1.bmp",160,0:print 10,500
name "Alice"
>.........\
name ""
name "Luka"
>Hya! Alice!?\
name ""
name "Shopkeeper"
>Err... This isn't what you think...@
>I'm just... Displaying my wares...\
name ""
name "Alice"
>.....................Pervert.\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg037.bmp",7,1000
goto *city06_main



*city06_12

bg "bg\bg156.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_sinkan.bmp",0,0:print 10,500
name "Priest"
>I can slightly understand Ilias Kreuz's position.@
>You must not have intercourse with monsters...\
>But there are many people in this town that break this law.@
>It's a very serious issue...\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg037.bmp",7,1000
goto *city06_main



*city06_13

bg "bg\bg155.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_Mermaid2.bmp",0,0:print 10,500
name "Mermaid"
>Welcome to Port Natalia's famous Mermaid Bar!\
>Ohhh... What a cute boy.@
>Do you want to play with big sis?\
name ""
>The Mermaid puts Luka's hand on her chest!@
>The Mermaid blows seductively in Luka's ear!\
name "Luka"
>Err... Err... I...\
name ""
dwave 1,"se\escape.ogg"
>Luka runs away!\
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Even though he's fought so many monster girls, he still has no resistance...\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg037.bmp",7,1000
goto *city06_main



*city07_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Guard A ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Guard B ",95,190:spbtn 602,602
strsp 603,"Priest A",95,220,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,603
strsp 604,"Priest B",95,250,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Scholar A ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Scholar B ",95,310:spbtn 606,606
lsp 607,":s/20,20,0;#FFFFFF#FF4444Soldier ",95,340:spbtn 607,607
lsp 610,":s/20,20,0;#FFFFFF#FF4444Chapel ",410,160:spbtn 610,610
strsp 611,"Basement Library",410,190,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
strsp 612,"Audience Hall",410,220,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 612,612
lsp 613,":s/20,20,0;#FFFFFF#FF4444Guard's Office ",410,250:spbtn 613,613
strsp 619,"Get Some Rest",410,400,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city07_main
if %cmd1=-1 gosub *menu:goto *city07_main
cspl 600,699
if %cmd1=601 goto *city07_01
if %cmd1=602 goto *city07_02
if %cmd1=603 goto *city07_03
if %cmd1=604 goto *city07_04
if %cmd1=605 goto *city07_05
if %cmd1=606 goto *city07_06
if %cmd1=607 goto *city07_07
if %cmd1=610 goto *city07_10
if %cmd1=611 goto *city07_11
if %cmd1=612 goto *city07_12
if %cmd1=613 goto *city07_13
if %cmd1=619 return
goto *city07_main



*city07_01

lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Guard A"
>The guards inside San Ilia are carefully selected.@
>Only the truly pious and brave are allowed to be guards.\
>It's the dream of knights all over the world.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city07_main



*city07_02

lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Guard B"
>...I'm patrolling the castle.\
>I'll ensure no monster is able to step foot on this sacred ground.@
>Don't worry you two, for I am here.\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-120,0
lsp 701,":a;chara\mob_heisi1.bmp",160,0:print 10,500
name "Alice"
>.........\
name ""
>The Monster Lord is already in here...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city07_main



*city07_03

lsp 700,":a;chara\mob_sinkan.bmp",0,0:print 10,500
gosub *setwindow_01
name "Priest A"
>Thousands of years ago, there was a holy war.@
>The great Ilias leading angels on one side, and the first Monster Lord leading her forces on the other.\
>The conflict shook the land itself, and only stopped when Ilias defeated the Monster Lord.\
>You can still see traces of the war around the land.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city07_main



*city07_04

lsp 700,":a;chara\mob_sinkan.bmp",0,0:print 10,500
gosub *setwindow_01
name "Priest B"
>The people in this world are truly outrageous.@
>The heathens that turn away from Ilias... The heathens that conspire with monsters.\
>Truly, truly... Truly Outrageous.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city07_main



*city07_05

lsp 700,":a;chara\mob_gakusya.bmp",0,0:print 10,500
gosub *setwindow_01
name "Scholar A"
>The large basement library has the largest collection of books in the world.\
>So it's not an exaggeration to say it contains the world's knowledge.\
>Scholars that seek that knowledge travel from all over the world to study here.\
>As for me, I'm researching sacred energy.\
name ""
name "Luka"
>The largest library in the world... Wow...@
>Alice, do you want to take a look?\
name ""
lsp 700,":a;chara\alice_st14b.bmp",-120,0
lsp 701,":a;chara\mob_gakusya.bmp",160,0:print 10,500
name "Alice"
>I can't eat books...\
name ""
name "Scholar A"
>Unfortunately, you need permission before you can enter the library.@
>It contains so many valuable books, that you need to be properly vetted.\
>It took me a week to get permission.\
name ""
name "Luka"
>It takes that long...?\
name ""
>I don't really need anything from there, so I won't bother to ask for permission...\
cspl 3,7
csp 611
cspl 700,705
goto *city07_main



*city07_06

lsp 700,":a;chara\mob_gakusya.bmp",0,0:print 10,500
gosub *setwindow_01
name "Scholar B"
>I'm studying the old scriptures.\
>I specialize in deciphering ancient texts.@
>But right now I'm stuck on a mysterious phrase in chapter seven paragraph three of this book...\
>[Whomsoever troubles thy goddess with repeated Evaluation Meetings shall receive judgement.]\
>What does this mean?\
>If you do this [Evaluation Meeting] too many times, you will be judged?\
>This is the first time this [Evaluation Meeting] has been mentioned in any text...\
>How mysterious...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city07_main



*city07_07

lsp 700,":a;chara\mob_sensi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier"
>In San Ilia, there's a sword called the [Goddess Sword].@
>It seems as though the King himself manages it in Ilias' name.\
>Once he finds a true hero worthy of it, he shall bestow it upon them.\
>...I wonder if he'll choose me.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city07_main



*city07_10

bg "bg\bg157.bmp",7,1000
gosub *setwindow_01
name "Luka"
>Uwa... This is a huge chapel.@
>It's sooo wiiide!\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Hrm. Mine is a lot bigger than this.\
name ""
name "Luka"
>Now, let's pray!\
name ""
lsp 700,":a;chara\alice_st13b.bmp",67,0:print 10,500
name "Alice"
>Inviting me to do something so stupid!\
name ""
name "Luka"
>Please let my travels go well...@
>So that I can fulfill my dream of humans and monsters coexisting.\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>Please destroy this castle...@
>Also let Ilias perish.\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg044.bmp",7,1000
goto *city07_main



*city07_11

lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Guard"
>...Hold up, boy.@
>You need permission to enter the library.@
>Did you fill out the paperwork properly?\
name ""
name "Luka"
>No... Not yet...\
name ""
name "Guard"
>I'm sorry then, I cannot let you pass.@
>Please come back after getting permission.\
name ""
name "Luka"
>Alright...\
name ""
>I don't really need anything from the library.@
>I won't bother to fill out any permission forms.\
cspl 3,7
csp 611
cspl 700,705
goto *city07_main



*city07_12

lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Guard"
>...Hold up, boy.@
>Have you received permission to enter yet?\
name ""
name "Luka"
>No... Not yet...\
name ""
name "Guard"
>I cannot let you through, then.@
>Please go back and wait for your turn.\
name ""
name "Luka"
>Alright...\
name ""
lsp 700,":a;chara\alice_st12b.bmp",67,0:print 10,500
name "Alice"
>Trying to break right in to meet with the King?@
>You do some unexpected things sometimes.\
name ""
name "Luka"
>...It was worth a shot.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city07_main



*city07_13

bg "bg\bg060.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_heisi1.bmp",-160,0
lsp 701,":a;chara\mob_heisi1.bmp",160,0:print 10,500
name "Guard D"
>Ahhhh. That's some good coffee.\
name ""
name "Guard E"
>It's important to stay awake for this work.@
>When on duty, work hard.@> When on break, rest hard.\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg044.bmp",7,1000
goto *city07_main



*city08_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Youth ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Three Women ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Old Man ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Children ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Soldier A ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Soldier B ",95,310:spbtn 606,606
strsp 610,"Weapon Shop",410,160,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
strsp 611,"Tool Shop",410,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
strsp 612,"San Ilia Castle",410,220,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 612,612
if %hanyo1+%hanyo2+%hanyo3+%hanyo4=4 lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave Town ",410,400:spbtn 619,619
if %hanyo1+%hanyo2+%hanyo3+%hanyo4<4 lsp 619,":s/20,20,0;#bbbbbbLeave Town ",410,400
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city08_main
if %cmd1=-1 gosub *menu:goto *city08_main
cspl 600,699
if %cmd1=601 gosub *city08_01:goto *city08_main
if %cmd1=602 gosub *city08_02:goto *city08_main
if %cmd1=603 gosub *city08_03:goto *city08_main
if %cmd1=604 gosub *city08_04:goto *city08_main
if %cmd1=605 gosub *city08_05:goto *city08_main
if %cmd1=606 gosub *city08_06:goto *city08_main
if %cmd1=610 gosub *city08_10:goto *city08_main
if %cmd1=611 gosub *city08_11:goto *city08_main
if %cmd1=612 gosub *city08_12:goto *city08_main
if %cmd1=619 return
goto *city08_main



*city08_01

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Youth"
>My friends say they saw something strange in the forest to the northwest.\
>Some small person with butterfly wings dancing in a circle.@
>I wonder if he hallucinated... Or is something really there?@
>Either way, I don't want to go near that forest anymore...\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city08_02

lsp 700,":a;chara\mob_zyosei.bmp",-160,0
lsp 701,":a;chara\mob_madam.bmp",160,0:print 10,500
gosub *setwindow_01
name "Woman A"
>Did you hear?@
>Another ghost appeared at that house...\
name ""
name "Woman B"
>Yes... And I heard it was the ghost of a child!@
>The tool shop owner saw it too!\
name ""
name "Woman C"
>Oh Ilias... Please save that pitiful ghost...\
name ""
name "Luka"
>Excuse me... Could you tell me more about that ghost?\
name ""
name "Woman A"
>Oh, an adventurer?@
>It doesn't involve treasure or anything, but sure.\
>If you go north from here, there's a large mansion.@
>Ten years ago, a rich millionaire lived there.\
>But their only daughter died of a disease...@
>Torn by grief, they left their house.\
>Now it's uninhabited...@
>Except for the ghost of the girl!\
name ""
name "Luka"
>I see...\
name ""
>It sounds pretty strange for the work of a monster...\
mov %hanyo1,1
cspl 3,7
csp 611
cspl 700,705
return



*city08_03

lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Old Man"
>The land to the north used to be an ancient execution ground...@
>It's said that the hatred of those killed there lingers in the house...\
>...How terrifying.\
name ""
name "Luka"
>It was an execution ground?\
name ""
mov %hanyo2,1
cspl 3,7
csp 611
cspl 700,705
return



*city08_04

lsp 700,":a;chara\mob_syounen.bmp",-160,0
lsp 701,":a;chara\mob_syouzyo.bmp",160,0:print 10,500
gosub *setwindow_01
name "Boy"
>I heard there was a graveyard to the north...\
name ""
name "Girl"
>That's why ghosts appeared.\
name ""
name "Luka"
>It was a graveyard?\
name ""
mov %hanyo3,1
cspl 3,7
csp 611
cspl 700,705
return



*city08_05

lsp 700,":a;chara\mob_sensi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier A"
>I heard that the Monster Lord attacked San Ilia castle...@
>First she destroyed the [Goddess Sword], then set the library on fire...\
>It sounds like she caused some huge damage...@
>But why is everything so calm?\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city08_06

lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier B"
>They say that some strange sorcerer settled in the mansion to the north, doing some kind of forbidden research...\
>I was offered a handsome reward to get rid of whatever was there...@
>But I had to turn it down.@> I'm scared of being in a house in the darkness.\
name ""
name "Luka"
>A strange sorceror...?@
>What's going on there...?\
name ""
mov %hanyo4,1
cspl 3,7
csp 611
cspl 700,705
return



*city08_10

bg "bg\bg150.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
name "Owner"
>Welcome!@
>I'm sorry, but we only have a limited selection of merchandise due to various circumstances this month...\
name ""
name "Luka"
>What happened?\
name ""
name "Owner"
>The blacksmith in charge of procuring materials went to the haunted mansion to the north on a dare.\
>He came back several days later broken down, and refusing to talk about what happened.\
>He's so shaken up he can't even work.@
>I wonder what happened there...?\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg048.bmp",7,1000
return



*city08_11

bg "bg\bg151.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan3.bmp",0,0:print 10,500
name "Owner"
>Welcome! Can I interest you in any of my wares?@
>How about this Sacred Anti-Ghost Water?\
name ""
name "Luka"
>Sacred water...? It isn't an amulet or something?\
name ""
name "Owner"
>You'll be thankful to have it...\
>I was passing by the haunted mansion to the north earlier, when I saw a girl looking at me through the window.\
>Ever since then, I've carried this sacred water with me so that she won't attack me.\
>If you ever meet a ghost, you'll be thankful you have this...\
name ""
name "Luka"
>No... I don't need it.\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-120,0
lsp 701,":a;chara\mob_ozisan3.bmp",160,0:print 10,500
name "Alice"
>Hrm. I'll take it.\
name ""
name "Owner"
eng "Thank you!":$sel6/
dwave 1,"se\kaimono.ogg"
mov %item10,1
\
name ""
name "Luka"
>Alice...?\
name ""
name "Alice"
>It's just a whim... Things like ghosts are ridiculous.\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg048.bmp",7,1000
return



*city08_12

gosub *setwindow_01p
name "Luka"
>I don't want to go back into the castle...\
name ""
>I'm sure the castle is still in a state of confusion...@
>It would be best not to go back until things settle down.\
cspl 3,7
csp 611
return



*map2

saveoff
textoff
csp -1
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
bg "bg\map2.bmp",10,1000
goto *map2_2



*map2_2

strsp 601,"San Ilia Castle",365,280,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 601,11
strsp 602,"Port Natalia",660,270,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 602,12
if %ivent04=0 strsp 605,"Req. Level: 16",650,290,8,1,20,20,0,0,1,1,#FFFFFF
if %ivent04=1 lsp 605,":s/20,20,0;#FFFFFFDone ",700,290
lsp 603,":s/20,20,0;#FFFFFF#FF4444Haunted Mansion ",415,170:spbtn 603,13
if %ivent05=0 strsp 606,"Req. Level: 17",420,190,8,1,20,20,0,0,1,1,#FFFFFF
if %ivent05=1 lsp 606,":s/20,20,0;#FFFFFFDone ",470,190
strsp 604,"Forest of Spirits",215,60,10,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 604,14
strsp 607,"Req. Level: 18",230,80,8,1,20,20,0,0,1,1,#FFFFFF
print 1
btnwait2 %cmd1
if %cmd1=0 goto *map2_2
if %cmd1=-1 gosub *menu:goto *map2_2
csp -1
btndef clear
if %cmd1=11 gosub *city09_main0:dwave 1,"se\asioto2.ogg":bg black,7,1500:bgm "bgm\field3.ogg":goto *map2
if %cmd1=12 && %ivent04=0 goto *sean0101
if %cmd1=12 && %ivent04=1 gosub *city10_main0:dwave 1,"se\asioto2.ogg":bg black,7,1500:bgm "bgm\field3.ogg":goto *map2
if %cmd1=13 && %ivent05=0 goto *sean0111
if %cmd1=13 && %ivent05=1 goto *sean0118
if %cmd1=14 goto *sean0119
goto *map2_2



*city09_main0

mov %genzaiti,5
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\asioto2.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg048.bmp",7,1500
bgm "bgm\city1.ogg"
goto *city09_main



*city09_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Youth ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Three Women ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Elder ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Child ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Soldier A ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Soldier B ",95,310:spbtn 606,606
strsp 610,"Weapon Shop",410,160,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
strsp 611,"Tool Shop",410,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
strsp 612,"San Ilia Castle",410,220,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 612,612
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave City ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city09_main
if %cmd1=-1 gosub *menu:goto *city09_main
cspl 600,699
if %cmd1=601 && %ivent05=0 gosub *city08_01:goto *city09_main
if %cmd1=601 && %ivent05=1 gosub *city09_01:goto *city09_main
if %cmd1=602 && %ivent05=0 gosub *city08_02:goto *city09_main
if %cmd1=602 && %ivent05=1 gosub *city09_02:goto *city09_main
if %cmd1=603 && %ivent05=0 gosub *city08_03:goto *city09_main
if %cmd1=603 && %ivent05=1 gosub *city09_03:goto *city09_main
if %cmd1=604 && %ivent05=0 gosub *city08_04:goto *city09_main
if %cmd1=604 && %ivent05=1 gosub *city09_04:goto *city09_main
if %cmd1=605 && %ivent05=0 gosub *city08_05:goto *city09_main
if %cmd1=605 && %ivent05=1 gosub *city09_05:goto *city09_main
if %cmd1=606 && %ivent05=0 gosub *city08_06:goto *city09_main
if %cmd1=606 && %ivent05=1 gosub *city09_06:goto *city09_main
if %cmd1=610 && %ivent05=0 gosub *city08_10:goto *city09_main
if %cmd1=610 && %ivent05=1 gosub *city09_10:goto *city09_main
if %cmd1=611 && %ivent05=0 gosub *city08_11:goto *city09_main
if %cmd1=611 && %ivent05=1 gosub *city09_11:goto *city09_main
if %cmd1=612 && %ivent05=0 gosub *city08_12:goto *city09_main
if %cmd1=612 && %ivent05=1 goto *city09b_main0
if %cmd1=619 return
goto *city09_main



*city09_01

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Youth"
>My friend saw something strange in the forest to the northwest.@
>A child with wings like a butterfly was dancing...\
>Do you think he saw it because of his weak faith?\
lsp2 0,":a;chara\mob_zyoseiy.bmp",200,300,100,100,0,200
gosub *syoukan_effect
>...Did something just pass by me...?\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city09_02

lsp 700,":a;chara\mob_zyosei.bmp",0,0:print 10,500
gosub *setwindow_01
name "Woman A"
>Did you hear?@
>People have been seeing ghosts!\
name ""
lsp 700,":a;chara\mob_zyosei.bmp",-160,0
lsp 701,":a;chara\mob_madam.bmp",160,0:print 10,500
name "Woman B"
>I know... I've heard!@
>Someone saw a girl walking alone on a street... Then she vanished!\
name ""
csp 701
lsp 700,":a;chara\mob_madam.bmp",0,0:print 10,500
name "Woman C"
>I heard a voice from my kitchen... But when I checked, nobody was there!\
>And the other day my friend was talking to her two neighbors, and before she noticed it a fourth person joined in out of nowhere!\
name ""
lsp 700,":a;chara\mob_madam.bmp",-160,0
lsp 701,":a;chara\mob_zyoseiy.bmp",160,0:print 10,500
name "Woman D"
>Ahhh... How scary!\
name ""
>There's four people here now too...\
cspl 3,7
csp 611
cspl 700,705
return



*city09_03

lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Elder"
>Have you come for me...?@
>Are you a messenger from heaven?\
name ""
lsp 700,":a;chara\mob_rouzin1.bmp",-160,0
lsp 701,":a;chara\mob_seineny.bmp",160,0:print 10,500
name "Ghost"
>What? No... You'll probably live for a little while longer.\
name ""
name "Elder"
>Oh, I see.\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city09_04

gosub *setwindow_01
lsp 700,":a;chara\mob_syounen.bmp",-220,0:print 10,500
name "Boy"
>Yaay!\
name ""
lsp 701,":a;chara\mob_syouzyo.bmp",0,0:print 10,500
name "Girl"
>You won't catch me! \
name ""
lsp 702,":a;chara\mob_syouzyoy.bmp",220,0:print 10,500
name "Ghost Girl"
>Hahahaha!\
name ""
>The ghost and the children are playing tag...\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city09_05

lsp 700,":a;chara\mob_sensi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier A"
>I don't know why, but reports of ghosts have been exploding.@
>It must be the work of the Monster Lord who attacked the other day!\
>Curse you, Monster Lord!!@
>You must be laughing in joy with all the ghosts rampaging around!\
name ""
>The Monster Lord actually fainted because of them...\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city09_06

lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier B"
>The castle is in a serious uproar...@
>Why do strange things keep happening recently?\
>How can bad things keep happening to this sacred ground?\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city09_10

bg "bg\bg150.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
name "Owner"
>This isn't funny.@
>I can't sell physical weapons to people afraid of ghosts!\
>Damn! I'm so envious of that tool shop owner!\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg048.bmp",7,1000
return



*city09_11

bg "bg\bg151.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan3.bmp",0,0:print 10,500
name "Owner"
>I sold out my anti-ghost water in three minutes this morning.@
>I also sold all my crosses!@
>Hahaha! Thank you ghosts!\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg048.bmp",7,1000
return



*city09_12

gosub *setwindow_01p
name "Luka"
>I better not go into the castle right now...\
name ""
>The castle is probably still in a state of confusion...@
>Until it calms down a bit more, I'll stay away.\
cspl 3,7
csp 611
return



*city09b_main0

mov %genzaiti,5
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\asioto3.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg044.bmp",7,1500
bgm "bgm\castle1.ogg"
goto *city09b_main



*city09b_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Guard A ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Guard B ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Arguing Priests ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Scholar A ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Scholar B ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Soldier ",95,310:spbtn 606,606
lsp 610,":s/20,20,0;#FFFFFF#FF4444Chapel ",410,160:spbtn 610,610
strsp 611,"Basement Library",410,190,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
strsp 612,"Audience Hall",410,220,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 612,612
lsp 613,":s/20,20,0;#FFFFFF#FF4444Guard's Office ",410,250:spbtn 613,613
strsp 619,"Back to Town",410,400,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city09b_main
if %cmd1=-1 gosub *menu:goto *city09b_main
cspl 600,699
if %cmd1=601 gosub *city09b_01:goto *city09b_main
if %cmd1=602 gosub *city09b_02:goto *city09b_main
if %cmd1=603 gosub *city09b_03:goto *city09b_main
if %cmd1=604 gosub *city09b_04:goto *city09b_main
if %cmd1=605 gosub *city09b_05:goto *city09b_main
if %cmd1=606 gosub *city09b_06:goto *city09b_main
if %cmd1=610 gosub *city09b_10:goto *city09b_main
if %cmd1=611 gosub *city09b_11:goto *city09b_main
if %cmd1=612 gosub *city09b_12:goto *city09b_main
if %cmd1=613 gosub *city09b_13:goto *city09b_main
if %cmd1=619 textoff:btndef clear:mov %sinkoumode,0:skipoff:autoclick 0:dwave 1,"se\asioto3.ogg":csp 611:cspl 3,7:bg black,7,1500:bg "bg\bg048.bmp",7,1500:bgm "bgm\city1.ogg":goto *city09_main
goto *city09b_main



*city09b_01

lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Guard A"
>What's with the weird atmosphere...@
>The other guards keep telling me about all the strange stuff that's happening, too...\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city09b_02

lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Guard B"
>...I'm patrolling the castle.@
>I won't let even a bug by me!\
lsp2 0,":a;chara\mob_seineny.bmp",200,300,100,100,0,200
gosub *syoukan_effect
name ""
>...It doesn't seem like you can stop the ghosts, though.\
cspl 3,7
csp 611
cspl 700,705
return



*city09b_03

gosub *setwindow_01
lsp 700,":a;chara\mob_sinkan.bmp",-220,0:print 10,500
name "Priest A"
>You just don't understand!@
>Neither monsters nor ghosts should taint this sacred castle!\
>If we leave them alone, it's an insult to Ilias!\
name ""
lsp 701,":a;chara\mob_sinkan.bmp",0,0:print 10,500
name "Priest B"
>The human [Soul] is a gift from Ilias!@
>Treating them the same as monsters would be an insult to Ilias!\
name ""
lsp 702,":a;chara\mob_sinkany.bmp",220,0:print 10,500
name "Ghost Priest"
>I shall read a passage from the Gospel of Mosai.@
>[The soul is created free from sin]. That's the truth!\
name ""
>That just makes the debate get even more heated...\
cspl 3,7
csp 611
cspl 700,705
return



*city09b_04

lsp 700,":a;chara\mob_gakusya.bmp",0,0:print 10,500
gosub *setwindow_01
name "Scholar A"
>Luckily there wasn't too much damage from the fire.@
>All of us scholars risked our lives by rushing into the flames to save the books.\
>But we're having a lot of trouble collecting them...@
>After they saved the books, it seems like a lot of scholars just ran off with them...\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city09b_05

lsp 700,":a;chara\mob_gakusya.bmp",0,0:print 10,500
gosub *setwindow_01
name "Scholar B"
>I saved one of the original editions of a book on Ilias from the fire...@
>I accidentally took it home, and now I can't return it...\
name "Luka"
>That's not good!@
>Doesn't that make you a thief!?\
name ""
>Wait, why can't he return it...?\
name "Luka"
>Why don't you just secretly return it?\
name ""
name "Scholar B"
>Taking a book out of the library is a serious crime...@
>In the past, scholars would take out the books and forge fake additions to them before returning them.\
>That's why I can't return it...@
>Ah, Ilias! I'm sorry for my sin!\
name ""
>Ah, Ilias! I'm sorry about that fire!\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city09b_06

lsp 700,":a;chara\mob_sensi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier"
>The [Goddess Sword] was destroyed by the Monster Lord...@
>...But why was it broken so easily?\
>What would have happened to the Hero who challenged her wielding that?\
name ""
>That's a good question...@
>Not ending up with that sword was a stroke of luck...\
cspl 3,7
csp 611
cspl 700,705
return



*city09b_10

bg "bg\bg157.bmp",7,1000
gosub *setwindow_01p
>Possibly because of the ghosts, the chapel was flooded with people.\
lsp 700,":a;chara\mob_obasan.bmp",-160,0
lsp 701,":a;chara\mob_ozisan3.bmp",160,0:print 10,500
name "Woman"
>Ahh, oh great Ilias!@
>Please send those horrible ghosts back to where they belong!\
name ""
name "Man"
>We're safe in this sacred place...@
>Ilias, please help us!\
name ""
lsp 700,":a;chara\mob_seineny.bmp",-160,0:print 10,500
name "Ghost"
>I'm finally able to pray to Ilias again in this chapel...@
>Ilias, please watch over me!\
name "Luka"
>..............\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg044.bmp",7,1000
return



*city09b_11

lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Guard"
>The library is being repaired. To prevent further damage, I cannot allow anyone not seriously vetted inside.\
>But you're safe for sure, Luka. You may enter.\
name ""
name "Luka"
>Ah... No, that's ok...\
name ""
>I don't think it would be a good idea to go back inside...\
cspl 3,7
csp 611
cspl 700,705
return



*city09b_12

lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Guard Captain"
>Ah! Mr. Luka!@
>Do you have business with the king?\
name ""
name "Luka"
>Ah... Yes...@
>How is the King...?\
name ""
name "Guard Captain"
>He was disoriented for a while, but he has settled down.@
>But it seems like the memory from the Monster Lord's attack still hasn't come back to him...\
name ""
name "Luka"
>I see...\
name ""
name "Guard Captain"
>At any rate, you are allowed to go inside.@
>But please don't remind him of the attack.\
name ""
name "Luka"
>I won't...\
name ""
dwave 1,"se\asioto3.ogg"
sean_change "bg045"
lsp 700,":a;chara\saniria_g_st03.bmp",0,0:print 10,500
name "San Ilia King"
>Why do my shoulders feel so heavy...?\
name ""
name "Luka"
>Uwa! He's possessed!\
name ""
name "San Ilia King"
>Possessed...?@>What do you mean?\
name ""
>The King looks around him frantically.@> It seems like he can't see it...\
name "San Ilia King"
>My head and shoulders feel so heavy...@
>I guess I haven't recovered...\
name ""
name "Luka"
>That... must be it.@>Please take care of yourself...\
name ""
>I quickly end this uncomfortable meeting.\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg044.bmp",7,1000
return



*city09b_13

bg "bg\bg060.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_heisi1.bmp",-160,0
lsp 701,":a;chara\mob_heisi1.bmp",160,0:print 10,500
name "Guard D"
>Someone already drank all the coffee...\
name ""
name "Guard E"
>The coffee's gone too?@> Someone stole the snacks, too!\
name ""
lsp 700,":a;chara\mob_madamy.bmp",-160,0
lsp 701,":a;chara\mob_madamy.bmp",160,0:print 10,500
>While the guards argue, two elegant ghost women are talking with tea and crumpets in their hands.\
name "Ghost Madame A"
>The air feels stiff in here.@
>Would you be a dear and open that window?\
name ""
name "Ghost Madame B"
eng "Of course.":$sel6/
dwave 1,"se\door3.ogg"
\
name ""
lsp 700,":a;chara\mob_heisi1.bmp",-160,0
lsp 701,":a;chara\mob_heisi1.bmp",160,0:print 10,500
name "Guard D"
>Kyaa! The window opened by itself!\
name ""
name "Guard E"
>Po...Poltergeist!\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg044.bmp",7,1000
return



*city10_main0

mov %genzaiti,6
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\asioto2.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg037.bmp",7,1500
bgm "bgm\city1.ogg"
goto *city10_main



*city10_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Youth ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Man ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Woman ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Soldier ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Mermaid A ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Mermaid B ",95,310:spbtn 606,606
lsp 607,":s/20,20,0;#FFFFFF#FF4444Mermaid Girl ",95,340:spbtn 607,607
lsp 608,":s/20,20,0;#FFFFFF#FF4444Mermaid Merchant ",95,370:spbtn 608,608
strsp 610,"Weapon Shop",410,160,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
strsp 611,"Tool Shop",410,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Church ",410,220:spbtn 612,612
lsp 613,":s/20,20,0;#FFFFFF#FF4444Mermaid Pub ",410,250:spbtn 613,613
strsp 614,"Meia's House",410,280,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 614,614
if %ivent04=0 lsp 619,":s/20,20,0;#bbbbbbLeave Town ",410,400
if %ivent04=1 lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave Town ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city10_main
if %cmd1=-1 gosub *menu:goto *city10_main
cspl 600,699
if %cmd1=601 gosub *city10_01:goto *city10_main
if %cmd1=602 gosub *city10_02:goto *city10_main
if %cmd1=603 gosub *city10_03:goto *city10_main
if %cmd1=604 gosub *city10_04:goto *city10_main
if %cmd1=605 gosub *city10_05:goto *city10_main
if %cmd1=606 gosub *city10_06:goto *city10_main
if %cmd1=607 gosub *city10_07:goto *city10_main
if %cmd1=608 gosub *city10_08:goto *city10_main
if %cmd1=610 gosub *city10_10:goto *city10_main
if %cmd1=611 gosub *city10_11:goto *city10_main
if %cmd1=612 gosub *city10_12:goto *city10_main
if %cmd1=613 gosub *city10_13:goto *city10_main
if %cmd1=614 && %ivent04=0 return
if %cmd1=614 && %ivent04=1 gosub *city10_14:goto *city10_main
if %cmd1=619 return
goto *city10_main



*city10_01

lsp 700,":a;chara\mob_seinen1.bmp",-160,0
lsp 701,":a;chara\mob_Mermaid2.bmp",160,0:print 10,500
gosub *setwindow_01
name "Youth"
>Since then, Ilias Kreuz hasn't committed any more acts of terrorism.@
>Isn't that great, honey?\
name ""
name "Mermaid"
>But it was scary...@
>I don't want my darling to get hurt because of me...\
name ""
name "Youth"
>If it's for you, I don't mind being hurt, honey.@
>Even if I have to give my life, I'll protect you!\
name ""
name "Mermaid"
>Ahh... Darling!@
>You make me the happiest Mermaid in the world!\
name ""
name "Youth"
>Ahh... Honey!@
>You're the best treasure in the world!\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city10_02

lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Man"
>The person who bombed the Mermaid school the other day...@
>I heard he's the head of Ilias Kreuz.\
>Apparently he ran away to the north.\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city10_03

lsp 700,":a;chara\mob_musume2.bmp",175,0:print 10,500
gosub *setwindow_01
name "Woman"
>Even though nothing's happened since then, I wonder when something will...\
>As long as this town has Mermaids, I don't think it will stop.\
>Of course, the people who are attacking the Mermaids are the bad guys.\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city10_04

lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier"
>I heard that the Monster Lord herself attacked San Ilia the other day.@
>It seems like the only damage she did was a fire in the library.\
>It truly must have been Ilias' protection that prevented any further damages...\
name ""
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city10_05

lsp 700,":a;chara\mob_Mermaid2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Mermaid A"
>Even after such a horrible attack like that, the people of this town still warmly accept us...\
>That's why we really don't want to involve them...\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city10_06

lsp 700,":a;chara\mob_Mermaid1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Mermaid B"
>Us Mermaids are just bringing trouble for everyone else in this town...@
>Recently, we've taken to setting up patrols to help guard the town.\
>We're fine patrolling, since our lower bodies are very strong.\
>Even 200 meters under water, we can still swim at 15 knots.@
>We can shatter a normal human's bones with one swipe of our tail.\
>...I'm kidding!@
>We're actually incredibly weak...\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city10_07

lsp 700,":a;chara\mob_Mermaid3.bmp",0,0:print 10,500
gosub *setwindow_01
name "Mermaid Girl"
>My Mermaid song! 
>Can you hear it? \
name ""
skillname "Song of Seduction"
lsp 700,":a;chara\mob_Mermaid3.bmp",-200,0
lsp 701,":a;chara\mob_ozisan1.bmp",160,0:print 10,500
>A man passing by has been seduced by the Mermaid's song!\
skillname ""
name "Man"
>M...m...m...master?@
>M...m...m...master!\
name ""
name "Mermaid Girl"
>Kyaaaa!\
name ""
lsp 700,":a;chara\mob_seinen1.bmp",-160,0
lsp 701,":a;chara\mob_ozisan1.bmp",160,0:print 10,500
name "Youth"
>Help! My crazy old man is attacking a little Mermaid girl!\
name ""
lsp 700,":a;chara\mob_seinen1.bmp",-240,0
lsp 701,":a;chara\mob_ozisan1.bmp",0,0
lsp 702,":a;chara\mob_sensi1.bmp",240,0:print 10,500
name "Soldier"
>Another Ilias Kreuz attack!?@
>Get him!\
name ""
dwave 1,"se\dageki.ogg"
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
wait 250
dwave 2,"se\dageki.ogg"
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
wait 250
dwave 3,"se\dageki2.ogg"
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
vsp 701,0:print 10,15
vsp 701,1:print 10,15
wait 250
name "Man"
eng "Guha!!":$sel6/
dwave 4,"se\down.ogg"
csp 701:print 10,500
\
name ""
cspl 701,702
lsp 700,":a;chara\mob_Mermaid3.bmp",0,0:print 10,500
name "Mermaid Girl"
>Wawawa...@>I wasn't supposed to sing that song...\
>I'm sorry, mister...\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city10_08

lsp 700,":a;chara\meia_st21.bmp",50,50:print 10,500
gosub *setwindow_01
name "Mermaid Merchant"
>I have a new product!@>Grilled Sea Anemone!@
>But it isn't selling well either...\
name ""
name "Luka"
>...Why do you keep grilling such strange things?\
name ""
name "Mermaid Merchant"
>It's fine, just buy it!@
>I want to get out of these ragged clothes...\
name ""
dwave 1,"se\kaimono.ogg"
mov %item11,1
>Luka was forced to buy [Grilled Sea Anemone]!\
cspl 3,7
csp 611
cspl 700,705
return



*city10_10

bg "bg\bg150.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan3.bmp",0,0:print 10,500
name "Shopkeeper"
>Welcome!@
>In these dark times of disasters and terrorism, you want to get yourself some good equipment!\
name ""
name "Luka"
>Is that kind of stuff really selling?\
name ""
name "Shopkeeper"
>These fire-proof clothes are getting really popular.@
>Everyone is uneasy about the terrorist attacks...\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg037.bmp",7,1000
return



*city10_11

bg "bg\bg154.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
name "Shopkeeper"
>Welcome!\
>We carry clothes for Mermaids at this shop.@
>Clothes that expose almost all of the chest area are the most popular these days.\
name ""
name "Luka"
>...Really?\
name ""
name "Shopkeeper"
>I'm kidding... For now.@
>But if our shop advertises it as the new fashion trend, that's what the trend will become.\
>Making lies become truth... Isn't the fashion world wonderful?\
name ""
name "Luka"
>So you want to make such low-cut clothes popular...?\
name ""
name "Shopkeeper"
>I'm just trying to serve the needs of the men in the world better. Hahaha!\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-120,0
lsp 701,":a;chara\mob_seinen1.bmp",160,0:print 10,500
name "Alice"
>.........\
name ""
name "Luka"
>Hya! Alice!?\
name ""
name "Shopkeeper"
>This isn't what you think...@
>I'm just... Advertising the newest fashion craze...\
name ""
name "Alice"
>....................Pervert.\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg037.bmp",7,1000
return



*city10_12

bg "bg\bg156.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_sinkan.bmp",0,0:print 10,500
name "Priest"
>It's possible that Ilias Kreuz is actually carrying out Ilias' will.@
>It's heresy for Mermaids and humans to live together in this town as they are...\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg037.bmp",7,1000
return



*city10_13

bg "bg\bg155.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_Mermaid2.bmp",0,0:print 10,500
name "Mermaid"
>Oh... Welcome, you cute Hero.@
>What are you going to order?\
name ""
name "Luka"
>Ah... I don't drink alcohol.\
name ""
name "Mermaid"
>Then, do you want to hear the story of how Mermaids came to this town?@
>...It's a sad story from a hundred years ago, between a young human and a Mermaid.\
>A long time ago, there was a young sailor named Alan in this town.@
>One day, his ship wrecked while on a voyage.\
>He was attacked by a shark, and was mortally wounded.@
>Suddenly, a beautiful Mermaid named Laura appeared, and saved him.\
>It was love at first sight for Laura.@
>Alan's injury was so severe, that normally it would kill a human.\
>There was a puncture wound through his left chest that went half an inch into his lung, leaving him in a state of cardiopulmonary arrest.\
>His spine was also injured in the shark attack, and he had lost a third of his blood.\
name "Luka"
>...That's unusually detailed.\
name ""
name "Mermaid"
>Anyway, normally someone wouldn't survive that.@
>...Did I already say he was half dead?\
>So, Laura made Alan drink her blood.@
>You may not know, but the blood of a Mermaid is a powerful medicine.\
>Drinking her blood, Alan was somehow able to recover.@
>But even with her blood, he wasn't able to be completely fine.\
>For a full year he had to drink her blood every day, or else he would die.\
>So Laura pretended to be a human, and followed Alan to the town.@
>She secretly mixed her blood in with his food to keep him alive.\
name ""
name "Luka"
>...Why did Laura have to disguise herself?\
name ""
name "Mermaid"
>The town hated monsters.@
>So Laura had no choice but to pretend to be a human.\
>Months passed like that, as she continued to take care of Alan.@
>Laura and Alan fell completely in love...\
>One day, it was discovered that Laura was not human.@
>Alan's love didn't change, but the other townsfolk were different.\
>People were terrified of her, and accused her of being the source of all the bad things happening in town.\
>Finally, soldiers caught her and decided to execute her.\
name ""
name "Luka"
>But couldn't she have escaped?@
>As a Mermaid, she would have been stronger than any guard...\
name ""
name "Mermaid"
>If Laura ran, then Alan wouldn't be able to drink her blood.@
>That's why Laura didn't run.\
name ""
name "Luka"
>...........\
name ""
name "Mermaid"
>Laura decided she would turn herself in and choose to be executed by skewering.\
>Choosing the bloodiest possible method, she wanted Alan to be able to collect all of her blood.\
name ""
name "Luka"
>No... How awful...\
name ""
name "Mermaid"
>Alan figured out what Laura was planning on doing by the letter she sent him...@
>He decided to kill himself by drinking poison.\
>If he died, Laura wouldn't be forced to stay by his side to give him her blood.@
>He couldn't bear the thought of Laura being executed for his sake.\
name ""
name "Luka"
>...........\
name ""
name "Mermaid"
>Laura fled from the execution ground after hearing of Alan's death.@
>For the next few days, a storm blew through the town, as if summoned by Laura's grief.\
>The people of the town regretted their actions.@
>They decided to repent, and came to accept Mermaids.\
>...The end.\
name ""
name "Luka"
>...That's a sad story.\
name ""
name "Mermaid"
>It's a legend, so I don't know how true it really is, but it's been handed down through the years in this town...\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg037.bmp",7,1000
return



*city10_14

gosub *setwindow_01p
>There's a piece of paper stuck on Meia's door.@
>We're on our honeymoon! We won't be back for a while!\
cspl 3,7
csp 611
return



*city11_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Youth ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Three Women ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Elder ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Playing Children ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Soldier A ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Soldier B ",95,310:spbtn 606,606
strsp 610,"Weapon Shop",410,160,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
strsp 611,"Tool Shop",410,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
strsp 612,"San Ilia Castle",410,220,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 612,612
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave Town ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city11_main
if %cmd1=-1 gosub *menu:goto *city11_main
cspl 600,699
if %cmd1=601 && %ivent05=0 gosub *city11_01a:goto *city11_main
if %cmd1=601 && %ivent05=1 gosub *city11_01b:goto *city11_main
if %cmd1=602 && %ivent05=0 gosub *city11_02a:goto *city11_main
if %cmd1=602 && %ivent05=1 gosub *city11_02b:goto *city11_main
if %cmd1=603 gosub *city11_03:goto *city11_main
if %cmd1=604 && %ivent05=0 gosub *city11_04a:goto *city11_main
if %cmd1=604 && %ivent05=1 gosub *city11_04b:goto *city11_main
if %cmd1=605 && %ivent05=0 gosub *city11_05a:goto *city11_main
if %cmd1=605 && %ivent05=1 gosub *city11_05b:goto *city11_main
if %cmd1=606 && %ivent05=0 gosub *city11_06a:goto *city11_main
if %cmd1=606 && %ivent05=1 gosub *city11_06b:goto *city11_main
if %cmd1=610 && %ivent05=0 gosub *city11_10a:goto *city11_main
if %cmd1=610 && %ivent05=1 gosub *city11_10b:goto *city11_main
if %cmd1=611 && %ivent05=0 gosub *city11_11a:goto *city11_main
if %cmd1=611 && %ivent05=1 gosub *city11_11b:goto *city11_main
if %cmd1=612 goto *city11b_main0
if %cmd1=619 return
goto *city11_main



*city11_01a

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Youth"
>My friend saw something strange in the forest to the northwest.@
>A strange child with wings like a butterfly was dancing around.\
>Is it because of his lack of faith that he saw something like that?\
lsp2 0,":a;chara\fairy_st01.bmp",670,300,100,100,0,200
gosub *syoukan_effect
>...It looks like my faith is too weak.@> I'm going to the church...\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city11_01b

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Youth"
>My friend saw something strange in the forest to the northwest.@
>A strange child with wings like a butterfly was dancing around.\
>Is it because of his lack of faith that he saw something like that?\
lsp2 0,":a;chara\mob_zyoseiy.bmp",200,300,100,100,0,200
gosub *syoukan_effect
>...Did something just pass by me?\
lsp2 0,":a;chara\fairy_st01.bmp",670,300,100,100,0,200
gosub *syoukan_effect
>...It looks like my faith is too weak.@> I'm going to the church...\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city11_02a

lsp 700,":a;chara\mob_zyosei.bmp",0,0:print 10,500
gosub *setwindow_01
name "Woman A"
>Hey, did you hear?@
>Creepy demon children have been seen roaming the streets.\
name ""
lsp 700,":a;chara\mob_zyosei.bmp",-160,0
lsp 701,":a;chara\mob_madam.bmp",160,0:print 10,500
name "Woman B"
>How scary...@
>The tool shop owner said he saw a pixie, too!\
name ""
csp 701
lsp 700,":a;chara\mob_madam.bmp",0,0:print 10,500
name "Woman C"
>Jimmy's crops were ruined, too.@
>We have to be careful...\
name ""
lsp 700,":a;chara\mob_madam.bmp",-150,0:print 10,500
lsp 701,":a;chara\fairys_st01.bmp",370,100:print 10,500
name "Fairy"
>I want to talk toooo!\
name ""
lsp 700,":a;chara\mob_zyosei.bmp",-260,0
lsp 701,":a;chara\mob_madam.bmp",0,0
lsp 702,":a;chara\fairys_st01.bmp",460,100:print 10,500
name "Woman A"
>That's fine, little miss.@>Feel free to join us.\
name ""
name "Woman B"
>Oh my!@> What nice wing accessories.@
>I want them too...\
name ""
name "Luka"
>.............\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city11_02b

lsp 700,":a;chara\mob_zyosei.bmp",0,0:print 10,500
gosub *setwindow_01
name "Woman A"
>Hey, did you hear?@
>Creepy demon children have been seen roaming the streets.\
name ""
lsp 700,":a;chara\mob_zyosei.bmp",-160,0
lsp 701,":a;chara\mob_madam.bmp",160,0:print 10,500
name "Woman B"
>I've heard about that...@
>They fly around the streets with hate filled laughter!\
name ""
csp 701
lsp 700,":a;chara\mob_madam.bmp",0,0:print 10,500
name "Woman C"
>How scary...@
>The tool shop owner said he saw a pixie, too!\
name ""
lsp 700,":a;chara\mob_madam.bmp",-160,0
lsp 701,":a;chara\mob_zyoseiy.bmp",160,0:print 10,500
name "Ghost Woman"
>Jimmy's crops were ruined, too.@
>We have to be careful...\
name ""
lsp 700,":a;chara\mob_madam.bmp",-260,0
lsp 701,":a;chara\mob_zyoseiy.bmp",0,0
lsp 702,":a;chara\fairys_st01.bmp",460,100:print 10,500
name "Fairy"
>I want to talk toooo!\
name ""
name "Woman A"
>That's fine, little miss.@>Feel free to join us.\
name ""
name "Woman B"
>Oh my!@> What nice wing accessories.@
>I want them too...\
name ""
name "Luka"
>..............\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city11_03

lsp 700,":a;chara\mob_rouzin1.bmp",-160,0
lsp 701,":a;chara\fairys_st51.bmp",400,100:print 10,500
gosub *setwindow_01
name "Elder"
>Oh how unusual!@>Are you a fairy?@
>When I was young, there were a lot of fairies here, too...\
>...Do you want my rice ball?\
name ""
name "Fairy"
>Yay!@> Snacks! \
name ""
if %ivent05=0 cspl 3,7:csp 611:cspl 700,705:return
lsp 700,":a;chara\mob_rouzin1.bmp",-280,0
lsp 701,":a;chara\mob_seineny.bmp",0,0
lsp 702,":a;chara\fairys_st51.bmp",500,100:print 10,500
name "Ghost"
>After that small stream in the south was filled in, fairies weren't seen anymore.\
>I was around twenty at the time... So around sixty years ago?\
name ""
name "Elder"
>Ah yes, yes.@
>This is my first time seeing a fairy since then...\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city11_04a

gosub *setwindow_01
lsp 700,":a;chara\mob_syounen.bmp",-220,0:print 10,500
name "Boy"
>Yaay!\
name ""
lsp 701,":a;chara\mob_syouzyo.bmp",0,0:print 10,500
name "Girl"
>Kyaa! Yay! \
name ""
lsp 702,":a;chara\fairys_st21.bmp",450,100:print 10,500
name "Fairy"
>Yaay! \
name ""
>The children and the fairy are playing tag...\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city11_04b

gosub *setwindow_01
lsp 700,":a;chara\mob_syounen.bmp",-320,0:print 10,500
name "Boy"
>Yaay!\
name ""
lsp 701,":a;chara\mob_syouzyo.bmp",-100,0:print 10,500
name "Girl"
>Kyaa! Yay! \
name ""
lsp 702,":a;chara\mob_syouzyoy.bmp",110,0:print 10,500
name "Ghost Girl"
>Hahahaha!\
name ""
lsp 703,":a;chara\fairys_st21.bmp",490,100:print 10,500
name "Fairy"
>Yaay! \
name ""
>The children, ghost and fairy are playing tag...\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city11_05a

lsp 700,":a;chara\mob_sensi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier A"
>I don't know why, but reports of little pixies have increased.@
>It must be more fallout from that Monster Lord attack...\
>...But they do say they're actually kind of cute.@
>...And that people are feeding them snacks...\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city11_05b

lsp 700,":a;chara\mob_sensi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier A"
>Right after the ghost infestation is a pixie infestation...@
>At this rate, San Ilia will be taken over by strange things!\
>...But they do say the pixies are actually kind of cute.@
>...And that people are feeding them snacks...\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city11_06a

lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier B"
>The castle is still in a serious uproar...@
>People keep reporting unnatural phenomena.\
>How can something like this happen in this sacred ground...?\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city11_06b

lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier B"
>The castle is still in a serious uproar...@
>People keep reporting unnatural phenomenon.\
>Has this land already been forsaken by Ilias?\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city11_10a

bg "bg\bg150.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
name "Owner"
>Even if those fearful demon children are attacking...@
>Since they're so tiny, my weapons don't sell at all!\
>Damn that tool shop owner!\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg048.bmp",7,1000
return



*city11_10b

bg "bg\bg150.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
name "Owner"
>One after another, this crap keeps happening!@
>The only thing that doesn't change is my lack of sales!\
>Damn that tool shop owner!\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg048.bmp",7,1000
return



*city11_11a

bg "bg\bg151.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan3.bmp",0,0:print 10,500
name "Owner"
>Sunflower seeds are selling very good right now.@
>Since it's those pixies favorite food, people keep buying it hoping to make them into pets.\
>Even more surprising, the pixies themselves are coming to buy them!@
>Naturally, I don't discriminate with my customers.\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg048.bmp",7,1000
return



*city11_11b

bg "bg\bg151.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan3.bmp",0,0:print 10,500
name "Owner"
>I'm no longer carrying anti-ghost water.@
>The ghosts started to protest outside my shop, so I stopped selling it.\
>But now, sunflower seeds are selling well.@
>Since it's those pixies favorite food, people keep buying it hoping to make them into pets.\
>Even more surprising, the pixies themselves are coming to buy them!@
>Naturally, I don't discriminate with my customers.\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg048.bmp",7,1000
return



*city11b_main0

mov %genzaiti,5
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\asioto3.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg044.bmp",7,1500
bgm "bgm\castle1.ogg"
goto *city11b_main



*city11b_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Guard A ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Guard B ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Arguing Priests ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Scholar ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Soldier ",95,280:spbtn 605,605
lsp 610,":s/20,20,0;#FFFFFF#FF4444Chapel ",410,160:spbtn 610,610
strsp 611,"Basement Library",410,190,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
strsp 612,"Audience Hall",410,220,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 612,612
lsp 613,":s/20,20,0;#FFFFFF#FF4444Guard's Office ",410,250:spbtn 613,613
strsp 619,"Back to Town",410,400,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city11b_main
if %cmd1=-1 gosub *menu:goto *city11b_main
cspl 600,699
if %cmd1=601 && %ivent05=0 gosub *city11b_01a:goto *city11b_main
if %cmd1=601 && %ivent05=1 gosub *city11b_01b:goto *city11b_main
if %cmd1=602 gosub *city11b_02:goto *city11b_main
if %cmd1=603 gosub *city11b_03:goto *city11b_main
if %cmd1=604 gosub *city11b_04:goto *city11b_main
if %cmd1=605 gosub *city11b_05:goto *city11b_main
if %cmd1=610 && %ivent05=0 gosub *city11b_10a:goto *city11b_main
if %cmd1=610 && %ivent05=1 gosub *city11b_10b:goto *city11b_main
if %cmd1=611 gosub *city11b_11:goto *city11b_main
if %cmd1=612 && %ivent05=0 gosub *city11b_12a:goto *city11b_main
if %cmd1=612 && %ivent05=1 gosub *city11b_12b:goto *city11b_main
if %cmd1=613 && %ivent05=0 gosub *city11b_13a:goto *city11b_main
if %cmd1=613 && %ivent05=1 gosub *city11b_13b:goto *city11b_main
if %cmd1=619 textoff:btndef clear:mov %sinkoumode,0:skipoff:autoclick 0:dwave 1,"se\asioto3.ogg":csp 611:cspl 3,7:bg black,7,1500:bg "bg\bg048.bmp",7,1500:bgm "bgm\city1.ogg":goto *city11_main
goto *city11b_main



*city11b_01a

lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Guard A"
>I keep hearing the laughter of a small girl...@
>Other soldiers hear things too... But we can't find the source...\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city11b_01b

lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Guard A"
>What's with this weird atmosphere...@
>What's more, I keep hearing a small girl's laughter...\
>The soldiers are getting scared with all this weird stuff happening...\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city11b_02

lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Guard B"
>...I'm patrolling the castle.@
>I won't let even a single insect by me!\
name ""
>A fairy slowly creeps toward the Guard's back while holding a frog.@
>Suddenly, she throws the frog at him!\
name "Guard B"
>Kyaa!@>What was that!?@
>A... frog?@> Who threw this!?\
name ""
>The guard doesn't seem to notice the fairy giggling right in front of him.\
cspl 3,7
csp 611
cspl 700,705
return



*city11b_03

gosub *setwindow_01
lsp 700,":a;chara\mob_sinkan.bmp",-220,0:print 10,500
name "Priest A"
>Recently, pixies have been running wild.@
>These sightings must be because they hold weak hearts.\
name ""
if %ivent05=0 lsp 701,":a;chara\mob_sinkan.bmp",0,0:print 10,500
if %ivent05=1 lsp 701,":a;chara\mob_sinkany.bmp",0,0:print 10,500
if %ivent05=0 name "Priest B"
if %ivent05=1 name "Ghost Priest"
>Hmph. From the book of Muran.@>[Bad people see bad things].@
>First, we must stop the evil of man.\
name ""
lsp 702,":a;chara\fairys_st41.bmp",560,100:print 10,500
name "Fairy"
>Hey hey, what are you two talking about?@
>Tell meeee!\
name ""
>It looks like the two priests don't notice the fairy...\
cspl 3,7
csp 611
cspl 700,705
return



*city11b_04

lsp 700,":a;chara\mob_gakusya.bmp",0,0:print 10,500
gosub *setwindow_01
name "Scholar"
>In this ancient thousand year old book, there is a lot of information about fairies.\
>In other words, one thousand years ago, fairies were common.\
>Why did they vanish from the scriptures since then...?@
>An interesting question...\
name ""
if %ivent05=0 cspl 3,7:csp 611:cspl 700,705:return
lsp 700,":a;chara\mob_gakusya.bmp",-160,0
lsp 701,":a;chara\mob_rouziny.bmp",160,0:print 10,500
name "Elder Ghost"
>I'm only 500 years old...@
>But we had picture books that had fairies in it.\
name ""
name "Scholar"
>Is that true!?@
>But now, fairies have vanished from folklore...\
>Were they unseen for so long that their existence was forgotten?@
>Or were they intentionally erased from the scriptures...?\
>An interesting question...\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city11b_05

lsp 700,":a;chara\mob_sensi1.bmp",-160,0
lsp 701,":a;chara\fairys_st13.bmp",430,100:print 10,500
gosub *setwindow_01
name "Soldier"
>Here... It's a sunflower seed...@
>Don't you want it?\
>...I love cute things.\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city11b_10a

bg "bg\bg157.bmp",7,1000
gosub *setwindow_01p
>The chapel is in an uproar because of the fairies.\
lsp 700,":a;chara\mob_obasan.bmp",-160,0
lsp 701,":a;chara\mob_ozisan3.bmp",160,0:print 10,500
name "Woman"
>Oh great Ilias...@
>Please cleanse us of these pixies...\
name ""
name "Man"
>We can rest easy in this sacred chapel.@
>Ilias, please save us from those hateful pixies!\
name ""
lsp 700,":a;chara\tfairy_st01.bmp",60,130:print 10,500
name "Fairy A"
>God thingy sitting on a cloud, please make the flowers bloom!\
name ""
name "Fairy B"
>Also please make mommy and sister happy!\
name ""
name "Luka"
>................\
name ""
>The fairies mimic the humans as they pray...\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg044.bmp",7,1000
return



*city11b_10b

bg "bg\bg157.bmp",7,1000
gosub *setwindow_01p
>Because of the fairies and ghosts, the chapel is in an uproar.\
lsp 700,":a;chara\mob_obasan.bmp",-160,0
lsp 701,":a;chara\mob_ozisan3.bmp",160,0:print 10,500
name "Woman"
>Oh great Ilias...@
>Please cleanse us of these pixies and ghosts...\
name ""
name "Man"
>We can rest easy in this sacred chapel.@
>Ilias, please save us from those hateful beings!\
name ""
lsp 700,":a;chara\mob_seineny.bmp",-160,0:print 10,500
name "Ghost"
>Oh great Ilias, please watch over me...\
name ""
lsp 701,":a;chara\tfairy_st01.bmp",380,130:print 10,500
name "Fairy A"
>God thingy sitting on a cloud, please make the flowers bloom!\
name ""
name "Fairy B"
>Also please make mommy and sister happy!\
name ""
name "Luka"
>...............\
name ""
>The fairies mimic the humans as they pray...\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg044.bmp",7,1000
return



*city11b_11

lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Guard"
>The library is still being repaired.@
>For some reason, there are scribbles and drawings appearing all over the castle.\
>Because of these strange occurrences, we aren't allowing anyone into the library.\
name ""
name "Luka"
>...That sounds serious.\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city11b_12a

lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Guard Captain"
>Oh, Mr. Luka!@
>The body and mind of the King has completely recovered!@
>But... It looks like the memory of the attack has been lost forever.\
>The psychic shock must have been too much, and he forgot all about it.@
>At any rate, please enter.\
name ""
name "Luka"
>O...Ok...\
name ""
dwave 1,"se\asioto3.ogg"
sean_change "bg045"
lsp 700,":a;chara\saniria_t_st03.bmp",0,0:print 10,500
name "San Ilia King"
>Oh, the Hero Luka.@> I'm glad you came.@
>Recently, strange things keep happening in my town!\
name ""
name "Luka"
>.............\
name ""
>I wonder if he's really healed...\
name "Luka"
>Excuse me, King...@
>How does your head feel...?\
name ""
lsp 700,":a;chara\saniria_t_st04.bmp",0,0:print 10,500
name "San Ilia King"
>Oh?@>Ahh! What's this!?\
name ""
>The King grips the jar on his head in surprise.@
>Apparently he hadn't noticed it...\
name "San Ilia King"
>Wh...Where is my crown!?\
name ""
>Over in the corner of the room, several fairies are playing with his crown.\
>With the fairies invisible to the King, the crown seems like it's moving on its own.\
name "San Ilia King"
>Ah!@>What's happening around here!?@> Ilias, please save us!\
name ""
lsp 700,":a;chara\saniria_tf_st04.bmp",0,0:print 10,500
>The fairies suddenly jump on top of his shoulders.@
>I don't know why, but it seems like they really like him.\
>Laughing and giggling, the fairies start to dance and play on his shoulders.\
name "San Ilia King"
>Nooooo... What is this!?@
>Why are my shoulders being tickled by the disembodied voices of little girls!?\
name ""
name "Luka"
>Uhm... You seem busy today...\
name ""
>I quickly walk out of the audience hall.\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg044.bmp",7,1000
return



*city11b_12b

lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Guard Captain"
>Oh, Mr. Luka!@
>The body and mind of the King has completely recovered!@
>But... It looks like the memory of the attack has been lost forever.\
>The psychic shock must have been too much, and he forgot all about it.@
>At any rate, please enter.\
name ""
name "Luka"
>O...Ok...\
name ""
dwave 1,"se\asioto3.ogg"
sean_change "bg045"
lsp 700,":a;chara\saniria_tg_st03.bmp",0,0:print 10,500
name "San Ilia King"
>Oh, the Hero Luka.@> I'm glad you came.@
>Recently, strange things keep happening in my town!\
name ""
name "Luka"
>.............\
name ""
>I wonder if he's really healed...\
name "Luka"
>Excuse me, King...@
>How does your head feel...?\
name ""
lsp 700,":a;chara\saniria_t_st04.bmp",0,0:print 10,500
name "San Ilia King"
>Oh?@>Ahh! What's this!?\
name ""
>The King grips the jar on his head in surprise.@
>Apparently he didn't notice it...\
name "San Ilia King"
>Wh...Where is my crown!?\
name ""
>Over in the corner of the room, several fairies are playing with his crown.\
>With the fairies seemingly invisible to the King, the crown seems like it's moving on its own.\
name "San Ilia King"
>Ah!@>What's happening around here!?@> Ilias, please save us!\
name ""
lsp 700,":a;chara\saniria_tf_st04.bmp",0,0:print 10,500
>The fairies suddenly jump on top of his shoulders.@
>I don't know why, but it seems like they really like him.\
>Laughing and giggling, the fairies start to dance and play on his shoulders.\
name "San Ilia King"
>Nooooo... What is this!?@
>Why are my shoulders being tickled by the disembodied voices of little girls!?\
name ""
name "Luka"
>Uhm... You seem busy today...\
name ""
>I quickly walk out of the audience hall.\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg044.bmp",7,1000
return



*city11b_13a

bg "bg\bg060.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_heisi1.bmp",-160,0
lsp 701,":a;chara\mob_heisi1.bmp",160,0:print 10,500
name "Guard D"
>Oh? Are we already out of sugar and coffee?\
name ""
name "Guard E"
>Sugar now too? Where are all of the snacks going!?\
name ""
lsp 700,":a;chara\fairys_st01.bmp",60,100
lsp 701,":a;chara\fairys_st21.bmp",370,100:print 10,500
name "Fairy A"
>I@>Love@> Snacks! \
name ""
name "Fairy B"
>Sugar@>Is@> Delicious! \
name ""
>A fairy peeps her head out from the sugar jar as she sings a song.\
name "Fairy C"
>Wawawawawa!\
name ""
>Another fairy at the other side of the room has her face stuck in a jar.\
dwave 1,"se\break5.ogg"
>As she struggles to get out, the vase drops on the floor and shatters!\
lsp 700,":a;chara\mob_heisi1.bmp",-160,0
lsp 701,":a;chara\mob_heisi1.bmp",160,0:print 10,500
name "Guard C"
>Aiiee!@> Poltergeist!\
name ""
name "Guard D"
>This castle!@> I'm sick of it!\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg044.bmp",7,1000
return



*city11b_13b

bg "bg\bg060.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_heisi1.bmp",-160,0
lsp 701,":a;chara\mob_heisi1.bmp",160,0:print 10,500
name "Guard D"
>We're out of coffee awfully fast today...\
name ""
name "Guard E"
>The sugar and cake is gone too.\
name ""
lsp 700,":a;chara\mob_madamy.bmp",-160,0
lsp 701,":a;chara\mob_madamy.bmp",160,0:print 10,500
>On the other end of the room, two elegant ghost women are chatting.\
name "Ghost Madame A"
>This castle is getting awfully noisy.\
name ""
name "Ghost Madame B"
>It's those little children!\
name ""
lsp 700,":a;chara\fairys_st01.bmp",60,100
lsp 701,":a;chara\fairys_st21.bmp",370,100:print 10,500
name "Fairy A"
>I@>Love@> Snacks! \
name ""
name "Fairy B"
>Sugar@>Is@> Delicious! \
name ""
>A fairy peeps her head out from the sugar jar as she sings a song.\
name "Fairy C"
>Wawawawawa!\
name ""
>Another fairy at the other side of the room has her face stuck in a jar.\
dwave 1,"se\break5.ogg"
>As she struggles to get out, the vase drops on the floor and shatters!\
lsp 700,":a;chara\mob_heisi1.bmp",-160,0
lsp 701,":a;chara\mob_heisi1.bmp",160,0:print 10,500
name "Guard C"
>Aiiee!@> Poltergeist!\
name ""
name "Guard D"
>I'm sick of this castle!\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg044.bmp",7,1000
return



*map3

saveoff
textoff
csp -1
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
bg "bg\map3.bmp",10,1000
goto *map3_2



*map3_2

strsp 601,"Sabasa Castle",275,230,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 601,11
lsp 602,":s/20,20,0;#FFFFFF#FF4444Pyramid ",145,300:spbtn 602,12
if %ivent06=0 strsp 605,"Req. Level: 21",110,320,8,1,20,20,0,0,1,1,#FFFFFF
if %ivent06=1 lsp 605,":s/20,20,0;#FFFFFFDone ",160,320
strsp 603,"Witch Hunt Village",240,500,10,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,13
if %ivent07=0 strsp 606,"Req. Level: 22",260,520,8,1,20,20,0,0,1,1,#FFFFFF
if %ivent07=1 lsp 606,":s/20,20,0;#FFFFFFDone ",310,520
strsp 604,"Safaru Ruins",350,60,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 604,14
strsp 607,"Req. Level: 24",340,80,8,1,20,20,0,0,1,1,#FFFFFF
print 1
btnwait2 %cmd1
if %cmd1=0 goto *map3_2
if %cmd1=-1 gosub *menu:goto *map3_2
csp -1
btndef clear
if %cmd1=11 gosub *city13_main0:dwave 1,"se\asioto2.ogg":bg black,7,1500:bgm "bgm\sabaku.ogg":goto *map3
if %cmd1=12 && %ivent06=0 goto *sean0136
if %cmd1=12 && %ivent06=1 goto *sean0149
if %cmd1=13 && %ivent07=0 goto *sean0150
if %cmd1=13 && %ivent07=1 gosub *city15_main0:dwave 1,"se\asioto2.ogg":bg black,7,1500:bgm "bgm\field3.ogg":goto *map3
if %cmd1=14 goto *sean0156
goto *map3_2



*city12_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Youth ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Woman ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Elder ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Man ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Soldier A ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Soldier B ",95,310:spbtn 606,606
lsp 607,":s/20,20,0;#FFFFFF#FF4444Boy ",95,340:spbtn 607,607
lsp 608,":s/20,20,0;#FFFFFF#FF4444Prostitute ",95,370:spbtn 608,608
strsp 610,"Weapon Shop",410,160,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
strsp 611,"Tool Shop",410,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Church ",410,220:spbtn 612,612
lsp 614,":s/20,20,0;#FFFFFF#FF4444Mermaid Pub ",410,250:spbtn 614,614
strsp 613,"Sabasa Castle",410,280,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 613,613
if %hanyo1+%hanyo2<2 lsp 619,":s/20,20,0;#bbbbbbHotel ",410,400
if %hanyo1+%hanyo2=2 lsp 619,":s/20,20,0;#FFFFFF#FF4444Hotel ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city12_main
if %cmd1=-1 gosub *menu:goto *city12_main
cspl 600,699
if %cmd1=601 gosub *city12_01:goto *city12_main
if %cmd1=602 gosub *city12_02:goto *city12_main
if %cmd1=603 gosub *city12_03:goto *city12_main
if %cmd1=604 gosub *city12_04:goto *city12_main
if %cmd1=605 gosub *city12_05:goto *city12_main
if %cmd1=606 gosub *city12_06:goto *city12_main
if %cmd1=607 gosub *city12_07:goto *city12_main
if %cmd1=608 gosub *city12_08:goto *city12_main
if %cmd1=610 gosub *city12_10:goto *city12_main
if %cmd1=611 gosub *city12_11:goto *city12_main
if %cmd1=612 gosub *city12_12:goto *city12_main
if %cmd1=613 textoff:btndef clear:mov %sinkoumode,0:skipoff:autoclick 0:dwave 1,"se\asioto2.ogg":csp 611:cspl 3,7:bg black,7,1500:bg "bg\bg065.bmp",7,1500:bgm "bgm\castle2.ogg":goto *city12b_main
if %cmd1=614 gosub *city12_14:goto *city12_main
if %cmd1=619 return
goto *city12_main



*city12_01

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Youth"
>The desert around here is really harsh.@
>But due to our King's ability, we've been able to thrive in spite of that.\
>The current King is the ninth generation, but he's just as good as his predecessors.\
>But... Is there going to be an issue with succession?@
>Ever since the Queen died, the King has remained unmarried.@
>He hasn't taken a concubine or anything either... There's just the Princess.\
>What's going to happen...?\
name ""
name "Luka"
>..............\
name ""
>Is the kidnapping related to the succession of the throne...?\
cspl 3,7
csp 611
cspl 700,705
return



*city12_02

lsp 700,":a;chara\mob_obasan.bmp",-160,0
lsp 701,":a;chara\mob_madam.bmp",160,0:print 10,500
gosub *setwindow_01
name "Woman"
>The King is a wonderful man... But he isn't immortal.@
>What's going to happen when he dies?\
>Will the Princess take the throne as the first Queen of Sabasa?\
name ""
name "Lady"
>The man she marries should become the next King.@
>I've heard that the King has been secretly looking for suitable marriage partners in the last few days...\
name ""
name "Luka"
>..............\
name ""
>Is the kidnapping related to the succession of the throne...?\
cspl 3,7
csp 611
cspl 700,705
return



*city12_03

lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Elder"
>I'm interested in the legends around the world, especially of the Pyramid.\
>It's said that deep inside of the Pyramid is the legendary Sphinx.@
>Existing for over a thousand years, it's extremely powerful.\
>It's said that crazy monster is guarding an incredible treasure that will be given to the one who can overcome the trial of the Pyramid.\
name ""
name "Luka"
>A trial and treasure...\
name ""
>I wonder if the trial and that treasure are related to the kidnapping?@
>...That can't be it, can it?\
cspl 3,7
csp 611
cspl 700,705
return



*city12_04

lsp 700,":a;chara\mob_ozisan2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Man"
>This area was hit by the Ilias Kreuz terrorists as well.@
>They attacked the bazaar, claiming we were doing business with monsters.\
>But the King cracked down on them swiftly and without mercy.@
>Since then, they haven't tried anything else here.\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city12_05

lsp 700,":a;chara\mob_sensi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier A"
>It seems as though you can undergo the [Dragon Seal Trial] in the pyramid.@
>Nobody really knows what it is, but everyone who has gone to challenge it hasn't returned.\
>If someone managed to pass it, they would become a household name.@
>...But nobody has come back after going out to attempt it.\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city12_06

lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier B"
>Yesterday, some soldier was walking up to people and staring at them in a really creepy manner.\
>After a few seconds he would sigh and say "This man is no good".\
>It really depressed everyone for some reason...\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city12_07

lsp 700,":a;chara\mob_syounen.bmp",0,0:print 10,500
gosub *setwindow_01
name "Boy"
>I'm going to grow up and marry the Princess!\
name ""
lsp 701,":a;chara\mob_seinen1.bmp",-160,0:print 10,500
name "Youth"
>Me too!\
name ""
lsp 702,":a;chara\mob_ozisan3.bmp",160,0:print 10,500
name "Man"
>Me too!\
name ""
lsp 703,":a;chara\mob_sensi1.bmp",-300,0:print 10,500
name "Soldier"
>Same here!\
name ""
lsp 704,":a;chara\mob_rouzin1.bmp",300,0:print 10,500
name "Elder"
>I will too!\
name ""
name "Boy"
>Yaay!\
name ""
name "Luka"
>...............\
name ""
>The Princess seems pretty popular among the men.@
>Is her popularity related to the kidnapping...?\
cspl 3,7
csp 611
cspl 700,705
return



*city12_08

lsp 700,":a;chara\mob_musume2.bmp",175,0:print 10,500
gosub *setwindow_01
name "Prostitute"
>Does the cute little Hero want to play with me?@
>Do you want to try some Princess role playing?\
name ""
name "Luka"
>Princess roleplaying...?\
name ""
name "Prostitute"
>Hehe... I dress up as the cute Princess.@
>There are a lot of men who are into that these days...\
name ""
name "Luka"
>.................\
name ""
>People seem to be pretty obsessed with the Princess...@
>Is this related to the kidnapping?\
cspl 3,7
csp 611
cspl 700,705
return



*city12_10

bg "bg\bg152.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
name "Owner"
>Welcome to my five-star establishment!@
>Please look around to your hearts content!\
name ""
name "Luka"
>Thanks...\
name ""
>Everything here looks better than all the other towns...@
>But nothing is better than my current sword.\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg064.bmp",7,1000
return



*city12_11

bg "bg\bg151.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan3.bmp",0,0:print 10,500
name "Shopkeeper"
>Welcome!@> Are you looking for something in particular?@
>How about some dried scorpions as emergency provisions?\
name ""
name "Luka"
>Noooooooooooooooooooo!\
name ""
dwave 2,"se\ikazuti.ogg":quake 10,750
>The Shopkeeper attacks Luka with psychological trauma!\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg064.bmp",7,1000
return



*city12_12

lsp 700,":a;chara\mob_sinkan.bmp",0,0
bg "bg\bg156.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_sinkan.bmp",0,0:print 10,500
name "Priest"
>South of here is the [Witch Hunt Village].@
>The female Lord arrests villagers and travelers accused of being witches.@
>She tortures them until they confess, then executes them.\
>Anyone accused is arrested right away.@
>Regardless of age or sex, she prosecutes any suspects.\
name "Luka"
>What!?@> That's horrible...\
name ""
name "Priest"
>I am a man that serves Ilias.@
>I cannot allow monsters or witches to continue living.\
>But that woman's acts are in excess.@
>The guilty and innocent alike are being killed by her.\
name ""
>Is she related to Ilias Kreuz?@
>It's pretty apparent that she must have a big hatred of monsters...\
name "Luka"
>That's inexcusable!\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Calm down.@
>Don't you already have to deal with the Princess and Gnome?\
name ""
name "Luka"
>...So what?\
name ""
name "Alice"
>...Are you serious?\
name ""
>Alice lifts her eyebrows at me.\
name "Luka"
>I can't let such a horrible thing happen.@
>Just like monsters attacking humans, I can't have humans attacking monsters.\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>.................\
name ""
mov %hanyo2,1
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg064.bmp",7,1000
return



*city12_14

bg "bg\bg155.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_Mermaid1.bmp",0,0:print 10,500
name "Mermaid"
>Welcome to the Mermaid Pub! Can I help you?\
name ""
name "Luka"
>Oh? There's a Mermaid Pub in this town too?\
name ""
name "Mermaid"
>Yes! The King allowed us to open up here.\
>Now we have two locations!@
>Hopefully one day we can have Mermaid Pubs all over the world!\
name ""
name "Luka"
>Oh?@>Good luck!\
name ""
name "Mermaid"
>Once our Mermaid Pub conquers the world, the Queen may come out!\
name ""
name "Luka"
>The Queen?@> The Mermaid Queen?\
name ""
name "Mermaid"
>Yes... The Queen hates humans for some reason.@
>After we became friendly with humans, she vanished.\
>Why does she hate them so much?@>Where did she go?@>Nobody knows...\
name ""
name "Luka"
>I see...\
name ""
>The Mermaid Queen hates humans...@
>It doesn't look like even the Mermaids themselves know why.\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg064.bmp",7,1000
return



*city12b_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
strsp 601,"Minister A",95,160,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 601,601
strsp 602,"Minister B",95,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Chief Retainer ",95,220:spbtn 603,603
strsp 604,"Sabasa Knight Leader",95,250,11,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Scholar ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Priest ",95,310:spbtn 606,606
strsp 610,"Audience Hall",410,160,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
lsp 611,":s/20,20,0;#FFFFFF#FF4444Princess' Room ",410,190:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Soldier's Office ",410,220:spbtn 612,612
strsp 619,"Return to Town",410,400,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city12b_main
if %cmd1=-1 gosub *menu:goto *city12b_main
cspl 600,699
if %cmd1=601 gosub *city12b_01:goto *city12b_main
if %cmd1=602 gosub *city12b_02:goto *city12b_main
if %cmd1=603 gosub *city12b_03:goto *city12b_main
if %cmd1=604 gosub *city12b_04:goto *city12b_main
if %cmd1=605 gosub *city12b_05:goto *city12b_main
if %cmd1=606 gosub *city12b_06:goto *city12b_main
if %cmd1=610 gosub *city12b_10:goto *city12b_main
if %cmd1=611 gosub *city12b_11:goto *city12b_main
if %cmd1=612 gosub *city12b_12:goto *city12b_main
if %cmd1=619 textoff:btndef clear:mov %sinkoumode,0:skipoff:autoclick 0:dwave 1,"se\asioto3.ogg":csp 611:cspl 3,7:bg black,7,1500:bg "bg\bg064.bmp",7,1500:bgm "bgm\sabasa.ogg":goto *city12_main
goto *city12b_main



*city12b_01

lsp 700,":a;chara\mob_daizin.bmp",0,0:print 10,500
gosub *setwindow_01
name "Minister A"
>When the Princess was kidnapped, the King tried to rush off to the Pyramid alone.\
>But with all of the vassals help, we were able to get him to stop.@
>But if we can't save her soon, I'm sure he'll run off alone...\
>Please, Hero! You must save the Princess!\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city12b_02

lsp 700,":a;chara\mob_daizin.bmp",0,0:print 10,500
gosub *setwindow_01
name "Minister B"
>They went to all the trouble to kidnap the Princess...@
>They won't harm her that easily...@> I want to think that...\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city12b_03

lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Chief Retainer"
>The wife of the first King of Sabasa Castle was a monster.@
>That is, the royal family's bloodline contains monster blood...\
name ""
name "Luka"
>Are you allowed to talk about such a thing so openly...?\
name ""
name "Chief Retainer"
>It's no problem. It's a known legend.@
>The royal family doesn't hide it.@>Rather, they take pride in it.\
name ""
name "Luka"
>Oh... Is that so...?\
name ""
lsp 700,":a;chara\alice_st12b.bmp",67,0:print 10,500
name "Alice"
>Hmm... A King with such a nice viewpoint.@
>It seems as though he's the closest human to your ideal society, Luka.\
>Better than a discriminating fake Hero who still believes in that angel's silly prohibition.\
name ""
name "Luka"
>I... I don't discriminate!@
>I just... Believe in the prohibition...\
name ""
lsp 700,":a;chara\alice_st13b.bmp",67,0:print 10,500
name "Alice"
>...Idiot.@
>If Ilias told you to jump off a bridge and die, would you?\
name ""
name "Luka"
>...She wouldn't ask that...\
name ""
mov %hanyo1,1
cspl 3,7
csp 611
cspl 700,705
return



*city12b_04

lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Sabasa Knight Leader"
>The fact that the Princess has been kidnapped is confidential.@
>But we won't be able to hide it forever...\
>If we can't save her in secret, dire measures will need to be taken.@
>We might even have to deploy the entire army to the Pyramid.\
>I'm already secretly preparing in case it comes to that...\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city12b_05

lsp 700,":a;chara\mob_gakusya.bmp",0,0:print 10,500
gosub *setwindow_01
name "Scholar"
>What is the Pyramid?@> Why, it's a giant labyrinthine dungeon made by monsters thousands of years ago.\
>According to the legends, it appears as though it was made for some sort of trial.\
name ""
name "Luka"
>A trial...?\
name ""
name "Scholar"
>The [Dragon Seal Trial] is what it seemed to be called.\
>There used to be an old document in the library about it...@
>But it was lost a few years ago.\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city12b_06

lsp 700,":a;chara\mob_sinkan.bmp",0,0:print 10,500
gosub *setwindow_01
name "Priest"
>I've been praying to Ilias every day after the Princess was kidnapped.@
>Please save her, Ilias...\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city12b_10

bg "bg\bg045.bmp",7,1000
lsp 700,":a;chara\sabasa_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Sabasa King"
>Do you require something, Luka?@
>Do you need weapons or armor? I'll do anything in my power to procure it for you.\
name ""
name "Luka"
>No... I'm fine as is.\
name ""
lsp 700,":a;chara\sabasa_st03.bmp",0,0:print 10,500
name "Sabasa King"
>I wanted to go the Pyramid myself when she was taken...@
>But my vassals convinced me that the body holding up the nation can't do something that risky...\
>Please save her, Luka!\
name ""
>With his words of encouragement, I leave the audience hall.\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg065.bmp",7,1000
return



*city12b_11

bg "bg\bg067.bmp",7,1000
lsp 700,":a;chara\mob_madam.bmp",0,0:print 10,500
gosub *setwindow_01
name "Chamberlain"
>This is the Princess' room.@
>I cannot let men enter it recklessly...\
>...By any chance, are you the Hero Luka?\
name ""
name "Luka"
>Yes... I am...\
name ""
name "Chamberlain"
>Ahh... Please save the Princess!@
>She's pious, modest, and so gentle...\
>Such an innocent Princess falling into a monster's hands...@
>Ahh! How horrible!\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg065.bmp",7,1000
return



*city12b_12

bg "bg\bg060.bmp",7,1000
lsp 700,":a;chara\mob_heisi1.bmp",-160,0
lsp 701,":a;chara\mob_heisi1.bmp",160,0:print 10,500
gosub *setwindow_01
name "Soldier A"
>Something feels off about the castle.@
>We've been given orders to standby and check our equipment.\
>Is something about to happen...?\
name ""
name "Soldier B"
>It's as if we're preparing for a war...@
>But we don't have any strained relations with anyone as far as I'm aware of.\
>The King wouldn't ever do a surprise one-sided attack, either.@
>Just what's going on...?\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg065.bmp",7,1000
return



*city13_main0

mov %genzaiti,7
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\asioto2.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg064.bmp",7,1500
bgm "bgm\sabasa.ogg"
goto *city13_main



*city13_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Youth ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Woman ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Elder ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Man ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Soldier A ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Soldier B ",95,310:spbtn 606,606
lsp 607,":s/20,20,0;#FFFFFF#FF4444Boy ",95,340:spbtn 607,607
lsp 608,":s/20,20,0;#FFFFFF#FF4444Prostitute ",95,370:spbtn 608,608
strsp 610,"Weapon Shop",410,160,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
strsp 611,"Tool Shop",410,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Church ",410,220:spbtn 612,612
lsp 614,":s/20,20,0;#FFFFFF#FF4444Mermaid Pub ",410,250:spbtn 614,614
strsp 613,"Sabasa Castle",410,280,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 613,613
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave Town ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city13_main
if %cmd1=-1 gosub *menu:goto *city13_main
cspl 600,699
if %cmd1=601 && %ivent06=0 gosub *city12_01:goto *city13_main
if %cmd1=601 && %ivent06=1 gosub *city13_01:goto *city13_main
if %cmd1=602 && %ivent06=0 gosub *city12_02:goto *city13_main
if %cmd1=602 && %ivent06=1 gosub *city13_02:goto *city13_main
if %cmd1=603 && %ivent06=0 gosub *city12_03:goto *city13_main
if %cmd1=603 && %ivent06=1 gosub *city13_03:goto *city13_main
if %cmd1=604 && %ivent06=0 gosub *city12_04:goto *city13_main
if %cmd1=604 && %ivent06=1 gosub *city13_04:goto *city13_main
if %cmd1=605 && %ivent06=0 gosub *city12_05:goto *city13_main
if %cmd1=605 && %ivent06=1 gosub *city13_05:goto *city13_main
if %cmd1=606 && %ivent06=0 gosub *city12_06:goto *city13_main
if %cmd1=606 && %ivent06=1 gosub *city13_06:goto *city13_main
if %cmd1=607 && %ivent06=0 gosub *city12_07:goto *city13_main
if %cmd1=607 && %ivent06=1 gosub *city13_07:goto *city13_main
if %cmd1=608 && %ivent06=0 gosub *city12_08:goto *city13_main
if %cmd1=608 && %ivent06=1 gosub *city13_08:goto *city13_main
if %cmd1=610 gosub *city12_10:goto *city13_main
if %cmd1=611 gosub *city12_11:goto *city13_main
if %cmd1=612 && %ivent06=0 gosub *city12_12:goto *city13_main
if %cmd1=612 && %ivent06=1 && %ivent07=0 gosub *city13_12a:goto *city13_main
if %cmd1=612 && %ivent06=1 && %ivent07=1 gosub *city13_12b:goto *city13_main
if %cmd1=613 textoff:btndef clear:mov %sinkoumode,0:skipoff:autoclick 0:dwave 1,"se\asioto2.ogg":csp 611:cspl 3,7:bg black,7,1500:bg "bg\bg065.bmp",7,1500:bgm "bgm\castle2.ogg":goto *city13b_main
if %cmd1=614 && %ivent06=0 gosub *city12_14:goto *city13_main
if %cmd1=614 && %ivent06=1 && %check02=0 gosub *city13_14a:goto *city13_main
if %cmd1=614 && %ivent06=1 && %check02=1 gosub *city13_14b:goto *city13_main
if %cmd1=619 return
goto *city13_main



*city13_01

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Youth"
>I've heard that the Princess is training with a sword these days.@
>I guess strength is expected from her if she's going to be the Queen.\
>Our royal family came from a famous Hero, after all.@
>Other countries weak royals don't hold a candle to ours.\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city13_02

lsp 700,":a;chara\mob_obasan.bmp",-160,0
lsp 701,":a;chara\mob_madam.bmp",160,0:print 10,500
gosub *setwindow_01
name "Woman"
>The Princess is almost of age...@
>Why isn't there more excitement...?\
name ""
name "Lady"
>The previous Queen was deeply in love with the King before her death.@
>Nobody wants her to rush into a marriage of political convenience.\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city13_03

lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Elder"
>I love myths, but...@
>Every area seems to have their own special legendary creature.\
>Kraken in the southern seas, Sphinx in the western deserts.@
>Yamata no Orochi to the east, and Poseidon in the north sea.\
>I'd like to see them all before I die...@
>...But as soon as I meet one, that would probably be the end of my life...\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city13_04

lsp 700,":a;chara\mob_ozisan2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Man"
>I approved of Ilias Kreuz a few years ago, but now I'm a moderate.@
>They're making enemies all over the world with their terrorism.\
>Losing their original purpose, they're just horrible terrorists now.@
>Their members are deserting too... They're only one tenth of what they used to be.\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city13_05

lsp 700,":a;chara\mob_sensi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier A"
>I tried the [Dragon Seal Trial] as well.@
>But the Mummy Girl right at the entrance was too much for me.\
>I was really lucky, and managed to run away.@
>I shouldn't have thought becoming famous by finishing the trial would have been easy...\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city13_06

lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier B"
>The monsters around here are really strong...@
>But if you go further north, they're even stronger.\
>I think I'll just retire here.\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city13_07

lsp 700,":a;chara\mob_syounen.bmp",0,0:print 10,500
gosub *setwindow_01
name "Boy"
>Who here loves the Princess!?\
name ""
lsp 701,":a;chara\mob_seinen1.bmp",-160,0:print 10,500
name "Youth"
>If I do, what are you going to do about it!?\
name ""
lsp 702,":a;chara\mob_ozisan3.bmp",160,0:print 10,500
name "Man"
>I'd desert my wife for her!\
name ""
lsp 703,":a;chara\mob_sensi1.bmp",-300,0:print 10,500
name "Soldier"
>I'd throw away my life for her!\
name ""
lsp 704,":a;chara\mob_rouzin1.bmp",300,0:print 10,500
name "Elder"
>I'll trade my wife for her!\
name ""
name "Boy"
>Yaay!\
name ""
name "Luka"
>.................\
name ""
>She's just as popular as ever.\
cspl 3,7
csp 611
cspl 700,705
return



*city13_08

lsp 700,":a;chara\mob_musume2.bmp",175,0:print 10,500
gosub *setwindow_01
name "Prostitute"
>I snapped at a customer when I was playing the Princess.@
>[The Princess would never do a blowjob!] I yelled at him.\
>The Princess would never do something like that!@
>Don't you think so too?\
name ""
name "Luka"
>Ehh... I wonder...\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city13_12a

lsp 700,":a;chara\mob_sinkan.bmp",0,0
bg "bg\bg156.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_sinkan.bmp",0,0:print 10,500
name "Priest"
>Some of the villagers who fled the [Witch Hunt Village] are being protected by the church.\
>Something truly terrible is happening in that village.\
>When I looked deeper, an astounding number of travelers are vanishing upon entering that village.\
>Please, make sure you do not approach there.\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg064.bmp",7,1000
return



*city13_12b

lsp 700,":a;chara\mob_sinkan.bmp",0,0
bg "bg\bg156.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_sinkan.bmp",0,0:print 10,500
name "Priest"
>There was a strange entry in this book on animism.\
>[When Sylph is summoned too often, she will be tired out.@
>When exhausted, something may change].\
>Just what does it mean?\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg064.bmp",7,1000
return



*city13_14a

bg "bg\bg155.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_Mermaid1.bmp",0,0:print 10,500
name "Mermaid"
>Welcome to the second Mermaid Pub!\
name ""
csp 700:print 10,500
>It's still daytime, so there aren't too many customers.@
>As I take a look around, I see someone I wish I hadn't...\
name "Luka"
>You!\
name ""
bgm "bgm\kiki2.ogg"
lsp 700,":a;chara\lazarus_st05.bmp",0,0:print 10,500
>Lazarus.@> My father's best friend, and the new leader of Ilias Kreuz.@
>The fanatic terrorist who bombed that school...\
>...What is he doing here?@
>In a Mermaid Pub of all places, quietly drinking alcohol...\
lsp 700,":a;chara\lazarus_st01.bmp",0,0:print 10,500
name "Lazarus"
>Hm... What's wrong, boy?@
>Do you have business with me?\
name ""
>Lazarus turns his gaze toward me as I glare at him.\
>Complex emotions whirl in my mind.@
>But Alice's words slowly calm me down.\
>My father's crimes are not my own...@
>I can't let them bind me down...\
name "Luka"
>...No.@> I don't.\
name ""
>I calm down and bluntly reply.@
>But Lazarus gives a surprising response.\
lsp 700,":a;chara\lazarus_st02.bmp",0,0:print 10,500
name "Lazarus"
>That's good... Sit here, boy.@
>It's depressing to drink alone, you know?\
name ""
name "Luka"
>Eh...?\
name ""
>What would this kind of guy want with someone like me...@
>I expected him to blow me off after my response.\
name "Luka"
>...................\
name ""
>Trying to control myself, I sit down on the other side of the table.@
>If I lose my cool here, it would be his victory...\
name "Lazarus"
>Hey, waitress.@> Can we get an orange juice?\
name ""
name "Mermaid"
>Right away!\
name ""
name "Luka"
>Don't screw around, I'm not a ch...\
name ""
name "Lazarus"
>If you start drinking alcohol at your age, you'll be a crappy adult.\
name ""
name "Luka"
>................\
name ""
>I keep silent and sip at the juice.@
>We sit in silence for a while...\
>The liquor that Lazarus is drinking is the same kind my father liked...\
name "Luka"
>Why are you here?@
>Are you going to bomb something here, too?\
name ""
>I bring up the subject I wanted to.\
>Even if I forget about my father, this man is a criminal.@
>If he's up to something, I have to stop him.\
lsp 700,":a;chara\lazarus_st01.bmp",0,0:print 10,500
name "Lazarus"
>Oh... Do you know who I am, boy?@
>I didn't think I had become so popular with kids.\
name ""
>Lazarus barely looks fazed at my question.@
>He lets out a big sigh after taking another sip of alcohol.\
lsp 700,":a;chara\lazarus_st05.bmp",0,0:print 10,500
name "Lazarus"
>...Anyway, I'm not doing anything here.@
>I'm just taking the desert route back to Gold Port to rest at our headquarters.\
name ""
name "Luka"
>.................\
name ""
>Ilias Kreuz's headquarters is at Gold Port at the northernmost part of the continent.\
>From Port Natalia there are two routes there.@
>West through Sabasa, or East through Noah.\
>The desert route is harsh, but you would attract less attention...@
>That must be why Lazarus is here.\
name "Luka"
>...Why did you want me to sit with you?@
>Just what are you up to?\
name ""
lsp 700,":a;chara\lazarus_st04.bmp",0,0:print 10,500
name "Lazarus"
>Why do you think I'm up to something?@
>Do I smell funny or something?\
name ""
name "Luka"
>Then why?\
name ""
lsp 700,":a;chara\lazarus_st03.bmp",0,0:print 10,500
name "Lazarus"
>Your eyes look just like his...@
>My friend...\
name ""
name "Luka"
>....!\
name ""
>I choke on my juice at his words.\
lsp 700,":a;chara\lazarus_st04.bmp",0,0:print 10,500
name "Lazarus"
>Oi, oi... What's wrong?@
>Are you drunk on orange juice?\
name ""
name "Luka"
>No... It's nothing...@
>So...@>I look like your friend?\
name ""
lsp 700,":a;chara\lazarus_st05.bmp",0,0:print 10,500
name "Lazarus"
>...He died a long time ago.@
>In a really pathetic way, too.\
name ""
name "Luka"
>...I hate to say it, but I agree.\
name ""
lsp 700,":a;chara\lazarus_st01.bmp",0,0:print 10,500
name "Lazarus"
>........?@
>I don't know why, but you're an interesting boy.\
>I wonder if this meeting was fate...\
name ""
>...I don't want to think I'm tied by fate to this guy in any way.\
name "Lazarus"
>So, are you an adventurer or something?@
>You carry yourself pretty well.\
name ""
name "Luka"
>...Is that how you try to recruit people?\
name ""
name "Lazarus"
>Ya know, I was a soldier myself a long time ago.@
>I can tell your ability just from looking.\
>It seems like you use mainly quick attacks, and thrusting moves.@
>Judging from how worn out your shoes are, that is.\
>The way you walk, it's obvious you're used to quickly moving around as you fight.@
>But on the other hand, your chest and arms are still weak and undeveloped.\
>It seems as though you don't have much combat experience, but what you have experienced has been done in a pretty short amount of time.\
>Judging from the way your best points have been focused on, you must have a pretty good teacher.\
name ""
name "Luka"
>................\
name ""
name "Lazarus"
>If you're an adventurer, why are you training so desperately?@
>Money?@> Honor?@>Revenge?\
name ""
name "Luka"
>All wrong!@
>I fight for the weak!\
name ""
lsp 700,":a;chara\lazarus_st02.bmp",0,0:print 10,500
name "Lazarus"
>...Oh, that's funny.@> I fight for the weak, too.\
name ""
name "Luka"
>No!@>I fight for man and monster coexisting together!\
>Don't think you're the same as me!\
name ""
lsp 700,":a;chara\lazarus_st05.bmp",0,0:print 10,500
name "Lazarus"
>Coexistence?@> That's impossible.\
name ""
>Lazarus came back with a surprising answer.\
>I thought he'd give an angry response.@
>Denying my dream with indignation and anger...\
>But he just shrugged and flatly responded.@
>Unable to accept that bland response as his answer, I just get even angrier.\
name "Luka"
>Why isn't it possible!?@
>What the hell do you know!?\
name ""
lsp 700,":a;chara\lazarus_st03.bmp",0,0:print 10,500
name "Lazarus"
>I know it's impossible...@
>One day, you will too.\
name ""
name "Luka"
>I'm different from you!\
name ""
lsp 700,":a;chara\lazarus_st01.bmp",0,0:print 10,500
name "Lazarus"
>...We're the same.@
>Wielding a sword in the name of coexistence.\
>I'm guessing you've met quite a few monsters or humans who disagree with you, and you've had to use that to crush their beliefs with your own.\
>How is that any different from me?\
name ""
name "Luka"
>It's different!@>I'm fighting for an ideal world!\
name ""
name "Lazarus"
>That ideal is your ideal.@
>Why do you think yours is correct?\
>Thinking you must be right... That's just arrogance.@
>I know what happens when you take that arrogance to the end.\
name ""
name "Luka"
>...So what about you?@
>Do you believe what you're doing is right?\
name ""
name "Lazarus"
>I know very well the self-righteousness of my actions.@
>You realize your own too, right?\
>Coexistence of man and monster...@
>If you come across someone who disagrees with you, are you going to crush them with your "justice"?\
name ""
>Lazarus stands up as he says that.@
>Before I had noticed, his glass was empty.\
lsp 700,":a;chara\lazarus_st02.bmp",0,0:print 10,500
name "Lazarus"
>The most important thing for justice is persuasion.@
>If you can't persuade anyone, your justice will fail.\
name ""
name "Luka"
>...If you know that, then why are you doing what you're doing!?\
name ""
lsp 700,":a;chara\lazarus_st03.bmp",0,0:print 10,500
name "Lazarus"
>...My path can't be changed anymore.@
>My friend was killed by monsters...\
name ""
>Lazarus puts money on the table.\
name "Lazarus"
>...Put that kid's juice on my bill too, waitress.\
name ""
name "Luka"
>I don't want anything from you!\
name ""
lsp 700,":a;chara\lazarus_st02.bmp",0,0:print 10,500
name "Lazarus"
>Hey, don't say that.@
>I just want to treat the boy who reminded me of my friend.\
name ""
>Saying that, Lazarus starts to head out of the bar.@
>Right before leaving, he glances back at me.\
lsp 700,":a;chara\lazarus_st01.bmp",0,0:print 10,500
name "Lazarus"
>...Make sure you get out of this bar quickly after finishing that juice.@
>A kid like you shouldn't be in this place...\
name ""
name "Luka"
>Don't screw with me! What ar...\
name ""
dwave 1,"se\asioto2.ogg"
csp 700:print 10,500
>Ignoring my yell, Lazarus heads out of the bar.\
name "Luka"
>Damn it...\
name ""
>I'm in no mood to finish off this juice.@
>Disgusted, I leave the bar.\
dwave 1,"se\asioto2.ogg"
sean_change "bg064"
bgm "bgm\sabasa.ogg"
lsp 700,":a;chara\alice_st19b.bmp",67,0:print 10,500
>Alice joins me outside, and gladly finishes off my juice.\
name "Alice"
>Don't you want some juice too?@
>The Sabasa Oranges have quite a rich taste to them...\
name ""
name "Luka"
>...Sorry, but I'm not in the mood for it.@
>Starting today, I hate orange juice.\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>......?\
name ""
csp 700:print 10,500
name "Luka"
>That guy...@
>Why would he go to the Mermaid Pub of all places...?\
name ""
csp 611
monocro #eeeeee
gosub *setwindow_01
bg "bg\bg155.bmp",10,500
lsp 700,":a;chara\lazarus_st01.bmp",0,0:print 1
name "Lazarus"
>...Make sure you get out of this bar quickly after finishing that juice.@
>A kid like you shouldn't be in this place...\
name ""
csp 611:csp 700
monocro off
gosub *setwindow_01
bg "bg\bg064.bmp",10,500
name "Luka"
>Oh shit!@> He couldn't....!\
name ""
wait 500
lsp 700,":a;chara\mob_Mermaid1.bmp",0,0
bg "bg\bg155.bmp",7,1500
name "Mermaid"
>Oh, he left his bag here...@
>I need to return it back to the cust...\
bgmstop
wait 1000
textclear
csp -1
bg white,10,500
dwave 1,"se\bom1.ogg"
quake 10,2000
bg "bg\bg064.bmp",10,3000
gosub *setwindow_01p
bgm "bgm\kiki2.ogg"
name "Luka"
>No!!\
name ""
>An explosion shakes the ground.@
>I stand in horror at the sight of the destroyed Mermaid Pub in front of me.\
>Why didn't I realize it sooner...@
>I knew he was a terrorist.@> Why wasn't I able to stop it!?\
>The anger and regret swirls in my body as I'm consumed by rage.\
name "Luka"
>...LAZARUS!!!!\
name ""
lsp 700,":a;chara\alice_st13b.bmp",67,0:print 10,500
name "Alice"
>Quiet down, it doesn't seem like anyone is dead.@
>It looks like both the Mermaids and humans are fine.\
name ""
>Soldiers quickly fill the area as they start to pull out the wounded.@
>As Alice said, it doesn't seem like anyone is dead...\
bgm "bgm\hutuu2.ogg"
name "Luka"
>Hey, Alice...@
>Is what I'm doing just self-righteous?\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>...Who knows.@>Good and evil is relative.@
>No matter what you say, it just comes down to stupid wordplay.\
name ""
name "Luka"
>But... I don't even listen to humans and monsters who disagree with me.@
>I just ignore them...\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>I see...\
name ""
csp 700:print 10,500
>Some monsters attack humans, and some humans attack monsters...@
>And whatever the reason, the Four Heavenly Knights are attacking or disrupting human towns.\
>Even if I'm a hypocrite... Even if it's self-righteousness, I can't allow that.@
>I can't allow either side to commit violence or persecute the other.\
name "Luka"
>Let's go, Alice.@
>We still have a lot to do!\
name ""
>Renewing my oath, I continue on my path.\
cspl 3,7
csp 611
cspl 700,705
mov %check02,1
wait 1000
bgm "bgm\sabasa.ogg"
return



*city13_14b

gosub *setwindow_01p
>There's a poster in front of the collapsed building.@
>[The re-opening of the second Mermaid Pub is still undecided].\
cspl 3,7
csp 611
return



*city13b_main0

mov %genzaiti,7
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\asioto3.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg065.bmp",7,1500
bgm "bgm\castle2.ogg"
goto *city13b_main



*city13b_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
strsp 601,"Minister A",95,160,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 601,601
strsp 602,"Minister B",95,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Chief Retainer ",95,220:spbtn 603,603
strsp 604,"Sabasa Knight Leader",95,250,11,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Scholar ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Priest ",95,310:spbtn 606,606
strsp 610,"Audience Hall",410,160,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
lsp 611,":s/20,20,0;#FFFFFF#FF4444Princess' Room ",410,190:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Soldier's Office ",410,220:spbtn 612,612
strsp 619,"Return to Town",410,400,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city13b_main
if %cmd1=-1 gosub *menu:goto *city13b_main
cspl 600,699
if %cmd1=601 && %ivent06=0 gosub *city12b_01:goto *city13b_main
if %cmd1=601 && %ivent06=1 gosub *city13b_01:goto *city13b_main
if %cmd1=602 && %ivent06=0 gosub *city12b_02:goto *city13b_main
if %cmd1=602 && %ivent06=1 gosub *city13b_02:goto *city13b_main
if %cmd1=603 && %ivent06=0 gosub *city12b_03:goto *city13b_main
if %cmd1=603 && %ivent06=1 gosub *city13b_03:goto *city13b_main
if %cmd1=604 && %ivent06=0 gosub *city12b_04:goto *city13b_main
if %cmd1=604 && %ivent06=1 gosub *city13b_04:goto *city13b_main
if %cmd1=605 && %ivent06=0 gosub *city12b_05:goto *city13b_main
if %cmd1=605 && %ivent06=1 gosub *city13b_05:goto *city13b_main
if %cmd1=606 && %ivent06=0 gosub *city12b_06:goto *city13b_main
if %cmd1=606 && %ivent06=1 gosub *city13b_06:goto *city13b_main
if %cmd1=610 && %ivent06=0 gosub *city12b_10:goto *city13b_main
if %cmd1=610 && %ivent06=1 gosub *city13b_10:goto *city13b_main
if %cmd1=611 && %ivent06=0 gosub *city12b_11:goto *city13b_main
if %cmd1=611 && %ivent06=1 gosub *city13b_11:goto *city13b_main
if %cmd1=612 && %ivent06=0 gosub *city12b_12:goto *city13b_main
if %cmd1=612 && %ivent06=1 gosub *city13b_12:goto *city13b_main
if %cmd1=619 textoff:btndef clear:mov %sinkoumode,0:skipoff:autoclick 0:dwave 1,"se\asioto3.ogg":csp 611:cspl 3,7:bg black,7,1500:bg "bg\bg064.bmp",7,1500:bgm "bgm\sabasa.ogg":goto *city13_main
goto *city13b_main



*city13b_01

lsp 700,":a;chara\mob_daizin.bmp",0,0:print 10,500
gosub *setwindow_01
name "Minister A"
>But why would a monster kidnap the Princess?@
>Since monsters are female, they wouldn't normally kidnap another female...\
>Was it some sort of political purpose?@
>You crossed swords with them, right?@> What was their purpose?\
name ""
name "Luka"
>Err... Well...@
>I was just desperate to rescue her and didn't really pay attention...\
name ""
name "Minister A"
>I see... It must have been an intense fight.@
>Able to rescue the Princess while still a boy... You're amazing!\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city13b_02

lsp 700,":a;chara\mob_daizin.bmp",0,0:print 10,500
gosub *setwindow_01
name "Minister B"
>Oh!@>The Hero, Luka!@
>You're now the man of the hour!\
>There are going to be many who try to gain favor with you.@
>Be sure to be careful in recklessly accepting invitations.\
>Ah... By the way, would you like to have dinner with my family?@
>I would love to become close friends with you...\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city13b_03

lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Chief Retainer"
>The King is above any when it comes to both literary and military arts.@
>But most of all, he is an expert judge of character.\
>With just a glance, he can accurately gauge the caliber of someone.\
>Because of that, we don't expect the King to make mistakes.@
>We have high hopes for the Princess, too!\
name ""
name "Luka"
>..............\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city13b_04

lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Sabasa Knight Leader"
>It's good for the military to have free time.@
>If they're always busy, it means the country is in disarray.\
>I'm proud that my forces have a lot of spare time.@
>Of course, I never neglect training and discipline.\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city13b_05

lsp 700,":a;chara\mob_gakusya.bmp",0,0:print 10,500
gosub *setwindow_01
name "Scholar"
>Some old documents about the [Dragon Seal Trial] were returned.@
>It seems as though the Princess had them in her possession.\
>I wonder why...\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city13b_06

lsp 700,":a;chara\mob_sinkan.bmp",0,0:print 10,500
gosub *setwindow_01
name "Priest"
>I'm glad the Princess has returned safely.@
>My prayers must have reached Ilias.\
>Oh, I don't mean to downplay your actions though.@
>But you must have arrived here due to my prayers.\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city13b_10

bg "bg\bg045.bmp",7,1000
lsp 700,":a;chara\sabasa_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Sabasa King"
>Oh! Luka!\
>Please, take a rest in my castle.@
>If you prefer, you can rest here permanently as Sara's husband.\
name ""
name "Luka"
>I already told you what I thought about that...\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-120,0
lsp 701,":a;chara\sabasa_st01.bmp",160,0:print 10,500
name "Alice"
>Hmph.\
name ""
lsp 701,":a;chara\sabasa_st02.bmp",160,0:print 10,500
name "Sabasa King"
>Are you a companion of Luka's?@
>It would be pretty troublesome if your relationship was too deep.\
>If you leave him to me, I can ens...@
>..............?\
lsp 701,":a;chara\sabasa_st04.bmp",160,0:print 10,500
>...Are you really human?\
name ""
name "Alice"
>.................\
name ""
lsp 701,":a;chara\sabasa_st02.bmp",160,0:print 10,500
name "Sabasa King"
>Sorry... That was rude of me.@
>Whether monster or human, I don't mind.\
>I was just trying to gauge your ability... But I wasn't able to.@
>It seems I should ask you to be judging me.\
name ""
lsp 700,":a;chara\alice_st12b.bmp",-120,0:print 10,500
name "Alice"
>You're quite capable... For a human.\
name ""
name "Sabasa King"
>Haha... So you can see right through me, can you?@
>At any rate, feel free to spend time in my country in peace.\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg065.bmp",7,1000
return



*city13b_11

bg "bg\bg067.bmp",7,1000
lsp 700,":a;chara\mob_madam.bmp",0,0:print 10,500
gosub *setwindow_01
name "Chamberlain"
>You are Luka, are you not?@
>Sara is training at the moment.@
>Please wait while I call her...\
name ""
name "Luka"
>Ah... No, that's fine.@
>I didn't really have anything to talk to her about.\
name ""
name "Chamberlain"
>You didn't return to become her husband?\
name ""
name "Luka"
>I'm not going to be her husband.@
>Besides, don't you think it's odd for her to be given away as a reward like that?\
name ""
name "Chamberlain"
>It's true that a father normally wouldn't give their daughter away as a reward.\
>But a powerful Hero able to save the Princess from danger is a suitable husband.@
>...That's what the King thinks.\
name ""
name "Luka"
>..................\
name ""
>That's a little embarrassing.\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg065.bmp",7,1000
return



*city13b_12

bg "bg\bg060.bmp",7,1000
lsp 700,":a;chara\mob_heisi1.bmp",-160,0
lsp 701,":a;chara\mob_heisi1.bmp",160,0:print 10,500
gosub *setwindow_01
name "Soldier A"
>The odd atmosphere seems to have gone away.@
>What do you think was the cause of that tension before?\
name ""
name "Soldier B"
>Well, it's fine now that it's quiet again.@
>Let's just hope it continues forever.\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg065.bmp",7,1000
return



*city14_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Farmer ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Lady ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Woman ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Elder ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Snitch ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Boy ",95,310:spbtn 606,606
strsp 610,"Tool Shop",410,160,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
lsp 611,":s/20,20,0;#FFFFFF#FF4444Church ",410,190:spbtn 611,611
if %hanyo1=0 strsp 619,"Lord's Mansion",410,400,8,1,20,20,0,0,1,1,#bbbbbb
if %hanyo1=1 strsp 619,"Lord's Mansion",410,400,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city14_main
if %cmd1=-1 gosub *menu:goto *city14_main
cspl 600,699
if %cmd1=601 gosub *city14_01:goto *city14_main
if %cmd1=602 gosub *city14_02:goto *city14_main
if %cmd1=603 gosub *city14_03:goto *city14_main
if %cmd1=604 gosub *city14_04:goto *city14_main
if %cmd1=605 gosub *city14_05:goto *city14_main
if %cmd1=606 gosub *city14_06:goto *city14_main
if %cmd1=607 gosub *city14_07:goto *city14_main
if %cmd1=610 gosub *city14_10:goto *city14_main
if %cmd1=611 gosub *city14_11:goto *city14_main
if %cmd1=619 return
goto *city14_main



*city14_01

lsp 700,":a;chara\mob_ozisan3.bmp",0,0:print 10,500
gosub *setwindow_01
name "Farmer"
>I saw it from a distance...@
>The Lord, Lily, went into her mansion.\
>Please save my daughter, Mary...@
>She was caught at age seventeen, and hasn't returned in three years...\
name ""
name "Luka"
>...I'll do my best.\
name ""
>Three years...@> I don't know if she would still be alive...\
lsp 700,":a;chara\mob_obasan.bmp",0,0:print 10,500
name "Woman"
>Traveler... My daughter too...@> Please save Erica...\
name ""
lsp 700,":a;chara\mob_obasan.bmp",-160,0
lsp 701,":a;chara\mob_seinen1.bmp",160,0:print 10,500
name "Youth"
>Celia, my wife, was caught as well!\
name ""
>One after another, the villagers crowd around me shouting out names.@
>Too many have been taken...\
name "Luka"
>...I understand!@> I'll save everyone!\
name ""
>...They may already be dead, though...@
>Anger swirls inside of me.\
mov %hanyo1,1
cspl 3,7
csp 611
cspl 700,705
return



*city14_02

lsp 700,":a;chara\mob_zyosei.bmp",0,0:print 10,500
gosub *setwindow_01
name "Lady"
>My younger sister studied magic in Sabasa Castle...@
>As soon as she returned here, she was caught as a witch.\
>I want to run away from here.@
>But I'm so poor, I can't migrate anywhere.\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city14_03

lsp 700,":a;chara\mob_obasan.bmp",0,0:print 10,500
gosub *setwindow_01
name "Woman"
>Don't talk to me!@
>You're just going to get caught by Lily!\
>When that happens, everyone you talked to will be taken as well!@
>You're nothing but a plague on this village!\
name ""
name "Luka"
>.............\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city14_04

lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Elder"
>This village has always excluded mages and intellectuals.@
>Lily became the Lord a long time ago...\
>However, as soon as she became a Lord, the hunts became intense.@
>It's now a horrible frenzy...\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city14_05

lsp 700,":a;chara\mob_seinen2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Snitch"
>Hehehe... I'm an [Information Monger].@
>So far, I've supplied information on dozens of witches.\
>If you oppose me, I'll supply them "information" on you too.\
>We wouldn't want the soldiers to have to get involved, now would we?\
name ""
name "Luka"
>..............\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city14_06

lsp 700,":a;chara\mob_syounen.bmp",0,0:print 10,500
gosub *setwindow_01
name "Boy"
>..............\
>Mommy said I shouldn't talk to strangers.\
>..............\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city14_10

bg "bg\bg151.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan3.bmp",0,0:print 10,500
name "Shopkeeper"
>I have nothing to sell to you. Leave.@
>If I get involved with travelers, I'll be labeled a witch.\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg072.bmp",7,1000
return



*city14_11

bg "bg\bg153.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_sinkan.bmp",0,0:print 10,500
name "Priest"
>Isn't this an amazing church for such a small village?@
>All property of witches is handed over to the church.\
>Hehe... That's Ilias' wishes, after all.@
>We must capture more witches in her name...\
name "Luka"
>................\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg072.bmp",7,1000
return



*city15_main0

mov %genzaiti,8
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\asioto2.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg072.bmp",7,1500
bgm "bgm\mura2.ogg"
goto *city15_main



*city15_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Youth ",95,160:spbtn 601,601
strsp 602,"Villager Girl",95,190,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Lady ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Woman ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Elder ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Snitch ",95,310:spbtn 606,606
lsp 607,":s/20,20,0;#FFFFFF#FF4444Boy ",95,340:spbtn 607,607
strsp 610,"Tool Shop",410,160,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
lsp 611,":s/20,20,0;#FFFFFF#FF4444Church ",410,190:spbtn 611,611
strsp 612,"Lord's Mansion",410,220,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 612,612
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave Village ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city15_main
if %cmd1=-1 gosub *menu:goto *city15_main
cspl 600,699
if %cmd1=601 gosub *city15_01:goto *city15_main
if %cmd1=602 gosub *city15_02:goto *city15_main
if %cmd1=603 gosub *city15_03:goto *city15_main
if %cmd1=604 gosub *city15_04:goto *city15_main
if %cmd1=605 gosub *city15_05:goto *city15_main
if %cmd1=606 gosub *city15_06:goto *city15_main
if %cmd1=607 gosub *city15_07:goto *city15_main
if %cmd1=610 gosub *city15_10:goto *city15_main
if %cmd1=611 gosub *city15_11:goto *city15_main
if %cmd1=612 gosub *city15_12:goto *city15_main
if %cmd1=619 return
goto *city15_main



*city15_01

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Youth"
>Lily's soldiers all ran away.@
>This village is finally free of their darkness...\
>Even though I want to forget the past, we can't...@
>We can't let it happen again.\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city15_02

lsp 700,":a;chara\wormv_st11.bmp",0,0:print 10,500
gosub *setwindow_01
name "Villager Girl"
>Thank you again, Hero.@
>This village is peaceful now.\
>My arm still has yet to recover...@
>I don't want to shock everyone, so I'm still hiding it.\
>Once the prejudice vanishes from this village, I'll be able to live without hiding it.\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city15_03

lsp 700,":a;chara\mob_zyosei.bmp",0,0:print 10,500
gosub *setwindow_01
name "Lady"
>We decided to imprison Lily for life.@
>In a jail on the outskirts of the village, we will keep her locked up until she dies.\
>Many wanted to put her to death...@
>But we decided not to kill her.\
>We don't want any more death in this village.@
>No matter how worthless her life is.\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city15_04

lsp 700,":a;chara\mob_obasan.bmp",0,0:print 10,500
gosub *setwindow_01
name "Woman"
>Thank you again!@
>...Eh?@> What do you mean I called you a plague on the village?\
>Hey... I was really supporting you before... I just couldn't say anything...\
name ""
name "Luka"
>................\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city15_05

lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Elder"
>Lily wasn't able to gain control and run wild alone.@
>The prejudice and hate in this village enabled her to commit her atrocities.\
>Lily didn't have to force the villagers to participate in the witch hunts in the beginning, either.\
>We were all walking along the same road...\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>The subjects under a tyrant's rule become tyrants themselves.\
name ""
cspl 3,7
csp 611
cspl 700,705
return



*city15_06

lsp 700,":a;chara\mob_ozisan2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Farmer"
>...The snitch was killed.@
>The day after Lily was stopped, his corpse was found in the middle of the street in pieces.\
>It's said that he had over a hundred wounds on his body.@
>Crushing wounds, sword wounds, spear wounds... Everything.\
>Many people were killed because of him.@
>It must have been the retaliation of the families.\
name ""
name "Luka"
>................\
name ""
>The witch hunt isn't fully over yet...@
>The grudge and hatred is still festering...\
cspl 3,7
csp 611
cspl 700,705
return



*city15_07

lsp 700,":a;chara\mob_syounen.bmp",0,0:print 10,500
gosub *setwindow_01
name "Boy"
>My mommy said I can talk to strangers again.@
>Welcome to the Witch Hunt Village, traveler!\
>...Witch Hunt Village is what we've been called for a while, anyway...@
>I don't know what the real name is...\
name ""
>I still don't think you should talk to random strangers...\
cspl 3,7
csp 611
cspl 700,705
return



*city15_10

bg "bg\bg151.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan3.bmp",0,0:print 10,500
name "Shopkeeper"
>I'm very sorry about the other day!\
>Look... I'm just a weak shopkeeper.@
>I had no choice but to act like that if I wanted to protect my family.\
>So from now on, I'll give you an eighty percent discount!\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg072.bmp",7,1000
return



*city15_11

bg "bg\bg153.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_sinkan.bmp",0,0:print 10,500
name "Priest"
>Don't stare at me like that!@
>The last priest was arrested after the witch hunts ended, and I took over as the new priest.\
name ""
name "Luka"
>Oh, I see...@> I'm sorry about glaring at you like that.\
name ""
>His silhouette looks exactly the same... I couldn't tell.\
name "Priest"
>At first I was going to destroy this giant church built on the money stolen from the deceased...\
>But I think a better use would be to house all the orphans from the witch hunts.\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg072.bmp",7,1000
return



*city15_12

bg "bg\bg073.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
name "Soldier"
>This mansion is off-limits.@
>There are still suspicious things inside that we are investigating.\
>We don't know what kinds of traps or dangers are inside, so we're waiting for a specialist to come in.\
name ""
if %ivent05=0 cspl 3,7:csp 611:cspl 700,705:bg "bg\bg072.bmp",7,1000:return
if %check01=1 cspl 3,7:csp 611:cspl 700,705:bg "bg\bg072.bmp",7,1000:return
name "Luka"
>I see... That sounds serious.\
csp 700:print 10,500
>...Oh?@> That woman...\
name ""
>A strange woman is standing in front of the mansion...\
bgm "bgm\kiki2.ogg"
lsp 700,":a;chara\stein_st01.bmp",0,0:print 10,500
name "Mysterious Woman"
>.................\
name ""
name "Luka"
>You were at the haunted mansion in Natalia...\
name ""
name "Mysterious Woman"
eng ".................":$sel6/
dwave 1,"se\asioto2.ogg"
csp 700:print 10,500
\
name ""
>The woman glances at me, then quickly walks away.\
name "Luka"
>Why is she here...\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>What? Is she a friend of yours?\
name ""
name "Luka"
>Oh yeah... You were still unconscious after fainting before.@
>...Is that woman a monster?\
name ""
name "Alice"
>No... I barely felt any magic from her.@
>I doubt she's a monster.\
name ""
name "Luka"
>...A human, then?\
name ""
>But why was she here?@
>This can't be a coincidence... Just who is she?\
bgm "bgm\mura2.ogg"
mov %check01,1
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg072.bmp",7,1000
return



*city16_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Old Man ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Youth ",95,190:spbtn 602,602
strsp 603,"City Girl",95,220,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Young Woman ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Noblewoman ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Soldier A ",95,310:spbtn 606,606
lsp 607,":s/20,20,0;#FFFFFF#FF4444Soldier B ",95,340:spbtn 607,607
lsp 608,":s/20,20,0;#FFFFFF#FF4444Harpy ",95,370:spbtn 608,608
lsp 609,":s/20,20,0;#FFFFFF#FF4444Slime Girl ",95,400:spbtn 609,609
strsp 610,"Weapon Shop",410,160,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
strsp 611,"Tool Shop",410,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
strsp 612,"Minotauros' Milk Shop",410,220,12,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 612,612
strsp 613,"Spider Girl's Sewing Shop",410,250,14,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 613,613
lsp 614,":s/20,20,0;#FFFFFF#FF4444Alraune's Florist Shop ",410,280:spbtn 614,614
lsp 615,":s/20,20,0;#FFFFFF#FF4444Church ",410,310:spbtn 615,615
if %hanyo4=0 lsp 616,":s/20,20,0;#FFFFFF#FF4444Information Monger ",410,340:spbtn 616,616
if %hanyo4=1 lsp 616,":s/20,20,0;#bbbbbbInformation Monger ",410,340
strsp 617,"Grand Noah Castle",410,370,10,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 617,617
if %hanyo1+%hanyo2+%hanyo3+%hanyo4=4 lsp 619,":s/20,20,0;#FFFFFF#FF4444Inn ",410,400:spbtn 619,619
if %hanyo1+%hanyo2+%hanyo3+%hanyo4<4 lsp 619,":s/20,20,0;#bbbbbbInn ",410,400
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city16_main
if %cmd1=-1 gosub *menu:goto *city16_main
cspl 600,699
if %cmd1=601 goto *city16_01
if %cmd1=602 goto *city16_02
if %cmd1=603 goto *city16_03
if %cmd1=604 goto *city16_04
if %cmd1=605 goto *city16_05
if %cmd1=606 goto *city16_06
if %cmd1=607 goto *city16_07
if %cmd1=608 goto *city16_08
if %cmd1=609 goto *city16_09
if %cmd1=610 goto *city16_10
if %cmd1=611 goto *city16_11
if %cmd1=612 goto *city16_12
if %cmd1=613 goto *city16_13
if %cmd1=614 goto *city16_14
if %cmd1=615 goto *city16_15
if %cmd1=616 goto *city16_16
if %cmd1=617 goto *city16_17
if %cmd1=619 return
goto *city16_main



*city16_01

lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Old Man"
>The monsters downtown?@
>As long as they aren't annoying, who cares.\
>Well, there actually is one thing I wish would change.@
>A lot of monsters have weird cultural rituals that can get pretty annoying...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city16_main



*city16_02

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Youth"
>Do I mind the monsters in the city?@
>No, not at all!\
>This city is great!@
>I'm not leaving here until I die!\
>There are always cute, hungry monster girls around.@
>I didn't like it at first, but now I...\
>...Oops!@> Forget that last part.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city16_main



*city16_03

lsp 700,":a;chara\mob_musume1.bmp",175,0:print 10,500
gosub *setwindow_01
name "City Girl"
>I'm looking forward to the bout tomorrow.@
>I need to get up early and save a seat at the Colosseum.\
name ""
name "Luka"
>You're interested in martial arts?\
name ""
name "City Girl"
>No, I don't care about the fight.@
>I just... Hehehe...\
>You're pretty cute, why don't you try your luck in the Colosseum?@
>I'd definitely go to see you...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city16_main



*city16_04

lsp 700,":a;chara\mob_musume2.bmp",175,0:print 10,500
gosub *setwindow_01
name "Young Woman"
>My boyfriend was raped by a group of monster girls.@
>Now he isn't satisfied with my body anymore...\
>You damn monsters, I hate you!@
>I'm getting out of this cursed city!\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city16_main



*city16_05

lsp 700,":a;chara\mob_madam.bmp",0,0:print 10,500
gosub *setwindow_01
name "Noblewoman"
>I bought a special box seat for tomorrow's match.@
>Hoo hoo... I'm looking forward to it.\
name ""
name "Luka"
>Oh, you're interested in the martial arts?\
name ""
name "Noblewoman"
>Haha!@>Who goes to the Colosseum to see that pointless activity?@
>I'm after something much more entertaining.\
name ""
name "Luka"
>.........?\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city16_main



*city16_06

lsp 700,":a;chara\mob_sensi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier"
>To... To get into the Colosseum...@
>Money... Need money...\
>Ahhh!@>I want to fight in the Colosseum!\
name ""
name "Luka"
>Ahh, how nice!@> A powerful soldier, living his life by his sword.@
>Thirsting for his next chance to test his mettle in a match of arms.\
>Truly, a man that lives for honing his skills in the martial arts!\
name ""
if %hanyo1=1 lsp 699,":a;chara\alice_st91b.bmp",-120,0
lsp 700,":a;chara\alice_st01b.bmp",-120,0
lsp 701,":a;chara\mob_sensi1.bmp",160,0:print 10,500
name "Alice"
>...Really?@
>I smell another kind of desire coming off him...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city16_main



*city16_07

lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier"
>Far off to the east of here is a village called Yamatai.@
>It's a very quiet place, where you can live a life of leisure.\
>I've heard that the village head was looking for a skilled adventurer to hire.@
>It seems like a monster has been bothering them for a while.\
name ""
name "Luka"
>A troublesome monster... I can't stay silent when I hear about that!\
name ""
if %hanyo1=1 lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>More importantly, they're known for their rich food culture.@
>We must go there, at all costs.\
name ""
name "Luka"
>..............\
name ""
>I don't care about satisfying her stomach, but I can't leave the matter of the monster alone.\
name ""
cspl 3,7
csp 611
cspl 699,705
mov %hanyo3,1
goto *city16_main



*city16_08

lsp 700,":a;chara\mob_hapy2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Fishing Loving Harpy"
>My fishing partner has gone missing.@
>He said he was going to "Taboo Spring".@>I told him not to...\
name ""
name "Luka"
>Taboo Spring?\
name ""
name "Fishing Loving Harpy"
>You absolutely must not step foot in there.@
>As soon as you do, divine punishment will be handed down to you.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city16_main



*city16_09

lsp 700,":a;chara\mob_mamono4.bmp",244,80:print 10,500
gosub *setwindow_01
name "Slime Girl"
>Purupurupuru...@
>Want to do something fun?\
>Come on, if you have free time, let's play! @
>Let's purupurupuru together! \
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city16_main



*city16_10

bg "bg\bg152.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
name "Weapon Shop Owner"
>Welcome!@
>Oh, how rare.@>A human customer!\
name ""
name "Luka"
>Rare?\
name ""
name "Weapon Shop Owner"
>Yeah, I mainly deal in weapons for monsters.@
>But I have some that humans can use, too.\
name ""
name "Luka"
>I see...\
name ""
>As he said, there doesn't seem to be many things usable by a human here...@
>It's not like I wanted to replace my weapon anyway.\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg081.bmp",7,1000
goto *city16_main



*city16_11

bg "bg\bg151.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_mamono1.bmp",100,-100:print 10,500
name "Elf"
>Welcome to the Elf Tool Shop!@
>...Oh? Is it really that strange for a monster to own a shop?\
name ""
if %hanyo1=1 cspl 3,7:csp 611:cspl 699,705:bg "bg\bg081.bmp",7,1000:goto *city16_main
name "Luka"
>Y...Yeah...\
name ""
name "Elf"
>Ah, you must have come from the south.@> That's why you're so surprised.@
>It's true this might be pretty unusual down there.\
name ""
name "Luka"
>Yes... But I think this city is wonderful.\
name ""
name "Elf"
>Yes, I love this city too.@
>It's much better living together with humans than living in the hills and forests.\
>But I've heard that Grangold Castle has an even more integrated society.@
>The stories go that they live in complete harmony there.\
name ""
name "Luka"
>Even more than here?\
name ""
>Even more in harmony than here...?@
>I really want to see that!\
>We'll be heading to the Gold Region when I go get Salamander...@
>I'm really looking forward to Grangold Castle!\
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Hey, Luka...@> I... Want that.\
name ""
>Alice gently pulls on my sleeve as she points to something on the wall.\
name "Luka"
>...Hmm?@>I didn't think a tool shop sold food...\
name ""
name "Alice"
>...It isn't food.@>Here, look.\
name ""
>Alice is pointing to a display with accessories for monsters.@
>She seems to be enthralled by a ribbon that goes on a tail.\
name "Alice"
>.............\
name ""
name "Luka"
>...You want it?\
name ""
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
name "Alice"
>.............\
name ""
>Like she was a small child, she gives a tiny silent nod.@
eng "...Sheesh, oh well.":$sel6/
dwave 1,"se\kaimono.ogg"
\
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st09b.bmp",67,0:print 10,500
name "Alice"
>......... \
name ""
>With the ribbon now attached to her tail, she happily swings her tail around.\
>That was surprisingly expensive...@
>But she looks so happy now, so whatever.\
mov %hanyo1,1
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg081.bmp",7,1000
goto *city16_main



*city16_12

gosub *setwindow_01
lsp 700,":a;chara\mob_mamono5.bmp",0,0:print 10,500
name "Minotauros Milkmonster"
>Hey, boy.@>Want some certified Minotauros brand milk?@> It will help turn that small frame of yours into one of a strong warrior!\
name ""
name "Luka"
>N...No thank you... I'm fine...\
name ""
>That milk... It... It couldn't be... No...\
cspl 3,7
csp 611
cspl 699,705
goto *city16_main



*city16_13

gosub *setwindow_01
lsp 700,":a;chara\mob_mamono3.bmp",0,0:print 10,500
name "Spider Girl Shop Owner"
>Welcome!@> I hope you don't want anything made...\
name ""
name "Luka"
>No, not really...\
name ""
name "Spider Girl Shop Owner"
>Good, good.\
>Because honestly... Though I call myself Spider Girl...@>I'm actually a Tarantula Girl...\
>Honestly, I'm no good at sewing...\
name ""
name "Luka"
>..............\
name ""
>Then why do you own a sewing shop?\
name "Spider Girl Shop Owner"
>Maybe I should abandon everything and return back home...\
name ""
name "Luka"
>So then you weren't born in this city?\
name ""
name "Spider Girl Shop Owner"
>No, I came from a woodland village in the north called Plansect Village.@
>It's a village inhabited by various monsters.\
name ""
name "Luka"
>Ah, a monster village...\
name ""
>I know similar monsters band together sometimes, but I haven't heard of a monster village filled with monsters of different races.\
if %hanyo1=1 lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Hmm... Plansect Village, eh?\
name ""
name "Luka"
>Have you heard of it, Alice?@
>I kind of want to see it myself...\
name ""
>I want to visit a village that has monsters of varying races living together in harmony.\
>I might be able to learn something important to realize my dream.\
name "Alice"
>I wouldn't really recommend going there...@
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
>But I wouldn't stop you if you really wanted to.\
name ""
name "Luka"
>..........?\
name ""
>Somehow, it feels like she's trying to hide something...@
>Is there a problem she knows about...?\
mov %hanyo2,1
cspl 3,7
csp 611
cspl 699,705
goto *city16_main



*city16_14

gosub *setwindow_01
lsp 700,":a;chara\mob_mamono2.bmp",147,0:print 10,500
name "Florist Shop Owner"
>Welcome to Alraune's Florist Shop! @
>Mr. Traveler, would you like a flower?\
name ""
if %item14=1 cspl 3,7:csp 611:cspl 699,705:goto *city16_main
name "Luka"
>Sure, I'll take one...\
name ""
dwave 1,"se\fanfale.ogg"
mov %item14,1
>uAlraune Flowerv obtained!\
if %hanyo1=1 lsp 699,":a;chara\alice_st91b.bmp",-110,0
lsp 700,":a;chara\alice_st02b.bmp",-110,0
lsp 701,":a;chara\mob_mamono2.bmp",303,0:print 10,500
name "Alice"
>Alright, let's hurry up and see how it tastes.\
name ""
name "Luka"
>Oi, oi! Don't eat it!\
name ""
name "Florist Shop Owner"
>Here, I have a fresh one you can eat! \
name ""
name "Luka"
>Eh!? You really can eat it!?\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city16_main



*city16_15

bg "bg\bg156.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_sinkan.bmp",0,0:print 10,500
name "Priest"
>Oh! What travesty!@> Such corruption of public morals in this town!@
>I'm so sorry, Ilias!\
name ""
name "Luka"
>Uhm... If there were monsters who were followers of Ilias, what would she do?\
name ""
name "Priest"
>Ilias hates monsters.@>She would never accept them as followers.\
name ""
name "Luka"
>That's true....@
>..............\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg081.bmp",7,1000
goto *city16_main



*city16_16

gosub *setwindow_01
lsp 700,":a;chara\amira_st21.bmp",0,0:print 10,500
name "Information Monger"
>Hehe, I have good information for you today...\
name ""
name "Luka"
>Wait, wait. That outline...@
>You're Amira, aren't you!?\
name ""
bgmstop
bgmonce "bgm\battlestart.ogg"
lsp 700,":a;chara\amira_st01.bmp",0,0:print 10,1500
eng "Unfortunate Lamia appears!":$sel6/
wait 300
delay 4000
bgm "bgm\amira.ogg"
\
name "Amira"
>Your piercing gaze saw right through my clever ruse.@> You truly are my Hero!\
>I am Amira, an Unfortunate Lamia.\
name ""
name "Luka"
>You... Weren't you just in the jail at Sabasa?\
name ""
name "Amira"
>I was kicked out.@
>Alas, there is no rest for one such as I...\
name ""
>Squatting in a jail just to get three meals a day... Of course you would be kicked out.\
name "Luka"
>So, do you have any good information?\
name ""
name "Amira"
>You asked about Undine and Salamander before, remember?@
>I gathered quite a bit on Undine.\
>In the forest west of here, there is a tiny spring called "Undine's Spring".\
name ""
name "Luka"
>Undine's Spring...@> So I guess it must mean exactly what it says.\
name ""
name "Amira"
>The people of Noah also know it by another name, "Taboo Spring".\
>The name "Undine's Spring" is seen only in ancient documents these days...\
>The last eyewitness account is from an animist 500 years ago...@
>There have been no recent sightings.\
name ""
name "Luka"
>I see, so it's another thing from the ancient past.@
>Just like with Gnome.\
name ""
name "Amira"
>About that place, I have some other juicy tidbits...@
>According to rumors, it seems that there is a dungeon underneath it.\
name ""
name "Luka"
>A dungeon?@> Under the spring?\
name ""
name "Amira"
>It's just gossip, so it can't be for sure.@
>But that's what those who have gone to the spring and come back have said.\
>Also last month, a man fishing at the spring never came back.\
name ""
name "Luka"
>I see...\
name ""
>I'm sure there's something there...\
name "Amira"
>That's about it for Undine.@
>Now all that remains is Salamander.\
>I'll have to head to the Gold Region to find anything out about her.@
>So then, I shall meet you in the Gold Region!\
name ""
name "Luka"
>Thank you, Amira.@
>You're really helpful.\
>So, what I owe you for the information so far...\
name ""
name "Amira"
>Money is not necessary.@
>In exchange, build a world where a monster like me can live freely!\
name ""
name "Luka"
>Amira...\
name ""
name "Amira"
>Even an ugly monster like me desires a world where I can loaf around, doing nothing all day!@
>That's my only desire!\
name ""
name "Luka"
>"Loaf around"?@> That seems rather...\
name ""
name "Amira"
dwave 1,"se\escape.ogg"
lsp 700,":a;chara\amira_st21.bmp",0,0:print 10,500
>I shall resume my Unfortunate Lamia duties, and obtain information!\
name ""
name "Luka"
>I don't think that has anything to do with gathering information...\
name ""
name "Amira"
>Till next time, in Grangold!\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,500
>Shouting that final parting farewell, Amira runs away.\
bgm "bgm\city1.ogg"
name "Luka"
>Amira has helped me a lot.@
>For her sake too, I need to create a better world...\
name ""
if %hanyo1=1 lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>That girl is already pretty much doing whatever she wants.\
name ""
mov %hanyo4,1
cspl 3,7
csp 611
cspl 699,705
goto *city16_main



*city16_17

bg "bg\bg043.bmp",7,1000
gosub *setwindow_01
lsp 701,":a;chara\mob_heisi1.bmp",0,0:print 10,500
name "Guard"
>I'm sorry, but I cannot allow any unauthorized persons past here.@
>Please turn back.\
name ""
name "Luka"
>I see.\
name ""
>Obviously there's no reason I could just walk into the castle.@
>I don't need anything there either, so I'll just turn back.\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg081.bmp",7,1000
goto *city16_main



*city17_main0

mov %genzaiti,9
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\asioto2.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg081.bmp",7,1500
bgm "bgm\city1.ogg"
goto *city17_main



*city17_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Old Man ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Youth ",95,190:spbtn 602,602
strsp 603,"City Girl",95,220,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Young Woman ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Noblewoman ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Soldier A ",95,310:spbtn 606,606
lsp 607,":s/20,20,0;#FFFFFF#FF4444Soldier B ",95,340:spbtn 607,607
lsp 608,":s/20,20,0;#FFFFFF#FF4444Harpy ",95,370:spbtn 608,608
lsp 609,":s/20,20,0;#FFFFFF#FF4444Slime Girl ",95,400:spbtn 609,609
strsp 610,"Weapon Shop",410,160,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
strsp 611,"Tool Shop",410,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
strsp 612,"Minotauros' Milk Shop",410,220,12,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 612,612
strsp 613,"Spider Girl's Sewing Shop",410,250,14,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 613,613
lsp 614,":s/20,20,0;#FFFFFF#FF4444Alraune's Florist Shop ",410,280:spbtn 614,614
lsp 615,":s/20,20,0;#FFFFFF#FF4444Church ",410,310:spbtn 615,615
strsp 616,"Grand Noah Castle",410,340,10,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 616,616
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city17_main
if %cmd1=-1 gosub *menu:goto *city17_main
cspl 600,699
if %cmd1=601 goto *city17_01
if %cmd1=602 goto *city17_02
if %cmd1=603 goto *city17_03
if %cmd1=604 goto *city17_04
if %cmd1=605 goto *city17_05
if %cmd1=606 goto *city17_06
if %cmd1=607 goto *city17_07
if %cmd1=608 goto *city17_08
if %cmd1=609 goto *city17_09
if %cmd1=610 goto *city17_10
if %cmd1=611 goto *city17_11
if %cmd1=612 goto *city17_12
if %cmd1=613 goto *city17_13
if %cmd1=614 goto *city17_14
if %cmd1=615 goto *city17_15
if %cmd1=616 goto *city17b_main0
if %cmd1=619 return
goto *city17_main



*city17_01

lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Old Man"
>It seems like that Queen's Cup was quite something.@
>I heard a human warrior actually beat that famous Kyuba.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city17_main



*city17_02

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Youth"
>Ah... This is such a nice city...@
>I was walking down this street last night when a group of harpies raped me.\
>Where should I walk around tonight...\
name ""
name "Luka"
>Uhm...@> That's forbidden, you know...\
name ""
name "Youth"
>Should I do some bondage with that Lamia down that east alley...?@
>Oh, oh... Or how about that Spider Girl's web in the west...\
name ""
name "Luka"
>...........\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city17_main



*city17_03

lsp 700,":a;chara\mob_musume1.bmp",175,0:print 10,500
gosub *setwindow_01
name "City Girl"
>You were the boy that beat Kyuba...@
>You two were moving so fast, it was incredible.\
>...That ending was so unfortunate for you.@> I'm upset at it, too.\
>That's no way for a tournament to end.\
>I really wanted to watch you get played with...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city17_main



*city17_04

lsp 700,":a;chara\mob_musume2.bmp",175,0:print 10,500
gosub *setwindow_01
name "Young Woman"
>I got in a fight with that Elf who my boyfriend was cheating with...@
>Of course, I didn't stand a chance against her.\
>Ahh, this is so damn frustrating!@
>How can I get rid of all this pent up anger at men...?\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city17_main



*city17_05

lsp 700,":a;chara\mob_madam.bmp",0,0:print 10,500
gosub *setwindow_01
name "Noblewoman"
>I've become a fan of yours.@
>I really wish to see that dashing figure of yours in the Colosseum once again.\
>...I'd also love to see that dashing figure being raped by a monster.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city17_main



*city17_06

lsp 700,":a;chara\mob_sensi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier"
>I was raped by the Cerberus in the arena the other day...@
>I...It was incredible.\
>She sucked me dry with all three of her heads...@
>I wonder who will rape me next time...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city17_main



*city17_07

lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier"
>I want to try going to the Colosseum again...@
>H...Hey!@> I don't have any bad intentions!\
>I just thought I'd try getting raped by a monster one time!@>I promise, that's all it was!\
name ""
name "Luka"
>...............\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city17_main



*city17_08

lsp 700,":a;chara\mob_hapy2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Fishing Loving Harpy"
>I was attacked by a Mermaid last night...@>She broke my fishing rod.\
>She said people who fish should all be killed without mercy.\
>Those Mermaids really are annoying...\
name ""
name "Luka"
>............\
name ""
>There really is a lot of variety inside the monster world...\
cspl 3,7
csp 611
cspl 699,705
goto *city17_main



*city17_09

lsp 700,":a;chara\mob_mamono4.bmp",244,80:print 10,500
gosub *setwindow_01
name "Slime Girl"
>Purupurupuru...@
>My friend Kenta lost in the Colosseum.\
>I wonder if I should try fighting there next time...?@
>There are lots of healthy young men to play with there. \
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city17_main



*city17_10

bg "bg\bg152.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
name "Weapon Shop Owner"
>I made a fortune on selling weapons for this tournament.@
>By the way, could you sign this sword?\
>It's the first time I've seen a human win the tournament in decades.@
>I'd love to decorate the store with a signed sword from the victor to attract customers.\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg081.bmp",7,1000
goto *city17_main



*city17_11

bg "bg\bg151.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_mamono1.bmp",100,-100:print 10,500
name "Elf"
>Welcome!@> Can I help you with something?\
name ""
name "Luka"
>No, not really...\
name ""
>I should gather some stuff to prepare for the next trip.\
name "Luka"
>By the way, do you not have any issues with Ilias Kreuz's terrorism?@
>I've seen what they've done a few times in the middle of my journey...\
name ""
name "Elf"
>Ah, there aren't any of them in this city.@
>A few years ago, there were a couple incidents...@
>But they were all forced out of the city.\
name ""
name "Luka"
>Eh? Is that true?\
name ""
name "Elf"
>With this many monsters here, they couldn't do anything.@
>The group as it is now is puny compared to how strong it used to be.\
name ""
name "Luka"
>Puny...?\
name ""
name "Elf"
>Before their leader died, it was really powerful.@>Then it went to pieces.@
>Now all they can manage is some pathetic incidents of terrorism.\
>Most of their divisions had to all go back to their headquarters at Gold Port.\
name ""
name "Luka"
>Gold Port headquarters, hmm...\
name ""
>Lazarus and my father formed Ilias Kreuz in that city after their dreams of defeating the Monster Lord were shattered...\
>That port is where their failed voyage to Hellgondo set out from.\
>Once I get all the powers of the spirits, I'll need to visit that port if I want to make it to Hellgondo myself.\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg081.bmp",7,1000
goto *city17_main



*city17_12

gosub *setwindow_01
lsp 700,":a;chara\mob_mamono5.bmp",0,0:print 10,500
name "Minotauros Milkmonster"
>Boy, how about some Minotauros brand milk?@
>The winner of this year's Queen's Cup got strong by drinking it, you know!\
name ""
name "Luka"
>N...No thank you...\
name ""
>I'd never drink that...\
cspl 3,7
csp 611
cspl 699,705
goto *city17_main



*city17_13

gosub *setwindow_01
lsp 700,":a;chara\mob_mamono3.bmp",0,0:print 10,500
name "Spider Girl Shop Owner"
>The sign is a lie.@> It's really Tarantula Girl's Sewing Shop.\
>My silk is completely unfit for sewing.\
name ""
name "Luka"
>I think you should change careers...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city17_main



*city17_14

gosub *setwindow_01
lsp 700,":a;chara\mob_mamono2.bmp",147,0:print 10,500
name "Florist Shop Owner"
>Weeeelcomeee!@>To Alraune's Flooorist shop!\
>Sweet, delicious flowers!\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city17_main



*city17_15

bg "bg\bg156.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_sinkan.bmp",0,0:print 10,500
name "Priest"
>The faith of the populace in this city is damaged.@
>Not only do they live with monsters, but they blatantly break the taboo in the streets!\
>How can the Queen permit this to continue!?\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg081.bmp",7,1000
goto *city17_main



*city17b_main0

saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\asioto3.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg065.bmp",7,1500
bgm "bgm\castle3.ogg"
goto *city17b_main



*city17b_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
strsp 601,"Minister A",95,160,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 601,601
strsp 602,"Minister B",95,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 602,602
strsp 603,"Minister C",95,220,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Guard A ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Guard B ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Guard Captain ",95,310:spbtn 606,606
lsp 607,":s/20,20,0;#FFFFFF#FF4444Dullahan ",95,340:spbtn 607,607
lsp 610,":s/20,20,0;#FFFFFF#FF4444Queen ",410,160:spbtn 610,610
lsp 611,":s/20,20,0;#FFFFFF#FF4444Guardroom ",410,190:spbtn 611,611
strsp 619,"Return to City",410,400,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city17b_main
if %cmd1=-1 gosub *menu:goto *city17b_main
cspl 600,699
if %cmd1=601 goto *city17b_01
if %cmd1=602 goto *city17b_02
if %cmd1=603 goto *city17b_03
if %cmd1=604 goto *city17b_04
if %cmd1=605 goto *city17b_05
if %cmd1=606 goto *city17b_06
if %cmd1=607 goto *city17b_07
if %cmd1=610 goto *city17b_10
if %cmd1=611 goto *city17b_11
if %cmd1=619 textoff:btndef clear:mov %sinkoumode,0:skipoff:autoclick 0:dwave 1,"se\asioto3.ogg":csp 611:cspl 3,7:bg black,7,1500:bg "bg\bg081.bmp",7,1500:bgm "bgm\city1.ogg":goto *city17_main
goto *city17b_main



*city17b_01

lsp 700,":a;chara\mob_daizin.bmp",0,0:print 10,500
gosub *setwindow_01
name "Minister A"
>As you can see, there is very little discrimination against monsters in this city.@
>Due to the Colosseum, the people became very used to the sight of monsters.\
>Though... The monsters do cause a lot of issues, every day.@
>But as our customs are very different, it's unavoidable.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city17b_main



*city17b_02

lsp 700,":a;chara\mob_daizin.bmp",0,0:print 10,500
gosub *setwindow_01
name "Minister B"
>The Mermaids are lobbying for increased waterway size and flow.@
>The Alraunes are planning a protest for more city parks.@
>City planning is quite difficult here...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city17b_main



*city17b_03

lsp 700,":a;chara\mob_daizin.bmp",0,0:print 10,500
gosub *setwindow_01
name "Minister C"
>A farmer was just sent to the hospital after accidentally mistaking a Mandragora for a radish.\
>Harvesting season is almost here, so we must be very diligent.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city17b_main



*city17b_04

lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Guard A"
>I wonder when the custom of raping the loser in the Colosseum started...@
>Man, I'm so jealous...@
>No, no.@>Don't feel bad for me.@> It's ok.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city17b_main



*city17b_05

lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Guard B"
>I watched you win in the Colosseum.@
>As for me...@> I lost against the Dullahan in the first round...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city17b_main



*city17b_06

lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Guard Captain"
>If the monsters ever decided to go wild in the town, us human guards would be helpless.@
>But should such a situation arise, we would enlist the aid of all the Colosseum fighters.\
>They love this city too, so they would join us in defending it.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city17b_main



*city17b_07

lsp 700,":a;chara\durahan_st01.bmp",228,0:print 10,500
gosub *setwindow_01
name "Dullahan"
>What's wrong?@
>Even though I'm a monster, I'm part of the Queen's Royal Guard.\
>After battling in the Colosseum, I advanced far...@
>I really love this city.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city17b_main



*city17b_10

bg "bg\bg045.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\grandnoa_st03.bmp",0,0:print 10,500
name "Grand Noah Queen"
>Ah!@>If it isn't the Hero, Luka.@
>How have you fared since last we met?\
>You are the one who enabled my dream to be a reality.@
>If I can do anything for you, please just say the word.\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg065.bmp",7,1000
goto *city17b_main



*city17b_11

bg "bg\bg060.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_heisi1.bmp",-160,0
lsp 701,":a;chara\mob_heisi1.bmp",160,0:print 10,500
name "Guard A"
>There was a huge incident the other day when a Bee Girl tried to suck the nectar from an Alraune.@
>Today, we spent an hour trying to get a Slime Girl out from being clogged in a drain.\
name ""
name "Guard B"
>Tomorrow we have to repair that fountain that a Minotauros smashed on accident.@
>We're always dealing with monster troubles...\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg065.bmp",7,1000
goto *city17b_main



*map4

saveoff
textoff
csp -1
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
bg "bg\map4.bmp",10,1000
goto *map4_2



*map4_2

strsp 601,"Grand Noah Castle",65,500,10,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 601,11
lsp 602,":s/20,20,0;#FFFFFF#FF4444Yamatai Village ",575,140:spbtn 602,12
if %ivent09=0 strsp 605,"Req. Level: 28",580,160,8,1,20,20,0,0,1,1,#FFFFFF
if %ivent09=1 lsp 605,":s/20,20,0;#FFFFFFDone ",630,160
strsp 603,"Plansect Village",230,310,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,13
if %ivent10=0 strsp 606,"Req. Level: 30",240,330,8,1,20,20,0,0,1,1,#FFFFFF
if %ivent10=1 lsp 606,":s/20,20,0;#FFFFFFDone ",290,330
strsp 604,"Undine's Spring",365,490,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 604,14
strsp 607,"Req. Level: 34",370,510,8,1,20,20,0,0,1,1,#FFFFFF
print 1
btnwait2 %cmd1
if %cmd1=0 goto *map4_2
if %cmd1=-1 gosub *menu:goto *map4_2
csp -1
btndef clear
if %cmd1=11 && %ivent08=0 goto *sean0165
if %cmd1=11 && %ivent08=1 gosub *city17_main0:dwave 1,"se\asioto2.ogg":bg black,7,1500:bgm "bgm\field3.ogg":goto *map4
if %cmd1=12 && %ivent09=0 goto *sean0175
if %cmd1=12 && %ivent09=1 gosub *city19_main0:dwave 1,"se\asioto2.ogg":bg black,7,1500:bgm "bgm\field3.ogg":goto *map4
if %cmd1=13 && %ivent10=0 goto *sean0181
if %cmd1=13 && %ivent10=1 gosub *city20_main0:dwave 1,"se\asioto2.ogg":bg black,7,1500:bgm "bgm\field3.ogg":goto *map4
if %cmd1=14 goto *sean0192
goto *map4_2



*city18_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Elder ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Youth ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Village Girl ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Old Woman ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Old Man ",95,280:spbtn 605,605
lsp 610,":s/20,20,0;#FFFFFF#FF4444Cat Shrine ",410,160:spbtn 610,610
lsp 611,":s/20,20,0;#FFFFFF#FF4444Snake Shrine ",410,190:spbtn 611,611
if %hanyo1=0 lsp 612,":s/20,20,0;#FFFFFF#FF4444Fox Shrine ",410,220:spbtn 612,612
if %hanyo1=1 lsp 612,":s/20,20,0;#bbbbbbFox Shrine ",410,220
lsp 613,":s/20,20,0;#FFFFFF#FF4444Meeting Hall ",410,250:spbtn 613,613
strsp 619,"Wait for Night",410,400,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city18_main
if %cmd1=-1 gosub *menu:goto *city18_main
cspl 600,699
if %cmd1=601 goto *city18_01
if %cmd1=602 goto *city18_02
if %cmd1=603 goto *city18_03
if %cmd1=604 goto *city18_04
if %cmd1=605 goto *city18_05
if %cmd1=610 goto *city18_10
if %cmd1=611 goto *city18_11
if %cmd1=612 goto *city18_12
if %cmd1=613 goto *city18_13
if %cmd1=614 goto *city18_14
if %cmd1=619 return
goto *city18_main



*city18_01

lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Elder"
>Sheesh, young'uns these days are pathetic.\
name ""
name "Luka"
>Yes, they really are...\
name ""
name "Elder"
>If I was fifty years younger, that meeting hall would have been filled with blood.@
>Trying to get what you want through words alone...@> Absolutely pathetic.\
name ""
name "Luka"
>............\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city18_main



*city18_02

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Youth"
>All the guys are arguing about who's going to get to be the sacrifice...@
>It's a really depressing sight.\
name ""
name "Luka"
>Y...Yes, that's right!\
name ""
name "Youth"
>To think their aspirations are so low...@> I plan to go much higher in life.\
>I've heard of a village to the north called "Succubus Village"\
>My dreams are to make it there...@
>I'll surpass all of them!@>Hahahaha!\
name ""
name "Luka"
>...It looks like nobody here cares about the prohibition.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city18_main



*city18_03

lsp 700,":a;chara\mob_musume1.bmp",175,0:print 10,500
gosub *setwindow_01
name "Village Girl"
>Are monsters really that good...?@
>This is making me angry...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city18_main



*city18_04

lsp 700,":a;chara\mob_rouba.bmp",0,0:print 10,500
gosub *setwindow_01
name "Old Woman"
>There are elves around this village, driving off all outsiders.@
>It keeps out the riff-raff...@>But it's also driving away merchants and good visitors, too...\
name ""
name "Luka"
>Why are they doing that?\
name ""
name "Old Woman"
>Our village and the nearby elf village have had a marriage union since long ago.@
>Many men are adopted into their village, and marry into the elf village.\
>In return, the warrior elves defend the village from any invaders.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city18_main



*city18_05

lsp 700,":a;chara\mob_ozisan3.bmp",0,0:print 10,500
gosub *setwindow_01
name "Old Man"
>There are a lot of shrines in this village.@
>I don't know if the gods will grace you with their presence, but you should try going and praying.\
name ""
name "Luka"
>Err...@> I'm a follower of Ilias...\
name ""
name "Old Man"
>You people from the west only believe in one thing...@
>We're grateful of everything, so we worship everything.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city18_main



*city18_10

bg "bg\bg159.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\nekomata_st01.bmp",0,50:print 10,500
name "Nekomata"
>...Nya?\
name ""
name "Luka"
>H...Hello...\
name ""
lsp 700,":a;chara\nekomata_st04.bmp",0,50:print 10,500
name "Nekomata"
>...Nyaa! \
name ""
>She seems awfully friendly toward humans.@
>I think this Nekomata is even the resident of this shrine...\
name "Luka"
>Is this also... Humans and monsters coexisting?\
name ""
lsp 699,":a;chara\alice_st91b.bmp",67,0
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>Hmm, that's one method, isn't it...@
>Enshrining monsters and worshipping them...@>Quite an interesting culture they have here.\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg088.bmp",7,1000
goto *city18_main



*city18_11

bg "bg\bg159.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\sirohebi_st11.bmp",0,0:print 10,500
name "Luka"
>Wah, monsters here too...\
name ""
name "White Snake Girl"
>Oh my, I am Shirohebi.\
>Watch your mouth, impudent youngster.\
name ""
name "Luka"
>S...Sorry...@
>The monsters that live in this village are quite friendly, aren't they...?\
name ""
name "Shirohebi"
>Only friendly people can approach this village, so only friendly people live here.@
>But long ago, the humans turned violent and forced the monsters out.\
name ""
name "Luka"
>What did they do then?\
name ""
name "Shirohebi"
>They left the village, and lived in the mountains.@
>Travelers were attacked, and crimes were committed...\
>My elder sister was part of that group, too...@
>How nostalgic...\
name ""
name "Luka"
>............\
name ""
>There's a lot I want to say about that...@
>But for now, I'll deal with the current issue.\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg088.bmp",7,1000
goto *city18_main



*city18_12

bg "bg\bg159.bmp",7,1000
gosub *setwindow_01
bgm "bgm\tamamo.ogg"
lsp 700,":a;chara\tamamo_st04.bmp",0,0:print 10,500
name "Tamamo"
>All I have to do is stay here, and they give me thin fried tofu. \
name ""
name "Luka"
>.............\
name ""
>Tamamo sits on the steps of the shrine, happily munching away at fried tofu.@
>One of the Heavenly Knights feared around the world...@> I wonder what people would think if they could see this sight...?\
lsp 699,":a;chara\alice_st91b.bmp",-110,0
lsp 700,":a;chara\alice_st01b.bmp",-110,0
lsp 701,":a;chara\tamamo_st01.bmp",160,0:print 10,500
name "Alice"
>Kitsune...\
name ""
>Alice grabs hold of Tamamo's tail, and starts to pull on it.@
>She really hates Kitsunes, doesn't she...\
name "Tamamo"
>Hey!@> Monster Lord!@
>Don't bully Kitsunes, you idiot!\
name ""
lsp 700,":a;chara\alice_st04b.bmp",-110,0:print 10,500
name "Alice"
>............\
name ""
dwave 1,"se\escape.ogg"
cspl 699,700:print 10,500
>Alice grimaces under Tamamo's cold gaze, then runs away.\
csp 701
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>Sheesh...@>No matter how much time has passed, children are always children.\
name ""
name "Luka"
>Why does Alice hate Kitsunes...?\
name ""
name "Tamamo"
>You may not have known this, but I was in charge of the Monster Lord's training.@
>Due to that, she lived along with my clan.\
>Since a young age, she was surrounded by Kitsunes, who were constantly nagging and picking on her.@> I guess now she wants to bully them in revenge.\
name ""
name "Luka"
>I see...@
>That seems like a really childish reason...\
name ""
name "Tamamo"
>...My method of upbringing was bad.@
>I had to ensure she didn't end up detesting humanity.\
name ""
name "Luka"
>Eh...?\
name ""
name "Tamamo"
>One wrong move, and she would turn into an existence that lives only for revenge, filled with hatred of man.\
>Were that to happen, the disaster would be even worse than Alice the 8th, 500 years ago...@
>Due to that, she was not allowed out of the castle before she was raised...\
>But as a side effect, she is quite ignorant of the ways of the world...\
name ""
name "Luka"
>Did something happen to Alice?@
>What would make her hate humans so much...?\
name ""
lsp 700,":a;chara\tamamo_st03.bmp",0,0:print 10,500
name "Tamamo"
>When she was a child, something happened that broke her young heart...\
name ""
>After mumbling that, Tamamo's face grows dark.\
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>...But that's all in the past.@
>There's no need to return to old events.\
>By the way, there's something I want to inquire about...@
>That ring... Can I take a closer look at it?\
name ""
name "Luka"
>It's a memento from my mother...@> I don't want to take it off my finger, but...@
>Here, is this good?\
name ""
>I hold out my hand to Tamamo.@
>She gazes at the ring from all sides, then starts to sniff it.\
name "Luka"
>Alice said she couldn't feel anything special from it.@
>Why are you both interested in this ring...?\
name ""
name "Tamamo"
>Indeed, there's no magic coming from it...@
>But the Monster Lord is still immature.\
>The fact that there's no magic coming from this doesn't mean it isn't unusual.@> It's quite the opposite...\
name ""
name "Luka"
>"The opposite"...?@> What do you mean?\
name ""
name "Tamamo"
>The ore that this ring is made out of naturally holds a small amount of power in it...@
>No matter how many thousands of years, that small power should remain.\
>But not a thing can be felt from this ring...@
>That's why it's unusual.\
name ""
name "Luka"
>So basically...@>What? I have no idea.\
name ""
lsp 700,":a;chara\tamamo_st04.bmp",0,0:print 10,500
name "Tamamo"
>Basically...@> I have no idea, either. \
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
>If we study that ring with various techniques, we may learn something...@
>It would take a few months if you wanted to try.\
name ""
name "Luka"
>I see...@
>If it would take all that time, I'd rather not do it.\
name ""
name "Tamamo"
>In addition... She missed one other oddity.@
>When you fought Nanabi and fell unconscious, that unusual power in you was awakened.\
>With it, you were able to dodge that powerful seven moons attack...@
>Even more, you managed to seal her.\
>But the final attack you used was not a sword move with Angel Halo.@>Yet still, she was sealed.\
name ""
name "Luka"
>I don't remember much...@
>That was strange...\
name ""
name "Tamamo"
>Are you just concluding that now, you idiot?@
>In other words, the source of your power must be the same as the Angel Halo's.\
>For some reason, a latent holy power resides in you.\
name ""
name "Luka"
>Wh...What do you mean...?\
name ""
name "Tamamo"
>You're a rare species, boy.@
>Now, how about I give your body an extra careful examination...?\
name ""
name "Luka"
>N...No thank you...\
name ""
>A rare species?@>I don't like being treated like some kind of spectacle...\
name "Tamamo"
>Anyway...@>Don't use that power ever again.\
name ""
name "Luka"
>Eh...?@> Why...?\
name ""
name "Tamamo"
>That much power is too much for a human body to bear.@
>Such high powers of raw holy power will eat into your flesh.\
name ""
name "Luka"
>Eat into my flesh...?@>Is it a disease?\
name ""
name "Tamamo"
>As you use it, your human body will slowly be eaten away, and replaced by raw holy power.@
>In the end, you'll cease being human and turn into something else.\
>I've seen men consumed by holy power in the past.@
>They continued to pay the price for pursuing that power, and eventually turned into a being made of pure holy energy...\
>Destroyed by that double-edged power, they became a new existence...\
name ""
>Tamamo glances at my waist after that last statement.@
>I think she's looking at the Angel Halo...\
name "Tamamo"
>You don't want to go down that road.@
>So keep in mind that wielding that power is dangerous.\
name ""
name "Luka"
>...Thanks for the advice.@
>I don't really get it, but if it's that dangerous, I'll avoid using it.\
name ""
>I had already decided I wanted to fight with power I earned myself, anyway.@
>If using that could destroy my body, all the more reason to avoid it.\
name "Tamamo"
>Please continue to take care of the Monster Lord.@
>She's still young, and is quite quick to anger...\
name ""
name "Luka"
>Ah... Yeah...\
name ""
>Really... One of the Heavenly Knights asking a Hero to look after the Monster Lord...@
>But I can't do anything but nod obediently after her earnest request.\
cspl 3,7
csp 611
cspl 699,705
mov %hanyo1,1
bgm "bgm\yamatai.ogg"
bg "bg\bg088.bmp",7,1000
goto *city18_main



*city18_13

bg "bg\bg089.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_seinen1.bmp",-240,0:print 10,500
name "Young Man A"
>I'm the sacrifice!@
>I won't allow anyone else to take the fall!\
name ""
lsp 701,":a;chara\mob_seinen1.bmp",-80,0:print 10,500
name "Young Man B"
>No, no!@>Nobody is more qualified than I to be the sacrifice!\
name ""
lsp 702,":a;chara\mob_seinen1.bmp",80,0:print 10,500
name "Young Man C"
>I've skipped working for years!@
>Due to my laziness, I must be the one to be sacrificed!\
name ""
lsp 703,":a;chara\mob_seinen1.bmp",240,0:print 10,500
name "Young Man D"
>Leave it to me! I'll protect everyone by doing it!\
name ""
cspl 700,703
lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
name "Village Chief"
>As you can see, they're still arguing.@
>You're going to be the sacrifice...@>But how do I tell them...?\
>Now then...@>How am I going to do this...?\
name ""
name "Luka"
>............\
name ""
>Everything about this scene seems pathetic.\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg088.bmp",7,1000
goto *city18_main



*city19_main0

mov %genzaiti,10
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\asioto2.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg088.bmp",7,1500
bgm "bgm\yamatai.ogg"
goto *city19_main



*city19_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Elder ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Youth ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Village Girl ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Old Woman ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Old Man ",95,280:spbtn 605,605
if %ivent01=1 strsp 606,"Goblin Girl",95,310,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 606,606
lsp 610,":s/20,20,0;#FFFFFF#FF4444Cat Shrine ",410,160:spbtn 610,610
lsp 611,":s/20,20,0;#FFFFFF#FF4444Shirohebi's Shrine ",410,190:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Fox Shrine ",410,220:spbtn 612,612
lsp 613,":s/20,20,0;#FFFFFF#FF4444Meeting Hall ",410,250:spbtn 613,613
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city19_main
if %cmd1=-1 gosub *menu:goto *city19_main
cspl 600,699
if %cmd1=601 goto *city19_01
if %cmd1=602 goto *city19_02
if %cmd1=603 goto *city19_03
if %cmd1=604 goto *city19_04
if %cmd1=605 goto *city19_05
if %cmd1=606 goto *city19_06
if %cmd1=610 goto *city19_10
if %cmd1=611 goto *city19_11
if %cmd1=612 goto *city19_12
if %cmd1=613 goto *city19_13
if %cmd1=614 goto *city19_14
if %cmd1=619 return
goto *city19_main



*city19_01

lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Elder"
>When I was younger, I had an affair with an Ogre Girl...@
>After my wife found out, she looked even scarier than the Ogre Girl did...\
name ""
name "Luka"
>.............\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city19_main



*city19_02

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Youth"
>After we learned that Yamata no Orochi was sealed, all of the boys became depressed.@
>I tried to convince them that there's a wider world out there, and they seemed to perk up.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city19_main



*city19_03

lsp 700,":a;chara\mob_musume1.bmp",175,0:print 10,500
gosub *setwindow_01
name "Village Girl"
>I won't lose to some seductive monster whore!@
>I think I'll go to the Elf Village and see if I can train to become a kunoichi...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city19_main



*city19_04

lsp 700,":a;chara\mob_rouba.bmp",0,0:print 10,500
gosub *setwindow_01
name "Old Woman"
>A long time ago, the men of this village adhered to a strict code of "Bushido".@
>But now the only ones who follow it are the female elves of the nearby village.\
>It's quite strange...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city19_main



*city19_05

lsp 700,":a;chara\mob_ozisan3.bmp",0,0:print 10,500
gosub *setwindow_01
name "Old Man"
>I was thinking of building a shrine for that "Ill-ass" Goddess you westerners believe in.@>What do you think?\
name ""
name "Luka"
>I think she would get angry at that...\
name ""
name "Old Man"
>Sheesh, you people and your vengeful gods.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city19_main



*city19_06

lsp 700,":a;chara\gob_st23.bmp",0,70:print 10,500
gosub *setwindow_01
name "Goblin Girl"
>Out of the way, out of the way!.@
>This package is heavy! @
>...Ah! Mr. Hero guy from before!\
name ""
name "Luka"
>Eh...?@> Why are you here in this village?\
name ""
name "Goblin Girl"
>I took a job in shipping.@
>I'm delivering this package from Iliasburg to Yamatai!\
name ""
name "Luka"
>I see... You're working awfully hard, aren't you?@
>But to think we would meet again here...\
>How did you get up here as fast as I did?@
>I thought I was hurrying along pretty fast, too...\
name ""
name "Goblin Girl"
>I've already made five trips between here and Iliasburg!\
name ""
name "Luka"
>Uwa!?@>Wh...What kind of legs do you have!?\
name ""
name "Goblin Girl"
>I'm descended from a high-class Goblin who had the "Idaten" something ability.@
>So I'm much better than just some normal Goblin!\
name ""
name "Luka"
>I...I see...\
name ""
>It looks like she's really working hard.@
>That makes me really happy for some reason...\
cspl 3,7
csp 611
cspl 699,705
goto *city19_main



*city19_10

bg "bg\bg159.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\nekomata_st04.bmp",0,50:print 10,500
name "Nekomata"
>...Unya. \
name ""
>The Nekomata that lives here in the shrine seems to be in good spirits.\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg088.bmp",7,1000
goto *city19_main



*city19_11

bg "bg\bg159.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\sirohebi_st11.bmp",0,0:print 10,500
name "Shirohebi"
>The sealed Yamata no Orochi is being kept in this shrine.\
>My friends and I put her in a small, clear container.@>Complete with a rock and a couple sticks and leaves to simulate her old cave.\
>We'll keep her in there so she can reflect on her bad deeds.\
>...Well, she was quite greedy, but her crimes weren't too serious.@
>I'm sure she'll be released before long.\
name ""
name "Luka"
>I hope she really does reflect on her bad deeds...\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg088.bmp",7,1000
goto *city19_main



*city19_12

bg "bg\bg159.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\youko_st01.bmp",0,0:print 10,500
name "Kitsune"
>Ah, it's you!@
>The Hero from before!\
name ""
name "Luka"
>The kitsune from that cave...?@> What are you doing here?\
name ""
name "Kitsune"
>I'm here to get some fried tofu.\
name ""
name "Luka"
>............\
name ""
>As long as she isn't doing anything bad, I guess it's fine...\
lsp 699,":a;chara\alice_st91b.bmp",-110,0
lsp 700,":a;chara\alice_st01b.bmp",-110,0
lsp 701,":a;chara\youko_st03.bmp",160,0:print 10,500
name "Alice"
>Kitsune...\
name ""
>Alice starts to pull on her tails and ears.\
name "Kitsune"
>Wahwahwah!@> Stop it!\
name ""
name "Luka"
>Oi, oi... Don't bully the Kitsunes...\
name ""
>Alice yanks the fried tofu from the Kitsune's hand and shoves it into her mouth.\
name "Alice"
>*Munch*@>*Munch*@
lsp 700,":a;chara\alice_st02b.bmp",-110,0:print 10,500
>Delicious.\
name ""
name "Kitsune"
>Nooo!@>My fried tofu!\
name ""
>She really hates kitsunes...\
name "Luka"
>Do you dislike Tamamo too?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",-110,0:print 10,500
name "Alice"
>That girl is always treating me like a child...\
name ""
>...From her tone, it doesn't seem like she really dislikes Tamamo.@
>I guess she's in that rebellious age where she just doesn't like any parental figures.\
name "Kitsune"
>My fried tofu...\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg088.bmp",7,1000
goto *city19_main



*city19_13

bg "bg\bg089.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_seinen1.bmp",-240,0:print 10,500
name "Young Man A"
>I'm on a journey to the south.@
>My goal is to have fun with a harpy in the Harpy Village.\
name ""
lsp 701,":a;chara\mob_seinen1.bmp",-80,0:print 10,500
name "Young Man B"
>I'm on a journey to Port Natalia.@
>My goal is to make out with a cute Mermaid.\
name ""
lsp 702,":a;chara\mob_seinen1.bmp",80,0:print 10,500
name "Young Man C"
>I'm on a journey to the Forest of Spirits.@
>My goal is to be played with by the elves and fairies...\
name ""
lsp 703,":a;chara\mob_seinen1.bmp",240,0:print 10,500
name "Young Man D"
>I'm going to the Succubus Village.@
>My goal is what every man dreams of...\
name ""
name "Luka"
>............\
name ""
cspl 700,703
lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
name "Village Chief"
>As you can see, they have shifted their attention to the world at large.@
>Our young men will take flight and spread awareness of Yamatai Village to the world at large.@>And crush us in shame.\
name ""
name "Luka"
>It looks like the difficult times aren't over yet...\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg088.bmp",7,1000
goto *city19_main



*city20_main0

mov %genzaiti,11
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\asioto2.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg095.bmp",7,1500
bgm "bgm\plansect.ogg"
goto *city20_main



*city20_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Alraune ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Dryad ",95,190:spbtn 602,602
strsp 603,"Alra Arum",95,220,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,603
strsp 604,"Alra Rooty",95,250,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 604,604
strsp 605,"Alra Mash",95,280,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 605,605
strsp 606,"Alra Priestess",95,310,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 606,606
lsp 610,":s/20,20,0;#FFFFFF#FF4444Tarantula Girl ",410,160:spbtn 610,610
strsp 611,"Moth Girl",410,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
strsp 612,"Mosquito Girl",410,220,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 612,612
lsp 613,":s/20,20,0;#FFFFFF#FF4444Caterpillar Girl ",410,250:spbtn 613,613
strsp 614,"Silkworm Girl",410,280,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 614,614
strsp 615,"Hornet Girl",410,310,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 615,615
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city20_main
if %cmd1=-1 gosub *menu:goto *city20_main
cspl 600,699
if %cmd1=601 goto *city20_01
if %cmd1=602 goto *city20_02
if %cmd1=603 goto *city20_03
if %cmd1=604 goto *city20_04
if %cmd1=605 goto *city20_05
if %cmd1=606 goto *city20_06
if %cmd1=610 goto *city20_10
if %cmd1=611 goto *city20_11
if %cmd1=612 goto *city20_12
if %cmd1=613 goto *city20_13
if %cmd1=614 goto *city20_14
if %cmd1=615 goto *city20_15
if %cmd1=619 return
goto *city20_main



*city20_01

lsp 700,":a;chara\mob_mamono2.bmp",157,0:print 10,500
gosub *setwindow_01
name "Alraune"
>This is the peaceful village of Plansect.@
>All humans and monsters are welcome.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city20_main



*city20_02

lsp 700,":a;chara\mob_mamono7.bmp",0,0:print 10,500
gosub *setwindow_01
name "Dryad"
>Monsters fighting each other is truly horrible.@
>I'm really happy peace has finally returned.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city20_main



*city20_03

lsp 700,":a;chara\a_alm_st01.bmp",200,0:print 10,500
gosub *setwindow_01
name "Alra Arum"
>Those sealed are only released after acknowledging the war is over.@
>That is, only those who take a vow of peace are unsealed.\
>There are a few who are still emotional and are sealed...@
>We have to be careful with those stupid enough to repeat the war.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city20_main



*city20_04

lsp 700,":a;chara\a_looty_st01.bmp",220,130:print 10,500
gosub *setwindow_01
name "Alra Rooty"
>I decided I won't ever absorb an insect's juices again.@
>Instead, I'll suck on human semen.\
>So hey, you!@> Let me suck out some semen!@
>Come on, just a little!\
name ""
name "Luka"
>Ah... Sorry...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city20_main



*city20_05

lsp 700,":a;chara\a_mash_st01.bmp",260,70:print 10,500
gosub *setwindow_01
name "Alra Mash"
>The Canaan Sisters are still sealed...@
>They reject the peace, so they'll stay sealed...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city20_main



*city20_06

lsp 700,":a;chara\a_emp_st01.bmp",130,0:print 10,500
gosub *setwindow_01
name "Alra Priestess"
>You saw our village in quite an embarrassing state.@
>We were overly emotional, and acted too brashly.\
>After experiencing this peace, we're finally able to understand our errors.\
name ""
name "Luka"
>I have to apologize too.@
>I went into a rage and acted without thinking.\
name ""
name "Alra Priestess"
>You have no reason to apologize.@
>Those sealed by you were all belligerent and violent.\
>It was divine retribution, so to speak.@
>At any rate, we must never repeat the mistakes of the past.\
name ""
if %item12=1 && %item15=1 skip 5
cspl 3,7
csp 611
cspl 699,705
goto *city20_main
name "Alra Priestess"
>...Oh?@> It seems as though you have something with some magic power there.\
name ""
>Alra Priestess closely inspects my Fairy Acorn and Nekomata's Bell.\
name "Alra Priestess"
>Can I combine my magic with those magic items?@
>I'm sure I can create a beautiful jewel.\
name ""
name "Luka"
>But I got this as a proof of friendship from a fairy...@
>I can't just use it as a material...\
name ""
name "Alra Priestess"
>It's fine, I'm sure the completed jewel will feel even more like a proof of friendship.\
name ""
name "Luka"
>Then, OK...\
name ""
>I hand her the two items.\
name "Alra Priestess"
>Allow me to extract the radiance of friendship in these items...\
name ""
>Magic power radiates around Alra Priestess...@
dwave 1,"se\item.ogg"
lsp 2,":c;system\ef_white.jpg",0,0:print 10,300
csp 2:print 10,300
>She forces the two items together, creating a beautiful jewel!\
dwave 1,"se\fanfale.ogg"
mov %item12,2
mov %item15,0
>"Jewel of Friendship" obtained!\
name "Luka"
>Wh...What is this?\
name ""
name "Alra Priestess"
>When you grab that jewel, the deep feelings of the givers will resonate within you.\
name ""
name "Luka"
>Like this...?\
name ""
>I clutch the Jewel, and hold it close to my chest.@
>Inside my mind, a strange vision appears before me.\
lsp 700,":a;chara\fairys_st01.bmp",220,100
lsp 701,":a;chara\fairys_st11.bmp",0,50
lsp 702,":a;chara\fairys_st21.bmp",440,50
bg "bg\bg061.bmp",10,1500
name "Fairy"
>Wah, big bro! @
>Can you see me all the way over there?\
name ""
cspl 701,702
lsp 700,":a;chara\nekomata_st03.bmp",0,0
bg "bg\bg159.bmp",10,1500
name "Nekomata"
>Unya!?\
lsp 700,":a;chara\nekomata_st04.bmp",0,0:print 10,500
>...Nyaa. \
name ""
lsp 700,":a;chara\a_emp_st01.bmp",130,0
bg "bg\bg095.bmp",10,1500
name "Luka"
>Amazing... I can see them!\
name ""
name "Alra Priestess"
>That jewel lets you communicate with them.@
>It's the proof of the friendships you've formed with the monsters you've come across.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city20_main



*city20_10

lsp 700,":a;chara\mob_mamono3.bmp",0,0:print 10,500
gosub *setwindow_01
name "Tarantula Girl"
>Hating the war, we've been hiding in the forest for ten long years...@
>During the war, we were treated as traitors...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city20_main



*city20_11

lsp 700,":a;chara\moss_st01.bmp",230,20:print 10,500
gosub *setwindow_01
name "Moth Girl"
>Ara, it's you...@
>You sealed us before we could even say anything.\
>But I don't have a grudge against you.@
>You sealed those Canaan Sisters after all.\
>I hope they stay sealed forever.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city20_main



*city20_12

lsp 700,":a;chara\mosquito_st01.bmp",220,70:print 10,500
gosub *setwindow_01
name "Mosquito Girl"
>Well... Truly peace is best.@
>But those plant monsters annoy me sometimes...\
>But I know, I won't make waves.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city20_main



*city20_13

lsp 700,":a;chara\imomusi_st01.bmp",180,130:print 10,500
gosub *setwindow_01
name "Caterpillar Girl"
>Ah!@>The human from before!@
>Thank you for helping me! \
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city20_main



*city20_14

lsp 700,":a;chara\kaiko_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Silkworm Girl"
>After being sealed, I now know what it's like to be wrapped up and helpless.@
>I'll stop doing that...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city20_main



*city20_15

lsp 700,":a;chara\suzumebati_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Hornet Girl"
>QUEEN STILL SEALED.@
>STILL NOT ACCEPTING.@
>EVERYONE WILL PERSUADE.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city20_main



*city21_main0

mov %genzaiti,12
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\asioto2.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg100.bmp",7,1500
bgm "bgm\city1.ogg"
goto *city21_main



*city21_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Youth ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Woman ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Old Man ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Old Woman ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Ant Girl ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Mud Golem Girl ",95,310:spbtn 606,606
if %hanyo2=0 lsp 607,":s/20,20,0;#FFFFFF#FF4444Information Seller ",95,340:spbtn 607,607
if %hanyo2=1 lsp 607,":s/20,20,0;#bbbbbbInformation Seller ",95,340
strsp 610,"Tool Shop",410,160,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
lsp 611,":s/20,20,0;#FFFFFF#FF4444Church ",410,190:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Magic Laboratory ",410,220:spbtn 612,612
strsp 613,"Grangold Castle",410,250,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 613,613
if %hanyo1+%hanyo2+%hanyo3+%hanyo4=4 lsp 619,":s/20,20,0;#FFFFFF#FF4444Inn ",410,400:spbtn 619,619
if %hanyo1+%hanyo2+%hanyo3+%hanyo4<4 lsp 619,":s/20,20,0;#bbbbbbInn ",410,400
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city21_main
if %cmd1=-1 gosub *menu:goto *city21_main
cspl 600,699
if %cmd1=601 goto *city21_01
if %cmd1=602 goto *city21_02
if %cmd1=603 goto *city21_03
if %cmd1=604 goto *city21_04
if %cmd1=605 goto *city21_05
if %cmd1=606 goto *city21_06
if %cmd1=607 goto *city21_07
if %cmd1=610 goto *city21_10
if %cmd1=611 goto *city21_11
if %cmd1=612 goto *city21_12
if %cmd1=613 goto *city21b_main0
if %cmd1=619 return
goto *city21_main



*city21_01

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Youth"
>The Ant Girls do all the work.@
>Man, I love this town.\
>Thanks to them, I get to screw around all day.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city21_main



*city21_02

lsp 700,":a;chara\mob_musume2.bmp",175,0:print 10,500
gosub *setwindow_01
name "Woman"
>Those Ant Girls do all the cooking and cleaning, so I get to take it easy all day.\
>My wife duties only include having children.@
>Once they're born, the Ant Girls raise them for me.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city21_main



*city21_03

lsp 700,":a;chara\mob_ozisan2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Old Man"
>Even though there are a lot of monsters here, Ilias Kreuz can't do anything.\
>Outside is the Golem Girl, and inside are the Ant Girls.@
>They wouldn't dare commit terrorism here.\
name ""
name "Luka"
>But people who hate monsters would hate this town, too...\
name ""
name "Old Man"
>There are no people here who hate monsters.@
>All of them moved to the north, to Gold Port.\
>Thanks to that, it became the central place for those who hate monsters, though.\
name ""
name "Luka"
>Gold Port, eh...\
name ""
>The northernmost port on this continent.@
>It's also the headquarters of Ilias Kreuz...\
name "Old Man"
>There are a bunch of thugs and bullies there, in addition to the monster haters.@
>Good folk would do well to stay away from there.\
name ""
name "Luka"
>Yes... Thank you for the warning.\
name ""
>But I have to go there.@
>Ships left from that port to the northernmost continent.\
>They aren't going there any longer, but I have to find a ship somehow...\
cspl 3,7
csp 611
cspl 699,705
goto *city21_main



*city21_04

lsp 700,":a;chara\mob_rouba.bmp",0,0:print 10,500
gosub *setwindow_01
name "Old Woman"
>A little bit west of here is the [Succubus Village].@
>I came from there.\
name ""
name "Luka"
>Ehh!?@
>Then... You're a Succubus!?\
name ""
name "Old Woman"
>Fool! I'm a human!\
name ""
name "Luka"
>...Ah... Of course...\
name ""
>I grab my chest and breathe a sigh of relief.@
>If this old woman was a Succubus, I think people's sense of romance would break.\
name "Old Woman"
>It's often misunderstood, but the [Succubus Village] doesn't have any Succubi living there.@
>All of the residents are normal humans.\
name ""
name "Luka"
>Then why do they call it the [Succubus Village]?\
name ""
name "Old Woman"
>That's because... Every 100 years, a group of Succubi attack the village.@
>I don't know why, but they're pretty punctual with their attacks.\
name ""
name "Luka"
>Every 100 years Succubi attack the village?@
>Why do they do such a strange thing...?\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-93,0
lsp 701,":a;chara\mob_rouba.bmp",160,0:print 10,500
name "Alice"
>...It's probably due to the influence of the purple moon.@
>It's on a 100 year cycle.\
>When it's a full moon, erotic type monsters have powerful magic and fertility.@
>That night is called the Purple Sabbath... That is, it's the best breeding time for Succubi.\
>They come together as a group and begin their... activities.\
name ""
name "Old Woman"
>My word! Young lady, you are quite knowledgeable!@
>Even someone who lived in the village like me didn't know that!\
name ""
name "Luka"
>Don't tell me that Purple Sabbath is soon...\
name ""
name "Old Woman"
>That's correct. It's one week from now.@
>That's why I've come here to seek shelter.@
>I'm worried for those that are still in the village...\
name ""
name "Luka"
>Won't the remaining villagers all be attacked by the Succubi!?@
>If that's the case, I should go...!\
name ""
lsp 700,":a;chara\alice_st12b.bmp",-93,0:print 10,500
name "Alice"
>Hmph. Are you going there so you can be attacked by the Succubi?\
name ""
name "Luka"
>No! I'm going to defeat them!\
name ""
cspl 3,7
csp 611
cspl 699,705
mov %hanyo1,1
goto *city21_main



*city21_05

lsp 700,":a;chara\ant_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Ant Girl"
>I AM WORKING. TALK LATER.\
name ""
>The Ant Girls look like they're awfully busy...\
cspl 3,7
csp 611
cspl 699,705
goto *city21_main



*city21_06

lsp 700,":a;chara\madgolem_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Mud Golem Girl"
>CURRENTLY WORKING.@
>IT'S DANGEROUS. STEP BACK.\
name ""
>The huge Mud Golem uses her massive size to carry large earthworks around...\
cspl 3,7
csp 611
cspl 699,705
goto *city21_main



*city21_07

gosub *setwindow_01
name "Luka"
>"Information Seller"?@>Could it be...\
name ""
name "???"
>Of course, it is I...\
name ""
bgmstop
bgmonce "bgm\battlestart.ogg"
lsp 700,":a;chara\amira_st01.bmp",0,0:print 10,1500
eng "Unfortunate Lamia appears!":$sel6/
wait 300
delay 4000
bgm "bgm\amira.ogg"
\
name "Amira"
>The reason I appeared before you?@>Why it's love of course!\
>Love! @
>*Censored* love!@>My hot, steamy *Censored* love song! \
name ""
name "Luka"
>...I don't want to know what was censored in that "song".\
name ""
name "Amira"
>I'd take a bow like a singer should, but it would be quite difficult for me, as you can see.\
name ""
name "Luka"
>Then don't sing in the first place...@
>Anyway, I'd like to hear any information you managed to find.\
name ""
name "Amira"
>My information is free of charge to you.@
>You wanted information about Salamander, right?\
>I asked the nearby Medusa, and learned quite a lot.@
>Salamander appears to reside in the southwest "Fire Spirit's Volcano".\
name ""
name "Luka"
>A volcano, eh...?\
name ""
>Fire Spirit's Volcano...@> Not a very creative name for the place where Salamander is.\
>While a volcano is a fitting place for her, it sounds like it will be a pretty difficult place to get into...\
name "Amira"
>That appears to be the place, but there have been no human eyewitnesses.@
>But among monsters, it appears to be a famous place to meet Salamander.\
>Thanks to that, getting the information was quite easy.\
name ""
name "Luka"
>Famous?@>I wonder why...\
name ""
>The other spirits seemed to live quietly, almost in solitude.@
>I wonder why Salamander's location is famous among monsters?\
name "Luka"
>Anyway... Thank you, Amira.@
>That's very useful information.\
name ""
name "Amira"
>What do you want me to look into next?\
name ""
name "Luka"
>Ah, well... Nothing in particular, really...\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-130,0
lsp 701,":a;chara\amira_st01.bmp",200,0:print 10,500
name "Alice"
>Can you look into the Orb treasures?\
name ""
name "Luka"
>Alice, do you want the Orbs?\
name ""
lsp 700,":a;chara\alice_st13b.bmp",-130,0:print 10,500
name "Alice"
>You idiot, it's for your adventure!@
lsp 700,":a;chara\alice_st14b.bmp",-130,0:print 10,500
>...It's for when they may be needed.\
name ""
csp 701
lsp 700,":a;chara\amira_st01.bmp",0,0:print 10,1500
name "Amira"
>I will do anything for my Hero.@
>I'll collect information about the Orb's locations.\
name ""
name "Luka"
>Ah, yes... Please do.\
name ""
>I don't really get it, but if Alice wants them, then there must be a reason.\
name "Amira"
>Then I must go-amira.@
>As many wise characters have done before me, I shall attach "amira" to the end of my sentences to endear me to the audience.\
name ""
name "Luka"
>I don't think cheesy character tricks like that will make peo...\
name ""
name "Amira"
>Now farewell-desu!@> I mean-amira.\
>One more time.@> Farewellamia!\
name ""
dwave 1,"se\escape.ogg"
csp 700:print 10,1500
bgm "bgm\city1.ogg"
name "Luka"
>...She said Lamia at the end, didn't she?\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>I was just ignoring her like usual, I don't know.\
name ""
>At any rate, I know where Salamander is now.@
>Fire Spirit's Volcano...@> It sounds like another troublesome location...\
cspl 3,7
csp 611
cspl 699,705
mov %hanyo2,1
goto *city21_main



*city21_10

bg "bg\bg151.bmp",7,1000
lsp 700,":a;chara\ant_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Ant Girl"
>WELCOME.\
name ""
name "Luka"
>Oh come on, they're even making Ant Girls be the shopkeepers?\
name ""
>I take a look behind the counter, and see a man reading a book with a bored look on his face.@
>They really are just making the Ant Girls do everything...\
name "Ant Girl"
>DO YOU NEED SOMETHING?\
name ""
name "Luka"
>No, not really...\
name ""
>I can't bring myself to go shopping here...@
>I quickly leave the shop.\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg100.bmp",7,1000
goto *city21_main



*city21_11

bg "bg\bg156.bmp",7,1000
lsp 700,":a;chara\ant_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Ant Girl"
>I SHALL PRAY FOR YOU.\
name ""
name "Luka"
>Oh come on, an Ant Girl is the acting priest!?\
name ""
>Just what is the priest here thinking?@
>I think Ilias would strongly object to this...\
name "Ant Girl"
>PRAY...\
name ""
name "Luka"
>Ah, yes... Let's pray.\
name ""
>I pray to Ilias with the Ant Girl, then leave the church.\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg100.bmp",7,1000
goto *city21_main



*city21_12

bg "bg\bg161.bmp",7,1000
gosub *setwindow_01
name "Luka"
>Uwa, this place is huge...\
name ""
>I walk into a huge room, with a ceiling higher than any I've ever seen before.@
>It's big enough to fit that Golem Girl from before.\
lsp 700,":a;chara\mob_madou.bmp",0,0:print 10,500
name "Magic Engineer"
>Ara, here for an inspection?@
>There are a lot of things I can't show you, so I can't particularly welcome you.\
name ""
name "Luka"
>Is this where the Golem Girl was made?\
name ""
name "Magic Engineer"
>Yes, this is where we refine our Magic Science.@
>Grangold is the most advanced in all the world.\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-93,0
lsp 701,":a;chara\mob_madou.bmp",160,0:print 10,500
name "Alice"
>...I'd like to ask a question.@
>How do you issue orders to the Ant Girls?\
name ""
name "Magic Engineer"
>That's classified, so I can't say too much...@
>But they basically recognize human orders as coming from the Queen Ant.\
name ""
name "Alice"
>You can do that...?@
>Anyway, where is their true leader, the Queen Ant, located at?\
name ""
name "Magic Engineer"
>Hehe, you want to know?@
>The Queen Ant is in the basement of the castle.\
name ""
lsp 700,":a;chara\alice_st13b.bmp",-93,0:print 10,500
name "Alice"
>Is she sealed...?@
>Can humans do such a thing?\
name ""
name "Magic Engineer"
>How it was done is classified.@
>But since it was done, the Ant Girls have become quite useful.\
name ""
lsp 700,":a;chara\alice_st14b.bmp",-93,0:print 10,500
name "Alice"
>Such absurdity...@
>A Queen class monster was sealed by normal human's power...\
name ""
>Alice goes silent after muttering that to herself.\
name "Magic Engineer"
>I'm awfully curious...@
>Are you perhaps a spy from another country?\
>If so, you can't duplicate it in other countries.@
>Because it's only possible using the cutting edge in Magic Science.\
name ""
name "Luka"
>...............\
name ""
>It seems like they really are the most advanced in the world.@
>Alice doesn't seem to like it, either...\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg100.bmp",7,1000
mov %hanyo3,1
goto *city21_main



*city21b_main0

mov %genzaiti,12
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\asioto2.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg101.bmp",7,1500
bgm "bgm\castle4.ogg"
goto *city21b_main



*city21b_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
strsp 601,"Minister A",95,160,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 601,601
strsp 602,"Minister B",95,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Diplomat ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Ant Girls ",95,250:spbtn 604,604
strsp 605,"Ant Girl Guard",95,280,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 605,605
strsp 610,"Audience Hall",410,160,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
lsp 611,":s/20,20,0;#FFFFFF#FF4444Guardroom ",410,190:spbtn 611,611
strsp 619,"Return to Grangold Town",410,400,13,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city21b_main
if %cmd1=-1 gosub *menu:goto *city21b_main
cspl 600,699
if %cmd1=601 goto *city21b_01
if %cmd1=602 goto *city21b_02
if %cmd1=603 goto *city21b_03
if %cmd1=604 goto *city21b_04
if %cmd1=605 goto *city21b_05
if %cmd1=610 goto *city21b_10
if %cmd1=611 goto *city21b_11
if %cmd1=619 textoff:btndef clear:mov %sinkoumode,0:skipoff:autoclick 0:dwave 1,"se\asioto3.ogg":csp 611:cspl 3,7:bg black,7,1500:bg "bg\bg100.bmp",7,1500:bgm "bgm\city1.ogg":goto *city21_main
goto *city21b_main



*city21b_01

lsp 700,":a;chara\mob_daizin.bmp",0,0:print 10,500
gosub *setwindow_01
name "Minister A"
>We leave all the financial stuff and document filing to the Ant Girls.@
>It's been a long time since we've actually had to do anything.\
>But even still, my salary is huge.@
>Hahaha, I love it!@> I can't stop laughing, hahaha!\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city21b_main



*city21b_02

lsp 700,":a;chara\mob_daizin.bmp",0,0:print 10,500
gosub *setwindow_01
name "Minister B"
>I work hard.\
>I've counted all the trees outside my window today.@
>Oh, and every time a leaf comes through my window, I see how long I can blow on it to keep it in the air.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city21b_main



*city21b_03

lsp 700,":a;chara\mob_daizin.bmp",0,0:print 10,500
gosub *setwindow_01
name "Diplomat"
>I leave most of the work to the Ant Girls.@
>But since using Ant Girls as diplomats won't work in a lot of places, I still have to work.\
>I just got back from Lady's Village on the tip of the continent the other day.\
name ""
name "Luka"
>Lady's Village...?\
name ""
name "Diplomat"
>Just like the name implies, it's a village where a bunch of beautiful women live.@
>But there's been a strange rumor...@>So I went to see if it was true or not.\
name ""
name "Luka"
>A strange rumor...?@>What was it?\
name ""
name "Diplomat"
>The male adventurers that go to Lady's Village never come back.\
>Women don't have any issues, but men don't ever seem to leave.@
>It's a strange rumor.\
name ""
name "Luka"
>That seems awfully suspicious...\
name ""
>If only men are vanishing, it has to be the work of monsters...\
name "Diplomat"
>I couldn't leave the issue alone, with people vanishing.@
>So I went as a diplomat...\
>It was quite a nice village, very lovely.@
>And the female Lord, Cassandra, was quite lovely herself.\
name ""
lsp 700,":a;chara\alice_st61b.bmp",-93,0
lsp 701,":a;chara\mob_daizin.bmp",160,0:print 10,500
name "Alice"
>Cassandra... Was it?\
name ""
>Alice's eyes snap open all of a sudden.\
name "Luka"
>What's wrong?\
name ""
lsp 700,":a;chara\alice_st14b.bmp",-93,0:print 10,500
name "Alice"
>Ah, nothing...\
name ""
>Alice goes quiet, and lowers her gaze.@
>Did the name remind her of something?\
name "Diplomat"
>In the end, it turned out to be just a rumor after all.@
>There are a lot of powerful monsters around the village, it seems like they were just attacked by them.\
name ""
name "Luka"
>Is that really it...?@
>I want to go there and see if there's something else...\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-93,0:print 10,500
name "Alice"
>...No.@> Don't go close to that village.\
name ""
>Alice suddenly speaks up again.@
>Judging from her tone, it seems like there's a reason besides it just being troublesome that she doesn't want to go.\
name "Luka"
>...Why not?@
>You know something, don't you?\
name ""
name "Alice"
>It doesn't matter, it's just my advice.@
>Don't go near that village.\
name ""
>I don't know why, but she seems to feel pretty strongly about this.@
>At any rate, I'll see if I can learn more about Lady's Village...\
name ""
cspl 3,7
csp 611
cspl 699,705
mov %hanyo4,1
goto *city21b_main



*city21b_04

lsp 700,":a;chara\ant_st01.bmp",-160,0
lsp 701,":a;chara\ant_st01.bmp",160,0:print 10,500
gosub *setwindow_01
name "Ant Girl A"
>NORTHWEST DISTRICT TAX COLLECTION IS BAD.@
>DISPATCH NEW TAX OFFICIAL.\
name ""
name "Ant Girl B"
>ORANGE FARMERS PETITION ARRIVED.@
>SABASA PRODUCE IDEAL TARIFF IS...\
name ""
>The Ant Girls are chattering all over about various government issues...@
>Unlike the humans, they seem to be working really hard.\
cspl 3,7
csp 611
cspl 699,705
goto *city21b_main



*city21b_05

lsp 700,":a;chara\ant_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Ant Girl Guard"
>INTRUDER.@>ATTACK!\
name ""
name "Luka"
>I...I'm not an intruder!\
name ""
name "Ant Girl Guard"
>THEN I WON'T ATTACK.\
name ""
>They're even making them guard the royal palace?\
cspl 3,7
csp 611
cspl 699,705
goto *city21b_main



*city21b_10

bg "bg\bg045.bmp",7,1000
lsp 700,":a;chara\grangold_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Grangold King"
>Oh, if it isn't the Hero Luka!@
>Did you come to tell me more stories?\
lsp 700,":a;chara\grangold_st02.bmp",0,0:print 10,500
>I'm so bored every day, it feels like I'm going to die from it.@
>It has even gotten so bad, I almost thought about doing some political stuff before.\
name ""
name "Luka"
>.............\
name ""
>Is it really alright for someone like this to be the King?\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg101.bmp",7,1000
goto *city21b_main



*city21b_11

bg "bg\bg060.bmp",7,1000
lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Guard"
>The Ant Girls are the soldiers, and the Golem Girl is the gatekeeper...@
>There isn't any other country that has such reassuring military power, is there?\
>We're more like decorations here.@
>I just drink tea and eat snacks in here...\
name ""
>...He looks a little lonely.\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg101.bmp",7,1000
goto *city21b_main



*city22_main0

mov %genzaiti,12
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\asioto2.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg100.bmp",7,1500
bgm "bgm\city1.ogg"
goto *city22_main



*city22_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Youth ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Woman ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Old Man ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Old Woman ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Ant Girl ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Mud Golem Girl ",95,310:spbtn 606,606
strsp 610,"Tool Shop",410,160,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
lsp 611,":s/20,20,0;#FFFFFF#FF4444Church ",410,190:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Magic Laboratory ",410,220:spbtn 612,612
strsp 613,"Grangold Castle",410,250,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 613,613
strsp 614,"Assembly Hall",410,280,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 614,614
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city22_main
if %cmd1=-1 gosub *menu:goto *city22_main
cspl 600,699
if %cmd1=601 goto *city22_01
if %cmd1=602 goto *city22_02
if %cmd1=603 goto *city22_03
if %cmd1=604 goto *city22_04
if %cmd1=605 goto *city22_05
if %cmd1=606 goto *city22_06
if %cmd1=610 goto *city22_10
if %cmd1=611 goto *city22_11
if %cmd1=612 goto *city22_12
if %cmd1=613 goto *city22_13
if %cmd1=614 goto *city22_14
if %cmd1=619 return
goto *city22_main



*city22_01

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Youth"
>We forced the Ant Girls to work so hard...@
>I always thought they were happy to do it, but I see that I was wrong.\
>I won't let anything like that happen again.@
>The Ant Girls are citizens of Grangold, just like me.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city22_main



*city22_02

lsp 700,":a;chara\mob_musume2.bmp",175,0:print 10,500
gosub *setwindow_01
name "Woman"
>I'll let the Ant Girls do all the cooking and cleaning while I take it easy.\
>The only housewife duties I need to do are make children.@
>And the Ant Girls will even take care of the children after I give birth...\
>...Is what I said to my husband.@
>"Well then, I guess I should marry an Ant Girl and get rid of you" he replied.\
>So then he divorced me.@
>I hate monsters!\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city22_main



*city22_03

lsp 700,":a;chara\mob_ozisan2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Old Man"
>I'm going to leave this town soon.\
>We did such horrible things to Ant Girls...@
>There's no way trust can develop after such awful things happened.\
>I wonder where I can go... Maybe Gold Port?\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city22_main



*city22_04

lsp 700,":a;chara\mob_rouba.bmp",0,0:print 10,500
gosub *setwindow_01
name "Old Woman"
>After running from Succubus Village here for refuge, I almost ended up spending the rest of my life as a slave...\
>At least it ended peacefully here...\
name ""
cspl 3,7
csp 611
cspl 699,705
mov %hanyo1,1
goto *city22_main



*city22_05

lsp 700,":a;chara\ant_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Ant Girl"
>I DON'T MIND THIS KIND OF WORK.\
name ""
>The Ant Girls are working hard...\
cspl 3,7
csp 611
cspl 699,705
goto *city22_main



*city22_06

lsp 700,":a;chara\madgolem_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Mud Golem Girl"
>WE'RE CURRENTLY DOING CONSTRUCTION WORK.@
>IT'S DANGEROUS HERE, SO PLEASE STEP BACK.\
name ""
>The Mud Golem Girl seems to be talking a little bit more normally...@
>I wonder if they're turning more human like?\
cspl 3,7
csp 611
cspl 699,705
goto *city22_main



*city22_10

bg "bg\bg151.bmp",7,1000
lsp 700,":a;chara\mob_ozisan1.bmp",-160,0
lsp 701,":a;chara\ant_st01.bmp",160,0:print 10,500
gosub *setwindow_01
name "Shopkeeper"
>Welcome to the restored Tool Shop!\
name ""
name "Ant Girl"
>WELCOME...\
name ""
name "Shopkeeper"
>I'm trying my best to get everything right...@
>But I'm still relying on the Ant Girl a lot to help me.\
name ""
name "Luka"
>I...I see...\
name ""
>It seems like the humans who were taking it easy for so long are having some difficulty working again.@
>They'll need to break their old habits before they can live together in peace...\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg100.bmp",7,1000
goto *city22_main



*city22_11

bg "bg\bg156.bmp",7,1000
lsp 700,":a;chara\ant_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Ant Girl"
>I SHALL PRAY FOR YOU...\
name ""
name "Luka"
>Oh come on, the priest is still leaving it all up to the Ant Girls!?\
name ""
lsp 700,":a;chara\ant_st01.bmp",-160,0
lsp 701,":a;chara\mob_rouzin1.bmp",160,0:print 10,500
name "Elder"
>Ah, you see...@
>The priest that used to be here was suddenly struck by lightning.\
>He was probably punished by Ilias...\
name ""
name "Luka"
>I...I see...\
name ""
>It looks like the church is left to the Ant Girls after all...\
csp 701
lsp 700,":a;chara\ant_st01.bmp",0,0:print 10,500
name "Ant Girl"
>LET'S PRAY...\
name ""
name "Luka"
>Ah, yeah... Let's pray...\
name ""
>I pray to Ilias with the Ant Girl, then leave the church.\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg100.bmp",7,1000
goto *city22_main



*city22_12

bg "bg\bg161.bmp",7,1000
lsp 700,":a;chara\mob_madou.bmp",0,0:print 10,500
gosub *setwindow_01
name "Magic Engineer"
>Our present work is only in maintaining the artificial monsters.@
>They don't have any will, so they won't complain if we overwork them.@>...Probably.\
name ""
name "Luka"
>Are you sure they don't have a will...?\
name ""
>If the artificial monsters have feelings, they're going to revolt next...\
name "Magic Engineer"
>Also... Promestein stopped communicating with us.@
>She remained a mystery to the very end.\
name ""
name "Luka"
>I see...\
name ""
>Why did she give them all this technology...?@
>Who on earth is she?\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg100.bmp",7,1000
mov %hanyo3,1
goto *city22_main



*city22_13

gosub *setwindow_01
name "Luka"
>It looks like nobody is allowed past here...\
name ""
>The castle is still being repaired.@
>It doesn't look like they're letting anyone in.\
cspl 3,7
csp 611
cspl 699,705
goto *city22_main



*city22_14

bg "bg\bg105.bmp",7,1000
lsp 700,":a;chara\grangold_st04.bmp",0,0:print 10,500
gosub *setwindow_01
name "Grangold King"
>Hey, how are you today?@
>We're still working out plans for repairing the town.\
>I don't have any free time like before, but I feel a lot happier.@
>I'm only now feeling like a King, even though I've sat on the throne for a long time...\
name ""
lsp 700,":a;chara\grangold_st04.bmp",-160,0
lsp 701,":a;chara\queenant_st01.bmp",160,0:print 10,500
name "Queen Ant"
>I'm cooperating with planning the town's repairs, too.\
>This is the place my children will live.@
>We must join forces with the humans to build it.\
name ""
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg100.bmp",7,1000
mov %hanyo3,1
goto *city22_main



*map5

saveoff
textoff
csp -1
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
bg "bg\map5.bmp",10,1000
goto *map5_2



*map5_2

strsp 601,"Grangold Castle",635,320,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 601,11
strsp 602,"Succubus Village",390,270,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 602,12
if %ivent12=0 strsp 606,"Req. Level: 40",400,290,8,1,20,20,0,0,1,1,#FFFFFF
if %ivent12=1 lsp 606,":s/20,20,0;#FFFFFFDone ",450,290
strsp 603,"Lady's Village",160,320,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,13
if %ivent13=0 strsp 607,"Req. Level: 42",160,340,8,1,20,20,0,0,1,1,#FFFFFF
if %ivent13=1 lsp 607,":s/20,20,0;#FFFFFFDone ",210,340
strsp 604,"Gold Volcano",370,410,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 604,14
strsp 608,"Req. Level: 44",360,430,8,1,20,20,0,0,1,1,#FFFFFF
strsp 605,"Gold Port",295,120,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 605,15
print 1
btnwait2 %cmd1
if %cmd1=0 goto *map5_2
if %cmd1=-1 gosub *menu:goto *map5_2
csp -1
btndef clear
if %cmd1=11 && %ivent11=0 goto *sean0209
if %cmd1=11 && %ivent11=1 gosub *city22_main0:dwave 1,"se\asioto2.ogg":bg black,7,1500:bgm "bgm\field3.ogg":goto *map5
if %cmd1=12 && %ivent12=0 goto *sean0217
if %cmd1=12 && %ivent12=1 gosub *city24_main0:dwave 1,"se\asioto2.ogg":bg black,7,1500:bgm "bgm\field3.ogg":goto *map5
if %cmd1=13 && %ivent13=0 goto *sean0225
if %cmd1=13 && %ivent13=1 goto *sean0235
if %cmd1=14 goto *sean0236
if %cmd1=15 gosub *city26_main0:dwave 1,"se\asioto2.ogg":bg black,7,1500:bgm "bgm\field3.ogg":goto *map5
goto *map5_2



*city23_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Youth ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Prostitute ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Sisters ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Soldier A ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Soldier B ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Soothsayer ",95,310:spbtn 606,606
strsp 610,"Tool Shop ",410,160,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
lsp 611,":s/20,20,0;#FFFFFF#FF4444Church ",410,190:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Bar ",410,220:spbtn 612,612
lsp 613,":s/20,20,0;#FFFFFF#FF4444Village Chief's House ",410,250:spbtn 613,613
if %hanyo1+%hanyo2=2 strsp 619,"Head to the Inn",410,400,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 619,619
if %hanyo1+%hanyo2<2 strsp 619,"Head to the Inn",410,400,9,1,20,20,0,0,1,1,#bbbbbb
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city23_main
if %cmd1=-1 gosub *menu:goto *city23_main
cspl 600,699
if %cmd1=601 goto *city23_01
if %cmd1=602 goto *city23_02
if %cmd1=603 goto *city23_03
if %cmd1=604 goto *city23_04
if %cmd1=605 goto *city23_05
if %cmd1=606 goto *city23_06
if %cmd1=610 goto *city23_10
if %cmd1=611 goto *city23_11
if %cmd1=612 goto *city23_12
if %cmd1=613 goto *city23_13
if %cmd1=619 return
goto *city23_main



*city23_01

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Youth"
>I won't run away from the village.@
>I'll defend my hometown, and confront the Succubi!@
>Oh... Oh, please don't look at me like that! I'm not thinking of anything lewd!\
>Aha. Ahahahaha!\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-110,0
lsp 701,":a;chara\mob_seinen1.bmp",160,0:print 10,500
name "Alice"
>......Damn pervert.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city23_main



*city23_02

lsp 700,":a;chara\maccubus_st21.bmp",175,0:print 10,500
gosub *setwindow_01
name "Prostitute"
>Oh, excuse me.@
>It's a little cold today, so I'm not working today.\
name ""
name "Luka"
>Err, that's not what I'm after... I just wanted to talk to people.@
>But there sure aren't too many people around...\
name ""
name "Prostitute"
>All the people with money fled to the other villages and towns.@
>Those remaining here are the poor. Or the ones with other reasons...\
name ""
name "Luka"
>I see...\
name ""
>Naturally, the village should have been abandoned...@
>I wonder why she didn't leave...\
name "Prostitute"
>Most people left... But a few people came here on purpose.@
>A couple are brave Heroes to defend the village...@
>But the rest are all perverts who want to be attacked by a Succubus.\
name ""
name "Luka"
>I... I came to defend the village!\
name ""
name "Prostitute"
>Hahaha... That's what they all say!\
name ""
name "Luka"
>.................\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-110,0
lsp 701,":a;chara\maccubus_st21.bmp",335,0:print 10,500
name "Alice"
>......Damn pervert.\
name ""
name "Luka"
>No! I told you that's not it!\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city23_main



*city23_03

lsp 700,":a;chara\renccubus_st11.bmp",15,0
lsp 701,":a;chara\minccubus_st11.bmp",335,0:print 10,500
gosub *setwindow_01
name "Young Girl"
>You came here to defend this village as well, didn't you?@
>Please, give it your all...\
name ""
name "Girl"
>Good luck, big bro!\
name ""
name "Luka"
>Yes, I'll do my best!@
>By the way, why haven't you two evacuated?\
name ""
name "Young Girl"
>We don't have enough money...@
>If we lost our farm here, we would have to live out on the streets.\
>We have no way to escape...\
name ""
name "Luka"
>That's horrible...\
name ""
>Two young sisters like this can't live on the streets like that...@
>Even if they know it's dangerous, they aren't even able to leave...\
name ""
name "Luka"
>Leave it to me! I'll defend the village for sure!\
name ""
>I swear it in my mind.\
lsp 700,":a;chara\alice_st11b.bmp",-160,0
lsp 701,":a;chara\renccubus_st11.bmp",195,0
lsp 702,":a;chara\minccubus_st11.bmp",415,0:print 10,500
name "Alice"
>......Damn pervert.\
name ""
name "Luka"
>No! I told you that's not it!\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city23_main



*city23_04

lsp 700,":a;chara\mob_sensi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier A"
>I came to defend this village!@
>Even if I'm left completely exhausted, I won't regret it!\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-110,0
lsp 701,":a;chara\mob_sensi1.bmp",160,0:print 10,500
name "Alice"
>......Damn pervert.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city23_main



*city23_05

lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier B"
>I came here to have sex with a Succubus!@
>If I'm left completely exhausted, that will be my reward!\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-110,0
lsp 701,":a;chara\mob_sensi2.bmp",160,0:print 10,500
name "Alice"
>......Damn honest.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city23_main



*city23_06

lsp 700,":a;chara\witchs_st21.bmp",0,50:print 10,500
gosub *setwindow_01
name "Soothsayer"
>Young man over there, would you like your fortune told?@
>Since the village is in such a horrid state, I'll do it for free!\
name ""
name "Luka"
>Sure...\
name ""
lsp 700,":a;chara\witchs_st22.bmp",0,50:print 10,500
name "Soothsayer"
>Hmmmm... I sense issues with women.@
>There is surely going to be trouble with women ahead for you...\
>Well? Did I get it right?\
name ""
name "Luka"
>Amazing! That's exactly right!@
>How do I avoid it!?\
name ""
lsp 700,":a;chara\witchs_st23.bmp",0,50:print 10,500
name "Soothsayer"
>That's just your fate. Surrender to it.\
name ""
name "Luka"
>What? That's awful...@
>Anyway, why haven't you evacuated?\
name ""
lsp 700,":a;chara\witchs_st21.bmp",0,50:print 10,500
name "Soothsayer"
>Even if trouble is coming, I won't turn tail and run.@
>If the Succubi come, I'll just offer them my trade...\
name ""
name "Luka"
>You have some guts...\
name ""
lsp 700,":a;chara\witchs_st24.bmp",0,50:print 10,500
name "Soothsayer"
>By the way, do you know why the Succubi attack the people here?\
name ""
name "Luka"
>Err... Because tonight their magic will be at their most powerful.@
>So they all group together and attack at the same time... Right?\
name ""
name "Soothsayer"
>...Too bad, but you're a little off.@
>If it was an ordinary Purple Sabbath, you would be correct.\
>But there's a different purpose this time...@
>They're grouping up to fill... another purpose.\
name ""
name "Luka"
>Another purpose...?@
>What is it?\
name ""
lsp 700,":a;chara\witchs_st23.bmp",0,50:print 10,500
name "Soothsayer"
>Hehe... That's a secret.@
>When tonight comes, you'll understand...\
name ""
name "Luka"
>How do you know such a thing...?@
>...You must be a really powerful soothsayer!\
name ""
lsp 700,":a;chara\witchs_st22.bmp",0,50:print 10,500
name "Soothsayer"
>Th...thanks...\
name ""
lsp 700,":a;chara\alice_st11b.bmp",-110,0
lsp 701,":a;chara\witchs_st22.bmp",160,50:print 10,500
name "Alice"
>......Damn idiot.\
name ""
mov %hanyo1,1
cspl 3,7
csp 611
cspl 700,705
goto *city23_main



*city23_10

bg "bg\bg151.bmp",7,1000
lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Shopkeeper"
>I've been keeping this tool shop going since my great grandfather started it!@
>If the Succubi come, is this shop going to close!?\
>I have my pride as a businessman to think of!@
>If you're going to attack, then attack damn it!\
>Attack me!@> I'll show you all!@
>Uuuuu....@>Uwaaaaa!!!\
name ""
name "Luka"
>P...Please cheer up...\
name ""
>Why do I have to comfort him...\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg103.bmp",7,1000
goto *city23_main



*city23_11

bg "bg\bg156.bmp",7,1000
gosub *setwindow_01
name "Luka"
>What...? There's no priest...?\
name ""
>On the desk is a letter.@
wI'll be gone for a while.@
    - Gold West Parish Priest.x\
name "Luka"
>Even the priest ran away...?\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg103.bmp",7,1000
goto *city23_main



*city23_12

bg "bg\bg107.bmp",7,1000
lsp 700,":a;chara\mob_gorotuki3.bmp",-270,0
lsp 701,":a;chara\mob_seinen2.bmp",0,0
lsp 702,":a;chara\mob_sensi1.bmp",270,0:print 10,500
gosub *setwindow_01
name "Bully"
>What's up, kid?@
>This bar ain't a damn kid's playground!\
name ""
name "Soldier A"
>The beer is tasting like crap because of you. Get out!\
name ""
name "Soldier B"
>Boy, get out of this village quickly.@
>Monsters are going to attack soon...\
name ""
name "Luka"
>Y...Yes... Sorry...\
name ""
>It looks like I'm not welcome in here.@
>I sheepishly back out of the bar.\
>Honestly, it didn't really look like they were looking for a fight.@
>I don't mean to badmouth them, but they look pretty weak...\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg103.bmp",7,1000
goto *city23_main



*city23_13

bg "bg\bg106.bmp",7,1000
lsp 700,":a;chara\succubus_st11.bmp",0,50:print 10,500
gosub *setwindow_01
name "Village Chief"
>Welcome, Hero.@
>I'm the chief of this village.\
name ""
name "Luka"
>He...Hello...\
name ""
>Unexpectedly, the chief is a beautiful young woman.@
>She scans me slowly from head to toe.\
name "Village Chief"
>You know, right...@
>Every 100 years, Succubi attack this village in a large group.\
>It's called the Purple Sabbath. And it's going to happen tonight.\
name ""
name "Luka"
>Yes. I came here to defend the village against that!\
name ""
lsp 700,":a;chara\succubus_st14.bmp",0,50:print 10,500
name "Village Chief"
>Hehe... That will be a big help.@
>We can always do with more strong men...\
name ""
name "Luka"
>Ye...Yes... Thank you...\
name ""
name "Village Chief"
>I'll be looking forward to it, Mr. Cute Hero.\
name ""
name "Luka"
>Le...Leave it to me...\
name ""
>...I get a very odd feeling from her.\
mov %hanyo2,1
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg103.bmp",7,1000
goto *city23_main



*city24_main0

mov %genzaiti,13
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\asioto2.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg103.bmp",7,1500
bgm "bgm\mura2.ogg"
goto *city24_main



*city24_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Youth ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Prostitute ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Sisters ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Soldier ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Yamatai Youth ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Soothsayer ",95,310:spbtn 606,606
strsp 610,"Tool Shop",410,160,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
lsp 611,":s/20,20,0;#FFFFFF#FF4444Church ",410,190:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Bar ",410,220:spbtn 612,612
lsp 613,":s/20,20,0;#FFFFFF#FF4444Village Chief ",410,250:spbtn 613,613
strsp 614,"Ceremony Room",410,280,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 614,614
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city24_main
if %cmd1=-1 gosub *menu:goto *city24_main
cspl 600,699
if %cmd1=601 goto *city24_01
if %cmd1=602 goto *city24_02
if %cmd1=603 goto *city24_03
if %cmd1=604 goto *city24_04
if %cmd1=605 goto *city24_05
if %cmd1=606 goto *city24_06
if %cmd1=610 goto *city24_10
if %cmd1=611 goto *city24_11
if %cmd1=612 goto *city24_12
if %cmd1=613 goto *city24_13
if %cmd1=614 goto *city24_14
if %cmd1=619 return
goto *city24_main



*city24_01

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Livestock A"
>Th...This is the... Succubus Village...@
>W...Welcome to... Ah.... Heaven...\
name ""
>He looks weak...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city24_main



*city24_02

lsp 700,":a;chara\maccubus_st11.bmp",175,0:print 10,500
gosub *setwindow_01
name "Maccubus"
>It's hard to do business in this village now.@
>There are so many Succubi, who would ever buy a prostitute.\
>I wonder if I should immigrate to Sabasa, or the Noah Region?@
>But I'd have to hide my true nature in other towns...\
name ""
name "Luka"
>That aside...@>Why are you standing around naked?\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city24_main



*city24_03

lsp 700,":a;chara\renccubus_st01.bmp",15,0
lsp 701,":a;chara\minccubus_st01.bmp",335,50:print 10,500
gosub *setwindow_01
name "Lencubus"
>Being a Succubus is wonderful.@
>Even without money, I can live a comfortable life.\
>Whenever I'm hungry, all I have to do is suck the nearest man's energy...@
>I don't even need clothes!\
name ""
name "Mincubus"
>The men are all so nice to me, too!@
>Isn't this great, sister!? \
name ""
name "Luka"
>............\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city24_main



*city24_04

lsp 700,":a;chara\mob_sensi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Livestock B"
>Haa... H... Ahhh...@>Ahhhn...@
>H...ell..@>Ahhh!@>Hell... He...\
name ""
name "Luka"
>...........\
name ""
>Is he trying to greet me or something?\
cspl 3,7
csp 611
cspl 699,705
goto *city24_main



*city24_05

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Youth"
if %ivent09=0 skip 4
>Hey, do you remember me from Yamatai?@
>I spent all my money on a carriage here, and managed to get here safely somehow.\
skip 3
>I'm a traveler from Yamatai.@
>I heard this is a place where a man's dreams can come true.\
>I'm so full of hope at the new life that awaits me here!@
>My penis is so hard in expectation, it feels like I could burst any moment!\
name ""
name "Luka"
>Damn pervert...\
name ""
lsp 700,":a;chara\alice_st13b.bmp",67,0:print 10,500
name "Alice"
>Don't copy me, you idiot!\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city24_main



*city24_06

lsp 700,":a;chara\witchs_st11.bmp",0,50:print 10,500
gosub *setwindow_01
name "Succubus Witch"
>Ara, welcome...@
>Do you want your fortune again?\
>Or perhaps you want something a little more... Special?\
name ""
name "Luka"
>Err... I'll take the fortune...\
name ""
name "Succubus Witch"
>Just as before, I see issues with women ahead for you...@
>It seems that no matter what path you take, that will never change for you...\
name ""
name "Luka"
>Can I not do anything to change my fate?\
name ""
name "Succubus Witch"
>There is a way to avoid the women trouble, actually...@
>You just need to live in this village.\
name ""
name "Luka"
>Wouldn't that just make my women trouble even worse...?\
name ""
name "Succubus Witch"
>Well, besides that, you'd be safe from monsters...@
>Especially from falling in love with powerful, high ranking monsters...@
>That's the most dangerous of them all.\
name ""
name "Luka"
>Eh...?@> Why...?\
name ""
lsp 700,":a;chara\witchs_st14.bmp",0,50:print 10,500
name "Succubus Witch"
>When high level monsters fall in love, the desire to mate with their love is intense...@
>Their hot passion burns seemingly endlessly, indulging in their man in an almost bottomless lust.\
>A normal man cannot tolerate that kind of desire.@
>Will they lose their mind, or perhaps die of weakness?\
>At the very least, they'll probably never walk again...\
name ""
name "Luka"
>Urhg...\
name ""
name "Succubus Witch"
>That's why many powerful monster clans have rules about only marrying men stronger than they are.\
>Because a weaker man will generally just die as they mate.@
>Due to that, it's difficult for a marriage of love to ever work out.\
>But the foolproof way to protect yourself is to...@
lsp 700,":a;chara\witchs_st13.bmp",0,50:print 10,500
>Live here instead.\
name ""
name "Luka"
>N...No thanks... I'll be careful...\
name ""
>I'm not sure what I should be careful about, though...@
>I'll keep that in mind, though.\
cspl 3,7
csp 611
cspl 699,705
goto *city24_main



*city24_10

bg "bg\bg151.bmp",7,1000
lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Shopkeeper"
>All during that "Purple Sabbath" I was raped over and over...@
>I... I...@>Ahhhh! Waaah!\
name ""
name "Luka"
>P...Please cheer up...\
name ""
name "Shopkeeper"
>I loved it!@>I'm so happy... I... I can't stop the tears!\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg103.bmp",7,1000
goto *city24_main



*city24_11

bg "bg\bg156.bmp",7,1000
gosub *setwindow_01
name "Luka"
>Eh...?@> There's no priest...?\
name ""
>Oh, there's a note on the desk...\
>"The Church is closed.@> The priest has retired and taken a new career as a domestic animal."\
name "Luka"
>................\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg103.bmp",7,1000
goto *city24_main



*city24_12

gosub *setwindow_01p
>I stop in front of the bar as I walk by.@
>It seems like something strange is happening inside...\
name "Succubus A"
>Haha, you love this, don't you!?@
>Come as much as you want!\
name ""
name "Male Voice A"
>Ahhhhhh!!\
name ""
name "Succubus B"
>If I pump you like this...@
>You can't endure it, right!?\
name ""
name "Male Voice B"
>Ahhhhhhh!!\
name ""
name "Luka"
>...........\
name ""
>I slowly back away from the bar, without going inside.\
cspl 3,7
csp 611
cspl 699,705
goto *city24_main



*city24_13

bg "bg\bg106.bmp",7,1000
lsp 700,":a;chara\succubus_st01.bmp",0,50:print 10,500
gosub *setwindow_01
name "Village Chief"
>Oh, welcome.@
>We've been flooded with immigrant applications from all over the world.\
>Hehe... It's an all you can eat buffet...\
name ""
name "Luka"
>Uhm... Nobody is dying, right...?\
name ""
name "Village Chief"
>Of course, we would never allow that.@
>We simply squeeze them right to the edge.@>Slowly...@>Carefully...\
>Stroking...@>Milking...\
name ""
name "Luka"
>..............\
name ""
name "Village Chief"
>Why don't you join them for a little while, too?@
>I'm sure you've built up a large supply of semen during your long journey.@> How about we milk it all out for you?\
name ""
name "Luka"
>N...No thanks!\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg103.bmp",7,1000
goto *city24_main



*city24_14

bg "bg\bg110.bmp",7,1000
lsp 700,":a;chara\lilith_st01.bmp",138,0:print 10,500
gosub *setwindow_01
name "Lilith"
>All of the love that Alice the Eighth had 500 years ago...@
>That hateful Hero destroyed it.\
name ""
name "Lilim"
>Not just us, but Her Majesty as well...@
>Sister, I hate that Hero...\
name ""
name "Luka"
>Uhm... The name of that Hero...@
>Do you know what it was...?\
name ""
name "Lilith"
>I don't want to remember his name.@
>But his energy did look quite delicious...\
name ""
name "Lilim"
>Just like yours.@> Teehee.\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg103.bmp",7,1000
goto *city24_main



*city25_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
strsp 601,"Lady on a Stroll",95,160,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 601,601
strsp 602,"Umbrella Lady",95,190,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 602,602
if %hanyo1=0 lsp 603,":s/20,20,0;#FFFFFF#FF4444Maid-Like Woman ",95,220:spbtn 603,603
if %hanyo1=1 lsp 603,":s/20,20,0;#bbbbbbMaid-Like Woman ",95,220
if %hanyo2=0 lsp 604,":s/20,20,0;#FFFFFF#FF4444Refined Girl ",95,250:spbtn 604,604
if %hanyo2=1 lsp 604,":s/20,20,0;#bbbbbbRefined Girl ",95,250
strsp 605,"Female Adventurer",95,280,10,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 605,605
if %hanyo1+%hanyo2=2 strsp 610,"Lord's Mansion",410,160,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
if %hanyo1+%hanyo2<2 strsp 610,"Lord's Mansion",410,160,8,1,20,20,0,0,1,1,#bbbbbb
lsp 619,":s/20,20,0;#bbbbbbLeave ",410,400
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city25_main
if %cmd1=-1 gosub *menu:goto *city25_main
cspl 600,699
if %cmd1=601 goto *city25_01
if %cmd1=602 goto *city25_02
if %cmd1=603 goto *city25_03
if %cmd1=604 goto *city25_04
if %cmd1=605 goto *city25_05
if %cmd1=610 return
goto *city25_main



*city25_01

lsp 700,":a;chara\madaminsect_st11.bmp",0,0:print 10,500
gosub *setwindow_01
name "Lady on a Stroll"
>Oh my... A traveler?@
>This is a wonderful village for just relaxing.@
>Please enjoy your stay here, and may the fatigue from your travels melt away.\
name ""
name "Luka"
>Excuse me, I'd like to ask you something...@
>Have any other male travelers visited this village recently?\
name ""
name "Lady on a Stroll"
>Of course... This is an open village, after all.@
>Though most of them seem to leave right away.\
>Is there something wrong?\
name ""
name "Luka"
>No...\
name ""
>So are they being attacked after they leave...?\
cspl 3,7
csp 611
cspl 699,705
goto *city25_main



*city25_02

lsp 700,":a;chara\madamumbrella_st11.bmp",0,0:print 10,500
gosub *setwindow_01
name "Umbrella Lady"
>Oh my, how rare.@> A traveler?@
>Even more, such a young boy, too!\
name ""
>The lady carefully sizes me up, head to toe.@
>Her gaze is sort of uncomfortable...\
name "Luka"
>Excuse me, I'd like to ask you something...@
>Have any other male travelers visited this village recently?\
name ""
name "Umbrella Lady"
>My, not that I've seen.@
>Not many travelers would choose to come to such a remote region as this.\
name ""
name "Luka"
>I...Is that so...?\
name ""
>Nobody is coming here in the first place?@
>Does that mean they're being attacked before they get here?\
cspl 3,7
csp 611
cspl 699,705
goto *city25_main



*city25_03

lsp 700,":a;chara\maidscyulla_st11.bmp",0,0:print 10,500
gosub *setwindow_01
name "Maid"
>My name is Ran.@>I'm a maid that serves the Lord here, Cassandra.\
name "Ran"
>I'm currently shopping in preparation for tonight's meal...@
>Did you need something from me?\
name ""
name "Luka"
>Excuse me, I'd like to ask you something...\
name ""
name "Ran"
>I'm sorry, but I must be going.@
>I can't neglect my Master's order.\
name ""
>Saying that, the maid named Ran quickly hurries off.\
mov %hanyo1,1
cspl 3,7
csp 611
cspl 699,705
goto *city25_main



*city25_04

lsp 700,":a;chara\emily_st23.bmp",0,0:print 10,500
gosub *setwindow_01
name "Refined Girl"
>How rude.@
>Introduce yourself before approaching me out of nowhere!\
name ""
name "Luka"
>...Sorry.\
name ""
>I step back at her harsh scolding.\
name "Luka"
>I'm the Hero Apprentice Luka.@
>Err... Who are you?\
name ""
lsp 700,":a;chara\emily_st21.bmp",0,0:print 10,500
name "Refined Girl"
>I'm Emily, Lord Cassandra's only daughter.@
name "Emily"
>Did you come to meet my mother as well?\
name ""
name "Luka"
>Before that, I'd like to ask you something.@
>It's about the rumors going around about this village...\
name ""
lsp 700,":a;chara\emily_st22.bmp",0,0:print 10,500
name "Emily"
>Ah, that stupid rumor?@
>Something about male travelers never returning, or something?\
name ""
name "Luka"
>...You've heard of it?\
name ""
name "Emily"
>Wahaha!@>You believed it, and came all the way here!?@
>What a stupid urban legend!\
name ""
>The girl loudly laughs.@
>Urban legend...?@> So it was just a rumor after all?\
lsp 700,":a;chara\emily_st21.bmp",0,0:print 10,500
name "Emily"
>Since you came all this way, do you want to meet with mother?@
>I feel sorry for you, having wasted all that effort traveling here on a wild goose chase.\
name ""
name "Luka"
>Oh... That would be good...\
name ""
name "Emily"
>Alright then, follow Emily!\
name ""
dwave 1,"se\asioto1.ogg"
csp 700:print 10,500
>Emily says that, then runs off.\
>...So it wasn't true after all?@
>Might as well ask the Lord since she offered.\
mov %hanyo2,1
cspl 3,7
csp 611
cspl 699,705
goto *city25_main



*city25_05

lsp 700,":a;chara\mob_sensi3.bmp",0,0:print 10,500
gosub *setwindow_01
name "Female Adventurer"
>I came here because of that strange rumor going around, but there doesn't seem to be anything strange going on here.@
>It just seems like a country resort for rich women to laze around in.\
>I wish I could settle down in a place like this and just lounge around, too...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city25_main



*city26_main0

mov %genzaiti,19
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\asioto2.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg119.bmp",7,1500
bgm "bgm\gordport.ogg"
goto *city26_main



*city26_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Youth ",95,160:spbtn 601,601
strsp 602,"City Girl",95,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 602,602
strsp 603,"Mysterious Woman",95,220,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Ruffian ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Hunter ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Soldier ",95,310:spbtn 606,606
if %ivent06=1 && %check03<3 lsp 607,":s/20,20,0;#FFFFFF#FF4444Officer ",95,340:spbtn 607,607
strsp 610,"Weapon Shop",410,160,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
strsp 611,"Tool Shop",410,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Lottery ",410,220:spbtn 612,612
lsp 613,":s/20,20,0;#FFFFFF#FF4444Ilias Kreuz HQ ",410,250:spbtn 613,613
lsp 614,":s/20,20,0;#FFFFFF#FF4444Port ",410,280:spbtn 614,614
strsp 615,"Hero's Shrine",410,310,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 615,615
if %check03=0 lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
if %check03=1 lsp 619,":s/20,20,0;#bbbbbbLeave ",410,400
if %check03=2 && %hanyo2+%hanyo3=2 lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
if %check03=2 && %hanyo2+%hanyo3<2 lsp 619,":s/20,20,0;#bbbbbbLeave ",410,400
if %check03=3 lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city26_main
if %cmd1=-1 gosub *menu:goto *city26_main
cspl 600,699
if %cmd1=601 goto *city26_01
if %cmd1=602 goto *city26_02
if %cmd1=603 && %check03<2 goto *city26_03a
if %cmd1=603 && %check03=2 && %hanyo1=0 goto *city26_03a
if %cmd1=603 && %check03=2 && %hanyo1=1 goto *city26_03b
if %cmd1=603 && %check03=3 return *sean0262
if %cmd1=604 goto *city26_04
if %cmd1=605 goto *city26_05
if %cmd1=606 goto *city26_06
if %cmd1=607 && %check03<2 goto *city26_07a
if %cmd1=607 && %check03=2 goto *city26_07b
if %cmd1=610 goto *city26_10
if %cmd1=611 goto *city26_11
if %cmd1=612 goto *city26_12
if %cmd1=613 goto *city26_13
if %cmd1=614 && %check03=0 goto *city26_14a
if %cmd1=614 && %check03=1 return
if %cmd1=614 && %check03=2 goto *city26_14b
if %cmd1=614 && %check03=3 goto *city26_14c
if %cmd1=615 && %item17=1 goto *city26_15c
if %cmd1=615 && %check05=0 goto *city26_15a
if %cmd1=615 && %check05=1 && %item12=2 && %item13=3 && %item18=1 goto *city26_15b
if %cmd1=615 goto *city26_15a
if %cmd1=619 return
goto *city26_main



*city26_01

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Youth"
>Hey traveler, welcome to Gold Port!\
>Our town has a bad reputation as a place for lowlifes...@
>But it's actually a nice place!\
>Since we're open to all people, lots of thugs and lowlifes seem to have flocked here, though...@
>Of course, we won't accept monsters.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city26_main



*city26_02

lsp 700,":a;chara\mob_musume1.bmp",175,0:print 10,500
gosub *setwindow_01
name "City Girl"
>I immigrated here from Grangold.@
>There were too many Ant Girls back there...\
>I can't calm down when I'm near monsters.@
>Every time they were near me, I just got the chills...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city26_main



*city26_03a

lsp 700,":a;chara\serene_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Woman"
>You seem to be quite skilled.@
>Could I ask a favor of you...?\
name ""
name "Luka"
>If it's something I can do...\
name ""
name "Woman"
>...Ah, there's an ill wind blowing today.@
>Maybe some other time.\
name ""
name "Luka"
>O...Ok...\
name ""
>What the heck was that?@
>What a strange woman...\
cspl 3,7
csp 611
cspl 699,705
goto *city26_main



*city26_03b

lsp 700,":a;chara\serene_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Woman"
>You've heard of Captain Selene, haven't you?@
>Are you interested in learning more about that legendary pirate?\
name ""
name "Luka"
>Err, I'm looking for the Purple Orb...\
name ""
name "Woman"
>Purple Orb...@>That's the treasure that Captain Selene loved the most.@
>Even on her last voyage, she never let it leave her side.\
name ""
name "Luka"
>Do you know something about it by any chance...?\
name ""
name "Woman"
>Hmm... Give me a little time, then come back to see me.@
>I have some preparations to make...\
name ""
name "Luka"
>O...Ok...\
name ""
>...I knew it, there's something really strange about this woman.\
>But it looks like she knows something about Captain Selene...@
>I should visit her again.\
mov %hanyo3,1
cspl 3,7
csp 611
cspl 699,705
goto *city26_main



*city26_04

lsp 700,":a;chara\mob_seinen2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Ruffian"
>I used to be part of Ilias Kreuz, but I fell out with them.@
>They got kind of... Ya know...\
>Before with Marcellus leading us, his whole mantra and method resonated with me, ya know?\
>But now, Lazarus...@
>He's kind of crazy.\
>He just throws bombs all over the place, whether there are humans there or not.@
>Me and a lot of other guys just couldn't deal with that.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city26_main



*city26_05

lsp 700,":a;chara\mob_gorotuki1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Hunter"
>Despite how I look, I'm a famous treasure hunter.\
>Gold Port here was a stronghold for the famous pirate Captain Selene.@
>I'm looking for documents or maps with any information about any possible treasure she left behind...\
>...But as I thought, it isn't easy at all.@
>Even her ship's log is a priceless treasure, I can't imagine how much any of her actual treasure would be worth...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city26_main



*city26_06

lsp 700,":a;chara\mob_sensi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier"
>The monsters around here are really strong.@
>I guess that's to be expected, since we're so close to that dangerous continent.\
>It takes everything I got just to run away when I see a monster.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city26_main



*city26_07a

lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Officer"
>I'm the resident naval officer for Gold Port.@
>I got an urgent request to search for someone from a higher up.\
>"Look for the daughter of a noble" he said.@
>Didn't say where from, nor who I'm even looking for.\
>Apparently it's a state secret that she's gone, or something.@
>How the hell do they expect me to find someone without any information...?\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city26_main



*city26_07b

lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Sabasa Officer"
>Ah, the height of the one I'm looking for!@
>Would you happen to be Sir Luka?\
name ""
name "Luka"
>Th...That's me...\
name ""
>Why was he looking for me...?\
name "Sabasa Officer"
>Yes!@> I found you at last!@
>Something horrible has happened in Sabasa!\
>Princess Sara has been kidnapped by monsters!\
name ""
name "Luka"
>Ehh!?\
name ""
>Again, Sara...?@
>Did she run away again?\
name "Luka"
>What happened?\
name ""
name "Sabasa Officer"
>I was just dispatched to locate either you or Sara.@
>I wasn't given any more details from the King than that.\
name ""
name "Luka"
>I...I see... Ok...\
name ""
name "Sabasa Officer"
>Please, save Sara!@
>I'll return and report that I made contact with you, Sir Luka!\
>...Farewell!\
name ""
dwave 1,"se\asioto1.ogg"
csp 700:print 10,500
>The officer runs off.\
name "Luka"
>What is she doing this time?@
>Did she run away from the castle to chase after Granberia?\
name ""
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
name "Alice"
>...How stupid, just forget it.\
name ""
name "Luka"
>Even if you say that, what if she really was kidnapped by a monster...?@
>Maybe I should visit Sabasa to find out more...\
name ""
>I need to hurry to the Monster Lord's castle...@
>But I can't just ignore a request from the Sabasa King.\
mov %hanyo2,1
cspl 3,7
csp 611
cspl 699,705
goto *city26_main



*city26_10

bg "bg\bg152.bmp",7,1000
lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Weapon Shop Owner"
>Welcome!@
>I'm the weapon shop closest to the final area, so I naturally have the highest quality goods!\
name ""
name "Luka"
>...............\
name ""
>I take a quick look over the weapons, but nothing is better than what I have.@
>There can't possibly be a better weapon than Angel Halo for me, and I like this Enrikan Shirt.\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg119.bmp",7,1000
goto *city26_main



*city26_11

bg "bg\bg154.bmp",7,1000
lsp 700,":a;chara\mob_ozisan2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Shopkeeper"
>This town is full of treasure hunters, so I deal mostly in buying treasure.\
>So if you got some treasure to sell, bring it here.\
name ""
name "Luka"
>I don't have anything at the moment...\
name ""
if %item13=1 skip 6
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg119.bmp",7,1000
goto *city26_main
name "Shopkeeper"
>Oh... What about that lamp there?@
>Could I buy that?\
name ""
name "Luka"
>Eh...?@> This?\
name ""
>This is that lamp with the monster in it.@
>I've been carrying it around for a while, but...\
name "Luka"
>This lamp has a monster inside of it.@
>It's too dangerous to let go of...\
name ""
name "Shopkeeper"
>I know how to handle those types of things.@
>Won't you let me buy it?\
name ""
name "Luka"
>Alright then...\
name ""
mov %item13,0
>Thus, I sell the lamp to the shopkeeper.\
name "Shopkeeper"
>Here you are, 3500G!@
>I also threw in a lottery ticket.\
name ""
name "Luka"
>Ah... Thanks...\
name ""
mov %item13,2
>A large amount of money and a Lottery Ticket was obtained!\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg119.bmp",7,1000
goto *city26_main



*city26_12

lsp 700,":a;chara\mob_musume1.bmp",175,0:print 10,500
gosub *setwindow_01
name "Lottery Girl"
>If you have a ticket... @
>This is where you play! \
name ""
if %item13=2 skip 6
>Lottery Ticket...? I don't have one.\
cspl 3,7
csp 611
cspl 699,705
goto *city26_main
>Lottery Ticket...? Ah, that's right, I got one from selling that lamp.@
>Should I give it a try?\
name "Luka"
>I have one, I'll give it a try.\
name ""
name "Lottery Girl"
>Cooooming up!\
name ""
>I turn the wheel holding lots of multicolored balls.@
>I'm not expecting much...@>But a golden ball pops out!\
name "Lottery Girl"
>Waah!@>First prize!@
>You won the Jewel of Fortune!\
name ""
name "Luka"
>Eh!?\
name ""
>The girl hands me a beautiful jewel.\
dwave 1,"se\fanfale.ogg"
mov %item13,3
>Jewel of Fortune obtained!\
name "Luka"
>I...I won something?@
>But what does this Jewel do?\
name ""
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>It feels like it was filled with the power of luck at one point, but it's almost all gone.@
>It isn't that useful of an item.\
lsp 700,":a;chara\alice_st14b.bmp",67,0:print 10,500
>You lost out, Luka.@>If you got fifth place, you could have gotten that Yamatai rice cracker set...\
name ""
>Yeah, right.@> Like she would have given me the chance to eat those myself.@>At least this way I actually get something.\
cspl 3,7
csp 611
cspl 699,705
goto *city26_main



*city26_13

bg "bg\bg117.bmp",7,1000
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
gosub *setwindow_01
name "Alice"
>Hmm... Is this a church?@
>I smell something unpleasant...\
name ""
name "Luka"
>This is Ilias Kreuz's headquarters.\
name ""
>The group formed by my father, Lazarus and friends...@
>This is their base.\
name "Alice"
>This isn't a nice place to be.@
>Do you have a reason to be here?\
name ""
name "Luka"
>No, not really...\
name ""
>I don't want to be here either.@
>We hurry away.\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg119.bmp",7,1000
goto *city26_main



*city26_14a

bg "bg\bg118.bmp",7,1000
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
gosub *setwindow_01
name "Alice"
>You haven't even gotten Salamander's power yet, and you want to go to the next continent?@
>Are you suicidal?\
name ""
name "Luka"
>Th...That's right...\
name ""
>I need all four spirits before I could hope to survive there.@
>I leave the port.\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg119.bmp",7,1000
goto *city26_main



*city26_14b

bg "bg\bg118.bmp",7,1000
gosub *setwindow_01
name "Luka"
>Excuse me... Do you know Captain Selene?\
name ""
lsp 700,":a;chara\mob_sentyou.bmp",0,0:print 10,500
name "Captain"
>Hmmm?@>You after treasure?\
name ""
name "Luka"
>Yes, sort of.@
>I want to know where Captain Selene's ship sank...\
name ""
name "Captain"
>So would all of the treasure hunters of the world.@
>It's still sitting at the bottom of the sea somewhere, waiting for someone to find it.\
name ""
name "Luka"
>..............\
name ""
>I get the feeling that this Captain was a treasure hunter once.@
>He seems pretty enthusiastic...\
name "Captain"
>But still... There's a rumor going around about how her ship never actually sank.\
>Captain Selene's ship is still sailing round the seas, the wood slowly decaying as it journeys on...\
name ""
lsp 700,":a;chara\mob_sentyou.bmp",-160,0
lsp 701,":a;chara\mob_hunanori.bmp",160,0:print 10,500
name "Sailor A"
>About that... I've actually seen a ghost ship like that.\
name ""
>A sailor from another ship pipes into our conversation.\
name "Sailor A"
>It was around last year... I had the night watch.@
>A ship in tatters was sailing by off in the distance...\
>And flapping off the mast...@> Was the black flag of Captain Selene!@
>Nobody believed me at the time, though...\
name ""
lsp 700,":a;chara\mob_sentyou.bmp",-220,0
lsp 701,":a;chara\mob_hunanori.bmp",0,0
lsp 702,":a;chara\mob_hunanori.bmp",220,0:print 10,500
name "Sailor B"
>That crap again?@> You were half asleep, man.\
name ""
name "Sailor A"
>Shut up!@> I saw it!\
name ""
lsp 700,":a;chara\mob_hunanori.bmp",-220,0
lsp 701,":a;chara\mob_hunanori.bmp",0,0
lsp 702,":a;chara\mob_hunanori.bmp",220,0:print 10,500
name "Sailor C"
>Actually, I saw it once too...\
name ""
name "Sailor D"
>Ah shut it.@>You were just freaking out and thought that little fishing boat was more than it was.\
name ""
name "Sailor C"
>The hell was that, you punk!?@>How about my fists let you show how "freaked out" I was!\
name ""
>More and more sailors start gathering around.@>Uh oh, I think this might turn into a brawl soon...\
name "Luka"
>E...Excuse me...\
name ""
name "Sailor B"
>I know it exists!@
>Captain Selene's ship is still sailing on the seas!\
name ""
name "Sailor E"
>I bet ya Captain Selene was seduced by them Sirens.@
>I heard they were in the western sea, where she was heading off to.\
name ""
name "Sailor A"
>They don't exist, you idiot.@
>Besides, someone like Captain Selene would have counter-measures for things like that.\
name ""
name "Luka"
>I guess I'll be going now...\
name ""
>The sailors continue to yell at each other about random legendary creatures and ghost ships as I slip away.\
>I did find out one thing, though.\
>Even after all this time, the legend around Captain Selene is enough to get men of the sea fired up.\
>Perhaps I should talk to the people around town some more...\
mov %hanyo1,1
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg119.bmp",7,1000
goto *city26_main



*city26_14c

bg "bg\bg118.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_sentyou.bmp",0,0:print 10,500
name "Captain"
>Should I head out to search for treasure...?@
>The sea is calling me...\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg119.bmp",7,1000
goto *city26_main



*city26_15a

bg "bg\bg092.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_sinkan.bmp",-220,0
lsp 701,":a;chara\mob_sinkan.bmp",0,0
lsp 702,":a;chara\mob_sinkan.bmp",220,0:print 10,500
name "Sage A"
>This is a shrine for Heroes!\
name ""
name "Sage B"
>And we are the three sages!\
name ""
name "Sage C"
>We stay here and give a trial for Heroes!\
name ""
name "Luka"
>Th...This shrine is pretty small...\
name ""
>That reminds me, the San Ilia King mentioned the three sages, and passing their trial or something...\
>So this is where they are?@
>I kind of expected them to be in something more grand... Not this dinky little shrine in a port town.\
name "Sage A"
>Oh, Hero!@>Bring me the Jewel of Victory!\
name ""
name "Sage B"
>Then I want the Jewel of Fortune!\
name ""
name "Sage C"
>I wish for the Jewel of Friendship!\
name ""
name "Three Sages"
>Hero, give us expensive jewels!\
name ""
name "Luka"
>..............\
name ""
>Alice already destroyed that sword, so there's no reason for me to bother with them.\
>Thank you, Alice...\
mov %check05,1
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg119.bmp",7,1000
goto *city26_main



*city26_15b

bg "bg\bg092.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_sinkan.bmp",-220,0
lsp 701,":a;chara\mob_sinkan.bmp",0,0
lsp 702,":a;chara\mob_sinkan.bmp",220,0:print 10,500
name "Sage A"
>Oooohhh!@> This is it, the Jewel of Victory!\
name ""
name "Sage B"
>What great fortune!\
name ""
name "Sage C"
>This... This feeling of friendship!@>It's overflowing!!!\
name ""
name "Luka"
>Uhm... I don't want to give them to you.@
>These are important to me...\
name ""
>That Jewel of Friendship most of all.@
>I got it from that Nekomata and Fairy, I would never hand it over to these smelly old men.\
name "Sage A"
>You did it!\
name ""
name "Sage B"
>I...It's not like we were going to sell them or anything!\
name ""
name "Sage C"
>Yes, we are sages, not crooks!@> Ha. ha. ha.\
name ""
name "Three Sages"
>Yes, you are a true Hero!@
>Take this to show all that you have the Three Sage's blessing!\
name ""
>The three sages hold out a huge gold medal.\
dwave 1,"se\fanfale.ogg"
mov %item17,1
mov %yuusyaakasi,1
>Hero's Proof obtained!\
name "Luka"
>Uhm... I'm not a real Hero...@
>I'm not baptized, either...\
name ""
name "Sage A"
>M...My word!\
name ""
name "Sage B"
>How could we have handed the proof of a Hero to someone who wasn't a Hero!?\
name ""
name "Sage C"
>I DIDN'T HEAR ANYTHING, DID YOU GUYS!?\
name ""
name "Sage A"
>I SAW NOTHING!\
name ""
name "Sage B"
>I HEARD NOTHING!\
name ""
name "Sage C"
>I SPOKE NOTHING!\
name ""
name "Three Sages"
>THE THREE SAGES HAVE FORGOTTEN THE LAST THREE MINUTES!\
name ""
name "Luka"
>...............\
name ""
cspl 701,702
lsp 700,":a;chara\alice_st11b.bmp",67,0:print 10,500
name "Alice"
>Oho?@> Was that your faith I heard crumbling?\
name ""
name "Luka"
>That aside...@>I don't know what to think at the moment.@
>I would have leaped for joy to get this proof of a Hero a while ago.\
name ""
>I turn over the golden medal in my hand.@
>It's the "Proof of a Hero" from the three sages, but what exactly does it prove?\
lsp 700,":a;chara\alice_st12b.bmp",67,0:print 10,500
name "Alice"
>Hmm... It looks like you're still changing.@
>Are you almost done playing Hero?\
name ""
name "Luka"
>...Who knows.@
>I'm me, and I'll do what I need to do.\
name ""
>Some little medal doesn't prove who I am.@
>I leave the shrine with the determination to stay true to myself.\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg119.bmp",7,1000
goto *city26_main



*city26_15c

bg "bg\bg092.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_sinkan.bmp",-220,0
lsp 701,":a;chara\mob_sinkan.bmp",0,0
lsp 702,":a;chara\mob_sinkan.bmp",220,0:print 10,500
name "Sage A"
>Oh, Hero!@>We are the three sages!\
name ""
name "Sage B"
>Today's music day, so we brought our flutes and drums to the shrine!\
name ""
name "Sage C"
>We're also registered as qualified midwives, so if you know someone giving birth, send them our way.\
name ""
name "Luka"
>.............\
name ""
>I don't want people like this to show me the path of a Hero.@
>Thank you, Alice.@>Thank you so much...\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg119.bmp",7,1000
goto *city26_main



*map6

saveoff
textoff
csp -1
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
bg "bg\map0.bmp",10,1000
goto *map6_2



*map6_2

if %item07=0 strsp 604,"Port Natalia",490,250,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 604,14
if %item07=0 strsp 608,"Req. Level: 46",480,270,8,1,20,20,0,0,1,1,#FFFFFF
if %item09=0 strsp 605,"Gold Port",365,110,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 605,15
if %item09=0 strsp 609,"Req. Level: 48",340,130,8,1,20,20,0,0,1,1,#FFFFFF
if %ivent06=1 && %ivent14=0 strsp 606,"Sabasa Castle",185,230,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 606,16
if %ivent06=1 && %ivent14=0 strsp 610,"Req. Level: 49",180,250,8,1,20,20,0,0,1,1,#FFFFFF
lsp 607,":s/20,20,0;#FFFFFF#FF4444Shrine ",230,120:spbtn 607,17
print 1
btnwait2 %cmd1
if %cmd1=0 goto *map6_2
if %cmd1=-1 gosub *menu:goto *map6_2
csp -1
btndef clear
if %cmd1=14 && %ivent04=0 goto *sean0252
if %cmd1=14 && %ivent04=1 goto *sean0253
if %cmd1=15 gosub *city26_main0:dwave 1,"se\asioto2.ogg":bg black,7,1500:bgm "bgm\field3.ogg":goto *map6
if %cmd1=16 goto *sean0267
if %cmd1=17 && %item02+%item05+%item06+%item08+%item09<5 goto *sean0275
if %cmd1=17 && %item02+%item05+%item06+%item08+%item09=5 goto *sean0276
goto *map6_2



*map7

saveoff
textoff
csp -1
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
bg "bg\map6.bmp",10,1000
goto *map7_2



*map7_2

lsp 601,":s/20,20,0;#FFFFFF#FF4444Remina ",200,290:spbtn 601,11
if %ivent15=0 strsp 604,"Req. Level: 54",160,310,8,1,20,20,0,0,1,1,#FFFFFF
if %ivent15=1 lsp 604,":s/20,20,0;#FFFFFFDone ",210,310
strsp 602,"Sealed Sinner's Prison",490,300,12,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 602,12
if %ivent16=0 strsp 605,"Req. Level: 56",530,320,8,1,20,20,0,0,1,1,#FFFFFF
if %ivent16=1 lsp 605,":s/20,20,0;#FFFFFFDone ",580,320
strsp 603,"Monster Lord's Castle",305,260,12,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,13
strsp 606,"Req. Level: 57",340,280,8,1,20,20,0,0,1,1,#FFFFFF
print 1
btnwait2 %cmd1
if %cmd1=0 goto *map7_2
if %cmd1=-1 gosub *menu:goto *map7_2
csp -1
btndef clear
if %cmd1=11 && %ivent15=0 goto *sean0283
if %cmd1=11 && %ivent15=1 goto *sean0287
if %cmd1=12 && %ivent16=0 goto *sean0288
if %cmd1=12 && %ivent16=1 goto *sean0290
if %cmd1=13 goto *sean0291
goto *map7_2



*map8

saveoff
textoff
csp -1
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
bg "bg\map1.bmp",10,1000
goto *map8_2



*map8_2

lsp 605,":s/20,20,0;#FFFFFF#FF4444Enrika ",260,400:spbtn 605,15
if %ivent01>0 lsp 601,":s/20,20,0;#FFFFFF#FF4444Iliasburg ",395,270:spbtn 601,11
if %ivent01=1 strsp 607,"Req. Level: 68",370,290,8,1,20,20,0,0,1,1,#FFFFFF
if %ivent01=2 lsp 607,":s/20,20,0;#FFFFFFDone ",420,290
if %ivent02>0 lsp 604,":s/20,20,0;#FFFFFF#FF4444Happiness Village ",615,180:spbtn 604,14
if %ivent02=1 strsp 609,"Req. Level: 68",630,200,8,1,20,20,0,0,1,1,#FFFFFF
if %ivent02=2 lsp 609,":s/20,20,0;#FFFFFFDone ",680,200
strsp 602,"North to Sentora",240,40,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 602,12
strsp 608,"Req. Level: 69",250,60,8,1,20,20,0,0,1,1,#FFFFFF
print 1
btnwait2 %cmd1
if %cmd1=0 goto *map8_2
if %cmd1=-1 gosub *menu:goto *map8_2
csp -1
btndef clear
if %cmd1=15 gosub *city31_main0:dwave 1,"se\habataki.ogg":bg black,7,1500:bgm "bgm\field4.ogg":goto *map8
if %cmd1=11 && %ivent01=1 goto *sean0316
if %cmd1=11 && %ivent01=2 gosub *city32_main0:dwave 1,"se\habataki.ogg":bg black,7,1500:bgm "bgm\field4.ogg":goto *map8
if %cmd1=14 && %ivent02=1 goto *sean0319
if %cmd1=14 && %ivent02=2 gosub *city33_main0:dwave 1,"se\habataki.ogg":bg black,7,1500:bgm "bgm\field4.ogg":goto *map8
if %cmd1=12 goto *sean0322
goto *map8_2



*city31_main0

saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\habataki.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg029.bmp",7,1500
bgm "bgm\enrika.ogg"
goto *city31_main



*city31_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Betty ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Boy ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Man ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Girl ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Old Man ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Soldier ",95,310:spbtn 606,606
strsp 607,"Temple Soldier",95,340,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 607,607
lsp 608,":s/20,20,0;#FFFFFF#FF4444Elf ",95,370:spbtn 608,608
strsp 609,"Dark Elf",95,400,5,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 609,609
lsp 610,":s/20,20,0;#FFFFFF#FF4444Hospital ",410,160:spbtn 610,610
strsp 611,"Tool Shop",410,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Micaela's House ",410,220:spbtn 612,612
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city31_main
if %cmd1=-1 gosub *menu:goto *city31_main
cspl 600,699
if %cmd1=601 goto *city31_01
if %cmd1=602 goto *city31_02
if %cmd1=603 goto *city31_03
if %cmd1=604 goto *city31_04
if %cmd1=605 goto *city31_05
if %cmd1=606 goto *city31_06
if %cmd1=607 goto *city31_07
if %cmd1=608 goto *city31_08
if %cmd1=609 goto *city31_09
if %cmd1=610 goto *city31_10
if %cmd1=611 goto *city31_11
if %cmd1=612 goto *city31_12
if %cmd1=619 return
goto *city31_main



*city31_01

lsp 700,":a;chara\mob_obasan.bmp",0,0:print 10,500
gosub *setwindow_01
name "Betty"
>Who would have thought you'd fight your way here!@
>Did you beat the Monster Lord and make her your friend?\
name ""
name "Luka"
>It's a little difficult to explain it...@
>She did become my friend...\
>Come here Alice...@> Introduce yourself...\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\mob_obasan.bmp",160,0:print 10,500
name "Alice"
>Hello...@
lsp 700,":a;chara\alice_st73.bmp",-170,50:print 10,500
>...Ah!@> Don't treat me like a child!\
name ""
name "Betty"
>Have some candy, little girl.\
name ""
lsp 700,":a;chara\alice_st79.bmp",-170,50:print 10,500
name "Alice"
>Yay! \
name ""
>Alice starts happily licking the candy.@
>It's really easy to entice the Monster Lord, huh?\
csp 701
lsp 700,":a;chara\mob_obasan.bmp",0,0:print 10,500
name "Betty"
>But still, Luka...@
>Your presence has completely changed in such a short time.\
>For some reason, I have this bad feeling like you'll never come back home...\
name ""
name "Luka"
>You're just imagining things, Aunt Betty.@
>Once everything's over, I'll come back for sure.\
name ""
name "Betty"
>Little Monster Lord, I'm entrusting Luka to you.@
>Don't let him out of your sight, or he'll do something unreasonable...\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\mob_obasan.bmp",160,0:print 10,500
name "Alice"
>You can count on me.\
name ""
>Alice nods as she starts biting into the candy.\
name "Betty"
>Make sure you survive and come back, Luka.@
>We'll rebuild and bring Ilias Village back, I swear it.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city31_main



*city31_02

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Boy"
>Ohh! Luka, you came back safe and sound!@
>I still can't believe what happened at the village, but I'm glad you're safe!\
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\mob_seinen1.bmp",160,0:print 10,500
>By the way, who's that girl?\
name ""
name "Luka"
>Ah... Just, you know... Someone.\
name ""
name "Boy"
>Hey Luka, come here...@> You know, I've been keeping it from you for a while, but I'm actually totally into lolicon.@
>Wanna just, you know...@>Leave her with me for a bit?\
name ""
name "Luka"
>I will never leave her alone with you now.\
name ""
name "Boy"
>Hey, I've got some candy.\
name ""
lsp 700,":a;chara\alice_st79.bmp",-170,50:print 10,500
name "Alice"
>Yay! \
name ""
name "Luka"
>Alice... Don't take candy from strangers...\
name ""
name "Alice"
>Don't treat me like a child!@
>*Munch* *Munch*@>Mmmm! \
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city31_main



*city31_03

lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Man"
>H...How could it be...@> How could Ilias try to destroy us?@
>What's going to happen to the world!?\
>Luka... Please, save the world!@
>You're our only hope!\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city31_main



*city31_04

lsp 700,":a;chara\mob_syouzyo.bmp",0,0:print 10,500
gosub *setwindow_01
name "Girl"
>I was so scared...@
>Why are angels doing such horrible things to us?\
name ""
name "Luka"
>.............\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city31_main



*city31_05

lsp 700,":a;chara\mob_rouzin2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Old Man"
>This only happened because our faith in Ilias wasn't strong enough.@
>It's because of these no good youths of this generation!\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city31_main



*city31_06

lsp 700,":a;chara\mob_sensi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier"
>If I had even half of your power, I could have saved everyone...@
>Even Ronnie...@> Damn it! Right before my eyes...\
name ""
name "Luka"
>Ronnie...\
name ""
>He always joked that when I came back, his shop wouldn't be there anymore.@
>Of course, it was always related to him griping about the poor sales.\
>But to think it came true in such a horrible way...\
name "Soldier"
>Once we rebuild the village, we'll hold a memorial service for those who died.@
>Ronnie, please wait for a little longer...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city31_main



*city31_07

lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Temple Soldier"
>I couldn't do anything.@
>I wasn't even able to raise my spear in front of that angel.\
>Even though our attacks wouldn't have hit her anyway, it was still a complete destruction to our morale.\
>But as soldiers devoted to the Ilias Temple, what should we have done?@
>I still don't know...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city31_main



*city31_08

lsp 700,":a;chara\mob_elf1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Elf"
>With so many new humans, our village feels so cramped...@
>But of course, we won't drive anybody out.\
>We will welcome anyone here.@
>The last stronghold for those with no place to go.\
name ""
name "Luka"
>I never knew there was a hidden village of monsters so close.\
name ""
name "Elf"
>This village was populated by monsters that a certain Hero guided away.@
>I've never met him personally, but he was our biggest benefactor.\
>In some sick twist of fate, I heard he was killed by monsters...@
>I wanted to meet him just once, and give him my thanks.\
name ""
name "Luka"
>W...What was that Hero's name?\
name ""
name "Elf"
>I believe it was Marcellus.\
name ""
name "Luka"
>..........\
name ""
>So it was Dad after all.\
cspl 3,7
csp 611
cspl 700,705
goto *city31_main



*city31_09

lsp 700,":a;chara\delh_a_st01.bmp",100,-100:print 10,500
gosub *setwindow_01
name "Dark Elf"
>Master Micaela accepted me, even after I fell into darkness.@
>In repayment, I would gladly give my life defending this village!\
lsp 700,":a;chara\delh_a_st02.bmp",100,-100:print 10,500
>...By the way, doesn't "fell into darkness" sound a little erotic?\
name ""
name "Luka"
>Is that what's always going through your mind...?\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city31_main



*city31_10

bg "bg\bg166.bmp",7,1000
lsp 700,":a;chara\mob_seinen1.bmp",-170,0
lsp 701,":a;chara\mob_syouzyo.bmp",170,0:print 10,500
gosub *setwindow_01
name "Boy"
>Ahh... I...it hurts...\
name ""
name "Girl"
>Oww...\
name ""
>A medium sized building is full of the sounds of wounded.@
>Elves are moving around treating them all.\
lsp 700,":a;chara\mob_heisi1.bmp",-170,0
lsp 701,":a;chara\mob_mamono1.bmp",280,-50:print 10,500
name "Elf"
>Please, move your foot forward.@
>If we don't get this bandage on you soon, it might get worse.\
name ""
name "Temple Soldier"
>G...Gah... Who would ever accept help from a monster!?@
>Get away from me!\
name ""
>Someone yells out, refusing to be treated by monsters.@
>It must be a still pious follower of Ilias...\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg029.bmp",7,1000
goto *city31_main



*city31_11

bg "bg\bg151.bmp",7,1000
lsp 700,":a;chara\mob_elf2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Elf"
>I'm sorry, but the shop isn't open for business.@
>Right now our biggest concern is keeping our weapons ready to go at a moment's notice.\
>You're on some big mission, right?@
>We're all cheering for you, from the bottom of our hearts!\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg029.bmp",7,1000
goto *city31_main



*city31_12

bg "bg\bg167.bmp",7,1000
lsp 700,":a;chara\micaela_st11.bmp",70,0:print 10,500
gosub *setwindow_01
name "Micaela"
>We will take responsibility and protect the people of Ilias Village.@
>So do not worry about those here.\
>Right now, the world is under attack from Ilias' forces.@
>Please wield your sword, and save as many as possible...\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg029.bmp",7,1000
goto *city31_main



*city32_main0

saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\habataki.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg018.bmp",7,1500
bgm "bgm\city1.ogg"
goto *city32_main



*city32_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Boy ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Townie ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Prostitute ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Youth ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Old Woman ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Soldier A ",95,310:spbtn 606,606
lsp 607,":s/20,20,0;#FFFFFF#FF4444Soldier B ",95,340:spbtn 607,607
strsp 610,"Weapon Shop",410,160,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
strsp 611,"Tool Shop",410,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Church ",410,220:spbtn 612,612
strsp 613,"Sutherland Inn",410,250,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 613,613
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city32_main
if %cmd1=-1 gosub *menu:goto *city32_main
cspl 600,699
if %cmd1=601 goto *city32_01
if %cmd1=602 goto *city32_02
if %cmd1=603 goto *city32_03
if %cmd1=604 goto *city32_04
if %cmd1=605 goto *city32_05
if %cmd1=606 goto *city32_06
if %cmd1=607 goto *city32_07
if %cmd1=610 goto *city32_10
if %cmd1=611 goto *city32_11
if %cmd1=612 goto *city32_12
if %cmd1=613 goto *city32_13
if %cmd1=619 return
goto *city32_main



*city32_01

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Boy"
>Who would have thought angels would attack in addition to monsters!@
>I was so scared, I was trembling for hours.\
>My underwear is already soaked...@
>I think at this point its new color is yellow forever...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city32_main



*city32_02

lsp 700,":a;chara\mob_musume1.bmp",175,0:print 10,500
gosub *setwindow_01
name "Townie"
>Angels and monsters are attacking not only here, but all over the world.@
>Ahh... What's going to happen to the world?\
>That reminds me, Gobby went to make a delivery to Yamatai Village.@
>I'm so worried... I hope she wasn't attacked!\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city32_main



*city32_03

lsp 700,":a;chara\mob_musume2.bmp",175,0:print 10,500
gosub *setwindow_01
name "Prostitute"
>You did amazing, Hero!@
>Hehe... I'll make it extra cheap for you!\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\mob_musume2.bmp",335,0:print 10,500
name "Alice"
>............\
name ""
name "Prostitute"
>Oh my, excuse me.@>I didn't realize you were with your daughter.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city32_main



*city32_04

lsp 700,":a;chara\mob_seinen2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Youth"
>I felt so ashamed when I saw those three little girls fighting that monster with everything they had.\
>I also realized those three were fine citizens of Iliasburg.\
>I wonder if there's something I can do to help the town, too.@
>Perhaps they are short-handed somewhere?\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city32_main



*city32_05

lsp 700,":a;chara\mob_rouba.bmp",0,0:print 10,500
gosub *setwindow_01
name "Old Woman"
>I knew it, those fellows calling themselves "Heroes" were no good.@
>I've been fed up with those folks hanging off Ilias' name and calling themselves Heroes for no good reason!\
>...Oh, but you are a different story.@
>You're a true Hero, worthy of all the praise.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city32_main



*city32_06

lsp 700,":a;chara\mob_sensi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier A"
>A...Angels came to attack the town!@
>Just what is Ilias thinking?\
>Is it the wrath of Heaven coming down on me!?@
>Because my life is nothing but a pack of horrible, horrible lies!?\
>Ahh Ilias, forgive me!@> I'll stop lying!@>And picking on my little sister...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city32_main



*city32_07

lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier B"
>I challenged an enemy, too...@
>I was totally outclassed, and it was absolutely embarrassing.\
>But you were something else!@
>You're so young, too...@>Just how many battles have you been in already!?\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city32_main



*city32_10

bg "bg\bg152.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan1.bmp",-160,0
lsp 701,":a;chara\dragonp_st11.bmp",160,100:print 10,500
name "Shopkeeper"
>Pup has been so down since then...@
>She seems to have realized her weakness ever since losing to that tentacle monster.\
>I thought she did her best, and did a damn fine job of it.@
>After all, I was cowering under my desk the whole time...\
name ""
name "Dragon Pup"
>Ugaga... We're pathetic.@
>We couldn't protect the town...\
name ""
name "Luka"
>..........\
name ""
>I understand how frustrating that feeling of powerlessness is...@
>I'll leave them alone for now.\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg018.bmp",7,1000
goto *city32_main



*city32_11

bg "bg\bg151.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_seinen1.bmp",-160,0
lsp 701,":a;chara\vgirl_st11.bmp",160,100:print 10,500
name "Shopkeeper"
>Forgive me, I'm out of medicinal herbs.@
>...Oh, are you the Hero?\
>Would you be able to say something to this child?@
>She has been quite depressed for a while...\
name ""
name "Vampire Girl"
>I'm so weak...@
>I didn't have any strength to fight. I'm so pathetic...\
name ""
name "Luka"
>..........\
name ""
>I understand how frustrating that feeling of powerlessness is...@
>I'll leave her alone for now.\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg018.bmp",7,1000
goto *city32_main



*city32_12

bg "bg\bg153.bmp",7,1000
lsp 700,":a;chara\mob_sinkan.bmp",0,0:print 10,500
gosub *setwindow_01
name "Priest"
>That bitch!@>What kind of way is that for a god to act!?@
>I'll never believe anything about that whore again!\
>From now on, I'm starting down a new path!@> A path of violence!!@
>I will be a priest of corruption!@>Bound by no rules, leaving a path of horror in my wake!\
>Hahahahahahaha!\
name ""
name "Luka"
>P...Please calm down!\
name ""
>It seems like the priest broke...@
>This must have been absolutely crushing to those who devoted their lives to Ilias...\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg018.bmp",7,1000
goto *city32_main



*city32_13

bg "bg\bg016.bmp",7,1000
lsp 700,":a;chara\mob_obasan.bmp",0,0:print 10,500
gosub *setwindow_01
name "Owner"
>I thought that Ilias was suspicious for a while now.@
>We'd always be forced to give huge discounts to Heroes, and it always made us lose a lot of money.\
>Lots of merchants disliked Ilias because of that, from a long time ago.@
>We kept it quiet before due to backlash, but now we can be open about it.\
name ""
name "Luka"
>I...Is that so?\
name ""
>It seems like the merchants never trusted her to begin with.@
>The merchants seem to have taken this the lightest out of everyone.\
name "Owner"
>I hope you're able to smack that Ilias around a bit soon!\
name ""
name "Luka"
>Yes... I'll do my best.\
name ""
lsp 700,":a;chara\mob_obasan.bmp",-160,0
lsp 701,":a;chara\pramia_st11.bmp",160,100:print 10,500
name "Owner"
>That reminds me, Lammy here has been down ever since then.@
>Could you talk to her?@> Maybe find some way to cheer her up?\
name ""
name "Tiny Lamia"
>I'm so annoyed...@
>I'm so pathetic...\
name ""
name "Luka"
>.............\
name ""
>I understand how frustrating that feeling of powerlessness is...@
>I'll leave her alone for now.\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg018.bmp",7,1000
goto *city32_main



*city33_main0

saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\habataki.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg023.bmp",7,1500
bgm "bgm\mura2.ogg"
goto *city33_main



*city33_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Girl ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Woman ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Young Woman ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Young Girl ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Young Boy ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Mayor ",95,310:spbtn 606,606
lsp 607,":s/20,20,0;#FFFFFF#FF4444Young Man ",95,340:spbtn 607,607
lsp 608,":s/20,20,0;#FFFFFF#FF4444Man ",95,370:spbtn 608,608
lsp 610,":s/20,20,0;#FFFFFF#FF4444Harpy ",410,160:spbtn 610,610
lsp 611,":s/20,20,0;#FFFFFF#FF4444Harpy Sisters ",410,190:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Queen Harpy ",410,220:spbtn 612,612
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city33_main
if %cmd1=-1 gosub *menu:goto *city33_main
cspl 600,699
if %cmd1=601 goto *city33_01
if %cmd1=602 goto *city33_02
if %cmd1=603 goto *city33_03
if %cmd1=604 goto *city33_04
if %cmd1=605 goto *city33_05
if %cmd1=606 goto *city33_06
if %cmd1=607 goto *city33_07
if %cmd1=608 goto *city33_08
if %cmd1=610 goto *city33_10
if %cmd1=611 goto *city33_11
if %cmd1=612 goto *city33_12
if %cmd1=619 return
goto *city33_main



*city33_01

lsp 700,":a;chara\mob_musume1.bmp",175,0:print 10,500
gosub *setwindow_01
name "Girl"
>As soon as the family issues were sorted out, angels attacked...@
>If it wasn't for the harpies power, it would have ended very badly...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city33_main



*city33_02

lsp 700,":a;chara\mob_obasan.bmp",-160,0
lsp 701,":a;chara\mob_hapy3.bmp",160,0:print 10,500
gosub *setwindow_01
name "Pipi"
>I was so scared...\
name ""
name "Woman"
>You're safe now.@
>The Queen will protect us.\
>And of course your mother will, too.\
name ""
lsp 701,":a;chara\mob_hapy2.bmp",160,0:print 10,500
name "Piana"
>I couldn't do anything against those angels before...@
>But next time, I'll do better for the sake of my daughter and step mother.\
>...Eh?@> My husband?\
>He liked those angel's cross of pleasure so much, I set him up on the scarecrow.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city33_main



*city33_03

lsp 700,":a;chara\mob_musume2.bmp",175,0:print 10,500
gosub *setwindow_01
name "Young Woman"
>My husband has three wives and twelve kids...@
>At first I was filled with pure rage, but I slowly got used to it.\
>And when the angels attacked, we all cooperated and defended ourselves as a single family.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city33_main



*city33_04

lsp 700,":a;chara\mob_syouzyo.bmp",-160,0
lsp 701,":a;chara\mob_hapy3.bmp",160,0:print 10,500
gosub *setwindow_01
name "Young Girl"
>Pym and I hid in the straw.\
name ""
name "Harpy Girl"
>I was really scared, but the Queen helped me.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city33_main



*city33_05

lsp 700,":a;chara\mob_syounen.bmp",-160,0
lsp 701,":a;chara\mob_hapy3.bmp",160,0:print 10,500
gosub *setwindow_01
name "Young Boy"
>.............\
name ""
name "Harpy Girl"
>.............\
name ""
>A delicate atmosphere hangs around the young couple.@
>I wonder if something happened during the attack...\
cspl 3,7
csp 611
cspl 700,705
goto *city33_main



*city33_06

lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Village Chief"
>Happiness Village and the Harpy Village formed an alliance.@
>Even though we're still separate villages with separate leaders...\
>I get the feeling that the Harpy Queen is gaining more trust here.\
name ""
lsp 700,":a;chara\mob_rouzin1.bmp",-160,0
lsp 701,":a;chara\mob_hapy2.bmp",160,0:print 10,500
name "Mature Harpy"
>You don't need to worry about that, Village Chief.@
>I'll make you feel nice and comfortable again tonight... Ok?\
name ""
name "Village Chief"
>Yes!@> Who really cares!\
name ""
name "Luka"
>...........\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city33_main



*city33_07

gosub *setwindow_01
lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
>A young man is bound to a scarecrow...\
name "Young Man"
>Piana, forgive me...@
>I'm not charmed by the angels anymore...\
>Waaah... Urhg... Someone, anyone... Let me down...@
>Piana, Pipi... Please forgive me...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city33_main



*city33_08

lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Man"
>All the men who were enraptured by the angels are getting big anger from their wives...@
>Ahh, how horrifying!@> The angel's attack isn't the real thing to be afraid of!\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city33_main



*city33_10

lsp 700,":a;chara\hapy_a_st12.bmp",0,0:print 10,500
gosub *setwindow_01
name "Harpy"
>Thank you, little Hero.@
>If you had not helped me then, I'd have been stuck in that birdcage...\
lsp 700,":a;chara\hapy_a_st13.bmp",0,0:print 10,500
>In thanks, I'll let you mate with me. @
>Come on, just try putting the tip in at least. \
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city33_main



*city33_11

lsp 700,":a;chara\hapy_bc_st11.bmp",-160,0
lsp 701,":a;chara\hapy_bc_st31.bmp",160,0:print 10,500
gosub *setwindow_01
name "Younger Harpy"
>I was so scared, I pretended like I was dead...@
>After a minute or so, I got really lightheaded and loopy...\
name ""
name "Older Harpy"
>Pii, I've told you that you have to keep breathing even when you play dead...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city33_main



*city33_12

lsp 700,":a;chara\queenhapy_st11.bmp",0,0:print 10,500
gosub *setwindow_01
name "Queen Harpy"
>Thanks to your help, many lives were saved.@
>However, I'm certain that we will be targeted again in the future...\
>Though if I had the same military power as the previous Queen, then I would not have caused so much trouble for everyone...\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\queenhapy_st11.bmp",160,0:print 10,500
name "Alice"
>...Don't be silly, Queen Harpy.@
>The previous Queen was very skilled in the war arts, but she was very ambitious and cruel.\
>Due to her warmongering, the harpy race sharply declined in number.@
>A gentle, intelligent Queen such as yourself is far more suited to the role.\
name ""
name "Queen Harpy"
>Your praise is humbling.@
>I swear I will unite everyone here, and overcome this disaster.\
name ""
lsp 700,":a;chara\alice_st74.bmp",-170,50:print 10,500
name "Alice"
>Yes... Due to my incompetence, this trouble is occurring.@
>For now, prepare to defend against another assault.\
name ""
name "Queen Harpy"
>Your will shall be done.@> The people of this village are my responsibility.\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50:print 10,500
name "Alice"
>In addition, delivery of strategic goods needs to be restored as soon as possible.@
>Namely, Happiness Honey needs to be delivered.@> The destination is my stomach.\
name ""
name "Queen Harpy"
>Y...Your will shall be done...\
name ""
name "Luka"
>Alice...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city33_main



*map9

saveoff
textoff
csp -1
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
bg "bg\map2.bmp",10,1000
goto *map9_2



*map9_2

if %ivent05>0 strsp 601,"San Ilia Castle",365,280,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 601,11
if %ivent04>0 strsp 602,"Port Natalia",660,270,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 602,12
if %ivent04=1 strsp 605,"Req. Level: 70",650,290,8,1,20,20,0,0,1,1,#FFFFFF
if %ivent04=2 lsp 605,":s/20,20,0;#FFFFFFDone ",700,290
if %ivent05>0 lsp 603,":s/20,20,0;#FFFFFF#FF4444Haunted Mansion ",415,170:spbtn 603,13
if %ivent05=1 strsp 606,"Req. Level: 71",420,190,8,1,20,20,0,0,1,1,#FFFFFF
if %ivent05=2 lsp 606,":s/20,20,0;#FFFFFFDone ",470,190
strsp 604,"Forest of Spirits",215,60,10,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 604,14
strsp 607,"Req. Level: 72",230,80,8,1,20,20,0,0,1,1,#FFFFFF
print 1
btnwait2 %cmd1
if %cmd1=0 goto *map9_2
if %cmd1=-1 gosub *menu:goto *map9_2
csp -1
btndef clear
if %cmd1=11 gosub *city36a_main0:dwave 1,"se\habataki.ogg":bg black,7,1500:bgm "bgm\field4.ogg":goto *map9
if %cmd1=12 && %ivent04=1 goto *sean0326
if %cmd1=12 && %ivent04=2 gosub *city35_main0:dwave 1,"se\habataki.ogg":bg black,7,1500:bgm "bgm\field4.ogg":goto *map9
if %cmd1=13 && %ivent05=1 goto *sean0333
if %cmd1=13 && %ivent05=2 gosub *sean0336x:goto *map9
if %cmd1=14 goto *sean0337
goto *map9_2



*city35_main0

saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\habataki.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg037.bmp",7,1500
bgm "bgm\city1.ogg"
goto *city35_main



*city35_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Boy ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Man ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Young Woman ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Soldier ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Mermaid A ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Mermaid B ",95,310:spbtn 606,606
lsp 607,":s/20,20,0;#FFFFFF#FF4444Young Mermaid ",95,340:spbtn 607,607
lsp 608,":s/20,20,0;#FFFFFF#FF4444Mermaid Merchant ",95,370:spbtn 608,608
strsp 610,"Weapon Shop",410,160,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
strsp 611,"Tool Shop",410,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Church ",410,220:spbtn 612,612
lsp 613,":s/20,20,0;#FFFFFF#FF4444Mermaid Pub ",410,250:spbtn 613,613
strsp 614,"Meia's House",410,280,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 614,614
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city35_main
if %cmd1=-1 gosub *menu:goto *city35_main
cspl 600,699
if %cmd1=601 goto *city35_01
if %cmd1=602 goto *city35_02
if %cmd1=603 goto *city35_03
if %cmd1=604 goto *city35_04
if %cmd1=605 goto *city35_05
if %cmd1=606 goto *city35_06
if %cmd1=607 goto *city35_07
if %cmd1=608 goto *city35_08
if %cmd1=610 goto *city35_10
if %cmd1=611 goto *city35_11
if %cmd1=612 goto *city35_12
if %cmd1=613 goto *city35_13
if %cmd1=614 goto *city35_14
if %cmd1=619 return
goto *city35_main



*city35_01

lsp 700,":a;chara\mob_seinen1.bmp",-160,0
lsp 701,":a;chara\mob_Mermaid2.bmp",160,0:print 10,500
gosub *setwindow_01
name "Boy"
>Honey, thank you for fighting for my sake!@
>Oh, you're wounded...\
name ""
name "Mermaid"
>I don't mind, darling!@
>For your sake, I don't care what happens to this body.\
>...By the way, darling...@
>Weren't you sort of staring pretty hard at the Mermaid imperial guards...?\
name ""
name "Boy"
>No, that was...@>Uh, that wasn't...\
name ""
name "Mermaid"
>As I was fighting for my life, were you staring at the enemy...?\
name ""
name "Boy"
>No, that's not right...@>That was...\
name ""
name "Mermaid"
>What do you mean that's not right!?\
name ""
name "Boy"
>I...I was just a little captivated...\
name ""
csp 701
lsp 700,":a;chara\alice_st72.bmp",0,50:print 10,500
name "Alice"
>Hehehe... That's good...@
>Hate each other... Delicious marital quarreling.\
name ""
name "Luka"
>Alice, we're fighting for humans and monsters to coexist together...@> Don't feed on drama...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city35_main



*city35_02

lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Man"
>I managed to survive...@
>But a lot of the town was submerged in the water during the battle.\
>We were able to evacuate before the battle started, so there weren't many victims...@
>But if this keeps up, there won't be a town to return to.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city35_main



*city35_03

lsp 700,":a;chara\mob_musume2.bmp",175,0:print 10,500
gosub *setwindow_01
name "Young Woman"
>Mermaids protected this town.@
>But it's sort of complicated, since Mermaids were also the ones who attacked it...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city35_main



*city35_04

lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier"
>This town was attacked by Mermaids, but I heard other towns were attacked by angels.@
>Just what is happening in the world?\
>Even worse, I heard that Ilias herself is the one who triggered this...@
>Is there no hope for the future, if we have been sentenced to extinction by a Goddess herself?\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city35_main



*city35_05

lsp 700,":a;chara\mob_Mermaid2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Mermaid A"
>I wonder if the Queen will reconsider her belief on humans?@
>Or is she too set on coexistence not being possible?\
>We'll do our best to deepen the relationship with humans...@
>If we do, I'm sure the Queen will come around one day!\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city35_main



*city35_06

lsp 700,":a;chara\mob_Mermaid1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Mermaid B"
>I was born in Port Natalia.@
>I won't forgive the Queen for destroying my hometown.\
>If she attacks again, I'll defend with everything I have.@
>There are dear people to me in this town that I would do anything to protect!\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city35_main



*city35_07

lsp 700,":a;chara\mob_Mermaid3.bmp",0,0:print 10,500
gosub *setwindow_01
name "Young Mermaid"
>Princess El...@
>I wanted to be friends with her...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city35_main



*city35_08

lsp 700,":a;chara\meia_st21.bmp",50,50:print 10,500
gosub *setwindow_01
name "Mermaid Merchant"
>After the battle was over, I came back.@
>All of my important merchandise was submerged under the water...\
>My fried starfish, fried sea anemone...@>Even my fried sea slug!@
>All covered in ocean water for hours...\
>*Munch* *Munch*@
>Ah. The salt adds to the flavor! \
name ""
name "Luka"
>.............\
name ""
>This Mermaid must have a horrible sense of taste...\
cspl 3,7
csp 611
cspl 700,705
goto *city35_main



*city35_10

bg "bg\bg150.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan3.bmp",0,0:print 10,500
name "Shopkeeper"
>I'm out of stock, so I want to load back up on inventory soon.@
>Eh? The world is in chaos?@> Trade routes are closed!?\
>Then I'll be going out of business...@
>Wait, no!@>This is the perfect chance for a weapon dealer!\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg037.bmp",7,1000
goto *city35_main



*city35_11

bg "bg\bg154.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
name "Shopkeeper"
>Wow, that was such an intense battle.@
>The Mermaids were fighting, and water was going everywhere...@>All their white shirts became see-through so quickly!\
>It was really hard deciding which Mermaid to stare at, let me tell you.\
>So I started thinking about clothes that would completely dissolve when wet.\
name ""
name "Luka"
>But then they're not clothes anymore...\
name ""
name "Shopkeeper"
>Not clothes anymore!@> What a great tag line!@
>I hope peace returns quickly, so this can be the next big fashion hit!\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\mob_seinen1.bmp",160,0:print 10,500
name "Alice"
>............Damn pervert.\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg037.bmp",7,1000
goto *city35_main



*city35_12

bg "bg\bg156.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_sinkan.bmp",0,0:print 10,500
name "Priest"
>Oooh the Mermaids in this town have started fighting among themselves!@
>Please save us weak humans, Ilias!\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg037.bmp",7,1000
goto *city35_main



*city35_13

bg "bg\bg155.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_Mermaid2.bmp",0,0:print 10,500
name "Mermaid"
>The Mermaid Pub is completely submerged under water, so it's closed for now.@
>Ah, the little Hero...@> Thank you for defending the town!\
>But to think the legend of Laura was a historical fact of the Queen's youth...@
>That was news to me!\
>But in this era, no such tragedy would occur...@
>I guess that's why we separate things into different eras to begin with...?\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg037.bmp",7,1000
goto *city35_main



*city35_14

bg "bg\bg049.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_syounen.bmp",-160,0
lsp 701,":a;chara\meia_st02.bmp",200,50:print 10,500
name "Meia"
>Thank you for helping us before, Hero!@
>If you had not have shown up, I wonder what would have happened to us...?\
name ""
name "Boy?"
>Thank you, big bro!\
name ""
name "Luka"
>Oh no, the real fighting was done by the Mermaids defending the town...@
>Meia did her best too!\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\meia_st02.bmp",200,50:print 10,500
name "Alice"
>The defense of Port Natalia will need to be done by the Mermaids from now on.@
>If they're going to launch another surprise attack, it will take a while for their preparations to be done.\
name ""
lsp 701,":a;chara\meia_st03.bmp",200,50:print 10,500
name "Meia"
>Arara... Your companion is tiny now.@
>I knew you agreed with me that smaller is better. \
name ""
name "Luka"
>No, I didn't do that to her!@
>I don't have anything devious in mind!\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg037.bmp",7,1000
goto *city35_main



*city36a_main0

saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\habataki.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg048.bmp",7,1500
bgm "bgm\city1.ogg"
goto *city36a_main



*city36a_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Boy ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Three Women ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Old Man ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Children ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Soldier A ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Soldier B ",95,310:spbtn 606,606
strsp 610,"Weapon Shop",410,160,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
strsp 611,"Tool Shop",410,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
strsp 612,"San Ilia Castle",410,220,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 612,612
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city36a_main
if %cmd1=-1 gosub *menu:goto *city36a_main
cspl 600,699
if %cmd1=601 goto *city36a_01
if %cmd1=602 goto *city36a_02
if %cmd1=603 goto *city36a_03
if %cmd1=604 goto *city36a_04
if %cmd1=605 goto *city36a_05
if %cmd1=606 goto *city36a_06
if %cmd1=610 goto *city36a_10
if %cmd1=611 goto *city36a_11
if %cmd1=612 goto *city36b_main0
if %cmd1=619 return
goto *city36a_main



*city36a_01

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Boy"
>Ahh what a disaster...@> Goddess Ilias tried to destroy us!\
>Was it because we didn't have enough faith?@>Or were we not grateful enough?@
>I just don't get it at all...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city36a_main



*city36a_02

lsp 700,":a;chara\mob_zyosei.bmp",0,0:print 10,500
gosub *setwindow_01
name "Woman A"
>That was really horrible, wasn't it my dear?@
>I can't believe Ilias tried to destroy us...\
name ""
lsp 700,":a;chara\mob_zyosei.bmp",-160,0
lsp 701,":a;chara\mob_madam.bmp",160,0:print 10,500
name "Woman B"
>The same thing is happening at other towns, isn't it?@
>There's no where to escape to, if that's the case...\
name ""
csp 701
lsp 700,":a;chara\mob_madam.bmp",0,0:print 10,500
name "Woman C"
>This disaster was averted thanks to the Hero...@
>But what's going to happen next?\
name ""
if %ivent05=0 skip 7
lsp 700,":a;chara\mob_madam.bmp",-160,0
lsp 701,":a;chara\mob_zyoseiy.bmp",160,0:print 10,500
name "Ghost Lady"
>There's no feeling at ease, whether you're dead or alive...@
>Even me, a ghost, was chased around by angels!\
name ""
lsp 700,":a;chara\mob_madam.bmp",-260,0
if %ivent05>0 lsp 701,":a;chara\mob_zyoseiy.bmp",0,0
lsp 702,":a;chara\fairys_st03.bmp",460,100:print 10,500
name "Fairy"
>I was so scared too!\
name ""
name "Woman A"
>It's so horrible, they were even attacking young girls...\
name ""
name "Woman B"
>If it happens again, we'll have to request the Hero.@
>I'm sure he will be able to do something about it...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city36a_main



*city36a_03

lsp 700,":a;chara\mob_rouzin1.bmp",-160,0
lsp 701,":a;chara\fairys_st51.bmp",400,100:print 10,500
gosub *setwindow_01
name "Old Man"
>Sheesh, what a huge commotion...@
>Are you alright?\
name ""
name "Fairy"
>Yes... \
name ""
if %ivent05=0 cspl 3,7:csp 611:cspl 700,705:goto *city36a_main
lsp 700,":a;chara\mob_rouzin1.bmp",-280,0
lsp 701,":a;chara\mob_seineny.bmp",0,0
lsp 702,":a;chara\fairys_st51.bmp",500,100:print 10,500
name "Ghost"
>The angels attacked me...@
>It seems like they hate ghosts and fairies more than humans.\
name ""
name "Old Man"
>Sheesh, how embarrassing...@
>Why can't we all just get along?\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city36a_main



*city36a_04

gosub *setwindow_01
lsp 700,":a;chara\mob_syounen.bmp",-220,0
lsp 701,":a;chara\mob_syouzyo.bmp",0,0
lsp 702,":a;chara\fairys_st21.bmp",450,100:print 10,500
name "Young Boy"
>My Fairy friend helped me!\
name ""
name "Girl"
>She grew grass and ivy around us, and hid us from view!\
name ""
name "Fairy"
>You're both my dearest friends after all! \
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city36a_main



*city36a_05

lsp 700,":a;chara\mob_sensi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier A"
if %ivent05=0 mov $sel1,"Ghosts, pixies, and now angels..."
if %ivent05=1 mov $sel1,"First it was pixies, now it's angels..."
eng $sel1:$sel6\
>What next? Robotic monsters?@> Hah, as if that could ever happen.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city36a_main



*city36a_06

lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier B"
>It's too late, the world is over.@
>If even San Ilia is like this, the rest of the world must be in total despair.\
>Ahhh... Everyone is going to die...@
>At the least, I'll spend my final days doing something worthwhile.@> Drinking.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city36a_main



*city36a_10

bg "bg\bg150.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
name "Shopkeeper"
>I've lost my zeal for business at the moment.@
>I need to get my stuff together and flee the city as soon as possible.\
>But even now, there are still folks who haven't lost their passion for business...@
>Damn, I wish I was like that Item Shop's Simon...\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg048.bmp",7,1000
goto *city36a_main



*city36a_11

bg "bg\bg151.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan3.bmp",0,0:print 10,500
name "Shopkeeper"
>The angel's cross...@> Damn, I don't understand the meaning of it.\
>I tried chucking crosses at the angels like a throwing star...@> But they're a little awkward to handle.\
>Now just how am I going to sell these...?\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg048.bmp",7,1000
goto *city36a_main



*city36b_main0

saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\asioto3.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg044.bmp",7,1500
bgm "bgm\castle1.ogg"
goto *city36b_main



*city36b_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Guard A ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Guard B ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Arguing Priests ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Scholar ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Soldier ",95,280:spbtn 605,605
lsp 610,":s/20,20,0;#FFFFFF#FF4444Chapel ",410,160:spbtn 610,610
strsp 611,"Basement Library",410,190,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
strsp 612,"Audience Chamber",410,220,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 612,612
lsp 613,":s/20,20,0;#FFFFFF#FF4444Guard Office ",410,250:spbtn 613,613
strsp 619,"Back to Town",410,400,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city36b_main
if %cmd1=-1 gosub *menu:goto *city36b_main
cspl 600,699
if %cmd1=601 goto *city36b_01
if %cmd1=602 goto *city36b_02
if %cmd1=603 goto *city36b_03
if %cmd1=604 goto *city36b_04
if %cmd1=605 goto *city36b_05
if %cmd1=610 goto *city36b_10
if %cmd1=611 goto *city36b_11
if %cmd1=612 goto *city36b_12
if %cmd1=613 goto *city36b_13
if %cmd1=619 saveoff:textoff:btndef clear:mov %sinkoumode,0:skipoff:autoclick 0:dwave 1,"se\asioto3.ogg":csp 611:cspl 3,7:bg black,7,1500:bg "bg\bg048.bmp",7,1500:bgm "bgm\city1.ogg":goto *city36a_main
goto *city36b_main



*city36b_01

lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Guard A"
>Many priests and soldiers are in despair, and have lost their reason for living.@
>But I'm going to do my best to protect the weak.\
>As long as you can find something to get you back on your feet, you won't succumb to fear and despair.\
>The worst people of all are the ones giving their lives over to alcohol as their crutch...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city36b_main



*city36b_02

lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Guard B"
>It's over...@> There's no point guarding this castle.@
>Ilias is going to destroy us all, after all!\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city36b_main



*city36b_03

gosub *setwindow_01
lsp 700,":a;chara\mob_sinkan.bmp",-220,0
if %ivent05=0 lsp 701,":a;chara\mob_sinkan.bmp",0,0
if %ivent05>0 lsp 701,":a;chara\mob_sinkany.bmp",0,0
lsp 702,":a;chara\fairys_st41.bmp",560,100:print 10,500
name "Priest A"
>How could this happen after all the praying to the Goddess we did?@
>Is there no power in our prayer and faith?\
name ""
if %ivent05=0 name "Priest"
if %ivent05>0 name "Ghost Priest"
>No, this is surely an ordeal from Ilias.@
>Those who don't keep their faith to the very end will not have salvation!\
name ""
name "Fairy"
>Hey, heeey!@>Let's plaaay!@
>Heeeeey!@> Heeeeeeeey!\
name ""
>The Fairy still seems to be invisible to the priests...\
cspl 3,7
csp 611
cspl 700,705
goto *city36b_main



*city36b_04

lsp 700,":a;chara\mob_gakusya.bmp",0,0:print 10,500
gosub *setwindow_01
name "Scholar"
>Now that we're able to discuss it...@
>Us scholars have always held questions about the books of scriptures.\
>Archaeological studies have found contradictions in them.@
>Not only that, but entire histories of peoples seem to have been deleted.\
>Experts in pretty much every field have found falsehoods and lies in the scriptures.@
>Of course, we were unable to say anything until now, lest we be labeled heretics.\
name ""
name "Luka"
>It's completely made up then?\
name ""
name "Scholar"
>Five hundred years ago...@>The era of Heinrich the Hero.@
>Since then, big modifications were made in the existing scriptures, and in any new ones created.\
>In addition, the existence of Fairies and Ghosts was thoroughly deleted from them all.\
>Even more, all folklore and legends regarding marriage customs in monsters was completely erased.@
>For the past five hundred years, records of history have been strictly controlled by Ilias...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city36b_main



*city36b_05

lsp 700,":a;chara\mob_sensi1.bmp",-160,0
lsp 701,":a;chara\fairys_st12.bmp",430,100:print 10,500
gosub *setwindow_01
name "Soldier"
>Are you alright?@> No injuries?@
>If anywhere hurts, I'll take you to the doctor alright?\
name ""
name "Fairy"
>Thank you, I'm alright...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city36b_main



*city36b_10

bg "bg\bg157.bmp",7,1000
gosub *setwindow_01p
>The Chapel seems to be full of people who lost their homes in the attack.\
lsp 700,":a;chara\mob_obasan.bmp",-160,0
lsp 701,":a;chara\mob_ozisan3.bmp",160,0:print 10,500
name "Woman"
>Oh Goddess Ilias...@
>Why have you abandoned us?\
name ""
name "Man"
>What should I believe in now...?\
name ""
name "Luka"
>.........\
name ""
cspl 700,701:print 10,500
>People who have lost their faith, and are in despair...@
>And others who are still clinging to their faith.\
>Each person is reacting differently.@
>The only thing in common, is that they have all lost hope in the future...\
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>The emotional strength of each person's heart varies wildly based on the person.@
>Family, friends, lovers...\
>People whose true passion lies in art, engineering or martial skills.@
>Or even in the Heavens itself.\
>The ones whose true passion lay in their belief in the Goddess are the ones most in shock, of course.\
name ""
name "Luka"
>The most important thing is to bring back peace...@
>After that, I'm sure the San Ilia King can show them their way again!\
name ""
>It doesn't matter if they once had blind faith in the Goddess...@
>I'm sure the King will be able to lead the lost here as he is now.\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg044.bmp",7,1000
goto *city36b_main



*city36b_11

lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Castle Guard"
>There's no reason to guard the basement library anymore.@
>It's just full of books about Ilias' teachings.\
name ""
>The guard seems really depressed.@
>It's like he doesn't even care about blocking us from going in.\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Luka, do you need anything in the basement library?\
name ""
name "Luka"
>I thought we might be able to find something about breaking the Six Ancestors' Great Seal...\
name ""
name "Alice"
>You think a human library would have something that valuable?@
>That's a top secret angel development, there's no way.\
name ""
name "Luka"
>You're right...\
name ""
>There really isn't any reason to go down there.@
>We turn back around.\
cspl 3,7
csp 611
cspl 700,705
goto *city36b_main



*city36b_12

bg "bg\bg045.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\saniria_n_st01.bmp",0,0:print 10,500
name "San Ilia King"
>Ooh, Hero Luka...@>We are much in your debt.@
>For now, I've sent missives to every church around the world telling the priests to keep the hope of the people alive.\
>If the situation becomes better, I plan to travel around the world spreading hope.@
>Of course, that is after you rescue the world...\
name ""
name "Luka"
>Yes, I'll fight with everything I've got!@
>So I'm counting on you too, King!\
name ""
name "San Ilia King"
>...I understand.@> I shall shoulder the suffering of the people.\
>Hero Luka, please protect the citizens of this world with your blade.@
>And as for Ilias...\
name ""
>After worshipping Ilias for so long, he seems unable to manage to finish his sentence.@
>But I know well what he means.\
name "Luka"
>Yes... I will absolutely reclaim peace!\
name ""
>In front of the King, whose role is to guide Heroes...@
>I swear to take down Ilias and reclaim peace for the world.\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg044.bmp",7,1000
goto *city36b_main



*city36b_13

bg "bg\bg060.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_heisi1.bmp",-160,0
lsp 701,":a;chara\mob_heisi1.bmp",160,0:print 10,500
name "Guard A"
>I wasn't really that pious to begin with, I just acted like it around the others.@
>Since I was sort of lying about it all along, I'm not really suffering from the same shock as the others.\
>But this guy...\
name ""
name "Guard B"
>Ahhh... What should I do now...?@
>Goddess Ilias... P...Please guide me...!\
name ""
name "Guard A"
>I know how devoted he was, it's really pitiful...@
>I really wish I could have led him down the same path of dishonesty as me...\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg044.bmp",7,1000
goto *city36b_main



*map10

saveoff
textoff
csp -1
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
bg "bg\map3.bmp",10,1000
goto *map10_2



*map10_2

if %ivent14>0 strsp 601,"Sabasa Castle",275,230,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 601,11
if %ivent07>0 strsp 603,"Witch Hunt Village",240,500,10,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,13
if %ivent07=1 strsp 606,"Req. Level: 73",260,520,8,1,20,20,0,0,1,1,#FFFFFF
if %ivent07=2 lsp 606,":s/20,20,0;#FFFFFFDone ",310,520
strsp 604,"Safaru Ruins",350,60,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 604,14
strsp 607,"Req. Level: 73",340,80,8,1,20,20,0,0,1,1,#FFFFFF
print 1
btnwait2 %cmd1
if %cmd1=0 goto *map10_2
if %cmd1=-1 gosub *menu:goto *map10_2
csp -1
btndef clear
if %cmd1=11 gosub *city37a_main0:dwave 1,"se\habataki.ogg":bg black,7,1500:bgm "bgm\field4.ogg":goto *map10
if %cmd1=13 && %ivent07=1 goto *sean0345
if %cmd1=13 && %ivent07=2 gosub *city38_main0:dwave 1,"se\habataki.ogg":bg black,7,1500:bgm "bgm\field4.ogg":goto *map10
if %cmd1=14 goto *sean0349
goto *map10_2



*city37a_main0

saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\habataki.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg064.bmp",7,1500
bgm "bgm\sabasa.ogg"
goto *city37a_main



*city37a_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Boy ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Women ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Old Man ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Man ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Soldier A ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Soldier B ",95,310:spbtn 606,606
lsp 607,":s/20,20,0;#FFFFFF#FF4444Young Boy ",95,340:spbtn 607,607
lsp 608,":s/20,20,0;#FFFFFF#FF4444Prostitute ",95,370:spbtn 608,608
strsp 610,"Weapon Shop",410,160,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
strsp 611,"Tool Shop",410,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Church ",410,220:spbtn 612,612
lsp 613,":s/20,20,0;#FFFFFF#FF4444Mermaid Pub ",410,250:spbtn 613,613
strsp 614,"Sabasa Castle",410,280,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 614,614
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city37a_main
if %cmd1=-1 gosub *menu:goto *city37a_main
cspl 600,699
if %cmd1=601 goto *city37a_01
if %cmd1=602 goto *city37a_02
if %cmd1=603 goto *city37a_03
if %cmd1=604 goto *city37a_04
if %cmd1=605 goto *city37a_05
if %cmd1=606 goto *city37a_06
if %cmd1=607 goto *city37a_07
if %cmd1=608 goto *city37a_08
if %cmd1=610 goto *city37a_10
if %cmd1=611 goto *city37a_11
if %cmd1=612 goto *city37a_12
if %cmd1=613 goto *city37a_13
if %cmd1=614 goto *city37b_main0
if %cmd1=619 return
goto *city37a_main



*city37a_01

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Boy"
>The vampires calmly went into the castle in broad daylight.@
>I saw them... It was like a nightmare.\
>The group of jet-black monsters sizing us up as food as they walked down the main road.@
>At the front of them was the Queen Vampire, walking like royalty.\
>I still get chills thinking of being ruled over by them...@
>You truly are Sabasa's savior!\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city37a_main



*city37a_02

lsp 700,":a;chara\mob_obasan.bmp",-160,0
lsp 701,":a;chara\mob_madam.bmp",160,0:print 10,500
gosub *setwindow_01
name "Woman"
>This uproar is happening all over the world, right?@
>I hope Princess Sara is safe while she studies in Grangold...\
name ""
name "Young Woman"
>It's one of the four major powers, and their defense force is top notch, too.@
>But I'm still worried...\
name ""
name "Luka"
>........\
name ""
>So the story is she's studying abroad.@
>The fact that she's in the Monster Lord's Castle is top secret, of course.\
cspl 3,7
csp 611
cspl 700,705
goto *city37a_main



*city37a_03

lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Old Man"
>For one who loves legends, this really surprised me.@
>To think I would see the Queen Vampire in person...\
>Just once, I'd like for her to suck on me...@
>I'm sure I wouldn't die if it was just once...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city37a_main



*city37a_04

lsp 700,":a;chara\mob_ozisan2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Man"
>I heard that Ilias was the one who commanded the vampires to attack.@
>The pious ones are shocked, but I'm just angry.\
>The King declared that we would resist Ilias, and wouldn't bend our knees to her.@
>Of course, the majority of the citizens feel the same way as the King.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city37a_main



*city37a_05

lsp 700,":a;chara\mob_sensi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier A"
>I enlisted in the army for this battle.@
>My neighbor was eaten by a monster during it...\
>When I think about if I had hidden at home instead of enlisting...@
>Uhg, I still shiver.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city37a_main



*city37a_06

lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier B"
>Ever since that battle, the amount of people lusting after vampires has started to increase.@
>I'm totally ashamed as a fellow citizen...\
>Of course, I'd never think such a thing.@
>I'd never dream about being sucked by a vampire!\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city37a_main



*city37a_07

lsp 700,":a;chara\mob_syounen.bmp",0,0:print 10,500
gosub *setwindow_01
name "Young Boy"
>In order to protect the Princess, I'm going to become a soldier when I grow up!\
name ""
lsp 701,":a;chara\mob_seinen1.bmp",-160,0:print 10,500
name "Boy"
>I want to apply right away!\
name ""
lsp 702,":a;chara\mob_ozisan3.bmp",160,0:print 10,500
name "Middle-Adged Man"
>I've already sent in my application!\
name ""
lsp 703,":a;chara\mob_sensi1.bmp",-300,0:print 10,500
name "Soldier"
>I joined a long time ago!\
name ""
lsp 704,":a;chara\mob_rouzin1.bmp",300,0:print 10,500
name "Old Man"
>I'm already a retired veteran!\
name ""
name "Young Boy"
>Woooh!\
name ""
name "Luka"
>.........\
name ""
>Are the hearts of the citizens lining up...?\
cspl 3,7
csp 611
cspl 700,705
goto *city37a_main



*city37a_08

lsp 700,":a;chara\mob_musume2.bmp",175,0:print 10,500
gosub *setwindow_01
name "Prostitute"
>For some reason, Vampire play has become really popular recently.@
>Cloaks and fake fangs have all gone out of supply.\
>Of course I'll be open for business until the end of the world!@
>My pride as a prostitute will continue until I die!\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city37a_main



*city37a_10

bg "bg\bg152.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
name "Owner"
>Ah, so busy, so busy...@
>The army ordered a large quantity of armor and weapons.\
>So I'm afraid I don't have any merchandise for the general public at this time.@
>I'm sorry, but it's for the good of the country.\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg064.bmp",7,1000
goto *city37a_main



*city37a_11

bg "bg\bg151.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan3.bmp",0,0:print 10,500
name "Shopkeeper"
>My holy water to repel vampires is selling like crazy.@
>On the other hand, so is the Vampire themed porno book...\
>The most popular one has been "The Night Sucker"@
>It's about a Vampire who slips into the town at night and sucks her target completely dry.\
name ""
name "Luka"
>Something like that exists...?\
name ""
name "Shopkeeper"
>There have always been black market monster themed porno books.@
>But due to religious reasons, they weren't widely known by the public.\
>In fact, there are quite a lot of monster lovers...\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\mob_ozisan3.bmp",160,0:print 10,500
name "Alice"
>If they like monsters so much, they wouldn't need a book.@
>They could just go outside town and offer themselves up...\
name ""
name "Shopkeeper"
>Of course, it's scary thinking they might kill you or squeeze you to death.@
>No matter how much I like them, to risk my life...\
>...I mean my customer's who buy them.@
>It's their thing.@>Yeah... Not me...\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg064.bmp",7,1000
goto *city37a_main



*city37a_12

bg "bg\bg156.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_sinkan.bmp",0,0:print 10,500
name "Priest"
>It can't be...@> Ilias couldn't have directed the vampires to Sabasa...@
>I don't know what to believe anymore...\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg064.bmp",7,1000
goto *city37a_main



*city37a_13

bg "bg\bg155.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_Mermaid1.bmp",0,0:print 10,500
name "Mermaid"
>Just when we finally reopened the pub, this uproar killed business...\
>What do Ilias Kreuz and Ilias have against us, anyway!?@
>And to make things even worse, it seems like vampires suddenly got a lot more popular here...\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg064.bmp",7,1000
goto *city37a_main



*city37b_main0

saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\asioto3.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg065.bmp",7,1500
bgm "bgm\castle2.ogg"
goto *city37b_main



*city37b_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
strsp 601,"Minister A",95,160,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 601,601
strsp 602,"Minister B",95,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Chief Minister ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Grandmaster Knight ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Scholar ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Priest ",95,310:spbtn 606,606
strsp 610,"Audience Room",410,160,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
lsp 611,":s/20,20,0;#FFFFFF#FF4444Princess' Room ",410,190:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Guard Room ",410,220:spbtn 612,612
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave Castle ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city37b_main
if %cmd1=-1 gosub *menu:goto *city37b_main
cspl 600,699
if %cmd1=601 goto *city37b_01
if %cmd1=602 goto *city37b_02
if %cmd1=603 goto *city37b_03
if %cmd1=604 goto *city37b_04
if %cmd1=605 goto *city37b_05
if %cmd1=606 goto *city37b_06
if %cmd1=610 goto *city37b_10
if %cmd1=611 goto *city37b_11
if %cmd1=612 goto *city37b_12
if %cmd1=619 saveoff:textoff:btndef clear:mov %sinkoumode,0:skipoff:autoclick 0:dwave 1,"se\asioto3.ogg":csp 611:cspl 3,7:bg black,7,1500:bg "bg\bg064.bmp",7,1500:bgm "bgm\sabasa.ogg":goto *city37a_main
goto *city37b_main



*city37b_01

lsp 700,":a;chara\mob_daizin.bmp",0,0:print 10,500
gosub *setwindow_01
name "Minister A"
>After I was released, I was terrified of coming into the Castle and seeing it all bloody...@
>But luckily, it was pretty much untouched.\
>However the large cellar filled with the wine Sabasa was proud of was completely drained.@
>Did those vampire's really drink it all in just one day?\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\mob_daizin.bmp",170,0:print 10,500
name "Alice"
>I've heard there are some vampires who like alcohol more than blood...\
name ""
name "Luka"
>...........\
name ""
>In a way, perhaps vampires could get along easiest with humans?\
cspl 3,7
csp 611
cspl 700,705
goto *city37b_main



*city37b_02

lsp 700,":a;chara\mob_daizin.bmp",0,0:print 10,500
gosub *setwindow_01
name "Minister B"
>This is the worst national crisis since Sabasa was founded.@
>Right now I'm working on refuge locations should another surprise attack occur.\
>We will also need to train the citizens in how to deal with urban warfare, should it come to that.@
>But we don't have the time or resources needed to devote to training...@>Oh what to do...?\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city37b_main



*city37b_03

lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Chief Minister"
>I wish to thank you for saving Sabasa from the bottom of my heart.@
>You showed impeccable bravery, as expected of Princess Sara's groom.\
name ""
name "Luka"
>...Eh?\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city37b_main



*city37b_04

lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Grandmaster Knight"
>Even with the world's strongest military, we were struggling.@
>Just how are the other countries faring...?\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city37b_main



*city37b_05

lsp 700,":a;chara\mob_gakusya.bmp",0,0:print 10,500
gosub *setwindow_01
name "Scholar"
>So that was a vampire...@> How erotically charming.@
>Just once, I'd like to be sucked by one...\
name ""
name "Luka"
>Uhm...@> Are you alright?\
name ""
name "Scholar"
>...Ah, excuse me.@>I've just been completely fascinated.@
>I've heard there are many others like me, too...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city37b_main



*city37b_06

lsp 700,":a;chara\mob_sinkan.bmp",0,0:print 10,500
gosub *setwindow_01
name "Priest"
>I...I was almost made into a vampire's prey.@
>T...Thank you for saving me, Ilias...!\
>What?@>Ilias was the one who made them attack in the first place?@
>I won't believe that...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city37b_main



*city37b_10

bg "bg\bg045.bmp",7,1000
lsp 700,":a;chara\sabasa_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Sabasa King"
>Ah, Hero Luka.@
>Things have gotten very busy around here.\
>The first order of business is re-structuring the army to get it back into shape.@
>After that, I need to send personal letters to each country informing them of the situation.\
name ""
name "Luka"
>It truly is difficult being the King of a country...\
name ""
name "Sabasa King"
>Hero Luka, let's both do everything we can.@
>I'll work with the other countries in cooperation to stave off this crisis.\
>Use your blade to take down Ilias!@
>Then come and make my daughter your wife.\
name ""
name "Luka"
>Not again...\
name ""
>It looks like he still hasn't given that up...\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg065.bmp",7,1000
goto *city37b_main



*city37b_11

bg "bg\bg067.bmp",7,1000
lsp 700,":a;chara\mob_madam.bmp",0,0:print 10,500
gosub *setwindow_01
name "Chamberlain"
>I wonder when the Princess will return?@
>It seems as though she marched into the Monster Lord's Castle by herself...\
>Of course, I never revealed that to anyone.@
>But I wonder what business she had there...?\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg065.bmp",7,1000
goto *city37b_main



*city37b_12

bg "bg\bg060.bmp",7,1000
lsp 700,":a;chara\mob_heisi1.bmp",-160,0
lsp 701,":a;chara\mob_heisi1.bmp",160,0:print 10,500
gosub *setwindow_01
name "Soldier A"
>The previous fight was extremely intense...@
>Of course, I've been a part of monster subjugation missions before, but never any that strong.\
name ""
name "Soldier B"
>We can't fight in battles of that scale too many times.@
>After one or two more of those, our country will be in a critical state...\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg065.bmp",7,1000
goto *city37b_main



*city38_main0

mov %genzaiti,8
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\habataki.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg072.bmp",7,1500
bgm "bgm\mura2.ogg"
goto *city38_main



*city38_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Man ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Village Girl ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Lucia's Younger Sister ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Woman ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Old Man ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Farmer ",95,310:spbtn 606,606
lsp 607,":s/20,20,0;#FFFFFF#FF4444Young Boy ",95,340:spbtn 607,607
strsp 610,"Tool Shop",410,160,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
lsp 611,":s/20,20,0;#FFFFFF#FF4444Church ",410,190:spbtn 611,611
strsp 612,"Lord's Mansion",410,220,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 612,612
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city38_main
if %cmd1=-1 gosub *menu:goto *city38_main
cspl 600,699
if %cmd1=601 goto *city38_01
if %cmd1=602 goto *city38_02
if %cmd1=603 goto *city38_03
if %cmd1=604 goto *city38_04
if %cmd1=605 goto *city38_05
if %cmd1=606 goto *city38_06
if %cmd1=607 goto *city38_07
if %cmd1=610 goto *city38_10
if %cmd1=611 goto *city38_11
if %cmd1=612 goto *city38_12
if %cmd1=619 return
goto *city38_main



*city38_01

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Man"
>To think my wife's body was like that...@
>Of course, I don't intend to discriminate because of it...\
>However, now that I think about it, there were some strange things.@
>She started blindfolding me sometimes during our night activities...\
>It felt really amazing those times.@>I wonder if...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city38_main



*city38_02

lsp 700,":a;chara\wormv_st11.bmp",0,0:print 10,500
gosub *setwindow_01
name "Village Girl"
>The villagers are treating us as they always did.@
>This village won't ever repeat the tragedies of the past ever again.\
>No matter how many times they attack us, we'll beat them back.@
>We aren't afraid to show ourselves to defend our hometown.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city38_main



*city38_03

lsp 700,":a;chara\mob_zyosei.bmp",0,0:print 10,500
gosub *setwindow_01
name "Lucia's Younger Sister"
>My older Sister Lucia studied magic science in Sabasa.@
>Her talent and knowledge were both extraordinary...\
>I'm sure she's still looking for a place that will accept her for who she is.@
>I wish she would hurry up and realize it's right back here, at home.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city38_main



*city38_04

lsp 700,":a;chara\mob_obasan.bmp",0,0:print 10,500
gosub *setwindow_01
name "Woman"
>We're already past the embarrassing behavior shown during the period of Lily's rule.@
>No matter what they look like, those girls are fine, upstanding members of our village.\
>I've even known that girl Lucia since she was a baby...@
>If you ever see her again, please let her know that she's welcome home any time.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city38_main



*city38_05

lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Old Man"
>Despite that surprise attack, not even a single person lost their life.@
>I think Lucia's true feelings kept her from really attacking the village in earnest.\
>That girl was always a kind child...@
>I know none of the other villagers have forgotten that.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city38_main



*city38_06

lsp 700,":a;chara\mob_ozisan2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Farmer"
>What's with everyone looking all strange here for?@
>...Eh?@> The world is in danger?\
>Ah, I'm glad that they're ok...@>Wait, what?\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city38_main



*city38_07

lsp 700,":a;chara\mob_syounen.bmp",0,0:print 10,500
gosub *setwindow_01
name "Young Boy"
>What do you think the proper name of this village originally was?@
>I've asked around and looked through books, but I came up with nothing...\
>There were some documents in the government buildings mentioning a "Baron Meister Jurisdiction".@
>But that's less a village name, and more of just who was in charge of the area...\
name ""
name "Luka"
>It looks like "Witch Hunt Village" has been its name for a long time, huh?\
name ""
>This village's true name...@
>Perhaps it's already lost for good?\
cspl 3,7
csp 611
cspl 700,705
goto *city38_main



*city38_10

bg "bg\bg151.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan2.bmp",0,0:print 10,500
name "Shopkeeper"
>Ah, that was dangerous...@>I was almost a victim of the Iron Maiden.\
>But I sort of wanted to feel it...\
>I...I wonder what it would have felt like...@
>J...Just for a moment...\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg072.bmp",7,1000
goto *city38_main



*city38_11

bg "bg\bg153.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_sinkan.bmp",0,0:print 10,500
name "Priest"
>There have been hardships here ever since I first took my post.@
>Even worse, we could be attacked again soon...\
>I must set this church up to be able to take in refugees in case of an emergency.@
>I need to hurry and collect all of the medicinal supplies I can here...\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg072.bmp",7,1000
goto *city38_main



*city38_12

bg "bg\bg073.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
name "Soldier"
>We really need to destroy this mansion.@
>We've talked about it for a while, but kept putting it off...\
>There are a lot of dangerous chemicals and materials inside, and it's going to be a huge project that nobody really wants to take the initiative on...\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\mob_heisi1.bmp",160,0:print 10,500
name "Alice"
>From my brief observation, I saw the distilled mercury drug Necrozyle.@
>I also saw "Hell's Rose" and "Fool's Stone".\
>They are hazardous drugs that no normal handler should even get near.@
>Once things have settled down, I'll dispatch a crew from the Monster Lord's Castle.\
name ""
name "Luka"
>Such dangerous things just laying around...\
name ""
>We can't just leave them sitting there...@
>But our first priority is the world in danger.\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg072.bmp",7,1000
goto *city38_main



*map11

saveoff
textoff
csp -1
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
bg "bg\map4.bmp",10,1000
goto *map11_2



*map11_2

if %ivent08>0 strsp 601,"Grand Noah Castle",65,500,10,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 601,11
if %ivent09>0 lsp 602,":s/20,20,0;#FFFFFF#FF4444Yamatai Village ",575,140:spbtn 602,12
if %ivent09=1 strsp 605,"Req. Level: 74",580,160,8,1,20,20,0,0,1,1,#FFFFFF
if %ivent09=2 lsp 605,":s/20,20,0;#FFFFFFDone ",630,160
if %ivent10>0 strsp 603,"Plansect Village",230,310,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,13
if %ivent10=1 strsp 606,"Req. Level: 75",240,330,8,1,20,20,0,0,1,1,#FFFFFF
if %ivent10=2 lsp 606,":s/20,20,0;#FFFFFFDone ",290,330
strsp 604,"Undine's Spring",365,490,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 604,14
strsp 607,"Req. Level: 75",370,510,8,1,20,20,0,0,1,1,#FFFFFF
print 1
btnwait2 %cmd1
if %cmd1=0 goto *map11_2
if %cmd1=-1 gosub *menu:goto *map11_2
csp -1
btndef clear
if %cmd1=11 gosub *city39a_main0:dwave 1,"se\habataki.ogg":bg black,7,1500:bgm "bgm\field4.ogg":goto *map11
if %cmd1=12 && %ivent09=1 goto *sean0356
if %cmd1=12 && %ivent09=2 gosub *city40_main0:dwave 1,"se\habataki.ogg":bg black,7,1500:bgm "bgm\field4.ogg":goto *map11
if %cmd1=13 && %ivent10=1 goto *sean0360
if %cmd1=13 && %ivent10=2 gosub *city41_main0:dwave 1,"se\habataki.ogg":bg black,7,1500:bgm "bgm\field4.ogg":goto *map11
if %cmd1=14 goto *sean0364
goto *map11_2



*city39a_main0

saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\habataki.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg082.bmp",7,1500
bgm "bgm\city1.ogg"
goto *city39a_main



*city39a_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Man ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Boy ",95,190:spbtn 602,602
strsp 603,"Town Girl",95,220,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Young Woman ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Noblewoman ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Soldier A ",95,310:spbtn 606,606
lsp 607,":s/20,20,0;#FFFFFF#FF4444Soldier B ",95,340:spbtn 607,607
lsp 608,":s/20,20,0;#FFFFFF#FF4444Harpy ",95,370:spbtn 608,608
lsp 609,":s/20,20,0;#FFFFFF#FF4444Slime Girl ",95,400:spbtn 609,609
strsp 610,"Weapon Shop",410,160,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
strsp 611,"Tool Shop",410,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
strsp 612,"Minotauros' Milk Shop",410,220,12,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 612,612
strsp 613,"Spider Girl's Sewing Shop",410,250,14,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 613,613
lsp 614,":s/20,20,0;#FFFFFF#FF4444Alraune's Florist Shop ",410,280:spbtn 614,614
lsp 615,":s/20,20,0;#FFFFFF#FF4444Church ",410,310:spbtn 615,615
strsp 616,"Grand Noah Castle",410,340,10,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 616,616
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city39a_main
if %cmd1=-1 gosub *menu:goto *city39a_main
cspl 600,699
if %cmd1=601 goto *city39a_01
if %cmd1=602 goto *city39a_02
if %cmd1=603 goto *city39a_03
if %cmd1=604 goto *city39a_04
if %cmd1=605 goto *city39a_05
if %cmd1=606 goto *city39a_06
if %cmd1=607 goto *city39a_07
if %cmd1=608 goto *city39a_08
if %cmd1=609 goto *city39a_09
if %cmd1=610 goto *city39a_10
if %cmd1=611 goto *city39a_11
if %cmd1=612 goto *city39a_12
if %cmd1=613 goto *city39a_13
if %cmd1=614 goto *city39a_14
if %cmd1=615 goto *city39a_15
if %cmd1=616 goto *city39b_main0
if %cmd1=619 return
goto *city39a_main



*city39a_01

lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Man"
>Most of the enemies who invaded headed straight for the castle.@
>So there hasn't been too much damage to the town itself.\
>But to think... Even though it was for a short time, the Queen was still kidnapped.@
>How crazy.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city39a_main



*city39a_02

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Boy"
>A Lamia attacked me during the confusion.@
>She squeezed me so tight, it was intense.\
name ""
name "Luka"
>Th...That sounds horrible...\
name ""
name "Boy"
>Ahh... I want to do it again...\
name ""
name "Luka"
>..........\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city39a_main



*city39a_03

lsp 700,":a;chara\mob_musume1.bmp",175,0:print 10,500
gosub *setwindow_01
name "Town Girl"
>I was captured in the Colosseum as a prisoner.@
>Thank you for saving me!\
>I'm sure you'll save the world, too!\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city39a_main



*city39a_04

lsp 700,":a;chara\mob_musume2.bmp",175,0:print 10,500
gosub *setwindow_01
name "Young Woman"
>A monster raped my boyfriend...@
>And he was so happy after that robot snake monster raped him!\
>The next time they show up, I'll fight too.@
>This grudge... This anger... This fury... They will feel all of it!\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city39a_main



*city39a_05

lsp 700,":a;chara\mob_madam.bmp",0,0:print 10,500
gosub *setwindow_01
name "Noblewoman"
>I'm an even bigger fan of yours now.@
>You marched into the Colosseum so bravely, and rescued the Queen!\
>But I sort of wanted to see your face as you got pleasured...@
>I couldn't help but feel a little disappointed.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city39a_main



*city39a_06

lsp 700,":a;chara\mob_sensi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier"
>I've only ever been played with at the Colosseum, but losing outside of it was a real shock.@
>This just proves I'm good for nothing when it comes to actual combat.\
>I disgraced myself...@>Outside of the Colosseum, I mean.@
>Everyone saw my shame...@> Outside of the Colosseum, I mean.\
name ""
name "Luka"
>.........\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city39a_main



*city39a_07

lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier"
>Although the physical damage to the town was minimal, many men were raped.@
>I can't help but feel a little jealous...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city39a_main



*city39a_08

lsp 700,":a;chara\mob_hapy2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Fishing Loving Harpy"
>Just what in the world happened...?@
>I was swinging my fishing rod around like crazy as chaos erupted all over the place.\
>And thanks to that, my favorite rod broke!@
>I'll have to stop fishing for a while...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city39a_main



*city39a_09

lsp 700,":a;chara\mob_mamono4.bmp",244,80:print 10,500
gosub *setwindow_01
name "Slime Girl"
>Purupurupuru... That was so scary!@
>My friend Kenta got hurt, too.\
>Eh? Am I alright?@
>I just pretended to be a puddle, so I wasn't attacked...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city39a_main



*city39a_10

bg "bg\bg152.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
name "Weapon Shop Owner"
>I never thought I'd see monsters lording around the downtown area!@
>But I guess my store was fine since they all headed toward the castle.\
>But for some reason, that sort of made me feel lonely...@
>The guys attacked almost seem happy about it.\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg082.bmp",7,1000
goto *city39a_main



*city39a_11

bg "bg\bg151.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_mamono1.bmp",100,-100:print 10,500
name "Elf"
>Originally, I was a fighter in the Colosseum.@
>When they attacked, I started shooting arrows at the invaders.\
>So now my store is totally out of arrows.@
>Perhaps I was a little too enthusiastic with them...\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg082.bmp",7,1000
goto *city39a_main



*city39a_12

gosub *setwindow_01
lsp 700,":a;chara\mob_mamono5.bmp",0,0:print 10,500
name "Minotauros Milkmonster"
>My milk is out of stock for a while.@
>Ever since I took that arrow to my knee in that battle, it hasn't been tasting too good.\
name ""
>I knew it.@> She herself is the supplier of that milk...\
name "Minotauros Milkmonster"
>But was there even a bow user among the invaders...?@
>I remember that crazy Elf shooting arrows and laughing like she had gone nuts, but...\
>W...Wait a second!\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city39a_main



*city39a_13

gosub *setwindow_01
lsp 700,":a;chara\mob_mamono3.bmp",0,0:print 10,500
name "Spider Girl Shop Owner"
>The sign is a lie.@> It's really Tarantula Girl's Sewing Shop.\
>My sewing skills are horrible, so I'm not turning up a profit...\
>That reminds me, there was a call sent out to all spider monsters to assemble.@
>I didn't feel like going, so I ignored it.\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\mob_mamono3.bmp",160,0:print 10,500
name "Alice"
>A call for all spider monsters to assemble?@
>Could this be the Spider Princess' doing...?\
name ""
name "Luka"
>The Spider Princess...?\
name ""
name "Alice"
>She's the Queen over all spiders at the moment.@
>If she's calling all of her subordinates together...@> It can't be good.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city39a_main



*city39a_14

gosub *setwindow_01
lsp 700,":a;chara\mob_mamono2.bmp",147,0:print 10,500
name "Florist Shop Owner"
>I was so surprised when my flowers all bloomed!@
>They are so beautiful!@
>Flower, flower, flower!\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city39a_main



*city39a_15

bg "bg\bg156.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_sinkan.bmp",0,0:print 10,500
name "Priest"
>The Goddess is punishing us!@> Punishing!@
>Since this town is filled with monsters, we were punished!\
name ""
name "Luka"
>But didn't they also attack the monsters...?\
name ""
name "Priest"
>But it must still be Heaven's vengeance!@> Heaven's vengeance!!!\
name ""
>He's ignoring the reality and clinging to his old beliefs...@
>I guess I was like him earlier, wasn't I?\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg082.bmp",7,1000
goto *city39a_main



*city39b_main0

saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\asioto3.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg065.bmp",7,1500
bgm "bgm\castle3.ogg"
goto *city39b_main



*city39b_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
strsp 601,"Minister A",95,160,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 601,601
strsp 602,"Minister B",95,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 602,602
strsp 603,"Minister C",95,220,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Guard A ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Guard B ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Guard Captain ",95,310:spbtn 606,606
lsp 607,":s/20,20,0;#FFFFFF#FF4444Dullahan ",95,340:spbtn 607,607
lsp 610,":s/20,20,0;#FFFFFF#FF4444Queen ",410,160:spbtn 610,610
lsp 611,":s/20,20,0;#FFFFFF#FF4444Guard Room ",410,190:spbtn 611,611
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city39b_main
if %cmd1=-1 gosub *menu:goto *city39b_main
cspl 600,699
if %cmd1=601 goto *city39b_01
if %cmd1=602 goto *city39b_02
if %cmd1=603 goto *city39b_03
if %cmd1=604 goto *city39b_04
if %cmd1=605 goto *city39b_05
if %cmd1=606 goto *city39b_06
if %cmd1=607 goto *city39b_07
if %cmd1=610 goto *city39b_10
if %cmd1=611 goto *city39b_11
if %cmd1=619 saveoff:textoff:btndef clear:mov %sinkoumode,0:skipoff:autoclick 0:dwave 1,"se\asioto3.ogg":csp 611:cspl 3,7:bg black,7,1500:bg "bg\bg082.bmp",7,1500:bgm "bgm\city1.ogg":goto *city39a_main
goto *city39b_main



*city39b_01

lsp 700,":a;chara\mob_daizin.bmp",0,0:print 10,500
gosub *setwindow_01
name "Minister A"
>The fighters in the Colosseum were instrumental in the defense.@
>Without their help, the castle would have fallen.\
>Of course, you played the biggest role.@
>I, and the citizens, thank you from the bottom of our hearts.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city39b_main



*city39b_02

lsp 700,":a;chara\mob_daizin.bmp",0,0:print 10,500
gosub *setwindow_01
name "Minister B"
>To think the enemy could have invaded the castle itself...@
>Since I'm an old man, they passed me by without raping me.\
>I'm so jealous...@
>Err no, that was...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city39b_main



*city39b_03

lsp 700,":a;chara\mob_daizin.bmp",0,0:print 10,500
gosub *setwindow_01
name "Minister C"
>The fact that Ilias ordered the surprise attack is already all over the town.@
>We must control the unrest and restore order.\
>We've also heard that the taboo of crossing with monsters has all but gone out the window, too.@
>There are stories of wanton promiscuity in the alleys.\
>I sort of want to join in...@
>...I'm joking, joking.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city39b_main



*city39b_04

lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Guard A"
>To be honest, I was against hiring the Colosseum fighters as Royal Guards.@
>I thought if there ever was an emergency, they'd instantly switch sides.\
>But in fact, they were the ones who fought most bravely.@
>I'm ashamed of myself at my discrimination...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city39b_main



*city39b_05

lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Guard B"
>You were amazing in the Colosseum!@> I was watching!@
>If I was the one out there, I would have surrendered before even trying to attack!\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city39b_main



*city39b_06

lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Guard Captain"
>Some of my men were just raped, but others were actually eaten...@
>Even if my opponent is Ilias herself, I'll never forgive her...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city39b_main



*city39b_07

lsp 700,":a;chara\durahan_st01.bmp",228,0:print 10,500
gosub *setwindow_01
name "Dullahan"
>I'm in your debt, Hero.@
>I must steadily increase my own strength for next time...\
>If enemies are to attack again, I will protect Her Majesty!\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city39b_main



*city39b_10

bg "bg\bg045.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\grandnoa_st01.bmp",0,0:print 10,500
name "Grand Noah Queen"
>Oh... If it isn't the Hero Luka.@
>Just the sight of you is enough to inspire me with hope.\
>As you may have noticed, we have created big countermeasures for another possible invasion.@
>If another assault comes, we will be ready and waiting.\
if %ivent06<2 name "":cspl 3,7:csp 611:cspl 699,705:bg "bg\bg065.bmp",7,1000:goto *city39b_main
>In addition, we have received a letter from the Sabasa King.@
>Our wills have become one in this time of crisis.\
>At the center of that is you, Hero Luka.\
name ""
name "Luka"
>I'm not that great of a person...\
name ""
name "Grand Noah Queen"
>No, no... The whole hope of the world rests on your shoulders.@
>So please don't be too reckless.\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg065.bmp",7,1000
goto *city39b_main



*city39b_11

bg "bg\bg060.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_heisi1.bmp",-160,0
lsp 701,":a;chara\mob_heisi1.bmp",160,0:print 10,500
name "Guard A"
>Luckily, nobody was killed from my unit.@
>Oh sure a lot of us were raped, and our reputation suffered some...\
>Rather, it feels like the guys who weren't raped took some mental damage.@
>They feel like they were passed over because they weren't manly enough, or something.\
name ""
name "Guard B"
>The monsters ran right by me!@>I have no appeal!@
>They could all tell that my skill with my Spear is horrible!\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg065.bmp",7,1000
goto *city39b_main



*city40_main0

saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\habataki.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg088.bmp",7,1500
bgm "bgm\yamatai.ogg"
goto *city40_main



*city40_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Old Man ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Boy ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Village Girl ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Old Woman ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Man ",95,280:spbtn 605,605
lsp 610,":s/20,20,0;#FFFFFF#FF4444Cat Shrine ",410,160:spbtn 610,610
lsp 611,":s/20,20,0;#FFFFFF#FF4444Shirohebi's Shrine ",410,190:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Kitsune Shrine ",410,220:spbtn 612,612
lsp 613,":s/20,20,0;#FFFFFF#FF4444Meeting Hall ",410,250:spbtn 613,613
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city40_main
if %cmd1=-1 gosub *menu:goto *city40_main
cspl 600,699
if %cmd1=601 goto *city40_01
if %cmd1=602 goto *city40_02
if %cmd1=603 goto *city40_03
if %cmd1=604 goto *city40_04
if %cmd1=605 goto *city40_05
if %cmd1=610 goto *city40_10
if %cmd1=611 goto *city40_11
if %cmd1=612 goto *city40_12
if %cmd1=613 goto *city40_13
if %cmd1=619 return
goto *city40_main



*city40_01

lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Old Man"
>I liked those Akaname youngsters.@
>...Oops, not good.@> Gotta stop talking about them, or a bloodbath will occur.\
>I'm just an innocent old man...@
>I don't want my wife to go through with the Blood Carnival...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city40_main



*city40_02

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Boy"
>All of the people that were a victim of the Miko Lamia have recovered.@
>Though they had so much squeezed out of them, many won't be able to stand for a while...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city40_main



*city40_03

lsp 700,":a;chara\mob_musume1.bmp",175,0:print 10,500
gosub *setwindow_01
name "Village Girl"
>Ever since that attack, all the men can talk about are those monsters.@
>"That monster was beautiful, no that one was more..."@
>It makes me really angry.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city40_main



*city40_04

lsp 700,":a;chara\mob_rouba.bmp",0,0:print 10,500
gosub *setwindow_01
name "Old Woman"
>When the village was attacked, the Elf defenders all rushed over.@
>Without their aid, I think there would have been a lot more victims.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city40_main



*city40_05

lsp 700,":a;chara\mob_ozisan3.bmp",0,0:print 10,500
gosub *setwindow_01
name "Man"
>This all happened right as we were going to build an Ilias Shrine.@
>Now we really have to hurry up and build it!\
name ""
name "Luka"
>After what just happened, why would you build it?\
>I don't think anyone would pray at it...\
name ""
name "Man"
>If you don't build a shrine, the Gods will curse you!@
>That's the Yamatai Village way.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city40_main



*city40_10

bg "bg\bg159.bmp",7,1000
gosub *setwindow_01
if %ivent01=0 gosub *city_noiv:cspl 3,7:csp 611:cspl 699,705:bg "bg\bg088.bmp",7,1000:goto *city40_main
lsp 700,":a;chara\gob_st01.bmp",-200,0
lsp 701,":a;chara\nekomata_st04.bmp",200,60:print 10,500
name "Goblin Girl"
>Ah, Luka!@
>Thank you for before!\
name ""
name "Nekomata"
>...Unya. \
name ""
>The two are happily eating roasted fish.@
>It looks like they're good friends.\
lsp 700,":a;chara\alice_st71.bmp",-240,50
lsp 701,":a;chara\gob_st01.bmp",-30,0
lsp 702,":a;chara\nekomata_st04.bmp",240,60:print 10,500
name "Alice"
>Hum, fish.@
>Good temperature.@>Good seasoning...\
name ""
lsp 701,":a;chara\gob_st04.bmp",-30,0:print 10,500
name "Goblin Girl"
>...D...Do you want to try some?\
name ""
lsp 700,":a;chara\alice_st79.bmp",-240,50:print 10,500
name "Alice"
>Of course. \
name ""
lsp 701,":a;chara\gob_st01.bmp",-30,0:print 10,500
>The three of them sit around a fire, eating roasted fish.@
>It's a heartwarming sight...@> But I can't forget about the threat to the world.\
lsp 701,":a;chara\gob_st04.bmp",-30,0:print 10,500
name "Goblin Girl"
>Due to this mess, I won't be able to go back for a while...@
>There are a lot of broken buildings, so I'm going to help clear debris and bring lumber.\
>Is everyone in Iliasburg alright?\
name ""
name "Luka"
>The damage was minimal there, it's all right.@
>And your three friends are all fine.\
name ""
lsp 701,":a;chara\gob_st01.bmp",-30,0:print 10,500
name "Goblin Girl"
>Yaay!@>Alright!@
>I hope the world gets peaceful soon!\
name ""
name "Nekomata"
>Unya!\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg088.bmp",7,1000
goto *city40_main



*city40_11

bg "bg\bg159.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\sirohebi_st11.bmp",0,0:print 10,500
name "Shirohebi"
>We are truly in your debt now.@
>Thanks to you, the damage we sustained was very minor.\
>My older sister is a greedy, aggressive and perverse person...@> But she is not evil by nature.\
>She isn't willing to listen to me at the moment...@> But I believe if I keep preaching to her, she will eventually go back to how she was in the long past.\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg088.bmp",7,1000
goto *city40_main



*city40_12

bg "bg\bg159.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\youko_st01.bmp",0,0:print 10,500
name "Kitsune"
>I...I was so scared!@
>But I still fought with everything I had in my own way!\
name ""
name "Luka"
>How did you fight?\
name ""
name "Kitsune"
>I threw stones from a distance...@
>And threw tacks all over the road...\
name ""
name "Luka"
>Ah... Yeah, it sounds like you did your best...\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\youko_st01.bmp",160,0:print 10,500
name "Alice"
>Good, Fox.@> I'll give you a present!@
>Here, fried tofu!\
name ""
name "Kitsune"
>Yaaay!@> *Crunch*@
lsp 701,":a;chara\youko_st03.bmp",160,0:print 10,500
>S...Spicy!@> Spicy spicy spicy!!!!\
name ""
lsp 700,":a;chara\alice_st72.bmp",-170,50:print 10,500
name "Alice"
>Bahahahahaha!@
>The most powerfully spicy fried tofu in the world!\
>I was saving it for your master, but this is good too!\
name ""
name "Luka"
>How childish...\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg088.bmp",7,1000
goto *city40_main



*city40_13

gosub *setwindow_01
bg "bg\bg090.bmp",7,1000
>Some beds are laid out, with weak looking men laying on them.\
lsp 700,":a;chara\mob_seinen1.bmp",-240,0:print 10,500
name "Youngster A"
>I was milked all the way dry by a monster.@
>She kept sucking and sucking until I couldn't even stand...\
name ""
lsp 701,":a;chara\mob_seinen1.bmp",-80,0:print 10,500
name "Youngster B"
>I was attacked by the Akaname girls!@
>They licked my entire body clean...\
name ""
lsp 702,":a;chara\mob_seinen1.bmp",80,0:print 10,500
name "Youngster C"
>I was attacked by Kejourou...@
>She forced me to come over and over with her hair!\
name ""
lsp 703,":a;chara\mob_seinen1.bmp",240,0:print 10,500
name "Youngster D"
>Hmph.@>Plebeians.@> I was attacked by Miko Lamia!@
>Get on my level.\
name ""
name "Luka"
>..............\
name ""
cspl 700,703
lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
name "Village Chief"
>Deplorable.@
>I didn't even get to see any of them...\
name ""
name "Luka"
>I...I'm sorry?\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg088.bmp",7,1000
goto *city40_main



*city41_main0

saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\habataki.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg095.bmp",7,1500
bgm "bgm\plansect.ogg"
goto *city41_main



*city41_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Alraune ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Dryad ",95,190:spbtn 602,602
strsp 603,"Alra Arum",95,220,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,603
strsp 604,"Alra Rooty",95,250,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 604,604
strsp 605,"Alra Mash",95,280,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 605,605
strsp 606,"Alra Priestess",95,310,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 606,606
lsp 610,":s/20,20,0;#FFFFFF#FF4444Tarantula Girl ",410,160:spbtn 610,610
strsp 611,"Moth Girl",410,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
strsp 612,"Mosquito Girl",410,220,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 612,612
lsp 613,":s/20,20,0;#FFFFFF#FF4444Caterpillar Girl ",410,250:spbtn 613,613
strsp 614,"Silkworm Girl",410,280,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 614,614
strsp 615,"Hornet Girl",410,310,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 615,615
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city41_main
if %cmd1=-1 gosub *menu:goto *city41_main
cspl 600,699
if %cmd1=601 goto *city41_01
if %cmd1=602 goto *city41_02
if %cmd1=603 goto *city41_03
if %cmd1=604 goto *city41_04
if %cmd1=605 goto *city41_05
if %cmd1=606 goto *city41_06
if %cmd1=610 goto *city41_10
if %cmd1=611 goto *city41_11
if %cmd1=612 goto *city41_12
if %cmd1=613 goto *city41_13
if %cmd1=614 goto *city41_14
if %cmd1=615 goto *city41_15
if %cmd1=619 return
goto *city41_main



*city41_01

lsp 700,":a;chara\mob_mamono2.bmp",157,0:print 10,500
gosub *setwindow_01
name "Alraune"
>This is the village of coexistence, Plansect.@
>With Alra Priestess as the new Queen, our beliefs are all in synch.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city41_main



*city41_02

lsp 700,":a;chara\dryad_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Dryad"
>If it wasn't for the sacrifice of our previous Queen, just how many of us would have been killed...?\
>She traded her own life for our own...\
lsp 700,":a;chara\dryad_st11.bmp",0,0:print 10,500
>...I'll kill all of those assholes!@
>I'll never forgive those heaven pieces of shit!\
lsp 700,":a;chara\dryad_st01.bmp",0,0:print 10,500
>Ah...@>Excuse me.@
>Ever since then, my bad side has come out a couple times...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city41_main



*city41_03

lsp 700,":a;chara\a_alm_st01.bmp",200,0:print 10,500
gosub *setwindow_01
name "Alra Arum"
>We've reaffirmed the oath we took before.@
>Never again will we contest this shared village.\
>I feel that our mutual struggles are strengthening the bond between plant and insect.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city41_main



*city41_04

lsp 700,":a;chara\a_looty_st03.bmp",220,130:print 10,500
gosub *setwindow_01
name "Alra Rooty"
>Almost all of my sap was sucked up...@
>Those plant people are all unfeeling losers...!\
>...Eh, wait a second...\
name ""
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city41_main



*city41_05

lsp 700,":a;chara\a_mash_st01.bmp",260,70:print 10,500
gosub *setwindow_01
name "Alra Mash"
>Those three Canaan sisters are still sealed.@
>Queen Alraune's death came as a huge shock to them.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city41_main



*city41_06

lsp 700,":a;chara\a_emp_st11b.bmp",230,60:print 10,500
gosub *setwindow_01
name "Alra Priestess"
>The rank of Queen...@> It's not something I will be used to for a long time.@
>But I will not fold under the pressure of this position.\
>I must mobilize everyone for a time of upcoming hardship.@
>As Queen, I will do everything I can.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city41_main



*city41_10

lsp 700,":a;chara\mob_mamono3.bmp",0,0:print 10,500
gosub *setwindow_01
name "Tarantula Girl"
>Right as I thought our long war was over, a new global one starts...@
>It's only a matter of time until an army assaults this village.\
>Before that happens, we're using the precious time to fix our defenses and assemble our own soldiers.@
>But the trouble comes when we're unable to even damage the angels...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city41_main



*city41_11

lsp 700,":a;chara\moss_st01.bmp",230,20:print 10,500
gosub *setwindow_01
name "Moth Girl"
>Even us insects were saved by Queen Alraune's sacrifice.@
>We have no complaints about joining together with the plant family now.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city41_main



*city41_12

lsp 700,":a;chara\mosquito_st01.bmp",220,70:print 10,500
gosub *setwindow_01
name "Mosquito Girl"
>I flew all over the forest with Arum to help all of our friends.@
>I think our friendship is growing stronger by the day...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city41_main



*city41_13

lsp 700,":a;chara\imomusi_st02.bmp",180,130:print 10,500
gosub *setwindow_01
name "Caterpillar Girl"
>Thank you for helping us again! @
>This makes two times you've saved us...\
>Have a delicious orange! \
name ""
lsp 700,":a;chara\alice_st79.bmp",-170,50
lsp 701,":a;chara\imomusi_st02.bmp",340,130:print 10,500
name "Alice"
>Mmm... Sweet.@
>Mmm... Delicious.\
name ""
name "Luka"
>Don't eat so fast...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city41_main



*city41_14

lsp 700,":a;chara\kaiko_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Silkworm Girl"
>To think I would be the one about to be sucked dry...@
>But... It did feel very good.@>I think I could get addicted to it...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city41_main



*city41_15

lsp 700,":a;chara\suzumebati_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Hornet Girl"
>OUR BATTLE POTENTIAL... LOWER.@
>WITHOUT QUEEN, GREAT DANGER.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city41_main



*map12

saveoff
textoff
csp -1
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
bg "bg\map5.bmp",10,1000
goto *map12_2



*map12_2

if %ivent11>0 strsp 601,"Grangold Castle",635,320,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 601,11
if %ivent12>0 strsp 602,"Succubus Village",390,270,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 602,12
if %ivent12=1 strsp 606,"Req. Level: 76",400,290,8,1,20,20,0,0,1,1,#FFFFFF
if %ivent12=2 lsp 606,":s/20,20,0;#FFFFFFDone ",450,290
if %ivent11>0 strsp 605,"Gold Port",295,110,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 605,13
if %ivent11>0 && %ivent17=0 strsp 607,"Req. Level: 76",270,130,8,1,20,20,0,0,1,1,#FFFFFF
if %ivent17=2 lsp 607,":s/20,20,0;#FFFFFFDone ",320,130
strsp 604,"Gold Volcano",370,410,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 604,14
strsp 608,"Req. Level: 76",360,430,8,1,20,20,0,0,1,1,#FFFFFF
print 1
btnwait2 %cmd1
if %cmd1=0 goto *map12_2
if %cmd1=-1 gosub *menu:goto *map12_2
csp -1
btndef clear
if %cmd1=11 gosub *city42_main0:dwave 1,"se\habataki.ogg":bg black,7,1500:bgm "bgm\field4.ogg":goto *map12
if %cmd1=12 && %ivent12=1 goto *sean0372
if %cmd1=12 && %ivent12=2 gosub *city43_main0:dwave 1,"se\habataki.ogg":bg black,7,1500:bgm "bgm\field4.ogg":goto *map12
if %cmd1=13 && %ivent17=0 goto *sean0376
if %cmd1=13 && %ivent17=2 gosub *city44_main0:dwave 1,"se\habataki.ogg":bg black,7,1500:bgm "bgm\field4.ogg":goto *map12
if %cmd1=14 goto *sean0379
goto *map12_2



*city42_main0

saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\habataki.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg100.bmp",7,1500
bgm "bgm\city1.ogg"
goto *city42_main



*city42_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Boy ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Young Woman ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Man ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Old Woman ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Ant Girl ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Mud Golem Girl ",95,310:spbtn 606,606
strsp 610,"Tool Shop",410,160,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
lsp 611,":s/20,20,0;#FFFFFF#FF4444Church ",410,190:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Magic Laboratory ",410,220:spbtn 612,612
strsp 613,"Grangold Castle",410,250,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 613,613
strsp 614,"Assembly Hall",410,280,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 614,614
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city42_main
if %cmd1=-1 gosub *menu:goto *city42_main
cspl 600,699
if %cmd1=601 goto *city42_01
if %cmd1=602 goto *city42_02
if %cmd1=603 goto *city42_03
if %cmd1=604 goto *city42_04
if %cmd1=605 goto *city42_05
if %cmd1=606 goto *city42_06
if %cmd1=610 goto *city42_10
if %cmd1=611 goto *city42_11
if %cmd1=612 goto *city42_12
if %cmd1=613 goto *city42_13
if %cmd1=614 goto *city42_14
if %cmd1=619 return
goto *city42_main



*city42_01

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Boy"
>The Ant Girls helped us again this time.@
>If not for them, Grangold would be gone...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city42_main



*city42_02

lsp 700,":a;chara\mob_musume2.bmp",175,0:print 10,500
gosub *setwindow_01
name "Young Woman"
>My boyfriend left me for an Ant Girl!@
>I stormed out of the house in anger...\
>Eh?@>Why was an Ant Girl in our house?@
>Well, because I got her to do all the housework instead of me...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city42_main



*city42_03

lsp 700,":a;chara\mob_ozisan2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Man"
>A...An Ant Girl helped me...@
>She carried me to a safe place when I couldn't even stand!\
>I was always complaining about them, too... That we would never be able to live in peace when they were around...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city42_main



*city42_04

lsp 700,":a;chara\mob_rouba.bmp",0,0:print 10,500
gosub *setwindow_01
name "Old Woman"
>First ants, then spiders...@>I'm so sick of insects.@
>But I'll thank the Ant Girls at least for helping me.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city42_main



*city42_05

lsp 700,":a;chara\ant_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Ant Girl"
>PROTECT FROM ATTACK.@
>NEED WALLS HERE...\
name ""
>The Ant Girls seem to be absorbed in constructing new defensive fortifications.\
cspl 3,7
csp 611
cspl 699,705
goto *city42_main



*city42_06

lsp 700,":a;chara\madgolem_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Mud Golem Girl"
>CURRENTLY BUILDING WALLS.@
>DANGEROUS HERE. BE CAREFUL.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city42_main



*city42_10

bg "bg\bg151.bmp",7,1000
lsp 700,":a;chara\mob_ozisan1.bmp",-160,0
lsp 701,":a;chara\ant_st01.bmp",160,0:print 10,500
gosub *setwindow_01
name "Ant Girl"
>SORRY.@> CLOSED NOW.\
name ""
name "Shopkeeper"
>All of my weapons were sold during the last fight.@
>I wonder if it's the same for every weapon shop around the world?\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg100.bmp",7,1000
goto *city42_main



*city42_11

bg "bg\bg156.bmp",7,1000
lsp 700,":a;chara\ant_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Ant Girl"
>I SHALL PRAY FOR YOU...\
name ""
name "Luka"
>Are you sure?@>I mean this is a church that was built for Ilias after all...\
name ""
name "Ant Girl"
>PRAYER...\
name ""
name "Luka"
>Ah... Ok... Sure.\
name ""
>After I pray with the Ant Girl, I leave the church.\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg100.bmp",7,1000
goto *city42_main



*city42_12

bg "bg\bg161.bmp",7,1000
lsp 700,":a;chara\mob_madou.bmp",0,0:print 10,500
gosub *setwindow_01
name "Magic Engineer"
>The Golem was destroyed by the attackers, and we're all busy with her repair.@
>I'm taking over from my predecessor at such a confusing time...\
name ""
name "Luka"
>Did the former person in charge quit?\
name ""
name "Magic Engineer"
>He took responsibility for the Ant Girls rebellion, and was fired... Ostensibly.@
>In truth, he was doing some illegal things, underneath even the King's nose.\
>He made the power source of the Golem convicted criminals.@
>And stockpiling poisons against international treaties.\
>We've completely cut relations with Promestein, as well.@
>Or rather, she hasn't tried to contact us.\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg100.bmp",7,1000
goto *city42_main



*city42_13

gosub *setwindow_01
name "Luka"
>Nobody is allowed through here?\
name ""
>The Castle seems to have been damaged in the last attack again.@
>The entrance is blocked off for repairs.\
cspl 3,7
csp 611
cspl 699,705
goto *city42_main



*city42_14

bg "bg\bg105.bmp",7,1000
lsp 700,":a;chara\grangold_st04.bmp",0,0:print 10,500
gosub *setwindow_01
name "Grangold King"
>I feel like I'm always in this warehouse.\
>Just when I was thinking the Castle was going to be repaired after the rebellion...@
>It gets attacked and destroyed again.\
>I wonder if my reign will be nicknamed "The Warehouse King".\
name ""
lsp 700,":a;chara\grangold_st04.bmp",-160,0
lsp 701,":a;chara\queenant_st01.bmp",160,0:print 10,500
name "Queen Ant"
>Great things remain to be completed.@
>I'm sure you will be remembered for those, not this warehouse.\
name ""
name "Grangold King"
>Hmmm...@>But I'd like a nickname like the founder's "Magic King" or the third generation's "Patriot King".\
>So I must do my best to survive this time of national crisis.\
>Luka, let us do our best together!@
>The King as King, and the Hero as the Hero!\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg100.bmp",7,1000
goto *city42_main



*city43_main0

mov %genzaiti,13
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\habataki.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg103.bmp",7,1500
bgm "bgm\mura2.ogg"
goto *city43_main



*city43_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Youth ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Prostitute ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Young Sisters ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Soldier ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Soothsayer ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Amira ",95,310:spbtn 606,606
strsp 610,"Tool Shop",410,160,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
lsp 611,":s/20,20,0;#FFFFFF#FF4444Church ",410,190:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Bar ",410,220:spbtn 612,612
lsp 613,":s/20,20,0;#FFFFFF#FF4444Mayor's House ",410,250:spbtn 613,613
strsp 614,"Ceremony Room",410,280,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 614,614
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city43_main
if %cmd1=-1 gosub *menu:goto *city43_main
cspl 600,699
if %cmd1=601 goto *city43_01
if %cmd1=602 goto *city43_02
if %cmd1=603 goto *city43_03
if %cmd1=604 goto *city43_04
if %cmd1=605 goto *city43_05
if %cmd1=606 goto *city43_06
if %cmd1=610 goto *city43_10
if %cmd1=611 goto *city43_11
if %cmd1=612 goto *city43_12
if %cmd1=613 goto *city43_13
if %cmd1=614 goto *city43_14
if %cmd1=619 return
goto *city43_main



*city43_01

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Feed A"
>Even though they sucked too much, they kept sucking...@
>Ahh... I'm so dizzy...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city43_main



*city43_02

lsp 700,":a;chara\maccubus_st11.bmp",175,0:print 10,500
gosub *setwindow_01
name "Maccubus"
>To think they would come to this village to steal our men!@
>They are our common property... Such impudence!\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city43_main



*city43_03

lsp 700,":a;chara\renccubus_st01.bmp",15,0
lsp 701,":a;chara\minccubus_st01.bmp",335,50:print 10,500
gosub *setwindow_01
name "Lencubus"
>I fought as hard as I could this time, but..@
>I never thought such an intense barrier could be set up!\
name ""
name "Mincubus"
>I fought my hardest too!@
>Even though I wasn't too useful...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city43_main



*city43_04

lsp 700,":a;chara\mob_sensi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Feed B"
>Haa! Haa! Hoo!\
name ""
>There seem to still be some after effects...\
cspl 3,7
csp 611
cspl 699,705
goto *city43_main



*city43_05

lsp 700,":a;chara\witchs_st11.bmp",0,50:print 10,500
gosub *setwindow_01
name "Succubus Witch"
>Even my fortune telling wasn't able to predict that...@
>I still can't predict what's going to happen in the future, either.\
>But I can tell it depends on your sword.@
>I'm looking forward to the future, little Hero. \
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city43_main



*city43_06

bgm "bgm\amira.ogg"
gosub *setwindow_01
lsp 700,":a;chara\amira_st01.bmp",0,0:print 10,1500
name "Amira"
>It's Amira, the one who watches over you day and night.@
>Do your best!@>We'll be watching you closely from the shadows!\
name ""
name "Luka"
>That's kind of scary...\
name ""
name ""
lsp 700,":a;chara\amira_st01.bmp",-160,0
lsp 699,":a;chara\zannen_st01.bmp",180,0:print 10,1500
name "Pyhar"
>I wanted hot guys!@> They gave me fried potatoes!@
>Did you think I'd eat them without noticing the difference!?@> Stupid Village Mayor!\
name ""
csp 700
lsp 698,":a;chara\zannen_st02.bmp",-200,0:print 10,1500
name "Diamrem"
>W...Water...\
name ""
csp 699
lsp 697,":a;chara\zannen_st03.bmp",160,0:print 10,1500
name "Ga*****d"
>.................\
name ""
name "Luka"
>.............\
name ""
csp 698
lsp 700,":a;chara\alice_st71.bmp",-170,50:print 10,1500
name "Alice"
>..............\
name ""
cspl 3,7
csp 611
cspl 697,705
bgm "bgm\mura2.ogg"
goto *city43_main



*city43_10

bg "bg\bg151.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
name "Shopkeeper"
>I just fell down and started ejaculating...@>It didn't feel good at all!@
>U...Uhh...@> Uwaaaah!\
name ""
>He's crying a lot...\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg103.bmp",7,1000
goto *city43_main



*city43_11

gosub *setwindow_01
bg "bg\bg156.bmp",7,1000
>"The Church is closed. The Priest is corrupt." is written on a note attached to the door.@
>I wonder if they ever used the Church in this village?\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg103.bmp",7,1000
goto *city43_main



*city43_12

gosub *setwindow_01p
>"Closed" is posted on the door.@
>I guess it wouldn't make sense to open up during the attack going on.\
cspl 3,7
csp 611
cspl 699,705
goto *city43_main



*city43_13

bg "bg\bg106.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\succubus_st01.bmp",0,50:print 10,500
name "Village Chief"
>Thank you for helping me out.@
>In appreciation, I'm going to make you an honorary citizen.\
name ""
name "Luka"
>No... That's alright.@
>By the way, what's your name Ms. Mayor?\
name ""
>I've actually been curious for a while now...@>I've never heard anyone call her by her name.\
name "Village Chief"
>Ara, my name?@
>My name is Succubus.\
name ""
name "Luka"
>Eh...?@> Your name itself is Succubus?\
name ""
lsp 700,":a;chara\alice_st71.bmp",-170,50
lsp 701,":a;chara\succubus_st01.bmp",160,50:print 10,500
name "Alice"
>It may be strange from a human naming sense, but high-ranking monsters will grant their race name to their daughters.\
>In particular, the leaders of the tribe will bestow their race name upon their children.@
>I'm sure Succubus after Succubus was the mayor of this village, right?\
name ""
name "Village Chief"
>That's right, Monster Lord.@
>Those who inherit our family's birthright have been named Succubus for generations.\
name ""
name "Luka"
>I see... So that's how it is.\
name ""
>I get it.@
>The Mayor's name is Succubus.\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg103.bmp",7,1000
goto *city43_main



*city43_14

bg "bg\bg110.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\lilith_st01.bmp",138,0:print 10,500
name "Lilith"
>I never thought I would see the Great Barrier of Babylon in this era.@
>The one who first created it was the legendary Succubus nicknamed the "Great Whore of Babylon".\
name ""
name "Luka"
>A legendary Succubus...@
>Isn't that what you two were also called?\
name ""
name "Lilim"
>It's true we became famous around five hundred years ago...@
>...But we aren't in that mythological class, unfortunately.\
>I think that somewhere through the years, our stories got mixed up with the Great Whore of Babylon's.\
name ""
lsp 700,":a;chara\alice_st74.bmp",-170,50
lsp 701,":a;chara\lilith_st01.bmp",298,0:print 10,500
name "Alice"
>A mixture of legends... A common happening.@
>Isn't a case of mistaken identity not too far fetched, after hundreds of years?\
name ""
name "Luka"
>Then could there be another legendary Succubus out there?\
name ""
csp 701
lsp 700,":a;chara\lilith_st01.bmp",138,0:print 10,500
name "Lilith"
>One of the six ancestors, the progenitor of all Succubi...@
>A mythological level Succubus worthy of the title of Great Whore of Babylon.\
>There's no way we could have been mistaken for her and summoned on accident...\
name ""
name "Lilim"
>Even if we say that, we were still the Queen Succubi from five hundred years ago.@
>We may not have been mythological level...@> But we were still the top Succubi.\
name ""
name "Luka"
>I...I understand.\
name ""
>They seem to take it personally...\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg103.bmp",7,1000
goto *city43_main



*city44_main0

saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\habataki.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg119.bmp",7,1500
bgm "bgm\gordport.ogg"
goto *city44_main



*city44_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Boy ",95,160:spbtn 601,601
strsp 602,"Town Girl",95,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Lupton ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Arakure ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Soldier ",95,280:spbtn 605,605
strsp 610,"Weapon Shop",410,160,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
strsp 611,"Tool Shop",410,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Ilias Kreuz Headquarters ",410,220:spbtn 612,612
lsp 613,":s/20,20,0;#FFFFFF#FF4444Port ",410,250:spbtn 613,613
strsp 614,"Hero's Shrine",410,280,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 614,614
lsp 615,":s/20,20,0;#FFFFFF#FF4444Cemetery ",410,310:spbtn 615,615
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city44_main
if %cmd1=-1 gosub *menu:goto *city44_main
cspl 600,699
if %cmd1=601 goto *city44_01
if %cmd1=602 goto *city44_02
if %cmd1=603 goto *city44_03
if %cmd1=604 goto *city44_04
if %cmd1=605 goto *city44_05
if %cmd1=610 goto *city44_10
if %cmd1=611 goto *city44_11
if %cmd1=612 goto *city44_12
if %cmd1=613 goto *city44_13
if %cmd1=614 goto *city44_14
if %cmd1=615 goto *city44_15
if %cmd1=619 return
goto *city44_main



*city44_01

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Boy"
>A...A machine monster attacked me...@
>What should I do if they come back?\
>Please, Hero... Protect our town forever...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city44_main



*city44_02

lsp 700,":a;chara\mob_musume1.bmp",175,0:print 10,500
gosub *setwindow_01
name "Town Girl"
>The Ant Girls are better than the mechanical monsters.@
>I guess I should go back to Grangold...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city44_main



*city44_03

lsp 700,":a;chara\mob_gorotuki3.bmp",0,0:print 10,500
gosub *setwindow_01
name "Lupton"
>I can't believe Lazarus protected the town at the cost of his own life.@
>I never thought he'd do something like that.\
>I heard that he was some straight shooting big shot soldier in his youth.@
>Maybe he somehow reclaimed his past at the end?\
>Anyway, as his former vice chief, I'll pray for him to rest in peace.\
name ""
name "Luka"
>You're the former vice chief of Ilias Kreuz?@
>Hey...@> Haven't I seen you somewhere before?\
name ""
name "Lupton"
>Hey!@> Did you forget?@
>We met at the western shrine!\
>Don't ya remember me explaining about that huge egg?@
>I'm the vice chief of Ilias Kreuz!\
>...No, former vice chief.@
>Ilias Kreuz has been completely wiped out...\
name ""
name "Luka"
>.............\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city44_main



*city44_04

lsp 700,":a;chara\mob_gorotuki1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Arakure"
>My friend was taken by those machine soldiers!@
>Damn it... Where did he go!?\
>Hey... Please, can you help us out?@
>The guy who was kidnapped has a lot of friends looking for him...\
name ""
name "Luka"
>..............\
name ""
>I want to help, but I have no idea where he might have been taken...\
cspl 3,7
csp 611
cspl 699,705
goto *city44_main



*city44_05

lsp 700,":a;chara\mob_sensi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier"
>I can't believe Ilias sent those machine monsters at us.@
>I was never a firm believer, but it still left me in shock.\
>Odd as it may sound, there weren't too many pious believers here to begin with.@
>Strange, when you think that Ilias Kreuz was headquartered here...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city44_main



*city44_10

bg "bg\bg152.bmp",7,1000
lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Shopkeeper"
>My weapons are selling like crazy... I can't keep any in stock!@
>I bet there's a weapon shortage all over the world.\
>If I may say so myself, I'm a pretty good sword smith.@
>If the demand is this high, I'm going to make a killing!\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg119.bmp",7,1000
goto *city44_main



*city44_11

bg "bg\bg154.bmp",7,1000
lsp 700,":a;chara\mob_ozisan2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Shopkeeper"
>We've got a lot of parts from the broken machine monsters, but the technology in them is insane.\
>I always thought the tales about Ilias were all old, boring stories...@> To think she had this kind of advanced tech available!\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg119.bmp",7,1000
goto *city44_main



*city44_12

bg "bg\bg117.bmp",7,1000
gosub *setwindow_01
name "Luka"
>............\
name ""
>With Lazarus dead, nobody is here.@
>It seems like the organization known as Ilias Kreuz has fallen apart.\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg119.bmp",7,1000
goto *city44_main



*city44_13

bg "bg\bg118.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_sentyou.bmp",0,0:print 10,500
name "Captain"
>I've heard rumors of a ghost ship sailing along the coast.@
>I'm sure it's a lie, but they said it was flying the flag of Captain Selene...\
>But if it's true, does she have some sort of regret here?@
>This town was known as her hometown, after all...\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg119.bmp",7,1000
goto *city44_main



*city44_14

bg "bg\bg092.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_sinkan.bmp",-220,0
lsp 701,":a;chara\mob_sinkan.bmp",0,0
lsp 702,":a;chara\mob_sinkan.bmp",220,0:print 10,500
name "Sage A"
>We are the Three Sages...\
name ""
name "Sage B"
>That surprise attack shocked the world.@
>Eh? Shocked?@> Or should it be astounded?\
name ""
name "Sage C"
>It doesn't matter!\
name ""
>These three seem to be less energetic than before...@
>They must be shocked at what happened.\
name "Luka"
>Are you three alright?@> You didn't evacuate, did you?\
name ""
name "Sage A"
>They didn't want to attack three old men.\
name ""
name "Sage B"
>We're just going to play cards here until the end of the world.\
name ""
name "Sage C"
>True Hero, please join us.@
>Playing Hearts with three people is boring...\
name ""
name "Luka"
>No... I'm alright.\
name ""
>I refuse the invitation to join their game, and quickly leave.\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg119.bmp",7,1000
goto *city44_main



*city44_15

bg "bg\bg168.bmp",7,1000
gosub *setwindow_01
bgm "bgm\kanasimi2.ogg"
name "Luka"
>..........\
name ""
>This is where my father's grave is.@
>I don't even really know all that much about him.\
>Why did he first decide to go on a journey to subdue the Monster Lord?@
>When did he meet my mother, a Fallen Angel?\
>What exactly made him decide to stop exterminating monsters?@
>And why did he start protecting monsters by sending them to Enrika?\
name "Luka"
>I want to know more about you, father...\
name ""
>I'm sure Lazarus knew a lot, but he's gone too.@
>And my mother is resting in Iliasburg...\
>In other words, the three who knew about my parents' past are gone.\
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Nobody remains who knows of his story...@
>Just what sorts of adventures did your father go on?\
name ""
name "Luka"
>I want to know, but there's nothing I can do...@
>All I can do... Is stand here.\
>I'm sure my father's death was not a waste.@
>Because I'm standing here, carrying on his wishes.\
name ""
lsp 700,":a;chara\alice_st74.bmp",0,50:print 10,500
name "Alice"
>And I'm here beside you.@
>Fate is strange, isn't it?\
name ""
>We vow again in front of my father's grave.@
>With our own hands, we'll create a world where humans and monsters can coexist peacefully.\
cspl 3,7
csp 611
cspl 699,705
bgm "bgm\gordport.ogg"
bg "bg\bg119.bmp",7,1000
goto *city44_main



*map13

saveoff
textoff
csp -1
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
bg "bg\map0.bmp",10,1000
goto *map13_2



*map13_2

if %ivent14>0 lsp 601,":s/20,20,0;#FFFFFF#FF4444Drain Lab ",25,340:spbtn 601,11
if %ivent14=1 strsp 604,"Req. Level: 77",0,360,8,1,20,20,0,0,1,1,#FFFFFF
if %ivent14=3 lsp 604,":s/20,20,0;#FFFFFFDone ",50,360
if %ivent05>1 lsp 602,":s/20,20,0;#FFFFFF#FF4444Biolab ",420,200:spbtn 602,12
if %ivent05=2 strsp 605,"Req. Level: 77",380,220,8,1,20,20,0,0,1,1,#FFFFFF
if %ivent05=3 lsp 605,":s/20,20,0;#FFFFFFDone ",430,220
strsp 603,"Sealed Sinner's Prison",340,30,12,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,13
strsp 606,"Req. Level: 78",380,50,8,1,20,20,0,0,1,1,#FFFFFF
print 1
btnwait2 %cmd1
if %cmd1=0 goto *map13_2
if %cmd1=-1 gosub *menu:goto *map13_2
csp -1
btndef clear
if %cmd1=11 && %ivent14<3 goto *sean0384
if %cmd1=11 && %ivent14=3 goto *sean0388x
if %cmd1=12 && %ivent05<3 goto *sean0389
if %cmd1=12 && %ivent05=3 goto *sean0393x
if %cmd1=13 goto *sean0394
goto *map13_2



*city45_main0

saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg149.bmp",7,1500
mov %hanyo1,0
bgm "bgm\maouzyou2.ogg"
goto *city45_main



*city45_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Vampire ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Behemoth ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Elder Succubus ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444First Lounge ",95,250:spbtn 604,604
strsp 605,"Second Lounge",95,280,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 605,605
strsp 606,"Dining Hall",95,310,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 606,606
lsp 607,":s/20,20,0;#FFFFFF#FF4444Large Library ",95,340:spbtn 607,607
strsp 610,"Conference Room",410,160,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
lsp 611,":s/20,20,0;#FFFFFF#FF4444Granberia's Room ",410,190:spbtn 611,611
strsp 612,"Alma Elma's Room",410,220,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 612,612
strsp 613,"Tamamo's Room",410,250,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 613,613
strsp 614,"Erubetie's Room",410,280,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 614,614
strsp 615,"Monster Lord's Throne",410,310,12,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 615,615
strsp 619,"Back to My Room",410,400,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city45_main
if %cmd1=-1 gosub *menu:goto *city45_main
cspl 600,699
if %cmd1=601 goto *city45_01
if %cmd1=602 goto *city45_02
if %cmd1=603 goto *city45_03
if %cmd1=604 goto *city45_04
if %cmd1=605 goto *city45_05
if %cmd1=606 goto *city45_06
if %cmd1=607 goto *city45_07
if %cmd1=610 goto *city45_10
if %cmd1=611 && %hanyo1=0 goto *city45_11
if %cmd1=611 && %hanyo1=1 goto *city45_11k
if %cmd1=612 goto *city45_12
if %cmd1=613 goto *city45_13
if %cmd1=614 goto *city45_14
if %cmd1=615 goto *city45_15
if %cmd1=619 goto *sean0398
goto *city45_main



*city45_01

lsp 700,":a;chara\vampire_st01.bmp",175,0:print 10,500
gosub *setwindow_01
name "Vampire"
>I was never hostile to humans to begin with.@
>Most everyone inside the Monster Lord's Castle is a member of the reconciliation faction, too.\
>Most monsters who were in opposition to the reconciliation approach toward humans left the castle during the reign of the previous Monster Lord.\
>Though there were some who remained that didn't take a stance one way or the other.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city45_main



*city45_02

lsp 700,":a;chara\behemoth_st01.bmp",-30,0:print 10,500
gosub *setwindow_01
name "Behemoth"
>Those Chimeras are crazy strong.@
>Even us beast type monsters are being overpowered by their strength and agility.\
>If we don't start using some teamwork, we won't win against them.@
>I don't like it, but I guess there's no choice but to do some joint operations with humans, huh?\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city45_main



*city45_03

lsp 700,":a;chara\esuccubus_st01.bmp",188,0:print 10,500
gosub *setwindow_01
name "Elder Succubus"
>To think I'd be fighting alongside a human Hero...@
>But I know well that you wield that sword for our sakes, too.\
lsp 700,":a;chara\esuccubus_st02.bmp",188,0:print 10,500
>Ah... But, you know... @
>If you let me have just a small taste of your semen, all of my misgivings will be completely gone. \
>Hey, just let me suck a little, please? \
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city45_main



*city45_04

bg "bg\bg230.bmp",7,1000
gosub *setwindow_01
if %ivent08<2 gosub *city_noiv:cspl 3,7:csp 611:cspl 699,705:bg "bg\bg149.bmp",7,1000:goto *city45_main
if %ivent11<2 gosub *city_noiv:cspl 3,7:csp 611:cspl 699,705:bg "bg\bg149.bmp",7,1000:goto *city45_main
lsp 700,":a;chara\grangold_st04.bmp",-160,0
lsp 701,":a;chara\grandnoa_st01.bmp",160,0:print 10,500
name "Grangold King"
>It has been two years, hasn't it?@
>You haven't changed a bit since then, I see.\
name ""
name "Grand Noah Queen"
>And you...@> Seem to look more like a King than before.@
>When last we were together, I was worried about whether you would fit into the role of King or not...\
name ""
name "Grangold King"
>Haha... That was embarrassing, wasn't it?\
name ""
>Two of the rulers of the major powers seem to be talking on really familiar terms...\
name "Luka"
>You two know each other already?\
name ""
name "Grangold King"
>Until a few decades ago, Grangold and Grand Noah were on bad terms.@
>Our countries fought over who had claim to the Lima mine, where you could mine magic stones.\
name ""
name "Luka"
>I see...\
name ""
name "Grangold King"
>But after years of war, the country grew tired of constant strife.@
>So, a double marriage alliance was proposed.\
>The Prince of Grand Noah was to wed the daughter of the Grangold King.@
>And the Grand Noah Princess to the Grangold Prince.\
>The children birthed from those respective unions are the current Grand Noah Queen, and me.@
>So it's slightly convoluted, but we are related by blood.\
name ""
name "Grand Noah Queen"
>Our lineage itself is the proof of friendship between our two countries.@
>Since the double marriage, there hasn't been a single battle.\
>I hope these friendly relations will continue forever...@
>...But first we have to survive this crisis threatening the world.\
name ""
name "Grangold King"
>We'll both do our best.@
>Luka, you have the most difficult role...@>But we trust you.\
name ""
name "Luka"
>Yes, leave it to me!\
name ""
>My determination redoubles in front of the two related leaders.\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg149.bmp",7,1000
goto *city45_main



*city45_05

bg "bg\bg230.bmp",7,1000
gosub *setwindow_01
if %ivent01<2 gosub *city_noiv:cspl 3,7:csp 611:cspl 699,705:bg "bg\bg149.bmp",7,1000:goto *city45_main
lsp 700,":a;chara\mob_obasan.bmp",0,0:print 10,500
>The woman lounging on a sofa in the room...@
>It's the owner of the Sutherland Inn from Iliasburg!\
name "Luka"
>Miss, why are you here in the Monster Lord's Castle?\
name ""
name "Owner"
>I'm here as a representative of Iliasburg...\
>Iliasburg is currently the economic power in the world.@
>Our leadership is run by a council of ten members, drawn from the top ten biggest guilds.\
>And I'm the leader of the Inn guild.@
>So the council voted to send me here as the representative of Iliasburg.\
name ""
name "Luka"
>I see, so that's why...\
name ""
name "Owner"
>I didn't participate in the meeting because I was hesitant to sit alongside all those Kings and Queens.\
>But I heard the outline of the strategy.@
>Iliasburg will fully cooperate.\
name ""
name "Luka"
>Yes, let's do our best!\
name ""
name "Owner"
>...By the way, have you seen my little Lammy?@
>I brought her with me, but I think she got lost somewhere.\
name ""
name "Luka"
>If I see her, I'll let you know.\
name ""
>I wouldn't be surprised if she got lost in this huge Castle.@
>Since she's a monster herself, I doubt she'll run into any problems, but still...\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg149.bmp",7,1000
goto *city45_main



*city45_06

bg "bg\bg170.bmp",7,1000
gosub *setwindow_01
if %ivent06<2 gosub *city_noiv:cspl 3,7:csp 611:cspl 699,705:bg "bg\bg149.bmp",7,1000:goto *city45_main
if %ivent14<1 gosub *city_noiv:cspl 3,7:csp 611:cspl 699,705:bg "bg\bg149.bmp",7,1000:goto *city45_main
lsp 700,":a;chara\sabasa_st03.bmp",-160,0
lsp 699,":a;chara\sara_st33.bmp",200,0:print 10,500
name "Sabasa King"
>I thought you admired Granberia, and wished to be her apprentice for swordplay?@
>Why are you dressed as a maid and serving people here?\
name ""
name "Sara"
>Uhm...@
>It's true I admire Granberia, and came here after her...\
name ""
>Sara cringes as her father interrogates her.@
>Also, I think both of their uses of the word "admire" may not be meaning the same thing...\
name "Sabasa King"
>...Hrrm?@
>Sara... You... You aren't...\
name ""
>As the Sabasa King stares at Sara, his eyes slowly open wide.@
>I think he just noticed the inhuman power hiding behind her eyes...\
name "Sara"
>F...Father...\
name ""
lsp 700,":a;chara\sabasa_st04.bmp",-160,0:print 10,500
name "Sabasa King"
>I see...@> So your monster blood awoke?\
name ""
name "Sara"
>I...I'm sorry...\
name ""
name "Sabasa King"
>Was the true reason you left Sabasa because your blood awoke?@
>So you came here to the Monster Lord's Castle yourself...\
name ""
name "Sara"
>No, that isn't exactly why...@
>But I have been taught here how to control my power.\
name ""
lsp 700,":a;chara\sabasa_st03.bmp",-160,0:print 10,500
name "Sabasa King"
>Hmmhmmhmm...@
>It isn't unheard of for our royal line... But...\
name ""
>The King's gaze turns toward me.\
lsp 700,":a;chara\sabasa_st04.bmp",-160,0:print 10,500
name "Sabasa King"
>As you can see, my daughter has turned into a partial monster.@
>But you, as a firm believer in coexistence, have no issues with this, correct?\
name ""
name "Luka"
>............\
name ""
>What a tricky question...@>If I say no, it's like I'm accepting his proposal.\
>If I say yes, It's like I'm refuting my views on coexistence, even though that's not really what he's asking about...\
>I can't help but reluctantly nod...\
name "Luka"
>Whether human or monster, it doesn't matter...\
name ""
lsp 700,":a;chara\sabasa_st02.bmp",-160,0:print 10,500
name "Sabasa King"
>I see, thank you.@
>I'm entrusting my daughter to you.\
name ""
name "Luka"
>..............\
name ""
name "Sara"
>..............\
name ""
>This is getting complicated...\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg149.bmp",7,1000
goto *city45_main



*city45_07

bg "bg\bg172.bmp",7,1000
gosub *setwindow_01
if %ivent18<2 gosub *city_noiv:cspl 3,7:csp 611:cspl 699,705:bg "bg\bg149.bmp",7,1000:goto *city45_main
lsp 700,":a;chara\saniria_n_st04.bmp",0,0:print 10,500
>The large, quiet library where monsters don't seem to ever go...@
>Surprisingly, the San Ilia King is here moving about restlessly.\
name "San Ilia King"
>Incredible!@>The original copy of "The Magic Hammer" still exists!@
>And the complete set of the "Noel Historia"!!!\
>Mountains of fabled books, believed to have been lost from this world...@
>Ooooh!@> The "Gnosis Book of Hours"!\
name ""
>The King is shaking in excitement before a pile of books.\
name "San Ilia King"
>Honestly, I want to live here for a decade and just read!@
>The catalogue!@> Where is the library's catalogue!?\
name ""
lsp 700,":a;chara\saniria_n_st02.bmp",-160,0
lsp 701,":a;chara\fairys_st01.bmp",370,75:print 10,500
name "Fairy"
>These books are so difficult...@
>Hey, hey, is that a picture book?\
name ""
name "San Ilia King"
>This corner seems to have picture books for monsters.@
>"Spirit Sylph's Chi Pa Pa"...@>I've never heard of this one before.\
name ""
if %ivent14<1 cspl 3,7:csp 611:cspl 699,705:bg "bg\bg149.bmp",7,1000:goto *city45_main
lsp 700,":a;chara\saniria_n_st02.bmp",-250,0
lsp 701,":a;chara\fairys_st01.bmp",250,75
lsp 702,":a;chara\queenfairy_st01.bmp",240,0:print 10,500
name "Queen Fairy"
>Oh my... You seem to be quite attached to him.@
>For Fairies to be so friendly toward a religious leader...\
name ""
name "Fairy"
>Yaay!@>It's the Queen!\
name ""
name "San Ilia King"
>...These girls helped change my mind.@
>We humans have been too ignorant about the beings known as monsters.\
>We believed them pure evil, and our fear turned into hostility.@
>Our religious teachings themselves only served to amplify that vicious circle.\
name ""
name "Queen Fairy"
>Hmm... So these girls can open even the most closed of human hearts.@
>That they became so attached to you is proof that at your core you are a sincere, honest human.\
>So please take care of my daughters in the future, too.\
>And I hope that in the future the entire race known as Fairies will come to be accepted as you have accepted these girls.@>It would bring me great happiness.\
name ""
name "San Ilia King"
>Of course, I shall make great efforts for that.@
>But first, we must regain peace.\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg149.bmp",7,1000
goto *city45_main



*city45_10

gosub *setwindow_01
bg "bg\bg169.bmp",7,1000
if %check06=0 gosub *city_noiv:cspl 3,7:csp 611:cspl 699,705:bg "bg\bg149.bmp",7,1000:goto *city45_main
if %ivent01<2 gosub *city_noiv:cspl 3,7:csp 611:cspl 699,705:bg "bg\bg149.bmp",7,1000:goto *city45_main
if %ivent04<2 gosub *city_noiv:cspl 3,7:csp 611:cspl 699,705:bg "bg\bg149.bmp",7,1000:goto *city45_main
>When I come back to the conference room...@
>There are even more monsters around than there were during the summit!\
lsp 702,":a;chara\queenhapy_st11.bmp",-250,0
lsp 701,":a;chara\queenelf_st01.bmp",40,0
lsp 700,":a;chara\queenfairy_st01.bmp",300,0:print 10,500
name "Queen Harpy"
>The monsters who rule each locale...@
>This should be quite an interesting meeting.\
name ""
name "Queen Elf"
>More than just humans, we don't even truly know each other.@
>We will need meetings like this to communicate and come to understand each other...\
name ""
>Queen Harpy, Queen Elf, Queen Fairy...@
csp 702
lsp 700,":a;chara\queenant_st01.bmp",-200,0
lsp 701,":a;chara\a_emp_st21.bmp",300,30:print 10,500
>Queen Ant, and even the new Queen Alraune...\
lsp 700,":a;chara\sirohebi_st11.bmp",-160,0
lsp 701,":a;chara\succubus_st01.bmp",160,50:print 10,500
name "Shirohebi"
>The monsters who rule over each area have all gathered together.@
>I govern Yamatai Village, and am near to attaining the seat of Queen Lamia.\
name ""
name "Succubus"
>I govern the Succubus Village...@
>I'm not eyeing the seat of Queen Succubus.\
name ""
>Succubus and Shirohebi, too.@
>It looks like every powerful monster is here...\
csp 701
lsp 700,":a;chara\kraken_st01.bmp",0,0:print 10,500
name "Kraken"
>I am Queen of the South Seas.@
>A friendly meeting with monsters from other regions seemed interesting...\
name ""
lsp 700,":a;chara\poseidones_st01.bmp",0,0:print 10,500
name "Poseidoness"
>The North Seas are my domain...@
>I tend to avoid collusion, but this seems a useful meeting to be a part of.\
name ""
lsp 700,":a;chara\sphinx_st01.bmp",0,0:print 10,500
name "Sphinx"
>I am the master of the Sabasa region, Sphinx.@
>I was initially hesitant to come here, but I hope to find some answers...\
name ""
>Kraken, Poseidoness and even Sphinx...@
>Truly all the leading monsters in the world.\
>And...\
bgm "bgm\comi1.ogg"
lsp 700,":a;chara\pramia_st11.bmp",0,100:print 10,500
name "Tiny Lamia"
>I'm the representative of Iliasburg, Tiny Lamia.@
>I taste bad.@> Please don't eat me.\
name ""
>...Tiny Lamia huddles herself into a ball with tears in her eyes.@
>How did she get here...?\
lsp 700,":a;chara\pramia_st11.bmp",-200,100
lsp 701,":a;chara\kraken_st01.bmp",160,0:print 10,500
name "Kraken"
>Oh... A monster representative of Iliasburg?@> That's news to me...\
name ""
lsp 701,":a;chara\sirohebi_st11.bmp",160,0:print 10,500
name "Shirohebi"
>Hehe, another lead Lamia?@
>Do you wish to compete against me for the seat of Queen Lamia?\
name ""
lsp 701,":a;chara\poseidones_st01.bmp",160,0:print 10,500
name "Poseidoness"
>Sheesh, don't bully her.\
name ""
name "Tiny Lamia"
>*Sniff*\
name ""
>With the small, nervous Tiny Lamia in attendance, the meeting between the leading monsters starts...\
sean_change "bg169"
bgm "bgm\maouzyou2.ogg"
>After the meeting is over, the monsters leave the room one by one.\
lsp 700,":a;chara\pramia_st11.bmp",0,100:print 10,500
name "Luka"
>...Why did you slip in there?\
name ""
name "Tiny Lamia"
>I was following the old lady, but I got lost...@
>I just wandered in there while I was looking around...\
name ""
>She's still terrified, even after the meeting broke up.\
name "Luka"
>She's looking for you, you should go back right away.\
name ""
lsp 700,":a;chara\pramia_st01.bmp",0,0:print 10,500
name "Tiny Lamia"
>Yeah, thank you...\
>That reminds me, I got three pretty jewels from Ms. Tamamo.@
>She said they were filled with Spirit power, and to use them if we were in danger...@> But what's going to happen?\
name ""
name "Luka"
>I don't know what it will do...@
>But if Tamamo gave it to you, I'm sure it will be useful.\
name ""
>Iliasburg will be under attack tomorrow, like everywhere else.@
>Perhaps Tamamo gave it to her as some sort of trump card?\
name "Tiny Lamia"
>Ok, then I'll keep good care of it.@
>Since there's three, I'll give one to Vampy and Puppy...\
name ""
name "Luka"
>Do your best tomorrow!\
name ""
name "Tiny Lamia"
>Yes, we'll protect everyone in the town!@
>You do your best too, Luka!\
name ""
>Both of us leave, with renewed determination...\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg149.bmp",7,1000
goto *city45_main



*city45_11

bg "bg\bg174.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\granberia_st62.bmp",0,0:print 10,500
name "Granberia"
>Finally, the decisive battle...@>I'm itching to get going.@
>After spending so long in bed recovering, there's nothing I want to do more than rampage around.\
name ""
name "Luka"
>Yes...@> But what's with those clothes?\
name ""
lsp 700,":a;chara\granberia_st61.bmp",0,0:print 10,500
name "Granberia"
>Mmm?@> They're just normal clothes.@
>Did you think I would even sleep in my armor?\
name ""
name "Luka"
>............\
name ""
>I sort of did...\
csel "About the Monster Lord's throne fight...",*city45_11a,"Ask about Arc-En-Ciel",*city45_11b,"What will you do during peacetime?",*city45_11c,"Ask about the Dragon Seal",*city45_11d



*city45_11a

name "Granberia"
>Naturally, I just wanted to test out how far my sword skills have come.@
>The daughter of the Monster Lord, Alipheese...@> What better opponent could there have been?\
lsp 700,":a;chara\granberia_st62.bmp",0,0:print 10,500
>But she outmatched me.@
>I determined she was one worthy enough to entrust my sword to.\
name ""
name "Luka"
>...If you had won, would you have taken the Monster Lord's seat?\
name ""
lsp 700,":a;chara\granberia_st61.bmp",0,0:print 10,500
name "Granberia"
>To be honest, I had no interest in the position itself.@
>I would have relinquished it right away, and continued training.\
name ""
csel "Ask about Arc-En-Ciel",*city45_11b,"What will you do during peacetime?",*city45_11c,"Ask about the Dragon Seal",*city45_11d,"No more questions",*city45_11e



*city45_11b

name "Granberia"
>When we fought before, I was already wounded.@
>Even without that, I know she was stronger than me.\
>But I wasn't just beaten into inaction for no reason...@
>I evaluated her fighting style, and took note of many things.\
>I'll have a rematch with her.@
>And don't worry, I have no intention of losing...\
name ""
csel "About the Monster Lord's throne fight...",*city45_11a,"What will you do during peacetime?",*city45_11c,"Ask about the Dragon Seal",*city45_11d,"No more questions",*city45_11e



*city45_11c

name "Granberia"
>I haven't thought about anything past this impending battle.@
>But... In a world of peace, what use is there for a Swordswoman?\
>I'll confront that issue when it comes.@
>But don't worry, I don't intend to disturb the gained peace.\
name ""
csel "About the Monster Lord's throne fight...",*city45_11a,"Ask about Arc-En-Ciel",*city45_11b,"Ask about the Dragon Seal",*city45_11d,"No more questions",*city45_11e



*city45_11d

name "Luka"
>That reminds me... Do you know what this is, Granberia?\
name ""
>I show Granberia the mark on the back of my hand.@
>It's hard to see normally, but under the right light it's visible.\
name "Granberia"
>You...@> That's...@
>Do you know what it means to show this to me?\
name ""
name "Luka"
>Eh...?\
name ""
name "Granberia"
>Don't show this mark to someone of the Dragon race without thinking carefully.@
>You'll cause quite a few... Misunderstandings...\
name ""
name "Luka"
>......???\
name ""
csel "About the Monster Lord's throne fight...",*city45_11a,"Ask about Arc-En-Ciel",*city45_11b,"What will you do during peacetime?",*city45_11c,"No more questions",*city45_11e



*city45_11e

mov %hanyo1,1
name "Granberia"
>If you have no more questions, then I will be taking off now.\
name ""
name "Luka"
>That reminds me...@> Are you going to your duel with Alma Elma?@
>Can I watch you two spar?\
name ""
name "Granberia"
>...No.@> A true fight is no spectacle.\
name ""
name "Luka"
>.....?\
name ""
>I see where she's coming from, but her response is still strange.\
name "Granberia"
>If you're done here, then you should return to your room.\
name ""
dwave 2,"se\door2.ogg"
csp 700
bg "bg\bg149.bmp",7,1000
>I'm bluntly driven out of her room.\
>She's going to the duel with Alma Elma now...@
>I'm interested in just what sort of fight they would have together...\
r@k@\
csel "Watch in secret",*city45_11h,"Don't watch",*city45_11i



*city45_11h

name "Luka"
>Should I watch them in secret?\
name ""
>I really am just too interested in their duel.@
>Moving as quietly as I can, I head to the Practice Grounds...\
dwave 2,"se\asioto3.ogg"
sean_change "bg218"
bgm "bgm\kiki2.ogg"
name "Luka"
>.............\
name ""
>Completely erasing any indication of my presence, I watch the two of them from a hiding spot in the Practice Grounds.\
lsp 700,":a;chara\granberia_st01.bmp",-160,0
lsp 701,":a;chara\arumaeruma_st11.bmp",160,0:print 10,500
name "Alma Elma"
>You never learn, do you, Granberry?@
>You can never beat me...\
name ""
lsp 700,":a;chara\granberia_st02.bmp",-160,0:print 10,500
name "Granberia"
>Quiet!@> Here I come!\
name ""
dwave 1,"se\karaburi.ogg"
>Granberia swings down with a quick, powerful slash!@
dwave 1,"se\miss.ogg"
>Alma Elma's face goes serious, and dodges by a hair's breadth.\
name "Alma Elma"
>Oh my, that was quite fast.@
>Did you think you'd win if you got in the first attack?\
>But I was expecting that sort of strategy. \
name ""
lsp 700,":a;chara\granberia_st07.bmp",-160,0:print 10,500
name "Granberia"
>Gah!\
name ""
>Seeing her chance, Alma Elma jumps closer to Granberia.\
>Even I could see that one coming...@
>Alma Elma taunted her into it, and Granberia attacked too quick as a result.\
lsp 701,":a;chara\arumaeruma_st13.bmp",160,0:print 10,500



*city45_11j

name "Alma Elma"
>Caught you. \
name ""
>Alma Elma grabs hold of Granberia.@
>Her almost playful grapple is devoid of any bloodthirst, leaving a Serene State useless.\
name "Granberia"
>Get off!\
name ""
>Granberia struggles intensely...@
>But suddenly her body jumps in surprise.\
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
name "Granberia"
>...!@> Haa...!\
name ""
lsp 701,":a;chara\arumaeruma_st13.bmp",160,0:print 10,500
name "Alma Elma"
>And the match has been decided. \
name ""
>Alma Elma starts to caress Granberia's body, slipping her hands through her armor's opening.\
>The sweet, seductive caresses continue as Granberia struggles and rages to get Alma Elma off her.\
name "Granberia"
>I...I won't... To this much...!\
name ""
>Though she says that, her movements are slowing down.@
>It's taking all of her concentration just to resist what she's feeling.\
name "Alma Elma"
>Haha... Granberry, you're really weak to pleasure attacks, aren't you? \
name ""
name "Granberia"
>F...Fine...@>I yield...\
name ""
>Something Granberia would never say in a normal fight.@
>But Alma Elma tramples on them in this situation.\
name "Alma Elma"
>Hehe... I don't accept.@
>I'll need to carve this defeat into your body...\
name ""
>Alma Elma strips Granberia of her armor.@
lsp 700,":a;chara\granberia_he1.bmp",0,0:print 10,500
>Deftly taking her own clothes off at the same time, she presses her large breasts against Granberia's.\
>And like that, starts to rub her own breasts against hers.\
name "Granberia"
>S...Stop!@>Get off me!\
name ""
name "Alma Elma"
>Hehe... Isn't this what you wanted when you challenged me?@
>To feel the joys of a woman, after so long?\
>I was the one who first taught you them, after all. \
name ""
name "Granberia"
>D...Don't fool around!@
>To this rape, I would never...\
name ""
>Granberia twists and squirms to escape, but is too firmly held against Alma Elma's body to go anywhere.\
name "Alma Elma"
>Then I'll give you a piece of paradise here...@
>Hehe, it's going just as you hoped, isn't it?\
name ""
name "Granberia"
>Y...You're wrong!@>Ah!\
name ""
lsp 700,":a;chara\granberia_he2.bmp",0,0:print 10,500
>Alma Elma reaches down to Granberia's vagina.@
>Her nimble finger slowly traces around her entrance.\
name "Granberia"
>Guh...\
name ""
>Granberia's body trembles as she holds back her own voice.@
>It's all she can do to endure the finger tracing around her vagina...\
name "Alma Elma"
>Look at how wet you're getting...@>Such an obscene body you have.@
>See... You wanted to do this, didn't you?\
name ""
name "Granberia"
>Wh...Who would... Nnn!\
name ""
>When Granberia opens her mouth, her refusal is interrupted by a sweet moan.@
>She quickly clamps her mouth shut again, going back to trying to endure what she's feeling.\
name "Alma Elma"
>Hehe... Do you want me to put my finger in?@
>This finger that took Granberry's virginity?\
name ""
name "Granberia"
>S...Stop... Don't do that!\
name ""
name "Alma Elma"
>It has been a while, so I'm going to make you come over and over.@
>Now, I'll rape you with my finger... \
name ""
mov %hseanwave,3:hseanwave
lsp 700,":a;chara\granberia_he3.bmp",0,0:print 10,500
>Alma Elma's finger slowly circles around her vagina, getting closer to her entrance...@
>Arriving at her slit, she slowly pushes her finger inside.\
name "Granberia"
>...!\
name ""
>Granberia's body jumps as she holds her voice back.@
>Alma Elma continues slowly moving her finger, giggling.\
name "Alma Elma"
>Hehe... You're getting tighter and tighter Granberry.@
>This tightness would make a man come in seconds, you know?\
name ""
name "Granberia"
>Tch...!\
name ""
name "Alma Elma"
>Are you so ashamed of your own moans that much?@
>You always reach orgasm while biting it back, after all. \
>...Here, I'll make you come with my finger now.@
>By using this finger you love so much, right inside here...\
name ""
name "Granberia"
>~~~~~~~~~~!!!\
name ""
>Granberia's body suddenly spasms.\
>Her eyes go wide, but she still holds her voice back.@
>Alma Elma used her finger to force her to come in seconds...\
mov %hseanwave,0:hseanwave
name "Alma Elma"
>And off you go to paradise...@
>Did it feel good, Granberry? \
>Hehe... I win again.@
>This makes forty three wins in a row. \
name ""
>Alma Elma licks her finger, covered in Granberia's wetness.\
name "Granberia"
>............\
name ""
>Granberia's eyes are unfocused, as her breathing gets rougher.@
>She seems to be immersed in the afterglow of her orgasm...\
name "Luka"
>Wow...\
name ""
>I just saw something incredible...\
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_shitenno5,1
cspl 3,7
csp 611
cspl 700,705
bgm "bgm\maouzyou2.ogg"
bg "bg\bg149.bmp",7,1000
goto *city45_main



*city45_11i

name "Luka"
>It wouldn't be good to watch in secret.\
name ""
>I'm interested in their duel, but she seemed pretty clear about it.@
>I better not watch.\
cspl 3,7
csp 611
cspl 700,705
goto *city45_main



*city45_11k

gosub *setwindow_01
name "Luka"
eng "Granberia, are you there?":$sel6/
dwave 1,"se\knock.ogg"
\
name ""
name "Granberia"
>................\
name ""
>There's no reply from inside.\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg149.bmp",7,1000
goto *city45_main



*city45_12

bg "bg\bg175.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\arumaeruma_st11.bmp",0,0:print 10,500
name "Alma Elma"
>With tomorrow being the final battle, I'm feeling a little excited.@
>Let's both do our best, Luka. \
name ""
>She seems awfully happy and excited before the big fight...@
>I wonder if she isn't nervous at all?\
csel "About the Monster Lord's throne fight...",*city45_12a,"Ask about Hainuwele",*city45_12b,"What will you do during peacetime?",*city45_12c,"Ask about how she fights",*city45_12d



*city45_12a

lsp 700,":a;chara\arumaeruma_st13.bmp",0,0:print 10,500
name "Alma Elma"
>Because it seemed fun, of course.@
>The fight of the century that every monster pays close attention to...@> It gives me shivers just thinking about it.\
name ""
>It seems like she wasn't interested in the position itself...@
>Just like in the Colosseum, it seems she just likes fighting before a crowd.\
name "Luka"
>But I heard that you just surrendered when you could have kept fighting...\
name ""
name "Alma Elma"
>I had enough fun, so why keep going after that?@
>It would have been ugly to be seen desperately fighting, after all... \
name ""
>Vague answers as always...\
lsp 700,":a;chara\arumaeruma_st11.bmp",0,0:print 10,500
csel "Ask about Hainuwele",*city45_12b,"What will you do during peacetime?",*city45_12c,"Ask about how she fights",*city45_12d,"No more questions",*city45_12e



*city45_12b

name "Alma Elma"
>When we fought before, I was already wounded...@
>I won't lose to someone that can only move that fast.\
name ""
name "Luka"
>But she was created just to fight against you.@
>I'm sure she has weapons other than just her speed...\
name ""
lsp 700,":a;chara\arumaeruma_st13.bmp",0,0:print 10,500
name "Alma Elma"
>Hehe, are you worried?@
>Don't worry, I have lots of unexpected weapons of my own. \
name ""
lsp 700,":a;chara\arumaeruma_st11.bmp",0,0:print 10,500
csel "About the Monster Lord's throne fight...",*city45_12a,"What will you do during peacetime?",*city45_12c,"Ask about how she fights",*city45_12d,"No more questions",*city45_12e



*city45_12c

name "Alma Elma"
>Even when it's peaceful...@> I won't change.@
>I'll just live carefree, like the wind.\
>Of course, I won't hurt humans or be careless.@
>I promise that to you, Luka-boy. \
name ""
csel "About the Monster Lord's throne fight...",*city45_12a,"Ask about Hainuwele",*city45_12b,"Ask about how she fights",*city45_12d,"No more questions",*city45_12e



*city45_12d

name "Luka"
>Alma, how do you use the power of wind?\
name ""
name "Alma Elma"
>Ah... Well from the start, Succubi and the power of wind have good compatibility. \
name ""
name "Luka"
>But that doesn't mean you're using it right...@
>If you're rough with it, you can't use proper techniques.\
>You can't just have talent or unfocused training to master it...@
>Rather than having the proper power... I guess you need the proper frame of mind?\
name ""
name "Alma Elma"
>Oh my... Luka is so mean.\
name ""
name "Luka"
>Isn't it the same for martial arts?@
>Without proper technique, it's just fancy names for punching and kicking.\
>If you were more serious, you'd be amazing...\
name ""
name "Alma Elma"
>But...@> In the beginning, even martial arts were created just for show.@
>If the audience enjoys it, that's enough for me. \
name ""
name "Luka"
>It seems like sort of a waste...@
>You'd be so much stronger if you were serious with it.\
name ""
name "Alma Elma"
>Unlike Granberry, I don't train diligently.@
>I like things that feel good more than violence... \
name ""
name "Luka"
>.............\
name ""
>Vague answers as always...\
csel "About the Monster Lord's throne fight...",*city45_12a,"Ask about Hainuwele",*city45_12b,"What will you do during peacetime?",*city45_12c,"No more questions",*city45_12e



*city45_12e

lsp 700,":a;chara\arumaeruma_st13.bmp",0,0:print 10,500
name "Alma Elma"
>That's it for story time?@
>Or did you want to play together a little...?\
name ""
name "Luka"
>T...That's alright...\
name ""
dwave 2,"se\door2.ogg"
csp 700:print 10,500
>With that, I leave Alma's room...\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg149.bmp",7,1000
goto *city45_main



*city45_13

bg "bg\bg176.bmp",7,1000
gosub *setwindow_01
bgm "bgm\tamamo.ogg"
lsp 700,":a;chara\tamamo_st03.bmp",0,0:print 10,500
name "Tamamo"
>Busy busy...@
>There's so much to do before tomorrow's battle, I'm very busy...\
name ""
>Tucked away in a corner of the Monster Lord's Castle is a room that reminds me of Yamatai Village.\
>Tamamo is busy writing something as I walk in.@> Her eyes flick up to me, a serious look on her face.\
bgm "bgm\maouzyou2.ogg"
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>But... The Monster Lord truly is holding the same dreams as her mother in her.\
>...It appears that her mother's values were instilled completely in her.@
>Even the one about sacrificing herself to promote peace with humans...\
>Of course, the dangerous alternative was a path of hatred against humans who killed her mother...\
name ""
name "Luka"
>Yes, I know...\
name ""
>Alice hating humans for harming her mother...@
>It was what Tamamo wanted to avoid most in raising her.\
name "Tamamo"
>And her mother's actions were a result of my flawed training and direction.@
>I still hold a deep feeling of guilt for not stopping her...\
>To think she'd yield herself to that simplistic decision...\
name ""
name "Luka"
>..............\
name ""
lsp 700,":a;chara\tamamo_st04.bmp",0,0:print 10,500
name "Tamamo"
>...And I'm grateful for you.@
>If it wasn't for you, that disaster would have been repeated.\
>I'm entrusting the Monster Lord to you in the future too, Luka.@
>By the way, did you have something you wanted to ask me?\
name ""
csel "About the Monster Lord's throne fight...",*city45_13a,"Ask about Tsukuyomi",*city45_13b,"What will you do during peacetime?",*city45_13c,"Ask about Angel Halo",*city45_13d



*city45_13a

lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>...As you know, the Monster Lord selection was traditionally a one on one fight.@
>That was the first time more than one competed for the title.\
>Even more, three of them were known, powerful monsters.@
>Alice would never have lost one against one, to any of them.\
>But if the three colluded together, they could have attacked her three against one.@
>If that happened, it would have been difficult for her to win.\
name ""
>That's true...@
>If Granberia, Alma Elma and Erubetie all attacked Alice at once, I don't think even she could have won.\
name "Tamamo"
>So... I participated to prevent that.@
>If they tried to concentrate their attacks against her, I would stop them.\
>But in the end, none tried any sort of cowardly behavior.@
>It was a very refreshing battle, where each used their own powers freely to their utmost.\
name ""
csel "Ask about Tsukuyomi",*city45_13b,"What will you do during peacetime?",*city45_13c,"Ask about Angel Halo",*city45_13d,"No more questions",*city45_13e



*city45_13b

lsp 700,":a;chara\tamamo_st03.bmp",0,0:print 10,500
name "Tamamo"
>I haven't fought her yet, but apparently she was created with my cells.@
>She will be an awkward opponent, if she really can use Kitsune skills...\
lsp 700,":a;chara\tamamo_st04.bmp",0,0:print 10,500
>Though with that said, I can't lose.@
>Why?@> Because my tail is fluffier than hers!\
name ""
name "Luka"
>...........\
name ""
>...Is she really going to be alright...?\
name ""
csel "About the Monster Lord's throne fight...",*city45_13a,"What will you do during peacetime?",*city45_13c,"Ask about Angel Halo",*city45_13d,"No more questions",*city45_13e



*city45_13c

lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>Even during peace, I won't change what I'm doing.@
>I'll just keep training and nagging each generation of Monster Lord.\
>The current Monster Lord, the next, and the next... Forever.\
>More importantly, what will you do?\
name ""
name "Luka"
>I... Haven't thought about it.\
name ""
name "Tamamo"
>...You haven't thought about it?@
>Or are you unable to imagine yourself in a peaceful world?\
name ""
name "Luka"
>.........\
name ""
name "Tamamo"
>Don't be seized by the temptation of self sacrifice.@
>That is the easy way out...\
>As someone who stopped Alice from doing just that, you already know it well.@
>Please, value your own body and life...\
name ""
csel "About the Monster Lord's throne fight...",*city45_13a,"Ask about Tsukuyomi",*city45_13b,"Ask about Angel Halo",*city45_13d,"No more questions",*city45_13e



*city45_13d

lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>Alice took that sword with her when she left the Castle.@
>In order to challenge Ilias, a weapon like that was necessary, after all.\
>The history of that blade is complex...@>But originally, it was created to be used by Fallen Angels.\
name ""
name "Luka"
>Fallen Angels?\
name ""
name "Tamamo"
>A long time ago, there was a Hero who was unbaptized.@
>He was given a sword from a Fallen Angel, and set out for adventure.\
>He defeated the Monster Lord, but became aware of the true evil...@
>That was of course, the Goddess Ilias.\
>That Hero's second battle then began.@
>He cut apart angel after angel with that sword the Fallen Angel granted him.\
>Slicing through angel after angel, both the sword and his own body were covered in pure holy energy.\
>After killing more than two hundred, he started to go insane.\
>Engrossed in slaughter, he became nothing more than an instrument of death.@
>Known as the "Angel Killer", he was feared in the Heavens.\
>In the end, his body itself was taken into the sword.@
>Ilias separated his soul from it, and sealed it away.\
>That Hero's name was...@>Well, you already know, don't you?\
name ""
name "Luka"
>Yes...\
name ""
>The legendary Hero, Heinrich Hein...@
>I've been fighting together with him, this whole time.\
csel "About the Monster Lord's throne fight...",*city45_13a,"Ask about Tsukuyomi",*city45_13b,"What will you do during peacetime?",*city45_13c,"No more questions",*city45_13e



*city45_13e

lsp 700,":a;chara\tamamo_st03.bmp",0,0:print 10,500
name "Tamamo"
>Sorry, but I'm fairly busy at the moment.@
>I have to attend meetings all over the place...\
name ""
csp 700:print 10,500
dwave 2,"se\door2.ogg"
>I don't have anything to ask her at the moment, so I excuse myself from her room.\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg149.bmp",7,1000
goto *city45_main



*city45_14

bg "bg\bg177.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\erbetie_st01.bmp",225,0:print 10,500
name "Erubetie"
>...........\
>...Did you need me for something?\
>...........\
name ""
>It doesn't look like she's going to avoid me...@
>The atmosphere here is somewhat strange...\
csel "About the Monster Lord's throne fight...",*city45_14a,"Ask about Amphisbaena",*city45_14b,"What will you do during peacetime?",*city45_14c,"Ask about her room",*city45_14d



*city45_14a

name "Erubetie"
>To rescue my brethren, who were being pushed to the edge.@
>I intended to rule over humans using the power of a Monster Lord.\
>Of course, I know now that my path was wrong...@
>If I had called for an assault against the humans, this crisis would have been far worse.\
name ""
csel "Ask about Amphisbaena",*city45_14b,"What will you do during peacetime?",*city45_14c,"Ask about her room",*city45_14d,"No more questions",*city45_14e



*city45_14b

name "Erubetie"
>I was stuck.@
>None of my attacks could connect with her.\
>But I did notice something in our fight...@
>I think that maybe...\
name ""
name "Luka"
>Is there a chance of winning...?\
name ""
name "Erubetie"
>............\
name ""
>Erubetie falls silent.@
>She seems to have something in mind, though...\
csel "About the Monster Lord's throne fight...",*city45_14a,"What will you do during peacetime?",*city45_14c,"Ask about her room",*city45_14d,"No more questions",*city45_14e



*city45_14c

name "Erubetie"
>First, I'll need to counteract the poison in Undine's Spring.@
>Even if I gather together all of my brethren, I don't know how long it will take.\
>In addition, we must push forward peaceful relations with humans...@
>Will you assist me at that time...?\
name ""
name "Luka"
>Yes, of course!\
name ""
name "Erubetie"
>............\
name ""
>Erubetie silently stares at me.@
>Did I give her the wrong answer...?\
csel "About the Monster Lord's throne fight...",*city45_14a,"Ask about Amphisbaena",*city45_14b,"Ask about her room",*city45_14d,"No more questions",*city45_14e



*city45_14d

name "Luka"
>By the way, Erubetie...@>What's up with this room?\
name ""
>...Actually, is this even a room?@
>It seems more like a waterway...\
name "Erubetie"
>This room is comfortable...@
>Three times a day, a strong current comes through, and refills it.\
>When I lay in it during those times, my heart is eased...@
>Do you want to try it with me, Luka?\
name ""
name "Luka"
>A...Ah... Sure, maybe next time...\
name ""
>Isn't this just the drainage for the Castle...?\
csel "About the Monster Lord's throne fight...",*city45_14a,"Ask about Amphisbaena",*city45_14b,"What will you do during peacetime?",*city45_14c,"No more questions",*city45_14e



*city45_14e

name "Erubetie"
>You don't need anything else...?\
name ""
name "Luka"
>Ah... Yes, that was all...\
name ""
name "Erubetie"
>.............\
name ""
name "Luka"
>S...See you later...\
name ""
>I don't quite get it, but there's a strange atmosphere between us.@
dwave 2,"se\door2.ogg"
>I quickly leave Erubetie's strange room.\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg149.bmp",7,1000
goto *city45_main



*city45_15

bg "bg\bg141.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\alice_st71.bmp",0,50:print 10,500
name "Alice"
>Ah... Luka?@>I'm very busy at the moment.@
>I'm stuck writing handwritten letters about the decisive battle coming up to everyone.\
>Sorry, but I can't keep you company at the moment.@
>I'll head to your room later, so please wait a while...\
name ""
name "Luka"
>She'll head to my room... Eh...?\
name ""
>I have a bad feeling...\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg149.bmp",7,1000
goto *city45_main



*maped

saveoff
textoff
csp -1
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
bg "bg\map0.bmp",10,1000
goto *maped_2



*maped_2

lsp 601,":s/20,20,0;#FFFFFF#FF4444Ilias Continent ",510,335:spbtn 601,11
lsp 602,":s/20,20,0;#FFFFFF#FF4444Natalia Region ",410,250:spbtn 602,12
strsp 603,"Safina Region",175,270,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,13
strsp 604,"Noah Region",515,150,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 604,14
strsp 605,"Gold Region",335,130,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 605,15
strsp 606,"Monster Lord's Castle",290,40,12,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 606,16
print 1
btnwait2 %cmd1
if %cmd1=0 goto *maped_2
if %cmd1=-1 gosub *menu:goto *maped_2
csp -1
btndef clear
if %cmd1=11 goto *map14
if %cmd1=12 goto *map15
if %cmd1=13 goto *map16
if %cmd1=14 goto *map17
if %cmd1=15 goto *map18
if %cmd1=16 goto *sean0413
goto *maped_2



*map14

saveoff
textoff
csp -1
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
bg "bg\map1.bmp",10,1000
goto *map14_2



*map14_2

lsp 601,":s/20,20,0;#FFFFFF#FF4444Ilias Village ",365,470:spbtn 601,11
if %ivent01=2 lsp 602,":s/20,20,0;#FFFFFF#FF4444Iliasburg ",395,280:spbtn 602,12
if %ivent02=2 lsp 603,":s/20,20,0;#FFFFFF#FF4444Happiness Village ",615,170:spbtn 603,13
lsp 604,":s/20,20,0;#FFFFFF#FF4444World Map ",635,550:spbtn 604,14
print 1
btnwait2 %cmd1
if %cmd1=0 goto *map14_2
if %cmd1=-1 gosub *menu:goto *map14_2
csp -1
btndef clear
if %cmd1=11 gosub *city51_main0:dwave 1,"se\habataki.ogg":bg black,7,1500:bgm "bgm\epilogue.ogg":goto *map14
if %cmd1=12 gosub *city52_main0:dwave 1,"se\habataki.ogg":bg black,7,1500:bgm "bgm\epilogue.ogg":goto *map14
if %cmd1=13 gosub *city53_main0:dwave 1,"se\habataki.ogg":bg black,7,1500:bgm "bgm\epilogue.ogg":goto *map14
if %cmd1=14 goto *maped
goto *map14_2



*city51_main0

saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\habataki.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg003.bmp",7,1500
bgm "bgm\mura1.ogg"
goto *city51_main



*city51_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Man A ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Man B ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Old Man ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Girl ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Elder ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Soldier ",95,310:spbtn 606,606
strsp 607,"Former Temple Soldier A",95,340,13,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 607,607
strsp 608,"Former Temple Soldier B",95,370,13,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 608,608
lsp 610,":s/20,20,0;#FFFFFF#FF4444Betty ",410,160:spbtn 610,610
strsp 611,"Weapon Shop",410,190,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
strsp 612,"Tool Shop",410,220,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 612,612
lsp 613,":s/20,20,0;#FFFFFF#FF4444Ilias Temple ",410,250:spbtn 613,613
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city51_main
if %cmd1=-1 gosub *menu:goto *city51_main
cspl 600,699
if %cmd1=601 goto *city51_01
if %cmd1=602 goto *city51_02
if %cmd1=603 goto *city51_03
if %cmd1=604 goto *city51_04
if %cmd1=605 goto *city51_05
if %cmd1=606 goto *city51_06
if %cmd1=607 goto *city51_07
if %cmd1=608 goto *city51_08
if %cmd1=610 goto *city51_10
if %cmd1=611 goto *city51_11
if %cmd1=612 goto *city51_12
if %cmd1=613 goto *city51_13
if %cmd1=619 return
goto *city51_main



*city51_01

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Man A"
>You did it, Luka!@
>Not only did you kill that Monster Lord, you brought down Ilias too!\
>...By the way, where did that girl from before go?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",-120,0
lsp 701,":a;chara\mob_seinen1.bmp",160,0:print 10,500
name "Alice"
>............\
name ""
name "Man A"
>Woah, you got huge!@>You sure grew up fast!@
>Here, have a cookie.\
name ""
lsp 700,":a;chara\alice_st02b.bmp",-120,0:print 10,500
name "Alice"
>Naturally, I'll gladly eat it.\
name ""
name "Luka"
>..........\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city51_main



*city51_02

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Man B"
>Dang!@>So Luka came back with a beautiful Monster Lord wife!@
>I never thought you'd end up hitched to someone so hot, man!\
name ""
name "Luka"
>W...We aren't!\
name ""
lsp 700,":a;chara\alice_st07b.bmp",67,0:print 10,500
name "Alice"
>W...Who's spreading those rumors!?\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city51_main



*city51_03

lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Old Man"
>I never doubted for a moment!@
>I believed in you since I first set eyes on you!\
>By the way...@>Could you sign this?@
>The bar hostess Risa wants it...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city51_main



*city51_04

lsp 700,":a;chara\mob_syouzyo.bmp",0,0:print 10,500
gosub *setwindow_01
name "Girl"
>Yaaay!@> Lukey's back!@
>He went and forced the Monster Lord to be his bride!@> Now he's back!\
name ""
name "Luka"
>Wait, that's not right at all!\
name ""
lsp 700,":a;chara\alice_st07b.bmp",67,0:print 10,500
name "Alice"
>What's the meaning of this!?\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city51_main



*city51_05

lsp 700,":a;chara\mob_rouzin2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Elder"
>Today's youth is pathetic.@
>Ilias this. Ilias that.@>They all just got damn Ilias on their minds.\
>But I always believed in you, Luka.@
>I knew you'd keep the faith, and bring her down!\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city51_main



*city51_06

lsp 700,":a;chara\mob_sensi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier"
>Oi, Luka!@>You did it!@
>Not only the Monster Lord, you defeated the Goddess!@> And saved the world!\
>And I'll really go down in history as the soldier who saw you off...@
>It is truly an honor.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city51_main



*city51_07

lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Former Temple Soldier A"
>Thanks to the downfall of Ilias, nobody is passing through to her temple.\
>But tourism has exploded due to people wanting to see the Hero's hometown!@
>You're the true pride of Ilias Village, Luka!\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city51_main



*city51_08

lsp 700,":a;chara\mob_heisi1.bmp",-170,0
lsp 701,":a;chara\mob_mamono1.bmp",280,-50:print 10,500
gosub *setwindow_01
name "Luka"
>Eh... You're...\
name ""
>I'm sure I saw these two in Enrika.@
>He was one of the injured ones, refusing the Elf's help.\
>But now it looks like their relationship is totally opposite...\
name "Former Temple Soldier B"
>Oh, I'm so embarassed...@
>Ever since then, we've sort of... Gotten involved.\
name ""
name "Elf"
>Our wedding is next week.@
>I'll be a part of this village, too!\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city51_main



*city51_10

bg "bg\bg038.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_obasan.bmp",0,0:print 10,500
name "Betty"
>Ooh, you came back safely!@
>That's all I ever wanted.\
>I felt so worried after our last goodbye...@
>I never stopped wishing you luck, hoping to meet again.\
name ""
name "Luka"
>R...Really...?@
>Well, more importantly, the village's reconstruction is really moving along.\
>I heard that the Kitsune race is helping out.\
name ""
name "Betty"
>Ah, that's right.@
>All of those foxes came and helped to rebuild the village.\
>They did it to thank you, it seems.\
name ""
>They rebuilt my hometown while I was in bed...@
>I really need to thank Tamamo.\
name "Betty"
>...What are you doing the rest of today?@
>We were planning on holding a huge festival for when you came back...\
name ""
name "Luka"
>Sorry, but I'm not coming back just yet...@
>Right now, I'm taking a look around the world.\
name ""
name "Betty"
>That's right, the Hero who saved the world has to show his face to everyone!\
name ""
name "Luka"
>Yeah...@>So, I'll be heading off now!\
name ""
name "Betty"
>It was good to see you both!@
>By the way, when is the wedding?\
name ""
name "Luka"
>W...What!?\
name ""
lsp 700,":a;chara\alice_st07b.bmp",67,0:print 10,500
name "Alice"
>Where did this rumor come from!?\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg003.bmp",7,1000
goto *city51_main



*city51_11

bg "bg\bg150.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan3.bmp",0,0:print 10,500
name "Smith"
>The sword I made has been by your side all through your quest...@
>I know you barely used it, but it still makes me proud.\
>I've gotten thousands of orders from all over the world.@
>They're all addressed to the "Smith who made Hero Luka's sword"...\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg003.bmp",7,1000
goto *city51_main



*city51_12

bg "bg\bg151.bmp",7,1000
gosub *setwindow_01
name "Luka"
>.........\
name ""
>Ronnie fell during the angels' attack.@
>It's quiet here...@> I spend a moment of silence in his honor.\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg003.bmp",7,1000
goto *city51_main



*city51_13

bg "bg\bg007.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_sinkan.bmp",0,0:print 10,500
name "Priest"
>Now that Ilias is gone, the temple has been deserted.@
>Though, it does still hold historical value.\
>And just like the temples, us priests still have a role to play.\
>We shall not preach the word of the Goddess any longer, but as from ancient times, our role of guiding those who were lost will not change.\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg003.bmp",7,1000
goto *city51_main



*city52_main0

saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\habataki.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg018.bmp",7,1500
bgm "bgm\city1.ogg"
goto *city52_main



*city52_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Youth ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Girl ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Prostitute ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Man ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Old Woman ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Soldier A ",95,310:spbtn 606,606
lsp 607,":s/20,20,0;#FFFFFF#FF4444Soldier B ",95,340:spbtn 607,607
strsp 610,"Weapon Shop",410,160,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
strsp 611,"Tool Shop",410,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Church ",410,220:spbtn 612,612
strsp 613,"Sutherland Inn",410,250,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 613,613
strsp 614,"Sutherland Inn's Back Door",410,280,14,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 614,614
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city52_main
if %cmd1=-1 gosub *menu:goto *city52_main
cspl 600,699
if %cmd1=601 goto *city52_01
if %cmd1=602 goto *city52_02
if %cmd1=603 goto *city52_03
if %cmd1=604 goto *city52_04
if %cmd1=605 goto *city52_05
if %cmd1=606 goto *city52_06
if %cmd1=607 goto *city52_07
if %cmd1=610 goto *city52_10
if %cmd1=611 goto *city52_11
if %cmd1=612 goto *city52_12
if %cmd1=613 goto *city52_13
if %cmd1=614 goto *city52_14
if %cmd1=619 return
goto *city52_main



*city52_01

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Youth"
>Awesome!@> It's the Hero!@
>I got so excited when I saw you, I let loose in my pants!\
>You know, I still haven't changed my pants from last time this happened, too.@
>They dry quick, so it's alright.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city52_main



*city52_02

lsp 700,":a;chara\mob_musume1.bmp",175,0:print 10,500
gosub *setwindow_01
name "Girl"
>The little monsters did a lot during the final assault.@
>They suddenly grew up, and were really strong.\
>After the fight was over, they all were in bed recovering for a week!@
>I guess it was a huge burden on their bodies...\
>Of course, they're running around healthy now.@
>Please let me know where you find them!\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city52_main



*city52_03

lsp 700,":a;chara\mob_musume2.bmp",175,0:print 10,500
gosub *setwindow_01
name "Prostitute"
>You're incredible, Hero!@
>Just for you, I'll give some extra big services. No charge. \
name ""
lsp 700,":a;chara\alice_st01b.bmp",-120,0
lsp 701,":a;chara\mob_musume2.bmp",335,0:print 10,500
name "Alice"
>...........\
name ""
name "Prostitute"
>Oh, excuse me...@> The Hero already has his beautiful Monster Lord...\
name ""
name "Luka"
>What the heck!?@>Why is this already all over the world!?\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city52_main



*city52_04

lsp 700,":a;chara\mob_seinen2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Man"
>I was doing my best during the final fight, too!@
>...I was actually the one supplying all the arrows.\
>When the angels finally surrendered, I was crying tears of joy.@
>I really worked hard and did something back then!\
>...But now that we're back at peace, I feel myself getting lazy again...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city52_main



*city52_05

lsp 700,":a;chara\mob_rouba.bmp",0,0:print 10,500
gosub *setwindow_01
name "Old Woman"
>This time, those bragging Heroes actually helped out.@
>They withered under the glares of the citizens for so long after they stood by during Granberia's assault...\
>This time the Heroes, the citizens, and even the littles all came together to defend the town.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city52_main



*city52_06

lsp 700,":a;chara\mob_sensi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier A"
>I think it's time to quit being a soldier.@
>I'm tired of living in fear...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city52_main



*city52_07

lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier B"
>We did our best during the final battle, unlike when Granberia came...@
>I think this will be enough to stop the citizens from glaring at us!@> Probably...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city52_main



*city52_10

bg "bg\bg152.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan1.bmp",-160,0
lsp 701,":a;chara\dragonp_st13.bmp",160,100:print 10,500
name "Shopkeeper"
>Thank you two for returning peace to the world!@
>Pup here is happy as can be, too!\
name ""
name "Dragon Pup"
>Uga!@> I'm working hard!@
>I'll defeat all the enemies!\
name ""
name "Luka"
>Yes, you did great.\
name ""
name "Dragon Pup"
>I'll keep training as a blacksmith!@
>My dream for the future is to become a legendary blacksmith!\
name ""
lsp 700,":a;chara\alice_st02b.bmp",-120,0
lsp 701,":a;chara\dragonp_st13.bmp",160,100:print 10,500
name "Alice"
>Yes, Dragons have had a few legendary blacksmiths.@
>I'm sure you'll become a great one too, better than any human could be.\
name ""
lsp 701,":a;chara\mob_ozisan1.bmp",160,100:print 10,500
name "Shopkeeper"
>Eh?@>Seriously?\
name ""
name "Luka"
>.............\
csp 701
lsp 700,":a;chara\dragonp_st13.bmp",0,100:print 10,500
>...By the way, what happened to Goblin Girl?@
>Is she still running around the world?\
name ""
name "Dragon Pup"
>Gob's still working as a mover, carrying things all over the world.@
>So she hasn't settled down in a town yet... It seems kind of lonely to me.\
>...Oh, the three of us also wanted to give you a present.@
>Can you come behind the Sutherland Inn later so we can give it to you?\
name ""
>A present?@
>I wonder what the three of them want to give me...?\
mov %check08,1
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg018.bmp",7,1000
goto *city52_main



*city52_11

bg "bg\bg151.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_seinen1.bmp",-160,0
lsp 701,":a;chara\vgirl_st13.bmp",160,100:print 10,500
name "Shopkeeper"
>Oh! If it isn't the Hero who saved the world!@
>Thanks to you, this town is peaceful.\
>Vampire Girl did her best, too!@
>She's already up so early, giving it her best!\
name ""
name "Vampire Girl"
>Hehehe... It's all in aiming to have my own store one day!\
name ""
name "Luka"
>I see...@> I'll be sure to shop there once you open it.\
name ""
lsp 700,":a;chara\alice_st02b.bmp",-120,0
lsp 701,":a;chara\vgirl_st13.bmp",160,100:print 10,500
name "Alice"
>I'll go if you sell something delicious.\
name ""
csp 701
lsp 700,":a;chara\vgirl_st13.bmp",0,100:print 10,500
name "Vampire Girl"
>Oh that reminds me...@>The three of us wanted to give you a present.@
>When you have time later, come to the back entrance of the Sutherland Inn.\
name ""
>A present?@
>I wonder what the three of them want to give me...?\
mov %check08,1
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg018.bmp",7,1000
goto *city52_main



*city52_12

bg "bg\bg153.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_sinkan.bmp",0,0:print 10,500
name "Priest"
>Thank you for coming...@>To the Sacred Bar!@
>Now, my child...@> What would you like to order!?\
name ""
name "Luka"
>A...Apple juice...\
name ""
>It looks like the Priest turned his temple into a bar...\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg018.bmp",7,1000
goto *city52_main



*city52_13

bg "bg\bg016.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_obasan.bmp",-160,0
lsp 701,":a;chara\pramia_st13.bmp",160,100:print 10,500
name "Owner"
>Oh! If it isn't the Hero who saved the world!@
>I didn't think you were a normal guy from the first time I laid eyes on you...@
>And it seems like I was spot on!\
>You two have a permanent free pass here.@> Stay for free whenever you want!\
name ""
name "Tiny Lamia"
>I've learned how to make Amamadangos too!@
>I'll treat you both to as much as you want next time!\
name ""
lsp 700,":a;chara\alice_st01b.bmp",-120,0
lsp 701,":a;chara\pramia_st13.bmp",160,100:print 10,500
name "Alice"
>Hehe... I'm looking forward to it.\
name ""
csp 701
lsp 700,":a;chara\pramia_st13.bmp",0,100:print 10,500
name "Tiny Lamia"
>Oh, the three of us also got you a present.@
>Can you come to the back entrance here later so we can give it to you?\
name ""
>A present?@
>I wonder what the three of them want to give me...?\
mov %check08,1
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg018.bmp",7,1000
goto *city52_main



*city52_14

if %continue=1 bgm "bgm\city1.ogg"
mov %continue,0
gosub *setwindow_01
bg "bg\bg178.bmp",7,1000
if %check08=0 gosub *city_noiv:cspl 3,7:csp 611:cspl 699,705:bg "bg\bg018.bmp",7,1000:goto *city52_main
name "Luka"
>I wonder what the present is?\
name ""
>Rather than feeling pleased at the thought, for some reason I have a bad feeling...@
>As I approach the back of the inn, I hear some whispers.\
name "Dragon Pup"
>Uga... Will it really work?\
name ""
name "Vampire Girl"
>I'll put all my magic power into it...@
>If that doesn't work, we'll do it by brute strength...\
name ""
name "Tiny Lamia"
>We can't do it by force!\
name ""
>What are they talking about...?\
name "Luka"
>Uhm...@> I came as you asked...\
name ""
lsp 700,":a;chara\vgirl_st01.bmp",0,0:print 10,500
name "Vampire Girl"
>Alright, a chance!\
name ""
>Vampire Girl jumps out, aiming for my upper body!\
r@k@\
csel "Don't resist",*city52_14a,"Resist",*city52_14b



*city52_14a

lsp 700,":a;chara\vgirl_st02.bmp",0,0:print 10,500
name "Vampire Girl"
>Nnn... *Kiss*\
name ""
dwave 1,"se\ero_chupa2.ogg"
>Vampire Girl clings to my body, and kisses me softly on the lips.\
name "Luka"
>Nnn...\
name ""
>A sweet sensation runs through my body, as I go limp in her kiss.@
>Her soft lips press harder against me, her small tongue eagerly rubbing against mine.\
name "Luka"
>Haa... Ahh...\
name ""
lsp 700,":a;chara\dragonp_st01.bmp",-180,0
lsp 701,":a;chara\pramia_st01.bmp",180,0:print 10,500
name "Dragon Pup"
>Uga!@> It worked!\
name ""
name "Tiny Lamia"
>Alright, bring him inside!\
name ""
>The three of them lift me up and carry me off, my body momentarily too weak to resist.\
sean_change "bg179"
>They bring me to a barn just outside of town.@
>Too weak to stop them, the three little monsters kidnapped me...\
>Then...\
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov %hseanwave,1:hseanwave
lsp 700,":a;chara\end1_h1.bmp",0,0:print 10,500
name "Luka"
>Ahh...\
name ""
>Since then, the little monster girls have been using me for their amusement.@
>Kept in the barn, they rape me on a daily basis.\
name "Vampire Girl"
>Hehe, how do you like my waist movements?@
>Take this, and this. \
name ""
>Sitting astride me, Vampire Girl's tight vagina is clenching down on my penis.@
>At the same time, she's grinding her small body back and forth against me.\
name "Luka"
>Uwa!\
name ""
>My body jerks up in intense pleasure at the movements.@
>The other two girls hold me from both sides, keeping me still as she rides me.\
name "Dragon Pup"
>*Lick* *Lick*\
name ""
name "Tiny Lamia"
>*Lick*\
name ""
>Their tongues reach out and play with my nipples, filling my upper body with the ticklish pleasure.\
name "Luka"
>Stop... Ahhh!\
name ""
>The relentless tonguing on my nipples brings me to the very limit.@
>At the same time, my hard penis is stuck deep inside Vampire Girl's tiny vagina.\
name "Vampire Girl"
>Hehehe... I'll try a new skill today.@
>I'll squeeze out your semen with Energy Drain!\
name ""
name "Luka"
>W...Wait... Ahh!\
name ""
>Vampire Girl's vagina swells up with magic power, causing her temperature to sharply rise.@
>At the same time, her vaginal walls tense up and stick to my penis.\
>Infused with magic power, her soft flesh starts to pull on my penis, as if she was sucking on me with her vagina.@
>My body slackens, as the suction feels like I'm already ejaculating before even an orgasm.\
name "Luka"
>Haaa... Don't suck...@
>I'm going to come...!\
name ""
name "Vampire Girl"
>Hehe... It looks like the Hero is at his limit.@
>The Hero who saved the world is now our own personal toy... Hehe.\
name ""
>Far from weakening it, she starts to put even more effort into the suction.@
>Infusing even more magic into her vagina, Vampire Girl's face flushes as her small vagina squeezes down harder on me.\
lsp 700,":a;chara\end1_h2.bmp",0,0:print 10,500
name "Vampire Girl"
>Nnn... This is the finish...@
>Be finished inside me!\
name ""
name "Luka"
>Haaa!!!\
name ""
>As the suction pulls at me with unnatural ecstasy, I stop trying to resist her.@
>Giving myself over to the feelings, I let out a sigh as I reach a climax.\
gosub *syasei1
lsp 700,":a;chara\end1_h3.bmp",0,0
gosub *syasei2
>I explode inside the small Vampire's vagina.@
>As if my energy and soul itself is being sucked out, I feel myself becoming a captive to this pleasure...\
name "Luka"
>Ahhh...\
name ""
>As the flood of ecstasy fills my body, the sense of defeat is complete.@
>Even though these girls are so much weaker, I can't resist them.\
>I can only shiver in pleasure as Vampire Girl rides on top of me.\
lsp 700,":a;chara\end1_h4.bmp",0,0:print 10,500
name "Vampire Girl"
>Hehehe... You let out so much!@
>Does my Energy Drain feel that good?\
>Do you want me to draw out even more?@
>I'll give you some extra special service today...\
name ""
name "Luka"
>Ah!@>Hya!\
name ""
>Right after my ejaculation, her vagina is already sucking on my penis again.@
>Without giving me a break, Vampire Girl already restarts her Energy Drain...\
>More energy is drawn out of my sensitive penis...@
>I moan as the humiliation and ecstasy mix together inside my head.\
name "Tiny Lamia"
>*Lick*@> ...Hey, that's no fair!@> You don't get two turns in a row!\
name ""
name "Dragon Pup"
>*Lick*@> It was my turn next...\
name ""
>The other two girls mutter as they continue to lick my nipples.@
>Their wet touch makes the rest of my body extra sensitive...\
name "Vampire Girl"
>Hehehe... Sorry.@
>Luka's penis just wants me to suck on it so bad. \
name ""
name "Luka"
>Ahhh...\
name ""
>As my energy is sucked up into her vagina, the desire to release again slowly wells up.@
>If I come now, she'll just suck it up as more food for her...\
name "Luka"
>Ahh... Get off...@
>I'm going to come again...\
name ""
name "Vampire Girl"
>Hehehe... I won't let you go.@
>Give me more of your fresh semen!\
name ""
>Grinding against me, her tiny vagina squeezes down even harder on me as she moves to finish me off.@
>As my head goes blank in pleasure, I relax my body and soak in the climax.\
gosub *syasei1
lsp 700,":a;chara\end1_h5.bmp",0,0
gosub *syasei2
name "Luka"
>Haa...\
name ""
>With a soft moan, I explode inside her small body again.@
>Unable to resist her at all, she easily brought me to another orgasm...\
name "Vampire Girl"
>Hehe, you leaked out again.@
>I'll suck it all up...\
name ""
>She shrinks and contracts her small vagina, creating a suction.@
>My semen is slowly pulled deeper inside her small body, as if she truly was drinking it all up.\
>Those small contractions themselves stimulate me even further, brining forth more spasms of pleasure.\
name "Luka"
>Ah... Ahh...\
name ""
>I sigh in pure ecstasy as I feel my semen being drawn up by her.@
>I've already been made completely helpless to these girls...\
name "Vampire Girl"
>He's a total slave to my vagina.@
>Hehehe... He's my prey today.\
name ""
name "Tiny Lamia"
>No fair, no fair!@
>I've been licking his nipple until it's all wrinkly!\
name ""
name "Dragon Pup"
>Uga...@> Then I get to make him a slave tomorrow!\
name ""
>The two other monster girls continue licking my nipples as Vampire Girl's rape continues.@
>Like this, they continue to force me to ejaculate all day...\
name "Luka"
>Haa...\
name ""
gosub *syasei1
lsp 700,":a;chara\end1_h6.bmp",0,0
gosub *syasei2
mov %hseanwave,0:hseanwave
>Every day, the girls come here and rape me until I pass out.@
>The rest of my days live out as a toy to these small girls.\
>A pitiful end for a Hero...\
gosub *anten
>.............\
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_end1,1
mov $end_go,"city52_14"
goto *badend2



*city52_14b

name "Luka"
>...Hey, what are you doing!?\
name ""
dwave 1,"se\miss_aqua.ogg"
>I dodge to the side, avoiding her lunge.\
dwave 1,"se\down.ogg"
lsp 700,":a;chara\vgirl_st03.bmp",0,0:print 10,500
>Vampire Girl flies past me, and lands on the ground.\
lsp 700,":a;chara\dragonp_st03.bmp",-250,0
lsp 701,":a;chara\pramia_st03.bmp",0,0
lsp 702,":a;chara\vgirl_st03.bmp",250,0:print 10,500
name "Dragon Pup"
>Uga!@> It failed!\
name ""
name "Tiny Lamia"
>That strategy would never have worked...\
name ""
name "Vampire Girl"
>R...Run away!\
name ""
dwave 1,"se\escape.ogg"
cspl 700,702:print 10,500
>The three scared girls run off...\
name "Luka"
>...What was that about?\
name ""
>I stand puzzled at the back entrance for a few moments before moving on.\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg018.bmp",7,1000
goto *city52_main



*city53_main0

saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\habataki.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg023.bmp",7,1500
bgm "bgm\mura2.ogg"
goto *city53_main



*city53_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
strsp 601,"Girl A",95,160,4,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Woman ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Young Woman ",95,220:spbtn 603,603
strsp 604,"Girl B",95,250,4,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Young Boy ",95,280:spbtn 605,605
strsp 606,"Deputy Village Mayor",95,310,11,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 606,606
lsp 607,":s/20,20,0;#FFFFFF#FF4444Young Man ",95,340:spbtn 607,607
lsp 608,":s/20,20,0;#FFFFFF#FF4444Man ",95,370:spbtn 608,608
lsp 610,":s/20,20,0;#FFFFFF#FF4444Trinity ",410,160:spbtn 610,610
lsp 611,":s/20,20,0;#FFFFFF#FF4444Harpy Sisters ",410,190:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Queen Harpy ",410,220:spbtn 612,612
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city53_main
if %cmd1=-1 gosub *menu:goto *city53_main
cspl 600,699
if %cmd1=601 goto *city53_01
if %cmd1=602 goto *city53_02
if %cmd1=603 goto *city53_03
if %cmd1=604 goto *city53_04
if %cmd1=605 goto *city53_05
if %cmd1=606 goto *city53_06
if %cmd1=607 goto *city53_07
if %cmd1=608 goto *city53_08
if %cmd1=610 goto *city53_10
if %cmd1=611 goto *city53_11
if %cmd1=612 goto *city53_14
if %cmd1=619 return
goto *city53_main



*city53_01

lsp 700,":a;chara\mob_musume1.bmp",175,0:print 10,500
gosub *setwindow_01
name "Girl A"
>We managed to repulse the invaders with the harpies' help.@
>And at last, peace has come to this village...\
>Also, even some angels have settled here.@
>As long as they aren't violent, I don't really mind.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city53_main



*city53_02

lsp 700,":a;chara\mob_obasan.bmp",-160,0
lsp 701,":a;chara\mob_hapy3.bmp",160,0:print 10,500
gosub *setwindow_01
name "Pipi"
>They broke some beehives...@
>A lot of bees escaped.\
name ""
name "Woman"
>But as long as our family is safe, that's all I could ask for.@
>I'm so happy...\
name ""
lsp 701,":a;chara\mob_hapy2.bmp",160,0:print 10,500
name "Piana"
>Hero... Thanks to you, our village was protected.@
>We are truly grateful to you...\
>...Eh?@> Our husband?@
>He died in the assault.\
name ""
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city53_main



*city53_03

lsp 700,":a;chara\mob_musume2.bmp",175,0:print 10,500
gosub *setwindow_01
name "Young Woman"
>All seventeen of us in our family fought as one in the battle.@
>And in the battle, our bond deepened...\
>...And as soon as peace came, we got back to some good old family bickering.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city53_main



*city53_04

lsp 700,":a;chara\mob_syouzyo.bmp",-160,0
lsp 701,":a;chara\mob_hapy3.bmp",160,0:print 10,500
gosub *setwindow_01
name "Girl B"
>I was really scared, but I was cheering with Pim from behind!\
name ""
name "Harpy Girl"
>We kept everyone healthy with the Harpy Dance!@
>I hope we were useful...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city53_main



*city53_05

lsp 700,":a;chara\mob_syounen.bmp",-160,0
lsp 701,":a;chara\mob_hapy3.bmp",160,0:print 10,500
gosub *setwindow_01
name "Young Boy"
>.........\
name ""
name "Young Harpy Girl"
>.........\
name ""
>They aren't looking at each other anymore...@
>I wonder if the war split the young couple up...\
cspl 3,7
csp 611
cspl 700,705
goto *city53_main



*city53_06

lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Deputy Village Mayor"
>...The village mayor?@
>Why, that's Queen Harpy, of course.\
>Me?@>I'm just an old man...\
name ""
lsp 700,":a;chara\mob_rouzin1.bmp",-160,0
lsp 701,":a;chara\mob_hapy2.bmp",160,0:print 10,500
name "Mature Harpy"
>That's right, honey.@
>Hehe, forget all of your worries tonight again with me.\
name ""
name "Deputy Village Mayor"
>Oooh ho ho ho. \
name ""
name "Luka"
>...........\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city53_main



*city53_07

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01p
>There's a man buried in the ground...\
name "Young Man"
>Piana... Forgive me...@
>I won't flirt with the angels anymore!\
>Urhg... Someone... Help me...@
>Piana!@> Pipi!@> Forgive meeeee!!!\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city53_main



*city53_08

lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Man"
>The Harpies and Angels are both scrambling for men to marry.@
>Oooh... It's even worse than the surprise attack...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city53_main



*city53_10

lsp 700,":a;chara\trinity_st01.bmp",0,0
lsp 701,":a;chara\trinity_st11.bmp",0,0
lsp 702,":a;chara\trinity_st21.bmp",0,0:print 10,500
gosub *setwindow_01
name "Trinity"
>Who should we crucify with pleasure today?\
name ""
cspl 701,702
lsp 700,":a;chara\hapy_a_st31.bmp",0,0:print 10,500
name "Harpy"
>I...I won't lose to some angel!@
>Us Harpies will learn new tricks too!\
name ""
lsp 700,":a;chara\hapy_a_st31.bmp",-240,0
lsp 701,":a;chara\mob_musume1.bmp",335,0:print 10,500
name "Young Woman"
>We won't lose either!@
>Never underestimate the human spirit!\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city53_main



*city53_11

lsp 700,":a;chara\hapy_bc_st11.bmp",-160,0
lsp 701,":a;chara\hapy_bc_st31.bmp",160,0:print 10,500
gosub *setwindow_01
name "Younger Harpy"
>I fought with everyone, too.@
>But whenever I got scared, I played dead...\
name ""
name "Older Harpy"
>All the arrows you shot hit an ally.@
>Pii was quite annoying...\
name ""
lsp 701,":a;chara\hapy_bc_st32.bmp",160,0:print 10,500
name "Younger Harpy"
>...Ehehe... \
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city53_main



*city53_14

if %continue=1 bgm "bgm\mura2.ogg"
if %continue=1 bg "bg\bg023.bmp",7,1000
mov %continue,0
lsp 700,":a;chara\queenhapy_st11.bmp",0,0:print 10,500
gosub *setwindow_01
name "Queen Harpy"
>Hero Luka...@> Thanks to you, the world has been saved.@
>Of course, everyone else in the village is grateful as well.\
name ""
name "Luka"
>Ah no, no...@> It wasn't just me.@
>It was everyone's power together that defeated Ilias.\
name ""
name "Queen Harpy"
>So humble...@> If not for you, victory never would have come about.@
>As Queen of the Harpies, I thank you deeply.\
>As thanks, would you accept the special hospitality of our village?@
>Everyone wishes to truly thank you...\
name ""
name "Luka"
>Special hospitality...?\
name ""
>I don't know why, but I have a bad feeling about this.@
>I feel like I should turn this down...\
r@k@\
csel "Accept it",*city53_14a,"Refuse",*city53_14b



*city53_14a

name "Queen Harpy"
>Hehe... Then please come to my house.\
name ""
>With a seductive smile, Queen Harpy leads me to her house...\
dwave 1,"se\asioto2.ogg"
sean_change "bg180"
>Wondering what hospitality she's offering, I follow her inside.@
lsp 702,":a;chara\hapy_a_st24.bmp",-240,0
lsp 700,":a;chara\hapy_bc_st21.bmp",20,0
lsp 701,":a;chara\hapy_bc_st32.bmp",260,0:print 10,500
>Inside, all of the village's harpies are gathered.\
>But contrary to what I thought, there's no feast lain out.@
>What does she mean by special hospitality...?\
cspl 701,702
lsp 700,":a;chara\queenhapy_st11.bmp",0,0:print 10,500
name "Queen Harpy"
>Now for our hospitality...\
name ""
lsp 702,":a;chara\hapy_a_st24.bmp",-240,0
lsp 700,":a;chara\hapy_bc_st21.bmp",20,0
lsp 701,":a;chara\hapy_bc_st32.bmp",260,0:print 10,500
name "Harpy"
>Alright, get him! \
name ""
name "Luka"
>Eh...?@> Uwa!\
name ""
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
lsp 700,":a;chara\end2_h1.bmp",0,0:print 10,500
>Following Queen Harpy's signal, all of the harpies rush forward, and press their bodies against me from all sides.\
>Completely off guard, I'm quickly bound.\
>Jumping on top of me, the feel of Queen Harpy's feathers makes me go weak for a moment.\
name "Queen Harpy"
>As the representative of our race, I'll mate with you first.@
>Please give me a lot...\
name ""
>With a seductive smile, Queen Harpy drops her waist.@
>My penis slowly slips inside her warm vagina, pushing past her soft feathers.\
name "Luka"
>W...Wait...!@
>Ahh!\
name ""
mov %hseanwave,4:hseanwave
>I'm deep inside her in only moments.@
>I can't help but moan in surprised pleasure at her touch.\
>Her hot, soft vagina presses down on me from every side.@
>As my tip presses against her deepest part, tiny little bumps rub against my sensitive glans.\
name "Luka"
>Ahhh!\
name ""
name "Harpy"
>Aha, doesn't it feel great to be violated by the Queen?@
>Just look at his face, it's all loose! \
name ""
>A Harpy giggles as she watches my face loosen in pleasure.@
>Others are closely studying my face with varying looks of curiosity and amusement.\
>The Queen is raping me as they all watch...@
>The humiliating situation just deepens all of the feelings running through me.\
>Even more, the Queen isn't even moving her waist yet...@
>Just from insertion, I'm already on the verge of orgasm.\
name "Queen Harpy"
>Hehe, are you already near your limit?@
>Everyone, get a good look at his face as he comes...\
name ""
name "Luka"
>Ahh!\
name ""
>Queen Harpy slowly starts to tighten her vagina, clearly trying to bring me to ejaculation quickly...\
>At the same time, the tiny bumps inside her vagina rub and stroke against me, all promoting the desire to come inside her that's filling my body...\
name "Luka"
>I'm going to come... Ah...\
name ""
>Finally surrendering, I relax my body as I give myself over to the ecstasy.\
gosub *syasei1:gosub *syasei2
name "Luka"
>Haa...\
name ""
>My body shakes as my penis pulses inside her, shooting off spurt after spurt of semen into her warm insides.\
>As weakness washes over me, pure pleasure replaces the strength I used to feel.\
mov %hseanwave,0:hseanwave
name "Harpy"
>Wah!@> He already leaked... \
name ""
>Another Harpy closely stares at my face during my orgasm.@
>They're all watching me with mixed looks of curiosity and excitement as I come.\
>All of them are looking at me so closely as I orgasm, every embarrassing face and sound I make...\
name "Luka"
>Ahh...@
>This is too embarrassing...\
name ""
name "Queen Harpy"
>Oh my, you came so much...@
>Should we let everyone watch you come next time?\
name ""
mov %hseanwave,7:hseanwave
>Queen Harpy, who hasn't moved until now, starts to slowly move her waist.@
>Very slowly, she moves side to side, and up and down.\
>The gentle roll of pleasure slowly builds up as my penis is moved around inside her, causing my head to go blank.\
name "Luka"
>Ah...\
name ""
>Her wet walls rub against my penis as she sways side to side, the little bumps deep inside her massaging my glans as she moves.\
>I can't endure this for even a minute...@
>I feel pathetic, but I can't help but surrender to her.\
name "Luka"
>No... I'm going to come again...\
name ""
name "Queen Harpy"
>Hehe, you really are easy...@
>Alright then, let's show everyone your ejaculation...\
name ""
>Queen Harpy slowly rises up, pulling my penis out of her vagina.\
>Right before I'm all the way out of her, she clenches down on the neck of my penis and pulls on my tip.@
>The final stimulation acts as the finishing blow, sending me over.\
name "Luka"
>Ahhh!!!\
name ""
gosub *syasei1
lsp 700,":a;chara\end2_h2.bmp",0,0
gosub *syasei2
>The same instant I'm completely out of her vagina, I reach a powerful orgasm.@
>With my whole body shaking in a powerful climax, I come right into the air.\
lsp 700,":a;chara\end2_h3.bmp",0,0:print 10,500
>It lands back down all over my body, causing me to pollute myself with my own semen.\
mov %hseanwave,0:hseanwave
name "Harpy"
>Waah!@>Look at how much he shot!\
name ""
>The eyes of the Harpies surrounding me all go bright with amusement and interest.@
>The ones who had semen land on their feathers all go to lick it up.\
name "Queen Harpy"
>Oh my, oh my...@>I thought you might dribble a little bit onto your stomach.@
>But to shoot out so much all over the place...@> Aren't you just a naughty little boy?\
name ""
>Queen Harpy looks down at me and giggles, her eyes taking in all the semen I spilled everywhere.\
name "Harpy"
>My Queen...@>We want more semen...\
name ""
>One of the Harpies who was licking up the semen on her feathers calls out to the Queen.\
name "Queen Harpy"
>I see...@> Then we'll need to ask our honored guest for some more.\
name ""
mov %hseanwave,17:hseanwave
>The Queen spreads open her legs, and starts to rub her thighs against my penis.@
>Moving her body up and down, her smooth skin rubs against my sensitive penis in a rhythm.\
>Her ticklish feathers rub against my shaft from the sides, as the back of my penis rubs against the wet entrance to her vagina.\
name "Luka"
>Ahhh!!!\
name ""
name "Queen Harpy"
>You won't be able to last that long with this, will you?@
>Everyone, make sure you can get a good view of his penis as he ejaculates.\
name ""
name "Luka"
>No... I'm going to come again...@
>Ahh!\
name ""
gosub *syasei1
lsp 700,":a;chara\end2_h4.bmp",0,0
gosub *syasei2
>As the Queen violates me with intercrural sex, I finally succumb to the rising climax.@
lsp 700,":a;chara\end2_h5.bmp",0,0:print 10,500
>My semen shoots straight into the air, landing back down on all the closely watching Harpies.\
mov %hseanwave,0:hseanwave
name "Harpy"
>Waah... So much semen! \
name ""
>The Harpies all happily start licking up my semen as the Queen stares at me, satisfied.@
>Her gaze slowly drops as she meets my eyes with a smile.\
name "Queen Harpy"
>Hehe... You are a guest of honor in our village.\
>We'll keep entertaining you forever, so just give us a delicious feast of semen in return...\
name ""
name "Luka"
>Ahh...\
name ""
>It doesn't seem like I'll be able to escape from this village.@
>This obscene feast will never end...\
gosub *anten
>..............\
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_end2,1
mov $end_go,"city53_14"
goto *badend2



*city53_14b

name "Queen Harpy"
>...I see, that's a shame.@
>All of our precious preparations will go to waste...\
name ""
>Her shoulders slump down in dejection.\
name "Luka"
>I...I'm sorry...\
name ""
>I give her a sincere apology.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city53_main



*map15

saveoff
textoff
csp -1
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
bg "bg\map2.bmp",10,1000
goto *map15_2



*map15_2

if %ivent18=2 strsp 601,"San Ilia Castle",365,280,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 601,11
if %ivent04=2 strsp 602,"Port Natalia",660,280,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 602,12
lsp 604,":s/20,20,0;#FFFFFF#FF4444World Map ",635,550:spbtn 604,14
print 1
btnwait2 %cmd1
if %cmd1=0 goto *map15_2
if %cmd1=-1 gosub *menu:goto *map15_2
csp -1
btndef clear
if %cmd1=11 gosub *city56a_main0:dwave 1,"se\habataki.ogg":bg black,7,1500:bgm "bgm\epilogue.ogg":goto *map15
if %cmd1=12 gosub *city55_main0:dwave 1,"se\habataki.ogg":bg black,7,1500:bgm "bgm\epilogue.ogg":goto *map15
if %cmd1=14 goto *maped
goto *map15_2



*city55_main0

saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\habataki.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg037.bmp",7,1500
bgm "bgm\city1.ogg"
goto *city55_main



*city55_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Young Man ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Man ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Young Woman ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Soldier ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Mermaid ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Mermaid General ",95,310:spbtn 606,606
lsp 607,":s/20,20,0;#FFFFFF#FF4444El ",95,340:spbtn 607,607
lsp 608,":s/20,20,0;#FFFFFF#FF4444Mermaid Merchant ",95,370:spbtn 608,608
strsp 610,"Weapon Shop",410,160,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
strsp 611,"Tool Shop",410,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Church ",410,220:spbtn 612,612
lsp 613,":s/20,20,0;#FFFFFF#FF4444Mermaid Pub ",410,250:spbtn 613,613
strsp 614,"Meia's House",410,280,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 614,614
lsp 615,":s/20,20,0;#FFFFFF#FF4444Queen's Palace ",410,310:spbtn 615,615
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city55_main
if %cmd1=-1 gosub *menu:goto *city55_main
cspl 600,699
if %cmd1=601 goto *city55_01
if %cmd1=602 goto *city55_02
if %cmd1=603 goto *city55_03
if %cmd1=604 goto *city55_04
if %cmd1=605 goto *city55_05
if %cmd1=606 goto *city55_06
if %cmd1=607 goto *city55_07
if %cmd1=608 goto *city55_08
if %cmd1=610 goto *city55_10
if %cmd1=611 goto *city55_11
if %cmd1=612 goto *city55_12
if %cmd1=613 goto *city55_13
if %cmd1=614 goto *city55_14
if %cmd1=615 goto *city55_15
if %cmd1=619 return
goto *city55_main



*city55_01

lsp 700,":a;chara\mob_seinen1.bmp",-160,0
lsp 701,":a;chara\mob_Mermaid2.bmp",160,0:print 10,500
gosub *setwindow_01
name "Young Man"
>Our bond is eternal, Honey!\
name ""
name "Mermaid"
>Oooh Darling, I love you forever!\
name ""
name "Luka"
>Oh, did they make up?\
name ""
name "Young Man"
>No, I broke up with that other Mermaid.@
>My new Honey is a different one.\
name ""
name "Luka"
>T...That's horrible...\
name ""
name "Mermaid"
>Not at all... He's a new Darling for me, too!\
name ""
name "Luka"
>Oh... I guess that makes it alright...?\
name ""
csp 701
lsp 700,":a;chara\alice_st07b.bmp",67,0:print 10,500
name "Alice"
>...No it doesn't!@>That's not good at all!@
>It's been a month!@> What kind of people are you two!?\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city55_main



*city55_02

lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Man"
>The mermaids following the Queen Mermaid settled down here, too.@
>On the surface, the men here hesitated...@>But deep down, we were all jumping for joy.\
>The women aren't very receptive, of course...@
>It's true they attacked the village once...@>But they reformed, and helped defend it the second time.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city55_main



*city55_03

lsp 700,":a;chara\mob_musume2.bmp",175,0:print 10,500
gosub *setwindow_01
name "Young Woman"
>After the decisive battle was won, more mermaids came here to settle down.@
>I'm not a racist, but...@> Now there's going to be a lot of competition for men...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city55_main



*city55_04

lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier"
>Should I retire from being a soldier, and settle down here?@
>I want to take a mermaid wife, and take it easy...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city55_main



*city55_05

lsp 700,":a;chara\mob_Mermaid2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Mermaid"
>Mermaids under the direct control of the Queen Mermaid are living here now.@
>But the Queen herself is living in a palace a little ways away...\
>Still, she has accepted humans and mermaids living together...@
>I'm so happy!\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city55_main



*city55_06

lsp 700,":a;chara\g_mermaid_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Mermaid General"
>Hero Luka...@> I apologize for my actions before.@
>I've taken the role of Guard Captain for this town, now.\
>The humans here are actually quite kind.@
>I truly lament the fact that I once tried to destroy this town...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city55_main



*city55_07

lsp 700,":a;chara\mob_Mermaid3.bmp",-160,0
lsp 701,":a;chara\ningyohime_st06.bmp",160,150:print 10,500
gosub *setwindow_01
name "Young Mermaid"
>I made friends with El! \
name ""
name "El"
>Hey, hey!@>What should we play next!?\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city55_main



*city55_08

lsp 700,":a;chara\meia_st21.bmp",50,50:print 10,500
gosub *setwindow_01
name "Mermaid Merchant"
>Neither the Fried Sea Slug or Fried Starfish sold at all...@
>Even my secret item, Best Best Manju Crab didn't sell at all.\
name ""
name "Luka"
>Like I said, why are you obsessed with these strange foods...?\
name ""
name "Mermaid Merchant"
>I'm out of ideas now...@
>So now I'm selling myself!\
name ""
name "Luka"
>Ehh!?@>FRIED MERMAID!?\
name ""
name "Mermaid Merchant"
>No!@>I'm trying to sell my personality so someone will take me as a bride!@
>What did you think I meant!?\
name "Luka"
>........\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city55_main



*city55_10

bg "bg\bg150.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan3.bmp",0,0:print 10,500
name "Shopkeeper"
>Since then, the Queen Mermaid and her group have moved in.@
>Those mermaid blacksmiths under the Queen are quite good.\
>I can't match their quality, and I never had great sales during peacetime anyway...@
>I think I'll have to look into opening up a different kind of shop.\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg037.bmp",7,1000
goto *city55_main



*city55_11

bg "bg\bg154.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
name "Shopkeeper"
>I've done it!@>I've created Mermaid Knee Socks!@
>...But it doesn't look that sexy.\
>It sort of just looks like a tight fin bag.@
>And if it isn't sexy, there is no meaning to its existence.\
name ""
lsp 700,":a;chara\alice_st01b.bmp",-120,0
lsp 701,":a;chara\mob_seinen1.bmp",160,0:print 10,500
name "Alice"
>............Damn pervert.\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg037.bmp",7,1000
goto *city55_main



*city55_12

bg "bg\bg156.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_Mermaid2.bmp",0,0:print 10,500
name "Mermaid Priest"
>Heellloooo!@>Welcome, welcome! @
>If you have something to confess, I'll listen! \
name ""
lsp 700,":a;chara\mob_Mermaid2.bmp",-160,0
lsp 701,":a;chara\mob_sinkan.bmp",160,0:print 10,500
name "Priest"
>After Ilias fell, I looked for something new for my church.@
>The result is this Mermaid Church.\
name ""
name "Luka"
>I...I see...\
name ""
lsp 700,":a;chara\mob_Mermaid2.bmp",-160,0
lsp 701,":a;chara\mob_seinen1.bmp",160,0:print 10,500
name "Boy"
>I...I'll confess...@
>I've been feeling strange in my lower body whenever I look at the mermaids...\
name ""
name "Mermaid Priest"
>Then let me just fix that for you... \
name ""
name "Luka"
>...Is this just a brothel!?\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg037.bmp",7,1000
goto *city55_main



*city55_13

bg "bg\bg155.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_Mermaid1.bmp",-160,0
lsp 701,":a;chara\mob_Mermaid2.bmp",160,0:print 10,500
name "Mermaid A"
>We're having our grand re-re-opening!@
>We've got new employees, too!@>A complete revival!\
name ""
name "Mermaid B"
>Hehe... It's nice to meet you, Mr. Hero.@
>As thanks for saving the world...@>I'd love to give you some extra friendly service...\
name ""
name "Luka"
>No...@>That's alright...\
name ""
lsp 700,":a;chara\alice_st01b.bmp",-120,0:print 10,500
name "Alice"
>...........\
name ""
name "Mermaid B"
>M...Monster Lord!@
>It was just a joke...!\
>Forgive me, I'd never intend to take away your husband.@
>Please, make it quick if you have to!\
name ""
lsp 700,":a;chara\alice_st03b.bmp",-120,0:print 10,500
name "Alice"
>Come on, don't be so scared!@
>But why are these strange rumors spreading all over the place!?\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg037.bmp",7,1000
goto *city55_main



*city55_14

if %continue=1 bgm "bgm\city1.ogg"
mov %continue,0
bg "bg\bg049.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\meia_st01.bmp",50,50:print 10,500
name "Meia"
>Thank you, Hero!@
>You've helped me out so much...\
name ""
name "Luka"
>Oh no, no...\
name ""
name "Meia"
>I really must thank you, no matter what.@
lsp 700,":a;chara\meia_st02.bmp",50,50:print 10,500
>So... If you would like, why not enjoy my pussy?\
name ""
name "Luka"
>I...I can't do that!@
>Besides, aren't you married!?\
name ""
name "Meia"
>Of course...@
>A Hero like you would never be satisfied with a married woman's used pussy...\
>But I still have confidence in myself, because I know I can make any man come...\
name ""
name "Luka"
>...........\
name ""
>I nervously swallow.@
>But she's still married...\
lsp 700,":a;chara\meia_st03.bmp",50,50:print 10,500
name "Meia"
>My husband only lasts ten seconds every night.@
>Once you're deep inside, it feels so good you could just melt away in ecstasy...\
>But would a Hero still not be satisfied with that?@
>If you don't mind, I'd love for you to try me...\
name "Luka"
>T...That's...\
name ""
r@k@\
csel "Just once...",*city55_14a,"Absolutely not",*city55_14b



*city55_14a

if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
name "Meia"
>Hehe... Then please enjoy this married woman's pussy.\
name ""
>Meia hugs me, bringing my face next to her soft, warm breasts.\
name "Luka"
>Nnnn... M...Meia... This...\
name ""
name "Meia"
>Hehehe... My husband loves being held like this. \
name ""
>While saying that, Meia presses her waist against me.@
>The tip of my already erect penis presses against her wet opening.\
name "Meia"
>Mmm... \
name ""
mov %hseanwave,2:hseanwave
lsp 700,":a;chara\end4_h1.bmp",0,0:print 10,500
>Pressing her waist against mine, Meia brings me inside her vagina!\
>Her folds rub against me as I slip inside, her already wet flesh letting me slip in easily.\
name "Luka"
>Ahh!!!\
name ""
>The incredible touch of her leaves me moaning in no time.@
>The wet folds inside her seem to lick me clean at the same time.\
name "Meia"
>Hehehe, already moaning?@
>Oh my, Hero, you're so sensitive. \
name ""
name "Luka"
>But...@
>Your vagina feels so good, Meia...\
name ""
name "Meia"
>Hehe, that makes me so happy... \
name ""
>Meia presses the back of my head harder against her soft breasts.@
>At the same time, her warm vagina squeezes my penis, deep inside her.\
>It feels too good...@
>The comfortable pleasure invites me to a climax in only moments.\
name "Luka"
>Ahh... I'm going to come...\
name ""
name "Meia"
>Ara?@> Already satisfied?@
>But even my husband can endure more...\
name ""
>Meia strokes my head as she giggles.\
name "Meia"
>Alright, then I'll tighten my insides...@
>I'm sure you'll come right away.\
>Please come right inside a married woman's pussy. \
name ""
name "Luka"
>Ahh... I...I shouldn't...\
name ""
>The immoral nature of what I'm doing attacks me again...@
>I can't come inside someone who's married...!\
name "Luka"
>Ah... Meia... Wait...\
name ""
name "Meia"
>I'll tighten... Now. \
name ""
name "Luka"
>No, wait... Ah!\
name ""
>Meia's vagina squeezes down, pressing her soft flesh against my penis.@
>With my mind focused on the immorality of what we're doing, my body loosens in pleasure.\
gosub *syasei1
lsp 700,":a;chara\end4_h2.bmp",0,0
gosub *syasei2
name "Luka"
>Ahh...\
name ""
>I explode inside her, my semen shooting into the married mermaid's vagina.\
>Going slack in her embrace, I let the sensations from my orgasm flow through my loose body.\
name "Meia"
>Hehehe... The face the Hero makes when he comes is so cute... \
name ""
>Meia smiles and giggles as I come inside her.@
>I came inside a married woman...@> What am I doing...?\
name "Luka"
>I'm so sorry Meia...@> Let's stop...\
name ""
>After I finish coming inside her, I try to pull myself out...\
name ""
name "Luka"
>Eh...?@> N...No...\
name ""
name "Meia"
>Do you want to taste the technique I haven't even shown my husband yet?\
name ""
name "Luka"
>Ahhh!!!\
name ""
mov %hseanwave,5:hseanwave
>Deep inside her, something pulls in my glans.@
>It's as if a mouth inside her is sucking on my tip...\
name "Luka"
>Haa... What... Is this...?\
name ""
name "Meia"
>I sucked in your tip with my womb...@
>It's too soon for my husband.@>But for you...\
name ""
name "Luka"
>N...No... Ahhh!\
name ""
>My waist shakes in ecstasy as her womb sucks on my glans.@
>The intense pleasure blows away my reason all at once.\
>It's like she's sucking everything from me...@
>There's no way I can endure this!\
name "Meia"
>You'll come right inside a married woman's womb...@
>Should we see if you get me pregnant? Hehehe. \
name ""
name "Luka"
>N...No... Not that...@
>Ahh!\
name ""
>No matter how much I try to endure, I'm helpless in front of this mad pleasure.@
>With my body going limp, I surrender to the immoral ecstasy...\
gosub *syasei1
lsp 700,":a;chara\end4_h4.bmp",0,0
gosub *syasei2
name "Luka"
>Ahh...\
name ""
>My penis pulses, shooting semen straight into Meia's womb...@
>The guilt of having possibly gotten a married woman pregnant flows through me along with the pleasure from my orgasm.\
>Meia's vagina squeezes me as I come, accepting everything I have to shoot into her...\
name "Luka"
>Ahh...\
name ""
name "Meia"
>Hehe... Are you satisfied?\
name ""
mov %hseanwave,0:hseanwave
>Meia holds me as I bask in the afterglow of my orgasm.@
>With that, I start an illicit relationship with a married mermaid...\
gosub *anten
>I become a captive of a mermaid's pussy.@
>In search of pleasure, I keep coming to Meia's embrace.\
>This illicit relationship continues, my heart slowly coming to belong to Meia.@
>A captive of Meia, my life as a Hero ends...\
gosub *anten
>.............\
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_end4,1
mov $end_go,"city55_14"
goto *badend2



*city55_14b

lsp 700,":a;chara\meia_st04.bmp",50,50:print 10,500
name "Meia"
>I see...@> That's too bad.@
>So my body isn't enough to satisfy the Hero...\
name ""
name "Luka"
>No, that's not it...\
name ""
csp 700:print 10,500
>Anyway, there's no good way out of this situation.@
>I quickly run away from Meia's house.\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg037.bmp",7,1000
goto *city55_main



*city55_15

bg "bg\bg231.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\queenmermaid_st01.bmp",0,0:print 10,500
name "Queen Mermaid"
>My misanthropy cannot be changed now.@
>But there's no reason for me to pass it down upon my descendants...\
>So I've decided to migrate here for the sake of my family.@
>I will let them experience for themselves, and let them decide on their own.\
name ""
name "Luka"
>I see...@
>I'm sure everyone can live together.\
name ""
>And one day, even the Queen herself...@
>If she lives here and sees how everyone lives together, I'm sure she'll come around someday...\
name "Queen Mermaid"
>I'm also here to ensure a tragedy as what happened to me before doesn't arise again.@
>I'm expecting great things from you...\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg037.bmp",7,1000
goto *city55_main



*city56a_main0

saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\habataki.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg048.bmp",7,1500
bgm "bgm\city1.ogg"
goto *city56a_main



*city56a_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Boy ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Women ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Children ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Soldier ",95,250:spbtn 604,604
strsp 605,"Sister Lamia",95,280,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Chimera Prison ",95,310:spbtn 606,606
lsp 607,":s/20,20,0;#FFFFFF#FF4444Mariel ",95,340:spbtn 607,607
lsp 608,":s/20,20,0;#FFFFFF#FF4444Cupid ",95,370:spbtn 608,608
strsp 610,"Weapon Shop",410,160,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
strsp 611,"Tool Shop",410,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Church ",410,220:spbtn 612,612
strsp 613,"San Ilia Castle",410,250,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 613,613
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city56a_main
if %cmd1=-1 gosub *menu:goto *city56a_main
cspl 600,699
if %cmd1=601 goto *city56a_01
if %cmd1=602 goto *city56a_02
if %cmd1=603 goto *city56a_03
if %cmd1=604 goto *city56a_04
if %cmd1=605 goto *city56a_05
if %cmd1=606 goto *city56a_06
if %cmd1=607 goto *city56a_07
if %cmd1=608 goto *city56a_08
if %cmd1=610 goto *city56a_10
if %cmd1=611 goto *city56a_11
if %cmd1=612 goto *city56a_12
if %cmd1=613 goto *city56b_main0
if %cmd1=619 return
goto *city56a_main



*city56a_01

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Boy"
>After that battle, the angels started living on the surface world, too.@
>Most of them gathered in this holy city of San Ilia.\
>Even though they're angels, I think they're at a loss as to what to do now...@
>That makes me feel relieved, somehow.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city56a_main



*city56a_02

lsp 700,":a;chara\mob_zyosei.bmp",0,0:print 10,500
gosub *setwindow_01
name "Woman A"
>There sure are a lot of angels in the city...@
>I don't know whether to be afraid or scared.\
name ""
lsp 700,":a;chara\mob_zyosei.bmp",-160,0
lsp 701,":a;chara\mob_madam.bmp",160,0:print 10,500
name "Woman B"
>But they aren't harming anyone now.@
>Since Ilias was brought down, things have been peaceful.\
csp 701
lsp 700,":a;chara\mob_madam.bmp",0,0:print 10,500
name "Woman C"
>Most of them look really depressed and sad...@>I feel kind of sorry for them.\
name ""
if %ivent05=0 cspl 3,7:csp 611:cspl 700,705:goto *city56a_main
lsp 700,":a;chara\mob_madam.bmp",-160,0
lsp 701,":a;chara\mob_zyoseiy.bmp",160,0:print 10,500
name "Ghost Lady"
>I won't forget my grudge at trying to be "purified"...@
>But I'm feeling a little sorry for them now, too.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city56a_main



*city56a_03

gosub *setwindow_01
lsp 700,":a;chara\mob_syounen.bmp",-220,0
lsp 701,":a;chara\mob_syouzyo.bmp",0,0
lsp 702,":a;chara\fairys_st21.bmp",450,100:print 10,500
name "Young Boy"
>Yaaay!@> The angels are playing with us!\
name ""
name "Girl"
>We're playing hide and seek with Cupid!\
name ""
name "Fairy"
>And she said she'll teach us things that are much more fun when we're older!\
name ""
name "Luka"
>...............\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city56a_main



*city56a_04

lsp 700,":a;chara\mob_sensi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier"
>Dancing fairies...@> Wandering ghosts...@> Plotting angels...@
>When I think about how this is supposed to be the most holy place in the world, I can't help but laugh.\
>...Though, I like this city.@
>I'm never bored here!\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city56a_main



*city56a_05

lsp 700,":a;chara\sisterlamia_st04.bmp",0,0:print 10,500
gosub *setwindow_01
name "Sister Lamia"
>Surprisingly, I was selected as an official priest...@
>The Church's new policy is to spread awareness and change in regards to human and monster coexistence.\
>To pick me... One who attacked this city in the past...@
>I must work as hard as I can, to repay the compassion of this wonderful place!\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city56a_main



*city56a_06

lsp 700,":a;chara\c_prison_st01.bmp",0,0
lsp 701,":a;chara\fairys_st41.bmp",330,190:print 10,500
gosub *setwindow_01p
>A fairy is being held captive inside the Chimera Prison!\
name "Luka"
>W...What's going on!?@
>Release that fairy at once!\
name ""
name "Fairy"
>Noooo!@> This is my house!\
name ""
name "Chimera Prison"
>She seems to like me for some reason...@
>People keep thinking I'm abusing her...@>And they throw stones...\
name ""
name "Luka"
>S...Sorry for accusing you...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city56a_main



*city56a_07

lsp 700,":a;chara\mariel_st04.bmp",0,0:print 10,500
gosub *setwindow_01
name "Mariel"
>After Ilias' downfall, most of the angels have fallen into grief and despair.@
>I don't know what I should do now, either...\
name ""
>The angels seem to be more at a loss than anyone else...@
>It doesn't look like they even have the energy left to do anything bad.\
>I hope they're able to live alongside humans and monsters someday, too...\
cspl 3,7
csp 611
cspl 700,705
goto *city56a_main



*city56a_08

lsp 700,":a;chara\cupid_st12.bmp",30,0:print 10,500
gosub *setwindow_01
name "Cupid"
>The humans here are so serious...@>It isn't interesting at all!@
>Should I go play in another town?\
name ""
name "Luka"
>..........\
name ""
>Even after Ilias is gone, it doesn't seem like some angels will change...\
cspl 3,7
csp 611
cspl 700,705
goto *city56a_main



*city56a_10

bg "bg\bg150.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
name "Shopkeeper"
>I thought I'd make a huge profit after the war, when things start to get wild in lawlessness...@
>But the world is so war weary, violence is almost completely gone.\
>It looks like weapons aren't needed, either...@
>Now...@> How to make money to eat...?\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg048.bmp",7,1000
goto *city56a_main



*city56a_11

bg "bg\bg151.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan3.bmp",0,0:print 10,500
name "Shopkeeper"
>The "Legend of Hero Luka" sure is selling!@
>Every time I get more in stock, they vanish in less than an hour!\
name ""
name "Luka"
>Ehh!?@>W...What's that!?\
name ""
name "Shopkeeper"
>Oh, you didn't know?@
>It's a bestselling biography describing all of the battles of the Hero Luka.\
>I mean, you're cosplaying as him, right?@
>And a good one, too...@> You look just like him!\
name ""
name "Luka"
>There's a biography out...?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",-120,0
lsp 701,":a;chara\mob_ozisan3.bmp",160,0:print 10,500
name "Alice"
>I figured one would show up someday... But so soon?@
>What the heck...?\
name ""
>Since the book is sold out, I can't even see what's in it.@
>Could the source of all those strange rumors be that book...?\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg048.bmp",7,1000
goto *city56a_main



*city56a_12

bg "bg\bg156.bmp",7,1000
gosub *setwindow_01
if %ivent05<3 gosub *city_noiv:cspl 3,7:csp 611:cspl 699,705:bg "bg\bg048.bmp",7,1000:goto *city56a_main
lsp 700,":a;chara\chrom_st22.bmp",0,0:print 10,500
name "Chrome"
>Ooh, it's Luka.\
name ""
name "Luka"
>...Chrome?@
>This doesn't seem like a place you'd hang out at...@>What are you doing here?\
name ""
name "Chrome"
>I'm delivering a list of all those buried at the Northern Mansion.@
>None of them were on the central registry, so I thought I should add them.\
name ""
name "Luka"
>I see...@> Is Frederika still with you?\
name ""
lsp 700,":a;chara\chrom_st21.bmp",0,0:print 10,500
name "Chrome"
>...After the fight was over, I laid Frederika back to rest.@
>She shouldn't be in this world any longer.\
>Frederika, Spi, and Rit's souls have all been sent on.@
>They're all enjoying their peaceful sleep...\
name ""
name "Luka"
>I see, that's for the best.@
>So you've really reflected on your actions, Chrome?\
name ""
lsp 700,":a;chara\chrom_st24.bmp",0,0:print 10,500
name "Chrome"
>Chrome doesn't reflect on anything!@
>Since the Monster Lord is easily scared, I just won't make Ghosts or Zombies any longer!\
name ""
name "Luka"
>That's... A rather calculating reason...\
name ""
lsp 700,":a;chara\chrom_st22.bmp",0,0:print 10,500
name "Chrome"
>So from now on, I'm Dollmaker Chrome!@
>My new magical arts won't scare the Monster Lord!\
name ""
lsp 700,":a;chara\alice_st07b.bmp",-120,0
lsp 701,":a;chara\chrom_st22.bmp",160,0:print 10,500
name "Alice"
>I...I wasn't scared of anything!@
>I was just worried about the impact on morale such horrible arts would have...@> As the Monster Lord...@>On the populace...\
name ""
>...After all this, she's still pretending?@
>Even though she's scared, she's being so stubborn about it...\
csp 701
lsp 700,":a;chara\chrom_st22.bmp",0,0:print 10,500
name "Luka"
>...Anyway, good luck.@
>I'm looking forward to seeing your new arts, Dollmaker Chrome.\
name ""
name "Chrome"
>Yes, we'll meet again in the Monster Lord's Castle!\
name ""
>If she's just making dolls, she shouldn't be able to hurt anyone.@
>I wish the best for Chrome in the future.\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg048.bmp",7,1000
goto *city56a_main



*city56b_main0

saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\asioto3.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg044.bmp",7,1500
bgm "bgm\castle1.ogg"
goto *city56b_main



*city56b_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Guard ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Priests ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Scholar ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Soldier ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Angel Soldiers ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Valkyrie ",95,310:spbtn 606,606
lsp 610,":s/20,20,0;#FFFFFF#FF4444Large Chapel ",410,160:spbtn 610,610
strsp 611,"Basement Library",410,190,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
strsp 612,"Audience Room",410,220,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 612,612
lsp 613,":s/20,20,0;#FFFFFF#FF4444Guard Captain's Room ",410,250:spbtn 613,613
strsp 619,"Back to Town",410,400,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city56b_main
if %cmd1=-1 gosub *menu:goto *city56b_main
cspl 600,699
if %cmd1=601 goto *city56b_01
if %cmd1=602 goto *city56b_02
if %cmd1=603 goto *city56b_03
if %cmd1=604 goto *city56b_04
if %cmd1=605 goto *city56b_05
if %cmd1=606 goto *city56b_06
if %cmd1=610 goto *city56b_10
if %cmd1=611 goto *city56b_11
if %cmd1=612 goto *city56b_12
if %cmd1=613 goto *city56b_13
if %cmd1=619 saveoff:textoff:btndef clear:mov %sinkoumode,0:skipoff:autoclick 0:dwave 1,"se\asioto3.ogg":csp 611:cspl 3,7:bg black,7,1500:bg "bg\bg048.bmp",7,1500:bgm "bgm\city1.ogg":goto *city56a_main
goto *city56b_main



*city56b_01

lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Guard"
>Everyone is slowly adjusting back to peace.@
>The fact that it was Ilias herself that brought about war sure didn't help.\
>With the cornerstone of most people's faith gone, it's more difficult than usual...@
>But still, we all must continue to move forward.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city56b_main



*city56b_02

gosub *setwindow_01
lsp 700,":a;chara\mob_sinkan.bmp",-220,0
if %ivent05=0 lsp 701,":a;chara\mob_sinkan.bmp",0,0
if %ivent05>0 lsp 701,":a;chara\mob_sinkany.bmp",0,0
lsp 702,":a;chara\fairys_st41.bmp",560,100:print 10,500
name "Priest A"
>Waah!?@> What is this strange little creature!?\
name ""
if %ivent05=0 name "Priest"
if %ivent05>0 name "Ghost Priest"
>Hyaa!@>Where'd it come from!?\
name ""
name "Fairy"
>Heeeeeyyyy!@>Let's play!\
name ""
>It seems like the priests are finally able to see the fairies...\
cspl 3,7
csp 611
cspl 700,705
goto *city56b_main



*city56b_03

lsp 700,":a;chara\mob_gakusya.bmp",0,0:print 10,500
gosub *setwindow_01
name "Scholar"
>Many books we had believed lost were located in the Monster Lord's library.@
>Just looking at the list of books made me start to tremble...\
>In honor of the new friendship between our races, many of those books were donated to our library, too.@
>Pretty much all of us scholars are openly welcoming our new Monster friends as a result.\
>Thousands of applications to visit the library in person have also been submitted...@
>My application was approved for next month.@>I'm already looking forward to it!\
name ""
lsp 700,":a;chara\alice_st02b.bmp",-140,0
lsp 701,":a;chara\mob_gakusya.bmp",160,0:print 10,500
name "Alice"
>Hmm...@> It was Tamamo's idea to increase cultural exchange by lending out our books...@
>It seems like it's more effective than I thought it would be.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city56b_main



*city56b_04

lsp 700,":a;chara\mob_sensi1.bmp",-160,0
lsp 701,":a;chara\fairys_st12.bmp",430,100:print 10,500
gosub *setwindow_01
name "Soldier"
>I had fun mountain climbing the other day.@
>You want to try hiking to the sea tomorrow?\
name ""
name "Fairy"
>Yaaay!@> I wanna see the sea!\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city56b_main



*city56b_05

lsp 700,":a;chara\angels_st01.bmp",-280,0
lsp 701,":a;chara\angels_st21.bmp",-90,0
lsp 702,":a;chara\angels_st31.bmp",90,0
lsp 703,":a;chara\angels_st11.bmp",280,0:print 10,500
gosub *setwindow_01
name "Angel Soldier A"
>Our weapons will no longer be used for heaven's punishment.@
>But for beings like us... Who only know how to punish sinners...\
>I decided to apply to San Ilia as a governmental punishment official.\
>I'll use this sacred whip of mine to enact punishment on criminals.@>Within the bounds of the laws of San Ilia.\
name ""
name "Angel Soldier B"
>I will light up the dark nights with this candle.@
>I wish to ease the anxiety of the populace, if only a little.\
name ""
name "Angel Soldier C"
>I'll use this sacred feather duster to clean the floors of the Castle.@
>I love cleaning...\
name ""
name "Angel Soldier D"
>This sacred onahole...@> Uhm... Err...@
>H...How else can I use this...?\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city56b_main



*city56b_06

lsp 700,":a;chara\valkyrie_st01.bmp",-50,0:print 10,500
gosub *setwindow_01
name "Valkyrie"
>I don't intend to cause any trouble over Ilias.@
>I intend to live quietly on the surface world, protecting the Churches.\
name ""
>It looks like Valkyrie is working as a Guard now.\
lsp 700,":a;chara\valkyrie_st01.bmp",-280,0
lsp 699,":a;chara\mob_heisi1.bmp",160,0:print 10,500
name "Soldier"
>Hey!@> A woman like you shouldn't be in this castle!\
name ""
name "Valkyrie"
>You insult an angel...?@
>Your punishment is a triple ejaculation.@> I shall carry it out now.\
name ""
cspl 699,700
bg black,10,1000
name "Soldier"
>Ah...Aiiieee!\
name ""
csp 699
gosub *syasei1:gosub *syasei2
lsp 700,":a;chara\valkyrie_bk03.bmp",-50,0
lsp 701,":a;chara\valkyrie_st01.bmp",-50,0
bg "bg\bg044.bmp",10,1000
name "Valkyrie"
>I won't let anyone insult me to my face.@
>But no matter how many times I punish them, they keep doing it.\
>They must truly dislike me...\
name ""
name "Luka"
>No...@>I think they're doing it for another reason...\
name ""
name "Valkyrie"
>...Hero Luka, there was something I wished to discuss with you.@
>I wished to talk with you about how to coexist with humans on the surface world.\
>Would you please come to the soldier's waiting room a little bit later?\
name ""
name "Luka"
>Of course, I'd be glad to talk with you about that!\
name ""
mov %check09,1
cspl 3,7
csp 611
cspl 700,705
goto *city56b_main



*city56b_10

bg "bg\bg157.bmp",7,1000
gosub *setwindow_01p
bgm "bgm\comi1.ogg"
lsp 700,":a;chara\mob_seinen1.bmp",-220,0
lsp 701,":a;chara\sylph_st21r.bmp",335,190
lsp 702,":a;chara\mob_musume2.bmp",395,0:print 10,500
name "Boy"
>Oooh! It's Sylph!\
name ""
name "Sylph"
>Ahem!\
name ""
name "Girl"
>She helped out the brave Hero and took down the evil Goddess!\
name ""
name "Sylph"
>Ahem!\
name ""
>Sylph is in the cathedral!@> And surrounded by tourists...?\
bgm "bgm\castle1.ogg"
name "Luka"
>Sylph... What's going on?\
name ""
csp 702
lsp 700,":a;chara\mob_sinkan.bmp",-160,0
lsp 701,":a;chara\mob_gakusya.bmp",160,0:print 10,500
name "Priest"
>We asked her to live here.\
name ""
name "Scholar"
>Long ago, Sylph was revered in this land.@
>Now that Ilias is gone, attempts to revive the old faith are being pushed.\
name ""
name "Luka"
>I see...\
name ""
>So Sylph was worshipped a long time ago...\
lsp 700,":a;chara\sylph_st21r.bmp",130,190
lsp 701,":a;chara\mob_sinkan.bmp",160,0:print 10,500
name "Sylph"
>I'm hungryyyy!@
>I want to eat candy!\
name ""
name "Priest"
>Then, please have this piece...\
name ""
name "Sylph"
>No, I want what I had before!@>Baumkuchen!\
name ""
name "Priest"
>P...Please wait a moment, I'll prepare some at once...\
name ""
name "Luka"
>Sylph, you shouldn't act selfish...\
name ""
name "Sylph"
>Yeah, I know...@
>But I was alone for so long, I'm just living it up for now. \
name ""
name "Luka"
>...Oh well.\
name ""
>Sylph has probably felt lonely for a long time...\
lsp 700,":a;chara\alice_st01b.bmp",-120,0
lsp 701,":a;chara\mob_sinkan.bmp",160,0:print 10,500
name "Alice"
>I'd like some of that Baumkuchen...\
name ""
name "Luka"
>You'll be waiting a while, it seems.\
name ""
name "Priest"
>How about a Sylph Manju, Ms. Monster Lord?\
name ""
lsp 700,":a;chara\alice_st02b.bmp",-120,0:print 10,500
name "Alice"
>Oooh... So you had something like that?\
name ""
name "Luka"
>............\
name ""
>It's already a total tourist trap...\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg044.bmp",7,1000
goto *city56b_main



*city56b_11

gosub *setwindow_01
name "Castle Guard"
>Oooh! Hero Luka!@> Perfect timing!@
>There are monsters rampaging around the library!\
name ""
bgm "bgm\kiki2.ogg"
name "Luka"
>W...What!?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>We must address this at once!\
name ""
csp 700:print 10,500
>After hearing that, we rush into the basement library...\
dwave 1,"se\asioto4.ogg"
sean_change "bg046"
lsp 700,":a;chara\page65537_st23.bmp",0,0:print 10,500
name "Page 65537"
>Finally...@> I've finally regained my power!@
>You damn Hero... I won't let it end with that!\
name ""
>She's one of the book monsters I fought before!@
>So she has been sealed since then...\
name "Page 65537"
>You appeared, Hero!@
>This time, I'll get revenge for-\
name ""
bgm "bgm\castle1.ogg"
lsp 700,":a;chara\alice_st01b.bmp",-120,0
lsp 701,":a;chara\page65537_st23.bmp",200,0:print 10,500
name "Alice"
>...Wait.@> Everything has changed since then.\
name ""
name "Page 65537"
>M...Monster Lord!@
>Why are you in a place like this!?\
name ""
name "Alice"
>The Hero marched into the Monster Lord's Castle, and defeated all four of the Heavenly Knights.\
name ""
name "Page 65537"
>Egads!\
name ""
name "Alice"
>After that, I myself lost to him.\
name ""
name "Page 65537"
>Egads!\
name ""
name "Alice"
>Then, Ilias was going to destroy the world itself.\
name ""
name "Page 65537"
>Egads!\
name ""
name "Alice"
>Then the Hero and I came together, and attacked her.\
name ""
name "Page 65537"
>Egads!\
name ""
name "Alice"
>So with that, humans and monsters have come together.@
>There's no need to attack humans any longer.\
name ""
name "Page 65537"
>...Forgive me, Monster Lord.@
>In the midst of such historic fights, I was unable to do anything...\
name ""
name "Alice"
>...No, my fire was the cause of you getting sealed...@>Sorry.\
name ""
name "Page 65537"
>Egads!\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg044.bmp",7,1000
goto *city56b_main



*city56b_12

bg "bg\bg045.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\saniria_n_st02.bmp",0,0:print 10,500
name "San Ilia King"
>Ooh!@> The Hero Luka!@
>I've been worrying nonstop since I heard you were in a coma!\
>First, on behalf of every citizen, I wish to thank you.@
>If not for your actions, the world would have come to an end.\
name ""
name "Luka"
>No, no... It was the result of everyone coming together as one.@
>So... How are you and the other priests?\
name ""
>They were all betrayed by the Goddess they believed in...@
>I wonder how they've been this past month?\
lsp 700,":a;chara\saniria_n_st01.bmp",0,0:print 10,500
name "San Ilia King"
>Many are still unsure of what to do now.@
>The huge hole where their faith was can't be so simply filled...\
>But they've lived their lives guiding those who were lost until now.@
>I'm sure everyone will come to find their own paths, with time.\
name ""
lsp 700,":a;chara\alice_st01b.bmp",-120,0
lsp 701,":a;chara\saniria_n_st01.bmp",160,0:print 10,500
name "Alice"
>How about the general populace?\
name ""
name "San Ilia King"
>There is, unexpectedly, little unrest.@
>It's ironic, but the dwindling faith of the past few generations may have saved us all...\
lsp 701,":a;chara\saniria_n_st03.bmp",160,0:print 10,500
>Ilias was less popular than we all believed.\
name ""
name "Luka"
>...........\
name ""
csp 701
lsp 700,":a;chara\saniria_n_st01.bmp",0,0:print 10,500
name "San Ilia King"
>...Though the devout believers are at a big loss.@
>Our role will be to show them how to continue on a new path...\
name ""
name "Luka"
>I see... We're all counting on you for the future.@
>It looks like the priesthood still has a big role to play going forward.\
name ""
lsp 700,":a;chara\saniria_n_st03.bmp",0,0:print 10,500
name "San Ilia King"
>...I've been thinking about the Holy Sword, given by Ilias.@
>The one that the Monster Lord destroyed so easily.\
name ""
lsp 700,":a;chara\alice_st01b.bmp",-120,0
lsp 701,":a;chara\saniria_n_st04.bmp",160,0:print 10,500
name "Alice"
>Ah, yes... It was pretty brittle.\
name ""
name "San Ilia King"
>Why did Ilias bestow that sword upon us?@
>She told us to give it to a true Hero...\
>With our faith in her, we couldn't see the sword for what it truly was, of course.@
>But why give us a useless sword, if she truly wanted the Monster Lord defeated?\
name ""
name "Alice"
>...Aren't you thinking about it too much?@
>She was just an evil Goddess harassing you.\
>It gave me quite a laugh when I saw you all treating that sword like some sacred object, though.\
name ""
name "San Ilia King"
>It's true she may have just been toying with us...@
>But I would like to think it was some sort of message.\
lsp 701,":a;chara\saniria_n_st02.bmp",160,0:print 10,500
>...Anyway, I thank you, Hero Luka.@
>Your name and actions will become the thing of legends!\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg044.bmp",7,1000
goto *city56b_main



*city56b_13

if %continue=1 bgm "bgm\castle1.ogg"
mov %continue,0
bg "bg\bg060.bmp",7,1000
gosub *setwindow_01
if %check09=0 gosub *city_noiv:cspl 3,7:csp 611:cspl 699,705:bg "bg\bg044.bmp",7,1000:goto *city56b_main
lsp 700,":a;chara\cupid_st13.bmp",-160,0
lsp 701,":a;chara\valkyrie_st01.bmp",80,0:print 10,500
name "Valkyrie"
>So you came...@
>Then, please give me some counsel.\
>You don't mind if I take a little bit of your time, do you?\
name ""
name "Cupid"
>Ehehe... \
name ""
name "Luka"
>...........\
name ""
>...I have a bad feeling.@
>There's nothing wrong with an angel trying to live peacefully on the ground...\
>But there's a strange gleam in her eyes.@
>Should I accept her invitation...?\
r@k@\
csel "Give her counsel",*city56b_13a,"Refuse",*city56b_13b



*city56b_13a

name "Luka"
>Sure, I'll help you out.\
name ""
lsp 701,":a;chara\valkyrie_st02.bmp",80,0:print 10,500
name "Valkyrie"
>Then the grudges I've...@
>No, I mean the questions I've built up...@>Please hear them.\
name ""
>Valkyrie locks the door to the room.@
>Just then, I notice it's a trap!\
sean_change "bg060"
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov %hseanwave,17:hseanwave
csp 701
lsp 700,":a;chara\end3_h1.bmp",0,0:print 10,500
name "Luka"
>Ahhh...\
name ""
>Valkyrie squeezes my penis between her soft breasts...@
>And from behind, Cupid is pressing an arrow against my ass.\
>Their magic is holding me down, leaving me unable to resist...\
name "Luka"
>W...Why are you doing this...?\
name ""
name "Valkyrie"
>Divine punishment...@> No, you don't deserve that.@
>The era of Ilias is over.\
>But I'm still not satisfied with this.@
>I just want you to feel some justice from the Heavens...\
name ""
name "Cupid"
>Let me help you out. @
>Hehe, spin, spin! \
name ""
name "Luka"
>Ahhh!\
name ""
>With a laugh, Cupid presses her arrow around inside my ass.@
>Full of some sort of aphrodisiac magic, each movement of the arrow sends waves of pleasure through my body.\
name "Luka"
>Haa... Ahh!\
name ""
>The unique pleasure causes my waist to push forward, rubbing against Valkyrie's breasts.@
>Pressing her breasts together, it's like she's trying to control an unruly pet...\
name "Valkyrie"
>Now, please come on my chest...@
>Let your body tremble in shame as you climax.\
name ""
name "Luka"
>Ahh...\
name ""
>Despite her cold gaze, Valkyrie's breasts feel so warm...@
>Her soft breasts press back against my penis, crushing me in pleasure from every direction.\
name "Luka"
>No... I'm going to come...\
name ""
name "Cupid"
>Ahaha, you're already going to come?\
name ""
>While laughing, Cupid continues moving her arrow gently in and out of my ass.\
name "Luka"
>Haa!\
name ""
>Pressing it inside me, the tip pokes against my prostate.@
>As the wave of pleasure washes over me, my waist trembles.\
name "Cupid"
>Aha, I pushed the male ejaculation switch. \
name ""
gosub *syasei1
lsp 700,":a;chara\end3_h2.bmp",0,0
gosub *syasei2
name "Luka"
>Haa...\
name ""
>As soon as she pressed against me like that, I climaxed.@
>From the front, Valkyrie squeezes her breasts together on my pulsing penis, catching my semen on her chest.\
>My body trembles as I come on Valkyrie, weak from the forced orgasm.\
name "Valkyrie"
>...You let out quite a lot.@
>But it won't end with just this much.\
name ""
name "Cupid"
>Ehehe... Let's give him a taste of orgasm hell! \
name ""
name "Luka"
>S...Sto... Ahhh!\
name ""
>Cupid starts to attack me with her arrow like a piston.@
>Pressing against my prostate with each thrust, it's like she's actually raping me.\
>From the front, my twitching penis rubs against Valkyrie's smooth skin as my body jumps.@
>The combined sensations cause me to moan in pleasure, unable to stop myself.\
name "Luka"
>I...It feels too good... Ahh!\
name ""
name "Valkyrie"
>So pitiful...@>Are men truly helpless when their penis is being teased a little?@
>Such a pathetic weak point...\
name ""
>Valkyrie's cold eyes bore into me as she squeezes me between her breasts.@
>Her glare makes it look like she's looking at something disgusting...\
name "Luka"
>Ahh...\
name ""
name "Cupid"
>Aha, it looks like he's going to come again soon.@
>Why don't you try making him come with your breasts this time, Valkyrie?\
name ""
name "Valkyrie"
>Very well... Now, please come between my breasts.\
name ""
name "Luka"
>Haa... Ahh...\
name ""
>Using her hands, Valkyrie starts to rub her breasts up and down in unison.@
>Her soft, smooth breasts become a weapon of pure pleasure...\
>Overwhelmed by that sweet pleasure, I let loose with desire.\
name "Luka"
>Ahh...\
name ""
gosub *syasei1
lsp 700,":a;chara\end3_h3.bmp",0,0
gosub *syasei2
>I explode again, my semen spurting out between her breasts.@
>After two ejaculations, her breasts are covered in semen...\
name "Luka"
>Haa... Ahh...\
name ""
name "Cupid"
>Ahaha, you don't get a rest! \
name ""
name "Valkyrie"
>It isn't going to end with just that.@
>We'll make you come until you can no longer stand...\
name ""
>The two angels don't let up at all...@>Raped from the front and the back, I'm left screaming in ecstasy in only minutes.\
name "Luka"
>Hyaaa!!!\
name ""
name "Valkyrie"
>It's useless to cry out...@
>This is our place, nobody else will ever come here.\
name ""
name "Cupid"
>For the next five hours, you get to receive the wrath of heaven! @
>Now that you know, hurry up and come again! \
name ""
>Valkyrie continues rubbing me with her breasts, at times pressing down hard to crush me between her softness.\
>At the same time, Cupid's arrow continues pressing against my prostate, violating me from behind.\
name "Luka"
>Haa... Ahhh!\
name ""
>The assault of pleasure overwhelms me from both sides.@
>Helpless between them, I'm quickly led to shoot out another white flag of surrender...\
name "Luka"
>Ahh... I'm going to come again...\
name ""
name "Cupid"
>Aha, that makes three. \
name ""
name "Valkyrie"
>Already at the end of your endurance?@
>Go ahead and waste more semen on my breasts...\
name ""
name "Luka"
>Ahhh!!!\
name ""
gosub *syasei1
lsp 700,":a;chara\end3_h4.bmp",0,0
gosub *syasei2
>I explode again with a moan, my semen shooting straight onto Valkyrie's face.@
>Watching me during my orgasm, Valkyrie scowls with disgust.\
mov %hseanwave,0:hseanwave
name "Valkyrie"
>Defiling an angel's face?@>Do you know what you're doing?@
>Polluting the face of an angel demands further punishment...\
name ""
name "Cupid"
>Valkyrie, let's change places...@
>This time I get his penis, and you get his ass! \
name ""
name "Valkyrie"
>Alright, let's switch.\
name ""
name "Luka"
>Stop this.... Haaa...\
name ""
>Ever since then, the teasing from these two angels continues on...\
gosub *anten
>.............\
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_end3,1
mov $end_go,"city56b_13"
goto *badend2



*city56b_13b

name "Luka"
>M....Maybe some other time.\
name ""
lsp 700,":a;chara\cupid_st06.bmp",-160,0
lsp 701,":a;chara\valkyrie_st03.bmp",80,0:print 10,500
name "Valkyrie"
>He's perceptive, as we thought...\
name ""
name "Cupid"
>Eeeehhh?@> It failed?\
name ""
name "Luka"
>............\
name ""
>I knew they were plotting something.@
>I quickly leave the room.\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg044.bmp",7,1000
goto *city56b_main



*map16

saveoff
textoff
csp -1
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
bg "bg\map3.bmp",10,1000
goto *map16_2



*map16_2

if %ivent06=2 strsp 601,"Sabasa Castle",275,230,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 601,11
if %ivent07=2 strsp 603,"Witch Hunt Village",240,510,10,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,13
lsp 604,":s/20,20,0;#FFFFFF#FF4444World Map ",635,550:spbtn 604,14
print 1
btnwait2 %cmd1
if %cmd1=0 goto *map16_2
if %cmd1=-1 gosub *menu:goto *map16_2
csp -1
btndef clear
if %cmd1=11 gosub *city57a_main0:dwave 1,"se\habataki.ogg":bg black,7,1500:bgm "bgm\epilogue.ogg":goto *map16
if %cmd1=13 gosub *city58_main0:dwave 1,"se\habataki.ogg":bg black,7,1500:bgm "bgm\epilogue.ogg":goto *map16
if %cmd1=14 goto *maped
goto *map16_2



*city57a_main0

saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\habataki.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg064.bmp",7,1500
bgm "bgm\sabasa.ogg"
goto *city57a_main



*city57a_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Boy ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Woman ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Old Man ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Man ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Soldier ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Young Boy ",95,310:spbtn 606,606
lsp 607,":s/20,20,0;#FFFFFF#FF4444Prostitute ",95,340:spbtn 607,607
lsp 608,":s/20,20,0;#FFFFFF#FF4444Elizabeth ",95,370:spbtn 608,608
strsp 610,"Weapon Shop",410,160,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
strsp 611,"Tool Shop",410,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Church ",410,220:spbtn 612,612
lsp 613,":s/20,20,0;#FFFFFF#FF4444Park ",410,250:spbtn 613,613
lsp 614,":s/20,20,0;#FFFFFF#FF4444Mermaid Pub Two ",410,280:spbtn 614,614
lsp 615,":s/20,20,0;#FFFFFF#FF4444Vampire Pub ",410,310:spbtn 615,615
strsp 616,"Sabasa Castle",410,340,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 616,616
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city57a_main
if %cmd1=-1 gosub *menu:goto *city57a_main
cspl 600,699
if %cmd1=601 goto *city57a_01
if %cmd1=602 goto *city57a_02
if %cmd1=603 goto *city57a_03
if %cmd1=604 goto *city57a_04
if %cmd1=605 goto *city57a_05
if %cmd1=606 goto *city57a_06
if %cmd1=607 goto *city57a_07
if %cmd1=608 goto *city57a_08
if %cmd1=610 goto *city57a_10
if %cmd1=611 goto *city57a_11
if %cmd1=612 goto *city57a_12
if %cmd1=613 goto *city57a_13
if %cmd1=614 goto *city57a_14
if %cmd1=615 goto *city57a_15
if %cmd1=616 goto *city57b_main0
if %cmd1=619 return
goto *city57a_main



*city57a_01

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Boy"
>The lost vampires seem to have come here to settle down.@
>Some are scared, others are happy, and others don't mind...\
>...Eh?@> Me? Well, I don't really mind.@
>The Vampire Pub?@> I...I don't go there that often...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city57a_main



*city57a_02

lsp 700,":a;chara\mob_obasan.bmp",-160,0
lsp 701,":a;chara\mob_madam.bmp",160,0:print 10,500
gosub *setwindow_01
name "Woman"
>I've been seeing Princess Sara a lot recently.@
>She was even in the victory parade earlier.\
>She seems to be doing well.\
name ""
name "Young Woman"
>And there's a certain atmosphere about her...@
>It's like there's something seductive hidden behind that smile of hers...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city57a_main



*city57a_03

lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Old Man"
>After the reconciliation with the monsters, large areas of land that were once unexplored are opening up.\
>Since I've always loved hearing various legends, it has been truly incredible for me.\
>Also, they're doing lots of repair and rebuilding work on the Pyramid.@
>Apparently it's going to be open to tourists very soon.\
name ""
name "Luka"
>They're rebuilding it?@
>That seems too bad...@>They're important historical remains.\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>There were some people protesting, saying it should be protected as is...@
>But after some research was done, it was found that the place is really dangerous, due to erosion.\
>It was expected to collapse in a few years...@
>So it was decided that it shouldn't be left to just be destroyed.\
name ""
name "Luka"
>Isn't Sphinx sad...?\
name ""
name "Alice"
>No...@>Sphinx was one of the major players pushing for repair and rebuilding work.@
>So things have been going very smoothly.\
name ""
name "Luka"
>I see...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city57a_main



*city57a_04

lsp 700,":a;chara\mob_ozisan2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Man"
>This country accepted monsters in the past.@
>So even if more vampires show up, I don't really mind.\
>Of course, my attitude will change if they attack anyone...@
>But those girls are behaving themselves.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city57a_main



*city57a_05

lsp 700,":a;chara\mob_sensi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier"
>That last fight was something fierce!@
>We lost a lot, but we managed to win.\
>Even if we're all happy now that peace has come...@> Nobody has forgotten those who lost their lives to buy it.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city57a_main



*city57a_06

lsp 700,":a;chara\mob_syounen.bmp",0,0:print 10,500
gosub *setwindow_01
name "Young Boy"
>Don't you think the atmosphere around the princess has changed somewhat...?\
name ""
lsp 701,":a;chara\mob_seinen1.bmp",-160,0:print 10,500
name "Boy"
>Yeah, it's sort of... Erotic feeling!\
name ""
lsp 702,":a;chara\mob_ozisan3.bmp",160,0:print 10,500
name "Middle-Aged Man"
>I wonder if she had some sexy encounters while studying abroad!?\
name ""
lsp 703,":a;chara\mob_sensi1.bmp",-300,0:print 10,500
name "Soldier"
>I want to study abroad too!\
name ""
lsp 704,":a;chara\mob_rouzin1.bmp",300,0:print 10,500
name "Old Man"
>No, I don't think that would help any of you...\
name ""
name "Young Boy"
>Aww come on, don't destroy our dreams!\
name ""
name "Luka"
>.............\
name ""
>The young boys sure are growing up fast...\
cspl 3,7
csp 611
cspl 700,705
goto *city57a_main



*city57a_07

lsp 700,":a;chara\mob_musume2.bmp",175,0:print 10,500
gosub *setwindow_01
name "Prostitute"
>I prepared all this stuff for vampire-play since it got so popular!@
>But what will I do if actual vampires start working as whores!?\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city57a_main



*city57a_08

lsp 700,":a;chara\elisabeth_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Elizabeth"
>Hrm, hrm...@>Direct sunlight is so bad for the skin...@
>Should I petition the government to put a roof over this neighborhood?\
>We should all sign a petition to make this place livable for us...\
name ""
name "Luka"
>................\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city57a_main



*city57a_10

bg "bg\bg152.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
name "Old Man"
>Anti-vampire weapons like silver knives have been selling pretty good.@
>There are still people who don't trust them, after all.\
>But there are just as many buying black cloaks, to dress up as them...\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg064.bmp",7,1000
goto *city57a_main



*city57a_11

bg "bg\bg151.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan3.bmp",0,0:print 10,500
name "Shopkeeper"
>"Legend of Hero Luka" books are on sale now!@
>All of the great Hero Luka's adventures, in one book!\
name ""
name "Luka"
>Err...@> Can I buy one?\
name ""
name "Shopkeeper"
eng "Coming right up!":$sel6/
dwave 1,"se\kaimono.ogg"
\
name ""
>As I quickly read over the book...\
name "Luka"
>Luka: "Alice, my love, I cannot bring myself to attack you!"\
>Alice: "Oh, my Luka! Please fight against Ilias with me!"\
>...What the heck is this!?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,500
name "Alice"
>It's a rather... Strange adaptation, but at least it's still based in some sort of fact.\
>Other than the intense over-dramatization of it, the places and outcomes are all right.\
>It must have been written by someone who was following us every step of the way...@
>Look, they even have stuff written about the spirits...\
name ""
name "Luka"
>Who wrote this thing?@
>Let's see...@> In the preface...\
>"I have been deeply involved with the Hero Luka's quest, since the start.@
>This is the result of countless interviews, and hours spent watching his adventures from the side."\
>...Someone I met during my quest?\
name ""
name "Alice"
>They're well informed, have a lot of contacts, and seem to have been everywhere...\
name ""
name "Luka"
>Good at drawing out information...@> Overly dramatic...@>Following me everywhere...@
>Could it be...?\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>..............\
name ""
name "Luka"
>..............\
name ""
>Only one person comes to mind...\
mov %check10,1
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg064.bmp",7,1000
goto *city57a_main



*city57a_12

bg "bg\bg156.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_sinkan.bmp",0,0:print 10,500
name "Priest"
>With Ilias gone, the Church is no longer necessary...@
>There are many who have lost their place, and are wandering lost...\
>...But why be sad about it!?@
>Because you're now in the Holy Casino!!!@
>Come on everyone, it's CASINO FEVER TIME!\
name ""
>The priests all over seem to be adjusting in rather different ways...\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg064.bmp",7,1000
goto *city57a_main



*city57a_13

gosub *setwindow_01
lsp 700,":a;chara\gnome_st01.bmp",-160,0
lsp 701,":a;chara\mob_syouzyo.bmp",160,0:print 10,500
>Gnome is in the middle of the central park.@
>She's playing in the sand with a girl...\
name "Luka"
>Eh?@>You didn't go back to Safaru Desert?\
name ""
>Compared to her vast desert, this park is nothing...\
csp 701
lsp 700,":a;chara\gnome_st01.bmp",0,0:print 10,500
name "Gnome"
>............\
name ""
name "Luka"
>I see...@> So you were lonely in the desert.\
name ""
>It seems like playing in this small park is better than being alone in that huge desert.@
>Gnome has been alone for a while, too...\
lsp 700,":a;chara\gnome_st01.bmp",-160,0
lsp 701,":a;chara\mob_syouzyo.bmp",160,0:print 10,500
name "Girl"
>Gnomeyyy!@>Let's make a huge castle!\
name ""
name "Gnome"
>............\
name ""
>Gnome and the small girl continue to play in the sand.\
>Spirit worship used to be big here.@
>The spirits themselves grew with that attention...\
>And it looks like with Ilias gone, that Spirit worship might start back up again.\
cspl 3,7
csp 611
cspl 700,705
goto *city57a_main



*city57a_14

bg "bg\bg155.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_Mermaid1.bmp",0,0:print 10,500
name "Mermaid"
>The Vampire Pub is full of guests, but we're empty!@
>T...This is so frustrating!@>This is the birth of a new rivalry between Mermaid and Vampire!\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg064.bmp",7,1000
goto *city57a_main



*city57a_15

bg "bg\bg155.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\carmilla_st01.bmp",0,0:print 10,500
name "Carmilla"
>Welcome to the Vampire Pub!@
>The most popular part of our pub is... Of course, the Queen!\
name ""
lsp 701,":a;chara\carmilla_st01.bmp",-180,50
lsp 700,":a;chara\queenvanpire_st01.bmp",160,0:print 10,500
name "Queen Vampire"
>Hahaha... Of course I'm the most popular!\
name ""
name "Luka"
>W...What are they doing?\
name ""
lsp 701,":a;chara\alice_st07b.bmp",-120,0:print 10,500
name "Alice"
>They're enjoying this too much...\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg064.bmp",7,1000
goto *city57a_main



*city57b_main0

saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\asioto3.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg065.bmp",7,1500
bgm "bgm\castle2.ogg"
goto *city57b_main



*city57b_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
strsp 601,"Minister A",95,160,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 601,601
strsp 602,"Minister B",95,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Chief Minister ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Grandmaster Knight ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Scholar ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Priest ",95,310:spbtn 606,606
strsp 610,"Audience Room",410,160,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
lsp 611,":s/20,20,0;#FFFFFF#FF4444Princess' Room ",410,190:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Guardroom ",410,220:spbtn 612,612
lsp 613,":s/20,20,0;#FFFFFF#FF4444Dungeon ",410,250:spbtn 613,613
lsp 619,":s/20,20,0;#FFFFFF#FF4444Town ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city57b_main
if %cmd1=-1 gosub *menu:goto *city57b_main
cspl 600,699
if %cmd1=601 goto *city57b_01
if %cmd1=602 goto *city57b_02
if %cmd1=603 goto *city57b_03
if %cmd1=604 goto *city57b_04
if %cmd1=605 goto *city57b_05
if %cmd1=606 goto *city57b_06
if %cmd1=610 goto *city57b_10
if %cmd1=611 goto *city57b_11
if %cmd1=612 goto *city57b_12
if %cmd1=613 goto *city57b_13
if %cmd1=619 saveoff:textoff:btndef clear:mov %sinkoumode,0:skipoff:autoclick 0:dwave 1,"se\asioto3.ogg":csp 611:cspl 3,7:bg black,7,1500:bg "bg\bg064.bmp",7,1500:bgm "bgm\sabasa.ogg":goto *city57a_main
goto *city57b_main



*city57b_01

lsp 700,":a;chara\mob_daizin.bmp",0,0:print 10,500
gosub *setwindow_01
name "Minister A"
>There were many who didn't agree on welcoming the vampires...@
>But the King himself chimed in, and let them come.\
>If they were left to their own devices, they might bring about more harm...@
>Instead, they should be kept close, so an eye could be kept on them.\
name ""
name "Alice"
>A shrewd King...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city57b_main



*city57b_02

lsp 700,":a;chara\mob_daizin.bmp",0,0:print 10,500
gosub *setwindow_01
name "Minister B"
>There haven't been any real incidents since the vampires came here to live.@
>But we've been getting a ton of petitions...\
>They want covered sidewalks, black paint for the walls, and a lot more bars...@
>They're surprisingly needy.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city57b_main



*city57b_03

lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Chief Minister"
>Princess Sara has returned to Sabasa.\
>This time of rebuilding is quite difficult for us all...@
>Her presence has helped to boost the citizens morale.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city57b_main



*city57b_04

lsp 700,":a;chara\mob_sensi2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Grandmaster Knight"
>Since the final battle, we haven't had any sorties.@
>A bored army is a glorious thing...@>There haven't been any discipline problems either, since everyone's too tired.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city57b_main



*city57b_05

lsp 700,":a;chara\mob_gakusya.bmp",0,0:print 10,500
gosub *setwindow_01
name "Scholar"
>Peace has returned... I'm so happy...@
>Oh...@>My anemia...\
name ""
name "Luka"
>You... Couldn't be...\
name ""
name "Scholar"
>No, I'm not letting the vampires suck my blood every night.@
>I'm not doing that, so don't worry.\
>Oh... Dizzy again...\
name ""
name "Luka"
>............\
name ""
>He seems to have let them suck an awful lot...\
cspl 3,7
csp 611
cspl 700,705
goto *city57b_main



*city57b_06

lsp 700,":a;chara\mob_sinkan.bmp",0,0:print 10,500
gosub *setwindow_01
name "Priest"
>The Castle has been accepting a lot more advisers and ministers.\
>Most of them are former priests.@
>I'm grateful I wasn't just tossed out...\
>The King is thinking hard about where all of us priests will go, it seems...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city57b_main



*city57b_10

if %continue=1 bgm "bgm\castle2.ogg"
mov %continue,0
bg "bg\bg045.bmp",7,1000
lsp 700,":a;chara\sabasa_st02.bmp",0,0:print 10,500
gosub *setwindow_01
name "Sabasa King"
>You truly are amazing, Hero Luka.@
>Thanks to your blade, Ilias was defeated, and the world saved.\
>I knew you were more than ordinary when I saw you.@
>But to think you would not just save my daughter, but the world...\
name ""
name "Luka"
>No, no... It was everyone's power together that did it.\
name ""
name "Sabasa King"
>But it was due to you that everyone stood together to begin with.@
>If not for you, monsters and humans could never have come together.\
>Now then...@>It's a long, cherished tradition that a Hero who does something grand marries a King's daughter.@
>And... Why... I just remembered!@> I am a King with a daughter!\
name ""
name "Luka"
>.............\
name ""
>I knew it.\
name "Luka"
>But what Sara wants is the most important, right?\
name ""
lsp 700,":a;chara\sabasa_st01.bmp",0,0:print 10,500
name "Sabasa King"
>If it's you, Sara would accept marriage.@
>It's no falsehood, this is truly what she wants.\
name ""
name "Luka"
>Eh, really...?\
name ""
>I didn't think Sara would give up on Granberia...@
>But I don't think he is the type to lie.\
name "Sabasa King"
>...Now then, Hero Luka, I will ask you again.@
>Will you take my daughter Sara as your bride?\
name ""
>He isn't joking, if I answer here, he is intending to act on it...\
r@k@\
csel "Yes",*city57b_11b,"No",*city57b_10a



*city57b_10a

lsp 700,":a;chara\sabasa_st03.bmp",0,0:print 10,500
name "Sabasa King"
>...Guard.\
name ""
>The King snaps his fingers.@
>Responding instantly, the sentry at the door locks it shut.\
name "Sabasa King"
>Don't worry about the doors being locked.@
>Now.@> You are saying that you're not going to say yes to me asking you to take my daughter as your bride?\
name ""
>He's trying to confuse me...@> I need to answer this right...\
csel "Yes",*city57b_10b,"No",*city57b_11b



*city57b_10b

name "Sabasa King"
>...........\
name ""
>The King silently stands up, and moves over to the door.\
lsp 700,":a;chara\sabasa_st05.bmp",0,0:print 10,500
name "Sabasa King"
>...Don't worry about why I am standing here.@
>Now.@> One last time.\
>You're refusing to say no to me asking you to change your stance away from no to marrying my daughter Sara?\
name ""
name "Luka"
>Eh!?\
name ""
>This one's difficult...@
>But I can't afford to give the wrong answer now!\
csel "Yes",*city57b_11b,"No",*city57b_10c



*city57b_10c

lsp 700,":a;chara\sabasa_st02.bmp",0,0:print 10,500
name "Sabasa King"
>...I see, I'll stop trying to force it, then.@
>Besides, you're not one to be a Princess' husband.\
>...Please, don't hesitate to return here.@
>I'd very much enjoy speaking to you at length in the future!\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg065.bmp",7,1000
goto *city57b_main



*city57b_11b

lsp 700,":a;chara\sabasa_st02.bmp",0,0:print 10,500
name "Sabasa King"
>Ah, so you are willing to accept!@
>Chief Minister, start preparations for a ceremony at once!\
name ""
lsp 701,":a;chara\sabasa_st02.bmp",-160,0
lsp 700,":a;chara\mob_rouzin1.bmp",190,0:print 10,500
name "Chief Minister"
>Understood, my King.@
>Then I will initiate Plan A.\
name ""
name "Luka"
>Eh...?@> Eh...?\
name ""
>Without time to catch my breath, things move along in a whirlwind...\
sean_change "bg067"
bgm "bgm\hutuu1.ogg"
name "Luka"
>H...How did this happen!?\
name ""
lsp 700,":a;chara\sara_st11r.bmp",0,0:print 10,500
name "Sara"
>What do you mean?@>You agreed to marry me.@
>You'd hurt me if you called it off at this point...\
name ""
>Rushed around without a moment to think about what was happening, the ceremony was finished, and Sara and I were left alone in this room.\
>How did it get to this so fast...?\
name "Luka"
>Sara, are you really okay with this?@> Marriage and all...\
name ""
lsp 700,":a;chara\sara_st12r.bmp",0,0:print 10,500
name "Sara"
>Well since you already know my circumstances, I don't mind if it's you, Luka.@
>If it's you, I wouldn't even mind bearing your children...\
name ""
name "Luka"
>B...Bearing my children?@
>Shouldn't you think about this a little more...?\
name ""
>No, the one who didn't really think it through was me.@
>Because of that, things happened so fast...\
goto *city57b_11c



*city57b_11c

name "Sara"
>Well, we'll work out the troublesome stuff later.@
>We should do it first.\
name ""
name "Luka"
>Eh...?@> Do what?\
name ""
name "Sara"
>"What"?@>It's our marriage night, Luka.@
>So, how do you want it?\
>Do you want to stick it in yourself and do it normally?@
>Or perhaps a little rape roleplay...?\
name ""
name "Luka"
>W...What... It's too soon for this!\
name ""
name "Sara"
>Too soon?@>It's our wedding night.\
name ""
name "Luka"
>B...But this is too sudden...\
name ""
lsp 700,":a;chara\sara_st13r.bmp",0,0:print 10,500
name "Sara"
>Ahhh geez!@> Do you want me to rape you that badly?\
name ""
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
>Sara pushes me down as I'm fretting in confusion, easily stripping me of my clothes and getting on top.\
lsp 700,":a;chara\sara_st12r.bmp",0,0:print 10,500
name "Sara"
>Look at you, your penis is already so big...@
>So you did want to be forced a little.\
name ""
name "Luka"
>N...No...@>You're wrong...\
name ""
name "Sara"
>What do you mean I'm wrong?@
>Are you ashamed at having your bride take the initiative on your wedding night?\
name ""
>Sara grabs hold of my erect penis, and pushes it against her entrance.@
mov %hseanwave,2:hseanwave
lsp 700,":a;chara\end5_h1.bmp",0,0:print 10,500
>And drops down on top of me all at once!\
name "Luka"
>Ah!\
name ""
>My head goes pure white as soon as Sara violates me.@
>The feel of her soft flesh around my penis fills my every sense.\
>The soft pressure, her wet hole... It feels incredible just being inside her.\
name "Sara"
>Hehehe... Well?\
name ""
name "Luka"
>Ahh... It feels good...\
name ""
>Trembling, I lose control of myself inside of her.\
gosub *syasei1
lsp 700,":a;chara\end5_h2.bmp",0,0
gosub *syasei2
>And in no time, I come inside of her, my semen spurting into that amazing hole.\
>I didn't even last ten seconds inside of her.@
>No matter how I think of this, it's clearly not normal.\
name "Luka"
>Y...You didn't...@>Your Succubus power?\
name ""
name "Sara"
>Ehe... You found out?@
>I transformed just my pussy with my Succubus powers.\
>Thanks to it, you felt really good, didn't you?@
>You came right from insertion. \
name ""
name "Luka"
>I...I knew it...@
>Ah...\
name ""
>She slowly squeezes down on my penis with her vagina...@>Infused with Succubus powers, it's enough to leave me completely at her mercy.\
name "Sara"
>Hehe... It's incredible, isn't it?@
>Just think... You can use this amazing pussy whenever you want.\
name ""
name "Luka"
>Uwaaa!\
name ""
>Sara squeezes my penis with her Succubus vagina, leaving me writhing in unbearable pleasure under her.\
name "Sara"
>Hey... It's our wedding night, it's not nice to make the bride do all the work.@
>You need to give it your best too, Luka.\
name ""
name "Luka"
>N...No way...\
name ""
name "Sara"
>Come on, you aren't going to let your bride ride you like this, are you?@
>Shouldn't your pride as a man make you go on some sort of counterattack?\
name ""
name "Luka"
>Guh...\
name ""
>I try to push up into her from below... But if I move inside her, I know I'd come right away.\
>After moving less than an inch, I stop with a gasp of pleasure.@
>Seeing that, Sara looks down with a look of triumph on her face.\
name "Sara"
>Ahaha, is that it?@
>That's so pathetic, Dear.\
>Then I guess I'll attack you from this side. \
name ""
name "Luka"
>Ahhh!!!\
name ""
>Squeezing me tight inside her, Sara starts to violently move her waist.\
>My sensitive penis slips easily in and out of her wet vagina, the folds and creases inside rubbing and pulling against my tip with each completed cycle.\
>Feeling far too good, the desire to ejaculate again overtakes me in only seconds.\
name "Luka"
>Ahh... I'm going to come again!\
name ""
name "Sara"
>What, already giving up?@
>Come on, I just moved a little bit and you're already surrendering to me? \
>Then I'll finish you off inside...@
>Now come! \
name ""
name "Luka"
>Ahhh!!!\
name ""
>Pressing down and pulling me deep inside, Sara squeezes on my penis, forcing the feel of her warm flesh into me.\
gosub *syasei1
lsp 700,":a;chara\end5_h3.bmp",0,0
gosub *syasei2
name "Luka"
>Ahhh...\
name ""
>Unable to take it, my body spasms in ecstasy as I explode inside her again.@
>Sara stares into my eyes as I come inside her, and giggles.\
name "Sara"
>Hey, how does it feel?@
>Right after saving the world, losing to a Princess' pussy?\
name ""
>Sara grin and laughs as she looks at me.@
>Even if she's teasing me like this, I'm in no state to resist her.\
name ""
name "Sara"
>If I beat you down with my pussy some more, you won't be able to resist me...\
name ""
mov %hseanwave,16:hseanwave
>Smiling in triumph, Sara suddenly changes the stimulation in her vagina...@
>Her vagina starts to contract and release, pulling on me penis like it was a mouth sucking on me.\
>Pleasure runs like electricity through my body, along with an incredible sense of weakness.@
>This couldn't be...\
name "Luka"
>Are you...@> Sucking my energy...?\
name ""
name "Sara"
>You've been completely dominated by your wife on our wedding night, Dear.@
>Your punishment is to be Energy Drained. \
name ""
name "Luka"
>Ahh... Don't suck...@
>Don't suck on me...\
name ""
>Sara starts using a Succubus skill to drain my energy through her vagina...@
>The incredible contractions pull and suck on my penis.\
>As would be expected, the pleasure from it is incredible, too...@
>It feels like my soul itself could be sucked out into Sara's vagina.\
name "Sara"
>Aha... I wonder if this is the first time the husband's energy has been sucked on the wedding night?\
>We'll need to be careful, I wouldn't want to accidentally suck you to death when we're newlyweds... \
name ""
name "Luka"
>Stop... Wait...@
>Ahh...!\
name ""
gosub *syasei1
lsp 700,":a;chara\end5_h4.bmp",0,0
gosub *syasei2
>As she sucks on my energy, I reach a powerful orgasm.@
>Exploding inside her, I shoot both my energy and my semen into Sara.\
name "Luka"
>Ahhh!!!\
name ""
name "Sara"
>Ahaha, a swift orgasm.@
>Look at you screaming and squirming. \
name ""
name "Luka"
>But... It feels too good!\
name ""
>Sara's Succubus vagina continues to suck and pull on me...@
>If it's like this, it's just like I'm prey to a Succubus...\
name "Luka"
>N...No... Ahh!\
name ""
gosub *syasei1:gosub *syasei2
name "Sara"
>Ahaha, you came again.@
>But I can make you come a lot more than this...\
>How does it feel, Luka?@
>Being treated like this on your wedding night? \
name ""
name "Luka"
>Haa... Stop...@
>Ahh!\
name ""
gosub *syasei1:gosub *syasei2
name "Sara"
>Ah... Luka's semen is so delicious...\
>I'm such a horrible bride...@
>I'm just feeding on all of this semen that should be used for making a child...\
name ""
name "Luka"
>Ah...ah...\
name ""
gosub *syasei1:gosub *syasei2
>Since then, she brought me to orgasm after orgasm...@
>Until I fainted, Sara sucked up my energy with her Succubus vagina.\
>Once I woke up, she started again...@> It kept going until nothing more came out.\
>Of course she didn't take my life, but I was left unable to even move a finger.\
mov %hseanwave,0:hseanwave
name "Sara"
>Ah... It's already morning.@
>Please treat me well from now on, Dear. \
name ""
name "Luka"
>Ah...uh...\
name ""
>After being preyed on by my new Succubus wife our first night together, I'm completely drained of energy...\
gosub *anten
>................\
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_end5,1
mov $end_go,"city57b_10"
goto *badend2



*city57b_11

bg "bg\bg067.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\sara_st12r.bmp",0,0:print 10,500
name "Sara"
>Luka...@
>To think you would save the world...@> That's amazing!\
>I came back to Sabasa to do what only I can, too.@
>I've been involving myself in national affairs to boost the spirits of the citizens.\
>Since I can use Transfer Magic myself now, I can go back to the Monster Lord's Castle whenever I want.@
>I'm still working as one of Granberia's maids in secret, after all...\
name ""
name "Luka"
>I see...@> Still following her...\
name ""
name "Sara"
>If you live in the Monster Lord's Castle too, we'll see each other every so often.\
name ""
name "Luka"
>Why would I live there...?\
name ""
lsp 700,":a;chara\sara_st14r.bmp",0,0:print 10,500
name "Sara"
>Eh?@>You didn't marry the Monster Lord?\
name ""
name "Luka"
>.............\
name ""
>Where did she hear that...?\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg065.bmp",7,1000
goto *city57b_main



*city57b_12

bg "bg\bg060.bmp",7,1000
lsp 700,":a;chara\mob_heisi1.bmp",-160,0
lsp 701,":a;chara\mob_heisi1.bmp",160,0:print 10,500
gosub *setwindow_01
name "Soldier A"
>Since the final battle, there hasn't been any calls for the army.@
>We prepared a lot of anti-vampire weapons, but none have been needed.\
name ""
name "Soldier B"
>But the relationship between the vampires and mermaids seems to be getting tense...\
>They've been getting in a lot of fights, but nothing serious...@>Yet.\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg065.bmp",7,1000
goto *city57b_main



*city57b_13

bg "bg\bg066.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\sphinx_st01.bmp",0,0:print 10,500
>For some reason, Sphinx is in the dungeon!\
name "Luka"
>W...Why are you in prison!?\
name ""
name "Sphinx"
>The Sabasa King has put forward reconstruction efforts on the Pyramid.@
>I'm living here while that is going on.\
>The King was against me living here, saying it doesn't suit one of the Founders of the Royal Line.@
>But the surrounding stone walls just make me feel so at ease.\
name ""
name "Luka"
>I...is that how it is...?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",-140,0
lsp 701,":a;chara\sphinx_st01.bmp",160,0:print 10,500
name "Alice"
>The Pyramid is being rebuilt to honor the relationship between humans and monsters.@
>It will also be open to the public, and is expected to draw a lot of tourists.\
name ""
name "Sphinx"
>Tourists...@>The world is changing so fast.@
>But it's better than keeping everyone away, and letting it slowly fall into ruin.\
>I'll think up a lot of good riddles to ask the tourists...@
>Of course, I won't eat them if they get it wrong.\
lsp 701,":a;chara\sphinx_st02.bmp",160,0:print 10,500
>...I might just squeeze out a shot or two of semen...\
name ""
name "Luka"
>...........\
name ""
>You'll get a lot who answer wrong on purpose, then...\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg065.bmp",7,1000
goto *city57b_main



*city58_main0

mov %genzaiti,8
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\habataki.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg072.bmp",7,1500
bgm "bgm\mura2.ogg"
goto *city58_main



*city58_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Young Man ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Village Girl ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Lucia's Younger Sister ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Woman ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Old Man ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Scholar ",95,310:spbtn 606,606
lsp 607,":s/20,20,0;#FFFFFF#FF4444Young Boy ",95,340:spbtn 607,607
strsp 610,"Tool Shop",410,160,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
lsp 611,":s/20,20,0;#FFFFFF#FF4444Church ",410,190:spbtn 611,611
strsp 612,"Lord's Mansion",410,220,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 612,612
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city58_main
if %cmd1=-1 gosub *menu:goto *city58_main
cspl 600,699
if %cmd1=601 goto *city58_01
if %cmd1=602 goto *city58_02
if %cmd1=603 goto *city58_03
if %cmd1=604 goto *city58_04
if %cmd1=605 goto *city58_05
if %cmd1=606 goto *city58_06
if %cmd1=607 goto *city58_07
if %cmd1=610 goto *city58_10
if %cmd1=611 goto *city58_11
if %cmd1=612 goto *city58_12
if %cmd1=619 return
goto *city58_main



*city58_01

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Young Man"
>My wife now has one of those worm arms, but it hasn't been an issue.@
>It's actually pretty convenient, since she can reach things that are high up and from far away.\
>And at night...@
>Hehehehe.@>Hehehe...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city58_main



*city58_02

lsp 700,":a;chara\wormv_st11.bmp",0,0:print 10,500
gosub *setwindow_01
name "Village Girl"
>I haven't had any problems living here.@
>Everyone is very nice to me.\
>And Lucia came back, too!@>I'm really happy...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city58_main



*city58_03

lsp 700,":a;chara\mob_zyosei.bmp",0,0:print 10,500
gosub *setwindow_01
name "Lucia's Younger Sister"
>My older sister is staying in the mansion.@
>She's heading up the disposal of all the dangerous chemicals and equipment.\
>Also, it looks like Lily left a lot of notes about her experiments...@
>Some may be useful, so we've been organizing her notes.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city58_main



*city58_04

lsp 700,":a;chara\mob_obasan.bmp",0,0:print 10,500
gosub *setwindow_01
name "Woman"
>Even during that heated battle, those girls gave it their all.\
>They didn't let a single invader step foot into our village.@
>If it wasn't for them, this village would have been destroyed...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city58_main



*city58_05

lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Old Man"
>At last, peace has come to our village.@
>Now that we're not hostile to outsiders, we've had a lot more tourists coming through.\
>I've even heard of fairies hanging around...@
>I hope this peace lasts forever.\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city58_main



*city58_06

lsp 700,":a;chara\mob_gakusya.bmp",0,0:print 10,500
gosub *setwindow_01
name "Magic Scholar"
>We must not let Lily's research simply be destroyed.@
>Even though the methods were horrible, some good could still come of them.\
>Besides... Burning knowledge when it already exists is just a waste.@
>I hope the people here realize that...\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city58_main



*city58_07

lsp 700,":a;chara\mob_syounen.bmp",0,0:print 10,500
gosub *setwindow_01
name "Young Boy"
>I found a really old map, with the ancient name of this village!@
>It was called Witch's Village.\
>I wonder just when the Witch became the bad person...?\
name ""
cspl 3,7
csp 611
cspl 700,705
goto *city58_main



*city58_10

bg "bg\bg151.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan2.bmp",0,0:print 10,500
name "Shopkeeper"
>I want that Iron Maiden...@
>No, no, not for wicked uses.\
name ""
name "Luka"
>Whether you use it, or you use it on someone else...@
>I don't think it has any use besides wicked things.\
name ""
name "Shopkeeper"
>Well, it could be a decoration...@
>I'm going to talk with Lucia about it.\
name ""
name "Luka"
>.........\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg072.bmp",7,1000
goto *city58_main



*city58_11

bg "bg\bg153.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_sinkan.bmp",0,0:print 10,500
name "Priest"
>There are still many who are coming to repent.@
>The Church is still greatly needed in this village.\
name ""
>Every village is different...\
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg072.bmp",7,1000
goto *city58_main



*city58_12

bg "bg\bg074.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\lusia_st21.bmp",0,0:print 10,500
name "Lucia"
>...Thank you for your help.@
>I was finally able to find a place to call my home.\
>I have many bad memories of this mansion, but I can't keep running away from my past.\
name ""
name "Luka"
>I see...\
name ""
name "Lucia"
>By the way...@>Did Promestein say something before she died?\
name ""
name "Luka"
>Well... Just that humans would become her successor.\
name ""
>Since Lucia was one of her subordinates, I decide to tell her.@
>That she found something in common with humans, and thought that they would take up her same path.\
lsp 700,":a;chara\lusia_st23.bmp",0,0:print 10,500
name "Lucia"
>Hmm...@> So Promestein thought that...\
name ""
name "Luka"
>...But I don't think she's right.@
>Humans won't walk the same horrible path as Promestein did.\
name ""
name "Lucia"
>...Are you sure?@
>The scope wasn't as big, but Lily was doing the same things.\
>And me... I was already walking down that path, before you pulled me off of it.\
name ""
name "Luka"
>T...That may be true...\
name ""
name "Lucia"
>...Human experimentation is a complete evil, for you?\
name ""
name "Luka"
>Of course!@> That's simply inhumane!\
name ""
name "Lucia"
>But all of those medicinal herbs, used all over the world to save lives.@
>There are 252 that have been credited by the Hospital Guild.\
>How many humans do you think became sick, or even died, testing out various herbs and drugs?\
>Dosage, side effects, new treatments...@>Lots of humans suffered in the hope of leading to a better future.\
>It could be argued that is simply human experimentation.\
name ""
name "Luka"
>T...that may be so...\
name ""
name "Lucia"
>Before new drugs or medicines can be offered, they must be tested on a small group.\
>If not, then the risk of death from overdose or unknown side effects would be too high.\
>Since it's for human use, animal experiments won't give accurate test results.@
>If there was a single wrong step, it would be a catastrophe.\
name ""
name "Luka"
>..........\
name ""
name "Lucia"
>As our knowledge progresses, this will become a bigger and bigger issue.@
>So I'll ask again...@> Is human experimentation a complete evil?\
name ""
name "Luka"
>Err...@> If they ask permission...@> And they are rewarded and paid for it...\
name ""
lsp 700,":a;chara\alice_st01b.bmp",-140,0
lsp 701,":a;chara\lusia_st23.bmp",170,0:print 10,500
name "Alice"
>But in that case, almost every time the people putting themselves at risk will be the poor, or those socially vulnerable.\
>You're just encouraging experimentation on the poor or outcast.\
name ""
name "Luka"
>This...@>Isn't a simple problem...\
name ""
csp 701
lsp 700,":a;chara\lusia_st21.bmp",0,0:print 10,500
name "Lucia"
>Yes...@> The point of the question wasn't to try to put you on the spot.\
>I don't believe it's evil, or good.@
>It's just the final phase of the scientific method.\
>And as the Monster Lord said, when you try to make it seem less evil, it ends up preying on the poor.\
>The conflict between politics, science, social stigma, and money...@
>It's the dangerous path researchers like us are trying to walk.\
name ""
name "Luka"
>...........\
name ""
name "Lucia"
>That reminds me...@> Promestein was always saying that technology is neither blasphemy nor human arrogance.\
>It's just the application of the knowledge that has been gained, to make lives a little easier or happier.\
name ""
lsp 700,":a;chara\alice_st01b.bmp",-140,0
lsp 701,":a;chara\lusia_st23.bmp",170,0:print 10,500
name "Alice"
>It's stupid to dismiss advancement just because it's going to change how things have been done.@
>I don't deny that, either.\
name ""
name "Lucia"
>Promestein was in too big of a hurry.\
>Problems that should have been taken slowly, handed down to generation after generation...@
>She tried to do it all alone, all at once.\
>As a result, she kept banging against walls all by herself, proving her own theories wrong.@
>Since she never stopped to apply what she learned, she wasn't able to make anyone happy with her research.\
>Just continuing to research, all alone...\
name ""
name "Luka"
>...............\
name ""
cspl 3,7
csp 611
cspl 700,705
bg "bg\bg072.bmp",7,1000
goto *city58_main



*map17

saveoff
textoff
csp -1
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
bg "bg\map4.bmp",10,1000
goto *map17_2



*map17_2

if %ivent08=2 strsp 601,"Grand Noah Castle",65,500,10,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 601,11
if %ivent09=2 lsp 602,":s/20,20,0;#FFFFFF#FF4444Yamatai Village ",575,150:spbtn 602,12
if %ivent10=2 strsp 603,"Plansect Village",230,320,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,13
lsp 604,":s/20,20,0;#FFFFFF#FF4444World Map ",635,550:spbtn 604,14
print 1
btnwait2 %cmd1
if %cmd1=0 goto *map17_2
if %cmd1=-1 gosub *menu:goto *map17_2
csp -1
btndef clear
if %cmd1=11 gosub *city59a_main0:dwave 1,"se\habataki.ogg":bg black,7,1500:bgm "bgm\epilogue.ogg":goto *map17
if %cmd1=12 gosub *city60_main0:dwave 1,"se\habataki.ogg":bg black,7,1500:bgm "bgm\epilogue.ogg":goto *map17
if %cmd1=13 gosub *city61_main0:dwave 1,"se\habataki.ogg":bg black,7,1500:bgm "bgm\epilogue.ogg":goto *map17
if %cmd1=14 goto *maped
goto *map17_2



*city59a_main0

saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\habataki.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg082.bmp",7,1500
bgm "bgm\city1.ogg"
goto *city59a_main



*city59a_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Man ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Boy ",95,190:spbtn 602,602
strsp 603,"Town Girl",95,220,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Young Woman ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Noblewoman ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Soldier ",95,310:spbtn 606,606
lsp 607,":s/20,20,0;#FFFFFF#FF4444Harpy ",95,340:spbtn 607,607
lsp 608,":s/20,20,0;#FFFFFF#FF4444Slime Girl ",95,370:spbtn 608,608
lsp 609,":s/20,20,0;#FFFFFF#FF4444Knightroid ",95,400:spbtn 609,609
strsp 610,"Weapon Shop",410,160,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
strsp 611,"Tool Shop",410,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
strsp 612,"Minotauros' Milk Shop",410,220,12,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 612,612
strsp 613,"Spider Girl's Sewing Shop",410,250,14,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 613,613
lsp 614,":s/20,20,0;#FFFFFF#FF4444Alraune's Florist Shop ",410,280:spbtn 614,614
lsp 615,":s/20,20,0;#FFFFFF#FF4444Church ",410,310:spbtn 615,615
lsp 616,":s/20,20,0;#FFFFFF#FF4444Colosseum ",410,340:spbtn 616,616
strsp 617,"Grand Noah Castle",410,370,10,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 617,617
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city59a_main
if %cmd1=-1 gosub *menu:goto *city59a_main
cspl 600,699
if %cmd1=601 goto *city59a_01
if %cmd1=602 goto *city59a_02
if %cmd1=603 goto *city59a_03
if %cmd1=604 goto *city59a_04
if %cmd1=605 goto *city59a_05
if %cmd1=606 goto *city59a_06
if %cmd1=607 goto *city59a_07
if %cmd1=608 goto *city59a_08
if %cmd1=609 goto *city59a_09
if %cmd1=610 goto *city59a_10
if %cmd1=611 goto *city59a_11
if %cmd1=612 goto *city59a_12
if %cmd1=613 goto *city59a_13
if %cmd1=614 goto *city59a_14
if %cmd1=615 goto *city59a_15
if %cmd1=616 goto *city59a_17
if %cmd1=617 goto *city59b_main0
if %cmd1=619 return
goto *city59a_main



*city59a_01

lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Man"
>A lot of those machine monsters came here to settle down.@
>And, as I thought, they're really popular in the Colosseum.\
>It's sort of odd... But nobody seems to mind.@
>Grand Noah is just that kind of place...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city59a_main



*city59a_02

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Boy"
>There are a lot of new residents... But they're all sexy monster women.@
>I get to...@>Every day... Hehehe...\
name ""
name "Luka"
>............\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city59a_main



*city59a_03

lsp 700,":a;chara\mob_musume1.bmp",175,0:print 10,500
gosub *setwindow_01
name "Town Girl"
>Just like I thought, you really saved the world!@
>As a Hero birthed from our Colosseum, I'm super proud!\
name ""
name "Luka"
>............\
name ""
>I only participated once...\
cspl 3,7
csp 611
cspl 699,705
goto *city59a_main



*city59a_04

lsp 700,":a;chara\mob_musume2.bmp",15,0
lsp 701,":a;chara\lamianloid_st03.bmp",160,0:print 10,500
gosub *setwindow_01
name "Young Woman"
>Damn you!@>This is for stealing my boyfriend!\
name ""
name "Lamiaroid"
>H...Hey!@> What are you doing!?\
name ""
>A young woman is punching Lamiaroid...@
>Should I stop her?\
cspl 3,7
csp 611
cspl 699,705
goto *city59a_main



*city59a_05

lsp 700,":a;chara\mob_madam.bmp",0,0:print 10,500
gosub *setwindow_01
name "Noblewoman"
>I'm so happy the Colosseum fights have resumed.@
>A lot of those "Roids" are joining in, too.\
>They're teasing men in ways I've never seen before!@
>It's so interesting... I can't help myself!\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city59a_main



*city59a_06

lsp 700,":a;chara\mob_sensi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier"
>Even when fighting in the Colosseum, I just keep getting raped.@
>As a soldier, I'm pathetic.\
>It's so frustrating...@> But it feels so good...\
name ""
name "Luka"
>..............\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city59a_main



*city59a_07

lsp 700,":a;chara\mob_hapy2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Fishing Loving Harpy"
>Now that the world is peaceful, I can enjoy a life of fishing.@
>I've been fishing in the river every day since then...\
>Those mermaids are as annoying as always, but one day, I'll catch them with my hook, too!\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city59a_main



*city59a_08

lsp 700,":a;chara\mob_mamono4.bmp",244,80:print 10,500
gosub *setwindow_01
name "Slime Girl"
>Purupurupuru... Peace is so fun! @
>Hey, let's purupurupuru together! \
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city59a_main



*city59a_09

lsp 700,":a;chara\knightloid_st01.bmp",-50,0:print 10,500
gosub *setwindow_01
name "Knightroid"
>I'm a fighter in the Colosseum now, too.@
>It would be an honor to face you on the arena floor again.\
lsp 700,":a;chara\knightloid_st05.bmp",-50,0:print 10,500
>...If Arc-En-Ciel had lived to see this day, she may have found a reason to live on, as I have...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city59a_main



*city59a_10

bg "bg\bg152.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
name "Shopkeeper"
>Weapon shops all over are in trouble, but I'm fine.@
>As long as the Colosseum is running, I'll never be short on customers!\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg082.bmp",7,1000
goto *city59a_main



*city59a_11

bg "bg\bg151.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_mamono1.bmp",100,-100:print 10,500
name "Elf"
>In the middle of the final battle, that crazy Minotauros tried to hug me!@
>There were so many enemies, though, that she gave up.\
>I guess she's mad that I hit her with an arrow earlier...\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg082.bmp",7,1000
goto *city59a_main



*city59a_12

gosub *setwindow_01
lsp 700,":a;chara\mob_mamono5.bmp",0,0:print 10,500
name "Minotauros Milkmonster"
>I tried to catch that Elf to get her back for her damn arrow...@
>But it was too chaotic, so I couldn't grab her.\
>That damn Elf...@
>One day I'm going to squeeze your milk, and sell it!!!\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city59a_main



*city59a_13

gosub *setwindow_01
lsp 700,":a;chara\mob_mamono3.bmp",0,0:print 10,500
name "Spider Girl Shop Owner"
>The sign is a lie.@> It's really Tarantula Girl's Sewing Shop.\
>I heard all of the spider monsters moved to Grangold...\
>My business isn't going too well, so I was thinking about moving there myself.@
>But I have a fondness for Grand Noah that I don't think I can get over...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city59a_main



*city59a_14

gosub *setwindow_01
lsp 700,":a;chara\mob_mamono2.bmp",147,0:print 10,500
name "Florist Shop Owner"
>The flowers are all growing well!@
>Would you like to buy one?@> They are very delicious! \
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city59a_main



*city59a_15

bg "bg\bg156.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_sinkan.bmp",0,0:print 10,500
name "Priest"
>Welcome to the Church of the Machines!@> I am Father Machine!@
>Come on everybody, let's do the screw!\
name ""
name "Luka"
>Pandering to the sudden popularity of machine monsters...\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg082.bmp",7,1000
goto *city59a_main



*city59a_17

if %continue=1 bgm "bgm\city1.ogg"
if %continue=1 bg "bg\bg082.bmp",7,1000
mov %continue,0
gosub *setwindow_01
lsp 700,":a;chara\arumaeruma_st11.bmp",0,0:print 10,500
name "Alma Elma"
>Oh, it's Luka.@
>What a nice coincidence, to meet at the Colosseum...\
name ""
>Alma Elma is waiting in front of the Colosseum entrance.@
>I get the feeling she was waiting for me...\
name "Luka"
>Alma...@
>Did you come here to participate?\
name ""
lsp 700,":a;chara\arumaeruma_st13.bmp",0,0:print 10,500
name "Alma Elma"
>Of course...@> I can't have fun unless I'm moving my body.@
>I love this kind of play, after all. \
>Why don't you enter the next tournament, Luka?@
>I'm going to participate too...@>I'll give you extra special attention. \
name ""
name "Luka"
>Hmm... Well...\
name ""
>It might be nice to have a friendly, low effort match to move my body again after that coma.@
>But I have a strange sense of unease about this...\
r@k@\
csel "Participate",*city59_17a,"Refuse",*city59_17b



*city59_17a

name "Alma Elma"
>Hehe, I'm so happy...@
>Alright then, I'll take good care of you in the arena... \
name ""
name "Luka"
>...........\
name ""
>I casually agreed to it... But it should be okay, right?\
sean_change "bg084"
bgm "bgm\colosseum.ogg"
name "Announcer"
>And now, the final match!@
>The surprise challenger, the Hero who saved the world...@> Hero Luka!\
name ""
>Without much of a surprise, I made it to the finals.@
>And my opponent is, of course...\
name "Announcer"
>Here she comes!@>The undefeated fighter, one of the Four Heavenly Knights...@
>The walking obscenity... Kyuba!\
name ""
lsp 700,":a;chara\arumaeruma_st13.bmp",0,0:print 10,500
name "Alma Elma"
>Hiiii, Luka-boy... \
name ""
name "Luka"
>I won't lose!\
name ""
>I've beaten her once before, I won't lose this time!\
sean_change "bg084"
goto *city59_17c



*city59_17c

if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
lsp 700,":a;chara\arumaeruma_hg1.bmp",0,0:print 10,500
name "Luka"
>Ahhg...\
name ""
>Alma's tail coils around me, and seals off my movements in no time.@
>Before I can blink, she has already stripped off my clothes.\
name "Luka"
>W...Why...?\
name ""
name "Alma Elma"
>Just like Granberry...@
>You honest, straightforward sword types are easy to read.\
>And most importantly...@>You never show your true power when your opponent isn't a bad person. \
name ""
name "Luka"
>Ahh...!\
name ""
name "Spectator A"
>No man has ever escaped from Kyuba's tail.@
>The fight's over...!\
name ""
name "Spectator B"
>I wonder how she's going to deal with that boy...? \
name ""
>Now that the match has been decided, the audience is starting to get excited.@
>All of the women are on the edge of their seats, all eager to see me get raped...\
name "Alma Elma"
if %con_hvoice=0 dwave 0,"voice\arumaeruma5_01.ogg"
>You look like a mess, Luka...
>Now, it's time for some fun. \
if %con_hvoice=0 dwave 0,"voice\arumaeruma5_02.ogg"
>I'll use my breasts today to finish you o-f-f. \
name ""
dwavestop 0
>Before I can say anything, Alma presses her breasts against my groin!\
name "Luka"
>Ahh!\
name ""
mov %hseanwave,17:hseanwave
>My penis sinks into her huge chest, her right and left breasts pressing against me.@
>So warm and soft...@>Just the feeling of being between them makes me moan.\
name "Luka"
>Ahh... That feels good...\
name ""
name "Alma Elma"
if %con_hvoice=0 dwave 0,"voice\arumaeruma5_03.ogg"
>I'll take you to paradise now.
>Hoora... Energy Drain... \
name ""
dwavestop 0
name "Luka"
>Haa... Ah...\
name ""
>As Alma's body lightly glows light, my brain explodes in pure pleasure.@
>I feel my energy leaking out through my penis, with shocks of ecstasy filling my body in its place.\
>It's like she took away my sanity all at once.\
name "Luka"
>Ah...ah...\
name ""
name "Alma Elma"
if %con_hvoice=0 dwave 0,"voice\arumaeruma5_04.ogg"
>Ara, what's wrong?
>Your face is looking really embarrassing, you know?\
name ""
dwavestop 0
>Alma giggles as she looks at my loose face.\
name "Spectator A"
>Woah... Incredible...@
>She can even use energy drain with her breasts...!\
name ""
name "Spectator B"
>Make him come!\
name ""
name "Spectator C"
>Why isn't that boy resisting?@
>He's just letting her do whatever she wants...@> That's kind of sad.\
name ""
>Some of the audience is clapping, impressed at Alma's skills.@
>Others are laughing at me, and making comments to their friends...\
name "Alma Elma"
if %con_hvoice=0 dwave 0,"voice\arumaeruma5_05.ogg"
>Hehe, the customers seem pleased, too.
>Now to tease your penis with my breasts...\
if %con_hvoice=0 dwave 0,"voice\arumaeruma5_06.ogg"
>When you can't endure it any longer, just Pew Pew it out! \
name ""
dwavestop 0
>Putting her hands on her breasts, Alma starts to increase the pressure on my penis.@
>While still draining my energy, her soft breasts slowly start to crush my penis between them.\
name "Luka"
>Ahh...ah...\
name ""
name "Alma Elma"
if %con_hvoice=0 dwave 0,"voice\arumaeruma5_07.ogg"
>Arara... Did it feel so good, you lost the ability to speak?
>Are you that happy at being the prey of a Succubus' breasts? \
name ""
dwavestop 0
>Alma starts to slowly shake her breasts side to side.@
>Her soft skin rubs against my penis, sandwiched between them.\
>Crushed in her softness, I feel my patience quickly nearing its limit.@
>A tingling sensation rises up through my waist as Alma continues slowly moving her breasts.\
name "Luka"
>Haa... I'm going to come...\
name ""
name "Alma Elma"
if %con_hvoice=0 dwave 0,"voice\arumaeruma5_08.ogg"
>Then... This is the finishing blow.
>Hoora... Come all over my breasts. \
name ""
dwavestop 0
>Alma presses even harder on her breasts, squeezing me between them.@
>My head goes pure white as I lose all control.\
name "Luka"
>Ahhh...\
name ""
gosub *syasei1
lsp 700,":a;chara\arumaeruma_hg2.bmp",0,0
gosub *syasei2
>Tasting incredible pleasure, I explode on her breasts, covering them with semen.@
>My mind melts in pure ecstasy as my orgasm combines with the energy drain, leaving me completely weak.\
>The audience all starts to laugh and clap as my semen shoots onto her.\
name "Alma Elma"
if %con_hvoice=0 dwave 0,"voice\arumaeruma5_09.ogg"
>Aha... Luka's shameful juice got my breasts all dirty.
>It felt great, didn't it? Hehe. \
if %con_hvoice=0 dwave 0,"voice\arumaeruma5_10.ogg"
>What a shameful child... Leaking all over my breasts.
>A child like that needs lots of punishment... \
name ""
dwavestop 0
name "Luka"
>Ah...\
name ""
>Alma starts to bounce her breasts up and down quickly, tossing my penis back and forth between them.@
>With the energy drain still going, I'm left gasping and moaning helplessly under her.\
name "Alma Elma"
if %con_hvoice=0 dwave 0,"voice\arumaeruma5_11.ogg"
>Horahorahora...
>If I do it like this, the premature ejaculator Luka will come in no time, won't he?\
name ""
dwavestop 0
name "Luka"
>Haa... Ah...\
name ""
>Alma starts to raise and lower her breasts in an alternating motion.\
>It's like she's kneading my penis between her huge breasts...@
>As my sensitive penis rubs against her soft skin, my body relaxes in pure bliss.\
>Without resisting at all, I allow the sensations to flood my body.\
name "Luka"
>Ahh... I'm going to come again...\
name ""
name "Alma Elma"
if %con_hvoice=0 dwave 0,"voice\arumaeruma5_12.ogg"
>Hehe... Already can't take it?
>Then... Come! \
name ""
dwavestop 0
>Alma presses her breasts together hard around my penis.@
>At the same time, she drastically increases the power of the energy drain.\
>Assaulted by pure ecstasy, I quickly blow far over the edge.\
name "Luka"
>Ahhhh!!!\
name ""
gosub *syasei1
lsp 700,":a;chara\arumaeruma_hg3.bmp",0,0
gosub *syasei2
>I explode between her breasts, the powerful orgasm causing my semen to even land on her face.@
>Due to the energy drain, the amount of semen is far higher than normal.\
>In addition, I feel far weaker than I should...\
mov %hseanwave,0:hseanwave
name "Luka"
>Ahh...\
name ""
>The sweet feeling of release fills my body, still wound by Alma's tail.@
>I feel myself about to faint as Alma looks at me and laughs.\
name "Alma Elma"
if %con_hvoice=0 dwave 0,"voice\arumaeruma5_13.ogg"
>Hahaha... Since there was an audience, I got a little carried away.
>If I squeezed any more, Luka-boy would die.\
if %con_hvoice=0 dwave 0,"voice\arumaeruma5_14.ogg"
>We'll stop here for today, with my overwhelming victory. \
name ""
dwavestop 0
>Alma giggles, announcing my complete defeat to her.@
>All of the audience members who watched start to laugh and tease me, too.\
>Feeling completely humiliated, I slowly drift into unconsciousness...\
gosub *anten
>..............\
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_shitenno2,1
mov $end_go,"city59a_17"
goto *badend2



*city59_17b

name "Alma Elma"
>Oh my, are you scared?@
>Are you worried your white stuff will shoot straight up in front of a huge audience?\
>Hehe...@>Come back if you change your mind. \
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city59a_main



*city59b_main0

saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\asioto3.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg065.bmp",7,1500
bgm "bgm\castle3.ogg"
goto *city59b_main



*city59b_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
strsp 601,"Minister A",95,160,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 601,601
strsp 602,"Minister B",95,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Guard ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Guard Captain ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Dullahan ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Cerberus ",95,310:spbtn 606,606
strsp 610,"Audience Hall",410,160,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
lsp 611,":s/20,20,0;#FFFFFF#FF4444Guard Room ",410,190:spbtn 611,611
lsp 619,":s/20,20,0;#FFFFFF#FF4444Town ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city59b_main
if %cmd1=-1 gosub *menu:goto *city59b_main
cspl 600,699
if %cmd1=601 goto *city59b_01
if %cmd1=602 goto *city59b_02
if %cmd1=603 goto *city59b_03
if %cmd1=604 goto *city59b_04
if %cmd1=605 goto *city59b_05
if %cmd1=606 goto *city59b_06
if %cmd1=610 goto *city59b_10
if %cmd1=611 goto *city59b_11
if %cmd1=619 saveoff:textoff:btndef clear:mov %sinkoumode,0:skipoff:autoclick 0:dwave 1,"se\asioto3.ogg":csp 611:cspl 3,7:bg black,7,1500:bg "bg\bg082.bmp",7,1500:bgm "bgm\city1.ogg":goto *city59a_main
goto *city59b_main



*city59b_01

lsp 700,":a;chara\mob_daizin.bmp",0,0:print 10,500
gosub *setwindow_01
name "Minister A"
>The Colosseum is an even bigger success than ever!@
>Both participants and audience numbers are hitting new records every day!\
>Our economy is going through a huge boom, and our military power is increasing every day!@
>The Colosseum truly is the treasure of Grand Noah!\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city59b_main



*city59b_02

lsp 700,":a;chara\mob_daizin.bmp",0,0:print 10,500
gosub *setwindow_01
name "Minister B"
>Those "Roid" monsters are living here, but nobody seems to mind.\
>But their maintenance is quite troublesome...@
>They seem to randomly break down every so often.\
>We may need to hire some Magic Science Engineers from Grangold.@
>Perhaps we could start a university of our own here...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city59b_main



*city59b_03

lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Guard"
>Some of the machine monsters enlisted to guard the Queen.@
>Thanks to that, our duties have been reduced a little.\
>It's nice that they're strong...@> But it's a little distressing to be replaced like that...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city59b_main



*city59b_04

lsp 700,":a;chara\mob_heisi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Guard Captain"
>The last battle was so intense, there were lots of lives lost.@
>But their sacrifice gave us all peace...\
>...But I can't sit around depressed forever.@
>I'll enjoy the peace they gave me until the very end!\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city59b_main



*city59b_05

lsp 700,":a;chara\durahan_st01.bmp",228,0:print 10,500
gosub *setwindow_01
name "Dullahan"
>I asked Salamander to take me as an apprentice, but she knocked me out, and sent me away.\
>I tried Undine next, but she was too strong.@
>My sword just went through her formless body...\
>After that, I gave Gnome a shot.@> But she easily buried me in sand...@
>Finally I decided on Sylph.@>But then she just blew me out of the forest with her wind...\
name ""
name "Luka"
>...That sounds rough.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city59b_main



*city59b_06

lsp 700,":a;chara\kerberos_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Cerberus"
>The machine monsters have started fightin' in the Colosseum.@
>It has gotten a lot harder to progress now...\
>Of course, I ain't depressed over...@> Rather, I'm happy.@
>More opponents to train against and grow stronger!\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city59b_main



*city59b_10

bg "bg\bg045.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\grandnoa_st02.bmp",0,0:print 10,500
name "Grand Noah Queen"
>Luka, a true Hero who saved the world.@
>Your legendary feats will become tales handed down through history.\
>Fighting on with faith and courage, no fear of death as you enact your justice...@
>I'm honored to live in the same era as you.\
name ""
name "Luka"
>No, no...@>I didn't do anything that great...\
name ""
name "Grand Noah Queen"
>It is the duty of the Hero to create peace.@>And it's the duty of us administrators to maintain that peace.\
>We will protect the peace you have created.@
>All of the Kings and Queens of the world are united in that desire.\
>So...@>You have borne more than any one person should have had to.@
>How are you holding up?\
name ""
name "Luka"
>...Thank you for your concern.\
>But I wasn't alone.@
>Alice was always by my side...\
name ""
name "Grand Noah Queen"
>I see...@> A good companion.\
>You are always welcome here in Grand Noah.@
>Next time you visit, I will prepare a grand welcome.\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg065.bmp",7,1000
goto *city59b_main



*city59b_11

bg "bg\bg060.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_heisi1.bmp",-160,0
lsp 701,":a;chara\mob_heisi1.bmp",160,0:print 10,500
name "Guard A"
>There are tons of powerful monsters all over the castle...@
>But since they're guards, it just means we're all the more safer.\
>There were some drunk people rioting after the Colosseum match, but the machine monsters arrested them only seconds after the report came in.\
name ""
name "Guard B"
>Thanks to them, our role is slowly going away...\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg065.bmp",7,1000
goto *city59b_main



*city60_main0

saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\habataki.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg088.bmp",7,1500
bgm "bgm\yamatai.ogg"
goto *city60_main



*city60_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Old Man ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Boy ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Village Girl ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Akaname Girls ",95,250:spbtn 604,604
strsp 605,"Miko Lamia",95,280,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 605,605
lsp 610,":s/20,20,0;#FFFFFF#FF4444Cat Shrine ",410,160:spbtn 610,610
lsp 611,":s/20,20,0;#FFFFFF#FF4444Shirohebi's Shrine ",410,190:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Kitsune Shrine ",410,220:spbtn 612,612
lsp 613,":s/20,20,0;#FFFFFF#FF4444Meeting Hall ",410,250:spbtn 613,613
strsp 614,"Yamata no Orochi",410,280,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 614,614
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city60_main
if %cmd1=-1 gosub *menu:goto *city60_main
cspl 600,699
if %cmd1=601 goto *city60_01
if %cmd1=602 goto *city60_02
if %cmd1=603 goto *city60_03
if %cmd1=604 goto *city60_04
if %cmd1=605 goto *city60_05
if %cmd1=610 goto *city60_10
if %cmd1=611 goto *city60_11
if %cmd1=612 goto *city60_12
if %cmd1=613 goto *city60_13
if %cmd1=614 goto *city60_14
if %cmd1=619 return
goto *city60_main



*city60_01

lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Old Man"
>We've gotten a lot of new villagers recently.@
>These old bones are getting excited!\
>I'm even feeling some sensation return down there!\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city60_main



*city60_02

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Boy"
>Those Akaname Girls are kinda sexy...@
>All you have to do is ask and... Hehehehe...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city60_main



*city60_03

lsp 700,":a;chara\mob_musume1.bmp",175,0:print 10,500
gosub *setwindow_01
name "Village Girl"
>The other day, I applied to train with the Kunoichi Elves.@
>When I come back...@>I'll take all of the men with my ninja sex techniques!\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city60_main



*city60_04

lsp 700,":a;chara\akaname_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Akaname A"
>We get to lick so much every day!@
>This village is wonderful! \
name ""
name "Akaname B"
>We licked that boy just now until he fainted.@
>He came twenty times first, though. Hehe.\
name ""
name "Akaname C"
>I think it was his first time reaching orgasm, though...@
>He was so shy when he asked us!@>I hope he isn't traumatized...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city60_main



*city60_05

lsp 700,":a;chara\mikolamia_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Miko Lamia"
>I attacked the villagers out of lust earlier...@
>Thankfully nobody lost their lives.\
>They are pardoning my crimes, and allowing me to live here.@
>I swear upon my heart that I'll never attack people again.\
name ""
name "Luka"
>That's great, keep it up!\
name ""
lsp 700,":a;chara\mikolamia_st03.bmp",0,0:print 10,500
name "Miko Lamia"
>But everyone keeps coming here, asking me to tease them like I did before.@
>They seem to really want me to keep doing it...\
name ""
name "Luka"
>...............\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city60_main



*city60_10

bg "bg\bg159.bmp",7,1000
gosub *setwindow_01
if %ivent01<1 gosub *city_noiv:cspl 3,7:csp 611:cspl 699,705:bg "bg\bg088.bmp",7,1000:goto *city60_main
lsp 700,":a;chara\gob_st01.bmp",-200,0
lsp 701,":a;chara\nekomata_st04.bmp",200,60:print 10,500
name "Goblin Girl"
>Ah, Luka!\
name ""
name "Nekomata"
>...Nya! \
name ""
>At the Cat Shrine, Nekomata and Goblin Girl are eating some fish together.@
>They seem to be good friends now.\
name "Luka"
>You look like you're doing well, Goblin Girl.@
>And how about you, Nekomata?\
name ""
name "Nekomata"
>Nya. \
name ""
>Seeing her work so hard makes me want to work hard too, for some reason.\
name "Goblin Girl"
>I've been running all over the place the last month.@
>I wonder if I've been here in Yamatai or Iliasburg more...\
>But one day, I want to travel the world with my three old buddies!\
name ""
name "Nekomata"
>...Unya!\
name ""
name "Goblin Girl"
>You want to go, too?@
>Alright, we'll all go together then!\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg088.bmp",7,1000
goto *city60_main



*city60_11

bg "bg\bg159.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\sirohebi_st11.bmp",-170,0
lsp 701,":a;chara\sirohebisama_st01.bmp",170,0:print 10,500
name "Shirohebi the Older"
>S...Sorry... For being a...@>Bother...@
>Hmph!\
name ""
name "Shirohebi the Younger"
>She's being a little tsundere about it, but she swore to never do anything bad again.@
>This is all thanks to you, as well.\
name ""
name "Shirohebi the Older"
>Hmph.@>There's no "dere".\
name ""
name "Luka"
>...........\
name ""
>It looks like she won't harm anyone now.@
>But maybe I should keep an eye on this village for a while...\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg088.bmp",7,1000
goto *city60_main



*city60_12

bg "bg\bg159.bmp",7,1000
bgm "bgm\tamamo.ogg"
gosub *setwindow_01
lsp 700,":a;chara\tamamo_st04.bmp",0,0:print 10,500
name "Tamamo"
>Oh, if it isn't Luka!\
>Did you come to worship at the Fox Shrine?@
>That's admirable of you.\
name ""
name "Luka"
>No, that's not why...@
>...Well, whatever.\
name ""
>I throw some money into the shrine, and clap like the villagers do.@
>After I do that, Tamamo looks at me, and starts to excitedly hop back and forth.\
lsp 700,":a;chara\tamamo_st01.bmp",0,0:print 10,500
name "Tamamo"
>...By the way, Luka.@> Will you become my lover?\
name ""
name "Luka"
>Ehh!?\
name ""
lsp 700,":a;chara\tamamo_st02.bmp",0,0:print 10,500
name "Tamamo"
>It's not a bad thing.@
>You'll just attend to me every night.@>It's a life of nothing but pleasure.\
name ""
name "Luka"
>.............\
name ""
r@k@\
csel "I will",*city60_12a,"I won't",*city60_12b



*city60_12a

>I casually agree after only a second, without giving it serious thought.\
name "Tamamo"
>Hehe, I'm glad.@
>Now, let's return to the Monster Lord's Castle...\
name ""
>Thus, I'm invited back to Tamamo's room...\
dwave 1,"se\asioto2.ogg"
sean_change "bg176"
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
lsp 700,":a;chara\tamamo_st52.bmp",0,0:print 10,500
name "Tamamo no Mae"
>Hehe, I haven't had a meal in this body for a long time.@
>Now, please give me a lot...\
name ""
name "Luka"
>Wa...Wait a second!@
>This isn't what you...\
>Hyaa!\
name ""
>Tamamo looms over me, filled with an incredible power.@
>My body instinctively knows not to cross her...\
>The one in front of me is an existence of pure dark magic.@
>If I have sex with her, my soul might not survive...\
name "Tamamo no Mae"
if %con_hvoice=0 dwave 0,"voice\tamamo3_01.ogg"
>Hehe... Don't be afraid.
>Being violated by me is a thing of pure joy.\
if %con_hvoice=0 dwave 0,"voice\tamamo3_02.ogg"
>Sticking themselves into me, wanting to shoot out everything they have...
>Many men have given up their souls for that.\
name ""
dwavestop 0
name "Luka"
>Ahh...\
name ""
>A body that numerous men sold their souls just to taste... Right in front of me...\
name "Tamamo no Mae"
if %con_hvoice=0 dwave 0,"voice\tamamo3_03.ogg"
>Hoore, leave everything to me.
>I'll take great care in leading you to paradise...\
name ""
dwavestop 0
name "Luka"
>W...Wait... Ah!\
name ""
lsp 700,":a;chara\tamamo_hd01.bmp",0,0:print 10,500
>Her fluffy tails all reach out, and seal off my movements.@
>Like that, Tamamo bends forward, and presses her ass against me.\
>Sitting on top of me, Tamamo grabs hold of my penis, and guides it to her own entrance.\
name "Tamamo no Mae"
if %con_hvoice=0 dwave 0,"voice\tamamo3_04.ogg"
>Hoore... Your penis will be swallowed up by my vagina.
>And your semen will all be drawn out... Hehehe.\
if %con_hvoice=0 dwave 0,"voice\tamamo3_05.ogg"
>Are you ready?
>Then here I go...\
name ""
dwavestop 0
name "Luka"
>Ahhh!!!\
name ""
mov %hseanwave,5:hseanwave
lsp 700,":a;chara\tamamo_hd02.bmp",0,0:print 10,500
>With that, Tamamo drops her waist, bringing me inside her.@
>Just from insertion itself, a soul crushing ecstasy explodes inside me.\
>Her soft, wet flesh wraps around my penis, slowly tightening around me.\
>An entrance to a paradise of the flesh, that could blow away the sanity of any man.\
name "Luka"
>Ah... Haaa...\
name ""
name "Tamamo no Mae"
if %con_hvoice=0 dwave 0,"voice\tamamo3_06.ogg"
>Hehe... In ecstasy at once?
>You are tasting my body after all, so there's no helping it I suppose...\
name ""
dwavestop 0
name "Luka"
>Haa...\
name ""
>My mind is taken over by her tight flesh, making it feel like I could melt away inside her...@
>I'm already lost for words.\
name "Tamamo no Mae"
if %con_hvoice=0 dwave 0,"voice\tamamo3_07.ogg"
>At this rate, it will be over in no time...
>But I want to play with you a little more...\
if %con_hvoice=0 dwave 0,"voice\tamamo3_08.ogg"
>Hehe... Now then, I'll move some.
>Go ahead and writhe under me a little...\
name ""
dwavestop 0
lsp 700,":a;chara\tamamo_hd03.bmp",0,0:print 10,500
>Tamamo starts to slowly move her body, back and forth.@
>The slow, controlled movements lead me to even higher heights of pleasure.\
>Her slow, up and down movements let me feel every inch of her small vagina, the wet walls pulling and rubbing against me with each cycle.\
name "Luka"
>Ahh... Haa...\
name ""
name "Tamamo no Mae"
if %con_hvoice=0 dwave 0,"voice\tamamo3_09.ogg"
>Well... Is it good?
>You can't take anymore, I see.\
if %con_hvoice=0 dwave 0,"voice\tamamo3_10.ogg"
>Hehe... You can go ahead and come inside me.
>Hoore... I'll finish you with my waist movements...\
name ""
dwavestop 0
>Tamamo's movements get slightly faster as she leads me to a finish...@
>Responding to her, my body arches back as I reach a climax inside her.\
name "Luka"
>Ah... Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\tamamo_hd04.bmp",0,0
gosub *syasei2
>My body trembles as I come inside her, the ecstasy from release filling every inch of my body.\
lsp 700,":a;chara\tamamo_hd05.bmp",0,0:print 10,500
name "Tamamo no Mae"
if %con_hvoice=0 dwave 0,"voice\tamamo3_11.ogg"
>Hehe... The first shot was drawn out quite easily.
>You're coming inside me, you know?\
name ""
dwavestop 0
name "Luka"
>Ahh...\
name ""
>The feeling of coming inside Tamamo...@
>It was as if my soul itself was drawn into her.\
>The overwhelming pleasure leaves me completely defenseless under her.@
>With a grin, Tamamo continues...\
lsp 700,":a;chara\tamamo_hd06.bmp",0,0:print 10,500
name "Tamamo no Mae"
if %con_hvoice=0 dwave 0,"voice\tamamo3_12.ogg"
>Horehore, you don't have time to rest.
>Hoora... Release more...\
name ""
dwavestop 0
name "Luka"
>Ah!@>Ahhh!\
name ""
mov %hseanwave,9:hseanwave
>Tamamo starts to move much faster, completely dominating me with her intense movements.\
>She stops at random times, only to squeeze me incredibly tight...@
>The intense riding leaves me in a corner in no time.\
name "Luka"
>Haa... Stop... I'm going to come...!\
name ""
>Even though I came only a few moments ago, I can already feel another climax coming.@
>Tamamo's skilled movements don't allow her partner to have a rest...\
name "Tamamo no Mae"
if %con_hvoice=0 dwave 0,"voice\tamamo3_13.ogg"
>Hehe... Complaining, just when I put a little effort into it?
>Hoora... I'll finish you off at once!\
name ""
dwavestop 0
>Tamamo presses down, bringing me deep inside her.@
>After I'm all the way in, she starts to turn side to side, sending me crashing over the edge.\
name "Luka"
>Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\tamamo_hd07.bmp",0,0
gosub *syasei2
>With a moan, I explode inside her, my pulsing penis shooting spurts of semen inside her tight vagina.\
name "Luka"
>Ahh...\
name ""
>A feeling of weakness floods through me.@
>Even though I only came twice, it felt like so much more...\
>She must be absorbing a huge amount of energy with each orgasm.\
lsp 700,":a;chara\tamamo_hd08.bmp",0,0:print 10,500
name "Tamamo no Mae"
if %con_hvoice=0 dwave 0,"voice\tamamo3_14.ogg"
>Hehe, not yet...
>I'll squeeze out every drop of semen from your roots.\
name ""
dwavestop 0
name "Luka"
>Ahh... I can't do any more...@
>Ahhh...!\
name ""
>Tamamo's movements get even faster, riding on top of me, and squeezing me inside her tight insides.\
name "Tamamo no Mae"
if %con_hvoice=0 dwave 0,"voice\tamamo3_15.ogg"
>Hoore... I'll make it super tight...
>Can you endure this? Hehe... You can't, can you?\
name ""
dwavestop 0
name "Luka"
>Hyaa...\
name ""
>My lower body tingles in ecstasy, as I let out a moan of pleasure.@
>I know it will be dangerous if I come more...\
>But there's no way to fight against my desire to come inside her.\
gosub *syasei1
lsp 700,":a;chara\tamamo_hd09.bmp",0,0
gosub *syasei2
name "Luka"
>Ahhh...\
name ""
>My semen shoots into Tamamo's body, my energy almost all taken by her devilish vagina.\
name "Luka"
>Ah...ah...\
name ""
>I'm completely limp beneath her.@
>Even though I came three times, the lasting pleasure and weakness makes it feel like thirty.\
mov %hseanwave,0:hseanwave
lsp 700,":a;chara\tamamo_hd10.bmp",0,0:print 10,500
name "Tamamo no Mae"
if %con_hvoice=0 dwave 0,"voice\tamamo3_16.ogg"
>Hehe... Even though I went easy on you, you're already finished.
>Well, I sucked up enough to be satisfied.\
name ""
dwavestop 0
>With a flushed face of satisfaction and joy, Tamamo looks down at me.\
name "Luka"
>Ah...uh...\
name ""
name "Tamamo no Mae"
if %con_hvoice=0 dwave 0,"voice\tamamo3_17.ogg"
>I'm going to show you a lot of love, every night.
>You'll keep attending me through the night from now on...\
name ""
dwavestop 0
name "Luka"
>Ah... Uh...\
name ""
>With Tamamo still on top of me, I lose consciousness...\
gosub *anten
>...........\
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_shitenno3,1
mov $end_go,"city60_12"
goto *badend2



*city60_12b

lsp 700,":a;chara\tamamo_st03.bmp",0,0:print 10,500
name "Tamamo"
>Hrrm... That's too bad...@
>What should I do about my empty stomach...?\
>Ever since I awoke my sealed body during that battle, my stomach has been growling the entire time...\
name ""
name "Luka"
>...........\
name ""
>I'm sorry...@> But I just can't do that.\
cspl 3,7
csp 611
cspl 699,705
bgm "bgm\yamatai.ogg"
bg "bg\bg088.bmp",7,1000
goto *city60_main



*city60_13

bg "bg\bg090.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_seinen1.bmp",-240,0:print 10,500
name "Youngster A"
>Peace is great...\
name ""
lsp 701,":a;chara\mob_seinen1.bmp",-80,0:print 10,500
name "Youngster B"
>The beauty of nature...@>That's the true draw of Yamatai Village.\
name ""
lsp 702,":a;chara\mob_seinen1.bmp",80,0:print 10,500
name "Youngster C"
>Meetings and farewells...@>Treasured memories, one and all.\
name ""
lsp 703,":a;chara\mob_seinen1.bmp",240,0:print 10,500
name "Youngster D"
>It is better to be the head of a chicken, than the ass of an ox.\
name ""
name "Luka"
>W...What happened!?\
name ""
cspl 700,703
lsp 700,":a;chara\mob_rouzin1.bmp",0,0:print 10,500
name "Village Chief"
>They've entered Wise Man Mode.@
>They'll go back to being manwhores in about an hour.\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg088.bmp",7,1000
goto *city60_main



*city60_14

bg "bg\bg092.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\yamatanooroti_st01.bmp",0,0:print 10,500
name "Yamata no Orochi"
>They unsealed me on the condition that I don't do anything bad again.@
>Of course, I intend to keep my promise.\
>Besides... Those young men keep coming here in secret anyway.@
>I never go hungry for semen... Hahaha.\
name ""
name "Luka"
>...........\
name ""
>As I thought, they're still coming here.@
>I guess she has no reason to break her promise, anyway.\
lsp 700,":a;chara\yamatanooroti_st02.bmp",0,0:print 10,500
name "Yamata no Orochi"
>You should stop by whenever you want, too.@
>I'll lick that body of yours as much as you want...\
name ""
name "Luka"
>No thank you...\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg088.bmp",7,1000
goto *city60_main



*city61_main0

saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\habataki.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg095.bmp",7,1500
bgm "bgm\plansect.ogg"
goto *city61_main



*city61_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Alraune ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Dryad ",95,190:spbtn 602,602
strsp 603,"Alra Arum",95,220,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 603,603
strsp 604,"Alra Rooty",95,250,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 604,604
strsp 605,"Canaan Sisters",95,280,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 605,605
strsp 606,"Alra Priestess",95,310,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 606,606
strsp 607,"Experimental Organism S-2",95,340,14,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 607,607
lsp 608,":s/20,20,0;#FFFFFF#FF4444Merchant ",95,370:spbtn 608,608
lsp 610,":s/20,20,0;#FFFFFF#FF4444Tarantula Girl ",410,160:spbtn 610,610
strsp 611,"Mosquito Girl",410,190,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Caterpillar Girl ",410,220:spbtn 612,612
strsp 613,"Silkworm Girl",410,250,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 613,613
lsp 614,":s/20,20,0;#FFFFFF#FF4444Queen Bee ",410,280:spbtn 614,614
lsp 615,":s/20,20,0;#FFFFFF#FF4444Slime Girl ",410,310:spbtn 615,615
lsp 616,":s/20,20,0;#FFFFFF#FF4444Undine ",410,340:spbtn 616,616
lsp 617,":s/20,20,0;#FFFFFF#FF4444Erubetie ",410,370:spbtn 617,617
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city61_main
if %cmd1=-1 gosub *menu:goto *city61_main
cspl 600,699
if %cmd1=601 goto *city61_01
if %cmd1=602 goto *city61_02
if %cmd1=603 goto *city61_03
if %cmd1=604 goto *city61_04
if %cmd1=605 goto *city61_05
if %cmd1=606 goto *city61_06
if %cmd1=607 goto *city61_07
if %cmd1=608 goto *city61_08
if %cmd1=610 goto *city61_10
if %cmd1=611 goto *city61_11
if %cmd1=612 goto *city61_12
if %cmd1=613 goto *city61_13
if %cmd1=614 goto *city61_14
if %cmd1=615 goto *city61_15
if %cmd1=616 goto *city61_16
if %cmd1=617 goto *city61_17
if %cmd1=619 return
goto *city61_main



*city61_01

lsp 700,":a;chara\mob_mamono2.bmp",157,0:print 10,500
gosub *setwindow_01
name "Alraune"
>Plansect is now a village of peace and harmony.@
>Priestess became the new Plant Queen... But she's co-ruling along with Queen Bee.\
>Nobody has complained about anything so far.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city61_main



*city61_02

lsp 700,":a;chara\dryad_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Dryad"
>I beat up a whole group of angels.@
>I tied them up with my ivy, then I started teasing them...\
lsp 700,":a;chara\dryad_st11.bmp",0,0:print 10,500
>And now we've accepted some as immigrants into the village.@
>I hope we can be good friends...\
lsp 700,":a;chara\dryad_st01.bmp",0,0:print 10,500
>Eh?@>Did it reverse?@
>Eh?@>Ehhh...?\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city61_main



*city61_03

lsp 700,":a;chara\a_alm_st01.bmp",200,0:print 10,500
gosub *setwindow_01
name "Alra Arum"
>Even though we're at peace, I'm still looking for some excitement...@
>Luckily, I found something perfect.\
>I think I'll take Mosquito with me next time I head to Grand Noah...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city61_main



*city61_04

lsp 700,":a;chara\a_looty_st03.bmp",220,130:print 10,500
gosub *setwindow_01
name "Alra Rooty"
>I haven't been hanging out with Arum as much recently...@
>It looks like she's hanging around with Mosquito a lot more instead.\
>Mmmm... So lonely...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city61_main



*city61_05

lsp 700,":a;chara\a_mash_st01.bmp",260,70:print 10,500
gosub *setwindow_01
name "Alra Mash"
>Here's some water...\
name ""
>A mushroom type monster is watering the three carnivorous Canaan sisters...\
>Listening in, I can hear heartbreak in their voices.\
name ""
csp 700:print 10,500
name "Raffia"
>Sisters... Shouldn't we just give up already?@
>Let's just accept the peace, and let them undo our seals for good...\
name ""
name "Diana"
>Hmph...@>I'll never accept peace.@
>A mercenary is meaningless in times of peace!\
name ""
name "Dorothy"
>I'm so sick of water...@
>Even a beetle is fine, I just want to eat!\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city61_main



*city61_06

lsp 700,":a;chara\a_emp_st22.bmp",140,30:print 10,500
gosub *setwindow_01
name "Alra Priestess"
>When our villages unite, we can overcome any hardship.@
>But without the sacrifices of those who came before us, we never would have been able to attain this peace...\
>And I can never thank you enough.@
>Your actions and sacrifices for us have brought us this wonderful coexistence.\
>With our two races mixing for the first time, I'm sure there will be tensions...@
>But we'll make it work, with everything we have.\
name ""
lsp 700,":a;chara\alice_st01b.bmp",-120,0
lsp 701,":a;chara\a_emp_st22.bmp",300,30:print 10,500
name "Alice"
>Good...@
>Never forget your responsibility as Queen Alraune.\
name ""
name "Alra Priestess"
>Yes, leave it to me.@
>Hero, Monster Lord...@>I wish eternal happiness for your family.\
name ""
name "Luka"
>...Eh?\
name ""
lsp 701,":a;chara\a_emp_st23.bmp",300,30:print 10,500
name "Alra Priestess"
>...Eh?\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city61_main



*city61_07

lsp 700,":a;chara\c_s2_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "S-2"
>Awawa...\
name ""
name "Luka"
>Oh?@>One of Promestein's experimental monsters is here, too?\
name ""
name "S-2"
>Someone named Micaela helped me...@> They said I could live here.\
>This huge forest is so much more fun than a confined laboratory!@
>Awawawawawa...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city61_main



*city61_08

lsp 700,":a;chara\mob_ozisan3.bmp",0,0:print 10,500
gosub *setwindow_01
name "Traveling Merchant"
>I stopped by here a while ago.@
>It was terrifying back then...@> But it's a nice place now.\
>They buy a lot of various female clothing here.@
>And the honey and medicines I purchase here are great sellers in other towns.\
>There are also rumors going around about merchants opening up permanent stores here, now that it's peaceful.@
>All of us merchants are hoping to get a piece of the action.\
name ""
lsp 700,":a;chara\alice_st01b.bmp",-120,0
lsp 701,":a;chara\mob_ozisan3.bmp",160,0:print 10,500
name "Alice"
>No matter the times, merchants truly are the harbinger of cultural interchange.@
>Perhaps one of the best ways to bring about coexistence is to promote trade...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city61_main



*city61_10

lsp 700,":a;chara\mob_mamono3.bmp",0,0:print 10,500
gosub *setwindow_01
name "Tarantula Girl"
>Peace has finally come.@
>I hope it continues forever...\
>But why do people always get so afraid when they see how I look?@
>Tarantulas love peace...@> We're actually really friendly...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city61_main



*city61_11

lsp 700,":a;chara\mosquito_st01.bmp",220,70:print 10,500
gosub *setwindow_01
name "Mosquito Girl"
>We suck blood just like vampires...@>Why don't we have that cool, mysterious image like they do!?\
>The noble monster of the summer... Mosquitoes!\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city61_main



*city61_12

lsp 700,":a;chara\imomusi_st01.bmp",180,130:print 10,500
gosub *setwindow_01
name "Caterpillar Girl"
>I wonder when I'll grow bigger...@
>I won't... Stay like this forever, right!?\
>Maybe it's because I'm so picky about food...@
>Starting tomorrow, I'm eating vegetables as well as fruit!\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city61_main



*city61_13

lsp 700,":a;chara\kaiko_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Silkworm Girl"
>I can't forget that pleasure from when my energy was sucked...\
>Even if I make my own cocoon of ecstasy, it isn't enough.@
>After all, it's just boring masturbation...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city61_main



*city61_14

lsp 700,":a;chara\queenbee_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Queen Bee"
>I was freed the day before that battle.@
>No matter what, I don't want to be sealed again...\
>I reconciled with the Plant race, and am coming around to this way of life.@
>I'll cooperate with Alra Priestess, and govern this village in the name of peace.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city61_main



*city61_15

lsp 700,":a;chara\slime_st01.bmp",244,80:print 10,500
gosub *setwindow_01
name "Slime Girl"
>I'm living here while Undine's Spring is being purified! \
>Yaaay, yaaaay! @
>I love plants and bugs! \
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city61_main



*city61_16

lsp 700,":a;chara\undine_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Undine"
>...........\
name ""
name "Luka"
>You're living here too, Undine?\
name ""
name "Undine"
>This village is the closest one to my spring, after all.@
>I go there every day to purify it...\
>But it will take years before it's done.\
name ""
name "Luka"
>I see...\
name ""
lsp 700,":a;chara\undine_st02.bmp",0,0:print 10,500
name "Undine"
>But there's no need to rush it.@
>Perhaps there is no need for a refuge for Slime monsters now...\
name ""
lsp 700,":a;chara\slime_st01.bmp",-50,80
lsp 701,":a;chara\mob_syouzyo.bmp",-40,0
lsp 702,":a;chara\imomusi_st02.bmp",470,130:print 10,500
name "Slime Girl"
>Yaaay!@> Yaaaay!\
name ""
name "Girl"
>Ahaha, run away!!!\
name ""
name "Caterpillar Girl"
>Wait, wait!\
name ""
name "Luka"
>...Maybe not.\
name ""
cspl 701,702
lsp 700,":a;chara\undine_st02.bmp",0,0:print 10,500
>A secluded, sacred refuge for the slimes...@
>They may no longer need to hide away in places like that now.\
>No, we have to work hard to make sure they never need a place to hide.\
name "Undine"
>I'm expecting great things, Luka...\
name ""
name "Luka"
>Yeah, leave it to me!\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city61_main



*city61_17

if %continue=1 bgm "bgm\plansect.ogg"
if %continue=1 bg "bg\bg095.bmp",7,1000
mov %continue,0
lsp 700,":a;chara\erbetie_st01.bmp",225,0:print 10,500
gosub *setwindow_01
name "Erubetie"
>You came all the way here just to see me, Luka...\
name ""
name "Luka"
>No, err...@> I came to see how everything is going.\
name ""
>Erubetie seems to be staying in Plansect Village as well.@
>Along with some of the other powerful slimes, she's working to purify Undine's Spring.\
name "Erubetie"
>...I'd like to have a nice, long talk with you.@
>About wet, sticky coexistence between humans and monsters.\
>So... Won't you please come in the Monster Lord's Castle to me?\
name ""
r@k@\
csel "Absolutely!",*city61_17a,"Maybe next time...",*city61_17b



*city61_17a

name "Erubetie"
>Then let's return to the Monster Lord's Castle.@
>We'll talk about coexistence all over the place...\
name ""
name "Luka"
>Ah, yeah...\
name ""
csp 700:print 10,500
>Thus, I return to the Monster Lord's Castle with Erubetie...\
dwave 1,"se\asioto2.ogg"
sean_change "bg177"
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
mov %hseanwave,18:hseanwave
lsp 700,":a;chara\erbetie_hc1.bmp",0,0:print 10,500
name "Luka"
>Ahh...\
name ""
name "Erubetie A"
if %con_hvoice=0 dwave 0,"voice\erbetie3_01.ogg"
>Hora, you're happy, right?\
name ""
dwavestop 0
name "Erubetie B"
if %con_hvoice=0 dwave 0,"voice\erbetie3_02.ogg"
>Hehe, does it feel good?
>Please melt away more...\
name ""
dwavestop 0
>Erubetie's split bodies are all around me, caressing me at the same time.@
>Their slimy bodies all stroke and rub against me at once, my body loose in comfort.\
name "Luka"
>Ahh... T...This isn't...@
>Coexistence with the Slime race...\
name ""
name "Erubetie A"
if %con_hvoice=0 dwave 0,"voice\erbetie3_03.ogg"
>I'll share the fluids I squeeze from you with my brethren as nourishment.\
name ""
dwavestop 0
name "Erubetie B"
if %con_hvoice=0 dwave 0,"voice\erbetie3_04.ogg"
>This act is itself coexistence with us...
>If you understand, then just obediently drown in the pleasure...\
name ""
dwavestop 0
name "Luka"
>Ahhh...\
name ""
>Every part of my body is submerged inside Erubetie's own.@
>Laying on a bed of her body, her slime massages and strokes my defenseless flesh.\
name "Erubetie A"
if %con_hvoice=0 dwave 0,"voice\erbetie3_05.ogg"
>Hoora... You love it when these are toyed with, don't you?\
name ""
dwavestop 0
>The divided Erubetie's fingers start to gently rub and tickle my nipples.\
>Covered in her slimy touch, my back arches up at the sudden, powerful stimulation.\
name "Erubetie B"
if %con_hvoice=0 dwave 0,"voice\erbetie3_06.ogg"
>You like this too, don't you?\
name ""
dwavestop 0
>Tongues of slime run up and down my middle and sides, the creepy sensation of her warm body causing my body to tingle.\
name "Luka"
>Ahh...\
name ""
>As one of her slime tongues circles around my bellybutton, I let out a sigh of ecstasy.@
>As Erubetie caresses my entire body, it feels like I'm immersed in heaven...\
name "Erubetie C"
if %con_hvoice=0 dwave 0,"voice\erbetie3_07.ogg"
>But what you like the most...\
name ""
dwavestop 0
name "Erubetie D"
if %con_hvoice=0 dwave 0,"voice\erbetie3_08.ogg"
>Is here, isn't it?\
name ""
dwavestop 0
>Multiple Erubetie's reach out to my groin, their interlocking hands grabbing hold of my penis.\
name "Erubetie C"
if %con_hvoice=0 dwave 0,"voice\erbetie3_09.ogg"
>You wanted me to play with your penis like this, didn't you?\
name ""
dwavestop 0
name "Erubetie D"
if %con_hvoice=0 dwave 0,"voice\erbetie3_10.ogg"
>I'll keep teasing it until you come a lot...\
name ""
dwavestop 0
name "Luka"
>Ah... Haa...\
name ""
>Almost like floating in a dream, I entrust myself to Erubetie's touch.\
>Her slimy fingers run up and down my shaft, as her formless hands stroke my glans and neck...\
>Her hands sometimes form together, creating a mass of slime.@
>The incredible pleasure is enough to melt away my body and mind in ecstasy.\
name "Luka"
>Ahh... I'm going to come...\
name ""
name "Erubetie A"
if %con_hvoice=0 dwave 0,"voice\erbetie3_11.ogg"
>Fast, aren't you? Then please come...\
name ""
dwavestop 0
name "Erubetie B"
if %con_hvoice=0 dwave 0,"voice\erbetie3_12.ogg"
>Please let loose inside my slime...\
name ""
dwavestop 0
>The pressure of her slime suddenly increases, feeling like she's completely surrounding me.@
>As her slime moves up and down, I reach a powerful climax.\
name "Luka"
>Ahhh!!!\
name ""
gosub *syasei1
lsp 700,":a;chara\erbetie_hc2.bmp",0,0
gosub *syasei2
>Immersed in ecstasy, I explode inside her hands, my semen mixing with her warm slime.\
name "Luka"
>Haa...\
name ""
name "Erubetie A"
if %con_hvoice=0 dwave 0,"voice\erbetie3_13.ogg"
>You leaked out so much...
>But it's too early to be satisfied.\
name ""
dwavestop 0
name "Erubetie B"
if %con_hvoice=0 dwave 0,"voice\erbetie3_14.ogg"
>Hoora... Have a taste of Heaven...
>I'll squeeze your semen until you're empty.\
name ""
dwavestop 0
mov %hseanwave,19:hseanwave
>Her slime hands continue to gently stroke me, right after my orgasm.@
>My mind goes blank in ecstasy, as the intense stimulation on my sensitive penis is too much to take.\
name "Luka"
>Haaa... That feels good...\
name ""
name "Erubetie C"
if %con_hvoice=0 dwave 0,"voice\erbetie3_15.ogg"
>...What a bad child, letting out a voice like that...\
name ""
dwavestop 0
name "Erubetie D"
if %con_hvoice=0 dwave 0,"voice\erbetie3_16.ogg"
>Just become my captive...
>Continue to live in our embrace forever...\
name ""
dwavestop 0
>Her warm, sticky slime continues to caress my body and penis.@
>My body and soul are both wearing away in the pleasure...\
>I want to do nothing more than give myself over to this paradise.\
name "Luka"
>Ahh... Haa...\
name ""
name "Erubetie A"
if %con_hvoice=0 dwave 0,"voice\erbetie3_17.ogg"
>Hehe... How easy...
>You're already loose in the head...\
name ""
dwavestop 0
name "Erubetie B"
if %con_hvoice=0 dwave 0,"voice\erbetie3_18.ogg"
>Alright then, I'll lead you to paradise again...
>Leak out more of that proof that you belong to us...\
name ""
dwavestop 0
>Her slime compresses right underneath the neck of my penis, rubbing against an extra sensitive part.\
>A shock of pleasure races up my spine, as my every sense is focused on that stimulation...\
name "Luka"
>Ahh...\
name ""
gosub *syasei1
lsp 700,":a;chara\erbetie_hc3.bmp",0,0
gosub *syasei2
>And just like Erubetie wanted, I come into her slime hands.\
name "Luka"
>Ahh...\
name ""
>Laying down on the ground, I'm squeezed one time after another by the countless copies of Erubetie.\
>I can't imagine there being anything that feels better than this...@
>But before being completely drowned, a final moment of clarity hits me.\
>...Is this really alright?@
>Can I really drown in Erubetie's body here...?\
name "Erubetie A"
if %con_hvoice=0 dwave 0,"voice\erbetie3_19.ogg"
>Hoora... Let's bind our friendship together even more.
>You're happy... My brethren and I are happy... It's beneficial for everyone.\
name ""
dwavestop 0
name "Erubetie B"
if %con_hvoice=0 dwave 0,"voice\erbetie3_20.ogg"
>Offer up your own body, and show us the path to coexistence...
>And we must show plenty of our thanks, too...\
name ""
dwavestop 0
name "Luka"
>Ahh... This wasn't what I...@
>Haaa...\
name ""
>My words of refusal are meaningless before this ecstasy.@
>My thoughts mix and get confused, as the pleasure takes over my very mind.\
>I don't care about anything else...@
>I just want to taste this paradise forever.\
name "Erubetie A"
if %con_hvoice=0 dwave 0,"voice\erbetie3_21.ogg"
>Horahora... Offer up more proof of our friendship...\
name ""
dwavestop 0
name "Erubetie B"
if %con_hvoice=0 dwave 0,"voice\erbetie3_22.ogg"
>Don't resist... I'll even squeeze it out by force...\
name ""
dwavestop 0
name "Luka"
>Ahh...ahh...\
name ""
gosub *syasei1
lsp 700,":a;chara\erbetie_hc4.bmp",0,0
gosub *syasei2
>After being forced to come over and over, my body and soul come to belong to Erubetie.@
>Every day will be spent squeezed and caressed by her split bodies...\
name "Erubetie A"
if %con_hvoice=0 dwave 0,"voice\erbetie3_23.ogg"
>Hoora... Let out more...\
name ""
dwavestop 0
name "Erubetie B"
if %con_hvoice=0 dwave 0,"voice\erbetie3_24.ogg"
>If this is coexistence, it isn't bad at all...\
name ""
dwavestop 0
name "Luka"
>Ah...ah...\
name ""
gosub *syasei1:gosub *syasei2
>I'll be able to live in this paradise of pleasure forever...@
>It's a life of happiness for me...@> And for Erubetie as well, I'm sure.\
mov %hseanwave,0:hseanwave
gosub *anten
>...........\
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_shitenno4,1
mov $end_go,"city61_17"
goto *badend2



*city61_17b

name "Erubetie"
>I see... That's too bad...@
>Truly a pity...@
>.............\
name ""
>Erubetie intensely stares at me...\
cspl 3,7
csp 611
cspl 699,705
goto *city61_main



*map18

saveoff
textoff
csp -1
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
bg "bg\map5.bmp",10,1000
goto *map18_2



*map18_2

if %ivent11=2 strsp 601,"Grangold Castle",635,320,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 601,11
if %ivent12=2 strsp 602,"Succubus Village",390,280,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 602,12
if %ivent17=2 strsp 605,"Gold Port",295,120,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 605,13
lsp 604,":s/20,20,0;#FFFFFF#FF4444World Map ",635,550:spbtn 604,14
print 1
btnwait2 %cmd1
if %cmd1=0 goto *map18_2
if %cmd1=-1 gosub *menu:goto *map18_2
csp -1
btndef clear
if %cmd1=11 gosub *city62_main0:dwave 1,"se\habataki.ogg":bg black,7,1500:bgm "bgm\epilogue.ogg":goto *map18
if %cmd1=12 gosub *city63_main0:dwave 1,"se\habataki.ogg":bg black,7,1500:bgm "bgm\epilogue.ogg":goto *map18
if %cmd1=13 gosub *city64_main0:dwave 1,"se\habataki.ogg":bg black,7,1500:bgm "bgm\epilogue.ogg":goto *map18
if %cmd1=14 goto *maped
goto *map18_2



*city62_main0

saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\habataki.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg100.bmp",7,1500
bgm "bgm\city1.ogg"
goto *city62_main



*city62_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Boy ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Young Woman ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Man ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Ant Girl ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Mud Golem Girl ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Tsuchigumo ",95,310:spbtn 606,606
lsp 607,":s/20,20,0;#FFFFFF#FF4444Salamander ",95,340:spbtn 607,607
strsp 610,"Tool Shop",410,160,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
lsp 611,":s/20,20,0;#FFFFFF#FF4444Church ",410,190:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Magic Science Laboratory ",410,220:spbtn 612,612
strsp 613,"Grangold Castle",410,250,9,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 613,613
lsp 614,":s/20,20,0;#FFFFFF#FF4444Meeting Hall ",410,280:spbtn 614,614
strsp 615,"Parade Grounds",410,310,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 615,615
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city62_main
if %cmd1=-1 gosub *menu:goto *city62_main
cspl 600,699
if %cmd1=601 goto *city62_01
if %cmd1=602 goto *city62_02
if %cmd1=603 goto *city62_03
if %cmd1=604 goto *city62_04
if %cmd1=605 goto *city62_05
if %cmd1=606 goto *city62_06
if %cmd1=607 goto *city62_07
if %cmd1=610 goto *city62_10
if %cmd1=611 goto *city62_11
if %cmd1=612 goto *city62_12
if %cmd1=613 goto *city62_13
if %cmd1=614 goto *city62_14
if %cmd1=615 goto *city62_15
if %cmd1=619 return
goto *city62_main



*city62_01

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Boy"
>Grangold has been peaceful since that final battle.@
>But those spider monsters all decided to live here...\
>The Ant Girls are keeping a close eye on them, so it should be all right.@
>But I can't help but feel a little anxious...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city62_main



*city62_02

lsp 700,":a;chara\mob_musume2.bmp",15,0
lsp 701,":a;chara\ant_st01.bmp",160,0:print 10,500
gosub *setwindow_01
name "Young Woman"
>Awww geez!@> I'M GOING TO MARRY AN ANT GIRL THEN!@
>Hey, Ant Girl!@> Let's get married!!!\
name ""
name "Ant Girl"
>STAY BACK...\
name ""
>She seems to have become really desperate...\
cspl 3,7
csp 611
cspl 699,705
goto *city62_main



*city62_03

lsp 700,":a;chara\mob_ozisan2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Man"
>I won't forget the Ant Girls who saved me.@
>I won't ever hate monsters again.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city62_main



*city62_04

lsp 700,":a;chara\ant_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Ant Girl"
>MORE SPIDERWEBS...\
name ""
lsp 700,":a;chara\ant_st01.bmp",-240,0
lsp 701,":a;chara\mob_kumo2.bmp",120,0:print 10,500
name "Spider Girl"
>Ahhh!@>Stop destroying my home!\
name ""
>It seems like the Ant Girls work has only increased...\
cspl 3,7
csp 611
cspl 699,705
goto *city62_main



*city62_05

lsp 700,":a;chara\madgolem_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Mud Golem Girl"
>REPAIRS STILL ONGOING...@
>IT'S DANGEROUS, PLEASE STEP BACK.\
name ""
>So the castle is still being repaired?\
cspl 3,7
csp 611
cspl 699,705
goto *city62_main



*city62_06

lsp 700,":a;chara\tutigumo_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Tsuchigumo"
>I'll live quietly in this town...\
>I won't eat humans or monsters anymore.@
>I'll just suck some bodily fluids every so often...\
name ""
name "Luka"
>.............\
name ""
>Is this really alright...?\
cspl 3,7
csp 611
cspl 699,705
goto *city62_main



*city62_07

lsp 700,":a;chara\salamander_st03.bmp",0,0:print 10,500
gosub *setwindow_01
name "Salamander"
>After Heinrich defeated Alipheese the Eighth, he marched on the Heavens without saying anything to us.\
>I know he didn't want us caught up in it...@>But can you understand the frustration of someone left behind?\
name ""
name "Luka"
>W...Well...\
name ""
name "Salamander"
>I know you were thinking you would die in the end, too.@
>But you wanted to keep us in the dark, sparing our feelings.\
>You damn Heroes keep undervaluing your own lives!@
>If you keep doing that stuff, you'll just piss everyone off!\
name ""
name "Luka"
>That... I'm sorry...\
name ""
name "Salamander"
>If you didn't use every ounce of your power, you wouldn't have been able to defeat Ilias.@>I know that.\
>But why didn't you consult with us first?@
>We were fighting together...@> If you told us of the risks, we could have been there for you.\
name ""
name "Luka"
>I... Didn't want to worry you...\
name ""
lsp 700,":a;chara\alice_st03b.bmp",-120,0
lsp 701,":a;chara\salamander_st03.bmp",170,0:print 10,500
name "Alice"
>Then you did the same thing as Heinrich, you idiot!@
>You aren't allowed to shoulder these burdens alone!\
name ""
name "Luka"
>A...Alice too...?@
>S...Sorry...\
name ""
name "Salamander"
>I'll be watching you closely from now on.@
>You're a danger to yourself...\
name ""
name "Luka"
>...........\
name ""
>She's angry...\
cspl 3,7
csp 611
cspl 699,705
goto *city62_main



*city62_10

bg "bg\bg151.bmp",7,1000
lsp 700,":a;chara\mob_ozisan1.bmp",-160,0
lsp 701,":a;chara\ant_st01.bmp",160,0:print 10,500
gosub *setwindow_01
name "Ant Girl"
>ALL WEAPONS ARE HALF PRICE.\
name ""
name "Shopkeeper"
>Sales have dried up ever since that final battle.@
>These Ant Girls can do anything, but it's tough for me to change jobs...\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg100.bmp",7,1000
goto *city62_main



*city62_11

bg "bg\bg156.bmp",7,1000
lsp 700,":a;chara\ant_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Ant Girl"
>I SHALL PRAY FOR YOU...\
name ""
name "Luka"
>Ah... Thanks...\
name ""
name "Ant Girl"
>PRAY...\
name ""
>Even after Ilias is gone, this Ant Girl seems to want to keep managing this Church.\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg100.bmp",7,1000
goto *city62_main



*city62_12

bg "bg\bg161.bmp",7,1000
gosub *setwindow_01p
bgm "bgm\kiki2.ogg"
>In the basement of the Magic Science Laboratory...@
lsp 700,":a;chara\kumonomiko_st03.bmp",0,0:print 10,500
>It's the sealed Spider Princess!\
name "Spider Princess"
>How frustrating...@
>To think that I would be a prisoner of humans...\
name ""
name "Luka"
>They sealed the Spider Princess here?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",-120,0
lsp 701,":a;chara\kumonomiko_st23.bmp",0,0:print 10,500
name "Alice"
>We've set it up so the science engineers here are maintaining her seal.@
>If it ever breaks, the Four Heavenly Knights have orders to all rush here.\
>She is too dangerous to let loose.@
>Humans and monsters will both take responsibility for her imprisonment.\
name ""
name "Spider Princess"
>Curse you, Monster Lord!@
>Even if the world goes soft, my nature won't change!\
>Our appetite is what makes us monsters!@
>You cannot be a true Monster Lord if you turn away from that truth!\
lsp 700,":a;chara\alice_st04b.bmp",-120,0:print 10,500
name "Alice"
>...This talk of appetite is making me hungry.@
>Luka, let's go eat some Baumkuchen at that food stand we saw earlier.\
name ""
name "Spider Princess"
>Gah, wait!@
>I wasn't done speaking!\
name ""
lsp 700,":a;chara\alice_st01b.bmp",-120,0:print 10,500
name "Alice"
>Our appetite may be part of what makes us monsters, but that isn't the only thing.\
>I'll give you some Baumkuchen to try at some point in the future.@
>...Now let's go, Luka.\
name ""
name "Luka"
>Yes...\
name ""
bgm "bgm\city1.ogg"
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg100.bmp",7,1000
goto *city62_main



*city62_13

gosub *setwindow_01
name "Luka"
>The road is closed from here.\
name ""
>Looks like the castle is still being repaired.\
cspl 3,7
csp 611
cspl 699,705
goto *city62_main



*city62_14

bg "bg\bg105.bmp",7,1000
lsp 700,":a;chara\grangold_st04.bmp",0,0:print 10,500
gosub *setwindow_01
name "Grangold King"
>First, as King, I thank you on behalf of all citizens.@
>Thanks to your efforts, the world has been saved.\
>And from me as a person... I thank you again.@
>If not for your intervention, I would never have realized my own inadequacy.\
>I would have continued abusing the Ant Girls with no guilt...@
>Treating them like mere tools...\
name ""
name "Luka"
>But you understand the Ant Girls now.\
name ""
lsp 700,":a;chara\grangold_st03.bmp",0,0:print 10,500
name "Grangold King"
>Yes... I have.@
>And so have most of the citizens here.\
>But the same can't be said of the entire world.@
>As King, I want to get rid of any prejudices in the world.\
>Because without understanding, there can't be coexistence.@
>As long as humans treat monsters as strange "others"... We'll be apart.\
name ""
name "Luka"
>Yes, you're right.\
name ""
>If I never met Alice, I would have held that same prejudice...\
lsp 700,":a;chara\grangold_st04.bmp",0,0:print 10,500
name "Grangold King"
>To that end, I'm putting forth some new cultural exchange initiatives.@
>I want the change to be true and gradual, and not something simply forced by law and police.\
>Our first event will be the "Human and Monster Matchmaking Service".@
>We handed out lots of flyers, and a lot of excitement is building for it.\
name ""
lsp 700,":a;chara\grangold_st04.bmp",-160,0
lsp 701,":a;chara\queenant_st01.bmp",160,0:print 10,500
name "Queen Ant"
>I've gathered together all of the monster participants.\
>Of course, it won't be nothing but Ant Girls.\
>We've also got Lamias, Scyllas, and Alraunes coming for it.\
name ""
name "Luka"
>So there will be a lot more human and monster couples...@
>Perhaps prejudices will go away with that.\
name ""
name "Grangold King"
>We're also going to start study abroad and youth exchange programs.@
>My goal as King is to turn Grangold into a true city of humans and monsters.\
name ""
name "Queen Ant"
>Of course, I'm going to completely cooperate.@
>Queen Elf and Queen Fairy are also going to attend.\
name ""
name "Luka"
>If there's anything I can do, please let me know.\
name ""
lsp 700,":a;chara\alice_st02b.bmp",-120,0
lsp 701,":a;chara\grangold_st04.bmp",160,0:print 10,500
name "Alice"
>Hmm, I'll help where I can, too.@
>I think an exchange of local foods would be a great idea...\
name ""
name "Luka"
>Alice...\
name ""
lsp 700,":a;chara\grangold_st04.bmp",-160,0
lsp 701,":a;chara\queenant_st01.bmp",160,0:print 10,500
name "Grangold King"
>Thank you for your offers... We may take you both up on them.\
name ""
name "Queen Ant"
>Hero... Monster Lord...@>I thank you both for everything.\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg100.bmp",7,1000
goto *city62_main



*city62_15

if %continue=1 bgm "bgm\city1.ogg"
mov %continue,0
bg "bg\bg060.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\granberia_st02.bmp",-160,0
lsp 701,":a;chara\mob_heisi1.bmp",160,0:print 10,500
name "Granberia"
>What are you doing!?@> That footwork is lousy!\
name ""
>Granberia is instructing two soldiers in the military parade grounds...\
name "Granberia"
>That's no good...@>You have to use your leg to pivot!\
name ""
name "Soldier A"
>Y...Yes!\
name ""
name "Soldier B"
>Haa... Haa... Hya!\
name ""
name "Luka"
>Granberia, what are you doing...?\
name ""
lsp 700,":a;chara\granberia_st01.bmp",-160,0:print 10,500
name "Granberia"
>Mmm... Luka.@> Alright, take a break!\
name ""
name "Soldier A"
>Y...Yes!@> Oh god... Water...\
name ""
name "Soldier B"
>I... I can't move my arms...\
name ""
csp 701
lsp 700,":a;chara\granberia_st01.bmp",0,0:print 10,500
>Ignoring the complaining soldiers, Granberia turns toward me.\
name "Granberia"
>The King here offered me a position as military advisor.@
>I'm teaching sword skills to their most promising soldiers now.\
name ""
name "Luka"
>Granberia as a teacher?@
>I... Don't know what to say to that.\
name ""
>She doesn't really strike me as a teaching sort of a person, but...\
lsp 700,":a;chara\granberia_st04.bmp",0,0:print 10,500
name "Granberia"
>I've been thinking...@>There's no room in this era for someone who lives only to fight.@
>This peaceful world you and the Monster Lord created... I won't disturb it.\
name ""
>Granberia suddenly falls silent, and stares at the ground.@
>After a second, she nervously looks up and fidgets as she speaks.\
lsp 700,":a;chara\granberia_st05.bmp",0,0:print 10,500
name "Granberia"
>By the way...@>Luka...@>Would you like to spend some time with me?\
name ""
name "Luka"
>Spend some time? What?@
>Oh, you mean to spar?\
name ""
lsp 700,":a;chara\granberia_st03.bmp",0,0:print 10,500
name "Granberia"
>T...That's right.@>Of course, not to the death.@
>Do you want to spar in the Monster Lord's Castle some?\
name ""
>For some reason, Granberia seems a little off...\
r@k@\
csel "Accept",*city62_15a,"Refuse",*city62_15b



*city62_15a

name "Granberia"
>T...Then let's go to the Monster Lord's Castle.\
lsp 700,":a;chara\granberia_st02.bmp",-160,0
lsp 701,":a;chara\mob_heisi1.bmp",180,0:print 10,500
>I'll show you the fruits of my training!\
name ""
name "Soldier A"
>Thank you for your instruction!@>Oh god, my leg!\
name ""
name "Soldier B"
>M...My muscles are screaming!\
name ""
>With the training over, the soldiers all collapse on the spot.\
cspl 700,701:print 10,500
dwave 1,"se\asioto2.ogg"
sean_change "bg047"
bgm "bgm\colosseum.ogg"
lsp 700,":a;chara\granberia_st41.bmp",0,0:print 10,500
name "Luka"
>Uwa...!\
name ""
dwave 1,"se\down.ogg"
>Granberia's powerful slash knocks me to the ground.\
>Her strength is incredible...@
>It seems like a lie that I ever managed to beat her before.\
lsp 700,":a;chara\granberia_st11_b.bmp",0,0:print 10,500
name "Granberia"
>Well... This is what I expected.\
>You only ever fight seriously when you're fighting for your beliefs.@
>Last time, I was standing in the way of something you had to do.\
>...But it's different now.@
>You can't bring yourself to truly wield your blade against me, can you?\
name ""
name "Luka"
>Yeah... That's right.\
name ""
>After all, this is like a game.@
>Unlike that battle, my mental focus isn't as sharp.\
lsp 700,":a;chara\granberia_st12_b.bmp",0,0:print 10,500
name "Granberia"
>When it's just sparring, you don't even reach half of your potential.@
>But when you're fighting for something, you're the strongest being in the world.\
>That's why I stood no chance against you before...@
>It was unreasonable to ask you to spar with me.\
name ""
>Granberia slowly puts away her sword with that.\
lsp 700,":a;chara\granberia_st03.bmp",0,0:print 10,500
goto *city62_15c



*city62_15c

name "Granberia"
>...Though, a win is a win.@
>Now, I challenge you to a match in the bed!\
name ""
>With her brute strength, Granberia tears off my clothes.@
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
lsp 700,":a;chara\granberia_hf1.bmp",0,0:print 10,500
>And, stripping off her own clothes, jumps on me!\
name "Luka"
>W...What are you doing all of a sudden!?\
name ""
name "Granberia"
>...What are you complaining about?@
>You're clearly looking forward to this match!\
name ""
>Granberia presses her ass against my penis, slowly getting erect.@
>She angles it right toward her entrance...\
name "Granberia"
if %con_hvoice=0 dwave 0,"voice\granberia5_01.ogg"
>Now, I'll put it in.
>I wonder how long you can resist?\
name ""
dwavestop 0
name "Luka"
>W...Wai...@> Hyaa!\
name ""
mov %hseanwave,4:hseanwave
lsp 690,":a;chara\granberia_ct11.bmp",0,0:print 10,500
>Granberia pushes her waist against me, and takes me deep inside!\
name "Granberia"
if %con_hvoice=0 dwave 0,"voice\granberia5_02.ogg"
>Hoora... I brought your thing into me.
>What's wrong? You aren't going to fight?\
name ""
dwavestop 0
name "Luka"
>Ah...ah...\
name ""
>Her vagina is so hot, it feels like I could melt inside her...@
>And it's so tight inside of her...@> Her vagina must be surrounded by powerful muscles.\
>All the way from my root to tip, I can feel her soft, hot flesh squeezing me like a hand.\
name "Granberia"
if %con_hvoice=0 dwave 0,"voice\granberia5_03.ogg"
>Well... How does it feel inside me?\
name ""
dwavestop 0
name "Luka"
>Ah... It feels so good...\
name ""
>A smirk of satisfaction crosses Granberia's face as she watches me.\
name "Granberia"
if %con_hvoice=0 dwave 0,"voice\granberia5_04.ogg"
>It's my complete advantage from the start...
>...In that case, I'll go full on right away!\
name ""
dwavestop 0
name "Luka"
>Eh...?@
>Ah...!\
name ""
>Suddenly, Granberia starts to bounce up and down, riding me like a piston!@
>Each time she moves, her tight vagina clamps down even harder around me.\
>Her quick movements cause her tight flesh to rub hard against me, leaving me breathless.\
name "Granberia"
if %con_hvoice=0 dwave 0,"voice\granberia5_05.ogg"
>Hoora... How about this!?\
name ""
dwavestop 0
>Using her trained body as a spring to bounce up and down, her piston movements only get faster as time goes on.\
>Subjected to this intense stimulation, no amount of resistance will let me hold on.\
name "Granberia"
if %con_hvoice=0 dwave 0,"voice\granberia5_06.ogg"
>What's wrong? Just writhing in agony?
>Don't tell me you lost the will to counterattack with just that!?\
name ""
dwavestop 0
name "Luka"
>Ahg... Urhg...\
name ""
>My waist pushes up into her...@> But it's not for a counterattack.\
gosub *syasei1
lsp 700,":a;chara\granberia_hf2.bmp",0,0
lsp 690,":a;chara\granberia_ct12.bmp",0,0
gosub *syasei2
>Not even countering, I instead shoot out my flag of surrender.@
>I was forced to submit in only seconds...\
name "Luka"
>Ahhh...\
name ""
name "Granberia"
if %con_hvoice=0 dwave 0,"voice\granberia5_07.ogg"
>Surely... You didn't leak with just that?\
name ""
dwavestop 0
>Granberia looks both surprised and disappointed.@
>The mix of pleasure and humiliation in my own mind makes my face go bright red.\
name "Granberia"
if %con_hvoice=0 dwave 0,"voice\granberia5_08.ogg"
>So it is this easy to force men to ejaculate...
>An instant loss, just from moving my waist a little... A rather anti-climactic finish.\
if %con_hvoice=0 dwave 0,"voice\granberia5_09.ogg"
>Aren't you ashamed at coming so easily inside me?\
name ""
dwavestop 0
name "Luka"
>Urhg...\
name ""
>Granberia's surprise makes the humiliation all the deeper.@
>At the same time, she starts to slowly continue moving.\
name "Granberia"
if %con_hvoice=0 dwave 0,"voice\granberia5_10.ogg"
>I can't feel happy from a win like that.
>Well? Are you frustrated? Try counterattacking.\
if %con_hvoice=0 dwave 0,"voice\granberia5_11.ogg"
>You're a man, aren't you?
>Don't you feel miserable from being overpowered by a woman on a bed like this?\
name ""
dwavestop 0
>As she taunts me, I feel my fighting spirit start to rise somehow.@
>I don't want it to end like this...!\
>At the least, I'll get in one good blow!\
name "Luka"
>Uh... Rrhg!\
name ""
>I thrust up into her from below, my penis pushing deep into Granberia...\
name "Granberia"
if %con_hvoice=0 dwave 0,"voice\granberia5_12.ogg"
>...It's like child's play.
>Were you trying to attack me?\
name ""
dwavestop 0
name "Luka"
>Ah... Hya!\
name ""
mov %hseanwave,7:hseanwave
>Granberia suddenly tightens her vagina around my tip, halting my counterattack.@
>Without even moving, she completely overpowered me again...\
name "Luka"
>Ahh... So tight...\
name ""
>She continues to use her female weapons to mercilessly defeat me.@
>Able to do nothing but moan and climax, I'm left helpless underneath her as Granberia toys around with me.\
>Granberia stares down at me as she toys with me...@
>Her face is slowly brightening as she starts to enjoy this feeling.\
name "Granberia"
if %con_hvoice=0 dwave 0,"voice\granberia5_13.ogg"
>You seem to understand that you can't do anything...
>Apparently this seems to be my complete victory!\
name ""
dwavestop 0
>While violently moving up and down, Granberia continues to squeeze me with her vagina.\
name "Luka"
>Ahhh!@>Ah!\
name ""
>I'm at her complete mercy...\
>There's no fighting back, it's Granberia's total victory.\
name "Luka"
>Ah...\
name ""
>While riding me, Granberia squeezes down hard as I near another climax.@
>My penis starts to pulse inside of her, as I approach another surrender to her.\
name "Granberia"
if %con_hvoice=0 dwave 0,"voice\granberia5_14.ogg"
>Hoora... I'll finish you off.
>Now, shoot out the proof of your defeat into me!\
name ""
dwavestop 0
name "Luka"
>Ahhh!\
name ""
>Granberia uses her powerful muscles to squeeze my tip inside of her...\
gosub *syasei1
lsp 700,":a;chara\granberia_hf3.bmp",0,0
lsp 690,":a;chara\granberia_ct13.bmp",0,0
gosub *syasei2
>And just as she wanted, I come inside of her.@
>All during my orgasm, Granberia stares into my eyes with a smile.\
mov %hseanwave,0:hseanwave
name "Luka"
>Ahh...\
name ""
name "Granberia"
if %con_hvoice=0 dwave 0,"voice\granberia5_15.ogg"
>...Miserable.
>Getting such a loose face, after being defeated...\
name ""
dwavestop 0
>Granberia looks down at me satisfied, a new look of sadism on her face.\
gosub *anten
>With this "Battle", our relationship is defined.\
>Every day, we train together in our swordplay, growing stronger.@
>But in bed, she makes me taste defeat as a man...\
>Thus, I give myself over to these nights of defeat.@
>I spend every night with Granberia, tasting the pleasure of defeat...\
>..............\
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_shitenno1,1
mov $end_go,"city62_15"
goto *badend2



*city62_15b

lsp 700,":a;chara\granberia_st04.bmp",0,0:print 10,500
name "Granberia"
>I see... I see...\
lsp 700,":a;chara\granberia_st02.bmp",-160,0
lsp 701,":a;chara\mob_heisi1.bmp",180,0:print 10,500
>...Break time's over!@>One thousand reps, now!\
name ""
name "Soldier A"
>Aiiieee!!!\
name ""
name "Soldier B"
>H...Help us!\
name ""
name "Granberia"
>Those who complained, five hundred more!\
name ""
name "Soldier B"
>Y...Yes Ma'am!\
name ""
name "Luka"
>.............\
name ""
>Is Granberia angry...?\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg100.bmp",7,1000
goto *city62_main



*city63_main0

mov %genzaiti,13
saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\habataki.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg103.bmp",7,1500
bgm "bgm\mura2.ogg"
goto *city63_main



*city63_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Feed ",95,160:spbtn 601,601
lsp 602,":s/20,20,0;#FFFFFF#FF4444Prostitute ",95,190:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Young Sisters ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Soothsayer ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Naccubus ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Eva ",95,310:spbtn 606,606
lsp 607,":s/20,20,0;#FFFFFF#FF4444Amira ",95,340:spbtn 607,607
strsp 610,"Tool Shop",410,160,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
lsp 611,":s/20,20,0;#FFFFFF#FF4444Church ",410,190:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Bar ",410,220:spbtn 612,612
lsp 613,":s/20,20,0;#FFFFFF#FF4444Mayor's House ",410,250:spbtn 613,613
strsp 614,"Ceremony Room",410,280,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 614,614
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city63_main
if %cmd1=-1 gosub *menu:goto *city63_main
cspl 600,699
if %cmd1=601 goto *city63_01
if %cmd1=602 goto *city63_02
if %cmd1=603 goto *city63_03
if %cmd1=604 goto *city63_04
if %cmd1=605 goto *city63_05
if %cmd1=606 goto *city63_06
if %cmd1=607 goto *city63_07
if %cmd1=610 goto *city63_10
if %cmd1=611 goto *city63_11
if %cmd1=612 goto *city63_12
if %cmd1=613 goto *city63_13
if %cmd1=614 goto *city63_14
if %cmd1=619 return
goto *city63_main



*city63_01

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Feed A"
>O...oh... Mmm...@
>Ehe... Oh... Yes...\
name ""
>The men seem the same as always.\
cspl 3,7
csp 611
cspl 699,705
goto *city63_main



*city63_02

lsp 700,":a;chara\maccubus_st11.bmp",175,0:print 10,500
gosub *setwindow_01
name "Maccubus"
>Those Succubi who attacked are all living here now.@
>I don't believe in refusing anyone from living here, but...\
>I don't like the thought of having to share my food.@
>We need to work on getting more male immigrants here...\
>Even if we have tons of potatoes, that just isn't enough.\
name ""
name "Luka"
>...Potatoes?\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city63_main



*city63_03

lsp 700,":a;chara\renccubus_st03.bmp",15,0
lsp 701,":a;chara\minccubus_st03.bmp",335,50:print 10,500
gosub *setwindow_01
name "Lencubus"
>Those potatoes the Mayor gave me...@>I still have so many!@>There's no way I could eat all of these.\
name ""
name "Mincubus"
>I think she's bringing more tomorrow, too.@
>Our house is going to just be a storehouse for potatoes soon...\
name ""
name "Luka"
>Why not give them to someone else?\
name ""
lsp 700,":a;chara\renccubus_st01.bmp",15,0:print 10,500
name "Lencubus"
>The Mayor has been giving them to everyone.@>Everyone has a ton of them.\
>Since it's the Mayor, we can't just refuse.@
>But other than semen, all of our meals have just been potatoes...\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city63_main



*city63_04

lsp 700,":a;chara\witchs_st11.bmp",0,50:print 10,500
gosub *setwindow_01
name "Succubus Witch"
>To think that you would go on to save the world...@
>My fortune telling wasn't able to see something that huge.\
>Hehe, would you like a reward?@
>I'll make you feel wonderful...\
name ""
name "Luka"
>No, that's alright...\
name ""
name "Succubus Witch"
>Then how about some potatoes at least?@
>I'm sick of them...\
name ""
>What's with all of the potatoes...?\
cspl 3,7
csp 611
cspl 699,705
goto *city63_main



*city63_05

lsp 700,":a;chara\narcubus_st11.bmp",0,0:print 10,500
gosub *setwindow_01
name "Naccubus"
>In the end, I'm able to live here! \
>Does anyone need their white stuff harvested!?@
>I'll extract it all with my syringe! \
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city63_main



*city63_06

lsp 700,":a;chara\eva_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Eva"
>Since then, they have accepted us into the village.\
>As punishment for what we did, we've been assigned five years of labor...@
>But it's better than those miserable days spent wandering in search of semen.\
name ""
lsp 700,":a;chara\alice_st04b.bmp",-120,0
lsp 701,":a;chara\eva_st01.bmp",160,0:print 10,500
name "Alice"
>Well, it's not like you were always evil.@
>Poverty can make you desperate...@>And suddenly getting power like that made you become drunk on it.\
>Hard labor for five years is a good punishment.@
>Reflect on your actions during them.\
name ""
name "Eva"
>I will, Monster Lord.\
>...Once I'm released, I'll target that potato Mayor first.@
>Then I'll take over the village, and make all the men mine...\
name ""
name "Luka"
>..............\
name ""
>I don't think she has really reflected yet...\
cspl 3,7
csp 611
cspl 699,705
goto *city63_main



*city63_07

bgm "bgm\amira.ogg"
gosub *setwindow_01
lsp 700,":a;chara\amira_st01.bmp",0,0:print 10,500
name "Amira"
>Thank you, Hero!@> You saved the world!\
name ""
lsp 700,":a;chara\amira_st01.bmp",-160,0
lsp 699,":a;chara\zannen_st01.bmp",180,0:print 10,1500
name "Pyhar"
>I'll need to give you thaaaaanks!\
name ""
csp 699
lsp 700,":a;chara\zannen_st02.bmp",0,-250
bg "bg\bg140.bmp",10,500
name "Diamrem"
>.............\
name ""
lsp 700,":a;chara\amira_st01.bmp",-160,0
lsp 699,":a;chara\zannen_st03.bmp",160,0
bg "bg\bg103.bmp",10,500
name "Ga*****d"
>.............\
name ""
name "Luka"
>Wait a second, the Unfortunate Mermaid...?\
name ""
csp 699
lsp 700,":a;chara\amira_st01.bmp",0,0:print 10,1500
name "Amira"
>She became a star in that final battle...@
>But her soul is still burning brightly inside our stomachs.\
name ""
lsp 700,":a;chara\amira_st01.bmp",-160,0
lsp 699,":a;chara\zannen_st01.bmp",180,0:print 10,1500
name "Pyhar"
>Wait...@>Was that sushi you gave us as a reward...?\
name ""
lsp 700,":a;chara\amira_st01.bmp",-160,0
lsp 699,":a;chara\zannen_st03.bmp",160,0:print 10,1500
name "Ga******"
>.............\
name ""
name "Luka"
>Hey, is it just me or is Ga******'s censoring getting worse?\
name ""
name "********"
>.............\
name ""
name "Luka"
>Oh, now that's just mean.\
name ""
name "Ga******"
>.............\
name ""
name "Luka"
>Yes, that's better.\
name ""
name "Garf****"
>.............\
name ""
name "Luka"
>Keep it up, you're nearly there!\
name ""
name "Garfun**"
>.............\
name ""
name "Luka"
>...Wait, what?\
name ""
name "Garfunkel"
>.............\
name ""
name "Luka"
>What the!?\
name ""
csp 699
lsp 700,":a;chara\alice_st01b.bmp",67,0:print 10,1500
name "Alice"
>Luka...@>Stay back before you catch the stupid.\
name ""
name "Luka"
>R...Really?\
name ""
if %check10=0 gosub *city_noiv:cspl 3,7:csp 611:cspl 699,705:goto *city63_main
>I always feel odd after talking with these Unfortunate types...@
>Anyway...\
csp 701
lsp 700,":a;chara\amira_st01.bmp",0,0:print 10,1500
name "Luka"
>...Amira, thank you for all of your help.@
>Without you, things would have been really difficult.\
name ""
name "Alice"
>Yes, I thank you as well.\
>By the way...@
>Do you recognize this book?\
name ""
>Alice holds up the "Legend of Hero Luka" book we bought earlier.\
name "Amira"
>I...I know nothing!@
>I've never seen such a book!\
name ""
>Amira's voice suddenly squeaks as she denies it.@
>She was the one who wrote it then, wasn't she?\
lsp 700,":a;chara\alice_st01b.bmp",-120,0
lsp 701,":a;chara\amira_st01.bmp",160,0:print 10,500
name "Alice"
>So it was you.@
>Did you write it just to make some money?\
name ""
name "Amira"
>...I just wanted to tell the world the story of my Darling's battles!@
>The trials and tribulations undergone as he fought on to the end!\
name ""
name "Luka"
>Amira...\
name ""
lsp 700,":a;chara\amira_st01.bmp",-160,0
lsp 701,":a;chara\zannen_st01.bmp",160,0:print 10,1500
name "Pyhar"
>You were cackling like a lunatic as those royalties were coming in.@
>She built a huge mansion in Iliasburg with a gold-plated gate emblazoned with "Palace Luka".\
name ""
name "Luka"
>..............\
name ""
>So that's how it is.\
lsp 700,":a;chara\alice_st03b.bmp",-120,0
lsp 701,":a;chara\amira_st01.bmp",160,0:print 10,500
name "Alice"
>What the hell is this final chapter, too!?@
>"The Hero and Monster Lord's final Love Love art: Love Lova Giga!"\
name ""
name "Amira"
>I wasn't able to interview you before the final battle!@>I had to improvise!\
>Though you're right, that is fairly embarrassing.@>You two would never do something like combine your love and power together to launch it out in a single dramatic blow...\
name ""
name "Luka"
>R...Right...\
name ""
lsp 700,":a;chara\alice_st08b.bmp",-120,0:print 10,500
name "Alice"
>Y...Yeah, right...\
name ""
csp 701
lsp 700,":a;chara\amira_st01.bmp",0,0:print 10,1500
name "Amira"
>But I should have gotten permission first.@
>My author's spirit simply leaped free as that page was before me, and I couldn't contain myself!\
>If you two desire, I'll stop publication...\
name "Luka"
>No... I don't care.@
>The book is all about fighting for coexistence, after all...\
name ""
>It's all silly over dramatization anyway.@
>The character in the story may be based on me, but it's too exaggerated for anyone to take seriously.\
>But if it's able to get across the message of coexistence, then I guess it's fine.@
>That was the most important part, anyway.\
name "Amira"
>I'll be careful with my Heroic Tales from now on.@
>I wouldn't want to create any false stories that are handed down, after all...\
name ""
lsp 700,":a;chara\alice_st01b.bmp",-120,0
lsp 701,":a;chara\amira_st01.bmp",160,0:print 10,500
name "Alice"
>Ah... That reminds me.@
>I won't interfere too much with the content, but...\
lsp 700,":a;chara\alice_st04b.bmp",-120,0:print 10,500
>Why did you have to go crazy with the relationship part in the story!?@
>Now all these strange rumors are all over the place...\
name ""
name "Amira"
>But it was a special instruction from an important dignitary...@
>She told me to play up the love aspect, and make you two lovers.\
>She wanted it to become a widespread fact, fast...\
name ""
lsp 700,":a;chara\alice_st07b.bmp",-120,0:print 10,500
name "Alice"
>W...Who told you to do such a thing!?\
name ""
name "Amira"
>Hint 1: Kitsune.\
name ""
lsp 700,":a;chara\alice_st52b.bmp",-120,0:print 10,500
name "Alice"
>TAMAMOOOOOOOOOOOOOOOOOO!!!\
name ""
mov %ruka_book,1
cspl 3,7
csp 611
cspl 699,705
bgm "bgm\mura2.ogg"
goto *city63_main



*city63_10

bg "bg\bg151.bmp",7,1000
lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Shopkeeper"
>The world is so peaceful now... I can't stop crying!@
>Waaah!@> Uwaaahhh!!!\
>I can't sell any weapons... I'm going to be ruined...@
>Waaaahhh!!!\
name ""
>He's really crying...\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg103.bmp",7,1000
goto *city63_main



*city63_11

bg "bg\bg156.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\inp_st21.bmp",280,0
lsp 698,":a;chara\inp_st01.bmp",0,0
lsp 699,":a;chara\inp_st11.bmp",-250,0:print 10,500
name "Imp"
>This building looks empty... @
>This is going to be our secret base! \
name ""
name "Remi"
>Meh meh...\
name ""
name "Rumi"
>Erp...\
name ""
name "Luka"
>............\
name ""
>The small monsters seem to have taken up residence in the abandoned church...\
cspl 3,7
csp 611
cspl 698,705
bg "bg\bg103.bmp",7,1000
goto *city63_main



*city63_12

gosub *setwindow_01p
>I hear voices coming from the bar...\
name "Succubus A"
>I'm going to suck more out of you!\
name ""
name "Man A"
>Ahhhyyaaaa!!!\
name ""
name "Succubus B"
>What, already coming?@
>Not yet, I won't let you!\
name ""
name "Man B"
>Nnnngggg!!!\
name ""
name "Luka"
>...........\
name ""
>I turn around and leave.\
cspl 3,7
csp 611
cspl 699,705
goto *city63_main



*city63_13

if %continue=1 bgm "bgm\mura2.ogg"
mov %continue,0
bg "bg\bg106.bmp",7,1000
lsp 700,":a;chara\succubus_st03.bmp",0,50:print 10,500
gosub *setwindow_01
name "Succubus"
>There have been some nasty things being said behind my back recently.@
>I want us to be a self sufficient village, so I've started a plan to grow potatoes in the fields.\
>We produced so much this year, we distributed a large load to everyone.@
>And now they've taken to calling me Potato Mayor behind my back!\
name ""
name "Luka"
>M...My sympathies...@
>But why potatoes?\
name ""
name "Succubus"
>Even us Succubi can't suck in semen all the time.@
>In preparation for a time of famine, we're harvesting potatoes.\
>Right now we have lots of men, so we're always feasting, but...\
>Sheesh, these spoiled Succubi today never have experienced true hunger.\
name ""
name "Luka"
>............\
name ""
lsp 700,":a;chara\succubus_st01.bmp",0,50:print 10,500
name "Succubus"
>Anyway, I thank you, savior of our village.@
>I've prepared a grand feast in your honor.\
lsp 700,":a;chara\succubus_st02.bmp",0,50:print 10,500
>Please, come this way.@
>Enjoy this feast to your heart's content...\
name ""
name "Luka"
>A feast...?@>For me?\
name ""
>I'm thankful for the gesture, but I have a bad feeling about this.@
>Should I accept her invitation...?\
r@k@\
csel "Accept",*city63_13a,"Refuse",*city63_13b



*city63_13a

name "Luka"
>Well if you went to the effort, I'll join in...\
name ""
name "Succubus"
>Then please come this way.@
>It's right behind this door...\
name ""
dwave 1,"se\door2.ogg"
bg "bg\bg181.bmp",10,1500
>I move past the door into a surprisingly spacious room.@
lsp 700,":a;chara\maccubus_st12.bmp",-80,0
lsp 701,":a;chara\renccubus_st04.bmp",170,0
lsp 702,":a;chara\minccubus_st02.bmp",420,0:print 10,500
>Inside, numerous Succubi are standing around.\
name "Luka"
>Eh...?@> Where is the food for the feast?\
name ""
cspl 701,702
lsp 700,":a;chara\succubus_st02.bmp",0,50:print 10,500
name "Succubus"
>Hehe... The feast just arrived.@
>Everyone, get him! \
name ""
name "Luka"
>Eh...?@> Uwaa!\
name ""
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
lsp 700,":a;chara\end6_h1.bmp",0,0:print 10,500
>Succubi rush at me from every direction.@
>Completely taken by surprise, I'm held down in a sitting position while I'm still in shock.\
mov %hseanwave,2:hseanwave
name "Lencubus"
>Nnn... *Kiss* *Lick*\
name ""
>Lencubus takes advantage of my open mouth, and gives me a deep kiss.@
>As her tongue rubs against mine, a sweet feeling fills my head.\
name "Luka"
>Ahh...\
name ""
>A relaxing feeling of weakness flows through me, as the Succubus passionately kisses me.\
name "Lencubus"
>The Hero tastes so good... Mmmm... *Kiss*\
name ""
name "Luka"
>Haa... Wait...\
name ""
>Still reeling from the sudden kiss, I can't manage to summon the strength to push off the Succubi, who should be weaker than me.\
>With a seductive smile on her face, Maccubus positions herself against my waist.\
name "Maccubus"
>Hehe... I'll feast on your power.@
>I'll spend a nice, long time using Level Drain to suck you dry...\
name ""
name "Luka"
>Wh...Why are you doing this?\
name ""
name "Maccubus"
>The world is at peace, so you don't need your power anymore, right?@
>So here...@> Let me suck it all out from here...\
name ""
>Maccubus uses her fingers to spread open her vagina, showing it off in front of my face.\
>The wet, bright pink flesh seems to pulse with desire, as if wanting nothing more than me inside it...\
name "Luka"
>S...Stop this!\
name ""
name "Maccubus"
>Hehe... I'm so happy...@
>I get to suck up the semen from the Hero who saved the world!\
name ""
>With a lewd smile, Maccubus drops down, bringing my penis deep inside in one stroke!\
name "Luka"
>Ahhh!!!\
name ""
lsp 700,":a;chara\end6_h2.bmp",0,0:print 10,500
>My penis is wrapped up by her soft flesh, her winding insides rubbing against my penis as I pierce her.@
>The incredible feeling of ecstasy from being inside a Succubus' vagina causes me to go limp in shocked pleasure.\
name "Maccubus"
>Ahaha... I swallowed it. @
>Master Hero, how does a Succubus' pussy feel?\
>I'll give you a feast of pleasure inside me, so let's make this last a long time.\
name ""
>Her soft vaginal walls clench down on my penis, locking me inside.@
>At the same time, another hole deep inside her sucks in my tip, as if an inner mouth was sucking on me.\
>Just from insertion, I'm already writhing in unbearable pleasure.\
name "Luka"
>Ahh... L...Let me go...\
name ""
>She'll absorb my power if I ejaculate inside her.@
>I try to struggle against the pleasure, but no strength is filling my limbs.\
>Once a Succubi starts to prey on a man, they aren't able to fight back...\
name "Lencubus"
>*Lick*... Nnn...\
name ""
>Lencubus starts to alternate between licking my face, and giving me deep kisses.@
>As one Succubus rapes me, and another covers my face with her warm saliva, I feel like I'm trapped in a torturous hell of pleasure.\
name "Luka"
>Ah... Haa...\
name ""
name "Maccubus"
>Oh my, what's wrong?@
>Your face seems to be getting all loose...\
name ""
>Frustrated at being controlled so easily by the Succubi, the sudden climax takes me by surprise.@
>Unable to even try to hold it back, my body relaxes as the explosion of pleasure runs through me.\
gosub *syasei1
lsp 700,":a;chara\end6_h3.bmp",0,0
gosub *syasei2
name "Luka"
>Haaa...\
name ""
>I explode inside her vagina, which made me helpless so quickly.@
>The sudden storm of ecstasy that came over me out of nowhere almost feels like an accidental orgasm.\
name "Maccubus"
>Aha, you already came?@
>You didn't even last a minute after insertion...@> You're just like a little virgin.\
>You're so silly, Master Hero... Hehe.\
name ""
name "Luka"
>Ahhh...\
name ""
>The humiliation at being toyed with so easily mixes with the deep male satisfaction at my orgasm.\
>The various emotions swirl around my head, as the afterglow of the orgasm fills my senses.\
name "Maccubus"
>Hehe, you seem to have enjoyed your orgasm.@
>I made you feel good first, so now it's my turn, right?\
>Now it's my turn to be satisfied...@
>I'll suck up all your power...\
name ""
name "Luka"
>S...Stop...\
name ""
>Maccubus' body starts to glow with a faint, white light.@
>At the same time, I feel her vagina start to increase in temperature...\
name "Maccubus"
>Level Drain...\
name ""
name "Luka"
>Ah!@>Ahhh!!!\
name ""
mov %hseanwave,15:hseanwave
>Her vagina slowly starts to squeeze and release, creating a suction inside her.@
>The intense stimulation really feels like a powerful mouth is sucking hard on my penis.\
>At the same time, her vaginal walls compress and rub against my sensitive penis.@
>The combination of pleasure is too much to take, leaving me a writhing mess underneath her.\
name "Maccubus"
>Now come inside me...@
>Forget everything, and just give me everything...\
name ""
name "Luka"
>Ahhh!!!\
name ""
gosub *syasei1
lsp 700,":a;chara\end6_h4.bmp",0,0
gosub *syasei2
>Just as Maccubus demands, I explode inside her.@
>Unable to do anything, I shoot more semen into the Succubus' vagina.\
>At the same time, a strange feeling of weakness comes over me.@
>Along with my orgasm, a small fragment of power was sucked out of me.\
name "Maccubus"
>Hehe... I sucked up a little bit of your power.@
>But as expected of the Hero who saved the world, there's so much...\
>I'll squeeze you for a long, long time until you're empty...\
>Here, like this...@
>I'll squeeze, and suck on you with my pussy...\
name ""
name "Luka"
>Haaa...\
name ""
>Her vaginal walls squeeze tighter, the wavy flesh massaging my penis as if it had a will of its own.@
>The touch alone is enough to make me tremble in ecstasy under her.\
name "Maccubus"
>Slowly tighten and massage...@
>And wring out your power...\
name ""
name "Luka"
>No... I'm going to come again...\
name ""
>The soft flesh presses around my penis from every side, leaving me barely able to gasp between my moans of pleasure.\
>Becoming prey to a Succubus, and having all my energy squeezed out...@>Even if I know what's happening, I can't fight against the pleasure to stop it.\
name "Maccubus"
>Now for the finishing blow with Level Drain...\
name ""
>The suction starts inside her vagina again, sucking on my penis.@
>Surrendering to that incredible touch, I gasp as I reach another climax.\
name "Luka"
>Haaa!\
name ""
gosub *syasei1
lsp 700,":a;chara\end6_h5.bmp",0,0
gosub *syasei2
>I explode inside her again, my semen spurting into her Succubus vagina.@
>Another strange feeling of weakness comes over me, but it isn't much.\
>Very little of my power is sucked out, but if this continues for a long time, it will slowly take a toll...\
name "Maccubus"
>Hehehe... We'll take a good, long time sucking you dry.@
>Of course it won't just be me, every Succubus in this village will have a turn.\
>Even once you're dry, there's no need to worry.@
>We'll take care of you in this village forever.\
>It's your reward for saving the world. Hehehe...\
name ""
name "Luka"
>Ahh...\
name ""
mov %hseanwave,0:hseanwave
>Thus, I'm subjected to a continual Level Drain...@
>After a long time, eventually every drop of my power is sucked up by the Succubi of the village.\
>Even after losing all of my power, they keep me captive in the village.@
>Every day, they treat me to a feast of carnal pleasure as a guest of honor in the village.\
>A horrible fate for a Hero...\
gosub *anten
>.................\
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_end6,1
mov $end_go,"city63_13"
goto *badend2



*city63_13b

lsp 700,":a;chara\succubus_st03.bmp",0,50:print 10,500
name "Succubus"
>...This is truly a shame, it was such a perfect opportunity.@
>Please forgive us for not giving you a true celebration worthy of a Succubus Village...\
name ""
name "Luka"
>I...It's fine...\
name ""
>She seems really disappointed...\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg103.bmp",7,1000
goto *city63_main



*city63_14

bg "bg\bg110.bmp",7,1000
lsp 700,":a;chara\lilith_st01.bmp",138,0:print 10,500
gosub *setwindow_01
name "Lilith"
>Ilias is gone... This is great.@
>I'll give you some extra huge service...\
name ""
name "Lilim"
>But Alipheese the Eighth is a little more complicated...@
>To think she was trying to destroy us, too.\
name ""
name "Luka"
>You two were her subordinates five hundred years ago, right?\
name ""
name "Lilith"
>Yes... We dreamed of world conquest along with her.@
>But we were both beaten down by Heinrich.\
name ""
name "Lilim"
>Her Majesty was very nice to her subordinates.@
>I don't know at what point she went insane like that...\
>She wasn't one to want to destroy anything...@
>What's the point of ruling over a field of ashes?\
name ""
lsp 700,":a;chara\alice_st01b.bmp",-120,0
lsp 701,":a;chara\lilith_st01.bmp",298,0:print 10,500
name "Alice"
>Her big ambitions may have been warped by that "White Rabbit" drug.@
>Perhaps her desire to rule the world got twisted into one of destroying it, when she realized she couldn't do it any longer.\
>In the end, she was swallowed by her own power...\
name ""
name "Lilith"
>At the least, the two of us will hold a funeral for her.@
>We may be the only two alive that know her for who she used to be...\
name ""
name "Lilim"
>She will go down in history as pure evil...@
>But at the least, we will remember her before that.\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg103.bmp",7,1000
goto *city63_main



*city64_main0

saveoff
textoff
btndef clear
mov %sinkoumode,0:skipoff:autoclick 0
dwave 1,"se\habataki.ogg"
csp 611:cspl 3,7
bg black,7,1500
bg "bg\bg119.bmp",7,1500
bgm "bgm\gordport.ogg"
goto *city64_main



*city64_main

btndef clear
lsp 699,":a;system\window9.bmp",80,140
lsp 601,":s/20,20,0;#FFFFFF#FF4444Youth ",95,160:spbtn 601,601
strsp 602,"Town Girl",95,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 602,602
lsp 603,":s/20,20,0;#FFFFFF#FF4444Lupton ",95,220:spbtn 603,603
lsp 604,":s/20,20,0;#FFFFFF#FF4444Arakure ",95,250:spbtn 604,604
lsp 605,":s/20,20,0;#FFFFFF#FF4444Soldier ",95,280:spbtn 605,605
lsp 606,":s/20,20,0;#FFFFFF#FF4444Trooperoid ",95,310:spbtn 606,606
strsp 610,"Weapon Shop",410,160,7,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 610,610
strsp 611,"Tool Shop",410,190,6,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 611,611
lsp 612,":s/20,20,0;#FFFFFF#FF4444Ilias Kreuz Headquarters ",410,220:spbtn 612,612
lsp 613,":s/20,20,0;#FFFFFF#FF4444Port ",410,250:spbtn 613,613
strsp 614,"Hero's Shrine",410,280,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 614,614
lsp 615,":s/20,20,0;#FFFFFF#FF4444Cemetery ",410,310:spbtn 615,615
strsp 616,"Selena's House",410,340,8,1,20,20,0,0,1,1,#FFFFFF,#FF4444:spbtn 616,616
lsp 619,":s/20,20,0;#FFFFFF#FF4444Leave ",410,400:spbtn 619,619
print 1
btnwait2 %cmd1
if %cmd1=0 goto *city64_main
if %cmd1=-1 gosub *menu:goto *city64_main
cspl 600,699
if %cmd1=601 goto *city64_01
if %cmd1=602 goto *city64_02
if %cmd1=603 goto *city64_03
if %cmd1=604 && %ivent14=3 goto *city64_04a
if %cmd1=604 && %ivent14<3 goto *city64_04b
if %cmd1=605 goto *city64_05
if %cmd1=606 goto *city64_06
if %cmd1=610 goto *city64_10
if %cmd1=611 goto *city64_11
if %cmd1=612 goto *city64_12
if %cmd1=613 goto *city64_13
if %cmd1=614 goto *city64_14
if %cmd1=615 goto *city64_15
if %cmd1=616 goto *city64_17
if %cmd1=619 return
goto *city64_main



*city64_01

lsp 700,":a;chara\mob_seinen1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Youth"
>That last battle was something fierce.\
>Those marine monsters lead by that giant Poseidoness...@
>Then the ghost ship showing up, with Captain Selene on it!\
>Thanks to them, this town was protected.@
>Even though we hated monsters... We owe them our lives.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city64_main



*city64_02

lsp 700,":a;chara\mob_musume1.bmp",175,0:print 10,500
gosub *setwindow_01
name "Town Girl"
>But why did Captain Selene's ship appear?@
>Does she like this town or something?\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city64_main



*city64_03

lsp 700,":a;chara\mob_gorotuki3.bmp",0,0:print 10,500
gosub *setwindow_01
name "Lupton"
>There are still flowers on Lazarus' grave.@
>For now, he's being remembered as a Hero who died defending the town...\
name ""
name "Luka"
>.............\
name ""
name "Lupton"
>Oh, don't worry.@
>Ilias Kreuz won't ever reform.\
>It's dead, along with Lazarus.@
>All of us know that the previous era is over with.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city64_main



*city64_04a

lsp 700,":a;chara\mob_gorotuki1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Arakure"
>My bud came back.@
>He said you busted into that Drain Lab place and sprung him out!\
>Thanks a million, man!@> You the best!\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city64_main



*city64_04b

lsp 700,":a;chara\mob_gorotuki1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Arakure"
>My bud came back.@
>That Granberia liz sprung him out!\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city64_main



*city64_05

lsp 700,":a;chara\mob_sensi1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Soldier"
>Us humans took up all of the long range attacks during that final battle.@
>We were chucking bombs and shooting arrows as fast as we could.\
>I'm truly grateful that Poseidoness and her army took the front line.\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city64_main



*city64_06

lsp 700,":a;chara\trooperloid_st01.bmp",0,0:print 10,500
gosub *setwindow_01
name "Trooperoid"
>Hey, can I suck out some semen?\
name ""
name "Luka"
>You... You're still attacking people here!?\
name ""
name "Trooperoid"
>Wait, no!@>I'm asking permission before I do!\
>Just about everyone is fine with it, though.@
>I took up a part time job harvesting and selling semen, it's going well.\
name ""
name "Luka"
>Oh... That's good, then.@> I think?\
name ""
cspl 3,7
csp 611
cspl 699,705
goto *city64_main



*city64_10

bg "bg\bg152.bmp",7,1000
lsp 700,":a;chara\mob_ozisan1.bmp",0,0:print 10,500
gosub *setwindow_01
name "Shopkeeper"
>I made a ton of weapons, but now the demand is gone.@
>How am I going to get rid of all these spears and swords...?\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg119.bmp",7,1000
goto *city64_main



*city64_11

bg "bg\bg154.bmp",7,1000
lsp 700,":a;chara\mob_ozisan2.bmp",0,0:print 10,500
gosub *setwindow_01
name "Shopkeeper"
>I was stunned when I saw Captain Selene's boat.\
>Idiot!@> I'm so damn stupid!@> I can't believe I missed my chance to ask her where she buried her treasure...\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg119.bmp",7,1000
goto *city64_main



*city64_12

bg "bg\bg117.bmp",7,1000
gosub *setwindow_01
name "Luka"
>..........\
name ""
>With Lazarus dead, the building is abandoned.@
>I hope no group like Ilias Kreuz ever forms again.\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg119.bmp",7,1000
goto *city64_main



*city64_13

bg "bg\bg118.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_sentyou.bmp",0,0:print 10,500
name "Captain"
>There's a vacant house on the west side of town...@
>But my friend said he saw some woman there.\
>Even more, she was dressed like a pirate!@
>When he tried to get closer to take a look, she vanished!\
name ""
>West side of town...@> That's Selena's... No, I mean Selene's house.\
name "Captain"
>That house is mighty suspicious, actually.@
>It's been vacant for a while, but it still looks clean and furnished...\
>It's well maintained, and quite big.@
>Why hasn't anyone bought it yet, I wonder?\
name ""
name "Luka"
>.............\
name ""
>Hmm... Maybe I should take a look?\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg119.bmp",7,1000
goto *city64_main



*city64_14

bg "bg\bg092.bmp",7,1000
gosub *setwindow_01
lsp 700,":a;chara\mob_sinkan.bmp",-220,0
lsp 701,":a;chara\mob_sinkan.bmp",0,0
lsp 702,":a;chara\mob_sinkan.bmp",220,0:print 10,500
name "Sage A"
>Oooh, Hero Luka!@> Well done, defeating the False Goddess Ilias!\
name ""
name "Sage B"
>No matter the era, we shall remain relevant!\
name ""
name "Sage C"
>That is us!@>The Three Wise Men!\
name ""
name "Luka"
>............\
name ""
>These three are something else...@
>But at least they seem to have their spirits back.\
name "Luka"
>Now that Ilias is gone, what will you three do?@
>I don't think any more Heroes will visit...\
name ""
name "Sage A"
>...We have fulfilled our duty.@
>We shall write down what happened, to inform the future generations!\
name ""
name "Sage B"
>The truth of the world we have come to understand in this small shrine.@
>We shall record everything in a book!\
name ""
name "Sage C"
>Please, Hero Luka...@
>Can you give us your thoughts on what we have written so far?\
name ""
>One of the Sages hands me a handwritten book.\
name "Luka"
>E...Err... Well...\
>"Chapter One: About Peace.@
>Peace is simple. But it is profound. That profoundness makes it complex.\
>To understand it, you must also know what it means to "Shoot the Moon".@>Sometimes the best---"\
>...Hey!@
>This is just a guide on how to play Hearts!\
name ""
name "Sage A"
>This is the result of our research, patience, and meditation.\
name ""
name "Sage B"
>Indeed, the culmination of years of effort.@
>We shall entrust the generations to come with this...\
name ""
name "Sage C"
>Our Hearts will shine forth!\
name ""
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg119.bmp",7,1000
goto *city64_main



*city64_15

bg "bg\bg168.bmp",7,1000
gosub *setwindow_01
bgm "bgm\kanasimi2.ogg"
name "Luka"
>I'm done, Father.@
>Someone like me actually managed to save the world...\
name ""
>Standing in front of my father's grave, I tell him about my battle with Ilias.@
>This is a giant step forward in coexistence among every race.\
name "Luka"
>Father... Mother... Please continue watching over me in the future.@
>Now, and always...\
name ""
lsp 700,":a;chara\alice_st04b.bmp",67,0:print 10,500
name "Alice"
>..................\
name ""
bgm "bgm\gordport.ogg"
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg119.bmp",7,1000
goto *city64_main



*city64_17

if %continue=1 bgm "bgm\gordport.ogg"
mov %continue,0
bg "bg\bg123.bmp",7,1000
gosub *setwindow_01p
>I head to the house that Selene had invited me to before...\
lsp 700,":a;chara\serene_st11.bmp",0,0:print 10,500
name "Selene"
>It has been a while, Luka.\
name ""
>Captain Selene is still here!\
name "Luka"
>Selena...@>No, Selene!?@
>Why are you here!?\
name ""
lsp 700,":a;chara\serene_st13.bmp",0,0:print 10,500
name "Selene"
>During the final battle, I returned to help protect my hometown along with my pirate crew.\
>But after fighting for so long, I used up too much energy...@
>Thanks to that, I can't move on.\
name ""
name "Luka"
>I...Is that so?\
name ""
lsp 700,":a;chara\serene_st11.bmp",0,0:print 10,500
name "Selene"
>So Luka... Will you give me some energy?@
>The method is simple, you just need to have sex with me.\
name ""
name "Luka"
>No, no, no, absolutely not!\
name ""
>Having sex with Selene's spirit...?@
>That's just wrong, no matter how you look at it.\
lsp 700,":a;chara\serene_st13.bmp",0,0:print 10,500
name "Selene"
>You're so mean, Luka...@
>I'm a spirit who can't move on, right?\
name ""
name "Luka"
>There must be some other way...\
name ""
>Having sex with a ghost is just no good.@
>I mean... They're already dead, right?\
lsp 700,":a;chara\serene_st11.bmp",0,0:print 10,500
name "Selene"
>...Hey, Luka.@
>It's tough to be a female in the world of violent pirates...\
>But I was able to rule the seven seas as a woman by using a "Carrot" and "Stick".\
name ""
name "Luka"
>Eh...?@> What are you talking about?\
name ""
name "Selene"
>My "Stick" was built up with the overwhelming power of my crew.@
>Nobody would underestimate me just because I was a woman.\
>No matter the fight, we wouldn't lose.@
>But just that alone isn't enough to rule the seven seas...\
name ""
name "Luka"
>It's true you can't just rule by force...\
name ""
name "Selene"
>What's important is the "Carrot".@
>I'd bring the pirates that we defeated into my bedroom, one by one...\
name ""
name "Luka"
>Y...You didn't...\
name ""
name "Selene"
>Yes, as you thought...\
name ""
>With a seductive smile, Selene traces her finger around her groin area...\
name "Selene"
>After tasting my sweet "Carrot", all of the other pirate groups aligned with me.@
>No matter how strong the man, they all surrendered after just a little rape...\
>There was even one who said my pussy was better than a mermaid's.\
name ""
name "Luka"
>............\
name ""
>I can't help but swallow.@
>Better than a mermaid's...?\
name "Selene"
>...Well, Luka?@
>Don't you want to taste my body?\
>You'll feel good, and I'll get some energy...@
>We both profit, right?\
name ""
name "Luka"
>Err... That's...\
name ""
r@k@\
csel "Give energy",*city64_17a,"Refuse",*city64_17b



*city64_17a

name "Luka"
>F...Fine...@
>I want to help others, after all...\
name ""
lsp 700,":a;chara\serene_st12.bmp",0,0:print 10,500
name "Selene"
>Hehe... You're such a good child.@
>Let's get started right away...\
name ""
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
lsp 700,":a;chara\end7_h1.bmp",0,0:print 10,500
>Selene quickly sits down on me.@
mov %hseanwave,3:hseanwave
>My penis sinks deep into her warm vagina.\
name "Luka"
>Ahhh!\
name ""
>An intense feeling of pressure attacks me all at once.@
>It feels like my skin is all being pulled down toward the root of my penis.\
name "Luka"
>Ahh... W...What...?\
name ""
>Selene giggles as my eyes roll in confusion.\
name "Selene"
>My pussy gets tighter the deeper you get...@
>It pushes back all the skin, leaving your glans completely unguarded.\
name ""
name "Luka"
>Ahhh...\
name ""
>Her vagina itself peeled away my foreskin, completely revealing my weakest point to direct stimulation.\
name "Luka"
>W...What the... My tip... Ahh!\
name ""
name "Selene"
>After pressing down all the skin, I can make my pussy extra tight...\
name ""
name "Luka"
>Haa... Ahhh!\
name ""
>Squeeze... Squeeze... She presses down hard on my defenseless glans, deep inside of her.@
>The intense pleasure causes an ejaculation to bubble up in seconds.\
name "Luka"
>Ahh... N...No...!@
>Don't move that much!\
name ""
>I gasp in pleasure as the torturous ecstasy assaults me.@
>There's no way I could endure this!\
name "Selene"
>Sorry, Luka...@
>I'm not doing it on purpose.\
>I was born with my pussy like this, it's difficult for me at times, too.\
name ""
name "Luka"
>Ha... Ahhh!\
name ""
gosub *syasei1
lsp 700,":a;chara\end7_h2.bmp",0,0
gosub *syasei2
>After only around ten seconds after insertion, I explode inside of her incredible vagina.\
name "Selene"
>...Well, that's what normally happens.@
>Don't be ashamed, most men come right away their first time.\
>It's good for breaking and training men, but...@
>Since men always come so fast, I've never been able to find a man that can satisfy me.\
name ""
>While sitting on top of me, Selene sighs.@
>At the same time, her incredible vagina continues to squeeze and attack me...\
name "Luka"
>Ahhh!@
>I'm going to come again!\
name ""
name "Selene"
>Sorry, but can I have you come one more time?@
>There didn't seem to be enough last time...\
name ""
mov %hseanwave,7:hseanwave
>With that said, Selene starts to slowly move her waist.@
>Her soft vaginal flesh rubs against me as she moves, sending fresh sensations through my spine.\
name "Luka"
>Ahhh!!!\
name ""
>Even though she wasn't moving before, I came in no time...@> Her vagina is like a weapon itself, able to force a man to submit.\
name "Luka"
>N...No... Ahh!\
name ""
name "Selene"
>Hehe, I'll finish you off quickly.@
>Please give me enough energy to move on to the next world...\
name ""
name "Luka"
>Haaa!!!\
name ""
>Selene's skilled movements bring me to the edge again in seconds.@
>The unmatched vagina she boasted about is no lie...\
>As she slowly moves, her vagina's shape itself causes each movement to press and pull on my shaft and tip, as the sweet tightness erodes my patience.\
name "Luka"
>Ahhh!!!\
name ""
gosub *syasei1
lsp 700,":a;chara\end7_h3.bmp",0,0
gosub *syasei2
>I'm easily brought to another orgasm, my penis pulsing inside her with spurts of pure pleasure.\
name "Luka"
>Ahh...\
name ""
name "Selene"
>Now, I can rest in peace...@>Or not?@
>Was that not enough?\
name ""
>Selene looks puzzled on top of me.\
name "Selene"
>If I was lacking energy, I thought I would have had enough after the first orgasm.@
>I mean, your semen is packed full of energy...\
>But if it's still not working...@> Then is there another reason?\
name ""
>Even as she thinks aloud, focused on other things, her vagina doesn't stop squeezing on me.\
>While she's not even looking at me or trying to make me come, I'm led to another height.\
name "Luka"
>Ah... Ahh!\
name ""
gosub *syasei1:gosub *syasei2
>As I come inside her again, she turns back toward me, a look of surprise on her face.\
name "Selene"
>Ah... Sorry.@
>I was thinking about something else for a second.\
name ""
name "Luka"
>Haa...\
name ""
>My body relaxes in total weakness beneath her body.@
>Overwhelmed by pleasure, my soul itself has been captured...\
mov %hseanwave,0:hseanwave
gosub *anten
>Even after that, Selene couldn't move on.@
>Is it because she was so powerful in life?@> Or due to fighting angels in spirit form?\
>Selene's mansion became a legend among men.@
>Numerous men would come by every night, and have sex with Selene's spirit.\
>After tasting her body even once, a man becomes her slave.@
>I, of course, was no exception...\
mov %hseanwave,8:hseanwave
lsp 700,":a;chara\end7_h1.bmp",0,0
bg "bg\bg123.bmp",10,1500
name "Luka"
>Haa... Selene, it feels so good...\
name ""
name "Selene"
>Luka, you're completely a captive, aren't you?\
>Here, I'll squeeze it inside...@
>Tight around your tip, your favorite...\
name ""
name "Luka"
>Ah...!@> I...I'm coming!\
name ""
gosub *syasei1
lsp 700,":a;chara\end7_h2.bmp",0,0
gosub *syasei2
>My body trembles in ecstasy as I explode as hard as I can inside her.@
>This vivid pleasure doesn't feel like it could come from a ghost at all...\
name "Luka"
>Haa... So good...\
name ""
name "Selene"
>You'll let me suck more energy?@
>Hehe... You're as energetic as always, Luka.\
name ""
name "Luka"
>Haa...\
name ""
>Thus, I continue having sex every night with the ghost of this female pirate...@
>A slave to her body, I continue giving her my energy...\
mov %hseanwave,0:hseanwave
gosub *anten
>............\
if %zukanon=2 mov %zukanon,1:goto *zukan_commonkaisou0
mov %hsean_end7,1
mov $end_go,"city64_17"
goto *badend2



*city64_17b

name "Luka"
>I...I can't do that.@
>Please wait a little longer, I'll bring an expert here...\
name ""
lsp 700,":a;chara\serene_st13.bmp",0,0:print 10,500
name "Selene"
>Oh my... So cold.\
name ""
if %ivent05<3 mov $sel1,"I'll bring Tamamo by later..."
if %ivent05=3 mov $sel1,"I'll talk this over with Tamamo or Chrome later."
eng $sel1:$sel6\
>I quickly leave Selene's house...\
cspl 3,7
csp 611
cspl 699,705
bg "bg\bg119.bmp",7,1000
goto *city64_main



*city_noiv

gosub *setwindow_01p
>Nothing seems to be going on here...\
return



*monster_labo

stop
loopbgmstop
for %sub1=0 to 49 step 1:dwavestop %sub1:next
name "":textoff:btndef clear:barclear
for %sub1=0 to 255 step 1:csp2 %sub1:next
csp -1
bg black,1
lsp 500,":a;system\window10.bmp",25,50
bg "bg\bg046.bmp",7,1000
if %mon_labo_on=1 goto *monster_labo_listup
mov %mon_labo_on,1
mov %mon_labo_page_no,1
for %sub1=0 to 999
itoa $sub1,%sub1
getini $sub9,".\mod\list.ini","monster",$sub1
if $sub9="" atoi %sub1,$sub1:mov %mon_labo_page,%sub1:break
next
mov %mon_labo_mon_num,%mon_labo_page
sub %mon_labo_page,1:div %mon_labo_page,26:add %mon_labo_page,1
goto *monster_labo_listup



*monster_labo_listup

cspl 102,130
shadedistance 1,2
if %mon_labo_page_no=0 mov %mon_labo_page_no,%mon_labo_page
if %mon_labo_page_no>%mon_labo_page mov %mon_labo_page_no,1
mov %sub1,%mon_labo_page_no:sub %sub1,1:mul %sub1,26
mov %mon_labo_select_no,%sub1
mov %sub2,102
for %sub3=0 to 25
itoa $sub1,%sub1
getini $sub1,".\mod\list.ini","monster",$sub1
getini $sub1,".\mod\"+$sub1+"\story.ini","setting","title"
len %name_count,$sub1
if %name_count>34 mid $sub1,$sub1,0,32:add $sub1,">>"
if %sub3<13 mov %sub4,%sub3:mul %sub4,30:add %sub4,80
if %sub3>12 mov %sub4,%sub3:mul %sub4,30:sub %sub4,310
if %sub3<13 nobel $sub1:len %name_count,$sel6:strsp %sub2,$sel6,50,%sub4,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444
if %sub3>12 nobel $sub1:len %name_count,$sel6:strsp %sub2,$sel6,400,%sub4,(%name_count+1)/2+1,1,20,20,0,0,1,1,#FFFFFF,#FF4444
add %sub1,1
if %sub1=%mon_labo_mon_num break
add %sub2,1
next
itoa2 $list1,%mon_labo_page_no
itoa2 $list2,%mon_labo_page
lsp 128,":s/20,20,0;#FFFFFF"+$list1+"^"+$list2,370,500
lsp 99,":c/2,0,3;system\menu_prev.jpg",330,500
lsp 100,":c/2,0,3;system\menu_next.jpg",450,500
lsp 101,":c/2,0,3;system\return.bmp",20,560
lsp 129,":c;system\system_barx_u.jpg",0,0
lsp 130,":c;system\system_barx_d.jpg",0,560
if %100=1 itoa $sel6,%stack:csp 10:strsp 10,$sel6,750,5,2,1,20,20,0,0,1,0,#FF0000
print 1
goto *monster_labo_btn



*monster_labo_btn

btndef clear
spbtn 99,99
spbtn 100,100
spbtn 101,101
spbtn 102,102
spbtn 103,103
spbtn 104,104
spbtn 105,105
spbtn 106,106
spbtn 107,107
spbtn 108,108
spbtn 109,109
spbtn 110,110
spbtn 111,111
spbtn 112,112
spbtn 113,113
spbtn 114,114
spbtn 115,115
spbtn 116,116
spbtn 117,117
spbtn 118,118
spbtn 119,119
spbtn 120,120
spbtn 121,121
spbtn 122,122
spbtn 123,123
spbtn 124,124
spbtn 125,125
spbtn 126,126
spbtn 127,127
btnwait %bwait
if %bwait=102 goto *monster_labo_story
if %bwait=103 add %mon_labo_select_no,1:stop:goto *monster_labo_story
if %bwait=104 add %mon_labo_select_no,2:stop:goto *monster_labo_story
if %bwait=105 add %mon_labo_select_no,3:stop:goto *monster_labo_story
if %bwait=106 add %mon_labo_select_no,4:stop:goto *monster_labo_story
if %bwait=107 add %mon_labo_select_no,5:stop:goto *monster_labo_story
if %bwait=108 add %mon_labo_select_no,6:stop:goto *monster_labo_story
if %bwait=109 add %mon_labo_select_no,7:stop:goto *monster_labo_story
if %bwait=110 add %mon_labo_select_no,8:stop:goto *monster_labo_story
if %bwait=111 add %mon_labo_select_no,9:stop:goto *monster_labo_story
if %bwait=112 add %mon_labo_select_no,10:stop:goto *monster_labo_story
if %bwait=113 add %mon_labo_select_no,11:stop:goto *monster_labo_story
if %bwait=114 add %mon_labo_select_no,12:stop:goto *monster_labo_story
if %bwait=115 add %mon_labo_select_no,13:stop:goto *monster_labo_story
if %bwait=116 add %mon_labo_select_no,14:stop:goto *monster_labo_story
if %bwait=117 add %mon_labo_select_no,15:stop:goto *monster_labo_story
if %bwait=118 add %mon_labo_select_no,16:stop:goto *monster_labo_story
if %bwait=119 add %mon_labo_select_no,17:stop:goto *monster_labo_story
if %bwait=120 add %mon_labo_select_no,18:stop:goto *monster_labo_story
if %bwait=121 add %mon_labo_select_no,19:stop:goto *monster_labo_story
if %bwait=122 add %mon_labo_select_no,20:stop:goto *monster_labo_story
if %bwait=123 add %mon_labo_select_no,21:stop:goto *monster_labo_story
if %bwait=124 add %mon_labo_select_no,22:stop:goto *monster_labo_story
if %bwait=125 add %mon_labo_select_no,23:stop:goto *monster_labo_story
if %bwait=126 add %mon_labo_select_no,24:stop:goto *monster_labo_story
if %bwait=127 add %mon_labo_select_no,25:stop:goto *monster_labo_story
if %bwait=99 sub %mon_labo_page_no,1:goto *monster_labo_listup
if %bwait=100 add %mon_labo_page_no,1:goto *monster_labo_listup
if %bwait=101 mov %mon_labo_on,0:screen_clear:prnumclear:bgm "bgm\zukan.ogg":return *extra
if %bwait=-1 mov %mon_labo_on,0:screen_clear:prnumclear:bgm "bgm\zukan.ogg":return *extra
if %bwait=-10 mov %mon_labo_on,0:screen_clear:prnumclear:bgm "bgm\zukan.ogg":return *extra
if %bwait=-11 mov %mon_labo_on,0:screen_clear:prnumclear:bgm "bgm\zukan.ogg":return *extra
goto *monster_labo_btn



*monster_labo_story

btndef clear:barclear:prnumclear:cspl 2,500:print 1
mov %manuoff,1
bg black,1
gosub *setwindow_01p
itoa $sub1,%mon_labo_select_no
getini $mon_labo_mon_folder,".\mod\list.ini","monster",$sub1
mov $sub1,".\mod\":add $sub1,$mon_labo_mon_folder:add $sub1,"\":mov $mon_labo_mon_folder,$sub1
mov $mon_labo_mon_ini,$mon_labo_mon_folder:add $mon_labo_mon_ini,"story.ini"
mov $mon_labo_mon_ini_sc,"story"
mov %mon_labo_mon_ini_ky,0
mov %mon_labo_var_flag,0
movl ?mon_labo_var,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
mov %opacity,255
mov $vstr1,""
goto *monster_labo_story_start



*monster_labo_story_start

if %mon_labo_mon_ini_ky>4999 goto *overflow
itoa $mon_labo_mon_ini_ky,%mon_labo_mon_ini_ky
getini $mon_labo_mon_ini_cmd,$mon_labo_mon_ini,$mon_labo_mon_ini_sc,$mon_labo_mon_ini_ky
if $mon_labo_mon_ini_cmd="" add %mon_labo_mon_ini_ky,1:goto *monster_labo_story_start
if $mon_labo_mon_ini_cmd="end" mov %manuoff,0:monocro off:goto *monster_labo
split $mon_labo_mon_ini_cmd,",",$sub1
if $sub1="name" gosub *mls_cmd_name:goto *mls_cmd_exit
if $sub1="skillname" gosub *mls_cmd_skillname:goto *mls_cmd_exit
if $sub1="bg" gosub *mls_cmd_bg:goto *mls_cmd_exit
if $sub1="sp" gosub *mls_cmd_sp:goto *mls_cmd_exit
if $sub1="sp_non_alpha" gosub *mls_cmd_sp_non_alpha:goto *mls_cmd_exit
if $sub1="sp_alpha" gosub *mls_cmd_sp_alpha:goto *mls_cmd_exit
if $sub1="sp_leftup" gosub *mls_cmd_sp_leftup:goto *mls_cmd_exit
if $sub1="sp_rightup" gosub *mls_cmd_sp_rightup:goto *mls_cmd_exit
if $sub1="sp_del" gosub *mls_cmd_sp_del:goto *mls_cmd_exit
if $sub1="sp_del_multi" gosub *mls_cmd_sp_del_multi:goto *mls_cmd_exit
if $sub1="face" && %battle=1 gosub *mls_cmd_face:goto *mls_cmd_exit
if $sub1="vsp" gosub *mls_cmd_vsp:goto *mls_cmd_exit
if $sub1="vsp_multi" gosub *mls_cmd_vsp_multi:goto *mls_cmd_exit
if $sub1="wait" gosub *mls_cmd_wait:goto *mls_cmd_exit
if $sub1="delay" gosub *mls_cmd_delay:goto *mls_cmd_exit
if $sub1="bgm" gosub *mls_cmd_bgm:goto *mls_cmd_exit
if $sub1="loopbgm" gosub *mls_cmd_loopbgm:goto *mls_cmd_exit
if $sub1="bgm_stop" gosub *mls_cmd_bgm_stop:goto *mls_cmd_exit
if $sub1="se" gosub *mls_cmd_se:goto *mls_cmd_exit
if $sub1="se_stop" gosub *mls_cmd_se_stop:goto *mls_cmd_exit
if $sub1="syasei" gosub *mls_cmd_syasei:goto *mls_cmd_exit
if $sub1="syasei_non_alpha" gosub *mls_cmd_syasei_non_alpha:goto *mls_cmd_exit
if $sub1="syasei_alpha" gosub *mls_cmd_syasei_alpha:goto *mls_cmd_exit
if $sub1="syasei_leftup" gosub *mls_cmd_syasei_leftup:goto *mls_cmd_exit
if $sub1="syasei_rightup" gosub *mls_cmd_syasei_rightup:goto *mls_cmd_exit
if $sub1="syasei2" gosub *mls_cmd_syasei2:goto *mls_cmd_exit
if $sub1="syasei_clear" gosub *mls_cmd_syasei_clear:goto *mls_cmd_exit
if $sub1="flash" gosub *mls_cmd_flash:goto *mls_cmd_exit
if $sub1="monocro_on" gosub *mls_cmd_monocro_on:goto *mls_cmd_exit
if $sub1="monocro_off" gosub *mls_cmd_monocro_off:goto *mls_cmd_exit
if $sub1="quake" gosub *mls_cmd_quake:goto *mls_cmd_exit
if $sub1="flushout" gosub *mls_cmd_flushout:goto *mls_cmd_exit
if $sub1="select" gosub *mls_cmd_select:goto *monster_labo_story_start
if $sub1="goto" gosub *mls_cmd_goto:goto *monster_labo_story_start
if $sub1="gotoline" gosub *mls_cmd_gotoline:goto *mls_cmd_exit
if $sub1="sp2" gosub *mls_cmd_sp2:goto *mls_cmd_exit
if $sub1="sp2_non_alpha" gosub *mls_cmd_sp2_non_alpha:goto *mls_cmd_exit
if $sub1="sp2_alpha" gosub *mls_cmd_sp2_alpha:goto *mls_cmd_exit
if $sub1="sp2_leftup" gosub *mls_cmd_sp2_leftup:goto *mls_cmd_exit
if $sub1="sp2_rightup" gosub *mls_cmd_sp2_rightup:goto *mls_cmd_exit
if $sub1="sp2_del" gosub *mls_cmd_sp_del2:goto *mls_cmd_exit
if $sub1="vsp2" gosub *mls_cmd_vsp2:goto *mls_cmd_exit
if $sub1="move" gosub *mls_cmd_move:goto *mls_cmd_exit
if $sub1="move_sp" gosub *mls_cmd_move_sp:goto *mls_cmd_exit
if $sub1="movie" gosub *mls_cmd_movie:goto *mls_cmd_exit
if $sub1="element" gosub *mls_cmd_element:goto *mls_cmd_exit
if $sub1="var_ld" gosub *mls_cmd_var_ld:goto *mls_cmd_exit
if $sub1="var_cal" gosub *mls_cmd_var_cal:goto *mls_cmd_exit
if $sub1="var_cpa" gosub *mls_cmd_var_cpa:goto *mls_cmd_exit
if $sub1="var_out" gosub *mls_cmd_var_out:goto *mls_cmd_exit
if $sub1="var_out2" gosub *mls_cmd_var_out2:goto *mls_cmd_exit
if $sub1="var_jump" gosub *mls_cmd_var_jump:goto *mls_cmd_exit
if $sub1="var_jumpline" gosub *mls_cmd_var_jumpline:goto *mls_cmd_exit
if $sub1="var_dice" gosub *mls_cmd_var_dice:goto *mls_cmd_exit
if $sub1="var_dice2" gosub *mls_cmd_var_dice2:goto *mls_cmd_exit
if $sub1="var_90110" gosub *mls_cmd_var_90110:goto *mls_cmd_exit
if $sub1="var_damage" gosub *mls_cmd_var_damage:goto *mls_cmd_exit
if $sub1="var_damage2" gosub *mls_cmd_var_damage2:goto *mls_cmd_exit
if $sub1="damage" gosub *mls_cmd_damage:goto *mls_cmd_exit
if $sub1="kaihuku" gosub *mls_cmd_kaihuku:goto *mls_cmd_exit
if $sub1="enemylife" gosub *mls_cmd_enemylife:goto *mls_cmd_exit
if $sub1="enemykaihuku" gosub *mls_cmd_enemykaihuku:goto *mls_cmd_exit
if $sub1="change" gosub *mls_cmd_change:goto *mls_cmd_exit
if $sub1="strsp" gosub *mls_cmd_strsp:goto *mls_cmd_exit
if $sub1="cls" textclear:goto *mls_cmd_exit
if $sub1="cls_text" textclear:goto *mls_cmd_exit
if $sub1="hide_text" textoff:goto *mls_cmd_exit
if $sub1="show_text" texton:goto *mls_cmd_exit
if $sub1="win2_set" gosub *mls_cmd_window:goto *mls_cmd_exit
if $sub1="win_set" gosub *mls_cmd_window2:goto *mls_cmd_exit
if $sub1="win2_del" gosub *mls_cmd_window_del:goto *mls_cmd_exit
if $sub1="win_del" gosub *mls_cmd_window_del2:goto *mls_cmd_exit
if $sub1="restart" goto *mls_cmd_restart
if $sub1="anten" gosub *mls_cmd_anten:goto *mls_cmd_exit
if $sub1="overkill_end" goto *mls_cmd_overkill_end
if $sub1="spbtn" gosub *mls_cmd_spbtn:goto *mls_cmd_exit
if $sub1="battle" gosub *mls_cmd_battle:goto *monster_labo_story_start
if $sub1="battle_st" goto *mls_cmd_battle_start
goto *mon_labo_string



*mon_labo_string

if $mon_labo_mon_ini_cmd="" goto *mls_cmd_exit
len %name_count,$mon_labo_mon_ini_cmd
mid $sel1,$mon_labo_mon_ini_cmd,%name_count-1,1
if $sel1=" " | $sel1="" mid $mon_labo_mon_ini_cmd,$mon_labo_mon_ini_cmd,0,%name_count-1:sub %name_count,1:goto *mon_labo_string
if $sel1="@" mid $mon_labo_mon_ini_cmd,$mon_labo_mon_ini_cmd,0,%name_count-1:sub %name_count,1:goto *mon_labo_string_wait
if $sel1="~" mid $mon_labo_mon_ini_cmd,$mon_labo_mon_ini_cmd,0,%name_count-1:sub %name_count,1:goto *mon_labo_string_new
if $sel1="/" mid $mon_labo_mon_ini_cmd,$mon_labo_mon_ini_cmd,0,%name_count-1:sub %name_count,1:goto *mon_labo_string_end
if $sel1="\" mid $mon_labo_mon_ini_cmd,$mon_labo_mon_ini_cmd,0,%name_count-1:sub %name_count,1
eng $mon_labo_mon_ini_cmd:$sel6\
goto *mls_cmd_exit



*mon_labo_string_wait

eng $mon_labo_mon_ini_cmd:$sel6@
goto *mls_cmd_exit



*mon_labo_string_new

eng $mon_labo_mon_ini_cmd:$sel6
goto *mls_cmd_exit



*mon_labo_string_end

mid $sel1,$mon_labo_mon_ini_cmd,%name_count-1,1
if $sel1<>"@" skip 4
mid $mon_labo_mon_ini_cmd,$mon_labo_mon_ini_cmd,0,%name_count-1
eng $mon_labo_mon_ini_cmd:$sel6@/
skip 2
eng $mon_labo_mon_ini_cmd:$sel6/
goto *mls_cmd_exit



*mls_cmd_exit

add %mon_labo_mon_ini_ky,1
goto *monster_labo_story_start



*check_custom_dialog

mov $sel2,""
if $sel1="" | $sel1=" " return
len %name_count,$sel1:if %name_count<2 return
mid $sel2,$sel1,0,1:if $sel2<>"!" return
mid $sel2,$sel1,0,2:if $sel2="!!" mid $sel1,$sel1,1,%name_count-1:return
mov $sel2,"custom":mid $sel1,$sel1,1,%name_count-1
mid $sel3,$sel1,%name_count-2,1:if $sel3=" " mid $sel1,$sel1,0,%name_count-2
return



*custom_dialog_start

add %stack,1
mov $mon_labo_mon_ini_sc,$sel1
mov %mon_labo_mon_ini_ky,0
mov %anno_mode,1
sub %stack,1
goto *custom_dialog



*custom_dialog

add %stack,1
if %mon_labo_mon_ini_ky>4999 goto *overflow
itoa $mon_labo_mon_ini_ky,%mon_labo_mon_ini_ky
getini $mon_labo_mon_ini_cmd,$mon_labo_mon_ini,$mon_labo_mon_ini_sc,$mon_labo_mon_ini_ky
if $mon_labo_mon_ini_cmd="" add %mon_labo_mon_ini_ky,1:sub %stack,1:goto *custom_dialog
if $mon_labo_mon_ini_cmd="end" sub %stack,1:return
split $mon_labo_mon_ini_cmd,",",$sub1
if $sub1="name" gosub *mls_cmd_name:goto *custom_dialog_end
if $sub1="skillname" gosub *mls_cmd_skillname:goto *custom_dialog_end
if $sub1="bg" gosub *mls_cmd_bg:goto *custom_dialog_end
if $sub1="sp" gosub *mls_cmd_sp:goto *custom_dialog_end
if $sub1="sp_non_alpha" gosub *mls_cmd_sp_non_alpha:goto *custom_dialog_end
if $sub1="sp_alpha" gosub *mls_cmd_sp_alpha:goto *custom_dialog_end
if $sub1="sp_leftup" gosub *mls_cmd_sp_leftup:goto *custom_dialog_end
if $sub1="sp_rightup" gosub *mls_cmd_sp_rightup:goto *custom_dialog_end
if $sub1="sp_del" gosub *mls_cmd_sp_del:goto *custom_dialog_end
if $sub1="sp_del_multi" gosub *mls_cmd_sp_del_multi:goto *custom_dialog_end
if $sub1="face" && %battle=1 gosub *mls_cmd_face:goto *custom_dialog_end
if $sub1="vsp" gosub *mls_cmd_vsp:goto *custom_dialog_end
if $sub1="vsp_multi" gosub *mls_cmd_vsp_multi:goto *custom_dialog_end
if $sub1="wait" gosub *mls_cmd_wait:goto *custom_dialog_end
if $sub1="delay" gosub *mls_cmd_delay:goto *custom_dialog_end
if $sub1="bgm" gosub *mls_cmd_bgm:goto *custom_dialog_end
if $sub1="loopbgm" gosub *mls_cmd_loopbgm:goto *custom_dialog_end
if $sub1="bgm_stop" gosub *mls_cmd_bgm_stop:goto *custom_dialog_end
if $sub1="se" gosub *mls_cmd_se:goto *custom_dialog_end
if $sub1="se_stop" gosub *mls_cmd_se_stop:goto *custom_dialog_end
if $sub1="syasei" gosub *mls_cmd_syasei:goto *custom_dialog_end
if $sub1="syasei_non_alpha" gosub *mls_cmd_syasei_non_alpha:goto *custom_dialog_end
if $sub1="syasei_alpha" gosub *mls_cmd_syasei_alpha:goto *custom_dialog_end
if $sub1="syasei_leftup" gosub *mls_cmd_syasei_leftup:goto *custom_dialog_end
if $sub1="syasei_rightup" gosub *mls_cmd_syasei_rightup:goto *custom_dialog_end
if $sub1="syasei2" gosub *mls_cmd_syasei2:goto *custom_dialog_end
if $sub1="syasei_clear" gosub *mls_cmd_syasei_clear:goto *custom_dialog_end
if $sub1="flash" gosub *mls_cmd_flash:goto *custom_dialog_end
if $sub1="monocro_on" gosub *mls_cmd_monocro_on:goto *custom_dialog_end
if $sub1="monocro_off" gosub *mls_cmd_monocro_off:goto *custom_dialog_end
if $sub1="quake" gosub *mls_cmd_quake:goto *custom_dialog_end
if $sub1="flushout" gosub *mls_cmd_flushout:goto *custom_dialog_end
if $sub1="select" gosub *mls_cmd_select:sub %stack,1:goto *custom_dialog
if $sub1="goto" gosub *mls_cmd_goto:sub %stack,1:goto *custom_dialog
if $sub1="gotoline" gosub *mls_cmd_gotoline:goto *custom_dialog_end
if $sub1="sp2" gosub *mls_cmd_sp2:goto *custom_dialog_end
if $sub1="sp2_non_alpha" gosub *mls_cmd_sp2_non_alpha:goto *custom_dialog_end
if $sub1="sp2_alpha" gosub *mls_cmd_sp2_alpha:goto *custom_dialog_end
if $sub1="sp2_leftup" gosub *mls_cmd_sp2_leftup:goto *custom_dialog_end
if $sub1="sp2_rightup" gosub *mls_cmd_sp2_rightup:goto *custom_dialog_end
if $sub1="sp2_del" gosub *mls_cmd_sp_del2:goto *custom_dialog_end
if $sub1="vsp2" gosub *mls_cmd_vsp2:goto *custom_dialog_end
if $sub1="move" gosub *mls_cmd_move:goto *custom_dialog_end
if $sub1="move_sp" gosub *mls_cmd_move_sp:goto *custom_dialog_end
if $sub1="movie" gosub *mls_cmd_movie:goto *custom_dialog_end
if $sub1="element" gosub *mls_cmd_element:goto *custom_dialog_end
if $sub1="var_ld" gosub *mls_cmd_var_ld:goto *custom_dialog_end
if $sub1="var_cal" gosub *mls_cmd_var_cal:goto *custom_dialog_end
if $sub1="var_cpa" gosub *mls_cmd_var_cpa:goto *custom_dialog_end
if $sub1="var_out" gosub *mls_cmd_var_out:goto *custom_dialog_end
if $sub1="var_out2" gosub *mls_cmd_var_out2:goto *custom_dialog_end
if $sub1="var_jump" gosub *mls_cmd_var_jump:goto *custom_dialog_end
if $sub1="var_jumpline" gosub *mls_cmd_var_jumpline:goto *custom_dialog_end
if $sub1="var_dice" gosub *mls_cmd_var_dice:goto *custom_dialog_end
if $sub1="var_dice2" gosub *mls_cmd_var_dice2:goto *custom_dialog_end
if $sub1="var_90110" gosub *mls_cmd_var_90110:goto *custom_dialog_end
if $sub1="var_damage" gosub *mls_cmd_var_damage:goto *custom_dialog_end
if $sub1="var_damage2" gosub *mls_cmd_var_damage2:goto *custom_dialog_end
if $sub1="damage" gosub *mls_cmd_damage:goto *custom_dialog_end
if $sub1="kaihuku" gosub *mls_cmd_kaihuku:goto *custom_dialog_end
if $sub1="enemylife" gosub *mls_cmd_enemylife:goto *custom_dialog_end
if $sub1="enemykaihuku" gosub *mls_cmd_enemykaihuku:goto *custom_dialog_end
if $sub1="change" gosub *mls_cmd_change:goto *custom_dialog_end
if $sub1="strsp" gosub *mls_cmd_strsp:goto *custom_dialog_end
if $sub1="cls" textclear:goto *custom_dialog_end
if $sub1="cls_text" textclear:goto *custom_dialog_end
if $sub1="hide_text" textoff:goto *custom_dialog_end
if $sub1="show_text" texton:goto *custom_dialog_end
if $sub1="first" gosub *cd_cmd_first:goto *custom_dialog_end
if $sub1="second" gosub *cd_cmd_second:goto *custom_dialog_end
if $sub1="jumpfirst" gosub *cd_cmd_jumpfirst:goto *custom_dialog_end
if $sub1="jumpfirstline" gosub *cd_cmd_jumpfirstline:goto *custom_dialog_end
if $sub1="commonattack" && %allcommandsenable=1 gosub *common_attack1:goto *custom_dialog_end
if $sub1="commonattack" && %allcommandsenable=2 gosub *common_attack1:goto *custom_dialog_end
if $sub1="commonattack1" && %allcommandsenable=1 gosub *common_attack2:goto *custom_dialog_end
if $sub1="commonattack1" && %allcommandsenable=2 gosub *common_attack2:goto *custom_dialog_end
if $sub1="list1" && %allcommandsenable=2 goto *cd_cmd_list
if $sub1="commonskill" && %allcommandsenable=3 gosub *common_skill1:goto *custom_dialog_end
if $sub1="commonskill1" && %allcommandsenable=3 gosub *common_skill2:goto *custom_dialog_end
if $sub1="execute" && %allcommandsenable>0 && %allcommandsenable<5 goto *cd_cmd_execute
goto *custom_dialog_string



*custom_dialog_string

if $mon_labo_mon_ini_cmd="" goto *custom_dialog_end
len %name_count,$mon_labo_mon_ini_cmd
mid $sel1,$mon_labo_mon_ini_cmd,%name_count-1,1
if $sel1=" " mid $mon_labo_mon_ini_cmd,$mon_labo_mon_ini_cmd,0,%name_count-1:sub %name_count,1:goto *custom_dialog_string
if $sel1="@" mid $mon_labo_mon_ini_cmd,$mon_labo_mon_ini_cmd,0,%name_count-1:sub %name_count,1:goto *custom_dialog_string_wait
if $sel1="~" mid $mon_labo_mon_ini_cmd,$mon_labo_mon_ini_cmd,0,%name_count-1:sub %name_count,1:goto *custom_dialog_string_new
if $sel1="/" mid $mon_labo_mon_ini_cmd,$mon_labo_mon_ini_cmd,0,%name_count-1:sub %name_count,1:goto *custom_dialog_string_end
if $sel1="\" mid $mon_labo_mon_ini_cmd,$mon_labo_mon_ini_cmd,0,%name_count-1:sub %name_count,1
mov %anno_mode,1
eng $mon_labo_mon_ini_cmd:$sel6\
goto *custom_dialog_end



*custom_dialog_string_wait

mov %anno_mode,1
eng $mon_labo_mon_ini_cmd:$sel6@
goto *custom_dialog_end



*custom_dialog_string_new

mov %anno_mode,1
eng $mon_labo_mon_ini_cmd:$sel6
goto *custom_dialog_end



*custom_dialog_string_end

mov %anno_mode,0
mid $sel1,$mon_labo_mon_ini_cmd,%name_count-1,1
if $sel1<>"@" skip 4
mid $mon_labo_mon_ini_cmd,$mon_labo_mon_ini_cmd,0,%name_count-1
eng $mon_labo_mon_ini_cmd:$sel6@/
skip 2
eng $mon_labo_mon_ini_cmd:$sel6/
goto *custom_dialog_end



*custom_dialog_end

add %mon_labo_mon_ini_ky,1
sub %stack,1
goto *custom_dialog



*check_dir1

len %teigi1,$sub1
mid $teigi1,$sub1,0,1
if $teigi1="\" mov $teigi1,"":mid $sub1,$sub1,1,%teigi1-1:return
if $teigi1<>"." mov $teigi1,$mon_labo_mon_folder:return
itoa $teigi1,%mon_labo_select_no
getini $teigi1,".\mod\list.ini","monster",$teigi1
mov $teigi1,"mod\"+$teigi1+"\"
mid $sub1,$sub1,1,%teigi1-1
return



*check_dir2

len %teigi1,$sub2
mid $teigi1,$sub2,0,1
if $teigi1="\" mov $teigi1,"":mid $sub2,$sub2,1,%teigi1-1:return
if $teigi1<>"." mov $teigi1,$mon_labo_mon_folder:return
itoa $teigi1,%mon_labo_select_no
getini $teigi1,".\mod\list.ini","monster",$teigi1
mov $teigi1,"mod\"+$teigi1+"\"
mid $sub2,$sub2,1,%teigi1-1
return



*check_dir3

len %teigi1,$sub3
mid $teigi1,$sub3,0,1
if $teigi1="\" mov $teigi1,"":mid $sub3,$sub3,1,%teigi1-1:return
if $teigi1<>"." mov $teigi1,$mon_labo_mon_folder:return
itoa $teigi1,%mon_labo_select_no
getini $teigi1,".\mod\list.ini","monster",$teigi1
mov $teigi1,"mod\"+$teigi1+"\"
mid $sub3,$sub3,1,%teigi1-1
return



*check_var2

mov %52,-1
if $sub2="v0" mov %52,0
if $sub2="v1" mov %52,1
if $sub2="v2" mov %52,2
if $sub2="v3" mov %52,3
if $sub2="v4" mov %52,4
if $sub2="v5" mov %52,5
if $sub2="v6" mov %52,6
if $sub2="v7" mov %52,7
if $sub2="v8" mov %52,8
if $sub2="v9" mov %52,9
if $sub2="v10" mov %52,10
if $sub2="v11" mov %52,11
if $sub2="v12" mov %52,12
if $sub2="v13" mov %52,13
if $sub2="v14" mov %52,14
if $sub2="v15" mov %52,15
if $sub2="v16" mov %52,16
if $sub2="v17" mov %52,17
if $sub2="v18" mov %52,18
if $sub2="v19" mov %52,19
if %52=-1 atoi %sub2,$sub2
if %52>=0 mov %sub2,?mon_labo_var[%52]
return



*check_var3

mov %52,-1
if $sub3="v0" mov %52,0
if $sub3="v1" mov %52,1
if $sub3="v2" mov %52,2
if $sub3="v3" mov %52,3
if $sub3="v4" mov %52,4
if $sub3="v5" mov %52,5
if $sub3="v6" mov %52,6
if $sub3="v7" mov %52,7
if $sub3="v8" mov %52,8
if $sub3="v9" mov %52,9
if $sub3="v10" mov %52,10
if $sub3="v11" mov %52,11
if $sub3="v12" mov %52,12
if $sub3="v13" mov %52,13
if $sub3="v14" mov %52,14
if $sub3="v15" mov %52,15
if $sub3="v16" mov %52,16
if $sub3="v17" mov %52,17
if $sub3="v18" mov %52,18
if $sub3="v19" mov %52,19
if %52=-1 atoi %sub3,$sub3
if %52>=0 mov %sub3,?mon_labo_var[%52]
return



*check_var4

mov %52,-1
if $sub4="v0" mov %52,0
if $sub4="v1" mov %52,1
if $sub4="v2" mov %52,2
if $sub4="v3" mov %52,3
if $sub4="v4" mov %52,4
if $sub4="v5" mov %52,5
if $sub4="v6" mov %52,6
if $sub4="v7" mov %52,7
if $sub4="v8" mov %52,8
if $sub4="v9" mov %52,9
if $sub4="v10" mov %52,10
if $sub4="v11" mov %52,11
if $sub4="v12" mov %52,12
if $sub4="v13" mov %52,13
if $sub4="v14" mov %52,14
if $sub4="v15" mov %52,15
if $sub4="v16" mov %52,16
if $sub4="v17" mov %52,17
if $sub4="v18" mov %52,18
if $sub4="v19" mov %52,19
if %52=-1 atoi %sub4,$sub4
if %52>=0 mov %sub4,?mon_labo_var[%52]
return



*check_var8

mov %52,-1
if $sub8="v0" mov %52,0
if $sub8="v1" mov %52,1
if $sub8="v2" mov %52,2
if $sub8="v3" mov %52,3
if $sub8="v4" mov %52,4
if $sub8="v5" mov %52,5
if $sub8="v6" mov %52,6
if $sub8="v7" mov %52,7
if $sub8="v8" mov %52,8
if $sub8="v9" mov %52,9
if $sub8="v10" mov %52,10
if $sub8="v11" mov %52,11
if $sub8="v12" mov %52,12
if $sub8="v13" mov %52,13
if $sub8="v14" mov %52,14
if $sub8="v15" mov %52,15
if $sub8="v16" mov %52,16
if $sub8="v17" mov %52,17
if $sub8="v18" mov %52,18
if $sub8="v19" mov %52,19
if %52=-1 atoi %sub8,$sub8
if %52>=0 mov %sub8,?mon_labo_var[%52]
return



*mls_cmd_name

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2
len %name_count,$sub2
mid $sub6,$sub2,%name_count-1,1
if $sub6=" " mid $sub2,$sub2,0,%name_count-1
nobel $sub2
name $sel6
return



*mls_cmd_skillname

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2
len %name_count,$sub2
mid $sub6,$sub2,%name_count-1,1
if $sub6=" " mid $sub2,$sub2,0,%name_count-1
nobel $sub2
skillname $sel6
return



*mls_cmd_bg

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4,$sub7
atoi %sub3,$sub3
atoi %sub4,$sub4
if $sub2="vstr1" mov $sub2,$vstr1
gosub *check_dir2
split $sub2,".",$sub5,$sub6
if %sub3=1 goto *mls_cmd_bg_effect_1
if %sub3=99 goto *mls_cmd_bg_effect_99
if %sub3=15 | %sub3=18 goto *mls_cmd_bg_effect_1518
if $sub6="bmp" | $sub6="jpg" | $sub6="png" bg $teigi1+$sub2,%sub3,%sub4:return
if $sub2="white" bg white,%sub3,%sub4:return
if $sub2="black" bg black,%sub3,%sub4:return
split $sub2,"#",$sub5,$sub6
if $sub5="" bg $sub2,%sub3,%sub4:return
mov $sub5,"bg\"
add $sub5,$sub2
add $sub5,".bmp"
bg $sub5,%sub3,%sub4
return



*mls_cmd_bg_effect_1

if $sub6="bmp" | $sub6="jpg" | $sub6="png" bg $teigi1+$sub2,1:return
if $sub2="white" bg white,1:return
if $sub2="black" bg black,1:return
split $sub2,"#",$sub5,$sub6
if $sub5="" bg $sub2,1:return
mov $sub5,"bg\"
add $sub5,$sub2
add $sub5,".bmp"
bg $sub5,1
return



*mls_cmd_bg_effect_99

if $sub7="1" mov $sub7,"system\breakup.dll/urb":skip 4
if $sub7="2" mov $sub7,"system\breakup.dll/lrB":skip 3
if $sub7="3" mov $sub7,"system\lngtwave.dll/vwi":skip 2
if $sub7="4" mov $sub7,"system\trvswave.dll/h"
if $sub6="bmp" | $sub6="jpg" | $sub6="png" bg $teigi1+$sub2,99,%sub4,$sub7:return
if $sub2="white" bg white,99,%sub4,$sub7:return
if $sub2="black" bg black,99,%sub4,$sub7:return
split $sub2,"#",$sub5,$sub6
if $sub5="" bg $sub2,99,%sub4,$sub7:return
mov $sub5,"bg\"
add $sub5,$sub2
add $sub5,".bmp"
bg $sub5,99,%sub4,$sub7
return



*mls_cmd_bg_effect_1518

if $sub6="bmp" | $sub6="jpg" | $sub6="png" bg $teigi1+$sub2,%sub3,%sub4,$sub7:return
if $sub2="white" bg white,%sub3,%sub4,$sub7:return
if $sub2="black" bg black,%sub3,%sub4,$sub7:return
split $sub2,"#",$sub5,$sub6
if $sub5="" bg $sub2,%sub3,%sub4,$sub7:return
mov $sub5,"bg\"
add $sub5,$sub2
add $sub5,".bmp"
bg $sub5,%sub3,%sub4,$sub7
return



*mls_cmd_sp

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4,$sub5,$sub6,$sub7,$sub10
atoi %sub2,$sub2:add %sub2,700
atoi %sub4,$sub4
atoi %sub5,$sub5
atoi %sub6,$sub6
atoi %sub7,$sub7
if $sub3="vstr1" mov $sub3,$vstr1
gosub *check_dir3
split $sub3,".",$sub8,$sub9
if $sub9="bmp" | $sub9="jpg" | $sub9="png" mov $sub1,$teigi1:add $sub1,$sub3:goto *mls_cmd_sp_show
mov $sub1,":a;chara\":add $sub1,$sub3:add $sub1,".bmp"
goto *mls_cmd_sp_show



*mls_cmd_sp_non_alpha

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4,$sub5,$sub6,$sub7,$sub10
if $sub6="" && $sub7="" && $sub10="" goto *mls_cmd_sp_non_alpha_compatibility
atoi %sub2,$sub2:add %sub2,700
atoi %sub4,$sub4
atoi %sub5,$sub5
atoi %sub6,$sub6
atoi %sub7,$sub7
if $sub3="vstr1" mov $sub3,$vstr1
gosub *check_dir3
split $sub3,".",$sub8,$sub9
if $sub9="bmp" | $sub9="jpg" | $sub9="png" mov $sub1,":c;"+$teigi1:add $sub1,$sub3:goto *mls_cmd_sp_show
mov $sub1,":c;chara\":add $sub1,$sub3:add $sub1,".bmp"
goto *mls_cmd_sp_show



*mls_cmd_sp_non_alpha_compatibility

mov $sub10,$sub6
atoi %sub2,$sub2:add %sub2,700
atoi %sub6,$sub4
atoi %sub7,$sub5
mov %sub4,0
mov %sub5,0
if $sub3="vstr1" mov $sub3,$vstr1
gosub *check_dir3
split $sub3,".",$sub8,$sub9
if $sub9="bmp" | $sub9="jpg" | $sub9="png" mov $sub1,$teigi1:add $sub1,$sub3:goto *mls_cmd_sp_show
mov $sub1,":c;chara\":add $sub1,$sub3:add $sub1,".bmp"
goto *mls_cmd_sp_show



*mls_cmd_sp_alpha

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4,$sub5,$sub6,$sub7,$sub10
atoi %sub2,$sub2:add %sub2,700
atoi %sub4,$sub4
atoi %sub5,$sub5
atoi %sub6,$sub6
atoi %sub7,$sub7
if $sub3="vstr1" mov $sub3,$vstr1
gosub *check_dir3
split $sub3,".",$sub8,$sub9
if $sub9="bmp" | $sub9="jpg" | $sub9="png" mov $sub1,":a;"+$teigi1:add $sub1,$sub3:goto *mls_cmd_sp_show
mov $sub1,":a;chara\":add $sub1,$sub3:add $sub1,".bmp"
goto *mls_cmd_sp_show



*mls_cmd_sp_leftup

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4,$sub5,$sub6,$sub7,$sub10
atoi %sub2,$sub2:add %sub2,700
atoi %sub4,$sub4
atoi %sub5,$sub5
atoi %sub6,$sub6
atoi %sub7,$sub7
if $sub3="vstr1" mov $sub3,$vstr1
gosub *check_dir3
split $sub3,".",$sub8,$sub9
if $sub9="bmp" | $sub9="jpg" | $sub9="png" mov $sub1,":l;"+$teigi1:add $sub1,$sub3:goto *mls_cmd_sp_show
mov $sub1,":l;chara\":add $sub1,$sub3:add $sub1,".bmp"
goto *mls_cmd_sp_show



*mls_cmd_sp_rightup

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4,$sub5,$sub6,$sub7,$sub10
atoi %sub2,$sub2:add %sub2,700
atoi %sub4,$sub4
atoi %sub5,$sub5
atoi %sub6,$sub6
atoi %sub7,$sub7
if $sub3="vstr1" mov $sub3,$vstr1
gosub *check_dir3
split $sub3,".",$sub8,$sub9
if $sub9="bmp" | $sub9="jpg" | $sub9="png" mov $sub1,":r;"+$teigi1:add $sub1,$sub3:goto *mls_cmd_sp_show
mov $sub1,":r;chara\":add $sub1,$sub3:add $sub1,".bmp"
goto *mls_cmd_sp_show



*mls_cmd_sp_show

lsp %sub2,$sub1,%sub4,%sub5,%opacity:mov %opacity,255
if %sub6=0 return
if %sub6=1 print 1:return
if %sub6=15 | %sub6=18 print %sub6,%sub7,$sub10:return
if %sub6<>99 print %sub6,%sub7:return
if $sub10="1" mov $sub10,"system\breakup.dll/urb":skip 4
if $sub10="2" mov $sub10,"system\breakup.dll/lrB":skip 3
if $sub10="3" mov $sub10,"system\lngtwave.dll/vwi":skip 2
if $sub10="4" mov $sub10,"system\trvswave.dll/h"
print 99,%sub7,$sub10
return



*mls_cmd_sp_del

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4,$sub5
atoi %sub2,$sub2:add %sub2,700
atoi %sub3,$sub3
atoi %sub4,$sub4
csp %sub2
if %sub3=0 return
if %sub3=1 print 1:return
if %sub3=15 | %sub3=18 print %sub3,%sub4,$sub5:return
if %sub3<>99 print %sub3,%sub4:return
if $sub5="1" mov $sub5,"system\breakup.dll/urb"
if $sub5="2" mov $sub5,"system\breakup.dll/lrB"
if $sub5="3" mov $sub5,"system\lngtwave.dll/vwi"
if $sub5="4" mov $sub5,"system\trvswave.dll/h"
print 99,%sub4,$sub5
return



*mls_cmd_sp_del_multi

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4,$sub5,$sub6
atoi %sub2,$sub2:add %sub2,700
atoi %sub3,$sub3:add %sub3,700
atoi %sub4,$sub4
atoi %sub5,$sub5
cspl %sub2,%sub3
if %sub4=0 return
if %sub4=1 print 1:return
if %sub4=15 | %sub3=18 print %sub4,%sub5,$sub6:return
if %sub4<>99 print %sub4,%sub5:return
if $sub6="1" mov $sub6,"system\breakup.dll/urb"
if $sub6="2" mov $sub6,"system\breakup.dll/lrB"
if $sub6="3" mov $sub6,"system\lngtwave.dll/vwi"
if $sub6="4" mov $sub6,"system\trvswave.dll/h"
print 99,%sub5,$sub6
return



*mls_cmd_face

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4,$sub5
atoi %sub2,$sub2
if $sub3<>"" skip 5
if %sub2=1 gosub *face1:return
if %sub2=2 gosub *face2:return
if %sub2=3 gosub *face3:return
return
atoi %sub3,$sub3
atoi %sub4,$sub4
if %sub2=1 gosub *face1n:skip 3
if %sub2=2 gosub *face2n:skip 2
if %sub2=3 gosub *face3n
if %sub3=0 return
if %sub3=1 print 1:return
if %sub3=15 | %sub3=18 print %sub3,%sub4,$sub5:return
if %sub3<>99 print %sub3,%sub4:return
if $sub5="1" mov $sub5,"system\breakup.dll/urb":skip 4
if $sub5="2" mov $sub5,"system\breakup.dll/lrB":skip 3
if $sub5="3" mov $sub5,"system\lngtwave.dll/vwi":skip 2
if $sub5="4" mov $sub5,"system\trvswave.dll/h"
print 99,%sub4,$sub5
return



*mls_cmd_vsp

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub6,$sub3,$sub4,$sub5
atoi %sub2,$sub2:add %sub2,700
atoi %sub3,$sub3
atoi %sub4,$sub4
atoi %sub6,$sub6
if %sub6=0 vsp %sub2,0:skip 2
if %sub6=1 vsp %sub2,1
if %sub3=0 return
if %sub3=1 print 1:return
if %sub3=15 | %sub3=18 print %sub3,%sub4,$sub5:return
if %sub3<>99 print %sub3,%sub4:return
if $sub5="1" mov $sub5,"system\breakup.dll/urb"
if $sub5="2" mov $sub5,"system\breakup.dll/lrB"
if $sub5="3" mov $sub5,"system\lngtwave.dll/vwi"
if $sub5="4" mov $sub5,"system\trvswave.dll/h"
print 99,%sub4,$sub5
return



*mls_cmd_vsp_multi

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub7,$sub6,$sub3,$sub4,$sub5
atoi %sub2,$sub2:add %sub2,700
atoi %sub7,$sub7:add %sub7,700
atoi %sub3,$sub3
atoi %sub4,$sub4
atoi %sub6,$sub6
if %sub6=0 vspl %sub2,%sub7,0:skip 2
if %sub6=1 vspl %sub2,%sub7,1
if %sub3=0 return
if %sub3=1 print 1:return
if %sub3=15 | %sub3=18 print %sub3,%sub4,$sub5:return
if %sub3<>99 print %sub3,%sub4:return
if $sub5="1" mov $sub5,"system\breakup.dll/urb"
if $sub5="2" mov $sub5,"system\breakup.dll/lrB"
if $sub5="3" mov $sub5,"system\lngtwave.dll/vwi"
if $sub5="4" mov $sub5,"system\trvswave.dll/h"
print 99,%sub4,$sub5
return



*mls_cmd_wait

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2
gosub *check_var2
wait %sub2
return



*mls_cmd_delay

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2
gosub *check_var2
delay %sub2
return



*mls_cmd_bgm

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2
if $sub2="vstr1" mov $sub2,$vstr1
gosub *check_dir2
split $sub2,".",$sub3,$sub4
if $sub4="wav" mov $sub1,$teigi1:add $sub1,$sub2:waveloop $sub1:return
if $sub4="ogg" mov $sub1,$teigi1:add $sub1,$sub2:bgm $sub1:return
if $sub4="mp3" mov $sub1,$teigi1:add $sub1,$sub2:mp3loop $sub1:return
if $sub2="ero1" mov %music,20
mov $sub1,"bgm\":add $sub1,$sub2:add $sub1,".ogg"
loopbgmstop
bgm $sub1
return



*mls_cmd_loopbgm

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3
if $sub2="vstr1" mov $sub2,$vstr1
if $sub3="vstr1" mov $sub3,$vstr1
gosub *check_dir2
split $sub2,".",$sub1,$sub4
if $sub4<>"wav" && $sub4<>"ogg" && $sub4<>"mp3" mov $sub2,"bgm\"+$sub2+".ogg":skip 4
mov $sub1,$teigi1
add $sub1,$sub2
mov $sub2,$sub1
eng $sub2:$sel6\
gosub *check_dir3
split $sub3,".",$sub1,$sub4
if $sub4<>"wav" && $sub4<>"ogg" && $sub4<>"mp3" mov $sub3,"bgm\"+$sub3+".ogg":skip 4
mov $sub1,$teigi1
add $sub1,$sub3
mov $sub3,$sub1
eng $sub3:$sel6\
bgmstop
loopbgm $sub2,$sub3
return



*mls_cmd_bgm_stop

bgmstop
loopbgmstop
wavestop
return



*mls_cmd_se

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4
gosub *check_var2
if $sub3="vstr1" mov $sub3,$vstr1
gosub *check_dir3
split $sub3,".",$sub5,$sub6
if $sub4="loop" goto *mls_cmd_se_loop
if $sub6="wav" mov $sub1,$teigi1:add $sub1,$sub3:dwave %sub2,$sub1:return
if $sub6="ogg" mov $sub1,$teigi1:add $sub1,$sub3:dwave %sub2,$sub1:return
mov $sub1,"se\":add $sub1,$sub3:add $sub1,".ogg"
dwave %sub2,$sub1
return



*mls_cmd_se_loop

if $sub6="wav" mov $sub1,$teigi1:add $sub1,$sub3:dwaveloop %sub2,$sub1:return
if $sub6="ogg" mov $sub1,$teigi1:add $sub1,$sub3:dwaveloop %sub2,$sub1:return
mov $sub1,"se\":add $sub1,$sub3:add $sub1,".ogg"
dwaveloop %sub2,$sub1
return



*mls_cmd_se_stop

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2
gosub *check_var2
dwavestop %sub2
return



*mls_cmd_syasei

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4,$sub5
atoi %sub2,$sub2:add %sub2,700
atoi %sub4,$sub4
atoi %sub5,$sub5
if $sub3="vstr1" mov $sub3,$vstr1
gosub *check_dir3
split $sub3,".",$sub8,$sub9
if $sub9="bmp" | $sub9="jpg" | $sub9="png" mov $sub1,$teigi1:add $sub1,$sub3:goto *mls_cmd_syasei_show
mov $sub1,":a;chara\":add $sub1,$sub3:add $sub1,".bmp"
goto *mls_cmd_syasei_show



*mls_cmd_syasei_non_alpha

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4,$sub5
atoi %sub2,$sub2:add %sub2,700
atoi %sub4,$sub4
atoi %sub5,$sub5
if $sub3="vstr1" mov $sub3,$vstr1
gosub *check_dir3
split $sub3,".",$sub8,$sub9
if $sub9="bmp" | $sub9="jpg" | $sub9="png" mov $sub1,":c;"+$teigi1:add $sub1,$sub3:goto *mls_cmd_syasei_show
mov $sub1,":c;chara\":add $sub1,$sub3:add $sub1,".bmp"
goto *mls_cmd_syasei_show



*mls_cmd_syasei_alpha

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4,$sub5
atoi %sub2,$sub2:add %sub2,700
atoi %sub4,$sub4
atoi %sub5,$sub5
if $sub3="vstr1" mov $sub3,$vstr1
gosub *check_dir3
split $sub3,".",$sub8,$sub9
if $sub9="bmp" | $sub9="jpg" | $sub9="png" mov $sub1,":a;"+$teigi1:add $sub1,$sub3:goto *mls_cmd_syasei_show
mov $sub1,":a;chara\":add $sub1,$sub3:add $sub1,".bmp"
goto *mls_cmd_syasei_show



*mls_cmd_syasei_leftup

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4,$sub5
atoi %sub2,$sub2:add %sub2,700
atoi %sub4,$sub4
atoi %sub5,$sub5
if $sub3="vstr1" mov $sub3,$vstr1
gosub *check_dir3
split $sub3,".",$sub8,$sub9
if $sub9="bmp" | $sub9="jpg" | $sub9="png" mov $sub1,":l;"+$teigi1:add $sub1,$sub3:goto *mls_cmd_syasei_show
mov $sub1,":l;chara\":add $sub1,$sub3:add $sub1,".bmp"
goto *mls_cmd_syasei_show



*mls_cmd_syasei_rightup

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4,$sub5
atoi %sub2,$sub2:add %sub2,700
atoi %sub4,$sub4
atoi %sub5,$sub5
if $sub3="vstr1" mov $sub3,$vstr1
gosub *check_dir3
split $sub3,".",$sub8,$sub9
if $sub9="bmp" | $sub9="jpg" | $sub9="png" mov $sub1,":r;"+$teigi1:add $sub1,$sub3:goto *mls_cmd_syasei_show
mov $sub1,":r;chara\":add $sub1,$sub3:add $sub1,".bmp"
goto *mls_cmd_syasei_show



*mls_cmd_syasei_show

name ""
gosub *syasei1
lsp %sub2,$sub1,%sub4,%sub5,%opacity:mov %opacity,255
gosub *syasei2
return



*mls_cmd_syasei2

split $mon_labo_mon_ini_cmd,",",$sub1,%sub2,$sub2,%sub3,%sub4,%sub5,$sub3,%sub6,%sub7
add %sub2,700
add %sub5,700
if $sub2="vstr1" mov $sub2,$vstr1
gosub *check_dir2
split $sub2,".",$sub8,$sub9
if $sub9="bmp" | $sub9="jpg" | $sub9="png" mov $sub1,$teigi1:add $sub1,$sub2:goto *mls_cmd_syasei_show2
mov $sub1,":a;chara\":add $sub1,$sub2:add $sub1,".bmp"
goto *mls_cmd_syasei_show2



*mls_cmd_syasei_show2

if $sub3="vstr1" mov $sub3,$vstr1
gosub *check_dir3
split $sub3,".",$sub8,$sub9
if $sub9="bmp" | $sub9="jpg" | $sub9="png" mov $sub2,$teigi1:add $sub2,$sub3:goto *mls_cmd_syasei_show3
mov $sub2,":a;chara\":add $sub2,$sub3:add $sub2,".bmp"
goto *mls_cmd_syasei_show3



*mls_cmd_syasei_show3

name ""
gosub *syasei1
lsp %sub2,$sub1,%sub3,%sub4,%opacity
lsp %sub5,$sub2,%sub6,%sub7,%opacity:mov %opacity,255
gosub *syasei2
return



*mls_cmd_syasei_clear

cspl 690,699:print 10,500
return



*mls_cmd_flash

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3
gosub *check_var2
gosub *check_var3
lsp 2,":c;system\ef_white.jpg",0,0:print 10,%sub2
csp 2:print 10,%sub3
return



*mls_cmd_monocro_on

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2
if $sub2="" skip 3
split $sub2,"#",$sub3,$sub4
if $sub3="" monocro $sub2:print 1:return
monocro #888888:print 1
return



*mls_cmd_monocro_off

monocro off:print 1
return



*mls_cmd_quake

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4
gosub *check_var2
gosub *check_var3
if $sub4="x" quakex %sub2,%sub3:return
if $sub4="y" quakey %sub2,%sub3:return
quake %sub2,%sub3
return



*mls_cmd_flushout

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2
gosub *check_var2
flushout %sub2
return



*mls_cmd_select

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4,$sub5,$sub6,$sub7,$sub8,$sub9
mov %mon_labo_mon_ini_ky,0
nobel $sub2:mov $sub2,$sel6
nobel $sub4:mov $sub4,$sel6
if $sub6<>"" nobel $sub6:mov $sub6,$sel6
if $sub8<>"" nobel $sub8:mov $sub8,$sel6
if $sub6="" csel $sub2,*mls_cmd_select_1,$sub4,*mls_cmd_select_2
if $sub8="" csel $sub2,*mls_cmd_select_1,$sub4,*mls_cmd_select_2,$sub6,*mls_cmd_select_3,$sub8,*mls_cmd_select_4
csel $sub2,*mls_cmd_select_1,$sub4,*mls_cmd_select_2,$sub6,*mls_cmd_select_3,$sub8,*mls_cmd_select_4



*mls_cmd_select_1

mov $mon_labo_mon_ini_sc,$sub3:return



*mls_cmd_select_2

mov $mon_labo_mon_ini_sc,$sub5:return



*mls_cmd_select_3

mov $mon_labo_mon_ini_sc,$sub7:return



*mls_cmd_select_4

mov $mon_labo_mon_ini_sc,$sub9:return



*mls_cmd_goto

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2
mov %mon_labo_mon_ini_ky,0
mov $mon_labo_mon_ini_sc,$sub2
return



*mls_cmd_gotoline

add %stack,1
split $mon_labo_mon_ini_cmd,",",$sub1,$sub2
if $sub2="" | $sub2=" " goto *jumpzero
gosub *check_var2
mov %mon_labo_mon_ini_ky,%sub2-1
sub %stack,1
return



*mls_cmd_sp2

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4,$sub5,$sub6,$sub7,$sub10,$50,$51,$52
atoi %sub2,$sub2:add %sub2,246
atoi %sub4,$sub4
atoi %sub5,$sub5
atoi %sub6,$sub6:add %sub6,100
atoi %sub7,$sub7:add %sub7,100
atoi %sub10,$sub10
atoi %50,$50
atoi %51,$51
if $sub3="vstr1" mov $sub3,$vstr1
gosub *check_dir3
split $sub3,".",$sub8,$sub9
if $sub9="bmp" | $sub9="jpg" | $sub9="png" mov $sub1,$teigi1:add $sub1,$sub3:goto *mls_cmd_sp_show2
mov $sub1,":a;chara\":add $sub1,$sub3:add $sub1,".bmp"
goto *mls_cmd_sp_show2



*mls_cmd_sp2_non_alpha

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4,$sub5,$sub6,$sub7,$sub10,$50,$51,$52
atoi %sub2,$sub2:add %sub2,246
atoi %sub4,$sub4
atoi %sub5,$sub5
atoi %sub6,$sub6:add %sub6,100
atoi %sub7,$sub7:add %sub7,100
atoi %sub10,$sub10
atoi %50,$50
atoi %51,$51
if $sub3="vstr1" mov $sub3,$vstr1
gosub *check_dir3
split $sub3,".",$sub8,$sub9
if $sub9="bmp" | $sub9="jpg" | $sub9="png" mov $sub1,":c;"+$teigi1:add $sub1,$sub3:goto *mls_cmd_sp_show2
mov $sub1,":c;chara\":add $sub1,$sub3:add $sub1,".bmp"
goto *mls_cmd_sp_show2



*mls_cmd_sp2_alpha

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4,$sub5,$sub6,$sub7,$sub10,$50,$51,$52
atoi %sub2,$sub2:add %sub2,246
atoi %sub4,$sub4
atoi %sub5,$sub5
atoi %sub6,$sub6:add %sub6,100
atoi %sub7,$sub7:add %sub7,100
atoi %sub10,$sub10
atoi %50,$50
atoi %51,$51
if $sub3="vstr1" mov $sub3,$vstr1
gosub *check_dir3
split $sub3,".",$sub8,$sub9
if $sub9="bmp" | $sub9="jpg" | $sub9="png" mov $sub1,":a;"+$teigi1:add $sub1,$sub3:goto *mls_cmd_sp_show2
mov $sub1,":a;chara\":add $sub1,$sub3:add $sub1,".bmp"
goto *mls_cmd_sp_show2



*mls_cmd_sp2_leftup

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4,$sub5,$sub6,$sub7,$sub10,$50,$51,$52
atoi %sub2,$sub2:add %sub2,246
atoi %sub4,$sub4
atoi %sub5,$sub5
atoi %sub6,$sub6:add %sub6,100
atoi %sub7,$sub7:add %sub7,100
atoi %sub10,$sub10
atoi %50,$50
atoi %51,$51
if $sub3="vstr1" mov $sub3,$vstr1
gosub *check_dir3
split $sub3,".",$sub8,$sub9
if $sub9="bmp" | $sub9="jpg" | $sub9="png" mov $sub1,":l;"+$teigi1:add $sub1,$sub3:goto *mls_cmd_sp_show2
mov $sub1,":l;chara\":add $sub1,$sub3:add $sub1,".bmp"
goto *mls_cmd_sp_show2



*mls_cmd_sp2_rightup

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4,$sub5,$sub6,$sub7,$sub10,$50,$51,$52
atoi %sub2,$sub2:add %sub2,246
atoi %sub4,$sub4
atoi %sub5,$sub5
atoi %sub6,$sub6:add %sub6,100
atoi %sub7,$sub7:add %sub7,100
atoi %sub10,$sub10
atoi %50,$50
atoi %51,$51
if $sub3="vstr1" mov $sub3,$vstr1
gosub *check_dir3
split $sub3,".",$sub8,$sub9
if $sub9="bmp" | $sub9="jpg" | $sub9="png" mov $sub1,":r;"+$teigi1:add $sub1,$sub3:goto *mls_cmd_sp_show2
mov $sub1,":r;chara\":add $sub1,$sub3:add $sub1,".bmp"
goto *mls_cmd_sp_show2



*mls_cmd_sp_show2

lsp2 %sub2,$sub1,%sub4,%sub5,%sub6,%sub7,%sub10,%opacity:mov %opacity,255
if %50=0 return
if %50=1 print 1:return
if %50=15 | %50=18 print %50,%51,$52:return
if %50<>99 print %50,%51:return
if $52="1" mov $52,"system\breakup.dll/urb":skip 4
if $52="2" mov $52,"system\breakup.dll/lrB":skip 3
if $52="3" mov $52,"system\lngtwave.dll/vwi":skip 2
if $52="4" mov $52,"system\trvswave.dll/h"
print 99,%51,$52
return



*mls_cmd_sp_del2

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4,$sub5
atoi %sub2,$sub2:add %sub2,246
atoi %sub3,$sub3
atoi %sub4,$sub4
csp2 %sub2
if %sub3=0 return
if %sub3=1 print 1:return
if %sub3=15 | %sub3=18 print %sub3,%sub4,$sub5:return
if %sub3<>99 print %sub3,%sub4:return
if $sub5="1" mov $sub5,"system\breakup.dll/urb":skip 4
if $sub5="2" mov $sub5,"system\breakup.dll/lrB":skip 3
if $sub5="3" mov $sub5,"system\lngtwave.dll/vwi":skip 2
if $sub5="4" mov $sub5,"system\trvswave.dll/h"
print 99,%sub4,$sub5
return



*mls_cmd_vsp2

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub6,$sub3,$sub4,$sub5
atoi %sub2,$sub2:add %sub2,246
atoi %sub3,$sub3
atoi %sub4,$sub4
atoi %sub6,$sub6
if %sub6=0 vsp2 %sub2,0:skip 2
if %sub6=1 vsp2 %sub2,1
if %sub3=0 return
if %sub3=1 print 1:return
if %sub3=15 | %sub3=18 print %sub3,%sub4,$sub5:return
if %sub3<>99 print %sub3,%sub4:return
if $sub5="1" mov $sub5,"system\breakup.dll/urb":skip 4
if $sub5="2" mov $sub5,"system\breakup.dll/lrB":skip 3
if $sub5="3" mov $sub5,"system\lngtwave.dll/vwi":skip 2
if $sub5="4" mov $sub5,"system\trvswave.dll/h"
print 99,%sub4,$sub5
return



*mls_cmd_move

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4,$sub5,$sub6,$sub7,$sub8,$sub9,$sub10
atoi %sub2,$sub2:add %sub2,246
atoi %sub3,$sub3
atoi %sub4,$sub4
atoi %sub5,$sub5
atoi %sub6,$sub6
atoi %sub7,$sub7
atoi %sub8,$sub8
atoi %sub9,$sub9
atoi %sub10,$sub10
for %move=0 to %sub10 step 1
msp2 %sub2,%sub3,%sub4,%sub5,%sub6,%sub7,%sub8
print 1:wait %sub9
next
return



*mls_cmd_move_sp

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4,$sub5,$sub6,$sub7
atoi %sub2,$sub2:add %sub2,700
atoi %sub3,$sub3
atoi %sub4,$sub4
atoi %sub5,$sub5
atoi %sub6,$sub6
atoi %sub7,$sub7
for %move=0 to %sub7 step 1
msp %sub2,%sub3,%sub4,%sub5
print 1:wait %sub6
next
return



*mls_cmd_movie

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3
atoi %sub3,$sub3
if $sub2="vstr1" mov $sub2,$vstr1
gosub *check_dir2
split $sub2,".",$sub4,$sub5
if $sub5="avi" mov $sub1,$teigi1:add $sub1,$sub2:avi $sub1,%sub3:return
if $sub5="mpg" mov $sub1,$teigi1:add $sub1,$sub2:mpegplay $sub1,%sub3:return
mov $sub1,"effect\":add $sub1,$sub2:add $sub1,".mpg"
mpegplay $sub1,%sub3
return



*mls_cmd_element

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2
gosub *check_var2
if %sub2=1 lsp2 0,":a;chara\sylph_st12.bmp",200,300,100,100,0,200
if %sub2=2 lsp2 0,":a;chara\gnome_st21.bmp",200,300,100,100,0,200
if %sub2=3 lsp2 0,":a;chara\undine_st11.bmp",200,300,100,100,0,200
if %sub2=4 lsp2 0,":a;chara\salamander_st02.bmp",200,300,100,100,0,200
if %sub2=5 lsp2 0,":a;chara\zylphe_st02.bmp",200,300,100,100,0,200
if %sub2=6 lsp2 0,":a;chara\gnomaren_st01.bmp",200,300,100,100,0,200
if %sub2=7 lsp2 0,":a;chara\grandine_st01.bmp",200,300,100,100,0,200
if %sub2=8 lsp2 0,":a;chara\gigamander_st01.bmp",200,300,100,100,0,200
gosub *syoukan_effect
return



*mls_cmd_var_ld

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3
if $sub2="vstr1" goto *mls_cmd_var_ld_vstr
mov %53,-1
if $sub2="v0" mov %53,0
if $sub2="v1" mov %53,1
if $sub2="v2" mov %53,2
if $sub2="v3" mov %53,3
if $sub2="v4" mov %53,4
if $sub2="v5" mov %53,5
if $sub2="v6" mov %53,6
if $sub2="v7" mov %53,7
if $sub2="v8" mov %53,8
if $sub2="v9" mov %53,9
if $sub2="v10" mov %53,10
if $sub2="v11" mov %53,11
if $sub2="v12" mov %53,12
if $sub2="v13" mov %53,13
if $sub2="v14" mov %53,14
if $sub2="v15" mov %53,15
if $sub2="v16" mov %53,16
if $sub2="v17" mov %53,17
if $sub2="v18" mov %53,18
if $sub2="v19" mov %53,19
if %53=-1 return
if $sub3="vstr1" mov $sub3,$vstr1
gosub *check_var3
if %52<>-1 mov ?mon_labo_var[%53],%sub3:return
if $sub3="monster_x" mov ?mon_labo_var[%53],%monster_x:return
if $sub3="monster_y" mov ?mon_labo_var[%53],%monster_y:return
if $sub3="monster_xb" mov ?mon_labo_var[%53],%monster_xb:return
if $sub3="monster_yb" mov ?mon_labo_var[%53],%monster_yb:return
if $sub3="monster_xc" mov ?mon_labo_var[%53],%monster_xc:return
if $sub3="monster_yc" mov ?mon_labo_var[%53],%monster_yc:return
if $sub3="monster_xd" mov ?mon_labo_var[%53],%monster_xd:return
if $sub3="monster_yd" mov ?mon_labo_var[%53],%monster_yd:return
if $sub3="tekikazu" mov ?mon_labo_var[%53],%tekikazu:return
if $sub3="tukix" mov ?mon_labo_var[%53],%tukix:return
if $sub3="alice" mov ?mon_labo_var[%53],%alice_skill:return
if $sub3="keigen" mov ?mon_labo_var[%53],%keigen:return
if $sub3="earth_keigen" mov ?mon_labo_var[%53],%earth_keigen:return
if $sub3="kaihi" mov ?mon_labo_var[%53],%kaihi:return
if $sub3="alice_skill1" mov ?mon_labo_var[%53],%alice_skill1:return
if $sub3="alice_skill2" mov ?mon_labo_var[%53],%alice_skill2:return
if $sub3="alice_skill3" mov ?mon_labo_var[%53],%alice_skill3:return
if $sub3="skill" mov ?mon_labo_var[%53],%skill01:return
if $sub3="skill_wind" mov ?mon_labo_var[%53],%skill02:return
if $sub3="skill_earth" mov ?mon_labo_var[%53],%skill03:return
if $sub3="skill_aqua" mov ?mon_labo_var[%53],%skill04:return
if $sub3="skill_fire" mov ?mon_labo_var[%53],%skill05:return
if $sub3="tikei" mov ?mon_labo_var[%53],%tikei:return
if $sub3="henka1" mov ?mon_labo_var[%53],%henkahp1:return
if $sub3="henka2" mov ?mon_labo_var[%53],%henkahp2:return
if $sub3="henka3" mov ?mon_labo_var[%53],%henkahp3:return
if $sub3="mp" mov ?mon_labo_var[%53],%mp:return
if $sub3="max_mp" mov ?mon_labo_var[%53],%max_mp:return
if $sub3="kousoku" mov ?mon_labo_var[%53],%kousoku:return
if $sub3="status" mov ?mon_labo_var[%53],%status:return
if $sub3="enemylife" mov ?mon_labo_var[%53],%enemylife:return
if $sub3="max_enemylife" mov ?mon_labo_var[%53],%max_enemylife:return
if $sub3="mylife" mov ?mon_labo_var[%53],%mylife:return
if $sub3="max_mylife" mov ?mon_labo_var[%53],%max_mylife:return
if $sub3="action" mov ?mon_labo_var[%53],%before_action:return
if $sub3="wind" mov ?mon_labo_var[%53],%wind:return
if $sub3="earth" mov ?mon_labo_var[%53],%earth:return
if $sub3="aqua" mov ?mon_labo_var[%53],%aqua:return
if $sub3="fire" mov ?mon_labo_var[%53],%fire:return
if $sub3="turn" mov ?mon_labo_var[%53],%turn:return
if $sub3="wind_turn" mov ?mon_labo_var[%53],%wind_turn:return
if $sub3="earth_turn" mov ?mon_labo_var[%53],%earth_turn:return
if $sub3="aqua_turn" mov ?mon_labo_var[%53],%aqua_turn:return
if $sub3="fire_turn" mov ?mon_labo_var[%53],%fire_turn:return
if $sub3="genmogaku" mov ?mon_labo_var[%53],%genmogaku:return
if $sub3="kousoku_type" mov ?mon_labo_var[%53],%kousoku_type:return
if $sub3="kousoku_hp" mov ?mon_labo_var[%53],%kousoku_hp:return
if $sub3="abairitu" mov ?mon_labo_var[%53],%abairitu:return
if $sub3="status_turn" mov ?mon_labo_var[%53],%status_turn:return
if $sub3="poison" mov ?mon_labo_var[%53],%poison:return
if $sub3="counter" mov ?mon_labo_var[%53],%counter:return
if $sub3="counta1" mov ?mon_labo_var[%53],%tuika_owaza_count1a:return
if $sub3="counta2" mov ?mon_labo_var[%53],%tuika_owaza_count1b:return
if $sub3="counta3" mov ?mon_labo_var[%53],%tuika_owaza_count1c:return
if $sub3="counta4" mov ?mon_labo_var[%53],%tuika_owaza_count1d:return
if $sub3="counta5" mov ?mon_labo_var[%53],%tuika_owaza_count1e:return
if $sub3="counta6" mov ?mon_labo_var[%53],%tuika_owaza_count1f:return
if $sub3="counta7" mov ?mon_labo_var[%53],%tuika_owaza_count1g:return
if $sub3="counta8" mov ?mon_labo_var[%53],%tuika_owaza_count1h:return
if $sub3="countb1" mov ?mon_labo_var[%53],%tuika_owaza_count2a:return
if $sub3="countb2" mov ?mon_labo_var[%53],%tuika_owaza_count2b:return
if $sub3="countb3" mov ?mon_labo_var[%53],%tuika_owaza_count2c:return
if $sub3="countb4" mov ?mon_labo_var[%53],%tuika_owaza_count2d:return
if $sub3="countc1" mov ?mon_labo_var[%53],%tuika_owaza_count3a:return
if $sub3="countc2" mov ?mon_labo_var[%53],%tuika_owaza_count3b:return
if $sub3="countc3" mov ?mon_labo_var[%53],%tuika_owaza_count3c:return
if $sub3="countc4" mov ?mon_labo_var[%53],%tuika_owaza_count3d:return
if $sub3="counttame0" mov ?mon_labo_var[%53],%tuika_owaza_count4a:return
if $sub3="countcounter0" mov ?mon_labo_var[%53],%tuika_owaza_count4b:return
if $sub3="kaihi_el" mov ?mon_labo_var[%53],%kaihi_el:return
if $sub3="earth_el" mov ?mon_labo_var[%53],%earth_keigen_el:return
if $sub3="fire_el" mov ?mon_labo_var[%53],%fire_keigen_el:return
if $sub3="damage_el" mov ?mon_labo_var[%53],%damage_keigen_el:return
if $sub3="enemy_wind" mov ?mon_labo_var[%53],%enemy_wind:return
if $sub3="enemy_earth" mov ?mon_labo_var[%53],%enemy_earth:return
if $sub3="enemy_aqua" mov ?mon_labo_var[%53],%enemy_aqua:return
if $sub3="enemy_fire" mov ?mon_labo_var[%53],%enemy_fire:return
if $sub3="kadora_damage" mov ?mon_labo_var[%53],%kadora_damage:return
if $sub3="charge" mov ?mon_labo_var[%53],%bougyo_attack:return
if $sub3="hit" mov ?mon_labo_var[%53],%hit:return
if $sub3="kousan" mov ?mon_labo_var[%53],%kousan:return
if $sub3="move" atoi %sub1,$move: mov ?mon_labo_var[%53],%sub1:return
atoi %sub3,$sub3:mov ?mon_labo_var[%53],%sub3
return



*mls_cmd_var_ld_vstr

if $sub3="vstr1" mov $sub3,$vstr1
gosub *check_var3
if %52<>-1 itoa $vstr1,?mon_labo_var[%52]:return
if $sub3="kousan_anno1" mov $vstr1,$kousan:return
if $sub3="onedari_list1" mov $vstr1,$onedari:return
if $sub3="mogaku_anno1" mov $vstr1,$mogaku_anno1:return
if $sub3="mogaku_anno2" mov $vstr1,$mogaku_anno2:return
if $sub3="mogaku_anno3" mov $vstr1,$mogaku_anno3:return
if $sub3="mogaku_anno4" mov $vstr1,$mogaku_anno4:return
if $sub3="mogaku_sel1" mov $vstr1,$mogaku_sel1:return
if $sub3="mogaku_sel2" mov $vstr1,$mogaku_sel2:return
if $sub3="mogaku_sel3" mov $vstr1,$mogaku_sel3:return
if $sub3="mogaku_sel4" mov $vstr1,$mogaku_sel4:return
if $sub3="mogaku_sel5" mov $vstr1,$mogaku_sel5:return
if $sub3="mogaku_dassyutu1" mov $vstr1,$mogaku_dassyutu1:return
if $sub3="mogaku_dassyutu2" mov $vstr1,$mogaku_dassyutu2:return
if $sub3="mogaku_earth_dassyutu1" mov $vstr1,$mogaku_earth_dassyutu1:return
if $sub3="mogaku_earth_dassyutu2" mov $vstr1,$mogaku_earth_dassyutu2:return
if $sub3="mogaku_kaisin1" mov $vstr1,$mogaku_kaisin1:return
if $sub3="mogaku_kaisin2" mov $vstr1,$mogaku_kaisin2:return
if $sub3="tatie1" mov $vstr1,$tatie1:return
if $sub3="tatie2" mov $vstr1,$tatie2:return
if $sub3="tatie3" mov $vstr1,$tatie3:return
if $sub3="tatie4" mov $vstr1,$tatie4:return
if $sub3="tatie1b" mov $vstr1,$tatie1b:return
if $sub3="tatie2b" mov $vstr1,$tatie2b:return
if $sub3="tatie3b" mov $vstr1,$tatie3b:return
if $sub3="tatie1c" mov $vstr1,$tatie1c:return
if $sub3="tatie2c" mov $vstr1,$tatie2c:return
if $sub3="tatie3c" mov $vstr1,$tatie3c:return
if $sub3="tatie1d" mov $vstr1,$tatie1d:return
if $sub3="tatie2d" mov $vstr1,$tatie2d:return
if $sub3="tatie3d" mov $vstr1,$tatie3d:return
if $sub3="name" mov $vstr1,$name:return
len %name_count,$mon_labo_mon_ini_cmd
mid $sub3,$mon_labo_mon_ini_cmd,13,%name_count-13
mov $vstr1,$sub3
return



*mls_cmd_var_cal

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4
if $sub2="vstr1" goto *mls_cmd_var_cal_vstr
mov %53,-1
if $sub2="v0" mov %53,0
if $sub2="v1" mov %53,1
if $sub2="v2" mov %53,2
if $sub2="v3" mov %53,3
if $sub2="v4" mov %53,4
if $sub2="v5" mov %53,5
if $sub2="v6" mov %53,6
if $sub2="v7" mov %53,7
if $sub2="v8" mov %53,8
if $sub2="v9" mov %53,9
if $sub2="v10" mov %53,10
if $sub2="v11" mov %53,11
if $sub2="v12" mov %53,12
if $sub2="v13" mov %53,13
if $sub2="v14" mov %53,14
if $sub2="v15" mov %53,15
if $sub2="v16" mov %53,16
if $sub2="v17" mov %53,17
if $sub2="v18" mov %53,18
if $sub2="v19" mov %53,19
if %53=-1 return
mov %sub2,?mon_labo_var[%53]
gosub *check_var4
if $sub3="+" add %sub2,%sub4
if $sub3="-" sub %sub2,%sub4
if $sub3="*" mul %sub2,%sub4
if $sub3="/" div %sub2,%sub4
if $sub3="%" mov %sub2,%sub2 mod %sub4
mov ?mon_labo_var[%53],%sub2
return



*mls_cmd_var_cal_vstr

gosub *check_var4
if %52<>-1 itoa $sub4,?mon_labo_var[%52]:skip 3
len %name_count,$mon_labo_mon_ini_cmd
mid $sub4,$mon_labo_mon_ini_cmd,16,%name_count-16
if $sub3="+" | $sub3="<" mov $vstr1,$vstr1+$sub4:return
if $sub3=">" mov $vstr1,$sub4+$vstr1:return
return



*mls_cmd_var_cpa

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4,$sub8
if $sub2="vstr1" goto *mls_cmd_var_cpa_vstr
gosub *check_var2
if %52=-1 return
gosub *check_var4
gosub *check_var8
if $sub3=">" && %sub2>%sub4 mov %mon_labo_var_flag,1
if $sub3=">" && %sub2<=%sub4 && %sub8=1 mov %mon_labo_var_flag,0
if $sub3=">=" && %sub2>=%sub4 mov %mon_labo_var_flag,1
if $sub3=">=" && %sub2<%sub4 && %sub8=1 mov %mon_labo_var_flag,0
if $sub3="<" && %sub2<%sub4 mov %mon_labo_var_flag,1
if $sub3="<" && %sub2>=%sub4 && %sub8=1 mov %mon_labo_var_flag,0
if $sub3="<=" && %sub2<=%sub4 mov %mon_labo_var_flag,1
if $sub3="<=" && %sub2>%sub4 && %sub8=1 mov %mon_labo_var_flag,0
if $sub3="=" && %sub2=%sub4 mov %mon_labo_var_flag,1
if $sub3="=" && %sub2<>%sub4 && %sub8=1 mov %mon_labo_var_flag,0
if $sub3="!=" && %sub2!=%sub4 mov %mon_labo_var_flag,1
if $sub3="!=" && %sub2=%sub4 && %sub8=1 mov %mon_labo_var_flag,0
return



*mls_cmd_var_cpa_vstr

if $sub3<>"=" && $sub3<>"!=" return
split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4
gosub *check_var4
if %52<>-1 itoa $sub4,?mon_labo_var[%52]:skip 4
len %name_count,$mon_labo_mon_ini_cmd
if $sub3="=" mid $sub4,$mon_labo_mon_ini_cmd,16,%name_count-16 skip 2
if $sub3="!=" mid $sub4,$mon_labo_mon_ini_cmd,17,%name_count-17
mov %mon_labo_var_flag,0
if $sub3="=" && $vstr1=$sub4 mov %mon_labo_var_flag,1:return
if $sub3="!=" && $vstr1<>$sub4 mov %mon_labo_var_flag,1:return
return



*mls_cmd_var_out

add %stack,1
split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4
gosub *check_var3
if %52=-1 mov $sub3,"":skip 2
itoa2 $sub3,%sub3
add $sub2,$sub3
add $sub2,$sub4
eng $sub2:$sel6
sub %stack,1
return



*mls_cmd_var_out2

add %stack,1
split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4
if $sub3="vstr1" mov $sub3,$vstr1:skip 4
gosub *check_var3
if %52=-1 mov $sub3,"":skip 2
itoa $sub3,%sub3
add $sub2,$sub3
add $sub2,$sub4
len %name_count,$sub2
mid $sub1,$sub2,%name_count-1,1
if $sub1=" " mid $sub2,$sub2,0,%name_count-1:skip -2
if $sub1<>"@" :skip 4
mid $sub2,$sub2,0,%name_count-1
eng $sub2:$sel6@
sub %stack,1:return
if $sub1<>"~" skip 4
mid $sub2,$sub2,0,%name_count-1
eng $sub2:$sel6
sub %stack,1:return
if $sub1<>"/" skip 9
mid $sub1,$sub2,%name_count-1,2
if $sub1="@/" skip 4
mid $sub2,$sub2,0,%name_count-1
eng $sub2:$sel6/
sub %stack,1:return
mid $sub2,$sub2,0,%name_count-1
eng $sub2:$sel6@/
sub %stack,1:return
if $sub1="\" mid $sub2,$sub2,0,%name_count-1
eng $sub2:$sel6\
sub %stack,1
return



*mls_cmd_var_jump

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2
if %mon_labo_var_flag=1 mov %mon_labo_var_flag,0:mov %mon_labo_mon_ini_ky,-1:mov $mon_labo_mon_ini_sc,$sub2
return



*mls_cmd_var_jumpline

add %stack,1
split $mon_labo_mon_ini_cmd,",",$sub1,$sub2
if $sub2="" | $sub2=" " goto *jumpzero
if %mon_labo_var_flag=0 sub %stack,1:return
mov %mon_labo_var_flag,0
gosub *check_var2
mov %mon_labo_mon_ini_ky,%sub2-1
sub %stack,1
return



*mls_cmd_var_dice

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3
mov %53,-1
if $sub2="v0" mov %53,0
if $sub2="v1" mov %53,1
if $sub2="v2" mov %53,2
if $sub2="v3" mov %53,3
if $sub2="v4" mov %53,4
if $sub2="v5" mov %53,5
if $sub2="v6" mov %53,6
if $sub2="v7" mov %53,7
if $sub2="v8" mov %53,8
if $sub2="v9" mov %53,9
if $sub2="v10" mov %53,10
if $sub2="v11" mov %53,11
if $sub2="v12" mov %53,12
if $sub2="v13" mov %53,13
if $sub2="v14" mov %53,14
if $sub2="v15" mov %53,15
if $sub2="v16" mov %53,16
if $sub2="v17" mov %53,17
if $sub2="v18" mov %53,18
if $sub2="v19" mov %53,19
if %53=-1 return
gosub *check_var3
rnd2 %sub4,1,%sub3
mov ?mon_labo_var[%53],%sub4
return



*mls_cmd_var_dice2

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4
mov %53,-1
if $sub2="v0" mov %53,0
if $sub2="v1" mov %53,1
if $sub2="v2" mov %53,2
if $sub2="v3" mov %53,3
if $sub2="v4" mov %53,4
if $sub2="v5" mov %53,5
if $sub2="v6" mov %53,6
if $sub2="v7" mov %53,7
if $sub2="v8" mov %53,8
if $sub2="v9" mov %53,9
if $sub2="v10" mov %53,10
if $sub2="v11" mov %53,11
if $sub2="v12" mov %53,12
if $sub2="v13" mov %53,13
if $sub2="v14" mov %53,14
if $sub2="v15" mov %53,15
if $sub2="v16" mov %53,16
if $sub2="v17" mov %53,17
if $sub2="v18" mov %53,18
if $sub2="v19" mov %53,19
if %53=-1 return
gosub *check_var3
gosub *check_var4
if $sub4="" mov %sub2,%sub3:skip 4
if %sub3=%sub4 mov %sub2,%sub3:skip 3
if %sub3>%sub4 mov %sub1,%sub3:mov %sub3,%sub4:mov %sub4,%sub1
rnd2 %sub2,%sub3,%sub4
mov ?mon_labo_var[%53],%sub2
return



*mls_cmd_var_90110

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3
mov %53,-1
if $sub2="v0" mov %53,0
if $sub2="v1" mov %53,1
if $sub2="v2" mov %53,2
if $sub2="v3" mov %53,3
if $sub2="v4" mov %53,4
if $sub2="v5" mov %53,5
if $sub2="v6" mov %53,6
if $sub2="v7" mov %53,7
if $sub2="v8" mov %53,8
if $sub2="v9" mov %53,9
if $sub2="v10" mov %53,10
if $sub2="v11" mov %53,11
if $sub2="v12" mov %53,12
if $sub2="v13" mov %53,13
if $sub2="v14" mov %53,14
if $sub2="v15" mov %53,15
if $sub2="v16" mov %53,16
if $sub2="v17" mov %53,17
if $sub2="v18" mov %53,18
if $sub2="v19" mov %53,19
if %53=-1 return
if $sub3="" mov %sub3,?mon_labo_var[%53]:skip 2
gosub *check_var3
mov %sub1,%sub3*9/10
mov %sub2,%sub3*11/10
rnd2 %sub3,%sub1,%sub2
mov ?mon_labo_var[%53],%sub3
return



*mls_cmd_var_damage

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3
mov %53,-1
if $sub2="v0" mov %53,0
if $sub2="v1" mov %53,1
if $sub2="v2" mov %53,2
if $sub2="v3" mov %53,3
if $sub2="v4" mov %53,4
if $sub2="v5" mov %53,5
if $sub2="v6" mov %53,6
if $sub2="v7" mov %53,7
if $sub2="v8" mov %53,8
if $sub2="v9" mov %53,9
if $sub2="v10" mov %53,10
if $sub2="v11" mov %53,11
if $sub2="v12" mov %53,12
if $sub2="v13" mov %53,13
if $sub2="v14" mov %53,14
if $sub2="v15" mov %53,15
if $sub2="v16" mov %53,16
if $sub2="v17" mov %53,17
if $sub2="v18" mov %53,18
if $sub2="v19" mov %53,19
if %53=-1 return
gosub *check_var3
mov %damage,%sub3*%mylv*%damage_keigen/2000
if %enemy_earth+%enemy_aqua>0 mov %damage,%damage*%damage_keigen_el/100
rnd2 %damage,%damage*9/10,%damage*11/10
if %damage=0 mov %damage,1
mov ?mon_labo_var[%53],%damage
return



*mls_cmd_var_damage2

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3
mov %53,-1
if $sub2="v0" mov %53,0
if $sub2="v1" mov %53,1
if $sub2="v2" mov %53,2
if $sub2="v3" mov %53,3
if $sub2="v4" mov %53,4
if $sub2="v5" mov %53,5
if $sub2="v6" mov %53,6
if $sub2="v7" mov %53,7
if $sub2="v8" mov %53,8
if $sub2="v9" mov %53,9
if $sub2="v10" mov %53,10
if $sub2="v11" mov %53,11
if $sub2="v12" mov %53,12
if $sub2="v13" mov %53,13
if $sub2="v14" mov %53,14
if $sub2="v15" mov %53,15
if $sub2="v16" mov %53,16
if $sub2="v17" mov %53,17
if $sub2="v18" mov %53,18
if $sub2="v19" mov %53,19
if %53=-1 return
gosub *check_var3
mov %damage,%sub3
if %enemy_earth+%enemy_aqua>0 mov %damage,%damage*%damage_keigen_el/100
if %damage=0 mov %damage,1
mov ?mon_labo_var[%53],%damage
return



*mls_cmd_damage

add %stack,1
split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3
gosub *check_var2
gosub *check_var3
delay 300
if $sub3="" mov %damage,%sub2:skip 4
if %sub2=%sub3 mov %damage,%sub2:skip 3
if %sub2>%sub3 mov %sub1,%sub2:mov %sub2,%sub3:mov %sub3,%sub1
rnd2 %damage,%sub2,%sub3
dwave 2,"se\damage.ogg":quakex 2,440
itoa $damage,%damage
eng $ori_name+" takes "+$damage+" damage!":$sel6/
if %battle=0 skip 10
mov %mylife,%mylife-%damage
if %mylife>%max_mylife mov %mylife,%max_mylife
if %mylife<0 mov %mylife,0
if %mylife=0 mov %gage,0 skip 3
mov %gage,%mylife*100/%max_mylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 560,":a;system\gager"+$gagenum+".bmp",114,556
gosub *hp
print 10,500
\
sub %stack,1
return



*mls_cmd_kaihuku

add %stack,1
split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3
gosub *check_var2
gosub *check_var3
delay 300
if $sub3="" mov %damage,%sub2:skip 4
if %sub2=%sub3 mov %damage,%sub2:skip 3
if %sub2>%sub3 mov %sub1,%sub2:mov %sub2,%sub3:mov %sub3,%sub1
rnd2 %damage,%sub2,%sub3
dwave 2,"se\kaihuku.ogg"
itoa $damage,%damage
eng $ori_name+" recovers "+$damage+" HPs!":$sel6/
if %battle=0 skip 9
mov %mylife,%mylife+%damage
if %mylife>%max_mylife mov %mylife,%max_mylife
mov %gage,%mylife*100/%max_mylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 560,":a;system\gager"+$gagenum+".bmp",114,556
gosub *hp
print 10,500
\
sub %stack,1
return



*mls_cmd_enemylife

add %stack,1
split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3
if $sub2="" sub %stack,1:return
gosub *check_var2
gosub *check_var3
if $sub3="" mov %damage,%sub2:skip 4
if %sub2=%sub3 mov %damage,%sub2:skip 3
if %sub2>%sub3 mov %sub1,%sub2:mov %sub2,%sub3:mov %sub3,%sub1
rnd2 %damage,%sub2,%sub3
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
vsp 700,0:print 10,15
vsp 700,1:print 10,15
itoa $damage,%damage
eng $ori_name+" deals "+$damage+" damage!"
$sel6/
if %battle=0 skip 10
mov %enemylife,%enemylife-%damage
if %enemylife>%max_enemylife mov %enemylife,%max_enemylife
if %enemylife<0 mov %enemylife,0
if %enemylife=0 mov %gage,0 skip 3
mov %gage,%enemylife*100/%max_enemylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
print 10,500
\
sub %stack,1
return



*mls_cmd_enemykaihuku

add %stack,1
split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3
if $sub2="" sub %stack,1:return
gosub *check_var2
gosub *check_var3
if $sub3="" mov %damage,%sub2:skip 4
if %sub2=%sub3 mov %damage,%sub2:skip 3
if %sub2>%sub3 mov %sub1,%sub2:mov %sub2,%sub3:mov %sub3,%sub1
rnd2 %damage,%sub2,%sub3
itoa $damage,%damage
eng $name2+" recovered "+$damage+" HP!"
$sel6/
if %battle=0 skip 9
mov %enemylife,%enemylife+%damage
if %enemylife>%max_enemylife mov %enemylife,%max_enemylife
if %enemylife=0 mov %gage,0 skip 3
mov %gage,%enemylife*100/%max_enemylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
print 10,500
\
sub %stack,1
return



*mls_cmd_change

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4
if $sub2="opacity" atoi %sub3,$sub3:mov %opacity,%sub3:return
if %battle=0 return
if $sub2="vstr1" mov $sub2,$vstr1
if $sub3="vstr1" mov $mon_labo_mon_ini_cmd,$sub1+","+$sub2+","+$vstr1
len %name_count,$mon_labo_mon_ini_cmd
if $sub2="kousan_anno1" mid $kousan,$mon_labo_mon_ini_cmd,20,%name_count-20:return
if $sub2="onedari_list1" mid $onedari,$mon_labo_mon_ini_cmd,21,%name_count-21:return
if $sub2="mogaku_anno1" mid $mogaku_anno1,$mon_labo_mon_ini_cmd,20,%name_count-20:return
if $sub2="mogaku_anno2" mid $mogaku_anno2,$mon_labo_mon_ini_cmd,20,%name_count-20:return
if $sub2="mogaku_anno3" mid $mogaku_anno3,$mon_labo_mon_ini_cmd,20,%name_count-20:return
if $sub2="mogaku_anno4" mid $mogaku_anno4,$mon_labo_mon_ini_cmd,20,%name_count-20:return
if $sub2="mogaku_sel1" mid $mogaku_sel1,$mon_labo_mon_ini_cmd,19,%name_count-19:return
if $sub2="mogaku_sel2" mid $mogaku_sel2,$mon_labo_mon_ini_cmd,19,%name_count-19:return
if $sub2="mogaku_sel3" mid $mogaku_sel3,$mon_labo_mon_ini_cmd,19,%name_count-19:return
if $sub2="mogaku_sel4" mid $mogaku_sel4,$mon_labo_mon_ini_cmd,19,%name_count-19:return
if $sub2="mogaku_sel5" mid $mogaku_sel5,$mon_labo_mon_ini_cmd,19,%name_count-19:return
if $sub2="mogaku_dassyutu1" mid $mogaku_dassyutu1,$mon_labo_mon_ini_cmd,24,%name_count-24:return
if $sub2="mogaku_dassyutu2" mid $mogaku_dassyutu2,$mon_labo_mon_ini_cmd,24,%name_count-24:return
if $sub2="mogaku_earth_dassyutu1" mid $mogaku_earth_dassyutu1,$mon_labo_mon_ini_cmd,30,%name_count-30:return
if $sub2="mogaku_earth_dassyutu2" mid $mogaku_earth_dassyutu2,$mon_labo_mon_ini_cmd,30,%name_count-30:return
if $sub2="mogaku_kaisin1" mid $mogaku_kaisin1,$mon_labo_mon_ini_cmd,22,%name_count-22:return
if $sub2="mogaku_kaisin2" mid $mogaku_kaisin2,$mon_labo_mon_ini_cmd,22,%name_count-22:return
if $sub2="tatie1" mid $tatie1,$mon_labo_mon_ini_cmd,14,%name_count-14:return
if $sub2="tatie2" mid $tatie2,$mon_labo_mon_ini_cmd,14,%name_count-14:return
if $sub2="tatie3" mid $tatie3,$mon_labo_mon_ini_cmd,14,%name_count-14:return
if $sub2="tatie4" mid $tatie4,$mon_labo_mon_ini_cmd,14,%name_count-14:return
if $sub2="tatie1b" mid $tatie1b,$mon_labo_mon_ini_cmd,15,%name_count-15:return
if $sub2="tatie2b" mid $tatie2b,$mon_labo_mon_ini_cmd,15,%name_count-15:return
if $sub2="tatie3b" mid $tatie3b,$mon_labo_mon_ini_cmd,15,%name_count-15:return
if $sub2="tatie1c" mid $tatie1c,$mon_labo_mon_ini_cmd,15,%name_count-15:return
if $sub2="tatie2c" mid $tatie2c,$mon_labo_mon_ini_cmd,15,%name_count-15:return
if $sub2="tatie3c" mid $tatie3c,$mon_labo_mon_ini_cmd,15,%name_count-15:return
if $sub2="tatie1d" mid $tatie1d,$mon_labo_mon_ini_cmd,15,%name_count-15:return
if $sub2="tatie2d" mid $tatie2d,$mon_labo_mon_ini_cmd,15,%name_count-15:return
if $sub2="tatie3d" mid $tatie3d,$mon_labo_mon_ini_cmd,15,%name_count-15:return
if $sub2="name" mid $name,$mon_labo_mon_ini_cmd,12,%name_count-12:nobel $name:mov $name,$sel6:mov $name2,$name:return
if $sub3="vstr1" return
if $sub2="first_sel1" goto *mls_cmd_change_first_sel
if $sub2="first_sel2" goto *mls_cmd_change_first_sel
if $sub2="first_sel3" goto *mls_cmd_change_first_sel
if $sub2="first_sel4" goto *mls_cmd_change_first_sel
if $sub2="first_sel5" goto *mls_cmd_change_first_sel
if $sub2="first_sel6" goto *mls_cmd_change_first_sel
if $sub2="first_sel7" goto *mls_cmd_change_first_sel
if $sub2="first_sel8" goto *mls_cmd_change_first_sel
if $sub2="first_sel9" goto *mls_cmd_change_first_sel
if $sub2="first_sel10" goto *mls_cmd_change_first_sel
gosub *check_var3
if $sub2="monster_x" mov %monster_x,%sub3:return
if $sub2="monster_y" mov %monster_y,%sub3:return
if $sub2="monster_xb" mov %monster_xb,%sub3:return
if $sub2="monster_yb" mov %monster_yb,%sub3:return
if $sub2="monster_xc" mov %monster_xc,%sub3:return
if $sub2="monster_yc" mov %monster_yc,%sub3:return
if $sub2="monster_xd" mov %monster_xd,%sub3:return
if $sub2="monster_yd" mov %monster_yd,%sub3:return
if $sub2="tekikazu" mov %tekikazu,%sub3:return
if $sub2="tukix" mov %tukix,%sub3:return
if $sub2="alice" mov %alice_skill,%sub3:return
if $sub2="keigen" mov %damage_keigen,%sub3:return
if $sub2="earth_keigen" mov %earth_keigen,%sub3:return
if $sub2="kaihi" mov %kaihi,%sub3:return
if $sub2="alice_skill1" mov %alice_skill1,%sub3:return
if $sub2="alice_skill2" mov %alice_skill2,%sub3:return
if $sub2="alice_skill3" mov %alice_skill3,%sub3:return
if $sub2="skill" mov %skill01,%sub3:return
if $sub2="skill_wind" mov %skill02,%sub3:return
if $sub2="skill_earth" mov %skill03,%sub3:return
if $sub2="skill_aqua" mov %skill04,%sub3:return
if $sub2="skill_fire" mov %skill05,%sub3
if $sub2="tikei" mov %tikei,%sub3:return
if $sub2="henka1" mov %henkahp1,%sub3:return
if $sub2="henka2" mov %henkahp2,%sub3:return
if $sub2="henka3" mov %henkahp3,%sub3:return
if $sub2="kousoku" gosub *mls_cmd_change_kousoku:return
if $sub2="status" gosub *mls_cmd_change_status:return
if $sub2="action" mov %before_action,%sub3:return
if $sub2="wind" gosub *mls_cmd_change_wind:return
if $sub2="earth" gosub *mls_cmd_change_earth:return
if $sub2="aqua" gosub *mls_cmd_change_aqua:return
if $sub2="fire" gosub *mls_cmd_change_fire:return
if $sub2="kousoku_type" mov %kousoku_type,%sub3:return
if $sub2="kaihi_el" mov %kaihi_el,%sub3:return
if $sub2="earth_el" mov %earth_keigen_el,%sub3:return
if $sub2="fire_el" mov %fire_keigen_el,%sub3:return
if $sub2="damage_el" mov %damage_keigen_el,%sub3:return
if $sub2="kadora_damage" mov %kadora_damage,%sub3:return
if $sub2="charge" mov %bougyo_attack,%sub3
if $sub2="skilla1" mov %tuika_skilla1,%sub3:return
if $sub2="skilla2" mov %tuika_skilla2,%sub3:return
if $sub2="skilla3" mov %tuika_skilla3,%sub3:return
if $sub2="skilla4" mov %tuika_skilla4,%sub3:return
if $sub2="skilla5" mov %tuika_skilla5,%sub3:return
if $sub2="skilla6" mov %tuika_skilla6,%sub3:return
if $sub2="skilla7" mov %tuika_skilla7,%sub3:return
if $sub2="skilla8" mov %tuika_skilla8,%sub3:return
if $sub2="skillb1" mov %tuika_skillb1,%sub3:return
if $sub2="skillb2" mov %tuika_skillb2,%sub3:return
if $sub2="skillb3" mov %tuika_skillb3,%sub3:return
if $sub2="skillb4" mov %tuika_skillb4,%sub3:return
if $sub2="skillc1" mov %tuika_skillc1,%sub3:return
if $sub2="skillc2" mov %tuika_skillc2,%sub3:return
if $sub2="skillc3" mov %tuika_skillc3,%sub3:return
if $sub2="skillc4" mov %tuika_skillc4,%sub3:return
if $sub2="skilltame0" mov %tuika_skille1,%sub3:return
if $sub2="skillcounter0" mov %tuika_skillf1,%sub3:return
if $sub2="skillcounter2" mov %tuika_skilld1,%sub3:return
if $sub2="skillcounter3" mov %tuika_skilld2,%sub3:return
if $sub2="skillcounter4" mov %tuika_skilld3,%sub3:return
if $sub2="skillcounter5" mov %tuika_skilld4,%sub3:return
if $sub2="skilld1" mov %tuika_skilld1,%sub3:return
if $sub2="skilld2" mov %tuika_skilld2,%sub3:return
if $sub2="skilld3" mov %tuika_skilld3,%sub3:return
if $sub2="skilld4" mov %tuika_skilld4,%sub3:return
if $sub2="sinkou" && %kousan=0 mov %sinkou,%sub3:return
if $sub2="customattack" mov %hanyo2,%sub3:return
if $sub2="customskill" mov %hanyo3,%sub3:return
if $sub2="skill_sub" mov %skill_sub,%sub3:return
if $sub2="customguard" mov %hanyo4,%sub3:return
if $sub2="customwait" mov %hanyo5,%sub3:return
if $sub2="customstruggle" mov %hanyo6,%sub3:return
if $sub4="+" goto *mls_cmd_change_add
if $sub4="-" goto *mls_cmd_change_sub
if $sub2="mp" mov %mp,%sub3:gosub *mls_cmd_change_mp:return
if $sub2="max_mp" mov %max_mp,%sub3:gosub *mls_cmd_change_mp:return
if $sub2="enemylife" mov %enemylife,%sub3:gosub *mls_cmd_change_enemylife:return
if $sub2="max_enemylife" mov %max_enemylife,%sub3:gosub *mls_cmd_change_enemylife:return
if $sub2="mylife" mov %mylife,%sub3:gosub *mls_cmd_change_mylife:return
if $sub2="max_mylife" mov %max_mylife,%sub3:gosub *mls_cmd_change_mylife:return
if $sub2="wind_turn" mov %wind_turn,%sub3:return
if $sub2="earth_turn" mov %earth_turn,%sub3:return
if $sub2="aqua_turn" mov %aqua_turn,%sub3:return
if $sub2="fire_turn" mov %fire_turn,%sub3:return
if $sub2="genmogaku" mov %genmogaku,%sub3:return
if $sub2="kousoku_hp" mov %kousoku_hp,%sub3:return
if $sub2="abairitu" mov %abairitu,%sub3:return
if $sub2="status_turn" mov %status_turn,%sub3:return
if $sub2="poison" mov %poison,%sub3:gosub *status_print:return
if $sub2="counter" mov %counter,%sub3:return
if $sub2="counta1" mov %tuika_owaza_count1a,%sub3:return
if $sub2="counta2" mov %tuika_owaza_count1b,%sub3:return
if $sub2="counta3" mov %tuika_owaza_count1c,%sub3:return
if $sub2="counta4" mov %tuika_owaza_count1d,%sub3:return
if $sub2="counta5" mov %tuika_owaza_count1e,%sub3:return
if $sub2="counta6" mov %tuika_owaza_count1f,%sub3:return
if $sub2="counta7" mov %tuika_owaza_count1g,%sub3:return
if $sub2="counta8" mov %tuika_owaza_count1h,%sub3:return
if $sub2="countb1" mov %tuika_owaza_count2a,%sub3:return
if $sub2="countb2" mov %tuika_owaza_count2b,%sub3:return
if $sub2="countb3" mov %tuika_owaza_count2c,%sub3:return
if $sub2="countb4" mov %tuika_owaza_count2d,%sub3:return
if $sub2="countc1" mov %tuika_owaza_count3a,%sub3:return
if $sub2="countc2" mov %tuika_owaza_count3b,%sub3:return
if $sub2="countc3" mov %tuika_owaza_count3c,%sub3:return
if $sub2="countc4" mov %tuika_owaza_count3d,%sub3:return
if $sub2="counttame0" mov %tuika_owaza_count4a,%sub3:return
if $sub2="countcounter0" mov %tuika_owaza_count4b,%sub3:return
if $sub2="enemy_wind" mov %enemy_wind,%sub3:return
if $sub2="enemy_earth" mov %enemy_earth,%sub3:return
if $sub2="enemy_aqua" mov %enemy_aqua,%sub3:return
if $sub2="enemy_fire" mov %enemy_fire,%sub3:return
return



*mls_cmd_change_first_sel

if $sub3="" mov %sub3,1:skip 3
gosub *check_var3
if %sub3<>0 && %sub3<>1 return
if $sub2="first_sel1" mov %first_sel1,%sub3:return
if $sub2="first_sel2" mov %first_sel2,%sub3:return
if $sub2="first_sel3" mov %first_sel3,%sub3:return
if $sub2="first_sel4" mov %first_sel4,%sub3:return
if $sub2="first_sel5" mov %first_sel5,%sub3:return
if $sub2="first_sel6" mov %first_sel6,%sub3:return
if $sub2="first_sel7" mov %first_sel7,%sub3:return
if $sub2="first_sel8" mov %first_sel8,%sub3:return
if $sub2="first_sel9" mov %first_sel9,%sub3:return
if $sub2="first_sel10" mov %first_sel10,%sub3:return
return



*mls_cmd_change_kousoku

if %sub3=3 && %kousoku<>3 gosub *tuika_kakuritu1
if %kousoku<>3 mov %kousoku,%sub3
if $sub4="" gosub *status_print:return
gosub *check_var4
if %sub4=-1 return
if %sub4=0 gosub *status_printn:return
if %sub4=1 gosub *status_print
return



*mls_cmd_change_status

mov %status,%sub3
if $sub4="" gosub *status_print:return
gosub *check_var4
if %sub4=-1 return
if %sub4=0 gosub *status_printn:return
if %sub4=1 gosub *status_print
return



*mls_cmd_change_wind

mov %wind,%sub3
if %sub3=0 mov %wind_turn,0
if $sub4="" mov %windiconlock,0:gosub *elm_print:mov %windiconlock,1:return
gosub *check_var4
if %sub4=-1 return
if %sub4=0 mov %windiconlock,0:gosub *elm_printn:mov %windiconlock,1:return
if %sub4=1 mov %windiconlock,0:gosub *elm_print:mov %windiconlock,1
return



*mls_cmd_change_earth

mov %earth,%sub3
if %sub3=0 mov %earth_turn,0
if $sub4="" gosub *elm_print:return
gosub *check_var4
if %sub4=-1 return
if %sub4=0 gosub *elm_printn:return
if %sub4=1 gosub *elm_print
return



*mls_cmd_change_aqua

mov %aqua,%sub3
if %sub3=0 mov %aqua_turn,0
if $sub4="" mov %aquaiconlock,0:gosub *elm_print:mov %aquaiconlock,1:return
gosub *check_var4
if %sub4=-1 return
if %sub4=0 mov %aquaiconlock,0:gosub *elm_printn:mov %aquaiconlock,1:return
if %sub4=1 mov %aquaiconlock,0:gosub *elm_print:mov %aquaiconlock,1
return



*mls_cmd_change_fire

mov %fire,%sub3
if %sub3=0 mov %fire_turn,0
if $sub4="" gosub *elm_print:return
gosub *check_var4
if %sub4=-1 return
if %sub4=0 gosub *elm_printn:return
if %sub4=1 gosub *elm_print
return



*mls_cmd_change_add

if $sub2="mp" add %mp,%sub3:gosub *mls_cmd_change_mp:return
if $sub2="max_mp" add %max_mp,%sub3:gosub *mls_cmd_change_mp:return
if $sub2="enemylife" add %enemylife,%sub3:gosub *mls_cmd_change_enemylife:return
if $sub2="max_enemylife" add %max_enemylife,%sub3:gosub *mls_cmd_change_enemylife:return
if $sub2="mylife" add %mylife,%sub3:gosub *mls_cmd_change_mylife:return
if $sub2="max_mylife" add %max_mylife,%sub3:gosub *mls_cmd_change_mylife:return
if $sub2="wind_turn" add %wind_turn,%sub3:return
if $sub2="earth_turn" add %earth_turn,%sub3:return
if $sub2="aqua_turn" add %aqua_turn,%sub3:return
if $sub2="fire_turn" add %fire_turn,%sub3:return
if $sub2="genmogaku" add %genmogaku,%sub3:return
if $sub2="kousoku_hp" add %kousoku_hp,%sub3:return
if $sub2="abairitu" add %abairitu,%sub3:return
if $sub2="status_turn" add %status_turn,%sub3:return
if $sub2="poison" add %poison,%sub3:gosub *status_print:return
if $sub2="counter" add %counter,%sub3:return
if $sub2="counta1" add %tuika_owaza_count1a,%sub3:return
if $sub2="counta2" add %tuika_owaza_count1b,%sub3:return
if $sub2="counta3" add %tuika_owaza_count1c,%sub3:return
if $sub2="counta4" add %tuika_owaza_count1d,%sub3:return
if $sub2="counta5" add %tuika_owaza_count1e,%sub3:return
if $sub2="counta6" add %tuika_owaza_count1f,%sub3:return
if $sub2="counta7" add %tuika_owaza_count1g,%sub3:return
if $sub2="counta8" add %tuika_owaza_count1h,%sub3:return
if $sub2="countb1" add %tuika_owaza_count2a,%sub3:return
if $sub2="countb2" add %tuika_owaza_count2b,%sub3:return
if $sub2="countb3" add %tuika_owaza_count2c,%sub3:return
if $sub2="countb4" add %tuika_owaza_count2d,%sub3:return
if $sub2="countc1" add %tuika_owaza_count3a,%sub3:return
if $sub2="countc2" add %tuika_owaza_count3b,%sub3:return
if $sub2="countc3" add %tuika_owaza_count3c,%sub3:return
if $sub2="countc4" add %tuika_owaza_count3d,%sub3:return
if $sub2="counttame0" add %tuika_owaza_count4a,%sub3:return
if $sub2="countcounter0" add %tuika_owaza_count4b,%sub3:return
if $sub2="enemy_wind" add %enemy_wind,%sub3:return
if $sub2="enemy_earth" add %enemy_earth,%sub3:return
if $sub2="enemy_aqua" add %enemy_aqua,%sub3:return
if $sub2="enemy_fire" add %enemy_fire,%sub3:return
return



*mls_cmd_change_sub

if $sub2="mp" sub %mp,%sub3:gosub *mls_cmd_change_mp:return
if $sub2="max_mp" sub %max_mp,%sub3:gosub *mls_cmd_change_mp:return
if $sub2="enemylife" sub %enemylife,%sub3:gosub *mls_cmd_change_enemylife:return
if $sub2="max_enemylife" sub %max_enemylife,%sub3:gosub *mls_cmd_change_enemylife:return
if $sub2="mylife" sub %mylife,%sub3:gosub *mls_cmd_change_mylife:return
if $sub2="max_mylife" sub %max_mylife,%sub3:gosub *mls_cmd_change_mylife:return
if $sub2="wind_turn" sub %wind_turn,%sub3:return
if $sub2="earth_turn" sub %earth_turn,%sub3:return
if $sub2="aqua_turn" sub %aqua_turn,%sub3:return
if $sub2="fire_turn" sub %fire_turn,%sub3:return
if $sub2="genmogaku" sub %genmogaku,%sub3:return
if $sub2="kousoku_hp" sub %kousoku_hp,%sub3:return
if $sub2="abairitu" sub %abairitu,%sub3:return
if $sub2="status_turn" sub %status_turn,%sub3:return
if $sub2="poison" sub %poison,%sub3:gosub *status_print:return
if $sub2="counter" sub %counter,%sub3:return
if $sub2="counta1" sub %tuika_owaza_count1a,%sub3:return
if $sub2="counta2" sub %tuika_owaza_count1b,%sub3:return
if $sub2="counta3" sub %tuika_owaza_count1c,%sub3:return
if $sub2="counta4" sub %tuika_owaza_count1d,%sub3:return
if $sub2="counta5" sub %tuika_owaza_count1e,%sub3:return
if $sub2="counta6" sub %tuika_owaza_count1f,%sub3:return
if $sub2="counta7" sub %tuika_owaza_count1g,%sub3:return
if $sub2="counta8" sub %tuika_owaza_count1h,%sub3:return
if $sub2="countb1" sub %tuika_owaza_count2a,%sub3:return
if $sub2="countb2" sub %tuika_owaza_count2b,%sub3:return
if $sub2="countb3" sub %tuika_owaza_count2c,%sub3:return
if $sub2="countb4" sub %tuika_owaza_count2d,%sub3:return
if $sub2="countc1" sub %tuika_owaza_count3a,%sub3:return
if $sub2="countc2" sub %tuika_owaza_count3b,%sub3:return
if $sub2="countc3" sub %tuika_owaza_count3c,%sub3:return
if $sub2="countc4" sub %tuika_owaza_count3d,%sub3:return
if $sub2="counttame0" sub %tuika_owaza_count4a,%sub3:return
if $sub2="countcounter0" sub %tuika_owaza_count4b,%sub3:return
if $sub2="enemy_wind" sub %enemy_wind,%sub3:return
if $sub2="enemy_earth" sub %enemy_earth,%sub3:return
if $sub2="enemy_aqua" sub %enemy_aqua,%sub3:return
if $sub2="enemy_fire" sub %enemy_fire,%sub3:return
return



*mls_cmd_change_mp

if %mp>%max_mp mov %mp,%max_mp
if %mp<0 mov %mp,0
gosub *mp
return



*mls_cmd_change_enemylife

if %enemylife>%max_enemylife mov %enemylife,%max_enemylife
if %enemylife<0 mov %enemylife,0
if %enemylife=0 mov %gage,0 skip 3
mov %gage,%enemylife*100/%max_enemylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 561,":a;system\gagee"+$gagenum+".bmp",421,556
print 10,500
return



*mls_cmd_change_mylife

if %mylife>%max_mylife mov %mylife,%max_mylife
if %mylife<0 mov %mylife,0
if %mylife=0 mov %gage,0 skip 3
mov %gage,%mylife*100/%max_mylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 560,":a;system\gager"+$gagenum+".bmp",114,556
gosub *hp
mov %kadora_damage,1
print 10,500
return



*mls_cmd_strsp

split $mon_labo_mon_ini_cmd,"\",$sub1,$51,$sub3
if $51="" split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4,$sub5,$sub6,$sub7,$sub8,$sub9,$sub10,$50:skip 4
mov $mon_labo_mon_ini_cmd,$sub1+$sub3
split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4,$sub5,$sub6,$sub7,$sub8,$sub9,$sub10,$50
mov $sub3,$51
nobel $sub3:mov $sub3,$sel6
atoi %sub2,$sub2:mov %sub2,%sub2+700
len %name_count,$sub3
atoi %sub4,$sub4:atoi %sub5,$sub5
atoi %sub6,$sub6:atoi %sub7,$sub7
mov %50,0:mov %51,0
if $sub8="1" | $sub8="3" mov %51,1
if $sub8="2" | $sub8="3" mov %50,1
if $sub9="white" mov $sub9,"#FFFFFF"
if $sub10="white" mov $sub10,"#FFFFFF"
if $sub10="" strsp %sub2,$sub3,%sub4,%sub5,(%name_count+1)/2+1,1,%sub6,%sub6,%sub7,0,%50,%51,$sub9:skip 2
strsp %sub2,$sub3,%sub4,%sub5,(%name_count+1)/2+1,1,%sub6,%sub6,%sub7,0,%50,%51,$sub9,$sub10
split $mon_labo_mon_ini_cmd,",",$sub1,$sub1,$sub1,$sub1,$sub1,$sub1,$sub1,$sub1,$sub1,$sub1,$sub3,$sub4,$sub5
if $sub3="" print 1:return
atoi %sub3,$sub3:atoi %sub4,$sub4
if %sub3=0 return
if %sub3=1 print 1:return
if %sub3=15 | %sub3=18 print %sub3,%sub4,$sub5:return
if %sub3<>99 print %sub3,%sub4:return
if $sub5="1" mov $sub5,"system\breakup.dll/urb"
if $sub5="2" mov $sub5,"system\breakup.dll/lrB"
if $sub5="3" mov $sub5,"system\lngtwave.dll/vwi"
if $sub5="4" mov $sub5,"system\trvswave.dll/h"
print 99,%sub4,$sub5
return



*mls_cmd_window

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4
gosub *setwindow_01
if $sub2="" print 1:return
atoi %sub2,$sub2:atoi %sub3,$sub3
if %sub2=0 return
if %sub2=1 print 1:return
if %sub2=15 | %sub2=18 print %sub2,%sub3,$sub4:return
if %sub2<>99 print %sub2,%sub3:return
if $sub4="1" mov $sub4,"system\breakup.dll/urb"
if $sub4="2" mov $sub4,"system\breakup.dll/lrB"
if $sub4="3" mov $sub4,"system\lngtwave.dll/vwi"
if $sub4="4" mov $sub4,"system\trvswave.dll/h"
print 99,%sub3,$sub4
return



*mls_cmd_window2

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4
gosub *mls_cmd_window2a
if $sub2="" print 1:return
atoi %sub2,$sub2:atoi %sub3,$sub3
if %sub2=0 return
if %sub2=1 print 1:return
if %sub2=15 | %sub2=18 print %sub2,%sub3,$sub4:return
if %sub2<>99 print %sub2,%sub3:return
if $sub4="1" mov $sub4,"system\breakup.dll/urb"
if $sub4="2" mov $sub4,"system\breakup.dll/lrB"
if $sub4="3" mov $sub4,"system\lngtwave.dll/vwi"
if $sub4="4" mov $sub4,"system\trvswave.dll/h"
print 99,%sub3,$sub4
return



*mls_cmd_window2a

if %window_type=0 lsp2 245,":a;system\window1.bmp",400,500,100,100,0
if %window_type=1 lsp2 245,":a;system\window1a.bmp",400,500,100,100,0
if %window_type=2 lsp2 245,":a;system\window1b.bmp",400,500,100,100,0
if %window_type=3 lsp2 245,":a;system\window1c.bmp",400,500,100,100,0
if %window_type=4 lsp2 245,":a;system\window1d.bmp",400,500,100,100,0
if %window_type=5 lsp2 245,":a;system\window1e.bmp",400,500,100,100,0
return



*mls_cmd_window_del

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4
saveoff
cspl 3,7
csp 611
if $sub2="" print 1:return
atoi %sub2,$sub2:atoi %sub3,$sub3
if %sub2=0 return
if %sub2=1 print 1:return
if %sub2=15 | %sub2=18 print %sub2,%sub3,$sub4:return
if %sub2<>99 print %sub2,%sub3:return
if $sub4="1" mov $sub4,"system\breakup.dll/urb"
if $sub4="2" mov $sub4,"system\breakup.dll/lrB"
if $sub4="3" mov $sub4,"system\lngtwave.dll/vwi"
if $sub4="4" mov $sub4,"system\trvswave.dll/h"
print 99,%sub3,$sub4
return



*mls_cmd_window_del2

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sub4
csp2 245
if $sub2="" print 1:return
atoi %sub2,$sub2:atoi %sub3,$sub3
if %sub2=0 return
if %sub2=1 print 1:return
if %sub2=15 | %sub2=18 print %sub2,%sub3,$sub4:return
if %sub2<>99 print %sub2,%sub3:return
if $sub4="1" mov $sub4,"system\breakup.dll/urb"
if $sub4="2" mov $sub4,"system\breakup.dll/lrB"
if $sub4="3" mov $sub4,"system\lngtwave.dll/vwi"
if $sub4="4" mov $sub4,"system\trvswave.dll/h"
print 99,%sub3,$sub4
return



*mls_cmd_restart

split $mon_labo_mon_ini_cmd,",",$sub1,$mon_labo_mon_folder
mov $sub1,".\mod\":add $sub1,$mon_labo_mon_folder:add $sub1,"\":mov $mon_labo_mon_folder,$sub1
mov $mon_labo_mon_ini,$mon_labo_mon_folder:add $mon_labo_mon_ini,"story.ini"
mov $mon_labo_mon_ini_sc,"story"
mov %mon_labo_mon_ini_ky,0
goto *monster_labo_story_start



*mls_cmd_anten

cspl 3,7
gosub *clear_sprite
monocro #000000
print 10,3000
csp -1
monocro off
bg black,1
gosub *setwindow_01p
return



*mls_cmd_overkill_end

gosub *clear_sprite
gosub *setwindow_01p
mov %battle,0
mov %hsean,1
mov %mon_labo_mon_ini_ky,0
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_lose_scene"
mov $mon_labo_mon_ini_sc,"lose"+$sel1
goto *monster_labo_story_start



*mls_cmd_spbtn

cspl 4,7:csp 611:print 1
mov %sub3,0:mov %sub4,0
goto *mls_cmd_spbtn_ini



*mls_cmd_spbtn_ini

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3
if $sub2="rclk" mov %sub3,%mon_labo_mon_ini_ky:skip 4
if $sub2="lclk" mov %sub4,%mon_labo_mon_ini_ky:skip 3
gosub *check_var2:add %sub2,700
spbtn %sub2,%mon_labo_mon_ini_ky
mov %mon_labo_mon_ini_ky,%mon_labo_mon_ini_ky+1
itoa $mon_labo_mon_ini_ky,%mon_labo_mon_ini_ky
getini $mon_labo_mon_ini_cmd,$mon_labo_mon_ini,$mon_labo_mon_ini_sc,$mon_labo_mon_ini_ky
if $mon_labo_mon_ini_cmd="" skip -3
split $mon_labo_mon_ini_cmd,",",$sub1
if $sub1="spbtn" goto *mls_cmd_spbtn_ini
btnwait2 %cmd1
if %cmd1=0 && %sub4=0 skip -1
if %cmd1=-1 && %sub3=0 skip -2
if %cmd1<-1 skip -3
btndef clear
if %cmd1=0 mov %sub1,%sub4:goto *mls_cmd_spbtn_jump
if %cmd1=-1 mov %sub1,%sub3:goto *mls_cmd_spbtn_jump
mov %sub1,%cmd1
goto *mls_cmd_spbtn_jump



*mls_cmd_spbtn_jump

itoa $sub1,%sub1
getini $mon_labo_mon_ini_cmd,$mon_labo_mon_ini,$mon_labo_mon_ini_sc,$sub1
split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3
mov %mon_labo_mon_ini_ky,0
mov $mon_labo_mon_ini_sc,$sub3
return



*mls_cmd_battle

add %stack,1
mov %zukanon,3:mov %message_mode,0
getini $name,$mon_labo_mon_ini,"data","name"
nobel $name:mov $name,$sel6
len %name_count,$name
mid $sub6,$name,%name_count-1,1
if $sub6=" " mid $name,$name,0,%name_count-1
mov $name2,$name
mov $lavel,"tuika"
getini $tatie1,$mon_labo_mon_ini,"data","tatie1"
getini $tatie2,$mon_labo_mon_ini,"data","tatie2"
getini $tatie3,$mon_labo_mon_ini,"data","tatie3"
getini $tatie4,$mon_labo_mon_ini,"data","tatie4"
getini $sub1,$mon_labo_mon_ini,"data","monster_x":atoi %monster_x,$sub1
getini $sub1,$mon_labo_mon_ini,"data","monster_y":atoi %monster_y,$sub1
getini $sub1,$mon_labo_mon_ini,"data","tekikazu":atoi %tekikazu,$sub1
if %tekikazu<2 skip 6
getini $tatie1b,$mon_labo_mon_ini,"data","tatie1b"
getini $tatie2b,$mon_labo_mon_ini,"data","tatie2b"
getini $tatie3b,$mon_labo_mon_ini,"data","tatie3b"
getini $sub1,$mon_labo_mon_ini,"data","monster_xb":atoi %monster_xb,$sub1
getini $sub1,$mon_labo_mon_ini,"data","monster_yb":atoi %monster_yb,$sub1
if %tekikazu<3 skip 6
getini $tatie1c,$mon_labo_mon_ini,"data","tatie1c"
getini $tatie2c,$mon_labo_mon_ini,"data","tatie2c"
getini $tatie3c,$mon_labo_mon_ini,"data","tatie3c"
getini $sub1,$mon_labo_mon_ini,"data","monster_xc":atoi %monster_xc,$sub1
getini $sub1,$mon_labo_mon_ini,"data","monster_yc":atoi %monster_yc,$sub1
if %tekikazu<4 skip 6
getini $tatie1d,$mon_labo_mon_ini,"data","tatie1d"
getini $tatie2d,$mon_labo_mon_ini,"data","tatie2d"
getini $tatie3d,$mon_labo_mon_ini,"data","tatie3d"
getini $sub1,$mon_labo_mon_ini,"data","monster_xd":atoi %monster_xd,$sub1
getini $sub1,$mon_labo_mon_ini,"data","monster_yd":atoi %monster_yd,$sub1
getini $sub1,$mon_labo_mon_ini,"ruka","alice":atoi %alice_skill,$sub1
getini $haikei,$mon_labo_mon_ini,"data","haikei"
getini $sub1,$mon_labo_mon_ini,"data","hp":atoi %max_enemylife,$sub1
getini $sub1,$mon_labo_mon_ini,"data","henka1":atoi %henkahp1,$sub1
getini $sub1,$mon_labo_mon_ini,"data","henka2":atoi %henkahp2,$sub1
getini $sub1,$mon_labo_mon_ini,"data","henka3":atoi %henkahp3,$sub1
getini $sub1,$mon_labo_mon_ini,"data","keigen":atoi %damage_keigen,$sub1
getini $sub1,$mon_labo_mon_ini,"data","earth_keigen":atoi %earth_keigen,$sub1
getini $sub1,$mon_labo_mon_ini,"data","kaihi":atoi %kaihi,$sub1
getini $sub1,$mon_labo_mon_ini,"data","alice_skill1":atoi %alice_skill1,$sub1
getini $sub1,$mon_labo_mon_ini,"data","alice_skill2":atoi %alice_skill2,$sub1
getini $sub1,$mon_labo_mon_ini,"data","alice_skill3":atoi %alice_skill3,$sub1
getini $sub1,$mon_labo_mon_ini,"data","music"
gosub *check_dir1
eng $sub1
if $sel6="1 " | $sel6="2 " | $sel6="3 " | $sel6="4 " | $sel6="5 " | $sel6="6 " atoi %music,$sel6:skip 4
if $sel6="7 " | $sel6="8 " | $sel6="9 " | $sel6="10" | $sel6="11" | $sel6="12" atoi %music,$sel6:skip 3
if $sel6="13" | $sel6="14" | $sel6="15" | $sel6="16" | $sel6="17" | $sel6="18" | $sel6="19" atoi %music,$sel6:skip 2
mov %music,99:getini $tuika_bgm,$mon_labo_mon_ini,"data","music"
getini $ori_name,$mon_labo_mon_ini,"ruka","name":if $ori_name="" skip 5
nobel $ori_name:mov $ori_name,$sel6
len %name_count,$ori_name
mid $sub6,$ori_name,%name_count-1,1
if $sub6=" " mid $ori_name,$ori_name,0,%name_count-1
getini $sub1,$mon_labo_mon_ini,"ruka","lv":atoi %mylv,$sub1:if %mylv>99 mov %mylv,99
getini $sub1,$mon_labo_mon_ini,"ruka","skill":atoi %skill01,$sub1
getini $sub1,$mon_labo_mon_ini,"ruka","skill_wind":atoi %skill02,$sub1:if %skill02=1 mov %skill02,0
getini $sub1,$mon_labo_mon_ini,"ruka","skill_earth":atoi %skill03,$sub1:if %skill02=1 mov %skill03,0
getini $sub1,$mon_labo_mon_ini,"ruka","skill_aqua":atoi %skill04,$sub1:if %skill02=1 mov %skill04,0
getini $sub1,$mon_labo_mon_ini,"ruka","skill_fire":atoi %skill05,$sub1:if %skill02=1 mov %skill05,0
getini $sub1,$mon_labo_mon_ini,"hero_skill5","skill_tikei":if $sub1="" mov %tikei,0:skip 4
eng $sub1
if $sel6="1 " | $sel6="2 " | $sel6="3 " | $sel6="4 " | $sel6="5 " atoi %tikei,$sub1:skip 2
mov %tikei,6
getini $sub1,$mon_labo_mon_ini,"data","type":atoi %sub1,$sub1
if %sub1=0 gosub *syutugen:skip 3
if %sub1=1 gosub *syutugen2:skip 2
if %sub1=2 gosub *syutugen_plural
getini $sub1,$mon_labo_mon_ini,"data","tekikazu":atoi %tekikazu,$sub1
getini $sub1,$mon_labo_mon_ini,"ruka","tukix":if $sub1<>"" atoi %tukix,$sub1
mov %battle,1
getini $sub1,$mon_labo_mon_ini,"sinkou1","sinkou_list1":if $sub1<>"" && $sub1<>" " mov %sinkou,1
mov %query_new,0
getini $sub1,$mon_labo_mon_ini,"data","query_new":atoi %sub1,$sub1
if %sub1=1 mov %query_new,1:skip 2
if %sub1=2 mov %query_new,2
getini $mogaku_anno1,$mon_labo_mon_ini,"anno","mogaku_anno1"
getini $mogaku_anno2,$mon_labo_mon_ini,"anno","mogaku_anno2"
getini $mogaku_anno3,$mon_labo_mon_ini,"anno","mogaku_anno3"
getini $mogaku_anno4,$mon_labo_mon_ini,"anno","mogaku_anno4"
getini $kousan,$mon_labo_mon_ini,"anno","kousan_anno1"
getini $mogaku_sel1,$mon_labo_mon_ini,"sel","mogaku_sel1"
getini $mogaku_sel2,$mon_labo_mon_ini,"sel","mogaku_sel2"
getini $mogaku_sel3,$mon_labo_mon_ini,"sel","mogaku_sel3"
getini $mogaku_sel4,$mon_labo_mon_ini,"sel","mogaku_sel4"
getini $mogaku_sel5,$mon_labo_mon_ini,"sel","mogaku_sel5"
getini $mogaku_dassyutu1,$mon_labo_mon_ini,"sel","mogaku_dassyutu1"
getini $mogaku_dassyutu2,$mon_labo_mon_ini,"sel","mogaku_dassyutu2"
getini $mogaku_earth_dassyutu1,$mon_labo_mon_ini,"sel","mogaku_earth_dassyutu1"
getini $mogaku_earth_dassyutu2,$mon_labo_mon_ini,"sel","mogaku_earth_dassyutu2"
getini $mogaku_kaisin1,$mon_labo_mon_ini,"sel","mogaku_kaisin1"
getini $mogaku_kaisin2,$mon_labo_mon_ini,"sel","mogaku_kaisin2"
getini $half_s1,$mon_labo_mon_ini,"sel","half_s1"
getini $half_s2,$mon_labo_mon_ini,"sel","half_s2"
getini $kiki_s1,$mon_labo_mon_ini,"sel","kiki_s1"
getini $kiki_s2,$mon_labo_mon_ini,"sel","kiki_s2"
getini $onedari,$mon_labo_mon_ini,"onedari","onedari_list1"
getini $sub1,$mon_labo_mon_ini,"data","short_name":if $sub1<>"" nobel $sub1:mov $name,$sel6:mov $name2,$name
gosub *tuika_kakuritu
gosub *tuika_count
mov %nanido,1
getini $sub1,$mon_labo_mon_ini,"data","difficult":atoi %sub1,$sub1
if %sub1=1 mov %nanido,2
add %mon_labo_mon_ini_ky,1
sub %stack,1
return



*mls_cmd_battle_start

mov %allcommandsenable,0
getini $sel1,$mon_labo_mon_ini,"data","preemptive"
if $sel1="" goto *common_main
mov $skill_tag,"skill"+$sel1
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_name"
getini $sub2,$mon_labo_mon_ini,$skill_tag,"skill_kouka"
getini $sub3,$mon_labo_mon_ini,$skill_tag,"skill_kakuritu"
getini $sub4,$mon_labo_mon_ini,$skill_tag,"skill_damage1_1"
if $sub1="" && $sub2="" && $sub3="" && $sub4="" goto *empty_skill
gosub *check_skill_name2
if $sel1="tame0" gosub *tuika_tame_zyunbi:goto *common_main
if $sel1="counter0" gosub *tuika_counter_start:goto *common_main
if $sel1="a1" | $sel1="a2" | $sel1="a3" | $sel1="a4" | $sel1="a5" | $sel1="a6" | $sel1="a7" | $sel1="a8" gosub "*tuika_"+$sel1:goto *common_main
add %stack,1
gosub *tuika_a_common
goto *common_main



*check_skill_name2

if $skill_tag="skilltame0" | $skill_tag="skillcounter0" return
len %name_count,$skill_tag
if %name_count<7 return *ret4
mid $sub1,$skill_tag,0,6
if $sub1<>"skilla" return *ret4
mid $sub2,$skill_tag,6,%name_count-6
atoi %sub2,$sub2:itoa $sub3,%sub2
if $sub2<>$sub3 return *ret4
if %sub2<1 return *ret4
return



*cd_cmd_first

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3
len %name_count,$mon_labo_mon_ini_cmd
len %sub2,$sub2:add %sub2,7
mid $sub3,$mon_labo_mon_ini_cmd,%sub2,%name_count-%sub2
gosub *check_var2
if %sub2<1 | %sub2>10 return
if %sub2=1 && %first_sel1=1 return
if %sub2=2 && %first_sel2=1 return
if %sub2=3 && %first_sel3=1 return
if %sub2=4 && %first_sel4=1 return
if %sub2=5 && %first_sel5=1 return
if %sub2=6 && %first_sel6=1 return
if %sub2=7 && %first_sel7=1 return
if %sub2=8 && %first_sel8=1 return
if %sub2=9 && %first_sel9=1 return
if %sub2=10 && %first_sel10=1 return
mov $mon_labo_mon_ini_cmd,$sub3
return *custom_dialog_string



*cd_cmd_second

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3
len %name_count,$mon_labo_mon_ini_cmd
len %sub2,$sub2:add %sub2,8
mid $sub3,$mon_labo_mon_ini_cmd,%sub2,%name_count-%sub2
gosub *check_var2
if %sub2<1 | %sub2>10 return
if %sub2=1 && %first_sel1=0 return
if %sub2=2 && %first_sel2=0 return
if %sub2=3 && %first_sel3=0 return
if %sub2=4 && %first_sel4=0 return
if %sub2=5 && %first_sel5=0 return
if %sub2=6 && %first_sel6=0 return
if %sub2=7 && %first_sel7=0 return
if %sub2=8 && %first_sel8=0 return
if %sub2=9 && %first_sel9=0 return
if %sub2=10 && %first_sel10=0 return
mov $mon_labo_mon_ini_cmd,$sub3
return *custom_dialog_string



*cd_cmd_jumpfirst

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3
gosub *check_var2
if %sub2<1 | %sub2>10 return
if %sub2=1 && %first_sel1<>0 return
if %sub2=2 && %first_sel2<>0 return
if %sub2=3 && %first_sel3<>0 return
if %sub2=4 && %first_sel4<>0 return
if %sub2=5 && %first_sel5<>0 return
if %sub2=6 && %first_sel6<>0 return
if %sub2=7 && %first_sel7<>0 return
if %sub2=8 && %first_sel8<>0 return
if %sub2=9 && %first_sel9<>0 return
if %sub2=10 && %first_sel10<>0 return
mov %mon_labo_mon_ini_ky,-1
mov $mon_labo_mon_ini_sc,$sub3
return



*cd_cmd_jumpfirstline

add %stack,1
split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3
if $sub3="" | $sub2=" " goto *jumpzero
gosub *check_var2
if %sub2<1 | %sub2>10 sub %stack,1:return
if %sub2=1 && %first_sel1<>0 sub %stack,1:return
if %sub2=2 && %first_sel2<>0 sub %stack,1:return
if %sub2=3 && %first_sel3<>0 sub %stack,1:return
if %sub2=4 && %first_sel4<>0 sub %stack,1:return
if %sub2=5 && %first_sel5<>0 sub %stack,1:return
if %sub2=6 && %first_sel6<>0 sub %stack,1:return
if %sub2=7 && %first_sel7<>0 sub %stack,1:return
if %sub2=8 && %first_sel8<>0 sub %stack,1:return
if %sub2=9 && %first_sel9<>0 sub %stack,1:return
if %sub2=10 && %first_sel10<>0 sub %stack,1:return
gosub *check_var3
mov %mon_labo_mon_ini_ky,%sub3-1
sub %stack,1
return



*cd_cmd_list

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3
nobel $sub2:mov $sub2,$sel6
mov $hanlist1,$sub2:add %mon_labo_mon_ini_ky,1
itoa $mon_labo_mon_ini_ky,%mon_labo_mon_ini_ky
getini $mon_labo_mon_ini_cmd,$mon_labo_mon_ini,$mon_labo_mon_ini_sc,$mon_labo_mon_ini_ky
if $mon_labo_mon_ini_cmd="end" skip 11
split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3
if $sub1="list2" nobel $sub2:mov $sub2,$sel6:mov $hanlist2,$sub2
if $sub1="list3" nobel $sub2:mov $sub2,$sel6:mov $hanlist3,$sub2
if $sub1="list4" nobel $sub2:mov $sub2,$sel6:mov $hanlist4,$sub2
if $sub1="list5" nobel $sub2:mov $sub2,$sel6:mov $hanlist5,$sub2
if $sub1="list6" nobel $sub2:mov $sub2,$sel6:mov $hanlist6,$sub2
if $sub1="list7" nobel $sub2:mov $sub2,$sel6:mov $hanlist7,$sub2
if $sub1="list8" nobel $sub2:mov $sub2,$sel6:mov $hanlist8,$sub2
add %mon_labo_mon_ini_ky,1
skip -12
gosub *cmd_hanyo
if %cmd1=-1 sub %stack,1:mov %allcommandsenable,0:return *tuika_main
if %cmd1<11 | %cmd1>18 skip -2
mov %cmd1,%cmd1-10
itoa $sub4,%cmd1
mov %mon_labo_mon_ini_ky,0
itoa $mon_labo_mon_ini_ky,%mon_labo_mon_ini_ky
getini $mon_labo_mon_ini_cmd,$mon_labo_mon_ini,$mon_labo_mon_ini_sc,$mon_labo_mon_ini_ky
split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3
if $sub1<>"list"+$sub4 add %mon_labo_mon_ini_ky,1: skip -3
if $sub3="" | $sub3=" " gosub *common_attack1:sub %stack,1:return
mov %mon_labo_mon_ini_ky,0
mov $mon_labo_mon_ini_sc,$sub3
mov %allcommandsenable,1
gosub *custom_dialog
mov %allcommandsenable,0
sub %stack,1
return



*cd_cmd_execute

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2
if $sub2="pass" mov $skill_tag,"fllwpass":sub %stack,1:return
if $sub2="win" mov $skill_tag,"fllwwin":sub %stack,1:return
mov $skill_tag,"skill"+$sub2
gosub *check_skill_name
len %name_count,$skill_tag
mid $sub2,$skill_tag,5,%name_count-5
mov $skill_tag,"fllw"+$sub2
sub %stack,1
return



*tuika_kakuritu

getini $sub1,$mon_labo_mon_ini,"skilla1","skill_kakuritu":atoi %tuika_skilla1,$sub1
getini $sub1,$mon_labo_mon_ini,"skilla2","skill_kakuritu":atoi %tuika_skilla2,$sub1
getini $sub1,$mon_labo_mon_ini,"skilla3","skill_kakuritu":atoi %tuika_skilla3,$sub1
getini $sub1,$mon_labo_mon_ini,"skilla4","skill_kakuritu":atoi %tuika_skilla4,$sub1
getini $sub1,$mon_labo_mon_ini,"skilla5","skill_kakuritu":atoi %tuika_skilla5,$sub1
getini $sub1,$mon_labo_mon_ini,"skilla6","skill_kakuritu":atoi %tuika_skilla6,$sub1
getini $sub1,$mon_labo_mon_ini,"skilla7","skill_kakuritu":atoi %tuika_skilla7,$sub1
getini $sub1,$mon_labo_mon_ini,"skilla8","skill_kakuritu":atoi %tuika_skilla8,$sub1
getini $sub1,$mon_labo_mon_ini,"skillb1","skill_kakuritu":atoi %tuika_skillb1,$sub1
getini $sub1,$mon_labo_mon_ini,"skillb2","skill_kakuritu":atoi %tuika_skillb2,$sub1
getini $sub1,$mon_labo_mon_ini,"skillb3","skill_kakuritu":atoi %tuika_skillb3,$sub1
getini $sub1,$mon_labo_mon_ini,"skillb4","skill_kakuritu":atoi %tuika_skillb4,$sub1
getini $sub1,$mon_labo_mon_ini,"skillc1","skill_kakuritu":atoi %tuika_skillc1,$sub1
getini $sub1,$mon_labo_mon_ini,"skillc2","skill_kakuritu":atoi %tuika_skillc2,$sub1
getini $sub1,$mon_labo_mon_ini,"skillc3","skill_kakuritu":atoi %tuika_skillc3,$sub1
getini $sub1,$mon_labo_mon_ini,"skillc4","skill_kakuritu":atoi %tuika_skillc4,$sub1
getini $sub1,$mon_labo_mon_ini,"skilltame0","skill_kakuritu":atoi %tuika_skille1,$sub1
getini $sub1,$mon_labo_mon_ini,"skillcounter0","skill_kakuritu":atoi %tuika_skillf1,$sub1
getini $sub1,$mon_labo_mon_ini,"skillcounter2","skill_kakuritu":atoi %tuika_skilld1,$sub1
getini $sub1,$mon_labo_mon_ini,"skillcounter3","skill_kakuritu":atoi %tuika_skilld2,$sub1
getini $sub1,$mon_labo_mon_ini,"skillcounter4","skill_kakuritu":atoi %tuika_skilld3,$sub1
getini $sub1,$mon_labo_mon_ini,"skillcounter5","skill_kakuritu":atoi %tuika_skilld4,$sub1
return



*tuika_kakuritu1

getini $sub1,$mon_labo_mon_ini,"skilld1","skill_kakuritu":atoi %tuika_skilld1,$sub1
getini $sub1,$mon_labo_mon_ini,"skilld2","skill_kakuritu":atoi %tuika_skilld2,$sub1
getini $sub1,$mon_labo_mon_ini,"skilld3","skill_kakuritu":atoi %tuika_skilld3,$sub1
getini $sub1,$mon_labo_mon_ini,"skilld4","skill_kakuritu":atoi %tuika_skilld4,$sub1
return



*tuika_count

getini $sub1,$mon_labo_mon_ini,"skilla1","skill_count"
split $sub1,",",$sub1:atoi %max_owaza_count1a,$sub1
if %max_owaza_count1a>0 mov %tuika_owaza_count1a,%max_owaza_count1a-1
getini $sub1,$mon_labo_mon_ini,"skilla2","skill_count"
split $sub1,",",$sub1:atoi %max_owaza_count1b,$sub1
if %max_owaza_count1b>0 mov %tuika_owaza_count1b,%max_owaza_count1b-1
getini $sub1,$mon_labo_mon_ini,"skilla3","skill_count"
split $sub1,",",$sub1:atoi %max_owaza_count1c,$sub1
if %max_owaza_count1c>0 mov %tuika_owaza_count1c,%max_owaza_count1c-1
getini $sub1,$mon_labo_mon_ini,"skilla4","skill_count"
split $sub1,",",$sub1:atoi %max_owaza_count1d,$sub1
if %max_owaza_count1d>0 mov %tuika_owaza_count1d,%max_owaza_count1d-1
getini $sub1,$mon_labo_mon_ini,"skilla5","skill_count"
split $sub1,",",$sub1:atoi %max_owaza_count1e,$sub1
if %max_owaza_count1e>0 mov %tuika_owaza_count1e,%max_owaza_count1e-1
getini $sub1,$mon_labo_mon_ini,"skilla6","skill_count"
split $sub1,",",$sub1:atoi %max_owaza_count1f,$sub1
if %max_owaza_count1f>0 mov %tuika_owaza_count1f,%max_owaza_count1f-1
getini $sub1,$mon_labo_mon_ini,"skilla7","skill_count"
split $sub1,",",$sub1:atoi %max_owaza_count1g,$sub1
if %max_owaza_count1g>0 mov %tuika_owaza_count1g,%max_owaza_count1g-1
getini $sub1,$mon_labo_mon_ini,"skilla8","skill_count"
split $sub1,",",$sub1:atoi %max_owaza_count1h,$sub1
if %max_owaza_count1h>0 mov %tuika_owaza_count1h,%max_owaza_count1h-1
getini $sub1,$mon_labo_mon_ini,"skillb1","skill_count":atoi %max_owaza_count2a,$sub1
if %max_owaza_count2a>0 mov %tuika_owaza_count2a,%max_owaza_count2a-1
getini $sub1,$mon_labo_mon_ini,"skillb2","skill_count":atoi %max_owaza_count2b,$sub1
if %max_owaza_count2b>0 mov %tuika_owaza_count2b,%max_owaza_count2b-1
getini $sub1,$mon_labo_mon_ini,"skillb3","skill_count":atoi %max_owaza_count2c,$sub1
if %max_owaza_count2c>0 mov %tuika_owaza_count2c,%max_owaza_count2c-1
getini $sub1,$mon_labo_mon_ini,"skillb4","skill_count":atoi %max_owaza_count2d,$sub1
if %max_owaza_count2d>0 mov %tuika_owaza_count2d,%max_owaza_count2d-1
getini $sub1,$mon_labo_mon_ini,"skillc1","skill_count":atoi %max_owaza_count3a,$sub1
if %max_owaza_count3a>0 mov %tuika_owaza_count3a,%max_owaza_count3a-1
getini $sub1,$mon_labo_mon_ini,"skillc2","skill_count":atoi %max_owaza_count3b,$sub1
if %max_owaza_count3b>0 mov %tuika_owaza_count3b,%max_owaza_count3b-1
getini $sub1,$mon_labo_mon_ini,"skillc3","skill_count":atoi %max_owaza_count3c,$sub1
if %max_owaza_count3c>0 mov %tuika_owaza_count3c,%max_owaza_count3c-1
getini $sub1,$mon_labo_mon_ini,"skillc4","skill_count":atoi %max_owaza_count3d,$sub1
if %max_owaza_count3d>0 mov %tuika_owaza_count3d,%max_owaza_count3d-1
getini $sub1,$mon_labo_mon_ini,"skilltame0","skill_count":atoi %max_owaza_count4a,$sub1
if %max_owaza_count4a>0 mov %tuika_owaza_count4a,%max_owaza_count4a-1
if %query_new=1 mov %tuika_owaza_count4a,0
getini $sub1,$mon_labo_mon_ini,"skillcounter0","skill_count":atoi %max_owaza_count4b,$sub1
if %max_owaza_count4b>0 mov %tuika_owaza_count4b,%max_owaza_count4b-1
if %query_new=1 mov %tuika_owaza_count4b,0
return



*tuika_count_reset1

getini $sub1,$mon_labo_mon_ini,"skilla1","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="2" && %owaza_num1<>1 skip 3
if $sub2="1" | $sub2="3" skip 2
mov %tuika_owaza_count1a,0
getini $sub1,$mon_labo_mon_ini,"skilla2","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="2" && %owaza_num1<>2 skip 3
if $sub2="1" | $sub2="3" skip 2
mov %tuika_owaza_count1b,0
getini $sub1,$mon_labo_mon_ini,"skilla3","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="2" && %owaza_num1<>3 skip 3
if $sub2="1" | $sub2="3" skip 2
mov %tuika_owaza_count1c,0
getini $sub1,$mon_labo_mon_ini,"skilla4","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="2" && %owaza_num1<>4 skip 3
if $sub2="1" | $sub2="3" skip 2
mov %tuika_owaza_count1d,0
getini $sub1,$mon_labo_mon_ini,"skilla5","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="2" && %owaza_num1<>5 skip 3
if $sub2="1" | $sub2="3" skip 2
mov %tuika_owaza_count1e,0
getini $sub1,$mon_labo_mon_ini,"skilla6","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="2" && %owaza_num1<>6 skip 3
if $sub2="1" | $sub2="3" skip 2
mov %tuika_owaza_count1f,0
getini $sub1,$mon_labo_mon_ini,"skilla7","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="2" && %owaza_num1<>7 skip 3
if $sub2="1" | $sub2="3" skip 2
mov %tuika_owaza_count1g,0
getini $sub1,$mon_labo_mon_ini,"skilla8","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="2" && %owaza_num1<>8 skip 3
if $sub2="1" | $sub2="3" skip 2
mov %tuika_owaza_count1h,0
getini $sub1,$mon_labo_mon_ini,"skillb1","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="1" | $sub2="3" skip 2
mov %tuika_owaza_count2a,0
getini $sub1,$mon_labo_mon_ini,"skillb2","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="1" | $sub2="3" skip 2
mov %tuika_owaza_count2b,0
getini $sub1,$mon_labo_mon_ini,"skillb3","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="1" | $sub2="3" skip 2
mov %tuika_owaza_count2c,0
getini $sub1,$mon_labo_mon_ini,"skillb4","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="1" | $sub2="3" skip 2
mov %tuika_owaza_count2d,0
getini $sub1,$mon_labo_mon_ini,"skillc1","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="1" | $sub2="3" skip 2
mov %tuika_owaza_count3a,0
getini $sub1,$mon_labo_mon_ini,"skillc2","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="1" | $sub2="3" skip 2
mov %tuika_owaza_count3b,0
getini $sub1,$mon_labo_mon_ini,"skillc3","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="1" | $sub2="3" skip 2
mov %tuika_owaza_count3c,0
getini $sub1,$mon_labo_mon_ini,"skillc4","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="1" | $sub2="3" skip 2
mov %tuika_owaza_count3d,0
return



*tuika_count_reset2

getini $sub1,$mon_labo_mon_ini,"skilla1","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="2" && %owaza_num1<>1 skip 3
if $sub2="1" | $sub2="3" skip 2
mov %tuika_owaza_count1a,1
getini $sub1,$mon_labo_mon_ini,"skilla2","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="2" && %owaza_num1<>2 skip 3
if $sub2="1" | $sub2="3" skip 2
mov %tuika_owaza_count1b,1
getini $sub1,$mon_labo_mon_ini,"skilla3","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="2" && %owaza_num1<>3 skip 3
if $sub2="1" | $sub2="3" skip 2
mov %tuika_owaza_count1c,1
getini $sub1,$mon_labo_mon_ini,"skilla4","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="2" && %owaza_num1<>4 skip 3
if $sub2="1" | $sub2="3" skip 2
mov %tuika_owaza_count1d,1
getini $sub1,$mon_labo_mon_ini,"skilla5","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="2" && %owaza_num1<>5 skip 3
if $sub2="1" | $sub2="3" skip 2
mov %tuika_owaza_count1e,1
getini $sub1,$mon_labo_mon_ini,"skilla6","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="2" && %owaza_num1<>6 skip 3
if $sub2="1" | $sub2="3" skip 2
mov %tuika_owaza_count1f,1
getini $sub1,$mon_labo_mon_ini,"skilla7","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="2" && %owaza_num1<>7 skip 3
if $sub2="1" | $sub2="3" skip 2
mov %tuika_owaza_count1g,1
getini $sub1,$mon_labo_mon_ini,"skilla8","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="2" && %owaza_num1<>8 skip 3
if $sub2="1" | $sub2="3" skip 2
mov %tuika_owaza_count1h,1
getini $sub1,$mon_labo_mon_ini,"skillb1","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="1" | $sub2="3" skip 2
mov %tuika_owaza_count2a,1
getini $sub1,$mon_labo_mon_ini,"skillb2","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="1" | $sub2="3" skip 2
mov %tuika_owaza_count2b,1
getini $sub1,$mon_labo_mon_ini,"skillb3","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="1" | $sub2="3" skip 2
mov %tuika_owaza_count2c,1
getini $sub1,$mon_labo_mon_ini,"skillb4","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="1" | $sub2="3" skip 2
mov %tuika_owaza_count2d,1
getini $sub1,$mon_labo_mon_ini,"skillc1","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="1" | $sub2="3" skip 2
mov %tuika_owaza_count3a,1
getini $sub1,$mon_labo_mon_ini,"skillc2","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="1" | $sub2="3" skip 2
mov %tuika_owaza_count3b,1
getini $sub1,$mon_labo_mon_ini,"skillc3","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="1" | $sub2="3" skip 2
mov %tuika_owaza_count3c,1
getini $sub1,$mon_labo_mon_ini,"skillc4","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="1" | $sub2="3" skip 2
mov %tuika_owaza_count3d,1
return



*tuika_count_reset3

getini $sub1,$mon_labo_mon_ini,"skilla1","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="3" && %owaza_num2<>1 skip 3
if $sub2="1" | $sub2="2" skip 2
mov %tuika_owaza_count1a,1
getini $sub1,$mon_labo_mon_ini,"skilla2","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="3" && %owaza_num2<>2 skip 3
if $sub2="1" | $sub2="2" skip 2
mov %tuika_owaza_count1b,1
getini $sub1,$mon_labo_mon_ini,"skilla3","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="3" && %owaza_num2<>3 skip 3
if $sub2="1" | $sub2="2" skip 2
mov %tuika_owaza_count1c,1
getini $sub1,$mon_labo_mon_ini,"skilla4","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="3" && %owaza_num2<>4 skip 3
if $sub2="1" | $sub2="2" skip 2
mov %tuika_owaza_count1d,1
getini $sub1,$mon_labo_mon_ini,"skilla5","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="3" && %owaza_num2<>5 skip 3
if $sub2="1" | $sub2="2" skip 2
mov %tuika_owaza_count1e,1
getini $sub1,$mon_labo_mon_ini,"skilla6","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="3" && %owaza_num2<>6 skip 3
if $sub2="1" | $sub2="2" skip 2
mov %tuika_owaza_count1f,1
getini $sub1,$mon_labo_mon_ini,"skilla7","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="3" && %owaza_num2<>7 skip 3
if $sub2="1" | $sub2="2" skip 2
mov %tuika_owaza_count1g,1
getini $sub1,$mon_labo_mon_ini,"skilla8","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="3" && %owaza_num2<>8 skip 3
if $sub2="1" | $sub2="2" skip 2
mov %tuika_owaza_count1h,1
getini $sub1,$mon_labo_mon_ini,"skillb1","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="1" | $sub2="2" skip 2
mov %tuika_owaza_count2a,1
getini $sub1,$mon_labo_mon_ini,"skillb2","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="1" | $sub2="2" skip 2
mov %tuika_owaza_count2b,1
getini $sub1,$mon_labo_mon_ini,"skillb3","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="1" | $sub2="2" skip 2
mov %tuika_owaza_count2c,1
getini $sub1,$mon_labo_mon_ini,"skillb4","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="1" | $sub2="2" skip 2
mov %tuika_owaza_count2d,1
getini $sub1,$mon_labo_mon_ini,"skillc1","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="1" | $sub2="2" skip 2
mov %tuika_owaza_count3a,1
getini $sub1,$mon_labo_mon_ini,"skillc2","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="1" | $sub2="2" skip 2
mov %tuika_owaza_count3b,1
getini $sub1,$mon_labo_mon_ini,"skillc3","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="1" | $sub2="2" skip 2
mov %tuika_owaza_count3c,1
getini $sub1,$mon_labo_mon_ini,"skillc4","skill_count"
split $sub1,",",$sub1,$sub2
if $sub2="1" | $sub2="2" skip 2
mov %tuika_owaza_count3d,1
return



*tuika_main

if %kousoku=3 goto *tuika_a
if %status=7 goto *tuika_konran_a
gosub *cmd_main
if %cmd1=11 && %kousoku>0 && %hanyo6>0 goto *tuika_custom_mogaku
if %cmd1=11 && %kousoku>0 && %kousoku_type=0 goto *common_mogaku
if %cmd1=11 && %kousoku>0 && %kousoku_type=1 goto *common_miss3
if %cmd1=11 && %kousoku>0 && %kousoku_type=2 goto *common_miss2
if %cmd1=11 && %hanyo2>0 goto *tuika_custom_attack
if %cmd1=11 goto *common_attack
if %cmd1=12 && %hanyo6>0 goto *tuika_custom_mogaku
if %cmd1=12 && %earth>0 && %genmogaku>0 goto *mogaku_earth1
if %cmd1=12 && %earth>0 && %genmogaku=0 goto *mogaku_earth2
if %cmd1=12 && %genmogaku>0 goto *common_mogaku
if %cmd1=12 && %genmogaku=0 goto *common_mogaku2
if %cmd1=13 && %hanyo4>0 goto *tuika_custom_bougyo
if %cmd1=13 goto *common_bougyo
if %cmd1=14 && %hanyo5>0 goto *tuika_custom_nasugamama
if %cmd1=14 goto *common_nasugamama
if %cmd1=15 goto *tuika_kousan
if %cmd1=16 goto *tuika_onedari
if %cmd1=17 && %hanyo3>0 goto *tuika_custom_skill
if %cmd1=17 goto *common_skill
if %cmd1=18 goto *common_alice_skill
goto *tuika_main



*tuika_konran_a

rnd2 %ransu,1,3
if %ransu=1 && %hanyo2>0 goto *tuika_custom_attack
if %ransu=1 goto *common_attack
if %ransu=2 goto *tuika_konran_a1
if %ransu=3 goto *tuika_konran_a2



*tuika_konran_a1

rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ha!"
if %ransu=2 mov $sel1,"Orya!"
if %ransu=3 mov $sel1,"Hya!"
getini $sel6,$mon_labo_mon_ini,"hero_sel","hero_attack1":if $sel6="" skip 5
if %ransu=1 getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_attack1"
if %ransu=2 getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_attack2"
if %ransu=3 getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_attack3"
if $sel1="" rnd2 %ransu,1,3:skip -3
name $ori_name
eng $sel1:$sel6\
name ""
eng $ori_name+" takes self-inflicted damage!":$sel6\
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\slash.ogg"
mov %sub2,%mylv*9/2
mov %sub3,%mylv*11/2
damage %sub2,%sub3
if %mylife=0 goto *tuika_h_konran
goto *tuika_a



*tuika_konran_a2

rnd2 %ransu,1,6
if %ransu=1 mov $sel1,"I'm a true Hero!"
if %ransu=2 mov $sel1,"Purupurupuru. I'm a goooood slime!"
if %ransu=3 mov $sel1,"Hehehe... So full..."
if %ransu=4 mov $sel1,"Uwaa... Flowers!"
if %ransu=5 mov $sel1,"Where am I!?"
if %ransu=6 mov $sel1,"My mother was an angel, you know!"
getini $sel6,$mon_labo_mon_ini,"hero_sel","hero_konran1":if $sel6="" skip 8
if %ransu=1 getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_konran1"
if %ransu=2 getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_konran2"
if %ransu=3 getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_konran3"
if %ransu=4 getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_konran4"
if %ransu=5 getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_konran5"
if %ransu=6 getini $sel1,$mon_labo_mon_ini,"hero_sel","hero_konran6"
if $sel1="" rnd2 %ransu,1,6:skip -6
name $ori_name
eng $sel1:$sel6\
name ""
eng $ori_name+" babbles incoherently!":$sel6\
goto *tuika_a



*tuika_custom_attack

mov %nikaime,0
itoa $sub1,%hanyo2
mov $mon_labo_mon_ini_sc,"customattack"+$sub1
mov %mon_labo_mon_ini_ky,0
mov %anno_mode,1
mov %allcommandsenable,2
gosub *custom_dialog
mov %allcommandsenable,0
goto *common_attack_end



*tuika_custom_bougyo

mov %before_action,51
mov %bougyo,1
itoa $sub1,%hanyo4:mov $sub1,"customguard"+$sub1
mov %mon_labo_mon_ini_ky,0
mov $mon_labo_mon_ini_sc,$sub1
gosub *custom_dialog
goto *tuika_a



*tuika_custom_nasugamama

mov %before_action,52
itoa $sub1,%hanyo5:mov $sub1,"customwait"+$sub1
mov %mon_labo_mon_ini_ky,0
mov $mon_labo_mon_ini_sc,$sub1
gosub *custom_dialog
goto *tuika_a



*tuika_custom_mogaku

itoa $sub1,%hanyo6:mov $sub1,"customstruggle"+$sub1
if %cmd1=12 skip 4
if %kousoku_type=0 mov %before_action,7:mov $sub2,"attack":mov $sub3,"common_mogaku":goto *tuika_custom_mogaku_execute
if %kousoku_type=1 mov %before_action,10:mov $sub2,"charge":mov $sub3,"common_miss3":goto *tuika_custom_mogaku_execute
if %kousoku_type=2 mov %before_action,9:mov $sub2,"freedom":mov $sub3,"common_miss2":goto *tuika_custom_mogaku_execute
if %earth=0 goto *tuika_custom_mogaku_a
if %genmogaku>0 mov %before_action,7:mov $sub2,"earth1":mov $sub3,"mogaku_earth1":goto *tuika_custom_mogaku_execute
getini $sel1,$mon_labo_mon_ini,$sub1,"earth2success"
if $sel1="" | $sel1=" " skip 5
gosub *check_custom_dialog:if $sel2="custom" gosub *tuika_fail:skip 2
atoi %sub2,$sel1
rnd2 %sub1,1,100
if %sub1>%sub2 mov %before_action,7:mov $sub2,"earth1":mov $sub3,"mogaku_earth1":goto *tuika_custom_mogaku_execute
mov %before_action,8
mov $sub2,"earth2"
mov $sub3,"mogaku_earth2"
goto *tuika_custom_mogaku_execute



*tuika_custom_mogaku_a

if %genmogaku>0 mov %before_action,7:mov $sub2,"mogaku1":mov $sub3,"common_mogaku":goto *tuika_custom_mogaku_execute
getini $sel1,$mon_labo_mon_ini,$sub1,"mogaku2success"
if $sel1<>"" && $sel1<>" " skip 7
if %nanido<>2 skip 5
getini $sel1,$mon_labo_mon_ini,$sub1,"mogaku2"
if $sel1="" | $sel1=" " goto *common_mogaku2
rnd2 %sub1,1,10
if %sub1=5 mov %before_action,7:mov $sub2,"mogaku1":mov $sub3,"common_mogaku":goto *tuika_custom_mogaku_execute
skip 5
gosub *check_custom_dialog:if $sel2="custom" gosub *tuika_fail:skip 2
atoi %sub2,$sel1
rnd2 %sub1,1,100
if %sub1>%sub2 mov %before_action,7:mov $sub2,"mogaku1":mov $sub3,"common_mogaku":goto *tuika_custom_mogaku_execute
mov %before_action,8
mov $sub2,"mogaku2"
mov $sub3,"common_mogaku2"
goto *tuika_custom_mogaku_execute



*tuika_custom_mogaku_execute

getini $sub1,$mon_labo_mon_ini,$sub1,$sub2
if $sub1="" | $sub1=" " goto "*"+$sub3
mov %mon_labo_mon_ini_ky,0
mov $mon_labo_mon_ini_sc,$sub1
mov %allcommandsenable,4
gosub *custom_dialog
mov %allcommandsenable,0
goto *tuika_a



*tuika_fail

add %stack,1
mov $mon_labo_mon_ini_sc,$sel1
mov %mon_labo_mon_ini_ky,0
goto *tuika_fail_commands



*tuika_fail_commands

if %mon_labo_mon_ini_ky>4999 goto *overflow
itoa $mon_labo_mon_ini_ky,%mon_labo_mon_ini_ky
getini $mon_labo_mon_ini_cmd,$mon_labo_mon_ini,$mon_labo_mon_ini_sc,$mon_labo_mon_ini_ky
if $mon_labo_mon_ini_cmd="" add %mon_labo_mon_ini_ky,1:goto *tuika_fail_commands
split $mon_labo_mon_ini_cmd,",",$sub1
if $sub1="fail" mov %sub2,0:sub %stack,1:return
if $sub1="end" mov %sub2,100:sub %stack,1:return
if $sub1="gotoline" gosub *mls_cmd_gotoline:skip 7
if $sub1="var_ld" gosub *mls_cmd_var_ld:skip 6
if $sub1="var_cal" gosub *mls_cmd_var_cal:skip 5
if $sub1="var_cpa" gosub *mls_cmd_var_cpa:skip 4
if $sub1="var_jumpline" gosub *mls_cmd_var_jumpline:skip 3
if $sub1="var_dice" gosub *mls_cmd_var_dice:skip 2
if $sub1="var_dice2" gosub *mls_cmd_var_dice2
add %mon_labo_mon_ini_ky,1
goto *tuika_fail_commands



*tuika_custom_skill

gosub *cmd_skill
if %cmd1=21 mov %before_action,21:mov $sub1,"skill1":goto *tuika_custom_skill_apply
if %cmd1=22 && %skill01>1 && %skill01<6 mov %before_action,41:mov $sub1,"skill2":goto *tuika_custom_skill_apply
if %cmd1=22 && %skill01>5 mov %before_action,24:mov $sub1,"skill6":goto *tuika_custom_skill_apply
if %cmd1=23 mov %before_action,22:mov $sub1,"skill3":goto *tuika_custom_skill_apply
if %cmd1=24 mov %before_action,42:mov $sub1,"skill4":goto *tuika_custom_skill_apply
if %cmd1=25 mov %before_action,23:mov $sub1,"skill5":goto *tuika_custom_skill_apply
if %cmd1=26 mov %before_action,25:mov $sub1,"skill11":goto *tuika_custom_skill_apply
if %cmd1=27 mov %before_action,26:mov $sub1,"skill12":goto *tuika_custom_skill_apply
if %cmd1=28 mov %before_action,27:mov $sub1,"skill13":goto *tuika_custom_skill_apply
if %cmd1=29 mov %before_action,47:mov $sub1,"skill15":goto *tuika_custom_skill_apply
if %cmd1=30 mov %before_action,29:mov $sub1,"skill16":goto *tuika_custom_skill_apply
if %cmd1=31 && %skill02<2 mov %before_action,43:mov $sub1,"skill7":goto *tuika_custom_skill_apply
if %cmd1=31 && %skill02=2 mov %before_action,43:mov $sub1,"skill7b":goto *tuika_custom_skill_apply
if %cmd1=31 && %skill02=3 mov %before_action,43:mov $sub1,"skill7c":goto *tuika_custom_skill_apply
if %cmd1=31 && %skill02=4 mov %before_action,43:mov $sub1,"skill7d":goto *tuika_custom_skill_apply
if %cmd1=31 && %skill02=5 mov %before_action,43:mov $sub1,"skill7e":goto *tuika_custom_skill_apply
if %cmd1=32 && %skill03<2 mov %before_action,44:mov $sub1,"skill8":goto *tuika_custom_skill_apply
if %cmd1=32 && %skill03=2 mov %before_action,44:mov $sub1,"skill8b":goto *tuika_custom_skill_apply
if %cmd1=32 && %skill03=3 mov %before_action,44:mov $sub1,"skill8c":goto *tuika_custom_skill_apply
if %cmd1=32 && %skill03=4 mov %before_action,44:mov $sub1,"skill8b":goto *tuika_custom_skill_apply
if %cmd1=32 && %skill03=5 mov %before_action,44:mov $sub1,"skill8c":goto *tuika_custom_skill_apply
if %cmd1=33 && %skill04<2 mov %before_action,45:mov $sub1,"skill10":goto *tuika_custom_skill_apply
if %cmd1=33 && %skill04=2 mov %before_action,45:mov $sub1,"skill10b":goto *tuika_custom_skill_apply
if %cmd1=33 && %skill04=3 mov %before_action,45:mov $sub1,"skill10c":goto *tuika_custom_skill_apply
if %cmd1=33 && %skill04=4 mov %before_action,45:mov $sub1,"skill10d":goto *tuika_custom_skill_apply
if %cmd1=33 && %skill04=5 mov %before_action,45:mov $sub1,"skill10e":goto *tuika_custom_skill_apply
if %cmd1=34 && %skill05<2 mov %before_action,46:mov $sub1,"skill14":goto *tuika_custom_skill_apply
if %cmd1=34 && %skill05=2 mov %before_action,46:mov $sub1,"skill14b":goto *tuika_custom_skill_apply
if %cmd1=34 && %skill05=3 mov %before_action,46:mov $sub1,"skill14c":goto *tuika_custom_skill_apply
if %cmd1=34 && %skill05=4 mov %before_action,46:mov $sub1,"skill14b":goto *tuika_custom_skill_apply
if %cmd1=34 && %skill05=5 mov %before_action,46:mov $sub1,"skill14c":goto *tuika_custom_skill_apply
if %cmd1=35 mov %before_action,55:mov $sub1,"skill17":goto *tuika_custom_skill_apply
if %cmd1=36 mov %before_action,60:mov $sub1,"skill18":goto *tuika_custom_skill_apply
if %cmd1=37 mov %before_action,30:mov $sub1,"skill19":goto *tuika_custom_skill_apply
if %cmd1=38 mov %before_action,31:mov $sub1,"skill20":goto *tuika_custom_skill_apply
if %cmd1=39 mov %before_action,32:mov $sub1,"skill21":goto *tuika_custom_skill_apply
if %cmd1=44 mov %before_action,59:mov $sub1,"skill22":goto *tuika_custom_skill_apply
if %cmd1=45 mov %before_action,56:mov $sub1,"skill23":goto *tuika_custom_skill_apply
if %cmd1=42 mov %before_action,34:mov $sub1,"skill24":goto *tuika_custom_skill_apply
if %cmd1=43 mov %before_action,57:mov $sub1,"skill25":goto *tuika_custom_skill_apply
if %cmd1=-1 goto "*"+$lavel+"_main"



*tuika_custom_skill_apply

itoa $sub2,%hanyo3:mov $sub2,"customskill"+$sub2
getini $sel6,$mon_labo_mon_ini,$sub2,$sub1
if $sel6="" | $sel6=" " goto "*"+$sub1
mov %mon_labo_mon_ini_ky,0
mov $mon_labo_mon_ini_sc,$sel6
mov %allcommandsenable,3
gosub *custom_dialog
mov %allcommandsenable,0
goto *common_attack_end



*custom_tag_check

if $lavel<>"tuika" | %hanyo3=0 return
itoa $sub2,%hanyo3:mov $sub2,"customskill"+$sub2
getini $sel6,$mon_labo_mon_ini,$sub2,$sel2+"tag"
if $sel6="" return
if $sel6=" " mov $sel1,"":return
mov $sel1,$sel6
return



*tuika_yuwaku_a

goto *tuika_a



*tuika_v

if %henkahp1=0 skip 4
getini $sel1,$mon_labo_mon_ini,"data","henka1"
split $sel1,",",$sub1,$sub2,$sub3
if $sub3="1" | $sub3="2" goto *tuika_a
if %henkahp2=0 skip 4
getini $sel1,$mon_labo_mon_ini,"data","henka2"
split $sel1,",",$sub1,$sub2,$sub3
if $sub3="1" | $sub3="2" goto *tuika_a
if %henkahp3=0 skip 4
getini $sel1,$mon_labo_mon_ini,"data","henka3"
split $sel1,",",$sub1,$sub2,$sub3
if $sub3="1" | $sub3="2" goto *tuika_a
gosub *face3
getini $sel1,$mon_labo_mon_ini,"sel","vic_sel1"
getini $sel2,$mon_labo_mon_ini,"sel","vic_sel2"
mov $sel3,""
gosub *selprintname
getini $sub1,$mon_labo_mon_ini,"data","vic_effevt":atoi %sub1,$sub1
if %sub1=0 dwave 1,"se\syometu.ogg"
if %sub1=0 csp 700:print 99,4500,"system\breakup.dll/urb"
if %sub1=2 dwave 1,"se\bun.ogg"
if %sub1=2 csp 700:print 99,1000,"system\breakup.dll/lrB"
getini $name,$mon_labo_mon_ini,"data","name"
nobel $name:mov $name,$sel6
getini $sel1,$mon_labo_mon_ini,"anno","vic_anno1"
getini $sel2,$mon_labo_mon_ini,"anno","vic_anno2"
mov $sel3,""
gosub *selprint
if %battle_auto=1 skipoff
mov %battle,0
mov %alice_skill,0
wait 1000
if %aqua<>2 skip 4
if %mon_labo_on<>1 bg "BG\"+$haikei+".bmp",10,1500:skip 3
gosub *check_haikei:if $teigi2="skip" skip 2
bg $teigi3+$teigi1,10,1500
getini $sub1,$mon_labo_mon_ini,"data","vic_effevt":atoi %sub1,$sub1
if %sub1<>4 bgmonce "bgm\fanfale.ogg"
cspl 0,611
gosub *setwindow_01p
getini $sub1,$mon_labo_mon_ini,"data","type":atoi %sub1,$sub1
getini $sub1,$mon_labo_mon_ini,"data","vic_effevt":atoi %sub2,$sub1
if %sub2=4 skip 6
if %sub2=3 && %sub1=2 eng $name+" were chased away!":skip 4
if %sub2=3 && %sub1<>2 eng $name+" was chased away!":skip 3
if %sub1=2 eng $name+" were defeated!"
if %sub1<>2 eng $name+" was defeated!"
$sel6\
mov %zukanon,0
mov %mon_labo_mon_ini_ky,0
mov $mon_labo_mon_ini_sc,"victory"
goto *monster_labo_story_start



*tuika_a

if %sinkou>0 gosub *tuika_sinkou
if %kousoku=3 goto *tuika_trigger_followup
if %kousoku=0 && %henkahp1>0 gosub *tuika_trigger_henka1:skip 3
if %kousoku=0 && %henkahp2>0 gosub *tuika_trigger_henka2:skip 2
if %kousoku=0 && %henkahp3>0 gosub *tuika_trigger_henka3
if %kousoku>0 && %kousoku_type=2 && %kousoku_hp<0 goto *tuika_dasyutu
goto *tuika_trigger_followup



*tuika_ax

len %name_count,$skill_tag:if %name_count<4 skip 3
mid $sub1,$skill_tag,0,4:if $sub1<>"fllw" skip 2
goto *tuika_trigger_followup
rnd2 %ransu,1,100
if %ransu<=%tuika_skilld1 && %tuika_skilld1>0 gosub *tuika_d1:gosub *tuika_sinkou_after:goto *common_main
if %tuika_skilld1>0 sub %ransu,%tuika_skilld1
if %ransu<=%tuika_skilld2 && %tuika_skilld2>0 gosub *tuika_d2:gosub *tuika_sinkou_after:goto *common_main
if %tuika_skilld2>0 sub %ransu,%tuika_skilld2
if %ransu<=%tuika_skilld3 && %tuika_skilld3>0 gosub *tuika_d3:gosub *tuika_sinkou_after:goto *common_main
if %tuika_skilld3>0 sub %ransu,%tuika_skilld3
if %ransu<=%tuika_skilld4 && %tuika_skilld4>0 gosub *tuika_d4:gosub *tuika_sinkou_after:goto *common_main
skip -8



*tuika_dasyutu

gosub *face3
dwave 1,"se\dassyutu.ogg"
mov %kousoku,0:gosub *status_print
if %enemylife=0 goto "*"+$lavel+"_v"
if $mogaku_anno2="" | $mogaku_anno2=" " skip 4
mov $sel1,$mogaku_anno2:gosub *check_custom_dialog
if $sel2="custom" gosub *custom_dialog_start:skip 2
eng $mogaku_anno2:$sel6\
gosub *face3
mov $sel1,$mogaku_dassyutu1
mov $sel2,$mogaku_dassyutu2
mov $sel3,""
gosub *selprintname
gosub *face1
if $lavel="tuika" && %query_new=1 gosub *tuika_count_reset1
getini $mogaku_anno1,$mon_labo_mon_ini,"anno","mogaku_anno1"
getini $mogaku_anno2,$mon_labo_mon_ini,"anno","mogaku_anno2"
getini $mogaku_anno3,$mon_labo_mon_ini,"anno","mogaku_anno3"
getini $mogaku_anno4,$mon_labo_mon_ini,"anno","mogaku_anno4"
getini $mogaku_sel1,$mon_labo_mon_ini,"sel","mogaku_sel1"
getini $mogaku_sel2,$mon_labo_mon_ini,"sel","mogaku_sel2"
getini $mogaku_sel3,$mon_labo_mon_ini,"sel","mogaku_sel3"
getini $mogaku_sel4,$mon_labo_mon_ini,"sel","mogaku_sel4"
getini $mogaku_sel5,$mon_labo_mon_ini,"sel","mogaku_sel5"
getini $mogaku_dassyutu1,$mon_labo_mon_ini,"sel","mogaku_dassyutu1"
getini $mogaku_dassyutu2,$mon_labo_mon_ini,"sel","mogaku_dassyutu2"
getini $mogaku_earth_dassyutu1,$mon_labo_mon_ini,"sel","mogaku_earth_dassyutu1"
getini $mogaku_earth_dassyutu2,$mon_labo_mon_ini,"sel","mogaku_earth_dassyutu2"
getini $mogaku_kaisin1,$mon_labo_mon_ini,"sel","mogaku_kaisin1"
getini $mogaku_kaisin2,$mon_labo_mon_ini,"sel","mogaku_kaisin2"
goto *common_main



*tuika_trigger_followup

len %name_count,$skill_tag
if %name_count<6 goto *tuika_query_bind1
mid $sub1,$skill_tag,0,4:if $sub1<>"fllw" goto *tuika_query_bind1
mid $skill_tag,$skill_tag,4,%name_count-4
if $skill_tag="win" mov %henkahp1,0:mov %henkahp2,0:mov %henkahp3,0:goto *tuika_v
if $skill_tag="pass" goto *common_main
mov $skill_tag,"skill"+$skill_tag
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_name"
getini $sub2,$mon_labo_mon_ini,$skill_tag,"skill_kouka"
getini $sub3,$mon_labo_mon_ini,$skill_tag,"skill_kakuritu"
getini $sub4,$mon_labo_mon_ini,$skill_tag,"skill_damage1_1"
if $skill_tag<>"skilltame2" && $sub1="" && $sub2="" && $sub3="" && $sub4="" mov $skill_tag,"skill"+$skill_tag:goto *empty_skill
gosub *check_skill_name
if $skill_tag<>"skillcounter0" && $skill_tag<>"skillcounter1" && $skill_tag<>"skilltame0" && $skill_tag<>"skilltame1" && $skill_tag<>"skilltame2" skip 9
if %kousoku>0 skip 8
if $skill_tag="skillcounter0" && %counter>0 gosub *tuika_counter_end:gosub *tuika_sinkou_after:goto *common_main
if $skill_tag="skillcounter0" gosub *tuika_counter_start:gosub *tuika_sinkou_after:goto *common_main
if $skill_tag="skillcounter1" gosub *tuika_counter:gosub *tuika_sinkou_after:goto *common_main
if %counter>0 skip 4
if $skill_tag="skilltame0" gosub *tuika_tame_zyunbi:gosub *tuika_sinkou_after:goto *common_main
if $skill_tag="skilltame1" gosub *tuika_tame_hit:gosub *tuika_sinkou_after:goto *common_main
if $skill_tag="skilltame2" gosub *tuika_tame_miss:gosub *tuika_sinkou_after:goto *common_main
gosub *check_skill_type1
getini $sub2,$mon_labo_mon_ini,$skill_tag,"skill_kouka":atoi %sub2,$sub2
if %kousoku=3 skip 5
if %sub2=2 && %status=8 skip 3
if %sub2=2 && %status<>0 goto *tuika_query_bind1
skip 2
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_status":atoi %sub1,$sub1:if %sub1<>8 goto *tuika_query_bind1
len %name_count,$skill_tag
mid $sub1,$skill_tag,5,%name_count-5
if $sub1="a1" | $sub1="a2" | $sub1="a3" | $sub1="a4" | $sub1="a5" | $sub1="a6" | $sub1="a7" | $sub1="a8" gosub "*tuika_"+$sub1:gosub *tuika_sinkou_after:goto *common_main
if $sub1="b1" | $sub1="b2" | $sub1="b3" | $sub1="b4" | $sub1="c1" | $sub1="c2" | $sub1="c3" | $sub1="c4" gosub "*tuika_"+$sub1:gosub *tuika_sinkou_after:goto *common_main
if $sub1="d1" | $sub1="d2" | $sub1="d3" | $sub1="d4" gosub "*tuika_"+$sub1:gosub *tuika_sinkou_after:goto *common_main
if $sub1="counter2" | $sub1="counter3" | $sub1="counter4" | $sub1="counter5" gosub "*tuika_"+$sub1:gosub *tuika_sinkou_after:goto *common_main
if %counter>0 add %stack,1:gosub *tuika_counter_common:gosub *tuika_sinkou_after:goto *common_main
if %kousoku=1 add %stack,1:gosub *tuika_bc_common:gosub *tuika_sinkou_after:goto *common_main
if %kousoku=2 add %stack,1:gosub *tuika_bc_common:gosub *tuika_sinkou_after:goto *common_main
if %kousoku=3 add %stack,1:gosub *tuika_d_common:gosub *tuika_sinkou_after:goto *common_main
add %stack,1
gosub *tuika_a_common
gosub *tuika_sinkou_after
goto *common_main



*check_skill_name

if $skill_tag="skilltame0" | $skill_tag="skilltame1" | $skill_tag="skilltame2" | $skill_tag="skillcounter0" return
len %name_count,$skill_tag
if %name_count<13 skip 3
mid $sub1,$skill_tag,0,12
if $sub1="skillcounter" mid $sub2,$skill_tag,12,%name_count-12:skip 5
if %name_count<7 return *ret2
mid $sub1,$skill_tag,0,6
if $sub1<>"skilla" && $sub1<>"skillb" && $sub1<>"skillc" && $sub1<>"skilld" return *ret2
mid $sub2,$skill_tag,6,%name_count-6
atoi %sub2,$sub2:itoa $sub3,%sub2
if $sub2<>$sub3 return *ret2
if %sub2<1 return *ret2
return



*check_skill_type1

len %name_count,$skill_tag
if %counter=0 skip 6
if %counter=1 return *tuika_query_bind1
if %name_count<13 return *tuika_query_bind1
mid $sub1,$skill_tag,0,12
if $sub1<>"skillcounter" return *tuika_query_bind1
return
if %name_count<7 return *tuika_query_bind1
mid $sub1,$skill_tag,0,6
if %kousoku=3 && $sub1<>"skilld" return *tuika_query_bind1
if %kousoku=2 && $sub1<>"skillc" return *tuika_query_bind1
if %kousoku=1 && $sub1<>"skillb" return *tuika_query_bind1
if %kousoku=0 && $sub1<>"skilla" return *tuika_query_bind1
return



*tuika_query_bind1

if %kousoku=3 goto *tuika_ax
if %counter>1 goto *tuika_counter_query
if %counter=1 gosub *tuika_counter_end:goto *common_main
if %kousoku=0 && %bougyo_attack=1 && %bougyo=0 gosub *tuika_tame_hit:gosub *tuika_sinkou_after:goto *common_main
if %kousoku=0 && %bougyo_attack=1 && %bougyo=1 gosub *tuika_tame_miss:gosub *tuika_sinkou_after:goto *common_main
if %query_new=1 goto *tuika_query_bindnew
if %query_new=2 goto *tuika_query_bind2
;gosub *pass_turn													;debug
if %kousoku=1 rnd2 %ransu,1,100
if %kousoku=1 && %ransu<=%tuika_skillb1 && %tuika_owaza_count2a>=%max_owaza_count2a && %tuika_skillb1>0 gosub *tuika_b1:gosub *tuika_sinkou_after:goto *common_main
if %kousoku=1 sub %ransu,%tuika_skillb1
if %kousoku=1 && %ransu<=%tuika_skillb2 && %tuika_owaza_count2b>=%max_owaza_count2b && %tuika_skillb2>0 gosub *tuika_b2:gosub *tuika_sinkou_after:goto *common_main
if %kousoku=1 sub %ransu,%tuika_skillb2
if %kousoku=1 && %ransu<=%tuika_skillb3 && %tuika_owaza_count2c>=%max_owaza_count2c && %tuika_skillb3>0 gosub *tuika_b3:gosub *tuika_sinkou_after:goto *common_main
if %kousoku=1 sub %ransu,%tuika_skillb3
if %kousoku=1 && %ransu<=%tuika_skillb4 && %tuika_owaza_count2d>=%max_owaza_count2d && %tuika_skillb4>0 gosub *tuika_b4:gosub *tuika_sinkou_after:goto *common_main
if %kousoku=1 skip -8
if %kousoku=2 rnd2 %ransu,1,100
if %kousoku=2 && %ransu<=%tuika_skillc1 && %tuika_owaza_count3a>=%max_owaza_count3a && %tuika_skillc1>0 gosub *tuika_c1:gosub *tuika_sinkou_after:goto *common_main
if %kousoku=2 sub %ransu,%tuika_skillc1
if %kousoku=2 && %ransu<=%tuika_skillc2 && %tuika_owaza_count3b>=%max_owaza_count3b && %tuika_skillc2>0 gosub *tuika_c2:gosub *tuika_sinkou_after:goto *common_main
if %kousoku=2 sub %ransu,%tuika_skillc2
if %kousoku=2 && %ransu<=%tuika_skillc3 && %tuika_owaza_count3c>=%max_owaza_count3c && %tuika_skillc3>0 gosub *tuika_c3:gosub *tuika_sinkou_after:goto *common_main
if %kousoku=2 sub %ransu,%tuika_skillc3
if %kousoku=2 && %ransu<=%tuika_skillc4 && %tuika_owaza_count3d>=%max_owaza_count3d && %tuika_skillc4>0 gosub *tuika_c4:gosub *tuika_sinkou_after:goto *common_main
if %kousoku=2 skip -8
goto *tuika_a_query1



*tuika_query_bindnew

gosub *pass_turn
if %kousoku=1 rnd2 %ransu,1,100
if %kousoku=1 && %ransu<=%tuika_skillb1 && %tuika_owaza_count2a>%max_owaza_count2a && %tuika_skillb1>0 gosub *tuika_b1:gosub *tuika_sinkou_after:goto *common_main
if %kousoku=1 && %tuika_owaza_count2a>%max_owaza_count2a && %tuika_skillb1>0 sub %ransu,%tuika_skillb1
if %kousoku=1 && %ransu<=%tuika_skillb2 && %tuika_owaza_count2b>%max_owaza_count2b && %tuika_skillb2>0 gosub *tuika_b2:gosub *tuika_sinkou_after:goto *common_main
if %kousoku=1 && %tuika_owaza_count2b>%max_owaza_count2b && %tuika_skillb2>0 sub %ransu,%tuika_skillb2
if %kousoku=1 && %ransu<=%tuika_skillb3 && %tuika_owaza_count2c>%max_owaza_count2c && %tuika_skillb3>0 gosub *tuika_b3:gosub *tuika_sinkou_after:goto *common_main
if %kousoku=1 && %tuika_owaza_count2c>%max_owaza_count2c && %tuika_skillb3>0 sub %ransu,%tuika_skillb3
if %kousoku=1 && %ransu<=%tuika_skillb4 && %tuika_owaza_count2d>%max_owaza_count2d && %tuika_skillb4>0 gosub *tuika_b4:gosub *tuika_sinkou_after:goto *common_main
if %kousoku=1 skip -8
if %kousoku=2 rnd2 %ransu,1,100
if %kousoku=2 && %ransu<=%tuika_skillc1 && %tuika_owaza_count3a>%max_owaza_count3a && %tuika_skillc1>0 gosub *tuika_c1:gosub *tuika_sinkou_after:goto *common_main
if %kousoku=2 && %tuika_owaza_count3a>%max_owaza_count3a && %tuika_skillc1>0 sub %ransu,%tuika_skillc1
if %kousoku=2 && %ransu<=%tuika_skillc2 && %tuika_owaza_count3b>%max_owaza_count3b && %tuika_skillc2>0 gosub *tuika_c2:gosub *tuika_sinkou_after:goto *common_main
if %kousoku=2 && %tuika_owaza_count3b>%max_owaza_count3b && %tuika_skillc2>0 sub %ransu,%tuika_skillc2
if %kousoku=2 && %ransu<=%tuika_skillc3 && %tuika_owaza_count3c>%max_owaza_count3c && %tuika_skillc3>0 gosub *tuika_c3:gosub *tuika_sinkou_after:goto *common_main
if %kousoku=2 && %tuika_owaza_count3c>%max_owaza_count3c && %tuika_skillc3>0 sub %ransu,%tuika_skillc3
if %kousoku=2 && %ransu<=%tuika_skillc4 && %tuika_owaza_count3d>%max_owaza_count3d && %tuika_skillc4>0 gosub *tuika_c4:gosub *tuika_sinkou_after:goto *common_main
if %kousoku=2 skip -8
goto *tuika_a_query1



*tuika_query_bind2

;gosub *pass_turn													;debug
if %kousoku=1 rnd2 %ransu,1,100
if %kousoku=1 && %ransu<=%tuika_skillb1 && %tuika_owaza_count2a>%max_owaza_count2a && %tuika_skillb1>0 gosub *tuika_b1:gosub *tuika_sinkou_after:goto *common_main
if %kousoku=1 && %tuika_owaza_count2a>=%max_owaza_count2a && %tuika_skillb1>0 sub %ransu,%tuika_skillb1
if %kousoku=1 && %ransu<=%tuika_skillb2 && %tuika_owaza_count2b>%max_owaza_count2b && %tuika_skillb2>0 gosub *tuika_b2:gosub *tuika_sinkou_after:goto *common_main
if %kousoku=1 && %tuika_owaza_count2b>=%max_owaza_count2b && %tuika_skillb2>0 sub %ransu,%tuika_skillb2
if %kousoku=1 && %ransu<=%tuika_skillb3 && %tuika_owaza_count2c>%max_owaza_count2c && %tuika_skillb3>0 gosub *tuika_b3:gosub *tuika_sinkou_after:goto *common_main
if %kousoku=1 && %tuika_owaza_count2c>=%max_owaza_count2c && %tuika_skillb3>0 sub %ransu,%tuika_skillb3
if %kousoku=1 && %ransu<=%tuika_skillb4 && %tuika_owaza_count2d>%max_owaza_count2d && %tuika_skillb4>0 gosub *tuika_b4:gosub *tuika_sinkou_after:goto *common_main
if %kousoku=1 skip -8
if %kousoku=2 rnd2 %ransu,1,100
if %kousoku=2 && %ransu<=%tuika_skillc1 && %tuika_owaza_count3a>%max_owaza_count3a && %tuika_skillc1>0 gosub *tuika_c1:gosub *tuika_sinkou_after:goto *common_main
if %kousoku=2 && %tuika_owaza_count3a>=%max_owaza_count3a && %tuika_skillc1>0 sub %ransu,%tuika_skillc1
if %kousoku=2 && %ransu<=%tuika_skillc2 && %tuika_owaza_count3b>%max_owaza_count3b && %tuika_skillc2>0 gosub *tuika_c2:gosub *tuika_sinkou_after:goto *common_main
if %kousoku=2 && %tuika_owaza_count3b>=%max_owaza_count3b && %tuika_skillc2>0 sub %ransu,%tuika_skillc2
if %kousoku=2 && %ransu<=%tuika_skillc3 && %tuika_owaza_count3c>%max_owaza_count3c && %tuika_skillc3>0 gosub *tuika_c3:gosub *tuika_sinkou_after:goto *common_main
if %kousoku=2 && %tuika_owaza_count3c>=%max_owaza_count3c && %tuika_skillc3>0 sub %ransu,%tuika_skillc3
if %kousoku=2 && %ransu<=%tuika_skillc4 && %tuika_owaza_count3d>%max_owaza_count3d && %tuika_skillc4>0 gosub *tuika_c4:gosub *tuika_sinkou_after:goto *common_main
if %kousoku=2 skip -8
goto *tuika_a_query1



*tuika_counter_query

if %tuika_skilld1=0 gosub *tuika_counter_mid:gosub *tuika_sinkou_after:goto *common_main
gosub *pass_turn
rnd2 %ransu,1,100
if %ransu<=%tuika_skilld1 && %owaza_count3a>0 && %tuika_skilld1>0 gosub *tuika_counter2:gosub *tuika_sinkou_after:goto *common_main
if %owaza_count3a>0 && %tuika_skilld1>0 sub %ransu,%tuika_skilld1
if %ransu<=%tuika_skilld2 && %owaza_count3b>0 && %tuika_skilld2>0 gosub *tuika_counter3:gosub *tuika_sinkou_after:goto *common_main
if %owaza_count3b>0 && %tuika_skilld2>0 sub %ransu,%tuika_skilld2
if %ransu<=%tuika_skilld3 && %owaza_count3c>0 && %tuika_skilld3>0 gosub *tuika_counter4:gosub *tuika_sinkou_after:goto *common_main
if %owaza_count3c>0 && %tuika_skilld3>0 sub %ransu,%tuika_skilld3
if %ransu<=%tuika_skilld4 && %owaza_count3d>0 && %tuika_skilld4>0 gosub *tuika_counter5:gosub *tuika_sinkou_after:goto *common_main
skip -8



*tuika_a_query1

if %query_new=1 goto *tuika_a_query_new
if %query_new=2 goto *tuika_a_query2
rnd2 %ransu,1,100
if %ransu<=%tuika_skilla1 && %tuika_owaza_count1a>=%max_owaza_count1a && %tuika_skilla1>0 gosub *tuika_a1:gosub *tuika_sinkou_after:goto *common_main
sub %ransu,%tuika_skilla1
if %ransu<=%tuika_skilla2 && %tuika_owaza_count1b>=%max_owaza_count1b && %tuika_skilla2>0 gosub *tuika_a2:gosub *tuika_sinkou_after:goto *common_main
sub %ransu,%tuika_skilla2
if %ransu<=%tuika_skilla3 && %tuika_owaza_count1c>=%max_owaza_count1c && %tuika_skilla3>0 gosub *tuika_a3:gosub *tuika_sinkou_after:goto *common_main
sub %ransu,%tuika_skilla3
if %ransu<=%tuika_skilla4 && %tuika_owaza_count1d>=%max_owaza_count1d && %tuika_skilla4>0 gosub *tuika_a4:gosub *tuika_sinkou_after:goto *common_main
sub %ransu,%tuika_skilla4
if %ransu<=%tuika_skilla5 && %tuika_owaza_count1e>=%max_owaza_count1e && %tuika_skilla5>0 gosub *tuika_a5:gosub *tuika_sinkou_after:goto *common_main
sub %ransu,%tuika_skilla5
if %ransu<=%tuika_skilla6 && %tuika_owaza_count1f>=%max_owaza_count1f && %tuika_skilla6>0 gosub *tuika_a6:gosub *tuika_sinkou_after:goto *common_main
sub %ransu,%tuika_skilla6
if %ransu<=%tuika_skilla7 && %tuika_owaza_count1g>=%max_owaza_count1g && %tuika_skilla7>0 gosub *tuika_a7:gosub *tuika_sinkou_after:goto *common_main
sub %ransu,%tuika_skilla7
if %ransu<=%tuika_skilla8 && %tuika_owaza_count1h>=%max_owaza_count1h && %tuika_skilla8>0 gosub *tuika_a8:gosub *tuika_sinkou_after:goto *common_main
sub %ransu,%tuika_skilla8
if %ransu<=%tuika_skille1 && %tuika_owaza_count4a>=%max_owaza_count4a && %tuika_skille1>0 gosub *tuika_tame_zyunbi:gosub *tuika_sinkou_after:goto *common_main
sub %ransu,%tuika_skille1
if %ransu<=%tuika_skillf1 && %tuika_owaza_count4b>=%max_owaza_count4b && %tuika_skillf1>0 && %kousan=0 gosub *tuika_counter_start:gosub *tuika_sinkou_after:goto *common_main
goto *tuika_a_query1



*tuika_a_query_new

rnd2 %ransu,1,100
if %ransu<=%tuika_skillf1 && %tuika_owaza_count4b>%max_owaza_count4b && %tuika_skillf1>0 && %kousan=0 gosub *tuika_counter_start:gosub *tuika_sinkou_after:goto *common_main
if %tuika_owaza_count4b>%max_owaza_count4b && %tuika_skillf1>0 sub %ransu,%tuika_skillf1
if %ransu<=%tuika_skille1 && %tuika_owaza_count4a>%max_owaza_count4a && %tuika_skille1>0 gosub *tuika_tame_zyunbi:gosub *tuika_sinkou_after:goto *common_main
if %tuika_owaza_count4a>%max_owaza_count4a && %tuika_skille1>0 sub %ransu,%tuika_skille1
if %ransu<=%tuika_skilla1 && %tuika_owaza_count1a>%max_owaza_count1a && %tuika_skilla1>0 gosub *tuika_a1:gosub *tuika_sinkou_after:goto *common_main
if %tuika_owaza_count1a>%max_owaza_count1a && %tuika_skilla1>0 sub %ransu,%tuika_skilla1
if %ransu<=%tuika_skilla2 && %tuika_owaza_count1b>%max_owaza_count1b && %tuika_skilla2>0 gosub *tuika_a2:gosub *tuika_sinkou_after:goto *common_main
if %tuika_owaza_count1b>%max_owaza_count1b && %tuika_skilla2>0 sub %ransu,%tuika_skilla2
if %ransu<=%tuika_skilla3 && %tuika_owaza_count1c>%max_owaza_count1c && %tuika_skilla3>0 gosub *tuika_a3:gosub *tuika_sinkou_after:goto *common_main
if %tuika_owaza_count1c>%max_owaza_count1c && %tuika_skilla3>0 sub %ransu,%tuika_skilla3
if %ransu<=%tuika_skilla4 && %tuika_owaza_count1d>%max_owaza_count1d && %tuika_skilla4>0 gosub *tuika_a4:gosub *tuika_sinkou_after:goto *common_main
if %tuika_owaza_count1d>%max_owaza_count1d && %tuika_skilla4>0 sub %ransu,%tuika_skilla4
if %ransu<=%tuika_skilla5 && %tuika_owaza_count1e>%max_owaza_count1e && %tuika_skilla5>0 gosub *tuika_a5:gosub *tuika_sinkou_after:goto *common_main
if %tuika_owaza_count1e>%max_owaza_count1e && %tuika_skilla5>0 sub %ransu,%tuika_skilla5
if %ransu<=%tuika_skilla6 && %tuika_owaza_count1f>%max_owaza_count1f && %tuika_skilla6>0 gosub *tuika_a6:gosub *tuika_sinkou_after:goto *common_main
if %tuika_owaza_count1f>%max_owaza_count1f && %tuika_skilla6>0 sub %ransu,%tuika_skilla6
if %ransu<=%tuika_skilla7 && %tuika_owaza_count1g>%max_owaza_count1g && %tuika_skilla7>0 gosub *tuika_a7:gosub *tuika_sinkou_after:goto *common_main
if %tuika_owaza_count1g>%max_owaza_count1g && %tuika_skilla7>0 sub %ransu,%tuika_skilla7
if %ransu<=%tuika_skilla8 && %tuika_owaza_count1h>%max_owaza_count1h && %tuika_skilla8>0 gosub *tuika_a8:gosub *tuika_sinkou_after:goto *common_main
goto *tuika_a_query_new



*tuika_a_query2

rnd2 %ransu,1,100
if %ransu<=%tuika_skilla1 && %tuika_owaza_count1a>=%max_owaza_count1a && %tuika_skilla1>0 gosub *tuika_a1:gosub *tuika_sinkou_after:goto *common_main
if %tuika_owaza_count1a>=%max_owaza_count1a && %tuika_skilla1>0 sub %ransu,%tuika_skilla1
if %ransu<=%tuika_skilla2 && %tuika_owaza_count1b>=%max_owaza_count1b && %tuika_skilla2>0 gosub *tuika_a2:gosub *tuika_sinkou_after:goto *common_main
if %tuika_owaza_count1b>=%max_owaza_count1b && %tuika_skilla2>0 sub %ransu,%tuika_skilla2
if %ransu<=%tuika_skilla3 && %tuika_owaza_count1c>=%max_owaza_count1c && %tuika_skilla3>0 gosub *tuika_a3:gosub *tuika_sinkou_after:goto *common_main
if %tuika_owaza_count1c>=%max_owaza_count1c && %tuika_skilla3>0 sub %ransu,%tuika_skilla3
if %ransu<=%tuika_skilla4 && %tuika_owaza_count1d>=%max_owaza_count1d && %tuika_skilla4>0 gosub *tuika_a4:gosub *tuika_sinkou_after:goto *common_main
if %tuika_owaza_count1d>=%max_owaza_count1d && %tuika_skilla4>0 sub %ransu,%tuika_skilla4
if %ransu<=%tuika_skilla5 && %tuika_owaza_count1e>=%max_owaza_count1e && %tuika_skilla5>0 gosub *tuika_a5:gosub *tuika_sinkou_after:goto *common_main
if %tuika_owaza_count1e>=%max_owaza_count1e && %tuika_skilla5>0 sub %ransu,%tuika_skilla5
if %ransu<=%tuika_skilla6 && %tuika_owaza_count1f>=%max_owaza_count1f && %tuika_skilla6>0 gosub *tuika_a6:gosub *tuika_sinkou_after:goto *common_main
if %tuika_owaza_count1f>=%max_owaza_count1f && %tuika_skilla6>0 sub %ransu,%tuika_skilla6
if %ransu<=%tuika_skilla7 && %tuika_owaza_count1g>=%max_owaza_count1g && %tuika_skilla7>0 gosub *tuika_a7:gosub *tuika_sinkou_after:goto *common_main
if %tuika_owaza_count1g>=%max_owaza_count1g && %tuika_skilla7>0 sub %ransu,%tuika_skilla7
if %ransu<=%tuika_skilla8 && %tuika_owaza_count1h>=%max_owaza_count1h && %tuika_skilla8>0 gosub *tuika_a8:gosub *tuika_sinkou_after:goto *common_main
if %tuika_owaza_count1h>=%max_owaza_count1h && %tuika_skilla8>0 sub %ransu,%tuika_skilla8
if %ransu<=%tuika_skille1 && %tuika_owaza_count4a>=%max_owaza_count4a && %tuika_skille1>0 gosub *tuika_tame_zyunbi:gosub *tuika_sinkou_after:goto *common_main
if %tuika_owaza_count4a>=%max_owaza_count4a && %tuika_skille1>0 sub %ransu,%tuika_skille1
if %ransu<=%tuika_skillf1 && %tuika_owaza_count4b>=%max_owaza_count4b && %tuika_skillf1>0 && %kousan=0 gosub *tuika_counter_start:gosub *tuika_sinkou_after:goto *common_main
goto *tuika_a_query2



*tuika_sinkou

add %stack,1
mov $move,"1"
goto *tuika_sinkou_read



*tuika_sinkou_read

itoa $sub1,%sinkou:mov $sub1,"sinkou"+$sub1
mov $sub2,"sinkou_list"+$move
getini $mon_labo_mon_ini_cmd,$mon_labo_mon_ini,$sub1,$sub2
if $mon_labo_mon_ini_cmd="" | $mon_labo_mon_ini_cmd=" " goto *tuika_sinkou_endlist
split $mon_labo_mon_ini_cmd,",",$sub1
if $sub1="petrified" gosub *tuika_sinkou_petrified:skip 8
if $sub1="enemylife" gosub *tuika_sinkou_enemylife:skip 7
if $sub1="enemylife2" && %kousoku=0 gosub *tuika_sinkou_enemylife:skip 6
if $sub1="element" gosub *tuika_sinkou_element:skip 5
if $sub1="mylife" gosub *tuika_sinkou_mylife:skip 4
if $sub1="action" gosub *tuika_sinkou_action:skip 3
if $sub1="turn" gosub *tuika_sinkou_turn:skip 2
if $sub1="status" gosub *tuika_sinkou_status
atoi %sub1,$move:add %sub1,1:itoa $move,%sub1
goto *tuika_sinkou_read



*tuika_sinkou_after

add %stack,1
if %sinkou=0 sub %stack,1:return
mov $move,"1"
goto *tuika_sinkou_read_after



*tuika_sinkou_read_after

itoa $sub1,%sinkou:mov $sub1,"sinkou"+$sub1
mov $sub2,"sinkou_list"+$move
getini $mon_labo_mon_ini_cmd,$mon_labo_mon_ini,$sub1,$sub2
if $mon_labo_mon_ini_cmd="" | $mon_labo_mon_ini_cmd=" " goto *tuika_sinkou_endlist
split $mon_labo_mon_ini_cmd,",",$sub1
if $sub1="petrified1" gosub *tuika_sinkou_petrified:skip 8
if $sub1="enemylife1" gosub *tuika_sinkou_enemylife:skip 7
if $sub1="enemylife3" && %kousoku=0 gosub *tuika_sinkou_enemylife:skip 6
if $sub1="element1" gosub *tuika_sinkou_element:skip 5
if $sub1="mylife1" gosub *tuika_sinkou_mylife:skip 4
if $sub1="action1" gosub *tuika_sinkou_action:skip 3
if $sub1="turn1" gosub *tuika_sinkou_turn:skip 2
if $sub1="status1" gosub *tuika_sinkou_status
atoi %sub1,$move:add %sub1,1:itoa $move,%sub1
goto *tuika_sinkou_read_after



*tuika_sinkou_endlist

if $move="1" mov %sinkou,0
sub %stack,1
return



*tuika_sinkou_petrified

add %stack,1
split $mon_labo_mon_ini_cmd,",",$sub1,$sel1
if %status<>6 && %status<>8 sub %stack,1:return
if %status_turn<>-1 sub %stack,1:return
sub %stack,1
return *tuika_sinkou_apply



*tuika_sinkou_enemylife

add %stack,1
split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sel1
atoi %sub2,$sub2
if %enemylife>%sub2 sub %stack,1:return
sub %stack,1
return *tuika_sinkou_apply



*tuika_sinkou_element

add %stack,1
split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sub3,$sel1
atoi %sub2,$sub2:atoi %sub3,$sub3
if %sub2<1 | %sub2>15 sub %stack,1:return
if %sub2=1 && %wind<=%sub3 sub %stack,1:return
if %sub2=2 && %earth<=%sub3 sub %stack,1:return
if %sub2=3 && %wind+%earth<=%sub3 sub %stack,1:return
if %sub2=4 && %aqua<=%sub3 sub %stack,1:return
if %sub2=5 && %aqua+%wind<=%sub3 sub %stack,1:return
if %sub2=6 && %aqua+%earth<=%sub3 sub %stack,1:return
if %sub2=7 && %aqua+%wind+%earth<=%sub3 sub %stack,1:return
if %sub2=8 && %fire<=%sub3 sub %stack,1:return
if %sub2=9 && %fire+%wind<=%sub3 sub %stack,1:return
if %sub2=10 && %fire+%earth<=%sub3 sub %stack,1:return
if %sub2=11 && %fire+%wind+%earth<=%sub3 sub %stack,1:return
if %sub2=12 && %fire+%aqua<=%sub3 sub %stack,1:return
if %sub2=13 && %fire+%aqua+%wind<=%sub3 sub %stack,1:return
if %sub2=14 && %fire+%aqua+%earth<=%sub3 sub %stack,1:return
if %sub2=15 && %fire+%aqua+%earth+%wind<=%sub3 sub %stack,1:return
sub %stack,1
return *tuika_sinkou_apply



*tuika_sinkou_mylife

add %stack,1
split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sel1
atoi %sub2,$sub2
if %mylife>%sub2 sub %stack,1:return
sub %stack,1
return *tuika_sinkou_apply



*tuika_sinkou_action

add %stack,1
split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sel1
atoi %sub2,$sub2
if %before_action<>%sub2 sub %stack,1:return
sub %stack,1
return *tuika_sinkou_apply



*tuika_sinkou_turn

add %stack,1
split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sel1
atoi %sub2,$sub2
if %turn<>%sub2 sub %stack,1:return
sub %stack,1
return *tuika_sinkou_apply



*tuika_sinkou_status

add %stack,1
split $mon_labo_mon_ini_cmd,",",$sub1,$sub2,$sel1
atoi %sub2,$sub2
if %status<>%sub2 sub %stack,1:return
sub %stack,1
return *tuika_sinkou_apply



*tuika_sinkou_apply

gosub *check_custom_dialog:if $sel2="custom" mov %allcommandsenable,4:gosub *custom_dialog_start:mov %allcommandsenable,0:gosub *tuika_sinkou_change1:sub %stack,1:return
if $sel1="pass" mov $skill_tag,"fllwpass":gosub *tuika_sinkou_change:sub %stack,1:return
if $sel1="win" mov $skill_tag,"fllwwin":gosub *tuika_sinkou_change:sub %stack,1:return
mov $skill_tag,"skill"+$sel1
gosub *check_skill_name
mov $skill_tag,"fllw"+$sel1
gosub *tuika_sinkou_change
sub %stack,1
return



*tuika_sinkou_change

itoa $sub1,%sinkou:mov $sub1,"sinkou"+$sub1
mov $sub2,"sinkou_list"+$move
getini $mon_labo_mon_ini_cmd,$mon_labo_mon_ini,$sub1,$sub2
split $mon_labo_mon_ini_cmd,",",$sub1
if $sub1="petrified" | $sub1="petrified1" split $mon_labo_mon_ini_cmd,",",$sub1,$sub1,$sub2:skip 3
if $sub1="element" | $sub1="element1" split $mon_labo_mon_ini_cmd,",",$sub1,$sub1,$sub1,$sub1,$sub2:skip 2
split $mon_labo_mon_ini_cmd,",",$sub1,$sub1,$sub1,$sub2
if $sub2="" | $sub2=" " return
getini $sub1,$mon_labo_mon_ini,"sinkou"+$sub2,"sinkou_list1"
if $sub1="" | $sub1=" " mov %sinkou,0:skip 2
atoi %sinkou,$sub2
return



*tuika_sinkou_change1

itoa $sub1,%sinkou:mov $sub1,"sinkou"+$sub1
mov $sub2,"sinkou_list"+$move
getini $mon_labo_mon_ini_cmd,$mon_labo_mon_ini,$sub1,$sub2
split $mon_labo_mon_ini_cmd,",",$sub1
if $sub1="petrified" | $sub1="petrified1" split $mon_labo_mon_ini_cmd,",",$sub1,$sub1,$sub2:skip 3
if $sub1="element" | $sub1="element1" split $mon_labo_mon_ini_cmd,",",$sub1,$sub3,$sub3,$sub3,$sub2:skip 2
split $mon_labo_mon_ini_cmd,",",$sub1,$sub3,$sub3,$sub2
if $sub2="" | $sub2=" " return
if $sub2="back" return *tuika_sinkou_return
getini $sub1,$mon_labo_mon_ini,"sinkou"+$sub2,"sinkou_list1"
if $sub1="" | $sub1=" " mov %sinkou,0:skip 2
atoi %sinkou,$sub2
return



*tuika_sinkou_return

atoi %sub1,$move:add %sub1,1:itoa $move,%sub1
if $sub1="petrified" | $sub1="enemylife" | $sub1="enemylife2" | $sub1="element" | $sub1="mylife" | $sub1="action" | $sub1="turn" | $sub1="status" goto *tuika_sinkou_read
goto *tuika_sinkou_read_after



*tuika_trigger_henka1

add %stack,1
if %enemylife>=%henkahp1 sub %stack,1:return
getini $sub1,$mon_labo_mon_ini,"data","henka1"
split $sub1,",",$sub2,$sel1,$sub4
if $sub4<>"2" mov %henkahp1,0
if $sel1="pass" mov $skill_tag,"fllwpass":sub %stack,1:return *tuika_trigger_followup
if $sel1="win" mov $skill_tag,"fllwwin":sub %stack,1:return *tuika_trigger_followup
gosub *check_custom_dialog:if $sel2="custom" skip 6
mov $skill_tag,"skill"+$sel1
gosub *check_skill_name
mov $skill_tag,"fllw"+$sel1
sub %stack,1
return *tuika_trigger_followup
mov %allcommandsenable,4
gosub *custom_dialog_start
mov %allcommandsenable,0
sub %stack,1
return *tuika_trigger_followup



*tuika_trigger_henka2

add %stack,1
if %enemylife>=%henkahp2 sub %stack,1:return
getini $sub1,$mon_labo_mon_ini,"data","henka2"
split $sub1,",",$sub2,$sel1,$sub4
if $sub4<>"2" mov %henkahp2,0
if $sel1="pass" mov $skill_tag,"fllwpass":sub %stack,1:return *tuika_trigger_followup
if $sel1="win" mov $skill_tag,"fllwwin":sub %stack,1:return *tuika_trigger_followup
gosub *check_custom_dialog:if $sel2="custom" skip 6
mov $skill_tag,"skill"+$sel1
gosub *check_skill_name
mov $skill_tag,"fllw"+$sel1
sub %stack,1
return *tuika_trigger_followup
mov %allcommandsenable,4
gosub *custom_dialog_start
mov %allcommandsenable,0
sub %stack,1
return *tuika_trigger_followup



*tuika_trigger_henka3

add %stack,1
if %enemylife>=%henkahp3 sub %stack,1:return
getini $sub1,$mon_labo_mon_ini,"data","henka3"
split $sub1,",",$sub2,$sel1,$sub4
if $sub4<>"2" mov %henkahp3,0
if $sel1="pass" mov $skill_tag,"fllwpass":sub %stack,1:return *tuika_trigger_followup
if $sel1="win" mov $skill_tag,"fllwwin":sub %stack,1:return *tuika_trigger_followup
gosub *check_custom_dialog:if $sel2="custom" skip 6
mov $skill_tag,"skill"+$sel1
gosub *check_skill_name
mov $skill_tag,"fllw"+$sel1
sub %stack,1
return *tuika_trigger_followup
mov %allcommandsenable,4
gosub *custom_dialog_start
mov %allcommandsenable,0
sub %stack,1
return *tuika_trigger_followup



*pass_turn

add %stack,1
if %counter<1 skip 6
if %tuika_skilld1>0 && %owaza_count3a>0 sub %stack,1:return
if %tuika_skilld2>0 && %owaza_count3b>0 sub %stack,1:return
if %tuika_skilld3>0 && %owaza_count3c>0 sub %stack,1:return
if %tuika_skilld4>0 && %owaza_count3d>0 sub %stack,1:return
sub %stack,1:return *pass_turn1
if %kousoku<>1 skip 6
if %tuika_skillb1>0 && %tuika_owaza_count2a>%max_owaza_count2a sub %stack,1:return
if %tuika_skillb2>0 && %tuika_owaza_count2b>%max_owaza_count2b sub %stack,1:return
if %tuika_skillb3>0 && %tuika_owaza_count2c>%max_owaza_count2c sub %stack,1:return
if %tuika_skillb4>0 && %tuika_owaza_count2d>%max_owaza_count2d sub %stack,1:return
sub %stack,1:return *pass_turn2
if %kousoku<>2 skip 6
if %tuika_skillc1>0 && %tuika_owaza_count3a>%max_owaza_count3a sub %stack,1:return
if %tuika_skillc2>0 && %tuika_owaza_count3b>%max_owaza_count3b sub %stack,1:return
if %tuika_skillc3>0 && %tuika_owaza_count3c>%max_owaza_count3c sub %stack,1:return
if %tuika_skillc4>0 && %tuika_owaza_count3d>%max_owaza_count3d sub %stack,1:return
sub %stack,1:return *pass_turn2
if %tuika_skilla1>0 && %tuika_owaza_count1a>%max_owaza_count1a sub %stack,1:return
if %tuika_skilla2>0 && %tuika_owaza_count1b>%max_owaza_count1b sub %stack,1:return
if %tuika_skilla3>0 && %tuika_owaza_count1c>%max_owaza_count1c sub %stack,1:return
if %tuika_skilla4>0 && %tuika_owaza_count1d>%max_owaza_count1d sub %stack,1:return
if %tuika_skilla5>0 && %tuika_owaza_count1e>%max_owaza_count1e sub %stack,1:return
if %tuika_skilla6>0 && %tuika_owaza_count1f>%max_owaza_count1f sub %stack,1:return
if %tuika_skilla7>0 && %tuika_owaza_count1g>%max_owaza_count1g sub %stack,1:return
if %tuika_skilla8>0 && %tuika_owaza_count1h>%max_owaza_count1h sub %stack,1:return
if %tuika_skille1>0 && %tuika_owaza_count4a>%max_owaza_count4a sub %stack,1:return
if %tuika_skillf1>0 && %tuika_owaza_count4b>%max_owaza_count4b sub %stack,1:return
sub %stack,1
return *pass_turn2



*pass_turn1

gosub *tuika_counter_mid
gosub *tuika_sinkou_after
goto *common_main



*pass_turn2

gosub *tuika_sinkou_after
goto *common_main



*tuika_a_common

getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_kouka":atoi %tuika_skill_kouka,$sub1
getini $damage_kotei,$mon_labo_mon_ini,$skill_tag,"skill_damage_mode":if $damage_kotei<>"" skip 3
getini $damage_kotei,$mon_labo_mon_ini,$skill_tag,"skill_ignoredef":if $damage_kotei<>"" skip 2
getini $damage_kotei,$mon_labo_mon_ini,$skill_tag,"ignoredef"
eng $damage_kotei:mov $damage_kotei,$sel6
gosub *tuika_damage1
if %tuika_skill_kouka<7 gosub *tuika_extra_hits
if %tuika_skill_kouka=2 gosub *tuika_status
if %tuika_skill_kouka>2 && %tuika_skill_kouka<6 gosub *tuika_kousoku
if %tuika_skill_kouka<3 | %tuika_skill_kouka>5 mov %owaza_num1,0
if %mylife=0 skillname "":sub %stack,1:return *tuika_h
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_name_stay":if $sub1<>"1" skillname ""
if $skill_tag="skillcounter1" skip 4
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_finish":if $sub1="" skip 3
split $sub1,",",$sub2,$sub1:atoi %sub2,$sub2
if %mylife<%sub2 goto *tuika_followup_instant
if %mylv_sin<>%mylv && %mylv=1 sub %stack,1:return *tuika_hlv
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_ct_stay"
if %kousan<2 && $sub1<>"1" csp 690:print 10,500
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_message_mode":if $sub1="" mov %message_mode,0:skip 2
split $sub1,",",$sub1,$sub2:atoi %message_mode,$sub1
if %message_mode mod 4>1 && %kousan=2 skip 3
if %tuika_skill_kouka=2 gosub *tuika_status_sel:skip 2
gosub *tuika_sel
if %message_mode mod 2=0 gosub *tuika_half
gosub *followup
sub %stack,1
return



*tuika_bc_common

getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_kouka":atoi %tuika_skill_kouka,$sub1
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_kousoku_anno0":if $sel1="" skip 3
gosub *check_custom_dialog:if $sel2="custom" gosub *custom_dialog_start:mov $sel2,$sel3:skip 2
eng $sel1:$sel6\
getini $damage_kotei,$mon_labo_mon_ini,$skill_tag,"skill_damage_mode":if $damage_kotei<>"" skip 3
getini $damage_kotei,$mon_labo_mon_ini,$skill_tag,"skill_ignoredef":if $damage_kotei<>"" skip 2
getini $damage_kotei,$mon_labo_mon_ini,$skill_tag,"ignoredef"
eng $damage_kotei:mov $damage_kotei,$sel6
gosub *tuika_damage1
if %tuika_skill_kouka<7 gosub *tuika_extra_hits
if %tuika_skill_kouka=2 gosub *tuika_status
if %tuika_skill_kouka>2 && %tuika_skill_kouka<6 gosub *tuika_kousoku
if %mylife=0 skillname "":sub %stack,1:return *tuika_h
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_name_stay":if $sub1<>"1" skillname ""
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_finish":if $sub1="" skip 3
split $sub1,",",$sub2,$sub1:atoi %sub2,$sub2
if %mylife<%sub2 goto *tuika_followup_instant
if %mylv_sin<>%mylv && %mylv=1 sub %stack,1:return *tuika_hlv
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_ct_stay"
if %kousan<2 && $sub1<>"1" csp 690:print 10,500
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_message_mode":if $sub1="" mov %message_mode,0:skip 2
split $sub1,",",$sub1,$sub2:atoi %message_mode,$sub1
if %message_mode mod 4>1 && %kousan=2 skip 3
if %tuika_skill_kouka=2 gosub *tuika_status_sel:skip 2
gosub *tuika_sel
if %message_mode mod 2=0 gosub *tuika_half
gosub *followup
sub %stack,1
return



*tuika_d_common

getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_kouka":atoi %tuika_skill_kouka,$sub1
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_kousoku_anno0":if $sel1="" skip 3
gosub *check_custom_dialog:if $sel2="custom" gosub *custom_dialog_start:mov $sel2,$sel3:skip 2
eng $sel1:$sel6\
getini $damage_kotei,$mon_labo_mon_ini,$skill_tag,"skill_damage_mode":if $damage_kotei<>"" skip 3
getini $damage_kotei,$mon_labo_mon_ini,$skill_tag,"skill_ignoredef":if $damage_kotei<>"" skip 2
getini $damage_kotei,$mon_labo_mon_ini,$skill_tag,"ignoredef"
eng $damage_kotei:mov $damage_kotei,$sel6
gosub *tuika_damage1
if %tuika_skill_kouka<7 gosub *tuika_extra_hits
if %tuika_skill_kouka>2 && %tuika_skill_kouka<6 gosub *tuika_kousoku
if %mylife=0 skillname "":sub %stack,1:return *tuika_h
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_name_stay":if $sub1<>"1" skillname ""
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_finish":if $sub1="" skip 3
split $sub1,",",$sub2,$sub1:atoi %sub2,$sub2
if %mylife<%sub2 goto *tuika_followup_instant
if %mylv_sin<>%mylv && %mylv=1 sub %stack,1:return *tuika_hlv
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_ct_stay"
if %kousan<2 && $sub1<>"1" csp 690:print 10,500
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_message_mode":if $sub1="" mov %message_mode,0:skip 2
split $sub1,",",$sub1,$sub2:atoi %message_mode,$sub1
if %message_mode mod 4<2 | %kousan<>2 gosub *tuika_sel
if %message_mode mod 2=0 gosub *tuika_half
gosub *followup
sub %stack,1
return



*tuika_counter_common

getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_kouka":atoi %tuika_skill_kouka,$sub1
getini $damage_kotei,$mon_labo_mon_ini,$skill_tag,"skill_damage_mode":if $damage_kotei<>"" skip 3
getini $damage_kotei,$mon_labo_mon_ini,$skill_tag,"skill_ignoredef":if $damage_kotei<>"" skip 2
getini $damage_kotei,$mon_labo_mon_ini,$skill_tag,"ignoredef"
eng $damage_kotei:mov $damage_kotei,$sel6
mov %counter,%counter-1
gosub *tuika_counter_damage1
if %tuika_skill_kouka<7 gosub *tuika_extra_hits
if %tuika_skill_kouka=2 gosub *tuika_status
if %mylife=0 skillname "":sub %stack,1:return *tuika_h
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_name_stay":if $sub1<>"1" skillname ""
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_finish":if $sub1="" skip 3
split $sub1,",",$sub2,$sub1:atoi %sub2,$sub2
if %mylife<%sub2 goto *tuika_followup_instant
if %mylv_sin<>%mylv && %mylv=1 sub %stack,1:return *tuika_hlv
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_ct_stay"
if %kousan<2 && $sub1<>"1" csp 690:print 10,500
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_message_mode":if $sub1="" mov %message_mode,0:skip 2
split $sub1,",",$sub1,$sub2:atoi %message_mode,$sub1
if %message_mode mod 4>1 && %kousan=2 skip 3
if %tuika_skill_kouka=2 gosub *tuika_status_sel:skip 2
gosub *tuika_sel
if %message_mode mod 2=0 gosub *tuika_half
gosub *followup
sub %stack,1
return



*tuika_tame_zyunbi

add %stack,1
mov $skill_tag,"skilltame0"
mov %bougyo_attack,1
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_message_mode":if $sub1="" skip 2
split $sub1,",",$sub2,$sub1:atoi %sub1,$sub1:if %sub1 mod 2=1 && %kousan=2 skip 5
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_sel1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_sel2"
getini $sel3,$mon_labo_mon_ini,$skill_tag,"skill_sel3"
gosub *selprintname
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_name"
if $sub1<>"" nobel $sub1:skillname $sel6
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_se1":if $sub1="" skip 5
gosub *check_dir1
split $sub1,".",$sub2,$sub3
if $sub3="ogg" | $sub3="wav" dwave 1,$teigi1+$sub1
if $sub3="" dwave 1,"se\"+$sub1+".ogg"
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_ct1":if $sub1="" skip 8
getini $sub4,$mon_labo_mon_ini,$skill_tag,"skill_ctx":atoi %sub1,$sub4
getini $sub5,$mon_labo_mon_ini,$skill_tag,"skill_cty":atoi %sub2,$sub5
gosub *check_dir1
split $sub1,".",$sub3,$sub2
if $sub2="bmp" | $sub2="jpg" | $sub2="png" lsp 690,":a;"+$teigi1+$sub1,%sub1,%sub2
if $sub2="" lsp 690,":a;chara\"+$sub1+".bmp",%sub1,%sub2
print 10,500
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_anno1_1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_anno1_2"
getini $sel3,$mon_labo_mon_ini,$skill_tag,"skill_anno1_3"
if $sel3<>"" mov %rnd_ev,1
gosub *selprint
skillname ""
if %kousan<2 csp 690:print 10,500
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_message_mode":if $sub1="" mov %message_mode,0:skip 2
split $sub1,",",$sub1,$sub2:atoi %message_mode,$sub1
if %message_mode mod 4<2 | %kousan<>2 gosub *tuika_sel
sub %stack,1
return



*tuika_tame_miss

add %stack,1
getini $sub1,$mon_labo_mon_ini,"skilltame2","skill_name"
getini $sub2,$mon_labo_mon_ini,"skilltame2","skill_kouka"
getini $sub3,$mon_labo_mon_ini,"skilltame2","skill_kakuritu"
getini $sub4,$mon_labo_mon_ini,"skilltame2","skill_damage1_1"
if $sub1="" && $sub2="" && $sub3="" && $sub4="" goto *tuika_tame_miss1
getini $sel1,$mon_labo_mon_ini,"skilltame2","skill_fail"
if $sel1="" | $sel1=" " skip 5
gosub *check_custom_dialog:if $sel2="custom" gosub *tuika_fail:skip 2
atoi %sub2,$sel1
rnd2 %sub1,1,100
if %sub1>%sub2 sub %stack,1:goto *tuika_tame_hit
mov %tuika_owaza_count4a,0
mov %bougyo_attack,0
mov $skill_tag,"skilltame2"
goto *tuika_a_common



*tuika_tame_miss1

getini $sel1,$mon_labo_mon_ini,"skilltame1","skill_fail"
if $sel1="" | $sel1=" " skip 5
gosub *check_custom_dialog:if $sel2="custom" gosub *tuika_fail:skip 2
atoi %sub2,$sel1
rnd2 %sub1,1,100
if %sub1>%sub2 sub %stack,1:goto *tuika_tame_hit
mov $skill_tag,"skilltame1"
mov %tuika_owaza_count4a,0
mov %bougyo_attack,0
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_sel1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_sel2"
getini $sel3,$mon_labo_mon_ini,$skill_tag,"skill_sel3"
gosub *selprintname
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_name"
if $sub1<>"" nobel $sub1:skillname $sel6
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_se1":if $sub1="" skip 5
gosub *check_dir1
split $sub1,".",$sub2,$sub3
if $sub3="ogg" | $sub3="wav" dwave 1,$teigi1+$sub1
if $sub3="" dwave 1,"se\"+$sub1+".ogg"
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_ct1":if $sub1="" skip 8
getini $sub4,$mon_labo_mon_ini,$skill_tag,"skill_ctx":atoi %sub1,$sub4
getini $sub5,$mon_labo_mon_ini,$skill_tag,"skill_cty":atoi %sub2,$sub5
gosub *check_dir1
split $sub1,".",$sub3,$sub2
if $sub2="bmp" | $sub2="jpg" | $sub2="png" lsp 690,":a;"+$teigi1+$sub1,%sub1,%sub2
if $sub2="" lsp 690,":a;chara\"+$sub1+".bmp",%sub1,%sub2
print 10,500
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_anno1_1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_anno1_2"
getini $sel3,$mon_labo_mon_ini,$skill_tag,"skill_anno1_3"
if $sel3<>"" mov %rnd_ev,1
gosub *selprintn
csp 690:print 1
delay 1000
dwave 1,"se\miss.ogg"
if %anno_mode<>1 >
mov $sel1,"But it was dodged!"
eng $sel1:$sel6\
skillname ""
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_selmiss1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_selmiss2"
getini $sel3,$mon_labo_mon_ini,$skill_tag,"skill_selmiss3"
if $sel3<>"" mov %rnd_ev,1
gosub *selprintname
sub %stack,1
return



*tuika_tame_hit

add %stack,1
mov $skill_tag,"skilltame1"
mov %tuika_owaza_count4a,0
mov %bougyo_attack,0
goto *tuika_a_common



*tuika_counter_start

add %stack,1
mov $skill_tag,"skillcounter0"
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_counter_turn":atoi %counter,$sub1
mov %counter,%counter+1
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_message_mode":if $sub1="" skip 2
split $sub1,",",$sub2,$sub1:atoi %sub1,$sub1:if %sub1 mod 2=1 && %kousan=2 skip 5
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_sel1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_sel2"
getini $sel3,$mon_labo_mon_ini,$skill_tag,"skill_sel3"
gosub *selprintname
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_name"
if $sub1<>"" nobel $sub1:skillname $sel6
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_se1":if $sub1="" skip 5
gosub *check_dir1
split $sub1,".",$sub2,$sub3
if $sub3="ogg" | $sub3="wav" dwave 1,$teigi1+$sub1
if $sub3="" dwave 1,"se\"+$sub1+".ogg"
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_ct1":if $sub1="" skip 9
getini $sub4,$mon_labo_mon_ini,$skill_tag,"skill_ctx":atoi %sub1,$sub4
getini $sub5,$mon_labo_mon_ini,$skill_tag,"skill_cty":atoi %sub2,$sub5
gosub *check_dir1
split $sub1,".",$sub3,$sub2
if $sub2="bmp" | $sub2="jpg" | $sub2="png" lsp 690,":a;"+$teigi1+$sub1,%sub1,%sub2
if $sub2="" lsp 690,":a;chara\"+$sub1+".bmp",%sub1,%sub2
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_counter_tatie":if $sub1="" skip 9
skip 2
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_counter_tatie":if $sub1="" skip 8
gosub *check_dir1
split $sub1,".",$sub3,$sub2
if $sub2="bmp" | $sub2="jpg" | $sub2="png" lsp 700,":a;"+$teigi1+$sub1,%monster_x,%monster_y
if $sub2="" lsp 700,":a;chara\"+$sub1+".bmp",%monster_x,%monster_y
getini $tatie1,$mon_labo_mon_ini,$skill_tag,"skill_counter_tatie"
mov $tatie2,$tatie1:mov $tatie3,$tatie1:mov $tatie4,$tatie1
print 10,500
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_anno1_1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_anno1_2"
getini $sel3,$mon_labo_mon_ini,$skill_tag,"skill_anno1_3"
if $sel3<>"" mov %rnd_ev,1
gosub *selprint
skillname ""
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_message_mode":if $sub1="" mov %message_mode,0:skip 2
split $sub1,",",$sub1,$sub2:atoi %message_mode,$sub1
if %message_mode mod 4<2 | %kousan<>2 gosub *tuika_sel
mov %owaza_count3a,1
mov %owaza_count3b,1
mov %owaza_count3c,1
mov %owaza_count3d,1
sub %stack,1
return



*tuika_counter_mid

add %stack,1
mov $skill_tag,"skillcounter0"
mov %counter,%counter-1
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_sel_counter_mid1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_sel_counter_mid2"
getini $sel3,$mon_labo_mon_ini,$skill_tag,"skill_sel_counter_mid3"
gosub *selprintname
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_name"
if $sub1<>"" nobel $sub1:skillname $sel6
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_se1":if $sub1="" skip 5
gosub *check_dir1
split $sub1,".",$sub2,$sub3
if $sub3="ogg" | $sub3="wav" dwave 1,$teigi1+$sub1
if $sub3="" dwave 1,"se\"+$sub1+".ogg"
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_anno_counter_mid1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_anno_counter_mid2"
getini $sel3,$mon_labo_mon_ini,$skill_tag,"skill_anno_counter_mid3"
if $sel3<>"" mov %rnd_ev,1
gosub *selprint
skillname ""
sub %stack,1
return



*tuika_counter_end

add %stack,1
mov $skill_tag,"skillcounter0"
mov %tuika_owaza_count4b,0
mov %counter,0
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_message_mode":if $sub1="" skip 2
split $sub1,",",$sub2,$sub1:atoi %sub1,$sub1:if %sub1 mod 4>1 && %kousan=2 skip 5
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_sel_counter_end1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_sel_counter_end2"
getini $sel3,$mon_labo_mon_ini,$skill_tag,"skill_sel_counter_end3"
gosub *selprintname
getini $tatie1,$mon_labo_mon_ini,"data","tatie1"
getini $tatie2,$mon_labo_mon_ini,"data","tatie2"
getini $tatie3,$mon_labo_mon_ini,"data","tatie3"
getini $tatie4,$mon_labo_mon_ini,"data","tatie4"
gosub *face1
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_anno_counter_end1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_anno_counter_end2"
getini $sel3,$mon_labo_mon_ini,$skill_tag,"skill_anno_counter_end3"
if $sel3<>"" mov %rnd_ev,1
gosub *selprint
gosub *followup
sub %stack,1
return



*tuika_damage1

add %stack,1
mov $wind_kakuritu,"":mov $move,"1"
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_message_mode":if $sub1="" skip 2
split $sub1,",",$sub2,$sub1:atoi %sub1,$sub1:if %sub1 mod 2=1 && %kousan=2 skip 5
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_sel1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_sel2"
getini $sel3,$mon_labo_mon_ini,$skill_tag,"skill_sel3"
gosub *sel10printname
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_name"
if $sub1<>"" nobel $sub1:skillname $sel6
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_se1":if $sub1="" skip 5
gosub *check_dir1
split $sub1,".",$sub2,$sub3
if $sub3="ogg" | $sub3="wav" dwave 1,$teigi1+$sub1
if $sub3="" dwave 1,"se\"+$sub1+".ogg"
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_ct1":if $sub1="" skip 8
getini $sub4,$mon_labo_mon_ini,$skill_tag,"skill_ctx":atoi %sub1,$sub4
getini $sub5,$mon_labo_mon_ini,$skill_tag,"skill_cty":atoi %sub2,$sub5
gosub *check_dir1
split $sub1,".",$sub3,$sub2
if $sub2="bmp" | $sub2="jpg" | $sub2="png" lsp 690,":a;"+$teigi1+$sub1,%sub1,%sub2
if $sub2="" lsp 690,":a;chara\"+$sub1+".bmp",%sub1,%sub2
print 10,500
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_anno1_1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_anno1_2"
getini $sel3,$mon_labo_mon_ini,$skill_tag,"skill_anno1_3"
getini $sel4,$mon_labo_mon_ini,$skill_tag,"skill_anno1_4"if $sel1<>"" && $sel2<>"" && $sel3<>"" && $sel4<>"" mov $sel5,"anno1":gosub *sel10printn:skip 3
if $sel3<>"" mov %rnd_ev,1
gosub *selprintn
if $skill_tag<>"skillcounter1" && $skill_tag<>"skilltame1" && $skill_tag<>"skilltame2" skip 3
if %daten>0 sub %stack,1:return *skill22x
skip 14
if %tuika_skill_kouka>6 && %tuika_skill_kouka<10 skip 13
if %daten>0 sub %stack,1:return *skill22x
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_aqua":gosub *check_custom_dialog:if $sel2="custom" gosub *custom_aqua_guard:skip 5
atoi %sub1,$sel1:rnd2 %ransu2,1,100
if %enemy_fire>0 && %aqua>1 && %ransu2<100 && %kousoku=0 gosub *aqua_guard:sub %stack,1:return *tuika_guard
if %enemy_wind>0 && %aqua>2 && %ransu2<5 && %kousoku=0 gosub *aqua_guard:sub %stack,1:return *tuika_guard
if %aqua>1 && %ransu2<%sub1 gosub *aqua_guard:sub %stack,1:return *tuika_guard
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_wind":gosub *check_custom_dialog:if $sel2="custom" gosub *custom_wind_guard:skip 6
atoi %wind_kakuritu,$sel1
if %tuika_skill_kouka=0 | %tuika_skill_kouka=1 | %tuika_skill_kouka=6 getini $wind_kakuritu,$mon_labo_mon_ini,$skill_tag,"skill_multiwind"
gosub *wind_guard_kakuritu
if %wind_guard_on=1 && $wind_kakuritu="1" goto *tuika_multiwind
if %wind_guard_on=1 getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_windanno":gosub *wind_guard:sub %stack,1:return *tuika_guard
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_damage1_1":atoi %sub1,$sub1
getini $sub2,$mon_labo_mon_ini,$skill_tag,"skill_damage1_2":atoi %sub2,$sub2
if %tuika_skill_kouka=7 gosub *tuika_enemy_heal:sub %stack,1:return
if %tuika_skill_kouka=8 gosub *tuika_spirit_cancel:sub %stack,1:return
if $skill_tag="skillcounter1" | $skill_tag="skilltame1" | $skill_tag="skilltame2" skip 2
if %tuika_skill_kouka=9 && %kousoku=0 gosub *tuika_artifical_spirit:sub %stack,1:return
if %sub1=0 && %sub2=0 skip 8
if %anno_mode<>1 >
if $damage_kotei="1 " | $damage_kotei="3 " | $damage_kotei="5 " mov %damage_kotei,1
if $damage_kotei="2 " | $damage_kotei="3 " mov %a_effect1,1
if $damage_kotei="4 " | $damage_kotei="5 " mov %a_effect1,2
damage %sub1,%sub2
if %tuika_skill_kouka=1 gosub *enemylife_kaihuku
skip 2
if %anno_mode<>1 \
if %tuika_skill_kouka=6 gosub *lvdrain
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_ctx":atoi %sub1,$sub1
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_cty":atoi %sub2,$sub1
getini $sub2,$mon_labo_mon_ini,$skill_tag,"skill_ct1_1":if $sub2="" skip 7
gosub *check_dir2
split $sub2,",",$sub1,$sub6
split $sub1,".",$sub3,$sub2
if $sub2="bmp" | $sub2="jpg" | $sub2="png" lsp 690,":a;"+$teigi1+$sub1,%sub1,%sub2
if $sub2="" lsp 690,":a;chara\"+$sub1+".bmp",%sub1,%sub2
if $sub6<>"0" print 10,500
sub %stack,1
return



*tuika_counter_damage1

add %stack,1
mov $wind_kakuritu,"":mov $move,"1"
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_message_mode":if $sub1="" skip 2
split $sub1,",",$sub2,$sub1:atoi %sub1,$sub1:if %sub1 mod 2=1 && %kousan=2 skip 5
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_sel1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_sel2"
getini $sel3,$mon_labo_mon_ini,$skill_tag,"skill_sel3"
gosub *sel10printname
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_name"
if $sub1<>"" nobel $sub1:skillname $sel6
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_se1":if $sub1="" skip 5
gosub *check_dir1
split $sub1,".",$sub2,$sub3
if $sub3="ogg" | $sub3="wav" dwave 1,$teigi1+$sub1
if $sub3="" dwave 1,"se\"+$sub1+".ogg"
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_ct1":if $sub1="" skip 9
getini $sub4,$mon_labo_mon_ini,$skill_tag,"skill_ctx":atoi %sub1,$sub4
getini $sub5,$mon_labo_mon_ini,$skill_tag,"skill_cty":atoi %sub2,$sub5
gosub *check_dir1
split $sub1,".",$sub3,$sub2
if $sub2="bmp" | $sub2="jpg" | $sub2="png" lsp 690,":a;"+$teigi1+$sub1,%sub1,%sub2
if $sub2="" lsp 690,":a;chara\"+$sub1+".bmp",%sub1,%sub2
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_counter_tatie":if $sub1="" skip 9
skip 2
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_counter_tatie":if $sub1="" skip 8
gosub *check_dir1
split $sub1,".",$sub3,$sub2
if $sub2="bmp" | $sub2="jpg" | $sub2="png" lsp 700,":a;"+$teigi1+$sub1,%monster_x,%monster_y
if $sub2="" lsp 700,":a;chara\"+$sub1+".bmp",%monster_x,%monster_y
getini $tatie1,$mon_labo_mon_ini,$skill_tag,"skill_counter_tatie"
mov $tatie2,$tatie1:mov $tatie3,$tatie1:mov $tatie4,$tatie1
print 10,500
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_anno1_1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_anno1_2"
getini $sel3,$mon_labo_mon_ini,$skill_tag,"skill_anno1_3"
getini $sel4,$mon_labo_mon_ini,$skill_tag,"skill_anno1_4"if $sel1<>"" && $sel2<>"" && $sel3<>"" && $sel4<>"" mov $sel5,"anno1":gosub *sel10printn:skip 3
if $sel3<>"" mov %rnd_ev,1
gosub *selprintn
if %tuika_skill_kouka>6 && %tuika_skill_kouka<10 skip 13
if %daten>0 sub %stack,1:return *skill22x
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_aqua":gosub *check_custom_dialog:if $sel2="custom" gosub *custom_aqua_guard:skip 5
atoi %sub1,$sel1:rnd2 %ransu2,1,100
if %enemy_fire>0 && %aqua>1 && %ransu2<100 && %kousoku=0 gosub *aqua_guard:sub %stack,1:return *tuika_guard
if %enemy_wind>0 && %aqua>2 && %ransu2<5 && %kousoku=0 gosub *aqua_guard:sub %stack,1:return *tuika_guard
if %aqua>1 && %ransu2<%sub1 gosub *aqua_guard:sub %stack,1:return *tuika_guard
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_wind":gosub *check_custom_dialog:if $sel2="custom" gosub *custom_wind_guard:skip 6
atoi %wind_kakuritu,$sel1
if %tuika_skill_kouka=0 | %tuika_skill_kouka=1 | %tuika_skill_kouka=6 getini $wind_kakuritu,$mon_labo_mon_ini,$skill_tag,"skill_multiwind"
gosub *wind_guard_kakuritu
if %wind_guard_on=1 && $wind_kakuritu="1" goto *tuika_multiwind
if %wind_guard_on=1 getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_windanno":gosub *wind_guard:sub %stack,1:return *tuika_guard
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_damage1_1":atoi %sub1,$sub1
getini $sub2,$mon_labo_mon_ini,$skill_tag,"skill_damage1_2":atoi %sub2,$sub2
if %tuika_skill_kouka=7 gosub *tuika_enemy_heal:sub %stack,1:return
if %tuika_skill_kouka=8 gosub *tuika_spirit_cancel:sub %stack,1:return
if %tuika_skill_kouka=9 && %kousoku=0 gosub *tuika_artifical_spirit:sub %stack,1:return
if %sub1=0 && %sub2=0 skip 8
if %anno_mode<>1 >
if $damage_kotei="1 " | $damage_kotei="3 " | $damage_kotei="5 " mov %damage_kotei,1
if $damage_kotei="2 " | $damage_kotei="3 " mov %a_effect1,1
if $damage_kotei="4 " | $damage_kotei="5 " mov %a_effect1,2
damage %sub1,%sub2
if %tuika_skill_kouka=1 gosub *enemylife_kaihuku
skip 2
if %anno_mode<>1 \
if %tuika_skill_kouka=6 gosub *lvdrain
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_ctx":atoi %sub1,$sub1
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_cty":atoi %sub2,$sub1
getini $sub2,$mon_labo_mon_ini,$skill_tag,"skill_ct1_1":if $sub2="" skip 7
gosub *check_dir2
split $sub2,",",$sub1,$sub6
split $sub1,".",$sub3,$sub2
if $sub2="bmp" | $sub2="jpg" | $sub2="png" lsp 690,":a;"+$teigi1+$sub1,%sub1,%sub2
if $sub2="" lsp 690,":a;chara\"+$sub1+".bmp",%sub1,%sub2
if $sub6<>"0" print 10,500
sub %stack,1
return



*tuika_extra_hits

add %stack,1
if $wind_kakuritu="2" mov $wind_kakuritu,"1":sub %stack,1:return
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_multilose":if $sub1<>"1" goto *tuika_extra_hits1
mov %daten,1
if %mylife=0 mov %daten,0:sub %stack,1:return *tuika_multi_h
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_finish":if $sub1="" skip 3
split $sub1,",",$sub2,$sub1:atoi %sub2,$sub2
if %mylife<%sub2 mov %daten,0:sub %stack,1:return *tuika_followup_instant
goto *tuika_extra_hits1



*tuika_extra_hits1

atoi %sub1,$move:add %sub1,1
if %sub1>9 mov %daten,0:sub %stack,1:return
itoa $sub1,%sub1
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_damage"+$sub1+"_1":if $sub1="" mov %daten,0:sub %stack,1:return
getini $sub2,$mon_labo_mon_ini,$skill_tag,"skill_extrahits_start":if $sub2="" skip 3
atoi %sub2,$sub2
if %sub1>%sub2 && %enemy_wind+%enemy_aqua+%enemy_fire=0 mov %daten,0:sub %stack,1:return
getini $sub2,$mon_labo_mon_ini,$skill_tag,"skill_extrahits_end_wind":if $sub2="" skip 3
atoi %sub2,$sub2
if %sub1>%sub2 && %enemy_wind>0 mov %daten,0:sub %stack,1:return
getini $sub2,$mon_labo_mon_ini,$skill_tag,"skill_extrahits_end_aqua":if $sub2="" skip 3
atoi %sub2,$sub2
if %sub1>%sub2 && %enemy_aqua>0 mov %daten,0:sub %stack,1:return
getini $sub2,$mon_labo_mon_ini,$skill_tag,"skill_extrahits_end_fire":if $sub2="" skip 3
atoi %sub2,$sub2
if %sub1>%sub2 && %enemy_fire>0 mov %daten,0:sub %stack,1:return
itoa $move,%sub1
gosub *tuika_damage_x
if %daten<>1 skip 5
if %mylife=0 sub %stack,1:return *tuika_multi_h
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_finish":if $sub1="" skip 3
split $sub1,",",$sub2,$sub1:atoi %sub2,$sub2
if %mylife<%sub2 mov %daten,0:sub %stack,1:return *tuika_followup_instant
goto *tuika_extra_hits1



*tuika_damage_x

add %stack,1
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_kouka_change"+$move:if $sub1<>"" gosub *tuika_kouka_change
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_se"+$move:if $sub1="" skip 5
gosub *check_dir1
split $sub1,".",$sub2,$sub3
if $sub3="ogg" | $sub3="wav" dwave 1,$teigi1+$sub1
if $sub3="" dwave 1,"se\"+$sub1+".ogg"
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_anno"+$move+"_1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_anno"+$move+"_2"
getini $sel3,$mon_labo_mon_ini,$skill_tag,"skill_anno"+$move+"_3"
getini $sel4,$mon_labo_mon_ini,$skill_tag,"skill_anno"+$move+"_4":if $sel1<>"" && $sel2<>"" && $sel3<>"" && $sel4<>"" mov $sel5,"anno"+$move:gosub *sel10printn:skip 3
if $sel3<>"" mov %rnd_ev,1
gosub *selprintn
if $wind_kakuritu<>"1" skip 4
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_wind":gosub *check_custom_dialog:if $sel2="custom" gosub *custom_wind_guard:skip 3
gosub *wind_guard_kakuritu
if %wind_guard_on=1 goto *tuika_multiwind
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_damage"+$move+"_1":atoi %sub1,$sub1
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_damage"+$move+"_2":atoi %sub2,$sub1
if %sub1=0 && %sub2=0 skip 8
if %anno_mode<>1 >
if $damage_kotei="1 " | $damage_kotei="3 " | $damage_kotei="5 " mov %damage_kotei,1
if $damage_kotei="2 " | $damage_kotei="3 " mov %a_effect1,1
if $damage_kotei="4 " | $damage_kotei="5 " mov %a_effect1,2
damage %sub1,%sub2
if %tuika_skill_kouka=1 gosub *enemylife_kaihuku
skip 2
if %anno_mode<>1 \
if %tuika_skill_kouka=6 gosub *lvdrain
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_ctx":atoi %sub1,$sub1
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_cty":atoi %sub2,$sub1
getini $sub2,$mon_labo_mon_ini,$skill_tag,"skill_ct1_"+$move:if $sub2="" skip 7
gosub *check_dir2
split $sub2,",",$sub1,$sub6
split $sub1,".",$sub3,$sub2
if $sub2="bmp" | $sub2="jpg" | $sub2="png" lsp 690,":a;"+$teigi1+$sub1,%sub1,%sub2
if $sub2="" lsp 690,":a;chara\"+$sub1+".bmp",%sub1,%sub2
if $sub6<>"0" print 10,500
sub %stack,1
return



*tuika_kouka_change

if %tuika_skill_kouka<>0 && %tuika_skill_kouka<>1 && %tuika_skill_kouka<>6 return
atoi %sub1,$sub1
if %sub1=6 mov %tuika_skill_kouka,6:skip 3
if %sub1=1 mov %tuika_skill_kouka,1:skip 2
mov %tuika_skill_kouka,0
return



*custom_aqua_guard

add %stack,1
mov $mon_labo_mon_ini_sc,$sel1
mov %mon_labo_mon_ini_ky,0
goto *custom_aqua_guard_commands



*custom_aqua_guard_commands

if %mon_labo_mon_ini_ky>4999 goto *overflow
itoa $mon_labo_mon_ini_ky,%mon_labo_mon_ini_ky
getini $mon_labo_mon_ini_cmd,$mon_labo_mon_ini,$mon_labo_mon_ini_sc,$mon_labo_mon_ini_ky
if $mon_labo_mon_ini_cmd="" add %mon_labo_mon_ini_ky,1:goto *custom_aqua_guard_commands
split $mon_labo_mon_ini_cmd,",",$sub1
if $sub1="execute" sub %stack,1:return *custom_aqua_guard_execute
if $sub1="end" sub %stack,1:return
if $sub1="gotoline" gosub *mls_cmd_gotoline:skip 7
if $sub1="var_ld" gosub *mls_cmd_var_ld:skip 6
if $sub1="var_cal" gosub *mls_cmd_var_cal:skip 5
if $sub1="var_cpa" gosub *mls_cmd_var_cpa:skip 4
if $sub1="var_jumpline" gosub *mls_cmd_var_jumpline:skip 3
if $sub1="var_dice" gosub *mls_cmd_var_dice:skip 2
if $sub1="var_dice2" gosub *mls_cmd_var_dice2
add %mon_labo_mon_ini_ky,1
goto *custom_aqua_guard_commands



*custom_aqua_guard_execute

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2
if $sub2="" gosub *aqua_guard:skip 4
mov $mon_labo_mon_ini_sc,$sub2
mov %mon_labo_mon_ini_ky,0
gosub *custom_dialog
sub %stack,1
return *tuika_guard



*custom_wind_guard

add %stack,1
if %tuika_skill_kouka=0 | %tuika_skill_kouka=1 | %tuika_skill_kouka=6 getini $wind_kakuritu,$mon_labo_mon_ini,$skill_tag,"skill_multiwind"
mov $mon_labo_mon_ini_sc,$sel1
mov %mon_labo_mon_ini_ky,0
goto *custom_wind_guard_commands



*custom_wind_guard_commands

if %mon_labo_mon_ini_ky>4999 goto *overflow
itoa $mon_labo_mon_ini_ky,%mon_labo_mon_ini_ky
getini $mon_labo_mon_ini_cmd,$mon_labo_mon_ini,$mon_labo_mon_ini_sc,$mon_labo_mon_ini_ky
if $mon_labo_mon_ini_cmd="" add %mon_labo_mon_ini_ky,1:goto *custom_wind_guard_commands
;eng $mon_labo_mon_ini_ky+" "+$mon_labo_mon_ini_cmd:$sel6\
split $mon_labo_mon_ini_cmd,",",$sub1
if $sub1="finish" && $wind_kakuritu="1" && $move="1" mov $wind_kakuritu,"2":sub %stack,1:return *custom_multiwind_guard_execute
if $sub1="finish" && $wind_kakuritu="1" sub %stack,1:return *custom_wind_guard_execute
if $sub1="execute" && $wind_kakuritu="1" sub %stack,1:return *custom_multiwind_guard_execute
if $sub1="execute" sub %stack,1:return *custom_wind_guard_execute
if $sub1="end" sub %stack,1:return
if $sub1="gotoline" gosub *mls_cmd_gotoline:skip 7
if $sub1="var_ld" gosub *mls_cmd_var_ld:skip 6
if $sub1="var_cal" gosub *mls_cmd_var_cal:skip 5
if $sub1="var_cpa" gosub *mls_cmd_var_cpa:skip 4
if $sub1="var_jumpline" gosub *mls_cmd_var_jumpline:skip 3
if $sub1="var_dice" gosub *mls_cmd_var_dice:skip 2
if $sub1="var_dice2" gosub *mls_cmd_var_dice2
add %mon_labo_mon_ini_ky,1
goto *custom_wind_guard_commands



*custom_wind_guard_execute

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2
if $sub2="" getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_windanno":gosub *wind_guard:skip 4
mov $mon_labo_mon_ini_sc,$sub2
mov %mon_labo_mon_ini_ky,0
gosub *custom_dialog
sub %stack,1
return *tuika_guard



*custom_multiwind_guard_execute

split $mon_labo_mon_ini_cmd,",",$sub1,$sub2
if $sub2="" goto *tuika_multiwind
mov $mon_labo_mon_ini_sc,$sub2
mov %mon_labo_mon_ini_ky,0
gosub *custom_dialog
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_name"
if $sub1<>"" nobel $sub1:skillname $sel6
sub %stack,1
return



*tuika_enemy_heal

add %stack,1
if %sub1=0 && %sub2=0 skip 7
if %anno_mode<>1 >
if %sub1=%sub2 mov %damage,%sub1:skip 3
if %sub2<%sub1 mov %sub1,%sub2:atoi %sub2,$sub1
rnd2 %damage,%sub1,%sub2
gosub *enemylife_kaihuku
skip 2
if %anno_mode<>1 \
gosub *tuika_common_output
sub %stack,1
return



*tuika_spirit_cancel

add %stack,1
if %anno_mode<>1 \
if %sub1=1 | %sub1=3 | %sub1=5 | %sub1=7 | %sub1=9 | %sub1=11 | %sub1=13 | %sub1=15 skip 2
skip 2
if %wind>0 mov %wind,0:mov %wind_turn,0
if %sub1=2 | %sub1=3 | %sub1=6 | %sub1=7 | %sub1=10 | %sub1=11 | %sub1=14 | %sub1=15 skip 2
skip 2
if %earth>0 mov %earth,0:mov %earth_turn,0
if %sub1=4 | %sub1=5 | %sub1=6 | %sub1=7 | %sub1=12 | %sub1=13 | %sub1=14 | %sub1=15 skip 2
skip 2
if %aqua>0 mov %aqua,0:mov %aqua_turn,0
if %sub1<8 | %sub1>15 skip 2
if %fire>0 mov %fire,0:mov %fire_turn,0
gosub *elm_print
gosub *tuika_common_output
sub %stack,1
return



*tuika_artifical_spirit

add %stack,1
split $sub1,",",$sub2,$sub3:atoi %sub3,$sub3
if $sub2="off" | $sub2="0" mov %enemy_wind,0:mov %enemy_earth,0:mov %enemy_aqua,0:mov %enemy_fire,0
if $sub2="wind" | $sub2="1" mov %enemy_wind,%sub3+1:mov %enemy_earth,0:mov %enemy_aqua,0:mov %enemy_fire,0:mov %kaihi_el,50:mov %earth_keigen_el,70
if $sub2="earth" | $sub2="2" mov %enemy_earth,%sub3+1:mov %enemy_wind,0:mov %enemy_aqua,0:mov %enemy_fire,0:mov %damage_keigen_el,50
if $sub2="aqua" | $sub2="3" mov %enemy_aqua,%sub3+1:mov %enemy_wind,0:mov %enemy_earth,0:mov %enemy_fire,0:mov %damage_keigen_el,70:mov %fire_keigen_el,30
if $sub2="fire" | $sub2="4" mov %enemy_fire,%sub3+1:mov %enemy_wind,0:mov %enemy_earth,0:mov %enemy_aqua,0
gosub *enemy_elm_print
gosub *tuika_common_output
sub %stack,1
return



*tuika_common_output

add %stack,1
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_ctx":atoi %sub1,$sub1
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_cty":atoi %sub2,$sub1
getini $sub2,$mon_labo_mon_ini,$skill_tag,"skill_ct1_1":if $sub2="" skip 7
gosub *check_dir2
split $sub2,",",$sub1,$sub6
split $sub1,".",$sub3,$sub2
if $sub2="bmp" | $sub2="jpg" | $sub2="png" lsp 690,":a;"+$teigi1+$sub1,%sub1,%sub2
if $sub2="" lsp 690,":a;chara\"+$sub1+".bmp",%sub1,%sub2
print 10,500
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_se2":if $sub1="" skip 5
gosub *check_dir1
split $sub1,".",$sub2,$sub3
if $sub3="ogg" | $sub3="wav" dwave 1,$teigi1+$sub1
if $sub3="" dwave 1,"se\"+$sub1+".ogg"
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_anno2_1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_anno2_2"
getini $sel3,$mon_labo_mon_ini,$skill_tag,"skill_anno2_3"
getini $sel4,$mon_labo_mon_ini,$skill_tag,"skill_anno2_4":if $sel1<>"" && $sel2<>"" && $sel3<>"" && $sel4<>"" mov $sel5,"anno2":gosub *sel10printn:skip 3
if $sel3<>"" mov %rnd_ev,1
gosub *selprintn
if %anno_mode<>1 \
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_ctx":atoi %sub1,$sub1
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_cty":atoi %sub2,$sub1
getini $sub2,$mon_labo_mon_ini,$skill_tag,"skill_ct1_2":if $sub2="" skip 7
gosub *check_dir2
split $sub2,",",$sub1,$sub6
split $sub1,".",$sub3,$sub2
if $sub2="bmp" | $sub2="jpg" | $sub2="png" lsp 690,":a;"+$teigi1+$sub1,%sub1,%sub2
if $sub2="" lsp 690,":a;chara\"+$sub1+".bmp",%sub1,%sub2
if $sub6<>"0" print 10,500
sub %stack,1
return



*tuika_status

add %stack,1
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_status":atoi %sub1,$sub1
if %status=8 skip 12
if %status<>%sub1 skip 11
if %sub1=1 && %status=1 mov $sel1,$ori_name+" is stuck in a trance..."
if %sub1=2 && %status=2 mov $sel1,$ori_name+"'s body is paralyzed..."
if %sub1=4 && %status=4 mov $sel1,$ori_name+" can't resist the monster's words..."
if %sub1=5 && %status=5 mov $sel1,$ori_name+" is mesmerized..."
if %sub1=7 && %status=7 mov $sel1,$ori_name+" is confused..."
eng $sel1:$sel6\
skillname ""
if %mylife=0 sub %stack,1:return *tuika_h
if %kousan<2 csp 690:print 10,500
sub %stack,1:return
if %sub1=1 && %status=0 mov %status,1:mov $sel1,$ori_name+" was induced into a trance!":gosub *status_print:skip 9
if %sub1=2 && %status=0 mov %status,2:mov $sel1,$ori_name+"'s body became paralyzed!":gosub *status_print:skip 8
if %sub1=4 && %status=0 mov %status,4:mov $sel1,$ori_name+" can no longer resist the monster's words!":gosub *status_print:skip 7
if %sub1=5 && %status=0 mov %status,5:mov $sel1,$ori_name+" becomes mesmerized!":gosub *status_print:skip 6
if %sub1=6 && %status=0 mov %status,6:mov $sel1,$ori_name+" is gradually turning to stone!":gosub *status_print:skip 5
if %sub1=7 && %status=0 mov %status,7:mov $sel1,$ori_name+" becomes confused!":gosub *status_print:skip 4
if %sub1=8 && %status=0 mov %status,8:mov $sel1,"Part of "+$ori_name+"'s body turns to stone!":gosub *tuika_status_turn:gosub *status_print:skip 3
if %sub1=8 && %status=8 mov $sel1,"Another part of "+$ori_name+"'s body turns to stone!":sub %status_turn,1:skip 2
if %sub1=9 && %status=0 mov %status,9:mov $sel1,$ori_name+" is poisoned!":gosub *status_print
getini $sel6,$mon_labo_mon_ini,$skill_tag,"skill_status_anno":if $sel6<>"" mov $sel1,$sel6
if $sel6=" " skip 3
gosub *check_custom_dialog:if $sel2="custom" gosub *custom_dialog_start:skip 2
eng $sel1:$sel6\
if %status=9 getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_status_abairitu":atoi %poison,$sub1
if %status=9 mov $poison_skill,$skill_tag
getini $status_mid,$mon_labo_mon_ini,$skill_tag,"skill_status_mid"
getini $status_end,$mon_labo_mon_ini,$skill_tag,"skill_status_end"
if %status<>8 gosub *tuika_status_turn
sub %stack,1
return



*tuika_status_turn

getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_turn1":atoi %sub1,$sub1
getini $sub2,$mon_labo_mon_ini,$skill_tag,"skill_turn2":if $sub2="" mov %sub2,%sub1:skip 2
atoi %sub2,$sub1
if %sub1=%sub2 mov %status_turn,%sub1:return
if %sub2<%sub1 mov %sub3,%sub1:mov %sub1,%sub2:mov %sub2,%sub3
rnd2 %status_turn,%sub1,%sub2
return



*tuika_kousoku

add %stack,1
getini $sub1,$mon_labo_mon_ini,$skill_tag,"tatie4"
if $sub1<>"" mov $tatie4,$sub1
if %kousoku=3 goto *tuika_kousoku_d
mov %sub1,%kousoku_type
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_kousoku_type":atoi %kousoku_type,$sub1
if %kousoku<>%tuika_skill_kouka-2 goto *tuika_kousoku_a
goto *tuika_kousoku_b



*tuika_kousoku_a

if %enemy_aqua>0 && %fire>1 goto *tuika_kousoku_grandine
if %query_new<>1 mov %genmogaku,0
if %enemy_earth>0 mov %genmogaku,99:skip 4
if %kousoku_type<2 && %earth=0 getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_mogaku":if $sub1<>"" atoi %genmogaku,$sub1
if %kousoku_type<2 && %earth>0 getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_mogaku_earth":if $sub1<>"" atoi %genmogaku,$sub1
if %kousoku_type=2 mov %genmogaku,99
if %kousoku_type=2 getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_mogaku_abairitu":mov %abairitu,80:if $sub1<>"" atoi %abairitu,$sub1
if %kousoku_type=2 getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_mogaku_hp":atoi %kousoku_hp,$sub1
if %tuika_skill_kouka=3 mov %kousoku,1
if %tuika_skill_kouka=4 mov %kousoku,2
if %tuika_skill_kouka=5 mov %kousoku,3:gosub *tuika_kakuritu1
gosub *status_print
goto *tuika_kousoku_end



*tuika_kousoku_b

if %query_new<>1 mov %genmogaku,0
if %enemy_earth>0 mov %genmogaku,99:skip 4
if %kousoku_type<2 && %earth=0 getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_mogaku":if $sub1<>"" atoi %genmogaku,$sub1
if %kousoku_type<2 && %earth>0 getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_mogaku_earth":if $sub1<>"" atoi %genmogaku,$sub1
if %sub1<>2 && %kousoku_type=2 mov %genmogaku,99
if %kousoku_type=2 getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_mogaku_abairitu":if $sub1<>"" atoi %abairitu,$sub1
if %sub1<>2 && %kousoku_type=2 getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_mogaku_hp":atoi %kousoku_hp,$sub1
gosub *status_print
goto *tuika_kousoku_end



*tuika_kousoku_end

getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_kousoku_anno":if $sel1="" skip 3
gosub *check_custom_dialog:if $sel2="custom" gosub *custom_dialog_start:mov $sel2,$sel3:skip 2
eng $sel1:$sel6\
getini $sel1,$mon_labo_mon_ini,$skill_tag,"mogaku_anno1":if $sel1<>"" mov $mogaku_anno1,$sel1
getini $sel1,$mon_labo_mon_ini,$skill_tag,"mogaku_anno2":if $sel1<>"" mov $mogaku_anno2,$sel1
getini $sel1,$mon_labo_mon_ini,$skill_tag,"mogaku_anno3":if $sel1<>"" mov $mogaku_anno3,$sel1
getini $sel1,$mon_labo_mon_ini,$skill_tag,"mogaku_anno4":if $sel1<>"" mov $mogaku_anno4,$sel1
getini $sel1,$mon_labo_mon_ini,$skill_tag,"mogaku_sel1":if $sel1<>"" mov $mogaku_sel1,$sel1
getini $sel1,$mon_labo_mon_ini,$skill_tag,"mogaku_sel2":if $sel1<>"" mov $mogaku_sel2,$sel1
getini $sel1,$mon_labo_mon_ini,$skill_tag,"mogaku_sel3":if $sel1<>"" mov $mogaku_sel3,$sel1
getini $sel1,$mon_labo_mon_ini,$skill_tag,"mogaku_sel4":if $sel1<>"" mov $mogaku_sel4,$sel1
getini $sel1,$mon_labo_mon_ini,$skill_tag,"mogaku_sel5":if $sel1<>"" mov $mogaku_sel5,$sel1
getini $sel1,$mon_labo_mon_ini,$skill_tag,"mogaku_dassyutu1":if $sel1<>"" mov $mogaku_dassyutu1,$sel1
getini $sel1,$mon_labo_mon_ini,$skill_tag,"mogaku_dassyutu2":if $sel1<>"" mov $mogaku_dassyutu1,$sel1
getini $sel1,$mon_labo_mon_ini,$skill_tag,"mogaku_earth_dassyutu1":if $sel1<>"" mov $mogaku_earth_dassyutu1,$sel1
getini $sel1,$mon_labo_mon_ini,$skill_tag,"mogaku_earth_dassyutu2":if $sel1<>"" mov $mogaku_earth_dassyutu2,$sel1
getini $sel1,$mon_labo_mon_ini,$skill_tag,"mogaku_kaisin1":if $sel1<>"" mov $mogaku_kaisin1,$sel1
getini $sel1,$mon_labo_mon_ini,$skill_tag,"mogaku_kaisin2":if $sel1<>"" mov $mogaku_kaisin2,$sel1
sub %stack,1
return



*tuika_kousoku_d

gosub *status_print
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_kousoku_anno":if $sel1="" skip 3
gosub *check_custom_dialog:if $sel2="custom" gosub *custom_dialog_start:mov $sel2,$sel3:skip 2
eng $sel1:$sel6\
sub %stack,1
return



*tuika_kousoku_grandine

getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_kousoku_grandine":if $sel1="" skip 3
gosub *check_custom_dialog:if $sel2="custom" gosub *custom_dialog_start:skip 2
eng $sel1:$sel6\
sub %stack,1
return



*tuika_guard

getini $sub1,$mon_labo_mon_ini,$skill_tag,"followup_always":if $sub1="" | $sub1=" " skip 2
mov $skill_tag,"fllw"+$sub1:skip 3
getini $sub1,$mon_labo_mon_ini,$skill_tag,"followup_guard":if $sub1="" | $sub1=" " sub %stack,1:return
mov $skill_tag,"fllw"+$sub1
sub %stack,1
return



*tuika_multiwind

getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_windanno"
gosub *wind_guard
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_name"
if $sub1<>"" nobel $sub1:skillname $sel6
sub %stack,1
return



*tuika_multi_h

mov %daten,0
skillname ""
sub %stack,1
return *tuika_h



*tuika_status_sel

add %stack,1
if %status=1 mov $sel1,"Faaa..."
if %status=2 mov $sel1,"Uuu..."
if %status=4 mov $sel1,"Ah, uuu..."
if %status=5 mov $sel1,"Faaaaa..."
if %status=6:mov $sel1,"What is this!?"
if %status=7 mov $sel1,"...!?"
if %status=8 mov $sel1,"Ah...Ahh!"
if %status=9 mov $sel1,"No..."
getini $sel6,$mon_labo_mon_ini,$skill_tag,"skill_status_hit"
if $sel6<>"" mov $sel1,$sel6
if $sel6=" " skip 4
name $ori_name
eng $sel1:$sel6\
name""
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_selx1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_selx2"
getini $sel3,$mon_labo_mon_ini,$skill_tag,"skill_selx3"
gosub *selprintname
sub %stack,1
return



*tuika_sel

add %stack,1
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_selx1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_selx2"
getini $sel3,$mon_labo_mon_ini,$skill_tag,"skill_selx3"
gosub *selprintname
sub %stack,1
return



*tuika_half

add %stack,1
if %max_mylife>%mylife*2 && %sel_hphalf=0 gosub *common_s1
if %max_mylife>%mylife*5 && %sel_kiki=0 gosub *common_s2
sub %stack,1
return



*followup

add %stack,1
getini $sub1,$mon_labo_mon_ini,$skill_tag,"followup_instant":if $sub1<>"" && $sub1<>" " sub %stack,1:return *tuika_followup_instant
if %kousoku<3 getini $sub1,$mon_labo_mon_ini,$skill_tag,"followup_always":if $sub1<>"" && $sub1<>" " skip 2
getini $sub1,$mon_labo_mon_ini,$skill_tag,"followup":if $sub1="" sub %stack,1:return
mov $skill_tag,"fllw"+$sub1
sub %stack,1
return



*tuika_followup_instant

mov $sel1,$sub1:gosub *check_custom_dialog
if %hit=0 mov $name3,$name
if $sel2<>"custom" goto *tuika_followup_instant1
mov $mon_labo_mon_ini_sc,$sel1
mov %mon_labo_mon_ini_ky,0
goto *tuika_link_commands



*tuika_followup_instant1

mov $skill_tag,"skill"+$sel1
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_name"
getini $sub2,$mon_labo_mon_ini,$skill_tag,"skill_kouka"
getini $sub3,$mon_labo_mon_ini,$skill_tag,"skill_kakuritu"
getini $sub4,$mon_labo_mon_ini,$skill_tag,"skill_damage1_1"
if $skill_tag<>"skilltame2" && $sub1="" && $sub2="" && $sub3="" && $sub4="" goto *empty_skill
gosub *check_skill_name
if $skill_tag<>"skillcounter0" && $skill_tag<>"skillcounter1" && $skill_tag<>"skilltame0" && $skill_tag<>"skilltame1" && $skill_tag<>"skilltame2" skip 9
if %kousoku>0 skip 8
if $skill_tag="skillcounter0" && %counter>0 add %hit,1:mov %bougyo_attack,0:sub %stack,1:goto *tuika_counter_end
if $skill_tag="skillcounter0" add %hit,1:mov %bougyo_attack,0:sub %stack,1:goto *tuika_counter_start
if $skill_tag="skillcounter1" add %hit,1:mov %bougyo_attack,0:sub %stack,1:goto *tuika_counter
if %counter>0 skip 4
if $skill_tag="skilltame0" add %hit,1:sub %stack,1:goto *tuika_tame_zyunbi
if $skill_tag="skilltame1" add %hit,1:sub %stack,1:goto *tuika_tame_hit
if $skill_tag="skilltame2" add %hit,1:sub %stack,1:goto *tuika_tame_miss
gosub *check_skill_type
getini $sub2,$mon_labo_mon_ini,$skill_tag,"skill_kouka":atoi %sub2,$sub2
if %kousoku=3 skip 5
if %sub2=2 && %status=8 skip 3
if %sub2=2 && %status<>0 sub %stack,1:return
skip 2
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_status":atoi %sub1,$sub1:if %sub1<>8 sub %stack,1:return
add %hit,1
mov %bougyo_attack,0
if %counter>0 goto *tuika_counter_common
if %kousoku=1 goto *tuika_bc_common
if %kousoku=2 goto *tuika_bc_common
if %kousoku=3 goto *tuika_d_common
goto *tuika_a_common



*check_skill_type

len %name_count,$skill_tag
if %counter=0 skip 5
if %name_count<13 return *ret1
mid $sub1,$skill_tag,0,12
if $sub1<>"skillcounter" return *ret1
return
if %name_count<7 return *ret1
mid $sub1,$skill_tag,0,6
if %kousoku=3 && $sub1<>"skilld" return *ret1
if %kousoku=2 && $sub1<>"skillc" return *ret1
if %kousoku=1 && $sub1<>"skillb" return *ret1
if %kousoku=0 && $sub1<>"skilla" return *ret1
return



*tuika_link_commands

if %mon_labo_mon_ini_ky>4999 goto *overflow
itoa $mon_labo_mon_ini_ky,%mon_labo_mon_ini_ky
getini $mon_labo_mon_ini_cmd,$mon_labo_mon_ini,$mon_labo_mon_ini_sc,$mon_labo_mon_ini_ky
if $mon_labo_mon_ini_cmd="" add %mon_labo_mon_ini_ky,1:goto *tuika_link_commands
split $mon_labo_mon_ini_cmd,",",$sub1
if $sub1="execute" goto *tuika_link_execute
if $sub1="end" sub %stack,1:return
if $sub1="gotoline" gosub *mls_cmd_gotoline:skip 8
if $sub1="var_ld" gosub *mls_cmd_var_ld:skip 7
if $sub1="var_cal" gosub *mls_cmd_var_cal:skip 6
if $sub1="var_cpa" gosub *mls_cmd_var_cpa:skip 5
if $sub1="var_jumpline" gosub *mls_cmd_var_jumpline:skip 4
if $sub1="var_dice" gosub *mls_cmd_var_dice:skip 3
if $sub1="var_dice2" gosub *mls_cmd_var_dice2:skip 2
if $sub1="name" gosub *tuika_link_name
add %mon_labo_mon_ini_ky,1
goto *tuika_link_commands



*tuika_link_execute

split $mon_labo_mon_ini_cmd,",",$sub1,$skill_tag
mov $skill_tag,"skill"+$skill_tag
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_name"
getini $sub2,$mon_labo_mon_ini,$skill_tag,"skill_kouka"
getini $sub3,$mon_labo_mon_ini,$skill_tag,"skill_kakuritu"
getini $sub4,$mon_labo_mon_ini,$skill_tag,"skill_damage1_1"
if $skill_tag<>"skilltame2" && $sub1="" && $sub2="" && $sub3="" && $sub4="" goto *empty_skill
gosub *check_skill_name
if $skill_tag<>"skillcounter0" && $skill_tag<>"skillcounter1" && $skill_tag<>"skilltame0" && $skill_tag<>"skilltame1" && $skill_tag<>"skilltame2" skip 9
if %kousoku>0 skip 8
if $skill_tag="skillcounter0" && %counter>0 add %hit,1:mov %bougyo_attack,0:sub %stack,1:goto *tuika_counter_end
if $skill_tag="skillcounter0" add %hit,1:mov %bougyo_attack,0:sub %stack,1:goto *tuika_counter_start
if $skill_tag="skillcounter1" add %hit,1:mov %bougyo_attack,0:sub %stack,1:goto *tuika_counter
if %counter>0 skip 4
if $skill_tag="skilltame0" add %hit,1:sub %stack,1:goto *tuika_tame_zyunbi
if $skill_tag="skilltame1" add %hit,1:sub %stack,1:goto *tuika_tame_hit
if $skill_tag="skilltame2" add %hit,1:sub %stack,1:goto *tuika_tame_miss
gosub *check_skill_type
getini $sub2,$mon_labo_mon_ini,$skill_tag,"skill_kouka":atoi %sub2,$sub2
if %kousoku=3 skip 5
if %sub2=2 && %status=8 skip 3
if %sub2=2 && %status<>0 sub %stack,1:return
skip 2
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_status":atoi %sub1,$sub1:if %sub1<>8 sub %stack,1:return
add %hit,1
mov %bougyo_attack,0
if %counter>0 goto *tuika_counter_common
if %kousoku=1 goto *tuika_bc_common
if %kousoku=2 goto *tuika_bc_common
if %kousoku=3 goto *tuika_d_common
goto *tuika_a_common



*tuika_link_name

len %name_count,$mon_labo_mon_ini_cmd
mid $name,$mon_labo_mon_ini_cmd,5,%name_count-5
nobel $name:mov $name,$sel6
mov $name2,$name
return



*tuika_a1

add %stack,1
mov $skill_tag,"skilla1"
gosub *tuika_check_status
mov %tuika_owaza_count1a,0
mov %owaza_num1,1
goto *tuika_a_common



*tuika_a2

add %stack,1
mov $skill_tag,"skilla2"
gosub *tuika_check_status
mov %tuika_owaza_count1b,0
mov %owaza_num1,2
goto *tuika_a_common



*tuika_a3

add %stack,1
mov $skill_tag,"skilla3"
gosub *tuika_check_status
mov %tuika_owaza_count1c,0
mov %owaza_num1,3
goto *tuika_a_common



*tuika_a4

add %stack,1
mov $skill_tag,"skilla4"
gosub *tuika_check_status
mov %tuika_owaza_count1d,0
mov %owaza_num1,4
goto *tuika_a_common



*tuika_a5

add %stack,1
mov $skill_tag,"skilla5"
gosub *tuika_check_status
mov %tuika_owaza_count1e,0
mov %owaza_num1,5
goto *tuika_a_common



*tuika_a6

add %stack,1
mov $skill_tag,"skilla6"
gosub *tuika_check_status
mov %tuika_owaza_count1f,0
mov %owaza_num1,6
goto *tuika_a_common



*tuika_a7

add %stack,1
mov $skill_tag,"skilla7"
gosub *tuika_check_status
mov %tuika_owaza_count1g,0
mov %owaza_num1,7
goto *tuika_a_common



*tuika_a8

add %stack,1
mov $skill_tag,"skilla8"
gosub *tuika_check_status
mov %tuika_owaza_count1h,0
mov %owaza_num1,8
goto *tuika_a_common



*tuika_b1

add %stack,1
mov $skill_tag,"skillb1"
gosub *tuika_check_status
mov %tuika_owaza_count2a,0
goto *tuika_bc_common



*tuika_b2

add %stack,1
mov $skill_tag,"skillb2"
gosub *tuika_check_status
mov %tuika_owaza_count2b,0
goto *tuika_bc_common



*tuika_b3

add %stack,1
mov $skill_tag,"skillb3"
gosub *tuika_check_status
mov %tuika_owaza_count2c,0
goto *tuika_bc_common



*tuika_b4

add %stack,1
mov $skill_tag,"skillb4"
gosub *tuika_check_status
mov %tuika_owaza_count2d,0
goto *tuika_bc_common



*tuika_c1

add %stack,1
mov $skill_tag,"skillc1"
mov %tuika_owaza_count3a,0
gosub *tuika_check_status
goto *tuika_bc_common



*tuika_c2

add %stack,1
mov $skill_tag,"skillc2"
mov %tuika_owaza_count3b,0
gosub *tuika_check_status
goto *tuika_bc_common



*tuika_c3

add %stack,1
mov $skill_tag,"skillc3"
mov %tuika_owaza_count3c,0
gosub *tuika_check_status
goto *tuika_bc_common



*tuika_c4

add %stack,1
mov $skill_tag,"skillc4"
mov %tuika_owaza_count3d,0
gosub *tuika_check_status
goto *tuika_bc_common



*tuika_d1

add %stack,1
mov $skill_tag,"skilld1"
goto *tuika_d_common



*tuika_d2

add %stack,1
mov $skill_tag,"skilld2"
goto *tuika_d_common



*tuika_d3

add %stack,1
mov $skill_tag,"skilld3"
goto *tuika_d_common



*tuika_d4

add %stack,1
mov $skill_tag,"skilld4"
goto *tuika_d_common



*tuika_counter

add %stack,1
mov $skill_tag,"skillcounter1"
mov %tuika_owaza_count4b,0
mov %counter,0
goto *tuika_a_common



*tuika_counter2

add %stack,1
mov $skill_tag,"skillcounter2"
gosub *tuika_check_status
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_count"
if $sub1<>"" atoi %sub1,$sub1:mov %owaza_count3a,-%sub1
goto *tuika_counter_common



*tuika_counter3

add %stack,1
mov $skill_tag,"skillcounter3"
gosub *tuika_check_status
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_count"
if $sub1<>"" atoi %sub1,$sub1:mov %owaza_count3b,0-%sub1
goto *tuika_counter_common



*tuika_counter4

add %stack,1
mov $skill_tag,"skillcounter4"
gosub *tuika_check_status
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_count"
if $sub1<>"" atoi %sub1,$sub1:mov %owaza_count3c,0-%sub1
goto *tuika_counter_common



*tuika_counter5

add %stack,1
mov $skill_tag,"skillcounter5"
gosub *tuika_check_status
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_count"
if $sub1<>"" atoi %sub1,$sub1:mov %owaza_count3d,0-%sub1
goto *tuika_counter_common



*tuika_check_status

getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_kouka":atoi %tuika_skill_kouka,$sub1
if %tuika_skill_kouka=2 && %status=8 skip 3
if %tuika_skill_kouka=2 && %status<>0 sub %stack,1:return *tuika_toquery_return
skip 2
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_status":atoi %sub1,$sub1:if %sub1<>8 sub %stack,1:return *tuika_toquery_return
return



*tuika_toquery_return

sub %stack,1
return *tuika_query_bind1



*tuika_kousan

mov $sel1,$ori_name+" completely drops all resistance!"
if $kousan<>"" && $kousan<>" " mov $sel1,$kousan
gosub *check_custom_dialog:if $sel2="custom" gosub *custom_dialog_start:goto *tuika_main
gosub *kousan_syori
mov $sel3,""
getini $sel2,$mon_labo_mon_ini,"anno","kousan_anno2"
gosub *selprint
gosub *face2
getini $sel1,$mon_labo_mon_ini,"sel","kousan1"
getini $sel2,$mon_labo_mon_ini,"sel","kousan2"
mov $sel3,""
gosub *selprintname
goto *tuika_a



*tuika_onedari

mov $list1,$onedari:mov %list_num1,1
mov $sel1,$list1:gosub *check_custom_dialog:if $sel2="custom" gosub *custom_dialog_start:goto *tuika_main
getini $list2,$mon_labo_mon_ini,"onedari","onedari_list2":mov %list_num2,1
getini $list3,$mon_labo_mon_ini,"onedari","onedari_list3":mov %list_num3,1
getini $list4,$mon_labo_mon_ini,"onedari","onedari_list4":mov %list_num4,1
getini $list5,$mon_labo_mon_ini,"onedari","onedari_list5":mov %list_num5,1
getini $list6,$mon_labo_mon_ini,"onedari","onedari_list6":mov %list_num6,1
getini $list7,$mon_labo_mon_ini,"onedari","onedari_list7":mov %list_num7,1
getini $list8,$mon_labo_mon_ini,"onedari","onedari_list8":mov %list_num8,1
getini $list9,$mon_labo_mon_ini,"onedari","onedari_list9":mov %list_num9,1
getini $list10,$mon_labo_mon_ini,"onedari","onedari_list10":mov %list_num10,1
getini $list11,$mon_labo_mon_ini,"onedari","onedari_list11":mov %list_num11,1
getini $list12,$mon_labo_mon_ini,"onedari","onedari_list12":mov %list_num12,1
getini $list13,$mon_labo_mon_ini,"onedari","onedari_list13":mov %list_num13,1
getini $list14,$mon_labo_mon_ini,"onedari","onedari_list14":mov %list_num14,1
getini $list15,$mon_labo_mon_ini,"onedari","onedari_list15":mov %list_num15,1
getini $list16,$mon_labo_mon_ini,"onedari","onedari_list16":mov %list_num16,1
gosub *cmd_onedari
if %cmd1=11 mov $sub1,$list1
if %cmd1=12 mov $sub1,$list2
if %cmd1=13 mov $sub1,$list3
if %cmd1=14 mov $sub1,$list4
if %cmd1=15 mov $sub1,$list5
if %cmd1=16 mov $sub1,$list6
if %cmd1=17 mov $sub1,$list7
if %cmd1=18 mov $sub1,$list8
if %cmd1=19 mov $sub1,$list9
if %cmd1=20 mov $sub1,$list10
if %cmd1=21 mov $sub1,$list11
if %cmd1=22 mov $sub1,$list12
if %cmd1=23 mov $sub1,$list13
if %cmd1=24 mov $sub1,$list14
if %cmd1=25 mov $sub1,$list15
if %cmd1=26 mov $sub1,$list16
if %cmd1=-1 goto *tuika_main
mov %sinkou,0
split $sub1,",",$sub2,$sel1
if $sel1<>"" mov $skill_tag,"skill"+$sel1:gosub *tuika_onedari_use
getini $sub2,$mon_labo_mon_ini,"skillcounter1","skill_name":if $sub1=$sub2 goto *tuika_onedarif1
getini $sub2,$mon_labo_mon_ini,"skillcounter2","skill_name":if $sub1=$sub2 goto *tuika_onedarif2
getini $sub2,$mon_labo_mon_ini,"skillcounter3","skill_name":if $sub1=$sub2 goto *tuika_onedarif3
getini $sub2,$mon_labo_mon_ini,"skillcounter4","skill_name":if $sub1=$sub2 goto *tuika_onedarif4
getini $sub2,$mon_labo_mon_ini,"skillcounter5","skill_name":if $sub1=$sub2 goto *tuika_onedarif5
getini $sub2,$mon_labo_mon_ini,"skilltame1","skill_name":if $sub1=$sub2 goto *tuika_onedarie1
getini $sub2,$mon_labo_mon_ini,"skilld1","skill_name":if $sub1=$sub2 goto *tuika_onedarid1
getini $sub2,$mon_labo_mon_ini,"skilld2","skill_name":if $sub1=$sub2 goto *tuika_onedarid2
getini $sub2,$mon_labo_mon_ini,"skilld3","skill_name":if $sub1=$sub2 goto *tuika_onedarid3
getini $sub2,$mon_labo_mon_ini,"skilld4","skill_name":if $sub1=$sub2 goto *tuika_onedarid4
getini $sub2,$mon_labo_mon_ini,"skillb1","skill_name":if $sub1=$sub2 goto *tuika_onedarib1
getini $sub2,$mon_labo_mon_ini,"skillb2","skill_name":if $sub1=$sub2 goto *tuika_onedarib2
getini $sub2,$mon_labo_mon_ini,"skillb3","skill_name":if $sub1=$sub2 goto *tuika_onedarib3
getini $sub2,$mon_labo_mon_ini,"skillb4","skill_name":if $sub1=$sub2 goto *tuika_onedarib4
getini $sub2,$mon_labo_mon_ini,"skillc1","skill_name":if $sub1=$sub2 goto *tuika_onedaric1
getini $sub2,$mon_labo_mon_ini,"skillc2","skill_name":if $sub1=$sub2 goto *tuika_onedaric2
getini $sub2,$mon_labo_mon_ini,"skillc3","skill_name":if $sub1=$sub2 goto *tuika_onedaric3
getini $sub2,$mon_labo_mon_ini,"skillc4","skill_name":if $sub1=$sub2 goto *tuika_onedaric4
getini $sub2,$mon_labo_mon_ini,"skilla1","skill_name":if $sub1=$sub2 goto *tuika_onedaria1
getini $sub2,$mon_labo_mon_ini,"skilla2","skill_name":if $sub1=$sub2 goto *tuika_onedaria2
getini $sub2,$mon_labo_mon_ini,"skilla3","skill_name":if $sub1=$sub2 goto *tuika_onedaria3
getini $sub2,$mon_labo_mon_ini,"skilla4","skill_name":if $sub1=$sub2 goto *tuika_onedaria4
getini $sub2,$mon_labo_mon_ini,"skilla5","skill_name":if $sub1=$sub2 goto *tuika_onedaria5
getini $sub2,$mon_labo_mon_ini,"skilla6","skill_name":if $sub1=$sub2 goto *tuika_onedaria6
getini $sub2,$mon_labo_mon_ini,"skilla7","skill_name":if $sub1=$sub2 goto *tuika_onedaria7
getini $sub2,$mon_labo_mon_ini,"skilla8","skill_name":if $sub1=$sub2 goto *tuika_onedaria8
goto *tuika_onedari



*tuika_onedari_use

add %stack,1
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_onedari_use"
if $sel1="" | $sel1=" " sub %stack,1:return
gosub *check_custom_dialog
if $sel2<>"custom" goto *tuika_onedari_use1
mov $mon_labo_mon_ini_sc,$sel1
mov %mon_labo_mon_ini_ky,0
sub %stack,1
return *tuika_onedari_use_commands



*tuika_onedari_use1

mov $sel2,$skill_tag:mov $skill_tag,"skill"+$sel1
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_name"
getini $sub2,$mon_labo_mon_ini,$skill_tag,"skill_kouka"
getini $sub3,$mon_labo_mon_ini,$skill_tag,"skill_kakuritu"
getini $sub4,$mon_labo_mon_ini,$skill_tag,"skill_damage1_1"
if $sub1="" && $sub2="" && $sub3="" && $sub4="" goto *empty_skill
gosub *check_skill_name1
mov $skill_tag,$sel2
sub %stack,1
return *tuika_onedari_use_apply



*check_skill_name1

len %name_count,$skill_tag
if %name_count<7 return *ret3
mid $sub1,$skill_tag,0,6
if $sub1<>"skilla" return *ret3
mid $sub2,$skill_tag,6,%name_count-6
atoi %sub2,$sub2:itoa $sub3,%sub2
if $sub2<>$sub3 return *ret3
if %sub2<1 return *ret3
return



*tuika_onedari_use_apply

gosub *onedari_syori
mov $sel4,$sel1
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_onedari1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_onedari2"
mov $sel3,""
gosub *selprint
mov %bougyo_attack,0
if %counter>0 gosub *tuika_counter_end
if $sel4="a1" | $sel4="a2" | $sel4="a3" | $sel4="a4 | $sel4="a5" | $sel4="a6" | $sel4="a7" | $sel4="a8" gosub "*tuika_"+$sel4:goto *common_main
mov $skill_tag,"skill"+$sel4
add %stack,1
gosub *tuika_a_common
goto *common_main



*tuika_onedari_use_commands

if %mon_labo_mon_ini_ky>4999 goto *overflow
itoa $mon_labo_mon_ini_ky,%mon_labo_mon_ini_ky
getini $mon_labo_mon_ini_cmd,$mon_labo_mon_ini,$mon_labo_mon_ini_sc,$mon_labo_mon_ini_ky
if $mon_labo_mon_ini_cmd="" add %mon_labo_mon_ini_ky,1:goto *tuika_onedari_use_commands
split $mon_labo_mon_ini_cmd,",",$sub1
if $sub1="end" goto *common_main
if $sub1="execute" goto *tuika_onedari_execute
if $sub1="gotoline" gosub *mls_cmd_gotoline:skip 7
if $sub1="var_ld" gosub *mls_cmd_var_ld:skip 6
if $sub1="var_cal" gosub *mls_cmd_var_cal:skip 5
if $sub1="var_cpa" gosub *mls_cmd_var_cpa:skip 4
if $sub1="var_jumpline" gosub *mls_cmd_var_jumpline:skip 3
if $sub1="var_dice" gosub *mls_cmd_var_dice:skip 2
if $sub1="var_dice2" gosub *mls_cmd_var_dice2
add %mon_labo_mon_ini_ky,1
goto *tuika_onedari_use_commands



*tuika_onedari_execute

split $mon_labo_mon_ini_cmd,",",$sub1,$sel4
mov $sel1,$sel4:gosub *check_custom_dialog:if $sel2="custom" goto *tuika_onedari_execute_cd
getini $sub1,$mon_labo_mon_ini,"skill"+$sel4,"skill_name"
getini $sub2,$mon_labo_mon_ini,"skill"+$sel4,"skill_kouka"
getini $sub3,$mon_labo_mon_ini,"skill"+$sel4,"skill_kakuritu"
getini $sub4,$mon_labo_mon_ini,"skill"+$sel4,"skill_damage1_1"
if $sel4<>"tame2" && $sub1="" && $sub2="" && $sub3="" && $sub4="" mov $skill_tag,"skill"+$sel4:goto *empty_skill
mov $sel1,$skill_tag
mov $skill_tag,"skill"+$sel4
gosub *check_skill_name
mov $skill_tag,$sel1
mov $list1,$mon_labo_mon_ini_sc
mov %list_num1,%mon_labo_mon_ini_ky
if %kousan=2 goto *tuika_onedari_execute1
mov $sel1,$skill_tag
mov $skill_tag,"skill"+$sel4
gosub *tuika_onedari_execute_syori
mov $skill_tag,$sel1
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_onedari1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_onedari2"
mov $sel3,""
gosub *selprint
name ""
goto *tuika_onedari_execute1



*tuika_onedari_execute_cd

mov $list1,$mon_labo_mon_ini_sc
mov %list_num1,%mon_labo_mon_ini_ky
mov $mon_labo_mon_ini_sc,$sel1
mov %mon_labo_mon_ini_ky,0
gosub *custom_dialog_start
mov $mon_labo_mon_ini_sc,$list1
mov %mon_labo_mon_ini_ky,%list_num1+1
goto *tuika_onedari_use_commands



*tuika_onedari_execute_syori

if $skill_tag="skilltame0" | $skill_tag="skilltame1" | $skill_tag="skilltame2" gosub *onedari_syori:return
len %name_count,$skill_tag
if %name_count<13 skip 3
mid $sub1,$skill_tag,0,12
if $sub1="skillcounter" gosub *onedari_syori:return
mid $sub1,$skill_tag,0,6
if $sub1="skilla" gosub *onedari_syori:return
gosub *onedari_syori_k
return



*tuika_onedari_execute1

gosub *tuika_onedari_execute2
gosub *reset_name
mov $mon_labo_mon_ini_sc,$list1
mov %mon_labo_mon_ini_ky,%list_num1+1
goto *tuika_onedari_use_commands



*tuika_onedari_execute2

add %stack,1
mov $skill_tag,"skill"+$sel4
if $skill_tag<>"skillcounter0" && $skill_tag<>"skillcounter1" && $skill_tag<>"skilltame0" && $skill_tag<>"skilltame1" && $skill_tag<>"skilltame2" skip 9
if %kousoku>0 skip 8
if $skill_tag="skillcounter0" && %counter>0 mov %bougyo_attack,0:sub %stack,1:goto *tuika_counter_end
if $skill_tag="skillcounter0" mov %bougyo_attack,0:sub %stack,1:goto *tuika_counter_start
if $skill_tag="skillcounter1" mov %bougyo_attack,0:sub %stack,1:goto *tuika_counter
if %counter>0 skip 4
if $skill_tag="skilltame0" sub %stack,1:goto *tuika_tame_zyunbi
if $skill_tag="skilltame1" sub %stack,1:goto *tuika_tame_hit
if $skill_tag="skilltame2" sub %stack,1:goto *tuika_tame_miss
gosub *check_skill_type
mov %bougyo_attack,0
if $sel4="a1" | $sel4="a2" | $sel4="a3" | $sel4="a4" | $sel4="a5" | $sel4="a6" | $sel4="a7" | $sel4="a8" sub %stack,1:goto "*tuika_"+$sel4
if $sel4="b1" | $sel4="b2" | $sel4="b3" | $sel4="b4" | $sel4="c1" | $sel4="c2" | $sel4="c3" | $sel4="c4" sub %stack,1:goto "*tuika_"+$sel4
if $sel4="d1" | $sel4="d2" | $sel4="d3" | $sel4="d4" sub %stack,1:goto "*tuika_"+$sel4
if $sel4="counter2" | $sel4="counter3" | $sel4="counter4" | $sel4="counter5" sub %stack,1:goto "*tuika_"+$sel4
if %counter>0 goto *tuika_counter_common
if %kousoku=1 goto *tuika_bc_common
if %kousoku=2 goto *tuika_bc_common
if %kousoku=3 goto *tuika_d_common
goto *tuika_a_common



*tuika_onedaria1

mov $skill_tag,"skilla1"
gosub *tuika_onedari_use
gosub *onedari_syori
name $name
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_onedari1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_onedari2"
mov $sel3,""
gosub *selprint
name ""
mov %bougyo_attack,0
if %counter>0 gosub *tuika_counter_end
mov $skill_tag,"skilla1"
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_kouka":atoi %sub1,$sub1
if %sub1>1 && %sub1<>6 gosub *tuika_a1:goto *common_main
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_damage1_1"
if $sub1="" gosub *tuika_a1:goto *common_main
gosub *tuika_a1
gosub *reset_name
skip -2



*tuika_onedaria2

mov $skill_tag,"skilla2"
gosub *onedari_syori
gosub *tuika_onedari_use
name $name
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_onedari1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_onedari2"
mov $sel3,""
gosub *selprint
name ""
mov %bougyo_attack,0
if %counter>0 gosub *tuika_counter_end
mov $skill_tag,"skilla2"
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_kouka":atoi %sub1,$sub1
if %sub1>1 && %sub1<>6 gosub *tuika_a2:goto *common_main
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_damage1_1"
if $sub1="" gosub *tuika_a2:goto *common_main
gosub *tuika_a2
gosub *reset_name
skip -2



*tuika_onedaria3

mov $skill_tag,"skilla3"
gosub *tuika_onedari_use
gosub *onedari_syori
name $name
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_onedari1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_onedari2"
mov $sel3,""
gosub *selprint
name ""
mov %bougyo_attack,0
if %counter>0 gosub *tuika_counter_end
mov $skill_tag,"skilla3"
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_kouka":atoi %sub1,$sub1
if %sub1>1 && %sub1<>6 gosub *tuika_a3:goto *common_main
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_damage1_1"
if $sub1="" gosub *tuika_a3:goto *common_main
gosub *tuika_a3
gosub *reset_name
skip -2



*tuika_onedaria4

mov $skill_tag,"skilla4"
gosub *tuika_onedari_use
gosub *onedari_syori
name $name
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_onedari1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_onedari2"
mov $sel3,""
gosub *selprint
name ""
mov %bougyo_attack,0
if %counter>0 gosub *tuika_counter_end
mov $skill_tag,"skilla4"
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_kouka":atoi %sub1,$sub1
if %sub1>1 && %sub1<>6 gosub *tuika_a4:goto *common_main
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_damage1_1"
if $sub1="" gosub *tuika_a4:goto *common_main
gosub *tuika_a4
gosub *reset_name
skip -2



*tuika_onedaria5

mov $skill_tag,"skilla5"
gosub *tuika_onedari_use
gosub *onedari_syori
name $name
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_onedari1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_onedari2"
mov $sel3,""
gosub *selprint
name ""
mov %bougyo_attack,0
if %counter>0 gosub *tuika_counter_end
mov $skill_tag,"skilla5"
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_kouka":atoi %sub1,$sub1
if %sub1>1 && %sub1<>6 gosub *tuika_a5:goto *common_main
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_damage1_1"
if $sub1="" gosub *tuika_a5:goto *common_main
gosub *tuika_a5
gosub *reset_name
skip -2



*tuika_onedaria6

mov $skill_tag,"skilla6"
gosub *tuika_onedari_use
gosub *onedari_syori
name $name
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_onedari1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_onedari2"
mov $sel3,""
gosub *selprint
name ""
mov %bougyo_attack,0
if %counter>0 gosub *tuika_counter_end
mov $skill_tag,"skilla6"
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_kouka":atoi %sub1,$sub1
if %sub1>1 && %sub1<>6 gosub *tuika_a6:goto *common_main
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_damage1_1"
if $sub1="" gosub *tuika_a6:goto *common_main
gosub *tuika_a6
gosub *reset_name
skip -2



*tuika_onedaria7

mov $skill_tag,"skilla7"
gosub *tuika_onedari_use
gosub *onedari_syori
name $name
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_onedari1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_onedari2"
mov $sel3,""
gosub *selprint
name ""
mov %bougyo_attack,0
if %counter>0 gosub *tuika_counter_end
mov $skill_tag,"skilla7"
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_kouka":atoi %sub1,$sub1
if %sub1>1 && %sub1<>6 gosub *tuika_a7:goto *common_main
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_damage1_1"
if $sub1="" gosub *tuika_a7:goto *common_main
gosub *tuika_a7
gosub *reset_name
skip -2



*tuika_onedaria8

mov $skill_tag,"skilla8"
gosub *tuika_onedari_use
gosub *onedari_syori
name $name
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_onedari1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_onedari2"
mov $sel3,""
gosub *selprint
name ""
mov %bougyo_attack,0
if %counter>0 gosub *tuika_counter_end
mov $skill_tag,"skilla8"
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_kouka":atoi %sub1,$sub1
if %sub1>1 && %sub1<>6 gosub *tuika_a8:goto *common_main
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_damage1_1"
if $sub1="" gosub *tuika_a8:goto *common_main
gosub *tuika_a8
gosub *reset_name
skip -2



*tuika_onedarib1

mov $skill_tag,"skillb1"
gosub *tuika_onedari_use
if %kousoku<>1 gosub *onedari_syori
if %kousoku=1 gosub *onedari_syori_k
name $name
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_onedari1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_onedari2"
mov $sel3,""
gosub *selprint
name ""
mov %bougyo_attack,0
if %counter>0 gosub *tuika_counter_end
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla1","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a1
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla2","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a2
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla3","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a3
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla4","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a4
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla5","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a5
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla6","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a6
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla7","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a7
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla8","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a8
mov $skill_tag,"skillb1"
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_kouka":atoi %sub1,$sub1
if %sub1>1 && %sub1<>6 gosub *tuika_b1:goto *common_main
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_damage1_1"
if $sub1="" gosub *tuika_b1:goto *common_main
gosub *tuika_b1
gosub *reset_name
skip -2



*tuika_onedarib2

mov $skill_tag,"skillb2"
gosub *tuika_onedari_use
if %kousoku<>1 gosub *onedari_syori
if %kousoku=1 gosub *onedari_syori_k
name $name
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_onedari1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_onedari2"
mov $sel3,""
gosub *selprint
name ""
mov %bougyo_attack,0
if %counter>0 gosub *tuika_counter_end
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla1","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a1
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla2","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a2
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla3","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a3
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla4","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a4
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla5","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a5
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla6","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a6
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla7","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a7
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla8","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a8
mov $skill_tag,"skillb2"
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_kouka":atoi %sub1,$sub1
if %sub1>1 && %sub1<>6 gosub *tuika_b2:goto *common_main
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_damage1_1"
if $sub1="" gosub *tuika_b2:goto *common_main
gosub *tuika_b2
gosub *reset_name
skip -2



*tuika_onedarib3

mov $skill_tag,"skillb3"
gosub *tuika_onedari_use
if %kousoku<>1 gosub *onedari_syori
if %kousoku=1 gosub *onedari_syori_k
name $name
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_onedari1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_onedari2"
mov $sel3,""
gosub *selprint
name ""
mov %bougyo_attack,0
if %counter>0 gosub *tuika_counter_end
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla1","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a1
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla2","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a2
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla3","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a3
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla4","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a4
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla5","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a5
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla6","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a6
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla7","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a7
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla8","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a8
mov $skill_tag,"skillb3"
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_kouka":atoi %sub1,$sub1
if %sub1>1 && %sub1<>6 gosub *tuika_b3:goto *common_main
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_damage1_1"
if $sub1="" gosub *tuika_b3:goto *common_main
gosub *tuika_b3
gosub *reset_name
skip -2



*tuika_onedarib4

mov $skill_tag,"skillb4"
gosub *tuika_onedari_use
if %kousoku<>1 gosub *onedari_syori
if %kousoku=1 gosub *onedari_syori_k
name $name
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_onedari1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_onedari2"
mov $sel3,""
gosub *selprint
name ""
mov %bougyo_attack,0
if %counter>0 gosub *tuika_counter_end
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla1","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a1
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla2","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a2
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla3","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a3
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla4","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a4
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla5","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a5
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla6","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a6
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla7","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a7
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla8","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a8
mov $skill_tag,"skillb4"
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_kouka":atoi %sub1,$sub1
if %sub1>1 && %sub1<>6 gosub *tuika_b4:goto *common_main
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_damage1_1"
if $sub1="" gosub *tuika_b4:goto *common_main
gosub *tuika_b4
gosub *reset_name
skip -2



*tuika_onedaric1

mov $skill_tag,"skillc1"
gosub *tuika_onedari_use
if %kousoku<>2 gosub *onedari_syori
if %kousoku=2 gosub *onedari_syori_k
name $name
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_onedari1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_onedari2"
mov $sel3,""
gosub *selprint
name ""
mov %bougyo_attack,0
if %counter>0 gosub *tuika_counter_end
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla1","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a1
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla2","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a2
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla3","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a3
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla4","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a4
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla5","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a5
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla6","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a6
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla7","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a7
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla8","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a8
mov $skill_tag,"skillc1"
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_kouka":atoi %sub1,$sub1
if %sub1>1 && %sub1<>6 gosub *tuika_c1:goto *common_main
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_damage1_1"
if $sub1="" gosub *tuika_c1:goto *common_main
gosub *tuika_c1
gosub *reset_name
skip -2



*tuika_onedaric2

mov $skill_tag,"skillc2"
gosub *tuika_onedari_use
if %kousoku<>2 gosub *onedari_syori
if %kousoku=2 gosub *onedari_syori_k
name $name
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_onedari1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_onedari2"
mov $sel3,""
gosub *selprint
name ""
mov %bougyo_attack,0
if %counter>0 gosub *tuika_counter_end
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla1","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a1
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla2","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a2
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla3","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a3
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla4","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a4
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla5","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a5
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla6","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a6
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla7","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a7
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla8","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a8
mov $skill_tag,"skillc2"
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_kouka":atoi %sub1,$sub1
if %sub1>1 && %sub1<>6 gosub *tuika_c2:goto *common_main
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_damage1_1"
if $sub1="" gosub *tuika_c2:goto *common_main
gosub *tuika_c2
gosub *reset_name
skip -2



*tuika_onedaric3

mov $skill_tag,"skillc3"
gosub *tuika_onedari_use
if %kousoku<>2 gosub *onedari_syori
if %kousoku=2 gosub *onedari_syori_k
name $name
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_onedari1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_onedari2"
mov $sel3,""
gosub *selprint
name ""
mov %bougyo_attack,0
if %counter>0 gosub *tuika_counter_end
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla1","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a1
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla2","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a2
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla3","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a3
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla4","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a4
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla5","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a5
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla6","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a6
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla7","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a7
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla8","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a8
mov $skill_tag,"skillc3"
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_kouka":atoi %sub1,$sub1
if %sub1>1 && %sub1<>6 gosub *tuika_c3:goto *common_main
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_damage1_1"
if $sub1="" gosub *tuika_c3:goto *common_main
gosub *tuika_c3
gosub *reset_name
skip -2



*tuika_onedaric4

mov $skill_tag,"skillc4"
gosub *tuika_onedari_use
if %kousoku<>4 gosub *onedari_syori
if %kousoku=4 gosub *onedari_syori_k
name $name
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_onedari1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_onedari2"
mov $sel3,""
gosub *selprint
name ""
mov %bougyo_attack,0
if %counter>0 gosub *tuika_counter_end
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla1","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a1
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla2","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a2
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla3","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a3
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla4","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a4
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla5","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a5
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla6","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a6
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla7","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a7
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla8","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a8
mov $skill_tag,"skillc4"
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_kouka":atoi %sub1,$sub1
if %sub1>1 && %sub1<>6 gosub *tuika_c4:goto *common_main
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_damage1_1"
if $sub1="" gosub *tuika_c4:goto *common_main
gosub *tuika_c4
gosub *reset_name
skip -2



*tuika_onedarid1

mov $skill_tag,"skilld1"
gosub *tuika_onedari_use
if %kousoku<>3 gosub *onedari_syori
if %kousoku=3 gosub *onedari_syori_k
name $name
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_onedari1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_onedari2"
mov $sel3,""
gosub *selprint
name ""
if %counter>0 gosub *tuika_counter_end
if %kousoku<>3 gosub *tuika_onedari_kousoku0
mov $skill_tag,"skilld1"
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_kouka":atoi %sub1,$sub1
if %sub1>1 && %sub1<>6 gosub *tuika_d1:goto *common_main
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_damage1_1"
if $sub1="" gosub *tuika_d1:goto *common_main
gosub *tuika_d1
gosub *reset_name
skip -2



*tuika_onedarid2

mov $skill_tag,"skilld2"
gosub *tuika_onedari_use
if %kousoku<>3 gosub *onedari_syori
if %kousoku=3 gosub *onedari_syori_k
name $name
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_onedari1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_onedari2"
mov $sel3,""
gosub *selprint
name ""
if %counter>0 gosub *tuika_counter_end
if %kousoku<>3 gosub *tuika_onedari_kousoku0
mov $skill_tag,"skilld2"
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_kouka":atoi %sub1,$sub1
if %sub1>1 && %sub1<>6 gosub *tuika_d2:goto *common_main
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_damage1_1"
if $sub1="" gosub *tuika_d2:goto *common_main
gosub *tuika_d2
gosub *reset_name
skip -2



*tuika_onedarid3

mov $skill_tag,"skilld3"
gosub *tuika_onedari_use
if %kousoku<>3 gosub *onedari_syori
if %kousoku=3 gosub *onedari_syori_k
name $name
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_onedari1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_onedari2"
mov $sel3,""
gosub *selprint
name ""
if %counter>0 gosub *tuika_counter_end
if %kousoku<>3 gosub *tuika_onedari_kousoku0
mov $skill_tag,"skilld3"
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_kouka":atoi %sub1,$sub1
if %sub1>1 && %sub1<>6 gosub *tuika_d3:goto *common_main
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_damage1_1"
if $sub1="" gosub *tuika_d3:goto *common_main
gosub *tuika_d3
gosub *reset_name
skip -2



*tuika_onedarid4

mov $skill_tag,"skilld4"
gosub *tuika_onedari_use
if %kousoku<>3 gosub *onedari_syori
if %kousoku=3 gosub *onedari_syori_k
name $name
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_onedari1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_onedari2"
mov $sel3,""
gosub *selprint
name ""
if %counter>0 gosub *tuika_counter_end
if %kousoku<>3 gosub *tuika_onedari_kousoku0
mov $skill_tag,"skilld4"
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_kouka":atoi %sub1,$sub1
if %sub1>1 && %sub1<>6 gosub *tuika_d4:goto *common_main
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_damage1_1"
if $sub1="" gosub *tuika_d4:goto *common_main
gosub *tuika_d4
gosub *reset_name
skip -2



*tuika_onedari_kousoku0

add %stack,1
mov %bougyo_attack,0
getini $sub1,$mon_labo_mon_ini,"skillb1","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=5 goto *tuika_onedari_kousoku1
getini $sub1,$mon_labo_mon_ini,"skillb2","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=5 goto *tuika_onedari_kousoku1
getini $sub1,$mon_labo_mon_ini,"skillb3","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=5 goto *tuika_onedari_kousoku1
getini $sub1,$mon_labo_mon_ini,"skillb4","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=5 goto *tuika_onedari_kousoku1
getini $sub1,$mon_labo_mon_ini,"skillc1","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=5 goto *tuika_onedari_kousoku2
getini $sub1,$mon_labo_mon_ini,"skillc2","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=5 goto *tuika_onedari_kousoku2
getini $sub1,$mon_labo_mon_ini,"skillc3","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=5 goto *tuika_onedari_kousoku2
getini $sub1,$mon_labo_mon_ini,"skillc4","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=5 goto *tuika_onedari_kousoku2
getini $sub1,$mon_labo_mon_ini,"skilla1","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=5 goto *tuika_onedari_kousoku3
getini $sub1,$mon_labo_mon_ini,"skilla2","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=5 goto *tuika_onedari_kousoku3
getini $sub1,$mon_labo_mon_ini,"skilla3","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=5 goto *tuika_onedari_kousoku3
getini $sub1,$mon_labo_mon_ini,"skilla4","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=5 goto *tuika_onedari_kousoku3
getini $sub1,$mon_labo_mon_ini,"skilla5","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=5 goto *tuika_onedari_kousoku3
getini $sub1,$mon_labo_mon_ini,"skilla6","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=5 goto *tuika_onedari_kousoku3
getini $sub1,$mon_labo_mon_ini,"skilla7","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=5 goto *tuika_onedari_kousoku3
getini $sub1,$mon_labo_mon_ini,"skilla8","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=5 goto *tuika_onedari_kousoku3
eng "There is an error in battle settings":$sel6\
skip -1



*tuika_onedari_kousoku1

if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla1","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a1
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla2","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a2
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla3","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a3
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla4","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a4
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla5","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a5
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla6","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a6
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla7","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a7
if %kousoku<>1 getini $sub1,$mon_labo_mon_ini,"skilla8","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=3 gosub *tuika_a8
getini $sub1,$mon_labo_mon_ini,"skillb1","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=5 gosub *tuika_b1
getini $sub1,$mon_labo_mon_ini,"skillb2","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=5 gosub *tuika_b2
getini $sub1,$mon_labo_mon_ini,"skillb3","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=5 gosub *tuika_b3
getini $sub1,$mon_labo_mon_ini,"skillb4","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=5 gosub *tuika_b4
sub %stack,1
return



*tuika_onedari_kousoku2

if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla1","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a1
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla2","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a2
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla3","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a3
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla4","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a4
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla5","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a5
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla6","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a6
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla7","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a7
if %kousoku<>2 getini $sub1,$mon_labo_mon_ini,"skilla8","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=4 gosub *tuika_a8
getini $sub1,$mon_labo_mon_ini,"skillc1","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=5 gosub *tuika_c1
getini $sub1,$mon_labo_mon_ini,"skillc2","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=5 gosub *tuika_c2
getini $sub1,$mon_labo_mon_ini,"skillc3","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=5 gosub *tuika_c3
getini $sub1,$mon_labo_mon_ini,"skillc4","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=5 gosub *tuika_c4
sub %stack,1
return



*tuika_onedari_kousoku3

getini $sub1,$mon_labo_mon_ini,"skilla1","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=5 gosub *tuika_a1
getini $sub1,$mon_labo_mon_ini,"skilla2","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=5 gosub *tuika_a2
getini $sub1,$mon_labo_mon_ini,"skilla3","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=5 gosub *tuika_a3
getini $sub1,$mon_labo_mon_ini,"skilla4","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=5 gosub *tuika_a4
getini $sub1,$mon_labo_mon_ini,"skilla5","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=5 gosub *tuika_a5
getini $sub1,$mon_labo_mon_ini,"skilla6","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=5 gosub *tuika_a6
getini $sub1,$mon_labo_mon_ini,"skilla7","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=5 gosub *tuika_a7
getini $sub1,$mon_labo_mon_ini,"skilla8","skill_kouka":atoi %tuika_skill_kouka,$sub1:if %tuika_skill_kouka=5 gosub *tuika_a8
sub %stack,1
return



*tuika_onedarie1

mov $skill_tag,"skilltame1"
gosub *tuika_onedari_use
gosub *onedari_syori
name $name
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_onedari1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_onedari2"
mov $sel3,""
gosub *selprint
name ""
if %counter>0 gosub *tuika_counter_end
if %bougyo_attack=0 gosub *tuika_tame_zyunbi
mov $skill_tag,"skilltame1"
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_kouka":atoi %sub1,$sub1
if %sub1>1 && %sub1<>6 gosub *tuika_tame_hit:goto *common_main
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_damage1_1"
if $sub1="" gosub *tuika_tame_hit:goto *common_main
eng "Wrong!":$sel6\
gosub *tuika_tame_hit
gosub *reset_name
skip -2



*tuika_onedarif1

mov $skill_tag,"skillcounter1"
gosub *tuika_onedari_use
gosub *onedari_syori
name $name
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_onedari1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_onedari2"
mov $sel3,""
gosub *selprint
name ""
mov %bougyo_attack,0
if %counter=0 gosub *tuika_counter_start
mov $skill_tag,"skillcounter1"
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_kouka":atoi %sub1,$sub1
if %sub1>1 && %sub1<>6 gosub *tuika_counter:goto *common_main
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_damage1_1"
if $sub1="" gosub *tuika_counter:goto *common_main
gosub *tuika_counter
gosub *reset_name
skip -2



*tuika_onedarif2

mov $skill_tag,"skillcounter2"
gosub *tuika_onedari_use
gosub *onedari_syori
name $name
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_onedari1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_onedari2"
mov $sel3,""
gosub *selprint
name ""
mov %bougyo_attack,0
if %counter=0 gosub *tuika_counter_start
mov $skill_tag,"skillcounter2"
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_kouka":atoi %sub1,$sub1
if %sub1=2 | %sub1=7 | %sub1=8 | $sub1=9 gosub *tuika_counter2:goto *common_main
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_damage1_1"
if $sub1="" gosub *tuika_counter2:goto *common_main
gosub *tuika_counter2
gosub *reset_name
skip -2



*tuika_onedarif3

mov $skill_tag,"skillcounter3"
gosub *tuika_onedari_use
gosub *onedari_syori
name $name
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_onedari1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_onedari2"
mov $sel3,""
gosub *selprint
name ""
mov %bougyo_attack,0
if %counter=0 gosub *tuika_counter_start
mov $skill_tag,"skillcounter3"
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_kouka":atoi %sub1,$sub1
if %sub1=2 | %sub1=7 | %sub1=8 | $sub1=9 gosub *tuika_counter3:goto *common_main
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_damage1_1"
if $sub1="" gosub *tuika_counter3:goto *common_main
gosub *tuika_counter3
gosub *reset_name
skip -2



*tuika_onedarif4

mov $skill_tag,"skillcounter4"
gosub *tuika_onedari_use
gosub *onedari_syori
name $name
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_onedari1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_onedari2"
mov $sel3,""
gosub *selprint
name ""
mov %bougyo_attack,0
if %counter=0 gosub *tuika_counter_start
mov $skill_tag,"skillcounter4"
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_kouka":atoi %sub1,$sub1
if %sub1=2 | %sub1=7 | %sub1=8 | $sub1=9 gosub *tuika_counter4:goto *common_main
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_damage1_1"
if $sub1="" gosub *tuika_counter4:goto *common_main
gosub *tuika_counter4
gosub *reset_name
skip -2



*tuika_onedarif5

mov $skill_tag,"skillcounter5"
gosub *tuika_onedari_use
gosub *onedari_syori
name $name
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_onedari1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_onedari2"
mov $sel3,""
gosub *selprint
name ""
mov %bougyo_attack,0
if %counter=0 gosub *tuika_counter_start
mov $skill_tag,"skillcounter5"
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_kouka":atoi %sub1,$sub1
if %sub1=2 | %sub1=7 | %sub1=8 | $sub1=9 gosub *tuika_counter5:goto *common_main
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_damage1_1"
if $sub1="" gosub *tuika_counter5:goto *common_main
gosub *tuika_counter5
gosub *reset_name
skip -2



*tuika_h

getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_rukalose":atoi %ikigoe,$sub1:gosub *ikigoe
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_lose_start1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_lose_start2"
mov $sel3,""
gosub *selprintname
if %ikigoe=4 | %ikigoe=5 goto *tuika_h1
vspl 692,699,0
gosub *syasei1
vspl 692,699,1
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_bukkake":if $sub1="" skip 10
getini $sub2,$mon_labo_mon_ini,$skill_tag,"skill_bukkake_spot":atoi %sub1,$sub2
gosub *check_dir1
split $sub1,",",$sub3,$sub2
if %sub1=1 skip 3
if $sub2="bmp" | $sub2="jpg" | $sub2="png" lsp 691,":a;"+$teigi1+$sub1,%monster_x,%monster_y
if $sub2="" lsp 691,":a;chara\"+$sub1+".bmp",%monster_x,%monster_y
if %sub1=0 skip 3
if $sub2="bmp" | $sub2="jpg" | $sub2="png" lsp 700,":a;"+$teigi1+$sub1,%monster_x,%monster_y
if $sub2="" lsp 700,":a;chara\"+$sub1+".bmp",%monster_x,%monster_y
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_ct2":if $sub1="" skip 7
getini $sub2,$mon_labo_mon_ini,$skill_tag,"skill_ctx":atoi %sub1,$sub2
getini $sub2,$mon_labo_mon_ini,$skill_tag,"skill_cty":atoi %sub2,$sub2
gosub *check_dir1
split $sub1,".",$sub3,$sub2
if $sub2="bmp" | $sub2="jpg" | $sub2="png" lsp 690,":a;"+$teigi1+$sub1,%sub1,%sub2
if $sub2="" lsp 690,":a;chara\"+$sub1+".bmp",%sub1,%sub2
gosub *syasei2
goto *tuika_h1



*tuika_h1

getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_lose_anno1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_lose_anno2"
mov $sel3,""
gosub *selprint
if %battle_auto=1 skipoff
mov %alice_skill,0
wait 1000
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_overkill"
if $sub1<>"" goto *tuika_overkill
mov %battle,0
if %aqua<>2 skip 4
if %mon_labo_on<>1 bg "BG\"+$haikei+".bmp",10,1500:skip 3
gosub *check_haikei:if $teigi2="skip" skip 2
bg $teigi3+$teigi1,10,1500
cspl 0,611
gosub *setwindow_01p
if %ikigoe<4 mov $sel1,$ori_name+" was defeated..."
if %ikigoe>3 mov $sel1,$ori_name+" surrenders..."
eng $sel1:$sel6/
if %con_hbgm=0 && %music<>20 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
\
mov %hsean,1
gosub *face2
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_lose_sel1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_lose_sel2"
mov $sel3,""
gosub *selprintname
mov %zukanon,0
mov %mon_labo_mon_ini_ky,0
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_lose_scene"
mov $mon_labo_mon_ini_sc,"lose"+$sel1
goto *monster_labo_story_start



*tuika_hlv

name $ori_name
mov $sel1,"Ahh..."
getini $sel6,$mon_labo_mon_ini,"hero_sel","hero_lose_lvdrain":if $sel6<>"" mov $sel1,$sel6
eng $sel1:$sel6\
name ""
eng "Drained levels have taken their toll, rendering "+$ori_name+" unable to stand..."
$sel6\
if %battle_auto=1 skipoff
wait 1000
getini $sub1,$mon_labo_mon_ini,$skill_tag,"skill_overkill"
if $sub1<>"" goto *tuika_overkill
mov %battle,0
if %aqua<>2 skip 4
if %mon_labo_on<>1 bg "BG\"+$haikei+".bmp",10,1500:skip 3
gosub *check_haikei:if $teigi2="skip" skip 2
bg $teigi3+$teigi1,10,1500
cspl 0,611
gosub *setwindow_01p
eng $ori_name+" surrenders...":$sel6/
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
\
mov %hsean,1
gosub *face2
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_lose_sel1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_lose_sel2"
mov $sel3,""
gosub *selprintname
mov %zukanon,0
mov %mon_labo_mon_ini_ky,0
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_lose_scene"
mov $mon_labo_mon_ini_sc,"lose"+$sel1
goto *monster_labo_story_start



*tuika_h_konran

name $ori_name
mov $sel1,"Ugh..."
getini $sel6,$mon_labo_mon_ini,"hero_sel","hero_lose_konran":if $sel6<>"" mov $sel1,$sel6
eng $sel1:$sel6\
name ""
eng $ori_name+" takes too much self-inflicted damage and is unable to continue..."
$sel6\
if %battle_auto=1 skipoff
wait 1000
mov %battle,0
if %aqua<>2 skip 4
if %mon_labo_on<>1 bg "BG\"+$haikei+".bmp",10,1500:skip 3
gosub *check_haikei:if $teigi2="skip" skip 2
bg $teigi3+$teigi1,10,1500
cspl 0,611
gosub *setwindow_01p
eng $ori_name+" surrenders...":$sel6/
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
\
mov %hsean,1
gosub *face2
mov %zukanon,0
mov %mon_labo_mon_ini_ky,0
mov $mon_labo_mon_ini_sc,"lose"
goto *monster_labo_story_start



*tuika_overkill

if %aqua<>2 skip 4
if %mon_labo_on<>1 bg "BG\"+$haikei+".bmp",10,1500:skip 3
gosub *check_haikei:if $teigi2="skip" skip 2
bg $teigi3+$teigi1,10,1500
mov %wind,0:mov %earth,0:mov %aqua,0:mov %fire,0
gosub *elm_print
mov %bougyo,0
mov %kousan,3
mov %sel_hphalf,1
mov %sel_kiki,1
mov %mylife,0
lsp 560,":a;system\gager0.bmp",114,556
gosub *hp
if %ikigoe<>4 mov $sel1,$ori_name+" was defeated..."
if %ikigoe=4 mov $sel1,$ori_name+" surrenders..."
eng $sel1:$sel6/
if %con_hbgm=0 bgm "bgm\ero1.ogg"
if %con_hbgm=1 bgmstop
\
getini $sel1,$mon_labo_mon_ini,$skill_tag,"skill_lose_sel1"
getini $sel2,$mon_labo_mon_ini,$skill_tag,"skill_lose_sel2"
mov $sel3,""
gosub *selprintname
mov %zukanon,0
mov %mon_labo_mon_ini_ky,0
mov $mon_labo_mon_ini_sc,$sub1
goto *monster_labo_story_start



*doppel_pre

csp -1
bg black,10,1500
shadedistance 1,2:mov %ruka_tati,1
mov %mylv,64
mov %skill01,16
mov %skill02,3
mov %skill03,3
mov %skill04,3
mov %skill05,3
mov %item01,9
bgm "bgm\field3.ogg"
cspl 601,606
bg "BG\bg135.bmp",10,3000
gosub *setwindow_01p
name ""
>I grumble to myself as I search the surrounding forest, looking for something to replace the food Alice wolfed down.\
>I know she's larger and takes a lot more food...@> But I wish she would stop pretending like it was just "mysteriously vanishing" whenever I turn my back...\
>Oh well, cooking with random stuff I can forage can be interesting, too.\
>As I stick my head into a bush, looking for some usable shoots...\
name "Alice's Voice"
>Hey!@> What are you doing? Get over here!\
name ""
>I jerk in surprise, startled by Alice's sudden yell coming ahead of me.\
name "Luka"
>Owowowow!!!\
name ""
>The brambles poke hard into my skin as I gingerly try to pull myself out of the bush.\
name "Luka"
>I'm looking for food, Alice!@> What's wrong? Did something happen!?\
name ""
>I wonder what's wrong...?@
>Wait a second... Why did her voice come from deeper in the forest?\
>I could have sworn I kept my back to the campsite while I was foraging, just to make sure I didn't get lost...\
>Did she go wandering off and get herself lost, or something?\
name "Alice's Voice"
>Hurry up, you moron!@> I need some help over here!\
name ""
>Help?@>What could she possibly need help with?\
name "Luka"
>Alright, alright... I'm coming!\
>...Moron...?@>I wonder if that's better or worse than idiot...?\
name ""
>I continue griping to myself as I head toward her voice.\
dwave 1,"se\asioto2.ogg"
sean_change "bg030"
name "Luka"
>Hey, where are you!?\
name ""
>I thought this is where her voice was coming from... But I don't see any sign of her.\
name "Alice's Voice"
>Over here!@> Hurry up, you moron!@>What's taking so long!?\
name ""
>What? She's further inside?@
>Just how far did she wander...?\
>Not only that, but she sounds just as far away as before...\
name "Luka"
>Quit moving!@> I won't be able to catch up with you if you keep moving around like that!\
>Didn't Tamamo ever teach you to stand still when you're lost!?\
name "Alice's Voice"
>I'm not lost!@>Just hurry up, you moron!\
name ""
>I run toward her voice as fast as I can, determined not to let her continue wandering around like a little kid.\
dwave 1,"se\asioto2.ogg"
sean_change "bg093"
lsp 700,":a;chara\alice_st02b.bmp",67,0:print 10,500
>After running as fast as I could for a couple minutes, I finally find her.\
name "Luka"
>What the heck are you doing here, Alice?@
>Why did you move so far away from the campsite?\
>I don't even know how we're going to find our way back now...@>We must be a few miles away by now.\
name ""
>I complain to Alice, all while she just silently smirks back at me.@
>What kind of stupid game is she playing now?\
name "Luka"
>What's so funny?@> You do realize this stupid stunt of yours means no dinner, right?\
name "Alice"
>Hahaha!@>All I did was get a small glimpse of her, and hear a couple words...@
>I didn't think this superficial mimicry would be enough to distract you for almost a half hour...\
>But thanks to that, I've been able to analyze you for a long time...@
>It has been a long time since I've been able to perform a complete transformation...\
>Now...@> Transform!\
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
goto *doppel_start



*doppel_start

mov $name,"Doppelganger"
mov $name2,"Doppelganger"
mov $lavel,"doppel"
mov $haikei,"bg093"
mov %monster_x,0
mov %monster_y,0
if %nanido=1 mov %max_enemylife,1600
if %nanido=2 mov %max_enemylife,1600
if %nanido=3 mov %max_enemylife,1600
if %nanido=1 mov %henkahp1,800
if %nanido=2 mov %henkahp1,800
if %nanido=3 mov %henkahp1,800
mov %damage_keigen,100
mov %kaihi,100
mov %earth_keigen,0
mov %music,0
mov %alice_skill,0
gosub *maxmp:mov %mp,%max_mp
mov %end_n,9
mov %exp_minus,1370025
mov %zmonster_x,-270
mov %tukix,320
mov %doppel_mp,10
mov %first_sel1,0
mov %first_sel2,0
mov %first_sel3,0
mov %first_sel4,0
mov %first_sel5,0
mov %first_sel6,0
mov %first_sel7,0
mov %first_sel8,0
mov %first_sel9,0
mov %first_sel10,0
mov %first_sel11,0
mov %first_sel12,0
mov %first_sel13,0
mov %first_sel14,0
mov %first_sel15,0
name "Luka"
>Wh...What's going on!?\
>Alice, what are you doing!?\
name "???"
>Haha...@>There's nothing I enjoy more than playing with stupid men...\
>It's a shame you humans are so much weaker than us monsters, or...\
name ""
lsp 700,":l;Doppel/doppelstand.png",%monster_x,%monster_y
dwave 1,"se\syometu.ogg"
print 99,4500,"system\breakup.dll/urb"
gosub *syutugen_doppel
name $name
>Wh...!?@>What is this!?\
>This... This power...!@> I've never felt anything like it...!\
>How can this be?@> How can such a small human like you wield this intense power?\
>I feel... Invincible...@>I could rule over even the Heavenly Knights with this!\
name ""
>Sh...She looks really familiar...@
>There's no way that was Alice, this must be some sort of monster...@
>But she looks so familiar... Where have I seen her before...?\
name "???"
>I must have this.@>Such incredible power is wasted on a moron like you...\
>I've lived my life until now imitating humans to feed on them...\
>But no more.@
>I'll be taking that body of yours, permanently...\
>Ah... I can't believe how lucky I am...@>Not only was I able to find someone without any party members, but to think he was so incredibly strong...\
name "Luka"
>A... A Doppelganger!?\
name ""
>No way, this isn't good...@> I thought they were just myths...\
>A monster that can completely imitate their opponent's power and skills.@> Since you would be facing a mirror image of yourself, the only way to guarantee victory is to outnumber them...\
>But right now I'm alone, and in her territory.@> If she copies all of my skills, that would give her the advantage due to where we're fighting...\
>That's why she looks so familiar... It's a female version of me!\
name "Luka"
>But wait... You're just copying me.@>How could you "take my body"?@
>You don't even look exactly like me... You're a girl.\
name $name
>Hehe.@>Don't you worry about that...\
>But hey... You're an experienced fighter, you should know what kind of situation you're in.@
>If you fought seriously with me, there are only two outcomes.\
>The first is, of course, that we kill each other at the same time...\
>The second would be my victory, due to us fighting on my home ground.\
>You have no chance of victory.@> So... Why don't you have some fun instead?\
>I already know every single weak point of yours... Every caress and stroke that could leave you gasping in ecstasy.\
name ""
>The Doppelganger seductively licks her lips and rubs her exposed breasts as she tries to tempt me.\
name "Luka"
>That kind of stuff doesn't work on me!@
>Besides, a mere copy would never defeat the original!\
name $name
>Haha, big words coming from a human whose every skill is already a copy of a skill of another legendary figure.\
>Just as you learned your powers with the help of your companions, I learned your powers all from copying you...\
>Even if it's a copy, my skills are exactly as powerful as yours.\
name "Luka"
>Guh...\
name ""
>There has to be a way to win...@
>Even if she's just as powerful as I am, I'll just have to get stronger and beat her!\
mov %sinkou,1
goto *common_main



*doppel_main

gosub *cmd_main
if %cmd1=11 && %enemylife>800 goto *doppel_attack
if %cmd1=11 && %enemylife<801 goto *doppel_medinstead
if %cmd1=13 goto *doppel_guard
if %cmd1=14 goto *doppel_guard
if %cmd1=15 goto *doppel_kousan
if %cmd1=16 goto *doppel_onedari
if %cmd1=17 goto *doppel_skill
goto *doppel_main



*doppel_medinstead

if %doppel_mp<3 goto *doppel_attack
mov %before_action,3
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ha!"
if %ransu=2 mov $sel1,"Hya!"
if %ransu=3 mov $sel1,"Orya!"
name "Luka"
eng $sel1:$sel6\
name ""
>Luka attacks!\
if %earth=3 rnd2 %damage,50,100
if %earth=0 rnd2 %damage,75,150
dwave 1,"se\slash.ogg"
gosub *enemylife2
gosub *mp_kaihuku:gosub *mp
if %enemylife=0 goto *doppel_v
mov %doppel_mp,%doppel_mp-3
skillname "Meditation"
>The Doppelganger quietly meditates.\
mov %damage,800
gosub *enemylife_kaihuku
skillname ""
if %first_sel14=1 goto *doppel_common_main
if %first_sel13=1 goto *doppel_common_main
name $name
>That was stupid of you.@
>When you have such an incredibly useful move like this, why would you ever not use it once you're below half health?\
>I could see if you were using a skill to counter another skill, but to use a normal attack instead...\
name ""
>It seems like she would be right...@
>But when you add in the SP cost, there could be times when you want to hold off on using it.\
if %first_sel11!=1 skip 4
>That's right... She doesn't know about SP!@
>If we both started with ten and she just used three while I gained one...\
mov %first_sel13,1
goto *doppel_common_main



*doppel_attack

mov %before_action,3
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Ha!"
if %ransu=2 mov $sel1,"Hya!"
if %ransu=3 mov $sel1,"Orya!"
name "Luka"
eng $sel1:$sel6
wait 700
textclear
name $name
eng $sel1:$sel6
wait 700
textclear
name ""
>Luka attacks!
>The Doppelganger attacks!
wait 700
textclear
dwave 1,"se\counter.ogg"
if %earth=3 rnd2 %damage,50,100
if %earth=0 rnd2 %damage,75,150
damage %damage,%damage
gosub *enemylife2
gosub *mp_kaihuku:gosub *mp
if %mylife=0 goto *doppel_h3
if %enemylife=0 goto *doppel_v
if %doppel_mp<10 mov %doppel_mp,%doppel_mp+1
if %first_sel3>0 goto *doppel_main
name "Luka"
>Owowow...\
name ""
>We attacked at the same time...?@
>Not only that, but we did the exact same amount of damage...\
name $name
>Hehe... I told you, we're even...@
>Now let's not scar that handsome body of yours...\
name ""
mov %first_sel3,1
goto *doppel_common_main



*doppel_guard

name ""
if %cmd1=14 skip 2
>Luka takes up a defensive stance!\
if %cmd1=13 skip 2
>Luka remains motionless...\
name $name
>I don't think there's a worse move than that...\
>Your style revolves almost completely around speed.\
>An opponent who stands still is a sitting duck!\
name ""
>The Doppelganger dashes forward!@
if %cmd1=14 skip 2
>While Luka stands still, guarding his body, the Doppelganger dashes around him, wrapping Luka in her scarf!\
if %cmd1=13 skip 2
>While Luka stands motionless, the Doppelganger dashes around him, wrapping Luka in her scarf!\
name $name
mov %kousoku,2
>Hehe. Got you.@
>I'm just as strong as you, but I have the help of my scarf...\
>There's no escape for you!\
name ""
>The Doppelganger pulls her scarf tighter around Luka, completely blocking off his movements.\
>Nimbly moving to Luka's side, she pulls the scarf away from his groin area and pulls his penis out of his pants, exposing it to the air.\
lsp 700,":l;Doppel/doppelbind.png",0,0:print 10,500
name $name
>Now let's calm you down a little bit first...@
>We wouldn't want you to be struggling around too much when I take your body, now would we?\
name ""
skillname "Copied Masturbation"
>The Doppelganger starts to gently rub Luka's penis!\
damage 100,150
if %mylife=0 goto *doppel_h1
>The Doppelganger's gloved fingers gently tickle the tip of Luka's penis!\
damage 100,150
if %mylife=0 goto *doppel_h1
>She uses her index finger and thumb to gently press down on his glans!\
damage 100,150
if %mylife=0 goto *doppel_h1
skillname ""
name $name
>Hehe, well?@>Doesn't it feel familiar?\
>I didn't just take your combat skills... I took all of your skills.@
>Even the ones you used in private, when you thought nobody was looking...\
name ""
skillname "Copied Masturbation"
>The Doppelganger laughs to herself as her nimble fingers run over the tip of Luka's penis!\
damage 100,150
if %mylife=0 goto *doppel_h1
>Firmly grasping his shaft, she starts to glide her hand up and down Luka's penis!\
damage 100,150
if %mylife=0 goto *doppel_h1
>Picking up speed, she strokes him faster and faster!\
damage 100,150
if %mylife=0 goto *doppel_h1
skillname ""
name $name
>This is your favorite method, isn't it?@
>A young boy living by himself...@> You got an awful lot of practice with this.@> Hehe.\
name ""
skillname "Copied Masturbation"
>The Doppelganger's hands start to move even faster!\
damage 100,150
if %mylife=0 goto *doppel_h1
>Luka's pre-come starts to leak out, covering her hand.@
>Now lubricated, her strokes get even longer, forcing his tip in and out of her fist!\
damage 100,150
if %mylife=0 goto *doppel_h1
>The Doppelganger's breasts press hard against Luka's chest as she brings her body closer to his!\
damage 100,150
if %mylife=0 goto *doppel_h1
skillname ""
name $name
>Hehe... I can feel you twitching in my hand.@
>Look at that face of yours, too...\
>I know everything about you.@> I could keep you on edge for the rest of your life.\
>Just think, a lifetime of being so very close to release.@>But never getting it.\
>But you know, I think you could convince me to let you come.@
>That little remark about just being a "mere copy" hurt my feelings, you know?\
>If you acknowledge that I'm better than you, I'll let you come.\
name "Luka"
>Wh...What...?@>I'd... I'd never say that...\
>I can still... Get out of this...!\
name $name
>Hehe, do you really think that?\
name ""
skillname "Copied Masturbation"
>The Doppelganger skillfully strokes Luka's penis!\
if %mylife>1 skip 4
if %mylife=1 dwave 2,"se\damage.ogg":quakex 2,440
eng $sel1:$sel6\
if %mylife>1 damage %mylife/2,%mylife/2
>Her controlled movements bring Luka closer to the edge, but suddenly stop!\
if %mylife>1 skip 4
if %mylife=1 dwave 2,"se\damage.ogg":quakex 2,440
eng $sel1:$sel6\
if %mylife>1 damage %mylife/2,%mylife/2
>After waiting a couple seconds, she does another quick squeeze!\
if %mylife>1 skip 4
if %mylife=1 dwave 2,"se\damage.ogg":quakex 2,440
eng $sel1:$sel6\
if %mylife>1 damage %mylife/2,%mylife/2
>Luka starts to moan as he's brought right to the edge!\
if %mylife>1 skip 4
if %mylife=1 dwave 2,"se\damage.ogg":quakex 2,440
eng $sel1:$sel6\
if %mylife>1 damage %mylife/2,%mylife/2
skillname ""
name "Luka"
>S...Stop...!@
>N...No more!\
name $name
>Hehe.@>No.@>Not until you admit I'm superior.\
name ""
goto *doppel_beg



*doppel_beg

gosub *cmd_main
mov $sel1,"Luka takes miniscule damage!"
if %cmd1=11 goto *doppel_attackbeg
if %cmd1=12 goto *doppel_strugglebeg
if %cmd1=14 goto *doppel_waitbeg
if %cmd1=15 goto *doppel_onedaribeg1
if %cmd1=16 goto *doppel_onedaribeg
goto *doppel_beg



*doppel_attackbeg

name ""
>Luka awkwardly tries to attack!@
>But he can't do anything!\
name $name
>Now now, what do you think you're doing there?\
>That just looks silly.@> You'll need to be punished for that...\
name ""
skillname "Copied Masturbation"
>The Doppelganger lightly rubs Luka's penis!
if %mylife>1 skip 4
if %mylife=1 dwave 2,"se\damage.ogg":quakex 2,440
eng $sel1:$sel6\
if %mylife>1 damage %mylife/2,%mylife/2
skillname ""
goto *doppel_beg



*doppel_strugglebeg

name ""
>Luka feebly tries to struggle!@
>But he can't break free!\
name $name
>Now now, what do you think you're doing there?\
>That just looks silly.@> You'll need to be punished for that...\
name ""
skillname "Copied Masturbation"
>The Doppelganger lightly rubs Luka's penis!
if %mylife>1 skip 4
if %mylife=1 dwave 2,"se\damage.ogg":quakex 2,440
eng $sel1:$sel6\
if %mylife>1 damage %mylife/2,%mylife/2
skillname ""
goto *doppel_beg



*doppel_waitbeg

name ""
>Luka remains motionless.\
name $name
>Hehe, what are you doing?@
>Trying to wait it out?\
>That won't work... There's no way I could get bored of something this fun.\
name ""
skillname "Copied Masturbation"
>The Doppelganger lightly rubs Luka's penis!
if %mylife>1 skip 4
if %mylife=1 dwave 2,"se\damage.ogg":quakex 2,440
eng $sel1:$sel6\
if %mylife>1 damage %mylife/2,%mylife/2
skillname ""
goto *doppel_beg



*doppel_onedaribeg

mov $list1,"Release"
mov %list_num1,1
gosub *cmd_onedari
if %cmd1=11 goto *doppel_onedaribeg1
if %cmd1=-1 goto *doppel_beg
goto *doppel_onedaribeg



*doppel_onedaribeg1

name "Luka"
>P...Please... Stop... Let me come...\
name $name
>Ah ah ah, you didn't say the magic words.\
name ""
skillname "Copied Masturbation"
>The Doppelganger lightly rubs Luka's penis!
if %mylife>1 skip 4
if %mylife=1 dwave 2,"se\damage.ogg":quakex 2,440
eng $sel1:$sel6\
if %mylife>1 damage %mylife/2,%mylife/2
skillname ""
name "Luka"
>Y...You're better!@> You're better than me, I admit it!@
>Now please, let me come...!\
name $name
>Aww, you know just the words to melt my heart.@
>So you admit that the copy is better than the original?\
name "Luka"
>Yes!@> So... Please...!\
name $name
>Good boy...@>Well then, here you go!\
name ""
skillname "Copied Masturbation"
>Suddenly grabbing Luka's penis tighter, the Doppelganger starts to pump him as fast as she can!\
damage 150,250
goto *doppel_h2



*doppel_skill

gosub *cmd_skill
if %cmd1=24 && %enemylife>999 goto *doppel_nomeditate
if %cmd1=24 && %enemylife<1000 goto *doppel_meditate
if %cmd1=26 goto *doppel_skill1
if %cmd1=27 goto *doppel_skill2
if %cmd1=28 goto *doppel_skill3
if %cmd1=29 goto *doppel_giga
if %cmd1=30 goto *doppel_skill4
if %cmd1=31 goto *doppel_skill5
if %cmd1=32 goto *doppel_skill6
if %cmd1=33 goto *doppel_skill7
if %cmd1=34 goto *doppel_skill8
if %cmd1=35 goto *doppel_edge
if %cmd1=-1 goto *doppel_main
goto *doppel_skill



*doppel_insuffmp

if %cmd1=24 goto *insuff_meditate
if %cmd1=31 goto *sylph_summon
if %cmd1=32 goto *gnome_summon
if %cmd1=33 goto *undine_summon
if %cmd1=34 goto *sala_summon
if %cmd1=26 goto *light_attack
if %cmd1=27 goto *earth_attack
if %cmd1=28 goto *serene_attack
if %cmd1=30 goto *vapor_attack
if %cmd1=29 goto *giga_insuff



*vapor_attack

mov %before_action,25
rnd2 %ransu,1,2
if %ransu=1 mov $sel1,"I'll purify you in the flames of purgatory... Vaporizing Rebellion Sword!"
if %ransu=2 mov $sel1,"Lend me your power, Salamander! Vaporizing Rebellion Sword!"
name "Luka"
eng $sel1:$sel6
wait 700
textclear
name $name
eng $sel1:$sel6
wait 700
textclear
name ""
mov %mp,%mp-4
gosub *mp
skillname "Vaporizing Rebellion Sword"
dwave 1,"se\tuki.ogg"
>Luka attacks in a whirlwind of fire!\
>But the Doppelganger has insufficient SP!\
gosub *skill16a
vspl 3,650,1
csp 0:csp 1
lsp 591,":a/2,0,3;system\select_window2.jpg",150,20
print 1
dwave 1,"se\counter.ogg"
if %earth=3 rnd2 %damage,80,175
if %earth=0 rnd2 %damage,100,225
gosub *enemylife2
dwave 1,"se\counter.ogg"
if %earth=3 rnd2 %damage,80,175
if %earth=0 rnd2 %damage,100,225
gosub *enemylife2
textclear
dwave 1,"se\counter.ogg"
if %earth=3 rnd2 %damage,80,175
if %earth=0 rnd2 %damage,100,225
gosub *enemylife2
dwave 1,"se\counter.ogg"
if %earth=3 rnd2 %damage,80,175
if %earth=0 rnd2 %damage,100,225
gosub *enemylife2
dwave 1,"se\counter.ogg"
if %earth=3 rnd2 %damage,80,175
if %earth=0 rnd2 %damage,100,225
gosub *enemylife2
if %enemylife=0 goto *doppel_v
skillname ""
if %first_sel14=1 skip 10
name $name
>Wh...What!?@>Why didn't it work!?\
>I've never had an ability fail on me before...\
>My magic is still high, so why didn't it work?@
>Do your skills have some strange restriction on them!?\
name "Luka"
>I see...@
>You know all of my skills, but not the conditions around how to use them!\
mov %first_sel14,1
name ""
if %first_sel13=0 skip 5
if %first_sel16=1 skip 4
>I knew it!@> She doesn't know about SP use!\
>This must be my path to victory!\
mov %first_sel16,1
goto *doppel_counter_attack



*serene_attack

mov %before_action,25
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Along the flow... Serene Demon Sword!"
if %ransu=2 mov $sel1,"Undine, lend me your power... Serene Demon Sword!"
if %ransu=3 mov $sel1,"I shall cut everything in my path... Serene Demon Sword!"
name "Luka"
eng $sel1:$sel6
wait 700
textclear
name $name
eng $sel1:$sel6
wait 700
textclear
name ""
mov %mp,%mp-2
gosub *mp
skillname "Serene Demon Sword"
dwave 3,"se\karaburi.ogg"
lsp 2,":c;effect\006a.bmp",0,0:print 1
wait 300
csp 2:print 18,500,"system\mask01.jpg"
vspl 3,650,1
>Luka sheathes his sword!\
>But the Doppelganger has insufficient SP!\
>Drawing his sword, Luka cuts through everything in his path!\
dwave 4,"se\slash4.ogg"
if %earth=3 rnd2 %damage,150,350
if %earth=0 rnd2 %damage,200,450
gosub *enemylife2
skillname ""
if %enemylife=0 goto *doppel_v
if %first_sel14=1 skip 10
name $name
>Wh...What!?@>Why didn't it work!?\
>I've never had an ability fail on me before...\
>My magic is still high, so why didn't it work?@
>Do your skills have some strange restriction on them!?\
name "Luka"
>I see...@
>You know all of my skills, but not the conditions around how to use them!\
mov %first_sel14,1
name ""
if %first_sel13=0 skip 5
if %first_sel16=1 skip 4
>I knew it!@> She doesn't know about SP use!\
>This must be my path to victory!\
mov %first_sel16,1
goto *doppel_counter_attack



*earth_attack

mov %before_action,25
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Oh Earth, infuse my sword with your weight! Earth Rumbling Decapitation!"
if %ransu=2 mov $sel1,"Gnome, lend me your power! Earth Rumbling Decapitation!"
if %ransu=3 mov $sel1,"Feel the weight of the Earth itself! Earth Rumbling Decapitation!"
name "Luka"
eng $sel1:$sel6
wait 700
textclear
name $name
eng $sel1:$sel6
wait 700
textclear
name ""
mov %mp,%mp-3
gosub *mp
skillname "Earth Rumbling Decapitation"
dwave 1,"se\karaburi.ogg"
lsp 2,":c;effect\earth.bmp",0,0:print 1
wait 300
csp 2:print 18,500,"system\mask01.jpg"
dwave 1,"se\bom2.ogg"
quake 10,1000
>Luka jumps into the air!\
>But the Doppelganger has insufficient SP!\
>Luka slams down, shaking the earth itself as he lands!\
dwave 1,"se\damage2.ogg"
if %earth=3 rnd2 %damage,325,425
if %earth=0 rnd2 %damage,450,575
gosub *enemylife2
skillname ""
if %enemylife=0 goto *doppel_v
if %first_sel14=1 skip 10
name $name
>Wh...What!?@>Why didn't it work!?\
>I've never had an ability fail on me before...\
>My magic is still high, so why didn't it work?@
>Do your skills have some strange restriction on them!?\
name "Luka"
>I see...@
>You know all of my skills, but not the conditions around how to use them!\
mov %first_sel14,1
name ""
if %first_sel13=0 skip 5
if %first_sel16=1 skip 4
>I knew it!@> She doesn't know about SP use!\
>This must be my path to victory!\
mov %first_sel16,1
goto *doppel_counter_attack



*light_attack

mov %before_action,25
rnd2 %ransu,1,2
if %ransu=1 mov $sel1,"With the wind guiding my sword... Lightning Sword Flash!"
if %ransu=2 mov $sel1,"With Sylph's power...! Lightning Sword Flash!"
if %turn=1 mov $sel1,"Here I come! Lightning Sword Flash!"
name "Luka"
eng $sel1:$sel6
wait 700
textclear
name $name
eng $sel1:$sel6
wait 700
textclear
name ""
mov %mp,%mp-2
gosub *mp
skillname "Lightning Sword Flash"
>Luka dashes forward!\
>But the Doppelganger has insufficient SP!\
dwave 1,"se\tuki.ogg"
lsp 1,":a;effect\wind.bmp",0,0:print 10,12
lsp 2,":a;effect\009a_01.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009a_02.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009a_03.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009a_04.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009a_05.bmp",%tukix,%tukiy:print 10,12
csp 1:print 10,12
csp 2:print 10,12
>Luka's sword flashes like a lightning bolt!\
if %earth=3 rnd2 %damage,175,300
if %earth=0 rnd2 %damage,225,400
gosub *enemylife2
skillname ""
if %enemylife=0 goto *doppel_v
if %first_sel14=1 skip 10
name $name
>Wh...What!?@>Why didn't it work!?\
>I've never had an ability fail on me before...\
>My magic is still high, so why didn't it work?@
>Do your skills have some strange restriction on them!?\
name "Luka"
>I see...@
>You know all of my skills, but not the conditions around how to use them!\
mov %first_sel14,1
name ""
if %first_sel13=0 skip 5
if %first_sel16=1 skip 4
>I knew it!@> She doesn't know about SP use!\
>This must be my path to victory!\
mov %first_sel16,1
goto *doppel_counter_attack



*doppel_counter_attack

name ""
>The Doppelganger attacks!\
if %earth=0 rnd2 %damage,75,150
if %earth=3 rnd2 %damage,50,100
dwave 1,"se\slash.ogg"
damage %damage,%damage
if %mylife=0 goto *doppel_h3
mov %doppel_mp,%doppel_mp+1
goto *doppel_common_main



*sala_summon

mov %before_action,46
mov %count_fire,%count_fire+1
name "Luka"
>Salamander, purify everything with the flames of purgatory!
wait 700
textclear
name $name
>Salamander, purify everything with the flames of purgatory!
wait 700
textclear
name ""
mov %mp,%max_mp
gosub *mp
skillname "Purgatory Flame"
mov %fire,3:mov %fire_turn,5
dwave 2,"se\fire4.ogg"
lsp2 0,":a;chara\salamander_st02.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *elm_print
>Licks of flame run up and down Luka's sword, ready to ignite with his sword skills!\
>But the Doppelganger has insufficient SP!\
skillname ""
if %first_sel14=1 skip 10
name $name
>Wh...What!?@>Why didn't it work!?\
>I've never had an ability fail on me before...\
>My magic is still high, so why didn't it work?@
>Do your skills have some strange restriction on them!?\
name "Luka"
>I see...@
>You know all of my skills, but not the conditions around how to use them!\
mov %first_sel14,1
name ""
if %first_sel13=0 skip 5
if %first_sel16=1 skip 4
>I knew it!@> She doesn't know about SP use!\
>This must be my path to victory!\
mov %first_sel16,1
name $name
>No!@>If you have that spirit active when I don't, I'll lose for sure...\
>I'll just have to try to parry until I can try summoning it again!\
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"I'll purify you in the flames of purgatory... Vaporizing Rebellion Sword!"
if %ransu=2 mov $sel1,"Lend me your power, Salamander! Vaporizing Rebellion Sword!"
if %ransu=3 mov $sel1,"Lend me your power, Salamander! Vaporizing Rebellion Sword!"
name $ori_name
eng $sel1
$sel6\
name ""
mov %mp,%mp-4
gosub *mp
skillname1 "Vaporizing Rebellion Sword"
vspl 3,650,0
dwave 2,"se\fire2.ogg"
lsp2 0,":c;effect\cutin_ruka_fire.bmp",600,150,100,100,0,10
lsp2 1,":c;effect\cutin_fire.bmp",200,150,100,100,0,10
gosub *skill_cutin
gosub *skill16a
vspl 3,650,1
csp 0:csp 1
skillname "Vaporizing Rebellion Sword"
eng "Burning with the flames of purgatory, "+$ori_name+" slashes in a whirlwind of fire!"
$sel6\
>At the same time, the Doppelganger desperately attacks, trying to parry Luka's blows!\
dwave 1,"se\counter.ogg"
if %earth=3 rnd2 %damage,100,205
if %earth=0 rnd2 %damage,125,250
>Luka crushes through her parry!\
gosub *enemylife2
dwave 1,"se\counter.ogg"
if %earth=3 rnd2 %damage,100,205
if %earth=0 rnd2 %damage,125,250
>Luka overpowers the Doppelganger!\
gosub *enemylife2
textclear
dwave 1,"se\counter.ogg"
if %earth=3 rnd2 %damage,100,205
if %earth=0 rnd2 %damage,125,250
>The Doppelganger staggers under Luka's relentless assault!\
gosub *enemylife2
dwave 1,"se\counter.ogg"
if %earth=3 rnd2 %damage,100,205
if %earth=0 rnd2 %damage,125,250
>The Doppelganger is barely able to hold onto her sword!\
gosub *enemylife2
dwave 1,"se\counter.ogg"
if %earth=3 rnd2 %damage,100,205
if %earth=0 rnd2 %damage,125,250
>The Doppelganger's legs shake under the overwhelming fury of Luka's attacks!\
gosub *enemylife2
skillname ""
if %enemylife=0 goto *doppel_v
name $name
>Salamander, purify everything with the flames of purgatory!\
name ""
mov %doppel_mp,10
skillname "Purgatory Flame"
dwave 2,"se\fire4.ogg"
lsp2 0,":a;chara\salamander_st02.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *elm_print
>Licks of flame run up and down the Doppelganger's sword, ready to ignite with her sword skills!\
name $name
>Whew... I... I managed to survive...\
name ""
goto *doppel_common_main



*undine_summon

mov %before_action,45
mov %count_aqua,%count_aqua+1
name "Luka"
>Calm my heart and mind...
wait 700
textclear
name "Doppelganger"
>Calm my heart and mind...
wait 700
textclear
name ""
skillname "Serene Mind"
mov %mp,%mp-4
gosub *mp
mov %aqua,3:mov %aqua_turn,16
dwave 2,"se\aqua.ogg"
lsp2 0,":a;chara\undine_st11.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *elm_print
>Luka's heart clears, reaching the height of a serene state!\
>But the Doppelganger has insufficient SP!\
skillname ""
if %first_sel14=1 skip 10
name $name
>Wh...What!?@>Why didn't it work!?\
>I've never had an ability fail on me before...\
>My magic is still high, so why didn't it work?@
>Do your skills have some strange restriction on them!?\
name "Luka"
>I see...@
>You know all of my skills, but not the conditions around how to use them!\
mov %first_sel14,1
name ""
if %first_sel13=0 skip 5
if %first_sel16=1 skip 4
>I knew it!@> She doesn't know about SP use!\
>This must be my path to victory!\
mov %first_sel16,1
skillname ""
name $name
>No!@>I know how this summon works, I won't let you get close to me!\
name ""
>The Doppelganger starts to let out a barrage of random attacks all over the place!\
name "Luka"
>I can see it!\
name ""
>Luka slowly moves toward the Doppelganger, swaying side to side and dodging her blows!\
>The Doppelganger attacks!\
mov %doppel_mp,%doppel_mp+1
gosub *aqua_guard
>Luka counters!\
name "Luka"
>Too easy!\
name ""
gosub *mp_kaihuku:gosub *mp
>Luka's sword flashes toward the Doppelganger!\
if %earth=0 rnd2 %damage,95,170
if %earth=3 rnd2 %damage,70,120
dwave 1,"se\slash4.ogg"
gosub *enemylife2
if %enemylife=0 goto *doppel_v
name ""
if %doppel_mp=4 goto *doppel_undinesummon2
>The Doppelganger attacks!\
mov %doppel_mp,%doppel_mp+1
gosub *aqua_guard
>Luka counters!\
name "Luka"
>Not fast enough!\
name ""
>Luka's sword flashes toward the Doppelganger!\
gosub *mp_kaihuku:gosub *mp
if %earth=0 rnd2 %damage,95,170
if %earth=3 rnd2 %damage,70,120
dwave 1,"se\slash4.ogg"
gosub *enemylife2
if %enemylife=0 goto *doppel_v
name ""
if %doppel_mp=4 goto *doppel_undinesummon2
>The Doppelganger attacks!\
mov %doppel_mp,%doppel_mp+1
gosub *aqua_guard
>Luka counters!\
name "Luka"
>You can't beat the original!\
name ""
>Luka's sword flashes toward the Doppelganger!\
if %earth=0 rnd2 %damage,95,170
if %earth=3 rnd2 %damage,70,120
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\slash4.ogg"
gosub *enemylife2
if %enemylife=0 goto *doppel_v
name ""
if %doppel_mp=4 goto *doppel_undinesummon2
>The Doppelganger attacks!\
mov %doppel_mp,%doppel_mp+1
gosub *aqua_guard
>Luka counters!\
name "Luka"
>Now fall!\
mov %before_action,25
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Along the flow... Serene Demon Sword!"
if %ransu=2 mov $sel1,"Undine, lend me your power... Serene Demon Sword!"
if %ransu=3 mov $sel1,"I shall cut everything in my path... Serene Demon Sword!"
name "Luka"
eng $sel1:$sel6
wait 900
textclear
name ""
mov %mp,%mp-2
mov %doppel_mp,%doppel_mp-2
gosub *mp
skillname1 "Serene Demon Sword"
vspl 3,650,0
dwave 2,"se\aqua2.ogg"
if %aqua=0 | %player=99 skip 4
lsp2 0,":c;effect\cutin_ruka_aqua.bmp",600,150,100,100,0,10
lsp2 1,":c;effect\cutin_aqua.bmp",200,150,100,100,0,10
gosub *skill_cutin
dwave 3,"se\karaburi.ogg"
lsp 2,":c;effect\006a.bmp",0,0:print 1
wait 300
csp 2:print 18,500,"system\mask01.jpg"
vspl 3,650,1
csp 0:csp 1
skillname "Serene Demon Sword"
>Luka sheathes his sword, and rests his hand on the hilt!
>Drawing it in a fluid slash, he slices straight through everything in his path!\
dwave 4,"se\slash4.ogg"
if %earth=3 rnd2 %damage,175,375
if %earth=0 rnd2 %damage,225,475
gosub *enemylife2
skillname ""
if %enemylife=0 goto *doppel_v
name "Doppelganger"
>Calm my heart and mind...\
name ""
skillname "Serene Mind"
mov %doppel_mp,%doppel_mp-4
dwave 2,"se\aqua.ogg"
lsp2 0,":a;chara\undine_st11.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *elm_print
>The Doppelganger's heart clears, reaching the height of a serene state!\
skillname ""
name $name
>Damn, that hurt...@
>I won't lose though...!\
name ""
goto *doppel_common_main



*doppel_undinesummon2

name "Doppelganger"
>Calm my heart and mind...\
name ""
skillname "Serene Mind"
mov %doppel_mp,%doppel_mp-4
dwave 2,"se\aqua.ogg"
lsp2 0,":a;chara\undine_st11.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *elm_print
>The Doppelganger's heart clears, reaching the height of a serene state!\
skillname ""
name $name
>Whew, that was close...\
name ""
goto *doppel_common_main



*gnome_summon

mov %before_action,44
mov %count_earth,%count_earth+1
name "Luka"
>Gnome, infuse me with the unmoving power of the earth!
wait 700
textclear
name $name
>Gnome, infuse me with the unmoving power of the earth!
wait 700
textclear
name ""
mov %mp,%mp-1
gosub *mp
skillname "Wild Lands"
mov %earth,3:mov %earth_turn,16
dwave 2,"se\earth2.ogg"
rnd2 %ransu,1,100
notif %ransu=100 lsp2 0,":a;chara\gnome_st21.bmp",200,300,100,100,0,200
if %ransu=100 lsp2 0,":a;chara\gnome_st12.bmp",200,300,100,100,0,200:mov %z_gnome,1
gosub *syoukan_effect
gosub *elm_print
>The unmoving power of the earth takes hold in Luka's body!\
>But the Doppelganger has insufficient SP!\
skillname ""
if %first_sel14=1 skip 10
name $name
>Wh...What!?@>Why didn't it work!?\
>I've never had an ability fail on me before...\
>My magic is still high, so why didn't it work?@
>Do your skills have some strange restriction on them!?\
name "Luka"
>I see...@
>You know all of my skills, but not the conditions around how they work!\
mov %first_sel14,1
name ""
if %first_sel13=0 skip 5
if %first_sel16=1 skip 4
>I knew it!@> She doesn't know about SP use!\
>This must be my path to victory!\
mov %first_sel16,1
>As the Doppelganger is confused, Luka gets in a free attack!\
>Luka attacks!\
name "Luka"
>Take this!\
name ""
>Filled with the power of the earth, Luka lands a critical hit!\
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\slash3.ogg"
rnd2 %damage,175,300
gosub *enemylife2
if %enemylife=0 goto *doppel_v
name $name
>Kyah!@>Damn you!\
name ""
>The Doppelganger attacks!\
dwave 2,"se\earth3.ogg"
>But Luka takes no damage!\
name $name
>It just bounced right off...\
name "Luka"
>Now it's my turn!\
name ""
>Luka attacks!\
>Filled with the power of the earth, Luka lands a critical hit!\
gosub *mp_kaihuku:gosub *mp
dwave 1,"se\slash3.ogg"
rnd2 %damage,175,300
gosub *enemylife2
if %enemylife=0 goto *doppel_v
name $name
>Gnome, infuse me with the unmoving power of the earth!\
name ""
mov %doppel_mp,%doppel_mp-1
skillname "Wild Lands"
dwave 2,"se\earth2.ogg"
rnd2 %ransu,1,100
notif %ransu=100 lsp2 0,":a;chara\gnome_st21.bmp",200,300,100,100,0,200
if %ransu=100 lsp2 0,":a;chara\gnome_st12.bmp",200,300,100,100,0,200:mov %z_gnome,1
gosub *syoukan_effect
gosub *elm_print
>The unmoving power of the earth takes hold in the Doppelganger's body!\
skillname ""
name $name
>Whew, it worked that time...\
name ""
goto *doppel_common_main



*giga_insuff

mov %wind,0:mov %wind_turn,0:mov %earth,0:mov %earth_turn,0:mov %aqua,0:mov %aqua_turn,0:mov %fire,0:mov %fire_turn,0
gosub *elm_print
mov %mp,%mp-1
gosub *mp
name "Luka"
>Come, Sylph!
wait 600
textclear
name $name
>Come, Sylph!
wait 600
textclear
name ""
skillname "Sylph"
dwave 2,"se\wind2.ogg"
lsp2 0,":a;chara\sylph_st12.bmp",200,300,100,100,0,200
gosub *syoukan_effect
>The power of wind takes hold in Luka's sword!\
>But the Doppelganger has insufficient SP!\
skillname ""
name $name
>What!?\
>Damn it, I can't let this skill hit me, or I'm done for!\
name "Luka"
>Come, Gnome!
wait 600
textclear
name ""
skillname "Gnome"
dwave 2,"se\earth1.ogg"
lsp2 0,":a;chara\gnome_st21.bmp",200,300,100,100,0,200
gosub *syoukan_effect
>The power of earth takes hold in Luka's sword!\
skillname ""
name $name
>Damn you!\
name ""
>The Doppelganger attacks!\
if %earth=0 rnd2 %damage,75,150
dwave 1,"se\slash.ogg"
damage %damage,%damage
mov %doppel_mp,%doppel_mp+1
if %mylife=0 goto *doppel_h3
name $name
>Whew, that was close...\
>I know how powerful that skill is!@
>I won't let you use it if I can't use it too!\
name ""
goto *doppel_common_main



*insuff_meditate

mov $sel1,"............."
name "Luka"
eng $sel1:$sel6
wait 600
textclear
name $name
eng $sel1:$sel6
wait 600
textclear
name ""
mov %mp,%mp-3
gosub *mp
skillname "Meditation"
>Luka quietly meditates.
>The Doppelganger quietly meditates.
wait 700
textclear
dwave 2,"se\kaihuku.ogg"
mov %damage,%max_mylife/2
>Luka recovers 800 HP!\
mov %mylife,%mylife+%damage
if %mylife>%max_mylife mov %mylife,%max_mylife
mov %gage,%mylife*100/%max_mylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 560,":a;system\gager"+$gagenum+".bmp",114,556
gosub *hp
print 10,500
>But the Doppelganger has insufficient SP!\
skillname ""
if %first_sel15=1 goto *doppel_common_main
if %first_sel14=1 goto *doppel_common_main
name $name
>Wh...What!?@>Why didn't it work!?\
>I've never had an ability fail on me before...\
>My magic is still high, so why didn't it work?@
>Do your skills have some strange restriction on them!?\
name "Luka"
>I see...@
>You know all of my skills, but not the conditions around how they work!\
name ""
mov %first_sel14,1
if %first_sel13=0 skip 5
if %first_sel16=1 skip 4
>I knew it!@> She doesn't know about SP use!\
>This must be my path to victory!\
mov %first_sel16,1
skillname ""
goto *doppel_common_main



*sylph_summon

mov %before_action,43
mov %count_wind,%count_wind+1
name "Luka"
>Sylph, rage around as you please!
wait 700
textclear
name $name
>Sylph, rage around as you please!
wait 700
textclear
name ""
mov %mp,%mp-1
gosub *mp
skillname "Devastating Gale"
mov %wind,3:mov %wind_turn,16
dwave 2,"se\wind3.ogg"
rnd2 %ransu,1,100
notif %ransu=100 lsp2 0,":a;chara\sylph_st12.bmp",200,300,100,100,0,200
if %ransu=100 lsp2 0,":a;chara\sylph_st07.bmp",200,300,100,100,0,200:mov %g_sylph,1
gosub *syoukan_effect
gosub *elm_print
>Luka's movements become as fast and powerful as a devastating gale!\
>But the Doppelganger has insufficient SP!\
skillname ""
if %first_sel14=1 skip 10
name $name
>Wh...What!?@>Why didn't it work!?\
>I've never had an ability fail on me before...\
>My magic is still high, so why didn't it work?@
>Do your skills have some strange restriction on them!?\
name "Luka"
>I see...@
>You know all of my skills, but not the conditions around how they work!\
mov %first_sel14,1
name ""
if %first_sel13=0 skip 5
if %first_sel16=1 skip 4
>I knew it!@> She doesn't know about SP use!\
>This must be my path to victory!\
mov %first_sel16,1
>As the Doppelganger is confused, Luka gets in a free attack!\
>Luka attacks!\
name "Luka"
>Take this!\
name ""
>Luka's sword flashes like a lightning bolt toward his opponent!\
if %earth=0 rnd2 %damage,95,170
if %earth=3 rnd2 %damage,70,120
dwave 1,"se\damage.ogg"
gosub *enemylife2
gosub *mp_kaihuku:gosub *mp
>Just a blur, Luka attacks the Doppelganger again before she can react!\
if %earth=0 rnd2 %damage,95,170
if %earth=3 rnd2 %damage,70,120
dwave 2,"se\damage.ogg"
gosub *enemylife2
gosub *mp_kaihuku:gosub *mp
if %enemylife=0 goto *doppel_v
name $name
>Damn you!\
name ""
>The Doppelganger attacks!\
mov %wind_kakuritu,100
gosub *wind_guard_kakuritu
if %wind=3 mov $sel1,"But Luka moves like the wind and dodges!":gosub *wind_guard:skillname ""
mov %before_action,25
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"With the wind guiding my sword... Lightning Sword Flash!"
if %ransu=2 mov $sel1,"With Sylph's power...! Lightning Sword Flash!"
if %ransu=3 mov $sel1,"Here I come! Lightning Sword Flash!"
name $ori_name
eng $sel1
$sel6\
name ""
mov %mp,%mp-2
gosub *mp
skillname1 "Lightning Sword Flash"
vspl 3,650,0
dwave 2,"se\wind2.ogg"
if %wind=0 | %player=99 skip 4
lsp2 0,":c;effect\cutin_ruka_wind.bmp",600,150,100,100,0,10
lsp2 1,":c;effect\cutin_wind.bmp",200,150,100,100,0,10
gosub *skill_cutin
vspl 3,650,1
csp 0:csp 1
skillname "Lightning Sword Flash"
eng "Moving like a powerful gale, "+$ori_name+" thrusts his sword forward as fast as lightning!"
$sel6\
gosub *skill11a
if %earth=0 rnd2 %damage,225,400
if %earth=3 rnd2 %damage,175,300
csp 2:print 1
gosub *enemylife2
skillname ""
if %enemylife=0 goto *doppel_v
name $name
>Sylph, rage around as you please!\
skillname "Devastating Gale"
dwave 2,"se\wind3.ogg"
rnd2 %ransu,1,100
notif %ransu=100 lsp2 0,":a;chara\sylph_st12.bmp",200,300,100,100,0,200
if %ransu=100 lsp2 0,":a;chara\sylph_st07.bmp",200,300,100,100,0,200:mov %g_sylph,1
gosub *syoukan_effect
gosub *elm_print
name ""
>The Doppelganger's movements become as fast and powerful as a devastating gale!\
skillname ""
name $name
>Damn you...\
>Why couldn't I do it before...!?\
name ""
goto *doppel_common_main



*doppel_nomeditate

name "Luka"
>............\
name ""
mov %mp,%mp-3
gosub *mp
if %mylife<875 mov %first_sel12,1
skillname "Meditation"
>Luka quietly meditates.\
dwave 2,"se\kaihuku.ogg"
mov %damage,%max_mylife/2
>Luka recovers 800 HP!\
mov %mylife,%mylife+%damage
if %mylife>%max_mylife mov %mylife,%max_mylife
mov %gage,%mylife*100/%max_mylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 560,":a;system\gager"+$gagenum+".bmp",114,556
gosub *hp
print 10,500
skillname ""
if %first_sel12=1 skip 5
name $name
>Hah, why would you use that skill now?@
>What a waste of a turn...\
>It heals half of your HP, so naturally you should only use it when you're close to half health!\
name ""
>The Doppelganger attacks!\
if %earth=3 rnd2 %damage,50,100
if %earth=0 rnd2 %damage,75,150
dwave 1,"se\slash.ogg"
damage %damage,%damage
if %mylife=0 goto *doppel_h3
if %doppel_mp<10 mov %doppel_mp,%doppel_mp+1
if %first_sel12=1 goto *doppel_common_main
name $name
>Thanks for the free hit.@
>Looks like I'm ahead already, you moron.\
name ""
>Damn, she's right...@> I kind of wasted some SP there since I didn't get full use out of my meditate.\
>But wait...@>She didn't copy my actions here.@> I don't know if this was to my advantage or not though...\
mov %first_sel12,1
goto *doppel_common_main



*doppel_giga

if %doppel_mp<1 goto *doppel_insuffmp
mov %before_action,47
mov %kadora,1
mov %wind,0:mov %wind_turn,0:mov %earth,0:mov %earth_turn,0:mov %aqua,0:mov %aqua_turn,0:mov %fire,0:mov %fire_turn,0
gosub *elm_print
mov %mp,%mp-1
gosub *mp
mov %doppel_mp,%doppel_mp-1
name "Luka"
>Come, Sylph!
wait 600
textclear
name $name
>Come, Sylph!
wait 600
textclear
name ""
skillname "Sylph"
dwave 2,"se\wind2.ogg"
lsp2 0,":a;chara\sylph_st12.bmp",200,300,100,100,0,200
gosub *syoukan_effect
>The power of wind takes hold in Luka's sword!
>The power of wind takes hold in the Doppelganger's sword!\
skillname ""
if %first_sel15=1 skip 2
>Sh...She's doing it too!?\
mov %before_action,47
mov %kadora,2
name "Luka"
>Come, Gnome!
wait 600
textclear
name $name
>Come, Gnome!
wait 600
textclear
name ""
skillname "Gnome"
dwave 2,"se\earth1.ogg"
lsp2 0,":a;chara\gnome_st21.bmp",200,300,100,100,0,200
gosub *syoukan_effect
>The power of earth takes hold in Luka's sword!
>The power of earth takes hold in the Doppelganger's sword!\
skillname ""
if %first_sel15=1 skip 4
name $name
>Hehe...@>This looks like it will be fun.@
>Who do you think is going to win?\
mov %before_action,47
mov %kadora,3
name "Luka"
>Come, Undine!
wait 600
textclear
name $name
>Come, Undine!
wait 600
textclear
name ""
skillname "Undine"
dwave 2,"se\aqua2.ogg"
lsp2 0,":a;chara\undine_st11.bmp",200,300,100,100,0,200
gosub *syoukan_effect
>The power of water takes hold in Luka's sword!
>The power of water takes hold in the Doppelganger's sword!\
skillname ""
if %first_sel15=1 skip 4
name ""
>Here it comes...@
>When it comes to handling the spirits, I won't lose!\
mov %before_action,47
mov %kadora,4
name "Luka"
>Come, Salamander!
wait 600
textclear
name $name
>Come, Salamander!
wait 600
textclear
name ""
skillname "Salamander"
dwave 2,"se\fire2.ogg"
lsp2 0,":a;chara\salamander_st02.bmp",200,300,100,100,0,200
gosub *syoukan_effect
>The power of fire takes hold in Luka's sword!
>The power of fire takes hold in the Doppelganger's sword!\
skillname ""
mov %before_action,28
mov %kadora,0
mov %count_kadora,1
name $ori_name
>It's over! Quadruple Giga!
wait 700
textclear
name $name
>It's over! Quadruple Giga!
wait 700
textclear
name ""
skillname1 "Quadruple Giga"
vspl 3,650,0
dwave 2,"se\wind2.ogg"
lsp2 2,":c;effect\cutin_wind.bmp",100,150,100,100,0,10
for %move=0 to 200 step 20
msp2 2,0,20,0,0,0,24
print 1:wait 5
next
csp2 2
lsp 10,":c;effect\cutin_wind.bmp",0,0:print 1
dwave 3,"se\earth1.ogg"
lsp2 2,":c;effect\cutin_earth.bmp",300,150,100,100,0,10
for %move=0 to 200 step 20
msp2 2,0,20,0,0,0,24
print 1:wait 5
next
csp2 2
lsp 11,":c;effect\cutin_earth.bmp",200,0:print 1
dwave 4,"se\aqua2.ogg"
lsp2 3,":c;effect\cutin_aqua.bmp",500,150,100,100,0,10
for %move=0 to 200 step 20
msp2 3,0,20,0,0,0,24
print 1:wait 5
next
csp2 3
lsp 12,":c;effect\cutin_aqua.bmp",400,0:print 1
dwave 5,"se\fire2.ogg"
lsp2 4,":c;effect\cutin_fire.bmp",700,150,100,100,0,10
for %move=0 to 200 step 20
msp2 4,0,20,0,0,0,24
print 1:wait 5
next
csp2 4
lsp 13,":c;effect\cutin_fire.bmp",600,0:print 1
cspl 10,13:print 10,600
vspl 3,650,1
csp 0:csp 1
skillname "Quadruple Giga"
>The power of the four spirits amplify each other, and explode in a torrent of magical energy!\
wait 500
dwave 1,"se\karaburi.ogg"
lsp 2,":c;effect\003.bmp",0,0:print 1
wait 300
dwave 3,"se\earth1.ogg"
lsp 2,":a;effect\earth.bmp",0,0:print 1
wait 100
dwave 5,"se\fire2.ogg"
lsp 2,":a;effect\fire.bmp",0,0:print 1
wait 100
dwave 4,"se\aqua2.ogg"
lsp 2,":a;effect\aqua.bmp",0,0:print 1
wait 100
dwave 2,"se\wind2.ogg"
lsp 2,":a;effect\wind.bmp",0,0:print 1
wait 100
csp 2:print 18,500,"system\mask01.jpg"
dwave 1,"se\bom3.ogg"
quake 10,2000
>The power to smash anything collides together between Luka and the Doppelganger!\
dwave 1,"se\damage2.ogg"
skillname ""
name "Luka"
>Ahhhgg!
wait 250
textclear
name $name
>Ahhh!
wait 250
textclear
name ""
if %first_sel15=1 goto *doppel_common_main
cspl 3,7
csp 700:print 10,500
bg black,1
name ""
>My body is flung back from the force of the explosion.\
>As I try to get back to my feet, my eyes are temporarily blinded from the intense light from the explosion.\
bg "bg\bg076.bmp",10,3000
lsp 700,":l;Doppel\doppelstand.png",0,0:print 10,500
>After a few moments, I get my vision back.\
name "Luka"
>Wh...What!?\
name ""
>The forest I was just in is completely gone.@
>It's as if everything was instantly incinerated, and the earth itself was churned into mere sand.\
name $name
>Wow...@> This is nuts.\
>W...Wait!@>My home!@
>My home is gone!\
>I've lived here for so long, and now it's gone...\
>This is your fault!\
name "Luka"
>What!?@> You're the one who attacked me!@> How is this my fault!?\
name $name
>Shut up!@> Apologize by giving me your body!\
name "Luka"
>No way!\
name ""
>Did this change anything...?@
>At the very least, she isn't fighting on her home ground any longer I guess...\
mov %first_sel15,1
goto *doppel_common_main



*doppel_meditate

if %doppel_mp<3 goto *doppel_insuffmp
mov $sel1,"............."
name "Luka"
eng $sel1:$sel6
wait 600
textclear
name $name
eng $sel1:$sel6
wait 600
textclear
name ""
mov %mp,%mp-3
mov %doppel_mp,%doppel_mp-3
gosub *mp
skillname "Meditation"
>Luka quietly meditates.
>The Doppelganger quietly meditates.
wait 700
textclear
dwave 2,"se\kaihuku.ogg"
mov %damage,%max_mylife/2
>Luka recovers 800 HP!\
mov %mylife,%mylife+%damage
if %mylife>%max_mylife mov %mylife,%max_mylife
mov %gage,%mylife*100/%max_mylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 560,":a;system\gager"+$gagenum+".bmp",114,556
gosub *hp
print 10,500
mov %damage,800
gosub *enemylife_kaihuku
skillname ""
if %first_sel6=1 goto *doppel_common_main
name "Luka"
>No way, you can heal yourself too!?\
name $name
>What are you, stupid?@>If you can do it, I can do it too!\
>But still...@> This skill is so convenient.@
>I can only imagine how many monsters got angry at you using such a cheap trick as this.\
>Right before they're able to deal the finishing blow...@>Suddenly you're at half health again!\
>Truly a maddening experience, I'm sure...@>Hehe.@>How does it feel now that it's happening to you?\
name "Luka"
>Damn...\
name ""
>It looks like I can't out recover her, either...\
mov %first_sel6,1
goto *doppel_common_main



*doppel_edge

rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Drive myself into a corner...!"
if %ransu=2 mov $sel1,"This is my way of fighting...!"
if %ransu=3 mov $sel1,"Even at the edge, I won't falter!"
name $ori_name
eng $sel1
$sel6\
name ""
skillname "Edging"
eng $ori_name+" focuses his mind carefully..."
$sel6@
dwave 2,"se\down2.ogg"
eng $ori_name+"'s vitality sharply decreases!"
$sel6/
mov %mylife,1
mov %gage,%mylife*100/%max_mylife+1
if %gage=101 mov %gage,100
itoa $gagenum,%gage
lsp 560,":a;system\gager"+$gagenum+".bmp",114,556
gosub *hp
print 10,500
\
skillname ""
name ""
name $name
>Haha, seriously?\
>Just because I'm able to match your every move doesn't mean I have to match you.\
>What an idiot....\
name ""
>After Luka injures himself, the Doppelganger dashes around him, wrapping him in her scarf!\
name $name
mov %kousoku,2
>Hehe.@>This must have been what you were hoping for, wasn't it?\
name ""
>The Doppelganger pulls her scarf tighter around Luka, completely blocking off his movements.\
>Nimbly moving to Luka's side, she pulls the scarf away from his groin area and pulls his penis out of his pants, exposing it to the air.\
lsp 700,":l;Doppel/doppelbind.png",0,0:print 10,500
name $name
>Now let's finish you off...@
>You did most of the work already, but I'd be glad to deliver the final blow.\
name ""
skillname "Copied Masturbation"
>The Doppelganger gently strokes Luka's penis!\
damage 100,150
if %mylife=0 goto *doppel_h1



*doppel_skill1

if %doppel_mp<2 goto *doppel_insuffmp
mov %before_action,25
rnd2 %ransu,1,2
if %ransu=1 mov $sel1,"With the wind guiding my sword... Lightning Sword Flash!"
if %ransu=2 mov $sel1,"With Sylph's power...! Lightning Sword Flash!"
if %turn=1 mov $sel1,"Here I come! Lightning Sword Flash!"
name "Luka"
eng $sel1:$sel6
wait 700
textclear
name $name
eng $sel1:$sel6
wait 700
textclear
name ""
mov %mp,%mp-2
mov %doppel_mp,%doppel_mp-2
gosub *mp
skillname "Lightning Sword Flash"
>Both of them dash forward, hitting each other at the exact same time with a lightning fast slash!\
dwave 1,"se\tuki.ogg"
lsp 1,":a;effect\wind.bmp",0,0:print 10,12
lsp 2,":a;effect\009a_01.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009a_02.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009a_03.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009a_04.bmp",%tukix,%tukiy:print 10,12
lsp 2,":a;effect\009a_05.bmp",%tukix,%tukiy:print 10,12
csp 1:print 10,12
csp 2:print 10,12
mov %damage_nobr,1
if %earth=3 rnd2 %damage,125,250
if %earth=0 rnd2 %damage,175,350
damage %damage,%damage
gosub *enemylife2
skillname ""
if %mylife=0 goto *doppel_h3
if %enemylife=0 goto *doppel_v
if %first_sel4=1 goto *doppel_common_main
name "Luka"
>Damn...\
name ""
>I thought since she had a female form instead of my exact body, I could still have been faster...\
>But we hit each other at the exact same time.\
name $name
>Hehe, that's a fun skill...@
>I've never moved that fast before in my life.\
>I must have this power as my own...\
name ""
mov %first_sel4,1
goto *doppel_common_main



*doppel_skill2

if %doppel_mp<3 goto *doppel_insuffmp
mov %before_action,25
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Oh Earth, infuse my sword with your weight! Earth Rumbling Decapitation!"
if %ransu=2 mov $sel1,"Gnome, lend me your power! Earth Rumbling Decapitation!"
if %ransu=3 mov $sel1,"Feel the weight of the Earth itself! Earth Rumbling Decapitation!"
name "Luka"
eng $sel1:$sel6
wait 700
textclear
name $name
eng $sel1:$sel6
wait 700
textclear
name ""
mov %mp,%mp-3
mov %doppel_mp,%doppel_mp-3
gosub *mp
skillname "Earth Rumbling Decapitation"
dwave 1,"se\karaburi.ogg"
lsp 2,":c;effect\earth.bmp",0,0:print 1
wait 300
csp 2:print 18,500,"system\mask01.jpg"
dwave 1,"se\bom2.ogg"
quake 10,1000
>Luka and the Doppelganger jump into the air at the same time!
>As they come crashing to the earth, their swords lock and slam into the ground!\
dwave 1,"se\damage2.ogg"
mov %damage_nobr,1
if %earth=3 rnd2 %damage,200,350
if %earth=0 rnd2 %damage,300,475
damage %damage,%damage
gosub *enemylife2
skillname ""
if %mylife=0 goto *doppel_h3
if %enemylife=0 goto *doppel_v
if %first_sel1=1 goto *doppel_common_main
name "Luka"
>Ahh!\
name ""
>The shockwave from our swords slamming into the ground reverbates around my body, causing my body to ache all over.\
>Even though neither of us hit the other, we both reel in pain from the shockwave.\
name $name
>Wow, look at the ground...@
>I made a gigantic hole!\
>That's crazy...@>I must have this power...!\
name ""
mov %first_sel1,1
goto *doppel_common_main



*doppel_skill3

if %doppel_mp<2 goto *doppel_insuffmp
mov %before_action,25
rnd2 %ransu,1,3
if %ransu=1 mov $sel1,"Along the flow... Serene Demon Sword!"
if %ransu=2 mov $sel1,"Undine, lend me your power... Serene Demon Sword!"
if %ransu=3 mov $sel1,"I shall cut everything in my path... Serene Demon Sword!"
name "Luka"
eng $sel1:$sel6
wait 700
textclear
name $name
eng $sel1:$sel6
wait 700
textclear
name ""
mov %mp,%mp-2
mov %doppel_mp,%doppel_mp-2
gosub *mp
skillname "Serene Demon Sword"
dwave 3,"se\karaburi.ogg"
lsp 2,":c;effect\006a.bmp",0,0:print 1
wait 300
csp 2:print 18,500,"system\mask01.jpg"
vspl 3,650,1
>Luka and the Doppelganger sheathe their swords!
>Drawing them at the same time, their swords lock together in mid-air!\
dwave 4,"se\slash4.ogg"
mov %damage_nobr,1
if %earth=3 rnd2 %damage,100,300
if %earth=0 rnd2 %damage,150,400
damage %damage,%damage
gosub *enemylife2
skillname ""
if %mylife=0 goto *doppel_h3
if %enemylife=0 goto *doppel_v
if %first_sel2=1 goto *doppel_common_main
name "Luka"
>Ouch!\
name ""
>The impact from our swords clashing at such high speeds sends pain running through my arm.\
>The same time I jump back and take my stance, the Doppelganger does the exact same thing...\
name $name
>Hmm, how odd...@>You wouldn't think sheathing your sword in a fight would be a good idea.\
>Whomever you copied that skill from was pretty creative.\
name "Luka"
>I didn't copy it!@>I learned it!\
name $name
>Same thing, isn't it?\
name "Luka"
>Gah...\
name ""
mov %first_sel2,1
goto *doppel_common_main



*doppel_skill4

if %doppel_mp<4 goto *doppel_insuffmp
mov %before_action,25
rnd2 %ransu,1,2
if %ransu=1 mov $sel1,"I'll purify you in the flames of purgatory... Vaporizing Rebellion Sword!"
if %ransu=2 mov $sel1,"Lend me your power, Salamander! Vaporizing Rebellion Sword!"
name "Luka"
eng $sel1:$sel6
wait 700
textclear
name $name
eng $sel1:$sel6
wait 700
textclear
name ""
mov %mp,%mp-4
mov %doppel_mp,%doppel_mp-4
gosub *mp
skillname "Vaporizing Rebellion Sword"
dwave 1,"se\tuki.ogg"
>Luka and the Doppelganger let loose a barrage of attacks!\
gosub *skill16a
vspl 3,650,1
csp 0:csp 1
lsp 591,":a/2,0,3;system\select_window2.jpg",150,20
print 1
dwave 1,"se\counter.ogg"
if %earth=3 rnd2 %damage,60,150
if %earth=0 rnd2 %damage,80,200
mov %damage_nobr,2
damage %damage,%damage
>
gosub *enemylife2
dwave 1,"se\counter.ogg"
if %earth=3 rnd2 %damage,60,150
if %earth=0 rnd2 %damage,80,200
mov %damage_nobr,2
damage %damage,%damage
>
gosub *enemylife2
textclear
dwave 1,"se\counter.ogg"
if %earth=3 rnd2 %damage,60,150
if %earth=0 rnd2 %damage,80,200
mov %damage_nobr,2
damage %damage,%damage
>
gosub *enemylife2
dwave 1,"se\counter.ogg"
if %earth=3 rnd2 %damage,60,150
if %earth=0 rnd2 %damage,80,200
mov %damage_nobr,2
damage %damage,%damage
>
gosub *enemylife2
dwave 1,"se\counter.ogg"
if %earth=3 rnd2 %damage,60,150
if %earth=0 rnd2 %damage,80,200
mov %damage_nobr,2
damage %damage,%damage
>
gosub *enemylife2
skillname ""
if %mylife=0 goto *doppel_h3
if %enemylife=0 goto *doppel_v
if %first_sel5=1 goto *doppel_common_main
name "Luka"
>Erhg!\
name ""
>After hitting each other with numerous blows at the same time, we both jump back in pain.\
>She really can match everything I can do...\
>There has to be some way to win...@
>She has to do something different at some point!@> Something I can take advantage of...\
mov %first_sel5,1
goto *doppel_common_main



*doppel_skill5

if %doppel_mp<1 goto *doppel_insuffmp
mov %before_action,43
mov %count_wind,%count_wind+1
name "Luka"
>Sylph, rage around as you please!
wait 700
textclear
name $name
>Sylph, rage around as you please!
wait 700
textclear
name ""
mov %mp,%mp-1
gosub *mp
mov %doppel_mp,%doppel_mp-1
skillname "Devastating Gale"
mov %wind,3:mov %wind_turn,16
dwave 2,"se\wind3.ogg"
rnd2 %ransu,1,100
notif %ransu=100 lsp2 0,":a;chara\sylph_st12.bmp",200,300,100,100,0,200
if %ransu=100 lsp2 0,":a;chara\sylph_st07.bmp",200,300,100,100,0,200:mov %g_sylph,1
gosub *syoukan_effect
gosub *elm_print
>Luka's movements become as fast and powerful as a devastating gale!
>The Doppelganger's movements become as fast and powerful as a devastating gale!\
skillname ""
if %first_sel7>0 skip 8
name "Luka"
>What!?@> Even the spirits!?@
>But that shouldn't be possible...\
name $name
>Since they're a part of you, they're a part of me too.@
>Good thing those spirits dwell inside of you, or I might not have been able to copy them too...\
mov %first_sel7,1
if %first_sel8=1 goto *doppel_common_main
name $name
>This speed... This is insane!@
>It looks like the world is moving in slow motion...\
>But right now it doesn't change anything...\
name ""
>She's right...@> Even if we're both faster, we're still moving at the same speed as each other.\
>Unfortunately, it doesn't look like Sylph will do anything for me in this fight...\
mov %first_sel8,1
name ""
goto *doppel_common_main



*doppel_skill6

if %doppel_mp<1 goto *doppel_insuffmp
mov %before_action,44
mov %count_earth,%count_earth+1
name "Luka"
>Gnome, infuse me with the unmoving power of the earth!
wait 700
textclear
name $name
>Gnome, infuse me with the unmoving power of the earth!
wait 700
textclear
name ""
mov %mp,%mp-1
gosub *mp
mov %doppel_mp,%doppel_mp-1
skillname "Wild Lands"
mov %earth,3:mov %earth_turn,16
dwave 2,"se\earth2.ogg"
rnd2 %ransu,1,100
notif %ransu=100 lsp2 0,":a;chara\gnome_st21.bmp",200,300,100,100,0,200
if %ransu=100 lsp2 0,":a;chara\gnome_st12.bmp",200,300,100,100,0,200:mov %z_gnome,1
gosub *syoukan_effect
gosub *elm_print
>The unmoving power of the earth takes hold in Luka's body!
>The unmoving power of the earth takes hold in the Doppelganger's body!\
skillname ""
name "Luka"
if %first_sel7=1 skip 8
name "Luka"
>What!?@> Even the spirits!?@
>But that shouldn't be possible...\
name $name
>Since they're a part of you, they're a part of me too.@
>Good thing those spirits dwell inside of you, or I might not have been able to copy them too...\
mov %first_sel7,1
if %first_sel9=1 goto *doppel_common_main
name $name
>My body... I feel so... Durable.\
>It feels like attacks would just bounce off me like mere drops of water.\
name ""
>If she can use Gnome too, then both our defense and attack power have increased...\
>The most I can probably hope for here is just some mutual damage reduction...\
mov %first_sel9,1
name ""
goto *common_main



*doppel_skill7

if %doppel_mp<4 goto *doppel_insuffmp
mov %before_action,45
mov %count_aqua,%count_aqua+1
name "Luka"
>Calm my heart and mind...
wait 700
textclear
name "Doppelganger"
>Calm my heart and mind...
wait 700
textclear
name ""
skillname "Serene Mind"
mov %mp,%mp-4
gosub *mp
mov %doppel_mp,%doppel_mp-4
mov %aqua,3:mov %aqua_turn,16
dwave 2,"se\aqua.ogg"
lsp2 0,":a;chara\undine_st11.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *elm_print
>Luka's heart clears, reaching the height of a serene state!
>The Doppelganger's heart clears, reaching the height of a serene state!\
skillname ""
if %first_sel7=1 skip 8
name "Luka"
>What!?@> Even the spirits!?@
>But that shouldn't be possible...\
name $name
>Since they're a part of you, they're a part of me too.@
>Good thing those spirits dwell inside of you, or I might not have been able to copy them too...\
mov %first_sel7,1
if %first_sel10=1 goto *doppel_common_main
name $name
>Hmm...@> So this is what it's like to be connected to the world...\
>It's strangely calm...@> It makes me want to just...@> Mess it all up.@> Hehe.\
name "Luka"
>I won't let you!\
name ""
>We're both in a serene state... I can't sense any disturbances coming off of her.\
>Since we're both in the same state of mind, I don't think Undine will do anything here...\
mov %first_sel10,1
name ""
goto *doppel_common_main



*doppel_skill8

if %doppel_mp<4 goto *doppel_insuffmp
mov %before_action,46
mov %count_fire,%count_fire+1
name "Luka"
>Salamander, purify everything with the flames of purgatory!
wait 700
textclear
name $name
>Salamander, purify everything with the flames of purgatory!
wait 700
textclear
name ""
mov %mp,%max_mp
gosub *mp
mov %doppel_mp,10
skillname "Purgatory Flame"
mov %fire,3:mov %fire_turn,5
dwave 2,"se\fire4.ogg"
lsp2 0,":a;chara\salamander_st02.bmp",200,300,100,100,0,200
gosub *syoukan_effect
gosub *elm_print
>Licks of flame run up and down Luka's sword, ready to ignite with his sword skills!
wait 700
textclear
>Licks of flame run up and down the Doppelganger's sword, ready to ignite with her sword skills!\
skillname ""
if %first_sel7=1 skip 8
name "Luka"
>What!?@> Even the spirits!?@
>But that shouldn't be possible...\
name $name
>Since they're a part of you, they're a part of me too.@
>Good thing those spirits dwell inside of you, or I might not have been able to copy them too...\
mov %first_sel7,1
if %first_sel11=1 goto *doppel_common_main
name $name
>Oh wow...@>I feel invigorated all of a sudden.\
>I'm not quite sure what this SP stuff is, but all of a sudden it went to maximum...\
name ""
>She doesn't know about SP...?@
>That's right... A monster would usually be using magic for their abilities, not skill points...\
>Of course!@> She knows all of my skills and abilities, but not my memories.\
>Alice was the one who taught me about SP to begin with, so the Doppelganger wouldn't necessarily know about them.\
>Is there some way I can use that to my advantage here...?\
mov %first_sel11,1
goto *doppel_common_main



*doppel_v

skillname ""
name $name
>No...!@> This can't be...@
>How did I lose!?\
dwave 1,"se\syometu.ogg"
csp 700:print 99,4500,"system\breakup.dll/urb"
name ""
>The Doppelganger was sealed into a mirror!\
if %battle_auto=1 skipoff
wait 1000
mov %battle,0
if %aqua=2 bg "BG\"+$haikei+".bmp",10,1500
bgmonce "bgm\fanfale.ogg"
cspl 0,611
gosub *setwindow_01p
mov $sel1," was defeated!"
eng $name+$sel1
$sel6\
goto *doppel_victory



*doppel_kousan

name ""
>I won't let a copy beat me!\
goto *doppel_main



*doppel_onedari

name $name
>My victory is guaranteed.@
>I won't let you even try to trick me by trying to get me to do something...\
name ""
goto *doppel_main



*doppel_h1

skillname ""
name "Luka"
>Ahh!\
name ""
gosub *syasei1
gosub *syasei2
>As the Doppelganger strokes him using his own masturbation techniques, Luka comes, covering her gloves in semen.\
mov %viclose,2:gosub *lose
count 14,5
mov $bad1,"Luka was defeated by the Doppelganger."
name $name
>Oh my. And there you go...@
>Isn't it better when someone else does it for you?@> Hehe.\
>Now that we've determined the copy is better than the original, I think it's time we switched places...\
goto *doppel_h



*doppel_h2

skillname ""
name "Luka"
>Ahh!\
name ""
gosub *syasei1
gosub *syasei2
>After begging for release, the Doppelganger's skilled hands instantly bring Luka over the edge.\
mov %viclose,2:gosub *lose
count 14,5
mov $bad1,"Luka was defeated by the Doppelganger."
name $name
>Hehe.@>So now we both know that I'm the superior version of you.\
>I think it would be a favor to the world for me to take your place then, don't you?\
>It's only fair, right?@> The superior one should have the body...\
>It's time to switch places...\
goto *doppel_h



*doppel_h3

skillname ""
name "Luka"
if %enemylife>0 goto *doppel_h4
if %first_sel15=1 goto *doppel_h5
mov %damage,1
gosub *doppel_recover
>Gah!\
name ""
>A...A double knockout...?@
>No!\
name $name
>Whew, that was close...@
>If it wasn't for this loose patch of dirt over here that let me move back just a hair, we would have beaten each other.\
>It's too bad for you, but I've lived here for a while...@
>Hehe.@>I told you that this being my home ground would tip the scales in my favor.\
name "Luka"
>N...No way...\
name ""
>Brought to my knees after the intense fight, I can't even summon the strength left to stand.\
>But she's breathing hard, too...\
>If I could just tap her one more time, she would be too weak to fight too!\
>Come on legs, hold out just a little longer...!\
name $name
>Oho, look at you trying to stand up.\
>You're right, I shouldn't risk toying around with you yet...@
>You little Hero types always seem to summon some sort of deus ex machina in these kinds of situations, don't you?\
name ""
>The Doppelganger quietly meditates.\
mov %damage,800
gosub *enemylife_kaihuku
name $name
>Ah, that's much better.@
>But you can never be too careful, you know?\
name ""
>The Doppelganger quietly meditates.\
gosub *enemylife_kaihuku
name "Luka"
>N...No...\
name ""
>Stunned at her sudden complete heal, I sink back onto the ground in defeat.\
mov %viclose,2:gosub *lose
count 14,5
mov $bad1,"Luka was defeated by the Doppelganger."
name $name
>There we go, full power.@> Hehe.\
>So much for "the original", huh?@> It looks like this power is far more suited to me, don't you agree?\
>So let's switch places... I don't want to lose this incredible power after only an hour, after all.\
goto *doppel_h



*doppel_h4

name "Luka"
>Gah...\
name ""
>Too injured to stand any longer, I fall to my knees in front of her.\
name $name
>Hehe...@>Looks like I'm the superior version.@
>Naturally, that means this power should belong to me...\
>You aren't qualified to wield it.\
name ""
mov %viclose,2:gosub *lose
count 14,5
mov $bad1,"Luka was defeated by the Doppelganger."
name $name
>So let's switch places... I don't want to lose this incredible power after only an hour, after all.\
goto *doppel_h



*doppel_h5

name ""
skillname ""
name $name
>Ahh!
wait 200
textclear
name "Luka"
>Ahhg!
wait 200
textclear
name ""
>Luka was killed...
>The Doppelganger was sealed into a mirror...\
mov $bad1,"Luka and the Doppelganger defeated each other after destroying the forest."
goto *doppel_badend



*doppel_h

mov $bad2,"Impregnated by his old body, Luka is forced to live out the rest of his days as a woman, caring for his child."
name "Luka"
>Wh...What do you mean switch places?\
name $name
>Oh, you didn't know?@
>Us Doppelgangers are able to perfectly copy an opponent's skills and looks for about an hour.\
>It takes around a half hour of breathing in your residual magic to copy you to this extent.\
>Normally that's the end of it...@> But if we drain our opponent of enough magic, we can switch bodies.@
>By pushing our magic into our opponent, we can cause our very souls itself to switch.\
>Of course there's no real reason to do that...@> We're almost always stronger than silly humans after all, so it would just be a downgrade in power.\
>But you...@> You're something else.@>I don't think there's ever been a human as powerful as you.\
>If I had your body, I could take over both the human and monster kingdoms...!\
name "Luka"
>N...No way...@>You can't do that!\
name $name
>Of course I can.@> All I have to do is drain your magic first.@
>You've heard of it before, right?@>"Critical Ecstasy"?@
>No matter how insanely strong you are, I can weaken you enough to switch.\
>Hehe, I can't wait to replace you.\
name ""
>With a big smile on her face, the Doppelganger pushes me to the ground.@
lsp 700,":l;Doppel/doppelmountout.png",0,0:print 10,500
>Quickly mounting on top of me, she presses the entrance to her vagina right against my erect shaft.\
name $name
>Hehe, do you like what you see?@>You're actually pretty lucky, you know...@>You'll get to have experienced what it's like to have sex as both a man and a woman soon.\
>I'm actually pretty excited to feel what having sex as a man feels like, too!\
>It's only possible to switch bodies once, so I've always thought I would never do it...@>Looks like I'm lucky, too!\
name "Luka"
>No... Don't do this...@
>I don't want to lose my body!@>I don't want to become a monster!\
name $name
>Oh, don't worry about that!@
>It would be too risky for me to leave you with my old Doppelganger powers, so I'll be sure to use that convenient sword of yours to seal off that power forever.\
>You'll be indistinguishable from just a normal human girl.\
name "Luka"
>I don't want to be a girl!@> Get off me!\
name ""
>I struggle as hard as I can, trying to get her off...@
>But it's no good.@>I'm too weak after being beaten, and she's just as strong as I am at full power.\
>There's no way to get her off...\
name $name
>Now now... You ought to enjoy this.@
>It will be your last time having sex as a man, so make sure you burn it into your memory!\
>It's time to start draining that magic of yours to prepare for the switch!\
name ""
>With an excited laugh, the Doppelganger pushes herself up a little bit.@
>After positioning her vagina right over my penis, she drops down in one powerful movement.\
mov %hseanwave,1:hseanwave
lsp 700,":l;Doppel/doppelmountin.png",0,0:print 10,500
name "Luka"
>Ahhh!\
name ""
>I yell out in surprise at suddenly piercing her, as the sensations from her flesh fill my brain with an instant explosion of pleasure.\
>Moments after insertion, I feel her soft flesh clamp down around my penis, locking me inside her wet hole.\
name $name
>Well, how does it feel?@
>It's pretty good, isn't it?@>It's going to be your pussy soon, so feel free to use it however you want. Hehe.\
name ""
>The Doppelganger's vaginal muscles squeeze and rub against my penis as she talks, as if she was trying to examine my penis inside her.\
name $name
>Mmm...@> Your dick is amazing, too...@>I can't wait to use it.\
>Hey... Do you have anyone I could have sex with after I take your body?\
>Married?@> Girlfriend?@> Sex friend?\
name "Luka"
>Y...You couldn't...!\
name $name
>Of course I could!@> At least until they realize that I'm acting different from you...@
>But hey, they may never notice, either.\
>I don't think it would work on that Lamia I changed into before, though...@> I think she would see through me.\
>But you were a Hero, right?@>So I'm sure there must be princesses somewhere or something.\
name "Luka"
>Stop joking around!@>Get off me!\
name $name
>Aww, you're no fun...@
>Oh well, I guess there's always you after we switch.@> Hehe.\
name ""
>After she finishes taunting me, the Doppelganger starts to slowly move up and down.@
>Inch by inch, I'm slowly brought out of her...@
>Then inch by inch, she forces me back into her wetness.\
name "Luka"
>Ah...!\
name $name
>Mmm...@> This will be my last time as a girl too, so I don't want to end this too quick...\
name ""
>The Doppelganger bends over a little more as she grinds against me, gently riding me.\
>Her soft flesh eagerly grabs at my penis as she forces me in and out of her, small gasps escaping from her mouth with every completed pump.\
name $name
>Ah...@>My new dick feels so good...@
>I was expecting something horrible after I copied your skills and found you barely better than a virgin with your sexual techniques.\
>You've really wasted this dick of yours, you know...@> But don't worry, I'll put it to good use.\
name ""
>My face goes red as she openly talks about my lack of sexual experience.@
>I try to protest, but my words get muffled by moans of pleasure leaking from my lips.\
name "Luka"
>Ahh...\
name ""
>The Doppelganger starts to breathe a little harder as her movements quicken.@
>As she rides me faster and faster, yells of pleasure burst from her mouth.\
name $name
>Ah! Yes!@> This is the best!@> Not only am I going to be stronger than I ever imagined, but I get to have fun first!\
>I never dreamed I'd be this lucky!\
name ""
>Drunk on her own pleasure, the Doppelganger rides me even harder.@
>Helplessly stuck under her, I feel myself about to come as my body is immersed in the sensations from her soft vagina.\
name "Luka"
>I...I'm going to come...!\
name $name
>Just a little longer, then you can come as fast as you want while I take your body!\
name ""
>The sudden horrifying words cause me to regain my senses and tense up, temporarily saving me from an orgasm.\
name $name
>Ahhh!\
name ""
lsp 700,":l;Doppel/doppelmountin2.png",0,0:print 10,500
>As the Doppelganger's body spasms in ecstasy, her vagina clamps down around my penis.@
>The temporary horror at her words are blown away in bliss as I climax, coming inside her.\
gosub *syasei1
gosub *syasei2
name $name
>Mmm...@> That was good...\
>I'll miss having sex as a girl, but I'm sure I'll love it as a man, too.\
>Don't worry, I'll let you feel what I'm feeling soon enough.@> Hehe.\
name "Luka"
>Ahh...\
name ""
>I feel more strength draining from me after my orgasm.@
>Just as she said, the magic in my body must be rapidly flowing out because of that critical ecstasy...\
lsp 700,":l;Doppel/doppelmountin.png",0,0:print 10,500
name $name
>I just realized something.@
>Even if I sealed my Doppelganger powers after we switch, and I make you a normal human girl...\
>There's nothing stopping you from training and becoming just as strong as you are now.@
>You were already a human and got to be this powerful, so why couldn't you do it again?\
name ""
>Th...That's right!@> Even if I lose here, I can start training again and find a way to get my body back!\
>If she steals my body, I'm sure I can find some way to get it back!\
>Finally seeing a light breaking through the dark despair I've been feeling, I start to regain hope.\
name $name
>Oh... Hehe.@>I didn't say that to give you hope, you moron.@
>I meant that I just realized I needed to do something about it.\
>And you coming inside of me just gave me the answer I needed!\
>I was thinking about killing you after having some fun with you, but that's just so barbaric...@
>I'm not that kind of monster, so I was hoping to get around that.\
name ""
>K...Kill me!?@
>My blood runs cold at her heartless words.\
name "Luka"
>Wh...What are you planning on doing?\
name $name
>Hehe...@>How would you like to be a mommy?\
name "Luka"
>Wh...What...?@>I'm a man...\
name $name
>Now, now... You have to stop thinking like that.@
>I already told you we're going to switch bodies, so you need to get used to the thought of being a woman.\
>You know how us monsters feed on semen, right?@
>Well it would be incredibly inconvenient if every time we just wanted to eat, we risked getting pregnant.\
>So Doppelgangers, like most other monsters, are able to control when we're able to get pregnant.@
>We always have an egg ready to be fertilized, we just have to open up our cervix and let in the semen.\
>Doing that, we can guarantee for sure whether we want to be fertilized or not.\
name "Luka"
>Y...You wouldn't...\
name $name
>Normally I wouldn't.@> Getting pregnant for nine months would be such a drag, so I always made sure to close it.\
>But I think it would be a great way to get you out of the picture after we switch, don't you!?\
name "Luka"
>No, don't do it!@> Don't do that!\
name $name
>Too bad, I already decided!@
>You won't be able to do anything for at least nine months, all while I do whatever I want.\
>And just think!@>You'll probably be the only guy who ever got to both fertilize and give birth to the same baby!@
>Doesn't that sound like fun?\
name "Luka"
>No!@>Get off of me!\
name ""
>I push against the Doppelganger as hard as I can, desperate to get her off of me.@
>I don't want this to happen!@> I've always wanted to be a father, but not a mother!\
name $name
>You couldn't push me off before, why do you think you could get me off now?\
>Let's hurry up and make a child...@> Hehe.\
name ""
>After saying that, the Doppelganger starts to grind against me again.@
>Her smooth body rubs against mine as she thrusts me in and out of her.\
name "Luka"
>No... Stop...! Ah...\
name ""
>Moans of pleasure start to leak back into my cries of horror.@
>I can't let myself come inside her!@>I'm a man, I can't be a mother!\
>The Doppelganger looks down at me under her and starts to laugh.\
name $name
>Hehe... Your face looks so horrified, but your penis feels so eager...@
>It's twitching inside of me, eager to fertilize your new body.\
name ""
>As the Doppelganger starts to ride me even harder, I feel myself about to come.@
>I clench my stomach as hard as I can, trying anything I can think of to hold on.\
name "Luka"
>No... Not this... Anything but this...\
name ""
>The ache in my lower body is getting too strong to hold back.\
>My body is going to betray me...@
>This body I'm about to lose is going to fail me right at the end.\
name $name
>Now to make the baby you're going to be carrying for the next nine months!\
name ""
>After saying that, the Doppelganger squeezes down hard on me with a giggle.\
name "Luka"
>Ahh!\
gosub *syasei1
lsp 700,":l;Doppel/doppelmountin2.png",0,0:print 10,500
gosub *syasei2
name ""
>My body spasms as I explode inside her, shooting my seed straight into her waiting womb.\
name "Luka"
>No...\
name $name
>Congratulations!@> You're now officially going to be a mother!@> And a father, too, I guess.@> Hehe.\
name ""
>The Doppelganger squeezes down on my penis, pressing out the last drops of my semen into her.\
name "Luka"
>Ah... Ah...\
name $name
>There's a good boy...\
>Now then, almost all of your magic has been drained, but I need to get just a little bit more out of you before we can switch.\
>So you'll get to have one final orgasm as a man.@> You should try to enjoy it.\
name ""
>Giving me no time to rest, the Doppelganger starts to move again.@
>Grinding hard against me, she forces me deep into her before pulling me back out.\
name "Luka"
>Ah...\
name ""
>Unable to help myself, I let out a moan as my body is wracked in pleasure.\
>Awash in despair from what just happened, I can't bring myself to even try to struggle any longer.\
name $name
>It looks like you've accepted your fate...\
name ""
>As the Doppelganger looks down at me with a smile on her face, my lower body tingles as I feel myself about to explode in her again.\
name "Luka"
>Ah... I'm coming...\
gosub *syasei1
lsp 700,":l;Doppel/doppelmountin.png",0,0:print 10,500
gosub *syasei2
name $name
>There you go...@
>Now for me to take those powerful skills of yours permanently...\
name ""
>The Doppelganger leans over, and kisses me!@
>Surprised at the sudden action, I stay motionless for a moment as I feel her warm tongue invade my mouth.\
name $name
>Mmm...\
name ""
flushout 1000
if %first_sel15=0 bg "bg\bg093.bmp",10,3000
if %first_sel15=1 bg "bg\bg076.bmp",10,3000
>Seconds after first feeling her tongue inside my mouth, I suddenly feel my tongue inside her mouth.\
>Wait, no... That isn't it...@
>I'm looking at me!\
name $name
>Oh... Interesting...@
>So this is how it feels to be inside a woman...\
name ""
>After getting over my initial shock, the drastic difference in sensations suddenly floods over me.\
>Instead of feeling her soft flesh squeezing down around my vagina, I instead feel my old body's hard shaft seemingly inside my body.\
name $name
>Here we go, lets try moving a little...\
name ""
>Suddenly, the Doppelganger starts to thrust upward into me, forcing my old penis deep into my new vagina.\
name "Luka"
>Ahh...\
name ""
>Still completely exhausted as I was in my old body, I feebly let out a moan as the brand new pleasure attacks my confused brain.\
name $name
>That's a nice voice you have there...@
>Hah!\
name ""
>Using my old body, the Doppelganger starts to pump me hard.\
>Unable to take it any longer, I collapse on her, my new breasts pushing against my old body's chest.\
name "Luka"
>Ah!\
name ""
>A lightning bolt of pleasure races up my spine as my nipples rub against her new body.\
>Overcome by all of these new womanly sensations at once, I feel a powerful orgasm coming on.\
>But instead of just feeling it in my waist like when I was a man, it feels like my entire body is about to release.\
name $name
>I'm coming...!\
name ""
>At the same time, I feel the hard shaft inside of me grow a little, and start to twitch.\
>In the next moment, a warm liquid explodes out of it, flooding my body.@
>As the semen shoots into me, my body starts to spasm as it feels like all of my muscles are tensing at the same time.\
name "Luka"
>Ahhhh!!\
gosub *syasei1
gosub *syasei2
name ""
>After the incredible high of the climax starts to fade, I sigh as the afterglow fills my weak body.\
name $name
>Oh...@>I could get used to that...\
>Well?@>How did you like it?@> Pretty good, right?\
name "Luka"
>My body...@> Ah...@> Give it back...\
name $name
>Even if I wanted to, it's a one way deal.@
>Ah, that reminds me.\
name ""
>The Doppelganger pulls out of me, and picks up Angel Halo.@
>And slashes me across the chest!\
dwave 2,"se\damage.ogg"
name "Luka"
>Ahhh!\
name ""
>As soon as the sword hits me, it feels like a piece of my soul was sucked out into it.\
name $name
>There you go, all of the Doppelganger powers that body had have been sealed now.@
>You're no different than a normal human girl now.\
>Ah...@>A pregnant normal human girl, that is.\
name "Luka"
>N...No...\
name ""
>That's right... She forced me to get her old body pregnant...@>So now... I'm pregnant...?\
name $name
>There's a town about a mile to the east of here.@
>Watch out for bandits on the road though.@>Don't want to get raped, right?@>Haha.\
>Thanks for the body, and good luck.@>You can probably work as a prostitute if you're short on money and nobody will hire you since you're pregnant.\
>Good luck raising our kid.\
gosub *anten
>With those final words, the Doppelganger leaves me.@
>Too exhausted to move, I quickly pass out, abandoning any hope of ever following her.\
>When I come to, I start to search for Alice.@
>But after not finding her for a few days, I give up and head to the nearby town.\
>Just like she said, I start to see signs of pregnancy after a few weeks.@
>As I try to figure out how I'm going to survive, news of the "Great Demon Luka" reaches me.\
>Apparently the Doppelganger accepted the Sabasa King's proposal of marriage for his daughter, and quickly married Sara.\
>Soon after that, he started to attack human towns one after another, raping and subjugating every location he comes across.\
>I can't do anything to stop him...@
>Resigned to my fate, I decide to live the rest of my life as a woman, raising my child.\
goto *doppel_badend



*doppel_victory

bgm "bgm\field3.ogg"
name "Luka"
>Whew, that was difficult.\
>There are all types of monsters, huh?@
>I can't let my guard down...\
name ""
if %first_sel15=0 skip 5
>But the forest...@>That double Quadruple Giga completely annihilated it.@
>I hope Alice didn't get caught up in the attack...\
>Well, it should at least cause her to come hurrying here to check out what happened.\
>I start to walk toward where I think the campsite was, thinking of how to break the news to Alice about how there won't be any dinner tonight.\
gosub *anten
name ""
>CG by wizard898
>Scenario by RogueTranslator.\
>Thanks for playing!\
reset



*doppel_hansei

lsp 700,":a;chara\amira_st01.bmp",0,0:print 10,500
name "Amira"
>Oh, my darling!@
>What are you doing here?\
>Y...You didn't possibly do...@>Perverted things with someone besides me, did you?\
>I hope not...@>That would break my pure maiden heart...\
>A Doppelganger, was it?@
>Well that's easy, just fight her two on one!\
>She can only mimic one person, so just get that snake lady...@
>What?@>She doesn't fight with you?\
>I knew I should have been the heroine...@
>If it was me by your side, I would shield you from every blow, darling.\
>Throw that harlot away and take me instead!\
>But until we petition for me to replace her, you'll need to defeat this monster...\
>Why don't you just try to experiment around with your abilities?@
>Maybe she will do something different from you, and you can exploit that...\
>Now go, my darling Luka.@
>I'll be waiting for you.\
return



*overflow

textclear
eng "Overflow in the section ["+$mon_labo_mon_ini_sc+"]":$sel6\
goto *stackret1



*jumpzero

textclear
eng "No jump destination in the section ["+$mon_labo_mon_ini_sc+"] string "+$mon_labo_mon_ini_ky+"!":$sel6\
goto *stackret1



*empty_skill

textclear
eng "Skill ["+$skill_tag+"] is empty!":$sel6\
goto *stackret1



*ret1

textclear
len %name_count,$skill_tag
mid $sub1,$skill_tag,5,%name_count-5
eng "["+$sub1+"] isn't the correct skill for this stance/bind level!":$sel6\
if %counter>0 mov $sub1,"counterX (X>=0)":skip 5
if %kousoku=3 mov $sub1,"dX (X>0)"
if %kousoku=2 mov $sub1,"cX (X>0)"
if %kousoku=1 mov $sub1,"bX (X>0)"
if %kousoku=0 mov $sub1,"counter0, counter1, tame0, tame1, tame2 or aX (X>0)"
eng "The correct name must be "+$sub1+", X - the any number.":$sel6\
goto *stackret1



*ret2

textclear
len %name_count,$skill_tag
mid $sub1,$skill_tag,5,%name_count-5
eng "["+$sub1+"] isn't the correct value for a skill key!":$sel6\
eng "Must be aX, bX, cX, dX, counterX (X>0), counter0, tame0, tame1 or tame2":$sel6\
goto *stackret1



*ret3

textclear
len %name_count,$skill_tag
mid $sub1,$skill_tag,5,%name_count-5
eng "["+$sub1+"] isn't the correct value for the skill_onedari_use= key!":$sel6\
eng "Must be aX (X>0)":$sel6\
goto *stackret1



*debug_cooldowns

add %stack,1
textclear
mov $sub1,""
itoa $sub2,%tuika_owaza_count1a
add $sub1,$sub2
itoa $sub2,%tuika_owaza_count1b
if $sub1<>"" add $sub1," "
add $sub1,$sub2
itoa $sub2,%tuika_owaza_count1c
if $sub1<>"" add $sub1," "
add $sub1,$sub2
itoa $sub2,%tuika_owaza_count1d
if $sub1<>"" add $sub1," "
add $sub1,$sub2
itoa $sub2,%tuika_owaza_count1e
if $sub1<>"" add $sub1," "
add $sub1,$sub2
itoa $sub2,%tuika_owaza_count1f
if $sub1<>"" add $sub1," "
add $sub1,$sub2
itoa $sub2,%tuika_owaza_count1g
if $sub1<>"" add $sub1," "
add $sub1,$sub2
itoa $sub2,%tuika_owaza_count1h
if $sub1<>"" add $sub1," "
add $sub1,$sub2
itoa $sub2,%tuika_owaza_count4a
if $sub1<>"" add $sub1," "
add $sub1,$sub2
itoa $sub2,%tuika_owaza_count4b
if $sub1<>"" add $sub1," "
add $sub1,$sub2
eng $sub1:$sel6\
sub %stack,1
return



*debug_kakuritu

add %stack,1
textclear
mov $sub1,""
itoa $sub2,%tuika_skilla1
add $sub1,$sub2
itoa $sub2,%tuika_skilla2
if $sub1<>"" add $sub1," "
add $sub1,$sub2
itoa $sub2,%tuika_skilla3
if $sub1<>"" add $sub1," "
add $sub1,$sub2
itoa $sub2,%tuika_skilla4
if $sub1<>"" add $sub1," "
add $sub1,$sub2
itoa $sub2,%tuika_skilla5
if $sub1<>"" add $sub1," "
add $sub1,$sub2
itoa $sub2,%tuika_skilla6
if $sub1<>"" add $sub1," "
add $sub1,$sub2
itoa $sub2,%tuika_skilla7
if $sub1<>"" add $sub1," "
add $sub1,$sub2
itoa $sub2,%tuika_skilla8
if $sub1<>"" add $sub1," "
add $sub1,$sub2
itoa $sub2,%tuika_skille1
if $sub1<>"" add $sub1," "
add $sub1,$sub2
itoa $sub2,%tuika_skillf1
if $sub1<>"" add $sub1," "
add $sub1,$sub2
eng $sub1:$sel6\
sub %stack,1
return



*debug_main

mov %99,0
mov %100,0
return
